From 76d235ca56971ea3bb84ccd050c114a8b8c5722b Mon Sep 17 00:00:00 2001
From: David Minton <daminton@purdue.edu>
Date: Thu, 16 Sep 2021 11:17:03 -0400
Subject: [PATCH] Updated FORD documenation

---
 docs/index.html                               |     8 +
 docs/interface/discard_pl.html                |     2 +-
 docs/interface/discard_system.html            |     2 +-
 docs/interface/discard_tp.html                |     2 +-
 docs/interface/drift_all.html                 |     8 +-
 docs/interface/drift_body.html                |     2 +-
 docs/interface/drift_one.html                 |     2 +-
 .../interface/fraggle_generate_fragments.html |   316 +-
 .../interface/fraggle_io_log_one_message.html |    96 +-
 .../fraggle_util_get_energy_momentum.html     |    84 +-
 .../fraggle_util_shift_vector_to_origin.html  |   108 +-
 docs/interface/fraggle_util_vmag_to_vb.html   |    52 +-
 docs/interface/gr_kick_getaccb_ns_body.html   |     2 +-
 docs/interface/gr_kick_getacch.html           |     8 +-
 docs/interface/gr_p4_pos_kick.html            |     2 +-
 docs/interface/gr_pseudovel2vel.html          |     2 +-
 docs/interface/gr_pv2vh_body.html             |     2 +-
 docs/interface/gr_vel2pseudovel.html          |     2 +-
 docs/interface/gr_vh2pv_body.html             |     2 +-
 docs/interface/helio_drift_body.html          |    34 +-
 docs/interface/helio_gr_kick_getacch_pl.html  |     2 +-
 docs/interface/helio_gr_kick_getacch_tp.html  |     2 +-
 docs/interface/io_conservation_report.html    |     2 +-
 docs/interface/io_dump_base.html              |   132 +-
 docs/interface/io_dump_param.html             |     2 +-
 docs/interface/io_dump_particle_info.html     |     2 +-
 .../interface/io_dump_particle_info_base.html |     2 +-
 docs/interface/io_dump_system.html            |    30 +-
 docs/interface/io_get_args.html               |    72 +-
 docs/interface/io_get_old_t_final_system.html |     2 +-
 docs/interface/io_get_token.html              |     2 +-
 docs/interface/io_param_reader.html           |    74 +-
 docs/interface/io_param_writer.html           |     2 +-
 docs/interface/io_read_frame_body.html        |     2 +-
 docs/interface/io_read_frame_cb.html          |     2 +-
 docs/interface/io_read_frame_system.html      |     2 +-
 docs/interface/io_read_in_body.html           |     2 +-
 docs/interface/io_read_in_cb.html             |     2 +-
 docs/interface/io_read_in_param.html          |     2 +-
 docs/interface/io_read_in_particle_info.html  |     2 +-
 .../io_read_particle_info_system.html         |     2 +-
 docs/interface/io_toupper.html                |    58 +-
 docs/interface/io_write_discard.html          |     2 +-
 docs/interface/io_write_encounter.html        |     2 +-
 docs/interface/io_write_frame_body.html       |     2 +-
 docs/interface/io_write_frame_cb.html         |     2 +-
 docs/interface/io_write_frame_encounter.html  |     2 +-
 docs/interface/io_write_frame_system.html     |     2 +-
 docs/interface/io_write_hdr_system.html       |     2 +-
 docs/interface/kick_getacch_int_all_pl.html   |    10 +-
 docs/interface/kick_getacch_int_all_tp.html   |   626 +
 docs/interface/kick_getacch_int_one_pl.html   |     8 +-
 docs/interface/kick_getacch_int_one_tp.html   |     8 +-
 docs/interface/kick_getacch_int_pl.html       |     2 +-
 docs/interface/kick_getacch_int_tp.html       |    40 +-
 docs/interface/lambda_obj~2.html              |    28 +-
 docs/interface/netcdf_close.html              |     2 +-
 docs/interface/netcdf_initialize_output.html  |   102 +-
 docs/interface/netcdf_open.html               |    50 +-
 docs/interface/netcdf_write_frame_base.html   |    64 +-
 docs/interface/netcdf_write_frame_system.html |     2 +-
 docs/interface/netcdf_write_hdr_system.html   |    48 +-
 .../netcdf_write_particle_info_base.html      |    64 +-
 docs/interface/obl_acc_body.html              |    46 +-
 docs/interface/obl_acc_pl.html                |     2 +-
 docs/interface/obl_acc_tp.html                |     2 +-
 docs/interface/obl_pot_system.html            |     2 +-
 docs/interface/orbel_el2xv_vec.html           |   264 +-
 docs/interface/orbel_scget.html               |   190 +-
 docs/interface/orbel_xv2aeq.html              |     2 +-
 docs/interface/orbel_xv2aqt.html              |     2 +-
 docs/interface/orbel_xv2el.html               |     2 +-
 docs/interface/orbel_xv2el_vec.html           |     2 +-
 docs/interface/rmvs_chk_ind.html              |   254 +-
 docs/interface/rmvs_discard_tp.html           |     2 +-
 docs/interface/rmvs_encounter_check_tp.html   |    40 +-
 docs/interface/rmvs_io_write_encounter.html   |     6 +-
 docs/interface/rmvs_kick_getacch_tp.html      |     2 +-
 .../rmvs_setup_initialize_system.html         |     2 +-
 docs/interface/rmvs_setup_pl.html             |     2 +-
 docs/interface/rmvs_setup_tp.html             |     2 +-
 docs/interface/rmvs_step_system.html          |   202 +-
 docs/interface/rmvs_util_append_pl.html       |    50 +-
 docs/interface/rmvs_util_append_tp.html       |    34 +-
 docs/interface/rmvs_util_fill_pl.html         |    38 +-
 docs/interface/rmvs_util_fill_tp.html         |    22 +-
 docs/interface/rmvs_util_resize_pl.html       |     2 +-
 docs/interface/rmvs_util_resize_tp.html       |    34 +-
 docs/interface/rmvs_util_sort_pl.html         |     2 +-
 .../rmvs_util_sort_rearrange_pl.html          |     2 +-
 .../rmvs_util_sort_rearrange_tp.html          |    34 +-
 docs/interface/rmvs_util_sort_tp.html         |     2 +-
 docs/interface/rmvs_util_spill_pl.html        |    26 +-
 docs/interface/rmvs_util_spill_tp.html        |    44 +-
 docs/interface/setup_body.html                |    38 +-
 docs/interface/setup_construct_system.html    |     2 +-
 docs/interface/setup_encounter.html           |     4 +-
 ...setup_initialize_particle_info_system.html |     2 +-
 docs/interface/setup_initialize_system.html   |     2 +-
 docs/interface/setup_pl.html                  |     4 +-
 docs/interface/setup_tp.html                  |     4 +-
 docs/interface/symba_collision_casemerge.html |    34 +-
 .../symba_collision_check_encounter.html      |    46 +-
 ...ymba_collision_resolve_fragmentations.html |   250 +-
 .../symba_collision_resolve_mergers.html      |    86 +-
 docs/interface/symba_discard_pl.html          |    52 +-
 docs/interface/symba_encounter_check_one.html |    52 +-
 docs/interface/symba_encounter_check_pl.html  |    42 +-
 docs/interface/symba_io_param_reader.html     |    60 +-
 docs/interface/symba_util_append_merger.html  |    30 +-
 docs/interface/symba_util_append_tp.html      |    32 +-
 docs/interface/symba_util_fill_pl.html        |    50 +-
 docs/interface/symba_util_fill_tp.html        |    50 +-
 .../interface/symba_util_index_eucl_plpl.html |    18 +-
 docs/interface/symba_util_resize_tp.html      |    38 +-
 .../symba_util_sort_rearrange_pl.html         |    38 +-
 .../symba_util_sort_rearrange_tp.html         |    38 +-
 .../interface/symba_util_spill_encounter.html |    50 +-
 docs/interface/symba_util_spill_pl.html       |    50 +-
 docs/interface/symba_util_spill_tp.html       |    50 +-
 docs/interface/tides_kick_getacch_pl.html     |     2 +-
 docs/interface/tides_step_spin_system.html    |     2 +-
 docs/interface/user_kick_getacch_body.html    |     2 +-
 docs/interface/util_append.html               |    72 +-
 docs/interface/util_append_body.html          |    72 +-
 docs/interface/util_append_pl.html            |     8 +-
 docs/interface/util_append_tp.html            |     8 +-
 docs/interface/util_append~2.html             |   180 +-
 .../util_copy_particle_info_arr.html          |    54 +-
 docs/interface/util_exit.html                 |  1018 +-
 docs/interface/util_fill.html                 |    34 +-
 docs/interface/util_fill_body.html            |    60 +-
 docs/interface/util_fill~2.html               |    26 +-
 .../util_get_energy_momentum_system.html      |    21 +-
 docs/interface/util_index_eucl_ij_to_k.html   |   581 +
 docs/interface/util_index_eucl_k_to_ij.html   |   465 +
 docs/interface/util_index_eucl_plpl.html      |    38 +-
 docs/interface/util_index_eucl_pltp.html      |     2 +-
 docs/interface/util_resize.html               |    20 +-
 docs/interface/util_resize_body.html          |    56 +-
 docs/interface/util_resize_pl.html            |    60 +-
 docs/interface/util_resize_tp.html            |    60 +-
 docs/interface/util_resize~2.html             |   250 +-
 docs/interface/util_sort.html                 |    76 +-
 docs/interface/util_sort_body.html            |    72 +-
 docs/interface/util_sort_rearrange.html       |    34 +-
 docs/interface/util_sort_rearrange_body.html  |    34 +-
 docs/interface/util_sort_rearrange_pl.html    |    60 +-
 docs/interface/util_sort_rearrange_tp.html    |    60 +-
 docs/interface/util_sort_rearrange~2.html     |    78 +-
 docs/interface/util_spill.html                |    38 +-
 docs/interface/util_spill_body.html           |    72 +-
 docs/interface/util_spill~2.html              |   130 +-
 docs/interface/util_valid_id_system.html      |    36 +-
 docs/interface/whm_coord_h2j_pl.html          |    50 +-
 docs/interface/whm_coord_j2h_pl.html          |    50 +-
 docs/interface/whm_coord_vh2vj_pl.html        |    36 +-
 docs/interface/whm_drift_pl.html              |    24 +-
 docs/interface/whm_gr_kick_getacch_pl.html    |     2 +-
 docs/interface/whm_gr_kick_getacch_tp.html    |     2 +-
 docs/interface/whm_util_append_pl.html        |    36 +-
 docs/interface/whm_util_fill_pl.html          |    36 +-
 docs/interface/whm_util_resize_pl.html        |    32 +-
 docs/interface/whm_util_spill_pl.html         |    42 +-
 docs/lists/files.html                         |  2601 ++-
 docs/lists/modules.html                       |  2418 +--
 docs/lists/procedures.html                    | 15837 ++++++++--------
 docs/lists/types.html                         |   941 +-
 docs/module/drift_implementation.html         |   372 +-
 docs/module/fraggle_classes.html              |  1566 +-
 docs/module/helio_classes.html                |  1612 +-
 docs/module/lambda_function.html              |  1154 +-
 docs/module/orbel.html                        |   378 +-
 docs/module/rmvs_classes.html                 |  1712 +-
 docs/module/s_discard.html                    |   368 +-
 docs/module/s_fraggle_generate.html           |   383 +-
 docs/module/s_fraggle_io.html                 |   383 +-
 docs/module/s_fraggle_placeholder.html        |   381 +-
 docs/module/s_fraggle_regime.html             |   381 +-
 docs/module/s_fraggle_set.html                |   381 +-
 docs/module/s_fraggle_setup.html              |   381 +-
 docs/module/s_fraggle_util.html               |   381 +-
 docs/module/s_gr.html                         |   370 +-
 docs/module/s_helio_drift.html                |   421 +-
 docs/module/s_helio_gr.html                   |   425 +-
 docs/module/s_helio_kick.html                 |   423 +-
 docs/module/s_helio_setup.html                |   421 +-
 docs/module/s_helio_step.html                 |   421 +-
 docs/module/s_io.html                         |   368 +-
 docs/module/s_kick.html                       |   541 +-
 docs/module/s_netcdf.html                     |   401 +-
 docs/module/s_obl.html                        |   368 +-
 docs/module/s_operator_cross.html             |   410 +-
 docs/module/s_orbel.html                      |   370 +-
 docs/module/s_rmvs_chk.html                   |   505 +-
 docs/module/s_rmvs_discard.html               |   377 +-
 docs/module/s_rmvs_io.html                    |   377 +-
 docs/module/s_rmvs_kick.html                  |   377 +-
 docs/module/s_rmvs_setup.html                 |   377 +-
 docs/module/s_rmvs_step.html                  |   377 +-
 docs/module/s_rmvs_util.html                  |   377 +-
 docs/module/s_setup.html                      |   368 +-
 docs/module/s_symba_collision.html            |   368 +-
 docs/module/s_symba_discard.html              |   366 +-
 docs/module/s_symba_drift.html                |   366 +-
 docs/module/s_symba_encounter_check.html      |   370 +-
 docs/module/s_symba_io.html                   |   366 +-
 docs/module/s_symba_kick.html                 |   368 +-
 docs/module/s_symba_setup.html                |   366 +-
 docs/module/s_symba_step.html                 |   366 +-
 docs/module/s_symba_util.html                 |   368 +-
 docs/module/s_tides_kick_getacch.html         |   368 +-
 docs/module/s_tides_step_spin.html            |   368 +-
 docs/module/s_user_kick_getacch.html          |   368 +-
 docs/module/s_util_append.html                |   368 +-
 docs/module/s_util_coord.html                 |   368 +-
 docs/module/s_util_copy.html                  |   368 +-
 docs/module/s_util_exit.html                  |   368 +-
 docs/module/s_util_fill.html                  |   368 +-
 docs/module/s_util_get_energy_momentum.html   |   589 +-
 docs/module/s_util_index.html                 |   612 +-
 docs/module/s_util_minimize_bfgs.html         |   370 +-
 docs/module/s_util_peri.html                  |   368 +-
 docs/module/s_util_rescale.html               |   368 +-
 docs/module/s_util_resize.html                |   368 +-
 docs/module/s_util_set.html                   |   368 +-
 docs/module/s_util_solve.html                 |   368 +-
 docs/module/s_util_sort.html                  |   368 +-
 docs/module/s_util_spill.html                 |   368 +-
 docs/module/s_util_valid.html                 |   368 +-
 docs/module/s_util_version.html               |   368 +-
 docs/module/s_whm_coord.html                  |   374 +-
 docs/module/s_whm_gr.html                     |   378 +-
 docs/module/s_whm_kick.html                   |   374 +-
 docs/module/s_whm_setup.html                  |   374 +-
 docs/module/s_whm_step.html                   |   374 +-
 docs/module/s_whm_util.html                   |   374 +-
 docs/module/swiftest_classes.html             |  3391 ++--
 docs/module/swiftest_operators.html           |  1236 +-
 docs/module/symba_classes.html                |  1430 +-
 docs/module/walltime_classes.html             |  1154 +-
 docs/module/whm_classes.html                  |  1752 +-
 docs/module/whm_drift.html                    |   374 +-
 docs/proc/check.html                          |    46 +-
 docs/proc/drift_all.html                      |     8 +-
 docs/proc/drift_dan.html                      |   140 +-
 docs/proc/drift_kepu.html                     |    98 +-
 docs/proc/drift_kepu_lag.html                 |     2 +-
 docs/proc/drift_kepu_p3solve.html             |     2 +-
 docs/proc/drift_kepu_stumpff.html             |    60 +-
 docs/proc/fraggle_generate_fragments.html     |   308 +-
 docs/proc/fraggle_generate_rad_vel.html       |   100 +-
 docs/proc/fraggle_generate_tan_vel.html       |    98 +-
 docs/proc/fraggle_io_log_one_message.html     |    96 +-
 docs/proc/fraggle_setup_fragments.html        |     2 +-
 .../fraggle_util_get_energy_momentum.html     |    84 +-
 .../fraggle_util_shift_vector_to_origin.html  |   108 +-
 docs/proc/fraggle_util_vmag_to_vb.html        |    52 +-
 docs/proc/ge_wpp.html                         |   392 +-
 docs/proc/gr_kick_getacch.html                |     6 +-
 docs/proc/helio_drift_body.html               |    34 +-
 docs/proc/helio_gr_kick_getacch_pl.html       |     2 +-
 docs/proc/helio_gr_kick_getacch_tp.html       |     2 +-
 docs/proc/helio_kick_vb_pl.html               |     2 +-
 docs/proc/io_dump_base.html                   |   122 +-
 docs/proc/io_dump_system.html                 |    28 +-
 docs/proc/io_get_args.html                    |    70 +-
 docs/proc/io_get_token.html                   |     2 +-
 docs/proc/io_param_reader.html                |    72 +-
 docs/proc/io_read_frame_cb.html               |     2 +-
 docs/proc/io_read_hdr.html                    |     2 +-
 docs/proc/io_toupper.html                     |    56 +-
 docs/proc/kick_getacch_int_all_pl.html        |    12 +-
 docs/proc/kick_getacch_int_all_tp.html        |   587 +
 docs/proc/kick_getacch_int_one_pl.html        |     6 +-
 docs/proc/kick_getacch_int_one_tp.html        |     6 +-
 docs/proc/kick_getacch_int_pl.html            |     2 +-
 docs/proc/kick_getacch_int_tp.html            |   126 +-
 docs/proc/netcdf_initialize_output.html       |   209 +-
 docs/proc/netcdf_open.html                    |    42 +-
 docs/proc/netcdf_write_frame_base.html        |    56 +-
 docs/proc/netcdf_write_hdr_system.html        |    40 +-
 .../proc/netcdf_write_particle_info_base.html |    56 +-
 docs/proc/obl_acc_body.html                   |    44 +-
 docs/proc/orbel_ehie.html                     |     2 +-
 docs/proc/orbel_ehybrid.html                  |    48 +-
 docs/proc/orbel_el2xv.html                    |   246 +-
 docs/proc/orbel_el2xv_vec.html                |   254 +-
 docs/proc/orbel_fhybrid.html                  |    74 +-
 docs/proc/orbel_scget.html                    |   188 +-
 docs/proc/orbel_schget.html                   |    62 +-
 docs/proc/rmvs_chk_ind.html                   |   186 +-
 docs/proc/rmvs_encounter_check_tp.html        |   118 +-
 docs/proc/rmvs_interp_in.html                 |     2 +-
 docs/proc/rmvs_io_write_encounter.html        |     4 +-
 docs/proc/rmvs_peri_tp.html                   |    20 +-
 docs/proc/rmvs_setup_pl.html                  |     2 +-
 docs/proc/rmvs_setup_tp.html                  |     2 +-
 docs/proc/rmvs_step_in.html                   |    90 +-
 docs/proc/rmvs_step_out.html                  |   158 +-
 docs/proc/rmvs_step_system.html               |   200 +-
 docs/proc/rmvs_util_append_pl.html            |    48 +-
 docs/proc/rmvs_util_append_tp.html            |    32 +-
 docs/proc/rmvs_util_fill_pl.html              |    36 +-
 docs/proc/rmvs_util_fill_tp.html              |    20 +-
 docs/proc/rmvs_util_resize_tp.html            |    32 +-
 docs/proc/rmvs_util_sort_rearrange_tp.html    |    32 +-
 docs/proc/rmvs_util_spill_pl.html             |    24 +-
 docs/proc/rmvs_util_spill_tp.html             |    42 +-
 docs/proc/setup_body.html                     |    36 +-
 docs/proc/setup_encounter.html                |     2 +-
 docs/proc/setup_pl.html                       |     2 +-
 docs/proc/setup_tp.html                       |     2 +-
 docs/proc/solve_wbs.html                      |   392 +-
 docs/proc/symba_collision_casemerge.html      |    34 +-
 .../proc/symba_collision_check_encounter.html |    48 +-
 .../symba_collision_collider_message.html     |   134 +-
 ...symba_collision_consolidate_colliders.html |    56 +-
 docs/proc/symba_collision_mergeaddsub.html    |   134 +-
 ...ymba_collision_resolve_fragmentations.html |   250 +-
 .../proc/symba_collision_resolve_mergers.html |    88 +-
 docs/proc/symba_discard_pl.html               |    54 +-
 docs/proc/symba_encounter_check.html          |     2 +-
 docs/proc/symba_encounter_check_all.html      |     4 +-
 docs/proc/symba_encounter_check_one.html      |    54 +-
 docs/proc/symba_encounter_check_pl.html       |    36 +-
 docs/proc/symba_encounter_check_tp.html       |     2 +-
 docs/proc/symba_io_param_reader.html          |    60 +-
 docs/proc/symba_kick_getacch_pl.html          |     2 +-
 docs/proc/symba_kick_getacch_tp.html          |     2 +-
 docs/proc/symba_setup_encounter.html          |     2 +-
 docs/proc/symba_setup_merger.html             |     2 +-
 docs/proc/symba_setup_pl.html                 |     2 +-
 docs/proc/symba_setup_tp.html                 |     2 +-
 docs/proc/symba_util_append_merger.html       |    30 +-
 docs/proc/symba_util_append_tp.html           |    32 +-
 docs/proc/symba_util_fill_pl.html             |    50 +-
 docs/proc/symba_util_fill_tp.html             |    50 +-
 docs/proc/symba_util_index_eucl_plpl.html     |    98 +
 docs/proc/symba_util_resize_tp.html           |    38 +-
 .../symba_util_sort_rearrange_arr_kin.html    |     2 +-
 docs/proc/symba_util_sort_rearrange_pl.html   |    38 +-
 docs/proc/symba_util_sort_rearrange_tp.html   |    38 +-
 docs/proc/symba_util_spill_encounter.html     |    50 +-
 docs/proc/symba_util_spill_pl.html            |    50 +-
 docs/proc/symba_util_spill_tp.html            |    50 +-
 docs/proc/tides_kick_getacch_pl.html          |     2 +-
 docs/proc/util_append_body.html               |    74 +-
 docs/proc/util_append_pl.html                 |     8 +-
 docs/proc/util_append_tp.html                 |     8 +-
 docs/proc/util_copy_particle_info_arr.html    |    54 +-
 docs/proc/util_exit.html                      |  1026 +-
 docs/proc/util_fill_body.html                 |    60 +-
 .../proc/util_get_energy_momentum_system.html |   103 +-
 docs/proc/util_get_energy_potential.html      |   598 +
 docs/proc/util_index_eucl_ij_to_k.html        |   544 +
 docs/proc/util_index_eucl_k_to_ij.html        |   514 +
 docs/proc/util_index_eucl_plpl.html           |   120 +-
 docs/proc/util_minimize_bfgs.html             |     2 +-
 docs/proc/util_rescale_system.html            |     2 +-
 docs/proc/util_resize_body.html               |    56 +-
 docs/proc/util_resize_pl.html                 |    52 +-
 docs/proc/util_resize_tp.html                 |    52 +-
 docs/proc/util_solve_linear_system_d.html     |    38 +-
 docs/proc/util_solve_linear_system_q.html     |    38 +-
 docs/proc/util_sort_body.html                 |    72 +-
 .../util_sort_rearrange_arr_char_string.html  |     2 +-
 docs/proc/util_sort_rearrange_arr_dp.html     |     2 +-
 docs/proc/util_sort_rearrange_arr_dpvec.html  |     2 +-
 docs/proc/util_sort_rearrange_arr_i4b.html    |     2 +-
 docs/proc/util_sort_rearrange_arr_info.html   |     2 +-
 .../proc/util_sort_rearrange_arr_logical.html |     2 +-
 docs/proc/util_sort_rearrange_body.html       |    34 +-
 docs/proc/util_sort_rearrange_pl.html         |    52 +-
 docs/proc/util_sort_rearrange_tp.html         |    52 +-
 docs/proc/util_spill_arr_dpvec.html           |     2 +-
 docs/proc/util_spill_body.html                |    74 +-
 docs/proc/util_valid_id_system.html           |    36 +-
 docs/proc/whm_coord_h2j_pl.html               |    50 +-
 docs/proc/whm_coord_j2h_pl.html               |    50 +-
 docs/proc/whm_coord_vh2vj_pl.html             |    36 +-
 docs/proc/whm_drift_pl.html                   |    24 +-
 docs/proc/whm_gr_kick_getacch_pl.html         |     2 +-
 docs/proc/whm_gr_kick_getacch_tp.html         |     2 +-
 docs/proc/whm_kick_getacch_ah0.html           |    72 +-
 docs/proc/whm_setup_pl.html                   |     2 +-
 docs/proc/whm_util_append_pl.html             |    36 +-
 docs/proc/whm_util_fill_pl.html               |    36 +-
 docs/proc/whm_util_resize_pl.html             |    32 +-
 docs/proc/whm_util_spill_pl.html              |    42 +-
 docs/program/swiftest_driver.html             |   410 +-
 docs/sourcefile/discard.f90.html              |   364 +-
 docs/sourcefile/drift.f90.html                |  1195 +-
 docs/sourcefile/fraggle_classes.f90.html      |  1495 +-
 docs/sourcefile/fraggle_generate.f90.html     |   407 +-
 docs/sourcefile/fraggle_io.f90.html           |   369 +-
 docs/sourcefile/fraggle_placeholder.f90.html  |   369 +-
 docs/sourcefile/fraggle_regime.f90.html       |   369 +-
 docs/sourcefile/fraggle_set.f90.html          |   369 +-
 docs/sourcefile/fraggle_setup.f90.html        |   369 +-
 docs/sourcefile/fraggle_util.f90.html         |   369 +-
 docs/sourcefile/gr.f90.html                   |   366 +-
 docs/sourcefile/helio_classes.f90.html        |  1578 +-
 docs/sourcefile/helio_drift.f90.html          |   368 +-
 docs/sourcefile/helio_gr.f90.html             |   372 +-
 docs/sourcefile/helio_kick.f90.html           |   448 +-
 docs/sourcefile/helio_setup.f90.html          |   368 +-
 docs/sourcefile/helio_step.f90.html           |   368 +-
 docs/sourcefile/io.f90.html                   |   382 +-
 docs/sourcefile/kick.f90.html                 |   650 +-
 docs/sourcefile/lambda_function.f90.html      |  1098 +-
 docs/sourcefile/netcdf.f90.html               |  1293 +-
 docs/sourcefile/obl.f90.html                  |   364 +-
 docs/sourcefile/operator_cross.f90.html       |   342 +-
 docs/sourcefile/orbel.f90.html                |   366 +-
 docs/sourcefile/orbel.f90~2.html              |   399 +-
 docs/sourcefile/rmvs_classes.f90.html         |  1801 +-
 docs/sourcefile/rmvs_discard.f90.html         |   352 +-
 docs/sourcefile/rmvs_encounter_check.f90.html |   499 +-
 docs/sourcefile/rmvs_io.f90.html              |   352 +-
 docs/sourcefile/rmvs_kick.f90.html            |   523 +-
 docs/sourcefile/rmvs_setup.f90.html           |   352 +-
 docs/sourcefile/rmvs_step.f90.html            |   352 +-
 docs/sourcefile/rmvs_util.f90.html            |   352 +-
 docs/sourcefile/setup.f90.html                |   364 +-
 docs/sourcefile/swiftest.f90.html             |  1445 +-
 docs/sourcefile/swiftest_classes.f90.html     |  4302 ++---
 docs/sourcefile/swiftest_driver.f90.html      |   353 +-
 docs/sourcefile/swiftest_globals.f90.html     |  2303 ++-
 docs/sourcefile/swiftest_operators.f90.html   |  1106 +-
 docs/sourcefile/symba_classes.f90.html        |  1863 +-
 docs/sourcefile/symba_collision.f90.html      |   344 +-
 docs/sourcefile/symba_discard.f90.html        |   342 +-
 docs/sourcefile/symba_drift.f90.html          |   342 +-
 .../sourcefile/symba_encounter_check.f90.html |   869 +-
 docs/sourcefile/symba_io.f90.html             |   342 +-
 docs/sourcefile/symba_kick.f90.html           |   749 +-
 docs/sourcefile/symba_setup.f90.html          |   342 +-
 docs/sourcefile/symba_step.f90.html           |   342 +-
 docs/sourcefile/symba_util.f90.html           |   376 +-
 docs/sourcefile/tides_getacch_pl.f90.html     |   364 +-
 docs/sourcefile/tides_spin_step.f90.html      |   364 +-
 docs/sourcefile/user_getacch.f90.html         |   364 +-
 docs/sourcefile/util_append.f90.html          |   364 +-
 docs/sourcefile/util_coord.f90.html           |   364 +-
 docs/sourcefile/util_copy.f90.html            |   364 +-
 docs/sourcefile/util_exit.f90.html            |   364 +-
 docs/sourcefile/util_fill.f90.html            |   364 +-
 .../util_get_energy_momentum.f90.html         |   620 +-
 docs/sourcefile/util_index.f90.html           |   568 +-
 docs/sourcefile/util_minimize_bfgs.f90.html   |  1386 +-
 docs/sourcefile/util_peri.f90.html            |   364 +-
 docs/sourcefile/util_rescale.f90.html         |   364 +-
 docs/sourcefile/util_resize.f90.html          |   364 +-
 docs/sourcefile/util_set.f90.html             |   364 +-
 docs/sourcefile/util_solve.f90.html           |   364 +-
 docs/sourcefile/util_sort.f90.html            |   364 +-
 docs/sourcefile/util_spill.f90.html           |   364 +-
 docs/sourcefile/util_valid.f90.html           |   364 +-
 docs/sourcefile/util_version.f90.html         |   364 +-
 docs/sourcefile/walltime_classes.f90.html     |  1098 +-
 docs/sourcefile/whm_classes.f90.html          |  1711 +-
 docs/sourcefile/whm_coord.f90.html            |   373 +-
 docs/sourcefile/whm_drift.f90.html            |   373 +-
 docs/sourcefile/whm_gr.f90.html               |   430 +-
 docs/sourcefile/whm_kick.f90.html             |   373 +-
 docs/sourcefile/whm_setup.f90.html            |   373 +-
 docs/sourcefile/whm_step.f90.html             |   373 +-
 docs/sourcefile/whm_util.f90.html             |   373 +-
 docs/src/drift.f90                            |    17 +-
 docs/src/fraggle_generate.f90                 |    10 +-
 docs/src/gr.f90                               |     2 +-
 docs/src/helio_classes.f90                    |     4 +-
 docs/src/helio_gr.f90                         |     4 +-
 docs/src/helio_kick.f90                       |     4 +-
 docs/src/io.f90                               |     4 +-
 docs/src/kick.f90                             |   100 +-
 docs/src/netcdf.f90                           |    39 +-
 docs/src/rmvs_classes.f90                     |    13 +-
 docs/src/rmvs_encounter_check.f90             |    64 +-
 docs/src/rmvs_kick.f90                        |     1 -
 docs/src/swiftest_classes.f90                 |    62 +-
 docs/src/symba_classes.f90                    |     4 +-
 docs/src/symba_encounter_check.f90            |    89 +-
 docs/src/symba_kick.f90                       |    21 +-
 docs/src/symba_util.f90                       |    14 +-
 docs/src/util_get_energy_momentum.f90         |    92 +-
 docs/src/util_index.f90                       |    78 +-
 docs/src/util_minimize_bfgs.f90               |    32 +-
 docs/src/whm_classes.f90                      |     4 +-
 docs/src/whm_gr.f90                           |     5 +-
 docs/tipuesearch/tipuesearch_content.js       |     2 +-
 docs/type/fraggle_fragments.html              |    42 +-
 docs/type/helio_cb.html                       |    42 +-
 docs/type/helio_nbody_system.html             |   146 +-
 docs/type/helio_pl.html                       |    44 +-
 docs/type/helio_tp.html                       |    46 +-
 docs/type/rmvs_cb.html                        |    42 +-
 docs/type/rmvs_interp.html                    |    54 +-
 docs/type/rmvs_nbody_system.html              |   146 +-
 docs/type/rmvs_pl.html                        |   106 +-
 docs/type/rmvs_tp.html                        |   166 +-
 docs/type/swiftest_base.html                  |   364 +-
 docs/type/swiftest_body.html                  |   380 +-
 docs/type/swiftest_cb.html                    |   204 +-
 docs/type/swiftest_nbody_system.html          |   214 +-
 docs/type/swiftest_particle_info.html         |   364 +-
 docs/type/swiftest_pl.html                    |   222 +-
 docs/type/swiftest_tp.html                    |   178 +-
 docs/type/symba_cb.html                       |    42 +-
 docs/type/symba_merger.html                   |   114 +-
 docs/type/symba_nbody_system.html             |   378 +-
 docs/type/symba_pl.html                       |   106 +-
 docs/type/symba_tp.html                       |    46 +-
 docs/type/whm_cb.html                         |    42 +-
 docs/type/whm_nbody_system.html               |   214 +-
 docs/type/whm_pl.html                         |    44 +-
 docs/type/whm_tp.html                         |    46 +-
 518 files changed, 70579 insertions(+), 65585 deletions(-)
 create mode 100644 docs/interface/kick_getacch_int_all_tp.html
 create mode 100644 docs/interface/util_index_eucl_ij_to_k.html
 create mode 100644 docs/interface/util_index_eucl_k_to_ij.html
 create mode 100644 docs/proc/kick_getacch_int_all_tp.html
 create mode 100644 docs/proc/util_get_energy_potential.html
 create mode 100644 docs/proc/util_index_eucl_ij_to_k.html
 create mode 100644 docs/proc/util_index_eucl_k_to_ij.html

diff --git a/docs/index.html b/docs/index.html
index 90d0813f7..89435412f 100644
--- a/docs/index.html
+++ b/docs/index.html
@@ -1137,6 +1137,14 @@ <h3>Procedures</h3>
                   
                 
                   
+                
+                  
+                
+                  
+                
+                  
+                
+                  
                 
                   
                 
diff --git a/docs/interface/discard_pl.html b/docs/interface/discard_pl.html
index 76f245a44..58712229b 100644
--- a/docs/interface/discard_pl.html
+++ b/docs/interface/discard_pl.html
@@ -136,7 +136,7 @@ <h1>discard_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/discard_system.html b/docs/interface/discard_system.html
index 8d8e2ab44..29957648c 100644
--- a/docs/interface/discard_system.html
+++ b/docs/interface/discard_system.html
@@ -136,7 +136,7 @@ <h1>discard_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/discard_tp.html b/docs/interface/discard_tp.html
index 150aaa563..7521270e8 100644
--- a/docs/interface/discard_tp.html
+++ b/docs/interface/discard_tp.html
@@ -136,7 +136,7 @@ <h1>discard_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/drift_all.html b/docs/interface/drift_all.html
index 9d4407a89..ea79bc89e 100644
--- a/docs/interface/drift_all.html
+++ b/docs/interface/drift_all.html
@@ -136,7 +136,7 @@ <h1>drift_all
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -431,7 +431,7 @@ <h3 class="panel-title">Called by</h3>
     <br>
     
       <h2>
-public pure module subroutine drift_all(mu, x, v, n, param, dt, mask, iflag)
+public module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag)
     
     
    
@@ -552,12 +552,12 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-mask"></span>logical,</td>
+  <td><span class="anchor" id="variable-lmask~3"></span>logical,</td>
   <td>intent(in),</td>
   <td></td>
   
   <td>dimension(:)</td><td>::</td>
-  <td><strong>mask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
+  <td><strong>lmask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
   
 </tr>
 
diff --git a/docs/interface/drift_body.html b/docs/interface/drift_body.html
index 999e17db9..0e956e8dd 100644
--- a/docs/interface/drift_body.html
+++ b/docs/interface/drift_body.html
@@ -136,7 +136,7 @@ <h1>drift_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/drift_one.html b/docs/interface/drift_one.html
index ac990131f..bc105a6e5 100644
--- a/docs/interface/drift_one.html
+++ b/docs/interface/drift_one.html
@@ -136,7 +136,7 @@ <h1>drift_one
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/fraggle_generate_fragments.html b/docs/interface/fraggle_generate_fragments.html
index 70a400b7e..90fa7a2ea 100644
--- a/docs/interface/fraggle_generate_fragments.html
+++ b/docs/interface/fraggle_generate_fragments.html
@@ -220,277 +220,277 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~fraggle_generate_fragments~~CallsGraph Pages: 1 -->
-<svg id="interfacefraggle_generate_fragmentsCallsGraph" width="641pt" height="119pt"
- viewBox="0.00 0.00 641.00 118.77" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~fraggle_generate_fragments~~CallsGraph" class="graph" transform="scale(0.49 0.49) rotate(0) translate(4 238.72)">
+<svg id="interfacefraggle_generate_fragmentsCallsGraph" width="641pt" height="131pt"
+ viewBox="0.00 0.00 641.00 131.14" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~fraggle_generate_fragments~~CallsGraph" class="graph" transform="scale(0.49 0.49) rotate(0) translate(4 264)">
 <title>interface~~fraggle_generate_fragments~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-238.72 1306,-238.72 1306,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-264 1306,-264 1306,4 -4,4"/>
 <!-- interface~fraggle_generate_fragments -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node1" class="node">
 <title>interface~fraggle_generate_fragments</title>
-<polygon fill="none" stroke="black" points="148,-147 0,-147 0,-123 148,-123 148,-147"/>
-<text text-anchor="middle" x="74" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate_fragments</text>
+<polygon fill="none" stroke="black" points="148,-159 0,-159 0,-135 148,-135 148,-159"/>
+<text text-anchor="middle" x="74" y="-144.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate_fragments</text>
 </g>
 <!-- proc~fraggle_generate_fragments -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node2" class="node">
 <title>proc~fraggle_generate_fragments</title>
 <g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node2"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="332,-147 184,-147 184,-123 332,-123 332,-147"/>
-<text text-anchor="middle" x="258" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="332,-159 184,-159 184,-135 332,-135 332,-159"/>
+<text text-anchor="middle" x="258" y="-144.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge1" class="edge">
 <title>interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.24,-135C156.6,-135 165.16,-135 173.64,-135"/>
-<polygon fill="#000000" stroke="#000000" points="173.91,-138.5 183.91,-135 173.91,-131.5 173.91,-138.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.24,-147C156.6,-147 165.16,-147 173.64,-147"/>
+<polygon fill="#000000" stroke="#000000" points="173.91,-150.5 183.91,-147 173.91,-143.5 173.91,-150.5"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- interface~fraggle_io_log_generate -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node3" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node3"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-168 368.5,-168 368.5,-144 503.5,-144 503.5,-168"/>
-<text text-anchor="middle" x="436" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>interface~fraggle_io_log_generate</title>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node3"><a xlink:href=".././interface/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
+<polygon fill="#a7506f" stroke="#a7506f" points="500.5,-260 371.5,-260 371.5,-236 500.5,-236 500.5,-260"/>
+<text text-anchor="middle" x="436" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge2" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-143.72C340.73,-144.75 349.55,-145.8 358.22,-146.84"/>
-<polygon fill="#000000" stroke="#000000" points="357.96,-150.33 368.31,-148.04 358.79,-143.38 357.96,-150.33"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate</title>
+<path fill="none" stroke="#000000" d="M274.16,-159.13C294.58,-175.06 332.46,-203.21 368,-222 374.9,-225.65 382.43,-229.07 389.87,-232.15"/>
+<polygon fill="#000000" stroke="#000000" points="388.61,-235.42 399.2,-235.87 391.2,-228.91 388.61,-235.42"/>
 </g>
 <!-- proc~fraggle_generate_pos_vec -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node4" class="node">
 <title>proc~fraggle_generate_pos_vec</title>
 <g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node4"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="877,-74 737,-74 737,-50 877,-50 877,-74"/>
-<text text-anchor="middle" x="807" y="-59.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="877,-24 737,-24 737,0 877,0 877,-24"/>
+<text text-anchor="middle" x="807" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge3" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec</title>
-<path fill="none" stroke="#000000" d="M285.29,-122.81C307.02,-113.24 338.9,-100.35 368,-93 490.46,-62.06 637.88,-58.18 726.65,-59.3"/>
-<polygon fill="#000000" stroke="#000000" points="726.86,-62.8 736.92,-59.45 726.97,-55.8 726.86,-62.8"/>
+<path fill="none" stroke="#000000" d="M271.23,-134.72C290.25,-116.35 328.81,-81.84 368,-63 483.6,-7.44 635.5,-2.76 726.66,-6.16"/>
+<polygon fill="#000000" stroke="#000000" points="726.79,-9.67 736.93,-6.58 727.08,-2.67 726.79,-9.67"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node5" class="node">
 <title>proc~fraggle_generate_rad_vel</title>
 <g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node5"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="504,-126 368,-126 368,-102 504,-102 504,-126"/>
-<text text-anchor="middle" x="436" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="504,-96 368,-96 368,-72 504,-72 504,-96"/>
+<text text-anchor="middle" x="436" y="-81.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge4" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-126.28C340.6,-125.26 349.27,-124.23 357.81,-123.21"/>
-<polygon fill="#000000" stroke="#000000" points="358.23,-126.68 367.75,-122.02 357.4,-119.73 358.23,-126.68"/>
+<path fill="none" stroke="#000000" d="M288.88,-134.89C310.68,-126.21 341,-114.42 368,-105 373.6,-103.04 379.5,-101.07 385.37,-99.16"/>
+<polygon fill="#000000" stroke="#000000" points="386.73,-102.4 395.18,-96.02 384.59,-95.74 386.73,-102.4"/>
 </g>
-<!-- proc~fraggle_generate_spins -->
+<!-- interface~fraggle_io_log_one_message -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node6" class="node">
-<title>proc~fraggle_generate_spins</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
-<polygon fill="#d9534f" stroke="#d9534f" points="498.5,-210 373.5,-210 373.5,-186 498.5,-186 498.5,-210"/>
-<text text-anchor="middle" x="436" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
+<title>interface~fraggle_io_log_one_message</title>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node6"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#a7506f" stroke="#a7506f" points="694,-180 540,-180 540,-156 694,-156 694,-180"/>
+<text text-anchor="middle" x="617" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge5" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins</title>
-<path fill="none" stroke="#000000" d="M288.88,-147.11C310.68,-155.79 341,-167.58 368,-177 373.6,-178.96 379.5,-180.93 385.37,-182.84"/>
-<polygon fill="#000000" stroke="#000000" points="384.59,-186.26 395.18,-185.98 386.73,-179.6 384.59,-186.26"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M282.92,-159.17C304.52,-169.43 337.5,-183.33 368,-189 431.39,-200.79 505.14,-191.7 555.64,-182.07"/>
+<polygon fill="#000000" stroke="#000000" points="556.6,-185.44 565.73,-180.07 555.24,-178.58 556.6,-185.44"/>
 </g>
-<!-- interface~fraggle_io_log_one_message -->
+<!-- proc~fraggle_generate_tan_vel -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node7" class="node">
-<title>interface~fraggle_io_log_one_message</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node7"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#a7506f" stroke="#a7506f" points="694,-230 540,-230 540,-206 694,-206 694,-230"/>
-<text text-anchor="middle" x="617" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-138 368.5,-138 368.5,-114 503.5,-114 503.5,-138"/>
+<text text-anchor="middle" x="436" y="-123.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge6" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M269.56,-147.19C287.46,-166.82 325.94,-204.67 368,-219 422.53,-237.57 487.79,-236.46 537.68,-231.17"/>
-<polygon fill="#000000" stroke="#000000" points="538.22,-234.63 547.76,-230.02 537.43,-227.67 538.22,-234.63"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<path fill="none" stroke="#000000" d="M332.11,-138.28C340.73,-137.25 349.55,-136.2 358.22,-135.16"/>
+<polygon fill="#000000" stroke="#000000" points="358.79,-138.62 368.31,-133.96 357.96,-131.67 358.79,-138.62"/>
 </g>
-<!-- interface~fraggle_io_log_generate -->
+<!-- proc~fraggle_generate_spins -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node8" class="node">
-<title>interface~fraggle_io_log_generate</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node8"><a xlink:href=".././interface/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
-<polygon fill="#a7506f" stroke="#a7506f" points="500.5,-24 371.5,-24 371.5,0 500.5,0 500.5,-24"/>
-<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
+<title>proc~fraggle_generate_spins</title>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node8"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
+<polygon fill="#d9534f" stroke="#d9534f" points="498.5,-180 373.5,-180 373.5,-156 498.5,-156 498.5,-180"/>
+<text text-anchor="middle" x="436" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge7" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate</title>
-<path fill="none" stroke="#000000" d="M269.98,-122.72C288.47,-102.65 327.8,-62.57 368,-38 374.15,-34.24 380.93,-30.86 387.75,-27.87"/>
-<polygon fill="#000000" stroke="#000000" points="389.11,-31.09 397.02,-24.04 386.44,-24.62 389.11,-31.09"/>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge10" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M480.01,-168.05C488.08,-170.72 496.38,-173.73 504,-177 520.82,-184.22 523.06,-190.07 540,-197 545.07,-199.07 550.41,-201.01 555.81,-202.81"/>
-<polygon fill="#000000" stroke="#000000" points="554.97,-206.21 565.56,-205.88 557.07,-199.53 554.97,-206.21"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins</title>
+<path fill="none" stroke="#000000" d="M332.11,-155.72C342.38,-156.95 352.93,-158.21 363.18,-159.43"/>
+<polygon fill="#000000" stroke="#000000" points="362.96,-162.93 373.3,-160.64 363.79,-155.98 362.96,-162.93"/>
 </g>
-<!-- util_minimize_bfgs -->
+<!-- proc~fraggle_io_log_generate -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node11" class="node">
-<title>util_minimize_bfgs</title>
-<polygon fill="#777777" stroke="#777777" points="667,-104 567,-104 567,-80 667,-80 667,-104"/>
-<text text-anchor="middle" x="617" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge8" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M480.83,-143.96C488.67,-141.33 496.67,-138.33 504,-135 521.07,-127.25 522.8,-120.46 540,-113 545.39,-110.66 551.11,-108.52 556.9,-106.57"/>
-<polygon fill="#000000" stroke="#000000" points="558.18,-109.83 566.65,-103.47 556.06,-103.16 558.18,-109.83"/>
-</g>
-<!-- interface~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_node12" class="node">
-<title>interface~fraggle_util_vmag_to_vb</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node12"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#a7506f" stroke="#a7506f" points="682,-146 552,-146 552,-122 682,-122 682,-146"/>
-<text text-anchor="middle" x="617" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<title>proc~fraggle_io_log_generate</title>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node11"><a xlink:href=".././proc/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
+<polygon fill="#d9534f" stroke="#d9534f" points="681.5,-260 552.5,-260 552.5,-236 681.5,-236 681.5,-260"/>
+<text text-anchor="middle" x="617" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge9" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M503.65,-147.81C516.12,-146.28 529.23,-144.66 541.91,-143.11"/>
-<polygon fill="#000000" stroke="#000000" points="542.47,-146.56 551.97,-141.87 541.61,-139.62 542.47,-146.56"/>
-</g>
-<!-- lambda_obj -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_node14" class="node">
-<title>lambda_obj</title>
-<polygon fill="#777777" stroke="#777777" points="651,-188 583,-188 583,-164 651,-164 651,-188"/>
-<text text-anchor="middle" x="617" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge11" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M503.65,-163.45C526.78,-166.03 552.09,-168.86 572.82,-171.18"/>
-<polygon fill="#000000" stroke="#000000" points="572.58,-174.67 582.91,-172.3 573.36,-167.71 572.58,-174.67"/>
+<!-- interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge8" class="edge">
+<title>interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M500.61,-248C513.99,-248 528.2,-248 541.92,-248"/>
+<polygon fill="#000000" stroke="#000000" points="542.29,-251.5 552.29,-248 542.29,-244.5 542.29,-251.5"/>
 </g>
 <!-- interface~fraggle_util_shift_vector_to_origin -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_node9" class="node">
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_node14" class="node">
 <title>interface~fraggle_util_shift_vector_to_origin</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node9"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#a7506f" stroke="#a7506f" points="1093,-95 920,-95 920,-71 1093,-71 1093,-95"/>
-<text text-anchor="middle" x="1006.5" y="-80.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node14"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
+<polygon fill="#a7506f" stroke="#a7506f" points="1093,-45 920,-45 920,-21 1093,-21 1093,-45"/>
+<text text-anchor="middle" x="1006.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge12" class="edge">
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge9" class="edge">
 <title>proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M877.08,-69.34C887.64,-70.47 898.7,-71.64 909.71,-72.81"/>
-<polygon fill="#000000" stroke="#000000" points="909.48,-76.31 919.79,-73.89 910.22,-69.35 909.48,-76.31"/>
+<path fill="none" stroke="#000000" d="M877.08,-19.34C887.64,-20.47 898.7,-21.64 909.71,-22.81"/>
+<polygon fill="#000000" stroke="#000000" points="909.48,-26.31 919.79,-23.89 910.22,-19.35 909.48,-26.31"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge15" class="edge">
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge12" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M489.44,-126.14C494.65,-128.58 499.62,-131.5 504,-135 528.89,-154.89 514.77,-177.54 540,-197 541.85,-198.43 543.79,-199.76 545.8,-201"/>
-<polygon fill="#000000" stroke="#000000" points="544.53,-204.29 555.01,-205.87 547.81,-198.1 544.53,-204.29"/>
+<path fill="none" stroke="#000000" d="M486.75,-96.11C492.8,-98.57 498.71,-101.51 504,-105 524.52,-118.53 519.25,-133.82 540,-147 542.77,-148.76 545.69,-150.38 548.71,-151.86"/>
+<polygon fill="#000000" stroke="#000000" points="547.43,-155.12 558,-155.92 550.23,-148.71 547.43,-155.12"/>
+</g>
+<!-- lambda_obj -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_node9" class="node">
+<title>lambda_obj</title>
+<polygon fill="#777777" stroke="#777777" points="651,-54 583,-54 583,-30 651,-30 651,-54"/>
+<text text-anchor="middle" x="617" y="-39.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
+</g>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge11" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj</title>
+<path fill="none" stroke="#000000" d="M488.29,-71.96C515.11,-65.67 547.55,-58.06 573.03,-52.08"/>
+<polygon fill="#000000" stroke="#000000" points="573.84,-55.49 582.78,-49.79 572.24,-48.67 573.84,-55.49"/>
+</g>
+<!-- util_minimize_bfgs -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_node12" class="node">
+<title>util_minimize_bfgs</title>
+<polygon fill="#777777" stroke="#777777" points="667,-138 567,-138 567,-114 667,-114 667,-138"/>
+<text text-anchor="middle" x="617" y="-123.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge13" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M504.16,-105.75C521.41,-103.63 539.85,-101.36 556.67,-99.29"/>
-<polygon fill="#000000" stroke="#000000" points="557.42,-102.73 566.92,-98.03 556.56,-95.78 557.42,-102.73"/>
+<path fill="none" stroke="#000000" d="M488.29,-96.04C509.71,-101.06 534.71,-106.93 556.89,-112.13"/>
+<polygon fill="#000000" stroke="#000000" points="556.32,-115.59 566.86,-114.47 557.92,-108.78 556.32,-115.59"/>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge14" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M504.16,-121.5C516.33,-122.86 529.09,-124.29 541.45,-125.67"/>
-<polygon fill="#000000" stroke="#000000" points="541.4,-129.19 551.72,-126.82 542.17,-122.23 541.4,-129.19"/>
+<!-- interface~fraggle_util_vmag_to_vb -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_node13" class="node">
+<title>interface~fraggle_util_vmag_to_vb</title>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node13"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#a7506f" stroke="#a7506f" points="682,-96 552,-96 552,-72 682,-72 682,-96"/>
+<text text-anchor="middle" x="617" y="-81.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+</a>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge16" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M480.01,-126.05C488.08,-128.72 496.38,-131.73 504,-135 520.82,-142.22 523.06,-148.07 540,-155 550.48,-159.29 562.11,-162.99 573.07,-166.05"/>
-<polygon fill="#000000" stroke="#000000" points="572.32,-169.47 582.89,-168.67 574.13,-162.71 572.32,-169.47"/>
 </g>
-<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge17" class="edge">
-<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M498.6,-204.88C508.64,-206 519.2,-207.18 529.7,-208.36"/>
-<polygon fill="#000000" stroke="#000000" points="529.41,-211.85 539.73,-209.48 530.18,-204.89 529.41,-211.85"/>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge10" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M504.16,-84C516.33,-84 529.09,-84 541.45,-84"/>
+<polygon fill="#000000" stroke="#000000" points="541.72,-87.5 551.72,-84 541.72,-80.5 541.72,-87.5"/>
 </g>
 <!-- proc~fraggle_io_log_one_message -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node10" class="node">
 <title>proc~fraggle_io_log_one_message</title>
 <g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node10"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="884,-230 730,-230 730,-206 884,-206 884,-230"/>
-<text text-anchor="middle" x="807" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="884,-180 730,-180 730,-156 884,-156 884,-180"/>
+<text text-anchor="middle" x="807" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge18" class="edge">
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge14" class="edge">
 <title>interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.2,-218C702.52,-218 711.03,-218 719.47,-218"/>
-<polygon fill="#000000" stroke="#000000" points="719.7,-221.5 729.7,-218 719.7,-214.5 719.7,-221.5"/>
-</g>
-<!-- proc~fraggle_io_log_generate -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_node13" class="node">
-<title>proc~fraggle_io_log_generate</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node13"><a xlink:href=".././proc/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
-<polygon fill="#d9534f" stroke="#d9534f" points="681.5,-24 552.5,-24 552.5,0 681.5,0 681.5,-24"/>
-<text text-anchor="middle" x="617" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.2,-168C702.52,-168 711.03,-168 719.47,-168"/>
+<polygon fill="#000000" stroke="#000000" points="719.7,-171.5 729.7,-168 719.7,-164.5 719.7,-171.5"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge17" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M488.29,-138.04C509.08,-142.91 533.25,-148.58 554.93,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="554.16,-157.09 564.7,-155.96 555.76,-150.27 554.16,-157.09"/>
 </g>
-<!-- interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge19" class="edge">
-<title>interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M500.61,-12C513.99,-12 528.2,-12 541.92,-12"/>
-<polygon fill="#000000" stroke="#000000" points="542.29,-15.5 552.29,-12 542.29,-8.5 542.29,-15.5"/>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge16" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj</title>
+<path fill="none" stroke="#000000" d="M486.75,-113.89C492.8,-111.43 498.71,-108.49 504,-105 524.52,-91.47 519.25,-76.18 540,-63 549.92,-56.7 561.73,-52.26 573.06,-49.15"/>
+<polygon fill="#000000" stroke="#000000" points="573.95,-52.53 582.82,-46.74 572.27,-45.74 573.95,-52.53"/>
 </g>
-<!-- proc~fraggle_util_shift_vector_to_origin -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_node15" class="node">
-<title>proc~fraggle_util_shift_vector_to_origin</title>
-<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node15"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#d9534f" stroke="#d9534f" points="1302,-95 1129,-95 1129,-71 1302,-71 1302,-95"/>
-<text text-anchor="middle" x="1215.5" y="-80.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
-</a>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge18" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
+<path fill="none" stroke="#000000" d="M503.65,-126C521.02,-126 539.62,-126 556.59,-126"/>
+<polygon fill="#000000" stroke="#000000" points="556.91,-129.5 566.91,-126 556.91,-122.5 556.91,-129.5"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge15" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M488.29,-113.96C509.08,-109.09 533.25,-103.42 554.93,-98.33"/>
+<polygon fill="#000000" stroke="#000000" points="555.76,-101.73 564.7,-96.04 554.16,-94.91 555.76,-101.73"/>
 </g>
-<!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge20" class="edge">
-<title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1093.19,-83C1101.66,-83 1110.3,-83 1118.87,-83"/>
-<polygon fill="#000000" stroke="#000000" points="1118.88,-86.5 1128.88,-83 1118.88,-79.5 1118.88,-86.5"/>
+<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge19" class="edge">
+<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M498.6,-168C508.64,-168 519.2,-168 529.7,-168"/>
+<polygon fill="#000000" stroke="#000000" points="529.73,-171.5 539.73,-168 529.73,-164.5 529.73,-171.5"/>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_node16" class="node">
 <title>proc~fraggle_util_vmag_to_vb</title>
 <g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node16"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="872,-126 742,-126 742,-102 872,-102 872,-126"/>
-<text text-anchor="middle" x="807" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="872,-76 742,-76 742,-52 872,-52 872,-76"/>
+<text text-anchor="middle" x="807" y="-61.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge21" class="edge">
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge20" class="edge">
 <title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M682.17,-127.17C698.12,-125.48 715.34,-123.64 731.72,-121.9"/>
-<polygon fill="#000000" stroke="#000000" points="732.22,-125.37 741.8,-120.83 731.48,-118.41 732.22,-125.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M682.17,-77.17C698.12,-75.48 715.34,-73.64 731.72,-71.9"/>
+<polygon fill="#000000" stroke="#000000" points="732.22,-75.37 741.8,-70.83 731.48,-68.41 732.22,-75.37"/>
+</g>
+<!-- proc~fraggle_util_shift_vector_to_origin -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_node15" class="node">
+<title>proc~fraggle_util_shift_vector_to_origin</title>
+<g id="a_interface~~fraggle_generate_fragments~~CallsGraph_node15"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
+<polygon fill="#d9534f" stroke="#d9534f" points="1302,-45 1129,-45 1129,-21 1302,-21 1302,-45"/>
+<text text-anchor="middle" x="1215.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+</a>
+</g>
+</g>
+<!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
+<g id="interface~~fraggle_generate_fragments~~CallsGraph_edge21" class="edge">
+<title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1093.19,-33C1101.66,-33 1110.3,-33 1118.87,-33"/>
+<polygon fill="#000000" stroke="#000000" points="1118.88,-36.5 1128.88,-33 1118.88,-29.5 1118.88,-36.5"/>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
 <g id="interface~~fraggle_generate_fragments~~CallsGraph_edge22" class="edge">
 <title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M872.12,-103.94C887,-101.6 903.07,-99.08 918.74,-96.62"/>
-<polygon fill="#000000" stroke="#000000" points="919.63,-100.02 928.96,-95.01 918.54,-93.11 919.63,-100.02"/>
+<path fill="none" stroke="#000000" d="M872.12,-53.94C887,-51.6 903.07,-49.08 918.74,-46.62"/>
+<polygon fill="#000000" stroke="#000000" points="919.63,-50.02 928.96,-45.01 918.54,-43.11 919.63,-50.02"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/fraggle_io_log_one_message.html b/docs/interface/fraggle_io_log_one_message.html
index 391f51a91..cdfe09d54 100644
--- a/docs/interface/fraggle_io_log_one_message.html
+++ b/docs/interface/fraggle_io_log_one_message.html
@@ -333,67 +333,55 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="699,-108 545,-108 545,-84 699,-84 699,-108"/>
 <text text-anchor="middle" x="622" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_io_log_one_message</text>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments -->
 <g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node2" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node2"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="506,-150 371,-150 371,-126 506,-126 506,-150"/>
-<text text-anchor="middle" x="438.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>proc~fraggle_generate_fragments</title>
+<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node2"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="332,-129 184,-129 184,-105 332,-105 332,-129"/>
+<text text-anchor="middle" x="258" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
 <g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge1" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M491.51,-125.96C512.59,-121.09 537.09,-115.42 559.08,-110.33"/>
-<polygon fill="#000000" stroke="#000000" points="560.03,-113.7 568.98,-108.04 558.45,-106.88 560.03,-113.7"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M282.92,-129.17C304.52,-139.43 337.5,-153.33 368,-159 429.61,-170.46 448.38,-174.88 509,-159 542,-150.35 575.55,-129.56 597.2,-114.21"/>
+<polygon fill="#000000" stroke="#000000" points="599.41,-116.93 605.45,-108.22 595.3,-111.27 599.41,-116.93"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel -->
 <g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node3" class="node">
 <title>proc~fraggle_generate_rad_vel</title>
 <g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-108 370.5,-108 370.5,-84 506.5,-84 506.5,-108"/>
-<text text-anchor="middle" x="438.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-150 370.5,-150 370.5,-126 506.5,-126 506.5,-150"/>
+<text text-anchor="middle" x="438.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge2" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M506.57,-96C515.69,-96 525.15,-96 534.56,-96"/>
-<polygon fill="#000000" stroke="#000000" points="534.72,-99.5 544.72,-96 534.72,-92.5 534.72,-99.5"/>
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge7" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
+<path fill="none" stroke="#000000" d="M332.12,-125.6C341.38,-126.69 350.88,-127.81 360.21,-128.91"/>
+<polygon fill="#000000" stroke="#000000" points="359.9,-132.39 370.24,-130.09 360.71,-125.44 359.9,-132.39"/>
 </g>
-<!-- proc~fraggle_generate_fragments -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node4" class="node">
-<title>proc~fraggle_generate_fragments</title>
-<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="332,-129 184,-129 184,-105 332,-105 332,-129"/>
-<text text-anchor="middle" x="258" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
+<!-- proc~fraggle_generate_tan_vel -->
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node5" class="node">
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node5"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="506,-108 371,-108 371,-84 506,-84 506,-108"/>
+<text text-anchor="middle" x="438.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge3" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M282.92,-129.17C304.52,-139.43 337.5,-153.33 368,-159 429.61,-170.46 448.38,-174.88 509,-159 542,-150.35 575.55,-129.56 597.2,-114.21"/>
-<polygon fill="#000000" stroke="#000000" points="599.41,-116.93 605.45,-108.22 595.3,-111.27 599.41,-116.93"/>
-</g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge6" class="edge">
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge8" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
-<path fill="none" stroke="#000000" d="M332.12,-125.6C341.52,-126.71 351.17,-127.84 360.63,-128.96"/>
-<polygon fill="#000000" stroke="#000000" points="360.47,-132.46 370.81,-130.15 361.28,-125.51 360.47,-132.46"/>
-</g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge7" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M332.12,-108.4C341.38,-107.31 350.88,-106.19 360.21,-105.09"/>
-<polygon fill="#000000" stroke="#000000" points="360.71,-108.56 370.24,-103.91 359.9,-101.61 360.71,-108.56"/>
+<path fill="none" stroke="#000000" d="M332.12,-108.4C341.52,-107.29 351.17,-106.16 360.63,-105.04"/>
+<polygon fill="#000000" stroke="#000000" points="361.28,-108.49 370.81,-103.85 360.47,-101.54 361.28,-108.49"/>
 </g>
 <!-- proc~fraggle_generate_spins -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node5" class="node">
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node6" class="node">
 <title>proc~fraggle_generate_spins</title>
-<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node5"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
+<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node6"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
 <polygon fill="#d9534f" stroke="#d9534f" points="501,-66 376,-66 376,-42 501,-42 501,-66"/>
 <text text-anchor="middle" x="438.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
 </a>
@@ -405,27 +393,39 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M288.39,-104.99C310.2,-96.25 340.76,-84.35 368,-75 373.87,-72.99 380.05,-70.97 386.2,-69.03"/>
 <polygon fill="#000000" stroke="#000000" points="387.3,-72.35 395.81,-66.05 385.22,-65.67 387.3,-72.35"/>
 </g>
-<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge4" class="edge">
-<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M491.51,-66.04C512.59,-70.91 537.09,-76.58 559.08,-81.67"/>
-<polygon fill="#000000" stroke="#000000" points="558.45,-85.12 568.98,-83.96 560.03,-78.3 558.45,-85.12"/>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge2" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M491.51,-125.96C512.59,-121.09 537.09,-115.42 559.08,-110.33"/>
+<polygon fill="#000000" stroke="#000000" points="560.03,-113.7 568.98,-108.04 558.45,-106.88 560.03,-113.7"/>
 </g>
 <!-- proc~fraggle_regime_collresolve -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node6" class="node">
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node4" class="node">
 <title>proc~fraggle_regime_collresolve</title>
-<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node6"><a xlink:href=".././proc/fraggle_regime_collresolve.html" xlink:title="fraggle_regime_collresolve">
+<g id="a_interface~~fraggle_io_log_one_message~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_regime_collresolve.html" xlink:title="fraggle_regime_collresolve">
 <polygon fill="#d9534f" stroke="#d9534f" points="509,-24 368,-24 368,0 509,0 509,-24"/>
 <text text-anchor="middle" x="438.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_collresolve</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge5" class="edge">
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge3" class="edge">
 <title>proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message</title>
 <path fill="none" stroke="#000000" d="M484.51,-24.02C492.77,-26.67 501.23,-29.69 509,-33 539.3,-45.92 571.91,-64.89 594.08,-78.64"/>
 <polygon fill="#000000" stroke="#000000" points="592.29,-81.65 602.62,-83.99 596.01,-75.72 592.29,-81.65"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge4" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M506.05,-96C515.44,-96 525.2,-96 534.89,-96"/>
+<polygon fill="#000000" stroke="#000000" points="534.94,-99.5 544.94,-96 534.94,-92.5 534.94,-99.5"/>
+</g>
+<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge5" class="edge">
+<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M491.51,-66.04C512.59,-70.91 537.09,-76.58 559.08,-81.67"/>
+<polygon fill="#000000" stroke="#000000" points="558.45,-85.12 568.98,-83.96 560.03,-78.3 558.45,-85.12"/>
+</g>
 <!-- interface~fraggle_generate_fragments -->
 <g id="interface~~fraggle_io_log_one_message~~CalledByGraph_node7" class="node">
 <title>interface~fraggle_generate_fragments</title>
@@ -436,7 +436,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments -->
-<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge8" class="edge">
+<g id="interface~~fraggle_io_log_one_message~~CalledByGraph_edge6" class="edge">
 <title>interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.24,-117C156.6,-117 165.16,-117 173.64,-117"/>
 <polygon fill="#000000" stroke="#000000" points="173.91,-120.5 183.91,-117 173.91,-113.5 173.91,-120.5"/>
diff --git a/docs/interface/fraggle_util_get_energy_momentum.html b/docs/interface/fraggle_util_get_energy_momentum.html
index 39893e242..535c1b121 100644
--- a/docs/interface/fraggle_util_get_energy_momentum.html
+++ b/docs/interface/fraggle_util_get_energy_momentum.html
@@ -246,20 +246,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M185.11,-54C193.62,-54 202.27,-54 210.86,-54"/>
 <polygon fill="#000000" stroke="#000000" points="210.91,-57.5 220.91,-54 210.91,-50.5 210.91,-57.5"/>
 </g>
-<!-- interface~fraggle_util_construct_temporary_system -->
+<!-- util_exit -->
 <g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node3" class="node">
-<title>interface~fraggle_util_construct_temporary_system</title>
-<g id="a_interface~~fraggle_util_get_energy_momentum~~CallsGraph_node3"><a xlink:href=".././interface/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="651,-108 442,-108 442,-84 651,-84 651,-108"/>
-<text text-anchor="middle" x="546.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
-</a>
-</g>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="573.5,-108 519.5,-108 519.5,-84 573.5,-84 573.5,-108"/>
+<text text-anchor="middle" x="546.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system -->
-<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge4" class="edge">
-<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system</title>
-<path fill="none" stroke="#000000" d="M380.7,-66.04C408.36,-71.07 440.68,-76.94 469.33,-82.15"/>
-<polygon fill="#000000" stroke="#000000" points="468.83,-85.62 479.3,-83.96 470.08,-78.73 468.83,-85.62"/>
+<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit -->
+<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge2" class="edge">
+<title>proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M380.7,-66.04C422.5,-73.64 474.91,-83.17 509.26,-89.41"/>
+<polygon fill="#000000" stroke="#000000" points="508.84,-92.89 519.31,-91.24 510.1,-86.01 508.84,-92.89"/>
 </g>
 <!-- interface~fraggle_util_add_fragments_to_system -->
 <g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node4" class="node">
@@ -271,64 +268,67 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system -->
-<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge2" class="edge">
+<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge3" class="edge">
 <title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system</title>
 <path fill="none" stroke="#000000" d="M406.13,-54C416.24,-54 426.6,-54 436.89,-54"/>
 <polygon fill="#000000" stroke="#000000" points="437.15,-57.5 447.15,-54 437.15,-50.5 437.15,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- interface~fraggle_util_construct_temporary_system -->
 <g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="573.5,-24 519.5,-24 519.5,0 573.5,0 573.5,-24"/>
-<text text-anchor="middle" x="546.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit -->
-<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge3" class="edge">
-<title>proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M380.7,-41.96C422.5,-34.36 474.91,-24.83 509.26,-18.59"/>
-<polygon fill="#000000" stroke="#000000" points="510.1,-21.99 519.31,-16.76 508.84,-15.11 510.1,-21.99"/>
-</g>
-<!-- proc~fraggle_util_construct_temporary_system -->
-<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node7" class="node">
-<title>proc~fraggle_util_construct_temporary_system</title>
-<g id="a_interface~~fraggle_util_get_energy_momentum~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="896,-108 687,-108 687,-84 896,-84 896,-108"/>
-<text text-anchor="middle" x="791.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
+<title>interface~fraggle_util_construct_temporary_system</title>
+<g id="a_interface~~fraggle_util_get_energy_momentum~~CallsGraph_node5"><a xlink:href=".././interface/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="651,-24 442,-24 442,0 651,0 651,-24"/>
+<text text-anchor="middle" x="546.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system -->
-<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge5" class="edge">
-<title>interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M651.26,-96C659.6,-96 668.06,-96 676.48,-96"/>
-<polygon fill="#000000" stroke="#000000" points="676.7,-99.5 686.7,-96 676.7,-92.5 676.7,-99.5"/>
+<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system -->
+<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge4" class="edge">
+<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system</title>
+<path fill="none" stroke="#000000" d="M380.7,-41.96C408.36,-36.93 440.68,-31.06 469.33,-25.85"/>
+<polygon fill="#000000" stroke="#000000" points="470.08,-29.27 479.3,-24.04 468.83,-22.38 470.08,-29.27"/>
 </g>
 <!-- proc~fraggle_util_add_fragments_to_system -->
-<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node6" class="node">
+<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node7" class="node">
 <title>proc~fraggle_util_add_fragments_to_system</title>
-<g id="a_interface~~fraggle_util_get_energy_momentum~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
+<g id="a_interface~~fraggle_util_get_energy_momentum~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
 <polygon fill="#d9534f" stroke="#d9534f" points="890.5,-66 692.5,-66 692.5,-42 890.5,-42 890.5,-66"/>
 <text text-anchor="middle" x="791.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_add_fragments_to_system</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system -->
-<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge6" class="edge">
+<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge5" class="edge">
 <title>interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.64,-54C657.68,-54 670.04,-54 682.21,-54"/>
 <polygon fill="#000000" stroke="#000000" points="682.39,-57.5 692.39,-54 682.39,-50.5 682.39,-57.5"/>
 </g>
+<!-- proc~fraggle_util_construct_temporary_system -->
+<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node6" class="node">
+<title>proc~fraggle_util_construct_temporary_system</title>
+<g id="a_interface~~fraggle_util_get_energy_momentum~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="896,-24 687,-24 687,0 896,0 896,-24"/>
+<text text-anchor="middle" x="791.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
+</a>
+</g>
+</g>
+<!-- interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system -->
+<g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge6" class="edge">
+<title>interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M651.26,-12C659.6,-12 668.06,-12 676.48,-12"/>
+<polygon fill="#000000" stroke="#000000" points="676.7,-15.5 686.7,-12 676.7,-8.5 676.7,-15.5"/>
+</g>
 <!-- setup_construct_system -->
 <g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_node8" class="node">
 <title>setup_construct_system</title>
-<polygon fill="#777777" stroke="#777777" points="1060,-108 932,-108 932,-84 1060,-84 1060,-108"/>
-<text text-anchor="middle" x="996" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<polygon fill="#777777" stroke="#777777" points="1060,-24 932,-24 932,0 1060,0 1060,-24"/>
+<text text-anchor="middle" x="996" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </g>
 <!-- proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system -->
 <g id="interface~~fraggle_util_get_energy_momentum~~CallsGraph_edge7" class="edge">
 <title>proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system</title>
-<path fill="none" stroke="#000000" d="M896.12,-96C904.77,-96 913.39,-96 921.74,-96"/>
-<polygon fill="#000000" stroke="#000000" points="921.77,-99.5 931.77,-96 921.77,-92.5 921.77,-99.5"/>
+<path fill="none" stroke="#000000" d="M896.12,-12C904.77,-12 913.39,-12 921.74,-12"/>
+<polygon fill="#000000" stroke="#000000" points="921.77,-15.5 931.77,-12 921.77,-8.5 921.77,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/fraggle_util_shift_vector_to_origin.html b/docs/interface/fraggle_util_shift_vector_to_origin.html
index ad89b9f63..9a1c39bcb 100644
--- a/docs/interface/fraggle_util_shift_vector_to_origin.html
+++ b/docs/interface/fraggle_util_shift_vector_to_origin.html
@@ -333,105 +333,105 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="1055,-85 882,-85 882,-61 1055,-61 1055,-85"/>
 <text text-anchor="middle" x="968.5" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_util_shift_vector_to_origin</text>
 </g>
-<!-- proc~fraggle_generate_pos_vec -->
+<!-- proc~fraggle_util_vmag_to_vb -->
 <g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node2" class="node">
+<title>proc~fraggle_util_vmag_to_vb</title>
+<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node2"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="846,-65 716,-65 716,-41 846,-41 846,-65"/>
+<text text-anchor="middle" x="781" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+</a>
+</g>
+</g>
+<!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge1" class="edge">
+<title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
+<path fill="none" stroke="#000000" d="M846.1,-59.91C854.38,-60.8 863,-61.73 871.65,-62.67"/>
+<polygon fill="#000000" stroke="#000000" points="871.49,-66.17 881.81,-63.76 872.24,-59.21 871.49,-66.17"/>
+</g>
+<!-- proc~fraggle_generate_pos_vec -->
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node3" class="node">
 <title>proc~fraggle_generate_pos_vec</title>
-<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node2"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
+<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
 <polygon fill="#d9534f" stroke="#d9534f" points="680,-106 540,-106 540,-82 680,-82 680,-106"/>
 <text text-anchor="middle" x="610" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge1" class="edge">
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge2" class="edge">
 <title>proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
 <path fill="none" stroke="#000000" d="M680.16,-89.93C734.62,-86.72 811.14,-82.21 871.53,-78.65"/>
 <polygon fill="#000000" stroke="#000000" points="872.07,-82.13 881.84,-78.05 871.65,-75.14 872.07,-82.13"/>
 </g>
-<!-- proc~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node3" class="node">
-<title>proc~fraggle_util_vmag_to_vb</title>
-<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="846,-65 716,-65 716,-41 846,-41 846,-65"/>
-<text text-anchor="middle" x="781" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<!-- interface~fraggle_util_vmag_to_vb -->
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4" class="node">
+<title>interface~fraggle_util_vmag_to_vb</title>
+<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#a7506f" stroke="#a7506f" points="675,-64 545,-64 545,-40 675,-40 675,-64"/>
+<text text-anchor="middle" x="610" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge2" class="edge">
-<title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M846.1,-59.91C854.38,-60.8 863,-61.73 871.65,-62.67"/>
-<polygon fill="#000000" stroke="#000000" points="871.49,-66.17 881.81,-63.76 872.24,-59.21 871.49,-66.17"/>
+<!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge3" class="edge">
+<title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M675.37,-52.38C685.31,-52.44 695.64,-52.5 705.77,-52.56"/>
+<polygon fill="#000000" stroke="#000000" points="705.78,-56.06 715.81,-52.62 705.83,-49.06 705.78,-56.06"/>
 </g>
 <!-- proc~fraggle_generate_fragments -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4" class="node">
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5" class="node">
 <title>proc~fraggle_generate_fragments</title>
-<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
+<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
 <polygon fill="#d9534f" stroke="#d9534f" points="332,-66 184,-66 184,-42 332,-42 332,-66"/>
 <text text-anchor="middle" x="258" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge3" class="edge">
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge4" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec</title>
 <path fill="none" stroke="#000000" d="M315.09,-66.05C332.03,-69.35 350.72,-72.66 368,-75 421.76,-82.28 482.68,-87.05 529.82,-89.99"/>
 <polygon fill="#000000" stroke="#000000" points="529.77,-93.49 539.96,-90.61 530.19,-86.51 529.77,-93.49"/>
 </g>
-<!-- proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_tan_vel -->
 <g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node6" class="node">
-<title>proc~fraggle_generate_rad_vel</title>
-<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node6"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="504,-66 368,-66 368,-42 504,-42 504,-66"/>
-<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node6"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-66 368.5,-66 368.5,-42 503.5,-42 503.5,-66"/>
+<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
 <g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge8" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-54C340.5,-54 349.08,-54 357.53,-54"/>
-<polygon fill="#000000" stroke="#000000" points="357.75,-57.5 367.75,-54 357.75,-50.5 357.75,-57.5"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<path fill="none" stroke="#000000" d="M332.11,-54C340.73,-54 349.55,-54 358.22,-54"/>
+<polygon fill="#000000" stroke="#000000" points="358.31,-57.5 368.31,-54 358.31,-50.5 358.31,-57.5"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_rad_vel -->
 <g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node7" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node7"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-24 368.5,-24 368.5,0 503.5,0 503.5,-24"/>
-<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>proc~fraggle_generate_rad_vel</title>
+<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node7"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="504,-24 368,-24 368,0 504,0 504,-24"/>
+<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
 <g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge9" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
 <path fill="none" stroke="#000000" d="M309.43,-41.96C329.78,-37.11 353.42,-31.47 374.67,-26.4"/>
 <polygon fill="#000000" stroke="#000000" points="375.64,-29.76 384.56,-24.04 374.02,-22.95 375.64,-29.76"/>
 </g>
-<!-- interface~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5" class="node">
-<title>interface~fraggle_util_vmag_to_vb</title>
-<g id="a_interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#a7506f" stroke="#a7506f" points="675,-64 545,-64 545,-40 675,-40 675,-64"/>
-<text text-anchor="middle" x="610" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
-</a>
-</g>
-</g>
-<!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge4" class="edge">
-<title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M675.37,-52.38C685.31,-52.44 695.64,-52.5 705.77,-52.56"/>
-<polygon fill="#000000" stroke="#000000" points="705.78,-56.06 715.81,-52.62 705.83,-49.06 705.78,-56.06"/>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge5" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M503.99,-53.22C514.04,-53.1 524.45,-52.98 534.64,-52.86"/>
+<polygon fill="#000000" stroke="#000000" points="534.77,-56.36 544.73,-52.75 534.69,-49.36 534.77,-56.36"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
 <g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge6" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M504.49,-53.22C514.33,-53.1 524.52,-52.98 534.5,-52.87"/>
-<polygon fill="#000000" stroke="#000000" points="534.84,-56.36 544.8,-52.75 534.76,-49.36 534.84,-56.36"/>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge7" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
 <path fill="none" stroke="#000000" d="M488.61,-24C507.06,-28.29 528.04,-33.17 547.27,-37.64"/>
 <polygon fill="#000000" stroke="#000000" points="546.6,-41.08 557.13,-39.94 548.19,-34.26 546.6,-41.08"/>
 </g>
@@ -445,7 +445,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments -->
-<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge5" class="edge">
+<g id="interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge7" class="edge">
 <title>interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.24,-54C156.6,-54 165.16,-54 173.64,-54"/>
 <polygon fill="#000000" stroke="#000000" points="173.91,-57.5 183.91,-54 173.91,-50.5 173.91,-57.5"/>
diff --git a/docs/interface/fraggle_util_vmag_to_vb.html b/docs/interface/fraggle_util_vmag_to_vb.html
index 18afd4710..35433cf28 100644
--- a/docs/interface/fraggle_util_vmag_to_vb.html
+++ b/docs/interface/fraggle_util_vmag_to_vb.html
@@ -363,35 +363,35 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="670,-45 540,-45 540,-21 670,-21 670,-45"/>
 <text text-anchor="middle" x="605" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_util_vmag_to_vb</text>
 </g>
-<!-- proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_tan_vel -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node2" class="node">
-<title>proc~fraggle_generate_rad_vel</title>
-<g id="a_interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node2"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="504,-66 368,-66 368,-42 504,-42 504,-66"/>
-<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node2"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-66 368.5,-66 368.5,-42 503.5,-42 503.5,-66"/>
+<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_edge1" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M504.44,-45.52C512.75,-44.48 521.27,-43.4 529.67,-42.35"/>
-<polygon fill="#000000" stroke="#000000" points="530.34,-45.79 539.82,-41.07 529.46,-38.85 530.34,-45.79"/>
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M503.96,-45.58C512.44,-44.51 521.16,-43.42 529.74,-42.34"/>
+<polygon fill="#000000" stroke="#000000" points="530.25,-45.8 539.74,-41.08 529.38,-38.86 530.25,-45.8"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_rad_vel -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node3" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-24 368.5,-24 368.5,0 503.5,0 503.5,-24"/>
-<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>proc~fraggle_generate_rad_vel</title>
+<g id="a_interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="504,-24 368,-24 368,0 504,0 504,-24"/>
+<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_edge2" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M503.96,-20.42C512.44,-21.49 521.16,-22.58 529.74,-23.66"/>
-<polygon fill="#000000" stroke="#000000" points="529.38,-27.14 539.74,-24.92 530.25,-20.2 529.38,-27.14"/>
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M504.44,-20.48C512.75,-21.52 521.27,-22.6 529.67,-23.65"/>
+<polygon fill="#000000" stroke="#000000" points="529.46,-27.15 539.82,-24.93 530.34,-20.21 529.46,-27.15"/>
 </g>
 <!-- proc~fraggle_generate_fragments -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node4" class="node">
@@ -402,17 +402,17 @@ <h3 class="panel-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_edge3" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-41.72C340.6,-42.74 349.27,-43.77 357.81,-44.79"/>
-<polygon fill="#000000" stroke="#000000" points="357.4,-48.27 367.75,-45.98 358.23,-41.32 357.4,-48.27"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<path fill="none" stroke="#000000" d="M332.11,-41.72C340.73,-42.75 349.55,-43.8 358.22,-44.84"/>
+<polygon fill="#000000" stroke="#000000" points="357.96,-48.33 368.31,-46.04 358.79,-41.38 357.96,-48.33"/>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_edge4" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-24.28C340.73,-23.25 349.55,-22.2 358.22,-21.16"/>
-<polygon fill="#000000" stroke="#000000" points="358.79,-24.62 368.31,-19.96 357.96,-17.67 358.79,-24.62"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
+<path fill="none" stroke="#000000" d="M332.11,-24.28C340.6,-23.26 349.27,-22.23 357.81,-21.21"/>
+<polygon fill="#000000" stroke="#000000" points="358.23,-24.68 367.75,-20.02 357.4,-17.73 358.23,-24.68"/>
 </g>
 <!-- interface~fraggle_generate_fragments -->
 <g id="interface~~fraggle_util_vmag_to_vb~~CalledByGraph_node5" class="node">
diff --git a/docs/interface/gr_kick_getaccb_ns_body.html b/docs/interface/gr_kick_getaccb_ns_body.html
index b943e832f..b4bf1b39a 100644
--- a/docs/interface/gr_kick_getaccb_ns_body.html
+++ b/docs/interface/gr_kick_getaccb_ns_body.html
@@ -136,7 +136,7 @@ <h1>gr_kick_getaccb_ns_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/gr_kick_getacch.html b/docs/interface/gr_kick_getacch.html
index 3e15a5081..90a100ee1 100644
--- a/docs/interface/gr_kick_getacch.html
+++ b/docs/interface/gr_kick_getacch.html
@@ -136,7 +136,7 @@ <h1>gr_kick_getacch
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -315,7 +315,7 @@ <h3 class="panel-title">Calls</h3>
     <br>
     
       <h2>
-public module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr)
+public pure module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr)
     
     
    
@@ -376,7 +376,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-lmask~2"></span>logical,</td>
+  <td><span class="anchor" id="variable-lmask~4"></span>logical,</td>
   <td>intent(in),</td>
   <td></td>
   
@@ -391,7 +391,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~12"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~14"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/gr_p4_pos_kick.html b/docs/interface/gr_p4_pos_kick.html
index 17ff85bda..8430ecc7d 100644
--- a/docs/interface/gr_p4_pos_kick.html
+++ b/docs/interface/gr_p4_pos_kick.html
@@ -136,7 +136,7 @@ <h1>gr_p4_pos_kick
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/gr_pseudovel2vel.html b/docs/interface/gr_pseudovel2vel.html
index cc406fa28..f781b3a81 100644
--- a/docs/interface/gr_pseudovel2vel.html
+++ b/docs/interface/gr_pseudovel2vel.html
@@ -136,7 +136,7 @@ <h1>gr_pseudovel2vel
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/gr_pv2vh_body.html b/docs/interface/gr_pv2vh_body.html
index d2328f1cc..a401064a4 100644
--- a/docs/interface/gr_pv2vh_body.html
+++ b/docs/interface/gr_pv2vh_body.html
@@ -136,7 +136,7 @@ <h1>gr_pv2vh_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/gr_vel2pseudovel.html b/docs/interface/gr_vel2pseudovel.html
index adb202bf4..9ee7d0843 100644
--- a/docs/interface/gr_vel2pseudovel.html
+++ b/docs/interface/gr_vel2pseudovel.html
@@ -136,7 +136,7 @@ <h1>gr_vel2pseudovel
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/gr_vh2pv_body.html b/docs/interface/gr_vh2pv_body.html
index 2de6a27c6..6b939d6c5 100644
--- a/docs/interface/gr_vh2pv_body.html
+++ b/docs/interface/gr_vh2pv_body.html
@@ -136,7 +136,7 @@ <h1>gr_vh2pv_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/helio_drift_body.html b/docs/interface/helio_drift_body.html
index 06232633c..1ca493fb1 100644
--- a/docs/interface/helio_drift_body.html
+++ b/docs/interface/helio_drift_body.html
@@ -375,25 +375,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M184.07,-18.59C192.21,-20.07 201.03,-21.68 209.71,-23.27"/>
 <polygon fill="#000000" stroke="#000000" points="209.33,-26.76 219.8,-25.11 210.59,-19.87 209.33,-26.76"/>
 </g>
-<!-- interface~helio_drift_tp -->
-<g id="interface~~helio_drift_body~~CalledByGraph_node4" class="node">
-<title>interface~helio_drift_tp</title>
-<g id="a_interface~~helio_drift_body~~CalledByGraph_node4"><a xlink:href=".././interface/helio_drift_tp.html" xlink:title="helio_drift_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="74,-24 0,-24 0,0 74,0 74,-24"/>
-<text text-anchor="middle" x="37" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp -->
-<g id="interface~~helio_drift_body~~CalledByGraph_edge4" class="edge">
-<title>interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M74.26,-12C82.37,-12 91.07,-12 99.52,-12"/>
-<polygon fill="#000000" stroke="#000000" points="99.65,-15.5 109.65,-12 99.65,-8.5 99.65,-15.5"/>
-</g>
 <!-- interface~helio_drift_pl -->
-<g id="interface~~helio_drift_body~~CalledByGraph_node5" class="node">
+<g id="interface~~helio_drift_body~~CalledByGraph_node4" class="node">
 <title>interface~helio_drift_pl</title>
-<g id="a_interface~~helio_drift_body~~CalledByGraph_node5"><a xlink:href=".././interface/helio_drift_pl.html" xlink:title="helio_drift_pl">
+<g id="a_interface~~helio_drift_body~~CalledByGraph_node4"><a xlink:href=".././interface/helio_drift_pl.html" xlink:title="helio_drift_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="73.5,-66 0.5,-66 0.5,-42 73.5,-42 73.5,-66"/>
 <text text-anchor="middle" x="37" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_pl</text>
 </a>
@@ -405,6 +390,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M73.66,-54C82.14,-54 91.3,-54 100.17,-54"/>
 <polygon fill="#000000" stroke="#000000" points="100.37,-57.5 110.37,-54 100.37,-50.5 100.37,-57.5"/>
 </g>
+<!-- interface~helio_drift_tp -->
+<g id="interface~~helio_drift_body~~CalledByGraph_node5" class="node">
+<title>interface~helio_drift_tp</title>
+<g id="a_interface~~helio_drift_body~~CalledByGraph_node5"><a xlink:href=".././interface/helio_drift_tp.html" xlink:title="helio_drift_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="74,-24 0,-24 0,0 74,0 74,-24"/>
+<text text-anchor="middle" x="37" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp -->
+<g id="interface~~helio_drift_body~~CalledByGraph_edge4" class="edge">
+<title>interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M74.26,-12C82.37,-12 91.07,-12 99.52,-12"/>
+<polygon fill="#000000" stroke="#000000" points="99.65,-15.5 109.65,-12 99.65,-8.5 99.65,-15.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/helio_gr_kick_getacch_pl.html b/docs/interface/helio_gr_kick_getacch_pl.html
index 1ac136d7d..a32131434 100644
--- a/docs/interface/helio_gr_kick_getacch_pl.html
+++ b/docs/interface/helio_gr_kick_getacch_pl.html
@@ -327,7 +327,7 @@ <h3 class="panel-title">Calls</h3>
     <br>
     
       <h2>
-public module subroutine helio_gr_kick_getacch_pl(self, param)
+public pure module subroutine helio_gr_kick_getacch_pl(self, param)
     
     
    
diff --git a/docs/interface/helio_gr_kick_getacch_tp.html b/docs/interface/helio_gr_kick_getacch_tp.html
index 184b33686..17741523c 100644
--- a/docs/interface/helio_gr_kick_getacch_tp.html
+++ b/docs/interface/helio_gr_kick_getacch_tp.html
@@ -327,7 +327,7 @@ <h3 class="panel-title">Calls</h3>
     <br>
     
       <h2>
-public module subroutine helio_gr_kick_getacch_tp(self, param)
+public pure module subroutine helio_gr_kick_getacch_tp(self, param)
     
     
    
diff --git a/docs/interface/io_conservation_report.html b/docs/interface/io_conservation_report.html
index 2671e431a..00c1cc5ad 100644
--- a/docs/interface/io_conservation_report.html
+++ b/docs/interface/io_conservation_report.html
@@ -136,7 +136,7 @@ <h1>io_conservation_report
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_dump_base.html b/docs/interface/io_dump_base.html
index abe7349bd..0a216ae35 100644
--- a/docs/interface/io_dump_base.html
+++ b/docs/interface/io_dump_base.html
@@ -136,7 +136,7 @@ <h1>io_dump_base
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -228,125 +228,125 @@ <h3 class="panel-title">Calls</h3>
 <!-- interface~io_dump_base -->
 <g id="interface~~io_dump_base~~CallsGraph_node1" class="node">
 <title>interface~io_dump_base</title>
-<polygon fill="none" stroke="black" points="83,-46.04 0,-46.04 0,-22.04 83,-22.04 83,-46.04"/>
-<text text-anchor="middle" x="41.5" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50">io_dump_base</text>
+<polygon fill="none" stroke="black" points="83,-66 0,-66 0,-42 83,-42 83,-66"/>
+<text text-anchor="middle" x="41.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">io_dump_base</text>
 </g>
 <!-- proc~io_dump_base -->
 <g id="interface~~io_dump_base~~CallsGraph_node2" class="node">
 <title>proc~io_dump_base</title>
 <g id="a_interface~~io_dump_base~~CallsGraph_node2"><a xlink:href=".././proc/io_dump_base.html" xlink:title="io_dump_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="202,-46.04 119,-46.04 119,-22.04 202,-22.04 202,-46.04"/>
-<text text-anchor="middle" x="160.5" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="202,-66 119,-66 119,-42 202,-42 202,-66"/>
+<text text-anchor="middle" x="160.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
 </a>
 </g>
 </g>
 <!-- interface~io_dump_base&#45;&gt;proc~io_dump_base -->
 <g id="interface~~io_dump_base~~CallsGraph_edge1" class="edge">
 <title>interface~io_dump_base&#45;&gt;proc~io_dump_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-34.04C91.35,-34.04 100.14,-34.04 108.7,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="108.98,-37.54 118.98,-34.04 108.98,-30.54 108.98,-37.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-54C91.35,-54 100.14,-54 108.7,-54"/>
+<polygon fill="#000000" stroke="#000000" points="108.98,-57.5 118.98,-54 108.98,-50.5 108.98,-57.5"/>
 </g>
-<!-- interface~io_write_frame_cb -->
+<!-- interface~util_exit -->
 <g id="interface~~io_dump_base~~CallsGraph_node3" class="node">
+<title>interface~util_exit</title>
+<g id="a_interface~~io_dump_base~~CallsGraph_node3"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
+<polygon fill="#a7506f" stroke="#a7506f" points="588,-66 534,-66 534,-42 588,-42 588,-66"/>
+<text text-anchor="middle" x="561" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</a>
+</g>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
+<g id="interface~~io_dump_base~~CallsGraph_edge3" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M197.67,-66.06C210.28,-69.7 224.62,-73.2 238,-75 352.52,-90.43 383.98,-93.79 498,-75 506.7,-73.57 515.83,-71.07 524.32,-68.29"/>
+<polygon fill="#000000" stroke="#000000" points="525.64,-71.54 533.94,-64.94 523.34,-64.93 525.64,-71.54"/>
+</g>
+<!-- interface~io_write_frame_cb -->
+<g id="interface~~io_dump_base~~CallsGraph_node4" class="node">
 <title>interface~io_write_frame_cb</title>
-<g id="a_interface~~io_dump_base~~CallsGraph_node3"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="344,-88.04 244,-88.04 244,-64.04 344,-64.04 344,-88.04"/>
-<text text-anchor="middle" x="294" y="-73.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<g id="a_interface~~io_dump_base~~CallsGraph_node4"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="344,-66 244,-66 244,-42 344,-42 344,-66"/>
+<text text-anchor="middle" x="294" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
 </a>
 </g>
 </g>
 <!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
 <g id="interface~~io_dump_base~~CallsGraph_edge2" class="edge">
 <title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" d="M199.18,-46.08C213.63,-50.69 230.29,-56.01 245.54,-60.88"/>
-<polygon fill="#000000" stroke="#000000" points="244.72,-64.3 255.31,-64 246.85,-57.63 244.72,-64.3"/>
+<path fill="none" stroke="#000000" d="M202.03,-54C211.98,-54 222.84,-54 233.48,-54"/>
+<polygon fill="#000000" stroke="#000000" points="233.57,-57.5 243.57,-54 233.57,-50.5 233.57,-57.5"/>
 </g>
 <!-- interface~io_write_frame_body -->
-<g id="interface~~io_dump_base~~CallsGraph_node4" class="node">
+<g id="interface~~io_dump_base~~CallsGraph_node5" class="node">
 <title>interface~io_write_frame_body</title>
-<g id="a_interface~~io_dump_base~~CallsGraph_node4"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="350,-46.04 238,-46.04 238,-22.04 350,-22.04 350,-46.04"/>
-<text text-anchor="middle" x="294" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<g id="a_interface~~io_dump_base~~CallsGraph_node5"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="350,-24 238,-24 238,0 350,0 350,-24"/>
+<text text-anchor="middle" x="294" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
 <!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
-<g id="interface~~io_dump_base~~CallsGraph_edge3" class="edge">
+<g id="interface~~io_dump_base~~CallsGraph_edge4" class="edge">
 <title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
-<path fill="none" stroke="#000000" d="M202.03,-34.04C210.16,-34.04 218.91,-34.04 227.64,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="227.85,-37.54 237.85,-34.04 227.85,-30.54 227.85,-37.54"/>
+<path fill="none" stroke="#000000" d="M199.18,-41.96C213.63,-37.35 230.29,-32.03 245.54,-27.16"/>
+<polygon fill="#000000" stroke="#000000" points="246.85,-30.41 255.31,-24.04 244.72,-23.75 246.85,-30.41"/>
 </g>
-<!-- interface~util_exit -->
-<g id="interface~~io_dump_base~~CallsGraph_node5" class="node">
-<title>interface~util_exit</title>
-<g id="a_interface~~io_dump_base~~CallsGraph_node5"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
-<polygon fill="#a7506f" stroke="#a7506f" points="588,-46.04 534,-46.04 534,-22.04 588,-22.04 588,-46.04"/>
-<text text-anchor="middle" x="561" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<!-- proc~util_exit -->
+<g id="interface~~io_dump_base~~CallsGraph_node8" class="node">
+<title>proc~util_exit</title>
+<g id="a_interface~~io_dump_base~~CallsGraph_node8"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<polygon fill="#d9534f" stroke="#d9534f" points="678,-66 624,-66 624,-42 678,-42 678,-66"/>
+<text text-anchor="middle" x="651" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
-<g id="interface~~io_dump_base~~CallsGraph_edge4" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M197.67,-21.98C210.28,-18.34 224.62,-14.84 238,-13.04 352.52,2.39 383.98,5.74 498,-13.04 506.7,-14.48 515.83,-16.97 524.32,-19.75"/>
-<polygon fill="#000000" stroke="#000000" points="523.34,-23.12 533.94,-23.1 525.64,-16.51 523.34,-23.12"/>
+<!-- interface~util_exit&#45;&gt;proc~util_exit -->
+<g id="interface~~io_dump_base~~CallsGraph_edge5" class="edge">
+<title>interface~util_exit&#45;&gt;proc~util_exit</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M588.4,-54C596.39,-54 605.31,-54 613.82,-54"/>
+<polygon fill="#000000" stroke="#000000" points="613.92,-57.5 623.92,-54 613.92,-50.5 613.92,-57.5"/>
 </g>
 <!-- proc~io_write_frame_cb -->
 <g id="interface~~io_dump_base~~CallsGraph_node7" class="node">
 <title>proc~io_write_frame_cb</title>
 <g id="a_interface~~io_dump_base~~CallsGraph_node7"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="492,-88.04 392,-88.04 392,-64.04 492,-64.04 492,-88.04"/>
-<text text-anchor="middle" x="442" y="-73.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="492,-66 392,-66 392,-42 492,-42 492,-66"/>
+<text text-anchor="middle" x="442" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
 </a>
 </g>
 </g>
 <!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
-<g id="interface~~io_dump_base~~CallsGraph_edge5" class="edge">
+<g id="interface~~io_dump_base~~CallsGraph_edge6" class="edge">
 <title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M344.02,-76.04C356.06,-76.04 369.08,-76.04 381.55,-76.04"/>
-<polygon fill="#000000" stroke="#000000" points="381.86,-79.54 391.86,-76.04 381.86,-72.54 381.86,-79.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M344.02,-54C356.06,-54 369.08,-54 381.55,-54"/>
+<polygon fill="#000000" stroke="#000000" points="381.86,-57.5 391.86,-54 381.86,-50.5 381.86,-57.5"/>
 </g>
 <!-- proc~io_write_frame_body -->
-<g id="interface~~io_dump_base~~CallsGraph_node8" class="node">
+<g id="interface~~io_dump_base~~CallsGraph_node6" class="node">
 <title>proc~io_write_frame_body</title>
-<g id="a_interface~~io_dump_base~~CallsGraph_node8"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="498,-46.04 386,-46.04 386,-22.04 498,-22.04 498,-46.04"/>
-<text text-anchor="middle" x="442" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<g id="a_interface~~io_dump_base~~CallsGraph_node6"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="498,-24 386,-24 386,0 498,0 498,-24"/>
+<text text-anchor="middle" x="442" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
 <!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
-<g id="interface~~io_dump_base~~CallsGraph_edge6" class="edge">
-<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350.2,-34.04C358.46,-34.04 367.05,-34.04 375.51,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="375.73,-37.54 385.73,-34.04 375.73,-30.54 375.73,-37.54"/>
-</g>
-<!-- proc~util_exit -->
-<g id="interface~~io_dump_base~~CallsGraph_node6" class="node">
-<title>proc~util_exit</title>
-<g id="a_interface~~io_dump_base~~CallsGraph_node6"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
-<polygon fill="#d9534f" stroke="#d9534f" points="678,-46.04 624,-46.04 624,-22.04 678,-22.04 678,-46.04"/>
-<text text-anchor="middle" x="651" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</a>
-</g>
-</g>
-<!-- interface~util_exit&#45;&gt;proc~util_exit -->
 <g id="interface~~io_dump_base~~CallsGraph_edge7" class="edge">
-<title>interface~util_exit&#45;&gt;proc~util_exit</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M588.4,-34.04C596.39,-34.04 605.31,-34.04 613.82,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="613.92,-37.54 623.92,-34.04 613.92,-30.54 613.92,-37.54"/>
+<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350.2,-12C358.46,-12 367.05,-12 375.51,-12"/>
+<polygon fill="#000000" stroke="#000000" points="375.73,-15.5 385.73,-12 375.73,-8.5 375.73,-15.5"/>
 </g>
-<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
 <g id="interface~~io_dump_base~~CallsGraph_edge8" class="edge">
-<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M476.53,-64.01C491.48,-58.64 509.12,-52.31 524.32,-46.85"/>
-<polygon fill="#000000" stroke="#000000" points="525.67,-50.08 533.9,-43.41 523.31,-43.49 525.67,-50.08"/>
+<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M476.53,-24.04C491.48,-29.4 509.12,-35.74 524.32,-41.19"/>
+<polygon fill="#000000" stroke="#000000" points="523.31,-44.55 533.9,-44.63 525.67,-37.96 523.31,-44.55"/>
 </g>
-<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
 <g id="interface~~io_dump_base~~CallsGraph_edge9" class="edge">
-<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M498.07,-34.04C506.73,-34.04 515.48,-34.04 523.58,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="523.77,-37.54 533.77,-34.04 523.77,-30.54 523.77,-37.54"/>
+<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M492.28,-54C502.74,-54 513.6,-54 523.48,-54"/>
+<polygon fill="#000000" stroke="#000000" points="523.75,-57.5 533.75,-54 523.75,-50.5 523.75,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/io_dump_param.html b/docs/interface/io_dump_param.html
index 8128aec6d..902828a85 100644
--- a/docs/interface/io_dump_param.html
+++ b/docs/interface/io_dump_param.html
@@ -136,7 +136,7 @@ <h1>io_dump_param
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_dump_particle_info.html b/docs/interface/io_dump_particle_info.html
index b718a48b6..455bc22da 100644
--- a/docs/interface/io_dump_particle_info.html
+++ b/docs/interface/io_dump_particle_info.html
@@ -136,7 +136,7 @@ <h1>io_dump_particle_info
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_dump_particle_info_base.html b/docs/interface/io_dump_particle_info_base.html
index a08f170f5..47acb49eb 100644
--- a/docs/interface/io_dump_particle_info_base.html
+++ b/docs/interface/io_dump_particle_info_base.html
@@ -136,7 +136,7 @@ <h1>io_dump_particle_info_base
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_dump_system.html b/docs/interface/io_dump_system.html
index 87d1ec21a..7c7c8a406 100644
--- a/docs/interface/io_dump_system.html
+++ b/docs/interface/io_dump_system.html
@@ -136,7 +136,7 @@ <h1>io_dump_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -246,15 +246,15 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-75C102.46,-75 111.13,-75 119.63,-75"/>
 <polygon fill="#000000" stroke="#000000" points="119.86,-78.5 129.86,-75 119.86,-71.5 119.86,-78.5"/>
 </g>
-<!-- dump_cb_file -->
+<!-- dump_tp_file -->
 <g id="interface~~io_dump_system~~CallsGraph_node3" class="node">
-<title>dump_cb_file</title>
-<polygon fill="#777777" stroke="#777777" points="346,-150 270,-150 270,-126 346,-126 346,-150"/>
-<text text-anchor="middle" x="308" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_cb_file</text>
+<title>dump_tp_file</title>
+<polygon fill="#777777" stroke="#777777" points="345,-150 271,-150 271,-126 345,-126 345,-150"/>
+<text text-anchor="middle" x="308" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_tp_file</text>
 </g>
-<!-- proc~io_dump_system&#45;&gt;dump_cb_file -->
+<!-- proc~io_dump_system&#45;&gt;dump_tp_file -->
 <g id="interface~~io_dump_system~~CallsGraph_edge2" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_cb_file</title>
+<title>proc~io_dump_system&#45;&gt;dump_tp_file</title>
 <path fill="none" stroke="#000000" d="M200.81,-87.1C217.17,-95.67 239.81,-107.32 260,-117 263.16,-118.51 266.45,-120.06 269.76,-121.58"/>
 <polygon fill="#000000" stroke="#000000" points="268.5,-124.85 279.05,-125.81 271.4,-118.48 268.5,-124.85"/>
 </g>
@@ -265,7 +265,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="308" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_param_file</text>
 </g>
 <!-- proc~io_dump_system&#45;&gt;dump_param_file -->
-<g id="interface~~io_dump_system~~CallsGraph_edge3" class="edge">
+<g id="interface~~io_dump_system~~CallsGraph_edge4" class="edge">
 <title>proc~io_dump_system&#45;&gt;dump_param_file</title>
 <path fill="none" stroke="#000000" d="M224.21,-82.52C232.52,-83.88 241.28,-85.3 249.86,-86.7"/>
 <polygon fill="#000000" stroke="#000000" points="249.38,-90.17 259.81,-88.32 250.5,-83.26 249.38,-90.17"/>
@@ -277,20 +277,20 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="308" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_pl_file</text>
 </g>
 <!-- proc~io_dump_system&#45;&gt;dump_pl_file -->
-<g id="interface~~io_dump_system~~CallsGraph_edge4" class="edge">
+<g id="interface~~io_dump_system~~CallsGraph_edge3" class="edge">
 <title>proc~io_dump_system&#45;&gt;dump_pl_file</title>
 <path fill="none" stroke="#000000" d="M224.21,-67.48C236.17,-65.53 249.06,-63.43 261.01,-61.49"/>
 <polygon fill="#000000" stroke="#000000" points="261.92,-64.88 271.23,-59.82 260.8,-57.98 261.92,-64.88"/>
 </g>
-<!-- dump_tp_file -->
+<!-- dump_cb_file -->
 <g id="interface~~io_dump_system~~CallsGraph_node6" class="node">
-<title>dump_tp_file</title>
-<polygon fill="#777777" stroke="#777777" points="345,-24 271,-24 271,0 345,0 345,-24"/>
-<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_tp_file</text>
+<title>dump_cb_file</title>
+<polygon fill="#777777" stroke="#777777" points="346,-24 270,-24 270,0 346,0 346,-24"/>
+<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_cb_file</text>
 </g>
-<!-- proc~io_dump_system&#45;&gt;dump_tp_file -->
+<!-- proc~io_dump_system&#45;&gt;dump_cb_file -->
 <g id="interface~~io_dump_system~~CallsGraph_edge5" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_tp_file</title>
+<title>proc~io_dump_system&#45;&gt;dump_cb_file</title>
 <path fill="none" stroke="#000000" d="M200.81,-62.9C217.17,-54.33 239.81,-42.68 260,-33 263.16,-31.49 266.45,-29.94 269.76,-28.42"/>
 <polygon fill="#000000" stroke="#000000" points="271.4,-31.52 279.05,-24.19 268.5,-25.15 271.4,-31.52"/>
 </g>
diff --git a/docs/interface/io_get_args.html b/docs/interface/io_get_args.html
index b15a36e95..be7196df5 100644
--- a/docs/interface/io_get_args.html
+++ b/docs/interface/io_get_args.html
@@ -136,7 +136,7 @@ <h1>io_get_args
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -246,18 +246,18 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M69.23,-54C77.32,-54 86.08,-54 94.56,-54"/>
 <polygon fill="#000000" stroke="#000000" points="94.7,-57.5 104.7,-54 94.7,-50.5 94.7,-57.5"/>
 </g>
-<!-- interface~io_toupper -->
+<!-- interface~util_version -->
 <g id="interface~~io_get_args~~CallsGraph_node3" class="node">
-<title>interface~io_toupper</title>
-<g id="a_interface~~io_get_args~~CallsGraph_node3"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#a7506f" stroke="#a7506f" points="275.5,-108 211.5,-108 211.5,-84 275.5,-84 275.5,-108"/>
-<text text-anchor="middle" x="243.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>interface~util_version</title>
+<g id="a_interface~~io_get_args~~CallsGraph_node3"><a xlink:href=".././interface/util_version.html" xlink:title="util_version">
+<polygon fill="#a7506f" stroke="#a7506f" points="277,-108 210,-108 210,-84 277,-84 277,-108"/>
+<text text-anchor="middle" x="243.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
+<!-- proc~io_get_args&#45;&gt;interface~util_version -->
 <g id="interface~~io_get_args~~CallsGraph_edge2" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
+<title>proc~io_get_args&#45;&gt;interface~util_version</title>
 <path fill="none" stroke="#000000" d="M169.73,-66.04C180.4,-70.43 192.63,-75.47 203.99,-80.14"/>
 <polygon fill="#000000" stroke="#000000" points="202.69,-83.39 213.27,-83.96 205.35,-76.92 202.69,-83.39"/>
 </g>
@@ -276,40 +276,40 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M174.18,-54C184.45,-54 195.79,-54 206.22,-54"/>
 <polygon fill="#000000" stroke="#000000" points="206.28,-57.5 216.28,-54 206.28,-50.5 206.28,-57.5"/>
 </g>
-<!-- interface~util_version -->
+<!-- interface~io_toupper -->
 <g id="interface~~io_get_args~~CallsGraph_node5" class="node">
-<title>interface~util_version</title>
-<g id="a_interface~~io_get_args~~CallsGraph_node5"><a xlink:href=".././interface/util_version.html" xlink:title="util_version">
-<polygon fill="#a7506f" stroke="#a7506f" points="277,-24 210,-24 210,0 277,0 277,-24"/>
-<text text-anchor="middle" x="243.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
+<title>interface~io_toupper</title>
+<g id="a_interface~~io_get_args~~CallsGraph_node5"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#a7506f" stroke="#a7506f" points="275.5,-24 211.5,-24 211.5,0 275.5,0 275.5,-24"/>
+<text text-anchor="middle" x="243.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~util_version -->
+<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
 <g id="interface~~io_get_args~~CallsGraph_edge4" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~util_version</title>
+<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
 <path fill="none" stroke="#000000" d="M169.73,-41.96C180.4,-37.57 192.63,-32.53 203.99,-27.86"/>
 <polygon fill="#000000" stroke="#000000" points="205.35,-31.08 213.27,-24.04 202.69,-24.61 205.35,-31.08"/>
 </g>
-<!-- proc~io_toupper -->
+<!-- proc~util_version -->
 <g id="interface~~io_get_args~~CallsGraph_node8" class="node">
-<title>proc~io_toupper</title>
-<g id="a_interface~~io_get_args~~CallsGraph_node8"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-108 314.5,-108 314.5,-84 378.5,-84 378.5,-108"/>
-<text text-anchor="middle" x="346.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>proc~util_version</title>
+<g id="a_interface~~io_get_args~~CallsGraph_node8"><a xlink:href=".././proc/util_version.html" xlink:title="util_version">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-108 313,-108 313,-84 380,-84 380,-108"/>
+<text text-anchor="middle" x="346.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
 </a>
 </g>
 </g>
-<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
+<!-- interface~util_version&#45;&gt;proc~util_version -->
 <g id="interface~~io_get_args~~CallsGraph_edge5" class="edge">
-<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.63,-96C284.65,-96 294.65,-96 304.19,-96"/>
-<polygon fill="#000000" stroke="#000000" points="304.3,-99.5 314.3,-96 304.3,-92.5 304.3,-99.5"/>
+<title>interface~util_version&#45;&gt;proc~util_version</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.01,-96C285.13,-96 293.96,-96 302.5,-96"/>
+<polygon fill="#000000" stroke="#000000" points="302.7,-99.5 312.7,-96 302.7,-92.5 302.7,-99.5"/>
 </g>
 <!-- proc~util_exit -->
-<g id="interface~~io_get_args~~CallsGraph_node6" class="node">
+<g id="interface~~io_get_args~~CallsGraph_node7" class="node">
 <title>proc~util_exit</title>
-<g id="a_interface~~io_get_args~~CallsGraph_node6"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<g id="a_interface~~io_get_args~~CallsGraph_node7"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
 <polygon fill="#d9534f" stroke="#d9534f" points="373.5,-66 319.5,-66 319.5,-42 373.5,-42 373.5,-66"/>
 <text text-anchor="middle" x="346.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
@@ -321,20 +321,20 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.51,-54C282.2,-54 296.2,-54 308.92,-54"/>
 <polygon fill="#000000" stroke="#000000" points="309.23,-57.5 319.23,-54 309.23,-50.5 309.23,-57.5"/>
 </g>
-<!-- proc~util_version -->
-<g id="interface~~io_get_args~~CallsGraph_node7" class="node">
-<title>proc~util_version</title>
-<g id="a_interface~~io_get_args~~CallsGraph_node7"><a xlink:href=".././proc/util_version.html" xlink:title="util_version">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-24 313,-24 313,0 380,0 380,-24"/>
-<text text-anchor="middle" x="346.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
+<!-- proc~io_toupper -->
+<g id="interface~~io_get_args~~CallsGraph_node6" class="node">
+<title>proc~io_toupper</title>
+<g id="a_interface~~io_get_args~~CallsGraph_node6"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-24 314.5,-24 314.5,0 378.5,0 378.5,-24"/>
+<text text-anchor="middle" x="346.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- interface~util_version&#45;&gt;proc~util_version -->
+<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
 <g id="interface~~io_get_args~~CallsGraph_edge7" class="edge">
-<title>interface~util_version&#45;&gt;proc~util_version</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.01,-12C285.13,-12 293.96,-12 302.5,-12"/>
-<polygon fill="#000000" stroke="#000000" points="302.7,-15.5 312.7,-12 302.7,-8.5 302.7,-15.5"/>
+<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.63,-12C284.65,-12 294.65,-12 304.19,-12"/>
+<polygon fill="#000000" stroke="#000000" points="304.3,-15.5 314.3,-12 304.3,-8.5 304.3,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/io_get_old_t_final_system.html b/docs/interface/io_get_old_t_final_system.html
index 2fb661376..4fb07d16f 100644
--- a/docs/interface/io_get_old_t_final_system.html
+++ b/docs/interface/io_get_old_t_final_system.html
@@ -136,7 +136,7 @@ <h1>io_get_old_t_final_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_get_token.html b/docs/interface/io_get_token.html
index 8576fc7ef..874ad251b 100644
--- a/docs/interface/io_get_token.html
+++ b/docs/interface/io_get_token.html
@@ -136,7 +136,7 @@ <h1>io_get_token
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_param_reader.html b/docs/interface/io_param_reader.html
index 166a45ff8..0b011ddc3 100644
--- a/docs/interface/io_param_reader.html
+++ b/docs/interface/io_param_reader.html
@@ -136,7 +136,7 @@ <h1>io_param_reader
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -246,65 +246,65 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M95.07,-33C103.48,-33 112.32,-33 120.97,-33"/>
 <polygon fill="#000000" stroke="#000000" points="121,-36.5 131,-33 121,-29.5 121,-36.5"/>
 </g>
-<!-- interface~io_toupper -->
+<!-- interface~io_get_token -->
 <g id="interface~~io_param_reader~~CallsGraph_node3" class="node">
-<title>interface~io_toupper</title>
-<g id="a_interface~~io_param_reader~~CallsGraph_node3"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#a7506f" stroke="#a7506f" points="331,-66 267,-66 267,-42 331,-42 331,-66"/>
-<text text-anchor="middle" x="299" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>interface~io_get_token</title>
+<g id="a_interface~~io_param_reader~~CallsGraph_node3"><a xlink:href=".././interface/io_get_token.html" xlink:title="io_get_token">
+<polygon fill="#a7506f" stroke="#a7506f" points="336,-66 262,-66 262,-42 336,-42 336,-66"/>
+<text text-anchor="middle" x="299" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </a>
 </g>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
+<!-- proc~io_param_reader&#45;&gt;interface~io_get_token -->
 <g id="interface~~io_param_reader~~CallsGraph_edge2" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M226.33,-41.3C236.42,-43.09 247,-44.96 256.85,-46.71"/>
-<polygon fill="#000000" stroke="#000000" points="256.34,-50.17 266.79,-48.47 257.56,-43.28 256.34,-50.17"/>
+<title>proc~io_param_reader&#45;&gt;interface~io_get_token</title>
+<path fill="none" stroke="#000000" d="M226.33,-41.3C234.7,-42.78 243.42,-44.33 251.78,-45.81"/>
+<polygon fill="#000000" stroke="#000000" points="251.28,-49.27 261.74,-47.57 252.5,-42.38 251.28,-49.27"/>
 </g>
-<!-- interface~io_get_token -->
+<!-- interface~io_toupper -->
 <g id="interface~~io_param_reader~~CallsGraph_node4" class="node">
-<title>interface~io_get_token</title>
-<g id="a_interface~~io_param_reader~~CallsGraph_node4"><a xlink:href=".././interface/io_get_token.html" xlink:title="io_get_token">
-<polygon fill="#a7506f" stroke="#a7506f" points="336,-24 262,-24 262,0 336,0 336,-24"/>
-<text text-anchor="middle" x="299" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<title>interface~io_toupper</title>
+<g id="a_interface~~io_param_reader~~CallsGraph_node4"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#a7506f" stroke="#a7506f" points="331,-24 267,-24 267,0 331,0 331,-24"/>
+<text text-anchor="middle" x="299" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_get_token -->
+<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
 <g id="interface~~io_param_reader~~CallsGraph_edge3" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_get_token</title>
-<path fill="none" stroke="#000000" d="M226.33,-24.7C234.7,-23.22 243.42,-21.67 251.78,-20.19"/>
-<polygon fill="#000000" stroke="#000000" points="252.5,-23.62 261.74,-18.43 251.28,-16.73 252.5,-23.62"/>
+<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M226.33,-24.7C236.42,-22.91 247,-21.04 256.85,-19.29"/>
+<polygon fill="#000000" stroke="#000000" points="257.56,-22.72 266.79,-17.53 256.34,-15.83 257.56,-22.72"/>
 </g>
-<!-- proc~io_toupper -->
+<!-- proc~io_get_token -->
 <g id="interface~~io_param_reader~~CallsGraph_node6" class="node">
-<title>proc~io_toupper</title>
-<g id="a_interface~~io_param_reader~~CallsGraph_node6"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#d9534f" stroke="#d9534f" points="441,-66 377,-66 377,-42 441,-42 441,-66"/>
-<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>proc~io_get_token</title>
+<g id="a_interface~~io_param_reader~~CallsGraph_node6"><a xlink:href=".././proc/io_get_token.html" xlink:title="io_get_token">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="446,-66 372,-66 372,-42 446,-42 446,-66"/>
+<text text-anchor="middle" x="409" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </a>
 </g>
 </g>
-<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
+<!-- interface~io_get_token&#45;&gt;proc~io_get_token -->
 <g id="interface~~io_param_reader~~CallsGraph_edge4" class="edge">
-<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.24,-54C342.32,-54 354.97,-54 366.76,-54"/>
-<polygon fill="#000000" stroke="#000000" points="366.83,-57.5 376.83,-54 366.83,-50.5 366.83,-57.5"/>
+<title>interface~io_get_token&#45;&gt;proc~io_get_token</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.26,-54C344.37,-54 353.07,-54 361.52,-54"/>
+<polygon fill="#000000" stroke="#000000" points="361.65,-57.5 371.65,-54 361.65,-50.5 361.65,-57.5"/>
 </g>
-<!-- proc~io_get_token -->
+<!-- proc~io_toupper -->
 <g id="interface~~io_param_reader~~CallsGraph_node5" class="node">
-<title>proc~io_get_token</title>
-<g id="a_interface~~io_param_reader~~CallsGraph_node5"><a xlink:href=".././proc/io_get_token.html" xlink:title="io_get_token">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="446,-24 372,-24 372,0 446,0 446,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<title>proc~io_toupper</title>
+<g id="a_interface~~io_param_reader~~CallsGraph_node5"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#d9534f" stroke="#d9534f" points="441,-24 377,-24 377,0 441,0 441,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_token&#45;&gt;proc~io_get_token -->
+<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
 <g id="interface~~io_param_reader~~CallsGraph_edge5" class="edge">
-<title>interface~io_get_token&#45;&gt;proc~io_get_token</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.26,-12C344.37,-12 353.07,-12 361.52,-12"/>
-<polygon fill="#000000" stroke="#000000" points="361.65,-15.5 371.65,-12 361.65,-8.5 361.65,-15.5"/>
+<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.24,-12C342.32,-12 354.97,-12 366.76,-12"/>
+<polygon fill="#000000" stroke="#000000" points="366.83,-15.5 376.83,-12 366.83,-8.5 366.83,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/io_param_writer.html b/docs/interface/io_param_writer.html
index 709c78a7c..61c5d2a92 100644
--- a/docs/interface/io_param_writer.html
+++ b/docs/interface/io_param_writer.html
@@ -136,7 +136,7 @@ <h1>io_param_writer
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_frame_body.html b/docs/interface/io_read_frame_body.html
index b6f32d2ee..e5a666aec 100644
--- a/docs/interface/io_read_frame_body.html
+++ b/docs/interface/io_read_frame_body.html
@@ -136,7 +136,7 @@ <h1>io_read_frame_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_frame_cb.html b/docs/interface/io_read_frame_cb.html
index f47dbeb69..4eb46e735 100644
--- a/docs/interface/io_read_frame_cb.html
+++ b/docs/interface/io_read_frame_cb.html
@@ -136,7 +136,7 @@ <h1>io_read_frame_cb
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_frame_system.html b/docs/interface/io_read_frame_system.html
index bddd2d40b..88c830fdb 100644
--- a/docs/interface/io_read_frame_system.html
+++ b/docs/interface/io_read_frame_system.html
@@ -136,7 +136,7 @@ <h1>io_read_frame_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_in_body.html b/docs/interface/io_read_in_body.html
index 96896bef4..d777eb24f 100644
--- a/docs/interface/io_read_in_body.html
+++ b/docs/interface/io_read_in_body.html
@@ -136,7 +136,7 @@ <h1>io_read_in_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_in_cb.html b/docs/interface/io_read_in_cb.html
index 71b4901e1..4c98e91bb 100644
--- a/docs/interface/io_read_in_cb.html
+++ b/docs/interface/io_read_in_cb.html
@@ -136,7 +136,7 @@ <h1>io_read_in_cb
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_in_param.html b/docs/interface/io_read_in_param.html
index dd00117ed..beccb3d0a 100644
--- a/docs/interface/io_read_in_param.html
+++ b/docs/interface/io_read_in_param.html
@@ -136,7 +136,7 @@ <h1>io_read_in_param
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_in_particle_info.html b/docs/interface/io_read_in_particle_info.html
index 4fb86c516..351e31f96 100644
--- a/docs/interface/io_read_in_particle_info.html
+++ b/docs/interface/io_read_in_particle_info.html
@@ -136,7 +136,7 @@ <h1>io_read_in_particle_info
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_read_particle_info_system.html b/docs/interface/io_read_particle_info_system.html
index a1c238bbf..1c984524e 100644
--- a/docs/interface/io_read_particle_info_system.html
+++ b/docs/interface/io_read_particle_info_system.html
@@ -136,7 +136,7 @@ <h1>io_read_particle_info_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_toupper.html b/docs/interface/io_toupper.html
index bdf968ea7..e24645c4b 100644
--- a/docs/interface/io_toupper.html
+++ b/docs/interface/io_toupper.html
@@ -136,7 +136,7 @@ <h1>io_toupper
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -333,65 +333,65 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="326,-45 262,-45 262,-21 326,-21 326,-45"/>
 <text text-anchor="middle" x="294" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">io_toupper</text>
 </g>
-<!-- proc~io_param_reader -->
+<!-- proc~io_get_args -->
 <g id="interface~~io_toupper~~CalledByGraph_node2" class="node">
-<title>proc~io_param_reader</title>
-<g id="a_interface~~io_toupper~~CalledByGraph_node2"><a xlink:href=".././proc/io_param_reader.html" xlink:title="io_param_reader">
-<polygon fill="#d9534f" stroke="#d9534f" points="226,-66 131,-66 131,-42 226,-42 226,-66"/>
-<text text-anchor="middle" x="178.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<title>proc~io_get_args</title>
+<g id="a_interface~~io_toupper~~CalledByGraph_node2"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="213,-66 144,-66 144,-42 213,-42 213,-66"/>
+<text text-anchor="middle" x="178.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
+<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
 <g id="interface~~io_toupper~~CalledByGraph_edge1" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M226.32,-45.34C234.83,-43.76 243.65,-42.13 251.97,-40.59"/>
-<polygon fill="#000000" stroke="#000000" points="252.63,-44.03 261.83,-38.77 251.36,-37.14 252.63,-44.03"/>
+<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M213.25,-47.76C225.41,-45.5 239.28,-42.94 252,-40.59"/>
+<polygon fill="#000000" stroke="#000000" points="252.71,-44.01 261.9,-38.75 251.43,-37.13 252.71,-44.01"/>
 </g>
-<!-- proc~io_get_args -->
+<!-- proc~io_param_reader -->
 <g id="interface~~io_toupper~~CalledByGraph_node3" class="node">
-<title>proc~io_get_args</title>
-<g id="a_interface~~io_toupper~~CalledByGraph_node3"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="213,-24 144,-24 144,0 213,0 213,-24"/>
-<text text-anchor="middle" x="178.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<title>proc~io_param_reader</title>
+<g id="a_interface~~io_toupper~~CalledByGraph_node3"><a xlink:href=".././proc/io_param_reader.html" xlink:title="io_param_reader">
+<polygon fill="#d9534f" stroke="#d9534f" points="226,-24 131,-24 131,0 226,0 226,-24"/>
+<text text-anchor="middle" x="178.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
+<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
 <g id="interface~~io_toupper~~CalledByGraph_edge2" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M213.25,-18.24C225.41,-20.5 239.28,-23.06 252,-25.41"/>
-<polygon fill="#000000" stroke="#000000" points="251.43,-28.87 261.9,-27.25 252.71,-21.99 251.43,-28.87"/>
+<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M226.32,-20.66C234.83,-22.24 243.65,-23.87 251.97,-25.41"/>
+<polygon fill="#000000" stroke="#000000" points="251.36,-28.86 261.83,-27.23 252.63,-21.97 251.36,-28.86"/>
 </g>
 <!-- interface~io_get_args -->
 <g id="interface~~io_toupper~~CalledByGraph_node4" class="node">
 <title>interface~io_get_args</title>
 <g id="a_interface~~io_toupper~~CalledByGraph_node4"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#a7506f" stroke="#a7506f" points="82,-24 13,-24 13,0 82,0 82,-24"/>
-<text text-anchor="middle" x="47.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="82,-66 13,-66 13,-42 82,-42 82,-66"/>
+<text text-anchor="middle" x="47.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
 <!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
-<g id="interface~~io_toupper~~CalledByGraph_edge4" class="edge">
+<g id="interface~~io_toupper~~CalledByGraph_edge3" class="edge">
 <title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.06,-12C97.76,-12 116.67,-12 133.5,-12"/>
-<polygon fill="#000000" stroke="#000000" points="133.66,-15.5 143.66,-12 133.66,-8.5 133.66,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.06,-54C97.76,-54 116.67,-54 133.5,-54"/>
+<polygon fill="#000000" stroke="#000000" points="133.66,-57.5 143.66,-54 133.66,-50.5 133.66,-57.5"/>
 </g>
 <!-- interface~io_param_reader -->
 <g id="interface~~io_toupper~~CalledByGraph_node5" class="node">
 <title>interface~io_param_reader</title>
 <g id="a_interface~~io_toupper~~CalledByGraph_node5"><a xlink:href=".././interface/io_param_reader.html" xlink:title="io_param_reader">
-<polygon fill="#a7506f" stroke="#a7506f" points="95,-66 0,-66 0,-42 95,-42 95,-66"/>
-<text text-anchor="middle" x="47.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="95,-24 0,-24 0,0 95,0 95,-24"/>
+<text text-anchor="middle" x="47.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </a>
 </g>
 </g>
 <!-- interface~io_param_reader&#45;&gt;proc~io_param_reader -->
-<g id="interface~~io_toupper~~CalledByGraph_edge3" class="edge">
+<g id="interface~~io_toupper~~CalledByGraph_edge4" class="edge">
 <title>interface~io_param_reader&#45;&gt;proc~io_param_reader</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M95.07,-54C103.48,-54 112.32,-54 120.97,-54"/>
-<polygon fill="#000000" stroke="#000000" points="121,-57.5 131,-54 121,-50.5 121,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M95.07,-12C103.48,-12 112.32,-12 120.97,-12"/>
+<polygon fill="#000000" stroke="#000000" points="121,-15.5 131,-12 121,-8.5 121,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/io_write_discard.html b/docs/interface/io_write_discard.html
index f6d56c8af..c4a10bd00 100644
--- a/docs/interface/io_write_discard.html
+++ b/docs/interface/io_write_discard.html
@@ -136,7 +136,7 @@ <h1>io_write_discard
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_write_encounter.html b/docs/interface/io_write_encounter.html
index cce7f0379..ee540690f 100644
--- a/docs/interface/io_write_encounter.html
+++ b/docs/interface/io_write_encounter.html
@@ -136,7 +136,7 @@ <h1>io_write_encounter
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_write_frame_body.html b/docs/interface/io_write_frame_body.html
index d3ca7d74f..9096f45da 100644
--- a/docs/interface/io_write_frame_body.html
+++ b/docs/interface/io_write_frame_body.html
@@ -136,7 +136,7 @@ <h1>io_write_frame_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_write_frame_cb.html b/docs/interface/io_write_frame_cb.html
index b760ba7aa..917f75b0b 100644
--- a/docs/interface/io_write_frame_cb.html
+++ b/docs/interface/io_write_frame_cb.html
@@ -136,7 +136,7 @@ <h1>io_write_frame_cb
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_write_frame_encounter.html b/docs/interface/io_write_frame_encounter.html
index 3581ea325..6ff752db8 100644
--- a/docs/interface/io_write_frame_encounter.html
+++ b/docs/interface/io_write_frame_encounter.html
@@ -136,7 +136,7 @@ <h1>io_write_frame_encounter
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_write_frame_system.html b/docs/interface/io_write_frame_system.html
index 54fc81f78..6a7ff157a 100644
--- a/docs/interface/io_write_frame_system.html
+++ b/docs/interface/io_write_frame_system.html
@@ -136,7 +136,7 @@ <h1>io_write_frame_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/io_write_hdr_system.html b/docs/interface/io_write_hdr_system.html
index 738c17d9b..f23678acc 100644
--- a/docs/interface/io_write_hdr_system.html
+++ b/docs/interface/io_write_hdr_system.html
@@ -136,7 +136,7 @@ <h1>io_write_hdr_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/kick_getacch_int_all_pl.html b/docs/interface/kick_getacch_int_all_pl.html
index 60909b22c..7ac48dfbd 100644
--- a/docs/interface/kick_getacch_int_all_pl.html
+++ b/docs/interface/kick_getacch_int_all_pl.html
@@ -136,7 +136,7 @@ <h1>kick_getacch_int_all_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -462,7 +462,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-npl~3"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-npl~5"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -477,7 +477,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-nplpl~2"></span>integer(kind=I8B),</td>
+  <td><span class="anchor" id="variable-nplpl~3"></span>integer(kind=I8B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -492,7 +492,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-k_plpl~3"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-k_plpl~4"></span>integer(kind=I4B),</td>
   <td>intent(in),</td>
   <td></td>
   
@@ -522,7 +522,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-gmass~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-gmass~4"></span>real(kind=DP),</td>
   <td>intent(in),</td>
   <td></td>
   
diff --git a/docs/interface/kick_getacch_int_all_tp.html b/docs/interface/kick_getacch_int_all_tp.html
new file mode 100644
index 000000000..b56a55d31
--- /dev/null
+++ b/docs/interface/kick_getacch_int_all_tp.html
@@ -0,0 +1,626 @@
+
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+   
+   <meta name="description" content="Swiftest - The Fastest Symplectic Massive Body Integrator in the West (someday, hopefully)">
+    
+    <meta name="author" content="David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott" >
+    <link rel="icon" href="../favicon.png">
+
+    <title>kick_getacch_int_all_tp &ndash; swiftest</title>
+
+    <link href="../css/bootstrap.min.css" rel="stylesheet">
+    <link href="../css/pygments.css" rel="stylesheet">
+    <link href="../css/font-awesome.min.css" rel="stylesheet">
+    <link href="../css/local.css" rel="stylesheet">
+    
+    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
+    
+    
+
+    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
+      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
+    <![endif]-->
+    
+    <script src="../js/jquery-2.1.3.min.js"></script>
+    <script src="../js/svg-pan-zoom.min.js"></script>
+
+  </head>
+
+  <body>
+
+    <!-- Fixed navbar -->
+    <nav class="navbar navbar-inverse navbar-fixed-top">
+      <div class="container">
+        <div class="navbar-header">
+          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
+            <span class="sr-only">Toggle navigation</span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+          </button>
+          <a class="navbar-brand" href="../index.html">swiftest </a>
+        </div>
+        <div id="navbar" class="navbar-collapse collapse">
+          <ul class="nav navbar-nav">
+        
+            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
+              <a href="#" class="dropdown-toggle"
+              data-toggle="dropdown" role="button"
+              aria-haspopup="true"
+     aria-expanded="false">Contents <span class="caret"></span></a>
+        <ul class="dropdown-menu">
+          
+              
+            <li><a href="../lists/files.html">Source Files</a></li>
+        
+        
+        
+            <li><a href="../lists/modules.html">Modules</a></li>
+        
+            
+                                
+            <li><a href="../lists/procedures.html">Procedures</a></li>
+        
+        
+            <li><a href="../lists/absint.html">Abstract Interfaces</a></li>
+               
+            <li><a href="../lists/types.html">Derived Types</a></li>
+        
+        
+            <li><a href="../program/swiftest_driver.html">Program</a></li>
+      
+            </ul>
+            </li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/absint.html">Abstract Interfaces</a></li>
+                             
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../program/swiftest_driver.html">Program</a></li>
+
+          </ul>
+        
+        <form action="../search.html" class="navbar-form navbar-right" role="search">
+        <div class="form-group">
+          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
+        </div>
+<!--
+        <button type="submit" class="btn btn-default">Submit</button>
+-->
+        </form>
+        
+        </div><!--/.nav-collapse -->
+      </div>
+    </nav>
+
+    <div class="container">
+    
+  
+  <div class="row">
+    <h1>kick_getacch_int_all_tp
+   <small>Interface</small>
+    
+    </h1>
+    
+    
+<div class="row">
+  <div class="col-lg-12">
+<div class="well well-sm">
+  <ul class="list-inline" style="margin-bottom:0px;display:inline">
+     
+     
+     
+     
+    
+    
+     <li><i class="fa fa-list-ol"></i>
+       <a data-toggle="tooltip"
+    data-placement="bottom" data-html="true"
+    title=" 0.7% of total for procedures.">489 statements</a>
+     </li> 
+     
+     
+     
+    <li><i class="fa fa-code"></i><a href="../src/swiftest_classes.f90"> Source File</a></li>
+     
+     
+  </ul>
+  <ol class="breadcrumb in-well text-right">
+  
+    
+     <li><a href='../sourcefile/swiftest_classes.f90.html'>swiftest_classes.f90</a></li>
+    
+     <li><a href='../module/swiftest_classes.html'>swiftest_classes</a></li>
+    
+  
+     <li class="active">kick_getacch_int_all_tp</li>
+  </ol>
+</div>
+</div>
+</div>
+<script>
+  $(function () {
+  $('[data-toggle="tooltip"]').tooltip()
+  })
+</script>
+
+    
+  </div>
+  
+  <div class="row">
+    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
+    
+<div id="sidebar">
+  
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+</div>
+
+    </div>
+    
+    <div class="col-md-9" id='text'>
+    
+    
+      <h2>interface</h2>
+      
+      <br>
+    
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Calls</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: interface~~kick_getacch_int_all_tp~~CallsGraph Pages: 1 -->
+<svg id="interfacekick_getacch_int_all_tpCallsGraph" width="290pt" height="32pt"
+ viewBox="0.00 0.00 290.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~kick_getacch_int_all_tp~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>interface~~kick_getacch_int_all_tp~~CallsGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 286,-28 286,4 -4,4"/>
+<!-- interface~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CallsGraph_node1" class="node">
+<title>interface~kick_getacch_int_all_tp</title>
+<polygon fill="none" stroke="black" points="123,-24 0,-24 0,0 123,0 123,-24"/>
+<text text-anchor="middle" x="61.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">kick_getacch_int_all_tp</text>
+</g>
+<!-- proc~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CallsGraph_node2" class="node">
+<title>proc~kick_getacch_int_all_tp</title>
+<g id="a_interface~~kick_getacch_int_all_tp~~CallsGraph_node2"><a xlink:href=".././proc/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="282,-24 159,-24 159,0 282,0 282,-24"/>
+<text text-anchor="middle" x="220.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CallsGraph_edge1" class="edge">
+<title>interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M123.2,-12C131.64,-12 140.36,-12 148.95,-12"/>
+<polygon fill="#000000" stroke="#000000" points="148.96,-15.5 158.96,-12 148.96,-8.5 148.96,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Called by</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: interface~~kick_getacch_int_all_tp~~CalledByGraph Pages: 1 -->
+<svg id="interfacekick_getacch_int_all_tpCalledByGraph" width="415pt" height="32pt"
+ viewBox="0.00 0.00 415.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~kick_getacch_int_all_tp~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>interface~~kick_getacch_int_all_tp~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 411,-28 411,4 -4,4"/>
+<!-- interface~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CalledByGraph_node1" class="node">
+<title>interface~kick_getacch_int_all_tp</title>
+<polygon fill="none" stroke="black" points="407,-24 284,-24 284,0 407,0 407,-24"/>
+<text text-anchor="middle" x="345.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">kick_getacch_int_all_tp</text>
+</g>
+<!-- proc~kick_getacch_int_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CalledByGraph_node2" class="node">
+<title>proc~kick_getacch_int_tp</title>
+<g id="a_interface~~kick_getacch_int_all_tp~~CalledByGraph_node2"><a xlink:href=".././proc/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="248,-24 142,-24 142,0 248,0 248,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
+</a>
+</g>
+</g>
+<!-- proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CalledByGraph_edge1" class="edge">
+<title>proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" d="M248.36,-12C256.64,-12 265.32,-12 273.94,-12"/>
+<polygon fill="#000000" stroke="#000000" points="273.99,-15.5 283.99,-12 273.99,-8.5 273.99,-15.5"/>
+</g>
+<!-- interface~kick_getacch_int_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CalledByGraph_node3" class="node">
+<title>interface~kick_getacch_int_tp</title>
+<g id="a_interface~~kick_getacch_int_all_tp~~CalledByGraph_node3"><a xlink:href=".././interface/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="106,-24 0,-24 0,0 106,0 106,-24"/>
+<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp -->
+<g id="interface~~kick_getacch_int_all_tp~~CalledByGraph_edge2" class="edge">
+<title>interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M106.13,-12C114.42,-12 123.07,-12 131.57,-12"/>
+<polygon fill="#000000" stroke="#000000" points="131.83,-15.5 141.83,-12 131.83,-8.5 131.83,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+    
+    <br>
+    
+      <h2>
+public module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc)
+    
+    
+   
+   <a href='../proc/kick_getacch_int_all_tp.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h2>
+    
+
+    
+  
+
+
+    <h3>Arguments</h3>
+    
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-ntp~2"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>ntp</strong></td><td><p>Number of test particles</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-npl~6"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>npl</strong></td><td><p>Number of massive bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-xtp"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xtp</strong></td><td><p>Test particle position vector array</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-xpl"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xpl</strong></td><td><p>Massive body particle position vector array</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-gmpl~3"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>GMpl</strong></td><td><p>Array of massive body G*mass</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-lmask~5"></span>logical,</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>lmask</strong></td><td><p>Logical mask indicating which test particles should be computed</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-acc~2"></span>real(kind=DP),</td>
+  <td>intent(inout),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>acc</strong></td><td><p>Acceleration vector array </p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+    
+    
+    
+    <br>
+
+ </div>
+</div>
+
+
+    <hr>    
+    </div> <!-- /container -->
+    <footer>
+      <div class="container">
+      <div class="row">
+        <div class="col-xs-6 col-md-4"><p>&copy; 2021 <a rel="license" href="http://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons License" style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a>
+                                          </p></div>
+        <div class="col-xs-6 col-md-4 col-md-push-4">
+          <p class="text-right">
+            Documentation generated by 
+            <a href="https://github.com/cmacmackin/ford">FORD</a>
+            
+          </p>
+        </div>
+        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> swiftest was developed by David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</p></div>
+      </div>
+      <br>
+      </div> <!-- /container -->    
+    </footer>
+
+    <!-- Bootstrap core JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+<!--
+    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
+-->
+    <script src="../js/bootstrap.min.js"></script>
+    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
+    <script src="../js/ie10-viewport-bug-workaround.js"></script>
+
+    <!-- MathJax JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+    <script type="text/x-mathjax-config">
+      MathJax.Hub.Config({
+        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
+        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
+        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js']
+      });
+    </script>
+    
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.1/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
+    
+    
+    <script src="../tipuesearch/tipuesearch_content.js"></script>
+    <script src="../tipuesearch/tipuesearch_set.js"></script>
+    <script src="../tipuesearch/tipuesearch.js"></script>
+    
+    
+  </body>
+</html>
\ No newline at end of file
diff --git a/docs/interface/kick_getacch_int_one_pl.html b/docs/interface/kick_getacch_int_one_pl.html
index 92f5d9ebb..cd0cd5c20 100644
--- a/docs/interface/kick_getacch_int_one_pl.html
+++ b/docs/interface/kick_getacch_int_one_pl.html
@@ -136,7 +136,7 @@ <h1>kick_getacch_int_one_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -361,7 +361,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-xr~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~4"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -376,7 +376,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-yr~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~4"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -391,7 +391,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-zr~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~4"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/kick_getacch_int_one_tp.html b/docs/interface/kick_getacch_int_one_tp.html
index 2267d9471..1a80e6923 100644
--- a/docs/interface/kick_getacch_int_one_tp.html
+++ b/docs/interface/kick_getacch_int_one_tp.html
@@ -136,7 +136,7 @@ <h1>kick_getacch_int_one_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -361,7 +361,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-xr~4"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~5"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -376,7 +376,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-yr~4"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~5"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -391,7 +391,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-zr~4"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~5"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/kick_getacch_int_pl.html b/docs/interface/kick_getacch_int_pl.html
index f305148ee..997719f5f 100644
--- a/docs/interface/kick_getacch_int_pl.html
+++ b/docs/interface/kick_getacch_int_pl.html
@@ -136,7 +136,7 @@ <h1>kick_getacch_int_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/kick_getacch_int_tp.html b/docs/interface/kick_getacch_int_tp.html
index 9d781ea49..ebcfb6e1e 100644
--- a/docs/interface/kick_getacch_int_tp.html
+++ b/docs/interface/kick_getacch_int_tp.html
@@ -136,7 +136,7 @@ <h1>kick_getacch_int_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~kick_getacch_int_tp~~CallsGraph Pages: 1 -->
-<svg id="interfacekick_getacch_int_tpCallsGraph" width="256pt" height="32pt"
- viewBox="0.00 0.00 256.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfacekick_getacch_int_tpCallsGraph" width="574pt" height="32pt"
+ viewBox="0.00 0.00 574.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~kick_getacch_int_tp~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>interface~~kick_getacch_int_tp~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 252,-28 252,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 570,-28 570,4 -4,4"/>
 <!-- interface~kick_getacch_int_tp -->
 <g id="interface~~kick_getacch_int_tp~~CallsGraph_node1" class="node">
 <title>interface~kick_getacch_int_tp</title>
@@ -246,6 +246,36 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M106.13,-12C114.42,-12 123.07,-12 131.57,-12"/>
 <polygon fill="#000000" stroke="#000000" points="131.83,-15.5 141.83,-12 131.83,-8.5 131.83,-15.5"/>
 </g>
+<!-- interface~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_tp~~CallsGraph_node3" class="node">
+<title>interface~kick_getacch_int_all_tp</title>
+<g id="a_interface~~kick_getacch_int_tp~~CallsGraph_node3"><a xlink:href=".././interface/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="407,-24 284,-24 284,0 407,0 407,-24"/>
+<text text-anchor="middle" x="345.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
+</a>
+</g>
+</g>
+<!-- proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_tp~~CallsGraph_edge2" class="edge">
+<title>proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" d="M248.36,-12C256.64,-12 265.32,-12 273.94,-12"/>
+<polygon fill="#000000" stroke="#000000" points="273.99,-15.5 283.99,-12 273.99,-8.5 273.99,-15.5"/>
+</g>
+<!-- proc~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_tp~~CallsGraph_node4" class="node">
+<title>proc~kick_getacch_int_all_tp</title>
+<g id="a_interface~~kick_getacch_int_tp~~CallsGraph_node4"><a xlink:href=".././proc/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="566,-24 443,-24 443,0 566,0 566,-24"/>
+<text text-anchor="middle" x="504.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp -->
+<g id="interface~~kick_getacch_int_tp~~CallsGraph_edge3" class="edge">
+<title>interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.2,-12C415.64,-12 424.36,-12 432.95,-12"/>
+<polygon fill="#000000" stroke="#000000" points="432.96,-15.5 442.96,-12 432.96,-8.5 432.96,-15.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
@@ -315,7 +345,7 @@ <h3 class="panel-title">Calls</h3>
     <br>
     
       <h2>
-public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
     
     
    
diff --git a/docs/interface/lambda_obj~2.html b/docs/interface/lambda_obj~2.html
index c410916a8..d7d3d73d5 100644
--- a/docs/interface/lambda_obj~2.html
+++ b/docs/interface/lambda_obj~2.html
@@ -239,18 +239,18 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="68,-66 0,-66 0,-42 68,-42 68,-66"/>
 <text text-anchor="middle" x="34" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">lambda_obj</text>
 </g>
-<!-- proc~lambda_init_0 -->
+<!-- proc~lambda_init_0_err -->
 <g id="interface~~lambda_obj~2~~CallsGraph_node2" class="node">
-<title>proc~lambda_init_0</title>
-<g id="a_interface~~lambda_obj~2~~CallsGraph_node2"><a xlink:href=".././proc/lambda_init_0.html" xlink:title="lambda_init_0">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="193,-108 114,-108 114,-84 193,-84 193,-108"/>
-<text text-anchor="middle" x="153.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0</text>
+<title>proc~lambda_init_0_err</title>
+<g id="a_interface~~lambda_obj~2~~CallsGraph_node2"><a xlink:href=".././proc/lambda_init_0_err.html" xlink:title="lambda_init_0_err">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="203,-108 104,-108 104,-84 203,-84 203,-108"/>
+<text text-anchor="middle" x="153.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0_err</text>
 </a>
 </g>
 </g>
-<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0 -->
+<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err -->
 <g id="interface~~lambda_obj~2~~CallsGraph_edge1" class="edge">
-<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0</title>
+<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M68.04,-65.81C80.82,-70.38 95.63,-75.67 109.24,-80.54"/>
 <polygon fill="#000000" stroke="#000000" points="108.29,-83.92 118.89,-83.99 110.65,-77.32 108.29,-83.92"/>
 </g>
@@ -269,18 +269,18 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M68.04,-54C77.31,-54 87.64,-54 97.8,-54"/>
 <polygon fill="#000000" stroke="#000000" points="97.87,-57.5 107.87,-54 97.87,-50.5 97.87,-57.5"/>
 </g>
-<!-- proc~lambda_init_0_err -->
+<!-- proc~lambda_init_0 -->
 <g id="interface~~lambda_obj~2~~CallsGraph_node4" class="node">
-<title>proc~lambda_init_0_err</title>
-<g id="a_interface~~lambda_obj~2~~CallsGraph_node4"><a xlink:href=".././proc/lambda_init_0_err.html" xlink:title="lambda_init_0_err">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="203,-24 104,-24 104,0 203,0 203,-24"/>
-<text text-anchor="middle" x="153.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0_err</text>
+<title>proc~lambda_init_0</title>
+<g id="a_interface~~lambda_obj~2~~CallsGraph_node4"><a xlink:href=".././proc/lambda_init_0.html" xlink:title="lambda_init_0">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="193,-24 114,-24 114,0 193,0 193,-24"/>
+<text text-anchor="middle" x="153.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0</text>
 </a>
 </g>
 </g>
-<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err -->
+<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0 -->
 <g id="interface~~lambda_obj~2~~CallsGraph_edge3" class="edge">
-<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err</title>
+<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M68.04,-42.19C80.82,-37.62 95.63,-32.33 109.24,-27.46"/>
 <polygon fill="#000000" stroke="#000000" points="110.65,-30.68 118.89,-24.01 108.29,-24.08 110.65,-30.68"/>
 </g>
diff --git a/docs/interface/netcdf_close.html b/docs/interface/netcdf_close.html
index ddc260b3d..384b7153f 100644
--- a/docs/interface/netcdf_close.html
+++ b/docs/interface/netcdf_close.html
@@ -136,7 +136,7 @@ <h1>netcdf_close
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/netcdf_initialize_output.html b/docs/interface/netcdf_initialize_output.html
index 893031263..a8c793cf3 100644
--- a/docs/interface/netcdf_initialize_output.html
+++ b/docs/interface/netcdf_initialize_output.html
@@ -136,7 +136,7 @@ <h1>netcdf_initialize_output
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,79 +220,103 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~netcdf_initialize_output~~CallsGraph Pages: 1 -->
-<svg id="interfacenetcdf_initialize_outputCallsGraph" width="400pt" height="158pt"
- viewBox="0.00 0.00 400.00 158.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~netcdf_initialize_output~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 154)">
+<svg id="interfacenetcdf_initialize_outputCallsGraph" width="437pt" height="242pt"
+ viewBox="0.00 0.00 437.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~netcdf_initialize_output~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
 <title>interface~~netcdf_initialize_output~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-154 396,-154 396,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 433,-238 433,4 -4,4"/>
 <!-- interface~netcdf_initialize_output -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_node1" class="node">
 <title>interface~netcdf_initialize_output</title>
-<polygon fill="none" stroke="black" points="121,-87 0,-87 0,-63 121,-63 121,-87"/>
-<text text-anchor="middle" x="60.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_initialize_output</text>
+<polygon fill="none" stroke="black" points="121,-129 0,-129 0,-105 121,-105 121,-129"/>
+<text text-anchor="middle" x="60.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_initialize_output</text>
 </g>
 <!-- proc~netcdf_initialize_output -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_node2" class="node">
 <title>proc~netcdf_initialize_output</title>
 <g id="a_interface~~netcdf_initialize_output~~CallsGraph_node2"><a xlink:href=".././proc/netcdf_initialize_output.html" xlink:title="netcdf_initialize_output">
-<polygon fill="#d9534f" stroke="#d9534f" points="278,-87 157,-87 157,-63 278,-63 278,-87"/>
-<text text-anchor="middle" x="217.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_initialize_output</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="278,-129 157,-129 157,-105 278,-105 278,-129"/>
+<text text-anchor="middle" x="217.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_initialize_output</text>
 </a>
 </g>
 </g>
 <!-- interface~netcdf_initialize_output&#45;&gt;proc~netcdf_initialize_output -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_edge1" class="edge">
 <title>interface~netcdf_initialize_output&#45;&gt;proc~netcdf_initialize_output</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M121.43,-75C129.72,-75 138.31,-75 146.76,-75"/>
-<polygon fill="#000000" stroke="#000000" points="146.99,-78.5 156.99,-75 146.99,-71.5 146.99,-78.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M121.43,-117C129.72,-117 138.31,-117 146.76,-117"/>
+<polygon fill="#000000" stroke="#000000" points="146.99,-120.5 156.99,-117 146.99,-113.5 146.99,-120.5"/>
 </g>
-<!-- nf90_create -->
+<!-- nf90_def_var -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_node3" class="node">
-<title>nf90_create</title>
-<polygon fill="#777777" stroke="#777777" points="388,-150 318,-150 318,-126 388,-126 388,-150"/>
-<text text-anchor="middle" x="353" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_create</text>
+<title>nf90_def_var</title>
+<polygon fill="#777777" stroke="#777777" points="409.5,-234 333.5,-234 333.5,-210 409.5,-210 409.5,-234"/>
+<text text-anchor="middle" x="371.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_create -->
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_edge2" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_create</title>
-<path fill="none" stroke="#000000" d="M244.24,-87.15C264.92,-96.91 294.19,-110.72 317,-121.48"/>
-<polygon fill="#000000" stroke="#000000" points="315.8,-124.79 326.34,-125.89 318.79,-118.46 315.8,-124.79"/>
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var</title>
+<path fill="none" stroke="#000000" d="M229.45,-129.13C246.16,-147 279.69,-180.5 314,-201 317.2,-202.91 320.6,-204.7 324.08,-206.35"/>
+<polygon fill="#000000" stroke="#000000" points="322.86,-209.64 333.43,-210.44 325.67,-203.23 322.86,-209.64"/>
 </g>
 <!-- nf90_def_dim -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_node4" class="node">
 <title>nf90_def_dim</title>
-<polygon fill="#777777" stroke="#777777" points="392,-108 314,-108 314,-84 392,-84 392,-108"/>
-<text text-anchor="middle" x="353" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_dim</text>
+<polygon fill="#777777" stroke="#777777" points="410.5,-192 332.5,-192 332.5,-168 410.5,-168 410.5,-192"/>
+<text text-anchor="middle" x="371.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_dim</text>
 </g>
 <!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_dim -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_edge3" class="edge">
 <title>proc~netcdf_initialize_output&#45;&gt;nf90_def_dim</title>
-<path fill="none" stroke="#000000" d="M278.22,-84.39C286.81,-85.75 295.55,-87.12 303.88,-88.43"/>
-<polygon fill="#000000" stroke="#000000" points="303.36,-91.89 313.79,-89.99 304.45,-84.98 303.36,-91.89"/>
+<path fill="none" stroke="#000000" d="M244.67,-129C263.76,-137.64 290.33,-149.41 314,-159 318.43,-160.8 323.09,-162.62 327.74,-164.41"/>
+<polygon fill="#000000" stroke="#000000" points="326.62,-167.73 337.21,-168 329.1,-161.18 326.62,-167.73"/>
 </g>
-<!-- nf90_set_fill -->
+<!-- nf90_create -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_node5" class="node">
-<title>nf90_set_fill</title>
-<polygon fill="#777777" stroke="#777777" points="388,-66 318,-66 318,-42 388,-42 388,-66"/>
-<text text-anchor="middle" x="353" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
+<title>nf90_create</title>
+<polygon fill="#777777" stroke="#777777" points="406.5,-150 336.5,-150 336.5,-126 406.5,-126 406.5,-150"/>
+<text text-anchor="middle" x="371.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_create</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_set_fill -->
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_create -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_edge4" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M278.22,-65.61C288.21,-64.03 298.42,-62.43 307.93,-60.93"/>
-<polygon fill="#000000" stroke="#000000" points="308.59,-64.37 317.93,-59.36 307.51,-57.46 308.59,-64.37"/>
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_create</title>
+<path fill="none" stroke="#000000" d="M278.14,-125.24C294.22,-127.46 311.33,-129.83 326.4,-131.91"/>
+<polygon fill="#000000" stroke="#000000" points="326.08,-135.4 336.46,-133.3 327.04,-128.46 326.08,-135.4"/>
 </g>
-<!-- nf90_def_var -->
+<!-- nf90_def_var_fill -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_node6" class="node">
-<title>nf90_def_var</title>
-<polygon fill="#777777" stroke="#777777" points="391,-24 315,-24 315,0 391,0 391,-24"/>
-<text text-anchor="middle" x="353" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var</text>
+<title>nf90_def_var_fill</title>
+<polygon fill="#777777" stroke="#777777" points="417,-108 326,-108 326,-84 417,-84 417,-108"/>
+<text text-anchor="middle" x="371.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var_fill</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var -->
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var_fill -->
 <g id="interface~~netcdf_initialize_output~~CallsGraph_edge5" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var</title>
-<path fill="none" stroke="#000000" d="M244.24,-62.85C264.92,-53.09 294.19,-39.28 317,-28.52"/>
-<polygon fill="#000000" stroke="#000000" points="318.79,-31.54 326.34,-24.11 315.8,-25.21 318.79,-31.54"/>
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var_fill</title>
+<path fill="none" stroke="#000000" d="M278.14,-108.76C290.48,-107.05 303.43,-105.27 315.6,-103.58"/>
+<polygon fill="#000000" stroke="#000000" points="316.18,-107.04 325.61,-102.2 315.22,-100.1 316.18,-107.04"/>
+</g>
+<!-- nf90_inquire -->
+<g id="interface~~netcdf_initialize_output~~CallsGraph_node7" class="node">
+<title>nf90_inquire</title>
+<polygon fill="#777777" stroke="#777777" points="407.5,-66 335.5,-66 335.5,-42 407.5,-42 407.5,-66"/>
+<text text-anchor="middle" x="371.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inquire</text>
+</g>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_inquire -->
+<g id="interface~~netcdf_initialize_output~~CallsGraph_edge6" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_inquire</title>
+<path fill="none" stroke="#000000" d="M244.67,-105C263.76,-96.36 290.33,-84.59 314,-75 318.43,-73.2 323.09,-71.38 327.74,-69.59"/>
+<polygon fill="#000000" stroke="#000000" points="329.1,-72.82 337.21,-66 326.62,-66.27 329.1,-72.82"/>
+</g>
+<!-- nf90_inquire_variable -->
+<g id="interface~~netcdf_initialize_output~~CallsGraph_node8" class="node">
+<title>nf90_inquire_variable</title>
+<polygon fill="#777777" stroke="#777777" points="429,-24 314,-24 314,0 429,0 429,-24"/>
+<text text-anchor="middle" x="371.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inquire_variable</text>
+</g>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_inquire_variable -->
+<g id="interface~~netcdf_initialize_output~~CallsGraph_edge7" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_inquire_variable</title>
+<path fill="none" stroke="#000000" d="M229.45,-104.87C246.16,-87 279.69,-53.5 314,-33 316.83,-31.31 319.82,-29.72 322.88,-28.22"/>
+<polygon fill="#000000" stroke="#000000" points="324.53,-31.32 332.23,-24.04 321.67,-24.93 324.53,-31.32"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/netcdf_open.html b/docs/interface/netcdf_open.html
index a44165c61..fad0ba492 100644
--- a/docs/interface/netcdf_open.html
+++ b/docs/interface/netcdf_open.html
@@ -136,7 +136,7 @@ <h1>netcdf_open
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,67 +220,55 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~netcdf_open~~CallsGraph Pages: 1 -->
-<svg id="interfacenetcdf_openCallsGraph" width="307pt" height="116pt"
- viewBox="0.00 0.00 307.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~netcdf_open~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="interfacenetcdf_openCallsGraph" width="307pt" height="74pt"
+ viewBox="0.00 0.00 307.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~netcdf_open~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>interface~~netcdf_open~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 303,-112 303,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 303,-70 303,4 -4,4"/>
 <!-- interface~netcdf_open -->
 <g id="interface~~netcdf_open~~CallsGraph_node1" class="node">
 <title>interface~netcdf_open</title>
-<polygon fill="none" stroke="black" points="72,-66 0,-66 0,-42 72,-42 72,-66"/>
-<text text-anchor="middle" x="36" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_open</text>
+<polygon fill="none" stroke="black" points="72,-45 0,-45 0,-21 72,-21 72,-45"/>
+<text text-anchor="middle" x="36" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_open</text>
 </g>
 <!-- proc~netcdf_open -->
 <g id="interface~~netcdf_open~~CallsGraph_node2" class="node">
 <title>proc~netcdf_open</title>
 <g id="a_interface~~netcdf_open~~CallsGraph_node2"><a xlink:href=".././proc/netcdf_open.html" xlink:title="netcdf_open">
-<polygon fill="#d9534f" stroke="#d9534f" points="180,-66 108,-66 108,-42 180,-42 180,-66"/>
-<text text-anchor="middle" x="144" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_open</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="180,-45 108,-45 108,-21 180,-21 180,-45"/>
+<text text-anchor="middle" x="144" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_open</text>
 </a>
 </g>
 </g>
 <!-- interface~netcdf_open&#45;&gt;proc~netcdf_open -->
 <g id="interface~~netcdf_open~~CallsGraph_edge1" class="edge">
 <title>interface~netcdf_open&#45;&gt;proc~netcdf_open</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M72,-54C80.15,-54 88.94,-54 97.46,-54"/>
-<polygon fill="#000000" stroke="#000000" points="97.67,-57.5 107.67,-54 97.67,-50.5 97.67,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M72,-33C80.15,-33 88.94,-33 97.46,-33"/>
+<polygon fill="#000000" stroke="#000000" points="97.67,-36.5 107.67,-33 97.67,-29.5 97.67,-36.5"/>
 </g>
 <!-- nf90_inq_varid -->
 <g id="interface~~netcdf_open~~CallsGraph_node3" class="node">
 <title>nf90_inq_varid</title>
-<polygon fill="#777777" stroke="#777777" points="299,-108 216,-108 216,-84 299,-84 299,-108"/>
-<text text-anchor="middle" x="257.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inq_varid</text>
+<polygon fill="#777777" stroke="#777777" points="299,-66 216,-66 216,-42 299,-42 299,-66"/>
+<text text-anchor="middle" x="257.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inq_varid</text>
 </g>
 <!-- proc~netcdf_open&#45;&gt;nf90_inq_varid -->
 <g id="interface~~netcdf_open~~CallsGraph_edge2" class="edge">
 <title>proc~netcdf_open&#45;&gt;nf90_inq_varid</title>
-<path fill="none" stroke="#000000" d="M176.95,-66.04C188.85,-70.52 202.53,-75.67 215.15,-80.42"/>
-<polygon fill="#000000" stroke="#000000" points="213.95,-83.71 224.54,-83.96 216.42,-77.16 213.95,-83.71"/>
-</g>
-<!-- nf90_set_fill -->
-<g id="interface~~netcdf_open~~CallsGraph_node4" class="node">
-<title>nf90_set_fill</title>
-<polygon fill="#777777" stroke="#777777" points="292.5,-66 222.5,-66 222.5,-42 292.5,-42 292.5,-66"/>
-<text text-anchor="middle" x="257.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
-</g>
-<!-- proc~netcdf_open&#45;&gt;nf90_set_fill -->
-<g id="interface~~netcdf_open~~CallsGraph_edge3" class="edge">
-<title>proc~netcdf_open&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M180.28,-54C190.33,-54 201.41,-54 211.93,-54"/>
-<polygon fill="#000000" stroke="#000000" points="212.21,-57.5 222.21,-54 212.21,-50.5 212.21,-57.5"/>
+<path fill="none" stroke="#000000" d="M180.28,-39.64C188.35,-41.16 197.09,-42.81 205.66,-44.43"/>
+<polygon fill="#000000" stroke="#000000" points="205.14,-47.89 215.61,-46.3 206.44,-41.01 205.14,-47.89"/>
 </g>
 <!-- nf90_open -->
-<g id="interface~~netcdf_open~~CallsGraph_node5" class="node">
+<g id="interface~~netcdf_open~~CallsGraph_node4" class="node">
 <title>nf90_open</title>
 <polygon fill="#777777" stroke="#777777" points="289.5,-24 225.5,-24 225.5,0 289.5,0 289.5,-24"/>
 <text text-anchor="middle" x="257.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_open</text>
 </g>
 <!-- proc~netcdf_open&#45;&gt;nf90_open -->
-<g id="interface~~netcdf_open~~CallsGraph_edge4" class="edge">
+<g id="interface~~netcdf_open~~CallsGraph_edge3" class="edge">
 <title>proc~netcdf_open&#45;&gt;nf90_open</title>
-<path fill="none" stroke="#000000" d="M176.95,-41.96C189.05,-37.41 203,-32.15 215.8,-27.33"/>
-<polygon fill="#000000" stroke="#000000" points="217.19,-30.55 225.31,-23.75 214.72,-24 217.19,-30.55"/>
+<path fill="none" stroke="#000000" d="M180.28,-26.36C191.43,-24.26 203.85,-21.92 215.38,-19.75"/>
+<polygon fill="#000000" stroke="#000000" points="216.04,-23.18 225.22,-17.89 214.74,-16.3 216.04,-23.18"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/netcdf_write_frame_base.html b/docs/interface/netcdf_write_frame_base.html
index a5d9a9f56..4174eb3bd 100644
--- a/docs/interface/netcdf_write_frame_base.html
+++ b/docs/interface/netcdf_write_frame_base.html
@@ -136,7 +136,7 @@ <h1>netcdf_write_frame_base
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,58 +220,70 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~netcdf_write_frame_base~~CallsGraph Pages: 1 -->
-<svg id="interfacenetcdf_write_frame_baseCallsGraph" width="422pt" height="74pt"
- viewBox="0.00 0.00 422.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~netcdf_write_frame_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="interfacenetcdf_write_frame_baseCallsGraph" width="422pt" height="116pt"
+ viewBox="0.00 0.00 422.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~netcdf_write_frame_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>interface~~netcdf_write_frame_base~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 418,-70 418,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 418,-112 418,4 -4,4"/>
 <!-- interface~netcdf_write_frame_base -->
 <g id="interface~~netcdf_write_frame_base~~CallsGraph_node1" class="node">
 <title>interface~netcdf_write_frame_base</title>
-<polygon fill="none" stroke="black" points="133,-45 0,-45 0,-21 133,-21 133,-45"/>
-<text text-anchor="middle" x="66.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_frame_base</text>
+<polygon fill="none" stroke="black" points="133,-66 0,-66 0,-42 133,-42 133,-66"/>
+<text text-anchor="middle" x="66.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_frame_base</text>
 </g>
 <!-- proc~netcdf_write_frame_base -->
 <g id="interface~~netcdf_write_frame_base~~CallsGraph_node2" class="node">
 <title>proc~netcdf_write_frame_base</title>
 <g id="a_interface~~netcdf_write_frame_base~~CallsGraph_node2"><a xlink:href=".././proc/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="302,-45 169,-45 169,-21 302,-21 302,-45"/>
-<text text-anchor="middle" x="235.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="302,-66 169,-66 169,-42 302,-42 302,-66"/>
+<text text-anchor="middle" x="235.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
 </a>
 </g>
 </g>
 <!-- interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base -->
 <g id="interface~~netcdf_write_frame_base~~CallsGraph_edge1" class="edge">
 <title>interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M133.02,-33C141.5,-33 150.23,-33 158.85,-33"/>
-<polygon fill="#000000" stroke="#000000" points="158.89,-36.5 168.89,-33 158.89,-29.5 158.89,-36.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M133.02,-54C141.5,-54 150.23,-54 158.85,-54"/>
+<polygon fill="#000000" stroke="#000000" points="158.89,-57.5 168.89,-54 158.89,-50.5 158.89,-57.5"/>
 </g>
-<!-- interface~util_sort -->
+<!-- nf90_set_fill -->
 <g id="interface~~netcdf_write_frame_base~~CallsGraph_node3" class="node">
-<title>interface~util_sort</title>
-<g id="a_interface~~netcdf_write_frame_base~~CallsGraph_node3"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
-<polygon fill="#a7506f" stroke="#a7506f" points="403,-66 349,-66 349,-42 403,-42 403,-66"/>
-<text text-anchor="middle" x="376" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
-</a>
-</g>
+<title>nf90_set_fill</title>
+<polygon fill="#777777" stroke="#777777" points="411,-108 341,-108 341,-84 411,-84 411,-108"/>
+<text text-anchor="middle" x="376" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
 </g>
-<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
+<!-- proc~netcdf_write_frame_base&#45;&gt;nf90_set_fill -->
 <g id="interface~~netcdf_write_frame_base~~CallsGraph_edge2" class="edge">
-<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M302.1,-42.95C314.6,-44.84 327.27,-46.76 338.45,-48.46"/>
-<polygon fill="#000000" stroke="#000000" points="338.26,-51.97 348.67,-50.01 339.31,-45.05 338.26,-51.97"/>
+<title>proc~netcdf_write_frame_base&#45;&gt;nf90_set_fill</title>
+<path fill="none" stroke="#000000" d="M276.19,-66.04C293.29,-71.22 313.36,-77.31 330.93,-82.64"/>
+<polygon fill="#000000" stroke="#000000" points="330.36,-86.12 340.94,-85.67 332.39,-79.42 330.36,-86.12"/>
 </g>
 <!-- nf90_put_var -->
 <g id="interface~~netcdf_write_frame_base~~CallsGraph_node4" class="node">
 <title>nf90_put_var</title>
-<polygon fill="#777777" stroke="#777777" points="414,-24 338,-24 338,0 414,0 414,-24"/>
-<text text-anchor="middle" x="376" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
+<polygon fill="#777777" stroke="#777777" points="414,-66 338,-66 338,-42 414,-42 414,-66"/>
+<text text-anchor="middle" x="376" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
 </g>
 <!-- proc~netcdf_write_frame_base&#45;&gt;nf90_put_var -->
 <g id="interface~~netcdf_write_frame_base~~CallsGraph_edge3" class="edge">
 <title>proc~netcdf_write_frame_base&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M302.1,-23.05C310.85,-21.73 319.67,-20.39 328.02,-19.12"/>
-<polygon fill="#000000" stroke="#000000" points="328.56,-22.58 337.92,-17.62 327.51,-15.66 328.56,-22.58"/>
+<path fill="none" stroke="#000000" d="M302.1,-54C310.75,-54 319.48,-54 327.74,-54"/>
+<polygon fill="#000000" stroke="#000000" points="327.92,-57.5 337.92,-54 327.92,-50.5 327.92,-57.5"/>
+</g>
+<!-- interface~util_sort -->
+<g id="interface~~netcdf_write_frame_base~~CallsGraph_node5" class="node">
+<title>interface~util_sort</title>
+<g id="a_interface~~netcdf_write_frame_base~~CallsGraph_node5"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
+<polygon fill="#a7506f" stroke="#a7506f" points="403,-24 349,-24 349,0 403,0 403,-24"/>
+<text text-anchor="middle" x="376" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
+</a>
+</g>
+</g>
+<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
+<g id="interface~~netcdf_write_frame_base~~CallsGraph_edge4" class="edge">
+<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M276.19,-41.96C296.06,-35.94 319.94,-28.7 339.24,-22.84"/>
+<polygon fill="#000000" stroke="#000000" points="340.32,-26.17 348.88,-19.92 338.29,-19.47 340.32,-26.17"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/netcdf_write_frame_system.html b/docs/interface/netcdf_write_frame_system.html
index 5f11c9067..5996462ca 100644
--- a/docs/interface/netcdf_write_frame_system.html
+++ b/docs/interface/netcdf_write_frame_system.html
@@ -136,7 +136,7 @@ <h1>netcdf_write_frame_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/netcdf_write_hdr_system.html b/docs/interface/netcdf_write_hdr_system.html
index 152733820..7bb766b5a 100644
--- a/docs/interface/netcdf_write_hdr_system.html
+++ b/docs/interface/netcdf_write_hdr_system.html
@@ -136,7 +136,7 @@ <h1>netcdf_write_hdr_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,46 +220,34 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~netcdf_write_hdr_system~~CallsGraph Pages: 1 -->
-<svg id="interfacenetcdf_write_hdr_systemCallsGraph" width="420pt" height="116pt"
- viewBox="0.00 0.00 420.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~netcdf_write_hdr_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="interfacenetcdf_write_hdr_systemCallsGraph" width="420pt" height="74pt"
+ viewBox="0.00 0.00 420.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~netcdf_write_hdr_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>interface~~netcdf_write_hdr_system~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 416,-112 416,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 416,-70 416,4 -4,4"/>
 <!-- interface~netcdf_write_hdr_system -->
 <g id="interface~~netcdf_write_hdr_system~~CallsGraph_node1" class="node">
 <title>interface~netcdf_write_hdr_system</title>
-<polygon fill="none" stroke="black" points="132,-66 0,-66 0,-42 132,-42 132,-66"/>
-<text text-anchor="middle" x="66" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_hdr_system</text>
+<polygon fill="none" stroke="black" points="132,-45 0,-45 0,-21 132,-21 132,-45"/>
+<text text-anchor="middle" x="66" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_hdr_system</text>
 </g>
 <!-- proc~netcdf_write_hdr_system -->
 <g id="interface~~netcdf_write_hdr_system~~CallsGraph_node2" class="node">
 <title>proc~netcdf_write_hdr_system</title>
 <g id="a_interface~~netcdf_write_hdr_system~~CallsGraph_node2"><a xlink:href=".././proc/netcdf_write_hdr_system.html" xlink:title="netcdf_write_hdr_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="300,-66 168,-66 168,-42 300,-42 300,-66"/>
-<text text-anchor="middle" x="234" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_hdr_system</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="300,-45 168,-45 168,-21 300,-21 300,-45"/>
+<text text-anchor="middle" x="234" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_hdr_system</text>
 </a>
 </g>
 </g>
 <!-- interface~netcdf_write_hdr_system&#45;&gt;proc~netcdf_write_hdr_system -->
 <g id="interface~~netcdf_write_hdr_system~~CallsGraph_edge1" class="edge">
 <title>interface~netcdf_write_hdr_system&#45;&gt;proc~netcdf_write_hdr_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.13,-54C140.46,-54 149.04,-54 157.52,-54"/>
-<polygon fill="#000000" stroke="#000000" points="157.78,-57.5 167.78,-54 157.78,-50.5 157.78,-57.5"/>
-</g>
-<!-- nf90_set_fill -->
-<g id="interface~~netcdf_write_hdr_system~~CallsGraph_node3" class="node">
-<title>nf90_set_fill</title>
-<polygon fill="#777777" stroke="#777777" points="409,-108 339,-108 339,-84 409,-84 409,-108"/>
-<text text-anchor="middle" x="374" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
-</g>
-<!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_set_fill -->
-<g id="interface~~netcdf_write_hdr_system~~CallsGraph_edge3" class="edge">
-<title>proc~netcdf_write_hdr_system&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M274.55,-66.04C291.46,-71.18 311.27,-77.21 328.68,-82.51"/>
-<polygon fill="#000000" stroke="#000000" points="328.02,-85.97 338.61,-85.53 330.06,-79.27 328.02,-85.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.13,-33C140.46,-33 149.04,-33 157.52,-33"/>
+<polygon fill="#000000" stroke="#000000" points="157.78,-36.5 167.78,-33 157.78,-29.5 157.78,-36.5"/>
 </g>
 <!-- nf90_put_var -->
-<g id="interface~~netcdf_write_hdr_system~~CallsGraph_node4" class="node">
+<g id="interface~~netcdf_write_hdr_system~~CallsGraph_node3" class="node">
 <title>nf90_put_var</title>
 <polygon fill="#777777" stroke="#777777" points="412,-66 336,-66 336,-42 412,-42 412,-66"/>
 <text text-anchor="middle" x="374" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
@@ -267,20 +255,20 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var -->
 <g id="interface~~netcdf_write_hdr_system~~CallsGraph_edge2" class="edge">
 <title>proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M300.36,-54C308.89,-54 317.48,-54 325.63,-54"/>
-<polygon fill="#000000" stroke="#000000" points="325.68,-57.5 335.68,-54 325.68,-50.5 325.68,-57.5"/>
+<path fill="none" stroke="#000000" d="M300.36,-42.95C308.89,-44.24 317.48,-45.55 325.63,-46.79"/>
+<polygon fill="#000000" stroke="#000000" points="325.26,-50.28 335.68,-48.32 326.32,-43.36 325.26,-50.28"/>
 </g>
 <!-- nf90_open -->
-<g id="interface~~netcdf_write_hdr_system~~CallsGraph_node5" class="node">
+<g id="interface~~netcdf_write_hdr_system~~CallsGraph_node4" class="node">
 <title>nf90_open</title>
 <polygon fill="#777777" stroke="#777777" points="406,-24 342,-24 342,0 406,0 406,-24"/>
 <text text-anchor="middle" x="374" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_open</text>
 </g>
 <!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_open -->
-<g id="interface~~netcdf_write_hdr_system~~CallsGraph_edge4" class="edge">
+<g id="interface~~netcdf_write_hdr_system~~CallsGraph_edge3" class="edge">
 <title>proc~netcdf_write_hdr_system&#45;&gt;nf90_open</title>
-<path fill="none" stroke="#000000" d="M274.55,-41.96C292.56,-36.48 313.86,-30 332.04,-24.47"/>
-<polygon fill="#000000" stroke="#000000" points="333.23,-27.76 341.77,-21.5 331.19,-21.07 333.23,-27.76"/>
+<path fill="none" stroke="#000000" d="M300.36,-23.05C311.12,-21.42 321.99,-19.76 331.93,-18.25"/>
+<polygon fill="#000000" stroke="#000000" points="332.55,-21.7 341.91,-16.73 331.5,-14.78 332.55,-21.7"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/netcdf_write_particle_info_base.html b/docs/interface/netcdf_write_particle_info_base.html
index 8cce56e81..6f4ccba44 100644
--- a/docs/interface/netcdf_write_particle_info_base.html
+++ b/docs/interface/netcdf_write_particle_info_base.html
@@ -136,7 +136,7 @@ <h1>netcdf_write_particle_info_base
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,58 +220,70 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~netcdf_write_particle_info_base~~CallsGraph Pages: 1 -->
-<svg id="interfacenetcdf_write_particle_info_baseCallsGraph" width="482pt" height="74pt"
- viewBox="0.00 0.00 482.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~netcdf_write_particle_info_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="interfacenetcdf_write_particle_info_baseCallsGraph" width="482pt" height="116pt"
+ viewBox="0.00 0.00 482.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~netcdf_write_particle_info_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>interface~~netcdf_write_particle_info_base~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 478,-70 478,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 478,-112 478,4 -4,4"/>
 <!-- interface~netcdf_write_particle_info_base -->
 <g id="interface~~netcdf_write_particle_info_base~~CallsGraph_node1" class="node">
 <title>interface~netcdf_write_particle_info_base</title>
-<polygon fill="none" stroke="black" points="163,-45 0,-45 0,-21 163,-21 163,-45"/>
-<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_particle_info_base</text>
+<polygon fill="none" stroke="black" points="163,-66 0,-66 0,-42 163,-42 163,-66"/>
+<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_particle_info_base</text>
 </g>
 <!-- proc~netcdf_write_particle_info_base -->
 <g id="interface~~netcdf_write_particle_info_base~~CallsGraph_node2" class="node">
 <title>proc~netcdf_write_particle_info_base</title>
 <g id="a_interface~~netcdf_write_particle_info_base~~CallsGraph_node2"><a xlink:href=".././proc/netcdf_write_particle_info_base.html" xlink:title="netcdf_write_particle_info_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="362,-45 199,-45 199,-21 362,-21 362,-45"/>
-<text text-anchor="middle" x="280.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_particle_info_base</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="362,-66 199,-66 199,-42 362,-42 362,-66"/>
+<text text-anchor="middle" x="280.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_particle_info_base</text>
 </a>
 </g>
 </g>
 <!-- interface~netcdf_write_particle_info_base&#45;&gt;proc~netcdf_write_particle_info_base -->
 <g id="interface~~netcdf_write_particle_info_base~~CallsGraph_edge1" class="edge">
 <title>interface~netcdf_write_particle_info_base&#45;&gt;proc~netcdf_write_particle_info_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.2,-33C171.67,-33 180.33,-33 188.91,-33"/>
-<polygon fill="#000000" stroke="#000000" points="188.93,-36.5 198.93,-33 188.93,-29.5 188.93,-36.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.2,-54C171.67,-54 180.33,-54 188.91,-54"/>
+<polygon fill="#000000" stroke="#000000" points="188.93,-57.5 198.93,-54 188.93,-50.5 188.93,-57.5"/>
 </g>
-<!-- interface~util_sort -->
+<!-- nf90_set_fill -->
 <g id="interface~~netcdf_write_particle_info_base~~CallsGraph_node3" class="node">
-<title>interface~util_sort</title>
-<g id="a_interface~~netcdf_write_particle_info_base~~CallsGraph_node3"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
-<polygon fill="#a7506f" stroke="#a7506f" points="463,-66 409,-66 409,-42 463,-42 463,-66"/>
-<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
-</a>
-</g>
+<title>nf90_set_fill</title>
+<polygon fill="#777777" stroke="#777777" points="471,-108 401,-108 401,-84 471,-84 471,-108"/>
+<text text-anchor="middle" x="436" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
 </g>
-<!-- proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort -->
+<!-- proc~netcdf_write_particle_info_base&#45;&gt;nf90_set_fill -->
 <g id="interface~~netcdf_write_particle_info_base~~CallsGraph_edge2" class="edge">
-<title>proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M362.3,-44.05C375.1,-45.81 387.76,-47.54 398.84,-49.05"/>
-<polygon fill="#000000" stroke="#000000" points="398.54,-52.54 408.92,-50.43 399.49,-45.61 398.54,-52.54"/>
+<title>proc~netcdf_write_particle_info_base&#45;&gt;nf90_set_fill</title>
+<path fill="none" stroke="#000000" d="M325.49,-66.04C346.04,-71.66 370.46,-78.34 391.01,-83.97"/>
+<polygon fill="#000000" stroke="#000000" points="390.19,-87.37 400.76,-86.63 392.04,-80.62 390.19,-87.37"/>
 </g>
 <!-- nf90_put_var -->
 <g id="interface~~netcdf_write_particle_info_base~~CallsGraph_node4" class="node">
 <title>nf90_put_var</title>
-<polygon fill="#777777" stroke="#777777" points="474,-24 398,-24 398,0 474,0 474,-24"/>
-<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
+<polygon fill="#777777" stroke="#777777" points="474,-66 398,-66 398,-42 474,-42 474,-66"/>
+<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
 </g>
 <!-- proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var -->
 <g id="interface~~netcdf_write_particle_info_base~~CallsGraph_edge3" class="edge">
 <title>proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M362.3,-21.95C371.03,-20.75 379.7,-19.57 387.84,-18.45"/>
-<polygon fill="#000000" stroke="#000000" points="388.4,-21.91 397.83,-17.08 387.45,-14.97 388.4,-21.91"/>
+<path fill="none" stroke="#000000" d="M362.3,-54C370.93,-54 379.5,-54 387.56,-54"/>
+<polygon fill="#000000" stroke="#000000" points="387.83,-57.5 397.83,-54 387.83,-50.5 387.83,-57.5"/>
+</g>
+<!-- interface~util_sort -->
+<g id="interface~~netcdf_write_particle_info_base~~CallsGraph_node5" class="node">
+<title>interface~util_sort</title>
+<g id="a_interface~~netcdf_write_particle_info_base~~CallsGraph_node5"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
+<polygon fill="#a7506f" stroke="#a7506f" points="463,-24 409,-24 409,0 463,0 463,-24"/>
+<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
+</a>
+</g>
+</g>
+<!-- proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort -->
+<g id="interface~~netcdf_write_particle_info_base~~CallsGraph_edge4" class="edge">
+<title>proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M325.49,-41.96C348.74,-35.6 376.92,-27.89 398.88,-21.88"/>
+<polygon fill="#000000" stroke="#000000" points="400.08,-25.18 408.8,-19.17 398.23,-18.43 400.08,-25.18"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/obl_acc_body.html b/docs/interface/obl_acc_body.html
index c84ffb04b..32c81e129 100644
--- a/docs/interface/obl_acc_body.html
+++ b/docs/interface/obl_acc_body.html
@@ -136,7 +136,7 @@ <h1>obl_acc_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -333,33 +333,33 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="279,-45 200,-45 200,-21 279,-21 279,-45"/>
 <text text-anchor="middle" x="239.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">obl_acc_body</text>
 </g>
-<!-- proc~obl_acc_tp -->
+<!-- proc~obl_acc_pl -->
 <g id="interface~~obl_acc_body~~CalledByGraph_node2" class="node">
-<title>proc~obl_acc_tp</title>
-<g id="a_interface~~obl_acc_body~~CalledByGraph_node2"><a xlink:href=".././proc/obl_acc_tp.html" xlink:title="obl_acc_tp">
+<title>proc~obl_acc_pl</title>
+<g id="a_interface~~obl_acc_body~~CalledByGraph_node2"><a xlink:href=".././proc/obl_acc_pl.html" xlink:title="obl_acc_pl">
 <polygon fill="#d9534f" stroke="#d9534f" points="164,-66 100,-66 100,-42 164,-42 164,-66"/>
-<text text-anchor="middle" x="132" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
+<text text-anchor="middle" x="132" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~obl_acc_tp&#45;&gt;interface~obl_acc_body -->
+<!-- proc~obl_acc_pl&#45;&gt;interface~obl_acc_body -->
 <g id="interface~~obl_acc_body~~CalledByGraph_edge1" class="edge">
-<title>proc~obl_acc_tp&#45;&gt;interface~obl_acc_body</title>
+<title>proc~obl_acc_pl&#45;&gt;interface~obl_acc_body</title>
 <path fill="none" stroke="#000000" d="M164.08,-47.81C172.21,-46.2 181.16,-44.41 189.96,-42.66"/>
 <polygon fill="#000000" stroke="#000000" points="190.65,-46.09 199.78,-40.71 189.29,-39.23 190.65,-46.09"/>
 </g>
-<!-- proc~obl_acc_pl -->
+<!-- proc~obl_acc_tp -->
 <g id="interface~~obl_acc_body~~CalledByGraph_node3" class="node">
-<title>proc~obl_acc_pl</title>
-<g id="a_interface~~obl_acc_body~~CalledByGraph_node3"><a xlink:href=".././proc/obl_acc_pl.html" xlink:title="obl_acc_pl">
+<title>proc~obl_acc_tp</title>
+<g id="a_interface~~obl_acc_body~~CalledByGraph_node3"><a xlink:href=".././proc/obl_acc_tp.html" xlink:title="obl_acc_tp">
 <polygon fill="#d9534f" stroke="#d9534f" points="164,-24 100,-24 100,0 164,0 164,-24"/>
-<text text-anchor="middle" x="132" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
+<text text-anchor="middle" x="132" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~obl_acc_pl&#45;&gt;interface~obl_acc_body -->
+<!-- proc~obl_acc_tp&#45;&gt;interface~obl_acc_body -->
 <g id="interface~~obl_acc_body~~CalledByGraph_edge2" class="edge">
-<title>proc~obl_acc_pl&#45;&gt;interface~obl_acc_body</title>
+<title>proc~obl_acc_tp&#45;&gt;interface~obl_acc_body</title>
 <path fill="none" stroke="#000000" d="M164.08,-18.19C172.21,-19.8 181.16,-21.59 189.96,-23.34"/>
 <polygon fill="#000000" stroke="#000000" points="189.29,-26.77 199.78,-25.29 190.65,-19.91 189.29,-26.77"/>
 </g>
@@ -367,31 +367,31 @@ <h3 class="panel-title">Called by</h3>
 <g id="interface~~obl_acc_body~~CalledByGraph_node4" class="node">
 <title>interface~obl_acc_tp</title>
 <g id="a_interface~~obl_acc_body~~CalledByGraph_node4"><a xlink:href=".././interface/obl_acc_tp.html" xlink:title="obl_acc_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="64,-66 0,-66 0,-42 64,-42 64,-66"/>
-<text text-anchor="middle" x="32" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp -->
-<g id="interface~~obl_acc_body~~CalledByGraph_edge3" class="edge">
+<g id="interface~~obl_acc_body~~CalledByGraph_edge4" class="edge">
 <title>interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-54C72.14,-54 81.04,-54 89.62,-54"/>
-<polygon fill="#000000" stroke="#000000" points="89.86,-57.5 99.86,-54 89.86,-50.5 89.86,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-12C72.14,-12 81.04,-12 89.62,-12"/>
+<polygon fill="#000000" stroke="#000000" points="89.86,-15.5 99.86,-12 89.86,-8.5 89.86,-15.5"/>
 </g>
 <!-- interface~obl_acc_pl -->
 <g id="interface~~obl_acc_body~~CalledByGraph_node5" class="node">
 <title>interface~obl_acc_pl</title>
 <g id="a_interface~~obl_acc_body~~CalledByGraph_node5"><a xlink:href=".././interface/obl_acc_pl.html" xlink:title="obl_acc_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
-<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="64,-66 0,-66 0,-42 64,-42 64,-66"/>
+<text text-anchor="middle" x="32" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl -->
-<g id="interface~~obl_acc_body~~CalledByGraph_edge4" class="edge">
+<g id="interface~~obl_acc_body~~CalledByGraph_edge3" class="edge">
 <title>interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-12C72.14,-12 81.04,-12 89.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="89.86,-15.5 99.86,-12 89.86,-8.5 89.86,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-54C72.14,-54 81.04,-54 89.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="89.86,-57.5 99.86,-54 89.86,-50.5 89.86,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/obl_acc_pl.html b/docs/interface/obl_acc_pl.html
index c9d815211..dd3cc6b3b 100644
--- a/docs/interface/obl_acc_pl.html
+++ b/docs/interface/obl_acc_pl.html
@@ -136,7 +136,7 @@ <h1>obl_acc_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/obl_acc_tp.html b/docs/interface/obl_acc_tp.html
index f7a15e30f..fa0f9f6a3 100644
--- a/docs/interface/obl_acc_tp.html
+++ b/docs/interface/obl_acc_tp.html
@@ -136,7 +136,7 @@ <h1>obl_acc_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/obl_pot_system.html b/docs/interface/obl_pot_system.html
index d3c0e564c..1e3452e13 100644
--- a/docs/interface/obl_pot_system.html
+++ b/docs/interface/obl_pot_system.html
@@ -136,7 +136,7 @@ <h1>obl_pot_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/orbel_el2xv_vec.html b/docs/interface/orbel_el2xv_vec.html
index a8e8c3222..3b80cf678 100644
--- a/docs/interface/orbel_el2xv_vec.html
+++ b/docs/interface/orbel_el2xv_vec.html
@@ -136,7 +136,7 @@ <h1>orbel_el2xv_vec
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,247 +220,247 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~orbel_el2xv_vec~~CallsGraph Pages: 1 -->
-<svg id="interfaceorbel_el2xv_vecCallsGraph" width="641pt" height="203pt"
- viewBox="0.00 0.00 641.00 203.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~orbel_el2xv_vec~~CallsGraph" class="graph" transform="scale(0.83 0.83) rotate(0) translate(4 239.22)">
+<svg id="interfaceorbel_el2xv_vecCallsGraph" width="641pt" height="212pt"
+ viewBox="0.00 0.00 641.00 211.67" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~orbel_el2xv_vec~~CallsGraph" class="graph" transform="scale(0.83 0.83) rotate(0) translate(4 249.6)">
 <title>interface~~orbel_el2xv_vec~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-239.22 764,-239.22 764,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-249.6 764,-249.6 764,4 -4,4"/>
 <!-- interface~orbel_el2xv_vec -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node1" class="node">
 <title>interface~orbel_el2xv_vec</title>
-<polygon fill="none" stroke="black" points="90,-93.62 0,-93.62 0,-69.62 90,-69.62 90,-93.62"/>
-<text text-anchor="middle" x="45" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_el2xv_vec</text>
+<polygon fill="none" stroke="black" points="90,-163.6 0,-163.6 0,-139.6 90,-139.6 90,-163.6"/>
+<text text-anchor="middle" x="45" y="-149.2" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_el2xv_vec</text>
 </g>
 <!-- proc~orbel_el2xv_vec -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node2" class="node">
 <title>proc~orbel_el2xv_vec</title>
 <g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node2"><a xlink:href=".././proc/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="216,-93.62 126,-93.62 126,-69.62 216,-69.62 216,-93.62"/>
-<text text-anchor="middle" x="171" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="216,-163.6 126,-163.6 126,-139.6 216,-139.6 216,-163.6"/>
+<text text-anchor="middle" x="171" y="-149.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
 <!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge1" class="edge">
 <title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M90.07,-81.62C98.28,-81.62 106.96,-81.62 115.44,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="115.66,-85.12 125.66,-81.62 115.66,-78.12 115.66,-85.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M90.07,-151.6C98.28,-151.6 106.96,-151.6 115.44,-151.6"/>
+<polygon fill="#000000" stroke="#000000" points="115.66,-155.1 125.66,-151.6 115.66,-148.1 115.66,-155.1"/>
 </g>
 <!-- proc~orbel_el2xv -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node3" class="node">
 <title>proc~orbel_el2xv</title>
 <g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node3"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
-<polygon fill="#d9534f" stroke="#d9534f" points="319,-93.62 252,-93.62 252,-69.62 319,-69.62 319,-93.62"/>
-<text text-anchor="middle" x="285.5" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="319,-163.6 252,-163.6 252,-139.6 319,-139.6 319,-163.6"/>
+<text text-anchor="middle" x="285.5" y="-149.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge2" class="edge">
 <title>proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv</title>
-<path fill="none" stroke="#000000" d="M216.14,-81.62C224.63,-81.62 233.51,-81.62 241.95,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="241.97,-85.12 251.97,-81.62 241.97,-78.12 241.97,-85.12"/>
+<path fill="none" stroke="#000000" d="M216.14,-151.6C224.63,-151.6 233.51,-151.6 241.95,-151.6"/>
+<polygon fill="#000000" stroke="#000000" points="241.97,-155.1 251.97,-151.6 241.97,-148.1 241.97,-155.1"/>
 </g>
-<!-- interface~orbel_scget -->
+<!-- proc~orbel_zget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node4" class="node">
-<title>interface~orbel_scget</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node4"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#a7506f" stroke="#a7506f" points="653,-198.62 585,-198.62 585,-174.62 653,-174.62 653,-198.62"/>
-<text text-anchor="middle" x="619" y="-184.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+<title>proc~orbel_zget</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node4"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="425.5,-245.6 362.5,-245.6 362.5,-221.6 425.5,-221.6 425.5,-245.6"/>
+<text text-anchor="middle" x="394" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge3" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M294.15,-93.69C305.7,-111.2 329,-143.91 355,-165.62 399.43,-202.73 412.95,-214.16 469,-228.62 502.14,-237.17 512.96,-237.55 546,-228.62 563.53,-223.88 581.18,-213.69 594.62,-204.54"/>
-<polygon fill="#000000" stroke="#000000" points="596.66,-207.38 602.79,-198.74 592.61,-201.67 596.66,-207.38"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
+<path fill="none" stroke="#000000" d="M298.42,-163.73C311.57,-176.72 333.69,-197.51 355,-212.6 356.8,-213.88 358.68,-215.13 360.61,-216.36"/>
+<polygon fill="#000000" stroke="#000000" points="358.82,-219.37 369.19,-221.51 362.42,-213.36 358.82,-219.37"/>
 </g>
-<!-- proc~orbel_ehybrid -->
+<!-- proc~orbel_fhybrid -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node5" class="node">
-<title>proc~orbel_ehybrid</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node5"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="433,-156.62 355,-156.62 355,-132.62 433,-132.62 433,-156.62"/>
-<text text-anchor="middle" x="394" y="-142.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
+<title>proc~orbel_fhybrid</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node5"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="431.5,-203.6 356.5,-203.6 356.5,-179.6 431.5,-179.6 431.5,-203.6"/>
+<text text-anchor="middle" x="394" y="-189.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge4" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
-<path fill="none" stroke="#000000" d="M307.03,-93.77C323.09,-103.27 345.63,-116.6 363.61,-127.23"/>
-<polygon fill="#000000" stroke="#000000" points="362.14,-130.43 372.53,-132.51 365.7,-124.41 362.14,-130.43"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
+<path fill="none" stroke="#000000" d="M318.45,-163.6C328.78,-167.48 340.4,-171.84 351.32,-175.95"/>
+<polygon fill="#000000" stroke="#000000" points="350.11,-179.23 360.7,-179.47 352.57,-172.68 350.11,-179.23"/>
 </g>
-<!-- proc~orbel_fhybrid -->
+<!-- proc~orbel_schget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node6" class="node">
-<title>proc~orbel_fhybrid</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node6"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="431.5,-93.62 356.5,-93.62 356.5,-69.62 431.5,-69.62 431.5,-93.62"/>
-<text text-anchor="middle" x="394" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
+<title>proc~orbel_schget</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node6"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
+<polygon fill="#d9534f" stroke="#d9534f" points="656,-183.6 582,-183.6 582,-159.6 656,-159.6 656,-183.6"/>
+<text text-anchor="middle" x="619" y="-169.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge5" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
-<path fill="none" stroke="#000000" d="M319.03,-81.62C327.57,-81.62 336.94,-81.62 346.06,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="346.2,-85.12 356.2,-81.62 346.2,-78.12 346.2,-85.12"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
+<path fill="none" stroke="#000000" d="M319.19,-153.57C378.47,-157.15 503.81,-164.71 571.8,-168.82"/>
+<polygon fill="#000000" stroke="#000000" points="571.61,-172.31 581.8,-169.42 572.03,-165.32 571.61,-172.31"/>
 </g>
-<!-- proc~orbel_zget -->
+<!-- proc~orbel_ehybrid -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node7" class="node">
-<title>proc~orbel_zget</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node7"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="425.5,-51.62 362.5,-51.62 362.5,-27.62 425.5,-27.62 425.5,-51.62"/>
-<text text-anchor="middle" x="394" y="-37.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
+<title>proc~orbel_ehybrid</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node7"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="433,-102.6 355,-102.6 355,-78.6 433,-78.6 433,-102.6"/>
+<text text-anchor="middle" x="394" y="-88.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge6" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
-<path fill="none" stroke="#000000" d="M317.02,-69.59C328.27,-65.15 341.19,-60.05 353.15,-55.34"/>
-<polygon fill="#000000" stroke="#000000" points="354.46,-58.58 362.48,-51.66 351.89,-52.07 354.46,-58.58"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
+<path fill="none" stroke="#000000" d="M307.54,-139.55C323.44,-130.44 345.48,-117.82 363.19,-107.68"/>
+<polygon fill="#000000" stroke="#000000" points="365.06,-110.64 372,-102.63 361.59,-104.56 365.06,-110.64"/>
 </g>
-<!-- proc~orbel_schget -->
+<!-- interface~orbel_scget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node8" class="node">
-<title>proc~orbel_schget</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node8"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
-<polygon fill="#d9534f" stroke="#d9534f" points="656,-31.62 582,-31.62 582,-7.62 656,-7.62 656,-31.62"/>
-<text text-anchor="middle" x="619" y="-17.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
+<title>interface~orbel_scget</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node8"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#a7506f" stroke="#a7506f" points="653,-60.6 585,-60.6 585,-36.6 653,-36.6 653,-60.6"/>
+<text text-anchor="middle" x="619" y="-46.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
+<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge7" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M295.02,-69.51C306.57,-54.27 328.81,-28.83 355,-18.62 426.54,9.27 517.57,0.09 571.63,-9.5"/>
-<polygon fill="#000000" stroke="#000000" points="571.13,-12.96 581.6,-11.35 572.41,-6.08 571.13,-12.96"/>
+<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M294.41,-139.55C306.1,-122.41 329.39,-90.73 355,-69.6 399.65,-32.76 412.95,-21.06 469,-6.6 502.14,1.94 512.96,2.33 546,-6.6 563.53,-11.34 581.18,-21.53 594.62,-30.68"/>
+<polygon fill="#000000" stroke="#000000" points="592.61,-33.55 602.79,-36.48 596.66,-27.84 592.61,-33.55"/>
 </g>
-<!-- proc~orbel_scget -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_node13" class="node">
-<title>proc~orbel_scget</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node13"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#d9534f" stroke="#d9534f" points="760,-198.62 692,-198.62 692,-174.62 760,-174.62 760,-198.62"/>
-<text text-anchor="middle" x="726" y="-184.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+<!-- proc~orbel_flon -->
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_node10" class="node">
+<title>proc~orbel_flon</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node10"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="537.5,-245.6 477.5,-245.6 477.5,-221.6 537.5,-221.6 537.5,-245.6"/>
+<text text-anchor="middle" x="507.5" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge8" class="edge">
-<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M653.22,-186.62C662.31,-186.62 672.3,-186.62 681.85,-186.62"/>
-<polygon fill="#000000" stroke="#000000" points="681.99,-190.12 691.99,-186.62 681.99,-183.12 681.99,-190.12"/>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge9" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
+<path fill="none" stroke="#000000" d="M426.95,-203.64C439.69,-208.44 454.47,-214 467.81,-219.03"/>
+<polygon fill="#000000" stroke="#000000" points="466.62,-222.32 477.21,-222.57 469.09,-215.77 466.62,-222.32"/>
 </g>
-<!-- proc~orbel_esolmd -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_node10" class="node">
-<title>proc~orbel_esolmd</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node10"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-219.62 469,-219.62 469,-195.62 546,-195.62 546,-219.62"/>
-<text text-anchor="middle" x="507.5" y="-205.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+<!-- proc~orbel_fget -->
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_node13" class="node">
+<title>proc~orbel_fget</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node13"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="538,-203.6 477,-203.6 477,-179.6 538,-179.6 538,-203.6"/>
+<text text-anchor="middle" x="507.5" y="-189.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge10" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
-<path fill="none" stroke="#000000" d="M416.35,-156.78C431.13,-165.19 451.24,-176.61 469,-186.62 471.22,-187.87 473.51,-189.16 475.82,-190.46"/>
-<polygon fill="#000000" stroke="#000000" points="474.24,-193.59 484.68,-195.43 477.67,-187.48 474.24,-193.59"/>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge8" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
+<path fill="none" stroke="#000000" d="M431.51,-191.6C442.79,-191.6 455.27,-191.6 466.76,-191.6"/>
+<polygon fill="#000000" stroke="#000000" points="466.97,-195.1 476.97,-191.6 466.97,-188.1 466.97,-195.1"/>
 </g>
 <!-- proc~orbel_eget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node11" class="node">
 <title>proc~orbel_eget</title>
 <g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node11"><a xlink:href=".././proc/orbel_eget.html" xlink:title="orbel_eget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="539.5,-177.62 475.5,-177.62 475.5,-153.62 539.5,-153.62 539.5,-177.62"/>
-<text text-anchor="middle" x="507.5" y="-163.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="539.5,-123.6 475.5,-123.6 475.5,-99.6 539.5,-99.6 539.5,-123.6"/>
+<text text-anchor="middle" x="507.5" y="-109.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_eget -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge11" class="edge">
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge12" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_eget</title>
-<path fill="none" stroke="#000000" d="M433.06,-151.79C443.48,-153.75 454.82,-155.89 465.41,-157.88"/>
-<polygon fill="#000000" stroke="#000000" points="464.79,-161.33 475.27,-159.74 466.09,-154.45 464.79,-161.33"/>
+<path fill="none" stroke="#000000" d="M433.06,-97.77C443.48,-99.73 454.82,-101.87 465.41,-103.86"/>
+<polygon fill="#000000" stroke="#000000" points="464.79,-107.31 475.27,-105.72 466.09,-100.43 464.79,-107.31"/>
+</g>
+<!-- proc~orbel_esolmd -->
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_node12" class="node">
+<title>proc~orbel_esolmd</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node12"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-81.6 469,-81.6 469,-57.6 546,-57.6 546,-81.6"/>
+<text text-anchor="middle" x="507.5" y="-67.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+</a>
+</g>
+</g>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge10" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
+<path fill="none" stroke="#000000" d="M433.06,-83.43C441.4,-81.86 450.34,-80.18 459,-78.55"/>
+<polygon fill="#000000" stroke="#000000" points="459.81,-81.96 468.99,-76.67 458.51,-75.08 459.81,-81.96"/>
 </g>
 <!-- proc~orbel_ehie -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node14" class="node">
 <title>proc~orbel_ehie</title>
 <g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node14"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="539,-135.62 476,-135.62 476,-111.62 539,-111.62 539,-135.62"/>
-<text text-anchor="middle" x="507.5" y="-121.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="539,-39.6 476,-39.6 476,-15.6 539,-15.6 539,-39.6"/>
+<text text-anchor="middle" x="507.5" y="-25.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge9" class="edge">
+<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge11" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
-<path fill="none" stroke="#000000" d="M433.06,-137.45C443.67,-135.45 455.24,-133.28 465.99,-131.25"/>
-<polygon fill="#000000" stroke="#000000" points="466.81,-134.66 475.99,-129.37 465.51,-127.78 466.81,-134.66"/>
+<path fill="none" stroke="#000000" d="M416.35,-78.44C431.13,-70.04 451.24,-58.61 469,-48.6 471.22,-47.35 473.51,-46.06 475.82,-44.76"/>
+<polygon fill="#000000" stroke="#000000" points="477.67,-47.74 484.68,-39.8 474.24,-41.64 477.67,-47.74"/>
 </g>
-<!-- proc~orbel_flon -->
+<!-- proc~orbel_scget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node9" class="node">
-<title>proc~orbel_flon</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node9"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="537.5,-93.62 477.5,-93.62 477.5,-69.62 537.5,-69.62 537.5,-93.62"/>
-<text text-anchor="middle" x="507.5" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
-</a>
-</g>
-</g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_edge12" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
-<path fill="none" stroke="#000000" d="M431.51,-81.62C442.89,-81.62 455.49,-81.62 467.06,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="467.33,-85.12 477.33,-81.62 467.33,-78.12 467.33,-85.12"/>
-</g>
-<!-- proc~orbel_fget -->
-<g id="interface~~orbel_el2xv_vec~~CallsGraph_node12" class="node">
-<title>proc~orbel_fget</title>
-<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node12"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="538,-51.62 477,-51.62 477,-27.62 538,-27.62 538,-51.62"/>
-<text text-anchor="middle" x="507.5" y="-37.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
+<title>proc~orbel_scget</title>
+<g id="a_interface~~orbel_el2xv_vec~~CallsGraph_node9"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#d9534f" stroke="#d9534f" points="760,-60.6 692,-60.6 692,-36.6 760,-36.6 760,-60.6"/>
+<text text-anchor="middle" x="726" y="-46.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge13" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
-<path fill="none" stroke="#000000" d="M426.95,-69.59C439.46,-64.87 453.95,-59.42 467.1,-54.46"/>
-<polygon fill="#000000" stroke="#000000" points="468.71,-57.6 476.84,-50.79 466.25,-51.04 468.71,-57.6"/>
+<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M653.22,-48.6C662.31,-48.6 672.3,-48.6 681.85,-48.6"/>
+<polygon fill="#000000" stroke="#000000" points="681.99,-52.1 691.99,-48.6 681.99,-45.1 681.99,-52.1"/>
 </g>
 <!-- 3 -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_node15" class="node">
 <title>3</title>
-<polygon fill="#777777" stroke="#777777" points="646,-93.62 592,-93.62 592,-69.62 646,-69.62 646,-93.62"/>
-<text text-anchor="middle" x="619" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
+<polygon fill="#777777" stroke="#777777" points="646,-245.6 592,-245.6 592,-221.6 646,-221.6 646,-245.6"/>
+<text text-anchor="middle" x="619" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
 </g>
 <!-- proc~orbel_flon&#45;&gt;3 -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge14" class="edge">
 <title>proc~orbel_flon&#45;&gt;3</title>
-<path fill="none" stroke="#000000" d="M537.56,-81.62C551.12,-81.62 567.4,-81.62 581.76,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="581.81,-85.12 591.81,-81.62 581.81,-78.12 581.81,-85.12"/>
+<path fill="none" stroke="#000000" d="M537.56,-233.6C551.12,-233.6 567.4,-233.6 581.76,-233.6"/>
+<polygon fill="#000000" stroke="#000000" points="581.81,-237.1 591.81,-233.6 581.81,-230.1 581.81,-237.1"/>
 </g>
-<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge15" class="edge">
-<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M546.18,-200.39C555.36,-198.63 565.25,-196.74 574.67,-194.93"/>
-<polygon fill="#000000" stroke="#000000" points="575.48,-198.34 584.64,-193.02 574.16,-191.46 575.48,-198.34"/>
+<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M530.35,-99.45C535.49,-96.57 540.95,-93.49 546,-90.6 560.05,-82.57 575.57,-73.54 588.59,-65.92"/>
+<polygon fill="#000000" stroke="#000000" points="590.72,-68.73 597.57,-60.65 587.18,-62.69 590.72,-68.73"/>
 </g>
-<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge16" class="edge">
-<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M539.59,-171.58C550.54,-173.68 563.06,-176.08 574.83,-178.34"/>
-<polygon fill="#000000" stroke="#000000" points="574.44,-181.83 584.92,-180.28 575.76,-174.96 574.44,-181.83"/>
+<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M546.18,-62.38C555.36,-60.62 565.25,-58.72 574.67,-56.91"/>
+<polygon fill="#000000" stroke="#000000" points="575.48,-60.32 584.64,-55 574.16,-53.45 575.48,-60.32"/>
 </g>
 <!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge17" class="edge">
 <title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M538.13,-34.21C548.52,-32.31 560.44,-30.13 571.86,-28.05"/>
-<polygon fill="#000000" stroke="#000000" points="572.49,-31.49 581.7,-26.25 571.24,-24.6 572.49,-31.49"/>
+<path fill="none" stroke="#000000" d="M538.13,-186.19C548.52,-184.29 560.44,-182.12 571.86,-180.03"/>
+<polygon fill="#000000" stroke="#000000" points="572.49,-183.47 581.7,-178.23 571.24,-176.59 572.49,-183.47"/>
 </g>
 <!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
 <g id="interface~~orbel_el2xv_vec~~CallsGraph_edge18" class="edge">
 <title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M530.35,-135.77C535.49,-138.66 540.95,-141.73 546,-144.62 560.05,-152.65 575.57,-161.69 588.59,-169.31"/>
-<polygon fill="#000000" stroke="#000000" points="587.18,-172.54 597.57,-174.58 590.72,-166.5 587.18,-172.54"/>
+<path fill="none" stroke="#000000" d="M539,-33.45C550.18,-35.59 563.04,-38.06 575.09,-40.37"/>
+<polygon fill="#000000" stroke="#000000" points="574.5,-43.82 584.98,-42.27 575.82,-36.95 574.5,-43.82"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/orbel_scget.html b/docs/interface/orbel_scget.html
index c66a1bef6..aca187b29 100644
--- a/docs/interface/orbel_scget.html
+++ b/docs/interface/orbel_scget.html
@@ -136,7 +136,7 @@ <h1>orbel_scget
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -322,31 +322,31 @@ <h3 class="panel-title">Called by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~orbel_scget~~CalledByGraph Pages: 1 -->
-<svg id="interfaceorbel_scgetCalledByGraph" width="641pt" height="173pt"
- viewBox="0.00 0.00 641.00 173.33" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~orbel_scget~~CalledByGraph" class="graph" transform="scale(0.95 0.95) rotate(0) translate(4 178.53)">
+<svg id="interfaceorbel_scgetCalledByGraph" width="641pt" height="186pt"
+ viewBox="0.00 0.00 641.00 186.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~orbel_scget~~CalledByGraph" class="graph" transform="scale(0.95 0.95) rotate(0) translate(4 192)">
 <title>interface~~orbel_scget~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-178.53 671,-178.53 671,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-192 671,-192 671,4 -4,4"/>
 <!-- interface~orbel_scget -->
 <g id="interface~~orbel_scget~~CalledByGraph_node1" class="node">
 <title>interface~orbel_scget</title>
 <polygon fill="none" stroke="black" points="667,-108 599,-108 599,-84 667,-84 667,-108"/>
 <text text-anchor="middle" x="633" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_scget</text>
 </g>
-<!-- proc~orbel_esolmd -->
+<!-- proc~drift_kepu_guess -->
 <g id="interface~~orbel_scget~~CalledByGraph_node2" class="node">
-<title>proc~orbel_esolmd</title>
-<g id="a_interface~~orbel_scget~~CalledByGraph_node2"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554.5,-150 477.5,-150 477.5,-126 554.5,-126 554.5,-150"/>
-<text text-anchor="middle" x="516" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+<title>proc~drift_kepu_guess</title>
+<g id="a_interface~~orbel_scget~~CalledByGraph_node2"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
+<polygon fill="#d9534f" stroke="#d9534f" points="563,-188 469,-188 469,-164 563,-164 563,-188"/>
+<text text-anchor="middle" x="516" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
 <g id="interface~~orbel_scget~~CalledByGraph_edge1" class="edge">
-<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M549.95,-125.96C562.22,-121.48 576.33,-116.33 589.35,-111.58"/>
-<polygon fill="#000000" stroke="#000000" points="590.85,-114.76 599.04,-108.04 588.45,-108.18 590.85,-114.76"/>
+<title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M539.87,-163.96C547.38,-159.77 555.68,-154.89 563,-150 579.29,-139.11 596.65,-125.51 609.88,-114.69"/>
+<polygon fill="#000000" stroke="#000000" points="612.46,-117.1 617.93,-108.03 608,-111.7 612.46,-117.1"/>
 </g>
 <!-- proc~orbel_eget -->
 <g id="interface~~orbel_scget~~CalledByGraph_node3" class="node">
@@ -363,143 +363,143 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M548.12,-96C560.63,-96 575.27,-96 588.78,-96"/>
 <polygon fill="#000000" stroke="#000000" points="588.84,-99.5 598.84,-96 588.84,-92.5 588.84,-99.5"/>
 </g>
-<!-- proc~orbel_el2xv -->
+<!-- proc~orbel_esolmd -->
 <g id="interface~~orbel_scget~~CalledByGraph_node4" class="node">
+<title>proc~orbel_esolmd</title>
+<g id="a_interface~~orbel_scget~~CalledByGraph_node4"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554.5,-66 477.5,-66 477.5,-42 554.5,-42 554.5,-66"/>
+<text text-anchor="middle" x="516" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+</a>
+</g>
+</g>
+<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<g id="interface~~orbel_scget~~CalledByGraph_edge3" class="edge">
+<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M549.95,-66.04C562.22,-70.52 576.33,-75.67 589.35,-80.42"/>
+<polygon fill="#000000" stroke="#000000" points="588.45,-83.82 599.04,-83.96 590.85,-77.24 588.45,-83.82"/>
+</g>
+<!-- proc~orbel_el2xv -->
+<g id="interface~~orbel_scget~~CalledByGraph_node5" class="node">
 <title>proc~orbel_el2xv</title>
-<g id="a_interface~~orbel_scget~~CalledByGraph_node4"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
-<polygon fill="#d9534f" stroke="#d9534f" points="319,-149 252,-149 252,-125 319,-125 319,-149"/>
-<text text-anchor="middle" x="285.5" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
+<g id="a_interface~~orbel_scget~~CalledByGraph_node5"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
+<polygon fill="#d9534f" stroke="#d9534f" points="319,-117 252,-117 252,-93 319,-93 319,-117"/>
+<text text-anchor="middle" x="285.5" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
-<g id="interface~~orbel_scget~~CalledByGraph_edge3" class="edge">
+<g id="interface~~orbel_scget~~CalledByGraph_edge4" class="edge">
 <title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M319.34,-148.57C372.53,-165.38 479.94,-191.21 563,-159 585,-150.47 604.27,-131.29 616.82,-116.32"/>
-<polygon fill="#000000" stroke="#000000" points="619.88,-118.1 623.4,-108.11 614.41,-113.73 619.88,-118.1"/>
+<path fill="none" stroke="#000000" d="M319.06,-110.4C370.97,-118.12 475.55,-130.01 563,-117 571.82,-115.69 581.07,-113.48 589.83,-110.98"/>
+<polygon fill="#000000" stroke="#000000" points="590.91,-114.31 599.46,-108.06 588.88,-107.61 590.91,-114.31"/>
 </g>
 <!-- proc~orbel_ehybrid -->
-<g id="interface~~orbel_scget~~CalledByGraph_node7" class="node">
+<g id="interface~~orbel_scget~~CalledByGraph_node8" class="node">
 <title>proc~orbel_ehybrid</title>
-<g id="a_interface~~orbel_scget~~CalledByGraph_node7"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="433,-129 355,-129 355,-105 433,-105 433,-129"/>
-<text text-anchor="middle" x="394" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
+<g id="a_interface~~orbel_scget~~CalledByGraph_node8"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="433,-87 355,-87 355,-63 433,-63 433,-87"/>
+<text text-anchor="middle" x="394" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
-<g id="interface~~orbel_scget~~CalledByGraph_edge11" class="edge">
+<g id="interface~~orbel_scget~~CalledByGraph_edge12" class="edge">
 <title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
-<path fill="none" stroke="#000000" d="M319.03,-130.89C327.12,-129.37 335.97,-127.71 344.64,-126.08"/>
-<polygon fill="#000000" stroke="#000000" points="345.5,-129.48 354.68,-124.2 344.21,-122.6 345.5,-129.48"/>
-</g>
-<!-- proc~drift_kepu_guess -->
-<g id="interface~~orbel_scget~~CalledByGraph_node5" class="node">
-<title>proc~drift_kepu_guess</title>
-<g id="a_interface~~orbel_scget~~CalledByGraph_node5"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
-<polygon fill="#d9534f" stroke="#d9534f" points="563,-24 469,-24 469,0 563,0 563,-24"/>
-<text text-anchor="middle" x="516" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
-</a>
-</g>
-</g>
-<!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
-<g id="interface~~orbel_scget~~CalledByGraph_edge4" class="edge">
-<title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M546.93,-24.02C552.44,-26.68 558.02,-29.71 563,-33 581.78,-45.41 600.47,-62.88 613.66,-76.27"/>
-<polygon fill="#000000" stroke="#000000" points="611.28,-78.85 620.74,-83.62 616.32,-73.99 611.28,-78.85"/>
+<path fill="none" stroke="#000000" d="M319.03,-95.84C327.21,-93.53 336.16,-91.01 344.92,-88.54"/>
+<polygon fill="#000000" stroke="#000000" points="346.01,-91.87 354.68,-85.79 344.11,-85.14 346.01,-91.87"/>
 </g>
 <!-- proc~orbel_ehie -->
 <g id="interface~~orbel_scget~~CalledByGraph_node6" class="node">
 <title>proc~orbel_ehie</title>
 <g id="a_interface~~orbel_scget~~CalledByGraph_node6"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="547.5,-66 484.5,-66 484.5,-42 547.5,-42 547.5,-66"/>
-<text text-anchor="middle" x="516" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="547.5,-24 484.5,-24 484.5,0 547.5,0 547.5,-24"/>
+<text text-anchor="middle" x="516" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
 <g id="interface~~orbel_scget~~CalledByGraph_edge5" class="edge">
 <title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M547.52,-65.14C560.38,-69.84 575.58,-75.4 589.52,-80.48"/>
-<polygon fill="#000000" stroke="#000000" points="588.32,-83.77 598.92,-83.92 590.72,-77.2 588.32,-83.77"/>
+<path fill="none" stroke="#000000" d="M546.93,-24.02C552.44,-26.68 558.02,-29.71 563,-33 581.78,-45.41 600.47,-62.88 613.66,-76.27"/>
+<polygon fill="#000000" stroke="#000000" points="611.28,-78.85 620.74,-83.62 616.32,-73.99 611.28,-78.85"/>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<!-- proc~drift_kepu -->
+<g id="interface~~orbel_scget~~CalledByGraph_node7" class="node">
+<title>proc~drift_kepu</title>
+<g id="a_interface~~orbel_scget~~CalledByGraph_node7"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
+<polygon fill="#d9534f" stroke="#d9534f" points="424,-188 364,-188 364,-164 424,-164 424,-188"/>
+<text text-anchor="middle" x="394" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
+</a>
+</g>
+</g>
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
 <g id="interface~~orbel_scget~~CalledByGraph_edge6" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
-<path fill="none" stroke="#000000" d="M433.3,-123.7C444.12,-125.6 456.02,-127.68 467.32,-129.66"/>
-<polygon fill="#000000" stroke="#000000" points="467.02,-133.16 477.47,-131.43 468.23,-126.26 467.02,-133.16"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
+<path fill="none" stroke="#000000" d="M424.05,-176C434.56,-176 446.82,-176 458.87,-176"/>
+<polygon fill="#000000" stroke="#000000" points="458.9,-179.5 468.9,-176 458.9,-172.5 458.9,-179.5"/>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_eget -->
 <g id="interface~~orbel_scget~~CalledByGraph_edge7" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_eget</title>
-<path fill="none" stroke="#000000" d="M433.3,-110.3C446.18,-108.04 460.6,-105.52 473.7,-103.23"/>
-<polygon fill="#000000" stroke="#000000" points="474.63,-106.62 483.87,-101.45 473.42,-99.72 474.63,-106.62"/>
+<path fill="none" stroke="#000000" d="M433.3,-81.7C446.18,-83.96 460.6,-86.48 473.7,-88.77"/>
+<polygon fill="#000000" stroke="#000000" points="473.42,-92.28 483.87,-90.55 474.63,-85.38 473.42,-92.28"/>
+</g>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<g id="interface~~orbel_scget~~CalledByGraph_edge8" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
+<path fill="none" stroke="#000000" d="M433.3,-68.3C444.12,-66.4 456.02,-64.32 467.32,-62.34"/>
+<polygon fill="#000000" stroke="#000000" points="468.23,-65.74 477.47,-60.57 467.02,-58.84 468.23,-65.74"/>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
 <g id="interface~~orbel_scget~~CalledByGraph_edge10" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
-<path fill="none" stroke="#000000" d="M415.15,-104.92C429.89,-96.25 450.45,-84.47 469,-75 472.06,-73.44 475.27,-71.86 478.5,-70.31"/>
-<polygon fill="#000000" stroke="#000000" points="480.01,-73.47 487.57,-66.05 477.03,-67.13 480.01,-73.47"/>
-</g>
-<!-- proc~drift_kepu -->
-<g id="interface~~orbel_scget~~CalledByGraph_node8" class="node">
-<title>proc~drift_kepu</title>
-<g id="a_interface~~orbel_scget~~CalledByGraph_node8"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
-<polygon fill="#d9534f" stroke="#d9534f" points="424,-24 364,-24 364,0 424,0 424,-24"/>
-<text text-anchor="middle" x="394" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
-</a>
-</g>
-</g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
-<g id="interface~~orbel_scget~~CalledByGraph_edge9" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
-<path fill="none" stroke="#000000" d="M424.05,-12C434.56,-12 446.82,-12 458.87,-12"/>
-<polygon fill="#000000" stroke="#000000" points="458.9,-15.5 468.9,-12 458.9,-8.5 458.9,-15.5"/>
+<path fill="none" stroke="#000000" d="M415.15,-62.92C429.89,-54.25 450.45,-42.47 469,-33 472.06,-31.44 475.27,-29.86 478.5,-28.31"/>
+<polygon fill="#000000" stroke="#000000" points="480.01,-31.47 487.57,-24.05 477.03,-25.13 480.01,-31.47"/>
 </g>
 <!-- proc~orbel_el2xv_vec -->
 <g id="interface~~orbel_scget~~CalledByGraph_node9" class="node">
 <title>proc~orbel_el2xv_vec</title>
 <g id="a_interface~~orbel_scget~~CalledByGraph_node9"><a xlink:href=".././proc/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="216,-149 126,-149 126,-125 216,-125 216,-149"/>
-<text text-anchor="middle" x="171" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="216,-117 126,-117 126,-93 216,-93 216,-117"/>
+<text text-anchor="middle" x="171" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv -->
-<g id="interface~~orbel_scget~~CalledByGraph_edge8" class="edge">
+<g id="interface~~orbel_scget~~CalledByGraph_edge9" class="edge">
 <title>proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv</title>
-<path fill="none" stroke="#000000" d="M216.14,-137C224.63,-137 233.51,-137 241.95,-137"/>
-<polygon fill="#000000" stroke="#000000" points="241.97,-140.5 251.97,-137 241.97,-133.5 241.97,-140.5"/>
+<path fill="none" stroke="#000000" d="M216.14,-105C224.63,-105 233.51,-105 241.95,-105"/>
+<polygon fill="#000000" stroke="#000000" points="241.97,-108.5 251.97,-105 241.97,-101.5 241.97,-108.5"/>
 </g>
-<!-- proc~drift_dan -->
+<!-- interface~orbel_el2xv_vec -->
 <g id="interface~~orbel_scget~~CalledByGraph_node10" class="node">
-<title>proc~drift_dan</title>
-<g id="a_interface~~orbel_scget~~CalledByGraph_node10"><a xlink:href=".././proc/drift_dan.html" xlink:title="drift_dan">
-<polygon fill="#d9534f" stroke="#d9534f" points="313,-24 258,-24 258,0 313,0 313,-24"/>
-<text text-anchor="middle" x="285.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_dan</text>
+<title>interface~orbel_el2xv_vec</title>
+<g id="a_interface~~orbel_scget~~CalledByGraph_node10"><a xlink:href=".././interface/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
+<polygon fill="#a7506f" stroke="#a7506f" points="90,-117 0,-117 0,-93 90,-93 90,-117"/>
+<text text-anchor="middle" x="45" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
-<g id="interface~~orbel_scget~~CalledByGraph_edge12" class="edge">
-<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
-<path fill="none" stroke="#000000" d="M313.1,-12C325.37,-12 340.19,-12 353.72,-12"/>
-<polygon fill="#000000" stroke="#000000" points="353.75,-15.5 363.75,-12 353.75,-8.5 353.75,-15.5"/>
+<!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
+<g id="interface~~orbel_scget~~CalledByGraph_edge13" class="edge">
+<title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M90.07,-105C98.28,-105 106.96,-105 115.44,-105"/>
+<polygon fill="#000000" stroke="#000000" points="115.66,-108.5 125.66,-105 115.66,-101.5 115.66,-108.5"/>
 </g>
-<!-- interface~orbel_el2xv_vec -->
+<!-- proc~drift_dan -->
 <g id="interface~~orbel_scget~~CalledByGraph_node11" class="node">
-<title>interface~orbel_el2xv_vec</title>
-<g id="a_interface~~orbel_scget~~CalledByGraph_node11"><a xlink:href=".././interface/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
-<polygon fill="#a7506f" stroke="#a7506f" points="90,-149 0,-149 0,-125 90,-125 90,-149"/>
-<text text-anchor="middle" x="45" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
+<title>proc~drift_dan</title>
+<g id="a_interface~~orbel_scget~~CalledByGraph_node11"><a xlink:href=".././proc/drift_dan.html" xlink:title="drift_dan">
+<polygon fill="#d9534f" stroke="#d9534f" points="313,-188 258,-188 258,-164 313,-164 313,-188"/>
+<text text-anchor="middle" x="285.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_dan</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
-<g id="interface~~orbel_scget~~CalledByGraph_edge13" class="edge">
-<title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M90.07,-137C98.28,-137 106.96,-137 115.44,-137"/>
-<polygon fill="#000000" stroke="#000000" points="115.66,-140.5 125.66,-137 115.66,-133.5 115.66,-140.5"/>
+<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
+<g id="interface~~orbel_scget~~CalledByGraph_edge11" class="edge">
+<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
+<path fill="none" stroke="#000000" d="M313.1,-176C325.37,-176 340.19,-176 353.72,-176"/>
+<polygon fill="#000000" stroke="#000000" points="353.75,-179.5 363.75,-176 353.75,-172.5 353.75,-179.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/orbel_xv2aeq.html b/docs/interface/orbel_xv2aeq.html
index d2140b14c..a8b748a09 100644
--- a/docs/interface/orbel_xv2aeq.html
+++ b/docs/interface/orbel_xv2aeq.html
@@ -136,7 +136,7 @@ <h1>orbel_xv2aeq
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/orbel_xv2aqt.html b/docs/interface/orbel_xv2aqt.html
index 83bdbb027..d9d810344 100644
--- a/docs/interface/orbel_xv2aqt.html
+++ b/docs/interface/orbel_xv2aqt.html
@@ -136,7 +136,7 @@ <h1>orbel_xv2aqt
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/orbel_xv2el.html b/docs/interface/orbel_xv2el.html
index 688004bf0..9977f12b9 100644
--- a/docs/interface/orbel_xv2el.html
+++ b/docs/interface/orbel_xv2el.html
@@ -136,7 +136,7 @@ <h1>orbel_xv2el
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/orbel_xv2el_vec.html b/docs/interface/orbel_xv2el_vec.html
index e3fff4b71..10b46387f 100644
--- a/docs/interface/orbel_xv2el_vec.html
+++ b/docs/interface/orbel_xv2el_vec.html
@@ -136,7 +136,7 @@ <h1>orbel_xv2el_vec
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_chk_ind.html b/docs/interface/rmvs_chk_ind.html
index 0e7a24039..3f54f1b13 100644
--- a/docs/interface/rmvs_chk_ind.html
+++ b/docs/interface/rmvs_chk_ind.html
@@ -136,7 +136,7 @@ <h1>rmvs_chk_ind
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -235,7 +235,7 @@ <h3 class="panel-title">Calls</h3>
 <g id="interface~~rmvs_chk_ind~~CallsGraph_node2" class="node">
 <title>proc~rmvs_chk_ind</title>
 <g id="a_interface~~rmvs_chk_ind~~CallsGraph_node2"><a xlink:href=".././proc/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="194,-24 115,-24 115,0 194,0 194,-24"/>
+<polygon fill="#d9534f" stroke="#d9534f" points="194,-24 115,-24 115,0 194,0 194,-24"/>
 <text text-anchor="middle" x="154.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
 </a>
 </g>
@@ -311,157 +311,11 @@ <h3 class="panel-title">Calls</h3>
     </div>
      
      
-    <div class="panel panel-default">
-      <div class="panel-heading">
-  <h3 class="panel-title">Called by</h3>
-      </div>
-      <div class="panel-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.47.1 (20210417.1919)
- -->
-<!-- Title: interface~~rmvs_chk_ind~~CalledByGraph Pages: 1 -->
-<svg id="interfacermvs_chk_indCalledByGraph" width="471pt" height="74pt"
- viewBox="0.00 0.00 471.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~rmvs_chk_ind~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
-<title>interface~~rmvs_chk_ind~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 467,-70 467,4 -4,4"/>
-<!-- interface~rmvs_chk_ind -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_node1" class="node">
-<title>interface~rmvs_chk_ind</title>
-<polygon fill="none" stroke="black" points="463,-45 384,-45 384,-21 463,-21 463,-45"/>
-<text text-anchor="middle" x="423.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_chk_ind</text>
-</g>
-<!-- proc~rmvs_encounter_check_tp -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_node2" class="node">
-<title>proc~rmvs_encounter_check_tp</title>
-<g id="a_interface~~rmvs_chk_ind~~CalledByGraph_node2"><a xlink:href=".././proc/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="339.5,-66 200.5,-66 200.5,-42 339.5,-42 339.5,-66"/>
-<text text-anchor="middle" x="270" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
-</a>
-</g>
-</g>
-<!-- proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_edge1" class="edge">
-<title>proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M339.66,-44.48C351.17,-42.89 362.9,-41.26 373.77,-39.75"/>
-<polygon fill="#000000" stroke="#000000" points="374.48,-43.19 383.9,-38.35 373.52,-36.26 374.48,-43.19"/>
-</g>
-<!-- proc~symba_encounter_check_one -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_node3" class="node">
-<title>proc~symba_encounter_check_one</title>
-<g id="a_interface~~rmvs_chk_ind~~CalledByGraph_node3"><a xlink:href=".././proc/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
-<polygon fill="#d9534f" stroke="#d9534f" points="348,-24 192,-24 192,0 348,0 348,-24"/>
-<text text-anchor="middle" x="270" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
-</a>
-</g>
-</g>
-<!-- proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_edge2" class="edge">
-<title>proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M348.08,-22.68C356.82,-23.9 365.53,-25.1 373.76,-26.24"/>
-<polygon fill="#000000" stroke="#000000" points="373.49,-29.74 383.88,-27.65 374.45,-22.81 373.49,-29.74"/>
-</g>
-<!-- interface~symba_encounter_check_one -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_node4" class="node">
-<title>interface~symba_encounter_check_one</title>
-<g id="a_interface~~rmvs_chk_ind~~CalledByGraph_node4"><a xlink:href=".././interface/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-24 0,-24 0,0 156,0 156,-24"/>
-<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_edge4" class="edge">
-<title>interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.01,-12C164.51,-12 173.21,-12 181.83,-12"/>
-<polygon fill="#000000" stroke="#000000" points="181.88,-15.5 191.88,-12 181.88,-8.5 181.88,-15.5"/>
-</g>
-<!-- interface~rmvs_encounter_check_tp -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_node5" class="node">
-<title>interface~rmvs_encounter_check_tp</title>
-<g id="a_interface~~rmvs_chk_ind~~CalledByGraph_node5"><a xlink:href=".././interface/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="147.5,-66 8.5,-66 8.5,-42 147.5,-42 147.5,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp -->
-<g id="interface~~rmvs_chk_ind~~CalledByGraph_edge3" class="edge">
-<title>interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.59,-54C161.37,-54 175.94,-54 190.03,-54"/>
-<polygon fill="#000000" stroke="#000000" points="190.19,-57.5 200.19,-54 190.19,-50.5 190.19,-57.5"/>
-</g>
-</g>
-</svg>
-</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
-    <p>Nodes of different colours represent the following: </p>
-    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.47.1 (20210417.1919)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="560pt" height="32pt"
- viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
-<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
-<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
-<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node4" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
-<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node5" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node6" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
-<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-    
-    <p>Solid arrows point from a procedure to one which it calls. Dashed 
-    arrows point from an interface to procedures which implement that interface.
-    This could include the module procedures in a generic interface or the
-    implementation in a submodule of an interface in a parent module.
-    </p>
-    </div></div></div></div>
-      </div>
-    </div>
-     
     
     <br>
     
       <h2>
-public elemental module function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag)
+public pure module subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr)
     
     
    
@@ -492,12 +346,12 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-r2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~2"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>r2</strong></td><td></td>
+  <td><strong>xr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -507,12 +361,12 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-v2~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~2"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>v2</strong></td><td></td>
+  <td><strong>yr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -522,12 +376,12 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vdotr"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~2"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>vdotr</strong></td><td></td>
+  <td><strong>zr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -537,12 +391,57 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-dt~18"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-vxr~2"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>dt</strong></td><td></td>
+  <td><strong>vxr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-vyr~2"></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vyr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-vzr~2"></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vzr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-dt~19"></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>dt</strong></td><td><p>Step size</p></td>
   
 </tr>
 
@@ -557,7 +456,37 @@ <h3>Arguments</h3>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>r2crit</strong></td><td></td>
+  <td><strong>r2crit</strong></td><td><p>Square of the critical encounter distance</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-lencounter~4"></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lencounter</strong></td><td><p>Flag indicating that an encounter has occurred</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-lvdotr~3"></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lvdotr</strong></td><td><p>Logical flag indicating the direction of the v .dot. r vector</p></td>
   
 </tr>
 
@@ -567,15 +496,6 @@ <h3>Arguments</h3>
     
     
     
-    
-    
-    
-    
-      <h3>Return Value <span class="anchor" id="variable-lflag~2"></span><small>logical
-  </small></h3>
-    
-    
-    
     <br>
 
  </div>
diff --git a/docs/interface/rmvs_discard_tp.html b/docs/interface/rmvs_discard_tp.html
index 8cd0ca703..19d587478 100644
--- a/docs/interface/rmvs_discard_tp.html
+++ b/docs/interface/rmvs_discard_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_discard_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_encounter_check_tp.html b/docs/interface/rmvs_encounter_check_tp.html
index 7dd36cec1..3ddcf4ac8 100644
--- a/docs/interface/rmvs_encounter_check_tp.html
+++ b/docs/interface/rmvs_encounter_check_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_encounter_check_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~rmvs_encounter_check_tp~~CallsGraph Pages: 1 -->
-<svg id="interfacermvs_encounter_check_tpCallsGraph" width="552pt" height="32pt"
- viewBox="0.00 0.00 552.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfacermvs_encounter_check_tpCallsGraph" width="322pt" height="32pt"
+ viewBox="0.00 0.00 322.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~rmvs_encounter_check_tp~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>interface~~rmvs_encounter_check_tp~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 548,-28 548,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 318,-28 318,4 -4,4"/>
 <!-- interface~rmvs_encounter_check_tp -->
 <g id="interface~~rmvs_encounter_check_tp~~CallsGraph_node1" class="node">
 <title>interface~rmvs_encounter_check_tp</title>
@@ -246,36 +246,6 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.37,-12C147.68,-12 156.21,-12 164.65,-12"/>
 <polygon fill="#000000" stroke="#000000" points="164.87,-15.5 174.87,-12 164.87,-8.5 164.87,-15.5"/>
 </g>
-<!-- interface~rmvs_chk_ind -->
-<g id="interface~~rmvs_encounter_check_tp~~CallsGraph_node3" class="node">
-<title>interface~rmvs_chk_ind</title>
-<g id="a_interface~~rmvs_encounter_check_tp~~CallsGraph_node3"><a xlink:href=".././interface/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#a7506f" stroke="#a7506f" points="429,-24 350,-24 350,0 429,0 429,-24"/>
-<text text-anchor="middle" x="389.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
-</g>
-<!-- proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind -->
-<g id="interface~~rmvs_encounter_check_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M314.07,-12C322.74,-12 331.46,-12 339.74,-12"/>
-<polygon fill="#000000" stroke="#000000" points="339.93,-15.5 349.93,-12 339.93,-8.5 339.93,-15.5"/>
-</g>
-<!-- proc~rmvs_chk_ind -->
-<g id="interface~~rmvs_encounter_check_tp~~CallsGraph_node4" class="node">
-<title>proc~rmvs_chk_ind</title>
-<g id="a_interface~~rmvs_encounter_check_tp~~CallsGraph_node4"><a xlink:href=".././proc/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="544,-24 465,-24 465,0 544,0 544,-24"/>
-<text text-anchor="middle" x="504.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
-</g>
-<!-- interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind -->
-<g id="interface~~rmvs_encounter_check_tp~~CallsGraph_edge3" class="edge">
-<title>interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.07,-12C437.25,-12 446,-12 454.51,-12"/>
-<polygon fill="#000000" stroke="#000000" points="454.72,-15.5 464.72,-12 454.72,-8.5 454.72,-15.5"/>
-</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
@@ -406,7 +376,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-dt~19"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-dt~18"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/rmvs_io_write_encounter.html b/docs/interface/rmvs_io_write_encounter.html
index 4e3f28ede..c5a89ff9c 100644
--- a/docs/interface/rmvs_io_write_encounter.html
+++ b/docs/interface/rmvs_io_write_encounter.html
@@ -136,7 +136,7 @@ <h1>rmvs_io_write_encounter
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -253,7 +253,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="406.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
 <!-- proc~rmvs_io_write_encounter&#45;&gt;util_exit -->
-<g id="interface~~rmvs_io_write_encounter~~CallsGraph_edge3" class="edge">
+<g id="interface~~rmvs_io_write_encounter~~CallsGraph_edge2" class="edge">
 <title>proc~rmvs_io_write_encounter&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M302.32,-41.18C325.11,-44.01 349.8,-47.08 369.31,-49.5"/>
 <polygon fill="#000000" stroke="#000000" points="368.93,-52.98 379.29,-50.74 369.8,-46.04 368.93,-52.98"/>
@@ -265,7 +265,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="406.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </g>
 <!-- proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter -->
-<g id="interface~~rmvs_io_write_encounter~~CallsGraph_edge2" class="edge">
+<g id="interface~~rmvs_io_write_encounter~~CallsGraph_edge3" class="edge">
 <title>proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter</title>
 <path fill="none" stroke="#000000" d="M302.32,-24.82C310.72,-23.78 319.37,-22.7 327.93,-21.64"/>
 <polygon fill="#000000" stroke="#000000" points="328.41,-25.11 337.91,-20.4 327.55,-18.16 328.41,-25.11"/>
diff --git a/docs/interface/rmvs_kick_getacch_tp.html b/docs/interface/rmvs_kick_getacch_tp.html
index 9f5bd37d9..0924b83f0 100644
--- a/docs/interface/rmvs_kick_getacch_tp.html
+++ b/docs/interface/rmvs_kick_getacch_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_kick_getacch_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_setup_initialize_system.html b/docs/interface/rmvs_setup_initialize_system.html
index ef9203301..6874721de 100644
--- a/docs/interface/rmvs_setup_initialize_system.html
+++ b/docs/interface/rmvs_setup_initialize_system.html
@@ -136,7 +136,7 @@ <h1>rmvs_setup_initialize_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_setup_pl.html b/docs/interface/rmvs_setup_pl.html
index fd37e3488..7da365d4c 100644
--- a/docs/interface/rmvs_setup_pl.html
+++ b/docs/interface/rmvs_setup_pl.html
@@ -136,7 +136,7 @@ <h1>rmvs_setup_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_setup_tp.html b/docs/interface/rmvs_setup_tp.html
index 4f7f1fb80..47bef5912 100644
--- a/docs/interface/rmvs_setup_tp.html
+++ b/docs/interface/rmvs_setup_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_setup_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_step_system.html b/docs/interface/rmvs_step_system.html
index 8c47add24..a963c147a 100644
--- a/docs/interface/rmvs_step_system.html
+++ b/docs/interface/rmvs_step_system.html
@@ -136,7 +136,7 @@ <h1>rmvs_step_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~rmvs_step_system~~CallsGraph Pages: 1 -->
-<svg id="interfacermvs_step_systemCallsGraph" width="641pt" height="180pt"
- viewBox="0.00 0.00 641.00 179.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~rmvs_step_system~~CallsGraph" class="graph" transform="scale(0.82 0.82) rotate(0) translate(4 214)">
+<svg id="interfacermvs_step_systemCallsGraph" width="641pt" height="130pt"
+ viewBox="0.00 0.00 641.00 130.18" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~rmvs_step_system~~CallsGraph" class="graph" transform="scale(0.82 0.82) rotate(0) translate(4 154)">
 <title>interface~~rmvs_step_system~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-214 774,-214 774,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-154 774,-154 774,4 -4,4"/>
 <!-- interface~rmvs_step_system -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node1" class="node">
 <title>interface~rmvs_step_system</title>
@@ -250,160 +250,160 @@ <h3 class="panel-title">Calls</h3>
 <g id="interface~~rmvs_step_system~~CallsGraph_node3" class="node">
 <title>proc~rmvs_step_out</title>
 <g id="a_interface~~rmvs_step_system~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_step_out.html" xlink:title="rmvs_step_out">
-<polygon fill="#d9534f" stroke="#d9534f" points="368,-105 285,-105 285,-81 368,-81 368,-105"/>
-<text text-anchor="middle" x="326.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_out</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="368,-106 285,-106 285,-82 368,-82 368,-106"/>
+<text text-anchor="middle" x="326.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_out</text>
 </a>
 </g>
 </g>
 <!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out -->
 <g id="interface~~rmvs_step_system~~CallsGraph_edge2" class="edge">
 <title>proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out</title>
-<path fill="none" stroke="#000000" d="M229.92,-64.08C244.27,-68.42 260.62,-73.37 275.7,-77.93"/>
-<polygon fill="#000000" stroke="#000000" points="274.81,-81.32 285.4,-80.87 276.84,-74.62 274.81,-81.32"/>
-</g>
-<!-- proc~rmvs_interp_out -->
-<g id="interface~~rmvs_step_system~~CallsGraph_node4" class="node">
-<title>proc~rmvs_interp_out</title>
-<g id="a_interface~~rmvs_step_system~~CallsGraph_node4"><a xlink:href=".././proc/rmvs_interp_out.html" xlink:title="rmvs_interp_out">
-<polygon fill="#d9534f" stroke="#d9534f" points="503,-63 413,-63 413,-39 503,-39 503,-63"/>
-<text text-anchor="middle" x="458" y="-48.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_out</text>
-</a>
-</g>
-</g>
-<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out -->
-<g id="interface~~rmvs_step_system~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out</title>
-<path fill="none" stroke="#000000" d="M240.22,-51.81C286.52,-51.64 355.08,-51.38 402.65,-51.2"/>
-<polygon fill="#000000" stroke="#000000" points="402.78,-54.7 412.76,-51.17 402.75,-47.7 402.78,-54.7"/>
+<path fill="none" stroke="#000000" d="M228.83,-64.04C243.85,-68.69 261.21,-74.07 277.04,-78.98"/>
+<polygon fill="#000000" stroke="#000000" points="276.08,-82.35 286.67,-81.96 278.15,-75.66 276.08,-82.35"/>
 </g>
 <!-- whm_step_system -->
-<g id="interface~~rmvs_step_system~~CallsGraph_node5" class="node">
+<g id="interface~~rmvs_step_system~~CallsGraph_node4" class="node">
 <title>whm_step_system</title>
-<polygon fill="#777777" stroke="#777777" points="377,-24 276,-24 276,0 377,0 377,-24"/>
-<text text-anchor="middle" x="326.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+<polygon fill="#777777" stroke="#777777" points="377,-64 276,-64 276,-40 377,-40 377,-64"/>
+<text text-anchor="middle" x="326.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
 </g>
 <!-- proc~rmvs_step_system&#45;&gt;whm_step_system -->
-<g id="interface~~rmvs_step_system~~CallsGraph_edge4" class="edge">
+<g id="interface~~rmvs_step_system~~CallsGraph_edge3" class="edge">
 <title>proc~rmvs_step_system&#45;&gt;whm_step_system</title>
-<path fill="none" stroke="#000000" d="M230.65,-40C244.46,-35.92 260.07,-31.32 274.57,-27.03"/>
-<polygon fill="#000000" stroke="#000000" points="275.81,-30.32 284.41,-24.13 273.82,-23.61 275.81,-30.32"/>
+<path fill="none" stroke="#000000" d="M240.07,-52C248.32,-52 256.95,-52 265.42,-52"/>
+<polygon fill="#000000" stroke="#000000" points="265.64,-55.5 275.64,-52 265.64,-48.5 265.64,-55.5"/>
 </g>
-<!-- proc~rmvs_step_in -->
-<g id="interface~~rmvs_step_system~~CallsGraph_node6" class="node">
-<title>proc~rmvs_step_in</title>
-<g id="a_interface~~rmvs_step_system~~CallsGraph_node6"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="496,-147 420,-147 420,-123 496,-123 496,-147"/>
-<text text-anchor="middle" x="458" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
+<!-- proc~rmvs_interp_out -->
+<g id="interface~~rmvs_step_system~~CallsGraph_node5" class="node">
+<title>proc~rmvs_interp_out</title>
+<g id="a_interface~~rmvs_step_system~~CallsGraph_node5"><a xlink:href=".././proc/rmvs_interp_out.html" xlink:title="rmvs_interp_out">
+<polygon fill="#d9534f" stroke="#d9534f" points="503,-24 413,-24 413,0 503,0 503,-24"/>
+<text text-anchor="middle" x="458" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_out</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
-<g id="interface~~rmvs_step_system~~CallsGraph_edge5" class="edge">
-<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
-<path fill="none" stroke="#000000" d="M364.61,-105.04C378.83,-109.65 395.25,-114.97 410.26,-119.84"/>
-<polygon fill="#000000" stroke="#000000" points="409.29,-123.21 419.89,-122.96 411.45,-116.55 409.29,-123.21"/>
+<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out -->
+<g id="interface~~rmvs_step_system~~CallsGraph_edge4" class="edge">
+<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out</title>
+<path fill="none" stroke="#000000" d="M234.4,-39.95C247.7,-36.67 262.37,-33.37 276,-31 318.22,-23.66 366.5,-18.77 402.57,-15.79"/>
+<polygon fill="#000000" stroke="#000000" points="403.19,-19.25 412.88,-14.96 402.63,-12.27 403.19,-19.25"/>
 </g>
 <!-- proc~rmvs_interp_in -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node7" class="node">
 <title>proc~rmvs_interp_in</title>
 <g id="a_interface~~rmvs_step_system~~CallsGraph_node7"><a xlink:href=".././proc/rmvs_interp_in.html" xlink:title="rmvs_interp_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-105 416.5,-105 416.5,-81 499.5,-81 499.5,-105"/>
-<text text-anchor="middle" x="458" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="499.5,-66 416.5,-66 416.5,-42 499.5,-42 499.5,-66"/>
+<text text-anchor="middle" x="458" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
 </a>
 </g>
 </g>
 <!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in -->
 <g id="interface~~rmvs_step_system~~CallsGraph_edge6" class="edge">
 <title>proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in</title>
-<path fill="none" stroke="#000000" d="M368.12,-93C380.06,-93 393.27,-93 405.78,-93"/>
-<polygon fill="#000000" stroke="#000000" points="406.08,-96.5 416.08,-93 406.08,-89.5 406.08,-96.5"/>
+<path fill="none" stroke="#000000" d="M366.35,-82C379.42,-77.96 394.18,-73.4 407.93,-69.16"/>
+<polygon fill="#000000" stroke="#000000" points="409.2,-72.43 417.73,-66.13 407.14,-65.74 409.2,-72.43"/>
 </g>
-<!-- util_exit -->
+<!-- proc~rmvs_step_in -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node8" class="node">
+<title>proc~rmvs_step_in</title>
+<g id="a_interface~~rmvs_step_system~~CallsGraph_node8"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
+<polygon fill="#d9534f" stroke="#d9534f" points="496,-108 420,-108 420,-84 496,-84 496,-108"/>
+<text text-anchor="middle" x="458" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
+</a>
+</g>
+</g>
+<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
+<g id="interface~~rmvs_step_system~~CallsGraph_edge5" class="edge">
+<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
+<path fill="none" stroke="#000000" d="M368.12,-94.63C381.24,-94.83 395.91,-95.06 409.48,-95.27"/>
+<polygon fill="#000000" stroke="#000000" points="409.55,-98.77 419.61,-95.42 409.66,-91.77 409.55,-98.77"/>
+</g>
+<!-- util_exit -->
+<g id="interface~~rmvs_step_system~~CallsGraph_node6" class="node">
 <title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="636.5,-63 582.5,-63 582.5,-39 636.5,-39 636.5,-63"/>
-<text text-anchor="middle" x="609.5" y="-48.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<polygon fill="#777777" stroke="#777777" points="636.5,-24 582.5,-24 582.5,0 636.5,0 636.5,-24"/>
+<text text-anchor="middle" x="609.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
 <!-- proc~rmvs_interp_out&#45;&gt;util_exit -->
 <g id="interface~~rmvs_step_system~~CallsGraph_edge7" class="edge">
 <title>proc~rmvs_interp_out&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M503.05,-51C525,-51 551.24,-51 572.05,-51"/>
-<polygon fill="#000000" stroke="#000000" points="572.08,-54.5 582.08,-51 572.08,-47.5 572.08,-54.5"/>
+<path fill="none" stroke="#000000" d="M503.05,-12C525,-12 551.24,-12 572.05,-12"/>
+<polygon fill="#000000" stroke="#000000" points="572.08,-15.5 582.08,-12 572.08,-8.5 572.08,-15.5"/>
 </g>
-<!-- proc~rmvs_peri_tp -->
+<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
+<g id="interface~~rmvs_step_system~~CallsGraph_edge8" class="edge">
+<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M499.85,-42.52C522.54,-36.15 550.51,-28.29 572.4,-22.14"/>
+<polygon fill="#000000" stroke="#000000" points="573.61,-25.44 582.29,-19.36 571.71,-18.7 573.61,-25.44"/>
+</g>
+<!-- proc~rmvs_make_planetocentric -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node9" class="node">
-<title>proc~rmvs_peri_tp</title>
-<g id="a_interface~~rmvs_step_system~~CallsGraph_node9"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="647,-189 572,-189 572,-165 647,-165 647,-189"/>
-<text text-anchor="middle" x="609.5" y="-174.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
+<title>proc~rmvs_make_planetocentric</title>
+<g id="a_interface~~rmvs_step_system~~CallsGraph_node9"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="680,-108 539,-108 539,-84 680,-84 680,-108"/>
+<text text-anchor="middle" x="609.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
-<g id="interface~~rmvs_step_system~~CallsGraph_edge8" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
-<path fill="none" stroke="#000000" d="M496.34,-145.49C516.27,-151.09 540.99,-158.03 562.15,-163.98"/>
-<polygon fill="#000000" stroke="#000000" points="561.32,-167.38 571.89,-166.72 563.21,-160.64 561.32,-167.38"/>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
+<g id="interface~~rmvs_step_system~~CallsGraph_edge9" class="edge">
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
+<path fill="none" stroke="#000000" d="M496.34,-96C506.21,-96 517.24,-96 528.44,-96"/>
+<polygon fill="#000000" stroke="#000000" points="528.74,-99.5 538.74,-96 528.74,-92.5 528.74,-99.5"/>
 </g>
-<!-- proc~rmvs_end_planetocentric -->
+<!-- proc~rmvs_peri_tp -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node10" class="node">
-<title>proc~rmvs_end_planetocentric</title>
-<g id="a_interface~~rmvs_step_system~~CallsGraph_node10"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="676,-147 543,-147 543,-123 676,-123 676,-147"/>
-<text text-anchor="middle" x="609.5" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
+<title>proc~rmvs_peri_tp</title>
+<g id="a_interface~~rmvs_step_system~~CallsGraph_node10"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="647,-66 572,-66 572,-42 647,-42 647,-66"/>
+<text text-anchor="middle" x="609.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
-<g id="interface~~rmvs_step_system~~CallsGraph_edge9" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
-<path fill="none" stroke="#000000" d="M496.34,-135C507.46,-135 520.08,-135 532.73,-135"/>
-<polygon fill="#000000" stroke="#000000" points="532.85,-138.5 542.85,-135 532.85,-131.5 532.85,-138.5"/>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
+<g id="interface~~rmvs_step_system~~CallsGraph_edge10" class="edge">
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
+<path fill="none" stroke="#000000" d="M496.34,-85.51C516.27,-79.91 540.99,-72.97 562.15,-67.02"/>
+<polygon fill="#000000" stroke="#000000" points="563.21,-70.36 571.89,-64.28 561.32,-63.62 563.21,-70.36"/>
 </g>
-<!-- proc~rmvs_make_planetocentric -->
+<!-- proc~rmvs_end_planetocentric -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node11" class="node">
-<title>proc~rmvs_make_planetocentric</title>
-<g id="a_interface~~rmvs_step_system~~CallsGraph_node11"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="680,-105 539,-105 539,-81 680,-81 680,-105"/>
-<text text-anchor="middle" x="609.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
+<title>proc~rmvs_end_planetocentric</title>
+<g id="a_interface~~rmvs_step_system~~CallsGraph_node11"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="676,-150 543,-150 543,-126 676,-126 676,-150"/>
+<text text-anchor="middle" x="609.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
-<g id="interface~~rmvs_step_system~~CallsGraph_edge10" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
-<path fill="none" stroke="#000000" d="M496.34,-124.51C514.32,-119.46 536.19,-113.32 555.82,-107.8"/>
-<polygon fill="#000000" stroke="#000000" points="556.87,-111.14 565.56,-105.06 554.98,-104.4 556.87,-111.14"/>
-</g>
-<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
 <g id="interface~~rmvs_step_system~~CallsGraph_edge11" class="edge">
-<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M499.85,-81.52C522.54,-75.15 550.51,-67.29 572.4,-61.14"/>
-<polygon fill="#000000" stroke="#000000" points="573.61,-64.44 582.29,-58.36 571.71,-57.7 573.61,-64.44"/>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
+<path fill="none" stroke="#000000" d="M496.34,-106.49C514.32,-111.54 536.19,-117.68 555.82,-123.2"/>
+<polygon fill="#000000" stroke="#000000" points="554.98,-126.6 565.56,-125.94 556.87,-119.86 554.98,-126.6"/>
 </g>
-<!-- xpc -->
+<!-- vpc -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node12" class="node">
-<title>xpc</title>
-<polygon fill="#777777" stroke="#777777" points="770,-210 716,-210 716,-186 770,-186 770,-210"/>
-<text text-anchor="middle" x="743" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
+<title>vpc</title>
+<polygon fill="#777777" stroke="#777777" points="770,-87 716,-87 716,-63 770,-63 770,-87"/>
+<text text-anchor="middle" x="743" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
 <g id="interface~~rmvs_step_system~~CallsGraph_edge12" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
-<path fill="none" stroke="#000000" d="M647.13,-182.85C665.51,-185.79 687.7,-189.33 705.99,-192.25"/>
-<polygon fill="#000000" stroke="#000000" points="705.55,-195.72 715.98,-193.84 706.66,-188.81 705.55,-195.72"/>
+<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
+<path fill="none" stroke="#000000" d="M647.13,-59.85C665.51,-62.79 687.7,-66.33 705.99,-69.25"/>
+<polygon fill="#000000" stroke="#000000" points="705.55,-72.72 715.98,-70.84 706.66,-65.81 705.55,-72.72"/>
 </g>
-<!-- vpc -->
+<!-- xpc -->
 <g id="interface~~rmvs_step_system~~CallsGraph_node13" class="node">
-<title>vpc</title>
-<polygon fill="#777777" stroke="#777777" points="770,-168 716,-168 716,-144 770,-144 770,-168"/>
-<text text-anchor="middle" x="743" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
+<title>xpc</title>
+<polygon fill="#777777" stroke="#777777" points="770,-45 716,-45 716,-21 770,-21 770,-45"/>
+<text text-anchor="middle" x="743" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
 <g id="interface~~rmvs_step_system~~CallsGraph_edge13" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
-<path fill="none" stroke="#000000" d="M647.13,-171.15C665.51,-168.21 687.7,-164.67 705.99,-161.75"/>
-<polygon fill="#000000" stroke="#000000" points="706.66,-165.19 715.98,-160.16 705.55,-158.28 706.66,-165.19"/>
+<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
+<path fill="none" stroke="#000000" d="M647.13,-48.15C665.51,-45.21 687.7,-41.67 705.99,-38.75"/>
+<polygon fill="#000000" stroke="#000000" points="706.66,-42.19 715.98,-37.16 705.55,-35.28 706.66,-42.19"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/rmvs_util_append_pl.html b/docs/interface/rmvs_util_append_pl.html
index 6166fbd5c..e9c8f0824 100644
--- a/docs/interface/rmvs_util_append_pl.html
+++ b/docs/interface/rmvs_util_append_pl.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_append_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,41 +246,41 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M112.2,-54C120.46,-54 129.05,-54 137.51,-54"/>
 <polygon fill="#000000" stroke="#000000" points="137.73,-57.5 147.73,-54 137.73,-50.5 137.73,-57.5"/>
 </g>
-<!-- util_append -->
+<!-- util_exit -->
 <g id="interface~~rmvs_util_append_pl~~CallsGraph_node3" class="node">
-<title>util_append</title>
-<polygon fill="#777777" stroke="#777777" points="385.5,-108 317.5,-108 317.5,-84 385.5,-84 385.5,-108"/>
-<text text-anchor="middle" x="351.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="378.5,-108 324.5,-108 324.5,-84 378.5,-84 378.5,-108"/>
+<text text-anchor="middle" x="351.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_append_pl&#45;&gt;util_append -->
+<!-- proc~rmvs_util_append_pl&#45;&gt;util_exit -->
 <g id="interface~~rmvs_util_append_pl~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_append_pl&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M246.69,-66.04C265.72,-71.53 288.22,-78.02 307.41,-83.56"/>
-<polygon fill="#000000" stroke="#000000" points="306.53,-86.95 317.11,-86.36 308.47,-80.22 306.53,-86.95"/>
+<title>proc~rmvs_util_append_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M246.69,-66.04C268.2,-72.24 294.16,-79.74 314.74,-85.68"/>
+<polygon fill="#000000" stroke="#000000" points="313.79,-89.05 324.37,-88.46 315.73,-82.32 313.79,-89.05"/>
 </g>
-<!-- whm_util_append_pl -->
+<!-- util_append -->
 <g id="interface~~rmvs_util_append_pl~~CallsGraph_node4" class="node">
-<title>whm_util_append_pl</title>
-<polygon fill="#777777" stroke="#777777" points="407,-66 296,-66 296,-42 407,-42 407,-66"/>
-<text text-anchor="middle" x="351.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
+<title>util_append</title>
+<polygon fill="#777777" stroke="#777777" points="385.5,-66 317.5,-66 317.5,-42 385.5,-42 385.5,-66"/>
+<text text-anchor="middle" x="351.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </g>
-<!-- proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl -->
+<!-- proc~rmvs_util_append_pl&#45;&gt;util_append -->
 <g id="interface~~rmvs_util_append_pl~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl</title>
-<path fill="none" stroke="#000000" d="M260.01,-54C268.45,-54 277.24,-54 285.87,-54"/>
-<polygon fill="#000000" stroke="#000000" points="285.9,-57.5 295.9,-54 285.9,-50.5 285.9,-57.5"/>
+<title>proc~rmvs_util_append_pl&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M260.01,-54C275.55,-54 292.24,-54 307,-54"/>
+<polygon fill="#000000" stroke="#000000" points="307.37,-57.5 317.37,-54 307.37,-50.5 307.37,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- whm_util_append_pl -->
 <g id="interface~~rmvs_util_append_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="378.5,-24 324.5,-24 324.5,0 378.5,0 378.5,-24"/>
-<text text-anchor="middle" x="351.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>whm_util_append_pl</title>
+<polygon fill="#777777" stroke="#777777" points="407,-24 296,-24 296,0 407,0 407,-24"/>
+<text text-anchor="middle" x="351.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
 </g>
-<!-- proc~rmvs_util_append_pl&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl -->
 <g id="interface~~rmvs_util_append_pl~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_util_append_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M246.69,-41.96C268.2,-35.76 294.16,-28.26 314.74,-22.32"/>
-<polygon fill="#000000" stroke="#000000" points="315.73,-25.68 324.37,-19.54 313.79,-18.95 315.73,-25.68"/>
+<title>proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl</title>
+<path fill="none" stroke="#000000" d="M246.69,-41.96C262.98,-37.26 281.82,-31.82 298.95,-26.88"/>
+<polygon fill="#000000" stroke="#000000" points="300.16,-30.17 308.8,-24.04 298.22,-23.45 300.16,-30.17"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/rmvs_util_append_tp.html b/docs/interface/rmvs_util_append_tp.html
index e02ad5e97..8a79e27da 100644
--- a/docs/interface/rmvs_util_append_tp.html
+++ b/docs/interface/rmvs_util_append_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_append_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,17 +246,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M112.2,-54C120.46,-54 129.05,-54 137.51,-54"/>
 <polygon fill="#000000" stroke="#000000" points="137.73,-57.5 147.73,-54 137.73,-50.5 137.73,-57.5"/>
 </g>
-<!-- util_append -->
+<!-- util_exit -->
 <g id="interface~~rmvs_util_append_tp~~CallsGraph_node3" class="node">
-<title>util_append</title>
-<polygon fill="#777777" stroke="#777777" points="371.5,-108 303.5,-108 303.5,-84 371.5,-84 371.5,-108"/>
-<text text-anchor="middle" x="337.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="364.5,-108 310.5,-108 310.5,-84 364.5,-84 364.5,-108"/>
+<text text-anchor="middle" x="337.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_append_tp&#45;&gt;util_append -->
+<!-- proc~rmvs_util_append_tp&#45;&gt;util_exit -->
 <g id="interface~~rmvs_util_append_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_append_tp&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M242.68,-66.04C258.52,-71.09 277.03,-77.01 293.41,-82.24"/>
-<polygon fill="#000000" stroke="#000000" points="292.7,-85.68 303.29,-85.39 294.83,-79.02 292.7,-85.68"/>
+<title>proc~rmvs_util_append_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M242.68,-66.04C261,-71.88 282.89,-78.88 300.92,-84.63"/>
+<polygon fill="#000000" stroke="#000000" points="299.9,-87.98 310.49,-87.69 302.03,-81.31 299.9,-87.98"/>
 </g>
 <!-- util_append_tp -->
 <g id="interface~~rmvs_util_append_tp~~CallsGraph_node4" class="node">
@@ -270,17 +270,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M260.01,-54C268.51,-54 277.26,-54 285.67,-54"/>
 <polygon fill="#000000" stroke="#000000" points="285.72,-57.5 295.72,-54 285.72,-50.5 285.72,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_append -->
 <g id="interface~~rmvs_util_append_tp~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="364.5,-24 310.5,-24 310.5,0 364.5,0 364.5,-24"/>
-<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_append</title>
+<polygon fill="#777777" stroke="#777777" points="371.5,-24 303.5,-24 303.5,0 371.5,0 371.5,-24"/>
+<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </g>
-<!-- proc~rmvs_util_append_tp&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_append_tp&#45;&gt;util_append -->
 <g id="interface~~rmvs_util_append_tp~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_util_append_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M242.68,-41.96C261,-36.12 282.89,-29.12 300.92,-23.37"/>
-<polygon fill="#000000" stroke="#000000" points="302.03,-26.69 310.49,-20.31 299.9,-20.02 302.03,-26.69"/>
+<title>proc~rmvs_util_append_tp&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M242.68,-41.96C258.52,-36.91 277.03,-30.99 293.41,-25.76"/>
+<polygon fill="#000000" stroke="#000000" points="294.83,-28.98 303.29,-22.61 292.7,-22.32 294.83,-28.98"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/rmvs_util_fill_pl.html b/docs/interface/rmvs_util_fill_pl.html
index 8a6ebd2b0..d2cb659f9 100644
--- a/docs/interface/rmvs_util_fill_pl.html
+++ b/docs/interface/rmvs_util_fill_pl.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_fill_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,17 +246,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M85.12,-54C93.32,-54 102.01,-54 110.5,-54"/>
 <polygon fill="#000000" stroke="#000000" points="110.7,-57.5 120.7,-54 110.7,-50.5 110.7,-57.5"/>
 </g>
-<!-- whm_util_fill_pl -->
+<!-- util_exit -->
 <g id="interface~~rmvs_util_fill_pl~~CallsGraph_node3" class="node">
-<title>whm_util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="327,-108 242,-108 242,-84 327,-84 327,-108"/>
-<text text-anchor="middle" x="284.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="311.5,-108 257.5,-108 257.5,-84 311.5,-84 311.5,-108"/>
+<text text-anchor="middle" x="284.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl -->
+<!-- proc~rmvs_util_fill_pl&#45;&gt;util_exit -->
 <g id="interface~~rmvs_util_fill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M198.6,-66.04C211.42,-70.56 226.18,-75.77 239.76,-80.56"/>
-<polygon fill="#000000" stroke="#000000" points="238.8,-83.93 249.39,-83.96 241.13,-77.33 238.8,-83.93"/>
+<title>proc~rmvs_util_fill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M198.6,-66.04C213.92,-71.44 232.02,-77.83 247.55,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="246.74,-86.74 257.34,-86.77 249.07,-80.14 246.74,-86.74"/>
 </g>
 <!-- util_fill -->
 <g id="interface~~rmvs_util_fill_pl~~CallsGraph_node4" class="node">
@@ -265,22 +265,22 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="284.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </g>
 <!-- proc~rmvs_util_fill_pl&#45;&gt;util_fill -->
-<g id="interface~~rmvs_util_fill_pl~~CallsGraph_edge3" class="edge">
+<g id="interface~~rmvs_util_fill_pl~~CallsGraph_edge4" class="edge">
 <title>proc~rmvs_util_fill_pl&#45;&gt;util_fill</title>
 <path fill="none" stroke="#000000" d="M206.12,-54C219.42,-54 234.03,-54 246.95,-54"/>
 <polygon fill="#000000" stroke="#000000" points="247.33,-57.5 257.33,-54 247.33,-50.5 247.33,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- whm_util_fill_pl -->
 <g id="interface~~rmvs_util_fill_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="311.5,-24 257.5,-24 257.5,0 311.5,0 311.5,-24"/>
-<text text-anchor="middle" x="284.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>whm_util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="327,-24 242,-24 242,0 327,0 327,-24"/>
+<text text-anchor="middle" x="284.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
 </g>
-<!-- proc~rmvs_util_fill_pl&#45;&gt;util_exit -->
-<g id="interface~~rmvs_util_fill_pl~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M198.6,-41.96C213.92,-36.56 232.02,-30.17 247.55,-24.69"/>
-<polygon fill="#000000" stroke="#000000" points="249.07,-27.86 257.34,-21.23 246.74,-21.26 249.07,-27.86"/>
+<!-- proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl -->
+<g id="interface~~rmvs_util_fill_pl~~CallsGraph_edge3" class="edge">
+<title>proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M198.6,-41.96C211.42,-37.44 226.18,-32.23 239.76,-27.44"/>
+<polygon fill="#000000" stroke="#000000" points="241.13,-30.67 249.39,-24.04 238.8,-24.07 241.13,-30.67"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/rmvs_util_fill_tp.html b/docs/interface/rmvs_util_fill_tp.html
index 0faa7a1ad..8fe3451e0 100644
--- a/docs/interface/rmvs_util_fill_tp.html
+++ b/docs/interface/rmvs_util_fill_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_fill_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,15 +246,15 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M86.31,-54C94.46,-54 103.1,-54 111.53,-54"/>
 <polygon fill="#000000" stroke="#000000" points="111.67,-57.5 121.67,-54 111.67,-50.5 111.67,-57.5"/>
 </g>
-<!-- util_fill -->
+<!-- util_exit -->
 <g id="interface~~rmvs_util_fill_tp~~CallsGraph_node3" class="node">
-<title>util_fill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="299.5,-108 245.5,-108 245.5,-84 299.5,-84 299.5,-108"/>
-<text text-anchor="middle" x="272.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+<text text-anchor="middle" x="272.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill -->
+<!-- proc~rmvs_util_fill_tp&#45;&gt;util_exit -->
 <g id="interface~~rmvs_util_fill_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill</title>
+<title>proc~rmvs_util_fill_tp&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M196.23,-66.04C208.56,-70.94 222.9,-76.65 235.74,-81.76"/>
 <polygon fill="#000000" stroke="#000000" points="234.62,-85.09 245.21,-85.53 237.21,-78.58 234.62,-85.09"/>
 </g>
@@ -270,15 +270,15 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M208.3,-54C216.69,-54 225.44,-54 233.66,-54"/>
 <polygon fill="#000000" stroke="#000000" points="233.73,-57.5 243.73,-54 233.73,-50.5 233.73,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill -->
 <g id="interface~~rmvs_util_fill_tp~~CallsGraph_node5" class="node">
-<title>util_exit</title>
+<title>util_fill</title>
 <polygon fill="#777777" stroke="#777777" points="299.5,-24 245.5,-24 245.5,0 299.5,0 299.5,-24"/>
-<text text-anchor="middle" x="272.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="272.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </g>
-<!-- proc~rmvs_util_fill_tp&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill -->
 <g id="interface~~rmvs_util_fill_tp~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_util_fill_tp&#45;&gt;util_exit</title>
+<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill</title>
 <path fill="none" stroke="#000000" d="M196.23,-41.96C208.56,-37.06 222.9,-31.35 235.74,-26.24"/>
 <polygon fill="#000000" stroke="#000000" points="237.21,-29.42 245.21,-22.47 234.62,-22.91 237.21,-29.42"/>
 </g>
diff --git a/docs/interface/rmvs_util_resize_pl.html b/docs/interface/rmvs_util_resize_pl.html
index 4a62cb46a..941e3b1a6 100644
--- a/docs/interface/rmvs_util_resize_pl.html
+++ b/docs/interface/rmvs_util_resize_pl.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_resize_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_util_resize_tp.html b/docs/interface/rmvs_util_resize_tp.html
index 9e03f8941..828c93ea1 100644
--- a/docs/interface/rmvs_util_resize_tp.html
+++ b/docs/interface/rmvs_util_resize_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_resize_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,29 +246,29 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M105.26,-33C113.49,-33 122.08,-33 130.51,-33"/>
 <polygon fill="#000000" stroke="#000000" points="130.7,-36.5 140.7,-33 130.7,-29.5 130.7,-36.5"/>
 </g>
-<!-- util_resize -->
+<!-- util_resize_tp -->
 <g id="interface~~rmvs_util_resize_tp~~CallsGraph_node3" class="node">
-<title>util_resize</title>
-<polygon fill="#777777" stroke="#777777" points="350.5,-66 289.5,-66 289.5,-42 350.5,-42 350.5,-66"/>
-<text text-anchor="middle" x="320" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>util_resize_tp</title>
+<polygon fill="#777777" stroke="#777777" points="358,-66 282,-66 282,-42 358,-42 358,-66"/>
+<text text-anchor="middle" x="320" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </g>
-<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize -->
+<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp -->
 <g id="interface~~rmvs_util_resize_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize</title>
-<path fill="none" stroke="#000000" d="M246.22,-41.72C257.24,-43.58 268.72,-45.52 279.21,-47.29"/>
-<polygon fill="#000000" stroke="#000000" points="278.88,-50.78 289.32,-48.99 280.05,-43.88 278.88,-50.78"/>
+<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp</title>
+<path fill="none" stroke="#000000" d="M246.22,-41.72C254.67,-43.15 263.39,-44.62 271.73,-46.03"/>
+<polygon fill="#000000" stroke="#000000" points="271.23,-49.49 281.67,-47.7 272.4,-42.59 271.23,-49.49"/>
 </g>
-<!-- util_resize_tp -->
+<!-- util_resize -->
 <g id="interface~~rmvs_util_resize_tp~~CallsGraph_node4" class="node">
-<title>util_resize_tp</title>
-<polygon fill="#777777" stroke="#777777" points="358,-24 282,-24 282,0 358,0 358,-24"/>
-<text text-anchor="middle" x="320" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<title>util_resize</title>
+<polygon fill="#777777" stroke="#777777" points="350.5,-24 289.5,-24 289.5,0 350.5,0 350.5,-24"/>
+<text text-anchor="middle" x="320" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </g>
-<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp -->
+<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize -->
 <g id="interface~~rmvs_util_resize_tp~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp</title>
-<path fill="none" stroke="#000000" d="M246.22,-24.28C254.67,-22.85 263.39,-21.38 271.73,-19.97"/>
-<polygon fill="#000000" stroke="#000000" points="272.4,-23.41 281.67,-18.3 271.23,-16.51 272.4,-23.41"/>
+<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize</title>
+<path fill="none" stroke="#000000" d="M246.22,-24.28C257.24,-22.42 268.72,-20.48 279.21,-18.71"/>
+<polygon fill="#000000" stroke="#000000" points="280.05,-22.12 289.32,-17.01 278.88,-15.22 280.05,-22.12"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/rmvs_util_sort_pl.html b/docs/interface/rmvs_util_sort_pl.html
index 91ce0d485..5dbd7d31a 100644
--- a/docs/interface/rmvs_util_sort_pl.html
+++ b/docs/interface/rmvs_util_sort_pl.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_sort_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_util_sort_rearrange_pl.html b/docs/interface/rmvs_util_sort_rearrange_pl.html
index 317e03898..cfeb6df18 100644
--- a/docs/interface/rmvs_util_sort_rearrange_pl.html
+++ b/docs/interface/rmvs_util_sort_rearrange_pl.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_sort_rearrange_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_util_sort_rearrange_tp.html b/docs/interface/rmvs_util_sort_rearrange_tp.html
index 3f40ba8d3..57f05f28c 100644
--- a/docs/interface/rmvs_util_sort_rearrange_tp.html
+++ b/docs/interface/rmvs_util_sort_rearrange_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_sort_rearrange_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,29 +246,29 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.24,-33C156.6,-33 165.16,-33 173.64,-33"/>
 <polygon fill="#000000" stroke="#000000" points="173.91,-36.5 183.91,-33 173.91,-29.5 173.91,-36.5"/>
 </g>
-<!-- util_sort_rearrange_tp -->
+<!-- util_sort_rearrange -->
 <g id="interface~~rmvs_util_sort_rearrange_tp~~CallsGraph_node3" class="node">
-<title>util_sort_rearrange_tp</title>
-<polygon fill="#777777" stroke="#777777" points="486,-66 368,-66 368,-42 486,-42 486,-66"/>
-<text text-anchor="middle" x="427" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<title>util_sort_rearrange</title>
+<polygon fill="#777777" stroke="#777777" points="478.5,-66 375.5,-66 375.5,-42 478.5,-42 478.5,-66"/>
+<text text-anchor="middle" x="427" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
+<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange -->
 <g id="interface~~rmvs_util_sort_rearrange_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" d="M332.25,-42.21C340.72,-43.28 349.34,-44.36 357.74,-45.42"/>
-<polygon fill="#000000" stroke="#000000" points="357.5,-48.91 367.86,-46.69 358.38,-41.97 357.5,-48.91"/>
+<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M332.25,-42.21C343.27,-43.6 354.54,-45.01 365.26,-46.36"/>
+<polygon fill="#000000" stroke="#000000" points="365,-49.86 375.35,-47.63 365.87,-42.91 365,-49.86"/>
 </g>
-<!-- util_sort_rearrange -->
+<!-- util_sort_rearrange_tp -->
 <g id="interface~~rmvs_util_sort_rearrange_tp~~CallsGraph_node4" class="node">
-<title>util_sort_rearrange</title>
-<polygon fill="#777777" stroke="#777777" points="478.5,-24 375.5,-24 375.5,0 478.5,0 478.5,-24"/>
-<text text-anchor="middle" x="427" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<title>util_sort_rearrange_tp</title>
+<polygon fill="#777777" stroke="#777777" points="486,-24 368,-24 368,0 486,0 486,-24"/>
+<text text-anchor="middle" x="427" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange -->
+<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
 <g id="interface~~rmvs_util_sort_rearrange_tp~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M332.25,-23.79C343.27,-22.4 354.54,-20.99 365.26,-19.64"/>
-<polygon fill="#000000" stroke="#000000" points="365.87,-23.09 375.35,-18.37 365,-16.14 365.87,-23.09"/>
+<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" d="M332.25,-23.79C340.72,-22.72 349.34,-21.64 357.74,-20.58"/>
+<polygon fill="#000000" stroke="#000000" points="358.38,-24.03 367.86,-19.31 357.5,-17.09 358.38,-24.03"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/rmvs_util_sort_tp.html b/docs/interface/rmvs_util_sort_tp.html
index bbcf16f6d..749c7f066 100644
--- a/docs/interface/rmvs_util_sort_tp.html
+++ b/docs/interface/rmvs_util_sort_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_sort_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
diff --git a/docs/interface/rmvs_util_spill_pl.html b/docs/interface/rmvs_util_spill_pl.html
index 3e0185178..0f273531d 100644
--- a/docs/interface/rmvs_util_spill_pl.html
+++ b/docs/interface/rmvs_util_spill_pl.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_spill_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,15 +246,15 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-54C102.46,-54 111.13,-54 119.63,-54"/>
 <polygon fill="#000000" stroke="#000000" points="119.86,-57.5 129.86,-54 119.86,-50.5 119.86,-57.5"/>
 </g>
-<!-- util_spill -->
+<!-- util_exit -->
 <g id="interface~~rmvs_util_spill_pl~~CallsGraph_node3" class="node">
-<title>util_spill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="333.5,-108 279.5,-108 279.5,-84 333.5,-84 333.5,-108"/>
-<text text-anchor="middle" x="306.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<text text-anchor="middle" x="306.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_spill_pl&#45;&gt;util_spill -->
+<!-- proc~rmvs_util_spill_pl&#45;&gt;util_exit -->
 <g id="interface~~rmvs_util_spill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_spill_pl&#45;&gt;util_spill</title>
+<title>proc~rmvs_util_spill_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M214.54,-66.04C231.88,-71.75 252.54,-78.55 269.78,-84.23"/>
 <polygon fill="#000000" stroke="#000000" points="268.89,-87.63 279.49,-87.43 271.08,-80.98 268.89,-87.63"/>
 </g>
@@ -265,20 +265,20 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="306.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
 </g>
 <!-- proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl -->
-<g id="interface~~rmvs_util_spill_pl~~CallsGraph_edge4" class="edge">
+<g id="interface~~rmvs_util_spill_pl~~CallsGraph_edge3" class="edge">
 <title>proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl</title>
 <path fill="none" stroke="#000000" d="M224.03,-54C232.44,-54 241.29,-54 249.94,-54"/>
 <polygon fill="#000000" stroke="#000000" points="249.96,-57.5 259.96,-54 249.96,-50.5 249.96,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_spill -->
 <g id="interface~~rmvs_util_spill_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
+<title>util_spill</title>
 <polygon fill="#777777" stroke="#777777" points="333.5,-24 279.5,-24 279.5,0 333.5,0 333.5,-24"/>
-<text text-anchor="middle" x="306.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="306.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </g>
-<!-- proc~rmvs_util_spill_pl&#45;&gt;util_exit -->
-<g id="interface~~rmvs_util_spill_pl~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_spill_pl&#45;&gt;util_exit</title>
+<!-- proc~rmvs_util_spill_pl&#45;&gt;util_spill -->
+<g id="interface~~rmvs_util_spill_pl~~CallsGraph_edge4" class="edge">
+<title>proc~rmvs_util_spill_pl&#45;&gt;util_spill</title>
 <path fill="none" stroke="#000000" d="M214.54,-41.96C231.88,-36.25 252.54,-29.45 269.78,-23.77"/>
 <polygon fill="#000000" stroke="#000000" points="271.08,-27.02 279.49,-20.57 268.89,-20.37 271.08,-27.02"/>
 </g>
diff --git a/docs/interface/rmvs_util_spill_tp.html b/docs/interface/rmvs_util_spill_tp.html
index 4ebbf3d97..9c5be21f6 100644
--- a/docs/interface/rmvs_util_spill_tp.html
+++ b/docs/interface/rmvs_util_spill_tp.html
@@ -136,7 +136,7 @@ <h1>rmvs_util_spill_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">141 statements</a>
+    title=" 0.2% of total for procedures.">145 statements</a>
      </li> 
      
      
@@ -246,41 +246,41 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-54C102.46,-54 111.13,-54 119.63,-54"/>
 <polygon fill="#000000" stroke="#000000" points="119.86,-57.5 129.86,-54 119.86,-50.5 119.86,-57.5"/>
 </g>
-<!-- util_spill -->
+<!-- util_exit -->
 <g id="interface~~rmvs_util_spill_tp~~CallsGraph_node3" class="node">
-<title>util_spill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="319.5,-108 265.5,-108 265.5,-84 319.5,-84 319.5,-108"/>
-<text text-anchor="middle" x="292.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<text text-anchor="middle" x="292.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill -->
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_exit -->
 <g id="interface~~rmvs_util_spill_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill</title>
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M210.52,-66.04C224.68,-71.27 241.32,-77.43 255.81,-82.79"/>
 <polygon fill="#000000" stroke="#000000" points="254.86,-86.17 265.45,-86.36 257.29,-79.61 254.86,-86.17"/>
 </g>
-<!-- util_spill_tp -->
+<!-- util_spill -->
 <g id="interface~~rmvs_util_spill_tp~~CallsGraph_node4" class="node">
-<title>util_spill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="325,-66 260,-66 260,-42 325,-42 325,-66"/>
-<text text-anchor="middle" x="292.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>util_spill</title>
+<polygon fill="#777777" stroke="#777777" points="319.5,-66 265.5,-66 265.5,-42 319.5,-42 319.5,-66"/>
+<text text-anchor="middle" x="292.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp -->
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill -->
 <g id="interface~~rmvs_util_spill_tp~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp</title>
-<path fill="none" stroke="#000000" d="M224.16,-54C232.62,-54 241.41,-54 249.73,-54"/>
-<polygon fill="#000000" stroke="#000000" points="249.96,-57.5 259.96,-54 249.96,-50.5 249.96,-57.5"/>
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill</title>
+<path fill="none" stroke="#000000" d="M224.16,-54C234.44,-54 245.2,-54 255.02,-54"/>
+<polygon fill="#000000" stroke="#000000" points="255.25,-57.5 265.25,-54 255.25,-50.5 255.25,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_spill_tp -->
 <g id="interface~~rmvs_util_spill_tp~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="319.5,-24 265.5,-24 265.5,0 319.5,0 319.5,-24"/>
-<text text-anchor="middle" x="292.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_spill_tp</title>
+<polygon fill="#777777" stroke="#777777" points="325,-24 260,-24 260,0 325,0 325,-24"/>
+<text text-anchor="middle" x="292.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp -->
 <g id="interface~~rmvs_util_spill_tp~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M210.52,-41.96C224.68,-36.73 241.32,-30.57 255.81,-25.21"/>
-<polygon fill="#000000" stroke="#000000" points="257.29,-28.39 265.45,-21.64 254.86,-21.83 257.29,-28.39"/>
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp</title>
+<path fill="none" stroke="#000000" d="M210.52,-41.96C222.84,-37.41 237.04,-32.15 250.07,-27.33"/>
+<polygon fill="#000000" stroke="#000000" points="251.59,-30.5 259.75,-23.75 249.16,-23.94 251.59,-30.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/setup_body.html b/docs/interface/setup_body.html
index 7e2a4c756..4caaf7484 100644
--- a/docs/interface/setup_body.html
+++ b/docs/interface/setup_body.html
@@ -136,7 +136,7 @@ <h1>setup_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -363,25 +363,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M144.21,-17.79C152.19,-19.56 161.18,-21.55 169.97,-23.49"/>
 <polygon fill="#000000" stroke="#000000" points="169.22,-26.91 179.74,-25.65 170.73,-20.07 169.22,-26.91"/>
 </g>
-<!-- interface~setup_pl -->
-<g id="interface~~setup_body~~CalledByGraph_node4" class="node">
-<title>interface~setup_pl</title>
-<g id="a_interface~~setup_body~~CalledByGraph_node4"><a xlink:href=".././interface/setup_pl.html" xlink:title="setup_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="54,-66 0,-66 0,-42 54,-42 54,-66"/>
-<text text-anchor="middle" x="27" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
-</a>
-</g>
-</g>
-<!-- interface~setup_pl&#45;&gt;proc~setup_pl -->
-<g id="interface~~setup_body~~CalledByGraph_edge3" class="edge">
-<title>interface~setup_pl&#45;&gt;proc~setup_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.4,-54C62.39,-54 71.31,-54 79.82,-54"/>
-<polygon fill="#000000" stroke="#000000" points="79.92,-57.5 89.92,-54 79.92,-50.5 79.92,-57.5"/>
-</g>
 <!-- interface~setup_tp -->
-<g id="interface~~setup_body~~CalledByGraph_node5" class="node">
+<g id="interface~~setup_body~~CalledByGraph_node4" class="node">
 <title>interface~setup_tp</title>
-<g id="a_interface~~setup_body~~CalledByGraph_node5"><a xlink:href=".././interface/setup_tp.html" xlink:title="setup_tp">
+<g id="a_interface~~setup_body~~CalledByGraph_node4"><a xlink:href=".././interface/setup_tp.html" xlink:title="setup_tp">
 <polygon fill="#a7506f" stroke="#a7506f" points="54,-24 0,-24 0,0 54,0 54,-24"/>
 <text text-anchor="middle" x="27" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
 </a>
@@ -393,6 +378,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.4,-12C62.39,-12 71.31,-12 79.82,-12"/>
 <polygon fill="#000000" stroke="#000000" points="79.92,-15.5 89.92,-12 79.92,-8.5 79.92,-15.5"/>
 </g>
+<!-- interface~setup_pl -->
+<g id="interface~~setup_body~~CalledByGraph_node5" class="node">
+<title>interface~setup_pl</title>
+<g id="a_interface~~setup_body~~CalledByGraph_node5"><a xlink:href=".././interface/setup_pl.html" xlink:title="setup_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="54,-66 0,-66 0,-42 54,-42 54,-66"/>
+<text text-anchor="middle" x="27" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
+</a>
+</g>
+</g>
+<!-- interface~setup_pl&#45;&gt;proc~setup_pl -->
+<g id="interface~~setup_body~~CalledByGraph_edge3" class="edge">
+<title>interface~setup_pl&#45;&gt;proc~setup_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.4,-54C62.39,-54 71.31,-54 79.82,-54"/>
+<polygon fill="#000000" stroke="#000000" points="79.92,-57.5 89.92,-54 79.92,-50.5 79.92,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
@@ -507,7 +507,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~13"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~15"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/setup_construct_system.html b/docs/interface/setup_construct_system.html
index 1329c00aa..c85ac4279 100644
--- a/docs/interface/setup_construct_system.html
+++ b/docs/interface/setup_construct_system.html
@@ -136,7 +136,7 @@ <h1>setup_construct_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/setup_encounter.html b/docs/interface/setup_encounter.html
index 5be735ca2..e755f951d 100644
--- a/docs/interface/setup_encounter.html
+++ b/docs/interface/setup_encounter.html
@@ -136,7 +136,7 @@ <h1>setup_encounter
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -361,7 +361,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~14"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~16"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/setup_initialize_particle_info_system.html b/docs/interface/setup_initialize_particle_info_system.html
index e9087a10b..e9882fd9c 100644
--- a/docs/interface/setup_initialize_particle_info_system.html
+++ b/docs/interface/setup_initialize_particle_info_system.html
@@ -136,7 +136,7 @@ <h1>setup_initialize_particle_info_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/setup_initialize_system.html b/docs/interface/setup_initialize_system.html
index 4474b53bd..62946abbe 100644
--- a/docs/interface/setup_initialize_system.html
+++ b/docs/interface/setup_initialize_system.html
@@ -136,7 +136,7 @@ <h1>setup_initialize_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/setup_pl.html b/docs/interface/setup_pl.html
index 622810d62..cc67c1f23 100644
--- a/docs/interface/setup_pl.html
+++ b/docs/interface/setup_pl.html
@@ -136,7 +136,7 @@ <h1>setup_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -391,7 +391,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~15"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~17"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/setup_tp.html b/docs/interface/setup_tp.html
index 47627d5bf..0d49944c0 100644
--- a/docs/interface/setup_tp.html
+++ b/docs/interface/setup_tp.html
@@ -136,7 +136,7 @@ <h1>setup_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -391,7 +391,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~16"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~18"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/interface/symba_collision_casemerge.html b/docs/interface/symba_collision_casemerge.html
index 447d45008..a39b8f48c 100644
--- a/docs/interface/symba_collision_casemerge.html
+++ b/docs/interface/symba_collision_casemerge.html
@@ -417,25 +417,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M446.12,-22.16C454.68,-23.02 463.27,-23.88 471.66,-24.72"/>
 <polygon fill="#000000" stroke="#000000" points="471.48,-28.22 481.78,-25.73 472.18,-21.25 471.48,-28.22"/>
 </g>
-<!-- interface~symba_collision_resolve_mergers -->
-<g id="interface~~symba_collision_casemerge~~CalledByGraph_node4" class="node">
-<title>interface~symba_collision_resolve_mergers</title>
-<g id="a_interface~~symba_collision_casemerge~~CalledByGraph_node4"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
-<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-66 15.5,-66 15.5,-42 189.5,-42 189.5,-66"/>
-<text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
-<g id="interface~~symba_collision_casemerge~~CalledByGraph_edge3" class="edge">
-<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-54C208.06,-54 227.46,-54 246.09,-54"/>
-<polygon fill="#000000" stroke="#000000" points="246.34,-57.5 256.34,-54 246.34,-50.5 246.34,-57.5"/>
-</g>
 <!-- interface~symba_collision_resolve_fragmentations -->
-<g id="interface~~symba_collision_casemerge~~CalledByGraph_node5" class="node">
+<g id="interface~~symba_collision_casemerge~~CalledByGraph_node4" class="node">
 <title>interface~symba_collision_resolve_fragmentations</title>
-<g id="a_interface~~symba_collision_casemerge~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
+<g id="a_interface~~symba_collision_casemerge~~CalledByGraph_node4"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
 <polygon fill="#a7506f" stroke="#a7506f" points="205,-24 0,-24 0,0 205,0 205,-24"/>
 <text text-anchor="middle" x="102.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
 </a>
@@ -447,6 +432,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.2,-12C213.7,-12 222.31,-12 230.87,-12"/>
 <polygon fill="#000000" stroke="#000000" points="230.89,-15.5 240.89,-12 230.89,-8.5 230.89,-15.5"/>
 </g>
+<!-- interface~symba_collision_resolve_mergers -->
+<g id="interface~~symba_collision_casemerge~~CalledByGraph_node5" class="node">
+<title>interface~symba_collision_resolve_mergers</title>
+<g id="a_interface~~symba_collision_casemerge~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
+<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-66 15.5,-66 15.5,-42 189.5,-42 189.5,-66"/>
+<text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
+<g id="interface~~symba_collision_casemerge~~CalledByGraph_edge3" class="edge">
+<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-54C208.06,-54 227.46,-54 246.09,-54"/>
+<polygon fill="#000000" stroke="#000000" points="246.34,-57.5 256.34,-54 246.34,-50.5 246.34,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/symba_collision_check_encounter.html b/docs/interface/symba_collision_check_encounter.html
index e8440dc56..875ba13ee 100644
--- a/docs/interface/symba_collision_check_encounter.html
+++ b/docs/interface/symba_collision_check_encounter.html
@@ -246,44 +246,44 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M175.02,-33C183.49,-33 192.13,-33 200.7,-33"/>
 <polygon fill="#000000" stroke="#000000" points="200.71,-36.5 210.71,-33 200.71,-29.5 200.71,-36.5"/>
 </g>
-<!-- fraggle_io_log_one_message -->
-<g id="interface~~symba_collision_check_encounter~~CallsGraph_node3" class="node">
-<title>fraggle_io_log_one_message</title>
-<polygon fill="#777777" stroke="#777777" points="576,-66 422,-66 422,-42 576,-42 576,-66"/>
-<text text-anchor="middle" x="499" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
-</g>
-<!-- proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message -->
-<g id="interface~~symba_collision_check_encounter~~CallsGraph_edge2" class="edge">
-<title>proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M386.28,-42.18C394.82,-43.08 403.5,-44 412.04,-44.91"/>
-<polygon fill="#000000" stroke="#000000" points="411.67,-48.39 421.99,-45.96 412.41,-41.43 411.67,-48.39"/>
-</g>
 <!-- proc~symba_collision_check_one -->
-<g id="interface~~symba_collision_check_encounter~~CallsGraph_node4" class="node">
+<g id="interface~~symba_collision_check_encounter~~CallsGraph_node3" class="node">
 <title>proc~symba_collision_check_one</title>
-<g id="a_interface~~symba_collision_check_encounter~~CallsGraph_node4"><a xlink:href=".././proc/symba_collision_check_one.html" xlink:title="symba_collision_check_one">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="571.5,-24 426.5,-24 426.5,0 571.5,0 571.5,-24"/>
-<text text-anchor="middle" x="499" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_one</text>
+<g id="a_interface~~symba_collision_check_encounter~~CallsGraph_node3"><a xlink:href=".././proc/symba_collision_check_one.html" xlink:title="symba_collision_check_one">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="571.5,-66 426.5,-66 426.5,-42 571.5,-42 571.5,-66"/>
+<text text-anchor="middle" x="499" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_one</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one -->
-<g id="interface~~symba_collision_check_encounter~~CallsGraph_edge3" class="edge">
+<g id="interface~~symba_collision_check_encounter~~CallsGraph_edge2" class="edge">
 <title>proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one</title>
-<path fill="none" stroke="#000000" d="M386.28,-23.82C396.19,-22.77 406.27,-21.7 416.11,-20.66"/>
-<polygon fill="#000000" stroke="#000000" points="416.69,-24.12 426.27,-19.59 415.95,-17.16 416.69,-24.12"/>
+<path fill="none" stroke="#000000" d="M386.28,-42.18C396.19,-43.23 406.27,-44.3 416.11,-45.34"/>
+<polygon fill="#000000" stroke="#000000" points="415.95,-48.84 426.27,-46.41 416.69,-41.88 415.95,-48.84"/>
+</g>
+<!-- fraggle_io_log_one_message -->
+<g id="interface~~symba_collision_check_encounter~~CallsGraph_node4" class="node">
+<title>fraggle_io_log_one_message</title>
+<polygon fill="#777777" stroke="#777777" points="576,-24 422,-24 422,0 576,0 576,-24"/>
+<text text-anchor="middle" x="499" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+</g>
+<!-- proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message -->
+<g id="interface~~symba_collision_check_encounter~~CallsGraph_edge3" class="edge">
+<title>proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M386.28,-23.82C394.82,-22.92 403.5,-22 412.04,-21.09"/>
+<polygon fill="#000000" stroke="#000000" points="412.41,-24.57 421.99,-20.04 411.67,-17.61 412.41,-24.57"/>
 </g>
 <!-- orbel_xv2aeq -->
 <g id="interface~~symba_collision_check_encounter~~CallsGraph_node5" class="node">
 <title>orbel_xv2aeq</title>
-<polygon fill="#777777" stroke="#777777" points="689,-24 612,-24 612,0 689,0 689,-24"/>
-<text text-anchor="middle" x="650.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
+<polygon fill="#777777" stroke="#777777" points="689,-66 612,-66 612,-42 689,-42 689,-66"/>
+<text text-anchor="middle" x="650.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
 </g>
 <!-- proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq -->
 <g id="interface~~symba_collision_check_encounter~~CallsGraph_edge4" class="edge">
 <title>proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq</title>
-<path fill="none" stroke="#000000" d="M571.68,-12C581.92,-12 592.23,-12 601.85,-12"/>
-<polygon fill="#000000" stroke="#000000" points="601.98,-15.5 611.98,-12 601.98,-8.5 601.98,-15.5"/>
+<path fill="none" stroke="#000000" d="M571.68,-54C581.92,-54 592.23,-54 601.85,-54"/>
+<polygon fill="#000000" stroke="#000000" points="601.98,-57.5 611.98,-54 601.98,-50.5 601.98,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_collision_resolve_fragmentations.html b/docs/interface/symba_collision_resolve_fragmentations.html
index 610ede82e..b7141a7fb 100644
--- a/docs/interface/symba_collision_resolve_fragmentations.html
+++ b/docs/interface/symba_collision_resolve_fragmentations.html
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~symba_collision_resolve_fragmentations~~CallsGraph Pages: 1 -->
-<svg id="interfacesymba_collision_resolve_fragmentationsCallsGraph" width="641pt" height="160pt"
- viewBox="0.00 0.00 641.00 159.60" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph" class="graph" transform="scale(0.52 0.52) rotate(0) translate(4 301)">
+<svg id="interfacesymba_collision_resolve_fragmentationsCallsGraph" width="641pt" height="149pt"
+ viewBox="0.00 0.00 641.00 148.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph" class="graph" transform="scale(0.52 0.52) rotate(0) translate(4 280)">
 <title>interface~~symba_collision_resolve_fragmentations~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-301 1221,-301 1221,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 1221,-280 1221,4 -4,4"/>
 <!-- interface~symba_collision_resolve_fragmentations -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node1" class="node">
 <title>interface~symba_collision_resolve_fragmentations</title>
@@ -246,30 +246,27 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.2,-138C213.7,-138 222.31,-138 230.87,-138"/>
 <polygon fill="#000000" stroke="#000000" points="230.89,-141.5 240.89,-138 230.89,-134.5 230.89,-141.5"/>
 </g>
-<!-- proc~symba_collision_consolidate_colliders -->
+<!-- idx2 -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node3" class="node">
-<title>proc~symba_collision_consolidate_colliders</title>
-<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node3"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="675,-276 482,-276 482,-252 675,-252 675,-276"/>
-<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
-</a>
-</g>
+<title>idx2</title>
+<polygon fill="#777777" stroke="#777777" points="605.5,-276 551.5,-276 551.5,-252 605.5,-252 605.5,-276"/>
+<text text-anchor="middle" x="578.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx2 -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge2" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders</title>
-<path fill="none" stroke="#000000" d="M356.53,-150.2C379.03,-172.29 429.96,-218.86 482,-243 486.65,-245.15 491.52,-247.09 496.51,-248.84"/>
-<polygon fill="#000000" stroke="#000000" points="495.62,-252.23 506.21,-251.95 497.76,-245.56 495.62,-252.23"/>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx2</title>
+<path fill="none" stroke="#000000" d="M356.53,-150.2C379.03,-172.29 429.96,-218.86 482,-243 500.62,-251.64 522.96,-256.8 541.35,-259.85"/>
+<polygon fill="#000000" stroke="#000000" points="540.98,-263.33 551.39,-261.37 542.03,-256.41 540.98,-263.33"/>
 </g>
-<!-- idx2 -->
+<!-- util_exit -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node4" class="node">
-<title>idx2</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="605.5,-234 551.5,-234 551.5,-210 605.5,-210 605.5,-234"/>
-<text text-anchor="middle" x="578.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
+<text text-anchor="middle" x="578.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx2 -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge3" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx2</title>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M366.77,-150C393.48,-163.97 439.92,-186.91 482,-201 501.2,-207.43 523.23,-212.42 541.3,-215.93"/>
 <polygon fill="#000000" stroke="#000000" points="540.68,-219.37 551.15,-217.77 541.96,-212.49 540.68,-219.37"/>
 </g>
@@ -285,20 +282,20 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M411.27,-150.04C453.56,-157.66 506.61,-167.22 541.25,-173.47"/>
 <polygon fill="#000000" stroke="#000000" points="540.91,-176.96 551.37,-175.29 542.15,-170.07 540.91,-176.96"/>
 </g>
-<!-- interface~symba_collision_casemerge -->
+<!-- proc~symba_collision_consolidate_colliders -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node6" class="node">
-<title>interface~symba_collision_casemerge</title>
-<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node6"><a xlink:href=".././interface/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
-<polygon fill="#a7506f" stroke="#a7506f" points="652,-66 505,-66 505,-42 652,-42 652,-66"/>
-<text text-anchor="middle" x="578.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
+<title>proc~symba_collision_consolidate_colliders</title>
+<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node6"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="675,-150 482,-150 482,-126 675,-126 675,-150"/>
+<text text-anchor="middle" x="578.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge5" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge</title>
-<path fill="none" stroke="#000000" d="M366.77,-126C393.48,-112.03 439.92,-89.09 482,-75 489.05,-72.64 496.49,-70.47 503.97,-68.5"/>
-<polygon fill="#000000" stroke="#000000" points="504.96,-71.86 513.8,-66.02 503.24,-65.07 504.96,-71.86"/>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders -->
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge6" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders</title>
+<path fill="none" stroke="#000000" d="M446.02,-138C454.57,-138 463.23,-138 471.81,-138"/>
+<polygon fill="#000000" stroke="#000000" points="471.83,-141.5 481.83,-138 471.83,-134.5 471.83,-141.5"/>
 </g>
 <!-- interface~symba_collision_casedisruption -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node7" class="node">
@@ -310,196 +307,199 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge6" class="edge">
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge5" class="edge">
 <title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
 <path fill="none" stroke="#000000" d="M411.27,-125.96C439.18,-120.93 471.77,-115.06 500.67,-109.85"/>
 <polygon fill="#000000" stroke="#000000" points="501.5,-113.26 510.72,-108.04 500.26,-106.37 501.5,-113.26"/>
 </g>
-<!-- interface~symba_collision_casehitandrun -->
+<!-- interface~symba_collision_casemerge -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node8" class="node">
-<title>interface~symba_collision_casehitandrun</title>
-<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node8"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#a7506f" stroke="#a7506f" points="659,-150 498,-150 498,-126 659,-126 659,-150"/>
-<text text-anchor="middle" x="578.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<title>interface~symba_collision_casemerge</title>
+<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node8"><a xlink:href=".././interface/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<polygon fill="#a7506f" stroke="#a7506f" points="652,-24 505,-24 505,0 652,0 652,-24"/>
+<text text-anchor="middle" x="578.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge7" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" d="M446.02,-138C459.8,-138 473.86,-138 487.42,-138"/>
-<polygon fill="#000000" stroke="#000000" points="487.68,-141.5 497.68,-138 487.68,-134.5 487.68,-141.5"/>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge</title>
+<path fill="none" stroke="#000000" d="M356.53,-125.8C379.03,-103.71 429.96,-57.14 482,-33 486.65,-30.85 491.52,-28.91 496.51,-27.16"/>
+<polygon fill="#000000" stroke="#000000" points="497.76,-30.44 506.21,-24.05 495.62,-23.77 497.76,-30.44"/>
 </g>
-<!-- util_exit -->
+<!-- interface~symba_collision_casehitandrun -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node9" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="605.5,-24 551.5,-24 551.5,0 605.5,0 605.5,-24"/>
-<text text-anchor="middle" x="578.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge8" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M356.53,-125.8C379.03,-103.71 429.96,-57.14 482,-33 500.62,-24.36 522.96,-19.2 541.35,-16.15"/>
-<polygon fill="#000000" stroke="#000000" points="542.03,-19.59 551.39,-14.63 540.98,-12.67 542.03,-19.59"/>
+<title>interface~symba_collision_casehitandrun</title>
+<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node9"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#a7506f" stroke="#a7506f" points="659,-66 498,-66 498,-42 659,-42 659,-66"/>
+<text text-anchor="middle" x="578.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+</a>
 </g>
-<!-- id_arr -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node10" class="node">
-<title>id_arr</title>
-<polygon fill="#777777" stroke="#777777" points="819.5,-255 765.5,-255 765.5,-231 819.5,-231 819.5,-255"/>
-<text text-anchor="middle" x="792.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge9" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
-<path fill="none" stroke="#000000" d="M675.27,-254.51C703.56,-251.71 732.83,-248.81 754.92,-246.62"/>
-<polygon fill="#000000" stroke="#000000" points="755.54,-250.08 765.15,-245.61 754.85,-243.11 755.54,-250.08"/>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge8" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
+<path fill="none" stroke="#000000" d="M366.77,-126C393.48,-112.03 439.92,-89.09 482,-75 489.05,-72.64 496.49,-70.47 503.97,-68.5"/>
+<polygon fill="#000000" stroke="#000000" points="504.96,-71.86 513.8,-66.02 503.24,-65.07 504.96,-71.86"/>
 </g>
 <!-- idx_arr -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node13" class="node">
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node12" class="node">
 <title>idx_arr</title>
-<polygon fill="#777777" stroke="#777777" points="819.5,-297 765.5,-297 765.5,-273 819.5,-273 819.5,-297"/>
-<text text-anchor="middle" x="792.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
+<polygon fill="#777777" stroke="#777777" points="819.5,-150 765.5,-150 765.5,-126 819.5,-126 819.5,-150"/>
+<text text-anchor="middle" x="792.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
 </g>
 <!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge10" class="edge">
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge9" class="edge">
 <title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
-<path fill="none" stroke="#000000" d="M675.27,-273.49C703.56,-276.29 732.83,-279.19 754.92,-281.38"/>
-<polygon fill="#000000" stroke="#000000" points="754.85,-284.89 765.15,-282.39 755.54,-277.92 754.85,-284.89"/>
+<path fill="none" stroke="#000000" d="M675.27,-138C703.56,-138 732.83,-138 754.92,-138"/>
+<polygon fill="#000000" stroke="#000000" points="755.15,-141.5 765.15,-138 755.15,-134.5 755.15,-141.5"/>
 </g>
-<!-- proc~symba_collision_casemerge -->
+<!-- id_arr -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node14" class="node">
-<title>proc~symba_collision_casemerge</title>
-<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node14"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="866,-66 719,-66 719,-42 866,-42 866,-66"/>
-<text text-anchor="middle" x="792.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
-</a>
-</g>
+<title>id_arr</title>
+<polygon fill="#777777" stroke="#777777" points="819.5,-192 765.5,-192 765.5,-168 819.5,-168 819.5,-192"/>
+<text text-anchor="middle" x="792.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
 </g>
-<!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge11" class="edge">
-<title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.16,-54C670.37,-54 690.03,-54 708.69,-54"/>
-<polygon fill="#000000" stroke="#000000" points="708.93,-57.5 718.93,-54 708.93,-50.5 708.93,-57.5"/>
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge10" class="edge">
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
+<path fill="none" stroke="#000000" d="M640.25,-150.04C677.41,-157.4 723.69,-166.57 755.21,-172.81"/>
+<polygon fill="#000000" stroke="#000000" points="754.81,-176.3 765.3,-174.81 756.17,-169.43 754.81,-176.3"/>
 </g>
 <!-- proc~symba_collision_casedisruption -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node12" class="node">
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node10" class="node">
 <title>proc~symba_collision_casedisruption</title>
-<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node12"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node10"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="874,-108 711,-108 711,-84 874,-84 874,-108"/>
 <text text-anchor="middle" x="792.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
 </a>
 </g>
 </g>
 <!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
-<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge12" class="edge">
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge11" class="edge">
 <title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M660.25,-96C673.49,-96 687.29,-96 700.76,-96"/>
 <polygon fill="#000000" stroke="#000000" points="700.97,-99.5 710.97,-96 700.97,-92.5 700.97,-99.5"/>
 </g>
+<!-- proc~symba_collision_casemerge -->
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node13" class="node">
+<title>proc~symba_collision_casemerge</title>
+<g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node13"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="866,-24 719,-24 719,0 866,0 866,-24"/>
+<text text-anchor="middle" x="792.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
+<g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge12" class="edge">
+<title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.16,-12C670.37,-12 690.03,-12 708.69,-12"/>
+<polygon fill="#000000" stroke="#000000" points="708.93,-15.5 718.93,-12 708.93,-8.5 708.93,-15.5"/>
+</g>
 <!-- proc~symba_collision_casehitandrun -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node11" class="node">
 <title>proc~symba_collision_casehitandrun</title>
 <g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node11"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="873,-150 712,-150 712,-126 873,-126 873,-150"/>
-<text text-anchor="middle" x="792.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="873,-66 712,-66 712,-42 873,-42 873,-66"/>
+<text text-anchor="middle" x="792.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
 </a>
 </g>
 </g>
 <!-- interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge13" class="edge">
 <title>interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.04,-138C672.94,-138 687.49,-138 701.64,-138"/>
-<polygon fill="#000000" stroke="#000000" points="701.86,-141.5 711.86,-138 701.86,-134.5 701.86,-141.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.04,-54C672.94,-54 687.49,-54 701.64,-54"/>
+<polygon fill="#000000" stroke="#000000" points="701.86,-57.5 711.86,-54 701.86,-50.5 701.86,-57.5"/>
 </g>
 <!-- proc~symba_collision_collider_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node15" class="node">
 <title>proc~symba_collision_collider_message</title>
 <g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node15"><a xlink:href=".././proc/symba_collision_collider_message.html" xlink:title="symba_collision_collider_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="1087,-150 910,-150 910,-126 1087,-126 1087,-150"/>
-<text text-anchor="middle" x="998.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_collider_message</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1087,-108 910,-108 910,-84 1087,-84 1087,-108"/>
+<text text-anchor="middle" x="998.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_collider_message</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
+<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge14" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M873.25,-138C881.84,-138 890.66,-138 899.44,-138"/>
-<polygon fill="#000000" stroke="#000000" points="899.71,-141.5 909.71,-138 899.71,-134.5 899.71,-141.5"/>
+<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M874.13,-96C882.53,-96 891.14,-96 899.71,-96"/>
+<polygon fill="#000000" stroke="#000000" points="899.73,-99.5 909.73,-96 899.73,-92.5 899.73,-99.5"/>
 </g>
 <!-- proc~symba_collision_mergeaddsub -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node16" class="node">
 <title>proc~symba_collision_mergeaddsub</title>
 <g id="a_interface~~symba_collision_resolve_fragmentations~~CallsGraph_node16"><a xlink:href=".././proc/symba_collision_mergeaddsub.html" xlink:title="symba_collision_mergeaddsub">
-<polygon fill="#d9534f" stroke="#d9534f" points="1078.5,-108 918.5,-108 918.5,-84 1078.5,-84 1078.5,-108"/>
-<text text-anchor="middle" x="998.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_mergeaddsub</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="1078.5,-66 918.5,-66 918.5,-42 1078.5,-42 1078.5,-66"/>
+<text text-anchor="middle" x="998.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_mergeaddsub</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
+<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge15" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M851.96,-125.96C876.07,-121 904.18,-115.21 929.24,-110.05"/>
-<polygon fill="#000000" stroke="#000000" points="929.94,-113.48 939.03,-108.04 928.53,-106.63 929.94,-113.48"/>
+<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M851.96,-83.96C876.07,-79 904.18,-73.21 929.24,-68.05"/>
+<polygon fill="#000000" stroke="#000000" points="929.94,-71.48 939.03,-66.04 928.53,-64.63 929.94,-71.48"/>
 </g>
 <!-- fraggle_io_log_one_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node17" class="node">
 <title>fraggle_io_log_one_message</title>
-<polygon fill="#777777" stroke="#777777" points="1075.5,-66 921.5,-66 921.5,-42 1075.5,-42 1075.5,-66"/>
-<text text-anchor="middle" x="998.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<polygon fill="#777777" stroke="#777777" points="1075.5,-24 921.5,-24 921.5,0 1075.5,0 1075.5,-24"/>
+<text text-anchor="middle" x="998.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message -->
+<!-- proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge16" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M855.76,-125.9C862.16,-123.46 868.37,-120.52 874,-117 894.85,-103.97 889.03,-87.83 910,-75 912.96,-73.19 916.05,-71.54 919.25,-70.03"/>
-<polygon fill="#000000" stroke="#000000" points="920.62,-73.25 928.48,-66.14 917.9,-66.8 920.62,-73.25"/>
+<title>proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M855.76,-83.9C862.16,-81.46 868.37,-78.52 874,-75 894.85,-61.97 889.03,-45.83 910,-33 912.96,-31.19 916.05,-29.54 919.25,-28.03"/>
+<polygon fill="#000000" stroke="#000000" points="920.62,-31.25 928.48,-24.14 917.9,-24.8 920.62,-31.25"/>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message -->
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge17" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M851.96,-108.04C876.07,-113 904.18,-118.79 929.24,-123.95"/>
-<polygon fill="#000000" stroke="#000000" points="928.53,-127.37 939.03,-125.96 929.94,-120.52 928.53,-127.37"/>
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M851.96,-66.04C876.07,-71 904.18,-76.79 929.24,-81.95"/>
+<polygon fill="#000000" stroke="#000000" points="928.53,-85.37 939.03,-83.96 929.94,-78.52 928.53,-85.37"/>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub -->
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge18" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M874.13,-96C885.3,-96 896.82,-96 908.14,-96"/>
-<polygon fill="#000000" stroke="#000000" points="908.46,-99.5 918.46,-96 908.46,-92.5 908.46,-99.5"/>
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M873.25,-54C884.74,-54 896.64,-54 908.3,-54"/>
+<polygon fill="#000000" stroke="#000000" points="908.48,-57.5 918.48,-54 908.48,-50.5 908.48,-57.5"/>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message -->
+<!-- proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge19" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M851.96,-83.96C876.07,-79 904.18,-73.21 929.24,-68.05"/>
-<polygon fill="#000000" stroke="#000000" points="929.94,-71.48 939.03,-66.04 928.53,-64.63 929.94,-71.48"/>
+<title>proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M851.96,-41.96C876.07,-37 904.18,-31.21 929.24,-26.05"/>
+<polygon fill="#000000" stroke="#000000" points="929.94,-29.48 939.03,-24.04 928.53,-22.63 929.94,-29.48"/>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge20" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M855.76,-66.1C862.16,-68.54 868.37,-71.48 874,-75 894.85,-88.03 889.03,-104.17 910,-117 912.96,-118.81 916.05,-120.46 919.25,-121.97"/>
-<polygon fill="#000000" stroke="#000000" points="917.9,-125.2 928.48,-125.86 920.62,-118.75 917.9,-125.2"/>
+<path fill="none" stroke="#000000" d="M855.76,-24.1C862.16,-26.54 868.37,-29.48 874,-33 894.85,-46.03 889.03,-62.17 910,-75 912.96,-76.81 916.05,-78.46 919.25,-79.97"/>
+<polygon fill="#000000" stroke="#000000" points="917.9,-83.2 928.48,-83.86 920.62,-76.75 917.9,-83.2"/>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge21" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M851.96,-66.04C876.07,-71 904.18,-76.79 929.24,-81.95"/>
-<polygon fill="#000000" stroke="#000000" points="928.53,-85.37 939.03,-83.96 929.94,-78.52 928.53,-85.37"/>
+<path fill="none" stroke="#000000" d="M851.96,-24.04C876.07,-29 904.18,-34.79 929.24,-39.95"/>
+<polygon fill="#000000" stroke="#000000" points="928.53,-43.37 939.03,-41.96 929.94,-36.52 928.53,-43.37"/>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge22" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M866.28,-54C880.79,-54 896.15,-54 911.06,-54"/>
-<polygon fill="#000000" stroke="#000000" points="911.3,-57.5 921.3,-54 911.3,-50.5 911.3,-57.5"/>
+<path fill="none" stroke="#000000" d="M866.28,-12C880.79,-12 896.15,-12 911.06,-12"/>
+<polygon fill="#000000" stroke="#000000" points="911.3,-15.5 921.3,-12 911.3,-8.5 911.3,-15.5"/>
 </g>
 <!-- fraggle_io_log_pl -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_node18" class="node">
 <title>fraggle_io_log_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1217,-108 1123,-108 1123,-84 1217,-84 1217,-108"/>
-<text text-anchor="middle" x="1170" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
+<polygon fill="#777777" stroke="#777777" points="1217,-66 1123,-66 1123,-42 1217,-42 1217,-66"/>
+<text text-anchor="middle" x="1170" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
 </g>
 <!-- proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl -->
 <g id="interface~~symba_collision_resolve_fragmentations~~CallsGraph_edge23" class="edge">
 <title>proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl</title>
-<path fill="none" stroke="#000000" d="M1078.79,-96C1090.15,-96 1101.64,-96 1112.45,-96"/>
-<polygon fill="#000000" stroke="#000000" points="1112.57,-99.5 1122.57,-96 1112.57,-92.5 1112.57,-99.5"/>
+<path fill="none" stroke="#000000" d="M1078.79,-54C1090.15,-54 1101.64,-54 1112.45,-54"/>
+<polygon fill="#000000" stroke="#000000" points="1112.57,-57.5 1122.57,-54 1112.57,-50.5 1112.57,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_collision_resolve_mergers.html b/docs/interface/symba_collision_resolve_mergers.html
index 5fbac8dff..f7e3f80a0 100644
--- a/docs/interface/symba_collision_resolve_mergers.html
+++ b/docs/interface/symba_collision_resolve_mergers.html
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~symba_collision_resolve_mergers~~CallsGraph Pages: 1 -->
-<svg id="interfacesymba_collision_resolve_mergersCallsGraph" width="641pt" height="124pt"
- viewBox="0.00 0.00 641.00 123.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph" class="graph" transform="scale(0.56 0.56) rotate(0) translate(4 217)">
+<svg id="interfacesymba_collision_resolve_mergersCallsGraph" width="641pt" height="112pt"
+ viewBox="0.00 0.00 641.00 111.77" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph" class="graph" transform="scale(0.56 0.56) rotate(0) translate(4 196)">
 <title>interface~~symba_collision_resolve_mergers~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-217 1143,-217 1143,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 1143,-196 1143,4 -4,4"/>
 <!-- interface~symba_collision_resolve_mergers -->
 <g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node1" class="node">
 <title>interface~symba_collision_resolve_mergers</title>
@@ -246,32 +246,32 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.1,-117C182.62,-117 191.3,-117 199.91,-117"/>
 <polygon fill="#000000" stroke="#000000" points="199.96,-120.5 209.96,-117 199.96,-113.5 199.96,-120.5"/>
 </g>
-<!-- proc~symba_collision_consolidate_colliders -->
+<!-- idx2 -->
 <g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node3" class="node">
+<title>idx2</title>
+<polygon fill="#777777" stroke="#777777" points="543.5,-192 489.5,-192 489.5,-168 543.5,-168 543.5,-192"/>
+<text text-anchor="middle" x="516.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
+</g>
+<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx2 -->
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge2" class="edge">
+<title>proc~symba_collision_resolve_mergers&#45;&gt;idx2</title>
+<path fill="none" stroke="#000000" d="M329.79,-129.07C354.23,-138.07 388.95,-150.27 420,-159 439.49,-164.48 461.55,-169.41 479.55,-173.11"/>
+<polygon fill="#000000" stroke="#000000" points="478.86,-176.55 489.36,-175.1 480.25,-169.69 478.86,-176.55"/>
+</g>
+<!-- proc~symba_collision_consolidate_colliders -->
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node4" class="node">
 <title>proc~symba_collision_consolidate_colliders</title>
-<g id="a_interface~~symba_collision_resolve_mergers~~CallsGraph_node3"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="613,-192 420,-192 420,-168 613,-168 613,-192"/>
-<text text-anchor="middle" x="516.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
+<g id="a_interface~~symba_collision_resolve_mergers~~CallsGraph_node4"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="613,-150 420,-150 420,-126 613,-126 613,-150"/>
+<text text-anchor="middle" x="516.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge2" class="edge">
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge4" class="edge">
 <title>proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders</title>
-<path fill="none" stroke="#000000" d="M329.79,-129.07C354.23,-138.07 388.95,-150.27 420,-159 428.31,-161.34 437.09,-163.57 445.82,-165.66"/>
-<polygon fill="#000000" stroke="#000000" points="445.1,-169.08 455.63,-167.94 446.69,-162.27 445.1,-169.08"/>
-</g>
-<!-- idx2 -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node4" class="node">
-<title>idx2</title>
-<polygon fill="#777777" stroke="#777777" points="543.5,-150 489.5,-150 489.5,-126 543.5,-126 543.5,-150"/>
-<text text-anchor="middle" x="516.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
-</g>
-<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx2 -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge3" class="edge">
-<title>proc~symba_collision_resolve_mergers&#45;&gt;idx2</title>
-<path fill="none" stroke="#000000" d="M384.27,-125.33C417.21,-128.51 453.03,-131.97 478.91,-134.47"/>
-<polygon fill="#000000" stroke="#000000" points="478.72,-137.96 489.01,-135.44 479.39,-131 478.72,-137.96"/>
+<path fill="none" stroke="#000000" d="M384.27,-125.33C392.63,-126.14 401.17,-126.96 409.68,-127.78"/>
+<polygon fill="#000000" stroke="#000000" points="409.36,-131.27 419.65,-128.75 410.04,-124.3 409.36,-131.27"/>
 </g>
 <!-- idx1 -->
 <g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node5" class="node">
@@ -280,7 +280,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="516.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx1</text>
 </g>
 <!-- proc~symba_collision_resolve_mergers&#45;&gt;idx1 -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge4" class="edge">
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge5" class="edge">
 <title>proc~symba_collision_resolve_mergers&#45;&gt;idx1</title>
 <path fill="none" stroke="#000000" d="M384.27,-108.67C417.21,-105.49 453.03,-102.03 478.91,-99.53"/>
 <polygon fill="#000000" stroke="#000000" points="479.39,-103 489.01,-98.56 478.72,-96.04 479.39,-103"/>
@@ -295,39 +295,39 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge5" class="edge">
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge3" class="edge">
 <title>proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge</title>
 <path fill="none" stroke="#000000" d="M329.79,-104.93C354.23,-95.93 388.95,-83.73 420,-75 428.31,-72.66 437.09,-70.43 445.82,-68.34"/>
 <polygon fill="#000000" stroke="#000000" points="446.69,-71.73 455.63,-66.06 445.1,-64.92 446.69,-71.73"/>
 </g>
-<!-- id_arr -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node7" class="node">
-<title>id_arr</title>
-<polygon fill="#777777" stroke="#777777" points="749.5,-213 695.5,-213 695.5,-189 749.5,-189 749.5,-213"/>
-<text text-anchor="middle" x="722.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
-</g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge6" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
-<path fill="none" stroke="#000000" d="M613.23,-189.85C638.97,-192.5 665.24,-195.21 685.46,-197.29"/>
-<polygon fill="#000000" stroke="#000000" points="685.15,-200.78 695.45,-198.32 685.86,-193.81 685.15,-200.78"/>
-</g>
 <!-- idx_arr -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node8" class="node">
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node7" class="node">
 <title>idx_arr</title>
 <polygon fill="#777777" stroke="#777777" points="749.5,-171 695.5,-171 695.5,-147 749.5,-147 749.5,-171"/>
 <text text-anchor="middle" x="722.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
 </g>
 <!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
-<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge7" class="edge">
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge6" class="edge">
 <title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
-<path fill="none" stroke="#000000" d="M613.23,-170.15C638.97,-167.5 665.24,-164.79 685.46,-162.71"/>
-<polygon fill="#000000" stroke="#000000" points="685.86,-166.19 695.45,-161.68 685.15,-159.22 685.86,-166.19"/>
+<path fill="none" stroke="#000000" d="M613.23,-147.85C638.97,-150.5 665.24,-153.21 685.46,-155.29"/>
+<polygon fill="#000000" stroke="#000000" points="685.15,-158.78 695.45,-156.32 685.86,-151.81 685.15,-158.78"/>
 </g>
-<!-- proc~symba_collision_casemerge -->
+<!-- id_arr -->
 <g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node9" class="node">
+<title>id_arr</title>
+<polygon fill="#777777" stroke="#777777" points="749.5,-129 695.5,-129 695.5,-105 749.5,-105 749.5,-129"/>
+<text text-anchor="middle" x="722.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
+</g>
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_edge7" class="edge">
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
+<path fill="none" stroke="#000000" d="M613.23,-128.15C638.97,-125.5 665.24,-122.79 685.46,-120.71"/>
+<polygon fill="#000000" stroke="#000000" points="685.86,-124.19 695.45,-119.68 685.15,-117.22 685.86,-124.19"/>
+</g>
+<!-- proc~symba_collision_casemerge -->
+<g id="interface~~symba_collision_resolve_mergers~~CallsGraph_node8" class="node">
 <title>proc~symba_collision_casemerge</title>
-<g id="a_interface~~symba_collision_resolve_mergers~~CallsGraph_node9"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<g id="a_interface~~symba_collision_resolve_mergers~~CallsGraph_node8"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="796,-66 649,-66 649,-42 796,-42 796,-66"/>
 <text text-anchor="middle" x="722.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
diff --git a/docs/interface/symba_discard_pl.html b/docs/interface/symba_discard_pl.html
index 805787744..eecdcb080 100644
--- a/docs/interface/symba_discard_pl.html
+++ b/docs/interface/symba_discard_pl.html
@@ -246,62 +246,62 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M99.27,-33C107.49,-33 116.1,-33 124.55,-33"/>
 <polygon fill="#000000" stroke="#000000" points="124.74,-36.5 134.74,-33 124.74,-29.5 124.74,-36.5"/>
 </g>
-<!-- proc~symba_discard_nonplpl_conservation -->
+<!-- proc~symba_discard_nonplpl -->
 <g id="interface~~symba_discard_pl~~CallsGraph_node3" class="node">
-<title>proc~symba_discard_nonplpl_conservation</title>
-<g id="a_interface~~symba_discard_pl~~CallsGraph_node3"><a xlink:href=".././proc/symba_discard_nonplpl_conservation.html" xlink:title="symba_discard_nonplpl_conservation">
-<polygon fill="#d9534f" stroke="#d9534f" points="462,-66 270,-66 270,-42 462,-42 462,-66"/>
-<text text-anchor="middle" x="366" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl_conservation</text>
+<title>proc~symba_discard_nonplpl</title>
+<g id="a_interface~~symba_discard_pl~~CallsGraph_node3"><a xlink:href=".././proc/symba_discard_nonplpl.html" xlink:title="symba_discard_nonplpl">
+<polygon fill="#d9534f" stroke="#d9534f" points="428.5,-66 303.5,-66 303.5,-42 428.5,-42 428.5,-66"/>
+<text text-anchor="middle" x="366" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation -->
+<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl -->
 <g id="interface~~symba_discard_pl~~CallsGraph_edge2" class="edge">
-<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation</title>
-<path fill="none" stroke="#000000" d="M234.08,-38.68C242.15,-39.63 250.79,-40.64 259.63,-41.67"/>
-<polygon fill="#000000" stroke="#000000" points="259.35,-45.16 269.69,-42.85 260.17,-38.21 259.35,-45.16"/>
+<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl</title>
+<path fill="none" stroke="#000000" d="M234.08,-38.68C252.28,-40.81 273.38,-43.28 293.25,-45.61"/>
+<polygon fill="#000000" stroke="#000000" points="292.85,-49.08 303.19,-46.77 293.67,-42.13 292.85,-49.08"/>
 </g>
-<!-- proc~symba_discard_nonplpl -->
+<!-- proc~symba_discard_nonplpl_conservation -->
 <g id="interface~~symba_discard_pl~~CallsGraph_node4" class="node">
-<title>proc~symba_discard_nonplpl</title>
-<g id="a_interface~~symba_discard_pl~~CallsGraph_node4"><a xlink:href=".././proc/symba_discard_nonplpl.html" xlink:title="symba_discard_nonplpl">
-<polygon fill="#d9534f" stroke="#d9534f" points="428.5,-24 303.5,-24 303.5,0 428.5,0 428.5,-24"/>
-<text text-anchor="middle" x="366" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl</text>
+<title>proc~symba_discard_nonplpl_conservation</title>
+<g id="a_interface~~symba_discard_pl~~CallsGraph_node4"><a xlink:href=".././proc/symba_discard_nonplpl_conservation.html" xlink:title="symba_discard_nonplpl_conservation">
+<polygon fill="#d9534f" stroke="#d9534f" points="462,-24 270,-24 270,0 462,0 462,-24"/>
+<text text-anchor="middle" x="366" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl_conservation</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl -->
+<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation -->
 <g id="interface~~symba_discard_pl~~CallsGraph_edge3" class="edge">
-<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl</title>
-<path fill="none" stroke="#000000" d="M234.08,-27.32C252.28,-25.19 273.38,-22.72 293.25,-20.39"/>
-<polygon fill="#000000" stroke="#000000" points="293.67,-23.87 303.19,-19.23 292.85,-16.92 293.67,-23.87"/>
+<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation</title>
+<path fill="none" stroke="#000000" d="M234.08,-27.32C242.15,-26.37 250.79,-25.36 259.63,-24.33"/>
+<polygon fill="#000000" stroke="#000000" points="260.17,-27.79 269.69,-23.15 259.35,-20.84 260.17,-27.79"/>
 </g>
 <!-- proc~symba_discard_cb_pl -->
 <g id="interface~~symba_discard_pl~~CallsGraph_node5" class="node">
 <title>proc~symba_discard_cb_pl</title>
 <g id="a_interface~~symba_discard_pl~~CallsGraph_node5"><a xlink:href=".././proc/symba_discard_cb_pl.html" xlink:title="symba_discard_cb_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="614,-24 498,-24 498,0 614,0 614,-24"/>
-<text text-anchor="middle" x="556" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_cb_pl</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="614,-66 498,-66 498,-42 614,-42 614,-66"/>
+<text text-anchor="middle" x="556" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_cb_pl</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl -->
 <g id="interface~~symba_discard_pl~~CallsGraph_edge4" class="edge">
 <title>proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl</title>
-<path fill="none" stroke="#000000" d="M428.56,-12C447.44,-12 468.31,-12 487.56,-12"/>
-<polygon fill="#000000" stroke="#000000" points="487.76,-15.5 497.76,-12 487.76,-8.5 487.76,-15.5"/>
+<path fill="none" stroke="#000000" d="M428.56,-54C447.44,-54 468.31,-54 487.56,-54"/>
+<polygon fill="#000000" stroke="#000000" points="487.76,-57.5 497.76,-54 487.76,-50.5 487.76,-57.5"/>
 </g>
 <!-- fraggle_io_log_one_message -->
 <g id="interface~~symba_discard_pl~~CallsGraph_node6" class="node">
 <title>fraggle_io_log_one_message</title>
-<polygon fill="#777777" stroke="#777777" points="804,-24 650,-24 650,0 804,0 804,-24"/>
-<text text-anchor="middle" x="727" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<polygon fill="#777777" stroke="#777777" points="804,-66 650,-66 650,-42 804,-42 804,-66"/>
+<text text-anchor="middle" x="727" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </g>
 <!-- proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message -->
 <g id="interface~~symba_discard_pl~~CallsGraph_edge5" class="edge">
 <title>proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M614.22,-12C622.47,-12 631.12,-12 639.8,-12"/>
-<polygon fill="#000000" stroke="#000000" points="639.97,-15.5 649.97,-12 639.97,-8.5 639.97,-15.5"/>
+<path fill="none" stroke="#000000" d="M614.22,-54C622.47,-54 631.12,-54 639.8,-54"/>
+<polygon fill="#000000" stroke="#000000" points="639.97,-57.5 649.97,-54 639.97,-50.5 639.97,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_encounter_check_one.html b/docs/interface/symba_encounter_check_one.html
index 7b80d91ea..8afba96c8 100644
--- a/docs/interface/symba_encounter_check_one.html
+++ b/docs/interface/symba_encounter_check_one.html
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~symba_encounter_check_one~~CallsGraph Pages: 1 -->
-<svg id="interfacesymba_encounter_check_oneCallsGraph" width="586pt" height="32pt"
- viewBox="0.00 0.00 586.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfacesymba_encounter_check_oneCallsGraph" width="471pt" height="32pt"
+ viewBox="0.00 0.00 471.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~symba_encounter_check_one~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>interface~~symba_encounter_check_one~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 582,-28 582,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 467,-28 467,4 -4,4"/>
 <!-- interface~symba_encounter_check_one -->
 <g id="interface~~symba_encounter_check_one~~CallsGraph_node1" class="node">
 <title>interface~symba_encounter_check_one</title>
@@ -246,36 +246,18 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.01,-12C164.51,-12 173.21,-12 181.83,-12"/>
 <polygon fill="#000000" stroke="#000000" points="181.88,-15.5 191.88,-12 181.88,-8.5 181.88,-15.5"/>
 </g>
-<!-- interface~rmvs_chk_ind -->
+<!-- rmvs_chk_ind -->
 <g id="interface~~symba_encounter_check_one~~CallsGraph_node3" class="node">
-<title>interface~rmvs_chk_ind</title>
-<g id="a_interface~~symba_encounter_check_one~~CallsGraph_node3"><a xlink:href=".././interface/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#a7506f" stroke="#a7506f" points="463,-24 384,-24 384,0 463,0 463,-24"/>
+<title>rmvs_chk_ind</title>
+<polygon fill="#777777" stroke="#777777" points="463,-24 384,-24 384,0 463,0 463,-24"/>
 <text text-anchor="middle" x="423.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
 </g>
-<!-- proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind -->
+<!-- proc~symba_encounter_check_one&#45;&gt;rmvs_chk_ind -->
 <g id="interface~~symba_encounter_check_one~~CallsGraph_edge2" class="edge">
-<title>proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind</title>
+<title>proc~symba_encounter_check_one&#45;&gt;rmvs_chk_ind</title>
 <path fill="none" stroke="#000000" d="M348.08,-12C356.82,-12 365.53,-12 373.76,-12"/>
 <polygon fill="#000000" stroke="#000000" points="373.88,-15.5 383.88,-12 373.88,-8.5 373.88,-15.5"/>
 </g>
-<!-- proc~rmvs_chk_ind -->
-<g id="interface~~symba_encounter_check_one~~CallsGraph_node4" class="node">
-<title>proc~rmvs_chk_ind</title>
-<g id="a_interface~~symba_encounter_check_one~~CallsGraph_node4"><a xlink:href=".././proc/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="578,-24 499,-24 499,0 578,0 578,-24"/>
-<text text-anchor="middle" x="538.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
-</g>
-<!-- interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind -->
-<g id="interface~~symba_encounter_check_one~~CallsGraph_edge3" class="edge">
-<title>interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M463.07,-12C471.25,-12 480,-12 488.51,-12"/>
-<polygon fill="#000000" stroke="#000000" points="488.72,-15.5 498.72,-12 488.72,-8.5 488.72,-15.5"/>
-</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
@@ -345,7 +327,7 @@ <h3 class="panel-title">Calls</h3>
     <br>
     
       <h2>
-public pure elemental module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+public pure module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
     
     
    
@@ -376,7 +358,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-xr~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~3"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -391,7 +373,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-yr~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~3"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -406,7 +388,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-zr~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~3"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -421,7 +403,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vxr~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-vxr~3"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -436,7 +418,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vyr~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-vyr~3"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -451,7 +433,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vzr~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-vzr~3"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -526,7 +508,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-lencounter~4"></span>logical,</td>
+  <td><span class="anchor" id="variable-lencounter~5"></span>logical,</td>
   <td>intent(out)</td>
   <td></td>
   
@@ -541,7 +523,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-lvdotr~3"></span>logical,</td>
+  <td><span class="anchor" id="variable-lvdotr~4"></span>logical,</td>
   <td>intent(out)</td>
   <td></td>
   
diff --git a/docs/interface/symba_encounter_check_pl.html b/docs/interface/symba_encounter_check_pl.html
index 5b4f70fd0..edcefdf7e 100644
--- a/docs/interface/symba_encounter_check_pl.html
+++ b/docs/interface/symba_encounter_check_pl.html
@@ -220,46 +220,58 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~symba_encounter_check_pl~~CallsGraph Pages: 1 -->
-<svg id="interfacesymba_encounter_check_plCallsGraph" width="520pt" height="32pt"
- viewBox="0.00 0.00 520.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~symba_encounter_check_pl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<svg id="interfacesymba_encounter_check_plCallsGraph" width="520pt" height="74pt"
+ viewBox="0.00 0.00 520.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~symba_encounter_check_pl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>interface~~symba_encounter_check_pl~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 516,-28 516,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 516,-70 516,4 -4,4"/>
 <!-- interface~symba_encounter_check_pl -->
 <g id="interface~~symba_encounter_check_pl~~CallsGraph_node1" class="node">
 <title>interface~symba_encounter_check_pl</title>
-<polygon fill="none" stroke="black" points="146,-24 0,-24 0,0 146,0 146,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_encounter_check_pl</text>
+<polygon fill="none" stroke="black" points="146,-45 0,-45 0,-21 146,-21 146,-45"/>
+<text text-anchor="middle" x="73" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_encounter_check_pl</text>
 </g>
 <!-- proc~symba_encounter_check_pl -->
 <g id="interface~~symba_encounter_check_pl~~CallsGraph_node2" class="node">
 <title>proc~symba_encounter_check_pl</title>
 <g id="a_interface~~symba_encounter_check_pl~~CallsGraph_node2"><a xlink:href=".././proc/symba_encounter_check_pl.html" xlink:title="symba_encounter_check_pl">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-24 182,-24 182,0 328,0 328,-24"/>
-<text text-anchor="middle" x="255" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_pl</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-45 182,-45 182,-21 328,-21 328,-45"/>
+<text text-anchor="middle" x="255" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_pl -->
 <g id="interface~~symba_encounter_check_pl~~CallsGraph_edge1" class="edge">
 <title>interface~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.18,-12C154.52,-12 163.08,-12 171.54,-12"/>
-<polygon fill="#000000" stroke="#000000" points="171.81,-15.5 181.81,-12 171.81,-8.5 171.81,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.18,-33C154.52,-33 163.08,-33 171.54,-33"/>
+<polygon fill="#000000" stroke="#000000" points="171.81,-36.5 181.81,-33 171.81,-29.5 171.81,-36.5"/>
 </g>
-<!-- proc~symba_encounter_check_all -->
+<!-- util_index_eucl_ij_to_k -->
 <g id="interface~~symba_encounter_check_pl~~CallsGraph_node3" class="node">
+<title>util_index_eucl_ij_to_k</title>
+<polygon fill="#777777" stroke="#777777" points="498,-66 378,-66 378,-42 498,-42 498,-66"/>
+<text text-anchor="middle" x="438" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</g>
+<!-- proc~symba_encounter_check_pl&#45;&gt;util_index_eucl_ij_to_k -->
+<g id="interface~~symba_encounter_check_pl~~CallsGraph_edge2" class="edge">
+<title>proc~symba_encounter_check_pl&#45;&gt;util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M328.06,-41.36C341.12,-42.88 354.73,-44.45 367.72,-45.96"/>
+<polygon fill="#000000" stroke="#000000" points="367.64,-49.48 377.98,-47.15 368.45,-42.52 367.64,-49.48"/>
+</g>
+<!-- proc~symba_encounter_check_all -->
+<g id="interface~~symba_encounter_check_pl~~CallsGraph_node4" class="node">
 <title>proc~symba_encounter_check_all</title>
-<g id="a_interface~~symba_encounter_check_pl~~CallsGraph_node3"><a xlink:href=".././proc/symba_encounter_check_all.html" xlink:title="symba_encounter_check_all">
+<g id="a_interface~~symba_encounter_check_pl~~CallsGraph_node4"><a xlink:href=".././proc/symba_encounter_check_all.html" xlink:title="symba_encounter_check_all">
 <polygon fill="#d9534f" stroke="#d9534f" points="512,-24 364,-24 364,0 512,0 512,-24"/>
 <text text-anchor="middle" x="438" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_all</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all -->
-<g id="interface~~symba_encounter_check_pl~~CallsGraph_edge2" class="edge">
+<g id="interface~~symba_encounter_check_pl~~CallsGraph_edge3" class="edge">
 <title>proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all</title>
-<path fill="none" stroke="#000000" d="M328.06,-12C336.49,-12 345.14,-12 353.71,-12"/>
-<polygon fill="#000000" stroke="#000000" points="353.71,-15.5 363.71,-12 353.71,-8.5 353.71,-15.5"/>
+<path fill="none" stroke="#000000" d="M328.06,-24.64C336.49,-23.66 345.14,-22.66 353.71,-21.66"/>
+<polygon fill="#000000" stroke="#000000" points="354.18,-25.13 363.71,-20.5 353.37,-18.18 354.18,-25.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_io_param_reader.html b/docs/interface/symba_io_param_reader.html
index 910f5b0b1..f6d72b30e 100644
--- a/docs/interface/symba_io_param_reader.html
+++ b/docs/interface/symba_io_param_reader.html
@@ -246,51 +246,51 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M133.02,-75C141.5,-75 150.23,-75 158.85,-75"/>
 <polygon fill="#000000" stroke="#000000" points="158.89,-78.5 168.89,-75 158.89,-71.5 158.89,-78.5"/>
 </g>
-<!-- fraggle_io_log_start -->
+<!-- io_get_token -->
 <g id="interface~~symba_io_param_reader~~CallsGraph_node3" class="node">
-<title>fraggle_io_log_start</title>
-<polygon fill="#777777" stroke="#777777" points="445,-150 338,-150 338,-126 445,-126 445,-150"/>
-<text text-anchor="middle" x="391.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
+<title>io_get_token</title>
+<polygon fill="#777777" stroke="#777777" points="428.5,-150 354.5,-150 354.5,-126 428.5,-126 428.5,-150"/>
+<text text-anchor="middle" x="391.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start -->
+<!-- proc~symba_io_param_reader&#45;&gt;io_get_token -->
 <g id="interface~~symba_io_param_reader~~CallsGraph_edge2" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start</title>
+<title>proc~symba_io_param_reader&#45;&gt;io_get_token</title>
 <path fill="none" stroke="#000000" d="M265.34,-87.04C285.63,-95.49 313.45,-107.01 338,-117 342.15,-118.69 346.49,-120.44 350.83,-122.19"/>
 <polygon fill="#000000" stroke="#000000" points="349.63,-125.48 360.21,-125.96 352.24,-118.98 349.63,-125.48"/>
 </g>
-<!-- io_param_reader -->
+<!-- io_toupper -->
 <g id="interface~~symba_io_param_reader~~CallsGraph_node4" class="node">
+<title>io_toupper</title>
+<polygon fill="#777777" stroke="#777777" points="423.5,-108 359.5,-108 359.5,-84 423.5,-84 423.5,-108"/>
+<text text-anchor="middle" x="391.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+</g>
+<!-- proc~symba_io_param_reader&#45;&gt;io_toupper -->
+<g id="interface~~symba_io_param_reader~~CallsGraph_edge5" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;io_toupper</title>
+<path fill="none" stroke="#000000" d="M302.26,-83.97C318.18,-86.14 334.75,-88.4 349.18,-90.37"/>
+<polygon fill="#000000" stroke="#000000" points="348.89,-93.86 359.27,-91.74 349.83,-86.92 348.89,-93.86"/>
+</g>
+<!-- io_param_reader -->
+<g id="interface~~symba_io_param_reader~~CallsGraph_node5" class="node">
 <title>io_param_reader</title>
-<polygon fill="#777777" stroke="#777777" points="439,-108 344,-108 344,-84 439,-84 439,-108"/>
-<text text-anchor="middle" x="391.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<polygon fill="#777777" stroke="#777777" points="439,-66 344,-66 344,-42 439,-42 439,-66"/>
+<text text-anchor="middle" x="391.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </g>
 <!-- proc~symba_io_param_reader&#45;&gt;io_param_reader -->
 <g id="interface~~symba_io_param_reader~~CallsGraph_edge3" class="edge">
 <title>proc~symba_io_param_reader&#45;&gt;io_param_reader</title>
-<path fill="none" stroke="#000000" d="M302.26,-83.97C312.68,-85.39 323.38,-86.85 333.58,-88.24"/>
-<polygon fill="#000000" stroke="#000000" points="333.2,-91.72 343.58,-89.6 334.15,-84.78 333.2,-91.72"/>
+<path fill="none" stroke="#000000" d="M302.26,-66.03C312.68,-64.61 323.38,-63.15 333.58,-61.76"/>
+<polygon fill="#000000" stroke="#000000" points="334.15,-65.22 343.58,-60.4 333.2,-58.28 334.15,-65.22"/>
 </g>
-<!-- io_toupper -->
-<g id="interface~~symba_io_param_reader~~CallsGraph_node5" class="node">
-<title>io_toupper</title>
-<polygon fill="#777777" stroke="#777777" points="423.5,-66 359.5,-66 359.5,-42 423.5,-42 423.5,-66"/>
-<text text-anchor="middle" x="391.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
-</g>
-<!-- proc~symba_io_param_reader&#45;&gt;io_toupper -->
-<g id="interface~~symba_io_param_reader~~CallsGraph_edge4" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;io_toupper</title>
-<path fill="none" stroke="#000000" d="M302.26,-66.03C318.18,-63.86 334.75,-61.6 349.18,-59.63"/>
-<polygon fill="#000000" stroke="#000000" points="349.83,-63.08 359.27,-58.26 348.89,-56.14 349.83,-63.08"/>
-</g>
-<!-- io_get_token -->
+<!-- fraggle_io_log_start -->
 <g id="interface~~symba_io_param_reader~~CallsGraph_node6" class="node">
-<title>io_get_token</title>
-<polygon fill="#777777" stroke="#777777" points="428.5,-24 354.5,-24 354.5,0 428.5,0 428.5,-24"/>
-<text text-anchor="middle" x="391.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<title>fraggle_io_log_start</title>
+<polygon fill="#777777" stroke="#777777" points="445,-24 338,-24 338,0 445,0 445,-24"/>
+<text text-anchor="middle" x="391.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;io_get_token -->
-<g id="interface~~symba_io_param_reader~~CallsGraph_edge5" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;io_get_token</title>
+<!-- proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start -->
+<g id="interface~~symba_io_param_reader~~CallsGraph_edge4" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start</title>
 <path fill="none" stroke="#000000" d="M265.34,-62.96C285.63,-54.51 313.45,-42.99 338,-33 342.15,-31.31 346.49,-29.56 350.83,-27.81"/>
 <polygon fill="#000000" stroke="#000000" points="352.24,-31.02 360.21,-24.04 349.63,-24.52 352.24,-31.02"/>
 </g>
diff --git a/docs/interface/symba_util_append_merger.html b/docs/interface/symba_util_append_merger.html
index f09e53eac..c223c3263 100644
--- a/docs/interface/symba_util_append_merger.html
+++ b/docs/interface/symba_util_append_merger.html
@@ -261,33 +261,33 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M310.44,-66.04C327.51,-69.43 346.47,-72.78 364,-75 474.69,-89 606.18,-93.71 672.75,-95.26"/>
 <polygon fill="#000000" stroke="#000000" points="672.79,-98.76 682.86,-95.48 672.94,-91.76 672.79,-98.76"/>
 </g>
-<!-- interface~symba_util_append_pl -->
+<!-- util_exit -->
 <g id="interface~~symba_util_append_merger~~CallsGraph_node4" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="744,-24 690,-24 690,0 744,0 744,-24"/>
+<text text-anchor="middle" x="717" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_append_merger&#45;&gt;util_exit -->
+<g id="interface~~symba_util_append_merger~~CallsGraph_edge3" class="edge">
+<title>proc~symba_util_append_merger&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M310.44,-41.96C327.51,-38.57 346.47,-35.22 364,-33 478.54,-18.51 615.35,-13.97 679.46,-12.59"/>
+<polygon fill="#000000" stroke="#000000" points="679.91,-16.08 689.84,-12.38 679.77,-9.08 679.91,-16.08"/>
+</g>
+<!-- interface~symba_util_append_pl -->
+<g id="interface~~symba_util_append_merger~~CallsGraph_node5" class="node">
 <title>interface~symba_util_append_pl</title>
-<g id="a_interface~~symba_util_append_merger~~CallsGraph_node4"><a xlink:href=".././interface/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
+<g id="a_interface~~symba_util_append_merger~~CallsGraph_node5"><a xlink:href=".././interface/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="484,-66 364,-66 364,-42 484,-42 484,-66"/>
 <text text-anchor="middle" x="424" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl -->
-<g id="interface~~symba_util_append_merger~~CallsGraph_edge3" class="edge">
+<g id="interface~~symba_util_append_merger~~CallsGraph_edge4" class="edge">
 <title>proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl</title>
 <path fill="none" stroke="#000000" d="M328.28,-54C336.74,-54 345.35,-54 353.77,-54"/>
 <polygon fill="#000000" stroke="#000000" points="353.92,-57.5 363.92,-54 353.92,-50.5 353.92,-57.5"/>
 </g>
-<!-- util_exit -->
-<g id="interface~~symba_util_append_merger~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="744,-24 690,-24 690,0 744,0 744,-24"/>
-<text text-anchor="middle" x="717" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_append_merger&#45;&gt;util_exit -->
-<g id="interface~~symba_util_append_merger~~CallsGraph_edge4" class="edge">
-<title>proc~symba_util_append_merger&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M310.44,-41.96C327.51,-38.57 346.47,-35.22 364,-33 478.54,-18.51 615.35,-13.97 679.46,-12.59"/>
-<polygon fill="#000000" stroke="#000000" points="679.91,-16.08 689.84,-12.38 679.77,-9.08 679.91,-16.08"/>
-</g>
 <!-- proc~symba_util_append_pl -->
 <g id="interface~~symba_util_append_merger~~CallsGraph_node6" class="node">
 <title>proc~symba_util_append_pl</title>
diff --git a/docs/interface/symba_util_append_tp.html b/docs/interface/symba_util_append_tp.html
index c5ede93d0..ac50bba6d 100644
--- a/docs/interface/symba_util_append_tp.html
+++ b/docs/interface/symba_util_append_tp.html
@@ -261,29 +261,29 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M257.47,-66.04C274.27,-71.22 293.98,-77.31 311.22,-82.64"/>
 <polygon fill="#000000" stroke="#000000" points="310.47,-86.07 321.06,-85.67 312.53,-79.38 310.47,-86.07"/>
 </g>
-<!-- util_append_tp -->
+<!-- util_exit -->
 <g id="interface~~symba_util_append_tp~~CallsGraph_node4" class="node">
-<title>util_append_tp</title>
-<polygon fill="#777777" stroke="#777777" points="397,-66 314,-66 314,-42 397,-42 397,-66"/>
-<text text-anchor="middle" x="355.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="382.5,-66 328.5,-66 328.5,-42 382.5,-42 382.5,-66"/>
+<text text-anchor="middle" x="355.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_util_append_tp&#45;&gt;util_append_tp -->
+<!-- proc~symba_util_append_tp&#45;&gt;util_exit -->
 <g id="interface~~symba_util_append_tp~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;util_append_tp</title>
-<path fill="none" stroke="#000000" d="M278.15,-54C286.58,-54 295.19,-54 303.44,-54"/>
-<polygon fill="#000000" stroke="#000000" points="303.66,-57.5 313.66,-54 303.66,-50.5 303.66,-57.5"/>
+<title>proc~symba_util_append_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M278.15,-54C291.73,-54 305.76,-54 318.03,-54"/>
+<polygon fill="#000000" stroke="#000000" points="318.31,-57.5 328.31,-54 318.31,-50.5 318.31,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_append_tp -->
 <g id="interface~~symba_util_append_tp~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="382.5,-24 328.5,-24 328.5,0 382.5,0 382.5,-24"/>
-<text text-anchor="middle" x="355.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_append_tp</title>
+<polygon fill="#777777" stroke="#777777" points="397,-24 314,-24 314,0 397,0 397,-24"/>
+<text text-anchor="middle" x="355.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </g>
-<!-- proc~symba_util_append_tp&#45;&gt;util_exit -->
+<!-- proc~symba_util_append_tp&#45;&gt;util_append_tp -->
 <g id="interface~~symba_util_append_tp~~CallsGraph_edge4" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M257.47,-41.96C276.77,-36.01 299.9,-28.86 318.74,-23.04"/>
-<polygon fill="#000000" stroke="#000000" points="319.91,-26.35 328.43,-20.05 317.84,-19.66 319.91,-26.35"/>
+<title>proc~symba_util_append_tp&#45;&gt;util_append_tp</title>
+<path fill="none" stroke="#000000" d="M257.47,-41.96C272.55,-37.31 289.98,-31.93 305.86,-27.02"/>
+<polygon fill="#000000" stroke="#000000" points="307,-30.33 315.52,-24.04 304.93,-23.64 307,-30.33"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_fill_pl.html b/docs/interface/symba_util_fill_pl.html
index f60f1bd25..c4b025755 100644
--- a/docs/interface/symba_util_fill_pl.html
+++ b/docs/interface/symba_util_fill_pl.html
@@ -246,44 +246,44 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-54C102.46,-54 111.13,-54 119.63,-54"/>
 <polygon fill="#000000" stroke="#000000" points="119.86,-57.5 129.86,-54 119.86,-50.5 119.86,-57.5"/>
 </g>
-<!-- interface~util_fill -->
+<!-- util_exit -->
 <g id="interface~~symba_util_fill_pl~~CallsGraph_node3" class="node">
-<title>interface~util_fill</title>
-<g id="a_interface~~symba_util_fill_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
-<polygon fill="#a7506f" stroke="#a7506f" points="315,-108 261,-108 261,-84 315,-84 315,-108"/>
-<text text-anchor="middle" x="288" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
-</a>
-</g>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="315,-108 261,-108 261,-84 315,-84 315,-108"/>
+<text text-anchor="middle" x="288" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;interface~util_fill -->
+<!-- proc~symba_util_fill_pl&#45;&gt;util_exit -->
 <g id="interface~~symba_util_fill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;interface~util_fill</title>
+<title>proc~symba_util_fill_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M209.24,-66.04C222.4,-71.11 237.79,-77.04 251.39,-82.28"/>
 <polygon fill="#000000" stroke="#000000" points="250.33,-85.62 260.92,-85.95 252.84,-79.09 250.33,-85.62"/>
 </g>
-<!-- util_fill_pl -->
+<!-- interface~util_fill -->
 <g id="interface~~symba_util_fill_pl~~CallsGraph_node4" class="node">
-<title>util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="316,-66 260,-66 260,-42 316,-42 316,-66"/>
-<text text-anchor="middle" x="288" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<title>interface~util_fill</title>
+<g id="a_interface~~symba_util_fill_pl~~CallsGraph_node4"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
+<polygon fill="#a7506f" stroke="#a7506f" points="315,-66 261,-66 261,-42 315,-42 315,-66"/>
+<text text-anchor="middle" x="288" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+</a>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;util_fill_pl -->
+</g>
+<!-- proc~symba_util_fill_pl&#45;&gt;interface~util_fill -->
 <g id="interface~~symba_util_fill_pl~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M224.23,-54C232.79,-54 241.64,-54 249.89,-54"/>
-<polygon fill="#000000" stroke="#000000" points="249.96,-57.5 259.96,-54 249.96,-50.5 249.96,-57.5"/>
+<title>proc~symba_util_fill_pl&#45;&gt;interface~util_fill</title>
+<path fill="none" stroke="#000000" d="M224.23,-54C233.14,-54 242.35,-54 250.88,-54"/>
+<polygon fill="#000000" stroke="#000000" points="250.88,-57.5 260.88,-54 250.88,-50.5 250.88,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill_pl -->
 <g id="interface~~symba_util_fill_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="315,-24 261,-24 261,0 315,0 315,-24"/>
-<text text-anchor="middle" x="288" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="316,-24 260,-24 260,0 316,0 316,-24"/>
+<text text-anchor="middle" x="288" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;util_exit -->
+<!-- proc~symba_util_fill_pl&#45;&gt;util_fill_pl -->
 <g id="interface~~symba_util_fill_pl~~CallsGraph_edge4" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M209.24,-41.96C222.4,-36.89 237.79,-30.96 251.39,-25.72"/>
-<polygon fill="#000000" stroke="#000000" points="252.84,-28.91 260.92,-22.05 250.33,-22.38 252.84,-28.91"/>
+<title>proc~symba_util_fill_pl&#45;&gt;util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M209.24,-41.96C222.09,-37.01 237.08,-31.24 250.44,-26.09"/>
+<polygon fill="#000000" stroke="#000000" points="251.76,-29.33 259.83,-22.47 249.24,-22.8 251.76,-29.33"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_fill_tp.html b/docs/interface/symba_util_fill_tp.html
index 004f7dd19..2df7605ae 100644
--- a/docs/interface/symba_util_fill_tp.html
+++ b/docs/interface/symba_util_fill_tp.html
@@ -246,44 +246,44 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-54C102.46,-54 111.13,-54 119.63,-54"/>
 <polygon fill="#000000" stroke="#000000" points="119.86,-57.5 129.86,-54 119.86,-50.5 119.86,-57.5"/>
 </g>
-<!-- interface~util_fill -->
+<!-- util_exit -->
 <g id="interface~~symba_util_fill_tp~~CallsGraph_node3" class="node">
-<title>interface~util_fill</title>
-<g id="a_interface~~symba_util_fill_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
-<polygon fill="#a7506f" stroke="#a7506f" points="315.5,-108 261.5,-108 261.5,-84 315.5,-84 315.5,-108"/>
-<text text-anchor="middle" x="288.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
-</a>
-</g>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="315.5,-108 261.5,-108 261.5,-84 315.5,-84 315.5,-108"/>
+<text text-anchor="middle" x="288.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;interface~util_fill -->
+<!-- proc~symba_util_fill_tp&#45;&gt;util_exit -->
 <g id="interface~~symba_util_fill_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;interface~util_fill</title>
+<title>proc~symba_util_fill_tp&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M209.38,-66.04C222.6,-71.11 238.06,-77.04 251.72,-82.28"/>
 <polygon fill="#000000" stroke="#000000" points="250.71,-85.64 261.3,-85.95 253.21,-79.1 250.71,-85.64"/>
 </g>
-<!-- util_fill_tp -->
+<!-- interface~util_fill -->
 <g id="interface~~symba_util_fill_tp~~CallsGraph_node4" class="node">
-<title>util_fill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="317,-66 260,-66 260,-42 317,-42 317,-66"/>
-<text text-anchor="middle" x="288.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<title>interface~util_fill</title>
+<g id="a_interface~~symba_util_fill_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
+<polygon fill="#a7506f" stroke="#a7506f" points="315.5,-66 261.5,-66 261.5,-42 315.5,-42 315.5,-66"/>
+<text text-anchor="middle" x="288.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+</a>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;util_fill_tp -->
+</g>
+<!-- proc~symba_util_fill_tp&#45;&gt;interface~util_fill -->
 <g id="interface~~symba_util_fill_tp~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;util_fill_tp</title>
-<path fill="none" stroke="#000000" d="M224.12,-54C232.67,-54 241.5,-54 249.77,-54"/>
-<polygon fill="#000000" stroke="#000000" points="249.86,-57.5 259.86,-54 249.86,-50.5 249.86,-57.5"/>
+<title>proc~symba_util_fill_tp&#45;&gt;interface~util_fill</title>
+<path fill="none" stroke="#000000" d="M224.12,-54C233.18,-54 242.56,-54 251.24,-54"/>
+<polygon fill="#000000" stroke="#000000" points="251.41,-57.5 261.41,-54 251.41,-50.5 251.41,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill_tp -->
 <g id="interface~~symba_util_fill_tp~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="315.5,-24 261.5,-24 261.5,0 315.5,0 315.5,-24"/>
-<text text-anchor="middle" x="288.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_fill_tp</title>
+<polygon fill="#777777" stroke="#777777" points="317,-24 260,-24 260,0 317,0 317,-24"/>
+<text text-anchor="middle" x="288.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;util_exit -->
+<!-- proc~symba_util_fill_tp&#45;&gt;util_fill_tp -->
 <g id="interface~~symba_util_fill_tp~~CallsGraph_edge4" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M209.38,-41.96C222.6,-36.89 238.06,-30.96 251.72,-25.72"/>
-<polygon fill="#000000" stroke="#000000" points="253.21,-28.9 261.3,-22.05 250.71,-22.36 253.21,-28.9"/>
+<title>proc~symba_util_fill_tp&#45;&gt;util_fill_tp</title>
+<path fill="none" stroke="#000000" d="M209.38,-41.96C222.19,-37.05 237.11,-31.33 250.46,-26.21"/>
+<polygon fill="#000000" stroke="#000000" points="251.76,-29.46 259.84,-22.61 249.25,-22.92 251.76,-29.46"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_index_eucl_plpl.html b/docs/interface/symba_util_index_eucl_plpl.html
index 3e6d96c98..1605adfa9 100644
--- a/docs/interface/symba_util_index_eucl_plpl.html
+++ b/docs/interface/symba_util_index_eucl_plpl.html
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~symba_util_index_eucl_plpl~~CallsGraph Pages: 1 -->
-<svg id="interfacesymba_util_index_eucl_plplCallsGraph" width="330pt" height="32pt"
- viewBox="0.00 0.00 330.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfacesymba_util_index_eucl_plplCallsGraph" width="486pt" height="32pt"
+ viewBox="0.00 0.00 486.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~symba_util_index_eucl_plpl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>interface~~symba_util_index_eucl_plpl~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 326,-28 326,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 482,-28 482,4 -4,4"/>
 <!-- interface~symba_util_index_eucl_plpl -->
 <g id="interface~~symba_util_index_eucl_plpl~~CallsGraph_node1" class="node">
 <title>interface~symba_util_index_eucl_plpl</title>
@@ -246,6 +246,18 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.22,-12C151.57,-12 160.14,-12 168.62,-12"/>
 <polygon fill="#000000" stroke="#000000" points="168.89,-15.5 178.89,-12 168.89,-8.5 168.89,-15.5"/>
 </g>
+<!-- util_index_eucl_ij_to_k -->
+<g id="interface~~symba_util_index_eucl_plpl~~CallsGraph_node3" class="node">
+<title>util_index_eucl_ij_to_k</title>
+<polygon fill="#777777" stroke="#777777" points="478,-24 358,-24 358,0 478,0 478,-24"/>
+<text text-anchor="middle" x="418" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</g>
+<!-- proc~symba_util_index_eucl_plpl&#45;&gt;util_index_eucl_ij_to_k -->
+<g id="interface~~symba_util_index_eucl_plpl~~CallsGraph_edge2" class="edge">
+<title>proc~symba_util_index_eucl_plpl&#45;&gt;util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M322.17,-12C330.6,-12 339.2,-12 347.62,-12"/>
+<polygon fill="#000000" stroke="#000000" points="347.76,-15.5 357.76,-12 347.76,-8.5 347.76,-15.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/symba_util_resize_tp.html b/docs/interface/symba_util_resize_tp.html
index a5239c0c5..dd029149a 100644
--- a/docs/interface/symba_util_resize_tp.html
+++ b/docs/interface/symba_util_resize_tp.html
@@ -246,32 +246,32 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M113.07,-33C121.49,-33 130.24,-33 138.84,-33"/>
 <polygon fill="#000000" stroke="#000000" points="138.85,-36.5 148.85,-33 138.85,-29.5 138.85,-36.5"/>
 </g>
-<!-- interface~util_resize -->
+<!-- util_resize_tp -->
 <g id="interface~~symba_util_resize_tp~~CallsGraph_node3" class="node">
-<title>interface~util_resize</title>
-<g id="a_interface~~symba_util_resize_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_resize.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="366.5,-66 305.5,-66 305.5,-42 366.5,-42 366.5,-66"/>
-<text text-anchor="middle" x="336" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
-</a>
-</g>
+<title>util_resize_tp</title>
+<polygon fill="#777777" stroke="#777777" points="374,-66 298,-66 298,-42 374,-42 374,-66"/>
+<text text-anchor="middle" x="336" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </g>
-<!-- proc~symba_util_resize_tp&#45;&gt;interface~util_resize -->
+<!-- proc~symba_util_resize_tp&#45;&gt;util_resize_tp -->
 <g id="interface~~symba_util_resize_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_resize_tp&#45;&gt;interface~util_resize</title>
-<path fill="none" stroke="#000000" d="M262.11,-42.09C273.31,-43.92 284.85,-45.8 295.37,-47.52"/>
-<polygon fill="#000000" stroke="#000000" points="295.05,-51.02 305.48,-49.18 296.18,-44.11 295.05,-51.02"/>
+<title>proc~symba_util_resize_tp&#45;&gt;util_resize_tp</title>
+<path fill="none" stroke="#000000" d="M262.11,-42.09C270.7,-43.49 279.49,-44.93 287.87,-46.3"/>
+<polygon fill="#000000" stroke="#000000" points="287.4,-49.77 297.83,-47.93 288.53,-42.86 287.4,-49.77"/>
 </g>
-<!-- util_resize_tp -->
+<!-- interface~util_resize -->
 <g id="interface~~symba_util_resize_tp~~CallsGraph_node4" class="node">
-<title>util_resize_tp</title>
-<polygon fill="#777777" stroke="#777777" points="374,-24 298,-24 298,0 374,0 374,-24"/>
-<text text-anchor="middle" x="336" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<title>interface~util_resize</title>
+<g id="a_interface~~symba_util_resize_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_resize.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="366.5,-24 305.5,-24 305.5,0 366.5,0 366.5,-24"/>
+<text text-anchor="middle" x="336" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+</a>
 </g>
-<!-- proc~symba_util_resize_tp&#45;&gt;util_resize_tp -->
+</g>
+<!-- proc~symba_util_resize_tp&#45;&gt;interface~util_resize -->
 <g id="interface~~symba_util_resize_tp~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_resize_tp&#45;&gt;util_resize_tp</title>
-<path fill="none" stroke="#000000" d="M262.11,-23.91C270.7,-22.51 279.49,-21.07 287.87,-19.7"/>
-<polygon fill="#000000" stroke="#000000" points="288.53,-23.14 297.83,-18.07 287.4,-16.23 288.53,-23.14"/>
+<title>proc~symba_util_resize_tp&#45;&gt;interface~util_resize</title>
+<path fill="none" stroke="#000000" d="M262.11,-23.91C273.31,-22.08 284.85,-20.2 295.37,-18.48"/>
+<polygon fill="#000000" stroke="#000000" points="296.18,-21.89 305.48,-16.82 295.05,-14.98 296.18,-21.89"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_sort_rearrange_pl.html b/docs/interface/symba_util_sort_rearrange_pl.html
index 32c04bfd1..ac21efa85 100644
--- a/docs/interface/symba_util_sort_rearrange_pl.html
+++ b/docs/interface/symba_util_sort_rearrange_pl.html
@@ -246,32 +246,32 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.1,-33C163.56,-33 172.22,-33 180.79,-33"/>
 <polygon fill="#000000" stroke="#000000" points="180.79,-36.5 190.79,-33 180.79,-29.5 180.79,-36.5"/>
 </g>
-<!-- interface~util_sort_rearrange -->
+<!-- util_sort_rearrange_pl -->
 <g id="interface~~symba_util_sort_rearrange_pl~~CallsGraph_node3" class="node">
-<title>interface~util_sort_rearrange</title>
-<g id="a_interface~~symba_util_sort_rearrange_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="492.5,-66 389.5,-66 389.5,-42 492.5,-42 492.5,-66"/>
-<text text-anchor="middle" x="441" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
-</a>
-</g>
+<title>util_sort_rearrange_pl</title>
+<polygon fill="#777777" stroke="#777777" points="500,-66 382,-66 382,-42 500,-42 500,-66"/>
+<text text-anchor="middle" x="441" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </g>
-<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange -->
+<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
 <g id="interface~~symba_util_sort_rearrange_pl~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M346.27,-42.46C357.26,-43.81 368.43,-45.19 379.06,-46.49"/>
-<polygon fill="#000000" stroke="#000000" points="378.7,-49.98 389.05,-47.72 379.55,-43.03 378.7,-49.98"/>
+<title>proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" d="M346.27,-42.46C354.75,-43.5 363.35,-44.56 371.72,-45.59"/>
+<polygon fill="#000000" stroke="#000000" points="371.44,-49.08 381.79,-46.83 372.29,-42.13 371.44,-49.08"/>
 </g>
-<!-- util_sort_rearrange_pl -->
+<!-- interface~util_sort_rearrange -->
 <g id="interface~~symba_util_sort_rearrange_pl~~CallsGraph_node4" class="node">
-<title>util_sort_rearrange_pl</title>
-<polygon fill="#777777" stroke="#777777" points="500,-24 382,-24 382,0 500,0 500,-24"/>
-<text text-anchor="middle" x="441" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<title>interface~util_sort_rearrange</title>
+<g id="a_interface~~symba_util_sort_rearrange_pl~~CallsGraph_node4"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="492.5,-24 389.5,-24 389.5,0 492.5,0 492.5,-24"/>
+<text text-anchor="middle" x="441" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+</a>
 </g>
-<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
+</g>
+<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange -->
 <g id="interface~~symba_util_sort_rearrange_pl~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" d="M346.27,-23.54C354.75,-22.5 363.35,-21.44 371.72,-20.41"/>
-<polygon fill="#000000" stroke="#000000" points="372.29,-23.87 381.79,-19.17 371.44,-16.92 372.29,-23.87"/>
+<title>proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M346.27,-23.54C357.26,-22.19 368.43,-20.81 379.06,-19.51"/>
+<polygon fill="#000000" stroke="#000000" points="379.55,-22.97 389.05,-18.28 378.7,-16.02 379.55,-22.97"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_sort_rearrange_tp.html b/docs/interface/symba_util_sort_rearrange_tp.html
index 0acda41d5..926c3c5f1 100644
--- a/docs/interface/symba_util_sort_rearrange_tp.html
+++ b/docs/interface/symba_util_sort_rearrange_tp.html
@@ -246,32 +246,32 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.01,-33C164.51,-33 173.21,-33 181.83,-33"/>
 <polygon fill="#000000" stroke="#000000" points="181.88,-36.5 191.88,-33 181.88,-29.5 181.88,-36.5"/>
 </g>
-<!-- interface~util_sort_rearrange -->
+<!-- util_sort_rearrange_tp -->
 <g id="interface~~symba_util_sort_rearrange_tp~~CallsGraph_node3" class="node">
-<title>interface~util_sort_rearrange</title>
-<g id="a_interface~~symba_util_sort_rearrange_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="494.5,-66 391.5,-66 391.5,-42 494.5,-42 494.5,-66"/>
-<text text-anchor="middle" x="443" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
-</a>
-</g>
+<title>util_sort_rearrange_tp</title>
+<polygon fill="#777777" stroke="#777777" points="502,-66 384,-66 384,-42 502,-42 502,-66"/>
+<text text-anchor="middle" x="443" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </g>
-<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange -->
+<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
 <g id="interface~~symba_util_sort_rearrange_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M348.49,-42.52C359.48,-43.87 370.64,-45.24 381.24,-46.54"/>
-<polygon fill="#000000" stroke="#000000" points="380.86,-50.02 391.22,-47.76 381.72,-43.07 380.86,-50.02"/>
+<title>proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" d="M348.49,-42.52C356.98,-43.56 365.56,-44.61 373.92,-45.64"/>
+<polygon fill="#000000" stroke="#000000" points="373.62,-49.13 383.97,-46.87 374.47,-42.18 373.62,-49.13"/>
 </g>
-<!-- util_sort_rearrange_tp -->
+<!-- interface~util_sort_rearrange -->
 <g id="interface~~symba_util_sort_rearrange_tp~~CallsGraph_node4" class="node">
-<title>util_sort_rearrange_tp</title>
-<polygon fill="#777777" stroke="#777777" points="502,-24 384,-24 384,0 502,0 502,-24"/>
-<text text-anchor="middle" x="443" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<title>interface~util_sort_rearrange</title>
+<g id="a_interface~~symba_util_sort_rearrange_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="494.5,-24 391.5,-24 391.5,0 494.5,0 494.5,-24"/>
+<text text-anchor="middle" x="443" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+</a>
 </g>
-<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
+</g>
+<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange -->
 <g id="interface~~symba_util_sort_rearrange_tp~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" d="M348.49,-23.48C356.98,-22.44 365.56,-21.39 373.92,-20.36"/>
-<polygon fill="#000000" stroke="#000000" points="374.47,-23.82 383.97,-19.13 373.62,-16.87 374.47,-23.82"/>
+<title>proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M348.49,-23.48C359.48,-22.13 370.64,-20.76 381.24,-19.46"/>
+<polygon fill="#000000" stroke="#000000" points="381.72,-22.93 391.22,-18.24 380.86,-15.98 381.72,-22.93"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_spill_encounter.html b/docs/interface/symba_util_spill_encounter.html
index aa2079003..064752551 100644
--- a/docs/interface/symba_util_spill_encounter.html
+++ b/docs/interface/symba_util_spill_encounter.html
@@ -246,44 +246,44 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.07,-54C150.54,-54 159.25,-54 167.85,-54"/>
 <polygon fill="#000000" stroke="#000000" points="167.89,-57.5 177.89,-54 167.89,-50.5 167.89,-57.5"/>
 </g>
-<!-- interface~util_spill -->
+<!-- util_exit -->
 <g id="interface~~symba_util_spill_encounter~~CallsGraph_node3" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="435,-108 381,-108 381,-84 435,-84 435,-108"/>
+<text text-anchor="middle" x="408" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_spill_encounter&#45;&gt;util_exit -->
+<g id="interface~~symba_util_spill_encounter~~CallsGraph_edge2" class="edge">
+<title>proc~symba_util_spill_encounter&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M294.99,-66.04C319.03,-72.47 348.24,-80.28 370.8,-86.32"/>
+<polygon fill="#000000" stroke="#000000" points="370.09,-89.75 380.66,-88.95 371.9,-82.99 370.09,-89.75"/>
+</g>
+<!-- interface~util_spill -->
+<g id="interface~~symba_util_spill_encounter~~CallsGraph_node4" class="node">
 <title>interface~util_spill</title>
-<g id="a_interface~~symba_util_spill_encounter~~CallsGraph_node3"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="435,-108 381,-108 381,-84 435,-84 435,-108"/>
-<text text-anchor="middle" x="408" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<g id="a_interface~~symba_util_spill_encounter~~CallsGraph_node4"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="435,-66 381,-66 381,-42 435,-42 435,-66"/>
+<text text-anchor="middle" x="408" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_spill_encounter&#45;&gt;interface~util_spill -->
-<g id="interface~~symba_util_spill_encounter~~CallsGraph_edge4" class="edge">
+<g id="interface~~symba_util_spill_encounter~~CallsGraph_edge3" class="edge">
 <title>proc~symba_util_spill_encounter&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M294.99,-66.04C319.03,-72.47 348.24,-80.28 370.8,-86.32"/>
-<polygon fill="#000000" stroke="#000000" points="370.09,-89.75 380.66,-88.95 371.9,-82.99 370.09,-89.75"/>
+<path fill="none" stroke="#000000" d="M320.23,-54C337.58,-54 355.47,-54 370.46,-54"/>
+<polygon fill="#000000" stroke="#000000" points="370.82,-57.5 380.82,-54 370.82,-50.5 370.82,-57.5"/>
 </g>
 <!-- util_spill_encounter -->
-<g id="interface~~symba_util_spill_encounter~~CallsGraph_node4" class="node">
+<g id="interface~~symba_util_spill_encounter~~CallsGraph_node5" class="node">
 <title>util_spill_encounter</title>
-<polygon fill="#777777" stroke="#777777" points="460,-66 356,-66 356,-42 460,-42 460,-66"/>
-<text text-anchor="middle" x="408" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
+<polygon fill="#777777" stroke="#777777" points="460,-24 356,-24 356,0 460,0 460,-24"/>
+<text text-anchor="middle" x="408" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
 </g>
 <!-- proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter -->
-<g id="interface~~symba_util_spill_encounter~~CallsGraph_edge3" class="edge">
+<g id="interface~~symba_util_spill_encounter~~CallsGraph_edge4" class="edge">
 <title>proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter</title>
-<path fill="none" stroke="#000000" d="M320.23,-54C328.71,-54 337.31,-54 345.65,-54"/>
-<polygon fill="#000000" stroke="#000000" points="345.65,-57.5 355.65,-54 345.65,-50.5 345.65,-57.5"/>
-</g>
-<!-- util_exit -->
-<g id="interface~~symba_util_spill_encounter~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="435,-24 381,-24 381,0 435,0 435,-24"/>
-<text text-anchor="middle" x="408" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_spill_encounter&#45;&gt;util_exit -->
-<g id="interface~~symba_util_spill_encounter~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_spill_encounter&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M294.99,-41.96C319.03,-35.53 348.24,-27.72 370.8,-21.68"/>
-<polygon fill="#000000" stroke="#000000" points="371.9,-25.01 380.66,-19.05 370.09,-18.25 371.9,-25.01"/>
+<path fill="none" stroke="#000000" d="M294.99,-41.96C312.81,-37.2 333.46,-31.67 352.15,-26.67"/>
+<polygon fill="#000000" stroke="#000000" points="353.25,-30 362,-24.04 351.44,-23.24 353.25,-30"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_spill_pl.html b/docs/interface/symba_util_spill_pl.html
index dc0838e79..53c2a5387 100644
--- a/docs/interface/symba_util_spill_pl.html
+++ b/docs/interface/symba_util_spill_pl.html
@@ -246,44 +246,44 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M102.25,-54C110.54,-54 119.2,-54 127.7,-54"/>
 <polygon fill="#000000" stroke="#000000" points="127.95,-57.5 137.95,-54 127.95,-50.5 127.95,-57.5"/>
 </g>
-<!-- interface~util_spill -->
+<!-- util_exit -->
 <g id="interface~~symba_util_spill_pl~~CallsGraph_node3" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="335,-108 281,-108 281,-84 335,-84 335,-108"/>
+<text text-anchor="middle" x="308" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_spill_pl&#45;&gt;util_exit -->
+<g id="interface~~symba_util_spill_pl~~CallsGraph_edge2" class="edge">
+<title>proc~symba_util_spill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M223.53,-66.04C238.48,-71.4 256.12,-77.74 271.32,-83.19"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-86.55 280.9,-86.63 272.67,-79.96 270.31,-86.55"/>
+</g>
+<!-- interface~util_spill -->
+<g id="interface~~symba_util_spill_pl~~CallsGraph_node4" class="node">
 <title>interface~util_spill</title>
-<g id="a_interface~~symba_util_spill_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="335,-108 281,-108 281,-84 335,-84 335,-108"/>
-<text text-anchor="middle" x="308" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<g id="a_interface~~symba_util_spill_pl~~CallsGraph_node4"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="335,-66 281,-66 281,-42 335,-42 335,-66"/>
+<text text-anchor="middle" x="308" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_spill_pl&#45;&gt;interface~util_spill -->
-<g id="interface~~symba_util_spill_pl~~CallsGraph_edge4" class="edge">
+<g id="interface~~symba_util_spill_pl~~CallsGraph_edge3" class="edge">
 <title>proc~symba_util_spill_pl&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M223.53,-66.04C238.48,-71.4 256.12,-77.74 271.32,-83.19"/>
-<polygon fill="#000000" stroke="#000000" points="270.31,-86.55 280.9,-86.63 272.67,-79.96 270.31,-86.55"/>
+<path fill="none" stroke="#000000" d="M240.3,-54C250.58,-54 261.2,-54 270.87,-54"/>
+<polygon fill="#000000" stroke="#000000" points="270.92,-57.5 280.92,-54 270.92,-50.5 270.92,-57.5"/>
 </g>
 <!-- util_spill_pl -->
-<g id="interface~~symba_util_spill_pl~~CallsGraph_node4" class="node">
+<g id="interface~~symba_util_spill_pl~~CallsGraph_node5" class="node">
 <title>util_spill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="340,-66 276,-66 276,-42 340,-42 340,-66"/>
-<text text-anchor="middle" x="308" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<polygon fill="#777777" stroke="#777777" points="340,-24 276,-24 276,0 340,0 340,-24"/>
+<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </g>
 <!-- proc~symba_util_spill_pl&#45;&gt;util_spill_pl -->
-<g id="interface~~symba_util_spill_pl~~CallsGraph_edge3" class="edge">
+<g id="interface~~symba_util_spill_pl~~CallsGraph_edge4" class="edge">
 <title>proc~symba_util_spill_pl&#45;&gt;util_spill_pl</title>
-<path fill="none" stroke="#000000" d="M240.3,-54C248.75,-54 257.43,-54 265.62,-54"/>
-<polygon fill="#000000" stroke="#000000" points="265.68,-57.5 275.67,-54 265.67,-50.5 265.68,-57.5"/>
-</g>
-<!-- util_exit -->
-<g id="interface~~symba_util_spill_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="335,-24 281,-24 281,0 335,0 335,-24"/>
-<text text-anchor="middle" x="308" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_spill_pl&#45;&gt;util_exit -->
-<g id="interface~~symba_util_spill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_spill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M223.53,-41.96C238.48,-36.6 256.12,-30.26 271.32,-24.81"/>
-<polygon fill="#000000" stroke="#000000" points="272.67,-28.04 280.9,-21.37 270.31,-21.45 272.67,-28.04"/>
+<path fill="none" stroke="#000000" d="M223.53,-41.96C236.91,-37.16 252.45,-31.58 266.46,-26.55"/>
+<polygon fill="#000000" stroke="#000000" points="267.64,-29.85 275.87,-23.17 265.28,-23.26 267.64,-29.85"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/symba_util_spill_tp.html b/docs/interface/symba_util_spill_tp.html
index eb91daa1e..5a3c16742 100644
--- a/docs/interface/symba_util_spill_tp.html
+++ b/docs/interface/symba_util_spill_tp.html
@@ -246,44 +246,44 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M103.12,-54C111.36,-54 119.97,-54 128.42,-54"/>
 <polygon fill="#000000" stroke="#000000" points="128.63,-57.5 138.63,-54 128.63,-50.5 128.63,-57.5"/>
 </g>
-<!-- interface~util_spill -->
+<!-- util_exit -->
 <g id="interface~~symba_util_spill_tp~~CallsGraph_node3" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="337.5,-108 283.5,-108 283.5,-84 337.5,-84 337.5,-108"/>
+<text text-anchor="middle" x="310.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_spill_tp&#45;&gt;util_exit -->
+<g id="interface~~symba_util_spill_tp~~CallsGraph_edge2" class="edge">
+<title>proc~symba_util_spill_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M225.31,-66.04C240.4,-71.4 258.19,-77.74 273.51,-83.19"/>
+<polygon fill="#000000" stroke="#000000" points="272.59,-86.58 283.18,-86.63 274.93,-79.98 272.59,-86.58"/>
+</g>
+<!-- interface~util_spill -->
+<g id="interface~~symba_util_spill_tp~~CallsGraph_node4" class="node">
 <title>interface~util_spill</title>
-<g id="a_interface~~symba_util_spill_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="337.5,-108 283.5,-108 283.5,-84 337.5,-84 337.5,-108"/>
-<text text-anchor="middle" x="310.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<g id="a_interface~~symba_util_spill_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="337.5,-66 283.5,-66 283.5,-42 337.5,-42 337.5,-66"/>
+<text text-anchor="middle" x="310.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_spill_tp&#45;&gt;interface~util_spill -->
-<g id="interface~~symba_util_spill_tp~~CallsGraph_edge4" class="edge">
+<g id="interface~~symba_util_spill_tp~~CallsGraph_edge3" class="edge">
 <title>proc~symba_util_spill_tp&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M225.31,-66.04C240.4,-71.4 258.19,-77.74 273.51,-83.19"/>
-<polygon fill="#000000" stroke="#000000" points="272.59,-86.58 283.18,-86.63 274.93,-79.98 272.59,-86.58"/>
+<path fill="none" stroke="#000000" d="M242.23,-54C252.59,-54 263.31,-54 273.06,-54"/>
+<polygon fill="#000000" stroke="#000000" points="273.19,-57.5 283.19,-54 273.19,-50.5 273.19,-57.5"/>
 </g>
 <!-- util_spill_tp -->
-<g id="interface~~symba_util_spill_tp~~CallsGraph_node4" class="node">
+<g id="interface~~symba_util_spill_tp~~CallsGraph_node5" class="node">
 <title>util_spill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="343,-66 278,-66 278,-42 343,-42 343,-66"/>
-<text text-anchor="middle" x="310.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<polygon fill="#777777" stroke="#777777" points="343,-24 278,-24 278,0 343,0 343,-24"/>
+<text text-anchor="middle" x="310.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </g>
 <!-- proc~symba_util_spill_tp&#45;&gt;util_spill_tp -->
-<g id="interface~~symba_util_spill_tp~~CallsGraph_edge3" class="edge">
+<g id="interface~~symba_util_spill_tp~~CallsGraph_edge4" class="edge">
 <title>proc~symba_util_spill_tp&#45;&gt;util_spill_tp</title>
-<path fill="none" stroke="#000000" d="M242.23,-54C250.75,-54 259.5,-54 267.76,-54"/>
-<polygon fill="#000000" stroke="#000000" points="267.91,-57.5 277.91,-54 267.91,-50.5 267.91,-57.5"/>
-</g>
-<!-- util_exit -->
-<g id="interface~~symba_util_spill_tp~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="337.5,-24 283.5,-24 283.5,0 337.5,0 337.5,-24"/>
-<text text-anchor="middle" x="310.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_spill_tp&#45;&gt;util_exit -->
-<g id="interface~~symba_util_spill_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_spill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M225.31,-41.96C240.4,-36.6 258.19,-30.26 273.51,-24.81"/>
-<polygon fill="#000000" stroke="#000000" points="274.93,-28.02 283.18,-21.37 272.59,-21.42 274.93,-28.02"/>
+<path fill="none" stroke="#000000" d="M225.31,-41.96C238.7,-37.2 254.23,-31.67 268.27,-26.68"/>
+<polygon fill="#000000" stroke="#000000" points="269.46,-29.97 277.71,-23.32 267.11,-23.37 269.46,-29.97"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/tides_kick_getacch_pl.html b/docs/interface/tides_kick_getacch_pl.html
index f24002c5b..eabbcf6ac 100644
--- a/docs/interface/tides_kick_getacch_pl.html
+++ b/docs/interface/tides_kick_getacch_pl.html
@@ -136,7 +136,7 @@ <h1>tides_kick_getacch_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/tides_step_spin_system.html b/docs/interface/tides_step_spin_system.html
index ef47be60b..c444c1780 100644
--- a/docs/interface/tides_step_spin_system.html
+++ b/docs/interface/tides_step_spin_system.html
@@ -136,7 +136,7 @@ <h1>tides_step_spin_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/user_kick_getacch_body.html b/docs/interface/user_kick_getacch_body.html
index 963fdd7bb..5da247f50 100644
--- a/docs/interface/user_kick_getacch_body.html
+++ b/docs/interface/user_kick_getacch_body.html
@@ -136,7 +136,7 @@ <h1>user_kick_getacch_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/util_append.html b/docs/interface/util_append.html
index 6844b3bd0..85ed212e0 100644
--- a/docs/interface/util_append.html
+++ b/docs/interface/util_append.html
@@ -246,52 +246,22 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~symba_util_append_encounter&#45;&gt;interface~util_append -->
-<g id="interface~~util_append~~CalledByGraph_edge1" class="edge">
+<g id="interface~~util_append~~CalledByGraph_edge2" class="edge">
 <title>proc~symba_util_append_encounter&#45;&gt;interface~util_append</title>
 <path fill="none" stroke="#000000" d="M681.18,-121.98C693.74,-117.9 707.57,-113.08 720,-108 732.36,-102.95 745.6,-96.66 757.13,-90.86"/>
 <polygon fill="#000000" stroke="#000000" points="759.05,-93.81 766.37,-86.15 755.87,-87.58 759.05,-93.81"/>
 </g>
-<!-- proc~symba_util_append_pl -->
-<g id="interface~~util_append~~CalledByGraph_node3" class="node">
-<title>proc~symba_util_append_pl</title>
-<g id="a_interface~~util_append~~CalledByGraph_node3"><a xlink:href=".././proc/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="700,-66 580,-66 580,-42 700,-42 700,-66"/>
-<text text-anchor="middle" x="640" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
-</a>
-</g>
-</g>
-<!-- proc~symba_util_append_pl&#45;&gt;interface~util_append -->
-<g id="interface~~util_append~~CalledByGraph_edge2" class="edge">
-<title>proc~symba_util_append_pl&#45;&gt;interface~util_append</title>
-<path fill="none" stroke="#000000" d="M700.34,-62.02C715.49,-64.07 731.48,-66.23 745.66,-68.14"/>
-<polygon fill="#000000" stroke="#000000" points="745.24,-71.62 755.62,-69.49 746.17,-64.68 745.24,-71.62"/>
-</g>
-<!-- proc~symba_util_append_tp -->
-<g id="interface~~util_append~~CalledByGraph_node4" class="node">
-<title>proc~symba_util_append_tp</title>
-<g id="a_interface~~util_append~~CalledByGraph_node4"><a xlink:href=".././proc/symba_util_append_tp.html" xlink:title="symba_util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="700.5,-24 579.5,-24 579.5,0 700.5,0 700.5,-24"/>
-<text text-anchor="middle" x="640" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_tp</text>
-</a>
-</g>
-</g>
-<!-- proc~symba_util_append_tp&#45;&gt;interface~util_append -->
-<g id="interface~~util_append~~CalledByGraph_edge3" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;interface~util_append</title>
-<path fill="none" stroke="#000000" d="M694.37,-24.03C703.07,-26.6 711.89,-29.59 720,-33 734.99,-39.3 750.65,-48.38 763.25,-56.39"/>
-<polygon fill="#000000" stroke="#000000" points="761.55,-59.45 771.84,-61.98 765.37,-53.59 761.55,-59.45"/>
-</g>
 <!-- proc~symba_util_append_merger -->
-<g id="interface~~util_append~~CalledByGraph_node5" class="node">
+<g id="interface~~util_append~~CalledByGraph_node3" class="node">
 <title>proc~symba_util_append_merger</title>
-<g id="a_interface~~util_append~~CalledByGraph_node5"><a xlink:href=".././proc/symba_util_append_merger.html" xlink:title="symba_util_append_merger">
+<g id="a_interface~~util_append~~CalledByGraph_node3"><a xlink:href=".././proc/symba_util_append_merger.html" xlink:title="symba_util_append_merger">
 <polygon fill="#d9534f" stroke="#d9534f" points="328,-86 182,-86 182,-62 328,-62 328,-86"/>
 <text text-anchor="middle" x="255" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_merger</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_append_merger&#45;&gt;interface~util_append -->
-<g id="interface~~util_append~~CalledByGraph_edge4" class="edge">
+<g id="interface~~util_append~~CalledByGraph_edge3" class="edge">
 <title>proc~symba_util_append_merger&#45;&gt;interface~util_append</title>
 <path fill="none" stroke="#000000" d="M328.04,-74.76C340.05,-74.86 352.37,-74.95 364,-75 522.22,-75.73 561.78,-76.15 720,-75 728.26,-74.94 737.08,-74.84 745.55,-74.73"/>
 <polygon fill="#000000" stroke="#000000" points="745.71,-78.22 755.66,-74.58 745.61,-71.22 745.71,-78.22"/>
@@ -311,8 +281,38 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M328.03,-66.3C343,-64.7 358.73,-63.01 373.6,-61.42"/>
 <polygon fill="#000000" stroke="#000000" points="374.16,-64.88 383.73,-60.34 373.42,-57.92 374.16,-64.88"/>
 </g>
+<!-- proc~symba_util_append_tp -->
+<g id="interface~~util_append~~CalledByGraph_node4" class="node">
+<title>proc~symba_util_append_tp</title>
+<g id="a_interface~~util_append~~CalledByGraph_node4"><a xlink:href=".././proc/symba_util_append_tp.html" xlink:title="symba_util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="700.5,-24 579.5,-24 579.5,0 700.5,0 700.5,-24"/>
+<text text-anchor="middle" x="640" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_tp</text>
+</a>
+</g>
+</g>
+<!-- proc~symba_util_append_tp&#45;&gt;interface~util_append -->
+<g id="interface~~util_append~~CalledByGraph_edge1" class="edge">
+<title>proc~symba_util_append_tp&#45;&gt;interface~util_append</title>
+<path fill="none" stroke="#000000" d="M694.37,-24.03C703.07,-26.6 711.89,-29.59 720,-33 734.99,-39.3 750.65,-48.38 763.25,-56.39"/>
+<polygon fill="#000000" stroke="#000000" points="761.55,-59.45 771.84,-61.98 765.37,-53.59 761.55,-59.45"/>
+</g>
+<!-- proc~symba_util_append_pl -->
+<g id="interface~~util_append~~CalledByGraph_node5" class="node">
+<title>proc~symba_util_append_pl</title>
+<g id="a_interface~~util_append~~CalledByGraph_node5"><a xlink:href=".././proc/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="700,-66 580,-66 580,-42 700,-42 700,-66"/>
+<text text-anchor="middle" x="640" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
+</a>
+</g>
+</g>
+<!-- proc~symba_util_append_pl&#45;&gt;interface~util_append -->
+<g id="interface~~util_append~~CalledByGraph_edge4" class="edge">
+<title>proc~symba_util_append_pl&#45;&gt;interface~util_append</title>
+<path fill="none" stroke="#000000" d="M700.34,-62.02C715.49,-64.07 731.48,-66.23 745.66,-68.14"/>
+<polygon fill="#000000" stroke="#000000" points="745.24,-71.62 755.62,-69.49 746.17,-64.68 745.24,-71.62"/>
+</g>
 <!-- interface~symba_util_append_pl&#45;&gt;proc~symba_util_append_pl -->
-<g id="interface~~util_append~~CalledByGraph_edge6" class="edge">
+<g id="interface~~util_append~~CalledByGraph_edge8" class="edge">
 <title>interface~symba_util_append_pl&#45;&gt;proc~symba_util_append_pl</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M504.26,-54C524.94,-54 548.34,-54 569.76,-54"/>
 <polygon fill="#000000" stroke="#000000" points="569.77,-57.5 579.77,-54 569.77,-50.5 569.77,-57.5"/>
@@ -342,7 +342,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~symba_util_append_merger&#45;&gt;proc~symba_util_append_merger -->
-<g id="interface~~util_append~~CalledByGraph_edge8" class="edge">
+<g id="interface~~util_append~~CalledByGraph_edge6" class="edge">
 <title>interface~symba_util_append_merger&#45;&gt;proc~symba_util_append_merger</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.18,-74C154.52,-74 163.08,-74 171.54,-74"/>
 <polygon fill="#000000" stroke="#000000" points="171.81,-77.5 181.81,-74 171.81,-70.5 171.81,-77.5"/>
diff --git a/docs/interface/util_append_body.html b/docs/interface/util_append_body.html
index 71dc48d59..1512c7125 100644
--- a/docs/interface/util_append_body.html
+++ b/docs/interface/util_append_body.html
@@ -348,65 +348,65 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="335,-45 238,-45 238,-21 335,-21 335,-45"/>
 <text text-anchor="middle" x="286.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_append_body</text>
 </g>
-<!-- proc~util_append_tp -->
+<!-- proc~util_append_pl -->
 <g id="interface~~util_append_body~~CalledByGraph_node2" class="node">
-<title>proc~util_append_tp</title>
-<g id="a_interface~~util_append_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="202,-66 119,-66 119,-42 202,-42 202,-66"/>
-<text text-anchor="middle" x="160.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>proc~util_append_pl</title>
+<g id="a_interface~~util_append_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="201.5,-66 119.5,-66 119.5,-42 201.5,-42 201.5,-66"/>
+<text text-anchor="middle" x="160.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
+<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
 <g id="interface~~util_append_body~~CalledByGraph_edge1" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M202.1,-47.12C210.33,-45.73 219.12,-44.24 227.81,-42.77"/>
-<polygon fill="#000000" stroke="#000000" points="228.63,-46.18 237.91,-41.06 227.46,-39.28 228.63,-46.18"/>
+<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M201.76,-47.18C209.99,-45.79 218.81,-44.29 227.53,-42.82"/>
+<polygon fill="#000000" stroke="#000000" points="228.39,-46.22 237.67,-41.1 227.22,-39.32 228.39,-46.22"/>
 </g>
-<!-- proc~util_append_pl -->
+<!-- proc~util_append_tp -->
 <g id="interface~~util_append_body~~CalledByGraph_node3" class="node">
-<title>proc~util_append_pl</title>
-<g id="a_interface~~util_append_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="201.5,-24 119.5,-24 119.5,0 201.5,0 201.5,-24"/>
-<text text-anchor="middle" x="160.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>proc~util_append_tp</title>
+<g id="a_interface~~util_append_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="202,-24 119,-24 119,0 202,0 202,-24"/>
+<text text-anchor="middle" x="160.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
+<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
 <g id="interface~~util_append_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M201.76,-18.82C209.99,-20.21 218.81,-21.71 227.53,-23.18"/>
-<polygon fill="#000000" stroke="#000000" points="227.22,-26.68 237.67,-24.9 228.39,-19.78 227.22,-26.68"/>
+<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M202.1,-18.88C210.33,-20.27 219.12,-21.76 227.81,-23.23"/>
+<polygon fill="#000000" stroke="#000000" points="227.46,-26.72 237.91,-24.94 228.63,-19.82 227.46,-26.72"/>
 </g>
-<!-- interface~util_append_pl -->
+<!-- interface~util_append_tp -->
 <g id="interface~~util_append_body~~CalledByGraph_node4" class="node">
-<title>interface~util_append_pl</title>
-<g id="a_interface~~util_append_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="82.5,-24 0.5,-24 0.5,0 82.5,0 82.5,-24"/>
-<text text-anchor="middle" x="41.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>interface~util_append_tp</title>
+<g id="a_interface~~util_append_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="83,-24 0,-24 0,0 83,0 83,-24"/>
+<text text-anchor="middle" x="41.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
+<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
 <g id="interface~~util_append_body~~CalledByGraph_edge4" class="edge">
-<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.76,-12C91.22,-12 100.24,-12 109.02,-12"/>
-<polygon fill="#000000" stroke="#000000" points="109.16,-15.5 119.16,-12 109.16,-8.5 109.16,-15.5"/>
+<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-12C91.35,-12 100.14,-12 108.7,-12"/>
+<polygon fill="#000000" stroke="#000000" points="108.98,-15.5 118.98,-12 108.98,-8.5 108.98,-15.5"/>
 </g>
-<!-- interface~util_append_tp -->
+<!-- interface~util_append_pl -->
 <g id="interface~~util_append_body~~CalledByGraph_node5" class="node">
-<title>interface~util_append_tp</title>
-<g id="a_interface~~util_append_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="83,-66 0,-66 0,-42 83,-42 83,-66"/>
-<text text-anchor="middle" x="41.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>interface~util_append_pl</title>
+<g id="a_interface~~util_append_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="82.5,-66 0.5,-66 0.5,-42 82.5,-42 82.5,-66"/>
+<text text-anchor="middle" x="41.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
+<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
 <g id="interface~~util_append_body~~CalledByGraph_edge3" class="edge">
-<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-54C91.35,-54 100.14,-54 108.7,-54"/>
-<polygon fill="#000000" stroke="#000000" points="108.98,-57.5 118.98,-54 108.98,-50.5 108.98,-57.5"/>
+<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.76,-54C91.22,-54 100.24,-54 109.02,-54"/>
+<polygon fill="#000000" stroke="#000000" points="109.16,-57.5 119.16,-54 109.16,-50.5 109.16,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_append_pl.html b/docs/interface/util_append_pl.html
index 4793f3532..ae93d3a5a 100644
--- a/docs/interface/util_append_pl.html
+++ b/docs/interface/util_append_pl.html
@@ -292,9 +292,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="249.01,-26.85 257.45,-20.44 246.86,-20.19 249.01,-26.85"/>
 </g>
 <!-- proc~util_append_body -->
-<g id="interface~~util_append_pl~~CallsGraph_node7" class="node">
+<g id="interface~~util_append_pl~~CallsGraph_node6" class="node">
 <title>proc~util_append_body</title>
-<g id="a_interface~~util_append_pl~~CallsGraph_node7"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
+<g id="a_interface~~util_append_pl~~CallsGraph_node6"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
 <polygon fill="#d9534f" stroke="#d9534f" points="466,-104 369,-104 369,-80 466,-80 466,-104"/>
 <text text-anchor="middle" x="417.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
@@ -307,9 +307,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="358.65,-95.5 368.65,-92 358.65,-88.5 358.65,-95.5"/>
 </g>
 <!-- proc~util_exit -->
-<g id="interface~~util_append_pl~~CallsGraph_node6" class="node">
+<g id="interface~~util_append_pl~~CallsGraph_node7" class="node">
 <title>proc~util_exit</title>
-<g id="a_interface~~util_append_pl~~CallsGraph_node6"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<g id="a_interface~~util_append_pl~~CallsGraph_node7"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
 <polygon fill="#d9534f" stroke="#d9534f" points="444.5,-24 390.5,-24 390.5,0 444.5,0 444.5,-24"/>
 <text text-anchor="middle" x="417.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
diff --git a/docs/interface/util_append_tp.html b/docs/interface/util_append_tp.html
index 68c7bbf6d..45e81ddb0 100644
--- a/docs/interface/util_append_tp.html
+++ b/docs/interface/util_append_tp.html
@@ -292,9 +292,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="250.9,-26.84 259.34,-20.44 248.75,-20.18 250.9,-26.84"/>
 </g>
 <!-- proc~util_append_body -->
-<g id="interface~~util_append_tp~~CallsGraph_node7" class="node">
+<g id="interface~~util_append_tp~~CallsGraph_node6" class="node">
 <title>proc~util_append_body</title>
-<g id="a_interface~~util_append_tp~~CallsGraph_node7"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
+<g id="a_interface~~util_append_tp~~CallsGraph_node6"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
 <polygon fill="#d9534f" stroke="#d9534f" points="468,-104 371,-104 371,-80 468,-80 468,-104"/>
 <text text-anchor="middle" x="419.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
@@ -307,9 +307,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="360.65,-95.5 370.65,-92 360.65,-88.5 360.65,-95.5"/>
 </g>
 <!-- proc~util_exit -->
-<g id="interface~~util_append_tp~~CallsGraph_node6" class="node">
+<g id="interface~~util_append_tp~~CallsGraph_node7" class="node">
 <title>proc~util_exit</title>
-<g id="a_interface~~util_append_tp~~CallsGraph_node6"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<g id="a_interface~~util_append_tp~~CallsGraph_node7"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
 <polygon fill="#d9534f" stroke="#d9534f" points="446.5,-24 392.5,-24 392.5,0 446.5,0 446.5,-24"/>
 <text text-anchor="middle" x="419.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
diff --git a/docs/interface/util_append~2.html b/docs/interface/util_append~2.html
index b244b6471..efc2b5730 100644
--- a/docs/interface/util_append~2.html
+++ b/docs/interface/util_append~2.html
@@ -235,148 +235,148 @@ <h3 class="panel-title">Called by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~util_append~2~~CalledByGraph Pages: 1 -->
-<svg id="interfaceutil_append2CalledByGraph" width="630pt" height="144pt"
- viewBox="0.00 0.00 630.00 143.88" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~util_append~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 139.88)">
+<svg id="interfaceutil_append2CalledByGraph" width="630pt" height="143pt"
+ viewBox="0.00 0.00 630.00 143.39" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~util_append~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 139.39)">
 <title>interface~~util_append~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-139.88 626,-139.88 626,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-139.39 626,-139.39 626,4 -4,4"/>
 <!-- interface~util_append~2 -->
 <g id="interface~~util_append~2~~CalledByGraph_node1" class="node">
 <title>interface~util_append~2</title>
-<polygon fill="none" stroke="black" points="622,-75.88 554,-75.88 554,-51.88 622,-51.88 622,-75.88"/>
-<text text-anchor="middle" x="588" y="-61.48" font-family="Helvetica,sans-Serif" font-size="10.50">util_append</text>
+<polygon fill="none" stroke="black" points="622,-84 554,-84 554,-60 622,-60 622,-84"/>
+<text text-anchor="middle" x="588" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_append</text>
 </g>
-<!-- proc~util_append_encounter -->
+<!-- proc~util_append_body -->
 <g id="interface~~util_append~2~~CalledByGraph_node2" class="node">
-<title>proc~util_append_encounter</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node2"><a xlink:href=".././proc/util_append_encounter.html" xlink:title="util_append_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="518,-135.88 396,-135.88 396,-111.88 518,-111.88 518,-135.88"/>
-<text text-anchor="middle" x="457" y="-121.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
+<title>proc~util_append_body</title>
+<g id="a_interface~~util_append~2~~CalledByGraph_node2"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="505.5,-104 408.5,-104 408.5,-80 505.5,-80 505.5,-104"/>
+<text text-anchor="middle" x="457" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_encounter&#45;&gt;interface~util_append~2 -->
-<g id="interface~~util_append~2~~CalledByGraph_edge2" class="edge">
-<title>proc~util_append_encounter&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M486.51,-111.86C496.52,-107.55 507.8,-102.6 518,-97.88 529.84,-92.4 542.68,-86.15 554.05,-80.52"/>
-<polygon fill="#000000" stroke="#000000" points="555.8,-83.56 563.19,-75.97 552.68,-77.3 555.8,-83.56"/>
+<!-- proc~util_append_body&#45;&gt;interface~util_append~2 -->
+<g id="interface~~util_append~2~~CalledByGraph_edge1" class="edge">
+<title>proc~util_append_body&#45;&gt;interface~util_append~2</title>
+<path fill="none" stroke="#000000" d="M505.67,-84.61C518.12,-82.68 531.46,-80.61 543.67,-78.72"/>
+<polygon fill="#000000" stroke="#000000" points="544.27,-82.17 553.62,-77.18 543.2,-75.25 544.27,-82.17"/>
 </g>
-<!-- proc~util_append_tp -->
+<!-- proc~util_append_pl -->
 <g id="interface~~util_append~2~~CalledByGraph_node3" class="node">
-<title>proc~util_append_tp</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="202,-24.88 119,-24.88 119,-0.88 202,-0.88 202,-24.88"/>
-<text text-anchor="middle" x="160.5" y="-10.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>proc~util_append_pl</title>
+<g id="a_interface~~util_append~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="201.5,-134 119.5,-134 119.5,-110 201.5,-110 201.5,-134"/>
+<text text-anchor="middle" x="160.5" y="-119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_append~2 -->
-<g id="interface~~util_append~2~~CalledByGraph_edge1" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M202.08,-7.52C269.31,-0.07 407.39,9.18 518,-22.88 534.42,-27.64 550.95,-37.25 563.71,-45.97"/>
-<polygon fill="#000000" stroke="#000000" points="561.72,-48.85 571.9,-51.8 565.78,-43.15 561.72,-48.85"/>
+<!-- proc~util_append_pl&#45;&gt;interface~util_append~2 -->
+<g id="interface~~util_append~2~~CalledByGraph_edge2" class="edge">
+<title>proc~util_append_pl&#45;&gt;interface~util_append~2</title>
+<path fill="none" stroke="#000000" d="M201.53,-127.44C268.55,-135.14 407.05,-144.99 518,-113 534.43,-108.26 550.96,-98.65 563.72,-89.92"/>
+<polygon fill="#000000" stroke="#000000" points="565.79,-92.74 571.9,-84.09 561.73,-87.04 565.79,-92.74"/>
 </g>
 <!-- interface~util_append_body -->
-<g id="interface~~util_append~2~~CalledByGraph_node8" class="node">
+<g id="interface~~util_append~2~~CalledByGraph_node6" class="node">
 <title>interface~util_append_body</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node8"><a xlink:href=".././interface/util_append_body.html" xlink:title="util_append_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="347.5,-55.88 250.5,-55.88 250.5,-31.88 347.5,-31.88 347.5,-55.88"/>
-<text text-anchor="middle" x="299" y="-41.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
+<g id="a_interface~~util_append~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_append_body.html" xlink:title="util_append_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="347.5,-104 250.5,-104 250.5,-80 347.5,-80 347.5,-104"/>
+<text text-anchor="middle" x="299" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
+<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
 <g id="interface~~util_append~2~~CalledByGraph_edge9" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M202.08,-22.09C213.99,-24.8 227.25,-27.81 240.02,-30.71"/>
-<polygon fill="#000000" stroke="#000000" points="239.59,-34.2 250.12,-33 241.14,-27.37 239.59,-34.2"/>
+<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M201.72,-113.16C213.87,-110.49 227.47,-107.5 240.52,-104.63"/>
+<polygon fill="#000000" stroke="#000000" points="241.35,-108.03 250.37,-102.47 239.85,-101.2 241.35,-108.03"/>
 </g>
-<!-- proc~util_append_pl -->
+<!-- proc~util_append_tp -->
 <g id="interface~~util_append~2~~CalledByGraph_node4" class="node">
-<title>proc~util_append_pl</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node4"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="201.5,-85.88 119.5,-85.88 119.5,-61.88 201.5,-61.88 201.5,-85.88"/>
-<text text-anchor="middle" x="160.5" y="-71.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>proc~util_append_tp</title>
+<g id="a_interface~~util_append~2~~CalledByGraph_node4"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="202,-73 119,-73 119,-49 202,-49 202,-73"/>
+<text text-anchor="middle" x="160.5" y="-58.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_append~2 -->
-<g id="interface~~util_append~2~~CalledByGraph_edge4" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M201.53,-72.94C281.68,-71.05 461.25,-66.83 543.88,-64.89"/>
-<polygon fill="#000000" stroke="#000000" points="544.02,-68.39 553.94,-64.65 543.86,-61.39 544.02,-68.39"/>
+<!-- proc~util_append_tp&#45;&gt;interface~util_append~2 -->
+<g id="interface~~util_append~2~~CalledByGraph_edge3" class="edge">
+<title>proc~util_append_tp&#45;&gt;interface~util_append~2</title>
+<path fill="none" stroke="#000000" d="M202.3,-62.05C282.79,-64.14 461.35,-68.75 543.77,-70.88"/>
+<polygon fill="#000000" stroke="#000000" points="543.71,-74.38 553.8,-71.14 543.9,-67.38 543.71,-74.38"/>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
+<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
 <g id="interface~~util_append~2~~CalledByGraph_edge10" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M201.72,-65.04C213.87,-62.37 227.47,-59.38 240.52,-56.51"/>
-<polygon fill="#000000" stroke="#000000" points="241.35,-59.91 250.37,-54.35 239.85,-53.07 241.35,-59.91"/>
+<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M202.08,-70.22C213.99,-72.92 227.25,-75.93 240.02,-78.83"/>
+<polygon fill="#000000" stroke="#000000" points="239.59,-82.32 250.12,-81.13 241.14,-75.5 239.59,-82.32"/>
 </g>
-<!-- proc~util_append_body -->
+<!-- proc~util_append_encounter -->
 <g id="interface~~util_append~2~~CalledByGraph_node5" class="node">
-<title>proc~util_append_body</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node5"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="505.5,-55.88 408.5,-55.88 408.5,-31.88 505.5,-31.88 505.5,-55.88"/>
-<text text-anchor="middle" x="457" y="-41.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
+<title>proc~util_append_encounter</title>
+<g id="a_interface~~util_append~2~~CalledByGraph_node5"><a xlink:href=".././proc/util_append_encounter.html" xlink:title="util_append_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="518,-24 396,-24 396,0 518,0 518,-24"/>
+<text text-anchor="middle" x="457" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_body&#45;&gt;interface~util_append~2 -->
-<g id="interface~~util_append~2~~CalledByGraph_edge3" class="edge">
-<title>proc~util_append_body&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M505.67,-51.27C518.12,-53.2 531.46,-55.27 543.67,-57.16"/>
-<polygon fill="#000000" stroke="#000000" points="543.2,-60.63 553.62,-58.7 544.27,-53.71 543.2,-60.63"/>
+<!-- proc~util_append_encounter&#45;&gt;interface~util_append~2 -->
+<g id="interface~~util_append~2~~CalledByGraph_edge4" class="edge">
+<title>proc~util_append_encounter&#45;&gt;interface~util_append~2</title>
+<path fill="none" stroke="#000000" d="M486.51,-24.02C496.52,-28.32 507.8,-33.28 518,-38 529.84,-43.48 542.68,-49.72 554.05,-55.35"/>
+<polygon fill="#000000" stroke="#000000" points="552.68,-58.58 563.19,-59.91 555.8,-52.32 552.68,-58.58"/>
+</g>
+<!-- interface~util_append_body&#45;&gt;proc~util_append_body -->
+<g id="interface~~util_append~2~~CalledByGraph_edge5" class="edge">
+<title>interface~util_append_body&#45;&gt;proc~util_append_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M347.65,-92C363.61,-92 381.57,-92 398.21,-92"/>
+<polygon fill="#000000" stroke="#000000" points="398.37,-95.5 408.37,-92 398.37,-88.5 398.37,-95.5"/>
 </g>
 <!-- interface~util_append_encounter -->
-<g id="interface~~util_append~2~~CalledByGraph_node6" class="node">
+<g id="interface~~util_append~2~~CalledByGraph_node7" class="node">
 <title>interface~util_append_encounter</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_append_encounter.html" xlink:title="util_append_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="360,-135.88 238,-135.88 238,-111.88 360,-111.88 360,-135.88"/>
-<text text-anchor="middle" x="299" y="-121.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
+<g id="a_interface~~util_append~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_append_encounter.html" xlink:title="util_append_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="360,-24 238,-24 238,0 360,0 360,-24"/>
+<text text-anchor="middle" x="299" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
 </a>
 </g>
 </g>
 <!-- interface~util_append_encounter&#45;&gt;proc~util_append_encounter -->
-<g id="interface~~util_append~2~~CalledByGraph_edge5" class="edge">
+<g id="interface~~util_append~2~~CalledByGraph_edge8" class="edge">
 <title>interface~util_append_encounter&#45;&gt;proc~util_append_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M360.31,-123.88C368.6,-123.88 377.17,-123.88 385.63,-123.88"/>
-<polygon fill="#000000" stroke="#000000" points="385.85,-127.38 395.85,-123.88 385.85,-120.38 385.85,-127.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M360.31,-12C368.6,-12 377.17,-12 385.63,-12"/>
+<polygon fill="#000000" stroke="#000000" points="385.85,-15.5 395.85,-12 385.85,-8.5 385.85,-15.5"/>
 </g>
-<!-- interface~util_append_pl -->
-<g id="interface~~util_append~2~~CalledByGraph_node7" class="node">
-<title>interface~util_append_pl</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="82.5,-85.88 0.5,-85.88 0.5,-61.88 82.5,-61.88 82.5,-85.88"/>
-<text text-anchor="middle" x="41.5" y="-71.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<!-- interface~util_append_tp -->
+<g id="interface~~util_append~2~~CalledByGraph_node8" class="node">
+<title>interface~util_append_tp</title>
+<g id="a_interface~~util_append~2~~CalledByGraph_node8"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="83,-73 0,-73 0,-49 83,-49 83,-73"/>
+<text text-anchor="middle" x="41.5" y="-58.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
+<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
 <g id="interface~~util_append~2~~CalledByGraph_edge7" class="edge">
-<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.76,-73.88C91.22,-73.88 100.24,-73.88 109.02,-73.88"/>
-<polygon fill="#000000" stroke="#000000" points="109.16,-77.38 119.16,-73.88 109.16,-70.38 109.16,-77.38"/>
-</g>
-<!-- interface~util_append_body&#45;&gt;proc~util_append_body -->
-<g id="interface~~util_append~2~~CalledByGraph_edge8" class="edge">
-<title>interface~util_append_body&#45;&gt;proc~util_append_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M347.65,-43.88C363.61,-43.88 381.57,-43.88 398.21,-43.88"/>
-<polygon fill="#000000" stroke="#000000" points="398.37,-47.38 408.37,-43.88 398.37,-40.38 398.37,-47.38"/>
+<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-61C91.35,-61 100.14,-61 108.7,-61"/>
+<polygon fill="#000000" stroke="#000000" points="108.98,-64.5 118.98,-61 108.98,-57.5 108.98,-64.5"/>
 </g>
-<!-- interface~util_append_tp -->
+<!-- interface~util_append_pl -->
 <g id="interface~~util_append~2~~CalledByGraph_node9" class="node">
-<title>interface~util_append_tp</title>
-<g id="a_interface~~util_append~2~~CalledByGraph_node9"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="83,-24.88 0,-24.88 0,-0.88 83,-0.88 83,-24.88"/>
-<text text-anchor="middle" x="41.5" y="-10.48" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>interface~util_append_pl</title>
+<g id="a_interface~~util_append~2~~CalledByGraph_node9"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="82.5,-134 0.5,-134 0.5,-110 82.5,-110 82.5,-134"/>
+<text text-anchor="middle" x="41.5" y="-119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
+<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
 <g id="interface~~util_append~2~~CalledByGraph_edge6" class="edge">
-<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-12.88C91.35,-12.88 100.14,-12.88 108.7,-12.88"/>
-<polygon fill="#000000" stroke="#000000" points="108.98,-16.38 118.98,-12.88 108.98,-9.38 108.98,-16.38"/>
+<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.76,-122C91.22,-122 100.24,-122 109.02,-122"/>
+<polygon fill="#000000" stroke="#000000" points="109.16,-125.5 119.16,-122 109.16,-118.5 109.16,-125.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_copy_particle_info_arr.html b/docs/interface/util_copy_particle_info_arr.html
index 96eea4143..93d1f5664 100644
--- a/docs/interface/util_copy_particle_info_arr.html
+++ b/docs/interface/util_copy_particle_info_arr.html
@@ -333,50 +333,50 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="320,-66 182,-66 182,-42 320,-42 320,-66"/>
 <text text-anchor="middle" x="251" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_copy_particle_info_arr</text>
 </g>
-<!-- proc~util_fill_arr_info -->
+<!-- proc~util_sort_rearrange_arr_info -->
 <g id="interface~~util_copy_particle_info_arr~~CalledByGraph_node2" class="node">
-<title>proc~util_fill_arr_info</title>
-<g id="a_interface~~util_copy_particle_info_arr~~CalledByGraph_node2"><a xlink:href=".././proc/util_fill_arr_info.html" xlink:title="util_fill_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="115.5,-108 30.5,-108 30.5,-84 115.5,-84 115.5,-108"/>
-<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_info</text>
+<title>proc~util_sort_rearrange_arr_info</title>
+<g id="a_interface~~util_copy_particle_info_arr~~CalledByGraph_node2"><a xlink:href=".././proc/util_sort_rearrange_arr_info.html" xlink:title="util_sort_rearrange_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-108 0,-108 0,-84 146,-84 146,-108"/>
+<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<!-- proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
 <g id="interface~~util_copy_particle_info_arr~~CalledByGraph_edge1" class="edge">
-<title>proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M115.71,-86.05C137.78,-80.78 165.27,-74.22 189.63,-68.41"/>
-<polygon fill="#000000" stroke="#000000" points="190.58,-71.78 199.49,-66.05 188.95,-64.97 190.58,-71.78"/>
+<title>proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M124.43,-83.96C144.78,-79.11 168.42,-73.47 189.67,-68.4"/>
+<polygon fill="#000000" stroke="#000000" points="190.64,-71.76 199.56,-66.04 189.02,-64.95 190.64,-71.76"/>
 </g>
-<!-- proc~util_spill_arr_info -->
+<!-- proc~util_fill_arr_info -->
 <g id="interface~~util_copy_particle_info_arr~~CalledByGraph_node3" class="node">
-<title>proc~util_spill_arr_info</title>
-<g id="a_interface~~util_copy_particle_info_arr~~CalledByGraph_node3"><a xlink:href=".././proc/util_spill_arr_info.html" xlink:title="util_spill_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="119.5,-66 26.5,-66 26.5,-42 119.5,-42 119.5,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_info</text>
+<title>proc~util_fill_arr_info</title>
+<g id="a_interface~~util_copy_particle_info_arr~~CalledByGraph_node3"><a xlink:href=".././proc/util_fill_arr_info.html" xlink:title="util_fill_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="115.5,-66 30.5,-66 30.5,-42 115.5,-42 115.5,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<!-- proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
 <g id="interface~~util_copy_particle_info_arr~~CalledByGraph_edge2" class="edge">
-<title>proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M119.78,-54C135.62,-54 153.85,-54 171.55,-54"/>
-<polygon fill="#000000" stroke="#000000" points="171.89,-57.5 181.89,-54 171.89,-50.5 171.89,-57.5"/>
+<title>proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M115.71,-54C132.5,-54 152.44,-54 171.74,-54"/>
+<polygon fill="#000000" stroke="#000000" points="171.76,-57.5 181.76,-54 171.76,-50.5 171.76,-57.5"/>
 </g>
-<!-- proc~util_sort_rearrange_arr_info -->
+<!-- proc~util_spill_arr_info -->
 <g id="interface~~util_copy_particle_info_arr~~CalledByGraph_node4" class="node">
-<title>proc~util_sort_rearrange_arr_info</title>
-<g id="a_interface~~util_copy_particle_info_arr~~CalledByGraph_node4"><a xlink:href=".././proc/util_sort_rearrange_arr_info.html" xlink:title="util_sort_rearrange_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-24 0,-24 0,0 146,0 146,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_info</text>
+<title>proc~util_spill_arr_info</title>
+<g id="a_interface~~util_copy_particle_info_arr~~CalledByGraph_node4"><a xlink:href=".././proc/util_spill_arr_info.html" xlink:title="util_spill_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="119.5,-24 26.5,-24 26.5,0 119.5,0 119.5,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<!-- proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
 <g id="interface~~util_copy_particle_info_arr~~CalledByGraph_edge3" class="edge">
-<title>proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M124.43,-24.04C144.78,-28.89 168.42,-34.53 189.67,-39.6"/>
-<polygon fill="#000000" stroke="#000000" points="189.02,-43.05 199.56,-41.96 190.64,-36.24 189.02,-43.05"/>
+<title>proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M119.78,-22.93C141.08,-28.01 166.69,-34.12 189.55,-39.57"/>
+<polygon fill="#000000" stroke="#000000" points="188.95,-43.03 199.49,-41.95 190.58,-36.22 188.95,-43.03"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_exit.html b/docs/interface/util_exit.html
index 06cf07667..eaf1bcba4 100644
--- a/docs/interface/util_exit.html
+++ b/docs/interface/util_exit.html
@@ -330,800 +330,800 @@ <h3 class="panel-title">Called by</h3>
 <!-- interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_node1" class="node">
 <title>interface~util_exit</title>
-<polygon fill="none" stroke="black" points="668,-570 614,-570 614,-546 668,-546 668,-570"/>
-<text text-anchor="middle" x="641" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_exit</text>
+<polygon fill="none" stroke="black" points="668,-566 614,-566 614,-542 668,-542 668,-566"/>
+<text text-anchor="middle" x="641" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_exit</text>
 </g>
-<!-- proc~io_write_hdr_system -->
+<!-- proc~io_write_encounter -->
 <g id="interface~~util_exit~~CalledByGraph_node2" class="node">
-<title>proc~io_write_hdr_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node2"><a xlink:href=".././proc/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="557.5,-1112 446.5,-1112 446.5,-1088 557.5,-1088 557.5,-1112"/>
-<text text-anchor="middle" x="502" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
+<title>proc~io_write_encounter</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node2"><a xlink:href=".././proc/io_write_encounter.html" xlink:title="io_write_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="553.5,-1112 450.5,-1112 450.5,-1088 553.5,-1088 553.5,-1112"/>
+<text text-anchor="middle" x="502" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_hdr_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_encounter&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge1" class="edge">
-<title>proc~io_write_hdr_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M557.7,-1089.3C565.47,-1085.61 572.64,-1080.65 578,-1074 640.44,-996.52 641.31,-669.51 640.35,-580.47"/>
-<polygon fill="#000000" stroke="#000000" points="643.85,-580.34 640.23,-570.39 636.85,-580.43 643.85,-580.34"/>
+<title>proc~io_write_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M553.73,-1094.51C562.97,-1091.3 571.67,-1086.4 578,-1079 611.21,-1040.17 633.56,-671.65 638.81,-576.39"/>
+<polygon fill="#000000" stroke="#000000" points="642.31,-576.57 639.35,-566.4 635.32,-576.19 642.31,-576.57"/>
 </g>
-<!-- proc~io_dump_base -->
+<!-- proc~io_read_in_cb -->
 <g id="interface~~util_exit~~CalledByGraph_node3" class="node">
-<title>proc~io_dump_base</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node3"><a xlink:href=".././proc/io_dump_base.html" xlink:title="io_dump_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="202,-1032 119,-1032 119,-1008 202,-1008 202,-1032"/>
-<text text-anchor="middle" x="160.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+<title>proc~io_read_in_cb</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node3"><a xlink:href=".././proc/io_read_in_cb.html" xlink:title="io_read_in_cb">
+<polygon fill="#d9534f" stroke="#d9534f" points="542,-1070 462,-1070 462,-1046 542,-1046 542,-1070"/>
+<text text-anchor="middle" x="502" y="-1055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_in_cb&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge2" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M197.67,-1032.06C210.28,-1035.7 224.62,-1039.2 238,-1041 312.88,-1051.09 521.27,-1090.91 578,-1041 613.11,-1010.11 633.85,-671.78 638.83,-580.55"/>
-<polygon fill="#000000" stroke="#000000" points="642.33,-580.64 639.37,-570.46 635.34,-580.26 642.33,-580.64"/>
-</g>
-<!-- interface~io_write_frame_body -->
-<g id="interface~~util_exit~~CalledByGraph_node34" class="node">
-<title>interface~io_write_frame_body</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node34"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="370,-1032 258,-1032 258,-1008 370,-1008 370,-1032"/>
-<text text-anchor="middle" x="314" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
-</a>
-</g>
-</g>
-<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
-<g id="interface~~util_exit~~CalledByGraph_edge53" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
-<path fill="none" stroke="#000000" d="M202.1,-1020C216.12,-1020 232.2,-1020 247.69,-1020"/>
-<polygon fill="#000000" stroke="#000000" points="247.76,-1023.5 257.76,-1020 247.76,-1016.5 247.76,-1023.5"/>
-</g>
-<!-- interface~io_write_frame_cb -->
-<g id="interface~~util_exit~~CalledByGraph_node41" class="node">
-<title>interface~io_write_frame_cb</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node41"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="364,-990 264,-990 264,-966 364,-966 364,-990"/>
-<text text-anchor="middle" x="314" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
-</a>
-</g>
-</g>
-<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
-<g id="interface~~util_exit~~CalledByGraph_edge54" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" d="M202.1,-1008.74C219.86,-1003.82 240.94,-997.98 259.93,-992.71"/>
-<polygon fill="#000000" stroke="#000000" points="260.93,-996.07 269.63,-990.02 259.06,-989.32 260.93,-996.07"/>
+<title>proc~io_read_in_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M542.37,-1055.59C555.51,-1052.78 569.07,-1047.33 578,-1037 638.71,-966.76 640.88,-661.51 640.28,-576.21"/>
+<polygon fill="#000000" stroke="#000000" points="643.78,-576.06 640.18,-566.1 636.78,-576.13 643.78,-576.06"/>
 </g>
-<!-- proc~io_get_args -->
+<!-- proc~util_append_pl -->
 <g id="interface~~util_exit~~CalledByGraph_node4" class="node">
-<title>proc~io_get_args</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node4"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="536.5,-948 467.5,-948 467.5,-924 536.5,-924 536.5,-948"/>
-<text text-anchor="middle" x="502" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<title>proc~util_append_pl</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node4"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="543,-1028 461,-1028 461,-1004 543,-1004 543,-1028"/>
+<text text-anchor="middle" x="502" y="-1013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~util_exit -->
+<!-- proc~util_append_pl&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge3" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M536.7,-934.41C551.38,-931.95 567.57,-926.54 578,-915 622.95,-865.26 636.03,-650.89 639.15,-580.49"/>
-<polygon fill="#000000" stroke="#000000" points="642.66,-580.26 639.58,-570.13 635.67,-579.97 642.66,-580.26"/>
+<title>proc~util_append_pl&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M543.08,-1013.36C555.97,-1010.5 569.19,-1005.08 578,-995 633.43,-931.64 639.42,-656.99 639.97,-576.34"/>
+<polygon fill="#000000" stroke="#000000" points="643.47,-576.31 640.02,-566.29 636.47,-576.28 643.47,-576.31"/>
 </g>
-<!-- proc~io_write_frame_system -->
+<!-- proc~util_append_tp -->
 <g id="interface~~util_exit~~CalledByGraph_node5" class="node">
-<title>proc~io_write_frame_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node5"><a xlink:href=".././proc/io_write_frame_system.html" xlink:title="io_write_frame_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="563.5,-906 440.5,-906 440.5,-882 563.5,-882 563.5,-906"/>
-<text text-anchor="middle" x="502" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
+<title>proc~util_append_tp</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node5"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="543.5,-986 460.5,-986 460.5,-962 543.5,-962 543.5,-986"/>
+<text text-anchor="middle" x="502" y="-971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_system&#45;&gt;interface~util_exit -->
+<!-- proc~util_append_tp&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge4" class="edge">
-<title>proc~io_write_frame_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M563.81,-883.64C569.1,-880.86 573.96,-877.37 578,-873 617.79,-829.95 634.05,-644.94 638.59,-580.35"/>
-<polygon fill="#000000" stroke="#000000" points="642.1,-580.29 639.28,-570.08 635.11,-579.82 642.1,-580.29"/>
+<title>proc~util_append_tp&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M543.78,-971.11C556.42,-968.2 569.29,-962.81 578,-953 628.13,-896.53 637.8,-652.52 639.6,-576.62"/>
+<polygon fill="#000000" stroke="#000000" points="643.11,-576.38 639.82,-566.31 636.11,-576.23 643.11,-576.38"/>
 </g>
-<!-- proc~io_dump_particle_info_base -->
+<!-- proc~io_read_encounter -->
 <g id="interface~~util_exit~~CalledByGraph_node6" class="node">
-<title>proc~io_dump_particle_info_base</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node6"><a xlink:href=".././proc/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="575.5,-864 428.5,-864 428.5,-840 575.5,-840 575.5,-864"/>
-<text text-anchor="middle" x="502" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
+<title>proc~io_read_encounter</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node6"><a xlink:href=".././proc/io_read_encounter.html" xlink:title="io_read_encounter">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-944 450.5,-944 450.5,-920 553.5,-920 553.5,-944"/>
+<text text-anchor="middle" x="502" y="-929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_particle_info_base&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_encounter&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge5" class="edge">
-<title>proc~io_dump_particle_info_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M566.53,-839.94C570.75,-837.48 574.64,-834.53 578,-831 612.7,-794.53 631.84,-638.33 637.88,-580.04"/>
-<polygon fill="#000000" stroke="#000000" points="641.37,-580.35 638.88,-570.05 634.4,-579.65 641.37,-580.35"/>
+<title>proc~io_read_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M553.81,-926.11C562.93,-922.91 571.56,-918.12 578,-911 622.95,-861.26 636.03,-646.89 639.15,-576.49"/>
+<polygon fill="#000000" stroke="#000000" points="642.66,-576.26 639.58,-566.13 635.67,-575.97 642.66,-576.26"/>
 </g>
-<!-- proc~io_write_frame_body -->
+<!-- proc~setup_construct_system -->
 <g id="interface~~util_exit~~CalledByGraph_node7" class="node">
-<title>proc~io_write_frame_body</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node7"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="558,-1032 446,-1032 446,-1008 558,-1008 558,-1032"/>
-<text text-anchor="middle" x="502" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<title>proc~setup_construct_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node7"><a xlink:href=".././proc/setup_construct_system.html" xlink:title="setup_construct_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="566,-902 438,-902 438,-878 566,-878 566,-902"/>
+<text text-anchor="middle" x="502" y="-887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
+<!-- proc~setup_construct_system&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge6" class="edge">
-<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M558.18,-1012.66C565.7,-1009.5 572.66,-1005.11 578,-999 633.43,-935.64 639.42,-660.99 639.97,-580.34"/>
-<polygon fill="#000000" stroke="#000000" points="643.47,-580.31 640.02,-570.29 636.47,-580.28 643.47,-580.31"/>
+<title>proc~setup_construct_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M566.3,-878.26C570.62,-875.72 574.6,-872.67 578,-869 617.79,-825.95 634.05,-640.94 638.59,-576.35"/>
+<polygon fill="#000000" stroke="#000000" points="642.1,-576.29 639.28,-566.08 635.11,-575.82 642.1,-576.29"/>
 </g>
-<!-- proc~io_write_encounter -->
+<!-- proc~io_read_particle_info_system -->
 <g id="interface~~util_exit~~CalledByGraph_node8" class="node">
-<title>proc~io_write_encounter</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node8"><a xlink:href=".././proc/io_write_encounter.html" xlink:title="io_write_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="553.5,-822 450.5,-822 450.5,-798 553.5,-798 553.5,-822"/>
-<text text-anchor="middle" x="502" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
+<title>proc~io_read_particle_info_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node8"><a xlink:href=".././proc/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="578,-860 426,-860 426,-836 578,-836 578,-860"/>
+<text text-anchor="middle" x="502" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_encounter&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_particle_info_system&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge7" class="edge">
-<title>proc~io_write_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M553.7,-803.51C562.72,-800.35 571.34,-795.73 578,-789 635.46,-730.91 641.22,-625.64 640.81,-580.04"/>
-<polygon fill="#000000" stroke="#000000" points="644.31,-579.97 640.6,-570.04 637.31,-580.11 644.31,-579.97"/>
+<title>proc~io_read_particle_info_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M566.53,-835.94C570.75,-833.48 574.64,-830.53 578,-827 612.7,-790.53 631.84,-634.33 637.88,-576.04"/>
+<polygon fill="#000000" stroke="#000000" points="641.37,-576.35 638.88,-566.05 634.4,-575.65 641.37,-576.35"/>
 </g>
-<!-- proc~io_write_frame_encounter -->
+<!-- proc~check -->
 <g id="interface~~util_exit~~CalledByGraph_node9" class="node">
-<title>proc~io_write_frame_encounter</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node9"><a xlink:href=".././proc/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="570.5,-780 433.5,-780 433.5,-756 570.5,-756 570.5,-780"/>
-<text text-anchor="middle" x="502" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
+<title>proc~check</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node9"><a xlink:href=".././proc/check.html" xlink:title="check">
+<polygon fill="#d9534f" stroke="#d9534f" points="529,-818 475,-818 475,-794 529,-794 529,-818"/>
+<text text-anchor="middle" x="502" y="-803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">check</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_encounter&#45;&gt;interface~util_exit -->
+<!-- proc~check&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge8" class="edge">
-<title>proc~io_write_frame_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M565.46,-755.98C570.03,-753.51 574.29,-750.55 578,-747 625.33,-701.7 636.56,-619.74 639.2,-580.34"/>
-<polygon fill="#000000" stroke="#000000" points="642.71,-580.38 639.75,-570.2 635.72,-580 642.71,-580.38"/>
+<title>proc~check&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M529.18,-805.01C545.31,-803.03 565.26,-797.88 578,-785 635.46,-726.91 641.22,-621.64 640.81,-576.04"/>
+<polygon fill="#000000" stroke="#000000" points="644.31,-575.97 640.6,-566.04 637.31,-576.11 644.31,-575.97"/>
 </g>
-<!-- proc~io_dump_particle_info -->
+<!-- proc~io_write_discard -->
 <g id="interface~~util_exit~~CalledByGraph_node10" class="node">
-<title>proc~io_dump_particle_info</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node10"><a xlink:href=".././proc/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="561,-738 443,-738 443,-714 561,-714 561,-738"/>
-<text text-anchor="middle" x="502" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
+<title>proc~io_write_discard</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node10"><a xlink:href=".././proc/io_write_discard.html" xlink:title="io_write_discard">
+<polygon fill="#d9534f" stroke="#d9534f" points="547,-776 457,-776 457,-752 547,-752 547,-776"/>
+<text text-anchor="middle" x="502" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_particle_info&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_discard&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge9" class="edge">
-<title>proc~io_dump_particle_info&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M561.06,-715.61C567.21,-712.85 573.03,-709.38 578,-705 615.36,-672.07 630.83,-612.89 636.72,-580.57"/>
-<polygon fill="#000000" stroke="#000000" points="640.23,-580.78 638.43,-570.34 633.33,-579.63 640.23,-580.78"/>
+<title>proc~io_write_discard&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.18,-759.15C558.38,-756.05 569.6,-751.04 578,-743 625.33,-697.7 636.56,-615.74 639.2,-576.34"/>
+<polygon fill="#000000" stroke="#000000" points="642.71,-576.38 639.75,-566.2 635.72,-576 642.71,-576.38"/>
 </g>
-<!-- proc~util_append_tp -->
+<!-- proc~io_dump_particle_info_base -->
 <g id="interface~~util_exit~~CalledByGraph_node11" class="node">
-<title>proc~util_append_tp</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node11"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="543.5,-696 460.5,-696 460.5,-672 543.5,-672 543.5,-696"/>
-<text text-anchor="middle" x="502" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>proc~io_dump_particle_info_base</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node11"><a xlink:href=".././proc/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="575.5,-734 428.5,-734 428.5,-710 575.5,-710 575.5,-734"/>
+<text text-anchor="middle" x="502" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_exit -->
-<g id="interface~~util_exit~~CalledByGraph_edge10" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M543.76,-678.52C555.68,-675.42 568.14,-670.58 578,-663 605.93,-641.54 623.74,-603.62 632.79,-579.7"/>
-<polygon fill="#000000" stroke="#000000" points="636.15,-580.7 636.24,-570.11 629.57,-578.33 636.15,-580.7"/>
+<!-- proc~io_dump_particle_info_base&#45;&gt;interface~util_exit -->
+<g id="interface~~util_exit~~CalledByGraph_edge12" class="edge">
+<title>proc~io_dump_particle_info_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M564.78,-709.83C569.55,-707.4 574.04,-704.49 578,-701 615.36,-668.07 630.83,-608.89 636.72,-576.57"/>
+<polygon fill="#000000" stroke="#000000" points="640.23,-576.78 638.43,-566.34 633.33,-575.63 640.23,-576.78"/>
 </g>
-<!-- proc~util_valid_id_system -->
+<!-- proc~io_dump_particle_info -->
 <g id="interface~~util_exit~~CalledByGraph_node12" class="node">
-<title>proc~util_valid_id_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node12"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="556,-654 448,-654 448,-630 556,-630 556,-654"/>
-<text text-anchor="middle" x="502" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+<title>proc~io_dump_particle_info</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node12"><a xlink:href=".././proc/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="561,-692 443,-692 443,-668 561,-668 561,-692"/>
+<text text-anchor="middle" x="502" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
-<g id="interface~~util_exit~~CalledByGraph_edge11" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M556.07,-630.9C563.7,-628.24 571.25,-624.99 578,-621 596.6,-610.02 613.5,-592.06 624.93,-578.12"/>
-<polygon fill="#000000" stroke="#000000" points="627.85,-580.08 631.32,-570.06 622.36,-575.73 627.85,-580.08"/>
+<!-- proc~io_dump_particle_info&#45;&gt;interface~util_exit -->
+<g id="interface~~util_exit~~CalledByGraph_edge10" class="edge">
+<title>proc~io_dump_particle_info&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M561.27,-668.61C567.24,-666.03 572.96,-662.87 578,-659 605.93,-637.54 623.74,-599.62 632.79,-575.7"/>
+<polygon fill="#000000" stroke="#000000" points="636.15,-576.7 636.24,-566.11 629.57,-574.33 636.15,-576.7"/>
 </g>
-<!-- proc~util_solve_rkf45 -->
+<!-- proc~io_dump_param -->
 <g id="interface~~util_exit~~CalledByGraph_node13" class="node">
-<title>proc~util_solve_rkf45</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node13"><a xlink:href=".././proc/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="545.5,-612 458.5,-612 458.5,-588 545.5,-588 545.5,-612"/>
-<text text-anchor="middle" x="502" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
+<title>proc~io_dump_param</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node13"><a xlink:href=".././proc/io_dump_param.html" xlink:title="io_dump_param">
+<polygon fill="#d9534f" stroke="#d9534f" points="547.5,-650 456.5,-650 456.5,-626 547.5,-626 547.5,-650"/>
+<text text-anchor="middle" x="502" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_rkf45&#45;&gt;interface~util_exit -->
-<g id="interface~~util_exit~~CalledByGraph_edge12" class="edge">
-<title>proc~util_solve_rkf45&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M545.56,-588.51C556.19,-585.52 567.54,-582.23 578,-579 586.51,-576.37 595.61,-573.38 604.16,-570.5"/>
-<polygon fill="#000000" stroke="#000000" points="605.52,-573.74 613.86,-567.2 603.26,-567.11 605.52,-573.74"/>
+<!-- proc~io_dump_param&#45;&gt;interface~util_exit -->
+<g id="interface~~util_exit~~CalledByGraph_edge11" class="edge">
+<title>proc~io_dump_param&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.79,-629.55C558.14,-626.51 568.8,-622.43 578,-617 596.6,-606.02 613.5,-588.06 624.93,-574.12"/>
+<polygon fill="#000000" stroke="#000000" points="627.85,-576.08 631.32,-566.06 622.36,-571.73 627.85,-576.08"/>
 </g>
-<!-- proc~io_read_particle_info_system -->
+<!-- proc~io_write_frame_encounter -->
 <g id="interface~~util_exit~~CalledByGraph_node14" class="node">
-<title>proc~io_read_particle_info_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node14"><a xlink:href=".././proc/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="578,-570 426,-570 426,-546 578,-546 578,-570"/>
-<text text-anchor="middle" x="502" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
+<title>proc~io_write_frame_encounter</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node14"><a xlink:href=".././proc/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="570.5,-608 433.5,-608 433.5,-584 570.5,-584 570.5,-608"/>
+<text text-anchor="middle" x="502" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_particle_info_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_encounter&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge13" class="edge">
-<title>proc~io_read_particle_info_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M578.31,-558C587.22,-558 595.97,-558 603.96,-558"/>
-<polygon fill="#000000" stroke="#000000" points="603.96,-561.5 613.96,-558 603.96,-554.5 603.96,-561.5"/>
+<title>proc~io_write_frame_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.53,-583.95C557.58,-581.12 568.18,-578.03 578,-575 586.51,-572.37 595.61,-569.38 604.16,-566.5"/>
+<polygon fill="#000000" stroke="#000000" points="605.52,-569.74 613.86,-563.2 603.26,-563.11 605.52,-569.74"/>
 </g>
-<!-- proc~io_read_in_cb -->
+<!-- proc~io_conservation_report -->
 <g id="interface~~util_exit~~CalledByGraph_node15" class="node">
-<title>proc~io_read_in_cb</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node15"><a xlink:href=".././proc/io_read_in_cb.html" xlink:title="io_read_in_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="542,-528 462,-528 462,-504 542,-504 542,-528"/>
-<text text-anchor="middle" x="502" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
+<title>proc~io_conservation_report</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node15"><a xlink:href=".././proc/io_conservation_report.html" xlink:title="io_conservation_report">
+<polygon fill="#d9534f" stroke="#d9534f" points="563,-566 441,-566 441,-542 563,-542 563,-566"/>
+<text text-anchor="middle" x="502" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_in_cb&#45;&gt;interface~util_exit -->
+<!-- proc~io_conservation_report&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge14" class="edge">
-<title>proc~io_read_in_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M542.04,-526.5C553.65,-529.74 566.37,-533.41 578,-537 586.51,-539.63 595.61,-542.62 604.16,-545.5"/>
-<polygon fill="#000000" stroke="#000000" points="603.26,-548.89 613.86,-548.8 605.52,-542.26 603.26,-548.89"/>
+<title>proc~io_conservation_report&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M563.09,-554C577.02,-554 591.42,-554 603.94,-554"/>
+<polygon fill="#000000" stroke="#000000" points="603.96,-557.5 613.96,-554 603.96,-550.5 603.96,-557.5"/>
 </g>
-<!-- proc~io_read_frame_body -->
+<!-- proc~io_read_frame_cb -->
 <g id="interface~~util_exit~~CalledByGraph_node16" class="node">
-<title>proc~io_read_frame_body</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node16"><a xlink:href=".././proc/io_read_frame_body.html" xlink:title="io_read_frame_body">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="558,-486 446,-486 446,-462 558,-462 558,-486"/>
-<text text-anchor="middle" x="502" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
+<title>proc~io_read_frame_cb</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node16"><a xlink:href=".././proc/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="552,-524 452,-524 452,-500 552,-500 552,-524"/>
+<text text-anchor="middle" x="502" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_frame_body&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_frame_cb&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge15" class="edge">
-<title>proc~io_read_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M558.04,-485.8C565,-488.32 571.83,-491.36 578,-495 596.6,-505.98 613.5,-523.94 624.93,-537.88"/>
-<polygon fill="#000000" stroke="#000000" points="622.36,-540.27 631.32,-545.94 627.85,-535.92 622.36,-540.27"/>
+<title>proc~io_read_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.53,-524.05C557.58,-526.88 568.18,-529.97 578,-533 586.51,-535.63 595.61,-538.62 604.16,-541.5"/>
+<polygon fill="#000000" stroke="#000000" points="603.26,-544.89 613.86,-544.8 605.52,-538.26 603.26,-544.89"/>
 </g>
 <!-- proc~io_read_in_particle_info -->
 <g id="interface~~util_exit~~CalledByGraph_node17" class="node">
 <title>proc~io_read_in_particle_info</title>
 <g id="a_interface~~util_exit~~CalledByGraph_node17"><a xlink:href=".././proc/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="565.5,-444 438.5,-444 438.5,-420 565.5,-420 565.5,-444"/>
-<text text-anchor="middle" x="502" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="565.5,-482 438.5,-482 438.5,-458 565.5,-458 565.5,-482"/>
+<text text-anchor="middle" x="502" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
 </a>
 </g>
 </g>
 <!-- proc~io_read_in_particle_info&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge16" class="edge">
 <title>proc~io_read_in_particle_info&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M562.79,-444.06C568.21,-446.51 573.39,-449.46 578,-453 605.93,-474.46 623.74,-512.38 632.79,-536.3"/>
-<polygon fill="#000000" stroke="#000000" points="629.57,-537.67 636.24,-545.89 636.15,-535.3 629.57,-537.67"/>
+<path fill="none" stroke="#000000" d="M558.83,-482.09C565.51,-484.55 572.06,-487.49 578,-491 596.6,-501.98 613.5,-519.94 624.93,-533.88"/>
+<polygon fill="#000000" stroke="#000000" points="622.36,-536.27 631.32,-541.94 627.85,-531.92 622.36,-536.27"/>
 </g>
-<!-- proc~io_write_discard -->
+<!-- proc~io_get_old_t_final_system -->
 <g id="interface~~util_exit~~CalledByGraph_node18" class="node">
-<title>proc~io_write_discard</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node18"><a xlink:href=".././proc/io_write_discard.html" xlink:title="io_write_discard">
-<polygon fill="#d9534f" stroke="#d9534f" points="547,-402 457,-402 457,-378 547,-378 547,-402"/>
-<text text-anchor="middle" x="502" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
+<title>proc~io_get_old_t_final_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node18"><a xlink:href=".././proc/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="570,-440 434,-440 434,-416 570,-416 570,-440"/>
+<text text-anchor="middle" x="502" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_discard&#45;&gt;interface~util_exit -->
+<!-- proc~io_get_old_t_final_system&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge17" class="edge">
-<title>proc~io_write_discard&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M547.14,-395.42C558.21,-398.53 569.38,-403.4 578,-411 615.36,-443.93 630.83,-503.11 636.72,-535.43"/>
-<polygon fill="#000000" stroke="#000000" points="633.33,-536.37 638.43,-545.66 640.23,-535.22 633.33,-536.37"/>
+<title>proc~io_get_old_t_final_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M562.79,-440.06C568.21,-442.51 573.39,-445.46 578,-449 605.93,-470.46 623.74,-508.38 632.79,-532.3"/>
+<polygon fill="#000000" stroke="#000000" points="629.57,-533.67 636.24,-541.89 636.15,-531.3 629.57,-533.67"/>
 </g>
-<!-- proc~io_read_encounter -->
+<!-- proc~io_dump_base -->
 <g id="interface~~util_exit~~CalledByGraph_node19" class="node">
-<title>proc~io_read_encounter</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node19"><a xlink:href=".././proc/io_read_encounter.html" xlink:title="io_read_encounter">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-360 450.5,-360 450.5,-336 553.5,-336 553.5,-360"/>
-<text text-anchor="middle" x="502" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_encounter</text>
+<title>proc~io_dump_base</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node19"><a xlink:href=".././proc/io_dump_base.html" xlink:title="io_dump_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="202,-360 119,-360 119,-336 202,-336 202,-360"/>
+<text text-anchor="middle" x="160.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_encounter&#45;&gt;interface~util_exit -->
+<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge18" class="edge">
-<title>proc~io_read_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M553.8,-354.92C562.7,-358.05 571.26,-362.55 578,-369 625.33,-414.3 636.56,-496.26 639.2,-535.66"/>
-<polygon fill="#000000" stroke="#000000" points="635.72,-536 639.75,-545.8 642.71,-535.62 635.72,-536"/>
+<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M200.93,-360.09C212.76,-363.37 225.83,-366.66 238,-369 312.66,-383.33 517.09,-361.51 578,-407 618.27,-437.08 632.61,-498.39 637.54,-531.53"/>
+<polygon fill="#000000" stroke="#000000" points="634.09,-532.15 638.87,-541.61 641.03,-531.23 634.09,-532.15"/>
 </g>
-<!-- proc~check -->
+<!-- interface~io_write_frame_body -->
+<g id="interface~~util_exit~~CalledByGraph_node42" class="node">
+<title>interface~io_write_frame_body</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node42"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="370,-360 258,-360 258,-336 370,-336 370,-360"/>
+<text text-anchor="middle" x="314" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+</a>
+</g>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
+<g id="interface~~util_exit~~CalledByGraph_edge53" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
+<path fill="none" stroke="#000000" d="M202.1,-348C216.12,-348 232.2,-348 247.69,-348"/>
+<polygon fill="#000000" stroke="#000000" points="247.76,-351.5 257.76,-348 247.76,-344.5 247.76,-351.5"/>
+</g>
+<!-- interface~io_write_frame_cb -->
+<g id="interface~~util_exit~~CalledByGraph_node51" class="node">
+<title>interface~io_write_frame_cb</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node51"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="364,-318 264,-318 264,-294 364,-294 364,-318"/>
+<text text-anchor="middle" x="314" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+</a>
+</g>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
+<g id="interface~~util_exit~~CalledByGraph_edge54" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
+<path fill="none" stroke="#000000" d="M202.1,-336.74C219.86,-331.82 240.94,-325.98 259.93,-320.71"/>
+<polygon fill="#000000" stroke="#000000" points="260.93,-324.07 269.63,-318.02 259.06,-317.32 260.93,-324.07"/>
+</g>
+<!-- proc~io_write_hdr_system -->
 <g id="interface~~util_exit~~CalledByGraph_node20" class="node">
-<title>proc~check</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node20"><a xlink:href=".././proc/check.html" xlink:title="check">
-<polygon fill="#d9534f" stroke="#d9534f" points="529,-318 475,-318 475,-294 529,-294 529,-318"/>
-<text text-anchor="middle" x="502" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">check</text>
+<title>proc~io_write_hdr_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node20"><a xlink:href=".././proc/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="557.5,-276 446.5,-276 446.5,-252 557.5,-252 557.5,-276"/>
+<text text-anchor="middle" x="502" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
 </a>
 </g>
 </g>
-<!-- proc~check&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_hdr_system&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge19" class="edge">
-<title>proc~check&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M529.18,-306.99C545.31,-308.97 565.26,-314.12 578,-327 635.46,-385.09 641.22,-490.36 640.81,-535.96"/>
-<polygon fill="#000000" stroke="#000000" points="637.31,-535.89 640.6,-545.96 644.31,-536.03 637.31,-535.89"/>
+<title>proc~io_write_hdr_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M557.72,-271.76C565.3,-274.86 572.4,-279.13 578,-285 612.13,-320.75 631.51,-473.5 637.75,-531.52"/>
+<polygon fill="#000000" stroke="#000000" points="634.31,-532.22 638.83,-541.8 641.27,-531.49 634.31,-532.22"/>
 </g>
-<!-- proc~io_conservation_report -->
+<!-- proc~io_read_in_param -->
 <g id="interface~~util_exit~~CalledByGraph_node21" class="node">
-<title>proc~io_conservation_report</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node21"><a xlink:href=".././proc/io_conservation_report.html" xlink:title="io_conservation_report">
-<polygon fill="#d9534f" stroke="#d9534f" points="563,-276 441,-276 441,-252 563,-252 563,-276"/>
-<text text-anchor="middle" x="502" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
+<title>proc~io_read_in_param</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node21"><a xlink:href=".././proc/io_read_in_param.html" xlink:title="io_read_in_param">
+<polygon fill="#d9534f" stroke="#d9534f" points="552,-234 452,-234 452,-210 552,-210 552,-234"/>
+<text text-anchor="middle" x="502" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
 </a>
 </g>
 </g>
-<!-- proc~io_conservation_report&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_in_param&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge20" class="edge">
-<title>proc~io_conservation_report&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M563.31,-274.3C568.77,-277.08 573.81,-280.59 578,-285 612.7,-321.47 631.84,-477.67 637.88,-535.96"/>
-<polygon fill="#000000" stroke="#000000" points="634.4,-536.35 638.88,-545.95 641.37,-535.65 634.4,-536.35"/>
+<title>proc~io_read_in_param&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M552.12,-227.49C561.82,-230.68 571.11,-235.56 578,-243 617.27,-285.38 633.82,-467.34 638.51,-531.5"/>
+<polygon fill="#000000" stroke="#000000" points="635.04,-531.99 639.23,-541.73 642.02,-531.5 635.04,-531.99"/>
 </g>
-<!-- proc~io_write_frame_cb -->
+<!-- proc~util_solve_rkf45 -->
 <g id="interface~~util_exit~~CalledByGraph_node22" class="node">
-<title>proc~io_write_frame_cb</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node22"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="552,-990 452,-990 452,-966 552,-966 552,-990"/>
-<text text-anchor="middle" x="502" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<title>proc~util_solve_rkf45</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node22"><a xlink:href=".././proc/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="545.5,-192 458.5,-192 458.5,-168 545.5,-168 545.5,-192"/>
+<text text-anchor="middle" x="502" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
+<!-- proc~util_solve_rkf45&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge21" class="edge">
-<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M552.36,-972.73C562.04,-969.53 571.27,-964.58 578,-957 628.13,-900.53 637.8,-656.52 639.6,-580.62"/>
-<polygon fill="#000000" stroke="#000000" points="643.11,-580.38 639.82,-570.31 636.11,-580.23 643.11,-580.38"/>
+<title>proc~util_solve_rkf45&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M545.62,-183.46C557.62,-186.47 569.65,-191.78 578,-201 622.41,-250.04 635.82,-461.2 639.09,-531.29"/>
+<polygon fill="#000000" stroke="#000000" points="635.61,-531.8 639.54,-541.63 642.6,-531.49 635.61,-531.8"/>
 </g>
-<!-- proc~setup_construct_system -->
+<!-- proc~io_read_frame_body -->
 <g id="interface~~util_exit~~CalledByGraph_node23" class="node">
-<title>proc~setup_construct_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node23"><a xlink:href=".././proc/setup_construct_system.html" xlink:title="setup_construct_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="566,-234 438,-234 438,-210 566,-210 566,-234"/>
-<text text-anchor="middle" x="502" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<title>proc~io_read_frame_body</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node23"><a xlink:href=".././proc/io_read_frame_body.html" xlink:title="io_read_frame_body">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="558,-150 446,-150 446,-126 558,-126 558,-150"/>
+<text text-anchor="middle" x="502" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
 </a>
 </g>
 </g>
-<!-- proc~setup_construct_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_frame_body&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge22" class="edge">
-<title>proc~setup_construct_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M566.3,-233.74C570.62,-236.28 574.6,-239.33 578,-243 617.79,-286.05 634.05,-471.06 638.59,-535.65"/>
-<polygon fill="#000000" stroke="#000000" points="635.11,-536.18 639.28,-545.92 642.1,-535.71 635.11,-536.18"/>
+<title>proc~io_read_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M558.09,-145.42C565.63,-148.56 572.61,-152.94 578,-159 627.68,-214.88 637.65,-456.46 639.57,-531.6"/>
+<polygon fill="#000000" stroke="#000000" points="636.07,-531.9 639.8,-541.81 643.07,-531.74 636.07,-531.9"/>
 </g>
-<!-- proc~util_append_pl -->
+<!-- proc~io_write_frame_body -->
 <g id="interface~~util_exit~~CalledByGraph_node24" class="node">
-<title>proc~util_append_pl</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node24"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="543,-192 461,-192 461,-168 543,-168 543,-192"/>
-<text text-anchor="middle" x="502" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>proc~io_write_frame_body</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node24"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="558,-360 446,-360 446,-336 558,-336 558,-360"/>
+<text text-anchor="middle" x="502" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge23" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M543.29,-182.89C556.04,-185.79 569.12,-191.17 578,-201 622.95,-250.74 636.03,-465.11 639.15,-535.51"/>
-<polygon fill="#000000" stroke="#000000" points="635.67,-536.03 639.58,-545.87 642.66,-535.74 635.67,-536.03"/>
+<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M557.3,-360.09C564.94,-363.61 572.16,-368.15 578,-374 621.59,-417.67 634.57,-493.37 638.41,-531.16"/>
+<polygon fill="#000000" stroke="#000000" points="634.97,-531.94 639.33,-541.6 641.94,-531.33 634.97,-531.94"/>
 </g>
-<!-- proc~io_read_frame_cb -->
+<!-- proc~util_valid_id_system -->
 <g id="interface~~util_exit~~CalledByGraph_node25" class="node">
-<title>proc~io_read_frame_cb</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node25"><a xlink:href=".././proc/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="552,-150 452,-150 452,-126 552,-126 552,-150"/>
-<text text-anchor="middle" x="502" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+<title>proc~util_valid_id_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node25"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="556,-108 448,-108 448,-84 556,-84 556,-108"/>
+<text text-anchor="middle" x="502" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_frame_cb&#45;&gt;interface~util_exit -->
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge24" class="edge">
-<title>proc~io_read_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M552.36,-143.27C562.04,-146.47 571.27,-151.42 578,-159 628.13,-215.47 637.8,-459.48 639.6,-535.38"/>
-<polygon fill="#000000" stroke="#000000" points="636.11,-535.77 639.82,-545.69 643.11,-535.62 636.11,-535.77"/>
+<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M556.28,-102.59C564.52,-105.78 572.21,-110.39 578,-117 632.86,-179.63 639.26,-450.83 639.94,-531.37"/>
+<polygon fill="#000000" stroke="#000000" points="636.44,-531.84 640,-541.82 643.44,-531.8 636.44,-531.84"/>
 </g>
-<!-- proc~io_get_old_t_final_system -->
+<!-- proc~io_write_frame_cb -->
 <g id="interface~~util_exit~~CalledByGraph_node26" class="node">
-<title>proc~io_get_old_t_final_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node26"><a xlink:href=".././proc/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="570,-108 434,-108 434,-84 570,-84 570,-108"/>
-<text text-anchor="middle" x="502" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
+<title>proc~io_write_frame_cb</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node26"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#d9534f" stroke="#d9534f" points="552,-318 452,-318 452,-294 552,-294 552,-318"/>
+<text text-anchor="middle" x="502" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_old_t_final_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge25" class="edge">
-<title>proc~io_get_old_t_final_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M567.55,-108.18C571.43,-110.63 574.97,-113.54 578,-117 633.43,-180.36 639.42,-455.01 639.97,-535.66"/>
-<polygon fill="#000000" stroke="#000000" points="636.47,-535.72 640.02,-545.71 643.47,-535.69 636.47,-535.72"/>
+<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M552.13,-311.99C561.71,-315.15 570.95,-319.9 578,-327 634.41,-383.77 640.79,-486.58 640.68,-531.73"/>
+<polygon fill="#000000" stroke="#000000" points="637.18,-531.85 640.54,-541.9 644.18,-531.95 637.18,-531.85"/>
 </g>
-<!-- proc~io_dump_param -->
+<!-- proc~io_write_frame_system -->
 <g id="interface~~util_exit~~CalledByGraph_node27" class="node">
-<title>proc~io_dump_param</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node27"><a xlink:href=".././proc/io_dump_param.html" xlink:title="io_dump_param">
-<polygon fill="#d9534f" stroke="#d9534f" points="547.5,-66 456.5,-66 456.5,-42 547.5,-42 547.5,-66"/>
-<text text-anchor="middle" x="502" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
+<title>proc~io_write_frame_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node27"><a xlink:href=".././proc/io_write_frame_system.html" xlink:title="io_write_frame_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="563.5,-66 440.5,-66 440.5,-42 563.5,-42 563.5,-66"/>
+<text text-anchor="middle" x="502" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_param&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_system&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge26" class="edge">
-<title>proc~io_dump_param&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M547.84,-57.74C559.18,-60.82 570.31,-66.1 578,-75 638.71,-145.24 640.88,-450.49 640.28,-535.79"/>
-<polygon fill="#000000" stroke="#000000" points="636.78,-535.87 640.18,-545.9 643.78,-535.94 636.78,-535.87"/>
+<title>proc~io_write_frame_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M563.75,-63.9C569.12,-66.77 574.02,-70.4 578,-75 638.12,-144.49 640.74,-446.06 640.25,-531.41"/>
+<polygon fill="#000000" stroke="#000000" points="636.75,-531.53 640.17,-541.56 643.75,-531.59 636.75,-531.53"/>
 </g>
-<!-- proc~io_read_in_param -->
+<!-- proc~io_get_args -->
 <g id="interface~~util_exit~~CalledByGraph_node28" class="node">
-<title>proc~io_read_in_param</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node28"><a xlink:href=".././proc/io_read_in_param.html" xlink:title="io_read_in_param">
-<polygon fill="#d9534f" stroke="#d9534f" points="552,-24 452,-24 452,0 552,0 552,-24"/>
-<text text-anchor="middle" x="502" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
+<title>proc~io_get_args</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node28"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="536.5,-24 467.5,-24 467.5,0 536.5,0 536.5,-24"/>
+<text text-anchor="middle" x="502" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_in_param&#45;&gt;interface~util_exit -->
+<!-- proc~io_get_args&#45;&gt;interface~util_exit -->
 <g id="interface~~util_exit~~CalledByGraph_edge27" class="edge">
-<title>proc~io_read_in_param&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M552.19,-16.96C562,-20.17 571.32,-25.19 578,-33 611.21,-71.83 633.56,-440.35 638.81,-535.61"/>
-<polygon fill="#000000" stroke="#000000" points="635.32,-535.81 639.35,-545.6 642.31,-535.43 635.32,-535.81"/>
+<title>proc~io_get_args&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M536.6,-13.28C551.44,-15.66 567.8,-21.09 578,-33 643.48,-109.47 642.11,-442.32 640.51,-531.79"/>
+<polygon fill="#000000" stroke="#000000" points="637.01,-531.83 640.31,-541.9 644.01,-531.97 637.01,-531.83"/>
 </g>
-<!-- interface~io_read_frame_cb -->
+<!-- interface~io_conservation_report -->
 <g id="interface~~util_exit~~CalledByGraph_node29" class="node">
-<title>interface~io_read_frame_cb</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node29"><a xlink:href=".././interface/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="364,-150 264,-150 264,-126 364,-126 364,-150"/>
-<text text-anchor="middle" x="314" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+<title>interface~io_conservation_report</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node29"><a xlink:href=".././interface/io_conservation_report.html" xlink:title="io_conservation_report">
+<polygon fill="#a7506f" stroke="#a7506f" points="375,-566 253,-566 253,-542 375,-542 375,-566"/>
+<text text-anchor="middle" x="314" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb -->
-<g id="interface~~util_exit~~CalledByGraph_edge49" class="edge">
-<title>interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-138C388.1,-138 416.75,-138 441.67,-138"/>
-<polygon fill="#000000" stroke="#000000" points="441.74,-141.5 451.74,-138 441.74,-134.5 441.74,-141.5"/>
+<!-- interface~io_conservation_report&#45;&gt;proc~io_conservation_report -->
+<g id="interface~~util_exit~~CalledByGraph_edge39" class="edge">
+<title>interface~io_conservation_report&#45;&gt;proc~io_conservation_report</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.13,-554C392.86,-554 412.42,-554 430.73,-554"/>
+<polygon fill="#000000" stroke="#000000" points="430.76,-557.5 440.76,-554 430.76,-550.5 430.76,-557.5"/>
 </g>
-<!-- interface~util_valid_id_system -->
+<!-- interface~util_solve_rkf45 -->
 <g id="interface~~util_exit~~CalledByGraph_node30" class="node">
-<title>interface~util_valid_id_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node30"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="368,-654 260,-654 260,-630 368,-630 368,-654"/>
-<text text-anchor="middle" x="314" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+<title>interface~util_solve_rkf45</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node30"><a xlink:href=".././interface/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
+<polygon fill="#a7506f" stroke="#a7506f" points="357.5,-192 270.5,-192 270.5,-168 357.5,-168 357.5,-192"/>
+<text text-anchor="middle" x="314" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
 </a>
 </g>
 </g>
-<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
-<g id="interface~~util_exit~~CalledByGraph_edge38" class="edge">
-<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.3,-642C389.9,-642 415.01,-642 437.54,-642"/>
-<polygon fill="#000000" stroke="#000000" points="437.69,-645.5 447.69,-642 437.69,-638.5 437.69,-645.5"/>
+<!-- interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45 -->
+<g id="interface~~util_exit~~CalledByGraph_edge46" class="edge">
+<title>interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.67,-180C384.51,-180 419.36,-180 447.97,-180"/>
+<polygon fill="#000000" stroke="#000000" points="448.2,-183.5 458.2,-180 448.2,-176.5 448.2,-183.5"/>
 </g>
-<!-- interface~io_write_encounter -->
+<!-- interface~io_dump_particle_info_base -->
 <g id="interface~~util_exit~~CalledByGraph_node31" class="node">
-<title>interface~io_write_encounter</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node31"><a xlink:href=".././interface/io_write_encounter.html" xlink:title="io_write_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="365.5,-822 262.5,-822 262.5,-798 365.5,-798 365.5,-822"/>
-<text text-anchor="middle" x="314" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
+<title>interface~io_dump_particle_info_base</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node31"><a xlink:href=".././interface/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="387.5,-734 240.5,-734 240.5,-710 387.5,-710 387.5,-734"/>
+<text text-anchor="middle" x="314" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_encounter&#45;&gt;proc~io_write_encounter -->
-<g id="interface~~util_exit~~CalledByGraph_edge34" class="edge">
-<title>interface~io_write_encounter&#45;&gt;proc~io_write_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.83,-810C388.79,-810 416.11,-810 440.15,-810"/>
-<polygon fill="#000000" stroke="#000000" points="440.24,-813.5 450.24,-810 440.24,-806.5 440.24,-813.5"/>
+<!-- interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base -->
+<g id="interface~~util_exit~~CalledByGraph_edge35" class="edge">
+<title>interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.71,-722C397.72,-722 408.06,-722 418.24,-722"/>
+<polygon fill="#000000" stroke="#000000" points="418.34,-725.5 428.34,-722 418.34,-718.5 418.34,-725.5"/>
 </g>
-<!-- interface~util_append_pl -->
+<!-- interface~setup_construct_system -->
 <g id="interface~~util_exit~~CalledByGraph_node32" class="node">
-<title>interface~util_append_pl</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node32"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="355,-192 273,-192 273,-168 355,-168 355,-192"/>
-<text text-anchor="middle" x="314" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>interface~setup_construct_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node32"><a xlink:href=".././interface/setup_construct_system.html" xlink:title="setup_construct_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="378,-902 250,-902 250,-878 378,-878 378,-902"/>
+<text text-anchor="middle" x="314" y="-887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
-<g id="interface~~util_exit~~CalledByGraph_edge48" class="edge">
-<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.36,-180C383.27,-180 420.61,-180 450.49,-180"/>
-<polygon fill="#000000" stroke="#000000" points="450.72,-183.5 460.72,-180 450.72,-176.5 450.72,-183.5"/>
+<!-- interface~setup_construct_system&#45;&gt;proc~setup_construct_system -->
+<g id="interface~~util_exit~~CalledByGraph_edge32" class="edge">
+<title>interface~setup_construct_system&#45;&gt;proc~setup_construct_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.23,-890C394.19,-890 411.46,-890 427.86,-890"/>
+<polygon fill="#000000" stroke="#000000" points="427.94,-893.5 437.94,-890 427.94,-886.5 427.94,-893.5"/>
 </g>
 <!-- interface~io_write_hdr_system -->
 <g id="interface~~util_exit~~CalledByGraph_node33" class="node">
 <title>interface~io_write_hdr_system</title>
 <g id="a_interface~~util_exit~~CalledByGraph_node33"><a xlink:href=".././interface/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="369.5,-1112 258.5,-1112 258.5,-1088 369.5,-1088 369.5,-1112"/>
-<text text-anchor="middle" x="314" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="369.5,-276 258.5,-276 258.5,-252 369.5,-252 369.5,-276"/>
+<text text-anchor="middle" x="314" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
 </a>
 </g>
 </g>
 <!-- interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system -->
-<g id="interface~~util_exit~~CalledByGraph_edge28" class="edge">
+<g id="interface~~util_exit~~CalledByGraph_edge44" class="edge">
 <title>interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369.55,-1100C390.46,-1100 414.53,-1100 436.3,-1100"/>
-<polygon fill="#000000" stroke="#000000" points="436.45,-1103.5 446.45,-1100 436.45,-1096.5 436.45,-1103.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369.55,-264C390.46,-264 414.53,-264 436.3,-264"/>
+<polygon fill="#000000" stroke="#000000" points="436.45,-267.5 446.45,-264 436.45,-260.5 436.45,-267.5"/>
 </g>
-<!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
-<g id="interface~~util_exit~~CalledByGraph_edge33" class="edge">
-<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-1020C390.67,-1020 414.3,-1020 435.76,-1020"/>
-<polygon fill="#000000" stroke="#000000" points="435.77,-1023.5 445.77,-1020 435.77,-1016.5 435.77,-1023.5"/>
+<!-- interface~io_read_frame_cb -->
+<g id="interface~~util_exit~~CalledByGraph_node34" class="node">
+<title>interface~io_read_frame_cb</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node34"><a xlink:href=".././interface/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="364,-524 264,-524 264,-500 364,-500 364,-524"/>
+<text text-anchor="middle" x="314" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+</a>
 </g>
-<!-- interface~io_write_frame_encounter -->
+</g>
+<!-- interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb -->
+<g id="interface~~util_exit~~CalledByGraph_edge40" class="edge">
+<title>interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-512C388.1,-512 416.75,-512 441.67,-512"/>
+<polygon fill="#000000" stroke="#000000" points="441.74,-515.5 451.74,-512 441.74,-508.5 441.74,-515.5"/>
+</g>
+<!-- interface~io_read_in_cb -->
 <g id="interface~~util_exit~~CalledByGraph_node35" class="node">
-<title>interface~io_write_frame_encounter</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node35"><a xlink:href=".././interface/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="382.5,-780 245.5,-780 245.5,-756 382.5,-756 382.5,-780"/>
-<text text-anchor="middle" x="314" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
+<title>interface~io_read_in_cb</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node35"><a xlink:href=".././interface/io_read_in_cb.html" xlink:title="io_read_in_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="354,-1070 274,-1070 274,-1046 354,-1046 354,-1070"/>
+<text text-anchor="middle" x="314" y="-1055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter -->
-<g id="interface~~util_exit~~CalledByGraph_edge35" class="edge">
-<title>interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.68,-768C395.84,-768 409.73,-768 423.19,-768"/>
-<polygon fill="#000000" stroke="#000000" points="423.37,-771.5 433.37,-768 423.37,-764.5 423.37,-771.5"/>
+<!-- interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb -->
+<g id="interface~~util_exit~~CalledByGraph_edge29" class="edge">
+<title>interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M354.45,-1058C382.78,-1058 421.17,-1058 451.55,-1058"/>
+<polygon fill="#000000" stroke="#000000" points="451.93,-1061.5 461.93,-1058 451.93,-1054.5 451.93,-1061.5"/>
 </g>
-<!-- interface~io_read_particle_info_system -->
+<!-- interface~io_write_encounter -->
 <g id="interface~~util_exit~~CalledByGraph_node36" class="node">
-<title>interface~io_read_particle_info_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node36"><a xlink:href=".././interface/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="390,-570 238,-570 238,-546 390,-546 390,-570"/>
-<text text-anchor="middle" x="314" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
+<title>interface~io_write_encounter</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node36"><a xlink:href=".././interface/io_write_encounter.html" xlink:title="io_write_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="365.5,-1112 262.5,-1112 262.5,-1088 365.5,-1088 365.5,-1112"/>
+<text text-anchor="middle" x="314" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system -->
-<g id="interface~~util_exit~~CalledByGraph_edge40" class="edge">
-<title>interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.12,-558C398.6,-558 407.28,-558 415.87,-558"/>
-<polygon fill="#000000" stroke="#000000" points="415.9,-561.5 425.9,-558 415.9,-554.5 415.9,-561.5"/>
+<!-- interface~io_write_encounter&#45;&gt;proc~io_write_encounter -->
+<g id="interface~~util_exit~~CalledByGraph_edge28" class="edge">
+<title>interface~io_write_encounter&#45;&gt;proc~io_write_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.83,-1100C388.79,-1100 416.11,-1100 440.15,-1100"/>
+<polygon fill="#000000" stroke="#000000" points="440.24,-1103.5 450.24,-1100 440.24,-1096.5 440.24,-1103.5"/>
 </g>
-<!-- interface~io_read_frame_body -->
+<!-- interface~io_dump_param -->
 <g id="interface~~util_exit~~CalledByGraph_node37" class="node">
-<title>interface~io_read_frame_body</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node37"><a xlink:href=".././interface/io_read_frame_body.html" xlink:title="io_read_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="370,-486 258,-486 258,-462 370,-462 370,-486"/>
-<text text-anchor="middle" x="314" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
+<title>interface~io_dump_param</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node37"><a xlink:href=".././interface/io_dump_param.html" xlink:title="io_dump_param">
+<polygon fill="#a7506f" stroke="#a7506f" points="359.5,-650 268.5,-650 268.5,-626 359.5,-626 359.5,-650"/>
+<text text-anchor="middle" x="314" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body -->
-<g id="interface~~util_exit~~CalledByGraph_edge42" class="edge">
-<title>interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-474C390.67,-474 414.3,-474 435.76,-474"/>
-<polygon fill="#000000" stroke="#000000" points="435.77,-477.5 445.77,-474 435.77,-470.5 435.77,-477.5"/>
+<!-- interface~io_dump_param&#45;&gt;proc~io_dump_param -->
+<g id="interface~~util_exit~~CalledByGraph_edge37" class="edge">
+<title>interface~io_dump_param&#45;&gt;proc~io_dump_param</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.55,-638C385.57,-638 418.6,-638 446.2,-638"/>
+<polygon fill="#000000" stroke="#000000" points="446.49,-641.5 456.49,-638 446.49,-634.5 446.49,-641.5"/>
 </g>
-<!-- interface~io_dump_base -->
+<!-- interface~io_get_args -->
 <g id="interface~~util_exit~~CalledByGraph_node38" class="node">
-<title>interface~io_dump_base</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node38"><a xlink:href=".././interface/io_dump_base.html" xlink:title="io_dump_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="83,-1032 0,-1032 0,-1008 83,-1008 83,-1032"/>
-<text text-anchor="middle" x="41.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+<title>interface~io_get_args</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node38"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#a7506f" stroke="#a7506f" points="348.5,-24 279.5,-24 279.5,0 348.5,0 348.5,-24"/>
+<text text-anchor="middle" x="314" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_base&#45;&gt;proc~io_dump_base -->
-<g id="interface~~util_exit~~CalledByGraph_edge29" class="edge">
-<title>interface~io_dump_base&#45;&gt;proc~io_dump_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-1020C91.35,-1020 100.14,-1020 108.7,-1020"/>
-<polygon fill="#000000" stroke="#000000" points="108.98,-1023.5 118.98,-1020 108.98,-1016.5 108.98,-1023.5"/>
+<!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
+<g id="interface~~util_exit~~CalledByGraph_edge52" class="edge">
+<title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M348.68,-12C379.01,-12 423.77,-12 456.93,-12"/>
+<polygon fill="#000000" stroke="#000000" points="457.25,-15.5 467.25,-12 457.25,-8.5 457.25,-15.5"/>
 </g>
-<!-- interface~io_get_args -->
+<!-- interface~io_read_frame_body -->
 <g id="interface~~util_exit~~CalledByGraph_node39" class="node">
-<title>interface~io_get_args</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node39"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#a7506f" stroke="#a7506f" points="348.5,-948 279.5,-948 279.5,-924 348.5,-924 348.5,-948"/>
-<text text-anchor="middle" x="314" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<title>interface~io_read_frame_body</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node39"><a xlink:href=".././interface/io_read_frame_body.html" xlink:title="io_read_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="370,-150 258,-150 258,-126 370,-126 370,-150"/>
+<text text-anchor="middle" x="314" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
-<g id="interface~~util_exit~~CalledByGraph_edge30" class="edge">
-<title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M348.68,-936C379.01,-936 423.77,-936 456.93,-936"/>
-<polygon fill="#000000" stroke="#000000" points="457.25,-939.5 467.25,-936 457.25,-932.5 457.25,-939.5"/>
+<!-- interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body -->
+<g id="interface~~util_exit~~CalledByGraph_edge47" class="edge">
+<title>interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-138C390.67,-138 414.3,-138 435.76,-138"/>
+<polygon fill="#000000" stroke="#000000" points="435.77,-141.5 445.77,-138 435.77,-134.5 435.77,-141.5"/>
 </g>
-<!-- interface~io_get_old_t_final_system -->
+<!-- interface~util_append_tp -->
 <g id="interface~~util_exit~~CalledByGraph_node40" class="node">
-<title>interface~io_get_old_t_final_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node40"><a xlink:href=".././interface/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="382,-108 246,-108 246,-84 382,-84 382,-108"/>
-<text text-anchor="middle" x="314" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
+<title>interface~util_append_tp</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node40"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="355.5,-986 272.5,-986 272.5,-962 355.5,-962 355.5,-986"/>
+<text text-anchor="middle" x="314" y="-971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system -->
-<g id="interface~~util_exit~~CalledByGraph_edge50" class="edge">
-<title>interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.15,-96C395.58,-96 409.8,-96 423.55,-96"/>
-<polygon fill="#000000" stroke="#000000" points="423.95,-99.5 433.95,-96 423.95,-92.5 423.95,-99.5"/>
-</g>
-<!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
-<g id="interface~~util_exit~~CalledByGraph_edge46" class="edge">
-<title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-978C388.1,-978 416.75,-978 441.67,-978"/>
-<polygon fill="#000000" stroke="#000000" points="441.74,-981.5 451.74,-978 441.74,-974.5 441.74,-981.5"/>
+<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
+<g id="interface~~util_exit~~CalledByGraph_edge31" class="edge">
+<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.82,-974C383.56,-974 420.46,-974 450.12,-974"/>
+<polygon fill="#000000" stroke="#000000" points="450.28,-977.5 460.28,-974 450.28,-970.5 450.28,-977.5"/>
 </g>
-<!-- interface~setup_construct_system -->
-<g id="interface~~util_exit~~CalledByGraph_node42" class="node">
-<title>interface~setup_construct_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node42"><a xlink:href=".././interface/setup_construct_system.html" xlink:title="setup_construct_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="378,-234 250,-234 250,-210 378,-210 378,-234"/>
-<text text-anchor="middle" x="314" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<!-- interface~io_write_frame_encounter -->
+<g id="interface~~util_exit~~CalledByGraph_node41" class="node">
+<title>interface~io_write_frame_encounter</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node41"><a xlink:href=".././interface/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="382.5,-608 245.5,-608 245.5,-584 382.5,-584 382.5,-608"/>
+<text text-anchor="middle" x="314" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_construct_system&#45;&gt;proc~setup_construct_system -->
-<g id="interface~~util_exit~~CalledByGraph_edge47" class="edge">
-<title>interface~setup_construct_system&#45;&gt;proc~setup_construct_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.23,-222C394.19,-222 411.46,-222 427.86,-222"/>
-<polygon fill="#000000" stroke="#000000" points="427.94,-225.5 437.94,-222 427.94,-218.5 427.94,-225.5"/>
+<!-- interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter -->
+<g id="interface~~util_exit~~CalledByGraph_edge38" class="edge">
+<title>interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.68,-596C395.84,-596 409.73,-596 423.19,-596"/>
+<polygon fill="#000000" stroke="#000000" points="423.37,-599.5 433.37,-596 423.37,-592.5 423.37,-599.5"/>
 </g>
-<!-- interface~io_write_discard -->
+<!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
+<g id="interface~~util_exit~~CalledByGraph_edge48" class="edge">
+<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-348C390.67,-348 414.3,-348 435.76,-348"/>
+<polygon fill="#000000" stroke="#000000" points="435.77,-351.5 445.77,-348 435.77,-344.5 435.77,-351.5"/>
+</g>
+<!-- interface~util_valid_id_system -->
 <g id="interface~~util_exit~~CalledByGraph_node43" class="node">
-<title>interface~io_write_discard</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node43"><a xlink:href=".././interface/io_write_discard.html" xlink:title="io_write_discard">
-<polygon fill="#a7506f" stroke="#a7506f" points="359,-402 269,-402 269,-378 359,-378 359,-402"/>
-<text text-anchor="middle" x="314" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
+<title>interface~util_valid_id_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node43"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="368,-108 260,-108 260,-84 368,-84 368,-108"/>
+<text text-anchor="middle" x="314" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_discard&#45;&gt;proc~io_write_discard -->
-<g id="interface~~util_exit~~CalledByGraph_edge44" class="edge">
-<title>interface~io_write_discard&#45;&gt;proc~io_write_discard</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.08,-390C385.39,-390 419.01,-390 446.91,-390"/>
-<polygon fill="#000000" stroke="#000000" points="446.92,-393.5 456.92,-390 446.92,-386.5 446.92,-393.5"/>
+<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
+<g id="interface~~util_exit~~CalledByGraph_edge49" class="edge">
+<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.3,-96C389.9,-96 415.01,-96 437.54,-96"/>
+<polygon fill="#000000" stroke="#000000" points="437.69,-99.5 447.69,-96 437.69,-92.5 437.69,-99.5"/>
 </g>
-<!-- interface~io_dump_particle_info -->
+<!-- interface~io_read_particle_info_system -->
 <g id="interface~~util_exit~~CalledByGraph_node44" class="node">
-<title>interface~io_dump_particle_info</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node44"><a xlink:href=".././interface/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="373,-738 255,-738 255,-714 373,-714 373,-738"/>
-<text text-anchor="middle" x="314" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
+<title>interface~io_read_particle_info_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node44"><a xlink:href=".././interface/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="390,-860 238,-860 238,-836 390,-836 390,-860"/>
+<text text-anchor="middle" x="314" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info -->
-<g id="interface~~util_exit~~CalledByGraph_edge36" class="edge">
-<title>interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.09,-726C391.97,-726 413.09,-726 432.65,-726"/>
-<polygon fill="#000000" stroke="#000000" points="432.71,-729.5 442.71,-726 432.71,-722.5 432.71,-729.5"/>
+<!-- interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system -->
+<g id="interface~~util_exit~~CalledByGraph_edge33" class="edge">
+<title>interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.12,-848C398.6,-848 407.28,-848 415.87,-848"/>
+<polygon fill="#000000" stroke="#000000" points="415.9,-851.5 425.9,-848 415.9,-844.5 415.9,-851.5"/>
 </g>
-<!-- interface~io_read_in_cb -->
+<!-- interface~io_write_discard -->
 <g id="interface~~util_exit~~CalledByGraph_node45" class="node">
-<title>interface~io_read_in_cb</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node45"><a xlink:href=".././interface/io_read_in_cb.html" xlink:title="io_read_in_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="354,-528 274,-528 274,-504 354,-504 354,-528"/>
-<text text-anchor="middle" x="314" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
+<title>interface~io_write_discard</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node45"><a xlink:href=".././interface/io_write_discard.html" xlink:title="io_write_discard">
+<polygon fill="#a7506f" stroke="#a7506f" points="359,-776 269,-776 269,-752 359,-752 359,-776"/>
+<text text-anchor="middle" x="314" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb -->
-<g id="interface~~util_exit~~CalledByGraph_edge41" class="edge">
-<title>interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M354.45,-516C382.78,-516 421.17,-516 451.55,-516"/>
-<polygon fill="#000000" stroke="#000000" points="451.93,-519.5 461.93,-516 451.93,-512.5 451.93,-519.5"/>
+<!-- interface~io_write_discard&#45;&gt;proc~io_write_discard -->
+<g id="interface~~util_exit~~CalledByGraph_edge34" class="edge">
+<title>interface~io_write_discard&#45;&gt;proc~io_write_discard</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.08,-764C385.39,-764 419.01,-764 446.91,-764"/>
+<polygon fill="#000000" stroke="#000000" points="446.92,-767.5 456.92,-764 446.92,-760.5 446.92,-767.5"/>
 </g>
-<!-- interface~util_append_tp -->
+<!-- interface~io_dump_base -->
 <g id="interface~~util_exit~~CalledByGraph_node46" class="node">
-<title>interface~util_append_tp</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node46"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="355.5,-696 272.5,-696 272.5,-672 355.5,-672 355.5,-696"/>
-<text text-anchor="middle" x="314" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>interface~io_dump_base</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node46"><a xlink:href=".././interface/io_dump_base.html" xlink:title="io_dump_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="83,-360 0,-360 0,-336 83,-336 83,-360"/>
+<text text-anchor="middle" x="41.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
-<g id="interface~~util_exit~~CalledByGraph_edge37" class="edge">
-<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.82,-684C383.56,-684 420.46,-684 450.12,-684"/>
-<polygon fill="#000000" stroke="#000000" points="450.28,-687.5 460.28,-684 450.28,-680.5 450.28,-687.5"/>
+<!-- interface~io_dump_base&#45;&gt;proc~io_dump_base -->
+<g id="interface~~util_exit~~CalledByGraph_edge43" class="edge">
+<title>interface~io_dump_base&#45;&gt;proc~io_dump_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-348C91.35,-348 100.14,-348 108.7,-348"/>
+<polygon fill="#000000" stroke="#000000" points="108.98,-351.5 118.98,-348 108.98,-344.5 108.98,-351.5"/>
 </g>
-<!-- interface~util_solve_rkf45 -->
+<!-- interface~util_append_pl -->
 <g id="interface~~util_exit~~CalledByGraph_node47" class="node">
-<title>interface~util_solve_rkf45</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node47"><a xlink:href=".././interface/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
-<polygon fill="#a7506f" stroke="#a7506f" points="357.5,-612 270.5,-612 270.5,-588 357.5,-588 357.5,-612"/>
-<text text-anchor="middle" x="314" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
+<title>interface~util_append_pl</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node47"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="355,-1028 273,-1028 273,-1004 355,-1004 355,-1028"/>
+<text text-anchor="middle" x="314" y="-1013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45 -->
-<g id="interface~~util_exit~~CalledByGraph_edge39" class="edge">
-<title>interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.67,-600C384.51,-600 419.36,-600 447.97,-600"/>
-<polygon fill="#000000" stroke="#000000" points="448.2,-603.5 458.2,-600 448.2,-596.5 448.2,-603.5"/>
+<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
+<g id="interface~~util_exit~~CalledByGraph_edge30" class="edge">
+<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.36,-1016C383.27,-1016 420.61,-1016 450.49,-1016"/>
+<polygon fill="#000000" stroke="#000000" points="450.72,-1019.5 460.72,-1016 450.72,-1012.5 450.72,-1019.5"/>
 </g>
-<!-- interface~io_conservation_report -->
+<!-- interface~io_dump_particle_info -->
 <g id="interface~~util_exit~~CalledByGraph_node48" class="node">
-<title>interface~io_conservation_report</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node48"><a xlink:href=".././interface/io_conservation_report.html" xlink:title="io_conservation_report">
-<polygon fill="#a7506f" stroke="#a7506f" points="375,-276 253,-276 253,-252 375,-252 375,-276"/>
-<text text-anchor="middle" x="314" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
+<title>interface~io_dump_particle_info</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node48"><a xlink:href=".././interface/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="373,-692 255,-692 255,-668 373,-668 373,-692"/>
+<text text-anchor="middle" x="314" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~io_conservation_report&#45;&gt;proc~io_conservation_report -->
-<g id="interface~~util_exit~~CalledByGraph_edge45" class="edge">
-<title>interface~io_conservation_report&#45;&gt;proc~io_conservation_report</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.13,-264C392.86,-264 412.42,-264 430.73,-264"/>
-<polygon fill="#000000" stroke="#000000" points="430.76,-267.5 440.76,-264 430.76,-260.5 430.76,-267.5"/>
+<!-- interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info -->
+<g id="interface~~util_exit~~CalledByGraph_edge36" class="edge">
+<title>interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.09,-680C391.97,-680 413.09,-680 432.65,-680"/>
+<polygon fill="#000000" stroke="#000000" points="432.71,-683.5 442.71,-680 432.71,-676.5 432.71,-683.5"/>
 </g>
-<!-- interface~io_dump_particle_info_base -->
+<!-- interface~io_write_frame_system -->
 <g id="interface~~util_exit~~CalledByGraph_node49" class="node">
-<title>interface~io_dump_particle_info_base</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node49"><a xlink:href=".././interface/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="387.5,-864 240.5,-864 240.5,-840 387.5,-840 387.5,-864"/>
-<text text-anchor="middle" x="314" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
+<title>interface~io_write_frame_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node49"><a xlink:href=".././interface/io_write_frame_system.html" xlink:title="io_write_frame_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="375.5,-66 252.5,-66 252.5,-42 375.5,-42 375.5,-66"/>
+<text text-anchor="middle" x="314" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base -->
-<g id="interface~~util_exit~~CalledByGraph_edge32" class="edge">
-<title>interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.71,-852C397.72,-852 408.06,-852 418.24,-852"/>
-<polygon fill="#000000" stroke="#000000" points="418.34,-855.5 428.34,-852 418.34,-848.5 418.34,-855.5"/>
+<!-- interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system -->
+<g id="interface~~util_exit~~CalledByGraph_edge51" class="edge">
+<title>interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.65,-54C393.1,-54 412.28,-54 430.29,-54"/>
+<polygon fill="#000000" stroke="#000000" points="430.44,-57.5 440.44,-54 430.44,-50.5 430.44,-57.5"/>
 </g>
 <!-- interface~io_read_in_param -->
 <g id="interface~~util_exit~~CalledByGraph_node50" class="node">
 <title>interface~io_read_in_param</title>
 <g id="a_interface~~util_exit~~CalledByGraph_node50"><a xlink:href=".././interface/io_read_in_param.html" xlink:title="io_read_in_param">
-<polygon fill="#a7506f" stroke="#a7506f" points="364,-24 264,-24 264,0 364,0 364,-24"/>
-<text text-anchor="middle" x="314" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="364,-234 264,-234 264,-210 364,-210 364,-234"/>
+<text text-anchor="middle" x="314" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
 </a>
 </g>
 </g>
 <!-- interface~io_read_in_param&#45;&gt;proc~io_read_in_param -->
-<g id="interface~~util_exit~~CalledByGraph_edge52" class="edge">
+<g id="interface~~util_exit~~CalledByGraph_edge45" class="edge">
 <title>interface~io_read_in_param&#45;&gt;proc~io_read_in_param</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-12C388.1,-12 416.75,-12 441.67,-12"/>
-<polygon fill="#000000" stroke="#000000" points="441.74,-15.5 451.74,-12 441.74,-8.5 441.74,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-222C388.1,-222 416.75,-222 441.67,-222"/>
+<polygon fill="#000000" stroke="#000000" points="441.74,-225.5 451.74,-222 441.74,-218.5 441.74,-225.5"/>
 </g>
-<!-- interface~io_read_in_particle_info -->
-<g id="interface~~util_exit~~CalledByGraph_node51" class="node">
-<title>interface~io_read_in_particle_info</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node51"><a xlink:href=".././interface/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="377.5,-444 250.5,-444 250.5,-420 377.5,-420 377.5,-444"/>
-<text text-anchor="middle" x="314" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
-</a>
-</g>
-</g>
-<!-- interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info -->
-<g id="interface~~util_exit~~CalledByGraph_edge43" class="edge">
-<title>interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.71,-432C393.87,-432 411.4,-432 428.03,-432"/>
-<polygon fill="#000000" stroke="#000000" points="428.24,-435.5 438.24,-432 428.24,-428.5 428.24,-435.5"/>
+<!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
+<g id="interface~~util_exit~~CalledByGraph_edge50" class="edge">
+<title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-306C388.1,-306 416.75,-306 441.67,-306"/>
+<polygon fill="#000000" stroke="#000000" points="441.74,-309.5 451.74,-306 441.74,-302.5 441.74,-309.5"/>
 </g>
-<!-- interface~io_write_frame_system -->
+<!-- interface~io_get_old_t_final_system -->
 <g id="interface~~util_exit~~CalledByGraph_node52" class="node">
-<title>interface~io_write_frame_system</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node52"><a xlink:href=".././interface/io_write_frame_system.html" xlink:title="io_write_frame_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="375.5,-906 252.5,-906 252.5,-882 375.5,-882 375.5,-906"/>
-<text text-anchor="middle" x="314" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
+<title>interface~io_get_old_t_final_system</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node52"><a xlink:href=".././interface/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="382,-440 246,-440 246,-416 382,-416 382,-440"/>
+<text text-anchor="middle" x="314" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system -->
-<g id="interface~~util_exit~~CalledByGraph_edge31" class="edge">
-<title>interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.65,-894C393.1,-894 412.28,-894 430.29,-894"/>
-<polygon fill="#000000" stroke="#000000" points="430.44,-897.5 440.44,-894 430.44,-890.5 430.44,-897.5"/>
+<!-- interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system -->
+<g id="interface~~util_exit~~CalledByGraph_edge42" class="edge">
+<title>interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.15,-428C395.58,-428 409.8,-428 423.55,-428"/>
+<polygon fill="#000000" stroke="#000000" points="423.95,-431.5 433.95,-428 423.95,-424.5 423.95,-431.5"/>
 </g>
-<!-- interface~io_dump_param -->
+<!-- interface~io_read_in_particle_info -->
 <g id="interface~~util_exit~~CalledByGraph_node53" class="node">
-<title>interface~io_dump_param</title>
-<g id="a_interface~~util_exit~~CalledByGraph_node53"><a xlink:href=".././interface/io_dump_param.html" xlink:title="io_dump_param">
-<polygon fill="#a7506f" stroke="#a7506f" points="359.5,-66 268.5,-66 268.5,-42 359.5,-42 359.5,-66"/>
-<text text-anchor="middle" x="314" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
+<title>interface~io_read_in_particle_info</title>
+<g id="a_interface~~util_exit~~CalledByGraph_node53"><a xlink:href=".././interface/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="377.5,-482 250.5,-482 250.5,-458 377.5,-458 377.5,-482"/>
+<text text-anchor="middle" x="314" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_param&#45;&gt;proc~io_dump_param -->
-<g id="interface~~util_exit~~CalledByGraph_edge51" class="edge">
-<title>interface~io_dump_param&#45;&gt;proc~io_dump_param</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.55,-54C385.57,-54 418.6,-54 446.2,-54"/>
-<polygon fill="#000000" stroke="#000000" points="446.49,-57.5 456.49,-54 446.49,-50.5 446.49,-57.5"/>
+<!-- interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info -->
+<g id="interface~~util_exit~~CalledByGraph_edge41" class="edge">
+<title>interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.71,-470C393.87,-470 411.4,-470 428.03,-470"/>
+<polygon fill="#000000" stroke="#000000" points="428.24,-473.5 438.24,-470 428.24,-466.5 428.24,-473.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_fill.html b/docs/interface/util_fill.html
index 077957c6e..51c9c99f3 100644
--- a/docs/interface/util_fill.html
+++ b/docs/interface/util_fill.html
@@ -266,25 +266,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M224.11,-20.97C232.74,-22.64 241.64,-24.37 249.91,-25.98"/>
 <polygon fill="#000000" stroke="#000000" points="249.5,-29.47 259.98,-27.94 250.83,-22.6 249.5,-29.47"/>
 </g>
-<!-- interface~symba_util_fill_tp -->
-<g id="interface~~util_fill~~CalledByGraph_node4" class="node">
-<title>interface~symba_util_fill_tp</title>
-<g id="a_interface~~util_fill~~CalledByGraph_node4"><a xlink:href=".././interface/symba_util_fill_tp.html" xlink:title="symba_util_fill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
-<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp -->
-<g id="interface~~util_fill~~CalledByGraph_edge3" class="edge">
-<title>interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-54C102.46,-54 111.13,-54 119.63,-54"/>
-<polygon fill="#000000" stroke="#000000" points="119.86,-57.5 129.86,-54 119.86,-50.5 119.86,-57.5"/>
-</g>
 <!-- interface~symba_util_fill_pl -->
-<g id="interface~~util_fill~~CalledByGraph_node5" class="node">
+<g id="interface~~util_fill~~CalledByGraph_node4" class="node">
 <title>interface~symba_util_fill_pl</title>
-<g id="a_interface~~util_fill~~CalledByGraph_node5"><a xlink:href=".././interface/symba_util_fill_pl.html" xlink:title="symba_util_fill_pl">
+<g id="a_interface~~util_fill~~CalledByGraph_node4"><a xlink:href=".././interface/symba_util_fill_pl.html" xlink:title="symba_util_fill_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="94,-24 0,-24 0,0 94,0 94,-24"/>
 <text text-anchor="middle" x="47" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_pl</text>
 </a>
@@ -296,6 +281,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-12C102.46,-12 111.13,-12 119.63,-12"/>
 <polygon fill="#000000" stroke="#000000" points="119.86,-15.5 129.86,-12 119.86,-8.5 119.86,-15.5"/>
 </g>
+<!-- interface~symba_util_fill_tp -->
+<g id="interface~~util_fill~~CalledByGraph_node5" class="node">
+<title>interface~symba_util_fill_tp</title>
+<g id="a_interface~~util_fill~~CalledByGraph_node5"><a xlink:href=".././interface/symba_util_fill_tp.html" xlink:title="symba_util_fill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
+<text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp -->
+<g id="interface~~util_fill~~CalledByGraph_edge3" class="edge">
+<title>interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M94.21,-54C102.46,-54 111.13,-54 119.63,-54"/>
+<polygon fill="#000000" stroke="#000000" points="119.86,-57.5 129.86,-54 119.86,-50.5 119.86,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_fill_body.html b/docs/interface/util_fill_body.html
index 69fc04ca9..eff338060 100644
--- a/docs/interface/util_fill_body.html
+++ b/docs/interface/util_fill_body.html
@@ -348,65 +348,65 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="257,-45 186,-45 186,-21 257,-21 257,-45"/>
 <text text-anchor="middle" x="221.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_fill_body</text>
 </g>
-<!-- proc~util_fill_pl -->
+<!-- proc~util_fill_tp -->
 <g id="interface~~util_fill_body~~CalledByGraph_node2" class="node">
-<title>proc~util_fill_pl</title>
-<g id="a_interface~~util_fill_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_fill_pl.html" xlink:title="util_fill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="149.5,-66 93.5,-66 93.5,-42 149.5,-42 149.5,-66"/>
-<text text-anchor="middle" x="121.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<title>proc~util_fill_tp</title>
+<g id="a_interface~~util_fill_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_fill_tp.html" xlink:title="util_fill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="150,-66 93,-66 93,-42 150,-42 150,-66"/>
+<text text-anchor="middle" x="121.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_pl&#45;&gt;interface~util_fill_body -->
-<g id="interface~~util_fill_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_fill_pl&#45;&gt;interface~util_fill_body</title>
-<path fill="none" stroke="#000000" d="M149.54,-48.21C157.69,-46.46 166.86,-44.49 175.84,-42.57"/>
-<polygon fill="#000000" stroke="#000000" points="176.78,-45.95 185.82,-40.43 175.31,-39.1 176.78,-45.95"/>
+<!-- proc~util_fill_tp&#45;&gt;interface~util_fill_body -->
+<g id="interface~~util_fill_body~~CalledByGraph_edge1" class="edge">
+<title>proc~util_fill_tp&#45;&gt;interface~util_fill_body</title>
+<path fill="none" stroke="#000000" d="M150.06,-48.09C158.12,-46.37 167.15,-44.43 175.98,-42.54"/>
+<polygon fill="#000000" stroke="#000000" points="176.76,-45.95 185.8,-40.43 175.29,-39.11 176.76,-45.95"/>
 </g>
-<!-- proc~util_fill_tp -->
+<!-- proc~util_fill_pl -->
 <g id="interface~~util_fill_body~~CalledByGraph_node3" class="node">
-<title>proc~util_fill_tp</title>
-<g id="a_interface~~util_fill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_fill_tp.html" xlink:title="util_fill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="150,-24 93,-24 93,0 150,0 150,-24"/>
-<text text-anchor="middle" x="121.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<title>proc~util_fill_pl</title>
+<g id="a_interface~~util_fill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_fill_pl.html" xlink:title="util_fill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="149.5,-24 93.5,-24 93.5,0 149.5,0 149.5,-24"/>
+<text text-anchor="middle" x="121.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_tp&#45;&gt;interface~util_fill_body -->
-<g id="interface~~util_fill_body~~CalledByGraph_edge1" class="edge">
-<title>proc~util_fill_tp&#45;&gt;interface~util_fill_body</title>
-<path fill="none" stroke="#000000" d="M150.06,-17.91C158.12,-19.63 167.15,-21.57 175.98,-23.46"/>
-<polygon fill="#000000" stroke="#000000" points="175.29,-26.89 185.8,-25.57 176.76,-20.05 175.29,-26.89"/>
+<!-- proc~util_fill_pl&#45;&gt;interface~util_fill_body -->
+<g id="interface~~util_fill_body~~CalledByGraph_edge2" class="edge">
+<title>proc~util_fill_pl&#45;&gt;interface~util_fill_body</title>
+<path fill="none" stroke="#000000" d="M149.54,-17.79C157.69,-19.54 166.86,-21.51 175.84,-23.43"/>
+<polygon fill="#000000" stroke="#000000" points="175.31,-26.9 185.82,-25.57 176.78,-20.05 175.31,-26.9"/>
 </g>
 <!-- interface~util_fill_tp -->
 <g id="interface~~util_fill_body~~CalledByGraph_node4" class="node">
 <title>interface~util_fill_tp</title>
 <g id="a_interface~~util_fill_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_fill_tp.html" xlink:title="util_fill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="57,-24 0,-24 0,0 57,0 57,-24"/>
-<text text-anchor="middle" x="28.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="57,-66 0,-66 0,-42 57,-42 57,-66"/>
+<text text-anchor="middle" x="28.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~util_fill_tp&#45;&gt;proc~util_fill_tp -->
-<g id="interface~~util_fill_body~~CalledByGraph_edge4" class="edge">
+<g id="interface~~util_fill_body~~CalledByGraph_edge3" class="edge">
 <title>interface~util_fill_tp&#45;&gt;proc~util_fill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M57.3,-12C65.32,-12 74.22,-12 82.74,-12"/>
-<polygon fill="#000000" stroke="#000000" points="82.87,-15.5 92.87,-12 82.87,-8.5 82.87,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M57.3,-54C65.32,-54 74.22,-54 82.74,-54"/>
+<polygon fill="#000000" stroke="#000000" points="82.87,-57.5 92.87,-54 82.87,-50.5 82.87,-57.5"/>
 </g>
 <!-- interface~util_fill_pl -->
 <g id="interface~~util_fill_body~~CalledByGraph_node5" class="node">
 <title>interface~util_fill_pl</title>
 <g id="a_interface~~util_fill_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_fill_pl.html" xlink:title="util_fill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="56.5,-66 0.5,-66 0.5,-42 56.5,-42 56.5,-66"/>
-<text text-anchor="middle" x="28.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="56.5,-24 0.5,-24 0.5,0 56.5,0 56.5,-24"/>
+<text text-anchor="middle" x="28.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~util_fill_pl&#45;&gt;proc~util_fill_pl -->
-<g id="interface~~util_fill_body~~CalledByGraph_edge3" class="edge">
+<g id="interface~~util_fill_body~~CalledByGraph_edge4" class="edge">
 <title>interface~util_fill_pl&#45;&gt;proc~util_fill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M56.8,-54C65.08,-54 74.32,-54 83.14,-54"/>
-<polygon fill="#000000" stroke="#000000" points="83.22,-57.5 93.22,-54 83.22,-50.5 83.22,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M56.8,-12C65.08,-12 74.32,-12 83.14,-12"/>
+<polygon fill="#000000" stroke="#000000" points="83.22,-15.5 93.22,-12 83.22,-8.5 83.22,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_fill~2.html b/docs/interface/util_fill~2.html
index 8dd794868..520a50178 100644
--- a/docs/interface/util_fill~2.html
+++ b/docs/interface/util_fill~2.html
@@ -256,15 +256,15 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~util_fill_tp&#45;&gt;interface~util_fill~2 -->
-<g id="interface~~util_fill~2~~CalledByGraph_edge2" class="edge">
+<g id="interface~~util_fill~2~~CalledByGraph_edge1" class="edge">
 <title>proc~util_fill_tp&#45;&gt;interface~util_fill~2</title>
 <path fill="none" stroke="#000000" d="M150.31,-10.6C195.55,-8.9 287.68,-7.8 364,-22 372.67,-23.61 381.79,-26.18 390.28,-28.97"/>
 <polygon fill="#000000" stroke="#000000" points="389.3,-32.34 399.89,-32.31 391.59,-25.72 389.3,-32.34"/>
 </g>
 <!-- interface~util_fill_body -->
-<g id="interface~~util_fill~2~~CalledByGraph_node7" class="node">
+<g id="interface~~util_fill~2~~CalledByGraph_node6" class="node">
 <title>interface~util_fill_body</title>
-<g id="a_interface~~util_fill~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_fill_body.html" xlink:title="util_fill_body">
+<g id="a_interface~~util_fill~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_fill_body.html" xlink:title="util_fill_body">
 <polygon fill="#a7506f" stroke="#a7506f" points="257,-55 186,-55 186,-31 257,-31 257,-55"/>
 <text text-anchor="middle" x="221.5" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_body</text>
 </a>
@@ -286,7 +286,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~util_fill_body&#45;&gt;interface~util_fill~2 -->
-<g id="interface~~util_fill~2~~CalledByGraph_edge3" class="edge">
+<g id="interface~~util_fill~2~~CalledByGraph_edge2" class="edge">
 <title>proc~util_fill_body&#45;&gt;interface~util_fill~2</title>
 <path fill="none" stroke="#000000" d="M364.07,-43C372.36,-43 381.23,-43 389.6,-43"/>
 <polygon fill="#000000" stroke="#000000" points="389.85,-46.5 399.85,-43 389.85,-39.5 389.85,-46.5"/>
@@ -301,7 +301,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~util_fill_pl&#45;&gt;interface~util_fill~2 -->
-<g id="interface~~util_fill~2~~CalledByGraph_edge1" class="edge">
+<g id="interface~~util_fill~2~~CalledByGraph_edge3" class="edge">
 <title>proc~util_fill_pl&#45;&gt;interface~util_fill~2</title>
 <path fill="none" stroke="#000000" d="M149.58,-74.52C194.54,-76.47 287.25,-78.12 364,-64 372.68,-62.4 381.79,-59.85 390.28,-57.05"/>
 <polygon fill="#000000" stroke="#000000" points="391.6,-60.3 399.9,-53.71 389.3,-53.69 391.6,-60.3"/>
@@ -327,10 +327,16 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M57.3,-12C65.32,-12 74.22,-12 82.74,-12"/>
 <polygon fill="#000000" stroke="#000000" points="82.87,-15.5 92.87,-12 82.87,-8.5 82.87,-15.5"/>
 </g>
+<!-- interface~util_fill_body&#45;&gt;proc~util_fill_body -->
+<g id="interface~~util_fill~2~~CalledByGraph_edge5" class="edge">
+<title>interface~util_fill_body&#45;&gt;proc~util_fill_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.17,-43C265.33,-43 274.13,-43 282.66,-43"/>
+<polygon fill="#000000" stroke="#000000" points="282.86,-46.5 292.86,-43 282.86,-39.5 282.86,-46.5"/>
+</g>
 <!-- interface~util_fill_pl -->
-<g id="interface~~util_fill~2~~CalledByGraph_node6" class="node">
+<g id="interface~~util_fill~2~~CalledByGraph_node7" class="node">
 <title>interface~util_fill_pl</title>
-<g id="a_interface~~util_fill~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_fill_pl.html" xlink:title="util_fill_pl">
+<g id="a_interface~~util_fill~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_fill_pl.html" xlink:title="util_fill_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="56.5,-85 0.5,-85 0.5,-61 56.5,-61 56.5,-85"/>
 <text text-anchor="middle" x="28.5" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </a>
@@ -342,12 +348,6 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M56.8,-73C65.08,-73 74.32,-73 83.14,-73"/>
 <polygon fill="#000000" stroke="#000000" points="83.22,-76.5 93.22,-73 83.22,-69.5 83.22,-76.5"/>
 </g>
-<!-- interface~util_fill_body&#45;&gt;proc~util_fill_body -->
-<g id="interface~~util_fill~2~~CalledByGraph_edge5" class="edge">
-<title>interface~util_fill_body&#45;&gt;proc~util_fill_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.17,-43C265.33,-43 274.13,-43 282.66,-43"/>
-<polygon fill="#000000" stroke="#000000" points="282.86,-46.5 292.86,-43 282.86,-39.5 282.86,-46.5"/>
-</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_get_energy_momentum_system.html b/docs/interface/util_get_energy_momentum_system.html
index 35b2475e9..2763687aa 100644
--- a/docs/interface/util_get_energy_momentum_system.html
+++ b/docs/interface/util_get_energy_momentum_system.html
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~util_get_energy_momentum_system~~CallsGraph Pages: 1 -->
-<svg id="interfaceutil_get_energy_momentum_systemCallsGraph" width="416pt" height="32pt"
- viewBox="0.00 0.00 416.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfaceutil_get_energy_momentum_systemCallsGraph" width="585pt" height="32pt"
+ viewBox="0.00 0.00 585.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~util_get_energy_momentum_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>interface~~util_get_energy_momentum_system~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 412,-28 412,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 581,-28 581,4 -4,4"/>
 <!-- interface~util_get_energy_momentum_system -->
 <g id="interface~~util_get_energy_momentum_system~~CallsGraph_node1" class="node">
 <title>interface~util_get_energy_momentum_system</title>
@@ -246,6 +246,21 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M186.03,-12C194.57,-12 203.27,-12 211.9,-12"/>
 <polygon fill="#000000" stroke="#000000" points="211.99,-15.5 221.99,-12 211.99,-8.5 211.99,-15.5"/>
 </g>
+<!-- proc~util_get_energy_potential -->
+<g id="interface~~util_get_energy_momentum_system~~CallsGraph_node3" class="node">
+<title>proc~util_get_energy_potential</title>
+<g id="a_interface~~util_get_energy_momentum_system~~CallsGraph_node3"><a xlink:href=".././proc/util_get_energy_potential.html" xlink:title="util_get_energy_potential">
+<polygon fill="#d9534f" stroke="#d9534f" points="577,-24 444,-24 444,0 577,0 577,-24"/>
+<text text-anchor="middle" x="510.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_potential</text>
+</a>
+</g>
+</g>
+<!-- proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential -->
+<g id="interface~~util_get_energy_momentum_system~~CallsGraph_edge2" class="edge">
+<title>proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential</title>
+<path fill="none" stroke="#000000" d="M408.22,-12C416.8,-12 425.43,-12 433.83,-12"/>
+<polygon fill="#000000" stroke="#000000" points="433.96,-15.5 443.96,-12 433.96,-8.5 433.96,-15.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_index_eucl_ij_to_k.html b/docs/interface/util_index_eucl_ij_to_k.html
new file mode 100644
index 000000000..870c1b039
--- /dev/null
+++ b/docs/interface/util_index_eucl_ij_to_k.html
@@ -0,0 +1,581 @@
+
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+   
+   <meta name="description" content="Swiftest - The Fastest Symplectic Massive Body Integrator in the West (someday, hopefully)">
+    
+    <meta name="author" content="David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott" >
+    <link rel="icon" href="../favicon.png">
+
+    <title>util_index_eucl_ij_to_k &ndash; swiftest</title>
+
+    <link href="../css/bootstrap.min.css" rel="stylesheet">
+    <link href="../css/pygments.css" rel="stylesheet">
+    <link href="../css/font-awesome.min.css" rel="stylesheet">
+    <link href="../css/local.css" rel="stylesheet">
+    
+    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
+    
+    
+
+    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
+      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
+    <![endif]-->
+    
+    <script src="../js/jquery-2.1.3.min.js"></script>
+    <script src="../js/svg-pan-zoom.min.js"></script>
+
+  </head>
+
+  <body>
+
+    <!-- Fixed navbar -->
+    <nav class="navbar navbar-inverse navbar-fixed-top">
+      <div class="container">
+        <div class="navbar-header">
+          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
+            <span class="sr-only">Toggle navigation</span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+          </button>
+          <a class="navbar-brand" href="../index.html">swiftest </a>
+        </div>
+        <div id="navbar" class="navbar-collapse collapse">
+          <ul class="nav navbar-nav">
+        
+            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
+              <a href="#" class="dropdown-toggle"
+              data-toggle="dropdown" role="button"
+              aria-haspopup="true"
+     aria-expanded="false">Contents <span class="caret"></span></a>
+        <ul class="dropdown-menu">
+          
+              
+            <li><a href="../lists/files.html">Source Files</a></li>
+        
+        
+        
+            <li><a href="../lists/modules.html">Modules</a></li>
+        
+            
+                                
+            <li><a href="../lists/procedures.html">Procedures</a></li>
+        
+        
+            <li><a href="../lists/absint.html">Abstract Interfaces</a></li>
+               
+            <li><a href="../lists/types.html">Derived Types</a></li>
+        
+        
+            <li><a href="../program/swiftest_driver.html">Program</a></li>
+      
+            </ul>
+            </li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/absint.html">Abstract Interfaces</a></li>
+                             
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../program/swiftest_driver.html">Program</a></li>
+
+          </ul>
+        
+        <form action="../search.html" class="navbar-form navbar-right" role="search">
+        <div class="form-group">
+          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
+        </div>
+<!--
+        <button type="submit" class="btn btn-default">Submit</button>
+-->
+        </form>
+        
+        </div><!--/.nav-collapse -->
+      </div>
+    </nav>
+
+    <div class="container">
+    
+  
+  <div class="row">
+    <h1>util_index_eucl_ij_to_k
+   <small>Interface</small>
+    
+    </h1>
+    
+    
+<div class="row">
+  <div class="col-lg-12">
+<div class="well well-sm">
+  <ul class="list-inline" style="margin-bottom:0px;display:inline">
+     
+     
+     
+     
+    
+    
+     <li><i class="fa fa-list-ol"></i>
+       <a data-toggle="tooltip"
+    data-placement="bottom" data-html="true"
+    title=" 0.7% of total for procedures.">489 statements</a>
+     </li> 
+     
+     
+     
+    <li><i class="fa fa-code"></i><a href="../src/swiftest_classes.f90"> Source File</a></li>
+     
+     
+  </ul>
+  <ol class="breadcrumb in-well text-right">
+  
+    
+     <li><a href='../sourcefile/swiftest_classes.f90.html'>swiftest_classes.f90</a></li>
+    
+     <li><a href='../module/swiftest_classes.html'>swiftest_classes</a></li>
+    
+  
+     <li class="active">util_index_eucl_ij_to_k</li>
+  </ol>
+</div>
+</div>
+</div>
+<script>
+  $(function () {
+  $('[data-toggle="tooltip"]').tooltip()
+  })
+</script>
+
+    
+  </div>
+  
+  <div class="row">
+    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
+    
+<div id="sidebar">
+  
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+</div>
+
+    </div>
+    
+    <div class="col-md-9" id='text'>
+    
+    
+      <h2>interface</h2>
+      
+      <br>
+    
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Calls</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: interface~~util_index_eucl_ij_to_k~~CallsGraph Pages: 1 -->
+<svg id="interfaceutil_index_eucl_ij_to_kCallsGraph" width="284pt" height="32pt"
+ viewBox="0.00 0.00 284.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~util_index_eucl_ij_to_k~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>interface~~util_index_eucl_ij_to_k~~CallsGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 280,-28 280,4 -4,4"/>
+<!-- interface~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_ij_to_k~~CallsGraph_node1" class="node">
+<title>interface~util_index_eucl_ij_to_k</title>
+<polygon fill="none" stroke="black" points="120,-24 0,-24 0,0 120,0 120,-24"/>
+<text text-anchor="middle" x="60" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_index_eucl_ij_to_k</text>
+</g>
+<!-- proc~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_ij_to_k~~CallsGraph_node2" class="node">
+<title>proc~util_index_eucl_ij_to_k</title>
+<g id="a_interface~~util_index_eucl_ij_to_k~~CallsGraph_node2"><a xlink:href=".././proc/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#d9534f" stroke="#d9534f" points="276,-24 156,-24 156,0 276,0 276,-24"/>
+<text text-anchor="middle" x="216" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_ij_to_k~~CallsGraph_edge1" class="edge">
+<title>interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M120.1,-12C128.42,-12 137.04,-12 145.53,-12"/>
+<polygon fill="#000000" stroke="#000000" points="145.8,-15.5 155.8,-12 145.8,-8.5 145.8,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Called by</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: interface~~util_index_eucl_ij_to_k~~CalledByGraph Pages: 1 -->
+<svg id="interfaceutil_index_eucl_ij_to_kCalledByGraph" width="412pt" height="32pt"
+ viewBox="0.00 0.00 412.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~util_index_eucl_ij_to_k~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>interface~~util_index_eucl_ij_to_k~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 408,-28 408,4 -4,4"/>
+<!-- interface~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_ij_to_k~~CalledByGraph_node1" class="node">
+<title>interface~util_index_eucl_ij_to_k</title>
+<polygon fill="none" stroke="black" points="404,-24 284,-24 284,0 404,0 404,-24"/>
+<text text-anchor="middle" x="344" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_index_eucl_ij_to_k</text>
+</g>
+<!-- proc~util_index_eucl_plpl -->
+<g id="interface~~util_index_eucl_ij_to_k~~CalledByGraph_node2" class="node">
+<title>proc~util_index_eucl_plpl</title>
+<g id="a_interface~~util_index_eucl_ij_to_k~~CalledByGraph_node2"><a xlink:href=".././proc/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
+<polygon fill="#d9534f" stroke="#d9534f" points="248,-24 142,-24 142,0 248,0 248,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
+</a>
+</g>
+</g>
+<!-- proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_ij_to_k~~CalledByGraph_edge1" class="edge">
+<title>proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M248.24,-12C256.54,-12 265.24,-12 273.86,-12"/>
+<polygon fill="#000000" stroke="#000000" points="273.92,-15.5 283.92,-12 273.92,-8.5 273.92,-15.5"/>
+</g>
+<!-- interface~util_index_eucl_plpl -->
+<g id="interface~~util_index_eucl_ij_to_k~~CalledByGraph_node3" class="node">
+<title>interface~util_index_eucl_plpl</title>
+<g id="a_interface~~util_index_eucl_ij_to_k~~CalledByGraph_node3"><a xlink:href=".././interface/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
+<polygon fill="#a7506f" stroke="#a7506f" points="106,-24 0,-24 0,0 106,0 106,-24"/>
+<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl -->
+<g id="interface~~util_index_eucl_ij_to_k~~CalledByGraph_edge2" class="edge">
+<title>interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M106.13,-12C114.42,-12 123.07,-12 131.57,-12"/>
+<polygon fill="#000000" stroke="#000000" points="131.83,-15.5 141.83,-12 131.83,-8.5 131.83,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+    
+    <br>
+    
+      <h2>
+public pure module subroutine util_index_eucl_ij_to_k(n, i, j, k)
+    
+    
+   
+   <a href='../proc/util_index_eucl_ij_to_k.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h2>
+    
+
+    
+  
+
+
+    <h3>Arguments</h3>
+    
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-n~12"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-i"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-j"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-k"></span>integer(kind=I8B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+    
+    
+    
+    <br>
+
+ </div>
+</div>
+
+
+    <hr>    
+    </div> <!-- /container -->
+    <footer>
+      <div class="container">
+      <div class="row">
+        <div class="col-xs-6 col-md-4"><p>&copy; 2021 <a rel="license" href="http://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons License" style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a>
+                                          </p></div>
+        <div class="col-xs-6 col-md-4 col-md-push-4">
+          <p class="text-right">
+            Documentation generated by 
+            <a href="https://github.com/cmacmackin/ford">FORD</a>
+            
+          </p>
+        </div>
+        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> swiftest was developed by David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</p></div>
+      </div>
+      <br>
+      </div> <!-- /container -->    
+    </footer>
+
+    <!-- Bootstrap core JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+<!--
+    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
+-->
+    <script src="../js/bootstrap.min.js"></script>
+    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
+    <script src="../js/ie10-viewport-bug-workaround.js"></script>
+
+    <!-- MathJax JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+    <script type="text/x-mathjax-config">
+      MathJax.Hub.Config({
+        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
+        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
+        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js']
+      });
+    </script>
+    
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.1/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
+    
+    
+    <script src="../tipuesearch/tipuesearch_content.js"></script>
+    <script src="../tipuesearch/tipuesearch_set.js"></script>
+    <script src="../tipuesearch/tipuesearch.js"></script>
+    
+    
+  </body>
+</html>
\ No newline at end of file
diff --git a/docs/interface/util_index_eucl_k_to_ij.html b/docs/interface/util_index_eucl_k_to_ij.html
new file mode 100644
index 000000000..695cdea36
--- /dev/null
+++ b/docs/interface/util_index_eucl_k_to_ij.html
@@ -0,0 +1,465 @@
+
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+   
+   <meta name="description" content="Swiftest - The Fastest Symplectic Massive Body Integrator in the West (someday, hopefully)">
+    
+    <meta name="author" content="David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott" >
+    <link rel="icon" href="../favicon.png">
+
+    <title>util_index_eucl_k_to_ij &ndash; swiftest</title>
+
+    <link href="../css/bootstrap.min.css" rel="stylesheet">
+    <link href="../css/pygments.css" rel="stylesheet">
+    <link href="../css/font-awesome.min.css" rel="stylesheet">
+    <link href="../css/local.css" rel="stylesheet">
+    
+    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
+    
+    
+
+    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
+      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
+    <![endif]-->
+    
+    <script src="../js/jquery-2.1.3.min.js"></script>
+    <script src="../js/svg-pan-zoom.min.js"></script>
+
+  </head>
+
+  <body>
+
+    <!-- Fixed navbar -->
+    <nav class="navbar navbar-inverse navbar-fixed-top">
+      <div class="container">
+        <div class="navbar-header">
+          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
+            <span class="sr-only">Toggle navigation</span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+          </button>
+          <a class="navbar-brand" href="../index.html">swiftest </a>
+        </div>
+        <div id="navbar" class="navbar-collapse collapse">
+          <ul class="nav navbar-nav">
+        
+            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
+              <a href="#" class="dropdown-toggle"
+              data-toggle="dropdown" role="button"
+              aria-haspopup="true"
+     aria-expanded="false">Contents <span class="caret"></span></a>
+        <ul class="dropdown-menu">
+          
+              
+            <li><a href="../lists/files.html">Source Files</a></li>
+        
+        
+        
+            <li><a href="../lists/modules.html">Modules</a></li>
+        
+            
+                                
+            <li><a href="../lists/procedures.html">Procedures</a></li>
+        
+        
+            <li><a href="../lists/absint.html">Abstract Interfaces</a></li>
+               
+            <li><a href="../lists/types.html">Derived Types</a></li>
+        
+        
+            <li><a href="../program/swiftest_driver.html">Program</a></li>
+      
+            </ul>
+            </li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/absint.html">Abstract Interfaces</a></li>
+                             
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../program/swiftest_driver.html">Program</a></li>
+
+          </ul>
+        
+        <form action="../search.html" class="navbar-form navbar-right" role="search">
+        <div class="form-group">
+          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
+        </div>
+<!--
+        <button type="submit" class="btn btn-default">Submit</button>
+-->
+        </form>
+        
+        </div><!--/.nav-collapse -->
+      </div>
+    </nav>
+
+    <div class="container">
+    
+  
+  <div class="row">
+    <h1>util_index_eucl_k_to_ij
+   <small>Interface</small>
+    
+    </h1>
+    
+    
+<div class="row">
+  <div class="col-lg-12">
+<div class="well well-sm">
+  <ul class="list-inline" style="margin-bottom:0px;display:inline">
+     
+     
+     
+     
+    
+    
+     <li><i class="fa fa-list-ol"></i>
+       <a data-toggle="tooltip"
+    data-placement="bottom" data-html="true"
+    title=" 0.7% of total for procedures.">489 statements</a>
+     </li> 
+     
+     
+     
+    <li><i class="fa fa-code"></i><a href="../src/swiftest_classes.f90"> Source File</a></li>
+     
+     
+  </ul>
+  <ol class="breadcrumb in-well text-right">
+  
+    
+     <li><a href='../sourcefile/swiftest_classes.f90.html'>swiftest_classes.f90</a></li>
+    
+     <li><a href='../module/swiftest_classes.html'>swiftest_classes</a></li>
+    
+  
+     <li class="active">util_index_eucl_k_to_ij</li>
+  </ol>
+</div>
+</div>
+</div>
+<script>
+  $(function () {
+  $('[data-toggle="tooltip"]').tooltip()
+  })
+</script>
+
+    
+  </div>
+  
+  <div class="row">
+    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
+    
+<div id="sidebar">
+  
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+</div>
+
+    </div>
+    
+    <div class="col-md-9" id='text'>
+    
+    
+      <h2>interface</h2>
+      
+      <br>
+    
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Calls</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: interface~~util_index_eucl_k_to_ij~~CallsGraph Pages: 1 -->
+<svg id="interfaceutil_index_eucl_k_to_ijCallsGraph" width="284pt" height="32pt"
+ viewBox="0.00 0.00 284.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~util_index_eucl_k_to_ij~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>interface~~util_index_eucl_k_to_ij~~CallsGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 280,-28 280,4 -4,4"/>
+<!-- interface~util_index_eucl_k_to_ij -->
+<g id="interface~~util_index_eucl_k_to_ij~~CallsGraph_node1" class="node">
+<title>interface~util_index_eucl_k_to_ij</title>
+<polygon fill="none" stroke="black" points="120,-24 0,-24 0,0 120,0 120,-24"/>
+<text text-anchor="middle" x="60" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_index_eucl_k_to_ij</text>
+</g>
+<!-- proc~util_index_eucl_k_to_ij -->
+<g id="interface~~util_index_eucl_k_to_ij~~CallsGraph_node2" class="node">
+<title>proc~util_index_eucl_k_to_ij</title>
+<g id="a_interface~~util_index_eucl_k_to_ij~~CallsGraph_node2"><a xlink:href=".././proc/util_index_eucl_k_to_ij.html" xlink:title="util_index_eucl_k_to_ij">
+<polygon fill="#d9534f" stroke="#d9534f" points="276,-24 156,-24 156,0 276,0 276,-24"/>
+<text text-anchor="middle" x="216" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_k_to_ij</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_k_to_ij&#45;&gt;proc~util_index_eucl_k_to_ij -->
+<g id="interface~~util_index_eucl_k_to_ij~~CallsGraph_edge1" class="edge">
+<title>interface~util_index_eucl_k_to_ij&#45;&gt;proc~util_index_eucl_k_to_ij</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M120.1,-12C128.42,-12 137.04,-12 145.53,-12"/>
+<polygon fill="#000000" stroke="#000000" points="145.8,-15.5 155.8,-12 145.8,-8.5 145.8,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+     
+    
+    <br>
+    
+      <h2>
+public pure module subroutine util_index_eucl_k_to_ij(n, k, i, j)
+    
+    
+   
+   <a href='../proc/util_index_eucl_k_to_ij.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h2>
+    
+
+    
+  
+
+
+    <h3>Arguments</h3>
+    
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-n~13"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-k~2"></span>integer(kind=I8B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-i~2"></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-j~2"></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+    
+    
+    
+    <br>
+
+ </div>
+</div>
+
+
+    <hr>    
+    </div> <!-- /container -->
+    <footer>
+      <div class="container">
+      <div class="row">
+        <div class="col-xs-6 col-md-4"><p>&copy; 2021 <a rel="license" href="http://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons License" style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a>
+                                          </p></div>
+        <div class="col-xs-6 col-md-4 col-md-push-4">
+          <p class="text-right">
+            Documentation generated by 
+            <a href="https://github.com/cmacmackin/ford">FORD</a>
+            
+          </p>
+        </div>
+        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> swiftest was developed by David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</p></div>
+      </div>
+      <br>
+      </div> <!-- /container -->    
+    </footer>
+
+    <!-- Bootstrap core JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+<!--
+    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
+-->
+    <script src="../js/bootstrap.min.js"></script>
+    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
+    <script src="../js/ie10-viewport-bug-workaround.js"></script>
+
+    <!-- MathJax JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+    <script type="text/x-mathjax-config">
+      MathJax.Hub.Config({
+        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
+        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
+        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js']
+      });
+    </script>
+    
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.1/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
+    
+    
+    <script src="../tipuesearch/tipuesearch_content.js"></script>
+    <script src="../tipuesearch/tipuesearch_set.js"></script>
+    <script src="../tipuesearch/tipuesearch.js"></script>
+    
+    
+  </body>
+</html>
\ No newline at end of file
diff --git a/docs/interface/util_index_eucl_plpl.html b/docs/interface/util_index_eucl_plpl.html
index c37d2fc58..b8798d892 100644
--- a/docs/interface/util_index_eucl_plpl.html
+++ b/docs/interface/util_index_eucl_plpl.html
@@ -136,7 +136,7 @@ <h1>util_index_eucl_plpl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
@@ -220,11 +220,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~util_index_eucl_plpl~~CallsGraph Pages: 1 -->
-<svg id="interfaceutil_index_eucl_plplCallsGraph" width="256pt" height="32pt"
- viewBox="0.00 0.00 256.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="interfaceutil_index_eucl_plplCallsGraph" width="568pt" height="32pt"
+ viewBox="0.00 0.00 568.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="interface~~util_index_eucl_plpl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>interface~~util_index_eucl_plpl~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 252,-28 252,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 564,-28 564,4 -4,4"/>
 <!-- interface~util_index_eucl_plpl -->
 <g id="interface~~util_index_eucl_plpl~~CallsGraph_node1" class="node">
 <title>interface~util_index_eucl_plpl</title>
@@ -246,6 +246,36 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M106.13,-12C114.42,-12 123.07,-12 131.57,-12"/>
 <polygon fill="#000000" stroke="#000000" points="131.83,-15.5 141.83,-12 131.83,-8.5 131.83,-15.5"/>
 </g>
+<!-- interface~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_plpl~~CallsGraph_node3" class="node">
+<title>interface~util_index_eucl_ij_to_k</title>
+<g id="a_interface~~util_index_eucl_plpl~~CallsGraph_node3"><a xlink:href=".././interface/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#a7506f" stroke="#a7506f" points="404,-24 284,-24 284,0 404,0 404,-24"/>
+<text text-anchor="middle" x="344" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</a>
+</g>
+</g>
+<!-- proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_plpl~~CallsGraph_edge2" class="edge">
+<title>proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M248.24,-12C256.54,-12 265.24,-12 273.86,-12"/>
+<polygon fill="#000000" stroke="#000000" points="273.92,-15.5 283.92,-12 273.92,-8.5 273.92,-15.5"/>
+</g>
+<!-- proc~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_plpl~~CallsGraph_node4" class="node">
+<title>proc~util_index_eucl_ij_to_k</title>
+<g id="a_interface~~util_index_eucl_plpl~~CallsGraph_node4"><a xlink:href=".././proc/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#d9534f" stroke="#d9534f" points="560,-24 440,-24 440,0 560,0 560,-24"/>
+<text text-anchor="middle" x="500" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k -->
+<g id="interface~~util_index_eucl_plpl~~CallsGraph_edge3" class="edge">
+<title>interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.1,-12C412.42,-12 421.04,-12 429.53,-12"/>
+<polygon fill="#000000" stroke="#000000" points="429.8,-15.5 439.8,-12 429.8,-8.5 429.8,-15.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_index_eucl_pltp.html b/docs/interface/util_index_eucl_pltp.html
index 21f10efaa..e47b84c0e 100644
--- a/docs/interface/util_index_eucl_pltp.html
+++ b/docs/interface/util_index_eucl_pltp.html
@@ -136,7 +136,7 @@ <h1>util_index_eucl_pltp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.7% of total for procedures.">465 statements</a>
+    title=" 0.7% of total for procedures.">489 statements</a>
      </li> 
      
      
diff --git a/docs/interface/util_resize.html b/docs/interface/util_resize.html
index b483c0036..ab8188887 100644
--- a/docs/interface/util_resize.html
+++ b/docs/interface/util_resize.html
@@ -252,9 +252,9 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="#000000" stroke="#000000" points="689.88,-96.21 695.61,-87.3 685.57,-90.69 689.88,-96.21"/>
 </g>
 <!-- interface~symba_util_resize_pl -->
-<g id="interface~~util_resize~~CalledByGraph_node6" class="node">
+<g id="interface~~util_resize~~CalledByGraph_node7" class="node">
 <title>interface~symba_util_resize_pl</title>
-<g id="a_interface~~util_resize~~CalledByGraph_node6"><a xlink:href=".././interface/symba_util_resize_pl.html" xlink:title="symba_util_resize_pl">
+<g id="a_interface~~util_resize~~CalledByGraph_node7"><a xlink:href=".././interface/symba_util_resize_pl.html" xlink:title="symba_util_resize_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="462.5,-108 350.5,-108 350.5,-84 462.5,-84 462.5,-108"/>
 <text text-anchor="middle" x="406.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_pl</text>
 </a>
@@ -311,16 +311,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M627.83,-87.52C641.89,-85.36 656.73,-83.09 669.83,-81.08"/>
 <polygon fill="#000000" stroke="#000000" points="670.58,-84.51 679.93,-79.53 669.52,-77.59 670.58,-84.51"/>
 </g>
-<!-- interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl -->
-<g id="interface~~util_resize~~CalledByGraph_edge7" class="edge">
-<title>interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.68,-96C476.36,-96 491.14,-96 505.25,-96"/>
-<polygon fill="#000000" stroke="#000000" points="505.37,-99.5 515.37,-96 505.37,-92.5 505.37,-99.5"/>
-</g>
 <!-- interface~symba_util_resize_tp -->
-<g id="interface~~util_resize~~CalledByGraph_node7" class="node">
+<g id="interface~~util_resize~~CalledByGraph_node6" class="node">
 <title>interface~symba_util_resize_tp</title>
-<g id="a_interface~~util_resize~~CalledByGraph_node7"><a xlink:href=".././interface/symba_util_resize_tp.html" xlink:title="symba_util_resize_tp">
+<g id="a_interface~~util_resize~~CalledByGraph_node6"><a xlink:href=".././interface/symba_util_resize_tp.html" xlink:title="symba_util_resize_tp">
 <polygon fill="#a7506f" stroke="#a7506f" points="463,-24 350,-24 350,0 463,0 463,-24"/>
 <text text-anchor="middle" x="406.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_tp</text>
 </a>
@@ -332,6 +326,12 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M463.14,-12C476.44,-12 490.77,-12 504.49,-12"/>
 <polygon fill="#000000" stroke="#000000" points="504.83,-15.5 514.83,-12 504.83,-8.5 504.83,-15.5"/>
 </g>
+<!-- interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl -->
+<g id="interface~~util_resize~~CalledByGraph_edge7" class="edge">
+<title>interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.68,-96C476.36,-96 491.14,-96 505.25,-96"/>
+<polygon fill="#000000" stroke="#000000" points="505.37,-99.5 515.37,-96 505.37,-92.5 505.37,-99.5"/>
+</g>
 <!-- interface~symba_util_resize_merger -->
 <g id="interface~~util_resize~~CalledByGraph_node8" class="node">
 <title>interface~symba_util_resize_merger</title>
diff --git a/docs/interface/util_resize_body.html b/docs/interface/util_resize_body.html
index f432c089c..cc6f3bbb7 100644
--- a/docs/interface/util_resize_body.html
+++ b/docs/interface/util_resize_body.html
@@ -348,65 +348,65 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="314,-45 224,-45 224,-21 314,-21 314,-45"/>
 <text text-anchor="middle" x="269" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_body</text>
 </g>
-<!-- proc~util_resize_pl -->
+<!-- proc~util_resize_tp -->
 <g id="interface~~util_resize_body~~CalledByGraph_node2" class="node">
-<title>proc~util_resize_pl</title>
-<g id="a_interface~~util_resize_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="187.5,-66 112.5,-66 112.5,-42 187.5,-42 187.5,-66"/>
-<text text-anchor="middle" x="150" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<title>proc~util_resize_tp</title>
+<g id="a_interface~~util_resize_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-66 112,-66 112,-42 188,-42 188,-66"/>
+<text text-anchor="middle" x="150" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
 <g id="interface~~util_resize_body~~CalledByGraph_edge1" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M187.7,-47.41C195.98,-45.93 204.93,-44.32 213.76,-42.74"/>
-<polygon fill="#000000" stroke="#000000" points="214.4,-46.18 223.63,-40.96 213.17,-39.29 214.4,-46.18"/>
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M188.02,-47.36C196.2,-45.89 205.03,-44.3 213.74,-42.74"/>
+<polygon fill="#000000" stroke="#000000" points="214.63,-46.14 223.85,-40.92 213.39,-39.25 214.63,-46.14"/>
 </g>
-<!-- proc~util_resize_tp -->
+<!-- proc~util_resize_pl -->
 <g id="interface~~util_resize_body~~CalledByGraph_node3" class="node">
-<title>proc~util_resize_tp</title>
-<g id="a_interface~~util_resize_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-24 112,-24 112,0 188,0 188,-24"/>
-<text text-anchor="middle" x="150" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<title>proc~util_resize_pl</title>
+<g id="a_interface~~util_resize_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="187.5,-24 112.5,-24 112.5,0 187.5,0 187.5,-24"/>
+<text text-anchor="middle" x="150" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
 <g id="interface~~util_resize_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M188.02,-18.64C196.2,-20.11 205.03,-21.7 213.74,-23.26"/>
-<polygon fill="#000000" stroke="#000000" points="213.39,-26.75 223.85,-25.08 214.63,-19.86 213.39,-26.75"/>
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M187.7,-18.59C195.98,-20.07 204.93,-21.68 213.76,-23.26"/>
+<polygon fill="#000000" stroke="#000000" points="213.17,-26.71 223.63,-25.04 214.4,-19.82 213.17,-26.71"/>
 </g>
 <!-- interface~util_resize_pl -->
 <g id="interface~~util_resize_body~~CalledByGraph_node4" class="node">
 <title>interface~util_resize_pl</title>
 <g id="a_interface~~util_resize_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="75.5,-66 0.5,-66 0.5,-42 75.5,-42 75.5,-66"/>
-<text text-anchor="middle" x="38" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="75.5,-24 0.5,-24 0.5,0 75.5,0 75.5,-24"/>
+<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_pl&#45;&gt;proc~util_resize_pl -->
-<g id="interface~~util_resize_body~~CalledByGraph_edge3" class="edge">
+<g id="interface~~util_resize_body~~CalledByGraph_edge4" class="edge">
 <title>interface~util_resize_pl&#45;&gt;proc~util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.63,-54C84.07,-54 93.17,-54 101.99,-54"/>
-<polygon fill="#000000" stroke="#000000" points="102.16,-57.5 112.16,-54 102.16,-50.5 102.16,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.63,-12C84.07,-12 93.17,-12 101.99,-12"/>
+<polygon fill="#000000" stroke="#000000" points="102.16,-15.5 112.16,-12 102.16,-8.5 102.16,-15.5"/>
 </g>
 <!-- interface~util_resize_tp -->
 <g id="interface~~util_resize_body~~CalledByGraph_node5" class="node">
 <title>interface~util_resize_tp</title>
 <g id="a_interface~~util_resize_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="76,-24 0,-24 0,0 76,0 76,-24"/>
-<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="76,-66 0,-66 0,-42 76,-42 76,-66"/>
+<text text-anchor="middle" x="38" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_tp&#45;&gt;proc~util_resize_tp -->
-<g id="interface~~util_resize_body~~CalledByGraph_edge4" class="edge">
+<g id="interface~~util_resize_body~~CalledByGraph_edge3" class="edge">
 <title>interface~util_resize_tp&#45;&gt;proc~util_resize_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-12C84.39,-12 93.13,-12 101.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="101.8,-15.5 111.8,-12 101.8,-8.5 101.8,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-54C84.39,-54 93.13,-54 101.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="101.8,-57.5 111.8,-54 101.8,-50.5 101.8,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_resize_pl.html b/docs/interface/util_resize_pl.html
index f54533f02..8c735d4c7 100644
--- a/docs/interface/util_resize_pl.html
+++ b/docs/interface/util_resize_pl.html
@@ -228,74 +228,74 @@ <h3 class="panel-title">Calls</h3>
 <!-- interface~util_resize_pl -->
 <g id="interface~~util_resize_pl~~CallsGraph_node1" class="node">
 <title>interface~util_resize_pl</title>
-<polygon fill="none" stroke="black" points="75,-24 0,-24 0,0 75,0 75,-24"/>
-<text text-anchor="middle" x="37.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_pl</text>
+<polygon fill="none" stroke="black" points="75,-44 0,-44 0,-20 75,-20 75,-44"/>
+<text text-anchor="middle" x="37.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_pl</text>
 </g>
 <!-- proc~util_resize_pl -->
 <g id="interface~~util_resize_pl~~CallsGraph_node2" class="node">
 <title>proc~util_resize_pl</title>
 <g id="a_interface~~util_resize_pl~~CallsGraph_node2"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="186,-24 111,-24 111,0 186,0 186,-24"/>
-<text text-anchor="middle" x="148.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="186,-44 111,-44 111,-20 186,-20 186,-44"/>
+<text text-anchor="middle" x="148.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_pl&#45;&gt;proc~util_resize_pl -->
 <g id="interface~~util_resize_pl~~CallsGraph_edge1" class="edge">
 <title>interface~util_resize_pl&#45;&gt;proc~util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.1,-12C83.28,-12 92.06,-12 100.59,-12"/>
-<polygon fill="#000000" stroke="#000000" points="100.81,-15.5 110.81,-12 100.81,-8.5 100.81,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.1,-32C83.28,-32 92.06,-32 100.59,-32"/>
+<polygon fill="#000000" stroke="#000000" points="100.81,-35.5 110.81,-32 100.81,-28.5 100.81,-35.5"/>
 </g>
-<!-- interface~util_resize_body -->
+<!-- interface~util_resize~2 -->
 <g id="interface~~util_resize_pl~~CallsGraph_node3" class="node">
-<title>interface~util_resize_body</title>
-<g id="a_interface~~util_resize_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="312,-44 222,-44 222,-20 312,-20 312,-44"/>
-<text text-anchor="middle" x="267" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<title>interface~util_resize~2</title>
+<g id="a_interface~~util_resize_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="535,-44 474,-44 474,-20 535,-20 535,-44"/>
+<text text-anchor="middle" x="504.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
 <g id="interface~~util_resize_pl~~CallsGraph_edge2" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M186.04,-18.27C194.2,-19.67 203.01,-21.19 211.71,-22.68"/>
-<polygon fill="#000000" stroke="#000000" points="211.37,-26.17 221.82,-24.42 212.55,-19.27 211.37,-26.17"/>
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M186.01,-32.6C197.52,-32.77 210.29,-32.92 222,-33 318,-33.66 342,-33.73 438,-33 446.33,-32.94 455.25,-32.83 463.75,-32.7"/>
+<polygon fill="#000000" stroke="#000000" points="463.88,-36.2 473.83,-32.55 463.78,-29.2 463.88,-36.2"/>
 </g>
-<!-- interface~util_resize~2 -->
+<!-- interface~util_resize_body -->
 <g id="interface~~util_resize_pl~~CallsGraph_node4" class="node">
-<title>interface~util_resize~2</title>
-<g id="a_interface~~util_resize_pl~~CallsGraph_node4"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="535,-24 474,-24 474,0 535,0 535,-24"/>
-<text text-anchor="middle" x="504.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>interface~util_resize_body</title>
+<g id="a_interface~~util_resize_pl~~CallsGraph_node4"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="312,-24 222,-24 222,0 312,0 312,-24"/>
+<text text-anchor="middle" x="267" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
 <g id="interface~~util_resize_pl~~CallsGraph_edge3" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M186.01,-11.4C197.52,-11.23 210.29,-11.08 222,-11 318,-10.34 342,-10.27 438,-11 446.33,-11.06 455.25,-11.17 463.75,-11.3"/>
-<polygon fill="#000000" stroke="#000000" points="463.78,-14.8 473.83,-11.45 463.88,-7.8 463.78,-14.8"/>
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M186.04,-25.73C194.2,-24.33 203.01,-22.81 211.71,-21.32"/>
+<polygon fill="#000000" stroke="#000000" points="212.55,-24.73 221.82,-19.58 211.37,-17.83 212.55,-24.73"/>
 </g>
 <!-- proc~util_resize_body -->
 <g id="interface~~util_resize_pl~~CallsGraph_node5" class="node">
 <title>proc~util_resize_body</title>
 <g id="a_interface~~util_resize_pl~~CallsGraph_node5"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="438,-44 348,-44 348,-20 438,-20 438,-44"/>
-<text text-anchor="middle" x="393" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="438,-24 348,-24 348,0 438,0 438,-24"/>
+<text text-anchor="middle" x="393" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
 <g id="interface~~util_resize_pl~~CallsGraph_edge4" class="edge">
 <title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.07,-32C320.28,-32 328.96,-32 337.44,-32"/>
-<polygon fill="#000000" stroke="#000000" points="337.66,-35.5 347.66,-32 337.66,-28.5 337.66,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.07,-12C320.28,-12 328.96,-12 337.44,-12"/>
+<polygon fill="#000000" stroke="#000000" points="337.66,-15.5 347.66,-12 337.66,-8.5 337.66,-15.5"/>
 </g>
 <!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
 <g id="interface~~util_resize_pl~~CallsGraph_edge5" class="edge">
 <title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M438.22,-23.92C446.75,-22.37 455.62,-20.74 463.99,-19.22"/>
-<polygon fill="#000000" stroke="#000000" points="464.66,-22.65 473.87,-17.41 463.41,-15.77 464.66,-22.65"/>
+<path fill="none" stroke="#000000" d="M438.22,-20.08C446.75,-21.63 455.62,-23.26 463.99,-24.78"/>
+<polygon fill="#000000" stroke="#000000" points="463.41,-28.23 473.87,-26.59 464.66,-21.35 463.41,-28.23"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_resize_tp.html b/docs/interface/util_resize_tp.html
index f9cc72aa6..c8188ff0f 100644
--- a/docs/interface/util_resize_tp.html
+++ b/docs/interface/util_resize_tp.html
@@ -228,74 +228,74 @@ <h3 class="panel-title">Calls</h3>
 <!-- interface~util_resize_tp -->
 <g id="interface~~util_resize_tp~~CallsGraph_node1" class="node">
 <title>interface~util_resize_tp</title>
-<polygon fill="none" stroke="black" points="76,-24 0,-24 0,0 76,0 76,-24"/>
-<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_tp</text>
+<polygon fill="none" stroke="black" points="76,-44 0,-44 0,-20 76,-20 76,-44"/>
+<text text-anchor="middle" x="38" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_tp</text>
 </g>
 <!-- proc~util_resize_tp -->
 <g id="interface~~util_resize_tp~~CallsGraph_node2" class="node">
 <title>proc~util_resize_tp</title>
 <g id="a_interface~~util_resize_tp~~CallsGraph_node2"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-24 112,-24 112,0 188,0 188,-24"/>
-<text text-anchor="middle" x="150" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-44 112,-44 112,-20 188,-20 188,-44"/>
+<text text-anchor="middle" x="150" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_tp&#45;&gt;proc~util_resize_tp -->
 <g id="interface~~util_resize_tp~~CallsGraph_edge1" class="edge">
 <title>interface~util_resize_tp&#45;&gt;proc~util_resize_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-12C84.39,-12 93.13,-12 101.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="101.8,-15.5 111.8,-12 101.8,-8.5 101.8,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-32C84.39,-32 93.13,-32 101.62,-32"/>
+<polygon fill="#000000" stroke="#000000" points="101.8,-35.5 111.8,-32 101.8,-28.5 101.8,-35.5"/>
 </g>
-<!-- interface~util_resize_body -->
+<!-- interface~util_resize~2 -->
 <g id="interface~~util_resize_tp~~CallsGraph_node3" class="node">
-<title>interface~util_resize_body</title>
-<g id="a_interface~~util_resize_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="314,-44 224,-44 224,-20 314,-20 314,-44"/>
-<text text-anchor="middle" x="269" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<title>interface~util_resize~2</title>
+<g id="a_interface~~util_resize_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="537,-44 476,-44 476,-20 537,-20 537,-44"/>
+<text text-anchor="middle" x="506.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
 <g id="interface~~util_resize_tp~~CallsGraph_edge2" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M188.02,-18.33C196.2,-19.73 205.03,-21.24 213.74,-22.72"/>
-<polygon fill="#000000" stroke="#000000" points="213.4,-26.22 223.85,-24.45 214.58,-19.32 213.4,-26.22"/>
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M188.14,-32.61C199.63,-32.77 212.34,-32.92 224,-33 320,-33.66 344,-33.73 440,-33 448.33,-32.94 457.25,-32.83 465.75,-32.7"/>
+<polygon fill="#000000" stroke="#000000" points="465.88,-36.2 475.83,-32.55 465.78,-29.2 465.88,-36.2"/>
 </g>
-<!-- interface~util_resize~2 -->
+<!-- interface~util_resize_body -->
 <g id="interface~~util_resize_tp~~CallsGraph_node4" class="node">
-<title>interface~util_resize~2</title>
-<g id="a_interface~~util_resize_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="537,-24 476,-24 476,0 537,0 537,-24"/>
-<text text-anchor="middle" x="506.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>interface~util_resize_body</title>
+<g id="a_interface~~util_resize_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="314,-24 224,-24 224,0 314,0 314,-24"/>
+<text text-anchor="middle" x="269" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
 <g id="interface~~util_resize_tp~~CallsGraph_edge3" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M188.14,-11.39C199.63,-11.23 212.34,-11.08 224,-11 320,-10.34 344,-10.27 440,-11 448.33,-11.06 457.25,-11.17 465.75,-11.3"/>
-<polygon fill="#000000" stroke="#000000" points="465.78,-14.8 475.83,-11.45 465.88,-7.8 465.78,-14.8"/>
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M188.02,-25.67C196.2,-24.27 205.03,-22.76 213.74,-21.28"/>
+<polygon fill="#000000" stroke="#000000" points="214.58,-24.68 223.85,-19.55 213.4,-17.78 214.58,-24.68"/>
 </g>
 <!-- proc~util_resize_body -->
 <g id="interface~~util_resize_tp~~CallsGraph_node5" class="node">
 <title>proc~util_resize_body</title>
 <g id="a_interface~~util_resize_tp~~CallsGraph_node5"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="440,-44 350,-44 350,-20 440,-20 440,-44"/>
-<text text-anchor="middle" x="395" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="440,-24 350,-24 350,0 440,0 440,-24"/>
+<text text-anchor="middle" x="395" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
 <g id="interface~~util_resize_tp~~CallsGraph_edge4" class="edge">
 <title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.07,-32C322.28,-32 330.96,-32 339.44,-32"/>
-<polygon fill="#000000" stroke="#000000" points="339.66,-35.5 349.66,-32 339.66,-28.5 339.66,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.07,-12C322.28,-12 330.96,-12 339.44,-12"/>
+<polygon fill="#000000" stroke="#000000" points="339.66,-15.5 349.66,-12 339.66,-8.5 339.66,-15.5"/>
 </g>
 <!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
 <g id="interface~~util_resize_tp~~CallsGraph_edge5" class="edge">
 <title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M440.22,-23.92C448.75,-22.37 457.62,-20.74 465.99,-19.22"/>
-<polygon fill="#000000" stroke="#000000" points="466.66,-22.65 475.87,-17.41 465.41,-15.77 466.66,-22.65"/>
+<path fill="none" stroke="#000000" d="M440.22,-20.08C448.75,-21.63 457.62,-23.26 465.99,-24.78"/>
+<polygon fill="#000000" stroke="#000000" points="465.41,-28.23 475.87,-26.59 466.66,-21.35 465.41,-28.23"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_resize~2.html b/docs/interface/util_resize~2.html
index f6c8bb7d9..eb84dc465 100644
--- a/docs/interface/util_resize~2.html
+++ b/docs/interface/util_resize~2.html
@@ -235,208 +235,208 @@ <h3 class="panel-title">Called by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: interface~~util_resize~2~~CalledByGraph Pages: 1 -->
-<svg id="interfaceutil_resize2CalledByGraph" width="602pt" height="360pt"
- viewBox="0.00 0.00 602.00 360.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~util_resize~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 356)">
+<svg id="interfaceutil_resize2CalledByGraph" width="602pt" height="371pt"
+ viewBox="0.00 0.00 602.00 371.32" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~util_resize~2~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 367.32)">
 <title>interface~~util_resize~2~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-356 598,-356 598,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-367.32 598,-367.32 598,4 -4,4"/>
 <!-- interface~util_resize~2 -->
 <g id="interface~~util_resize~2~~CalledByGraph_node1" class="node">
 <title>interface~util_resize~2</title>
 <polygon fill="none" stroke="black" points="594,-192 533,-192 533,-168 594,-168 594,-192"/>
 <text text-anchor="middle" x="563.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize</text>
 </g>
-<!-- proc~util_append_arr_char_string -->
+<!-- proc~util_resize_tp -->
 <g id="interface~~util_resize~2~~CalledByGraph_node2" class="node">
-<title>proc~util_append_arr_char_string</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node2"><a xlink:href=".././proc/util_append_arr_char_string.html" xlink:title="util_append_arr_char_string">
-<polygon fill="#d9534f" stroke="#d9534f" points="497,-352 350,-352 350,-328 497,-328 497,-352"/>
-<text text-anchor="middle" x="423.5" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_char_string</text>
+<title>proc~util_resize_tp</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node2"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-283 112,-283 112,-259 188,-259 188,-283"/>
+<text text-anchor="middle" x="150" y="-268.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge1" class="edge">
-<title>proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M474.54,-327.86C482.66,-324.33 490.52,-319.8 497,-314 531.02,-283.54 549.25,-231.46 557.3,-202"/>
-<polygon fill="#000000" stroke="#000000" points="560.71,-202.81 559.82,-192.25 553.93,-201.06 560.71,-202.81"/>
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge6" class="edge">
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M188.09,-275.84C253.68,-282.74 393.02,-289.85 497,-243 517.8,-233.63 536.01,-214.74 547.91,-200.08"/>
+<polygon fill="#000000" stroke="#000000" points="550.78,-202.08 554.16,-192.04 545.26,-197.78 550.78,-202.08"/>
 </g>
-<!-- proc~util_resize_body -->
-<g id="interface~~util_resize~2~~CalledByGraph_node3" class="node">
-<title>proc~util_resize_body</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="468.5,-272 378.5,-272 378.5,-248 468.5,-248 468.5,-272"/>
-<text text-anchor="middle" x="423.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<!-- interface~util_resize_body -->
+<g id="interface~~util_resize~2~~CalledByGraph_node11" class="node">
+<title>interface~util_resize_body</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node11"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="314,-314 224,-314 224,-290 314,-290 314,-314"/>
+<text text-anchor="middle" x="269" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge8" class="edge">
-<title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M465.86,-247.94C476.34,-244.15 487.35,-239.48 497,-234 513.82,-224.44 530.61,-210.49 542.98,-199.16"/>
-<polygon fill="#000000" stroke="#000000" points="545.53,-201.57 550.42,-192.17 540.74,-196.46 545.53,-201.57"/>
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge13" class="edge">
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M188.02,-280.81C196.29,-283 205.22,-285.37 214.02,-287.7"/>
+<polygon fill="#000000" stroke="#000000" points="213.29,-291.12 223.85,-290.3 215.08,-284.36 213.29,-291.12"/>
 </g>
-<!-- proc~util_resize_pl -->
-<g id="interface~~util_resize~2~~CalledByGraph_node4" class="node">
-<title>proc~util_resize_pl</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node4"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="187.5,-302 112.5,-302 112.5,-278 187.5,-278 187.5,-302"/>
-<text text-anchor="middle" x="150" y="-287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<!-- proc~util_append_arr_info -->
+<g id="interface~~util_resize~2~~CalledByGraph_node3" class="node">
+<title>proc~util_append_arr_info</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_append_arr_info.html" xlink:title="util_append_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-234 368,-234 368,-210 479,-210 479,-234"/>
+<text text-anchor="middle" x="423.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge2" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M187.75,-299.52C254.3,-314.62 397.14,-336.96 497,-281 527.49,-263.91 546.1,-226.04 555.34,-201.84"/>
-<polygon fill="#000000" stroke="#000000" points="558.75,-202.7 558.83,-192.1 552.16,-200.33 558.75,-202.7"/>
+<!-- proc~util_append_arr_info&#45;&gt;interface~util_resize~2 -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge1" class="edge">
+<title>proc~util_append_arr_info&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M466.73,-209.99C476.67,-207.1 487.22,-203.98 497,-201 505.55,-198.39 514.7,-195.51 523.36,-192.75"/>
+<polygon fill="#000000" stroke="#000000" points="524.43,-196.08 532.88,-189.69 522.29,-189.42 524.43,-196.08"/>
 </g>
-<!-- interface~util_resize_body -->
-<g id="interface~~util_resize~2~~CalledByGraph_node12" class="node">
-<title>interface~util_resize_body</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node12"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="314,-272 224,-272 224,-248 314,-248 314,-272"/>
-<text text-anchor="middle" x="269" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<!-- proc~util_append_arr_dpvec -->
+<g id="interface~~util_resize~2~~CalledByGraph_node4" class="node">
+<title>proc~util_append_arr_dpvec</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node4"><a xlink:href=".././proc/util_append_arr_dpvec.html" xlink:title="util_append_arr_DPvec">
+<polygon fill="#d9534f" stroke="#d9534f" points="485.5,-192 361.5,-192 361.5,-168 485.5,-168 485.5,-192"/>
+<text text-anchor="middle" x="423.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DPvec</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge13" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M187.7,-280.59C195.98,-278.47 204.93,-276.17 213.76,-273.91"/>
-<polygon fill="#000000" stroke="#000000" points="214.81,-277.25 223.63,-271.38 213.07,-270.47 214.81,-277.25"/>
+<!-- proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2 -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge2" class="edge">
+<title>proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M485.83,-180C498.29,-180 511.08,-180 522.56,-180"/>
+<polygon fill="#000000" stroke="#000000" points="522.69,-183.5 532.69,-180 522.69,-176.5 522.69,-183.5"/>
 </g>
-<!-- proc~util_append_arr_i4b -->
+<!-- proc~util_append_arr_char_string -->
 <g id="interface~~util_resize~2~~CalledByGraph_node5" class="node">
-<title>proc~util_append_arr_i4b</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node5"><a xlink:href=".././proc/util_append_arr_i4b.html" xlink:title="util_append_arr_I4B">
-<polygon fill="#d9534f" stroke="#d9534f" points="478,-192 369,-192 369,-168 478,-168 478,-192"/>
-<text text-anchor="middle" x="423.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_I4B</text>
+<title>proc~util_append_arr_char_string</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node5"><a xlink:href=".././proc/util_append_arr_char_string.html" xlink:title="util_append_arr_char_string">
+<polygon fill="#d9534f" stroke="#d9534f" points="497,-150 350,-150 350,-126 497,-126 497,-150"/>
+<text text-anchor="middle" x="423.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_char_string</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge3" class="edge">
-<title>proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M478.25,-180C493.09,-180 508.91,-180 522.79,-180"/>
-<polygon fill="#000000" stroke="#000000" points="522.98,-183.5 532.98,-180 522.98,-176.5 522.98,-183.5"/>
+<!-- proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2 -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge4" class="edge">
+<title>proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M466.73,-150.01C476.67,-152.9 487.22,-156.02 497,-159 505.55,-161.61 514.7,-164.49 523.36,-167.25"/>
+<polygon fill="#000000" stroke="#000000" points="522.29,-170.58 532.88,-170.31 524.43,-163.92 522.29,-170.58"/>
 </g>
-<!-- proc~util_append_arr_dp -->
+<!-- proc~util_resize_body -->
 <g id="interface~~util_resize~2~~CalledByGraph_node6" class="node">
-<title>proc~util_append_arr_dp</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node6"><a xlink:href=".././proc/util_append_arr_dp.html" xlink:title="util_append_arr_DP">
-<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-150 369.5,-150 369.5,-126 477.5,-126 477.5,-150"/>
-<text text-anchor="middle" x="423.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DP</text>
+<title>proc~util_resize_body</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node6"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="468.5,-314 378.5,-314 378.5,-290 468.5,-290 468.5,-314"/>
+<text text-anchor="middle" x="423.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_dp&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge4" class="edge">
-<title>proc~util_append_arr_dp&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M466.73,-150.01C476.67,-152.9 487.22,-156.02 497,-159 505.55,-161.61 514.7,-164.49 523.36,-167.25"/>
-<polygon fill="#000000" stroke="#000000" points="522.29,-170.58 532.88,-170.31 524.43,-163.92 522.29,-170.58"/>
+<!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge5" class="edge">
+<title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M468.56,-291.17C478.54,-287.41 488.64,-282.46 497,-276 522.88,-255.99 542.26,-222.81 552.98,-201.17"/>
+<polygon fill="#000000" stroke="#000000" points="556.15,-202.67 557.3,-192.13 549.83,-199.65 556.15,-202.67"/>
 </g>
-<!-- proc~util_append_arr_dpvec -->
+<!-- proc~util_append_arr_i4b -->
 <g id="interface~~util_resize~2~~CalledByGraph_node7" class="node">
-<title>proc~util_append_arr_dpvec</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node7"><a xlink:href=".././proc/util_append_arr_dpvec.html" xlink:title="util_append_arr_DPvec">
-<polygon fill="#d9534f" stroke="#d9534f" points="485.5,-108 361.5,-108 361.5,-84 485.5,-84 485.5,-108"/>
-<text text-anchor="middle" x="423.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DPvec</text>
+<title>proc~util_append_arr_i4b</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node7"><a xlink:href=".././proc/util_append_arr_i4b.html" xlink:title="util_append_arr_I4B">
+<polygon fill="#d9534f" stroke="#d9534f" points="478,-108 369,-108 369,-84 478,-84 478,-108"/>
+<text text-anchor="middle" x="423.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_I4B</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge5" class="edge">
-<title>proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2</title>
+<!-- proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2 -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge3" class="edge">
+<title>proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2</title>
 <path fill="none" stroke="#000000" d="M477.62,-108.12C484.36,-110.59 490.99,-113.53 497,-117 516.41,-128.22 534.46,-146.39 546.67,-160.35"/>
 <polygon fill="#000000" stroke="#000000" points="544.02,-162.63 553.15,-167.99 549.35,-158.1 544.02,-162.63"/>
 </g>
-<!-- proc~util_append_arr_logical -->
+<!-- proc~util_resize_pl -->
 <g id="interface~~util_resize~2~~CalledByGraph_node8" class="node">
+<title>proc~util_resize_pl</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node8"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="187.5,-344 112.5,-344 112.5,-320 187.5,-320 187.5,-344"/>
+<text text-anchor="middle" x="150" y="-329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+</a>
+</g>
+</g>
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge7" class="edge">
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M187.54,-342.65C255,-359.99 400.98,-386.41 497,-323 538.35,-295.69 553.99,-235.23 559.59,-202.35"/>
+<polygon fill="#000000" stroke="#000000" points="563.07,-202.76 561.13,-192.35 556.15,-201.7 563.07,-202.76"/>
+</g>
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge14" class="edge">
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M187.7,-322.59C195.98,-320.47 204.93,-318.17 213.76,-315.91"/>
+<polygon fill="#000000" stroke="#000000" points="214.81,-319.25 223.63,-313.38 213.07,-312.47 214.81,-319.25"/>
+</g>
+<!-- proc~util_append_arr_logical -->
+<g id="interface~~util_resize~2~~CalledByGraph_node9" class="node">
 <title>proc~util_append_arr_logical</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node8"><a xlink:href=".././proc/util_append_arr_logical.html" xlink:title="util_append_arr_logical">
+<g id="a_interface~~util_resize~2~~CalledByGraph_node9"><a xlink:href=".././proc/util_append_arr_logical.html" xlink:title="util_append_arr_logical">
 <polygon fill="#d9534f" stroke="#d9534f" points="485.5,-66 361.5,-66 361.5,-42 485.5,-42 485.5,-66"/>
 <text text-anchor="middle" x="423.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_logical</text>
 </a>
 </g>
 </g>
 <!-- proc~util_append_arr_logical&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge7" class="edge">
+<g id="interface~~util_resize~2~~CalledByGraph_edge8" class="edge">
 <title>proc~util_append_arr_logical&#45;&gt;interface~util_resize~2</title>
 <path fill="none" stroke="#000000" d="M481.48,-66.03C487.01,-68.49 492.3,-71.44 497,-75 525.51,-96.56 544.63,-134.45 554.52,-158.33"/>
 <polygon fill="#000000" stroke="#000000" points="551.38,-159.9 558.31,-167.92 557.89,-157.33 551.38,-159.9"/>
 </g>
-<!-- proc~util_resize_tp -->
-<g id="interface~~util_resize~2~~CalledByGraph_node9" class="node">
-<title>proc~util_resize_tp</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node9"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-241 112,-241 112,-217 188,-217 188,-241"/>
-<text text-anchor="middle" x="150" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
-</a>
-</g>
-</g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge6" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M188.25,-228.77C252.07,-227.77 386.15,-222.95 497,-201 505.59,-199.3 514.63,-196.85 523.16,-194.22"/>
-<polygon fill="#000000" stroke="#000000" points="524.44,-197.49 532.88,-191.09 522.29,-190.82 524.44,-197.49"/>
-</g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge14" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M188.02,-238.81C196.29,-241 205.22,-243.37 214.02,-245.7"/>
-<polygon fill="#000000" stroke="#000000" points="213.29,-249.12 223.85,-248.3 215.08,-242.36 213.29,-249.12"/>
-</g>
-<!-- proc~util_append_arr_info -->
+<!-- proc~util_append_arr_dp -->
 <g id="interface~~util_resize~2~~CalledByGraph_node10" class="node">
-<title>proc~util_append_arr_info</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node10"><a xlink:href=".././proc/util_append_arr_info.html" xlink:title="util_append_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-24 368,-24 368,0 479,0 479,-24"/>
-<text text-anchor="middle" x="423.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_info</text>
+<title>proc~util_append_arr_dp</title>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node10"><a xlink:href=".././proc/util_append_arr_dp.html" xlink:title="util_append_arr_DP">
+<polygon fill="#d9534f" stroke="#d9534f" points="477.5,-24 369.5,-24 369.5,0 477.5,0 477.5,-24"/>
+<text text-anchor="middle" x="423.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DP</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_info&#45;&gt;interface~util_resize~2 -->
+<!-- proc~util_append_arr_dp&#45;&gt;interface~util_resize~2 -->
 <g id="interface~~util_resize~2~~CalledByGraph_edge9" class="edge">
-<title>proc~util_append_arr_info&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M479.09,-22.07C485.59,-24.86 491.76,-28.44 497,-33 534.87,-66 551.86,-125.16 558.61,-157.45"/>
+<title>proc~util_append_arr_dp&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M477.61,-21.44C484.65,-24.33 491.37,-28.09 497,-33 534.87,-66 551.86,-125.16 558.61,-157.45"/>
 <polygon fill="#000000" stroke="#000000" points="555.25,-158.52 560.59,-167.67 562.12,-157.19 555.25,-158.52"/>
 </g>
+<!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
+<g id="interface~~util_resize~2~~CalledByGraph_edge11" class="edge">
+<title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.11,-302C331.02,-302 350.52,-302 368.27,-302"/>
+<polygon fill="#000000" stroke="#000000" points="368.49,-305.5 378.49,-302 368.49,-298.5 368.49,-305.5"/>
+</g>
 <!-- interface~util_resize_pl -->
-<g id="interface~~util_resize~2~~CalledByGraph_node11" class="node">
+<g id="interface~~util_resize~2~~CalledByGraph_node12" class="node">
 <title>interface~util_resize_pl</title>
-<g id="a_interface~~util_resize~2~~CalledByGraph_node11"><a xlink:href=".././interface/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="75.5,-302 0.5,-302 0.5,-278 75.5,-278 75.5,-302"/>
-<text text-anchor="middle" x="38" y="-287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<g id="a_interface~~util_resize~2~~CalledByGraph_node12"><a xlink:href=".././interface/util_resize_pl.html" xlink:title="util_resize_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="75.5,-344 0.5,-344 0.5,-320 75.5,-320 75.5,-344"/>
+<text text-anchor="middle" x="38" y="-329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_pl&#45;&gt;proc~util_resize_pl -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge11" class="edge">
+<g id="interface~~util_resize~2~~CalledByGraph_edge12" class="edge">
 <title>interface~util_resize_pl&#45;&gt;proc~util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.63,-290C84.07,-290 93.17,-290 101.99,-290"/>
-<polygon fill="#000000" stroke="#000000" points="102.16,-293.5 112.16,-290 102.16,-286.5 102.16,-293.5"/>
-</g>
-<!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge10" class="edge">
-<title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.11,-260C331.02,-260 350.52,-260 368.27,-260"/>
-<polygon fill="#000000" stroke="#000000" points="368.49,-263.5 378.49,-260 368.49,-256.5 368.49,-263.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.63,-332C84.07,-332 93.17,-332 101.99,-332"/>
+<polygon fill="#000000" stroke="#000000" points="102.16,-335.5 112.16,-332 102.16,-328.5 102.16,-335.5"/>
 </g>
 <!-- interface~util_resize_tp -->
 <g id="interface~~util_resize~2~~CalledByGraph_node13" class="node">
 <title>interface~util_resize_tp</title>
 <g id="a_interface~~util_resize~2~~CalledByGraph_node13"><a xlink:href=".././interface/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="76,-241 0,-241 0,-217 76,-217 76,-241"/>
-<text text-anchor="middle" x="38" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="76,-283 0,-283 0,-259 76,-259 76,-283"/>
+<text text-anchor="middle" x="38" y="-268.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_tp&#45;&gt;proc~util_resize_tp -->
-<g id="interface~~util_resize~2~~CalledByGraph_edge12" class="edge">
+<g id="interface~~util_resize~2~~CalledByGraph_edge10" class="edge">
 <title>interface~util_resize_tp&#45;&gt;proc~util_resize_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-229C84.39,-229 93.13,-229 101.62,-229"/>
-<polygon fill="#000000" stroke="#000000" points="101.8,-232.5 111.8,-229 101.8,-225.5 101.8,-232.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-271C84.39,-271 93.13,-271 101.62,-271"/>
+<polygon fill="#000000" stroke="#000000" points="101.8,-274.5 111.8,-271 101.8,-267.5 101.8,-274.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_sort.html b/docs/interface/util_sort.html
index 3acf65640..3b0f8f93d 100644
--- a/docs/interface/util_sort.html
+++ b/docs/interface/util_sort.html
@@ -246,35 +246,35 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="452,-66 398,-66 398,-42 452,-42 452,-66"/>
 <text text-anchor="middle" x="425" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort</text>
 </g>
-<!-- proc~util_valid_id_system -->
+<!-- proc~netcdf_write_frame_base -->
 <g id="interface~~util_sort~~CalledByGraph_node2" class="node">
-<title>proc~util_valid_id_system</title>
-<g id="a_interface~~util_sort~~CalledByGraph_node2"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="334.5,-108 226.5,-108 226.5,-84 334.5,-84 334.5,-108"/>
-<text text-anchor="middle" x="280.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+<title>proc~netcdf_write_frame_base</title>
+<g id="a_interface~~util_sort~~CalledByGraph_node2"><a xlink:href=".././proc/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="347,-108 214,-108 214,-84 347,-84 347,-108"/>
+<text text-anchor="middle" x="280.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
+<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
 <g id="interface~~util_sort~~CalledByGraph_edge1" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
+<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
 <path fill="none" stroke="#000000" d="M330.18,-83.9C340.71,-81.11 351.76,-78.07 362,-75 370.53,-72.45 379.64,-69.49 388.19,-66.61"/>
 <polygon fill="#000000" stroke="#000000" points="389.55,-69.85 397.89,-63.31 387.29,-63.22 389.55,-69.85"/>
 </g>
-<!-- proc~netcdf_write_frame_base -->
+<!-- proc~util_valid_id_system -->
 <g id="interface~~util_sort~~CalledByGraph_node3" class="node">
-<title>proc~netcdf_write_frame_base</title>
-<g id="a_interface~~util_sort~~CalledByGraph_node3"><a xlink:href=".././proc/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="347,-66 214,-66 214,-42 347,-42 347,-66"/>
-<text text-anchor="middle" x="280.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
+<title>proc~util_valid_id_system</title>
+<g id="a_interface~~util_sort~~CalledByGraph_node3"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="334.5,-66 226.5,-66 226.5,-42 334.5,-42 334.5,-66"/>
+<text text-anchor="middle" x="280.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
 </a>
 </g>
 </g>
-<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
 <g id="interface~~util_sort~~CalledByGraph_edge2" class="edge">
-<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M347.33,-54C361.2,-54 375.35,-54 387.66,-54"/>
-<polygon fill="#000000" stroke="#000000" points="387.94,-57.5 397.94,-54 387.94,-50.5 387.94,-57.5"/>
+<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M334.56,-54C352.22,-54 371.47,-54 387.58,-54"/>
+<polygon fill="#000000" stroke="#000000" points="387.66,-57.5 397.66,-54 387.66,-50.5 387.66,-57.5"/>
 </g>
 <!-- proc~netcdf_write_particle_info_base -->
 <g id="interface~~util_sort~~CalledByGraph_node4" class="node">
@@ -295,36 +295,21 @@ <h3 class="panel-title">Called by</h3>
 <g id="interface~~util_sort~~CalledByGraph_node5" class="node">
 <title>interface~netcdf_write_frame_base</title>
 <g id="a_interface~~util_sort~~CalledByGraph_node5"><a xlink:href=".././interface/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="148,-66 15,-66 15,-42 148,-42 148,-66"/>
-<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="148,-108 15,-108 15,-84 148,-84 148,-108"/>
+<text text-anchor="middle" x="81.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
 </a>
 </g>
 </g>
 <!-- interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base -->
-<g id="interface~~util_sort~~CalledByGraph_edge5" class="edge">
-<title>interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.1,-54C165.95,-54 185.42,-54 203.78,-54"/>
-<polygon fill="#000000" stroke="#000000" points="203.85,-57.5 213.85,-54 203.85,-50.5 203.85,-57.5"/>
-</g>
-<!-- interface~util_valid_id_system -->
-<g id="interface~~util_sort~~CalledByGraph_node6" class="node">
-<title>interface~util_valid_id_system</title>
-<g id="a_interface~~util_sort~~CalledByGraph_node6"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="135.5,-108 27.5,-108 27.5,-84 135.5,-84 135.5,-108"/>
-<text text-anchor="middle" x="81.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
-</a>
-</g>
-</g>
-<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
 <g id="interface~~util_sort~~CalledByGraph_edge4" class="edge">
-<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.55,-96C160.4,-96 190.19,-96 216.21,-96"/>
-<polygon fill="#000000" stroke="#000000" points="216.35,-99.5 226.35,-96 216.35,-92.5 216.35,-99.5"/>
+<title>interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.1,-96C165.95,-96 185.42,-96 203.78,-96"/>
+<polygon fill="#000000" stroke="#000000" points="203.85,-99.5 213.85,-96 203.85,-92.5 203.85,-99.5"/>
 </g>
 <!-- interface~netcdf_write_particle_info_base -->
-<g id="interface~~util_sort~~CalledByGraph_node7" class="node">
+<g id="interface~~util_sort~~CalledByGraph_node6" class="node">
 <title>interface~netcdf_write_particle_info_base</title>
-<g id="a_interface~~util_sort~~CalledByGraph_node7"><a xlink:href=".././interface/netcdf_write_particle_info_base.html" xlink:title="netcdf_write_particle_info_base">
+<g id="a_interface~~util_sort~~CalledByGraph_node6"><a xlink:href=".././interface/netcdf_write_particle_info_base.html" xlink:title="netcdf_write_particle_info_base">
 <polygon fill="#a7506f" stroke="#a7506f" points="163,-24 0,-24 0,0 163,0 163,-24"/>
 <text text-anchor="middle" x="81.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_particle_info_base</text>
 </a>
@@ -336,6 +321,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.2,-12C171.67,-12 180.33,-12 188.91,-12"/>
 <polygon fill="#000000" stroke="#000000" points="188.93,-15.5 198.93,-12 188.93,-8.5 188.93,-15.5"/>
 </g>
+<!-- interface~util_valid_id_system -->
+<g id="interface~~util_sort~~CalledByGraph_node7" class="node">
+<title>interface~util_valid_id_system</title>
+<g id="a_interface~~util_sort~~CalledByGraph_node7"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="135.5,-66 27.5,-66 27.5,-42 135.5,-42 135.5,-66"/>
+<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+</a>
+</g>
+</g>
+<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
+<g id="interface~~util_sort~~CalledByGraph_edge5" class="edge">
+<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.55,-54C160.4,-54 190.19,-54 216.21,-54"/>
+<polygon fill="#000000" stroke="#000000" points="216.35,-57.5 226.35,-54 216.35,-50.5 216.35,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_sort_body.html b/docs/interface/util_sort_body.html
index 6bba97cb8..ac6660989 100644
--- a/docs/interface/util_sort_body.html
+++ b/docs/interface/util_sort_body.html
@@ -333,65 +333,65 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="281,-45 202,-45 202,-21 281,-21 281,-45"/>
 <text text-anchor="middle" x="241.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_body</text>
 </g>
-<!-- proc~util_sort_tp -->
+<!-- proc~util_sort_pl -->
 <g id="interface~~util_sort_body~~CalledByGraph_node2" class="node">
-<title>proc~util_sort_tp</title>
-<g id="a_interface~~util_sort_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_sort_tp.html" xlink:title="util_sort_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="166,-66 101,-66 101,-42 166,-42 166,-66"/>
-<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+<title>proc~util_sort_pl</title>
+<g id="a_interface~~util_sort_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_sort_pl.html" xlink:title="util_sort_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-66 101.5,-66 101.5,-42 165.5,-42 165.5,-66"/>
+<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_tp&#45;&gt;interface~util_sort_body -->
+<!-- proc~util_sort_pl&#45;&gt;interface~util_sort_body -->
 <g id="interface~~util_sort_body~~CalledByGraph_edge1" class="edge">
-<title>proc~util_sort_tp&#45;&gt;interface~util_sort_body</title>
-<path fill="none" stroke="#000000" d="M166.02,-47.76C174.18,-46.14 183.15,-44.36 191.96,-42.62"/>
-<polygon fill="#000000" stroke="#000000" points="192.66,-46.05 201.79,-40.67 191.3,-39.18 192.66,-46.05"/>
+<title>proc~util_sort_pl&#45;&gt;interface~util_sort_body</title>
+<path fill="none" stroke="#000000" d="M165.73,-47.81C173.98,-46.18 183.09,-44.37 192.02,-42.6"/>
+<polygon fill="#000000" stroke="#000000" points="192.85,-46.01 201.98,-40.63 191.49,-39.14 192.85,-46.01"/>
 </g>
-<!-- proc~util_sort_pl -->
+<!-- proc~util_sort_tp -->
 <g id="interface~~util_sort_body~~CalledByGraph_node3" class="node">
-<title>proc~util_sort_pl</title>
-<g id="a_interface~~util_sort_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_sort_pl.html" xlink:title="util_sort_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-24 101.5,-24 101.5,0 165.5,0 165.5,-24"/>
-<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
+<title>proc~util_sort_tp</title>
+<g id="a_interface~~util_sort_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_sort_tp.html" xlink:title="util_sort_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="166,-24 101,-24 101,0 166,0 166,-24"/>
+<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_pl&#45;&gt;interface~util_sort_body -->
+<!-- proc~util_sort_tp&#45;&gt;interface~util_sort_body -->
 <g id="interface~~util_sort_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_sort_pl&#45;&gt;interface~util_sort_body</title>
-<path fill="none" stroke="#000000" d="M165.73,-18.19C173.98,-19.82 183.09,-21.63 192.02,-23.4"/>
-<polygon fill="#000000" stroke="#000000" points="191.49,-26.86 201.98,-25.37 192.85,-19.99 191.49,-26.86"/>
+<title>proc~util_sort_tp&#45;&gt;interface~util_sort_body</title>
+<path fill="none" stroke="#000000" d="M166.02,-18.24C174.18,-19.86 183.15,-21.64 191.96,-23.38"/>
+<polygon fill="#000000" stroke="#000000" points="191.3,-26.82 201.79,-25.33 192.66,-19.95 191.3,-26.82"/>
 </g>
-<!-- interface~util_sort_pl -->
+<!-- interface~util_sort_tp -->
 <g id="interface~~util_sort_body~~CalledByGraph_node4" class="node">
-<title>interface~util_sort_pl</title>
-<g id="a_interface~~util_sort_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_sort_pl.html" xlink:title="util_sort_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-24 0.5,-24 0.5,0 64.5,0 64.5,-24"/>
-<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
+<title>interface~util_sort_tp</title>
+<g id="a_interface~~util_sort_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_sort_tp.html" xlink:title="util_sort_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="65,-24 0,-24 0,0 65,0 65,-24"/>
+<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_pl&#45;&gt;proc~util_sort_pl -->
+<!-- interface~util_sort_tp&#45;&gt;proc~util_sort_tp -->
 <g id="interface~~util_sort_body~~CalledByGraph_edge4" class="edge">
-<title>interface~util_sort_pl&#45;&gt;proc~util_sort_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-12C72.95,-12 82.17,-12 91.04,-12"/>
-<polygon fill="#000000" stroke="#000000" points="91.22,-15.5 101.22,-12 91.22,-8.5 91.22,-15.5"/>
+<title>interface~util_sort_tp&#45;&gt;proc~util_sort_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-12C73.22,-12 82.09,-12 90.65,-12"/>
+<polygon fill="#000000" stroke="#000000" points="90.86,-15.5 100.86,-12 90.86,-8.5 90.86,-15.5"/>
 </g>
-<!-- interface~util_sort_tp -->
+<!-- interface~util_sort_pl -->
 <g id="interface~~util_sort_body~~CalledByGraph_node5" class="node">
-<title>interface~util_sort_tp</title>
-<g id="a_interface~~util_sort_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_tp.html" xlink:title="util_sort_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="65,-66 0,-66 0,-42 65,-42 65,-66"/>
-<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+<title>interface~util_sort_pl</title>
+<g id="a_interface~~util_sort_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_pl.html" xlink:title="util_sort_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-66 0.5,-66 0.5,-42 64.5,-42 64.5,-66"/>
+<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_tp&#45;&gt;proc~util_sort_tp -->
+<!-- interface~util_sort_pl&#45;&gt;proc~util_sort_pl -->
 <g id="interface~~util_sort_body~~CalledByGraph_edge3" class="edge">
-<title>interface~util_sort_tp&#45;&gt;proc~util_sort_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-54C73.22,-54 82.09,-54 90.65,-54"/>
-<polygon fill="#000000" stroke="#000000" points="90.86,-57.5 100.86,-54 90.86,-50.5 90.86,-57.5"/>
+<title>interface~util_sort_pl&#45;&gt;proc~util_sort_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-54C72.95,-54 82.17,-54 91.04,-54"/>
+<polygon fill="#000000" stroke="#000000" points="91.22,-57.5 101.22,-54 91.22,-50.5 91.22,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_sort_rearrange.html b/docs/interface/util_sort_rearrange.html
index b9e8d63ed..931df911c 100644
--- a/docs/interface/util_sort_rearrange.html
+++ b/docs/interface/util_sort_rearrange.html
@@ -266,25 +266,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M347.96,-21.89C356.56,-22.99 365.23,-24.1 373.58,-25.18"/>
 <polygon fill="#000000" stroke="#000000" points="373.23,-28.66 383.6,-26.46 374.12,-21.72 373.23,-28.66"/>
 </g>
-<!-- interface~symba_util_sort_rearrange_tp -->
-<g id="interface~~util_sort_rearrange~~CalledByGraph_node4" class="node">
-<title>interface~symba_util_sort_rearrange_tp</title>
-<g id="a_interface~~util_sort_rearrange~~CalledByGraph_node4"><a xlink:href=".././interface/symba_util_sort_rearrange_tp.html" xlink:title="symba_util_sort_rearrange_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp -->
-<g id="interface~~util_sort_rearrange~~CalledByGraph_edge3" class="edge">
-<title>interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.01,-54C164.51,-54 173.21,-54 181.83,-54"/>
-<polygon fill="#000000" stroke="#000000" points="181.88,-57.5 191.88,-54 181.88,-50.5 181.88,-57.5"/>
-</g>
 <!-- interface~symba_util_sort_rearrange_pl -->
-<g id="interface~~util_sort_rearrange~~CalledByGraph_node5" class="node">
+<g id="interface~~util_sort_rearrange~~CalledByGraph_node4" class="node">
 <title>interface~symba_util_sort_rearrange_pl</title>
-<g id="a_interface~~util_sort_rearrange~~CalledByGraph_node5"><a xlink:href=".././interface/symba_util_sort_rearrange_pl.html" xlink:title="symba_util_sort_rearrange_pl">
+<g id="a_interface~~util_sort_rearrange~~CalledByGraph_node4"><a xlink:href=".././interface/symba_util_sort_rearrange_pl.html" xlink:title="symba_util_sort_rearrange_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="155.5,-24 0.5,-24 0.5,0 155.5,0 155.5,-24"/>
 <text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_pl</text>
 </a>
@@ -296,6 +281,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.73,-12C164.39,-12 173.27,-12 182.04,-12"/>
 <polygon fill="#000000" stroke="#000000" points="182.29,-15.5 192.29,-12 182.29,-8.5 182.29,-15.5"/>
 </g>
+<!-- interface~symba_util_sort_rearrange_tp -->
+<g id="interface~~util_sort_rearrange~~CalledByGraph_node5" class="node">
+<title>interface~symba_util_sort_rearrange_tp</title>
+<g id="a_interface~~util_sort_rearrange~~CalledByGraph_node5"><a xlink:href=".././interface/symba_util_sort_rearrange_tp.html" xlink:title="symba_util_sort_rearrange_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-66 0,-66 0,-42 156,-42 156,-66"/>
+<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp -->
+<g id="interface~~util_sort_rearrange~~CalledByGraph_edge3" class="edge">
+<title>interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.01,-54C164.51,-54 173.21,-54 181.83,-54"/>
+<polygon fill="#000000" stroke="#000000" points="181.88,-57.5 191.88,-54 181.88,-50.5 181.88,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_sort_rearrange_body.html b/docs/interface/util_sort_rearrange_body.html
index 257dc2b45..c354ff001 100644
--- a/docs/interface/util_sort_rearrange_body.html
+++ b/docs/interface/util_sort_rearrange_body.html
@@ -378,25 +378,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M272.03,-19.64C280.42,-20.75 289.15,-21.89 297.82,-23.04"/>
 <polygon fill="#000000" stroke="#000000" points="297.58,-26.53 307.95,-24.37 298.49,-19.59 297.58,-26.53"/>
 </g>
-<!-- interface~util_sort_rearrange_tp -->
-<g id="interface~~util_sort_rearrange_body~~CalledByGraph_node4" class="node">
-<title>interface~util_sort_rearrange_tp</title>
-<g id="a_interface~~util_sort_rearrange_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="118,-66 0,-66 0,-42 118,-42 118,-66"/>
-<text text-anchor="middle" x="59" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
-<g id="interface~~util_sort_rearrange_body~~CalledByGraph_edge3" class="edge">
-<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-54C126.61,-54 135.17,-54 143.62,-54"/>
-<polygon fill="#000000" stroke="#000000" points="143.82,-57.5 153.82,-54 143.82,-50.5 143.82,-57.5"/>
-</g>
 <!-- interface~util_sort_rearrange_pl -->
-<g id="interface~~util_sort_rearrange_body~~CalledByGraph_node5" class="node">
+<g id="interface~~util_sort_rearrange_body~~CalledByGraph_node4" class="node">
 <title>interface~util_sort_rearrange_pl</title>
-<g id="a_interface~~util_sort_rearrange_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
+<g id="a_interface~~util_sort_rearrange_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="118,-24 0,-24 0,0 118,0 118,-24"/>
 <text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </a>
@@ -408,6 +393,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-12C126.61,-12 135.17,-12 143.62,-12"/>
 <polygon fill="#000000" stroke="#000000" points="143.82,-15.5 153.82,-12 143.82,-8.5 143.82,-15.5"/>
 </g>
+<!-- interface~util_sort_rearrange_tp -->
+<g id="interface~~util_sort_rearrange_body~~CalledByGraph_node5" class="node">
+<title>interface~util_sort_rearrange_tp</title>
+<g id="a_interface~~util_sort_rearrange_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="118,-66 0,-66 0,-42 118,-42 118,-66"/>
+<text text-anchor="middle" x="59" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
+<g id="interface~~util_sort_rearrange_body~~CalledByGraph_edge3" class="edge">
+<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-54C126.61,-54 135.17,-54 143.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="143.82,-57.5 153.82,-54 143.82,-50.5 143.82,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_sort_rearrange_pl.html b/docs/interface/util_sort_rearrange_pl.html
index feec55a66..dfa5dced1 100644
--- a/docs/interface/util_sort_rearrange_pl.html
+++ b/docs/interface/util_sort_rearrange_pl.html
@@ -228,74 +228,74 @@ <h3 class="panel-title">Calls</h3>
 <!-- interface~util_sort_rearrange_pl -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_node1" class="node">
 <title>interface~util_sort_rearrange_pl</title>
-<polygon fill="none" stroke="black" points="118,-24 0,-24 0,0 118,0 118,-24"/>
-<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_pl</text>
+<polygon fill="none" stroke="black" points="118,-44 0,-44 0,-20 118,-20 118,-44"/>
+<text text-anchor="middle" x="59" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_pl</text>
 </g>
 <!-- proc~util_sort_rearrange_pl -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_node2" class="node">
 <title>proc~util_sort_rearrange_pl</title>
 <g id="a_interface~~util_sort_rearrange_pl~~CallsGraph_node2"><a xlink:href=".././proc/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="272,-24 154,-24 154,0 272,0 272,-24"/>
-<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="272,-44 154,-44 154,-20 272,-20 272,-44"/>
+<text text-anchor="middle" x="213" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_edge1" class="edge">
 <title>interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-12C126.61,-12 135.17,-12 143.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="143.82,-15.5 153.82,-12 143.82,-8.5 143.82,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-32C126.61,-32 135.17,-32 143.62,-32"/>
+<polygon fill="#000000" stroke="#000000" points="143.82,-35.5 153.82,-32 143.82,-28.5 143.82,-35.5"/>
 </g>
-<!-- interface~util_sort_rearrange_body -->
+<!-- interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_node3" class="node">
-<title>interface~util_sort_rearrange_body</title>
-<g id="a_interface~~util_sort_rearrange_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="441,-44 308,-44 308,-20 441,-20 441,-44"/>
-<text text-anchor="middle" x="374.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<title>interface~util_sort_rearrange~2</title>
+<g id="a_interface~~util_sort_rearrange_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="749,-44 646,-44 646,-20 749,-20 749,-44"/>
+<text text-anchor="middle" x="697.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_edge2" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" d="M272.03,-19.28C280.42,-20.33 289.15,-21.42 297.82,-22.51"/>
-<polygon fill="#000000" stroke="#000000" points="297.59,-26.01 307.95,-23.78 298.46,-19.06 297.59,-26.01"/>
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
+<path fill="none" stroke="#000000" d="M272.17,-32.72C284.02,-32.83 296.41,-32.94 308,-33 442.22,-33.71 475.78,-33.78 610,-33 618.31,-32.95 627.07,-32.88 635.7,-32.79"/>
+<polygon fill="#000000" stroke="#000000" points="635.77,-36.29 645.73,-32.68 635.69,-29.29 635.77,-36.29"/>
 </g>
-<!-- interface~util_sort_rearrange~2 -->
+<!-- interface~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_node4" class="node">
-<title>interface~util_sort_rearrange~2</title>
-<g id="a_interface~~util_sort_rearrange_pl~~CallsGraph_node4"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="749,-24 646,-24 646,0 749,0 749,-24"/>
-<text text-anchor="middle" x="697.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<title>interface~util_sort_rearrange_body</title>
+<g id="a_interface~~util_sort_rearrange_pl~~CallsGraph_node4"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="441,-24 308,-24 308,0 441,0 441,-24"/>
+<text text-anchor="middle" x="374.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_edge3" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M272.17,-11.28C284.02,-11.17 296.41,-11.06 308,-11 442.22,-10.29 475.78,-10.22 610,-11 618.31,-11.05 627.07,-11.12 635.7,-11.21"/>
-<polygon fill="#000000" stroke="#000000" points="635.69,-14.71 645.73,-11.32 635.77,-7.71 635.69,-14.71"/>
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" d="M272.03,-24.72C280.42,-23.67 289.15,-22.58 297.82,-21.49"/>
+<polygon fill="#000000" stroke="#000000" points="298.46,-24.94 307.95,-20.22 297.59,-17.99 298.46,-24.94"/>
 </g>
 <!-- proc~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_node5" class="node">
 <title>proc~util_sort_rearrange_body</title>
 <g id="a_interface~~util_sort_rearrange_pl~~CallsGraph_node5"><a xlink:href=".././proc/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="610,-44 477,-44 477,-20 610,-20 610,-44"/>
-<text text-anchor="middle" x="543.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="610,-24 477,-24 477,0 610,0 610,-24"/>
+<text text-anchor="middle" x="543.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_edge4" class="edge">
 <title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.02,-32C449.5,-32 458.23,-32 466.85,-32"/>
-<polygon fill="#000000" stroke="#000000" points="466.89,-35.5 476.89,-32 466.89,-28.5 466.89,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.02,-12C449.5,-12 458.23,-12 466.85,-12"/>
+<polygon fill="#000000" stroke="#000000" points="466.89,-15.5 476.89,-12 466.89,-8.5 466.89,-15.5"/>
 </g>
 <!-- proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange_pl~~CallsGraph_edge5" class="edge">
 <title>proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M610.29,-23.34C618.73,-22.23 627.34,-21.1 635.7,-20"/>
-<polygon fill="#000000" stroke="#000000" points="636.28,-23.45 645.74,-18.68 635.37,-16.51 636.28,-23.45"/>
+<path fill="none" stroke="#000000" d="M610.29,-20.66C618.73,-21.77 627.34,-22.9 635.7,-24"/>
+<polygon fill="#000000" stroke="#000000" points="635.37,-27.49 645.74,-25.32 636.28,-20.55 635.37,-27.49"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_sort_rearrange_tp.html b/docs/interface/util_sort_rearrange_tp.html
index cbdb70a2c..5e7fde83f 100644
--- a/docs/interface/util_sort_rearrange_tp.html
+++ b/docs/interface/util_sort_rearrange_tp.html
@@ -228,74 +228,74 @@ <h3 class="panel-title">Calls</h3>
 <!-- interface~util_sort_rearrange_tp -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_node1" class="node">
 <title>interface~util_sort_rearrange_tp</title>
-<polygon fill="none" stroke="black" points="118,-24 0,-24 0,0 118,0 118,-24"/>
-<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_tp</text>
+<polygon fill="none" stroke="black" points="118,-44 0,-44 0,-20 118,-20 118,-44"/>
+<text text-anchor="middle" x="59" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_tp</text>
 </g>
 <!-- proc~util_sort_rearrange_tp -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_node2" class="node">
 <title>proc~util_sort_rearrange_tp</title>
 <g id="a_interface~~util_sort_rearrange_tp~~CallsGraph_node2"><a xlink:href=".././proc/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="272,-24 154,-24 154,0 272,0 272,-24"/>
-<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="272,-44 154,-44 154,-20 272,-20 272,-44"/>
+<text text-anchor="middle" x="213" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_edge1" class="edge">
 <title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-12C126.61,-12 135.17,-12 143.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="143.82,-15.5 153.82,-12 143.82,-8.5 143.82,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-32C126.61,-32 135.17,-32 143.62,-32"/>
+<polygon fill="#000000" stroke="#000000" points="143.82,-35.5 153.82,-32 143.82,-28.5 143.82,-35.5"/>
 </g>
-<!-- interface~util_sort_rearrange_body -->
+<!-- interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_node3" class="node">
-<title>interface~util_sort_rearrange_body</title>
-<g id="a_interface~~util_sort_rearrange_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="441,-44 308,-44 308,-20 441,-20 441,-44"/>
-<text text-anchor="middle" x="374.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<title>interface~util_sort_rearrange~2</title>
+<g id="a_interface~~util_sort_rearrange_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="749,-44 646,-44 646,-20 749,-20 749,-44"/>
+<text text-anchor="middle" x="697.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_edge2" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" d="M272.03,-19.28C280.42,-20.33 289.15,-21.42 297.82,-22.51"/>
-<polygon fill="#000000" stroke="#000000" points="297.59,-26.01 307.95,-23.78 298.46,-19.06 297.59,-26.01"/>
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
+<path fill="none" stroke="#000000" d="M272.17,-32.72C284.02,-32.83 296.41,-32.94 308,-33 442.22,-33.71 475.78,-33.78 610,-33 618.31,-32.95 627.07,-32.88 635.7,-32.79"/>
+<polygon fill="#000000" stroke="#000000" points="635.77,-36.29 645.73,-32.68 635.69,-29.29 635.77,-36.29"/>
 </g>
-<!-- interface~util_sort_rearrange~2 -->
+<!-- interface~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_node4" class="node">
-<title>interface~util_sort_rearrange~2</title>
-<g id="a_interface~~util_sort_rearrange_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="749,-24 646,-24 646,0 749,0 749,-24"/>
-<text text-anchor="middle" x="697.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<title>interface~util_sort_rearrange_body</title>
+<g id="a_interface~~util_sort_rearrange_tp~~CallsGraph_node4"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="441,-24 308,-24 308,0 441,0 441,-24"/>
+<text text-anchor="middle" x="374.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_edge3" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M272.17,-11.28C284.02,-11.17 296.41,-11.06 308,-11 442.22,-10.29 475.78,-10.22 610,-11 618.31,-11.05 627.07,-11.12 635.7,-11.21"/>
-<polygon fill="#000000" stroke="#000000" points="635.69,-14.71 645.73,-11.32 635.77,-7.71 635.69,-14.71"/>
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" d="M272.03,-24.72C280.42,-23.67 289.15,-22.58 297.82,-21.49"/>
+<polygon fill="#000000" stroke="#000000" points="298.46,-24.94 307.95,-20.22 297.59,-17.99 298.46,-24.94"/>
 </g>
 <!-- proc~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_node5" class="node">
 <title>proc~util_sort_rearrange_body</title>
 <g id="a_interface~~util_sort_rearrange_tp~~CallsGraph_node5"><a xlink:href=".././proc/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="610,-44 477,-44 477,-20 610,-20 610,-44"/>
-<text text-anchor="middle" x="543.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="610,-24 477,-24 477,0 610,0 610,-24"/>
+<text text-anchor="middle" x="543.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_edge4" class="edge">
 <title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.02,-32C449.5,-32 458.23,-32 466.85,-32"/>
-<polygon fill="#000000" stroke="#000000" points="466.89,-35.5 476.89,-32 466.89,-28.5 466.89,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.02,-12C449.5,-12 458.23,-12 466.85,-12"/>
+<polygon fill="#000000" stroke="#000000" points="466.89,-15.5 476.89,-12 466.89,-8.5 466.89,-15.5"/>
 </g>
 <!-- proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange_tp~~CallsGraph_edge5" class="edge">
 <title>proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M610.29,-23.34C618.73,-22.23 627.34,-21.1 635.7,-20"/>
-<polygon fill="#000000" stroke="#000000" points="636.28,-23.45 645.74,-18.68 635.37,-16.51 636.28,-23.45"/>
+<path fill="none" stroke="#000000" d="M610.29,-20.66C618.73,-21.77 627.34,-22.9 635.7,-24"/>
+<polygon fill="#000000" stroke="#000000" points="635.37,-27.49 645.74,-25.32 636.28,-20.55 635.37,-27.49"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_sort_rearrange~2.html b/docs/interface/util_sort_rearrange~2.html
index f98a5c071..d4a780410 100644
--- a/docs/interface/util_sort_rearrange~2.html
+++ b/docs/interface/util_sort_rearrange~2.html
@@ -261,93 +261,93 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M610.29,-43C618.73,-43 627.34,-43 635.7,-43"/>
 <polygon fill="#000000" stroke="#000000" points="635.74,-46.5 645.74,-43 635.74,-39.5 635.74,-46.5"/>
 </g>
-<!-- proc~util_sort_rearrange_tp -->
+<!-- proc~util_sort_rearrange_pl -->
 <g id="interface~~util_sort_rearrange~2~~CalledByGraph_node3" class="node">
-<title>proc~util_sort_rearrange_tp</title>
-<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
+<title>proc~util_sort_rearrange_pl</title>
+<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
 <polygon fill="#d9534f" stroke="#d9534f" points="272,-85 154,-85 154,-61 272,-61 272,-85"/>
-<text text-anchor="middle" x="213" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<text text-anchor="middle" x="213" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge2" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
 <path fill="none" stroke="#000000" d="M272.01,-75.57C349.44,-78.11 490.68,-79.65 610,-64 621.38,-62.51 633.43,-60.11 644.81,-57.47"/>
 <polygon fill="#000000" stroke="#000000" points="645.71,-60.85 654.61,-55.09 644.06,-54.05 645.71,-60.85"/>
 </g>
 <!-- interface~util_sort_rearrange_body -->
-<g id="interface~~util_sort_rearrange~2~~CalledByGraph_node6" class="node">
+<g id="interface~~util_sort_rearrange~2~~CalledByGraph_node7" class="node">
 <title>interface~util_sort_rearrange_body</title>
-<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
+<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
 <polygon fill="#a7506f" stroke="#a7506f" points="441,-55 308,-55 308,-31 441,-31 441,-55"/>
 <text text-anchor="middle" x="374.5" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
-<g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge7" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
+<g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge8" class="edge">
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
 <path fill="none" stroke="#000000" d="M272.03,-62.08C281,-60.4 290.35,-58.64 299.61,-56.9"/>
 <polygon fill="#000000" stroke="#000000" points="300.4,-60.31 309.58,-55.02 299.1,-53.43 300.4,-60.31"/>
 </g>
-<!-- proc~util_sort_rearrange_pl -->
+<!-- proc~util_sort_rearrange_tp -->
 <g id="interface~~util_sort_rearrange~2~~CalledByGraph_node4" class="node">
-<title>proc~util_sort_rearrange_pl</title>
-<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node4"><a xlink:href=".././proc/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
+<title>proc~util_sort_rearrange_tp</title>
+<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node4"><a xlink:href=".././proc/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
 <polygon fill="#d9534f" stroke="#d9534f" points="272,-24 154,-24 154,0 272,0 272,-24"/>
-<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge3" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
 <path fill="none" stroke="#000000" d="M272.01,-9.62C349.45,-7.33 490.69,-6.19 610,-22 621.37,-23.51 633.43,-25.91 644.81,-28.55"/>
 <polygon fill="#000000" stroke="#000000" points="644.06,-31.97 654.6,-30.93 645.71,-25.17 644.06,-31.97"/>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
-<g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge8" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
+<g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge7" class="edge">
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
 <path fill="none" stroke="#000000" d="M272.03,-23.28C281.72,-25.16 291.87,-27.13 301.85,-29.07"/>
 <polygon fill="#000000" stroke="#000000" points="301.26,-32.53 311.75,-31 302.6,-25.65 301.26,-32.53"/>
 </g>
-<!-- interface~util_sort_rearrange_tp -->
+<!-- interface~util_sort_rearrange_pl -->
 <g id="interface~~util_sort_rearrange~2~~CalledByGraph_node5" class="node">
-<title>interface~util_sort_rearrange_tp</title>
-<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
+<title>interface~util_sort_rearrange_pl</title>
+<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="118,-85 0,-85 0,-61 118,-61 118,-85"/>
-<text text-anchor="middle" x="59" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<text text-anchor="middle" x="59" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
+<!-- interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl -->
 <g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge5" class="edge">
-<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
+<title>interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-73C126.61,-73 135.17,-73 143.62,-73"/>
 <polygon fill="#000000" stroke="#000000" points="143.82,-76.5 153.82,-73 143.82,-69.5 143.82,-76.5"/>
 </g>
-<!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
-<g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge4" class="edge">
-<title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.02,-43C449.5,-43 458.23,-43 466.85,-43"/>
-<polygon fill="#000000" stroke="#000000" points="466.89,-46.5 476.89,-43 466.89,-39.5 466.89,-46.5"/>
-</g>
-<!-- interface~util_sort_rearrange_pl -->
-<g id="interface~~util_sort_rearrange~2~~CalledByGraph_node7" class="node">
-<title>interface~util_sort_rearrange_pl</title>
-<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
+<!-- interface~util_sort_rearrange_tp -->
+<g id="interface~~util_sort_rearrange~2~~CalledByGraph_node6" class="node">
+<title>interface~util_sort_rearrange_tp</title>
+<g id="a_interface~~util_sort_rearrange~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
 <polygon fill="#a7506f" stroke="#a7506f" points="118,-24 0,-24 0,0 118,0 118,-24"/>
-<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl -->
+<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
 <g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge6" class="edge">
-<title>interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl</title>
+<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-12C126.61,-12 135.17,-12 143.62,-12"/>
 <polygon fill="#000000" stroke="#000000" points="143.82,-15.5 153.82,-12 143.82,-8.5 143.82,-15.5"/>
 </g>
+<!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
+<g id="interface~~util_sort_rearrange~2~~CalledByGraph_edge4" class="edge">
+<title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.02,-43C449.5,-43 458.23,-43 466.85,-43"/>
+<polygon fill="#000000" stroke="#000000" points="466.89,-46.5 476.89,-43 466.89,-39.5 466.89,-46.5"/>
+</g>
 </g>
 </svg>
 </div><script>var paninterfaceutil_sort_rearrange2CalledByGraph = svgPanZoom('#interfaceutil_sort_rearrange2CalledByGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_spill.html b/docs/interface/util_spill.html
index 3b26ef0ec..59cc1d3fc 100644
--- a/docs/interface/util_spill.html
+++ b/docs/interface/util_spill.html
@@ -281,10 +281,25 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M291.16,-24.09C300.65,-26.95 310.69,-30.03 320,-33 328.48,-35.71 337.58,-38.72 346.12,-41.61"/>
 <polygon fill="#000000" stroke="#000000" points="345.23,-45 355.82,-44.91 347.48,-38.37 345.23,-45"/>
 </g>
-<!-- interface~symba_util_spill_encounter -->
+<!-- interface~symba_util_spill_pl -->
 <g id="interface~~util_spill~~CalledByGraph_node5" class="node">
+<title>interface~symba_util_spill_pl</title>
+<g id="a_interface~~util_spill~~CalledByGraph_node5"><a xlink:href=".././interface/symba_util_spill_pl.html" xlink:title="symba_util_spill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="122,-24 20,-24 20,0 122,0 122,-24"/>
+<text text-anchor="middle" x="71" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_pl</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl -->
+<g id="interface~~util_spill~~CalledByGraph_edge6" class="edge">
+<title>interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.43,-12C142.77,-12 166.41,-12 187.65,-12"/>
+<polygon fill="#000000" stroke="#000000" points="187.86,-15.5 197.86,-12 187.86,-8.5 187.86,-15.5"/>
+</g>
+<!-- interface~symba_util_spill_encounter -->
+<g id="interface~~util_spill~~CalledByGraph_node6" class="node">
 <title>interface~symba_util_spill_encounter</title>
-<g id="a_interface~~util_spill~~CalledByGraph_node5"><a xlink:href=".././interface/symba_util_spill_encounter.html" xlink:title="symba_util_spill_encounter">
+<g id="a_interface~~util_spill~~CalledByGraph_node6"><a xlink:href=".././interface/symba_util_spill_encounter.html" xlink:title="symba_util_spill_encounter">
 <polygon fill="#a7506f" stroke="#a7506f" points="142,-66 0,-66 0,-42 142,-42 142,-66"/>
 <text text-anchor="middle" x="71" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_encounter</text>
 </a>
@@ -297,9 +312,9 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="#000000" stroke="#000000" points="167.89,-57.5 177.89,-54 167.89,-50.5 167.89,-57.5"/>
 </g>
 <!-- interface~symba_util_spill_tp -->
-<g id="interface~~util_spill~~CalledByGraph_node6" class="node">
+<g id="interface~~util_spill~~CalledByGraph_node7" class="node">
 <title>interface~symba_util_spill_tp</title>
-<g id="a_interface~~util_spill~~CalledByGraph_node6"><a xlink:href=".././interface/symba_util_spill_tp.html" xlink:title="symba_util_spill_tp">
+<g id="a_interface~~util_spill~~CalledByGraph_node7"><a xlink:href=".././interface/symba_util_spill_tp.html" xlink:title="symba_util_spill_tp">
 <polygon fill="#a7506f" stroke="#a7506f" points="122.5,-108 19.5,-108 19.5,-84 122.5,-84 122.5,-108"/>
 <text text-anchor="middle" x="71" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_tp</text>
 </a>
@@ -311,21 +326,6 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.91,-96C142.97,-96 166.19,-96 187.13,-96"/>
 <polygon fill="#000000" stroke="#000000" points="187.21,-99.5 197.21,-96 187.21,-92.5 187.21,-99.5"/>
 </g>
-<!-- interface~symba_util_spill_pl -->
-<g id="interface~~util_spill~~CalledByGraph_node7" class="node">
-<title>interface~symba_util_spill_pl</title>
-<g id="a_interface~~util_spill~~CalledByGraph_node7"><a xlink:href=".././interface/symba_util_spill_pl.html" xlink:title="symba_util_spill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="122,-24 20,-24 20,0 122,0 122,-24"/>
-<text text-anchor="middle" x="71" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_pl</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl -->
-<g id="interface~~util_spill~~CalledByGraph_edge6" class="edge">
-<title>interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.43,-12C142.77,-12 166.41,-12 187.65,-12"/>
-<polygon fill="#000000" stroke="#000000" points="187.86,-15.5 197.86,-12 187.86,-8.5 187.86,-15.5"/>
-</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/interface/util_spill_body.html b/docs/interface/util_spill_body.html
index b91abcdca..f94f3a988 100644
--- a/docs/interface/util_spill_body.html
+++ b/docs/interface/util_spill_body.html
@@ -348,65 +348,65 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="281,-45 202,-45 202,-21 281,-21 281,-45"/>
 <text text-anchor="middle" x="241.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_spill_body</text>
 </g>
-<!-- proc~util_spill_tp -->
+<!-- proc~util_spill_pl -->
 <g id="interface~~util_spill_body~~CalledByGraph_node2" class="node">
-<title>proc~util_spill_tp</title>
-<g id="a_interface~~util_spill_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="166,-66 101,-66 101,-42 166,-42 166,-66"/>
-<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>proc~util_spill_pl</title>
+<g id="a_interface~~util_spill_body~~CalledByGraph_node2"><a xlink:href=".././proc/util_spill_pl.html" xlink:title="util_spill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-66 101.5,-66 101.5,-42 165.5,-42 165.5,-66"/>
+<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_tp&#45;&gt;interface~util_spill_body -->
+<!-- proc~util_spill_pl&#45;&gt;interface~util_spill_body -->
 <g id="interface~~util_spill_body~~CalledByGraph_edge1" class="edge">
-<title>proc~util_spill_tp&#45;&gt;interface~util_spill_body</title>
-<path fill="none" stroke="#000000" d="M166.02,-47.76C174.18,-46.14 183.15,-44.36 191.96,-42.62"/>
-<polygon fill="#000000" stroke="#000000" points="192.66,-46.05 201.79,-40.67 191.3,-39.18 192.66,-46.05"/>
+<title>proc~util_spill_pl&#45;&gt;interface~util_spill_body</title>
+<path fill="none" stroke="#000000" d="M165.73,-47.81C173.98,-46.18 183.09,-44.37 192.02,-42.6"/>
+<polygon fill="#000000" stroke="#000000" points="192.85,-46.01 201.98,-40.63 191.49,-39.14 192.85,-46.01"/>
 </g>
-<!-- proc~util_spill_pl -->
+<!-- proc~util_spill_tp -->
 <g id="interface~~util_spill_body~~CalledByGraph_node3" class="node">
-<title>proc~util_spill_pl</title>
-<g id="a_interface~~util_spill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_spill_pl.html" xlink:title="util_spill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-24 101.5,-24 101.5,0 165.5,0 165.5,-24"/>
-<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<title>proc~util_spill_tp</title>
+<g id="a_interface~~util_spill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="166,-24 101,-24 101,0 166,0 166,-24"/>
+<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_pl&#45;&gt;interface~util_spill_body -->
+<!-- proc~util_spill_tp&#45;&gt;interface~util_spill_body -->
 <g id="interface~~util_spill_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_spill_pl&#45;&gt;interface~util_spill_body</title>
-<path fill="none" stroke="#000000" d="M165.73,-18.19C173.98,-19.82 183.09,-21.63 192.02,-23.4"/>
-<polygon fill="#000000" stroke="#000000" points="191.49,-26.86 201.98,-25.37 192.85,-19.99 191.49,-26.86"/>
+<title>proc~util_spill_tp&#45;&gt;interface~util_spill_body</title>
+<path fill="none" stroke="#000000" d="M166.02,-18.24C174.18,-19.86 183.15,-21.64 191.96,-23.38"/>
+<polygon fill="#000000" stroke="#000000" points="191.3,-26.82 201.79,-25.33 192.66,-19.95 191.3,-26.82"/>
 </g>
-<!-- interface~util_spill_pl -->
+<!-- interface~util_spill_tp -->
 <g id="interface~~util_spill_body~~CalledByGraph_node4" class="node">
-<title>interface~util_spill_pl</title>
-<g id="a_interface~~util_spill_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-24 0.5,-24 0.5,0 64.5,0 64.5,-24"/>
-<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<title>interface~util_spill_tp</title>
+<g id="a_interface~~util_spill_body~~CalledByGraph_node4"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="65,-24 0,-24 0,0 65,0 65,-24"/>
+<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_pl&#45;&gt;proc~util_spill_pl -->
+<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
 <g id="interface~~util_spill_body~~CalledByGraph_edge4" class="edge">
-<title>interface~util_spill_pl&#45;&gt;proc~util_spill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-12C72.95,-12 82.17,-12 91.04,-12"/>
-<polygon fill="#000000" stroke="#000000" points="91.22,-15.5 101.22,-12 91.22,-8.5 91.22,-15.5"/>
+<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-12C73.22,-12 82.09,-12 90.65,-12"/>
+<polygon fill="#000000" stroke="#000000" points="90.86,-15.5 100.86,-12 90.86,-8.5 90.86,-15.5"/>
 </g>
-<!-- interface~util_spill_tp -->
+<!-- interface~util_spill_pl -->
 <g id="interface~~util_spill_body~~CalledByGraph_node5" class="node">
-<title>interface~util_spill_tp</title>
-<g id="a_interface~~util_spill_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="65,-66 0,-66 0,-42 65,-42 65,-66"/>
-<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>interface~util_spill_pl</title>
+<g id="a_interface~~util_spill_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-66 0.5,-66 0.5,-42 64.5,-42 64.5,-66"/>
+<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
+<!-- interface~util_spill_pl&#45;&gt;proc~util_spill_pl -->
 <g id="interface~~util_spill_body~~CalledByGraph_edge3" class="edge">
-<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-54C73.22,-54 82.09,-54 90.65,-54"/>
-<polygon fill="#000000" stroke="#000000" points="90.86,-57.5 100.86,-54 90.86,-50.5 90.86,-57.5"/>
+<title>interface~util_spill_pl&#45;&gt;proc~util_spill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-54C72.95,-54 82.17,-54 91.04,-54"/>
+<polygon fill="#000000" stroke="#000000" points="91.22,-57.5 101.22,-54 91.22,-50.5 91.22,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_spill~2.html b/docs/interface/util_spill~2.html
index 2de54f1e1..b8a8fe224 100644
--- a/docs/interface/util_spill~2.html
+++ b/docs/interface/util_spill~2.html
@@ -258,40 +258,25 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~util_spill_encounter&#45;&gt;interface~util_spill~2 -->
-<g id="interface~~util_spill~2~~CalledByGraph_edge3" class="edge">
+<g id="interface~~util_spill~2~~CalledByGraph_edge1" class="edge">
 <title>proc~util_spill_encounter&#45;&gt;interface~util_spill~2</title>
 <path fill="none" stroke="#000000" d="M418.95,-110.98C427.51,-106.63 437.21,-101.65 446,-97 456.3,-91.55 467.49,-85.47 477.49,-79.97"/>
 <polygon fill="#000000" stroke="#000000" points="479.21,-83.01 486.28,-75.12 475.83,-76.89 479.21,-83.01"/>
 </g>
-<!-- proc~util_spill_tp -->
+<!-- proc~util_spill_body -->
 <g id="interface~~util_spill~2~~CalledByGraph_node3" class="node">
-<title>proc~util_spill_tp</title>
-<g id="a_interface~~util_spill~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="166,-24 101,-24 101,0 166,0 166,-24"/>
-<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>proc~util_spill_body</title>
+<g id="a_interface~~util_spill~2~~CalledByGraph_node3"><a xlink:href=".././proc/util_spill_body.html" xlink:title="util_spill_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="433.5,-55 354.5,-55 354.5,-31 433.5,-31 433.5,-55"/>
+<text text-anchor="middle" x="394" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_tp&#45;&gt;interface~util_spill~2 -->
+<!-- proc~util_spill_body&#45;&gt;interface~util_spill~2 -->
 <g id="interface~~util_spill~2~~CalledByGraph_edge2" class="edge">
-<title>proc~util_spill_tp&#45;&gt;interface~util_spill~2</title>
-<path fill="none" stroke="#000000" d="M166.4,-7.43C223.9,-0.41 348.04,9.18 446,-22 460.7,-26.68 475.19,-35.93 486.46,-44.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.39,-47.28 494.4,-50.75 488.74,-41.8 484.39,-47.28"/>
-</g>
-<!-- interface~util_spill_body -->
-<g id="interface~~util_spill~2~~CalledByGraph_node8" class="node">
-<title>interface~util_spill_body</title>
-<g id="a_interface~~util_spill~2~~CalledByGraph_node8"><a xlink:href=".././interface/util_spill_body.html" xlink:title="util_spill_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="293.5,-55 214.5,-55 214.5,-31 293.5,-31 293.5,-55"/>
-<text text-anchor="middle" x="254" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
-</a>
-</g>
-</g>
-<!-- proc~util_spill_tp&#45;&gt;interface~util_spill_body -->
-<g id="interface~~util_spill~2~~CalledByGraph_edge9" class="edge">
-<title>proc~util_spill_tp&#45;&gt;interface~util_spill_body</title>
-<path fill="none" stroke="#000000" d="M166.26,-20.31C178.06,-23.39 191.73,-26.97 204.67,-30.36"/>
-<polygon fill="#000000" stroke="#000000" points="203.83,-33.76 214.39,-32.9 205.6,-26.98 203.83,-33.76"/>
+<title>proc~util_spill_body&#45;&gt;interface~util_spill~2</title>
+<path fill="none" stroke="#000000" d="M433.57,-49.83C445.96,-52.02 459.63,-54.44 471.84,-56.6"/>
+<polygon fill="#000000" stroke="#000000" points="471.23,-60.05 481.69,-58.34 472.45,-53.15 471.23,-60.05"/>
 </g>
 <!-- proc~util_spill_pl -->
 <g id="interface~~util_spill~2~~CalledByGraph_node4" class="node">
@@ -303,51 +288,72 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~util_spill_pl&#45;&gt;interface~util_spill~2 -->
-<g id="interface~~util_spill~2~~CalledByGraph_edge1" class="edge">
+<g id="interface~~util_spill~2~~CalledByGraph_edge3" class="edge">
 <title>proc~util_spill_pl&#45;&gt;interface~util_spill~2</title>
 <path fill="none" stroke="#000000" d="M165.7,-72.16C234.38,-70.33 398.34,-65.94 471.58,-63.98"/>
 <polygon fill="#000000" stroke="#000000" points="471.8,-67.47 481.71,-63.7 471.62,-60.47 471.8,-67.47"/>
 </g>
+<!-- interface~util_spill_body -->
+<g id="interface~~util_spill~2~~CalledByGraph_node6" class="node">
+<title>interface~util_spill_body</title>
+<g id="a_interface~~util_spill~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_spill_body.html" xlink:title="util_spill_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="293.5,-55 214.5,-55 214.5,-31 293.5,-31 293.5,-55"/>
+<text text-anchor="middle" x="254" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
+</a>
+</g>
+</g>
 <!-- proc~util_spill_pl&#45;&gt;interface~util_spill_body -->
-<g id="interface~~util_spill~2~~CalledByGraph_edge10" class="edge">
+<g id="interface~~util_spill~2~~CalledByGraph_edge9" class="edge">
 <title>proc~util_spill_pl&#45;&gt;interface~util_spill_body</title>
 <path fill="none" stroke="#000000" d="M165.63,-65.12C177.55,-62.1 191.43,-58.59 204.58,-55.26"/>
 <polygon fill="#000000" stroke="#000000" points="205.61,-58.61 214.45,-52.76 203.9,-51.82 205.61,-58.61"/>
 </g>
-<!-- proc~util_spill_body -->
+<!-- proc~util_spill_tp -->
 <g id="interface~~util_spill~2~~CalledByGraph_node5" class="node">
-<title>proc~util_spill_body</title>
-<g id="a_interface~~util_spill~2~~CalledByGraph_node5"><a xlink:href=".././proc/util_spill_body.html" xlink:title="util_spill_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="433.5,-55 354.5,-55 354.5,-31 433.5,-31 433.5,-55"/>
-<text text-anchor="middle" x="394" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
+<title>proc~util_spill_tp</title>
+<g id="a_interface~~util_spill~2~~CalledByGraph_node5"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="166,-24 101,-24 101,0 166,0 166,-24"/>
+<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_body&#45;&gt;interface~util_spill~2 -->
+<!-- proc~util_spill_tp&#45;&gt;interface~util_spill~2 -->
 <g id="interface~~util_spill~2~~CalledByGraph_edge4" class="edge">
-<title>proc~util_spill_body&#45;&gt;interface~util_spill~2</title>
-<path fill="none" stroke="#000000" d="M433.57,-49.83C445.96,-52.02 459.63,-54.44 471.84,-56.6"/>
-<polygon fill="#000000" stroke="#000000" points="471.23,-60.05 481.69,-58.34 472.45,-53.15 471.23,-60.05"/>
+<title>proc~util_spill_tp&#45;&gt;interface~util_spill~2</title>
+<path fill="none" stroke="#000000" d="M166.4,-7.43C223.9,-0.41 348.04,9.18 446,-22 460.7,-26.68 475.19,-35.93 486.46,-44.46"/>
+<polygon fill="#000000" stroke="#000000" points="484.39,-47.28 494.4,-50.75 488.74,-41.8 484.39,-47.28"/>
 </g>
-<!-- interface~util_spill_encounter -->
-<g id="interface~~util_spill~2~~CalledByGraph_node6" class="node">
-<title>interface~util_spill_encounter</title>
-<g id="a_interface~~util_spill~2~~CalledByGraph_node6"><a xlink:href=".././interface/util_spill_encounter.html" xlink:title="util_spill_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="306,-135 202,-135 202,-111 306,-111 306,-135"/>
-<text text-anchor="middle" x="254" y="-120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
+<!-- proc~util_spill_tp&#45;&gt;interface~util_spill_body -->
+<g id="interface~~util_spill~2~~CalledByGraph_edge10" class="edge">
+<title>proc~util_spill_tp&#45;&gt;interface~util_spill_body</title>
+<path fill="none" stroke="#000000" d="M166.26,-20.31C178.06,-23.39 191.73,-26.97 204.67,-30.36"/>
+<polygon fill="#000000" stroke="#000000" points="203.83,-33.76 214.39,-32.9 205.6,-26.98 203.83,-33.76"/>
+</g>
+<!-- interface~util_spill_body&#45;&gt;proc~util_spill_body -->
+<g id="interface~~util_spill~2~~CalledByGraph_edge6" class="edge">
+<title>interface~util_spill_body&#45;&gt;proc~util_spill_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.81,-43C309.52,-43 327.83,-43 344.42,-43"/>
+<polygon fill="#000000" stroke="#000000" points="344.48,-46.5 354.48,-43 344.48,-39.5 344.48,-46.5"/>
+</g>
+<!-- interface~util_spill_tp -->
+<g id="interface~~util_spill~2~~CalledByGraph_node7" class="node">
+<title>interface~util_spill_tp</title>
+<g id="a_interface~~util_spill~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="65,-24 0,-24 0,0 65,0 65,-24"/>
+<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter -->
-<g id="interface~~util_spill~2~~CalledByGraph_edge5" class="edge">
-<title>interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.39,-123C314.56,-123 323.08,-123 331.46,-123"/>
-<polygon fill="#000000" stroke="#000000" points="331.57,-126.5 341.57,-123 331.57,-119.5 331.57,-126.5"/>
+<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
+<g id="interface~~util_spill~2~~CalledByGraph_edge8" class="edge">
+<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-12C73.22,-12 82.09,-12 90.65,-12"/>
+<polygon fill="#000000" stroke="#000000" points="90.86,-15.5 100.86,-12 90.86,-8.5 90.86,-15.5"/>
 </g>
 <!-- interface~util_spill_pl -->
-<g id="interface~~util_spill~2~~CalledByGraph_node7" class="node">
+<g id="interface~~util_spill~2~~CalledByGraph_node8" class="node">
 <title>interface~util_spill_pl</title>
-<g id="a_interface~~util_spill~2~~CalledByGraph_node7"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
+<g id="a_interface~~util_spill~2~~CalledByGraph_node8"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="64.5,-85 0.5,-85 0.5,-61 64.5,-61 64.5,-85"/>
 <text text-anchor="middle" x="32.5" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </a>
@@ -359,26 +365,20 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-73C72.95,-73 82.17,-73 91.04,-73"/>
 <polygon fill="#000000" stroke="#000000" points="91.22,-76.5 101.22,-73 91.22,-69.5 91.22,-76.5"/>
 </g>
-<!-- interface~util_spill_body&#45;&gt;proc~util_spill_body -->
-<g id="interface~~util_spill~2~~CalledByGraph_edge8" class="edge">
-<title>interface~util_spill_body&#45;&gt;proc~util_spill_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.81,-43C309.52,-43 327.83,-43 344.42,-43"/>
-<polygon fill="#000000" stroke="#000000" points="344.48,-46.5 354.48,-43 344.48,-39.5 344.48,-46.5"/>
-</g>
-<!-- interface~util_spill_tp -->
+<!-- interface~util_spill_encounter -->
 <g id="interface~~util_spill~2~~CalledByGraph_node9" class="node">
-<title>interface~util_spill_tp</title>
-<g id="a_interface~~util_spill~2~~CalledByGraph_node9"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="65,-24 0,-24 0,0 65,0 65,-24"/>
-<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>interface~util_spill_encounter</title>
+<g id="a_interface~~util_spill~2~~CalledByGraph_node9"><a xlink:href=".././interface/util_spill_encounter.html" xlink:title="util_spill_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="306,-135 202,-135 202,-111 306,-111 306,-135"/>
+<text text-anchor="middle" x="254" y="-120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
-<g id="interface~~util_spill~2~~CalledByGraph_edge6" class="edge">
-<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-12C73.22,-12 82.09,-12 90.65,-12"/>
-<polygon fill="#000000" stroke="#000000" points="90.86,-15.5 100.86,-12 90.86,-8.5 90.86,-15.5"/>
+<!-- interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter -->
+<g id="interface~~util_spill~2~~CalledByGraph_edge5" class="edge">
+<title>interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.39,-123C314.56,-123 323.08,-123 331.46,-123"/>
+<polygon fill="#000000" stroke="#000000" points="331.57,-126.5 341.57,-123 331.57,-119.5 331.57,-126.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/util_valid_id_system.html b/docs/interface/util_valid_id_system.html
index 8384e12f9..91bf7fc2c 100644
--- a/docs/interface/util_valid_id_system.html
+++ b/docs/interface/util_valid_id_system.html
@@ -246,33 +246,33 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M108.28,-33C116.56,-33 125.18,-33 133.66,-33"/>
 <polygon fill="#000000" stroke="#000000" points="133.89,-36.5 143.89,-33 133.89,-29.5 133.89,-36.5"/>
 </g>
-<!-- interface~util_sort -->
+<!-- interface~util_exit -->
 <g id="interface~~util_valid_id_system~~CallsGraph_node3" class="node">
-<title>interface~util_sort</title>
-<g id="a_interface~~util_valid_id_system~~CallsGraph_node3"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
+<title>interface~util_exit</title>
+<g id="a_interface~~util_valid_id_system~~CallsGraph_node3"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
 <polygon fill="#a7506f" stroke="#a7506f" points="342,-66 288,-66 288,-42 342,-42 342,-66"/>
-<text text-anchor="middle" x="315" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
+<text text-anchor="middle" x="315" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
-<g id="interface~~util_valid_id_system~~CallsGraph_edge3" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
+<g id="interface~~util_valid_id_system~~CallsGraph_edge2" class="edge">
+<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
 <path fill="none" stroke="#000000" d="M252.12,-42.7C260.81,-44.29 269.64,-45.9 277.8,-47.39"/>
 <polygon fill="#000000" stroke="#000000" points="277.25,-50.85 287.71,-49.2 278.5,-43.96 277.25,-50.85"/>
 </g>
-<!-- interface~util_exit -->
+<!-- interface~util_sort -->
 <g id="interface~~util_valid_id_system~~CallsGraph_node4" class="node">
-<title>interface~util_exit</title>
-<g id="a_interface~~util_valid_id_system~~CallsGraph_node4"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
+<title>interface~util_sort</title>
+<g id="a_interface~~util_valid_id_system~~CallsGraph_node4"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
 <polygon fill="#a7506f" stroke="#a7506f" points="342,-24 288,-24 288,0 342,0 342,-24"/>
-<text text-anchor="middle" x="315" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="315" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
-<g id="interface~~util_valid_id_system~~CallsGraph_edge2" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
+<g id="interface~~util_valid_id_system~~CallsGraph_edge3" class="edge">
+<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
 <path fill="none" stroke="#000000" d="M252.12,-23.3C260.81,-21.71 269.64,-20.1 277.8,-18.61"/>
 <polygon fill="#000000" stroke="#000000" points="278.5,-22.04 287.71,-16.8 277.25,-15.15 278.5,-22.04"/>
 </g>
@@ -280,16 +280,16 @@ <h3 class="panel-title">Calls</h3>
 <g id="interface~~util_valid_id_system~~CallsGraph_node5" class="node">
 <title>proc~util_exit</title>
 <g id="a_interface~~util_valid_id_system~~CallsGraph_node5"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
-<polygon fill="#d9534f" stroke="#d9534f" points="432,-24 378,-24 378,0 432,0 432,-24"/>
-<text text-anchor="middle" x="405" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="432,-66 378,-66 378,-42 432,-42 432,-66"/>
+<text text-anchor="middle" x="405" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
 <!-- interface~util_exit&#45;&gt;proc~util_exit -->
 <g id="interface~~util_valid_id_system~~CallsGraph_edge4" class="edge">
 <title>interface~util_exit&#45;&gt;proc~util_exit</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.4,-12C350.39,-12 359.31,-12 367.82,-12"/>
-<polygon fill="#000000" stroke="#000000" points="367.92,-15.5 377.92,-12 367.92,-8.5 367.92,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.4,-54C350.39,-54 359.31,-54 367.82,-54"/>
+<polygon fill="#000000" stroke="#000000" points="367.92,-57.5 377.92,-54 367.92,-50.5 367.92,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/whm_coord_h2j_pl.html b/docs/interface/whm_coord_h2j_pl.html
index 43789be56..ee00c18ff 100644
--- a/docs/interface/whm_coord_h2j_pl.html
+++ b/docs/interface/whm_coord_h2j_pl.html
@@ -246,39 +246,39 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M103.12,-117C111.36,-117 119.97,-117 128.42,-117"/>
 <polygon fill="#000000" stroke="#000000" points="128.63,-120.5 138.63,-117 128.63,-113.5 128.63,-120.5"/>
 </g>
-<!-- vj -->
+<!-- vh -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_node3" class="node">
-<title>vj</title>
+<title>vh</title>
 <polygon fill="#777777" stroke="#777777" points="332,-234 278,-234 278,-210 332,-210 332,-234"/>
-<text text-anchor="middle" x="305" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
+<text text-anchor="middle" x="305" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;vj -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;vh -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;vj</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;vh</title>
 <path fill="none" stroke="#000000" d="M203.21,-129.04C219.53,-145.68 250.27,-176.43 278,-201 278.83,-201.73 279.67,-202.47 280.53,-203.21"/>
 <polygon fill="#000000" stroke="#000000" points="278.49,-206.07 288.41,-209.79 282.98,-200.69 278.49,-206.07"/>
 </g>
-<!-- vh -->
+<!-- xj -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_node4" class="node">
-<title>vh</title>
+<title>xj</title>
 <polygon fill="#777777" stroke="#777777" points="332,-192 278,-192 278,-168 332,-168 332,-192"/>
-<text text-anchor="middle" x="305" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+<text text-anchor="middle" x="305" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;vh -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;xj -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;vh</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;xj</title>
 <path fill="none" stroke="#000000" d="M213.19,-129.15C230.31,-138.73 254.4,-152.23 273.47,-162.9"/>
 <polygon fill="#000000" stroke="#000000" points="271.94,-166.06 282.38,-167.89 275.36,-159.95 271.94,-166.06"/>
 </g>
-<!-- xj -->
+<!-- eta -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_node5" class="node">
-<title>xj</title>
+<title>eta</title>
 <polygon fill="#777777" stroke="#777777" points="332,-150 278,-150 278,-126 332,-126 332,-150"/>
-<text text-anchor="middle" x="305" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
+<text text-anchor="middle" x="305" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;xj -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;eta -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_edge4" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;xj</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;eta</title>
 <path fill="none" stroke="#000000" d="M242.16,-126.46C250.85,-128.08 259.72,-129.73 267.93,-131.27"/>
 <polygon fill="#000000" stroke="#000000" points="267.45,-134.74 277.92,-133.13 268.73,-127.86 267.45,-134.74"/>
 </g>
@@ -294,27 +294,27 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M242.16,-107.54C250.85,-105.92 259.72,-104.27 267.93,-102.73"/>
 <polygon fill="#000000" stroke="#000000" points="268.73,-106.14 277.92,-100.87 267.45,-99.26 268.73,-106.14"/>
 </g>
-<!-- gmpl -->
+<!-- vj -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_node7" class="node">
-<title>gmpl</title>
+<title>vj</title>
 <polygon fill="#777777" stroke="#777777" points="332,-66 278,-66 278,-42 332,-42 332,-66"/>
-<text text-anchor="middle" x="305" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
+<text text-anchor="middle" x="305" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;gmpl -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;vj -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_edge6" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;gmpl</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;vj</title>
 <path fill="none" stroke="#000000" d="M213.19,-104.85C230.31,-95.27 254.4,-81.77 273.47,-71.1"/>
 <polygon fill="#000000" stroke="#000000" points="275.36,-74.05 282.38,-66.11 271.94,-67.94 275.36,-74.05"/>
 </g>
-<!-- eta -->
+<!-- gmpl -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_node8" class="node">
-<title>eta</title>
+<title>gmpl</title>
 <polygon fill="#777777" stroke="#777777" points="332,-24 278,-24 278,0 332,0 332,-24"/>
-<text text-anchor="middle" x="305" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
+<text text-anchor="middle" x="305" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;eta -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;gmpl -->
 <g id="interface~~whm_coord_h2j_pl~~CallsGraph_edge7" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;eta</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;gmpl</title>
 <path fill="none" stroke="#000000" d="M203.21,-104.96C219.53,-88.32 250.27,-57.57 278,-33 278.83,-32.27 279.67,-31.53 280.53,-30.79"/>
 <polygon fill="#000000" stroke="#000000" points="282.98,-33.31 288.41,-24.21 278.49,-27.93 282.98,-33.31"/>
 </g>
diff --git a/docs/interface/whm_coord_j2h_pl.html b/docs/interface/whm_coord_j2h_pl.html
index 827e376e8..c16d301e2 100644
--- a/docs/interface/whm_coord_j2h_pl.html
+++ b/docs/interface/whm_coord_j2h_pl.html
@@ -246,39 +246,39 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M103.12,-117C111.36,-117 119.97,-117 128.42,-117"/>
 <polygon fill="#000000" stroke="#000000" points="128.63,-120.5 138.63,-117 128.63,-113.5 128.63,-120.5"/>
 </g>
-<!-- vj -->
+<!-- vh -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_node3" class="node">
-<title>vj</title>
+<title>vh</title>
 <polygon fill="#777777" stroke="#777777" points="332,-234 278,-234 278,-210 332,-210 332,-234"/>
-<text text-anchor="middle" x="305" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
+<text text-anchor="middle" x="305" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;vj -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;vh -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;vj</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;vh</title>
 <path fill="none" stroke="#000000" d="M203.21,-129.04C219.53,-145.68 250.27,-176.43 278,-201 278.83,-201.73 279.67,-202.47 280.53,-203.21"/>
 <polygon fill="#000000" stroke="#000000" points="278.49,-206.07 288.41,-209.79 282.98,-200.69 278.49,-206.07"/>
 </g>
-<!-- vh -->
+<!-- xj -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_node4" class="node">
-<title>vh</title>
+<title>xj</title>
 <polygon fill="#777777" stroke="#777777" points="332,-192 278,-192 278,-168 332,-168 332,-192"/>
-<text text-anchor="middle" x="305" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+<text text-anchor="middle" x="305" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;vh -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;xj -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;vh</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;xj</title>
 <path fill="none" stroke="#000000" d="M213.19,-129.15C230.31,-138.73 254.4,-152.23 273.47,-162.9"/>
 <polygon fill="#000000" stroke="#000000" points="271.94,-166.06 282.38,-167.89 275.36,-159.95 271.94,-166.06"/>
 </g>
-<!-- xj -->
+<!-- eta -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_node5" class="node">
-<title>xj</title>
+<title>eta</title>
 <polygon fill="#777777" stroke="#777777" points="332,-150 278,-150 278,-126 332,-126 332,-150"/>
-<text text-anchor="middle" x="305" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
+<text text-anchor="middle" x="305" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;xj -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;eta -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_edge4" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;xj</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;eta</title>
 <path fill="none" stroke="#000000" d="M242.16,-126.46C250.85,-128.08 259.72,-129.73 267.93,-131.27"/>
 <polygon fill="#000000" stroke="#000000" points="267.45,-134.74 277.92,-133.13 268.73,-127.86 267.45,-134.74"/>
 </g>
@@ -294,27 +294,27 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M242.16,-107.54C250.85,-105.92 259.72,-104.27 267.93,-102.73"/>
 <polygon fill="#000000" stroke="#000000" points="268.73,-106.14 277.92,-100.87 267.45,-99.26 268.73,-106.14"/>
 </g>
-<!-- gmpl -->
+<!-- vj -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_node7" class="node">
-<title>gmpl</title>
+<title>vj</title>
 <polygon fill="#777777" stroke="#777777" points="332,-66 278,-66 278,-42 332,-42 332,-66"/>
-<text text-anchor="middle" x="305" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
+<text text-anchor="middle" x="305" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;gmpl -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;vj -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_edge6" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;gmpl</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;vj</title>
 <path fill="none" stroke="#000000" d="M213.19,-104.85C230.31,-95.27 254.4,-81.77 273.47,-71.1"/>
 <polygon fill="#000000" stroke="#000000" points="275.36,-74.05 282.38,-66.11 271.94,-67.94 275.36,-74.05"/>
 </g>
-<!-- eta -->
+<!-- gmpl -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_node8" class="node">
-<title>eta</title>
+<title>gmpl</title>
 <polygon fill="#777777" stroke="#777777" points="332,-24 278,-24 278,0 332,0 332,-24"/>
-<text text-anchor="middle" x="305" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
+<text text-anchor="middle" x="305" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;eta -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;gmpl -->
 <g id="interface~~whm_coord_j2h_pl~~CallsGraph_edge7" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;eta</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;gmpl</title>
 <path fill="none" stroke="#000000" d="M203.21,-104.96C219.53,-88.32 250.27,-57.57 278,-33 278.83,-32.27 279.67,-31.53 280.53,-30.79"/>
 <polygon fill="#000000" stroke="#000000" points="282.98,-33.31 288.41,-24.21 278.49,-27.93 282.98,-33.31"/>
 </g>
diff --git a/docs/interface/whm_coord_vh2vj_pl.html b/docs/interface/whm_coord_vh2vj_pl.html
index fd37b006c..9e65cff3f 100644
--- a/docs/interface/whm_coord_vh2vj_pl.html
+++ b/docs/interface/whm_coord_vh2vj_pl.html
@@ -246,27 +246,27 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M113.07,-75C121.49,-75 130.24,-75 138.84,-75"/>
 <polygon fill="#000000" stroke="#000000" points="138.85,-78.5 148.85,-75 138.85,-71.5 138.85,-78.5"/>
 </g>
-<!-- eta -->
+<!-- vj -->
 <g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_node3" class="node">
-<title>eta</title>
+<title>vj</title>
 <polygon fill="#777777" stroke="#777777" points="352,-150 298,-150 298,-126 352,-126 352,-150"/>
-<text text-anchor="middle" x="325" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
+<text text-anchor="middle" x="325" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;eta -->
-<g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;eta</title>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vj -->
+<g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_edge2" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;vj</title>
 <path fill="none" stroke="#000000" d="M229.16,-87.15C247.12,-96.78 272.43,-110.35 292.39,-121.05"/>
 <polygon fill="#000000" stroke="#000000" points="290.95,-124.25 301.41,-125.89 294.26,-118.08 290.95,-124.25"/>
 </g>
-<!-- vj -->
+<!-- vh -->
 <g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_node4" class="node">
-<title>vj</title>
+<title>vh</title>
 <polygon fill="#777777" stroke="#777777" points="352,-108 298,-108 298,-84 352,-84 352,-108"/>
-<text text-anchor="middle" x="325" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
+<text text-anchor="middle" x="325" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vj -->
-<g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_edge4" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;vj</title>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vh -->
+<g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_edge3" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;vh</title>
 <path fill="none" stroke="#000000" d="M262.15,-84.95C270.91,-86.51 279.76,-88.09 287.92,-89.55"/>
 <polygon fill="#000000" stroke="#000000" points="287.37,-93.01 297.83,-91.32 288.6,-86.12 287.37,-93.01"/>
 </g>
@@ -277,20 +277,20 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="325" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
 </g>
 <!-- proc~whm_coord_vh2vj_pl&#45;&gt;gmpl -->
-<g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_edge2" class="edge">
+<g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_edge4" class="edge">
 <title>proc~whm_coord_vh2vj_pl&#45;&gt;gmpl</title>
 <path fill="none" stroke="#000000" d="M262.15,-65.05C270.91,-63.49 279.76,-61.91 287.92,-60.45"/>
 <polygon fill="#000000" stroke="#000000" points="288.6,-63.88 297.83,-58.68 287.37,-56.99 288.6,-63.88"/>
 </g>
-<!-- vh -->
+<!-- eta -->
 <g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_node6" class="node">
-<title>vh</title>
+<title>eta</title>
 <polygon fill="#777777" stroke="#777777" points="352,-24 298,-24 298,0 352,0 352,-24"/>
-<text text-anchor="middle" x="325" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+<text text-anchor="middle" x="325" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vh -->
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;eta -->
 <g id="interface~~whm_coord_vh2vj_pl~~CallsGraph_edge5" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;vh</title>
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;eta</title>
 <path fill="none" stroke="#000000" d="M229.16,-62.85C247.12,-53.22 272.43,-39.65 292.39,-28.95"/>
 <polygon fill="#000000" stroke="#000000" points="294.26,-31.92 301.41,-24.11 290.95,-25.75 294.26,-31.92"/>
 </g>
diff --git a/docs/interface/whm_drift_pl.html b/docs/interface/whm_drift_pl.html
index 9e2cbfb71..b9934127b 100644
--- a/docs/interface/whm_drift_pl.html
+++ b/docs/interface/whm_drift_pl.html
@@ -246,27 +246,27 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M73.13,-33C81.25,-33 90,-33 98.49,-33"/>
 <polygon fill="#000000" stroke="#000000" points="98.66,-36.5 108.66,-33 98.66,-29.5 98.66,-36.5"/>
 </g>
-<!-- drift_all -->
+<!-- util_exit -->
 <g id="interface~~whm_drift_pl~~CallsGraph_node3" class="node">
-<title>drift_all</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="272,-66 218,-66 218,-42 272,-42 272,-66"/>
-<text text-anchor="middle" x="245" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
+<text text-anchor="middle" x="245" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_drift_pl&#45;&gt;drift_all -->
-<g id="interface~~whm_drift_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_drift_pl&#45;&gt;drift_all</title>
+<!-- proc~whm_drift_pl&#45;&gt;util_exit -->
+<g id="interface~~whm_drift_pl~~CallsGraph_edge2" class="edge">
+<title>proc~whm_drift_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M182.25,-40.7C190.6,-42.5 199.49,-44.41 207.85,-46.21"/>
 <polygon fill="#000000" stroke="#000000" points="207.21,-49.66 217.72,-48.34 208.68,-42.81 207.21,-49.66"/>
 </g>
-<!-- util_exit -->
+<!-- drift_all -->
 <g id="interface~~whm_drift_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
+<title>drift_all</title>
 <polygon fill="#777777" stroke="#777777" points="272,-24 218,-24 218,0 272,0 272,-24"/>
-<text text-anchor="middle" x="245" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="245" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
 </g>
-<!-- proc~whm_drift_pl&#45;&gt;util_exit -->
-<g id="interface~~whm_drift_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_drift_pl&#45;&gt;util_exit</title>
+<!-- proc~whm_drift_pl&#45;&gt;drift_all -->
+<g id="interface~~whm_drift_pl~~CallsGraph_edge3" class="edge">
+<title>proc~whm_drift_pl&#45;&gt;drift_all</title>
 <path fill="none" stroke="#000000" d="M182.25,-25.3C190.6,-23.5 199.49,-21.59 207.85,-19.79"/>
 <polygon fill="#000000" stroke="#000000" points="208.68,-23.19 217.72,-17.66 207.21,-16.34 208.68,-23.19"/>
 </g>
diff --git a/docs/interface/whm_gr_kick_getacch_pl.html b/docs/interface/whm_gr_kick_getacch_pl.html
index 84f199d5c..0abb1e22f 100644
--- a/docs/interface/whm_gr_kick_getacch_pl.html
+++ b/docs/interface/whm_gr_kick_getacch_pl.html
@@ -327,7 +327,7 @@ <h3 class="panel-title">Calls</h3>
     <br>
     
       <h2>
-public module subroutine whm_gr_kick_getacch_pl(self, param)
+public pure module subroutine whm_gr_kick_getacch_pl(self, param)
     
     
    
diff --git a/docs/interface/whm_gr_kick_getacch_tp.html b/docs/interface/whm_gr_kick_getacch_tp.html
index 0b1610dae..c029cd0c8 100644
--- a/docs/interface/whm_gr_kick_getacch_tp.html
+++ b/docs/interface/whm_gr_kick_getacch_tp.html
@@ -327,7 +327,7 @@ <h3 class="panel-title">Calls</h3>
     <br>
     
       <h2>
-public module subroutine whm_gr_kick_getacch_tp(self, param)
+public pure module subroutine whm_gr_kick_getacch_tp(self, param)
     
     
    
diff --git a/docs/interface/whm_util_append_pl.html b/docs/interface/whm_util_append_pl.html
index 64a84147b..0ea2e8ffe 100644
--- a/docs/interface/whm_util_append_pl.html
+++ b/docs/interface/whm_util_append_pl.html
@@ -246,17 +246,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M111.32,-54C119.53,-54 128.06,-54 136.46,-54"/>
 <polygon fill="#000000" stroke="#000000" points="136.6,-57.5 146.6,-54 136.6,-50.5 136.6,-57.5"/>
 </g>
-<!-- util_append -->
+<!-- util_exit -->
 <g id="interface~~whm_util_append_pl~~CallsGraph_node3" class="node">
-<title>util_append</title>
-<polygon fill="#777777" stroke="#777777" points="369,-108 301,-108 301,-84 369,-84 369,-108"/>
-<text text-anchor="middle" x="335" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="362,-108 308,-108 308,-84 362,-84 362,-108"/>
+<text text-anchor="middle" x="335" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_util_append_pl&#45;&gt;util_append -->
+<!-- proc~whm_util_append_pl&#45;&gt;util_exit -->
 <g id="interface~~whm_util_append_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_util_append_pl&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M240.9,-66.04C256.49,-71.05 274.69,-76.91 290.85,-82.11"/>
-<polygon fill="#000000" stroke="#000000" points="290.01,-85.52 300.6,-85.25 292.16,-78.86 290.01,-85.52"/>
+<title>proc~whm_util_append_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M240.9,-66.04C258.78,-71.79 280.09,-78.65 297.81,-84.35"/>
+<polygon fill="#000000" stroke="#000000" points="297.19,-87.83 307.78,-87.56 299.33,-81.17 297.19,-87.83"/>
 </g>
 <!-- util_append_pl -->
 <g id="interface~~whm_util_append_pl~~CallsGraph_node4" class="node">
@@ -265,22 +265,22 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="335" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </g>
 <!-- proc~whm_util_append_pl&#45;&gt;util_append_pl -->
-<g id="interface~~whm_util_append_pl~~CallsGraph_edge4" class="edge">
+<g id="interface~~whm_util_append_pl~~CallsGraph_edge3" class="edge">
 <title>proc~whm_util_append_pl&#45;&gt;util_append_pl</title>
 <path fill="none" stroke="#000000" d="M258.09,-54C266.63,-54 275.42,-54 283.85,-54"/>
 <polygon fill="#000000" stroke="#000000" points="283.93,-57.5 293.93,-54 283.93,-50.5 283.93,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_append -->
 <g id="interface~~whm_util_append_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="362,-24 308,-24 308,0 362,0 362,-24"/>
-<text text-anchor="middle" x="335" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_append</title>
+<polygon fill="#777777" stroke="#777777" points="369,-24 301,-24 301,0 369,0 369,-24"/>
+<text text-anchor="middle" x="335" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </g>
-<!-- proc~whm_util_append_pl&#45;&gt;util_exit -->
-<g id="interface~~whm_util_append_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_util_append_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M240.9,-41.96C258.78,-36.21 280.09,-29.35 297.81,-23.65"/>
-<polygon fill="#000000" stroke="#000000" points="299.33,-26.83 307.78,-20.44 297.19,-20.17 299.33,-26.83"/>
+<!-- proc~whm_util_append_pl&#45;&gt;util_append -->
+<g id="interface~~whm_util_append_pl~~CallsGraph_edge4" class="edge">
+<title>proc~whm_util_append_pl&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M240.9,-41.96C256.49,-36.95 274.69,-31.09 290.85,-25.89"/>
+<polygon fill="#000000" stroke="#000000" points="292.16,-29.14 300.6,-22.75 290.01,-22.48 292.16,-29.14"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/whm_util_fill_pl.html b/docs/interface/whm_util_fill_pl.html
index 29ee9ecba..f959fa364 100644
--- a/docs/interface/whm_util_fill_pl.html
+++ b/docs/interface/whm_util_fill_pl.html
@@ -246,17 +246,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M85.12,-54C93.32,-54 102.01,-54 110.5,-54"/>
 <polygon fill="#000000" stroke="#000000" points="110.7,-57.5 120.7,-54 110.7,-50.5 110.7,-57.5"/>
 </g>
-<!-- util_fill_pl -->
+<!-- util_exit -->
 <g id="interface~~whm_util_fill_pl~~CallsGraph_node3" class="node">
-<title>util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="298,-108 242,-108 242,-84 298,-84 298,-108"/>
-<text text-anchor="middle" x="270" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="297,-108 243,-108 243,-84 297,-84 297,-108"/>
+<text text-anchor="middle" x="270" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_util_fill_pl&#45;&gt;util_fill_pl -->
+<!-- proc~whm_util_fill_pl&#45;&gt;util_exit -->
 <g id="interface~~whm_util_fill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_util_fill_pl&#45;&gt;util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M194.45,-66.04C206.25,-70.78 219.92,-76.27 232.31,-81.25"/>
-<polygon fill="#000000" stroke="#000000" points="231.32,-84.63 241.91,-85.11 233.93,-78.13 231.32,-84.63"/>
+<title>proc~whm_util_fill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M194.45,-66.04C206.65,-70.94 220.86,-76.65 233.58,-81.76"/>
+<polygon fill="#000000" stroke="#000000" points="232.37,-85.05 242.96,-85.53 234.98,-78.56 232.37,-85.05"/>
 </g>
 <!-- util_fill -->
 <g id="interface~~whm_util_fill_pl~~CallsGraph_node4" class="node">
@@ -265,22 +265,22 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="270" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </g>
 <!-- proc~whm_util_fill_pl&#45;&gt;util_fill -->
-<g id="interface~~whm_util_fill_pl~~CallsGraph_edge3" class="edge">
+<g id="interface~~whm_util_fill_pl~~CallsGraph_edge4" class="edge">
 <title>proc~whm_util_fill_pl&#45;&gt;util_fill</title>
 <path fill="none" stroke="#000000" d="M206.1,-54C214.92,-54 224.17,-54 232.77,-54"/>
 <polygon fill="#000000" stroke="#000000" points="232.87,-57.5 242.87,-54 232.87,-50.5 232.87,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill_pl -->
 <g id="interface~~whm_util_fill_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="297,-24 243,-24 243,0 297,0 297,-24"/>
-<text text-anchor="middle" x="270" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="298,-24 242,-24 242,0 298,0 298,-24"/>
+<text text-anchor="middle" x="270" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </g>
-<!-- proc~whm_util_fill_pl&#45;&gt;util_exit -->
-<g id="interface~~whm_util_fill_pl~~CallsGraph_edge4" class="edge">
-<title>proc~whm_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M194.45,-41.96C206.65,-37.06 220.86,-31.35 233.58,-26.24"/>
-<polygon fill="#000000" stroke="#000000" points="234.98,-29.44 242.96,-22.47 232.37,-22.95 234.98,-29.44"/>
+<!-- proc~whm_util_fill_pl&#45;&gt;util_fill_pl -->
+<g id="interface~~whm_util_fill_pl~~CallsGraph_edge3" class="edge">
+<title>proc~whm_util_fill_pl&#45;&gt;util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M194.45,-41.96C206.25,-37.22 219.92,-31.73 232.31,-26.75"/>
+<polygon fill="#000000" stroke="#000000" points="233.93,-29.87 241.91,-22.89 231.32,-23.37 233.93,-29.87"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/whm_util_resize_pl.html b/docs/interface/whm_util_resize_pl.html
index e63411550..1c5b8a29d 100644
--- a/docs/interface/whm_util_resize_pl.html
+++ b/docs/interface/whm_util_resize_pl.html
@@ -246,29 +246,29 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M103.12,-33C111.36,-33 119.97,-33 128.42,-33"/>
 <polygon fill="#000000" stroke="#000000" points="128.63,-36.5 138.63,-33 128.63,-29.5 128.63,-36.5"/>
 </g>
-<!-- util_resize -->
+<!-- util_resize_pl -->
 <g id="interface~~whm_util_resize_pl~~CallsGraph_node3" class="node">
-<title>util_resize</title>
-<polygon fill="#777777" stroke="#777777" points="346,-66 285,-66 285,-42 346,-42 346,-66"/>
-<text text-anchor="middle" x="315.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>util_resize_pl</title>
+<polygon fill="#777777" stroke="#777777" points="353,-66 278,-66 278,-42 353,-42 353,-66"/>
+<text text-anchor="middle" x="315.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </g>
-<!-- proc~whm_util_resize_pl&#45;&gt;util_resize -->
+<!-- proc~whm_util_resize_pl&#45;&gt;util_resize_pl -->
 <g id="interface~~whm_util_resize_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_util_resize_pl&#45;&gt;util_resize</title>
-<path fill="none" stroke="#000000" d="M242.24,-41.66C253.06,-43.51 264.34,-45.44 274.68,-47.2"/>
-<polygon fill="#000000" stroke="#000000" points="274.21,-50.67 284.65,-48.9 275.39,-43.77 274.21,-50.67"/>
+<title>proc~whm_util_resize_pl&#45;&gt;util_resize_pl</title>
+<path fill="none" stroke="#000000" d="M242.24,-41.66C250.71,-43.11 259.46,-44.6 267.82,-46.03"/>
+<polygon fill="#000000" stroke="#000000" points="267.33,-49.5 277.78,-47.73 268.51,-42.6 267.33,-49.5"/>
 </g>
-<!-- util_resize_pl -->
+<!-- util_resize -->
 <g id="interface~~whm_util_resize_pl~~CallsGraph_node4" class="node">
-<title>util_resize_pl</title>
-<polygon fill="#777777" stroke="#777777" points="353,-24 278,-24 278,0 353,0 353,-24"/>
-<text text-anchor="middle" x="315.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<title>util_resize</title>
+<polygon fill="#777777" stroke="#777777" points="346,-24 285,-24 285,0 346,0 346,-24"/>
+<text text-anchor="middle" x="315.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </g>
-<!-- proc~whm_util_resize_pl&#45;&gt;util_resize_pl -->
+<!-- proc~whm_util_resize_pl&#45;&gt;util_resize -->
 <g id="interface~~whm_util_resize_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_util_resize_pl&#45;&gt;util_resize_pl</title>
-<path fill="none" stroke="#000000" d="M242.24,-24.34C250.71,-22.89 259.46,-21.4 267.82,-19.97"/>
-<polygon fill="#000000" stroke="#000000" points="268.51,-23.4 277.78,-18.27 267.33,-16.5 268.51,-23.4"/>
+<title>proc~whm_util_resize_pl&#45;&gt;util_resize</title>
+<path fill="none" stroke="#000000" d="M242.24,-24.34C253.06,-22.49 264.34,-20.56 274.68,-18.8"/>
+<polygon fill="#000000" stroke="#000000" points="275.39,-22.23 284.65,-17.1 274.21,-15.33 275.39,-22.23"/>
 </g>
 </g>
 </svg>
diff --git a/docs/interface/whm_util_spill_pl.html b/docs/interface/whm_util_spill_pl.html
index 2b466c853..8caa13e0a 100644
--- a/docs/interface/whm_util_spill_pl.html
+++ b/docs/interface/whm_util_spill_pl.html
@@ -246,41 +246,41 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M93.35,-54C101.53,-54 110.14,-54 118.57,-54"/>
 <polygon fill="#000000" stroke="#000000" points="118.72,-57.5 128.72,-54 118.72,-50.5 118.72,-57.5"/>
 </g>
-<!-- util_spill -->
+<!-- util_exit -->
 <g id="interface~~whm_util_spill_pl~~CallsGraph_node3" class="node">
-<title>util_spill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="317,-108 263,-108 263,-84 317,-84 317,-108"/>
-<text text-anchor="middle" x="290" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<text text-anchor="middle" x="290" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_spill -->
+<!-- proc~whm_util_spill_pl&#45;&gt;util_exit -->
 <g id="interface~~whm_util_spill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_spill</title>
+<title>proc~whm_util_spill_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M208.74,-66.04C222.67,-71.24 239.01,-77.34 253.3,-82.67"/>
 <polygon fill="#000000" stroke="#000000" points="252.22,-86.01 262.81,-86.22 254.67,-79.45 252.22,-86.01"/>
 </g>
-<!-- util_spill_pl -->
+<!-- util_spill -->
 <g id="interface~~whm_util_spill_pl~~CallsGraph_node4" class="node">
-<title>util_spill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="322,-66 258,-66 258,-42 322,-42 322,-66"/>
-<text text-anchor="middle" x="290" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<title>util_spill</title>
+<polygon fill="#777777" stroke="#777777" points="317,-66 263,-66 263,-42 317,-42 317,-66"/>
+<text text-anchor="middle" x="290" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_spill_pl -->
+<!-- proc~whm_util_spill_pl&#45;&gt;util_spill -->
 <g id="interface~~whm_util_spill_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_spill_pl</title>
-<path fill="none" stroke="#000000" d="M222.26,-54C230.64,-54 239.35,-54 247.59,-54"/>
-<polygon fill="#000000" stroke="#000000" points="247.74,-57.5 257.74,-54 247.74,-50.5 247.74,-57.5"/>
+<title>proc~whm_util_spill_pl&#45;&gt;util_spill</title>
+<path fill="none" stroke="#000000" d="M222.26,-54C232.44,-54 243.11,-54 252.84,-54"/>
+<polygon fill="#000000" stroke="#000000" points="252.98,-57.5 262.98,-54 252.98,-50.5 252.98,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_spill_pl -->
 <g id="interface~~whm_util_spill_pl~~CallsGraph_node5" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="317,-24 263,-24 263,0 317,0 317,-24"/>
-<text text-anchor="middle" x="290" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_spill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="322,-24 258,-24 258,0 322,0 322,-24"/>
+<text text-anchor="middle" x="290" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_exit -->
+<!-- proc~whm_util_spill_pl&#45;&gt;util_spill_pl -->
 <g id="interface~~whm_util_spill_pl~~CallsGraph_edge4" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M208.74,-41.96C222.67,-36.76 239.01,-30.66 253.3,-25.33"/>
-<polygon fill="#000000" stroke="#000000" points="254.67,-28.55 262.81,-21.78 252.22,-21.99 254.67,-28.55"/>
+<title>proc~whm_util_spill_pl&#45;&gt;util_spill_pl</title>
+<path fill="none" stroke="#000000" d="M208.74,-41.96C221.05,-37.37 235.26,-32.06 248.26,-27.21"/>
+<polygon fill="#000000" stroke="#000000" points="249.78,-30.38 257.92,-23.6 247.33,-23.82 249.78,-30.38"/>
 </g>
 </g>
 </svg>
diff --git a/docs/lists/files.html b/docs/lists/files.html
index 9d9d74046..9b6d5945b 100644
--- a/docs/lists/files.html
+++ b/docs/lists/files.html
@@ -288,1710 +288,1703 @@ <h1>Source Files</h1>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: file~~graph~~FileGraph Pages: 1 -->
-<svg id="filegraphFileGraph" width="641pt" height="1738pt"
- viewBox="0.00 0.00 641.00 1738.26" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="file~~graph~~FileGraph" class="graph" transform="scale(0.62 0.62) rotate(0) translate(4 2800)">
+<svg id="filegraphFileGraph" width="641pt" height="1754pt"
+ viewBox="0.00 0.00 641.00 1753.57" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="file~~graph~~FileGraph" class="graph" transform="scale(0.62 0.62) rotate(0) translate(4 2824.69)">
 <title>file~~graph~~FileGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-2800 1030,-2800 1030,4 -4,4"/>
-<!-- sourcefile~rmvs_setup.f90 -->
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-2824.69 1030,-2824.69 1030,4 -4,4"/>
+<!-- sourcefile~symba_setup.f90 -->
 <g id="file~~graph~~FileGraph_node1" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_file~~graph~~FileGraph_node1"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-2754 39,-2754 39,-2730 125,-2730 125,-2754"/>
-<text text-anchor="middle" x="82" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_file~~graph~~FileGraph_node1"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-1956 35,-1956 35,-1932 129,-1932 129,-1956"/>
+<text text-anchor="middle" x="82" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="file~~graph~~FileGraph_node2" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_file~~graph~~FileGraph_node2"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-906 48,-906 48,-882 116,-882 116,-906"/>
-<text text-anchor="middle" x="82" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_file~~graph~~FileGraph_node2"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="133.5,-2815 30.5,-2815 30.5,-2791 133.5,-2791 133.5,-2815"/>
+<text text-anchor="middle" x="82" y="-2800.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="file~~graph~~FileGraph_node3" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_file~~graph~~FileGraph_node3"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1026,-1603 920,-1603 920,-1579 1026,-1579 1026,-1603"/>
-<text text-anchor="middle" x="973" y="-1588.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_file~~graph~~FileGraph_node3"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-864 46.5,-864 46.5,-840 117.5,-840 117.5,-864"/>
+<text text-anchor="middle" x="82" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
+<g id="file~~graph~~FileGraph_node4" class="node">
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_file~~graph~~FileGraph_node4"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135,-1872 29,-1872 29,-1848 135,-1848 135,-1872"/>
+<text text-anchor="middle" x="82" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~util_valid.f90 -->
 <g id="file~~graph~~FileGraph_node5" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_file~~graph~~FileGraph_node5"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="738,-1728 629,-1728 629,-1704 738,-1704 738,-1728"/>
-<text text-anchor="middle" x="683.5" y="-1713.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_file~~graph~~FileGraph_node5"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="118,-822 46,-822 46,-798 118,-798 118,-822"/>
+<text text-anchor="middle" x="82" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="file~~graph~~FileGraph_edge7" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" d="M828,-1776C822.94,-1778.8 760.5,-1751.03 719.66,-1732.32"/>
-<polygon fill="#000000" stroke="#000000" points="721.1,-1729.13 710.55,-1728.13 718.18,-1735.49 721.1,-1729.13"/>
-<path fill="none" stroke="#000000" d="M966.89,-1603.28C951.84,-1637.66 904.05,-1735.04 830,-1776"/>
+<!-- sourcefile~fraggle_set.f90 -->
+<g id="file~~graph~~FileGraph_node6" class="node">
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_file~~graph~~FileGraph_node6"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124,-1326 40,-1326 40,-1302 124,-1302 124,-1326"/>
+<text text-anchor="middle" x="82" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+</a>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+</g>
+<!-- sourcefile~util_set.f90 -->
+<g id="file~~graph~~FileGraph_node7" class="node">
+<title>sourcefile~util_set.f90</title>
+<g id="a_file~~graph~~FileGraph_node7"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114,-780 50,-780 50,-756 114,-756 114,-780"/>
+<text text-anchor="middle" x="82" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~obl.f90 -->
 <g id="file~~graph~~FileGraph_node8" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_file~~graph~~FileGraph_node8"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="588,-1947 493,-1947 493,-1923 588,-1923 588,-1947"/>
-<text text-anchor="middle" x="540.5" y="-1932.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_file~~graph~~FileGraph_node8"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-738 55,-738 55,-714 109,-714 109,-738"/>
+<text text-anchor="middle" x="82" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge13" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" d="M682.5,-1895C655.02,-1904.92 623.82,-1913.98 597.77,-1920.97"/>
-<polygon fill="#000000" stroke="#000000" points="596.83,-1917.6 588.06,-1923.54 598.62,-1924.37 596.83,-1917.6"/>
+<!-- sourcefile~fraggle_setup.f90 -->
+<g id="file~~graph~~FileGraph_node9" class="node">
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_file~~graph~~FileGraph_node9"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="130,-1284 34,-1284 34,-1260 130,-1260 130,-1284"/>
+<text text-anchor="middle" x="82" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+</a>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="file~~graph~~FileGraph_node17" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_file~~graph~~FileGraph_node17"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="444.5,-1947 341.5,-1947 341.5,-1923 444.5,-1923 444.5,-1947"/>
-<text text-anchor="middle" x="393" y="-1932.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+</g>
+<!-- sourcefile~rmvs_setup.f90 -->
+<g id="file~~graph~~FileGraph_node10" class="node">
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_file~~graph~~FileGraph_node10"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-2628 39,-2628 39,-2604 125,-2604 125,-2628"/>
+<text text-anchor="middle" x="82" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge31" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" d="M682.5,-1895C621.45,-1917.03 605.39,-1845.56 541.5,-1857"/>
+<!-- sourcefile~rmvs_io.f90 -->
+<g id="file~~graph~~FileGraph_node11" class="node">
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_file~~graph~~FileGraph_node11"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-2586 48,-2586 48,-2562 116,-2562 116,-2586"/>
+<text text-anchor="middle" x="82" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+</a>
 </g>
-<!-- sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_node36" class="node">
-<title>sourcefile~swiftest.f90</title>
-<g id="a_file~~graph~~FileGraph_node36"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-1576 216,-1576 216,-1552 282,-1552 282,-1576"/>
-<text text-anchor="middle" x="249" y="-1561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+</g>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="file~~graph~~FileGraph_node12" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_file~~graph~~FileGraph_node12"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1026,-1942 920,-1942 920,-1918 1026,-1918 1026,-1942"/>
+<text text-anchor="middle" x="973" y="-1927.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge74" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M828,-1776C799.54,-1791.74 573.03,-1723.98 541.5,-1716"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="file~~graph~~FileGraph_node32" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_file~~graph~~FileGraph_node32"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452,-2709 334,-2709 334,-2685 452,-2685 452,-2709"/>
+<text text-anchor="middle" x="393" y="-2694.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="file~~graph~~FileGraph_node40" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_file~~graph~~FileGraph_node40"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="587.5,-1829 493.5,-1829 493.5,-1805 587.5,-1805 587.5,-1829"/>
-<text text-anchor="middle" x="540.5" y="-1814.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+</g>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="file~~graph~~FileGraph_edge61" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" d="M683,-2399C568.02,-2491.39 452.18,-2626.52 410.33,-2677"/>
+<polygon fill="#000000" stroke="#000000" points="407.49,-2674.94 403.83,-2684.89 412.89,-2679.4 407.49,-2674.94"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="file~~graph~~FileGraph_node34" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_file~~graph~~FileGraph_node34"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="884,-1962 775,-1962 775,-1938 884,-1938 884,-1962"/>
+<text text-anchor="middle" x="829.5" y="-1947.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge88" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" d="M682.5,-1895C639.23,-1910.61 631.87,-1867.6 593,-1843 587.9,-1839.77 582.36,-1836.63 576.85,-1833.7"/>
-<polygon fill="#000000" stroke="#000000" points="578.21,-1830.46 567.71,-1829.01 575.01,-1836.69 578.21,-1830.46"/>
-<path fill="none" stroke="#000000" d="M828,-1776C777.1,-1804.15 785.44,-1837.35 738,-1871 716.75,-1886.08 709.01,-1886.16 684.5,-1895"/>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="file~~graph~~FileGraph_edge64" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" d="M919.71,-1937.39C911.54,-1938.55 903.02,-1939.75 894.62,-1940.94"/>
+<polygon fill="#000000" stroke="#000000" points="893.88,-1937.51 884.47,-1942.37 894.86,-1944.44 893.88,-1937.51"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
-<g id="file~~graph~~FileGraph_node49" class="node">
+<g id="file~~graph~~FileGraph_node40" class="node">
 <title>sourcefile~walltime_classes.f90</title>
-<g id="a_file~~graph~~FileGraph_node49"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="884,-1682 774,-1682 774,-1658 884,-1658 884,-1682"/>
-<text text-anchor="middle" x="829" y="-1667.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<g id="a_file~~graph~~FileGraph_node40"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="739,-1923 629,-1923 629,-1899 739,-1899 739,-1923"/>
+<text text-anchor="middle" x="684" y="-1908.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge105" class="edge">
+<g id="file~~graph~~FileGraph_edge74" class="edge">
 <title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" d="M950.12,-1603.17C926.18,-1616.49 887.63,-1637.94 860.68,-1652.93"/>
-<polygon fill="#000000" stroke="#000000" points="858.71,-1650.02 851.67,-1657.95 862.11,-1656.14 858.71,-1650.02"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="file~~graph~~FileGraph_node51" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_file~~graph~~FileGraph_node51"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="882.5,-1537 775.5,-1537 775.5,-1513 882.5,-1513 882.5,-1537"/>
-<text text-anchor="middle" x="829" y="-1522.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
-</a>
-</g>
+<path fill="none" stroke="#000000" d="M828.5,-1910C802.68,-1906.51 774,-1906.04 749.11,-1906.71"/>
+<polygon fill="#000000" stroke="#000000" points="748.94,-1903.21 739.06,-1907.04 749.17,-1910.21 748.94,-1903.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge108" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" d="M945.96,-1578.89C923.24,-1568.34 890.08,-1552.93 865.04,-1541.29"/>
-<polygon fill="#000000" stroke="#000000" points="866.42,-1538.07 855.88,-1537.03 863.47,-1544.42 866.42,-1538.07"/>
-</g>
-<!-- sourcefile~whm_classes.f90 -->
-<g id="file~~graph~~FileGraph_node59" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_file~~graph~~FileGraph_node59"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="730.5,-1808 636.5,-1808 636.5,-1784 730.5,-1784 730.5,-1808"/>
-<text text-anchor="middle" x="683.5" y="-1793.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="file~~graph~~FileGraph_node41" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_file~~graph~~FileGraph_node41"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="440.5,-2374 345.5,-2374 345.5,-2350 440.5,-2350 440.5,-2374"/>
+<text text-anchor="middle" x="393" y="-2359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge123" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" d="M828,-1776C801.75,-1790.52 768.81,-1795.85 741.12,-1797.4"/>
-<polygon fill="#000000" stroke="#000000" points="740.63,-1793.92 730.78,-1797.83 740.92,-1800.92 740.63,-1793.92"/>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge76" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" d="M828.5,-1990C669.23,-2098.37 842.4,-2287.93 685,-2399"/>
+<path fill="none" stroke="#000000" d="M683,-2399C645.75,-2425.29 517.65,-2396.2 445.13,-2376.7"/>
+<polygon fill="#000000" stroke="#000000" points="445.85,-2373.27 435.28,-2374.02 444.01,-2380.02 445.85,-2373.27"/>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
-<g id="file~~graph~~FileGraph_node60" class="node">
+<g id="file~~graph~~FileGraph_node45" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
-<g id="a_file~~graph~~FileGraph_node60"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="593,-1412 488,-1412 488,-1388 593,-1388 593,-1412"/>
-<text text-anchor="middle" x="540.5" y="-1397.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<g id="a_file~~graph~~FileGraph_node45"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="593,-1454 488,-1454 488,-1430 593,-1430 593,-1454"/>
+<text text-anchor="middle" x="540.5" y="-1439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge125" class="edge">
+<g id="file~~graph~~FileGraph_edge83" class="edge">
 <title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" d="M919.67,-1584.04C878.88,-1577.46 821.4,-1565.6 774,-1546 691.31,-1511.81 604.87,-1449.25 564.65,-1418.32"/>
-<polygon fill="#000000" stroke="#000000" points="566.6,-1415.41 556.56,-1412.04 562.31,-1420.94 566.6,-1415.41"/>
+<path fill="none" stroke="#000000" d="M919.94,-1922.48C893.21,-1918.66 860.13,-1914 830.5,-1910"/>
+<path fill="none" stroke="#000000" d="M828.5,-1910C607.91,-1880.23 745.5,-1630.14 593,-1468 590.03,-1464.84 586.59,-1462.01 582.92,-1459.48"/>
+<polygon fill="#000000" stroke="#000000" points="584.44,-1456.3 574.08,-1454.12 580.82,-1462.29 584.44,-1456.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="file~~graph~~FileGraph_node73" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_file~~graph~~FileGraph_node73"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452,-2668 334,-2668 334,-2644 452,-2644 452,-2668"/>
-<text text-anchor="middle" x="393" y="-2653.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_node51" class="node">
+<title>sourcefile~swiftest.f90</title>
+<g id="a_file~~graph~~FileGraph_node51"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="282,-1494 216,-1494 216,-1470 282,-1470 282,-1494"/>
+<text text-anchor="middle" x="249" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="file~~graph~~FileGraph_edge150" class="edge">
-<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" d="M682.5,-1895C545.41,-1944.46 504.36,-2372.99 452,-2509 434.79,-2553.69 414.09,-2605.79 402.65,-2634.41"/>
-<polygon fill="#000000" stroke="#000000" points="399.35,-2633.25 398.88,-2643.83 405.84,-2635.85 399.35,-2633.25"/>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge102" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M947.62,-1942.12C930.11,-1950.64 905.84,-1962.06 884,-1971 860.65,-1980.56 851.36,-1975.8 830.5,-1990"/>
+<path fill="none" stroke="#000000" d="M828.5,-1990C775.77,-2025.88 748.62,-1993.52 685,-1989"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
-<g id="file~~graph~~FileGraph_node4" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_file~~graph~~FileGraph_node4"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-1788 43.5,-1788 43.5,-1764 120.5,-1764 120.5,-1788"/>
-<text text-anchor="middle" x="82" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="file~~graph~~FileGraph_node64" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_file~~graph~~FileGraph_node64"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="731,-2117 637,-2117 637,-2093 731,-2093 731,-2117"/>
+<text text-anchor="middle" x="684" y="-2102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge75" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M628.78,-1720.96C602.26,-1722.16 569.94,-1721.73 541.5,-1716"/>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge128" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" d="M828.5,-1990C782.12,-2021.56 784.8,-2046.6 739,-2079 734.21,-2082.39 728.91,-2085.54 723.56,-2088.41"/>
+<polygon fill="#000000" stroke="#000000" points="721.94,-2085.31 714.59,-2092.94 725.09,-2091.56 721.94,-2085.31"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
-<g id="file~~graph~~FileGraph_node6" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_file~~graph~~FileGraph_node6"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124,-1158 40,-1158 40,-1134 124,-1134 124,-1158"/>
-<text text-anchor="middle" x="82" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<!-- sourcefile~symba_classes.f90 -->
+<g id="file~~graph~~FileGraph_node66" class="node">
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_file~~graph~~FileGraph_node66"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="444.5,-2000 341.5,-2000 341.5,-1976 444.5,-1976 444.5,-2000"/>
+<text text-anchor="middle" x="393" y="-1985.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90 -->
-<g id="file~~graph~~FileGraph_node7" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_file~~graph~~FileGraph_node7"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-864 55,-864 55,-840 109,-840 109,-864"/>
-<text text-anchor="middle" x="82" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
-</a>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge134" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" d="M828.5,-1990C769,-2030.48 756.56,-2057.44 685,-2065"/>
+<path fill="none" stroke="#000000" d="M683,-2065C611.59,-2072.55 613.08,-1992.7 541.5,-1987"/>
 </g>
+<!-- sourcefile~helio_classes.f90 -->
+<g id="file~~graph~~FileGraph_node67" class="node">
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_file~~graph~~FileGraph_node67"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="587.5,-2077 493.5,-2077 493.5,-2053 587.5,-2053 587.5,-2077"/>
+<text text-anchor="middle" x="540.5" y="-2062.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+</a>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge2" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_setup.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2616C225.2,-2624.31 216.56,-2624.26 200,-2642 173.67,-2670.21 193.55,-2696.19 164,-2721 155.74,-2727.94 145.45,-2732.62 135.01,-2735.77"/>
-<polygon fill="#000000" stroke="#000000" points="133.83,-2732.46 125.02,-2738.34 135.57,-2739.23 133.83,-2732.46"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge30" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" d="M492.66,-1935C480.54,-1935 467.3,-1935 454.58,-1935"/>
-<polygon fill="#000000" stroke="#000000" points="454.52,-1931.5 444.52,-1935 454.52,-1938.5 454.52,-1931.5"/>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge137" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" d="M683,-2065C654.96,-2067.96 623.63,-2068.27 597.58,-2067.71"/>
+<polygon fill="#000000" stroke="#000000" points="597.6,-2064.2 587.51,-2067.44 597.42,-2071.2 597.6,-2064.2"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
-<g id="file~~graph~~FileGraph_node23" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_file~~graph~~FileGraph_node23"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-2628 48,-2628 48,-2604 116,-2604 116,-2628"/>
-<text text-anchor="middle" x="82" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="file~~graph~~FileGraph_node72" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_file~~graph~~FileGraph_node72"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="883,-1882 776,-1882 776,-1858 883,-1858 883,-1882"/>
+<text text-anchor="middle" x="829.5" y="-1867.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_io.f90 -->
-<g id="file~~graph~~FileGraph_edge45" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_io.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2616C208.61,-2630.35 160.33,-2628.29 126.2,-2623.9"/>
-<polygon fill="#000000" stroke="#000000" points="126.47,-2620.4 116.08,-2622.47 125.5,-2627.33 126.47,-2620.4"/>
+<!-- sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge147" class="edge">
+<title>sourcefile~swiftest_globals.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" d="M943.37,-1917.86C921.79,-1908.71 892,-1896.08 868.44,-1886.09"/>
+<polygon fill="#000000" stroke="#000000" points="869.66,-1882.81 859.09,-1882.12 866.93,-1889.25 869.66,-1882.81"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
-<g id="file~~graph~~FileGraph_node25" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_file~~graph~~FileGraph_node25"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121,-2586 43,-2586 43,-2562 121,-2562 121,-2586"/>
-<text text-anchor="middle" x="82" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<!-- sourcefile~tides_spin_step.f90 -->
+<g id="file~~graph~~FileGraph_node13" class="node">
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_file~~graph~~FileGraph_node13"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134.5,-696 29.5,-696 29.5,-672 134.5,-672 134.5,-696"/>
+<text text-anchor="middle" x="82" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge49" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_kick.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2616C247.29,-2616.26 179.23,-2598.81 130.76,-2586.33"/>
-<polygon fill="#000000" stroke="#000000" points="131.6,-2582.93 121.05,-2583.82 129.86,-2589.71 131.6,-2582.93"/>
-</g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
-<g id="file~~graph~~FileGraph_node26" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_file~~graph~~FileGraph_node26"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="153,-2544 11,-2544 11,-2520 153,-2520 153,-2544"/>
-<text text-anchor="middle" x="82" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<!-- sourcefile~symba_kick.f90 -->
+<g id="file~~graph~~FileGraph_node14" class="node">
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_file~~graph~~FileGraph_node14"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-1830 39,-1830 39,-1806 125,-1806 125,-1830"/>
+<text text-anchor="middle" x="82" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90 -->
-<g id="file~~graph~~FileGraph_edge51" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2616C204.15,-2631.98 206.05,-2573.24 164,-2553 159.73,-2550.94 155.22,-2549.07 150.62,-2547.36"/>
-<polygon fill="#000000" stroke="#000000" points="151.67,-2544.02 141.08,-2544.1 149.4,-2550.65 151.67,-2544.02"/>
+<!-- sourcefile~rmvs_step.f90 -->
+<g id="file~~graph~~FileGraph_node15" class="node">
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_file~~graph~~FileGraph_node15"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="122,-2544 42,-2544 42,-2520 122,-2520 122,-2544"/>
+<text text-anchor="middle" x="82" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+</a>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
-<g id="file~~graph~~FileGraph_node28" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_file~~graph~~FileGraph_node28"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-2502 35,-2502 35,-2478 129,-2478 129,-2502"/>
-<text text-anchor="middle" x="82" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+</g>
+<!-- sourcefile~tides_getacch_pl.f90 -->
+<g id="file~~graph~~FileGraph_node16" class="node">
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_file~~graph~~FileGraph_node16"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="137.5,-654 26.5,-654 26.5,-630 137.5,-630 137.5,-654"/>
+<text text-anchor="middle" x="82" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_discard.f90 -->
-<g id="file~~graph~~FileGraph_edge55" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_discard.f90</title>
-<path fill="none" stroke="#000000" d="M503.65,-1947.02C497.54,-1950.61 491.92,-1955.19 488,-1961 433.8,-2041.44 490.9,-2307.15 452,-2396 398.76,-2517.6 382.74,-2616 250,-2616"/>
-<path fill="none" stroke="#000000" d="M248,-2616C191.85,-2636.46 214.16,-2543.49 164,-2511 156.47,-2506.12 147.86,-2502.38 139.13,-2499.5"/>
-<polygon fill="#000000" stroke="#000000" points="139.85,-2496.06 129.27,-2496.6 137.88,-2502.78 139.85,-2496.06"/>
+<!-- sourcefile~fraggle_util.f90 -->
+<g id="file~~graph~~FileGraph_node17" class="node">
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_file~~graph~~FileGraph_node17"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123.5,-1242 40.5,-1242 40.5,-1218 123.5,-1218 123.5,-1242"/>
+<text text-anchor="middle" x="82" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+</a>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge73" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M520.56,-1922.93C481.07,-1896.94 389.06,-1831.93 334,-1757 328.55,-1749.58 279.56,-1634.09 259.01,-1585.4"/>
-<polygon fill="#000000" stroke="#000000" points="262.19,-1583.94 255.08,-1576.08 255.74,-1586.66 262.19,-1583.94"/>
 </g>
 <!-- sourcefile~rmvs_util.f90 -->
-<g id="file~~graph~~FileGraph_node44" class="node">
+<g id="file~~graph~~FileGraph_node18" class="node">
 <title>sourcefile~rmvs_util.f90</title>
-<g id="a_file~~graph~~FileGraph_node44"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="118.5,-2712 45.5,-2712 45.5,-2688 118.5,-2688 118.5,-2712"/>
-<text text-anchor="middle" x="82" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<g id="a_file~~graph~~FileGraph_node18"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="118.5,-2502 45.5,-2502 45.5,-2478 118.5,-2478 118.5,-2502"/>
+<text text-anchor="middle" x="82" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_util.f90 -->
-<g id="file~~graph~~FileGraph_edge96" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_util.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2616C225.2,-2624.31 219.35,-2627.36 200,-2642 181.7,-2655.84 183.84,-2667.47 164,-2679 153.21,-2685.27 140.53,-2689.7 128.45,-2692.81"/>
-<polygon fill="#000000" stroke="#000000" points="127.45,-2689.45 118.5,-2695.13 129.04,-2696.27 127.45,-2689.45"/>
-</g>
-<!-- sourcefile~rmvs_step.f90 -->
-<g id="file~~graph~~FileGraph_node76" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_file~~graph~~FileGraph_node76"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="122,-2670 42,-2670 42,-2646 122,-2646 122,-2670"/>
-<text text-anchor="middle" x="82" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<!-- sourcefile~whm_coord.f90 -->
+<g id="file~~graph~~FileGraph_node19" class="node">
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_file~~graph~~FileGraph_node19"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-2712 39,-2712 39,-2688 125,-2688 125,-2712"/>
+<text text-anchor="middle" x="82" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_step.f90 -->
-<g id="file~~graph~~FileGraph_edge156" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_step.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2616C209.87,-2629.89 165.18,-2640.97 131.93,-2648.25"/>
-<polygon fill="#000000" stroke="#000000" points="131.04,-2644.86 122,-2650.38 132.51,-2651.7 131.04,-2644.86"/>
-</g>
-<!-- sourcefile~symba_io.f90 -->
-<g id="file~~graph~~FileGraph_node9" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_file~~graph~~FileGraph_node9"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120,-2250 44,-2250 44,-2226 120,-2226 120,-2250"/>
-<text text-anchor="middle" x="82" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<!-- sourcefile~fraggle_generate.f90 -->
+<g id="file~~graph~~FileGraph_node20" class="node">
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_file~~graph~~FileGraph_node20"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="138,-1200 26,-1200 26,-1176 138,-1176 138,-1200"/>
+<text text-anchor="middle" x="82" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90 -->
-<g id="file~~graph~~FileGraph_node10" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_file~~graph~~FileGraph_node10"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-822 55,-822 55,-798 109,-798 109,-822"/>
-<text text-anchor="middle" x="82" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<!-- sourcefile~util_resize.f90 -->
+<g id="file~~graph~~FileGraph_node21" class="node">
+<title>sourcefile~util_resize.f90</title>
+<g id="a_file~~graph~~FileGraph_node21"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-612 42.5,-612 42.5,-588 121.5,-588 121.5,-612"/>
+<text text-anchor="middle" x="82" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
-<g id="file~~graph~~FileGraph_node11" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_file~~graph~~FileGraph_node11"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-2334 39,-2334 39,-2310 125,-2310 125,-2334"/>
-<text text-anchor="middle" x="82" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<!-- sourcefile~gr.f90 -->
+<g id="file~~graph~~FileGraph_node22" class="node">
+<title>sourcefile~gr.f90</title>
+<g id="a_file~~graph~~FileGraph_node22"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-570 55,-570 55,-546 109,-546 109,-570"/>
+<text text-anchor="middle" x="82" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~discard.f90 -->
-<g id="file~~graph~~FileGraph_node12" class="node">
-<title>sourcefile~discard.f90</title>
-<g id="a_file~~graph~~FileGraph_node12"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-780 49.5,-780 49.5,-756 114.5,-756 114.5,-780"/>
-<text text-anchor="middle" x="82" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<!-- sourcefile~rmvs_kick.f90 -->
+<g id="file~~graph~~FileGraph_node23" class="node">
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_file~~graph~~FileGraph_node23"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121,-2460 43,-2460 43,-2436 121,-2436 121,-2460"/>
+<text text-anchor="middle" x="82" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90 -->
-<g id="file~~graph~~FileGraph_node13" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_file~~graph~~FileGraph_node13"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-738 55,-738 55,-714 109,-714 109,-738"/>
-<text text-anchor="middle" x="82" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<!-- sourcefile~helio_gr.f90 -->
+<g id="file~~graph~~FileGraph_node24" class="node">
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_file~~graph~~FileGraph_node24"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-2124 48,-2124 48,-2100 116,-2100 116,-2124"/>
+<text text-anchor="middle" x="82" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
-<g id="file~~graph~~FileGraph_node14" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_file~~graph~~FileGraph_node14"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164,-696 0,-696 0,-672 164,-672 164,-696"/>
-<text text-anchor="middle" x="82" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<!-- sourcefile~util_sort.f90 -->
+<g id="file~~graph~~FileGraph_node25" class="node">
+<title>sourcefile~util_sort.f90</title>
+<g id="a_file~~graph~~FileGraph_node25"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-528 48,-528 48,-504 116,-504 116,-528"/>
+<text text-anchor="middle" x="82" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
-<g id="file~~graph~~FileGraph_node15" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_file~~graph~~FileGraph_node15"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-1956 39.5,-1956 39.5,-1932 124.5,-1932 124.5,-1956"/>
-<text text-anchor="middle" x="82" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<!-- sourcefile~symba_discard.f90 -->
+<g id="file~~graph~~FileGraph_node26" class="node">
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_file~~graph~~FileGraph_node26"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="133.5,-1788 30.5,-1788 30.5,-1764 133.5,-1764 133.5,-1788"/>
+<text text-anchor="middle" x="82" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
-<g id="file~~graph~~FileGraph_node16" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_file~~graph~~FileGraph_node16"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="131,-1578 33,-1578 33,-1554 131,-1554 131,-1578"/>
-<text text-anchor="middle" x="82" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<!-- sourcefile~util_minimize_bfgs.f90 -->
+<g id="file~~graph~~FileGraph_node27" class="node">
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_file~~graph~~FileGraph_node27"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="141,-486 23,-486 23,-462 141,-462 141,-486"/>
+<text text-anchor="middle" x="82" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_io.f90 -->
-<g id="file~~graph~~FileGraph_edge14" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_io.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C206.93,-2176.15 206.05,-2196.76 164,-2217 153.47,-2222.07 141.56,-2226.02 130.18,-2229.07"/>
-<polygon fill="#000000" stroke="#000000" points="129.22,-2225.7 120.36,-2231.51 130.91,-2232.49 129.22,-2225.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_drift.f90 -->
-<g id="file~~graph~~FileGraph_edge18" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_drift.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C181.77,-2189.72 223.78,-2255.3 164,-2301 155.6,-2307.42 145.44,-2311.88 135.19,-2314.99"/>
-<polygon fill="#000000" stroke="#000000" points="134.17,-2311.64 125.39,-2317.57 135.95,-2318.41 134.17,-2311.64"/>
-</g>
-<!-- sourcefile~symba_util.f90 -->
-<g id="file~~graph~~FileGraph_node21" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_file~~graph~~FileGraph_node21"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123,-2292 41,-2292 41,-2268 123,-2268 123,-2292"/>
-<text text-anchor="middle" x="82" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<!-- sourcefile~util_append.f90 -->
+<g id="file~~graph~~FileGraph_node28" class="node">
+<title>sourcefile~util_append.f90</title>
+<g id="a_file~~graph~~FileGraph_node28"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-444 39,-444 39,-420 125,-420 125,-444"/>
+<text text-anchor="middle" x="82" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_util.f90 -->
-<g id="file~~graph~~FileGraph_edge40" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_util.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C195.4,-2182.37 214.16,-2226.51 164,-2259 154.76,-2264.99 143.89,-2269.27 133.16,-2272.33"/>
-<polygon fill="#000000" stroke="#000000" points="132.24,-2268.96 123.41,-2274.82 133.96,-2275.74 132.24,-2268.96"/>
-</g>
-<!-- sourcefile~symba_kick.f90 -->
-<g id="file~~graph~~FileGraph_node22" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_file~~graph~~FileGraph_node22"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-2208 39,-2208 39,-2184 125,-2184 125,-2208"/>
-<text text-anchor="middle" x="82" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<!-- sourcefile~util_index.f90 -->
+<g id="file~~graph~~FileGraph_node29" class="node">
+<title>sourcefile~util_index.f90</title>
+<g id="a_file~~graph~~FileGraph_node29"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120,-402 44,-402 44,-378 120,-378 120,-402"/>
+<text text-anchor="middle" x="82" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge42" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_kick.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C212.87,-2172.95 168.89,-2183.59 135.18,-2189.42"/>
-<polygon fill="#000000" stroke="#000000" points="134.36,-2186.01 125.06,-2191.08 135.5,-2192.91 134.36,-2186.01"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge77" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M377.39,-1922.92C363.92,-1910.93 344.48,-1891.31 334,-1870 295.69,-1792.09 322.99,-1761.15 298,-1678 287.99,-1644.68 271.42,-1607.87 260.61,-1585.34"/>
-<polygon fill="#000000" stroke="#000000" points="263.75,-1583.79 256.23,-1576.33 257.45,-1586.85 263.75,-1583.79"/>
-</g>
-<!-- sourcefile~symba_step.f90 -->
-<g id="file~~graph~~FileGraph_node42" class="node">
-<title>sourcefile~symba_step.f90</title>
-<g id="a_file~~graph~~FileGraph_node42"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-1998 38,-1998 38,-1974 126,-1974 126,-1998"/>
-<text text-anchor="middle" x="82" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<!-- sourcefile~util_rescale.f90 -->
+<g id="file~~graph~~FileGraph_node30" class="node">
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_file~~graph~~FileGraph_node30"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-360 39.5,-360 39.5,-336 124.5,-336 124.5,-360"/>
+<text text-anchor="middle" x="82" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_step.f90 -->
-<g id="file~~graph~~FileGraph_edge91" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_step.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C181.77,-2189.72 223.78,-2052.7 164,-2007 155.86,-2000.78 146.06,-1996.39 136.14,-1993.3"/>
-<polygon fill="#000000" stroke="#000000" points="136.79,-1989.85 126.22,-1990.62 134.96,-1996.61 136.79,-1989.85"/>
-<path fill="none" stroke="#000000" d="M388.68,-1947.03C377.23,-1985.86 335.35,-2107.97 250,-2154"/>
-</g>
-<!-- sourcefile~symba_setup.f90 -->
-<g id="file~~graph~~FileGraph_node43" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_file~~graph~~FileGraph_node43"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-2166 35,-2166 35,-2142 129,-2142 129,-2166"/>
-<text text-anchor="middle" x="82" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<!-- sourcefile~rmvs_discard.f90 -->
+<g id="file~~graph~~FileGraph_node31" class="node">
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_file~~graph~~FileGraph_node31"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129,-2418 35,-2418 35,-2394 129,-2394 129,-2418"/>
+<text text-anchor="middle" x="82" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge93" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_setup.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C215.1,-2171.74 172.86,-2171.4 139.36,-2166.79"/>
-<polygon fill="#000000" stroke="#000000" points="139.68,-2163.3 129.26,-2165.24 138.62,-2170.22 139.68,-2163.3"/>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_cross.f90 -->
+<g id="file~~graph~~FileGraph_edge3" class="edge">
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_cross.f90</title>
+<path fill="none" stroke="#000000" d="M385.79,-2709.2C373.06,-2732.65 341.52,-2783.43 298,-2803 249.52,-2824.8 188.45,-2822.35 143.79,-2815.88"/>
+<polygon fill="#000000" stroke="#000000" points="144.09,-2812.38 133.67,-2814.3 143.01,-2819.3 144.09,-2812.38"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
-<g id="file~~graph~~FileGraph_node50" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_file~~graph~~FileGraph_node50"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135,-2082 29,-2082 29,-2058 135,-2058 135,-2082"/>
-<text text-anchor="middle" x="82" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge96" class="edge">
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M389.19,-2684.81C379.67,-2643.03 348.45,-2501.59 334,-2383 301.68,-2117.82 327.07,-2048.56 298,-1783 286.52,-1678.1 263.8,-1553.98 254.32,-1504.24"/>
+<polygon fill="#000000" stroke="#000000" points="257.72,-1503.43 252.4,-1494.27 250.85,-1504.75 257.72,-1503.43"/>
+</g>
+<!-- sourcefile~operator_mag.f90 -->
+<g id="file~~graph~~FileGraph_node54" class="node">
+<title>sourcefile~operator_mag.f90</title>
+<g id="a_file~~graph~~FileGraph_node54"><a xlink:href=".././sourcefile/operator_mag.f90.html" xlink:title="operator_mag.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-2794 200,-2794 200,-2770 298,-2770 298,-2794"/>
+<text text-anchor="middle" x="249" y="-2779.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_collision.f90 -->
-<g id="file~~graph~~FileGraph_edge106" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_collision.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C206.93,-2176.15 206.05,-2111.24 164,-2091 157.93,-2088.08 151.4,-2085.53 144.78,-2083.31"/>
-<polygon fill="#000000" stroke="#000000" points="145.65,-2079.91 135.06,-2080.29 143.57,-2086.6 145.65,-2079.91"/>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_mag.f90 -->
+<g id="file~~graph~~FileGraph_edge109" class="edge">
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_mag.f90</title>
+<path fill="none" stroke="#000000" d="M373.49,-2709.11C354.69,-2721.3 324.62,-2740.46 298,-2756 292.86,-2759 287.36,-2762.09 281.97,-2765.05"/>
+<polygon fill="#000000" stroke="#000000" points="280.23,-2762.01 273.12,-2769.86 283.57,-2768.16 280.23,-2762.01"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
-<g id="file~~graph~~FileGraph_node57" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_file~~graph~~FileGraph_node57"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="133.5,-2040 30.5,-2040 30.5,-2016 133.5,-2016 133.5,-2040"/>
-<text text-anchor="middle" x="82" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<!-- sourcefile~util_exit.f90 -->
+<g id="file~~graph~~FileGraph_node33" class="node">
+<title>sourcefile~util_exit.f90</title>
+<g id="a_file~~graph~~FileGraph_node33"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="115.5,-318 48.5,-318 48.5,-294 115.5,-294 115.5,-318"/>
+<text text-anchor="middle" x="82" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_discard.f90 -->
-<g id="file~~graph~~FileGraph_edge118" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_discard.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C195.4,-2182.37 214.16,-2081.49 164,-2049 157.71,-2044.93 150.67,-2041.64 143.44,-2039"/>
-<polygon fill="#000000" stroke="#000000" points="144.1,-2035.53 133.5,-2035.76 141.93,-2042.19 144.1,-2035.53"/>
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge101" class="edge">
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M683,-1989C617.81,-1984.36 606.85,-1949.45 541.5,-1949"/>
+<path fill="none" stroke="#000000" d="M803.87,-1962.09C775.68,-1974.63 727.88,-1992.05 685,-1989"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
-<g id="file~~graph~~FileGraph_node71" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_file~~graph~~FileGraph_node71"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="157,-2124 7,-2124 7,-2100 157,-2100 157,-2124"/>
-<text text-anchor="middle" x="82" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<!-- sourcefile~util_fill.f90 -->
+<g id="file~~graph~~FileGraph_node35" class="node">
+<title>sourcefile~util_fill.f90</title>
+<g id="a_file~~graph~~FileGraph_node35"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="112,-276 52,-276 52,-252 112,-252 112,-276"/>
+<text text-anchor="middle" x="82" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_encounter_check.f90 -->
-<g id="file~~graph~~FileGraph_edge146" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_encounter_check.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2154C247.37,-2154.34 187.03,-2138.88 139.51,-2126.62"/>
-<polygon fill="#000000" stroke="#000000" points="140.15,-2123.17 129.59,-2124.06 138.4,-2129.95 140.15,-2123.17"/>
-</g>
-<!-- sourcefile~tides_spin_step.f90 -->
-<g id="file~~graph~~FileGraph_node18" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_file~~graph~~FileGraph_node18"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="134.5,-654 29.5,-654 29.5,-630 134.5,-630 134.5,-654"/>
-<text text-anchor="middle" x="82" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<!-- sourcefile~whm_gr.f90 -->
+<g id="file~~graph~~FileGraph_node36" class="node">
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_file~~graph~~FileGraph_node36"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-2376 48,-2376 48,-2352 116,-2352 116,-2376"/>
+<text text-anchor="middle" x="82" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
-<g id="file~~graph~~FileGraph_node19" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_file~~graph~~FileGraph_node19"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="137.5,-612 26.5,-612 26.5,-588 137.5,-588 137.5,-612"/>
-<text text-anchor="middle" x="82" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<!-- sourcefile~util_get_energy_momentum.f90 -->
+<g id="file~~graph~~FileGraph_node37" class="node">
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_file~~graph~~FileGraph_node37"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164,-234 0,-234 0,-210 164,-210 164,-234"/>
+<text text-anchor="middle" x="82" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
-<g id="file~~graph~~FileGraph_node20" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_file~~graph~~FileGraph_node20"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="133.5,-1116 30.5,-1116 30.5,-1092 133.5,-1092 133.5,-1116"/>
-<text text-anchor="middle" x="82" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<!-- sourcefile~drift.f90 -->
+<g id="file~~graph~~FileGraph_node38" class="node">
+<title>sourcefile~drift.f90</title>
+<g id="a_file~~graph~~FileGraph_node38"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-192 55,-192 55,-168 109,-168 109,-192"/>
+<text text-anchor="middle" x="82" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
-<g id="file~~graph~~FileGraph_node24" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_file~~graph~~FileGraph_node24"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129.5,-570 34.5,-570 34.5,-546 129.5,-546 129.5,-570"/>
-<text text-anchor="middle" x="82" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<!-- sourcefile~swiftest_driver.f90 -->
+<g id="file~~graph~~FileGraph_node39" class="node">
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_file~~graph~~FileGraph_node39"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="131,-1578 33,-1578 33,-1554 131,-1554 131,-1578"/>
+<text text-anchor="middle" x="82" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
-<g id="file~~graph~~FileGraph_node27" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_file~~graph~~FileGraph_node27"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-1746 43.5,-1746 43.5,-1722 120.5,-1722 120.5,-1746"/>
-<text text-anchor="middle" x="82" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
-</a>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge98" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M539.5,-1949C507.17,-1948.78 415.51,-1972.14 394,-1948"/>
+<path fill="none" stroke="#000000" d="M642.52,-1923.05C604.4,-1934.21 551.67,-1949.07 541.5,-1949"/>
+<path fill="none" stroke="#000000" d="M392,-1948C271.58,-1812.82 253.26,-1577.91 250.49,-1504.55"/>
+<polygon fill="#000000" stroke="#000000" points="253.98,-1504.09 250.16,-1494.2 246.98,-1504.31 253.98,-1504.09"/>
 </g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge20" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_setup.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2532C205.66,-2551.62 206.05,-2574.76 164,-2595 154.97,-2599.35 144.92,-2602.88 135.06,-2605.71"/>
+<polygon fill="#000000" stroke="#000000" points="134.06,-2602.36 125.31,-2608.32 135.87,-2609.12 134.06,-2602.36"/>
 </g>
-<!-- sourcefile~gr.f90 -->
-<g id="file~~graph~~FileGraph_node29" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_file~~graph~~FileGraph_node29"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-528 55,-528 55,-504 109,-504 109,-528"/>
-<text text-anchor="middle" x="82" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
-</a>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_io.f90 -->
+<g id="file~~graph~~FileGraph_edge22" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_io.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2532C208.75,-2550.19 160.45,-2561.31 126.27,-2567.5"/>
+<polygon fill="#000000" stroke="#000000" points="125.4,-2564.1 116.15,-2569.26 126.6,-2570.99 125.4,-2564.1"/>
 </g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_step.f90 -->
+<g id="file~~graph~~FileGraph_edge28" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_step.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2532C211.96,-2548.7 166.56,-2547.31 132.51,-2542.53"/>
+<polygon fill="#000000" stroke="#000000" points="132.74,-2539.02 122.33,-2540.95 131.67,-2545.94 132.74,-2539.02"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
-<g id="file~~graph~~FileGraph_node30" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_file~~graph~~FileGraph_node30"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="138,-1368 26,-1368 26,-1344 138,-1344 138,-1368"/>
-<text text-anchor="middle" x="82" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
-</a>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_util.f90 -->
+<g id="file~~graph~~FileGraph_edge34" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_util.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2532C247.3,-2532.33 176.91,-2514.25 128.3,-2501.71"/>
+<polygon fill="#000000" stroke="#000000" points="129.16,-2498.32 118.6,-2499.21 127.41,-2505.1 129.16,-2498.32"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge44" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_kick.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2532C205.66,-2551.62 206.05,-2489.24 164,-2469 153.78,-2464.08 142.25,-2460.21 131.17,-2457.2"/>
+<polygon fill="#000000" stroke="#000000" points="131.73,-2453.73 121.17,-2454.68 130.02,-2460.52 131.73,-2453.73"/>
 </g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_discard.f90 -->
+<g id="file~~graph~~FileGraph_edge60" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_discard.f90</title>
+<path fill="none" stroke="#000000" d="M386.55,-2374.14C370.96,-2407.16 322.57,-2498.36 250,-2532"/>
+<path fill="none" stroke="#000000" d="M248,-2532C193.78,-2557.13 214.16,-2459.49 164,-2427 156.47,-2422.12 147.86,-2418.38 139.13,-2415.5"/>
+<polygon fill="#000000" stroke="#000000" points="139.85,-2412.06 129.27,-2412.6 137.88,-2418.78 139.85,-2412.06"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
-<g id="file~~graph~~FileGraph_node31" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_file~~graph~~FileGraph_node31"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120,-486 44,-486 44,-462 120,-462 120,-486"/>
-<text text-anchor="middle" x="82" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<!-- sourcefile~rmvs_encounter_check.f90 -->
+<g id="file~~graph~~FileGraph_node49" class="node">
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_file~~graph~~FileGraph_node49"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="153,-2670 11,-2670 11,-2646 153,-2646 153,-2670"/>
+<text text-anchor="middle" x="82" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90 -->
-<g id="file~~graph~~FileGraph_node32" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_file~~graph~~FileGraph_node32"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109.5,-444 54.5,-444 54.5,-420 109.5,-420 109.5,-444"/>
-<text text-anchor="middle" x="82" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
-</a>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90 -->
+<g id="file~~graph~~FileGraph_edge92" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2532C193.78,-2557.13 214.16,-2604.51 164,-2637 161.26,-2638.78 158.37,-2640.4 155.39,-2641.89"/>
+<polygon fill="#000000" stroke="#000000" points="153.92,-2638.72 146.19,-2645.96 156.75,-2645.12 153.92,-2638.72"/>
 </g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge104" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M389.97,-2349.81C382.48,-2304.66 355.62,-2142.65 334,-2009 317.75,-1908.59 314.01,-1883.44 298,-1783 281.35,-1678.55 261.44,-1553.71 253.51,-1503.99"/>
+<polygon fill="#000000" stroke="#000000" points="256.95,-1503.37 251.92,-1494.04 250.04,-1504.47 256.95,-1503.37"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
-<g id="file~~graph~~FileGraph_node33" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_file~~graph~~FileGraph_node33"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-1914 48,-1914 48,-1890 116,-1890 116,-1914"/>
-<text text-anchor="middle" x="82" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<!-- sourcefile~whm_util.f90 -->
+<g id="file~~graph~~FileGraph_node42" class="node">
+<title>sourcefile~whm_util.f90</title>
+<g id="a_file~~graph~~FileGraph_node42"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="118.5,-2334 45.5,-2334 45.5,-2310 118.5,-2310 118.5,-2334"/>
+<text text-anchor="middle" x="82" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
-<g id="file~~graph~~FileGraph_node34" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_file~~graph~~FileGraph_node34"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-1704 39.5,-1704 39.5,-1680 124.5,-1680 124.5,-1704"/>
-<text text-anchor="middle" x="82" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<!-- sourcefile~util_spill.f90 -->
+<g id="file~~graph~~FileGraph_node43" class="node">
+<title>sourcefile~util_spill.f90</title>
+<g id="a_file~~graph~~FileGraph_node43"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-150 48,-150 48,-126 116,-126 116,-150"/>
+<text text-anchor="middle" x="82" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_step.f90 -->
-<g id="file~~graph~~FileGraph_node35" class="node">
+<g id="file~~graph~~FileGraph_node44" class="node">
 <title>sourcefile~whm_step.f90</title>
-<g id="a_file~~graph~~FileGraph_node35"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-1662 42.5,-1662 42.5,-1638 121.5,-1638 121.5,-1662"/>
-<text text-anchor="middle" x="82" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<g id="a_file~~graph~~FileGraph_node44"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-2292 42.5,-2292 42.5,-2268 121.5,-2268 121.5,-2292"/>
+<text text-anchor="middle" x="82" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge1" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_setup.f90</title>
-<path fill="none" stroke="#000000" d="M241.12,-1576.16C230.03,-1596.49 208.58,-1638.99 200,-1678 187.54,-1734.63 200.27,-2675.76 164,-2721 156.76,-2730.03 146.18,-2735.47 135.05,-2738.69"/>
-<polygon fill="#000000" stroke="#000000" points="134.14,-2735.31 125.18,-2740.97 135.72,-2742.12 134.14,-2735.31"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_set.f90 -->
+<g id="file~~graph~~FileGraph_edge11" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_set.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1335C209.77,-1332.61 166.86,-1327.05 134.38,-1322.26"/>
+<polygon fill="#000000" stroke="#000000" points="134.63,-1318.76 124.22,-1320.74 133.59,-1325.68 134.63,-1318.76"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_spill.f90 -->
-<g id="file~~graph~~FileGraph_edge4" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_spill.f90</title>
-<path fill="none" stroke="#000000" d="M215.91,-1552.53C209.66,-1548.84 203.86,-1544.08 200,-1538 125.63,-1420.95 252,-1022.18 164,-915 154.8,-903.8 140.47,-898.14 126.4,-895.4"/>
-<polygon fill="#000000" stroke="#000000" points="126.69,-891.9 116.28,-893.89 125.65,-898.83 126.69,-891.9"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge17" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_setup.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1335C206.34,-1332.39 203.08,-1307.65 164,-1293 156.36,-1290.14 148.17,-1287.52 140.05,-1285.18"/>
+<polygon fill="#000000" stroke="#000000" points="140.78,-1281.75 130.21,-1282.46 138.92,-1288.49 140.78,-1281.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_drift.f90 -->
-<g id="file~~graph~~FileGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_drift.f90</title>
-<path fill="none" stroke="#000000" d="M242.88,-1576.01C225.23,-1617.41 167.73,-1751.82 164,-1755 154.58,-1763.02 142.46,-1768.02 130.49,-1771.14"/>
-<polygon fill="#000000" stroke="#000000" points="129.54,-1767.76 120.52,-1773.33 131.04,-1774.6 129.54,-1767.76"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_util.f90 -->
+<g id="file~~graph~~FileGraph_edge31" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_util.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1335C195.31,-1331.7 209.83,-1277.21 164,-1251 154.73,-1245.7 144.11,-1241.71 133.67,-1238.72"/>
+<polygon fill="#000000" stroke="#000000" points="134.33,-1235.27 123.77,-1236.14 132.57,-1242.05 134.33,-1235.27"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_set.f90 -->
-<g id="file~~graph~~FileGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_set.f90</title>
-<path fill="none" stroke="#000000" d="M215.59,-1552.12C209.52,-1548.48 203.88,-1543.84 200,-1538 154.22,-1468.97 217.8,-1229.98 164,-1167 156.41,-1158.11 145.59,-1152.74 134.33,-1149.55"/>
-<polygon fill="#000000" stroke="#000000" points="134.91,-1146.09 124.38,-1147.27 133.35,-1152.91 134.91,-1146.09"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_generate.f90 -->
+<g id="file~~graph~~FileGraph_edge37" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_generate.f90</title>
+<path fill="none" stroke="#000000" d="M521.78,-1429.83C504.58,-1418.48 477.44,-1401.73 452,-1391 366.16,-1354.8 342.98,-1340.82 250,-1335"/>
+<path fill="none" stroke="#000000" d="M248,-1335C181.77,-1323.05 218.85,-1248.01 164,-1209 159.07,-1205.49 153.6,-1202.57 147.9,-1200.14"/>
+<polygon fill="#000000" stroke="#000000" points="148.73,-1196.71 138.14,-1196.49 146.28,-1203.27 148.73,-1196.71"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~obl.f90 -->
-<g id="file~~graph~~FileGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~obl.f90</title>
-<path fill="none" stroke="#000000" d="M215.89,-1552.54C209.65,-1548.85 203.85,-1544.09 200,-1538 120.86,-1412.94 257.7,-987.55 164,-873 153.29,-859.9 135.55,-854.38 119.4,-852.24"/>
-<polygon fill="#000000" stroke="#000000" points="119.39,-848.73 109.11,-851.28 118.74,-855.7 119.39,-848.73"/>
+<!-- sourcefile~fraggle_regime.f90 -->
+<g id="file~~graph~~FileGraph_node47" class="node">
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_file~~graph~~FileGraph_node47"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="133.5,-1452 30.5,-1452 30.5,-1428 133.5,-1428 133.5,-1452"/>
+<text text-anchor="middle" x="82" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+</a>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_io.f90 -->
-<g id="file~~graph~~FileGraph_edge15" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_io.f90</title>
-<path fill="none" stroke="#000000" d="M241.26,-1576.19C230.37,-1596.56 209.21,-1639.13 200,-1678 186.16,-1736.41 202.29,-2170.78 164,-2217 155.66,-2227.06 143.18,-2232.65 130.5,-2235.66"/>
-<polygon fill="#000000" stroke="#000000" points="129.55,-2232.27 120.37,-2237.56 130.84,-2239.15 129.55,-2232.27"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~drift.f90 -->
-<g id="file~~graph~~FileGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~drift.f90</title>
-<path fill="none" stroke="#000000" d="M215.88,-1552.55C209.63,-1548.86 203.84,-1544.09 200,-1538 116.09,-1404.93 263.41,-952.93 164,-831 153.31,-817.88 135.57,-812.36 119.42,-810.23"/>
-<polygon fill="#000000" stroke="#000000" points="119.41,-806.71 109.13,-809.27 118.76,-813.68 119.41,-806.71"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_regime.f90 -->
+<g id="file~~graph~~FileGraph_edge87" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_regime.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1335C195.31,-1331.7 209.83,-1392.79 164,-1419 157.67,-1422.62 150.71,-1425.63 143.61,-1428.12"/>
+<polygon fill="#000000" stroke="#000000" points="142.35,-1424.85 133.88,-1431.22 144.48,-1431.52 142.35,-1424.85"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_drift.f90 -->
-<g id="file~~graph~~FileGraph_edge19" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_drift.f90</title>
-<path fill="none" stroke="#000000" d="M241.22,-1576.18C230.28,-1596.54 209.03,-1639.09 200,-1678 184.32,-1745.54 208,-2247.41 164,-2301 156.66,-2309.94 146.04,-2315.36 134.9,-2318.57"/>
-<polygon fill="#000000" stroke="#000000" points="133.99,-2315.18 125.04,-2320.86 135.57,-2322 133.99,-2315.18"/>
+<!-- sourcefile~fraggle_placeholder.f90 -->
+<g id="file~~graph~~FileGraph_node48" class="node">
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_file~~graph~~FileGraph_node48"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="144,-1410 20,-1410 20,-1386 144,-1386 144,-1410"/>
+<text text-anchor="middle" x="82" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+</a>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~discard.f90 -->
-<g id="file~~graph~~FileGraph_edge21" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~discard.f90</title>
-<path fill="none" stroke="#000000" d="M215.86,-1552.56C209.62,-1548.87 203.83,-1544.1 200,-1538 155.66,-1467.46 216.56,-853.65 164,-789 154.47,-777.28 139.31,-771.61 124.68,-769.02"/>
-<polygon fill="#000000" stroke="#000000" points="125.08,-765.54 114.7,-767.68 124.15,-772.48 125.08,-765.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~io.f90 -->
-<g id="file~~graph~~FileGraph_edge23" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~io.f90</title>
-<path fill="none" stroke="#000000" d="M215.85,-1552.57C209.61,-1548.87 203.83,-1544.1 200,-1538 153.27,-1463.46 219.41,-815.34 164,-747 153.34,-733.86 135.61,-728.33 119.45,-726.2"/>
-<polygon fill="#000000" stroke="#000000" points="119.43,-722.68 109.15,-725.25 118.79,-729.65 119.43,-722.68"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_placeholder.f90 -->
+<g id="file~~graph~~FileGraph_edge89" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_placeholder.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1335C206.34,-1332.39 203.08,-1362.35 164,-1377 158.2,-1379.18 152.08,-1381.21 145.91,-1383.09"/>
+<polygon fill="#000000" stroke="#000000" points="144.84,-1379.75 136.22,-1385.91 146.8,-1386.47 144.84,-1379.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90 -->
-<g id="file~~graph~~FileGraph_edge25" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90</title>
-<path fill="none" stroke="#000000" d="M215.84,-1552.57C209.6,-1548.88 203.82,-1544.11 200,-1538 150.89,-1459.45 222.26,-777.03 164,-705 163.38,-704.23 162.74,-703.49 162.07,-702.78"/>
-<polygon fill="#000000" stroke="#000000" points="164.04,-699.86 154.16,-696.04 159.5,-705.19 164.04,-699.86"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge95" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M487.91,-1447.96C446.3,-1452.9 386.3,-1460.34 334,-1468 320.36,-1470 305.52,-1472.4 292.15,-1474.64"/>
+<polygon fill="#000000" stroke="#000000" points="291.54,-1471.2 282.26,-1476.32 292.71,-1478.1 291.54,-1471.2"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge27" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_setup.f90</title>
-<path fill="none" stroke="#000000" d="M241.6,-1576.28C231.21,-1596.78 210.74,-1639.53 200,-1678 170.41,-1784.01 237.52,-1841.1 164,-1923 156.27,-1931.61 145.51,-1936.9 134.35,-1940.09"/>
-<polygon fill="#000000" stroke="#000000" points="133.44,-1936.71 124.5,-1942.4 135.04,-1943.53 133.44,-1936.71"/>
+<!-- sourcefile~fraggle_io.f90 -->
+<g id="file~~graph~~FileGraph_node59" class="node">
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_file~~graph~~FileGraph_node59"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121,-1368 43,-1368 43,-1344 121,-1344 121,-1368"/>
+<text text-anchor="middle" x="82" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+</a>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_driver.f90 -->
-<g id="file~~graph~~FileGraph_edge28" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_driver.f90</title>
-<path fill="none" stroke="#000000" d="M215.79,-1564.39C194.61,-1564.65 166.27,-1564.99 141.21,-1565.29"/>
-<polygon fill="#000000" stroke="#000000" points="141.03,-1561.8 131.07,-1565.42 141.11,-1568.8 141.03,-1561.8"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_spin_step.f90 -->
-<g id="file~~graph~~FileGraph_edge35" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_spin_step.f90</title>
-<path fill="none" stroke="#000000" d="M215.83,-1552.58C209.59,-1548.89 203.81,-1544.11 200,-1538 148.5,-1455.44 225.12,-738.72 164,-663 158.87,-656.64 152.08,-652.06 144.61,-648.79"/>
-<polygon fill="#000000" stroke="#000000" points="145.46,-645.38 134.86,-645.31 143.1,-651.97 145.46,-645.38"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_io.f90 -->
+<g id="file~~graph~~FileGraph_edge118" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_io.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1335C208.6,-1332.53 164.23,-1338.69 131.43,-1344.96"/>
+<polygon fill="#000000" stroke="#000000" points="130.34,-1341.61 121.21,-1346.99 131.7,-1348.48 130.34,-1341.61"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_getacch_pl.f90 -->
-<g id="file~~graph~~FileGraph_edge37" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_getacch_pl.f90</title>
-<path fill="none" stroke="#000000" d="M215.83,-1552.58C209.58,-1548.89 203.81,-1544.11 200,-1538 146.11,-1451.44 227.97,-700.4 164,-621 159.53,-615.45 153.8,-611.26 147.46,-608.1"/>
-<polygon fill="#000000" stroke="#000000" points="148.38,-604.7 137.8,-604.19 145.75,-611.19 148.38,-604.7"/>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge132" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" d="M503.34,-1454.15C497.34,-1457.71 491.83,-1462.25 488,-1468 426.94,-1559.58 515.15,-1871.85 452,-1962 449.81,-1965.12 447.16,-1967.87 444.21,-1970.3"/>
+<polygon fill="#000000" stroke="#000000" points="442.13,-1967.48 435.81,-1975.99 446.05,-1973.28 442.13,-1967.48"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_regime.f90 -->
-<g id="file~~graph~~FileGraph_edge38" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_regime.f90</title>
-<path fill="none" stroke="#000000" d="M215.55,-1552.15C209.48,-1548.51 203.85,-1543.86 200,-1538 149.46,-1460.97 223.49,-1195.34 164,-1125 158.47,-1118.46 151.19,-1113.82 143.27,-1110.55"/>
-<polygon fill="#000000" stroke="#000000" points="144.32,-1107.21 133.73,-1107.31 142.07,-1113.84 144.32,-1107.21"/>
+<!-- sourcefile~symba_drift.f90 -->
+<g id="file~~graph~~FileGraph_node46" class="node">
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_file~~graph~~FileGraph_node46"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-1746 39,-1746 39,-1722 125,-1722 125,-1746"/>
+<text text-anchor="middle" x="82" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+</a>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_util.f90 -->
-<g id="file~~graph~~FileGraph_edge41" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_util.f90</title>
-<path fill="none" stroke="#000000" d="M241.24,-1576.19C230.32,-1596.55 209.11,-1639.11 200,-1678 185.24,-1740.97 205.15,-2209.1 164,-2259 156.27,-2268.37 144.96,-2273.86 133.22,-2277"/>
-<polygon fill="#000000" stroke="#000000" points="132.37,-2273.61 123.33,-2279.13 133.84,-2280.45 132.37,-2273.61"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge43" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_kick.f90</title>
-<path fill="none" stroke="#000000" d="M241.29,-1576.2C230.43,-1596.58 209.32,-1639.16 200,-1678 174.17,-1785.68 234.89,-2089.93 164,-2175 156.66,-2183.8 146.16,-2189.18 135.13,-2192.4"/>
-<polygon fill="#000000" stroke="#000000" points="134.3,-2189 125.37,-2194.7 135.91,-2195.81 134.3,-2189"/>
+<!-- sourcefile~util_solve.f90 -->
+<g id="file~~graph~~FileGraph_node50" class="node">
+<title>sourcefile~util_solve.f90</title>
+<g id="a_file~~graph~~FileGraph_node50"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-108 44.5,-108 44.5,-84 119.5,-84 119.5,-108"/>
+<text text-anchor="middle" x="82" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge2" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_setup.f90</title>
+<path fill="none" stroke="#000000" d="M246.05,-1494.22C234.92,-1563.71 179.32,-1906.65 164,-1923 157.29,-1930.16 148.49,-1935.01 139.16,-1938.26"/>
+<polygon fill="#000000" stroke="#000000" points="137.95,-1934.96 129.31,-1941.1 139.89,-1941.69 137.95,-1934.96"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~operator_cross.f90 -->
+<g id="file~~graph~~FileGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~operator_cross.f90</title>
+<path fill="none" stroke="#000000" d="M245.5,-1494.26C237.28,-1535.05 211.04,-1670.03 200,-1783 194.7,-1837.22 193.6,-2717.26 164,-2763 157.48,-2773.08 147.61,-2780.71 136.98,-2786.45"/>
+<polygon fill="#000000" stroke="#000000" points="135.4,-2783.33 127.93,-2790.84 138.46,-2789.63 135.4,-2783.33"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_copy.f90 -->
+<g id="file~~graph~~FileGraph_edge5" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_copy.f90</title>
+<path fill="none" stroke="#000000" d="M242.35,-1469.86C231.93,-1446.86 209.87,-1395.09 200,-1349 177.79,-1245.27 232.04,-954.39 164,-873 155.09,-862.34 141.53,-856.72 128.05,-853.85"/>
+<polygon fill="#000000" stroke="#000000" points="128.26,-850.34 117.83,-852.16 127.12,-857.24 128.26,-850.34"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_collision.f90 -->
+<g id="file~~graph~~FileGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_collision.f90</title>
+<path fill="none" stroke="#000000" d="M246.81,-1494.18C241.02,-1550.82 214.08,-1787.78 164,-1839 158.69,-1844.43 152.18,-1848.51 145.17,-1851.58"/>
+<polygon fill="#000000" stroke="#000000" points="143.56,-1848.44 135.37,-1855.16 145.97,-1855.02 143.56,-1848.44"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_valid.f90 -->
+<g id="file~~graph~~FileGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_valid.f90</title>
+<path fill="none" stroke="#000000" d="M242.32,-1469.87C231.86,-1446.87 209.73,-1395.12 200,-1349 188.09,-1292.55 200.87,-875.38 164,-831 155.2,-820.4 141.8,-814.78 128.42,-811.89"/>
+<polygon fill="#000000" stroke="#000000" points="128.72,-808.39 118.27,-810.18 127.55,-815.29 128.72,-808.39"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_set.f90 -->
+<g id="file~~graph~~FileGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_set.f90</title>
+<path fill="none" stroke="#000000" d="M244.66,-1469.95C236.2,-1441.74 211.17,-1371.06 164,-1335 155.25,-1328.31 144.58,-1323.74 133.9,-1320.63"/>
+<polygon fill="#000000" stroke="#000000" points="134.69,-1317.22 124.14,-1318.15 132.97,-1324 134.69,-1317.22"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_set.f90 -->
+<g id="file~~graph~~FileGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_set.f90</title>
+<path fill="none" stroke="#000000" d="M242.3,-1469.87C231.8,-1446.88 209.61,-1395.14 200,-1349 187.29,-1287.96 203.72,-837.06 164,-789 154.3,-777.26 138.96,-771.62 124.24,-769.04"/>
+<polygon fill="#000000" stroke="#000000" points="124.58,-765.56 114.21,-767.71 123.66,-772.5 124.58,-765.56"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~obl.f90 -->
+<g id="file~~graph~~FileGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~obl.f90</title>
+<path fill="none" stroke="#000000" d="M242.28,-1469.87C231.75,-1446.89 209.5,-1395.16 200,-1349 186.49,-1283.37 206.57,-798.75 164,-747 153.25,-733.93 135.51,-728.41 119.37,-726.27"/>
+<polygon fill="#000000" stroke="#000000" points="119.37,-722.75 109.09,-725.31 118.72,-729.72 119.37,-722.75"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge18" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_setup.f90</title>
+<path fill="none" stroke="#000000" d="M244.16,-1469.89C231.95,-1432.15 193.17,-1317.73 164,-1293 157,-1287.07 148.53,-1282.78 139.73,-1279.7"/>
+<polygon fill="#000000" stroke="#000000" points="140.69,-1276.33 130.11,-1276.8 138.67,-1283.03 140.69,-1276.33"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge19" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_setup.f90</title>
+<path fill="none" stroke="#000000" d="M245.53,-1494.26C237.42,-1535.07 211.47,-1670.07 200,-1783 190.87,-1872.85 220.84,-2524.82 164,-2595 156.72,-2603.99 146.12,-2609.42 134.98,-2612.64"/>
+<polygon fill="#000000" stroke="#000000" points="134.07,-2609.25 125.12,-2614.92 135.66,-2616.07 134.07,-2609.25"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_io.f90 -->
-<g id="file~~graph~~FileGraph_edge44" class="edge">
+<g id="file~~graph~~FileGraph_edge21" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_io.f90</title>
-<path fill="none" stroke="#000000" d="M241.14,-1576.16C230.08,-1596.5 208.67,-1639.01 200,-1678 177.86,-1777.53 227.97,-2515.6 164,-2595 154.91,-2606.29 140.6,-2611.97 126.52,-2614.69"/>
-<polygon fill="#000000" stroke="#000000" points="125.76,-2611.27 116.38,-2616.2 126.79,-2618.19 125.76,-2611.27"/>
+<path fill="none" stroke="#000000" d="M245.54,-1494.26C237.46,-1535.07 211.61,-1670.09 200,-1783 191.24,-1868.2 217.98,-2486.51 164,-2553 154.86,-2564.25 140.54,-2569.93 126.47,-2572.66"/>
+<polygon fill="#000000" stroke="#000000" points="125.72,-2569.23 116.34,-2574.16 126.75,-2576.15 125.72,-2569.23"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~user_getacch.f90 -->
-<g id="file~~graph~~FileGraph_edge47" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~user_getacch.f90</title>
-<path fill="none" stroke="#000000" d="M215.82,-1552.59C209.58,-1548.89 203.8,-1544.12 200,-1538 143.73,-1447.43 230.83,-662.09 164,-579 157.72,-571.19 148.94,-566.06 139.46,-562.74"/>
-<polygon fill="#000000" stroke="#000000" points="140.4,-559.37 129.82,-559.99 138.48,-566.1 140.4,-559.37"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_spin_step.f90 -->
+<g id="file~~graph~~FileGraph_edge23" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_spin_step.f90</title>
+<path fill="none" stroke="#000000" d="M242.27,-1469.88C231.71,-1446.9 209.41,-1395.18 200,-1349 185.68,-1278.78 209.42,-760.43 164,-705 158.82,-698.68 152.01,-694.12 144.53,-690.86"/>
+<polygon fill="#000000" stroke="#000000" points="145.36,-687.44 134.77,-687.38 143.01,-694.04 145.36,-687.44"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge48" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_kick.f90</title>
-<path fill="none" stroke="#000000" d="M241.15,-1576.17C230.1,-1596.5 208.71,-1639.02 200,-1678 178.78,-1772.96 225.12,-2477.28 164,-2553 155.94,-2562.99 143.79,-2568.59 131.33,-2571.63"/>
-<polygon fill="#000000" stroke="#000000" points="130.51,-2568.22 121.35,-2573.56 131.84,-2575.1 130.51,-2568.22"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge26" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_kick.f90</title>
+<path fill="none" stroke="#000000" d="M246.4,-1494.14C239.28,-1546.51 208.78,-1752.53 164,-1797 156.11,-1804.84 145.69,-1809.87 134.97,-1813.06"/>
+<polygon fill="#000000" stroke="#000000" points="133.96,-1809.71 125.09,-1815.51 135.64,-1816.5 133.96,-1809.71"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90 -->
-<g id="file~~graph~~FileGraph_edge50" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90</title>
-<path fill="none" stroke="#000000" d="M241.16,-1576.17C230.12,-1596.51 208.75,-1639.03 200,-1678 179.71,-1768.39 222.26,-2438.97 164,-2511 163.03,-2512.2 162,-2513.34 160.92,-2514.41"/>
-<polygon fill="#000000" stroke="#000000" points="158.71,-2511.7 153.09,-2520.68 163.08,-2517.16 158.71,-2511.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_step.f90 -->
+<g id="file~~graph~~FileGraph_edge27" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_step.f90</title>
+<path fill="none" stroke="#000000" d="M245.55,-1494.27C237.51,-1535.08 211.76,-1670.1 200,-1783 191.61,-1863.55 215.13,-2448.19 164,-2511 156.04,-2520.78 144.17,-2526.34 131.95,-2529.42"/>
+<polygon fill="#000000" stroke="#000000" points="131.26,-2525.99 122.14,-2531.39 132.64,-2532.85 131.26,-2525.99"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge53" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_kick.f90</title>
-<path fill="none" stroke="#000000" d="M244.71,-1576.21C236.36,-1604.8 211.55,-1676.43 164,-1713 154.37,-1720.4 142.4,-1725.21 130.63,-1728.33"/>
-<polygon fill="#000000" stroke="#000000" points="129.82,-1724.92 120.85,-1730.57 131.38,-1731.75 129.82,-1724.92"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_getacch_pl.f90 -->
+<g id="file~~graph~~FileGraph_edge29" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~tides_getacch_pl.f90</title>
+<path fill="none" stroke="#000000" d="M242.25,-1469.88C231.67,-1446.91 209.34,-1395.2 200,-1349 184.88,-1274.19 212.28,-722.12 164,-663 159.49,-657.48 153.74,-653.31 147.38,-650.16"/>
+<polygon fill="#000000" stroke="#000000" points="148.3,-646.76 137.71,-646.26 145.68,-653.25 148.3,-646.76"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_discard.f90 -->
-<g id="file~~graph~~FileGraph_edge54" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_discard.f90</title>
-<path fill="none" stroke="#000000" d="M241.17,-1576.17C230.15,-1596.51 208.79,-1639.04 200,-1678 180.63,-1763.82 219.41,-2400.66 164,-2469 157.62,-2476.87 148.7,-2482.01 139.1,-2485.33"/>
-<polygon fill="#000000" stroke="#000000" points="138.03,-2481.99 129.35,-2488.06 139.92,-2488.73 138.03,-2481.99"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_util.f90 -->
+<g id="file~~graph~~FileGraph_edge32" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_util.f90</title>
+<path fill="none" stroke="#000000" d="M243.66,-1469.96C226.62,-1422.65 165.09,-1251.99 164,-1251 155.61,-1243.37 144.8,-1238.44 133.82,-1235.27"/>
+<polygon fill="#000000" stroke="#000000" points="134.31,-1231.79 123.77,-1232.83 132.66,-1238.59 134.31,-1231.79"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~gr.f90 -->
-<g id="file~~graph~~FileGraph_edge57" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~gr.f90</title>
-<path fill="none" stroke="#000000" d="M215.81,-1552.59C209.57,-1548.9 203.8,-1544.12 200,-1538 141.34,-1443.42 233.68,-623.78 164,-537 153.41,-523.8 135.68,-518.27 119.51,-516.16"/>
-<polygon fill="#000000" stroke="#000000" points="119.48,-512.64 109.2,-515.21 118.84,-519.61 119.48,-512.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_util.f90 -->
+<g id="file~~graph~~FileGraph_edge33" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_util.f90</title>
+<path fill="none" stroke="#000000" d="M245.57,-1494.27C237.57,-1535.08 211.93,-1670.12 200,-1783 191.98,-1858.9 212.28,-2409.88 164,-2469 155.36,-2479.58 142.14,-2485.22 128.87,-2488.12"/>
+<polygon fill="#000000" stroke="#000000" points="128.05,-2484.71 118.78,-2489.85 129.23,-2491.61 128.05,-2484.71"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_coord.f90 -->
+<g id="file~~graph~~FileGraph_edge36" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_coord.f90</title>
+<path fill="none" stroke="#000000" d="M245.51,-1494.26C237.34,-1535.06 211.24,-1670.05 200,-1783 195.07,-1832.57 195.27,-2640.22 164,-2679 156.74,-2688.01 146.15,-2693.44 135.01,-2696.66"/>
+<polygon fill="#000000" stroke="#000000" points="134.1,-2693.28 125.15,-2698.94 135.68,-2700.1 134.1,-2693.28"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_generate.f90 -->
-<g id="file~~graph~~FileGraph_edge58" class="edge">
+<g id="file~~graph~~FileGraph_edge38" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_generate.f90</title>
-<path fill="none" stroke="#000000" d="M216.13,-1551.75C210.02,-1548.13 204.23,-1543.6 200,-1538 155.79,-1479.5 214.97,-1429.71 164,-1377 159.43,-1372.27 153.94,-1368.56 148,-1365.65"/>
-<polygon fill="#000000" stroke="#000000" points="148.95,-1362.25 138.37,-1361.71 146.3,-1368.73 148.95,-1362.25"/>
+<path fill="none" stroke="#000000" d="M243.1,-1469.66C233.94,-1446.33 213.88,-1394.04 200,-1349 181.07,-1287.6 209.38,-1254.47 164,-1209 159.35,-1204.34 153.82,-1200.68 147.85,-1197.8"/>
+<polygon fill="#000000" stroke="#000000" points="148.77,-1194.39 138.18,-1193.89 146.14,-1200.88 148.77,-1194.39"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_index.f90 -->
-<g id="file~~graph~~FileGraph_edge61" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_index.f90</title>
-<path fill="none" stroke="#000000" d="M215.8,-1552.6C209.56,-1548.9 203.79,-1544.12 200,-1538 138.95,-1439.41 236.54,-585.47 164,-495 155.67,-484.61 142.93,-478.97 129.99,-476.01"/>
-<polygon fill="#000000" stroke="#000000" points="130.6,-472.56 120.14,-474.23 129.36,-479.45 130.6,-472.56"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_resize.f90 -->
+<g id="file~~graph~~FileGraph_edge39" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_resize.f90</title>
+<path fill="none" stroke="#000000" d="M242.24,-1469.88C231.63,-1446.92 209.27,-1395.21 200,-1349 184.08,-1269.59 215.13,-683.81 164,-621 155.97,-611.13 143.95,-605.56 131.61,-602.5"/>
+<polygon fill="#000000" stroke="#000000" points="132.21,-599.05 121.72,-600.54 130.86,-605.91 132.21,-599.05"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90 -->
-<g id="file~~graph~~FileGraph_edge63" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90</title>
-<path fill="none" stroke="#000000" d="M215.8,-1552.6C209.56,-1548.91 203.79,-1544.13 200,-1538 136.57,-1435.41 239.39,-547.16 164,-453 153.5,-439.88 135.95,-434.33 119.87,-432.19"/>
-<polygon fill="#000000" stroke="#000000" points="119.88,-428.67 109.6,-431.23 119.23,-435.64 119.88,-428.67"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~gr.f90 -->
+<g id="file~~graph~~FileGraph_edge41" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~gr.f90</title>
+<path fill="none" stroke="#000000" d="M242.23,-1469.89C231.6,-1446.92 209.2,-1395.22 200,-1349 183.27,-1265 217.98,-645.49 164,-579 153.33,-565.86 135.6,-560.33 119.45,-558.21"/>
+<polygon fill="#000000" stroke="#000000" points="119.43,-554.69 109.15,-557.26 118.78,-561.66 119.43,-554.69"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge43" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_kick.f90</title>
+<path fill="none" stroke="#000000" d="M245.58,-1494.27C237.63,-1535.09 212.12,-1670.14 200,-1783 192.35,-1854.26 209.42,-2371.57 164,-2427 155.86,-2436.93 143.69,-2442.51 131.24,-2445.55"/>
+<polygon fill="#000000" stroke="#000000" points="130.42,-2442.15 121.27,-2447.49 131.75,-2449.02 130.42,-2442.15"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_gr.f90 -->
-<g id="file~~graph~~FileGraph_edge65" class="edge">
+<g id="file~~graph~~FileGraph_edge46" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_gr.f90</title>
-<path fill="none" stroke="#000000" d="M241.73,-1576.32C231.52,-1596.87 211.31,-1639.69 200,-1678 174.06,-1765.88 226.21,-1813.73 164,-1881 154.24,-1891.56 139.92,-1897.09 126.02,-1899.91"/>
-<polygon fill="#000000" stroke="#000000" points="125.37,-1896.47 116.05,-1901.51 126.48,-1903.38 125.37,-1896.47"/>
+<path fill="none" stroke="#000000" d="M245.9,-1494.02C238.84,-1534.59 215.57,-1670.3 200,-1783 190.57,-1851.26 209.27,-2039.04 164,-2091 154.55,-2101.84 140.3,-2107.44 126.38,-2110.23"/>
+<polygon fill="#000000" stroke="#000000" points="125.7,-2106.79 116.37,-2111.79 126.79,-2113.7 125.7,-2106.79"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge67" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_setup.f90</title>
-<path fill="none" stroke="#000000" d="M241.99,-1576.06C230.22,-1598.4 201.94,-1646.17 164,-1671 155.16,-1676.79 144.8,-1680.98 134.5,-1684.02"/>
-<polygon fill="#000000" stroke="#000000" points="133.48,-1680.67 124.7,-1686.59 135.26,-1687.44 133.48,-1680.67"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_step.f90 -->
-<g id="file~~graph~~FileGraph_edge69" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_step.f90</title>
-<path fill="none" stroke="#000000" d="M235.73,-1576.15C220.28,-1590.78 192.31,-1615.11 164,-1629 153.91,-1633.95 142.53,-1637.82 131.55,-1640.82"/>
-<polygon fill="#000000" stroke="#000000" points="130.47,-1637.49 121.64,-1643.33 132.19,-1644.27 130.47,-1637.49"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_sort.f90 -->
+<g id="file~~graph~~FileGraph_edge47" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_sort.f90</title>
+<path fill="none" stroke="#000000" d="M242.22,-1469.89C231.57,-1446.93 209.15,-1395.24 200,-1349 182.47,-1260.41 220.84,-607.18 164,-537 154.88,-525.74 140.56,-520.06 126.48,-517.33"/>
+<polygon fill="#000000" stroke="#000000" points="126.76,-513.83 116.36,-515.83 125.73,-520.76 126.76,-513.83"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
-<g id="file~~graph~~FileGraph_node37" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_file~~graph~~FileGraph_node37"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-402 39,-402 39,-378 125,-378 125,-402"/>
-<text text-anchor="middle" x="82" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_discard.f90 -->
+<g id="file~~graph~~FileGraph_edge50" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_discard.f90</title>
+<path fill="none" stroke="#000000" d="M248.16,-1494.19C248.02,-1536.85 241.6,-1680.81 164,-1755 158.1,-1760.64 150.89,-1764.81 143.23,-1767.9"/>
+<polygon fill="#000000" stroke="#000000" points="142.06,-1764.6 133.72,-1771.14 144.32,-1771.22 142.06,-1764.6"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_minimize_bfgs.f90 -->
+<g id="file~~graph~~FileGraph_edge51" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_minimize_bfgs.f90</title>
+<path fill="none" stroke="#000000" d="M242.21,-1469.89C231.55,-1446.94 209.1,-1395.25 200,-1349 181.67,-1255.81 223.69,-568.87 164,-495 160.2,-490.29 155.49,-486.56 150.27,-483.62"/>
+<polygon fill="#000000" stroke="#000000" points="151.62,-480.38 141.07,-479.36 148.68,-486.74 151.62,-480.38"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_append.f90 -->
-<g id="file~~graph~~FileGraph_edge81" class="edge">
+<g id="file~~graph~~FileGraph_edge53" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_append.f90</title>
-<path fill="none" stroke="#000000" d="M215.79,-1552.6C209.55,-1548.91 203.78,-1544.13 200,-1538 134.18,-1431.4 242.24,-508.85 164,-411 156.77,-401.96 146.2,-396.51 135.06,-393.3"/>
-<polygon fill="#000000" stroke="#000000" points="135.73,-389.86 125.2,-391.01 134.15,-396.68 135.73,-389.86"/>
+<path fill="none" stroke="#000000" d="M242.2,-1469.89C231.53,-1446.94 209.05,-1395.25 200,-1349 180.86,-1251.22 226.54,-530.56 164,-453 156.74,-443.99 146.15,-438.56 135.01,-435.34"/>
+<polygon fill="#000000" stroke="#000000" points="135.68,-431.9 125.15,-433.06 134.1,-438.72 135.68,-431.9"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
-<g id="file~~graph~~FileGraph_node38" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_file~~graph~~FileGraph_node38"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="112,-360 52,-360 52,-336 112,-336 112,-360"/>
-<text text-anchor="middle" x="82" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_index.f90 -->
+<g id="file~~graph~~FileGraph_edge55" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_index.f90</title>
+<path fill="none" stroke="#000000" d="M242.19,-1469.89C231.51,-1446.94 209.01,-1395.26 200,-1349 180.06,-1246.62 229.4,-492.25 164,-411 155.65,-400.63 142.9,-394.99 129.97,-392.03"/>
+<polygon fill="#000000" stroke="#000000" points="130.58,-388.58 120.12,-390.25 129.33,-395.47 130.58,-388.58"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_rescale.f90 -->
+<g id="file~~graph~~FileGraph_edge57" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_rescale.f90</title>
+<path fill="none" stroke="#000000" d="M242.18,-1469.89C231.49,-1446.95 208.97,-1395.27 200,-1349 189.63,-1295.52 198.13,-411.47 164,-369 156.68,-359.89 145.96,-354.43 134.71,-351.23"/>
+<polygon fill="#000000" stroke="#000000" points="135.28,-347.77 124.75,-348.96 133.72,-354.6 135.28,-347.77"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~netcdf.f90 -->
-<g id="file~~graph~~FileGraph_edge83" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~netcdf.f90</title>
-<path fill="none" stroke="#000000" d="M215.79,-1552.61C209.55,-1548.91 203.78,-1544.13 200,-1538 131.79,-1427.39 245.1,-470.54 164,-369 154.13,-356.64 138,-351 122.73,-348.59"/>
-<polygon fill="#000000" stroke="#000000" points="122.71,-345.07 112.38,-347.4 121.91,-352.02 122.71,-345.07"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_discard.f90 -->
+<g id="file~~graph~~FileGraph_edge59" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_discard.f90</title>
+<path fill="none" stroke="#000000" d="M245.6,-1494.27C237.7,-1535.1 212.34,-1670.17 200,-1783 192.71,-1849.61 206.57,-2333.25 164,-2385 157.56,-2392.83 148.62,-2397.95 139.01,-2401.25"/>
+<polygon fill="#000000" stroke="#000000" points="137.94,-2397.92 129.26,-2403.99 139.83,-2404.66 137.94,-2397.92"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
-<g id="file~~graph~~FileGraph_node39" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_file~~graph~~FileGraph_node39"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123.5,-1326 40.5,-1326 40.5,-1302 123.5,-1302 123.5,-1326"/>
-<text text-anchor="middle" x="82" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_exit.f90 -->
+<g id="file~~graph~~FileGraph_edge62" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_exit.f90</title>
+<path fill="none" stroke="#000000" d="M242.18,-1469.9C231.47,-1446.95 208.94,-1395.28 200,-1349 189.23,-1293.22 199.55,-371.31 164,-327 154.78,-315.51 140.16,-309.83 125.86,-307.16"/>
+<polygon fill="#000000" stroke="#000000" points="125.98,-303.64 115.59,-305.7 125,-310.57 125.98,-303.64"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_fill.f90 -->
+<g id="file~~graph~~FileGraph_edge65" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_fill.f90</title>
+<path fill="none" stroke="#000000" d="M242.17,-1469.9C231.45,-1446.95 208.91,-1395.28 200,-1349 188.82,-1290.92 200.98,-331.16 164,-285 154.11,-272.66 137.98,-267.01 122.71,-264.6"/>
+<polygon fill="#000000" stroke="#000000" points="122.7,-261.08 112.36,-263.41 121.89,-268.03 122.7,-261.08"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_util.f90 -->
-<g id="file~~graph~~FileGraph_edge84" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_util.f90</title>
-<path fill="none" stroke="#000000" d="M215.94,-1551.89C209.84,-1548.26 204.1,-1543.69 200,-1538 146.39,-1463.69 226.21,-1402.27 164,-1335 156.07,-1326.42 145.12,-1321.16 133.84,-1317.98"/>
-<polygon fill="#000000" stroke="#000000" points="134.44,-1314.52 123.91,-1315.69 132.87,-1321.35 134.44,-1314.52"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_gr.f90 -->
+<g id="file~~graph~~FileGraph_edge68" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_gr.f90</title>
+<path fill="none" stroke="#000000" d="M245.62,-1494.27C237.78,-1535.11 212.59,-1670.19 200,-1783 193.08,-1844.97 203.72,-2294.94 164,-2343 154.77,-2354.17 140.42,-2359.83 126.36,-2362.57"/>
+<polygon fill="#000000" stroke="#000000" points="125.62,-2359.14 116.24,-2364.08 126.65,-2366.06 125.62,-2359.14"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
-<g id="file~~graph~~FileGraph_node41" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_file~~graph~~FileGraph_node41"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="118.5,-1620 45.5,-1620 45.5,-1596 118.5,-1596 118.5,-1620"/>
-<text text-anchor="middle" x="82" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90 -->
+<g id="file~~graph~~FileGraph_edge69" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90</title>
+<path fill="none" stroke="#000000" d="M242.16,-1469.9C231.44,-1446.96 208.88,-1395.29 200,-1349 188.42,-1288.62 202.41,-291 164,-243 163.38,-242.23 162.74,-241.49 162.08,-240.77"/>
+<polygon fill="#000000" stroke="#000000" points="164.07,-237.86 154.2,-234 159.51,-243.17 164.07,-237.86"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~drift.f90 -->
+<g id="file~~graph~~FileGraph_edge71" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~drift.f90</title>
+<path fill="none" stroke="#000000" d="M242.16,-1469.9C231.42,-1446.96 208.85,-1395.29 200,-1349 188.02,-1286.33 203.84,-250.85 164,-201 153.44,-187.78 135.71,-182.24 119.54,-180.13"/>
+<polygon fill="#000000" stroke="#000000" points="119.5,-176.62 109.22,-179.2 118.86,-183.59 119.5,-176.62"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_driver.f90 -->
+<g id="file~~graph~~FileGraph_edge73" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_driver.f90</title>
+<path fill="none" stroke="#000000" d="M235.38,-1494C219.8,-1508.19 191.92,-1531.56 164,-1545 156.74,-1548.49 148.83,-1551.46 140.88,-1553.96"/>
+<polygon fill="#000000" stroke="#000000" points="139.83,-1550.62 131.21,-1556.79 141.8,-1557.34 139.83,-1550.62"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_util.f90 -->
-<g id="file~~graph~~FileGraph_edge90" class="edge">
+<g id="file~~graph~~FileGraph_edge78" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_util.f90</title>
-<path fill="none" stroke="#000000" d="M215.72,-1572.95C200.11,-1577.25 181.09,-1582.44 164,-1587 152.49,-1590.07 140.05,-1593.32 128.45,-1596.33"/>
-<polygon fill="#000000" stroke="#000000" points="127.32,-1593.01 118.51,-1598.9 129.07,-1599.79 127.32,-1593.01"/>
+<path fill="none" stroke="#000000" d="M245.64,-1494.27C237.88,-1535.12 212.88,-1670.23 200,-1783 193.45,-1840.32 200.87,-2256.62 164,-2301 155.27,-2311.51 142.03,-2317.13 128.76,-2320.04"/>
+<polygon fill="#000000" stroke="#000000" points="127.95,-2316.62 118.69,-2321.77 129.13,-2323.52 127.95,-2316.62"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_step.f90 -->
-<g id="file~~graph~~FileGraph_edge92" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_step.f90</title>
-<path fill="none" stroke="#000000" d="M241.51,-1576.26C230.99,-1596.72 210.33,-1639.42 200,-1678 183.37,-1740.09 206.43,-1916.72 164,-1965 156.73,-1973.27 146.67,-1978.49 136.1,-1981.73"/>
-<polygon fill="#000000" stroke="#000000" points="135.16,-1978.35 126.32,-1984.18 136.87,-1985.14 135.16,-1978.35"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge94" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_setup.f90</title>
-<path fill="none" stroke="#000000" d="M241.31,-1576.2C230.5,-1596.6 209.45,-1639.19 200,-1678 176.01,-1776.55 229.19,-2055.3 164,-2133 157.49,-2140.76 148.51,-2145.85 138.9,-2149.15"/>
-<polygon fill="#000000" stroke="#000000" points="137.82,-2145.82 129.14,-2151.89 139.71,-2152.56 137.82,-2145.82"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_util.f90 -->
-<g id="file~~graph~~FileGraph_edge95" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_util.f90</title>
-<path fill="none" stroke="#000000" d="M241.13,-1576.16C230.05,-1596.49 208.61,-1639 200,-1678 176.01,-1786.68 233.68,-2592.22 164,-2679 155.45,-2689.65 142.25,-2695.31 128.97,-2698.21"/>
-<polygon fill="#000000" stroke="#000000" points="128.15,-2694.8 118.88,-2699.92 129.33,-2701.7 128.15,-2694.8"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_spill.f90 -->
+<g id="file~~graph~~FileGraph_edge79" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_spill.f90</title>
+<path fill="none" stroke="#000000" d="M242.15,-1469.9C231.41,-1446.96 208.82,-1395.3 200,-1349 187.62,-1284.03 205.26,-210.69 164,-159 154.88,-147.58 140.43,-141.89 126.23,-139.19"/>
+<polygon fill="#000000" stroke="#000000" points="126.42,-135.69 116.02,-137.72 125.42,-142.61 126.42,-135.69"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
-<g id="file~~graph~~FileGraph_node45" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_file~~graph~~FileGraph_node45"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-276 43.5,-276 43.5,-252 120.5,-252 120.5,-276"/>
-<text text-anchor="middle" x="82" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_step.f90 -->
+<g id="file~~graph~~FileGraph_edge82" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_step.f90</title>
+<path fill="none" stroke="#000000" d="M245.67,-1494.28C237.99,-1535.13 213.23,-1670.27 200,-1783 193.82,-1835.68 198.02,-2218.31 164,-2259 155.84,-2268.76 143.78,-2274.3 131.45,-2277.37"/>
+<polygon fill="#000000" stroke="#000000" points="130.69,-2273.95 121.57,-2279.33 132.06,-2280.81 130.69,-2273.95"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_drift.f90 -->
+<g id="file~~graph~~FileGraph_edge86" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_drift.f90</title>
+<path fill="none" stroke="#000000" d="M247.38,-1494.19C244.74,-1532.54 231.25,-1651.86 164,-1713 155.85,-1720.41 145.43,-1725.27 134.79,-1728.44"/>
+<polygon fill="#000000" stroke="#000000" points="133.86,-1725.07 125.02,-1730.91 135.57,-1731.86 133.86,-1725.07"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_coord.f90 -->
-<g id="file~~graph~~FileGraph_edge98" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_coord.f90</title>
-<path fill="none" stroke="#000000" d="M215.78,-1552.61C209.54,-1548.92 203.77,-1544.13 200,-1538 127.02,-1419.37 250.81,-393.92 164,-285 155.86,-274.78 143.43,-269.15 130.75,-266.15"/>
-<polygon fill="#000000" stroke="#000000" points="131.06,-262.64 120.59,-264.26 129.78,-269.53 131.06,-262.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_regime.f90 -->
+<g id="file~~graph~~FileGraph_edge88" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_regime.f90</title>
+<path fill="none" stroke="#000000" d="M215.79,-1473.8C194.35,-1468.34 165.58,-1461.02 140.29,-1454.58"/>
+<polygon fill="#000000" stroke="#000000" points="140.99,-1451.15 130.44,-1452.07 139.26,-1457.93 140.99,-1451.15"/>
 </g>
-<!-- sourcefile~setup.f90 -->
-<g id="file~~graph~~FileGraph_node46" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_file~~graph~~FileGraph_node46"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110.5,-234 53.5,-234 53.5,-210 110.5,-210 110.5,-234"/>
-<text text-anchor="middle" x="82" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_placeholder.f90 -->
+<g id="file~~graph~~FileGraph_edge90" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_placeholder.f90</title>
+<path fill="none" stroke="#000000" d="M235.38,-1470C219.8,-1455.81 191.92,-1432.44 164,-1419 159.73,-1416.94 155.22,-1415.07 150.62,-1413.36"/>
+<polygon fill="#000000" stroke="#000000" points="151.67,-1410.02 141.08,-1410.1 149.4,-1416.65 151.67,-1410.02"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90 -->
+<g id="file~~graph~~FileGraph_edge91" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_encounter_check.f90</title>
+<path fill="none" stroke="#000000" d="M245.52,-1494.26C237.38,-1535.06 211.35,-1670.06 200,-1783 195.25,-1830.25 193.85,-2600.06 164,-2637 163.03,-2638.2 162,-2639.34 160.92,-2640.41"/>
+<polygon fill="#000000" stroke="#000000" points="158.71,-2637.7 153.09,-2646.68 163.08,-2643.16 158.71,-2637.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~setup.f90 -->
-<g id="file~~graph~~FileGraph_edge100" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~setup.f90</title>
-<path fill="none" stroke="#000000" d="M215.77,-1552.62C209.53,-1548.92 203.77,-1544.14 200,-1538 124.63,-1415.37 253.66,-355.61 164,-243 153.76,-230.13 136.73,-224.54 120.93,-222.3"/>
-<polygon fill="#000000" stroke="#000000" points="121.11,-218.8 110.8,-221.28 120.4,-225.77 121.11,-218.8"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_solve.f90 -->
+<g id="file~~graph~~FileGraph_edge93" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_solve.f90</title>
+<path fill="none" stroke="#000000" d="M242.15,-1469.9C231.4,-1446.96 208.8,-1395.3 200,-1349 187.22,-1281.73 206.69,-170.54 164,-117 155.63,-106.5 142.74,-100.85 129.69,-97.91"/>
+<polygon fill="#000000" stroke="#000000" points="130.21,-94.44 119.75,-96.15 128.99,-101.34 130.21,-94.44"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
-<g id="file~~graph~~FileGraph_node47" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_file~~graph~~FileGraph_node47"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-1872 42.5,-1872 42.5,-1848 121.5,-1848 121.5,-1872"/>
-<text text-anchor="middle" x="82" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<!-- sourcefile~helio_drift.f90 -->
+<g id="file~~graph~~FileGraph_node52" class="node">
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_file~~graph~~FileGraph_node52"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-2082 43.5,-2082 43.5,-2058 120.5,-2058 120.5,-2082"/>
+<text text-anchor="middle" x="82" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_step.f90 -->
-<g id="file~~graph~~FileGraph_edge102" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_step.f90</title>
-<path fill="none" stroke="#000000" d="M242.08,-1576.04C232.2,-1596.55 212.22,-1639.75 200,-1678 177.68,-1747.84 214.97,-1786.29 164,-1839 155.4,-1847.89 143.56,-1853.19 131.59,-1856.31"/>
-<polygon fill="#000000" stroke="#000000" points="130.62,-1852.94 121.56,-1858.44 132.07,-1859.78 130.62,-1852.94"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_drift.f90 -->
+<g id="file~~graph~~FileGraph_edge106" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_drift.f90</title>
+<path fill="none" stroke="#000000" d="M245.98,-1494.03C239.17,-1534.64 216.59,-1670.44 200,-1783 191.3,-1842.01 203.59,-2004.38 164,-2049 155.48,-2058.6 143.19,-2064.08 130.74,-2067.13"/>
+<polygon fill="#000000" stroke="#000000" points="129.94,-2063.72 120.8,-2069.09 131.29,-2070.59 129.94,-2063.72"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
-<g id="file~~graph~~FileGraph_node48" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_file~~graph~~FileGraph_node48"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121,-1284 43,-1284 43,-1260 121,-1260 121,-1284"/>
-<text text-anchor="middle" x="82" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<!-- sourcefile~discard.f90 -->
+<g id="file~~graph~~FileGraph_node53" class="node">
+<title>sourcefile~discard.f90</title>
+<g id="a_file~~graph~~FileGraph_node53"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114.5,-66 49.5,-66 49.5,-42 114.5,-42 114.5,-66"/>
+<text text-anchor="middle" x="82" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_io.f90 -->
-<g id="file~~graph~~FileGraph_edge103" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_io.f90</title>
-<path fill="none" stroke="#000000" d="M215.81,-1551.98C209.72,-1548.35 204.02,-1543.75 200,-1538 136.94,-1447.8 237.52,-1374.9 164,-1293 155.5,-1283.53 143.34,-1278.08 131.01,-1275.01"/>
-<polygon fill="#000000" stroke="#000000" points="131.65,-1271.57 121.15,-1273.03 130.27,-1278.43 131.65,-1271.57"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_collision.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~discard.f90 -->
 <g id="file~~graph~~FileGraph_edge107" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_collision.f90</title>
-<path fill="none" stroke="#000000" d="M241.39,-1576.22C230.69,-1596.64 209.79,-1639.28 200,-1678 179.7,-1758.31 217.8,-1986.02 164,-2049 158.83,-2055.06 152.15,-2059.48 144.85,-2062.7"/>
-<polygon fill="#000000" stroke="#000000" points="143.55,-2059.45 135.35,-2066.16 145.94,-2066.03 143.55,-2059.45"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~discard.f90</title>
+<path fill="none" stroke="#000000" d="M242.15,-1469.9C231.39,-1446.97 208.78,-1395.31 200,-1349 186.82,-1279.43 208.12,-130.38 164,-75 154.59,-63.18 139.45,-57.5 124.8,-54.92"/>
+<polygon fill="#000000" stroke="#000000" points="125.18,-51.44 114.81,-53.59 124.26,-58.38 125.18,-51.44"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
-<g id="file~~graph~~FileGraph_node52" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_file~~graph~~FileGraph_node52"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="144,-1242 20,-1242 20,-1218 144,-1218 144,-1242"/>
-<text text-anchor="middle" x="82" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<!-- sourcefile~netcdf.f90 -->
+<g id="file~~graph~~FileGraph_node55" class="node">
+<title>sourcefile~netcdf.f90</title>
+<g id="a_file~~graph~~FileGraph_node55"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="112,-24 52,-24 52,0 112,0 112,-24"/>
+<text text-anchor="middle" x="82" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_placeholder.f90 -->
-<g id="file~~graph~~FileGraph_edge109" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_placeholder.f90</title>
-<path fill="none" stroke="#000000" d="M215.71,-1552.04C209.64,-1548.41 203.96,-1543.79 200,-1538 127.46,-1431.87 248.86,-1347.57 164,-1251 160.9,-1247.47 157.28,-1244.49 153.33,-1241.99"/>
-<polygon fill="#000000" stroke="#000000" points="154.72,-1238.76 144.23,-1237.24 151.48,-1244.97 154.72,-1238.76"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~netcdf.f90 -->
+<g id="file~~graph~~FileGraph_edge110" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~netcdf.f90</title>
+<path fill="none" stroke="#000000" d="M242.14,-1469.9C231.38,-1446.97 208.76,-1395.31 200,-1349 186.41,-1277.13 209.55,-90.23 164,-33 154.15,-20.62 138.03,-14.98 122.75,-12.57"/>
+<polygon fill="#000000" stroke="#000000" points="122.73,-9.05 112.39,-11.38 121.93,-16 122.73,-9.05"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
-<g id="file~~graph~~FileGraph_node53" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_file~~graph~~FileGraph_node53"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="125,-2460 39,-2460 39,-2436 125,-2436 125,-2460"/>
-<text text-anchor="middle" x="82" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<!-- sourcefile~user_getacch.f90 -->
+<g id="file~~graph~~FileGraph_node56" class="node">
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_file~~graph~~FileGraph_node56"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="129.5,-1536 34.5,-1536 34.5,-1512 129.5,-1512 129.5,-1536"/>
+<text text-anchor="middle" x="82" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_coord.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~user_getacch.f90 -->
 <g id="file~~graph~~FileGraph_edge112" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_coord.f90</title>
-<path fill="none" stroke="#000000" d="M241.18,-1576.17C230.18,-1596.52 208.84,-1639.05 200,-1678 181.55,-1759.25 216.56,-2362.35 164,-2427 156.7,-2435.98 146.1,-2441.4 134.96,-2444.62"/>
-<polygon fill="#000000" stroke="#000000" points="134.05,-2441.24 125.1,-2446.9 135.63,-2448.05 134.05,-2441.24"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~user_getacch.f90</title>
+<path fill="none" stroke="#000000" d="M215.79,-1490.2C194.19,-1495.7 165.13,-1503.09 139.71,-1509.56"/>
+<polygon fill="#000000" stroke="#000000" points="138.63,-1506.23 129.8,-1512.09 140.36,-1513.01 138.63,-1506.23"/>
 </g>
-<!-- sourcefile~kick.f90 -->
-<g id="file~~graph~~FileGraph_node54" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_file~~graph~~FileGraph_node54"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-192 55,-192 55,-168 109,-168 109,-192"/>
-<text text-anchor="middle" x="82" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<!-- sourcefile~symba_io.f90 -->
+<g id="file~~graph~~FileGraph_node57" class="node">
+<title>sourcefile~symba_io.f90</title>
+<g id="a_file~~graph~~FileGraph_node57"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120,-1704 44,-1704 44,-1680 120,-1680 120,-1704"/>
+<text text-anchor="middle" x="82" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~kick.f90 -->
-<g id="file~~graph~~FileGraph_edge114" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~kick.f90</title>
-<path fill="none" stroke="#000000" d="M215.77,-1552.62C209.53,-1548.92 203.77,-1544.14 200,-1538 122.24,-1411.36 256.52,-317.3 164,-201 153.46,-187.76 135.75,-182.22 119.56,-180.11"/>
-<polygon fill="#000000" stroke="#000000" points="119.52,-176.6 109.24,-179.18 118.89,-183.57 119.52,-176.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_io.f90 -->
+<g id="file~~graph~~FileGraph_edge115" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_io.f90</title>
+<path fill="none" stroke="#000000" d="M246.26,-1494.35C240.82,-1528.12 220.97,-1622.71 164,-1671 154.48,-1679.07 142.22,-1684.09 130.14,-1687.2"/>
+<polygon fill="#000000" stroke="#000000" points="129.12,-1683.84 120.09,-1689.38 130.61,-1690.68 129.12,-1683.84"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
-<g id="file~~graph~~FileGraph_node56" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_file~~graph~~FileGraph_node56"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="115.5,-150 48.5,-150 48.5,-126 115.5,-126 115.5,-150"/>
-<text text-anchor="middle" x="82" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<!-- sourcefile~util_peri.f90 -->
+<g id="file~~graph~~FileGraph_node58" class="node">
+<title>sourcefile~util_peri.f90</title>
+<g id="a_file~~graph~~FileGraph_node58"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-1494 48,-1494 48,-1470 116,-1470 116,-1494"/>
+<text text-anchor="middle" x="82" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_exit.f90 -->
-<g id="file~~graph~~FileGraph_edge117" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_exit.f90</title>
-<path fill="none" stroke="#000000" d="M215.77,-1552.62C209.53,-1548.93 203.77,-1544.14 200,-1538 119.85,-1407.35 259.37,-278.99 164,-159 154.83,-147.47 140.22,-141.78 125.92,-139.11"/>
-<polygon fill="#000000" stroke="#000000" points="126.03,-135.59 115.64,-137.66 125.05,-142.52 126.03,-135.59"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_peri.f90 -->
+<g id="file~~graph~~FileGraph_edge116" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_peri.f90</title>
+<path fill="none" stroke="#000000" d="M215.79,-1482C190.35,-1482 154.58,-1482 126.57,-1482"/>
+<polygon fill="#000000" stroke="#000000" points="126.26,-1478.5 116.26,-1482 126.26,-1485.5 126.26,-1478.5"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_discard.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_io.f90 -->
 <g id="file~~graph~~FileGraph_edge119" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_discard.f90</title>
-<path fill="none" stroke="#000000" d="M241.45,-1576.24C230.82,-1596.68 210.03,-1639.34 200,-1678 181.54,-1749.19 212.11,-1951.37 164,-2007 158.4,-2013.48 151.08,-2018.08 143.14,-2021.34"/>
-<polygon fill="#000000" stroke="#000000" points="141.94,-2018.05 133.59,-2024.57 144.19,-2024.68 141.94,-2018.05"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_io.f90</title>
+<path fill="none" stroke="#000000" d="M241.74,-1469.82C229.76,-1447.76 201.42,-1401.24 164,-1377 154.19,-1370.65 142.55,-1366.21 131.2,-1363.12"/>
+<polygon fill="#000000" stroke="#000000" points="131.89,-1359.69 121.35,-1360.73 130.24,-1366.49 131.89,-1359.69"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
-<g id="file~~graph~~FileGraph_node58" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_file~~graph~~FileGraph_node58"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="118,-108 46,-108 46,-84 118,-84 118,-108"/>
-<text text-anchor="middle" x="82" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<!-- sourcefile~helio_step.f90 -->
+<g id="file~~graph~~FileGraph_node60" class="node">
+<title>sourcefile~helio_step.f90</title>
+<g id="a_file~~graph~~FileGraph_node60"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-2250 42.5,-2250 42.5,-2226 121.5,-2226 121.5,-2250"/>
+<text text-anchor="middle" x="82" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_valid.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_step.f90 -->
 <g id="file~~graph~~FileGraph_edge121" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_valid.f90</title>
-<path fill="none" stroke="#000000" d="M215.76,-1552.62C209.52,-1548.93 203.76,-1544.14 200,-1538 117.47,-1403.34 262.23,-240.68 164,-117 155.36,-106.12 141.87,-100.44 128.37,-97.59"/>
-<polygon fill="#000000" stroke="#000000" points="128.54,-94.07 118.11,-95.93 127.42,-100.98 128.54,-94.07"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_step.f90</title>
+<path fill="none" stroke="#000000" d="M245.7,-1494.28C238.12,-1535.15 213.64,-1670.31 200,-1783 194.19,-1831.04 195.17,-2179.99 164,-2217 155.8,-2226.73 143.73,-2232.26 131.4,-2235.33"/>
+<polygon fill="#000000" stroke="#000000" points="130.65,-2231.91 121.52,-2237.29 132.01,-2238.78 130.65,-2231.91"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~symba_step.f90 -->
 <g id="file~~graph~~FileGraph_node61" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_file~~graph~~FileGraph_node61"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-2418 48,-2418 48,-2394 116,-2394 116,-2418"/>
-<text text-anchor="middle" x="82" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~symba_step.f90</title>
+<g id="a_file~~graph~~FileGraph_node61"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="126,-1662 38,-1662 38,-1638 126,-1638 126,-1662"/>
+<text text-anchor="middle" x="82" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_gr.f90 -->
-<g id="file~~graph~~FileGraph_edge127" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_gr.f90</title>
-<path fill="none" stroke="#000000" d="M241.19,-1576.18C230.21,-1596.53 208.9,-1639.06 200,-1678 182.47,-1754.68 213.7,-2324.04 164,-2385 154.84,-2396.23 140.52,-2401.9 126.44,-2404.63"/>
-<polygon fill="#000000" stroke="#000000" points="125.69,-2401.21 116.32,-2406.14 126.73,-2408.13 125.69,-2401.21"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_step.f90 -->
+<g id="file~~graph~~FileGraph_edge123" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_step.f90</title>
+<path fill="none" stroke="#000000" d="M244.66,-1494.05C236.2,-1522.26 211.17,-1592.94 164,-1629 155.86,-1635.22 146.06,-1639.61 136.14,-1642.7"/>
+<polygon fill="#000000" stroke="#000000" points="134.96,-1639.39 126.22,-1645.38 136.79,-1646.15 134.96,-1639.39"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="file~~graph~~FileGraph_node62" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_file~~graph~~FileGraph_node62"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-66 48,-66 48,-42 116,-42 116,-66"/>
-<text text-anchor="middle" x="82" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_sort.f90 -->
-<g id="file~~graph~~FileGraph_edge129" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_sort.f90</title>
-<path fill="none" stroke="#000000" d="M215.76,-1552.62C209.52,-1548.93 203.76,-1544.14 200,-1538 157.54,-1468.67 214.54,-138.68 164,-75 154.92,-63.55 140.47,-57.86 126.27,-55.17"/>
-<polygon fill="#000000" stroke="#000000" points="126.45,-51.66 116.06,-53.7 125.45,-58.59 126.45,-51.66"/>
-</g>
-<!-- sourcefile~operator_cross.f90 -->
-<g id="file~~graph~~FileGraph_node63" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_file~~graph~~FileGraph_node63"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="133.5,-2796 30.5,-2796 30.5,-2772 133.5,-2772 133.5,-2796"/>
-<text text-anchor="middle" x="82" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~operator_cross.f90 -->
-<g id="file~~graph~~FileGraph_edge131" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~operator_cross.f90</title>
-<path fill="none" stroke="#000000" d="M241.11,-1576.16C230.02,-1596.48 208.55,-1638.98 200,-1678 187.08,-1736.91 201.69,-2715.92 164,-2763 158.58,-2769.77 151.29,-2774.52 143.3,-2777.83"/>
-<polygon fill="#000000" stroke="#000000" points="142.01,-2774.57 133.65,-2781.09 144.25,-2781.2 142.01,-2774.57"/>
-</g>
-<!-- sourcefile~util_fill.f90 -->
-<g id="file~~graph~~FileGraph_node64" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_file~~graph~~FileGraph_node64"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="112,-24 52,-24 52,0 112,0 112,-24"/>
-<text text-anchor="middle" x="82" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_fill.f90 -->
-<g id="file~~graph~~FileGraph_edge133" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_fill.f90</title>
-<path fill="none" stroke="#000000" d="M215.76,-1552.63C209.52,-1548.93 203.76,-1544.14 200,-1538 156.35,-1466.66 215.97,-98.53 164,-33 154,-20.4 137.5,-14.77 121.99,-12.44"/>
-<polygon fill="#000000" stroke="#000000" points="122.34,-8.95 112.01,-11.34 121.57,-15.91 122.34,-8.95"/>
-</g>
-<!-- sourcefile~fraggle_setup.f90 -->
-<g id="file~~graph~~FileGraph_node65" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_file~~graph~~FileGraph_node65"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="130,-1200 34,-1200 34,-1176 130,-1176 130,-1200"/>
-<text text-anchor="middle" x="82" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_file~~graph~~FileGraph_node62"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-2208 39.5,-2208 39.5,-2184 124.5,-2184 124.5,-2208"/>
+<text text-anchor="middle" x="82" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge134" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_setup.f90</title>
-<path fill="none" stroke="#000000" d="M215.64,-1552.09C209.57,-1548.45 203.91,-1543.82 200,-1538 117.96,-1415.91 260.22,-1320.26 164,-1209 157.65,-1201.66 149.1,-1196.72 139.93,-1193.43"/>
-<polygon fill="#000000" stroke="#000000" points="140.8,-1190.04 130.22,-1190.56 138.82,-1196.75 140.8,-1190.04"/>
-</g>
-<!-- sourcefile~util_solve.f90 -->
-<g id="file~~graph~~FileGraph_node66" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_file~~graph~~FileGraph_node66"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="119.5,-1536 44.5,-1536 44.5,-1512 119.5,-1512 119.5,-1536"/>
-<text text-anchor="middle" x="82" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge125" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_setup.f90</title>
+<path fill="none" stroke="#000000" d="M245.79,-1494C238.39,-1534.53 214.17,-1670.11 200,-1783 189.11,-1869.8 220.65,-2108.34 164,-2175 156.51,-2183.82 145.83,-2189.18 134.68,-2192.39"/>
+<polygon fill="#000000" stroke="#000000" points="133.78,-2189.01 124.83,-2194.68 135.36,-2195.82 133.78,-2189.01"/>
+</g>
+<!-- sourcefile~orbel.f90 -->
+<g id="file~~graph~~FileGraph_node63" class="node">
+<title>sourcefile~orbel.f90</title>
+<g id="a_file~~graph~~FileGraph_node63"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109.5,-1158 54.5,-1158 54.5,-1134 109.5,-1134 109.5,-1158"/>
+<text text-anchor="middle" x="82" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_solve.f90 -->
-<g id="file~~graph~~FileGraph_edge137" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_solve.f90</title>
-<path fill="none" stroke="#000000" d="M215.79,-1556.19C191.24,-1550.24 157.07,-1541.96 129.54,-1535.28"/>
-<polygon fill="#000000" stroke="#000000" points="130.27,-1531.86 119.73,-1532.9 128.62,-1538.66 130.27,-1531.86"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90 -->
+<g id="file~~graph~~FileGraph_edge126" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90</title>
+<path fill="none" stroke="#000000" d="M242.86,-1469.73C233.3,-1446.52 212.61,-1394.41 200,-1349 177.94,-1269.55 220.58,-1226.98 164,-1167 152.63,-1154.95 135.32,-1149.47 119.62,-1147.09"/>
+<polygon fill="#000000" stroke="#000000" points="119.94,-1143.61 109.61,-1145.94 119.15,-1150.56 119.94,-1143.61"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
-<g id="file~~graph~~FileGraph_node67" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_file~~graph~~FileGraph_node67"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109.5,-1494 54.5,-1494 54.5,-1470 109.5,-1470 109.5,-1494"/>
-<text text-anchor="middle" x="82" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<!-- sourcefile~setup.f90 -->
+<g id="file~~graph~~FileGraph_node65" class="node">
+<title>sourcefile~setup.f90</title>
+<g id="a_file~~graph~~FileGraph_node65"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="110.5,-1116 53.5,-1116 53.5,-1092 110.5,-1092 110.5,-1116"/>
+<text text-anchor="middle" x="82" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90~2 -->
-<g id="file~~graph~~FileGraph_edge139" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90~2</title>
-<path fill="none" stroke="#000000" d="M222.3,-1551.75C214.85,-1547.77 206.87,-1543.05 200,-1538 182.02,-1524.78 183.45,-1513.94 164,-1503 150.55,-1495.43 134.32,-1490.53 119.93,-1487.38"/>
-<polygon fill="#000000" stroke="#000000" points="120.33,-1483.9 109.84,-1485.39 118.97,-1490.76 120.33,-1483.9"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~setup.f90 -->
+<g id="file~~graph~~FileGraph_edge130" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~setup.f90</title>
+<path fill="none" stroke="#000000" d="M242.71,-1469.78C232.9,-1446.63 211.79,-1394.63 200,-1349 174.77,-1251.37 231.86,-1199.58 164,-1125 153.01,-1112.92 136.06,-1107.4 120.5,-1105.01"/>
+<polygon fill="#000000" stroke="#000000" points="120.89,-1101.53 110.55,-1103.85 120.08,-1108.49 120.89,-1101.53"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="file~~graph~~FileGraph_node68" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_file~~graph~~FileGraph_node68"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-1452 39.5,-1452 39.5,-1428 124.5,-1428 124.5,-1452"/>
-<text text-anchor="middle" x="82" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_file~~graph~~FileGraph_node68"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-2040 43.5,-2040 43.5,-2016 120.5,-2016 120.5,-2040"/>
+<text text-anchor="middle" x="82" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_rescale.f90 -->
-<g id="file~~graph~~FileGraph_edge141" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_rescale.f90</title>
-<path fill="none" stroke="#000000" d="M218.76,-1551.99C212,-1548.24 205.27,-1543.59 200,-1538 174.09,-1510.51 193.05,-1485.15 164,-1461 155.53,-1453.96 144.98,-1449.25 134.32,-1446.1"/>
-<polygon fill="#000000" stroke="#000000" points="135.1,-1442.69 124.55,-1443.63 133.39,-1449.48 135.1,-1442.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge140" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_kick.f90</title>
+<path fill="none" stroke="#000000" d="M246.05,-1494.2C233.49,-1572.97 164.28,-2006.69 164,-2007 155.36,-2016.5 143.04,-2021.94 130.6,-2025"/>
+<polygon fill="#000000" stroke="#000000" points="129.79,-2021.59 120.66,-2026.97 131.15,-2028.46 129.79,-2021.59"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="file~~graph~~FileGraph_node69" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_file~~graph~~FileGraph_node69"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="114,-1410 50,-1410 50,-1386 114,-1386 114,-1410"/>
-<text text-anchor="middle" x="82" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_file~~graph~~FileGraph_node69"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-2166 43.5,-2166 43.5,-2142 120.5,-2142 120.5,-2166"/>
+<text text-anchor="middle" x="82" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_set.f90 -->
-<g id="file~~graph~~FileGraph_edge143" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_set.f90</title>
-<path fill="none" stroke="#000000" d="M216.93,-1551.79C210.63,-1548.14 204.55,-1543.58 200,-1538 165.08,-1495.18 203.85,-1457.28 164,-1419 153.38,-1408.8 138.46,-1403.38 124.32,-1400.56"/>
-<polygon fill="#000000" stroke="#000000" points="124.67,-1397.07 114.24,-1398.94 123.55,-1403.98 124.67,-1397.07"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge142" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_kick.f90</title>
+<path fill="none" stroke="#000000" d="M245.84,-1494.01C238.59,-1534.56 214.78,-1670.19 200,-1783 189.84,-1860.53 214.95,-2073.7 164,-2133 155.56,-2142.82 143.17,-2148.35 130.61,-2151.39"/>
+<polygon fill="#000000" stroke="#000000" points="129.73,-2147.99 120.57,-2153.32 131.05,-2154.87 129.73,-2147.99"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="file~~graph~~FileGraph_node70" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_file~~graph~~FileGraph_node70"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="116,-1074 48,-1074 48,-1050 116,-1050 116,-1074"/>
-<text text-anchor="middle" x="82" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_file~~graph~~FileGraph_node70"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-1998 39.5,-1998 39.5,-1974 124.5,-1974 124.5,-1998"/>
+<text text-anchor="middle" x="82" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_peri.f90 -->
-<g id="file~~graph~~FileGraph_edge145" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_peri.f90</title>
-<path fill="none" stroke="#000000" d="M215.51,-1552.18C209.45,-1548.53 203.82,-1543.88 200,-1538 144.7,-1452.98 229.19,-1160.7 164,-1083 154.68,-1071.89 140.32,-1066.26 126.27,-1063.51"/>
-<polygon fill="#000000" stroke="#000000" points="126.57,-1060.02 116.16,-1061.98 125.53,-1066.94 126.57,-1060.02"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge144" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_setup.f90</title>
+<path fill="none" stroke="#000000" d="M246.07,-1494.18C234.29,-1568.29 172.35,-1955.94 164,-1965 156.23,-1973.43 145.56,-1978.65 134.51,-1981.85"/>
+<polygon fill="#000000" stroke="#000000" points="133.69,-1978.45 124.77,-1984.17 135.31,-1985.26 133.69,-1978.45"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_encounter_check.f90 -->
-<g id="file~~graph~~FileGraph_edge147" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_encounter_check.f90</title>
-<path fill="none" stroke="#000000" d="M241.35,-1576.21C230.59,-1596.62 209.6,-1639.23 200,-1678 177.86,-1767.43 223.49,-2020.66 164,-2091 163.27,-2091.86 162.52,-2092.69 161.73,-2093.48"/>
-<polygon fill="#000000" stroke="#000000" points="159.51,-2090.78 153.98,-2099.82 163.94,-2096.2 159.51,-2090.78"/>
+<!-- sourcefile~util_version.f90 -->
+<g id="file~~graph~~FileGraph_node71" class="node">
+<title>sourcefile~util_version.f90</title>
+<g id="a_file~~graph~~FileGraph_node71"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-1074 39.5,-1074 39.5,-1050 124.5,-1050 124.5,-1074"/>
+<text text-anchor="middle" x="82" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+</a>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
-<g id="file~~graph~~FileGraph_node72" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_file~~graph~~FileGraph_node72"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-1830 43.5,-1830 43.5,-1806 120.5,-1806 120.5,-1830"/>
-<text text-anchor="middle" x="82" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_version.f90 -->
+<g id="file~~graph~~FileGraph_edge145" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_version.f90</title>
+<path fill="none" stroke="#000000" d="M242.6,-1469.8C232.61,-1446.7 211.22,-1394.78 200,-1349 185.8,-1291.07 203.59,-1127.62 164,-1083 156.32,-1074.34 145.57,-1069.04 134.42,-1065.84"/>
+<polygon fill="#000000" stroke="#000000" points="135.11,-1062.41 124.57,-1063.54 133.51,-1069.23 135.11,-1062.41"/>
+</g>
+<!-- sourcefile~whm_drift.f90 -->
+<g id="file~~graph~~FileGraph_node73" class="node">
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_file~~graph~~FileGraph_node73"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-2754 43.5,-2754 43.5,-2730 120.5,-2730 120.5,-2754"/>
+<text text-anchor="middle" x="82" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_drift.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_drift.f90 -->
 <g id="file~~graph~~FileGraph_edge149" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_drift.f90</title>
-<path fill="none" stroke="#000000" d="M242.39,-1576.15C232.96,-1596.81 213.62,-1640.22 200,-1678 181.25,-1729.98 203.85,-1758.72 164,-1797 155,-1805.65 142.91,-1810.86 130.83,-1813.96"/>
-<polygon fill="#000000" stroke="#000000" points="129.8,-1810.6 120.74,-1816.1 131.25,-1817.45 129.8,-1810.6"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_drift.f90</title>
+<path fill="none" stroke="#000000" d="M245.5,-1494.26C237.31,-1535.06 211.13,-1670.04 200,-1783 194.88,-1834.9 196.7,-2680.38 164,-2721 155.81,-2731.18 143.37,-2736.8 130.68,-2739.8"/>
+<polygon fill="#000000" stroke="#000000" points="129.72,-2736.42 120.53,-2741.69 131,-2743.3 129.72,-2736.42"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="file~~graph~~FileGraph_node74" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_file~~graph~~FileGraph_node74"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="121.5,-1032 42.5,-1032 42.5,-1008 121.5,-1008 121.5,-1032"/>
-<text text-anchor="middle" x="82" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_file~~graph~~FileGraph_node74"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-1032 55,-1032 55,-1008 109,-1008 109,-1032"/>
+<text text-anchor="middle" x="82" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_resize.f90 -->
-<g id="file~~graph~~FileGraph_edge152" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_resize.f90</title>
-<path fill="none" stroke="#000000" d="M215.97,-1552.49C209.72,-1548.8 203.91,-1544.05 200,-1538 139.93,-1444.97 234.89,-1126.07 164,-1041 155.85,-1031.22 143.8,-1025.68 131.47,-1022.62"/>
-<polygon fill="#000000" stroke="#000000" points="132.08,-1019.17 121.59,-1020.66 130.71,-1026.03 132.08,-1019.17"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~io.f90 -->
+<g id="file~~graph~~FileGraph_edge150" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~io.f90</title>
+<path fill="none" stroke="#000000" d="M242.53,-1469.82C232.4,-1446.75 210.81,-1394.88 200,-1349 184.2,-1281.93 209.27,-1092.96 164,-1041 152.96,-1028.33 135.36,-1022.82 119.39,-1020.59"/>
+<polygon fill="#000000" stroke="#000000" points="119.51,-1017.09 109.2,-1019.56 118.8,-1024.05 119.51,-1017.09"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="file~~graph~~FileGraph_node75" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_file~~graph~~FileGraph_node75"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-990 39.5,-990 39.5,-966 124.5,-966 124.5,-990"/>
-<text text-anchor="middle" x="82" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~util_coord.f90</title>
+<g id="a_file~~graph~~FileGraph_node75"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-990 43.5,-990 43.5,-966 120.5,-966 120.5,-990"/>
+<text text-anchor="middle" x="82" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_version.f90 -->
-<g id="file~~graph~~FileGraph_edge154" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_version.f90</title>
-<path fill="none" stroke="#000000" d="M215.95,-1552.5C209.7,-1548.82 203.89,-1544.06 200,-1538 135.17,-1436.97 240.59,-1091.44 164,-999 156.54,-990 145.78,-984.58 134.52,-981.39"/>
-<polygon fill="#000000" stroke="#000000" points="135.09,-977.93 124.56,-979.11 133.53,-984.75 135.09,-977.93"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_coord.f90 -->
+<g id="file~~graph~~FileGraph_edge152" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_coord.f90</title>
+<path fill="none" stroke="#000000" d="M242.47,-1469.83C232.24,-1446.79 210.49,-1394.95 200,-1349 182.6,-1272.77 214.95,-1058.3 164,-999 155.56,-989.18 143.17,-983.65 130.61,-980.61"/>
+<polygon fill="#000000" stroke="#000000" points="131.05,-977.13 120.57,-978.68 129.73,-984.01 131.05,-977.13"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~symba_util.f90 -->
+<g id="file~~graph~~FileGraph_node76" class="node">
+<title>sourcefile~symba_util.f90</title>
+<g id="a_file~~graph~~FileGraph_node76"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="123,-1620 41,-1620 41,-1596 123,-1596 123,-1620"/>
+<text text-anchor="middle" x="82" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_util.f90 -->
 <g id="file~~graph~~FileGraph_edge155" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_step.f90</title>
-<path fill="none" stroke="#000000" d="M241.13,-1576.16C230.06,-1596.49 208.64,-1639 200,-1678 176.94,-1782.11 230.83,-2553.91 164,-2637 156.1,-2646.83 144.24,-2652.4 132.02,-2655.48"/>
-<polygon fill="#000000" stroke="#000000" points="131.33,-2652.05 122.21,-2657.45 132.71,-2658.92 131.33,-2652.05"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_util.f90</title>
+<path fill="none" stroke="#000000" d="M241.74,-1494.18C229.76,-1516.24 201.42,-1562.76 164,-1587 154.76,-1592.99 143.89,-1597.27 133.16,-1600.33"/>
+<polygon fill="#000000" stroke="#000000" points="132.24,-1596.96 123.41,-1602.82 133.96,-1603.74 132.24,-1596.96"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="file~~graph~~FileGraph_node77" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_file~~graph~~FileGraph_node77"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="120.5,-2376 43.5,-2376 43.5,-2352 120.5,-2352 120.5,-2376"/>
-<text text-anchor="middle" x="82" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_file~~graph~~FileGraph_node77"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="157,-1914 7,-1914 7,-1890 157,-1890 157,-1914"/>
+<text text-anchor="middle" x="82" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge158" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_kick.f90</title>
-<path fill="none" stroke="#000000" d="M241.21,-1576.18C230.24,-1596.53 208.96,-1639.08 200,-1678 183.4,-1750.11 210.85,-2285.72 164,-2343 155.8,-2353.03 143.48,-2358.62 130.92,-2361.64"/>
-<polygon fill="#000000" stroke="#000000" points="130.03,-2358.25 120.86,-2363.56 131.34,-2365.13 130.03,-2358.25"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_encounter_check.f90 -->
+<g id="file~~graph~~FileGraph_edge157" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_encounter_check.f90</title>
+<path fill="none" stroke="#000000" d="M246.21,-1494.23C236.73,-1558.12 191.87,-1851.82 164,-1881 163.07,-1881.98 162.1,-1882.91 161.09,-1883.8"/>
+<polygon fill="#000000" stroke="#000000" points="158.8,-1881.14 152.77,-1889.85 162.92,-1886.8 158.8,-1881.14"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="file~~graph~~FileGraph_node78" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_file~~graph~~FileGraph_node78"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="117.5,-948 46.5,-948 46.5,-924 117.5,-924 117.5,-948"/>
-<text text-anchor="middle" x="82" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_file~~graph~~FileGraph_node78"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109.5,-948 54.5,-948 54.5,-924 109.5,-924 109.5,-948"/>
+<text text-anchor="middle" x="82" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_copy.f90 -->
-<g id="file~~graph~~FileGraph_edge160" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_copy.f90</title>
-<path fill="none" stroke="#000000" d="M215.93,-1552.52C209.68,-1548.83 203.88,-1544.07 200,-1538 130.4,-1428.96 246.29,-1056.81 164,-957 155.16,-946.28 141.63,-940.64 128.13,-937.78"/>
-<polygon fill="#000000" stroke="#000000" points="128.34,-934.27 117.9,-936.09 127.2,-941.17 128.34,-934.27"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90~2 -->
+<g id="file~~graph~~FileGraph_edge159" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~orbel.f90~2</title>
+<path fill="none" stroke="#000000" d="M242.42,-1469.85C232.12,-1446.82 210.24,-1395.01 200,-1349 181,-1263.61 220.65,-1023.66 164,-957 153.2,-944.29 135.78,-938.75 119.87,-936.52"/>
+<polygon fill="#000000" stroke="#000000" points="120.01,-933.01 109.71,-935.48 119.3,-939.98 120.01,-933.01"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="file~~graph~~FileGraph_node79" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_file~~graph~~FileGraph_node79"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="141,-318 23,-318 23,-294 141,-294 141,-318"/>
-<text text-anchor="middle" x="82" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_file~~graph~~FileGraph_node79"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="109,-906 55,-906 55,-882 109,-882 109,-906"/>
+<text text-anchor="middle" x="82" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~util_minimize_bfgs.f90 -->
-<g id="file~~graph~~FileGraph_edge162" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~util_minimize_bfgs.f90</title>
-<path fill="none" stroke="#000000" d="M215.78,-1552.61C209.54,-1548.92 203.78,-1544.13 200,-1538 129.4,-1423.38 247.95,-432.23 164,-327 160.23,-322.27 155.54,-318.53 150.33,-315.57"/>
-<polygon fill="#000000" stroke="#000000" points="151.69,-312.34 141.15,-311.3 148.74,-318.69 151.69,-312.34"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_setup.f90 -->
-<g id="file~~graph~~FileGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_setup.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1902C245.07,-1902.3 181.99,-1918.47 134.7,-1930.65"/>
-<polygon fill="#000000" stroke="#000000" points="133.68,-1927.3 124.87,-1933.18 135.43,-1934.08 133.68,-1927.3"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge32" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" d="M508.11,-1829.06C500.94,-1832.8 493.76,-1837.43 488,-1843 464,-1866.25 476.53,-1886.31 452,-1909 448.25,-1912.47 443.96,-1915.54 439.44,-1918.23"/>
-<polygon fill="#000000" stroke="#000000" points="437.75,-1915.17 430.57,-1922.96 441.04,-1921.34 437.75,-1915.17"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_gr.f90 -->
-<g id="file~~graph~~FileGraph_edge64" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_gr.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1902C206.99,-1906.23 159.94,-1905.7 126.6,-1904.43"/>
-<polygon fill="#000000" stroke="#000000" points="126.42,-1900.92 116.29,-1904 126.13,-1907.91 126.42,-1900.92"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge76" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M504.61,-1804.93C460.57,-1788.29 384.46,-1754.73 334,-1706 297.32,-1670.58 271.04,-1615.76 258.43,-1585.64"/>
-<polygon fill="#000000" stroke="#000000" points="261.55,-1584.04 254.54,-1576.1 255.07,-1586.68 261.55,-1584.04"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_step.f90 -->
-<g id="file~~graph~~FileGraph_edge101" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_step.f90</title>
-<path fill="none" stroke="#000000" d="M514.66,-1829.11C465.46,-1851.99 351.59,-1899.53 250,-1902"/>
-<path fill="none" stroke="#000000" d="M248,-1902C246.5,-1902.15 179.71,-1885.01 131.58,-1872.58"/>
-<polygon fill="#000000" stroke="#000000" points="132.18,-1869.12 121.62,-1870 130.43,-1875.89 132.18,-1869.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~kick.f90 -->
+<g id="file~~graph~~FileGraph_edge160" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~kick.f90</title>
+<path fill="none" stroke="#000000" d="M242.38,-1469.85C232.02,-1446.84 210.04,-1395.05 200,-1349 179.4,-1254.44 226.34,-989.02 164,-915 153.18,-902.15 135.6,-896.62 119.58,-894.43"/>
+<polygon fill="#000000" stroke="#000000" points="119.66,-890.92 109.36,-893.42 118.97,-897.88 119.66,-890.92"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_drift.f90 -->
-<g id="file~~graph~~FileGraph_edge148" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_drift.f90</title>
-<path fill="none" stroke="#000000" d="M493.22,-1817.1C406.2,-1817.29 219.05,-1817.7 130.85,-1817.9"/>
-<polygon fill="#000000" stroke="#000000" points="130.59,-1814.4 120.6,-1817.92 130.6,-1821.4 130.59,-1814.4"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_coord.f90 -->
+<g id="file~~graph~~FileGraph_edge35" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_coord.f90</title>
+<path fill="none" stroke="#000000" d="M680.56,-2117.08C672.83,-2153.19 646.15,-2262.36 593,-2336 557.53,-2385.14 529.75,-2379.07 488,-2423 427.07,-2487.11 332.41,-2709.9 250,-2742"/>
+<path fill="none" stroke="#000000" d="M248,-2742C247.31,-2742.28 183.05,-2725.81 134.94,-2713.41"/>
+<polygon fill="#000000" stroke="#000000" points="135.81,-2710.02 125.25,-2710.91 134.06,-2716.8 135.81,-2710.02"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge157" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_kick.f90</title>
-<path fill="none" stroke="#000000" d="M528.34,-1829.11C517.25,-1841.52 500.17,-1861.7 488,-1881 468.28,-1912.28 470.94,-1924.25 452,-1956 342.16,-2140.13 342.69,-2224.52 164,-2343 154.07,-2349.58 142.2,-2354.1 130.64,-2357.21"/>
-<polygon fill="#000000" stroke="#000000" points="129.54,-2353.87 120.62,-2359.58 131.16,-2360.68 129.54,-2353.87"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_gr.f90 -->
+<g id="file~~graph~~FileGraph_edge67" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_gr.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2322C246.44,-2321.94 174.65,-2340.36 126.29,-2352.82"/>
+<polygon fill="#000000" stroke="#000000" points="125.17,-2349.5 116.36,-2355.38 126.92,-2356.28 125.17,-2349.5"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge72" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M773.7,-1675.18C733.55,-1679.41 677.64,-1686.14 629,-1695 589.65,-1702.17 580.7,-1723.9 541.5,-1716"/>
-<path fill="none" stroke="#000000" d="M539.5,-1716C511.61,-1710 348.98,-1619.68 280.44,-1581.18"/>
-<polygon fill="#000000" stroke="#000000" points="281.85,-1577.95 271.42,-1576.1 278.42,-1584.06 281.85,-1577.95"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge75" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" d="M539.5,-2322C512.82,-2338.75 479.11,-2348.59 450.85,-2354.31"/>
+<polygon fill="#000000" stroke="#000000" points="449.88,-2350.94 440.71,-2356.24 451.19,-2357.81 449.88,-2350.94"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_spill.f90 -->
-<g id="file~~graph~~FileGraph_edge3" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_spill.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C132.35,-470.71 266.81,-770.9 164,-873 153.98,-882.95 139.89,-888.37 126.26,-891.27"/>
-<polygon fill="#000000" stroke="#000000" points="125.27,-887.89 116.01,-893.03 126.46,-894.79 125.27,-887.89"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_util.f90 -->
+<g id="file~~graph~~FileGraph_edge77" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_util.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2322C207.83,-2320.47 162.13,-2320.62 129.02,-2321.06"/>
+<polygon fill="#000000" stroke="#000000" points="128.69,-2317.57 118.74,-2321.22 128.79,-2324.57 128.69,-2317.57"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~obl.f90 -->
-<g id="file~~graph~~FileGraph_edge10" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~obl.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C146.68,-481.52 255.75,-743.27 164,-831 152.14,-842.34 134.98,-847.76 119.51,-850.28"/>
-<polygon fill="#000000" stroke="#000000" points="118.63,-846.86 109.15,-851.59 119.51,-853.81 118.63,-846.86"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_step.f90 -->
+<g id="file~~graph~~FileGraph_edge81" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_step.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2322C246.49,-2322 179.7,-2304.89 131.57,-2292.52"/>
+<polygon fill="#000000" stroke="#000000" points="132.17,-2289.06 121.62,-2289.95 130.43,-2295.83 132.17,-2289.06"/>
+<path fill="none" stroke="#000000" d="M539.5,-2322C485.02,-2356.21 314.33,-2322 250,-2322"/>
+<path fill="none" stroke="#000000" d="M679.06,-2117.14C666.19,-2154.71 621.5,-2269.72 541.5,-2322"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~drift.f90 -->
-<g id="file~~graph~~FileGraph_edge16" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~drift.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C160.81,-492.19 244.83,-715.51 164,-789 151.95,-799.96 134.91,-805.34 119.58,-807.94"/>
-<polygon fill="#000000" stroke="#000000" points="118.75,-804.52 109.31,-809.32 119.69,-811.46 118.75,-804.52"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge100" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M653.45,-2092.88C645.23,-2088.96 636.5,-2084.25 629,-2079 610.71,-2066.22 611.88,-2055.9 593,-2044 572.36,-2030.99 564.18,-2033.99 541.5,-2025"/>
+<path fill="none" stroke="#000000" d="M539.5,-2025C496.12,-2007.82 493.99,-1987.33 452,-1967 427.59,-1955.18 412.04,-1968.25 394,-1948"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~discard.f90 -->
-<g id="file~~graph~~FileGraph_edge20" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~discard.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C174.63,-502.62 234.12,-687.56 164,-747 153.14,-756.21 138.72,-761.44 125.06,-764.4"/>
-<polygon fill="#000000" stroke="#000000" points="124.05,-761.02 114.83,-766.24 125.3,-767.91 124.05,-761.02"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge136" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" d="M640.55,-2093C625.99,-2088.88 609.52,-2084.23 594.24,-2079.91"/>
+<polygon fill="#000000" stroke="#000000" points="594.99,-2076.48 584.41,-2077.13 593.08,-2083.22 594.99,-2076.48"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~io.f90 -->
-<g id="file~~graph~~FileGraph_edge22" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~io.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C187.94,-512.67 223.78,-659.3 164,-705 151.25,-714.75 134.41,-719.99 119.39,-722.81"/>
-<polygon fill="#000000" stroke="#000000" points="118.69,-719.38 109.36,-724.39 119.78,-726.29 118.69,-719.38"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge139" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_kick.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2028C208.66,-2025.54 163.94,-2025.72 130.99,-2026.42"/>
+<polygon fill="#000000" stroke="#000000" points="130.64,-2022.93 120.72,-2026.66 130.8,-2029.92 130.64,-2022.93"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90 -->
-<g id="file~~graph~~FileGraph_edge24" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C200.3,-522 214.16,-630.51 164,-663 161.26,-664.78 158.37,-666.4 155.39,-667.89"/>
-<polygon fill="#000000" stroke="#000000" points="153.92,-664.72 146.19,-671.96 156.75,-671.12 153.92,-664.72"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge143" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_setup.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2028C245.07,-2027.82 181.99,-2011.62 134.69,-1999.4"/>
+<polygon fill="#000000" stroke="#000000" points="135.43,-1995.97 124.87,-1996.86 133.67,-2002.75 135.43,-1995.97"/>
+<path fill="none" stroke="#000000" d="M539.5,-2025C479.69,-2001.3 314.21,-2032.02 250,-2028"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge29" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" d="M682.5,-1857C627.79,-1887.56 603.19,-1845.96 541.5,-1857"/>
-<path fill="none" stroke="#000000" d="M539.5,-1857C492.15,-1865.48 444.35,-1896.37 417.04,-1916.64"/>
-<polygon fill="#000000" stroke="#000000" points="414.76,-1913.97 408.92,-1922.8 419,-1919.54 414.76,-1913.97"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_drift.f90 -->
+<g id="file~~graph~~FileGraph_edge148" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_drift.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2742C210.67,-2757.03 164.63,-2755.56 130.68,-2751.18"/>
+<polygon fill="#000000" stroke="#000000" points="130.94,-2747.68 120.55,-2749.74 129.96,-2754.62 130.94,-2747.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_spin_step.f90 -->
-<g id="file~~graph~~FileGraph_edge34" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_spin_step.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C210.75,-529.89 206.05,-600.76 164,-621 157.84,-623.96 151.22,-626.55 144.5,-628.79"/>
-<polygon fill="#000000" stroke="#000000" points="143.15,-625.54 134.63,-631.84 145.22,-632.23 143.15,-625.54"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_setup.f90 -->
+<g id="file~~graph~~FileGraph_edge1" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_setup.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C189.76,-1763.27 218.85,-1883.99 164,-1923 156.52,-1928.32 147.81,-1932.29 138.91,-1935.26"/>
+<polygon fill="#000000" stroke="#000000" points="137.86,-1931.92 129.25,-1938.1 139.83,-1938.64 137.86,-1931.92"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_getacch_pl.f90 -->
-<g id="file~~graph~~FileGraph_edge36" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_getacch_pl.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C247.43,-557.57 187.08,-573.05 139.54,-585.34"/>
-<polygon fill="#000000" stroke="#000000" points="138.42,-582.01 129.61,-587.91 140.17,-588.79 138.42,-582.01"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_collision.f90 -->
+<g id="file~~graph~~FileGraph_edge7" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_collision.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C211.88,-1776.08 203.08,-1824.35 164,-1839 158.02,-1841.24 151.7,-1843.33 145.34,-1845.26"/>
+<polygon fill="#000000" stroke="#000000" points="143.99,-1842.01 135.36,-1848.15 145.94,-1848.73 143.99,-1842.01"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~user_getacch.f90 -->
-<g id="file~~graph~~FileGraph_edge46" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~user_getacch.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C215.22,-533.26 167.42,-536.23 131.69,-543.63"/>
-<polygon fill="#000000" stroke="#000000" points="130.48,-540.31 121.49,-545.93 132.02,-547.14 130.48,-540.31"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge25" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_kick.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C229.3,-1786.17 176.07,-1795.18 135.08,-1804.53"/>
+<polygon fill="#000000" stroke="#000000" points="134.15,-1801.16 125.21,-1806.84 135.75,-1807.97 134.15,-1801.16"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~gr.f90 -->
-<g id="file~~graph~~FileGraph_edge56" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~gr.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C210.21,-529.47 155.11,-520.2 119.16,-517.26"/>
-<polygon fill="#000000" stroke="#000000" points="119.32,-513.76 109.1,-516.56 118.84,-520.74 119.32,-513.76"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_discard.f90 -->
+<g id="file~~graph~~FileGraph_edge49" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_discard.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C216.88,-1778.98 177,-1773.52 144.24,-1772.67"/>
+<polygon fill="#000000" stroke="#000000" points="143.91,-1769.16 133.87,-1772.54 143.83,-1776.16 143.91,-1769.16"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_index.f90 -->
-<g id="file~~graph~~FileGraph_edge60" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_index.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C210.75,-529.89 206.05,-515.24 164,-495 153.47,-489.93 141.56,-485.98 130.18,-482.93"/>
-<polygon fill="#000000" stroke="#000000" points="130.91,-479.51 120.36,-480.49 129.22,-486.3 130.91,-479.51"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_drift.f90 -->
+<g id="file~~graph~~FileGraph_edge85" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_drift.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C211.88,-1776.08 203.08,-1769.65 164,-1755 154.72,-1751.52 144.62,-1748.4 134.82,-1745.7"/>
+<polygon fill="#000000" stroke="#000000" points="135.71,-1742.32 125.14,-1743.14 133.92,-1749.08 135.71,-1742.32"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90 -->
-<g id="file~~graph~~FileGraph_edge62" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C200.3,-522 214.16,-485.49 164,-453 150.85,-444.48 134.41,-439.41 119.78,-436.4"/>
-<polygon fill="#000000" stroke="#000000" points="119.99,-432.88 109.52,-434.55 118.74,-439.77 119.99,-432.88"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge97" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M351.26,-1975.95C344.68,-1972.4 338.54,-1967.83 334,-1962 326.78,-1952.72 268.68,-1597.11 253.58,-1504.08"/>
+<polygon fill="#000000" stroke="#000000" points="257.01,-1503.39 251.95,-1494.08 250.1,-1504.51 257.01,-1503.39"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge70" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M392,-1564C358.63,-1561.69 320.75,-1561.83 292.51,-1562.47"/>
-<polygon fill="#000000" stroke="#000000" points="292.1,-1558.98 282.19,-1562.74 292.28,-1565.98 292.1,-1558.98"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_io.f90 -->
+<g id="file~~graph~~FileGraph_edge114" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_io.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C202.31,-1770.54 209.83,-1739.21 164,-1713 153.66,-1707.09 141.64,-1702.81 130.07,-1699.72"/>
+<polygon fill="#000000" stroke="#000000" points="130.61,-1696.25 120.07,-1697.31 128.97,-1703.06 130.61,-1696.25"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_append.f90 -->
-<g id="file~~graph~~FileGraph_edge80" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_append.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C187.94,-512.67 223.78,-456.7 164,-411 155.6,-404.58 145.44,-400.12 135.19,-397.01"/>
-<polygon fill="#000000" stroke="#000000" points="135.95,-393.59 125.39,-394.43 134.17,-400.36 135.95,-393.59"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_step.f90 -->
+<g id="file~~graph~~FileGraph_edge122" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_step.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C189.76,-1763.27 218.85,-1710.01 164,-1671 155.74,-1665.13 145.97,-1660.9 136.13,-1657.85"/>
+<polygon fill="#000000" stroke="#000000" points="136.88,-1654.42 126.31,-1655.18 135.04,-1661.18 136.88,-1654.42"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~netcdf.f90 -->
-<g id="file~~graph~~FileGraph_edge82" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~netcdf.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C174.63,-502.62 234.12,-428.44 164,-369 152.41,-359.17 136.76,-353.87 122.32,-351.04"/>
-<polygon fill="#000000" stroke="#000000" points="122.51,-347.52 112.08,-349.38 121.39,-354.43 122.51,-347.52"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_util.f90 -->
+<g id="file~~graph~~FileGraph_edge154" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_util.f90</title>
+<path fill="none" stroke="#000000" d="M355.01,-1975.94C347.46,-1972.3 340,-1967.71 334,-1962 274.39,-1905.27 321.21,-1838.24 250,-1797"/>
+<path fill="none" stroke="#000000" d="M248,-1797C175.76,-1755.16 228.89,-1681.52 164,-1629 155.18,-1621.86 144.21,-1617.13 133.21,-1613.99"/>
+<polygon fill="#000000" stroke="#000000" points="133.71,-1610.51 123.17,-1611.53 132.05,-1617.31 133.71,-1610.51"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge86" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" d="M821.8,-1537.01C810.78,-1558.79 787.65,-1606.53 774,-1649 750.64,-1721.7 779.2,-1752.71 738,-1817 721.98,-1842 710.42,-1842.52 684.5,-1857"/>
-<path fill="none" stroke="#000000" d="M682.5,-1857C664.48,-1867.07 612.67,-1848.31 577.13,-1833.22"/>
-<polygon fill="#000000" stroke="#000000" points="578.15,-1829.84 567.58,-1829.08 575.37,-1836.27 578.15,-1829.84"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_encounter_check.f90 -->
+<g id="file~~graph~~FileGraph_edge156" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~symba_encounter_check.f90</title>
+<path fill="none" stroke="#000000" d="M248,-1797C202.31,-1770.54 209.83,-1854.79 164,-1881 160.72,-1882.88 157.26,-1884.59 153.71,-1886.15"/>
+<polygon fill="#000000" stroke="#000000" points="152.13,-1883.02 144.11,-1889.95 154.7,-1889.53 152.13,-1883.02"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_coord.f90 -->
-<g id="file~~graph~~FileGraph_edge97" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_coord.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C146.68,-481.52 255.75,-372.73 164,-285 154.98,-276.37 142.88,-271.17 130.8,-268.07"/>
-<polygon fill="#000000" stroke="#000000" points="131.23,-264.58 120.72,-265.92 129.77,-271.43 131.23,-264.58"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_gr.f90 -->
+<g id="file~~graph~~FileGraph_edge45" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_gr.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2154C246.44,-2154.16 174.66,-2135.71 126.3,-2123.21"/>
+<polygon fill="#000000" stroke="#000000" points="126.92,-2119.76 116.36,-2120.64 125.17,-2126.54 126.92,-2119.76"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~setup.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="file~~graph~~FileGraph_edge99" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~setup.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C132.35,-470.71 266.81,-345.1 164,-243 152.69,-231.77 136.21,-226.31 121.05,-223.73"/>
-<polygon fill="#000000" stroke="#000000" points="121.23,-220.23 110.85,-222.38 120.31,-227.17 121.23,-220.23"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~kick.f90 -->
-<g id="file~~graph~~FileGraph_edge113" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~kick.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C117.9,-459.8 277.95,-317.55 164,-201 152.34,-189.07 134.84,-183.62 119.08,-181.23"/>
-<polygon fill="#000000" stroke="#000000" points="119.4,-177.75 109.06,-180.07 118.59,-184.7 119.4,-177.75"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M507.69,-2052.94C500.63,-2049.23 493.58,-2044.61 488,-2039 462.75,-2013.65 479.09,-1990.37 452,-1967 431.46,-1949.28 412.04,-1968.25 394,-1948"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_exit.f90 -->
-<g id="file~~graph~~FileGraph_edge116" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_exit.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C103.36,-448.82 289.15,-290.07 164,-159 154.07,-148.6 139.71,-143.1 125.83,-140.27"/>
-<polygon fill="#000000" stroke="#000000" points="126.31,-136.8 115.88,-138.65 125.19,-143.71 126.31,-136.8"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_drift.f90 -->
+<g id="file~~graph~~FileGraph_edge105" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_drift.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2154C201.33,-2154 206.05,-2111.24 164,-2091 153.57,-2085.98 141.79,-2082.05 130.51,-2079.02"/>
+<polygon fill="#000000" stroke="#000000" points="131.32,-2075.62 120.77,-2076.58 129.62,-2082.41 131.32,-2075.62"/>
+<path fill="none" stroke="#000000" d="M516.96,-2077C469.18,-2101.3 353.59,-2154 250,-2154"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_valid.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_step.f90 -->
 <g id="file~~graph~~FileGraph_edge120" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_valid.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C88.75,-437.8 300.39,-262.63 164,-117 154.66,-107.03 141.26,-101.55 128.03,-98.61"/>
-<polygon fill="#000000" stroke="#000000" points="128.48,-95.13 118.02,-96.82 127.25,-102.02 128.48,-95.13"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge122" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" d="M822.54,-1537.28C812.69,-1559.5 791.35,-1607.9 774,-1649 757.56,-1687.93 760.53,-1701.25 738,-1737 728.86,-1751.5 716.04,-1765.78 705.23,-1776.67"/>
-<polygon fill="#000000" stroke="#000000" points="702.5,-1774.45 697.8,-1783.94 707.4,-1779.45 702.5,-1774.45"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_step.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2154C201.58,-2158.78 206.05,-2196.76 164,-2217 153.88,-2221.87 142.48,-2225.72 131.5,-2228.71"/>
+<polygon fill="#000000" stroke="#000000" points="130.42,-2225.37 121.58,-2231.23 132.14,-2232.16 130.42,-2225.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_setup.f90 -->
 <g id="file~~graph~~FileGraph_edge124" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" d="M682.5,-1420C658.26,-1408.23 629.11,-1402.85 603.61,-1400.56"/>
-<polygon fill="#000000" stroke="#000000" points="603.54,-1397.05 593.31,-1399.78 603.02,-1404.03 603.54,-1397.05"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_sort.f90 -->
-<g id="file~~graph~~FileGraph_edge128" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_sort.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C74.09,-426.73 311.67,-235.22 164,-75 154.26,-64.43 139.94,-58.89 126.04,-56.08"/>
-<polygon fill="#000000" stroke="#000000" points="126.49,-52.6 116.07,-54.48 125.38,-59.52 126.49,-52.6"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_setup.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2154C245.07,-2154.3 181.99,-2170.47 134.7,-2182.65"/>
+<polygon fill="#000000" stroke="#000000" points="133.68,-2179.3 124.87,-2185.18 135.43,-2186.08 133.68,-2179.3"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_fill.f90 -->
-<g id="file~~graph~~FileGraph_edge132" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_fill.f90</title>
-<path fill="none" stroke="#000000" d="M814.74,-1512.95C790.52,-1491.51 736.81,-1446.52 684.5,-1420"/>
-<path fill="none" stroke="#000000" d="M248,-558C59.4,-415.64 322.97,-207.84 164,-33 153.44,-21.38 137.36,-15.83 122.31,-13.3"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-9.79 112.13,-11.98 121.6,-16.73 122.49,-9.79"/>
-<path fill="none" stroke="#000000" d="M682.5,-1420C300.2,-1226.18 592.11,-816.23 250,-558"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge133" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" d="M515.32,-2052.98C506.67,-2048.63 496.87,-2043.65 488,-2039 466.75,-2027.88 443.01,-2014.99 424.71,-2004.96"/>
+<polygon fill="#000000" stroke="#000000" points="426.38,-2001.88 415.93,-2000.14 423.01,-2008.02 426.38,-2001.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_solve.f90 -->
-<g id="file~~graph~~FileGraph_edge136" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_solve.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1524C208.84,-1516.14 163.4,-1516.84 130.13,-1519.11"/>
-<polygon fill="#000000" stroke="#000000" points="129.49,-1515.65 119.78,-1519.89 130.02,-1522.63 129.49,-1515.65"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_kick.f90 -->
+<g id="file~~graph~~FileGraph_edge141" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~helio_kick.f90</title>
+<path fill="none" stroke="#000000" d="M248,-2154C208.79,-2158.04 164.06,-2157.74 131.07,-2156.59"/>
+<polygon fill="#000000" stroke="#000000" points="130.92,-2153.08 120.79,-2156.2 130.65,-2160.08 130.92,-2153.08"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90~2 -->
-<g id="file~~graph~~FileGraph_edge138" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90~2</title>
-<path fill="none" stroke="#000000" d="M248,-1524C241.62,-1522.72 165.96,-1503.33 119.34,-1491.35"/>
-<polygon fill="#000000" stroke="#000000" points="120.14,-1487.94 109.58,-1488.84 118.4,-1494.72 120.14,-1487.94"/>
-<path fill="none" stroke="#000000" d="M775.28,-1535.15C693.65,-1549.65 531.73,-1573.52 394,-1564"/>
-<path fill="none" stroke="#000000" d="M392,-1564C326.56,-1559.92 314.29,-1536.9 250,-1524"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_copy.f90 -->
+<g id="file~~graph~~FileGraph_edge6" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_copy.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C161.51,-533.26 244.83,-757.51 164,-831 153.98,-840.11 140.51,-845.37 127.44,-848.38"/>
+<polygon fill="#000000" stroke="#000000" points="126.75,-844.95 117.58,-850.26 128.06,-851.82 126.75,-844.95"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_rescale.f90 -->
-<g id="file~~graph~~FileGraph_edge140" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_rescale.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1440C210.21,-1437.63 167.45,-1437.71 134.93,-1438.34"/>
-<polygon fill="#000000" stroke="#000000" points="134.67,-1434.84 124.75,-1438.56 134.82,-1441.84 134.67,-1434.84"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_valid.f90 -->
+<g id="file~~graph~~FileGraph_edge10" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_valid.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C175.22,-543.84 234.12,-729.56 164,-789 153.94,-797.52 140.84,-802.64 128.11,-805.7"/>
+<polygon fill="#000000" stroke="#000000" points="127.16,-802.32 118.05,-807.74 128.55,-809.18 127.16,-802.32"/>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_set.f90 -->
-<g id="file~~graph~~FileGraph_edge142" class="edge">
+<g id="file~~graph~~FileGraph_edge14" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_set.f90</title>
-<path fill="none" stroke="#000000" d="M682.5,-1420C671.68,-1414.75 262,-1440.75 250,-1440"/>
-<path fill="none" stroke="#000000" d="M248,-1440C246.41,-1439.94 172.26,-1420.95 123.91,-1408.53"/>
-<polygon fill="#000000" stroke="#000000" points="124.58,-1405.08 114.03,-1405.98 122.84,-1411.86 124.58,-1405.08"/>
+<path fill="none" stroke="#000000" d="M248,-600C188.43,-554.03 223.78,-701.3 164,-747 152.69,-755.65 138.16,-760.75 124.55,-763.76"/>
+<polygon fill="#000000" stroke="#000000" points="123.56,-760.38 114.38,-765.67 124.85,-767.26 123.56,-760.38"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_peri.f90 -->
-<g id="file~~graph~~FileGraph_edge144" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_peri.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C74.09,-426.73 311.67,-880.78 164,-1041 154.26,-1051.57 139.94,-1057.11 126.04,-1059.92"/>
-<polygon fill="#000000" stroke="#000000" points="125.38,-1056.48 116.07,-1061.52 126.49,-1063.4 125.38,-1056.48"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~obl.f90 -->
+<g id="file~~graph~~FileGraph_edge16" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~obl.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C200.69,-563.49 214.16,-672.51 164,-705 150.63,-713.66 133.84,-718.76 119.03,-721.75"/>
+<polygon fill="#000000" stroke="#000000" points="118.38,-718.31 109.15,-723.51 119.61,-725.2 118.38,-718.31"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_spin_step.f90 -->
+<g id="file~~graph~~FileGraph_edge24" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_spin_step.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C211.05,-571.49 206.05,-642.76 164,-663 157.84,-665.96 151.22,-668.55 144.5,-670.79"/>
+<polygon fill="#000000" stroke="#000000" points="143.15,-667.54 134.63,-673.84 145.22,-674.23 143.15,-667.54"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_getacch_pl.f90 -->
+<g id="file~~graph~~FileGraph_edge30" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~tides_getacch_pl.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C247.43,-599.56 187.08,-615.05 139.54,-627.34"/>
+<polygon fill="#000000" stroke="#000000" points="138.42,-624.01 129.62,-629.9 140.17,-630.79 138.42,-624.01"/>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_resize.f90 -->
-<g id="file~~graph~~FileGraph_edge151" class="edge">
+<g id="file~~graph~~FileGraph_edge40" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_resize.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C88.75,-437.8 300.39,-853.37 164,-999 155.54,-1008.03 143.75,-1013.38 131.78,-1016.49"/>
-<polygon fill="#000000" stroke="#000000" points="130.8,-1013.12 121.74,-1018.61 132.25,-1019.97 130.8,-1013.12"/>
+<path fill="none" stroke="#000000" d="M248,-600C215.14,-574.65 166.63,-577.99 130.7,-585.67"/>
+<polygon fill="#000000" stroke="#000000" points="129.88,-582.27 120.93,-587.93 131.46,-589.09 129.88,-582.27"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_version.f90 -->
-<g id="file~~graph~~FileGraph_edge153" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_version.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C103.36,-448.82 289.15,-825.93 164,-957 156.09,-965.29 145.36,-970.46 134.3,-973.66"/>
-<polygon fill="#000000" stroke="#000000" points="133.48,-970.25 124.56,-975.98 135.1,-977.06 133.48,-970.25"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~gr.f90 -->
+<g id="file~~graph~~FileGraph_edge42" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~gr.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C210.51,-571.07 155.34,-561.9 119.28,-559.09"/>
+<polygon fill="#000000" stroke="#000000" points="119.41,-555.59 109.2,-558.43 118.95,-562.58 119.41,-555.59"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_copy.f90 -->
-<g id="file~~graph~~FileGraph_edge159" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_copy.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C117.9,-459.8 277.95,-798.45 164,-915 154.45,-924.77 140.99,-930.19 127.78,-933.15"/>
-<polygon fill="#000000" stroke="#000000" points="127.01,-929.73 117.79,-934.96 128.25,-936.62 127.01,-929.73"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_sort.f90 -->
+<g id="file~~graph~~FileGraph_edge48" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_sort.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C211.05,-571.49 206.05,-557.24 164,-537 152.23,-531.33 138.72,-527.06 126.16,-523.89"/>
+<polygon fill="#000000" stroke="#000000" points="126.88,-520.46 116.34,-521.59 125.28,-527.28 126.88,-520.46"/>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_minimize_bfgs.f90 -->
-<g id="file~~graph~~FileGraph_edge161" class="edge">
+<g id="file~~graph~~FileGraph_edge52" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_minimize_bfgs.f90</title>
-<path fill="none" stroke="#000000" d="M248,-558C160.81,-492.19 244.83,-400.49 164,-327 160.07,-323.43 155.61,-320.45 150.85,-317.96"/>
-<polygon fill="#000000" stroke="#000000" points="151.96,-314.62 141.4,-313.77 149.12,-321.02 151.96,-314.62"/>
-</g>
-<!-- sourcefile~operator_mag.f90 -->
-<g id="file~~graph~~FileGraph_node55" class="node">
-<title>sourcefile~operator_mag.f90</title>
-<g id="a_file~~graph~~FileGraph_node55"><a xlink:href=".././sourcefile/operator_mag.f90.html" xlink:title="operator_mag.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="298,-2708 200,-2708 200,-2684 298,-2684 298,-2708"/>
-<text text-anchor="middle" x="249" y="-2693.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag.f90</text>
-</a>
+<path fill="none" stroke="#000000" d="M248,-600C200.69,-563.49 214.16,-527.49 164,-495 159.87,-492.33 155.42,-489.99 150.8,-487.96"/>
+<polygon fill="#000000" stroke="#000000" points="151.73,-484.56 141.14,-484.18 149.18,-491.08 151.73,-484.56"/>
 </g>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_append.f90 -->
+<g id="file~~graph~~FileGraph_edge54" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_append.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C188.43,-554.03 223.78,-498.7 164,-453 155.6,-446.58 145.44,-442.12 135.19,-439.01"/>
+<polygon fill="#000000" stroke="#000000" points="135.95,-435.59 125.39,-436.43 134.17,-442.36 135.95,-435.59"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_drift.f90 -->
-<g id="file~~graph~~FileGraph_edge5" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_drift.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1776C208.66,-1773.54 163.94,-1773.72 130.99,-1774.42"/>
-<polygon fill="#000000" stroke="#000000" points="130.64,-1770.93 120.72,-1774.66 130.8,-1777.92 130.64,-1770.93"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_index.f90 -->
+<g id="file~~graph~~FileGraph_edge56" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_index.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C175.22,-543.84 234.12,-470.44 164,-411 154.48,-402.93 142.22,-397.91 130.14,-394.8"/>
+<polygon fill="#000000" stroke="#000000" points="130.61,-391.32 120.09,-392.62 129.12,-398.16 130.61,-391.32"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge12" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" d="M665.67,-1808.26C654.37,-1817.06 639.66,-1829.68 629,-1843 608.13,-1869.09 617,-1885.75 593,-1909 589.67,-1912.22 585.87,-1915.13 581.86,-1917.73"/>
-<polygon fill="#000000" stroke="#000000" points="579.79,-1914.89 572.89,-1922.94 583.3,-1920.94 579.79,-1914.89"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_rescale.f90 -->
+<g id="file~~graph~~FileGraph_edge58" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_rescale.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C161.51,-533.26 244.83,-442.49 164,-369 155.77,-361.52 145.22,-356.63 134.47,-353.46"/>
+<polygon fill="#000000" stroke="#000000" points="135.15,-350.02 124.6,-351 133.46,-356.82 135.15,-350.02"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_kick.f90 -->
-<g id="file~~graph~~FileGraph_edge52" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_kick.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1776C244.98,-1775.81 178.24,-1758.66 130.58,-1746.34"/>
-<polygon fill="#000000" stroke="#000000" points="131.28,-1742.9 120.73,-1743.79 129.53,-1749.68 131.28,-1742.9"/>
-<path fill="none" stroke="#000000" d="M539.5,-1776C413.61,-1749.41 378.42,-1784.04 250,-1776"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_exit.f90 -->
+<g id="file~~graph~~FileGraph_edge63" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_exit.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C147.5,-522.45 255.75,-414.73 164,-327 153.79,-317.24 139.66,-311.86 126.05,-308.95"/>
+<polygon fill="#000000" stroke="#000000" points="126.27,-305.44 115.82,-307.17 125.07,-312.33 126.27,-305.44"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_setup.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_fill.f90 -->
 <g id="file~~graph~~FileGraph_edge66" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_setup.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1692C210.29,-1687.33 167.36,-1687.5 134.74,-1688.75"/>
-<polygon fill="#000000" stroke="#000000" points="134.38,-1685.26 124.54,-1689.19 134.68,-1692.25 134.38,-1685.26"/>
-</g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_step.f90 -->
-<g id="file~~graph~~FileGraph_edge68" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_step.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1692C245.01,-1691.63 179.01,-1674.72 131.4,-1662.47"/>
-<polygon fill="#000000" stroke="#000000" points="132.11,-1659.04 121.55,-1659.94 130.36,-1665.82 132.11,-1659.04"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_fill.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C133.29,-511.48 266.81,-387.1 164,-285 152.94,-274.02 136.94,-268.56 122.06,-265.91"/>
+<polygon fill="#000000" stroke="#000000" points="122.42,-262.43 112.03,-264.5 121.44,-269.36 122.42,-262.43"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge71" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M392,-1692C367.1,-1679.42 356.35,-1684.7 334,-1668 303.12,-1644.92 276.95,-1608 262.37,-1584.92"/>
-<polygon fill="#000000" stroke="#000000" points="265.25,-1582.93 257.03,-1576.25 259.29,-1586.6 265.25,-1582.93"/>
-<path fill="none" stroke="#000000" d="M539.5,-1776C490.77,-1765.71 496.72,-1727.92 452,-1706 428.19,-1694.33 417.67,-1703.96 394,-1692"/>
-<path fill="none" stroke="#000000" d="M636.19,-1791.02C608.54,-1787.66 572.83,-1782.62 541.5,-1776"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90 -->
+<g id="file~~graph~~FileGraph_edge70" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_get_energy_momentum.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C118.95,-500.42 277.95,-359.55 164,-243 162.92,-241.9 161.79,-240.85 160.62,-239.85"/>
+<polygon fill="#000000" stroke="#000000" points="162.5,-236.9 152.3,-234.02 158.48,-242.63 162.5,-236.9"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge87" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" d="M636.33,-1802.88C624.04,-1804.71 610.62,-1806.71 597.84,-1808.61"/>
-<polygon fill="#000000" stroke="#000000" points="597.15,-1805.17 587.77,-1810.11 598.18,-1812.1 597.15,-1805.17"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~drift.f90 -->
+<g id="file~~graph~~FileGraph_edge72" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~drift.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C104.53,-489.29 289.15,-332.07 164,-201 152.48,-188.93 134.99,-183.47 119.21,-181.11"/>
+<polygon fill="#000000" stroke="#000000" points="119.5,-177.62 109.17,-179.97 118.71,-184.57 119.5,-177.62"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_util.f90 -->
-<g id="file~~graph~~FileGraph_edge89" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_util.f90</title>
-<path fill="none" stroke="#000000" d="M392,-1692C335.67,-1663.53 312.63,-1699.76 250,-1692"/>
-<path fill="none" stroke="#000000" d="M248,-1692C201.69,-1686.27 206.05,-1649.24 164,-1629 152.96,-1623.68 140.39,-1619.59 128.51,-1616.49"/>
-<polygon fill="#000000" stroke="#000000" points="129.28,-1613.08 118.74,-1614.12 127.63,-1619.88 129.28,-1613.08"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_spill.f90 -->
+<g id="file~~graph~~FileGraph_edge80" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_spill.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C90.04,-478.11 300.39,-304.63 164,-159 154.25,-148.59 140.07,-143.08 126.28,-140.23"/>
+<polygon fill="#000000" stroke="#000000" points="126.82,-136.78 116.39,-138.61 125.69,-143.68 126.82,-136.78"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_coord.f90 -->
-<g id="file~~graph~~FileGraph_edge111" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_coord.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2448C213.01,-2464.48 169.02,-2463.58 135.27,-2459.04"/>
-<polygon fill="#000000" stroke="#000000" points="135.55,-2455.54 125.14,-2457.53 134.52,-2462.47 135.55,-2455.54"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge84" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" d="M683,-1462C664.59,-1438.64 632.4,-1432.78 603.37,-1433.14"/>
+<polygon fill="#000000" stroke="#000000" points="603.12,-1429.64 593.26,-1433.51 603.38,-1436.64 603.12,-1429.64"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_gr.f90 -->
-<g id="file~~graph~~FileGraph_edge126" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~whm_gr.f90</title>
-<path fill="none" stroke="#000000" d="M248,-2448C246.45,-2448.24 174.66,-2429.76 126.3,-2417.24"/>
-<polygon fill="#000000" stroke="#000000" points="126.93,-2413.78 116.37,-2414.67 125.17,-2420.56 126.93,-2413.78"/>
-<path fill="none" stroke="#000000" d="M668.64,-1808.02C645.6,-1827.94 601.16,-1866.08 593,-1871 549.83,-1897.06 520.5,-1875.44 488,-1914 440.46,-1970.39 477.85,-2006.92 452,-2076 419.03,-2164.1 342.98,-2433.73 250,-2448"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_solve.f90 -->
+<g id="file~~graph~~FileGraph_edge94" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_solve.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C75.5,-466.89 311.67,-277.22 164,-117 155.14,-107.39 142.51,-101.94 129.85,-98.92"/>
+<polygon fill="#000000" stroke="#000000" points="130.24,-95.43 119.76,-96.98 128.92,-102.3 130.24,-95.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_set.f90 -->
-<g id="file~~graph~~FileGraph_edge9" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_set.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1272C188.69,-1264.66 214.16,-1199.49 164,-1167 155.04,-1161.19 144.54,-1156.99 134.14,-1153.95"/>
-<polygon fill="#000000" stroke="#000000" points="134.8,-1150.5 124.24,-1151.37 133.04,-1157.28 134.8,-1150.5"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="file~~graph~~FileGraph_edge103" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" d="M392,-1482C358.63,-1479.69 320.75,-1479.83 292.51,-1480.47"/>
+<polygon fill="#000000" stroke="#000000" points="292.1,-1476.98 282.19,-1480.74 292.28,-1483.98 292.1,-1476.98"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="file~~graph~~FileGraph_edge33" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" d="M536.19,-1412.18C517.45,-1481.08 424.69,-1822.14 400.03,-1912.82"/>
-<polygon fill="#000000" stroke="#000000" points="396.62,-1912.04 397.37,-1922.61 403.37,-1913.87 396.62,-1912.04"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~discard.f90 -->
+<g id="file~~graph~~FileGraph_edge108" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~discard.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C60.92,-455.64 322.97,-249.84 164,-75 154.01,-64.02 139.09,-58.45 124.77,-55.74"/>
+<polygon fill="#000000" stroke="#000000" points="124.92,-52.22 114.52,-54.22 123.9,-59.15 124.92,-52.22"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_regime.f90 -->
-<g id="file~~graph~~FileGraph_edge39" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_regime.f90</title>
-<path fill="none" stroke="#000000" d="M392,-1272C328.94,-1274.45 312.63,-1279.76 250,-1272"/>
-<path fill="none" stroke="#000000" d="M248,-1272C173.32,-1262.75 223.78,-1170.7 164,-1125 157.83,-1120.29 150.71,-1116.62 143.3,-1113.78"/>
-<polygon fill="#000000" stroke="#000000" points="144.41,-1110.46 133.81,-1110.6 142.18,-1117.1 144.41,-1110.46"/>
-<path fill="none" stroke="#000000" d="M533.45,-1387.9C516.28,-1355.48 463.93,-1269.29 394,-1272"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~netcdf.f90 -->
+<g id="file~~graph~~FileGraph_edge111" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~netcdf.f90</title>
+<path fill="none" stroke="#000000" d="M827.79,-1857.79C824.6,-1810.49 808.43,-1636.01 739,-1515 722.27,-1485.83 705.82,-1488.41 685,-1462"/>
+<path fill="none" stroke="#000000" d="M248,-600C46.31,-444.37 334.28,-222.48 164,-33 153.51,-21.32 137.44,-15.76 122.37,-13.24"/>
+<polygon fill="#000000" stroke="#000000" points="122.55,-9.73 112.18,-11.93 121.66,-16.67 122.55,-9.73"/>
+<path fill="none" stroke="#000000" d="M683,-1462C417.6,-1125.3 589.42,-861.92 250,-600"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_generate.f90 -->
-<g id="file~~graph~~FileGraph_edge59" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_generate.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1272C201.69,-1266.27 206.05,-1314.76 164,-1335 158.8,-1337.5 153.27,-1339.73 147.62,-1341.72"/>
-<polygon fill="#000000" stroke="#000000" points="146.49,-1338.41 138.07,-1344.83 148.66,-1345.06 146.49,-1338.41"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~user_getacch.f90 -->
+<g id="file~~graph~~FileGraph_edge113" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~user_getacch.f90</title>
+<path fill="none" stroke="#000000" d="M392,-1482C306.36,-1476.08 277.99,-1425.13 200,-1461 177.66,-1471.27 184.86,-1489.98 164,-1503 156.48,-1507.69 147.94,-1511.34 139.3,-1514.18"/>
+<polygon fill="#000000" stroke="#000000" points="138.15,-1510.87 129.54,-1517.05 140.12,-1517.58 138.15,-1510.87"/>
+<path fill="none" stroke="#000000" d="M539.5,-1482C474.94,-1478.22 458.6,-1485.02 394,-1482"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge78" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M392,-1272C266.71,-1276.86 379.45,-1442.67 298,-1538 295.37,-1541.07 292.29,-1543.84 288.97,-1546.33"/>
-<polygon fill="#000000" stroke="#000000" points="286.85,-1543.53 280.38,-1551.92 290.67,-1549.4 286.85,-1543.53"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_peri.f90 -->
+<g id="file~~graph~~FileGraph_edge117" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_peri.f90</title>
+<path fill="none" stroke="#000000" d="M683,-1462C643.68,-1412.12 604.91,-1485.71 541.5,-1482"/>
+<path fill="none" stroke="#000000" d="M539.5,-1482C500.18,-1479.7 490.92,-1474.02 452,-1468 340.86,-1450.81 310.02,-1421.65 200,-1445 182.87,-1448.63 180.53,-1455.23 164,-1461 151.77,-1465.27 138.23,-1469.11 125.78,-1472.31"/>
+<polygon fill="#000000" stroke="#000000" points="124.94,-1468.91 116.08,-1474.73 126.63,-1475.71 124.94,-1468.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_util.f90 -->
-<g id="file~~graph~~FileGraph_edge85" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_util.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1272C246.52,-1271.82 181.61,-1288.49 133.65,-1300.88"/>
-<polygon fill="#000000" stroke="#000000" points="132.51,-1297.56 123.71,-1303.45 134.26,-1304.33 132.51,-1297.56"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90 -->
+<g id="file~~graph~~FileGraph_edge127" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C60.92,-455.64 322.97,-950.16 164,-1125 152.86,-1137.26 135.57,-1142.76 119.82,-1145.1"/>
+<polygon fill="#000000" stroke="#000000" points="119.33,-1141.63 109.78,-1146.21 120.11,-1148.59 119.33,-1141.63"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_io.f90 -->
-<g id="file~~graph~~FileGraph_edge104" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_io.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1272C209.01,-1267.17 164.43,-1267.52 131.45,-1268.88"/>
-<polygon fill="#000000" stroke="#000000" points="131,-1265.4 121.17,-1269.35 131.32,-1272.39 131,-1265.4"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge129" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" d="M792.07,-1882.01C785.58,-1885.6 779.47,-1890.19 775,-1896 724.42,-1961.67 789.7,-2013.42 739,-2079 736.56,-2082.15 733.65,-2084.94 730.45,-2087.41"/>
+<polygon fill="#000000" stroke="#000000" points="728.5,-2084.5 722.04,-2092.89 732.33,-2090.36 728.5,-2084.5"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_placeholder.f90 -->
-<g id="file~~graph~~FileGraph_edge110" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_placeholder.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1272C245.18,-1271.65 186.01,-1256.51 139.33,-1244.51"/>
-<polygon fill="#000000" stroke="#000000" points="140.13,-1241.11 129.58,-1242.01 138.39,-1247.89 140.13,-1241.11"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~setup.f90 -->
+<g id="file~~graph~~FileGraph_edge131" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~setup.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C75.5,-466.89 311.67,-922.78 164,-1083 153.12,-1094.8 136.54,-1100.33 121.21,-1102.8"/>
+<polygon fill="#000000" stroke="#000000" points="120.38,-1099.37 110.88,-1104.06 121.23,-1106.32 120.38,-1099.37"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="file~~graph~~FileGraph_edge135" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~fraggle_setup.f90</title>
-<path fill="none" stroke="#000000" d="M248,-1272C201.69,-1266.27 206.05,-1229.24 164,-1209 156.47,-1205.38 148.24,-1202.32 140,-1199.76"/>
-<polygon fill="#000000" stroke="#000000" points="140.94,-1196.39 130.36,-1196.98 139,-1203.12 140.94,-1196.39"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" d="M539.5,-1987C511.69,-1985.07 480.82,-1984.99 454.7,-1985.52"/>
+<polygon fill="#000000" stroke="#000000" points="454.47,-1982.03 444.56,-1985.77 454.64,-1989.03 454.47,-1982.03"/>
+<path fill="none" stroke="#000000" d="M799.18,-1882.08C791.04,-1886.01 782.4,-1890.73 775,-1896 756.57,-1909.13 758.54,-1920.59 739,-1932 660.31,-1977.95 632.4,-1993.31 541.5,-1987"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="file~~graph~~FileGraph_edge79" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" d="M391.07,-2643.97C382.86,-2538.74 322.86,-1776.51 298,-1678 289.49,-1644.26 272.52,-1607.57 261.21,-1585.17"/>
-<polygon fill="#000000" stroke="#000000" points="264.3,-1583.51 256.61,-1576.22 258.07,-1586.72 264.3,-1583.51"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="file~~graph~~FileGraph_edge138" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" d="M793.48,-1882.04C786.65,-1885.67 780.05,-1890.26 775,-1896 741.86,-1933.67 774.84,-1967.88 739,-2003 718.79,-2022.81 648.69,-2041.71 597.74,-2053.32"/>
+<polygon fill="#000000" stroke="#000000" points="596.82,-2049.94 587.82,-2055.55 598.35,-2056.77 596.82,-2049.94"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_mag.f90 -->
-<g id="file~~graph~~FileGraph_edge115" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_mag.f90</title>
-<path fill="none" stroke="#000000" d="M349.4,-2668C334.79,-2672.12 318.26,-2676.77 302.93,-2681.09"/>
-<polygon fill="#000000" stroke="#000000" points="301.74,-2677.79 293.07,-2683.87 303.64,-2684.53 301.74,-2677.79"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_version.f90 -->
+<g id="file~~graph~~FileGraph_edge146" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_version.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C90.04,-478.11 300.39,-895.37 164,-1041 156.17,-1049.36 145.47,-1054.57 134.41,-1057.76"/>
+<polygon fill="#000000" stroke="#000000" points="133.59,-1054.36 124.67,-1060.09 135.21,-1061.17 133.59,-1054.36"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_cross.f90 -->
-<g id="file~~graph~~FileGraph_edge130" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~operator_cross.f90</title>
-<path fill="none" stroke="#000000" d="M333.94,-2647C292.65,-2643.86 238,-2646.67 200,-2675 166.12,-2700.25 195.82,-2735.2 164,-2763 158,-2768.24 150.85,-2772.2 143.33,-2775.19"/>
-<polygon fill="#000000" stroke="#000000" points="141.99,-2771.95 133.65,-2778.47 144.24,-2778.57 141.99,-2771.95"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~io.f90 -->
+<g id="file~~graph~~FileGraph_edge151" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~io.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C104.53,-489.29 289.15,-867.93 164,-999 152.48,-1011.07 134.99,-1016.53 119.21,-1018.89"/>
+<polygon fill="#000000" stroke="#000000" points="118.71,-1015.43 109.17,-1020.03 119.5,-1022.38 118.71,-1015.43"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_coord.f90 -->
+<g id="file~~graph~~FileGraph_edge153" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~util_coord.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C118.95,-500.42 277.95,-840.45 164,-957 155.1,-966.1 142.82,-971.43 130.49,-974.51"/>
+<polygon fill="#000000" stroke="#000000" points="129.77,-971.08 120.67,-976.52 131.17,-977.94 129.77,-971.08"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90~2 -->
+<g id="file~~graph~~FileGraph_edge158" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~orbel.f90~2</title>
+<path fill="none" stroke="#000000" d="M248,-600C133.29,-511.48 266.81,-812.9 164,-915 152.44,-926.48 135.47,-931.93 120.04,-934.43"/>
+<polygon fill="#000000" stroke="#000000" points="119.18,-931.01 109.7,-935.73 120.05,-937.96 119.18,-931.01"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~kick.f90 -->
+<g id="file~~graph~~FileGraph_edge161" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~kick.f90</title>
+<path fill="none" stroke="#000000" d="M248,-600C147.5,-522.45 255.75,-785.27 164,-873 152.14,-884.34 134.98,-889.76 119.51,-892.28"/>
+<polygon fill="#000000" stroke="#000000" points="118.63,-888.86 109.15,-893.59 119.51,-895.81 118.63,-888.86"/>
 </g>
 </g>
 </svg>
diff --git a/docs/lists/modules.html b/docs/lists/modules.html
index c775f8e9e..497f415d9 100644
--- a/docs/lists/modules.html
+++ b/docs/lists/modules.html
@@ -470,1789 +470,1803 @@ <h1>Modules</h1>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~graph~~ModuleGraph Pages: 1 -->
-<svg id="modulegraphModuleGraph" width="855pt" height="2479pt"
- viewBox="0.00 0.00 855.00 2478.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~graph~~ModuleGraph" class="graph" transform="scale(0.98 0.98) rotate(0) translate(4 2529.77)">
+<svg id="modulegraphModuleGraph" width="855pt" height="2477pt"
+ viewBox="0.00 0.00 855.00 2476.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~graph~~ModuleGraph" class="graph" transform="scale(0.98 0.98) rotate(0) translate(4 2528)">
 <title>module~~graph~~ModuleGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-2529.77 870,-2529.77 870,4 -4,4"/>
-<!-- module~s_whm_coord -->
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-2528 870,-2528 870,4 -4,4"/>
+<!-- module~s_symba_setup -->
 <g id="module~~graph~~ModuleGraph_node1" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~graph~~ModuleGraph_node1"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="515,-2150 436,-2150 436,-2126 515,-2126 515,-2150"/>
-<text text-anchor="middle" x="475.5" y="-2135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~graph~~ModuleGraph_node1"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="838.5,-1045 750.5,-1045 750.5,-1021 838.5,-1021 838.5,-1045"/>
+<text text-anchor="middle" x="794.5" y="-1030.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~graph~~ModuleGraph_node16" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~graph~~ModuleGraph_node16"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="340,-2339 264,-2339 264,-2315 340,-2315 340,-2339"/>
-<text text-anchor="middle" x="302" y="-2324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~symba_classes -->
+<g id="module~~graph~~ModuleGraph_node65" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~graph~~ModuleGraph_node65"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="685.5,-1171 600.5,-1171 600.5,-1147 685.5,-1147 685.5,-1171"/>
+<text text-anchor="middle" x="643" y="-1156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~whm_classes -->
+<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
 <g id="module~~graph~~ModuleGraph_edge2" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M435.62,-2140.32C419.49,-2142.98 401.44,-2148.34 388,-2159 340.41,-2196.72 317.13,-2268.17 307.94,-2304.53"/>
-<polygon fill="#000000" stroke="#000000" points="304.45,-2304.07 305.52,-2314.61 311.25,-2305.7 304.45,-2304.07"/>
+<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M750.14,-1041.21C740.67,-1044.25 731.07,-1048.39 723,-1054 706.43,-1065.53 675.01,-1111.3 657.19,-1138.46"/>
+<polygon fill="#000000" stroke="#000000" points="654.23,-1136.59 651.71,-1146.88 660.1,-1140.41 654.23,-1136.59"/>
 </g>
 <!-- module~swiftest -->
-<g id="module~~graph~~ModuleGraph_node90" class="node">
+<g id="module~~graph~~ModuleGraph_node91" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~graph~~ModuleGraph_node90"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="329,-1356 275,-1356 275,-1332 329,-1332 329,-1356"/>
-<text text-anchor="middle" x="302" y="-1341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~graph~~ModuleGraph_node91"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="329,-1336 275,-1336 275,-1312 329,-1312 329,-1336"/>
+<text text-anchor="middle" x="302" y="-1321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge1" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.56,-2138.32C418.41,-2136.3 399.56,-2130.7 388,-2117 350.79,-2072.91 359.46,-1656.21 352,-1599 340.67,-1512.05 318.27,-1410.01 308.16,-1366.01"/>
-<polygon fill="#000000" stroke="#000000" points="311.54,-1365.08 305.87,-1356.12 304.72,-1366.66 311.54,-1365.08"/>
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.19,-1038.95C718.97,-1044.67 676.75,-1055.44 644,-1075"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~graph~~ModuleGraph_node2" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~graph~~ModuleGraph_node2"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="508.5,-2318 442.5,-2318 442.5,-2294 508.5,-2294 508.5,-2318"/>
-<text text-anchor="middle" x="475.5" y="-2303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~graph~~ModuleGraph_node2"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-1150 397,-1150 397,-1126 554,-1126 554,-1150"/>
+<text text-anchor="middle" x="475.5" y="-1135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_node68" class="node">
+<title>module~swiftest_classes</title>
+<g id="a_module~~graph~~ModuleGraph_node68"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="214.5,-856 125.5,-856 125.5,-832 214.5,-832 214.5,-856"/>
+<text text-anchor="middle" x="170" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+</a>
+</g>
+</g>
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge4" class="edge">
-<title>module~s_whm_util&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M442.24,-2309.95C416.29,-2313.13 379.45,-2317.64 350.19,-2321.22"/>
-<polygon fill="#000000" stroke="#000000" points="349.68,-2317.76 340.18,-2322.45 350.53,-2324.71 349.68,-2317.76"/>
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M400.41,-1125.9C395.92,-1123.43 391.72,-1120.49 388,-1117 295.33,-1030.05 429.85,-851.68 303,-844"/>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge3" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.44,-2307.04C423.61,-2305.79 401.02,-2300.7 388,-2285 339.27,-2226.26 361.22,-1674.77 352,-1599 341.4,-1511.95 318.62,-1409.97 308.29,-1366"/>
-<polygon fill="#000000" stroke="#000000" points="311.66,-1365.04 305.94,-1356.11 304.85,-1366.65 311.66,-1365.04"/>
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.76,-1150.05C397.5,-1152.51 392.49,-1155.46 388,-1159 340.95,-1196.02 317.42,-1266.2 308.06,-1301.92"/>
+<polygon fill="#000000" stroke="#000000" points="304.61,-1301.28 305.6,-1311.83 311.4,-1302.97 304.61,-1301.28"/>
 </g>
-<!-- module~s_util_sort -->
+<!-- module~s_discard -->
 <g id="module~~graph~~ModuleGraph_node3" class="node">
-<title>module~s_util_sort</title>
-<g id="a_module~~graph~~ModuleGraph_node3"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="506,-1604 445,-1604 445,-1580 506,-1580 506,-1604"/>
-<text text-anchor="middle" x="475.5" y="-1589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~graph~~ModuleGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="214.5,-1305 125.5,-1305 125.5,-1281 214.5,-1281 214.5,-1305"/>
-<text text-anchor="middle" x="170" y="-1290.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~s_discard</title>
+<g id="a_module~~graph~~ModuleGraph_node3"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="504.5,-1108 446.5,-1108 446.5,-1084 504.5,-1084 504.5,-1108"/>
+<text text-anchor="middle" x="475.5" y="-1093.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest_classes -->
+<!-- module~s_discard&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge6" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M444.77,-1600.24C401.95,-1611.35 325.56,-1628.1 303,-1613"/>
+<title>module~s_discard&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M446.45,-1095.77C427.81,-1094.19 403.92,-1089.19 388,-1075 306.35,-1002.19 412.2,-850.62 303,-844"/>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest -->
+<!-- module~s_discard&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge5" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.85,-1591.6C426.47,-1589.85 403.5,-1584.74 388,-1571 326.04,-1516.07 309.11,-1411.46 304.59,-1366.01"/>
-<polygon fill="#000000" stroke="#000000" points="308.08,-1365.68 303.71,-1356.03 301.11,-1366.3 308.08,-1365.68"/>
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.21,-1096.45C427.7,-1098.16 404.06,-1103.21 388,-1117 331.05,-1165.91 311.65,-1258.92 305.55,-1301.59"/>
+<polygon fill="#000000" stroke="#000000" points="302.05,-1301.39 304.22,-1311.76 308.99,-1302.3 302.05,-1301.39"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_helio_step -->
 <g id="module~~graph~~ModuleGraph_node4" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~graph~~ModuleGraph_node4"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="505,-2360 446,-2360 446,-2336 505,-2336 505,-2360"/>
-<text text-anchor="middle" x="475.5" y="-2345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~graph~~ModuleGraph_node4"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="679.5,-1648 606.5,-1648 606.5,-1624 679.5,-1624 679.5,-1648"/>
+<text text-anchor="middle" x="643" y="-1633.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~whm_classes -->
+<!-- module~helio_classes -->
+<g id="module~~graph~~ModuleGraph_node70" class="node">
+<title>module~helio_classes</title>
+<g id="a_module~~graph~~ModuleGraph_node70"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="513.5,-2482 437.5,-2482 437.5,-2458 513.5,-2458 513.5,-2482"/>
+<text text-anchor="middle" x="475.5" y="-2467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+</a>
+</g>
+</g>
+<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
 <g id="module~~graph~~ModuleGraph_edge8" class="edge">
-<title>module~whm_drift&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M445.79,-2344.49C419.75,-2341.3 380.86,-2336.53 350.24,-2332.78"/>
-<polygon fill="#000000" stroke="#000000" points="350.55,-2329.3 340.2,-2331.56 349.7,-2336.24 350.55,-2329.3"/>
+<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M607.71,-1648.16C604.31,-1650.61 601.28,-1653.53 599,-1657 550.65,-1730.64 619.01,-2381.01 563,-2449 553.42,-2460.63 538.59,-2466.45 523.9,-2469.19"/>
+<polygon fill="#000000" stroke="#000000" points="523.22,-2465.75 513.82,-2470.64 524.21,-2472.68 523.22,-2465.75"/>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge7" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.81,-2349.24C426.37,-2348.39 401.79,-2343.67 388,-2327 336.38,-2264.59 361.67,-1679.41 352,-1599 341.54,-1511.94 318.68,-1409.96 308.31,-1366"/>
-<polygon fill="#000000" stroke="#000000" points="311.68,-1365.03 305.96,-1356.11 304.87,-1366.65 311.68,-1365.03"/>
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.66,-1623.74C605.01,-1621.29 601.66,-1618.41 599,-1615 551.49,-1554.11 617.4,-1499.82 563,-1445 535.27,-1417.06 508.43,-1449.02 476.5,-1426"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_util_sort -->
 <g id="module~~graph~~ModuleGraph_node5" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~graph~~ModuleGraph_node5"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="508.5,-1562 442.5,-1562 442.5,-1538 508.5,-1538 508.5,-1562"/>
-<text text-anchor="middle" x="475.5" y="-1547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_util_sort</title>
+<g id="a_module~~graph~~ModuleGraph_node5"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="506,-1066 445,-1066 445,-1042 506,-1042 506,-1066"/>
+<text text-anchor="middle" x="475.5" y="-1051.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_sort&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge10" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M442.37,-1556.03C425.86,-1559.57 405.57,-1564.61 388,-1571 348.4,-1585.39 338.02,-1636.44 303,-1613"/>
+<title>module~s_util_sort&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M444.73,-1053.21C426.54,-1051.29 403.81,-1046.13 388,-1033 317.15,-974.15 394.94,-849.57 303,-844"/>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<!-- module~s_util_sort&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge9" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.28,-1548.88C424.55,-1546.75 403.15,-1541.48 388,-1529 336.24,-1486.36 314.52,-1405.32 306.74,-1366.21"/>
-<polygon fill="#000000" stroke="#000000" points="310.13,-1365.33 304.86,-1356.14 303.25,-1366.61 310.13,-1365.33"/>
+<title>module~s_util_sort&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.71,-1054.25C426.28,-1055.94 403.29,-1061.04 388,-1075 320.72,-1136.44 306.68,-1253.3 303.76,-1301.92"/>
+<polygon fill="#000000" stroke="#000000" points="300.26,-1301.82 303.26,-1311.98 307.25,-1302.17 300.26,-1301.82"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_util_copy -->
 <g id="module~~graph~~ModuleGraph_node6" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~graph~~ModuleGraph_node6"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-1520 397,-1520 397,-1496 554,-1496 554,-1520"/>
-<text text-anchor="middle" x="475.5" y="-1505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~graph~~ModuleGraph_node6"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="508.5,-898 442.5,-898 442.5,-874 508.5,-874 508.5,-898"/>
+<text text-anchor="middle" x="475.5" y="-883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_copy&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge12" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M408.36,-1520.06C401.27,-1522.51 394.34,-1525.46 388,-1529 341.62,-1554.87 347.14,-1642.54 303,-1613"/>
+<title>module~s_util_copy&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M442.45,-878.25C426.14,-874.3 406.01,-869.41 388,-865 350.2,-855.74 341.84,-846.35 303,-844"/>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge11" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M403.43,-1495.84C397.95,-1493.41 392.72,-1490.49 388,-1487 346.05,-1456.01 320.99,-1397.58 309.86,-1365.85"/>
-<polygon fill="#000000" stroke="#000000" points="313.12,-1364.55 306.62,-1356.19 306.48,-1366.78 313.12,-1364.55"/>
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.39,-885.74C424.03,-887.34 401.94,-892.53 388,-907 332.42,-964.68 310.01,-1223.82 304.46,-1301.76"/>
+<polygon fill="#000000" stroke="#000000" points="300.95,-1301.68 303.76,-1311.9 307.94,-1302.16 300.95,-1301.68"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_setup -->
 <g id="module~~graph~~ModuleGraph_node7" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~graph~~ModuleGraph_node7"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="504.5,-1478 446.5,-1478 446.5,-1454 504.5,-1454 504.5,-1478"/>
-<text text-anchor="middle" x="475.5" y="-1463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_setup</title>
+<g id="a_module~~graph~~ModuleGraph_node7"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-856 448.5,-856 448.5,-832 502.5,-832 502.5,-856"/>
+<text text-anchor="middle" x="475.5" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest_classes -->
+<!-- module~s_setup&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge14" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M446.27,-1467.66C428.24,-1469.9 405.13,-1475.09 388,-1487 332.54,-1525.57 359.14,-1650.57 303,-1613"/>
+<title>module~s_setup&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.32,-844.98C414.66,-846.02 354.42,-847.11 303,-844"/>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
+<!-- module~s_setup&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge13" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.28,-1463.67C428.48,-1461.15 405.6,-1455.91 388,-1445 355.47,-1424.84 329.21,-1388.01 314.88,-1364.83"/>
-<polygon fill="#000000" stroke="#000000" points="317.8,-1362.88 309.66,-1356.11 311.79,-1366.48 317.8,-1362.88"/>
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.1,-843.26C428.75,-844.21 403.3,-848.84 388,-865 327.15,-929.29 308.26,-1218.11 304.02,-1301.43"/>
+<polygon fill="#000000" stroke="#000000" points="300.52,-1301.42 303.53,-1311.58 307.51,-1301.76 300.52,-1301.42"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_orbel -->
 <g id="module~~graph~~ModuleGraph_node8" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~graph~~ModuleGraph_node8"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-1354 603.5,-1354 603.5,-1330 682.5,-1330 682.5,-1354"/>
-<text text-anchor="middle" x="643" y="-1339.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
-</a>
-</g>
-</g>
-<!-- module~helio_classes -->
-<g id="module~~graph~~ModuleGraph_node22" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~graph~~ModuleGraph_node22"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="513.5,-2444 437.5,-2444 437.5,-2420 513.5,-2420 513.5,-2444"/>
-<text text-anchor="middle" x="475.5" y="-2429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~s_orbel</title>
+<g id="a_module~~graph~~ModuleGraph_node8"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-814 448.5,-814 448.5,-790 502.5,-790 502.5,-814"/>
+<text text-anchor="middle" x="475.5" y="-799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
+<!-- module~s_orbel&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge16" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M607.67,-1354.14C604.28,-1356.59 601.26,-1359.51 599,-1363 535.6,-1460.75 636.58,-2320.66 563,-2411 553.49,-2422.68 538.67,-2428.51 523.97,-2431.25"/>
-<polygon fill="#000000" stroke="#000000" points="523.29,-2427.82 513.88,-2432.69 524.28,-2434.75 523.29,-2427.82"/>
+<title>module~s_orbel&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.38,-808.31C431.21,-812.47 408.26,-818.04 388,-823 350.2,-832.26 341.84,-846.35 303,-844"/>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge15" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.97,-1354.11C573.12,-1370.93 499.58,-1397.82 476.5,-1384"/>
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.43,-801.18C429,-802.05 403.28,-806.61 388,-823 321.72,-894.09 306.57,-1213.96 303.63,-1301.69"/>
+<polygon fill="#000000" stroke="#000000" points="300.13,-1301.74 303.31,-1311.84 307.12,-1301.96 300.13,-1301.74"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~drift_implementation -->
 <g id="module~~graph~~ModuleGraph_node9" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~graph~~ModuleGraph_node9"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="678,-1312 608,-1312 608,-1288 678,-1288 678,-1312"/>
-<text text-anchor="middle" x="643" y="-1297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~graph~~ModuleGraph_node9"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="530,-772 421,-772 421,-748 530,-748 530,-772"/>
+<text text-anchor="middle" x="475.5" y="-757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge18" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M607.67,-1312.14C604.27,-1314.59 601.26,-1317.51 599,-1321 533.12,-1422.71 639.46,-2316.99 563,-2411 553.49,-2422.69 538.68,-2428.52 523.98,-2431.26"/>
-<polygon fill="#000000" stroke="#000000" points="523.3,-2427.82 513.89,-2432.7 524.29,-2434.75 523.3,-2427.82"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M420.63,-767.39C409.3,-770.47 397.81,-774.83 388,-781 366.61,-794.46 372.45,-810.17 352,-825 333.09,-838.71 326.31,-845.41 303,-844"/>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge17" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.5,-1384C440.73,-1363.78 426.33,-1373.94 388,-1365 372,-1361.27 354.37,-1356.94 339.32,-1353.19"/>
-<polygon fill="#000000" stroke="#000000" points="339.93,-1349.74 329.38,-1350.7 338.23,-1356.53 339.93,-1349.74"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.75,-1312.15C607.94,-1314.74 603.17,-1317.7 599,-1321 579.19,-1336.68 584.53,-1351.78 563,-1365 529.46,-1385.6 510.27,-1404.22 476.5,-1384"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.83,-762.99C408.54,-766.17 396.58,-771.68 388,-781 351.95,-820.17 314.16,-1203.69 305.06,-1301.42"/>
+<polygon fill="#000000" stroke="#000000" points="301.55,-1301.37 304.11,-1311.65 308.52,-1302.02 301.55,-1301.37"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_node89" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~graph~~ModuleGraph_node89"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="88,-1204 0,-1204 0,-1180 88,-1180 88,-1204"/>
-<text text-anchor="middle" x="44" y="-1189.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~s_symba_collision -->
+<g id="module~~graph~~ModuleGraph_node10" class="node">
+<title>module~s_symba_collision</title>
+<g id="a_module~~graph~~ModuleGraph_node10"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="844,-1003 745,-1003 745,-979 844,-979 844,-1003"/>
+<text text-anchor="middle" x="794.5" y="-988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
+<g id="module~~graph~~ModuleGraph_edge20" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M744.83,-999.57C736.93,-1002.56 729.29,-1006.58 723,-1012 694.39,-1036.67 704.92,-1055.74 687,-1089 677.88,-1105.94 666.43,-1124.46 657.64,-1138.19"/>
+<polygon fill="#000000" stroke="#000000" points="654.53,-1136.56 652.04,-1146.86 660.41,-1140.36 654.53,-1136.56"/>
+</g>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge19" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.45,-1280.78C138.33,-1276.72 130.65,-1271.97 124,-1267 101.55,-1250.23 78.62,-1227.75 63.29,-1211.78"/>
-<polygon fill="#000000" stroke="#000000" points="65.43,-1208.95 56.01,-1204.09 60.35,-1213.76 65.43,-1208.95"/>
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642,-1075C612.9,-1092.39 612.81,-1107.04 599,-1138 571.6,-1199.43 611.13,-1238.01 563,-1285 534.84,-1312.5 515.77,-1301.33 476.5,-1304"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.75,-1002.84C737.27,-1005.41 729.79,-1008.45 723,-1012 683.19,-1032.79 682.55,-1051.97 644,-1075"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.5,-1304C427.61,-1307.19 373.83,-1313.97 339.19,-1318.75"/>
+<polygon fill="#000000" stroke="#000000" points="338.5,-1315.31 329.08,-1320.16 339.47,-1322.25 338.5,-1315.31"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_whm_kick -->
 <g id="module~~graph~~ModuleGraph_node11" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~graph~~ModuleGraph_node11"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="504.5,-1436 446.5,-1436 446.5,-1412 504.5,-1412 504.5,-1436"/>
-<text text-anchor="middle" x="475.5" y="-1421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_whm_kick</title>
+<g id="a_module~~graph~~ModuleGraph_node11"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="510.5,-1814 440.5,-1814 440.5,-1790 510.5,-1790 510.5,-1814"/>
+<text text-anchor="middle" x="475.5" y="-1799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge21" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M446.16,-1424.91C427.85,-1426.83 404.47,-1431.94 388,-1445 322.42,-1496.98 372.54,-1659.54 303,-1613"/>
-<path fill="none" stroke="#000000" d="M301,-1613C197.32,-1543.61 176.3,-1375.65 172.06,-1315.17"/>
-<polygon fill="#000000" stroke="#000000" points="175.55,-1314.94 171.45,-1305.18 168.57,-1315.37 175.55,-1314.94"/>
-</g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge20" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.13,-1417.57C428.89,-1413.15 406.68,-1406.54 388,-1398 366.54,-1388.18 344.07,-1373.7 327.63,-1362.21"/>
-<polygon fill="#000000" stroke="#000000" points="329.34,-1359.13 319.16,-1356.18 325.28,-1364.83 329.34,-1359.13"/>
-</g>
-<!-- module~s_util_coord -->
-<g id="module~~graph~~ModuleGraph_node12" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~graph~~ModuleGraph_node12"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="510.5,-1196 440.5,-1196 440.5,-1172 510.5,-1172 510.5,-1196"/>
-<text text-anchor="middle" x="475.5" y="-1181.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<!-- module~whm_classes -->
+<g id="module~~graph~~ModuleGraph_node59" class="node">
+<title>module~whm_classes</title>
+<g id="a_module~~graph~~ModuleGraph_node59"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="340,-1940 264,-1940 264,-1916 340,-1916 340,-1940"/>
+<text text-anchor="middle" x="302" y="-1925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge23" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M440.13,-1182.66C422.83,-1180.38 402.5,-1175.05 388,-1163 317.15,-1104.15 378.46,-921.18 303,-974"/>
-</g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
+<!-- module~s_whm_kick&#45;&gt;module~whm_classes -->
 <g id="module~~graph~~ModuleGraph_edge22" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.32,-1188.5C423.27,-1192.1 403.12,-1198.54 388,-1210 348.92,-1239.63 323.09,-1292.85 310.98,-1322.52"/>
-<polygon fill="#000000" stroke="#000000" points="307.67,-1321.37 307.27,-1331.96 314.19,-1323.93 307.67,-1321.37"/>
+<title>module~s_whm_kick&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M440.47,-1805.09C423.66,-1807.85 403.67,-1813.08 388,-1823 354.58,-1844.15 328.31,-1882.99 314.27,-1907.04"/>
+<polygon fill="#000000" stroke="#000000" points="311.21,-1905.34 309.34,-1915.76 317.31,-1908.78 311.21,-1905.34"/>
 </g>
-<!-- module~s_util_index -->
-<g id="module~~graph~~ModuleGraph_node13" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~graph~~ModuleGraph_node13"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="510,-1154 441,-1154 441,-1130 510,-1130 510,-1154"/>
-<text text-anchor="middle" x="475.5" y="-1139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge21" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.12,-1802.19C422.16,-1800.42 401.22,-1795.08 388,-1781 325.27,-1714.21 368.68,-1668.1 352,-1578 336.1,-1492.1 316.07,-1390.1 307.37,-1346.05"/>
+<polygon fill="#000000" stroke="#000000" points="310.79,-1345.28 305.41,-1336.15 303.92,-1346.64 310.79,-1345.28"/>
+</g>
+<!-- module~s_operator_cross -->
+<g id="module~~graph~~ModuleGraph_node12" class="node">
+<title>module~s_operator_cross</title>
+<g id="a_module~~graph~~ModuleGraph_node12"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="523.5,-2398 427.5,-2398 427.5,-2374 523.5,-2374 523.5,-2398"/>
+<text text-anchor="middle" x="475.5" y="-2383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge25" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M440.62,-1140.05C423.45,-1137.59 403.1,-1132.29 388,-1121 327.57,-1075.79 364.83,-930.72 303,-974"/>
+<!-- module~swiftest_operators -->
+<g id="module~~graph~~ModuleGraph_node47" class="node">
+<title>module~swiftest_operators</title>
+<g id="a_module~~graph~~ModuleGraph_node47"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="352,-2364 252,-2364 252,-2340 352,-2340 352,-2364"/>
+<text text-anchor="middle" x="302" y="-2349.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+</a>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
+</g>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest_operators -->
 <g id="module~~graph~~ModuleGraph_edge24" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.64,-1143.38C423.26,-1145.66 402.72,-1150.97 388,-1163 337.35,-1204.38 315.21,-1282.89 307.05,-1321.46"/>
-<polygon fill="#000000" stroke="#000000" points="303.55,-1321.15 305.03,-1331.64 310.41,-1322.51 303.55,-1321.15"/>
+<title>module~s_operator_cross&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" d="M427.18,-2376.62C407.07,-2372.63 383.4,-2367.94 362.15,-2363.73"/>
+<polygon fill="#000000" stroke="#000000" points="362.75,-2360.28 352.26,-2361.76 361.38,-2367.14 362.75,-2360.28"/>
 </g>
-<!-- module~s_util_rescale -->
-<g id="module~~graph~~ModuleGraph_node14" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~graph~~ModuleGraph_node14"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="514.5,-1112 436.5,-1112 436.5,-1088 514.5,-1088 514.5,-1112"/>
-<text text-anchor="middle" x="475.5" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge23" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.12,-2373.9C424.43,-2364.33 400.25,-2348.89 388,-2327 347.32,-2254.29 361.92,-1660.73 352,-1578 341.6,-1491.26 318.72,-1389.69 308.32,-1345.91"/>
+<polygon fill="#000000" stroke="#000000" points="311.7,-1344.97 305.96,-1336.06 304.89,-1346.6 311.7,-1344.97"/>
+</g>
+<!-- module~s_fraggle_io -->
+<g id="module~~graph~~ModuleGraph_node13" class="node">
+<title>module~s_fraggle_io</title>
+<g id="a_module~~graph~~ModuleGraph_node13"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="511,-2234 440,-2234 440,-2210 511,-2210 511,-2234"/>
+<text text-anchor="middle" x="475.5" y="-2219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge27" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M436.2,-1096.17C420.35,-1093.25 402.36,-1088.09 388,-1079 337.26,-1046.89 352.19,-939.57 303,-974"/>
+<!-- module~fraggle_classes -->
+<g id="module~~graph~~ModuleGraph_node21" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~graph~~ModuleGraph_node21"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="345.5,-2213 258.5,-2213 258.5,-2189 345.5,-2189 345.5,-2213"/>
+<text text-anchor="middle" x="302" y="-2198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+</a>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
+</g>
+<!-- module~s_fraggle_io&#45;&gt;module~fraggle_classes -->
 <g id="module~~graph~~ModuleGraph_edge26" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.38,-1101.46C419.82,-1103.91 401.22,-1109.35 388,-1121 327.11,-1174.67 309.63,-1276.78 304.79,-1321.77"/>
-<polygon fill="#000000" stroke="#000000" points="301.28,-1321.62 303.81,-1331.91 308.25,-1322.3 301.28,-1321.62"/>
+<title>module~s_fraggle_io&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M439.79,-2217.75C415.67,-2214.8 383.06,-2210.8 355.74,-2207.46"/>
+<polygon fill="#000000" stroke="#000000" points="355.9,-2203.95 345.55,-2206.21 355.05,-2210.9 355.9,-2203.95"/>
+</g>
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge25" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.88,-2222.82C421.62,-2221.27 400.47,-2215.95 388,-2201 343.59,-2147.75 360.59,-1646.8 352,-1578 341.18,-1491.31 318.51,-1389.72 308.25,-1345.92"/>
+<polygon fill="#000000" stroke="#000000" points="311.63,-1345 305.92,-1336.07 304.82,-1346.61 311.63,-1345"/>
 </g>
 <!-- module~s_util_minimize_bfgs -->
-<g id="module~~graph~~ModuleGraph_node15" class="node">
+<g id="module~~graph~~ModuleGraph_node14" class="node">
 <title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~graph~~ModuleGraph_node15"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="531.5,-1070 419.5,-1070 419.5,-1046 531.5,-1046 531.5,-1070"/>
-<text text-anchor="middle" x="475.5" y="-1055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<g id="a_module~~graph~~ModuleGraph_node14"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="531.5,-604 419.5,-604 419.5,-580 531.5,-580 531.5,-604"/>
+<text text-anchor="middle" x="475.5" y="-589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge29" class="edge">
+<g id="module~~graph~~ModuleGraph_edge28" class="edge">
 <title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M419.38,-1048.12C408.7,-1045.24 397.8,-1041.59 388,-1037 345.42,-1017.06 341.52,-947.04 303,-974"/>
+<path fill="none" stroke="#000000" d="M419.12,-595.55C407.46,-598.79 396.22,-604.18 388,-613 322.83,-682.9 412.43,-750.96 352,-825 337.23,-843.1 326.31,-845.41 303,-844"/>
 </g>
 <!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge28" class="edge">
+<g id="module~~graph~~ModuleGraph_edge27" class="edge">
 <title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.1,-1062.68C407.72,-1065.9 396.6,-1071 388,-1079 316.96,-1145.08 305.07,-1270.55 303.24,-1321.58"/>
-<polygon fill="#000000" stroke="#000000" points="299.74,-1321.73 302.98,-1331.82 306.74,-1321.91 299.74,-1321.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.25,-595.14C407.44,-598.37 396.1,-603.87 388,-613 376.21,-626.29 317.69,-1182.91 305.3,-1301.8"/>
+<polygon fill="#000000" stroke="#000000" points="301.81,-1301.6 304.25,-1311.91 308.77,-1302.33 301.81,-1301.6"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge31" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.9,-2314.72C291.74,-2272.62 267.85,-2130.21 252,-2012 215.27,-1737.99 181.83,-1403.7 173.17,-1315.3"/>
-<polygon fill="#000000" stroke="#000000" points="176.65,-1314.95 172.19,-1305.33 169.68,-1315.63 176.65,-1314.95"/>
+<!-- module~s_fraggle_generate -->
+<g id="module~~graph~~ModuleGraph_node15" class="node">
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~graph~~ModuleGraph_node15"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="528.5,-2192 422.5,-2192 422.5,-2168 528.5,-2168 528.5,-2192"/>
+<text text-anchor="middle" x="475.5" y="-2177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+</a>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+</g>
+<!-- module~s_fraggle_generate&#45;&gt;module~fraggle_classes -->
 <g id="module~~graph~~ModuleGraph_edge30" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.93,-2339.02C277.88,-2370.96 227.17,-2454.06 171,-2432"/>
+<title>module~s_fraggle_generate&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M422.11,-2186.41C401.03,-2189 376.77,-2191.97 355.66,-2194.55"/>
+<polygon fill="#000000" stroke="#000000" points="355.08,-2191.1 345.58,-2195.79 355.93,-2198.04 355.08,-2191.1"/>
 </g>
-<!-- module~s_io -->
-<g id="module~~graph~~ModuleGraph_node17" class="node">
-<title>module~s_io</title>
-<g id="a_module~~graph~~ModuleGraph_node17"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-1028 448.5,-1028 448.5,-1004 502.5,-1004 502.5,-1028"/>
-<text text-anchor="middle" x="475.5" y="-1013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge29" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.47,-2178.1C409.39,-2175.03 396.63,-2169.31 388,-2159 346.47,-2109.42 360.14,-1642.16 352,-1578 341,-1491.34 318.43,-1389.73 308.22,-1345.92"/>
+<polygon fill="#000000" stroke="#000000" points="311.6,-1345.01 305.9,-1336.07 304.78,-1346.61 311.6,-1345.01"/>
+</g>
+<!-- module~s_rmvs_step -->
+<g id="module~~graph~~ModuleGraph_node16" class="node">
+<title>module~s_rmvs_step</title>
+<g id="a_module~~graph~~ModuleGraph_node16"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="679.5,-1442 606.5,-1442 606.5,-1418 679.5,-1418 679.5,-1442"/>
+<text text-anchor="middle" x="643" y="-1427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge33" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.38,-1009.69C431.21,-1005.53 408.26,-999.96 388,-995 350.2,-985.74 334.88,-951.69 303,-974"/>
+<!-- module~rmvs_classes -->
+<g id="module~~graph~~ModuleGraph_node18" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~graph~~ModuleGraph_node18"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="514,-2440 437,-2440 437,-2416 514,-2416 514,-2440"/>
+<text text-anchor="middle" x="475.5" y="-2425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+</a>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
+</g>
+<!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
 <g id="module~~graph~~ModuleGraph_edge32" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.5,-1015.65C429.36,-1016.81 403.98,-1021.52 388,-1037 346.31,-1077.38 315.84,-1257.93 306.22,-1321.65"/>
-<polygon fill="#000000" stroke="#000000" points="302.72,-1321.4 304.72,-1331.8 309.64,-1322.42 302.72,-1321.4"/>
+<title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M607.68,-1442.15C604.29,-1444.6 601.27,-1447.52 599,-1451 541.01,-1540.08 630.26,-2324.69 563,-2407 553.55,-2418.57 538.89,-2424.4 524.32,-2427.17"/>
+<polygon fill="#000000" stroke="#000000" points="523.7,-2423.72 514.31,-2428.63 524.71,-2430.65 523.7,-2423.72"/>
 </g>
-<!-- module~s_user_kick_getacch -->
-<g id="module~~graph~~ModuleGraph_node18" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~graph~~ModuleGraph_node18"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="531.5,-986 419.5,-986 419.5,-962 531.5,-962 531.5,-986"/>
-<text text-anchor="middle" x="475.5" y="-971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
-</a>
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge31" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M606.34,-1433.69C563.97,-1437.31 496.49,-1440.41 476.5,-1426"/>
 </g>
+<!-- module~s_fraggle_util -->
+<g id="module~~graph~~ModuleGraph_node17" class="node">
+<title>module~s_fraggle_util</title>
+<g id="a_module~~graph~~ModuleGraph_node17"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="513.5,-2108 437.5,-2108 437.5,-2084 513.5,-2084 513.5,-2108"/>
+<text text-anchor="middle" x="475.5" y="-2093.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+</a>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge35" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M434.57,-961.97C397.12,-953.27 341.3,-947.19 303,-974"/>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_util&#45;&gt;module~fraggle_classes -->
 <g id="module~~graph~~ModuleGraph_edge34" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.11,-978.11C407.6,-981.34 396.42,-986.59 388,-995 341.1,-1041.87 313.46,-1251.71 305.45,-1321.41"/>
-<polygon fill="#000000" stroke="#000000" points="301.93,-1321.37 304.3,-1331.7 308.89,-1322.15 301.93,-1321.37"/>
+<title>module~s_fraggle_util&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M437.1,-2100.54C421.23,-2103.59 402.98,-2108.64 388,-2117 359.25,-2133.04 333.48,-2161.47 318.04,-2180.77"/>
+<polygon fill="#000000" stroke="#000000" points="315.08,-2178.87 311.7,-2188.92 320.61,-2183.17 315.08,-2178.87"/>
 </g>
-<!-- module~s_symba_encounter_check -->
-<g id="module~~graph~~ModuleGraph_node19" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~graph~~ModuleGraph_node19"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="866,-1104 723,-1104 723,-1080 866,-1080 866,-1104"/>
-<text text-anchor="middle" x="794.5" y="-1089.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge33" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M437.35,-2096.5C419.74,-2094.65 399.98,-2089.15 388,-2075 352.23,-2032.74 359.26,-1632.89 352,-1578 340.55,-1491.4 318.21,-1389.76 308.14,-1345.93"/>
+<polygon fill="#000000" stroke="#000000" points="311.52,-1345.03 305.86,-1336.08 304.71,-1346.61 311.52,-1345.03"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~graph~~ModuleGraph_edge36" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.97,-2427.96C419.71,-2425.91 400.36,-2420.41 388,-2407 353.37,-2369.45 360.88,-2230.3 352,-2180 336.93,-2094.62 316.47,-1993.5 307.51,-1949.85"/>
+<polygon fill="#000000" stroke="#000000" points="310.94,-1949.13 305.49,-1940.04 304.08,-1950.54 310.94,-1949.13"/>
+</g>
+<!-- module~swiftest_globals -->
+<g id="module~~graph~~ModuleGraph_node94" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~graph~~ModuleGraph_node94"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="88,-213 0,-213 0,-189 88,-189 88,-213"/>
+<text text-anchor="middle" x="44" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~symba_classes -->
-<g id="module~~graph~~ModuleGraph_node61" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~graph~~ModuleGraph_node61"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="685.5,-1732 600.5,-1732 600.5,-1708 685.5,-1708 685.5,-1732"/>
-<text text-anchor="middle" x="643" y="-1717.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~graph~~ModuleGraph_edge35" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.62,-2427.34C419.69,-2425.11 400.74,-2419.61 388,-2407 341.73,-2361.2 400.64,-2308.28 352,-2265 291.38,-2211.06 237.76,-2287.13 171,-2241"/>
+</g>
+<!-- module~s_helio_gr -->
+<g id="module~~graph~~ModuleGraph_node19" class="node">
+<title>module~s_helio_gr</title>
+<g id="a_module~~graph~~ModuleGraph_node19"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="674,-1606 612,-1606 612,-1582 674,-1582 674,-1606"/>
+<text text-anchor="middle" x="643" y="-1591.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
-<g id="module~~graph~~ModuleGraph_edge37" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M732.81,-1104.1C729.12,-1106.56 725.78,-1109.5 723,-1113 641.85,-1215.16 759.47,-1590.51 687,-1699 686.57,-1699.65 686.11,-1700.28 685.63,-1700.89"/>
-<polygon fill="#000000" stroke="#000000" points="683.15,-1698.41 678.24,-1707.8 687.93,-1703.52 683.15,-1698.41"/>
+<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
+<g id="module~~graph~~ModuleGraph_edge38" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M611.93,-1603.44C606.84,-1606.36 602.19,-1610.13 599,-1615 548.18,-1692.59 621.89,-2377.34 563,-2449 553.43,-2460.64 538.61,-2466.46 523.91,-2469.21"/>
+<polygon fill="#000000" stroke="#000000" points="523.23,-2465.77 513.83,-2470.65 524.23,-2472.7 523.23,-2465.77"/>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge36" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744,-1104.1C736.77,-1106.62 729.57,-1109.57 723,-1113 683.19,-1133.79 687.22,-1163.82 644,-1176"/>
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge37" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.87,-1584.04C606.92,-1581.19 602.33,-1577.57 599,-1573 532.89,-1482.28 639.42,-1405.23 563,-1323 536.2,-1294.17 515.77,-1301.33 476.5,-1304"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_rmvs_util -->
 <g id="module~~graph~~ModuleGraph_node20" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~graph~~ModuleGraph_node20"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="842.5,-1062 746.5,-1062 746.5,-1038 842.5,-1038 842.5,-1062"/>
-<text text-anchor="middle" x="794.5" y="-1047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~graph~~ModuleGraph_node20"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-1400 609.5,-1400 609.5,-1376 676.5,-1376 676.5,-1400"/>
+<text text-anchor="middle" x="643" y="-1385.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
-<g id="module~~graph~~ModuleGraph_edge39" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M746.16,-1055.51C737.23,-1058.71 728.86,-1063.59 723,-1071 636.27,-1180.63 764.41,-1582.61 687,-1699 686.57,-1699.65 686.11,-1700.28 685.63,-1700.89"/>
-<polygon fill="#000000" stroke="#000000" points="683.15,-1698.42 678.25,-1707.81 687.94,-1703.52 683.15,-1698.42"/>
-</g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge38" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M746.45,-1059.45C738.2,-1062.35 730.02,-1066.11 723,-1071 675.05,-1104.34 700.21,-1160.16 644,-1176"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642,-1176C606,-1186.15 598.92,-1194.56 563,-1205 486.57,-1227.21 456.16,-1201.91 388,-1243 355.22,-1262.76 329.04,-1299.72 314.79,-1323.03"/>
-<polygon fill="#000000" stroke="#000000" points="311.68,-1321.42 309.6,-1331.8 317.71,-1324.98 311.68,-1321.42"/>
+<!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
+<g id="module~~graph~~ModuleGraph_edge40" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M609.33,-1399C605.27,-1401.67 601.63,-1404.96 599,-1409 538.54,-1502.04 633.15,-2321.02 563,-2407 553.55,-2418.58 538.9,-2424.41 524.33,-2427.17"/>
+<polygon fill="#000000" stroke="#000000" points="523.71,-2423.73 514.32,-2428.64 524.72,-2430.66 523.71,-2423.73"/>
 </g>
-<!-- module~s_symba_io -->
-<g id="module~~graph~~ModuleGraph_node21" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~graph~~ModuleGraph_node21"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="829.5,-1752 759.5,-1752 759.5,-1728 829.5,-1728 829.5,-1752"/>
-<text text-anchor="middle" x="794.5" y="-1737.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
-</a>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge39" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.5,-1426C442.57,-1402.98 422.64,-1425.69 388,-1407 359.2,-1391.46 333.44,-1363.29 318.02,-1344.12"/>
+<polygon fill="#000000" stroke="#000000" points="320.61,-1341.75 311.69,-1336.03 315.09,-1346.06 320.61,-1341.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.94,-1400.03C571.51,-1416.29 498.08,-1441.56 476.5,-1426"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge42" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.08,-2188.76C289.54,-2152.44 264.4,-2041.99 252,-1949 194.22,-1515.81 175.2,-981.18 171.65,-866.37"/>
+<polygon fill="#000000" stroke="#000000" points="175.14,-865.93 171.34,-856.04 168.14,-866.14 175.14,-865.93"/>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~graph~~ModuleGraph_edge41" class="edge">
-<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M759.2,-1735.41C740.38,-1732.89 716.67,-1729.72 695.66,-1726.91"/>
-<polygon fill="#000000" stroke="#000000" points="695.97,-1723.42 685.6,-1725.56 695.04,-1730.36 695.97,-1723.42"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.24,-2213.07C244.7,-2228.81 188.34,-2252.98 171,-2241"/>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge40" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.6,-1752.1C717.7,-1765.54 642.94,-1780.51 599,-1741 542.83,-1690.5 613.39,-1459.27 563,-1403 536.74,-1373.68 510.27,-1404.22 476.5,-1384"/>
+<!-- module~s_rmvs_setup -->
+<g id="module~~graph~~ModuleGraph_node22" class="node">
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~graph~~ModuleGraph_node22"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-1358 603.5,-1358 603.5,-1334 682.5,-1334 682.5,-1358"/>
+<text text-anchor="middle" x="643" y="-1343.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+</a>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge43" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M437.74,-2444.05C399.77,-2453.99 340.88,-2462.1 303,-2432"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2432C267.16,-2405.11 264.87,-2389.26 252,-2348 188.82,-2145.44 173.71,-1449.33 171.36,-1315.39"/>
-<polygon fill="#000000" stroke="#000000" points="174.85,-1315.08 171.18,-1305.14 167.85,-1315.2 174.85,-1315.08"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
 <g id="module~~graph~~ModuleGraph_edge44" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M437.1,-2427.46C421.23,-2424.41 402.98,-2419.36 388,-2411 359.25,-2394.96 333.48,-2366.53 318.04,-2347.23"/>
-<polygon fill="#000000" stroke="#000000" points="320.61,-2344.83 311.7,-2339.08 315.08,-2349.13 320.61,-2344.83"/>
+<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M607.67,-1358.14C604.28,-1360.59 601.26,-1363.52 599,-1367 536.07,-1464 636.03,-2317.36 563,-2407 553.56,-2418.58 538.92,-2424.41 524.34,-2427.18"/>
+<polygon fill="#000000" stroke="#000000" points="523.71,-2423.74 514.32,-2428.64 524.73,-2430.66 523.71,-2423.74"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_edge42" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2432C255.77,-2396.05 224.78,-2453.12 171,-2432"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge43" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.82,-1333.93C583.59,-1320.34 526.93,-1300.57 476.5,-1304"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_obl -->
 <g id="module~~graph~~ModuleGraph_node23" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~graph~~ModuleGraph_node23"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="834,-1356 755,-1356 755,-1332 834,-1332 834,-1356"/>
-<text text-anchor="middle" x="794.5" y="-1341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_obl</title>
+<g id="a_module~~graph~~ModuleGraph_node23"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-520 448.5,-520 448.5,-496 502.5,-496 502.5,-520"/>
+<text text-anchor="middle" x="475.5" y="-505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
+<!-- module~s_obl&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge46" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M793.23,-1356.01C791.54,-1404.79 779.04,-1590.6 687,-1699 686.27,-1699.85 685.51,-1700.68 684.7,-1701.47"/>
-<polygon fill="#000000" stroke="#000000" points="682.35,-1698.87 676.64,-1707.8 686.67,-1704.37 682.35,-1698.87"/>
+<title>module~s_obl&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.21,-506.98C428.66,-507.74 402.89,-512.26 388,-529 291.64,-637.36 447.74,-852.77 303,-844"/>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<!-- module~s_obl&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge45" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.72,-1336.89C743.87,-1333.76 732.46,-1329.3 723,-1323 701.97,-1309 707.11,-1294.3 687,-1279 670.37,-1266.35 664.89,-1260.14 644,-1260"/>
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.14,-506.92C428.56,-507.65 402.77,-512.15 388,-529 386.35,-530.88 318.88,-1172.76 305.35,-1301.63"/>
+<polygon fill="#000000" stroke="#000000" points="301.84,-1301.55 304.27,-1311.86 308.8,-1302.28 301.84,-1301.55"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_symba_drift -->
 <g id="module~~graph~~ModuleGraph_node24" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~graph~~ModuleGraph_node24"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-818 448.5,-818 448.5,-794 502.5,-794 502.5,-818"/>
-<text text-anchor="middle" x="475.5" y="-803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~graph~~ModuleGraph_node24"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="834,-1421 755,-1421 755,-1397 834,-1397 834,-1421"/>
+<text text-anchor="middle" x="794.5" y="-1406.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest_classes -->
+<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
 <g id="module~~graph~~ModuleGraph_edge48" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.11,-805.69C429.03,-806.9 403.9,-811.66 388,-827 345.47,-868.03 391.74,-911.26 352,-955 336.29,-972.29 322.14,-960.61 303,-974"/>
+<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M783.76,-1396.94C769.08,-1378.32 741.08,-1341.05 723,-1306 701.73,-1264.76 710.7,-1247.89 687,-1208 680.71,-1197.42 672.01,-1186.99 664.08,-1178.49"/>
+<polygon fill="#000000" stroke="#000000" points="666.57,-1176.03 657.1,-1171.28 661.54,-1180.9 666.57,-1176.03"/>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge47" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.41,-805.15C428.96,-806.02 403.24,-810.57 388,-827 370.74,-845.6 318.98,-1224.65 305.98,-1321.58"/>
-<polygon fill="#000000" stroke="#000000" points="302.48,-1321.35 304.63,-1331.73 309.42,-1322.28 302.48,-1321.35"/>
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.25,-1421.19C765.85,-1440.81 728.38,-1478.64 687,-1493 650.05,-1505.82 633.98,-1510.49 599,-1493 575.15,-1481.07 585.43,-1459.43 563,-1445 529.9,-1423.7 508.43,-1449.02 476.5,-1426"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~graph~~ModuleGraph_node25" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~graph~~ModuleGraph_node25"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-776 448.5,-776 448.5,-752 502.5,-752 502.5,-776"/>
-<text text-anchor="middle" x="475.5" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~graph~~ModuleGraph_node25"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="523.5,-2150 427.5,-2150 427.5,-2126 523.5,-2126 523.5,-2150"/>
+<text text-anchor="middle" x="475.5" y="-2135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest_classes -->
+<!-- module~s_fraggle_regime&#45;&gt;module~fraggle_classes -->
 <g id="module~~graph~~ModuleGraph_edge50" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.23,-758.57C402.78,-749.49 313.29,-733.15 303,-743"/>
+<title>module~s_fraggle_regime&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M427.25,-2147.48C414.35,-2150.6 400.49,-2154.46 388,-2159 369.12,-2165.86 348.92,-2175.73 332.95,-2184.17"/>
+<polygon fill="#000000" stroke="#000000" points="331.23,-2181.12 324.08,-2188.95 334.55,-2187.29 331.23,-2181.12"/>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge49" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.35,-763.1C428.88,-763.94 403.14,-768.48 388,-785 378.68,-795.17 320.17,-1218.61 306.06,-1321.6"/>
-<polygon fill="#000000" stroke="#000000" points="302.55,-1321.41 304.67,-1331.79 309.49,-1322.36 302.55,-1321.41"/>
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.47,-2137.12C412.71,-2134.38 397.75,-2128.59 388,-2117 349.35,-2071.08 359.7,-1637.53 352,-1578 340.79,-1491.36 318.33,-1389.74 308.18,-1345.92"/>
+<polygon fill="#000000" stroke="#000000" points="311.56,-1345.02 305.88,-1336.07 304.75,-1346.61 311.56,-1345.02"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_operator_mag -->
 <g id="module~~graph~~ModuleGraph_node26" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~graph~~ModuleGraph_node26"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="678.5,-1396 607.5,-1396 607.5,-1372 678.5,-1372 678.5,-1396"/>
-<text text-anchor="middle" x="643" y="-1381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_operator_mag</title>
+<g id="a_module~~graph~~ModuleGraph_node26"><a xlink:href=".././module/s_operator_mag.html" xlink:title="s_operator_mag">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="521,-2524 430,-2524 430,-2500 521,-2500 521,-2524"/>
+<text text-anchor="middle" x="475.5" y="-2509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_mag</text>
 </a>
 </g>
 </g>
-<!-- module~rmvs_classes -->
-<g id="module~~graph~~ModuleGraph_node64" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~graph~~ModuleGraph_node64"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="514,-2486 437,-2486 437,-2462 514,-2462 514,-2486"/>
-<text text-anchor="middle" x="475.5" y="-2471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<!-- module~s_operator_mag&#45;&gt;module~swiftest_operators -->
+<g id="module~~graph~~ModuleGraph_edge51" class="edge">
+<title>module~s_operator_mag&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" d="M429.86,-2507.98C415.46,-2504.99 400.11,-2499.83 388,-2491 346.93,-2461.05 321.64,-2404.66 310.21,-2373.71"/>
+<polygon fill="#000000" stroke="#000000" points="313.5,-2372.52 306.86,-2364.26 306.9,-2374.85 313.5,-2372.52"/>
+</g>
+<!-- module~walltime_classes -->
+<g id="module~~graph~~ModuleGraph_node27" class="node">
+<title>module~walltime_classes</title>
+<g id="a_module~~graph~~ModuleGraph_node27"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="216,-234 124,-234 124,-210 216,-210 216,-234"/>
+<text text-anchor="middle" x="170" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~graph~~ModuleGraph_edge52" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M607.67,-1396.14C604.28,-1398.59 601.26,-1401.51 599,-1405 535.6,-1502.75 636.58,-2362.66 563,-2453 553.56,-2464.59 538.92,-2470.42 524.34,-2473.18"/>
-<polygon fill="#000000" stroke="#000000" points="523.72,-2469.74 514.33,-2474.65 524.73,-2476.66 523.72,-2469.74"/>
-</g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge51" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.34,-1371.92C608.36,-1369.3 603.38,-1366.3 599,-1363 579.9,-1348.6 583.67,-1335.03 563,-1323 528.98,-1303.2 515.79,-1301.65 476.5,-1304"/>
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M123.88,-214.36C115.52,-212.94 106.72,-211.45 98.14,-210"/>
+<polygon fill="#000000" stroke="#000000" points="98.67,-206.54 88.22,-208.32 97.5,-213.44 98.67,-206.54"/>
 </g>
-<!-- module~fraggle_classes -->
-<g id="module~~graph~~ModuleGraph_node27" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~graph~~ModuleGraph_node27"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="345.5,-2003 258.5,-2003 258.5,-1979 345.5,-1979 345.5,-2003"/>
-<text text-anchor="middle" x="302" y="-1988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<!-- module~s_helio_setup -->
+<g id="module~~graph~~ModuleGraph_node28" class="node">
+<title>module~s_helio_setup</title>
+<g id="a_module~~graph~~ModuleGraph_node28"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-1774 603.5,-1774 603.5,-1750 682.5,-1750 682.5,-1774"/>
+<text text-anchor="middle" x="643" y="-1759.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
 <g id="module~~graph~~ModuleGraph_edge54" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.74,-1978.88C283.49,-1896.97 195.42,-1424.14 175.16,-1315.33"/>
-<polygon fill="#000000" stroke="#000000" points="178.54,-1314.37 173.27,-1305.17 171.66,-1315.65 178.54,-1314.37"/>
+<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M607.74,-1774.18C604.33,-1776.63 601.29,-1779.54 599,-1783 517.12,-1906.55 657.72,-2335 563,-2449 553.37,-2460.59 538.53,-2466.4 523.84,-2469.15"/>
+<polygon fill="#000000" stroke="#000000" points="523.17,-2465.71 513.76,-2470.59 524.16,-2472.64 523.17,-2465.71"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge53" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169,-2432C50.64,-2385.51 45.09,-1378.55 44.98,-1214.5"/>
-<polygon fill="#000000" stroke="#000000" points="48.48,-1214.17 44.98,-1204.17 41.48,-1214.17 48.48,-1214.17"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.75,-2003.28C285.23,-2076.22 213.9,-2448.85 171,-2432"/>
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.38,-1749.95C604.77,-1747.48 601.51,-1744.52 599,-1741 522.13,-1633.05 652.14,-1543.06 563,-1445 536.52,-1415.87 508.43,-1449.02 476.5,-1426"/>
 </g>
-<!-- module~s_fraggle_set -->
-<g id="module~~graph~~ModuleGraph_node28" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~graph~~ModuleGraph_node28"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="514,-1940 437,-1940 437,-1916 514,-1916 514,-1940"/>
-<text text-anchor="middle" x="475.5" y="-1925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<!-- module~s_symba_kick -->
+<g id="module~~graph~~ModuleGraph_node29" class="node">
+<title>module~s_symba_kick</title>
+<g id="a_module~~graph~~ModuleGraph_node29"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="834,-1255 755,-1255 755,-1231 834,-1231 834,-1255"/>
+<text text-anchor="middle" x="794.5" y="-1240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~fraggle_classes -->
+<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
 <g id="module~~graph~~ModuleGraph_edge56" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M436.92,-1935.23C421.53,-1938.67 403.69,-1943.3 388,-1949 369.12,-1955.86 348.92,-1965.73 332.95,-1974.17"/>
-<polygon fill="#000000" stroke="#000000" points="331.23,-1971.12 324.08,-1978.95 334.55,-1977.29 331.23,-1971.12"/>
+<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M754.77,-1234.35C744.15,-1231.22 732.85,-1227.14 723,-1222 700.83,-1210.42 678.85,-1192.19 663.72,-1178.32"/>
+<polygon fill="#000000" stroke="#000000" points="665.75,-1175.42 656.07,-1171.13 660.96,-1180.52 665.75,-1175.42"/>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge55" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.73,-1928.18C419.41,-1926.18 400.09,-1920.66 388,-1907 342.33,-1855.4 362.51,-1667.1 352,-1599 338.63,-1512.34 317.29,-1410.15 307.81,-1366.07"/>
-<polygon fill="#000000" stroke="#000000" points="311.2,-1365.19 305.67,-1356.15 304.36,-1366.67 311.2,-1365.19"/>
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M758.74,-1230.97C728.24,-1222.1 682.81,-1213.01 644,-1222"/>
 </g>
-<!-- module~walltime_classes -->
-<g id="module~~graph~~ModuleGraph_node29" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~graph~~ModuleGraph_node29"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="216,-1225 124,-1225 124,-1201 216,-1201 216,-1225"/>
-<text text-anchor="middle" x="170" y="-1210.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<!-- module~s_util_set -->
+<g id="module~~graph~~ModuleGraph_node30" class="node">
+<title>module~s_util_set</title>
+<g id="a_module~~graph~~ModuleGraph_node30"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="504.5,-440 446.5,-440 446.5,-416 504.5,-416 504.5,-440"/>
+<text text-anchor="middle" x="475.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~s_util_set&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge58" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M446.25,-430.97C427.99,-434.13 404.62,-440.63 388,-454 260.19,-556.83 195.36,-756.32 176.76,-822.26"/>
+<polygon fill="#000000" stroke="#000000" points="173.36,-821.42 174.08,-831.99 180.11,-823.28 173.36,-821.42"/>
+</g>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge57" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M123.88,-1205.36C115.52,-1203.94 106.72,-1202.45 98.14,-1201"/>
-<polygon fill="#000000" stroke="#000000" points="98.67,-1197.54 88.22,-1199.32 97.5,-1204.44 98.67,-1197.54"/>
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.14,-439.46C426.32,-449.06 401.15,-464.79 388,-487 345.81,-558.28 360.33,-775.59 352,-858 334.75,-1028.62 312.68,-1234.23 305.43,-1301.51"/>
+<polygon fill="#000000" stroke="#000000" points="301.92,-1301.45 304.32,-1311.76 308.88,-1302.2 301.92,-1301.45"/>
 </g>
-<!-- module~s_fraggle_io -->
-<g id="module~~graph~~ModuleGraph_node30" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~graph~~ModuleGraph_node30"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="511,-1898 440,-1898 440,-1874 511,-1874 511,-1898"/>
-<text text-anchor="middle" x="475.5" y="-1883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<!-- module~s_whm_setup -->
+<g id="module~~graph~~ModuleGraph_node31" class="node">
+<title>module~s_whm_setup</title>
+<g id="a_module~~graph~~ModuleGraph_node31"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="515,-1772 436,-1772 436,-1748 515,-1748 515,-1772"/>
+<text text-anchor="middle" x="475.5" y="-1757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~fraggle_classes -->
-<g id="module~~graph~~ModuleGraph_edge59" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M439.65,-1890.06C423.22,-1893.05 403.79,-1898.19 388,-1907 359.25,-1923.04 333.48,-1951.47 318.04,-1970.77"/>
-<polygon fill="#000000" stroke="#000000" points="315.08,-1968.87 311.7,-1978.92 320.61,-1973.17 315.08,-1968.87"/>
+<!-- module~s_whm_setup&#45;&gt;module~whm_classes -->
+<g id="module~~graph~~ModuleGraph_edge60" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M435.9,-1762.69C419.82,-1765.41 401.73,-1770.72 388,-1781 345.16,-1813.05 320.34,-1873.54 309.52,-1906.03"/>
+<polygon fill="#000000" stroke="#000000" points="306.08,-1905.31 306.39,-1915.9 312.75,-1907.43 306.08,-1905.31"/>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge58" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.89,-1886.4C421.86,-1884.69 400.93,-1879.35 388,-1865 348.06,-1820.69 361.63,-1657.87 352,-1599 337.84,-1512.46 316.91,-1410.21 307.67,-1366.09"/>
-<polygon fill="#000000" stroke="#000000" points="311.07,-1365.23 305.59,-1356.17 304.22,-1366.67 311.07,-1365.23"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge59" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.91,-1759.55C419.05,-1757.33 400.34,-1751.79 388,-1739 380.98,-1731.73 323.32,-1430.84 307.18,-1346.04"/>
+<polygon fill="#000000" stroke="#000000" points="310.61,-1345.35 305.31,-1336.18 303.74,-1346.65 310.61,-1345.35"/>
 </g>
-<!-- module~s_rmvs_chk -->
-<g id="module~~graph~~ModuleGraph_node31" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~graph~~ModuleGraph_node31"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="678,-1854 608,-1854 608,-1830 678,-1830 678,-1854"/>
-<text text-anchor="middle" x="643" y="-1839.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<!-- module~s_helio_drift -->
+<g id="module~~graph~~ModuleGraph_node32" class="node">
+<title>module~s_helio_drift</title>
+<g id="a_module~~graph~~ModuleGraph_node32"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="678,-1732 608,-1732 608,-1708 678,-1708 678,-1732"/>
+<text text-anchor="middle" x="643" y="-1717.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
-<g id="module~~graph~~ModuleGraph_edge61" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M642.22,-1854.16C643.4,-1932.03 645.97,-2360.4 563,-2453 553.11,-2464.03 538.5,-2469.75 524.09,-2472.58"/>
-<polygon fill="#000000" stroke="#000000" points="523.55,-2469.12 514.2,-2474.11 524.62,-2476.04 523.55,-2469.12"/>
+<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
+<g id="module~~graph~~ModuleGraph_edge62" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M607.73,-1732.18C604.32,-1734.62 601.29,-1737.53 599,-1741 512.19,-1872.46 663.49,-2327.67 563,-2449 553.39,-2460.6 538.55,-2466.42 523.86,-2469.16"/>
+<polygon fill="#000000" stroke="#000000" points="523.19,-2465.72 513.78,-2470.61 524.18,-2472.65 523.19,-2465.72"/>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge60" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.84,-1829.74C604.42,-1827.31 601.35,-1824.43 599,-1821 546.26,-1744.12 624.49,-1473.08 563,-1403 537.04,-1373.41 510.27,-1404.22 476.5,-1384"/>
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge61" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.44,-1707.9C604.82,-1705.44 601.54,-1702.49 599,-1699 531.95,-1606.78 640.53,-1528.6 563,-1445 536.24,-1416.14 508.43,-1449.02 476.5,-1426"/>
 </g>
-<!-- module~s_kick -->
-<g id="module~~graph~~ModuleGraph_node32" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~graph~~ModuleGraph_node32"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-734 448.5,-734 448.5,-710 502.5,-710 502.5,-734"/>
-<text text-anchor="middle" x="475.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<!-- module~s_netcdf -->
+<g id="module~~graph~~ModuleGraph_node33" class="node">
+<title>module~s_netcdf</title>
+<g id="a_module~~graph~~ModuleGraph_node33"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-398 448.5,-398 448.5,-374 502.5,-374 502.5,-398"/>
+<text text-anchor="middle" x="475.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge63" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.44,-716.58C410.95,-710.45 342.01,-705.67 303,-743"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge65" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.46,-382.07C405.94,-376.27 324.2,-367.95 303,-386"/>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge62" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.31,-721.06C428.8,-721.87 403.05,-726.4 388,-743 385.5,-745.76 321.03,-1213.05 306.08,-1321.64"/>
-<polygon fill="#000000" stroke="#000000" points="302.58,-1321.4 304.68,-1331.78 309.51,-1322.36 302.58,-1321.4"/>
+<!-- netcdf -->
+<g id="module~~graph~~ModuleGraph_node90" class="node">
+<title>netcdf</title>
+<polygon fill="#337ab7" stroke="#337ab7" points="329,-438 275,-438 275,-414 329,-414 329,-438"/>
+<text text-anchor="middle" x="302" y="-423.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf</text>
+</g>
+<!-- module~s_netcdf&#45;&gt;netcdf -->
+<g id="module~~graph~~ModuleGraph_edge64" class="edge">
+<title>module~s_netcdf&#45;&gt;netcdf</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.45,-392.08C419.28,-398.88 371.81,-409.95 339.08,-417.59"/>
+<polygon fill="#000000" stroke="#000000" points="337.95,-414.25 329.01,-419.93 339.54,-421.07 337.95,-414.25"/>
+</g>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge63" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.42,-384.79C428.72,-385.42 402.64,-389.83 388,-407 355.38,-445.25 356.63,-807.94 352,-858 336.21,-1028.76 313.2,-1234.28 305.57,-1301.52"/>
+<polygon fill="#000000" stroke="#000000" points="302.05,-1301.44 304.4,-1311.77 309.01,-1302.23 302.05,-1301.44"/>
 </g>
 <!-- module~s_util_spill -->
-<g id="module~~graph~~ModuleGraph_node33" class="node">
+<g id="module~~graph~~ModuleGraph_node34" class="node">
 <title>module~s_util_spill</title>
-<g id="a_module~~graph~~ModuleGraph_node33"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="506,-654 445,-654 445,-630 506,-630 506,-654"/>
-<text text-anchor="middle" x="475.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<g id="a_module~~graph~~ModuleGraph_node34"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="506,-356 445,-356 445,-332 506,-332 506,-356"/>
+<text text-anchor="middle" x="475.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_spill&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge65" class="edge">
+<g id="module~~graph~~ModuleGraph_edge67" class="edge">
 <title>module~s_util_spill&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M444.81,-647.59C427.51,-651.64 405.68,-658.17 388,-668 343.97,-692.48 339.4,-708.17 303,-743"/>
-<path fill="none" stroke="#000000" d="M301,-743C244.19,-797.37 266.93,-835.8 252,-913 236.99,-990.63 258.94,-1200.6 216,-1267 214.19,-1269.8 211.96,-1272.34 209.47,-1274.63"/>
-<polygon fill="#000000" stroke="#000000" points="207.24,-1271.93 201.4,-1280.76 211.48,-1277.5 207.24,-1271.93"/>
+<path fill="none" stroke="#000000" d="M301,-386C283.22,-401.14 266.9,-387.01 252,-405 198.29,-469.86 177.4,-740.94 172.31,-821.4"/>
+<polygon fill="#000000" stroke="#000000" points="168.79,-821.64 171.67,-831.84 175.78,-822.07 168.79,-821.64"/>
+<path fill="none" stroke="#000000" d="M444.84,-343.54C407.5,-344.53 343.38,-351.62 303,-386"/>
 </g>
 <!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge64" class="edge">
+<g id="module~~graph~~ModuleGraph_edge66" class="edge">
 <title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.07,-654.2C425.54,-663.9 401.17,-679.44 388,-701 354.49,-755.85 360.38,-924.27 352,-988 335.41,-1114.15 314.15,-1265.25 306.2,-1321.48"/>
-<polygon fill="#000000" stroke="#000000" points="302.68,-1321.32 304.75,-1331.71 309.61,-1322.3 302.68,-1321.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.67,-342.92C425.49,-343.97 401.68,-348.84 388,-365 352.5,-406.91 356.87,-803.29 352,-858 336.79,-1028.81 313.4,-1234.3 305.62,-1301.53"/>
+<polygon fill="#000000" stroke="#000000" points="302.11,-1301.44 304.43,-1311.77 309.06,-1302.24 302.11,-1301.44"/>
 </g>
-<!-- module~s_netcdf -->
-<g id="module~~graph~~ModuleGraph_node34" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~graph~~ModuleGraph_node34"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-612 448.5,-612 448.5,-588 502.5,-588 502.5,-612"/>
-<text text-anchor="middle" x="475.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<!-- module~s_rmvs_kick -->
+<g id="module~~graph~~ModuleGraph_node35" class="node">
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~graph~~ModuleGraph_node35"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="678.5,-1274 607.5,-1274 607.5,-1250 678.5,-1250 678.5,-1274"/>
+<text text-anchor="middle" x="643" y="-1259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge68" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.23,-596.43C430.6,-593.36 407.17,-587.98 388,-579 345.42,-559.06 337.04,-483.55 303,-516"/>
-</g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge66" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.1,-598.88C428.49,-599.59 402.69,-604.08 388,-621 334.26,-682.87 361.59,-906.62 352,-988 337.11,-1114.37 314.85,-1265.34 306.41,-1321.51"/>
-<polygon fill="#000000" stroke="#000000" points="302.9,-1321.32 304.87,-1331.73 309.82,-1322.36 302.9,-1321.32"/>
-</g>
-<!-- netcdf -->
-<g id="module~~graph~~ModuleGraph_node91" class="node">
-<title>netcdf</title>
-<polygon fill="#337ab7" stroke="#337ab7" points="329,-612 275,-612 275,-588 329,-588 329,-612"/>
-<text text-anchor="middle" x="302" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf</text>
+<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
+<g id="module~~graph~~ModuleGraph_edge69" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M607.66,-1274.13C604.27,-1276.59 601.26,-1279.51 599,-1283 531.12,-1387.91 641.8,-2310.02 563,-2407 553.58,-2418.6 538.93,-2424.43 524.36,-2427.2"/>
+<polygon fill="#000000" stroke="#000000" points="523.73,-2423.75 514.34,-2428.66 524.74,-2430.68 523.73,-2423.75"/>
 </g>
-<!-- module~s_netcdf&#45;&gt;netcdf -->
-<g id="module~~graph~~ModuleGraph_edge67" class="edge">
-<title>module~s_netcdf&#45;&gt;netcdf</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.45,-600C419.28,-600 371.81,-600 339.08,-600"/>
-<polygon fill="#000000" stroke="#000000" points="339.01,-596.5 329.01,-600 339.01,-603.5 339.01,-596.5"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge68" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.29,-1274.04C576.31,-1285.28 523.67,-1300.8 476.5,-1304"/>
 </g>
 <!-- module~s_rmvs_io -->
-<g id="module~~graph~~ModuleGraph_node35" class="node">
+<g id="module~~graph~~ModuleGraph_node36" class="node">
 <title>module~s_rmvs_io</title>
-<g id="a_module~~graph~~ModuleGraph_node35"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="673.5,-1812 612.5,-1812 612.5,-1788 673.5,-1788 673.5,-1812"/>
-<text text-anchor="middle" x="643" y="-1797.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<g id="a_module~~graph~~ModuleGraph_node36"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="673.5,-1564 612.5,-1564 612.5,-1540 673.5,-1540 673.5,-1564"/>
+<text text-anchor="middle" x="643" y="-1549.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
-<g id="module~~graph~~ModuleGraph_edge70" class="edge">
+<g id="module~~graph~~ModuleGraph_edge71" class="edge">
 <title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M612.42,-1809.23C607.16,-1812.18 602.31,-1816.02 599,-1821 521.12,-1938.15 653.06,-2344.94 563,-2453 553.43,-2464.48 538.76,-2470.28 524.19,-2473.06"/>
-<polygon fill="#000000" stroke="#000000" points="523.57,-2469.61 514.19,-2474.53 524.59,-2476.54 523.57,-2469.61"/>
+<path fill="none" stroke="#000000" d="M612.37,-1561.2C607.11,-1564.15 602.28,-1568 599,-1573 548.18,-1650.59 621.89,-2335.34 563,-2407 553.51,-2418.54 538.85,-2424.36 524.28,-2427.14"/>
+<polygon fill="#000000" stroke="#000000" points="523.66,-2423.69 514.27,-2428.6 524.67,-2430.62 523.66,-2423.69"/>
 </g>
 <!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge69" class="edge">
+<g id="module~~graph~~ModuleGraph_edge70" class="edge">
 <title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.36,-1787.84C607.76,-1784.18 602.53,-1779.61 599,-1774 554.87,-1703.9 617.97,-1464.96 563,-1403 536.88,-1373.56 510.27,-1404.22 476.5,-1384"/>
-</g>
-<!-- module~s_util_valid -->
-<g id="module~~graph~~ModuleGraph_node36" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~graph~~ModuleGraph_node36"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="508,-570 443,-570 443,-546 508,-546 508,-570"/>
-<text text-anchor="middle" x="475.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
-</a>
-</g>
-</g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge72" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M442.86,-550.35C426.48,-546.38 406.16,-541.45 388,-537 350.2,-527.74 331.17,-489.15 303,-516"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.97,-1539.73C609.84,-1535.96 603.73,-1531.37 599,-1526 572.95,-1496.45 593.52,-1469.91 563,-1445 532.5,-1420.12 508.43,-1449.02 476.5,-1426"/>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge71" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.64,-557.12C423.88,-558.43 401.3,-563.53 388,-579 358.26,-613.59 357.11,-942.67 352,-988 337.74,-1114.44 315.1,-1265.37 306.49,-1321.51"/>
-<polygon fill="#000000" stroke="#000000" points="302.97,-1321.31 304.91,-1331.73 309.89,-1322.38 302.97,-1321.31"/>
-</g>
-<!-- module~s_util_version -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~graph~~ModuleGraph_node37" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~graph~~ModuleGraph_node37"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="514.5,-528 436.5,-528 436.5,-504 514.5,-504 514.5,-528"/>
-<text text-anchor="middle" x="475.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~graph~~ModuleGraph_node37"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="520,-2066 431,-2066 431,-2042 520,-2042 520,-2066"/>
+<text text-anchor="middle" x="475.5" y="-2051.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge74" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M436.43,-510.19C391.76,-504.34 321.43,-498.43 303,-516"/>
-</g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_setup&#45;&gt;module~fraggle_classes -->
 <g id="module~~graph~~ModuleGraph_edge73" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.07,-515.68C418.81,-517.67 399.73,-523.24 388,-537 355.38,-575.25 357.43,-938.02 352,-988 338.26,-1114.5 315.31,-1265.39 306.55,-1321.52"/>
-<polygon fill="#000000" stroke="#000000" points="303.04,-1321.31 304.95,-1331.73 309.95,-1322.4 303.04,-1321.31"/>
+<title>module~s_fraggle_setup&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M430.97,-2058.15C416.34,-2061.14 400.56,-2066.26 388,-2075 349.99,-2101.44 324.16,-2150.82 311.66,-2179.28"/>
+<polygon fill="#000000" stroke="#000000" points="308.33,-2178.16 307.66,-2188.74 314.78,-2180.89 308.33,-2178.16"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge72" class="edge">
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M430.7,-2053.59C414.97,-2051.1 398.52,-2045.35 388,-2033 355.11,-1994.4 358.81,-1628.25 352,-1578 340.26,-1491.43 318.07,-1389.78 308.09,-1345.94"/>
+<polygon fill="#000000" stroke="#000000" points="311.48,-1345.05 305.83,-1336.08 304.65,-1346.61 311.48,-1345.05"/>
+</g>
+<!-- module~s_util_index -->
 <g id="module~~graph~~ModuleGraph_node38" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~graph~~ModuleGraph_node38"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="506.5,-2402 444.5,-2402 444.5,-2378 506.5,-2378 506.5,-2402"/>
-<text text-anchor="middle" x="475.5" y="-2387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_util_index</title>
+<g id="a_module~~graph~~ModuleGraph_node38"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="510,-1730 441,-1730 441,-1706 510,-1706 510,-1730"/>
+<text text-anchor="middle" x="475.5" y="-1715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~whm_classes -->
-<g id="module~~graph~~ModuleGraph_edge76" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M444.39,-2384.4C427.54,-2380.84 406.3,-2375.65 388,-2369 369.12,-2362.14 348.92,-2352.27 332.95,-2343.83"/>
-<polygon fill="#000000" stroke="#000000" points="334.55,-2340.71 324.08,-2339.05 331.23,-2346.88 334.55,-2340.71"/>
-</g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<!-- module~s_util_index&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge75" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.11,-2391.17C424.95,-2390.13 401.37,-2385.21 388,-2369 333.5,-2302.93 362.11,-1684.05 352,-1599 341.65,-1511.92 318.74,-1409.95 308.33,-1365.99"/>
-<polygon fill="#000000" stroke="#000000" points="311.7,-1365.02 305.97,-1356.11 304.89,-1366.65 311.7,-1365.02"/>
+<title>module~s_util_index&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M440.89,-1714.98C423.99,-1712.24 403.8,-1707 388,-1697 337.26,-1664.89 349,-1630.59 303,-1592"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge74" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-1717.98C422.84,-1716.17 401.67,-1710.87 388,-1697 375.36,-1684.18 323.15,-1425.47 307.47,-1346.62"/>
+<polygon fill="#000000" stroke="#000000" points="310.81,-1345.47 305.43,-1336.34 303.95,-1346.83 310.81,-1345.47"/>
+</g>
+<!-- module~whm_drift -->
 <g id="module~~graph~~ModuleGraph_node39" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~graph~~ModuleGraph_node39"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-486 448.5,-486 448.5,-462 502.5,-462 502.5,-486"/>
-<text text-anchor="middle" x="475.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~whm_drift</title>
+<g id="a_module~~graph~~ModuleGraph_node39"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="505,-2024 446,-2024 446,-2000 505,-2000 505,-2024"/>
+<text text-anchor="middle" x="475.5" y="-2009.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge78" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.38,-472.84C411.12,-472.66 342.83,-478.03 303,-516"/>
-</g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
+<!-- module~whm_drift&#45;&gt;module~whm_classes -->
 <g id="module~~graph~~ModuleGraph_edge77" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.39,-472.76C428.67,-473.37 402.58,-477.78 388,-495 352.5,-536.91 357.75,-933.38 352,-988 338.68,-1114.54 315.49,-1265.41 306.6,-1321.53"/>
-<polygon fill="#000000" stroke="#000000" points="303.09,-1321.31 304.98,-1331.74 310.01,-1322.41 303.09,-1321.31"/>
+<title>module~whm_drift&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M445.88,-2008.01C428.55,-2004.88 406.33,-1999.59 388,-1991 363.92,-1979.72 339.89,-1961.05 323.56,-1946.96"/>
+<polygon fill="#000000" stroke="#000000" points="325.57,-1944.07 315.76,-1940.07 320.94,-1949.31 325.57,-1944.07"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge76" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-2013.08C426.65,-2012.15 402.1,-2007.41 388,-1991 327.96,-1921.12 364.74,-1669.24 352,-1578 339.92,-1491.48 317.91,-1389.8 308.03,-1345.94"/>
+<polygon fill="#000000" stroke="#000000" points="311.42,-1345.06 305.79,-1336.09 304.59,-1346.61 311.42,-1345.06"/>
+</g>
+<!-- module~s_util_valid -->
 <g id="module~~graph~~ModuleGraph_node40" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~graph~~ModuleGraph_node40"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="506,-444 445,-444 445,-420 506,-420 506,-444"/>
-<text text-anchor="middle" x="475.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~graph~~ModuleGraph_node40"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="508,-1688 443,-1688 443,-1664 508,-1664 508,-1688"/>
+<text text-anchor="middle" x="475.5" y="-1673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge80" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M444.69,-436.21C427.54,-439.36 405.91,-444.61 388,-453 345.42,-472.94 337.04,-483.55 303,-516"/>
-</g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<!-- module~s_util_valid&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge79" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.64,-430.9C425.45,-431.93 401.64,-436.81 388,-453 349.62,-498.57 358.07,-928.73 352,-988 339.05,-1114.58 315.63,-1265.42 306.65,-1321.53"/>
-<polygon fill="#000000" stroke="#000000" points="303.14,-1321.31 305,-1331.74 310.05,-1322.42 303.14,-1321.31"/>
+<title>module~s_util_valid&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M442.66,-1671.41C425.85,-1668.22 405.21,-1663.06 388,-1655 345.42,-1635.06 339.02,-1622.22 303,-1592"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge78" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.66,-1676C424.38,-1674.31 402.3,-1669.11 388,-1655 365.45,-1632.75 321.37,-1417.24 307.37,-1346.43"/>
+<polygon fill="#000000" stroke="#000000" points="310.76,-1345.49 305.39,-1336.35 303.89,-1346.84 310.76,-1345.49"/>
+</g>
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~graph~~ModuleGraph_node41" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~graph~~ModuleGraph_node41"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="505.5,-402 445.5,-402 445.5,-378 505.5,-378 505.5,-402"/>
-<text text-anchor="middle" x="475.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~graph~~ModuleGraph_node41"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="532.5,-1646 418.5,-1646 418.5,-1622 532.5,-1622 532.5,-1646"/>
+<text text-anchor="middle" x="475.5" y="-1631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge82" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M445.41,-392.33C427.7,-394.85 405.24,-400.09 388,-411 337.26,-443.11 346.46,-474.57 303,-516"/>
-<path fill="none" stroke="#000000" d="M301,-516C275.32,-540.48 264.38,-545.76 252,-579 198.55,-722.46 295.97,-1136.45 216,-1267 214.26,-1269.85 212.08,-1272.41 209.62,-1274.72"/>
-<polygon fill="#000000" stroke="#000000" points="207.39,-1272.02 201.61,-1280.89 211.66,-1277.57 207.39,-1272.02"/>
-</g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge81" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.46,-388.83C426.11,-389.76 401.8,-394.54 388,-411 346.74,-460.23 358.38,-924.08 352,-988 339.35,-1114.61 315.76,-1265.44 306.69,-1321.54"/>
-<polygon fill="#000000" stroke="#000000" points="303.18,-1321.31 305.02,-1331.74 310.08,-1322.43 303.18,-1321.31"/>
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M418.23,-1632.67C381.69,-1629.05 335.06,-1618.89 303,-1592"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge80" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.06,-1629.21C407,-1625.97 396.28,-1620.89 388,-1613 310.96,-1539.56 302.69,-1400.23 302.54,-1346.19"/>
+<polygon fill="#000000" stroke="#000000" points="306.04,-1346.04 302.61,-1336.01 299.04,-1345.99 306.04,-1346.04"/>
+</g>
+<!-- module~s_util_solve -->
 <g id="module~~graph~~ModuleGraph_node42" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~graph~~ModuleGraph_node42"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="528.5,-1856 422.5,-1856 422.5,-1832 528.5,-1832 528.5,-1856"/>
-<text text-anchor="middle" x="475.5" y="-1841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~graph~~ModuleGraph_node42"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="509.5,-1604 441.5,-1604 441.5,-1580 509.5,-1580 509.5,-1604"/>
+<text text-anchor="middle" x="475.5" y="-1589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~fraggle_classes -->
-<g id="module~~graph~~ModuleGraph_edge84" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M422.45,-1850.12C410.4,-1853.24 398.15,-1857.94 388,-1865 349.99,-1891.44 324.16,-1940.82 311.66,-1969.28"/>
-<polygon fill="#000000" stroke="#000000" points="308.33,-1968.16 307.66,-1978.74 314.78,-1970.89 308.33,-1968.16"/>
-</g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<!-- module~s_util_solve&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge83" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.21,-1841.32C409.45,-1838.2 396.92,-1832.65 388,-1823 353.78,-1785.97 360.76,-1648.65 352,-1599 336.77,-1512.64 316.39,-1410.3 307.49,-1366.12"/>
-<polygon fill="#000000" stroke="#000000" points="310.89,-1365.29 305.48,-1356.18 304.03,-1366.68 310.89,-1365.29"/>
+<title>module~s_util_solve&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M441.35,-1596.84C397.44,-1602.45 323.19,-1608.94 303,-1592"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge82" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.37,-1591.4C423.57,-1589.4 402.4,-1584.11 388,-1571 321.28,-1510.23 306.93,-1394.69 303.84,-1346.25"/>
+<polygon fill="#000000" stroke="#000000" points="307.33,-1346 303.31,-1336.2 300.34,-1346.38 307.33,-1346"/>
+</g>
+<!-- module~s_helio_kick -->
 <g id="module~~graph~~ModuleGraph_node43" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~graph~~ModuleGraph_node43"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="523.5,-2108 427.5,-2108 427.5,-2084 523.5,-2084 523.5,-2108"/>
-<text text-anchor="middle" x="475.5" y="-2093.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~graph~~ModuleGraph_node43"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="678,-1690 608,-1690 608,-1666 678,-1666 678,-1690"/>
+<text text-anchor="middle" x="643" y="-1675.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~fraggle_classes -->
-<g id="module~~graph~~ModuleGraph_edge86" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M427.43,-2089.4C414.13,-2086.28 400.01,-2081.7 388,-2075 359.25,-2058.96 333.48,-2030.53 318.04,-2011.23"/>
-<polygon fill="#000000" stroke="#000000" points="320.61,-2008.83 311.7,-2003.08 315.08,-2013.13 320.61,-2008.83"/>
-</g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
+<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
 <g id="module~~graph~~ModuleGraph_edge85" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.07,-2094.98C412.47,-2092.21 397.7,-2086.43 388,-2075 353.67,-2034.57 359.02,-1651.57 352,-1599 340.4,-1512.08 318.14,-1410.03 308.11,-1366.02"/>
-<polygon fill="#000000" stroke="#000000" points="311.49,-1365.09 305.84,-1356.13 304.67,-1366.66 311.49,-1365.09"/>
+<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M607.72,-1690.17C604.32,-1692.62 601.28,-1695.53 599,-1699 553.12,-1768.68 616.12,-2384.67 563,-2449 553.41,-2460.62 538.57,-2466.43 523.88,-2469.18"/>
+<polygon fill="#000000" stroke="#000000" points="523.2,-2465.74 513.8,-2470.62 524.2,-2472.67 523.2,-2465.74"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge84" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.53,-1665.84C604.9,-1663.38 601.59,-1660.46 599,-1657 541.75,-1580.48 628.94,-1514.18 563,-1445 535.84,-1416.51 508.43,-1449.02 476.5,-1426"/>
+</g>
+<!-- module~s_gr -->
 <g id="module~~graph~~ModuleGraph_node44" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~graph~~ModuleGraph_node44"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="510.5,-2276 440.5,-2276 440.5,-2252 510.5,-2252 510.5,-2276"/>
-<text text-anchor="middle" x="475.5" y="-2261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_gr</title>
+<g id="a_module~~graph~~ModuleGraph_node44"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-1562 448.5,-1562 448.5,-1538 502.5,-1538 502.5,-1562"/>
+<text text-anchor="middle" x="475.5" y="-1547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~whm_classes -->
-<g id="module~~graph~~ModuleGraph_edge88" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M440.3,-2270.48C424.19,-2273.99 404.85,-2278.88 388,-2285 369.12,-2291.86 348.92,-2301.73 332.95,-2310.17"/>
-<polygon fill="#000000" stroke="#000000" points="331.23,-2307.12 324.08,-2314.95 334.55,-2313.29 331.23,-2307.12"/>
-</g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<!-- module~s_gr&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge87" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.31,-2264.87C421.94,-2263.37 400.56,-2258.08 388,-2243 342.15,-2187.92 360.78,-1670.13 352,-1599 341.26,-1511.97 318.55,-1409.98 308.26,-1366"/>
-<polygon fill="#000000" stroke="#000000" points="311.63,-1365.05 305.93,-1356.12 304.82,-1366.65 311.63,-1365.05"/>
-</g>
-<!-- module~s_operator_cross -->
-<g id="module~~graph~~ModuleGraph_node45" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~graph~~ModuleGraph_node45"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="523.5,-108 427.5,-108 427.5,-84 523.5,-84 523.5,-108"/>
-<text text-anchor="middle" x="475.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest_operators -->
-<g id="module~~graph~~ModuleGraph_node76" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~graph~~ModuleGraph_node76"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="352,-108 252,-108 252,-84 352,-84 352,-108"/>
-<text text-anchor="middle" x="302" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
-</a>
-</g>
-</g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest_operators -->
-<g id="module~~graph~~ModuleGraph_edge90" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" d="M427.18,-96C407.16,-96 383.61,-96 362.44,-96"/>
-<polygon fill="#000000" stroke="#000000" points="362.26,-92.5 352.26,-96 362.26,-99.5 362.26,-92.5"/>
+<title>module~s_gr&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.38,-1556.31C431.21,-1560.47 408.26,-1566.04 388,-1571 350.2,-1580.26 332.81,-1617.01 303,-1592"/>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge89" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.3,-96.74C412.53,-99.47 397.6,-105.29 388,-117 357.29,-154.44 356.31,-939.76 352,-988 340.68,-1114.74 316.3,-1265.49 306.85,-1321.55"/>
-<polygon fill="#000000" stroke="#000000" points="303.34,-1321.31 305.12,-1331.75 310.24,-1322.48 303.34,-1321.31"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge86" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.24,-1549.71C429.46,-1548.17 404.67,-1543.27 388,-1529 331.44,-1480.59 311.84,-1388.46 305.62,-1346.2"/>
+<polygon fill="#000000" stroke="#000000" points="309.07,-1345.57 304.26,-1336.13 302.13,-1346.51 309.07,-1345.57"/>
 </g>
 <!-- module~s_symba_util -->
-<g id="module~~graph~~ModuleGraph_node46" class="node">
+<g id="module~~graph~~ModuleGraph_node45" class="node">
 <title>module~s_symba_util</title>
-<g id="a_module~~graph~~ModuleGraph_node46"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="832,-1314 757,-1314 757,-1290 832,-1290 832,-1314"/>
-<text text-anchor="middle" x="794.5" y="-1299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<g id="a_module~~graph~~ModuleGraph_node45"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="832,-1213 757,-1213 757,-1189 832,-1189 832,-1213"/>
+<text text-anchor="middle" x="794.5" y="-1198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_util&#45;&gt;module~symba_classes -->
-<g id="module~~graph~~ModuleGraph_edge92" class="edge">
+<g id="module~~graph~~ModuleGraph_edge89" class="edge">
 <title>module~s_symba_util&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M756.64,-1304.73C744.15,-1307.56 731.28,-1312.94 723,-1323 669.68,-1387.82 734.81,-1630.01 687,-1699 686.56,-1699.64 686.09,-1700.26 685.6,-1700.86"/>
-<polygon fill="#000000" stroke="#000000" points="683.12,-1698.38 678.12,-1707.72 687.86,-1703.54 683.12,-1698.38"/>
+<path fill="none" stroke="#000000" d="M756.93,-1190.73C738.43,-1185.53 715.67,-1179.13 695.44,-1173.45"/>
+<polygon fill="#000000" stroke="#000000" points="696.32,-1170.06 685.74,-1170.73 694.42,-1176.8 696.32,-1170.06"/>
 </g>
 <!-- module~s_symba_util&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge91" class="edge">
+<g id="module~~graph~~ModuleGraph_edge88" class="edge">
 <title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.91,-1291.2C714.53,-1278.77 649.76,-1260.04 644,-1260"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.92,-1204.32C726.45,-1207.52 682.05,-1213.19 644,-1222"/>
 </g>
 <!-- module~s_symba_step -->
-<g id="module~~graph~~ModuleGraph_node47" class="node">
+<g id="module~~graph~~ModuleGraph_node46" class="node">
 <title>module~s_symba_step</title>
-<g id="a_module~~graph~~ModuleGraph_node47"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="835.5,-1272 753.5,-1272 753.5,-1248 835.5,-1248 835.5,-1272"/>
-<text text-anchor="middle" x="794.5" y="-1257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<g id="a_module~~graph~~ModuleGraph_node46"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="835.5,-1297 753.5,-1297 753.5,-1273 835.5,-1273 835.5,-1297"/>
+<text text-anchor="middle" x="794.5" y="-1282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_step&#45;&gt;module~symba_classes -->
-<g id="module~~graph~~ModuleGraph_edge94" class="edge">
+<g id="module~~graph~~ModuleGraph_edge91" class="edge">
 <title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M753.28,-1263.5C741.86,-1266.5 730.5,-1271.79 723,-1281 664.12,-1353.28 739.74,-1622.12 687,-1699 686.56,-1699.64 686.09,-1700.27 685.6,-1700.87"/>
-<polygon fill="#000000" stroke="#000000" points="683.13,-1698.39 678.16,-1707.74 687.88,-1703.54 683.13,-1698.39"/>
+<path fill="none" stroke="#000000" d="M753.14,-1278.25C742.62,-1275.13 731.78,-1270.6 723,-1264 699.35,-1246.22 704.81,-1231.63 687,-1208 679.39,-1197.9 670.22,-1187.27 662.31,-1178.51"/>
+<polygon fill="#000000" stroke="#000000" points="664.82,-1176.07 655.49,-1171.06 659.66,-1180.79 664.82,-1176.07"/>
 </g>
 <!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge93" class="edge">
+<g id="module~~graph~~ModuleGraph_edge90" class="edge">
 <title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.5,-1304C426.58,-1306.87 372.94,-1321.26 338.61,-1331.97"/>
-<polygon fill="#000000" stroke="#000000" points="337.5,-1328.65 329.03,-1335.01 339.62,-1335.32 337.5,-1328.65"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642,-1260C605.17,-1259.75 598.58,-1275.48 563,-1285 524.98,-1295.17 515.79,-1301.65 476.5,-1304"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.21,-1260.15C723.12,-1260.22 680.98,-1260.25 644,-1260"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.26,-1275.12C743.18,-1272.08 732.52,-1268.36 723,-1264 686.84,-1247.46 682.74,-1213.03 644,-1222"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<g id="module~~graph~~ModuleGraph_edge92" class="edge">
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.43,-2339.72C266.01,-2318.19 217.14,-2272.89 171,-2241"/>
+</g>
+<!-- module~s_io -->
+<g id="module~~graph~~ModuleGraph_node48" class="node">
+<title>module~s_io</title>
+<g id="a_module~~graph~~ModuleGraph_node48"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-1520 448.5,-1520 448.5,-1496 502.5,-1496 502.5,-1520"/>
+<text text-anchor="middle" x="475.5" y="-1505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+</a>
+</g>
+</g>
+<!-- module~s_io&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge94" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.23,-1511.57C430.6,-1514.64 407.17,-1520.02 388,-1529 345.42,-1548.94 339.02,-1622.22 303,-1592"/>
+</g>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge93" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.2,-1507.22C429.66,-1505.44 405.16,-1500.43 388,-1487 341.31,-1450.45 317.62,-1381.11 308.14,-1345.81"/>
+<polygon fill="#000000" stroke="#000000" points="311.51,-1344.85 305.64,-1336.03 304.72,-1346.58 311.51,-1344.85"/>
 </g>
-<!-- module~s_helio_drift -->
-<g id="module~~graph~~ModuleGraph_node48" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~graph~~ModuleGraph_node48"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="678,-1438 608,-1438 608,-1414 678,-1414 678,-1438"/>
-<text text-anchor="middle" x="643" y="-1423.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<!-- module~s_symba_io -->
+<g id="module~~graph~~ModuleGraph_node49" class="node">
+<title>module~s_symba_io</title>
+<g id="a_module~~graph~~ModuleGraph_node49"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="829.5,-1171 759.5,-1171 759.5,-1147 829.5,-1147 829.5,-1171"/>
+<text text-anchor="middle" x="794.5" y="-1156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
+<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
 <g id="module~~graph~~ModuleGraph_edge96" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M607.68,-1438.15C604.29,-1440.6 601.27,-1443.52 599,-1447 540.54,-1536.84 630.81,-2327.99 563,-2411 553.47,-2422.67 538.65,-2428.5 523.95,-2431.24"/>
-<polygon fill="#000000" stroke="#000000" points="523.27,-2427.8 513.87,-2432.68 524.26,-2434.73 523.27,-2427.8"/>
+<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M759.2,-1159C740.38,-1159 716.67,-1159 695.66,-1159"/>
+<polygon fill="#000000" stroke="#000000" points="695.6,-1155.5 685.6,-1159 695.6,-1162.5 695.6,-1155.5"/>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge95" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.92,-1415.53C594.04,-1411.42 577.81,-1406.78 563,-1403 524.86,-1393.27 510.27,-1404.22 476.5,-1384"/>
-</g>
-<!-- module~lambda_function -->
-<g id="module~~graph~~ModuleGraph_node49" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~graph~~ModuleGraph_node49"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="215.5,-1183 124.5,-1183 124.5,-1159 215.5,-1159 215.5,-1183"/>
-<text text-anchor="middle" x="170" y="-1168.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
-</a>
-</g>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_edge97" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.23,-1178.58C115.76,-1180.02 106.81,-1181.53 98.11,-1183.01"/>
-<polygon fill="#000000" stroke="#000000" points="97.32,-1179.59 88.04,-1184.71 98.49,-1186.49 97.32,-1179.59"/>
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642,-1222C621.65,-1226.71 615.63,-1228.35 599,-1241 578.89,-1256.3 584.53,-1271.78 563,-1285 529.46,-1305.6 515.77,-1301.33 476.5,-1304"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M759.32,-1167.7C747.63,-1171.06 734.58,-1175.25 723,-1180 686.21,-1195.08 682.74,-1213.03 644,-1222"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~graph~~ModuleGraph_node50" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~graph~~ModuleGraph_node50"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-1814 448.5,-1814 448.5,-1790 502.5,-1790 502.5,-1814"/>
-<text text-anchor="middle" x="475.5" y="-1799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~graph~~ModuleGraph_node50"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="531.5,-1024 419.5,-1024 419.5,-1000 531.5,-1000 531.5,-1024"/>
+<text text-anchor="middle" x="475.5" y="-1009.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge99" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.15,-1801.29C429.58,-1799.53 405.08,-1794.54 388,-1781 322.42,-1729.02 372.54,-1659.54 303,-1613"/>
-</g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge98" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.14,-1802.7C428.82,-1801.73 403.37,-1797.09 388,-1781 387.08,-1780.03 324.38,-1454.92 307.27,-1366.16"/>
-<polygon fill="#000000" stroke="#000000" points="310.66,-1365.27 305.33,-1356.11 303.79,-1366.6 310.66,-1365.27"/>
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M419.39,-1005.64C408.25,-1002.5 397.16,-997.85 388,-991 327.57,-945.79 378.33,-848.56 303,-844"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge97" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.39,-1016.39C407.86,-1019.61 396.61,-1024.78 388,-1033 310.53,-1106.98 302.52,-1247.26 302.49,-1301.66"/>
+<polygon fill="#000000" stroke="#000000" points="298.99,-1301.94 302.58,-1311.91 305.99,-1301.88 298.99,-1301.94"/>
+</g>
+<!-- module~s_util_peri -->
 <g id="module~~graph~~ModuleGraph_node51" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~graph~~ModuleGraph_node51"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-1690 603.5,-1690 603.5,-1666 682.5,-1666 682.5,-1690"/>
-<text text-anchor="middle" x="643" y="-1675.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~graph~~ModuleGraph_node51"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="506,-982 445,-982 445,-958 506,-958 506,-982"/>
+<text text-anchor="middle" x="475.5" y="-967.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
-<g id="module~~graph~~ModuleGraph_edge101" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M607.72,-1690.17C604.32,-1692.61 601.28,-1695.53 599,-1699 552.89,-1769.06 616.4,-2388.32 563,-2453 553.49,-2464.52 538.82,-2470.34 524.25,-2473.11"/>
-<polygon fill="#000000" stroke="#000000" points="523.63,-2469.66 514.24,-2474.58 524.65,-2476.59 523.63,-2469.66"/>
-</g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<!-- module~s_util_peri&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge100" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.44,-1665.9C604.82,-1663.44 601.54,-1660.49 599,-1657 531.95,-1564.78 640.53,-1486.6 563,-1403 536.24,-1374.14 510.27,-1404.22 476.5,-1384"/>
+<title>module~s_util_peri&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M444.6,-967.55C427.02,-964.99 404.98,-959.74 388,-949 337.26,-916.89 362.93,-847.63 303,-844"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge99" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.74,-969.81C426.08,-971.3 402.84,-976.34 388,-991 343.07,-1035.41 314.31,-1234.18 305.71,-1301.57"/>
+<polygon fill="#000000" stroke="#000000" points="302.19,-1301.54 304.42,-1311.89 309.14,-1302.4 302.19,-1301.54"/>
+</g>
+<!-- module~s_rmvs_chk -->
 <g id="module~~graph~~ModuleGraph_node52" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~graph~~ModuleGraph_node52"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="512,-2234 439,-2234 439,-2210 512,-2210 512,-2234"/>
-<text text-anchor="middle" x="475.5" y="-2219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~graph~~ModuleGraph_node52"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="678,-1484 608,-1484 608,-1460 678,-1460 678,-1484"/>
+<text text-anchor="middle" x="643" y="-1469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~whm_classes -->
-<g id="module~~graph~~ModuleGraph_edge103" class="edge">
-<title>module~s_whm_step&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M438.81,-2226.22C422.55,-2229.23 403.52,-2234.34 388,-2243 359.25,-2259.04 333.48,-2287.47 318.04,-2306.77"/>
-<polygon fill="#000000" stroke="#000000" points="315.08,-2304.87 311.7,-2314.92 320.61,-2309.17 315.08,-2304.87"/>
-</g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
 <g id="module~~graph~~ModuleGraph_edge102" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.59,-2222.69C420.63,-2221 400.19,-2215.58 388,-2201 345.03,-2149.58 360.34,-1665.49 352,-1599 341.09,-1511.99 318.47,-1409.99 308.23,-1366.01"/>
-<polygon fill="#000000" stroke="#000000" points="311.61,-1365.05 305.91,-1356.12 304.79,-1366.65 311.61,-1365.05"/>
+<title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M629.62,-1484.29C619.31,-1495.42 605.34,-1512.81 599,-1531 566.93,-1622.99 624.77,-2331.67 563,-2407 553.53,-2418.55 538.87,-2424.38 524.3,-2427.15"/>
+<polygon fill="#000000" stroke="#000000" points="523.67,-2423.7 514.29,-2428.61 524.69,-2430.63 523.67,-2423.7"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge101" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.59,-1460C595.4,-1454.99 578.49,-1449.33 563,-1445 525.09,-1434.4 508.43,-1449.02 476.5,-1426"/>
+</g>
+<!-- module~s_whm_util -->
 <g id="module~~graph~~ModuleGraph_node53" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~graph~~ModuleGraph_node53"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="679.5,-1522 606.5,-1522 606.5,-1498 679.5,-1498 679.5,-1522"/>
-<text text-anchor="middle" x="643" y="-1507.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~graph~~ModuleGraph_node53"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="508.5,-1982 442.5,-1982 442.5,-1958 508.5,-1958 508.5,-1982"/>
+<text text-anchor="middle" x="475.5" y="-1967.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
-<g id="module~~graph~~ModuleGraph_edge105" class="edge">
-<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M607.69,-1522.15C604.3,-1524.6 601.27,-1527.52 599,-1531 545.48,-1612.93 625.05,-2335.32 563,-2411 553.45,-2422.65 538.62,-2428.47 523.93,-2431.22"/>
-<polygon fill="#000000" stroke="#000000" points="523.25,-2427.78 513.84,-2432.66 524.24,-2434.71 523.25,-2427.78"/>
-</g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<!-- module~s_whm_util&#45;&gt;module~whm_classes -->
 <g id="module~~graph~~ModuleGraph_edge104" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.12,-1497.77C606.05,-1495.29 602.19,-1492.38 599,-1489 570.56,-1458.87 594.82,-1429.54 563,-1403 532.78,-1377.79 510.27,-1404.22 476.5,-1384"/>
+<title>module~s_whm_util&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M442.45,-1962.25C426.14,-1958.3 406.01,-1953.41 388,-1949 375.77,-1946.01 362.56,-1942.75 350.28,-1939.72"/>
+<polygon fill="#000000" stroke="#000000" points="350.78,-1936.23 340.23,-1937.23 349.1,-1943.03 350.78,-1936.23"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge103" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.26,-1970.81C423.61,-1969.43 401.27,-1964.29 388,-1949 333.71,-1886.44 363.86,-1659.98 352,-1578 339.49,-1491.54 317.7,-1389.83 307.96,-1345.96"/>
+<polygon fill="#000000" stroke="#000000" points="311.35,-1345.09 305.75,-1336.09 304.52,-1346.62 311.35,-1345.09"/>
+</g>
+<!-- module~s_util_exit -->
 <g id="module~~graph~~ModuleGraph_node54" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~graph~~ModuleGraph_node54"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-1772 448.5,-1772 448.5,-1748 502.5,-1748 502.5,-1772"/>
-<text text-anchor="middle" x="475.5" y="-1757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~graph~~ModuleGraph_node54"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="505.5,-940 445.5,-940 445.5,-916 505.5,-916 505.5,-940"/>
+<text text-anchor="middle" x="475.5" y="-925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge107" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M448.25,-1758.58C429.97,-1756.48 405.76,-1751.35 388,-1739 332.54,-1700.43 359.14,-1650.57 303,-1613"/>
-</g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<!-- module~s_util_exit&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge106" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.23,-1760.61C428.96,-1759.59 403.53,-1754.94 388,-1739 374.65,-1725.29 322.29,-1447.9 307.13,-1366.36"/>
-<polygon fill="#000000" stroke="#000000" points="310.51,-1365.39 305.25,-1356.2 303.63,-1366.67 310.51,-1365.39"/>
+<title>module~s_util_exit&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M445.49,-923.94C428.22,-920.8 406.19,-915.52 388,-907 345.42,-887.06 349.94,-846.84 303,-844"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge105" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.43,-927.62C426.58,-928.96 402.86,-933.92 388,-949 337.76,-1000.02 312.03,-1228.86 305.01,-1301.68"/>
+<polygon fill="#000000" stroke="#000000" points="301.5,-1301.69 304.05,-1311.97 308.47,-1302.34 301.5,-1301.69"/>
+</g>
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~graph~~ModuleGraph_node55" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~graph~~ModuleGraph_node55"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="844,-1230 745,-1230 745,-1206 844,-1206 844,-1230"/>
-<text text-anchor="middle" x="794.5" y="-1215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~graph~~ModuleGraph_node55"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="534.5,-2318 416.5,-2318 416.5,-2294 534.5,-2294 534.5,-2318"/>
+<text text-anchor="middle" x="475.5" y="-2303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
-<g id="module~~graph~~ModuleGraph_edge109" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M744.83,-1224.14C736.44,-1227.33 728.62,-1232.05 723,-1239 658.55,-1318.75 744.67,-1614.22 687,-1699 686.56,-1699.64 686.1,-1700.27 685.61,-1700.88"/>
-<polygon fill="#000000" stroke="#000000" points="683.14,-1698.4 678.18,-1707.76 687.89,-1703.53 683.14,-1698.4"/>
-</g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes -->
 <g id="module~~graph~~ModuleGraph_edge108" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M752.45,-1205.91C709.13,-1193.23 646.7,-1175.24 644,-1176"/>
+<title>module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M416.39,-2298.49C406.31,-2295.4 396.39,-2291.07 388,-2285 363.43,-2267.21 374.17,-2247.72 352,-2227 348.62,-2223.84 344.79,-2220.96 340.79,-2218.35"/>
+<polygon fill="#000000" stroke="#000000" points="342.28,-2215.16 331.89,-2213.1 338.72,-2221.19 342.28,-2215.16"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge107" class="edge">
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.12,-2302.47C405.32,-2299.13 395.2,-2293.69 388,-2285 337.83,-2224.42 361.47,-1656.08 352,-1578 341.48,-1491.28 318.66,-1389.7 308.3,-1345.91"/>
+<polygon fill="#000000" stroke="#000000" points="311.68,-1344.98 305.95,-1336.07 304.87,-1346.61 311.68,-1344.98"/>
+</g>
+<!-- module~s_kick -->
 <g id="module~~graph~~ModuleGraph_node56" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~graph~~ModuleGraph_node56"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="838.5,-1188 750.5,-1188 750.5,-1164 838.5,-1164 838.5,-1188"/>
-<text text-anchor="middle" x="794.5" y="-1173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_kick</title>
+<g id="a_module~~graph~~ModuleGraph_node56"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-1478 448.5,-1478 448.5,-1454 502.5,-1454 502.5,-1478"/>
+<text text-anchor="middle" x="475.5" y="-1463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
-<g id="module~~graph~~ModuleGraph_edge111" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M750.25,-1180.26C739.85,-1183.38 729.8,-1188.53 723,-1197 652.98,-1284.22 749.6,-1606.32 687,-1699 686.56,-1699.65 686.1,-1700.27 685.62,-1700.88"/>
-<polygon fill="#000000" stroke="#000000" points="683.14,-1698.4 678.2,-1707.78 687.91,-1703.53 683.14,-1698.4"/>
-</g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<!-- module~s_kick&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge110" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.45,-1169.9C720.11,-1167.06 678.85,-1166.18 644,-1176"/>
+<title>module~s_kick&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.19,-1467.95C430.09,-1470.31 406.15,-1475.51 388,-1487 337.26,-1519.11 349,-1630.59 303,-1592"/>
+<path fill="none" stroke="#000000" d="M301,-1592C186.18,-1495.67 172.77,-980.15 171.21,-866.27"/>
+<polygon fill="#000000" stroke="#000000" points="174.71,-866.22 171.09,-856.26 167.71,-866.31 174.71,-866.22"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge109" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.36,-1462.63C430.12,-1459.26 405.93,-1452.67 388,-1440 352.93,-1415.21 326.61,-1371.36 313.12,-1345.26"/>
+<polygon fill="#000000" stroke="#000000" points="316.19,-1343.57 308.58,-1336.2 309.93,-1346.71 316.19,-1343.57"/>
+</g>
+<!-- module~s_symba_encounter_check -->
 <g id="module~~graph~~ModuleGraph_node57" class="node">
-<title>module~orbel</title>
-<g id="a_module~~graph~~ModuleGraph_node57"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="502.5,-1356 448.5,-1356 448.5,-1332 502.5,-1332 502.5,-1356"/>
-<text text-anchor="middle" x="475.5" y="-1341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~graph~~ModuleGraph_node57"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="866,-1129 723,-1129 723,-1105 866,-1105 866,-1129"/>
+<text text-anchor="middle" x="794.5" y="-1114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
 <g id="module~~graph~~ModuleGraph_edge112" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.45,-1344C419.28,-1344 371.81,-1344 339.08,-1344"/>
-<polygon fill="#000000" stroke="#000000" points="339.01,-1340.5 329.01,-1344 339.01,-1347.5 339.01,-1340.5"/>
+<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M750.66,-1129.04C733.41,-1133.88 713.36,-1139.51 695.33,-1144.58"/>
+<polygon fill="#000000" stroke="#000000" points="694.24,-1141.25 685.56,-1147.32 696.13,-1147.99 694.24,-1141.25"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge111" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.12,-1104.89C709.68,-1091.98 646.42,-1073.55 644,-1075"/>
+</g>
+<!-- module~s_fraggle_set -->
 <g id="module~~graph~~ModuleGraph_node58" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~graph~~ModuleGraph_node58"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="532.5,-1730 418.5,-1730 418.5,-1706 532.5,-1706 532.5,-1730"/>
-<text text-anchor="middle" x="475.5" y="-1715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~graph~~ModuleGraph_node58"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="514,-2276 437,-2276 437,-2252 514,-2252 514,-2276"/>
+<text text-anchor="middle" x="475.5" y="-2261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes -->
+<!-- module~s_fraggle_set&#45;&gt;module~fraggle_classes -->
 <g id="module~~graph~~ModuleGraph_edge114" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M418.37,-1709.07C407.89,-1706.11 397.31,-1702.19 388,-1697 341.62,-1671.13 347.14,-1642.54 303,-1613"/>
+<title>module~s_fraggle_set&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M436.92,-2256.77C421.53,-2253.33 403.69,-2248.7 388,-2243 377.52,-2239.19 354.31,-2227.64 334.79,-2217.62"/>
+<polygon fill="#000000" stroke="#000000" points="336.35,-2214.48 325.86,-2213.01 333.14,-2220.7 336.35,-2214.48"/>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge113" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.2,-1713.65C407,-1710.4 396.19,-1705.2 388,-1697 364.07,-1673.02 320.39,-1440.41 307.01,-1366.45"/>
-<polygon fill="#000000" stroke="#000000" points="310.41,-1365.59 305.19,-1356.37 303.52,-1366.83 310.41,-1365.59"/>
-</g>
-<!-- module~s_operator_mag -->
-<g id="module~~graph~~ModuleGraph_node59" class="node">
-<title>module~s_operator_mag</title>
-<g id="a_module~~graph~~ModuleGraph_node59"><a xlink:href=".././module/s_operator_mag.html" xlink:title="s_operator_mag">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="521,-24 430,-24 430,0 521,0 521,-24"/>
-<text text-anchor="middle" x="475.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_mag</text>
-</a>
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.79,-2264.55C419.27,-2262.68 399.75,-2257.14 388,-2243 340.71,-2186.09 361.03,-1651.44 352,-1578 341.34,-1491.3 318.59,-1389.71 308.28,-1345.91"/>
+<polygon fill="#000000" stroke="#000000" points="311.65,-1344.99 305.94,-1336.07 304.84,-1346.61 311.65,-1344.99"/>
 </g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge116" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.93,-1915.74C291.77,-1873.09 267.65,-1727.13 252,-1606 214.29,-1314.05 181.25,-957.51 172.99,-866.15"/>
+<polygon fill="#000000" stroke="#000000" points="176.47,-865.77 172.08,-856.12 169.49,-866.4 176.47,-865.77"/>
 </g>
-<!-- module~s_operator_mag&#45;&gt;module~swiftest_operators -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~graph~~ModuleGraph_edge115" class="edge">
-<title>module~s_operator_mag&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" d="M429.78,-19.29C415.99,-22.47 401.02,-26.9 388,-33 363.92,-44.28 339.89,-62.95 323.56,-77.04"/>
-<polygon fill="#000000" stroke="#000000" points="320.94,-74.69 315.76,-83.93 325.57,-79.93 320.94,-74.69"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.57,-1940.19C285.93,-2002.28 226.06,-2279.05 171,-2241"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169,-2241C81.44,-2180.5 49.08,-441.1 45.37,-223.32"/>
+<polygon fill="#000000" stroke="#000000" points="48.86,-223.05 45.2,-213.11 41.87,-223.17 48.86,-223.05"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_util_version -->
 <g id="module~~graph~~ModuleGraph_node60" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~graph~~ModuleGraph_node60"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="520,-2066 431,-2066 431,-2042 520,-2042 520,-2066"/>
-<text text-anchor="middle" x="475.5" y="-2051.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~s_util_version</title>
+<g id="a_module~~graph~~ModuleGraph_node60"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="514.5,-1276 436.5,-1276 436.5,-1252 514.5,-1252 514.5,-1276"/>
+<text text-anchor="middle" x="475.5" y="-1261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~fraggle_classes -->
+<!-- module~s_util_version&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge118" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M436.4,-1263.56C419.43,-1261.37 400.5,-1255.85 388,-1243 261.62,-1112.99 483.98,-854.96 303,-844"/>
+</g>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge117" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M430.82,-2045.38C416.94,-2042.11 401.65,-2037.96 388,-2033 369.12,-2026.14 348.92,-2016.27 332.95,-2007.83"/>
-<polygon fill="#000000" stroke="#000000" points="334.55,-2004.71 324.08,-2003.05 331.23,-2010.88 334.55,-2004.71"/>
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.37,-1274.67C421.22,-1279.12 403.69,-1284.52 388,-1290 371.63,-1295.72 353.78,-1302.74 338.67,-1308.91"/>
+<polygon fill="#000000" stroke="#000000" points="337.1,-1305.78 329.19,-1312.83 339.77,-1312.25 337.1,-1305.78"/>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge116" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M430.73,-2053.57C415,-2051.08 398.55,-2045.33 388,-2033 356.54,-1996.23 358.57,-1646.94 352,-1599 340.08,-1512.12 317.99,-1410.05 308.06,-1366.03"/>
-<polygon fill="#000000" stroke="#000000" points="311.44,-1365.11 305.81,-1356.13 304.61,-1366.66 311.44,-1365.11"/>
+<!-- module~s_symba_discard -->
+<g id="module~~graph~~ModuleGraph_node61" class="node">
+<title>module~s_symba_discard</title>
+<g id="a_module~~graph~~ModuleGraph_node61"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="842.5,-1087 746.5,-1087 746.5,-1063 842.5,-1063 842.5,-1087"/>
+<text text-anchor="middle" x="794.5" y="-1072.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge122" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-974C193.76,-1049.06 288.58,-1147.06 216,-1256 211.35,-1262.98 204.98,-1269.33 198.51,-1274.71"/>
-<polygon fill="#000000" stroke="#000000" points="196.14,-1272.12 190.36,-1281 200.42,-1277.66 196.14,-1272.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.68,-1707.86C604.28,-1705.41 601.26,-1702.48 599,-1699 538.54,-1605.96 642.86,-778.03 563,-701 535.01,-674 417.36,-675.5 388,-701 301.91,-775.75 422.88,-865.69 352,-955 337.48,-973.3 322.14,-960.61 303,-974"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
 <g id="module~~graph~~ModuleGraph_edge120" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M629.69,-1732.32C619.43,-1743.46 605.49,-1760.86 599,-1779 575.32,-1845.23 608.03,-2356.97 563,-2411 553.35,-2422.57 538.51,-2428.38 523.82,-2431.13"/>
-<polygon fill="#000000" stroke="#000000" points="523.15,-2427.69 513.75,-2432.58 524.14,-2434.62 523.15,-2427.69"/>
+<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M746.24,-1086.33C738.27,-1089.01 730.24,-1092.22 723,-1096 700.83,-1107.58 678.85,-1125.81 663.72,-1139.68"/>
+<polygon fill="#000000" stroke="#000000" points="660.96,-1137.48 656.07,-1146.87 665.75,-1142.58 660.96,-1137.48"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge119" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M629.66,-1732.31C619.38,-1743.44 605.43,-1760.84 599,-1779 572.43,-1854.1 614.46,-2434.2 563,-2495 537.57,-2525.04 515.16,-2506.61 476.5,-2514"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.5,-2514C435.84,-2521.39 415.14,-2523.51 388,-2495 379.47,-2486.04 321.22,-2109.7 306.42,-2013.31"/>
-<polygon fill="#000000" stroke="#000000" points="309.84,-2012.57 304.87,-2003.21 302.92,-2013.63 309.84,-2012.57"/>
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M746.41,-1063.18C715.2,-1058.05 674.53,-1056.76 644,-1075"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~graph~~ModuleGraph_edge118" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M629.67,-1732.31C619.4,-1743.45 605.45,-1760.85 599,-1779 573.88,-1849.66 610.91,-2395.3 563,-2453 553.45,-2464.5 538.78,-2470.3 524.21,-2473.08"/>
-<polygon fill="#000000" stroke="#000000" points="523.59,-2469.63 514.21,-2474.55 524.61,-2476.56 523.59,-2469.63"/>
+<!-- module~s_util_fill -->
+<g id="module~~graph~~ModuleGraph_node62" class="node">
+<title>module~s_util_fill</title>
+<g id="a_module~~graph~~ModuleGraph_node62"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="502.5,-1234 448.5,-1234 448.5,-1210 502.5,-1210 502.5,-1234"/>
+<text text-anchor="middle" x="475.5" y="-1219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+</g>
+<!-- module~s_util_fill&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge122" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M448.33,-1222.51C429.11,-1221.44 403.7,-1216.77 388,-1201 272.92,-1085.41 465.8,-853.86 303,-844"/>
+</g>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge121" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.5,-2514C399.63,-2528.32 377.38,-2530.67 303,-2514"/>
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.24,-1224.76C430.39,-1227.48 406.72,-1232.78 388,-1243 359.92,-1258.33 334.32,-1285.31 318.71,-1303.89"/>
+<polygon fill="#000000" stroke="#000000" points="315.89,-1301.81 312.27,-1311.77 321.31,-1306.24 315.89,-1301.81"/>
 </g>
 <!-- module~s_tides_step_spin -->
-<g id="module~~graph~~ModuleGraph_node62" class="node">
+<g id="module~~graph~~ModuleGraph_node63" class="node">
 <title>module~s_tides_step_spin</title>
-<g id="a_module~~graph~~ModuleGraph_node62"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="524.5,-1688 426.5,-1688 426.5,-1664 524.5,-1664 524.5,-1688"/>
-<text text-anchor="middle" x="475.5" y="-1673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<g id="a_module~~graph~~ModuleGraph_node63"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="524.5,-1192 426.5,-1192 426.5,-1168 524.5,-1168 524.5,-1192"/>
+<text text-anchor="middle" x="475.5" y="-1177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
 <!-- module~s_tides_step_spin&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge124" class="edge">
 <title>module~s_tides_step_spin&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M426.35,-1666.3C413.71,-1663.22 400.2,-1659.43 388,-1655 348.4,-1640.61 338.02,-1636.44 303,-1613"/>
+<path fill="none" stroke="#000000" d="M426.47,-1177.5C412.52,-1174.55 398.29,-1169.03 388,-1159 284.17,-1057.77 447.74,-852.77 303,-844"/>
 </g>
 <!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge123" class="edge">
 <title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.49,-1673.48C412.54,-1670.53 398.31,-1665.02 388,-1655 345.78,-1613.97 315.55,-1430.36 306.11,-1366.21"/>
-<polygon fill="#000000" stroke="#000000" points="309.53,-1365.4 304.64,-1356 302.61,-1366.4 309.53,-1365.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.12,-1185.31C412.93,-1188.41 399.21,-1193.3 388,-1201 350.66,-1226.66 324.72,-1274.52 312,-1302.37"/>
+<polygon fill="#000000" stroke="#000000" points="308.74,-1301.08 307.91,-1311.65 315.14,-1303.91 308.74,-1301.08"/>
 </g>
-<!-- module~drift_implementation -->
-<g id="module~~graph~~ModuleGraph_node63" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~graph~~ModuleGraph_node63"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="530,-1646 421,-1646 421,-1622 530,-1622 530,-1646"/>
-<text text-anchor="middle" x="475.5" y="-1631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<!-- module~s_util_rescale -->
+<g id="module~~graph~~ModuleGraph_node64" class="node">
+<title>module~s_util_rescale</title>
+<g id="a_module~~graph~~ModuleGraph_node64"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="514.5,-730 436.5,-730 436.5,-706 514.5,-706 514.5,-730"/>
+<text text-anchor="middle" x="475.5" y="-715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_rescale&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge126" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M420.71,-1639.4C384.55,-1640.33 337.4,-1636.02 303,-1613"/>
+<title>module~s_util_rescale&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M436.12,-719.73C419.7,-722.25 401.29,-727.67 388,-739 356.48,-765.89 381.69,-796.09 352,-825 335.27,-841.3 326.31,-845.41 303,-844"/>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge125" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.87,-1629.84C408.87,-1626.66 397.03,-1621.44 388,-1613 315.82,-1545.56 304.61,-1417.4 303.11,-1366.07"/>
-<polygon fill="#000000" stroke="#000000" points="306.61,-1366 302.91,-1356.07 299.61,-1366.13 306.61,-1366"/>
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.45,-718.02C419.28,-720.09 400.17,-725.63 388,-739 349.21,-781.61 313.06,-1199.68 304.77,-1301.65"/>
+<polygon fill="#000000" stroke="#000000" points="301.27,-1301.5 303.96,-1311.75 308.25,-1302.07 301.27,-1301.5"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~graph~~ModuleGraph_edge130" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.43,-1171.06C623.04,-1186.44 606.06,-1214.27 599,-1241 583.59,-1299.37 606.39,-2285.03 563,-2327 507.1,-2381.08 451.63,-2371.72 388,-2327 349.35,-2299.84 382.94,-2262.69 352,-2227 349.34,-2223.94 346.24,-2221.18 342.9,-2218.7"/>
+<polygon fill="#000000" stroke="#000000" points="344.55,-2215.61 334.24,-2213.14 340.76,-2221.49 344.55,-2215.61"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge128" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.67,-2470.92C420.54,-2468.14 402.21,-2462.88 388,-2453 349.99,-2426.56 324.16,-2377.18 311.66,-2348.72"/>
-<polygon fill="#000000" stroke="#000000" points="314.78,-2347.11 307.66,-2339.26 308.33,-2349.84 314.78,-2347.11"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.52,-1146.82C637.98,-1059.67 614.52,-532.81 563,-487 533.94,-461.16 416.92,-461 388,-487 331.83,-537.5 397.92,-765.03 352,-825 337.8,-843.55 326.31,-845.41 303,-844"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-844C275.98,-842.45 248.2,-842.24 224.77,-842.51"/>
+<polygon fill="#000000" stroke="#000000" points="224.62,-839.01 214.67,-842.65 224.72,-846.01 224.62,-839.01"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_edge127" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2514C234.34,-2499.06 234.58,-2456.97 171,-2432"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.98,-2484.58C390.54,-2497.38 315.98,-2516.91 303,-2514"/>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~graph~~ModuleGraph_edge129" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.41,-1171.05C623.01,-1186.43 606.01,-1214.26 599,-1241 581.97,-1305.95 605.28,-2396.84 563,-2449 553.51,-2460.7 538.7,-2466.54 524,-2469.28"/>
+<polygon fill="#000000" stroke="#000000" points="523.32,-2465.84 513.91,-2470.71 524.31,-2472.77 523.32,-2465.84"/>
 </g>
-<!-- module~s_whm_setup -->
-<g id="module~~graph~~ModuleGraph_node65" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~graph~~ModuleGraph_node65"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="515,-2192 436,-2192 436,-2168 515,-2168 515,-2192"/>
-<text text-anchor="middle" x="475.5" y="-2177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~graph~~ModuleGraph_edge127" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.83,-1146.91C640.3,-1045.96 627.36,-345.15 563,-281 493.64,-211.88 217.9,-270.77 124,-243 105.37,-237.49 86.09,-227.34 71.24,-218.4"/>
+<polygon fill="#000000" stroke="#000000" points="72.96,-215.35 62.62,-213.04 69.26,-221.29 72.96,-215.35"/>
 </g>
+<!-- module~lambda_function -->
+<g id="module~~graph~~ModuleGraph_node66" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~graph~~ModuleGraph_node66"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="215.5,-192 124.5,-192 124.5,-168 215.5,-168 215.5,-192"/>
+<text text-anchor="middle" x="170" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+</a>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~whm_classes -->
-<g id="module~~graph~~ModuleGraph_edge130" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M435.8,-2183.23C419.89,-2186.05 401.96,-2191.29 388,-2201 349.99,-2227.44 324.16,-2276.82 311.66,-2305.28"/>
-<polygon fill="#000000" stroke="#000000" points="308.33,-2304.16 307.66,-2314.74 314.78,-2306.89 308.33,-2304.16"/>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge129" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.97,-2180.4C418.69,-2178.42 399.63,-2172.85 388,-2159 347.91,-2111.25 359.9,-1660.85 352,-1599 340.89,-1512.02 318.37,-1410 308.2,-1366.01"/>
-<polygon fill="#000000" stroke="#000000" points="311.57,-1365.06 305.89,-1356.12 304.76,-1366.66 311.57,-1365.06"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~graph~~ModuleGraph_edge131" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.23,-187.58C115.76,-189.02 106.81,-190.53 98.11,-192.01"/>
+<polygon fill="#000000" stroke="#000000" points="97.32,-188.59 88.04,-193.71 98.49,-195.49 97.32,-188.59"/>
 </g>
 <!-- module~s_util_resize -->
-<g id="module~~graph~~ModuleGraph_node66" class="node">
+<g id="module~~graph~~ModuleGraph_node67" class="node">
 <title>module~s_util_resize</title>
-<g id="a_module~~graph~~ModuleGraph_node66"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="511.5,-944 439.5,-944 439.5,-920 511.5,-920 511.5,-944"/>
-<text text-anchor="middle" x="475.5" y="-929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<g id="a_module~~graph~~ModuleGraph_node67"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="511.5,-688 439.5,-688 439.5,-664 511.5,-664 511.5,-688"/>
+<text text-anchor="middle" x="475.5" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_resize&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge132" class="edge">
+<g id="module~~graph~~ModuleGraph_edge133" class="edge">
 <title>module~s_util_resize&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M439.33,-937.52C395.82,-944.88 324.79,-958.75 303,-974"/>
+<path fill="none" stroke="#000000" d="M439.36,-676.48C421.85,-678.53 401.57,-683.91 388,-697 345.47,-738.03 391.74,-781.26 352,-825 336.29,-842.29 326.31,-845.41 303,-844"/>
 </g>
 <!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge131" class="edge">
+<g id="module~~graph~~ModuleGraph_edge132" class="edge">
 <title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.47,-932.1C421.76,-934.02 401.28,-939.4 388,-953 335.73,-1006.55 311.24,-1246.89 304.79,-1321.7"/>
-<polygon fill="#000000" stroke="#000000" points="301.28,-1321.61 303.94,-1331.86 308.26,-1322.19 301.28,-1321.61"/>
-</g>
-<!-- module~s_util_solve -->
-<g id="module~~graph~~ModuleGraph_node67" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~graph~~ModuleGraph_node67"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="509.5,-902 441.5,-902 441.5,-878 509.5,-878 509.5,-902"/>
-<text text-anchor="middle" x="475.5" y="-887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.46,-675.64C421.53,-677.4 400.83,-682.77 388,-697 367.18,-720.1 316.67,-1193.08 305.3,-1301.84"/>
+<polygon fill="#000000" stroke="#000000" points="301.8,-1301.67 304.24,-1311.98 308.76,-1302.4 301.8,-1301.67"/>
 </g>
-</g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~graph~~ModuleGraph_edge134" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M441.33,-892.98C424.35,-895.72 403.96,-900.96 388,-911 366.61,-924.46 372.45,-940.17 352,-955 333.09,-968.71 322.14,-960.61 303,-974"/>
-</g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge133" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.08,-889.82C422.96,-891.54 401.57,-896.82 388,-911 358.99,-941.33 317.35,-1237.07 305.97,-1321.56"/>
-<polygon fill="#000000" stroke="#000000" points="302.48,-1321.25 304.63,-1331.62 309.42,-1322.18 302.48,-1321.25"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.63,-831.73C151.56,-753.58 68.99,-325.39 49.24,-223"/>
+<polygon fill="#000000" stroke="#000000" points="52.67,-222.3 47.34,-213.14 45.8,-223.62 52.67,-222.3"/>
 </g>
-<!-- module~s_rmvs_discard -->
-<g id="module~~graph~~ModuleGraph_node68" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~graph~~ModuleGraph_node68"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="687,-1648 599,-1648 599,-1624 687,-1624 687,-1648"/>
-<text text-anchor="middle" x="643" y="-1633.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<!-- module~s_whm_gr -->
+<g id="module~~graph~~ModuleGraph_node69" class="node">
+<title>module~s_whm_gr</title>
+<g id="a_module~~graph~~ModuleGraph_node69"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="506.5,-1940 444.5,-1940 444.5,-1916 506.5,-1916 506.5,-1940"/>
+<text text-anchor="middle" x="475.5" y="-1925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
+<!-- module~s_whm_gr&#45;&gt;module~whm_classes -->
 <g id="module~~graph~~ModuleGraph_edge136" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M607.71,-1648.16C604.31,-1650.61 601.28,-1653.53 599,-1657 550.42,-1731.02 619.28,-2384.66 563,-2453 553.5,-2464.53 538.84,-2470.35 524.27,-2473.12"/>
-<polygon fill="#000000" stroke="#000000" points="523.65,-2469.68 514.26,-2474.59 524.66,-2476.6 523.65,-2469.68"/>
+<title>module~s_whm_gr&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M444.23,-1928C418.26,-1928 380.37,-1928 350.38,-1928"/>
+<polygon fill="#000000" stroke="#000000" points="350.13,-1924.5 340.13,-1928 350.13,-1931.5 350.13,-1924.5"/>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge135" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.53,-1623.84C604.9,-1621.38 601.59,-1618.46 599,-1615 541.75,-1538.48 628.94,-1472.18 563,-1403 535.84,-1374.51 510.27,-1404.22 476.5,-1384"/>
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.44,-1928.89C425.42,-1927.73 401.87,-1922.79 388,-1907 339.46,-1851.75 362.97,-1650.72 352,-1578 338.96,-1491.62 317.45,-1389.86 307.87,-1345.97"/>
+<polygon fill="#000000" stroke="#000000" points="311.26,-1345.12 305.7,-1336.1 304.43,-1346.62 311.26,-1345.12"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
-<g id="module~~graph~~ModuleGraph_node69" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~graph~~ModuleGraph_node69"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="534.5,-2024 416.5,-2024 416.5,-2000 534.5,-2000 534.5,-2024"/>
-<text text-anchor="middle" x="475.5" y="-2009.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~graph~~ModuleGraph_edge138" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M437.27,-2470.14C419.86,-2468.17 400.3,-2462.67 388,-2449 347.65,-2404.17 361.76,-2239.52 352,-2180 337.97,-2094.45 316.97,-1993.42 307.69,-1949.82"/>
+<polygon fill="#000000" stroke="#000000" points="311.11,-1949.07 305.6,-1940.02 304.27,-1950.53 311.11,-1949.07"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge139" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2279C286.25,-2249.03 264.53,-2252.97 252,-2222 199.07,-2091.15 174.96,-1034.13 171.45,-866.39"/>
+<polygon fill="#000000" stroke="#000000" points="174.95,-866.19 171.24,-856.26 167.95,-866.33 174.95,-866.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M437.32,-2469.13C420.35,-2466.86 401.15,-2461.41 388,-2449 348.12,-2411.37 379.53,-2378.42 352,-2331 336.06,-2303.54 317.02,-2307.49 303,-2279"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~graph~~ModuleGraph_edge137" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2279C291,-2258.68 273.75,-2271.33 252,-2265 215.95,-2254.51 201.7,-2262.62 171,-2241"/>
+</g>
+<!-- module~s_whm_coord -->
+<g id="module~~graph~~ModuleGraph_node71" class="node">
+<title>module~s_whm_coord</title>
+<g id="a_module~~graph~~ModuleGraph_node71"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="515,-1898 436,-1898 436,-1874 515,-1874 515,-1898"/>
+<text text-anchor="middle" x="475.5" y="-1883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes -->
-<g id="module~~graph~~ModuleGraph_edge138" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M416.44,-2004.89C396.75,-2002.48 374.88,-1999.8 355.64,-1997.45"/>
-<polygon fill="#000000" stroke="#000000" points="355.9,-1993.95 345.55,-1996.21 355.05,-2000.9 355.9,-1993.95"/>
+<!-- module~s_whm_coord&#45;&gt;module~whm_classes -->
+<g id="module~~graph~~ModuleGraph_edge141" class="edge">
+<title>module~s_whm_coord&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M435.74,-1895.38C420.81,-1898.99 403.61,-1903.18 388,-1907 375.77,-1909.99 362.56,-1913.25 350.28,-1916.28"/>
+<polygon fill="#000000" stroke="#000000" points="349.1,-1912.97 340.23,-1918.77 350.78,-1919.77 349.1,-1912.97"/>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge137" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.39,-2008.24C405.57,-2004.92 395.37,-1999.54 388,-1991 330.84,-1924.78 364.27,-1685.61 352,-1599 339.7,-1512.18 317.8,-1410.07 307.99,-1366.04"/>
-<polygon fill="#000000" stroke="#000000" points="311.38,-1365.13 305.77,-1356.14 304.55,-1366.66 311.38,-1365.13"/>
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
+<g id="module~~graph~~ModuleGraph_edge140" class="edge">
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.9,-1886.03C418.82,-1883.94 399.94,-1878.37 388,-1865 345.2,-1817.05 362.09,-1641.48 352,-1578 338.28,-1491.73 317.12,-1389.92 307.75,-1345.99"/>
+<polygon fill="#000000" stroke="#000000" points="311.15,-1345.15 305.63,-1336.11 304.3,-1346.62 311.15,-1345.15"/>
 </g>
 <!-- module~s_util_append -->
-<g id="module~~graph~~ModuleGraph_node70" class="node">
+<g id="module~~graph~~ModuleGraph_node72" class="node">
 <title>module~s_util_append</title>
-<g id="a_module~~graph~~ModuleGraph_node70"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="515,-860 436,-860 436,-836 515,-836 515,-860"/>
-<text text-anchor="middle" x="475.5" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<g id="a_module~~graph~~ModuleGraph_node72"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="515,-646 436,-646 436,-622 515,-622 515,-646"/>
+<text text-anchor="middle" x="475.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_append&#45;&gt;module~swiftest_classes -->
-<g id="module~~graph~~ModuleGraph_edge140" class="edge">
+<g id="module~~graph~~ModuleGraph_edge143" class="edge">
 <title>module~s_util_append&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M435.68,-849.8C419.37,-852.34 401.17,-857.77 388,-869 356.48,-895.89 381.69,-926.09 352,-955 335.27,-971.3 322.14,-960.61 303,-974"/>
+<path fill="none" stroke="#000000" d="M435.95,-634.49C419.09,-636.72 400.38,-642.25 388,-655 334.2,-710.41 402.04,-766.17 352,-825 336.87,-842.79 326.31,-845.41 303,-844"/>
 </g>
 <!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge139" class="edge">
+<g id="module~~graph~~ModuleGraph_edge142" class="edge">
 <title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.77,-848.31C418.87,-850.5 400.18,-856.06 388,-869 356.28,-902.72 315.96,-1232.35 305.55,-1321.74"/>
-<polygon fill="#000000" stroke="#000000" points="302.05,-1321.51 304.38,-1331.85 309,-1322.32 302.05,-1321.51"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.91,-633.98C418.83,-636.07 399.95,-641.64 388,-655 365.82,-679.81 315.96,-1188.53 305.11,-1301.79"/>
+<polygon fill="#000000" stroke="#000000" points="301.63,-1301.46 304.16,-1311.75 308.59,-1302.13 301.63,-1301.46"/>
 </g>
-<!-- module~s_helio_gr -->
-<g id="module~~graph~~ModuleGraph_node71" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~graph~~ModuleGraph_node71"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="674,-1480 612,-1480 612,-1456 674,-1456 674,-1480"/>
-<text text-anchor="middle" x="643" y="-1465.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<!-- module~s_rmvs_discard -->
+<g id="module~~graph~~ModuleGraph_node73" class="node">
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~graph~~ModuleGraph_node73"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="687,-1316 599,-1316 599,-1292 687,-1292 687,-1316"/>
+<text text-anchor="middle" x="643" y="-1301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
-<g id="module~~graph~~ModuleGraph_edge142" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M611.92,-1477.43C606.83,-1480.35 602.18,-1484.13 599,-1489 543.01,-1574.88 627.93,-2331.66 563,-2411 553.46,-2422.66 538.64,-2428.49 523.94,-2431.23"/>
-<polygon fill="#000000" stroke="#000000" points="523.26,-2427.79 513.86,-2432.67 524.25,-2434.72 523.26,-2427.79"/>
-</g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge141" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.75,-1455.85C607.94,-1453.26 603.17,-1450.3 599,-1447 579.19,-1431.32 584.53,-1416.22 563,-1403 529.46,-1382.4 510.27,-1404.22 476.5,-1384"/>
-</g>
-<!-- module~s_rmvs_step -->
-<g id="module~~graph~~ModuleGraph_node72" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~graph~~ModuleGraph_node72"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="679.5,-1606 606.5,-1606 606.5,-1582 679.5,-1582 679.5,-1606"/>
-<text text-anchor="middle" x="643" y="-1591.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
-</a>
-</g>
+<!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
+<g id="module~~graph~~ModuleGraph_edge145" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M607.67,-1316.14C604.28,-1318.59 601.26,-1321.51 599,-1325 533.6,-1425.95 638.91,-2313.69 563,-2407 553.57,-2418.59 538.92,-2424.42 524.35,-2427.19"/>
+<polygon fill="#000000" stroke="#000000" points="523.72,-2423.74 514.33,-2428.65 524.73,-2430.67 523.72,-2423.74"/>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge144" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M607.7,-1606.16C604.3,-1608.61 601.28,-1611.52 599,-1615 547.95,-1692.97 622.16,-2380.99 563,-2453 553.51,-2464.54 538.86,-2470.36 524.28,-2473.14"/>
-<polygon fill="#000000" stroke="#000000" points="523.66,-2469.69 514.27,-2474.6 524.68,-2476.62 523.66,-2469.69"/>
-</g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge143" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.66,-1581.74C605.01,-1579.29 601.66,-1576.41 599,-1573 551.49,-1512.11 617.4,-1457.82 563,-1403 535.27,-1375.06 510.27,-1404.22 476.5,-1384"/>
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.74,-1302.4C565.31,-1301.55 517.92,-1301.19 476.5,-1304"/>
 </g>
-<!-- module~s_symba_kick -->
-<g id="module~~graph~~ModuleGraph_node73" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~graph~~ModuleGraph_node73"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="834,-1146 755,-1146 755,-1122 834,-1122 834,-1146"/>
-<text text-anchor="middle" x="794.5" y="-1131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<!-- module~orbel -->
+<g id="module~~graph~~ModuleGraph_node74" class="node">
+<title>module~orbel</title>
+<g id="a_module~~graph~~ModuleGraph_node74"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="502.5,-1398 448.5,-1398 448.5,-1374 502.5,-1374 502.5,-1398"/>
+<text text-anchor="middle" x="475.5" y="-1383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
+<!-- module~orbel&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge146" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M754.64,-1137.04C742.72,-1139.96 730.73,-1145.32 723,-1155 647.42,-1249.68 754.53,-1598.42 687,-1699 686.57,-1699.65 686.11,-1700.27 685.62,-1700.88"/>
-<polygon fill="#000000" stroke="#000000" points="683.14,-1698.41 678.22,-1707.79 687.92,-1703.53 683.14,-1698.41"/>
-</g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge145" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.78,-1144.86C724.59,-1153.33 681.63,-1165.39 644,-1176"/>
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.34,-1381.15C430.96,-1377.57 407.79,-1372.08 388,-1365 369.61,-1358.41 349.9,-1349.07 334.1,-1340.96"/>
+<polygon fill="#000000" stroke="#000000" points="335.3,-1337.64 324.82,-1336.11 332.06,-1343.84 335.3,-1337.64"/>
 </g>
-<!-- module~s_rmvs_util -->
-<g id="module~~graph~~ModuleGraph_node74" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~graph~~ModuleGraph_node74"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-1564 609.5,-1564 609.5,-1540 676.5,-1540 676.5,-1564"/>
-<text text-anchor="middle" x="643" y="-1549.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<!-- module~s_util_coord -->
+<g id="module~~graph~~ModuleGraph_node75" class="node">
+<title>module~s_util_coord</title>
+<g id="a_module~~graph~~ModuleGraph_node75"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="510.5,-562 440.5,-562 440.5,-538 510.5,-538 510.5,-562"/>
+<text text-anchor="middle" x="475.5" y="-547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
+<!-- module~s_util_coord&#45;&gt;module~swiftest_classes -->
 <g id="module~~graph~~ModuleGraph_edge148" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M609.35,-1563.02C605.28,-1565.68 601.64,-1568.97 599,-1573 545.48,-1654.93 625.05,-2377.32 563,-2453 553.53,-2464.55 538.87,-2470.38 524.3,-2473.15"/>
-<polygon fill="#000000" stroke="#000000" points="523.67,-2469.7 514.29,-2474.61 524.69,-2476.63 523.67,-2469.7"/>
+<title>module~s_util_coord&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M440.36,-549.59C422.24,-551.27 401.08,-556.58 388,-571 302.62,-665.12 429.85,-851.68 303,-844"/>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge147" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.3,-1539.84C605.45,-1537.37 601.87,-1534.44 599,-1531 561.14,-1485.62 605.98,-1443.56 563,-1403 534.37,-1375.99 510.27,-1404.22 476.5,-1384"/>
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.2,-549.45C422.03,-551.08 400.88,-556.39 388,-571 381.76,-578.08 318.35,-1178.07 305.33,-1301.83"/>
+<polygon fill="#000000" stroke="#000000" points="301.83,-1301.68 304.26,-1311.99 308.79,-1302.41 301.83,-1301.68"/>
 </g>
-<!-- module~s_fraggle_util -->
-<g id="module~~graph~~ModuleGraph_node75" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~graph~~ModuleGraph_node75"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="513.5,-1982 437.5,-1982 437.5,-1958 513.5,-1958 513.5,-1982"/>
-<text text-anchor="middle" x="475.5" y="-1967.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<!-- module~s_whm_step -->
+<g id="module~~graph~~ModuleGraph_node76" class="node">
+<title>module~s_whm_step</title>
+<g id="a_module~~graph~~ModuleGraph_node76"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="512,-1856 439,-1856 439,-1832 512,-1832 512,-1856"/>
+<text text-anchor="middle" x="475.5" y="-1841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~fraggle_classes -->
+<!-- module~s_whm_step&#45;&gt;module~whm_classes -->
 <g id="module~~graph~~ModuleGraph_edge150" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M437.29,-1974.56C413.46,-1977.47 382.17,-1981.31 355.79,-1984.54"/>
-<polygon fill="#000000" stroke="#000000" points="355.08,-1981.1 345.58,-1985.79 355.93,-1988.05 355.08,-1981.1"/>
+<title>module~s_whm_step&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M438.91,-1849.32C422.85,-1852.55 403.95,-1857.53 388,-1865 363.92,-1876.28 339.89,-1894.95 323.56,-1909.04"/>
+<polygon fill="#000000" stroke="#000000" points="320.94,-1906.69 315.76,-1915.93 325.57,-1911.93 320.94,-1906.69"/>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge149" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M437.09,-1970.3C419.63,-1968.37 400.09,-1962.86 388,-1949 336.59,-1890.09 363.39,-1676.35 352,-1599 339.23,-1512.25 317.58,-1410.11 307.91,-1366.05"/>
-<polygon fill="#000000" stroke="#000000" points="311.3,-1365.16 305.73,-1356.14 304.46,-1366.66 311.3,-1365.16"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_edge151" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.42,-108.01C281.94,-126.93 260.6,-165.21 252,-201 238.59,-256.84 257.31,-1194.11 216,-1234 175.96,-1272.67 106.38,-1235.09 69.53,-1210.16"/>
-<polygon fill="#000000" stroke="#000000" points="71.11,-1206.99 60.9,-1204.15 67.11,-1212.74 71.11,-1206.99"/>
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.65,-1844.21C420.94,-1842.35 400.7,-1836.93 388,-1823 350.92,-1782.34 361.21,-1632.25 352,-1578 337.37,-1491.88 316.68,-1389.99 307.59,-1346.01"/>
+<polygon fill="#000000" stroke="#000000" points="311,-1345.21 305.54,-1336.13 304.14,-1346.63 311,-1345.21"/>
 </g>
 <!-- program~swiftest_driver -->
 <g id="module~~graph~~ModuleGraph_node77" class="node">
 <title>program~swiftest_driver</title>
 <g id="a_module~~graph~~ModuleGraph_node77"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="516,-1276 435,-1276 435,-1252 516,-1252 516,-1276"/>
-<text text-anchor="middle" x="475.5" y="-1261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="516,-1356 435,-1356 435,-1332 516,-1332 516,-1356"/>
+<text text-anchor="middle" x="475.5" y="-1341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
 <!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~graph~~ModuleGraph_edge152" class="edge">
+<g id="module~~graph~~ModuleGraph_edge151" class="edge">
 <title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M434.91,-1273.44C419.89,-1277.65 402.83,-1283.22 388,-1290 366.54,-1299.82 344.07,-1314.3 327.63,-1325.79"/>
-<polygon fill="#000000" stroke="#000000" points="325.28,-1323.17 319.16,-1331.82 329.34,-1328.87 325.28,-1323.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M434.72,-1339.36C405.94,-1336.01 367.36,-1331.51 339.39,-1328.24"/>
+<polygon fill="#000000" stroke="#000000" points="339.57,-1324.74 329.23,-1327.06 338.76,-1331.69 339.57,-1324.74"/>
 </g>
 <!-- proc~walltime_finish -->
 <g id="module~~graph~~ModuleGraph_node78" class="node">
 <title>proc~walltime_finish</title>
 <g id="a_module~~graph~~ModuleGraph_node78"><a xlink:href=".././proc/walltime_finish.html" xlink:title="walltime_finish">
-<polygon fill="#d9534f" stroke="#d9534f" points="211,-1141 129,-1141 129,-1117 211,-1117 211,-1141"/>
-<text text-anchor="middle" x="170" y="-1126.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_finish</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="211,-150 129,-150 129,-126 211,-126 211,-150"/>
+<text text-anchor="middle" x="170" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_finish</text>
 </a>
 </g>
 </g>
 <!-- proc~walltime_finish&#45;&gt;module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_edge153" class="edge">
+<g id="module~~graph~~ModuleGraph_edge152" class="edge">
 <title>proc~walltime_finish&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.24,-1141.21C136.21,-1144.04 129.86,-1147.08 124,-1150 108.04,-1157.96 90.5,-1167.23 76.01,-1175.04"/>
-<polygon fill="#000000" stroke="#000000" points="74.1,-1172.09 66.97,-1179.92 77.44,-1178.24 74.1,-1172.09"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.24,-150.21C136.21,-153.04 129.86,-156.08 124,-159 108.04,-166.96 90.5,-176.23 76.01,-184.04"/>
+<polygon fill="#000000" stroke="#000000" points="74.1,-181.09 66.97,-188.92 77.44,-187.24 74.1,-181.09"/>
 </g>
 <!-- proc~walltime_reset -->
 <g id="module~~graph~~ModuleGraph_node79" class="node">
 <title>proc~walltime_reset</title>
 <g id="a_module~~graph~~ModuleGraph_node79"><a xlink:href=".././proc/walltime_reset.html" xlink:title="walltime_reset">
-<polygon fill="#d9534f" stroke="#d9534f" points="210.5,-1099 129.5,-1099 129.5,-1075 210.5,-1075 210.5,-1099"/>
-<text text-anchor="middle" x="170" y="-1084.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_reset</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="210.5,-108 129.5,-108 129.5,-84 210.5,-84 210.5,-108"/>
+<text text-anchor="middle" x="170" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_reset</text>
 </a>
 </g>
 </g>
 <!-- proc~walltime_reset&#45;&gt;module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_edge154" class="edge">
+<g id="module~~graph~~ModuleGraph_edge153" class="edge">
 <title>proc~walltime_reset&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.05,-1099.02C133.83,-1101.65 128.61,-1104.66 124,-1108 98.8,-1126.24 75.08,-1153.28 60.34,-1171.73"/>
-<polygon fill="#000000" stroke="#000000" points="57.45,-1169.74 54.03,-1179.77 62.96,-1174.06 57.45,-1169.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.05,-108.02C133.83,-110.65 128.61,-113.66 124,-117 98.8,-135.24 75.08,-162.28 60.34,-180.73"/>
+<polygon fill="#000000" stroke="#000000" points="57.45,-178.74 54.03,-188.77 62.96,-183.06 57.45,-178.74"/>
 </g>
 <!-- proc~walltime_start -->
 <g id="module~~graph~~ModuleGraph_node80" class="node">
 <title>proc~walltime_start</title>
 <g id="a_module~~graph~~ModuleGraph_node80"><a xlink:href=".././proc/walltime_start.html" xlink:title="walltime_start">
-<polygon fill="#d9534f" stroke="#d9534f" points="209,-1057 131,-1057 131,-1033 209,-1033 209,-1057"/>
-<text text-anchor="middle" x="170" y="-1042.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_start</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="209,-66 131,-66 131,-42 209,-42 209,-66"/>
+<text text-anchor="middle" x="170" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_start</text>
 </a>
 </g>
 </g>
 <!-- proc~walltime_start&#45;&gt;module~swiftest_globals -->
-<g id="module~~graph~~ModuleGraph_edge155" class="edge">
+<g id="module~~graph~~ModuleGraph_edge154" class="edge">
 <title>proc~walltime_start&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M137.07,-1057.06C132.41,-1059.6 127.88,-1062.57 124,-1066 90.55,-1095.56 66.24,-1142.67 53.99,-1170.14"/>
-<polygon fill="#000000" stroke="#000000" points="50.65,-1169.06 49.89,-1179.63 57.07,-1171.83 50.65,-1169.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M137.07,-66.06C132.41,-68.6 127.88,-71.57 124,-75 90.55,-104.56 66.24,-151.67 53.99,-179.14"/>
+<polygon fill="#000000" stroke="#000000" points="50.65,-178.06 49.89,-188.63 57.07,-180.83 50.65,-178.06"/>
 </g>
-<!-- proc~util_solve_linear_system_d -->
+<!-- proc~fraggle_generate_fragments -->
 <g id="module~~graph~~ModuleGraph_node81" class="node">
-<title>proc~util_solve_linear_system_d</title>
-<g id="a_module~~graph~~ModuleGraph_node81"><a xlink:href=".././proc/util_solve_linear_system_d.html" xlink:title="util_solve_linear_system_d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-276 405,-276 405,-252 546,-252 546,-276"/>
-<text text-anchor="middle" x="475.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_d</text>
+<title>proc~fraggle_generate_fragments</title>
+<g id="a_module~~graph~~ModuleGraph_node81"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="549.5,-192 401.5,-192 401.5,-168 549.5,-168 549.5,-192"/>
+<text text-anchor="middle" x="475.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
 </a>
 </g>
 </g>
 <!-- ieee_exceptions -->
-<g id="module~~graph~~ModuleGraph_node92" class="node">
+<g id="module~~graph~~ModuleGraph_node93" class="node">
 <title>ieee_exceptions</title>
-<g id="a_module~~graph~~ModuleGraph_node92"><a xlink:href="http://fortranwiki.org/fortran/show/IEEE+arithmetic" xlink:title="ieee_exceptions">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-234 257,-234 257,-210 347,-210 347,-234"/>
-<text text-anchor="middle" x="302" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_exceptions</text>
+<g id="a_module~~graph~~ModuleGraph_node93"><a xlink:href="http://fortranwiki.org/fortran/show/IEEE+arithmetic" xlink:title="ieee_exceptions">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-150 257,-150 257,-126 347,-126 347,-150"/>
+<text text-anchor="middle" x="302" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_exceptions</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_d&#45;&gt;ieee_exceptions -->
-<g id="module~~graph~~ModuleGraph_edge156" class="edge">
-<title>proc~util_solve_linear_system_d&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.63,-251.93C412.63,-249.02 399.86,-245.9 388,-243 377.93,-240.53 367.19,-237.89 356.86,-235.34"/>
-<polygon fill="#000000" stroke="#000000" points="357.66,-231.93 347.11,-232.93 355.98,-238.73 357.66,-231.93"/>
+<!-- proc~fraggle_generate_fragments&#45;&gt;ieee_exceptions -->
+<g id="module~~graph~~ModuleGraph_edge155" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;ieee_exceptions</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.63,-167.93C412.63,-165.02 399.86,-161.9 388,-159 377.93,-156.53 367.19,-153.89 356.86,-151.34"/>
+<polygon fill="#000000" stroke="#000000" points="357.66,-147.93 347.11,-148.93 355.98,-154.73 357.66,-147.93"/>
 </g>
-<!-- proc~util_solve_linear_system_q -->
+<!-- proc~fraggle_set_original_scale_factors -->
 <g id="module~~graph~~ModuleGraph_node82" class="node">
-<title>proc~util_solve_linear_system_q</title>
-<g id="a_module~~graph~~ModuleGraph_node82"><a xlink:href=".././proc/util_solve_linear_system_q.html" xlink:title="util_solve_linear_system_q">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-234 405,-234 405,-210 546,-210 546,-234"/>
-<text text-anchor="middle" x="475.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_q</text>
+<title>proc~fraggle_set_original_scale_factors</title>
+<g id="a_module~~graph~~ModuleGraph_node82"><a xlink:href=".././proc/fraggle_set_original_scale_factors.html" xlink:title="fraggle_set_original_scale_factors">
+<polygon fill="#d9534f" stroke="#d9534f" points="563,-150 388,-150 388,-126 563,-126 563,-150"/>
+<text text-anchor="middle" x="475.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_original_scale_factors</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_q&#45;&gt;ieee_exceptions -->
-<g id="module~~graph~~ModuleGraph_edge157" class="edge">
-<title>proc~util_solve_linear_system_q&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.74,-222C388.92,-222 372.35,-222 357.27,-222"/>
-<polygon fill="#000000" stroke="#000000" points="357.11,-218.5 347.11,-222 357.11,-225.5 357.11,-218.5"/>
+<!-- proc~fraggle_set_original_scale_factors&#45;&gt;ieee_exceptions -->
+<g id="module~~graph~~ModuleGraph_edge156" class="edge">
+<title>proc~fraggle_set_original_scale_factors&#45;&gt;ieee_exceptions</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M388,-138C377.6,-138 367.23,-138 357.47,-138"/>
+<polygon fill="#000000" stroke="#000000" points="357.16,-134.5 347.16,-138 357.16,-141.5 357.16,-134.5"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- proc~xv2el -->
 <g id="module~~graph~~ModuleGraph_node83" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~graph~~ModuleGraph_node83"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="506.5,-318 444.5,-318 444.5,-294 506.5,-294 506.5,-318"/>
-<text text-anchor="middle" x="475.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>proc~xv2el</title>
+<g id="a_module~~graph~~ModuleGraph_node83"><a xlink:href=".././proc/xv2el.html" xlink:title="xv2el">
+<polygon fill="#d9534f" stroke="#d9534f" points="329,-816 275,-816 275,-792 329,-792 329,-816"/>
+<text text-anchor="middle" x="302" y="-801.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xv2el</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<!-- proc~xv2el&#45;&gt;module~swiftest_classes -->
+<g id="module~~graph~~ModuleGraph_edge157" class="edge">
+<title>proc~xv2el&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.69,-812.09C258.97,-816.93 238.5,-823.23 219.9,-828.95"/>
+<polygon fill="#000000" stroke="#000000" points="218.63,-825.68 210.1,-831.97 220.69,-832.37 218.63,-825.68"/>
+</g>
+<!-- proc~util_minimize_bfgs -->
+<g id="module~~graph~~ModuleGraph_node84" class="node">
+<title>proc~util_minimize_bfgs</title>
+<g id="a_module~~graph~~ModuleGraph_node84"><a xlink:href=".././proc/util_minimize_bfgs.html" xlink:title="util_minimize_bfgs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="525.5,-108 425.5,-108 425.5,-84 525.5,-84 525.5,-108"/>
+<text text-anchor="middle" x="475.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
+</a>
+</g>
+</g>
+<!-- proc~util_minimize_bfgs&#45;&gt;ieee_exceptions -->
 <g id="module~~graph~~ModuleGraph_edge158" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.16,-304.86C425.01,-305.92 401.43,-310.84 388,-327 340.98,-383.56 359.02,-914.78 352,-988 339.85,-1114.66 315.96,-1265.46 306.75,-1321.54"/>
-<polygon fill="#000000" stroke="#000000" points="303.24,-1321.31 305.06,-1331.75 310.14,-1322.45 303.24,-1321.31"/>
+<title>proc~util_minimize_bfgs&#45;&gt;ieee_exceptions</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.09,-107.96C412.96,-110.91 400.01,-114.06 388,-117 377.93,-119.47 367.19,-122.11 356.86,-124.66"/>
+<polygon fill="#000000" stroke="#000000" points="355.98,-121.27 347.11,-127.07 357.66,-128.07 355.98,-121.27"/>
 </g>
-<!-- proc~solve_wbs&#45;&gt;ieee_exceptions -->
+<!-- proc~util_solve_linear_system_d -->
+<g id="module~~graph~~ModuleGraph_node85" class="node">
+<title>proc~util_solve_linear_system_d</title>
+<g id="a_module~~graph~~ModuleGraph_node85"><a xlink:href=".././proc/util_solve_linear_system_d.html" xlink:title="util_solve_linear_system_d">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-66 405,-66 405,-42 546,-42 546,-66"/>
+<text text-anchor="middle" x="475.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_d</text>
+</a>
+</g>
+</g>
+<!-- proc~util_solve_linear_system_d&#45;&gt;ieee_exceptions -->
 <g id="module~~graph~~ModuleGraph_edge159" class="edge">
-<title>proc~solve_wbs&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.28,-301.72C427.2,-298.56 405.77,-293.32 388,-285 363.92,-273.72 339.89,-255.05 323.56,-240.96"/>
-<polygon fill="#000000" stroke="#000000" points="325.57,-238.07 315.76,-234.07 320.94,-243.31 325.57,-238.07"/>
+<title>proc~util_solve_linear_system_d&#45;&gt;ieee_exceptions</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.58,-66.12C403.47,-68.59 395.42,-71.53 388,-75 363.92,-86.28 339.89,-104.95 323.56,-119.04"/>
+<polygon fill="#000000" stroke="#000000" points="320.94,-116.69 315.76,-125.93 325.57,-121.93 320.94,-116.69"/>
 </g>
 <!-- proc~ge_wpp -->
-<g id="module~~graph~~ModuleGraph_node84" class="node">
+<g id="module~~graph~~ModuleGraph_node86" class="node">
 <title>proc~ge_wpp</title>
-<g id="a_module~~graph~~ModuleGraph_node84"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="502.5,-360 448.5,-360 448.5,-336 502.5,-336 502.5,-360"/>
-<text text-anchor="middle" x="475.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<g id="a_module~~graph~~ModuleGraph_node86"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="502.5,-234 448.5,-234 448.5,-210 502.5,-210 502.5,-234"/>
+<text text-anchor="middle" x="475.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
 <!-- proc~ge_wpp&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge160" class="edge">
 <title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.32,-346.7C428.56,-347.28 402.45,-351.68 388,-369 343.86,-421.9 358.7,-919.43 352,-988 339.62,-1114.64 315.87,-1265.45 306.72,-1321.54"/>
-<polygon fill="#000000" stroke="#000000" points="303.21,-1321.31 305.04,-1331.74 310.12,-1322.44 303.21,-1321.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.41,-232.16C428.14,-241.55 401.3,-257.62 388,-281 356.24,-336.83 357.36,-793.99 352,-858 337.69,-1028.89 313.72,-1234.32 305.7,-1301.53"/>
+<polygon fill="#000000" stroke="#000000" points="302.19,-1301.43 304.48,-1311.78 309.14,-1302.26 302.19,-1301.43"/>
 </g>
 <!-- proc~ge_wpp&#45;&gt;ieee_exceptions -->
 <g id="module~~graph~~ModuleGraph_edge161" class="edge">
 <title>proc~ge_wpp&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.19,-346.05C430.09,-343.69 406.15,-338.49 388,-327 354.58,-305.85 328.31,-267.01 314.27,-242.96"/>
-<polygon fill="#000000" stroke="#000000" points="317.31,-241.22 309.34,-234.24 311.21,-244.66 317.31,-241.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.23,-218.43C430.6,-215.36 407.17,-209.98 388,-201 363.92,-189.72 339.89,-171.05 323.56,-156.96"/>
+<polygon fill="#000000" stroke="#000000" points="325.57,-154.07 315.76,-150.07 320.94,-159.31 325.57,-154.07"/>
 </g>
-<!-- proc~fraggle_set_original_scale_factors -->
-<g id="module~~graph~~ModuleGraph_node85" class="node">
-<title>proc~fraggle_set_original_scale_factors</title>
-<g id="a_module~~graph~~ModuleGraph_node85"><a xlink:href=".././proc/fraggle_set_original_scale_factors.html" xlink:title="fraggle_set_original_scale_factors">
-<polygon fill="#d9534f" stroke="#d9534f" points="563,-192 388,-192 388,-168 563,-168 563,-192"/>
-<text text-anchor="middle" x="475.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_original_scale_factors</text>
+<!-- proc~util_solve_linear_system_q -->
+<g id="module~~graph~~ModuleGraph_node87" class="node">
+<title>proc~util_solve_linear_system_q</title>
+<g id="a_module~~graph~~ModuleGraph_node87"><a xlink:href=".././proc/util_solve_linear_system_q.html" xlink:title="util_solve_linear_system_q">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="546,-24 405,-24 405,0 546,0 546,-24"/>
+<text text-anchor="middle" x="475.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_q</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_set_original_scale_factors&#45;&gt;ieee_exceptions -->
+<!-- proc~util_solve_linear_system_q&#45;&gt;ieee_exceptions -->
 <g id="module~~graph~~ModuleGraph_edge162" class="edge">
-<title>proc~fraggle_set_original_scale_factors&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.63,-192.07C412.63,-194.98 399.86,-198.1 388,-201 377.93,-203.47 367.19,-206.11 356.86,-208.66"/>
-<polygon fill="#000000" stroke="#000000" points="355.98,-205.27 347.11,-211.07 357.66,-212.07 355.98,-205.27"/>
+<title>proc~util_solve_linear_system_q&#45;&gt;ieee_exceptions</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.16,-24.04C399.78,-26.49 393.62,-29.45 388,-33 354.58,-54.15 328.31,-92.99 314.27,-117.04"/>
+<polygon fill="#000000" stroke="#000000" points="311.21,-115.34 309.34,-125.76 317.31,-118.78 311.21,-115.34"/>
 </g>
-<!-- proc~fraggle_generate_fragments -->
-<g id="module~~graph~~ModuleGraph_node86" class="node">
-<title>proc~fraggle_generate_fragments</title>
-<g id="a_module~~graph~~ModuleGraph_node86"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="549.5,-150 401.5,-150 401.5,-126 549.5,-126 549.5,-150"/>
-<text text-anchor="middle" x="475.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
+<!-- proc~solve_wbs -->
+<g id="module~~graph~~ModuleGraph_node88" class="node">
+<title>proc~solve_wbs</title>
+<g id="a_module~~graph~~ModuleGraph_node88"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="506.5,-314 444.5,-314 444.5,-290 506.5,-290 506.5,-314"/>
+<text text-anchor="middle" x="475.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;ieee_exceptions -->
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
 <g id="module~~graph~~ModuleGraph_edge163" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.58,-150.12C403.47,-152.59 395.42,-155.53 388,-159 363.92,-170.28 339.89,-188.95 323.56,-203.04"/>
-<polygon fill="#000000" stroke="#000000" points="320.94,-200.69 315.76,-209.93 325.57,-205.93 320.94,-200.69"/>
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.22,-300.92C425.1,-302 401.54,-306.92 388,-323 349.62,-368.57 357.12,-798.64 352,-858 337.27,-1028.85 313.57,-1234.31 305.67,-1301.53"/>
+<polygon fill="#000000" stroke="#000000" points="302.15,-1301.43 304.46,-1311.78 309.1,-1302.26 302.15,-1301.43"/>
 </g>
-<!-- proc~util_minimize_bfgs -->
-<g id="module~~graph~~ModuleGraph_node87" class="node">
-<title>proc~util_minimize_bfgs</title>
-<g id="a_module~~graph~~ModuleGraph_node87"><a xlink:href=".././proc/util_minimize_bfgs.html" xlink:title="util_minimize_bfgs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="525.5,-66 425.5,-66 425.5,-42 525.5,-42 525.5,-66"/>
-<text text-anchor="middle" x="475.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
-</a>
+<!-- proc~solve_wbs&#45;&gt;ieee_exceptions -->
+<g id="module~~graph~~ModuleGraph_edge164" class="edge">
+<title>proc~solve_wbs&#45;&gt;ieee_exceptions</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M453.33,-289.97C435.01,-279.01 408.32,-261.72 388,-243 359.65,-216.88 332.67,-181.02 316.98,-158.69"/>
+<polygon fill="#000000" stroke="#000000" points="319.74,-156.52 311.17,-150.3 313.98,-160.51 319.74,-156.52"/>
 </g>
+<!-- proc~netcdf_initialize_output -->
+<g id="module~~graph~~ModuleGraph_node89" class="node">
+<title>proc~netcdf_initialize_output</title>
+<g id="a_module~~graph~~ModuleGraph_node89"><a xlink:href=".././proc/netcdf_initialize_output.html" xlink:title="netcdf_initialize_output">
+<polygon fill="#d9534f" stroke="#d9534f" points="855,-1816 734,-1816 734,-1792 855,-1792 855,-1816"/>
+<text text-anchor="middle" x="794.5" y="-1801.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_initialize_output</text>
+</a>
 </g>
-<!-- proc~util_minimize_bfgs&#45;&gt;ieee_exceptions -->
-<g id="module~~graph~~ModuleGraph_edge164" class="edge">
-<title>proc~util_minimize_bfgs&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.25,-58.84C412.2,-61.94 398.76,-66.95 388,-75 365.67,-91.71 329.91,-164.02 312.78,-200.62"/>
-<polygon fill="#000000" stroke="#000000" points="309.5,-199.37 308.47,-209.91 315.85,-202.32 309.5,-199.37"/>
 </g>
-<!-- proc~xv2el -->
-<g id="module~~graph~~ModuleGraph_node88" class="node">
-<title>proc~xv2el</title>
-<g id="a_module~~graph~~ModuleGraph_node88"><a xlink:href=".././proc/xv2el.html" xlink:title="xv2el">
-<polygon fill="#d9534f" stroke="#d9534f" points="329,-946 275,-946 275,-922 329,-922 329,-946"/>
-<text text-anchor="middle" x="302" y="-931.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xv2el</text>
+<!-- ieee_arithmetic -->
+<g id="module~~graph~~ModuleGraph_node92" class="node">
+<title>ieee_arithmetic</title>
+<g id="a_module~~graph~~ModuleGraph_node92"><a xlink:href="http://fortranwiki.org/fortran/show/IEEE_ARITHMETIC" xlink:title="ieee_arithmetic">
+<polygon fill="#337ab7" stroke="#337ab7" points="685.5,-1816 600.5,-1816 600.5,-1792 685.5,-1792 685.5,-1816"/>
+<text text-anchor="middle" x="643" y="-1801.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_arithmetic</text>
 </a>
 </g>
 </g>
-<!-- proc~xv2el&#45;&gt;module~swiftest_classes -->
+<!-- proc~netcdf_initialize_output&#45;&gt;ieee_arithmetic -->
 <g id="module~~graph~~ModuleGraph_edge165" class="edge">
-<title>proc~xv2el&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.9,-942.22C266.28,-946.23 257.49,-951.97 252,-960 174.45,-1073.4 291.49,-1152.22 216,-1267 214.17,-1269.79 211.92,-1272.32 209.42,-1274.6"/>
-<polygon fill="#000000" stroke="#000000" points="207.19,-1271.89 201.33,-1280.72 211.42,-1277.48 207.19,-1271.89"/>
+<title>proc~netcdf_initialize_output&#45;&gt;ieee_arithmetic</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M733.98,-1804C721.39,-1804 708.19,-1804 695.9,-1804"/>
+<polygon fill="#000000" stroke="#000000" points="695.83,-1800.5 685.83,-1804 695.83,-1807.5 695.83,-1800.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/lists/procedures.html b/docs/lists/procedures.html
index ef260edf2..453cfd88a 100644
--- a/docs/lists/procedures.html
+++ b/docs/lists/procedures.html
@@ -364,6 +364,8 @@ <h1>Procedures</h1>
 			 
 			   <tr><td><a href='../interface/kick_getacch_int_all_pl.html'>kick_getacch_int_all_pl</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
 			 
+			   <tr><td><a href='../interface/kick_getacch_int_all_tp.html'>kick_getacch_int_all_tp</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
+			 
 			   <tr><td><a href='../interface/kick_getacch_int_one_pl.html'>kick_getacch_int_one_pl</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
 			 
 			   <tr><td><a href='../interface/kick_getacch_int_one_tp.html'>kick_getacch_int_one_tp</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
@@ -729,6 +731,12 @@ <h1>Procedures</h1>
 			 
 			   <tr><td><a href='../interface/util_get_energy_momentum_system.html'>util_get_energy_momentum_system</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
 			 
+			   <tr><td><a href='../proc/util_get_energy_potential.html'>util_get_energy_potential</a></td><td><a href='../module/s_util_get_energy_momentum.html'>s_util_get_energy_momentum</a></td><td>Subroutine</td><td><p>Compute total system potential energy</p></td></tr>
+			 
+			   <tr><td><a href='../interface/util_index_eucl_ij_to_k.html'>util_index_eucl_ij_to_k</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
+			 
+			   <tr><td><a href='../interface/util_index_eucl_k_to_ij.html'>util_index_eucl_k_to_ij</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
+			 
 			   <tr><td><a href='../interface/util_index_eucl_plpl.html'>util_index_eucl_plpl</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
 			 
 			   <tr><td><a href='../interface/util_index_eucl_pltp.html'>util_index_eucl_pltp</a></td><td><a href='../module/swiftest_classes.html'>swiftest_classes</a></td><td>Interface</td><td></td></tr>
@@ -884,10441 +892,10588 @@ <h1>Procedures</h1>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: call~~graph~~CallGraph Pages: 1 -->
-<svg id="callgraphCallGraph" width="855pt" height="6971pt"
- viewBox="0.00 0.00 855.00 6970.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="call~~graph~~CallGraph" class="graph" transform="scale(0.48 0.48) rotate(0) translate(4 14630)">
+<svg id="callgraphCallGraph" width="855pt" height="6846pt"
+ viewBox="0.00 0.00 855.00 6845.72" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="call~~graph~~CallGraph" class="graph" transform="scale(0.48 0.48) rotate(0) translate(4 14368)">
 <title>call~~graph~~CallGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-14630 1791,-14630 1791,4 -4,4"/>
-<!-- interface~symba_util_append_pl -->
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-14368 1791,-14368 1791,4 -4,4"/>
+<!-- proc~symba_encounter_check_one -->
 <g id="call~~graph~~CallGraph_node1" class="node">
-<title>interface~symba_util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node1"><a xlink:href=".././interface/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="634.5,-940 514.5,-940 514.5,-916 634.5,-916 634.5,-940"/>
-<text text-anchor="middle" x="574.5" y="-925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
+<title>proc~symba_encounter_check_one</title>
+<g id="a_call~~graph~~CallGraph_node1"><a xlink:href=".././proc/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
+<polygon fill="#d9534f" stroke="#d9534f" points="405,-24 249,-24 249,0 405,0 405,-24"/>
+<text text-anchor="middle" x="327" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_append_pl -->
-<g id="call~~graph~~CallGraph_node303" class="node">
-<title>proc~symba_util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node303"><a xlink:href=".././proc/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="899.5,-940 779.5,-940 779.5,-916 899.5,-916 899.5,-940"/>
-<text text-anchor="middle" x="839.5" y="-925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
-</a>
+<!-- rmvs_chk_ind -->
+<g id="call~~graph~~CallGraph_node777" class="node">
+<title>rmvs_chk_ind</title>
+<polygon fill="#777777" stroke="#777777" points="614,-24 535,-24 535,0 614,0 614,-24"/>
+<text text-anchor="middle" x="574.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
 </g>
-</g>
-<!-- interface~symba_util_append_pl&#45;&gt;proc~symba_util_append_pl -->
+<!-- proc~symba_encounter_check_one&#45;&gt;rmvs_chk_ind -->
 <g id="call~~graph~~CallGraph_edge1" class="edge">
-<title>interface~symba_util_append_pl&#45;&gt;proc~symba_util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M634.52,-928C674.4,-928 727.2,-928 769.09,-928"/>
-<polygon fill="#000000" stroke="#000000" points="769.22,-931.5 779.22,-928 769.22,-924.5 769.22,-931.5"/>
+<title>proc~symba_encounter_check_one&#45;&gt;rmvs_chk_ind</title>
+<path fill="none" stroke="#000000" d="M405,-12C444.13,-12 490.48,-12 524.66,-12"/>
+<polygon fill="#000000" stroke="#000000" points="524.86,-15.5 534.86,-12 524.86,-8.5 524.86,-15.5"/>
 </g>
-<!-- proc~fraggle_generate_rad_vel -->
+<!-- proc~kick_getacch_int_one_tp -->
 <g id="call~~graph~~CallGraph_node2" class="node">
-<title>proc~fraggle_generate_rad_vel</title>
-<g id="a_call~~graph~~CallGraph_node2"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="642.5,-1852 506.5,-1852 506.5,-1828 642.5,-1828 642.5,-1852"/>
-<text text-anchor="middle" x="574.5" y="-1837.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<title>proc~kick_getacch_int_one_tp</title>
+<g id="a_call~~graph~~CallGraph_node2"><a xlink:href=".././proc/kick_getacch_int_one_tp.html" xlink:title="kick_getacch_int_one_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="392,-589 262,-589 262,-565 392,-565 392,-589"/>
+<text text-anchor="middle" x="327" y="-574.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_vmag_to_vb -->
-<g id="call~~graph~~CallGraph_node155" class="node">
-<title>interface~fraggle_util_vmag_to_vb</title>
-<g id="a_call~~graph~~CallGraph_node155"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#a7506f" stroke="#a7506f" points="904.5,-1856 774.5,-1856 774.5,-1832 904.5,-1832 904.5,-1856"/>
-<text text-anchor="middle" x="839.5" y="-1841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<!-- proc~io_read_frame_body -->
+<g id="call~~graph~~CallGraph_node3" class="node">
+<title>proc~io_read_frame_body</title>
+<g id="a_call~~graph~~CallGraph_node3"><a xlink:href=".././proc/io_read_frame_body.html" xlink:title="io_read_frame_body">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="895.5,-953 783.5,-953 783.5,-929 895.5,-929 895.5,-953"/>
+<text text-anchor="middle" x="839.5" y="-938.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="call~~graph~~CallGraph_edge3" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M642.55,-1841.02C679.71,-1841.58 725.99,-1842.29 764.25,-1842.87"/>
-<polygon fill="#000000" stroke="#000000" points="764.24,-1846.37 774.3,-1843.02 764.35,-1839.37 764.24,-1846.37"/>
-</g>
-<!-- interface~fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_node158" class="node">
-<title>interface~fraggle_io_log_one_message</title>
-<g id="a_call~~graph~~CallGraph_node158"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#a7506f" stroke="#a7506f" points="916.5,-1772 762.5,-1772 762.5,-1748 916.5,-1748 916.5,-1772"/>
-<text text-anchor="middle" x="839.5" y="-1757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<!-- interface~util_exit -->
+<g id="call~~graph~~CallGraph_node148" class="node">
+<title>interface~util_exit</title>
+<g id="a_call~~graph~~CallGraph_node148"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
+<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-911 1067.5,-911 1067.5,-887 1121.5,-887 1121.5,-911"/>
+<text text-anchor="middle" x="1094.5" y="-896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge4" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M642.67,-1830.62C658.43,-1826.81 674.77,-1821.47 689,-1814 708.22,-1803.91 705.57,-1790.68 725,-1781 733.59,-1776.72 742.93,-1773.31 752.45,-1770.59"/>
-<polygon fill="#000000" stroke="#000000" points="753.61,-1773.9 762.4,-1767.99 751.84,-1767.13 753.61,-1773.9"/>
-</g>
-<!-- lambda_obj -->
-<g id="call~~graph~~CallGraph_node709" class="node">
-<title>lambda_obj</title>
-<polygon fill="#777777" stroke="#777777" points="873.5,-1898 805.5,-1898 805.5,-1874 873.5,-1874 873.5,-1898"/>
-<text text-anchor="middle" x="839.5" y="-1883.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
-</g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj -->
-<g id="call~~graph~~CallGraph_edge5" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M642.55,-1851.73C690.53,-1860.12 753.72,-1871.17 795.2,-1878.43"/>
-<polygon fill="#000000" stroke="#000000" points="794.8,-1881.91 805.25,-1880.18 796,-1875.01 794.8,-1881.91"/>
-</g>
-<!-- util_minimize_bfgs -->
-<g id="call~~graph~~CallGraph_node721" class="node">
-<title>util_minimize_bfgs</title>
-<polygon fill="#777777" stroke="#777777" points="889.5,-1814 789.5,-1814 789.5,-1790 889.5,-1790 889.5,-1814"/>
-<text text-anchor="middle" x="839.5" y="-1799.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
-</g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs -->
+<!-- proc~io_read_frame_body&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge2" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M642.55,-1830.31C684.78,-1824.21 738.79,-1816.41 779.41,-1810.54"/>
-<polygon fill="#000000" stroke="#000000" points="780.03,-1813.98 789.43,-1809.09 779.03,-1807.06 780.03,-1813.98"/>
-</g>
-<!-- proc~rmvs_make_planetocentric -->
-<g id="call~~graph~~CallGraph_node3" class="node">
-<title>proc~rmvs_make_planetocentric</title>
-<g id="a_call~~graph~~CallGraph_node3"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="1165,-1384 1024,-1384 1024,-1360 1165,-1360 1165,-1384"/>
-<text text-anchor="middle" x="1094.5" y="-1369.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
-</a>
-</g>
+<title>proc~io_read_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M895.71,-931.83C944.77,-923.69 1015.06,-912.02 1057.3,-905.01"/>
+<polygon fill="#000000" stroke="#000000" points="1058.11,-908.42 1067.4,-903.33 1056.97,-901.52 1058.11,-908.42"/>
 </g>
-<!-- interface~symba_util_append_tp -->
+<!-- proc~fraggle_regime_colliders -->
 <g id="call~~graph~~CallGraph_node4" class="node">
-<title>interface~symba_util_append_tp</title>
-<g id="a_call~~graph~~CallGraph_node4"><a xlink:href=".././interface/symba_util_append_tp.html" xlink:title="symba_util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="635,-1062 514,-1062 514,-1038 635,-1038 635,-1062"/>
-<text text-anchor="middle" x="574.5" y="-1047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_tp</text>
+<title>proc~fraggle_regime_colliders</title>
+<g id="a_call~~graph~~CallGraph_node4"><a xlink:href=".././proc/fraggle_regime_colliders.html" xlink:title="fraggle_regime_colliders">
+<polygon fill="#d9534f" stroke="#d9534f" points="392,-1495 262,-1495 262,-1471 392,-1471 392,-1495"/>
+<text text-anchor="middle" x="327" y="-1480.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_colliders</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_append_tp -->
-<g id="call~~graph~~CallGraph_node314" class="node">
-<title>proc~symba_util_append_tp</title>
-<g id="a_call~~graph~~CallGraph_node314"><a xlink:href=".././proc/symba_util_append_tp.html" xlink:title="symba_util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="900,-1058 779,-1058 779,-1034 900,-1034 900,-1058"/>
-<text text-anchor="middle" x="839.5" y="-1043.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_tp</text>
+<!-- interface~fraggle_io_log_regime -->
+<g id="call~~graph~~CallGraph_node461" class="node">
+<title>interface~fraggle_io_log_regime</title>
+<g id="a_call~~graph~~CallGraph_node461"><a xlink:href=".././interface/fraggle_io_log_regime.html" xlink:title="fraggle_io_log_regime">
+<polygon fill="#a7506f" stroke="#a7506f" points="634,-1495 515,-1495 515,-1471 634,-1471 634,-1495"/>
+<text text-anchor="middle" x="574.5" y="-1480.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_regime</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_append_tp&#45;&gt;proc~symba_util_append_tp -->
-<g id="call~~graph~~CallGraph_edge6" class="edge">
-<title>interface~symba_util_append_tp&#45;&gt;proc~symba_util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.18,-1049.09C674.8,-1048.49 726.97,-1047.7 768.55,-1047.06"/>
-<polygon fill="#000000" stroke="#000000" points="768.66,-1050.56 778.6,-1046.91 768.55,-1043.56 768.66,-1050.56"/>
+<!-- proc~fraggle_regime_colliders&#45;&gt;interface~fraggle_io_log_regime -->
+<g id="call~~graph~~CallGraph_edge3" class="edge">
+<title>proc~fraggle_regime_colliders&#45;&gt;interface~fraggle_io_log_regime</title>
+<path fill="none" stroke="#000000" d="M392.18,-1483C426.71,-1483 469.3,-1483 504.53,-1483"/>
+<polygon fill="#000000" stroke="#000000" points="504.74,-1486.5 514.74,-1483 504.74,-1479.5 504.74,-1486.5"/>
 </g>
-<!-- proc~io_dump_base -->
+<!-- proc~helio_step_system -->
 <g id="call~~graph~~CallGraph_node5" class="node">
-<title>proc~io_dump_base</title>
-<g id="a_call~~graph~~CallGraph_node5"><a xlink:href=".././proc/io_dump_base.html" xlink:title="io_dump_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-3238 285.5,-3238 285.5,-3214 368.5,-3214 368.5,-3238"/>
-<text text-anchor="middle" x="327" y="-3223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+<title>proc~helio_step_system</title>
+<g id="a_call~~graph~~CallGraph_node5"><a xlink:href=".././proc/helio_step_system.html" xlink:title="helio_step_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="377.5,-1562 276.5,-1562 276.5,-1538 377.5,-1538 377.5,-1562"/>
+<text text-anchor="middle" x="327" y="-1547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_exit -->
-<g id="call~~graph~~CallGraph_node430" class="node">
-<title>interface~util_exit</title>
-<g id="a_call~~graph~~CallGraph_node430"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
-<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-2860 1067.5,-2860 1067.5,-2836 1121.5,-2836 1121.5,-2860"/>
-<text text-anchor="middle" x="1094.5" y="-2845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<!-- whm_step_system -->
+<g id="call~~graph~~CallGraph_node732" class="node">
+<title>whm_step_system</title>
+<polygon fill="#777777" stroke="#777777" points="625,-1562 524,-1562 524,-1538 625,-1538 625,-1562"/>
+<text text-anchor="middle" x="574.5" y="-1547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+</g>
+<!-- proc~helio_step_system&#45;&gt;whm_step_system -->
+<g id="call~~graph~~CallGraph_edge4" class="edge">
+<title>proc~helio_step_system&#45;&gt;whm_step_system</title>
+<path fill="none" stroke="#000000" d="M377.68,-1550C417.03,-1550 472.13,-1550 513.86,-1550"/>
+<polygon fill="#000000" stroke="#000000" points="513.89,-1553.5 523.89,-1550 513.89,-1546.5 513.89,-1553.5"/>
+</g>
+<!-- proc~io_read_in_cb -->
+<g id="call~~graph~~CallGraph_node6" class="node">
+<title>proc~io_read_in_cb</title>
+<g id="a_call~~graph~~CallGraph_node6"><a xlink:href=".././proc/io_read_in_cb.html" xlink:title="io_read_in_cb">
+<polygon fill="#d9534f" stroke="#d9534f" points="879.5,-911 799.5,-911 799.5,-887 879.5,-887 879.5,-911"/>
+<text text-anchor="middle" x="839.5" y="-896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge9" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M368.79,-3233.56C492.38,-3255.53 860,-3313.71 954,-3247 1018.74,-3201.05 1073.69,-2947.77 1089.16,-2870.43"/>
-<polygon fill="#000000" stroke="#000000" points="1092.65,-2870.83 1091.15,-2860.34 1085.78,-2869.48 1092.65,-2870.83"/>
+<!-- proc~io_read_in_cb&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge5" class="edge">
+<title>proc~io_read_in_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M879.75,-899C928.27,-899 1010.17,-899 1057.26,-899"/>
+<polygon fill="#000000" stroke="#000000" points="1057.31,-902.5 1067.31,-899 1057.31,-895.5 1057.31,-902.5"/>
 </g>
-<!-- interface~io_write_frame_body -->
-<g id="call~~graph~~CallGraph_node440" class="node">
-<title>interface~io_write_frame_body</title>
-<g id="a_call~~graph~~CallGraph_node440"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-3238 518.5,-3238 518.5,-3214 630.5,-3214 630.5,-3238"/>
-<text text-anchor="middle" x="574.5" y="-3223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<!-- proc~io_read_encounter -->
+<g id="call~~graph~~CallGraph_node7" class="node">
+<title>proc~io_read_encounter</title>
+<g id="a_call~~graph~~CallGraph_node7"><a xlink:href=".././proc/io_read_encounter.html" xlink:title="io_read_encounter">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="891,-869 788,-869 788,-845 891,-845 891,-869"/>
+<text text-anchor="middle" x="839.5" y="-854.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
-<g id="call~~graph~~CallGraph_edge8" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
-<path fill="none" stroke="#000000" d="M368.54,-3226C406.44,-3226 463.7,-3226 508.08,-3226"/>
-<polygon fill="#000000" stroke="#000000" points="508.19,-3229.5 518.19,-3226 508.19,-3222.5 508.19,-3229.5"/>
+<!-- proc~io_read_encounter&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge6" class="edge">
+<title>proc~io_read_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M891.09,-865.4C940.35,-873.58 1013.98,-885.8 1057.54,-893.03"/>
+<polygon fill="#000000" stroke="#000000" points="1056.97,-896.48 1067.4,-894.67 1058.11,-889.58 1056.97,-896.48"/>
 </g>
-<!-- interface~io_write_frame_cb -->
-<g id="call~~graph~~CallGraph_node441" class="node">
-<title>interface~io_write_frame_cb</title>
-<g id="a_call~~graph~~CallGraph_node441"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="624.5,-2440 524.5,-2440 524.5,-2416 624.5,-2416 624.5,-2440"/>
-<text text-anchor="middle" x="574.5" y="-2425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<!-- interface~util_append -->
+<g id="call~~graph~~CallGraph_node8" class="node">
+<title>interface~util_append</title>
+<g id="a_call~~graph~~CallGraph_node8"><a xlink:href=".././interface/util_append.html" xlink:title="util_append">
+<polygon fill="#a7506f" stroke="#a7506f" points="1128.5,-2840 1060.5,-2840 1060.5,-2816 1128.5,-2816 1128.5,-2840"/>
+<text text-anchor="middle" x="1094.5" y="-2825.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
+<!-- proc~helio_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node9" class="node">
+<title>proc~helio_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node9"><a xlink:href=".././proc/helio_setup_initialize_system.html" xlink:title="helio_setup_initialize_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="402.5,-3160 251.5,-3160 251.5,-3136 402.5,-3136 402.5,-3160"/>
+<text text-anchor="middle" x="327" y="-3145.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup_initialize_system</text>
+</a>
+</g>
+</g>
+<!-- whm_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node718" class="node">
+<title>whm_setup_initialize_system</title>
+<polygon fill="#777777" stroke="#777777" points="650,-3181 499,-3181 499,-3157 650,-3157 650,-3181"/>
+<text text-anchor="middle" x="574.5" y="-3166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_initialize_system</text>
+</g>
+<!-- proc~helio_setup_initialize_system&#45;&gt;whm_setup_initialize_system -->
 <g id="call~~graph~~CallGraph_edge7" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" d="M328.23,-3213.77C330.22,-3123.73 347.03,-2563.64 460,-2449 474.07,-2434.72 494.49,-2428.39 514.13,-2425.99"/>
-<polygon fill="#000000" stroke="#000000" points="514.65,-2429.45 524.3,-2425.06 514.02,-2422.48 514.65,-2429.45"/>
+<title>proc~helio_setup_initialize_system&#45;&gt;whm_setup_initialize_system</title>
+<path fill="none" stroke="#000000" d="M402.66,-3154.39C429.8,-3156.71 460.66,-3159.35 488.62,-3161.74"/>
+<polygon fill="#000000" stroke="#000000" points="488.51,-3165.24 498.77,-3162.61 489.11,-3158.27 488.51,-3165.24"/>
 </g>
-<!-- proc~netcdf_initialize_output -->
-<g id="call~~graph~~CallGraph_node6" class="node">
-<title>proc~netcdf_initialize_output</title>
-<g id="a_call~~graph~~CallGraph_node6"><a xlink:href=".././proc/netcdf_initialize_output.html" xlink:title="netcdf_initialize_output">
-<polygon fill="#d9534f" stroke="#d9534f" points="900,-2125 779,-2125 779,-2101 900,-2101 900,-2125"/>
-<text text-anchor="middle" x="839.5" y="-2110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_initialize_output</text>
+<!-- proc~helio_step_pl -->
+<g id="call~~graph~~CallGraph_node10" class="node">
+<title>proc~helio_step_pl</title>
+<g id="a_call~~graph~~CallGraph_node10"><a xlink:href=".././proc/helio_step_pl.html" xlink:title="helio_step_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="365,-3250 289,-3250 289,-3226 365,-3226 365,-3250"/>
+<text text-anchor="middle" x="327" y="-3235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_pl</text>
 </a>
 </g>
 </g>
-<!-- nf90_create -->
-<g id="call~~graph~~CallGraph_node729" class="node">
-<title>nf90_create</title>
-<polygon fill="#777777" stroke="#777777" points="1129.5,-2146 1059.5,-2146 1059.5,-2122 1129.5,-2122 1129.5,-2146"/>
-<text text-anchor="middle" x="1094.5" y="-2131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_create</text>
+<!-- proc~symba_io_param_reader -->
+<g id="call~~graph~~CallGraph_node11" class="node">
+<title>proc~symba_io_param_reader</title>
+<g id="a_call~~graph~~CallGraph_node11"><a xlink:href=".././proc/symba_io_param_reader.html" xlink:title="symba_io_param_reader">
+<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-3297 260.5,-3297 260.5,-3273 393.5,-3273 393.5,-3297"/>
+<text text-anchor="middle" x="327" y="-3282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_reader</text>
+</a>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_create -->
-<g id="call~~graph~~CallGraph_edge10" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_create</title>
-<path fill="none" stroke="#000000" d="M900.14,-2117.95C945.79,-2121.74 1007.75,-2126.88 1049.11,-2130.32"/>
-<polygon fill="#000000" stroke="#000000" points="1048.9,-2133.81 1059.15,-2131.15 1049.48,-2126.83 1048.9,-2133.81"/>
 </g>
-<!-- nf90_def_var -->
-<g id="call~~graph~~CallGraph_node740" class="node">
-<title>nf90_def_var</title>
-<polygon fill="#777777" stroke="#777777" points="1132.5,-2104 1056.5,-2104 1056.5,-2080 1132.5,-2080 1132.5,-2104"/>
-<text text-anchor="middle" x="1094.5" y="-2089.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var</text>
+<!-- io_get_token -->
+<g id="call~~graph~~CallGraph_node711" class="node">
+<title>io_get_token</title>
+<polygon fill="#777777" stroke="#777777" points="611.5,-3349 537.5,-3349 537.5,-3325 611.5,-3325 611.5,-3349"/>
+<text text-anchor="middle" x="574.5" y="-3334.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var -->
-<g id="call~~graph~~CallGraph_edge13" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var</title>
-<path fill="none" stroke="#000000" d="M900.14,-2108.05C944.71,-2104.35 1004.84,-2099.36 1046.14,-2095.93"/>
-<polygon fill="#000000" stroke="#000000" points="1046.54,-2099.41 1056.22,-2095.09 1045.96,-2092.43 1046.54,-2099.41"/>
+<!-- proc~symba_io_param_reader&#45;&gt;io_get_token -->
+<g id="call~~graph~~CallGraph_edge8" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;io_get_token</title>
+<path fill="none" stroke="#000000" d="M376.77,-3297.04C401.62,-3303.03 432.35,-3310.2 460,-3316 482.06,-3320.63 506.65,-3325.24 527.29,-3328.97"/>
+<polygon fill="#000000" stroke="#000000" points="526.92,-3332.45 537.38,-3330.77 528.15,-3325.56 526.92,-3332.45"/>
 </g>
-<!-- nf90_set_fill -->
-<g id="call~~graph~~CallGraph_node749" class="node">
-<title>nf90_set_fill</title>
-<polygon fill="#777777" stroke="#777777" points="1129.5,-2062 1059.5,-2062 1059.5,-2038 1129.5,-2038 1129.5,-2062"/>
-<text text-anchor="middle" x="1094.5" y="-2047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
+<!-- fraggle_io_log_start -->
+<g id="call~~graph~~CallGraph_node737" class="node">
+<title>fraggle_io_log_start</title>
+<polygon fill="#777777" stroke="#777777" points="628,-3307 521,-3307 521,-3283 628,-3283 628,-3307"/>
+<text text-anchor="middle" x="574.5" y="-3292.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_set_fill -->
-<g id="call~~graph~~CallGraph_edge12" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M880.27,-2100.97C910.27,-2092.1 952.53,-2080.05 990,-2071 1009.4,-2066.31 1031.01,-2061.82 1049.45,-2058.19"/>
-<polygon fill="#000000" stroke="#000000" points="1050.18,-2061.62 1059.33,-2056.28 1048.85,-2054.75 1050.18,-2061.62"/>
+<!-- proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start -->
+<g id="call~~graph~~CallGraph_edge10" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start</title>
+<path fill="none" stroke="#000000" d="M393.79,-3287.68C429.99,-3289.15 474.67,-3290.97 510.43,-3292.43"/>
+<polygon fill="#000000" stroke="#000000" points="510.61,-3295.94 520.74,-3292.85 510.89,-3288.95 510.61,-3295.94"/>
 </g>
-<!-- nf90_def_dim -->
-<g id="call~~graph~~CallGraph_node770" class="node">
-<title>nf90_def_dim</title>
-<polygon fill="#777777" stroke="#777777" points="1133.5,-2188 1055.5,-2188 1055.5,-2164 1133.5,-2164 1133.5,-2188"/>
-<text text-anchor="middle" x="1094.5" y="-2173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_dim</text>
+<!-- io_param_reader -->
+<g id="call~~graph~~CallGraph_node758" class="node">
+<title>io_param_reader</title>
+<polygon fill="#777777" stroke="#777777" points="622,-3265 527,-3265 527,-3241 622,-3241 622,-3265"/>
+<text text-anchor="middle" x="574.5" y="-3250.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_dim -->
-<g id="call~~graph~~CallGraph_edge11" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_dim</title>
-<path fill="none" stroke="#000000" d="M880.27,-2125.03C910.27,-2133.9 952.53,-2145.95 990,-2155 1007.88,-2159.32 1027.64,-2163.48 1045.06,-2166.94"/>
-<polygon fill="#000000" stroke="#000000" points="1044.53,-2170.4 1055.01,-2168.89 1045.87,-2163.53 1044.53,-2170.4"/>
+<!-- proc~symba_io_param_reader&#45;&gt;io_param_reader -->
+<g id="call~~graph~~CallGraph_edge9" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;io_param_reader</title>
+<path fill="none" stroke="#000000" d="M393.79,-3276.42C432.22,-3271.42 480.22,-3265.16 516.94,-3260.37"/>
+<polygon fill="#000000" stroke="#000000" points="517.52,-3263.83 526.98,-3259.06 516.61,-3256.89 517.52,-3263.83"/>
 </g>
-<!-- interface~symba_util_copy_encounter -->
-<g id="call~~graph~~CallGraph_node7" class="node">
-<title>interface~symba_util_copy_encounter</title>
-<g id="a_call~~graph~~CallGraph_node7"><a xlink:href=".././interface/symba_util_copy_encounter.html" xlink:title="symba_util_copy_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="170,-3486 24,-3486 24,-3462 170,-3462 170,-3486"/>
-<text text-anchor="middle" x="97" y="-3471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_copy_encounter</text>
-</a>
+<!-- io_toupper -->
+<g id="call~~graph~~CallGraph_node780" class="node">
+<title>io_toupper</title>
+<polygon fill="#777777" stroke="#777777" points="606.5,-3223 542.5,-3223 542.5,-3199 606.5,-3199 606.5,-3223"/>
+<text text-anchor="middle" x="574.5" y="-3208.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </g>
+<!-- proc~symba_io_param_reader&#45;&gt;io_toupper -->
+<g id="call~~graph~~CallGraph_edge11" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;io_toupper</title>
+<path fill="none" stroke="#000000" d="M386.4,-3272.98C399.13,-3269.32 412.28,-3264.72 424,-3259 441.97,-3250.23 441.68,-3240.03 460,-3232 482.66,-3222.07 509.85,-3216.83 531.95,-3214.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.47,-3217.53 542.02,-3212.94 531.69,-3210.58 532.47,-3217.53"/>
 </g>
-<!-- proc~symba_util_copy_encounter -->
-<g id="call~~graph~~CallGraph_node317" class="node">
-<title>proc~symba_util_copy_encounter</title>
-<g id="a_call~~graph~~CallGraph_node317"><a xlink:href=".././proc/symba_util_copy_encounter.html" xlink:title="symba_util_copy_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="400,-3486 254,-3486 254,-3462 400,-3462 400,-3486"/>
-<text text-anchor="middle" x="327" y="-3471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_copy_encounter</text>
+<!-- proc~helio_step_tp -->
+<g id="call~~graph~~CallGraph_node12" class="node">
+<title>proc~helio_step_tp</title>
+<g id="a_call~~graph~~CallGraph_node12"><a xlink:href=".././proc/helio_step_tp.html" xlink:title="helio_step_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="365,-3344 289,-3344 289,-3320 365,-3320 365,-3344"/>
+<text text-anchor="middle" x="327" y="-3329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_copy_encounter&#45;&gt;proc~symba_util_copy_encounter -->
-<g id="call~~graph~~CallGraph_edge14" class="edge">
-<title>interface~symba_util_copy_encounter&#45;&gt;proc~symba_util_copy_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-3474C193.54,-3474 219.68,-3474 243.76,-3474"/>
-<polygon fill="#000000" stroke="#000000" points="243.94,-3477.5 253.94,-3474 243.94,-3470.5 243.94,-3477.5"/>
-</g>
-<!-- proc~rmvs_interp_in -->
-<g id="call~~graph~~CallGraph_node8" class="node">
-<title>proc~rmvs_interp_in</title>
-<g id="a_call~~graph~~CallGraph_node8"><a xlink:href=".././proc/rmvs_interp_in.html" xlink:title="rmvs_interp_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="881,-1226 798,-1226 798,-1202 881,-1202 881,-1226"/>
-<text text-anchor="middle" x="839.5" y="-1211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
+<!-- proc~io_read_hdr -->
+<g id="call~~graph~~CallGraph_node13" class="node">
+<title>proc~io_read_hdr</title>
+<g id="a_call~~graph~~CallGraph_node13"><a xlink:href=".././proc/io_read_hdr.html" xlink:title="io_read_hdr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="609.5,-3391 539.5,-3391 539.5,-3367 609.5,-3367 609.5,-3391"/>
+<text text-anchor="middle" x="574.5" y="-3376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_hdr</text>
 </a>
 </g>
 </g>
-<!-- util_exit -->
-<g id="call~~graph~~CallGraph_node745" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-1079 1067.5,-1079 1067.5,-1055 1121.5,-1055 1121.5,-1079"/>
-<text text-anchor="middle" x="1094.5" y="-1064.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<!-- proc~kick_getacch_int_all_tp -->
+<g id="call~~graph~~CallGraph_node14" class="node">
+<title>proc~kick_getacch_int_all_tp</title>
+<g id="a_call~~graph~~CallGraph_node14"><a xlink:href=".././proc/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="901,-3433 778,-3433 778,-3409 901,-3409 901,-3433"/>
+<text text-anchor="middle" x="839.5" y="-3418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
+</a>
 </g>
-<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge15" class="edge">
-<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M881.13,-1215.57C904.7,-1214.43 933.65,-1209.27 954,-1193 985.72,-1167.64 961,-1137.44 990,-1109 1008.41,-1090.95 1035.61,-1080.32 1057.51,-1074.27"/>
-<polygon fill="#000000" stroke="#000000" points="1058.63,-1077.6 1067.45,-1071.73 1056.9,-1070.81 1058.63,-1077.6"/>
 </g>
-<!-- proc~netcdf_write_particle_info_base -->
-<g id="call~~graph~~CallGraph_node9" class="node">
-<title>proc~netcdf_write_particle_info_base</title>
-<g id="a_call~~graph~~CallGraph_node9"><a xlink:href=".././proc/netcdf_write_particle_info_base.html" xlink:title="netcdf_write_particle_info_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="921,-2230 758,-2230 758,-2206 921,-2206 921,-2230"/>
-<text text-anchor="middle" x="839.5" y="-2215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_particle_info_base</text>
+<!-- proc~netcdf_write_frame_base -->
+<g id="call~~graph~~CallGraph_node15" class="node">
+<title>proc~netcdf_write_frame_base</title>
+<g id="a_call~~graph~~CallGraph_node15"><a xlink:href=".././proc/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="906,-219 773,-219 773,-195 906,-195 906,-219"/>
+<text text-anchor="middle" x="839.5" y="-204.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
 </a>
 </g>
 </g>
 <!-- interface~util_sort -->
-<g id="call~~graph~~CallGraph_node537" class="node">
+<g id="call~~graph~~CallGraph_node462" class="node">
 <title>interface~util_sort</title>
-<g id="a_call~~graph~~CallGraph_node537"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
-<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-2272 1067.5,-2272 1067.5,-2248 1121.5,-2248 1121.5,-2272"/>
-<text text-anchor="middle" x="1094.5" y="-2257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
+<g id="a_call~~graph~~CallGraph_node462"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
+<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-224 1067.5,-224 1067.5,-200 1121.5,-200 1121.5,-224"/>
+<text text-anchor="middle" x="1094.5" y="-209.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
 </a>
 </g>
 </g>
-<!-- proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort -->
-<g id="call~~graph~~CallGraph_edge16" class="edge">
-<title>proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M913,-2230.04C960.25,-2237.88 1019.87,-2247.78 1057.35,-2254"/>
-<polygon fill="#000000" stroke="#000000" points="1056.87,-2257.47 1067.31,-2255.65 1058.02,-2250.56 1056.87,-2257.47"/>
+<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
+<g id="call~~graph~~CallGraph_edge14" class="edge">
+<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M906.31,-208.3C954.46,-209.25 1017.98,-210.51 1057.26,-211.28"/>
+<polygon fill="#000000" stroke="#000000" points="1057.36,-214.79 1067.42,-211.48 1057.5,-207.79 1057.36,-214.79"/>
 </g>
 <!-- nf90_put_var -->
-<g id="call~~graph~~CallGraph_node769" class="node">
+<g id="call~~graph~~CallGraph_node717" class="node">
 <title>nf90_put_var</title>
-<polygon fill="#777777" stroke="#777777" points="1132.5,-2230 1056.5,-2230 1056.5,-2206 1132.5,-2206 1132.5,-2230"/>
-<text text-anchor="middle" x="1094.5" y="-2215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
+<polygon fill="#777777" stroke="#777777" points="1132.5,-140 1056.5,-140 1056.5,-116 1132.5,-116 1132.5,-140"/>
+<text text-anchor="middle" x="1094.5" y="-125.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
 </g>
-<!-- proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var -->
-<g id="call~~graph~~CallGraph_edge17" class="edge">
-<title>proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M921.25,-2218C962.27,-2218 1010.71,-2218 1045.75,-2218"/>
-<polygon fill="#000000" stroke="#000000" points="1046.18,-2221.5 1056.18,-2218 1046.18,-2214.5 1046.18,-2221.5"/>
+<!-- proc~netcdf_write_frame_base&#45;&gt;nf90_put_var -->
+<g id="call~~graph~~CallGraph_edge13" class="edge">
+<title>proc~netcdf_write_frame_base&#45;&gt;nf90_put_var</title>
+<path fill="none" stroke="#000000" d="M906.15,-201.88C922.45,-198.75 939.42,-193.8 954,-186 974.23,-175.18 969.86,-159.99 990,-149 1007.11,-139.66 1027.86,-134.46 1046.27,-131.56"/>
+<polygon fill="#000000" stroke="#000000" points="1046.8,-135.02 1056.22,-130.18 1045.84,-128.09 1046.8,-135.02"/>
 </g>
-<!-- proc~io_dump_system -->
-<g id="call~~graph~~CallGraph_node10" class="node">
-<title>proc~io_dump_system</title>
-<g id="a_call~~graph~~CallGraph_node10"><a xlink:href=".././proc/io_dump_system.html" xlink:title="io_dump_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="374,-3591 280,-3591 280,-3567 374,-3567 374,-3591"/>
-<text text-anchor="middle" x="327" y="-3576.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_system</text>
-</a>
+<!-- nf90_set_fill -->
+<g id="call~~graph~~CallGraph_node752" class="node">
+<title>nf90_set_fill</title>
+<polygon fill="#777777" stroke="#777777" points="1129.5,-182 1059.5,-182 1059.5,-158 1129.5,-158 1129.5,-182"/>
+<text text-anchor="middle" x="1094.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
 </g>
+<!-- proc~netcdf_write_frame_base&#45;&gt;nf90_set_fill -->
+<g id="call~~graph~~CallGraph_edge12" class="edge">
+<title>proc~netcdf_write_frame_base&#45;&gt;nf90_set_fill</title>
+<path fill="none" stroke="#000000" d="M906.31,-197.38C951.34,-190.79 1009.8,-182.24 1049.32,-176.46"/>
+<polygon fill="#000000" stroke="#000000" points="1050.05,-179.89 1059.44,-174.98 1049.04,-172.97 1050.05,-179.89"/>
 </g>
-<!-- dump_tp_file -->
-<g id="call~~graph~~CallGraph_node704" class="node">
-<title>dump_tp_file</title>
-<polygon fill="#777777" stroke="#777777" points="611.5,-3654 537.5,-3654 537.5,-3630 611.5,-3630 611.5,-3654"/>
-<text text-anchor="middle" x="574.5" y="-3639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_tp_file</text>
+<!-- proc~kick_getacch_int_one_pl -->
+<g id="call~~graph~~CallGraph_node16" class="node">
+<title>proc~kick_getacch_int_one_pl</title>
+<g id="a_call~~graph~~CallGraph_node16"><a xlink:href=".././proc/kick_getacch_int_one_pl.html" xlink:title="kick_getacch_int_one_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="392,-3609 262,-3609 262,-3585 392,-3585 392,-3609"/>
+<text text-anchor="middle" x="327" y="-3594.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_pl</text>
+</a>
 </g>
-<!-- proc~io_dump_system&#45;&gt;dump_tp_file -->
-<g id="call~~graph~~CallGraph_edge21" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_tp_file</title>
-<path fill="none" stroke="#000000" d="M361.85,-3591.06C388.32,-3600.18 426.17,-3612.52 460,-3621 481.95,-3626.5 506.62,-3631.23 527.34,-3634.81"/>
-<polygon fill="#000000" stroke="#000000" points="527.03,-3638.3 537.47,-3636.52 528.19,-3631.4 527.03,-3638.3"/>
 </g>
-<!-- dump_cb_file -->
-<g id="call~~graph~~CallGraph_node706" class="node">
-<title>dump_cb_file</title>
-<polygon fill="#777777" stroke="#777777" points="612.5,-3612 536.5,-3612 536.5,-3588 612.5,-3588 612.5,-3612"/>
-<text text-anchor="middle" x="574.5" y="-3597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_cb_file</text>
-</g>
-<!-- proc~io_dump_system&#45;&gt;dump_cb_file -->
-<g id="call~~graph~~CallGraph_edge18" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_cb_file</title>
-<path fill="none" stroke="#000000" d="M374.18,-3582.95C417.64,-3586.67 482.43,-3592.21 526.24,-3595.96"/>
-<polygon fill="#000000" stroke="#000000" points="526.09,-3599.46 536.35,-3596.82 526.69,-3592.48 526.09,-3599.46"/>
-</g>
-<!-- dump_param_file -->
-<g id="call~~graph~~CallGraph_node727" class="node">
-<title>dump_param_file</title>
-<polygon fill="#777777" stroke="#777777" points="622.5,-3570 526.5,-3570 526.5,-3546 622.5,-3546 622.5,-3570"/>
-<text text-anchor="middle" x="574.5" y="-3555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_param_file</text>
-</g>
-<!-- proc~io_dump_system&#45;&gt;dump_param_file -->
-<g id="call~~graph~~CallGraph_edge19" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_param_file</title>
-<path fill="none" stroke="#000000" d="M374.18,-3575.05C414.42,-3571.61 472.96,-3566.6 516.19,-3562.9"/>
-<polygon fill="#000000" stroke="#000000" points="516.61,-3566.38 526.28,-3562.04 516.01,-3559.4 516.61,-3566.38"/>
+<!-- proc~io_read_frame_cb -->
+<g id="call~~graph~~CallGraph_node17" class="node">
+<title>proc~io_read_frame_cb</title>
+<g id="a_call~~graph~~CallGraph_node17"><a xlink:href=".././proc/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="889.5,-827 789.5,-827 789.5,-803 889.5,-803 889.5,-827"/>
+<text text-anchor="middle" x="839.5" y="-812.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+</a>
 </g>
-<!-- dump_pl_file -->
-<g id="call~~graph~~CallGraph_node761" class="node">
-<title>dump_pl_file</title>
-<polygon fill="#777777" stroke="#777777" points="611,-3528 538,-3528 538,-3504 611,-3504 611,-3528"/>
-<text text-anchor="middle" x="574.5" y="-3513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_pl_file</text>
 </g>
-<!-- proc~io_dump_system&#45;&gt;dump_pl_file -->
-<g id="call~~graph~~CallGraph_edge20" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_pl_file</title>
-<path fill="none" stroke="#000000" d="M361.85,-3566.94C388.32,-3557.82 426.17,-3545.48 460,-3537 482.22,-3531.43 507.22,-3526.65 528.09,-3523.06"/>
-<polygon fill="#000000" stroke="#000000" points="528.7,-3526.51 537.98,-3521.4 527.54,-3519.61 528.7,-3526.51"/>
+<!-- proc~io_read_frame_cb&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge15" class="edge">
+<title>proc~io_read_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M889.73,-821.45C909.92,-824.78 933.35,-829.53 954,-836 992.34,-848.01 1034.04,-867.8 1061.77,-882"/>
+<polygon fill="#000000" stroke="#000000" points="1060.48,-885.27 1070.97,-886.77 1063.7,-879.06 1060.48,-885.27"/>
 </g>
-<!-- proc~netcdf_open -->
-<g id="call~~graph~~CallGraph_node11" class="node">
-<title>proc~netcdf_open</title>
-<g id="a_call~~graph~~CallGraph_node11"><a xlink:href=".././proc/netcdf_open.html" xlink:title="netcdf_open">
-<polygon fill="#d9534f" stroke="#d9534f" points="875.5,-2020 803.5,-2020 803.5,-1996 875.5,-1996 875.5,-2020"/>
-<text text-anchor="middle" x="839.5" y="-2005.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_open</text>
+<!-- proc~orbel_ehie -->
+<g id="call~~graph~~CallGraph_node18" class="node">
+<title>proc~orbel_ehie</title>
+<g id="a_call~~graph~~CallGraph_node18"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1126,-3590 1063,-3590 1063,-3566 1126,-3566 1126,-3590"/>
+<text text-anchor="middle" x="1094.5" y="-3575.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
 </a>
 </g>
 </g>
-<!-- nf90_inq_varid -->
-<g id="call~~graph~~CallGraph_node715" class="node">
-<title>nf90_inq_varid</title>
-<polygon fill="#777777" stroke="#777777" points="1136,-1978 1053,-1978 1053,-1954 1136,-1954 1136,-1978"/>
-<text text-anchor="middle" x="1094.5" y="-1963.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inq_varid</text>
-</g>
-<!-- proc~netcdf_open&#45;&gt;nf90_inq_varid -->
-<g id="call~~graph~~CallGraph_edge22" class="edge">
-<title>proc~netcdf_open&#45;&gt;nf90_inq_varid</title>
-<path fill="none" stroke="#000000" d="M875.68,-2002.16C919.12,-1994.95 993.33,-1982.63 1042.89,-1974.4"/>
-<polygon fill="#000000" stroke="#000000" points="1043.47,-1977.85 1052.76,-1972.76 1042.33,-1970.95 1043.47,-1977.85"/>
-</g>
-<!-- proc~netcdf_open&#45;&gt;nf90_set_fill -->
-<g id="call~~graph~~CallGraph_edge23" class="edge">
-<title>proc~netcdf_open&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M875.68,-2013.84C921.06,-2021.37 1000.01,-2034.48 1049.37,-2042.67"/>
-<polygon fill="#000000" stroke="#000000" points="1048.99,-2046.16 1059.43,-2044.34 1050.14,-2039.25 1048.99,-2046.16"/>
+<!-- interface~orbel_scget -->
+<g id="call~~graph~~CallGraph_node184" class="node">
+<title>interface~orbel_scget</title>
+<g id="a_call~~graph~~CallGraph_node184"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#a7506f" stroke="#a7506f" points="1373.5,-3632 1305.5,-3632 1305.5,-3608 1373.5,-3608 1373.5,-3632"/>
+<text text-anchor="middle" x="1339.5" y="-3617.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+</a>
 </g>
-<!-- nf90_open -->
-<g id="call~~graph~~CallGraph_node754" class="node">
-<title>nf90_open</title>
-<polygon fill="#777777" stroke="#777777" points="1126.5,-2020 1062.5,-2020 1062.5,-1996 1126.5,-1996 1126.5,-2020"/>
-<text text-anchor="middle" x="1094.5" y="-2005.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_open</text>
 </g>
-<!-- proc~netcdf_open&#45;&gt;nf90_open -->
-<g id="call~~graph~~CallGraph_edge24" class="edge">
-<title>proc~netcdf_open&#45;&gt;nf90_open</title>
-<path fill="none" stroke="#000000" d="M875.68,-2008C921.85,-2008 1002.77,-2008 1051.92,-2008"/>
-<polygon fill="#000000" stroke="#000000" points="1052.2,-2011.5 1062.2,-2008 1052.2,-2004.5 1052.2,-2011.5"/>
+<!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
+<g id="call~~graph~~CallGraph_edge16" class="edge">
+<title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M1126.28,-3583.32C1169.08,-3590.72 1246.78,-3604.15 1295.36,-3612.54"/>
+<polygon fill="#000000" stroke="#000000" points="1294.81,-3616 1305.26,-3614.25 1296,-3609.1 1294.81,-3616"/>
 </g>
-<!-- proc~netcdf_write_frame_base -->
-<g id="call~~graph~~CallGraph_node12" class="node">
-<title>proc~netcdf_write_frame_base</title>
-<g id="a_call~~graph~~CallGraph_node12"><a xlink:href=".././proc/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="906,-2272 773,-2272 773,-2248 906,-2248 906,-2272"/>
-<text text-anchor="middle" x="839.5" y="-2257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
+<!-- proc~orbel_esolmd -->
+<g id="call~~graph~~CallGraph_node19" class="node">
+<title>proc~orbel_esolmd</title>
+<g id="a_call~~graph~~CallGraph_node19"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1133,-3674 1056,-3674 1056,-3650 1133,-3650 1133,-3674"/>
+<text text-anchor="middle" x="1094.5" y="-3659.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
 </a>
 </g>
 </g>
-<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
-<g id="call~~graph~~CallGraph_edge25" class="edge">
-<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M906.31,-2260C954.46,-2260 1017.98,-2260 1057.26,-2260"/>
-<polygon fill="#000000" stroke="#000000" points="1057.42,-2263.5 1067.42,-2260 1057.42,-2256.5 1057.42,-2263.5"/>
-</g>
-<!-- proc~netcdf_write_frame_base&#45;&gt;nf90_put_var -->
-<g id="call~~graph~~CallGraph_edge26" class="edge">
-<title>proc~netcdf_write_frame_base&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M906.31,-2249.07C950.22,-2241.79 1006.91,-2232.37 1046.35,-2225.83"/>
-<polygon fill="#000000" stroke="#000000" points="1046.94,-2229.28 1056.23,-2224.19 1045.8,-2222.37 1046.94,-2229.28"/>
+<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<g id="call~~graph~~CallGraph_edge17" class="edge">
+<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M1133.2,-3655.48C1177.08,-3647.9 1249.37,-3635.4 1295.42,-3627.45"/>
+<polygon fill="#000000" stroke="#000000" points="1296.14,-3630.87 1305.4,-3625.72 1294.95,-3623.98 1296.14,-3630.87"/>
 </g>
-<!-- proc~io_get_args -->
-<g id="call~~graph~~CallGraph_node13" class="node">
-<title>proc~io_get_args</title>
-<g id="a_call~~graph~~CallGraph_node13"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="874,-3402 805,-3402 805,-3378 874,-3378 874,-3402"/>
-<text text-anchor="middle" x="839.5" y="-3387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<!-- proc~fraggle_regime_collresolve -->
+<g id="call~~graph~~CallGraph_node20" class="node">
+<title>proc~fraggle_regime_collresolve</title>
+<g id="a_call~~graph~~CallGraph_node20"><a xlink:href=".././proc/fraggle_regime_collresolve.html" xlink:title="fraggle_regime_collresolve">
+<polygon fill="#d9534f" stroke="#d9534f" points="645,-4063 504,-4063 504,-4039 645,-4039 645,-4063"/>
+<text text-anchor="middle" x="574.5" y="-4048.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_collresolve</text>
 </a>
 </g>
 </g>
-<!-- interface~util_version -->
-<g id="call~~graph~~CallGraph_node364" class="node">
-<title>interface~util_version</title>
-<g id="a_call~~graph~~CallGraph_node364"><a xlink:href=".././interface/util_version.html" xlink:title="util_version">
-<polygon fill="#a7506f" stroke="#a7506f" points="1128,-3402 1061,-3402 1061,-3378 1128,-3378 1128,-3402"/>
-<text text-anchor="middle" x="1094.5" y="-3387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
+<!-- interface~fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_node455" class="node">
+<title>interface~fraggle_io_log_one_message</title>
+<g id="a_call~~graph~~CallGraph_node455"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#a7506f" stroke="#a7506f" points="916.5,-4044 762.5,-4044 762.5,-4020 916.5,-4020 916.5,-4044"/>
+<text text-anchor="middle" x="839.5" y="-4029.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~util_version -->
-<g id="call~~graph~~CallGraph_edge29" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~util_version</title>
-<path fill="none" stroke="#000000" d="M874.1,-3390C919.65,-3390 1001.02,-3390 1050.84,-3390"/>
-<polygon fill="#000000" stroke="#000000" points="1050.97,-3393.5 1060.97,-3390 1050.97,-3386.5 1050.97,-3393.5"/>
-</g>
-<!-- proc~io_get_args&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge28" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M874.21,-3392.95C899.44,-3393.22 933.08,-3389.16 954,-3369 1006.8,-3318.12 971.86,-3279.04 990,-3208 1022.95,-3078.93 1069.44,-2925.92 1086.7,-2869.92"/>
-<polygon fill="#000000" stroke="#000000" points="1090.14,-2870.64 1089.75,-2860.05 1083.45,-2868.57 1090.14,-2870.64"/>
+<!-- proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge18" class="edge">
+<title>proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M645.29,-4045.96C678.11,-4043.59 717.58,-4040.74 752.25,-4038.23"/>
+<polygon fill="#000000" stroke="#000000" points="752.65,-4041.71 762.37,-4037.5 752.15,-4034.73 752.65,-4041.71"/>
 </g>
-<!-- interface~io_toupper -->
-<g id="call~~graph~~CallGraph_node438" class="node">
-<title>interface~io_toupper</title>
-<g id="a_call~~graph~~CallGraph_node438"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#a7506f" stroke="#a7506f" points="1126.5,-3444 1062.5,-3444 1062.5,-3420 1126.5,-3420 1126.5,-3444"/>
-<text text-anchor="middle" x="1094.5" y="-3429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<!-- proc~helio_gr_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node21" class="node">
+<title>proc~helio_gr_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node21"><a xlink:href=".././proc/helio_gr_kick_getacch_pl.html" xlink:title="helio_gr_kick_getacch_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-4126 260.5,-4126 260.5,-4102 393.5,-4102 393.5,-4126"/>
+<text text-anchor="middle" x="327" y="-4111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
-<g id="call~~graph~~CallGraph_edge27" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M874.1,-3395.58C920.03,-3403.2 1002.37,-3416.87 1052.07,-3425.12"/>
-<polygon fill="#000000" stroke="#000000" points="1051.72,-3428.61 1062.15,-3426.8 1052.86,-3421.71 1051.72,-3428.61"/>
+<!-- gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_node729" class="node">
+<title>gr_kick_getacch</title>
+<polygon fill="#777777" stroke="#777777" points="619.5,-4189 529.5,-4189 529.5,-4165 619.5,-4165 619.5,-4189"/>
+<text text-anchor="middle" x="574.5" y="-4174.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getacch</text>
 </g>
-<!-- proc~symba_io_param_reader -->
-<g id="call~~graph~~CallGraph_node14" class="node">
-<title>proc~symba_io_param_reader</title>
-<g id="a_call~~graph~~CallGraph_node14"><a xlink:href=".././proc/symba_io_param_reader.html" xlink:title="symba_io_param_reader">
-<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-3759 260.5,-3759 260.5,-3735 393.5,-3735 393.5,-3759"/>
-<text text-anchor="middle" x="327" y="-3744.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_reader</text>
+<!-- proc~helio_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_edge19" class="edge">
+<title>proc~helio_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch</title>
+<path fill="none" stroke="#000000" d="M393.62,-4125.48C403.95,-4128.1 414.38,-4131.25 424,-4135 441.26,-4141.73 442.64,-4149.55 460,-4156 478.79,-4162.98 500.22,-4167.71 519.37,-4170.88"/>
+<polygon fill="#000000" stroke="#000000" points="519.02,-4174.37 529.44,-4172.45 520.09,-4167.45 519.02,-4174.37"/>
+</g>
+<!-- proc~orbel_ehybrid -->
+<g id="call~~graph~~CallGraph_node22" class="node">
+<title>proc~orbel_ehybrid</title>
+<g id="a_call~~graph~~CallGraph_node22"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="878.5,-3653 800.5,-3653 800.5,-3629 878.5,-3629 878.5,-3653"/>
+<text text-anchor="middle" x="839.5" y="-3638.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
 </a>
 </g>
 </g>
-<!-- io_toupper -->
-<g id="call~~graph~~CallGraph_node724" class="node">
-<title>io_toupper</title>
-<polygon fill="#777777" stroke="#777777" points="606.5,-3822 542.5,-3822 542.5,-3798 606.5,-3798 606.5,-3822"/>
-<text text-anchor="middle" x="574.5" y="-3807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
+<g id="call~~graph~~CallGraph_edge21" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
+<path fill="none" stroke="#000000" d="M878.7,-3629.43C908.79,-3620.52 951.87,-3608.21 990,-3599 1010.55,-3594.04 1033.58,-3589.29 1052.69,-3585.56"/>
+<polygon fill="#000000" stroke="#000000" points="1053.41,-3588.98 1062.57,-3583.66 1052.09,-3582.11 1053.41,-3588.98"/>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;io_toupper -->
-<g id="call~~graph~~CallGraph_edge32" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;io_toupper</title>
-<path fill="none" stroke="#000000" d="M361.85,-3759.06C388.32,-3768.18 426.17,-3780.52 460,-3789 483.83,-3794.97 510.86,-3800.04 532.57,-3803.7"/>
-<polygon fill="#000000" stroke="#000000" points="532.01,-3807.15 542.44,-3805.33 533.15,-3800.25 532.01,-3807.15"/>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<g id="call~~graph~~CallGraph_edge20" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
+<path fill="none" stroke="#000000" d="M878.65,-3644.17C923.28,-3647.87 997.2,-3654.01 1045.64,-3658.03"/>
+<polygon fill="#000000" stroke="#000000" points="1045.61,-3661.54 1055.87,-3658.88 1046.19,-3654.56 1045.61,-3661.54"/>
 </g>
-<!-- io_param_reader -->
-<g id="call~~graph~~CallGraph_node748" class="node">
-<title>io_param_reader</title>
-<polygon fill="#777777" stroke="#777777" points="622,-3780 527,-3780 527,-3756 622,-3756 622,-3780"/>
-<text text-anchor="middle" x="574.5" y="-3765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<!-- proc~orbel_eget -->
+<g id="call~~graph~~CallGraph_node23" class="node">
+<title>proc~orbel_eget</title>
+<g id="a_call~~graph~~CallGraph_node23"><a xlink:href=".././proc/orbel_eget.html" xlink:title="orbel_eget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1126.5,-3632 1062.5,-3632 1062.5,-3608 1126.5,-3608 1126.5,-3632"/>
+<text text-anchor="middle" x="1094.5" y="-3617.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
+</a>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;io_param_reader -->
-<g id="call~~graph~~CallGraph_edge31" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;io_param_reader</title>
-<path fill="none" stroke="#000000" d="M393.79,-3752.63C432.22,-3755.91 480.22,-3760.02 516.94,-3763.16"/>
-<polygon fill="#000000" stroke="#000000" points="516.72,-3766.66 526.98,-3764.02 517.32,-3759.68 516.72,-3766.66"/>
 </g>
-<!-- fraggle_io_log_start -->
-<g id="call~~graph~~CallGraph_node755" class="node">
-<title>fraggle_io_log_start</title>
-<polygon fill="#777777" stroke="#777777" points="628,-3738 521,-3738 521,-3714 628,-3714 628,-3738"/>
-<text text-anchor="middle" x="574.5" y="-3723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_eget -->
+<g id="call~~graph~~CallGraph_edge22" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_eget</title>
+<path fill="none" stroke="#000000" d="M878.65,-3637.83C925.33,-3633.96 1004.08,-3627.42 1052.17,-3623.43"/>
+<polygon fill="#000000" stroke="#000000" points="1052.56,-3626.91 1062.23,-3622.6 1051.98,-3619.93 1052.56,-3626.91"/>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start -->
-<g id="call~~graph~~CallGraph_edge30" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start</title>
-<path fill="none" stroke="#000000" d="M393.79,-3741.37C429.99,-3738.28 474.67,-3734.45 510.43,-3731.4"/>
-<polygon fill="#000000" stroke="#000000" points="511.07,-3734.85 520.74,-3730.51 510.48,-3727.88 511.07,-3734.85"/>
+<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
+<g id="call~~graph~~CallGraph_edge23" class="edge">
+<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M1126.77,-3620C1169.64,-3620 1246.85,-3620 1295.24,-3620"/>
+<polygon fill="#000000" stroke="#000000" points="1295.41,-3623.5 1305.41,-3620 1295.41,-3616.5 1295.41,-3623.5"/>
 </g>
-<!-- io_get_token -->
-<g id="call~~graph~~CallGraph_node768" class="node">
-<title>io_get_token</title>
-<polygon fill="#777777" stroke="#777777" points="611.5,-3696 537.5,-3696 537.5,-3672 611.5,-3672 611.5,-3696"/>
-<text text-anchor="middle" x="574.5" y="-3681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<!-- interface~rmvs_encounter_check_tp -->
+<g id="call~~graph~~CallGraph_node24" class="node">
+<title>interface~rmvs_encounter_check_tp</title>
+<g id="a_call~~graph~~CallGraph_node24"><a xlink:href=".././interface/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="166.5,-4294 27.5,-4294 27.5,-4270 166.5,-4270 166.5,-4294"/>
+<text text-anchor="middle" x="97" y="-4279.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
+</a>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;io_get_token -->
-<g id="call~~graph~~CallGraph_edge33" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;io_get_token</title>
-<path fill="none" stroke="#000000" d="M361.85,-3734.94C388.32,-3725.82 426.17,-3713.48 460,-3705 481.95,-3699.5 506.62,-3694.77 527.34,-3691.19"/>
-<polygon fill="#000000" stroke="#000000" points="528.19,-3694.6 537.47,-3689.48 527.03,-3687.7 528.19,-3694.6"/>
 </g>
-<!-- proc~rmvs_step_in -->
-<g id="call~~graph~~CallGraph_node15" class="node">
-<title>proc~rmvs_step_in</title>
-<g id="a_call~~graph~~CallGraph_node15"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="877.5,-1394 801.5,-1394 801.5,-1370 877.5,-1370 877.5,-1394"/>
-<text text-anchor="middle" x="839.5" y="-1379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
+<!-- proc~rmvs_encounter_check_tp -->
+<g id="call~~graph~~CallGraph_node591" class="node">
+<title>proc~rmvs_encounter_check_tp</title>
+<g id="a_call~~graph~~CallGraph_node591"><a xlink:href=".././proc/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="396.5,-4294 257.5,-4294 257.5,-4270 396.5,-4270 396.5,-4294"/>
+<text text-anchor="middle" x="327" y="-4279.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
-<g id="call~~graph~~CallGraph_edge36" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
-<path fill="none" stroke="#000000" d="M877.56,-1380.54C913.16,-1379.13 968.11,-1376.96 1013.67,-1375.16"/>
-<polygon fill="#000000" stroke="#000000" points="1013.98,-1378.65 1023.83,-1374.75 1013.7,-1371.65 1013.98,-1378.65"/>
+<!-- interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp -->
+<g id="call~~graph~~CallGraph_edge24" class="edge">
+<title>interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.72,-4282C192.07,-4282 220.98,-4282 247.16,-4282"/>
+<polygon fill="#000000" stroke="#000000" points="247.42,-4285.5 257.42,-4282 247.42,-4278.5 247.42,-4285.5"/>
 </g>
-<!-- proc~rmvs_peri_tp -->
-<g id="call~~graph~~CallGraph_node34" class="node">
-<title>proc~rmvs_peri_tp</title>
-<g id="a_call~~graph~~CallGraph_node34"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="1132,-1342 1057,-1342 1057,-1318 1132,-1318 1132,-1342"/>
-<text text-anchor="middle" x="1094.5" y="-1327.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
+<!-- proc~netcdf_open -->
+<g id="call~~graph~~CallGraph_node25" class="node">
+<title>proc~netcdf_open</title>
+<g id="a_call~~graph~~CallGraph_node25"><a xlink:href=".././proc/netcdf_open.html" xlink:title="netcdf_open">
+<polygon fill="#d9534f" stroke="#d9534f" points="875.5,-66 803.5,-66 803.5,-42 875.5,-42 875.5,-66"/>
+<text text-anchor="middle" x="839.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_open</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
-<g id="call~~graph~~CallGraph_edge34" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
-<path fill="none" stroke="#000000" d="M877.73,-1375.96C899.97,-1372.14 928.71,-1366.84 954,-1361 970.18,-1357.26 973.85,-1354.88 990,-1351 1008.57,-1346.54 1029.16,-1342.24 1047.05,-1338.7"/>
-<polygon fill="#000000" stroke="#000000" points="1047.82,-1342.11 1056.96,-1336.76 1046.47,-1335.24 1047.82,-1342.11"/>
+<!-- nf90_open -->
+<g id="call~~graph~~CallGraph_node712" class="node">
+<title>nf90_open</title>
+<polygon fill="#777777" stroke="#777777" points="1126.5,-98 1062.5,-98 1062.5,-74 1126.5,-74 1126.5,-98"/>
+<text text-anchor="middle" x="1094.5" y="-83.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_open</text>
 </g>
-<!-- proc~rmvs_end_planetocentric -->
-<g id="call~~graph~~CallGraph_node74" class="node">
-<title>proc~rmvs_end_planetocentric</title>
-<g id="a_call~~graph~~CallGraph_node74"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="1161,-1426 1028,-1426 1028,-1402 1161,-1402 1161,-1426"/>
-<text text-anchor="middle" x="1094.5" y="-1411.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
-</a>
+<!-- proc~netcdf_open&#45;&gt;nf90_open -->
+<g id="call~~graph~~CallGraph_edge26" class="edge">
+<title>proc~netcdf_open&#45;&gt;nf90_open</title>
+<path fill="none" stroke="#000000" d="M875.68,-58.45C921.95,-64.3 1003.11,-74.57 1052.23,-80.78"/>
+<polygon fill="#000000" stroke="#000000" points="1051.84,-84.26 1062.2,-82.04 1052.72,-77.31 1051.84,-84.26"/>
 </g>
+<!-- nf90_inq_varid -->
+<g id="call~~graph~~CallGraph_node778" class="node">
+<title>nf90_inq_varid</title>
+<polygon fill="#777777" stroke="#777777" points="1136,-56 1053,-56 1053,-32 1136,-32 1136,-56"/>
+<text text-anchor="middle" x="1094.5" y="-41.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inq_varid</text>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
-<g id="call~~graph~~CallGraph_edge35" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
-<path fill="none" stroke="#000000" d="M877.56,-1386.69C914.26,-1391.33 971.52,-1398.57 1017.86,-1404.43"/>
-<polygon fill="#000000" stroke="#000000" points="1017.51,-1407.92 1027.87,-1405.7 1018.39,-1400.97 1017.51,-1407.92"/>
+<!-- proc~netcdf_open&#45;&gt;nf90_inq_varid -->
+<g id="call~~graph~~CallGraph_edge25" class="edge">
+<title>proc~netcdf_open&#45;&gt;nf90_inq_varid</title>
+<path fill="none" stroke="#000000" d="M875.68,-52.61C919.03,-50.9 993.02,-47.97 1042.58,-46.01"/>
+<polygon fill="#000000" stroke="#000000" points="1042.91,-49.5 1052.76,-45.61 1042.63,-42.51 1042.91,-49.5"/>
 </g>
-<!-- proc~netcdf_write_hdr_system -->
-<g id="call~~graph~~CallGraph_node16" class="node">
-<title>proc~netcdf_write_hdr_system</title>
-<g id="a_call~~graph~~CallGraph_node16"><a xlink:href=".././proc/netcdf_write_hdr_system.html" xlink:title="netcdf_write_hdr_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="905.5,-2062 773.5,-2062 773.5,-2038 905.5,-2038 905.5,-2062"/>
-<text text-anchor="middle" x="839.5" y="-2047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_hdr_system</text>
+<!-- interface~rmvs_chk_ind -->
+<g id="call~~graph~~CallGraph_node26" class="node">
+<title>interface~rmvs_chk_ind</title>
+<g id="a_call~~graph~~CallGraph_node26"><a xlink:href=".././interface/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
+<polygon fill="#a7506f" stroke="#a7506f" points="136.5,-4336 57.5,-4336 57.5,-4312 136.5,-4312 136.5,-4336"/>
+<text text-anchor="middle" x="97" y="-4321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
 </a>
 </g>
 </g>
-<!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_set_fill -->
-<g id="call~~graph~~CallGraph_edge38" class="edge">
-<title>proc~netcdf_write_hdr_system&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M905.65,-2050C950.68,-2050 1009.38,-2050 1049.09,-2050"/>
-<polygon fill="#000000" stroke="#000000" points="1049.26,-2053.5 1059.26,-2050 1049.26,-2046.5 1049.26,-2053.5"/>
+<!-- proc~rmvs_chk_ind -->
+<g id="call~~graph~~CallGraph_node607" class="node">
+<title>proc~rmvs_chk_ind</title>
+<g id="a_call~~graph~~CallGraph_node607"><a xlink:href=".././proc/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
+<polygon fill="#d9534f" stroke="#d9534f" points="366.5,-4336 287.5,-4336 287.5,-4312 366.5,-4312 366.5,-4336"/>
+<text text-anchor="middle" x="327" y="-4321.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
+</a>
 </g>
-<!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_open -->
-<g id="call~~graph~~CallGraph_edge39" class="edge">
-<title>proc~netcdf_write_hdr_system&#45;&gt;nf90_open</title>
-<path fill="none" stroke="#000000" d="M905.65,-2039.18C951.89,-2031.51 1012.55,-2021.44 1052.25,-2014.85"/>
-<polygon fill="#000000" stroke="#000000" points="1053.07,-2018.26 1062.37,-2013.17 1051.93,-2011.35 1053.07,-2018.26"/>
 </g>
-<!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var -->
-<g id="call~~graph~~CallGraph_edge37" class="edge">
-<title>proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M902.46,-2062.09C921.03,-2068.35 940.13,-2077.79 954,-2092 988.46,-2127.3 952.92,-2164.46 990,-2197 1005.37,-2210.49 1027,-2216.21 1046.51,-2218.37"/>
-<polygon fill="#000000" stroke="#000000" points="1046.23,-2221.86 1056.48,-2219.2 1046.8,-2214.89 1046.23,-2221.86"/>
+<!-- interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind -->
+<g id="call~~graph~~CallGraph_edge27" class="edge">
+<title>interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M136.68,-4324C175.41,-4324 235.14,-4324 277.13,-4324"/>
+<polygon fill="#000000" stroke="#000000" points="277.13,-4327.5 287.13,-4324 277.13,-4320.5 277.13,-4327.5"/>
 </g>
-<!-- interface~util_fill -->
-<g id="call~~graph~~CallGraph_node17" class="node">
-<title>interface~util_fill</title>
-<g id="a_call~~graph~~CallGraph_node17"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
-<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-818 1067.5,-818 1067.5,-794 1121.5,-794 1121.5,-818"/>
-<text text-anchor="middle" x="1094.5" y="-803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+<!-- proc~helio_gr_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node27" class="node">
+<title>proc~helio_gr_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node27"><a xlink:href=".././proc/helio_gr_kick_getacch_tp.html" xlink:title="helio_gr_kick_getacch_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-4252 260.5,-4252 260.5,-4228 393.5,-4228 393.5,-4252"/>
+<text text-anchor="middle" x="327" y="-4237.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_check_encounter -->
-<g id="call~~graph~~CallGraph_node18" class="node">
-<title>interface~symba_collision_check_encounter</title>
-<g id="a_call~~graph~~CallGraph_node18"><a xlink:href=".././interface/symba_collision_check_encounter.html" xlink:title="symba_collision_check_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="1182,-650 1007,-650 1007,-626 1182,-626 1182,-650"/>
-<text text-anchor="middle" x="1094.5" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_encounter</text>
+<!-- proc~helio_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_edge28" class="edge">
+<title>proc~helio_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch</title>
+<path fill="none" stroke="#000000" d="M385.49,-4228C398.21,-4225.18 411.59,-4222.1 424,-4219 457.23,-4210.71 494.29,-4200.3 523.2,-4191.92"/>
+<polygon fill="#000000" stroke="#000000" points="524.44,-4195.21 533.06,-4189.05 522.48,-4188.49 524.44,-4195.21"/>
+</g>
+<!-- interface~rmvs_discard_tp -->
+<g id="call~~graph~~CallGraph_node28" class="node">
+<title>interface~rmvs_discard_tp</title>
+<g id="a_call~~graph~~CallGraph_node28"><a xlink:href=".././interface/rmvs_discard_tp.html" xlink:title="rmvs_discard_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-4378 51.5,-4378 51.5,-4354 142.5,-4354 142.5,-4378"/>
+<text text-anchor="middle" x="97" y="-4363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_check_encounter -->
-<g id="call~~graph~~CallGraph_node305" class="node">
-<title>proc~symba_collision_check_encounter</title>
-<g id="a_call~~graph~~CallGraph_node305"><a xlink:href=".././proc/symba_collision_check_encounter.html" xlink:title="symba_collision_check_encounter">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1427,-597 1252,-597 1252,-573 1427,-573 1427,-597"/>
-<text text-anchor="middle" x="1339.5" y="-582.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_encounter</text>
+<!-- proc~rmvs_discard_tp -->
+<g id="call~~graph~~CallGraph_node258" class="node">
+<title>proc~rmvs_discard_tp</title>
+<g id="a_call~~graph~~CallGraph_node258"><a xlink:href=".././proc/rmvs_discard_tp.html" xlink:title="rmvs_discard_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-4378 281.5,-4378 281.5,-4354 372.5,-4354 372.5,-4378"/>
+<text text-anchor="middle" x="327" y="-4363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_encounter -->
-<g id="call~~graph~~CallGraph_edge40" class="edge">
-<title>interface~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1159.76,-625.96C1172.8,-623.24 1186.38,-620.2 1199,-617 1215.22,-612.89 1218.78,-610.11 1235,-606 1244.46,-603.6 1254.47,-601.29 1264.38,-599.14"/>
-<polygon fill="#000000" stroke="#000000" points="1265.19,-602.54 1274.24,-597.04 1263.73,-595.7 1265.19,-602.54"/>
+<!-- interface~rmvs_discard_tp&#45;&gt;proc~rmvs_discard_tp -->
+<g id="call~~graph~~CallGraph_edge29" class="edge">
+<title>interface~rmvs_discard_tp&#45;&gt;proc~rmvs_discard_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-4366C179.26,-4366 231.61,-4366 270.99,-4366"/>
+<polygon fill="#000000" stroke="#000000" points="271.22,-4369.5 281.22,-4366 271.22,-4362.5 271.22,-4369.5"/>
 </g>
-<!-- interface~symba_encounter_check_pl -->
-<g id="call~~graph~~CallGraph_node19" class="node">
-<title>interface~symba_encounter_check_pl</title>
-<g id="a_call~~graph~~CallGraph_node19"><a xlink:href=".././interface/symba_encounter_check_pl.html" xlink:title="symba_encounter_check_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="170,-3864 24,-3864 24,-3840 170,-3840 170,-3864"/>
-<text text-anchor="middle" x="97" y="-3849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_pl</text>
+<!-- proc~helio_gr_p4_pl -->
+<g id="call~~graph~~CallGraph_node29" class="node">
+<title>proc~helio_gr_p4_pl</title>
+<g id="a_call~~graph~~CallGraph_node29"><a xlink:href=".././proc/helio_gr_p4_pl.html" xlink:title="helio_gr_p4_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-4420 285.5,-4420 285.5,-4396 368.5,-4396 368.5,-4420"/>
+<text text-anchor="middle" x="327" y="-4405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_encounter_check_pl -->
-<g id="call~~graph~~CallGraph_node242" class="node">
-<title>proc~symba_encounter_check_pl</title>
-<g id="a_call~~graph~~CallGraph_node242"><a xlink:href=".././proc/symba_encounter_check_pl.html" xlink:title="symba_encounter_check_pl">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="400,-3864 254,-3864 254,-3840 400,-3840 400,-3864"/>
-<text text-anchor="middle" x="327" y="-3849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_pl</text>
-</a>
+<!-- gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_node759" class="node">
+<title>gr_p4_pos_kick</title>
+<polygon fill="#777777" stroke="#777777" points="618.5,-4483 530.5,-4483 530.5,-4459 618.5,-4459 618.5,-4483"/>
+<text text-anchor="middle" x="574.5" y="-4468.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_p4_pos_kick</text>
 </g>
+<!-- proc~helio_gr_p4_pl&#45;&gt;gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_edge30" class="edge">
+<title>proc~helio_gr_p4_pl&#45;&gt;gr_p4_pos_kick</title>
+<path fill="none" stroke="#000000" d="M368.76,-4416.37C385.88,-4420.02 405.96,-4424.5 424,-4429 457.23,-4437.29 494.29,-4447.7 523.2,-4456.08"/>
+<polygon fill="#000000" stroke="#000000" points="522.48,-4459.51 533.06,-4458.95 524.44,-4452.79 522.48,-4459.51"/>
 </g>
-<!-- interface~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_pl -->
-<g id="call~~graph~~CallGraph_edge41" class="edge">
-<title>interface~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-3852C193.54,-3852 219.68,-3852 243.76,-3852"/>
-<polygon fill="#000000" stroke="#000000" points="243.94,-3855.5 253.94,-3852 243.94,-3848.5 243.94,-3855.5"/>
+<!-- proc~fraggle_placeholder_accel -->
+<g id="call~~graph~~CallGraph_node30" class="node">
+<title>proc~fraggle_placeholder_accel</title>
+<g id="a_call~~graph~~CallGraph_node30"><a xlink:href=".././proc/fraggle_placeholder_accel.html" xlink:title="fraggle_placeholder_accel">
+<polygon fill="#d9534f" stroke="#d9534f" points="396,-4588 258,-4588 258,-4564 396,-4564 396,-4588"/>
+<text text-anchor="middle" x="327" y="-4573.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_accel</text>
+</a>
 </g>
-<!-- interface~symba_encounter_check -->
-<g id="call~~graph~~CallGraph_node20" class="node">
-<title>interface~symba_encounter_check</title>
-<g id="a_call~~graph~~CallGraph_node20"><a xlink:href=".././interface/symba_encounter_check.html" xlink:title="symba_encounter_check">
-<polygon fill="#a7506f" stroke="#a7506f" points="163,-3906 31,-3906 31,-3882 163,-3882 163,-3906"/>
-<text text-anchor="middle" x="97" y="-3891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check</text>
+</g>
+<!-- interface~rmvs_io_write_encounter -->
+<g id="call~~graph~~CallGraph_node31" class="node">
+<title>interface~rmvs_io_write_encounter</title>
+<g id="a_call~~graph~~CallGraph_node31"><a xlink:href=".././interface/rmvs_io_write_encounter.html" xlink:title="rmvs_io_write_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="641,-2639 508,-2639 508,-2615 641,-2615 641,-2639"/>
+<text text-anchor="middle" x="574.5" y="-2624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io_write_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_encounter_check -->
-<g id="call~~graph~~CallGraph_node243" class="node">
-<title>proc~symba_encounter_check</title>
-<g id="a_call~~graph~~CallGraph_node243"><a xlink:href=".././proc/symba_encounter_check.html" xlink:title="symba_encounter_check">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="393,-3906 261,-3906 261,-3882 393,-3882 393,-3906"/>
-<text text-anchor="middle" x="327" y="-3891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check</text>
+<!-- proc~rmvs_io_write_encounter -->
+<g id="call~~graph~~CallGraph_node58" class="node">
+<title>proc~rmvs_io_write_encounter</title>
+<g id="a_call~~graph~~CallGraph_node58"><a xlink:href=".././proc/rmvs_io_write_encounter.html" xlink:title="rmvs_io_write_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="906,-2639 773,-2639 773,-2615 906,-2615 906,-2639"/>
+<text text-anchor="middle" x="839.5" y="-2624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io_write_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_encounter_check&#45;&gt;proc~symba_encounter_check -->
-<g id="call~~graph~~CallGraph_edge42" class="edge">
-<title>interface~symba_encounter_check&#45;&gt;proc~symba_encounter_check</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.03,-3894C190.34,-3894 222.29,-3894 250.62,-3894"/>
-<polygon fill="#000000" stroke="#000000" points="250.88,-3897.5 260.88,-3894 250.88,-3890.5 250.88,-3897.5"/>
+<!-- interface~rmvs_io_write_encounter&#45;&gt;proc~rmvs_io_write_encounter -->
+<g id="call~~graph~~CallGraph_edge31" class="edge">
+<title>interface~rmvs_io_write_encounter&#45;&gt;proc~rmvs_io_write_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.19,-2627C678.06,-2627 724.23,-2627 762.64,-2627"/>
+<polygon fill="#000000" stroke="#000000" points="762.74,-2630.5 772.74,-2627 762.74,-2623.5 762.74,-2630.5"/>
 </g>
-<!-- interface~symba_encounter_check_tp -->
-<g id="call~~graph~~CallGraph_node21" class="node">
-<title>interface~symba_encounter_check_tp</title>
-<g id="a_call~~graph~~CallGraph_node21"><a xlink:href=".././interface/symba_encounter_check_tp.html" xlink:title="symba_encounter_check_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-3948 23.5,-3948 23.5,-3924 170.5,-3924 170.5,-3948"/>
-<text text-anchor="middle" x="97" y="-3933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_tp</text>
+<!-- interface~rmvs_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node32" class="node">
+<title>interface~rmvs_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node32"><a xlink:href=".././interface/rmvs_kick_getacch_tp.html" xlink:title="rmvs_kick_getacch_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-4630 38,-4630 38,-4606 156,-4606 156,-4630"/>
+<text text-anchor="middle" x="97" y="-4615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_encounter_check_tp -->
-<g id="call~~graph~~CallGraph_node259" class="node">
-<title>proc~symba_encounter_check_tp</title>
-<g id="a_call~~graph~~CallGraph_node259"><a xlink:href=".././proc/symba_encounter_check_tp.html" xlink:title="symba_encounter_check_tp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="400.5,-3948 253.5,-3948 253.5,-3924 400.5,-3924 400.5,-3948"/>
-<text text-anchor="middle" x="327" y="-3933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_tp</text>
+<!-- proc~rmvs_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node349" class="node">
+<title>proc~rmvs_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node349"><a xlink:href=".././proc/rmvs_kick_getacch_tp.html" xlink:title="rmvs_kick_getacch_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="386,-4630 268,-4630 268,-4606 386,-4606 386,-4630"/>
+<text text-anchor="middle" x="327" y="-4615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_encounter_check_tp&#45;&gt;proc~symba_encounter_check_tp -->
-<g id="call~~graph~~CallGraph_edge43" class="edge">
-<title>interface~symba_encounter_check_tp&#45;&gt;proc~symba_encounter_check_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.77,-3936C193.8,-3936 219.43,-3936 243.12,-3936"/>
-<polygon fill="#000000" stroke="#000000" points="243.14,-3939.5 253.14,-3936 243.14,-3932.5 243.14,-3939.5"/>
+<!-- interface~rmvs_kick_getacch_tp&#45;&gt;proc~rmvs_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_edge32" class="edge">
+<title>interface~rmvs_kick_getacch_tp&#45;&gt;proc~rmvs_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-4618C187.08,-4618 225.33,-4618 257.7,-4618"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-4621.5 267.98,-4618 257.98,-4614.5 257.98,-4621.5"/>
 </g>
-<!-- interface~symba_collision_casedisruption -->
-<g id="call~~graph~~CallGraph_node22" class="node">
-<title>interface~symba_collision_casedisruption</title>
-<g id="a_call~~graph~~CallGraph_node22"><a xlink:href=".././interface/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
-<polygon fill="#a7506f" stroke="#a7506f" points="1176,-398 1013,-398 1013,-374 1176,-374 1176,-398"/>
-<text text-anchor="middle" x="1094.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+<!-- interface~rmvs_setup_pl -->
+<g id="call~~graph~~CallGraph_node33" class="node">
+<title>interface~rmvs_setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node33"><a xlink:href=".././interface/rmvs_setup_pl.html" xlink:title="rmvs_setup_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="138,-4672 56,-4672 56,-4648 138,-4648 138,-4672"/>
+<text text-anchor="middle" x="97" y="-4657.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casedisruption -->
-<g id="call~~graph~~CallGraph_node354" class="node">
-<title>proc~symba_collision_casedisruption</title>
-<g id="a_call~~graph~~CallGraph_node354"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1421,-398 1258,-398 1258,-374 1421,-374 1421,-398"/>
-<text text-anchor="middle" x="1339.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+<!-- proc~rmvs_setup_pl -->
+<g id="call~~graph~~CallGraph_node70" class="node">
+<title>proc~rmvs_setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node70"><a xlink:href=".././proc/rmvs_setup_pl.html" xlink:title="rmvs_setup_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="368,-4672 286,-4672 286,-4648 368,-4648 368,-4672"/>
+<text text-anchor="middle" x="327" y="-4657.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
-<g id="call~~graph~~CallGraph_edge44" class="edge">
-<title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1176.08,-386C1198.94,-386 1224,-386 1247.44,-386"/>
-<polygon fill="#000000" stroke="#000000" points="1247.73,-389.5 1257.73,-386 1247.73,-382.5 1247.73,-389.5"/>
+<!-- interface~rmvs_setup_pl&#45;&gt;proc~rmvs_setup_pl -->
+<g id="call~~graph~~CallGraph_edge33" class="edge">
+<title>interface~rmvs_setup_pl&#45;&gt;proc~rmvs_setup_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-4660C176.54,-4660 234.31,-4660 275.65,-4660"/>
+<polygon fill="#000000" stroke="#000000" points="275.78,-4663.5 285.78,-4660 275.78,-4656.5 275.78,-4663.5"/>
 </g>
-<!-- interface~symba_collision_casehitandrun -->
-<g id="call~~graph~~CallGraph_node23" class="node">
-<title>interface~symba_collision_casehitandrun</title>
-<g id="a_call~~graph~~CallGraph_node23"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#a7506f" stroke="#a7506f" points="1175,-356 1014,-356 1014,-332 1175,-332 1175,-356"/>
-<text text-anchor="middle" x="1094.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<!-- interface~rmvs_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node34" class="node">
+<title>interface~rmvs_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node34"><a xlink:href=".././interface/rmvs_setup_initialize_system.html" xlink:title="rmvs_setup_initialize_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="172.5,-3202 21.5,-3202 21.5,-3178 172.5,-3178 172.5,-3202"/>
+<text text-anchor="middle" x="97" y="-3187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casehitandrun -->
-<g id="call~~graph~~CallGraph_node371" class="node">
-<title>proc~symba_collision_casehitandrun</title>
-<g id="a_call~~graph~~CallGraph_node371"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1420,-356 1259,-356 1259,-332 1420,-332 1420,-356"/>
-<text text-anchor="middle" x="1339.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<!-- proc~rmvs_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node77" class="node">
+<title>proc~rmvs_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node77"><a xlink:href=".././proc/rmvs_setup_initialize_system.html" xlink:title="rmvs_setup_initialize_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="402.5,-3202 251.5,-3202 251.5,-3178 402.5,-3178 402.5,-3202"/>
+<text text-anchor="middle" x="327" y="-3187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun -->
-<g id="call~~graph~~CallGraph_edge45" class="edge">
-<title>interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1175.07,-344C1198.56,-344 1224.44,-344 1248.55,-344"/>
-<polygon fill="#000000" stroke="#000000" points="1248.75,-347.5 1258.75,-344 1248.75,-340.5 1248.75,-347.5"/>
+<!-- interface~rmvs_setup_initialize_system&#45;&gt;proc~rmvs_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge34" class="edge">
+<title>interface~rmvs_setup_initialize_system&#45;&gt;proc~rmvs_setup_initialize_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.66,-3190C194.5,-3190 218.55,-3190 240.99,-3190"/>
+<polygon fill="#000000" stroke="#000000" points="241.18,-3193.5 251.18,-3190 241.18,-3186.5 241.18,-3193.5"/>
 </g>
-<!-- interface~symba_collision_casemerge -->
-<g id="call~~graph~~CallGraph_node24" class="node">
-<title>interface~symba_collision_casemerge</title>
-<g id="a_call~~graph~~CallGraph_node24"><a xlink:href=".././interface/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
-<polygon fill="#a7506f" stroke="#a7506f" points="1168,-314 1021,-314 1021,-290 1168,-290 1168,-314"/>
-<text text-anchor="middle" x="1094.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
+<!-- interface~rmvs_setup_tp -->
+<g id="call~~graph~~CallGraph_node35" class="node">
+<title>interface~rmvs_setup_tp</title>
+<g id="a_call~~graph~~CallGraph_node35"><a xlink:href=".././interface/rmvs_setup_tp.html" xlink:title="rmvs_setup_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-4756 55.5,-4756 55.5,-4732 138.5,-4732 138.5,-4756"/>
+<text text-anchor="middle" x="97" y="-4741.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casemerge -->
-<g id="call~~graph~~CallGraph_node372" class="node">
-<title>proc~symba_collision_casemerge</title>
-<g id="a_call~~graph~~CallGraph_node372"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1413,-314 1266,-314 1266,-290 1413,-290 1413,-314"/>
-<text text-anchor="middle" x="1339.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
+<!-- proc~rmvs_setup_tp -->
+<g id="call~~graph~~CallGraph_node79" class="node">
+<title>proc~rmvs_setup_tp</title>
+<g id="a_call~~graph~~CallGraph_node79"><a xlink:href=".././proc/rmvs_setup_tp.html" xlink:title="rmvs_setup_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-4756 285.5,-4756 285.5,-4732 368.5,-4732 368.5,-4756"/>
+<text text-anchor="middle" x="327" y="-4741.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
-<g id="call~~graph~~CallGraph_edge46" class="edge">
-<title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1168.08,-302C1195.61,-302 1227.15,-302 1255.56,-302"/>
-<polygon fill="#000000" stroke="#000000" points="1255.88,-305.5 1265.88,-302 1255.88,-298.5 1255.88,-305.5"/>
-</g>
-<!-- interface~symba_collision_encounter_extract_collisions -->
-<g id="call~~graph~~CallGraph_node25" class="node">
-<title>interface~symba_collision_encounter_extract_collisions</title>
-<g id="a_call~~graph~~CallGraph_node25"><a xlink:href=".././interface/symba_collision_encounter_extract_collisions.html" xlink:title="symba_collision_encounter_extract_collisions">
-<polygon fill="#a7506f" stroke="#a7506f" points="689,-200 460,-200 460,-176 689,-176 689,-200"/>
-<text text-anchor="middle" x="574.5" y="-185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_encounter_extract_collisions</text>
-</a>
-</g>
+<!-- interface~rmvs_setup_tp&#45;&gt;proc~rmvs_setup_tp -->
+<g id="call~~graph~~CallGraph_edge35" class="edge">
+<title>interface~rmvs_setup_tp&#45;&gt;proc~rmvs_setup_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-4744C176.9,-4744 234.01,-4744 275.12,-4744"/>
+<polygon fill="#000000" stroke="#000000" points="275.21,-4747.5 285.21,-4744 275.21,-4740.5 275.21,-4747.5"/>
 </g>
-<!-- proc~symba_collision_encounter_extract_collisions -->
-<g id="call~~graph~~CallGraph_node340" class="node">
-<title>proc~symba_collision_encounter_extract_collisions</title>
-<g id="a_call~~graph~~CallGraph_node340"><a xlink:href=".././proc/symba_collision_encounter_extract_collisions.html" xlink:title="symba_collision_encounter_extract_collisions">
-<polygon fill="#d9534f" stroke="#d9534f" points="954,-200 725,-200 725,-176 954,-176 954,-200"/>
-<text text-anchor="middle" x="839.5" y="-185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_encounter_extract_collisions</text>
+<!-- proc~io_read_frame_system -->
+<g id="call~~graph~~CallGraph_node36" class="node">
+<title>proc~io_read_frame_system</title>
+<g id="a_call~~graph~~CallGraph_node36"><a xlink:href=".././proc/io_read_frame_system.html" xlink:title="io_read_frame_system">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="388,-3391 266,-3391 266,-3367 388,-3367 388,-3391"/>
+<text text-anchor="middle" x="327" y="-3376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_system</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_encounter_extract_collisions&#45;&gt;proc~symba_collision_encounter_extract_collisions -->
-<g id="call~~graph~~CallGraph_edge47" class="edge">
-<title>interface~symba_collision_encounter_extract_collisions&#45;&gt;proc~symba_collision_encounter_extract_collisions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.33,-188C697.72,-188 706.2,-188 714.65,-188"/>
-<polygon fill="#000000" stroke="#000000" points="714.92,-191.5 724.92,-188 714.92,-184.5 714.92,-191.5"/>
+<!-- proc~io_read_frame_system&#45;&gt;proc~io_read_hdr -->
+<g id="call~~graph~~CallGraph_edge36" class="edge">
+<title>proc~io_read_frame_system&#45;&gt;proc~io_read_hdr</title>
+<path fill="none" stroke="#000000" d="M388.06,-3379C431.71,-3379 489.82,-3379 529.28,-3379"/>
+<polygon fill="#000000" stroke="#000000" points="529.39,-3382.5 539.39,-3379 529.39,-3375.5 529.39,-3382.5"/>
 </g>
-<!-- interface~symba_collision_make_colliders_pl -->
-<g id="call~~graph~~CallGraph_node26" class="node">
-<title>interface~symba_collision_make_colliders_pl</title>
-<g id="a_call~~graph~~CallGraph_node26"><a xlink:href=".././interface/symba_collision_make_colliders_pl.html" xlink:title="symba_collision_make_colliders_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="186.5,-3990 7.5,-3990 7.5,-3966 186.5,-3966 186.5,-3990"/>
-<text text-anchor="middle" x="97" y="-3975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_make_colliders_pl</text>
+<!-- interface~rmvs_util_append_pl -->
+<g id="call~~graph~~CallGraph_node37" class="node">
+<title>interface~rmvs_util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node37"><a xlink:href=".././interface/rmvs_util_append_pl.html" xlink:title="rmvs_util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-2433 518.5,-2433 518.5,-2409 630.5,-2409 630.5,-2433"/>
+<text text-anchor="middle" x="574.5" y="-2418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_make_colliders_pl -->
-<g id="call~~graph~~CallGraph_node508" class="node">
-<title>proc~symba_collision_make_colliders_pl</title>
-<g id="a_call~~graph~~CallGraph_node508"><a xlink:href=".././proc/symba_collision_make_colliders_pl.html" xlink:title="symba_collision_make_colliders_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="416.5,-3990 237.5,-3990 237.5,-3966 416.5,-3966 416.5,-3990"/>
-<text text-anchor="middle" x="327" y="-3975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_make_colliders_pl</text>
+<!-- proc~rmvs_util_append_pl -->
+<g id="call~~graph~~CallGraph_node271" class="node">
+<title>proc~rmvs_util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node271"><a xlink:href=".././proc/rmvs_util_append_pl.html" xlink:title="rmvs_util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-2437 783.5,-2437 783.5,-2413 895.5,-2413 895.5,-2437"/>
+<text text-anchor="middle" x="839.5" y="-2422.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_make_colliders_pl&#45;&gt;proc~symba_collision_make_colliders_pl -->
-<g id="call~~graph~~CallGraph_edge48" class="edge">
-<title>interface~symba_collision_make_colliders_pl&#45;&gt;proc~symba_collision_make_colliders_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M186.8,-3978C200.06,-3978 213.79,-3978 227.23,-3978"/>
-<polygon fill="#000000" stroke="#000000" points="227.44,-3981.5 237.44,-3978 227.44,-3974.5 227.44,-3981.5"/>
+<!-- interface~rmvs_util_append_pl&#45;&gt;proc~rmvs_util_append_pl -->
+<g id="call~~graph~~CallGraph_edge37" class="edge">
+<title>interface~rmvs_util_append_pl&#45;&gt;proc~rmvs_util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-2421.84C672.19,-2422.47 729.31,-2423.34 773.16,-2424.01"/>
+<polygon fill="#000000" stroke="#000000" points="773.39,-2427.51 783.44,-2424.16 773.49,-2420.51 773.39,-2427.51"/>
 </g>
-<!-- interface~util_sort_rearrange -->
-<g id="call~~graph~~CallGraph_node27" class="node">
-<title>interface~util_sort_rearrange</title>
-<g id="a_call~~graph~~CallGraph_node27"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="626,-4132 523,-4132 523,-4108 626,-4108 626,-4132"/>
-<text text-anchor="middle" x="574.5" y="-4117.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<!-- interface~rmvs_util_append_tp -->
+<g id="call~~graph~~CallGraph_node38" class="node">
+<title>interface~rmvs_util_append_tp</title>
+<g id="a_call~~graph~~CallGraph_node38"><a xlink:href=".././interface/rmvs_util_append_tp.html" xlink:title="rmvs_util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-2681 518.5,-2681 518.5,-2657 630.5,-2657 630.5,-2681"/>
+<text text-anchor="middle" x="574.5" y="-2666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_resolve_fragmentations -->
-<g id="call~~graph~~CallGraph_node28" class="node">
-<title>interface~symba_collision_resolve_fragmentations</title>
-<g id="a_call~~graph~~CallGraph_node28"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
-<polygon fill="#a7506f" stroke="#a7506f" points="677,-314 472,-314 472,-290 677,-290 677,-314"/>
-<text text-anchor="middle" x="574.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
+<!-- proc~rmvs_util_append_tp -->
+<g id="call~~graph~~CallGraph_node286" class="node">
+<title>proc~rmvs_util_append_tp</title>
+<g id="a_call~~graph~~CallGraph_node286"><a xlink:href=".././proc/rmvs_util_append_tp.html" xlink:title="rmvs_util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-2681 783.5,-2681 783.5,-2657 895.5,-2657 895.5,-2681"/>
+<text text-anchor="middle" x="839.5" y="-2666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations -->
-<g id="call~~graph~~CallGraph_node519" class="node">
-<title>proc~symba_collision_resolve_fragmentations</title>
-<g id="a_call~~graph~~CallGraph_node519"><a xlink:href=".././proc/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
-<polygon fill="#d9534f" stroke="#d9534f" points="942,-314 737,-314 737,-290 942,-290 942,-314"/>
-<text text-anchor="middle" x="839.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
-</a>
+<!-- interface~rmvs_util_append_tp&#45;&gt;proc~rmvs_util_append_tp -->
+<g id="call~~graph~~CallGraph_edge38" class="edge">
+<title>interface~rmvs_util_append_tp&#45;&gt;proc~rmvs_util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-2669C672.19,-2669 729.31,-2669 773.16,-2669"/>
+<polygon fill="#000000" stroke="#000000" points="773.44,-2672.5 783.44,-2669 773.44,-2665.5 773.44,-2672.5"/>
 </g>
+<!-- interface~rmvs_util_fill_pl -->
+<g id="call~~graph~~CallGraph_node39" class="node">
+<title>interface~rmvs_util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node39"><a xlink:href=".././interface/rmvs_util_fill_pl.html" xlink:title="rmvs_util_fill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="617,-2059 532,-2059 532,-2035 617,-2035 617,-2059"/>
+<text text-anchor="middle" x="574.5" y="-2044.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_pl</text>
+</a>
 </g>
-<!-- interface~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_resolve_fragmentations -->
-<g id="call~~graph~~CallGraph_edge49" class="edge">
-<title>interface~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_resolve_fragmentations</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M677.18,-302C693.34,-302 710.14,-302 726.52,-302"/>
-<polygon fill="#000000" stroke="#000000" points="726.65,-305.5 736.65,-302 726.65,-298.5 726.65,-305.5"/>
 </g>
-<!-- interface~symba_collision_resolve_mergers -->
-<g id="call~~graph~~CallGraph_node29" class="node">
-<title>interface~symba_collision_resolve_mergers</title>
-<g id="a_call~~graph~~CallGraph_node29"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
-<polygon fill="#a7506f" stroke="#a7506f" points="661.5,-252 487.5,-252 487.5,-228 661.5,-228 661.5,-252"/>
-<text text-anchor="middle" x="574.5" y="-237.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
+<!-- proc~rmvs_util_fill_pl -->
+<g id="call~~graph~~CallGraph_node284" class="node">
+<title>proc~rmvs_util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node284"><a xlink:href=".././proc/rmvs_util_fill_pl.html" xlink:title="rmvs_util_fill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="882,-2059 797,-2059 797,-2035 882,-2035 882,-2059"/>
+<text text-anchor="middle" x="839.5" y="-2044.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_mergers -->
-<g id="call~~graph~~CallGraph_node591" class="node">
-<title>proc~symba_collision_resolve_mergers</title>
-<g id="a_call~~graph~~CallGraph_node591"><a xlink:href=".././proc/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
-<polygon fill="#d9534f" stroke="#d9534f" points="926.5,-252 752.5,-252 752.5,-228 926.5,-228 926.5,-252"/>
-<text text-anchor="middle" x="839.5" y="-237.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
+<!-- interface~rmvs_util_fill_pl&#45;&gt;proc~rmvs_util_fill_pl -->
+<g id="call~~graph~~CallGraph_edge39" class="edge">
+<title>interface~rmvs_util_fill_pl&#45;&gt;proc~rmvs_util_fill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.17,-2047C663.01,-2047 736.75,-2047 786.38,-2047"/>
+<polygon fill="#000000" stroke="#000000" points="786.59,-2050.5 796.59,-2047 786.59,-2043.5 786.59,-2050.5"/>
+</g>
+<!-- proc~helio_gr_p4_tp -->
+<g id="call~~graph~~CallGraph_node40" class="node">
+<title>proc~helio_gr_p4_tp</title>
+<g id="a_call~~graph~~CallGraph_node40"><a xlink:href=".././proc/helio_gr_p4_tp.html" xlink:title="helio_gr_p4_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="369,-4546 285,-4546 285,-4522 369,-4522 369,-4546"/>
+<text text-anchor="middle" x="327" y="-4531.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
-<g id="call~~graph~~CallGraph_edge50" class="edge">
-<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M661.62,-240C687.39,-240 715.81,-240 742.19,-240"/>
-<polygon fill="#000000" stroke="#000000" points="742.19,-243.5 752.19,-240 742.19,-236.5 742.19,-243.5"/>
+<!-- proc~helio_gr_p4_tp&#45;&gt;gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_edge40" class="edge">
+<title>proc~helio_gr_p4_tp&#45;&gt;gr_p4_pos_kick</title>
+<path fill="none" stroke="#000000" d="M369.23,-4525.53C386.24,-4521.9 406.12,-4517.46 424,-4513 457.23,-4504.71 494.29,-4494.3 523.2,-4485.92"/>
+<polygon fill="#000000" stroke="#000000" points="524.44,-4489.21 533.06,-4483.05 522.48,-4482.49 524.44,-4489.21"/>
 </g>
-<!-- interface~symba_util_fill_pl -->
-<g id="call~~graph~~CallGraph_node30" class="node">
-<title>interface~symba_util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node30"><a xlink:href=".././interface/symba_util_fill_pl.html" xlink:title="symba_util_fill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-860 527.5,-860 527.5,-836 621.5,-836 621.5,-860"/>
-<text text-anchor="middle" x="574.5" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_pl</text>
+<!-- interface~rmvs_util_fill_tp -->
+<g id="call~~graph~~CallGraph_node41" class="node">
+<title>interface~rmvs_util_fill_tp</title>
+<g id="a_call~~graph~~CallGraph_node41"><a xlink:href=".././interface/rmvs_util_fill_tp.html" xlink:title="rmvs_util_fill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="617.5,-2223 531.5,-2223 531.5,-2199 617.5,-2199 617.5,-2223"/>
+<text text-anchor="middle" x="574.5" y="-2208.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_fill_pl -->
-<g id="call~~graph~~CallGraph_node332" class="node">
-<title>proc~symba_util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node332"><a xlink:href=".././proc/symba_util_fill_pl.html" xlink:title="symba_util_fill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-860 792.5,-860 792.5,-836 886.5,-836 886.5,-860"/>
-<text text-anchor="middle" x="839.5" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_pl</text>
+<!-- proc~rmvs_util_fill_tp -->
+<g id="call~~graph~~CallGraph_node288" class="node">
+<title>proc~rmvs_util_fill_tp</title>
+<g id="a_call~~graph~~CallGraph_node288"><a xlink:href=".././proc/rmvs_util_fill_tp.html" xlink:title="rmvs_util_fill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="882.5,-2227 796.5,-2227 796.5,-2203 882.5,-2203 882.5,-2227"/>
+<text text-anchor="middle" x="839.5" y="-2212.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_fill_pl&#45;&gt;proc~symba_util_fill_pl -->
-<g id="call~~graph~~CallGraph_edge51" class="edge">
-<title>interface~symba_util_fill_pl&#45;&gt;proc~symba_util_fill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-848C666.35,-848 734.33,-848 782.24,-848"/>
-<polygon fill="#000000" stroke="#000000" points="782.44,-851.5 792.44,-848 782.44,-844.5 782.44,-851.5"/>
+<!-- interface~rmvs_util_fill_tp&#45;&gt;proc~rmvs_util_fill_tp -->
+<g id="call~~graph~~CallGraph_edge41" class="edge">
+<title>interface~rmvs_util_fill_tp&#45;&gt;proc~rmvs_util_fill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.76,-2211.64C663.58,-2212.34 736.77,-2213.45 786.18,-2214.2"/>
+<polygon fill="#000000" stroke="#000000" points="786.3,-2217.71 796.35,-2214.36 786.4,-2210.71 786.3,-2217.71"/>
 </g>
-<!-- proc~io_get_old_t_final_system -->
-<g id="call~~graph~~CallGraph_node31" class="node">
-<title>proc~io_get_old_t_final_system</title>
-<g id="a_call~~graph~~CallGraph_node31"><a xlink:href=".././proc/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="907.5,-3196 771.5,-3196 771.5,-3172 907.5,-3172 907.5,-3196"/>
-<text text-anchor="middle" x="839.5" y="-3181.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
+<!-- interface~rmvs_util_resize_pl -->
+<g id="call~~graph~~CallGraph_node42" class="node">
+<title>interface~rmvs_util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node42"><a xlink:href=".././interface/rmvs_util_resize_pl.html" xlink:title="rmvs_util_resize_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="626.5,-4986 522.5,-4986 522.5,-4962 626.5,-4962 626.5,-4986"/>
+<text text-anchor="middle" x="574.5" y="-4971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_old_t_final_system&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge52" class="edge">
-<title>proc~io_get_old_t_final_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M907.76,-3182.37C924.23,-3179.21 940.87,-3173.37 954,-3163 1051.01,-3086.39 1082.31,-2928.16 1090.76,-2870.04"/>
-<polygon fill="#000000" stroke="#000000" points="1094.24,-2870.48 1092.13,-2860.1 1087.3,-2869.53 1094.24,-2870.48"/>
+<!-- proc~rmvs_util_resize_pl -->
+<g id="call~~graph~~CallGraph_node303" class="node">
+<title>proc~rmvs_util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node303"><a xlink:href=".././proc/rmvs_util_resize_pl.html" xlink:title="rmvs_util_resize_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="891.5,-4986 787.5,-4986 787.5,-4962 891.5,-4962 891.5,-4986"/>
+<text text-anchor="middle" x="839.5" y="-4971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_pl</text>
+</a>
 </g>
-<!-- interface~symba_collision_resolve_plplenc -->
-<g id="call~~graph~~CallGraph_node32" class="node">
-<title>interface~symba_collision_resolve_plplenc</title>
-<g id="a_call~~graph~~CallGraph_node32"><a xlink:href=".././interface/symba_collision_resolve_plplenc.html" xlink:title="symba_collision_resolve_plplenc">
-<polygon fill="#a7506f" stroke="#a7506f" points="1178.5,-524 1010.5,-524 1010.5,-500 1178.5,-500 1178.5,-524"/>
-<text text-anchor="middle" x="1094.5" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_plplenc</text>
+</g>
+<!-- interface~rmvs_util_resize_pl&#45;&gt;proc~rmvs_util_resize_pl -->
+<g id="call~~graph~~CallGraph_edge42" class="edge">
+<title>interface~rmvs_util_resize_pl&#45;&gt;proc~rmvs_util_resize_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.52,-4974C669.57,-4974 731.32,-4974 777.08,-4974"/>
+<polygon fill="#000000" stroke="#000000" points="777.17,-4977.5 787.17,-4974 777.17,-4970.5 777.17,-4977.5"/>
+</g>
+<!-- interface~rmvs_util_resize_tp -->
+<g id="call~~graph~~CallGraph_node43" class="node">
+<title>interface~rmvs_util_resize_tp</title>
+<g id="a_call~~graph~~CallGraph_node43"><a xlink:href=".././interface/rmvs_util_resize_tp.html" xlink:title="rmvs_util_resize_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="627,-4944 522,-4944 522,-4920 627,-4920 627,-4944"/>
+<text text-anchor="middle" x="574.5" y="-4929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_plplenc -->
-<g id="call~~graph~~CallGraph_node567" class="node">
-<title>proc~symba_collision_resolve_plplenc</title>
-<g id="a_call~~graph~~CallGraph_node567"><a xlink:href=".././proc/symba_collision_resolve_plplenc.html" xlink:title="symba_collision_resolve_plplenc">
-<polygon fill="#d9534f" stroke="#d9534f" points="1423.5,-503 1255.5,-503 1255.5,-479 1423.5,-479 1423.5,-503"/>
-<text text-anchor="middle" x="1339.5" y="-488.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_plplenc</text>
+<!-- proc~rmvs_util_resize_tp -->
+<g id="call~~graph~~CallGraph_node299" class="node">
+<title>proc~rmvs_util_resize_tp</title>
+<g id="a_call~~graph~~CallGraph_node299"><a xlink:href=".././proc/rmvs_util_resize_tp.html" xlink:title="rmvs_util_resize_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="892,-4944 787,-4944 787,-4920 892,-4920 892,-4944"/>
+<text text-anchor="middle" x="839.5" y="-4929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_resolve_plplenc&#45;&gt;proc~symba_collision_resolve_plplenc -->
-<g id="call~~graph~~CallGraph_edge53" class="edge">
-<title>interface~symba_collision_resolve_plplenc&#45;&gt;proc~symba_collision_resolve_plplenc</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1178.79,-504.8C1200.23,-502.95 1223.45,-500.94 1245.36,-499.05"/>
-<polygon fill="#000000" stroke="#000000" points="1245.66,-502.54 1255.32,-498.19 1245.06,-495.56 1245.66,-502.54"/>
+<!-- interface~rmvs_util_resize_tp&#45;&gt;proc~rmvs_util_resize_tp -->
+<g id="call~~graph~~CallGraph_edge43" class="edge">
+<title>interface~rmvs_util_resize_tp&#45;&gt;proc~rmvs_util_resize_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M627.15,-4932C670.12,-4932 731.41,-4932 776.93,-4932"/>
+<polygon fill="#000000" stroke="#000000" points="776.97,-4935.5 786.97,-4932 776.97,-4928.5 776.97,-4935.5"/>
 </g>
-<!-- interface~symba_util_fill_tp -->
-<g id="call~~graph~~CallGraph_node33" class="node">
-<title>interface~symba_util_fill_tp</title>
-<g id="a_call~~graph~~CallGraph_node33"><a xlink:href=".././interface/symba_util_fill_tp.html" xlink:title="symba_util_fill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-776 527.5,-776 527.5,-752 621.5,-752 621.5,-776"/>
-<text text-anchor="middle" x="574.5" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_tp</text>
+<!-- interface~rmvs_util_sort_pl -->
+<g id="call~~graph~~CallGraph_node44" class="node">
+<title>interface~rmvs_util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node44"><a xlink:href=".././interface/rmvs_util_sort_pl.html" xlink:title="rmvs_util_sort_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="144,-5028 50,-5028 50,-5004 144,-5004 144,-5028"/>
+<text text-anchor="middle" x="97" y="-5013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_fill_tp -->
-<g id="call~~graph~~CallGraph_node329" class="node">
-<title>proc~symba_util_fill_tp</title>
-<g id="a_call~~graph~~CallGraph_node329"><a xlink:href=".././proc/symba_util_fill_tp.html" xlink:title="symba_util_fill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-776 792.5,-776 792.5,-752 886.5,-752 886.5,-776"/>
-<text text-anchor="middle" x="839.5" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_tp</text>
+<!-- proc~rmvs_util_sort_pl -->
+<g id="call~~graph~~CallGraph_node315" class="node">
+<title>proc~rmvs_util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node315"><a xlink:href=".././proc/rmvs_util_sort_pl.html" xlink:title="rmvs_util_sort_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="374,-5028 280,-5028 280,-5004 374,-5004 374,-5028"/>
+<text text-anchor="middle" x="327" y="-5013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp -->
-<g id="call~~graph~~CallGraph_edge54" class="edge">
-<title>interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-764C666.35,-764 734.33,-764 782.24,-764"/>
-<polygon fill="#000000" stroke="#000000" points="782.44,-767.5 792.44,-764 782.44,-760.5 782.44,-767.5"/>
+<!-- interface~rmvs_util_sort_pl&#45;&gt;proc~rmvs_util_sort_pl -->
+<g id="call~~graph~~CallGraph_edge44" class="edge">
+<title>interface~rmvs_util_sort_pl&#45;&gt;proc~rmvs_util_sort_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-5016C180.45,-5016 231.21,-5016 269.87,-5016"/>
+<polygon fill="#000000" stroke="#000000" points="269.93,-5019.5 279.93,-5016 269.93,-5012.5 269.93,-5019.5"/>
 </g>
-<!-- xpc -->
-<g id="call~~graph~~CallGraph_node733" class="node">
-<title>xpc</title>
-<polygon fill="#777777" stroke="#777777" points="1366.5,-1363 1312.5,-1363 1312.5,-1339 1366.5,-1339 1366.5,-1363"/>
-<text text-anchor="middle" x="1339.5" y="-1348.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
+<!-- proc~symba_io_write_discard -->
+<g id="call~~graph~~CallGraph_node45" class="node">
+<title>proc~symba_io_write_discard</title>
+<g id="a_call~~graph~~CallGraph_node45"><a xlink:href=".././proc/symba_io_write_discard.html" xlink:title="symba_io_write_discard">
+<polygon fill="#d9534f" stroke="#d9534f" points="903,-2479 776,-2479 776,-2455 903,-2455 903,-2479"/>
+<text text-anchor="middle" x="839.5" y="-2464.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_write_discard</text>
+</a>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
-<g id="call~~graph~~CallGraph_edge55" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
-<path fill="none" stroke="#000000" d="M1132.14,-1333.17C1178.15,-1337.14 1256.57,-1343.92 1302.34,-1347.88"/>
-<polygon fill="#000000" stroke="#000000" points="1302.15,-1351.37 1312.41,-1348.75 1302.75,-1344.4 1302.15,-1351.37"/>
 </g>
-<!-- vpc -->
+<!-- util_exit -->
 <g id="call~~graph~~CallGraph_node743" class="node">
-<title>vpc</title>
-<polygon fill="#777777" stroke="#777777" points="1366.5,-1321 1312.5,-1321 1312.5,-1297 1366.5,-1297 1366.5,-1321"/>
-<text text-anchor="middle" x="1339.5" y="-1306.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-2538 1067.5,-2538 1067.5,-2514 1121.5,-2514 1121.5,-2538"/>
+<text text-anchor="middle" x="1094.5" y="-2523.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
-<g id="call~~graph~~CallGraph_edge56" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
-<path fill="none" stroke="#000000" d="M1132.14,-1326.83C1178.15,-1322.86 1256.57,-1316.08 1302.34,-1312.12"/>
-<polygon fill="#000000" stroke="#000000" points="1302.75,-1315.6 1312.41,-1311.25 1302.15,-1308.63 1302.75,-1315.6"/>
+<!-- proc~symba_io_write_discard&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge45" class="edge">
+<title>proc~symba_io_write_discard&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M893.36,-2479.03C912.47,-2483.4 934.21,-2488.39 954,-2493 989.19,-2501.19 1029.33,-2510.71 1057.49,-2517.41"/>
+<polygon fill="#000000" stroke="#000000" points="1056.75,-2520.83 1067.29,-2519.74 1058.37,-2514.02 1056.75,-2520.83"/>
 </g>
-<!-- interface~symba_collision_resolve_pltpenc -->
-<g id="call~~graph~~CallGraph_node35" class="node">
-<title>interface~symba_collision_resolve_pltpenc</title>
-<g id="a_call~~graph~~CallGraph_node35"><a xlink:href=".././interface/symba_collision_resolve_pltpenc.html" xlink:title="symba_collision_resolve_pltpenc">
-<polygon fill="#a7506f" stroke="#a7506f" points="181.5,-4242 12.5,-4242 12.5,-4218 181.5,-4218 181.5,-4242"/>
-<text text-anchor="middle" x="97" y="-4227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_pltpenc</text>
+<!-- interface~rmvs_util_sort_tp -->
+<g id="call~~graph~~CallGraph_node46" class="node">
+<title>interface~rmvs_util_sort_tp</title>
+<g id="a_call~~graph~~CallGraph_node46"><a xlink:href=".././interface/rmvs_util_sort_tp.html" xlink:title="rmvs_util_sort_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="144,-5122 50,-5122 50,-5098 144,-5098 144,-5122"/>
+<text text-anchor="middle" x="97" y="-5107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_pltpenc -->
-<g id="call~~graph~~CallGraph_node272" class="node">
-<title>proc~symba_collision_resolve_pltpenc</title>
-<g id="a_call~~graph~~CallGraph_node272"><a xlink:href=".././proc/symba_collision_resolve_pltpenc.html" xlink:title="symba_collision_resolve_pltpenc">
-<polygon fill="#d9534f" stroke="#d9534f" points="411.5,-4242 242.5,-4242 242.5,-4218 411.5,-4218 411.5,-4242"/>
-<text text-anchor="middle" x="327" y="-4227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_pltpenc</text>
+<!-- proc~rmvs_util_sort_tp -->
+<g id="call~~graph~~CallGraph_node319" class="node">
+<title>proc~rmvs_util_sort_tp</title>
+<g id="a_call~~graph~~CallGraph_node319"><a xlink:href=".././proc/rmvs_util_sort_tp.html" xlink:title="rmvs_util_sort_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="374,-5122 280,-5122 280,-5098 374,-5098 374,-5122"/>
+<text text-anchor="middle" x="327" y="-5107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_resolve_pltpenc&#45;&gt;proc~symba_collision_resolve_pltpenc -->
-<g id="call~~graph~~CallGraph_edge57" class="edge">
-<title>interface~symba_collision_resolve_pltpenc&#45;&gt;proc~symba_collision_resolve_pltpenc</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.6,-4230C198.02,-4230 215.35,-4230 232.08,-4230"/>
-<polygon fill="#000000" stroke="#000000" points="232.41,-4233.5 242.41,-4230 232.41,-4226.5 232.41,-4233.5"/>
+<!-- interface~rmvs_util_sort_tp&#45;&gt;proc~rmvs_util_sort_tp -->
+<g id="call~~graph~~CallGraph_edge46" class="edge">
+<title>interface~rmvs_util_sort_tp&#45;&gt;proc~rmvs_util_sort_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-5110C180.45,-5110 231.21,-5110 269.87,-5110"/>
+<polygon fill="#000000" stroke="#000000" points="269.93,-5113.5 279.93,-5110 269.93,-5106.5 269.93,-5113.5"/>
 </g>
-<!-- interface~symba_util_peri_pl -->
-<g id="call~~graph~~CallGraph_node36" class="node">
-<title>interface~symba_util_peri_pl</title>
-<g id="a_call~~graph~~CallGraph_node36"><a xlink:href=".././interface/symba_util_peri_pl.html" xlink:title="symba_util_peri_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="1390.5,-639 1288.5,-639 1288.5,-615 1390.5,-615 1390.5,-639"/>
-<text text-anchor="middle" x="1339.5" y="-624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_peri_pl</text>
+<!-- proc~kick_getacch_int_pl -->
+<g id="call~~graph~~CallGraph_node47" class="node">
+<title>proc~kick_getacch_int_pl</title>
+<g id="a_call~~graph~~CallGraph_node47"><a xlink:href=".././proc/kick_getacch_int_pl.html" xlink:title="kick_getacch_int_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-5164 274,-5164 274,-5140 380,-5140 380,-5164"/>
+<text text-anchor="middle" x="327" y="-5149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_peri_pl -->
-<g id="call~~graph~~CallGraph_node338" class="node">
-<title>proc~symba_util_peri_pl</title>
-<g id="a_call~~graph~~CallGraph_node338"><a xlink:href=".././proc/symba_util_peri_pl.html" xlink:title="symba_util_peri_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="1619.5,-639 1517.5,-639 1517.5,-615 1619.5,-615 1619.5,-639"/>
-<text text-anchor="middle" x="1568.5" y="-624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_peri_pl</text>
+<!-- interface~kick_getacch_int_all_pl -->
+<g id="call~~graph~~CallGraph_node163" class="node">
+<title>interface~kick_getacch_int_all_pl</title>
+<g id="a_call~~graph~~CallGraph_node163"><a xlink:href=".././interface/kick_getacch_int_all_pl.html" xlink:title="kick_getacch_int_all_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="635.5,-5164 513.5,-5164 513.5,-5140 635.5,-5140 635.5,-5164"/>
+<text text-anchor="middle" x="574.5" y="-5149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_peri_pl&#45;&gt;proc~symba_util_peri_pl -->
-<g id="call~~graph~~CallGraph_edge58" class="edge">
-<title>interface~symba_util_peri_pl&#45;&gt;proc~symba_util_peri_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1390.6,-627C1424.82,-627 1470.37,-627 1506.68,-627"/>
-<polygon fill="#000000" stroke="#000000" points="1507.14,-630.5 1517.14,-627 1507.14,-623.5 1507.14,-630.5"/>
+<!-- proc~kick_getacch_int_pl&#45;&gt;interface~kick_getacch_int_all_pl -->
+<g id="call~~graph~~CallGraph_edge47" class="edge">
+<title>proc~kick_getacch_int_pl&#45;&gt;interface~kick_getacch_int_all_pl</title>
+<path fill="none" stroke="#000000" d="M380.06,-5152C415.93,-5152 464.01,-5152 503.26,-5152"/>
+<polygon fill="#000000" stroke="#000000" points="503.3,-5155.5 513.3,-5152 503.3,-5148.5 503.3,-5155.5"/>
 </g>
-<!-- interface~symba_discard_pl -->
-<g id="call~~graph~~CallGraph_node37" class="node">
-<title>interface~symba_discard_pl</title>
-<g id="a_call~~graph~~CallGraph_node37"><a xlink:href=".././interface/symba_discard_pl.html" xlink:title="symba_discard_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="624,-461 525,-461 525,-437 624,-437 624,-461"/>
-<text text-anchor="middle" x="574.5" y="-446.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_pl</text>
+<!-- proc~symba_io_param_writer -->
+<g id="call~~graph~~CallGraph_node48" class="node">
+<title>proc~symba_io_param_writer</title>
+<g id="a_call~~graph~~CallGraph_node48"><a xlink:href=".././proc/symba_io_param_writer.html" xlink:title="symba_io_param_writer">
+<polygon fill="#d9534f" stroke="#d9534f" points="390.5,-5206 263.5,-5206 263.5,-5182 390.5,-5182 390.5,-5206"/>
+<text text-anchor="middle" x="327" y="-5191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_writer</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_discard_pl -->
-<g id="call~~graph~~CallGraph_node222" class="node">
-<title>proc~symba_discard_pl</title>
-<g id="a_call~~graph~~CallGraph_node222"><a xlink:href=".././proc/symba_discard_pl.html" xlink:title="symba_discard_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="889,-461 790,-461 790,-437 889,-437 889,-461"/>
-<text text-anchor="middle" x="839.5" y="-446.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_pl</text>
-</a>
-</g>
+<!-- io_param_writer -->
+<g id="call~~graph~~CallGraph_node720" class="node">
+<title>io_param_writer</title>
+<polygon fill="#777777" stroke="#777777" points="619.5,-5206 529.5,-5206 529.5,-5182 619.5,-5182 619.5,-5206"/>
+<text text-anchor="middle" x="574.5" y="-5191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_writer</text>
 </g>
-<!-- interface~symba_discard_pl&#45;&gt;proc~symba_discard_pl -->
-<g id="call~~graph~~CallGraph_edge59" class="edge">
-<title>interface~symba_discard_pl&#45;&gt;proc~symba_discard_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.04,-449C668.02,-449 732.9,-449 779.78,-449"/>
-<polygon fill="#000000" stroke="#000000" points="779.79,-452.5 789.79,-449 779.79,-445.5 779.79,-452.5"/>
+<!-- proc~symba_io_param_writer&#45;&gt;io_param_writer -->
+<g id="call~~graph~~CallGraph_edge48" class="edge">
+<title>proc~symba_io_param_writer&#45;&gt;io_param_writer</title>
+<path fill="none" stroke="#000000" d="M390.59,-5194C430.19,-5194 480.9,-5194 518.87,-5194"/>
+<polygon fill="#000000" stroke="#000000" points="519.23,-5197.5 529.23,-5194 519.23,-5190.5 519.23,-5197.5"/>
 </g>
-<!-- interface~symba_util_rearray_pl -->
-<g id="call~~graph~~CallGraph_node38" class="node">
-<title>interface~symba_util_rearray_pl</title>
-<g id="a_call~~graph~~CallGraph_node38"><a xlink:href=".././interface/symba_util_rearray_pl.html" xlink:title="symba_util_rearray_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-4284 38,-4284 38,-4260 156,-4260 156,-4284"/>
-<text text-anchor="middle" x="97" y="-4269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_rearray_pl</text>
+<!-- interface~rmvs_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node49" class="node">
+<title>interface~rmvs_util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node49"><a xlink:href=".././interface/rmvs_util_sort_rearrange_pl.html" xlink:title="rmvs_util_sort_rearrange_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-5374 23.5,-5374 23.5,-5350 170.5,-5350 170.5,-5374"/>
+<text text-anchor="middle" x="97" y="-5359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_rearray_pl -->
-<g id="call~~graph~~CallGraph_node341" class="node">
-<title>proc~symba_util_rearray_pl</title>
-<g id="a_call~~graph~~CallGraph_node341"><a xlink:href=".././proc/symba_util_rearray_pl.html" xlink:title="symba_util_rearray_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="386,-4284 268,-4284 268,-4260 386,-4260 386,-4284"/>
-<text text-anchor="middle" x="327" y="-4269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_rearray_pl</text>
+<!-- proc~rmvs_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node308" class="node">
+<title>proc~rmvs_util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node308"><a xlink:href=".././proc/rmvs_util_sort_rearrange_pl.html" xlink:title="rmvs_util_sort_rearrange_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="400.5,-5374 253.5,-5374 253.5,-5350 400.5,-5350 400.5,-5374"/>
+<text text-anchor="middle" x="327" y="-5359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_rearray_pl&#45;&gt;proc~symba_util_rearray_pl -->
-<g id="call~~graph~~CallGraph_edge60" class="edge">
-<title>interface~symba_util_rearray_pl&#45;&gt;proc~symba_util_rearray_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-4272C187.08,-4272 225.33,-4272 257.7,-4272"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-4275.5 267.98,-4272 257.98,-4268.5 257.98,-4275.5"/>
+<!-- interface~rmvs_util_sort_rearrange_pl&#45;&gt;proc~rmvs_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_edge49" class="edge">
+<title>interface~rmvs_util_sort_rearrange_pl&#45;&gt;proc~rmvs_util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.77,-5362C193.8,-5362 219.43,-5362 243.12,-5362"/>
+<polygon fill="#000000" stroke="#000000" points="243.14,-5365.5 253.14,-5362 243.14,-5358.5 243.14,-5365.5"/>
 </g>
-<!-- interface~symba_util_reset_kinship -->
-<g id="call~~graph~~CallGraph_node39" class="node">
-<title>interface~symba_util_reset_kinship</title>
-<g id="a_call~~graph~~CallGraph_node39"><a xlink:href=".././interface/symba_util_reset_kinship.html" xlink:title="symba_util_reset_kinship">
-<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-4326 30.5,-4326 30.5,-4302 163.5,-4302 163.5,-4326"/>
-<text text-anchor="middle" x="97" y="-4311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_reset_kinship</text>
+<!-- proc~kick_getacch_int_tp -->
+<g id="call~~graph~~CallGraph_node50" class="node">
+<title>proc~kick_getacch_int_tp</title>
+<g id="a_call~~graph~~CallGraph_node50"><a xlink:href=".././proc/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-3433 274,-3433 274,-3409 380,-3409 380,-3433"/>
+<text text-anchor="middle" x="327" y="-3418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_reset_kinship -->
-<g id="call~~graph~~CallGraph_node347" class="node">
-<title>proc~symba_util_reset_kinship</title>
-<g id="a_call~~graph~~CallGraph_node347"><a xlink:href=".././proc/symba_util_reset_kinship.html" xlink:title="symba_util_reset_kinship">
-<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-4326 260.5,-4326 260.5,-4302 393.5,-4302 393.5,-4326"/>
-<text text-anchor="middle" x="327" y="-4311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_reset_kinship</text>
+<!-- interface~kick_getacch_int_all_tp -->
+<g id="call~~graph~~CallGraph_node164" class="node">
+<title>interface~kick_getacch_int_all_tp</title>
+<g id="a_call~~graph~~CallGraph_node164"><a xlink:href=".././interface/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="636,-3433 513,-3433 513,-3409 636,-3409 636,-3433"/>
+<text text-anchor="middle" x="574.5" y="-3418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_reset_kinship&#45;&gt;proc~symba_util_reset_kinship -->
-<g id="call~~graph~~CallGraph_edge61" class="edge">
-<title>interface~symba_util_reset_kinship&#45;&gt;proc~symba_util_reset_kinship</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-4314C190.71,-4314 222.24,-4314 250.27,-4314"/>
-<polygon fill="#000000" stroke="#000000" points="250.43,-4317.5 260.43,-4314 250.43,-4310.5 250.43,-4317.5"/>
+<!-- proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp -->
+<g id="call~~graph~~CallGraph_edge50" class="edge">
+<title>proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" d="M380.06,-3421C415.72,-3421 463.46,-3421 502.59,-3421"/>
+<polygon fill="#000000" stroke="#000000" points="502.85,-3424.5 512.85,-3421 502.85,-3417.5 502.85,-3424.5"/>
 </g>
-<!-- interface~symba_drift_pl -->
-<g id="call~~graph~~CallGraph_node40" class="node">
-<title>interface~symba_drift_pl</title>
-<g id="a_call~~graph~~CallGraph_node40"><a xlink:href=".././interface/symba_drift_pl.html" xlink:title="symba_drift_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="138,-4410 56,-4410 56,-4386 138,-4386 138,-4410"/>
-<text text-anchor="middle" x="97" y="-4395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_pl</text>
+<!-- interface~rmvs_util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_node51" class="node">
+<title>interface~rmvs_util_sort_rearrange_tp</title>
+<g id="a_call~~graph~~CallGraph_node51"><a xlink:href=".././interface/rmvs_util_sort_rearrange_tp.html" xlink:title="rmvs_util_sort_rearrange_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="171,-5332 23,-5332 23,-5308 171,-5308 171,-5332"/>
+<text text-anchor="middle" x="97" y="-5317.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_drift_pl -->
-<g id="call~~graph~~CallGraph_node660" class="node">
-<title>proc~symba_drift_pl</title>
-<g id="a_call~~graph~~CallGraph_node660"><a xlink:href=".././proc/symba_drift_pl.html" xlink:title="symba_drift_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="368,-4410 286,-4410 286,-4386 368,-4386 368,-4410"/>
-<text text-anchor="middle" x="327" y="-4395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_pl</text>
+<!-- proc~rmvs_util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_node323" class="node">
+<title>proc~rmvs_util_sort_rearrange_tp</title>
+<g id="a_call~~graph~~CallGraph_node323"><a xlink:href=".././proc/rmvs_util_sort_rearrange_tp.html" xlink:title="rmvs_util_sort_rearrange_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="401,-5332 253,-5332 253,-5308 401,-5308 401,-5332"/>
+<text text-anchor="middle" x="327" y="-5317.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_drift_pl&#45;&gt;proc~symba_drift_pl -->
-<g id="call~~graph~~CallGraph_edge62" class="edge">
-<title>interface~symba_drift_pl&#45;&gt;proc~symba_drift_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-4398C176.54,-4398 234.31,-4398 275.65,-4398"/>
-<polygon fill="#000000" stroke="#000000" points="275.78,-4401.5 285.78,-4398 275.78,-4394.5 275.78,-4401.5"/>
+<!-- interface~rmvs_util_sort_rearrange_tp&#45;&gt;proc~rmvs_util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_edge51" class="edge">
+<title>interface~rmvs_util_sort_rearrange_tp&#45;&gt;proc~rmvs_util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M171.08,-5320C193.89,-5320 219.21,-5320 242.67,-5320"/>
+<polygon fill="#000000" stroke="#000000" points="242.94,-5323.5 252.94,-5320 242.94,-5316.5 242.94,-5323.5"/>
 </g>
-<!-- interface~symba_drift_tp -->
-<g id="call~~graph~~CallGraph_node41" class="node">
-<title>interface~symba_drift_tp</title>
-<g id="a_call~~graph~~CallGraph_node41"><a xlink:href=".././interface/symba_drift_tp.html" xlink:title="symba_drift_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-4368 55.5,-4368 55.5,-4344 138.5,-4344 138.5,-4368"/>
-<text text-anchor="middle" x="97" y="-4353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_tp</text>
+<!-- interface~rmvs_util_spill_pl -->
+<g id="call~~graph~~CallGraph_node52" class="node">
+<title>interface~rmvs_util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node52"><a xlink:href=".././interface/rmvs_util_spill_pl.html" xlink:title="rmvs_util_spill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-3139 527.5,-3139 527.5,-3115 621.5,-3115 621.5,-3139"/>
+<text text-anchor="middle" x="574.5" y="-3124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_drift_tp -->
-<g id="call~~graph~~CallGraph_node667" class="node">
-<title>proc~symba_drift_tp</title>
-<g id="a_call~~graph~~CallGraph_node667"><a xlink:href=".././proc/symba_drift_tp.html" xlink:title="symba_drift_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-4368 285.5,-4368 285.5,-4344 368.5,-4344 368.5,-4368"/>
-<text text-anchor="middle" x="327" y="-4353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_tp</text>
+<!-- proc~rmvs_util_spill_pl -->
+<g id="call~~graph~~CallGraph_node337" class="node">
+<title>proc~rmvs_util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node337"><a xlink:href=".././proc/rmvs_util_spill_pl.html" xlink:title="rmvs_util_spill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-3139 792.5,-3139 792.5,-3115 886.5,-3115 886.5,-3139"/>
+<text text-anchor="middle" x="839.5" y="-3124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_drift_tp&#45;&gt;proc~symba_drift_tp -->
-<g id="call~~graph~~CallGraph_edge63" class="edge">
-<title>interface~symba_drift_tp&#45;&gt;proc~symba_drift_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-4356C176.9,-4356 234.01,-4356 275.12,-4356"/>
-<polygon fill="#000000" stroke="#000000" points="275.21,-4359.5 285.21,-4356 275.21,-4352.5 275.21,-4359.5"/>
+<!-- interface~rmvs_util_spill_pl&#45;&gt;proc~rmvs_util_spill_pl -->
+<g id="call~~graph~~CallGraph_edge52" class="edge">
+<title>interface~rmvs_util_spill_pl&#45;&gt;proc~rmvs_util_spill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-3127C666.35,-3127 734.33,-3127 782.24,-3127"/>
+<polygon fill="#000000" stroke="#000000" points="782.44,-3130.5 792.44,-3127 782.44,-3123.5 782.44,-3130.5"/>
 </g>
-<!-- interface~symba_encounter_check_one -->
-<g id="call~~graph~~CallGraph_node42" class="node">
-<title>interface~symba_encounter_check_one</title>
-<g id="a_call~~graph~~CallGraph_node42"><a xlink:href=".././interface/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
-<polygon fill="#a7506f" stroke="#a7506f" points="175,-4494 19,-4494 19,-4470 175,-4470 175,-4494"/>
-<text text-anchor="middle" x="97" y="-4479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
+<!-- proc~kick_getacch_int_all_pl -->
+<g id="call~~graph~~CallGraph_node53" class="node">
+<title>proc~kick_getacch_int_all_pl</title>
+<g id="a_call~~graph~~CallGraph_node53"><a xlink:href=".././proc/kick_getacch_int_all_pl.html" xlink:title="kick_getacch_int_all_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="900.5,-5164 778.5,-5164 778.5,-5140 900.5,-5140 900.5,-5164"/>
+<text text-anchor="middle" x="839.5" y="-5149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_encounter_check_one -->
-<g id="call~~graph~~CallGraph_node266" class="node">
-<title>proc~symba_encounter_check_one</title>
-<g id="a_call~~graph~~CallGraph_node266"><a xlink:href=".././proc/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
-<polygon fill="#d9534f" stroke="#d9534f" points="405,-4494 249,-4494 249,-4470 405,-4470 405,-4494"/>
-<text text-anchor="middle" x="327" y="-4479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
+<!-- interface~rmvs_util_spill_tp -->
+<g id="call~~graph~~CallGraph_node54" class="node">
+<title>interface~rmvs_util_spill_tp</title>
+<g id="a_call~~graph~~CallGraph_node54"><a xlink:href=".././interface/rmvs_util_spill_tp.html" xlink:title="rmvs_util_spill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-3097 527.5,-3097 527.5,-3073 621.5,-3073 621.5,-3097"/>
+<text text-anchor="middle" x="574.5" y="-3082.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one -->
-<g id="call~~graph~~CallGraph_edge64" class="edge">
-<title>interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M175.19,-4482C195.62,-4482 217.81,-4482 238.73,-4482"/>
-<polygon fill="#000000" stroke="#000000" points="238.89,-4485.5 248.89,-4482 238.89,-4478.5 238.89,-4485.5"/>
-</g>
-<!-- interface~symba_util_index_eucl_plpl -->
-<g id="call~~graph~~CallGraph_node43" class="node">
-<title>interface~symba_util_index_eucl_plpl</title>
-<g id="a_call~~graph~~CallGraph_node43"><a xlink:href=".././interface/symba_util_index_eucl_plpl.html" xlink:title="symba_util_index_eucl_plpl">
-<polygon fill="#a7506f" stroke="#a7506f" points="168.5,-4536 25.5,-4536 25.5,-4512 168.5,-4512 168.5,-4536"/>
-<text text-anchor="middle" x="97" y="-4521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_index_eucl_plpl</text>
+<!-- proc~rmvs_util_spill_tp -->
+<g id="call~~graph~~CallGraph_node342" class="node">
+<title>proc~rmvs_util_spill_tp</title>
+<g id="a_call~~graph~~CallGraph_node342"><a xlink:href=".././proc/rmvs_util_spill_tp.html" xlink:title="rmvs_util_spill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-3097 792.5,-3097 792.5,-3073 886.5,-3073 886.5,-3097"/>
+<text text-anchor="middle" x="839.5" y="-3082.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_index_eucl_plpl -->
-<g id="call~~graph~~CallGraph_node335" class="node">
-<title>proc~symba_util_index_eucl_plpl</title>
-<g id="a_call~~graph~~CallGraph_node335"><a xlink:href=".././proc/symba_util_index_eucl_plpl.html" xlink:title="symba_util_index_eucl_plpl">
-<polygon fill="#d9534f" stroke="#d9534f" points="398.5,-4536 255.5,-4536 255.5,-4512 398.5,-4512 398.5,-4536"/>
-<text text-anchor="middle" x="327" y="-4521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_index_eucl_plpl</text>
-</a>
+<!-- interface~rmvs_util_spill_tp&#45;&gt;proc~rmvs_util_spill_tp -->
+<g id="call~~graph~~CallGraph_edge53" class="edge">
+<title>interface~rmvs_util_spill_tp&#45;&gt;proc~rmvs_util_spill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-3085C666.35,-3085 734.33,-3085 782.24,-3085"/>
+<polygon fill="#000000" stroke="#000000" points="782.44,-3088.5 792.44,-3085 782.44,-3081.5 782.44,-3088.5"/>
 </g>
+<!-- interface~rmvs_step_system -->
+<g id="call~~graph~~CallGraph_node55" class="node">
+<title>interface~rmvs_step_system</title>
+<g id="a_call~~graph~~CallGraph_node55"><a xlink:href=".././interface/rmvs_step_system.html" xlink:title="rmvs_step_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="148,-2391 46,-2391 46,-2367 148,-2367 148,-2391"/>
+<text text-anchor="middle" x="97" y="-2376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_system</text>
+</a>
 </g>
-<!-- interface~symba_util_index_eucl_plpl&#45;&gt;proc~symba_util_index_eucl_plpl -->
-<g id="call~~graph~~CallGraph_edge65" class="edge">
-<title>interface~symba_util_index_eucl_plpl&#45;&gt;proc~symba_util_index_eucl_plpl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-4524C192.83,-4524 220.17,-4524 245.17,-4524"/>
-<polygon fill="#000000" stroke="#000000" points="245.36,-4527.5 255.36,-4524 245.36,-4520.5 245.36,-4527.5"/>
 </g>
-<!-- interface~symba_io_param_reader -->
-<g id="call~~graph~~CallGraph_node44" class="node">
-<title>interface~symba_io_param_reader</title>
-<g id="a_call~~graph~~CallGraph_node44"><a xlink:href=".././interface/symba_io_param_reader.html" xlink:title="symba_io_param_reader">
-<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-3759 30.5,-3759 30.5,-3735 163.5,-3735 163.5,-3759"/>
-<text text-anchor="middle" x="97" y="-3744.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_reader</text>
+<!-- proc~rmvs_step_system -->
+<g id="call~~graph~~CallGraph_node95" class="node">
+<title>proc~rmvs_step_system</title>
+<g id="a_call~~graph~~CallGraph_node95"><a xlink:href=".././proc/rmvs_step_system.html" xlink:title="rmvs_step_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="378,-2391 276,-2391 276,-2367 378,-2367 378,-2391"/>
+<text text-anchor="middle" x="327" y="-2376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_system</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_io_param_reader&#45;&gt;proc~symba_io_param_reader -->
-<g id="call~~graph~~CallGraph_edge66" class="edge">
-<title>interface~symba_io_param_reader&#45;&gt;proc~symba_io_param_reader</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-3747C190.71,-3747 222.24,-3747 250.27,-3747"/>
-<polygon fill="#000000" stroke="#000000" points="250.43,-3750.5 260.43,-3747 250.43,-3743.5 250.43,-3750.5"/>
+<!-- interface~rmvs_step_system&#45;&gt;proc~rmvs_step_system -->
+<g id="call~~graph~~CallGraph_edge54" class="edge">
+<title>interface~rmvs_step_system&#45;&gt;proc~rmvs_step_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.04,-2379C182.66,-2379 228.93,-2379 265.61,-2379"/>
+<polygon fill="#000000" stroke="#000000" points="265.69,-2382.5 275.69,-2379 265.69,-2375.5 265.69,-2382.5"/>
 </g>
-<!-- interface~symba_io_param_writer -->
-<g id="call~~graph~~CallGraph_node45" class="node">
-<title>interface~symba_io_param_writer</title>
-<g id="a_call~~graph~~CallGraph_node45"><a xlink:href=".././interface/symba_io_param_writer.html" xlink:title="symba_io_param_writer">
-<polygon fill="#a7506f" stroke="#a7506f" points="160.5,-4578 33.5,-4578 33.5,-4554 160.5,-4554 160.5,-4578"/>
-<text text-anchor="middle" x="97" y="-4563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_writer</text>
+<!-- proc~helio_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node56" class="node">
+<title>proc~helio_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node56"><a xlink:href=".././proc/helio_kick_getacch_pl.html" xlink:title="helio_kick_getacch_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-5458 268.5,-5458 268.5,-5434 385.5,-5434 385.5,-5458"/>
+<text text-anchor="middle" x="327" y="-5443.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_io_param_writer -->
-<g id="call~~graph~~CallGraph_node669" class="node">
-<title>proc~symba_io_param_writer</title>
-<g id="a_call~~graph~~CallGraph_node669"><a xlink:href=".././proc/symba_io_param_writer.html" xlink:title="symba_io_param_writer">
-<polygon fill="#d9534f" stroke="#d9534f" points="390.5,-4578 263.5,-4578 263.5,-4554 390.5,-4554 390.5,-4578"/>
-<text text-anchor="middle" x="327" y="-4563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_writer</text>
+<!-- proc~symba_kick_getacch_int_pl -->
+<g id="call~~graph~~CallGraph_node57" class="node">
+<title>proc~symba_kick_getacch_int_pl</title>
+<g id="a_call~~graph~~CallGraph_node57"><a xlink:href=".././proc/symba_kick_getacch_int_pl.html" xlink:title="symba_kick_getacch_int_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="398.5,-5500 255.5,-5500 255.5,-5476 398.5,-5476 398.5,-5500"/>
+<text text-anchor="middle" x="327" y="-5485.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_int_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_io_param_writer&#45;&gt;proc~symba_io_param_writer -->
-<g id="call~~graph~~CallGraph_edge67" class="edge">
-<title>interface~symba_io_param_writer&#45;&gt;proc~symba_io_param_writer</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160.6,-4566C189.14,-4566 223.11,-4566 252.83,-4566"/>
-<polygon fill="#000000" stroke="#000000" points="253.14,-4569.5 263.14,-4566 253.14,-4562.5 253.14,-4569.5"/>
-</g>
-<!-- interface~symba_io_write_discard -->
-<g id="call~~graph~~CallGraph_node46" class="node">
-<title>interface~symba_io_write_discard</title>
-<g id="a_call~~graph~~CallGraph_node46"><a xlink:href=".././interface/symba_io_write_discard.html" xlink:title="symba_io_write_discard">
-<polygon fill="#a7506f" stroke="#a7506f" points="638,-1146 511,-1146 511,-1122 638,-1122 638,-1146"/>
-<text text-anchor="middle" x="574.5" y="-1131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_write_discard</text>
-</a>
+<!-- kick_getacch_int_all_pl -->
+<g id="call~~graph~~CallGraph_node706" class="node">
+<title>kick_getacch_int_all_pl</title>
+<polygon fill="#777777" stroke="#777777" points="635.5,-5500 513.5,-5500 513.5,-5476 635.5,-5476 635.5,-5500"/>
+<text text-anchor="middle" x="574.5" y="-5485.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_pl</text>
 </g>
+<!-- proc~symba_kick_getacch_int_pl&#45;&gt;kick_getacch_int_all_pl -->
+<g id="call~~graph~~CallGraph_edge55" class="edge">
+<title>proc~symba_kick_getacch_int_pl&#45;&gt;kick_getacch_int_all_pl</title>
+<path fill="none" stroke="#000000" d="M398.68,-5488C431.4,-5488 470.18,-5488 502.89,-5488"/>
+<polygon fill="#000000" stroke="#000000" points="503.29,-5491.5 513.29,-5488 503.29,-5484.5 503.29,-5491.5"/>
 </g>
-<!-- proc~symba_io_write_discard -->
-<g id="call~~graph~~CallGraph_node678" class="node">
-<title>proc~symba_io_write_discard</title>
-<g id="a_call~~graph~~CallGraph_node678"><a xlink:href=".././proc/symba_io_write_discard.html" xlink:title="symba_io_write_discard">
-<polygon fill="#d9534f" stroke="#d9534f" points="903,-1142 776,-1142 776,-1118 903,-1118 903,-1142"/>
-<text text-anchor="middle" x="839.5" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_write_discard</text>
-</a>
+<!-- io_write_frame_encounter -->
+<g id="call~~graph~~CallGraph_node727" class="node">
+<title>io_write_frame_encounter</title>
+<polygon fill="#777777" stroke="#777777" points="1163,-2639 1026,-2639 1026,-2615 1163,-2615 1163,-2639"/>
+<text text-anchor="middle" x="1094.5" y="-2624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </g>
+<!-- proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter -->
+<g id="call~~graph~~CallGraph_edge57" class="edge">
+<title>proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter</title>
+<path fill="none" stroke="#000000" d="M906.31,-2627C939.76,-2627 980.63,-2627 1015.63,-2627"/>
+<polygon fill="#000000" stroke="#000000" points="1015.81,-2630.5 1025.81,-2627 1015.81,-2623.5 1015.81,-2630.5"/>
 </g>
-<!-- interface~symba_io_write_discard&#45;&gt;proc~symba_io_write_discard -->
-<g id="call~~graph~~CallGraph_edge68" class="edge">
-<title>interface~symba_io_write_discard&#45;&gt;proc~symba_io_write_discard</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.16,-1133.05C676.46,-1132.46 725.6,-1131.72 765.63,-1131.11"/>
-<polygon fill="#000000" stroke="#000000" points="765.92,-1134.6 775.86,-1130.95 765.81,-1127.61 765.92,-1134.6"/>
+<!-- proc~rmvs_io_write_encounter&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge56" class="edge">
+<title>proc~rmvs_io_write_encounter&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M906.04,-2618.76C922.01,-2615.7 938.86,-2611.56 954,-2606 996.62,-2590.35 1041.38,-2562.31 1068.37,-2543.92"/>
+<polygon fill="#000000" stroke="#000000" points="1070.57,-2546.66 1076.81,-2538.09 1066.59,-2540.9 1070.57,-2546.66"/>
 </g>
-<!-- interface~symba_kick_getacch_int_pl -->
-<g id="call~~graph~~CallGraph_node47" class="node">
-<title>interface~symba_kick_getacch_int_pl</title>
-<g id="a_call~~graph~~CallGraph_node47"><a xlink:href=".././interface/symba_kick_getacch_int_pl.html" xlink:title="symba_kick_getacch_int_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="168.5,-4662 25.5,-4662 25.5,-4638 168.5,-4638 168.5,-4662"/>
-<text text-anchor="middle" x="97" y="-4647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_int_pl</text>
+<!-- proc~walltime_finish -->
+<g id="call~~graph~~CallGraph_node59" class="node">
+<title>proc~walltime_finish</title>
+<g id="a_call~~graph~~CallGraph_node59"><a xlink:href=".././proc/walltime_finish.html" xlink:title="walltime_finish">
+<polygon fill="#d9534f" stroke="#d9534f" points="138,-5584 56,-5584 56,-5560 138,-5560 138,-5584"/>
+<text text-anchor="middle" x="97" y="-5569.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_finish</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_kick_getacch_int_pl -->
-<g id="call~~graph~~CallGraph_node289" class="node">
-<title>proc~symba_kick_getacch_int_pl</title>
-<g id="a_call~~graph~~CallGraph_node289"><a xlink:href=".././proc/symba_kick_getacch_int_pl.html" xlink:title="symba_kick_getacch_int_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="398.5,-4662 255.5,-4662 255.5,-4638 398.5,-4638 398.5,-4662"/>
-<text text-anchor="middle" x="327" y="-4647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_int_pl</text>
+<!-- proc~symba_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node60" class="node">
+<title>proc~symba_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node60"><a xlink:href=".././proc/symba_kick_getacch_pl.html" xlink:title="symba_kick_getacch_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="390,-5542 264,-5542 264,-5518 390,-5518 390,-5542"/>
+<text text-anchor="middle" x="327" y="-5527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_kick_getacch_int_pl&#45;&gt;proc~symba_kick_getacch_int_pl -->
-<g id="call~~graph~~CallGraph_edge69" class="edge">
-<title>interface~symba_kick_getacch_int_pl&#45;&gt;proc~symba_kick_getacch_int_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-4650C192.83,-4650 220.17,-4650 245.17,-4650"/>
-<polygon fill="#000000" stroke="#000000" points="245.36,-4653.5 255.36,-4650 245.36,-4646.5 245.36,-4653.5"/>
-</g>
-<!-- interface~symba_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node48" class="node">
-<title>interface~symba_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node48"><a xlink:href=".././interface/symba_kick_getacch_pl.html" xlink:title="symba_kick_getacch_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="160,-4620 34,-4620 34,-4596 160,-4596 160,-4620"/>
-<text text-anchor="middle" x="97" y="-4605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_pl</text>
-</a>
+<!-- helio_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node696" class="node">
+<title>helio_kick_getacch_pl</title>
+<polygon fill="#777777" stroke="#777777" points="633,-5542 516,-5542 516,-5518 633,-5518 633,-5542"/>
+<text text-anchor="middle" x="574.5" y="-5527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_pl</text>
+</g>
+<!-- proc~symba_kick_getacch_pl&#45;&gt;helio_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_edge59" class="edge">
+<title>proc~symba_kick_getacch_pl&#45;&gt;helio_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" d="M390.27,-5530C425.43,-5530 469.43,-5530 505.5,-5530"/>
+<polygon fill="#000000" stroke="#000000" points="505.93,-5533.5 515.93,-5530 505.93,-5526.5 505.93,-5533.5"/>
 </g>
+<!-- proc~symba_kick_getacch_pl&#45;&gt;kick_getacch_int_all_pl -->
+<g id="call~~graph~~CallGraph_edge58" class="edge">
+<title>proc~symba_kick_getacch_pl&#45;&gt;kick_getacch_int_all_pl</title>
+<path fill="none" stroke="#000000" d="M390.27,-5519.35C424.81,-5513.44 467.86,-5506.07 503.56,-5499.97"/>
+<polygon fill="#000000" stroke="#000000" points="504.15,-5503.42 513.42,-5498.28 502.97,-5496.52 504.15,-5503.42"/>
 </g>
-<!-- proc~symba_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node293" class="node">
-<title>proc~symba_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node293"><a xlink:href=".././proc/symba_kick_getacch_pl.html" xlink:title="symba_kick_getacch_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="390,-4620 264,-4620 264,-4596 390,-4596 390,-4620"/>
-<text text-anchor="middle" x="327" y="-4605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_pl</text>
+<!-- proc~symba_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node61" class="node">
+<title>proc~symba_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node61"><a xlink:href=".././proc/symba_kick_getacch_tp.html" xlink:title="symba_kick_getacch_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="390.5,-5626 263.5,-5626 263.5,-5602 390.5,-5602 390.5,-5626"/>
+<text text-anchor="middle" x="327" y="-5611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_kick_getacch_pl&#45;&gt;proc~symba_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_edge70" class="edge">
-<title>interface~symba_kick_getacch_pl&#45;&gt;proc~symba_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160,-4608C188.91,-4608 223.49,-4608 253.59,-4608"/>
-<polygon fill="#000000" stroke="#000000" points="253.62,-4611.5 263.62,-4608 253.62,-4604.5 253.62,-4611.5"/>
+<!-- helio_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node751" class="node">
+<title>helio_kick_getacch_tp</title>
+<polygon fill="#777777" stroke="#777777" points="633.5,-5626 515.5,-5626 515.5,-5602 633.5,-5602 633.5,-5626"/>
+<text text-anchor="middle" x="574.5" y="-5611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_tp</text>
 </g>
-<!-- proc~io_get_token -->
-<g id="call~~graph~~CallGraph_node49" class="node">
-<title>proc~io_get_token</title>
-<g id="a_call~~graph~~CallGraph_node49"><a xlink:href=".././proc/io_get_token.html" xlink:title="io_get_token">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1376.5,-3486 1302.5,-3486 1302.5,-3462 1376.5,-3462 1376.5,-3486"/>
-<text text-anchor="middle" x="1339.5" y="-3471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<!-- proc~symba_kick_getacch_tp&#45;&gt;helio_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_edge60" class="edge">
+<title>proc~symba_kick_getacch_tp&#45;&gt;helio_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" d="M390.59,-5614C425.5,-5614 469.03,-5614 504.87,-5614"/>
+<polygon fill="#000000" stroke="#000000" points="505.24,-5617.5 515.24,-5614 505.24,-5610.5 505.24,-5617.5"/>
+</g>
+<!-- proc~symba_encounter_check_all -->
+<g id="call~~graph~~CallGraph_node62" class="node">
+<title>proc~symba_encounter_check_all</title>
+<g id="a_call~~graph~~CallGraph_node62"><a xlink:href=".././proc/symba_encounter_check_all.html" xlink:title="symba_encounter_check_all">
+<polygon fill="#d9534f" stroke="#d9534f" points="648.5,-5668 500.5,-5668 500.5,-5644 648.5,-5644 648.5,-5668"/>
+<text text-anchor="middle" x="574.5" y="-5653.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_all</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node50" class="node">
-<title>interface~symba_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node50"><a xlink:href=".././interface/symba_kick_getacch_tp.html" xlink:title="symba_kick_getacch_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="160.5,-4704 33.5,-4704 33.5,-4680 160.5,-4680 160.5,-4704"/>
-<text text-anchor="middle" x="97" y="-4689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_tp</text>
+<!-- proc~walltime_reset -->
+<g id="call~~graph~~CallGraph_node63" class="node">
+<title>proc~walltime_reset</title>
+<g id="a_call~~graph~~CallGraph_node63"><a xlink:href=".././proc/walltime_reset.html" xlink:title="walltime_reset">
+<polygon fill="#d9534f" stroke="#d9534f" points="137.5,-5752 56.5,-5752 56.5,-5728 137.5,-5728 137.5,-5752"/>
+<text text-anchor="middle" x="97" y="-5737.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_reset</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node292" class="node">
-<title>proc~symba_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node292"><a xlink:href=".././proc/symba_kick_getacch_tp.html" xlink:title="symba_kick_getacch_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="390.5,-4704 263.5,-4704 263.5,-4680 390.5,-4680 390.5,-4704"/>
-<text text-anchor="middle" x="327" y="-4689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_tp</text>
+<!-- proc~helio_kick_vb_pl -->
+<g id="call~~graph~~CallGraph_node64" class="node">
+<title>proc~helio_kick_vb_pl</title>
+<g id="a_call~~graph~~CallGraph_node64"><a xlink:href=".././proc/helio_kick_vb_pl.html" xlink:title="helio_kick_vb_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-5794 281.5,-5794 281.5,-5770 372.5,-5770 372.5,-5794"/>
+<text text-anchor="middle" x="327" y="-5779.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_kick_getacch_tp&#45;&gt;proc~symba_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge71" class="edge">
-<title>interface~symba_kick_getacch_tp&#45;&gt;proc~symba_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160.6,-4692C189.14,-4692 223.11,-4692 252.83,-4692"/>
-<polygon fill="#000000" stroke="#000000" points="253.14,-4695.5 263.14,-4692 253.14,-4688.5 253.14,-4695.5"/>
-</g>
-<!-- proc~io_param_reader -->
-<g id="call~~graph~~CallGraph_node51" class="node">
-<title>proc~io_param_reader</title>
-<g id="a_call~~graph~~CallGraph_node51"><a xlink:href=".././proc/io_param_reader.html" xlink:title="io_param_reader">
-<polygon fill="#d9534f" stroke="#d9534f" points="887,-3444 792,-3444 792,-3420 887,-3420 887,-3444"/>
-<text text-anchor="middle" x="839.5" y="-3429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<!-- proc~helio_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node65" class="node">
+<title>proc~helio_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node65"><a xlink:href=".././proc/helio_kick_getacch_tp.html" xlink:title="helio_kick_getacch_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="386,-5836 268,-5836 268,-5812 386,-5812 386,-5836"/>
+<text text-anchor="middle" x="327" y="-5821.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_token -->
-<g id="call~~graph~~CallGraph_node87" class="node">
-<title>interface~io_get_token</title>
-<g id="a_call~~graph~~CallGraph_node87"><a xlink:href=".././interface/io_get_token.html" xlink:title="io_get_token">
-<polygon fill="#a7506f" stroke="#a7506f" points="1131.5,-3486 1057.5,-3486 1057.5,-3462 1131.5,-3462 1131.5,-3486"/>
-<text text-anchor="middle" x="1094.5" y="-3471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<!-- proc~symba_kick_encounter -->
+<g id="call~~graph~~CallGraph_node66" class="node">
+<title>proc~symba_kick_encounter</title>
+<g id="a_call~~graph~~CallGraph_node66"><a xlink:href=".././proc/symba_kick_encounter.html" xlink:title="symba_kick_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="388,-5878 266,-5878 266,-5854 388,-5854 388,-5878"/>
+<text text-anchor="middle" x="327" y="-5863.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_get_token -->
-<g id="call~~graph~~CallGraph_edge73" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_get_token</title>
-<path fill="none" stroke="#000000" d="M887.2,-3439.75C932.86,-3447.33 1001.97,-3458.81 1047.42,-3466.35"/>
-<polygon fill="#000000" stroke="#000000" points="1046.87,-3469.81 1057.31,-3467.99 1048.01,-3462.9 1046.87,-3469.81"/>
+<!-- proc~helio_kick_vb_tp -->
+<g id="call~~graph~~CallGraph_node67" class="node">
+<title>proc~helio_kick_vb_tp</title>
+<g id="a_call~~graph~~CallGraph_node67"><a xlink:href=".././proc/helio_kick_vb_tp.html" xlink:title="helio_kick_vb_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-5920 281.5,-5920 281.5,-5896 372.5,-5896 372.5,-5920"/>
+<text text-anchor="middle" x="327" y="-5905.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_tp</text>
+</a>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
-<g id="call~~graph~~CallGraph_edge72" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M887.2,-3432C934.49,-3432 1006.92,-3432 1052.18,-3432"/>
-<polygon fill="#000000" stroke="#000000" points="1052.24,-3435.5 1062.24,-3432 1052.24,-3428.5 1052.24,-3435.5"/>
 </g>
-<!-- interface~symba_kick_encounter -->
-<g id="call~~graph~~CallGraph_node52" class="node">
-<title>interface~symba_kick_encounter</title>
-<g id="a_call~~graph~~CallGraph_node52"><a xlink:href=".././interface/symba_kick_encounter.html" xlink:title="symba_kick_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="158,-4746 36,-4746 36,-4722 158,-4722 158,-4746"/>
-<text text-anchor="middle" x="97" y="-4731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_encounter</text>
+<!-- proc~walltime_start -->
+<g id="call~~graph~~CallGraph_node68" class="node">
+<title>proc~walltime_start</title>
+<g id="a_call~~graph~~CallGraph_node68"><a xlink:href=".././proc/walltime_start.html" xlink:title="walltime_start">
+<polygon fill="#d9534f" stroke="#d9534f" points="136,-5962 58,-5962 58,-5938 136,-5938 136,-5962"/>
+<text text-anchor="middle" x="97" y="-5947.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_start</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_kick_encounter -->
-<g id="call~~graph~~CallGraph_node295" class="node">
-<title>proc~symba_kick_encounter</title>
-<g id="a_call~~graph~~CallGraph_node295"><a xlink:href=".././proc/symba_kick_encounter.html" xlink:title="symba_kick_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="388,-4746 266,-4746 266,-4722 388,-4722 388,-4746"/>
-<text text-anchor="middle" x="327" y="-4731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_encounter</text>
+<!-- proc~netcdf_write_hdr_system -->
+<g id="call~~graph~~CallGraph_node69" class="node">
+<title>proc~netcdf_write_hdr_system</title>
+<g id="a_call~~graph~~CallGraph_node69"><a xlink:href=".././proc/netcdf_write_hdr_system.html" xlink:title="netcdf_write_hdr_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="905.5,-129 773.5,-129 773.5,-105 905.5,-105 905.5,-129"/>
+<text text-anchor="middle" x="839.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_hdr_system</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_kick_encounter&#45;&gt;proc~symba_kick_encounter -->
-<g id="call~~graph~~CallGraph_edge74" class="edge">
-<title>interface~symba_kick_encounter&#45;&gt;proc~symba_kick_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.2,-4734C188.07,-4734 224.34,-4734 255.5,-4734"/>
-<polygon fill="#000000" stroke="#000000" points="255.86,-4737.5 265.86,-4734 255.86,-4730.5 255.86,-4737.5"/>
+<!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_open -->
+<g id="call~~graph~~CallGraph_edge62" class="edge">
+<title>proc~netcdf_write_hdr_system&#45;&gt;nf90_open</title>
+<path fill="none" stroke="#000000" d="M905.65,-109.02C951.89,-103.35 1012.55,-95.92 1052.25,-91.05"/>
+<polygon fill="#000000" stroke="#000000" points="1052.87,-94.51 1062.37,-89.81 1052.01,-87.56 1052.87,-94.51"/>
 </g>
-<!-- interface~symba_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node53" class="node">
-<title>interface~symba_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node53"><a xlink:href=".././interface/symba_setup_initialize_system.html" xlink:title="symba_setup_initialize_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="177,-4788 17,-4788 17,-4764 177,-4764 177,-4788"/>
-<text text-anchor="middle" x="97" y="-4773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_initialize_system</text>
-</a>
+<!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var -->
+<g id="call~~graph~~CallGraph_edge61" class="edge">
+<title>proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var</title>
+<path fill="none" stroke="#000000" d="M905.65,-119.83C949.6,-121.74 1006.59,-124.22 1046.21,-125.94"/>
+<polygon fill="#000000" stroke="#000000" points="1046.26,-129.45 1056.4,-126.39 1046.56,-122.46 1046.26,-129.45"/>
 </g>
+<!-- whm_setup_pl -->
+<g id="call~~graph~~CallGraph_node762" class="node">
+<title>whm_setup_pl</title>
+<polygon fill="#777777" stroke="#777777" points="615.5,-4672 533.5,-4672 533.5,-4648 615.5,-4648 615.5,-4672"/>
+<text text-anchor="middle" x="574.5" y="-4657.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_pl</text>
 </g>
-<!-- proc~symba_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node267" class="node">
-<title>proc~symba_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node267"><a xlink:href=".././proc/symba_setup_initialize_system.html" xlink:title="symba_setup_initialize_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="407,-4788 247,-4788 247,-4764 407,-4764 407,-4788"/>
-<text text-anchor="middle" x="327" y="-4773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_initialize_system</text>
-</a>
+<!-- proc~rmvs_setup_pl&#45;&gt;whm_setup_pl -->
+<g id="call~~graph~~CallGraph_edge63" class="edge">
+<title>proc~rmvs_setup_pl&#45;&gt;whm_setup_pl</title>
+<path fill="none" stroke="#000000" d="M368.26,-4660C410.63,-4660 477.4,-4660 523.2,-4660"/>
+<polygon fill="#000000" stroke="#000000" points="523.21,-4663.5 533.21,-4660 523.21,-4656.5 523.21,-4663.5"/>
 </g>
+<!-- interface~walltime_finish -->
+<g id="call~~graph~~CallGraph_node71" class="node">
+<title>interface~walltime_finish</title>
+<g id="a_call~~graph~~CallGraph_node71"><a xlink:href=".././interface/walltime_finish.html" xlink:title="walltime_finish">
+<polygon fill="#a7506f" stroke="#a7506f" points="138,-6004 56,-6004 56,-5980 138,-5980 138,-6004"/>
+<text text-anchor="middle" x="97" y="-5989.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_finish</text>
+</a>
 </g>
-<!-- interface~symba_setup_initialize_system&#45;&gt;proc~symba_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge75" class="edge">
-<title>interface~symba_setup_initialize_system&#45;&gt;proc~symba_setup_initialize_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M177.1,-4776C196.27,-4776 216.89,-4776 236.5,-4776"/>
-<polygon fill="#000000" stroke="#000000" points="236.65,-4779.5 246.65,-4776 236.65,-4772.5 236.65,-4779.5"/>
 </g>
-<!-- interface~symba_setup_merger -->
-<g id="call~~graph~~CallGraph_node54" class="node">
-<title>interface~symba_setup_merger</title>
-<g id="a_call~~graph~~CallGraph_node54"><a xlink:href=".././interface/symba_setup_merger.html" xlink:title="symba_setup_merger">
-<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-4914 38.5,-4914 38.5,-4890 155.5,-4890 155.5,-4914"/>
-<text text-anchor="middle" x="97" y="-4899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_merger</text>
+<!-- interface~walltime_reset -->
+<g id="call~~graph~~CallGraph_node72" class="node">
+<title>interface~walltime_reset</title>
+<g id="a_call~~graph~~CallGraph_node72"><a xlink:href=".././interface/walltime_reset.html" xlink:title="walltime_reset">
+<polygon fill="#a7506f" stroke="#a7506f" points="137.5,-6046 56.5,-6046 56.5,-6022 137.5,-6022 137.5,-6046"/>
+<text text-anchor="middle" x="97" y="-6031.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_reset</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_setup_merger -->
-<g id="call~~graph~~CallGraph_node282" class="node">
-<title>proc~symba_setup_merger</title>
-<g id="a_call~~graph~~CallGraph_node282"><a xlink:href=".././proc/symba_setup_merger.html" xlink:title="symba_setup_merger">
-<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-4914 268.5,-4914 268.5,-4890 385.5,-4890 385.5,-4914"/>
-<text text-anchor="middle" x="327" y="-4899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_merger</text>
+<!-- interface~walltime_start -->
+<g id="call~~graph~~CallGraph_node73" class="node">
+<title>interface~walltime_start</title>
+<g id="a_call~~graph~~CallGraph_node73"><a xlink:href=".././interface/walltime_start.html" xlink:title="walltime_start">
+<polygon fill="#a7506f" stroke="#a7506f" points="136,-6088 58,-6088 58,-6064 136,-6064 136,-6088"/>
+<text text-anchor="middle" x="97" y="-6073.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_start</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_setup_merger&#45;&gt;proc~symba_setup_merger -->
-<g id="call~~graph~~CallGraph_edge76" class="edge">
-<title>interface~symba_setup_merger&#45;&gt;proc~symba_setup_merger</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-4902C186.72,-4902 225.45,-4902 258.11,-4902"/>
-<polygon fill="#000000" stroke="#000000" points="258.48,-4905.5 268.48,-4902 258.48,-4898.5 258.48,-4905.5"/>
-</g>
-<!-- interface~symba_setup_pl -->
-<g id="call~~graph~~CallGraph_node55" class="node">
-<title>interface~symba_setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node55"><a xlink:href=".././interface/symba_setup_pl.html" xlink:title="symba_setup_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="620,-4914 529,-4914 529,-4890 620,-4890 620,-4914"/>
-<text text-anchor="middle" x="574.5" y="-4899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_pl</text>
+<!-- proc~orbel_fget -->
+<g id="call~~graph~~CallGraph_node74" class="node">
+<title>proc~orbel_fget</title>
+<g id="a_call~~graph~~CallGraph_node74"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1125,-3796 1064,-3796 1064,-3772 1125,-3772 1125,-3796"/>
+<text text-anchor="middle" x="1094.5" y="-3781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_setup_pl -->
-<g id="call~~graph~~CallGraph_node281" class="node">
-<title>proc~symba_setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node281"><a xlink:href=".././proc/symba_setup_pl.html" xlink:title="symba_setup_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="885,-4914 794,-4914 794,-4890 885,-4890 885,-4914"/>
-<text text-anchor="middle" x="839.5" y="-4899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_pl</text>
+<!-- proc~orbel_schget -->
+<g id="call~~graph~~CallGraph_node75" class="node">
+<title>proc~orbel_schget</title>
+<g id="a_call~~graph~~CallGraph_node75"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
+<polygon fill="#d9534f" stroke="#d9534f" points="1376.5,-3826 1302.5,-3826 1302.5,-3802 1376.5,-3802 1376.5,-3826"/>
+<text text-anchor="middle" x="1339.5" y="-3811.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_setup_pl&#45;&gt;proc~symba_setup_pl -->
-<g id="call~~graph~~CallGraph_edge77" class="edge">
-<title>interface~symba_setup_pl&#45;&gt;proc~symba_setup_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.11,-4902C665.27,-4902 735.15,-4902 783.66,-4902"/>
-<polygon fill="#000000" stroke="#000000" points="783.67,-4905.5 793.67,-4902 783.67,-4898.5 783.67,-4905.5"/>
+<!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
+<g id="call~~graph~~CallGraph_edge64" class="edge">
+<title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
+<path fill="none" stroke="#000000" d="M1125.3,-3787.68C1166.94,-3792.82 1242.96,-3802.21 1292.07,-3808.27"/>
+<polygon fill="#000000" stroke="#000000" points="1291.77,-3811.76 1302.12,-3809.51 1292.62,-3804.81 1291.77,-3811.76"/>
 </g>
-<!-- interface~symba_setup_encounter -->
-<g id="call~~graph~~CallGraph_node56" class="node">
-<title>interface~symba_setup_encounter</title>
-<g id="a_call~~graph~~CallGraph_node56"><a xlink:href=".././interface/symba_setup_encounter.html" xlink:title="symba_setup_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="162,-4956 32,-4956 32,-4932 162,-4932 162,-4956"/>
-<text text-anchor="middle" x="97" y="-4941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_encounter</text>
+<!-- proc~symba_step_recur_system -->
+<g id="call~~graph~~CallGraph_node76" class="node">
+<title>proc~symba_step_recur_system</title>
+<g id="a_call~~graph~~CallGraph_node76"><a xlink:href=".././proc/symba_step_recur_system.html" xlink:title="symba_step_recur_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="910,-2597 769,-2597 769,-2573 910,-2573 910,-2597"/>
+<text text-anchor="middle" x="839.5" y="-2582.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_recur_system</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_setup_encounter -->
-<g id="call~~graph~~CallGraph_node284" class="node">
-<title>proc~symba_setup_encounter</title>
-<g id="a_call~~graph~~CallGraph_node284"><a xlink:href=".././proc/symba_setup_encounter.html" xlink:title="symba_setup_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="392,-4956 262,-4956 262,-4932 392,-4932 392,-4956"/>
-<text text-anchor="middle" x="327" y="-4941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_encounter</text>
-</a>
-</g>
+<!-- proc~symba_step_recur_system&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge65" class="edge">
+<title>proc~symba_step_recur_system&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M893.36,-2572.97C912.47,-2568.6 934.21,-2563.61 954,-2559 989.19,-2550.81 1029.33,-2541.29 1057.49,-2534.59"/>
+<polygon fill="#000000" stroke="#000000" points="1058.37,-2537.98 1067.29,-2532.26 1056.75,-2531.17 1058.37,-2537.98"/>
 </g>
-<!-- interface~symba_setup_encounter&#45;&gt;proc~symba_setup_encounter -->
-<g id="call~~graph~~CallGraph_edge78" class="edge">
-<title>interface~symba_setup_encounter&#45;&gt;proc~symba_setup_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-4944C190.04,-4944 222.94,-4944 251.9,-4944"/>
-<polygon fill="#000000" stroke="#000000" points="251.97,-4947.5 261.97,-4944 251.97,-4940.5 251.97,-4947.5"/>
+<!-- proc~rmvs_setup_initialize_system&#45;&gt;whm_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge66" class="edge">
+<title>proc~rmvs_setup_initialize_system&#45;&gt;whm_setup_initialize_system</title>
+<path fill="none" stroke="#000000" d="M402.66,-3183.61C429.8,-3181.29 460.66,-3178.65 488.62,-3176.26"/>
+<polygon fill="#000000" stroke="#000000" points="489.11,-3179.73 498.77,-3175.39 488.51,-3172.76 489.11,-3179.73"/>
 </g>
-<!-- interface~symba_setup_tp -->
-<g id="call~~graph~~CallGraph_node57" class="node">
-<title>interface~symba_setup_tp</title>
-<g id="a_call~~graph~~CallGraph_node57"><a xlink:href=".././interface/symba_setup_tp.html" xlink:title="symba_setup_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-5040 51.5,-5040 51.5,-5016 142.5,-5016 142.5,-5040"/>
-<text text-anchor="middle" x="97" y="-5025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_tp</text>
+<!-- proc~helio_drift_body -->
+<g id="call~~graph~~CallGraph_node78" class="node">
+<title>proc~helio_drift_body</title>
+<g id="a_call~~graph~~CallGraph_node78"><a xlink:href=".././proc/helio_drift_body.html" xlink:title="helio_drift_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="883.5,-1975 795.5,-1975 795.5,-1951 883.5,-1951 883.5,-1975"/>
+<text text-anchor="middle" x="839.5" y="-1960.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_body</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_setup_tp -->
-<g id="call~~graph~~CallGraph_node285" class="node">
-<title>proc~symba_setup_tp</title>
-<g id="a_call~~graph~~CallGraph_node285"><a xlink:href=".././proc/symba_setup_tp.html" xlink:title="symba_setup_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-5040 281.5,-5040 281.5,-5016 372.5,-5016 372.5,-5040"/>
-<text text-anchor="middle" x="327" y="-5025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_tp</text>
-</a>
+<!-- drift_all -->
+<g id="call~~graph~~CallGraph_node763" class="node">
+<title>drift_all</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-1975 1067.5,-1975 1067.5,-1951 1121.5,-1951 1121.5,-1975"/>
+<text text-anchor="middle" x="1094.5" y="-1960.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
 </g>
+<!-- proc~helio_drift_body&#45;&gt;drift_all -->
+<g id="call~~graph~~CallGraph_edge67" class="edge">
+<title>proc~helio_drift_body&#45;&gt;drift_all</title>
+<path fill="none" stroke="#000000" d="M883.7,-1963C932.67,-1963 1011.62,-1963 1057.43,-1963"/>
+<polygon fill="#000000" stroke="#000000" points="1057.5,-1966.5 1067.5,-1963 1057.5,-1959.5 1057.5,-1966.5"/>
 </g>
-<!-- interface~symba_setup_tp&#45;&gt;proc~symba_setup_tp -->
-<g id="call~~graph~~CallGraph_edge79" class="edge">
-<title>interface~symba_setup_tp&#45;&gt;proc~symba_setup_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-5028C179.26,-5028 231.61,-5028 270.99,-5028"/>
-<polygon fill="#000000" stroke="#000000" points="271.22,-5031.5 281.22,-5028 271.22,-5024.5 271.22,-5031.5"/>
+<!-- setup_tp -->
+<g id="call~~graph~~CallGraph_node740" class="node">
+<title>setup_tp</title>
+<polygon fill="#777777" stroke="#777777" points="601.5,-4726 547.5,-4726 547.5,-4702 601.5,-4702 601.5,-4726"/>
+<text text-anchor="middle" x="574.5" y="-4711.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
 </g>
-<!-- interface~symba_step_system -->
-<g id="call~~graph~~CallGraph_node58" class="node">
-<title>interface~symba_step_system</title>
-<g id="a_call~~graph~~CallGraph_node58"><a xlink:href=".././interface/symba_step_system.html" xlink:title="symba_step_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="152,-5082 42,-5082 42,-5058 152,-5058 152,-5082"/>
-<text text-anchor="middle" x="97" y="-5067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_system</text>
+<!-- proc~rmvs_setup_tp&#45;&gt;setup_tp -->
+<g id="call~~graph~~CallGraph_edge68" class="edge">
+<title>proc~rmvs_setup_tp&#45;&gt;setup_tp</title>
+<path fill="none" stroke="#000000" d="M368.54,-4739.05C415.44,-4733.31 491.98,-4723.96 537.07,-4718.45"/>
+<polygon fill="#000000" stroke="#000000" points="537.77,-4721.89 547.27,-4717.21 536.92,-4714.94 537.77,-4721.89"/>
+</g>
+<!-- interface~operator(.cross.) -->
+<g id="call~~graph~~CallGraph_node80" class="node">
+<title>interface~operator(.cross.)</title>
+<g id="a_call~~graph~~CallGraph_node80"><a xlink:href=".././interface/operator%28.cross.%29.html" xlink:title="operator(.cross.)">
+<polygon fill="#a7506f" stroke="#a7506f" points="143,-6130 51,-6130 51,-6106 143,-6106 143,-6130"/>
+<text text-anchor="middle" x="97" y="-6115.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator(.cross.)</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_step_system -->
-<g id="call~~graph~~CallGraph_node599" class="node">
-<title>proc~symba_step_system</title>
-<g id="a_call~~graph~~CallGraph_node599"><a xlink:href=".././proc/symba_step_system.html" xlink:title="symba_step_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="382,-5082 272,-5082 272,-5058 382,-5058 382,-5082"/>
-<text text-anchor="middle" x="327" y="-5067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_system</text>
+<!-- proc~tides_derivs_init -->
+<g id="call~~graph~~CallGraph_node81" class="node">
+<title>proc~tides_derivs_init</title>
+<g id="a_call~~graph~~CallGraph_node81"><a xlink:href=".././proc/tides_derivs_init.html" xlink:title="tides_derivs_init">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="371.5,-6172 282.5,-6172 282.5,-6148 371.5,-6148 371.5,-6172"/>
+<text text-anchor="middle" x="327" y="-6157.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_derivs_init</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_step_system&#45;&gt;proc~symba_step_system -->
-<g id="call~~graph~~CallGraph_edge80" class="edge">
-<title>interface~symba_step_system&#45;&gt;proc~symba_step_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M152.03,-5070C184.99,-5070 227.3,-5070 261.94,-5070"/>
-<polygon fill="#000000" stroke="#000000" points="261.96,-5073.5 271.96,-5070 261.96,-5066.5 261.96,-5073.5"/>
-</g>
-<!-- interface~symba_step_interp_system -->
-<g id="call~~graph~~CallGraph_node59" class="node">
-<title>interface~symba_step_interp_system</title>
-<g id="a_call~~graph~~CallGraph_node59"><a xlink:href=".././interface/symba_step_interp_system.html" xlink:title="symba_step_interp_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="168.5,-5124 25.5,-5124 25.5,-5100 168.5,-5100 168.5,-5124"/>
-<text text-anchor="middle" x="97" y="-5109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_interp_system</text>
+<!-- interface~util_spill_body -->
+<g id="call~~graph~~CallGraph_node82" class="node">
+<title>interface~util_spill_body</title>
+<g id="a_call~~graph~~CallGraph_node82"><a xlink:href=".././interface/util_spill_body.html" xlink:title="util_spill_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="614,-6235 535,-6235 535,-6211 614,-6211 614,-6235"/>
+<text text-anchor="middle" x="574.5" y="-6220.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_step_interp_system -->
-<g id="call~~graph~~CallGraph_node611" class="node">
-<title>proc~symba_step_interp_system</title>
-<g id="a_call~~graph~~CallGraph_node611"><a xlink:href=".././proc/symba_step_interp_system.html" xlink:title="symba_step_interp_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="398.5,-5124 255.5,-5124 255.5,-5100 398.5,-5100 398.5,-5124"/>
-<text text-anchor="middle" x="327" y="-5109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_interp_system</text>
+<!-- proc~util_spill_body -->
+<g id="call~~graph~~CallGraph_node275" class="node">
+<title>proc~util_spill_body</title>
+<g id="a_call~~graph~~CallGraph_node275"><a xlink:href=".././proc/util_spill_body.html" xlink:title="util_spill_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="879,-6235 800,-6235 800,-6211 879,-6211 879,-6235"/>
+<text text-anchor="middle" x="839.5" y="-6220.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_step_interp_system&#45;&gt;proc~symba_step_interp_system -->
-<g id="call~~graph~~CallGraph_edge81" class="edge">
-<title>interface~symba_step_interp_system&#45;&gt;proc~symba_step_interp_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-5112C192.83,-5112 220.17,-5112 245.17,-5112"/>
-<polygon fill="#000000" stroke="#000000" points="245.36,-5115.5 255.36,-5112 245.36,-5108.5 245.36,-5115.5"/>
+<!-- interface~util_spill_body&#45;&gt;proc~util_spill_body -->
+<g id="call~~graph~~CallGraph_edge69" class="edge">
+<title>interface~util_spill_body&#45;&gt;proc~util_spill_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.02,-6223C660.61,-6223 739.07,-6223 789.8,-6223"/>
+<polygon fill="#000000" stroke="#000000" points="789.87,-6226.5 799.87,-6223 789.87,-6219.5 789.87,-6226.5"/>
 </g>
-<!-- interface~symba_step_set_recur_levels_system -->
-<g id="call~~graph~~CallGraph_node60" class="node">
-<title>interface~symba_step_set_recur_levels_system</title>
-<g id="a_call~~graph~~CallGraph_node60"><a xlink:href=".././interface/symba_step_set_recur_levels_system.html" xlink:title="symba_step_set_recur_levels_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="194,-5166 0,-5166 0,-5142 194,-5142 194,-5166"/>
-<text text-anchor="middle" x="97" y="-5151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_set_recur_levels_system</text>
+<!-- interface~util_spill_encounter -->
+<g id="call~~graph~~CallGraph_node83" class="node">
+<title>interface~util_spill_encounter</title>
+<g id="a_call~~graph~~CallGraph_node83"><a xlink:href=".././interface/util_spill_encounter.html" xlink:title="util_spill_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="626.5,-6315 522.5,-6315 522.5,-6291 626.5,-6291 626.5,-6315"/>
+<text text-anchor="middle" x="574.5" y="-6300.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_step_set_recur_levels_system -->
-<g id="call~~graph~~CallGraph_node609" class="node">
-<title>proc~symba_step_set_recur_levels_system</title>
-<g id="a_call~~graph~~CallGraph_node609"><a xlink:href=".././proc/symba_step_set_recur_levels_system.html" xlink:title="symba_step_set_recur_levels_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="424,-5166 230,-5166 230,-5142 424,-5142 424,-5166"/>
-<text text-anchor="middle" x="327" y="-5151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_set_recur_levels_system</text>
+<!-- proc~util_spill_encounter -->
+<g id="call~~graph~~CallGraph_node353" class="node">
+<title>proc~util_spill_encounter</title>
+<g id="a_call~~graph~~CallGraph_node353"><a xlink:href=".././proc/util_spill_encounter.html" xlink:title="util_spill_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="891.5,-6315 787.5,-6315 787.5,-6291 891.5,-6291 891.5,-6315"/>
+<text text-anchor="middle" x="839.5" y="-6300.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_step_set_recur_levels_system&#45;&gt;proc~symba_step_set_recur_levels_system -->
-<g id="call~~graph~~CallGraph_edge82" class="edge">
-<title>interface~symba_step_set_recur_levels_system&#45;&gt;proc~symba_step_set_recur_levels_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M194.03,-5154C202.52,-5154 211.14,-5154 219.7,-5154"/>
-<polygon fill="#000000" stroke="#000000" points="219.71,-5157.5 229.71,-5154 219.71,-5150.5 219.71,-5157.5"/>
+<!-- interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter -->
+<g id="call~~graph~~CallGraph_edge70" class="edge">
+<title>interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.52,-6303C669.57,-6303 731.32,-6303 777.08,-6303"/>
+<polygon fill="#000000" stroke="#000000" points="777.17,-6306.5 787.17,-6303 777.17,-6299.5 777.17,-6306.5"/>
 </g>
-<!-- proc~fraggle_regime_colliders -->
-<g id="call~~graph~~CallGraph_node61" class="node">
-<title>proc~fraggle_regime_colliders</title>
-<g id="a_call~~graph~~CallGraph_node61"><a xlink:href=".././proc/fraggle_regime_colliders.html" xlink:title="fraggle_regime_colliders">
-<polygon fill="#d9534f" stroke="#d9534f" points="392,-5208 262,-5208 262,-5184 392,-5184 392,-5208"/>
-<text text-anchor="middle" x="327" y="-5193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_colliders</text>
+<!-- proc~orbel_el2xv -->
+<g id="call~~graph~~CallGraph_node84" class="node">
+<title>proc~orbel_el2xv</title>
+<g id="a_call~~graph~~CallGraph_node84"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
+<polygon fill="#d9534f" stroke="#d9534f" points="608,-3754 541,-3754 541,-3730 608,-3730 608,-3754"/>
+<text text-anchor="middle" x="574.5" y="-3739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_io_log_regime -->
-<g id="call~~graph~~CallGraph_node163" class="node">
-<title>interface~fraggle_io_log_regime</title>
-<g id="a_call~~graph~~CallGraph_node163"><a xlink:href=".././interface/fraggle_io_log_regime.html" xlink:title="fraggle_io_log_regime">
-<polygon fill="#a7506f" stroke="#a7506f" points="634,-5208 515,-5208 515,-5184 634,-5184 634,-5208"/>
-<text text-anchor="middle" x="574.5" y="-5193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_regime</text>
-</a>
-</g>
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
+<g id="call~~graph~~CallGraph_edge74" class="edge">
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
+<path fill="none" stroke="#000000" d="M606.96,-3729.92C654.58,-3711.63 744.98,-3676.92 797.63,-3656.7"/>
+<polygon fill="#000000" stroke="#000000" points="798.92,-3659.95 807,-3653.1 796.41,-3653.41 798.92,-3659.95"/>
 </g>
-<!-- proc~fraggle_regime_colliders&#45;&gt;interface~fraggle_io_log_regime -->
-<g id="call~~graph~~CallGraph_edge83" class="edge">
-<title>proc~fraggle_regime_colliders&#45;&gt;interface~fraggle_io_log_regime</title>
-<path fill="none" stroke="#000000" d="M392.18,-5196C426.71,-5196 469.3,-5196 504.53,-5196"/>
-<polygon fill="#000000" stroke="#000000" points="504.74,-5199.5 514.74,-5196 504.74,-5192.5 504.74,-5199.5"/>
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
+<g id="call~~graph~~CallGraph_edge73" class="edge">
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
+<path fill="none" stroke="#000000" d="M596.93,-3754.15C625.21,-3769.45 677.04,-3794.94 725,-3805 932.88,-3848.6 1189.13,-3829.74 1292.28,-3819.27"/>
+<polygon fill="#000000" stroke="#000000" points="1292.77,-3822.74 1302.36,-3818.22 1292.05,-3815.77 1292.77,-3822.74"/>
 </g>
-<!-- interface~symba_step_recur_system -->
-<g id="call~~graph~~CallGraph_node62" class="node">
-<title>interface~symba_step_recur_system</title>
-<g id="a_call~~graph~~CallGraph_node62"><a xlink:href=".././interface/symba_step_recur_system.html" xlink:title="symba_step_recur_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="645,-1188 504,-1188 504,-1164 645,-1164 645,-1188"/>
-<text text-anchor="middle" x="574.5" y="-1173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_recur_system</text>
+<!-- proc~orbel_zget -->
+<g id="call~~graph~~CallGraph_node99" class="node">
+<title>proc~orbel_zget</title>
+<g id="a_call~~graph~~CallGraph_node99"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="871,-3796 808,-3796 808,-3772 871,-3772 871,-3796"/>
+<text text-anchor="middle" x="839.5" y="-3781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_step_recur_system -->
-<g id="call~~graph~~CallGraph_node612" class="node">
-<title>proc~symba_step_recur_system</title>
-<g id="a_call~~graph~~CallGraph_node612"><a xlink:href=".././proc/symba_step_recur_system.html" xlink:title="symba_step_recur_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="910,-1184 769,-1184 769,-1160 910,-1160 910,-1184"/>
-<text text-anchor="middle" x="839.5" y="-1169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_recur_system</text>
-</a>
-</g>
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
+<g id="call~~graph~~CallGraph_edge71" class="edge">
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
+<path fill="none" stroke="#000000" d="M608.01,-3747.19C655.94,-3754.85 745.52,-3769.15 797.76,-3777.49"/>
+<polygon fill="#000000" stroke="#000000" points="797.27,-3780.96 807.69,-3779.08 798.37,-3774.05 797.27,-3780.96"/>
 </g>
-<!-- interface~symba_step_recur_system&#45;&gt;proc~symba_step_recur_system -->
-<g id="call~~graph~~CallGraph_edge84" class="edge">
-<title>interface~symba_step_recur_system&#45;&gt;proc~symba_step_recur_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.29,-1174.94C680.2,-1174.41 722.62,-1173.76 758.81,-1173.21"/>
-<polygon fill="#000000" stroke="#000000" points="758.9,-1176.71 768.84,-1173.06 758.79,-1169.71 758.9,-1176.71"/>
+<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
+<g id="call~~graph~~CallGraph_edge75" class="edge">
+<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M608.09,-3736.85C638.33,-3732.21 684.62,-3725.45 725,-3721 935.07,-3697.85 994.34,-3735.72 1199,-3683 1238.59,-3672.8 1280.98,-3652.11 1308.51,-3637.21"/>
+<polygon fill="#000000" stroke="#000000" points="1310.52,-3640.1 1317.59,-3632.22 1307.15,-3633.97 1310.52,-3640.1"/>
 </g>
-<!-- proc~io_param_writer -->
-<g id="call~~graph~~CallGraph_node63" class="node">
-<title>proc~io_param_writer</title>
-<g id="a_call~~graph~~CallGraph_node63"><a xlink:href=".././proc/io_param_writer.html" xlink:title="io_param_writer">
-<polygon fill="#d9534f" stroke="#d9534f" points="372,-5269 282,-5269 282,-5245 372,-5245 372,-5269"/>
-<text text-anchor="middle" x="327" y="-5254.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_writer</text>
+<!-- proc~orbel_fhybrid -->
+<g id="call~~graph~~CallGraph_node483" class="node">
+<title>proc~orbel_fhybrid</title>
+<g id="a_call~~graph~~CallGraph_node483"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="877,-3754 802,-3754 802,-3730 877,-3730 877,-3754"/>
+<text text-anchor="middle" x="839.5" y="-3739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
 </a>
 </g>
 </g>
-<!-- proc~walltime_finish -->
-<g id="call~~graph~~CallGraph_node64" class="node">
-<title>proc~walltime_finish</title>
-<g id="a_call~~graph~~CallGraph_node64"><a xlink:href=".././proc/walltime_finish.html" xlink:title="walltime_finish">
-<polygon fill="#d9534f" stroke="#d9534f" points="138,-5320 56,-5320 56,-5296 138,-5296 138,-5320"/>
-<text text-anchor="middle" x="97" y="-5305.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_finish</text>
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
+<g id="call~~graph~~CallGraph_edge72" class="edge">
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
+<path fill="none" stroke="#000000" d="M608.01,-3742C654.14,-3742 738.83,-3742 791.71,-3742"/>
+<polygon fill="#000000" stroke="#000000" points="791.84,-3745.5 801.84,-3742 791.84,-3738.5 791.84,-3745.5"/>
+</g>
+<!-- interface~operator(.mag.) -->
+<g id="call~~graph~~CallGraph_node85" class="node">
+<title>interface~operator(.mag.)</title>
+<g id="a_call~~graph~~CallGraph_node85"><a xlink:href=".././interface/operator%28.mag.%29.html" xlink:title="operator(.mag.)">
+<polygon fill="#a7506f" stroke="#a7506f" points="141,-6307 53,-6307 53,-6283 141,-6283 141,-6307"/>
+<text text-anchor="middle" x="97" y="-6292.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator(.mag.)</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_step_reset_system -->
-<g id="call~~graph~~CallGraph_node65" class="node">
-<title>interface~symba_step_reset_system</title>
-<g id="a_call~~graph~~CallGraph_node65"><a xlink:href=".././interface/symba_step_reset_system.html" xlink:title="symba_step_reset_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="167,-5367 27,-5367 27,-5343 167,-5343 167,-5367"/>
-<text text-anchor="middle" x="97" y="-5352.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_reset_system</text>
+<!-- interface~util_spill_pl -->
+<g id="call~~graph~~CallGraph_node86" class="node">
+<title>interface~util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node86"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="129,-6265 65,-6265 65,-6241 129,-6241 129,-6265"/>
+<text text-anchor="middle" x="97" y="-6250.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_step_reset_system -->
-<g id="call~~graph~~CallGraph_node617" class="node">
-<title>proc~symba_step_reset_system</title>
-<g id="a_call~~graph~~CallGraph_node617"><a xlink:href=".././proc/symba_step_reset_system.html" xlink:title="symba_step_reset_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="397,-5367 257,-5367 257,-5343 397,-5343 397,-5367"/>
-<text text-anchor="middle" x="327" y="-5352.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_reset_system</text>
+<!-- proc~util_spill_pl -->
+<g id="call~~graph~~CallGraph_node623" class="node">
+<title>proc~util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node623"><a xlink:href=".././proc/util_spill_pl.html" xlink:title="util_spill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="359,-6265 295,-6265 295,-6241 359,-6241 359,-6265"/>
+<text text-anchor="middle" x="327" y="-6250.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_step_reset_system&#45;&gt;proc~symba_step_reset_system -->
-<g id="call~~graph~~CallGraph_edge85" class="edge">
-<title>interface~symba_step_reset_system&#45;&gt;proc~symba_step_reset_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M167.03,-5355C192.13,-5355 220.71,-5355 246.64,-5355"/>
-<polygon fill="#000000" stroke="#000000" points="246.82,-5358.5 256.82,-5355 246.82,-5351.5 246.82,-5358.5"/>
+<!-- interface~util_spill_pl&#45;&gt;proc~util_spill_pl -->
+<g id="call~~graph~~CallGraph_edge76" class="edge">
+<title>interface~util_spill_pl&#45;&gt;proc~util_spill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-6253C169.53,-6253 239.8,-6253 284.55,-6253"/>
+<polygon fill="#000000" stroke="#000000" points="284.79,-6256.5 294.79,-6253 284.79,-6249.5 284.79,-6256.5"/>
 </g>
-<!-- interface~util_spill -->
-<g id="call~~graph~~CallGraph_node66" class="node">
-<title>interface~util_spill</title>
-<g id="a_call~~graph~~CallGraph_node66"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-1636 1067.5,-1636 1067.5,-1612 1121.5,-1612 1121.5,-1636"/>
-<text text-anchor="middle" x="1094.5" y="-1621.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<!-- interface~util_spill_tp -->
+<g id="call~~graph~~CallGraph_node87" class="node">
+<title>interface~util_spill_tp</title>
+<g id="a_call~~graph~~CallGraph_node87"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="129.5,-6214 64.5,-6214 64.5,-6190 129.5,-6190 129.5,-6214"/>
+<text text-anchor="middle" x="97" y="-6199.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~walltime_reset -->
-<g id="call~~graph~~CallGraph_node67" class="node">
-<title>proc~walltime_reset</title>
-<g id="a_call~~graph~~CallGraph_node67"><a xlink:href=".././proc/walltime_reset.html" xlink:title="walltime_reset">
-<polygon fill="#d9534f" stroke="#d9534f" points="137.5,-5427 56.5,-5427 56.5,-5403 137.5,-5403 137.5,-5427"/>
-<text text-anchor="middle" x="97" y="-5412.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_reset</text>
+<!-- proc~util_spill_tp -->
+<g id="call~~graph~~CallGraph_node627" class="node">
+<title>proc~util_spill_tp</title>
+<g id="a_call~~graph~~CallGraph_node627"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="359.5,-6214 294.5,-6214 294.5,-6190 359.5,-6190 359.5,-6214"/>
+<text text-anchor="middle" x="327" y="-6199.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_resize_merger -->
-<g id="call~~graph~~CallGraph_node68" class="node">
-<title>interface~symba_util_resize_merger</title>
-<g id="a_call~~graph~~CallGraph_node68"><a xlink:href=".././interface/symba_util_resize_merger.html" xlink:title="symba_util_resize_merger">
-<polygon fill="#a7506f" stroke="#a7506f" points="166.5,-5471 27.5,-5471 27.5,-5447 166.5,-5447 166.5,-5471"/>
-<text text-anchor="middle" x="97" y="-5456.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_merger</text>
+<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
+<g id="call~~graph~~CallGraph_edge77" class="edge">
+<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.7,-6202C169.92,-6202 239.38,-6202 283.98,-6202"/>
+<polygon fill="#000000" stroke="#000000" points="284.2,-6205.5 294.2,-6202 284.2,-6198.5 284.2,-6205.5"/>
+</g>
+<!-- proc~util_resize_arr_dpvec -->
+<g id="call~~graph~~CallGraph_node88" class="node">
+<title>proc~util_resize_arr_dpvec</title>
+<g id="a_call~~graph~~CallGraph_node88"><a xlink:href=".././proc/util_resize_arr_dpvec.html" xlink:title="util_resize_arr_DPvec">
+<polygon fill="#d9534f" stroke="#d9534f" points="155.5,-6349 38.5,-6349 38.5,-6325 155.5,-6325 155.5,-6349"/>
+<text text-anchor="middle" x="97" y="-6334.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_DPvec</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_resize_merger -->
-<g id="call~~graph~~CallGraph_node302" class="node">
-<title>proc~symba_util_resize_merger</title>
-<g id="a_call~~graph~~CallGraph_node302"><a xlink:href=".././proc/symba_util_resize_merger.html" xlink:title="symba_util_resize_merger">
-<polygon fill="#d9534f" stroke="#d9534f" points="396.5,-5471 257.5,-5471 257.5,-5447 396.5,-5447 396.5,-5471"/>
-<text text-anchor="middle" x="327" y="-5456.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_merger</text>
+<!-- proc~symba_step_reset_system -->
+<g id="call~~graph~~CallGraph_node89" class="node">
+<title>proc~symba_step_reset_system</title>
+<g id="a_call~~graph~~CallGraph_node89"><a xlink:href=".././proc/symba_step_reset_system.html" xlink:title="symba_step_reset_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="397,-6391 257,-6391 257,-6367 397,-6367 397,-6391"/>
+<text text-anchor="middle" x="327" y="-6376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_reset_system</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_resize_merger&#45;&gt;proc~symba_util_resize_merger -->
-<g id="call~~graph~~CallGraph_edge86" class="edge">
-<title>interface~symba_util_resize_merger&#45;&gt;proc~symba_util_resize_merger</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.72,-5459C192.07,-5459 220.98,-5459 247.16,-5459"/>
-<polygon fill="#000000" stroke="#000000" points="247.42,-5462.5 257.42,-5459 247.42,-5455.5 247.42,-5462.5"/>
-</g>
-<!-- interface~symba_util_resize_pl -->
-<g id="call~~graph~~CallGraph_node69" class="node">
-<title>interface~symba_util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node69"><a xlink:href=".././interface/symba_util_resize_pl.html" xlink:title="symba_util_resize_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-5376 518.5,-5376 518.5,-5352 630.5,-5352 630.5,-5376"/>
-<text text-anchor="middle" x="574.5" y="-5361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_pl</text>
+<!-- interface~util_valid_id_system -->
+<g id="call~~graph~~CallGraph_node90" class="node">
+<title>interface~util_valid_id_system</title>
+<g id="a_call~~graph~~CallGraph_node90"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="628.5,-351 520.5,-351 520.5,-327 628.5,-327 628.5,-351"/>
+<text text-anchor="middle" x="574.5" y="-336.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_resize_pl -->
-<g id="call~~graph~~CallGraph_node315" class="node">
-<title>proc~symba_util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node315"><a xlink:href=".././proc/symba_util_resize_pl.html" xlink:title="symba_util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-5376 783.5,-5376 783.5,-5352 895.5,-5352 895.5,-5376"/>
-<text text-anchor="middle" x="839.5" y="-5361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_pl</text>
+<!-- proc~util_valid_id_system -->
+<g id="call~~graph~~CallGraph_node633" class="node">
+<title>proc~util_valid_id_system</title>
+<g id="a_call~~graph~~CallGraph_node633"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="893.5,-351 785.5,-351 785.5,-327 893.5,-327 893.5,-351"/>
+<text text-anchor="middle" x="839.5" y="-336.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl -->
-<g id="call~~graph~~CallGraph_edge87" class="edge">
-<title>interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-5364C672.19,-5364 729.31,-5364 773.16,-5364"/>
-<polygon fill="#000000" stroke="#000000" points="773.44,-5367.5 783.44,-5364 773.44,-5360.5 773.44,-5367.5"/>
+<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
+<g id="call~~graph~~CallGraph_edge78" class="edge">
+<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M628.72,-339C671.05,-339 730.4,-339 775.17,-339"/>
+<polygon fill="#000000" stroke="#000000" points="775.36,-342.5 785.36,-339 775.36,-335.5 775.36,-342.5"/>
 </g>
-<!-- interface~symba_util_resize_tp -->
-<g id="call~~graph~~CallGraph_node70" class="node">
-<title>interface~symba_util_resize_tp</title>
-<g id="a_call~~graph~~CallGraph_node70"><a xlink:href=".././interface/symba_util_resize_tp.html" xlink:title="symba_util_resize_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="631,-5418 518,-5418 518,-5394 631,-5394 631,-5418"/>
-<text text-anchor="middle" x="574.5" y="-5403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_tp</text>
+<!-- interface~util_version -->
+<g id="call~~graph~~CallGraph_node91" class="node">
+<title>interface~util_version</title>
+<g id="a_call~~graph~~CallGraph_node91"><a xlink:href=".././interface/util_version.html" xlink:title="util_version">
+<polygon fill="#a7506f" stroke="#a7506f" points="1128,-636 1061,-636 1061,-612 1128,-612 1128,-636"/>
+<text text-anchor="middle" x="1094.5" y="-621.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_resize_tp -->
-<g id="call~~graph~~CallGraph_node318" class="node">
-<title>proc~symba_util_resize_tp</title>
-<g id="a_call~~graph~~CallGraph_node318"><a xlink:href=".././proc/symba_util_resize_tp.html" xlink:title="symba_util_resize_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="896,-5418 783,-5418 783,-5394 896,-5394 896,-5418"/>
-<text text-anchor="middle" x="839.5" y="-5403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_tp</text>
+<!-- proc~util_version -->
+<g id="call~~graph~~CallGraph_node622" class="node">
+<title>proc~util_version</title>
+<g id="a_call~~graph~~CallGraph_node622"><a xlink:href=".././proc/util_version.html" xlink:title="util_version">
+<polygon fill="#d9534f" stroke="#d9534f" points="1373,-636 1306,-636 1306,-612 1373,-612 1373,-636"/>
+<text text-anchor="middle" x="1339.5" y="-621.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_resize_tp&#45;&gt;proc~symba_util_resize_tp -->
-<g id="call~~graph~~CallGraph_edge88" class="edge">
-<title>interface~symba_util_resize_tp&#45;&gt;proc~symba_util_resize_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.28,-5406C672.59,-5406 729.05,-5406 772.59,-5406"/>
-<polygon fill="#000000" stroke="#000000" points="772.8,-5409.5 782.8,-5406 772.8,-5402.5 772.8,-5409.5"/>
+<!-- interface~util_version&#45;&gt;proc~util_version -->
+<g id="call~~graph~~CallGraph_edge79" class="edge">
+<title>interface~util_version&#45;&gt;proc~util_version</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1128.02,-624C1171.27,-624 1247.83,-624 1295.73,-624"/>
+<polygon fill="#000000" stroke="#000000" points="1295.78,-627.5 1305.78,-624 1295.78,-620.5 1295.78,-627.5"/>
 </g>
-<!-- interface~symba_util_sort_pl -->
-<g id="call~~graph~~CallGraph_node71" class="node">
-<title>interface~symba_util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node71"><a xlink:href=".././interface/symba_util_sort_pl.html" xlink:title="symba_util_sort_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="148,-5572 46,-5572 46,-5548 148,-5548 148,-5572"/>
-<text text-anchor="middle" x="97" y="-5557.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_pl</text>
+<!-- proc~helio_drift_pl -->
+<g id="call~~graph~~CallGraph_node92" class="node">
+<title>proc~helio_drift_pl</title>
+<g id="a_call~~graph~~CallGraph_node92"><a xlink:href=".././proc/helio_drift_pl.html" xlink:title="helio_drift_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="363.5,-1996 290.5,-1996 290.5,-1972 363.5,-1972 363.5,-1996"/>
+<text text-anchor="middle" x="327" y="-1981.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_sort_pl -->
-<g id="call~~graph~~CallGraph_node324" class="node">
-<title>proc~symba_util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node324"><a xlink:href=".././proc/symba_util_sort_pl.html" xlink:title="symba_util_sort_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="378,-5572 276,-5572 276,-5548 378,-5548 378,-5572"/>
-<text text-anchor="middle" x="327" y="-5557.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_pl</text>
+<!-- interface~helio_drift_body -->
+<g id="call~~graph~~CallGraph_node656" class="node">
+<title>interface~helio_drift_body</title>
+<g id="a_call~~graph~~CallGraph_node656"><a xlink:href=".././interface/helio_drift_body.html" xlink:title="helio_drift_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="618.5,-1975 530.5,-1975 530.5,-1951 618.5,-1951 618.5,-1975"/>
+<text text-anchor="middle" x="574.5" y="-1960.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_body</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_sort_pl&#45;&gt;proc~symba_util_sort_pl -->
-<g id="call~~graph~~CallGraph_edge89" class="edge">
-<title>interface~symba_util_sort_pl&#45;&gt;proc~symba_util_sort_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.04,-5560C182.66,-5560 228.93,-5560 265.61,-5560"/>
-<polygon fill="#000000" stroke="#000000" points="265.69,-5563.5 275.69,-5560 265.69,-5556.5 265.69,-5563.5"/>
+<!-- proc~helio_drift_pl&#45;&gt;interface~helio_drift_body -->
+<g id="call~~graph~~CallGraph_edge80" class="edge">
+<title>proc~helio_drift_pl&#45;&gt;interface~helio_drift_body</title>
+<path fill="none" stroke="#000000" d="M363.7,-1980.95C404.83,-1977.43 472.83,-1971.61 520.23,-1967.56"/>
+<polygon fill="#000000" stroke="#000000" points="520.65,-1971.03 530.31,-1966.69 520.05,-1964.06 520.65,-1971.03"/>
 </g>
-<!-- proc~walltime_start -->
-<g id="call~~graph~~CallGraph_node72" class="node">
-<title>proc~walltime_start</title>
-<g id="a_call~~graph~~CallGraph_node72"><a xlink:href=".././proc/walltime_start.html" xlink:title="walltime_start">
-<polygon fill="#d9534f" stroke="#d9534f" points="136,-5614 58,-5614 58,-5590 136,-5590 136,-5614"/>
-<text text-anchor="middle" x="97" y="-5599.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_start</text>
+<!-- proc~helio_drift_tp -->
+<g id="call~~graph~~CallGraph_node93" class="node">
+<title>proc~helio_drift_tp</title>
+<g id="a_call~~graph~~CallGraph_node93"><a xlink:href=".././proc/helio_drift_tp.html" xlink:title="helio_drift_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="364,-1954 290,-1954 290,-1930 364,-1930 364,-1954"/>
+<text text-anchor="middle" x="327" y="-1939.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_sort_tp -->
-<g id="call~~graph~~CallGraph_node73" class="node">
-<title>interface~symba_util_sort_tp</title>
-<g id="a_call~~graph~~CallGraph_node73"><a xlink:href=".././interface/symba_util_sort_tp.html" xlink:title="symba_util_sort_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="148.5,-5698 45.5,-5698 45.5,-5674 148.5,-5674 148.5,-5698"/>
-<text text-anchor="middle" x="97" y="-5683.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_tp</text>
+<!-- proc~helio_drift_tp&#45;&gt;interface~helio_drift_body -->
+<g id="call~~graph~~CallGraph_edge81" class="edge">
+<title>proc~helio_drift_tp&#45;&gt;interface~helio_drift_body</title>
+<path fill="none" stroke="#000000" d="M364.22,-1945.1C405.35,-1948.62 472.86,-1954.39 520.04,-1958.43"/>
+<polygon fill="#000000" stroke="#000000" points="519.82,-1961.92 530.08,-1959.29 520.42,-1954.95 519.82,-1961.92"/>
+</g>
+<!-- proc~util_resize_arr_dp -->
+<g id="call~~graph~~CallGraph_node94" class="node">
+<title>proc~util_resize_arr_dp</title>
+<g id="a_call~~graph~~CallGraph_node94"><a xlink:href=".././proc/util_resize_arr_dp.html" xlink:title="util_resize_arr_DP">
+<polygon fill="#d9534f" stroke="#d9534f" points="147,-6433 47,-6433 47,-6409 147,-6409 147,-6433"/>
+<text text-anchor="middle" x="97" y="-6418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_DP</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_sort_tp -->
-<g id="call~~graph~~CallGraph_node327" class="node">
-<title>proc~symba_util_sort_tp</title>
-<g id="a_call~~graph~~CallGraph_node327"><a xlink:href=".././proc/symba_util_sort_tp.html" xlink:title="symba_util_sort_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-5698 275.5,-5698 275.5,-5674 378.5,-5674 378.5,-5698"/>
-<text text-anchor="middle" x="327" y="-5683.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_tp</text>
+<!-- proc~rmvs_interp_out -->
+<g id="call~~graph~~CallGraph_node98" class="node">
+<title>proc~rmvs_interp_out</title>
+<g id="a_call~~graph~~CallGraph_node98"><a xlink:href=".././proc/rmvs_interp_out.html" xlink:title="rmvs_interp_out">
+<polygon fill="#d9534f" stroke="#d9534f" points="619.5,-2517 529.5,-2517 529.5,-2493 619.5,-2493 619.5,-2517"/>
+<text text-anchor="middle" x="574.5" y="-2502.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_out</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_sort_tp&#45;&gt;proc~symba_util_sort_tp -->
-<g id="call~~graph~~CallGraph_edge90" class="edge">
-<title>interface~symba_util_sort_tp&#45;&gt;proc~symba_util_sort_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.6,-5686C183.02,-5686 228.74,-5686 265.14,-5686"/>
-<polygon fill="#000000" stroke="#000000" points="265.15,-5689.5 275.15,-5686 265.15,-5682.5 265.15,-5689.5"/>
+<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out -->
+<g id="call~~graph~~CallGraph_edge84" class="edge">
+<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out</title>
+<path fill="none" stroke="#000000" d="M339.03,-2391.04C360.17,-2413.28 408.84,-2460.69 460,-2484 478.48,-2492.42 500.11,-2497.46 519.51,-2500.48"/>
+<polygon fill="#000000" stroke="#000000" points="519.03,-2503.95 529.42,-2501.89 520.01,-2497.02 519.03,-2503.95"/>
 </g>
-<!-- interface~walltime_finish -->
-<g id="call~~graph~~CallGraph_node75" class="node">
-<title>interface~walltime_finish</title>
-<g id="a_call~~graph~~CallGraph_node75"><a xlink:href=".././interface/walltime_finish.html" xlink:title="walltime_finish">
-<polygon fill="#a7506f" stroke="#a7506f" points="138,-5740 56,-5740 56,-5716 138,-5716 138,-5740"/>
-<text text-anchor="middle" x="97" y="-5725.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_finish</text>
+<!-- proc~rmvs_step_out -->
+<g id="call~~graph~~CallGraph_node100" class="node">
+<title>proc~rmvs_step_out</title>
+<g id="a_call~~graph~~CallGraph_node100"><a xlink:href=".././proc/rmvs_step_out.html" xlink:title="rmvs_step_out">
+<polygon fill="#d9534f" stroke="#d9534f" points="616,-2391 533,-2391 533,-2367 616,-2367 616,-2391"/>
+<text text-anchor="middle" x="574.5" y="-2376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_out</text>
 </a>
 </g>
 </g>
-<!-- interface~walltime_reset -->
-<g id="call~~graph~~CallGraph_node76" class="node">
-<title>interface~walltime_reset</title>
-<g id="a_call~~graph~~CallGraph_node76"><a xlink:href=".././interface/walltime_reset.html" xlink:title="walltime_reset">
-<polygon fill="#a7506f" stroke="#a7506f" points="137.5,-5782 56.5,-5782 56.5,-5758 137.5,-5758 137.5,-5782"/>
-<text text-anchor="middle" x="97" y="-5767.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_reset</text>
-</a>
+<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out -->
+<g id="call~~graph~~CallGraph_edge82" class="edge">
+<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out</title>
+<path fill="none" stroke="#000000" d="M378.27,-2379C420.39,-2379 480.25,-2379 522.55,-2379"/>
+<polygon fill="#000000" stroke="#000000" points="522.64,-2382.5 532.64,-2379 522.64,-2375.5 522.64,-2382.5"/>
 </g>
+<!-- proc~rmvs_step_system&#45;&gt;whm_step_system -->
+<g id="call~~graph~~CallGraph_edge83" class="edge">
+<title>proc~rmvs_step_system&#45;&gt;whm_step_system</title>
+<path fill="none" stroke="#000000" d="M331.91,-2366.89C346.69,-2320.55 399.6,-2149.77 424,-2005 432.04,-1957.29 427.54,-1606.89 460,-1571 473.57,-1556 494.09,-1549.56 513.96,-1547.27"/>
+<polygon fill="#000000" stroke="#000000" points="514.27,-1550.76 523.94,-1546.44 513.69,-1543.78 514.27,-1550.76"/>
 </g>
-<!-- interface~walltime_start -->
-<g id="call~~graph~~CallGraph_node77" class="node">
-<title>interface~walltime_start</title>
-<g id="a_call~~graph~~CallGraph_node77"><a xlink:href=".././interface/walltime_start.html" xlink:title="walltime_start">
-<polygon fill="#a7506f" stroke="#a7506f" points="136,-5824 58,-5824 58,-5800 136,-5800 136,-5824"/>
-<text text-anchor="middle" x="97" y="-5809.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_start</text>
+<!-- proc~orbel_scget -->
+<g id="call~~graph~~CallGraph_node96" class="node">
+<title>proc~orbel_scget</title>
+<g id="a_call~~graph~~CallGraph_node96"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#d9534f" stroke="#d9534f" points="1602.5,-3632 1534.5,-3632 1534.5,-3608 1602.5,-3608 1602.5,-3632"/>
+<text text-anchor="middle" x="1568.5" y="-3617.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node78" class="node">
-<title>interface~symba_util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node78"><a xlink:href=".././interface/symba_util_sort_rearrange_pl.html" xlink:title="symba_util_sort_rearrange_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="174.5,-4116 19.5,-4116 19.5,-4092 174.5,-4092 174.5,-4116"/>
-<text text-anchor="middle" x="97" y="-4101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_pl</text>
+<!-- proc~rmvs_step_in -->
+<g id="call~~graph~~CallGraph_node97" class="node">
+<title>proc~rmvs_step_in</title>
+<g id="a_call~~graph~~CallGraph_node97"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
+<polygon fill="#d9534f" stroke="#d9534f" points="877.5,-2185 801.5,-2185 801.5,-2161 877.5,-2161 877.5,-2185"/>
+<text text-anchor="middle" x="839.5" y="-2170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node328" class="node">
-<title>proc~symba_util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node328"><a xlink:href=".././proc/symba_util_sort_rearrange_pl.html" xlink:title="symba_util_sort_rearrange_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-4116 249.5,-4116 249.5,-4092 404.5,-4092 404.5,-4116"/>
-<text text-anchor="middle" x="327" y="-4101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_pl</text>
+<!-- proc~rmvs_make_planetocentric -->
+<g id="call~~graph~~CallGraph_node454" class="node">
+<title>proc~rmvs_make_planetocentric</title>
+<g id="a_call~~graph~~CallGraph_node454"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="1165,-2227 1024,-2227 1024,-2203 1165,-2203 1165,-2227"/>
+<text text-anchor="middle" x="1094.5" y="-2212.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_sort_rearrange_pl&#45;&gt;proc~symba_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_edge91" class="edge">
-<title>interface~symba_util_sort_rearrange_pl&#45;&gt;proc~symba_util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.55,-4104C195.33,-4104 217.97,-4104 239.26,-4104"/>
-<polygon fill="#000000" stroke="#000000" points="239.26,-4107.5 249.26,-4104 239.26,-4100.5 239.26,-4107.5"/>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
+<g id="call~~graph~~CallGraph_edge85" class="edge">
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
+<path fill="none" stroke="#000000" d="M877.56,-2179.15C913.24,-2185.07 968.34,-2194.22 1013.96,-2201.8"/>
+<polygon fill="#000000" stroke="#000000" points="1013.39,-2205.25 1023.83,-2203.43 1014.54,-2198.34 1013.39,-2205.25"/>
 </g>
-<!-- interface~symba_util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_node79" class="node">
-<title>interface~symba_util_sort_rearrange_tp</title>
-<g id="a_call~~graph~~CallGraph_node79"><a xlink:href=".././interface/symba_util_sort_rearrange_tp.html" xlink:title="symba_util_sort_rearrange_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="175,-4200 19,-4200 19,-4176 175,-4176 175,-4200"/>
-<text text-anchor="middle" x="97" y="-4185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_tp</text>
+<!-- proc~rmvs_peri_tp -->
+<g id="call~~graph~~CallGraph_node456" class="node">
+<title>proc~rmvs_peri_tp</title>
+<g id="a_call~~graph~~CallGraph_node456"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="1132,-2185 1057,-2185 1057,-2161 1132,-2161 1132,-2185"/>
+<text text-anchor="middle" x="1094.5" y="-2170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_node333" class="node">
-<title>proc~symba_util_sort_rearrange_tp</title>
-<g id="a_call~~graph~~CallGraph_node333"><a xlink:href=".././proc/symba_util_sort_rearrange_tp.html" xlink:title="symba_util_sort_rearrange_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="405,-4200 249,-4200 249,-4176 405,-4176 405,-4200"/>
-<text text-anchor="middle" x="327" y="-4185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_tp</text>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
+<g id="call~~graph~~CallGraph_edge86" class="edge">
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
+<path fill="none" stroke="#000000" d="M877.56,-2173C922.31,-2173 997.65,-2173 1046.46,-2173"/>
+<polygon fill="#000000" stroke="#000000" points="1046.75,-2176.5 1056.75,-2173 1046.75,-2169.5 1046.75,-2176.5"/>
+</g>
+<!-- proc~rmvs_end_planetocentric -->
+<g id="call~~graph~~CallGraph_node505" class="node">
+<title>proc~rmvs_end_planetocentric</title>
+<g id="a_call~~graph~~CallGraph_node505"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="1161,-2269 1028,-2269 1028,-2245 1161,-2245 1161,-2269"/>
+<text text-anchor="middle" x="1094.5" y="-2254.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_edge92" class="edge">
-<title>interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M175.19,-4188C195.62,-4188 217.81,-4188 238.73,-4188"/>
-<polygon fill="#000000" stroke="#000000" points="238.89,-4191.5 248.89,-4188 238.89,-4184.5 238.89,-4191.5"/>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
+<g id="call~~graph~~CallGraph_edge87" class="edge">
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
+<path fill="none" stroke="#000000" d="M877.67,-2173.65C900.95,-2175.51 930.82,-2180.65 954,-2194 975.3,-2206.27 968.8,-2223.55 990,-2236 998.6,-2241.05 1008.21,-2244.9 1018.02,-2247.84"/>
+<polygon fill="#000000" stroke="#000000" points="1017.3,-2251.27 1027.87,-2250.48 1019.12,-2244.51 1017.3,-2251.27"/>
 </g>
-<!-- proc~io_read_in_body -->
-<g id="call~~graph~~CallGraph_node80" class="node">
-<title>proc~io_read_in_body</title>
-<g id="a_call~~graph~~CallGraph_node80"><a xlink:href=".././proc/io_read_in_body.html" xlink:title="io_read_in_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="373,-5866 281,-5866 281,-5842 373,-5842 373,-5866"/>
-<text text-anchor="middle" x="327" y="-5851.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_body</text>
+<!-- proc~rmvs_interp_out&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge88" class="edge">
+<title>proc~rmvs_interp_out&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M619.66,-2506.79C720.26,-2510.87 964.85,-2520.78 1057.3,-2524.53"/>
+<polygon fill="#000000" stroke="#000000" points="1057.16,-2528.03 1067.3,-2524.94 1057.45,-2521.04 1057.16,-2528.03"/>
+</g>
+<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
+<g id="call~~graph~~CallGraph_edge89" class="edge">
+<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
+<path fill="none" stroke="#000000" d="M616.21,-2381.94C640.41,-2381.4 669.99,-2376.39 689,-2358 742.63,-2306.11 671.37,-2245.89 725,-2194 742.3,-2177.27 768.35,-2171.61 791.13,-2170.32"/>
+<polygon fill="#000000" stroke="#000000" points="791.43,-2173.82 801.32,-2170.01 791.22,-2166.82 791.43,-2173.82"/>
+</g>
+<!-- proc~rmvs_interp_in -->
+<g id="call~~graph~~CallGraph_node106" class="node">
+<title>proc~rmvs_interp_in</title>
+<g id="a_call~~graph~~CallGraph_node106"><a xlink:href=".././proc/rmvs_interp_in.html" xlink:title="rmvs_interp_in">
+<polygon fill="#d9534f" stroke="#d9534f" points="881,-2395 798,-2395 798,-2371 881,-2371 881,-2395"/>
+<text text-anchor="middle" x="839.5" y="-2380.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_vmag_to_vb -->
-<g id="call~~graph~~CallGraph_node81" class="node">
-<title>proc~fraggle_util_vmag_to_vb</title>
-<g id="a_call~~graph~~CallGraph_node81"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1159.5,-1865 1029.5,-1865 1029.5,-1841 1159.5,-1841 1159.5,-1865"/>
-<text text-anchor="middle" x="1094.5" y="-1850.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in -->
+<g id="call~~graph~~CallGraph_edge90" class="edge">
+<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in</title>
+<path fill="none" stroke="#000000" d="M616.02,-2379.62C662.16,-2380.32 737.61,-2381.47 787.66,-2382.23"/>
+<polygon fill="#000000" stroke="#000000" points="787.88,-2385.73 797.94,-2382.38 787.99,-2378.73 787.88,-2385.73"/>
+</g>
+<!-- interface~lambda_obj~2 -->
+<g id="call~~graph~~CallGraph_node101" class="node">
+<title>interface~lambda_obj~2</title>
+<g id="a_call~~graph~~CallGraph_node101"><a xlink:href=".././interface/lambda_obj~2.html" xlink:title="lambda_obj">
+<polygon fill="#a7506f" stroke="#a7506f" points="131,-6475 63,-6475 63,-6451 131,-6451 131,-6475"/>
+<text text-anchor="middle" x="97" y="-6460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_shift_vector_to_origin -->
-<g id="call~~graph~~CallGraph_node196" class="node">
-<title>interface~fraggle_util_shift_vector_to_origin</title>
-<g id="a_call~~graph~~CallGraph_node196"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#a7506f" stroke="#a7506f" points="1426,-1895 1253,-1895 1253,-1871 1426,-1871 1426,-1895"/>
-<text text-anchor="middle" x="1339.5" y="-1880.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+<!-- proc~lambda_init_0 -->
+<g id="call~~graph~~CallGraph_node104" class="node">
+<title>proc~lambda_init_0</title>
+<g id="a_call~~graph~~CallGraph_node104"><a xlink:href=".././proc/lambda_init_0.html" xlink:title="lambda_init_0">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="366.5,-6517 287.5,-6517 287.5,-6493 366.5,-6493 366.5,-6517"/>
+<text text-anchor="middle" x="327" y="-6502.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
+<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0 -->
 <g id="call~~graph~~CallGraph_edge93" class="edge">
-<title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M1159.66,-1860.92C1185.09,-1864.06 1214.85,-1867.73 1242.73,-1871.18"/>
-<polygon fill="#000000" stroke="#000000" points="1242.55,-1874.68 1252.9,-1872.43 1243.4,-1867.73 1242.55,-1874.68"/>
+<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-6469.11C169.65,-6476.2 233.5,-6487.96 277.55,-6496.08"/>
+<polygon fill="#000000" stroke="#000000" points="277,-6499.53 287.47,-6497.9 278.27,-6492.65 277,-6499.53"/>
 </g>
-<!-- interface~operator(.cross.) -->
-<g id="call~~graph~~CallGraph_node82" class="node">
-<title>interface~operator(.cross.)</title>
-<g id="a_call~~graph~~CallGraph_node82"><a xlink:href=".././interface/operator%28.cross.%29.html" xlink:title="operator(.cross.)">
-<polygon fill="#a7506f" stroke="#a7506f" points="143,-5908 51,-5908 51,-5884 143,-5884 143,-5908"/>
-<text text-anchor="middle" x="97" y="-5893.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator(.cross.)</text>
+<!-- proc~lambda_init_0_err -->
+<g id="call~~graph~~CallGraph_node107" class="node">
+<title>proc~lambda_init_0_err</title>
+<g id="a_call~~graph~~CallGraph_node107"><a xlink:href=".././proc/lambda_init_0_err.html" xlink:title="lambda_init_0_err">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="376.5,-6475 277.5,-6475 277.5,-6451 376.5,-6451 376.5,-6475"/>
+<text text-anchor="middle" x="327" y="-6460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0_err</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_args -->
-<g id="call~~graph~~CallGraph_node83" class="node">
-<title>interface~io_get_args</title>
-<g id="a_call~~graph~~CallGraph_node83"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#a7506f" stroke="#a7506f" points="609,-3402 540,-3402 540,-3378 609,-3378 609,-3402"/>
-<text text-anchor="middle" x="574.5" y="-3387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err -->
+<g id="call~~graph~~CallGraph_edge91" class="edge">
+<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-6463C166.71,-6463 223.89,-6463 267.14,-6463"/>
+<polygon fill="#000000" stroke="#000000" points="267.25,-6466.5 277.25,-6463 267.25,-6459.5 267.25,-6466.5"/>
+</g>
+<!-- proc~lambda_init_tvar -->
+<g id="call~~graph~~CallGraph_node116" class="node">
+<title>proc~lambda_init_tvar</title>
+<g id="a_call~~graph~~CallGraph_node116"><a xlink:href=".././proc/lambda_init_tvar.html" xlink:title="lambda_init_tvar">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="372.5,-6433 281.5,-6433 281.5,-6409 372.5,-6409 372.5,-6433"/>
+<text text-anchor="middle" x="327" y="-6418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_tvar</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
-<g id="call~~graph~~CallGraph_edge94" class="edge">
-<title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.08,-3390C656.23,-3390 742.15,-3390 794.41,-3390"/>
-<polygon fill="#000000" stroke="#000000" points="794.71,-3393.5 804.71,-3390 794.71,-3386.5 794.71,-3393.5"/>
+<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_tvar -->
+<g id="call~~graph~~CallGraph_edge92" class="edge">
+<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_tvar</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-6456.89C167.93,-6450.12 227.85,-6439.08 271.54,-6431.03"/>
+<polygon fill="#000000" stroke="#000000" points="272.24,-6434.46 281.44,-6429.21 270.97,-6427.58 272.24,-6434.46"/>
 </g>
-<!-- interface~util_resize -->
-<g id="call~~graph~~CallGraph_node84" class="node">
-<title>interface~util_resize</title>
-<g id="a_call~~graph~~CallGraph_node84"><a xlink:href=".././interface/util_resize.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="1125,-5454 1064,-5454 1064,-5430 1125,-5430 1125,-5454"/>
-<text text-anchor="middle" x="1094.5" y="-5439.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<!-- proc~helio_drift_linear_pl -->
+<g id="call~~graph~~CallGraph_node102" class="node">
+<title>proc~helio_drift_linear_pl</title>
+<g id="a_call~~graph~~CallGraph_node102"><a xlink:href=".././proc/helio_drift_linear_pl.html" xlink:title="helio_drift_linear_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-6559 274,-6559 274,-6535 380,-6535 380,-6559"/>
+<text text-anchor="middle" x="327" y="-6544.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_old_t_final_system -->
-<g id="call~~graph~~CallGraph_node85" class="node">
-<title>interface~io_get_old_t_final_system</title>
-<g id="a_call~~graph~~CallGraph_node85"><a xlink:href=".././interface/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="642.5,-3196 506.5,-3196 506.5,-3172 642.5,-3172 642.5,-3196"/>
-<text text-anchor="middle" x="574.5" y="-3181.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
+<!-- proc~symba_step_system -->
+<g id="call~~graph~~CallGraph_node103" class="node">
+<title>proc~symba_step_system</title>
+<g id="a_call~~graph~~CallGraph_node103"><a xlink:href=".././proc/symba_step_system.html" xlink:title="symba_step_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="382,-6601 272,-6601 272,-6577 382,-6577 382,-6601"/>
+<text text-anchor="middle" x="327" y="-6586.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system -->
-<g id="call~~graph~~CallGraph_edge95" class="edge">
-<title>interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.55,-3184C678.58,-3184 723.18,-3184 760.73,-3184"/>
-<polygon fill="#000000" stroke="#000000" points="761.12,-3187.5 771.12,-3184 761.12,-3180.5 761.12,-3187.5"/>
-</g>
-<!-- interface~symba_util_append_encounter -->
-<g id="call~~graph~~CallGraph_node86" class="node">
-<title>interface~symba_util_append_encounter</title>
-<g id="a_call~~graph~~CallGraph_node86"><a xlink:href=".././interface/symba_util_append_encounter.html" xlink:title="symba_util_append_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="654.5,-608 494.5,-608 494.5,-584 654.5,-584 654.5,-608"/>
-<text text-anchor="middle" x="574.5" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_encounter</text>
-</a>
+<!-- helio_step_system -->
+<g id="call~~graph~~CallGraph_node750" class="node">
+<title>helio_step_system</title>
+<polygon fill="#777777" stroke="#777777" points="625,-6601 524,-6601 524,-6577 625,-6577 625,-6601"/>
+<text text-anchor="middle" x="574.5" y="-6586.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_system</text>
 </g>
+<!-- proc~symba_step_system&#45;&gt;helio_step_system -->
+<g id="call~~graph~~CallGraph_edge94" class="edge">
+<title>proc~symba_step_system&#45;&gt;helio_step_system</title>
+<path fill="none" stroke="#000000" d="M382.18,-6589C421.02,-6589 473.34,-6589 513.46,-6589"/>
+<polygon fill="#000000" stroke="#000000" points="513.64,-6592.5 523.64,-6589 513.64,-6585.5 513.64,-6592.5"/>
 </g>
-<!-- proc~symba_util_append_encounter -->
-<g id="call~~graph~~CallGraph_node304" class="node">
-<title>proc~symba_util_append_encounter</title>
-<g id="a_call~~graph~~CallGraph_node304"><a xlink:href=".././proc/symba_util_append_encounter.html" xlink:title="symba_util_append_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="919.5,-608 759.5,-608 759.5,-584 919.5,-584 919.5,-608"/>
-<text text-anchor="middle" x="839.5" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_encounter</text>
+<!-- proc~helio_drift_linear_tp -->
+<g id="call~~graph~~CallGraph_node105" class="node">
+<title>proc~helio_drift_linear_tp</title>
+<g id="a_call~~graph~~CallGraph_node105"><a xlink:href=".././proc/helio_drift_linear_tp.html" xlink:title="helio_drift_linear_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-6643 274,-6643 274,-6619 380,-6619 380,-6643"/>
+<text text-anchor="middle" x="327" y="-6628.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_append_encounter&#45;&gt;proc~symba_util_append_encounter -->
-<g id="call~~graph~~CallGraph_edge96" class="edge">
-<title>interface~symba_util_append_encounter&#45;&gt;proc~symba_util_append_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.77,-596C684.52,-596 718.55,-596 749.16,-596"/>
-<polygon fill="#000000" stroke="#000000" points="749.4,-599.5 759.4,-596 749.4,-592.5 749.4,-599.5"/>
+<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge95" class="edge">
+<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M881.12,-2383.95C903.84,-2386.03 931.95,-2391.3 954,-2404 975.3,-2416.27 972.18,-2429.06 990,-2446 1014.59,-2469.38 1045.74,-2492.72 1067.41,-2508.1"/>
+<polygon fill="#000000" stroke="#000000" points="1065.59,-2511.1 1075.78,-2513.99 1069.61,-2505.37 1065.59,-2511.1"/>
 </g>
-<!-- interface~io_get_token&#45;&gt;proc~io_get_token -->
-<g id="call~~graph~~CallGraph_edge97" class="edge">
-<title>interface~io_get_token&#45;&gt;proc~io_get_token</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1131.62,-3474C1174.27,-3474 1245.31,-3474 1292.02,-3474"/>
-<polygon fill="#000000" stroke="#000000" points="1292.18,-3477.5 1302.18,-3474 1292.18,-3470.5 1292.18,-3477.5"/>
+<!-- proc~obl_pot_system -->
+<g id="call~~graph~~CallGraph_node108" class="node">
+<title>proc~obl_pot_system</title>
+<g id="a_call~~graph~~CallGraph_node108"><a xlink:href=".././proc/obl_pot_system.html" xlink:title="obl_pot_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="371,-6685 283,-6685 283,-6661 371,-6661 371,-6685"/>
+<text text-anchor="middle" x="327" y="-6670.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_pot_system</text>
+</a>
 </g>
-<!-- interface~operator(.mag.) -->
-<g id="call~~graph~~CallGraph_node88" class="node">
-<title>interface~operator(.mag.)</title>
-<g id="a_call~~graph~~CallGraph_node88"><a xlink:href=".././interface/operator%28.mag.%29.html" xlink:title="operator(.mag.)">
-<polygon fill="#a7506f" stroke="#a7506f" points="141,-5950 53,-5950 53,-5926 141,-5926 141,-5950"/>
-<text text-anchor="middle" x="97" y="-5935.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator(.mag.)</text>
+</g>
+<!-- proc~obl_pot_one -->
+<g id="call~~graph~~CallGraph_node435" class="node">
+<title>proc~obl_pot_one</title>
+<g id="a_call~~graph~~CallGraph_node435"><a xlink:href=".././proc/obl_pot_one.html" xlink:title="obl_pot_one">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="610.5,-6685 538.5,-6685 538.5,-6661 610.5,-6661 610.5,-6685"/>
+<text text-anchor="middle" x="574.5" y="-6670.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_pot_one</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_append_merger -->
-<g id="call~~graph~~CallGraph_node89" class="node">
-<title>interface~symba_util_append_merger</title>
-<g id="a_call~~graph~~CallGraph_node89"><a xlink:href=".././interface/symba_util_append_merger.html" xlink:title="symba_util_append_merger">
-<polygon fill="#a7506f" stroke="#a7506f" points="170,-940 24,-940 24,-916 170,-916 170,-940"/>
-<text text-anchor="middle" x="97" y="-925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_merger</text>
+<!-- proc~obl_pot_system&#45;&gt;proc~obl_pot_one -->
+<g id="call~~graph~~CallGraph_edge96" class="edge">
+<title>proc~obl_pot_system&#45;&gt;proc~obl_pot_one</title>
+<path fill="none" stroke="#000000" d="M371.04,-6673C415.19,-6673 483.56,-6673 528.42,-6673"/>
+<polygon fill="#000000" stroke="#000000" points="528.46,-6676.5 538.46,-6673 528.46,-6669.5 528.46,-6676.5"/>
+</g>
+<!-- proc~obl_acc_pl -->
+<g id="call~~graph~~CallGraph_node109" class="node">
+<title>proc~obl_acc_pl</title>
+<g id="a_call~~graph~~CallGraph_node109"><a xlink:href=".././proc/obl_acc_pl.html" xlink:title="obl_acc_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="359,-6727 295,-6727 295,-6703 359,-6703 359,-6727"/>
+<text text-anchor="middle" x="327" y="-6712.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_append_merger -->
-<g id="call~~graph~~CallGraph_node306" class="node">
-<title>proc~symba_util_append_merger</title>
-<g id="a_call~~graph~~CallGraph_node306"><a xlink:href=".././proc/symba_util_append_merger.html" xlink:title="symba_util_append_merger">
-<polygon fill="#d9534f" stroke="#d9534f" points="400,-940 254,-940 254,-916 400,-916 400,-940"/>
-<text text-anchor="middle" x="327" y="-925.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_merger</text>
+<!-- interface~obl_acc_body -->
+<g id="call~~graph~~CallGraph_node179" class="node">
+<title>interface~obl_acc_body</title>
+<g id="a_call~~graph~~CallGraph_node179"><a xlink:href=".././interface/obl_acc_body.html" xlink:title="obl_acc_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="614,-6748 535,-6748 535,-6724 614,-6724 614,-6748"/>
+<text text-anchor="middle" x="574.5" y="-6733.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_body</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_append_merger&#45;&gt;proc~symba_util_append_merger -->
-<g id="call~~graph~~CallGraph_edge98" class="edge">
-<title>interface~symba_util_append_merger&#45;&gt;proc~symba_util_append_merger</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-928C193.54,-928 219.68,-928 243.76,-928"/>
-<polygon fill="#000000" stroke="#000000" points="243.94,-931.5 253.94,-928 243.94,-924.5 243.94,-931.5"/>
+<!-- proc~obl_acc_pl&#45;&gt;interface~obl_acc_body -->
+<g id="call~~graph~~CallGraph_edge97" class="edge">
+<title>proc~obl_acc_pl&#45;&gt;interface~obl_acc_body</title>
+<path fill="none" stroke="#000000" d="M359.09,-6717.66C400.89,-6721.24 475.63,-6727.63 524.9,-6731.84"/>
+<polygon fill="#000000" stroke="#000000" points="524.74,-6735.34 535,-6732.71 525.33,-6728.37 524.74,-6735.34"/>
 </g>
-<!-- interface~io_read_frame_body -->
-<g id="call~~graph~~CallGraph_node90" class="node">
-<title>interface~io_read_frame_body</title>
-<g id="a_call~~graph~~CallGraph_node90"><a xlink:href=".././interface/io_read_frame_body.html" xlink:title="io_read_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-3154 518.5,-3154 518.5,-3130 630.5,-3130 630.5,-3154"/>
-<text text-anchor="middle" x="574.5" y="-3139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
+<!-- proc~symba_encounter_check_tp -->
+<g id="call~~graph~~CallGraph_node110" class="node">
+<title>proc~symba_encounter_check_tp</title>
+<g id="a_call~~graph~~CallGraph_node110"><a xlink:href=".././proc/symba_encounter_check_tp.html" xlink:title="symba_encounter_check_tp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="400.5,-6811 253.5,-6811 253.5,-6787 400.5,-6787 400.5,-6811"/>
+<text text-anchor="middle" x="327" y="-6796.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_frame_body -->
-<g id="call~~graph~~CallGraph_node99" class="node">
-<title>proc~io_read_frame_body</title>
-<g id="a_call~~graph~~CallGraph_node99"><a xlink:href=".././proc/io_read_frame_body.html" xlink:title="io_read_frame_body">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="895.5,-3154 783.5,-3154 783.5,-3130 895.5,-3130 895.5,-3154"/>
-<text text-anchor="middle" x="839.5" y="-3139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
+<!-- proc~symba_encounter_check_pl -->
+<g id="call~~graph~~CallGraph_node111" class="node">
+<title>proc~symba_encounter_check_pl</title>
+<g id="a_call~~graph~~CallGraph_node111"><a xlink:href=".././proc/symba_encounter_check_pl.html" xlink:title="symba_encounter_check_pl">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="400,-5668 254,-5668 254,-5644 400,-5644 400,-5668"/>
+<text text-anchor="middle" x="327" y="-5653.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body -->
+<!-- proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all -->
 <g id="call~~graph~~CallGraph_edge99" class="edge">
-<title>interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-3142C672.19,-3142 729.31,-3142 773.16,-3142"/>
-<polygon fill="#000000" stroke="#000000" points="773.44,-3145.5 783.44,-3142 773.44,-3138.5 773.44,-3145.5"/>
+<title>proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all</title>
+<path fill="none" stroke="#000000" d="M400.33,-5656C428.54,-5656 461.06,-5656 490.24,-5656"/>
+<polygon fill="#000000" stroke="#000000" points="490.41,-5659.5 500.41,-5656 490.41,-5652.5 490.41,-5659.5"/>
 </g>
-<!-- proc~drift_kepu_new -->
-<g id="call~~graph~~CallGraph_node91" class="node">
-<title>proc~drift_kepu_new</title>
-<g id="a_call~~graph~~CallGraph_node91"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
-<polygon fill="#d9534f" stroke="#d9534f" points="1137,-6345 1052,-6345 1052,-6321 1137,-6321 1137,-6345"/>
-<text text-anchor="middle" x="1094.5" y="-6330.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
-</a>
+<!-- util_index_eucl_ij_to_k -->
+<g id="call~~graph~~CallGraph_node767" class="node">
+<title>util_index_eucl_ij_to_k</title>
+<polygon fill="#777777" stroke="#777777" points="634.5,-5710 514.5,-5710 514.5,-5686 634.5,-5686 634.5,-5710"/>
+<text text-anchor="middle" x="574.5" y="-5695.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
 </g>
+<!-- proc~symba_encounter_check_pl&#45;&gt;util_index_eucl_ij_to_k -->
+<g id="call~~graph~~CallGraph_edge98" class="edge">
+<title>proc~symba_encounter_check_pl&#45;&gt;util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M398.35,-5668.04C431.61,-5673.73 471.18,-5680.5 504.29,-5686.16"/>
+<polygon fill="#000000" stroke="#000000" points="503.9,-5689.64 514.35,-5687.88 505.08,-5682.74 503.9,-5689.64"/>
 </g>
-<!-- proc~drift_kepu_stumpff -->
-<g id="call~~graph~~CallGraph_node147" class="node">
-<title>proc~drift_kepu_stumpff</title>
-<g id="a_call~~graph~~CallGraph_node147"><a xlink:href=".././proc/drift_kepu_stumpff.html" xlink:title="drift_kepu_stumpff">
-<polygon fill="#d9534f" stroke="#d9534f" points="1390,-6303 1289,-6303 1289,-6279 1390,-6279 1390,-6303"/>
-<text text-anchor="middle" x="1339.5" y="-6288.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_stumpff</text>
+<!-- proc~orbel_el2xv_vec -->
+<g id="call~~graph~~CallGraph_node112" class="node">
+<title>proc~orbel_el2xv_vec</title>
+<g id="a_call~~graph~~CallGraph_node112"><a xlink:href=".././proc/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
+<polygon fill="#d9534f" stroke="#d9534f" points="372,-3754 282,-3754 282,-3730 372,-3730 372,-3754"/>
+<text text-anchor="middle" x="327" y="-3739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv -->
 <g id="call~~graph~~CallGraph_edge100" class="edge">
-<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
-<path fill="none" stroke="#000000" d="M1137.27,-6325.78C1176.3,-6319.03 1234.97,-6308.89 1278.91,-6301.3"/>
-<polygon fill="#000000" stroke="#000000" points="1279.63,-6304.73 1288.89,-6299.57 1278.44,-6297.83 1279.63,-6304.73"/>
-</g>
-<!-- proc~operator_cross_el_qp -->
-<g id="call~~graph~~CallGraph_node92" class="node">
-<title>proc~operator_cross_el_qp</title>
-<g id="a_call~~graph~~CallGraph_node92"><a xlink:href=".././proc/operator_cross_el_qp.html" xlink:title="operator_cross_el_qp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="155.5,-6187 38.5,-6187 38.5,-6163 155.5,-6163 155.5,-6187"/>
-<text text-anchor="middle" x="97" y="-6172.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_qp</text>
-</a>
-</g>
+<title>proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv</title>
+<path fill="none" stroke="#000000" d="M372.17,-3742C417.03,-3742 486.05,-3742 530.48,-3742"/>
+<polygon fill="#000000" stroke="#000000" points="530.67,-3745.5 540.67,-3742 530.67,-3738.5 530.67,-3745.5"/>
 </g>
-<!-- proc~util_append_arr_dpvec -->
-<g id="call~~graph~~CallGraph_node93" class="node">
-<title>proc~util_append_arr_dpvec</title>
-<g id="a_call~~graph~~CallGraph_node93"><a xlink:href=".././proc/util_append_arr_dpvec.html" xlink:title="util_append_arr_DPvec">
-<polygon fill="#d9534f" stroke="#d9534f" points="901.5,-6652 777.5,-6652 777.5,-6628 901.5,-6628 901.5,-6652"/>
-<text text-anchor="middle" x="839.5" y="-6637.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DPvec</text>
+<!-- proc~symba_encounter_check -->
+<g id="call~~graph~~CallGraph_node113" class="node">
+<title>proc~symba_encounter_check</title>
+<g id="a_call~~graph~~CallGraph_node113"><a xlink:href=".././proc/symba_encounter_check.html" xlink:title="symba_encounter_check">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="393,-6853 261,-6853 261,-6829 393,-6829 393,-6853"/>
+<text text-anchor="middle" x="327" y="-6838.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_node455" class="node">
-<title>interface~util_resize~2</title>
-<g id="a_call~~graph~~CallGraph_node455"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="1125,-6484 1064,-6484 1064,-6460 1125,-6460 1125,-6484"/>
-<text text-anchor="middle" x="1094.5" y="-6469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<!-- proc~io_conservation_report -->
+<g id="call~~graph~~CallGraph_node114" class="node">
+<title>proc~io_conservation_report</title>
+<g id="a_call~~graph~~CallGraph_node114"><a xlink:href=".././proc/io_conservation_report.html" xlink:title="io_conservation_report">
+<polygon fill="#d9534f" stroke="#d9534f" points="900.5,-785 778.5,-785 778.5,-761 900.5,-761 900.5,-785"/>
+<text text-anchor="middle" x="839.5" y="-770.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2 -->
+<!-- proc~io_conservation_report&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge101" class="edge">
-<title>proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M901.78,-6635.81C919.41,-6632.75 938.15,-6627.6 954,-6619 1010.85,-6588.14 1057.99,-6525.79 1080.05,-6493.09"/>
-<polygon fill="#000000" stroke="#000000" points="1083.24,-6494.61 1085.84,-6484.34 1077.4,-6490.75 1083.24,-6494.61"/>
+<title>proc~io_conservation_report&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M900.66,-778.83C918.35,-781.94 937.4,-786.7 954,-794 1002.08,-815.13 1048.97,-855.75 1074.27,-879.8"/>
+<polygon fill="#000000" stroke="#000000" points="1072.07,-882.55 1081.69,-886.98 1076.94,-877.52 1072.07,-882.55"/>
 </g>
-<!-- proc~orbel_eget -->
-<g id="call~~graph~~CallGraph_node94" class="node">
-<title>proc~orbel_eget</title>
-<g id="a_call~~graph~~CallGraph_node94"><a xlink:href=".././proc/orbel_eget.html" xlink:title="orbel_eget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1126.5,-6177 1062.5,-6177 1062.5,-6153 1126.5,-6153 1126.5,-6177"/>
-<text text-anchor="middle" x="1094.5" y="-6162.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
+<!-- proc~orbel_flon -->
+<g id="call~~graph~~CallGraph_node115" class="node">
+<title>proc~orbel_flon</title>
+<g id="a_call~~graph~~CallGraph_node115"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1124.5,-3754 1064.5,-3754 1064.5,-3730 1124.5,-3730 1124.5,-3754"/>
+<text text-anchor="middle" x="1094.5" y="-3739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_scget -->
-<g id="call~~graph~~CallGraph_node471" class="node">
-<title>interface~orbel_scget</title>
-<g id="a_call~~graph~~CallGraph_node471"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#a7506f" stroke="#a7506f" points="1373.5,-6135 1305.5,-6135 1305.5,-6111 1373.5,-6111 1373.5,-6135"/>
-<text text-anchor="middle" x="1339.5" y="-6120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
-</a>
-</g>
+<!-- 3 -->
+<g id="call~~graph~~CallGraph_node725" class="node">
+<title>3</title>
+<polygon fill="#777777" stroke="#777777" points="1366.5,-3754 1312.5,-3754 1312.5,-3730 1366.5,-3730 1366.5,-3754"/>
+<text text-anchor="middle" x="1339.5" y="-3739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
 </g>
-<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_flon&#45;&gt;3 -->
 <g id="call~~graph~~CallGraph_edge102" class="edge">
-<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M1126.77,-6159.6C1169.73,-6152.17 1247.18,-6138.78 1295.55,-6130.42"/>
-<polygon fill="#000000" stroke="#000000" points="1296.15,-6133.87 1305.41,-6128.72 1294.96,-6126.97 1296.15,-6133.87"/>
-</g>
-<!-- proc~obl_acc_body -->
-<g id="call~~graph~~CallGraph_node95" class="node">
-<title>proc~obl_acc_body</title>
-<g id="a_call~~graph~~CallGraph_node95"><a xlink:href=".././proc/obl_acc_body.html" xlink:title="obl_acc_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="879,-6694 800,-6694 800,-6670 879,-6670 879,-6694"/>
-<text text-anchor="middle" x="839.5" y="-6679.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_body</text>
-</a>
-</g>
+<title>proc~orbel_flon&#45;&gt;3</title>
+<path fill="none" stroke="#000000" d="M1124.81,-3742C1169.38,-3742 1254.11,-3742 1302.41,-3742"/>
+<polygon fill="#000000" stroke="#000000" points="1302.42,-3745.5 1312.42,-3742 1302.42,-3738.5 1302.42,-3745.5"/>
 </g>
-<!-- proc~fraggle_regime_collresolve -->
-<g id="call~~graph~~CallGraph_node96" class="node">
-<title>proc~fraggle_regime_collresolve</title>
-<g id="a_call~~graph~~CallGraph_node96"><a xlink:href=".././proc/fraggle_regime_collresolve.html" xlink:title="fraggle_regime_collresolve">
-<polygon fill="#d9534f" stroke="#d9534f" points="645,-1730 504,-1730 504,-1706 645,-1706 645,-1730"/>
-<text text-anchor="middle" x="574.5" y="-1715.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_collresolve</text>
+<!-- proc~io_dump_particle_info -->
+<g id="call~~graph~~CallGraph_node117" class="node">
+<title>proc~io_dump_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node117"><a xlink:href=".././proc/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="898.5,-743 780.5,-743 780.5,-719 898.5,-719 898.5,-743"/>
+<text text-anchor="middle" x="839.5" y="-728.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message -->
+<!-- proc~io_dump_particle_info&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge103" class="edge">
-<title>proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M645.29,-1729.14C678.39,-1734.43 718.24,-1740.8 753.13,-1746.37"/>
-<polygon fill="#000000" stroke="#000000" points="752.88,-1749.87 763.31,-1747.99 753.98,-1742.96 752.88,-1749.87"/>
+<title>proc~io_dump_particle_info&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M898.57,-734.65C917.11,-737.63 937.18,-742.87 954,-752 1010.85,-782.86 1057.99,-845.21 1080.05,-877.91"/>
+<polygon fill="#000000" stroke="#000000" points="1077.4,-880.25 1085.84,-886.66 1083.24,-876.39 1077.4,-880.25"/>
 </g>
-<!-- proc~operator_cross_el_i1b -->
-<g id="call~~graph~~CallGraph_node97" class="node">
-<title>proc~operator_cross_el_i1b</title>
-<g id="a_call~~graph~~CallGraph_node97"><a xlink:href=".././proc/operator_cross_el_i1b.html" xlink:title="operator_cross_el_i1b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-6757 37.5,-6757 37.5,-6733 156.5,-6733 156.5,-6757"/>
-<text text-anchor="middle" x="97" y="-6742.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i1b</text>
+<!-- proc~io_dump_param -->
+<g id="call~~graph~~CallGraph_node118" class="node">
+<title>proc~io_dump_param</title>
+<g id="a_call~~graph~~CallGraph_node118"><a xlink:href=".././proc/io_dump_param.html" xlink:title="io_dump_param">
+<polygon fill="#d9534f" stroke="#d9534f" points="885,-701 794,-701 794,-677 885,-677 885,-701"/>
+<text text-anchor="middle" x="839.5" y="-686.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu -->
-<g id="call~~graph~~CallGraph_node98" class="node">
-<title>proc~drift_kepu</title>
-<g id="a_call~~graph~~CallGraph_node98"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
-<polygon fill="#d9534f" stroke="#d9534f" points="869.5,-6282 809.5,-6282 809.5,-6258 869.5,-6258 869.5,-6282"/>
-<text text-anchor="middle" x="839.5" y="-6267.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
+<!-- proc~io_dump_param&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge104" class="edge">
+<title>proc~io_dump_param&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M885.03,-689.66C907.18,-691.79 933.53,-697.19 954,-710 1020.48,-751.58 1065.79,-837.31 1084.23,-877.42"/>
+<polygon fill="#000000" stroke="#000000" points="1081.15,-879.1 1088.43,-886.8 1087.53,-876.24 1081.15,-879.1"/>
+</g>
+<!-- proc~obl_acc_tp -->
+<g id="call~~graph~~CallGraph_node119" class="node">
+<title>proc~obl_acc_tp</title>
+<g id="a_call~~graph~~CallGraph_node119"><a xlink:href=".././proc/obl_acc_tp.html" xlink:title="obl_acc_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="359,-6769 295,-6769 295,-6745 359,-6745 359,-6769"/>
+<text text-anchor="middle" x="327" y="-6754.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
-<g id="call~~graph~~CallGraph_edge104" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
-<path fill="none" stroke="#000000" d="M869.85,-6275.11C893.02,-6279.52 926,-6286.67 954,-6296 970.61,-6301.54 973.32,-6306.67 990,-6312 1006.56,-6317.29 1025.05,-6321.54 1041.77,-6324.8"/>
-<polygon fill="#000000" stroke="#000000" points="1041.45,-6328.3 1051.92,-6326.7 1042.74,-6321.42 1041.45,-6328.3"/>
+<!-- proc~obl_acc_tp&#45;&gt;interface~obl_acc_body -->
+<g id="call~~graph~~CallGraph_edge105" class="edge">
+<title>proc~obl_acc_tp&#45;&gt;interface~obl_acc_body</title>
+<path fill="none" stroke="#000000" d="M359.09,-6754.34C400.89,-6750.76 475.63,-6744.37 524.9,-6740.16"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-6743.63 535,-6739.29 524.74,-6736.66 525.33,-6743.63"/>
 </g>
-<!-- proc~drift_kepu_fchk -->
-<g id="call~~graph~~CallGraph_node138" class="node">
-<title>proc~drift_kepu_fchk</title>
-<g id="a_call~~graph~~CallGraph_node138"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
-<polygon fill="#d9534f" stroke="#d9534f" points="1137,-6303 1052,-6303 1052,-6279 1137,-6279 1137,-6303"/>
-<text text-anchor="middle" x="1094.5" y="-6288.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
+<!-- proc~lambda_eval_0 -->
+<g id="call~~graph~~CallGraph_node120" class="node">
+<title>proc~lambda_eval_0</title>
+<g id="a_call~~graph~~CallGraph_node120"><a xlink:href=".././proc/lambda_eval_0.html" xlink:title="lambda_eval_0">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="139.5,-6895 54.5,-6895 54.5,-6871 139.5,-6871 139.5,-6895"/>
+<text text-anchor="middle" x="97" y="-6880.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_eval_0</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
-<g id="call~~graph~~CallGraph_edge106" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
-<path fill="none" stroke="#000000" d="M869.52,-6272.41C911.5,-6275.89 989.83,-6282.39 1041.82,-6286.71"/>
-<polygon fill="#000000" stroke="#000000" points="1041.6,-6290.2 1051.85,-6287.54 1042.17,-6283.23 1041.6,-6290.2"/>
-</g>
-<!-- proc~drift_kepu_guess -->
-<g id="call~~graph~~CallGraph_node167" class="node">
-<title>proc~drift_kepu_guess</title>
-<g id="a_call~~graph~~CallGraph_node167"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
-<polygon fill="#d9534f" stroke="#d9534f" points="1141.5,-6219 1047.5,-6219 1047.5,-6195 1141.5,-6195 1141.5,-6219"/>
-<text text-anchor="middle" x="1094.5" y="-6204.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
+<!-- proc~lambda_eval_0_err -->
+<g id="call~~graph~~CallGraph_node121" class="node">
+<title>proc~lambda_eval_0_err</title>
+<g id="a_call~~graph~~CallGraph_node121"><a xlink:href=".././proc/lambda_eval_0_err.html" xlink:title="lambda_eval_0_err">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-6937 44.5,-6937 44.5,-6913 149.5,-6913 149.5,-6937"/>
+<text text-anchor="middle" x="97" y="-6922.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_eval_0_err</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
-<g id="call~~graph~~CallGraph_edge105" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
-<path fill="none" stroke="#000000" d="M869.69,-6267.4C893.06,-6264.66 926.38,-6259.25 954,-6249 971.36,-6242.55 972.69,-6234.6 990,-6228 1004.9,-6222.32 1021.62,-6218.08 1037.2,-6214.95"/>
-<polygon fill="#000000" stroke="#000000" points="1038.07,-6218.35 1047.24,-6213.05 1036.77,-6211.47 1038.07,-6218.35"/>
+<!-- proc~lambda_eval_tvar -->
+<g id="call~~graph~~CallGraph_node122" class="node">
+<title>proc~lambda_eval_tvar</title>
+<g id="a_call~~graph~~CallGraph_node122"><a xlink:href=".././proc/lambda_eval_tvar.html" xlink:title="lambda_eval_tvar">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="145.5,-6979 48.5,-6979 48.5,-6955 145.5,-6955 145.5,-6979"/>
+<text text-anchor="middle" x="97" y="-6964.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_eval_tvar</text>
+</a>
 </g>
-<!-- proc~drift_kepu_lag -->
-<g id="call~~graph~~CallGraph_node193" class="node">
-<title>proc~drift_kepu_lag</title>
-<g id="a_call~~graph~~CallGraph_node193"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
-<polygon fill="#d9534f" stroke="#d9534f" points="1134.5,-6261 1054.5,-6261 1054.5,-6237 1134.5,-6237 1134.5,-6261"/>
-<text text-anchor="middle" x="1094.5" y="-6246.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
+</g>
+<!-- interface~util_spill~2 -->
+<g id="call~~graph~~CallGraph_node123" class="node">
+<title>interface~util_spill~2</title>
+<g id="a_call~~graph~~CallGraph_node123"><a xlink:href=".././interface/util_spill~2.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-6255 1067.5,-6255 1067.5,-6231 1121.5,-6231 1121.5,-6255"/>
+<text text-anchor="middle" x="1094.5" y="-6240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
-<g id="call~~graph~~CallGraph_edge107" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
-<path fill="none" stroke="#000000" d="M869.52,-6267.59C912.11,-6264.06 992.1,-6257.42 1044.06,-6253.1"/>
-<polygon fill="#000000" stroke="#000000" points="1044.39,-6256.59 1054.06,-6252.27 1043.81,-6249.61 1044.39,-6256.59"/>
+<!-- interface~util_sort_rearrange_body -->
+<g id="call~~graph~~CallGraph_node124" class="node">
+<title>interface~util_sort_rearrange_body</title>
+<g id="a_call~~graph~~CallGraph_node124"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="641,-7057 508,-7057 508,-7033 641,-7033 641,-7057"/>
+<text text-anchor="middle" x="574.5" y="-7042.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+</a>
 </g>
-<!-- proc~io_read_frame_body&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge108" class="edge">
-<title>proc~io_read_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M895.64,-3141.72C915.64,-3139.2 937.37,-3133.4 954,-3121 1040.45,-3056.55 1077.43,-2923.14 1089.11,-2870.27"/>
-<polygon fill="#000000" stroke="#000000" points="1092.58,-2870.78 1091.22,-2860.27 1085.73,-2869.33 1092.58,-2870.78"/>
 </g>
-<!-- proc~rmvs_util_spill_pl -->
-<g id="call~~graph~~CallGraph_node100" class="node">
-<title>proc~rmvs_util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node100"><a xlink:href=".././proc/rmvs_util_spill_pl.html" xlink:title="rmvs_util_spill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-1436 792.5,-1436 792.5,-1412 886.5,-1412 886.5,-1436"/>
-<text text-anchor="middle" x="839.5" y="-1421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_pl</text>
+<!-- proc~util_sort_rearrange_body -->
+<g id="call~~graph~~CallGraph_node645" class="node">
+<title>proc~util_sort_rearrange_body</title>
+<g id="a_call~~graph~~CallGraph_node645"><a xlink:href=".././proc/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="906,-7057 773,-7057 773,-7033 906,-7033 906,-7057"/>
+<text text-anchor="middle" x="839.5" y="-7042.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
-<!-- util_spill -->
-<g id="call~~graph~~CallGraph_node714" class="node">
-<title>util_spill</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-1510 1067.5,-1510 1067.5,-1486 1121.5,-1486 1121.5,-1510"/>
-<text text-anchor="middle" x="1094.5" y="-1495.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
+<g id="call~~graph~~CallGraph_edge106" class="edge">
+<title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.19,-7045C678.06,-7045 724.23,-7045 762.64,-7045"/>
+<polygon fill="#000000" stroke="#000000" points="762.74,-7048.5 772.74,-7045 762.74,-7041.5 762.74,-7048.5"/>
 </g>
-<!-- proc~rmvs_util_spill_pl&#45;&gt;util_spill -->
-<g id="call~~graph~~CallGraph_edge109" class="edge">
-<title>proc~rmvs_util_spill_pl&#45;&gt;util_spill</title>
-<path fill="none" stroke="#000000" d="M886.75,-1426.85C908.07,-1429.57 933.21,-1434.83 954,-1445 973.23,-1454.4 970.85,-1467.43 990,-1477 1010.91,-1487.45 1036.65,-1492.7 1057.24,-1495.33"/>
-<polygon fill="#000000" stroke="#000000" points="1056.85,-1498.81 1067.18,-1496.46 1057.64,-1491.86 1056.85,-1498.81"/>
+<!-- interface~util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node125" class="node">
+<title>interface~util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node125"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-7021 38,-7021 38,-6997 156,-6997 156,-7021"/>
+<text text-anchor="middle" x="97" y="-7006.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+</a>
 </g>
-<!-- proc~rmvs_util_spill_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge110" class="edge">
-<title>proc~rmvs_util_spill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M886.61,-1427.43C910.03,-1426.55 937.04,-1421.03 954,-1403 1044.2,-1307.11 909.96,-1213.51 990,-1109 1006.05,-1088.04 1034.31,-1077.49 1057.24,-1072.21"/>
-<polygon fill="#000000" stroke="#000000" points="1058.25,-1075.58 1067.34,-1070.14 1056.84,-1068.72 1058.25,-1075.58"/>
 </g>
-<!-- whm_util_spill_pl -->
-<g id="call~~graph~~CallGraph_node757" class="node">
-<title>whm_util_spill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1141,-1468 1048,-1468 1048,-1444 1141,-1444 1141,-1468"/>
-<text text-anchor="middle" x="1094.5" y="-1453.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
+<!-- proc~util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node252" class="node">
+<title>proc~util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node252"><a xlink:href=".././proc/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="386,-7021 268,-7021 268,-6997 386,-6997 386,-7021"/>
+<text text-anchor="middle" x="327" y="-7006.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+</a>
 </g>
-<!-- proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl -->
-<g id="call~~graph~~CallGraph_edge111" class="edge">
-<title>proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl</title>
-<path fill="none" stroke="#000000" d="M886.61,-1429.83C929.14,-1435.21 992.38,-1443.21 1037.74,-1448.95"/>
-<polygon fill="#000000" stroke="#000000" points="1037.35,-1452.43 1047.71,-1450.21 1038.23,-1445.48 1037.35,-1452.43"/>
 </g>
-<!-- proc~operator_cross_el_i2b -->
-<g id="call~~graph~~CallGraph_node101" class="node">
-<title>proc~operator_cross_el_i2b</title>
-<g id="a_call~~graph~~CallGraph_node101"><a xlink:href=".././proc/operator_cross_el_i2b.html" xlink:title="operator_cross_el_i2b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-6799 37.5,-6799 37.5,-6775 156.5,-6775 156.5,-6799"/>
-<text text-anchor="middle" x="97" y="-6784.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i2b</text>
+<!-- interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_edge107" class="edge">
+<title>interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-7009C187.08,-7009 225.33,-7009 257.7,-7009"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-7012.5 267.98,-7009 257.98,-7005.5 257.98,-7012.5"/>
+</g>
+<!-- interface~util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_node126" class="node">
+<title>interface~util_sort_rearrange_tp</title>
+<g id="a_call~~graph~~CallGraph_node126"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-7081 38,-7081 38,-7057 156,-7057 156,-7081"/>
+<text text-anchor="middle" x="97" y="-7066.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_util_spill_tp -->
-<g id="call~~graph~~CallGraph_node102" class="node">
-<title>proc~rmvs_util_spill_tp</title>
-<g id="a_call~~graph~~CallGraph_node102"><a xlink:href=".././proc/rmvs_util_spill_tp.html" xlink:title="rmvs_util_spill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-1478 792.5,-1478 792.5,-1454 886.5,-1454 886.5,-1478"/>
-<text text-anchor="middle" x="839.5" y="-1463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_tp</text>
+<!-- proc~util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_node250" class="node">
+<title>proc~util_sort_rearrange_tp</title>
+<g id="a_call~~graph~~CallGraph_node250"><a xlink:href=".././proc/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="386,-7081 268,-7081 268,-7057 386,-7057 386,-7081"/>
+<text text-anchor="middle" x="327" y="-7066.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill -->
-<g id="call~~graph~~CallGraph_edge112" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill</title>
-<path fill="none" stroke="#000000" d="M886.61,-1471.83C935.69,-1478.04 1012.35,-1487.74 1057.28,-1493.42"/>
-<polygon fill="#000000" stroke="#000000" points="1057.09,-1496.92 1067.45,-1494.7 1057.96,-1489.98 1057.09,-1496.92"/>
-</g>
-<!-- util_spill_tp -->
-<g id="call~~graph~~CallGraph_node744" class="node">
-<title>util_spill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="1127,-1552 1062,-1552 1062,-1528 1127,-1528 1127,-1552"/>
-<text text-anchor="middle" x="1094.5" y="-1537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_edge108" class="edge">
+<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-7069C187.08,-7069 225.33,-7069 257.7,-7069"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-7072.5 267.98,-7069 257.98,-7065.5 257.98,-7072.5"/>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp -->
-<g id="call~~graph~~CallGraph_edge113" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp</title>
-<path fill="none" stroke="#000000" d="M886.75,-1468.85C908.07,-1471.57 933.21,-1476.83 954,-1487 973.23,-1496.4 970.85,-1509.43 990,-1519 1009.05,-1528.52 1032.11,-1533.72 1051.63,-1536.57"/>
-<polygon fill="#000000" stroke="#000000" points="1051.4,-1540.07 1061.76,-1537.88 1052.3,-1533.12 1051.4,-1540.07"/>
+<!-- interface~util_sort_body -->
+<g id="call~~graph~~CallGraph_node127" class="node">
+<title>interface~util_sort_body</title>
+<g id="a_call~~graph~~CallGraph_node127"><a xlink:href=".././interface/util_sort_body.html" xlink:title="util_sort_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="614,-7155 535,-7155 535,-7131 614,-7131 614,-7155"/>
+<text text-anchor="middle" x="574.5" y="-7140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_body</text>
+</a>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge114" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M886.72,-1469.54C910.17,-1468.68 937.18,-1463.15 954,-1445 1005.04,-1389.92 944.79,-1168.96 990,-1109 1005.97,-1087.82 1034.41,-1077.29 1057.45,-1072.06"/>
-<polygon fill="#000000" stroke="#000000" points="1058.15,-1075.49 1067.26,-1070.08 1056.76,-1068.63 1058.15,-1075.49"/>
 </g>
-<!-- proc~util_append_arr_char_string -->
-<g id="call~~graph~~CallGraph_node103" class="node">
-<title>proc~util_append_arr_char_string</title>
-<g id="a_call~~graph~~CallGraph_node103"><a xlink:href=".././proc/util_append_arr_char_string.html" xlink:title="util_append_arr_char_string">
-<polygon fill="#d9534f" stroke="#d9534f" points="913,-6610 766,-6610 766,-6586 913,-6586 913,-6610"/>
-<text text-anchor="middle" x="839.5" y="-6595.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_char_string</text>
+<!-- proc~util_sort_body -->
+<g id="call~~graph~~CallGraph_node625" class="node">
+<title>proc~util_sort_body</title>
+<g id="a_call~~graph~~CallGraph_node625"><a xlink:href=".././proc/util_sort_body.html" xlink:title="util_sort_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="879,-7155 800,-7155 800,-7131 879,-7131 879,-7155"/>
+<text text-anchor="middle" x="839.5" y="-7140.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_edge115" class="edge">
-<title>proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M913.15,-6589.73C927.06,-6586.71 941.25,-6582.6 954,-6577 1002.08,-6555.87 1048.97,-6515.25 1074.27,-6491.2"/>
-<polygon fill="#000000" stroke="#000000" points="1076.94,-6493.48 1081.69,-6484.02 1072.07,-6488.45 1076.94,-6493.48"/>
+<!-- interface~util_sort_body&#45;&gt;proc~util_sort_body -->
+<g id="call~~graph~~CallGraph_edge109" class="edge">
+<title>interface~util_sort_body&#45;&gt;proc~util_sort_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.02,-7143C660.61,-7143 739.07,-7143 789.8,-7143"/>
+<polygon fill="#000000" stroke="#000000" points="789.87,-7146.5 799.87,-7143 789.87,-7139.5 789.87,-7146.5"/>
 </g>
-<!-- proc~io_read_in_cb -->
-<g id="call~~graph~~CallGraph_node104" class="node">
-<title>proc~io_read_in_cb</title>
-<g id="a_call~~graph~~CallGraph_node104"><a xlink:href=".././proc/io_read_in_cb.html" xlink:title="io_read_in_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="879.5,-3112 799.5,-3112 799.5,-3088 879.5,-3088 879.5,-3112"/>
-<text text-anchor="middle" x="839.5" y="-3097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
+<!-- interface~util_sort_pl -->
+<g id="call~~graph~~CallGraph_node128" class="node">
+<title>interface~util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node128"><a xlink:href=".././interface/util_sort_pl.html" xlink:title="util_sort_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="129,-7174 65,-7174 65,-7150 129,-7150 129,-7174"/>
+<text text-anchor="middle" x="97" y="-7159.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_in_cb&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge116" class="edge">
-<title>proc~io_read_in_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M879.55,-3100.57C902.97,-3099.12 932.33,-3093.99 954,-3079 1030.49,-3026.08 1072.24,-2916.31 1087.13,-2869.69"/>
-<polygon fill="#000000" stroke="#000000" points="1090.52,-2870.59 1090.13,-2860.01 1083.83,-2868.53 1090.52,-2870.59"/>
-</g>
-<!-- proc~obl_acc_pl -->
-<g id="call~~graph~~CallGraph_node105" class="node">
-<title>proc~obl_acc_pl</title>
-<g id="a_call~~graph~~CallGraph_node105"><a xlink:href=".././proc/obl_acc_pl.html" xlink:title="obl_acc_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="359,-6715 295,-6715 295,-6691 359,-6691 359,-6715"/>
-<text text-anchor="middle" x="327" y="-6700.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
+<!-- proc~util_sort_pl -->
+<g id="call~~graph~~CallGraph_node639" class="node">
+<title>proc~util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node639"><a xlink:href=".././proc/util_sort_pl.html" xlink:title="util_sort_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="359,-7174 295,-7174 295,-7150 359,-7150 359,-7174"/>
+<text text-anchor="middle" x="327" y="-7159.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~obl_acc_body -->
-<g id="call~~graph~~CallGraph_node464" class="node">
-<title>interface~obl_acc_body</title>
-<g id="a_call~~graph~~CallGraph_node464"><a xlink:href=".././interface/obl_acc_body.html" xlink:title="obl_acc_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="614,-6694 535,-6694 535,-6670 614,-6670 614,-6694"/>
-<text text-anchor="middle" x="574.5" y="-6679.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_body</text>
-</a>
+<!-- interface~util_sort_pl&#45;&gt;proc~util_sort_pl -->
+<g id="call~~graph~~CallGraph_edge110" class="edge">
+<title>interface~util_sort_pl&#45;&gt;proc~util_sort_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-7162C169.53,-7162 239.8,-7162 284.55,-7162"/>
+<polygon fill="#000000" stroke="#000000" points="284.79,-7165.5 294.79,-7162 284.79,-7158.5 284.79,-7165.5"/>
 </g>
+<!-- interface~util_sort_tp -->
+<g id="call~~graph~~CallGraph_node129" class="node">
+<title>interface~util_sort_tp</title>
+<g id="a_call~~graph~~CallGraph_node129"><a xlink:href=".././interface/util_sort_tp.html" xlink:title="util_sort_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="129.5,-7132 64.5,-7132 64.5,-7108 129.5,-7108 129.5,-7132"/>
+<text text-anchor="middle" x="97" y="-7117.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+</a>
 </g>
-<!-- proc~obl_acc_pl&#45;&gt;interface~obl_acc_body -->
-<g id="call~~graph~~CallGraph_edge117" class="edge">
-<title>proc~obl_acc_pl&#45;&gt;interface~obl_acc_body</title>
-<path fill="none" stroke="#000000" d="M359.09,-6700.34C400.89,-6696.76 475.63,-6690.37 524.9,-6686.16"/>
-<polygon fill="#000000" stroke="#000000" points="525.33,-6689.63 535,-6685.29 524.74,-6682.66 525.33,-6689.63"/>
 </g>
-<!-- proc~io_read_encounter -->
-<g id="call~~graph~~CallGraph_node106" class="node">
-<title>proc~io_read_encounter</title>
-<g id="a_call~~graph~~CallGraph_node106"><a xlink:href=".././proc/io_read_encounter.html" xlink:title="io_read_encounter">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="891,-3070 788,-3070 788,-3046 891,-3046 891,-3070"/>
-<text text-anchor="middle" x="839.5" y="-3055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_encounter</text>
+<!-- proc~util_sort_tp -->
+<g id="call~~graph~~CallGraph_node651" class="node">
+<title>proc~util_sort_tp</title>
+<g id="a_call~~graph~~CallGraph_node651"><a xlink:href=".././proc/util_sort_tp.html" xlink:title="util_sort_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="359.5,-7132 294.5,-7132 294.5,-7108 359.5,-7108 359.5,-7132"/>
+<text text-anchor="middle" x="327" y="-7117.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_encounter&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge118" class="edge">
-<title>proc~io_read_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M891.19,-3056.67C911.94,-3054.16 935.4,-3048.64 954,-3037 1020.48,-2995.42 1065.79,-2909.69 1084.23,-2869.58"/>
-<polygon fill="#000000" stroke="#000000" points="1087.53,-2870.76 1088.43,-2860.2 1081.15,-2867.9 1087.53,-2870.76"/>
+<!-- interface~util_sort_tp&#45;&gt;proc~util_sort_tp -->
+<g id="call~~graph~~CallGraph_edge111" class="edge">
+<title>interface~util_sort_tp&#45;&gt;proc~util_sort_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.7,-7120C169.92,-7120 239.38,-7120 283.98,-7120"/>
+<polygon fill="#000000" stroke="#000000" points="284.2,-7123.5 294.2,-7120 284.2,-7116.5 284.2,-7123.5"/>
 </g>
-<!-- interface~whm_coord_h2j_pl -->
-<g id="call~~graph~~CallGraph_node107" class="node">
-<title>interface~whm_coord_h2j_pl</title>
-<g id="a_call~~graph~~CallGraph_node107"><a xlink:href=".././interface/whm_coord_h2j_pl.html" xlink:title="whm_coord_h2j_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="148.5,-6883 45.5,-6883 45.5,-6859 148.5,-6859 148.5,-6883"/>
-<text text-anchor="middle" x="97" y="-6868.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_h2j_pl</text>
+<!-- interface~util_append_body -->
+<g id="call~~graph~~CallGraph_node130" class="node">
+<title>interface~util_append_body</title>
+<g id="a_call~~graph~~CallGraph_node130"><a xlink:href=".././interface/util_append_body.html" xlink:title="util_append_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="1143,-472 1046,-472 1046,-448 1143,-448 1143,-472"/>
+<text text-anchor="middle" x="1094.5" y="-457.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_coord_h2j_pl -->
-<g id="call~~graph~~CallGraph_node517" class="node">
-<title>proc~whm_coord_h2j_pl</title>
-<g id="a_call~~graph~~CallGraph_node517"><a xlink:href=".././proc/whm_coord_h2j_pl.html" xlink:title="whm_coord_h2j_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-6883 275.5,-6883 275.5,-6859 378.5,-6859 378.5,-6883"/>
-<text text-anchor="middle" x="327" y="-6868.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_h2j_pl</text>
+<!-- proc~util_append_body -->
+<g id="call~~graph~~CallGraph_node684" class="node">
+<title>proc~util_append_body</title>
+<g id="a_call~~graph~~CallGraph_node684"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="1388,-472 1291,-472 1291,-448 1388,-448 1388,-472"/>
+<text text-anchor="middle" x="1339.5" y="-457.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_coord_h2j_pl&#45;&gt;proc~whm_coord_h2j_pl -->
-<g id="call~~graph~~CallGraph_edge119" class="edge">
-<title>interface~whm_coord_h2j_pl&#45;&gt;proc~whm_coord_h2j_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.6,-6871C183.02,-6871 228.74,-6871 265.14,-6871"/>
-<polygon fill="#000000" stroke="#000000" points="265.15,-6874.5 275.15,-6871 265.15,-6867.5 265.15,-6874.5"/>
+<!-- interface~util_append_body&#45;&gt;proc~util_append_body -->
+<g id="call~~graph~~CallGraph_edge112" class="edge">
+<title>interface~util_append_body&#45;&gt;proc~util_append_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1143.22,-460C1182.68,-460 1238.84,-460 1280.81,-460"/>
+<polygon fill="#000000" stroke="#000000" points="1280.89,-463.5 1290.89,-460 1280.89,-456.5 1280.89,-463.5"/>
 </g>
-<!-- proc~obl_acc_tp -->
-<g id="call~~graph~~CallGraph_node108" class="node">
-<title>proc~obl_acc_tp</title>
-<g id="a_call~~graph~~CallGraph_node108"><a xlink:href=".././proc/obl_acc_tp.html" xlink:title="obl_acc_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="359,-6673 295,-6673 295,-6649 359,-6649 359,-6673"/>
-<text text-anchor="middle" x="327" y="-6658.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
+<!-- interface~util_append_encounter -->
+<g id="call~~graph~~CallGraph_node131" class="node">
+<title>interface~util_append_encounter</title>
+<g id="a_call~~graph~~CallGraph_node131"><a xlink:href=".././interface/util_append_encounter.html" xlink:title="util_append_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="1155.5,-430 1033.5,-430 1033.5,-406 1155.5,-406 1155.5,-430"/>
+<text text-anchor="middle" x="1094.5" y="-415.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~obl_acc_tp&#45;&gt;interface~obl_acc_body -->
-<g id="call~~graph~~CallGraph_edge120" class="edge">
-<title>proc~obl_acc_tp&#45;&gt;interface~obl_acc_body</title>
-<path fill="none" stroke="#000000" d="M359.09,-6663.66C400.89,-6667.24 475.63,-6673.63 524.9,-6677.84"/>
-<polygon fill="#000000" stroke="#000000" points="524.74,-6681.34 535,-6678.71 525.33,-6674.37 524.74,-6681.34"/>
+<!-- proc~util_append_encounter -->
+<g id="call~~graph~~CallGraph_node220" class="node">
+<title>proc~util_append_encounter</title>
+<g id="a_call~~graph~~CallGraph_node220"><a xlink:href=".././proc/util_append_encounter.html" xlink:title="util_append_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="1400.5,-430 1278.5,-430 1278.5,-406 1400.5,-406 1400.5,-430"/>
+<text text-anchor="middle" x="1339.5" y="-415.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
+</a>
 </g>
-<!-- interface~whm_coord_j2h_pl -->
-<g id="call~~graph~~CallGraph_node109" class="node">
-<title>interface~whm_coord_j2h_pl</title>
-<g id="a_call~~graph~~CallGraph_node109"><a xlink:href=".././interface/whm_coord_j2h_pl.html" xlink:title="whm_coord_j2h_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="148.5,-6925 45.5,-6925 45.5,-6901 148.5,-6901 148.5,-6925"/>
-<text text-anchor="middle" x="97" y="-6910.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_j2h_pl</text>
+</g>
+<!-- interface~util_append_encounter&#45;&gt;proc~util_append_encounter -->
+<g id="call~~graph~~CallGraph_edge113" class="edge">
+<title>interface~util_append_encounter&#45;&gt;proc~util_append_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1155.57,-418C1189.59,-418 1232.34,-418 1267.96,-418"/>
+<polygon fill="#000000" stroke="#000000" points="1268.28,-421.5 1278.28,-418 1268.28,-414.5 1268.28,-421.5"/>
+</g>
+<!-- interface~util_append_pl -->
+<g id="call~~graph~~CallGraph_node132" class="node">
+<title>interface~util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node132"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="615.5,-491 533.5,-491 533.5,-467 615.5,-467 615.5,-491"/>
+<text text-anchor="middle" x="574.5" y="-476.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_coord_j2h_pl -->
-<g id="call~~graph~~CallGraph_node545" class="node">
-<title>proc~whm_coord_j2h_pl</title>
-<g id="a_call~~graph~~CallGraph_node545"><a xlink:href=".././proc/whm_coord_j2h_pl.html" xlink:title="whm_coord_j2h_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-6925 275.5,-6925 275.5,-6901 378.5,-6901 378.5,-6925"/>
-<text text-anchor="middle" x="327" y="-6910.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_j2h_pl</text>
+<!-- proc~util_append_pl -->
+<g id="call~~graph~~CallGraph_node360" class="node">
+<title>proc~util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node360"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="880.5,-491 798.5,-491 798.5,-467 880.5,-467 880.5,-491"/>
+<text text-anchor="middle" x="839.5" y="-476.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_coord_j2h_pl&#45;&gt;proc~whm_coord_j2h_pl -->
-<g id="call~~graph~~CallGraph_edge121" class="edge">
-<title>interface~whm_coord_j2h_pl&#45;&gt;proc~whm_coord_j2h_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.6,-6913C183.02,-6913 228.74,-6913 265.14,-6913"/>
-<polygon fill="#000000" stroke="#000000" points="265.15,-6916.5 275.15,-6913 265.15,-6909.5 265.15,-6916.5"/>
+<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
+<g id="call~~graph~~CallGraph_edge114" class="edge">
+<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.73,-479C661.94,-479 737.83,-479 787.98,-479"/>
+<polygon fill="#000000" stroke="#000000" points="788.27,-482.5 798.27,-479 788.27,-475.5 788.27,-482.5"/>
 </g>
-<!-- proc~operator_cross_el_i4b -->
-<g id="call~~graph~~CallGraph_node110" class="node">
-<title>proc~operator_cross_el_i4b</title>
-<g id="a_call~~graph~~CallGraph_node110"><a xlink:href=".././proc/operator_cross_el_i4b.html" xlink:title="operator_cross_el_i4b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-6988 37.5,-6988 37.5,-6964 156.5,-6964 156.5,-6988"/>
-<text text-anchor="middle" x="97" y="-6973.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i4b</text>
+<!-- interface~util_append_tp -->
+<g id="call~~graph~~CallGraph_node133" class="node">
+<title>interface~util_append_tp</title>
+<g id="a_call~~graph~~CallGraph_node133"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="616,-449 533,-449 533,-425 616,-425 616,-449"/>
+<text text-anchor="middle" x="574.5" y="-434.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid -->
-<g id="call~~graph~~CallGraph_node111" class="node">
-<title>proc~orbel_ehybrid</title>
-<g id="a_call~~graph~~CallGraph_node111"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="878.5,-6114 800.5,-6114 800.5,-6090 878.5,-6090 878.5,-6114"/>
-<text text-anchor="middle" x="839.5" y="-6099.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
+<!-- proc~util_append_tp -->
+<g id="call~~graph~~CallGraph_node367" class="node">
+<title>proc~util_append_tp</title>
+<g id="a_call~~graph~~CallGraph_node367"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="881,-449 798,-449 798,-425 881,-425 881,-449"/>
+<text text-anchor="middle" x="839.5" y="-434.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_eget -->
-<g id="call~~graph~~CallGraph_edge124" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_eget</title>
-<path fill="none" stroke="#000000" d="M878.7,-6113.57C908.79,-6122.48 951.87,-6134.79 990,-6144 1010.39,-6148.93 1033.24,-6153.65 1052.26,-6157.36"/>
-<polygon fill="#000000" stroke="#000000" points="1051.63,-6160.8 1062.12,-6159.26 1052.96,-6153.93 1051.63,-6160.8"/>
+<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
+<g id="call~~graph~~CallGraph_edge115" class="edge">
+<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.02,-437C662.16,-437 737.61,-437 787.66,-437"/>
+<polygon fill="#000000" stroke="#000000" points="787.94,-440.5 797.94,-437 787.94,-433.5 787.94,-440.5"/>
 </g>
-<!-- proc~orbel_esolmd -->
-<g id="call~~graph~~CallGraph_node632" class="node">
-<title>proc~orbel_esolmd</title>
-<g id="a_call~~graph~~CallGraph_node632"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1133,-6135 1056,-6135 1056,-6111 1133,-6111 1133,-6135"/>
-<text text-anchor="middle" x="1094.5" y="-6120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+<!-- interface~util_coord_b2h_pl -->
+<g id="call~~graph~~CallGraph_node134" class="node">
+<title>interface~util_coord_b2h_pl</title>
+<g id="a_call~~graph~~CallGraph_node134"><a xlink:href=".././interface/util_coord_b2h_pl.html" xlink:title="util_coord_b2h_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-7216 48.5,-7216 48.5,-7192 145.5,-7192 145.5,-7216"/>
+<text text-anchor="middle" x="97" y="-7201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
-<g id="call~~graph~~CallGraph_edge123" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
-<path fill="none" stroke="#000000" d="M878.65,-6105.17C923.28,-6108.87 997.2,-6115.01 1045.64,-6119.03"/>
-<polygon fill="#000000" stroke="#000000" points="1045.61,-6122.54 1055.87,-6119.88 1046.19,-6115.56 1045.61,-6122.54"/>
-</g>
-<!-- proc~orbel_ehie -->
-<g id="call~~graph~~CallGraph_node635" class="node">
-<title>proc~orbel_ehie</title>
-<g id="a_call~~graph~~CallGraph_node635"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1126,-6093 1063,-6093 1063,-6069 1126,-6069 1126,-6093"/>
-<text text-anchor="middle" x="1094.5" y="-6078.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
+<!-- proc~util_coord_b2h_pl -->
+<g id="call~~graph~~CallGraph_node352" class="node">
+<title>proc~util_coord_b2h_pl</title>
+<g id="a_call~~graph~~CallGraph_node352"><a xlink:href=".././proc/util_coord_b2h_pl.html" xlink:title="util_coord_b2h_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-7216 278.5,-7216 278.5,-7192 375.5,-7192 375.5,-7216"/>
+<text text-anchor="middle" x="327" y="-7201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
-<g id="call~~graph~~CallGraph_edge122" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
-<path fill="none" stroke="#000000" d="M878.65,-6098.83C925.59,-6094.94 1004.95,-6088.35 1052.96,-6084.36"/>
-<polygon fill="#000000" stroke="#000000" points="1053.32,-6087.85 1063,-6083.53 1052.74,-6080.87 1053.32,-6087.85"/>
+<!-- interface~util_coord_b2h_pl&#45;&gt;proc~util_coord_b2h_pl -->
+<g id="call~~graph~~CallGraph_edge116" class="edge">
+<title>interface~util_coord_b2h_pl&#45;&gt;proc~util_coord_b2h_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-7204C181.07,-7204 229.87,-7204 267.77,-7204"/>
+<polygon fill="#000000" stroke="#000000" points="268.15,-7207.5 278.15,-7204 268.15,-7200.5 268.15,-7207.5"/>
 </g>
-<!-- interface~whm_coord_vh2vj_pl -->
-<g id="call~~graph~~CallGraph_node112" class="node">
-<title>interface~whm_coord_vh2vj_pl</title>
-<g id="a_call~~graph~~CallGraph_node112"><a xlink:href=".././interface/whm_coord_vh2vj_pl.html" xlink:title="whm_coord_vh2vj_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="153.5,-6841 40.5,-6841 40.5,-6817 153.5,-6817 153.5,-6841"/>
-<text text-anchor="middle" x="97" y="-6826.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_vh2vj_pl</text>
+<!-- interface~util_coord_b2h_tp -->
+<g id="call~~graph~~CallGraph_node135" class="node">
+<title>interface~util_coord_b2h_tp</title>
+<g id="a_call~~graph~~CallGraph_node135"><a xlink:href=".././interface/util_coord_b2h_tp.html" xlink:title="util_coord_b2h_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="146,-7258 48,-7258 48,-7234 146,-7234 146,-7258"/>
+<text text-anchor="middle" x="97" y="-7243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_coord_vh2vj_pl -->
-<g id="call~~graph~~CallGraph_node547" class="node">
-<title>proc~whm_coord_vh2vj_pl</title>
-<g id="a_call~~graph~~CallGraph_node547"><a xlink:href=".././proc/whm_coord_vh2vj_pl.html" xlink:title="whm_coord_vh2vj_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="383.5,-6841 270.5,-6841 270.5,-6817 383.5,-6817 383.5,-6841"/>
-<text text-anchor="middle" x="327" y="-6826.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_vh2vj_pl</text>
+<!-- proc~util_coord_b2h_tp -->
+<g id="call~~graph~~CallGraph_node248" class="node">
+<title>proc~util_coord_b2h_tp</title>
+<g id="a_call~~graph~~CallGraph_node248"><a xlink:href=".././proc/util_coord_b2h_tp.html" xlink:title="util_coord_b2h_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="376,-7258 278,-7258 278,-7234 376,-7234 376,-7258"/>
+<text text-anchor="middle" x="327" y="-7243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_coord_vh2vj_pl&#45;&gt;proc~whm_coord_vh2vj_pl -->
-<g id="call~~graph~~CallGraph_edge125" class="edge">
-<title>interface~whm_coord_vh2vj_pl&#45;&gt;proc~whm_coord_vh2vj_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.78,-6829C185.91,-6829 226.49,-6829 260.19,-6829"/>
-<polygon fill="#000000" stroke="#000000" points="260.41,-6832.5 270.41,-6829 260.41,-6825.5 260.41,-6832.5"/>
+<!-- interface~util_coord_b2h_tp&#45;&gt;proc~util_coord_b2h_tp -->
+<g id="call~~graph~~CallGraph_edge117" class="edge">
+<title>interface~util_coord_b2h_tp&#45;&gt;proc~util_coord_b2h_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.07,-7246C181.54,-7246 229.98,-7246 267.67,-7246"/>
+<polygon fill="#000000" stroke="#000000" points="267.99,-7249.5 277.99,-7246 267.99,-7242.5 267.99,-7249.5"/>
 </g>
-<!-- interface~whm_drift_pl -->
-<g id="call~~graph~~CallGraph_node113" class="node">
-<title>interface~whm_drift_pl</title>
-<g id="a_call~~graph~~CallGraph_node113"><a xlink:href=".././interface/whm_drift_pl.html" xlink:title="whm_drift_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="611,-650 538,-650 538,-626 611,-626 611,-650"/>
-<text text-anchor="middle" x="574.5" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift_pl</text>
+<!-- interface~util_coord_h2b_pl -->
+<g id="call~~graph~~CallGraph_node136" class="node">
+<title>interface~util_coord_h2b_pl</title>
+<g id="a_call~~graph~~CallGraph_node136"><a xlink:href=".././interface/util_coord_h2b_pl.html" xlink:title="util_coord_h2b_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-7300 48.5,-7300 48.5,-7276 145.5,-7276 145.5,-7300"/>
+<text text-anchor="middle" x="97" y="-7285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_drift_pl -->
-<g id="call~~graph~~CallGraph_node604" class="node">
-<title>proc~whm_drift_pl</title>
-<g id="a_call~~graph~~CallGraph_node604"><a xlink:href=".././proc/whm_drift_pl.html" xlink:title="whm_drift_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="876,-650 803,-650 803,-626 876,-626 876,-650"/>
-<text text-anchor="middle" x="839.5" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift_pl</text>
+<!-- proc~util_coord_h2b_pl -->
+<g id="call~~graph~~CallGraph_node347" class="node">
+<title>proc~util_coord_h2b_pl</title>
+<g id="a_call~~graph~~CallGraph_node347"><a xlink:href=".././proc/util_coord_h2b_pl.html" xlink:title="util_coord_h2b_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-7300 278.5,-7300 278.5,-7276 375.5,-7276 375.5,-7300"/>
+<text text-anchor="middle" x="327" y="-7285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_drift_pl&#45;&gt;proc~whm_drift_pl -->
-<g id="call~~graph~~CallGraph_edge126" class="edge">
-<title>interface~whm_drift_pl&#45;&gt;proc~whm_drift_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.24,-638C658.28,-638 741.03,-638 792.63,-638"/>
-<polygon fill="#000000" stroke="#000000" points="792.84,-641.5 802.84,-638 792.84,-634.5 792.84,-641.5"/>
+<!-- interface~util_coord_h2b_pl&#45;&gt;proc~util_coord_h2b_pl -->
+<g id="call~~graph~~CallGraph_edge118" class="edge">
+<title>interface~util_coord_h2b_pl&#45;&gt;proc~util_coord_h2b_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-7288C181.07,-7288 229.87,-7288 267.77,-7288"/>
+<polygon fill="#000000" stroke="#000000" points="268.15,-7291.5 278.15,-7288 268.15,-7284.5 268.15,-7291.5"/>
 </g>
-<!-- proc~rmvs_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node114" class="node">
-<title>proc~rmvs_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node114"><a xlink:href=".././proc/rmvs_kick_getacch_tp.html" xlink:title="rmvs_kick_getacch_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="386,-7051 268,-7051 268,-7027 386,-7027 386,-7051"/>
-<text text-anchor="middle" x="327" y="-7036.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick_getacch_tp</text>
+<!-- interface~util_coord_h2b_tp -->
+<g id="call~~graph~~CallGraph_node137" class="node">
+<title>interface~util_coord_h2b_tp</title>
+<g id="a_call~~graph~~CallGraph_node137"><a xlink:href=".././interface/util_coord_h2b_tp.html" xlink:title="util_coord_h2b_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="146,-7342 48,-7342 48,-7318 146,-7318 146,-7342"/>
+<text text-anchor="middle" x="97" y="-7327.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_tp</text>
 </a>
 </g>
 </g>
-<!-- whm_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node686" class="node">
-<title>whm_kick_getacch_tp</title>
-<polygon fill="#777777" stroke="#777777" points="633.5,-7051 515.5,-7051 515.5,-7027 633.5,-7027 633.5,-7051"/>
-<text text-anchor="middle" x="574.5" y="-7036.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
-</g>
-<!-- proc~rmvs_kick_getacch_tp&#45;&gt;whm_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge127" class="edge">
-<title>proc~rmvs_kick_getacch_tp&#45;&gt;whm_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" d="M386.18,-7039C421.82,-7039 467.62,-7039 505.01,-7039"/>
-<polygon fill="#000000" stroke="#000000" points="505.31,-7042.5 515.31,-7039 505.31,-7035.5 505.31,-7042.5"/>
-</g>
-<!-- interface~whm_util_index_eucl_plpl -->
-<g id="call~~graph~~CallGraph_node115" class="node">
-<title>interface~whm_util_index_eucl_plpl</title>
-<g id="a_call~~graph~~CallGraph_node115"><a xlink:href=".././interface/whm_util_index_eucl_plpl.html" xlink:title="whm_util_index_eucl_plpl">
-<polygon fill="#a7506f" stroke="#a7506f" points="164,-7093 30,-7093 30,-7069 164,-7069 164,-7093"/>
-<text text-anchor="middle" x="97" y="-7078.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_index_eucl_plpl</text>
+<!-- proc~util_coord_h2b_tp -->
+<g id="call~~graph~~CallGraph_node354" class="node">
+<title>proc~util_coord_h2b_tp</title>
+<g id="a_call~~graph~~CallGraph_node354"><a xlink:href=".././proc/util_coord_h2b_tp.html" xlink:title="util_coord_h2b_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="376,-7342 278,-7342 278,-7318 376,-7318 376,-7342"/>
+<text text-anchor="middle" x="327" y="-7327.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node116" class="node">
-<title>interface~whm_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node116"><a xlink:href=".././interface/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-7135 38.5,-7135 38.5,-7111 155.5,-7111 155.5,-7135"/>
-<text text-anchor="middle" x="97" y="-7120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
+<!-- interface~util_coord_h2b_tp&#45;&gt;proc~util_coord_h2b_tp -->
+<g id="call~~graph~~CallGraph_edge119" class="edge">
+<title>interface~util_coord_h2b_tp&#45;&gt;proc~util_coord_h2b_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.07,-7330C181.54,-7330 229.98,-7330 267.67,-7330"/>
+<polygon fill="#000000" stroke="#000000" points="267.99,-7333.5 277.99,-7330 267.99,-7326.5 267.99,-7333.5"/>
+</g>
+<!-- interface~util_coord_vb2vh_pl -->
+<g id="call~~graph~~CallGraph_node138" class="node">
+<title>interface~util_coord_vb2vh_pl</title>
+<g id="a_call~~graph~~CallGraph_node138"><a xlink:href=".././interface/util_coord_vb2vh_pl.html" xlink:title="util_coord_vb2vh_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="151,-7384 43,-7384 43,-7360 151,-7360 151,-7384"/>
+<text text-anchor="middle" x="97" y="-7369.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node622" class="node">
-<title>proc~whm_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node622"><a xlink:href=".././proc/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-7135 268.5,-7135 268.5,-7111 385.5,-7111 385.5,-7135"/>
-<text text-anchor="middle" x="327" y="-7120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
+<!-- proc~util_coord_vb2vh_pl -->
+<g id="call~~graph~~CallGraph_node256" class="node">
+<title>proc~util_coord_vb2vh_pl</title>
+<g id="a_call~~graph~~CallGraph_node256"><a xlink:href=".././proc/util_coord_vb2vh_pl.html" xlink:title="util_coord_vb2vh_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="381,-7384 273,-7384 273,-7360 381,-7360 381,-7384"/>
+<text text-anchor="middle" x="327" y="-7369.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_edge128" class="edge">
-<title>interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-7123C186.72,-7123 225.45,-7123 258.11,-7123"/>
-<polygon fill="#000000" stroke="#000000" points="258.48,-7126.5 268.48,-7123 258.48,-7119.5 258.48,-7126.5"/>
+<!-- interface~util_coord_vb2vh_pl&#45;&gt;proc~util_coord_vb2vh_pl -->
+<g id="call~~graph~~CallGraph_edge120" class="edge">
+<title>interface~util_coord_vb2vh_pl&#45;&gt;proc~util_coord_vb2vh_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.17,-7372C184.46,-7372 227.55,-7372 262.61,-7372"/>
+<polygon fill="#000000" stroke="#000000" points="262.75,-7375.5 272.75,-7372 262.75,-7368.5 262.75,-7375.5"/>
 </g>
-<!-- interface~whm_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node117" class="node">
-<title>interface~whm_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node117"><a xlink:href=".././interface/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-7177 38,-7177 38,-7153 156,-7153 156,-7177"/>
-<text text-anchor="middle" x="97" y="-7162.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
+<!-- interface~util_coord_vb2vh_tp -->
+<g id="call~~graph~~CallGraph_node139" class="node">
+<title>interface~util_coord_vb2vh_tp</title>
+<g id="a_call~~graph~~CallGraph_node139"><a xlink:href=".././interface/util_coord_vb2vh_tp.html" xlink:title="util_coord_vb2vh_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-7426 42.5,-7426 42.5,-7402 151.5,-7402 151.5,-7426"/>
+<text text-anchor="middle" x="97" y="-7411.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node637" class="node">
-<title>proc~whm_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node637"><a xlink:href=".././proc/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="386,-7177 268,-7177 268,-7153 386,-7153 386,-7177"/>
-<text text-anchor="middle" x="327" y="-7162.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
+<!-- proc~util_coord_vb2vh_tp -->
+<g id="call~~graph~~CallGraph_node263" class="node">
+<title>proc~util_coord_vb2vh_tp</title>
+<g id="a_call~~graph~~CallGraph_node263"><a xlink:href=".././proc/util_coord_vb2vh_tp.html" xlink:title="util_coord_vb2vh_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-7426 272.5,-7426 272.5,-7402 381.5,-7402 381.5,-7426"/>
+<text text-anchor="middle" x="327" y="-7411.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge129" class="edge">
-<title>interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-7165C187.08,-7165 225.33,-7165 257.7,-7165"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-7168.5 267.98,-7165 257.98,-7161.5 257.98,-7168.5"/>
+<!-- interface~util_coord_vb2vh_tp&#45;&gt;proc~util_coord_vb2vh_tp -->
+<g id="call~~graph~~CallGraph_edge121" class="edge">
+<title>interface~util_coord_vb2vh_tp&#45;&gt;proc~util_coord_vb2vh_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-7414C184.82,-7414 227.38,-7414 262.17,-7414"/>
+<polygon fill="#000000" stroke="#000000" points="262.22,-7417.5 272.22,-7414 262.22,-7410.5 262.22,-7417.5"/>
 </g>
-<!-- proc~operator_cross_el_i8b -->
-<g id="call~~graph~~CallGraph_node118" class="node">
-<title>proc~operator_cross_el_i8b</title>
-<g id="a_call~~graph~~CallGraph_node118"><a xlink:href=".././proc/operator_cross_el_i8b.html" xlink:title="operator_cross_el_i8b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-7219 37.5,-7219 37.5,-7195 156.5,-7195 156.5,-7219"/>
-<text text-anchor="middle" x="97" y="-7204.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i8b</text>
+<!-- interface~util_coord_vh2vb_pl -->
+<g id="call~~graph~~CallGraph_node140" class="node">
+<title>interface~util_coord_vh2vb_pl</title>
+<g id="a_call~~graph~~CallGraph_node140"><a xlink:href=".././interface/util_coord_vh2vb_pl.html" xlink:title="util_coord_vh2vb_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="151,-7468 43,-7468 43,-7444 151,-7444 151,-7468"/>
+<text text-anchor="middle" x="97" y="-7453.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_p3solve -->
-<g id="call~~graph~~CallGraph_node119" class="node">
-<title>proc~drift_kepu_p3solve</title>
-<g id="a_call~~graph~~CallGraph_node119"><a xlink:href=".././proc/drift_kepu_p3solve.html" xlink:title="drift_kepu_p3solve">
-<polygon fill="#d9534f" stroke="#d9534f" points="1391,-6219 1288,-6219 1288,-6195 1391,-6195 1391,-6219"/>
-<text text-anchor="middle" x="1339.5" y="-6204.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_p3solve</text>
+<!-- proc~util_coord_vh2vb_pl -->
+<g id="call~~graph~~CallGraph_node268" class="node">
+<title>proc~util_coord_vh2vb_pl</title>
+<g id="a_call~~graph~~CallGraph_node268"><a xlink:href=".././proc/util_coord_vh2vb_pl.html" xlink:title="util_coord_vh2vb_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="381,-7468 273,-7468 273,-7444 381,-7444 381,-7468"/>
+<text text-anchor="middle" x="327" y="-7453.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_vh_pl -->
-<g id="call~~graph~~CallGraph_node120" class="node">
-<title>interface~whm_kick_vh_pl</title>
-<g id="a_call~~graph~~CallGraph_node120"><a xlink:href=".././interface/whm_kick_vh_pl.html" xlink:title="whm_kick_vh_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-7261 51.5,-7261 51.5,-7237 142.5,-7237 142.5,-7261"/>
-<text text-anchor="middle" x="97" y="-7246.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_pl</text>
+<!-- interface~util_coord_vh2vb_pl&#45;&gt;proc~util_coord_vh2vb_pl -->
+<g id="call~~graph~~CallGraph_edge122" class="edge">
+<title>interface~util_coord_vh2vb_pl&#45;&gt;proc~util_coord_vh2vb_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.17,-7456C184.46,-7456 227.55,-7456 262.61,-7456"/>
+<polygon fill="#000000" stroke="#000000" points="262.75,-7459.5 272.75,-7456 262.75,-7452.5 262.75,-7459.5"/>
+</g>
+<!-- interface~util_coord_vh2vb_tp -->
+<g id="call~~graph~~CallGraph_node141" class="node">
+<title>interface~util_coord_vh2vb_tp</title>
+<g id="a_call~~graph~~CallGraph_node141"><a xlink:href=".././interface/util_coord_vh2vb_tp.html" xlink:title="util_coord_vh2vb_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-7510 42.5,-7510 42.5,-7486 151.5,-7486 151.5,-7510"/>
+<text text-anchor="middle" x="97" y="-7495.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_vh_pl -->
-<g id="call~~graph~~CallGraph_node673" class="node">
-<title>proc~whm_kick_vh_pl</title>
-<g id="a_call~~graph~~CallGraph_node673"><a xlink:href=".././proc/whm_kick_vh_pl.html" xlink:title="whm_kick_vh_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-7261 281.5,-7261 281.5,-7237 372.5,-7237 372.5,-7261"/>
-<text text-anchor="middle" x="327" y="-7246.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_pl</text>
+<!-- proc~util_coord_vh2vb_tp -->
+<g id="call~~graph~~CallGraph_node274" class="node">
+<title>proc~util_coord_vh2vb_tp</title>
+<g id="a_call~~graph~~CallGraph_node274"><a xlink:href=".././proc/util_coord_vh2vb_tp.html" xlink:title="util_coord_vh2vb_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-7510 272.5,-7510 272.5,-7486 381.5,-7486 381.5,-7510"/>
+<text text-anchor="middle" x="327" y="-7495.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_vh_pl&#45;&gt;proc~whm_kick_vh_pl -->
-<g id="call~~graph~~CallGraph_edge130" class="edge">
-<title>interface~whm_kick_vh_pl&#45;&gt;proc~whm_kick_vh_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-7249C179.26,-7249 231.61,-7249 270.99,-7249"/>
-<polygon fill="#000000" stroke="#000000" points="271.22,-7252.5 281.22,-7249 271.22,-7245.5 271.22,-7252.5"/>
+<!-- interface~util_coord_vh2vb_tp&#45;&gt;proc~util_coord_vh2vb_tp -->
+<g id="call~~graph~~CallGraph_edge123" class="edge">
+<title>interface~util_coord_vh2vb_tp&#45;&gt;proc~util_coord_vh2vb_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-7498C184.82,-7498 227.38,-7498 262.17,-7498"/>
+<polygon fill="#000000" stroke="#000000" points="262.22,-7501.5 272.22,-7498 262.22,-7494.5 262.22,-7501.5"/>
 </g>
-<!-- interface~whm_kick_vh_tp -->
-<g id="call~~graph~~CallGraph_node121" class="node">
-<title>interface~whm_kick_vh_tp</title>
-<g id="a_call~~graph~~CallGraph_node121"><a xlink:href=".././interface/whm_kick_vh_tp.html" xlink:title="whm_kick_vh_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-7303 51.5,-7303 51.5,-7279 142.5,-7279 142.5,-7303"/>
-<text text-anchor="middle" x="97" y="-7288.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_tp</text>
+<!-- interface~util_coord_xh2xb_pl -->
+<g id="call~~graph~~CallGraph_node142" class="node">
+<title>interface~util_coord_xh2xb_pl</title>
+<g id="a_call~~graph~~CallGraph_node142"><a xlink:href=".././interface/util_coord_xh2xb_pl.html" xlink:title="util_coord_xh2xb_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="151,-7552 43,-7552 43,-7528 151,-7528 151,-7552"/>
+<text text-anchor="middle" x="97" y="-7537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_vh_tp -->
-<g id="call~~graph~~CallGraph_node653" class="node">
-<title>proc~whm_kick_vh_tp</title>
-<g id="a_call~~graph~~CallGraph_node653"><a xlink:href=".././proc/whm_kick_vh_tp.html" xlink:title="whm_kick_vh_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-7303 281.5,-7303 281.5,-7279 372.5,-7279 372.5,-7303"/>
-<text text-anchor="middle" x="327" y="-7288.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_tp</text>
+<!-- proc~util_coord_xh2xb_pl -->
+<g id="call~~graph~~CallGraph_node283" class="node">
+<title>proc~util_coord_xh2xb_pl</title>
+<g id="a_call~~graph~~CallGraph_node283"><a xlink:href=".././proc/util_coord_xh2xb_pl.html" xlink:title="util_coord_xh2xb_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="381,-7552 273,-7552 273,-7528 381,-7528 381,-7552"/>
+<text text-anchor="middle" x="327" y="-7537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_vh_tp&#45;&gt;proc~whm_kick_vh_tp -->
-<g id="call~~graph~~CallGraph_edge131" class="edge">
-<title>interface~whm_kick_vh_tp&#45;&gt;proc~whm_kick_vh_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-7291C179.26,-7291 231.61,-7291 270.99,-7291"/>
-<polygon fill="#000000" stroke="#000000" points="271.22,-7294.5 281.22,-7291 271.22,-7287.5 271.22,-7294.5"/>
+<!-- interface~util_coord_xh2xb_pl&#45;&gt;proc~util_coord_xh2xb_pl -->
+<g id="call~~graph~~CallGraph_edge124" class="edge">
+<title>interface~util_coord_xh2xb_pl&#45;&gt;proc~util_coord_xh2xb_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.17,-7540C184.46,-7540 227.55,-7540 262.61,-7540"/>
+<polygon fill="#000000" stroke="#000000" points="262.75,-7543.5 272.75,-7540 262.75,-7536.5 262.75,-7543.5"/>
 </g>
-<!-- interface~whm_gr_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node122" class="node">
-<title>interface~whm_gr_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node122"><a xlink:href=".././interface/whm_gr_kick_getacch_pl.html" xlink:title="whm_gr_kick_getacch_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-7471 30.5,-7471 30.5,-7447 163.5,-7447 163.5,-7471"/>
-<text text-anchor="middle" x="97" y="-7456.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_pl</text>
+<!-- interface~util_coord_xh2xb_tp -->
+<g id="call~~graph~~CallGraph_node143" class="node">
+<title>interface~util_coord_xh2xb_tp</title>
+<g id="a_call~~graph~~CallGraph_node143"><a xlink:href=".././interface/util_coord_xh2xb_tp.html" xlink:title="util_coord_xh2xb_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-7594 42.5,-7594 42.5,-7570 151.5,-7570 151.5,-7594"/>
+<text text-anchor="middle" x="97" y="-7579.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_gr_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node544" class="node">
-<title>proc~whm_gr_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node544"><a xlink:href=".././proc/whm_gr_kick_getacch_pl.html" xlink:title="whm_gr_kick_getacch_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-7471 260.5,-7471 260.5,-7447 393.5,-7447 393.5,-7471"/>
-<text text-anchor="middle" x="327" y="-7456.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_pl</text>
+<!-- proc~util_coord_xh2xb_tp -->
+<g id="call~~graph~~CallGraph_node290" class="node">
+<title>proc~util_coord_xh2xb_tp</title>
+<g id="a_call~~graph~~CallGraph_node290"><a xlink:href=".././proc/util_coord_xh2xb_tp.html" xlink:title="util_coord_xh2xb_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-7594 272.5,-7594 272.5,-7570 381.5,-7570 381.5,-7594"/>
+<text text-anchor="middle" x="327" y="-7579.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_gr_kick_getacch_pl&#45;&gt;proc~whm_gr_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_edge132" class="edge">
-<title>interface~whm_gr_kick_getacch_pl&#45;&gt;proc~whm_gr_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-7459C190.71,-7459 222.24,-7459 250.27,-7459"/>
-<polygon fill="#000000" stroke="#000000" points="250.43,-7462.5 260.43,-7459 250.43,-7455.5 250.43,-7462.5"/>
+<!-- interface~util_coord_xh2xb_tp&#45;&gt;proc~util_coord_xh2xb_tp -->
+<g id="call~~graph~~CallGraph_edge125" class="edge">
+<title>interface~util_coord_xh2xb_tp&#45;&gt;proc~util_coord_xh2xb_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-7582C184.82,-7582 227.38,-7582 262.17,-7582"/>
+<polygon fill="#000000" stroke="#000000" points="262.22,-7585.5 272.22,-7582 262.22,-7578.5 262.22,-7585.5"/>
 </g>
-<!-- interface~whm_gr_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node123" class="node">
-<title>interface~whm_gr_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node123"><a xlink:href=".././interface/whm_gr_kick_getacch_tp.html" xlink:title="whm_gr_kick_getacch_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-7345 30.5,-7345 30.5,-7321 163.5,-7321 163.5,-7345"/>
-<text text-anchor="middle" x="97" y="-7330.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_tp</text>
+<!-- interface~util_copy_encounter -->
+<g id="call~~graph~~CallGraph_node144" class="node">
+<title>interface~util_copy_encounter</title>
+<g id="a_call~~graph~~CallGraph_node144"><a xlink:href=".././interface/util_copy_encounter.html" xlink:title="util_copy_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-7636 42.5,-7636 42.5,-7612 151.5,-7612 151.5,-7636"/>
+<text text-anchor="middle" x="97" y="-7621.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_gr_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node575" class="node">
-<title>proc~whm_gr_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node575"><a xlink:href=".././proc/whm_gr_kick_getacch_tp.html" xlink:title="whm_gr_kick_getacch_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-7345 260.5,-7345 260.5,-7321 393.5,-7321 393.5,-7345"/>
-<text text-anchor="middle" x="327" y="-7330.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_tp</text>
+<!-- proc~util_copy_encounter -->
+<g id="call~~graph~~CallGraph_node307" class="node">
+<title>proc~util_copy_encounter</title>
+<g id="a_call~~graph~~CallGraph_node307"><a xlink:href=".././proc/util_copy_encounter.html" xlink:title="util_copy_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-7636 272.5,-7636 272.5,-7612 381.5,-7612 381.5,-7636"/>
+<text text-anchor="middle" x="327" y="-7621.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_gr_kick_getacch_tp&#45;&gt;proc~whm_gr_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge133" class="edge">
-<title>interface~whm_gr_kick_getacch_tp&#45;&gt;proc~whm_gr_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-7333C190.71,-7333 222.24,-7333 250.27,-7333"/>
-<polygon fill="#000000" stroke="#000000" points="250.43,-7336.5 260.43,-7333 250.43,-7329.5 250.43,-7336.5"/>
+<!-- interface~util_copy_encounter&#45;&gt;proc~util_copy_encounter -->
+<g id="call~~graph~~CallGraph_edge126" class="edge">
+<title>interface~util_copy_encounter&#45;&gt;proc~util_copy_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-7624C184.82,-7624 227.38,-7624 262.17,-7624"/>
+<polygon fill="#000000" stroke="#000000" points="262.22,-7627.5 272.22,-7624 262.22,-7620.5 262.22,-7627.5"/>
 </g>
-<!-- interface~whm_gr_p4_pl -->
-<g id="call~~graph~~CallGraph_node124" class="node">
-<title>interface~whm_gr_p4_pl</title>
-<g id="a_call~~graph~~CallGraph_node124"><a xlink:href=".././interface/whm_gr_p4_pl.html" xlink:title="whm_gr_p4_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-7639 55.5,-7639 55.5,-7615 138.5,-7615 138.5,-7639"/>
-<text text-anchor="middle" x="97" y="-7624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_pl</text>
+<!-- interface~util_copy_particle_info -->
+<g id="call~~graph~~CallGraph_node145" class="node">
+<title>interface~util_copy_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node145"><a xlink:href=".././interface/util_copy_particle_info.html" xlink:title="util_copy_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-7678 38,-7678 38,-7654 156,-7654 156,-7678"/>
+<text text-anchor="middle" x="97" y="-7663.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_gr_p4_pl -->
-<g id="call~~graph~~CallGraph_node578" class="node">
-<title>proc~whm_gr_p4_pl</title>
-<g id="a_call~~graph~~CallGraph_node578"><a xlink:href=".././proc/whm_gr_p4_pl.html" xlink:title="whm_gr_p4_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-7639 285.5,-7639 285.5,-7615 368.5,-7615 368.5,-7639"/>
-<text text-anchor="middle" x="327" y="-7624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_pl</text>
+<!-- proc~util_copy_particle_info -->
+<g id="call~~graph~~CallGraph_node328" class="node">
+<title>proc~util_copy_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node328"><a xlink:href=".././proc/util_copy_particle_info.html" xlink:title="util_copy_particle_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="386,-7678 268,-7678 268,-7654 386,-7654 386,-7678"/>
+<text text-anchor="middle" x="327" y="-7663.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_gr_p4_pl&#45;&gt;proc~whm_gr_p4_pl -->
-<g id="call~~graph~~CallGraph_edge134" class="edge">
-<title>interface~whm_gr_p4_pl&#45;&gt;proc~whm_gr_p4_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-7627C176.9,-7627 234.01,-7627 275.12,-7627"/>
-<polygon fill="#000000" stroke="#000000" points="275.21,-7630.5 285.21,-7627 275.21,-7623.5 275.21,-7630.5"/>
+<!-- interface~util_copy_particle_info&#45;&gt;proc~util_copy_particle_info -->
+<g id="call~~graph~~CallGraph_edge127" class="edge">
+<title>interface~util_copy_particle_info&#45;&gt;proc~util_copy_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-7666C187.08,-7666 225.33,-7666 257.7,-7666"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-7669.5 267.98,-7666 257.98,-7662.5 257.98,-7669.5"/>
 </g>
-<!-- proc~rmvs_io_write_encounter -->
-<g id="call~~graph~~CallGraph_node125" class="node">
-<title>proc~rmvs_io_write_encounter</title>
-<g id="a_call~~graph~~CallGraph_node125"><a xlink:href=".././proc/rmvs_io_write_encounter.html" xlink:title="rmvs_io_write_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="906,-1310 773,-1310 773,-1286 906,-1286 906,-1310"/>
-<text text-anchor="middle" x="839.5" y="-1295.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io_write_encounter</text>
+<!-- proc~netcdf_write_particle_info_base -->
+<g id="call~~graph~~CallGraph_node146" class="node">
+<title>proc~netcdf_write_particle_info_base</title>
+<g id="a_call~~graph~~CallGraph_node146"><a xlink:href=".././proc/netcdf_write_particle_info_base.html" xlink:title="netcdf_write_particle_info_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="921,-177 758,-177 758,-153 921,-153 921,-177"/>
+<text text-anchor="middle" x="839.5" y="-162.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- io_write_frame_encounter -->
-<g id="call~~graph~~CallGraph_node711" class="node">
-<title>io_write_frame_encounter</title>
-<polygon fill="#777777" stroke="#777777" points="1163,-1258 1026,-1258 1026,-1234 1163,-1234 1163,-1258"/>
-<text text-anchor="middle" x="1094.5" y="-1243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
+<!-- proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort -->
+<g id="call~~graph~~CallGraph_edge130" class="edge">
+<title>proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M905.62,-177.03C921.46,-179.96 938.34,-183.09 954,-186 989.01,-192.5 1028.95,-199.95 1057.1,-205.2"/>
+<polygon fill="#000000" stroke="#000000" points="1056.8,-208.71 1067.28,-207.1 1058.09,-201.83 1056.8,-208.71"/>
 </g>
-<!-- proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter -->
-<g id="call~~graph~~CallGraph_edge135" class="edge">
-<title>proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter</title>
-<path fill="none" stroke="#000000" d="M906.12,-1286.87C921.86,-1283.93 938.57,-1280.56 954,-1277 970.18,-1273.26 973.85,-1270.88 990,-1267 999.93,-1264.62 1010.44,-1262.28 1020.8,-1260.07"/>
-<polygon fill="#000000" stroke="#000000" points="1021.6,-1263.48 1030.67,-1258.01 1020.17,-1256.63 1021.6,-1263.48"/>
+<!-- proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var -->
+<g id="call~~graph~~CallGraph_edge129" class="edge">
+<title>proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var</title>
+<path fill="none" stroke="#000000" d="M921.25,-153.19C962.44,-147.17 1011.12,-140.05 1046.21,-134.92"/>
+<polygon fill="#000000" stroke="#000000" points="1046.79,-138.37 1056.18,-133.46 1045.78,-131.44 1046.79,-138.37"/>
 </g>
-<!-- proc~rmvs_io_write_encounter&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge136" class="edge">
-<title>proc~rmvs_io_write_encounter&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M906.06,-1298.72C923.6,-1295.76 941.21,-1289.43 954,-1277 1008.75,-1223.77 940.91,-1167.49 990,-1109 1006.86,-1088.91 1034.81,-1078.32 1057.41,-1072.8"/>
-<polygon fill="#000000" stroke="#000000" points="1058.35,-1076.18 1067.36,-1070.61 1056.84,-1069.35 1058.35,-1076.18"/>
+<!-- proc~netcdf_write_particle_info_base&#45;&gt;nf90_set_fill -->
+<g id="call~~graph~~CallGraph_edge128" class="edge">
+<title>proc~netcdf_write_particle_info_base&#45;&gt;nf90_set_fill</title>
+<path fill="none" stroke="#000000" d="M921.25,-166.6C963.45,-167.43 1013.5,-168.42 1048.74,-169.12"/>
+<polygon fill="#000000" stroke="#000000" points="1049.11,-172.62 1059.18,-169.32 1049.25,-165.62 1049.11,-172.62"/>
 </g>
-<!-- interface~whm_gr_p4_tp -->
-<g id="call~~graph~~CallGraph_node126" class="node">
-<title>interface~whm_gr_p4_tp</title>
-<g id="a_call~~graph~~CallGraph_node126"><a xlink:href=".././interface/whm_gr_p4_tp.html" xlink:title="whm_gr_p4_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="139,-7513 55,-7513 55,-7489 139,-7489 139,-7513"/>
-<text text-anchor="middle" x="97" y="-7498.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_tp</text>
+<!-- interface~util_copy_particle_info_arr -->
+<g id="call~~graph~~CallGraph_node147" class="node">
+<title>interface~util_copy_particle_info_arr</title>
+<g id="a_call~~graph~~CallGraph_node147"><a xlink:href=".././interface/util_copy_particle_info_arr.html" xlink:title="util_copy_particle_info_arr">
+<polygon fill="#a7506f" stroke="#a7506f" points="396,-7762 258,-7762 258,-7738 396,-7738 396,-7762"/>
+<text text-anchor="middle" x="327" y="-7747.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info_arr</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_gr_p4_tp -->
-<g id="call~~graph~~CallGraph_node589" class="node">
-<title>proc~whm_gr_p4_tp</title>
-<g id="a_call~~graph~~CallGraph_node589"><a xlink:href=".././proc/whm_gr_p4_tp.html" xlink:title="whm_gr_p4_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="369,-7513 285,-7513 285,-7489 369,-7489 369,-7513"/>
-<text text-anchor="middle" x="327" y="-7498.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_tp</text>
+<!-- proc~util_copy_particle_info_arr -->
+<g id="call~~graph~~CallGraph_node329" class="node">
+<title>proc~util_copy_particle_info_arr</title>
+<g id="a_call~~graph~~CallGraph_node329"><a xlink:href=".././proc/util_copy_particle_info_arr.html" xlink:title="util_copy_particle_info_arr">
+<polygon fill="#d9534f" stroke="#d9534f" points="643.5,-7762 505.5,-7762 505.5,-7738 643.5,-7738 643.5,-7762"/>
+<text text-anchor="middle" x="574.5" y="-7747.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info_arr</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_gr_p4_tp&#45;&gt;proc~whm_gr_p4_tp -->
-<g id="call~~graph~~CallGraph_edge137" class="edge">
-<title>interface~whm_gr_p4_tp&#45;&gt;proc~whm_gr_p4_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.03,-7501C177.08,-7501 233.86,-7501 274.86,-7501"/>
-<polygon fill="#000000" stroke="#000000" points="274.92,-7504.5 284.92,-7501 274.92,-7497.5 274.92,-7504.5"/>
+<!-- interface~util_copy_particle_info_arr&#45;&gt;proc~util_copy_particle_info_arr -->
+<g id="call~~graph~~CallGraph_edge131" class="edge">
+<title>interface~util_copy_particle_info_arr&#45;&gt;proc~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.06,-7750C426.79,-7750 463.27,-7750 495.14,-7750"/>
+<polygon fill="#000000" stroke="#000000" points="495.31,-7753.5 505.31,-7750 495.31,-7746.5 495.31,-7753.5"/>
 </g>
-<!-- interface~whm_setup_pl -->
-<g id="call~~graph~~CallGraph_node127" class="node">
-<title>interface~whm_setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node127"><a xlink:href=".././interface/whm_setup_pl.html" xlink:title="whm_setup_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="615.5,-4872 533.5,-4872 533.5,-4848 615.5,-4848 615.5,-4872"/>
-<text text-anchor="middle" x="574.5" y="-4857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_pl</text>
+<!-- proc~util_exit -->
+<g id="call~~graph~~CallGraph_node640" class="node">
+<title>proc~util_exit</title>
+<g id="a_call~~graph~~CallGraph_node640"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<polygon fill="#d9534f" stroke="#d9534f" points="1366.5,-911 1312.5,-911 1312.5,-887 1366.5,-887 1366.5,-911"/>
+<text text-anchor="middle" x="1339.5" y="-896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_setup_pl -->
-<g id="call~~graph~~CallGraph_node268" class="node">
-<title>proc~whm_setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node268"><a xlink:href=".././proc/whm_setup_pl.html" xlink:title="whm_setup_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="880.5,-4872 798.5,-4872 798.5,-4848 880.5,-4848 880.5,-4872"/>
-<text text-anchor="middle" x="839.5" y="-4857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_pl</text>
-</a>
+<!-- interface~util_exit&#45;&gt;proc~util_exit -->
+<g id="call~~graph~~CallGraph_edge132" class="edge">
+<title>interface~util_exit&#45;&gt;proc~util_exit</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1121.51,-899C1164.96,-899 1252.46,-899 1302.04,-899"/>
+<polygon fill="#000000" stroke="#000000" points="1302.31,-902.5 1312.31,-899 1302.31,-895.5 1302.31,-902.5"/>
 </g>
+<!-- interface~util_fill_body -->
+<g id="call~~graph~~CallGraph_node149" class="node">
+<title>interface~util_fill_body</title>
+<g id="a_call~~graph~~CallGraph_node149"><a xlink:href=".././interface/util_fill_body.html" xlink:title="util_fill_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="610,-7876 539,-7876 539,-7852 610,-7852 610,-7876"/>
+<text text-anchor="middle" x="574.5" y="-7861.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_body</text>
+</a>
 </g>
-<!-- interface~whm_setup_pl&#45;&gt;proc~whm_setup_pl -->
-<g id="call~~graph~~CallGraph_edge138" class="edge">
-<title>interface~whm_setup_pl&#45;&gt;proc~whm_setup_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.73,-4860C661.94,-4860 737.83,-4860 787.98,-4860"/>
-<polygon fill="#000000" stroke="#000000" points="788.27,-4863.5 798.27,-4860 788.27,-4856.5 788.27,-4863.5"/>
 </g>
-<!-- proc~io_read_in_particle_info -->
-<g id="call~~graph~~CallGraph_node128" class="node">
-<title>proc~io_read_in_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node128"><a xlink:href=".././proc/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="903,-3028 776,-3028 776,-3004 903,-3004 903,-3028"/>
-<text text-anchor="middle" x="839.5" y="-3013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
+<!-- proc~util_fill_body -->
+<g id="call~~graph~~CallGraph_node659" class="node">
+<title>proc~util_fill_body</title>
+<g id="a_call~~graph~~CallGraph_node659"><a xlink:href=".././proc/util_fill_body.html" xlink:title="util_fill_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="875,-7876 804,-7876 804,-7852 875,-7852 875,-7876"/>
+<text text-anchor="middle" x="839.5" y="-7861.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_body</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_in_particle_info&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge139" class="edge">
-<title>proc~io_read_in_particle_info&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M903.26,-3011.55C920.45,-3008.46 938.59,-3003.36 954,-2995 1010.85,-2964.14 1057.99,-2901.79 1080.05,-2869.09"/>
-<polygon fill="#000000" stroke="#000000" points="1083.24,-2870.61 1085.84,-2860.34 1077.4,-2866.75 1083.24,-2870.61"/>
+<!-- interface~util_fill_body&#45;&gt;proc~util_fill_body -->
+<g id="call~~graph~~CallGraph_edge133" class="edge">
+<title>interface~util_fill_body&#45;&gt;proc~util_fill_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.15,-7864C657.26,-7864 741.58,-7864 793.52,-7864"/>
+<polygon fill="#000000" stroke="#000000" points="793.77,-7867.5 803.77,-7864 793.77,-7860.5 793.77,-7867.5"/>
 </g>
-<!-- interface~whm_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node129" class="node">
-<title>interface~whm_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node129"><a xlink:href=".././interface/whm_setup_initialize_system.html" xlink:title="whm_setup_initialize_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="172.5,-7681 21.5,-7681 21.5,-7657 172.5,-7657 172.5,-7681"/>
-<text text-anchor="middle" x="97" y="-7666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_initialize_system</text>
+<!-- interface~util_fill_pl -->
+<g id="call~~graph~~CallGraph_node150" class="node">
+<title>interface~util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node150"><a xlink:href=".././interface/util_fill_pl.html" xlink:title="util_fill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="125,-7907 69,-7907 69,-7883 125,-7883 125,-7907"/>
+<text text-anchor="middle" x="97" y="-7892.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node270" class="node">
-<title>proc~whm_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node270"><a xlink:href=".././proc/whm_setup_initialize_system.html" xlink:title="whm_setup_initialize_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="402.5,-7681 251.5,-7681 251.5,-7657 402.5,-7657 402.5,-7681"/>
-<text text-anchor="middle" x="327" y="-7666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_initialize_system</text>
+<!-- proc~util_fill_pl -->
+<g id="call~~graph~~CallGraph_node665" class="node">
+<title>proc~util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node665"><a xlink:href=".././proc/util_fill_pl.html" xlink:title="util_fill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="355,-7907 299,-7907 299,-7883 355,-7883 355,-7907"/>
+<text text-anchor="middle" x="327" y="-7892.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_setup_initialize_system&#45;&gt;proc~whm_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge140" class="edge">
-<title>interface~whm_setup_initialize_system&#45;&gt;proc~whm_setup_initialize_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.66,-7669C194.5,-7669 218.55,-7669 240.99,-7669"/>
-<polygon fill="#000000" stroke="#000000" points="241.18,-7672.5 251.18,-7669 241.18,-7665.5 241.18,-7672.5"/>
+<!-- interface~util_fill_pl&#45;&gt;proc~util_fill_pl -->
+<g id="call~~graph~~CallGraph_edge134" class="edge">
+<title>interface~util_fill_pl&#45;&gt;proc~util_fill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M125.05,-7895C165.76,-7895 242.89,-7895 288.85,-7895"/>
+<polygon fill="#000000" stroke="#000000" points="288.99,-7898.5 298.99,-7895 288.99,-7891.5 288.99,-7898.5"/>
 </g>
-<!-- interface~whm_step_pl -->
-<g id="call~~graph~~CallGraph_node130" class="node">
-<title>interface~whm_step_pl</title>
-<g id="a_call~~graph~~CallGraph_node130"><a xlink:href=".././interface/whm_step_pl.html" xlink:title="whm_step_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="135,-7723 59,-7723 59,-7699 135,-7699 135,-7723"/>
-<text text-anchor="middle" x="97" y="-7708.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_pl</text>
+<!-- interface~util_fill_tp -->
+<g id="call~~graph~~CallGraph_node151" class="node">
+<title>interface~util_fill_tp</title>
+<g id="a_call~~graph~~CallGraph_node151"><a xlink:href=".././interface/util_fill_tp.html" xlink:title="util_fill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="125.5,-7846 68.5,-7846 68.5,-7822 125.5,-7822 125.5,-7846"/>
+<text text-anchor="middle" x="97" y="-7831.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_step_pl -->
-<g id="call~~graph~~CallGraph_node606" class="node">
-<title>proc~whm_step_pl</title>
-<g id="a_call~~graph~~CallGraph_node606"><a xlink:href=".././proc/whm_step_pl.html" xlink:title="whm_step_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="365,-7723 289,-7723 289,-7699 365,-7699 365,-7723"/>
-<text text-anchor="middle" x="327" y="-7708.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_pl</text>
+<!-- proc~util_fill_tp -->
+<g id="call~~graph~~CallGraph_node682" class="node">
+<title>proc~util_fill_tp</title>
+<g id="a_call~~graph~~CallGraph_node682"><a xlink:href=".././proc/util_fill_tp.html" xlink:title="util_fill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="355.5,-7846 298.5,-7846 298.5,-7822 355.5,-7822 355.5,-7846"/>
+<text text-anchor="middle" x="327" y="-7831.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_step_pl&#45;&gt;proc~whm_step_pl -->
-<g id="call~~graph~~CallGraph_edge141" class="edge">
-<title>interface~whm_step_pl&#45;&gt;proc~whm_step_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-7711C174.31,-7711 236.14,-7711 278.75,-7711"/>
-<polygon fill="#000000" stroke="#000000" points="278.88,-7714.5 288.88,-7711 278.88,-7707.5 278.88,-7714.5"/>
+<!-- interface~util_fill_tp&#45;&gt;proc~util_fill_tp -->
+<g id="call~~graph~~CallGraph_edge135" class="edge">
+<title>interface~util_fill_tp&#45;&gt;proc~util_fill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M125.5,-7834C166.16,-7834 242.42,-7834 288.27,-7834"/>
+<polygon fill="#000000" stroke="#000000" points="288.4,-7837.5 298.4,-7834 288.4,-7830.5 288.4,-7837.5"/>
 </g>
-<!-- interface~whm_step_system -->
-<g id="call~~graph~~CallGraph_node131" class="node">
-<title>interface~whm_step_system</title>
-<g id="a_call~~graph~~CallGraph_node131"><a xlink:href=".././interface/whm_step_system.html" xlink:title="whm_step_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="147.5,-7765 46.5,-7765 46.5,-7741 147.5,-7741 147.5,-7765"/>
-<text text-anchor="middle" x="97" y="-7750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+<!-- interface~io_write_frame_body -->
+<g id="call~~graph~~CallGraph_node152" class="node">
+<title>interface~io_write_frame_body</title>
+<g id="a_call~~graph~~CallGraph_node152"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-1163 518.5,-1163 518.5,-1139 630.5,-1139 630.5,-1163"/>
+<text text-anchor="middle" x="574.5" y="-1148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_step_system -->
-<g id="call~~graph~~CallGraph_node595" class="node">
-<title>proc~whm_step_system</title>
-<g id="a_call~~graph~~CallGraph_node595"><a xlink:href=".././proc/whm_step_system.html" xlink:title="whm_step_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="377.5,-7765 276.5,-7765 276.5,-7741 377.5,-7741 377.5,-7765"/>
-<text text-anchor="middle" x="327" y="-7750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+<!-- proc~io_write_frame_body -->
+<g id="call~~graph~~CallGraph_node331" class="node">
+<title>proc~io_write_frame_body</title>
+<g id="a_call~~graph~~CallGraph_node331"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-1163 783.5,-1163 783.5,-1139 895.5,-1139 895.5,-1163"/>
+<text text-anchor="middle" x="839.5" y="-1148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_step_system&#45;&gt;proc~whm_step_system -->
+<!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
+<g id="call~~graph~~CallGraph_edge136" class="edge">
+<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-1151C672.19,-1151 729.31,-1151 773.16,-1151"/>
+<polygon fill="#000000" stroke="#000000" points="773.44,-1154.5 783.44,-1151 773.44,-1147.5 773.44,-1154.5"/>
+</g>
+<!-- proc~whm_coord_h2j_pl -->
+<g id="call~~graph~~CallGraph_node153" class="node">
+<title>proc~whm_coord_h2j_pl</title>
+<g id="a_call~~graph~~CallGraph_node153"><a xlink:href=".././proc/whm_coord_h2j_pl.html" xlink:title="whm_coord_h2j_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-8040 275.5,-8040 275.5,-8016 378.5,-8016 378.5,-8040"/>
+<text text-anchor="middle" x="327" y="-8025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_h2j_pl</text>
+</a>
+</g>
+</g>
+<!-- gmpl -->
+<g id="call~~graph~~CallGraph_node723" class="node">
+<title>gmpl</title>
+<polygon fill="#777777" stroke="#777777" points="601.5,-8166 547.5,-8166 547.5,-8142 601.5,-8142 601.5,-8166"/>
+<text text-anchor="middle" x="574.5" y="-8151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
+</g>
+<!-- proc~whm_coord_h2j_pl&#45;&gt;gmpl -->
 <g id="call~~graph~~CallGraph_edge142" class="edge">
-<title>interface~whm_step_system&#45;&gt;proc~whm_step_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.75,-7753C182.61,-7753 229.35,-7753 266.23,-7753"/>
-<polygon fill="#000000" stroke="#000000" points="266.35,-7756.5 276.35,-7753 266.35,-7749.5 266.35,-7756.5"/>
+<title>proc~whm_coord_h2j_pl&#45;&gt;gmpl</title>
+<path fill="none" stroke="#000000" d="M378.83,-8030.13C394.72,-8033.01 411.37,-8038.57 424,-8049 455.31,-8074.87 428.28,-8107.64 460,-8133 481.54,-8150.22 512.73,-8155 536.96,-8155.73"/>
+<polygon fill="#000000" stroke="#000000" points="537.18,-8159.23 547.21,-8155.82 537.24,-8152.23 537.18,-8159.23"/>
 </g>
-<!-- interface~whm_step_tp -->
-<g id="call~~graph~~CallGraph_node132" class="node">
-<title>interface~whm_step_tp</title>
-<g id="a_call~~graph~~CallGraph_node132"><a xlink:href=".././interface/whm_step_tp.html" xlink:title="whm_step_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="135,-7807 59,-7807 59,-7783 135,-7783 135,-7807"/>
-<text text-anchor="middle" x="97" y="-7792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_tp</text>
+<!-- xh -->
+<g id="call~~graph~~CallGraph_node724" class="node">
+<title>xh</title>
+<polygon fill="#777777" stroke="#777777" points="601.5,-7998 547.5,-7998 547.5,-7974 601.5,-7974 601.5,-7998"/>
+<text text-anchor="middle" x="574.5" y="-7983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xh</text>
+</g>
+<!-- proc~whm_coord_h2j_pl&#45;&gt;xh -->
+<g id="call~~graph~~CallGraph_edge140" class="edge">
+<title>proc~whm_coord_h2j_pl&#45;&gt;xh</title>
+<path fill="none" stroke="#000000" d="M378.57,-8019.35C425.8,-8011.27 495.14,-7999.41 537.13,-7992.22"/>
+<polygon fill="#000000" stroke="#000000" points="537.92,-7995.64 547.19,-7990.5 536.74,-7988.74 537.92,-7995.64"/>
+</g>
+<!-- eta -->
+<g id="call~~graph~~CallGraph_node733" class="node">
+<title>eta</title>
+<polygon fill="#777777" stroke="#777777" points="601.5,-8124 547.5,-8124 547.5,-8100 601.5,-8100 601.5,-8124"/>
+<text text-anchor="middle" x="574.5" y="-8109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
+</g>
+<!-- proc~whm_coord_h2j_pl&#45;&gt;eta -->
+<g id="call~~graph~~CallGraph_edge139" class="edge">
+<title>proc~whm_coord_h2j_pl&#45;&gt;eta</title>
+<path fill="none" stroke="#000000" d="M378.63,-8032.8C393.99,-8035.86 410.38,-8040.86 424,-8049 445.1,-8061.61 438.7,-8078.73 460,-8091 483.49,-8104.53 513.85,-8109.62 537.26,-8111.42"/>
+<polygon fill="#000000" stroke="#000000" points="537.28,-8114.93 547.47,-8112.03 537.7,-8107.94 537.28,-8114.93"/>
+</g>
+<!-- vh -->
+<g id="call~~graph~~CallGraph_node754" class="node">
+<title>vh</title>
+<polygon fill="#777777" stroke="#777777" points="601.5,-8082 547.5,-8082 547.5,-8058 601.5,-8058 601.5,-8082"/>
+<text text-anchor="middle" x="574.5" y="-8067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+</g>
+<!-- proc~whm_coord_h2j_pl&#45;&gt;vh -->
+<g id="call~~graph~~CallGraph_edge137" class="edge">
+<title>proc~whm_coord_h2j_pl&#45;&gt;vh</title>
+<path fill="none" stroke="#000000" d="M378.57,-8036.65C425.8,-8044.73 495.14,-8056.59 537.13,-8063.78"/>
+<polygon fill="#000000" stroke="#000000" points="536.74,-8067.26 547.19,-8065.5 537.92,-8060.36 536.74,-8067.26"/>
+</g>
+<!-- xj -->
+<g id="call~~graph~~CallGraph_node756" class="node">
+<title>xj</title>
+<polygon fill="#777777" stroke="#777777" points="601.5,-7956 547.5,-7956 547.5,-7932 601.5,-7932 601.5,-7956"/>
+<text text-anchor="middle" x="574.5" y="-7941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
+</g>
+<!-- proc~whm_coord_h2j_pl&#45;&gt;xj -->
+<g id="call~~graph~~CallGraph_edge138" class="edge">
+<title>proc~whm_coord_h2j_pl&#45;&gt;xj</title>
+<path fill="none" stroke="#000000" d="M348.78,-8015.96C374.21,-8001.74 418.94,-7978.34 460,-7965 485.17,-7956.82 514.58,-7951.49 537.16,-7948.25"/>
+<polygon fill="#000000" stroke="#000000" points="537.89,-7951.68 547.33,-7946.86 536.94,-7944.75 537.89,-7951.68"/>
+</g>
+<!-- vj -->
+<g id="call~~graph~~CallGraph_node772" class="node">
+<title>vj</title>
+<polygon fill="#777777" stroke="#777777" points="601.5,-8040 547.5,-8040 547.5,-8016 601.5,-8016 601.5,-8040"/>
+<text text-anchor="middle" x="574.5" y="-8025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
+</g>
+<!-- proc~whm_coord_h2j_pl&#45;&gt;vj -->
+<g id="call~~graph~~CallGraph_edge141" class="edge">
+<title>proc~whm_coord_h2j_pl&#45;&gt;vj</title>
+<path fill="none" stroke="#000000" d="M378.57,-8028C425.8,-8028 495.14,-8028 537.13,-8028"/>
+<polygon fill="#000000" stroke="#000000" points="537.19,-8031.5 547.19,-8028 537.19,-8024.5 537.19,-8031.5"/>
+</g>
+<!-- proc~symba_util_resize_merger -->
+<g id="call~~graph~~CallGraph_node154" class="node">
+<title>proc~symba_util_resize_merger</title>
+<g id="a_call~~graph~~CallGraph_node154"><a xlink:href=".././proc/symba_util_resize_merger.html" xlink:title="symba_util_resize_merger">
+<polygon fill="#d9534f" stroke="#d9534f" points="396.5,-4798 257.5,-4798 257.5,-4774 396.5,-4774 396.5,-4798"/>
+<text text-anchor="middle" x="327" y="-4783.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_merger</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_step_tp -->
-<g id="call~~graph~~CallGraph_node607" class="node">
-<title>proc~whm_step_tp</title>
-<g id="a_call~~graph~~CallGraph_node607"><a xlink:href=".././proc/whm_step_tp.html" xlink:title="whm_step_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="365,-7807 289,-7807 289,-7783 365,-7783 365,-7807"/>
-<text text-anchor="middle" x="327" y="-7792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_tp</text>
+<!-- interface~symba_util_resize_pl -->
+<g id="call~~graph~~CallGraph_node259" class="node">
+<title>interface~symba_util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node259"><a xlink:href=".././interface/symba_util_resize_pl.html" xlink:title="symba_util_resize_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-4818 518.5,-4818 518.5,-4794 630.5,-4794 630.5,-4818"/>
+<text text-anchor="middle" x="574.5" y="-4803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_step_tp&#45;&gt;proc~whm_step_tp -->
+<!-- proc~symba_util_resize_merger&#45;&gt;interface~symba_util_resize_pl -->
 <g id="call~~graph~~CallGraph_edge143" class="edge">
-<title>interface~whm_step_tp&#45;&gt;proc~whm_step_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-7795C174.31,-7795 236.14,-7795 278.75,-7795"/>
-<polygon fill="#000000" stroke="#000000" points="278.88,-7798.5 288.88,-7795 278.88,-7791.5 278.88,-7798.5"/>
+<title>proc~symba_util_resize_merger&#45;&gt;interface~symba_util_resize_pl</title>
+<path fill="none" stroke="#000000" d="M396.71,-4791.6C431.55,-4794.44 473.64,-4797.86 508.01,-4800.67"/>
+<polygon fill="#000000" stroke="#000000" points="508.17,-4804.19 518.42,-4801.51 508.73,-4797.21 508.17,-4804.19"/>
 </g>
-<!-- proc~orbel_fhybrid -->
-<g id="call~~graph~~CallGraph_node133" class="node">
-<title>proc~orbel_fhybrid</title>
-<g id="a_call~~graph~~CallGraph_node133"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="877,-5992 802,-5992 802,-5968 877,-5968 877,-5992"/>
-<text text-anchor="middle" x="839.5" y="-5977.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
+<!-- interface~util_resize -->
+<g id="call~~graph~~CallGraph_node292" class="node">
+<title>interface~util_resize</title>
+<g id="a_call~~graph~~CallGraph_node292"><a xlink:href=".././interface/util_resize.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="1125,-4798 1064,-4798 1064,-4774 1125,-4774 1125,-4798"/>
+<text text-anchor="middle" x="1094.5" y="-4783.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_flon -->
-<g id="call~~graph~~CallGraph_node601" class="node">
-<title>proc~orbel_flon</title>
-<g id="a_call~~graph~~CallGraph_node601"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1124.5,-6013 1064.5,-6013 1064.5,-5989 1124.5,-5989 1124.5,-6013"/>
-<text text-anchor="middle" x="1094.5" y="-5998.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
-</a>
+<!-- proc~symba_util_resize_merger&#45;&gt;interface~util_resize -->
+<g id="call~~graph~~CallGraph_edge144" class="edge">
+<title>proc~symba_util_resize_merger&#45;&gt;interface~util_resize</title>
+<path fill="none" stroke="#000000" d="M396.51,-4785.38C416.94,-4785.22 439.37,-4785.08 460,-4785 679.55,-4784.17 734.45,-4784.21 954,-4785 987.61,-4785.12 1025.77,-4785.4 1053.68,-4785.64"/>
+<polygon fill="#000000" stroke="#000000" points="1053.81,-4789.14 1063.84,-4785.73 1053.87,-4782.14 1053.81,-4789.14"/>
 </g>
+<!-- interface~io_write_frame_cb -->
+<g id="call~~graph~~CallGraph_node155" class="node">
+<title>interface~io_write_frame_cb</title>
+<g id="a_call~~graph~~CallGraph_node155"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="624.5,-1121 524.5,-1121 524.5,-1097 624.5,-1097 624.5,-1121"/>
+<text text-anchor="middle" x="574.5" y="-1106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+</a>
 </g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
-<g id="call~~graph~~CallGraph_edge144" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
-<path fill="none" stroke="#000000" d="M877.02,-5983.03C924.19,-5986.95 1005.97,-5993.73 1054.38,-5997.75"/>
-<polygon fill="#000000" stroke="#000000" points="1054.21,-6001.25 1064.47,-5998.59 1054.79,-5994.27 1054.21,-6001.25"/>
 </g>
-<!-- proc~orbel_fget -->
-<g id="call~~graph~~CallGraph_node602" class="node">
-<title>proc~orbel_fget</title>
-<g id="a_call~~graph~~CallGraph_node602"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1125,-5971 1064,-5971 1064,-5947 1125,-5947 1125,-5971"/>
-<text text-anchor="middle" x="1094.5" y="-5956.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
+<!-- proc~io_write_frame_cb -->
+<g id="call~~graph~~CallGraph_node335" class="node">
+<title>proc~io_write_frame_cb</title>
+<g id="a_call~~graph~~CallGraph_node335"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#d9534f" stroke="#d9534f" points="889.5,-1121 789.5,-1121 789.5,-1097 889.5,-1097 889.5,-1121"/>
+<text text-anchor="middle" x="839.5" y="-1106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
 <g id="call~~graph~~CallGraph_edge145" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
-<path fill="none" stroke="#000000" d="M877.02,-5976.97C923.93,-5973.07 1005.09,-5966.34 1053.59,-5962.31"/>
-<polygon fill="#000000" stroke="#000000" points="1054.03,-5965.79 1063.71,-5961.47 1053.46,-5958.81 1054.03,-5965.79"/>
+<title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.66,-1109C668.34,-1109 732.3,-1109 778.88,-1109"/>
+<polygon fill="#000000" stroke="#000000" points="779.14,-1112.5 789.14,-1109 779.14,-1105.5 779.14,-1112.5"/>
 </g>
-<!-- interface~whm_util_append_pl -->
-<g id="call~~graph~~CallGraph_node134" class="node">
-<title>interface~whm_util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node134"><a xlink:href=".././interface/whm_util_append_pl.html" xlink:title="whm_util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-1104 519,-1104 519,-1080 630,-1080 630,-1104"/>
-<text text-anchor="middle" x="574.5" y="-1089.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
+<!-- proc~fraggle_io_log_generate -->
+<g id="call~~graph~~CallGraph_node156" class="node">
+<title>proc~fraggle_io_log_generate</title>
+<g id="a_call~~graph~~CallGraph_node156"><a xlink:href=".././proc/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
+<polygon fill="#d9534f" stroke="#d9534f" points="904,-4147 775,-4147 775,-4123 904,-4123 904,-4147"/>
+<text text-anchor="middle" x="839.5" y="-4132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_util_append_pl -->
-<g id="call~~graph~~CallGraph_node273" class="node">
-<title>proc~whm_util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node273"><a xlink:href=".././proc/whm_util_append_pl.html" xlink:title="whm_util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="895,-1100 784,-1100 784,-1076 895,-1076 895,-1100"/>
-<text text-anchor="middle" x="839.5" y="-1085.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
+<!-- interface~io_write_frame_encounter -->
+<g id="call~~graph~~CallGraph_node157" class="node">
+<title>interface~io_write_frame_encounter</title>
+<g id="a_call~~graph~~CallGraph_node157"><a xlink:href=".././interface/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="643,-1079 506,-1079 506,-1055 643,-1055 643,-1079"/>
+<text text-anchor="middle" x="574.5" y="-1064.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_append_pl&#45;&gt;proc~whm_util_append_pl -->
+<!-- proc~io_write_frame_encounter -->
+<g id="call~~graph~~CallGraph_node348" class="node">
+<title>proc~io_write_frame_encounter</title>
+<g id="a_call~~graph~~CallGraph_node348"><a xlink:href=".././proc/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="908,-1079 771,-1079 771,-1055 908,-1055 908,-1079"/>
+<text text-anchor="middle" x="839.5" y="-1064.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
+</a>
+</g>
+</g>
+<!-- interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter -->
 <g id="call~~graph~~CallGraph_edge146" class="edge">
-<title>interface~whm_util_append_pl&#45;&gt;proc~whm_util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.31,-1091.17C672.07,-1090.53 729.69,-1089.65 773.73,-1088.99"/>
-<polygon fill="#000000" stroke="#000000" points="773.81,-1092.48 783.76,-1088.83 773.71,-1085.49 773.81,-1092.48"/>
+<title>interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M643.23,-1067C678.98,-1067 723.03,-1067 760.24,-1067"/>
+<polygon fill="#000000" stroke="#000000" points="760.54,-1070.5 770.54,-1067 760.54,-1063.5 760.54,-1070.5"/>
 </g>
-<!-- interface~whm_util_spill_pl -->
-<g id="call~~graph~~CallGraph_node135" class="node">
-<title>interface~whm_util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node135"><a xlink:href=".././interface/whm_util_spill_pl.html" xlink:title="whm_util_spill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="621,-1520 528,-1520 528,-1496 621,-1496 621,-1520"/>
-<text text-anchor="middle" x="574.5" y="-1505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
+<!-- interface~io_write_frame_system -->
+<g id="call~~graph~~CallGraph_node158" class="node">
+<title>interface~io_write_frame_system</title>
+<g id="a_call~~graph~~CallGraph_node158"><a xlink:href=".././interface/io_write_frame_system.html" xlink:title="io_write_frame_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="636,-1037 513,-1037 513,-1013 636,-1013 636,-1037"/>
+<text text-anchor="middle" x="574.5" y="-1022.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_util_spill_pl -->
-<g id="call~~graph~~CallGraph_node279" class="node">
-<title>proc~whm_util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node279"><a xlink:href=".././proc/whm_util_spill_pl.html" xlink:title="whm_util_spill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="886,-1520 793,-1520 793,-1496 886,-1496 886,-1520"/>
-<text text-anchor="middle" x="839.5" y="-1505.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
+<!-- proc~io_write_frame_system -->
+<g id="call~~graph~~CallGraph_node350" class="node">
+<title>proc~io_write_frame_system</title>
+<g id="a_call~~graph~~CallGraph_node350"><a xlink:href=".././proc/io_write_frame_system.html" xlink:title="io_write_frame_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="901,-1037 778,-1037 778,-1013 901,-1013 901,-1037"/>
+<text text-anchor="middle" x="839.5" y="-1022.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_spill_pl&#45;&gt;proc~whm_util_spill_pl -->
+<!-- interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system -->
 <g id="call~~graph~~CallGraph_edge147" class="edge">
-<title>interface~whm_util_spill_pl&#45;&gt;proc~whm_util_spill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.01,-1508C665.8,-1508 734.29,-1508 782.42,-1508"/>
-<polygon fill="#000000" stroke="#000000" points="782.66,-1511.5 792.66,-1508 782.66,-1504.5 782.66,-1511.5"/>
+<title>interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.17,-1025C675.33,-1025 726.43,-1025 767.48,-1025"/>
+<polygon fill="#000000" stroke="#000000" points="767.68,-1028.5 777.68,-1025 767.68,-1021.5 767.68,-1028.5"/>
 </g>
-<!-- interface~whm_util_fill_pl -->
-<g id="call~~graph~~CallGraph_node136" class="node">
-<title>interface~whm_util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node136"><a xlink:href=".././interface/whm_util_fill_pl.html" xlink:title="whm_util_fill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="617,-818 532,-818 532,-794 617,-794 617,-818"/>
-<text text-anchor="middle" x="574.5" y="-803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
+<!-- interface~io_write_hdr_system -->
+<g id="call~~graph~~CallGraph_node159" class="node">
+<title>interface~io_write_hdr_system</title>
+<g id="a_call~~graph~~CallGraph_node159"><a xlink:href=".././interface/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-1205 519,-1205 519,-1181 630,-1181 630,-1205"/>
+<text text-anchor="middle" x="574.5" y="-1190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_util_fill_pl -->
-<g id="call~~graph~~CallGraph_node275" class="node">
-<title>proc~whm_util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node275"><a xlink:href=".././proc/whm_util_fill_pl.html" xlink:title="whm_util_fill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="882,-818 797,-818 797,-794 882,-794 882,-818"/>
-<text text-anchor="middle" x="839.5" y="-803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
+<!-- proc~io_write_hdr_system -->
+<g id="call~~graph~~CallGraph_node330" class="node">
+<title>proc~io_write_hdr_system</title>
+<g id="a_call~~graph~~CallGraph_node330"><a xlink:href=".././proc/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="895,-1205 784,-1205 784,-1181 895,-1181 895,-1205"/>
+<text text-anchor="middle" x="839.5" y="-1190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_fill_pl&#45;&gt;proc~whm_util_fill_pl -->
+<!-- interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system -->
 <g id="call~~graph~~CallGraph_edge148" class="edge">
-<title>interface~whm_util_fill_pl&#45;&gt;proc~whm_util_fill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.17,-806C663.01,-806 736.75,-806 786.38,-806"/>
-<polygon fill="#000000" stroke="#000000" points="786.59,-809.5 796.59,-806 786.59,-802.5 786.59,-809.5"/>
-</g>
-<!-- interface~whm_util_resize_pl -->
-<g id="call~~graph~~CallGraph_node137" class="node">
-<title>interface~whm_util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node137"><a xlink:href=".././interface/whm_util_resize_pl.html" xlink:title="whm_util_resize_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="626,-5292 523,-5292 523,-5268 626,-5268 626,-5292"/>
-<text text-anchor="middle" x="574.5" y="-5277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_resize_pl</text>
-</a>
-</g>
+<title>interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.31,-1193C672.07,-1193 729.69,-1193 773.73,-1193"/>
+<polygon fill="#000000" stroke="#000000" points="773.76,-1196.5 783.76,-1193 773.76,-1189.5 773.76,-1196.5"/>
 </g>
-<!-- proc~whm_util_resize_pl -->
-<g id="call~~graph~~CallGraph_node274" class="node">
-<title>proc~whm_util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node274"><a xlink:href=".././proc/whm_util_resize_pl.html" xlink:title="whm_util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="891,-5292 788,-5292 788,-5268 891,-5268 891,-5292"/>
-<text text-anchor="middle" x="839.5" y="-5277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_resize_pl</text>
+<!-- interface~kick_getacch_int_pl -->
+<g id="call~~graph~~CallGraph_node160" class="node">
+<title>interface~kick_getacch_int_pl</title>
+<g id="a_call~~graph~~CallGraph_node160"><a xlink:href=".././interface/kick_getacch_int_pl.html" xlink:title="kick_getacch_int_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="150,-5164 44,-5164 44,-5140 150,-5140 150,-5164"/>
+<text text-anchor="middle" x="97" y="-5149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_resize_pl&#45;&gt;proc~whm_util_resize_pl -->
+<!-- interface~kick_getacch_int_pl&#45;&gt;proc~kick_getacch_int_pl -->
 <g id="call~~graph~~CallGraph_edge149" class="edge">
-<title>interface~whm_util_resize_pl&#45;&gt;proc~whm_util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.21,-5280C669.51,-5280 731.88,-5280 777.82,-5280"/>
-<polygon fill="#000000" stroke="#000000" points="777.95,-5283.5 787.95,-5280 777.95,-5276.5 777.95,-5283.5"/>
-</g>
-<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
-<g id="call~~graph~~CallGraph_edge150" class="edge">
-<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
-<path fill="none" stroke="#000000" d="M1137.27,-6291C1176.22,-6291 1234.73,-6291 1278.63,-6291"/>
-<polygon fill="#000000" stroke="#000000" points="1278.89,-6294.5 1288.89,-6291 1278.89,-6287.5 1278.89,-6294.5"/>
+<title>interface~kick_getacch_int_pl&#45;&gt;proc~kick_getacch_int_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-5152C183.76,-5152 227.89,-5152 263.52,-5152"/>
+<polygon fill="#000000" stroke="#000000" points="263.81,-5155.5 273.81,-5152 263.81,-5148.5 263.81,-5155.5"/>
 </g>
-<!-- interface~whm_util_set_ir3j -->
-<g id="call~~graph~~CallGraph_node139" class="node">
-<title>interface~whm_util_set_ir3j</title>
-<g id="a_call~~graph~~CallGraph_node139"><a xlink:href=".././interface/whm_util_set_ir3j.html" xlink:title="whm_util_set_ir3j">
-<polygon fill="#a7506f" stroke="#a7506f" points="144.5,-7849 49.5,-7849 49.5,-7825 144.5,-7825 144.5,-7849"/>
-<text text-anchor="middle" x="97" y="-7834.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_ir3j</text>
+<!-- interface~kick_getacch_int_tp -->
+<g id="call~~graph~~CallGraph_node161" class="node">
+<title>interface~kick_getacch_int_tp</title>
+<g id="a_call~~graph~~CallGraph_node161"><a xlink:href=".././interface/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="150,-3433 44,-3433 44,-3409 150,-3409 150,-3433"/>
+<text text-anchor="middle" x="97" y="-3418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_util_set_ir3j -->
-<g id="call~~graph~~CallGraph_node277" class="node">
-<title>proc~whm_util_set_ir3j</title>
-<g id="a_call~~graph~~CallGraph_node277"><a xlink:href=".././proc/whm_util_set_ir3j.html" xlink:title="whm_util_set_ir3j">
-<polygon fill="#d9534f" stroke="#d9534f" points="374.5,-7849 279.5,-7849 279.5,-7825 374.5,-7825 374.5,-7849"/>
-<text text-anchor="middle" x="327" y="-7834.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_ir3j</text>
+<!-- interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp -->
+<g id="call~~graph~~CallGraph_edge150" class="edge">
+<title>interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-3421C183.76,-3421 227.89,-3421 263.52,-3421"/>
+<polygon fill="#000000" stroke="#000000" points="263.81,-3424.5 273.81,-3421 263.81,-3417.5 263.81,-3424.5"/>
+</g>
+<!-- proc~fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_node162" class="node">
+<title>proc~fraggle_io_log_one_message</title>
+<g id="a_call~~graph~~CallGraph_node162"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#d9534f" stroke="#d9534f" points="1171.5,-4044 1017.5,-4044 1017.5,-4020 1171.5,-4020 1171.5,-4044"/>
+<text text-anchor="middle" x="1094.5" y="-4029.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_set_ir3j&#45;&gt;proc~whm_util_set_ir3j -->
+<!-- interface~kick_getacch_int_all_pl&#45;&gt;proc~kick_getacch_int_all_pl -->
 <g id="call~~graph~~CallGraph_edge151" class="edge">
-<title>interface~whm_util_set_ir3j&#45;&gt;proc~whm_util_set_ir3j</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.69,-7837C180.65,-7837 230.54,-7837 268.89,-7837"/>
-<polygon fill="#000000" stroke="#000000" points="269.37,-7840.5 279.37,-7837 269.37,-7833.5 269.37,-7840.5"/>
-</g>
-<!-- proc~io_read_frame_cb -->
-<g id="call~~graph~~CallGraph_node140" class="node">
-<title>proc~io_read_frame_cb</title>
-<g id="a_call~~graph~~CallGraph_node140"><a xlink:href=".././proc/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="889.5,-2986 789.5,-2986 789.5,-2962 889.5,-2962 889.5,-2986"/>
-<text text-anchor="middle" x="839.5" y="-2971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
-</a>
-</g>
+<title>interface~kick_getacch_int_all_pl&#45;&gt;proc~kick_getacch_int_all_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.51,-5152C675,-5152 726.86,-5152 768.28,-5152"/>
+<polygon fill="#000000" stroke="#000000" points="768.3,-5155.5 778.3,-5152 768.3,-5148.5 768.3,-5155.5"/>
 </g>
-<!-- proc~io_read_frame_cb&#45;&gt;interface~util_exit -->
+<!-- interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp -->
 <g id="call~~graph~~CallGraph_edge152" class="edge">
-<title>proc~io_read_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M889.73,-2969.91C910.24,-2966.95 933.91,-2961.83 954,-2953 1002.08,-2931.87 1048.97,-2891.25 1074.27,-2867.2"/>
-<polygon fill="#000000" stroke="#000000" points="1076.94,-2869.48 1081.69,-2860.02 1072.07,-2864.45 1076.94,-2869.48"/>
+<title>interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.17,-3421C675.33,-3421 726.43,-3421 767.48,-3421"/>
+<polygon fill="#000000" stroke="#000000" points="767.68,-3424.5 777.68,-3421 767.68,-3417.5 767.68,-3424.5"/>
 </g>
-<!-- interface~whm_util_set_mu_eta_pl -->
-<g id="call~~graph~~CallGraph_node141" class="node">
-<title>interface~whm_util_set_mu_eta_pl</title>
-<g id="a_call~~graph~~CallGraph_node141"><a xlink:href=".././interface/whm_util_set_mu_eta_pl.html" xlink:title="whm_util_set_mu_eta_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="162.5,-7891 31.5,-7891 31.5,-7867 162.5,-7867 162.5,-7891"/>
-<text text-anchor="middle" x="97" y="-7876.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_mu_eta_pl</text>
+<!-- interface~kick_getacch_int_one_pl -->
+<g id="call~~graph~~CallGraph_node165" class="node">
+<title>interface~kick_getacch_int_one_pl</title>
+<g id="a_call~~graph~~CallGraph_node165"><a xlink:href=".././interface/kick_getacch_int_one_pl.html" xlink:title="kick_getacch_int_one_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="162,-3609 32,-3609 32,-3585 162,-3585 162,-3609"/>
+<text text-anchor="middle" x="97" y="-3594.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_util_set_mu_eta_pl -->
-<g id="call~~graph~~CallGraph_node271" class="node">
-<title>proc~whm_util_set_mu_eta_pl</title>
-<g id="a_call~~graph~~CallGraph_node271"><a xlink:href=".././proc/whm_util_set_mu_eta_pl.html" xlink:title="whm_util_set_mu_eta_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="392.5,-7891 261.5,-7891 261.5,-7867 392.5,-7867 392.5,-7891"/>
-<text text-anchor="middle" x="327" y="-7876.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_mu_eta_pl</text>
+<!-- interface~kick_getacch_int_one_pl&#45;&gt;proc~kick_getacch_int_one_pl -->
+<g id="call~~graph~~CallGraph_edge153" class="edge">
+<title>interface~kick_getacch_int_one_pl&#45;&gt;proc~kick_getacch_int_one_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-3597C190.04,-3597 222.94,-3597 251.9,-3597"/>
+<polygon fill="#000000" stroke="#000000" points="251.97,-3600.5 261.97,-3597 251.97,-3593.5 251.97,-3600.5"/>
+</g>
+<!-- proc~setup_construct_system -->
+<g id="call~~graph~~CallGraph_node166" class="node">
+<title>proc~setup_construct_system</title>
+<g id="a_call~~graph~~CallGraph_node166"><a xlink:href=".././proc/setup_construct_system.html" xlink:title="setup_construct_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="903.5,-659 775.5,-659 775.5,-635 903.5,-635 903.5,-659"/>
+<text text-anchor="middle" x="839.5" y="-644.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_set_mu_eta_pl&#45;&gt;proc~whm_util_set_mu_eta_pl -->
-<g id="call~~graph~~CallGraph_edge153" class="edge">
-<title>interface~whm_util_set_mu_eta_pl&#45;&gt;proc~whm_util_set_mu_eta_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.73,-7879C190.16,-7879 222.32,-7879 250.8,-7879"/>
-<polygon fill="#000000" stroke="#000000" points="251.11,-7882.5 261.11,-7879 251.11,-7875.5 251.11,-7882.5"/>
-</g>
-<!-- proc~rmvs_setup_pl -->
-<g id="call~~graph~~CallGraph_node142" class="node">
-<title>proc~rmvs_setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node142"><a xlink:href=".././proc/rmvs_setup_pl.html" xlink:title="rmvs_setup_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="368,-7933 286,-7933 286,-7909 368,-7909 368,-7933"/>
-<text text-anchor="middle" x="327" y="-7918.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_pl</text>
-</a>
-</g>
-</g>
-<!-- whm_setup_pl -->
-<g id="call~~graph~~CallGraph_node687" class="node">
-<title>whm_setup_pl</title>
-<polygon fill="#777777" stroke="#777777" points="615.5,-7933 533.5,-7933 533.5,-7909 615.5,-7909 615.5,-7933"/>
-<text text-anchor="middle" x="574.5" y="-7918.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_pl</text>
-</g>
-<!-- proc~rmvs_setup_pl&#45;&gt;whm_setup_pl -->
+<!-- proc~setup_construct_system&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge154" class="edge">
-<title>proc~rmvs_setup_pl&#45;&gt;whm_setup_pl</title>
-<path fill="none" stroke="#000000" d="M368.26,-7921C410.63,-7921 477.4,-7921 523.2,-7921"/>
-<polygon fill="#000000" stroke="#000000" points="523.21,-7924.5 533.21,-7921 523.21,-7917.5 523.21,-7924.5"/>
-</g>
-<!-- interface~whm_util_sort_pl -->
-<g id="call~~graph~~CallGraph_node143" class="node">
-<title>interface~whm_util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node143"><a xlink:href=".././interface/whm_util_sort_pl.html" xlink:title="whm_util_sort_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="143.5,-5530 50.5,-5530 50.5,-5506 143.5,-5506 143.5,-5530"/>
-<text text-anchor="middle" x="97" y="-5515.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_pl</text>
-</a>
-</g>
+<title>proc~setup_construct_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M903.66,-649.2C921.15,-652.22 939.33,-657.85 954,-668 1030.49,-720.92 1072.24,-830.69 1087.13,-877.31"/>
+<polygon fill="#000000" stroke="#000000" points="1083.83,-878.47 1090.13,-886.99 1090.52,-876.41 1083.83,-878.47"/>
 </g>
-<!-- proc~whm_util_sort_pl -->
-<g id="call~~graph~~CallGraph_node278" class="node">
-<title>proc~whm_util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node278"><a xlink:href=".././proc/whm_util_sort_pl.html" xlink:title="whm_util_sort_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="373.5,-5530 280.5,-5530 280.5,-5506 373.5,-5506 373.5,-5530"/>
-<text text-anchor="middle" x="327" y="-5515.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_pl</text>
+<!-- interface~kick_getacch_int_one_tp -->
+<g id="call~~graph~~CallGraph_node167" class="node">
+<title>interface~kick_getacch_int_one_tp</title>
+<g id="a_call~~graph~~CallGraph_node167"><a xlink:href=".././interface/kick_getacch_int_one_tp.html" xlink:title="kick_getacch_int_one_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="162,-589 32,-589 32,-565 162,-565 162,-589"/>
+<text text-anchor="middle" x="97" y="-574.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_sort_pl&#45;&gt;proc~whm_util_sort_pl -->
+<!-- interface~kick_getacch_int_one_tp&#45;&gt;proc~kick_getacch_int_one_tp -->
 <g id="call~~graph~~CallGraph_edge155" class="edge">
-<title>interface~whm_util_sort_pl&#45;&gt;proc~whm_util_sort_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.59,-5518C180.09,-5518 231.45,-5518 270.37,-5518"/>
-<polygon fill="#000000" stroke="#000000" points="270.49,-5521.5 280.49,-5518 270.49,-5514.5 270.49,-5521.5"/>
+<title>interface~kick_getacch_int_one_tp&#45;&gt;proc~kick_getacch_int_one_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-577C190.04,-577 222.94,-577 251.9,-577"/>
+<polygon fill="#000000" stroke="#000000" points="251.97,-580.5 261.97,-577 251.97,-573.5 251.97,-580.5"/>
 </g>
-<!-- proc~operator_mag_sp -->
-<g id="call~~graph~~CallGraph_node144" class="node">
-<title>proc~operator_mag_sp</title>
-<g id="a_call~~graph~~CallGraph_node144"><a xlink:href=".././proc/operator_mag_sp.html" xlink:title="operator_mag_sp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="145.5,-7975 48.5,-7975 48.5,-7951 145.5,-7951 145.5,-7975"/>
-<text text-anchor="middle" x="97" y="-7960.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_sp</text>
+<!-- proc~obl_acc_body -->
+<g id="call~~graph~~CallGraph_node168" class="node">
+<title>proc~obl_acc_body</title>
+<g id="a_call~~graph~~CallGraph_node168"><a xlink:href=".././proc/obl_acc_body.html" xlink:title="obl_acc_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="879,-6748 800,-6748 800,-6724 879,-6724 879,-6748"/>
+<text text-anchor="middle" x="839.5" y="-6733.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_body</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node145" class="node">
-<title>interface~whm_util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node145"><a xlink:href=".././interface/whm_util_sort_rearrange_pl.html" xlink:title="whm_util_sort_rearrange_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="170,-4074 24,-4074 24,-4050 170,-4050 170,-4074"/>
-<text text-anchor="middle" x="97" y="-4059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_rearrange_pl</text>
+<!-- interface~netcdf_close -->
+<g id="call~~graph~~CallGraph_node169" class="node">
+<title>interface~netcdf_close</title>
+<g id="a_call~~graph~~CallGraph_node169"><a xlink:href=".././interface/netcdf_close.html" xlink:title="netcdf_close">
+<polygon fill="#a7506f" stroke="#a7506f" points="133.5,-8208 60.5,-8208 60.5,-8184 133.5,-8184 133.5,-8208"/>
+<text text-anchor="middle" x="97" y="-8193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_close</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node276" class="node">
-<title>proc~whm_util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node276"><a xlink:href=".././proc/whm_util_sort_rearrange_pl.html" xlink:title="whm_util_sort_rearrange_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="400,-4074 254,-4074 254,-4050 400,-4050 400,-4074"/>
-<text text-anchor="middle" x="327" y="-4059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_rearrange_pl</text>
+<!-- proc~netcdf_close -->
+<g id="call~~graph~~CallGraph_node654" class="node">
+<title>proc~netcdf_close</title>
+<g id="a_call~~graph~~CallGraph_node654"><a xlink:href=".././proc/netcdf_close.html" xlink:title="netcdf_close">
+<polygon fill="#d9534f" stroke="#d9534f" points="363.5,-8208 290.5,-8208 290.5,-8184 363.5,-8184 363.5,-8208"/>
+<text text-anchor="middle" x="327" y="-8193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_close</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_util_sort_rearrange_pl&#45;&gt;proc~whm_util_sort_rearrange_pl -->
+<!-- interface~netcdf_close&#45;&gt;proc~netcdf_close -->
 <g id="call~~graph~~CallGraph_edge156" class="edge">
-<title>interface~whm_util_sort_rearrange_pl&#45;&gt;proc~whm_util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-4062C193.54,-4062 219.68,-4062 243.76,-4062"/>
-<polygon fill="#000000" stroke="#000000" points="243.94,-4065.5 253.94,-4062 243.94,-4058.5 243.94,-4065.5"/>
+<title>interface~netcdf_close&#45;&gt;proc~netcdf_close</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M133.62,-8196C173.08,-8196 236.81,-8196 280.01,-8196"/>
+<polygon fill="#000000" stroke="#000000" points="280.25,-8199.5 290.25,-8196 280.25,-8192.5 280.25,-8199.5"/>
 </g>
-<!-- proc~util_append_arr_dp -->
-<g id="call~~graph~~CallGraph_node146" class="node">
-<title>proc~util_append_arr_dp</title>
-<g id="a_call~~graph~~CallGraph_node146"><a xlink:href=".././proc/util_append_arr_dp.html" xlink:title="util_append_arr_DP">
-<polygon fill="#d9534f" stroke="#d9534f" points="893.5,-6568 785.5,-6568 785.5,-6544 893.5,-6544 893.5,-6568"/>
-<text text-anchor="middle" x="839.5" y="-6553.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DP</text>
+<!-- proc~fraggle_io_log_pl -->
+<g id="call~~graph~~CallGraph_node170" class="node">
+<title>proc~fraggle_io_log_pl</title>
+<g id="a_call~~graph~~CallGraph_node170"><a xlink:href=".././proc/fraggle_io_log_pl.html" xlink:title="fraggle_io_log_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="374,-8271 280,-8271 280,-8247 374,-8247 374,-8271"/>
+<text text-anchor="middle" x="327" y="-8256.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_dp&#45;&gt;interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_edge157" class="edge">
-<title>proc~util_append_arr_dp&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M893.7,-6548.88C912.94,-6545.6 934.69,-6541.05 954,-6535 992.34,-6522.99 1034.04,-6503.2 1061.77,-6489"/>
-<polygon fill="#000000" stroke="#000000" points="1063.7,-6491.94 1070.97,-6484.23 1060.48,-6485.73 1063.7,-6491.94"/>
-</g>
-<!-- proc~util_append_arr_i4b -->
-<g id="call~~graph~~CallGraph_node148" class="node">
-<title>proc~util_append_arr_i4b</title>
-<g id="a_call~~graph~~CallGraph_node148"><a xlink:href=".././proc/util_append_arr_i4b.html" xlink:title="util_append_arr_I4B">
-<polygon fill="#d9534f" stroke="#d9534f" points="894,-6526 785,-6526 785,-6502 894,-6502 894,-6526"/>
-<text text-anchor="middle" x="839.5" y="-6511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_I4B</text>
+<!-- interface~netcdf_initialize_output -->
+<g id="call~~graph~~CallGraph_node171" class="node">
+<title>interface~netcdf_initialize_output</title>
+<g id="a_call~~graph~~CallGraph_node171"><a xlink:href=".././interface/netcdf_initialize_output.html" xlink:title="netcdf_initialize_output">
+<polygon fill="#a7506f" stroke="#a7506f" points="157.5,-8344 36.5,-8344 36.5,-8320 157.5,-8320 157.5,-8344"/>
+<text text-anchor="middle" x="97" y="-8329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_initialize_output</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_edge158" class="edge">
-<title>proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M894.15,-6505.09C941.99,-6497.15 1010.92,-6485.71 1053.91,-6478.57"/>
-<polygon fill="#000000" stroke="#000000" points="1054.7,-6481.99 1063.99,-6476.9 1053.55,-6475.08 1054.7,-6481.99"/>
-</g>
-<!-- proc~operator_mag_el_qp -->
-<g id="call~~graph~~CallGraph_node149" class="node">
-<title>proc~operator_mag_el_qp</title>
-<g id="a_call~~graph~~CallGraph_node149"><a xlink:href=".././proc/operator_mag_el_qp.html" xlink:title="operator_mag_el_qp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="153,-8017 41,-8017 41,-7993 153,-7993 153,-8017"/>
-<text text-anchor="middle" x="97" y="-8002.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_el_qp</text>
+<!-- proc~netcdf_initialize_output -->
+<g id="call~~graph~~CallGraph_node674" class="node">
+<title>proc~netcdf_initialize_output</title>
+<g id="a_call~~graph~~CallGraph_node674"><a xlink:href=".././proc/netcdf_initialize_output.html" xlink:title="netcdf_initialize_output">
+<polygon fill="#d9534f" stroke="#d9534f" points="387.5,-8344 266.5,-8344 266.5,-8320 387.5,-8320 387.5,-8344"/>
+<text text-anchor="middle" x="327" y="-8329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_initialize_output</text>
 </a>
 </g>
 </g>
-<!-- proc~operator_mag_dp -->
-<g id="call~~graph~~CallGraph_node150" class="node">
-<title>proc~operator_mag_dp</title>
-<g id="a_call~~graph~~CallGraph_node150"><a xlink:href=".././proc/operator_mag_dp.html" xlink:title="operator_mag_dp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-8059 48,-8059 48,-8035 146,-8035 146,-8059"/>
-<text text-anchor="middle" x="97" y="-8044.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_dp</text>
-</a>
-</g>
+<!-- interface~netcdf_initialize_output&#45;&gt;proc~netcdf_initialize_output -->
+<g id="call~~graph~~CallGraph_edge157" class="edge">
+<title>interface~netcdf_initialize_output&#45;&gt;proc~netcdf_initialize_output</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M157.61,-8332C187.85,-8332 224.76,-8332 256.31,-8332"/>
+<polygon fill="#000000" stroke="#000000" points="256.35,-8335.5 266.35,-8332 256.35,-8328.5 256.35,-8335.5"/>
 </g>
-<!-- proc~operator_mag_el_sp -->
-<g id="call~~graph~~CallGraph_node151" class="node">
-<title>proc~operator_mag_el_sp</title>
-<g id="a_call~~graph~~CallGraph_node151"><a xlink:href=".././proc/operator_mag_el_sp.html" xlink:title="operator_mag_el_sp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="153,-8101 41,-8101 41,-8077 153,-8077 153,-8101"/>
-<text text-anchor="middle" x="97" y="-8086.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_el_sp</text>
+<!-- proc~fraggle_io_log_regime -->
+<g id="call~~graph~~CallGraph_node172" class="node">
+<title>proc~fraggle_io_log_regime</title>
+<g id="a_call~~graph~~CallGraph_node172"><a xlink:href=".././proc/fraggle_io_log_regime.html" xlink:title="fraggle_io_log_regime">
+<polygon fill="#d9534f" stroke="#d9534f" points="899,-1495 780,-1495 780,-1471 899,-1471 899,-1495"/>
+<text text-anchor="middle" x="839.5" y="-1480.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_regime</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_xv2aeq -->
-<g id="call~~graph~~CallGraph_node152" class="node">
-<title>proc~orbel_xv2aeq</title>
-<g id="a_call~~graph~~CallGraph_node152"><a xlink:href=".././proc/orbel_xv2aeq.html" xlink:title="orbel_xv2aeq">
-<polygon fill="#d9534f" stroke="#d9534f" points="878,-8143 801,-8143 801,-8119 878,-8119 878,-8143"/>
-<text text-anchor="middle" x="839.5" y="-8128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
+<!-- interface~netcdf_open -->
+<g id="call~~graph~~CallGraph_node173" class="node">
+<title>interface~netcdf_open</title>
+<g id="a_call~~graph~~CallGraph_node173"><a xlink:href=".././interface/netcdf_open.html" xlink:title="netcdf_open">
+<polygon fill="#a7506f" stroke="#a7506f" points="610.5,-66 538.5,-66 538.5,-42 610.5,-42 610.5,-66"/>
+<text text-anchor="middle" x="574.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_open</text>
 </a>
 </g>
 </g>
-<!-- proc~operator_mag_el_dp -->
-<g id="call~~graph~~CallGraph_node153" class="node">
-<title>proc~operator_mag_el_dp</title>
-<g id="a_call~~graph~~CallGraph_node153"><a xlink:href=".././proc/operator_mag_el_dp.html" xlink:title="operator_mag_el_dp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="153,-8185 41,-8185 41,-8161 153,-8161 153,-8185"/>
-<text text-anchor="middle" x="97" y="-8170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_el_dp</text>
-</a>
-</g>
+<!-- interface~netcdf_open&#45;&gt;proc~netcdf_open -->
+<g id="call~~graph~~CallGraph_edge158" class="edge">
+<title>interface~netcdf_open&#45;&gt;proc~netcdf_open</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.7,-54C657.71,-54 741.07,-54 792.86,-54"/>
+<polygon fill="#000000" stroke="#000000" points="793.09,-57.5 803.09,-54 793.09,-50.5 793.09,-57.5"/>
 </g>
-<!-- proc~util_append_arr_info -->
-<g id="call~~graph~~CallGraph_node154" class="node">
-<title>proc~util_append_arr_info</title>
-<g id="a_call~~graph~~CallGraph_node154"><a xlink:href=".././proc/util_append_arr_info.html" xlink:title="util_append_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="895,-6484 784,-6484 784,-6460 895,-6460 895,-6484"/>
-<text text-anchor="middle" x="839.5" y="-6469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_info</text>
+<!-- interface~netcdf_write_frame_base -->
+<g id="call~~graph~~CallGraph_node174" class="node">
+<title>interface~netcdf_write_frame_base</title>
+<g id="a_call~~graph~~CallGraph_node174"><a xlink:href=".././interface/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="641,-219 508,-219 508,-195 641,-195 641,-219"/>
+<text text-anchor="middle" x="574.5" y="-204.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_info&#45;&gt;interface~util_resize~2 -->
+<!-- interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base -->
 <g id="call~~graph~~CallGraph_edge159" class="edge">
-<title>proc~util_append_arr_info&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M895.09,-6472C942.86,-6472 1011.13,-6472 1053.85,-6472"/>
-<polygon fill="#000000" stroke="#000000" points="1053.87,-6475.5 1063.87,-6472 1053.87,-6468.5 1053.87,-6475.5"/>
-</g>
-<!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
-<g id="call~~graph~~CallGraph_edge160" class="edge">
-<title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.67,-1846.28C939.59,-1847.53 982.97,-1849.07 1019.34,-1850.36"/>
-<polygon fill="#000000" stroke="#000000" points="1019.28,-1853.86 1029.4,-1850.72 1019.53,-1846.87 1019.28,-1853.86"/>
+<title>interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.19,-207C678.06,-207 724.23,-207 762.64,-207"/>
+<polygon fill="#000000" stroke="#000000" points="762.74,-210.5 772.74,-207 762.74,-203.5 762.74,-210.5"/>
 </g>
-<!-- interface~fraggle_generate_fragments -->
-<g id="call~~graph~~CallGraph_node156" class="node">
-<title>interface~fraggle_generate_fragments</title>
-<g id="a_call~~graph~~CallGraph_node156"><a xlink:href=".././interface/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
-<polygon fill="#a7506f" stroke="#a7506f" points="171,-1873 23,-1873 23,-1849 171,-1849 171,-1873"/>
-<text text-anchor="middle" x="97" y="-1858.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
+<!-- interface~netcdf_write_frame_system -->
+<g id="call~~graph~~CallGraph_node175" class="node">
+<title>interface~netcdf_write_frame_system</title>
+<g id="a_call~~graph~~CallGraph_node175"><a xlink:href=".././interface/netcdf_write_frame_system.html" xlink:title="netcdf_write_frame_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="169,-8392 25,-8392 25,-8368 169,-8368 169,-8392"/>
+<text text-anchor="middle" x="97" y="-8377.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_system</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments -->
-<g id="call~~graph~~CallGraph_node250" class="node">
-<title>proc~fraggle_generate_fragments</title>
-<g id="a_call~~graph~~CallGraph_node250"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="401,-1873 253,-1873 253,-1849 401,-1849 401,-1873"/>
-<text text-anchor="middle" x="327" y="-1858.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
+<!-- proc~fraggle_io_log_start -->
+<g id="call~~graph~~CallGraph_node176" class="node">
+<title>proc~fraggle_io_log_start</title>
+<g id="a_call~~graph~~CallGraph_node176"><a xlink:href=".././proc/fraggle_io_log_start.html" xlink:title="fraggle_io_log_start">
+<polygon fill="#d9534f" stroke="#d9534f" points="380.5,-8455 273.5,-8455 273.5,-8431 380.5,-8431 380.5,-8455"/>
+<text text-anchor="middle" x="327" y="-8440.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments -->
-<g id="call~~graph~~CallGraph_edge161" class="edge">
-<title>interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M171.08,-1861C193.89,-1861 219.21,-1861 242.67,-1861"/>
-<polygon fill="#000000" stroke="#000000" points="242.94,-1864.5 252.94,-1861 242.94,-1857.5 242.94,-1864.5"/>
-</g>
-<!-- interface~fraggle_io_log_generate -->
-<g id="call~~graph~~CallGraph_node157" class="node">
-<title>interface~fraggle_io_log_generate</title>
-<g id="a_call~~graph~~CallGraph_node157"><a xlink:href=".././interface/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
-<polygon fill="#a7506f" stroke="#a7506f" points="639,-1978 510,-1978 510,-1954 639,-1954 639,-1978"/>
-<text text-anchor="middle" x="574.5" y="-1963.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
+<!-- interface~netcdf_write_hdr_system -->
+<g id="call~~graph~~CallGraph_node177" class="node">
+<title>interface~netcdf_write_hdr_system</title>
+<g id="a_call~~graph~~CallGraph_node177"><a xlink:href=".././interface/netcdf_write_hdr_system.html" xlink:title="netcdf_write_hdr_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="640.5,-129 508.5,-129 508.5,-105 640.5,-105 640.5,-129"/>
+<text text-anchor="middle" x="574.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_hdr_system</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_io_log_generate -->
-<g id="call~~graph~~CallGraph_node220" class="node">
-<title>proc~fraggle_io_log_generate</title>
-<g id="a_call~~graph~~CallGraph_node220"><a xlink:href=".././proc/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
-<polygon fill="#d9534f" stroke="#d9534f" points="904,-1978 775,-1978 775,-1954 904,-1954 904,-1978"/>
-<text text-anchor="middle" x="839.5" y="-1963.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
+<!-- interface~netcdf_write_hdr_system&#45;&gt;proc~netcdf_write_hdr_system -->
+<g id="call~~graph~~CallGraph_edge160" class="edge">
+<title>interface~netcdf_write_hdr_system&#45;&gt;proc~netcdf_write_hdr_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.51,-117C677.65,-117 724.4,-117 763.14,-117"/>
+<polygon fill="#000000" stroke="#000000" points="763.33,-120.5 773.33,-117 763.33,-113.5 763.33,-120.5"/>
+</g>
+<!-- interface~netcdf_write_particle_info_base -->
+<g id="call~~graph~~CallGraph_node178" class="node">
+<title>interface~netcdf_write_particle_info_base</title>
+<g id="a_call~~graph~~CallGraph_node178"><a xlink:href=".././interface/netcdf_write_particle_info_base.html" xlink:title="netcdf_write_particle_info_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="656,-177 493,-177 493,-153 656,-153 656,-177"/>
+<text text-anchor="middle" x="574.5" y="-162.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate -->
+<!-- interface~netcdf_write_particle_info_base&#45;&gt;proc~netcdf_write_particle_info_base -->
+<g id="call~~graph~~CallGraph_edge161" class="edge">
+<title>interface~netcdf_write_particle_info_base&#45;&gt;proc~netcdf_write_particle_info_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.2,-165C685.1,-165 717.88,-165 747.59,-165"/>
+<polygon fill="#000000" stroke="#000000" points="747.96,-168.5 757.96,-165 747.96,-161.5 747.96,-168.5"/>
+</g>
+<!-- interface~obl_acc_body&#45;&gt;proc~obl_acc_body -->
 <g id="call~~graph~~CallGraph_edge162" class="edge">
-<title>interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M639.16,-1966C677.06,-1966 725.32,-1966 764.85,-1966"/>
-<polygon fill="#000000" stroke="#000000" points="764.97,-1969.5 774.97,-1966 764.97,-1962.5 764.97,-1969.5"/>
+<title>interface~obl_acc_body&#45;&gt;proc~obl_acc_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.02,-6736C660.61,-6736 739.07,-6736 789.8,-6736"/>
+<polygon fill="#000000" stroke="#000000" points="789.87,-6739.5 799.87,-6736 789.87,-6732.5 789.87,-6739.5"/>
 </g>
-<!-- proc~fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_node236" class="node">
-<title>proc~fraggle_io_log_one_message</title>
-<g id="a_call~~graph~~CallGraph_node236"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="1171.5,-1772 1017.5,-1772 1017.5,-1748 1171.5,-1748 1171.5,-1772"/>
-<text text-anchor="middle" x="1094.5" y="-1757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<!-- interface~obl_acc_pl -->
+<g id="call~~graph~~CallGraph_node180" class="node">
+<title>interface~obl_acc_pl</title>
+<g id="a_call~~graph~~CallGraph_node180"><a xlink:href=".././interface/obl_acc_pl.html" xlink:title="obl_acc_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="129,-6727 65,-6727 65,-6703 129,-6703 129,-6727"/>
+<text text-anchor="middle" x="97" y="-6712.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message -->
+<!-- interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl -->
 <g id="call~~graph~~CallGraph_edge163" class="edge">
-<title>interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.75,-1760C945.25,-1760 977.82,-1760 1007.17,-1760"/>
-<polygon fill="#000000" stroke="#000000" points="1007.4,-1763.5 1017.4,-1760 1007.4,-1756.5 1007.4,-1763.5"/>
+<title>interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-6715C169.53,-6715 239.8,-6715 284.55,-6715"/>
+<polygon fill="#000000" stroke="#000000" points="284.79,-6718.5 294.79,-6715 284.79,-6711.5 284.79,-6718.5"/>
 </g>
-<!-- proc~orbel_xv2aqt -->
-<g id="call~~graph~~CallGraph_node159" class="node">
-<title>proc~orbel_xv2aqt</title>
-<g id="a_call~~graph~~CallGraph_node159"><a xlink:href=".././proc/orbel_xv2aqt.html" xlink:title="orbel_xv2aqt">
-<polygon fill="#d9534f" stroke="#d9534f" points="364,-8227 290,-8227 290,-8203 364,-8203 364,-8227"/>
-<text text-anchor="middle" x="327" y="-8212.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aqt</text>
+<!-- interface~obl_acc_tp -->
+<g id="call~~graph~~CallGraph_node181" class="node">
+<title>interface~obl_acc_tp</title>
+<g id="a_call~~graph~~CallGraph_node181"><a xlink:href=".././interface/obl_acc_tp.html" xlink:title="obl_acc_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="129,-6769 65,-6769 65,-6745 129,-6745 129,-6769"/>
+<text text-anchor="middle" x="97" y="-6754.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_io_log_pl -->
-<g id="call~~graph~~CallGraph_node160" class="node">
-<title>interface~fraggle_io_log_pl</title>
-<g id="a_call~~graph~~CallGraph_node160"><a xlink:href=".././interface/fraggle_io_log_pl.html" xlink:title="fraggle_io_log_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="144,-8269 50,-8269 50,-8245 144,-8245 144,-8269"/>
-<text text-anchor="middle" x="97" y="-8254.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
+<!-- interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp -->
+<g id="call~~graph~~CallGraph_edge164" class="edge">
+<title>interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-6757C169.53,-6757 239.8,-6757 284.55,-6757"/>
+<polygon fill="#000000" stroke="#000000" points="284.79,-6760.5 294.79,-6757 284.79,-6753.5 284.79,-6760.5"/>
+</g>
+<!-- interface~obl_pot_system -->
+<g id="call~~graph~~CallGraph_node182" class="node">
+<title>interface~obl_pot_system</title>
+<g id="a_call~~graph~~CallGraph_node182"><a xlink:href=".././interface/obl_pot_system.html" xlink:title="obl_pot_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="141,-6685 53,-6685 53,-6661 141,-6661 141,-6685"/>
+<text text-anchor="middle" x="97" y="-6670.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_pot_system</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_io_log_pl -->
-<g id="call~~graph~~CallGraph_node238" class="node">
-<title>proc~fraggle_io_log_pl</title>
-<g id="a_call~~graph~~CallGraph_node238"><a xlink:href=".././proc/fraggle_io_log_pl.html" xlink:title="fraggle_io_log_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="374,-8269 280,-8269 280,-8245 374,-8245 374,-8269"/>
-<text text-anchor="middle" x="327" y="-8254.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
+<!-- interface~obl_pot_system&#45;&gt;proc~obl_pot_system -->
+<g id="call~~graph~~CallGraph_edge165" class="edge">
+<title>interface~obl_pot_system&#45;&gt;proc~obl_pot_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.15,-6673C178.44,-6673 232.49,-6673 272.52,-6673"/>
+<polygon fill="#000000" stroke="#000000" points="272.64,-6676.5 282.64,-6673 272.64,-6669.5 272.64,-6676.5"/>
+</g>
+<!-- interface~orbel_el2xv_vec -->
+<g id="call~~graph~~CallGraph_node183" class="node">
+<title>interface~orbel_el2xv_vec</title>
+<g id="a_call~~graph~~CallGraph_node183"><a xlink:href=".././interface/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
+<polygon fill="#a7506f" stroke="#a7506f" points="142,-3754 52,-3754 52,-3730 142,-3730 142,-3754"/>
+<text text-anchor="middle" x="97" y="-3739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_io_log_pl&#45;&gt;proc~fraggle_io_log_pl -->
-<g id="call~~graph~~CallGraph_edge164" class="edge">
-<title>interface~fraggle_io_log_pl&#45;&gt;proc~fraggle_io_log_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-8257C180.45,-8257 231.21,-8257 269.87,-8257"/>
-<polygon fill="#000000" stroke="#000000" points="269.93,-8260.5 279.93,-8257 269.93,-8253.5 269.93,-8260.5"/>
+<!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
+<g id="call~~graph~~CallGraph_edge166" class="edge">
+<title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-3742C179.28,-3742 232.3,-3742 271.88,-3742"/>
+<polygon fill="#000000" stroke="#000000" points="271.89,-3745.5 281.89,-3742 271.89,-3738.5 271.89,-3745.5"/>
 </g>
-<!-- proc~io_read_frame_system -->
-<g id="call~~graph~~CallGraph_node161" class="node">
-<title>proc~io_read_frame_system</title>
-<g id="a_call~~graph~~CallGraph_node161"><a xlink:href=".././proc/io_read_frame_system.html" xlink:title="io_read_frame_system">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="388,-8311 266,-8311 266,-8287 388,-8287 388,-8311"/>
-<text text-anchor="middle" x="327" y="-8296.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_system</text>
+<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
+<g id="call~~graph~~CallGraph_edge167" class="edge">
+<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1373.51,-3620C1413.35,-3620 1480.46,-3620 1524.37,-3620"/>
+<polygon fill="#000000" stroke="#000000" points="1524.45,-3623.5 1534.45,-3620 1524.45,-3616.5 1524.45,-3623.5"/>
+</g>
+<!-- interface~orbel_xv2aeq -->
+<g id="call~~graph~~CallGraph_node185" class="node">
+<title>interface~orbel_xv2aeq</title>
+<g id="a_call~~graph~~CallGraph_node185"><a xlink:href=".././interface/orbel_xv2aeq.html" xlink:title="orbel_xv2aeq">
+<polygon fill="#a7506f" stroke="#a7506f" points="613,-8502 536,-8502 536,-8478 613,-8478 613,-8502"/>
+<text text-anchor="middle" x="574.5" y="-8487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_hdr -->
-<g id="call~~graph~~CallGraph_node176" class="node">
-<title>proc~io_read_hdr</title>
-<g id="a_call~~graph~~CallGraph_node176"><a xlink:href=".././proc/io_read_hdr.html" xlink:title="io_read_hdr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="609.5,-8311 539.5,-8311 539.5,-8287 609.5,-8287 609.5,-8311"/>
-<text text-anchor="middle" x="574.5" y="-8296.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_hdr</text>
+<!-- proc~orbel_xv2aeq -->
+<g id="call~~graph~~CallGraph_node506" class="node">
+<title>proc~orbel_xv2aeq</title>
+<g id="a_call~~graph~~CallGraph_node506"><a xlink:href=".././proc/orbel_xv2aeq.html" xlink:title="orbel_xv2aeq">
+<polygon fill="#d9534f" stroke="#d9534f" points="878,-8502 801,-8502 801,-8478 878,-8478 878,-8502"/>
+<text text-anchor="middle" x="839.5" y="-8487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_frame_system&#45;&gt;proc~io_read_hdr -->
-<g id="call~~graph~~CallGraph_edge165" class="edge">
-<title>proc~io_read_frame_system&#45;&gt;proc~io_read_hdr</title>
-<path fill="none" stroke="#000000" d="M388.06,-8299C431.71,-8299 489.82,-8299 529.28,-8299"/>
-<polygon fill="#000000" stroke="#000000" points="529.39,-8302.5 539.39,-8299 529.39,-8295.5 529.39,-8302.5"/>
+<!-- interface~orbel_xv2aeq&#45;&gt;proc~orbel_xv2aeq -->
+<g id="call~~graph~~CallGraph_edge168" class="edge">
+<title>interface~orbel_xv2aeq&#45;&gt;proc~orbel_xv2aeq</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.18,-8490C659.96,-8490 739.77,-8490 790.78,-8490"/>
+<polygon fill="#000000" stroke="#000000" points="790.89,-8493.5 800.89,-8490 790.89,-8486.5 790.89,-8493.5"/>
 </g>
-<!-- proc~rmvs_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node162" class="node">
-<title>proc~rmvs_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node162"><a xlink:href=".././proc/rmvs_setup_initialize_system.html" xlink:title="rmvs_setup_initialize_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="402.5,-8353 251.5,-8353 251.5,-8329 402.5,-8329 402.5,-8353"/>
-<text text-anchor="middle" x="327" y="-8338.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_initialize_system</text>
+<!-- proc~setup_body -->
+<g id="call~~graph~~CallGraph_node186" class="node">
+<title>proc~setup_body</title>
+<g id="a_call~~graph~~CallGraph_node186"><a xlink:href=".././proc/setup_body.html" xlink:title="setup_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="873.5,-8565 805.5,-8565 805.5,-8541 873.5,-8541 873.5,-8565"/>
+<text text-anchor="middle" x="839.5" y="-8550.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_body</text>
 </a>
 </g>
 </g>
-<!-- whm_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node767" class="node">
-<title>whm_setup_initialize_system</title>
-<polygon fill="#777777" stroke="#777777" points="650,-8374 499,-8374 499,-8350 650,-8350 650,-8374"/>
-<text text-anchor="middle" x="574.5" y="-8359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_initialize_system</text>
+<!-- proc~fraggle_generate_fragments -->
+<g id="call~~graph~~CallGraph_node187" class="node">
+<title>proc~fraggle_generate_fragments</title>
+<g id="a_call~~graph~~CallGraph_node187"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="401,-4003 253,-4003 253,-3979 401,-3979 401,-4003"/>
+<text text-anchor="middle" x="327" y="-3988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
+</a>
 </g>
-<!-- proc~rmvs_setup_initialize_system&#45;&gt;whm_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge166" class="edge">
-<title>proc~rmvs_setup_initialize_system&#45;&gt;whm_setup_initialize_system</title>
-<path fill="none" stroke="#000000" d="M402.66,-8347.39C429.8,-8349.71 460.66,-8352.35 488.62,-8354.74"/>
-<polygon fill="#000000" stroke="#000000" points="488.51,-8358.24 498.77,-8355.61 489.11,-8351.27 488.51,-8358.24"/>
 </g>
-<!-- proc~fraggle_io_log_regime -->
-<g id="call~~graph~~CallGraph_node239" class="node">
-<title>proc~fraggle_io_log_regime</title>
-<g id="a_call~~graph~~CallGraph_node239"><a xlink:href=".././proc/fraggle_io_log_regime.html" xlink:title="fraggle_io_log_regime">
-<polygon fill="#d9534f" stroke="#d9534f" points="899,-5208 780,-5208 780,-5184 899,-5184 899,-5208"/>
-<text text-anchor="middle" x="839.5" y="-5193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_regime</text>
+<!-- proc~fraggle_generate_pos_vec -->
+<g id="call~~graph~~CallGraph_node199" class="node">
+<title>proc~fraggle_generate_pos_vec</title>
+<g id="a_call~~graph~~CallGraph_node199"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
+<polygon fill="#d9534f" stroke="#d9534f" points="1164.5,-3877 1024.5,-3877 1024.5,-3853 1164.5,-3853 1164.5,-3877"/>
+<text text-anchor="middle" x="1094.5" y="-3862.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_io_log_regime&#45;&gt;proc~fraggle_io_log_regime -->
-<g id="call~~graph~~CallGraph_edge167" class="edge">
-<title>interface~fraggle_io_log_regime&#45;&gt;proc~fraggle_io_log_regime</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M634.19,-5196C674.33,-5196 727.69,-5196 769.81,-5196"/>
-<polygon fill="#000000" stroke="#000000" points="769.98,-5199.5 779.98,-5196 769.98,-5192.5 769.98,-5199.5"/>
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec -->
+<g id="call~~graph~~CallGraph_edge170" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec</title>
+<path fill="none" stroke="#000000" d="M342.25,-3978.76C365.25,-3959.8 412.78,-3923.85 460,-3908 650.84,-3843.92 891.77,-3849.38 1014.22,-3857.78"/>
+<polygon fill="#000000" stroke="#000000" points="1014.04,-3861.27 1024.26,-3858.49 1014.54,-3854.29 1014.04,-3861.27"/>
 </g>
-<!-- proc~rmvs_setup_tp -->
-<g id="call~~graph~~CallGraph_node164" class="node">
-<title>proc~rmvs_setup_tp</title>
-<g id="a_call~~graph~~CallGraph_node164"><a xlink:href=".././proc/rmvs_setup_tp.html" xlink:title="rmvs_setup_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-4998 285.5,-4998 285.5,-4974 368.5,-4974 368.5,-4998"/>
-<text text-anchor="middle" x="327" y="-4983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_tp</text>
+<!-- proc~fraggle_generate_spins -->
+<g id="call~~graph~~CallGraph_node206" class="node">
+<title>proc~fraggle_generate_spins</title>
+<g id="a_call~~graph~~CallGraph_node206"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
+<polygon fill="#d9534f" stroke="#d9534f" points="637,-4105 512,-4105 512,-4081 637,-4081 637,-4105"/>
+<text text-anchor="middle" x="574.5" y="-4090.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
 </a>
 </g>
 </g>
-<!-- setup_tp -->
-<g id="call~~graph~~CallGraph_node735" class="node">
-<title>setup_tp</title>
-<polygon fill="#777777" stroke="#777777" points="601.5,-5019 547.5,-5019 547.5,-4995 601.5,-4995 601.5,-5019"/>
-<text text-anchor="middle" x="574.5" y="-5004.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
-</g>
-<!-- proc~rmvs_setup_tp&#45;&gt;setup_tp -->
-<g id="call~~graph~~CallGraph_edge168" class="edge">
-<title>proc~rmvs_setup_tp&#45;&gt;setup_tp</title>
-<path fill="none" stroke="#000000" d="M368.54,-4989.47C415.44,-4993.48 491.98,-5000.03 537.07,-5003.88"/>
-<polygon fill="#000000" stroke="#000000" points="537.01,-5007.39 547.27,-5004.76 537.61,-5000.42 537.01,-5007.39"/>
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins -->
+<g id="call~~graph~~CallGraph_edge174" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins</title>
+<path fill="none" stroke="#000000" d="M343.65,-4003.29C367.39,-4021.29 414.57,-4054.55 460,-4072 473.17,-4077.06 487.68,-4080.92 501.8,-4083.87"/>
+<polygon fill="#000000" stroke="#000000" points="501.5,-4087.38 511.99,-4085.85 502.84,-4080.5 501.5,-4087.38"/>
 </g>
-<!-- interface~fraggle_io_log_start -->
-<g id="call~~graph~~CallGraph_node165" class="node">
-<title>interface~fraggle_io_log_start</title>
-<g id="a_call~~graph~~CallGraph_node165"><a xlink:href=".././interface/fraggle_io_log_start.html" xlink:title="fraggle_io_log_start">
-<polygon fill="#a7506f" stroke="#a7506f" points="150.5,-8437 43.5,-8437 43.5,-8413 150.5,-8413 150.5,-8437"/>
-<text text-anchor="middle" x="97" y="-8422.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
+<!-- proc~fraggle_generate_rad_vel -->
+<g id="call~~graph~~CallGraph_node208" class="node">
+<title>proc~fraggle_generate_rad_vel</title>
+<g id="a_call~~graph~~CallGraph_node208"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="642.5,-3941 506.5,-3941 506.5,-3917 642.5,-3917 642.5,-3941"/>
+<text text-anchor="middle" x="574.5" y="-3926.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_io_log_start -->
-<g id="call~~graph~~CallGraph_node244" class="node">
-<title>proc~fraggle_io_log_start</title>
-<g id="a_call~~graph~~CallGraph_node244"><a xlink:href=".././proc/fraggle_io_log_start.html" xlink:title="fraggle_io_log_start">
-<polygon fill="#d9534f" stroke="#d9534f" points="380.5,-8437 273.5,-8437 273.5,-8413 380.5,-8413 380.5,-8437"/>
-<text text-anchor="middle" x="327" y="-8422.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
+<g id="call~~graph~~CallGraph_edge171" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
+<path fill="none" stroke="#000000" d="M362.7,-3978.99C389.14,-3970.14 426.57,-3958.25 460,-3950 471.63,-3947.13 484.01,-3944.45 496.17,-3942.04"/>
+<polygon fill="#000000" stroke="#000000" points="497.15,-3945.41 506.3,-3940.08 495.82,-3938.54 497.15,-3945.41"/>
+</g>
+<!-- proc~fraggle_generate_tan_vel -->
+<g id="call~~graph~~CallGraph_node228" class="node">
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_call~~graph~~CallGraph_node228"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="642,-3983 507,-3983 507,-3959 642,-3959 642,-3983"/>
+<text text-anchor="middle" x="574.5" y="-3968.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_io_log_start&#45;&gt;proc~fraggle_io_log_start -->
-<g id="call~~graph~~CallGraph_edge169" class="edge">
-<title>interface~fraggle_io_log_start&#45;&gt;proc~fraggle_io_log_start</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.59,-8425C184.11,-8425 227.72,-8425 263.07,-8425"/>
-<polygon fill="#000000" stroke="#000000" points="263.28,-8428.5 273.28,-8425 263.28,-8421.5 263.28,-8428.5"/>
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
+<g id="call~~graph~~CallGraph_edge173" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<path fill="none" stroke="#000000" d="M401.33,-3985.03C431.41,-3982.58 466.25,-3979.74 496.69,-3977.26"/>
+<polygon fill="#000000" stroke="#000000" points="497.14,-3980.73 506.83,-3976.43 496.58,-3973.76 497.14,-3980.73"/>
 </g>
-<!-- proc~util_append_arr_logical -->
-<g id="call~~graph~~CallGraph_node166" class="node">
-<title>proc~util_append_arr_logical</title>
-<g id="a_call~~graph~~CallGraph_node166"><a xlink:href=".././proc/util_append_arr_logical.html" xlink:title="util_append_arr_logical">
-<polygon fill="#d9534f" stroke="#d9534f" points="901.5,-6442 777.5,-6442 777.5,-6418 901.5,-6418 901.5,-6442"/>
-<text text-anchor="middle" x="839.5" y="-6427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_logical</text>
+<!-- interface~fraggle_io_log_generate -->
+<g id="call~~graph~~CallGraph_node452" class="node">
+<title>interface~fraggle_io_log_generate</title>
+<g id="a_call~~graph~~CallGraph_node452"><a xlink:href=".././interface/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
+<polygon fill="#a7506f" stroke="#a7506f" points="639,-4147 510,-4147 510,-4123 639,-4123 639,-4147"/>
+<text text-anchor="middle" x="574.5" y="-4132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_arr_logical&#45;&gt;interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_edge170" class="edge">
-<title>proc~util_append_arr_logical&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M901.74,-6440.17C948.96,-6448.01 1012.89,-6458.62 1053.67,-6465.39"/>
-<polygon fill="#000000" stroke="#000000" points="1053.33,-6468.88 1063.77,-6467.06 1054.48,-6461.97 1053.33,-6468.88"/>
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate -->
+<g id="call~~graph~~CallGraph_edge169" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate</title>
+<path fill="none" stroke="#000000" d="M337.02,-4003.17C356.43,-4028.37 404.89,-4086.24 460,-4114 472.31,-4120.2 486.21,-4124.59 499.94,-4127.68"/>
+<polygon fill="#000000" stroke="#000000" points="499.39,-4131.14 509.89,-4129.72 500.79,-4124.28 499.39,-4131.14"/>
 </g>
-<!-- proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
 <g id="call~~graph~~CallGraph_edge172" class="edge">
-<title>proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve</title>
-<path fill="none" stroke="#000000" d="M1141.78,-6207C1180.32,-6207 1235.52,-6207 1277.64,-6207"/>
-<polygon fill="#000000" stroke="#000000" points="1277.78,-6210.5 1287.78,-6207 1277.78,-6203.5 1277.78,-6210.5"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M401.14,-3996.87C493.81,-4004.32 653.28,-4017.12 751.92,-4025.05"/>
+<polygon fill="#000000" stroke="#000000" points="751.91,-4028.56 762.16,-4025.87 752.47,-4021.58 751.91,-4028.56"/>
 </g>
-<!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
-<g id="call~~graph~~CallGraph_edge171" class="edge">
-<title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M1141.67,-6199.92C1159.78,-6196.55 1180.59,-6191.94 1199,-6186 1237.23,-6173.66 1278.96,-6153.93 1306.72,-6139.83"/>
-<polygon fill="#000000" stroke="#000000" points="1308.63,-6142.79 1315.92,-6135.1 1305.43,-6136.56 1308.63,-6142.79"/>
+<!-- interface~orbel_xv2aqt -->
+<g id="call~~graph~~CallGraph_node188" class="node">
+<title>interface~orbel_xv2aqt</title>
+<g id="a_call~~graph~~CallGraph_node188"><a xlink:href=".././interface/orbel_xv2aqt.html" xlink:title="orbel_xv2aqt">
+<polygon fill="#a7506f" stroke="#a7506f" points="134,-8628 60,-8628 60,-8604 134,-8604 134,-8628"/>
+<text text-anchor="middle" x="97" y="-8613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aqt</text>
+</a>
 </g>
-<!-- interface~fraggle_placeholder_accel -->
-<g id="call~~graph~~CallGraph_node168" class="node">
-<title>interface~fraggle_placeholder_accel</title>
-<g id="a_call~~graph~~CallGraph_node168"><a xlink:href=".././interface/fraggle_placeholder_accel.html" xlink:title="fraggle_placeholder_accel">
-<polygon fill="#a7506f" stroke="#a7506f" points="166,-8479 28,-8479 28,-8455 166,-8455 166,-8479"/>
-<text text-anchor="middle" x="97" y="-8464.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_accel</text>
+</g>
+<!-- proc~orbel_xv2aqt -->
+<g id="call~~graph~~CallGraph_node518" class="node">
+<title>proc~orbel_xv2aqt</title>
+<g id="a_call~~graph~~CallGraph_node518"><a xlink:href=".././proc/orbel_xv2aqt.html" xlink:title="orbel_xv2aqt">
+<polygon fill="#d9534f" stroke="#d9534f" points="364,-8628 290,-8628 290,-8604 364,-8604 364,-8628"/>
+<text text-anchor="middle" x="327" y="-8613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aqt</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_placeholder_accel -->
-<g id="call~~graph~~CallGraph_node383" class="node">
-<title>proc~fraggle_placeholder_accel</title>
-<g id="a_call~~graph~~CallGraph_node383"><a xlink:href=".././proc/fraggle_placeholder_accel.html" xlink:title="fraggle_placeholder_accel">
-<polygon fill="#d9534f" stroke="#d9534f" points="396,-8479 258,-8479 258,-8455 396,-8455 396,-8479"/>
-<text text-anchor="middle" x="327" y="-8464.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_accel</text>
+<!-- interface~orbel_xv2aqt&#45;&gt;proc~orbel_xv2aqt -->
+<g id="call~~graph~~CallGraph_edge175" class="edge">
+<title>interface~orbel_xv2aqt&#45;&gt;proc~orbel_xv2aqt</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.13,-8616C173.45,-8616 236.46,-8616 279.46,-8616"/>
+<polygon fill="#000000" stroke="#000000" points="279.67,-8619.5 289.66,-8616 279.66,-8612.5 279.67,-8619.5"/>
+</g>
+<!-- proc~whm_gr_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node189" class="node">
+<title>proc~whm_gr_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node189"><a xlink:href=".././proc/whm_gr_kick_getacch_pl.html" xlink:title="whm_gr_kick_getacch_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-4210 260.5,-4210 260.5,-4186 393.5,-4186 393.5,-4210"/>
+<text text-anchor="middle" x="327" y="-4195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_placeholder_accel&#45;&gt;proc~fraggle_placeholder_accel -->
-<g id="call~~graph~~CallGraph_edge173" class="edge">
-<title>interface~fraggle_placeholder_accel&#45;&gt;proc~fraggle_placeholder_accel</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.1,-8467C191.81,-8467 221.27,-8467 247.83,-8467"/>
-<polygon fill="#000000" stroke="#000000" points="247.86,-8470.5 257.86,-8467 247.86,-8463.5 247.86,-8470.5"/>
+<!-- proc~whm_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_edge176" class="edge">
+<title>proc~whm_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch</title>
+<path fill="none" stroke="#000000" d="M393.79,-4192.37C433,-4189.02 482.17,-4184.81 519.16,-4181.65"/>
+<polygon fill="#000000" stroke="#000000" points="519.59,-4185.12 529.25,-4180.79 518.99,-4178.15 519.59,-4185.12"/>
 </g>
-<!-- proc~orbel_xv2el_vec -->
-<g id="call~~graph~~CallGraph_node169" class="node">
-<title>proc~orbel_xv2el_vec</title>
-<g id="a_call~~graph~~CallGraph_node169"><a xlink:href=".././proc/orbel_xv2el_vec.html" xlink:title="orbel_xv2el_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="372,-8521 282,-8521 282,-8497 372,-8497 372,-8521"/>
-<text text-anchor="middle" x="327" y="-8506.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el_vec</text>
+<!-- proc~setup_encounter -->
+<g id="call~~graph~~CallGraph_node190" class="node">
+<title>proc~setup_encounter</title>
+<g id="a_call~~graph~~CallGraph_node190"><a xlink:href=".././proc/setup_encounter.html" xlink:title="setup_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="373.5,-8670 280.5,-8670 280.5,-8646 373.5,-8646 373.5,-8670"/>
+<text text-anchor="middle" x="327" y="-8655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_encounter</text>
 </a>
 </g>
 </g>
 <!-- interface~orbel_xv2el -->
-<g id="call~~graph~~CallGraph_node474" class="node">
+<g id="call~~graph~~CallGraph_node191" class="node">
 <title>interface~orbel_xv2el</title>
-<g id="a_call~~graph~~CallGraph_node474"><a xlink:href=".././interface/orbel_xv2el.html" xlink:title="orbel_xv2el">
-<polygon fill="#a7506f" stroke="#a7506f" points="608,-8521 541,-8521 541,-8497 608,-8497 608,-8521"/>
-<text text-anchor="middle" x="574.5" y="-8506.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el</text>
+<g id="a_call~~graph~~CallGraph_node191"><a xlink:href=".././interface/orbel_xv2el.html" xlink:title="orbel_xv2el">
+<polygon fill="#a7506f" stroke="#a7506f" points="608,-8712 541,-8712 541,-8688 608,-8688 608,-8712"/>
+<text text-anchor="middle" x="574.5" y="-8697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_xv2el_vec&#45;&gt;interface~orbel_xv2el -->
-<g id="call~~graph~~CallGraph_edge174" class="edge">
-<title>proc~orbel_xv2el_vec&#45;&gt;interface~orbel_xv2el</title>
-<path fill="none" stroke="#000000" d="M372.17,-8509C417.03,-8509 486.05,-8509 530.48,-8509"/>
-<polygon fill="#000000" stroke="#000000" points="530.67,-8512.5 540.67,-8509 530.67,-8505.5 530.67,-8512.5"/>
-</g>
-<!-- interface~fraggle_placeholder_kick -->
-<g id="call~~graph~~CallGraph_node170" class="node">
-<title>interface~fraggle_placeholder_kick</title>
-<g id="a_call~~graph~~CallGraph_node170"><a xlink:href=".././interface/fraggle_placeholder_kick.html" xlink:title="fraggle_placeholder_kick">
-<polygon fill="#a7506f" stroke="#a7506f" points="162.5,-8563 31.5,-8563 31.5,-8539 162.5,-8539 162.5,-8563"/>
-<text text-anchor="middle" x="97" y="-8548.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_kick</text>
+<!-- proc~orbel_xv2el -->
+<g id="call~~graph~~CallGraph_node559" class="node">
+<title>proc~orbel_xv2el</title>
+<g id="a_call~~graph~~CallGraph_node559"><a xlink:href=".././proc/orbel_xv2el.html" xlink:title="orbel_xv2el">
+<polygon fill="#d9534f" stroke="#d9534f" points="873,-8712 806,-8712 806,-8688 873,-8688 873,-8712"/>
+<text text-anchor="middle" x="839.5" y="-8697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_placeholder_kick -->
-<g id="call~~graph~~CallGraph_node466" class="node">
-<title>proc~fraggle_placeholder_kick</title>
-<g id="a_call~~graph~~CallGraph_node466"><a xlink:href=".././proc/fraggle_placeholder_kick.html" xlink:title="fraggle_placeholder_kick">
-<polygon fill="#d9534f" stroke="#d9534f" points="392.5,-8563 261.5,-8563 261.5,-8539 392.5,-8539 392.5,-8563"/>
-<text text-anchor="middle" x="327" y="-8548.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_kick</text>
+<!-- interface~orbel_xv2el&#45;&gt;proc~orbel_xv2el -->
+<g id="call~~graph~~CallGraph_edge177" class="edge">
+<title>interface~orbel_xv2el&#45;&gt;proc~orbel_xv2el</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.01,-8700C655.3,-8700 743.12,-8700 795.64,-8700"/>
+<polygon fill="#000000" stroke="#000000" points="795.65,-8703.5 805.65,-8700 795.65,-8696.5 795.65,-8703.5"/>
+</g>
+<!-- proc~whm_coord_j2h_pl -->
+<g id="call~~graph~~CallGraph_node192" class="node">
+<title>proc~whm_coord_j2h_pl</title>
+<g id="a_call~~graph~~CallGraph_node192"><a xlink:href=".././proc/whm_coord_j2h_pl.html" xlink:title="whm_coord_j2h_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-8082 275.5,-8082 275.5,-8058 378.5,-8058 378.5,-8082"/>
+<text text-anchor="middle" x="327" y="-8067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_j2h_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_placeholder_kick&#45;&gt;proc~fraggle_placeholder_kick -->
-<g id="call~~graph~~CallGraph_edge175" class="edge">
-<title>interface~fraggle_placeholder_kick&#45;&gt;proc~fraggle_placeholder_kick</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.73,-8551C190.16,-8551 222.32,-8551 250.8,-8551"/>
-<polygon fill="#000000" stroke="#000000" points="251.11,-8554.5 261.11,-8551 251.11,-8547.5 251.11,-8554.5"/>
+<!-- proc~whm_coord_j2h_pl&#45;&gt;gmpl -->
+<g id="call~~graph~~CallGraph_edge183" class="edge">
+<title>proc~whm_coord_j2h_pl&#45;&gt;gmpl</title>
+<path fill="none" stroke="#000000" d="M378.63,-8074.8C393.99,-8077.86 410.38,-8082.86 424,-8091 445.1,-8103.61 438.7,-8120.73 460,-8133 483.49,-8146.53 513.85,-8151.62 537.26,-8153.42"/>
+<polygon fill="#000000" stroke="#000000" points="537.28,-8156.93 547.47,-8154.03 537.7,-8149.94 537.28,-8156.93"/>
 </g>
-<!-- interface~fraggle_placeholder_step -->
-<g id="call~~graph~~CallGraph_node171" class="node">
-<title>interface~fraggle_placeholder_step</title>
-<g id="a_call~~graph~~CallGraph_node171"><a xlink:href=".././interface/fraggle_placeholder_step.html" xlink:title="fraggle_placeholder_step">
-<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-8605 30.5,-8605 30.5,-8581 163.5,-8581 163.5,-8605"/>
-<text text-anchor="middle" x="97" y="-8590.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_step</text>
-</a>
+<!-- proc~whm_coord_j2h_pl&#45;&gt;xh -->
+<g id="call~~graph~~CallGraph_edge181" class="edge">
+<title>proc~whm_coord_j2h_pl&#45;&gt;xh</title>
+<path fill="none" stroke="#000000" d="M378.63,-8065.2C393.99,-8062.14 410.38,-8057.14 424,-8049 445.1,-8036.39 438.7,-8019.27 460,-8007 483.49,-7993.47 513.85,-7988.38 537.26,-7986.58"/>
+<polygon fill="#000000" stroke="#000000" points="537.7,-7990.06 547.47,-7985.97 537.28,-7983.07 537.7,-7990.06"/>
 </g>
+<!-- proc~whm_coord_j2h_pl&#45;&gt;eta -->
+<g id="call~~graph~~CallGraph_edge180" class="edge">
+<title>proc~whm_coord_j2h_pl&#45;&gt;eta</title>
+<path fill="none" stroke="#000000" d="M378.57,-8078.65C425.8,-8086.73 495.14,-8098.59 537.13,-8105.78"/>
+<polygon fill="#000000" stroke="#000000" points="536.74,-8109.26 547.19,-8107.5 537.92,-8102.36 536.74,-8109.26"/>
 </g>
-<!-- proc~fraggle_placeholder_step -->
-<g id="call~~graph~~CallGraph_node443" class="node">
-<title>proc~fraggle_placeholder_step</title>
-<g id="a_call~~graph~~CallGraph_node443"><a xlink:href=".././proc/fraggle_placeholder_step.html" xlink:title="fraggle_placeholder_step">
-<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-8605 260.5,-8605 260.5,-8581 393.5,-8581 393.5,-8605"/>
-<text text-anchor="middle" x="327" y="-8590.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_step</text>
-</a>
+<!-- proc~whm_coord_j2h_pl&#45;&gt;vh -->
+<g id="call~~graph~~CallGraph_edge178" class="edge">
+<title>proc~whm_coord_j2h_pl&#45;&gt;vh</title>
+<path fill="none" stroke="#000000" d="M378.57,-8070C425.8,-8070 495.14,-8070 537.13,-8070"/>
+<polygon fill="#000000" stroke="#000000" points="537.19,-8073.5 547.19,-8070 537.19,-8066.5 537.19,-8073.5"/>
 </g>
+<!-- proc~whm_coord_j2h_pl&#45;&gt;xj -->
+<g id="call~~graph~~CallGraph_edge179" class="edge">
+<title>proc~whm_coord_j2h_pl&#45;&gt;xj</title>
+<path fill="none" stroke="#000000" d="M378.83,-8067.87C394.72,-8064.99 411.37,-8059.43 424,-8049 455.31,-8023.13 428.28,-7990.36 460,-7965 481.54,-7947.78 512.73,-7943 536.96,-7942.27"/>
+<polygon fill="#000000" stroke="#000000" points="537.24,-7945.77 547.21,-7942.18 537.18,-7938.77 537.24,-7945.77"/>
 </g>
-<!-- interface~fraggle_placeholder_step&#45;&gt;proc~fraggle_placeholder_step -->
-<g id="call~~graph~~CallGraph_edge176" class="edge">
-<title>interface~fraggle_placeholder_step&#45;&gt;proc~fraggle_placeholder_step</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-8593C190.71,-8593 222.24,-8593 250.27,-8593"/>
-<polygon fill="#000000" stroke="#000000" points="250.43,-8596.5 260.43,-8593 250.43,-8589.5 250.43,-8596.5"/>
+<!-- proc~whm_coord_j2h_pl&#45;&gt;vj -->
+<g id="call~~graph~~CallGraph_edge182" class="edge">
+<title>proc~whm_coord_j2h_pl&#45;&gt;vj</title>
+<path fill="none" stroke="#000000" d="M378.57,-8061.35C425.8,-8053.27 495.14,-8041.41 537.13,-8034.22"/>
+<polygon fill="#000000" stroke="#000000" points="537.92,-8037.64 547.19,-8032.5 536.74,-8030.74 537.92,-8037.64"/>
 </g>
-<!-- interface~fraggle_regime_colliders -->
-<g id="call~~graph~~CallGraph_node172" class="node">
-<title>interface~fraggle_regime_colliders</title>
-<g id="a_call~~graph~~CallGraph_node172"><a xlink:href=".././interface/fraggle_regime_colliders.html" xlink:title="fraggle_regime_colliders">
-<polygon fill="#a7506f" stroke="#a7506f" points="162,-5208 32,-5208 32,-5184 162,-5184 162,-5208"/>
-<text text-anchor="middle" x="97" y="-5193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_colliders</text>
+<!-- proc~setup_initialize_particle_info_system -->
+<g id="call~~graph~~CallGraph_node193" class="node">
+<title>proc~setup_initialize_particle_info_system</title>
+<g id="a_call~~graph~~CallGraph_node193"><a xlink:href=".././proc/setup_initialize_particle_info_system.html" xlink:title="setup_initialize_particle_info_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="420,-8754 234,-8754 234,-8730 420,-8730 420,-8754"/>
+<text text-anchor="middle" x="327" y="-8739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_regime_colliders&#45;&gt;proc~fraggle_regime_colliders -->
-<g id="call~~graph~~CallGraph_edge177" class="edge">
-<title>interface~fraggle_regime_colliders&#45;&gt;proc~fraggle_regime_colliders</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-5196C190.04,-5196 222.94,-5196 251.9,-5196"/>
-<polygon fill="#000000" stroke="#000000" points="251.97,-5199.5 261.97,-5196 251.97,-5192.5 251.97,-5199.5"/>
-</g>
-<!-- interface~fraggle_set_budgets_fragments -->
-<g id="call~~graph~~CallGraph_node173" class="node">
-<title>interface~fraggle_set_budgets_fragments</title>
-<g id="a_call~~graph~~CallGraph_node173"><a xlink:href=".././interface/fraggle_set_budgets_fragments.html" xlink:title="fraggle_set_budgets_fragments">
-<polygon fill="#a7506f" stroke="#a7506f" points="179,-8647 15,-8647 15,-8623 179,-8623 179,-8647"/>
-<text text-anchor="middle" x="97" y="-8632.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_budgets_fragments</text>
+<!-- interface~orbel_xv2el_vec -->
+<g id="call~~graph~~CallGraph_node194" class="node">
+<title>interface~orbel_xv2el_vec</title>
+<g id="a_call~~graph~~CallGraph_node194"><a xlink:href=".././interface/orbel_xv2el_vec.html" xlink:title="orbel_xv2el_vec">
+<polygon fill="#a7506f" stroke="#a7506f" points="142,-8712 52,-8712 52,-8688 142,-8688 142,-8712"/>
+<text text-anchor="middle" x="97" y="-8697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el_vec</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_set_budgets_fragments -->
-<g id="call~~graph~~CallGraph_node493" class="node">
-<title>proc~fraggle_set_budgets_fragments</title>
-<g id="a_call~~graph~~CallGraph_node493"><a xlink:href=".././proc/fraggle_set_budgets_fragments.html" xlink:title="fraggle_set_budgets_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="409,-8647 245,-8647 245,-8623 409,-8623 409,-8647"/>
-<text text-anchor="middle" x="327" y="-8632.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_budgets_fragments</text>
+<!-- proc~orbel_xv2el_vec -->
+<g id="call~~graph~~CallGraph_node523" class="node">
+<title>proc~orbel_xv2el_vec</title>
+<g id="a_call~~graph~~CallGraph_node523"><a xlink:href=".././proc/orbel_xv2el_vec.html" xlink:title="orbel_xv2el_vec">
+<polygon fill="#d9534f" stroke="#d9534f" points="372,-8712 282,-8712 282,-8688 372,-8688 372,-8712"/>
+<text text-anchor="middle" x="327" y="-8697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el_vec</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_set_budgets_fragments&#45;&gt;proc~fraggle_set_budgets_fragments -->
-<g id="call~~graph~~CallGraph_edge178" class="edge">
-<title>interface~fraggle_set_budgets_fragments&#45;&gt;proc~fraggle_set_budgets_fragments</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M179.03,-8635C197.06,-8635 216.3,-8635 234.72,-8635"/>
-<polygon fill="#000000" stroke="#000000" points="234.85,-8638.5 244.85,-8635 234.85,-8631.5 234.85,-8638.5"/>
+<!-- interface~orbel_xv2el_vec&#45;&gt;proc~orbel_xv2el_vec -->
+<g id="call~~graph~~CallGraph_edge184" class="edge">
+<title>interface~orbel_xv2el_vec&#45;&gt;proc~orbel_xv2el_vec</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-8700C179.28,-8700 232.3,-8700 271.88,-8700"/>
+<polygon fill="#000000" stroke="#000000" points="271.89,-8703.5 281.89,-8700 271.89,-8696.5 271.89,-8703.5"/>
 </g>
-<!-- interface~fraggle_set_coordinate_system -->
-<g id="call~~graph~~CallGraph_node174" class="node">
-<title>interface~fraggle_set_coordinate_system</title>
-<g id="a_call~~graph~~CallGraph_node174"><a xlink:href=".././interface/fraggle_set_coordinate_system.html" xlink:title="fraggle_set_coordinate_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="178,-8689 16,-8689 16,-8665 178,-8665 178,-8689"/>
-<text text-anchor="middle" x="97" y="-8674.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_coordinate_system</text>
+<!-- proc~whm_coord_vh2vj_pl -->
+<g id="call~~graph~~CallGraph_node195" class="node">
+<title>proc~whm_coord_vh2vj_pl</title>
+<g id="a_call~~graph~~CallGraph_node195"><a xlink:href=".././proc/whm_coord_vh2vj_pl.html" xlink:title="whm_coord_vh2vj_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="383.5,-8124 270.5,-8124 270.5,-8100 383.5,-8100 383.5,-8124"/>
+<text text-anchor="middle" x="327" y="-8109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_vh2vj_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_set_coordinate_system -->
-<g id="call~~graph~~CallGraph_node502" class="node">
-<title>proc~fraggle_set_coordinate_system</title>
-<g id="a_call~~graph~~CallGraph_node502"><a xlink:href=".././proc/fraggle_set_coordinate_system.html" xlink:title="fraggle_set_coordinate_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="408,-8689 246,-8689 246,-8665 408,-8665 408,-8689"/>
-<text text-anchor="middle" x="327" y="-8674.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_coordinate_system</text>
-</a>
-</g>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;gmpl -->
+<g id="call~~graph~~CallGraph_edge187" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;gmpl</title>
+<path fill="none" stroke="#000000" d="M383.71,-8121.53C430.82,-8129.59 496.94,-8140.9 537.41,-8147.82"/>
+<polygon fill="#000000" stroke="#000000" points="536.91,-8151.29 547.36,-8149.53 538.1,-8144.39 536.91,-8151.29"/>
 </g>
-<!-- interface~fraggle_set_coordinate_system&#45;&gt;proc~fraggle_set_coordinate_system -->
-<g id="call~~graph~~CallGraph_edge179" class="edge">
-<title>interface~fraggle_set_coordinate_system&#45;&gt;proc~fraggle_set_coordinate_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M178.06,-8677C196.66,-8677 216.59,-8677 235.6,-8677"/>
-<polygon fill="#000000" stroke="#000000" points="235.74,-8680.5 245.74,-8677 235.74,-8673.5 235.74,-8680.5"/>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;eta -->
+<g id="call~~graph~~CallGraph_edge188" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;eta</title>
+<path fill="none" stroke="#000000" d="M383.71,-8112C430.72,-8112 496.66,-8112 537.15,-8112"/>
+<polygon fill="#000000" stroke="#000000" points="537.36,-8115.5 547.36,-8112 537.36,-8108.5 537.36,-8115.5"/>
 </g>
-<!-- proc~util_solve_linear_system_d -->
-<g id="call~~graph~~CallGraph_node175" class="node">
-<title>proc~util_solve_linear_system_d</title>
-<g id="a_call~~graph~~CallGraph_node175"><a xlink:href=".././proc/util_solve_linear_system_d.html" xlink:title="util_solve_linear_system_d">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="167.5,-8773 26.5,-8773 26.5,-8749 167.5,-8749 167.5,-8773"/>
-<text text-anchor="middle" x="97" y="-8758.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_d</text>
-</a>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vh -->
+<g id="call~~graph~~CallGraph_edge186" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;vh</title>
+<path fill="none" stroke="#000000" d="M383.71,-8102.47C430.82,-8094.41 496.94,-8083.1 537.41,-8076.18"/>
+<polygon fill="#000000" stroke="#000000" points="538.1,-8079.61 547.36,-8074.47 536.91,-8072.71 538.1,-8079.61"/>
 </g>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vj -->
+<g id="call~~graph~~CallGraph_edge185" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;vj</title>
+<path fill="none" stroke="#000000" d="M383.62,-8106.14C397.48,-8103.03 411.85,-8098.27 424,-8091 445.1,-8078.39 438.7,-8061.27 460,-8049 483.49,-8035.47 513.85,-8030.38 537.26,-8028.58"/>
+<polygon fill="#000000" stroke="#000000" points="537.7,-8032.06 547.47,-8027.97 537.28,-8025.07 537.7,-8032.06"/>
 </g>
-<!-- proc~solve_wbs -->
-<g id="call~~graph~~CallGraph_node185" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_call~~graph~~CallGraph_node185"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="358,-8773 296,-8773 296,-8749 358,-8749 358,-8773"/>
-<text text-anchor="middle" x="327" y="-8758.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<!-- proc~symba_util_sort_rearrange_arr_kin -->
+<g id="call~~graph~~CallGraph_node196" class="node">
+<title>proc~symba_util_sort_rearrange_arr_kin</title>
+<g id="a_call~~graph~~CallGraph_node196"><a xlink:href=".././proc/symba_util_sort_rearrange_arr_kin.html" xlink:title="symba_util_sort_rearrange_arr_kin">
+<polygon fill="#d9534f" stroke="#d9534f" points="187,-8796 7,-8796 7,-8772 187,-8772 187,-8796"/>
+<text text-anchor="middle" x="97" y="-8781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_arr_kin</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs -->
-<g id="call~~graph~~CallGraph_edge180" class="edge">
-<title>proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs</title>
-<path fill="none" stroke="#000000" d="M167.65,-8761C206.41,-8761 253.27,-8761 285.92,-8761"/>
-<polygon fill="#000000" stroke="#000000" points="285.99,-8764.5 295.99,-8761 285.99,-8757.5 285.99,-8764.5"/>
-</g>
-<!-- proc~ge_wpp -->
+<!-- interface~setup_body -->
 <g id="call~~graph~~CallGraph_node197" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_call~~graph~~CallGraph_node197"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="354,-8731 300,-8731 300,-8707 354,-8707 354,-8731"/>
-<text text-anchor="middle" x="327" y="-8716.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>interface~setup_body</title>
+<g id="a_call~~graph~~CallGraph_node197"><a xlink:href=".././interface/setup_body.html" xlink:title="setup_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="608.5,-8565 540.5,-8565 540.5,-8541 608.5,-8541 608.5,-8565"/>
+<text text-anchor="middle" x="574.5" y="-8550.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp -->
-<g id="call~~graph~~CallGraph_edge181" class="edge">
-<title>proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp</title>
-<path fill="none" stroke="#000000" d="M163.34,-8748.96C204.48,-8741.39 256.03,-8731.89 289.94,-8725.64"/>
-<polygon fill="#000000" stroke="#000000" points="290.66,-8729.07 299.86,-8723.81 289.39,-8722.18 290.66,-8729.07"/>
+<!-- interface~setup_body&#45;&gt;proc~setup_body -->
+<g id="call~~graph~~CallGraph_edge189" class="edge">
+<title>interface~setup_body&#45;&gt;proc~setup_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.54,-8553C655.78,-8553 742.69,-8553 795.07,-8553"/>
+<polygon fill="#000000" stroke="#000000" points="795.39,-8556.5 805.39,-8553 795.39,-8549.5 795.39,-8556.5"/>
 </g>
-<!-- interface~fraggle_set_mass_dist_fragments -->
-<g id="call~~graph~~CallGraph_node177" class="node">
-<title>interface~fraggle_set_mass_dist_fragments</title>
-<g id="a_call~~graph~~CallGraph_node177"><a xlink:href=".././interface/fraggle_set_mass_dist_fragments.html" xlink:title="fraggle_set_mass_dist_fragments">
-<polygon fill="#a7506f" stroke="#a7506f" points="184,-8815 10,-8815 10,-8791 184,-8791 184,-8815"/>
-<text text-anchor="middle" x="97" y="-8800.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_mass_dist_fragments</text>
+<!-- interface~setup_construct_system -->
+<g id="call~~graph~~CallGraph_node198" class="node">
+<title>interface~setup_construct_system</title>
+<g id="a_call~~graph~~CallGraph_node198"><a xlink:href=".././interface/setup_construct_system.html" xlink:title="setup_construct_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="638.5,-659 510.5,-659 510.5,-635 638.5,-635 638.5,-659"/>
+<text text-anchor="middle" x="574.5" y="-644.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_set_mass_dist_fragments -->
-<g id="call~~graph~~CallGraph_node500" class="node">
-<title>proc~fraggle_set_mass_dist_fragments</title>
-<g id="a_call~~graph~~CallGraph_node500"><a xlink:href=".././proc/fraggle_set_mass_dist_fragments.html" xlink:title="fraggle_set_mass_dist_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="414,-8815 240,-8815 240,-8791 414,-8791 414,-8815"/>
-<text text-anchor="middle" x="327" y="-8800.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_mass_dist_fragments</text>
+<!-- interface~setup_construct_system&#45;&gt;proc~setup_construct_system -->
+<g id="call~~graph~~CallGraph_edge190" class="edge">
+<title>interface~setup_construct_system&#45;&gt;proc~setup_construct_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.83,-647C676.86,-647 725.41,-647 765.11,-647"/>
+<polygon fill="#000000" stroke="#000000" points="765.26,-650.5 775.26,-647 765.26,-643.5 765.26,-650.5"/>
+</g>
+<!-- interface~fraggle_util_shift_vector_to_origin -->
+<g id="call~~graph~~CallGraph_node494" class="node">
+<title>interface~fraggle_util_shift_vector_to_origin</title>
+<g id="a_call~~graph~~CallGraph_node494"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
+<polygon fill="#a7506f" stroke="#a7506f" points="1426,-3887 1253,-3887 1253,-3863 1426,-3863 1426,-3887"/>
+<text text-anchor="middle" x="1339.5" y="-3872.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_set_mass_dist_fragments&#45;&gt;proc~fraggle_set_mass_dist_fragments -->
-<g id="call~~graph~~CallGraph_edge182" class="edge">
-<title>interface~fraggle_set_mass_dist_fragments&#45;&gt;proc~fraggle_set_mass_dist_fragments</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.2,-8803C198.95,-8803 214.37,-8803 229.37,-8803"/>
-<polygon fill="#000000" stroke="#000000" points="229.68,-8806.5 239.68,-8803 229.68,-8799.5 229.68,-8806.5"/>
+<!-- proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
+<g id="call~~graph~~CallGraph_edge191" class="edge">
+<title>proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
+<path fill="none" stroke="#000000" d="M1164.81,-3867.85C1188.96,-3868.85 1216.5,-3869.98 1242.43,-3871.05"/>
+<polygon fill="#000000" stroke="#000000" points="1242.52,-3874.55 1252.66,-3871.47 1242.81,-3867.56 1242.52,-3874.55"/>
 </g>
-<!-- interface~fraggle_set_natural_scale_factors -->
-<g id="call~~graph~~CallGraph_node178" class="node">
-<title>interface~fraggle_set_natural_scale_factors</title>
-<g id="a_call~~graph~~CallGraph_node178"><a xlink:href=".././interface/fraggle_set_natural_scale_factors.html" xlink:title="fraggle_set_natural_scale_factors">
-<polygon fill="#a7506f" stroke="#a7506f" points="184,-8857 10,-8857 10,-8833 184,-8833 184,-8857"/>
-<text text-anchor="middle" x="97" y="-8842.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_natural_scale_factors</text>
+<!-- proc~setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node200" class="node">
+<title>proc~setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node200"><a xlink:href=".././proc/setup_initialize_system.html" xlink:title="setup_initialize_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="388,-8838 266,-8838 266,-8814 388,-8814 388,-8838"/>
+<text text-anchor="middle" x="327" y="-8823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_set_natural_scale_factors -->
+<!-- interface~setup_encounter -->
 <g id="call~~graph~~CallGraph_node201" class="node">
-<title>proc~fraggle_set_natural_scale_factors</title>
-<g id="a_call~~graph~~CallGraph_node201"><a xlink:href=".././proc/fraggle_set_natural_scale_factors.html" xlink:title="fraggle_set_natural_scale_factors">
-<polygon fill="#d9534f" stroke="#d9534f" points="414,-8857 240,-8857 240,-8833 414,-8833 414,-8857"/>
-<text text-anchor="middle" x="327" y="-8842.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_natural_scale_factors</text>
+<title>interface~setup_encounter</title>
+<g id="a_call~~graph~~CallGraph_node201"><a xlink:href=".././interface/setup_encounter.html" xlink:title="setup_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="143.5,-8670 50.5,-8670 50.5,-8646 143.5,-8646 143.5,-8670"/>
+<text text-anchor="middle" x="97" y="-8655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_set_natural_scale_factors&#45;&gt;proc~fraggle_set_natural_scale_factors -->
-<g id="call~~graph~~CallGraph_edge183" class="edge">
-<title>interface~fraggle_set_natural_scale_factors&#45;&gt;proc~fraggle_set_natural_scale_factors</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.2,-8845C198.95,-8845 214.37,-8845 229.37,-8845"/>
-<polygon fill="#000000" stroke="#000000" points="229.68,-8848.5 239.68,-8845 229.68,-8841.5 229.68,-8848.5"/>
-</g>
-<!-- interface~fraggle_set_original_scale_factors -->
-<g id="call~~graph~~CallGraph_node179" class="node">
-<title>interface~fraggle_set_original_scale_factors</title>
-<g id="a_call~~graph~~CallGraph_node179"><a xlink:href=".././interface/fraggle_set_original_scale_factors.html" xlink:title="fraggle_set_original_scale_factors">
-<polygon fill="#a7506f" stroke="#a7506f" points="184.5,-8899 9.5,-8899 9.5,-8875 184.5,-8875 184.5,-8899"/>
-<text text-anchor="middle" x="97" y="-8884.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_original_scale_factors</text>
-</a>
-</g>
+<!-- interface~setup_encounter&#45;&gt;proc~setup_encounter -->
+<g id="call~~graph~~CallGraph_edge192" class="edge">
+<title>interface~setup_encounter&#45;&gt;proc~setup_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.59,-8658C180.09,-8658 231.45,-8658 270.37,-8658"/>
+<polygon fill="#000000" stroke="#000000" points="270.49,-8661.5 280.49,-8658 270.49,-8654.5 270.49,-8661.5"/>
 </g>
-<!-- proc~fraggle_set_original_scale_factors -->
-<g id="call~~graph~~CallGraph_node214" class="node">
-<title>proc~fraggle_set_original_scale_factors</title>
-<g id="a_call~~graph~~CallGraph_node214"><a xlink:href=".././proc/fraggle_set_original_scale_factors.html" xlink:title="fraggle_set_original_scale_factors">
-<polygon fill="#d9534f" stroke="#d9534f" points="414.5,-8899 239.5,-8899 239.5,-8875 414.5,-8875 414.5,-8899"/>
-<text text-anchor="middle" x="327" y="-8884.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_original_scale_factors</text>
+<!-- interface~setup_initialize_particle_info_system -->
+<g id="call~~graph~~CallGraph_node202" class="node">
+<title>interface~setup_initialize_particle_info_system</title>
+<g id="a_call~~graph~~CallGraph_node202"><a xlink:href=".././interface/setup_initialize_particle_info_system.html" xlink:title="setup_initialize_particle_info_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="190,-8754 4,-8754 4,-8730 190,-8730 190,-8754"/>
+<text text-anchor="middle" x="97" y="-8739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_set_original_scale_factors&#45;&gt;proc~fraggle_set_original_scale_factors -->
-<g id="call~~graph~~CallGraph_edge184" class="edge">
-<title>interface~fraggle_set_original_scale_factors&#45;&gt;proc~fraggle_set_original_scale_factors</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.52,-8887C199.06,-8887 214.22,-8887 229,-8887"/>
-<polygon fill="#000000" stroke="#000000" points="229.16,-8890.5 239.16,-8887 229.16,-8883.5 229.16,-8890.5"/>
+<!-- interface~setup_initialize_particle_info_system&#45;&gt;proc~setup_initialize_particle_info_system -->
+<g id="call~~graph~~CallGraph_edge193" class="edge">
+<title>interface~setup_initialize_particle_info_system&#45;&gt;proc~setup_initialize_particle_info_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M190.08,-8742C201.15,-8742 212.51,-8742 223.71,-8742"/>
+<polygon fill="#000000" stroke="#000000" points="223.95,-8745.5 233.95,-8742 223.95,-8738.5 223.95,-8745.5"/>
 </g>
-<!-- interface~fraggle_setup_fragments -->
-<g id="call~~graph~~CallGraph_node180" class="node">
-<title>interface~fraggle_setup_fragments</title>
-<g id="a_call~~graph~~CallGraph_node180"><a xlink:href=".././interface/fraggle_setup_fragments.html" xlink:title="fraggle_setup_fragments">
-<polygon fill="#a7506f" stroke="#a7506f" points="640.5,-4830 508.5,-4830 508.5,-4806 640.5,-4806 640.5,-4830"/>
-<text text-anchor="middle" x="574.5" y="-4815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_fragments</text>
+<!-- proc~symba_util_resize_pl -->
+<g id="call~~graph~~CallGraph_node203" class="node">
+<title>proc~symba_util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node203"><a xlink:href=".././proc/symba_util_resize_pl.html" xlink:title="symba_util_resize_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-4818 783.5,-4818 783.5,-4794 895.5,-4794 895.5,-4818"/>
+<text text-anchor="middle" x="839.5" y="-4803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_setup_fragments -->
-<g id="call~~graph~~CallGraph_node489" class="node">
-<title>proc~fraggle_setup_fragments</title>
-<g id="a_call~~graph~~CallGraph_node489"><a xlink:href=".././proc/fraggle_setup_fragments.html" xlink:title="fraggle_setup_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="905.5,-4830 773.5,-4830 773.5,-4806 905.5,-4806 905.5,-4830"/>
-<text text-anchor="middle" x="839.5" y="-4815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_fragments</text>
-</a>
+<!-- proc~symba_util_resize_pl&#45;&gt;interface~util_resize -->
+<g id="call~~graph~~CallGraph_edge195" class="edge">
+<title>proc~symba_util_resize_pl&#45;&gt;interface~util_resize</title>
+<path fill="none" stroke="#000000" d="M895.71,-4801.64C943.39,-4797.87 1011.14,-4792.51 1053.69,-4789.15"/>
+<polygon fill="#000000" stroke="#000000" points="1053.98,-4792.64 1063.67,-4788.36 1053.43,-4785.66 1053.98,-4792.64"/>
 </g>
+<!-- util_resize_pl -->
+<g id="call~~graph~~CallGraph_node698" class="node">
+<title>util_resize_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1132,-4850 1057,-4850 1057,-4826 1132,-4826 1132,-4850"/>
+<text text-anchor="middle" x="1094.5" y="-4835.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </g>
-<!-- interface~fraggle_setup_fragments&#45;&gt;proc~fraggle_setup_fragments -->
-<g id="call~~graph~~CallGraph_edge185" class="edge">
-<title>interface~fraggle_setup_fragments&#45;&gt;proc~fraggle_setup_fragments</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.51,-4818C677.65,-4818 724.4,-4818 763.14,-4818"/>
-<polygon fill="#000000" stroke="#000000" points="763.33,-4821.5 773.33,-4818 763.33,-4814.5 763.33,-4821.5"/>
+<!-- proc~symba_util_resize_pl&#45;&gt;util_resize_pl -->
+<g id="call~~graph~~CallGraph_edge194" class="edge">
+<title>proc~symba_util_resize_pl&#45;&gt;util_resize_pl</title>
+<path fill="none" stroke="#000000" d="M895.71,-4812.98C940.84,-4818.69 1003.95,-4826.67 1046.65,-4832.07"/>
+<polygon fill="#000000" stroke="#000000" points="1046.41,-4835.57 1056.77,-4833.35 1047.29,-4828.63 1046.41,-4835.57"/>
 </g>
-<!-- proc~rmvs_step_system -->
-<g id="call~~graph~~CallGraph_node181" class="node">
-<title>proc~rmvs_step_system</title>
-<g id="a_call~~graph~~CallGraph_node181"><a xlink:href=".././proc/rmvs_step_system.html" xlink:title="rmvs_step_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="378,-1230 276,-1230 276,-1206 378,-1206 378,-1230"/>
-<text text-anchor="middle" x="327" y="-1215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_system</text>
+<!-- interface~setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node204" class="node">
+<title>interface~setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node204"><a xlink:href=".././interface/setup_initialize_system.html" xlink:title="setup_initialize_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="158,-8838 36,-8838 36,-8814 158,-8814 158,-8838"/>
+<text text-anchor="middle" x="97" y="-8823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_interp_out -->
-<g id="call~~graph~~CallGraph_node191" class="node">
-<title>proc~rmvs_interp_out</title>
-<g id="a_call~~graph~~CallGraph_node191"><a xlink:href=".././proc/rmvs_interp_out.html" xlink:title="rmvs_interp_out">
-<polygon fill="#d9534f" stroke="#d9534f" points="619.5,-1020 529.5,-1020 529.5,-996 619.5,-996 619.5,-1020"/>
-<text text-anchor="middle" x="574.5" y="-1005.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_out</text>
-</a>
+<!-- interface~setup_initialize_system&#45;&gt;proc~setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge196" class="edge">
+<title>interface~setup_initialize_system&#45;&gt;proc~setup_initialize_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.2,-8826C188.07,-8826 224.34,-8826 255.5,-8826"/>
+<polygon fill="#000000" stroke="#000000" points="255.86,-8829.5 265.86,-8826 255.86,-8822.5 255.86,-8829.5"/>
 </g>
+<!-- interface~setup_pl -->
+<g id="call~~graph~~CallGraph_node205" class="node">
+<title>interface~setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node205"><a xlink:href=".././interface/setup_pl.html" xlink:title="setup_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="124,-8586 70,-8586 70,-8562 124,-8562 124,-8586"/>
+<text text-anchor="middle" x="97" y="-8571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
+</a>
 </g>
-<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out -->
-<g id="call~~graph~~CallGraph_edge187" class="edge">
-<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out</title>
-<path fill="none" stroke="#000000" d="M332.6,-1205.81C346.19,-1171.6 389.67,-1074.28 460,-1029 477.43,-1017.78 499.31,-1012.19 519.2,-1009.53"/>
-<polygon fill="#000000" stroke="#000000" points="519.84,-1012.98 529.38,-1008.38 519.06,-1006.02 519.84,-1012.98"/>
 </g>
-<!-- proc~rmvs_step_out -->
-<g id="call~~graph~~CallGraph_node195" class="node">
-<title>proc~rmvs_step_out</title>
-<g id="a_call~~graph~~CallGraph_node195"><a xlink:href=".././proc/rmvs_step_out.html" xlink:title="rmvs_step_out">
-<polygon fill="#d9534f" stroke="#d9534f" points="616,-1230 533,-1230 533,-1206 616,-1206 616,-1230"/>
-<text text-anchor="middle" x="574.5" y="-1215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_out</text>
+<!-- proc~setup_pl -->
+<g id="call~~graph~~CallGraph_node211" class="node">
+<title>proc~setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node211"><a xlink:href=".././proc/setup_pl.html" xlink:title="setup_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="354,-8586 300,-8586 300,-8562 354,-8562 354,-8586"/>
+<text text-anchor="middle" x="327" y="-8571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out -->
-<g id="call~~graph~~CallGraph_edge186" class="edge">
-<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out</title>
-<path fill="none" stroke="#000000" d="M378.27,-1218C420.39,-1218 480.25,-1218 522.55,-1218"/>
-<polygon fill="#000000" stroke="#000000" points="522.64,-1221.5 532.64,-1218 522.64,-1214.5 522.64,-1221.5"/>
-</g>
-<!-- whm_step_system -->
-<g id="call~~graph~~CallGraph_node685" class="node">
-<title>whm_step_system</title>
-<polygon fill="#777777" stroke="#777777" points="625,-1646 524,-1646 524,-1622 625,-1622 625,-1646"/>
-<text text-anchor="middle" x="574.5" y="-1631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+<!-- interface~setup_pl&#45;&gt;proc~setup_pl -->
+<g id="call~~graph~~CallGraph_edge197" class="edge">
+<title>interface~setup_pl&#45;&gt;proc~setup_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.15,-8574C164.85,-8574 243.43,-8574 289.63,-8574"/>
+<polygon fill="#000000" stroke="#000000" points="289.8,-8577.5 299.8,-8574 289.8,-8570.5 289.8,-8577.5"/>
 </g>
-<!-- proc~rmvs_step_system&#45;&gt;whm_step_system -->
-<g id="call~~graph~~CallGraph_edge188" class="edge">
-<title>proc~rmvs_step_system&#45;&gt;whm_step_system</title>
-<path fill="none" stroke="#000000" d="M327.95,-1230.36C328.42,-1285.01 338.04,-1506.98 460,-1613 474.74,-1625.82 494.71,-1631.92 513.8,-1634.56"/>
-<polygon fill="#000000" stroke="#000000" points="513.64,-1638.06 523.96,-1635.67 514.4,-1631.1 513.64,-1638.06"/>
+<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge198" class="edge">
+<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M637.24,-4082.49C654.08,-4079.37 672.29,-4075.78 689,-4072 721.82,-4064.59 758.31,-4054.85 787.02,-4046.84"/>
+<polygon fill="#000000" stroke="#000000" points="788.15,-4050.16 796.83,-4044.09 786.26,-4043.42 788.15,-4050.16"/>
 </g>
-<!-- interface~fraggle_setup_reset_fragments -->
-<g id="call~~graph~~CallGraph_node182" class="node">
-<title>interface~fraggle_setup_reset_fragments</title>
-<g id="a_call~~graph~~CallGraph_node182"><a xlink:href=".././interface/fraggle_setup_reset_fragments.html" xlink:title="fraggle_setup_reset_fragments">
-<polygon fill="#a7506f" stroke="#a7506f" points="178,-8941 16,-8941 16,-8917 178,-8917 178,-8941"/>
-<text text-anchor="middle" x="97" y="-8926.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_reset_fragments</text>
+<!-- interface~setup_tp -->
+<g id="call~~graph~~CallGraph_node207" class="node">
+<title>interface~setup_tp</title>
+<g id="a_call~~graph~~CallGraph_node207"><a xlink:href=".././interface/setup_tp.html" xlink:title="setup_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="124,-8544 70,-8544 70,-8520 124,-8520 124,-8544"/>
+<text text-anchor="middle" x="97" y="-8529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_setup_reset_fragments -->
-<g id="call~~graph~~CallGraph_node484" class="node">
-<title>proc~fraggle_setup_reset_fragments</title>
-<g id="a_call~~graph~~CallGraph_node484"><a xlink:href=".././proc/fraggle_setup_reset_fragments.html" xlink:title="fraggle_setup_reset_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="408,-8941 246,-8941 246,-8917 408,-8917 408,-8941"/>
-<text text-anchor="middle" x="327" y="-8926.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_reset_fragments</text>
+<!-- proc~setup_tp -->
+<g id="call~~graph~~CallGraph_node214" class="node">
+<title>proc~setup_tp</title>
+<g id="a_call~~graph~~CallGraph_node214"><a xlink:href=".././proc/setup_tp.html" xlink:title="setup_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="354,-8544 300,-8544 300,-8520 354,-8520 354,-8544"/>
+<text text-anchor="middle" x="327" y="-8529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_setup_reset_fragments&#45;&gt;proc~fraggle_setup_reset_fragments -->
-<g id="call~~graph~~CallGraph_edge189" class="edge">
-<title>interface~fraggle_setup_reset_fragments&#45;&gt;proc~fraggle_setup_reset_fragments</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M178.06,-8929C196.66,-8929 216.59,-8929 235.6,-8929"/>
-<polygon fill="#000000" stroke="#000000" points="235.74,-8932.5 245.74,-8929 235.74,-8925.5 235.74,-8932.5"/>
-</g>
-<!-- interface~fraggle_util_add_fragments_to_system -->
-<g id="call~~graph~~CallGraph_node183" class="node">
-<title>interface~fraggle_util_add_fragments_to_system</title>
-<g id="a_call~~graph~~CallGraph_node183"><a xlink:href=".././interface/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="1193.5,-66 995.5,-66 995.5,-42 1193.5,-42 1193.5,-66"/>
-<text text-anchor="middle" x="1094.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_add_fragments_to_system</text>
-</a>
+<!-- interface~setup_tp&#45;&gt;proc~setup_tp -->
+<g id="call~~graph~~CallGraph_edge199" class="edge">
+<title>interface~setup_tp&#45;&gt;proc~setup_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.15,-8532C164.85,-8532 243.43,-8532 289.63,-8532"/>
+<polygon fill="#000000" stroke="#000000" points="289.8,-8535.5 299.8,-8532 289.8,-8528.5 289.8,-8535.5"/>
 </g>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge202" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M642.57,-3931.81C658.85,-3934.98 675.45,-3940.53 689,-3950 714.8,-3968.04 699.2,-3992.96 725,-4011 733.25,-4016.77 742.64,-4021.09 752.39,-4024.29"/>
+<polygon fill="#000000" stroke="#000000" points="751.67,-4027.73 762.24,-4027.14 753.61,-4021 751.67,-4027.73"/>
 </g>
-<!-- proc~fraggle_util_add_fragments_to_system -->
-<g id="call~~graph~~CallGraph_node650" class="node">
-<title>proc~fraggle_util_add_fragments_to_system</title>
-<g id="a_call~~graph~~CallGraph_node650"><a xlink:href=".././proc/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="1438.5,-66 1240.5,-66 1240.5,-42 1438.5,-42 1438.5,-66"/>
-<text text-anchor="middle" x="1339.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_add_fragments_to_system</text>
+<!-- interface~fraggle_util_vmag_to_vb -->
+<g id="call~~graph~~CallGraph_node688" class="node">
+<title>interface~fraggle_util_vmag_to_vb</title>
+<g id="a_call~~graph~~CallGraph_node688"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#a7506f" stroke="#a7506f" points="904.5,-3918 774.5,-3918 774.5,-3894 904.5,-3894 904.5,-3918"/>
+<text text-anchor="middle" x="839.5" y="-3903.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system -->
-<g id="call~~graph~~CallGraph_edge190" class="edge">
-<title>interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1193.64,-54C1205.68,-54 1218.04,-54 1230.21,-54"/>
-<polygon fill="#000000" stroke="#000000" points="1230.39,-57.5 1240.39,-54 1230.39,-50.5 1230.39,-57.5"/>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="call~~graph~~CallGraph_edge200" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M642.55,-3923.14C679.71,-3919.89 725.99,-3915.84 764.25,-3912.49"/>
+<polygon fill="#000000" stroke="#000000" points="764.64,-3915.97 774.3,-3911.61 764.03,-3909 764.64,-3915.97"/>
 </g>
-<!-- proc~util_solve_linear_system_q -->
-<g id="call~~graph~~CallGraph_node184" class="node">
-<title>proc~util_solve_linear_system_q</title>
-<g id="a_call~~graph~~CallGraph_node184"><a xlink:href=".././proc/util_solve_linear_system_q.html" xlink:title="util_solve_linear_system_q">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="167.5,-8731 26.5,-8731 26.5,-8707 167.5,-8707 167.5,-8731"/>
-<text text-anchor="middle" x="97" y="-8716.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_q</text>
-</a>
+<!-- util_minimize_bfgs -->
+<g id="call~~graph~~CallGraph_node748" class="node">
+<title>util_minimize_bfgs</title>
+<polygon fill="#777777" stroke="#777777" points="889.5,-4002 789.5,-4002 789.5,-3978 889.5,-3978 889.5,-4002"/>
+<text text-anchor="middle" x="839.5" y="-3987.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
 </g>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs -->
+<g id="call~~graph~~CallGraph_edge203" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs</title>
+<path fill="none" stroke="#000000" d="M642.69,-3937.96C658.14,-3940.97 674.33,-3944.9 689,-3950 706.09,-3955.94 707.91,-3963.06 725,-3969 742.17,-3974.96 761.42,-3979.34 779.12,-3982.5"/>
+<polygon fill="#000000" stroke="#000000" points="778.89,-3986.01 789.34,-3984.22 780.06,-3979.11 778.89,-3986.01"/>
 </g>
-<!-- proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs -->
-<g id="call~~graph~~CallGraph_edge191" class="edge">
-<title>proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs</title>
-<path fill="none" stroke="#000000" d="M163.34,-8731.04C202.81,-8738.31 251.86,-8747.34 285.72,-8753.58"/>
-<polygon fill="#000000" stroke="#000000" points="285.25,-8757.05 295.72,-8755.42 286.52,-8750.17 285.25,-8757.05"/>
+<!-- lambda_obj -->
+<g id="call~~graph~~CallGraph_node760" class="node">
+<title>lambda_obj</title>
+<polygon fill="#777777" stroke="#777777" points="873.5,-3960 805.5,-3960 805.5,-3936 873.5,-3936 873.5,-3960"/>
+<text text-anchor="middle" x="839.5" y="-3945.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
 </g>
-<!-- proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp -->
-<g id="call~~graph~~CallGraph_edge192" class="edge">
-<title>proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp</title>
-<path fill="none" stroke="#000000" d="M167.65,-8719C207.94,-8719 257,-8719 289.73,-8719"/>
-<polygon fill="#000000" stroke="#000000" points="289.75,-8722.5 299.75,-8719 289.75,-8715.5 289.75,-8722.5"/>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj -->
+<g id="call~~graph~~CallGraph_edge201" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj</title>
+<path fill="none" stroke="#000000" d="M642.55,-3933.84C690.53,-3937.31 753.72,-3941.88 795.2,-3944.87"/>
+<polygon fill="#000000" stroke="#000000" points="795.03,-3948.37 805.25,-3945.6 795.53,-3941.39 795.03,-3948.37"/>
 </g>
-<!-- interface~fraggle_util_ang_mtm -->
-<g id="call~~graph~~CallGraph_node186" class="node">
-<title>interface~fraggle_util_ang_mtm</title>
-<g id="a_call~~graph~~CallGraph_node186"><a xlink:href=".././interface/fraggle_util_ang_mtm.html" xlink:title="fraggle_util_ang_mtm">
-<polygon fill="#a7506f" stroke="#a7506f" points="155,-8983 39,-8983 39,-8959 155,-8959 155,-8983"/>
-<text text-anchor="middle" x="97" y="-8968.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_ang_mtm</text>
+<!-- interface~tides_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node209" class="node">
+<title>interface~tides_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node209"><a xlink:href=".././interface/tides_kick_getacch_pl.html" xlink:title="tides_kick_getacch_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-8880 38.5,-8880 38.5,-8856 155.5,-8856 155.5,-8880"/>
+<text text-anchor="middle" x="97" y="-8865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_ang_mtm -->
-<g id="call~~graph~~CallGraph_node656" class="node">
-<title>proc~fraggle_util_ang_mtm</title>
-<g id="a_call~~graph~~CallGraph_node656"><a xlink:href=".././proc/fraggle_util_ang_mtm.html" xlink:title="fraggle_util_ang_mtm">
-<polygon fill="#d9534f" stroke="#d9534f" points="385,-8983 269,-8983 269,-8959 385,-8959 385,-8983"/>
-<text text-anchor="middle" x="327" y="-8968.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_ang_mtm</text>
+<!-- proc~tides_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node556" class="node">
+<title>proc~tides_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node556"><a xlink:href=".././proc/tides_kick_getacch_pl.html" xlink:title="tides_kick_getacch_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-8880 268.5,-8880 268.5,-8856 385.5,-8856 385.5,-8880"/>
+<text text-anchor="middle" x="327" y="-8865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_ang_mtm&#45;&gt;proc~fraggle_util_ang_mtm -->
-<g id="call~~graph~~CallGraph_edge193" class="edge">
-<title>interface~fraggle_util_ang_mtm&#45;&gt;proc~fraggle_util_ang_mtm</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.24,-8971C186.54,-8971 225.52,-8971 258.32,-8971"/>
-<polygon fill="#000000" stroke="#000000" points="258.74,-8974.5 268.74,-8971 258.74,-8967.5 258.74,-8974.5"/>
+<!-- interface~tides_kick_getacch_pl&#45;&gt;proc~tides_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_edge204" class="edge">
+<title>interface~tides_kick_getacch_pl&#45;&gt;proc~tides_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-8868C186.72,-8868 225.45,-8868 258.11,-8868"/>
+<polygon fill="#000000" stroke="#000000" points="258.48,-8871.5 268.48,-8868 258.48,-8864.5 258.48,-8871.5"/>
 </g>
-<!-- interface~fraggle_util_construct_temporary_system -->
-<g id="call~~graph~~CallGraph_node187" class="node">
-<title>interface~fraggle_util_construct_temporary_system</title>
-<g id="a_call~~graph~~CallGraph_node187"><a xlink:href=".././interface/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="1199,-24 990,-24 990,0 1199,0 1199,-24"/>
-<text text-anchor="middle" x="1094.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
+<!-- interface~tides_step_spin_system -->
+<g id="call~~graph~~CallGraph_node210" class="node">
+<title>interface~tides_step_spin_system</title>
+<g id="a_call~~graph~~CallGraph_node210"><a xlink:href=".././interface/tides_step_spin_system.html" xlink:title="tides_step_spin_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="160.5,-8922 33.5,-8922 33.5,-8898 160.5,-8898 160.5,-8922"/>
+<text text-anchor="middle" x="97" y="-8907.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_step_spin_system</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_construct_temporary_system -->
-<g id="call~~graph~~CallGraph_node662" class="node">
-<title>proc~fraggle_util_construct_temporary_system</title>
-<g id="a_call~~graph~~CallGraph_node662"><a xlink:href=".././proc/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="1444,-24 1235,-24 1235,0 1444,0 1444,-24"/>
-<text text-anchor="middle" x="1339.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
+<!-- proc~tides_step_spin_system -->
+<g id="call~~graph~~CallGraph_node574" class="node">
+<title>proc~tides_step_spin_system</title>
+<g id="a_call~~graph~~CallGraph_node574"><a xlink:href=".././proc/tides_step_spin_system.html" xlink:title="tides_step_spin_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="390.5,-8922 263.5,-8922 263.5,-8898 390.5,-8898 390.5,-8922"/>
+<text text-anchor="middle" x="327" y="-8907.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_step_spin_system</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system -->
-<g id="call~~graph~~CallGraph_edge194" class="edge">
-<title>interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1199.26,-12C1207.6,-12 1216.06,-12 1224.48,-12"/>
-<polygon fill="#000000" stroke="#000000" points="1224.7,-15.5 1234.7,-12 1224.7,-8.5 1224.7,-15.5"/>
+<!-- interface~tides_step_spin_system&#45;&gt;proc~tides_step_spin_system -->
+<g id="call~~graph~~CallGraph_edge205" class="edge">
+<title>interface~tides_step_spin_system&#45;&gt;proc~tides_step_spin_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160.6,-8910C189.14,-8910 223.11,-8910 252.83,-8910"/>
+<polygon fill="#000000" stroke="#000000" points="253.14,-8913.5 263.14,-8910 253.14,-8906.5 253.14,-8913.5"/>
 </g>
-<!-- proc~util_append_body -->
-<g id="call~~graph~~CallGraph_node188" class="node">
-<title>proc~util_append_body</title>
-<g id="a_call~~graph~~CallGraph_node188"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="1388,-3321 1291,-3321 1291,-3297 1388,-3297 1388,-3321"/>
-<text text-anchor="middle" x="1339.5" y="-3306.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
+<!-- proc~setup_pl&#45;&gt;interface~setup_body -->
+<g id="call~~graph~~CallGraph_edge206" class="edge">
+<title>proc~setup_pl&#45;&gt;interface~setup_body</title>
+<path fill="none" stroke="#000000" d="M354.27,-8571.75C396.4,-8568.15 479.47,-8561.04 530.38,-8556.69"/>
+<polygon fill="#000000" stroke="#000000" points="530.76,-8560.17 540.42,-8555.83 530.16,-8553.19 530.76,-8560.17"/>
+</g>
+<!-- proc~symba_util_resize_tp -->
+<g id="call~~graph~~CallGraph_node212" class="node">
+<title>proc~symba_util_resize_tp</title>
+<g id="a_call~~graph~~CallGraph_node212"><a xlink:href=".././proc/symba_util_resize_tp.html" xlink:title="symba_util_resize_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="896,-4860 783,-4860 783,-4836 896,-4836 896,-4860"/>
+<text text-anchor="middle" x="839.5" y="-4845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append~2 -->
-<g id="call~~graph~~CallGraph_node280" class="node">
-<title>interface~util_append~2</title>
-<g id="a_call~~graph~~CallGraph_node280"><a xlink:href=".././interface/util_append~2.html" xlink:title="util_append">
-<polygon fill="#a7506f" stroke="#a7506f" points="1602.5,-3301 1534.5,-3301 1534.5,-3277 1602.5,-3277 1602.5,-3301"/>
-<text text-anchor="middle" x="1568.5" y="-3286.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
-</a>
+<!-- proc~symba_util_resize_tp&#45;&gt;interface~util_resize -->
+<g id="call~~graph~~CallGraph_edge208" class="edge">
+<title>proc~symba_util_resize_tp&#45;&gt;interface~util_resize</title>
+<path fill="none" stroke="#000000" d="M896.16,-4838.88C914.65,-4835.54 935.29,-4831.47 954,-4827 963.89,-4824.64 1016.58,-4809.01 1054.28,-4797.75"/>
+<polygon fill="#000000" stroke="#000000" points="1055.41,-4801.07 1063.99,-4794.85 1053.41,-4794.36 1055.41,-4801.07"/>
 </g>
+<!-- util_resize_tp -->
+<g id="call~~graph~~CallGraph_node716" class="node">
+<title>util_resize_tp</title>
+<polygon fill="#777777" stroke="#777777" points="1132.5,-4897 1056.5,-4897 1056.5,-4873 1132.5,-4873 1132.5,-4897"/>
+<text text-anchor="middle" x="1094.5" y="-4882.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </g>
-<!-- proc~util_append_body&#45;&gt;interface~util_append~2 -->
-<g id="call~~graph~~CallGraph_edge195" class="edge">
-<title>proc~util_append_body&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M1388.09,-3304.81C1428.31,-3301.26 1485.42,-3296.23 1524.33,-3292.8"/>
-<polygon fill="#000000" stroke="#000000" points="1524.65,-3296.29 1534.3,-3291.92 1524.03,-3289.32 1524.65,-3296.29"/>
+<!-- proc~symba_util_resize_tp&#45;&gt;util_resize_tp -->
+<g id="call~~graph~~CallGraph_edge207" class="edge">
+<title>proc~symba_util_resize_tp&#45;&gt;util_resize_tp</title>
+<path fill="none" stroke="#000000" d="M896.02,-4856.12C941.04,-4862.7 1003.79,-4871.88 1046.38,-4878.11"/>
+<polygon fill="#000000" stroke="#000000" points="1046.08,-4881.6 1056.49,-4879.59 1047.1,-4874.68 1046.08,-4881.6"/>
 </g>
-<!-- proc~io_read_in_param -->
-<g id="call~~graph~~CallGraph_node189" class="node">
-<title>proc~io_read_in_param</title>
-<g id="a_call~~graph~~CallGraph_node189"><a xlink:href=".././proc/io_read_in_param.html" xlink:title="io_read_in_param">
-<polygon fill="#d9534f" stroke="#d9534f" points="889.5,-2944 789.5,-2944 789.5,-2920 889.5,-2920 889.5,-2944"/>
-<text text-anchor="middle" x="839.5" y="-2929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
+<!-- interface~user_kick_getacch_body -->
+<g id="call~~graph~~CallGraph_node213" class="node">
+<title>interface~user_kick_getacch_body</title>
+<g id="a_call~~graph~~CallGraph_node213"><a xlink:href=".././interface/user_kick_getacch_body.html" xlink:title="user_kick_getacch_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="162,-8964 32,-8964 32,-8940 162,-8940 162,-8964"/>
+<text text-anchor="middle" x="97" y="-8949.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_kick_getacch_body</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_in_param&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge196" class="edge">
-<title>proc~io_read_in_param&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M889.73,-2925.55C909.92,-2922.22 933.35,-2917.47 954,-2911 992.34,-2898.99 1034.04,-2879.2 1061.77,-2865"/>
-<polygon fill="#000000" stroke="#000000" points="1063.7,-2867.94 1070.97,-2860.23 1060.48,-2861.73 1063.7,-2867.94"/>
-</g>
-<!-- interface~fraggle_util_get_energy_momentum -->
-<g id="call~~graph~~CallGraph_node190" class="node">
-<title>interface~fraggle_util_get_energy_momentum</title>
-<g id="a_call~~graph~~CallGraph_node190"><a xlink:href=".././interface/fraggle_util_get_energy_momentum.html" xlink:title="fraggle_util_get_energy_momentum">
-<polygon fill="#a7506f" stroke="#a7506f" points="667,-66 482,-66 482,-42 667,-42 667,-66"/>
-<text text-anchor="middle" x="574.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_get_energy_momentum</text>
+<!-- proc~user_kick_getacch_body -->
+<g id="call~~graph~~CallGraph_node222" class="node">
+<title>proc~user_kick_getacch_body</title>
+<g id="a_call~~graph~~CallGraph_node222"><a xlink:href=".././proc/user_kick_getacch_body.html" xlink:title="user_kick_getacch_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="392,-8964 262,-8964 262,-8940 392,-8940 392,-8964"/>
+<text text-anchor="middle" x="327" y="-8949.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_kick_getacch_body</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_get_energy_momentum -->
-<g id="call~~graph~~CallGraph_node671" class="node">
-<title>proc~fraggle_util_get_energy_momentum</title>
-<g id="a_call~~graph~~CallGraph_node671"><a xlink:href=".././proc/fraggle_util_get_energy_momentum.html" xlink:title="fraggle_util_get_energy_momentum">
-<polygon fill="#d9534f" stroke="#d9534f" points="932,-66 747,-66 747,-42 932,-42 932,-66"/>
-<text text-anchor="middle" x="839.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_get_energy_momentum</text>
+<!-- interface~user_kick_getacch_body&#45;&gt;proc~user_kick_getacch_body -->
+<g id="call~~graph~~CallGraph_edge209" class="edge">
+<title>interface~user_kick_getacch_body&#45;&gt;proc~user_kick_getacch_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-8952C190.04,-8952 222.94,-8952 251.9,-8952"/>
+<polygon fill="#000000" stroke="#000000" points="251.97,-8955.5 261.97,-8952 251.97,-8948.5 251.97,-8955.5"/>
+</g>
+<!-- proc~setup_tp&#45;&gt;interface~setup_body -->
+<g id="call~~graph~~CallGraph_edge210" class="edge">
+<title>proc~setup_tp&#45;&gt;interface~setup_body</title>
+<path fill="none" stroke="#000000" d="M354.27,-8534.25C396.4,-8537.85 479.47,-8544.96 530.38,-8549.31"/>
+<polygon fill="#000000" stroke="#000000" points="530.16,-8552.81 540.42,-8550.17 530.76,-8545.83 530.16,-8552.81"/>
+</g>
+<!-- proc~symba_util_sort_pl -->
+<g id="call~~graph~~CallGraph_node215" class="node">
+<title>proc~symba_util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node215"><a xlink:href=".././proc/symba_util_sort_pl.html" xlink:title="symba_util_sort_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="378,-9006 276,-9006 276,-8982 378,-8982 378,-9006"/>
+<text text-anchor="middle" x="327" y="-8991.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_get_energy_momentum&#45;&gt;proc~fraggle_util_get_energy_momentum -->
-<g id="call~~graph~~CallGraph_edge197" class="edge">
-<title>interface~fraggle_util_get_energy_momentum&#45;&gt;proc~fraggle_util_get_energy_momentum</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M667.12,-54C689.59,-54 713.77,-54 736.69,-54"/>
-<polygon fill="#000000" stroke="#000000" points="736.77,-57.5 746.77,-54 736.77,-50.5 736.77,-57.5"/>
+<!-- util_sort_pl -->
+<g id="call~~graph~~CallGraph_node734" class="node">
+<title>util_sort_pl</title>
+<polygon fill="#777777" stroke="#777777" points="606.5,-9027 542.5,-9027 542.5,-9003 606.5,-9003 606.5,-9027"/>
+<text text-anchor="middle" x="574.5" y="-9012.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </g>
-<!-- proc~rmvs_interp_out&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge198" class="edge">
-<title>proc~rmvs_interp_out&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M619.59,-1006.47C690.57,-1004.79 834.36,-1004.63 954,-1025 990.09,-1031.14 1029.96,-1043.77 1057.8,-1053.58"/>
-<polygon fill="#000000" stroke="#000000" points="1056.89,-1056.97 1067.48,-1057.05 1059.25,-1050.38 1056.89,-1056.97"/>
+<!-- proc~symba_util_sort_pl&#45;&gt;util_sort_pl -->
+<g id="call~~graph~~CallGraph_edge211" class="edge">
+<title>proc~symba_util_sort_pl&#45;&gt;util_sort_pl</title>
+<path fill="none" stroke="#000000" d="M378.27,-8998.3C423.76,-9002.19 489.94,-9007.85 532.35,-9011.48"/>
+<polygon fill="#000000" stroke="#000000" points="532.07,-9014.97 542.33,-9012.33 532.67,-9007.99 532.07,-9014.97"/>
 </g>
-<!-- proc~orbel_xv2el -->
-<g id="call~~graph~~CallGraph_node192" class="node">
-<title>proc~orbel_xv2el</title>
-<g id="a_call~~graph~~CallGraph_node192"><a xlink:href=".././proc/orbel_xv2el.html" xlink:title="orbel_xv2el">
-<polygon fill="#d9534f" stroke="#d9534f" points="873,-8521 806,-8521 806,-8497 873,-8497 873,-8521"/>
-<text text-anchor="middle" x="839.5" y="-8506.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el</text>
+<!-- proc~symba_util_sort_tp -->
+<g id="call~~graph~~CallGraph_node216" class="node">
+<title>proc~symba_util_sort_tp</title>
+<g id="a_call~~graph~~CallGraph_node216"><a xlink:href=".././proc/symba_util_sort_tp.html" xlink:title="symba_util_sort_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="378.5,-5080 275.5,-5080 275.5,-5056 378.5,-5056 378.5,-5080"/>
+<text text-anchor="middle" x="327" y="-5065.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
-<g id="call~~graph~~CallGraph_edge199" class="edge">
-<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
-<path fill="none" stroke="#000000" d="M1134.54,-6255.75C1173.46,-6262.47 1233.74,-6272.89 1278.69,-6280.66"/>
-<polygon fill="#000000" stroke="#000000" points="1278.16,-6284.12 1288.61,-6282.38 1279.35,-6277.23 1278.16,-6284.12"/>
+<!-- util_sort_tp -->
+<g id="call~~graph~~CallGraph_node755" class="node">
+<title>util_sort_tp</title>
+<polygon fill="#777777" stroke="#777777" points="607,-5091 542,-5091 542,-5067 607,-5067 607,-5091"/>
+<text text-anchor="middle" x="574.5" y="-5076.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
 </g>
-<!-- interface~fraggle_util_restructure -->
-<g id="call~~graph~~CallGraph_node194" class="node">
-<title>interface~fraggle_util_restructure</title>
-<g id="a_call~~graph~~CallGraph_node194"><a xlink:href=".././interface/fraggle_util_restructure.html" xlink:title="fraggle_util_restructure">
-<polygon fill="#a7506f" stroke="#a7506f" points="158.5,-9025 35.5,-9025 35.5,-9001 158.5,-9001 158.5,-9025"/>
-<text text-anchor="middle" x="97" y="-9010.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_restructure</text>
+<!-- proc~symba_util_sort_tp&#45;&gt;util_sort_tp -->
+<g id="call~~graph~~CallGraph_edge212" class="edge">
+<title>proc~symba_util_sort_tp&#45;&gt;util_sort_tp</title>
+<path fill="none" stroke="#000000" d="M378.57,-5070.27C423.73,-5072.29 489.11,-5075.22 531.46,-5077.12"/>
+<polygon fill="#000000" stroke="#000000" points="531.56,-5080.62 541.7,-5077.58 531.87,-5073.63 531.56,-5080.62"/>
+</g>
+<!-- proc~symba_discard_cb_pl -->
+<g id="call~~graph~~CallGraph_node217" class="node">
+<title>proc~symba_discard_cb_pl</title>
+<g id="a_call~~graph~~CallGraph_node217"><a xlink:href=".././proc/symba_discard_cb_pl.html" xlink:title="symba_discard_cb_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="1397.5,-1891 1281.5,-1891 1281.5,-1867 1397.5,-1867 1397.5,-1891"/>
+<text text-anchor="middle" x="1339.5" y="-1876.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_cb_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_restructure -->
-<g id="call~~graph~~CallGraph_node657" class="node">
-<title>proc~fraggle_util_restructure</title>
-<g id="a_call~~graph~~CallGraph_node657"><a xlink:href=".././proc/fraggle_util_restructure.html" xlink:title="fraggle_util_restructure">
-<polygon fill="#d9534f" stroke="#d9534f" points="388.5,-9025 265.5,-9025 265.5,-9001 388.5,-9001 388.5,-9025"/>
-<text text-anchor="middle" x="327" y="-9010.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_restructure</text>
+<!-- fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_node770" class="node">
+<title>fraggle_io_log_one_message</title>
+<polygon fill="#777777" stroke="#777777" points="1645.5,-1881 1491.5,-1881 1491.5,-1857 1645.5,-1857 1645.5,-1881"/>
+<text text-anchor="middle" x="1568.5" y="-1866.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+</g>
+<!-- proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge213" class="edge">
+<title>proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M1397.78,-1876.48C1423.05,-1875.36 1453.29,-1874.03 1481.2,-1872.8"/>
+<polygon fill="#000000" stroke="#000000" points="1481.52,-1876.29 1491.36,-1872.35 1481.22,-1869.3 1481.52,-1876.29"/>
+</g>
+<!-- proc~symba_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node218" class="node">
+<title>proc~symba_util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node218"><a xlink:href=".././proc/symba_util_sort_rearrange_pl.html" xlink:title="symba_util_sort_rearrange_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="404.5,-5290 249.5,-5290 249.5,-5266 404.5,-5266 404.5,-5290"/>
+<text text-anchor="middle" x="327" y="-5275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_restructure&#45;&gt;proc~fraggle_util_restructure -->
-<g id="call~~graph~~CallGraph_edge200" class="edge">
-<title>interface~fraggle_util_restructure&#45;&gt;proc~fraggle_util_restructure</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.5,-9013C188.13,-9013 224,-9013 254.93,-9013"/>
-<polygon fill="#000000" stroke="#000000" points="255.22,-9016.5 265.22,-9013 255.22,-9009.5 255.22,-9016.5"/>
+<!-- interface~util_sort_rearrange -->
+<g id="call~~graph~~CallGraph_node336" class="node">
+<title>interface~util_sort_rearrange</title>
+<g id="a_call~~graph~~CallGraph_node336"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="626,-5258 523,-5258 523,-5234 626,-5234 626,-5258"/>
+<text text-anchor="middle" x="574.5" y="-5243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+</a>
 </g>
-<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in -->
-<g id="call~~graph~~CallGraph_edge202" class="edge">
-<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in</title>
-<path fill="none" stroke="#000000" d="M616.02,-1217.38C662.16,-1216.68 737.61,-1215.53 787.66,-1214.77"/>
-<polygon fill="#000000" stroke="#000000" points="787.99,-1218.27 797.94,-1214.62 787.88,-1211.27 787.99,-1218.27"/>
 </g>
-<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
-<g id="call~~graph~~CallGraph_edge201" class="edge">
-<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
-<path fill="none" stroke="#000000" d="M616.03,-1215.55C640.01,-1216.3 669.42,-1221.36 689,-1239 731,-1276.84 683,-1323.16 725,-1361 742.82,-1377.05 768.78,-1382.69 791.38,-1384.13"/>
-<polygon fill="#000000" stroke="#000000" points="791.35,-1387.64 801.48,-1384.53 791.63,-1380.64 791.35,-1387.64"/>
+<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange -->
+<g id="call~~graph~~CallGraph_edge215" class="edge">
+<title>proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M404.67,-5268.01C439.45,-5263.47 480.01,-5258.19 512.66,-5253.93"/>
+<polygon fill="#000000" stroke="#000000" points="513.5,-5257.35 522.96,-5252.59 512.59,-5250.41 513.5,-5257.35"/>
 </g>
-<!-- proc~fraggle_util_shift_vector_to_origin -->
-<g id="call~~graph~~CallGraph_node677" class="node">
-<title>proc~fraggle_util_shift_vector_to_origin</title>
-<g id="a_call~~graph~~CallGraph_node677"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#d9534f" stroke="#d9534f" points="1655,-1895 1482,-1895 1482,-1871 1655,-1871 1655,-1895"/>
-<text text-anchor="middle" x="1568.5" y="-1880.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
-</a>
+<!-- util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node726" class="node">
+<title>util_sort_rearrange_pl</title>
+<polygon fill="#777777" stroke="#777777" points="633.5,-5369 515.5,-5369 515.5,-5345 633.5,-5345 633.5,-5369"/>
+<text text-anchor="middle" x="574.5" y="-5354.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </g>
+<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_edge214" class="edge">
+<title>proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" d="M401.39,-5290.05C409.22,-5292.51 416.9,-5295.46 424,-5299 442.89,-5308.43 441.2,-5320.4 460,-5330 473.98,-5337.14 489.9,-5342.43 505.31,-5346.34"/>
+<polygon fill="#000000" stroke="#000000" points="504.79,-5349.82 515.33,-5348.72 506.41,-5343.01 504.79,-5349.82"/>
 </g>
-<!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
-<g id="call~~graph~~CallGraph_edge203" class="edge">
-<title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1426.32,-1883C1441.11,-1883 1456.57,-1883 1471.61,-1883"/>
-<polygon fill="#000000" stroke="#000000" points="1471.94,-1886.5 1481.94,-1883 1471.94,-1879.5 1471.94,-1886.5"/>
+<!-- proc~whm_step_system -->
+<g id="call~~graph~~CallGraph_node219" class="node">
+<title>proc~whm_step_system</title>
+<g id="a_call~~graph~~CallGraph_node219"><a xlink:href=".././proc/whm_step_system.html" xlink:title="whm_step_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="377.5,-9090 276.5,-9090 276.5,-9066 377.5,-9066 377.5,-9090"/>
+<text text-anchor="middle" x="327" y="-9075.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+</a>
 </g>
-<!-- proc~util_append_encounter -->
-<g id="call~~graph~~CallGraph_node198" class="node">
-<title>proc~util_append_encounter</title>
-<g id="a_call~~graph~~CallGraph_node198"><a xlink:href=".././proc/util_append_encounter.html" xlink:title="util_append_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="1400.5,-3241 1278.5,-3241 1278.5,-3217 1400.5,-3217 1400.5,-3241"/>
-<text text-anchor="middle" x="1339.5" y="-3226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
+</g>
+<!-- interface~util_append~2 -->
+<g id="call~~graph~~CallGraph_node621" class="node">
+<title>interface~util_append~2</title>
+<g id="a_call~~graph~~CallGraph_node621"><a xlink:href=".././interface/util_append~2.html" xlink:title="util_append">
+<polygon fill="#a7506f" stroke="#a7506f" points="1602.5,-451 1534.5,-451 1534.5,-427 1602.5,-427 1602.5,-451"/>
+<text text-anchor="middle" x="1568.5" y="-436.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </a>
 </g>
 </g>
 <!-- proc~util_append_encounter&#45;&gt;interface~util_append~2 -->
-<g id="call~~graph~~CallGraph_edge204" class="edge">
+<g id="call~~graph~~CallGraph_edge216" class="edge">
 <title>proc~util_append_encounter&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M1389.26,-3241.01C1406.57,-3245.34 1426.17,-3250.31 1444,-3255 1470.82,-3262.06 1500.81,-3270.31 1524.52,-3276.91"/>
-<polygon fill="#000000" stroke="#000000" points="1523.7,-3280.32 1534.27,-3279.63 1525.58,-3273.57 1523.7,-3280.32"/>
+<path fill="none" stroke="#000000" d="M1400.74,-423.57C1439.54,-427.16 1489.09,-431.75 1524.06,-434.98"/>
+<polygon fill="#000000" stroke="#000000" points="1524.14,-438.5 1534.42,-435.94 1524.78,-431.53 1524.14,-438.5"/>
 </g>
-<!-- proc~symba_encounter_check_all -->
-<g id="call~~graph~~CallGraph_node199" class="node">
-<title>proc~symba_encounter_check_all</title>
-<g id="a_call~~graph~~CallGraph_node199"><a xlink:href=".././proc/symba_encounter_check_all.html" xlink:title="symba_encounter_check_all">
-<polygon fill="#d9534f" stroke="#d9534f" points="648.5,-3864 500.5,-3864 500.5,-3840 648.5,-3840 648.5,-3864"/>
-<text text-anchor="middle" x="574.5" y="-3849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_all</text>
+<!-- proc~whm_gr_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node221" class="node">
+<title>proc~whm_gr_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node221"><a xlink:href=".././proc/whm_gr_kick_getacch_tp.html" xlink:title="whm_gr_kick_getacch_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-4168 260.5,-4168 260.5,-4144 393.5,-4144 393.5,-4168"/>
+<text text-anchor="middle" x="327" y="-4153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_body -->
-<g id="call~~graph~~CallGraph_node200" class="node">
-<title>proc~util_sort_body</title>
-<g id="a_call~~graph~~CallGraph_node200"><a xlink:href=".././proc/util_sort_body.html" xlink:title="util_sort_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="879,-9088 800,-9088 800,-9064 879,-9064 879,-9088"/>
-<text text-anchor="middle" x="839.5" y="-9073.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_body</text>
-</a>
-</g>
+<!-- proc~whm_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_edge217" class="edge">
+<title>proc~whm_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch</title>
+<path fill="none" stroke="#000000" d="M393.79,-4161.63C433,-4164.98 482.17,-4169.19 519.16,-4172.35"/>
+<polygon fill="#000000" stroke="#000000" points="518.99,-4175.85 529.25,-4173.21 519.59,-4168.88 518.99,-4175.85"/>
 </g>
-<!-- proc~util_sort_dp -->
-<g id="call~~graph~~CallGraph_node202" class="node">
-<title>proc~util_sort_dp</title>
-<g id="a_call~~graph~~CallGraph_node202"><a xlink:href=".././proc/util_sort_dp.html" xlink:title="util_sort_dp">
-<polygon fill="#d9534f" stroke="#d9534f" points="131,-9151 63,-9151 63,-9127 131,-9127 131,-9151"/>
-<text text-anchor="middle" x="97" y="-9136.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_dp</text>
+<!-- proc~whm_gr_p4_pl -->
+<g id="call~~graph~~CallGraph_node223" class="node">
+<title>proc~whm_gr_p4_pl</title>
+<g id="a_call~~graph~~CallGraph_node223"><a xlink:href=".././proc/whm_gr_p4_pl.html" xlink:title="whm_gr_p4_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-4504 285.5,-4504 285.5,-4480 368.5,-4480 368.5,-4504"/>
+<text text-anchor="middle" x="327" y="-4489.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_index_dp -->
-<g id="call~~graph~~CallGraph_node203" class="node">
-<title>proc~util_sort_index_dp</title>
-<g id="a_call~~graph~~CallGraph_node203"><a xlink:href=".././proc/util_sort_index_dp.html" xlink:title="util_sort_index_dp">
-<polygon fill="#d9534f" stroke="#d9534f" points="147,-9193 47,-9193 47,-9169 147,-9169 147,-9193"/>
-<text text-anchor="middle" x="97" y="-9178.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_index_dp</text>
-</a>
-</g>
+<!-- proc~whm_gr_p4_pl&#45;&gt;gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_edge218" class="edge">
+<title>proc~whm_gr_p4_pl&#45;&gt;gr_p4_pos_kick</title>
+<path fill="none" stroke="#000000" d="M368.54,-4488.53C410.07,-4484.98 474.83,-4479.44 520.42,-4475.54"/>
+<polygon fill="#000000" stroke="#000000" points="520.76,-4479.02 530.42,-4474.68 520.16,-4472.05 520.76,-4479.02"/>
 </g>
-<!-- interface~util_append -->
-<g id="call~~graph~~CallGraph_node204" class="node">
-<title>interface~util_append</title>
-<g id="a_call~~graph~~CallGraph_node204"><a xlink:href=".././interface/util_append.html" xlink:title="util_append">
-<polygon fill="#a7506f" stroke="#a7506f" points="1128.5,-921 1060.5,-921 1060.5,-897 1128.5,-897 1128.5,-921"/>
-<text text-anchor="middle" x="1094.5" y="-906.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<!-- proc~symba_discard_peri_pl -->
+<g id="call~~graph~~CallGraph_node224" class="node">
+<title>proc~symba_discard_peri_pl</title>
+<g id="a_call~~graph~~CallGraph_node224"><a xlink:href=".././proc/symba_discard_peri_pl.html" xlink:title="symba_discard_peri_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="158.5,-9132 35.5,-9132 35.5,-9108 158.5,-9108 158.5,-9132"/>
+<text text-anchor="middle" x="97" y="-9117.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_peri_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_i4b -->
-<g id="call~~graph~~CallGraph_node205" class="node">
-<title>proc~util_sort_i4b</title>
-<g id="a_call~~graph~~CallGraph_node205"><a xlink:href=".././proc/util_sort_i4b.html" xlink:title="util_sort_i4b">
-<polygon fill="#d9534f" stroke="#d9534f" points="132,-9235 62,-9235 62,-9211 132,-9211 132,-9235"/>
-<text text-anchor="middle" x="97" y="-9220.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_i4b</text>
+<!-- proc~symba_discard_conserve_mtm -->
+<g id="call~~graph~~CallGraph_node225" class="node">
+<title>proc~symba_discard_conserve_mtm</title>
+<g id="a_call~~graph~~CallGraph_node225"><a xlink:href=".././proc/symba_discard_conserve_mtm.html" xlink:title="symba_discard_conserve_mtm">
+<polygon fill="#d9534f" stroke="#d9534f" points="177.5,-9174 16.5,-9174 16.5,-9150 177.5,-9150 177.5,-9174"/>
+<text text-anchor="middle" x="97" y="-9159.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_conserve_mtm</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_sp -->
-<g id="call~~graph~~CallGraph_node206" class="node">
-<title>proc~util_sort_sp</title>
-<g id="a_call~~graph~~CallGraph_node206"><a xlink:href=".././proc/util_sort_sp.html" xlink:title="util_sort_sp">
-<polygon fill="#d9534f" stroke="#d9534f" points="130.5,-9277 63.5,-9277 63.5,-9253 130.5,-9253 130.5,-9277"/>
-<text text-anchor="middle" x="97" y="-9262.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_sp</text>
+<!-- proc~symba_util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_node226" class="node">
+<title>proc~symba_util_sort_rearrange_tp</title>
+<g id="a_call~~graph~~CallGraph_node226"><a xlink:href=".././proc/symba_util_sort_rearrange_tp.html" xlink:title="symba_util_sort_rearrange_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="405,-5248 249,-5248 249,-5224 405,-5224 405,-5248"/>
+<text text-anchor="middle" x="327" y="-5233.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_arr_dpvec -->
-<g id="call~~graph~~CallGraph_node207" class="node">
-<title>proc~util_fill_arr_dpvec</title>
-<g id="a_call~~graph~~CallGraph_node207"><a xlink:href=".././proc/util_fill_arr_dpvec.html" xlink:title="util_fill_arr_DPvec">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-9319 48,-9319 48,-9295 146,-9295 146,-9319"/>
-<text text-anchor="middle" x="97" y="-9304.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_DPvec</text>
-</a>
+<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange -->
+<g id="call~~graph~~CallGraph_edge220" class="edge">
+<title>proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M405,-5239.14C439.64,-5240.55 479.96,-5242.19 512.46,-5243.51"/>
+<polygon fill="#000000" stroke="#000000" points="512.59,-5247.02 522.73,-5243.93 512.88,-5240.03 512.59,-5247.02"/>
+</g>
+<!-- util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_node707" class="node">
+<title>util_sort_rearrange_tp</title>
+<polygon fill="#777777" stroke="#777777" points="633.5,-5321 515.5,-5321 515.5,-5297 633.5,-5297 633.5,-5321"/>
+<text text-anchor="middle" x="574.5" y="-5306.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </g>
+<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_edge219" class="edge">
+<title>proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" d="M388.19,-5248.01C400.12,-5250.72 412.51,-5253.76 424,-5257 461.3,-5267.53 502.89,-5282.24 532.71,-5293.33"/>
+<polygon fill="#000000" stroke="#000000" points="531.76,-5296.71 542.35,-5296.94 534.21,-5290.16 531.76,-5296.71"/>
 </g>
-<!-- proc~util_sort_index_i4b -->
-<g id="call~~graph~~CallGraph_node208" class="node">
-<title>proc~util_sort_index_i4b</title>
-<g id="a_call~~graph~~CallGraph_node208"><a xlink:href=".././proc/util_sort_index_i4b.html" xlink:title="util_sort_index_i4b">
-<polygon fill="#d9534f" stroke="#d9534f" points="148,-9361 46,-9361 46,-9337 148,-9337 148,-9361"/>
-<text text-anchor="middle" x="97" y="-9346.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_index_i4b</text>
+<!-- proc~symba_discard_nonplpl -->
+<g id="call~~graph~~CallGraph_node227" class="node">
+<title>proc~symba_discard_nonplpl</title>
+<g id="a_call~~graph~~CallGraph_node227"><a xlink:href=".././proc/symba_discard_nonplpl.html" xlink:title="symba_discard_nonplpl">
+<polygon fill="#d9534f" stroke="#d9534f" points="1157,-1891 1032,-1891 1032,-1867 1157,-1867 1157,-1891"/>
+<text text-anchor="middle" x="1094.5" y="-1876.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_drift_body -->
-<g id="call~~graph~~CallGraph_node209" class="node">
-<title>interface~helio_drift_body</title>
-<g id="a_call~~graph~~CallGraph_node209"><a xlink:href=".././interface/helio_drift_body.html" xlink:title="helio_drift_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="618.5,-566 530.5,-566 530.5,-542 618.5,-542 618.5,-566"/>
-<text text-anchor="middle" x="574.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_body</text>
-</a>
+<!-- proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl -->
+<g id="call~~graph~~CallGraph_edge221" class="edge">
+<title>proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl</title>
+<path fill="none" stroke="#000000" d="M1157.13,-1879C1191.81,-1879 1235.17,-1879 1270.8,-1879"/>
+<polygon fill="#000000" stroke="#000000" points="1271.11,-1882.5 1281.11,-1879 1271.11,-1875.5 1271.11,-1882.5"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge224" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M635.43,-3983.01C652.84,-3986.96 671.8,-3991.72 689,-3997 705.41,-4002.04 708.49,-4006.31 725,-4011 733.78,-4013.49 743.02,-4015.77 752.29,-4017.81"/>
+<polygon fill="#000000" stroke="#000000" points="751.83,-4021.29 762.34,-4019.95 753.28,-4014.45 751.83,-4021.29"/>
 </g>
-<!-- proc~helio_drift_body -->
-<g id="call~~graph~~CallGraph_node520" class="node">
-<title>proc~helio_drift_body</title>
-<g id="a_call~~graph~~CallGraph_node520"><a xlink:href=".././proc/helio_drift_body.html" xlink:title="helio_drift_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="883.5,-566 795.5,-566 795.5,-542 883.5,-542 883.5,-566"/>
-<text text-anchor="middle" x="839.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_body</text>
-</a>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="call~~graph~~CallGraph_edge222" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M642.13,-3963.1C657.83,-3960.03 674.27,-3955.81 689,-3950 706.66,-3943.03 707.34,-3933.97 725,-3927 737.33,-3922.14 750.86,-3918.38 764.16,-3915.49"/>
+<polygon fill="#000000" stroke="#000000" points="765.15,-3918.86 774.25,-3913.45 763.76,-3912 765.15,-3918.86"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
+<g id="call~~graph~~CallGraph_edge225" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
+<path fill="none" stroke="#000000" d="M642.21,-3975.82C684.43,-3978.87 738.55,-3982.78 779.26,-3985.72"/>
+<polygon fill="#000000" stroke="#000000" points="779.08,-3989.22 789.3,-3986.45 779.58,-3982.23 779.08,-3989.22"/>
 </g>
-<!-- interface~helio_drift_body&#45;&gt;proc~helio_drift_body -->
-<g id="call~~graph~~CallGraph_edge205" class="edge">
-<title>interface~helio_drift_body&#45;&gt;proc~helio_drift_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.63,-554C664.21,-554 736.15,-554 785.23,-554"/>
-<polygon fill="#000000" stroke="#000000" points="785.34,-557.5 795.34,-554 785.34,-550.5 785.34,-557.5"/>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj -->
+<g id="call~~graph~~CallGraph_edge223" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj</title>
+<path fill="none" stroke="#000000" d="M642.21,-3965.17C690.19,-3960.97 753.51,-3955.43 795.08,-3951.8"/>
+<polygon fill="#000000" stroke="#000000" points="795.51,-3955.27 805.16,-3950.92 794.9,-3948.3 795.51,-3955.27"/>
 </g>
-<!-- interface~helio_drift_pl -->
-<g id="call~~graph~~CallGraph_node210" class="node">
-<title>interface~helio_drift_pl</title>
-<g id="a_call~~graph~~CallGraph_node210"><a xlink:href=".././interface/helio_drift_pl.html" xlink:title="helio_drift_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="133.5,-545 60.5,-545 60.5,-521 133.5,-521 133.5,-545"/>
-<text text-anchor="middle" x="97" y="-530.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_pl</text>
+<!-- proc~drift_body -->
+<g id="call~~graph~~CallGraph_node229" class="node">
+<title>proc~drift_body</title>
+<g id="a_call~~graph~~CallGraph_node229"><a xlink:href=".././proc/drift_body.html" xlink:title="drift_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="357,-9216 297,-9216 297,-9192 357,-9192 357,-9216"/>
+<text text-anchor="middle" x="327" y="-9201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_body</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_drift_pl -->
-<g id="call~~graph~~CallGraph_node527" class="node">
-<title>proc~helio_drift_pl</title>
-<g id="a_call~~graph~~CallGraph_node527"><a xlink:href=".././proc/helio_drift_pl.html" xlink:title="helio_drift_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="363.5,-545 290.5,-545 290.5,-521 363.5,-521 363.5,-545"/>
-<text text-anchor="middle" x="327" y="-530.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_pl</text>
+<!-- interface~drift_all -->
+<g id="call~~graph~~CallGraph_node553" class="node">
+<title>interface~drift_all</title>
+<g id="a_call~~graph~~CallGraph_node553"><a xlink:href=".././interface/drift_all.html" xlink:title="drift_all">
+<polygon fill="#a7506f" stroke="#a7506f" points="601.5,-9216 547.5,-9216 547.5,-9192 601.5,-9192 601.5,-9216"/>
+<text text-anchor="middle" x="574.5" y="-9201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_drift_pl&#45;&gt;proc~helio_drift_pl -->
-<g id="call~~graph~~CallGraph_edge206" class="edge">
-<title>interface~helio_drift_pl&#45;&gt;proc~helio_drift_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M133.62,-533C173.08,-533 236.81,-533 280.01,-533"/>
-<polygon fill="#000000" stroke="#000000" points="280.25,-536.5 290.25,-533 280.25,-529.5 280.25,-536.5"/>
+<!-- proc~drift_body&#45;&gt;interface~drift_all -->
+<g id="call~~graph~~CallGraph_edge226" class="edge">
+<title>proc~drift_body&#45;&gt;interface~drift_all</title>
+<path fill="none" stroke="#000000" d="M357.13,-9204C402.09,-9204 488.32,-9204 537.26,-9204"/>
+<polygon fill="#000000" stroke="#000000" points="537.39,-9207.5 547.39,-9204 537.39,-9200.5 537.39,-9207.5"/>
 </g>
-<!-- interface~helio_drift_tp -->
-<g id="call~~graph~~CallGraph_node211" class="node">
-<title>interface~helio_drift_tp</title>
-<g id="a_call~~graph~~CallGraph_node211"><a xlink:href=".././interface/helio_drift_tp.html" xlink:title="helio_drift_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="134,-587 60,-587 60,-563 134,-563 134,-587"/>
-<text text-anchor="middle" x="97" y="-572.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
+<!-- proc~fraggle_set_original_scale_factors -->
+<g id="call~~graph~~CallGraph_node230" class="node">
+<title>proc~fraggle_set_original_scale_factors</title>
+<g id="a_call~~graph~~CallGraph_node230"><a xlink:href=".././proc/fraggle_set_original_scale_factors.html" xlink:title="fraggle_set_original_scale_factors">
+<polygon fill="#d9534f" stroke="#d9534f" points="414.5,-9258 239.5,-9258 239.5,-9234 414.5,-9234 414.5,-9258"/>
+<text text-anchor="middle" x="327" y="-9243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_original_scale_factors</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_drift_tp -->
-<g id="call~~graph~~CallGraph_node528" class="node">
-<title>proc~helio_drift_tp</title>
-<g id="a_call~~graph~~CallGraph_node528"><a xlink:href=".././proc/helio_drift_tp.html" xlink:title="helio_drift_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="364,-587 290,-587 290,-563 364,-563 364,-587"/>
-<text text-anchor="middle" x="327" y="-572.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
+<!-- proc~whm_gr_p4_tp -->
+<g id="call~~graph~~CallGraph_node231" class="node">
+<title>proc~whm_gr_p4_tp</title>
+<g id="a_call~~graph~~CallGraph_node231"><a xlink:href=".././proc/whm_gr_p4_tp.html" xlink:title="whm_gr_p4_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="369,-4462 285,-4462 285,-4438 369,-4438 369,-4462"/>
+<text text-anchor="middle" x="327" y="-4447.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp -->
-<g id="call~~graph~~CallGraph_edge207" class="edge">
-<title>interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.13,-575C173.45,-575 236.46,-575 279.46,-575"/>
-<polygon fill="#000000" stroke="#000000" points="279.67,-578.5 289.66,-575 279.66,-571.5 279.67,-578.5"/>
+<!-- proc~whm_gr_p4_tp&#45;&gt;gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_edge227" class="edge">
+<title>proc~whm_gr_p4_tp&#45;&gt;gr_p4_pos_kick</title>
+<path fill="none" stroke="#000000" d="M369.09,-4453.51C410.5,-4457.06 474.6,-4462.54 519.97,-4466.42"/>
+<polygon fill="#000000" stroke="#000000" points="519.94,-4469.93 530.21,-4467.3 520.54,-4462.96 519.94,-4469.93"/>
 </g>
-<!-- proc~symba_discard_cb_pl -->
-<g id="call~~graph~~CallGraph_node212" class="node">
-<title>proc~symba_discard_cb_pl</title>
-<g id="a_call~~graph~~CallGraph_node212"><a xlink:href=".././proc/symba_discard_cb_pl.html" xlink:title="symba_discard_cb_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="1397.5,-440 1281.5,-440 1281.5,-416 1397.5,-416 1397.5,-440"/>
-<text text-anchor="middle" x="1339.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_cb_pl</text>
+<!-- proc~symba_util_spill_arr_kin -->
+<g id="call~~graph~~CallGraph_node232" class="node">
+<title>proc~symba_util_spill_arr_kin</title>
+<g id="a_call~~graph~~CallGraph_node232"><a xlink:href=".././proc/symba_util_spill_arr_kin.html" xlink:title="symba_util_spill_arr_kin">
+<polygon fill="#d9534f" stroke="#d9534f" points="160.5,-9300 33.5,-9300 33.5,-9276 160.5,-9276 160.5,-9300"/>
+<text text-anchor="middle" x="97" y="-9285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_arr_kin</text>
 </a>
 </g>
 </g>
-<!-- fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_node697" class="node">
-<title>fraggle_io_log_one_message</title>
-<polygon fill="#777777" stroke="#777777" points="1645.5,-419 1491.5,-419 1491.5,-395 1645.5,-395 1645.5,-419"/>
-<text text-anchor="middle" x="1568.5" y="-404.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<!-- proc~fraggle_set_mass_dist_fragments -->
+<g id="call~~graph~~CallGraph_node233" class="node">
+<title>proc~fraggle_set_mass_dist_fragments</title>
+<g id="a_call~~graph~~CallGraph_node233"><a xlink:href=".././proc/fraggle_set_mass_dist_fragments.html" xlink:title="fraggle_set_mass_dist_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="414,-9342 240,-9342 240,-9318 414,-9318 414,-9342"/>
+<text text-anchor="middle" x="327" y="-9327.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_mass_dist_fragments</text>
+</a>
 </g>
-<!-- proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge208" class="edge">
-<title>proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M1397.78,-422.7C1423.05,-420.36 1453.29,-417.57 1481.2,-414.98"/>
-<polygon fill="#000000" stroke="#000000" points="1481.72,-418.45 1491.36,-414.04 1481.08,-411.48 1481.72,-418.45"/>
 </g>
-<!-- interface~helio_drift_linear_pl -->
-<g id="call~~graph~~CallGraph_node213" class="node">
-<title>interface~helio_drift_linear_pl</title>
-<g id="a_call~~graph~~CallGraph_node213"><a xlink:href=".././interface/helio_drift_linear_pl.html" xlink:title="helio_drift_linear_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="150,-9403 44,-9403 44,-9379 150,-9379 150,-9403"/>
-<text text-anchor="middle" x="97" y="-9388.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_pl</text>
+<!-- proc~drift_all -->
+<g id="call~~graph~~CallGraph_node234" class="node">
+<title>proc~drift_all</title>
+<g id="a_call~~graph~~CallGraph_node234"><a xlink:href=".././proc/drift_all.html" xlink:title="drift_all">
+<polygon fill="#d9534f" stroke="#d9534f" points="866.5,-9216 812.5,-9216 812.5,-9192 866.5,-9192 866.5,-9216"/>
+<text text-anchor="middle" x="839.5" y="-9201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_drift_linear_pl -->
-<g id="call~~graph~~CallGraph_node536" class="node">
-<title>proc~helio_drift_linear_pl</title>
-<g id="a_call~~graph~~CallGraph_node536"><a xlink:href=".././proc/helio_drift_linear_pl.html" xlink:title="helio_drift_linear_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-9403 274,-9403 274,-9379 380,-9379 380,-9403"/>
-<text text-anchor="middle" x="327" y="-9388.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_pl</text>
+<!-- proc~xv2el -->
+<g id="call~~graph~~CallGraph_node235" class="node">
+<title>proc~xv2el</title>
+<g id="a_call~~graph~~CallGraph_node235"><a xlink:href=".././proc/xv2el.html" xlink:title="xv2el">
+<polygon fill="#d9534f" stroke="#d9534f" points="124,-9384 70,-9384 70,-9360 124,-9360 124,-9384"/>
+<text text-anchor="middle" x="97" y="-9369.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xv2el</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_drift_linear_pl&#45;&gt;proc~helio_drift_linear_pl -->
-<g id="call~~graph~~CallGraph_edge209" class="edge">
-<title>interface~helio_drift_linear_pl&#45;&gt;proc~helio_drift_linear_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-9391C183.76,-9391 227.89,-9391 263.52,-9391"/>
-<polygon fill="#000000" stroke="#000000" points="263.81,-9394.5 273.81,-9391 263.81,-9387.5 263.81,-9394.5"/>
-</g>
-<!-- interface~helio_drift_linear_tp -->
-<g id="call~~graph~~CallGraph_node215" class="node">
-<title>interface~helio_drift_linear_tp</title>
-<g id="a_call~~graph~~CallGraph_node215"><a xlink:href=".././interface/helio_drift_linear_tp.html" xlink:title="helio_drift_linear_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="150,-9445 44,-9445 44,-9421 150,-9421 150,-9445"/>
-<text text-anchor="middle" x="97" y="-9430.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_tp</text>
+<!-- interface~util_fill~2 -->
+<g id="call~~graph~~CallGraph_node236" class="node">
+<title>interface~util_fill~2</title>
+<g id="a_call~~graph~~CallGraph_node236"><a xlink:href=".././interface/util_fill~2.html" xlink:title="util_fill">
+<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-7876 1067.5,-7876 1067.5,-7852 1121.5,-7852 1121.5,-7876"/>
+<text text-anchor="middle" x="1094.5" y="-7861.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_drift_linear_tp -->
-<g id="call~~graph~~CallGraph_node541" class="node">
-<title>proc~helio_drift_linear_tp</title>
-<g id="a_call~~graph~~CallGraph_node541"><a xlink:href=".././proc/helio_drift_linear_tp.html" xlink:title="helio_drift_linear_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-9445 274,-9445 274,-9421 380,-9421 380,-9445"/>
-<text text-anchor="middle" x="327" y="-9430.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_tp</text>
+<!-- proc~symba_util_spill_encounter -->
+<g id="call~~graph~~CallGraph_node237" class="node">
+<title>proc~symba_util_spill_encounter</title>
+<g id="a_call~~graph~~CallGraph_node237"><a xlink:href=".././proc/symba_util_spill_encounter.html" xlink:title="symba_util_spill_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="910.5,-2929 768.5,-2929 768.5,-2905 910.5,-2905 910.5,-2929"/>
+<text text-anchor="middle" x="839.5" y="-2914.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_drift_linear_tp&#45;&gt;proc~helio_drift_linear_tp -->
-<g id="call~~graph~~CallGraph_edge210" class="edge">
-<title>interface~helio_drift_linear_tp&#45;&gt;proc~helio_drift_linear_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-9433C183.76,-9433 227.89,-9433 263.52,-9433"/>
-<polygon fill="#000000" stroke="#000000" points="263.81,-9436.5 273.81,-9433 263.81,-9429.5 263.81,-9436.5"/>
-</g>
-<!-- proc~util_sort_pl -->
-<g id="call~~graph~~CallGraph_node216" class="node">
-<title>proc~util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node216"><a xlink:href=".././proc/util_sort_pl.html" xlink:title="util_sort_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="359,-9109 295,-9109 295,-9085 359,-9085 359,-9109"/>
-<text text-anchor="middle" x="327" y="-9094.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
+<!-- interface~util_spill -->
+<g id="call~~graph~~CallGraph_node255" class="node">
+<title>interface~util_spill</title>
+<g id="a_call~~graph~~CallGraph_node255"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-2971 1067.5,-2971 1067.5,-2947 1121.5,-2947 1121.5,-2971"/>
+<text text-anchor="middle" x="1094.5" y="-2956.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_body -->
-<g id="call~~graph~~CallGraph_node499" class="node">
-<title>interface~util_sort_body</title>
-<g id="a_call~~graph~~CallGraph_node499"><a xlink:href=".././interface/util_sort_body.html" xlink:title="util_sort_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="614,-9088 535,-9088 535,-9064 614,-9064 614,-9088"/>
-<text text-anchor="middle" x="574.5" y="-9073.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_body</text>
-</a>
-</g>
+<!-- proc~symba_util_spill_encounter&#45;&gt;interface~util_spill -->
+<g id="call~~graph~~CallGraph_edge229" class="edge">
+<title>proc~symba_util_spill_encounter&#45;&gt;interface~util_spill</title>
+<path fill="none" stroke="#000000" d="M910.64,-2928.64C958.23,-2936.54 1019.19,-2946.66 1057.3,-2952.99"/>
+<polygon fill="#000000" stroke="#000000" points="1056.98,-2956.48 1067.42,-2954.67 1058.12,-2949.58 1056.98,-2956.48"/>
 </g>
-<!-- proc~util_sort_pl&#45;&gt;interface~util_sort_body -->
-<g id="call~~graph~~CallGraph_edge211" class="edge">
-<title>proc~util_sort_pl&#45;&gt;interface~util_sort_body</title>
-<path fill="none" stroke="#000000" d="M359.09,-9094.34C400.89,-9090.76 475.63,-9084.37 524.9,-9080.16"/>
-<polygon fill="#000000" stroke="#000000" points="525.33,-9083.63 535,-9079.29 524.74,-9076.66 525.33,-9083.63"/>
+<!-- util_spill_encounter -->
+<g id="call~~graph~~CallGraph_node728" class="node">
+<title>util_spill_encounter</title>
+<polygon fill="#777777" stroke="#777777" points="1146.5,-2929 1042.5,-2929 1042.5,-2905 1146.5,-2905 1146.5,-2929"/>
+<text text-anchor="middle" x="1094.5" y="-2914.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
 </g>
-<!-- interface~helio_gr_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node217" class="node">
-<title>interface~helio_gr_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node217"><a xlink:href=".././interface/helio_gr_kick_getacch_pl.html" xlink:title="helio_gr_kick_getacch_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-7429 30.5,-7429 30.5,-7405 163.5,-7405 163.5,-7429"/>
-<text text-anchor="middle" x="97" y="-7414.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_pl</text>
-</a>
+<!-- proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter -->
+<g id="call~~graph~~CallGraph_edge230" class="edge">
+<title>proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter</title>
+<path fill="none" stroke="#000000" d="M910.64,-2917C948.73,-2917 995.4,-2917 1032.06,-2917"/>
+<polygon fill="#000000" stroke="#000000" points="1032.12,-2920.5 1042.12,-2917 1032.12,-2913.5 1032.12,-2920.5"/>
 </g>
+<!-- proc~symba_util_spill_encounter&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge228" class="edge">
+<title>proc~symba_util_spill_encounter&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M910.61,-2917.72C926.84,-2914.49 942.66,-2908.03 954,-2896 1043.07,-2801.47 925.68,-2718.83 990,-2606 1005.79,-2578.31 1035.38,-2556.93 1058.89,-2543.27"/>
+<polygon fill="#000000" stroke="#000000" points="1060.86,-2546.18 1067.89,-2538.24 1057.45,-2540.07 1060.86,-2546.18"/>
 </g>
-<!-- proc~helio_gr_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node339" class="node">
-<title>proc~helio_gr_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node339"><a xlink:href=".././proc/helio_gr_kick_getacch_pl.html" xlink:title="helio_gr_kick_getacch_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-7429 260.5,-7429 260.5,-7405 393.5,-7405 393.5,-7429"/>
-<text text-anchor="middle" x="327" y="-7414.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_pl</text>
+<!-- proc~fraggle_set_coordinate_system -->
+<g id="call~~graph~~CallGraph_node238" class="node">
+<title>proc~fraggle_set_coordinate_system</title>
+<g id="a_call~~graph~~CallGraph_node238"><a xlink:href=".././proc/fraggle_set_coordinate_system.html" xlink:title="fraggle_set_coordinate_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="408,-9426 246,-9426 246,-9402 408,-9402 408,-9426"/>
+<text text-anchor="middle" x="327" y="-9411.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_coordinate_system</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_gr_kick_getacch_pl&#45;&gt;proc~helio_gr_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_edge212" class="edge">
-<title>interface~helio_gr_kick_getacch_pl&#45;&gt;proc~helio_gr_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-7417C190.71,-7417 222.24,-7417 250.27,-7417"/>
-<polygon fill="#000000" stroke="#000000" points="250.43,-7420.5 260.43,-7417 250.43,-7413.5 250.43,-7420.5"/>
-</g>
-<!-- interface~helio_gr_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node218" class="node">
-<title>interface~helio_gr_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node218"><a xlink:href=".././interface/helio_gr_kick_getacch_tp.html" xlink:title="helio_gr_kick_getacch_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-7387 30.5,-7387 30.5,-7363 163.5,-7363 163.5,-7387"/>
-<text text-anchor="middle" x="97" y="-7372.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_tp</text>
+<!-- proc~drift_dan -->
+<g id="call~~graph~~CallGraph_node239" class="node">
+<title>proc~drift_dan</title>
+<g id="a_call~~graph~~CallGraph_node239"><a xlink:href=".././proc/drift_dan.html" xlink:title="drift_dan">
+<polygon fill="#d9534f" stroke="#d9534f" points="602,-3496 547,-3496 547,-3472 602,-3472 602,-3496"/>
+<text text-anchor="middle" x="574.5" y="-3481.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_dan</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_gr_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node345" class="node">
-<title>proc~helio_gr_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node345"><a xlink:href=".././proc/helio_gr_kick_getacch_tp.html" xlink:title="helio_gr_kick_getacch_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-7387 260.5,-7387 260.5,-7363 393.5,-7363 393.5,-7387"/>
-<text text-anchor="middle" x="327" y="-7372.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_tp</text>
+<!-- proc~drift_kepmd -->
+<g id="call~~graph~~CallGraph_node619" class="node">
+<title>proc~drift_kepmd</title>
+<g id="a_call~~graph~~CallGraph_node619"><a xlink:href=".././proc/drift_kepmd.html" xlink:title="drift_kepmd">
+<polygon fill="#d9534f" stroke="#d9534f" points="874,-3527 805,-3527 805,-3503 874,-3503 874,-3527"/>
+<text text-anchor="middle" x="839.5" y="-3512.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepmd</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_gr_kick_getacch_tp&#45;&gt;proc~helio_gr_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge213" class="edge">
-<title>interface~helio_gr_kick_getacch_tp&#45;&gt;proc~helio_gr_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-7375C190.71,-7375 222.24,-7375 250.27,-7375"/>
-<polygon fill="#000000" stroke="#000000" points="250.43,-7378.5 260.43,-7375 250.43,-7371.5 250.43,-7378.5"/>
-</g>
-<!-- interface~helio_gr_p4_pl -->
-<g id="call~~graph~~CallGraph_node219" class="node">
-<title>interface~helio_gr_p4_pl</title>
-<g id="a_call~~graph~~CallGraph_node219"><a xlink:href=".././interface/helio_gr_p4_pl.html" xlink:title="helio_gr_p4_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-7597 55.5,-7597 55.5,-7573 138.5,-7573 138.5,-7597"/>
-<text text-anchor="middle" x="97" y="-7582.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_pl</text>
-</a>
-</g>
+<!-- proc~drift_dan&#45;&gt;proc~drift_kepmd -->
+<g id="call~~graph~~CallGraph_edge231" class="edge">
+<title>proc~drift_dan&#45;&gt;proc~drift_kepmd</title>
+<path fill="none" stroke="#000000" d="M602.17,-3487.14C647.44,-3492.48 739.74,-3503.36 794.64,-3509.83"/>
+<polygon fill="#000000" stroke="#000000" points="794.43,-3513.33 804.77,-3511.02 795.25,-3506.38 794.43,-3513.33"/>
 </g>
-<!-- proc~helio_gr_p4_pl -->
-<g id="call~~graph~~CallGraph_node346" class="node">
-<title>proc~helio_gr_p4_pl</title>
-<g id="a_call~~graph~~CallGraph_node346"><a xlink:href=".././proc/helio_gr_p4_pl.html" xlink:title="helio_gr_p4_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-7597 285.5,-7597 285.5,-7573 368.5,-7573 368.5,-7597"/>
-<text text-anchor="middle" x="327" y="-7582.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_pl</text>
+<!-- proc~drift_kepu -->
+<g id="call~~graph~~CallGraph_node638" class="node">
+<title>proc~drift_kepu</title>
+<g id="a_call~~graph~~CallGraph_node638"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
+<polygon fill="#d9534f" stroke="#d9534f" points="869.5,-3485 809.5,-3485 809.5,-3461 869.5,-3461 869.5,-3485"/>
+<text text-anchor="middle" x="839.5" y="-3470.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_gr_p4_pl&#45;&gt;proc~helio_gr_p4_pl -->
-<g id="call~~graph~~CallGraph_edge214" class="edge">
-<title>interface~helio_gr_p4_pl&#45;&gt;proc~helio_gr_p4_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-7585C176.9,-7585 234.01,-7585 275.12,-7585"/>
-<polygon fill="#000000" stroke="#000000" points="275.21,-7588.5 285.21,-7585 275.21,-7581.5 275.21,-7588.5"/>
+<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
+<g id="call~~graph~~CallGraph_edge232" class="edge">
+<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
+<path fill="none" stroke="#000000" d="M602.17,-3482.88C648.69,-3480.94 744.89,-3476.92 799.11,-3474.65"/>
+<polygon fill="#000000" stroke="#000000" points="799.52,-3478.13 809.37,-3474.22 799.23,-3471.14 799.52,-3478.13"/>
 </g>
-<!-- interface~helio_gr_p4_tp -->
-<g id="call~~graph~~CallGraph_node221" class="node">
-<title>interface~helio_gr_p4_tp</title>
-<g id="a_call~~graph~~CallGraph_node221"><a xlink:href=".././interface/helio_gr_p4_tp.html" xlink:title="helio_gr_p4_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="139,-7555 55,-7555 55,-7531 139,-7531 139,-7555"/>
-<text text-anchor="middle" x="97" y="-7540.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_tp</text>
+<!-- proc~symba_discard_nonplpl_conservation -->
+<g id="call~~graph~~CallGraph_node240" class="node">
+<title>proc~symba_discard_nonplpl_conservation</title>
+<g id="a_call~~graph~~CallGraph_node240"><a xlink:href=".././proc/symba_discard_nonplpl_conservation.html" xlink:title="symba_discard_nonplpl_conservation">
+<polygon fill="#d9534f" stroke="#d9534f" points="1190.5,-1933 998.5,-1933 998.5,-1909 1190.5,-1909 1190.5,-1933"/>
+<text text-anchor="middle" x="1094.5" y="-1918.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl_conservation</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_gr_p4_tp -->
-<g id="call~~graph~~CallGraph_node355" class="node">
-<title>proc~helio_gr_p4_tp</title>
-<g id="a_call~~graph~~CallGraph_node355"><a xlink:href=".././proc/helio_gr_p4_tp.html" xlink:title="helio_gr_p4_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="369,-7555 285,-7555 285,-7531 369,-7531 369,-7555"/>
-<text text-anchor="middle" x="327" y="-7540.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_tp</text>
+<!-- proc~drift_one -->
+<g id="call~~graph~~CallGraph_node241" class="node">
+<title>proc~drift_one</title>
+<g id="a_call~~graph~~CallGraph_node241"><a xlink:href=".././proc/drift_one.html" xlink:title="drift_one">
+<polygon fill="#d9534f" stroke="#d9534f" points="354.5,-9468 299.5,-9468 299.5,-9444 354.5,-9444 354.5,-9468"/>
+<text text-anchor="middle" x="327" y="-9453.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_one</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_gr_p4_tp&#45;&gt;proc~helio_gr_p4_tp -->
-<g id="call~~graph~~CallGraph_edge215" class="edge">
-<title>interface~helio_gr_p4_tp&#45;&gt;proc~helio_gr_p4_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.03,-7543C177.08,-7543 233.86,-7543 274.86,-7543"/>
-<polygon fill="#000000" stroke="#000000" points="274.92,-7546.5 284.92,-7543 274.92,-7539.5 274.92,-7546.5"/>
-</g>
-<!-- proc~symba_discard_nonplpl -->
-<g id="call~~graph~~CallGraph_node225" class="node">
-<title>proc~symba_discard_nonplpl</title>
-<g id="a_call~~graph~~CallGraph_node225"><a xlink:href=".././proc/symba_discard_nonplpl.html" xlink:title="symba_discard_nonplpl">
-<polygon fill="#d9534f" stroke="#d9534f" points="1157,-440 1032,-440 1032,-416 1157,-416 1157,-440"/>
-<text text-anchor="middle" x="1094.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl</text>
+<!-- proc~symba_util_spill_pl -->
+<g id="call~~graph~~CallGraph_node242" class="node">
+<title>proc~symba_util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node242"><a xlink:href=".././proc/symba_util_spill_pl.html" xlink:title="symba_util_spill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="890.5,-2971 788.5,-2971 788.5,-2947 890.5,-2947 890.5,-2971"/>
+<text text-anchor="middle" x="839.5" y="-2956.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl -->
-<g id="call~~graph~~CallGraph_edge217" class="edge">
-<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl</title>
-<path fill="none" stroke="#000000" d="M889.28,-444.95C926.9,-441.83 979.49,-437.46 1021.89,-433.94"/>
-<polygon fill="#000000" stroke="#000000" points="1022.2,-437.43 1031.87,-433.12 1021.62,-430.45 1022.2,-437.43"/>
+<!-- proc~symba_util_spill_pl&#45;&gt;interface~util_spill -->
+<g id="call~~graph~~CallGraph_edge234" class="edge">
+<title>proc~symba_util_spill_pl&#45;&gt;interface~util_spill</title>
+<path fill="none" stroke="#000000" d="M890.79,-2959C939.91,-2959 1013.48,-2959 1057.17,-2959"/>
+<polygon fill="#000000" stroke="#000000" points="1057.34,-2962.5 1067.34,-2959 1057.34,-2955.5 1057.34,-2962.5"/>
 </g>
-<!-- proc~symba_discard_nonplpl_conservation -->
-<g id="call~~graph~~CallGraph_node241" class="node">
-<title>proc~symba_discard_nonplpl_conservation</title>
-<g id="a_call~~graph~~CallGraph_node241"><a xlink:href=".././proc/symba_discard_nonplpl_conservation.html" xlink:title="symba_discard_nonplpl_conservation">
-<polygon fill="#d9534f" stroke="#d9534f" points="1190.5,-482 998.5,-482 998.5,-458 1190.5,-458 1190.5,-482"/>
-<text text-anchor="middle" x="1094.5" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl_conservation</text>
-</a>
+<!-- util_spill_pl -->
+<g id="call~~graph~~CallGraph_node736" class="node">
+<title>util_spill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1126.5,-3013 1062.5,-3013 1062.5,-2989 1126.5,-2989 1126.5,-3013"/>
+<text text-anchor="middle" x="1094.5" y="-2998.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </g>
+<!-- proc~symba_util_spill_pl&#45;&gt;util_spill_pl -->
+<g id="call~~graph~~CallGraph_edge235" class="edge">
+<title>proc~symba_util_spill_pl&#45;&gt;util_spill_pl</title>
+<path fill="none" stroke="#000000" d="M890.79,-2967.35C938.15,-2975.21 1008.23,-2986.84 1052.35,-2994.17"/>
+<polygon fill="#000000" stroke="#000000" points="1052,-2997.66 1062.44,-2995.84 1053.15,-2990.75 1052,-2997.66"/>
 </g>
-<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation -->
-<g id="call~~graph~~CallGraph_edge216" class="edge">
-<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation</title>
-<path fill="none" stroke="#000000" d="M889.28,-453.05C917.44,-455.39 954,-458.42 988.38,-461.28"/>
-<polygon fill="#000000" stroke="#000000" points="988.24,-464.77 998.49,-462.11 988.82,-457.8 988.24,-464.77"/>
+<!-- proc~symba_util_spill_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge233" class="edge">
+<title>proc~symba_util_spill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M890.73,-2962.33C913.19,-2961 938.12,-2955.11 954,-2938 1004.47,-2883.6 953.75,-2670.75 990,-2606 1005.57,-2578.18 1035.19,-2556.82 1058.76,-2543.2"/>
+<polygon fill="#000000" stroke="#000000" points="1060.74,-2546.1 1067.78,-2538.18 1057.34,-2539.98 1060.74,-2546.1"/>
 </g>
-<!-- proc~symba_discard_conserve_mtm -->
-<g id="call~~graph~~CallGraph_node223" class="node">
-<title>proc~symba_discard_conserve_mtm</title>
-<g id="a_call~~graph~~CallGraph_node223"><a xlink:href=".././proc/symba_discard_conserve_mtm.html" xlink:title="symba_discard_conserve_mtm">
-<polygon fill="#d9534f" stroke="#d9534f" points="177.5,-9487 16.5,-9487 16.5,-9463 177.5,-9463 177.5,-9487"/>
-<text text-anchor="middle" x="97" y="-9472.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_conserve_mtm</text>
+<!-- proc~symba_util_spill_tp -->
+<g id="call~~graph~~CallGraph_node243" class="node">
+<title>proc~symba_util_spill_tp</title>
+<g id="a_call~~graph~~CallGraph_node243"><a xlink:href=".././proc/symba_util_spill_tp.html" xlink:title="symba_util_spill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="891,-3013 788,-3013 788,-2989 891,-2989 891,-3013"/>
+<text text-anchor="middle" x="839.5" y="-2998.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node224" class="node">
-<title>interface~helio_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node224"><a xlink:href=".././interface/helio_kick_getacch_pl.html" xlink:title="helio_kick_getacch_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-9529 38.5,-9529 38.5,-9505 155.5,-9505 155.5,-9529"/>
-<text text-anchor="middle" x="97" y="-9514.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_pl</text>
-</a>
+<!-- proc~symba_util_spill_tp&#45;&gt;interface~util_spill -->
+<g id="call~~graph~~CallGraph_edge237" class="edge">
+<title>proc~symba_util_spill_tp&#45;&gt;interface~util_spill</title>
+<path fill="none" stroke="#000000" d="M891.09,-2992.6C940.35,-2984.42 1013.98,-2972.2 1057.54,-2964.97"/>
+<polygon fill="#000000" stroke="#000000" points="1058.11,-2968.42 1067.4,-2963.33 1056.97,-2961.52 1058.11,-2968.42"/>
 </g>
+<!-- util_spill_tp -->
+<g id="call~~graph~~CallGraph_node693" class="node">
+<title>util_spill_tp</title>
+<polygon fill="#777777" stroke="#777777" points="1127,-3055 1062,-3055 1062,-3031 1127,-3031 1127,-3055"/>
+<text text-anchor="middle" x="1094.5" y="-3040.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </g>
-<!-- proc~helio_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node343" class="node">
-<title>proc~helio_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node343"><a xlink:href=".././proc/helio_kick_getacch_pl.html" xlink:title="helio_kick_getacch_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-9529 268.5,-9529 268.5,-9505 385.5,-9505 385.5,-9529"/>
-<text text-anchor="middle" x="327" y="-9514.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_pl</text>
-</a>
+<!-- proc~symba_util_spill_tp&#45;&gt;util_spill_tp -->
+<g id="call~~graph~~CallGraph_edge238" class="edge">
+<title>proc~symba_util_spill_tp&#45;&gt;util_spill_tp</title>
+<path fill="none" stroke="#000000" d="M891.09,-3009.4C938.22,-3017.22 1007.65,-3028.75 1051.71,-3036.06"/>
+<polygon fill="#000000" stroke="#000000" points="1051.35,-3039.55 1061.79,-3037.74 1052.5,-3032.65 1051.35,-3039.55"/>
 </g>
+<!-- proc~symba_util_spill_tp&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge236" class="edge">
+<title>proc~symba_util_spill_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M891.11,-3004.4C913.52,-3003.05 938.29,-2997.14 954,-2980 1010.42,-2918.45 949.65,-2679.1 990,-2606 1005.41,-2578.09 1035.03,-2556.74 1058.66,-2543.14"/>
+<polygon fill="#000000" stroke="#000000" points="1060.64,-2546.04 1067.7,-2538.14 1057.25,-2539.91 1060.64,-2546.04"/>
 </g>
-<!-- interface~helio_kick_getacch_pl&#45;&gt;proc~helio_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_edge218" class="edge">
-<title>interface~helio_kick_getacch_pl&#45;&gt;proc~helio_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-9517C186.72,-9517 225.45,-9517 258.11,-9517"/>
-<polygon fill="#000000" stroke="#000000" points="258.48,-9520.5 268.48,-9517 258.48,-9513.5 258.48,-9520.5"/>
+<!-- proc~whm_step_pl -->
+<g id="call~~graph~~CallGraph_node244" class="node">
+<title>proc~whm_step_pl</title>
+<g id="a_call~~graph~~CallGraph_node244"><a xlink:href=".././proc/whm_step_pl.html" xlink:title="whm_step_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="365,-9510 289,-9510 289,-9486 365,-9486 365,-9510"/>
+<text text-anchor="middle" x="327" y="-9495.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_pl</text>
+</a>
 </g>
-<!-- proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl -->
-<g id="call~~graph~~CallGraph_edge219" class="edge">
-<title>proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl</title>
-<path fill="none" stroke="#000000" d="M1157.13,-428C1191.81,-428 1235.17,-428 1270.8,-428"/>
-<polygon fill="#000000" stroke="#000000" points="1271.11,-431.5 1281.11,-428 1271.11,-424.5 1271.11,-431.5"/>
 </g>
-<!-- interface~helio_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node226" class="node">
-<title>interface~helio_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node226"><a xlink:href=".././interface/helio_kick_getacch_tp.html" xlink:title="helio_kick_getacch_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-9571 38,-9571 38,-9547 156,-9547 156,-9571"/>
-<text text-anchor="middle" x="97" y="-9556.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_tp</text>
+<!-- proc~whm_step_tp -->
+<g id="call~~graph~~CallGraph_node245" class="node">
+<title>proc~whm_step_tp</title>
+<g id="a_call~~graph~~CallGraph_node245"><a xlink:href=".././proc/whm_step_tp.html" xlink:title="whm_step_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="365,-9552 289,-9552 289,-9528 365,-9528 365,-9552"/>
+<text text-anchor="middle" x="327" y="-9537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node366" class="node">
-<title>proc~helio_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node366"><a xlink:href=".././proc/helio_kick_getacch_tp.html" xlink:title="helio_kick_getacch_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="386,-9571 268,-9571 268,-9547 386,-9547 386,-9571"/>
-<text text-anchor="middle" x="327" y="-9556.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_tp</text>
+<!-- interface~symba_step_recur_system -->
+<g id="call~~graph~~CallGraph_node246" class="node">
+<title>interface~symba_step_recur_system</title>
+<g id="a_call~~graph~~CallGraph_node246"><a xlink:href=".././interface/symba_step_recur_system.html" xlink:title="symba_step_recur_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="645,-2597 504,-2597 504,-2573 645,-2573 645,-2597"/>
+<text text-anchor="middle" x="574.5" y="-2582.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_recur_system</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_kick_getacch_tp&#45;&gt;proc~helio_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge220" class="edge">
-<title>interface~helio_kick_getacch_tp&#45;&gt;proc~helio_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-9559C187.08,-9559 225.33,-9559 257.7,-9559"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-9562.5 267.98,-9559 257.98,-9555.5 257.98,-9562.5"/>
+<!-- interface~symba_step_recur_system&#45;&gt;proc~symba_step_recur_system -->
+<g id="call~~graph~~CallGraph_edge239" class="edge">
+<title>interface~symba_step_recur_system&#45;&gt;proc~symba_step_recur_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.29,-2585C680.2,-2585 722.62,-2585 758.81,-2585"/>
+<polygon fill="#000000" stroke="#000000" points="758.84,-2588.5 768.84,-2585 758.84,-2581.5 758.84,-2588.5"/>
 </g>
-<!-- proc~util_sort_index_sp -->
-<g id="call~~graph~~CallGraph_node227" class="node">
-<title>proc~util_sort_index_sp</title>
-<g id="a_call~~graph~~CallGraph_node227"><a xlink:href=".././proc/util_sort_index_sp.html" xlink:title="util_sort_index_sp">
-<polygon fill="#d9534f" stroke="#d9534f" points="146.5,-9613 47.5,-9613 47.5,-9589 146.5,-9589 146.5,-9613"/>
-<text text-anchor="middle" x="97" y="-9598.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_index_sp</text>
+<!-- proc~util_set_beg_end_pl -->
+<g id="call~~graph~~CallGraph_node247" class="node">
+<title>proc~util_set_beg_end_pl</title>
+<g id="a_call~~graph~~CallGraph_node247"><a xlink:href=".././proc/util_set_beg_end_pl.html" xlink:title="util_set_beg_end_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-9594 272.5,-9594 272.5,-9570 381.5,-9570 381.5,-9594"/>
+<text text-anchor="middle" x="327" y="-9579.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_beg_end_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_kick_vb_pl -->
-<g id="call~~graph~~CallGraph_node228" class="node">
-<title>interface~helio_kick_vb_pl</title>
-<g id="a_call~~graph~~CallGraph_node228"><a xlink:href=".././interface/helio_kick_vb_pl.html" xlink:title="helio_kick_vb_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-9655 51.5,-9655 51.5,-9631 142.5,-9631 142.5,-9655"/>
-<text text-anchor="middle" x="97" y="-9640.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_pl</text>
+<!-- interface~symba_step_reset_system -->
+<g id="call~~graph~~CallGraph_node249" class="node">
+<title>interface~symba_step_reset_system</title>
+<g id="a_call~~graph~~CallGraph_node249"><a xlink:href=".././interface/symba_step_reset_system.html" xlink:title="symba_step_reset_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="167,-6391 27,-6391 27,-6367 167,-6367 167,-6391"/>
+<text text-anchor="middle" x="97" y="-6376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_reset_system</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_kick_vb_pl -->
-<g id="call~~graph~~CallGraph_node365" class="node">
-<title>proc~helio_kick_vb_pl</title>
-<g id="a_call~~graph~~CallGraph_node365"><a xlink:href=".././proc/helio_kick_vb_pl.html" xlink:title="helio_kick_vb_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-9655 281.5,-9655 281.5,-9631 372.5,-9631 372.5,-9655"/>
-<text text-anchor="middle" x="327" y="-9640.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_pl</text>
-</a>
-</g>
+<!-- interface~symba_step_reset_system&#45;&gt;proc~symba_step_reset_system -->
+<g id="call~~graph~~CallGraph_edge240" class="edge">
+<title>interface~symba_step_reset_system&#45;&gt;proc~symba_step_reset_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M167.03,-6379C192.13,-6379 220.71,-6379 246.64,-6379"/>
+<polygon fill="#000000" stroke="#000000" points="246.82,-6382.5 256.82,-6379 246.82,-6375.5 246.82,-6382.5"/>
 </g>
-<!-- interface~helio_kick_vb_pl&#45;&gt;proc~helio_kick_vb_pl -->
-<g id="call~~graph~~CallGraph_edge221" class="edge">
-<title>interface~helio_kick_vb_pl&#45;&gt;proc~helio_kick_vb_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-9643C179.26,-9643 231.61,-9643 270.99,-9643"/>
-<polygon fill="#000000" stroke="#000000" points="271.22,-9646.5 281.22,-9643 271.22,-9639.5 271.22,-9646.5"/>
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
+<g id="call~~graph~~CallGraph_edge242" class="edge">
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" d="M386.18,-7063.31C419.62,-7060.04 461.99,-7055.9 497.98,-7052.38"/>
+<polygon fill="#000000" stroke="#000000" points="498.34,-7055.86 507.95,-7051.41 497.65,-7048.9 498.34,-7055.86"/>
 </g>
-<!-- interface~helio_kick_vb_tp -->
-<g id="call~~graph~~CallGraph_node229" class="node">
-<title>interface~helio_kick_vb_tp</title>
-<g id="a_call~~graph~~CallGraph_node229"><a xlink:href=".././interface/helio_kick_vb_tp.html" xlink:title="helio_kick_vb_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-9697 51.5,-9697 51.5,-9673 142.5,-9673 142.5,-9697"/>
-<text text-anchor="middle" x="97" y="-9682.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_tp</text>
+<!-- interface~util_sort_rearrange~2 -->
+<g id="call~~graph~~CallGraph_node542" class="node">
+<title>interface~util_sort_rearrange~2</title>
+<g id="a_call~~graph~~CallGraph_node542"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="1146,-7057 1043,-7057 1043,-7033 1146,-7033 1146,-7057"/>
+<text text-anchor="middle" x="1094.5" y="-7042.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_kick_vb_tp -->
-<g id="call~~graph~~CallGraph_node367" class="node">
-<title>proc~helio_kick_vb_tp</title>
-<g id="a_call~~graph~~CallGraph_node367"><a xlink:href=".././proc/helio_kick_vb_tp.html" xlink:title="helio_kick_vb_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-9697 281.5,-9697 281.5,-9673 372.5,-9673 372.5,-9697"/>
-<text text-anchor="middle" x="327" y="-9682.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_tp</text>
-</a>
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
+<g id="call~~graph~~CallGraph_edge241" class="edge">
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
+<path fill="none" stroke="#000000" d="M386.37,-7071.53C497.2,-7075.71 745.68,-7082.09 954,-7066 979.85,-7064 1008.18,-7060.07 1032.52,-7056.13"/>
+<polygon fill="#000000" stroke="#000000" points="1033.39,-7059.54 1042.68,-7054.46 1032.25,-7052.63 1033.39,-7059.54"/>
 </g>
+<!-- proc~util_resize_arr_i4b -->
+<g id="call~~graph~~CallGraph_node251" class="node">
+<title>proc~util_resize_arr_i4b</title>
+<g id="a_call~~graph~~CallGraph_node251"><a xlink:href=".././proc/util_resize_arr_i4b.html" xlink:title="util_resize_arr_I4B">
+<polygon fill="#d9534f" stroke="#d9534f" points="148,-9636 46,-9636 46,-9612 148,-9612 148,-9636"/>
+<text text-anchor="middle" x="97" y="-9621.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_I4B</text>
+</a>
 </g>
-<!-- interface~helio_kick_vb_tp&#45;&gt;proc~helio_kick_vb_tp -->
-<g id="call~~graph~~CallGraph_edge222" class="edge">
-<title>interface~helio_kick_vb_tp&#45;&gt;proc~helio_kick_vb_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-9685C179.26,-9685 231.61,-9685 270.99,-9685"/>
-<polygon fill="#000000" stroke="#000000" points="271.22,-9688.5 281.22,-9685 271.22,-9681.5 271.22,-9688.5"/>
 </g>
-<!-- interface~helio_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node230" class="node">
-<title>interface~helio_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node230"><a xlink:href=".././interface/helio_setup_initialize_system.html" xlink:title="helio_setup_initialize_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="172.5,-8395 21.5,-8395 21.5,-8371 172.5,-8371 172.5,-8395"/>
-<text text-anchor="middle" x="97" y="-8380.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup_initialize_system</text>
-</a>
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
+<g id="call~~graph~~CallGraph_edge244" class="edge">
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" d="M386.18,-7017.53C419.62,-7022.43 461.99,-7028.65 497.98,-7033.93"/>
+<polygon fill="#000000" stroke="#000000" points="497.55,-7037.4 507.95,-7035.39 498.56,-7030.47 497.55,-7037.4"/>
 </g>
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
+<g id="call~~graph~~CallGraph_edge243" class="edge">
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
+<path fill="none" stroke="#000000" d="M386.39,-7007.96C497.26,-7006.53 745.79,-7005.91 954,-7024 979.94,-7026.25 1008.39,-7030.26 1032.8,-7034.17"/>
+<polygon fill="#000000" stroke="#000000" points="1032.56,-7037.68 1042.99,-7035.83 1033.69,-7030.77 1032.56,-7037.68"/>
 </g>
-<!-- proc~helio_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node320" class="node">
-<title>proc~helio_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node320"><a xlink:href=".././proc/helio_setup_initialize_system.html" xlink:title="helio_setup_initialize_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="402.5,-8395 251.5,-8395 251.5,-8371 402.5,-8371 402.5,-8395"/>
-<text text-anchor="middle" x="327" y="-8380.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup_initialize_system</text>
+<!-- proc~io_read_in_param -->
+<g id="call~~graph~~CallGraph_node253" class="node">
+<title>proc~io_read_in_param</title>
+<g id="a_call~~graph~~CallGraph_node253"><a xlink:href=".././proc/io_read_in_param.html" xlink:title="io_read_in_param">
+<polygon fill="#d9534f" stroke="#d9534f" points="889.5,-617 789.5,-617 789.5,-593 889.5,-593 889.5,-617"/>
+<text text-anchor="middle" x="839.5" y="-602.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_setup_initialize_system&#45;&gt;proc~helio_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge223" class="edge">
-<title>interface~helio_setup_initialize_system&#45;&gt;proc~helio_setup_initialize_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.66,-8383C194.5,-8383 218.55,-8383 240.99,-8383"/>
-<polygon fill="#000000" stroke="#000000" points="241.18,-8386.5 251.18,-8383 241.18,-8379.5 241.18,-8386.5"/>
+<!-- proc~io_read_in_param&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge245" class="edge">
+<title>proc~io_read_in_param&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M889.62,-604.61C911.17,-606.69 935.69,-612.34 954,-626 1040.45,-690.45 1077.43,-823.86 1089.11,-876.73"/>
+<polygon fill="#000000" stroke="#000000" points="1085.73,-877.67 1091.22,-886.73 1092.58,-876.22 1085.73,-877.67"/>
 </g>
-<!-- interface~helio_step_pl -->
-<g id="call~~graph~~CallGraph_node231" class="node">
-<title>interface~helio_step_pl</title>
-<g id="a_call~~graph~~CallGraph_node231"><a xlink:href=".././interface/helio_step_pl.html" xlink:title="helio_step_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="135,-9739 59,-9739 59,-9715 135,-9715 135,-9739"/>
-<text text-anchor="middle" x="97" y="-9724.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_pl</text>
+<!-- proc~io_read_particle_info_system -->
+<g id="call~~graph~~CallGraph_node254" class="node">
+<title>proc~io_read_particle_info_system</title>
+<g id="a_call~~graph~~CallGraph_node254"><a xlink:href=".././proc/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="915.5,-1453 763.5,-1453 763.5,-1429 915.5,-1429 915.5,-1453"/>
+<text text-anchor="middle" x="839.5" y="-1438.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_step_pl -->
-<g id="call~~graph~~CallGraph_node322" class="node">
-<title>proc~helio_step_pl</title>
-<g id="a_call~~graph~~CallGraph_node322"><a xlink:href=".././proc/helio_step_pl.html" xlink:title="helio_step_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="365,-9739 289,-9739 289,-9715 365,-9715 365,-9739"/>
-<text text-anchor="middle" x="327" y="-9724.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_pl</text>
+<!-- proc~io_read_particle_info_system&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge246" class="edge">
+<title>proc~io_read_particle_info_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M915.69,-1439.23C929.79,-1435.74 943.4,-1429.79 954,-1420 1030.08,-1349.68 1078.86,-1011.69 1090.69,-921.28"/>
+<polygon fill="#000000" stroke="#000000" points="1094.17,-921.66 1091.98,-911.3 1087.23,-920.77 1094.17,-921.66"/>
+</g>
+<!-- interface~symba_util_resize_merger -->
+<g id="call~~graph~~CallGraph_node257" class="node">
+<title>interface~symba_util_resize_merger</title>
+<g id="a_call~~graph~~CallGraph_node257"><a xlink:href=".././interface/symba_util_resize_merger.html" xlink:title="symba_util_resize_merger">
+<polygon fill="#a7506f" stroke="#a7506f" points="166.5,-4798 27.5,-4798 27.5,-4774 166.5,-4774 166.5,-4798"/>
+<text text-anchor="middle" x="97" y="-4783.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_merger</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_step_pl&#45;&gt;proc~helio_step_pl -->
-<g id="call~~graph~~CallGraph_edge224" class="edge">
-<title>interface~helio_step_pl&#45;&gt;proc~helio_step_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-9727C174.31,-9727 236.14,-9727 278.75,-9727"/>
-<polygon fill="#000000" stroke="#000000" points="278.88,-9730.5 288.88,-9727 278.88,-9723.5 278.88,-9730.5"/>
-</g>
-<!-- proc~rmvs_discard_tp -->
-<g id="call~~graph~~CallGraph_node232" class="node">
-<title>proc~rmvs_discard_tp</title>
-<g id="a_call~~graph~~CallGraph_node232"><a xlink:href=".././proc/rmvs_discard_tp.html" xlink:title="rmvs_discard_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-9781 281.5,-9781 281.5,-9757 372.5,-9757 372.5,-9781"/>
-<text text-anchor="middle" x="327" y="-9766.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard_tp</text>
-</a>
-</g>
+<!-- interface~symba_util_resize_merger&#45;&gt;proc~symba_util_resize_merger -->
+<g id="call~~graph~~CallGraph_edge247" class="edge">
+<title>interface~symba_util_resize_merger&#45;&gt;proc~symba_util_resize_merger</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.72,-4786C192.07,-4786 220.98,-4786 247.16,-4786"/>
+<polygon fill="#000000" stroke="#000000" points="247.42,-4789.5 257.42,-4786 247.42,-4782.5 247.42,-4789.5"/>
 </g>
 <!-- discard_tp -->
-<g id="call~~graph~~CallGraph_node766" class="node">
+<g id="call~~graph~~CallGraph_node745" class="node">
 <title>discard_tp</title>
-<polygon fill="#777777" stroke="#777777" points="605.5,-9781 543.5,-9781 543.5,-9757 605.5,-9757 605.5,-9781"/>
-<text text-anchor="middle" x="574.5" y="-9766.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_tp</text>
+<polygon fill="#777777" stroke="#777777" points="605.5,-4378 543.5,-4378 543.5,-4354 605.5,-4354 605.5,-4378"/>
+<text text-anchor="middle" x="574.5" y="-4363.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_tp</text>
 </g>
 <!-- proc~rmvs_discard_tp&#45;&gt;discard_tp -->
-<g id="call~~graph~~CallGraph_edge225" class="edge">
+<g id="call~~graph~~CallGraph_edge248" class="edge">
 <title>proc~rmvs_discard_tp&#45;&gt;discard_tp</title>
-<path fill="none" stroke="#000000" d="M372.74,-9769C418.58,-9769 489.2,-9769 533.31,-9769"/>
-<polygon fill="#000000" stroke="#000000" points="533.38,-9772.5 543.38,-9769 533.38,-9765.5 533.38,-9772.5"/>
+<path fill="none" stroke="#000000" d="M372.74,-4366C418.58,-4366 489.2,-4366 533.31,-4366"/>
+<polygon fill="#000000" stroke="#000000" points="533.38,-4369.5 543.38,-4366 533.38,-4362.5 533.38,-4369.5"/>
 </g>
-<!-- interface~helio_step_system -->
-<g id="call~~graph~~CallGraph_node233" class="node">
-<title>interface~helio_step_system</title>
-<g id="a_call~~graph~~CallGraph_node233"><a xlink:href=".././interface/helio_step_system.html" xlink:title="helio_step_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="147.5,-1646 46.5,-1646 46.5,-1622 147.5,-1622 147.5,-1646"/>
-<text text-anchor="middle" x="97" y="-1631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_system</text>
+<!-- interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl -->
+<g id="call~~graph~~CallGraph_edge249" class="edge">
+<title>interface~symba_util_resize_pl&#45;&gt;proc~symba_util_resize_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-4806C672.19,-4806 729.31,-4806 773.16,-4806"/>
+<polygon fill="#000000" stroke="#000000" points="773.44,-4809.5 783.44,-4806 773.44,-4802.5 773.44,-4809.5"/>
+</g>
+<!-- proc~util_resize_arr_logical -->
+<g id="call~~graph~~CallGraph_node260" class="node">
+<title>proc~util_resize_arr_logical</title>
+<g id="a_call~~graph~~CallGraph_node260"><a xlink:href=".././proc/util_resize_arr_logical.html" xlink:title="util_resize_arr_logical">
+<polygon fill="#d9534f" stroke="#d9534f" points="155,-9678 39,-9678 39,-9654 155,-9654 155,-9678"/>
+<text text-anchor="middle" x="97" y="-9663.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_logical</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_step_system -->
-<g id="call~~graph~~CallGraph_node310" class="node">
-<title>proc~helio_step_system</title>
-<g id="a_call~~graph~~CallGraph_node310"><a xlink:href=".././proc/helio_step_system.html" xlink:title="helio_step_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="377.5,-1646 276.5,-1646 276.5,-1622 377.5,-1622 377.5,-1646"/>
-<text text-anchor="middle" x="327" y="-1631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_system</text>
+<!-- interface~symba_util_resize_tp -->
+<g id="call~~graph~~CallGraph_node261" class="node">
+<title>interface~symba_util_resize_tp</title>
+<g id="a_call~~graph~~CallGraph_node261"><a xlink:href=".././interface/symba_util_resize_tp.html" xlink:title="symba_util_resize_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="631,-4860 518,-4860 518,-4836 631,-4836 631,-4860"/>
+<text text-anchor="middle" x="574.5" y="-4845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~helio_step_system&#45;&gt;proc~helio_step_system -->
-<g id="call~~graph~~CallGraph_edge226" class="edge">
-<title>interface~helio_step_system&#45;&gt;proc~helio_step_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.75,-1634C182.61,-1634 229.35,-1634 266.23,-1634"/>
-<polygon fill="#000000" stroke="#000000" points="266.35,-1637.5 276.35,-1634 266.35,-1630.5 266.35,-1637.5"/>
+<!-- interface~symba_util_resize_tp&#45;&gt;proc~symba_util_resize_tp -->
+<g id="call~~graph~~CallGraph_edge250" class="edge">
+<title>interface~symba_util_resize_tp&#45;&gt;proc~symba_util_resize_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.28,-4848C672.59,-4848 729.05,-4848 772.59,-4848"/>
+<polygon fill="#000000" stroke="#000000" points="772.8,-4851.5 782.8,-4848 772.8,-4844.5 772.8,-4851.5"/>
 </g>
-<!-- interface~helio_step_tp -->
-<g id="call~~graph~~CallGraph_node234" class="node">
-<title>interface~helio_step_tp</title>
-<g id="a_call~~graph~~CallGraph_node234"><a xlink:href=".././interface/helio_step_tp.html" xlink:title="helio_step_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="135,-9823 59,-9823 59,-9799 135,-9799 135,-9823"/>
-<text text-anchor="middle" x="97" y="-9808.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_tp</text>
+<!-- interface~symba_util_sort_pl -->
+<g id="call~~graph~~CallGraph_node262" class="node">
+<title>interface~symba_util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node262"><a xlink:href=".././interface/symba_util_sort_pl.html" xlink:title="symba_util_sort_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="148,-9006 46,-9006 46,-8982 148,-8982 148,-9006"/>
+<text text-anchor="middle" x="97" y="-8991.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_step_tp -->
-<g id="call~~graph~~CallGraph_node325" class="node">
-<title>proc~helio_step_tp</title>
-<g id="a_call~~graph~~CallGraph_node325"><a xlink:href=".././proc/helio_step_tp.html" xlink:title="helio_step_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="365,-9823 289,-9823 289,-9799 365,-9799 365,-9823"/>
-<text text-anchor="middle" x="327" y="-9808.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_tp</text>
-</a>
+<!-- interface~symba_util_sort_pl&#45;&gt;proc~symba_util_sort_pl -->
+<g id="call~~graph~~CallGraph_edge251" class="edge">
+<title>interface~symba_util_sort_pl&#45;&gt;proc~symba_util_sort_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.04,-8994C182.66,-8994 228.93,-8994 265.61,-8994"/>
+<polygon fill="#000000" stroke="#000000" points="265.69,-8997.5 275.69,-8994 265.69,-8990.5 265.69,-8997.5"/>
 </g>
+<!-- proc~util_spill_arr_char_string -->
+<g id="call~~graph~~CallGraph_node264" class="node">
+<title>proc~util_spill_arr_char_string</title>
+<g id="a_call~~graph~~CallGraph_node264"><a xlink:href=".././proc/util_spill_arr_char_string.html" xlink:title="util_spill_arr_char_string">
+<polygon fill="#d9534f" stroke="#d9534f" points="161.5,-9720 32.5,-9720 32.5,-9696 161.5,-9696 161.5,-9720"/>
+<text text-anchor="middle" x="97" y="-9705.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_char_string</text>
+</a>
 </g>
-<!-- interface~helio_step_tp&#45;&gt;proc~helio_step_tp -->
-<g id="call~~graph~~CallGraph_edge227" class="edge">
-<title>interface~helio_step_tp&#45;&gt;proc~helio_step_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-9811C174.31,-9811 236.14,-9811 278.75,-9811"/>
-<polygon fill="#000000" stroke="#000000" points="278.88,-9814.5 288.88,-9811 278.88,-9807.5 278.88,-9814.5"/>
 </g>
-<!-- proc~util_sort_rearrange_body -->
-<g id="call~~graph~~CallGraph_node235" class="node">
-<title>proc~util_sort_rearrange_body</title>
-<g id="a_call~~graph~~CallGraph_node235"><a xlink:href=".././proc/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="906,-9896 773,-9896 773,-9872 906,-9872 906,-9896"/>
-<text text-anchor="middle" x="839.5" y="-9881.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<!-- interface~symba_util_sort_tp -->
+<g id="call~~graph~~CallGraph_node265" class="node">
+<title>interface~symba_util_sort_tp</title>
+<g id="a_call~~graph~~CallGraph_node265"><a xlink:href=".././interface/symba_util_sort_tp.html" xlink:title="symba_util_sort_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="148.5,-5080 45.5,-5080 45.5,-5056 148.5,-5056 148.5,-5080"/>
+<text text-anchor="middle" x="97" y="-5065.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_rearrange~2 -->
-<g id="call~~graph~~CallGraph_node374" class="node">
-<title>interface~util_sort_rearrange~2</title>
-<g id="a_call~~graph~~CallGraph_node374"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="1146,-9896 1043,-9896 1043,-9872 1146,-9872 1146,-9896"/>
-<text text-anchor="middle" x="1094.5" y="-9881.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<!-- interface~symba_util_sort_tp&#45;&gt;proc~symba_util_sort_tp -->
+<g id="call~~graph~~CallGraph_edge252" class="edge">
+<title>interface~symba_util_sort_tp&#45;&gt;proc~symba_util_sort_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.6,-5068C183.02,-5068 228.74,-5068 265.14,-5068"/>
+<polygon fill="#000000" stroke="#000000" points="265.15,-5071.5 275.15,-5068 265.15,-5064.5 265.15,-5071.5"/>
+</g>
+<!-- proc~io_read_in_particle_info -->
+<g id="call~~graph~~CallGraph_node266" class="node">
+<title>proc~io_read_in_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node266"><a xlink:href=".././proc/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="903,-1411 776,-1411 776,-1387 903,-1387 903,-1411"/>
+<text text-anchor="middle" x="839.5" y="-1396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2 -->
-<g id="call~~graph~~CallGraph_edge228" class="edge">
-<title>proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M906.31,-9884C945.26,-9884 994.26,-9884 1032.36,-9884"/>
-<polygon fill="#000000" stroke="#000000" points="1032.79,-9887.5 1042.79,-9884 1032.79,-9880.5 1032.79,-9887.5"/>
+<!-- proc~io_read_in_particle_info&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge253" class="edge">
+<title>proc~io_read_in_particle_info&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M903.13,-1399.5C921.42,-1396.69 940.18,-1390.5 954,-1378 1024.62,-1314.14 1076.83,-1006.66 1090.17,-921.12"/>
+<polygon fill="#000000" stroke="#000000" points="1093.63,-921.61 1091.69,-911.19 1086.71,-920.54 1093.63,-921.61"/>
 </g>
-<!-- proc~util_sort_tp -->
-<g id="call~~graph~~CallGraph_node237" class="node">
-<title>proc~util_sort_tp</title>
-<g id="a_call~~graph~~CallGraph_node237"><a xlink:href=".././proc/util_sort_tp.html" xlink:title="util_sort_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="359.5,-9067 294.5,-9067 294.5,-9043 359.5,-9043 359.5,-9067"/>
-<text text-anchor="middle" x="327" y="-9052.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+<!-- proc~io_dump_particle_info_base -->
+<g id="call~~graph~~CallGraph_node267" class="node">
+<title>proc~io_dump_particle_info_base</title>
+<g id="a_call~~graph~~CallGraph_node267"><a xlink:href=".././proc/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="913,-1369 766,-1369 766,-1345 913,-1345 913,-1369"/>
+<text text-anchor="middle" x="839.5" y="-1354.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_tp&#45;&gt;interface~util_sort_body -->
-<g id="call~~graph~~CallGraph_edge229" class="edge">
-<title>proc~util_sort_tp&#45;&gt;interface~util_sort_body</title>
-<path fill="none" stroke="#000000" d="M359.59,-9057.7C401.42,-9061.28 475.62,-9067.63 524.69,-9071.82"/>
-<polygon fill="#000000" stroke="#000000" points="524.49,-9075.32 534.75,-9072.69 525.09,-9068.35 524.49,-9075.32"/>
+<!-- proc~io_dump_particle_info_base&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge254" class="edge">
+<title>proc~io_dump_particle_info_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M913.13,-1351.91C928.07,-1347.89 942.67,-1341.38 954,-1331 1078.1,-1217.27 1092.23,-992.63 1093.5,-921.29"/>
+<polygon fill="#000000" stroke="#000000" points="1097,-921.24 1093.61,-911.2 1090,-921.16 1097,-921.24"/>
 </g>
-<!-- proc~rmvs_util_append_pl -->
-<g id="call~~graph~~CallGraph_node240" class="node">
-<title>proc~rmvs_util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node240"><a xlink:href=".././proc/rmvs_util_append_pl.html" xlink:title="rmvs_util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-1352 783.5,-1352 783.5,-1328 895.5,-1328 895.5,-1352"/>
-<text text-anchor="middle" x="839.5" y="-1337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_pl</text>
+<!-- proc~util_resize_arr_info -->
+<g id="call~~graph~~CallGraph_node269" class="node">
+<title>proc~util_resize_arr_info</title>
+<g id="a_call~~graph~~CallGraph_node269"><a xlink:href=".././proc/util_resize_arr_info.html" xlink:title="util_resize_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="148.5,-9762 45.5,-9762 45.5,-9738 148.5,-9738 148.5,-9762"/>
+<text text-anchor="middle" x="97" y="-9747.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_info</text>
 </a>
 </g>
 </g>
-<!-- whm_util_append_pl -->
-<g id="call~~graph~~CallGraph_node702" class="node">
-<title>whm_util_append_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1150,-1300 1039,-1300 1039,-1276 1150,-1276 1150,-1300"/>
-<text text-anchor="middle" x="1094.5" y="-1285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
+<!-- proc~io_dump_base -->
+<g id="call~~graph~~CallGraph_node270" class="node">
+<title>proc~io_dump_base</title>
+<g id="a_call~~graph~~CallGraph_node270"><a xlink:href=".././proc/io_dump_base.html" xlink:title="io_dump_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-1163 285.5,-1163 285.5,-1139 368.5,-1139 368.5,-1163"/>
+<text text-anchor="middle" x="327" y="-1148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+</a>
 </g>
-<!-- proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl -->
-<g id="call~~graph~~CallGraph_edge231" class="edge">
-<title>proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl</title>
-<path fill="none" stroke="#000000" d="M895.54,-1330.82C914.18,-1327.45 935.06,-1323.37 954,-1319 970.18,-1315.26 973.85,-1312.88 990,-1309 1002.45,-1306.01 1015.81,-1303.09 1028.66,-1300.42"/>
-<polygon fill="#000000" stroke="#000000" points="1029.73,-1303.78 1038.82,-1298.34 1028.32,-1296.92 1029.73,-1303.78"/>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge256" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M334.22,-1163.2C350.22,-1193.07 396.1,-1269.5 460,-1298 510.13,-1320.36 909.24,-1329.77 954,-1298 1081.26,-1207.68 1093.35,-992.08 1093.8,-921.67"/>
+<polygon fill="#000000" stroke="#000000" points="1097.3,-921.3 1093.79,-911.31 1090.3,-921.31 1097.3,-921.3"/>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
+<g id="call~~graph~~CallGraph_edge257" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
+<path fill="none" stroke="#000000" d="M368.54,-1151C406.44,-1151 463.7,-1151 508.08,-1151"/>
+<polygon fill="#000000" stroke="#000000" points="508.19,-1154.5 518.19,-1151 508.19,-1147.5 508.19,-1154.5"/>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
+<g id="call~~graph~~CallGraph_edge255" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
+<path fill="none" stroke="#000000" d="M368.54,-1144.06C408.3,-1137.26 469.35,-1126.82 514.48,-1119.1"/>
+<polygon fill="#000000" stroke="#000000" points="515.17,-1122.53 524.44,-1117.39 513.99,-1115.63 515.17,-1122.53"/>
 </g>
 <!-- util_append -->
-<g id="call~~graph~~CallGraph_node707" class="node">
+<g id="call~~graph~~CallGraph_node694" class="node">
 <title>util_append</title>
-<polygon fill="#777777" stroke="#777777" points="1128.5,-1216 1060.5,-1216 1060.5,-1192 1128.5,-1192 1128.5,-1216"/>
-<text text-anchor="middle" x="1094.5" y="-1201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<polygon fill="#777777" stroke="#777777" points="1128.5,-2681 1060.5,-2681 1060.5,-2657 1128.5,-2657 1128.5,-2681"/>
+<text text-anchor="middle" x="1094.5" y="-2666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </g>
 <!-- proc~rmvs_util_append_pl&#45;&gt;util_append -->
-<g id="call~~graph~~CallGraph_edge230" class="edge">
+<g id="call~~graph~~CallGraph_edge259" class="edge">
 <title>proc~rmvs_util_append_pl&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M895.79,-1340.71C916.03,-1338.35 937.9,-1332.39 954,-1319 988.39,-1290.39 955.86,-1253.91 990,-1225 1006.52,-1211.01 1029.81,-1205.46 1050.12,-1203.54"/>
-<polygon fill="#000000" stroke="#000000" points="1050.37,-1207.03 1060.11,-1202.85 1049.89,-1200.04 1050.37,-1207.03"/>
+<path fill="none" stroke="#000000" d="M895.73,-2422.6C916.58,-2424.62 938.89,-2430.79 954,-2446 1018.27,-2510.69 926.29,-2582.75 990,-2648 1005.34,-2663.71 1028.98,-2669.32 1049.8,-2670.84"/>
+<polygon fill="#000000" stroke="#000000" points="1049.91,-2674.34 1060.05,-2671.28 1050.21,-2667.35 1049.91,-2674.34"/>
 </g>
 <!-- proc~rmvs_util_append_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge232" class="edge">
+<g id="call~~graph~~CallGraph_edge258" class="edge">
 <title>proc~rmvs_util_append_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M895.78,-1342.45C916.64,-1340.43 938.94,-1334.26 954,-1319 1020.52,-1251.6 930.64,-1182.78 990,-1109 1006.45,-1088.56 1034.41,-1078 1057.13,-1072.58"/>
-<polygon fill="#000000" stroke="#000000" points="1058.1,-1075.95 1067.14,-1070.43 1056.63,-1069.1 1058.1,-1075.95"/>
+<path fill="none" stroke="#000000" d="M895.77,-2431.39C914.61,-2434.57 935.56,-2439.23 954,-2446 996.62,-2461.65 1041.38,-2489.69 1068.37,-2508.08"/>
+<polygon fill="#000000" stroke="#000000" points="1066.59,-2511.1 1076.81,-2513.91 1070.57,-2505.34 1066.59,-2511.1"/>
 </g>
-<!-- proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all -->
-<g id="call~~graph~~CallGraph_edge233" class="edge">
-<title>proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all</title>
-<path fill="none" stroke="#000000" d="M400.33,-3852C428.54,-3852 461.06,-3852 490.24,-3852"/>
-<polygon fill="#000000" stroke="#000000" points="490.41,-3855.5 500.41,-3852 490.41,-3848.5 490.41,-3855.5"/>
-</g>
-<!-- proc~util_sort_rearrange_arr_char_string -->
-<g id="call~~graph~~CallGraph_node245" class="node">
-<title>proc~util_sort_rearrange_arr_char_string</title>
-<g id="a_call~~graph~~CallGraph_node245"><a xlink:href=".././proc/util_sort_rearrange_arr_char_string.html" xlink:title="util_sort_rearrange_arr_char_string">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-9968 6,-9968 6,-9944 188,-9944 188,-9968"/>
-<text text-anchor="middle" x="97" y="-9953.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_char_string</text>
-</a>
+<!-- whm_util_append_pl -->
+<g id="call~~graph~~CallGraph_node761" class="node">
+<title>whm_util_append_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1150,-2437 1039,-2437 1039,-2413 1150,-2413 1150,-2437"/>
+<text text-anchor="middle" x="1094.5" y="-2422.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
 </g>
+<!-- proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl -->
+<g id="call~~graph~~CallGraph_edge260" class="edge">
+<title>proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl</title>
+<path fill="none" stroke="#000000" d="M895.71,-2425C934.85,-2425 987.51,-2425 1028.65,-2425"/>
+<polygon fill="#000000" stroke="#000000" points="1028.84,-2428.5 1038.84,-2425 1028.84,-2421.5 1028.84,-2428.5"/>
 </g>
-<!-- proc~rmvs_util_fill_pl -->
-<g id="call~~graph~~CallGraph_node246" class="node">
-<title>proc~rmvs_util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node246"><a xlink:href=".././proc/rmvs_util_fill_pl.html" xlink:title="rmvs_util_fill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="882,-692 797,-692 797,-668 882,-668 882,-692"/>
-<text text-anchor="middle" x="839.5" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_pl</text>
+<!-- proc~io_dump_system -->
+<g id="call~~graph~~CallGraph_node272" class="node">
+<title>proc~io_dump_system</title>
+<g id="a_call~~graph~~CallGraph_node272"><a xlink:href=".././proc/io_dump_system.html" xlink:title="io_dump_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="374,-9804 280,-9804 280,-9780 374,-9780 374,-9804"/>
+<text text-anchor="middle" x="327" y="-9789.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_system</text>
 </a>
 </g>
 </g>
-<!-- whm_util_fill_pl -->
-<g id="call~~graph~~CallGraph_node684" class="node">
-<title>whm_util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1137,-692 1052,-692 1052,-668 1137,-668 1137,-692"/>
-<text text-anchor="middle" x="1094.5" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
+<!-- dump_tp_file -->
+<g id="call~~graph~~CallGraph_node692" class="node">
+<title>dump_tp_file</title>
+<polygon fill="#777777" stroke="#777777" points="611.5,-9867 537.5,-9867 537.5,-9843 611.5,-9843 611.5,-9867"/>
+<text text-anchor="middle" x="574.5" y="-9852.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_tp_file</text>
 </g>
-<!-- proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl -->
-<g id="call~~graph~~CallGraph_edge234" class="edge">
-<title>proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M882.28,-680C925.95,-680 994.56,-680 1041.66,-680"/>
-<polygon fill="#000000" stroke="#000000" points="1041.66,-683.5 1051.66,-680 1041.66,-676.5 1041.66,-683.5"/>
+<!-- proc~io_dump_system&#45;&gt;dump_tp_file -->
+<g id="call~~graph~~CallGraph_edge261" class="edge">
+<title>proc~io_dump_system&#45;&gt;dump_tp_file</title>
+<path fill="none" stroke="#000000" d="M374.28,-9799.09C390.34,-9802.33 408.26,-9806.87 424,-9813 441.26,-9819.73 442.64,-9827.55 460,-9834 481.47,-9841.97 506.4,-9847.01 527.41,-9850.15"/>
+<polygon fill="#000000" stroke="#000000" points="526.99,-9853.62 537.38,-9851.54 527.96,-9846.69 526.99,-9853.62"/>
 </g>
-<!-- util_fill -->
-<g id="call~~graph~~CallGraph_node708" class="node">
-<title>util_fill</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-734 1067.5,-734 1067.5,-710 1121.5,-710 1121.5,-734"/>
-<text text-anchor="middle" x="1094.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+<!-- dump_param_file -->
+<g id="call~~graph~~CallGraph_node705" class="node">
+<title>dump_param_file</title>
+<polygon fill="#777777" stroke="#777777" points="622.5,-9825 526.5,-9825 526.5,-9801 622.5,-9801 622.5,-9825"/>
+<text text-anchor="middle" x="574.5" y="-9810.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_param_file</text>
 </g>
-<!-- proc~rmvs_util_fill_pl&#45;&gt;util_fill -->
-<g id="call~~graph~~CallGraph_edge235" class="edge">
-<title>proc~rmvs_util_fill_pl&#45;&gt;util_fill</title>
-<path fill="none" stroke="#000000" d="M882.28,-686.94C931.08,-695.04 1011.01,-708.31 1057.28,-715.99"/>
-<polygon fill="#000000" stroke="#000000" points="1056.74,-719.45 1067.18,-717.63 1057.89,-712.54 1056.74,-719.45"/>
+<!-- proc~io_dump_system&#45;&gt;dump_param_file -->
+<g id="call~~graph~~CallGraph_edge263" class="edge">
+<title>proc~io_dump_system&#45;&gt;dump_param_file</title>
+<path fill="none" stroke="#000000" d="M374.18,-9795.95C414.42,-9799.39 472.96,-9804.4 516.19,-9808.1"/>
+<polygon fill="#000000" stroke="#000000" points="516.01,-9811.6 526.28,-9808.96 516.61,-9804.62 516.01,-9811.6"/>
 </g>
-<!-- proc~rmvs_util_fill_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge236" class="edge">
-<title>proc~rmvs_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M882.15,-676.41C906.55,-676.74 936,-681.75 954,-701 1048.44,-801.98 912.88,-895.24 990,-1010 1005.72,-1033.39 1034.37,-1048.09 1057.55,-1056.69"/>
-<polygon fill="#000000" stroke="#000000" points="1056.5,-1060.03 1067.1,-1060.01 1058.8,-1053.42 1056.5,-1060.03"/>
+<!-- dump_cb_file -->
+<g id="call~~graph~~CallGraph_node722" class="node">
+<title>dump_cb_file</title>
+<polygon fill="#777777" stroke="#777777" points="612.5,-9783 536.5,-9783 536.5,-9759 612.5,-9759 612.5,-9783"/>
+<text text-anchor="middle" x="574.5" y="-9768.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_cb_file</text>
 </g>
-<!-- proc~rmvs_util_append_tp -->
-<g id="call~~graph~~CallGraph_node247" class="node">
-<title>proc~rmvs_util_append_tp</title>
-<g id="a_call~~graph~~CallGraph_node247"><a xlink:href=".././proc/rmvs_util_append_tp.html" xlink:title="rmvs_util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-1268 783.5,-1268 783.5,-1244 895.5,-1244 895.5,-1268"/>
-<text text-anchor="middle" x="839.5" y="-1253.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_tp</text>
-</a>
+<!-- proc~io_dump_system&#45;&gt;dump_cb_file -->
+<g id="call~~graph~~CallGraph_edge264" class="edge">
+<title>proc~io_dump_system&#45;&gt;dump_cb_file</title>
+<path fill="none" stroke="#000000" d="M374.18,-9788.05C417.64,-9784.33 482.43,-9778.79 526.24,-9775.04"/>
+<polygon fill="#000000" stroke="#000000" points="526.69,-9778.52 536.35,-9774.18 526.09,-9771.54 526.69,-9778.52"/>
 </g>
+<!-- dump_pl_file -->
+<g id="call~~graph~~CallGraph_node753" class="node">
+<title>dump_pl_file</title>
+<polygon fill="#777777" stroke="#777777" points="611,-9741 538,-9741 538,-9717 611,-9717 611,-9741"/>
+<text text-anchor="middle" x="574.5" y="-9726.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_pl_file</text>
 </g>
-<!-- proc~rmvs_util_append_tp&#45;&gt;util_append -->
-<g id="call~~graph~~CallGraph_edge237" class="edge">
-<title>proc~rmvs_util_append_tp&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M895.54,-1246.82C914.18,-1243.45 935.06,-1239.37 954,-1235 970.18,-1231.26 973.85,-1228.88 990,-1225 1009.71,-1220.27 1031.69,-1215.71 1050.31,-1212.05"/>
-<polygon fill="#000000" stroke="#000000" points="1051.12,-1215.46 1060.27,-1210.12 1049.79,-1208.59 1051.12,-1215.46"/>
+<!-- proc~io_dump_system&#45;&gt;dump_pl_file -->
+<g id="call~~graph~~CallGraph_edge262" class="edge">
+<title>proc~io_dump_system&#45;&gt;dump_pl_file</title>
+<path fill="none" stroke="#000000" d="M361.85,-9779.94C388.32,-9770.82 426.17,-9758.48 460,-9750 482.22,-9744.43 507.22,-9739.65 528.09,-9736.06"/>
+<polygon fill="#000000" stroke="#000000" points="528.7,-9739.51 537.98,-9734.4 527.54,-9732.61 528.7,-9739.51"/>
 </g>
-<!-- proc~rmvs_util_append_tp&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge239" class="edge">
-<title>proc~rmvs_util_append_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M895.55,-1257.54C916.12,-1255.34 938.28,-1249.29 954,-1235 997.1,-1195.83 951.08,-1152.33 990,-1109 1007.42,-1089.61 1035.08,-1079 1057.42,-1073.3"/>
-<polygon fill="#000000" stroke="#000000" points="1058.31,-1076.69 1067.26,-1071.01 1056.73,-1069.87 1058.31,-1076.69"/>
+<!-- proc~util_resize_encounter -->
+<g id="call~~graph~~CallGraph_node273" class="node">
+<title>proc~util_resize_encounter</title>
+<g id="a_call~~graph~~CallGraph_node273"><a xlink:href=".././proc/util_resize_encounter.html" xlink:title="util_resize_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="384.5,-9846 269.5,-9846 269.5,-9822 384.5,-9822 384.5,-9846"/>
+<text text-anchor="middle" x="327" y="-9831.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_encounter</text>
+</a>
 </g>
-<!-- util_append_tp -->
-<g id="call~~graph~~CallGraph_node763" class="node">
-<title>util_append_tp</title>
-<polygon fill="#777777" stroke="#777777" points="1136,-1142 1053,-1142 1053,-1118 1136,-1118 1136,-1142"/>
-<text text-anchor="middle" x="1094.5" y="-1127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </g>
-<!-- proc~rmvs_util_append_tp&#45;&gt;util_append_tp -->
-<g id="call~~graph~~CallGraph_edge238" class="edge">
-<title>proc~rmvs_util_append_tp&#45;&gt;util_append_tp</title>
-<path fill="none" stroke="#000000" d="M895.67,-1254.4C915.33,-1251.69 936.84,-1246.1 954,-1235 977.6,-1219.73 968.85,-1201.52 990,-1183 1007.83,-1167.38 1031.08,-1154.94 1051.02,-1146.05"/>
-<polygon fill="#000000" stroke="#000000" points="1052.41,-1149.26 1060.21,-1142.1 1049.64,-1142.83 1052.41,-1149.26"/>
+<!-- proc~util_spill_body&#45;&gt;interface~util_spill~2 -->
+<g id="call~~graph~~CallGraph_edge265" class="edge">
+<title>proc~util_spill_body&#45;&gt;interface~util_spill~2</title>
+<path fill="none" stroke="#000000" d="M879.2,-6226.06C927.59,-6229.88 1009.8,-6236.38 1057.09,-6240.12"/>
+<polygon fill="#000000" stroke="#000000" points="1056.94,-6243.62 1067.19,-6240.92 1057.5,-6236.64 1056.94,-6243.62"/>
 </g>
-<!-- proc~rmvs_util_fill_tp -->
-<g id="call~~graph~~CallGraph_node248" class="node">
-<title>proc~rmvs_util_fill_tp</title>
-<g id="a_call~~graph~~CallGraph_node248"><a xlink:href=".././proc/rmvs_util_fill_tp.html" xlink:title="rmvs_util_fill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="882.5,-734 796.5,-734 796.5,-710 882.5,-710 882.5,-734"/>
-<text text-anchor="middle" x="839.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_tp</text>
+<!-- proc~io_toupper -->
+<g id="call~~graph~~CallGraph_node276" class="node">
+<title>proc~io_toupper</title>
+<g id="a_call~~graph~~CallGraph_node276"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#d9534f" stroke="#d9534f" points="1371.5,-388 1307.5,-388 1307.5,-364 1371.5,-364 1371.5,-388"/>
+<text text-anchor="middle" x="1339.5" y="-373.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill -->
-<g id="call~~graph~~CallGraph_edge240" class="edge">
-<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill</title>
-<path fill="none" stroke="#000000" d="M882.56,-722C931.32,-722 1010.86,-722 1057.08,-722"/>
-<polygon fill="#000000" stroke="#000000" points="1057.24,-725.5 1067.24,-722 1057.24,-718.5 1057.24,-725.5"/>
+<!-- proc~util_spill_arr_dp -->
+<g id="call~~graph~~CallGraph_node277" class="node">
+<title>proc~util_spill_arr_dp</title>
+<g id="a_call~~graph~~CallGraph_node277"><a xlink:href=".././proc/util_spill_arr_dp.html" xlink:title="util_spill_arr_DP">
+<polygon fill="#d9534f" stroke="#d9534f" points="142,-9888 52,-9888 52,-9864 142,-9864 142,-9888"/>
+<text text-anchor="middle" x="97" y="-9873.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_DP</text>
+</a>
 </g>
-<!-- proc~rmvs_util_fill_tp&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge242" class="edge">
-<title>proc~rmvs_util_fill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M882.59,-718.54C906.82,-718.97 935.97,-724.06 954,-743 1036.57,-829.72 922.32,-911.22 990,-1010 1005.93,-1033.25 1034.57,-1047.96 1057.69,-1056.6"/>
-<polygon fill="#000000" stroke="#000000" points="1056.61,-1059.93 1067.2,-1059.94 1058.93,-1053.33 1056.61,-1059.93"/>
 </g>
-<!-- util_fill_tp -->
-<g id="call~~graph~~CallGraph_node746" class="node">
-<title>util_fill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="1123,-776 1066,-776 1066,-752 1123,-752 1123,-776"/>
-<text text-anchor="middle" x="1094.5" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<!-- proc~symba_collision_make_colliders_pl -->
+<g id="call~~graph~~CallGraph_node278" class="node">
+<title>proc~symba_collision_make_colliders_pl</title>
+<g id="a_call~~graph~~CallGraph_node278"><a xlink:href=".././proc/symba_collision_make_colliders_pl.html" xlink:title="symba_collision_make_colliders_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="416.5,-9930 237.5,-9930 237.5,-9906 416.5,-9906 416.5,-9930"/>
+<text text-anchor="middle" x="327" y="-9915.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_make_colliders_pl</text>
+</a>
 </g>
-<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill_tp -->
-<g id="call~~graph~~CallGraph_edge241" class="edge">
-<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill_tp</title>
-<path fill="none" stroke="#000000" d="M882.56,-728.98C930.9,-737.01 1009.5,-750.05 1055.88,-757.75"/>
-<polygon fill="#000000" stroke="#000000" points="1055.38,-761.22 1065.82,-759.41 1056.53,-754.31 1055.38,-761.22"/>
 </g>
-<!-- proc~util_sort_rearrange_arr_info -->
-<g id="call~~graph~~CallGraph_node249" class="node">
-<title>proc~util_sort_rearrange_arr_info</title>
-<g id="a_call~~graph~~CallGraph_node249"><a xlink:href=".././proc/util_sort_rearrange_arr_info.html" xlink:title="util_sort_rearrange_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="170,-10094 24,-10094 24,-10070 170,-10070 170,-10094"/>
-<text text-anchor="middle" x="97" y="-10079.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_info</text>
+<!-- interface~symba_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node279" class="node">
+<title>interface~symba_util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node279"><a xlink:href=".././interface/symba_util_sort_rearrange_pl.html" xlink:title="symba_util_sort_rearrange_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="174.5,-5290 19.5,-5290 19.5,-5266 174.5,-5266 174.5,-5290"/>
+<text text-anchor="middle" x="97" y="-5275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_copy_particle_info_arr -->
-<g id="call~~graph~~CallGraph_node428" class="node">
-<title>interface~util_copy_particle_info_arr</title>
-<g id="a_call~~graph~~CallGraph_node428"><a xlink:href=".././interface/util_copy_particle_info_arr.html" xlink:title="util_copy_particle_info_arr">
-<polygon fill="#a7506f" stroke="#a7506f" points="396,-10052 258,-10052 258,-10028 396,-10028 396,-10052"/>
-<text text-anchor="middle" x="327" y="-10037.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info_arr</text>
+<!-- interface~symba_util_sort_rearrange_pl&#45;&gt;proc~symba_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_edge266" class="edge">
+<title>interface~symba_util_sort_rearrange_pl&#45;&gt;proc~symba_util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.55,-5278C195.33,-5278 217.97,-5278 239.26,-5278"/>
+<polygon fill="#000000" stroke="#000000" points="239.26,-5281.5 249.26,-5278 239.26,-5274.5 239.26,-5281.5"/>
+</g>
+<!-- proc~util_spill_arr_dpvec -->
+<g id="call~~graph~~CallGraph_node280" class="node">
+<title>proc~util_spill_arr_dpvec</title>
+<g id="a_call~~graph~~CallGraph_node280"><a xlink:href=".././proc/util_spill_arr_dpvec.html" xlink:title="util_spill_arr_DPvec">
+<polygon fill="#d9534f" stroke="#d9534f" points="150,-9972 44,-9972 44,-9948 150,-9948 150,-9972"/>
+<text text-anchor="middle" x="97" y="-9957.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_DPvec</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
-<g id="call~~graph~~CallGraph_edge243" class="edge">
-<title>proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M163.34,-10069.96C190.64,-10064.93 222.54,-10059.06 250.82,-10053.85"/>
-<polygon fill="#000000" stroke="#000000" points="251.45,-10057.29 260.65,-10052.04 250.19,-10050.41 251.45,-10057.29"/>
+<!-- proc~io_get_args -->
+<g id="call~~graph~~CallGraph_node281" class="node">
+<title>proc~io_get_args</title>
+<g id="a_call~~graph~~CallGraph_node281"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="874,-575 805,-575 805,-551 874,-551 874,-575"/>
+<text text-anchor="middle" x="839.5" y="-560.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+</a>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
-<g id="call~~graph~~CallGraph_edge246" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M401.33,-1854.73C431.28,-1852.17 465.96,-1849.2 496.3,-1846.6"/>
-<polygon fill="#000000" stroke="#000000" points="496.75,-1850.08 506.41,-1845.74 496.15,-1843.1 496.75,-1850.08"/>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate -->
-<g id="call~~graph~~CallGraph_edge249" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate</title>
-<path fill="none" stroke="#000000" d="M344.2,-1873.01C368.26,-1890.3 415.4,-1922.07 460,-1940 472.68,-1945.1 486.57,-1949.31 500.16,-1952.76"/>
-<polygon fill="#000000" stroke="#000000" points="499.43,-1956.19 509.98,-1955.14 501.08,-1949.38 499.43,-1956.19"/>
+<!-- proc~io_get_args&#45;&gt;interface~util_version -->
+<g id="call~~graph~~CallGraph_edge267" class="edge">
+<title>proc~io_get_args&#45;&gt;interface~util_version</title>
+<path fill="none" stroke="#000000" d="M874.21,-566.52C897.16,-569.57 927.97,-574.96 954,-584 971.09,-589.94 972.96,-596.92 990,-603 1009.38,-609.92 1031.65,-614.81 1050.57,-618.11"/>
+<polygon fill="#000000" stroke="#000000" points="1050.25,-621.61 1060.69,-619.79 1051.39,-614.7 1050.25,-621.61"/>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge248" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M360.97,-1848.95C387.44,-1839.67 425.71,-1827.08 460,-1819 487.84,-1812.44 649.17,-1788.06 752.02,-1772.76"/>
-<polygon fill="#000000" stroke="#000000" points="752.71,-1776.2 762.09,-1771.27 751.69,-1769.28 752.71,-1776.2"/>
+<!-- proc~io_get_args&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge268" class="edge">
+<title>proc~io_get_args&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M874.17,-561.28C898.73,-561.77 931.51,-566.24 954,-584 979.01,-603.75 1059.04,-808.89 1085.17,-877.09"/>
+<polygon fill="#000000" stroke="#000000" points="1082.04,-878.72 1088.88,-886.81 1088.58,-876.22 1082.04,-878.72"/>
 </g>
-<!-- proc~fraggle_generate_pos_vec -->
-<g id="call~~graph~~CallGraph_node252" class="node">
-<title>proc~fraggle_generate_pos_vec</title>
-<g id="a_call~~graph~~CallGraph_node252"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="1164.5,-1926 1024.5,-1926 1024.5,-1902 1164.5,-1902 1164.5,-1926"/>
-<text text-anchor="middle" x="1094.5" y="-1911.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
+<!-- interface~io_toupper -->
+<g id="call~~graph~~CallGraph_node615" class="node">
+<title>interface~io_toupper</title>
+<g id="a_call~~graph~~CallGraph_node615"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#a7506f" stroke="#a7506f" points="1126.5,-388 1062.5,-388 1062.5,-364 1126.5,-364 1126.5,-388"/>
+<text text-anchor="middle" x="1094.5" y="-373.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec -->
-<g id="call~~graph~~CallGraph_edge245" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec</title>
-<path fill="none" stroke="#000000" d="M357.28,-1873.03C383.63,-1883.2 423.69,-1897.04 460,-1903 657.23,-1935.38 893.63,-1927.33 1014.23,-1919.94"/>
-<polygon fill="#000000" stroke="#000000" points="1014.72,-1923.42 1024.48,-1919.3 1014.28,-1916.43 1014.72,-1923.42"/>
+<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
+<g id="call~~graph~~CallGraph_edge269" class="edge">
+<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M874.08,-565.81C899.24,-566.01 932.84,-561.92 954,-542 1002.35,-496.49 942.04,-442.93 990,-397 1006.39,-381.31 1031.12,-375.88 1052.29,-374.46"/>
+<polygon fill="#000000" stroke="#000000" points="1052.5,-377.95 1062.35,-374.06 1052.22,-370.96 1052.5,-377.95"/>
 </g>
-<!-- proc~fraggle_generate_spins -->
-<g id="call~~graph~~CallGraph_node256" class="node">
-<title>proc~fraggle_generate_spins</title>
-<g id="a_call~~graph~~CallGraph_node256"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
-<polygon fill="#d9534f" stroke="#d9534f" points="637,-1772 512,-1772 512,-1748 637,-1748 637,-1772"/>
-<text text-anchor="middle" x="574.5" y="-1757.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
+<!-- interface~symba_util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_node282" class="node">
+<title>interface~symba_util_sort_rearrange_tp</title>
+<g id="a_call~~graph~~CallGraph_node282"><a xlink:href=".././interface/symba_util_sort_rearrange_tp.html" xlink:title="symba_util_sort_rearrange_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="175,-5248 19,-5248 19,-5224 175,-5224 175,-5248"/>
+<text text-anchor="middle" x="97" y="-5233.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins -->
-<g id="call~~graph~~CallGraph_edge247" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins</title>
-<path fill="none" stroke="#000000" d="M345.53,-1848.81C370.06,-1832.29 416.52,-1802.91 460,-1786 473.19,-1780.87 487.65,-1776.6 501.71,-1773.11"/>
-<polygon fill="#000000" stroke="#000000" points="502.93,-1776.41 511.85,-1770.7 501.31,-1769.6 502.93,-1776.41"/>
+<!-- interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp -->
+<g id="call~~graph~~CallGraph_edge270" class="edge">
+<title>interface~symba_util_sort_rearrange_tp&#45;&gt;proc~symba_util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M175.19,-5236C195.62,-5236 217.81,-5236 238.73,-5236"/>
+<polygon fill="#000000" stroke="#000000" points="238.89,-5239.5 248.89,-5236 238.89,-5232.5 238.89,-5239.5"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
-<g id="call~~graph~~CallGraph_node258" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_call~~graph~~CallGraph_node258"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="642,-1894 507,-1894 507,-1870 642,-1870 642,-1894"/>
-<text text-anchor="middle" x="574.5" y="-1879.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
-</a>
+<!-- util_fill -->
+<g id="call~~graph~~CallGraph_node695" class="node">
+<title>util_fill</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-2059 1067.5,-2059 1067.5,-2035 1121.5,-2035 1121.5,-2059"/>
+<text text-anchor="middle" x="1094.5" y="-2044.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </g>
+<!-- proc~rmvs_util_fill_pl&#45;&gt;util_fill -->
+<g id="call~~graph~~CallGraph_edge273" class="edge">
+<title>proc~rmvs_util_fill_pl&#45;&gt;util_fill</title>
+<path fill="none" stroke="#000000" d="M882.28,-2047C930.98,-2047 1010.67,-2047 1056.99,-2047"/>
+<polygon fill="#000000" stroke="#000000" points="1057.18,-2050.5 1067.18,-2047 1057.18,-2043.5 1057.18,-2050.5"/>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
-<g id="call~~graph~~CallGraph_edge244" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
-<path fill="none" stroke="#000000" d="M401.33,-1867.27C431.41,-1869.85 466.25,-1872.83 496.69,-1875.43"/>
-<polygon fill="#000000" stroke="#000000" points="496.57,-1878.93 506.83,-1876.3 497.16,-1871.96 496.57,-1878.93"/>
+<!-- whm_util_fill_pl -->
+<g id="call~~graph~~CallGraph_node721" class="node">
+<title>whm_util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1137,-2017 1052,-2017 1052,-1993 1137,-1993 1137,-2017"/>
+<text text-anchor="middle" x="1094.5" y="-2002.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
 </g>
-<!-- proc~rmvs_util_resize_tp -->
-<g id="call~~graph~~CallGraph_node251" class="node">
-<title>proc~rmvs_util_resize_tp</title>
-<g id="a_call~~graph~~CallGraph_node251"><a xlink:href=".././proc/rmvs_util_resize_tp.html" xlink:title="rmvs_util_resize_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="892,-5334 787,-5334 787,-5310 892,-5310 892,-5334"/>
-<text text-anchor="middle" x="839.5" y="-5319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_tp</text>
-</a>
+<!-- proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl -->
+<g id="call~~graph~~CallGraph_edge272" class="edge">
+<title>proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M882.28,-2040.06C925.95,-2032.81 994.56,-2021.43 1041.66,-2013.61"/>
+<polygon fill="#000000" stroke="#000000" points="1042.37,-2017.04 1051.66,-2011.95 1041.22,-2010.13 1042.37,-2017.04"/>
 </g>
+<!-- proc~rmvs_util_fill_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge271" class="edge">
+<title>proc~rmvs_util_fill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M860.52,-2059.03C886.9,-2076.09 932.47,-2109.94 954,-2152 1013.98,-2269.19 924.9,-2331.58 990,-2446 1005.77,-2473.71 1035.36,-2495.08 1058.88,-2508.74"/>
+<polygon fill="#000000" stroke="#000000" points="1057.44,-2511.94 1067.87,-2513.77 1060.85,-2505.83 1057.44,-2511.94"/>
 </g>
-<!-- util_resize -->
-<g id="call~~graph~~CallGraph_node694" class="node">
-<title>util_resize</title>
-<polygon fill="#777777" stroke="#777777" points="1125,-5292 1064,-5292 1064,-5268 1125,-5268 1125,-5292"/>
-<text text-anchor="middle" x="1094.5" y="-5277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<!-- proc~util_resize_body -->
+<g id="call~~graph~~CallGraph_node285" class="node">
+<title>proc~util_resize_body</title>
+<g id="a_call~~graph~~CallGraph_node285"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="884.5,-10035 794.5,-10035 794.5,-10011 884.5,-10011 884.5,-10035"/>
+<text text-anchor="middle" x="839.5" y="-10020.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+</a>
 </g>
-<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize -->
-<g id="call~~graph~~CallGraph_edge250" class="edge">
-<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize</title>
-<path fill="none" stroke="#000000" d="M892,-5313.45C939.89,-5305.5 1010.21,-5293.83 1053.86,-5286.58"/>
-<polygon fill="#000000" stroke="#000000" points="1054.52,-5290.02 1063.82,-5284.93 1053.38,-5283.11 1054.52,-5290.02"/>
 </g>
-<!-- util_resize_tp -->
-<g id="call~~graph~~CallGraph_node710" class="node">
-<title>util_resize_tp</title>
-<polygon fill="#777777" stroke="#777777" points="1132.5,-5391 1056.5,-5391 1056.5,-5367 1132.5,-5367 1132.5,-5391"/>
-<text text-anchor="middle" x="1094.5" y="-5376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<!-- interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_node366" class="node">
+<title>interface~util_resize~2</title>
+<g id="a_call~~graph~~CallGraph_node366"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="1125,-9913 1064,-9913 1064,-9889 1125,-9889 1125,-9913"/>
+<text text-anchor="middle" x="1094.5" y="-9898.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+</a>
 </g>
-<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp -->
-<g id="call~~graph~~CallGraph_edge251" class="edge">
-<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp</title>
-<path fill="none" stroke="#000000" d="M892.11,-5330.56C911.59,-5334.05 933.89,-5338.36 954,-5343 970.18,-5346.74 973.95,-5348.75 990,-5353 1008.27,-5357.83 1028.41,-5362.94 1046.03,-5367.34"/>
-<polygon fill="#000000" stroke="#000000" points="1045.53,-5370.82 1056.08,-5369.84 1047.22,-5364.03 1045.53,-5370.82"/>
 </g>
-<!-- proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
-<g id="call~~graph~~CallGraph_edge252" class="edge">
-<title>proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M1164.81,-1905.16C1188.96,-1902.08 1216.5,-1898.56 1242.43,-1895.26"/>
-<polygon fill="#000000" stroke="#000000" points="1243.18,-1898.69 1252.66,-1893.95 1242.3,-1891.74 1243.18,-1898.69"/>
+<!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge274" class="edge">
+<title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M884.58,-10016.89C906.12,-10012.92 932.07,-10006.64 954,-9997 999.66,-9976.94 1046.06,-9941.31 1072.17,-9919.55"/>
+<polygon fill="#000000" stroke="#000000" points="1074.53,-9922.14 1079.91,-9913.02 1070.01,-9916.8 1074.53,-9922.14"/>
 </g>
-<!-- proc~symba_discard_peri_pl -->
-<g id="call~~graph~~CallGraph_node253" class="node">
-<title>proc~symba_discard_peri_pl</title>
-<g id="a_call~~graph~~CallGraph_node253"><a xlink:href=".././proc/symba_discard_peri_pl.html" xlink:title="symba_discard_peri_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="158.5,-10136 35.5,-10136 35.5,-10112 158.5,-10112 158.5,-10136"/>
-<text text-anchor="middle" x="97" y="-10121.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_peri_pl</text>
-</a>
+<!-- proc~rmvs_util_append_tp&#45;&gt;util_append -->
+<g id="call~~graph~~CallGraph_edge277" class="edge">
+<title>proc~rmvs_util_append_tp&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M895.71,-2669C942.18,-2669 1007.72,-2669 1050.4,-2669"/>
+<polygon fill="#000000" stroke="#000000" points="1050.47,-2672.5 1060.47,-2669 1050.47,-2665.5 1050.47,-2672.5"/>
 </g>
+<!-- proc~rmvs_util_append_tp&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge275" class="edge">
+<title>proc~rmvs_util_append_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M895.65,-2666.34C915.1,-2663.5 936.46,-2658.1 954,-2648 975.3,-2635.73 972.18,-2622.94 990,-2606 1014.59,-2582.62 1045.74,-2559.28 1067.41,-2543.9"/>
+<polygon fill="#000000" stroke="#000000" points="1069.61,-2546.63 1075.78,-2538.01 1065.59,-2540.9 1069.61,-2546.63"/>
 </g>
-<!-- proc~util_sort_rearrange_arr_dp -->
-<g id="call~~graph~~CallGraph_node254" class="node">
-<title>proc~util_sort_rearrange_arr_dp</title>
-<g id="a_call~~graph~~CallGraph_node254"><a xlink:href=".././proc/util_sort_rearrange_arr_dp.html" xlink:title="util_sort_rearrange_arr_DP">
-<polygon fill="#d9534f" stroke="#d9534f" points="168.5,-10178 25.5,-10178 25.5,-10154 168.5,-10154 168.5,-10178"/>
-<text text-anchor="middle" x="97" y="-10163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_DP</text>
-</a>
+<!-- util_append_tp -->
+<g id="call~~graph~~CallGraph_node779" class="node">
+<title>util_append_tp</title>
+<polygon fill="#777777" stroke="#777777" points="1136,-2728 1053,-2728 1053,-2704 1136,-2704 1136,-2728"/>
+<text text-anchor="middle" x="1094.5" y="-2713.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </g>
+<!-- proc~rmvs_util_append_tp&#45;&gt;util_append_tp -->
+<g id="call~~graph~~CallGraph_edge276" class="edge">
+<title>proc~rmvs_util_append_tp&#45;&gt;util_append_tp</title>
+<path fill="none" stroke="#000000" d="M895.63,-2679.19C914.18,-2682.62 934.99,-2686.47 954,-2690 983.4,-2695.46 1016.29,-2701.59 1042.74,-2706.52"/>
+<polygon fill="#000000" stroke="#000000" points="1042.44,-2710.03 1052.91,-2708.42 1043.72,-2703.15 1042.44,-2710.03"/>
 </g>
-<!-- proc~rmvs_util_resize_pl -->
-<g id="call~~graph~~CallGraph_node255" class="node">
-<title>proc~rmvs_util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node255"><a xlink:href=".././proc/rmvs_util_resize_pl.html" xlink:title="rmvs_util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="891.5,-5250 787.5,-5250 787.5,-5226 891.5,-5226 891.5,-5250"/>
-<text text-anchor="middle" x="839.5" y="-5235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_pl</text>
+<!-- proc~io_write_discard -->
+<g id="call~~graph~~CallGraph_node287" class="node">
+<title>proc~io_write_discard</title>
+<g id="a_call~~graph~~CallGraph_node287"><a xlink:href=".././proc/io_write_discard.html" xlink:title="io_write_discard">
+<polygon fill="#d9534f" stroke="#d9534f" points="884.5,-1289 794.5,-1289 794.5,-1265 884.5,-1265 884.5,-1289"/>
+<text text-anchor="middle" x="839.5" y="-1274.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_util_resize_pl&#45;&gt;util_resize -->
-<g id="call~~graph~~CallGraph_edge253" class="edge">
-<title>proc~rmvs_util_resize_pl&#45;&gt;util_resize</title>
-<path fill="none" stroke="#000000" d="M891.7,-5246.5C939.55,-5254.44 1010.01,-5266.14 1053.76,-5273.4"/>
-<polygon fill="#000000" stroke="#000000" points="1053.3,-5276.87 1063.74,-5275.06 1054.45,-5269.97 1053.3,-5276.87"/>
-</g>
-<!-- whm_util_resize_pl -->
-<g id="call~~graph~~CallGraph_node747" class="node">
-<title>whm_util_resize_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1146,-5250 1043,-5250 1043,-5226 1146,-5226 1146,-5250"/>
-<text text-anchor="middle" x="1094.5" y="-5235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_resize_pl</text>
+<!-- proc~io_write_discard&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge278" class="edge">
+<title>proc~io_write_discard&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M884.63,-1278.63C907.62,-1277.25 934.85,-1271.83 954,-1256 1061.42,-1167.23 1086.45,-984.78 1092,-921.33"/>
+<polygon fill="#000000" stroke="#000000" points="1095.49,-921.49 1092.8,-911.24 1088.52,-920.93 1095.49,-921.49"/>
 </g>
-<!-- proc~rmvs_util_resize_pl&#45;&gt;whm_util_resize_pl -->
-<g id="call~~graph~~CallGraph_edge254" class="edge">
-<title>proc~rmvs_util_resize_pl&#45;&gt;whm_util_resize_pl</title>
-<path fill="none" stroke="#000000" d="M891.7,-5238C932.47,-5238 989.65,-5238 1032.73,-5238"/>
-<polygon fill="#000000" stroke="#000000" points="1032.81,-5241.5 1042.81,-5238 1032.81,-5234.5 1032.81,-5241.5"/>
+<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill -->
+<g id="call~~graph~~CallGraph_edge281" class="edge">
+<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill</title>
+<path fill="none" stroke="#000000" d="M882.74,-2217.45C906.42,-2216.54 934.94,-2211.32 954,-2194 997.1,-2154.83 947.24,-2107.54 990,-2068 1007.9,-2051.45 1035.12,-2046.43 1057.15,-2045.42"/>
+<polygon fill="#000000" stroke="#000000" points="1057.25,-2048.92 1067.17,-2045.21 1057.1,-2041.92 1057.25,-2048.92"/>
 </g>
-<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge255" class="edge">
-<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M637.16,-1760C671.3,-1760 714.29,-1760 751.77,-1760"/>
-<polygon fill="#000000" stroke="#000000" points="752.18,-1763.5 762.18,-1760 752.18,-1756.5 752.18,-1763.5"/>
+<!-- util_fill_tp -->
+<g id="call~~graph~~CallGraph_node702" class="node">
+<title>util_fill_tp</title>
+<polygon fill="#777777" stroke="#777777" points="1123,-2311 1066,-2311 1066,-2287 1123,-2287 1123,-2311"/>
+<text text-anchor="middle" x="1094.5" y="-2296.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </g>
-<!-- proc~util_sort_rearrange_arr_dpvec -->
-<g id="call~~graph~~CallGraph_node257" class="node">
-<title>proc~util_sort_rearrange_arr_dpvec</title>
-<g id="a_call~~graph~~CallGraph_node257"><a xlink:href=".././proc/util_sort_rearrange_arr_dpvec.html" xlink:title="util_sort_rearrange_arr_DPvec">
-<polygon fill="#d9534f" stroke="#d9534f" points="177,-10220 17,-10220 17,-10196 177,-10196 177,-10220"/>
-<text text-anchor="middle" x="97" y="-10205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_DPvec</text>
-</a>
+<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill_tp -->
+<g id="call~~graph~~CallGraph_edge280" class="edge">
+<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill_tp</title>
+<path fill="none" stroke="#000000" d="M882.73,-2216.1C905.17,-2218.28 932.47,-2223.6 954,-2236 975.3,-2248.27 968.8,-2265.55 990,-2278 1009.88,-2289.68 1035.2,-2294.95 1055.83,-2297.29"/>
+<polygon fill="#000000" stroke="#000000" points="1055.54,-2300.78 1065.83,-2298.25 1056.2,-2293.81 1055.54,-2300.78"/>
 </g>
+<!-- proc~rmvs_util_fill_tp&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge279" class="edge">
+<title>proc~rmvs_util_fill_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M882.62,-2211.78C906.72,-2212.33 935.7,-2217.46 954,-2236 1020.52,-2303.4 941.21,-2364.84 990,-2446 1006.53,-2473.49 1036.33,-2495 1059.72,-2508.76"/>
+<polygon fill="#000000" stroke="#000000" points="1058.23,-2511.94 1068.65,-2513.83 1061.68,-2505.85 1058.23,-2511.94"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="call~~graph~~CallGraph_edge257" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M642.21,-1872.36C679.37,-1866.99 725.73,-1860.29 764.06,-1854.76"/>
-<polygon fill="#000000" stroke="#000000" points="764.74,-1858.19 774.14,-1853.3 763.74,-1851.27 764.74,-1858.19"/>
+<!-- proc~util_set_mu_pl -->
+<g id="call~~graph~~CallGraph_node289" class="node">
+<title>proc~util_set_mu_pl</title>
+<g id="a_call~~graph~~CallGraph_node289"><a xlink:href=".././proc/util_set_mu_pl.html" xlink:title="util_set_mu_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="368,-10107 286,-10107 286,-10083 368,-10083 368,-10107"/>
+<text text-anchor="middle" x="327" y="-10092.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_pl</text>
+</a>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge258" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M642.13,-1880.43C658.79,-1877.3 675.68,-1871.45 689,-1861 719.67,-1836.93 694.33,-1805.07 725,-1781 733.18,-1774.58 742.71,-1769.9 752.71,-1766.51"/>
-<polygon fill="#000000" stroke="#000000" points="753.81,-1769.84 762.41,-1763.65 751.83,-1763.13 753.81,-1769.84"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj -->
-<g id="call~~graph~~CallGraph_edge259" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M642.21,-1883.01C690.19,-1883.74 753.51,-1884.71 795.08,-1885.34"/>
-<polygon fill="#000000" stroke="#000000" points="795.11,-1888.84 805.16,-1885.49 795.22,-1881.84 795.11,-1888.84"/>
+<!-- proc~symba_collision_resolve_fragmentations -->
+<g id="call~~graph~~CallGraph_node291" class="node">
+<title>proc~symba_collision_resolve_fragmentations</title>
+<g id="a_call~~graph~~CallGraph_node291"><a xlink:href=".././proc/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
+<polygon fill="#d9534f" stroke="#d9534f" points="942,-1765 737,-1765 737,-1741 942,-1741 942,-1765"/>
+<text text-anchor="middle" x="839.5" y="-1750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
+</a>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
-<g id="call~~graph~~CallGraph_edge256" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M642.11,-1876.84C658.14,-1873.7 674.74,-1868.75 689,-1861 709.44,-1849.89 704.56,-1834.11 725,-1823 741.49,-1814.04 761.11,-1808.83 779.35,-1805.81"/>
-<polygon fill="#000000" stroke="#000000" points="779.93,-1809.27 789.32,-1804.36 778.92,-1802.34 779.93,-1809.27"/>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node260" class="node">
-<title>proc~rmvs_util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node260"><a xlink:href=".././proc/rmvs_util_sort_rearrange_pl.html" xlink:title="rmvs_util_sort_rearrange_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="400.5,-4032 253.5,-4032 253.5,-4008 400.5,-4008 400.5,-4032"/>
-<text text-anchor="middle" x="327" y="-4017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_pl</text>
+<!-- interface~symba_collision_casedisruption -->
+<g id="call~~graph~~CallGraph_node405" class="node">
+<title>interface~symba_collision_casedisruption</title>
+<g id="a_call~~graph~~CallGraph_node405"><a xlink:href=".././interface/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<polygon fill="#a7506f" stroke="#a7506f" points="1176,-1849 1013,-1849 1013,-1825 1176,-1825 1176,-1849"/>
+<text text-anchor="middle" x="1094.5" y="-1834.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
 </a>
 </g>
 </g>
-<!-- util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node723" class="node">
-<title>util_sort_rearrange_pl</title>
-<polygon fill="#777777" stroke="#777777" points="633.5,-4038 515.5,-4038 515.5,-4014 633.5,-4014 633.5,-4038"/>
-<text text-anchor="middle" x="574.5" y="-4023.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
+<g id="call~~graph~~CallGraph_edge285" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
+<path fill="none" stroke="#000000" d="M864.81,-1765.02C893.93,-1779 944.52,-1801.96 990,-1816 997.87,-1818.43 1006.16,-1820.65 1014.49,-1822.67"/>
+<polygon fill="#000000" stroke="#000000" points="1013.73,-1826.08 1024.26,-1824.94 1015.31,-1819.27 1013.73,-1826.08"/>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_edge260" class="edge">
-<title>proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" d="M400.66,-4021.78C433.71,-4022.58 472.59,-4023.53 505.11,-4024.33"/>
-<polygon fill="#000000" stroke="#000000" points="505.34,-4027.84 515.43,-4024.58 505.51,-4020.84 505.34,-4027.84"/>
+<!-- interface~symba_collision_casehitandrun -->
+<g id="call~~graph~~CallGraph_node406" class="node">
+<title>interface~symba_collision_casehitandrun</title>
+<g id="a_call~~graph~~CallGraph_node406"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#a7506f" stroke="#a7506f" points="1175,-1807 1014,-1807 1014,-1783 1175,-1783 1175,-1807"/>
+<text text-anchor="middle" x="1094.5" y="-1792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+</a>
 </g>
-<!-- util_sort_rearrange -->
-<g id="call~~graph~~CallGraph_node741" class="node">
-<title>util_sort_rearrange</title>
-<polygon fill="#777777" stroke="#777777" points="626,-4080 523,-4080 523,-4056 626,-4056 626,-4080"/>
-<text text-anchor="middle" x="574.5" y="-4065.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange -->
-<g id="call~~graph~~CallGraph_edge261" class="edge">
-<title>proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M385.78,-4032.06C408.85,-4036.82 435.66,-4042.26 460,-4047 477.18,-4050.35 495.85,-4053.85 513,-4057.02"/>
-<polygon fill="#000000" stroke="#000000" points="512.42,-4060.48 522.89,-4058.85 513.69,-4053.59 512.42,-4060.48"/>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
+<g id="call~~graph~~CallGraph_edge288" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
+<path fill="none" stroke="#000000" d="M913,-1765.04C943.57,-1770.11 979.31,-1776.04 1010.89,-1781.29"/>
+<polygon fill="#000000" stroke="#000000" points="1010.55,-1784.78 1020.99,-1782.96 1011.7,-1777.87 1010.55,-1784.78"/>
 </g>
-<!-- proc~util_sort_rearrange_arr_i4b -->
-<g id="call~~graph~~CallGraph_node261" class="node">
-<title>proc~util_sort_rearrange_arr_i4b</title>
-<g id="a_call~~graph~~CallGraph_node261"><a xlink:href=".././proc/util_sort_rearrange_arr_i4b.html" xlink:title="util_sort_rearrange_arr_I4B">
-<polygon fill="#d9534f" stroke="#d9534f" points="169.5,-10262 24.5,-10262 24.5,-10238 169.5,-10238 169.5,-10262"/>
-<text text-anchor="middle" x="97" y="-10247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_I4B</text>
+<!-- interface~symba_collision_casemerge -->
+<g id="call~~graph~~CallGraph_node407" class="node">
+<title>interface~symba_collision_casemerge</title>
+<g id="a_call~~graph~~CallGraph_node407"><a xlink:href=".././interface/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<polygon fill="#a7506f" stroke="#a7506f" points="1168,-1765 1021,-1765 1021,-1741 1168,-1741 1168,-1765"/>
+<text text-anchor="middle" x="1094.5" y="-1750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_util_sort_pl -->
-<g id="call~~graph~~CallGraph_node262" class="node">
-<title>proc~rmvs_util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node262"><a xlink:href=".././proc/rmvs_util_sort_pl.html" xlink:title="rmvs_util_sort_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="374,-10304 280,-10304 280,-10280 374,-10280 374,-10304"/>
-<text text-anchor="middle" x="327" y="-10289.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_pl</text>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge -->
+<g id="call~~graph~~CallGraph_edge287" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge</title>
+<path fill="none" stroke="#000000" d="M942.31,-1753C964.95,-1753 988.69,-1753 1010.47,-1753"/>
+<polygon fill="#000000" stroke="#000000" points="1010.66,-1756.5 1020.66,-1753 1010.66,-1749.5 1010.66,-1756.5"/>
+</g>
+<!-- proc~symba_collision_consolidate_colliders -->
+<g id="call~~graph~~CallGraph_node549" class="node">
+<title>proc~symba_collision_consolidate_colliders</title>
+<g id="a_call~~graph~~CallGraph_node549"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1191,-1723 998,-1723 998,-1699 1191,-1699 1191,-1723"/>
+<text text-anchor="middle" x="1094.5" y="-1708.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
 </a>
 </g>
 </g>
-<!-- whm_util_sort_pl -->
-<g id="call~~graph~~CallGraph_node692" class="node">
-<title>whm_util_sort_pl</title>
-<polygon fill="#777777" stroke="#777777" points="621,-10304 528,-10304 528,-10280 621,-10280 621,-10304"/>
-<text text-anchor="middle" x="574.5" y="-10289.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_pl</text>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders -->
+<g id="call~~graph~~CallGraph_edge286" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders</title>
+<path fill="none" stroke="#000000" d="M913,-1740.96C943.57,-1735.89 979.31,-1729.96 1010.89,-1724.71"/>
+<polygon fill="#000000" stroke="#000000" points="1011.7,-1728.13 1020.99,-1723.04 1010.55,-1721.22 1011.7,-1728.13"/>
 </g>
-<!-- proc~rmvs_util_sort_pl&#45;&gt;whm_util_sort_pl -->
-<g id="call~~graph~~CallGraph_edge262" class="edge">
-<title>proc~rmvs_util_sort_pl&#45;&gt;whm_util_sort_pl</title>
-<path fill="none" stroke="#000000" d="M374.18,-10292C414.94,-10292 474.46,-10292 517.84,-10292"/>
-<polygon fill="#000000" stroke="#000000" points="517.95,-10295.5 527.95,-10292 517.95,-10288.5 517.95,-10295.5"/>
+<!-- idx2 -->
+<g id="call~~graph~~CallGraph_node697" class="node">
+<title>idx2</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-1681 1067.5,-1681 1067.5,-1657 1121.5,-1657 1121.5,-1681"/>
+<text text-anchor="middle" x="1094.5" y="-1666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
 </g>
-<!-- proc~util_sort_rearrange_arr_logical -->
-<g id="call~~graph~~CallGraph_node263" class="node">
-<title>proc~util_sort_rearrange_arr_logical</title>
-<g id="a_call~~graph~~CallGraph_node263"><a xlink:href=".././proc/util_sort_rearrange_arr_logical.html" xlink:title="util_sort_rearrange_arr_logical">
-<polygon fill="#d9534f" stroke="#d9534f" points="176.5,-10346 17.5,-10346 17.5,-10322 176.5,-10322 176.5,-10346"/>
-<text text-anchor="middle" x="97" y="-10331.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_logical</text>
-</a>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx2 -->
+<g id="call~~graph~~CallGraph_edge282" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx2</title>
+<path fill="none" stroke="#000000" d="M919.92,-1740.98C931.77,-1737.45 943.52,-1732.89 954,-1727 974,-1715.76 969.86,-1700.99 990,-1690 1010.65,-1678.73 1036.6,-1673.48 1057.36,-1671.05"/>
+<polygon fill="#000000" stroke="#000000" points="1057.78,-1674.52 1067.38,-1670.04 1057.08,-1667.56 1057.78,-1674.52"/>
 </g>
+<!-- idx1 -->
+<g id="call~~graph~~CallGraph_node714" class="node">
+<title>idx1</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-1639 1067.5,-1639 1067.5,-1615 1121.5,-1615 1121.5,-1639"/>
+<text text-anchor="middle" x="1094.5" y="-1624.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx1</text>
 </g>
-<!-- proc~rmvs_util_sort_tp -->
-<g id="call~~graph~~CallGraph_node264" class="node">
-<title>proc~rmvs_util_sort_tp</title>
-<g id="a_call~~graph~~CallGraph_node264"><a xlink:href=".././proc/rmvs_util_sort_tp.html" xlink:title="rmvs_util_sort_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="374,-5656 280,-5656 280,-5632 374,-5632 374,-5656"/>
-<text text-anchor="middle" x="327" y="-5641.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_tp</text>
-</a>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx1 -->
+<g id="call~~graph~~CallGraph_edge284" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx1</title>
+<path fill="none" stroke="#000000" d="M930.06,-1740.96C938.69,-1737.38 946.87,-1732.81 954,-1727 983.9,-1702.61 959.8,-1672.01 990,-1648 1008.87,-1633 1035.66,-1627.87 1057.26,-1626.42"/>
+<polygon fill="#000000" stroke="#000000" points="1057.54,-1629.91 1067.38,-1625.98 1057.24,-1622.92 1057.54,-1629.91"/>
 </g>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge283" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M856.97,-1765.11C883.01,-1785.35 932.87,-1828.8 954,-1879 1002.97,-1995.37 930.79,-2334.49 990,-2446 1005.02,-2474.28 1034.88,-2495.68 1058.69,-2509.19"/>
+<polygon fill="#000000" stroke="#000000" points="1057.02,-2512.27 1067.48,-2513.98 1060.37,-2506.12 1057.02,-2512.27"/>
 </g>
-<!-- util_sort_tp -->
-<g id="call~~graph~~CallGraph_node718" class="node">
-<title>util_sort_tp</title>
-<polygon fill="#777777" stroke="#777777" points="607,-5677 542,-5677 542,-5653 607,-5653 607,-5677"/>
-<text text-anchor="middle" x="574.5" y="-5662.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+<!-- proc~util_set_ir3h -->
+<g id="call~~graph~~CallGraph_node293" class="node">
+<title>proc~util_set_ir3h</title>
+<g id="a_call~~graph~~CallGraph_node293"><a xlink:href=".././proc/util_set_ir3h.html" xlink:title="util_set_ir3h">
+<polygon fill="#d9534f" stroke="#d9534f" points="362,-10149 292,-10149 292,-10125 362,-10125 362,-10149"/>
+<text text-anchor="middle" x="327" y="-10134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_ir3h</text>
+</a>
 </g>
-<!-- proc~rmvs_util_sort_tp&#45;&gt;util_sort_tp -->
-<g id="call~~graph~~CallGraph_edge263" class="edge">
-<title>proc~rmvs_util_sort_tp&#45;&gt;util_sort_tp</title>
-<path fill="none" stroke="#000000" d="M374.18,-5647.95C419.57,-5651.83 488.22,-5657.71 531.95,-5661.45"/>
-<polygon fill="#000000" stroke="#000000" points="531.69,-5664.94 541.96,-5662.3 532.29,-5657.96 531.69,-5664.94"/>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_node265" class="node">
-<title>proc~rmvs_util_sort_rearrange_tp</title>
-<g id="a_call~~graph~~CallGraph_node265"><a xlink:href=".././proc/rmvs_util_sort_rearrange_tp.html" xlink:title="rmvs_util_sort_rearrange_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="401,-4158 253,-4158 253,-4134 401,-4134 401,-4158"/>
-<text text-anchor="middle" x="327" y="-4143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_tp</text>
+<!-- interface~symba_util_append_encounter -->
+<g id="call~~graph~~CallGraph_node294" class="node">
+<title>interface~symba_util_append_encounter</title>
+<g id="a_call~~graph~~CallGraph_node294"><a xlink:href=".././interface/symba_util_append_encounter.html" xlink:title="symba_util_append_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="654.5,-2887 494.5,-2887 494.5,-2863 654.5,-2863 654.5,-2887"/>
+<text text-anchor="middle" x="574.5" y="-2872.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_encounter</text>
 </a>
 </g>
 </g>
-<!-- util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_node713" class="node">
-<title>util_sort_rearrange_tp</title>
-<polygon fill="#777777" stroke="#777777" points="633.5,-4179 515.5,-4179 515.5,-4155 633.5,-4155 633.5,-4179"/>
-<text text-anchor="middle" x="574.5" y="-4164.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
-</g>
-<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_edge264" class="edge">
-<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" d="M401.33,-4152.27C434.22,-4155.09 472.8,-4158.39 505.09,-4161.15"/>
-<polygon fill="#000000" stroke="#000000" points="505.07,-4164.66 515.34,-4162.02 505.67,-4157.69 505.07,-4164.66"/>
-</g>
-<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange -->
-<g id="call~~graph~~CallGraph_edge265" class="edge">
-<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M399.06,-4133.93C407.64,-4131.46 416.13,-4128.52 424,-4125 442.02,-4116.94 442.19,-4107.51 460,-4099 476.48,-4091.12 495.3,-4084.96 512.82,-4080.28"/>
-<polygon fill="#000000" stroke="#000000" points="514.12,-4083.56 522.95,-4077.7 512.39,-4076.78 514.12,-4083.56"/>
-</g>
-<!-- interface~rmvs_chk_ind -->
-<g id="call~~graph~~CallGraph_node625" class="node">
-<title>interface~rmvs_chk_ind</title>
-<g id="a_call~~graph~~CallGraph_node625"><a xlink:href=".././interface/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#a7506f" stroke="#a7506f" points="614,-4473 535,-4473 535,-4449 614,-4449 614,-4473"/>
-<text text-anchor="middle" x="574.5" y="-4458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
+<!-- proc~symba_util_append_encounter -->
+<g id="call~~graph~~CallGraph_node495" class="node">
+<title>proc~symba_util_append_encounter</title>
+<g id="a_call~~graph~~CallGraph_node495"><a xlink:href=".././proc/symba_util_append_encounter.html" xlink:title="symba_util_append_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="919.5,-2887 759.5,-2887 759.5,-2863 919.5,-2863 919.5,-2887"/>
+<text text-anchor="middle" x="839.5" y="-2872.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind -->
-<g id="call~~graph~~CallGraph_edge266" class="edge">
-<title>proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M405,-4475.41C444.13,-4472.07 490.48,-4468.1 524.66,-4465.18"/>
-<polygon fill="#000000" stroke="#000000" points="525.19,-4468.65 534.86,-4464.31 524.59,-4461.67 525.19,-4468.65"/>
-</g>
-<!-- helio_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node719" class="node">
-<title>helio_setup_initialize_system</title>
-<polygon fill="#777777" stroke="#777777" points="650,-4788 499,-4788 499,-4764 650,-4764 650,-4788"/>
-<text text-anchor="middle" x="574.5" y="-4773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup_initialize_system</text>
-</g>
-<!-- proc~symba_setup_initialize_system&#45;&gt;helio_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge267" class="edge">
-<title>proc~symba_setup_initialize_system&#45;&gt;helio_setup_initialize_system</title>
-<path fill="none" stroke="#000000" d="M407.03,-4776C433.13,-4776 462.27,-4776 488.78,-4776"/>
-<polygon fill="#000000" stroke="#000000" points="488.8,-4779.5 498.8,-4776 488.8,-4772.5 488.8,-4779.5"/>
-</g>
-<!-- setup_pl -->
-<g id="call~~graph~~CallGraph_node750" class="node">
-<title>setup_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-4872 1067.5,-4872 1067.5,-4848 1121.5,-4848 1121.5,-4872"/>
-<text text-anchor="middle" x="1094.5" y="-4857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
-</g>
-<!-- proc~whm_setup_pl&#45;&gt;setup_pl -->
-<g id="call~~graph~~CallGraph_edge268" class="edge">
-<title>proc~whm_setup_pl&#45;&gt;setup_pl</title>
-<path fill="none" stroke="#000000" d="M880.59,-4860C929.17,-4860 1010.31,-4860 1057.14,-4860"/>
-<polygon fill="#000000" stroke="#000000" points="1057.15,-4863.5 1067.15,-4860 1057.15,-4856.5 1057.15,-4863.5"/>
+<!-- interface~symba_util_append_encounter&#45;&gt;proc~symba_util_append_encounter -->
+<g id="call~~graph~~CallGraph_edge289" class="edge">
+<title>interface~symba_util_append_encounter&#45;&gt;proc~symba_util_append_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.77,-2875C684.52,-2875 718.55,-2875 749.16,-2875"/>
+<polygon fill="#000000" stroke="#000000" points="749.4,-2878.5 759.4,-2875 749.4,-2871.5 749.4,-2878.5"/>
 </g>
-<!-- proc~tides_derivs_init -->
-<g id="call~~graph~~CallGraph_node269" class="node">
-<title>proc~tides_derivs_init</title>
-<g id="a_call~~graph~~CallGraph_node269"><a xlink:href=".././proc/tides_derivs_init.html" xlink:title="tides_derivs_init">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="371.5,-10388 282.5,-10388 282.5,-10364 371.5,-10364 371.5,-10388"/>
-<text text-anchor="middle" x="327" y="-10373.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_derivs_init</text>
+<!-- proc~util_set_msys -->
+<g id="call~~graph~~CallGraph_node295" class="node">
+<title>proc~util_set_msys</title>
+<g id="a_call~~graph~~CallGraph_node295"><a xlink:href=".././proc/util_set_msys.html" xlink:title="util_set_msys">
+<polygon fill="#d9534f" stroke="#d9534f" points="365.5,-10191 288.5,-10191 288.5,-10167 365.5,-10167 365.5,-10191"/>
+<text text-anchor="middle" x="327" y="-10176.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_msys</text>
 </a>
 </g>
 </g>
-<!-- util_set_ir3h -->
-<g id="call~~graph~~CallGraph_node712" class="node">
-<title>util_set_ir3h</title>
-<polygon fill="#777777" stroke="#777777" points="609.5,-7702 539.5,-7702 539.5,-7678 609.5,-7678 609.5,-7702"/>
-<text text-anchor="middle" x="574.5" y="-7687.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_ir3h</text>
-</g>
-<!-- proc~whm_setup_initialize_system&#45;&gt;util_set_ir3h -->
-<g id="call~~graph~~CallGraph_edge269" class="edge">
-<title>proc~whm_setup_initialize_system&#45;&gt;util_set_ir3h</title>
-<path fill="none" stroke="#000000" d="M402.66,-7675.39C444.13,-7678.93 494.3,-7683.23 529.51,-7686.24"/>
-<polygon fill="#000000" stroke="#000000" points="529.21,-7689.72 539.47,-7687.09 529.81,-7682.75 529.21,-7689.72"/>
-</g>
-<!-- setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node760" class="node">
-<title>setup_initialize_system</title>
-<polygon fill="#777777" stroke="#777777" points="635.5,-7660 513.5,-7660 513.5,-7636 635.5,-7636 635.5,-7660"/>
-<text text-anchor="middle" x="574.5" y="-7645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_system</text>
-</g>
-<!-- proc~whm_setup_initialize_system&#45;&gt;setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge270" class="edge">
-<title>proc~whm_setup_initialize_system&#45;&gt;setup_initialize_system</title>
-<path fill="none" stroke="#000000" d="M402.66,-7662.61C434.61,-7659.88 471.72,-7656.71 503.18,-7654.02"/>
-<polygon fill="#000000" stroke="#000000" points="503.52,-7657.5 513.18,-7653.16 502.92,-7650.52 503.52,-7657.5"/>
-</g>
-<!-- util_set_mu_pl -->
-<g id="call~~graph~~CallGraph_node753" class="node">
-<title>util_set_mu_pl</title>
-<polygon fill="#777777" stroke="#777777" points="615.5,-7891 533.5,-7891 533.5,-7867 615.5,-7867 615.5,-7891"/>
-<text text-anchor="middle" x="574.5" y="-7876.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_pl</text>
-</g>
-<!-- proc~whm_util_set_mu_eta_pl&#45;&gt;util_set_mu_pl -->
-<g id="call~~graph~~CallGraph_edge271" class="edge">
-<title>proc~whm_util_set_mu_eta_pl&#45;&gt;util_set_mu_pl</title>
-<path fill="none" stroke="#000000" d="M392.5,-7879C433.28,-7879 485.22,-7879 522.99,-7879"/>
-<polygon fill="#000000" stroke="#000000" points="523.24,-7882.5 533.24,-7879 523.24,-7875.5 523.24,-7882.5"/>
-</g>
-<!-- proc~whm_util_append_pl&#45;&gt;util_append -->
-<g id="call~~graph~~CallGraph_edge272" class="edge">
-<title>proc~whm_util_append_pl&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M895.07,-1090.58C914.67,-1093.39 936.29,-1098.8 954,-1109 975.3,-1121.27 970.69,-1135.78 990,-1151 1009.16,-1166.11 1033.3,-1178.76 1053.44,-1187.91"/>
-<polygon fill="#000000" stroke="#000000" points="1052.11,-1191.16 1062.68,-1192 1054.94,-1184.75 1052.11,-1191.16"/>
-</g>
-<!-- util_append_pl -->
-<g id="call~~graph~~CallGraph_node730" class="node">
-<title>util_append_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1135.5,-1001 1053.5,-1001 1053.5,-977 1135.5,-977 1135.5,-1001"/>
-<text text-anchor="middle" x="1094.5" y="-986.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
-</g>
-<!-- proc~whm_util_append_pl&#45;&gt;util_append_pl -->
-<g id="call~~graph~~CallGraph_edge274" class="edge">
-<title>proc~whm_util_append_pl&#45;&gt;util_append_pl</title>
-<path fill="none" stroke="#000000" d="M895.22,-1081.78C914.21,-1078.61 935.4,-1073.91 954,-1067 971.36,-1060.55 973.89,-1055.14 990,-1046 1014.14,-1032.31 1041.67,-1017.18 1062.27,-1005.94"/>
-<polygon fill="#000000" stroke="#000000" points="1064.1,-1008.93 1071.2,-1001.07 1060.75,-1002.78 1064.1,-1008.93"/>
-</g>
-<!-- proc~whm_util_append_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge273" class="edge">
-<title>proc~whm_util_append_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M895.09,-1083.47C944.1,-1079.4 1014.68,-1073.54 1057.12,-1070.02"/>
-<polygon fill="#000000" stroke="#000000" points="1057.59,-1073.49 1067.27,-1069.18 1057.01,-1066.52 1057.59,-1073.49"/>
-</g>
-<!-- proc~whm_util_resize_pl&#45;&gt;util_resize -->
-<g id="call~~graph~~CallGraph_edge275" class="edge">
-<title>proc~whm_util_resize_pl&#45;&gt;util_resize</title>
-<path fill="none" stroke="#000000" d="M891.09,-5280C939.02,-5280 1010.01,-5280 1053.93,-5280"/>
-<polygon fill="#000000" stroke="#000000" points="1053.95,-5283.5 1063.95,-5280 1053.95,-5276.5 1053.95,-5283.5"/>
-</g>
-<!-- util_resize_pl -->
-<g id="call~~graph~~CallGraph_node722" class="node">
-<title>util_resize_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1132,-5344 1057,-5344 1057,-5320 1132,-5320 1132,-5344"/>
-<text text-anchor="middle" x="1094.5" y="-5329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
-</g>
-<!-- proc~whm_util_resize_pl&#45;&gt;util_resize_pl -->
-<g id="call~~graph~~CallGraph_edge276" class="edge">
-<title>proc~whm_util_resize_pl&#45;&gt;util_resize_pl</title>
-<path fill="none" stroke="#000000" d="M891.14,-5288.97C910.8,-5292.56 933.48,-5296.82 954,-5301 985.04,-5307.32 1019.82,-5315.05 1046.89,-5321.21"/>
-<polygon fill="#000000" stroke="#000000" points="1046.33,-5324.67 1056.86,-5323.48 1047.89,-5317.84 1046.33,-5324.67"/>
-</g>
-<!-- util_fill_pl -->
-<g id="call~~graph~~CallGraph_node701" class="node">
-<title>util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1122.5,-860 1066.5,-860 1066.5,-836 1122.5,-836 1122.5,-860"/>
-<text text-anchor="middle" x="1094.5" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
-</g>
-<!-- proc~whm_util_fill_pl&#45;&gt;util_fill_pl -->
-<g id="call~~graph~~CallGraph_edge277" class="edge">
-<title>proc~whm_util_fill_pl&#45;&gt;util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M882.28,-812.94C930.82,-820.99 1010.16,-834.16 1056.54,-841.86"/>
-<polygon fill="#000000" stroke="#000000" points="1056.03,-845.33 1066.47,-843.51 1057.18,-838.42 1056.03,-845.33"/>
+<!-- proc~util_resize_tp -->
+<g id="call~~graph~~CallGraph_node296" class="node">
+<title>proc~util_resize_tp</title>
+<g id="a_call~~graph~~CallGraph_node296"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="365,-10014 289,-10014 289,-9990 365,-9990 365,-10014"/>
+<text text-anchor="middle" x="327" y="-9999.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+</a>
 </g>
-<!-- proc~whm_util_fill_pl&#45;&gt;util_fill -->
-<g id="call~~graph~~CallGraph_edge278" class="edge">
-<title>proc~whm_util_fill_pl&#45;&gt;util_fill</title>
-<path fill="none" stroke="#000000" d="M882.19,-804.95C904.72,-802.8 932.29,-797.5 954,-785 975.3,-772.73 968.8,-755.45 990,-743 1010.29,-731.08 1036.24,-725.84 1057.08,-723.57"/>
-<polygon fill="#000000" stroke="#000000" points="1057.51,-727.04 1067.16,-722.65 1056.88,-720.07 1057.51,-727.04"/>
 </g>
-<!-- proc~whm_util_fill_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge279" class="edge">
-<title>proc~whm_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M882.18,-802.94C906.27,-803.51 935.4,-808.61 954,-827 1012.94,-885.28 941.11,-943.06 990,-1010 1006.52,-1032.61 1034.84,-1047.32 1057.69,-1056.12"/>
-<polygon fill="#000000" stroke="#000000" points="1056.51,-1059.41 1067.1,-1059.53 1058.89,-1052.83 1056.51,-1059.41"/>
-</g>
-<!-- proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_edge280" class="edge">
-<title>proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" d="M400.33,-4051.39C433.53,-4046.53 472.68,-4040.78 505.35,-4035.99"/>
-<polygon fill="#000000" stroke="#000000" points="505.88,-4039.45 515.27,-4034.54 504.87,-4032.53 505.88,-4039.45"/>
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge290" class="edge">
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M365.11,-10001.51C481.98,-9999.68 841.3,-9991.87 954,-9964 993.92,-9954.13 1036.55,-9933.17 1064.03,-9918.14"/>
+<polygon fill="#000000" stroke="#000000" points="1066.06,-9921.02 1073.09,-9913.09 1062.65,-9914.9 1066.06,-9921.02"/>
 </g>
-<!-- proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange -->
-<g id="call~~graph~~CallGraph_edge281" class="edge">
-<title>proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M400.33,-4063.77C435.96,-4064.64 478.46,-4065.68 512.43,-4066.51"/>
-<polygon fill="#000000" stroke="#000000" points="512.61,-4070.01 522.69,-4066.76 512.78,-4063.01 512.61,-4070.01"/>
+<!-- interface~util_resize_body -->
+<g id="call~~graph~~CallGraph_node503" class="node">
+<title>interface~util_resize_body</title>
+<g id="a_call~~graph~~CallGraph_node503"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="619.5,-10035 529.5,-10035 529.5,-10011 619.5,-10011 619.5,-10035"/>
+<text text-anchor="middle" x="574.5" y="-10020.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+</a>
 </g>
-<!-- util_sort_pl -->
-<g id="call~~graph~~CallGraph_node765" class="node">
-<title>util_sort_pl</title>
-<polygon fill="#777777" stroke="#777777" points="606.5,-5551 542.5,-5551 542.5,-5527 606.5,-5527 606.5,-5551"/>
-<text text-anchor="middle" x="574.5" y="-5536.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </g>
-<!-- proc~whm_util_sort_pl&#45;&gt;util_sort_pl -->
-<g id="call~~graph~~CallGraph_edge282" class="edge">
-<title>proc~whm_util_sort_pl&#45;&gt;util_sort_pl</title>
-<path fill="none" stroke="#000000" d="M373.6,-5521.9C419.05,-5525.79 488.21,-5531.7 532.12,-5535.46"/>
-<polygon fill="#000000" stroke="#000000" points="531.9,-5538.95 542.16,-5536.32 532.5,-5531.98 531.9,-5538.95"/>
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
+<g id="call~~graph~~CallGraph_edge291" class="edge">
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M365.02,-10005.17C405.95,-10008.67 472.29,-10014.34 519.12,-10018.35"/>
+<polygon fill="#000000" stroke="#000000" points="518.84,-10021.84 529.1,-10019.2 519.43,-10014.86 518.84,-10021.84"/>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_spill -->
-<g id="call~~graph~~CallGraph_edge283" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_spill</title>
-<path fill="none" stroke="#000000" d="M886.02,-1506.2C935.02,-1504.26 1011.97,-1501.22 1057.11,-1499.44"/>
-<polygon fill="#000000" stroke="#000000" points="1057.46,-1502.93 1067.32,-1499.03 1057.19,-1495.93 1057.46,-1502.93"/>
+<!-- interface~symba_util_append_merger -->
+<g id="call~~graph~~CallGraph_node297" class="node">
+<title>interface~symba_util_append_merger</title>
+<g id="a_call~~graph~~CallGraph_node297"><a xlink:href=".././interface/symba_util_append_merger.html" xlink:title="symba_util_append_merger">
+<polygon fill="#a7506f" stroke="#a7506f" points="170,-2807 24,-2807 24,-2783 170,-2783 170,-2807"/>
+<text text-anchor="middle" x="97" y="-2792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_merger</text>
+</a>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge285" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M886.24,-1511.63C909.85,-1510.87 937.15,-1505.4 954,-1487 1010.98,-1424.77 939.6,-1176.67 990,-1109 1005.84,-1087.73 1034.29,-1077.2 1057.36,-1072"/>
-<polygon fill="#000000" stroke="#000000" points="1058.08,-1075.43 1067.19,-1070.03 1056.7,-1068.57 1058.08,-1075.43"/>
 </g>
-<!-- util_spill_pl -->
-<g id="call~~graph~~CallGraph_node756" class="node">
-<title>util_spill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1126.5,-1594 1062.5,-1594 1062.5,-1570 1126.5,-1570 1126.5,-1594"/>
-<text text-anchor="middle" x="1094.5" y="-1579.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<!-- proc~symba_util_append_merger -->
+<g id="call~~graph~~CallGraph_node496" class="node">
+<title>proc~symba_util_append_merger</title>
+<g id="a_call~~graph~~CallGraph_node496"><a xlink:href=".././proc/symba_util_append_merger.html" xlink:title="symba_util_append_merger">
+<polygon fill="#d9534f" stroke="#d9534f" points="400,-2807 254,-2807 254,-2783 400,-2783 400,-2807"/>
+<text text-anchor="middle" x="327" y="-2792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_merger</text>
+</a>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_spill_pl -->
-<g id="call~~graph~~CallGraph_edge284" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_spill_pl</title>
-<path fill="none" stroke="#000000" d="M886.19,-1510.78C907.64,-1513.47 933.03,-1518.74 954,-1529 973.23,-1538.4 970.85,-1551.43 990,-1561 1009.19,-1570.59 1032.45,-1575.8 1052.06,-1578.63"/>
-<polygon fill="#000000" stroke="#000000" points="1051.86,-1582.13 1062.23,-1579.94 1052.76,-1575.19 1051.86,-1582.13"/>
 </g>
-<!-- proc~symba_setup_pl&#45;&gt;setup_pl -->
-<g id="call~~graph~~CallGraph_edge286" class="edge">
-<title>proc~symba_setup_pl&#45;&gt;setup_pl</title>
-<path fill="none" stroke="#000000" d="M885.15,-4894.59C934.24,-4886.44 1012.15,-4873.51 1057.49,-4865.98"/>
-<polygon fill="#000000" stroke="#000000" points="1058.18,-4869.41 1067.47,-4864.32 1057.03,-4862.51 1058.18,-4869.41"/>
-</g>
-<!-- proc~symba_setup_merger&#45;&gt;interface~symba_setup_pl -->
-<g id="call~~graph~~CallGraph_edge287" class="edge">
-<title>proc~symba_setup_merger&#45;&gt;interface~symba_setup_pl</title>
-<path fill="none" stroke="#000000" d="M385.56,-4902C425.84,-4902 479.33,-4902 518.94,-4902"/>
-<polygon fill="#000000" stroke="#000000" points="518.95,-4905.5 528.95,-4902 518.95,-4898.5 518.95,-4905.5"/>
+<!-- interface~symba_util_append_merger&#45;&gt;proc~symba_util_append_merger -->
+<g id="call~~graph~~CallGraph_edge292" class="edge">
+<title>interface~symba_util_append_merger&#45;&gt;proc~symba_util_append_merger</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-2795C193.54,-2795 219.68,-2795 243.76,-2795"/>
+<polygon fill="#000000" stroke="#000000" points="243.94,-2798.5 253.94,-2795 243.94,-2791.5 243.94,-2798.5"/>
 </g>
-<!-- proc~operator_cross_sp -->
-<g id="call~~graph~~CallGraph_node283" class="node">
-<title>proc~operator_cross_sp</title>
-<g id="a_call~~graph~~CallGraph_node283"><a xlink:href=".././proc/operator_cross_sp.html" xlink:title="operator_cross_sp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="148,-10430 46,-10430 46,-10406 148,-10406 148,-10430"/>
-<text text-anchor="middle" x="97" y="-10415.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_sp</text>
+<!-- proc~util_spill_arr_i4b -->
+<g id="call~~graph~~CallGraph_node298" class="node">
+<title>proc~util_spill_arr_i4b</title>
+<g id="a_call~~graph~~CallGraph_node298"><a xlink:href=".././proc/util_spill_arr_i4b.html" xlink:title="util_spill_arr_I4B">
+<polygon fill="#d9534f" stroke="#d9534f" points="142.5,-10233 51.5,-10233 51.5,-10209 142.5,-10209 142.5,-10233"/>
+<text text-anchor="middle" x="97" y="-10218.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_I4B</text>
 </a>
 </g>
 </g>
-<!-- setup_encounter -->
-<g id="call~~graph~~CallGraph_node732" class="node">
-<title>setup_encounter</title>
-<polygon fill="#777777" stroke="#777777" points="621,-4956 528,-4956 528,-4932 621,-4932 621,-4956"/>
-<text text-anchor="middle" x="574.5" y="-4941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_encounter</text>
-</g>
-<!-- proc~symba_setup_encounter&#45;&gt;setup_encounter -->
-<g id="call~~graph~~CallGraph_edge288" class="edge">
-<title>proc~symba_setup_encounter&#45;&gt;setup_encounter</title>
-<path fill="none" stroke="#000000" d="M392.18,-4944C431.14,-4944 480.38,-4944 517.71,-4944"/>
-<polygon fill="#000000" stroke="#000000" points="517.91,-4947.5 527.91,-4944 517.91,-4940.5 517.91,-4947.5"/>
-</g>
-<!-- proc~symba_setup_tp&#45;&gt;setup_tp -->
-<g id="call~~graph~~CallGraph_edge289" class="edge">
-<title>proc~symba_setup_tp&#45;&gt;setup_tp</title>
-<path fill="none" stroke="#000000" d="M372.74,-5024.17C419.89,-5020.14 493.25,-5013.86 537.02,-5010.12"/>
-<polygon fill="#000000" stroke="#000000" points="537.54,-5013.59 547.21,-5009.25 536.95,-5006.61 537.54,-5013.59"/>
+<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp -->
+<g id="call~~graph~~CallGraph_edge293" class="edge">
+<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp</title>
+<path fill="none" stroke="#000000" d="M892.2,-4922.45C911.59,-4918.86 933.8,-4914.75 954,-4911 984.82,-4905.28 1019.47,-4898.82 1046.52,-4893.77"/>
+<polygon fill="#000000" stroke="#000000" points="1047.31,-4897.19 1056.49,-4891.91 1046.02,-4890.3 1047.31,-4897.19"/>
 </g>
-<!-- proc~operator_cross_dp -->
-<g id="call~~graph~~CallGraph_node286" class="node">
-<title>proc~operator_cross_dp</title>
-<g id="a_call~~graph~~CallGraph_node286"><a xlink:href=".././proc/operator_cross_dp.html" xlink:title="operator_cross_dp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="148.5,-10472 45.5,-10472 45.5,-10448 148.5,-10448 148.5,-10472"/>
-<text text-anchor="middle" x="97" y="-10457.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_dp</text>
-</a>
+<!-- util_resize -->
+<g id="call~~graph~~CallGraph_node739" class="node">
+<title>util_resize</title>
+<polygon fill="#777777" stroke="#777777" points="1125,-4944 1064,-4944 1064,-4920 1125,-4920 1125,-4944"/>
+<text text-anchor="middle" x="1094.5" y="-4929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </g>
+<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize -->
+<g id="call~~graph~~CallGraph_edge294" class="edge">
+<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize</title>
+<path fill="none" stroke="#000000" d="M892,-4932C939.79,-4932 1009.92,-4932 1053.58,-4932"/>
+<polygon fill="#000000" stroke="#000000" points="1053.82,-4935.5 1063.82,-4932 1053.82,-4928.5 1053.82,-4935.5"/>
 </g>
-<!-- proc~operator_cross_i1b -->
-<g id="call~~graph~~CallGraph_node287" class="node">
-<title>proc~operator_cross_i1b</title>
-<g id="a_call~~graph~~CallGraph_node287"><a xlink:href=".././proc/operator_cross_i1b.html" xlink:title="operator_cross_i1b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-10514 44.5,-10514 44.5,-10490 149.5,-10490 149.5,-10514"/>
-<text text-anchor="middle" x="97" y="-10499.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i1b</text>
+<!-- interface~symba_util_append_pl -->
+<g id="call~~graph~~CallGraph_node300" class="node">
+<title>interface~symba_util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node300"><a xlink:href=".././interface/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="634.5,-2807 514.5,-2807 514.5,-2783 634.5,-2783 634.5,-2807"/>
+<text text-anchor="middle" x="574.5" y="-2792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~operator_cross_qp -->
-<g id="call~~graph~~CallGraph_node288" class="node">
-<title>proc~operator_cross_qp</title>
-<g id="a_call~~graph~~CallGraph_node288"><a xlink:href=".././proc/operator_cross_qp.html" xlink:title="operator_cross_qp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="148.5,-10556 45.5,-10556 45.5,-10532 148.5,-10532 148.5,-10556"/>
-<text text-anchor="middle" x="97" y="-10541.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_qp</text>
+<!-- proc~symba_util_append_pl -->
+<g id="call~~graph~~CallGraph_node492" class="node">
+<title>proc~symba_util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node492"><a xlink:href=".././proc/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="899.5,-2807 779.5,-2807 779.5,-2783 899.5,-2783 899.5,-2807"/>
+<text text-anchor="middle" x="839.5" y="-2792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- kick_getacch_int_all_pl -->
-<g id="call~~graph~~CallGraph_node738" class="node">
-<title>kick_getacch_int_all_pl</title>
-<polygon fill="#777777" stroke="#777777" points="635.5,-4662 513.5,-4662 513.5,-4638 635.5,-4638 635.5,-4662"/>
-<text text-anchor="middle" x="574.5" y="-4647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_pl</text>
-</g>
-<!-- proc~symba_kick_getacch_int_pl&#45;&gt;kick_getacch_int_all_pl -->
-<g id="call~~graph~~CallGraph_edge290" class="edge">
-<title>proc~symba_kick_getacch_int_pl&#45;&gt;kick_getacch_int_all_pl</title>
-<path fill="none" stroke="#000000" d="M398.68,-4650C431.4,-4650 470.18,-4650 502.89,-4650"/>
-<polygon fill="#000000" stroke="#000000" points="503.29,-4653.5 513.29,-4650 503.29,-4646.5 503.29,-4653.5"/>
-</g>
-<!-- proc~operator_cross_i2b -->
-<g id="call~~graph~~CallGraph_node290" class="node">
-<title>proc~operator_cross_i2b</title>
-<g id="a_call~~graph~~CallGraph_node290"><a xlink:href=".././proc/operator_cross_i2b.html" xlink:title="operator_cross_i2b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-10598 44.5,-10598 44.5,-10574 149.5,-10574 149.5,-10598"/>
-<text text-anchor="middle" x="97" y="-10583.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i2b</text>
-</a>
-</g>
+<!-- interface~symba_util_append_pl&#45;&gt;proc~symba_util_append_pl -->
+<g id="call~~graph~~CallGraph_edge295" class="edge">
+<title>interface~symba_util_append_pl&#45;&gt;proc~symba_util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M634.52,-2795C674.4,-2795 727.2,-2795 769.09,-2795"/>
+<polygon fill="#000000" stroke="#000000" points="769.22,-2798.5 779.22,-2795 769.22,-2791.5 769.22,-2798.5"/>
 </g>
-<!-- proc~obl_pot_system -->
-<g id="call~~graph~~CallGraph_node291" class="node">
-<title>proc~obl_pot_system</title>
-<g id="a_call~~graph~~CallGraph_node291"><a xlink:href=".././proc/obl_pot_system.html" xlink:title="obl_pot_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="371,-10640 283,-10640 283,-10616 371,-10616 371,-10640"/>
-<text text-anchor="middle" x="327" y="-10625.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_pot_system</text>
+<!-- interface~symba_util_append_tp -->
+<g id="call~~graph~~CallGraph_node301" class="node">
+<title>interface~symba_util_append_tp</title>
+<g id="a_call~~graph~~CallGraph_node301"><a xlink:href=".././interface/symba_util_append_tp.html" xlink:title="symba_util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="635,-2765 514,-2765 514,-2741 635,-2741 635,-2765"/>
+<text text-anchor="middle" x="574.5" y="-2750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~obl_pot_one -->
-<g id="call~~graph~~CallGraph_node309" class="node">
-<title>proc~obl_pot_one</title>
-<g id="a_call~~graph~~CallGraph_node309"><a xlink:href=".././proc/obl_pot_one.html" xlink:title="obl_pot_one">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="610.5,-10640 538.5,-10640 538.5,-10616 610.5,-10616 610.5,-10640"/>
-<text text-anchor="middle" x="574.5" y="-10625.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_pot_one</text>
+<!-- proc~symba_util_append_tp -->
+<g id="call~~graph~~CallGraph_node502" class="node">
+<title>proc~symba_util_append_tp</title>
+<g id="a_call~~graph~~CallGraph_node502"><a xlink:href=".././proc/symba_util_append_tp.html" xlink:title="symba_util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="900,-2765 779,-2765 779,-2741 900,-2741 900,-2765"/>
+<text text-anchor="middle" x="839.5" y="-2750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~obl_pot_system&#45;&gt;proc~obl_pot_one -->
-<g id="call~~graph~~CallGraph_edge291" class="edge">
-<title>proc~obl_pot_system&#45;&gt;proc~obl_pot_one</title>
-<path fill="none" stroke="#000000" d="M371.04,-10628C415.19,-10628 483.56,-10628 528.42,-10628"/>
-<polygon fill="#000000" stroke="#000000" points="528.46,-10631.5 538.46,-10628 528.46,-10624.5 528.46,-10631.5"/>
-</g>
-<!-- helio_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node726" class="node">
-<title>helio_kick_getacch_tp</title>
-<polygon fill="#777777" stroke="#777777" points="633.5,-4704 515.5,-4704 515.5,-4680 633.5,-4680 633.5,-4704"/>
-<text text-anchor="middle" x="574.5" y="-4689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_tp</text>
+<!-- interface~symba_util_append_tp&#45;&gt;proc~symba_util_append_tp -->
+<g id="call~~graph~~CallGraph_edge296" class="edge">
+<title>interface~symba_util_append_tp&#45;&gt;proc~symba_util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.18,-2753C674.8,-2753 726.97,-2753 768.55,-2753"/>
+<polygon fill="#000000" stroke="#000000" points="768.6,-2756.5 778.6,-2753 768.6,-2749.5 768.6,-2756.5"/>
 </g>
-<!-- proc~symba_kick_getacch_tp&#45;&gt;helio_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge292" class="edge">
-<title>proc~symba_kick_getacch_tp&#45;&gt;helio_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" d="M390.59,-4692C425.5,-4692 469.03,-4692 504.87,-4692"/>
-<polygon fill="#000000" stroke="#000000" points="505.24,-4695.5 515.24,-4692 505.24,-4688.5 505.24,-4695.5"/>
+<!-- interface~symba_util_copy_encounter -->
+<g id="call~~graph~~CallGraph_node302" class="node">
+<title>interface~symba_util_copy_encounter</title>
+<g id="a_call~~graph~~CallGraph_node302"><a xlink:href=".././interface/symba_util_copy_encounter.html" xlink:title="symba_util_copy_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="170,-10275 24,-10275 24,-10251 170,-10251 170,-10275"/>
+<text text-anchor="middle" x="97" y="-10260.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_copy_encounter</text>
+</a>
 </g>
-<!-- helio_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node693" class="node">
-<title>helio_kick_getacch_pl</title>
-<polygon fill="#777777" stroke="#777777" points="633,-4620 516,-4620 516,-4596 633,-4596 633,-4620"/>
-<text text-anchor="middle" x="574.5" y="-4605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_pl</text>
 </g>
-<!-- proc~symba_kick_getacch_pl&#45;&gt;helio_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_edge294" class="edge">
-<title>proc~symba_kick_getacch_pl&#45;&gt;helio_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" d="M390.27,-4608C425.43,-4608 469.43,-4608 505.5,-4608"/>
-<polygon fill="#000000" stroke="#000000" points="505.93,-4611.5 515.93,-4608 505.93,-4604.5 505.93,-4611.5"/>
+<!-- proc~symba_util_copy_encounter -->
+<g id="call~~graph~~CallGraph_node508" class="node">
+<title>proc~symba_util_copy_encounter</title>
+<g id="a_call~~graph~~CallGraph_node508"><a xlink:href=".././proc/symba_util_copy_encounter.html" xlink:title="symba_util_copy_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="400,-10275 254,-10275 254,-10251 400,-10251 400,-10275"/>
+<text text-anchor="middle" x="327" y="-10260.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_copy_encounter</text>
+</a>
 </g>
-<!-- proc~symba_kick_getacch_pl&#45;&gt;kick_getacch_int_all_pl -->
-<g id="call~~graph~~CallGraph_edge293" class="edge">
-<title>proc~symba_kick_getacch_pl&#45;&gt;kick_getacch_int_all_pl</title>
-<path fill="none" stroke="#000000" d="M390.27,-4618.65C424.81,-4624.56 467.86,-4631.93 503.56,-4638.03"/>
-<polygon fill="#000000" stroke="#000000" points="502.97,-4641.48 513.42,-4639.72 504.15,-4634.58 502.97,-4641.48"/>
 </g>
-<!-- proc~operator_cross_i4b -->
-<g id="call~~graph~~CallGraph_node294" class="node">
-<title>proc~operator_cross_i4b</title>
-<g id="a_call~~graph~~CallGraph_node294"><a xlink:href=".././proc/operator_cross_i4b.html" xlink:title="operator_cross_i4b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-10682 44.5,-10682 44.5,-10658 149.5,-10658 149.5,-10682"/>
-<text text-anchor="middle" x="97" y="-10667.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i4b</text>
-</a>
+<!-- interface~symba_util_copy_encounter&#45;&gt;proc~symba_util_copy_encounter -->
+<g id="call~~graph~~CallGraph_edge297" class="edge">
+<title>interface~symba_util_copy_encounter&#45;&gt;proc~symba_util_copy_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-10263C193.54,-10263 219.68,-10263 243.76,-10263"/>
+<polygon fill="#000000" stroke="#000000" points="243.94,-10266.5 253.94,-10263 243.94,-10259.5 243.94,-10266.5"/>
 </g>
+<!-- proc~rmvs_util_resize_pl&#45;&gt;util_resize -->
+<g id="call~~graph~~CallGraph_edge298" class="edge">
+<title>proc~rmvs_util_resize_pl&#45;&gt;util_resize</title>
+<path fill="none" stroke="#000000" d="M891.7,-4965.5C939.55,-4957.56 1010.01,-4945.86 1053.76,-4938.6"/>
+<polygon fill="#000000" stroke="#000000" points="1054.45,-4942.03 1063.74,-4936.94 1053.3,-4935.13 1054.45,-4942.03"/>
 </g>
-<!-- proc~operator_cross_i8b -->
-<g id="call~~graph~~CallGraph_node296" class="node">
-<title>proc~operator_cross_i8b</title>
-<g id="a_call~~graph~~CallGraph_node296"><a xlink:href=".././proc/operator_cross_i8b.html" xlink:title="operator_cross_i8b">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-10724 44.5,-10724 44.5,-10700 149.5,-10700 149.5,-10724"/>
-<text text-anchor="middle" x="97" y="-10709.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i8b</text>
-</a>
+<!-- whm_util_resize_pl -->
+<g id="call~~graph~~CallGraph_node757" class="node">
+<title>whm_util_resize_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1146,-4986 1043,-4986 1043,-4962 1146,-4962 1146,-4986"/>
+<text text-anchor="middle" x="1094.5" y="-4971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_resize_pl</text>
 </g>
+<!-- proc~rmvs_util_resize_pl&#45;&gt;whm_util_resize_pl -->
+<g id="call~~graph~~CallGraph_edge299" class="edge">
+<title>proc~rmvs_util_resize_pl&#45;&gt;whm_util_resize_pl</title>
+<path fill="none" stroke="#000000" d="M891.7,-4974C932.47,-4974 989.65,-4974 1032.73,-4974"/>
+<polygon fill="#000000" stroke="#000000" points="1032.81,-4977.5 1042.81,-4974 1032.81,-4970.5 1032.81,-4977.5"/>
 </g>
-<!-- proc~operator_cross_el_sp -->
-<g id="call~~graph~~CallGraph_node297" class="node">
-<title>proc~operator_cross_el_sp</title>
-<g id="a_call~~graph~~CallGraph_node297"><a xlink:href=".././proc/operator_cross_el_sp.html" xlink:title="operator_cross_el_sp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="155,-10766 39,-10766 39,-10742 155,-10742 155,-10766"/>
-<text text-anchor="middle" x="97" y="-10751.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_sp</text>
+<!-- proc~util_set_mu_tp -->
+<g id="call~~graph~~CallGraph_node304" class="node">
+<title>proc~util_set_mu_tp</title>
+<g id="a_call~~graph~~CallGraph_node304"><a xlink:href=".././proc/util_set_mu_tp.html" xlink:title="util_set_mu_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="368,-10317 286,-10317 286,-10293 368,-10293 368,-10317"/>
+<text text-anchor="middle" x="327" y="-10302.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~operator_cross_el_dp -->
-<g id="call~~graph~~CallGraph_node298" class="node">
-<title>proc~operator_cross_el_dp</title>
-<g id="a_call~~graph~~CallGraph_node298"><a xlink:href=".././proc/operator_cross_el_dp.html" xlink:title="operator_cross_el_dp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="155.5,-10808 38.5,-10808 38.5,-10784 155.5,-10784 155.5,-10808"/>
-<text text-anchor="middle" x="97" y="-10793.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_dp</text>
+<!-- proc~util_resize_pl -->
+<g id="call~~graph~~CallGraph_node305" class="node">
+<title>proc~util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node305"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="364.5,-10065 289.5,-10065 289.5,-10041 364.5,-10041 364.5,-10065"/>
+<text text-anchor="middle" x="327" y="-10050.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_collider_message -->
-<g id="call~~graph~~CallGraph_node299" class="node">
-<title>proc~symba_collision_collider_message</title>
-<g id="a_call~~graph~~CallGraph_node299"><a xlink:href=".././proc/symba_collision_collider_message.html" xlink:title="symba_collision_collider_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="1657,-367 1480,-367 1480,-343 1657,-343 1657,-367"/>
-<text text-anchor="middle" x="1568.5" y="-352.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_collider_message</text>
-</a>
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge300" class="edge">
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M364.58,-10061.75C464.22,-10083.67 746.81,-10133.09 954,-10044 1012.87,-10018.69 1059.43,-9955.43 1080.78,-9922.18"/>
+<polygon fill="#000000" stroke="#000000" points="1084.01,-9923.61 1086.36,-9913.27 1078.08,-9919.89 1084.01,-9923.61"/>
 </g>
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
+<g id="call~~graph~~CallGraph_edge301" class="edge">
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M364.75,-10048.51C405.75,-10043.5 472.48,-10035.35 519.43,-10029.61"/>
+<polygon fill="#000000" stroke="#000000" points="519.93,-10033.07 529.43,-10028.39 519.08,-10026.12 519.93,-10033.07"/>
 </g>
-<!-- proc~setup_construct_system -->
-<g id="call~~graph~~CallGraph_node300" class="node">
-<title>proc~setup_construct_system</title>
-<g id="a_call~~graph~~CallGraph_node300"><a xlink:href=".././proc/setup_construct_system.html" xlink:title="setup_construct_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="903.5,-2902 775.5,-2902 775.5,-2878 903.5,-2878 903.5,-2902"/>
-<text text-anchor="middle" x="839.5" y="-2887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<!-- proc~util_index_eucl_ij_to_k -->
+<g id="call~~graph~~CallGraph_node306" class="node">
+<title>proc~util_index_eucl_ij_to_k</title>
+<g id="a_call~~graph~~CallGraph_node306"><a xlink:href=".././proc/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#d9534f" stroke="#d9534f" points="899.5,-10359 779.5,-10359 779.5,-10335 899.5,-10335 899.5,-10359"/>
+<text text-anchor="middle" x="839.5" y="-10344.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
 </a>
 </g>
 </g>
-<!-- proc~setup_construct_system&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge295" class="edge">
-<title>proc~setup_construct_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M903.69,-2879.51C952.19,-2871.46 1017.42,-2860.63 1057.41,-2853.99"/>
-<polygon fill="#000000" stroke="#000000" points="1058.2,-2857.41 1067.5,-2852.32 1057.06,-2850.5 1058.2,-2857.41"/>
+<!-- proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_edge302" class="edge">
+<title>proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" d="M400.66,-5360.52C433.71,-5359.85 472.59,-5359.06 505.11,-5358.39"/>
+<polygon fill="#000000" stroke="#000000" points="505.5,-5361.89 515.43,-5358.18 505.36,-5354.89 505.5,-5361.89"/>
 </g>
-<!-- proc~symba_util_append_arr_kin -->
-<g id="call~~graph~~CallGraph_node301" class="node">
-<title>proc~symba_util_append_arr_kin</title>
-<g id="a_call~~graph~~CallGraph_node301"><a xlink:href=".././proc/symba_util_append_arr_kin.html" xlink:title="symba_util_append_arr_kin">
-<polygon fill="#d9534f" stroke="#d9534f" points="912,-5460 767,-5460 767,-5436 912,-5436 912,-5460"/>
-<text text-anchor="middle" x="839.5" y="-5445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_arr_kin</text>
-</a>
+<!-- util_sort_rearrange -->
+<g id="call~~graph~~CallGraph_node765" class="node">
+<title>util_sort_rearrange</title>
+<polygon fill="#777777" stroke="#777777" points="626,-5411 523,-5411 523,-5387 626,-5387 626,-5411"/>
+<text text-anchor="middle" x="574.5" y="-5396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </g>
+<!-- proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange -->
+<g id="call~~graph~~CallGraph_edge303" class="edge">
+<title>proc~rmvs_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M400.66,-5372.95C436.28,-5378.32 478.7,-5384.71 512.59,-5389.82"/>
+<polygon fill="#000000" stroke="#000000" points="512.41,-5393.33 522.82,-5391.36 513.46,-5386.41 512.41,-5393.33"/>
 </g>
-<!-- proc~symba_util_append_arr_kin&#45;&gt;interface~util_resize -->
-<g id="call~~graph~~CallGraph_edge296" class="edge">
-<title>proc~symba_util_append_arr_kin&#45;&gt;interface~util_resize</title>
-<path fill="none" stroke="#000000" d="M912.32,-5446.3C958.13,-5445.21 1015.77,-5443.84 1053.58,-5442.95"/>
-<polygon fill="#000000" stroke="#000000" points="1053.78,-5446.44 1063.69,-5442.71 1053.61,-5439.45 1053.78,-5446.44"/>
+<!-- proc~util_spill_arr_i8b -->
+<g id="call~~graph~~CallGraph_node309" class="node">
+<title>proc~util_spill_arr_i8b</title>
+<g id="a_call~~graph~~CallGraph_node309"><a xlink:href=".././proc/util_spill_arr_i8b.html" xlink:title="util_spill_arr_I8B">
+<polygon fill="#d9534f" stroke="#d9534f" points="142.5,-10401 51.5,-10401 51.5,-10377 142.5,-10377 142.5,-10401"/>
+<text text-anchor="middle" x="97" y="-10386.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_I8B</text>
+</a>
 </g>
-<!-- proc~symba_util_resize_merger&#45;&gt;interface~symba_util_resize_pl -->
-<g id="call~~graph~~CallGraph_edge297" class="edge">
-<title>proc~symba_util_resize_merger&#45;&gt;interface~symba_util_resize_pl</title>
-<path fill="none" stroke="#000000" d="M345.46,-5446.73C369.91,-5430.13 416.27,-5400.81 460,-5385 475.29,-5379.47 492.3,-5375.34 508.39,-5372.27"/>
-<polygon fill="#000000" stroke="#000000" points="509.05,-5375.71 518.27,-5370.49 507.81,-5368.82 509.05,-5375.71"/>
 </g>
-<!-- proc~symba_util_resize_merger&#45;&gt;interface~util_resize -->
-<g id="call~~graph~~CallGraph_edge298" class="edge">
-<title>proc~symba_util_resize_merger&#45;&gt;interface~util_resize</title>
-<path fill="none" stroke="#000000" d="M396.75,-5465.09C512.19,-5474.2 752.21,-5488.35 954,-5469 987.97,-5465.74 1025.96,-5458.12 1053.7,-5451.81"/>
-<polygon fill="#000000" stroke="#000000" points="1054.86,-5455.13 1063.81,-5449.46 1053.27,-5448.31 1054.86,-5455.13"/>
+<!-- proc~io_write_encounter -->
+<g id="call~~graph~~CallGraph_node310" class="node">
+<title>proc~io_write_encounter</title>
+<g id="a_call~~graph~~CallGraph_node310"><a xlink:href=".././proc/io_write_encounter.html" xlink:title="io_write_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="891,-533 788,-533 788,-509 891,-509 891,-533"/>
+<text text-anchor="middle" x="839.5" y="-518.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
+</a>
 </g>
-<!-- proc~symba_util_append_pl&#45;&gt;interface~util_append -->
-<g id="call~~graph~~CallGraph_edge299" class="edge">
-<title>proc~symba_util_append_pl&#45;&gt;interface~util_append</title>
-<path fill="none" stroke="#000000" d="M899.82,-923.55C946,-920.08 1009.01,-915.34 1050.45,-912.23"/>
-<polygon fill="#000000" stroke="#000000" points="1050.79,-915.72 1060.5,-911.48 1050.26,-908.74 1050.79,-915.72"/>
 </g>
-<!-- proc~symba_util_append_pl&#45;&gt;util_append_pl -->
-<g id="call~~graph~~CallGraph_edge300" class="edge">
-<title>proc~symba_util_append_pl&#45;&gt;util_append_pl</title>
-<path fill="none" stroke="#000000" d="M893.96,-940.01C912.94,-944.33 934.44,-949.31 954,-954 983.71,-961.13 1016.89,-969.44 1043.44,-976.17"/>
-<polygon fill="#000000" stroke="#000000" points="1042.71,-979.6 1053.26,-978.67 1044.43,-972.82 1042.71,-979.6"/>
+<!-- proc~io_write_encounter&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge305" class="edge">
+<title>proc~io_write_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M891.09,-519.54C912.68,-521.44 936.81,-527.26 954,-542 990.81,-573.56 972.84,-599.64 990,-645 1022.91,-732 1065.86,-834.12 1084.36,-877.63"/>
+<polygon fill="#000000" stroke="#000000" points="1081.18,-879.1 1088.32,-886.93 1087.62,-876.35 1081.18,-879.1"/>
 </g>
-<!-- proc~symba_util_append_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge301" class="edge">
-<title>proc~symba_util_append_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M899.77,-932.76C918.4,-936.47 938.2,-942.9 954,-954 978.21,-971.01 968.38,-989.8 990,-1010 1009.76,-1028.46 1036.61,-1043.02 1058.01,-1052.8"/>
-<polygon fill="#000000" stroke="#000000" points="1056.85,-1056.12 1067.41,-1056.96 1059.68,-1049.72 1056.85,-1056.12"/>
+<!-- ind2 -->
+<g id="call~~graph~~CallGraph_node701" class="node">
+<title>ind2</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-594 1067.5,-594 1067.5,-570 1121.5,-570 1121.5,-594"/>
+<text text-anchor="middle" x="1094.5" y="-579.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ind2</text>
 </g>
-<!-- proc~symba_util_append_encounter&#45;&gt;interface~util_append -->
-<g id="call~~graph~~CallGraph_edge302" class="edge">
-<title>proc~symba_util_append_encounter&#45;&gt;interface~util_append</title>
-<path fill="none" stroke="#000000" d="M919.54,-597.6C932.5,-601.26 944.7,-607.31 954,-617 1032.34,-698.63 919.57,-780.46 990,-869 1004.7,-887.48 1029.05,-897.43 1050.45,-902.79"/>
-<polygon fill="#000000" stroke="#000000" points="1049.81,-906.24 1060.34,-905 1051.34,-899.4 1049.81,-906.24"/>
+<!-- proc~io_write_encounter&#45;&gt;ind2 -->
+<g id="call~~graph~~CallGraph_edge306" class="edge">
+<title>proc~io_write_encounter&#45;&gt;ind2</title>
+<path fill="none" stroke="#000000" d="M891.07,-527C911.03,-530.23 933.93,-535.03 954,-542 971.09,-547.94 972.96,-554.92 990,-561 1011.76,-568.77 1037.18,-573.98 1057.38,-577.27"/>
+<polygon fill="#000000" stroke="#000000" points="1057.01,-580.75 1067.43,-578.81 1058.07,-573.83 1057.01,-580.75"/>
 </g>
-<!-- util_append_encounter -->
-<g id="call~~graph~~CallGraph_node691" class="node">
-<title>util_append_encounter</title>
-<polygon fill="#777777" stroke="#777777" points="1155.5,-608 1033.5,-608 1033.5,-584 1155.5,-584 1155.5,-608"/>
-<text text-anchor="middle" x="1094.5" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
+<!-- ind1 -->
+<g id="call~~graph~~CallGraph_node768" class="node">
+<title>ind1</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-552 1067.5,-552 1067.5,-528 1121.5,-528 1121.5,-552"/>
+<text text-anchor="middle" x="1094.5" y="-537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ind1</text>
 </g>
-<!-- proc~symba_util_append_encounter&#45;&gt;util_append_encounter -->
-<g id="call~~graph~~CallGraph_edge303" class="edge">
-<title>proc~symba_util_append_encounter&#45;&gt;util_append_encounter</title>
-<path fill="none" stroke="#000000" d="M919.51,-596C952.61,-596 990.78,-596 1022.93,-596"/>
-<polygon fill="#000000" stroke="#000000" points="1023.14,-599.5 1033.14,-596 1023.14,-592.5 1023.14,-599.5"/>
+<!-- proc~io_write_encounter&#45;&gt;ind1 -->
+<g id="call~~graph~~CallGraph_edge304" class="edge">
+<title>proc~io_write_encounter&#45;&gt;ind1</title>
+<path fill="none" stroke="#000000" d="M891.09,-524.8C940.25,-528.49 1013.67,-534.01 1057.26,-537.28"/>
+<polygon fill="#000000" stroke="#000000" points="1057.17,-540.78 1067.4,-538.04 1057.69,-533.8 1057.17,-540.78"/>
 </g>
-<!-- proc~symba_collision_check_one -->
-<g id="call~~graph~~CallGraph_node319" class="node">
-<title>proc~symba_collision_check_one</title>
-<g id="a_call~~graph~~CallGraph_node319"><a xlink:href=".././proc/symba_collision_check_one.html" xlink:title="symba_collision_check_one">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1641,-597 1496,-597 1496,-573 1641,-573 1641,-597"/>
-<text text-anchor="middle" x="1568.5" y="-582.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_one</text>
+<!-- proc~util_index_eucl_plpl -->
+<g id="call~~graph~~CallGraph_node311" class="node">
+<title>proc~util_index_eucl_plpl</title>
+<g id="a_call~~graph~~CallGraph_node311"><a xlink:href=".././proc/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-10359 274,-10359 274,-10335 380,-10335 380,-10359"/>
+<text text-anchor="middle" x="327" y="-10344.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one -->
-<g id="call~~graph~~CallGraph_edge305" class="edge">
-<title>proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one</title>
-<path fill="none" stroke="#000000" d="M1427.29,-585C1446.49,-585 1466.78,-585 1485.77,-585"/>
-<polygon fill="#000000" stroke="#000000" points="1485.87,-588.5 1495.87,-585 1485.87,-581.5 1485.87,-588.5"/>
+<!-- interface~util_index_eucl_ij_to_k -->
+<g id="call~~graph~~CallGraph_node561" class="node">
+<title>interface~util_index_eucl_ij_to_k</title>
+<g id="a_call~~graph~~CallGraph_node561"><a xlink:href=".././interface/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#a7506f" stroke="#a7506f" points="634.5,-10359 514.5,-10359 514.5,-10335 634.5,-10335 634.5,-10359"/>
+<text text-anchor="middle" x="574.5" y="-10344.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</a>
 </g>
-<!-- proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge304" class="edge">
-<title>proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M1358.81,-572.82C1379.78,-558.71 1414.98,-534.5 1444,-512 1481.17,-483.19 1522.44,-447.25 1546.61,-425.77"/>
-<polygon fill="#000000" stroke="#000000" points="1548.99,-428.33 1554.13,-419.06 1544.33,-423.11 1548.99,-428.33"/>
 </g>
-<!-- proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl -->
+<!-- proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k -->
 <g id="call~~graph~~CallGraph_edge307" class="edge">
-<title>proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl</title>
-<path fill="none" stroke="#000000" d="M400.33,-928C433.13,-928 471.74,-928 504.17,-928"/>
-<polygon fill="#000000" stroke="#000000" points="504.47,-931.5 514.47,-928 504.47,-924.5 504.47,-931.5"/>
+<title>proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M380.06,-10347C416.19,-10347 464.7,-10347 504.11,-10347"/>
+<polygon fill="#000000" stroke="#000000" points="504.18,-10350.5 514.18,-10347 504.18,-10343.5 504.18,-10350.5"/>
 </g>
-<!-- proc~symba_util_append_merger&#45;&gt;interface~util_append -->
-<g id="call~~graph~~CallGraph_edge306" class="edge">
-<title>proc~symba_util_append_merger&#45;&gt;interface~util_append</title>
-<path fill="none" stroke="#000000" d="M390.54,-915.98C412.42,-912.33 437.21,-908.8 460,-907 681.32,-889.51 947.49,-900.84 1050.17,-906.42"/>
-<polygon fill="#000000" stroke="#000000" points="1050.27,-909.93 1060.45,-906.99 1050.66,-902.94 1050.27,-909.93"/>
+<!-- proc~util_set_particle_info -->
+<g id="call~~graph~~CallGraph_node312" class="node">
+<title>proc~util_set_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node312"><a xlink:href=".././proc/util_set_particle_info.html" xlink:title="util_set_particle_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="382,-10443 272,-10443 272,-10419 382,-10419 382,-10443"/>
+<text text-anchor="middle" x="327" y="-10428.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_particle_info</text>
+</a>
 </g>
-<!-- proc~symba_util_append_merger&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge308" class="edge">
-<title>proc~symba_util_append_merger&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M399.5,-940.03C419.08,-943.14 440.34,-946.36 460,-949 678.9,-978.36 741.11,-944.19 954,-1003 993.52,-1013.92 1035.92,-1034.83 1063.47,-1049.78"/>
-<polygon fill="#000000" stroke="#000000" points="1062.12,-1053.03 1072.57,-1054.79 1065.5,-1046.9 1062.12,-1053.03"/>
 </g>
-<!-- proc~setup_body -->
-<g id="call~~graph~~CallGraph_node307" class="node">
-<title>proc~setup_body</title>
-<g id="a_call~~graph~~CallGraph_node307"><a xlink:href=".././proc/setup_body.html" xlink:title="setup_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="873.5,-10871 805.5,-10871 805.5,-10847 873.5,-10847 873.5,-10871"/>
-<text text-anchor="middle" x="839.5" y="-10856.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_body</text>
+<!-- proc~util_index_eucl_k_to_ij -->
+<g id="call~~graph~~CallGraph_node313" class="node">
+<title>proc~util_index_eucl_k_to_ij</title>
+<g id="a_call~~graph~~CallGraph_node313"><a xlink:href=".././proc/util_index_eucl_k_to_ij.html" xlink:title="util_index_eucl_k_to_ij">
+<polygon fill="#d9534f" stroke="#d9534f" points="387,-10485 267,-10485 267,-10461 387,-10461 387,-10485"/>
+<text text-anchor="middle" x="327" y="-10470.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_k_to_ij</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_sort_rearrange_arr_kin -->
-<g id="call~~graph~~CallGraph_node308" class="node">
-<title>proc~symba_util_sort_rearrange_arr_kin</title>
-<g id="a_call~~graph~~CallGraph_node308"><a xlink:href=".././proc/symba_util_sort_rearrange_arr_kin.html" xlink:title="symba_util_sort_rearrange_arr_kin">
-<polygon fill="#d9534f" stroke="#d9534f" points="187,-10934 7,-10934 7,-10910 187,-10910 187,-10934"/>
-<text text-anchor="middle" x="97" y="-10919.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_sort_rearrange_arr_kin</text>
+<!-- proc~util_index_eucl_pltp -->
+<g id="call~~graph~~CallGraph_node314" class="node">
+<title>proc~util_index_eucl_pltp</title>
+<g id="a_call~~graph~~CallGraph_node314"><a xlink:href=".././proc/util_index_eucl_pltp.html" xlink:title="util_index_eucl_pltp">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-10527 274,-10527 274,-10503 380,-10503 380,-10527"/>
+<text text-anchor="middle" x="327" y="-10512.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_pltp</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_step_system&#45;&gt;whm_step_system -->
-<g id="call~~graph~~CallGraph_edge309" class="edge">
-<title>proc~helio_step_system&#45;&gt;whm_step_system</title>
-<path fill="none" stroke="#000000" d="M377.68,-1634C417.03,-1634 472.13,-1634 513.86,-1634"/>
-<polygon fill="#000000" stroke="#000000" points="513.89,-1637.5 523.89,-1634 513.89,-1630.5 513.89,-1637.5"/>
+<!-- whm_util_sort_pl -->
+<g id="call~~graph~~CallGraph_node744" class="node">
+<title>whm_util_sort_pl</title>
+<polygon fill="#777777" stroke="#777777" points="621,-5028 528,-5028 528,-5004 621,-5004 621,-5028"/>
+<text text-anchor="middle" x="574.5" y="-5013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_pl</text>
 </g>
-<!-- proc~setup_encounter -->
-<g id="call~~graph~~CallGraph_node311" class="node">
-<title>proc~setup_encounter</title>
-<g id="a_call~~graph~~CallGraph_node311"><a xlink:href=".././proc/setup_encounter.html" xlink:title="setup_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="373.5,-10976 280.5,-10976 280.5,-10952 373.5,-10952 373.5,-10976"/>
-<text text-anchor="middle" x="327" y="-10961.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_encounter</text>
+<!-- proc~rmvs_util_sort_pl&#45;&gt;whm_util_sort_pl -->
+<g id="call~~graph~~CallGraph_edge308" class="edge">
+<title>proc~rmvs_util_sort_pl&#45;&gt;whm_util_sort_pl</title>
+<path fill="none" stroke="#000000" d="M374.18,-5016C414.94,-5016 474.46,-5016 517.84,-5016"/>
+<polygon fill="#000000" stroke="#000000" points="517.95,-5019.5 527.95,-5016 517.95,-5012.5 517.95,-5019.5"/>
+</g>
+<!-- proc~util_set_rhill -->
+<g id="call~~graph~~CallGraph_node316" class="node">
+<title>proc~util_set_rhill</title>
+<g id="a_call~~graph~~CallGraph_node316"><a xlink:href=".././proc/util_set_rhill.html" xlink:title="util_set_rhill">
+<polygon fill="#d9534f" stroke="#d9534f" points="361.5,-10569 292.5,-10569 292.5,-10545 361.5,-10545 361.5,-10569"/>
+<text text-anchor="middle" x="327" y="-10554.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill</text>
 </a>
 </g>
 </g>
-<!-- proc~setup_initialize_particle_info_system -->
-<g id="call~~graph~~CallGraph_node312" class="node">
-<title>proc~setup_initialize_particle_info_system</title>
-<g id="a_call~~graph~~CallGraph_node312"><a xlink:href=".././proc/setup_initialize_particle_info_system.html" xlink:title="setup_initialize_particle_info_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="420,-11018 234,-11018 234,-10994 420,-10994 420,-11018"/>
-<text text-anchor="middle" x="327" y="-11003.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_particle_info_system</text>
+<!-- proc~io_get_old_t_final_system -->
+<g id="call~~graph~~CallGraph_node317" class="node">
+<title>proc~io_get_old_t_final_system</title>
+<g id="a_call~~graph~~CallGraph_node317"><a xlink:href=".././proc/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="907.5,-1247 771.5,-1247 771.5,-1223 907.5,-1223 907.5,-1247"/>
+<text text-anchor="middle" x="839.5" y="-1232.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
 </a>
 </g>
 </g>
-<!-- proc~setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node313" class="node">
-<title>proc~setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node313"><a xlink:href=".././proc/setup_initialize_system.html" xlink:title="setup_initialize_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="388,-11060 266,-11060 266,-11036 388,-11036 388,-11060"/>
-<text text-anchor="middle" x="327" y="-11045.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_system</text>
+<!-- proc~io_get_old_t_final_system&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge309" class="edge">
+<title>proc~io_get_old_t_final_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M907.76,-1233.37C924.23,-1230.21 940.87,-1224.37 954,-1214 1051.01,-1137.39 1082.31,-979.16 1090.76,-921.04"/>
+<polygon fill="#000000" stroke="#000000" points="1094.24,-921.48 1092.13,-911.1 1087.3,-920.53 1094.24,-921.48"/>
+</g>
+<!-- interface~symba_util_spill_pl -->
+<g id="call~~graph~~CallGraph_node318" class="node">
+<title>interface~symba_util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node318"><a xlink:href=".././interface/symba_util_spill_pl.html" xlink:title="symba_util_spill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="625.5,-2971 523.5,-2971 523.5,-2947 625.5,-2947 625.5,-2971"/>
+<text text-anchor="middle" x="574.5" y="-2956.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_append_tp&#45;&gt;interface~util_append -->
+<!-- interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl -->
 <g id="call~~graph~~CallGraph_edge310" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;interface~util_append</title>
-<path fill="none" stroke="#000000" d="M862.95,-1033.84C908.15,-1009.37 1010.21,-954.1 1062.03,-926.04"/>
-<polygon fill="#000000" stroke="#000000" points="1063.97,-928.97 1071.1,-921.13 1060.64,-922.81 1063.97,-928.97"/>
+<title>interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M625.59,-2959C668.96,-2959 731.8,-2959 777.98,-2959"/>
+<polygon fill="#000000" stroke="#000000" points="778.15,-2962.5 788.15,-2959 778.15,-2955.5 778.15,-2962.5"/>
 </g>
-<!-- proc~symba_util_append_tp&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_sort_tp&#45;&gt;util_sort_tp -->
+<g id="call~~graph~~CallGraph_edge311" class="edge">
+<title>proc~rmvs_util_sort_tp&#45;&gt;util_sort_tp</title>
+<path fill="none" stroke="#000000" d="M374.18,-5104.17C419.57,-5098.44 488.22,-5089.77 531.95,-5084.25"/>
+<polygon fill="#000000" stroke="#000000" points="532.47,-5087.71 541.96,-5082.98 531.6,-5080.76 532.47,-5087.71"/>
+</g>
+<!-- interface~symba_util_spill_encounter -->
+<g id="call~~graph~~CallGraph_node320" class="node">
+<title>interface~symba_util_spill_encounter</title>
+<g id="a_call~~graph~~CallGraph_node320"><a xlink:href=".././interface/symba_util_spill_encounter.html" xlink:title="symba_util_spill_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="645.5,-2929 503.5,-2929 503.5,-2905 645.5,-2905 645.5,-2929"/>
+<text text-anchor="middle" x="574.5" y="-2914.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_encounter</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_util_spill_encounter&#45;&gt;proc~symba_util_spill_encounter -->
 <g id="call~~graph~~CallGraph_edge312" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M900.14,-1050.95C948.92,-1055 1016.32,-1060.59 1057.3,-1064"/>
-<polygon fill="#000000" stroke="#000000" points="1057.12,-1067.49 1067.38,-1064.83 1057.7,-1060.52 1057.12,-1067.49"/>
+<title>interface~symba_util_spill_encounter&#45;&gt;proc~symba_util_spill_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.63,-2917C680.12,-2917 721.86,-2917 757.68,-2917"/>
+<polygon fill="#000000" stroke="#000000" points="758.11,-2920.5 768.11,-2917 758.11,-2913.5 758.11,-2920.5"/>
 </g>
-<!-- proc~symba_util_append_tp&#45;&gt;util_append_tp -->
-<g id="call~~graph~~CallGraph_edge311" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;util_append_tp</title>
-<path fill="none" stroke="#000000" d="M900.16,-1053.07C917.83,-1056.21 937,-1060.69 954,-1067 971.36,-1073.45 973.38,-1079.83 990,-1088 1009.56,-1097.61 1031.9,-1106.88 1050.8,-1114.26"/>
-<polygon fill="#000000" stroke="#000000" points="1049.75,-1117.6 1060.34,-1117.93 1052.27,-1111.07 1049.75,-1117.6"/>
+<!-- interface~symba_util_spill_tp -->
+<g id="call~~graph~~CallGraph_node321" class="node">
+<title>interface~symba_util_spill_tp</title>
+<g id="a_call~~graph~~CallGraph_node321"><a xlink:href=".././interface/symba_util_spill_tp.html" xlink:title="symba_util_spill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="626,-3013 523,-3013 523,-2989 626,-2989 626,-3013"/>
+<text text-anchor="middle" x="574.5" y="-2998.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_tp</text>
+</a>
 </g>
-<!-- proc~symba_util_resize_pl&#45;&gt;interface~util_resize -->
-<g id="call~~graph~~CallGraph_edge314" class="edge">
-<title>proc~symba_util_resize_pl&#45;&gt;interface~util_resize</title>
-<path fill="none" stroke="#000000" d="M895.61,-5371.78C914.34,-5375.06 935.27,-5379.43 954,-5385 970.62,-5389.94 973.97,-5393.41 990,-5400 1011.17,-5408.71 1034.83,-5418.31 1054.17,-5426.14"/>
-<polygon fill="#000000" stroke="#000000" points="1052.99,-5429.44 1063.58,-5429.94 1055.62,-5422.95 1052.99,-5429.44"/>
 </g>
-<!-- proc~symba_util_resize_pl&#45;&gt;util_resize_pl -->
+<!-- interface~symba_util_spill_tp&#45;&gt;proc~symba_util_spill_tp -->
 <g id="call~~graph~~CallGraph_edge313" class="edge">
-<title>proc~symba_util_resize_pl&#45;&gt;util_resize_pl</title>
-<path fill="none" stroke="#000000" d="M895.71,-5357.02C940.84,-5351.31 1003.95,-5343.33 1046.65,-5337.93"/>
-<polygon fill="#000000" stroke="#000000" points="1047.29,-5341.37 1056.77,-5336.65 1046.41,-5334.43 1047.29,-5341.37"/>
+<title>interface~symba_util_spill_tp&#45;&gt;proc~symba_util_spill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.21,-3001C669.51,-3001 731.88,-3001 777.82,-3001"/>
+<polygon fill="#000000" stroke="#000000" points="777.95,-3004.5 787.95,-3001 777.95,-2997.5 777.95,-3004.5"/>
 </g>
-<!-- proc~netcdf_close -->
-<g id="call~~graph~~CallGraph_node316" class="node">
-<title>proc~netcdf_close</title>
-<g id="a_call~~graph~~CallGraph_node316"><a xlink:href=".././proc/netcdf_close.html" xlink:title="netcdf_close">
-<polygon fill="#d9534f" stroke="#d9534f" points="363.5,-11102 290.5,-11102 290.5,-11078 363.5,-11078 363.5,-11102"/>
-<text text-anchor="middle" x="327" y="-11087.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_close</text>
+<!-- proc~util_set_rhill_approximate -->
+<g id="call~~graph~~CallGraph_node322" class="node">
+<title>proc~util_set_rhill_approximate</title>
+<g id="a_call~~graph~~CallGraph_node322"><a xlink:href=".././proc/util_set_rhill_approximate.html" xlink:title="util_set_rhill_approximate">
+<polygon fill="#d9534f" stroke="#d9534f" points="394,-10611 260,-10611 260,-10587 394,-10587 394,-10611"/>
+<text text-anchor="middle" x="327" y="-10596.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill_approximate</text>
 </a>
 </g>
 </g>
-<!-- nf90_close -->
-<g id="call~~graph~~CallGraph_node695" class="node">
-<title>nf90_close</title>
-<polygon fill="#777777" stroke="#777777" points="606.5,-11102 542.5,-11102 542.5,-11078 606.5,-11078 606.5,-11102"/>
-<text text-anchor="middle" x="574.5" y="-11087.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_close</text>
-</g>
-<!-- proc~netcdf_close&#45;&gt;nf90_close -->
+<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
 <g id="call~~graph~~CallGraph_edge315" class="edge">
-<title>proc~netcdf_close&#45;&gt;nf90_close</title>
-<path fill="none" stroke="#000000" d="M363.7,-11090C408.45,-11090 485.02,-11090 532.24,-11090"/>
-<polygon fill="#000000" stroke="#000000" points="532.42,-11093.5 542.42,-11090 532.42,-11086.5 532.42,-11093.5"/>
+<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" d="M401.33,-5316.71C434.22,-5315.24 472.8,-5313.51 505.09,-5312.07"/>
+<polygon fill="#000000" stroke="#000000" points="505.5,-5315.55 515.34,-5311.61 505.19,-5308.56 505.5,-5315.55"/>
 </g>
-<!-- util_copy_encounter -->
-<g id="call~~graph~~CallGraph_node734" class="node">
-<title>util_copy_encounter</title>
-<polygon fill="#777777" stroke="#777777" points="629,-3486 520,-3486 520,-3462 629,-3462 629,-3486"/>
-<text text-anchor="middle" x="574.5" y="-3471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_encounter</text>
+<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange -->
+<g id="call~~graph~~CallGraph_edge314" class="edge">
+<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M401.22,-5331.27C409.16,-5333.86 416.92,-5337.06 424,-5341 444.06,-5352.15 439.77,-5367.18 460,-5378 476.03,-5386.57 494.95,-5391.7 512.69,-5394.76"/>
+<polygon fill="#000000" stroke="#000000" points="512.56,-5398.28 522.98,-5396.33 513.62,-5391.36 512.56,-5398.28"/>
 </g>
-<!-- proc~symba_util_copy_encounter&#45;&gt;util_copy_encounter -->
+<!-- proc~symba_collision_mergeaddsub -->
+<g id="call~~graph~~CallGraph_node324" class="node">
+<title>proc~symba_collision_mergeaddsub</title>
+<g id="a_call~~graph~~CallGraph_node324"><a xlink:href=".././proc/symba_collision_mergeaddsub.html" xlink:title="symba_collision_mergeaddsub">
+<polygon fill="#d9534f" stroke="#d9534f" points="1648.5,-1776 1488.5,-1776 1488.5,-1752 1648.5,-1752 1648.5,-1776"/>
+<text text-anchor="middle" x="1568.5" y="-1761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_mergeaddsub</text>
+</a>
+</g>
+</g>
+<!-- fraggle_io_log_pl -->
+<g id="call~~graph~~CallGraph_node775" class="node">
+<title>fraggle_io_log_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1787,-1776 1693,-1776 1693,-1752 1787,-1752 1787,-1776"/>
+<text text-anchor="middle" x="1740" y="-1761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
+</g>
+<!-- proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl -->
 <g id="call~~graph~~CallGraph_edge316" class="edge">
-<title>proc~symba_util_copy_encounter&#45;&gt;util_copy_encounter</title>
-<path fill="none" stroke="#000000" d="M400.33,-3474C435.07,-3474 476.32,-3474 509.85,-3474"/>
-<polygon fill="#000000" stroke="#000000" points="509.99,-3477.5 519.99,-3474 509.99,-3470.5 509.99,-3477.5"/>
+<title>proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl</title>
+<path fill="none" stroke="#000000" d="M1648.79,-1764C1660.15,-1764 1671.64,-1764 1682.45,-1764"/>
+<polygon fill="#000000" stroke="#000000" points="1682.57,-1767.5 1692.57,-1764 1682.57,-1760.5 1682.57,-1767.5"/>
 </g>
-<!-- proc~symba_util_resize_tp&#45;&gt;interface~util_resize -->
+<!-- proc~util_spill_arr_info -->
+<g id="call~~graph~~CallGraph_node325" class="node">
+<title>proc~util_spill_arr_info</title>
+<g id="a_call~~graph~~CallGraph_node325"><a xlink:href=".././proc/util_spill_arr_info.html" xlink:title="util_spill_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="143.5,-7804 50.5,-7804 50.5,-7780 143.5,-7780 143.5,-7804"/>
+<text text-anchor="middle" x="97" y="-7789.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_info</text>
+</a>
+</g>
+</g>
+<!-- proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
 <g id="call~~graph~~CallGraph_edge317" class="edge">
-<title>proc~symba_util_resize_tp&#45;&gt;interface~util_resize</title>
-<path fill="none" stroke="#000000" d="M896.02,-5413.9C943.73,-5420.69 1011.34,-5430.31 1053.79,-5436.35"/>
-<polygon fill="#000000" stroke="#000000" points="1053.35,-5439.82 1063.75,-5437.77 1054.34,-5432.89 1053.35,-5439.82"/>
+<title>proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M143.59,-7783.6C174.11,-7777.98 215,-7770.45 250.33,-7763.94"/>
+<polygon fill="#000000" stroke="#000000" points="251.42,-7767.3 260.62,-7762.04 250.15,-7760.41 251.42,-7767.3"/>
 </g>
-<!-- proc~symba_util_resize_tp&#45;&gt;util_resize_tp -->
-<g id="call~~graph~~CallGraph_edge318" class="edge">
-<title>proc~symba_util_resize_tp&#45;&gt;util_resize_tp</title>
-<path fill="none" stroke="#000000" d="M896.02,-5400.07C941.04,-5395.27 1003.79,-5388.57 1046.38,-5384.03"/>
-<polygon fill="#000000" stroke="#000000" points="1046.91,-5387.49 1056.49,-5382.95 1046.17,-5380.53 1046.91,-5387.49"/>
+<!-- proc~util_rescale_system -->
+<g id="call~~graph~~CallGraph_node326" class="node">
+<title>proc~util_rescale_system</title>
+<g id="a_call~~graph~~CallGraph_node326"><a xlink:href=".././proc/util_rescale_system.html" xlink:title="util_rescale_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="380,-10653 274,-10653 274,-10629 380,-10629 380,-10653"/>
+<text text-anchor="middle" x="327" y="-10638.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale_system</text>
+</a>
 </g>
-<!-- orbel_xv2aeq -->
-<g id="call~~graph~~CallGraph_node742" class="node">
-<title>orbel_xv2aeq</title>
-<polygon fill="#777777" stroke="#777777" points="1778.5,-618 1701.5,-618 1701.5,-594 1778.5,-594 1778.5,-618"/>
-<text text-anchor="middle" x="1740" y="-603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
 </g>
-<!-- proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq -->
+<!-- proc~util_minimize_bfgs -->
+<g id="call~~graph~~CallGraph_node327" class="node">
+<title>proc~util_minimize_bfgs</title>
+<g id="a_call~~graph~~CallGraph_node327"><a xlink:href=".././proc/util_minimize_bfgs.html" xlink:title="util_minimize_bfgs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="377,-10695 277,-10695 277,-10671 377,-10671 377,-10695"/>
+<text text-anchor="middle" x="327" y="-10680.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
+</a>
+</g>
+</g>
+<!-- proc~io_write_hdr_system&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge318" class="edge">
+<title>proc~io_write_hdr_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M895.06,-1192.79C915.22,-1190.31 937.21,-1184.52 954,-1172 1040.45,-1107.55 1077.43,-974.14 1089.11,-921.27"/>
+<polygon fill="#000000" stroke="#000000" points="1092.58,-921.78 1091.22,-911.27 1085.73,-920.33 1092.58,-921.78"/>
+</g>
+<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge319" class="edge">
-<title>proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq</title>
-<path fill="none" stroke="#000000" d="M1641.38,-593.91C1658.1,-595.98 1675.5,-598.13 1690.9,-600.04"/>
-<polygon fill="#000000" stroke="#000000" points="1690.85,-603.56 1701.2,-601.32 1691.71,-596.61 1690.85,-603.56"/>
+<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M895.76,-1150.01C915.55,-1147.38 937.11,-1141.69 954,-1130 1030.49,-1077.08 1072.24,-967.31 1087.13,-920.69"/>
+<polygon fill="#000000" stroke="#000000" points="1090.52,-921.59 1090.13,-911.01 1083.83,-919.53 1090.52,-921.59"/>
+</g>
+<!-- proc~io_get_token -->
+<g id="call~~graph~~CallGraph_node332" class="node">
+<title>proc~io_get_token</title>
+<g id="a_call~~graph~~CallGraph_node332"><a xlink:href=".././proc/io_get_token.html" xlink:title="io_get_token">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1376.5,-266 1302.5,-266 1302.5,-242 1376.5,-242 1376.5,-266"/>
+<text text-anchor="middle" x="1339.5" y="-251.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+</a>
 </g>
-<!-- proc~helio_setup_initialize_system&#45;&gt;whm_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge320" class="edge">
-<title>proc~helio_setup_initialize_system&#45;&gt;whm_setup_initialize_system</title>
-<path fill="none" stroke="#000000" d="M402.66,-8376.61C429.8,-8374.29 460.66,-8371.65 488.62,-8369.26"/>
-<polygon fill="#000000" stroke="#000000" points="489.11,-8372.73 498.77,-8368.39 488.51,-8365.76 489.11,-8372.73"/>
 </g>
-<!-- proc~setup_pl -->
-<g id="call~~graph~~CallGraph_node321" class="node">
-<title>proc~setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node321"><a xlink:href=".././proc/setup_pl.html" xlink:title="setup_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="354,-10892 300,-10892 300,-10868 354,-10868 354,-10892"/>
-<text text-anchor="middle" x="327" y="-10877.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
+<!-- proc~io_param_reader -->
+<g id="call~~graph~~CallGraph_node333" class="node">
+<title>proc~io_param_reader</title>
+<g id="a_call~~graph~~CallGraph_node333"><a xlink:href=".././proc/io_param_reader.html" xlink:title="io_param_reader">
+<polygon fill="#d9534f" stroke="#d9534f" points="887,-280 792,-280 792,-256 887,-256 887,-280"/>
+<text text-anchor="middle" x="839.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_body -->
-<g id="call~~graph~~CallGraph_node478" class="node">
-<title>interface~setup_body</title>
-<g id="a_call~~graph~~CallGraph_node478"><a xlink:href=".././interface/setup_body.html" xlink:title="setup_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="608.5,-10871 540.5,-10871 540.5,-10847 608.5,-10847 608.5,-10871"/>
-<text text-anchor="middle" x="574.5" y="-10856.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_body</text>
+<!-- interface~io_get_token -->
+<g id="call~~graph~~CallGraph_node533" class="node">
+<title>interface~io_get_token</title>
+<g id="a_call~~graph~~CallGraph_node533"><a xlink:href=".././interface/io_get_token.html" xlink:title="io_get_token">
+<polygon fill="#a7506f" stroke="#a7506f" points="1131.5,-266 1057.5,-266 1057.5,-242 1131.5,-242 1131.5,-266"/>
+<text text-anchor="middle" x="1094.5" y="-251.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </a>
 </g>
 </g>
-<!-- proc~setup_pl&#45;&gt;interface~setup_body -->
+<!-- proc~io_param_reader&#45;&gt;interface~io_get_token -->
+<g id="call~~graph~~CallGraph_edge320" class="edge">
+<title>proc~io_param_reader&#45;&gt;interface~io_get_token</title>
+<path fill="none" stroke="#000000" d="M887.2,-265.42C932.77,-262.89 1001.68,-259.08 1047.13,-256.57"/>
+<polygon fill="#000000" stroke="#000000" points="1047.51,-260.05 1057.31,-256 1047.13,-253.06 1047.51,-260.05"/>
+</g>
+<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
 <g id="call~~graph~~CallGraph_edge321" class="edge">
-<title>proc~setup_pl&#45;&gt;interface~setup_body</title>
-<path fill="none" stroke="#000000" d="M354.27,-10877.75C396.4,-10874.15 479.47,-10867.04 530.38,-10862.69"/>
-<polygon fill="#000000" stroke="#000000" points="530.76,-10866.17 540.42,-10861.83 530.16,-10859.19 530.76,-10866.17"/>
+<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M869.03,-280.18C914.8,-299.72 1004.66,-338.08 1055.71,-359.87"/>
+<polygon fill="#000000" stroke="#000000" points="1054.5,-363.16 1065.07,-363.87 1057.25,-356.72 1054.5,-363.16"/>
 </g>
-<!-- proc~symba_util_fill_arr_kin -->
-<g id="call~~graph~~CallGraph_node323" class="node">
-<title>proc~symba_util_fill_arr_kin</title>
-<g id="a_call~~graph~~CallGraph_node323"><a xlink:href=".././proc/symba_util_fill_arr_kin.html" xlink:title="symba_util_fill_arr_kin">
-<polygon fill="#d9534f" stroke="#d9534f" points="156,-11144 38,-11144 38,-11120 156,-11120 156,-11144"/>
-<text text-anchor="middle" x="97" y="-11129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_arr_kin</text>
+<!-- proc~util_spill_arr_logical -->
+<g id="call~~graph~~CallGraph_node334" class="node">
+<title>proc~util_spill_arr_logical</title>
+<g id="a_call~~graph~~CallGraph_node334"><a xlink:href=".././proc/util_spill_arr_logical.html" xlink:title="util_spill_arr_logical">
+<polygon fill="#d9534f" stroke="#d9534f" points="150,-10737 44,-10737 44,-10713 150,-10713 150,-10737"/>
+<text text-anchor="middle" x="97" y="-10722.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_logical</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_sort_pl&#45;&gt;util_sort_pl -->
+<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge322" class="edge">
-<title>proc~symba_util_sort_pl&#45;&gt;util_sort_pl</title>
-<path fill="none" stroke="#000000" d="M378.27,-5555.7C423.76,-5551.81 489.94,-5546.15 532.35,-5542.52"/>
-<polygon fill="#000000" stroke="#000000" points="532.67,-5546.01 542.33,-5541.67 532.07,-5539.03 532.67,-5546.01"/>
+<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M889.77,-1107.84C910.87,-1105.41 934.97,-1099.9 954,-1088 1020.48,-1046.42 1065.79,-960.69 1084.23,-920.58"/>
+<polygon fill="#000000" stroke="#000000" points="1087.53,-921.76 1088.43,-911.2 1081.15,-918.9 1087.53,-921.76"/>
 </g>
-<!-- proc~setup_tp -->
-<g id="call~~graph~~CallGraph_node326" class="node">
-<title>proc~setup_tp</title>
-<g id="a_call~~graph~~CallGraph_node326"><a xlink:href=".././proc/setup_tp.html" xlink:title="setup_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="354,-10850 300,-10850 300,-10826 354,-10826 354,-10850"/>
-<text text-anchor="middle" x="327" y="-10835.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
-</a>
+<!-- util_spill -->
+<g id="call~~graph~~CallGraph_node708" class="node">
+<title>util_spill</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-3097 1067.5,-3097 1067.5,-3073 1121.5,-3073 1121.5,-3097"/>
+<text text-anchor="middle" x="1094.5" y="-3082.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </g>
+<!-- proc~rmvs_util_spill_pl&#45;&gt;util_spill -->
+<g id="call~~graph~~CallGraph_edge325" class="edge">
+<title>proc~rmvs_util_spill_pl&#45;&gt;util_spill</title>
+<path fill="none" stroke="#000000" d="M886.61,-3119.35C935.8,-3111.18 1012.68,-3098.42 1057.57,-3090.97"/>
+<polygon fill="#000000" stroke="#000000" points="1058.15,-3094.42 1067.45,-3089.33 1057.01,-3087.51 1058.15,-3094.42"/>
 </g>
-<!-- proc~setup_tp&#45;&gt;interface~setup_body -->
+<!-- proc~rmvs_util_spill_pl&#45;&gt;util_exit -->
 <g id="call~~graph~~CallGraph_edge323" class="edge">
-<title>proc~setup_tp&#45;&gt;interface~setup_body</title>
-<path fill="none" stroke="#000000" d="M354.27,-10840.25C396.4,-10843.85 479.47,-10850.96 530.38,-10855.31"/>
-<polygon fill="#000000" stroke="#000000" points="530.16,-10858.81 540.42,-10856.17 530.76,-10851.83 530.16,-10858.81"/>
+<title>proc~rmvs_util_spill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M886.69,-3130.78C910.28,-3130.02 937.43,-3124.52 954,-3106 1028.28,-3022.98 937.34,-2704.17 990,-2606 1005.07,-2577.91 1034.73,-2556.57 1058.45,-2543.03"/>
+<polygon fill="#000000" stroke="#000000" points="1060.45,-2545.92 1067.53,-2538.05 1057.08,-2539.78 1060.45,-2545.92"/>
 </g>
-<!-- proc~symba_util_sort_tp&#45;&gt;util_sort_tp -->
+<!-- whm_util_spill_pl -->
+<g id="call~~graph~~CallGraph_node781" class="node">
+<title>whm_util_spill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1141,-3139 1048,-3139 1048,-3115 1141,-3115 1141,-3139"/>
+<text text-anchor="middle" x="1094.5" y="-3124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
+</g>
+<!-- proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl -->
 <g id="call~~graph~~CallGraph_edge324" class="edge">
-<title>proc~symba_util_sort_tp&#45;&gt;util_sort_tp</title>
-<path fill="none" stroke="#000000" d="M378.57,-5681.67C423.83,-5677.8 489.38,-5672.2 531.73,-5668.57"/>
-<polygon fill="#000000" stroke="#000000" points="532.04,-5672.06 541.7,-5667.72 531.44,-5665.08 532.04,-5672.06"/>
+<title>proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl</title>
+<path fill="none" stroke="#000000" d="M886.61,-3127C929.05,-3127 992.12,-3127 1037.45,-3127"/>
+<polygon fill="#000000" stroke="#000000" points="1037.71,-3130.5 1047.71,-3127 1037.71,-3123.5 1037.71,-3130.5"/>
 </g>
-<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange -->
-<g id="call~~graph~~CallGraph_edge325" class="edge">
-<title>proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M404.67,-4109C439.45,-4111.26 480.01,-4113.91 512.66,-4116.03"/>
-<polygon fill="#000000" stroke="#000000" points="512.75,-4119.55 522.96,-4116.71 513.21,-4112.56 512.75,-4119.55"/>
+<!-- interface~symba_util_fill_pl -->
+<g id="call~~graph~~CallGraph_node338" class="node">
+<title>interface~symba_util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node338"><a xlink:href=".././interface/symba_util_fill_pl.html" xlink:title="symba_util_fill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-2349 527.5,-2349 527.5,-2325 621.5,-2325 621.5,-2349"/>
+<text text-anchor="middle" x="574.5" y="-2334.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_pl</text>
+</a>
 </g>
-<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
+</g>
+<!-- proc~symba_util_fill_pl -->
+<g id="call~~graph~~CallGraph_node545" class="node">
+<title>proc~symba_util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node545"><a xlink:href=".././proc/symba_util_fill_pl.html" xlink:title="symba_util_fill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-2353 792.5,-2353 792.5,-2329 886.5,-2329 886.5,-2353"/>
+<text text-anchor="middle" x="839.5" y="-2338.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_pl</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_util_fill_pl&#45;&gt;proc~symba_util_fill_pl -->
 <g id="call~~graph~~CallGraph_edge326" class="edge">
-<title>proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" d="M403.42,-4091.89C410.58,-4089.45 417.56,-4086.52 424,-4083 443.85,-4072.14 439.97,-4057.53 460,-4047 473.82,-4039.73 489.75,-4034.94 505.21,-4031.8"/>
-<polygon fill="#000000" stroke="#000000" points="506.07,-4035.2 515.28,-4029.96 504.82,-4028.31 506.07,-4035.2"/>
+<title>interface~symba_util_fill_pl&#45;&gt;proc~symba_util_fill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-2337.7C666.35,-2338.38 734.33,-2339.42 782.24,-2340.14"/>
+<polygon fill="#000000" stroke="#000000" points="782.39,-2343.65 792.44,-2340.3 782.5,-2336.65 782.39,-2343.65"/>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;interface~util_fill -->
+<!-- interface~symba_util_fill_tp -->
+<g id="call~~graph~~CallGraph_node339" class="node">
+<title>interface~symba_util_fill_tp</title>
+<g id="a_call~~graph~~CallGraph_node339"><a xlink:href=".././interface/symba_util_fill_tp.html" xlink:title="symba_util_fill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-2265 527.5,-2265 527.5,-2241 621.5,-2241 621.5,-2265"/>
+<text text-anchor="middle" x="574.5" y="-2250.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_tp</text>
+</a>
+</g>
+</g>
+<!-- proc~symba_util_fill_tp -->
+<g id="call~~graph~~CallGraph_node528" class="node">
+<title>proc~symba_util_fill_tp</title>
+<g id="a_call~~graph~~CallGraph_node528"><a xlink:href=".././proc/symba_util_fill_tp.html" xlink:title="symba_util_fill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="886.5,-2269 792.5,-2269 792.5,-2245 886.5,-2245 886.5,-2269"/>
+<text text-anchor="middle" x="839.5" y="-2254.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp -->
 <g id="call~~graph~~CallGraph_edge327" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;interface~util_fill</title>
-<path fill="none" stroke="#000000" d="M886.61,-771.65C935.8,-779.82 1012.68,-792.58 1057.57,-800.03"/>
-<polygon fill="#000000" stroke="#000000" points="1057.01,-803.49 1067.45,-801.67 1058.15,-796.58 1057.01,-803.49"/>
+<title>interface~symba_util_fill_tp&#45;&gt;proc~symba_util_fill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-2253.7C666.35,-2254.38 734.33,-2255.42 782.24,-2256.14"/>
+<polygon fill="#000000" stroke="#000000" points="782.39,-2259.65 792.44,-2256.3 782.5,-2252.65 782.39,-2259.65"/>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge329" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M886.63,-760.83C909.91,-761.82 936.78,-767.36 954,-785 1024.73,-857.47 931.73,-927.17 990,-1010 1006.21,-1033.05 1034.83,-1047.77 1057.87,-1056.47"/>
-<polygon fill="#000000" stroke="#000000" points="1056.75,-1059.79 1067.35,-1059.84 1059.1,-1053.19 1056.75,-1059.79"/>
+<!-- interface~symba_util_peri_pl -->
+<g id="call~~graph~~CallGraph_node340" class="node">
+<title>interface~symba_util_peri_pl</title>
+<g id="a_call~~graph~~CallGraph_node340"><a xlink:href=".././interface/symba_util_peri_pl.html" xlink:title="symba_util_peri_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="1390.5,-2248 1288.5,-2248 1288.5,-2224 1390.5,-2224 1390.5,-2248"/>
+<text text-anchor="middle" x="1339.5" y="-2233.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_peri_pl</text>
+</a>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;util_fill_tp -->
-<g id="call~~graph~~CallGraph_edge328" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;util_fill_tp</title>
-<path fill="none" stroke="#000000" d="M886.61,-764C935.04,-764 1010.3,-764 1055.45,-764"/>
-<polygon fill="#000000" stroke="#000000" points="1055.7,-767.5 1065.7,-764 1055.7,-760.5 1055.7,-767.5"/>
 </g>
-<!-- proc~util_coord_b2h_pl -->
-<g id="call~~graph~~CallGraph_node330" class="node">
-<title>proc~util_coord_b2h_pl</title>
-<g id="a_call~~graph~~CallGraph_node330"><a xlink:href=".././proc/util_coord_b2h_pl.html" xlink:title="util_coord_b2h_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-11186 278.5,-11186 278.5,-11162 375.5,-11162 375.5,-11186"/>
-<text text-anchor="middle" x="327" y="-11171.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_pl</text>
+<!-- proc~symba_util_peri_pl -->
+<g id="call~~graph~~CallGraph_node562" class="node">
+<title>proc~symba_util_peri_pl</title>
+<g id="a_call~~graph~~CallGraph_node562"><a xlink:href=".././proc/symba_util_peri_pl.html" xlink:title="symba_util_peri_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="1619.5,-2227 1517.5,-2227 1517.5,-2203 1619.5,-2203 1619.5,-2227"/>
+<text text-anchor="middle" x="1568.5" y="-2212.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_peri_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~user_kick_getacch_body -->
-<g id="call~~graph~~CallGraph_node331" class="node">
-<title>proc~user_kick_getacch_body</title>
-<g id="a_call~~graph~~CallGraph_node331"><a xlink:href=".././proc/user_kick_getacch_body.html" xlink:title="user_kick_getacch_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="392,-11228 262,-11228 262,-11204 392,-11204 392,-11228"/>
-<text text-anchor="middle" x="327" y="-11213.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_kick_getacch_body</text>
+<!-- interface~symba_util_peri_pl&#45;&gt;proc~symba_util_peri_pl -->
+<g id="call~~graph~~CallGraph_edge328" class="edge">
+<title>interface~symba_util_peri_pl&#45;&gt;proc~symba_util_peri_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1390.6,-2231.37C1424.97,-2228.19 1470.76,-2223.95 1507.14,-2220.58"/>
+<polygon fill="#000000" stroke="#000000" points="1507.5,-2224.07 1517.14,-2219.66 1506.86,-2217.1 1507.5,-2224.07"/>
+</g>
+<!-- proc~symba_collision_resolve_mergers -->
+<g id="call~~graph~~CallGraph_node341" class="node">
+<title>proc~symba_collision_resolve_mergers</title>
+<g id="a_call~~graph~~CallGraph_node341"><a xlink:href=".././proc/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
+<polygon fill="#d9534f" stroke="#d9534f" points="926.5,-1718 752.5,-1718 752.5,-1694 926.5,-1694 926.5,-1718"/>
+<text text-anchor="middle" x="839.5" y="-1703.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;interface~util_fill -->
+<!-- proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge -->
 <g id="call~~graph~~CallGraph_edge330" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;interface~util_fill</title>
-<path fill="none" stroke="#000000" d="M886.61,-840.35C935.8,-832.18 1012.68,-819.42 1057.57,-811.97"/>
-<polygon fill="#000000" stroke="#000000" points="1058.15,-815.42 1067.45,-810.33 1057.01,-808.51 1058.15,-815.42"/>
+<title>proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge</title>
+<path fill="none" stroke="#000000" d="M905.33,-1718.04C939.99,-1724.48 982.83,-1732.44 1018.87,-1739.14"/>
+<polygon fill="#000000" stroke="#000000" points="1018.37,-1742.6 1028.84,-1740.99 1019.65,-1735.72 1018.37,-1742.6"/>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;util_fill_pl -->
+<!-- proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders -->
 <g id="call~~graph~~CallGraph_edge331" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M886.61,-848C935.3,-848 1011.12,-848 1056.19,-848"/>
-<polygon fill="#000000" stroke="#000000" points="1056.41,-851.5 1066.41,-848 1056.41,-844.5 1056.41,-851.5"/>
+<title>proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders</title>
+<path fill="none" stroke="#000000" d="M926.51,-1707.7C946.11,-1708.09 967.17,-1708.5 987.51,-1708.91"/>
+<polygon fill="#000000" stroke="#000000" points="987.67,-1712.41 997.74,-1709.11 987.81,-1705.41 987.67,-1712.41"/>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;util_exit -->
+<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx2 -->
+<g id="call~~graph~~CallGraph_edge329" class="edge">
+<title>proc~symba_collision_resolve_mergers&#45;&gt;idx2</title>
+<path fill="none" stroke="#000000" d="M922.64,-1693.99C968.02,-1687.35 1022.11,-1679.44 1057.09,-1674.32"/>
+<polygon fill="#000000" stroke="#000000" points="1057.91,-1677.74 1067.3,-1672.83 1056.9,-1670.82 1057.91,-1677.74"/>
+</g>
+<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx1 -->
 <g id="call~~graph~~CallGraph_edge332" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M879.99,-860.1C904.33,-869.4 934.52,-884.51 954,-907 985.75,-943.65 958.69,-972.97 990,-1010 1007.88,-1031.15 1035.69,-1045.85 1057.98,-1055.01"/>
-<polygon fill="#000000" stroke="#000000" points="1056.88,-1058.34 1067.47,-1058.72 1059.43,-1051.82 1056.88,-1058.34"/>
+<title>proc~symba_collision_resolve_mergers&#45;&gt;idx1</title>
+<path fill="none" stroke="#000000" d="M876.62,-1693.93C899.08,-1686.18 928.46,-1675.61 954,-1665 970.34,-1658.21 973.21,-1653.58 990,-1648 1011.78,-1640.77 1037.01,-1635.58 1057.1,-1632.18"/>
+<polygon fill="#000000" stroke="#000000" points="1057.79,-1635.61 1067.1,-1630.56 1056.67,-1628.7 1057.79,-1635.61"/>
 </g>
-<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange -->
-<g id="call~~graph~~CallGraph_edge333" class="edge">
-<title>proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M395.67,-4176C405.33,-4173.48 415.02,-4170.5 424,-4167 441.26,-4160.27 442.78,-4152.81 460,-4146 476.66,-4139.41 495.38,-4134.27 512.75,-4130.36"/>
-<polygon fill="#000000" stroke="#000000" points="513.75,-4133.73 522.79,-4128.2 512.27,-4126.88 513.75,-4133.73"/>
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp -->
+<g id="call~~graph~~CallGraph_edge335" class="edge">
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp</title>
+<path fill="none" stroke="#000000" d="M886.61,-3077.35C933.68,-3069.53 1006.11,-3057.51 1051.6,-3049.96"/>
+<polygon fill="#000000" stroke="#000000" points="1052.42,-3053.37 1061.72,-3048.28 1051.28,-3046.46 1052.42,-3053.37"/>
 </g>
-<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill -->
 <g id="call~~graph~~CallGraph_edge334" class="edge">
-<title>proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" d="M405,-4181.41C437.09,-4178.67 474.05,-4175.51 505.16,-4172.85"/>
-<polygon fill="#000000" stroke="#000000" points="505.81,-4176.3 515.47,-4171.96 505.21,-4169.33 505.81,-4176.3"/>
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill</title>
+<path fill="none" stroke="#000000" d="M886.61,-3085C935.69,-3085 1012.35,-3085 1057.28,-3085"/>
+<polygon fill="#000000" stroke="#000000" points="1057.45,-3088.5 1067.45,-3085 1057.45,-3081.5 1057.45,-3088.5"/>
 </g>
-<!-- proc~symba_collision_consolidate_colliders -->
-<g id="call~~graph~~CallGraph_node334" class="node">
-<title>proc~symba_collision_consolidate_colliders</title>
-<g id="a_call~~graph~~CallGraph_node334"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="1191,-272 998,-272 998,-248 1191,-248 1191,-272"/>
-<text text-anchor="middle" x="1094.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
-</a>
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge333" class="edge">
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M886.65,-3088.74C910.22,-3087.97 937.37,-3082.46 954,-3064 1022.32,-2988.14 941.45,-2695.81 990,-2606 1005.16,-2577.96 1034.81,-2556.62 1058.51,-2543.06"/>
+<polygon fill="#000000" stroke="#000000" points="1060.5,-2545.95 1067.58,-2538.07 1057.13,-2539.82 1060.5,-2545.95"/>
 </g>
+<!-- interface~symba_util_rearray_pl -->
+<g id="call~~graph~~CallGraph_node343" class="node">
+<title>interface~symba_util_rearray_pl</title>
+<g id="a_call~~graph~~CallGraph_node343"><a xlink:href=".././interface/symba_util_rearray_pl.html" xlink:title="symba_util_rearray_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-10779 38,-10779 38,-10755 156,-10755 156,-10779"/>
+<text text-anchor="middle" x="97" y="-10764.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_rearray_pl</text>
+</a>
 </g>
-<!-- idx_arr -->
-<g id="call~~graph~~CallGraph_node688" class="node">
-<title>idx_arr</title>
-<polygon fill="#777777" stroke="#777777" points="1366.5,-272 1312.5,-272 1312.5,-248 1366.5,-248 1366.5,-272"/>
-<text text-anchor="middle" x="1339.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
-<g id="call~~graph~~CallGraph_edge336" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
-<path fill="none" stroke="#000000" d="M1191.19,-260C1230.11,-260 1272.73,-260 1302.07,-260"/>
-<polygon fill="#000000" stroke="#000000" points="1302.24,-263.5 1312.24,-260 1302.24,-256.5 1302.24,-263.5"/>
+<!-- proc~symba_util_rearray_pl -->
+<g id="call~~graph~~CallGraph_node582" class="node">
+<title>proc~symba_util_rearray_pl</title>
+<g id="a_call~~graph~~CallGraph_node582"><a xlink:href=".././proc/symba_util_rearray_pl.html" xlink:title="symba_util_rearray_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="386,-10779 268,-10779 268,-10755 386,-10755 386,-10779"/>
+<text text-anchor="middle" x="327" y="-10764.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_rearray_pl</text>
+</a>
 </g>
-<!-- id_arr -->
-<g id="call~~graph~~CallGraph_node737" class="node">
-<title>id_arr</title>
-<polygon fill="#777777" stroke="#777777" points="1366.5,-230 1312.5,-230 1312.5,-206 1366.5,-206 1366.5,-230"/>
-<text text-anchor="middle" x="1339.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
-<g id="call~~graph~~CallGraph_edge335" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
-<path fill="none" stroke="#000000" d="M1165.13,-247.96C1209.94,-240.22 1266.33,-230.47 1302.4,-224.24"/>
-<polygon fill="#000000" stroke="#000000" points="1303.2,-227.65 1312.46,-222.5 1302.01,-220.76 1303.2,-227.65"/>
+<!-- interface~symba_util_rearray_pl&#45;&gt;proc~symba_util_rearray_pl -->
+<g id="call~~graph~~CallGraph_edge336" class="edge">
+<title>interface~symba_util_rearray_pl&#45;&gt;proc~symba_util_rearray_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-10767C187.08,-10767 225.33,-10767 257.7,-10767"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-10770.5 267.98,-10767 257.98,-10763.5 257.98,-10770.5"/>
 </g>
-<!-- proc~drift_body -->
-<g id="call~~graph~~CallGraph_node336" class="node">
-<title>proc~drift_body</title>
-<g id="a_call~~graph~~CallGraph_node336"><a xlink:href=".././proc/drift_body.html" xlink:title="drift_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="357,-11270 297,-11270 297,-11246 357,-11246 357,-11270"/>
-<text text-anchor="middle" x="327" y="-11255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_body</text>
+<!-- interface~symba_util_reset_kinship -->
+<g id="call~~graph~~CallGraph_node344" class="node">
+<title>interface~symba_util_reset_kinship</title>
+<g id="a_call~~graph~~CallGraph_node344"><a xlink:href=".././interface/symba_util_reset_kinship.html" xlink:title="symba_util_reset_kinship">
+<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-10821 30.5,-10821 30.5,-10797 163.5,-10797 163.5,-10821"/>
+<text text-anchor="middle" x="97" y="-10806.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_reset_kinship</text>
 </a>
 </g>
 </g>
-<!-- interface~drift_all -->
-<g id="call~~graph~~CallGraph_node382" class="node">
-<title>interface~drift_all</title>
-<g id="a_call~~graph~~CallGraph_node382"><a xlink:href=".././interface/drift_all.html" xlink:title="drift_all">
-<polygon fill="#a7506f" stroke="#a7506f" points="601.5,-11270 547.5,-11270 547.5,-11246 601.5,-11246 601.5,-11270"/>
-<text text-anchor="middle" x="574.5" y="-11255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
+<!-- proc~symba_util_reset_kinship -->
+<g id="call~~graph~~CallGraph_node571" class="node">
+<title>proc~symba_util_reset_kinship</title>
+<g id="a_call~~graph~~CallGraph_node571"><a xlink:href=".././proc/symba_util_reset_kinship.html" xlink:title="symba_util_reset_kinship">
+<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-10821 260.5,-10821 260.5,-10797 393.5,-10797 393.5,-10821"/>
+<text text-anchor="middle" x="327" y="-10806.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_reset_kinship</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_body&#45;&gt;interface~drift_all -->
+<!-- interface~symba_util_reset_kinship&#45;&gt;proc~symba_util_reset_kinship -->
 <g id="call~~graph~~CallGraph_edge337" class="edge">
-<title>proc~drift_body&#45;&gt;interface~drift_all</title>
-<path fill="none" stroke="#000000" d="M357.13,-11258C402.09,-11258 488.32,-11258 537.26,-11258"/>
-<polygon fill="#000000" stroke="#000000" points="537.39,-11261.5 547.39,-11258 537.39,-11254.5 537.39,-11261.5"/>
+<title>interface~symba_util_reset_kinship&#45;&gt;proc~symba_util_reset_kinship</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-10809C190.71,-10809 222.24,-10809 250.27,-10809"/>
+<polygon fill="#000000" stroke="#000000" points="250.43,-10812.5 260.43,-10809 250.43,-10805.5 250.43,-10812.5"/>
 </g>
-<!-- proc~symba_util_spill_arr_kin -->
-<g id="call~~graph~~CallGraph_node337" class="node">
-<title>proc~symba_util_spill_arr_kin</title>
-<g id="a_call~~graph~~CallGraph_node337"><a xlink:href=".././proc/symba_util_spill_arr_kin.html" xlink:title="symba_util_spill_arr_kin">
-<polygon fill="#d9534f" stroke="#d9534f" points="160.5,-11312 33.5,-11312 33.5,-11288 160.5,-11288 160.5,-11312"/>
-<text text-anchor="middle" x="97" y="-11297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_arr_kin</text>
+<!-- proc~util_peri_tp -->
+<g id="call~~graph~~CallGraph_node345" class="node">
+<title>proc~util_peri_tp</title>
+<g id="a_call~~graph~~CallGraph_node345"><a xlink:href=".././proc/util_peri_tp.html" xlink:title="util_peri_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="359.5,-8502 294.5,-8502 294.5,-8478 359.5,-8478 359.5,-8502"/>
+<text text-anchor="middle" x="327" y="-8487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_peri_pl&#45;&gt;orbel_xv2aeq -->
+<!-- proc~util_peri_tp&#45;&gt;interface~orbel_xv2aeq -->
 <g id="call~~graph~~CallGraph_edge338" class="edge">
-<title>proc~symba_util_peri_pl&#45;&gt;orbel_xv2aeq</title>
-<path fill="none" stroke="#000000" d="M1619.9,-620.76C1642.47,-617.96 1668.97,-614.68 1691.23,-611.92"/>
-<polygon fill="#000000" stroke="#000000" points="1691.96,-615.36 1701.45,-610.65 1691.1,-608.41 1691.96,-615.36"/>
+<title>proc~util_peri_tp&#45;&gt;interface~orbel_xv2aeq</title>
+<path fill="none" stroke="#000000" d="M359.59,-8490C401.67,-8490 476.48,-8490 525.53,-8490"/>
+<polygon fill="#000000" stroke="#000000" points="525.59,-8493.5 535.59,-8490 525.59,-8486.5 525.59,-8493.5"/>
 </g>
-<!-- gr_kick_getacch -->
-<g id="call~~graph~~CallGraph_node725" class="node">
-<title>gr_kick_getacch</title>
-<polygon fill="#777777" stroke="#777777" points="619.5,-7408 529.5,-7408 529.5,-7384 619.5,-7384 619.5,-7408"/>
-<text text-anchor="middle" x="574.5" y="-7393.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getacch</text>
+<!-- proc~io_param_writer -->
+<g id="call~~graph~~CallGraph_node346" class="node">
+<title>proc~io_param_writer</title>
+<g id="a_call~~graph~~CallGraph_node346"><a xlink:href=".././proc/io_param_writer.html" xlink:title="io_param_writer">
+<polygon fill="#d9534f" stroke="#d9534f" points="372,-10863 282,-10863 282,-10839 372,-10839 372,-10863"/>
+<text text-anchor="middle" x="327" y="-10848.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_writer</text>
+</a>
 </g>
-<!-- proc~helio_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch -->
+</g>
+<!-- proc~io_write_frame_encounter&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge339" class="edge">
-<title>proc~helio_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch</title>
-<path fill="none" stroke="#000000" d="M393.79,-7411.37C433,-7408.02 482.17,-7403.81 519.16,-7400.65"/>
-<polygon fill="#000000" stroke="#000000" points="519.59,-7404.12 529.25,-7399.79 518.99,-7397.15 519.59,-7404.12"/>
+<title>proc~io_write_frame_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M908.29,-1061.6C923.95,-1058.44 940.09,-1053.55 954,-1046 1010.85,-1015.14 1057.99,-952.79 1080.05,-920.09"/>
+<polygon fill="#000000" stroke="#000000" points="1083.24,-921.61 1085.84,-911.34 1077.4,-917.75 1083.24,-921.61"/>
 </g>
-<!-- idx1 -->
-<g id="call~~graph~~CallGraph_node699" class="node">
-<title>idx1</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-230 1067.5,-230 1067.5,-206 1121.5,-206 1121.5,-230"/>
-<text text-anchor="middle" x="1094.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx1</text>
+<!-- whm_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node715" class="node">
+<title>whm_kick_getacch_tp</title>
+<polygon fill="#777777" stroke="#777777" points="633.5,-4630 515.5,-4630 515.5,-4606 633.5,-4606 633.5,-4630"/>
+<text text-anchor="middle" x="574.5" y="-4615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
 </g>
-<!-- proc~symba_collision_encounter_extract_collisions&#45;&gt;idx1 -->
+<!-- proc~rmvs_kick_getacch_tp&#45;&gt;whm_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_edge340" class="edge">
+<title>proc~rmvs_kick_getacch_tp&#45;&gt;whm_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" d="M386.18,-4618C421.82,-4618 467.62,-4618 505.01,-4618"/>
+<polygon fill="#000000" stroke="#000000" points="505.31,-4621.5 515.31,-4618 505.31,-4614.5 505.31,-4621.5"/>
+</g>
+<!-- proc~io_write_frame_system&#45;&gt;interface~util_exit -->
 <g id="call~~graph~~CallGraph_edge341" class="edge">
-<title>proc~symba_collision_encounter_extract_collisions&#45;&gt;idx1</title>
-<path fill="none" stroke="#000000" d="M941.95,-200.03C982.77,-204.87 1027.23,-210.14 1057.37,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="1057.06,-217.2 1067.4,-214.91 1057.88,-210.25 1057.06,-217.2"/>
+<title>proc~io_write_frame_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M901.25,-1019.06C918.77,-1015.95 937.58,-1011.22 954,-1004 1002.08,-982.87 1048.97,-942.25 1074.27,-918.2"/>
+<polygon fill="#000000" stroke="#000000" points="1076.94,-920.48 1081.69,-911.02 1072.07,-915.45 1076.94,-920.48"/>
 </g>
-<!-- idx2 -->
-<g id="call~~graph~~CallGraph_node717" class="node">
-<title>idx2</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-188 1067.5,-188 1067.5,-164 1121.5,-164 1121.5,-188"/>
-<text text-anchor="middle" x="1094.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
+<!-- proc~io_read_in_body -->
+<g id="call~~graph~~CallGraph_node351" class="node">
+<title>proc~io_read_in_body</title>
+<g id="a_call~~graph~~CallGraph_node351"><a xlink:href=".././proc/io_read_in_body.html" xlink:title="io_read_in_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="373,-10905 281,-10905 281,-10881 373,-10881 373,-10905"/>
+<text text-anchor="middle" x="327" y="-10890.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_body</text>
+</a>
 </g>
-<!-- proc~symba_collision_encounter_extract_collisions&#45;&gt;idx2 -->
-<g id="call~~graph~~CallGraph_edge340" class="edge">
-<title>proc~symba_collision_encounter_extract_collisions&#45;&gt;idx2</title>
-<path fill="none" stroke="#000000" d="M954.05,-182.61C991.28,-180.85 1030.01,-179.01 1057.19,-177.72"/>
-<polygon fill="#000000" stroke="#000000" points="1057.54,-181.21 1067.36,-177.24 1057.21,-174.22 1057.54,-181.21"/>
 </g>
-<!-- proc~drift_all -->
-<g id="call~~graph~~CallGraph_node342" class="node">
-<title>proc~drift_all</title>
-<g id="a_call~~graph~~CallGraph_node342"><a xlink:href=".././proc/drift_all.html" xlink:title="drift_all">
-<polygon fill="#d9534f" stroke="#d9534f" points="866.5,-11270 812.5,-11270 812.5,-11246 866.5,-11246 866.5,-11270"/>
-<text text-anchor="middle" x="839.5" y="-11255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
+<!-- proc~util_spill_encounter&#45;&gt;interface~util_spill~2 -->
+<g id="call~~graph~~CallGraph_edge342" class="edge">
+<title>proc~util_spill_encounter&#45;&gt;interface~util_spill~2</title>
+<path fill="none" stroke="#000000" d="M891.67,-6291.44C911.19,-6286.98 933.64,-6281.81 954,-6277 989.22,-6268.67 1029.35,-6258.86 1057.5,-6251.92"/>
+<polygon fill="#000000" stroke="#000000" points="1058.43,-6255.29 1067.3,-6249.5 1056.75,-6248.5 1058.43,-6255.29"/>
+</g>
+<!-- proc~whm_util_append_pl -->
+<g id="call~~graph~~CallGraph_node355" class="node">
+<title>proc~whm_util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node355"><a xlink:href=".././proc/whm_util_append_pl.html" xlink:title="whm_util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="895,-2723 784,-2723 784,-2699 895,-2699 895,-2723"/>
+<text text-anchor="middle" x="839.5" y="-2708.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
+</a>
+</g>
+</g>
+<!-- proc~whm_util_append_pl&#45;&gt;util_append -->
+<g id="call~~graph~~CallGraph_edge345" class="edge">
+<title>proc~whm_util_append_pl&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M895.09,-2701.94C941.52,-2694.23 1007.31,-2683.31 1050.19,-2676.19"/>
+<polygon fill="#000000" stroke="#000000" points="1051.01,-2679.6 1060.3,-2674.51 1049.87,-2672.7 1051.01,-2679.6"/>
+</g>
+<!-- proc~whm_util_append_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge343" class="edge">
+<title>proc~whm_util_append_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M895.23,-2711.41C915.52,-2709.03 937.57,-2703.14 954,-2690 985.72,-2664.64 965.13,-2638.12 990,-2606 1010.13,-2580 1040.59,-2557.82 1063.27,-2543.46"/>
+<polygon fill="#000000" stroke="#000000" points="1065.17,-2546.39 1071.84,-2538.16 1061.49,-2540.44 1065.17,-2546.39"/>
+</g>
+<!-- util_append_pl -->
+<g id="call~~graph~~CallGraph_node774" class="node">
+<title>util_append_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1135.5,-2789 1053.5,-2789 1053.5,-2765 1135.5,-2765 1135.5,-2789"/>
+<text text-anchor="middle" x="1094.5" y="-2774.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+</g>
+<!-- proc~whm_util_append_pl&#45;&gt;util_append_pl -->
+<g id="call~~graph~~CallGraph_edge344" class="edge">
+<title>proc~whm_util_append_pl&#45;&gt;util_append_pl</title>
+<path fill="none" stroke="#000000" d="M895.08,-2719.63C913.86,-2722.98 934.96,-2727.19 954,-2732 986.85,-2740.3 1023.27,-2752.14 1050.65,-2761.59"/>
+<polygon fill="#000000" stroke="#000000" points="1049.71,-2764.97 1060.31,-2764.95 1052.02,-2758.36 1049.71,-2764.97"/>
+</g>
+<!-- proc~operator_cross_el_i4b -->
+<g id="call~~graph~~CallGraph_node356" class="node">
+<title>proc~operator_cross_el_i4b</title>
+<g id="a_call~~graph~~CallGraph_node356"><a xlink:href=".././proc/operator_cross_el_i4b.html" xlink:title="operator_cross_el_i4b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-10947 37.5,-10947 37.5,-10923 156.5,-10923 156.5,-10947"/>
+<text text-anchor="middle" x="97" y="-10932.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i4b</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_spill_encounter -->
-<g id="call~~graph~~CallGraph_node344" class="node">
-<title>proc~symba_util_spill_encounter</title>
-<g id="a_call~~graph~~CallGraph_node344"><a xlink:href=".././proc/symba_util_spill_encounter.html" xlink:title="symba_util_spill_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="910.5,-1667 768.5,-1667 768.5,-1643 910.5,-1643 910.5,-1667"/>
-<text text-anchor="middle" x="839.5" y="-1652.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_encounter</text>
+<!-- proc~symba_discard_pl -->
+<g id="call~~graph~~CallGraph_node357" class="node">
+<title>proc~symba_discard_pl</title>
+<g id="a_call~~graph~~CallGraph_node357"><a xlink:href=".././proc/symba_discard_pl.html" xlink:title="symba_discard_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="889,-1912 790,-1912 790,-1888 889,-1888 889,-1912"/>
+<text text-anchor="middle" x="839.5" y="-1897.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_spill_encounter&#45;&gt;interface~util_spill -->
-<g id="call~~graph~~CallGraph_edge344" class="edge">
-<title>proc~symba_util_spill_encounter&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M910.64,-1646.41C958.23,-1640.58 1019.19,-1633.11 1057.3,-1628.44"/>
-<polygon fill="#000000" stroke="#000000" points="1057.92,-1631.89 1067.42,-1627.2 1057.06,-1624.94 1057.92,-1631.89"/>
+<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl -->
+<g id="call~~graph~~CallGraph_edge346" class="edge">
+<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl</title>
+<path fill="none" stroke="#000000" d="M889.28,-1895.95C926.9,-1892.83 979.49,-1888.46 1021.89,-1884.94"/>
+<polygon fill="#000000" stroke="#000000" points="1022.2,-1888.43 1031.87,-1884.12 1021.62,-1881.45 1022.2,-1888.43"/>
 </g>
-<!-- util_spill_encounter -->
-<g id="call~~graph~~CallGraph_node698" class="node">
-<title>util_spill_encounter</title>
-<polygon fill="#777777" stroke="#777777" points="1146.5,-1678 1042.5,-1678 1042.5,-1654 1146.5,-1654 1146.5,-1678"/>
-<text text-anchor="middle" x="1094.5" y="-1663.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
+<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation -->
+<g id="call~~graph~~CallGraph_edge347" class="edge">
+<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation</title>
+<path fill="none" stroke="#000000" d="M889.28,-1904.05C917.44,-1906.39 954,-1909.42 988.38,-1912.28"/>
+<polygon fill="#000000" stroke="#000000" points="988.24,-1915.77 998.49,-1913.11 988.82,-1908.8 988.24,-1915.77"/>
 </g>
-<!-- proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter -->
-<g id="call~~graph~~CallGraph_edge343" class="edge">
-<title>proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter</title>
-<path fill="none" stroke="#000000" d="M910.64,-1658.05C948.73,-1659.71 995.4,-1661.73 1032.06,-1663.33"/>
-<polygon fill="#000000" stroke="#000000" points="1031.97,-1666.83 1042.12,-1663.77 1032.28,-1659.83 1031.97,-1666.83"/>
+<!-- proc~gr_pv2vh_body -->
+<g id="call~~graph~~CallGraph_node358" class="node">
+<title>proc~gr_pv2vh_body</title>
+<g id="a_call~~graph~~CallGraph_node358"><a xlink:href=".././proc/gr_pv2vh_body.html" xlink:title="gr_pv2vh_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="370,-10989 284,-10989 284,-10965 370,-10965 370,-10989"/>
+<text text-anchor="middle" x="327" y="-10974.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pv2vh_body</text>
+</a>
 </g>
-<!-- proc~symba_util_spill_encounter&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge342" class="edge">
-<title>proc~symba_util_spill_encounter&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M910.42,-1642.94C927.17,-1636.71 943.28,-1627.28 954,-1613 1021.4,-1523.19 924,-1199.84 990,-1109 1005.59,-1087.54 1034.06,-1077.03 1057.2,-1071.88"/>
-<polygon fill="#000000" stroke="#000000" points="1057.93,-1075.31 1067.06,-1069.93 1056.58,-1068.44 1057.93,-1075.31"/>
 </g>
-<!-- proc~helio_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch -->
-<g id="call~~graph~~CallGraph_edge345" class="edge">
-<title>proc~helio_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch</title>
-<path fill="none" stroke="#000000" d="M393.79,-7380.63C433,-7383.98 482.17,-7388.19 519.16,-7391.35"/>
-<polygon fill="#000000" stroke="#000000" points="518.99,-7394.85 529.25,-7392.21 519.59,-7387.88 518.99,-7394.85"/>
+<!-- proc~operator_cross_el_i8b -->
+<g id="call~~graph~~CallGraph_node359" class="node">
+<title>proc~operator_cross_el_i8b</title>
+<g id="a_call~~graph~~CallGraph_node359"><a xlink:href=".././proc/operator_cross_el_i8b.html" xlink:title="operator_cross_el_i8b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-11031 37.5,-11031 37.5,-11007 156.5,-11007 156.5,-11031"/>
+<text text-anchor="middle" x="97" y="-11016.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i8b</text>
+</a>
 </g>
-<!-- gr_p4_pos_kick -->
-<g id="call~~graph~~CallGraph_node689" class="node">
-<title>gr_p4_pos_kick</title>
-<polygon fill="#777777" stroke="#777777" points="618.5,-7576 530.5,-7576 530.5,-7552 618.5,-7552 618.5,-7576"/>
-<text text-anchor="middle" x="574.5" y="-7561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_p4_pos_kick</text>
 </g>
-<!-- proc~helio_gr_p4_pl&#45;&gt;gr_p4_pos_kick -->
-<g id="call~~graph~~CallGraph_edge346" class="edge">
-<title>proc~helio_gr_p4_pl&#45;&gt;gr_p4_pos_kick</title>
-<path fill="none" stroke="#000000" d="M368.54,-7581.53C410.07,-7577.98 474.83,-7572.44 520.42,-7568.54"/>
-<polygon fill="#000000" stroke="#000000" points="520.76,-7572.02 530.42,-7567.68 520.16,-7565.05 520.76,-7572.02"/>
+<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
+<g id="call~~graph~~CallGraph_edge348" class="edge">
+<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M880.59,-475.99C922.39,-472.85 988.3,-467.9 1035.71,-464.34"/>
+<polygon fill="#000000" stroke="#000000" points="1036.13,-467.82 1045.84,-463.58 1035.6,-460.84 1036.13,-467.82"/>
 </g>
-<!-- proc~kick_getacch_int_one_pl -->
-<g id="call~~graph~~CallGraph_node348" class="node">
-<title>proc~kick_getacch_int_one_pl</title>
-<g id="a_call~~graph~~CallGraph_node348"><a xlink:href=".././proc/kick_getacch_int_one_pl.html" xlink:title="kick_getacch_int_one_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="392,-11354 262,-11354 262,-11330 392,-11330 392,-11354"/>
-<text text-anchor="middle" x="327" y="-11339.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_pl</text>
-</a>
+<!-- proc~util_append_pl&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge350" class="edge">
+<title>proc~util_append_pl&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M880.76,-476.24C904.94,-476.81 934.67,-481.8 954,-500 1002.35,-545.51 969.42,-581.87 990,-645 1018.76,-733.23 1063.71,-834.32 1083.54,-877.56"/>
+<polygon fill="#000000" stroke="#000000" points="1080.43,-879.2 1087.8,-886.81 1086.79,-876.27 1080.43,-879.2"/>
 </g>
+<!-- proc~util_append_pl&#45;&gt;interface~util_append~2 -->
+<g id="call~~graph~~CallGraph_edge349" class="edge">
+<title>proc~util_append_pl&#45;&gt;interface~util_append~2</title>
+<path fill="none" stroke="#000000" d="M880.77,-483.72C978.26,-494.17 1234.42,-515.66 1444,-481 1474.05,-476.03 1506.6,-464.69 1530.74,-455.05"/>
+<polygon fill="#000000" stroke="#000000" points="1532.28,-458.2 1540.21,-451.18 1529.63,-451.72 1532.28,-458.2"/>
 </g>
-<!-- proc~kick_getacch_int_all_pl -->
-<g id="call~~graph~~CallGraph_node349" class="node">
-<title>proc~kick_getacch_int_all_pl</title>
-<g id="a_call~~graph~~CallGraph_node349"><a xlink:href=".././proc/kick_getacch_int_all_pl.html" xlink:title="kick_getacch_int_all_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="900.5,-11396 778.5,-11396 778.5,-11372 900.5,-11372 900.5,-11396"/>
-<text text-anchor="middle" x="839.5" y="-11381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_pl</text>
+<!-- proc~whm_util_resize_pl -->
+<g id="call~~graph~~CallGraph_node361" class="node">
+<title>proc~whm_util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node361"><a xlink:href=".././proc/whm_util_resize_pl.html" xlink:title="whm_util_resize_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="891,-4902 788,-4902 788,-4878 891,-4878 891,-4902"/>
+<text text-anchor="middle" x="839.5" y="-4887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepmd -->
-<g id="call~~graph~~CallGraph_node350" class="node">
-<title>proc~drift_kepmd</title>
-<g id="a_call~~graph~~CallGraph_node350"><a xlink:href=".././proc/drift_kepmd.html" xlink:title="drift_kepmd">
-<polygon fill="#d9534f" stroke="#d9534f" points="874,-6240 805,-6240 805,-6216 874,-6216 874,-6240"/>
-<text text-anchor="middle" x="839.5" y="-6225.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepmd</text>
-</a>
+<!-- proc~whm_util_resize_pl&#45;&gt;util_resize_pl -->
+<g id="call~~graph~~CallGraph_edge351" class="edge">
+<title>proc~whm_util_resize_pl&#45;&gt;util_resize_pl</title>
+<path fill="none" stroke="#000000" d="M891.14,-4881.03C910.8,-4877.44 933.48,-4873.18 954,-4869 985.04,-4862.68 1019.82,-4854.95 1046.89,-4848.79"/>
+<polygon fill="#000000" stroke="#000000" points="1047.89,-4852.16 1056.86,-4846.52 1046.33,-4845.33 1047.89,-4852.16"/>
 </g>
+<!-- proc~whm_util_resize_pl&#45;&gt;util_resize -->
+<g id="call~~graph~~CallGraph_edge352" class="edge">
+<title>proc~whm_util_resize_pl&#45;&gt;util_resize</title>
+<path fill="none" stroke="#000000" d="M891.09,-4898.4C939.02,-4906.35 1010.01,-4918.14 1053.93,-4925.43"/>
+<polygon fill="#000000" stroke="#000000" points="1053.51,-4928.91 1063.95,-4927.09 1054.65,-4922 1053.51,-4928.91"/>
 </g>
-<!-- proc~symba_util_spill_pl -->
-<g id="call~~graph~~CallGraph_node351" class="node">
-<title>proc~symba_util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node351"><a xlink:href=".././proc/symba_util_spill_pl.html" xlink:title="symba_util_spill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="890.5,-1604 788.5,-1604 788.5,-1580 890.5,-1580 890.5,-1604"/>
-<text text-anchor="middle" x="839.5" y="-1589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_pl</text>
+<!-- proc~whm_util_fill_pl -->
+<g id="call~~graph~~CallGraph_node362" class="node">
+<title>proc~whm_util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node362"><a xlink:href=".././proc/whm_util_fill_pl.html" xlink:title="whm_util_fill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="882,-2311 797,-2311 797,-2287 882,-2287 882,-2311"/>
+<text text-anchor="middle" x="839.5" y="-2296.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_spill_pl&#45;&gt;interface~util_spill -->
-<g id="call~~graph~~CallGraph_edge349" class="edge">
-<title>proc~symba_util_spill_pl&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M890.79,-1598.36C939.91,-1604.57 1013.48,-1613.88 1057.17,-1619.41"/>
-<polygon fill="#000000" stroke="#000000" points="1056.98,-1622.91 1067.34,-1620.69 1057.86,-1615.96 1056.98,-1622.91"/>
+<!-- proc~whm_util_fill_pl&#45;&gt;util_fill -->
+<g id="call~~graph~~CallGraph_edge355" class="edge">
+<title>proc~whm_util_fill_pl&#45;&gt;util_fill</title>
+<path fill="none" stroke="#000000" d="M882.07,-2302.23C906.27,-2301.75 935.56,-2296.68 954,-2278 1020.52,-2210.6 924.07,-2135.97 990,-2068 1007.08,-2050.39 1034.58,-2045.45 1056.95,-2044.75"/>
+<polygon fill="#000000" stroke="#000000" points="1057.14,-2048.25 1067.12,-2044.7 1057.1,-2041.25 1057.14,-2048.25"/>
 </g>
-<!-- proc~symba_util_spill_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge347" class="edge">
-<title>proc~symba_util_spill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M890.68,-1595.56C913.26,-1594.31 938.32,-1588.43 954,-1571 1022.89,-1494.46 929.2,-1192.12 990,-1109 1005.66,-1087.59 1034.12,-1077.07 1057.25,-1071.92"/>
-<polygon fill="#000000" stroke="#000000" points="1057.97,-1075.34 1067.1,-1069.96 1056.61,-1068.47 1057.97,-1075.34"/>
+<!-- util_fill_pl -->
+<g id="call~~graph~~CallGraph_node735" class="node">
+<title>util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1122.5,-2395 1066.5,-2395 1066.5,-2371 1122.5,-2371 1122.5,-2395"/>
+<text text-anchor="middle" x="1094.5" y="-2380.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </g>
-<!-- proc~symba_util_spill_pl&#45;&gt;util_spill_pl -->
-<g id="call~~graph~~CallGraph_edge348" class="edge">
-<title>proc~symba_util_spill_pl&#45;&gt;util_spill_pl</title>
-<path fill="none" stroke="#000000" d="M890.79,-1590.01C938.15,-1588.14 1008.23,-1585.37 1052.35,-1583.63"/>
-<polygon fill="#000000" stroke="#000000" points="1052.58,-1587.12 1062.44,-1583.23 1052.31,-1580.13 1052.58,-1587.12"/>
+<!-- proc~whm_util_fill_pl&#45;&gt;util_fill_pl -->
+<g id="call~~graph~~CallGraph_edge354" class="edge">
+<title>proc~whm_util_fill_pl&#45;&gt;util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M882.19,-2300.05C904.72,-2302.2 932.29,-2307.5 954,-2320 975.3,-2332.27 968.8,-2349.55 990,-2362 1010.02,-2373.76 1035.55,-2379.02 1056.25,-2381.34"/>
+<polygon fill="#000000" stroke="#000000" points="1055.99,-2384.83 1066.27,-2382.28 1056.64,-2377.86 1055.99,-2384.83"/>
 </g>
-<!-- proc~kick_getacch_int_one_tp -->
-<g id="call~~graph~~CallGraph_node352" class="node">
-<title>proc~kick_getacch_int_one_tp</title>
-<g id="a_call~~graph~~CallGraph_node352"><a xlink:href=".././proc/kick_getacch_int_one_tp.html" xlink:title="kick_getacch_int_one_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="392,-11438 262,-11438 262,-11414 392,-11414 392,-11438"/>
-<text text-anchor="middle" x="327" y="-11423.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_tp</text>
+<!-- proc~whm_util_fill_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge353" class="edge">
+<title>proc~whm_util_fill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M882.19,-2296.53C905.98,-2297.38 934.8,-2302.55 954,-2320 997.1,-2359.17 957.33,-2397.79 990,-2446 1008.22,-2472.89 1038.38,-2494.7 1061.46,-2508.72"/>
+<polygon fill="#000000" stroke="#000000" points="1059.84,-2511.83 1070.23,-2513.88 1063.39,-2505.79 1059.84,-2511.83"/>
+</g>
+<!-- proc~whm_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node363" class="node">
+<title>proc~whm_util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node363"><a xlink:href=".././proc/whm_util_sort_rearrange_pl.html" xlink:title="whm_util_sort_rearrange_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="400,-5416 254,-5416 254,-5392 400,-5392 400,-5416"/>
+<text text-anchor="middle" x="327" y="-5401.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_one -->
-<g id="call~~graph~~CallGraph_node353" class="node">
-<title>proc~drift_one</title>
-<g id="a_call~~graph~~CallGraph_node353"><a xlink:href=".././proc/drift_one.html" xlink:title="drift_one">
-<polygon fill="#d9534f" stroke="#d9534f" points="354.5,-11480 299.5,-11480 299.5,-11456 354.5,-11456 354.5,-11480"/>
-<text text-anchor="middle" x="327" y="-11465.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_one</text>
+<!-- proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_edge356" class="edge">
+<title>proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" d="M388.43,-5391.95C410.89,-5387.5 436.6,-5382.47 460,-5378 474.63,-5375.21 490.34,-5372.26 505.26,-5369.49"/>
+<polygon fill="#000000" stroke="#000000" points="506.25,-5372.87 515.44,-5367.61 504.97,-5365.99 506.25,-5372.87"/>
+</g>
+<!-- proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange -->
+<g id="call~~graph~~CallGraph_edge357" class="edge">
+<title>proc~whm_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M400.33,-5402.53C435.96,-5401.8 478.46,-5400.94 512.43,-5400.24"/>
+<polygon fill="#000000" stroke="#000000" points="512.76,-5403.74 522.69,-5400.03 512.62,-5396.74 512.76,-5403.74"/>
+</g>
+<!-- proc~symba_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node364" class="node">
+<title>proc~symba_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node364"><a xlink:href=".././proc/symba_setup_initialize_system.html" xlink:title="symba_setup_initialize_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="407,-11073 247,-11073 247,-11049 407,-11049 407,-11073"/>
+<text text-anchor="middle" x="327" y="-11058.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message -->
-<g id="call~~graph~~CallGraph_edge350" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M1421.17,-374.98C1436.9,-372.84 1453.54,-370.56 1469.75,-368.35"/>
-<polygon fill="#000000" stroke="#000000" points="1470.33,-371.8 1479.77,-366.98 1469.39,-364.87 1470.33,-371.8"/>
+<!-- helio_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node766" class="node">
+<title>helio_setup_initialize_system</title>
+<polygon fill="#777777" stroke="#777777" points="650,-11073 499,-11073 499,-11049 650,-11049 650,-11073"/>
+<text text-anchor="middle" x="574.5" y="-11058.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup_initialize_system</text>
 </g>
-<!-- proc~symba_collision_mergeaddsub -->
-<g id="call~~graph~~CallGraph_node533" class="node">
-<title>proc~symba_collision_mergeaddsub</title>
-<g id="a_call~~graph~~CallGraph_node533"><a xlink:href=".././proc/symba_collision_mergeaddsub.html" xlink:title="symba_collision_mergeaddsub">
-<polygon fill="#d9534f" stroke="#d9534f" points="1648.5,-325 1488.5,-325 1488.5,-301 1648.5,-301 1648.5,-325"/>
-<text text-anchor="middle" x="1568.5" y="-310.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_mergeaddsub</text>
+<!-- proc~symba_setup_initialize_system&#45;&gt;helio_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge358" class="edge">
+<title>proc~symba_setup_initialize_system&#45;&gt;helio_setup_initialize_system</title>
+<path fill="none" stroke="#000000" d="M407.03,-11061C433.13,-11061 462.27,-11061 488.78,-11061"/>
+<polygon fill="#000000" stroke="#000000" points="488.8,-11064.5 498.8,-11061 488.8,-11057.5 488.8,-11064.5"/>
+</g>
+<!-- proc~gr_vel2pseudovel -->
+<g id="call~~graph~~CallGraph_node365" class="node">
+<title>proc~gr_vel2pseudovel</title>
+<g id="a_call~~graph~~CallGraph_node365"><a xlink:href=".././proc/gr_vel2pseudovel.html" xlink:title="gr_vel2pseudovel">
+<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-11115 278.5,-11115 278.5,-11091 375.5,-11091 375.5,-11115"/>
+<text text-anchor="middle" x="327" y="-11100.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vel2pseudovel</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub -->
-<g id="call~~graph~~CallGraph_edge351" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M1420.97,-373.95C1428.94,-371.5 1436.76,-368.55 1444,-365 1462.96,-355.71 1461.21,-343.62 1480,-334 1483.94,-331.98 1488.08,-330.16 1492.32,-328.5"/>
-<polygon fill="#000000" stroke="#000000" points="1493.51,-331.79 1501.75,-325.14 1491.16,-325.2 1493.51,-331.79"/>
+<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
+<g id="call~~graph~~CallGraph_edge359" class="edge">
+<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M881.15,-440.7C922.92,-444.49 988.34,-450.44 1035.54,-454.73"/>
+<polygon fill="#000000" stroke="#000000" points="1035.34,-458.23 1045.61,-455.65 1035.97,-451.26 1035.34,-458.23"/>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge352" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M1421.17,-393.46C1440.6,-395.26 1461.42,-397.19 1481.1,-399.01"/>
-<polygon fill="#000000" stroke="#000000" points="1480.99,-402.51 1491.27,-399.95 1481.63,-395.54 1480.99,-402.51"/>
+<!-- proc~util_append_tp&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge361" class="edge">
+<title>proc~util_append_tp&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M881.1,-433.89C905.41,-434.32 935.16,-439.29 954,-458 1014.06,-517.63 965.91,-563.86 990,-645 1016.41,-733.96 1062.59,-834.67 1083.13,-877.69"/>
+<polygon fill="#000000" stroke="#000000" points="1080.07,-879.39 1087.56,-886.89 1086.38,-876.36 1080.07,-879.39"/>
 </g>
-<!-- proc~helio_gr_p4_tp&#45;&gt;gr_p4_pos_kick -->
-<g id="call~~graph~~CallGraph_edge353" class="edge">
-<title>proc~helio_gr_p4_tp&#45;&gt;gr_p4_pos_kick</title>
-<path fill="none" stroke="#000000" d="M369.09,-7546.51C410.5,-7550.06 474.6,-7555.54 519.97,-7559.42"/>
-<polygon fill="#000000" stroke="#000000" points="519.94,-7562.93 530.21,-7560.3 520.54,-7555.96 519.94,-7562.93"/>
+<!-- proc~util_append_tp&#45;&gt;interface~util_append~2 -->
+<g id="call~~graph~~CallGraph_edge360" class="edge">
+<title>proc~util_append_tp&#45;&gt;interface~util_append~2</title>
+<path fill="none" stroke="#000000" d="M881.23,-433.24C904.27,-429.48 932.64,-421.98 954,-407 977.01,-390.86 965.1,-368.05 990,-355 1079.37,-308.18 1347.58,-325.32 1444,-355 1485.05,-367.64 1524.69,-399.09 1547.55,-419.72"/>
+<polygon fill="#000000" stroke="#000000" points="1545.47,-422.56 1555.19,-426.78 1550.22,-417.42 1545.47,-422.56"/>
 </g>
-<!-- interface~util_spill_body -->
-<g id="call~~graph~~CallGraph_node356" class="node">
-<title>interface~util_spill_body</title>
-<g id="a_call~~graph~~CallGraph_node356"><a xlink:href=".././interface/util_spill_body.html" xlink:title="util_spill_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="614,-11553 535,-11553 535,-11529 614,-11529 614,-11553"/>
-<text text-anchor="middle" x="574.5" y="-11538.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
+<!-- proc~whm_util_set_ir3j -->
+<g id="call~~graph~~CallGraph_node368" class="node">
+<title>proc~whm_util_set_ir3j</title>
+<g id="a_call~~graph~~CallGraph_node368"><a xlink:href=".././proc/whm_util_set_ir3j.html" xlink:title="whm_util_set_ir3j">
+<polygon fill="#d9534f" stroke="#d9534f" points="374.5,-11157 279.5,-11157 279.5,-11133 374.5,-11133 374.5,-11157"/>
+<text text-anchor="middle" x="327" y="-11142.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_ir3j</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_body -->
-<g id="call~~graph~~CallGraph_node614" class="node">
-<title>proc~util_spill_body</title>
-<g id="a_call~~graph~~CallGraph_node614"><a xlink:href=".././proc/util_spill_body.html" xlink:title="util_spill_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="879,-11553 800,-11553 800,-11529 879,-11529 879,-11553"/>
-<text text-anchor="middle" x="839.5" y="-11538.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_body</text>
+<!-- proc~symba_collision_resolve_plplenc -->
+<g id="call~~graph~~CallGraph_node369" class="node">
+<title>proc~symba_collision_resolve_plplenc</title>
+<g id="a_call~~graph~~CallGraph_node369"><a xlink:href=".././proc/symba_collision_resolve_plplenc.html" xlink:title="symba_collision_resolve_plplenc">
+<polygon fill="#d9534f" stroke="#d9534f" points="1423.5,-1996 1255.5,-1996 1255.5,-1972 1423.5,-1972 1423.5,-1996"/>
+<text text-anchor="middle" x="1339.5" y="-1981.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_plplenc</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_body&#45;&gt;proc~util_spill_body -->
-<g id="call~~graph~~CallGraph_edge354" class="edge">
-<title>interface~util_spill_body&#45;&gt;proc~util_spill_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.02,-11541C660.61,-11541 739.07,-11541 789.8,-11541"/>
-<polygon fill="#000000" stroke="#000000" points="789.87,-11544.5 799.87,-11541 789.87,-11537.5 789.87,-11544.5"/>
+<!-- proc~symba_collision_resolve_plplenc&#45;&gt;fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge362" class="edge">
+<title>proc~symba_collision_resolve_plplenc&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M1364.36,-1971.91C1405.15,-1951.25 1488.34,-1909.1 1534.6,-1885.67"/>
+<polygon fill="#000000" stroke="#000000" points="1536.28,-1888.74 1543.62,-1881.1 1533.11,-1882.5 1536.28,-1888.74"/>
 </g>
-<!-- proc~symba_util_resize_arr_kin -->
-<g id="call~~graph~~CallGraph_node357" class="node">
-<title>proc~symba_util_resize_arr_kin</title>
-<g id="a_call~~graph~~CallGraph_node357"><a xlink:href=".././proc/symba_util_resize_arr_kin.html" xlink:title="symba_util_resize_arr_kin">
-<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-11625 28.5,-11625 28.5,-11601 165.5,-11601 165.5,-11625"/>
-<text text-anchor="middle" x="97" y="-11610.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_arr_kin</text>
+<!-- proc~whm_util_sort_pl -->
+<g id="call~~graph~~CallGraph_node370" class="node">
+<title>proc~whm_util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node370"><a xlink:href=".././proc/whm_util_sort_pl.html" xlink:title="whm_util_sort_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="373.5,-9048 280.5,-9048 280.5,-9024 373.5,-9024 373.5,-9048"/>
+<text text-anchor="middle" x="327" y="-9033.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_dan -->
-<g id="call~~graph~~CallGraph_node358" class="node">
-<title>proc~drift_dan</title>
-<g id="a_call~~graph~~CallGraph_node358"><a xlink:href=".././proc/drift_dan.html" xlink:title="drift_dan">
-<polygon fill="#d9534f" stroke="#d9534f" points="602,-6261 547,-6261 547,-6237 602,-6237 602,-6261"/>
-<text text-anchor="middle" x="574.5" y="-6246.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_dan</text>
+<!-- proc~whm_util_sort_pl&#45;&gt;util_sort_pl -->
+<g id="call~~graph~~CallGraph_edge363" class="edge">
+<title>proc~whm_util_sort_pl&#45;&gt;util_sort_pl</title>
+<path fill="none" stroke="#000000" d="M373.6,-9032.1C419.05,-9028.21 488.21,-9022.3 532.12,-9018.54"/>
+<polygon fill="#000000" stroke="#000000" points="532.5,-9022.02 542.16,-9017.68 531.9,-9015.05 532.5,-9022.02"/>
+</g>
+<!-- proc~gr_vh2pv_body -->
+<g id="call~~graph~~CallGraph_node371" class="node">
+<title>proc~gr_vh2pv_body</title>
+<g id="a_call~~graph~~CallGraph_node371"><a xlink:href=".././proc/gr_vh2pv_body.html" xlink:title="gr_vh2pv_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="370,-11199 284,-11199 284,-11175 370,-11175 370,-11199"/>
+<text text-anchor="middle" x="327" y="-11184.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vh2pv_body</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
-<g id="call~~graph~~CallGraph_edge355" class="edge">
-<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
-<path fill="none" stroke="#000000" d="M602.17,-6251.13C648.69,-6254.84 744.89,-6262.53 799.11,-6266.85"/>
-<polygon fill="#000000" stroke="#000000" points="799.12,-6270.37 809.37,-6267.67 799.68,-6263.39 799.12,-6270.37"/>
+<!-- proc~whm_util_spill_pl -->
+<g id="call~~graph~~CallGraph_node372" class="node">
+<title>proc~whm_util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node372"><a xlink:href=".././proc/whm_util_spill_pl.html" xlink:title="whm_util_spill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="886,-3055 793,-3055 793,-3031 886,-3031 886,-3055"/>
+<text text-anchor="middle" x="839.5" y="-3040.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
+</a>
 </g>
-<!-- proc~drift_dan&#45;&gt;proc~drift_kepmd -->
-<g id="call~~graph~~CallGraph_edge356" class="edge">
-<title>proc~drift_dan&#45;&gt;proc~drift_kepmd</title>
-<path fill="none" stroke="#000000" d="M602.17,-6246.87C647.44,-6243.26 739.74,-6235.89 794.64,-6231.5"/>
-<polygon fill="#000000" stroke="#000000" points="795.08,-6234.98 804.77,-6230.69 794.52,-6228 795.08,-6234.98"/>
 </g>
-<!-- interface~util_spill_encounter -->
-<g id="call~~graph~~CallGraph_node359" class="node">
-<title>interface~util_spill_encounter</title>
-<g id="a_call~~graph~~CallGraph_node359"><a xlink:href=".././interface/util_spill_encounter.html" xlink:title="util_spill_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="626.5,-11473 522.5,-11473 522.5,-11449 626.5,-11449 626.5,-11473"/>
-<text text-anchor="middle" x="574.5" y="-11458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
+<!-- proc~whm_util_spill_pl&#45;&gt;util_spill -->
+<g id="call~~graph~~CallGraph_edge365" class="edge">
+<title>proc~whm_util_spill_pl&#45;&gt;util_spill</title>
+<path fill="none" stroke="#000000" d="M886.02,-3050.56C935.12,-3058.71 1012.3,-3071.52 1057.39,-3079.01"/>
+<polygon fill="#000000" stroke="#000000" points="1056.88,-3082.47 1067.32,-3080.65 1058.02,-3075.56 1056.88,-3082.47"/>
+</g>
+<!-- proc~whm_util_spill_pl&#45;&gt;util_spill_pl -->
+<g id="call~~graph~~CallGraph_edge366" class="edge">
+<title>proc~whm_util_spill_pl&#45;&gt;util_spill_pl</title>
+<path fill="none" stroke="#000000" d="M886.02,-3035.44C933.27,-3027.6 1006.53,-3015.44 1052.17,-3007.86"/>
+<polygon fill="#000000" stroke="#000000" points="1053.01,-3011.27 1062.3,-3006.18 1051.87,-3004.36 1053.01,-3011.27"/>
+</g>
+<!-- proc~whm_util_spill_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge364" class="edge">
+<title>proc~whm_util_spill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M886.02,-3046.7C909.71,-3045.99 937.16,-3040.55 954,-3022 1016.37,-2953.3 945.55,-2687.45 990,-2606 1005.27,-2578.02 1034.91,-2556.67 1058.57,-2543.09"/>
+<polygon fill="#000000" stroke="#000000" points="1060.56,-2545.99 1067.63,-2538.1 1057.19,-2539.86 1060.56,-2545.99"/>
+</g>
+<!-- proc~util_get_energy_momentum_system -->
+<g id="call~~graph~~CallGraph_node373" class="node">
+<title>proc~util_get_energy_momentum_system</title>
+<g id="a_call~~graph~~CallGraph_node373"><a xlink:href=".././proc/util_get_energy_momentum_system.html" xlink:title="util_get_energy_momentum_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="420,-11241 234,-11241 234,-11217 420,-11217 420,-11241"/>
+<text text-anchor="middle" x="327" y="-11226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum_system</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_encounter -->
-<g id="call~~graph~~CallGraph_node679" class="node">
-<title>proc~util_spill_encounter</title>
-<g id="a_call~~graph~~CallGraph_node679"><a xlink:href=".././proc/util_spill_encounter.html" xlink:title="util_spill_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="891.5,-11473 787.5,-11473 787.5,-11449 891.5,-11449 891.5,-11473"/>
-<text text-anchor="middle" x="839.5" y="-11458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
+<!-- proc~util_get_energy_potential -->
+<g id="call~~graph~~CallGraph_node377" class="node">
+<title>proc~util_get_energy_potential</title>
+<g id="a_call~~graph~~CallGraph_node377"><a xlink:href=".././proc/util_get_energy_potential.html" xlink:title="util_get_energy_potential">
+<polygon fill="#d9534f" stroke="#d9534f" points="641,-11241 508,-11241 508,-11217 641,-11217 641,-11241"/>
+<text text-anchor="middle" x="574.5" y="-11226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_potential</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter -->
-<g id="call~~graph~~CallGraph_edge357" class="edge">
-<title>interface~util_spill_encounter&#45;&gt;proc~util_spill_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.52,-11461C669.57,-11461 731.32,-11461 777.08,-11461"/>
-<polygon fill="#000000" stroke="#000000" points="777.17,-11464.5 787.17,-11461 777.17,-11457.5 777.17,-11464.5"/>
+<!-- proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential -->
+<g id="call~~graph~~CallGraph_edge367" class="edge">
+<title>proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential</title>
+<path fill="none" stroke="#000000" d="M420.11,-11229C445.59,-11229 472.95,-11229 497.4,-11229"/>
+<polygon fill="#000000" stroke="#000000" points="497.69,-11232.5 507.69,-11229 497.69,-11225.5 497.69,-11232.5"/>
 </g>
-<!-- interface~util_spill_pl -->
-<g id="call~~graph~~CallGraph_node360" class="node">
-<title>interface~util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node360"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="129,-11583 65,-11583 65,-11559 129,-11559 129,-11583"/>
-<text text-anchor="middle" x="97" y="-11568.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<!-- proc~operator_mag_sp -->
+<g id="call~~graph~~CallGraph_node374" class="node">
+<title>proc~operator_mag_sp</title>
+<g id="a_call~~graph~~CallGraph_node374"><a xlink:href=".././proc/operator_mag_sp.html" xlink:title="operator_mag_sp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="145.5,-11283 48.5,-11283 48.5,-11259 145.5,-11259 145.5,-11283"/>
+<text text-anchor="middle" x="97" y="-11268.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_sp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_pl -->
-<g id="call~~graph~~CallGraph_node598" class="node">
-<title>proc~util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node598"><a xlink:href=".././proc/util_spill_pl.html" xlink:title="util_spill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="359,-11583 295,-11583 295,-11559 359,-11559 359,-11583"/>
-<text text-anchor="middle" x="327" y="-11568.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<!-- proc~discard_system -->
+<g id="call~~graph~~CallGraph_node375" class="node">
+<title>proc~discard_system</title>
+<g id="a_call~~graph~~CallGraph_node375"><a xlink:href=".././proc/discard_system.html" xlink:title="discard_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="370.5,-11325 283.5,-11325 283.5,-11301 370.5,-11301 370.5,-11325"/>
+<text text-anchor="middle" x="327" y="-11310.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_pl&#45;&gt;proc~util_spill_pl -->
-<g id="call~~graph~~CallGraph_edge358" class="edge">
-<title>interface~util_spill_pl&#45;&gt;proc~util_spill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-11571C169.53,-11571 239.8,-11571 284.55,-11571"/>
-<polygon fill="#000000" stroke="#000000" points="284.79,-11574.5 294.79,-11571 284.79,-11567.5 284.79,-11574.5"/>
+<!-- proc~gr_kick_getaccb_ns_body -->
+<g id="call~~graph~~CallGraph_node376" class="node">
+<title>proc~gr_kick_getaccb_ns_body</title>
+<g id="a_call~~graph~~CallGraph_node376"><a xlink:href=".././proc/gr_kick_getaccb_ns_body.html" xlink:title="gr_kick_getaccb_ns_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="395,-11367 259,-11367 259,-11343 395,-11343 395,-11367"/>
+<text text-anchor="middle" x="327" y="-11352.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getaccb_ns_body</text>
+</a>
 </g>
-<!-- interface~util_spill_tp -->
-<g id="call~~graph~~CallGraph_node361" class="node">
-<title>interface~util_spill_tp</title>
-<g id="a_call~~graph~~CallGraph_node361"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="129.5,-11522 64.5,-11522 64.5,-11498 129.5,-11498 129.5,-11522"/>
-<text text-anchor="middle" x="97" y="-11507.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+</g>
+<!-- proc~symba_collision_resolve_pltpenc -->
+<g id="call~~graph~~CallGraph_node378" class="node">
+<title>proc~symba_collision_resolve_pltpenc</title>
+<g id="a_call~~graph~~CallGraph_node378"><a xlink:href=".././proc/symba_collision_resolve_pltpenc.html" xlink:title="symba_collision_resolve_pltpenc">
+<polygon fill="#d9534f" stroke="#d9534f" points="411.5,-11409 242.5,-11409 242.5,-11385 411.5,-11385 411.5,-11409"/>
+<text text-anchor="middle" x="327" y="-11394.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_pltpenc</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_tp -->
-<g id="call~~graph~~CallGraph_node600" class="node">
-<title>proc~util_spill_tp</title>
-<g id="a_call~~graph~~CallGraph_node600"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="359.5,-11522 294.5,-11522 294.5,-11498 359.5,-11498 359.5,-11522"/>
-<text text-anchor="middle" x="327" y="-11507.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<!-- proc~operator_mag_el_qp -->
+<g id="call~~graph~~CallGraph_node379" class="node">
+<title>proc~operator_mag_el_qp</title>
+<g id="a_call~~graph~~CallGraph_node379"><a xlink:href=".././proc/operator_mag_el_qp.html" xlink:title="operator_mag_el_qp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="153,-11451 41,-11451 41,-11427 153,-11427 153,-11451"/>
+<text text-anchor="middle" x="97" y="-11436.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_el_qp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
-<g id="call~~graph~~CallGraph_edge359" class="edge">
-<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.7,-11510C169.92,-11510 239.38,-11510 283.98,-11510"/>
-<polygon fill="#000000" stroke="#000000" points="284.2,-11513.5 294.2,-11510 284.2,-11506.5 284.2,-11513.5"/>
-</g>
-<!-- interface~util_valid_id_system -->
-<g id="call~~graph~~CallGraph_node362" class="node">
-<title>interface~util_valid_id_system</title>
-<g id="a_call~~graph~~CallGraph_node362"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="628.5,-2314 520.5,-2314 520.5,-2290 628.5,-2290 628.5,-2314"/>
-<text text-anchor="middle" x="574.5" y="-2299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+<!-- proc~operator_mag_dp -->
+<g id="call~~graph~~CallGraph_node380" class="node">
+<title>proc~operator_mag_dp</title>
+<g id="a_call~~graph~~CallGraph_node380"><a xlink:href=".././proc/operator_mag_dp.html" xlink:title="operator_mag_dp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="146,-11493 48,-11493 48,-11469 146,-11469 146,-11493"/>
+<text text-anchor="middle" x="97" y="-11478.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_dp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system -->
-<g id="call~~graph~~CallGraph_node608" class="node">
-<title>proc~util_valid_id_system</title>
-<g id="a_call~~graph~~CallGraph_node608"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="893.5,-2314 785.5,-2314 785.5,-2290 893.5,-2290 893.5,-2314"/>
-<text text-anchor="middle" x="839.5" y="-2299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+<!-- proc~operator_mag_el_sp -->
+<g id="call~~graph~~CallGraph_node381" class="node">
+<title>proc~operator_mag_el_sp</title>
+<g id="a_call~~graph~~CallGraph_node381"><a xlink:href=".././proc/operator_mag_el_sp.html" xlink:title="operator_mag_el_sp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="153,-11535 41,-11535 41,-11511 153,-11511 153,-11535"/>
+<text text-anchor="middle" x="97" y="-11520.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_el_sp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
-<g id="call~~graph~~CallGraph_edge360" class="edge">
-<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M628.72,-2302C671.05,-2302 730.4,-2302 775.17,-2302"/>
-<polygon fill="#000000" stroke="#000000" points="775.36,-2305.5 785.36,-2302 775.36,-2298.5 775.36,-2305.5"/>
-</g>
-<!-- proc~symba_util_spill_tp -->
-<g id="call~~graph~~CallGraph_node363" class="node">
-<title>proc~symba_util_spill_tp</title>
-<g id="a_call~~graph~~CallGraph_node363"><a xlink:href=".././proc/symba_util_spill_tp.html" xlink:title="symba_util_spill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="891,-1562 788,-1562 788,-1538 891,-1538 891,-1562"/>
-<text text-anchor="middle" x="839.5" y="-1547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_tp</text>
+<!-- proc~operator_mag_el_dp -->
+<g id="call~~graph~~CallGraph_node382" class="node">
+<title>proc~operator_mag_el_dp</title>
+<g id="a_call~~graph~~CallGraph_node382"><a xlink:href=".././proc/operator_mag_el_dp.html" xlink:title="operator_mag_el_dp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="153,-11577 41,-11577 41,-11553 153,-11553 153,-11577"/>
+<text text-anchor="middle" x="97" y="-11562.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag_el_dp</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_util_spill_tp&#45;&gt;interface~util_spill -->
-<g id="call~~graph~~CallGraph_edge363" class="edge">
-<title>proc~symba_util_spill_tp&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M891.23,-1553.45C911.53,-1556.32 934.65,-1561.54 954,-1571 973.23,-1580.4 970.85,-1593.43 990,-1603 1010.91,-1613.45 1036.65,-1618.7 1057.24,-1621.33"/>
-<polygon fill="#000000" stroke="#000000" points="1056.85,-1624.81 1067.18,-1622.46 1057.64,-1617.86 1056.85,-1624.81"/>
-</g>
-<!-- proc~symba_util_spill_tp&#45;&gt;util_spill_tp -->
-<g id="call~~graph~~CallGraph_edge362" class="edge">
-<title>proc~symba_util_spill_tp&#45;&gt;util_spill_tp</title>
-<path fill="none" stroke="#000000" d="M891.09,-1548C938.22,-1546.14 1007.65,-1543.39 1051.71,-1541.65"/>
-<polygon fill="#000000" stroke="#000000" points="1051.94,-1545.15 1061.79,-1541.25 1051.66,-1538.15 1051.94,-1545.15"/>
+<!-- proc~operator_cross_sp -->
+<g id="call~~graph~~CallGraph_node383" class="node">
+<title>proc~operator_cross_sp</title>
+<g id="a_call~~graph~~CallGraph_node383"><a xlink:href=".././proc/operator_cross_sp.html" xlink:title="operator_cross_sp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="148,-11619 46,-11619 46,-11595 148,-11595 148,-11619"/>
+<text text-anchor="middle" x="97" y="-11604.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_sp</text>
+</a>
 </g>
-<!-- proc~symba_util_spill_tp&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge361" class="edge">
-<title>proc~symba_util_spill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M891.2,-1553.48C913.61,-1552.14 938.38,-1546.22 954,-1529 1016.93,-1459.61 934.4,-1184.39 990,-1109 1005.74,-1087.66 1034.2,-1077.13 1057.3,-1071.96"/>
-<polygon fill="#000000" stroke="#000000" points="1058.02,-1075.38 1067.14,-1069.99 1056.65,-1068.52 1058.02,-1075.38"/>
 </g>
-<!-- proc~util_version -->
-<g id="call~~graph~~CallGraph_node492" class="node">
-<title>proc~util_version</title>
-<g id="a_call~~graph~~CallGraph_node492"><a xlink:href=".././proc/util_version.html" xlink:title="util_version">
-<polygon fill="#d9534f" stroke="#d9534f" points="1373,-3402 1306,-3402 1306,-3378 1373,-3378 1373,-3402"/>
-<text text-anchor="middle" x="1339.5" y="-3387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
+<!-- proc~operator_cross_dp -->
+<g id="call~~graph~~CallGraph_node384" class="node">
+<title>proc~operator_cross_dp</title>
+<g id="a_call~~graph~~CallGraph_node384"><a xlink:href=".././proc/operator_cross_dp.html" xlink:title="operator_cross_dp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="148.5,-11661 45.5,-11661 45.5,-11637 148.5,-11637 148.5,-11661"/>
+<text text-anchor="middle" x="97" y="-11646.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_dp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_version&#45;&gt;proc~util_version -->
-<g id="call~~graph~~CallGraph_edge364" class="edge">
-<title>interface~util_version&#45;&gt;proc~util_version</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1128.02,-3390C1171.27,-3390 1247.83,-3390 1295.73,-3390"/>
-<polygon fill="#000000" stroke="#000000" points="1295.78,-3393.5 1305.78,-3390 1295.78,-3386.5 1295.78,-3393.5"/>
-</g>
-<!-- interface~lambda_obj~2 -->
-<g id="call~~graph~~CallGraph_node368" class="node">
-<title>interface~lambda_obj~2</title>
-<g id="a_call~~graph~~CallGraph_node368"><a xlink:href=".././interface/lambda_obj~2.html" xlink:title="lambda_obj">
-<polygon fill="#a7506f" stroke="#a7506f" points="131,-11667 63,-11667 63,-11643 131,-11643 131,-11667"/>
-<text text-anchor="middle" x="97" y="-11652.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
+<!-- proc~operator_cross_i1b -->
+<g id="call~~graph~~CallGraph_node385" class="node">
+<title>proc~operator_cross_i1b</title>
+<g id="a_call~~graph~~CallGraph_node385"><a xlink:href=".././proc/operator_cross_i1b.html" xlink:title="operator_cross_i1b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-11703 44.5,-11703 44.5,-11679 149.5,-11679 149.5,-11703"/>
+<text text-anchor="middle" x="97" y="-11688.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i1b</text>
 </a>
 </g>
 </g>
-<!-- proc~lambda_init_0 -->
-<g id="call~~graph~~CallGraph_node594" class="node">
-<title>proc~lambda_init_0</title>
-<g id="a_call~~graph~~CallGraph_node594"><a xlink:href=".././proc/lambda_init_0.html" xlink:title="lambda_init_0">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="366.5,-11709 287.5,-11709 287.5,-11685 366.5,-11685 366.5,-11709"/>
-<text text-anchor="middle" x="327" y="-11694.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0</text>
+<!-- interface~util_minimize_bfgs -->
+<g id="call~~graph~~CallGraph_node386" class="node">
+<title>interface~util_minimize_bfgs</title>
+<g id="a_call~~graph~~CallGraph_node386"><a xlink:href=".././interface/util_minimize_bfgs.html" xlink:title="util_minimize_bfgs">
+<polygon fill="#a7506f" stroke="#a7506f" points="147,-10695 47,-10695 47,-10671 147,-10671 147,-10695"/>
+<text text-anchor="middle" x="97" y="-10680.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0 -->
-<g id="call~~graph~~CallGraph_edge365" class="edge">
-<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-11661.11C169.65,-11668.2 233.5,-11679.96 277.55,-11688.08"/>
-<polygon fill="#000000" stroke="#000000" points="277,-11691.53 287.47,-11689.9 278.27,-11684.65 277,-11691.53"/>
+<!-- interface~util_minimize_bfgs&#45;&gt;proc~util_minimize_bfgs -->
+<g id="call~~graph~~CallGraph_edge368" class="edge">
+<title>interface~util_minimize_bfgs&#45;&gt;proc~util_minimize_bfgs</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.19,-10683C182.25,-10683 229.56,-10683 266.71,-10683"/>
+<polygon fill="#000000" stroke="#000000" points="266.9,-10686.5 276.9,-10683 266.9,-10679.5 266.9,-10686.5"/>
 </g>
-<!-- proc~lambda_init_0_err -->
-<g id="call~~graph~~CallGraph_node603" class="node">
-<title>proc~lambda_init_0_err</title>
-<g id="a_call~~graph~~CallGraph_node603"><a xlink:href=".././proc/lambda_init_0_err.html" xlink:title="lambda_init_0_err">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="376.5,-11667 277.5,-11667 277.5,-11643 376.5,-11643 376.5,-11667"/>
-<text text-anchor="middle" x="327" y="-11652.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_0_err</text>
+<!-- interface~util_rescale_system -->
+<g id="call~~graph~~CallGraph_node387" class="node">
+<title>interface~util_rescale_system</title>
+<g id="a_call~~graph~~CallGraph_node387"><a xlink:href=".././interface/util_rescale_system.html" xlink:title="util_rescale_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="150,-10653 44,-10653 44,-10629 150,-10629 150,-10653"/>
+<text text-anchor="middle" x="97" y="-10638.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale_system</text>
 </a>
 </g>
 </g>
-<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err -->
-<g id="call~~graph~~CallGraph_edge367" class="edge">
-<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_0_err</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-11655C166.71,-11655 223.89,-11655 267.14,-11655"/>
-<polygon fill="#000000" stroke="#000000" points="267.25,-11658.5 277.25,-11655 267.25,-11651.5 267.25,-11658.5"/>
+<!-- interface~util_rescale_system&#45;&gt;proc~util_rescale_system -->
+<g id="call~~graph~~CallGraph_edge369" class="edge">
+<title>interface~util_rescale_system&#45;&gt;proc~util_rescale_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-10641C183.76,-10641 227.89,-10641 263.52,-10641"/>
+<polygon fill="#000000" stroke="#000000" points="263.81,-10644.5 273.81,-10641 263.81,-10637.5 263.81,-10644.5"/>
 </g>
-<!-- proc~lambda_init_tvar -->
-<g id="call~~graph~~CallGraph_node613" class="node">
-<title>proc~lambda_init_tvar</title>
-<g id="a_call~~graph~~CallGraph_node613"><a xlink:href=".././proc/lambda_init_tvar.html" xlink:title="lambda_init_tvar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="372.5,-11625 281.5,-11625 281.5,-11601 372.5,-11601 372.5,-11625"/>
-<text text-anchor="middle" x="327" y="-11610.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_init_tvar</text>
+<!-- interface~util_peri_tp -->
+<g id="call~~graph~~CallGraph_node388" class="node">
+<title>interface~util_peri_tp</title>
+<g id="a_call~~graph~~CallGraph_node388"><a xlink:href=".././interface/util_peri_tp.html" xlink:title="util_peri_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="129.5,-8502 64.5,-8502 64.5,-8478 129.5,-8478 129.5,-8502"/>
+<text text-anchor="middle" x="97" y="-8487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~lambda_obj~2&#45;&gt;proc~lambda_init_tvar -->
-<g id="call~~graph~~CallGraph_edge366" class="edge">
-<title>interface~lambda_obj~2&#45;&gt;proc~lambda_init_tvar</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-11648.89C167.93,-11642.12 227.85,-11631.08 271.54,-11623.03"/>
-<polygon fill="#000000" stroke="#000000" points="272.24,-11626.46 281.44,-11621.21 270.97,-11619.58 272.24,-11626.46"/>
+<!-- interface~util_peri_tp&#45;&gt;proc~util_peri_tp -->
+<g id="call~~graph~~CallGraph_edge370" class="edge">
+<title>interface~util_peri_tp&#45;&gt;proc~util_peri_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.7,-8490C169.92,-8490 239.38,-8490 283.98,-8490"/>
+<polygon fill="#000000" stroke="#000000" points="284.2,-8493.5 294.2,-8490 284.2,-8486.5 284.2,-8493.5"/>
 </g>
-<!-- proc~kick_getacch_int_pl -->
-<g id="call~~graph~~CallGraph_node369" class="node">
-<title>proc~kick_getacch_int_pl</title>
-<g id="a_call~~graph~~CallGraph_node369"><a xlink:href=".././proc/kick_getacch_int_pl.html" xlink:title="kick_getacch_int_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-11396 274,-11396 274,-11372 380,-11372 380,-11396"/>
-<text text-anchor="middle" x="327" y="-11381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_pl</text>
+<!-- proc~operator_cross_el_qp -->
+<g id="call~~graph~~CallGraph_node389" class="node">
+<title>proc~operator_cross_el_qp</title>
+<g id="a_call~~graph~~CallGraph_node389"><a xlink:href=".././proc/operator_cross_el_qp.html" xlink:title="operator_cross_el_qp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="155.5,-11745 38.5,-11745 38.5,-11721 155.5,-11721 155.5,-11745"/>
+<text text-anchor="middle" x="97" y="-11730.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_qp</text>
 </a>
 </g>
 </g>
-<!-- interface~kick_getacch_int_all_pl -->
-<g id="call~~graph~~CallGraph_node447" class="node">
-<title>interface~kick_getacch_int_all_pl</title>
-<g id="a_call~~graph~~CallGraph_node447"><a xlink:href=".././interface/kick_getacch_int_all_pl.html" xlink:title="kick_getacch_int_all_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="635.5,-11396 513.5,-11396 513.5,-11372 635.5,-11372 635.5,-11396"/>
-<text text-anchor="middle" x="574.5" y="-11381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_pl</text>
+<!-- proc~operator_cross_qp -->
+<g id="call~~graph~~CallGraph_node390" class="node">
+<title>proc~operator_cross_qp</title>
+<g id="a_call~~graph~~CallGraph_node390"><a xlink:href=".././proc/operator_cross_qp.html" xlink:title="operator_cross_qp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="148.5,-11787 45.5,-11787 45.5,-11763 148.5,-11763 148.5,-11787"/>
+<text text-anchor="middle" x="97" y="-11772.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_qp</text>
 </a>
 </g>
 </g>
-<!-- proc~kick_getacch_int_pl&#45;&gt;interface~kick_getacch_int_all_pl -->
-<g id="call~~graph~~CallGraph_edge368" class="edge">
-<title>proc~kick_getacch_int_pl&#45;&gt;interface~kick_getacch_int_all_pl</title>
-<path fill="none" stroke="#000000" d="M380.06,-11384C415.93,-11384 464.01,-11384 503.26,-11384"/>
-<polygon fill="#000000" stroke="#000000" points="503.3,-11387.5 513.3,-11384 503.3,-11380.5 503.3,-11387.5"/>
-</g>
-<!-- proc~kick_getacch_int_tp -->
-<g id="call~~graph~~CallGraph_node370" class="node">
-<title>proc~kick_getacch_int_tp</title>
-<g id="a_call~~graph~~CallGraph_node370"><a xlink:href=".././proc/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-11751 274,-11751 274,-11727 380,-11727 380,-11751"/>
-<text text-anchor="middle" x="327" y="-11736.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
+<!-- proc~util_solve_linear_system_d -->
+<g id="call~~graph~~CallGraph_node391" class="node">
+<title>proc~util_solve_linear_system_d</title>
+<g id="a_call~~graph~~CallGraph_node391"><a xlink:href=".././proc/util_solve_linear_system_d.html" xlink:title="util_solve_linear_system_d">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="167.5,-11871 26.5,-11871 26.5,-11847 167.5,-11847 167.5,-11871"/>
+<text text-anchor="middle" x="97" y="-11856.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_d</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
-<g id="call~~graph~~CallGraph_edge369" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M1420.21,-347.86C1436.19,-348.64 1453.14,-349.46 1469.65,-350.26"/>
-<polygon fill="#000000" stroke="#000000" points="1469.7,-353.76 1479.86,-350.75 1470.04,-346.77 1469.7,-353.76"/>
+<!-- proc~ge_wpp -->
+<g id="call~~graph~~CallGraph_node397" class="node">
+<title>proc~ge_wpp</title>
+<g id="a_call~~graph~~CallGraph_node397"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="354,-11871 300,-11871 300,-11847 354,-11847 354,-11871"/>
+<text text-anchor="middle" x="327" y="-11856.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+</a>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
-<g id="call~~graph~~CallGraph_edge370" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M1420.21,-333.11C1439.03,-330.54 1459.22,-327.79 1478.42,-325.16"/>
-<polygon fill="#000000" stroke="#000000" points="1478.93,-328.63 1488.36,-323.81 1477.98,-321.69 1478.93,-328.63"/>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message -->
+<!-- proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp -->
 <g id="call~~graph~~CallGraph_edge371" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M1406.22,-356.02C1418.83,-358.7 1431.88,-361.72 1444,-365 1459.37,-369.15 1495.11,-381.42 1524.21,-391.62"/>
-<polygon fill="#000000" stroke="#000000" points="1523.19,-394.98 1533.79,-394.99 1525.51,-388.37 1523.19,-394.98"/>
+<title>proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp</title>
+<path fill="none" stroke="#000000" d="M167.65,-11859C207.94,-11859 257,-11859 289.73,-11859"/>
+<polygon fill="#000000" stroke="#000000" points="289.75,-11862.5 299.75,-11859 289.75,-11855.5 289.75,-11862.5"/>
 </g>
-<!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message -->
-<g id="call~~graph~~CallGraph_edge372" class="edge">
-<title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M1404.76,-314.04C1417.8,-316.76 1431.38,-319.8 1444,-323 1460.22,-327.11 1463.86,-329.6 1480,-334 1488.13,-336.21 1496.71,-338.43 1505.2,-340.54"/>
-<polygon fill="#000000" stroke="#000000" points="1504.54,-343.98 1515.08,-342.97 1506.21,-337.19 1504.54,-343.98"/>
+<!-- proc~solve_wbs -->
+<g id="call~~graph~~CallGraph_node401" class="node">
+<title>proc~solve_wbs</title>
+<g id="a_call~~graph~~CallGraph_node401"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="358,-11829 296,-11829 296,-11805 358,-11805 358,-11829"/>
+<text text-anchor="middle" x="327" y="-11814.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+</a>
 </g>
-<!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub -->
-<g id="call~~graph~~CallGraph_edge373" class="edge">
-<title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M1413.26,-305.53C1433.97,-306.53 1456.77,-307.63 1478.34,-308.68"/>
-<polygon fill="#000000" stroke="#000000" points="1478.32,-312.18 1488.48,-309.17 1478.66,-305.19 1478.32,-312.18"/>
 </g>
-<!-- proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge374" class="edge">
-<title>proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M1413.23,-309.28C1424.11,-312.44 1434.77,-316.85 1444,-323 1467.71,-338.78 1457.46,-358.6 1480,-376 1487.94,-382.13 1497.2,-387.11 1506.65,-391.14"/>
-<polygon fill="#000000" stroke="#000000" points="1505.55,-394.47 1516.14,-394.86 1508.11,-387.95 1505.55,-394.47"/>
+<!-- proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs -->
+<g id="call~~graph~~CallGraph_edge372" class="edge">
+<title>proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs</title>
+<path fill="none" stroke="#000000" d="M163.34,-11846.96C202.81,-11839.69 251.86,-11830.66 285.72,-11824.42"/>
+<polygon fill="#000000" stroke="#000000" points="286.52,-11827.83 295.72,-11822.58 285.25,-11820.95 286.52,-11827.83"/>
 </g>
-<!-- interface~io_read_frame_cb -->
-<g id="call~~graph~~CallGraph_node373" class="node">
-<title>interface~io_read_frame_cb</title>
-<g id="a_call~~graph~~CallGraph_node373"><a xlink:href=".././interface/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="624.5,-2986 524.5,-2986 524.5,-2962 624.5,-2962 624.5,-2986"/>
-<text text-anchor="middle" x="574.5" y="-2971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+<!-- proc~discard_tp -->
+<g id="call~~graph~~CallGraph_node392" class="node">
+<title>proc~discard_tp</title>
+<g id="a_call~~graph~~CallGraph_node392"><a xlink:href=".././proc/discard_tp.html" xlink:title="discard_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="358,-11913 296,-11913 296,-11889 358,-11889 358,-11913"/>
+<text text-anchor="middle" x="327" y="-11898.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb -->
-<g id="call~~graph~~CallGraph_edge375" class="edge">
-<title>interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.66,-2974C668.34,-2974 732.3,-2974 778.88,-2974"/>
-<polygon fill="#000000" stroke="#000000" points="779.14,-2977.5 789.14,-2974 779.14,-2970.5 779.14,-2977.5"/>
-</g>
-<!-- proc~util_peri_tp -->
-<g id="call~~graph~~CallGraph_node375" class="node">
-<title>proc~util_peri_tp</title>
-<g id="a_call~~graph~~CallGraph_node375"><a xlink:href=".././proc/util_peri_tp.html" xlink:title="util_peri_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="359.5,-8143 294.5,-8143 294.5,-8119 359.5,-8119 359.5,-8143"/>
-<text text-anchor="middle" x="327" y="-8128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri_tp</text>
+<!-- proc~discard_pl -->
+<g id="call~~graph~~CallGraph_node393" class="node">
+<title>proc~discard_pl</title>
+<g id="a_call~~graph~~CallGraph_node393"><a xlink:href=".././proc/discard_pl.html" xlink:title="discard_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="357.5,-11955 296.5,-11955 296.5,-11931 357.5,-11931 357.5,-11955"/>
+<text text-anchor="middle" x="327" y="-11940.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_xv2aeq -->
-<g id="call~~graph~~CallGraph_node472" class="node">
-<title>interface~orbel_xv2aeq</title>
-<g id="a_call~~graph~~CallGraph_node472"><a xlink:href=".././interface/orbel_xv2aeq.html" xlink:title="orbel_xv2aeq">
-<polygon fill="#a7506f" stroke="#a7506f" points="613,-8143 536,-8143 536,-8119 613,-8119 613,-8143"/>
-<text text-anchor="middle" x="574.5" y="-8128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
+<!-- proc~discard_cb_tp -->
+<g id="call~~graph~~CallGraph_node394" class="node">
+<title>proc~discard_cb_tp</title>
+<g id="a_call~~graph~~CallGraph_node394"><a xlink:href=".././proc/discard_cb_tp.html" xlink:title="discard_cb_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="136.5,-11997 57.5,-11997 57.5,-11973 136.5,-11973 136.5,-11997"/>
+<text text-anchor="middle" x="97" y="-11982.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_cb_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_peri_tp&#45;&gt;interface~orbel_xv2aeq -->
-<g id="call~~graph~~CallGraph_edge376" class="edge">
-<title>proc~util_peri_tp&#45;&gt;interface~orbel_xv2aeq</title>
-<path fill="none" stroke="#000000" d="M359.59,-8131C401.67,-8131 476.48,-8131 525.53,-8131"/>
-<polygon fill="#000000" stroke="#000000" points="525.59,-8134.5 535.59,-8131 525.59,-8127.5 525.59,-8134.5"/>
+<!-- interface~util_fill -->
+<g id="call~~graph~~CallGraph_node395" class="node">
+<title>interface~util_fill</title>
+<g id="a_call~~graph~~CallGraph_node395"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
+<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-2353 1067.5,-2353 1067.5,-2329 1121.5,-2329 1121.5,-2353"/>
+<text text-anchor="middle" x="1094.5" y="-2338.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+</a>
 </g>
-<!-- interface~io_read_frame_system -->
-<g id="call~~graph~~CallGraph_node376" class="node">
-<title>interface~io_read_frame_system</title>
-<g id="a_call~~graph~~CallGraph_node376"><a xlink:href=".././interface/io_read_frame_system.html" xlink:title="io_read_frame_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="158,-8311 36,-8311 36,-8287 158,-8287 158,-8311"/>
-<text text-anchor="middle" x="97" y="-8296.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_system</text>
+</g>
+<!-- proc~operator_cross_i2b -->
+<g id="call~~graph~~CallGraph_node396" class="node">
+<title>proc~operator_cross_i2b</title>
+<g id="a_call~~graph~~CallGraph_node396"><a xlink:href=".././proc/operator_cross_i2b.html" xlink:title="operator_cross_i2b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-12039 44.5,-12039 44.5,-12015 149.5,-12015 149.5,-12039"/>
+<text text-anchor="middle" x="97" y="-12024.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i2b</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_frame_system&#45;&gt;proc~io_read_frame_system -->
-<g id="call~~graph~~CallGraph_edge377" class="edge">
-<title>interface~io_read_frame_system&#45;&gt;proc~io_read_frame_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.2,-8299C188.07,-8299 224.34,-8299 255.5,-8299"/>
-<polygon fill="#000000" stroke="#000000" points="255.86,-8302.5 265.86,-8299 255.86,-8295.5 255.86,-8302.5"/>
+<!-- interface~symba_collision_check_encounter -->
+<g id="call~~graph~~CallGraph_node398" class="node">
+<title>interface~symba_collision_check_encounter</title>
+<g id="a_call~~graph~~CallGraph_node398"><a xlink:href=".././interface/symba_collision_check_encounter.html" xlink:title="symba_collision_check_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="1182,-2143 1007,-2143 1007,-2119 1182,-2119 1182,-2143"/>
+<text text-anchor="middle" x="1094.5" y="-2128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_encounter</text>
+</a>
 </g>
-<!-- interface~discard_pl -->
-<g id="call~~graph~~CallGraph_node377" class="node">
-<title>interface~discard_pl</title>
-<g id="a_call~~graph~~CallGraph_node377"><a xlink:href=".././interface/discard_pl.html" xlink:title="discard_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="127.5,-11793 66.5,-11793 66.5,-11769 127.5,-11769 127.5,-11793"/>
-<text text-anchor="middle" x="97" y="-11778.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl</text>
+</g>
+<!-- proc~symba_collision_check_encounter -->
+<g id="call~~graph~~CallGraph_node498" class="node">
+<title>proc~symba_collision_check_encounter</title>
+<g id="a_call~~graph~~CallGraph_node498"><a xlink:href=".././proc/symba_collision_check_encounter.html" xlink:title="symba_collision_check_encounter">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1427,-2122 1252,-2122 1252,-2098 1427,-2098 1427,-2122"/>
+<text text-anchor="middle" x="1339.5" y="-2107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~discard_pl -->
-<g id="call~~graph~~CallGraph_node538" class="node">
-<title>proc~discard_pl</title>
-<g id="a_call~~graph~~CallGraph_node538"><a xlink:href=".././proc/discard_pl.html" xlink:title="discard_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="357.5,-11793 296.5,-11793 296.5,-11769 357.5,-11769 357.5,-11793"/>
-<text text-anchor="middle" x="327" y="-11778.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl</text>
+<!-- interface~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_encounter -->
+<g id="call~~graph~~CallGraph_edge373" class="edge">
+<title>interface~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1182.2,-2123.51C1201.47,-2121.84 1222.01,-2120.07 1241.65,-2118.37"/>
+<polygon fill="#000000" stroke="#000000" points="1242.17,-2121.84 1251.83,-2117.49 1241.57,-2114.86 1242.17,-2121.84"/>
+</g>
+<!-- interface~symba_encounter_check_pl -->
+<g id="call~~graph~~CallGraph_node399" class="node">
+<title>interface~symba_encounter_check_pl</title>
+<g id="a_call~~graph~~CallGraph_node399"><a xlink:href=".././interface/symba_encounter_check_pl.html" xlink:title="symba_encounter_check_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="170,-5668 24,-5668 24,-5644 170,-5644 170,-5668"/>
+<text text-anchor="middle" x="97" y="-5653.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~discard_pl&#45;&gt;proc~discard_pl -->
-<g id="call~~graph~~CallGraph_edge378" class="edge">
-<title>interface~discard_pl&#45;&gt;proc~discard_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M127.81,-11781C168.35,-11781 240.98,-11781 286.16,-11781"/>
-<polygon fill="#000000" stroke="#000000" points="286.19,-11784.5 296.19,-11781 286.19,-11777.5 286.19,-11784.5"/>
+<!-- interface~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_pl -->
+<g id="call~~graph~~CallGraph_edge374" class="edge">
+<title>interface~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-5656C193.54,-5656 219.68,-5656 243.76,-5656"/>
+<polygon fill="#000000" stroke="#000000" points="243.94,-5659.5 253.94,-5656 243.94,-5652.5 243.94,-5659.5"/>
 </g>
-<!-- proc~orbel_el2xv_vec -->
-<g id="call~~graph~~CallGraph_node378" class="node">
-<title>proc~orbel_el2xv_vec</title>
-<g id="a_call~~graph~~CallGraph_node378"><a xlink:href=".././proc/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="372,-5992 282,-5992 282,-5968 372,-5968 372,-5992"/>
-<text text-anchor="middle" x="327" y="-5977.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
+<!-- proc~util_solve_linear_system_q -->
+<g id="call~~graph~~CallGraph_node400" class="node">
+<title>proc~util_solve_linear_system_q</title>
+<g id="a_call~~graph~~CallGraph_node400"><a xlink:href=".././proc/util_solve_linear_system_q.html" xlink:title="util_solve_linear_system_q">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="167.5,-11829 26.5,-11829 26.5,-11805 167.5,-11805 167.5,-11829"/>
+<text text-anchor="middle" x="97" y="-11814.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system_q</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv -->
-<g id="call~~graph~~CallGraph_node459" class="node">
-<title>proc~orbel_el2xv</title>
-<g id="a_call~~graph~~CallGraph_node459"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
-<polygon fill="#d9534f" stroke="#d9534f" points="608,-5992 541,-5992 541,-5968 608,-5968 608,-5992"/>
-<text text-anchor="middle" x="574.5" y="-5977.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
+<!-- proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp -->
+<g id="call~~graph~~CallGraph_edge375" class="edge">
+<title>proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp</title>
+<path fill="none" stroke="#000000" d="M163.34,-11829.04C204.48,-11836.61 256.03,-11846.11 289.94,-11852.36"/>
+<polygon fill="#000000" stroke="#000000" points="289.39,-11855.82 299.86,-11854.19 290.66,-11848.93 289.39,-11855.82"/>
+</g>
+<!-- proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs -->
+<g id="call~~graph~~CallGraph_edge376" class="edge">
+<title>proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs</title>
+<path fill="none" stroke="#000000" d="M167.65,-11817C206.41,-11817 253.27,-11817 285.92,-11817"/>
+<polygon fill="#000000" stroke="#000000" points="285.99,-11820.5 295.99,-11817 285.99,-11813.5 285.99,-11820.5"/>
+</g>
+<!-- interface~symba_encounter_check -->
+<g id="call~~graph~~CallGraph_node402" class="node">
+<title>interface~symba_encounter_check</title>
+<g id="a_call~~graph~~CallGraph_node402"><a xlink:href=".././interface/symba_encounter_check.html" xlink:title="symba_encounter_check">
+<polygon fill="#a7506f" stroke="#a7506f" points="163,-6853 31,-6853 31,-6829 163,-6829 163,-6853"/>
+<text text-anchor="middle" x="97" y="-6838.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv -->
-<g id="call~~graph~~CallGraph_edge379" class="edge">
-<title>proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv</title>
-<path fill="none" stroke="#000000" d="M372.17,-5980C417.03,-5980 486.05,-5980 530.48,-5980"/>
-<polygon fill="#000000" stroke="#000000" points="530.67,-5983.5 540.67,-5980 530.67,-5976.5 530.67,-5983.5"/>
+<!-- interface~symba_encounter_check&#45;&gt;proc~symba_encounter_check -->
+<g id="call~~graph~~CallGraph_edge377" class="edge">
+<title>interface~symba_encounter_check&#45;&gt;proc~symba_encounter_check</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.03,-6841C190.34,-6841 222.29,-6841 250.62,-6841"/>
+<polygon fill="#000000" stroke="#000000" points="250.88,-6844.5 260.88,-6841 250.88,-6837.5 250.88,-6844.5"/>
 </g>
-<!-- proc~util_coord_h2b_pl -->
-<g id="call~~graph~~CallGraph_node379" class="node">
-<title>proc~util_coord_h2b_pl</title>
-<g id="a_call~~graph~~CallGraph_node379"><a xlink:href=".././proc/util_coord_h2b_pl.html" xlink:title="util_coord_h2b_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-11835 278.5,-11835 278.5,-11811 375.5,-11811 375.5,-11835"/>
-<text text-anchor="middle" x="327" y="-11820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_pl</text>
+<!-- interface~symba_encounter_check_tp -->
+<g id="call~~graph~~CallGraph_node403" class="node">
+<title>interface~symba_encounter_check_tp</title>
+<g id="a_call~~graph~~CallGraph_node403"><a xlink:href=".././interface/symba_encounter_check_tp.html" xlink:title="symba_encounter_check_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-6811 23.5,-6811 23.5,-6787 170.5,-6787 170.5,-6811"/>
+<text text-anchor="middle" x="97" y="-6796.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~discard_system -->
-<g id="call~~graph~~CallGraph_node380" class="node">
-<title>interface~discard_system</title>
-<g id="a_call~~graph~~CallGraph_node380"><a xlink:href=".././interface/discard_system.html" xlink:title="discard_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="140.5,-11877 53.5,-11877 53.5,-11853 140.5,-11853 140.5,-11877"/>
-<text text-anchor="middle" x="97" y="-11862.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_system</text>
+<!-- interface~symba_encounter_check_tp&#45;&gt;proc~symba_encounter_check_tp -->
+<g id="call~~graph~~CallGraph_edge378" class="edge">
+<title>interface~symba_encounter_check_tp&#45;&gt;proc~symba_encounter_check_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.77,-6799C193.8,-6799 219.43,-6799 243.12,-6799"/>
+<polygon fill="#000000" stroke="#000000" points="243.14,-6802.5 253.14,-6799 243.14,-6795.5 243.14,-6802.5"/>
+</g>
+<!-- proc~operator_cross_i4b -->
+<g id="call~~graph~~CallGraph_node404" class="node">
+<title>proc~operator_cross_i4b</title>
+<g id="a_call~~graph~~CallGraph_node404"><a xlink:href=".././proc/operator_cross_i4b.html" xlink:title="operator_cross_i4b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-12081 44.5,-12081 44.5,-12057 149.5,-12057 149.5,-12081"/>
+<text text-anchor="middle" x="97" y="-12066.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i4b</text>
 </a>
 </g>
 </g>
-<!-- proc~discard_system -->
-<g id="call~~graph~~CallGraph_node516" class="node">
-<title>proc~discard_system</title>
-<g id="a_call~~graph~~CallGraph_node516"><a xlink:href=".././proc/discard_system.html" xlink:title="discard_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="370.5,-11877 283.5,-11877 283.5,-11853 370.5,-11853 370.5,-11877"/>
-<text text-anchor="middle" x="327" y="-11862.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_system</text>
+<!-- proc~symba_collision_casedisruption -->
+<g id="call~~graph~~CallGraph_node460" class="node">
+<title>proc~symba_collision_casedisruption</title>
+<g id="a_call~~graph~~CallGraph_node460"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1421,-1849 1258,-1849 1258,-1825 1421,-1825 1421,-1849"/>
+<text text-anchor="middle" x="1339.5" y="-1834.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
 </a>
 </g>
 </g>
-<!-- interface~discard_system&#45;&gt;proc~discard_system -->
-<g id="call~~graph~~CallGraph_edge380" class="edge">
-<title>interface~discard_system&#45;&gt;proc~discard_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.62,-11865C178.09,-11865 232.77,-11865 273.04,-11865"/>
-<polygon fill="#000000" stroke="#000000" points="273.2,-11868.5 283.2,-11865 273.2,-11861.5 273.2,-11868.5"/>
+<!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
+<g id="call~~graph~~CallGraph_edge379" class="edge">
+<title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1176.08,-1837C1198.94,-1837 1224,-1837 1247.44,-1837"/>
+<polygon fill="#000000" stroke="#000000" points="1247.73,-1840.5 1257.73,-1837 1247.73,-1833.5 1247.73,-1840.5"/>
 </g>
-<!-- interface~discard_tp -->
-<g id="call~~graph~~CallGraph_node381" class="node">
-<title>interface~discard_tp</title>
-<g id="a_call~~graph~~CallGraph_node381"><a xlink:href=".././interface/discard_tp.html" xlink:title="discard_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="128,-11919 66,-11919 66,-11895 128,-11895 128,-11919"/>
-<text text-anchor="middle" x="97" y="-11904.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_tp</text>
+<!-- proc~symba_collision_casehitandrun -->
+<g id="call~~graph~~CallGraph_node475" class="node">
+<title>proc~symba_collision_casehitandrun</title>
+<g id="a_call~~graph~~CallGraph_node475"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1420,-1807 1259,-1807 1259,-1783 1420,-1783 1420,-1807"/>
+<text text-anchor="middle" x="1339.5" y="-1792.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
 </a>
 </g>
 </g>
-<!-- proc~discard_tp -->
-<g id="call~~graph~~CallGraph_node535" class="node">
-<title>proc~discard_tp</title>
-<g id="a_call~~graph~~CallGraph_node535"><a xlink:href=".././proc/discard_tp.html" xlink:title="discard_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="358,-11919 296,-11919 296,-11895 358,-11895 358,-11919"/>
-<text text-anchor="middle" x="327" y="-11904.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_tp</text>
+<!-- interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun -->
+<g id="call~~graph~~CallGraph_edge380" class="edge">
+<title>interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1175.07,-1795C1198.56,-1795 1224.44,-1795 1248.55,-1795"/>
+<polygon fill="#000000" stroke="#000000" points="1248.75,-1798.5 1258.75,-1795 1248.75,-1791.5 1248.75,-1798.5"/>
+</g>
+<!-- proc~symba_collision_casemerge -->
+<g id="call~~graph~~CallGraph_node478" class="node">
+<title>proc~symba_collision_casemerge</title>
+<g id="a_call~~graph~~CallGraph_node478"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1413,-1765 1266,-1765 1266,-1741 1413,-1741 1413,-1765"/>
+<text text-anchor="middle" x="1339.5" y="-1750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
 </g>
 </g>
-<!-- interface~discard_tp&#45;&gt;proc~discard_tp -->
+<!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
 <g id="call~~graph~~CallGraph_edge381" class="edge">
-<title>interface~discard_tp&#45;&gt;proc~discard_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M128.28,-11907C168.76,-11907 240.64,-11907 285.68,-11907"/>
-<polygon fill="#000000" stroke="#000000" points="285.96,-11910.5 295.96,-11907 285.96,-11903.5 285.96,-11910.5"/>
-</g>
-<!-- interface~drift_all&#45;&gt;proc~drift_all -->
-<g id="call~~graph~~CallGraph_edge382" class="edge">
-<title>interface~drift_all&#45;&gt;proc~drift_all</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.68,-11258C648.94,-11258 748.58,-11258 802.32,-11258"/>
-<polygon fill="#000000" stroke="#000000" points="802.43,-11261.5 812.43,-11258 802.43,-11254.5 802.43,-11261.5"/>
+<title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1168.08,-1753C1195.61,-1753 1227.15,-1753 1255.56,-1753"/>
+<polygon fill="#000000" stroke="#000000" points="1255.88,-1756.5 1265.88,-1753 1255.88,-1749.5 1255.88,-1756.5"/>
 </g>
-<!-- interface~drift_body -->
-<g id="call~~graph~~CallGraph_node384" class="node">
-<title>interface~drift_body</title>
-<g id="a_call~~graph~~CallGraph_node384"><a xlink:href=".././interface/drift_body.html" xlink:title="drift_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="127,-11270 67,-11270 67,-11246 127,-11246 127,-11270"/>
-<text text-anchor="middle" x="97" y="-11255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_body</text>
+<!-- proc~discard_peri_tp -->
+<g id="call~~graph~~CallGraph_node408" class="node">
+<title>proc~discard_peri_tp</title>
+<g id="a_call~~graph~~CallGraph_node408"><a xlink:href=".././proc/discard_peri_tp.html" xlink:title="discard_peri_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="140,-12123 54,-12123 54,-12099 140,-12099 140,-12123"/>
+<text text-anchor="middle" x="97" y="-12108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~drift_body&#45;&gt;proc~drift_body -->
-<g id="call~~graph~~CallGraph_edge383" class="edge">
-<title>interface~drift_body&#45;&gt;proc~drift_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M127.34,-11258C167.96,-11258 241.42,-11258 286.73,-11258"/>
-<polygon fill="#000000" stroke="#000000" points="286.77,-11261.5 296.77,-11258 286.77,-11254.5 286.77,-11261.5"/>
+<!-- interface~symba_collision_encounter_extract_collisions -->
+<g id="call~~graph~~CallGraph_node409" class="node">
+<title>interface~symba_collision_encounter_extract_collisions</title>
+<g id="a_call~~graph~~CallGraph_node409"><a xlink:href=".././interface/symba_collision_encounter_extract_collisions.html" xlink:title="symba_collision_encounter_extract_collisions">
+<polygon fill="#a7506f" stroke="#a7506f" points="689,-1656 460,-1656 460,-1632 689,-1632 689,-1656"/>
+<text text-anchor="middle" x="574.5" y="-1641.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_encounter_extract_collisions</text>
+</a>
 </g>
-<!-- interface~drift_one -->
-<g id="call~~graph~~CallGraph_node385" class="node">
-<title>interface~drift_one</title>
-<g id="a_call~~graph~~CallGraph_node385"><a xlink:href=".././interface/drift_one.html" xlink:title="drift_one">
-<polygon fill="#a7506f" stroke="#a7506f" points="124.5,-11480 69.5,-11480 69.5,-11456 124.5,-11456 124.5,-11480"/>
-<text text-anchor="middle" x="97" y="-11465.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_one</text>
+</g>
+<!-- proc~symba_collision_encounter_extract_collisions -->
+<g id="call~~graph~~CallGraph_node618" class="node">
+<title>proc~symba_collision_encounter_extract_collisions</title>
+<g id="a_call~~graph~~CallGraph_node618"><a xlink:href=".././proc/symba_collision_encounter_extract_collisions.html" xlink:title="symba_collision_encounter_extract_collisions">
+<polygon fill="#d9534f" stroke="#d9534f" points="954,-1656 725,-1656 725,-1632 954,-1632 954,-1656"/>
+<text text-anchor="middle" x="839.5" y="-1641.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_encounter_extract_collisions</text>
 </a>
 </g>
 </g>
-<!-- interface~drift_one&#45;&gt;proc~drift_one -->
-<g id="call~~graph~~CallGraph_edge384" class="edge">
-<title>interface~drift_one&#45;&gt;proc~drift_one</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.6,-11468C165.25,-11468 242.95,-11468 289.05,-11468"/>
-<polygon fill="#000000" stroke="#000000" points="289.22,-11471.5 299.22,-11468 289.22,-11464.5 289.22,-11471.5"/>
+<!-- interface~symba_collision_encounter_extract_collisions&#45;&gt;proc~symba_collision_encounter_extract_collisions -->
+<g id="call~~graph~~CallGraph_edge382" class="edge">
+<title>interface~symba_collision_encounter_extract_collisions&#45;&gt;proc~symba_collision_encounter_extract_collisions</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.33,-1644C697.72,-1644 706.2,-1644 714.65,-1644"/>
+<polygon fill="#000000" stroke="#000000" points="714.92,-1647.5 724.92,-1644 714.92,-1640.5 714.92,-1647.5"/>
 </g>
-<!-- interface~util_index_eucl_plpl -->
-<g id="call~~graph~~CallGraph_node386" class="node">
-<title>interface~util_index_eucl_plpl</title>
-<g id="a_call~~graph~~CallGraph_node386"><a xlink:href=".././interface/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
-<polygon fill="#a7506f" stroke="#a7506f" points="150,-11961 44,-11961 44,-11937 150,-11937 150,-11961"/>
-<text text-anchor="middle" x="97" y="-11946.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
+<!-- interface~util_solve_linear_system -->
+<g id="call~~graph~~CallGraph_node410" class="node">
+<title>interface~util_solve_linear_system</title>
+<g id="a_call~~graph~~CallGraph_node410"><a xlink:href=".././interface/util_solve_linear_system.html" xlink:title="util_solve_linear_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="161.5,-12165 32.5,-12165 32.5,-12141 161.5,-12141 161.5,-12165"/>
+<text text-anchor="middle" x="97" y="-12150.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system</text>
 </a>
 </g>
 </g>
-<!-- proc~util_index_eucl_plpl -->
-<g id="call~~graph~~CallGraph_node469" class="node">
-<title>proc~util_index_eucl_plpl</title>
-<g id="a_call~~graph~~CallGraph_node469"><a xlink:href=".././proc/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-11961 274,-11961 274,-11937 380,-11937 380,-11961"/>
-<text text-anchor="middle" x="327" y="-11946.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
+<!-- interface~symba_collision_make_colliders_pl -->
+<g id="call~~graph~~CallGraph_node411" class="node">
+<title>interface~symba_collision_make_colliders_pl</title>
+<g id="a_call~~graph~~CallGraph_node411"><a xlink:href=".././interface/symba_collision_make_colliders_pl.html" xlink:title="symba_collision_make_colliders_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="186.5,-9930 7.5,-9930 7.5,-9906 186.5,-9906 186.5,-9930"/>
+<text text-anchor="middle" x="97" y="-9915.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_make_colliders_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl -->
-<g id="call~~graph~~CallGraph_edge385" class="edge">
-<title>interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-11949C183.76,-11949 227.89,-11949 263.52,-11949"/>
-<polygon fill="#000000" stroke="#000000" points="263.81,-11952.5 273.81,-11949 263.81,-11945.5 263.81,-11952.5"/>
+<!-- interface~symba_collision_make_colliders_pl&#45;&gt;proc~symba_collision_make_colliders_pl -->
+<g id="call~~graph~~CallGraph_edge383" class="edge">
+<title>interface~symba_collision_make_colliders_pl&#45;&gt;proc~symba_collision_make_colliders_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M186.8,-9918C200.06,-9918 213.79,-9918 227.23,-9918"/>
+<polygon fill="#000000" stroke="#000000" points="227.44,-9921.5 237.44,-9918 227.44,-9914.5 227.44,-9921.5"/>
 </g>
-<!-- interface~util_index_eucl_pltp -->
-<g id="call~~graph~~CallGraph_node387" class="node">
-<title>interface~util_index_eucl_pltp</title>
-<g id="a_call~~graph~~CallGraph_node387"><a xlink:href=".././interface/util_index_eucl_pltp.html" xlink:title="util_index_eucl_pltp">
-<polygon fill="#a7506f" stroke="#a7506f" points="150,-12003 44,-12003 44,-11979 150,-11979 150,-12003"/>
-<text text-anchor="middle" x="97" y="-11988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_pltp</text>
+<!-- proc~operator_cross_i8b -->
+<g id="call~~graph~~CallGraph_node412" class="node">
+<title>proc~operator_cross_i8b</title>
+<g id="a_call~~graph~~CallGraph_node412"><a xlink:href=".././proc/operator_cross_i8b.html" xlink:title="operator_cross_i8b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-12207 44.5,-12207 44.5,-12183 149.5,-12183 149.5,-12207"/>
+<text text-anchor="middle" x="97" y="-12192.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_i8b</text>
 </a>
 </g>
 </g>
-<!-- proc~util_index_eucl_pltp -->
-<g id="call~~graph~~CallGraph_node475" class="node">
-<title>proc~util_index_eucl_pltp</title>
-<g id="a_call~~graph~~CallGraph_node475"><a xlink:href=".././proc/util_index_eucl_pltp.html" xlink:title="util_index_eucl_pltp">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-12003 274,-12003 274,-11979 380,-11979 380,-12003"/>
-<text text-anchor="middle" x="327" y="-11988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_pltp</text>
+<!-- interface~symba_collision_resolve_fragmentations -->
+<g id="call~~graph~~CallGraph_node413" class="node">
+<title>interface~symba_collision_resolve_fragmentations</title>
+<g id="a_call~~graph~~CallGraph_node413"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
+<polygon fill="#a7506f" stroke="#a7506f" points="677,-1765 472,-1765 472,-1741 677,-1741 677,-1765"/>
+<text text-anchor="middle" x="574.5" y="-1750.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
 </a>
 </g>
 </g>
-<!-- interface~util_index_eucl_pltp&#45;&gt;proc~util_index_eucl_pltp -->
-<g id="call~~graph~~CallGraph_edge386" class="edge">
-<title>interface~util_index_eucl_pltp&#45;&gt;proc~util_index_eucl_pltp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-11991C183.76,-11991 227.89,-11991 263.52,-11991"/>
-<polygon fill="#000000" stroke="#000000" points="263.81,-11994.5 273.81,-11991 263.81,-11987.5 263.81,-11994.5"/>
+<!-- interface~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_resolve_fragmentations -->
+<g id="call~~graph~~CallGraph_edge384" class="edge">
+<title>interface~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_resolve_fragmentations</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M677.18,-1753C693.34,-1753 710.14,-1753 726.52,-1753"/>
+<polygon fill="#000000" stroke="#000000" points="726.65,-1756.5 736.65,-1753 726.65,-1749.5 726.65,-1756.5"/>
 </g>
-<!-- proc~orbel_schget -->
-<g id="call~~graph~~CallGraph_node388" class="node">
-<title>proc~orbel_schget</title>
-<g id="a_call~~graph~~CallGraph_node388"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
-<polygon fill="#d9534f" stroke="#d9534f" points="1376.5,-5951 1302.5,-5951 1302.5,-5927 1376.5,-5927 1376.5,-5951"/>
-<text text-anchor="middle" x="1339.5" y="-5936.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
+<!-- interface~symba_collision_resolve_mergers -->
+<g id="call~~graph~~CallGraph_node414" class="node">
+<title>interface~symba_collision_resolve_mergers</title>
+<g id="a_call~~graph~~CallGraph_node414"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
+<polygon fill="#a7506f" stroke="#a7506f" points="661.5,-1718 487.5,-1718 487.5,-1694 661.5,-1694 661.5,-1718"/>
+<text text-anchor="middle" x="574.5" y="-1703.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_kick_getaccb_ns_body -->
-<g id="call~~graph~~CallGraph_node389" class="node">
-<title>interface~gr_kick_getaccb_ns_body</title>
-<g id="a_call~~graph~~CallGraph_node389"><a xlink:href=".././interface/gr_kick_getaccb_ns_body.html" xlink:title="gr_kick_getaccb_ns_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="165,-12045 29,-12045 29,-12021 165,-12021 165,-12045"/>
-<text text-anchor="middle" x="97" y="-12030.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getaccb_ns_body</text>
-</a>
-</g>
+<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
+<g id="call~~graph~~CallGraph_edge385" class="edge">
+<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M661.62,-1706C687.39,-1706 715.81,-1706 742.19,-1706"/>
+<polygon fill="#000000" stroke="#000000" points="742.19,-1709.5 752.19,-1706 742.19,-1702.5 742.19,-1709.5"/>
 </g>
-<!-- proc~gr_kick_getaccb_ns_body -->
-<g id="call~~graph~~CallGraph_node530" class="node">
-<title>proc~gr_kick_getaccb_ns_body</title>
-<g id="a_call~~graph~~CallGraph_node530"><a xlink:href=".././proc/gr_kick_getaccb_ns_body.html" xlink:title="gr_kick_getaccb_ns_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="395,-12045 259,-12045 259,-12021 395,-12021 395,-12045"/>
-<text text-anchor="middle" x="327" y="-12030.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getaccb_ns_body</text>
+<!-- proc~symba_setup_pl -->
+<g id="call~~graph~~CallGraph_node415" class="node">
+<title>proc~symba_setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node415"><a xlink:href=".././proc/symba_setup_pl.html" xlink:title="symba_setup_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="885,-12249 794,-12249 794,-12225 885,-12225 885,-12249"/>
+<text text-anchor="middle" x="839.5" y="-12234.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_kick_getaccb_ns_body&#45;&gt;proc~gr_kick_getaccb_ns_body -->
-<g id="call~~graph~~CallGraph_edge387" class="edge">
-<title>interface~gr_kick_getaccb_ns_body&#45;&gt;proc~gr_kick_getaccb_ns_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.17,-12033C191.38,-12033 221.58,-12033 248.69,-12033"/>
-<polygon fill="#000000" stroke="#000000" points="248.91,-12036.5 258.91,-12033 248.91,-12029.5 248.91,-12036.5"/>
+<!-- setup_pl -->
+<g id="call~~graph~~CallGraph_node703" class="node">
+<title>setup_pl</title>
+<polygon fill="#777777" stroke="#777777" points="1121.5,-12291 1067.5,-12291 1067.5,-12267 1121.5,-12267 1121.5,-12291"/>
+<text text-anchor="middle" x="1094.5" y="-12276.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
 </g>
-<!-- interface~util_append_body -->
-<g id="call~~graph~~CallGraph_node390" class="node">
-<title>interface~util_append_body</title>
-<g id="a_call~~graph~~CallGraph_node390"><a xlink:href=".././interface/util_append_body.html" xlink:title="util_append_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="1143,-3321 1046,-3321 1046,-3297 1143,-3297 1143,-3321"/>
-<text text-anchor="middle" x="1094.5" y="-3306.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
+<!-- proc~symba_setup_pl&#45;&gt;setup_pl -->
+<g id="call~~graph~~CallGraph_edge386" class="edge">
+<title>proc~symba_setup_pl&#45;&gt;setup_pl</title>
+<path fill="none" stroke="#000000" d="M885.15,-12244.41C934.24,-12252.56 1012.15,-12265.49 1057.49,-12273.02"/>
+<polygon fill="#000000" stroke="#000000" points="1057.03,-12276.49 1067.47,-12274.68 1058.18,-12269.59 1057.03,-12276.49"/>
+</g>
+<!-- interface~symba_collision_resolve_plplenc -->
+<g id="call~~graph~~CallGraph_node416" class="node">
+<title>interface~symba_collision_resolve_plplenc</title>
+<g id="a_call~~graph~~CallGraph_node416"><a xlink:href=".././interface/symba_collision_resolve_plplenc.html" xlink:title="symba_collision_resolve_plplenc">
+<polygon fill="#a7506f" stroke="#a7506f" points="1178.5,-2101 1010.5,-2101 1010.5,-2077 1178.5,-2077 1178.5,-2101"/>
+<text text-anchor="middle" x="1094.5" y="-2086.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_plplenc</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_body&#45;&gt;proc~util_append_body -->
-<g id="call~~graph~~CallGraph_edge388" class="edge">
-<title>interface~util_append_body&#45;&gt;proc~util_append_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1143.22,-3309C1182.68,-3309 1238.84,-3309 1280.81,-3309"/>
-<polygon fill="#000000" stroke="#000000" points="1280.89,-3312.5 1290.89,-3309 1280.89,-3305.5 1280.89,-3312.5"/>
+<!-- interface~symba_collision_resolve_plplenc&#45;&gt;proc~symba_collision_resolve_plplenc -->
+<g id="call~~graph~~CallGraph_edge387" class="edge">
+<title>interface~symba_collision_resolve_plplenc&#45;&gt;proc~symba_collision_resolve_plplenc</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1170.44,-2076.98C1180.2,-2074.49 1189.94,-2071.52 1199,-2068 1242.32,-2051.14 1287.53,-2021.29 1314.34,-2002.09"/>
+<polygon fill="#000000" stroke="#000000" points="1316.67,-2004.73 1322.7,-1996.02 1312.55,-1999.06 1316.67,-2004.73"/>
 </g>
-<!-- interface~gr_kick_getacch -->
-<g id="call~~graph~~CallGraph_node391" class="node">
-<title>interface~gr_kick_getacch</title>
-<g id="a_call~~graph~~CallGraph_node391"><a xlink:href=".././interface/gr_kick_getacch.html" xlink:title="gr_kick_getacch">
-<polygon fill="#a7506f" stroke="#a7506f" points="142,-12087 52,-12087 52,-12063 142,-12063 142,-12087"/>
-<text text-anchor="middle" x="97" y="-12072.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getacch</text>
+<!-- proc~operator_cross_el_sp -->
+<g id="call~~graph~~CallGraph_node417" class="node">
+<title>proc~operator_cross_el_sp</title>
+<g id="a_call~~graph~~CallGraph_node417"><a xlink:href=".././proc/operator_cross_el_sp.html" xlink:title="operator_cross_el_sp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="155,-12291 39,-12291 39,-12267 155,-12267 155,-12291"/>
+<text text-anchor="middle" x="97" y="-12276.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_sp</text>
 </a>
 </g>
 </g>
-<!-- proc~gr_kick_getacch -->
-<g id="call~~graph~~CallGraph_node559" class="node">
-<title>proc~gr_kick_getacch</title>
-<g id="a_call~~graph~~CallGraph_node559"><a xlink:href=".././proc/gr_kick_getacch.html" xlink:title="gr_kick_getacch">
-<polygon fill="#d9534f" stroke="#d9534f" points="372,-12087 282,-12087 282,-12063 372,-12063 372,-12087"/>
-<text text-anchor="middle" x="327" y="-12072.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getacch</text>
+<!-- proc~util_solve_rkf45 -->
+<g id="call~~graph~~CallGraph_node418" class="node">
+<title>proc~util_solve_rkf45</title>
+<g id="a_call~~graph~~CallGraph_node418"><a xlink:href=".././proc/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="883,-995 796,-995 796,-971 883,-971 883,-995"/>
+<text text-anchor="middle" x="839.5" y="-980.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_kick_getacch&#45;&gt;proc~gr_kick_getacch -->
-<g id="call~~graph~~CallGraph_edge389" class="edge">
-<title>interface~gr_kick_getacch&#45;&gt;proc~gr_kick_getacch</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-12075C179.28,-12075 232.3,-12075 271.88,-12075"/>
-<polygon fill="#000000" stroke="#000000" points="271.89,-12078.5 281.89,-12075 271.89,-12071.5 271.89,-12078.5"/>
+<!-- proc~util_solve_rkf45&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge388" class="edge">
+<title>proc~util_solve_rkf45&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M883.13,-977.6C904.68,-974.25 931.05,-969.19 954,-962 992.34,-949.99 1034.04,-930.2 1061.77,-916"/>
+<polygon fill="#000000" stroke="#000000" points="1063.7,-918.94 1070.97,-911.23 1060.48,-912.73 1063.7,-918.94"/>
 </g>
-<!-- interface~util_append_encounter -->
-<g id="call~~graph~~CallGraph_node392" class="node">
-<title>interface~util_append_encounter</title>
-<g id="a_call~~graph~~CallGraph_node392"><a xlink:href=".././interface/util_append_encounter.html" xlink:title="util_append_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="1155.5,-3241 1033.5,-3241 1033.5,-3217 1155.5,-3217 1155.5,-3241"/>
-<text text-anchor="middle" x="1094.5" y="-3226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
+<!-- interface~symba_collision_resolve_pltpenc -->
+<g id="call~~graph~~CallGraph_node419" class="node">
+<title>interface~symba_collision_resolve_pltpenc</title>
+<g id="a_call~~graph~~CallGraph_node419"><a xlink:href=".././interface/symba_collision_resolve_pltpenc.html" xlink:title="symba_collision_resolve_pltpenc">
+<polygon fill="#a7506f" stroke="#a7506f" points="181.5,-11409 12.5,-11409 12.5,-11385 181.5,-11385 181.5,-11409"/>
+<text text-anchor="middle" x="97" y="-11394.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_pltpenc</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_encounter&#45;&gt;proc~util_append_encounter -->
-<g id="call~~graph~~CallGraph_edge390" class="edge">
-<title>interface~util_append_encounter&#45;&gt;proc~util_append_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1155.57,-3229C1189.59,-3229 1232.34,-3229 1267.96,-3229"/>
-<polygon fill="#000000" stroke="#000000" points="1268.28,-3232.5 1278.28,-3229 1268.28,-3225.5 1268.28,-3232.5"/>
+<!-- interface~symba_collision_resolve_pltpenc&#45;&gt;proc~symba_collision_resolve_pltpenc -->
+<g id="call~~graph~~CallGraph_edge389" class="edge">
+<title>interface~symba_collision_resolve_pltpenc&#45;&gt;proc~symba_collision_resolve_pltpenc</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.6,-11397C198.02,-11397 215.35,-11397 232.08,-11397"/>
+<polygon fill="#000000" stroke="#000000" points="232.41,-11400.5 242.41,-11397 232.41,-11393.5 232.41,-11400.5"/>
 </g>
-<!-- interface~util_fill~2 -->
-<g id="call~~graph~~CallGraph_node393" class="node">
-<title>interface~util_fill~2</title>
-<g id="a_call~~graph~~CallGraph_node393"><a xlink:href=".././interface/util_fill~2.html" xlink:title="util_fill">
-<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-12159 1067.5,-12159 1067.5,-12135 1121.5,-12135 1121.5,-12159"/>
-<text text-anchor="middle" x="1094.5" y="-12144.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+<!-- proc~symba_setup_merger -->
+<g id="call~~graph~~CallGraph_node420" class="node">
+<title>proc~symba_setup_merger</title>
+<g id="a_call~~graph~~CallGraph_node420"><a xlink:href=".././proc/symba_setup_merger.html" xlink:title="symba_setup_merger">
+<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-12249 268.5,-12249 268.5,-12225 385.5,-12225 385.5,-12249"/>
+<text text-anchor="middle" x="327" y="-12234.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_merger</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_p4_pos_kick -->
-<g id="call~~graph~~CallGraph_node394" class="node">
-<title>interface~gr_p4_pos_kick</title>
-<g id="a_call~~graph~~CallGraph_node394"><a xlink:href=".././interface/gr_p4_pos_kick.html" xlink:title="gr_p4_pos_kick">
-<polygon fill="#a7506f" stroke="#a7506f" points="141,-12232 53,-12232 53,-12208 141,-12208 141,-12232"/>
-<text text-anchor="middle" x="97" y="-12217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_p4_pos_kick</text>
+<!-- interface~symba_setup_pl -->
+<g id="call~~graph~~CallGraph_node444" class="node">
+<title>interface~symba_setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node444"><a xlink:href=".././interface/symba_setup_pl.html" xlink:title="symba_setup_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="620,-12249 529,-12249 529,-12225 620,-12225 620,-12249"/>
+<text text-anchor="middle" x="574.5" y="-12234.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~gr_p4_pos_kick -->
-<g id="call~~graph~~CallGraph_node558" class="node">
-<title>proc~gr_p4_pos_kick</title>
-<g id="a_call~~graph~~CallGraph_node558"><a xlink:href=".././proc/gr_p4_pos_kick.html" xlink:title="gr_p4_pos_kick">
-<polygon fill="#d9534f" stroke="#d9534f" points="371,-12232 283,-12232 283,-12208 371,-12208 371,-12232"/>
-<text text-anchor="middle" x="327" y="-12217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_p4_pos_kick</text>
+<!-- proc~symba_setup_merger&#45;&gt;interface~symba_setup_pl -->
+<g id="call~~graph~~CallGraph_edge390" class="edge">
+<title>proc~symba_setup_merger&#45;&gt;interface~symba_setup_pl</title>
+<path fill="none" stroke="#000000" d="M385.56,-12237C425.84,-12237 479.33,-12237 518.94,-12237"/>
+<polygon fill="#000000" stroke="#000000" points="518.95,-12240.5 528.95,-12237 518.95,-12233.5 518.95,-12240.5"/>
+</g>
+<!-- interface~symba_discard_pl -->
+<g id="call~~graph~~CallGraph_node421" class="node">
+<title>interface~symba_discard_pl</title>
+<g id="a_call~~graph~~CallGraph_node421"><a xlink:href=".././interface/symba_discard_pl.html" xlink:title="symba_discard_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="624,-1912 525,-1912 525,-1888 624,-1888 624,-1912"/>
+<text text-anchor="middle" x="574.5" y="-1897.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_p4_pos_kick&#45;&gt;proc~gr_p4_pos_kick -->
+<!-- interface~symba_discard_pl&#45;&gt;proc~symba_discard_pl -->
 <g id="call~~graph~~CallGraph_edge391" class="edge">
-<title>interface~gr_p4_pos_kick&#45;&gt;proc~gr_p4_pos_kick</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.15,-12220C178.44,-12220 232.49,-12220 272.52,-12220"/>
-<polygon fill="#000000" stroke="#000000" points="272.64,-12223.5 282.64,-12220 272.64,-12216.5 272.64,-12223.5"/>
+<title>interface~symba_discard_pl&#45;&gt;proc~symba_discard_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.04,-1900C668.02,-1900 732.9,-1900 779.78,-1900"/>
+<polygon fill="#000000" stroke="#000000" points="779.79,-1903.5 789.79,-1900 779.79,-1896.5 779.79,-1903.5"/>
 </g>
-<!-- interface~util_append_pl -->
-<g id="call~~graph~~CallGraph_node395" class="node">
-<title>interface~util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node395"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="615.5,-3318 533.5,-3318 533.5,-3294 615.5,-3294 615.5,-3318"/>
-<text text-anchor="middle" x="574.5" y="-3303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<!-- interface~symba_drift_pl -->
+<g id="call~~graph~~CallGraph_node422" class="node">
+<title>interface~symba_drift_pl</title>
+<g id="a_call~~graph~~CallGraph_node422"><a xlink:href=".././interface/symba_drift_pl.html" xlink:title="symba_drift_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="138,-12375 56,-12375 56,-12351 138,-12351 138,-12375"/>
+<text text-anchor="middle" x="97" y="-12360.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_pl -->
-<g id="call~~graph~~CallGraph_node507" class="node">
-<title>proc~util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node507"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="880.5,-3318 798.5,-3318 798.5,-3294 880.5,-3294 880.5,-3318"/>
-<text text-anchor="middle" x="839.5" y="-3303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<!-- proc~symba_drift_pl -->
+<g id="call~~graph~~CallGraph_node634" class="node">
+<title>proc~symba_drift_pl</title>
+<g id="a_call~~graph~~CallGraph_node634"><a xlink:href=".././proc/symba_drift_pl.html" xlink:title="symba_drift_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="368,-12375 286,-12375 286,-12351 368,-12351 368,-12375"/>
+<text text-anchor="middle" x="327" y="-12360.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
+<!-- interface~symba_drift_pl&#45;&gt;proc~symba_drift_pl -->
 <g id="call~~graph~~CallGraph_edge392" class="edge">
-<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.73,-3306C661.94,-3306 737.83,-3306 787.98,-3306"/>
-<polygon fill="#000000" stroke="#000000" points="788.27,-3309.5 798.27,-3306 788.27,-3302.5 788.27,-3309.5"/>
+<title>interface~symba_drift_pl&#45;&gt;proc~symba_drift_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-12363C176.54,-12363 234.31,-12363 275.65,-12363"/>
+<polygon fill="#000000" stroke="#000000" points="275.78,-12366.5 285.78,-12363 275.78,-12359.5 275.78,-12366.5"/>
 </g>
-<!-- proc~util_coord_h2b_tp -->
-<g id="call~~graph~~CallGraph_node396" class="node">
-<title>proc~util_coord_h2b_tp</title>
-<g id="a_call~~graph~~CallGraph_node396"><a xlink:href=".././proc/util_coord_h2b_tp.html" xlink:title="util_coord_h2b_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="376,-12274 278,-12274 278,-12250 376,-12250 376,-12274"/>
-<text text-anchor="middle" x="327" y="-12259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_tp</text>
+<!-- interface~symba_drift_tp -->
+<g id="call~~graph~~CallGraph_node423" class="node">
+<title>interface~symba_drift_tp</title>
+<g id="a_call~~graph~~CallGraph_node423"><a xlink:href=".././interface/symba_drift_tp.html" xlink:title="symba_drift_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-12333 55.5,-12333 55.5,-12309 138.5,-12309 138.5,-12333"/>
+<text text-anchor="middle" x="97" y="-12318.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_pseudovel2vel -->
-<g id="call~~graph~~CallGraph_node397" class="node">
-<title>interface~gr_pseudovel2vel</title>
-<g id="a_call~~graph~~CallGraph_node397"><a xlink:href=".././interface/gr_pseudovel2vel.html" xlink:title="gr_pseudovel2vel">
-<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-12316 48.5,-12316 48.5,-12292 145.5,-12292 145.5,-12316"/>
-<text text-anchor="middle" x="97" y="-12301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pseudovel2vel</text>
+<!-- proc~symba_drift_tp -->
+<g id="call~~graph~~CallGraph_node648" class="node">
+<title>proc~symba_drift_tp</title>
+<g id="a_call~~graph~~CallGraph_node648"><a xlink:href=".././proc/symba_drift_tp.html" xlink:title="symba_drift_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="368.5,-12333 285.5,-12333 285.5,-12309 368.5,-12309 368.5,-12333"/>
+<text text-anchor="middle" x="327" y="-12318.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~gr_pseudovel2vel -->
-<g id="call~~graph~~CallGraph_node571" class="node">
-<title>proc~gr_pseudovel2vel</title>
-<g id="a_call~~graph~~CallGraph_node571"><a xlink:href=".././proc/gr_pseudovel2vel.html" xlink:title="gr_pseudovel2vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-12316 278.5,-12316 278.5,-12292 375.5,-12292 375.5,-12316"/>
-<text text-anchor="middle" x="327" y="-12301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pseudovel2vel</text>
-</a>
+<!-- interface~symba_drift_tp&#45;&gt;proc~symba_drift_tp -->
+<g id="call~~graph~~CallGraph_edge393" class="edge">
+<title>interface~symba_drift_tp&#45;&gt;proc~symba_drift_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-12321C176.9,-12321 234.01,-12321 275.12,-12321"/>
+<polygon fill="#000000" stroke="#000000" points="275.21,-12324.5 285.21,-12321 275.21,-12317.5 275.21,-12324.5"/>
 </g>
+<!-- proc~operator_cross_el_dp -->
+<g id="call~~graph~~CallGraph_node424" class="node">
+<title>proc~operator_cross_el_dp</title>
+<g id="a_call~~graph~~CallGraph_node424"><a xlink:href=".././proc/operator_cross_el_dp.html" xlink:title="operator_cross_el_dp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="155.5,-12417 38.5,-12417 38.5,-12393 155.5,-12393 155.5,-12417"/>
+<text text-anchor="middle" x="97" y="-12402.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_dp</text>
+</a>
 </g>
-<!-- interface~gr_pseudovel2vel&#45;&gt;proc~gr_pseudovel2vel -->
-<g id="call~~graph~~CallGraph_edge393" class="edge">
-<title>interface~gr_pseudovel2vel&#45;&gt;proc~gr_pseudovel2vel</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-12304C181.07,-12304 229.87,-12304 267.77,-12304"/>
-<polygon fill="#000000" stroke="#000000" points="268.15,-12307.5 278.15,-12304 268.15,-12300.5 268.15,-12307.5"/>
 </g>
-<!-- interface~util_append_tp -->
-<g id="call~~graph~~CallGraph_node398" class="node">
-<title>interface~util_append_tp</title>
-<g id="a_call~~graph~~CallGraph_node398"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="616,-3360 533,-3360 533,-3336 616,-3336 616,-3360"/>
-<text text-anchor="middle" x="574.5" y="-3345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<!-- interface~symba_encounter_check_one -->
+<g id="call~~graph~~CallGraph_node425" class="node">
+<title>interface~symba_encounter_check_one</title>
+<g id="a_call~~graph~~CallGraph_node425"><a xlink:href=".././interface/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
+<polygon fill="#a7506f" stroke="#a7506f" points="175,-24 19,-24 19,0 175,0 175,-24"/>
+<text text-anchor="middle" x="97" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp -->
-<g id="call~~graph~~CallGraph_node515" class="node">
-<title>proc~util_append_tp</title>
-<g id="a_call~~graph~~CallGraph_node515"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="881,-3360 798,-3360 798,-3336 881,-3336 881,-3360"/>
-<text text-anchor="middle" x="839.5" y="-3345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<!-- interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one -->
+<g id="call~~graph~~CallGraph_edge394" class="edge">
+<title>interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M175.19,-12C195.62,-12 217.81,-12 238.73,-12"/>
+<polygon fill="#000000" stroke="#000000" points="238.89,-15.5 248.89,-12 238.89,-8.5 238.89,-15.5"/>
+</g>
+<!-- proc~gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_node426" class="node">
+<title>proc~gr_p4_pos_kick</title>
+<g id="a_call~~graph~~CallGraph_node426"><a xlink:href=".././proc/gr_p4_pos_kick.html" xlink:title="gr_p4_pos_kick">
+<polygon fill="#d9534f" stroke="#d9534f" points="371,-12459 283,-12459 283,-12435 371,-12435 371,-12459"/>
+<text text-anchor="middle" x="327" y="-12444.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_p4_pos_kick</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
-<g id="call~~graph~~CallGraph_edge394" class="edge">
-<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.02,-3348C662.16,-3348 737.61,-3348 787.66,-3348"/>
-<polygon fill="#000000" stroke="#000000" points="787.94,-3351.5 797.94,-3348 787.94,-3344.5 787.94,-3351.5"/>
-</g>
-<!-- interface~util_solve_rkf45 -->
-<g id="call~~graph~~CallGraph_node399" class="node">
-<title>interface~util_solve_rkf45</title>
-<g id="a_call~~graph~~CallGraph_node399"><a xlink:href=".././interface/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
-<polygon fill="#a7506f" stroke="#a7506f" points="618,-2860 531,-2860 531,-2836 618,-2836 618,-2860"/>
-<text text-anchor="middle" x="574.5" y="-2845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
+<!-- interface~symba_util_index_eucl_plpl -->
+<g id="call~~graph~~CallGraph_node427" class="node">
+<title>interface~symba_util_index_eucl_plpl</title>
+<g id="a_call~~graph~~CallGraph_node427"><a xlink:href=".././interface/symba_util_index_eucl_plpl.html" xlink:title="symba_util_index_eucl_plpl">
+<polygon fill="#a7506f" stroke="#a7506f" points="168.5,-5710 25.5,-5710 25.5,-5686 168.5,-5686 168.5,-5710"/>
+<text text-anchor="middle" x="97" y="-5695.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_index_eucl_plpl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_rkf45 -->
-<g id="call~~graph~~CallGraph_node504" class="node">
-<title>proc~util_solve_rkf45</title>
-<g id="a_call~~graph~~CallGraph_node504"><a xlink:href=".././proc/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="883,-2860 796,-2860 796,-2836 883,-2836 883,-2860"/>
-<text text-anchor="middle" x="839.5" y="-2845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
+<!-- proc~symba_util_index_eucl_plpl -->
+<g id="call~~graph~~CallGraph_node548" class="node">
+<title>proc~symba_util_index_eucl_plpl</title>
+<g id="a_call~~graph~~CallGraph_node548"><a xlink:href=".././proc/symba_util_index_eucl_plpl.html" xlink:title="symba_util_index_eucl_plpl">
+<polygon fill="#d9534f" stroke="#d9534f" points="398.5,-5710 255.5,-5710 255.5,-5686 398.5,-5686 398.5,-5710"/>
+<text text-anchor="middle" x="327" y="-5695.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_index_eucl_plpl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45 -->
+<!-- interface~symba_util_index_eucl_plpl&#45;&gt;proc~symba_util_index_eucl_plpl -->
 <g id="call~~graph~~CallGraph_edge395" class="edge">
-<title>interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.05,-2848C663.65,-2848 736.13,-2848 785.43,-2848"/>
-<polygon fill="#000000" stroke="#000000" points="785.58,-2851.5 795.58,-2848 785.58,-2844.5 785.58,-2851.5"/>
+<title>interface~symba_util_index_eucl_plpl&#45;&gt;proc~symba_util_index_eucl_plpl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-5698C192.83,-5698 220.17,-5698 245.17,-5698"/>
+<polygon fill="#000000" stroke="#000000" points="245.36,-5701.5 255.36,-5698 245.36,-5694.5 245.36,-5701.5"/>
 </g>
-<!-- interface~gr_pv2vh_body -->
-<g id="call~~graph~~CallGraph_node400" class="node">
-<title>interface~gr_pv2vh_body</title>
-<g id="a_call~~graph~~CallGraph_node400"><a xlink:href=".././interface/gr_pv2vh_body.html" xlink:title="gr_pv2vh_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="140,-12358 54,-12358 54,-12334 140,-12334 140,-12358"/>
-<text text-anchor="middle" x="97" y="-12343.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pv2vh_body</text>
+<!-- proc~gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_node428" class="node">
+<title>proc~gr_kick_getacch</title>
+<g id="a_call~~graph~~CallGraph_node428"><a xlink:href=".././proc/gr_kick_getacch.html" xlink:title="gr_kick_getacch">
+<polygon fill="#d9534f" stroke="#d9534f" points="372,-12501 282,-12501 282,-12477 372,-12477 372,-12501"/>
+<text text-anchor="middle" x="327" y="-12486.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- proc~gr_pv2vh_body -->
-<g id="call~~graph~~CallGraph_node587" class="node">
-<title>proc~gr_pv2vh_body</title>
-<g id="a_call~~graph~~CallGraph_node587"><a xlink:href=".././proc/gr_pv2vh_body.html" xlink:title="gr_pv2vh_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="370,-12358 284,-12358 284,-12334 370,-12334 370,-12358"/>
-<text text-anchor="middle" x="327" y="-12343.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pv2vh_body</text>
+<!-- proc~symba_setup_encounter -->
+<g id="call~~graph~~CallGraph_node429" class="node">
+<title>proc~symba_setup_encounter</title>
+<g id="a_call~~graph~~CallGraph_node429"><a xlink:href=".././proc/symba_setup_encounter.html" xlink:title="symba_setup_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="392,-12543 262,-12543 262,-12519 392,-12519 392,-12543"/>
+<text text-anchor="middle" x="327" y="-12528.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_pv2vh_body&#45;&gt;proc~gr_pv2vh_body -->
+<!-- setup_encounter -->
+<g id="call~~graph~~CallGraph_node769" class="node">
+<title>setup_encounter</title>
+<polygon fill="#777777" stroke="#777777" points="621,-12543 528,-12543 528,-12519 621,-12519 621,-12543"/>
+<text text-anchor="middle" x="574.5" y="-12528.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_encounter</text>
+</g>
+<!-- proc~symba_setup_encounter&#45;&gt;setup_encounter -->
 <g id="call~~graph~~CallGraph_edge396" class="edge">
-<title>interface~gr_pv2vh_body&#45;&gt;proc~gr_pv2vh_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.08,-12346C177.73,-12346 233.05,-12346 273.55,-12346"/>
-<polygon fill="#000000" stroke="#000000" points="273.78,-12349.5 283.78,-12346 273.78,-12342.5 273.78,-12349.5"/>
+<title>proc~symba_setup_encounter&#45;&gt;setup_encounter</title>
+<path fill="none" stroke="#000000" d="M392.18,-12531C431.14,-12531 480.38,-12531 517.71,-12531"/>
+<polygon fill="#000000" stroke="#000000" points="517.91,-12534.5 527.91,-12531 517.91,-12527.5 517.91,-12534.5"/>
 </g>
-<!-- interface~util_coord_b2h_pl -->
-<g id="call~~graph~~CallGraph_node401" class="node">
-<title>interface~util_coord_b2h_pl</title>
-<g id="a_call~~graph~~CallGraph_node401"><a xlink:href=".././interface/util_coord_b2h_pl.html" xlink:title="util_coord_b2h_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-11186 48.5,-11186 48.5,-11162 145.5,-11162 145.5,-11186"/>
-<text text-anchor="middle" x="97" y="-11171.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_pl</text>
+<!-- proc~discard_pl_tp -->
+<g id="call~~graph~~CallGraph_node430" class="node">
+<title>proc~discard_pl_tp</title>
+<g id="a_call~~graph~~CallGraph_node430"><a xlink:href=".././proc/discard_pl_tp.html" xlink:title="discard_pl_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="135,-12585 59,-12585 59,-12561 135,-12561 135,-12585"/>
+<text text-anchor="middle" x="97" y="-12570.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_b2h_pl&#45;&gt;proc~util_coord_b2h_pl -->
-<g id="call~~graph~~CallGraph_edge397" class="edge">
-<title>interface~util_coord_b2h_pl&#45;&gt;proc~util_coord_b2h_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-11174C181.07,-11174 229.87,-11174 267.77,-11174"/>
-<polygon fill="#000000" stroke="#000000" points="268.15,-11177.5 278.15,-11174 268.15,-11170.5 268.15,-11177.5"/>
-</g>
-<!-- proc~util_coord_b2h_tp -->
-<g id="call~~graph~~CallGraph_node402" class="node">
-<title>proc~util_coord_b2h_tp</title>
-<g id="a_call~~graph~~CallGraph_node402"><a xlink:href=".././proc/util_coord_b2h_tp.html" xlink:title="util_coord_b2h_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="376,-12400 278,-12400 278,-12376 376,-12376 376,-12400"/>
-<text text-anchor="middle" x="327" y="-12385.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_tp</text>
+<!-- interface~symba_io_param_reader -->
+<g id="call~~graph~~CallGraph_node431" class="node">
+<title>interface~symba_io_param_reader</title>
+<g id="a_call~~graph~~CallGraph_node431"><a xlink:href=".././interface/symba_io_param_reader.html" xlink:title="symba_io_param_reader">
+<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-3297 30.5,-3297 30.5,-3273 163.5,-3273 163.5,-3297"/>
+<text text-anchor="middle" x="97" y="-3282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_reader</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_b2h_tp -->
-<g id="call~~graph~~CallGraph_node403" class="node">
-<title>interface~util_coord_b2h_tp</title>
-<g id="a_call~~graph~~CallGraph_node403"><a xlink:href=".././interface/util_coord_b2h_tp.html" xlink:title="util_coord_b2h_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="146,-12400 48,-12400 48,-12376 146,-12376 146,-12400"/>
-<text text-anchor="middle" x="97" y="-12385.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_b2h_tp</text>
+<!-- interface~symba_io_param_reader&#45;&gt;proc~symba_io_param_reader -->
+<g id="call~~graph~~CallGraph_edge397" class="edge">
+<title>interface~symba_io_param_reader&#45;&gt;proc~symba_io_param_reader</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-3285C190.71,-3285 222.24,-3285 250.27,-3285"/>
+<polygon fill="#000000" stroke="#000000" points="250.43,-3288.5 260.43,-3285 250.43,-3281.5 250.43,-3288.5"/>
+</g>
+<!-- interface~symba_io_param_writer -->
+<g id="call~~graph~~CallGraph_node432" class="node">
+<title>interface~symba_io_param_writer</title>
+<g id="a_call~~graph~~CallGraph_node432"><a xlink:href=".././interface/symba_io_param_writer.html" xlink:title="symba_io_param_writer">
+<polygon fill="#a7506f" stroke="#a7506f" points="160.5,-5206 33.5,-5206 33.5,-5182 160.5,-5182 160.5,-5206"/>
+<text text-anchor="middle" x="97" y="-5191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_param_writer</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_b2h_tp&#45;&gt;proc~util_coord_b2h_tp -->
+<!-- interface~symba_io_param_writer&#45;&gt;proc~symba_io_param_writer -->
 <g id="call~~graph~~CallGraph_edge398" class="edge">
-<title>interface~util_coord_b2h_tp&#45;&gt;proc~util_coord_b2h_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.07,-12388C181.54,-12388 229.98,-12388 267.67,-12388"/>
-<polygon fill="#000000" stroke="#000000" points="267.99,-12391.5 277.99,-12388 267.99,-12384.5 267.99,-12391.5"/>
+<title>interface~symba_io_param_writer&#45;&gt;proc~symba_io_param_writer</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160.6,-5194C189.14,-5194 223.11,-5194 252.83,-5194"/>
+<polygon fill="#000000" stroke="#000000" points="253.14,-5197.5 263.14,-5194 253.14,-5190.5 253.14,-5197.5"/>
 </g>
-<!-- interface~gr_vel2pseudovel -->
-<g id="call~~graph~~CallGraph_node404" class="node">
-<title>interface~gr_vel2pseudovel</title>
-<g id="a_call~~graph~~CallGraph_node404"><a xlink:href=".././interface/gr_vel2pseudovel.html" xlink:title="gr_vel2pseudovel">
-<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-12442 48.5,-12442 48.5,-12418 145.5,-12418 145.5,-12442"/>
-<text text-anchor="middle" x="97" y="-12427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vel2pseudovel</text>
+<!-- proc~operator_cross_el_i1b -->
+<g id="call~~graph~~CallGraph_node433" class="node">
+<title>proc~operator_cross_el_i1b</title>
+<g id="a_call~~graph~~CallGraph_node433"><a xlink:href=".././proc/operator_cross_el_i1b.html" xlink:title="operator_cross_el_i1b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-12627 37.5,-12627 37.5,-12603 156.5,-12603 156.5,-12627"/>
+<text text-anchor="middle" x="97" y="-12612.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i1b</text>
 </a>
 </g>
 </g>
-<!-- proc~gr_vel2pseudovel -->
-<g id="call~~graph~~CallGraph_node562" class="node">
-<title>proc~gr_vel2pseudovel</title>
-<g id="a_call~~graph~~CallGraph_node562"><a xlink:href=".././proc/gr_vel2pseudovel.html" xlink:title="gr_vel2pseudovel">
-<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-12442 278.5,-12442 278.5,-12418 375.5,-12418 375.5,-12442"/>
-<text text-anchor="middle" x="327" y="-12427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vel2pseudovel</text>
+<!-- interface~symba_io_write_discard -->
+<g id="call~~graph~~CallGraph_node434" class="node">
+<title>interface~symba_io_write_discard</title>
+<g id="a_call~~graph~~CallGraph_node434"><a xlink:href=".././interface/symba_io_write_discard.html" xlink:title="symba_io_write_discard">
+<polygon fill="#a7506f" stroke="#a7506f" points="638,-2475 511,-2475 511,-2451 638,-2451 638,-2475"/>
+<text text-anchor="middle" x="574.5" y="-2460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io_write_discard</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_vel2pseudovel&#45;&gt;proc~gr_vel2pseudovel -->
+<!-- interface~symba_io_write_discard&#45;&gt;proc~symba_io_write_discard -->
 <g id="call~~graph~~CallGraph_edge399" class="edge">
-<title>interface~gr_vel2pseudovel&#45;&gt;proc~gr_vel2pseudovel</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-12430C181.07,-12430 229.87,-12430 267.77,-12430"/>
-<polygon fill="#000000" stroke="#000000" points="268.15,-12433.5 278.15,-12430 268.15,-12426.5 268.15,-12433.5"/>
-</g>
-<!-- interface~gr_vh2pv_body -->
-<g id="call~~graph~~CallGraph_node405" class="node">
-<title>interface~gr_vh2pv_body</title>
-<g id="a_call~~graph~~CallGraph_node405"><a xlink:href=".././interface/gr_vh2pv_body.html" xlink:title="gr_vh2pv_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="140,-12484 54,-12484 54,-12460 140,-12460 140,-12484"/>
-<text text-anchor="middle" x="97" y="-12469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vh2pv_body</text>
-</a>
-</g>
+<title>interface~symba_io_write_discard&#45;&gt;proc~symba_io_write_discard</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.16,-2463.95C676.46,-2464.54 725.6,-2465.28 765.63,-2465.89"/>
+<polygon fill="#000000" stroke="#000000" points="765.81,-2469.39 775.86,-2466.05 765.92,-2462.4 765.81,-2469.39"/>
 </g>
-<!-- proc~gr_vh2pv_body -->
-<g id="call~~graph~~CallGraph_node510" class="node">
-<title>proc~gr_vh2pv_body</title>
-<g id="a_call~~graph~~CallGraph_node510"><a xlink:href=".././proc/gr_vh2pv_body.html" xlink:title="gr_vh2pv_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="370,-12484 284,-12484 284,-12460 370,-12460 370,-12484"/>
-<text text-anchor="middle" x="327" y="-12469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vh2pv_body</text>
+<!-- interface~symba_kick_getacch_int_pl -->
+<g id="call~~graph~~CallGraph_node436" class="node">
+<title>interface~symba_kick_getacch_int_pl</title>
+<g id="a_call~~graph~~CallGraph_node436"><a xlink:href=".././interface/symba_kick_getacch_int_pl.html" xlink:title="symba_kick_getacch_int_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="168.5,-5500 25.5,-5500 25.5,-5476 168.5,-5476 168.5,-5500"/>
+<text text-anchor="middle" x="97" y="-5485.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_int_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~gr_vh2pv_body&#45;&gt;proc~gr_vh2pv_body -->
+<!-- interface~symba_kick_getacch_int_pl&#45;&gt;proc~symba_kick_getacch_int_pl -->
 <g id="call~~graph~~CallGraph_edge400" class="edge">
-<title>interface~gr_vh2pv_body&#45;&gt;proc~gr_vh2pv_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.08,-12472C177.73,-12472 233.05,-12472 273.55,-12472"/>
-<polygon fill="#000000" stroke="#000000" points="273.78,-12475.5 283.78,-12472 273.78,-12468.5 273.78,-12475.5"/>
+<title>interface~symba_kick_getacch_int_pl&#45;&gt;proc~symba_kick_getacch_int_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-5488C192.83,-5488 220.17,-5488 245.17,-5488"/>
+<polygon fill="#000000" stroke="#000000" points="245.36,-5491.5 255.36,-5488 245.36,-5484.5 245.36,-5491.5"/>
 </g>
-<!-- interface~util_coord_h2b_pl -->
-<g id="call~~graph~~CallGraph_node406" class="node">
-<title>interface~util_coord_h2b_pl</title>
-<g id="a_call~~graph~~CallGraph_node406"><a xlink:href=".././interface/util_coord_h2b_pl.html" xlink:title="util_coord_h2b_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-11835 48.5,-11835 48.5,-11811 145.5,-11811 145.5,-11835"/>
-<text text-anchor="middle" x="97" y="-11820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_pl</text>
+<!-- interface~symba_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node437" class="node">
+<title>interface~symba_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node437"><a xlink:href=".././interface/symba_kick_getacch_pl.html" xlink:title="symba_kick_getacch_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="160,-5542 34,-5542 34,-5518 160,-5518 160,-5542"/>
+<text text-anchor="middle" x="97" y="-5527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_h2b_pl&#45;&gt;proc~util_coord_h2b_pl -->
+<!-- interface~symba_kick_getacch_pl&#45;&gt;proc~symba_kick_getacch_pl -->
 <g id="call~~graph~~CallGraph_edge401" class="edge">
-<title>interface~util_coord_h2b_pl&#45;&gt;proc~util_coord_h2b_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-11823C181.07,-11823 229.87,-11823 267.77,-11823"/>
-<polygon fill="#000000" stroke="#000000" points="268.15,-11826.5 278.15,-11823 268.15,-11819.5 268.15,-11826.5"/>
-</g>
-<!-- interface~io_conservation_report -->
-<g id="call~~graph~~CallGraph_node407" class="node">
-<title>interface~io_conservation_report</title>
-<g id="a_call~~graph~~CallGraph_node407"><a xlink:href=".././interface/io_conservation_report.html" xlink:title="io_conservation_report">
-<polygon fill="#a7506f" stroke="#a7506f" points="635.5,-2734 513.5,-2734 513.5,-2710 635.5,-2710 635.5,-2734"/>
-<text text-anchor="middle" x="574.5" y="-2719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
-</a>
-</g>
+<title>interface~symba_kick_getacch_pl&#45;&gt;proc~symba_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160,-5530C188.91,-5530 223.49,-5530 253.59,-5530"/>
+<polygon fill="#000000" stroke="#000000" points="253.62,-5533.5 263.62,-5530 253.62,-5526.5 253.62,-5533.5"/>
 </g>
-<!-- proc~io_conservation_report -->
-<g id="call~~graph~~CallGraph_node557" class="node">
-<title>proc~io_conservation_report</title>
-<g id="a_call~~graph~~CallGraph_node557"><a xlink:href=".././proc/io_conservation_report.html" xlink:title="io_conservation_report">
-<polygon fill="#d9534f" stroke="#d9534f" points="900.5,-2734 778.5,-2734 778.5,-2710 900.5,-2710 900.5,-2734"/>
-<text text-anchor="middle" x="839.5" y="-2719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
+<!-- proc~symba_setup_tp -->
+<g id="call~~graph~~CallGraph_node438" class="node">
+<title>proc~symba_setup_tp</title>
+<g id="a_call~~graph~~CallGraph_node438"><a xlink:href=".././proc/symba_setup_tp.html" xlink:title="symba_setup_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-4714 281.5,-4714 281.5,-4690 372.5,-4690 372.5,-4714"/>
+<text text-anchor="middle" x="327" y="-4699.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~io_conservation_report&#45;&gt;proc~io_conservation_report -->
+<!-- proc~symba_setup_tp&#45;&gt;setup_tp -->
 <g id="call~~graph~~CallGraph_edge402" class="edge">
-<title>interface~io_conservation_report&#45;&gt;proc~io_conservation_report</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.51,-2722C675,-2722 726.86,-2722 768.28,-2722"/>
-<polygon fill="#000000" stroke="#000000" points="768.3,-2725.5 778.3,-2722 768.3,-2718.5 768.3,-2725.5"/>
+<title>proc~symba_setup_tp&#45;&gt;setup_tp</title>
+<path fill="none" stroke="#000000" d="M372.74,-4704.19C419.89,-4706.49 493.25,-4710.08 537.02,-4712.22"/>
+<polygon fill="#000000" stroke="#000000" points="537.05,-4715.72 547.21,-4712.71 537.39,-4708.73 537.05,-4715.72"/>
 </g>
-<!-- interface~util_coord_h2b_tp -->
-<g id="call~~graph~~CallGraph_node408" class="node">
-<title>interface~util_coord_h2b_tp</title>
-<g id="a_call~~graph~~CallGraph_node408"><a xlink:href=".././interface/util_coord_h2b_tp.html" xlink:title="util_coord_h2b_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="146,-12274 48,-12274 48,-12250 146,-12250 146,-12274"/>
-<text text-anchor="middle" x="97" y="-12259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_h2b_tp</text>
+<!-- interface~symba_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node439" class="node">
+<title>interface~symba_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node439"><a xlink:href=".././interface/symba_kick_getacch_tp.html" xlink:title="symba_kick_getacch_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="160.5,-5626 33.5,-5626 33.5,-5602 160.5,-5602 160.5,-5626"/>
+<text text-anchor="middle" x="97" y="-5611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_h2b_tp&#45;&gt;proc~util_coord_h2b_tp -->
+<!-- interface~symba_kick_getacch_tp&#45;&gt;proc~symba_kick_getacch_tp -->
 <g id="call~~graph~~CallGraph_edge403" class="edge">
-<title>interface~util_coord_h2b_tp&#45;&gt;proc~util_coord_h2b_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.07,-12262C181.54,-12262 229.98,-12262 267.67,-12262"/>
-<polygon fill="#000000" stroke="#000000" points="267.99,-12265.5 277.99,-12262 267.99,-12258.5 267.99,-12265.5"/>
-</g>
-<!-- interface~io_dump_param -->
-<g id="call~~graph~~CallGraph_node409" class="node">
-<title>interface~io_dump_param</title>
-<g id="a_call~~graph~~CallGraph_node409"><a xlink:href=".././interface/io_dump_param.html" xlink:title="io_dump_param">
-<polygon fill="#a7506f" stroke="#a7506f" points="620,-2650 529,-2650 529,-2626 620,-2626 620,-2650"/>
-<text text-anchor="middle" x="574.5" y="-2635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
-</a>
-</g>
+<title>interface~symba_kick_getacch_tp&#45;&gt;proc~symba_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160.6,-5614C189.14,-5614 223.11,-5614 252.83,-5614"/>
+<polygon fill="#000000" stroke="#000000" points="253.14,-5617.5 263.14,-5614 253.14,-5610.5 253.14,-5617.5"/>
 </g>
-<!-- proc~io_dump_param -->
-<g id="call~~graph~~CallGraph_node565" class="node">
-<title>proc~io_dump_param</title>
-<g id="a_call~~graph~~CallGraph_node565"><a xlink:href=".././proc/io_dump_param.html" xlink:title="io_dump_param">
-<polygon fill="#d9534f" stroke="#d9534f" points="885,-2650 794,-2650 794,-2626 885,-2626 885,-2650"/>
-<text text-anchor="middle" x="839.5" y="-2635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
+<!-- interface~symba_kick_encounter -->
+<g id="call~~graph~~CallGraph_node440" class="node">
+<title>interface~symba_kick_encounter</title>
+<g id="a_call~~graph~~CallGraph_node440"><a xlink:href=".././interface/symba_kick_encounter.html" xlink:title="symba_kick_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="158,-5878 36,-5878 36,-5854 158,-5854 158,-5878"/>
+<text text-anchor="middle" x="97" y="-5863.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_param&#45;&gt;proc~io_dump_param -->
+<!-- interface~symba_kick_encounter&#45;&gt;proc~symba_kick_encounter -->
 <g id="call~~graph~~CallGraph_edge404" class="edge">
-<title>interface~io_dump_param&#45;&gt;proc~io_dump_param</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.11,-2638C665.27,-2638 735.15,-2638 783.66,-2638"/>
-<polygon fill="#000000" stroke="#000000" points="783.67,-2641.5 793.67,-2638 783.67,-2634.5 783.67,-2641.5"/>
+<title>interface~symba_kick_encounter&#45;&gt;proc~symba_kick_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.2,-5866C188.07,-5866 224.34,-5866 255.5,-5866"/>
+<polygon fill="#000000" stroke="#000000" points="255.86,-5869.5 265.86,-5866 255.86,-5862.5 255.86,-5869.5"/>
 </g>
-<!-- interface~util_coord_vb2vh_pl -->
-<g id="call~~graph~~CallGraph_node410" class="node">
-<title>interface~util_coord_vb2vh_pl</title>
-<g id="a_call~~graph~~CallGraph_node410"><a xlink:href=".././interface/util_coord_vb2vh_pl.html" xlink:title="util_coord_vb2vh_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="151,-12526 43,-12526 43,-12502 151,-12502 151,-12526"/>
-<text text-anchor="middle" x="97" y="-12511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_pl</text>
+<!-- interface~symba_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node441" class="node">
+<title>interface~symba_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node441"><a xlink:href=".././interface/symba_setup_initialize_system.html" xlink:title="symba_setup_initialize_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="177,-11073 17,-11073 17,-11049 177,-11049 177,-11073"/>
+<text text-anchor="middle" x="97" y="-11058.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- proc~util_coord_vb2vh_pl -->
-<g id="call~~graph~~CallGraph_node415" class="node">
-<title>proc~util_coord_vb2vh_pl</title>
-<g id="a_call~~graph~~CallGraph_node415"><a xlink:href=".././proc/util_coord_vb2vh_pl.html" xlink:title="util_coord_vb2vh_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="381,-12526 273,-12526 273,-12502 381,-12502 381,-12526"/>
-<text text-anchor="middle" x="327" y="-12511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_pl</text>
+<!-- interface~symba_setup_initialize_system&#45;&gt;proc~symba_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge405" class="edge">
+<title>interface~symba_setup_initialize_system&#45;&gt;proc~symba_setup_initialize_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M177.1,-11061C196.27,-11061 216.89,-11061 236.5,-11061"/>
+<polygon fill="#000000" stroke="#000000" points="236.65,-11064.5 246.65,-11061 236.65,-11057.5 236.65,-11064.5"/>
+</g>
+<!-- interface~symba_setup_merger -->
+<g id="call~~graph~~CallGraph_node442" class="node">
+<title>interface~symba_setup_merger</title>
+<g id="a_call~~graph~~CallGraph_node442"><a xlink:href=".././interface/symba_setup_merger.html" xlink:title="symba_setup_merger">
+<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-12249 38.5,-12249 38.5,-12225 155.5,-12225 155.5,-12249"/>
+<text text-anchor="middle" x="97" y="-12234.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_merger</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_vb2vh_pl&#45;&gt;proc~util_coord_vb2vh_pl -->
-<g id="call~~graph~~CallGraph_edge405" class="edge">
-<title>interface~util_coord_vb2vh_pl&#45;&gt;proc~util_coord_vb2vh_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.17,-12514C184.46,-12514 227.55,-12514 262.61,-12514"/>
-<polygon fill="#000000" stroke="#000000" points="262.75,-12517.5 272.75,-12514 262.75,-12510.5 262.75,-12517.5"/>
+<!-- interface~symba_setup_merger&#45;&gt;proc~symba_setup_merger -->
+<g id="call~~graph~~CallGraph_edge406" class="edge">
+<title>interface~symba_setup_merger&#45;&gt;proc~symba_setup_merger</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-12237C186.72,-12237 225.45,-12237 258.11,-12237"/>
+<polygon fill="#000000" stroke="#000000" points="258.48,-12240.5 268.48,-12237 258.48,-12233.5 258.48,-12240.5"/>
 </g>
-<!-- interface~io_dump_particle_info_base -->
-<g id="call~~graph~~CallGraph_node411" class="node">
-<title>interface~io_dump_particle_info_base</title>
-<g id="a_call~~graph~~CallGraph_node411"><a xlink:href=".././interface/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="648,-2482 501,-2482 501,-2458 648,-2458 648,-2482"/>
-<text text-anchor="middle" x="574.5" y="-2467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
+<!-- proc~gr_pseudovel2vel -->
+<g id="call~~graph~~CallGraph_node443" class="node">
+<title>proc~gr_pseudovel2vel</title>
+<g id="a_call~~graph~~CallGraph_node443"><a xlink:href=".././proc/gr_pseudovel2vel.html" xlink:title="gr_pseudovel2vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="375.5,-12669 278.5,-12669 278.5,-12645 375.5,-12645 375.5,-12669"/>
+<text text-anchor="middle" x="327" y="-12654.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pseudovel2vel</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_particle_info_base -->
-<g id="call~~graph~~CallGraph_node593" class="node">
-<title>proc~io_dump_particle_info_base</title>
-<g id="a_call~~graph~~CallGraph_node593"><a xlink:href=".././proc/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="913,-2482 766,-2482 766,-2458 913,-2458 913,-2482"/>
-<text text-anchor="middle" x="839.5" y="-2467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
+<!-- interface~symba_setup_pl&#45;&gt;proc~symba_setup_pl -->
+<g id="call~~graph~~CallGraph_edge407" class="edge">
+<title>interface~symba_setup_pl&#45;&gt;proc~symba_setup_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.11,-12237C665.27,-12237 735.15,-12237 783.66,-12237"/>
+<polygon fill="#000000" stroke="#000000" points="783.67,-12240.5 793.67,-12237 783.67,-12233.5 783.67,-12240.5"/>
+</g>
+<!-- interface~symba_setup_encounter -->
+<g id="call~~graph~~CallGraph_node445" class="node">
+<title>interface~symba_setup_encounter</title>
+<g id="a_call~~graph~~CallGraph_node445"><a xlink:href=".././interface/symba_setup_encounter.html" xlink:title="symba_setup_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="162,-12543 32,-12543 32,-12519 162,-12519 162,-12543"/>
+<text text-anchor="middle" x="97" y="-12528.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base -->
-<g id="call~~graph~~CallGraph_edge406" class="edge">
-<title>interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M648.06,-2470C681.41,-2470 721.14,-2470 755.66,-2470"/>
-<polygon fill="#000000" stroke="#000000" points="755.72,-2473.5 765.72,-2470 755.72,-2466.5 755.72,-2473.5"/>
+<!-- interface~symba_setup_encounter&#45;&gt;proc~symba_setup_encounter -->
+<g id="call~~graph~~CallGraph_edge408" class="edge">
+<title>interface~symba_setup_encounter&#45;&gt;proc~symba_setup_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-12531C190.04,-12531 222.94,-12531 251.9,-12531"/>
+<polygon fill="#000000" stroke="#000000" points="251.97,-12534.5 261.97,-12531 251.97,-12527.5 251.97,-12534.5"/>
 </g>
-<!-- interface~util_coord_vb2vh_tp -->
-<g id="call~~graph~~CallGraph_node412" class="node">
-<title>interface~util_coord_vb2vh_tp</title>
-<g id="a_call~~graph~~CallGraph_node412"><a xlink:href=".././interface/util_coord_vb2vh_tp.html" xlink:title="util_coord_vb2vh_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-12568 42.5,-12568 42.5,-12544 151.5,-12544 151.5,-12568"/>
-<text text-anchor="middle" x="97" y="-12553.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_tp</text>
+<!-- interface~symba_setup_tp -->
+<g id="call~~graph~~CallGraph_node446" class="node">
+<title>interface~symba_setup_tp</title>
+<g id="a_call~~graph~~CallGraph_node446"><a xlink:href=".././interface/symba_setup_tp.html" xlink:title="symba_setup_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-4714 51.5,-4714 51.5,-4690 142.5,-4690 142.5,-4714"/>
+<text text-anchor="middle" x="97" y="-4699.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_coord_vb2vh_tp -->
-<g id="call~~graph~~CallGraph_node424" class="node">
-<title>proc~util_coord_vb2vh_tp</title>
-<g id="a_call~~graph~~CallGraph_node424"><a xlink:href=".././proc/util_coord_vb2vh_tp.html" xlink:title="util_coord_vb2vh_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-12568 272.5,-12568 272.5,-12544 381.5,-12544 381.5,-12568"/>
-<text text-anchor="middle" x="327" y="-12553.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vb2vh_tp</text>
+<!-- interface~symba_setup_tp&#45;&gt;proc~symba_setup_tp -->
+<g id="call~~graph~~CallGraph_edge409" class="edge">
+<title>interface~symba_setup_tp&#45;&gt;proc~symba_setup_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-4702C179.26,-4702 231.61,-4702 270.99,-4702"/>
+<polygon fill="#000000" stroke="#000000" points="271.22,-4705.5 281.22,-4702 271.22,-4698.5 271.22,-4705.5"/>
+</g>
+<!-- interface~symba_step_system -->
+<g id="call~~graph~~CallGraph_node447" class="node">
+<title>interface~symba_step_system</title>
+<g id="a_call~~graph~~CallGraph_node447"><a xlink:href=".././interface/symba_step_system.html" xlink:title="symba_step_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="152,-6601 42,-6601 42,-6577 152,-6577 152,-6601"/>
+<text text-anchor="middle" x="97" y="-6586.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_vb2vh_tp&#45;&gt;proc~util_coord_vb2vh_tp -->
-<g id="call~~graph~~CallGraph_edge407" class="edge">
-<title>interface~util_coord_vb2vh_tp&#45;&gt;proc~util_coord_vb2vh_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-12556C184.82,-12556 227.38,-12556 262.17,-12556"/>
-<polygon fill="#000000" stroke="#000000" points="262.22,-12559.5 272.22,-12556 262.22,-12552.5 262.22,-12559.5"/>
+<!-- interface~symba_step_system&#45;&gt;proc~symba_step_system -->
+<g id="call~~graph~~CallGraph_edge410" class="edge">
+<title>interface~symba_step_system&#45;&gt;proc~symba_step_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M152.03,-6589C184.99,-6589 227.3,-6589 261.94,-6589"/>
+<polygon fill="#000000" stroke="#000000" points="261.96,-6592.5 271.96,-6589 261.96,-6585.5 261.96,-6592.5"/>
 </g>
-<!-- interface~io_dump_particle_info -->
-<g id="call~~graph~~CallGraph_node413" class="node">
-<title>interface~io_dump_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node413"><a xlink:href=".././interface/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="633.5,-2524 515.5,-2524 515.5,-2500 633.5,-2500 633.5,-2524"/>
-<text text-anchor="middle" x="574.5" y="-2509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
+<!-- interface~symba_step_interp_system -->
+<g id="call~~graph~~CallGraph_node448" class="node">
+<title>interface~symba_step_interp_system</title>
+<g id="a_call~~graph~~CallGraph_node448"><a xlink:href=".././interface/symba_step_interp_system.html" xlink:title="symba_step_interp_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="168.5,-12711 25.5,-12711 25.5,-12687 168.5,-12687 168.5,-12711"/>
+<text text-anchor="middle" x="97" y="-12696.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_interp_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_particle_info -->
-<g id="call~~graph~~CallGraph_node592" class="node">
-<title>proc~io_dump_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node592"><a xlink:href=".././proc/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="898.5,-2524 780.5,-2524 780.5,-2500 898.5,-2500 898.5,-2524"/>
-<text text-anchor="middle" x="839.5" y="-2509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
+<!-- proc~symba_step_interp_system -->
+<g id="call~~graph~~CallGraph_node606" class="node">
+<title>proc~symba_step_interp_system</title>
+<g id="a_call~~graph~~CallGraph_node606"><a xlink:href=".././proc/symba_step_interp_system.html" xlink:title="symba_step_interp_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="398.5,-12711 255.5,-12711 255.5,-12687 398.5,-12687 398.5,-12711"/>
+<text text-anchor="middle" x="327" y="-12696.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_interp_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info -->
-<g id="call~~graph~~CallGraph_edge408" class="edge">
-<title>interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.54,-2512C673.79,-2512 727.55,-2512 769.92,-2512"/>
-<polygon fill="#000000" stroke="#000000" points="770.15,-2515.5 780.15,-2512 770.15,-2508.5 770.15,-2515.5"/>
+<!-- interface~symba_step_interp_system&#45;&gt;proc~symba_step_interp_system -->
+<g id="call~~graph~~CallGraph_edge411" class="edge">
+<title>interface~symba_step_interp_system&#45;&gt;proc~symba_step_interp_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-12699C192.83,-12699 220.17,-12699 245.17,-12699"/>
+<polygon fill="#000000" stroke="#000000" points="245.36,-12702.5 255.36,-12699 245.36,-12695.5 245.36,-12702.5"/>
 </g>
-<!-- interface~util_coord_vh2vb_pl -->
-<g id="call~~graph~~CallGraph_node414" class="node">
-<title>interface~util_coord_vh2vb_pl</title>
-<g id="a_call~~graph~~CallGraph_node414"><a xlink:href=".././interface/util_coord_vh2vb_pl.html" xlink:title="util_coord_vh2vb_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="151,-12610 43,-12610 43,-12586 151,-12586 151,-12610"/>
-<text text-anchor="middle" x="97" y="-12595.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_pl</text>
+<!-- proc~operator_cross_el_i2b -->
+<g id="call~~graph~~CallGraph_node449" class="node">
+<title>proc~operator_cross_el_i2b</title>
+<g id="a_call~~graph~~CallGraph_node449"><a xlink:href=".././proc/operator_cross_el_i2b.html" xlink:title="operator_cross_el_i2b">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="156.5,-12753 37.5,-12753 37.5,-12729 156.5,-12729 156.5,-12753"/>
+<text text-anchor="middle" x="97" y="-12738.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross_el_i2b</text>
 </a>
 </g>
 </g>
-<!-- proc~util_coord_vh2vb_pl -->
-<g id="call~~graph~~CallGraph_node433" class="node">
-<title>proc~util_coord_vh2vb_pl</title>
-<g id="a_call~~graph~~CallGraph_node433"><a xlink:href=".././proc/util_coord_vh2vb_pl.html" xlink:title="util_coord_vh2vb_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="381,-12610 273,-12610 273,-12586 381,-12586 381,-12610"/>
-<text text-anchor="middle" x="327" y="-12595.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_pl</text>
+<!-- interface~symba_step_set_recur_levels_system -->
+<g id="call~~graph~~CallGraph_node450" class="node">
+<title>interface~symba_step_set_recur_levels_system</title>
+<g id="a_call~~graph~~CallGraph_node450"><a xlink:href=".././interface/symba_step_set_recur_levels_system.html" xlink:title="symba_step_set_recur_levels_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="194,-12795 0,-12795 0,-12771 194,-12771 194,-12795"/>
+<text text-anchor="middle" x="97" y="-12780.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_set_recur_levels_system</text>
+</a>
+</g>
+</g>
+<!-- proc~symba_step_set_recur_levels_system -->
+<g id="call~~graph~~CallGraph_node588" class="node">
+<title>proc~symba_step_set_recur_levels_system</title>
+<g id="a_call~~graph~~CallGraph_node588"><a xlink:href=".././proc/symba_step_set_recur_levels_system.html" xlink:title="symba_step_set_recur_levels_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="424,-12795 230,-12795 230,-12771 424,-12771 424,-12795"/>
+<text text-anchor="middle" x="327" y="-12780.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step_set_recur_levels_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_vh2vb_pl&#45;&gt;proc~util_coord_vh2vb_pl -->
-<g id="call~~graph~~CallGraph_edge409" class="edge">
-<title>interface~util_coord_vh2vb_pl&#45;&gt;proc~util_coord_vh2vb_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.17,-12598C184.46,-12598 227.55,-12598 262.61,-12598"/>
-<polygon fill="#000000" stroke="#000000" points="262.75,-12601.5 272.75,-12598 262.75,-12594.5 262.75,-12601.5"/>
+<!-- interface~symba_step_set_recur_levels_system&#45;&gt;proc~symba_step_set_recur_levels_system -->
+<g id="call~~graph~~CallGraph_edge412" class="edge">
+<title>interface~symba_step_set_recur_levels_system&#45;&gt;proc~symba_step_set_recur_levels_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M194.03,-12783C202.52,-12783 211.14,-12783 219.7,-12783"/>
+<polygon fill="#000000" stroke="#000000" points="219.71,-12786.5 229.71,-12783 219.71,-12779.5 219.71,-12786.5"/>
 </g>
-<!-- interface~io_dump_base -->
-<g id="call~~graph~~CallGraph_node416" class="node">
-<title>interface~io_dump_base</title>
-<g id="a_call~~graph~~CallGraph_node416"><a xlink:href=".././interface/io_dump_base.html" xlink:title="io_dump_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-3238 55.5,-3238 55.5,-3214 138.5,-3214 138.5,-3238"/>
-<text text-anchor="middle" x="97" y="-3223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+<!-- proc~discard_pl_close -->
+<g id="call~~graph~~CallGraph_node451" class="node">
+<title>proc~discard_pl_close</title>
+<g id="a_call~~graph~~CallGraph_node451"><a xlink:href=".././proc/discard_pl_close.html" xlink:title="discard_pl_close">
+<polygon fill="#d9534f" stroke="#d9534f" points="143,-12837 51,-12837 51,-12813 143,-12813 143,-12837"/>
+<text text-anchor="middle" x="97" y="-12822.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl_close</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_base&#45;&gt;proc~io_dump_base -->
-<g id="call~~graph~~CallGraph_edge410" class="edge">
-<title>interface~io_dump_base&#45;&gt;proc~io_dump_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-3226C176.9,-3226 234.01,-3226 275.12,-3226"/>
-<polygon fill="#000000" stroke="#000000" points="275.21,-3229.5 285.21,-3226 275.21,-3222.5 275.21,-3229.5"/>
+<!-- interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate -->
+<g id="call~~graph~~CallGraph_edge413" class="edge">
+<title>interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M639.16,-4135C677.06,-4135 725.32,-4135 764.85,-4135"/>
+<polygon fill="#000000" stroke="#000000" points="764.97,-4138.5 774.97,-4135 764.97,-4131.5 764.97,-4138.5"/>
 </g>
-<!-- interface~util_coord_vh2vb_tp -->
-<g id="call~~graph~~CallGraph_node417" class="node">
-<title>interface~util_coord_vh2vb_tp</title>
-<g id="a_call~~graph~~CallGraph_node417"><a xlink:href=".././interface/util_coord_vh2vb_tp.html" xlink:title="util_coord_vh2vb_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-12652 42.5,-12652 42.5,-12628 151.5,-12628 151.5,-12652"/>
-<text text-anchor="middle" x="97" y="-12637.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_tp</text>
+<!-- proc~lambda_destroy -->
+<g id="call~~graph~~CallGraph_node453" class="node">
+<title>proc~lambda_destroy</title>
+<g id="a_call~~graph~~CallGraph_node453"><a xlink:href=".././proc/lambda_destroy.html" xlink:title="lambda_destroy">
+<polygon fill="#d9534f" stroke="#d9534f" points="141.5,-12879 52.5,-12879 52.5,-12855 141.5,-12855 141.5,-12879"/>
+<text text-anchor="middle" x="97" y="-12864.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_destroy</text>
 </a>
 </g>
 </g>
-<!-- proc~util_coord_vh2vb_tp -->
-<g id="call~~graph~~CallGraph_node445" class="node">
-<title>proc~util_coord_vh2vb_tp</title>
-<g id="a_call~~graph~~CallGraph_node445"><a xlink:href=".././proc/util_coord_vh2vb_tp.html" xlink:title="util_coord_vh2vb_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-12652 272.5,-12652 272.5,-12628 381.5,-12628 381.5,-12652"/>
-<text text-anchor="middle" x="327" y="-12637.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_vh2vb_tp</text>
-</a>
+<!-- interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge414" class="edge">
+<title>interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.75,-4032C945.25,-4032 977.82,-4032 1007.17,-4032"/>
+<polygon fill="#000000" stroke="#000000" points="1007.4,-4035.5 1017.4,-4032 1007.4,-4028.5 1007.4,-4035.5"/>
 </g>
+<!-- vpc -->
+<g id="call~~graph~~CallGraph_node709" class="node">
+<title>vpc</title>
+<polygon fill="#777777" stroke="#777777" points="1366.5,-2206 1312.5,-2206 1312.5,-2182 1366.5,-2182 1366.5,-2206"/>
+<text text-anchor="middle" x="1339.5" y="-2191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
 </g>
-<!-- interface~util_coord_vh2vb_tp&#45;&gt;proc~util_coord_vh2vb_tp -->
-<g id="call~~graph~~CallGraph_edge411" class="edge">
-<title>interface~util_coord_vh2vb_tp&#45;&gt;proc~util_coord_vh2vb_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-12640C184.82,-12640 227.38,-12640 262.17,-12640"/>
-<polygon fill="#000000" stroke="#000000" points="262.22,-12643.5 272.22,-12640 262.22,-12636.5 262.22,-12643.5"/>
+<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
+<g id="call~~graph~~CallGraph_edge415" class="edge">
+<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
+<path fill="none" stroke="#000000" d="M1132.14,-2176.17C1178.15,-2180.14 1256.57,-2186.92 1302.34,-2190.88"/>
+<polygon fill="#000000" stroke="#000000" points="1302.15,-2194.37 1312.41,-2191.75 1302.75,-2187.4 1302.15,-2194.37"/>
 </g>
-<!-- interface~io_dump_system -->
-<g id="call~~graph~~CallGraph_node418" class="node">
-<title>interface~io_dump_system</title>
-<g id="a_call~~graph~~CallGraph_node418"><a xlink:href=".././interface/io_dump_system.html" xlink:title="io_dump_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="144,-3591 50,-3591 50,-3567 144,-3567 144,-3591"/>
-<text text-anchor="middle" x="97" y="-3576.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_system</text>
+<!-- xpc -->
+<g id="call~~graph~~CallGraph_node773" class="node">
+<title>xpc</title>
+<polygon fill="#777777" stroke="#777777" points="1366.5,-2164 1312.5,-2164 1312.5,-2140 1366.5,-2140 1366.5,-2164"/>
+<text text-anchor="middle" x="1339.5" y="-2149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
+</g>
+<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
+<g id="call~~graph~~CallGraph_edge416" class="edge">
+<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
+<path fill="none" stroke="#000000" d="M1132.14,-2169.83C1178.15,-2165.86 1256.57,-2159.08 1302.34,-2155.12"/>
+<polygon fill="#000000" stroke="#000000" points="1302.75,-2158.6 1312.41,-2154.25 1302.15,-2151.63 1302.75,-2158.6"/>
+</g>
+<!-- proc~whm_drift_pl -->
+<g id="call~~graph~~CallGraph_node457" class="node">
+<title>proc~whm_drift_pl</title>
+<g id="a_call~~graph~~CallGraph_node457"><a xlink:href=".././proc/whm_drift_pl.html" xlink:title="whm_drift_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="876,-2017 803,-2017 803,-1993 876,-1993 876,-2017"/>
+<text text-anchor="middle" x="839.5" y="-2002.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_system&#45;&gt;proc~io_dump_system -->
-<g id="call~~graph~~CallGraph_edge412" class="edge">
-<title>interface~io_dump_system&#45;&gt;proc~io_dump_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-3579C180.45,-3579 231.21,-3579 269.87,-3579"/>
-<polygon fill="#000000" stroke="#000000" points="269.93,-3582.5 279.93,-3579 269.93,-3575.5 269.93,-3582.5"/>
+<!-- proc~whm_drift_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge417" class="edge">
+<title>proc~whm_drift_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M876.07,-2001.26C901.59,-2000.71 934.75,-2004.77 954,-2026 1016.93,-2095.39 945.16,-2363.75 990,-2446 1005.26,-2473.99 1034.9,-2495.34 1058.57,-2508.91"/>
+<polygon fill="#000000" stroke="#000000" points="1057.18,-2512.14 1067.63,-2513.9 1060.56,-2506.01 1057.18,-2512.14"/>
 </g>
-<!-- interface~util_coord_xh2xb_pl -->
-<g id="call~~graph~~CallGraph_node419" class="node">
-<title>interface~util_coord_xh2xb_pl</title>
-<g id="a_call~~graph~~CallGraph_node419"><a xlink:href=".././interface/util_coord_xh2xb_pl.html" xlink:title="util_coord_xh2xb_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="151,-12694 43,-12694 43,-12670 151,-12670 151,-12694"/>
-<text text-anchor="middle" x="97" y="-12679.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_pl</text>
+<!-- proc~whm_drift_pl&#45;&gt;drift_all -->
+<g id="call~~graph~~CallGraph_edge418" class="edge">
+<title>proc~whm_drift_pl&#45;&gt;drift_all</title>
+<path fill="none" stroke="#000000" d="M876.21,-1999.07C924.18,-1991.11 1008.96,-1977.03 1057.22,-1969.02"/>
+<polygon fill="#000000" stroke="#000000" points="1057.93,-1972.45 1067.22,-1967.36 1056.78,-1965.55 1057.93,-1972.45"/>
+</g>
+<!-- interface~fraggle_io_log_pl -->
+<g id="call~~graph~~CallGraph_node458" class="node">
+<title>interface~fraggle_io_log_pl</title>
+<g id="a_call~~graph~~CallGraph_node458"><a xlink:href=".././interface/fraggle_io_log_pl.html" xlink:title="fraggle_io_log_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="144,-8271 50,-8271 50,-8247 144,-8247 144,-8271"/>
+<text text-anchor="middle" x="97" y="-8256.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_coord_xh2xb_pl -->
-<g id="call~~graph~~CallGraph_node449" class="node">
-<title>proc~util_coord_xh2xb_pl</title>
-<g id="a_call~~graph~~CallGraph_node449"><a xlink:href=".././proc/util_coord_xh2xb_pl.html" xlink:title="util_coord_xh2xb_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="381,-12694 273,-12694 273,-12670 381,-12670 381,-12694"/>
-<text text-anchor="middle" x="327" y="-12679.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_pl</text>
+<!-- interface~fraggle_io_log_pl&#45;&gt;proc~fraggle_io_log_pl -->
+<g id="call~~graph~~CallGraph_edge419" class="edge">
+<title>interface~fraggle_io_log_pl&#45;&gt;proc~fraggle_io_log_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-8259C180.45,-8259 231.21,-8259 269.87,-8259"/>
+<polygon fill="#000000" stroke="#000000" points="269.93,-8262.5 279.93,-8259 269.93,-8255.5 269.93,-8262.5"/>
+</g>
+<!-- proc~symba_util_append_arr_kin -->
+<g id="call~~graph~~CallGraph_node459" class="node">
+<title>proc~symba_util_append_arr_kin</title>
+<g id="a_call~~graph~~CallGraph_node459"><a xlink:href=".././proc/symba_util_append_arr_kin.html" xlink:title="symba_util_append_arr_kin">
+<polygon fill="#d9534f" stroke="#d9534f" points="912,-4738 767,-4738 767,-4714 912,-4714 912,-4738"/>
+<text text-anchor="middle" x="839.5" y="-4723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_arr_kin</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_xh2xb_pl&#45;&gt;proc~util_coord_xh2xb_pl -->
-<g id="call~~graph~~CallGraph_edge413" class="edge">
-<title>interface~util_coord_xh2xb_pl&#45;&gt;proc~util_coord_xh2xb_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.17,-12682C184.46,-12682 227.55,-12682 262.61,-12682"/>
-<polygon fill="#000000" stroke="#000000" points="262.75,-12685.5 272.75,-12682 262.75,-12678.5 262.75,-12685.5"/>
+<!-- proc~symba_util_append_arr_kin&#45;&gt;interface~util_resize -->
+<g id="call~~graph~~CallGraph_edge420" class="edge">
+<title>proc~symba_util_append_arr_kin&#45;&gt;interface~util_resize</title>
+<path fill="none" stroke="#000000" d="M893.66,-4738.02C912.7,-4742.36 934.33,-4747.35 954,-4752 987.81,-4759.99 1026.16,-4769.36 1054.08,-4776.24"/>
+<polygon fill="#000000" stroke="#000000" points="1053.32,-4779.65 1063.87,-4778.65 1055,-4772.86 1053.32,-4779.65"/>
 </g>
-<!-- interface~io_param_reader -->
-<g id="call~~graph~~CallGraph_node420" class="node">
-<title>interface~io_param_reader</title>
-<g id="a_call~~graph~~CallGraph_node420"><a xlink:href=".././interface/io_param_reader.html" xlink:title="io_param_reader">
-<polygon fill="#a7506f" stroke="#a7506f" points="622,-3444 527,-3444 527,-3420 622,-3420 622,-3444"/>
-<text text-anchor="middle" x="574.5" y="-3429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub -->
+<g id="call~~graph~~CallGraph_edge422" class="edge">
+<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M1420.97,-1824.95C1428.94,-1822.5 1436.76,-1819.55 1444,-1816 1462.96,-1806.71 1461.21,-1794.62 1480,-1785 1483.94,-1782.98 1488.08,-1781.16 1492.32,-1779.5"/>
+<polygon fill="#000000" stroke="#000000" points="1493.51,-1782.79 1501.75,-1776.14 1491.16,-1776.2 1493.51,-1782.79"/>
+</g>
+<!-- proc~symba_collision_collider_message -->
+<g id="call~~graph~~CallGraph_node472" class="node">
+<title>proc~symba_collision_collider_message</title>
+<g id="a_call~~graph~~CallGraph_node472"><a xlink:href=".././proc/symba_collision_collider_message.html" xlink:title="symba_collision_collider_message">
+<polygon fill="#d9534f" stroke="#d9534f" points="1657,-1818 1480,-1818 1480,-1794 1657,-1794 1657,-1818"/>
+<text text-anchor="middle" x="1568.5" y="-1803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_collider_message</text>
 </a>
 </g>
 </g>
-<!-- interface~io_param_reader&#45;&gt;proc~io_param_reader -->
-<g id="call~~graph~~CallGraph_edge414" class="edge">
-<title>interface~io_param_reader&#45;&gt;proc~io_param_reader</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.22,-3432C666.77,-3432 733.97,-3432 781.62,-3432"/>
-<polygon fill="#000000" stroke="#000000" points="781.78,-3435.5 791.78,-3432 781.78,-3428.5 781.78,-3435.5"/>
+<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message -->
+<g id="call~~graph~~CallGraph_edge421" class="edge">
+<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M1421.17,-1825.98C1436.9,-1823.84 1453.54,-1821.56 1469.75,-1819.35"/>
+<polygon fill="#000000" stroke="#000000" points="1470.33,-1822.8 1479.77,-1817.98 1469.39,-1815.87 1470.33,-1822.8"/>
 </g>
-<!-- interface~util_coord_xh2xb_tp -->
-<g id="call~~graph~~CallGraph_node421" class="node">
-<title>interface~util_coord_xh2xb_tp</title>
-<g id="a_call~~graph~~CallGraph_node421"><a xlink:href=".././interface/util_coord_xh2xb_tp.html" xlink:title="util_coord_xh2xb_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-12736 42.5,-12736 42.5,-12712 151.5,-12712 151.5,-12736"/>
-<text text-anchor="middle" x="97" y="-12721.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_tp</text>
-</a>
+<!-- proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge423" class="edge">
+<title>proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M1421.17,-1848.37C1440.6,-1851.11 1461.42,-1854.05 1481.1,-1856.82"/>
+<polygon fill="#000000" stroke="#000000" points="1480.88,-1860.32 1491.27,-1858.25 1481.85,-1853.39 1480.88,-1860.32"/>
 </g>
+<!-- interface~fraggle_io_log_regime&#45;&gt;proc~fraggle_io_log_regime -->
+<g id="call~~graph~~CallGraph_edge424" class="edge">
+<title>interface~fraggle_io_log_regime&#45;&gt;proc~fraggle_io_log_regime</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M634.19,-1483C674.33,-1483 727.69,-1483 769.81,-1483"/>
+<polygon fill="#000000" stroke="#000000" points="769.98,-1486.5 779.98,-1483 769.98,-1479.5 769.98,-1486.5"/>
 </g>
-<!-- proc~util_coord_xh2xb_tp -->
-<g id="call~~graph~~CallGraph_node457" class="node">
-<title>proc~util_coord_xh2xb_tp</title>
-<g id="a_call~~graph~~CallGraph_node457"><a xlink:href=".././proc/util_coord_xh2xb_tp.html" xlink:title="util_coord_xh2xb_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-12736 272.5,-12736 272.5,-12712 381.5,-12712 381.5,-12736"/>
-<text text-anchor="middle" x="327" y="-12721.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord_xh2xb_tp</text>
+<!-- interface~fraggle_io_log_start -->
+<g id="call~~graph~~CallGraph_node463" class="node">
+<title>interface~fraggle_io_log_start</title>
+<g id="a_call~~graph~~CallGraph_node463"><a xlink:href=".././interface/fraggle_io_log_start.html" xlink:title="fraggle_io_log_start">
+<polygon fill="#a7506f" stroke="#a7506f" points="150.5,-8455 43.5,-8455 43.5,-8431 150.5,-8431 150.5,-8455"/>
+<text text-anchor="middle" x="97" y="-8440.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
 </a>
 </g>
 </g>
-<!-- interface~util_coord_xh2xb_tp&#45;&gt;proc~util_coord_xh2xb_tp -->
-<g id="call~~graph~~CallGraph_edge415" class="edge">
-<title>interface~util_coord_xh2xb_tp&#45;&gt;proc~util_coord_xh2xb_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-12724C184.82,-12724 227.38,-12724 262.17,-12724"/>
-<polygon fill="#000000" stroke="#000000" points="262.22,-12727.5 272.22,-12724 262.22,-12720.5 262.22,-12727.5"/>
+<!-- interface~fraggle_io_log_start&#45;&gt;proc~fraggle_io_log_start -->
+<g id="call~~graph~~CallGraph_edge425" class="edge">
+<title>interface~fraggle_io_log_start&#45;&gt;proc~fraggle_io_log_start</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.59,-8443C184.11,-8443 227.72,-8443 263.07,-8443"/>
+<polygon fill="#000000" stroke="#000000" points="263.28,-8446.5 273.28,-8443 263.28,-8439.5 263.28,-8446.5"/>
 </g>
-<!-- interface~io_param_writer -->
-<g id="call~~graph~~CallGraph_node422" class="node">
-<title>interface~io_param_writer</title>
-<g id="a_call~~graph~~CallGraph_node422"><a xlink:href=".././interface/io_param_writer.html" xlink:title="io_param_writer">
-<polygon fill="#a7506f" stroke="#a7506f" points="142,-5269 52,-5269 52,-5245 142,-5245 142,-5269"/>
-<text text-anchor="middle" x="97" y="-5254.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_writer</text>
+<!-- interface~fraggle_placeholder_accel -->
+<g id="call~~graph~~CallGraph_node464" class="node">
+<title>interface~fraggle_placeholder_accel</title>
+<g id="a_call~~graph~~CallGraph_node464"><a xlink:href=".././interface/fraggle_placeholder_accel.html" xlink:title="fraggle_placeholder_accel">
+<polygon fill="#a7506f" stroke="#a7506f" points="166,-4588 28,-4588 28,-4564 166,-4564 166,-4588"/>
+<text text-anchor="middle" x="97" y="-4573.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_accel</text>
 </a>
 </g>
 </g>
-<!-- interface~io_param_writer&#45;&gt;proc~io_param_writer -->
-<g id="call~~graph~~CallGraph_edge416" class="edge">
-<title>interface~io_param_writer&#45;&gt;proc~io_param_writer</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-5257C179.28,-5257 232.3,-5257 271.88,-5257"/>
-<polygon fill="#000000" stroke="#000000" points="271.89,-5260.5 281.89,-5257 271.89,-5253.5 271.89,-5260.5"/>
+<!-- interface~fraggle_placeholder_accel&#45;&gt;proc~fraggle_placeholder_accel -->
+<g id="call~~graph~~CallGraph_edge426" class="edge">
+<title>interface~fraggle_placeholder_accel&#45;&gt;proc~fraggle_placeholder_accel</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.1,-4576C191.81,-4576 221.27,-4576 247.83,-4576"/>
+<polygon fill="#000000" stroke="#000000" points="247.86,-4579.5 257.86,-4576 247.86,-4572.5 247.86,-4579.5"/>
 </g>
-<!-- interface~util_copy_encounter -->
-<g id="call~~graph~~CallGraph_node423" class="node">
-<title>interface~util_copy_encounter</title>
-<g id="a_call~~graph~~CallGraph_node423"><a xlink:href=".././interface/util_copy_encounter.html" xlink:title="util_copy_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-12778 42.5,-12778 42.5,-12754 151.5,-12754 151.5,-12778"/>
-<text text-anchor="middle" x="97" y="-12763.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_encounter</text>
+<!-- proc~fraggle_placeholder_step -->
+<g id="call~~graph~~CallGraph_node465" class="node">
+<title>proc~fraggle_placeholder_step</title>
+<g id="a_call~~graph~~CallGraph_node465"><a xlink:href=".././proc/fraggle_placeholder_step.html" xlink:title="fraggle_placeholder_step">
+<polygon fill="#d9534f" stroke="#d9534f" points="393.5,-12921 260.5,-12921 260.5,-12897 393.5,-12897 393.5,-12921"/>
+<text text-anchor="middle" x="327" y="-12906.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_step</text>
 </a>
 </g>
 </g>
-<!-- proc~util_copy_encounter -->
-<g id="call~~graph~~CallGraph_node540" class="node">
-<title>proc~util_copy_encounter</title>
-<g id="a_call~~graph~~CallGraph_node540"><a xlink:href=".././proc/util_copy_encounter.html" xlink:title="util_copy_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-12778 272.5,-12778 272.5,-12754 381.5,-12754 381.5,-12778"/>
-<text text-anchor="middle" x="327" y="-12763.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_encounter</text>
+<!-- interface~fraggle_placeholder_kick -->
+<g id="call~~graph~~CallGraph_node466" class="node">
+<title>interface~fraggle_placeholder_kick</title>
+<g id="a_call~~graph~~CallGraph_node466"><a xlink:href=".././interface/fraggle_placeholder_kick.html" xlink:title="fraggle_placeholder_kick">
+<polygon fill="#a7506f" stroke="#a7506f" points="162.5,-12963 31.5,-12963 31.5,-12939 162.5,-12939 162.5,-12963"/>
+<text text-anchor="middle" x="97" y="-12948.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_kick</text>
 </a>
 </g>
 </g>
-<!-- interface~util_copy_encounter&#45;&gt;proc~util_copy_encounter -->
-<g id="call~~graph~~CallGraph_edge417" class="edge">
-<title>interface~util_copy_encounter&#45;&gt;proc~util_copy_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-12766C184.82,-12766 227.38,-12766 262.17,-12766"/>
-<polygon fill="#000000" stroke="#000000" points="262.22,-12769.5 272.22,-12766 262.22,-12762.5 262.22,-12769.5"/>
-</g>
-<!-- interface~io_read_in_body -->
-<g id="call~~graph~~CallGraph_node425" class="node">
-<title>interface~io_read_in_body</title>
-<g id="a_call~~graph~~CallGraph_node425"><a xlink:href=".././interface/io_read_in_body.html" xlink:title="io_read_in_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="143,-5866 51,-5866 51,-5842 143,-5842 143,-5866"/>
-<text text-anchor="middle" x="97" y="-5851.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_body</text>
+<!-- proc~fraggle_placeholder_kick -->
+<g id="call~~graph~~CallGraph_node497" class="node">
+<title>proc~fraggle_placeholder_kick</title>
+<g id="a_call~~graph~~CallGraph_node497"><a xlink:href=".././proc/fraggle_placeholder_kick.html" xlink:title="fraggle_placeholder_kick">
+<polygon fill="#d9534f" stroke="#d9534f" points="392.5,-12963 261.5,-12963 261.5,-12939 392.5,-12939 392.5,-12963"/>
+<text text-anchor="middle" x="327" y="-12948.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_kick</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_in_body&#45;&gt;proc~io_read_in_body -->
-<g id="call~~graph~~CallGraph_edge418" class="edge">
-<title>interface~io_read_in_body&#45;&gt;proc~io_read_in_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.05,-5854C179.62,-5854 231.36,-5854 270.49,-5854"/>
-<polygon fill="#000000" stroke="#000000" points="270.66,-5857.5 280.66,-5854 270.66,-5850.5 270.66,-5857.5"/>
+<!-- interface~fraggle_placeholder_kick&#45;&gt;proc~fraggle_placeholder_kick -->
+<g id="call~~graph~~CallGraph_edge427" class="edge">
+<title>interface~fraggle_placeholder_kick&#45;&gt;proc~fraggle_placeholder_kick</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.73,-12951C190.16,-12951 222.32,-12951 250.8,-12951"/>
+<polygon fill="#000000" stroke="#000000" points="251.11,-12954.5 261.11,-12951 251.11,-12947.5 251.11,-12954.5"/>
 </g>
-<!-- interface~util_copy_particle_info -->
-<g id="call~~graph~~CallGraph_node426" class="node">
-<title>interface~util_copy_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node426"><a xlink:href=".././interface/util_copy_particle_info.html" xlink:title="util_copy_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-12820 38,-12820 38,-12796 156,-12796 156,-12820"/>
-<text text-anchor="middle" x="97" y="-12805.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info</text>
+<!-- interface~fraggle_placeholder_step -->
+<g id="call~~graph~~CallGraph_node467" class="node">
+<title>interface~fraggle_placeholder_step</title>
+<g id="a_call~~graph~~CallGraph_node467"><a xlink:href=".././interface/fraggle_placeholder_step.html" xlink:title="fraggle_placeholder_step">
+<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-12921 30.5,-12921 30.5,-12897 163.5,-12897 163.5,-12921"/>
+<text text-anchor="middle" x="97" y="-12906.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder_step</text>
 </a>
 </g>
 </g>
-<!-- proc~util_copy_particle_info -->
-<g id="call~~graph~~CallGraph_node554" class="node">
-<title>proc~util_copy_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node554"><a xlink:href=".././proc/util_copy_particle_info.html" xlink:title="util_copy_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="386,-12820 268,-12820 268,-12796 386,-12796 386,-12820"/>
-<text text-anchor="middle" x="327" y="-12805.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info</text>
+<!-- interface~fraggle_placeholder_step&#45;&gt;proc~fraggle_placeholder_step -->
+<g id="call~~graph~~CallGraph_edge428" class="edge">
+<title>interface~fraggle_placeholder_step&#45;&gt;proc~fraggle_placeholder_step</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-12909C190.71,-12909 222.24,-12909 250.27,-12909"/>
+<polygon fill="#000000" stroke="#000000" points="250.43,-12912.5 260.43,-12909 250.43,-12905.5 250.43,-12912.5"/>
+</g>
+<!-- interface~fraggle_regime_colliders -->
+<g id="call~~graph~~CallGraph_node468" class="node">
+<title>interface~fraggle_regime_colliders</title>
+<g id="a_call~~graph~~CallGraph_node468"><a xlink:href=".././interface/fraggle_regime_colliders.html" xlink:title="fraggle_regime_colliders">
+<polygon fill="#a7506f" stroke="#a7506f" points="162,-1495 32,-1495 32,-1471 162,-1471 162,-1495"/>
+<text text-anchor="middle" x="97" y="-1480.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_colliders</text>
 </a>
 </g>
 </g>
-<!-- interface~util_copy_particle_info&#45;&gt;proc~util_copy_particle_info -->
-<g id="call~~graph~~CallGraph_edge419" class="edge">
-<title>interface~util_copy_particle_info&#45;&gt;proc~util_copy_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-12808C187.08,-12808 225.33,-12808 257.7,-12808"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-12811.5 267.98,-12808 257.98,-12804.5 257.98,-12811.5"/>
+<!-- interface~fraggle_regime_colliders&#45;&gt;proc~fraggle_regime_colliders -->
+<g id="call~~graph~~CallGraph_edge429" class="edge">
+<title>interface~fraggle_regime_colliders&#45;&gt;proc~fraggle_regime_colliders</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-1483C190.04,-1483 222.94,-1483 251.9,-1483"/>
+<polygon fill="#000000" stroke="#000000" points="251.97,-1486.5 261.97,-1483 251.97,-1479.5 251.97,-1486.5"/>
 </g>
-<!-- interface~io_read_in_cb -->
-<g id="call~~graph~~CallGraph_node427" class="node">
-<title>interface~io_read_in_cb</title>
-<g id="a_call~~graph~~CallGraph_node427"><a xlink:href=".././interface/io_read_in_cb.html" xlink:title="io_read_in_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="614.5,-3112 534.5,-3112 534.5,-3088 614.5,-3088 614.5,-3112"/>
-<text text-anchor="middle" x="574.5" y="-3097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
+<!-- interface~fraggle_set_budgets_fragments -->
+<g id="call~~graph~~CallGraph_node469" class="node">
+<title>interface~fraggle_set_budgets_fragments</title>
+<g id="a_call~~graph~~CallGraph_node469"><a xlink:href=".././interface/fraggle_set_budgets_fragments.html" xlink:title="fraggle_set_budgets_fragments">
+<polygon fill="#a7506f" stroke="#a7506f" points="179,-13005 15,-13005 15,-12981 179,-12981 179,-13005"/>
+<text text-anchor="middle" x="97" y="-12990.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_budgets_fragments</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb -->
-<g id="call~~graph~~CallGraph_edge420" class="edge">
-<title>interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.59,-3100C661.04,-3100 738.61,-3100 789.15,-3100"/>
-<polygon fill="#000000" stroke="#000000" points="789.2,-3103.5 799.2,-3100 789.2,-3096.5 789.2,-3103.5"/>
-</g>
-<!-- proc~util_copy_particle_info_arr -->
-<g id="call~~graph~~CallGraph_node556" class="node">
-<title>proc~util_copy_particle_info_arr</title>
-<g id="a_call~~graph~~CallGraph_node556"><a xlink:href=".././proc/util_copy_particle_info_arr.html" xlink:title="util_copy_particle_info_arr">
-<polygon fill="#d9534f" stroke="#d9534f" points="643.5,-10052 505.5,-10052 505.5,-10028 643.5,-10028 643.5,-10052"/>
-<text text-anchor="middle" x="574.5" y="-10037.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_particle_info_arr</text>
+<!-- proc~fraggle_set_budgets_fragments -->
+<g id="call~~graph~~CallGraph_node529" class="node">
+<title>proc~fraggle_set_budgets_fragments</title>
+<g id="a_call~~graph~~CallGraph_node529"><a xlink:href=".././proc/fraggle_set_budgets_fragments.html" xlink:title="fraggle_set_budgets_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="409,-13005 245,-13005 245,-12981 409,-12981 409,-13005"/>
+<text text-anchor="middle" x="327" y="-12990.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_budgets_fragments</text>
 </a>
 </g>
 </g>
-<!-- interface~util_copy_particle_info_arr&#45;&gt;proc~util_copy_particle_info_arr -->
-<g id="call~~graph~~CallGraph_edge421" class="edge">
-<title>interface~util_copy_particle_info_arr&#45;&gt;proc~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.06,-10040C426.79,-10040 463.27,-10040 495.14,-10040"/>
-<polygon fill="#000000" stroke="#000000" points="495.31,-10043.5 505.31,-10040 495.31,-10036.5 495.31,-10043.5"/>
+<!-- interface~fraggle_set_budgets_fragments&#45;&gt;proc~fraggle_set_budgets_fragments -->
+<g id="call~~graph~~CallGraph_edge430" class="edge">
+<title>interface~fraggle_set_budgets_fragments&#45;&gt;proc~fraggle_set_budgets_fragments</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M179.03,-12993C197.06,-12993 216.3,-12993 234.72,-12993"/>
+<polygon fill="#000000" stroke="#000000" points="234.85,-12996.5 244.85,-12993 234.85,-12989.5 234.85,-12996.5"/>
 </g>
-<!-- interface~io_read_in_param -->
-<g id="call~~graph~~CallGraph_node429" class="node">
-<title>interface~io_read_in_param</title>
-<g id="a_call~~graph~~CallGraph_node429"><a xlink:href=".././interface/io_read_in_param.html" xlink:title="io_read_in_param">
-<polygon fill="#a7506f" stroke="#a7506f" points="624.5,-2944 524.5,-2944 524.5,-2920 624.5,-2920 624.5,-2944"/>
-<text text-anchor="middle" x="574.5" y="-2929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
+<!-- interface~fraggle_set_coordinate_system -->
+<g id="call~~graph~~CallGraph_node470" class="node">
+<title>interface~fraggle_set_coordinate_system</title>
+<g id="a_call~~graph~~CallGraph_node470"><a xlink:href=".././interface/fraggle_set_coordinate_system.html" xlink:title="fraggle_set_coordinate_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="178,-9426 16,-9426 16,-9402 178,-9402 178,-9426"/>
+<text text-anchor="middle" x="97" y="-9411.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_coordinate_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_in_param&#45;&gt;proc~io_read_in_param -->
-<g id="call~~graph~~CallGraph_edge422" class="edge">
-<title>interface~io_read_in_param&#45;&gt;proc~io_read_in_param</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.66,-2932C668.34,-2932 732.3,-2932 778.88,-2932"/>
-<polygon fill="#000000" stroke="#000000" points="779.14,-2935.5 789.14,-2932 779.14,-2928.5 779.14,-2935.5"/>
+<!-- interface~fraggle_set_coordinate_system&#45;&gt;proc~fraggle_set_coordinate_system -->
+<g id="call~~graph~~CallGraph_edge431" class="edge">
+<title>interface~fraggle_set_coordinate_system&#45;&gt;proc~fraggle_set_coordinate_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M178.06,-9414C196.66,-9414 216.59,-9414 235.6,-9414"/>
+<polygon fill="#000000" stroke="#000000" points="235.74,-9417.5 245.74,-9414 235.74,-9410.5 235.74,-9417.5"/>
 </g>
-<!-- proc~util_exit -->
-<g id="call~~graph~~CallGraph_node620" class="node">
-<title>proc~util_exit</title>
-<g id="a_call~~graph~~CallGraph_node620"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
-<polygon fill="#d9534f" stroke="#d9534f" points="1366.5,-2860 1312.5,-2860 1312.5,-2836 1366.5,-2836 1366.5,-2860"/>
-<text text-anchor="middle" x="1339.5" y="-2845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<!-- proc~whm_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node471" class="node">
+<title>proc~whm_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node471"><a xlink:href=".././proc/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-13047 268.5,-13047 268.5,-13023 385.5,-13023 385.5,-13047"/>
+<text text-anchor="middle" x="327" y="-13032.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_exit&#45;&gt;proc~util_exit -->
-<g id="call~~graph~~CallGraph_edge423" class="edge">
-<title>interface~util_exit&#45;&gt;proc~util_exit</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1121.51,-2848C1164.96,-2848 1252.46,-2848 1302.04,-2848"/>
-<polygon fill="#000000" stroke="#000000" points="1302.31,-2851.5 1312.31,-2848 1302.31,-2844.5 1302.31,-2851.5"/>
+<!-- proc~whm_kick_getacch_ah0 -->
+<g id="call~~graph~~CallGraph_node488" class="node">
+<title>proc~whm_kick_getacch_ah0</title>
+<g id="a_call~~graph~~CallGraph_node488"><a xlink:href=".././proc/whm_kick_getacch_ah0.html" xlink:title="whm_kick_getacch_ah0">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="638,-13089 511,-13089 511,-13065 638,-13065 638,-13089"/>
+<text text-anchor="middle" x="574.5" y="-13074.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_ah0</text>
+</a>
 </g>
-<!-- interface~io_read_in_particle_info -->
-<g id="call~~graph~~CallGraph_node431" class="node">
-<title>interface~io_read_in_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node431"><a xlink:href=".././interface/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="638,-3028 511,-3028 511,-3004 638,-3004 638,-3028"/>
-<text text-anchor="middle" x="574.5" y="-3013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
+</g>
+<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0 -->
+<g id="call~~graph~~CallGraph_edge432" class="edge">
+<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0</title>
+<path fill="none" stroke="#000000" d="M385.56,-13044.85C419.89,-13050.72 463.8,-13058.23 500.54,-13064.52"/>
+<polygon fill="#000000" stroke="#000000" points="500.26,-13068.02 510.7,-13066.26 501.44,-13061.12 500.26,-13068.02"/>
+</g>
+<!-- proc~whm_kick_getacch_ah1 -->
+<g id="call~~graph~~CallGraph_node493" class="node">
+<title>proc~whm_kick_getacch_ah1</title>
+<g id="a_call~~graph~~CallGraph_node493"><a xlink:href=".././proc/whm_kick_getacch_ah1.html" xlink:title="whm_kick_getacch_ah1">
+<polygon fill="#d9534f" stroke="#d9534f" points="638,-13047 511,-13047 511,-13023 638,-13023 638,-13047"/>
+<text text-anchor="middle" x="574.5" y="-13032.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_ah1</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info -->
-<g id="call~~graph~~CallGraph_edge424" class="edge">
-<title>interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.16,-3016C676.46,-3016 725.6,-3016 765.63,-3016"/>
-<polygon fill="#000000" stroke="#000000" points="765.86,-3019.5 775.86,-3016 765.86,-3012.5 765.86,-3019.5"/>
+<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah1 -->
+<g id="call~~graph~~CallGraph_edge433" class="edge">
+<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah1</title>
+<path fill="none" stroke="#000000" d="M385.56,-13035C419.89,-13035 463.8,-13035 500.54,-13035"/>
+<polygon fill="#000000" stroke="#000000" points="500.7,-13038.5 510.7,-13035 500.7,-13031.5 500.7,-13038.5"/>
 </g>
-<!-- interface~util_fill_body -->
-<g id="call~~graph~~CallGraph_node432" class="node">
-<title>interface~util_fill_body</title>
-<g id="a_call~~graph~~CallGraph_node432"><a xlink:href=".././interface/util_fill_body.html" xlink:title="util_fill_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="610,-12159 539,-12159 539,-12135 610,-12135 610,-12159"/>
-<text text-anchor="middle" x="574.5" y="-12144.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_body</text>
+<!-- proc~whm_kick_getacch_ah2 -->
+<g id="call~~graph~~CallGraph_node514" class="node">
+<title>proc~whm_kick_getacch_ah2</title>
+<g id="a_call~~graph~~CallGraph_node514"><a xlink:href=".././proc/whm_kick_getacch_ah2.html" xlink:title="whm_kick_getacch_ah2">
+<polygon fill="#d9534f" stroke="#d9534f" points="638,-13005 511,-13005 511,-12981 638,-12981 638,-13005"/>
+<text text-anchor="middle" x="574.5" y="-12990.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_ah2</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_body -->
-<g id="call~~graph~~CallGraph_node665" class="node">
-<title>proc~util_fill_body</title>
-<g id="a_call~~graph~~CallGraph_node665"><a xlink:href=".././proc/util_fill_body.html" xlink:title="util_fill_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="875,-12159 804,-12159 804,-12135 875,-12135 875,-12159"/>
-<text text-anchor="middle" x="839.5" y="-12144.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_body</text>
+<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah2 -->
+<g id="call~~graph~~CallGraph_edge434" class="edge">
+<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah2</title>
+<path fill="none" stroke="#000000" d="M385.56,-13025.15C419.89,-13019.28 463.8,-13011.77 500.54,-13005.48"/>
+<polygon fill="#000000" stroke="#000000" points="501.44,-13008.88 510.7,-13003.74 500.26,-13001.98 501.44,-13008.88"/>
+</g>
+<!-- interface~fraggle_set_mass_dist_fragments -->
+<g id="call~~graph~~CallGraph_node473" class="node">
+<title>interface~fraggle_set_mass_dist_fragments</title>
+<g id="a_call~~graph~~CallGraph_node473"><a xlink:href=".././interface/fraggle_set_mass_dist_fragments.html" xlink:title="fraggle_set_mass_dist_fragments">
+<polygon fill="#a7506f" stroke="#a7506f" points="184,-9342 10,-9342 10,-9318 184,-9318 184,-9342"/>
+<text text-anchor="middle" x="97" y="-9327.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_mass_dist_fragments</text>
 </a>
 </g>
 </g>
-<!-- interface~util_fill_body&#45;&gt;proc~util_fill_body -->
-<g id="call~~graph~~CallGraph_edge425" class="edge">
-<title>interface~util_fill_body&#45;&gt;proc~util_fill_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.15,-12147C657.26,-12147 741.58,-12147 793.52,-12147"/>
-<polygon fill="#000000" stroke="#000000" points="793.77,-12150.5 803.77,-12147 793.77,-12143.5 793.77,-12150.5"/>
+<!-- interface~fraggle_set_mass_dist_fragments&#45;&gt;proc~fraggle_set_mass_dist_fragments -->
+<g id="call~~graph~~CallGraph_edge435" class="edge">
+<title>interface~fraggle_set_mass_dist_fragments&#45;&gt;proc~fraggle_set_mass_dist_fragments</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.2,-9330C198.95,-9330 214.37,-9330 229.37,-9330"/>
+<polygon fill="#000000" stroke="#000000" points="229.68,-9333.5 239.68,-9330 229.68,-9326.5 229.68,-9333.5"/>
 </g>
-<!-- interface~util_fill_pl -->
-<g id="call~~graph~~CallGraph_node434" class="node">
-<title>interface~util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node434"><a xlink:href=".././interface/util_fill_pl.html" xlink:title="util_fill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="125,-12190 69,-12190 69,-12166 125,-12166 125,-12190"/>
-<text text-anchor="middle" x="97" y="-12175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<!-- interface~fraggle_set_natural_scale_factors -->
+<g id="call~~graph~~CallGraph_node474" class="node">
+<title>interface~fraggle_set_natural_scale_factors</title>
+<g id="a_call~~graph~~CallGraph_node474"><a xlink:href=".././interface/fraggle_set_natural_scale_factors.html" xlink:title="fraggle_set_natural_scale_factors">
+<polygon fill="#a7506f" stroke="#a7506f" points="184,-13131 10,-13131 10,-13107 184,-13107 184,-13131"/>
+<text text-anchor="middle" x="97" y="-13116.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_natural_scale_factors</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_pl -->
-<g id="call~~graph~~CallGraph_node668" class="node">
-<title>proc~util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node668"><a xlink:href=".././proc/util_fill_pl.html" xlink:title="util_fill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="355,-12190 299,-12190 299,-12166 355,-12166 355,-12190"/>
-<text text-anchor="middle" x="327" y="-12175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<!-- proc~fraggle_set_natural_scale_factors -->
+<g id="call~~graph~~CallGraph_node565" class="node">
+<title>proc~fraggle_set_natural_scale_factors</title>
+<g id="a_call~~graph~~CallGraph_node565"><a xlink:href=".././proc/fraggle_set_natural_scale_factors.html" xlink:title="fraggle_set_natural_scale_factors">
+<polygon fill="#d9534f" stroke="#d9534f" points="414,-13131 240,-13131 240,-13107 414,-13107 414,-13131"/>
+<text text-anchor="middle" x="327" y="-13116.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_natural_scale_factors</text>
 </a>
 </g>
 </g>
-<!-- interface~util_fill_pl&#45;&gt;proc~util_fill_pl -->
-<g id="call~~graph~~CallGraph_edge426" class="edge">
-<title>interface~util_fill_pl&#45;&gt;proc~util_fill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M125.05,-12178C165.76,-12178 242.89,-12178 288.85,-12178"/>
-<polygon fill="#000000" stroke="#000000" points="288.99,-12181.5 298.99,-12178 288.99,-12174.5 288.99,-12181.5"/>
-</g>
-<!-- interface~io_read_particle_info_system -->
-<g id="call~~graph~~CallGraph_node435" class="node">
-<title>interface~io_read_particle_info_system</title>
-<g id="a_call~~graph~~CallGraph_node435"><a xlink:href=".././interface/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="650.5,-2818 498.5,-2818 498.5,-2794 650.5,-2794 650.5,-2818"/>
-<text text-anchor="middle" x="574.5" y="-2803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
-</a>
-</g>
+<!-- interface~fraggle_set_natural_scale_factors&#45;&gt;proc~fraggle_set_natural_scale_factors -->
+<g id="call~~graph~~CallGraph_edge436" class="edge">
+<title>interface~fraggle_set_natural_scale_factors&#45;&gt;proc~fraggle_set_natural_scale_factors</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.2,-13119C198.95,-13119 214.37,-13119 229.37,-13119"/>
+<polygon fill="#000000" stroke="#000000" points="229.68,-13122.5 239.68,-13119 229.68,-13115.5 229.68,-13122.5"/>
 </g>
-<!-- proc~io_read_particle_info_system -->
-<g id="call~~graph~~CallGraph_node506" class="node">
-<title>proc~io_read_particle_info_system</title>
-<g id="a_call~~graph~~CallGraph_node506"><a xlink:href=".././proc/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="915.5,-2818 763.5,-2818 763.5,-2794 915.5,-2794 915.5,-2818"/>
-<text text-anchor="middle" x="839.5" y="-2803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
-</a>
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
+<g id="call~~graph~~CallGraph_edge438" class="edge">
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M1420.21,-1784.11C1439.03,-1781.54 1459.22,-1778.79 1478.42,-1776.16"/>
+<polygon fill="#000000" stroke="#000000" points="1478.93,-1779.63 1488.36,-1774.81 1477.98,-1772.69 1478.93,-1779.63"/>
 </g>
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
+<g id="call~~graph~~CallGraph_edge437" class="edge">
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M1420.21,-1798.86C1436.19,-1799.64 1453.14,-1800.46 1469.65,-1801.26"/>
+<polygon fill="#000000" stroke="#000000" points="1469.7,-1804.76 1479.86,-1801.75 1470.04,-1797.77 1469.7,-1804.76"/>
 </g>
-<!-- interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system -->
-<g id="call~~graph~~CallGraph_edge427" class="edge">
-<title>interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.51,-2806C682.57,-2806 720.16,-2806 753.27,-2806"/>
-<polygon fill="#000000" stroke="#000000" points="753.39,-2809.5 763.39,-2806 753.39,-2802.5 753.39,-2809.5"/>
+<!-- proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge439" class="edge">
+<title>proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M1410.03,-1807.06C1421.48,-1809.63 1433.15,-1812.61 1444,-1816 1475.46,-1825.83 1509.8,-1840.94 1534.27,-1852.52"/>
+<polygon fill="#000000" stroke="#000000" points="1532.93,-1855.76 1543.46,-1856.93 1535.95,-1849.45 1532.93,-1855.76"/>
 </g>
-<!-- interface~util_fill_tp -->
-<g id="call~~graph~~CallGraph_node436" class="node">
-<title>interface~util_fill_tp</title>
-<g id="a_call~~graph~~CallGraph_node436"><a xlink:href=".././interface/util_fill_tp.html" xlink:title="util_fill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="125.5,-12129 68.5,-12129 68.5,-12105 125.5,-12105 125.5,-12129"/>
-<text text-anchor="middle" x="97" y="-12114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<!-- proc~fraggle_util_add_fragments_to_system -->
+<g id="call~~graph~~CallGraph_node476" class="node">
+<title>proc~fraggle_util_add_fragments_to_system</title>
+<g id="a_call~~graph~~CallGraph_node476"><a xlink:href=".././proc/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="1438.5,-1475 1240.5,-1475 1240.5,-1451 1438.5,-1451 1438.5,-1475"/>
+<text text-anchor="middle" x="1339.5" y="-1460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_add_fragments_to_system</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_tp -->
-<g id="call~~graph~~CallGraph_node676" class="node">
-<title>proc~util_fill_tp</title>
-<g id="a_call~~graph~~CallGraph_node676"><a xlink:href=".././proc/util_fill_tp.html" xlink:title="util_fill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="355.5,-12129 298.5,-12129 298.5,-12105 355.5,-12105 355.5,-12129"/>
-<text text-anchor="middle" x="327" y="-12114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<!-- interface~fraggle_set_original_scale_factors -->
+<g id="call~~graph~~CallGraph_node477" class="node">
+<title>interface~fraggle_set_original_scale_factors</title>
+<g id="a_call~~graph~~CallGraph_node477"><a xlink:href=".././interface/fraggle_set_original_scale_factors.html" xlink:title="fraggle_set_original_scale_factors">
+<polygon fill="#a7506f" stroke="#a7506f" points="184.5,-9258 9.5,-9258 9.5,-9234 184.5,-9234 184.5,-9258"/>
+<text text-anchor="middle" x="97" y="-9243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set_original_scale_factors</text>
 </a>
 </g>
 </g>
-<!-- interface~util_fill_tp&#45;&gt;proc~util_fill_tp -->
-<g id="call~~graph~~CallGraph_edge428" class="edge">
-<title>interface~util_fill_tp&#45;&gt;proc~util_fill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M125.5,-12117C166.16,-12117 242.42,-12117 288.27,-12117"/>
-<polygon fill="#000000" stroke="#000000" points="288.4,-12120.5 298.4,-12117 288.4,-12113.5 288.4,-12120.5"/>
+<!-- interface~fraggle_set_original_scale_factors&#45;&gt;proc~fraggle_set_original_scale_factors -->
+<g id="call~~graph~~CallGraph_edge440" class="edge">
+<title>interface~fraggle_set_original_scale_factors&#45;&gt;proc~fraggle_set_original_scale_factors</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.52,-9246C199.06,-9246 214.22,-9246 229,-9246"/>
+<polygon fill="#000000" stroke="#000000" points="229.16,-9249.5 239.16,-9246 229.16,-9242.5 229.16,-9249.5"/>
 </g>
-<!-- interface~io_write_discard -->
-<g id="call~~graph~~CallGraph_node437" class="node">
-<title>interface~io_write_discard</title>
-<g id="a_call~~graph~~CallGraph_node437"><a xlink:href=".././interface/io_write_discard.html" xlink:title="io_write_discard">
-<polygon fill="#a7506f" stroke="#a7506f" points="619.5,-2776 529.5,-2776 529.5,-2752 619.5,-2752 619.5,-2776"/>
-<text text-anchor="middle" x="574.5" y="-2761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
-</a>
+<!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub -->
+<g id="call~~graph~~CallGraph_edge442" class="edge">
+<title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M1413.26,-1756.53C1433.97,-1757.53 1456.77,-1758.63 1478.34,-1759.68"/>
+<polygon fill="#000000" stroke="#000000" points="1478.32,-1763.18 1488.48,-1760.17 1478.66,-1756.19 1478.32,-1763.18"/>
 </g>
+<!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message -->
+<g id="call~~graph~~CallGraph_edge441" class="edge">
+<title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M1404.76,-1765.04C1417.8,-1767.76 1431.38,-1770.8 1444,-1774 1460.22,-1778.11 1463.86,-1780.6 1480,-1785 1488.13,-1787.21 1496.71,-1789.43 1505.2,-1791.54"/>
+<polygon fill="#000000" stroke="#000000" points="1504.54,-1794.98 1515.08,-1793.97 1506.21,-1788.19 1504.54,-1794.98"/>
 </g>
-<!-- proc~io_write_discard -->
-<g id="call~~graph~~CallGraph_node518" class="node">
-<title>proc~io_write_discard</title>
-<g id="a_call~~graph~~CallGraph_node518"><a xlink:href=".././proc/io_write_discard.html" xlink:title="io_write_discard">
-<polygon fill="#d9534f" stroke="#d9534f" points="884.5,-2776 794.5,-2776 794.5,-2752 884.5,-2752 884.5,-2776"/>
-<text text-anchor="middle" x="839.5" y="-2761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
-</a>
+<!-- proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge443" class="edge">
+<title>proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M1413.23,-1760.28C1424.11,-1763.44 1434.77,-1767.85 1444,-1774 1467.71,-1789.78 1458.42,-1808.42 1480,-1827 1492.36,-1837.64 1507.88,-1846.24 1522.41,-1852.82"/>
+<polygon fill="#000000" stroke="#000000" points="1521.2,-1856.11 1531.77,-1856.85 1523.97,-1849.68 1521.2,-1856.11"/>
 </g>
+<!-- interface~fraggle_setup_fragments -->
+<g id="call~~graph~~CallGraph_node479" class="node">
+<title>interface~fraggle_setup_fragments</title>
+<g id="a_call~~graph~~CallGraph_node479"><a xlink:href=".././interface/fraggle_setup_fragments.html" xlink:title="fraggle_setup_fragments">
+<polygon fill="#a7506f" stroke="#a7506f" points="640.5,-12333 508.5,-12333 508.5,-12309 640.5,-12309 640.5,-12333"/>
+<text text-anchor="middle" x="574.5" y="-12318.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_fragments</text>
+</a>
 </g>
-<!-- interface~io_write_discard&#45;&gt;proc~io_write_discard -->
-<g id="call~~graph~~CallGraph_edge429" class="edge">
-<title>interface~io_write_discard&#45;&gt;proc~io_write_discard</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.52,-2764C664.84,-2764 735.54,-2764 784.29,-2764"/>
-<polygon fill="#000000" stroke="#000000" points="784.34,-2767.5 794.34,-2764 784.34,-2760.5 784.34,-2767.5"/>
 </g>
-<!-- proc~io_toupper -->
-<g id="call~~graph~~CallGraph_node511" class="node">
-<title>proc~io_toupper</title>
-<g id="a_call~~graph~~CallGraph_node511"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#d9534f" stroke="#d9534f" points="1371.5,-3444 1307.5,-3444 1307.5,-3420 1371.5,-3420 1371.5,-3444"/>
-<text text-anchor="middle" x="1339.5" y="-3429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<!-- proc~fraggle_setup_fragments -->
+<g id="call~~graph~~CallGraph_node525" class="node">
+<title>proc~fraggle_setup_fragments</title>
+<g id="a_call~~graph~~CallGraph_node525"><a xlink:href=".././proc/fraggle_setup_fragments.html" xlink:title="fraggle_setup_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="905.5,-12333 773.5,-12333 773.5,-12309 905.5,-12309 905.5,-12333"/>
+<text text-anchor="middle" x="839.5" y="-12318.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_fragments</text>
 </a>
 </g>
 </g>
-<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
-<g id="call~~graph~~CallGraph_edge430" class="edge">
-<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1126.77,-3432C1170.24,-3432 1249.01,-3432 1297.25,-3432"/>
-<polygon fill="#000000" stroke="#000000" points="1297.35,-3435.5 1307.35,-3432 1297.35,-3428.5 1297.35,-3435.5"/>
+<!-- interface~fraggle_setup_fragments&#45;&gt;proc~fraggle_setup_fragments -->
+<g id="call~~graph~~CallGraph_edge444" class="edge">
+<title>interface~fraggle_setup_fragments&#45;&gt;proc~fraggle_setup_fragments</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.51,-12321C677.65,-12321 724.4,-12321 763.14,-12321"/>
+<polygon fill="#000000" stroke="#000000" points="763.33,-12324.5 773.33,-12321 763.33,-12317.5 763.33,-12324.5"/>
 </g>
-<!-- interface~io_write_encounter -->
-<g id="call~~graph~~CallGraph_node439" class="node">
-<title>interface~io_write_encounter</title>
-<g id="a_call~~graph~~CallGraph_node439"><a xlink:href=".././interface/io_write_encounter.html" xlink:title="io_write_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="626,-2398 523,-2398 523,-2374 626,-2374 626,-2398"/>
-<text text-anchor="middle" x="574.5" y="-2383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
+<!-- proc~fraggle_util_restructure -->
+<g id="call~~graph~~CallGraph_node480" class="node">
+<title>proc~fraggle_util_restructure</title>
+<g id="a_call~~graph~~CallGraph_node480"><a xlink:href=".././proc/fraggle_util_restructure.html" xlink:title="fraggle_util_restructure">
+<polygon fill="#d9534f" stroke="#d9534f" points="388.5,-13173 265.5,-13173 265.5,-13149 388.5,-13149 388.5,-13173"/>
+<text text-anchor="middle" x="327" y="-13158.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_restructure</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_encounter -->
-<g id="call~~graph~~CallGraph_node531" class="node">
-<title>proc~io_write_encounter</title>
-<g id="a_call~~graph~~CallGraph_node531"><a xlink:href=".././proc/io_write_encounter.html" xlink:title="io_write_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="891,-2398 788,-2398 788,-2374 891,-2374 891,-2398"/>
-<text text-anchor="middle" x="839.5" y="-2383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
+<!-- interface~fraggle_setup_reset_fragments -->
+<g id="call~~graph~~CallGraph_node481" class="node">
+<title>interface~fraggle_setup_reset_fragments</title>
+<g id="a_call~~graph~~CallGraph_node481"><a xlink:href=".././interface/fraggle_setup_reset_fragments.html" xlink:title="fraggle_setup_reset_fragments">
+<polygon fill="#a7506f" stroke="#a7506f" points="178,-13215 16,-13215 16,-13191 178,-13191 178,-13215"/>
+<text text-anchor="middle" x="97" y="-13200.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_reset_fragments</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_encounter&#45;&gt;proc~io_write_encounter -->
-<g id="call~~graph~~CallGraph_edge431" class="edge">
-<title>interface~io_write_encounter&#45;&gt;proc~io_write_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.21,-2386C669.51,-2386 731.88,-2386 777.82,-2386"/>
-<polygon fill="#000000" stroke="#000000" points="777.95,-2389.5 787.95,-2386 777.95,-2382.5 777.95,-2389.5"/>
-</g>
-<!-- proc~io_write_frame_body -->
-<g id="call~~graph~~CallGraph_node542" class="node">
-<title>proc~io_write_frame_body</title>
-<g id="a_call~~graph~~CallGraph_node542"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="895.5,-3238 783.5,-3238 783.5,-3214 895.5,-3214 895.5,-3238"/>
-<text text-anchor="middle" x="839.5" y="-3223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<!-- proc~fraggle_setup_reset_fragments -->
+<g id="call~~graph~~CallGraph_node511" class="node">
+<title>proc~fraggle_setup_reset_fragments</title>
+<g id="a_call~~graph~~CallGraph_node511"><a xlink:href=".././proc/fraggle_setup_reset_fragments.html" xlink:title="fraggle_setup_reset_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="408,-13215 246,-13215 246,-13191 408,-13191 408,-13215"/>
+<text text-anchor="middle" x="327" y="-13200.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup_reset_fragments</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
-<g id="call~~graph~~CallGraph_edge432" class="edge">
-<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-3226C672.19,-3226 729.31,-3226 773.16,-3226"/>
-<polygon fill="#000000" stroke="#000000" points="773.44,-3229.5 783.44,-3226 773.44,-3222.5 773.44,-3229.5"/>
+<!-- interface~fraggle_setup_reset_fragments&#45;&gt;proc~fraggle_setup_reset_fragments -->
+<g id="call~~graph~~CallGraph_edge445" class="edge">
+<title>interface~fraggle_setup_reset_fragments&#45;&gt;proc~fraggle_setup_reset_fragments</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M178.06,-13203C196.66,-13203 216.59,-13203 235.6,-13203"/>
+<polygon fill="#000000" stroke="#000000" points="235.74,-13206.5 245.74,-13203 235.74,-13199.5 235.74,-13206.5"/>
 </g>
-<!-- proc~io_write_frame_cb -->
-<g id="call~~graph~~CallGraph_node550" class="node">
-<title>proc~io_write_frame_cb</title>
-<g id="a_call~~graph~~CallGraph_node550"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="889.5,-2440 789.5,-2440 789.5,-2416 889.5,-2416 889.5,-2440"/>
-<text text-anchor="middle" x="839.5" y="-2425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<!-- proc~fraggle_util_ang_mtm -->
+<g id="call~~graph~~CallGraph_node482" class="node">
+<title>proc~fraggle_util_ang_mtm</title>
+<g id="a_call~~graph~~CallGraph_node482"><a xlink:href=".././proc/fraggle_util_ang_mtm.html" xlink:title="fraggle_util_ang_mtm">
+<polygon fill="#d9534f" stroke="#d9534f" points="385,-13257 269,-13257 269,-13233 385,-13233 385,-13257"/>
+<text text-anchor="middle" x="327" y="-13242.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_ang_mtm</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
-<g id="call~~graph~~CallGraph_edge433" class="edge">
-<title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.66,-2428C668.34,-2428 732.3,-2428 778.88,-2428"/>
-<polygon fill="#000000" stroke="#000000" points="779.14,-2431.5 789.14,-2428 779.14,-2424.5 779.14,-2431.5"/>
-</g>
-<!-- interface~io_write_frame_encounter -->
-<g id="call~~graph~~CallGraph_node442" class="node">
-<title>interface~io_write_frame_encounter</title>
-<g id="a_call~~graph~~CallGraph_node442"><a xlink:href=".././interface/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="643,-2692 506,-2692 506,-2668 643,-2668 643,-2692"/>
-<text text-anchor="middle" x="574.5" y="-2677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
-</a>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<g id="call~~graph~~CallGraph_edge446" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
+<path fill="none" stroke="#000000" d="M877.02,-3748.06C923.93,-3755.85 1005.09,-3769.32 1053.59,-3777.37"/>
+<polygon fill="#000000" stroke="#000000" points="1053.27,-3780.87 1063.71,-3779.05 1054.42,-3773.96 1053.27,-3780.87"/>
 </g>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
+<g id="call~~graph~~CallGraph_edge447" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
+<path fill="none" stroke="#000000" d="M877.02,-3742C924.19,-3742 1005.97,-3742 1054.38,-3742"/>
+<polygon fill="#000000" stroke="#000000" points="1054.47,-3745.5 1064.47,-3742 1054.47,-3738.5 1054.47,-3745.5"/>
 </g>
-<!-- proc~io_write_frame_encounter -->
-<g id="call~~graph~~CallGraph_node563" class="node">
-<title>proc~io_write_frame_encounter</title>
-<g id="a_call~~graph~~CallGraph_node563"><a xlink:href=".././proc/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="908,-2692 771,-2692 771,-2668 908,-2668 908,-2692"/>
-<text text-anchor="middle" x="839.5" y="-2677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
+<!-- interface~fraggle_util_add_fragments_to_system -->
+<g id="call~~graph~~CallGraph_node484" class="node">
+<title>interface~fraggle_util_add_fragments_to_system</title>
+<g id="a_call~~graph~~CallGraph_node484"><a xlink:href=".././interface/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="1193.5,-1475 995.5,-1475 995.5,-1451 1193.5,-1451 1193.5,-1475"/>
+<text text-anchor="middle" x="1094.5" y="-1460.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_add_fragments_to_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter -->
-<g id="call~~graph~~CallGraph_edge434" class="edge">
-<title>interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M643.23,-2680C678.98,-2680 723.03,-2680 760.24,-2680"/>
-<polygon fill="#000000" stroke="#000000" points="760.54,-2683.5 770.54,-2680 760.54,-2676.5 760.54,-2683.5"/>
+<!-- interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system -->
+<g id="call~~graph~~CallGraph_edge448" class="edge">
+<title>interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1193.64,-1463C1205.68,-1463 1218.04,-1463 1230.21,-1463"/>
+<polygon fill="#000000" stroke="#000000" points="1230.39,-1466.5 1240.39,-1463 1230.39,-1459.5 1230.39,-1466.5"/>
 </g>
-<!-- interface~io_write_frame_system -->
-<g id="call~~graph~~CallGraph_node444" class="node">
-<title>interface~io_write_frame_system</title>
-<g id="a_call~~graph~~CallGraph_node444"><a xlink:href=".././interface/io_write_frame_system.html" xlink:title="io_write_frame_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="636,-2608 513,-2608 513,-2584 636,-2584 636,-2608"/>
-<text text-anchor="middle" x="574.5" y="-2593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
+<!-- proc~fraggle_util_construct_temporary_system -->
+<g id="call~~graph~~CallGraph_node485" class="node">
+<title>proc~fraggle_util_construct_temporary_system</title>
+<g id="a_call~~graph~~CallGraph_node485"><a xlink:href=".././proc/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="1444,-1538 1235,-1538 1235,-1514 1444,-1514 1444,-1538"/>
+<text text-anchor="middle" x="1339.5" y="-1523.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_system -->
-<g id="call~~graph~~CallGraph_node566" class="node">
-<title>proc~io_write_frame_system</title>
-<g id="a_call~~graph~~CallGraph_node566"><a xlink:href=".././proc/io_write_frame_system.html" xlink:title="io_write_frame_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="901,-2608 778,-2608 778,-2584 901,-2584 901,-2608"/>
-<text text-anchor="middle" x="839.5" y="-2593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
-</a>
-</g>
+<!-- setup_construct_system -->
+<g id="call~~graph~~CallGraph_node749" class="node">
+<title>setup_construct_system</title>
+<polygon fill="#777777" stroke="#777777" points="1632.5,-1568 1504.5,-1568 1504.5,-1544 1632.5,-1544 1632.5,-1568"/>
+<text text-anchor="middle" x="1568.5" y="-1553.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </g>
-<!-- interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system -->
-<g id="call~~graph~~CallGraph_edge435" class="edge">
-<title>interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.17,-2596C675.33,-2596 726.43,-2596 767.48,-2596"/>
-<polygon fill="#000000" stroke="#000000" points="767.68,-2599.5 777.68,-2596 767.68,-2592.5 767.68,-2599.5"/>
+<!-- proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system -->
+<g id="call~~graph~~CallGraph_edge449" class="edge">
+<title>proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system</title>
+<path fill="none" stroke="#000000" d="M1431.52,-1538.03C1452.41,-1540.79 1474.37,-1543.69 1494.39,-1546.34"/>
+<polygon fill="#000000" stroke="#000000" points="1493.98,-1549.81 1504.36,-1547.66 1494.9,-1542.88 1493.98,-1549.81"/>
 </g>
-<!-- interface~io_write_hdr_system -->
-<g id="call~~graph~~CallGraph_node446" class="node">
-<title>interface~io_write_hdr_system</title>
-<g id="a_call~~graph~~CallGraph_node446"><a xlink:href=".././interface/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="630,-2566 519,-2566 519,-2542 630,-2542 630,-2566"/>
-<text text-anchor="middle" x="574.5" y="-2551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
+<!-- interface~fraggle_util_ang_mtm -->
+<g id="call~~graph~~CallGraph_node486" class="node">
+<title>interface~fraggle_util_ang_mtm</title>
+<g id="a_call~~graph~~CallGraph_node486"><a xlink:href=".././interface/fraggle_util_ang_mtm.html" xlink:title="fraggle_util_ang_mtm">
+<polygon fill="#a7506f" stroke="#a7506f" points="155,-13257 39,-13257 39,-13233 155,-13233 155,-13257"/>
+<text text-anchor="middle" x="97" y="-13242.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_ang_mtm</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_hdr_system -->
-<g id="call~~graph~~CallGraph_node576" class="node">
-<title>proc~io_write_hdr_system</title>
-<g id="a_call~~graph~~CallGraph_node576"><a xlink:href=".././proc/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="895,-2566 784,-2566 784,-2542 895,-2542 895,-2566"/>
-<text text-anchor="middle" x="839.5" y="-2551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
-</a>
+<!-- interface~fraggle_util_ang_mtm&#45;&gt;proc~fraggle_util_ang_mtm -->
+<g id="call~~graph~~CallGraph_edge450" class="edge">
+<title>interface~fraggle_util_ang_mtm&#45;&gt;proc~fraggle_util_ang_mtm</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.24,-13245C186.54,-13245 225.52,-13245 258.32,-13245"/>
+<polygon fill="#000000" stroke="#000000" points="258.74,-13248.5 268.74,-13245 258.74,-13241.5 258.74,-13248.5"/>
 </g>
+<!-- interface~fraggle_util_construct_temporary_system -->
+<g id="call~~graph~~CallGraph_node487" class="node">
+<title>interface~fraggle_util_construct_temporary_system</title>
+<g id="a_call~~graph~~CallGraph_node487"><a xlink:href=".././interface/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="1199,-1517 990,-1517 990,-1493 1199,-1493 1199,-1517"/>
+<text text-anchor="middle" x="1094.5" y="-1502.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
+</a>
 </g>
-<!-- interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system -->
-<g id="call~~graph~~CallGraph_edge436" class="edge">
-<title>interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.31,-2554C672.07,-2554 729.69,-2554 773.73,-2554"/>
-<polygon fill="#000000" stroke="#000000" points="773.76,-2557.5 783.76,-2554 773.76,-2550.5 773.76,-2557.5"/>
 </g>
-<!-- interface~kick_getacch_int_all_pl&#45;&gt;proc~kick_getacch_int_all_pl -->
-<g id="call~~graph~~CallGraph_edge437" class="edge">
-<title>interface~kick_getacch_int_all_pl&#45;&gt;proc~kick_getacch_int_all_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.51,-11384C675,-11384 726.86,-11384 768.28,-11384"/>
-<polygon fill="#000000" stroke="#000000" points="768.3,-11387.5 778.3,-11384 768.3,-11380.5 768.3,-11387.5"/>
+<!-- interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system -->
+<g id="call~~graph~~CallGraph_edge451" class="edge">
+<title>interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1199.26,-1513.97C1207.6,-1514.69 1216.06,-1515.42 1224.48,-1516.15"/>
+<polygon fill="#000000" stroke="#000000" points="1224.44,-1519.66 1234.7,-1517.03 1225.04,-1512.68 1224.44,-1519.66"/>
 </g>
-<!-- interface~kick_getacch_int_one_pl -->
-<g id="call~~graph~~CallGraph_node448" class="node">
-<title>interface~kick_getacch_int_one_pl</title>
-<g id="a_call~~graph~~CallGraph_node448"><a xlink:href=".././interface/kick_getacch_int_one_pl.html" xlink:title="kick_getacch_int_one_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="162,-11354 32,-11354 32,-11330 162,-11330 162,-11354"/>
-<text text-anchor="middle" x="97" y="-11339.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_pl</text>
+<!-- interface~fraggle_util_get_energy_momentum -->
+<g id="call~~graph~~CallGraph_node489" class="node">
+<title>interface~fraggle_util_get_energy_momentum</title>
+<g id="a_call~~graph~~CallGraph_node489"><a xlink:href=".././interface/fraggle_util_get_energy_momentum.html" xlink:title="fraggle_util_get_energy_momentum">
+<polygon fill="#a7506f" stroke="#a7506f" points="667,-1604 482,-1604 482,-1580 667,-1580 667,-1604"/>
+<text text-anchor="middle" x="574.5" y="-1589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- interface~kick_getacch_int_one_pl&#45;&gt;proc~kick_getacch_int_one_pl -->
-<g id="call~~graph~~CallGraph_edge438" class="edge">
-<title>interface~kick_getacch_int_one_pl&#45;&gt;proc~kick_getacch_int_one_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-11342C190.04,-11342 222.94,-11342 251.9,-11342"/>
-<polygon fill="#000000" stroke="#000000" points="251.97,-11345.5 261.97,-11342 251.97,-11338.5 251.97,-11345.5"/>
-</g>
-<!-- interface~kick_getacch_int_one_tp -->
-<g id="call~~graph~~CallGraph_node450" class="node">
-<title>interface~kick_getacch_int_one_tp</title>
-<g id="a_call~~graph~~CallGraph_node450"><a xlink:href=".././interface/kick_getacch_int_one_tp.html" xlink:title="kick_getacch_int_one_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="162,-11438 32,-11438 32,-11414 162,-11414 162,-11438"/>
-<text text-anchor="middle" x="97" y="-11423.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_one_tp</text>
+<!-- proc~fraggle_util_get_energy_momentum -->
+<g id="call~~graph~~CallGraph_node499" class="node">
+<title>proc~fraggle_util_get_energy_momentum</title>
+<g id="a_call~~graph~~CallGraph_node499"><a xlink:href=".././proc/fraggle_util_get_energy_momentum.html" xlink:title="fraggle_util_get_energy_momentum">
+<polygon fill="#d9534f" stroke="#d9534f" points="932,-1537 747,-1537 747,-1513 932,-1513 932,-1537"/>
+<text text-anchor="middle" x="839.5" y="-1522.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- interface~kick_getacch_int_one_tp&#45;&gt;proc~kick_getacch_int_one_tp -->
-<g id="call~~graph~~CallGraph_edge439" class="edge">
-<title>interface~kick_getacch_int_one_tp&#45;&gt;proc~kick_getacch_int_one_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-11426C190.04,-11426 222.94,-11426 251.9,-11426"/>
-<polygon fill="#000000" stroke="#000000" points="251.97,-11429.5 261.97,-11426 251.97,-11422.5 251.97,-11429.5"/>
+<!-- interface~fraggle_util_get_energy_momentum&#45;&gt;proc~fraggle_util_get_energy_momentum -->
+<g id="call~~graph~~CallGraph_edge452" class="edge">
+<title>interface~fraggle_util_get_energy_momentum&#45;&gt;proc~fraggle_util_get_energy_momentum</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647.52,-1579.97C661.35,-1577.3 675.67,-1574.27 689,-1571 724.66,-1562.25 764.36,-1549.91 793.88,-1540.21"/>
+<polygon fill="#000000" stroke="#000000" points="795.09,-1543.5 803.48,-1537.03 792.89,-1536.85 795.09,-1543.5"/>
 </g>
-<!-- interface~kick_getacch_int_pl -->
-<g id="call~~graph~~CallGraph_node451" class="node">
-<title>interface~kick_getacch_int_pl</title>
-<g id="a_call~~graph~~CallGraph_node451"><a xlink:href=".././interface/kick_getacch_int_pl.html" xlink:title="kick_getacch_int_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="150,-11396 44,-11396 44,-11372 150,-11372 150,-11396"/>
-<text text-anchor="middle" x="97" y="-11381.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_pl</text>
+<!-- interface~fraggle_util_restructure -->
+<g id="call~~graph~~CallGraph_node490" class="node">
+<title>interface~fraggle_util_restructure</title>
+<g id="a_call~~graph~~CallGraph_node490"><a xlink:href=".././interface/fraggle_util_restructure.html" xlink:title="fraggle_util_restructure">
+<polygon fill="#a7506f" stroke="#a7506f" points="158.5,-13173 35.5,-13173 35.5,-13149 158.5,-13149 158.5,-13173"/>
+<text text-anchor="middle" x="97" y="-13158.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_restructure</text>
 </a>
 </g>
 </g>
-<!-- interface~kick_getacch_int_pl&#45;&gt;proc~kick_getacch_int_pl -->
-<g id="call~~graph~~CallGraph_edge440" class="edge">
-<title>interface~kick_getacch_int_pl&#45;&gt;proc~kick_getacch_int_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-11384C183.76,-11384 227.89,-11384 263.52,-11384"/>
-<polygon fill="#000000" stroke="#000000" points="263.81,-11387.5 273.81,-11384 263.81,-11380.5 263.81,-11387.5"/>
+<!-- interface~fraggle_util_restructure&#45;&gt;proc~fraggle_util_restructure -->
+<g id="call~~graph~~CallGraph_edge453" class="edge">
+<title>interface~fraggle_util_restructure&#45;&gt;proc~fraggle_util_restructure</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.5,-13161C188.13,-13161 224,-13161 254.93,-13161"/>
+<polygon fill="#000000" stroke="#000000" points="255.22,-13164.5 265.22,-13161 255.22,-13157.5 255.22,-13164.5"/>
 </g>
-<!-- interface~kick_getacch_int_tp -->
-<g id="call~~graph~~CallGraph_node452" class="node">
-<title>interface~kick_getacch_int_tp</title>
-<g id="a_call~~graph~~CallGraph_node452"><a xlink:href=".././interface/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="150,-11751 44,-11751 44,-11727 150,-11727 150,-11751"/>
-<text text-anchor="middle" x="97" y="-11736.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
+<!-- proc~whm_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node491" class="node">
+<title>proc~whm_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node491"><a xlink:href=".././proc/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="386,-13089 268,-13089 268,-13065 386,-13065 386,-13089"/>
+<text text-anchor="middle" x="327" y="-13074.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp -->
-<g id="call~~graph~~CallGraph_edge441" class="edge">
-<title>interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-11739C183.76,-11739 227.89,-11739 263.52,-11739"/>
-<polygon fill="#000000" stroke="#000000" points="263.81,-11742.5 273.81,-11739 263.81,-11735.5 263.81,-11742.5"/>
+<!-- proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0 -->
+<g id="call~~graph~~CallGraph_edge454" class="edge">
+<title>proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0</title>
+<path fill="none" stroke="#000000" d="M386.18,-13077C420.4,-13077 463.97,-13077 500.48,-13077"/>
+<polygon fill="#000000" stroke="#000000" points="500.58,-13080.5 510.58,-13077 500.58,-13073.5 500.58,-13080.5"/>
 </g>
-<!-- interface~util_spill~2 -->
-<g id="call~~graph~~CallGraph_node453" class="node">
-<title>interface~util_spill~2</title>
-<g id="a_call~~graph~~CallGraph_node453"><a xlink:href=".././interface/util_spill~2.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="1121.5,-11533 1067.5,-11533 1067.5,-11509 1121.5,-11509 1121.5,-11533"/>
-<text text-anchor="middle" x="1094.5" y="-11518.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
-</a>
+<!-- proc~symba_util_append_pl&#45;&gt;interface~util_append -->
+<g id="call~~graph~~CallGraph_edge455" class="edge">
+<title>proc~symba_util_append_pl&#45;&gt;interface~util_append</title>
+<path fill="none" stroke="#000000" d="M899.82,-2802.74C946,-2808.76 1009.01,-2816.98 1050.45,-2822.38"/>
+<polygon fill="#000000" stroke="#000000" points="1050.13,-2825.87 1060.5,-2823.7 1051.04,-2818.93 1050.13,-2825.87"/>
+</g>
+<!-- proc~symba_util_append_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge457" class="edge">
+<title>proc~symba_util_append_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M899.57,-2796.67C919.17,-2794.23 939.63,-2787.97 954,-2774 1008.75,-2720.77 949.31,-2670.62 990,-2606 1007.2,-2578.68 1037.2,-2557.04 1060.49,-2543.19"/>
+<polygon fill="#000000" stroke="#000000" points="1062.44,-2546.11 1069.37,-2538.09 1058.95,-2540.04 1062.44,-2546.11"/>
 </g>
+<!-- proc~symba_util_append_pl&#45;&gt;util_append_pl -->
+<g id="call~~graph~~CallGraph_edge456" class="edge">
+<title>proc~symba_util_append_pl&#45;&gt;util_append_pl</title>
+<path fill="none" stroke="#000000" d="M899.82,-2790.78C943.44,-2787.68 1002.08,-2783.5 1043.37,-2780.57"/>
+<polygon fill="#000000" stroke="#000000" points="1043.75,-2784.05 1053.48,-2779.85 1043.25,-2777.07 1043.75,-2784.05"/>
 </g>
-<!-- interface~netcdf_close -->
-<g id="call~~graph~~CallGraph_node454" class="node">
-<title>interface~netcdf_close</title>
-<g id="a_call~~graph~~CallGraph_node454"><a xlink:href=".././interface/netcdf_close.html" xlink:title="netcdf_close">
-<polygon fill="#a7506f" stroke="#a7506f" points="133.5,-11102 60.5,-11102 60.5,-11078 133.5,-11078 133.5,-11102"/>
-<text text-anchor="middle" x="97" y="-11087.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_close</text>
+<!-- proc~fraggle_util_shift_vector_to_origin -->
+<g id="call~~graph~~CallGraph_node513" class="node">
+<title>proc~fraggle_util_shift_vector_to_origin</title>
+<g id="a_call~~graph~~CallGraph_node513"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
+<polygon fill="#d9534f" stroke="#d9534f" points="1655,-3887 1482,-3887 1482,-3863 1655,-3863 1655,-3887"/>
+<text text-anchor="middle" x="1568.5" y="-3872.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
-<!-- interface~netcdf_close&#45;&gt;proc~netcdf_close -->
-<g id="call~~graph~~CallGraph_edge442" class="edge">
-<title>interface~netcdf_close&#45;&gt;proc~netcdf_close</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M133.62,-11090C173.08,-11090 236.81,-11090 280.01,-11090"/>
-<polygon fill="#000000" stroke="#000000" points="280.25,-11093.5 290.25,-11090 280.25,-11086.5 280.25,-11093.5"/>
+<!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
+<g id="call~~graph~~CallGraph_edge458" class="edge">
+<title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1426.32,-3875C1441.11,-3875 1456.57,-3875 1471.61,-3875"/>
+<polygon fill="#000000" stroke="#000000" points="1471.94,-3878.5 1481.94,-3875 1471.94,-3871.5 1471.94,-3878.5"/>
 </g>
-<!-- interface~netcdf_initialize_output -->
-<g id="call~~graph~~CallGraph_node456" class="node">
-<title>interface~netcdf_initialize_output</title>
-<g id="a_call~~graph~~CallGraph_node456"><a xlink:href=".././interface/netcdf_initialize_output.html" xlink:title="netcdf_initialize_output">
-<polygon fill="#a7506f" stroke="#a7506f" points="635,-2125 514,-2125 514,-2101 635,-2101 635,-2125"/>
-<text text-anchor="middle" x="574.5" y="-2110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_initialize_output</text>
-</a>
+<!-- proc~symba_util_append_encounter&#45;&gt;interface~util_append -->
+<g id="call~~graph~~CallGraph_edge459" class="edge">
+<title>proc~symba_util_append_encounter&#45;&gt;interface~util_append</title>
+<path fill="none" stroke="#000000" d="M905.33,-2862.96C950.85,-2854.5 1010.48,-2843.42 1050.29,-2836.03"/>
+<polygon fill="#000000" stroke="#000000" points="1051.03,-2839.45 1060.22,-2834.18 1049.75,-2832.57 1051.03,-2839.45"/>
 </g>
+<!-- util_append_encounter -->
+<g id="call~~graph~~CallGraph_node731" class="node">
+<title>util_append_encounter</title>
+<polygon fill="#777777" stroke="#777777" points="1155.5,-2887 1033.5,-2887 1033.5,-2863 1155.5,-2863 1155.5,-2887"/>
+<text text-anchor="middle" x="1094.5" y="-2872.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_encounter</text>
 </g>
-<!-- interface~netcdf_initialize_output&#45;&gt;proc~netcdf_initialize_output -->
-<g id="call~~graph~~CallGraph_edge443" class="edge">
-<title>interface~netcdf_initialize_output&#45;&gt;proc~netcdf_initialize_output</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.18,-2113C674.8,-2113 726.97,-2113 768.55,-2113"/>
-<polygon fill="#000000" stroke="#000000" points="768.6,-2116.5 778.6,-2113 768.6,-2109.5 768.6,-2116.5"/>
+<!-- proc~symba_util_append_encounter&#45;&gt;util_append_encounter -->
+<g id="call~~graph~~CallGraph_edge460" class="edge">
+<title>proc~symba_util_append_encounter&#45;&gt;util_append_encounter</title>
+<path fill="none" stroke="#000000" d="M919.51,-2875C952.61,-2875 990.78,-2875 1022.93,-2875"/>
+<polygon fill="#000000" stroke="#000000" points="1023.14,-2878.5 1033.14,-2875 1023.14,-2871.5 1023.14,-2878.5"/>
 </g>
-<!-- interface~netcdf_open -->
-<g id="call~~graph~~CallGraph_node458" class="node">
-<title>interface~netcdf_open</title>
-<g id="a_call~~graph~~CallGraph_node458"><a xlink:href=".././interface/netcdf_open.html" xlink:title="netcdf_open">
-<polygon fill="#a7506f" stroke="#a7506f" points="610.5,-2020 538.5,-2020 538.5,-1996 610.5,-1996 610.5,-2020"/>
-<text text-anchor="middle" x="574.5" y="-2005.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_open</text>
+<!-- proc~symba_util_append_merger&#45;&gt;interface~util_append -->
+<g id="call~~graph~~CallGraph_edge461" class="edge">
+<title>proc~symba_util_append_merger&#45;&gt;interface~util_append</title>
+<path fill="none" stroke="#000000" d="M392.23,-2807.05C413.7,-2810.59 437.81,-2814.03 460,-2816 681.18,-2835.59 947.43,-2831.75 1050.16,-2829.25"/>
+<polygon fill="#000000" stroke="#000000" points="1050.53,-2832.74 1060.44,-2828.99 1050.35,-2825.74 1050.53,-2832.74"/>
+</g>
+<!-- proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl -->
+<g id="call~~graph~~CallGraph_edge463" class="edge">
+<title>proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl</title>
+<path fill="none" stroke="#000000" d="M400.33,-2795C433.13,-2795 471.74,-2795 504.17,-2795"/>
+<polygon fill="#000000" stroke="#000000" points="504.47,-2798.5 514.47,-2795 504.47,-2791.5 504.47,-2798.5"/>
+</g>
+<!-- proc~symba_util_append_merger&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge462" class="edge">
+<title>proc~symba_util_append_merger&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M330.65,-2782.88C340.04,-2743.12 375.83,-2616.27 460,-2564 485.46,-2548.19 925.47,-2531.8 1056.79,-2527.24"/>
+<polygon fill="#000000" stroke="#000000" points="1057.24,-2530.73 1067.12,-2526.88 1057,-2523.73 1057.24,-2530.73"/>
+</g>
+<!-- proc~symba_collision_check_one -->
+<g id="call~~graph~~CallGraph_node515" class="node">
+<title>proc~symba_collision_check_one</title>
+<g id="a_call~~graph~~CallGraph_node515"><a xlink:href=".././proc/symba_collision_check_one.html" xlink:title="symba_collision_check_one">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1641,-2143 1496,-2143 1496,-2119 1641,-2119 1641,-2143"/>
+<text text-anchor="middle" x="1568.5" y="-2128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_one</text>
 </a>
 </g>
 </g>
-<!-- interface~netcdf_open&#45;&gt;proc~netcdf_open -->
-<g id="call~~graph~~CallGraph_edge444" class="edge">
-<title>interface~netcdf_open&#45;&gt;proc~netcdf_open</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.7,-2008C657.71,-2008 741.07,-2008 792.86,-2008"/>
-<polygon fill="#000000" stroke="#000000" points="793.09,-2011.5 803.09,-2008 793.09,-2004.5 793.09,-2011.5"/>
+<!-- proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one -->
+<g id="call~~graph~~CallGraph_edge464" class="edge">
+<title>proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one</title>
+<path fill="none" stroke="#000000" d="M1427.29,-2118.03C1446.49,-2119.81 1466.78,-2121.68 1485.77,-2123.44"/>
+<polygon fill="#000000" stroke="#000000" points="1485.59,-2126.94 1495.87,-2124.37 1486.24,-2119.97 1485.59,-2126.94"/>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
-<g id="call~~graph~~CallGraph_edge446" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
-<path fill="none" stroke="#000000" d="M598.3,-5992.09C627.4,-6007.36 679.44,-6034.17 725,-6055 748.99,-6065.97 776.3,-6077.31 798.11,-6086.1"/>
-<polygon fill="#000000" stroke="#000000" points="796.82,-6089.36 807.41,-6089.83 799.43,-6082.86 796.82,-6089.36"/>
+<!-- proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message -->
+<g id="call~~graph~~CallGraph_edge465" class="edge">
+<title>proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M1352.77,-2097.87C1372.32,-2078.49 1411.63,-2039.21 1444,-2005 1482.54,-1964.27 1526.39,-1915.34 1550.08,-1888.68"/>
+<polygon fill="#000000" stroke="#000000" points="1552.74,-1890.96 1556.76,-1881.16 1547.5,-1886.31 1552.74,-1890.96"/>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
-<g id="call~~graph~~CallGraph_edge447" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
-<path fill="none" stroke="#000000" d="M608.01,-5980C654.14,-5980 738.83,-5980 791.71,-5980"/>
-<polygon fill="#000000" stroke="#000000" points="791.84,-5983.5 801.84,-5980 791.84,-5976.5 791.84,-5983.5"/>
+<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system -->
+<g id="call~~graph~~CallGraph_edge467" class="edge">
+<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system</title>
+<path fill="none" stroke="#000000" d="M923.17,-1512.96C933.69,-1510.48 944.19,-1507.52 954,-1504 971.22,-1497.81 972.83,-1490.34 990,-1484 996.36,-1481.65 1003.03,-1479.55 1009.81,-1477.66"/>
+<polygon fill="#000000" stroke="#000000" points="1010.99,-1480.97 1019.77,-1475.05 1009.21,-1474.2 1010.99,-1480.97"/>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
-<g id="call~~graph~~CallGraph_edge449" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M608.09,-5974.84C638.33,-5970.2 684.62,-5963.43 725,-5959 842.44,-5946.11 871.95,-5942.67 990,-5938 1082.82,-5934.33 1106.11,-5937.67 1199,-5938 1230.14,-5938.11 1265.19,-5938.36 1292.37,-5938.59"/>
-<polygon fill="#000000" stroke="#000000" points="1292.34,-5942.09 1302.37,-5938.67 1292.4,-5935.09 1292.34,-5942.09"/>
+<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system -->
+<g id="call~~graph~~CallGraph_edge468" class="edge">
+<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system</title>
+<path fill="none" stroke="#000000" d="M932.2,-1517.75C947.51,-1516.54 963.56,-1515.27 979.35,-1514.02"/>
+<polygon fill="#000000" stroke="#000000" points="979.99,-1517.48 989.68,-1513.21 979.44,-1510.51 979.99,-1517.48"/>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
-<g id="call~~graph~~CallGraph_edge445" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M608.14,-5984.74C638.42,-5989.09 684.73,-5995.67 725,-6001 830.23,-6014.94 1096.81,-6031.28 1199,-6060 1238.13,-6071 1280.31,-6091.35 1307.91,-6105.94"/>
-<polygon fill="#000000" stroke="#000000" points="1306.58,-6109.2 1317.04,-6110.84 1309.89,-6103.03 1306.58,-6109.2"/>
+<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge466" class="edge">
+<title>proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M913.04,-1537.1C928.92,-1543.18 943.97,-1552.31 954,-1566 1011.85,-1644.93 945.09,-2359.06 990,-2446 1004.7,-2474.45 1034.6,-2495.83 1058.5,-2509.29"/>
+<polygon fill="#000000" stroke="#000000" points="1056.86,-2512.39 1067.32,-2514.07 1060.19,-2506.23 1056.86,-2512.39"/>
 </g>
-<!-- proc~orbel_zget -->
-<g id="call~~graph~~CallGraph_node672" class="node">
-<title>proc~orbel_zget</title>
-<g id="a_call~~graph~~CallGraph_node672"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="871,-5891 808,-5891 808,-5867 871,-5867 871,-5891"/>
-<text text-anchor="middle" x="839.5" y="-5876.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
+<!-- proc~fraggle_util_vmag_to_vb -->
+<g id="call~~graph~~CallGraph_node500" class="node">
+<title>proc~fraggle_util_vmag_to_vb</title>
+<g id="a_call~~graph~~CallGraph_node500"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="1159.5,-3919 1029.5,-3919 1029.5,-3895 1159.5,-3895 1159.5,-3919"/>
+<text text-anchor="middle" x="1094.5" y="-3904.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
-<g id="call~~graph~~CallGraph_edge448" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
-<path fill="none" stroke="#000000" d="M595.61,-5967.95C623.68,-5951.58 676.63,-5922.39 725,-5905 748.48,-5896.56 775.71,-5890.21 797.61,-5885.9"/>
-<polygon fill="#000000" stroke="#000000" points="798.41,-5889.31 807.58,-5884.01 797.1,-5882.44 798.41,-5889.31"/>
+<!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
+<g id="call~~graph~~CallGraph_edge469" class="edge">
+<title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
+<path fill="none" stroke="#000000" d="M1159.66,-3898.55C1185.09,-3895.2 1214.85,-3891.28 1242.73,-3887.61"/>
+<polygon fill="#000000" stroke="#000000" points="1243.44,-3891.05 1252.9,-3886.27 1242.53,-3884.11 1243.44,-3891.05"/>
 </g>
-<!-- interface~netcdf_write_frame_base -->
-<g id="call~~graph~~CallGraph_node460" class="node">
-<title>interface~netcdf_write_frame_base</title>
-<g id="a_call~~graph~~CallGraph_node460"><a xlink:href=".././interface/netcdf_write_frame_base.html" xlink:title="netcdf_write_frame_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="641,-2272 508,-2272 508,-2248 641,-2248 641,-2272"/>
-<text text-anchor="middle" x="574.5" y="-2257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_base</text>
+<!-- proc~whm_kick_vh_tp -->
+<g id="call~~graph~~CallGraph_node501" class="node">
+<title>proc~whm_kick_vh_tp</title>
+<g id="a_call~~graph~~CallGraph_node501"><a xlink:href=".././proc/whm_kick_vh_tp.html" xlink:title="whm_kick_vh_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-13299 281.5,-13299 281.5,-13275 372.5,-13275 372.5,-13299"/>
+<text text-anchor="middle" x="327" y="-13284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base -->
-<g id="call~~graph~~CallGraph_edge450" class="edge">
-<title>interface~netcdf_write_frame_base&#45;&gt;proc~netcdf_write_frame_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.19,-2260C678.06,-2260 724.23,-2260 762.64,-2260"/>
-<polygon fill="#000000" stroke="#000000" points="762.74,-2263.5 772.74,-2260 762.74,-2256.5 762.74,-2263.5"/>
+<!-- proc~symba_util_append_tp&#45;&gt;interface~util_append -->
+<g id="call~~graph~~CallGraph_edge470" class="edge">
+<title>proc~symba_util_append_tp&#45;&gt;interface~util_append</title>
+<path fill="none" stroke="#000000" d="M900.11,-2759.38C917.88,-2762.51 937.1,-2767.14 954,-2774 971.82,-2781.23 972.56,-2789.9 990,-2798 1009.13,-2806.89 1031.48,-2813.77 1050.51,-2818.68"/>
+<polygon fill="#000000" stroke="#000000" points="1049.86,-2822.13 1060.41,-2821.14 1051.55,-2815.33 1049.86,-2822.13"/>
 </g>
-<!-- interface~netcdf_write_frame_system -->
-<g id="call~~graph~~CallGraph_node461" class="node">
-<title>interface~netcdf_write_frame_system</title>
-<g id="a_call~~graph~~CallGraph_node461"><a xlink:href=".././interface/netcdf_write_frame_system.html" xlink:title="netcdf_write_frame_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="169,-12862 25,-12862 25,-12838 169,-12838 169,-12862"/>
-<text text-anchor="middle" x="97" y="-12847.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_frame_system</text>
-</a>
+<!-- proc~symba_util_append_tp&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge471" class="edge">
+<title>proc~symba_util_append_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M900.23,-2753.97C919.43,-2751.38 939.47,-2745.21 954,-2732 997.1,-2692.83 957.33,-2654.21 990,-2606 1008.22,-2579.11 1038.38,-2557.3 1061.46,-2543.28"/>
+<polygon fill="#000000" stroke="#000000" points="1063.39,-2546.21 1070.23,-2538.12 1059.84,-2540.17 1063.39,-2546.21"/>
+</g>
+<!-- proc~symba_util_append_tp&#45;&gt;util_append_tp -->
+<g id="call~~graph~~CallGraph_edge472" class="edge">
+<title>proc~symba_util_append_tp&#45;&gt;util_append_tp</title>
+<path fill="none" stroke="#000000" d="M900.14,-2744.28C943.5,-2737.94 1001.58,-2729.44 1042.73,-2723.42"/>
+<polygon fill="#000000" stroke="#000000" points="1043.42,-2726.86 1052.81,-2721.95 1042.41,-2719.93 1043.42,-2726.86"/>
 </g>
+<!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
+<g id="call~~graph~~CallGraph_edge473" class="edge">
+<title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.52,-10023C664.84,-10023 735.54,-10023 784.29,-10023"/>
+<polygon fill="#000000" stroke="#000000" points="784.34,-10026.5 794.34,-10023 784.34,-10019.5 784.34,-10026.5"/>
 </g>
-<!-- interface~netcdf_write_hdr_system -->
-<g id="call~~graph~~CallGraph_node462" class="node">
-<title>interface~netcdf_write_hdr_system</title>
-<g id="a_call~~graph~~CallGraph_node462"><a xlink:href=".././interface/netcdf_write_hdr_system.html" xlink:title="netcdf_write_hdr_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="640.5,-2062 508.5,-2062 508.5,-2038 640.5,-2038 640.5,-2062"/>
-<text text-anchor="middle" x="574.5" y="-2047.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_hdr_system</text>
+<!-- interface~util_resize_encounter -->
+<g id="call~~graph~~CallGraph_node504" class="node">
+<title>interface~util_resize_encounter</title>
+<g id="a_call~~graph~~CallGraph_node504"><a xlink:href=".././interface/util_resize_encounter.html" xlink:title="util_resize_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="154.5,-9846 39.5,-9846 39.5,-9822 154.5,-9822 154.5,-9846"/>
+<text text-anchor="middle" x="97" y="-9831.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~netcdf_write_hdr_system&#45;&gt;proc~netcdf_write_hdr_system -->
-<g id="call~~graph~~CallGraph_edge451" class="edge">
-<title>interface~netcdf_write_hdr_system&#45;&gt;proc~netcdf_write_hdr_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.51,-2050C677.65,-2050 724.4,-2050 763.14,-2050"/>
-<polygon fill="#000000" stroke="#000000" points="763.33,-2053.5 773.33,-2050 763.33,-2046.5 763.33,-2053.5"/>
+<!-- interface~util_resize_encounter&#45;&gt;proc~util_resize_encounter -->
+<g id="call~~graph~~CallGraph_edge474" class="edge">
+<title>interface~util_resize_encounter&#45;&gt;proc~util_resize_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M154.65,-9834C186.33,-9834 225.98,-9834 259.17,-9834"/>
+<polygon fill="#000000" stroke="#000000" points="259.24,-9837.5 269.24,-9834 259.24,-9830.5 259.24,-9837.5"/>
 </g>
-<!-- interface~netcdf_write_particle_info_base -->
-<g id="call~~graph~~CallGraph_node463" class="node">
-<title>interface~netcdf_write_particle_info_base</title>
-<g id="a_call~~graph~~CallGraph_node463"><a xlink:href=".././interface/netcdf_write_particle_info_base.html" xlink:title="netcdf_write_particle_info_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="656,-2230 493,-2230 493,-2206 656,-2206 656,-2230"/>
-<text text-anchor="middle" x="574.5" y="-2215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_write_particle_info_base</text>
+<!-- interface~util_resize_pl -->
+<g id="call~~graph~~CallGraph_node507" class="node">
+<title>interface~util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node507"><a xlink:href=".././interface/util_resize_pl.html" xlink:title="util_resize_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="134.5,-10065 59.5,-10065 59.5,-10041 134.5,-10041 134.5,-10065"/>
+<text text-anchor="middle" x="97" y="-10050.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~netcdf_write_particle_info_base&#45;&gt;proc~netcdf_write_particle_info_base -->
-<g id="call~~graph~~CallGraph_edge452" class="edge">
-<title>interface~netcdf_write_particle_info_base&#45;&gt;proc~netcdf_write_particle_info_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.2,-2218C685.1,-2218 717.88,-2218 747.59,-2218"/>
-<polygon fill="#000000" stroke="#000000" points="747.96,-2221.5 757.96,-2218 747.96,-2214.5 747.96,-2221.5"/>
+<!-- interface~util_resize_pl&#45;&gt;proc~util_resize_pl -->
+<g id="call~~graph~~CallGraph_edge475" class="edge">
+<title>interface~util_resize_pl&#45;&gt;proc~util_resize_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.63,-10053C173.94,-10053 236.48,-10053 279.29,-10053"/>
+<polygon fill="#000000" stroke="#000000" points="279.46,-10056.5 289.46,-10053 279.46,-10049.5 279.46,-10056.5"/>
 </g>
-<!-- interface~obl_acc_body&#45;&gt;proc~obl_acc_body -->
-<g id="call~~graph~~CallGraph_edge453" class="edge">
-<title>interface~obl_acc_body&#45;&gt;proc~obl_acc_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.02,-6682C660.61,-6682 739.07,-6682 789.8,-6682"/>
-<polygon fill="#000000" stroke="#000000" points="789.87,-6685.5 799.87,-6682 789.87,-6678.5 789.87,-6685.5"/>
+<!-- util_copy_encounter -->
+<g id="call~~graph~~CallGraph_node776" class="node">
+<title>util_copy_encounter</title>
+<polygon fill="#777777" stroke="#777777" points="629,-10275 520,-10275 520,-10251 629,-10251 629,-10275"/>
+<text text-anchor="middle" x="574.5" y="-10260.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy_encounter</text>
 </g>
-<!-- interface~obl_acc_pl -->
-<g id="call~~graph~~CallGraph_node465" class="node">
-<title>interface~obl_acc_pl</title>
-<g id="a_call~~graph~~CallGraph_node465"><a xlink:href=".././interface/obl_acc_pl.html" xlink:title="obl_acc_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="129,-6715 65,-6715 65,-6691 129,-6691 129,-6715"/>
-<text text-anchor="middle" x="97" y="-6700.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
+<!-- proc~symba_util_copy_encounter&#45;&gt;util_copy_encounter -->
+<g id="call~~graph~~CallGraph_edge476" class="edge">
+<title>proc~symba_util_copy_encounter&#45;&gt;util_copy_encounter</title>
+<path fill="none" stroke="#000000" d="M400.33,-10263C435.07,-10263 476.32,-10263 509.85,-10263"/>
+<polygon fill="#000000" stroke="#000000" points="509.99,-10266.5 519.99,-10263 509.99,-10259.5 509.99,-10266.5"/>
+</g>
+<!-- interface~util_resize_tp -->
+<g id="call~~graph~~CallGraph_node509" class="node">
+<title>interface~util_resize_tp</title>
+<g id="a_call~~graph~~CallGraph_node509"><a xlink:href=".././interface/util_resize_tp.html" xlink:title="util_resize_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="135,-10014 59,-10014 59,-9990 135,-9990 135,-10014"/>
+<text text-anchor="middle" x="97" y="-9999.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl -->
-<g id="call~~graph~~CallGraph_edge454" class="edge">
-<title>interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-6703C169.53,-6703 239.8,-6703 284.55,-6703"/>
-<polygon fill="#000000" stroke="#000000" points="284.79,-6706.5 294.79,-6703 284.79,-6699.5 284.79,-6706.5"/>
+<!-- interface~util_resize_tp&#45;&gt;proc~util_resize_tp -->
+<g id="call~~graph~~CallGraph_edge477" class="edge">
+<title>interface~util_resize_tp&#45;&gt;proc~util_resize_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-10002C174.31,-10002 236.14,-10002 278.75,-10002"/>
+<polygon fill="#000000" stroke="#000000" points="278.88,-10005.5 288.88,-10002 278.88,-9998.5 278.88,-10005.5"/>
 </g>
-<!-- interface~obl_acc_tp -->
-<g id="call~~graph~~CallGraph_node467" class="node">
-<title>interface~obl_acc_tp</title>
-<g id="a_call~~graph~~CallGraph_node467"><a xlink:href=".././interface/obl_acc_tp.html" xlink:title="obl_acc_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="129,-6673 65,-6673 65,-6649 129,-6649 129,-6673"/>
-<text text-anchor="middle" x="97" y="-6658.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
+<!-- interface~util_get_energy_momentum_system -->
+<g id="call~~graph~~CallGraph_node510" class="node">
+<title>interface~util_get_energy_momentum_system</title>
+<g id="a_call~~graph~~CallGraph_node510"><a xlink:href=".././interface/util_get_energy_momentum_system.html" xlink:title="util_get_energy_momentum_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="190,-11241 4,-11241 4,-11217 190,-11217 190,-11241"/>
+<text text-anchor="middle" x="97" y="-11226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum_system</text>
 </a>
 </g>
 </g>
-<!-- interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp -->
-<g id="call~~graph~~CallGraph_edge455" class="edge">
-<title>interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-6661C169.53,-6661 239.8,-6661 284.55,-6661"/>
-<polygon fill="#000000" stroke="#000000" points="284.79,-6664.5 294.79,-6661 284.79,-6657.5 284.79,-6664.5"/>
+<!-- interface~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_momentum_system -->
+<g id="call~~graph~~CallGraph_edge478" class="edge">
+<title>interface~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_momentum_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M190.08,-11229C201.15,-11229 212.51,-11229 223.71,-11229"/>
+<polygon fill="#000000" stroke="#000000" points="223.95,-11232.5 233.95,-11229 223.95,-11225.5 223.95,-11232.5"/>
 </g>
-<!-- interface~obl_pot_system -->
-<g id="call~~graph~~CallGraph_node468" class="node">
-<title>interface~obl_pot_system</title>
-<g id="a_call~~graph~~CallGraph_node468"><a xlink:href=".././interface/obl_pot_system.html" xlink:title="obl_pot_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="141,-10640 53,-10640 53,-10616 141,-10616 141,-10640"/>
-<text text-anchor="middle" x="97" y="-10625.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_pot_system</text>
+<!-- interface~util_set_beg_end_pl -->
+<g id="call~~graph~~CallGraph_node512" class="node">
+<title>interface~util_set_beg_end_pl</title>
+<g id="a_call~~graph~~CallGraph_node512"><a xlink:href=".././interface/util_set_beg_end_pl.html" xlink:title="util_set_beg_end_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-9594 42.5,-9594 42.5,-9570 151.5,-9570 151.5,-9594"/>
+<text text-anchor="middle" x="97" y="-9579.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_beg_end_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~obl_pot_system&#45;&gt;proc~obl_pot_system -->
-<g id="call~~graph~~CallGraph_edge456" class="edge">
-<title>interface~obl_pot_system&#45;&gt;proc~obl_pot_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.15,-10628C178.44,-10628 232.49,-10628 272.52,-10628"/>
-<polygon fill="#000000" stroke="#000000" points="272.64,-10631.5 282.64,-10628 272.64,-10624.5 272.64,-10631.5"/>
-</g>
-<!-- interface~orbel_el2xv_vec -->
-<g id="call~~graph~~CallGraph_node470" class="node">
-<title>interface~orbel_el2xv_vec</title>
-<g id="a_call~~graph~~CallGraph_node470"><a xlink:href=".././interface/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
-<polygon fill="#a7506f" stroke="#a7506f" points="142,-5992 52,-5992 52,-5968 142,-5968 142,-5992"/>
-<text text-anchor="middle" x="97" y="-5977.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
-</a>
+<!-- interface~util_set_beg_end_pl&#45;&gt;proc~util_set_beg_end_pl -->
+<g id="call~~graph~~CallGraph_edge479" class="edge">
+<title>interface~util_set_beg_end_pl&#45;&gt;proc~util_set_beg_end_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-9582C184.82,-9582 227.38,-9582 262.17,-9582"/>
+<polygon fill="#000000" stroke="#000000" points="262.22,-9585.5 272.22,-9582 262.22,-9578.5 262.22,-9585.5"/>
 </g>
+<!-- orbel_xv2aeq -->
+<g id="call~~graph~~CallGraph_node742" class="node">
+<title>orbel_xv2aeq</title>
+<polygon fill="#777777" stroke="#777777" points="1778.5,-2185 1701.5,-2185 1701.5,-2161 1778.5,-2161 1778.5,-2185"/>
+<text text-anchor="middle" x="1740" y="-2170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
 </g>
-<!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
-<g id="call~~graph~~CallGraph_edge457" class="edge">
-<title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-5980C179.28,-5980 232.3,-5980 271.88,-5980"/>
-<polygon fill="#000000" stroke="#000000" points="271.89,-5983.5 281.89,-5980 271.89,-5976.5 271.89,-5983.5"/>
+<!-- proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq -->
+<g id="call~~graph~~CallGraph_edge480" class="edge">
+<title>proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq</title>
+<path fill="none" stroke="#000000" d="M1618.07,-2143.04C1641.17,-2148.76 1668.67,-2155.57 1691.61,-2161.26"/>
+<polygon fill="#000000" stroke="#000000" points="1690.92,-2164.69 1701.47,-2163.7 1692.6,-2157.9 1690.92,-2164.69"/>
 </g>
-<!-- proc~orbel_scget -->
-<g id="call~~graph~~CallGraph_node490" class="node">
-<title>proc~orbel_scget</title>
-<g id="a_call~~graph~~CallGraph_node490"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#d9534f" stroke="#d9534f" points="1602.5,-6135 1534.5,-6135 1534.5,-6111 1602.5,-6111 1602.5,-6135"/>
-<text text-anchor="middle" x="1568.5" y="-6120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+<!-- interface~util_set_ir3h -->
+<g id="call~~graph~~CallGraph_node516" class="node">
+<title>interface~util_set_ir3h</title>
+<g id="a_call~~graph~~CallGraph_node516"><a xlink:href=".././interface/util_set_ir3h.html" xlink:title="util_set_ir3h">
+<polygon fill="#a7506f" stroke="#a7506f" points="132,-10149 62,-10149 62,-10125 132,-10125 132,-10149"/>
+<text text-anchor="middle" x="97" y="-10134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_ir3h</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
-<g id="call~~graph~~CallGraph_edge458" class="edge">
-<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1373.51,-6123C1413.35,-6123 1480.46,-6123 1524.37,-6123"/>
-<polygon fill="#000000" stroke="#000000" points="1524.45,-6126.5 1534.45,-6123 1524.45,-6119.5 1524.45,-6126.5"/>
-</g>
-<!-- interface~orbel_xv2aeq&#45;&gt;proc~orbel_xv2aeq -->
-<g id="call~~graph~~CallGraph_edge459" class="edge">
-<title>interface~orbel_xv2aeq&#45;&gt;proc~orbel_xv2aeq</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.18,-8131C659.96,-8131 739.77,-8131 790.78,-8131"/>
-<polygon fill="#000000" stroke="#000000" points="790.89,-8134.5 800.89,-8131 790.89,-8127.5 790.89,-8134.5"/>
+<!-- interface~util_set_ir3h&#45;&gt;proc~util_set_ir3h -->
+<g id="call~~graph~~CallGraph_edge481" class="edge">
+<title>interface~util_set_ir3h&#45;&gt;proc~util_set_ir3h</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.13,-10137C171.93,-10137 237.81,-10137 281.56,-10137"/>
+<polygon fill="#000000" stroke="#000000" points="281.63,-10140.5 291.63,-10137 281.63,-10133.5 281.63,-10140.5"/>
 </g>
-<!-- interface~orbel_xv2aqt -->
-<g id="call~~graph~~CallGraph_node473" class="node">
-<title>interface~orbel_xv2aqt</title>
-<g id="a_call~~graph~~CallGraph_node473"><a xlink:href=".././interface/orbel_xv2aqt.html" xlink:title="orbel_xv2aqt">
-<polygon fill="#a7506f" stroke="#a7506f" points="134,-8227 60,-8227 60,-8203 134,-8203 134,-8227"/>
-<text text-anchor="middle" x="97" y="-8212.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aqt</text>
+<!-- interface~util_set_msys -->
+<g id="call~~graph~~CallGraph_node517" class="node">
+<title>interface~util_set_msys</title>
+<g id="a_call~~graph~~CallGraph_node517"><a xlink:href=".././interface/util_set_msys.html" xlink:title="util_set_msys">
+<polygon fill="#a7506f" stroke="#a7506f" points="135.5,-10191 58.5,-10191 58.5,-10167 135.5,-10167 135.5,-10191"/>
+<text text-anchor="middle" x="97" y="-10176.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_msys</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_xv2aqt&#45;&gt;proc~orbel_xv2aqt -->
-<g id="call~~graph~~CallGraph_edge460" class="edge">
-<title>interface~orbel_xv2aqt&#45;&gt;proc~orbel_xv2aqt</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.13,-8215C173.45,-8215 236.46,-8215 279.46,-8215"/>
-<polygon fill="#000000" stroke="#000000" points="279.67,-8218.5 289.66,-8215 279.66,-8211.5 279.67,-8218.5"/>
-</g>
-<!-- interface~orbel_xv2el&#45;&gt;proc~orbel_xv2el -->
-<g id="call~~graph~~CallGraph_edge461" class="edge">
-<title>interface~orbel_xv2el&#45;&gt;proc~orbel_xv2el</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.01,-8509C655.3,-8509 743.12,-8509 795.64,-8509"/>
-<polygon fill="#000000" stroke="#000000" points="795.65,-8512.5 805.65,-8509 795.65,-8505.5 795.65,-8512.5"/>
+<!-- interface~util_set_msys&#45;&gt;proc~util_set_msys -->
+<g id="call~~graph~~CallGraph_edge482" class="edge">
+<title>interface~util_set_msys&#45;&gt;proc~util_set_msys</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.65,-10179C174.68,-10179 235.8,-10179 278.21,-10179"/>
+<polygon fill="#000000" stroke="#000000" points="278.29,-10182.5 288.29,-10179 278.29,-10175.5 278.29,-10182.5"/>
 </g>
-<!-- interface~orbel_xv2el_vec -->
-<g id="call~~graph~~CallGraph_node476" class="node">
-<title>interface~orbel_xv2el_vec</title>
-<g id="a_call~~graph~~CallGraph_node476"><a xlink:href=".././interface/orbel_xv2el_vec.html" xlink:title="orbel_xv2el_vec">
-<polygon fill="#a7506f" stroke="#a7506f" points="142,-8521 52,-8521 52,-8497 142,-8497 142,-8521"/>
-<text text-anchor="middle" x="97" y="-8506.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2el_vec</text>
+<!-- proc~symba_util_fill_arr_kin -->
+<g id="call~~graph~~CallGraph_node519" class="node">
+<title>proc~symba_util_fill_arr_kin</title>
+<g id="a_call~~graph~~CallGraph_node519"><a xlink:href=".././proc/symba_util_fill_arr_kin.html" xlink:title="symba_util_fill_arr_kin">
+<polygon fill="#d9534f" stroke="#d9534f" points="156,-13341 38,-13341 38,-13317 156,-13317 156,-13341"/>
+<text text-anchor="middle" x="97" y="-13326.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_fill_arr_kin</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_xv2el_vec&#45;&gt;proc~orbel_xv2el_vec -->
-<g id="call~~graph~~CallGraph_edge462" class="edge">
-<title>interface~orbel_xv2el_vec&#45;&gt;proc~orbel_xv2el_vec</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-8509C179.28,-8509 232.3,-8509 271.88,-8509"/>
-<polygon fill="#000000" stroke="#000000" points="271.89,-8512.5 281.89,-8509 271.89,-8505.5 271.89,-8512.5"/>
-</g>
-<!-- proc~util_rescale_system -->
-<g id="call~~graph~~CallGraph_node477" class="node">
-<title>proc~util_rescale_system</title>
-<g id="a_call~~graph~~CallGraph_node477"><a xlink:href=".././proc/util_rescale_system.html" xlink:title="util_rescale_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="380,-12904 274,-12904 274,-12880 380,-12880 380,-12904"/>
-<text text-anchor="middle" x="327" y="-12889.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale_system</text>
+<!-- interface~util_set_mu_pl -->
+<g id="call~~graph~~CallGraph_node520" class="node">
+<title>interface~util_set_mu_pl</title>
+<g id="a_call~~graph~~CallGraph_node520"><a xlink:href=".././interface/util_set_mu_pl.html" xlink:title="util_set_mu_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="138,-10107 56,-10107 56,-10083 138,-10083 138,-10107"/>
+<text text-anchor="middle" x="97" y="-10092.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_body&#45;&gt;proc~setup_body -->
-<g id="call~~graph~~CallGraph_edge463" class="edge">
-<title>interface~setup_body&#45;&gt;proc~setup_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.54,-10859C655.78,-10859 742.69,-10859 795.07,-10859"/>
-<polygon fill="#000000" stroke="#000000" points="795.39,-10862.5 805.39,-10859 795.39,-10855.5 795.39,-10862.5"/>
+<!-- interface~util_set_mu_pl&#45;&gt;proc~util_set_mu_pl -->
+<g id="call~~graph~~CallGraph_edge483" class="edge">
+<title>interface~util_set_mu_pl&#45;&gt;proc~util_set_mu_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-10095C176.54,-10095 234.31,-10095 275.65,-10095"/>
+<polygon fill="#000000" stroke="#000000" points="275.78,-10098.5 285.78,-10095 275.78,-10091.5 275.78,-10098.5"/>
 </g>
-<!-- interface~setup_construct_system -->
-<g id="call~~graph~~CallGraph_node479" class="node">
-<title>interface~setup_construct_system</title>
-<g id="a_call~~graph~~CallGraph_node479"><a xlink:href=".././interface/setup_construct_system.html" xlink:title="setup_construct_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="638.5,-2902 510.5,-2902 510.5,-2878 638.5,-2878 638.5,-2902"/>
-<text text-anchor="middle" x="574.5" y="-2887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<!-- interface~util_set_mu_tp -->
+<g id="call~~graph~~CallGraph_node521" class="node">
+<title>interface~util_set_mu_tp</title>
+<g id="a_call~~graph~~CallGraph_node521"><a xlink:href=".././interface/util_set_mu_tp.html" xlink:title="util_set_mu_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="138,-10317 56,-10317 56,-10293 138,-10293 138,-10317"/>
+<text text-anchor="middle" x="97" y="-10302.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_construct_system&#45;&gt;proc~setup_construct_system -->
-<g id="call~~graph~~CallGraph_edge464" class="edge">
-<title>interface~setup_construct_system&#45;&gt;proc~setup_construct_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.83,-2890C676.86,-2890 725.41,-2890 765.11,-2890"/>
-<polygon fill="#000000" stroke="#000000" points="765.26,-2893.5 775.26,-2890 765.26,-2886.5 765.26,-2893.5"/>
+<!-- interface~util_set_mu_tp&#45;&gt;proc~util_set_mu_tp -->
+<g id="call~~graph~~CallGraph_edge484" class="edge">
+<title>interface~util_set_mu_tp&#45;&gt;proc~util_set_mu_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-10305C176.54,-10305 234.31,-10305 275.65,-10305"/>
+<polygon fill="#000000" stroke="#000000" points="275.78,-10308.5 285.78,-10305 275.78,-10301.5 275.78,-10308.5"/>
 </g>
-<!-- interface~setup_encounter -->
-<g id="call~~graph~~CallGraph_node480" class="node">
-<title>interface~setup_encounter</title>
-<g id="a_call~~graph~~CallGraph_node480"><a xlink:href=".././interface/setup_encounter.html" xlink:title="setup_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="143.5,-10976 50.5,-10976 50.5,-10952 143.5,-10952 143.5,-10976"/>
-<text text-anchor="middle" x="97" y="-10961.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_encounter</text>
+<!-- interface~util_set_particle_info -->
+<g id="call~~graph~~CallGraph_node522" class="node">
+<title>interface~util_set_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node522"><a xlink:href=".././interface/util_set_particle_info.html" xlink:title="util_set_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="152,-10443 42,-10443 42,-10419 152,-10419 152,-10443"/>
+<text text-anchor="middle" x="97" y="-10428.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_encounter&#45;&gt;proc~setup_encounter -->
-<g id="call~~graph~~CallGraph_edge465" class="edge">
-<title>interface~setup_encounter&#45;&gt;proc~setup_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.59,-10964C180.09,-10964 231.45,-10964 270.37,-10964"/>
-<polygon fill="#000000" stroke="#000000" points="270.49,-10967.5 280.49,-10964 270.49,-10960.5 270.49,-10967.5"/>
+<!-- interface~util_set_particle_info&#45;&gt;proc~util_set_particle_info -->
+<g id="call~~graph~~CallGraph_edge485" class="edge">
+<title>interface~util_set_particle_info&#45;&gt;proc~util_set_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M152.03,-10431C184.99,-10431 227.3,-10431 261.94,-10431"/>
+<polygon fill="#000000" stroke="#000000" points="261.96,-10434.5 271.96,-10431 261.96,-10427.5 261.96,-10434.5"/>
 </g>
-<!-- interface~setup_initialize_particle_info_system -->
-<g id="call~~graph~~CallGraph_node481" class="node">
-<title>interface~setup_initialize_particle_info_system</title>
-<g id="a_call~~graph~~CallGraph_node481"><a xlink:href=".././interface/setup_initialize_particle_info_system.html" xlink:title="setup_initialize_particle_info_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="190,-11018 4,-11018 4,-10994 190,-10994 190,-11018"/>
-<text text-anchor="middle" x="97" y="-11003.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_particle_info_system</text>
+<!-- proc~orbel_xv2el_vec&#45;&gt;interface~orbel_xv2el -->
+<g id="call~~graph~~CallGraph_edge486" class="edge">
+<title>proc~orbel_xv2el_vec&#45;&gt;interface~orbel_xv2el</title>
+<path fill="none" stroke="#000000" d="M372.17,-8700C417.03,-8700 486.05,-8700 530.48,-8700"/>
+<polygon fill="#000000" stroke="#000000" points="530.67,-8703.5 540.67,-8700 530.67,-8696.5 530.67,-8703.5"/>
+</g>
+<!-- interface~util_set_rhill -->
+<g id="call~~graph~~CallGraph_node524" class="node">
+<title>interface~util_set_rhill</title>
+<g id="a_call~~graph~~CallGraph_node524"><a xlink:href=".././interface/util_set_rhill.html" xlink:title="util_set_rhill">
+<polygon fill="#a7506f" stroke="#a7506f" points="131.5,-10569 62.5,-10569 62.5,-10545 131.5,-10545 131.5,-10569"/>
+<text text-anchor="middle" x="97" y="-10554.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_initialize_particle_info_system&#45;&gt;proc~setup_initialize_particle_info_system -->
-<g id="call~~graph~~CallGraph_edge466" class="edge">
-<title>interface~setup_initialize_particle_info_system&#45;&gt;proc~setup_initialize_particle_info_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M190.08,-11006C201.15,-11006 212.51,-11006 223.71,-11006"/>
-<polygon fill="#000000" stroke="#000000" points="223.95,-11009.5 233.95,-11006 223.95,-11002.5 223.95,-11009.5"/>
+<!-- interface~util_set_rhill&#45;&gt;proc~util_set_rhill -->
+<g id="call~~graph~~CallGraph_edge487" class="edge">
+<title>interface~util_set_rhill&#45;&gt;proc~util_set_rhill</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.64,-10557C171.55,-10557 238.19,-10557 282.12,-10557"/>
+<polygon fill="#000000" stroke="#000000" points="282.22,-10560.5 292.22,-10557 282.22,-10553.5 282.22,-10560.5"/>
 </g>
-<!-- interface~setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node482" class="node">
-<title>interface~setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node482"><a xlink:href=".././interface/setup_initialize_system.html" xlink:title="setup_initialize_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="158,-11060 36,-11060 36,-11036 158,-11036 158,-11060"/>
-<text text-anchor="middle" x="97" y="-11045.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_system</text>
+<!-- proc~fraggle_setup_fragments&#45;&gt;setup_pl -->
+<g id="call~~graph~~CallGraph_edge488" class="edge">
+<title>proc~fraggle_setup_fragments&#45;&gt;setup_pl</title>
+<path fill="none" stroke="#000000" d="M905.65,-12310.18C953.9,-12302.17 1017.86,-12291.56 1057.32,-12285.01"/>
+<polygon fill="#000000" stroke="#000000" points="1057.99,-12288.44 1067.28,-12283.35 1056.84,-12281.54 1057.99,-12288.44"/>
+</g>
+<!-- interface~util_set_rhill_approximate -->
+<g id="call~~graph~~CallGraph_node526" class="node">
+<title>interface~util_set_rhill_approximate</title>
+<g id="a_call~~graph~~CallGraph_node526"><a xlink:href=".././interface/util_set_rhill_approximate.html" xlink:title="util_set_rhill_approximate">
+<polygon fill="#a7506f" stroke="#a7506f" points="164,-10611 30,-10611 30,-10587 164,-10587 164,-10611"/>
+<text text-anchor="middle" x="97" y="-10596.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill_approximate</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_initialize_system&#45;&gt;proc~setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge467" class="edge">
-<title>interface~setup_initialize_system&#45;&gt;proc~setup_initialize_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.2,-11048C188.07,-11048 224.34,-11048 255.5,-11048"/>
-<polygon fill="#000000" stroke="#000000" points="255.86,-11051.5 265.86,-11048 255.86,-11044.5 255.86,-11051.5"/>
+<!-- interface~util_set_rhill_approximate&#45;&gt;proc~util_set_rhill_approximate -->
+<g id="call~~graph~~CallGraph_edge489" class="edge">
+<title>interface~util_set_rhill_approximate&#45;&gt;proc~util_set_rhill_approximate</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M164.25,-10599C191.07,-10599 222.19,-10599 249.92,-10599"/>
+<polygon fill="#000000" stroke="#000000" points="249.98,-10602.5 259.98,-10599 249.98,-10595.5 249.98,-10602.5"/>
 </g>
-<!-- interface~setup_pl -->
-<g id="call~~graph~~CallGraph_node483" class="node">
-<title>interface~setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node483"><a xlink:href=".././interface/setup_pl.html" xlink:title="setup_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="124,-10892 70,-10892 70,-10868 124,-10868 124,-10892"/>
-<text text-anchor="middle" x="97" y="-10877.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
+<!-- interface~io_get_args -->
+<g id="call~~graph~~CallGraph_node527" class="node">
+<title>interface~io_get_args</title>
+<g id="a_call~~graph~~CallGraph_node527"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#a7506f" stroke="#a7506f" points="609,-575 540,-575 540,-551 609,-551 609,-575"/>
+<text text-anchor="middle" x="574.5" y="-560.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_pl&#45;&gt;proc~setup_pl -->
-<g id="call~~graph~~CallGraph_edge468" class="edge">
-<title>interface~setup_pl&#45;&gt;proc~setup_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.15,-10880C164.85,-10880 243.43,-10880 289.63,-10880"/>
-<polygon fill="#000000" stroke="#000000" points="289.8,-10883.5 299.8,-10880 289.8,-10876.5 289.8,-10883.5"/>
+<!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
+<g id="call~~graph~~CallGraph_edge490" class="edge">
+<title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.08,-563C656.23,-563 742.15,-563 794.41,-563"/>
+<polygon fill="#000000" stroke="#000000" points="794.71,-566.5 804.71,-563 794.71,-559.5 794.71,-566.5"/>
 </g>
-<!-- interface~setup_tp -->
-<g id="call~~graph~~CallGraph_node485" class="node">
-<title>interface~setup_tp</title>
-<g id="a_call~~graph~~CallGraph_node485"><a xlink:href=".././interface/setup_tp.html" xlink:title="setup_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="124,-10850 70,-10850 70,-10826 124,-10826 124,-10850"/>
-<text text-anchor="middle" x="97" y="-10835.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
-</a>
+<!-- proc~symba_util_fill_tp&#45;&gt;interface~util_fill -->
+<g id="call~~graph~~CallGraph_edge492" class="edge">
+<title>proc~symba_util_fill_tp&#45;&gt;interface~util_fill</title>
+<path fill="none" stroke="#000000" d="M886.58,-2258.5C908.23,-2260.91 933.68,-2266.3 954,-2278 975.3,-2290.27 968.8,-2307.55 990,-2320 1010.29,-2331.92 1036.24,-2337.16 1057.08,-2339.43"/>
+<polygon fill="#000000" stroke="#000000" points="1056.88,-2342.93 1067.16,-2340.35 1057.51,-2335.96 1056.88,-2342.93"/>
 </g>
+<!-- proc~symba_util_fill_tp&#45;&gt;util_fill_tp -->
+<g id="call~~graph~~CallGraph_edge493" class="edge">
+<title>proc~symba_util_fill_tp&#45;&gt;util_fill_tp</title>
+<path fill="none" stroke="#000000" d="M886.61,-2264.65C935.14,-2272.71 1010.61,-2285.24 1055.74,-2292.73"/>
+<polygon fill="#000000" stroke="#000000" points="1055.27,-2296.2 1065.7,-2294.39 1056.41,-2289.3 1055.27,-2296.2"/>
 </g>
-<!-- interface~setup_tp&#45;&gt;proc~setup_tp -->
-<g id="call~~graph~~CallGraph_edge469" class="edge">
-<title>interface~setup_tp&#45;&gt;proc~setup_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.15,-10838C164.85,-10838 243.43,-10838 289.63,-10838"/>
-<polygon fill="#000000" stroke="#000000" points="289.8,-10841.5 299.8,-10838 289.8,-10834.5 289.8,-10841.5"/>
+<!-- proc~symba_util_fill_tp&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge491" class="edge">
+<title>proc~symba_util_fill_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M886.55,-2254.22C909.65,-2255.34 936.4,-2260.89 954,-2278 1008.75,-2331.23 949.31,-2381.38 990,-2446 1007.2,-2473.32 1037.2,-2494.96 1060.49,-2508.81"/>
+<polygon fill="#000000" stroke="#000000" points="1058.95,-2511.96 1069.37,-2513.91 1062.44,-2505.89 1058.95,-2511.96"/>
 </g>
-<!-- interface~tides_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node486" class="node">
-<title>interface~tides_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node486"><a xlink:href=".././interface/tides_kick_getacch_pl.html" xlink:title="tides_kick_getacch_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-12946 38.5,-12946 38.5,-12922 155.5,-12922 155.5,-12946"/>
-<text text-anchor="middle" x="97" y="-12931.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_kick_getacch_pl</text>
+<!-- interface~whm_coord_h2j_pl -->
+<g id="call~~graph~~CallGraph_node530" class="node">
+<title>interface~whm_coord_h2j_pl</title>
+<g id="a_call~~graph~~CallGraph_node530"><a xlink:href=".././interface/whm_coord_h2j_pl.html" xlink:title="whm_coord_h2j_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="148.5,-8040 45.5,-8040 45.5,-8016 148.5,-8016 148.5,-8040"/>
+<text text-anchor="middle" x="97" y="-8025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_h2j_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~tides_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_node521" class="node">
-<title>proc~tides_kick_getacch_pl</title>
-<g id="a_call~~graph~~CallGraph_node521"><a xlink:href=".././proc/tides_kick_getacch_pl.html" xlink:title="tides_kick_getacch_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="385.5,-12946 268.5,-12946 268.5,-12922 385.5,-12922 385.5,-12946"/>
-<text text-anchor="middle" x="327" y="-12931.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_kick_getacch_pl</text>
+<!-- interface~whm_coord_h2j_pl&#45;&gt;proc~whm_coord_h2j_pl -->
+<g id="call~~graph~~CallGraph_edge494" class="edge">
+<title>interface~whm_coord_h2j_pl&#45;&gt;proc~whm_coord_h2j_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.6,-8028C183.02,-8028 228.74,-8028 265.14,-8028"/>
+<polygon fill="#000000" stroke="#000000" points="265.15,-8031.5 275.15,-8028 265.15,-8024.5 265.15,-8031.5"/>
+</g>
+<!-- interface~io_get_old_t_final_system -->
+<g id="call~~graph~~CallGraph_node531" class="node">
+<title>interface~io_get_old_t_final_system</title>
+<g id="a_call~~graph~~CallGraph_node531"><a xlink:href=".././interface/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="642.5,-1247 506.5,-1247 506.5,-1223 642.5,-1223 642.5,-1247"/>
+<text text-anchor="middle" x="574.5" y="-1232.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
 </a>
 </g>
 </g>
-<!-- interface~tides_kick_getacch_pl&#45;&gt;proc~tides_kick_getacch_pl -->
-<g id="call~~graph~~CallGraph_edge470" class="edge">
-<title>interface~tides_kick_getacch_pl&#45;&gt;proc~tides_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-12934C186.72,-12934 225.45,-12934 258.11,-12934"/>
-<polygon fill="#000000" stroke="#000000" points="258.48,-12937.5 268.48,-12934 258.48,-12930.5 258.48,-12937.5"/>
+<!-- interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system -->
+<g id="call~~graph~~CallGraph_edge495" class="edge">
+<title>interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.55,-1235C678.58,-1235 723.18,-1235 760.73,-1235"/>
+<polygon fill="#000000" stroke="#000000" points="761.12,-1238.5 771.12,-1235 761.12,-1231.5 761.12,-1238.5"/>
 </g>
-<!-- interface~tides_step_spin_system -->
-<g id="call~~graph~~CallGraph_node487" class="node">
-<title>interface~tides_step_spin_system</title>
-<g id="a_call~~graph~~CallGraph_node487"><a xlink:href=".././interface/tides_step_spin_system.html" xlink:title="tides_step_spin_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="160.5,-12988 33.5,-12988 33.5,-12964 160.5,-12964 160.5,-12988"/>
-<text text-anchor="middle" x="97" y="-12973.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_step_spin_system</text>
+<!-- interface~whm_coord_j2h_pl -->
+<g id="call~~graph~~CallGraph_node532" class="node">
+<title>interface~whm_coord_j2h_pl</title>
+<g id="a_call~~graph~~CallGraph_node532"><a xlink:href=".././interface/whm_coord_j2h_pl.html" xlink:title="whm_coord_j2h_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="148.5,-8082 45.5,-8082 45.5,-8058 148.5,-8058 148.5,-8082"/>
+<text text-anchor="middle" x="97" y="-8067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_j2h_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~tides_step_spin_system -->
-<g id="call~~graph~~CallGraph_node561" class="node">
-<title>proc~tides_step_spin_system</title>
-<g id="a_call~~graph~~CallGraph_node561"><a xlink:href=".././proc/tides_step_spin_system.html" xlink:title="tides_step_spin_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="390.5,-12988 263.5,-12988 263.5,-12964 390.5,-12964 390.5,-12988"/>
-<text text-anchor="middle" x="327" y="-12973.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_step_spin_system</text>
-</a>
-</g>
+<!-- interface~whm_coord_j2h_pl&#45;&gt;proc~whm_coord_j2h_pl -->
+<g id="call~~graph~~CallGraph_edge496" class="edge">
+<title>interface~whm_coord_j2h_pl&#45;&gt;proc~whm_coord_j2h_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.6,-8070C183.02,-8070 228.74,-8070 265.14,-8070"/>
+<polygon fill="#000000" stroke="#000000" points="265.15,-8073.5 275.15,-8070 265.15,-8066.5 265.15,-8073.5"/>
 </g>
-<!-- interface~tides_step_spin_system&#45;&gt;proc~tides_step_spin_system -->
-<g id="call~~graph~~CallGraph_edge471" class="edge">
-<title>interface~tides_step_spin_system&#45;&gt;proc~tides_step_spin_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160.6,-12976C189.14,-12976 223.11,-12976 252.83,-12976"/>
-<polygon fill="#000000" stroke="#000000" points="253.14,-12979.5 263.14,-12976 253.14,-12972.5 253.14,-12979.5"/>
+<!-- interface~io_get_token&#45;&gt;proc~io_get_token -->
+<g id="call~~graph~~CallGraph_edge497" class="edge">
+<title>interface~io_get_token&#45;&gt;proc~io_get_token</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1131.62,-254C1174.27,-254 1245.31,-254 1292.02,-254"/>
+<polygon fill="#000000" stroke="#000000" points="1292.18,-257.5 1302.18,-254 1292.18,-250.5 1292.18,-257.5"/>
 </g>
-<!-- interface~user_kick_getacch_body -->
-<g id="call~~graph~~CallGraph_node488" class="node">
-<title>interface~user_kick_getacch_body</title>
-<g id="a_call~~graph~~CallGraph_node488"><a xlink:href=".././interface/user_kick_getacch_body.html" xlink:title="user_kick_getacch_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="162,-11228 32,-11228 32,-11204 162,-11204 162,-11228"/>
-<text text-anchor="middle" x="97" y="-11213.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_kick_getacch_body</text>
+<!-- proc~whm_kick_vh_pl -->
+<g id="call~~graph~~CallGraph_node534" class="node">
+<title>proc~whm_kick_vh_pl</title>
+<g id="a_call~~graph~~CallGraph_node534"><a xlink:href=".././proc/whm_kick_vh_pl.html" xlink:title="whm_kick_vh_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="372.5,-13383 281.5,-13383 281.5,-13359 372.5,-13359 372.5,-13383"/>
+<text text-anchor="middle" x="327" y="-13368.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~user_kick_getacch_body&#45;&gt;proc~user_kick_getacch_body -->
-<g id="call~~graph~~CallGraph_edge472" class="edge">
-<title>interface~user_kick_getacch_body&#45;&gt;proc~user_kick_getacch_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.12,-11216C190.04,-11216 222.94,-11216 251.9,-11216"/>
-<polygon fill="#000000" stroke="#000000" points="251.97,-11219.5 261.97,-11216 251.97,-11212.5 251.97,-11219.5"/>
-</g>
-<!-- proc~fraggle_setup_fragments&#45;&gt;setup_pl -->
-<g id="call~~graph~~CallGraph_edge473" class="edge">
-<title>proc~fraggle_setup_fragments&#45;&gt;setup_pl</title>
-<path fill="none" stroke="#000000" d="M905.65,-4828.82C953.9,-4836.83 1017.86,-4847.44 1057.32,-4853.99"/>
-<polygon fill="#000000" stroke="#000000" points="1056.84,-4857.46 1067.28,-4855.65 1057.99,-4850.56 1056.84,-4857.46"/>
-</g>
-<!-- interface~util_minimize_bfgs -->
-<g id="call~~graph~~CallGraph_node491" class="node">
-<title>interface~util_minimize_bfgs</title>
-<g id="a_call~~graph~~CallGraph_node491"><a xlink:href=".././interface/util_minimize_bfgs.html" xlink:title="util_minimize_bfgs">
-<polygon fill="#a7506f" stroke="#a7506f" points="147,-13030 47,-13030 47,-13006 147,-13006 147,-13030"/>
-<text text-anchor="middle" x="97" y="-13015.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
+<!-- interface~whm_coord_vh2vj_pl -->
+<g id="call~~graph~~CallGraph_node535" class="node">
+<title>interface~whm_coord_vh2vj_pl</title>
+<g id="a_call~~graph~~CallGraph_node535"><a xlink:href=".././interface/whm_coord_vh2vj_pl.html" xlink:title="whm_coord_vh2vj_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="153.5,-8124 40.5,-8124 40.5,-8100 153.5,-8100 153.5,-8124"/>
+<text text-anchor="middle" x="97" y="-8109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord_vh2vj_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_minimize_bfgs -->
-<g id="call~~graph~~CallGraph_node553" class="node">
-<title>proc~util_minimize_bfgs</title>
-<g id="a_call~~graph~~CallGraph_node553"><a xlink:href=".././proc/util_minimize_bfgs.html" xlink:title="util_minimize_bfgs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="377,-13030 277,-13030 277,-13006 377,-13006 377,-13030"/>
-<text text-anchor="middle" x="327" y="-13015.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
+<!-- interface~whm_coord_vh2vj_pl&#45;&gt;proc~whm_coord_vh2vj_pl -->
+<g id="call~~graph~~CallGraph_edge498" class="edge">
+<title>interface~whm_coord_vh2vj_pl&#45;&gt;proc~whm_coord_vh2vj_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.78,-8112C185.91,-8112 226.49,-8112 260.19,-8112"/>
+<polygon fill="#000000" stroke="#000000" points="260.41,-8115.5 270.41,-8112 260.41,-8108.5 260.41,-8115.5"/>
+</g>
+<!-- interface~io_read_frame_body -->
+<g id="call~~graph~~CallGraph_node536" class="node">
+<title>interface~io_read_frame_body</title>
+<g id="a_call~~graph~~CallGraph_node536"><a xlink:href=".././interface/io_read_frame_body.html" xlink:title="io_read_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-953 518.5,-953 518.5,-929 630.5,-929 630.5,-953"/>
+<text text-anchor="middle" x="574.5" y="-938.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
 </a>
 </g>
 </g>
-<!-- interface~util_minimize_bfgs&#45;&gt;proc~util_minimize_bfgs -->
-<g id="call~~graph~~CallGraph_edge474" class="edge">
-<title>interface~util_minimize_bfgs&#45;&gt;proc~util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.19,-13018C182.25,-13018 229.56,-13018 266.71,-13018"/>
-<polygon fill="#000000" stroke="#000000" points="266.9,-13021.5 276.9,-13018 266.9,-13014.5 266.9,-13021.5"/>
+<!-- interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body -->
+<g id="call~~graph~~CallGraph_edge499" class="edge">
+<title>interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-941C672.19,-941 729.31,-941 773.16,-941"/>
+<polygon fill="#000000" stroke="#000000" points="773.44,-944.5 783.44,-941 773.44,-937.5 773.44,-944.5"/>
 </g>
-<!-- interface~util_rescale_system -->
-<g id="call~~graph~~CallGraph_node494" class="node">
-<title>interface~util_rescale_system</title>
-<g id="a_call~~graph~~CallGraph_node494"><a xlink:href=".././interface/util_rescale_system.html" xlink:title="util_rescale_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="150,-12904 44,-12904 44,-12880 150,-12880 150,-12904"/>
-<text text-anchor="middle" x="97" y="-12889.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale_system</text>
+<!-- interface~lambda_obj -->
+<g id="call~~graph~~CallGraph_node537" class="node">
+<title>interface~lambda_obj</title>
+<g id="a_call~~graph~~CallGraph_node537"><a xlink:href=".././interface/lambda_obj.html" xlink:title="lambda_obj">
+<polygon fill="#a7506f" stroke="#a7506f" points="131,-6172 63,-6172 63,-6148 131,-6148 131,-6172"/>
+<text text-anchor="middle" x="97" y="-6157.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
 </a>
 </g>
 </g>
-<!-- interface~util_rescale_system&#45;&gt;proc~util_rescale_system -->
-<g id="call~~graph~~CallGraph_edge475" class="edge">
-<title>interface~util_rescale_system&#45;&gt;proc~util_rescale_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-12892C183.76,-12892 227.89,-12892 263.52,-12892"/>
-<polygon fill="#000000" stroke="#000000" points="263.81,-12895.5 273.81,-12892 263.81,-12888.5 263.81,-12895.5"/>
+<!-- interface~lambda_obj&#45;&gt;proc~tides_derivs_init -->
+<g id="call~~graph~~CallGraph_edge500" class="edge">
+<title>interface~lambda_obj&#45;&gt;proc~tides_derivs_init</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-6160C168.08,-6160 228.34,-6160 272.08,-6160"/>
+<polygon fill="#000000" stroke="#000000" points="272.26,-6163.5 282.26,-6160 272.26,-6156.5 272.26,-6163.5"/>
 </g>
-<!-- interface~util_peri_tp -->
-<g id="call~~graph~~CallGraph_node495" class="node">
-<title>interface~util_peri_tp</title>
-<g id="a_call~~graph~~CallGraph_node495"><a xlink:href=".././interface/util_peri_tp.html" xlink:title="util_peri_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="129.5,-8143 64.5,-8143 64.5,-8119 129.5,-8119 129.5,-8143"/>
-<text text-anchor="middle" x="97" y="-8128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri_tp</text>
+<!-- interface~whm_drift_pl -->
+<g id="call~~graph~~CallGraph_node538" class="node">
+<title>interface~whm_drift_pl</title>
+<g id="a_call~~graph~~CallGraph_node538"><a xlink:href=".././interface/whm_drift_pl.html" xlink:title="whm_drift_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="611,-2017 538,-2017 538,-1993 611,-1993 611,-2017"/>
+<text text-anchor="middle" x="574.5" y="-2002.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_peri_tp&#45;&gt;proc~util_peri_tp -->
-<g id="call~~graph~~CallGraph_edge476" class="edge">
-<title>interface~util_peri_tp&#45;&gt;proc~util_peri_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.7,-8131C169.92,-8131 239.38,-8131 283.98,-8131"/>
-<polygon fill="#000000" stroke="#000000" points="284.2,-8134.5 294.2,-8131 284.2,-8127.5 284.2,-8134.5"/>
+<!-- interface~whm_drift_pl&#45;&gt;proc~whm_drift_pl -->
+<g id="call~~graph~~CallGraph_edge501" class="edge">
+<title>interface~whm_drift_pl&#45;&gt;proc~whm_drift_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.24,-2005C658.28,-2005 741.03,-2005 792.63,-2005"/>
+<polygon fill="#000000" stroke="#000000" points="792.84,-2008.5 802.84,-2005 792.84,-2001.5 792.84,-2008.5"/>
 </g>
-<!-- interface~util_sort_rearrange_body -->
-<g id="call~~graph~~CallGraph_node496" class="node">
-<title>interface~util_sort_rearrange_body</title>
-<g id="a_call~~graph~~CallGraph_node496"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="641,-9896 508,-9896 508,-9872 641,-9872 641,-9896"/>
-<text text-anchor="middle" x="574.5" y="-9881.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<!-- interface~io_read_frame_cb -->
+<g id="call~~graph~~CallGraph_node539" class="node">
+<title>interface~io_read_frame_cb</title>
+<g id="a_call~~graph~~CallGraph_node539"><a xlink:href=".././interface/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="624.5,-827 524.5,-827 524.5,-803 624.5,-803 624.5,-827"/>
+<text text-anchor="middle" x="574.5" y="-812.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
-<g id="call~~graph~~CallGraph_edge477" class="edge">
-<title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.19,-9884C678.06,-9884 724.23,-9884 762.64,-9884"/>
-<polygon fill="#000000" stroke="#000000" points="762.74,-9887.5 772.74,-9884 762.74,-9880.5 762.74,-9887.5"/>
+<!-- interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb -->
+<g id="call~~graph~~CallGraph_edge502" class="edge">
+<title>interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.66,-815C668.34,-815 732.3,-815 778.88,-815"/>
+<polygon fill="#000000" stroke="#000000" points="779.14,-818.5 789.14,-815 779.14,-811.5 779.14,-818.5"/>
 </g>
-<!-- interface~util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node497" class="node">
-<title>interface~util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node497"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-9926 38,-9926 38,-9902 156,-9902 156,-9926"/>
-<text text-anchor="middle" x="97" y="-9911.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<!-- interface~whm_util_index_eucl_plpl -->
+<g id="call~~graph~~CallGraph_node540" class="node">
+<title>interface~whm_util_index_eucl_plpl</title>
+<g id="a_call~~graph~~CallGraph_node540"><a xlink:href=".././interface/whm_util_index_eucl_plpl.html" xlink:title="whm_util_index_eucl_plpl">
+<polygon fill="#a7506f" stroke="#a7506f" points="164,-13425 30,-13425 30,-13401 164,-13401 164,-13425"/>
+<text text-anchor="middle" x="97" y="-13410.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_index_eucl_plpl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node597" class="node">
-<title>proc~util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node597"><a xlink:href=".././proc/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="386,-9926 268,-9926 268,-9902 386,-9902 386,-9926"/>
-<text text-anchor="middle" x="327" y="-9911.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<!-- interface~io_read_frame_system -->
+<g id="call~~graph~~CallGraph_node541" class="node">
+<title>interface~io_read_frame_system</title>
+<g id="a_call~~graph~~CallGraph_node541"><a xlink:href=".././interface/io_read_frame_system.html" xlink:title="io_read_frame_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="158,-3391 36,-3391 36,-3367 158,-3367 158,-3391"/>
+<text text-anchor="middle" x="97" y="-3376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_edge478" class="edge">
-<title>interface~util_sort_rearrange_pl&#45;&gt;proc~util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-9914C187.08,-9914 225.33,-9914 257.7,-9914"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-9917.5 267.98,-9914 257.98,-9910.5 257.98,-9917.5"/>
+<!-- interface~io_read_frame_system&#45;&gt;proc~io_read_frame_system -->
+<g id="call~~graph~~CallGraph_edge503" class="edge">
+<title>interface~io_read_frame_system&#45;&gt;proc~io_read_frame_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.2,-3379C188.07,-3379 224.34,-3379 255.5,-3379"/>
+<polygon fill="#000000" stroke="#000000" points="255.86,-3382.5 265.86,-3379 255.86,-3375.5 255.86,-3382.5"/>
 </g>
-<!-- interface~util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_node498" class="node">
-<title>interface~util_sort_rearrange_tp</title>
-<g id="a_call~~graph~~CallGraph_node498"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-9865 38,-9865 38,-9841 156,-9841 156,-9865"/>
-<text text-anchor="middle" x="97" y="-9850.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<!-- interface~whm_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node543" class="node">
+<title>interface~whm_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node543"><a xlink:href=".././interface/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-13047 38.5,-13047 38.5,-13023 155.5,-13023 155.5,-13047"/>
+<text text-anchor="middle" x="97" y="-13032.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_node596" class="node">
-<title>proc~util_sort_rearrange_tp</title>
-<g id="a_call~~graph~~CallGraph_node596"><a xlink:href=".././proc/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="386,-9865 268,-9865 268,-9841 386,-9841 386,-9865"/>
-<text text-anchor="middle" x="327" y="-9850.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
-</a>
+<!-- interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_edge504" class="edge">
+<title>interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-13035C186.72,-13035 225.45,-13035 258.11,-13035"/>
+<polygon fill="#000000" stroke="#000000" points="258.48,-13038.5 268.48,-13035 258.48,-13031.5 258.48,-13038.5"/>
 </g>
+<!-- interface~discard_pl -->
+<g id="call~~graph~~CallGraph_node544" class="node">
+<title>interface~discard_pl</title>
+<g id="a_call~~graph~~CallGraph_node544"><a xlink:href=".././interface/discard_pl.html" xlink:title="discard_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="127.5,-11955 66.5,-11955 66.5,-11931 127.5,-11931 127.5,-11955"/>
+<text text-anchor="middle" x="97" y="-11940.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl</text>
+</a>
 </g>
-<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_edge479" class="edge">
-<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-9853C187.08,-9853 225.33,-9853 257.7,-9853"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-9856.5 267.98,-9853 257.98,-9849.5 257.98,-9856.5"/>
 </g>
-<!-- interface~util_sort_body&#45;&gt;proc~util_sort_body -->
-<g id="call~~graph~~CallGraph_edge480" class="edge">
-<title>interface~util_sort_body&#45;&gt;proc~util_sort_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.02,-9076C660.61,-9076 739.07,-9076 789.8,-9076"/>
-<polygon fill="#000000" stroke="#000000" points="789.87,-9079.5 799.87,-9076 789.87,-9072.5 789.87,-9079.5"/>
+<!-- interface~discard_pl&#45;&gt;proc~discard_pl -->
+<g id="call~~graph~~CallGraph_edge505" class="edge">
+<title>interface~discard_pl&#45;&gt;proc~discard_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M127.81,-11943C168.35,-11943 240.98,-11943 286.16,-11943"/>
+<polygon fill="#000000" stroke="#000000" points="286.19,-11946.5 296.19,-11943 286.19,-11939.5 286.19,-11946.5"/>
 </g>
-<!-- interface~util_sort_pl -->
-<g id="call~~graph~~CallGraph_node501" class="node">
-<title>interface~util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node501"><a xlink:href=".././interface/util_sort_pl.html" xlink:title="util_sort_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="129,-9109 65,-9109 65,-9085 129,-9085 129,-9109"/>
-<text text-anchor="middle" x="97" y="-9094.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
-</a>
+<!-- proc~symba_util_fill_pl&#45;&gt;interface~util_fill -->
+<g id="call~~graph~~CallGraph_edge507" class="edge">
+<title>proc~symba_util_fill_pl&#45;&gt;interface~util_fill</title>
+<path fill="none" stroke="#000000" d="M886.61,-2341C935.69,-2341 1012.35,-2341 1057.28,-2341"/>
+<polygon fill="#000000" stroke="#000000" points="1057.45,-2344.5 1067.45,-2341 1057.45,-2337.5 1057.45,-2344.5"/>
 </g>
+<!-- proc~symba_util_fill_pl&#45;&gt;util_fill_pl -->
+<g id="call~~graph~~CallGraph_edge508" class="edge">
+<title>proc~symba_util_fill_pl&#45;&gt;util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M886.61,-2348.65C935.4,-2356.75 1011.44,-2369.38 1056.47,-2376.85"/>
+<polygon fill="#000000" stroke="#000000" points="1055.97,-2380.32 1066.41,-2378.5 1057.11,-2373.41 1055.97,-2380.32"/>
 </g>
-<!-- interface~util_sort_pl&#45;&gt;proc~util_sort_pl -->
-<g id="call~~graph~~CallGraph_edge481" class="edge">
-<title>interface~util_sort_pl&#45;&gt;proc~util_sort_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.22,-9097C169.53,-9097 239.8,-9097 284.55,-9097"/>
-<polygon fill="#000000" stroke="#000000" points="284.79,-9100.5 294.79,-9097 284.79,-9093.5 284.79,-9100.5"/>
+<!-- proc~symba_util_fill_pl&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge506" class="edge">
+<title>proc~symba_util_fill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M886.66,-2339.77C909.1,-2341.43 935.22,-2346.98 954,-2362 985.72,-2387.36 965.13,-2413.88 990,-2446 1010.13,-2472 1040.59,-2494.18 1063.27,-2508.54"/>
+<polygon fill="#000000" stroke="#000000" points="1061.49,-2511.56 1071.84,-2513.84 1065.17,-2505.61 1061.49,-2511.56"/>
 </g>
-<!-- interface~util_sort_tp -->
-<g id="call~~graph~~CallGraph_node503" class="node">
-<title>interface~util_sort_tp</title>
-<g id="a_call~~graph~~CallGraph_node503"><a xlink:href=".././interface/util_sort_tp.html" xlink:title="util_sort_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="129.5,-9067 64.5,-9067 64.5,-9043 129.5,-9043 129.5,-9067"/>
-<text text-anchor="middle" x="97" y="-9052.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+<!-- interface~whm_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node546" class="node">
+<title>interface~whm_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node546"><a xlink:href=".././interface/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-13089 38,-13089 38,-13065 156,-13065 156,-13089"/>
+<text text-anchor="middle" x="97" y="-13074.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_tp&#45;&gt;proc~util_sort_tp -->
-<g id="call~~graph~~CallGraph_edge482" class="edge">
-<title>interface~util_sort_tp&#45;&gt;proc~util_sort_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.7,-9055C169.92,-9055 239.38,-9055 283.98,-9055"/>
-<polygon fill="#000000" stroke="#000000" points="284.2,-9058.5 294.2,-9055 284.2,-9051.5 284.2,-9058.5"/>
-</g>
-<!-- proc~util_solve_rkf45&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge483" class="edge">
-<title>proc~util_solve_rkf45&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M883.13,-2848C931.99,-2848 1011.24,-2848 1057.25,-2848"/>
-<polygon fill="#000000" stroke="#000000" points="1057.37,-2851.5 1067.37,-2848 1057.37,-2844.5 1057.37,-2851.5"/>
+<!-- interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_edge509" class="edge">
+<title>interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-13077C187.08,-13077 225.33,-13077 257.7,-13077"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-13080.5 267.98,-13077 257.98,-13073.5 257.98,-13080.5"/>
 </g>
-<!-- proc~util_resize_arr_i4b -->
-<g id="call~~graph~~CallGraph_node505" class="node">
-<title>proc~util_resize_arr_i4b</title>
-<g id="a_call~~graph~~CallGraph_node505"><a xlink:href=".././proc/util_resize_arr_i4b.html" xlink:title="util_resize_arr_I4B">
-<polygon fill="#d9534f" stroke="#d9534f" points="148,-13072 46,-13072 46,-13048 148,-13048 148,-13072"/>
-<text text-anchor="middle" x="97" y="-13057.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_I4B</text>
+<!-- interface~discard_system -->
+<g id="call~~graph~~CallGraph_node547" class="node">
+<title>interface~discard_system</title>
+<g id="a_call~~graph~~CallGraph_node547"><a xlink:href=".././interface/discard_system.html" xlink:title="discard_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="140.5,-11325 53.5,-11325 53.5,-11301 140.5,-11301 140.5,-11325"/>
+<text text-anchor="middle" x="97" y="-11310.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_particle_info_system&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge484" class="edge">
-<title>proc~io_read_particle_info_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M913,-2818.04C960.25,-2825.88 1019.87,-2835.78 1057.35,-2842"/>
-<polygon fill="#000000" stroke="#000000" points="1056.87,-2845.47 1067.31,-2843.65 1058.02,-2838.56 1056.87,-2845.47"/>
+<!-- interface~discard_system&#45;&gt;proc~discard_system -->
+<g id="call~~graph~~CallGraph_edge510" class="edge">
+<title>interface~discard_system&#45;&gt;proc~discard_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.62,-11313C178.09,-11313 232.77,-11313 273.04,-11313"/>
+<polygon fill="#000000" stroke="#000000" points="273.2,-11316.5 283.2,-11313 273.2,-11309.5 273.2,-11316.5"/>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_append~2 -->
-<g id="call~~graph~~CallGraph_edge486" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M880.67,-3299.84C910.7,-3295.56 952.81,-3290.23 990,-3288 1189.2,-3276.05 1427.74,-3283.29 1524.04,-3287.1"/>
-<polygon fill="#000000" stroke="#000000" points="1524.12,-3290.61 1534.26,-3287.51 1524.41,-3283.61 1524.12,-3290.61"/>
+<!-- proc~symba_util_index_eucl_plpl&#45;&gt;util_index_eucl_ij_to_k -->
+<g id="call~~graph~~CallGraph_edge511" class="edge">
+<title>proc~symba_util_index_eucl_plpl&#45;&gt;util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M398.68,-5698C431.8,-5698 471.13,-5698 504.09,-5698"/>
+<polygon fill="#000000" stroke="#000000" points="504.1,-5701.5 514.1,-5698 504.1,-5694.5 504.1,-5701.5"/>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
-<g id="call~~graph~~CallGraph_edge485" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M880.59,-3306.48C922.39,-3306.97 988.3,-3307.75 1035.71,-3308.31"/>
-<polygon fill="#000000" stroke="#000000" points="1035.8,-3311.82 1045.84,-3308.43 1035.88,-3304.82 1035.8,-3311.82"/>
+<!-- idx_arr -->
+<g id="call~~graph~~CallGraph_node700" class="node">
+<title>idx_arr</title>
+<polygon fill="#777777" stroke="#777777" points="1366.5,-1723 1312.5,-1723 1312.5,-1699 1366.5,-1699 1366.5,-1723"/>
+<text text-anchor="middle" x="1339.5" y="-1708.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge487" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M880.74,-3306.3C904.77,-3304.38 934.33,-3298.03 954,-3280 985.87,-3250.8 1065.56,-2954.39 1087.71,-2870.19"/>
-<polygon fill="#000000" stroke="#000000" points="1091.13,-2870.95 1090.28,-2860.39 1084.36,-2869.17 1091.13,-2870.95"/>
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
+<g id="call~~graph~~CallGraph_edge512" class="edge">
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
+<path fill="none" stroke="#000000" d="M1191.19,-1711C1230.11,-1711 1272.73,-1711 1302.07,-1711"/>
+<polygon fill="#000000" stroke="#000000" points="1302.24,-1714.5 1312.24,-1711 1302.24,-1707.5 1302.24,-1714.5"/>
 </g>
-<!-- proc~util_resize_arr_logical -->
-<g id="call~~graph~~CallGraph_node509" class="node">
-<title>proc~util_resize_arr_logical</title>
-<g id="a_call~~graph~~CallGraph_node509"><a xlink:href=".././proc/util_resize_arr_logical.html" xlink:title="util_resize_arr_logical">
-<polygon fill="#d9534f" stroke="#d9534f" points="155,-13114 39,-13114 39,-13090 155,-13090 155,-13114"/>
-<text text-anchor="middle" x="97" y="-13099.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_logical</text>
-</a>
+<!-- id_arr -->
+<g id="call~~graph~~CallGraph_node710" class="node">
+<title>id_arr</title>
+<polygon fill="#777777" stroke="#777777" points="1366.5,-1681 1312.5,-1681 1312.5,-1657 1366.5,-1657 1366.5,-1681"/>
+<text text-anchor="middle" x="1339.5" y="-1666.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
 </g>
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
+<g id="call~~graph~~CallGraph_edge513" class="edge">
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
+<path fill="none" stroke="#000000" d="M1165.13,-1698.96C1209.94,-1691.22 1266.33,-1681.47 1302.4,-1675.24"/>
+<polygon fill="#000000" stroke="#000000" points="1303.2,-1678.65 1312.46,-1673.5 1302.01,-1671.76 1303.2,-1678.65"/>
 </g>
-<!-- interface~util_solve_linear_system -->
-<g id="call~~graph~~CallGraph_node512" class="node">
-<title>interface~util_solve_linear_system</title>
-<g id="a_call~~graph~~CallGraph_node512"><a xlink:href=".././interface/util_solve_linear_system.html" xlink:title="util_solve_linear_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="161.5,-13156 32.5,-13156 32.5,-13132 161.5,-13132 161.5,-13156"/>
-<text text-anchor="middle" x="97" y="-13141.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_linear_system</text>
+<!-- interface~whm_kick_vh_pl -->
+<g id="call~~graph~~CallGraph_node550" class="node">
+<title>interface~whm_kick_vh_pl</title>
+<g id="a_call~~graph~~CallGraph_node550"><a xlink:href=".././interface/whm_kick_vh_pl.html" xlink:title="whm_kick_vh_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-13383 51.5,-13383 51.5,-13359 142.5,-13359 142.5,-13383"/>
+<text text-anchor="middle" x="97" y="-13368.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_set_beg_end_pl -->
-<g id="call~~graph~~CallGraph_node513" class="node">
-<title>proc~util_set_beg_end_pl</title>
-<g id="a_call~~graph~~CallGraph_node513"><a xlink:href=".././proc/util_set_beg_end_pl.html" xlink:title="util_set_beg_end_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="381.5,-13198 272.5,-13198 272.5,-13174 381.5,-13174 381.5,-13198"/>
-<text text-anchor="middle" x="327" y="-13183.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_beg_end_pl</text>
+<!-- interface~whm_kick_vh_pl&#45;&gt;proc~whm_kick_vh_pl -->
+<g id="call~~graph~~CallGraph_edge514" class="edge">
+<title>interface~whm_kick_vh_pl&#45;&gt;proc~whm_kick_vh_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-13371C179.26,-13371 231.61,-13371 270.99,-13371"/>
+<polygon fill="#000000" stroke="#000000" points="271.22,-13374.5 281.22,-13371 271.22,-13367.5 271.22,-13374.5"/>
+</g>
+<!-- interface~discard_tp -->
+<g id="call~~graph~~CallGraph_node551" class="node">
+<title>interface~discard_tp</title>
+<g id="a_call~~graph~~CallGraph_node551"><a xlink:href=".././interface/discard_tp.html" xlink:title="discard_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="128,-11913 66,-11913 66,-11889 128,-11889 128,-11913"/>
+<text text-anchor="middle" x="97" y="-11898.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_arr_info -->
-<g id="call~~graph~~CallGraph_node514" class="node">
-<title>proc~util_resize_arr_info</title>
-<g id="a_call~~graph~~CallGraph_node514"><a xlink:href=".././proc/util_resize_arr_info.html" xlink:title="util_resize_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="148.5,-13240 45.5,-13240 45.5,-13216 148.5,-13216 148.5,-13240"/>
-<text text-anchor="middle" x="97" y="-13225.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_info</text>
+<!-- interface~discard_tp&#45;&gt;proc~discard_tp -->
+<g id="call~~graph~~CallGraph_edge515" class="edge">
+<title>interface~discard_tp&#45;&gt;proc~discard_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M128.28,-11901C168.76,-11901 240.64,-11901 285.68,-11901"/>
+<polygon fill="#000000" stroke="#000000" points="285.96,-11904.5 295.96,-11901 285.96,-11897.5 285.96,-11904.5"/>
+</g>
+<!-- interface~whm_kick_vh_tp -->
+<g id="call~~graph~~CallGraph_node552" class="node">
+<title>interface~whm_kick_vh_tp</title>
+<g id="a_call~~graph~~CallGraph_node552"><a xlink:href=".././interface/whm_kick_vh_tp.html" xlink:title="whm_kick_vh_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-13299 51.5,-13299 51.5,-13275 142.5,-13275 142.5,-13299"/>
+<text text-anchor="middle" x="97" y="-13284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_vh_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_append~2 -->
-<g id="call~~graph~~CallGraph_edge489" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_append~2</title>
-<path fill="none" stroke="#000000" d="M881.17,-3350.82C979.03,-3356.72 1234.99,-3366.99 1444,-3330 1473.52,-3324.77 1505.63,-3313.95 1529.7,-3304.73"/>
-<polygon fill="#000000" stroke="#000000" points="1531.13,-3307.93 1539.17,-3301.03 1528.58,-3301.41 1531.13,-3307.93"/>
+<!-- interface~whm_kick_vh_tp&#45;&gt;proc~whm_kick_vh_tp -->
+<g id="call~~graph~~CallGraph_edge516" class="edge">
+<title>interface~whm_kick_vh_tp&#45;&gt;proc~whm_kick_vh_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-13287C179.26,-13287 231.61,-13287 270.99,-13287"/>
+<polygon fill="#000000" stroke="#000000" points="271.22,-13290.5 281.22,-13287 271.22,-13283.5 271.22,-13290.5"/>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
-<g id="call~~graph~~CallGraph_edge488" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M881.15,-3341.73C922.92,-3335.29 988.34,-3325.21 1035.54,-3317.94"/>
-<polygon fill="#000000" stroke="#000000" points="1036.26,-3321.36 1045.61,-3316.38 1035.2,-3314.45 1036.26,-3321.36"/>
+<!-- interface~drift_all&#45;&gt;proc~drift_all -->
+<g id="call~~graph~~CallGraph_edge517" class="edge">
+<title>interface~drift_all&#45;&gt;proc~drift_all</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.68,-9204C648.94,-9204 748.58,-9204 802.32,-9204"/>
+<polygon fill="#000000" stroke="#000000" points="802.43,-9207.5 812.43,-9204 802.43,-9200.5 802.43,-9207.5"/>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge490" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M881.05,-3350.47C905.04,-3349.73 934.45,-3344.67 954,-3327 956.24,-3324.98 1060.13,-2964.04 1087.14,-2870.12"/>
-<polygon fill="#000000" stroke="#000000" points="1090.58,-2870.84 1089.98,-2860.26 1083.85,-2868.91 1090.58,-2870.84"/>
+<!-- interface~whm_gr_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node554" class="node">
+<title>interface~whm_gr_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node554"><a xlink:href=".././interface/whm_gr_kick_getacch_pl.html" xlink:title="whm_gr_kick_getacch_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-4210 30.5,-4210 30.5,-4186 163.5,-4186 163.5,-4210"/>
+<text text-anchor="middle" x="97" y="-4195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_pl</text>
+</a>
 </g>
-<!-- vj -->
-<g id="call~~graph~~CallGraph_node703" class="node">
-<title>vj</title>
-<polygon fill="#777777" stroke="#777777" points="601.5,-6925 547.5,-6925 547.5,-6901 601.5,-6901 601.5,-6925"/>
-<text text-anchor="middle" x="574.5" y="-6910.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;vj -->
-<g id="call~~graph~~CallGraph_edge491" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;vj</title>
-<path fill="none" stroke="#000000" d="M378.57,-6879.65C425.8,-6887.73 495.14,-6899.59 537.13,-6906.78"/>
-<polygon fill="#000000" stroke="#000000" points="536.74,-6910.26 547.19,-6908.5 537.92,-6903.36 536.74,-6910.26"/>
+<!-- interface~whm_gr_kick_getacch_pl&#45;&gt;proc~whm_gr_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_edge518" class="edge">
+<title>interface~whm_gr_kick_getacch_pl&#45;&gt;proc~whm_gr_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-4198C190.71,-4198 222.24,-4198 250.27,-4198"/>
+<polygon fill="#000000" stroke="#000000" points="250.43,-4201.5 260.43,-4198 250.43,-4194.5 250.43,-4201.5"/>
 </g>
-<!-- xh -->
-<g id="call~~graph~~CallGraph_node705" class="node">
-<title>xh</title>
-<polygon fill="#777777" stroke="#777777" points="601.5,-7009 547.5,-7009 547.5,-6985 601.5,-6985 601.5,-7009"/>
-<text text-anchor="middle" x="574.5" y="-6994.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xh</text>
+<!-- interface~drift_body -->
+<g id="call~~graph~~CallGraph_node555" class="node">
+<title>interface~drift_body</title>
+<g id="a_call~~graph~~CallGraph_node555"><a xlink:href=".././interface/drift_body.html" xlink:title="drift_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="127,-9216 67,-9216 67,-9192 127,-9192 127,-9216"/>
+<text text-anchor="middle" x="97" y="-9201.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_body</text>
+</a>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;xh -->
-<g id="call~~graph~~CallGraph_edge494" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;xh</title>
-<path fill="none" stroke="#000000" d="M378.83,-6873.13C394.72,-6876.01 411.37,-6881.57 424,-6892 455.31,-6917.87 428.28,-6950.64 460,-6976 481.54,-6993.22 512.73,-6998 536.96,-6998.73"/>
-<polygon fill="#000000" stroke="#000000" points="537.18,-7002.23 547.21,-6998.82 537.24,-6995.23 537.18,-7002.23"/>
 </g>
-<!-- xj -->
-<g id="call~~graph~~CallGraph_node720" class="node">
-<title>xj</title>
-<polygon fill="#777777" stroke="#777777" points="601.5,-6967 547.5,-6967 547.5,-6943 601.5,-6943 601.5,-6967"/>
-<text text-anchor="middle" x="574.5" y="-6952.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
+<!-- interface~drift_body&#45;&gt;proc~drift_body -->
+<g id="call~~graph~~CallGraph_edge519" class="edge">
+<title>interface~drift_body&#45;&gt;proc~drift_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M127.34,-9204C167.96,-9204 241.42,-9204 286.73,-9204"/>
+<polygon fill="#000000" stroke="#000000" points="286.77,-9207.5 296.77,-9204 286.77,-9200.5 286.77,-9207.5"/>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;xj -->
-<g id="call~~graph~~CallGraph_edge493" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;xj</title>
-<path fill="none" stroke="#000000" d="M378.63,-6875.8C393.99,-6878.86 410.38,-6883.86 424,-6892 445.1,-6904.61 438.7,-6921.73 460,-6934 483.49,-6947.53 513.85,-6952.62 537.26,-6954.42"/>
-<polygon fill="#000000" stroke="#000000" points="537.28,-6957.93 547.47,-6955.03 537.7,-6950.94 537.28,-6957.93"/>
+<!-- interface~whm_gr_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node557" class="node">
+<title>interface~whm_gr_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node557"><a xlink:href=".././interface/whm_gr_kick_getacch_tp.html" xlink:title="whm_gr_kick_getacch_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-4168 30.5,-4168 30.5,-4144 163.5,-4144 163.5,-4168"/>
+<text text-anchor="middle" x="97" y="-4153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_kick_getacch_tp</text>
+</a>
 </g>
-<!-- eta -->
-<g id="call~~graph~~CallGraph_node739" class="node">
-<title>eta</title>
-<polygon fill="#777777" stroke="#777777" points="601.5,-6883 547.5,-6883 547.5,-6859 601.5,-6859 601.5,-6883"/>
-<text text-anchor="middle" x="574.5" y="-6868.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;eta -->
-<g id="call~~graph~~CallGraph_edge496" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;eta</title>
-<path fill="none" stroke="#000000" d="M378.57,-6871C425.8,-6871 495.14,-6871 537.13,-6871"/>
-<polygon fill="#000000" stroke="#000000" points="537.19,-6874.5 547.19,-6871 537.19,-6867.5 537.19,-6874.5"/>
+<!-- interface~whm_gr_kick_getacch_tp&#45;&gt;proc~whm_gr_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_edge520" class="edge">
+<title>interface~whm_gr_kick_getacch_tp&#45;&gt;proc~whm_gr_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-4156C190.71,-4156 222.24,-4156 250.27,-4156"/>
+<polygon fill="#000000" stroke="#000000" points="250.43,-4159.5 260.43,-4156 250.43,-4152.5 250.43,-4159.5"/>
 </g>
-<!-- gmpl -->
-<g id="call~~graph~~CallGraph_node752" class="node">
-<title>gmpl</title>
-<polygon fill="#777777" stroke="#777777" points="601.5,-6841 547.5,-6841 547.5,-6817 601.5,-6817 601.5,-6841"/>
-<text text-anchor="middle" x="574.5" y="-6826.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
+<!-- interface~drift_one -->
+<g id="call~~graph~~CallGraph_node558" class="node">
+<title>interface~drift_one</title>
+<g id="a_call~~graph~~CallGraph_node558"><a xlink:href=".././interface/drift_one.html" xlink:title="drift_one">
+<polygon fill="#a7506f" stroke="#a7506f" points="124.5,-9468 69.5,-9468 69.5,-9444 124.5,-9444 124.5,-9468"/>
+<text text-anchor="middle" x="97" y="-9453.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_one</text>
+</a>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;gmpl -->
-<g id="call~~graph~~CallGraph_edge495" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;gmpl</title>
-<path fill="none" stroke="#000000" d="M378.57,-6862.35C425.8,-6854.27 495.14,-6842.41 537.13,-6835.22"/>
-<polygon fill="#000000" stroke="#000000" points="537.92,-6838.64 547.19,-6833.5 536.74,-6831.74 537.92,-6838.64"/>
 </g>
-<!-- vh -->
-<g id="call~~graph~~CallGraph_node764" class="node">
-<title>vh</title>
-<polygon fill="#777777" stroke="#777777" points="601.5,-6799 547.5,-6799 547.5,-6775 601.5,-6775 601.5,-6799"/>
-<text text-anchor="middle" x="574.5" y="-6784.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+<!-- interface~drift_one&#45;&gt;proc~drift_one -->
+<g id="call~~graph~~CallGraph_edge521" class="edge">
+<title>interface~drift_one&#45;&gt;proc~drift_one</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.6,-9456C165.25,-9456 242.95,-9456 289.05,-9456"/>
+<polygon fill="#000000" stroke="#000000" points="289.22,-9459.5 299.22,-9456 289.22,-9452.5 289.22,-9459.5"/>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;vh -->
-<g id="call~~graph~~CallGraph_edge492" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;vh</title>
-<path fill="none" stroke="#000000" d="M378.63,-6866.2C393.99,-6863.14 410.38,-6858.14 424,-6850 445.1,-6837.39 438.7,-6820.27 460,-6808 483.49,-6794.47 513.85,-6789.38 537.26,-6787.58"/>
-<polygon fill="#000000" stroke="#000000" points="537.7,-6791.06 547.47,-6786.97 537.28,-6784.07 537.7,-6791.06"/>
+<!-- interface~whm_gr_p4_pl -->
+<g id="call~~graph~~CallGraph_node560" class="node">
+<title>interface~whm_gr_p4_pl</title>
+<g id="a_call~~graph~~CallGraph_node560"><a xlink:href=".././interface/whm_gr_p4_pl.html" xlink:title="whm_gr_p4_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-4504 55.5,-4504 55.5,-4480 138.5,-4480 138.5,-4504"/>
+<text text-anchor="middle" x="97" y="-4489.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_pl</text>
+</a>
 </g>
-<!-- proc~io_write_discard&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge497" class="edge">
-<title>proc~io_write_discard&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M884.76,-2769.65C906,-2773 931.63,-2777.99 954,-2785 992.34,-2797.01 1034.04,-2816.8 1061.77,-2831"/>
-<polygon fill="#000000" stroke="#000000" points="1060.48,-2834.27 1070.97,-2835.77 1063.7,-2828.06 1060.48,-2834.27"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
-<g id="call~~graph~~CallGraph_edge502" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
-<path fill="none" stroke="#000000" d="M864.81,-314.02C893.93,-328 944.52,-350.96 990,-365 997.87,-367.43 1006.16,-369.65 1014.49,-371.67"/>
-<polygon fill="#000000" stroke="#000000" points="1013.73,-375.08 1024.26,-373.94 1015.31,-368.27 1013.73,-375.08"/>
+<!-- interface~whm_gr_p4_pl&#45;&gt;proc~whm_gr_p4_pl -->
+<g id="call~~graph~~CallGraph_edge522" class="edge">
+<title>interface~whm_gr_p4_pl&#45;&gt;proc~whm_gr_p4_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-4492C176.9,-4492 234.01,-4492 275.12,-4492"/>
+<polygon fill="#000000" stroke="#000000" points="275.21,-4495.5 285.21,-4492 275.21,-4488.5 275.21,-4495.5"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
-<g id="call~~graph~~CallGraph_edge503" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" d="M913,-314.04C943.57,-319.11 979.31,-325.04 1010.89,-330.29"/>
-<polygon fill="#000000" stroke="#000000" points="1010.55,-333.78 1020.99,-331.96 1011.7,-326.87 1010.55,-333.78"/>
+<!-- interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k -->
+<g id="call~~graph~~CallGraph_edge523" class="edge">
+<title>interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M634.52,-10347C674.4,-10347 727.2,-10347 769.09,-10347"/>
+<polygon fill="#000000" stroke="#000000" points="769.22,-10350.5 779.22,-10347 769.22,-10343.5 769.22,-10350.5"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge -->
-<g id="call~~graph~~CallGraph_edge501" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge</title>
-<path fill="none" stroke="#000000" d="M942.31,-302C964.95,-302 988.69,-302 1010.47,-302"/>
-<polygon fill="#000000" stroke="#000000" points="1010.66,-305.5 1020.66,-302 1010.66,-298.5 1010.66,-305.5"/>
+<!-- proc~symba_util_peri_pl&#45;&gt;orbel_xv2aeq -->
+<g id="call~~graph~~CallGraph_edge524" class="edge">
+<title>proc~symba_util_peri_pl&#45;&gt;orbel_xv2aeq</title>
+<path fill="none" stroke="#000000" d="M1618.07,-2202.96C1641.17,-2197.24 1668.67,-2190.43 1691.61,-2184.74"/>
+<polygon fill="#000000" stroke="#000000" points="1692.6,-2188.1 1701.47,-2182.3 1690.92,-2181.31 1692.6,-2188.1"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders -->
-<g id="call~~graph~~CallGraph_edge498" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders</title>
-<path fill="none" stroke="#000000" d="M913,-289.96C943.57,-284.89 979.31,-278.96 1010.89,-273.71"/>
-<polygon fill="#000000" stroke="#000000" points="1011.7,-277.13 1020.99,-272.04 1010.55,-270.22 1011.7,-277.13"/>
+<!-- interface~whm_gr_p4_tp -->
+<g id="call~~graph~~CallGraph_node563" class="node">
+<title>interface~whm_gr_p4_tp</title>
+<g id="a_call~~graph~~CallGraph_node563"><a xlink:href=".././interface/whm_gr_p4_tp.html" xlink:title="whm_gr_p4_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="139,-4462 55,-4462 55,-4438 139,-4438 139,-4462"/>
+<text text-anchor="middle" x="97" y="-4447.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr_p4_tp</text>
+</a>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx1 -->
-<g id="call~~graph~~CallGraph_edge500" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx1</title>
-<path fill="none" stroke="#000000" d="M879.91,-289.95C902.11,-282.62 930.11,-272.47 954,-261 970.9,-252.88 972.55,-245.86 990,-239 1011.51,-230.55 1036.92,-225.33 1057.19,-222.21"/>
-<polygon fill="#000000" stroke="#000000" points="1057.86,-225.65 1067.27,-220.76 1056.87,-218.72 1057.86,-225.65"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx2 -->
-<g id="call~~graph~~CallGraph_edge499" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx2</title>
-<path fill="none" stroke="#000000" d="M897.76,-289.96C917.19,-283.75 938.01,-274.54 954,-261 978.91,-239.91 963.62,-216.21 990,-197 1009.36,-182.9 1035.91,-177.73 1057.27,-176.03"/>
-<polygon fill="#000000" stroke="#000000" points="1057.51,-179.53 1067.29,-175.46 1057.11,-172.54 1057.51,-179.53"/>
+<!-- interface~whm_gr_p4_tp&#45;&gt;proc~whm_gr_p4_tp -->
+<g id="call~~graph~~CallGraph_edge525" class="edge">
+<title>interface~whm_gr_p4_tp&#45;&gt;proc~whm_gr_p4_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.03,-4450C177.08,-4450 233.86,-4450 274.86,-4450"/>
+<polygon fill="#000000" stroke="#000000" points="274.92,-4453.5 284.92,-4450 274.92,-4446.5 274.92,-4453.5"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge504" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M856.98,-314.11C883.03,-334.34 932.91,-377.78 954,-428 1004.16,-547.48 920.67,-900.53 990,-1010 1005.17,-1033.96 1034.14,-1048.66 1057.58,-1057.12"/>
-<polygon fill="#000000" stroke="#000000" points="1056.64,-1060.5 1067.23,-1060.37 1058.88,-1053.86 1056.64,-1060.5"/>
+<!-- interface~util_index_eucl_k_to_ij -->
+<g id="call~~graph~~CallGraph_node564" class="node">
+<title>interface~util_index_eucl_k_to_ij</title>
+<g id="a_call~~graph~~CallGraph_node564"><a xlink:href=".././interface/util_index_eucl_k_to_ij.html" xlink:title="util_index_eucl_k_to_ij">
+<polygon fill="#a7506f" stroke="#a7506f" points="157,-10485 37,-10485 37,-10461 157,-10461 157,-10485"/>
+<text text-anchor="middle" x="97" y="-10470.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_k_to_ij</text>
+</a>
 </g>
-<!-- drift_all -->
-<g id="call~~graph~~CallGraph_node751" class="node">
-<title>drift_all</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-566 1067.5,-566 1067.5,-542 1121.5,-542 1121.5,-566"/>
-<text text-anchor="middle" x="1094.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
 </g>
-<!-- proc~helio_drift_body&#45;&gt;drift_all -->
-<g id="call~~graph~~CallGraph_edge505" class="edge">
-<title>proc~helio_drift_body&#45;&gt;drift_all</title>
-<path fill="none" stroke="#000000" d="M883.7,-554C932.67,-554 1011.62,-554 1057.43,-554"/>
-<polygon fill="#000000" stroke="#000000" points="1057.5,-557.5 1067.5,-554 1057.5,-550.5 1057.5,-557.5"/>
+<!-- interface~util_index_eucl_k_to_ij&#45;&gt;proc~util_index_eucl_k_to_ij -->
+<g id="call~~graph~~CallGraph_edge526" class="edge">
+<title>interface~util_index_eucl_k_to_ij&#45;&gt;proc~util_index_eucl_k_to_ij</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M157.01,-10473C187.49,-10473 224.87,-10473 256.71,-10473"/>
+<polygon fill="#000000" stroke="#000000" points="256.84,-10476.5 266.84,-10473 256.84,-10469.5 256.84,-10476.5"/>
 </g>
-<!-- interface~symba_util_spill_pl -->
-<g id="call~~graph~~CallGraph_node522" class="node">
-<title>interface~symba_util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node522"><a xlink:href=".././interface/symba_util_spill_pl.html" xlink:title="symba_util_spill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="625.5,-1604 523.5,-1604 523.5,-1580 625.5,-1580 625.5,-1604"/>
-<text text-anchor="middle" x="574.5" y="-1589.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_pl</text>
+<!-- proc~tides_spin_derivs -->
+<g id="call~~graph~~CallGraph_node566" class="node">
+<title>proc~tides_spin_derivs</title>
+<g id="a_call~~graph~~CallGraph_node566"><a xlink:href=".././proc/tides_spin_derivs.html" xlink:title="tides_spin_derivs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="144.5,-13467 49.5,-13467 49.5,-13443 144.5,-13443 144.5,-13467"/>
+<text text-anchor="middle" x="97" y="-13452.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_derivs</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl -->
-<g id="call~~graph~~CallGraph_edge506" class="edge">
-<title>interface~symba_util_spill_pl&#45;&gt;proc~symba_util_spill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M625.59,-1592C668.96,-1592 731.8,-1592 777.98,-1592"/>
-<polygon fill="#000000" stroke="#000000" points="778.15,-1595.5 788.15,-1592 778.15,-1588.5 778.15,-1595.5"/>
-</g>
-<!-- interface~symba_util_spill_encounter -->
-<g id="call~~graph~~CallGraph_node523" class="node">
-<title>interface~symba_util_spill_encounter</title>
-<g id="a_call~~graph~~CallGraph_node523"><a xlink:href=".././interface/symba_util_spill_encounter.html" xlink:title="symba_util_spill_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="645.5,-1688 503.5,-1688 503.5,-1664 645.5,-1664 645.5,-1688"/>
-<text text-anchor="middle" x="574.5" y="-1673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_encounter</text>
+<!-- interface~whm_setup_pl -->
+<g id="call~~graph~~CallGraph_node567" class="node">
+<title>interface~whm_setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node567"><a xlink:href=".././interface/whm_setup_pl.html" xlink:title="whm_setup_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="615.5,-12291 533.5,-12291 533.5,-12267 615.5,-12267 615.5,-12291"/>
+<text text-anchor="middle" x="574.5" y="-12276.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_spill_encounter&#45;&gt;proc~symba_util_spill_encounter -->
-<g id="call~~graph~~CallGraph_edge507" class="edge">
-<title>interface~symba_util_spill_encounter&#45;&gt;proc~symba_util_spill_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.63,-1670.4C680.12,-1667.65 721.86,-1664.31 757.68,-1661.45"/>
-<polygon fill="#000000" stroke="#000000" points="758.42,-1664.91 768.11,-1660.62 757.86,-1657.93 758.42,-1664.91"/>
+<!-- proc~whm_setup_pl -->
+<g id="call~~graph~~CallGraph_node596" class="node">
+<title>proc~whm_setup_pl</title>
+<g id="a_call~~graph~~CallGraph_node596"><a xlink:href=".././proc/whm_setup_pl.html" xlink:title="whm_setup_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="880.5,-12291 798.5,-12291 798.5,-12267 880.5,-12267 880.5,-12291"/>
+<text text-anchor="middle" x="839.5" y="-12276.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_pl</text>
+</a>
 </g>
-<!-- interface~symba_util_spill_tp -->
-<g id="call~~graph~~CallGraph_node524" class="node">
-<title>interface~symba_util_spill_tp</title>
-<g id="a_call~~graph~~CallGraph_node524"><a xlink:href=".././interface/symba_util_spill_tp.html" xlink:title="symba_util_spill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="626,-1562 523,-1562 523,-1538 626,-1538 626,-1562"/>
-<text text-anchor="middle" x="574.5" y="-1547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_spill_tp</text>
+</g>
+<!-- interface~whm_setup_pl&#45;&gt;proc~whm_setup_pl -->
+<g id="call~~graph~~CallGraph_edge527" class="edge">
+<title>interface~whm_setup_pl&#45;&gt;proc~whm_setup_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.73,-12279C661.94,-12279 737.83,-12279 787.98,-12279"/>
+<polygon fill="#000000" stroke="#000000" points="788.27,-12282.5 798.27,-12279 788.27,-12275.5 788.27,-12282.5"/>
+</g>
+<!-- interface~util_index_eucl_plpl -->
+<g id="call~~graph~~CallGraph_node568" class="node">
+<title>interface~util_index_eucl_plpl</title>
+<g id="a_call~~graph~~CallGraph_node568"><a xlink:href=".././interface/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
+<polygon fill="#a7506f" stroke="#a7506f" points="150,-10359 44,-10359 44,-10335 150,-10335 150,-10359"/>
+<text text-anchor="middle" x="97" y="-10344.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_util_spill_tp&#45;&gt;proc~symba_util_spill_tp -->
-<g id="call~~graph~~CallGraph_edge508" class="edge">
-<title>interface~symba_util_spill_tp&#45;&gt;proc~symba_util_spill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.21,-1550C669.51,-1550 731.88,-1550 777.82,-1550"/>
-<polygon fill="#000000" stroke="#000000" points="777.95,-1553.5 787.95,-1550 777.95,-1546.5 777.95,-1553.5"/>
+<!-- interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl -->
+<g id="call~~graph~~CallGraph_edge528" class="edge">
+<title>interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-10347C183.76,-10347 227.89,-10347 263.52,-10347"/>
+<polygon fill="#000000" stroke="#000000" points="263.81,-10350.5 273.81,-10347 263.81,-10343.5 263.81,-10350.5"/>
 </g>
-<!-- proc~util_resize_encounter -->
-<g id="call~~graph~~CallGraph_node525" class="node">
-<title>proc~util_resize_encounter</title>
-<g id="a_call~~graph~~CallGraph_node525"><a xlink:href=".././proc/util_resize_encounter.html" xlink:title="util_resize_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="384.5,-13282 269.5,-13282 269.5,-13258 384.5,-13258 384.5,-13282"/>
-<text text-anchor="middle" x="327" y="-13267.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_encounter</text>
+<!-- interface~whm_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node569" class="node">
+<title>interface~whm_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node569"><a xlink:href=".././interface/whm_setup_initialize_system.html" xlink:title="whm_setup_initialize_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="172.5,-13509 21.5,-13509 21.5,-13485 172.5,-13485 172.5,-13509"/>
+<text text-anchor="middle" x="97" y="-13494.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- proc~util_get_energy_momentum_system -->
-<g id="call~~graph~~CallGraph_node526" class="node">
-<title>proc~util_get_energy_momentum_system</title>
-<g id="a_call~~graph~~CallGraph_node526"><a xlink:href=".././proc/util_get_energy_momentum_system.html" xlink:title="util_get_energy_momentum_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="420,-13324 234,-13324 234,-13300 420,-13300 420,-13324"/>
-<text text-anchor="middle" x="327" y="-13309.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum_system</text>
+<!-- proc~whm_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node609" class="node">
+<title>proc~whm_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node609"><a xlink:href=".././proc/whm_setup_initialize_system.html" xlink:title="whm_setup_initialize_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="402.5,-13509 251.5,-13509 251.5,-13485 402.5,-13485 402.5,-13509"/>
+<text text-anchor="middle" x="327" y="-13494.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup_initialize_system</text>
 </a>
 </g>
 </g>
-<!-- proc~helio_drift_pl&#45;&gt;interface~helio_drift_body -->
-<g id="call~~graph~~CallGraph_edge509" class="edge">
-<title>proc~helio_drift_pl&#45;&gt;interface~helio_drift_body</title>
-<path fill="none" stroke="#000000" d="M363.7,-536.05C404.83,-539.57 472.83,-545.39 520.23,-549.44"/>
-<polygon fill="#000000" stroke="#000000" points="520.05,-552.94 530.31,-550.31 520.65,-545.97 520.05,-552.94"/>
-</g>
-<!-- proc~helio_drift_tp&#45;&gt;interface~helio_drift_body -->
-<g id="call~~graph~~CallGraph_edge510" class="edge">
-<title>proc~helio_drift_tp&#45;&gt;interface~helio_drift_body</title>
-<path fill="none" stroke="#000000" d="M364.22,-571.9C405.35,-568.38 472.86,-562.61 520.04,-558.57"/>
-<polygon fill="#000000" stroke="#000000" points="520.42,-562.05 530.08,-557.71 519.82,-555.08 520.42,-562.05"/>
+<!-- interface~whm_setup_initialize_system&#45;&gt;proc~whm_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge529" class="edge">
+<title>interface~whm_setup_initialize_system&#45;&gt;proc~whm_setup_initialize_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.66,-13497C194.5,-13497 218.55,-13497 240.99,-13497"/>
+<polygon fill="#000000" stroke="#000000" points="241.18,-13500.5 251.18,-13497 241.18,-13493.5 241.18,-13500.5"/>
 </g>
-<!-- proc~util_resize_body -->
-<g id="call~~graph~~CallGraph_node529" class="node">
-<title>proc~util_resize_body</title>
-<g id="a_call~~graph~~CallGraph_node529"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="884.5,-6362 794.5,-6362 794.5,-6338 884.5,-6338 884.5,-6362"/>
-<text text-anchor="middle" x="839.5" y="-6347.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<!-- interface~util_index_eucl_pltp -->
+<g id="call~~graph~~CallGraph_node570" class="node">
+<title>interface~util_index_eucl_pltp</title>
+<g id="a_call~~graph~~CallGraph_node570"><a xlink:href=".././interface/util_index_eucl_pltp.html" xlink:title="util_index_eucl_pltp">
+<polygon fill="#a7506f" stroke="#a7506f" points="150,-10527 44,-10527 44,-10503 150,-10503 150,-10527"/>
+<text text-anchor="middle" x="97" y="-10512.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_pltp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_edge511" class="edge">
-<title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M884.58,-6356.11C906.12,-6360.08 932.07,-6366.36 954,-6376 999.66,-6396.06 1046.06,-6431.69 1072.17,-6453.45"/>
-<polygon fill="#000000" stroke="#000000" points="1070.01,-6456.2 1079.91,-6459.98 1074.53,-6450.86 1070.01,-6456.2"/>
-</g>
-<!-- proc~io_write_encounter&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge513" class="edge">
-<title>proc~io_write_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M891.01,-2384.28C912.71,-2386.11 936.96,-2391.94 954,-2407 1019.66,-2465.02 1074.75,-2744.6 1089.58,-2825.83"/>
-<polygon fill="#000000" stroke="#000000" points="1086.18,-2826.71 1091.4,-2835.93 1093.07,-2825.47 1086.18,-2826.71"/>
-</g>
-<!-- ind2 -->
-<g id="call~~graph~~CallGraph_node690" class="node">
-<title>ind2</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-2440 1067.5,-2440 1067.5,-2416 1121.5,-2416 1121.5,-2440"/>
-<text text-anchor="middle" x="1094.5" y="-2425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ind2</text>
+<!-- interface~util_index_eucl_pltp&#45;&gt;proc~util_index_eucl_pltp -->
+<g id="call~~graph~~CallGraph_edge530" class="edge">
+<title>interface~util_index_eucl_pltp&#45;&gt;proc~util_index_eucl_pltp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-10515C183.76,-10515 227.89,-10515 263.52,-10515"/>
+<polygon fill="#000000" stroke="#000000" points="263.81,-10518.5 273.81,-10515 263.81,-10511.5 263.81,-10518.5"/>
 </g>
-<!-- proc~io_write_encounter&#45;&gt;ind2 -->
-<g id="call~~graph~~CallGraph_edge514" class="edge">
-<title>proc~io_write_encounter&#45;&gt;ind2</title>
-<path fill="none" stroke="#000000" d="M891.09,-2394.4C940.35,-2402.58 1013.98,-2414.8 1057.54,-2422.03"/>
-<polygon fill="#000000" stroke="#000000" points="1056.97,-2425.48 1067.4,-2423.67 1058.11,-2418.58 1056.97,-2425.48"/>
+<!-- interface~whm_step_pl -->
+<g id="call~~graph~~CallGraph_node572" class="node">
+<title>interface~whm_step_pl</title>
+<g id="a_call~~graph~~CallGraph_node572"><a xlink:href=".././interface/whm_step_pl.html" xlink:title="whm_step_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="135,-9510 59,-9510 59,-9486 135,-9486 135,-9510"/>
+<text text-anchor="middle" x="97" y="-9495.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_pl</text>
+</a>
 </g>
-<!-- ind1 -->
-<g id="call~~graph~~CallGraph_node759" class="node">
-<title>ind1</title>
-<polygon fill="#777777" stroke="#777777" points="1121.5,-2398 1067.5,-2398 1067.5,-2374 1121.5,-2374 1121.5,-2398"/>
-<text text-anchor="middle" x="1094.5" y="-2383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ind1</text>
 </g>
-<!-- proc~io_write_encounter&#45;&gt;ind1 -->
-<g id="call~~graph~~CallGraph_edge512" class="edge">
-<title>proc~io_write_encounter&#45;&gt;ind1</title>
-<path fill="none" stroke="#000000" d="M891.09,-2386C940.25,-2386 1013.67,-2386 1057.26,-2386"/>
-<polygon fill="#000000" stroke="#000000" points="1057.4,-2389.5 1067.4,-2386 1057.4,-2382.5 1057.4,-2389.5"/>
+<!-- interface~whm_step_pl&#45;&gt;proc~whm_step_pl -->
+<g id="call~~graph~~CallGraph_edge531" class="edge">
+<title>interface~whm_step_pl&#45;&gt;proc~whm_step_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-9498C174.31,-9498 236.14,-9498 278.75,-9498"/>
+<polygon fill="#000000" stroke="#000000" points="278.88,-9501.5 288.88,-9498 278.88,-9494.5 278.88,-9501.5"/>
 </g>
-<!-- proc~util_resize_tp -->
-<g id="call~~graph~~CallGraph_node532" class="node">
-<title>proc~util_resize_tp</title>
-<g id="a_call~~graph~~CallGraph_node532"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="365,-6383 289,-6383 289,-6359 365,-6359 365,-6383"/>
-<text text-anchor="middle" x="327" y="-6368.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<!-- interface~gr_kick_getaccb_ns_body -->
+<g id="call~~graph~~CallGraph_node573" class="node">
+<title>interface~gr_kick_getaccb_ns_body</title>
+<g id="a_call~~graph~~CallGraph_node573"><a xlink:href=".././interface/gr_kick_getaccb_ns_body.html" xlink:title="gr_kick_getaccb_ns_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="165,-11367 29,-11367 29,-11343 165,-11343 165,-11367"/>
+<text text-anchor="middle" x="97" y="-11352.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getaccb_ns_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_edge516" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M365.11,-6371.49C481.98,-6373.32 841.3,-6381.13 954,-6409 993.92,-6418.87 1036.55,-6439.83 1064.03,-6454.86"/>
-<polygon fill="#000000" stroke="#000000" points="1062.65,-6458.1 1073.09,-6459.91 1066.06,-6451.98 1062.65,-6458.1"/>
+<!-- interface~gr_kick_getaccb_ns_body&#45;&gt;proc~gr_kick_getaccb_ns_body -->
+<g id="call~~graph~~CallGraph_edge532" class="edge">
+<title>interface~gr_kick_getaccb_ns_body&#45;&gt;proc~gr_kick_getaccb_ns_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.17,-11355C191.38,-11355 221.58,-11355 248.69,-11355"/>
+<polygon fill="#000000" stroke="#000000" points="248.91,-11358.5 258.91,-11355 248.91,-11351.5 248.91,-11358.5"/>
 </g>
-<!-- interface~util_resize_body -->
-<g id="call~~graph~~CallGraph_node570" class="node">
-<title>interface~util_resize_body</title>
-<g id="a_call~~graph~~CallGraph_node570"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="619.5,-6362 529.5,-6362 529.5,-6338 619.5,-6338 619.5,-6362"/>
-<text text-anchor="middle" x="574.5" y="-6347.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<!-- proc~tides_derivs_eval -->
+<g id="call~~graph~~CallGraph_node575" class="node">
+<title>proc~tides_derivs_eval</title>
+<g id="a_call~~graph~~CallGraph_node575"><a xlink:href=".././proc/tides_derivs_eval.html" xlink:title="tides_derivs_eval">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="144.5,-13561 49.5,-13561 49.5,-13537 144.5,-13537 144.5,-13561"/>
+<text text-anchor="middle" x="97" y="-13546.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_derivs_eval</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
-<g id="call~~graph~~CallGraph_edge515" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M365.02,-6367.83C405.95,-6364.33 472.29,-6358.66 519.12,-6354.65"/>
-<polygon fill="#000000" stroke="#000000" points="519.43,-6358.14 529.1,-6353.8 518.84,-6351.16 519.43,-6358.14"/>
+<!-- interface~whm_step_system -->
+<g id="call~~graph~~CallGraph_node576" class="node">
+<title>interface~whm_step_system</title>
+<g id="a_call~~graph~~CallGraph_node576"><a xlink:href=".././interface/whm_step_system.html" xlink:title="whm_step_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="147.5,-9090 46.5,-9090 46.5,-9066 147.5,-9066 147.5,-9090"/>
+<text text-anchor="middle" x="97" y="-9075.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+</a>
 </g>
-<!-- fraggle_io_log_pl -->
-<g id="call~~graph~~CallGraph_node731" class="node">
-<title>fraggle_io_log_pl</title>
-<polygon fill="#777777" stroke="#777777" points="1787,-325 1693,-325 1693,-301 1787,-301 1787,-325"/>
-<text text-anchor="middle" x="1740" y="-310.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
 </g>
-<!-- proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl -->
-<g id="call~~graph~~CallGraph_edge517" class="edge">
-<title>proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl</title>
-<path fill="none" stroke="#000000" d="M1648.79,-313C1660.15,-313 1671.64,-313 1682.45,-313"/>
-<polygon fill="#000000" stroke="#000000" points="1682.57,-316.5 1692.57,-313 1682.57,-309.5 1682.57,-316.5"/>
+<!-- interface~whm_step_system&#45;&gt;proc~whm_step_system -->
+<g id="call~~graph~~CallGraph_edge533" class="edge">
+<title>interface~whm_step_system&#45;&gt;proc~whm_step_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.75,-9078C182.61,-9078 229.35,-9078 266.23,-9078"/>
+<polygon fill="#000000" stroke="#000000" points="266.35,-9081.5 276.35,-9078 266.35,-9074.5 266.35,-9081.5"/>
 </g>
-<!-- proc~util_resize_pl -->
-<g id="call~~graph~~CallGraph_node534" class="node">
-<title>proc~util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node534"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="364.5,-6331 289.5,-6331 289.5,-6307 364.5,-6307 364.5,-6331"/>
-<text text-anchor="middle" x="327" y="-6316.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<!-- interface~gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_node577" class="node">
+<title>interface~gr_kick_getacch</title>
+<g id="a_call~~graph~~CallGraph_node577"><a xlink:href=".././interface/gr_kick_getacch.html" xlink:title="gr_kick_getacch">
+<polygon fill="#a7506f" stroke="#a7506f" points="142,-12501 52,-12501 52,-12477 142,-12477 142,-12501"/>
+<text text-anchor="middle" x="97" y="-12486.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
-<g id="call~~graph~~CallGraph_edge519" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M364.81,-6315.97C482.36,-6306.85 847.32,-6283.03 954,-6329 984.52,-6342.15 1047.52,-6415.75 1077.27,-6451.92"/>
-<polygon fill="#000000" stroke="#000000" points="1074.71,-6454.32 1083.75,-6459.85 1080.13,-6449.89 1074.71,-6454.32"/>
-</g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
-<g id="call~~graph~~CallGraph_edge518" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M364.75,-6323.64C405.75,-6328.82 472.48,-6337.24 519.43,-6343.17"/>
-<polygon fill="#000000" stroke="#000000" points="519.07,-6346.65 529.43,-6344.43 519.94,-6339.71 519.07,-6346.65"/>
+<!-- interface~gr_kick_getacch&#45;&gt;proc~gr_kick_getacch -->
+<g id="call~~graph~~CallGraph_edge534" class="edge">
+<title>interface~gr_kick_getacch&#45;&gt;proc~gr_kick_getacch</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-12489C179.28,-12489 232.3,-12489 271.88,-12489"/>
+<polygon fill="#000000" stroke="#000000" points="271.89,-12492.5 281.89,-12489 271.89,-12485.5 271.89,-12492.5"/>
 </g>
-<!-- proc~discard_cb_tp -->
-<g id="call~~graph~~CallGraph_node539" class="node">
-<title>proc~discard_cb_tp</title>
-<g id="a_call~~graph~~CallGraph_node539"><a xlink:href=".././proc/discard_cb_tp.html" xlink:title="discard_cb_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="136.5,-13366 57.5,-13366 57.5,-13342 136.5,-13342 136.5,-13366"/>
-<text text-anchor="middle" x="97" y="-13351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_cb_tp</text>
+<!-- interface~whm_step_tp -->
+<g id="call~~graph~~CallGraph_node578" class="node">
+<title>interface~whm_step_tp</title>
+<g id="a_call~~graph~~CallGraph_node578"><a xlink:href=".././interface/whm_step_tp.html" xlink:title="whm_step_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="135,-9552 59,-9552 59,-9528 135,-9528 135,-9552"/>
+<text text-anchor="middle" x="97" y="-9537.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge520" class="edge">
-<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M895.74,-3226.66C915.98,-3224.29 937.86,-3218.34 954,-3205 1061.42,-3116.23 1086.45,-2933.78 1092,-2870.33"/>
-<polygon fill="#000000" stroke="#000000" points="1095.49,-2870.49 1092.8,-2860.24 1088.52,-2869.93 1095.49,-2870.49"/>
+<!-- interface~whm_step_tp&#45;&gt;proc~whm_step_tp -->
+<g id="call~~graph~~CallGraph_edge535" class="edge">
+<title>interface~whm_step_tp&#45;&gt;proc~whm_step_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-9540C174.31,-9540 236.14,-9540 278.75,-9540"/>
+<polygon fill="#000000" stroke="#000000" points="278.88,-9543.5 288.88,-9540 278.88,-9536.5 278.88,-9543.5"/>
 </g>
-<!-- interface~lambda_obj -->
-<g id="call~~graph~~CallGraph_node543" class="node">
-<title>interface~lambda_obj</title>
-<g id="a_call~~graph~~CallGraph_node543"><a xlink:href=".././interface/lambda_obj.html" xlink:title="lambda_obj">
-<polygon fill="#a7506f" stroke="#a7506f" points="131,-10388 63,-10388 63,-10364 131,-10364 131,-10388"/>
-<text text-anchor="middle" x="97" y="-10373.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
+<!-- interface~gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_node579" class="node">
+<title>interface~gr_p4_pos_kick</title>
+<g id="a_call~~graph~~CallGraph_node579"><a xlink:href=".././interface/gr_p4_pos_kick.html" xlink:title="gr_p4_pos_kick">
+<polygon fill="#a7506f" stroke="#a7506f" points="141,-12459 53,-12459 53,-12435 141,-12435 141,-12459"/>
+<text text-anchor="middle" x="97" y="-12444.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_p4_pos_kick</text>
 </a>
 </g>
 </g>
-<!-- interface~lambda_obj&#45;&gt;proc~tides_derivs_init -->
-<g id="call~~graph~~CallGraph_edge521" class="edge">
-<title>interface~lambda_obj&#45;&gt;proc~tides_derivs_init</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.15,-10376C168.08,-10376 228.34,-10376 272.08,-10376"/>
-<polygon fill="#000000" stroke="#000000" points="272.26,-10379.5 282.26,-10376 272.26,-10372.5 272.26,-10379.5"/>
+<!-- interface~gr_p4_pos_kick&#45;&gt;proc~gr_p4_pos_kick -->
+<g id="call~~graph~~CallGraph_edge536" class="edge">
+<title>interface~gr_p4_pos_kick&#45;&gt;proc~gr_p4_pos_kick</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.15,-12447C178.44,-12447 232.49,-12447 272.52,-12447"/>
+<polygon fill="#000000" stroke="#000000" points="272.64,-12450.5 282.64,-12447 272.64,-12443.5 272.64,-12450.5"/>
 </g>
-<!-- proc~whm_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch -->
-<g id="call~~graph~~CallGraph_edge522" class="edge">
-<title>proc~whm_gr_kick_getacch_pl&#45;&gt;gr_kick_getacch</title>
-<path fill="none" stroke="#000000" d="M385.49,-7447C398.21,-7444.18 411.59,-7441.1 424,-7438 457.23,-7429.71 494.29,-7419.3 523.2,-7410.92"/>
-<polygon fill="#000000" stroke="#000000" points="524.44,-7414.21 533.06,-7408.05 522.48,-7407.49 524.44,-7414.21"/>
+<!-- interface~whm_util_append_pl -->
+<g id="call~~graph~~CallGraph_node580" class="node">
+<title>interface~whm_util_append_pl</title>
+<g id="a_call~~graph~~CallGraph_node580"><a xlink:href=".././interface/whm_util_append_pl.html" xlink:title="whm_util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="630,-2723 519,-2723 519,-2699 630,-2699 630,-2723"/>
+<text text-anchor="middle" x="574.5" y="-2708.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
+</a>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;vj -->
-<g id="call~~graph~~CallGraph_edge523" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;vj</title>
-<path fill="none" stroke="#000000" d="M378.57,-6913C425.8,-6913 495.14,-6913 537.13,-6913"/>
-<polygon fill="#000000" stroke="#000000" points="537.19,-6916.5 547.19,-6913 537.19,-6909.5 537.19,-6916.5"/>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;xh -->
-<g id="call~~graph~~CallGraph_edge526" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;xh</title>
-<path fill="none" stroke="#000000" d="M348.78,-6925.04C374.21,-6939.26 418.94,-6962.66 460,-6976 485.17,-6984.18 514.58,-6989.51 537.16,-6992.75"/>
-<polygon fill="#000000" stroke="#000000" points="536.94,-6996.25 547.33,-6994.14 537.89,-6989.32 536.94,-6996.25"/>
+<!-- interface~whm_util_append_pl&#45;&gt;proc~whm_util_append_pl -->
+<g id="call~~graph~~CallGraph_edge537" class="edge">
+<title>interface~whm_util_append_pl&#45;&gt;proc~whm_util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.31,-2711C672.07,-2711 729.69,-2711 773.73,-2711"/>
+<polygon fill="#000000" stroke="#000000" points="773.76,-2714.5 783.76,-2711 773.76,-2707.5 773.76,-2714.5"/>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;xj -->
-<g id="call~~graph~~CallGraph_edge525" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;xj</title>
-<path fill="none" stroke="#000000" d="M378.57,-6921.65C425.8,-6929.73 495.14,-6941.59 537.13,-6948.78"/>
-<polygon fill="#000000" stroke="#000000" points="536.74,-6952.26 547.19,-6950.5 537.92,-6945.36 536.74,-6952.26"/>
+<!-- interface~gr_pseudovel2vel -->
+<g id="call~~graph~~CallGraph_node581" class="node">
+<title>interface~gr_pseudovel2vel</title>
+<g id="a_call~~graph~~CallGraph_node581"><a xlink:href=".././interface/gr_pseudovel2vel.html" xlink:title="gr_pseudovel2vel">
+<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-12669 48.5,-12669 48.5,-12645 145.5,-12645 145.5,-12669"/>
+<text text-anchor="middle" x="97" y="-12654.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pseudovel2vel</text>
+</a>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;eta -->
-<g id="call~~graph~~CallGraph_edge528" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;eta</title>
-<path fill="none" stroke="#000000" d="M378.57,-6904.35C425.8,-6896.27 495.14,-6884.41 537.13,-6877.22"/>
-<polygon fill="#000000" stroke="#000000" points="537.92,-6880.64 547.19,-6875.5 536.74,-6873.74 537.92,-6880.64"/>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;gmpl -->
-<g id="call~~graph~~CallGraph_edge527" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;gmpl</title>
-<path fill="none" stroke="#000000" d="M378.63,-6908.2C393.99,-6905.14 410.38,-6900.14 424,-6892 445.1,-6879.39 438.7,-6862.27 460,-6850 483.49,-6836.47 513.85,-6831.38 537.26,-6829.58"/>
-<polygon fill="#000000" stroke="#000000" points="537.7,-6833.06 547.47,-6828.97 537.28,-6826.07 537.7,-6833.06"/>
+<!-- interface~gr_pseudovel2vel&#45;&gt;proc~gr_pseudovel2vel -->
+<g id="call~~graph~~CallGraph_edge538" class="edge">
+<title>interface~gr_pseudovel2vel&#45;&gt;proc~gr_pseudovel2vel</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-12657C181.07,-12657 229.87,-12657 267.77,-12657"/>
+<polygon fill="#000000" stroke="#000000" points="268.15,-12660.5 278.15,-12657 268.15,-12653.5 268.15,-12660.5"/>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;vh -->
-<g id="call~~graph~~CallGraph_edge524" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;vh</title>
-<path fill="none" stroke="#000000" d="M378.83,-6910.87C394.72,-6907.99 411.37,-6902.43 424,-6892 455.31,-6866.13 428.28,-6833.36 460,-6808 481.54,-6790.78 512.73,-6786 536.96,-6785.27"/>
-<polygon fill="#000000" stroke="#000000" points="537.24,-6788.77 547.21,-6785.18 537.18,-6781.77 537.24,-6788.77"/>
+<!-- interface~whm_util_spill_pl -->
+<g id="call~~graph~~CallGraph_node583" class="node">
+<title>interface~whm_util_spill_pl</title>
+<g id="a_call~~graph~~CallGraph_node583"><a xlink:href=".././interface/whm_util_spill_pl.html" xlink:title="whm_util_spill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="621,-3055 528,-3055 528,-3031 621,-3031 621,-3055"/>
+<text text-anchor="middle" x="574.5" y="-3040.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
+</a>
 </g>
-<!-- proc~discard_peri_tp -->
-<g id="call~~graph~~CallGraph_node546" class="node">
-<title>proc~discard_peri_tp</title>
-<g id="a_call~~graph~~CallGraph_node546"><a xlink:href=".././proc/discard_peri_tp.html" xlink:title="discard_peri_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="140,-13408 54,-13408 54,-13384 140,-13384 140,-13408"/>
-<text text-anchor="middle" x="97" y="-13393.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_peri_tp</text>
+</g>
+<!-- interface~whm_util_spill_pl&#45;&gt;proc~whm_util_spill_pl -->
+<g id="call~~graph~~CallGraph_edge539" class="edge">
+<title>interface~whm_util_spill_pl&#45;&gt;proc~whm_util_spill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.01,-3043C665.8,-3043 734.29,-3043 782.42,-3043"/>
+<polygon fill="#000000" stroke="#000000" points="782.66,-3046.5 792.66,-3043 782.66,-3039.5 782.66,-3046.5"/>
+</g>
+<!-- interface~gr_pv2vh_body -->
+<g id="call~~graph~~CallGraph_node584" class="node">
+<title>interface~gr_pv2vh_body</title>
+<g id="a_call~~graph~~CallGraph_node584"><a xlink:href=".././interface/gr_pv2vh_body.html" xlink:title="gr_pv2vh_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="140,-10989 54,-10989 54,-10965 140,-10965 140,-10989"/>
+<text text-anchor="middle" x="97" y="-10974.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_pv2vh_body</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vj -->
-<g id="call~~graph~~CallGraph_edge531" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;vj</title>
-<path fill="none" stroke="#000000" d="M383.62,-6834.86C397.48,-6837.97 411.85,-6842.73 424,-6850 445.1,-6862.61 438.7,-6879.73 460,-6892 483.49,-6905.53 513.85,-6910.62 537.26,-6912.42"/>
-<polygon fill="#000000" stroke="#000000" points="537.28,-6915.93 547.47,-6913.03 537.7,-6908.94 537.28,-6915.93"/>
+<!-- interface~gr_pv2vh_body&#45;&gt;proc~gr_pv2vh_body -->
+<g id="call~~graph~~CallGraph_edge540" class="edge">
+<title>interface~gr_pv2vh_body&#45;&gt;proc~gr_pv2vh_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.08,-10977C177.73,-10977 233.05,-10977 273.55,-10977"/>
+<polygon fill="#000000" stroke="#000000" points="273.78,-10980.5 283.78,-10977 273.78,-10973.5 273.78,-10980.5"/>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;eta -->
-<g id="call~~graph~~CallGraph_edge530" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;eta</title>
-<path fill="none" stroke="#000000" d="M383.71,-6838.53C430.82,-6846.59 496.94,-6857.9 537.41,-6864.82"/>
-<polygon fill="#000000" stroke="#000000" points="536.91,-6868.29 547.36,-6866.53 538.1,-6861.39 536.91,-6868.29"/>
+<!-- interface~util_solve_rkf45 -->
+<g id="call~~graph~~CallGraph_node585" class="node">
+<title>interface~util_solve_rkf45</title>
+<g id="a_call~~graph~~CallGraph_node585"><a xlink:href=".././interface/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
+<polygon fill="#a7506f" stroke="#a7506f" points="618,-995 531,-995 531,-971 618,-971 618,-995"/>
+<text text-anchor="middle" x="574.5" y="-980.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
+</a>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;gmpl -->
-<g id="call~~graph~~CallGraph_edge529" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;gmpl</title>
-<path fill="none" stroke="#000000" d="M383.71,-6829C430.72,-6829 496.66,-6829 537.15,-6829"/>
-<polygon fill="#000000" stroke="#000000" points="537.36,-6832.5 547.36,-6829 537.36,-6825.5 537.36,-6832.5"/>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vh -->
-<g id="call~~graph~~CallGraph_edge532" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;vh</title>
-<path fill="none" stroke="#000000" d="M383.71,-6819.47C430.82,-6811.41 496.94,-6800.1 537.41,-6793.18"/>
-<polygon fill="#000000" stroke="#000000" points="538.1,-6796.61 547.36,-6791.47 536.91,-6789.71 538.1,-6796.61"/>
+<!-- interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45 -->
+<g id="call~~graph~~CallGraph_edge541" class="edge">
+<title>interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.05,-983C663.65,-983 736.13,-983 785.43,-983"/>
+<polygon fill="#000000" stroke="#000000" points="785.58,-986.5 795.58,-983 785.58,-979.5 785.58,-986.5"/>
 </g>
-<!-- proc~util_set_mu_pl -->
-<g id="call~~graph~~CallGraph_node548" class="node">
-<title>proc~util_set_mu_pl</title>
-<g id="a_call~~graph~~CallGraph_node548"><a xlink:href=".././proc/util_set_mu_pl.html" xlink:title="util_set_mu_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="368,-13450 286,-13450 286,-13426 368,-13426 368,-13450"/>
-<text text-anchor="middle" x="327" y="-13435.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_pl</text>
+<!-- interface~whm_util_fill_pl -->
+<g id="call~~graph~~CallGraph_node586" class="node">
+<title>interface~whm_util_fill_pl</title>
+<g id="a_call~~graph~~CallGraph_node586"><a xlink:href=".././interface/whm_util_fill_pl.html" xlink:title="whm_util_fill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="617,-2307 532,-2307 532,-2283 617,-2283 617,-2307"/>
+<text text-anchor="middle" x="574.5" y="-2292.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_set_ir3h -->
-<g id="call~~graph~~CallGraph_node549" class="node">
-<title>proc~util_set_ir3h</title>
-<g id="a_call~~graph~~CallGraph_node549"><a xlink:href=".././proc/util_set_ir3h.html" xlink:title="util_set_ir3h">
-<polygon fill="#d9534f" stroke="#d9534f" points="362,-13492 292,-13492 292,-13468 362,-13468 362,-13492"/>
-<text text-anchor="middle" x="327" y="-13477.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_ir3h</text>
+<!-- interface~whm_util_fill_pl&#45;&gt;proc~whm_util_fill_pl -->
+<g id="call~~graph~~CallGraph_edge542" class="edge">
+<title>interface~whm_util_fill_pl&#45;&gt;proc~whm_util_fill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.17,-2295.63C663.01,-2296.33 736.75,-2297.45 786.38,-2298.21"/>
+<polygon fill="#000000" stroke="#000000" points="786.54,-2301.71 796.59,-2298.36 786.64,-2294.71 786.54,-2301.71"/>
+</g>
+<!-- interface~gr_vel2pseudovel -->
+<g id="call~~graph~~CallGraph_node587" class="node">
+<title>interface~gr_vel2pseudovel</title>
+<g id="a_call~~graph~~CallGraph_node587"><a xlink:href=".././interface/gr_vel2pseudovel.html" xlink:title="gr_vel2pseudovel">
+<polygon fill="#a7506f" stroke="#a7506f" points="145.5,-11115 48.5,-11115 48.5,-11091 145.5,-11091 145.5,-11115"/>
+<text text-anchor="middle" x="97" y="-11100.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vel2pseudovel</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge533" class="edge">
-<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M889.66,-2426.42C911.61,-2428.19 936.43,-2433.94 954,-2449 1072.21,-2550.34 1090.3,-2757.8 1093.03,-2825.85"/>
-<polygon fill="#000000" stroke="#000000" points="1089.53,-2825.99 1093.36,-2835.87 1096.53,-2825.76 1089.53,-2825.99"/>
+<!-- interface~gr_vel2pseudovel&#45;&gt;proc~gr_vel2pseudovel -->
+<g id="call~~graph~~CallGraph_edge543" class="edge">
+<title>interface~gr_vel2pseudovel&#45;&gt;proc~gr_vel2pseudovel</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.52,-11103C181.07,-11103 229.87,-11103 267.77,-11103"/>
+<polygon fill="#000000" stroke="#000000" points="268.15,-11106.5 278.15,-11103 268.15,-11099.5 268.15,-11106.5"/>
 </g>
-<!-- proc~util_set_msys -->
-<g id="call~~graph~~CallGraph_node551" class="node">
-<title>proc~util_set_msys</title>
-<g id="a_call~~graph~~CallGraph_node551"><a xlink:href=".././proc/util_set_msys.html" xlink:title="util_set_msys">
-<polygon fill="#d9534f" stroke="#d9534f" points="365.5,-13534 288.5,-13534 288.5,-13510 365.5,-13510 365.5,-13534"/>
-<text text-anchor="middle" x="327" y="-13519.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_msys</text>
+<!-- interface~whm_util_resize_pl -->
+<g id="call~~graph~~CallGraph_node589" class="node">
+<title>interface~whm_util_resize_pl</title>
+<g id="a_call~~graph~~CallGraph_node589"><a xlink:href=".././interface/whm_util_resize_pl.html" xlink:title="whm_util_resize_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="626,-4902 523,-4902 523,-4878 626,-4878 626,-4902"/>
+<text text-anchor="middle" x="574.5" y="-4887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~tides_derivs_eval -->
-<g id="call~~graph~~CallGraph_node552" class="node">
-<title>proc~tides_derivs_eval</title>
-<g id="a_call~~graph~~CallGraph_node552"><a xlink:href=".././proc/tides_derivs_eval.html" xlink:title="tides_derivs_eval">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="144.5,-13576 49.5,-13576 49.5,-13552 144.5,-13552 144.5,-13576"/>
-<text text-anchor="middle" x="97" y="-13561.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_derivs_eval</text>
+<!-- interface~whm_util_resize_pl&#45;&gt;proc~whm_util_resize_pl -->
+<g id="call~~graph~~CallGraph_edge544" class="edge">
+<title>interface~whm_util_resize_pl&#45;&gt;proc~whm_util_resize_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.21,-4890C669.51,-4890 731.88,-4890 777.82,-4890"/>
+<polygon fill="#000000" stroke="#000000" points="777.95,-4893.5 787.95,-4890 777.95,-4886.5 777.95,-4893.5"/>
+</g>
+<!-- interface~gr_vh2pv_body -->
+<g id="call~~graph~~CallGraph_node590" class="node">
+<title>interface~gr_vh2pv_body</title>
+<g id="a_call~~graph~~CallGraph_node590"><a xlink:href=".././interface/gr_vh2pv_body.html" xlink:title="gr_vh2pv_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="140,-11199 54,-11199 54,-11175 140,-11175 140,-11199"/>
+<text text-anchor="middle" x="97" y="-11184.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr_vh2pv_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_set_mu_tp -->
-<g id="call~~graph~~CallGraph_node555" class="node">
-<title>proc~util_set_mu_tp</title>
-<g id="a_call~~graph~~CallGraph_node555"><a xlink:href=".././proc/util_set_mu_tp.html" xlink:title="util_set_mu_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="368,-13618 286,-13618 286,-13594 368,-13594 368,-13618"/>
-<text text-anchor="middle" x="327" y="-13603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_tp</text>
+<!-- interface~gr_vh2pv_body&#45;&gt;proc~gr_vh2pv_body -->
+<g id="call~~graph~~CallGraph_edge545" class="edge">
+<title>interface~gr_vh2pv_body&#45;&gt;proc~gr_vh2pv_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.08,-11187C177.73,-11187 233.05,-11187 273.55,-11187"/>
+<polygon fill="#000000" stroke="#000000" points="273.78,-11190.5 283.78,-11187 273.78,-11183.5 273.78,-11190.5"/>
+</g>
+<!-- interface~whm_util_set_ir3j -->
+<g id="call~~graph~~CallGraph_node592" class="node">
+<title>interface~whm_util_set_ir3j</title>
+<g id="a_call~~graph~~CallGraph_node592"><a xlink:href=".././interface/whm_util_set_ir3j.html" xlink:title="whm_util_set_ir3j">
+<polygon fill="#a7506f" stroke="#a7506f" points="144.5,-11157 49.5,-11157 49.5,-11133 144.5,-11133 144.5,-11157"/>
+<text text-anchor="middle" x="97" y="-11142.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_ir3j</text>
 </a>
 </g>
 </g>
-<!-- proc~io_conservation_report&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge534" class="edge">
-<title>proc~io_conservation_report&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M900.66,-2727.83C918.35,-2730.94 937.4,-2735.7 954,-2743 1002.08,-2764.13 1048.97,-2804.75 1074.27,-2828.8"/>
-<polygon fill="#000000" stroke="#000000" points="1072.07,-2831.55 1081.69,-2835.98 1076.94,-2826.52 1072.07,-2831.55"/>
+<!-- interface~whm_util_set_ir3j&#45;&gt;proc~whm_util_set_ir3j -->
+<g id="call~~graph~~CallGraph_edge546" class="edge">
+<title>interface~whm_util_set_ir3j&#45;&gt;proc~whm_util_set_ir3j</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.69,-11145C180.65,-11145 230.54,-11145 268.89,-11145"/>
+<polygon fill="#000000" stroke="#000000" points="269.37,-11148.5 279.37,-11145 269.37,-11141.5 269.37,-11148.5"/>
 </g>
-<!-- proc~discard_pl_tp -->
-<g id="call~~graph~~CallGraph_node560" class="node">
-<title>proc~discard_pl_tp</title>
-<g id="a_call~~graph~~CallGraph_node560"><a xlink:href=".././proc/discard_pl_tp.html" xlink:title="discard_pl_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="135,-13660 59,-13660 59,-13636 135,-13636 135,-13660"/>
-<text text-anchor="middle" x="97" y="-13645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl_tp</text>
+<!-- interface~io_conservation_report -->
+<g id="call~~graph~~CallGraph_node593" class="node">
+<title>interface~io_conservation_report</title>
+<g id="a_call~~graph~~CallGraph_node593"><a xlink:href=".././interface/io_conservation_report.html" xlink:title="io_conservation_report">
+<polygon fill="#a7506f" stroke="#a7506f" points="635.5,-785 513.5,-785 513.5,-761 635.5,-761 635.5,-785"/>
+<text text-anchor="middle" x="574.5" y="-770.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_encounter&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge535" class="edge">
-<title>proc~io_write_frame_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M908.29,-2685.4C923.95,-2688.56 940.09,-2693.45 954,-2701 1010.85,-2731.86 1057.99,-2794.21 1080.05,-2826.91"/>
-<polygon fill="#000000" stroke="#000000" points="1077.4,-2829.25 1085.84,-2835.66 1083.24,-2825.39 1077.4,-2829.25"/>
+<!-- interface~io_conservation_report&#45;&gt;proc~io_conservation_report -->
+<g id="call~~graph~~CallGraph_edge547" class="edge">
+<title>interface~io_conservation_report&#45;&gt;proc~io_conservation_report</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.51,-773C675,-773 726.86,-773 768.28,-773"/>
+<polygon fill="#000000" stroke="#000000" points="768.3,-776.5 778.3,-773 768.3,-769.5 768.3,-776.5"/>
 </g>
-<!-- proc~util_set_particle_info -->
-<g id="call~~graph~~CallGraph_node564" class="node">
-<title>proc~util_set_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node564"><a xlink:href=".././proc/util_set_particle_info.html" xlink:title="util_set_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="382,-13702 272,-13702 272,-13678 382,-13678 382,-13702"/>
-<text text-anchor="middle" x="327" y="-13687.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_particle_info</text>
+<!-- interface~whm_util_set_mu_eta_pl -->
+<g id="call~~graph~~CallGraph_node594" class="node">
+<title>interface~whm_util_set_mu_eta_pl</title>
+<g id="a_call~~graph~~CallGraph_node594"><a xlink:href=".././interface/whm_util_set_mu_eta_pl.html" xlink:title="whm_util_set_mu_eta_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="162.5,-13608 31.5,-13608 31.5,-13584 162.5,-13584 162.5,-13608"/>
+<text text-anchor="middle" x="97" y="-13593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_mu_eta_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_param&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge536" class="edge">
-<title>proc~io_dump_param&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M885.03,-2638.66C907.18,-2640.79 933.53,-2646.19 954,-2659 1020.48,-2700.58 1065.79,-2786.31 1084.23,-2826.42"/>
-<polygon fill="#000000" stroke="#000000" points="1081.15,-2828.1 1088.43,-2835.8 1087.53,-2825.24 1081.15,-2828.1"/>
+<!-- proc~whm_util_set_mu_eta_pl -->
+<g id="call~~graph~~CallGraph_node611" class="node">
+<title>proc~whm_util_set_mu_eta_pl</title>
+<g id="a_call~~graph~~CallGraph_node611"><a xlink:href=".././proc/whm_util_set_mu_eta_pl.html" xlink:title="whm_util_set_mu_eta_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="392.5,-13608 261.5,-13608 261.5,-13584 392.5,-13584 392.5,-13608"/>
+<text text-anchor="middle" x="327" y="-13593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_set_mu_eta_pl</text>
+</a>
 </g>
-<!-- proc~io_write_frame_system&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge537" class="edge">
-<title>proc~io_write_frame_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M901.01,-2597.76C919.3,-2600.67 938.59,-2606.34 954,-2617 1030.49,-2669.92 1072.24,-2779.69 1087.13,-2826.31"/>
-<polygon fill="#000000" stroke="#000000" points="1083.83,-2827.47 1090.13,-2835.99 1090.52,-2825.41 1083.83,-2827.47"/>
 </g>
-<!-- proc~symba_collision_resolve_plplenc&#45;&gt;fraggle_io_log_one_message -->
-<g id="call~~graph~~CallGraph_edge538" class="edge">
-<title>proc~symba_collision_resolve_plplenc&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M1373.02,-478.96C1413.14,-464.12 1481.42,-438.85 1525.48,-422.55"/>
-<polygon fill="#000000" stroke="#000000" points="1526.87,-425.77 1535.04,-419.01 1524.44,-419.2 1526.87,-425.77"/>
+<!-- interface~whm_util_set_mu_eta_pl&#45;&gt;proc~whm_util_set_mu_eta_pl -->
+<g id="call~~graph~~CallGraph_edge548" class="edge">
+<title>interface~whm_util_set_mu_eta_pl&#45;&gt;proc~whm_util_set_mu_eta_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M162.73,-13596C190.16,-13596 222.32,-13596 250.8,-13596"/>
+<polygon fill="#000000" stroke="#000000" points="251.11,-13599.5 261.11,-13596 251.11,-13592.5 251.11,-13599.5"/>
 </g>
-<!-- proc~util_set_rhill -->
-<g id="call~~graph~~CallGraph_node568" class="node">
-<title>proc~util_set_rhill</title>
-<g id="a_call~~graph~~CallGraph_node568"><a xlink:href=".././proc/util_set_rhill.html" xlink:title="util_set_rhill">
-<polygon fill="#d9534f" stroke="#d9534f" points="361.5,-13744 292.5,-13744 292.5,-13720 361.5,-13720 361.5,-13744"/>
-<text text-anchor="middle" x="327" y="-13729.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill</text>
+<!-- interface~io_dump_param -->
+<g id="call~~graph~~CallGraph_node595" class="node">
+<title>interface~io_dump_param</title>
+<g id="a_call~~graph~~CallGraph_node595"><a xlink:href=".././interface/io_dump_param.html" xlink:title="io_dump_param">
+<polygon fill="#a7506f" stroke="#a7506f" points="620,-701 529,-701 529,-677 620,-677 620,-701"/>
+<text text-anchor="middle" x="574.5" y="-686.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
 </a>
 </g>
 </g>
-<!-- proc~tides_spin_derivs -->
-<g id="call~~graph~~CallGraph_node569" class="node">
-<title>proc~tides_spin_derivs</title>
-<g id="a_call~~graph~~CallGraph_node569"><a xlink:href=".././proc/tides_spin_derivs.html" xlink:title="tides_spin_derivs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="144.5,-13786 49.5,-13786 49.5,-13762 144.5,-13762 144.5,-13786"/>
-<text text-anchor="middle" x="97" y="-13771.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_derivs</text>
+<!-- interface~io_dump_param&#45;&gt;proc~io_dump_param -->
+<g id="call~~graph~~CallGraph_edge549" class="edge">
+<title>interface~io_dump_param&#45;&gt;proc~io_dump_param</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.11,-689C665.27,-689 735.15,-689 783.66,-689"/>
+<polygon fill="#000000" stroke="#000000" points="783.67,-692.5 793.67,-689 783.67,-685.5 783.67,-692.5"/>
+</g>
+<!-- proc~whm_setup_pl&#45;&gt;setup_pl -->
+<g id="call~~graph~~CallGraph_edge550" class="edge">
+<title>proc~whm_setup_pl&#45;&gt;setup_pl</title>
+<path fill="none" stroke="#000000" d="M880.59,-12279C929.17,-12279 1010.31,-12279 1057.14,-12279"/>
+<polygon fill="#000000" stroke="#000000" points="1057.15,-12282.5 1067.15,-12279 1057.15,-12275.5 1057.15,-12282.5"/>
+</g>
+<!-- interface~whm_util_sort_pl -->
+<g id="call~~graph~~CallGraph_node597" class="node">
+<title>interface~whm_util_sort_pl</title>
+<g id="a_call~~graph~~CallGraph_node597"><a xlink:href=".././interface/whm_util_sort_pl.html" xlink:title="whm_util_sort_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="143.5,-9048 50.5,-9048 50.5,-9024 143.5,-9024 143.5,-9048"/>
+<text text-anchor="middle" x="97" y="-9033.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
-<g id="call~~graph~~CallGraph_edge539" class="edge">
-<title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.52,-6350C664.84,-6350 735.54,-6350 784.29,-6350"/>
-<polygon fill="#000000" stroke="#000000" points="784.34,-6353.5 794.34,-6350 784.34,-6346.5 784.34,-6353.5"/>
+<!-- interface~whm_util_sort_pl&#45;&gt;proc~whm_util_sort_pl -->
+<g id="call~~graph~~CallGraph_edge551" class="edge">
+<title>interface~whm_util_sort_pl&#45;&gt;proc~whm_util_sort_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.59,-9036C180.09,-9036 231.45,-9036 270.37,-9036"/>
+<polygon fill="#000000" stroke="#000000" points="270.49,-9039.5 280.49,-9036 270.49,-9032.5 270.49,-9039.5"/>
 </g>
-<!-- interface~util_resize_encounter -->
-<g id="call~~graph~~CallGraph_node572" class="node">
-<title>interface~util_resize_encounter</title>
-<g id="a_call~~graph~~CallGraph_node572"><a xlink:href=".././interface/util_resize_encounter.html" xlink:title="util_resize_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="154.5,-13282 39.5,-13282 39.5,-13258 154.5,-13258 154.5,-13282"/>
-<text text-anchor="middle" x="97" y="-13267.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_encounter</text>
+<!-- interface~io_dump_particle_info_base -->
+<g id="call~~graph~~CallGraph_node598" class="node">
+<title>interface~io_dump_particle_info_base</title>
+<g id="a_call~~graph~~CallGraph_node598"><a xlink:href=".././interface/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="648,-1369 501,-1369 501,-1345 648,-1345 648,-1369"/>
+<text text-anchor="middle" x="574.5" y="-1354.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- interface~util_resize_encounter&#45;&gt;proc~util_resize_encounter -->
-<g id="call~~graph~~CallGraph_edge540" class="edge">
-<title>interface~util_resize_encounter&#45;&gt;proc~util_resize_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M154.65,-13270C186.33,-13270 225.98,-13270 259.17,-13270"/>
-<polygon fill="#000000" stroke="#000000" points="259.24,-13273.5 269.24,-13270 259.24,-13266.5 259.24,-13273.5"/>
+<!-- interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base -->
+<g id="call~~graph~~CallGraph_edge552" class="edge">
+<title>interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M648.06,-1357C681.41,-1357 721.14,-1357 755.66,-1357"/>
+<polygon fill="#000000" stroke="#000000" points="755.72,-1360.5 765.72,-1357 755.72,-1353.5 755.72,-1360.5"/>
 </g>
-<!-- proc~util_set_rhill_approximate -->
-<g id="call~~graph~~CallGraph_node573" class="node">
-<title>proc~util_set_rhill_approximate</title>
-<g id="a_call~~graph~~CallGraph_node573"><a xlink:href=".././proc/util_set_rhill_approximate.html" xlink:title="util_set_rhill_approximate">
-<polygon fill="#d9534f" stroke="#d9534f" points="394,-13828 260,-13828 260,-13804 394,-13804 394,-13828"/>
-<text text-anchor="middle" x="327" y="-13813.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill_approximate</text>
+<!-- interface~whm_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_node599" class="node">
+<title>interface~whm_util_sort_rearrange_pl</title>
+<g id="a_call~~graph~~CallGraph_node599"><a xlink:href=".././interface/whm_util_sort_rearrange_pl.html" xlink:title="whm_util_sort_rearrange_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="170,-5416 24,-5416 24,-5392 170,-5392 170,-5416"/>
+<text text-anchor="middle" x="97" y="-5401.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_sort_rearrange_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_resize_pl -->
-<g id="call~~graph~~CallGraph_node574" class="node">
-<title>interface~util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node574"><a xlink:href=".././interface/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="134.5,-6331 59.5,-6331 59.5,-6307 134.5,-6307 134.5,-6331"/>
-<text text-anchor="middle" x="97" y="-6316.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<!-- interface~whm_util_sort_rearrange_pl&#45;&gt;proc~whm_util_sort_rearrange_pl -->
+<g id="call~~graph~~CallGraph_edge553" class="edge">
+<title>interface~whm_util_sort_rearrange_pl&#45;&gt;proc~whm_util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.14,-5404C193.54,-5404 219.68,-5404 243.76,-5404"/>
+<polygon fill="#000000" stroke="#000000" points="243.94,-5407.5 253.94,-5404 243.94,-5400.5 243.94,-5407.5"/>
+</g>
+<!-- interface~io_dump_particle_info -->
+<g id="call~~graph~~CallGraph_node600" class="node">
+<title>interface~io_dump_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node600"><a xlink:href=".././interface/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="633.5,-743 515.5,-743 515.5,-719 633.5,-719 633.5,-743"/>
+<text text-anchor="middle" x="574.5" y="-728.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~util_resize_pl&#45;&gt;proc~util_resize_pl -->
-<g id="call~~graph~~CallGraph_edge541" class="edge">
-<title>interface~util_resize_pl&#45;&gt;proc~util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.63,-6319C173.94,-6319 236.48,-6319 279.29,-6319"/>
-<polygon fill="#000000" stroke="#000000" points="279.46,-6322.5 289.46,-6319 279.46,-6315.5 279.46,-6322.5"/>
+<!-- interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info -->
+<g id="call~~graph~~CallGraph_edge554" class="edge">
+<title>interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.54,-731C673.79,-731 727.55,-731 769.92,-731"/>
+<polygon fill="#000000" stroke="#000000" points="770.15,-734.5 780.15,-731 770.15,-727.5 770.15,-734.5"/>
 </g>
-<!-- proc~whm_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch -->
-<g id="call~~graph~~CallGraph_edge542" class="edge">
-<title>proc~whm_gr_kick_getacch_tp&#45;&gt;gr_kick_getacch</title>
-<path fill="none" stroke="#000000" d="M385.49,-7345C398.21,-7347.82 411.59,-7350.9 424,-7354 457.23,-7362.29 494.29,-7372.7 523.2,-7381.08"/>
-<polygon fill="#000000" stroke="#000000" points="522.48,-7384.51 533.06,-7383.95 524.44,-7377.79 522.48,-7384.51"/>
+<!-- interface~io_dump_base -->
+<g id="call~~graph~~CallGraph_node601" class="node">
+<title>interface~io_dump_base</title>
+<g id="a_call~~graph~~CallGraph_node601"><a xlink:href=".././interface/io_dump_base.html" xlink:title="io_dump_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-1163 55.5,-1163 55.5,-1139 138.5,-1139 138.5,-1163"/>
+<text text-anchor="middle" x="97" y="-1148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+</a>
 </g>
-<!-- proc~io_write_hdr_system&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge543" class="edge">
-<title>proc~io_write_hdr_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M895.06,-2554.21C915.22,-2556.69 937.21,-2562.48 954,-2575 1040.45,-2639.45 1077.43,-2772.86 1089.11,-2825.73"/>
-<polygon fill="#000000" stroke="#000000" points="1085.73,-2826.67 1091.22,-2835.73 1092.58,-2825.22 1085.73,-2826.67"/>
 </g>
-<!-- interface~util_resize_tp -->
-<g id="call~~graph~~CallGraph_node577" class="node">
-<title>interface~util_resize_tp</title>
-<g id="a_call~~graph~~CallGraph_node577"><a xlink:href=".././interface/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="135,-6383 59,-6383 59,-6359 135,-6359 135,-6383"/>
-<text text-anchor="middle" x="97" y="-6368.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
-</a>
+<!-- interface~io_dump_base&#45;&gt;proc~io_dump_base -->
+<g id="call~~graph~~CallGraph_edge555" class="edge">
+<title>interface~io_dump_base&#45;&gt;proc~io_dump_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-1151C176.9,-1151 234.01,-1151 275.12,-1151"/>
+<polygon fill="#000000" stroke="#000000" points="275.21,-1154.5 285.21,-1151 275.21,-1147.5 275.21,-1154.5"/>
 </g>
+<!-- interface~io_dump_system -->
+<g id="call~~graph~~CallGraph_node602" class="node">
+<title>interface~io_dump_system</title>
+<g id="a_call~~graph~~CallGraph_node602"><a xlink:href=".././interface/io_dump_system.html" xlink:title="io_dump_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="144,-9804 50,-9804 50,-9780 144,-9780 144,-9804"/>
+<text text-anchor="middle" x="97" y="-9789.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_system</text>
+</a>
 </g>
-<!-- interface~util_resize_tp&#45;&gt;proc~util_resize_tp -->
-<g id="call~~graph~~CallGraph_edge544" class="edge">
-<title>interface~util_resize_tp&#45;&gt;proc~util_resize_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-6371C174.31,-6371 236.14,-6371 278.75,-6371"/>
-<polygon fill="#000000" stroke="#000000" points="278.88,-6374.5 288.88,-6371 278.88,-6367.5 278.88,-6374.5"/>
 </g>
-<!-- proc~whm_gr_p4_pl&#45;&gt;gr_p4_pos_kick -->
-<g id="call~~graph~~CallGraph_edge545" class="edge">
-<title>proc~whm_gr_p4_pl&#45;&gt;gr_p4_pos_kick</title>
-<path fill="none" stroke="#000000" d="M368.76,-7618.63C385.88,-7614.98 405.96,-7610.5 424,-7606 457.23,-7597.71 494.29,-7587.3 523.2,-7578.92"/>
-<polygon fill="#000000" stroke="#000000" points="524.44,-7582.21 533.06,-7576.05 522.48,-7575.49 524.44,-7582.21"/>
+<!-- interface~io_dump_system&#45;&gt;proc~io_dump_system -->
+<g id="call~~graph~~CallGraph_edge556" class="edge">
+<title>interface~io_dump_system&#45;&gt;proc~io_dump_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-9792C180.45,-9792 231.21,-9792 269.87,-9792"/>
+<polygon fill="#000000" stroke="#000000" points="269.93,-9795.5 279.93,-9792 269.93,-9788.5 269.93,-9795.5"/>
 </g>
-<!-- interface~util_get_energy_momentum_system -->
-<g id="call~~graph~~CallGraph_node579" class="node">
-<title>interface~util_get_energy_momentum_system</title>
-<g id="a_call~~graph~~CallGraph_node579"><a xlink:href=".././interface/util_get_energy_momentum_system.html" xlink:title="util_get_energy_momentum_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="190,-13324 4,-13324 4,-13300 190,-13300 190,-13324"/>
-<text text-anchor="middle" x="97" y="-13309.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum_system</text>
+<!-- interface~io_param_reader -->
+<g id="call~~graph~~CallGraph_node603" class="node">
+<title>interface~io_param_reader</title>
+<g id="a_call~~graph~~CallGraph_node603"><a xlink:href=".././interface/io_param_reader.html" xlink:title="io_param_reader">
+<polygon fill="#a7506f" stroke="#a7506f" points="622,-280 527,-280 527,-256 622,-256 622,-280"/>
+<text text-anchor="middle" x="574.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </a>
 </g>
 </g>
-<!-- interface~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_momentum_system -->
-<g id="call~~graph~~CallGraph_edge546" class="edge">
-<title>interface~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_momentum_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M190.08,-13312C201.15,-13312 212.51,-13312 223.71,-13312"/>
-<polygon fill="#000000" stroke="#000000" points="223.95,-13315.5 233.95,-13312 223.95,-13308.5 223.95,-13315.5"/>
+<!-- interface~io_param_reader&#45;&gt;proc~io_param_reader -->
+<g id="call~~graph~~CallGraph_edge557" class="edge">
+<title>interface~io_param_reader&#45;&gt;proc~io_param_reader</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.22,-268C666.77,-268 733.97,-268 781.62,-268"/>
+<polygon fill="#000000" stroke="#000000" points="781.78,-271.5 791.78,-268 781.78,-264.5 781.78,-271.5"/>
 </g>
-<!-- interface~util_set_beg_end_pl -->
-<g id="call~~graph~~CallGraph_node580" class="node">
-<title>interface~util_set_beg_end_pl</title>
-<g id="a_call~~graph~~CallGraph_node580"><a xlink:href=".././interface/util_set_beg_end_pl.html" xlink:title="util_set_beg_end_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="151.5,-13198 42.5,-13198 42.5,-13174 151.5,-13174 151.5,-13198"/>
-<text text-anchor="middle" x="97" y="-13183.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_beg_end_pl</text>
+<!-- interface~io_param_writer -->
+<g id="call~~graph~~CallGraph_node604" class="node">
+<title>interface~io_param_writer</title>
+<g id="a_call~~graph~~CallGraph_node604"><a xlink:href=".././interface/io_param_writer.html" xlink:title="io_param_writer">
+<polygon fill="#a7506f" stroke="#a7506f" points="142,-10863 52,-10863 52,-10839 142,-10839 142,-10863"/>
+<text text-anchor="middle" x="97" y="-10848.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_writer</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_beg_end_pl&#45;&gt;proc~util_set_beg_end_pl -->
-<g id="call~~graph~~CallGraph_edge547" class="edge">
-<title>interface~util_set_beg_end_pl&#45;&gt;proc~util_set_beg_end_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.74,-13186C184.82,-13186 227.38,-13186 262.17,-13186"/>
-<polygon fill="#000000" stroke="#000000" points="262.22,-13189.5 272.22,-13186 262.22,-13182.5 262.22,-13189.5"/>
+<!-- interface~io_param_writer&#45;&gt;proc~io_param_writer -->
+<g id="call~~graph~~CallGraph_edge558" class="edge">
+<title>interface~io_param_writer&#45;&gt;proc~io_param_writer</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.23,-10851C179.28,-10851 232.3,-10851 271.88,-10851"/>
+<polygon fill="#000000" stroke="#000000" points="271.89,-10854.5 281.89,-10851 271.89,-10847.5 271.89,-10854.5"/>
 </g>
-<!-- proc~discard_pl_close -->
-<g id="call~~graph~~CallGraph_node581" class="node">
-<title>proc~discard_pl_close</title>
-<g id="a_call~~graph~~CallGraph_node581"><a xlink:href=".././proc/discard_pl_close.html" xlink:title="discard_pl_close">
-<polygon fill="#d9534f" stroke="#d9534f" points="143,-13870 51,-13870 51,-13846 143,-13846 143,-13870"/>
-<text text-anchor="middle" x="97" y="-13855.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard_pl_close</text>
+<!-- interface~io_read_in_body -->
+<g id="call~~graph~~CallGraph_node605" class="node">
+<title>interface~io_read_in_body</title>
+<g id="a_call~~graph~~CallGraph_node605"><a xlink:href=".././interface/io_read_in_body.html" xlink:title="io_read_in_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="143,-10905 51,-10905 51,-10881 143,-10881 143,-10905"/>
+<text text-anchor="middle" x="97" y="-10890.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_body</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_ir3h -->
-<g id="call~~graph~~CallGraph_node582" class="node">
-<title>interface~util_set_ir3h</title>
-<g id="a_call~~graph~~CallGraph_node582"><a xlink:href=".././interface/util_set_ir3h.html" xlink:title="util_set_ir3h">
-<polygon fill="#a7506f" stroke="#a7506f" points="132,-13492 62,-13492 62,-13468 132,-13468 132,-13492"/>
-<text text-anchor="middle" x="97" y="-13477.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_ir3h</text>
+<!-- interface~io_read_in_body&#45;&gt;proc~io_read_in_body -->
+<g id="call~~graph~~CallGraph_edge559" class="edge">
+<title>interface~io_read_in_body&#45;&gt;proc~io_read_in_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.05,-10893C179.62,-10893 231.36,-10893 270.49,-10893"/>
+<polygon fill="#000000" stroke="#000000" points="270.66,-10896.5 280.66,-10893 270.66,-10889.5 270.66,-10896.5"/>
+</g>
+<!-- interface~io_read_in_cb -->
+<g id="call~~graph~~CallGraph_node608" class="node">
+<title>interface~io_read_in_cb</title>
+<g id="a_call~~graph~~CallGraph_node608"><a xlink:href=".././interface/io_read_in_cb.html" xlink:title="io_read_in_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="614.5,-911 534.5,-911 534.5,-887 614.5,-887 614.5,-911"/>
+<text text-anchor="middle" x="574.5" y="-896.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_ir3h&#45;&gt;proc~util_set_ir3h -->
-<g id="call~~graph~~CallGraph_edge548" class="edge">
-<title>interface~util_set_ir3h&#45;&gt;proc~util_set_ir3h</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.13,-13480C171.93,-13480 237.81,-13480 281.56,-13480"/>
-<polygon fill="#000000" stroke="#000000" points="281.63,-13483.5 291.63,-13480 281.63,-13476.5 281.63,-13483.5"/>
+<!-- interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb -->
+<g id="call~~graph~~CallGraph_edge560" class="edge">
+<title>interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.59,-899C661.04,-899 738.61,-899 789.15,-899"/>
+<polygon fill="#000000" stroke="#000000" points="789.2,-902.5 799.2,-899 789.2,-895.5 789.2,-902.5"/>
 </g>
-<!-- interface~util_set_msys -->
-<g id="call~~graph~~CallGraph_node583" class="node">
-<title>interface~util_set_msys</title>
-<g id="a_call~~graph~~CallGraph_node583"><a xlink:href=".././interface/util_set_msys.html" xlink:title="util_set_msys">
-<polygon fill="#a7506f" stroke="#a7506f" points="135.5,-13534 58.5,-13534 58.5,-13510 135.5,-13510 135.5,-13534"/>
-<text text-anchor="middle" x="97" y="-13519.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_msys</text>
-</a>
+<!-- setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node730" class="node">
+<title>setup_initialize_system</title>
+<polygon fill="#777777" stroke="#777777" points="635.5,-13545 513.5,-13545 513.5,-13521 635.5,-13521 635.5,-13545"/>
+<text text-anchor="middle" x="574.5" y="-13530.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_initialize_system</text>
+</g>
+<!-- proc~whm_setup_initialize_system&#45;&gt;setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge562" class="edge">
+<title>proc~whm_setup_initialize_system&#45;&gt;setup_initialize_system</title>
+<path fill="none" stroke="#000000" d="M402.66,-13507.95C434.61,-13512.63 471.72,-13518.08 503.18,-13522.69"/>
+<polygon fill="#000000" stroke="#000000" points="502.78,-13526.17 513.18,-13524.15 503.79,-13519.24 502.78,-13526.17"/>
 </g>
+<!-- util_set_ir3h -->
+<g id="call~~graph~~CallGraph_node771" class="node">
+<title>util_set_ir3h</title>
+<polygon fill="#777777" stroke="#777777" points="609.5,-13503 539.5,-13503 539.5,-13479 609.5,-13479 609.5,-13503"/>
+<text text-anchor="middle" x="574.5" y="-13488.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_ir3h</text>
 </g>
-<!-- interface~util_set_msys&#45;&gt;proc~util_set_msys -->
-<g id="call~~graph~~CallGraph_edge549" class="edge">
-<title>interface~util_set_msys&#45;&gt;proc~util_set_msys</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.65,-13522C174.68,-13522 235.8,-13522 278.21,-13522"/>
-<polygon fill="#000000" stroke="#000000" points="278.29,-13525.5 288.29,-13522 278.29,-13518.5 278.29,-13525.5"/>
+<!-- proc~whm_setup_initialize_system&#45;&gt;util_set_ir3h -->
+<g id="call~~graph~~CallGraph_edge561" class="edge">
+<title>proc~whm_setup_initialize_system&#45;&gt;util_set_ir3h</title>
+<path fill="none" stroke="#000000" d="M402.66,-13495.18C443.95,-13494.17 493.87,-13492.95 529.05,-13492.09"/>
+<polygon fill="#000000" stroke="#000000" points="529.56,-13495.57 539.47,-13491.83 529.39,-13488.58 529.56,-13495.57"/>
 </g>
-<!-- interface~util_set_mu_pl -->
-<g id="call~~graph~~CallGraph_node584" class="node">
-<title>interface~util_set_mu_pl</title>
-<g id="a_call~~graph~~CallGraph_node584"><a xlink:href=".././interface/util_set_mu_pl.html" xlink:title="util_set_mu_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="138,-13450 56,-13450 56,-13426 138,-13426 138,-13450"/>
-<text text-anchor="middle" x="97" y="-13435.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_pl</text>
+<!-- interface~io_read_in_param -->
+<g id="call~~graph~~CallGraph_node610" class="node">
+<title>interface~io_read_in_param</title>
+<g id="a_call~~graph~~CallGraph_node610"><a xlink:href=".././interface/io_read_in_param.html" xlink:title="io_read_in_param">
+<polygon fill="#a7506f" stroke="#a7506f" points="624.5,-617 524.5,-617 524.5,-593 624.5,-593 624.5,-617"/>
+<text text-anchor="middle" x="574.5" y="-602.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_mu_pl&#45;&gt;proc~util_set_mu_pl -->
-<g id="call~~graph~~CallGraph_edge550" class="edge">
-<title>interface~util_set_mu_pl&#45;&gt;proc~util_set_mu_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-13438C176.54,-13438 234.31,-13438 275.65,-13438"/>
-<polygon fill="#000000" stroke="#000000" points="275.78,-13441.5 285.78,-13438 275.78,-13434.5 275.78,-13441.5"/>
+<!-- interface~io_read_in_param&#45;&gt;proc~io_read_in_param -->
+<g id="call~~graph~~CallGraph_edge563" class="edge">
+<title>interface~io_read_in_param&#45;&gt;proc~io_read_in_param</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.66,-605C668.34,-605 732.3,-605 778.88,-605"/>
+<polygon fill="#000000" stroke="#000000" points="779.14,-608.5 789.14,-605 779.14,-601.5 779.14,-608.5"/>
 </g>
-<!-- interface~util_set_mu_tp -->
-<g id="call~~graph~~CallGraph_node585" class="node">
-<title>interface~util_set_mu_tp</title>
-<g id="a_call~~graph~~CallGraph_node585"><a xlink:href=".././interface/util_set_mu_tp.html" xlink:title="util_set_mu_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="138,-13618 56,-13618 56,-13594 138,-13594 138,-13618"/>
-<text text-anchor="middle" x="97" y="-13603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_tp</text>
+<!-- util_set_mu_pl -->
+<g id="call~~graph~~CallGraph_node691" class="node">
+<title>util_set_mu_pl</title>
+<polygon fill="#777777" stroke="#777777" points="615.5,-13608 533.5,-13608 533.5,-13584 615.5,-13584 615.5,-13608"/>
+<text text-anchor="middle" x="574.5" y="-13593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_mu_pl</text>
+</g>
+<!-- proc~whm_util_set_mu_eta_pl&#45;&gt;util_set_mu_pl -->
+<g id="call~~graph~~CallGraph_edge564" class="edge">
+<title>proc~whm_util_set_mu_eta_pl&#45;&gt;util_set_mu_pl</title>
+<path fill="none" stroke="#000000" d="M392.5,-13596C433.28,-13596 485.22,-13596 522.99,-13596"/>
+<polygon fill="#000000" stroke="#000000" points="523.24,-13599.5 533.24,-13596 523.24,-13592.5 523.24,-13599.5"/>
+</g>
+<!-- interface~io_read_in_particle_info -->
+<g id="call~~graph~~CallGraph_node612" class="node">
+<title>interface~io_read_in_particle_info</title>
+<g id="a_call~~graph~~CallGraph_node612"><a xlink:href=".././interface/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="638,-1411 511,-1411 511,-1387 638,-1387 638,-1411"/>
+<text text-anchor="middle" x="574.5" y="-1396.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_mu_tp&#45;&gt;proc~util_set_mu_tp -->
-<g id="call~~graph~~CallGraph_edge551" class="edge">
-<title>interface~util_set_mu_tp&#45;&gt;proc~util_set_mu_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-13606C176.54,-13606 234.31,-13606 275.65,-13606"/>
-<polygon fill="#000000" stroke="#000000" points="275.78,-13609.5 285.78,-13606 275.78,-13602.5 275.78,-13609.5"/>
+<!-- interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info -->
+<g id="call~~graph~~CallGraph_edge565" class="edge">
+<title>interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.16,-1399C676.46,-1399 725.6,-1399 765.63,-1399"/>
+<polygon fill="#000000" stroke="#000000" points="765.86,-1402.5 775.86,-1399 765.86,-1395.5 765.86,-1402.5"/>
 </g>
-<!-- interface~util_set_particle_info -->
-<g id="call~~graph~~CallGraph_node586" class="node">
-<title>interface~util_set_particle_info</title>
-<g id="a_call~~graph~~CallGraph_node586"><a xlink:href=".././interface/util_set_particle_info.html" xlink:title="util_set_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="152,-13702 42,-13702 42,-13678 152,-13678 152,-13702"/>
-<text text-anchor="middle" x="97" y="-13687.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_particle_info</text>
+<!-- interface~io_read_particle_info_system -->
+<g id="call~~graph~~CallGraph_node613" class="node">
+<title>interface~io_read_particle_info_system</title>
+<g id="a_call~~graph~~CallGraph_node613"><a xlink:href=".././interface/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="650.5,-1453 498.5,-1453 498.5,-1429 650.5,-1429 650.5,-1453"/>
+<text text-anchor="middle" x="574.5" y="-1438.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_particle_info&#45;&gt;proc~util_set_particle_info -->
-<g id="call~~graph~~CallGraph_edge552" class="edge">
-<title>interface~util_set_particle_info&#45;&gt;proc~util_set_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M152.03,-13690C184.99,-13690 227.3,-13690 261.94,-13690"/>
-<polygon fill="#000000" stroke="#000000" points="261.96,-13693.5 271.96,-13690 261.96,-13686.5 261.96,-13693.5"/>
+<!-- interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system -->
+<g id="call~~graph~~CallGraph_edge566" class="edge">
+<title>interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.51,-1441C682.57,-1441 720.16,-1441 753.27,-1441"/>
+<polygon fill="#000000" stroke="#000000" points="753.39,-1444.5 763.39,-1441 753.39,-1437.5 753.39,-1444.5"/>
 </g>
-<!-- interface~util_set_rhill -->
-<g id="call~~graph~~CallGraph_node588" class="node">
-<title>interface~util_set_rhill</title>
-<g id="a_call~~graph~~CallGraph_node588"><a xlink:href=".././interface/util_set_rhill.html" xlink:title="util_set_rhill">
-<polygon fill="#a7506f" stroke="#a7506f" points="131.5,-13744 62.5,-13744 62.5,-13720 131.5,-13720 131.5,-13744"/>
-<text text-anchor="middle" x="97" y="-13729.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill</text>
+<!-- interface~io_write_discard -->
+<g id="call~~graph~~CallGraph_node614" class="node">
+<title>interface~io_write_discard</title>
+<g id="a_call~~graph~~CallGraph_node614"><a xlink:href=".././interface/io_write_discard.html" xlink:title="io_write_discard">
+<polygon fill="#a7506f" stroke="#a7506f" points="619.5,-1289 529.5,-1289 529.5,-1265 619.5,-1265 619.5,-1289"/>
+<text text-anchor="middle" x="574.5" y="-1274.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_rhill&#45;&gt;proc~util_set_rhill -->
-<g id="call~~graph~~CallGraph_edge553" class="edge">
-<title>interface~util_set_rhill&#45;&gt;proc~util_set_rhill</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.64,-13732C171.55,-13732 238.19,-13732 282.12,-13732"/>
-<polygon fill="#000000" stroke="#000000" points="282.22,-13735.5 292.22,-13732 282.22,-13728.5 282.22,-13735.5"/>
+<!-- interface~io_write_discard&#45;&gt;proc~io_write_discard -->
+<g id="call~~graph~~CallGraph_edge567" class="edge">
+<title>interface~io_write_discard&#45;&gt;proc~io_write_discard</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.52,-1277C664.84,-1277 735.54,-1277 784.29,-1277"/>
+<polygon fill="#000000" stroke="#000000" points="784.34,-1280.5 794.34,-1277 784.34,-1273.5 784.34,-1280.5"/>
 </g>
-<!-- proc~whm_gr_p4_tp&#45;&gt;gr_p4_pos_kick -->
-<g id="call~~graph~~CallGraph_edge554" class="edge">
-<title>proc~whm_gr_p4_tp&#45;&gt;gr_p4_pos_kick</title>
-<path fill="none" stroke="#000000" d="M369.23,-7509.47C386.24,-7513.1 406.12,-7517.54 424,-7522 457.23,-7530.29 494.29,-7540.7 523.2,-7549.08"/>
-<polygon fill="#000000" stroke="#000000" points="522.48,-7552.51 533.06,-7551.95 524.44,-7545.79 522.48,-7552.51"/>
+<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
+<g id="call~~graph~~CallGraph_edge568" class="edge">
+<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1126.77,-376C1170.24,-376 1249.01,-376 1297.25,-376"/>
+<polygon fill="#000000" stroke="#000000" points="1297.35,-379.5 1307.35,-376 1297.35,-372.5 1297.35,-379.5"/>
 </g>
-<!-- interface~util_set_rhill_approximate -->
-<g id="call~~graph~~CallGraph_node590" class="node">
-<title>interface~util_set_rhill_approximate</title>
-<g id="a_call~~graph~~CallGraph_node590"><a xlink:href=".././interface/util_set_rhill_approximate.html" xlink:title="util_set_rhill_approximate">
-<polygon fill="#a7506f" stroke="#a7506f" points="164,-13828 30,-13828 30,-13804 164,-13804 164,-13828"/>
-<text text-anchor="middle" x="97" y="-13813.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set_rhill_approximate</text>
+<!-- interface~io_write_encounter -->
+<g id="call~~graph~~CallGraph_node616" class="node">
+<title>interface~io_write_encounter</title>
+<g id="a_call~~graph~~CallGraph_node616"><a xlink:href=".././interface/io_write_encounter.html" xlink:title="io_write_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="626,-533 523,-533 523,-509 626,-509 626,-533"/>
+<text text-anchor="middle" x="574.5" y="-518.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~util_set_rhill_approximate&#45;&gt;proc~util_set_rhill_approximate -->
-<g id="call~~graph~~CallGraph_edge555" class="edge">
-<title>interface~util_set_rhill_approximate&#45;&gt;proc~util_set_rhill_approximate</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M164.25,-13816C191.07,-13816 222.19,-13816 249.92,-13816"/>
-<polygon fill="#000000" stroke="#000000" points="249.98,-13819.5 259.98,-13816 249.98,-13812.5 249.98,-13819.5"/>
-</g>
-<!-- proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge -->
-<g id="call~~graph~~CallGraph_edge559" class="edge">
-<title>proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge</title>
-<path fill="none" stroke="#000000" d="M881.55,-252.06C911.48,-260.66 953.09,-272.2 990,-281 999.93,-283.37 1010.45,-285.7 1020.81,-287.9"/>
-<polygon fill="#000000" stroke="#000000" points="1020.18,-291.34 1030.68,-289.96 1021.61,-284.49 1020.18,-291.34"/>
+<!-- interface~io_write_encounter&#45;&gt;proc~io_write_encounter -->
+<g id="call~~graph~~CallGraph_edge569" class="edge">
+<title>interface~io_write_encounter&#45;&gt;proc~io_write_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.21,-521C669.51,-521 731.88,-521 777.82,-521"/>
+<polygon fill="#000000" stroke="#000000" points="777.95,-524.5 787.95,-521 777.95,-517.5 777.95,-524.5"/>
 </g>
-<!-- proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders -->
-<g id="call~~graph~~CallGraph_edge556" class="edge">
-<title>proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders</title>
-<path fill="none" stroke="#000000" d="M926.51,-246.8C946.11,-248.35 967.17,-250.01 987.51,-251.62"/>
-<polygon fill="#000000" stroke="#000000" points="987.49,-255.13 997.74,-252.43 988.05,-248.15 987.49,-255.13"/>
+<!-- proc~symba_util_resize_arr_kin -->
+<g id="call~~graph~~CallGraph_node617" class="node">
+<title>proc~symba_util_resize_arr_kin</title>
+<g id="a_call~~graph~~CallGraph_node617"><a xlink:href=".././proc/symba_util_resize_arr_kin.html" xlink:title="symba_util_resize_arr_kin">
+<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-13650 28.5,-13650 28.5,-13626 165.5,-13626 165.5,-13650"/>
+<text text-anchor="middle" x="97" y="-13635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_resize_arr_kin</text>
+</a>
 </g>
-<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx1 -->
-<g id="call~~graph~~CallGraph_edge558" class="edge">
-<title>proc~symba_collision_resolve_mergers&#45;&gt;idx1</title>
-<path fill="none" stroke="#000000" d="M926.51,-232.52C970.97,-228.65 1022.9,-224.14 1056.9,-221.18"/>
-<polygon fill="#000000" stroke="#000000" points="1057.62,-224.63 1067.28,-220.28 1057.01,-217.66 1057.62,-224.63"/>
 </g>
-<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx2 -->
-<g id="call~~graph~~CallGraph_edge557" class="edge">
-<title>proc~symba_collision_resolve_mergers&#45;&gt;idx2</title>
-<path fill="none" stroke="#000000" d="M886.78,-227.98C907.43,-222.46 932.01,-215.66 954,-209 970.14,-204.11 973.71,-201.35 990,-197 1012.17,-191.08 1037.41,-185.93 1057.41,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="1058.14,-185.63 1067.35,-180.4 1056.88,-178.75 1058.14,-185.63"/>
+<!-- proc~symba_collision_encounter_extract_collisions&#45;&gt;idx2 -->
+<g id="call~~graph~~CallGraph_edge570" class="edge">
+<title>proc~symba_collision_encounter_extract_collisions&#45;&gt;idx2</title>
+<path fill="none" stroke="#000000" d="M954.05,-1655.22C991.28,-1658.9 1030.01,-1662.73 1057.19,-1665.41"/>
+<polygon fill="#000000" stroke="#000000" points="1057.07,-1668.92 1067.36,-1666.42 1057.76,-1661.95 1057.07,-1668.92"/>
 </g>
-<!-- proc~io_dump_particle_info&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge560" class="edge">
-<title>proc~io_dump_particle_info&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M898.64,-2512.13C917.93,-2514.78 938.43,-2520.7 954,-2533 1051.01,-2609.61 1082.31,-2767.84 1090.76,-2825.96"/>
-<polygon fill="#000000" stroke="#000000" points="1087.3,-2826.47 1092.13,-2835.9 1094.24,-2825.52 1087.3,-2826.47"/>
+<!-- proc~symba_collision_encounter_extract_collisions&#45;&gt;idx1 -->
+<g id="call~~graph~~CallGraph_edge571" class="edge">
+<title>proc~symba_collision_encounter_extract_collisions&#45;&gt;idx1</title>
+<path fill="none" stroke="#000000" d="M954.05,-1636.37C991.28,-1633.87 1030.01,-1631.27 1057.19,-1629.44"/>
+<polygon fill="#000000" stroke="#000000" points="1057.62,-1632.92 1067.36,-1628.76 1057.15,-1625.93 1057.62,-1632.92"/>
 </g>
-<!-- proc~io_dump_particle_info_base&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge561" class="edge">
-<title>proc~io_dump_particle_info_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M913.11,-2472.29C927.88,-2475.66 942.41,-2481.43 954,-2491 1061.42,-2579.77 1086.45,-2762.22 1092,-2825.67"/>
-<polygon fill="#000000" stroke="#000000" points="1088.52,-2826.07 1092.8,-2835.76 1095.49,-2825.51 1088.52,-2826.07"/>
+<!-- proc~drift_kepu_lag -->
+<g id="call~~graph~~CallGraph_node620" class="node">
+<title>proc~drift_kepu_lag</title>
+<g id="a_call~~graph~~CallGraph_node620"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
+<polygon fill="#d9534f" stroke="#d9534f" points="1134.5,-3464 1054.5,-3464 1054.5,-3440 1134.5,-3440 1134.5,-3464"/>
+<text text-anchor="middle" x="1094.5" y="-3449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
+</a>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
-<g id="call~~graph~~CallGraph_edge563" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M386.38,-9851.34C497.24,-9848.76 745.75,-9845.74 954,-9863 979.95,-9865.15 1008.4,-9869.14 1032.81,-9873.06"/>
-<polygon fill="#000000" stroke="#000000" points="1032.56,-9876.57 1043,-9874.74 1033.7,-9869.66 1032.56,-9876.57"/>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
-<g id="call~~graph~~CallGraph_edge562" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" d="M386.18,-9860.35C419.62,-9864.57 461.99,-9869.92 497.98,-9874.46"/>
-<polygon fill="#000000" stroke="#000000" points="497.59,-9877.94 507.95,-9875.72 498.46,-9871 497.59,-9877.94"/>
+<!-- proc~drift_kepu_stumpff -->
+<g id="call~~graph~~CallGraph_node666" class="node">
+<title>proc~drift_kepu_stumpff</title>
+<g id="a_call~~graph~~CallGraph_node666"><a xlink:href=".././proc/drift_kepu_stumpff.html" xlink:title="drift_kepu_stumpff">
+<polygon fill="#d9534f" stroke="#d9534f" points="1390,-3464 1289,-3464 1289,-3440 1390,-3440 1390,-3464"/>
+<text text-anchor="middle" x="1339.5" y="-3449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_stumpff</text>
+</a>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
-<g id="call~~graph~~CallGraph_edge565" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M386.38,-9915.78C497.23,-9918.59 745.74,-9922.09 954,-9905 979.84,-9902.88 1008.17,-9898.92 1032.51,-9895.01"/>
-<polygon fill="#000000" stroke="#000000" points="1033.37,-9898.41 1042.67,-9893.34 1032.24,-9891.5 1033.37,-9898.41"/>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
-<g id="call~~graph~~CallGraph_edge564" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" d="M386.18,-9906.89C419.62,-9902.8 461.99,-9897.63 497.98,-9893.23"/>
-<polygon fill="#000000" stroke="#000000" points="498.45,-9896.7 507.95,-9892.01 497.6,-9889.75 498.45,-9896.7"/>
+<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
+<g id="call~~graph~~CallGraph_edge572" class="edge">
+<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
+<path fill="none" stroke="#000000" d="M1134.54,-3452C1173.38,-3452 1233.49,-3452 1278.41,-3452"/>
+<polygon fill="#000000" stroke="#000000" points="1278.61,-3455.5 1288.61,-3452 1278.61,-3448.5 1278.61,-3455.5"/>
 </g>
 <!-- proc~util_spill_pl&#45;&gt;interface~util_spill_body -->
-<g id="call~~graph~~CallGraph_edge567" class="edge">
+<g id="call~~graph~~CallGraph_edge574" class="edge">
 <title>proc~util_spill_pl&#45;&gt;interface~util_spill_body</title>
-<path fill="none" stroke="#000000" d="M359.09,-11567.2C400.89,-11562.09 475.63,-11552.96 524.9,-11546.94"/>
-<polygon fill="#000000" stroke="#000000" points="525.5,-11550.39 535,-11545.7 524.65,-11543.44 525.5,-11550.39"/>
+<path fill="none" stroke="#000000" d="M359.09,-6249.2C400.89,-6244.09 475.63,-6234.96 524.9,-6228.94"/>
+<polygon fill="#000000" stroke="#000000" points="525.5,-6232.39 535,-6227.7 524.65,-6225.44 525.5,-6232.39"/>
 </g>
 <!-- proc~util_spill_pl&#45;&gt;interface~util_spill~2 -->
-<g id="call~~graph~~CallGraph_edge566" class="edge">
+<g id="call~~graph~~CallGraph_edge573" class="edge">
 <title>proc~util_spill_pl&#45;&gt;interface~util_spill~2</title>
-<path fill="none" stroke="#000000" d="M359.18,-11573.51C450.99,-11580.29 728.05,-11596.18 954,-11562 990.12,-11556.54 1029.99,-11544.15 1057.82,-11534.41"/>
-<polygon fill="#000000" stroke="#000000" points="1059.25,-11537.61 1067.5,-11530.96 1056.9,-11531.02 1059.25,-11537.61"/>
+<path fill="none" stroke="#000000" d="M359.44,-6252.59C481.89,-6250.99 926.66,-6245.18 1057.23,-6243.47"/>
+<polygon fill="#000000" stroke="#000000" points="1057.53,-6246.97 1067.48,-6243.34 1057.44,-6239.97 1057.53,-6246.97"/>
 </g>
-<!-- helio_step_system -->
-<g id="call~~graph~~CallGraph_node696" class="node">
-<title>helio_step_system</title>
-<polygon fill="#777777" stroke="#777777" points="625,-5082 524,-5082 524,-5058 625,-5058 625,-5082"/>
-<text text-anchor="middle" x="574.5" y="-5067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_system</text>
+<!-- proc~util_append_arr_dpvec -->
+<g id="call~~graph~~CallGraph_node624" class="node">
+<title>proc~util_append_arr_dpvec</title>
+<g id="a_call~~graph~~CallGraph_node624"><a xlink:href=".././proc/util_append_arr_dpvec.html" xlink:title="util_append_arr_DPvec">
+<polygon fill="#d9534f" stroke="#d9534f" points="901.5,-9955 777.5,-9955 777.5,-9931 901.5,-9931 901.5,-9955"/>
+<text text-anchor="middle" x="839.5" y="-9940.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DPvec</text>
+</a>
+</g>
+</g>
+<!-- proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge575" class="edge">
+<title>proc~util_append_arr_dpvec&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M901.74,-9932.83C948.96,-9924.99 1012.89,-9914.38 1053.67,-9907.61"/>
+<polygon fill="#000000" stroke="#000000" points="1054.48,-9911.03 1063.77,-9905.94 1053.33,-9904.12 1054.48,-9911.03"/>
+</g>
+<!-- proc~drift_kepu_new -->
+<g id="call~~graph~~CallGraph_node626" class="node">
+<title>proc~drift_kepu_new</title>
+<g id="a_call~~graph~~CallGraph_node626"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
+<polygon fill="#d9534f" stroke="#d9534f" points="1137,-3422 1052,-3422 1052,-3398 1137,-3398 1137,-3422"/>
+<text text-anchor="middle" x="1094.5" y="-3407.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
+</a>
 </g>
-<!-- proc~symba_step_system&#45;&gt;helio_step_system -->
-<g id="call~~graph~~CallGraph_edge568" class="edge">
-<title>proc~symba_step_system&#45;&gt;helio_step_system</title>
-<path fill="none" stroke="#000000" d="M382.18,-5070C421.02,-5070 473.34,-5070 513.46,-5070"/>
-<polygon fill="#000000" stroke="#000000" points="513.64,-5073.5 523.64,-5070 513.64,-5066.5 513.64,-5073.5"/>
+</g>
+<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
+<g id="call~~graph~~CallGraph_edge576" class="edge">
+<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
+<path fill="none" stroke="#000000" d="M1137.27,-3417.22C1176.3,-3423.97 1234.97,-3434.11 1278.91,-3441.7"/>
+<polygon fill="#000000" stroke="#000000" points="1278.44,-3445.17 1288.89,-3443.43 1279.63,-3438.27 1278.44,-3445.17"/>
 </g>
 <!-- proc~util_spill_tp&#45;&gt;interface~util_spill_body -->
-<g id="call~~graph~~CallGraph_edge570" class="edge">
+<g id="call~~graph~~CallGraph_edge578" class="edge">
 <title>proc~util_spill_tp&#45;&gt;interface~util_spill_body</title>
-<path fill="none" stroke="#000000" d="M359.59,-11513.99C401.42,-11519.27 475.62,-11528.64 524.69,-11534.84"/>
-<polygon fill="#000000" stroke="#000000" points="524.39,-11538.33 534.75,-11536.11 525.27,-11531.38 524.39,-11538.33"/>
+<path fill="none" stroke="#000000" d="M359.59,-6204.7C401.42,-6208.28 475.62,-6214.63 524.69,-6218.82"/>
+<polygon fill="#000000" stroke="#000000" points="524.49,-6222.32 534.75,-6219.69 525.09,-6215.35 524.49,-6222.32"/>
 </g>
 <!-- proc~util_spill_tp&#45;&gt;interface~util_spill~2 -->
-<g id="call~~graph~~CallGraph_edge569" class="edge">
+<g id="call~~graph~~CallGraph_edge577" class="edge">
 <title>proc~util_spill_tp&#45;&gt;interface~util_spill~2</title>
-<path fill="none" stroke="#000000" d="M359.92,-11510.46C482.94,-11512.23 926.01,-11518.59 1056.87,-11520.47"/>
-<polygon fill="#000000" stroke="#000000" points="1057.1,-11523.98 1067.15,-11520.62 1057.2,-11516.98 1057.1,-11523.98"/>
-</g>
-<!-- 3 -->
-<g id="call~~graph~~CallGraph_node758" class="node">
-<title>3</title>
-<polygon fill="#777777" stroke="#777777" points="1366.5,-6013 1312.5,-6013 1312.5,-5989 1366.5,-5989 1366.5,-6013"/>
-<text text-anchor="middle" x="1339.5" y="-5998.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
-</g>
-<!-- proc~orbel_flon&#45;&gt;3 -->
-<g id="call~~graph~~CallGraph_edge571" class="edge">
-<title>proc~orbel_flon&#45;&gt;3</title>
-<path fill="none" stroke="#000000" d="M1124.81,-6001C1169.38,-6001 1254.11,-6001 1302.41,-6001"/>
-<polygon fill="#000000" stroke="#000000" points="1302.42,-6004.5 1312.42,-6001 1302.42,-5997.5 1302.42,-6004.5"/>
+<path fill="none" stroke="#000000" d="M359.82,-6198.82C452.23,-6190.27 728.37,-6169.53 954,-6202 990.05,-6207.19 1029.78,-6219.55 1057.58,-6229.35"/>
+<polygon fill="#000000" stroke="#000000" points="1056.67,-6232.74 1067.26,-6232.83 1059.03,-6226.16 1056.67,-6232.74"/>
 </g>
-<!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
-<g id="call~~graph~~CallGraph_edge572" class="edge">
-<title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M1125.3,-5956.55C1166.94,-5953.12 1242.96,-5946.86 1292.07,-5942.82"/>
-<polygon fill="#000000" stroke="#000000" points="1292.44,-5946.3 1302.12,-5941.99 1291.87,-5939.33 1292.44,-5946.3"/>
-</g>
-<!-- proc~whm_drift_pl&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge573" class="edge">
-<title>proc~whm_drift_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M876.23,-634.35C901.66,-633.88 934.64,-638.01 954,-659 1007.16,-716.64 946.72,-944.62 990,-1010 1005.66,-1033.65 1034.59,-1048.38 1057.89,-1056.92"/>
-<polygon fill="#000000" stroke="#000000" points="1056.88,-1060.28 1067.48,-1060.22 1059.16,-1053.66 1056.88,-1060.28"/>
+<!-- proc~util_sort_index_dp -->
+<g id="call~~graph~~CallGraph_node628" class="node">
+<title>proc~util_sort_index_dp</title>
+<g id="a_call~~graph~~CallGraph_node628"><a xlink:href=".././proc/util_sort_index_dp.html" xlink:title="util_sort_index_dp">
+<polygon fill="#d9534f" stroke="#d9534f" points="147,-13692 47,-13692 47,-13668 147,-13668 147,-13692"/>
+<text text-anchor="middle" x="97" y="-13677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_index_dp</text>
+</a>
 </g>
-<!-- proc~whm_drift_pl&#45;&gt;drift_all -->
-<g id="call~~graph~~CallGraph_edge574" class="edge">
-<title>proc~whm_drift_pl&#45;&gt;drift_all</title>
-<path fill="none" stroke="#000000" d="M876.11,-637.47C899.6,-635.72 930.3,-630.65 954,-617 975.3,-604.73 968.8,-587.45 990,-575 1010.29,-563.08 1036.24,-557.84 1057.08,-555.57"/>
-<polygon fill="#000000" stroke="#000000" points="1057.51,-559.04 1067.16,-554.65 1056.88,-552.07 1057.51,-559.04"/>
 </g>
-<!-- proc~util_spill_arr_char_string -->
-<g id="call~~graph~~CallGraph_node605" class="node">
-<title>proc~util_spill_arr_char_string</title>
-<g id="a_call~~graph~~CallGraph_node605"><a xlink:href=".././proc/util_spill_arr_char_string.html" xlink:title="util_spill_arr_char_string">
-<polygon fill="#d9534f" stroke="#d9534f" points="161.5,-13912 32.5,-13912 32.5,-13888 161.5,-13888 161.5,-13912"/>
-<text text-anchor="middle" x="97" y="-13897.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_char_string</text>
+<!-- proc~drift_kepu_guess -->
+<g id="call~~graph~~CallGraph_node629" class="node">
+<title>proc~drift_kepu_guess</title>
+<g id="a_call~~graph~~CallGraph_node629"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
+<polygon fill="#d9534f" stroke="#d9534f" points="1141.5,-3548 1047.5,-3548 1047.5,-3524 1141.5,-3524 1141.5,-3548"/>
+<text text-anchor="middle" x="1094.5" y="-3533.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge575" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M893.65,-2300.11C914.81,-2302.09 937.9,-2308.09 954,-2323 958.85,-2327.49 1062.33,-2727.29 1087.85,-2826.1"/>
-<polygon fill="#000000" stroke="#000000" points="1084.49,-2827.1 1090.38,-2835.91 1091.27,-2825.35 1084.49,-2827.1"/>
-</g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
-<g id="call~~graph~~CallGraph_edge576" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M893.54,-2293.2C942.66,-2285.04 1014.41,-2273.13 1057.28,-2266.01"/>
-<polygon fill="#000000" stroke="#000000" points="1057.97,-2269.45 1067.27,-2264.36 1056.83,-2262.54 1057.97,-2269.45"/>
+<!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
+<g id="call~~graph~~CallGraph_edge579" class="edge">
+<title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M1141.67,-3543.08C1159.78,-3546.45 1180.59,-3551.06 1199,-3557 1237.23,-3569.34 1278.96,-3589.07 1306.72,-3603.17"/>
+<polygon fill="#000000" stroke="#000000" points="1305.43,-3606.44 1315.92,-3607.9 1308.63,-3600.21 1305.43,-3606.44"/>
 </g>
-<!-- proc~rmvs_encounter_check_tp -->
-<g id="call~~graph~~CallGraph_node610" class="node">
-<title>proc~rmvs_encounter_check_tp</title>
-<g id="a_call~~graph~~CallGraph_node610"><a xlink:href=".././proc/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="396.5,-4452 257.5,-4452 257.5,-4428 396.5,-4428 396.5,-4452"/>
-<text text-anchor="middle" x="327" y="-4437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
+<!-- proc~drift_kepu_p3solve -->
+<g id="call~~graph~~CallGraph_node643" class="node">
+<title>proc~drift_kepu_p3solve</title>
+<g id="a_call~~graph~~CallGraph_node643"><a xlink:href=".././proc/drift_kepu_p3solve.html" xlink:title="drift_kepu_p3solve">
+<polygon fill="#d9534f" stroke="#d9534f" points="1391,-3548 1288,-3548 1288,-3524 1391,-3524 1391,-3548"/>
+<text text-anchor="middle" x="1339.5" y="-3533.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_p3solve</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind -->
-<g id="call~~graph~~CallGraph_edge577" class="edge">
-<title>proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M396.71,-4445.88C437.38,-4449.36 487.94,-4453.68 524.55,-4456.81"/>
-<polygon fill="#000000" stroke="#000000" points="524.71,-4460.34 534.97,-4457.7 525.3,-4453.36 524.71,-4460.34"/>
+<!-- proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve -->
+<g id="call~~graph~~CallGraph_edge580" class="edge">
+<title>proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve</title>
+<path fill="none" stroke="#000000" d="M1141.78,-3536C1180.32,-3536 1235.52,-3536 1277.64,-3536"/>
+<polygon fill="#000000" stroke="#000000" points="1277.78,-3539.5 1287.78,-3536 1277.78,-3532.5 1277.78,-3539.5"/>
 </g>
-<!-- proc~symba_step_recur_system&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge578" class="edge">
-<title>proc~symba_step_recur_system&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M910.06,-1166.79C925.24,-1163.6 940.72,-1158.65 954,-1151 975.3,-1138.73 970.05,-1123.36 990,-1109 1010.29,-1094.4 1036.39,-1083.85 1057.3,-1076.98"/>
-<polygon fill="#000000" stroke="#000000" points="1058.61,-1080.24 1067.1,-1073.9 1056.51,-1073.56 1058.61,-1080.24"/>
+<!-- proc~util_sort_dp -->
+<g id="call~~graph~~CallGraph_node630" class="node">
+<title>proc~util_sort_dp</title>
+<g id="a_call~~graph~~CallGraph_node630"><a xlink:href=".././proc/util_sort_dp.html" xlink:title="util_sort_dp">
+<polygon fill="#d9534f" stroke="#d9534f" points="131,-13734 63,-13734 63,-13710 131,-13710 131,-13734"/>
+<text text-anchor="middle" x="97" y="-13719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_dp</text>
+</a>
 </g>
-<!-- proc~util_spill_body&#45;&gt;interface~util_spill~2 -->
-<g id="call~~graph~~CallGraph_edge579" class="edge">
-<title>proc~util_spill_body&#45;&gt;interface~util_spill~2</title>
-<path fill="none" stroke="#000000" d="M879.2,-11537.94C927.59,-11534.12 1009.8,-11527.62 1057.09,-11523.88"/>
-<polygon fill="#000000" stroke="#000000" points="1057.5,-11527.36 1067.19,-11523.08 1056.94,-11520.38 1057.5,-11527.36"/>
 </g>
-<!-- proc~util_spill_arr_dp -->
-<g id="call~~graph~~CallGraph_node615" class="node">
-<title>proc~util_spill_arr_dp</title>
-<g id="a_call~~graph~~CallGraph_node615"><a xlink:href=".././proc/util_spill_arr_dp.html" xlink:title="util_spill_arr_DP">
-<polygon fill="#d9534f" stroke="#d9534f" points="142,-13954 52,-13954 52,-13930 142,-13930 142,-13954"/>
-<text text-anchor="middle" x="97" y="-13939.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_DP</text>
+<!-- proc~util_sort_i4b -->
+<g id="call~~graph~~CallGraph_node631" class="node">
+<title>proc~util_sort_i4b</title>
+<g id="a_call~~graph~~CallGraph_node631"><a xlink:href=".././proc/util_sort_i4b.html" xlink:title="util_sort_i4b">
+<polygon fill="#d9534f" stroke="#d9534f" points="132,-13776 62,-13776 62,-13752 132,-13752 132,-13776"/>
+<text text-anchor="middle" x="97" y="-13761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_i4b</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_arr_dpvec -->
-<g id="call~~graph~~CallGraph_node616" class="node">
-<title>proc~util_spill_arr_dpvec</title>
-<g id="a_call~~graph~~CallGraph_node616"><a xlink:href=".././proc/util_spill_arr_dpvec.html" xlink:title="util_spill_arr_DPvec">
-<polygon fill="#d9534f" stroke="#d9534f" points="150,-13996 44,-13996 44,-13972 150,-13972 150,-13996"/>
-<text text-anchor="middle" x="97" y="-13981.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_DPvec</text>
+<!-- proc~check -->
+<g id="call~~graph~~CallGraph_node632" class="node">
+<title>proc~check</title>
+<g id="a_call~~graph~~CallGraph_node632"><a xlink:href=".././proc/check.html" xlink:title="check">
+<polygon fill="#d9534f" stroke="#d9534f" points="866.5,-398 812.5,-398 812.5,-374 866.5,-374 866.5,-398"/>
+<text text-anchor="middle" x="839.5" y="-383.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">check</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_chk_ind -->
-<g id="call~~graph~~CallGraph_node618" class="node">
-<title>proc~rmvs_chk_ind</title>
-<g id="a_call~~graph~~CallGraph_node618"><a xlink:href=".././proc/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="879,-4473 800,-4473 800,-4449 879,-4449 879,-4473"/>
-<text text-anchor="middle" x="839.5" y="-4458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
+<!-- proc~check&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge581" class="edge">
+<title>proc~check&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M866.71,-385.26C892.79,-386.05 932.02,-391.64 954,-416 1023.02,-492.49 962.38,-545.74 990,-645 1014.88,-734.4 1061.86,-834.88 1082.87,-877.76"/>
+<polygon fill="#000000" stroke="#000000" points="1079.83,-879.52 1087.4,-886.93 1086.11,-876.42 1079.83,-879.52"/>
+</g>
+<!-- nf90_strerror -->
+<g id="call~~graph~~CallGraph_node719" class="node">
+<title>nf90_strerror</title>
+<polygon fill="#777777" stroke="#777777" points="1132,-308 1057,-308 1057,-284 1132,-284 1132,-308"/>
+<text text-anchor="middle" x="1094.5" y="-293.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_strerror</text>
 </g>
+<!-- proc~check&#45;&gt;nf90_strerror -->
+<g id="call~~graph~~CallGraph_edge582" class="edge">
+<title>proc~check&#45;&gt;nf90_strerror</title>
+<path fill="none" stroke="#000000" d="M866.85,-384.31C890.92,-381.79 926.79,-375.54 954,-360 974.2,-348.46 969.92,-333.75 990,-322 1007.14,-311.98 1028.06,-305.79 1046.6,-301.98"/>
+<polygon fill="#000000" stroke="#000000" points="1047.43,-305.39 1056.62,-300.1 1046.14,-298.51 1047.43,-305.39"/>
 </g>
-<!-- proc~lambda_eval_0 -->
-<g id="call~~graph~~CallGraph_node619" class="node">
-<title>proc~lambda_eval_0</title>
-<g id="a_call~~graph~~CallGraph_node619"><a xlink:href=".././proc/lambda_eval_0.html" xlink:title="lambda_eval_0">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="139.5,-14038 54.5,-14038 54.5,-14014 139.5,-14014 139.5,-14038"/>
-<text text-anchor="middle" x="97" y="-14023.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_eval_0</text>
-</a>
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
+<g id="call~~graph~~CallGraph_edge583" class="edge">
+<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M893.69,-338.54C915.37,-341.22 938.86,-348.31 954,-365 996.15,-411.47 974.03,-584.33 990,-645 1013.62,-734.74 1061.26,-835.04 1082.66,-877.82"/>
+<polygon fill="#000000" stroke="#000000" points="1079.64,-879.62 1087.27,-886.97 1085.89,-876.46 1079.64,-879.62"/>
 </g>
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
+<g id="call~~graph~~CallGraph_edge584" class="edge">
+<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M882.9,-326.95C905.78,-318.92 933.46,-306.56 954,-289 976.49,-269.78 965.58,-249.7 990,-233 1009.55,-219.63 1035.72,-214.41 1056.86,-212.51"/>
+<polygon fill="#000000" stroke="#000000" points="1057.34,-215.99 1067.08,-211.81 1056.87,-209 1057.34,-215.99"/>
 </g>
-<!-- proc~lambda_eval_tvar -->
-<g id="call~~graph~~CallGraph_node621" class="node">
-<title>proc~lambda_eval_tvar</title>
-<g id="a_call~~graph~~CallGraph_node621"><a xlink:href=".././proc/lambda_eval_tvar.html" xlink:title="lambda_eval_tvar">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="145.5,-14080 48.5,-14080 48.5,-14056 145.5,-14056 145.5,-14080"/>
-<text text-anchor="middle" x="97" y="-14065.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_eval_tvar</text>
-</a>
+<!-- helio_drift_body -->
+<g id="call~~graph~~CallGraph_node738" class="node">
+<title>helio_drift_body</title>
+<polygon fill="#777777" stroke="#777777" points="618.5,-12375 530.5,-12375 530.5,-12351 618.5,-12351 618.5,-12375"/>
+<text text-anchor="middle" x="574.5" y="-12360.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_body</text>
 </g>
+<!-- proc~symba_drift_pl&#45;&gt;helio_drift_body -->
+<g id="call~~graph~~CallGraph_edge585" class="edge">
+<title>proc~symba_drift_pl&#45;&gt;helio_drift_body</title>
+<path fill="none" stroke="#000000" d="M368.26,-12363C409.75,-12363 474.62,-12363 520.3,-12363"/>
+<polygon fill="#000000" stroke="#000000" points="520.32,-12366.5 530.32,-12363 520.32,-12359.5 520.32,-12366.5"/>
 </g>
-<!-- proc~whm_kick_getacch_ah0 -->
-<g id="call~~graph~~CallGraph_node633" class="node">
-<title>proc~whm_kick_getacch_ah0</title>
-<g id="a_call~~graph~~CallGraph_node633"><a xlink:href=".././proc/whm_kick_getacch_ah0.html" xlink:title="whm_kick_getacch_ah0">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="638,-7177 511,-7177 511,-7153 638,-7153 638,-7177"/>
-<text text-anchor="middle" x="574.5" y="-7162.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_ah0</text>
+<!-- proc~util_sort_sp -->
+<g id="call~~graph~~CallGraph_node635" class="node">
+<title>proc~util_sort_sp</title>
+<g id="a_call~~graph~~CallGraph_node635"><a xlink:href=".././proc/util_sort_sp.html" xlink:title="util_sort_sp">
+<polygon fill="#d9534f" stroke="#d9534f" points="130.5,-13818 63.5,-13818 63.5,-13794 130.5,-13794 130.5,-13818"/>
+<text text-anchor="middle" x="97" y="-13803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_sp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0 -->
-<g id="call~~graph~~CallGraph_edge580" class="edge">
-<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0</title>
-<path fill="none" stroke="#000000" d="M385.56,-7132.85C419.89,-7138.72 463.8,-7146.23 500.54,-7152.52"/>
-<polygon fill="#000000" stroke="#000000" points="500.26,-7156.02 510.7,-7154.26 501.44,-7149.12 500.26,-7156.02"/>
-</g>
-<!-- proc~whm_kick_getacch_ah1 -->
-<g id="call~~graph~~CallGraph_node638" class="node">
-<title>proc~whm_kick_getacch_ah1</title>
-<g id="a_call~~graph~~CallGraph_node638"><a xlink:href=".././proc/whm_kick_getacch_ah1.html" xlink:title="whm_kick_getacch_ah1">
-<polygon fill="#d9534f" stroke="#d9534f" points="638,-7135 511,-7135 511,-7111 638,-7111 638,-7135"/>
-<text text-anchor="middle" x="574.5" y="-7120.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_ah1</text>
+<!-- proc~util_append_arr_char_string -->
+<g id="call~~graph~~CallGraph_node636" class="node">
+<title>proc~util_append_arr_char_string</title>
+<g id="a_call~~graph~~CallGraph_node636"><a xlink:href=".././proc/util_append_arr_char_string.html" xlink:title="util_append_arr_char_string">
+<polygon fill="#d9534f" stroke="#d9534f" points="913,-9913 766,-9913 766,-9889 913,-9889 913,-9913"/>
+<text text-anchor="middle" x="839.5" y="-9898.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_char_string</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah1 -->
-<g id="call~~graph~~CallGraph_edge581" class="edge">
-<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah1</title>
-<path fill="none" stroke="#000000" d="M385.56,-7123C419.89,-7123 463.8,-7123 500.54,-7123"/>
-<polygon fill="#000000" stroke="#000000" points="500.7,-7126.5 510.7,-7123 500.7,-7119.5 500.7,-7126.5"/>
+<!-- proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge586" class="edge">
+<title>proc~util_append_arr_char_string&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M913.34,-9901C959.11,-9901 1016.38,-9901 1053.9,-9901"/>
+<polygon fill="#000000" stroke="#000000" points="1053.94,-9904.5 1063.94,-9901 1053.94,-9897.5 1053.94,-9904.5"/>
 </g>
-<!-- proc~whm_kick_getacch_ah2 -->
-<g id="call~~graph~~CallGraph_node666" class="node">
-<title>proc~whm_kick_getacch_ah2</title>
-<g id="a_call~~graph~~CallGraph_node666"><a xlink:href=".././proc/whm_kick_getacch_ah2.html" xlink:title="whm_kick_getacch_ah2">
-<polygon fill="#d9534f" stroke="#d9534f" points="638,-7093 511,-7093 511,-7069 638,-7069 638,-7093"/>
-<text text-anchor="middle" x="574.5" y="-7078.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_ah2</text>
+<!-- proc~util_sort_index_i4b -->
+<g id="call~~graph~~CallGraph_node637" class="node">
+<title>proc~util_sort_index_i4b</title>
+<g id="a_call~~graph~~CallGraph_node637"><a xlink:href=".././proc/util_sort_index_i4b.html" xlink:title="util_sort_index_i4b">
+<polygon fill="#d9534f" stroke="#d9534f" points="148,-13860 46,-13860 46,-13836 148,-13836 148,-13860"/>
+<text text-anchor="middle" x="97" y="-13845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_index_i4b</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah2 -->
-<g id="call~~graph~~CallGraph_edge582" class="edge">
-<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah2</title>
-<path fill="none" stroke="#000000" d="M385.56,-7113.15C419.89,-7107.28 463.8,-7099.77 500.54,-7093.48"/>
-<polygon fill="#000000" stroke="#000000" points="501.44,-7096.88 510.7,-7091.74 500.26,-7089.98 501.44,-7096.88"/>
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
+<g id="call~~graph~~CallGraph_edge588" class="edge">
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
+<path fill="none" stroke="#000000" d="M869.52,-3470.59C912.11,-3467.06 992.1,-3460.42 1044.06,-3456.1"/>
+<polygon fill="#000000" stroke="#000000" points="1044.39,-3459.59 1054.06,-3455.27 1043.81,-3452.61 1044.39,-3459.59"/>
 </g>
-<!-- proc~lambda_eval_0_err -->
-<g id="call~~graph~~CallGraph_node623" class="node">
-<title>proc~lambda_eval_0_err</title>
-<g id="a_call~~graph~~CallGraph_node623"><a xlink:href=".././proc/lambda_eval_0_err.html" xlink:title="lambda_eval_0_err">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="149.5,-14122 44.5,-14122 44.5,-14098 149.5,-14098 149.5,-14122"/>
-<text text-anchor="middle" x="97" y="-14107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_eval_0_err</text>
-</a>
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
+<g id="call~~graph~~CallGraph_edge590" class="edge">
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
+<path fill="none" stroke="#000000" d="M869.96,-3465.21C892.91,-3459.08 925.55,-3450.23 954,-3442 970.07,-3437.35 973.78,-3435.11 990,-3431 1006.78,-3426.75 1025.26,-3422.77 1041.9,-3419.45"/>
+<polygon fill="#000000" stroke="#000000" points="1042.86,-3422.83 1051.99,-3417.47 1041.51,-3415.96 1042.86,-3422.83"/>
 </g>
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
+<g id="call~~graph~~CallGraph_edge589" class="edge">
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
+<path fill="none" stroke="#000000" d="M869.69,-3475.6C893.06,-3478.34 926.38,-3483.75 954,-3494 971.36,-3500.45 972.69,-3508.4 990,-3515 1004.9,-3520.68 1021.62,-3524.92 1037.2,-3528.05"/>
+<polygon fill="#000000" stroke="#000000" points="1036.77,-3531.53 1047.24,-3529.95 1038.07,-3524.65 1036.77,-3531.53"/>
 </g>
-<!-- proc~util_spill_arr_i4b -->
-<g id="call~~graph~~CallGraph_node624" class="node">
-<title>proc~util_spill_arr_i4b</title>
-<g id="a_call~~graph~~CallGraph_node624"><a xlink:href=".././proc/util_spill_arr_i4b.html" xlink:title="util_spill_arr_I4B">
-<polygon fill="#d9534f" stroke="#d9534f" points="142.5,-14164 51.5,-14164 51.5,-14140 142.5,-14140 142.5,-14164"/>
-<text text-anchor="middle" x="97" y="-14149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_I4B</text>
+<!-- proc~drift_kepu_fchk -->
+<g id="call~~graph~~CallGraph_node655" class="node">
+<title>proc~drift_kepu_fchk</title>
+<g id="a_call~~graph~~CallGraph_node655"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
+<polygon fill="#d9534f" stroke="#d9534f" points="1137,-3506 1052,-3506 1052,-3482 1137,-3482 1137,-3506"/>
+<text text-anchor="middle" x="1094.5" y="-3491.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind -->
-<g id="call~~graph~~CallGraph_edge583" class="edge">
-<title>interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.02,-4461C660.61,-4461 739.07,-4461 789.8,-4461"/>
-<polygon fill="#000000" stroke="#000000" points="789.87,-4464.5 799.87,-4461 789.87,-4457.5 789.87,-4464.5"/>
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
+<g id="call~~graph~~CallGraph_edge587" class="edge">
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
+<path fill="none" stroke="#000000" d="M869.52,-3475.41C911.5,-3478.89 989.83,-3485.39 1041.82,-3489.71"/>
+<polygon fill="#000000" stroke="#000000" points="1041.6,-3493.2 1051.85,-3490.54 1042.17,-3486.23 1041.6,-3493.2"/>
 </g>
-<!-- proc~lambda_destroy -->
-<g id="call~~graph~~CallGraph_node626" class="node">
-<title>proc~lambda_destroy</title>
-<g id="a_call~~graph~~CallGraph_node626"><a xlink:href=".././proc/lambda_destroy.html" xlink:title="lambda_destroy">
-<polygon fill="#d9534f" stroke="#d9534f" points="141.5,-14206 52.5,-14206 52.5,-14182 141.5,-14182 141.5,-14206"/>
-<text text-anchor="middle" x="97" y="-14191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_destroy</text>
+<!-- proc~util_sort_pl&#45;&gt;interface~util_sort_body -->
+<g id="call~~graph~~CallGraph_edge591" class="edge">
+<title>proc~util_sort_pl&#45;&gt;interface~util_sort_body</title>
+<path fill="none" stroke="#000000" d="M359.09,-7159.59C400.89,-7156.36 475.63,-7150.57 524.9,-7146.76"/>
+<polygon fill="#000000" stroke="#000000" points="525.3,-7150.24 535,-7145.98 524.76,-7143.26 525.3,-7150.24"/>
+</g>
+<!-- proc~util_sort_index_sp -->
+<g id="call~~graph~~CallGraph_node641" class="node">
+<title>proc~util_sort_index_sp</title>
+<g id="a_call~~graph~~CallGraph_node641"><a xlink:href=".././proc/util_sort_index_sp.html" xlink:title="util_sort_index_sp">
+<polygon fill="#d9534f" stroke="#d9534f" points="146.5,-13902 47.5,-13902 47.5,-13878 146.5,-13878 146.5,-13902"/>
+<text text-anchor="middle" x="97" y="-13887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_index_sp</text>
 </a>
 </g>
 </g>
 <!-- proc~util_fill_arr_char_string -->
-<g id="call~~graph~~CallGraph_node627" class="node">
+<g id="call~~graph~~CallGraph_node642" class="node">
 <title>proc~util_fill_arr_char_string</title>
-<g id="a_call~~graph~~CallGraph_node627"><a xlink:href=".././proc/util_fill_arr_char_string.html" xlink:title="util_fill_arr_char_string">
-<polygon fill="#d9534f" stroke="#d9534f" points="157.5,-14248 36.5,-14248 36.5,-14224 157.5,-14224 157.5,-14248"/>
-<text text-anchor="middle" x="97" y="-14233.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_char_string</text>
+<g id="a_call~~graph~~CallGraph_node642"><a xlink:href=".././proc/util_fill_arr_char_string.html" xlink:title="util_fill_arr_char_string">
+<polygon fill="#d9534f" stroke="#d9534f" points="157.5,-13944 36.5,-13944 36.5,-13920 157.5,-13920 157.5,-13944"/>
+<text text-anchor="middle" x="97" y="-13929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_char_string</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_encounter_check_tp -->
-<g id="call~~graph~~CallGraph_node628" class="node">
-<title>interface~rmvs_encounter_check_tp</title>
-<g id="a_call~~graph~~CallGraph_node628"><a xlink:href=".././interface/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="166.5,-4452 27.5,-4452 27.5,-4428 166.5,-4428 166.5,-4452"/>
-<text text-anchor="middle" x="97" y="-4437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
+<!-- proc~util_fill_arr_dpvec -->
+<g id="call~~graph~~CallGraph_node644" class="node">
+<title>proc~util_fill_arr_dpvec</title>
+<g id="a_call~~graph~~CallGraph_node644"><a xlink:href=".././proc/util_fill_arr_dpvec.html" xlink:title="util_fill_arr_DPvec">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-13986 48,-13986 48,-13962 146,-13962 146,-13986"/>
+<text text-anchor="middle" x="97" y="-13971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_DPvec</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp -->
-<g id="call~~graph~~CallGraph_edge584" class="edge">
-<title>interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.72,-4440C192.07,-4440 220.98,-4440 247.16,-4440"/>
-<polygon fill="#000000" stroke="#000000" points="247.42,-4443.5 257.42,-4440 247.42,-4436.5 247.42,-4443.5"/>
+<!-- proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2 -->
+<g id="call~~graph~~CallGraph_edge592" class="edge">
+<title>proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2</title>
+<path fill="none" stroke="#000000" d="M906.31,-7045C945.26,-7045 994.26,-7045 1032.36,-7045"/>
+<polygon fill="#000000" stroke="#000000" points="1032.79,-7048.5 1042.79,-7045 1032.79,-7041.5 1032.79,-7048.5"/>
 </g>
-<!-- interface~rmvs_discard_tp -->
-<g id="call~~graph~~CallGraph_node629" class="node">
-<title>interface~rmvs_discard_tp</title>
-<g id="a_call~~graph~~CallGraph_node629"><a xlink:href=".././interface/rmvs_discard_tp.html" xlink:title="rmvs_discard_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-9781 51.5,-9781 51.5,-9757 142.5,-9757 142.5,-9781"/>
-<text text-anchor="middle" x="97" y="-9766.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard_tp</text>
+<!-- proc~util_fill_arr_dp -->
+<g id="call~~graph~~CallGraph_node646" class="node">
+<title>proc~util_fill_arr_dp</title>
+<g id="a_call~~graph~~CallGraph_node646"><a xlink:href=".././proc/util_fill_arr_dp.html" xlink:title="util_fill_arr_DP">
+<polygon fill="#d9534f" stroke="#d9534f" points="138,-14028 56,-14028 56,-14004 138,-14004 138,-14028"/>
+<text text-anchor="middle" x="97" y="-14013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_DP</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_discard_tp&#45;&gt;proc~rmvs_discard_tp -->
-<g id="call~~graph~~CallGraph_edge585" class="edge">
-<title>interface~rmvs_discard_tp&#45;&gt;proc~rmvs_discard_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-9769C179.26,-9769 231.61,-9769 270.99,-9769"/>
-<polygon fill="#000000" stroke="#000000" points="271.22,-9772.5 281.22,-9769 271.22,-9765.5 271.22,-9772.5"/>
-</g>
-<!-- interface~rmvs_io_write_encounter -->
-<g id="call~~graph~~CallGraph_node630" class="node">
-<title>interface~rmvs_io_write_encounter</title>
-<g id="a_call~~graph~~CallGraph_node630"><a xlink:href=".././interface/rmvs_io_write_encounter.html" xlink:title="rmvs_io_write_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="641,-1314 508,-1314 508,-1290 641,-1290 641,-1314"/>
-<text text-anchor="middle" x="574.5" y="-1299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io_write_encounter</text>
+<!-- proc~util_fill_arr_i4b -->
+<g id="call~~graph~~CallGraph_node647" class="node">
+<title>proc~util_fill_arr_i4b</title>
+<g id="a_call~~graph~~CallGraph_node647"><a xlink:href=".././proc/util_fill_arr_i4b.html" xlink:title="util_fill_arr_I4B">
+<polygon fill="#d9534f" stroke="#d9534f" points="138.5,-14070 55.5,-14070 55.5,-14046 138.5,-14046 138.5,-14070"/>
+<text text-anchor="middle" x="97" y="-14055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_I4B</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_io_write_encounter&#45;&gt;proc~rmvs_io_write_encounter -->
-<g id="call~~graph~~CallGraph_edge586" class="edge">
-<title>interface~rmvs_io_write_encounter&#45;&gt;proc~rmvs_io_write_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.19,-1301C678.06,-1300.44 724.23,-1299.74 762.64,-1299.15"/>
-<polygon fill="#000000" stroke="#000000" points="762.79,-1302.65 772.74,-1299 762.69,-1295.65 762.79,-1302.65"/>
+<!-- proc~symba_drift_tp&#45;&gt;helio_drift_body -->
+<g id="call~~graph~~CallGraph_edge593" class="edge">
+<title>proc~symba_drift_tp&#45;&gt;helio_drift_body</title>
+<path fill="none" stroke="#000000" d="M368.54,-12327.94C410.07,-12335.04 474.83,-12346.12 520.42,-12353.92"/>
+<polygon fill="#000000" stroke="#000000" points="519.97,-12357.39 530.42,-12355.63 521.15,-12350.49 519.97,-12357.39"/>
 </g>
-<!-- interface~rmvs_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_node631" class="node">
-<title>interface~rmvs_kick_getacch_tp</title>
-<g id="a_call~~graph~~CallGraph_node631"><a xlink:href=".././interface/rmvs_kick_getacch_tp.html" xlink:title="rmvs_kick_getacch_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-7051 38,-7051 38,-7027 156,-7027 156,-7051"/>
-<text text-anchor="middle" x="97" y="-7036.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick_getacch_tp</text>
+<!-- proc~util_fill_arr_logical -->
+<g id="call~~graph~~CallGraph_node649" class="node">
+<title>proc~util_fill_arr_logical</title>
+<g id="a_call~~graph~~CallGraph_node649"><a xlink:href=".././proc/util_fill_arr_logical.html" xlink:title="util_fill_arr_logical">
+<polygon fill="#d9534f" stroke="#d9534f" points="145.5,-14112 48.5,-14112 48.5,-14088 145.5,-14088 145.5,-14112"/>
+<text text-anchor="middle" x="97" y="-14097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_logical</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_kick_getacch_tp&#45;&gt;proc~rmvs_kick_getacch_tp -->
-<g id="call~~graph~~CallGraph_edge587" class="edge">
-<title>interface~rmvs_kick_getacch_tp&#45;&gt;proc~rmvs_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-7039C187.08,-7039 225.33,-7039 257.7,-7039"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-7042.5 267.98,-7039 257.98,-7035.5 257.98,-7042.5"/>
+<!-- proc~util_append_arr_dp -->
+<g id="call~~graph~~CallGraph_node650" class="node">
+<title>proc~util_append_arr_dp</title>
+<g id="a_call~~graph~~CallGraph_node650"><a xlink:href=".././proc/util_append_arr_dp.html" xlink:title="util_append_arr_DP">
+<polygon fill="#d9534f" stroke="#d9534f" points="893.5,-9871 785.5,-9871 785.5,-9847 893.5,-9847 893.5,-9871"/>
+<text text-anchor="middle" x="839.5" y="-9856.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_DP</text>
+</a>
 </g>
-<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
-<g id="call~~graph~~CallGraph_edge588" class="edge">
-<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M1133.2,-6123C1176.98,-6123 1249.07,-6123 1295.13,-6123"/>
-<polygon fill="#000000" stroke="#000000" points="1295.4,-6126.5 1305.4,-6123 1295.4,-6119.5 1295.4,-6126.5"/>
 </g>
-<!-- interface~rmvs_setup_pl -->
-<g id="call~~graph~~CallGraph_node634" class="node">
-<title>interface~rmvs_setup_pl</title>
-<g id="a_call~~graph~~CallGraph_node634"><a xlink:href=".././interface/rmvs_setup_pl.html" xlink:title="rmvs_setup_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="138,-7933 56,-7933 56,-7909 138,-7909 138,-7933"/>
-<text text-anchor="middle" x="97" y="-7918.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_pl</text>
-</a>
+<!-- proc~util_append_arr_dp&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge594" class="edge">
+<title>proc~util_append_arr_dp&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M893.54,-9867.8C941.33,-9875.74 1010.52,-9887.22 1053.71,-9894.39"/>
+<polygon fill="#000000" stroke="#000000" points="1053.4,-9897.89 1063.84,-9896.08 1054.55,-9890.99 1053.4,-9897.89"/>
 </g>
+<!-- proc~util_sort_tp&#45;&gt;interface~util_sort_body -->
+<g id="call~~graph~~CallGraph_edge595" class="edge">
+<title>proc~util_sort_tp&#45;&gt;interface~util_sort_body</title>
+<path fill="none" stroke="#000000" d="M359.59,-7122.96C401.42,-7126.88 475.62,-7133.83 524.69,-7138.43"/>
+<polygon fill="#000000" stroke="#000000" points="524.47,-7141.92 534.75,-7139.37 525.12,-7134.95 524.47,-7141.92"/>
 </g>
-<!-- interface~rmvs_setup_pl&#45;&gt;proc~rmvs_setup_pl -->
-<g id="call~~graph~~CallGraph_edge589" class="edge">
-<title>interface~rmvs_setup_pl&#45;&gt;proc~rmvs_setup_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.24,-7921C176.54,-7921 234.31,-7921 275.65,-7921"/>
-<polygon fill="#000000" stroke="#000000" points="275.78,-7924.5 285.78,-7921 275.78,-7917.5 275.78,-7924.5"/>
+<!-- proc~util_append_arr_i4b -->
+<g id="call~~graph~~CallGraph_node652" class="node">
+<title>proc~util_append_arr_i4b</title>
+<g id="a_call~~graph~~CallGraph_node652"><a xlink:href=".././proc/util_append_arr_i4b.html" xlink:title="util_append_arr_I4B">
+<polygon fill="#d9534f" stroke="#d9534f" points="894,-9829 785,-9829 785,-9805 894,-9805 894,-9829"/>
+<text text-anchor="middle" x="839.5" y="-9814.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_I4B</text>
+</a>
 </g>
-<!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
-<g id="call~~graph~~CallGraph_edge590" class="edge">
-<title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M1126.28,-6086.32C1169.08,-6093.72 1246.78,-6107.15 1295.36,-6115.54"/>
-<polygon fill="#000000" stroke="#000000" points="1294.81,-6119 1305.26,-6117.25 1296,-6112.1 1294.81,-6119"/>
 </g>
-<!-- interface~rmvs_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_node636" class="node">
-<title>interface~rmvs_setup_initialize_system</title>
-<g id="a_call~~graph~~CallGraph_node636"><a xlink:href=".././interface/rmvs_setup_initialize_system.html" xlink:title="rmvs_setup_initialize_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="172.5,-8353 21.5,-8353 21.5,-8329 172.5,-8329 172.5,-8353"/>
-<text text-anchor="middle" x="97" y="-8338.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_initialize_system</text>
+<!-- proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge596" class="edge">
+<title>proc~util_append_arr_i4b&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M894.27,-9824.22C913.38,-9827.49 934.88,-9832.01 954,-9838 992.34,-9850.01 1034.04,-9869.8 1061.77,-9884"/>
+<polygon fill="#000000" stroke="#000000" points="1060.48,-9887.27 1070.97,-9888.77 1063.7,-9881.06 1060.48,-9887.27"/>
+</g>
+<!-- proc~util_fill_arr_info -->
+<g id="call~~graph~~CallGraph_node653" class="node">
+<title>proc~util_fill_arr_info</title>
+<g id="a_call~~graph~~CallGraph_node653"><a xlink:href=".././proc/util_fill_arr_info.html" xlink:title="util_fill_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="139.5,-7762 54.5,-7762 54.5,-7738 139.5,-7738 139.5,-7762"/>
+<text text-anchor="middle" x="97" y="-7747.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_info</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_setup_initialize_system&#45;&gt;proc~rmvs_setup_initialize_system -->
-<g id="call~~graph~~CallGraph_edge591" class="edge">
-<title>interface~rmvs_setup_initialize_system&#45;&gt;proc~rmvs_setup_initialize_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.66,-8341C194.5,-8341 218.55,-8341 240.99,-8341"/>
-<polygon fill="#000000" stroke="#000000" points="241.18,-8344.5 251.18,-8341 241.18,-8337.5 241.18,-8344.5"/>
+<!-- proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<g id="call~~graph~~CallGraph_edge597" class="edge">
+<title>proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M139.55,-7750C169.73,-7750 211.46,-7750 247.8,-7750"/>
+<polygon fill="#000000" stroke="#000000" points="247.89,-7753.5 257.89,-7750 247.89,-7746.5 247.89,-7753.5"/>
 </g>
-<!-- proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0 -->
-<g id="call~~graph~~CallGraph_edge592" class="edge">
-<title>proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0</title>
-<path fill="none" stroke="#000000" d="M386.18,-7165C420.4,-7165 463.97,-7165 500.48,-7165"/>
-<polygon fill="#000000" stroke="#000000" points="500.58,-7168.5 510.58,-7165 500.58,-7161.5 500.58,-7168.5"/>
+<!-- nf90_close -->
+<g id="call~~graph~~CallGraph_node782" class="node">
+<title>nf90_close</title>
+<polygon fill="#777777" stroke="#777777" points="606.5,-8208 542.5,-8208 542.5,-8184 606.5,-8184 606.5,-8208"/>
+<text text-anchor="middle" x="574.5" y="-8193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_close</text>
 </g>
-<!-- interface~rmvs_setup_tp -->
-<g id="call~~graph~~CallGraph_node639" class="node">
-<title>interface~rmvs_setup_tp</title>
-<g id="a_call~~graph~~CallGraph_node639"><a xlink:href=".././interface/rmvs_setup_tp.html" xlink:title="rmvs_setup_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-4998 55.5,-4998 55.5,-4974 138.5,-4974 138.5,-4998"/>
-<text text-anchor="middle" x="97" y="-4983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup_tp</text>
-</a>
+<!-- proc~netcdf_close&#45;&gt;nf90_close -->
+<g id="call~~graph~~CallGraph_edge598" class="edge">
+<title>proc~netcdf_close&#45;&gt;nf90_close</title>
+<path fill="none" stroke="#000000" d="M363.7,-8196C408.45,-8196 485.02,-8196 532.24,-8196"/>
+<polygon fill="#000000" stroke="#000000" points="532.42,-8199.5 542.42,-8196 532.42,-8192.5 532.42,-8199.5"/>
 </g>
+<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
+<g id="call~~graph~~CallGraph_edge599" class="edge">
+<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
+<path fill="none" stroke="#000000" d="M1137.27,-3486.78C1176.3,-3480.03 1234.97,-3469.89 1278.91,-3462.3"/>
+<polygon fill="#000000" stroke="#000000" points="1279.63,-3465.73 1288.89,-3460.57 1278.44,-3458.83 1279.63,-3465.73"/>
 </g>
-<!-- interface~rmvs_setup_tp&#45;&gt;proc~rmvs_setup_tp -->
-<g id="call~~graph~~CallGraph_edge593" class="edge">
-<title>interface~rmvs_setup_tp&#45;&gt;proc~rmvs_setup_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-4986C176.9,-4986 234.01,-4986 275.12,-4986"/>
-<polygon fill="#000000" stroke="#000000" points="275.21,-4989.5 285.21,-4986 275.21,-4982.5 275.21,-4989.5"/>
+<!-- interface~helio_drift_body&#45;&gt;proc~helio_drift_body -->
+<g id="call~~graph~~CallGraph_edge600" class="edge">
+<title>interface~helio_drift_body&#45;&gt;proc~helio_drift_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.63,-1963C664.21,-1963 736.15,-1963 785.23,-1963"/>
+<polygon fill="#000000" stroke="#000000" points="785.34,-1966.5 795.34,-1963 785.34,-1959.5 785.34,-1966.5"/>
 </g>
-<!-- proc~util_spill_arr_i8b -->
-<g id="call~~graph~~CallGraph_node640" class="node">
-<title>proc~util_spill_arr_i8b</title>
-<g id="a_call~~graph~~CallGraph_node640"><a xlink:href=".././proc/util_spill_arr_i8b.html" xlink:title="util_spill_arr_I8B">
-<polygon fill="#d9534f" stroke="#d9534f" points="142.5,-14290 51.5,-14290 51.5,-14266 142.5,-14266 142.5,-14290"/>
-<text text-anchor="middle" x="97" y="-14275.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_I8B</text>
+<!-- proc~util_sort_rearrange_arr_char_string -->
+<g id="call~~graph~~CallGraph_node657" class="node">
+<title>proc~util_sort_rearrange_arr_char_string</title>
+<g id="a_call~~graph~~CallGraph_node657"><a xlink:href=".././proc/util_sort_rearrange_arr_char_string.html" xlink:title="util_sort_rearrange_arr_char_string">
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-14154 6,-14154 6,-14130 188,-14130 188,-14154"/>
+<text text-anchor="middle" x="97" y="-14139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_char_string</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_append_pl -->
-<g id="call~~graph~~CallGraph_node641" class="node">
-<title>interface~rmvs_util_append_pl</title>
-<g id="a_call~~graph~~CallGraph_node641"><a xlink:href=".././interface/rmvs_util_append_pl.html" xlink:title="rmvs_util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-1356 518.5,-1356 518.5,-1332 630.5,-1332 630.5,-1356"/>
-<text text-anchor="middle" x="574.5" y="-1341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_pl</text>
+<!-- interface~helio_drift_pl -->
+<g id="call~~graph~~CallGraph_node658" class="node">
+<title>interface~helio_drift_pl</title>
+<g id="a_call~~graph~~CallGraph_node658"><a xlink:href=".././interface/helio_drift_pl.html" xlink:title="helio_drift_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="133.5,-1996 60.5,-1996 60.5,-1972 133.5,-1972 133.5,-1996"/>
+<text text-anchor="middle" x="97" y="-1981.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_append_pl&#45;&gt;proc~rmvs_util_append_pl -->
-<g id="call~~graph~~CallGraph_edge594" class="edge">
-<title>interface~rmvs_util_append_pl&#45;&gt;proc~rmvs_util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-1343.16C672.19,-1342.53 729.31,-1341.66 773.16,-1340.99"/>
-<polygon fill="#000000" stroke="#000000" points="773.49,-1344.49 783.44,-1340.84 773.39,-1337.49 773.49,-1344.49"/>
+<!-- interface~helio_drift_pl&#45;&gt;proc~helio_drift_pl -->
+<g id="call~~graph~~CallGraph_edge601" class="edge">
+<title>interface~helio_drift_pl&#45;&gt;proc~helio_drift_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M133.62,-1984C173.08,-1984 236.81,-1984 280.01,-1984"/>
+<polygon fill="#000000" stroke="#000000" points="280.25,-1987.5 290.25,-1984 280.25,-1980.5 280.25,-1987.5"/>
 </g>
-<!-- proc~util_fill_arr_dp -->
-<g id="call~~graph~~CallGraph_node642" class="node">
-<title>proc~util_fill_arr_dp</title>
-<g id="a_call~~graph~~CallGraph_node642"><a xlink:href=".././proc/util_fill_arr_dp.html" xlink:title="util_fill_arr_DP">
-<polygon fill="#d9534f" stroke="#d9534f" points="138,-14332 56,-14332 56,-14308 138,-14308 138,-14332"/>
-<text text-anchor="middle" x="97" y="-14317.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_DP</text>
+<!-- proc~util_fill_body&#45;&gt;interface~util_fill~2 -->
+<g id="call~~graph~~CallGraph_edge602" class="edge">
+<title>proc~util_fill_body&#45;&gt;interface~util_fill~2</title>
+<path fill="none" stroke="#000000" d="M875.15,-7864C922.93,-7864 1008.66,-7864 1057.27,-7864"/>
+<polygon fill="#000000" stroke="#000000" points="1057.34,-7867.5 1067.34,-7864 1057.34,-7860.5 1057.34,-7867.5"/>
+</g>
+<!-- proc~util_append_arr_info -->
+<g id="call~~graph~~CallGraph_node660" class="node">
+<title>proc~util_append_arr_info</title>
+<g id="a_call~~graph~~CallGraph_node660"><a xlink:href=".././proc/util_append_arr_info.html" xlink:title="util_append_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="895,-9787 784,-9787 784,-9763 895,-9763 895,-9787"/>
+<text text-anchor="middle" x="839.5" y="-9772.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_arr_i4b -->
-<g id="call~~graph~~CallGraph_node643" class="node">
-<title>proc~util_fill_arr_i4b</title>
-<g id="a_call~~graph~~CallGraph_node643"><a xlink:href=".././proc/util_fill_arr_i4b.html" xlink:title="util_fill_arr_I4B">
-<polygon fill="#d9534f" stroke="#d9534f" points="138.5,-14374 55.5,-14374 55.5,-14350 138.5,-14350 138.5,-14374"/>
-<text text-anchor="middle" x="97" y="-14359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_I4B</text>
+<!-- proc~util_append_arr_info&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge603" class="edge">
+<title>proc~util_append_arr_info&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M895.14,-9779.91C914.32,-9782.97 935.65,-9787.94 954,-9796 1002.08,-9817.13 1048.97,-9857.75 1074.27,-9881.8"/>
+<polygon fill="#000000" stroke="#000000" points="1072.07,-9884.55 1081.69,-9888.98 1076.94,-9879.52 1072.07,-9884.55"/>
+</g>
+<!-- interface~helio_drift_tp -->
+<g id="call~~graph~~CallGraph_node661" class="node">
+<title>interface~helio_drift_tp</title>
+<g id="a_call~~graph~~CallGraph_node661"><a xlink:href=".././interface/helio_drift_tp.html" xlink:title="helio_drift_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="134,-1954 60,-1954 60,-1930 134,-1930 134,-1954"/>
+<text text-anchor="middle" x="97" y="-1939.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_append_tp -->
-<g id="call~~graph~~CallGraph_node644" class="node">
-<title>interface~rmvs_util_append_tp</title>
-<g id="a_call~~graph~~CallGraph_node644"><a xlink:href=".././interface/rmvs_util_append_tp.html" xlink:title="rmvs_util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="630.5,-1272 518.5,-1272 518.5,-1248 630.5,-1248 630.5,-1272"/>
-<text text-anchor="middle" x="574.5" y="-1257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_append_tp</text>
+<!-- interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp -->
+<g id="call~~graph~~CallGraph_edge604" class="edge">
+<title>interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.13,-1942C173.45,-1942 236.46,-1942 279.46,-1942"/>
+<polygon fill="#000000" stroke="#000000" points="279.67,-1945.5 289.66,-1942 279.66,-1938.5 279.67,-1945.5"/>
+</g>
+<!-- interface~helio_drift_linear_pl -->
+<g id="call~~graph~~CallGraph_node662" class="node">
+<title>interface~helio_drift_linear_pl</title>
+<g id="a_call~~graph~~CallGraph_node662"><a xlink:href=".././interface/helio_drift_linear_pl.html" xlink:title="helio_drift_linear_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="150,-6559 44,-6559 44,-6535 150,-6535 150,-6559"/>
+<text text-anchor="middle" x="97" y="-6544.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_append_tp&#45;&gt;proc~rmvs_util_append_tp -->
-<g id="call~~graph~~CallGraph_edge595" class="edge">
-<title>interface~rmvs_util_append_tp&#45;&gt;proc~rmvs_util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M630.63,-1259.16C672.19,-1258.53 729.31,-1257.66 773.16,-1256.99"/>
-<polygon fill="#000000" stroke="#000000" points="773.49,-1260.49 783.44,-1256.84 773.39,-1253.49 773.49,-1260.49"/>
+<!-- interface~helio_drift_linear_pl&#45;&gt;proc~helio_drift_linear_pl -->
+<g id="call~~graph~~CallGraph_edge605" class="edge">
+<title>interface~helio_drift_linear_pl&#45;&gt;proc~helio_drift_linear_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-6547C183.76,-6547 227.89,-6547 263.52,-6547"/>
+<polygon fill="#000000" stroke="#000000" points="263.81,-6550.5 273.81,-6547 263.81,-6543.5 263.81,-6550.5"/>
 </g>
-<!-- interface~rmvs_util_fill_pl -->
-<g id="call~~graph~~CallGraph_node645" class="node">
-<title>interface~rmvs_util_fill_pl</title>
-<g id="a_call~~graph~~CallGraph_node645"><a xlink:href=".././interface/rmvs_util_fill_pl.html" xlink:title="rmvs_util_fill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="617,-692 532,-692 532,-668 617,-668 617,-692"/>
-<text text-anchor="middle" x="574.5" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_pl</text>
+<!-- interface~helio_drift_linear_tp -->
+<g id="call~~graph~~CallGraph_node663" class="node">
+<title>interface~helio_drift_linear_tp</title>
+<g id="a_call~~graph~~CallGraph_node663"><a xlink:href=".././interface/helio_drift_linear_tp.html" xlink:title="helio_drift_linear_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="150,-6643 44,-6643 44,-6619 150,-6619 150,-6643"/>
+<text text-anchor="middle" x="97" y="-6628.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_linear_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_fill_pl&#45;&gt;proc~rmvs_util_fill_pl -->
-<g id="call~~graph~~CallGraph_edge596" class="edge">
-<title>interface~rmvs_util_fill_pl&#45;&gt;proc~rmvs_util_fill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.17,-680C663.01,-680 736.75,-680 786.38,-680"/>
-<polygon fill="#000000" stroke="#000000" points="786.59,-683.5 796.59,-680 786.59,-676.5 786.59,-683.5"/>
+<!-- interface~helio_drift_linear_tp&#45;&gt;proc~helio_drift_linear_tp -->
+<g id="call~~graph~~CallGraph_edge606" class="edge">
+<title>interface~helio_drift_linear_tp&#45;&gt;proc~helio_drift_linear_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.02,-6631C183.76,-6631 227.89,-6631 263.52,-6631"/>
+<polygon fill="#000000" stroke="#000000" points="263.81,-6634.5 273.81,-6631 263.81,-6627.5 263.81,-6634.5"/>
 </g>
-<!-- interface~rmvs_util_fill_tp -->
-<g id="call~~graph~~CallGraph_node646" class="node">
-<title>interface~rmvs_util_fill_tp</title>
-<g id="a_call~~graph~~CallGraph_node646"><a xlink:href=".././interface/rmvs_util_fill_tp.html" xlink:title="rmvs_util_fill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="617.5,-734 531.5,-734 531.5,-710 617.5,-710 617.5,-734"/>
-<text text-anchor="middle" x="574.5" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_fill_tp</text>
+<!-- interface~helio_gr_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node664" class="node">
+<title>interface~helio_gr_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node664"><a xlink:href=".././interface/helio_gr_kick_getacch_pl.html" xlink:title="helio_gr_kick_getacch_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-4126 30.5,-4126 30.5,-4102 163.5,-4102 163.5,-4126"/>
+<text text-anchor="middle" x="97" y="-4111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_fill_tp&#45;&gt;proc~rmvs_util_fill_tp -->
-<g id="call~~graph~~CallGraph_edge597" class="edge">
-<title>interface~rmvs_util_fill_tp&#45;&gt;proc~rmvs_util_fill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.76,-722C663.58,-722 736.77,-722 786.18,-722"/>
-<polygon fill="#000000" stroke="#000000" points="786.35,-725.5 796.35,-722 786.35,-718.5 786.35,-725.5"/>
+<!-- interface~helio_gr_kick_getacch_pl&#45;&gt;proc~helio_gr_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_edge607" class="edge">
+<title>interface~helio_gr_kick_getacch_pl&#45;&gt;proc~helio_gr_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-4114C190.71,-4114 222.24,-4114 250.27,-4114"/>
+<polygon fill="#000000" stroke="#000000" points="250.43,-4117.5 260.43,-4114 250.43,-4110.5 250.43,-4117.5"/>
 </g>
-<!-- proc~util_fill_arr_logical -->
-<g id="call~~graph~~CallGraph_node647" class="node">
-<title>proc~util_fill_arr_logical</title>
-<g id="a_call~~graph~~CallGraph_node647"><a xlink:href=".././proc/util_fill_arr_logical.html" xlink:title="util_fill_arr_logical">
-<polygon fill="#d9534f" stroke="#d9534f" points="145.5,-14416 48.5,-14416 48.5,-14392 145.5,-14392 145.5,-14416"/>
-<text text-anchor="middle" x="97" y="-14401.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_logical</text>
-</a>
+<!-- proc~util_fill_pl&#45;&gt;interface~util_fill_body -->
+<g id="call~~graph~~CallGraph_edge609" class="edge">
+<title>proc~util_fill_pl&#45;&gt;interface~util_fill_body</title>
+<path fill="none" stroke="#000000" d="M355.21,-7891.56C397.14,-7886.27 477.99,-7876.06 528.66,-7869.66"/>
+<polygon fill="#000000" stroke="#000000" points="529.2,-7873.12 538.68,-7868.4 528.32,-7866.18 529.2,-7873.12"/>
 </g>
+<!-- proc~util_fill_pl&#45;&gt;interface~util_fill~2 -->
+<g id="call~~graph~~CallGraph_edge608" class="edge">
+<title>proc~util_fill_pl&#45;&gt;interface~util_fill~2</title>
+<path fill="none" stroke="#000000" d="M355.22,-7895.86C442.47,-7898.33 723,-7904.15 954,-7885 989.28,-7882.08 1029.19,-7875.76 1057.25,-7870.81"/>
+<polygon fill="#000000" stroke="#000000" points="1058.17,-7874.21 1067.4,-7869 1056.94,-7867.32 1058.17,-7874.21"/>
 </g>
-<!-- interface~rmvs_util_resize_pl -->
-<g id="call~~graph~~CallGraph_node648" class="node">
-<title>interface~rmvs_util_resize_pl</title>
-<g id="a_call~~graph~~CallGraph_node648"><a xlink:href=".././interface/rmvs_util_resize_pl.html" xlink:title="rmvs_util_resize_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="626.5,-5250 522.5,-5250 522.5,-5226 626.5,-5226 626.5,-5250"/>
-<text text-anchor="middle" x="574.5" y="-5235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_pl</text>
+<!-- interface~helio_gr_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node667" class="node">
+<title>interface~helio_gr_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node667"><a xlink:href=".././interface/helio_gr_kick_getacch_tp.html" xlink:title="helio_gr_kick_getacch_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="163.5,-4252 30.5,-4252 30.5,-4228 163.5,-4228 163.5,-4252"/>
+<text text-anchor="middle" x="97" y="-4237.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_resize_pl&#45;&gt;proc~rmvs_util_resize_pl -->
-<g id="call~~graph~~CallGraph_edge598" class="edge">
-<title>interface~rmvs_util_resize_pl&#45;&gt;proc~rmvs_util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.52,-5238C669.57,-5238 731.32,-5238 777.08,-5238"/>
-<polygon fill="#000000" stroke="#000000" points="777.17,-5241.5 787.17,-5238 777.17,-5234.5 777.17,-5241.5"/>
+<!-- interface~helio_gr_kick_getacch_tp&#45;&gt;proc~helio_gr_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_edge610" class="edge">
+<title>interface~helio_gr_kick_getacch_tp&#45;&gt;proc~helio_gr_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.64,-4240C190.71,-4240 222.24,-4240 250.27,-4240"/>
+<polygon fill="#000000" stroke="#000000" points="250.43,-4243.5 260.43,-4240 250.43,-4236.5 250.43,-4243.5"/>
 </g>
-<!-- interface~rmvs_util_resize_tp -->
-<g id="call~~graph~~CallGraph_node649" class="node">
-<title>interface~rmvs_util_resize_tp</title>
-<g id="a_call~~graph~~CallGraph_node649"><a xlink:href=".././interface/rmvs_util_resize_tp.html" xlink:title="rmvs_util_resize_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="627,-5334 522,-5334 522,-5310 627,-5310 627,-5334"/>
-<text text-anchor="middle" x="574.5" y="-5319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_resize_tp</text>
+<!-- interface~helio_gr_p4_pl -->
+<g id="call~~graph~~CallGraph_node668" class="node">
+<title>interface~helio_gr_p4_pl</title>
+<g id="a_call~~graph~~CallGraph_node668"><a xlink:href=".././interface/helio_gr_p4_pl.html" xlink:title="helio_gr_p4_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="138.5,-4420 55.5,-4420 55.5,-4396 138.5,-4396 138.5,-4420"/>
+<text text-anchor="middle" x="97" y="-4405.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_resize_tp&#45;&gt;proc~rmvs_util_resize_tp -->
-<g id="call~~graph~~CallGraph_edge599" class="edge">
-<title>interface~rmvs_util_resize_tp&#45;&gt;proc~rmvs_util_resize_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M627.15,-5322C670.12,-5322 731.41,-5322 776.93,-5322"/>
-<polygon fill="#000000" stroke="#000000" points="776.97,-5325.5 786.97,-5322 776.97,-5318.5 776.97,-5325.5"/>
+<!-- interface~helio_gr_p4_pl&#45;&gt;proc~helio_gr_p4_pl -->
+<g id="call~~graph~~CallGraph_edge611" class="edge">
+<title>interface~helio_gr_p4_pl&#45;&gt;proc~helio_gr_p4_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.76,-4408C176.9,-4408 234.01,-4408 275.12,-4408"/>
+<polygon fill="#000000" stroke="#000000" points="275.21,-4411.5 285.21,-4408 275.21,-4404.5 275.21,-4411.5"/>
 </g>
-<!-- interface~rmvs_util_sort_pl -->
-<g id="call~~graph~~CallGraph_node651" class="node">
-<title>interface~rmvs_util_sort_pl</title>
-<g id="a_call~~graph~~CallGraph_node651"><a xlink:href=".././interface/rmvs_util_sort_pl.html" xlink:title="rmvs_util_sort_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="144,-10304 50,-10304 50,-10280 144,-10280 144,-10304"/>
-<text text-anchor="middle" x="97" y="-10289.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_pl</text>
+<!-- proc~util_append_arr_logical -->
+<g id="call~~graph~~CallGraph_node669" class="node">
+<title>proc~util_append_arr_logical</title>
+<g id="a_call~~graph~~CallGraph_node669"><a xlink:href=".././proc/util_append_arr_logical.html" xlink:title="util_append_arr_logical">
+<polygon fill="#d9534f" stroke="#d9534f" points="901.5,-9745 777.5,-9745 777.5,-9721 901.5,-9721 901.5,-9745"/>
+<text text-anchor="middle" x="839.5" y="-9730.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_arr_logical</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_sort_pl&#45;&gt;proc~rmvs_util_sort_pl -->
-<g id="call~~graph~~CallGraph_edge600" class="edge">
-<title>interface~rmvs_util_sort_pl&#45;&gt;proc~rmvs_util_sort_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-10292C180.45,-10292 231.21,-10292 269.87,-10292"/>
-<polygon fill="#000000" stroke="#000000" points="269.93,-10295.5 279.93,-10292 269.93,-10288.5 269.93,-10295.5"/>
+<!-- proc~util_append_arr_logical&#45;&gt;interface~util_resize~2 -->
+<g id="call~~graph~~CallGraph_edge612" class="edge">
+<title>proc~util_append_arr_logical&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M901.78,-9737.19C919.41,-9740.25 938.15,-9745.4 954,-9754 1010.85,-9784.86 1057.99,-9847.21 1080.05,-9879.91"/>
+<polygon fill="#000000" stroke="#000000" points="1077.4,-9882.25 1085.84,-9888.66 1083.24,-9878.39 1077.4,-9882.25"/>
 </g>
-<!-- interface~rmvs_util_sort_tp -->
-<g id="call~~graph~~CallGraph_node652" class="node">
-<title>interface~rmvs_util_sort_tp</title>
-<g id="a_call~~graph~~CallGraph_node652"><a xlink:href=".././interface/rmvs_util_sort_tp.html" xlink:title="rmvs_util_sort_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="144,-5656 50,-5656 50,-5632 144,-5632 144,-5656"/>
-<text text-anchor="middle" x="97" y="-5641.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_tp</text>
+<!-- interface~helio_gr_p4_tp -->
+<g id="call~~graph~~CallGraph_node670" class="node">
+<title>interface~helio_gr_p4_tp</title>
+<g id="a_call~~graph~~CallGraph_node670"><a xlink:href=".././interface/helio_gr_p4_tp.html" xlink:title="helio_gr_p4_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="139,-4546 55,-4546 55,-4522 139,-4522 139,-4546"/>
+<text text-anchor="middle" x="97" y="-4531.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr_p4_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_sort_tp&#45;&gt;proc~rmvs_util_sort_tp -->
-<g id="call~~graph~~CallGraph_edge601" class="edge">
-<title>interface~rmvs_util_sort_tp&#45;&gt;proc~rmvs_util_sort_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-5644C180.45,-5644 231.21,-5644 269.87,-5644"/>
-<polygon fill="#000000" stroke="#000000" points="269.93,-5647.5 279.93,-5644 269.93,-5640.5 269.93,-5647.5"/>
+<!-- interface~helio_gr_p4_tp&#45;&gt;proc~helio_gr_p4_tp -->
+<g id="call~~graph~~CallGraph_edge613" class="edge">
+<title>interface~helio_gr_p4_tp&#45;&gt;proc~helio_gr_p4_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.03,-4534C177.08,-4534 233.86,-4534 274.86,-4534"/>
+<polygon fill="#000000" stroke="#000000" points="274.92,-4537.5 284.92,-4534 274.92,-4530.5 274.92,-4537.5"/>
 </g>
-<!-- proc~util_fill_arr_info -->
-<g id="call~~graph~~CallGraph_node654" class="node">
-<title>proc~util_fill_arr_info</title>
-<g id="a_call~~graph~~CallGraph_node654"><a xlink:href=".././proc/util_fill_arr_info.html" xlink:title="util_fill_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="139.5,-10052 54.5,-10052 54.5,-10028 139.5,-10028 139.5,-10052"/>
-<text text-anchor="middle" x="97" y="-10037.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_info</text>
+<!-- interface~helio_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_node671" class="node">
+<title>interface~helio_kick_getacch_pl</title>
+<g id="a_call~~graph~~CallGraph_node671"><a xlink:href=".././interface/helio_kick_getacch_pl.html" xlink:title="helio_kick_getacch_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="155.5,-5458 38.5,-5458 38.5,-5434 155.5,-5434 155.5,-5458"/>
+<text text-anchor="middle" x="97" y="-5443.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
-<g id="call~~graph~~CallGraph_edge602" class="edge">
-<title>proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M139.55,-10040C169.73,-10040 211.46,-10040 247.8,-10040"/>
-<polygon fill="#000000" stroke="#000000" points="247.89,-10043.5 257.89,-10040 247.89,-10036.5 247.89,-10043.5"/>
+<!-- interface~helio_kick_getacch_pl&#45;&gt;proc~helio_kick_getacch_pl -->
+<g id="call~~graph~~CallGraph_edge614" class="edge">
+<title>interface~helio_kick_getacch_pl&#45;&gt;proc~helio_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.53,-5446C186.72,-5446 225.45,-5446 258.11,-5446"/>
+<polygon fill="#000000" stroke="#000000" points="258.48,-5449.5 268.48,-5446 258.48,-5442.5 258.48,-5449.5"/>
 </g>
-<!-- interface~rmvs_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_node655" class="node">
-<title>interface~rmvs_util_sort_rearrange_pl</title>
-<g id="a_call~~graph~~CallGraph_node655"><a xlink:href=".././interface/rmvs_util_sort_rearrange_pl.html" xlink:title="rmvs_util_sort_rearrange_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-4032 23.5,-4032 23.5,-4008 170.5,-4008 170.5,-4032"/>
-<text text-anchor="middle" x="97" y="-4017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_pl</text>
+<!-- interface~helio_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_node672" class="node">
+<title>interface~helio_kick_getacch_tp</title>
+<g id="a_call~~graph~~CallGraph_node672"><a xlink:href=".././interface/helio_kick_getacch_tp.html" xlink:title="helio_kick_getacch_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="156,-5836 38,-5836 38,-5812 156,-5812 156,-5836"/>
+<text text-anchor="middle" x="97" y="-5821.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_sort_rearrange_pl&#45;&gt;proc~rmvs_util_sort_rearrange_pl -->
-<g id="call~~graph~~CallGraph_edge603" class="edge">
-<title>interface~rmvs_util_sort_rearrange_pl&#45;&gt;proc~rmvs_util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.77,-4020C193.8,-4020 219.43,-4020 243.12,-4020"/>
-<polygon fill="#000000" stroke="#000000" points="243.14,-4023.5 253.14,-4020 243.14,-4016.5 243.14,-4023.5"/>
+<!-- interface~helio_kick_getacch_tp&#45;&gt;proc~helio_kick_getacch_tp -->
+<g id="call~~graph~~CallGraph_edge615" class="edge">
+<title>interface~helio_kick_getacch_tp&#45;&gt;proc~helio_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.12,-5824C187.08,-5824 225.33,-5824 257.7,-5824"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-5827.5 267.98,-5824 257.98,-5820.5 257.98,-5827.5"/>
 </g>
-<!-- interface~rmvs_util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_node658" class="node">
-<title>interface~rmvs_util_sort_rearrange_tp</title>
-<g id="a_call~~graph~~CallGraph_node658"><a xlink:href=".././interface/rmvs_util_sort_rearrange_tp.html" xlink:title="rmvs_util_sort_rearrange_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="171,-4158 23,-4158 23,-4134 171,-4134 171,-4158"/>
-<text text-anchor="middle" x="97" y="-4143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_sort_rearrange_tp</text>
+<!-- interface~helio_kick_vb_pl -->
+<g id="call~~graph~~CallGraph_node673" class="node">
+<title>interface~helio_kick_vb_pl</title>
+<g id="a_call~~graph~~CallGraph_node673"><a xlink:href=".././interface/helio_kick_vb_pl.html" xlink:title="helio_kick_vb_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-5794 51.5,-5794 51.5,-5770 142.5,-5770 142.5,-5794"/>
+<text text-anchor="middle" x="97" y="-5779.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_util_sort_rearrange_tp&#45;&gt;proc~rmvs_util_sort_rearrange_tp -->
-<g id="call~~graph~~CallGraph_edge604" class="edge">
-<title>interface~rmvs_util_sort_rearrange_tp&#45;&gt;proc~rmvs_util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M171.08,-4146C193.89,-4146 219.21,-4146 242.67,-4146"/>
-<polygon fill="#000000" stroke="#000000" points="242.94,-4149.5 252.94,-4146 242.94,-4142.5 242.94,-4149.5"/>
-</g>
-<!-- proc~util_spill_arr_info -->
-<g id="call~~graph~~CallGraph_node659" class="node">
-<title>proc~util_spill_arr_info</title>
-<g id="a_call~~graph~~CallGraph_node659"><a xlink:href=".././proc/util_spill_arr_info.html" xlink:title="util_spill_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="143.5,-10010 50.5,-10010 50.5,-9986 143.5,-9986 143.5,-10010"/>
-<text text-anchor="middle" x="97" y="-9995.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_info</text>
-</a>
+<!-- interface~helio_kick_vb_pl&#45;&gt;proc~helio_kick_vb_pl -->
+<g id="call~~graph~~CallGraph_edge616" class="edge">
+<title>interface~helio_kick_vb_pl&#45;&gt;proc~helio_kick_vb_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-5782C179.26,-5782 231.61,-5782 270.99,-5782"/>
+<polygon fill="#000000" stroke="#000000" points="271.22,-5785.5 281.22,-5782 271.22,-5778.5 271.22,-5785.5"/>
 </g>
+<!-- nf90_def_dim -->
+<g id="call~~graph~~CallGraph_node699" class="node">
+<title>nf90_def_dim</title>
+<polygon fill="#777777" stroke="#777777" points="613.5,-8460 535.5,-8460 535.5,-8436 613.5,-8436 613.5,-8460"/>
+<text text-anchor="middle" x="574.5" y="-8445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_dim</text>
 </g>
-<!-- proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
-<g id="call~~graph~~CallGraph_edge605" class="edge">
-<title>proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M143.59,-10006.4C174.11,-10012.02 215,-10019.55 250.33,-10026.06"/>
-<polygon fill="#000000" stroke="#000000" points="250.15,-10029.59 260.62,-10027.96 251.42,-10022.7 250.15,-10029.59"/>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_dim -->
+<g id="call~~graph~~CallGraph_edge618" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_dim</title>
+<path fill="none" stroke="#000000" d="M340.66,-8344.14C362.88,-8364.7 411.18,-8406.16 460,-8427 480.5,-8435.75 504.61,-8440.86 525.32,-8443.84"/>
+<polygon fill="#000000" stroke="#000000" points="525.12,-8447.35 535.49,-8445.18 526.03,-8440.4 525.12,-8447.35"/>
 </g>
-<!-- helio_drift_body -->
-<g id="call~~graph~~CallGraph_node762" class="node">
-<title>helio_drift_body</title>
-<polygon fill="#777777" stroke="#777777" points="618.5,-4410 530.5,-4410 530.5,-4386 618.5,-4386 618.5,-4410"/>
-<text text-anchor="middle" x="574.5" y="-4395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_body</text>
+<!-- nf90_inquire -->
+<g id="call~~graph~~CallGraph_node704" class="node">
+<title>nf90_inquire</title>
+<polygon fill="#777777" stroke="#777777" points="610.5,-8418 538.5,-8418 538.5,-8394 610.5,-8394 610.5,-8418"/>
+<text text-anchor="middle" x="574.5" y="-8403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inquire</text>
 </g>
-<!-- proc~symba_drift_pl&#45;&gt;helio_drift_body -->
-<g id="call~~graph~~CallGraph_edge606" class="edge">
-<title>proc~symba_drift_pl&#45;&gt;helio_drift_body</title>
-<path fill="none" stroke="#000000" d="M368.26,-4398C409.75,-4398 474.62,-4398 520.3,-4398"/>
-<polygon fill="#000000" stroke="#000000" points="520.32,-4401.5 530.32,-4398 520.32,-4394.5 520.32,-4401.5"/>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_inquire -->
+<g id="call~~graph~~CallGraph_edge621" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_inquire</title>
+<path fill="none" stroke="#000000" d="M353.76,-8344.12C379.98,-8356.04 422.05,-8373.99 460,-8385 482.16,-8391.43 507.35,-8396.32 528.36,-8399.76"/>
+<polygon fill="#000000" stroke="#000000" points="527.88,-8403.23 538.31,-8401.34 528.98,-8396.32 527.88,-8403.23"/>
 </g>
-<!-- interface~rmvs_util_spill_pl -->
-<g id="call~~graph~~CallGraph_node661" class="node">
-<title>interface~rmvs_util_spill_pl</title>
-<g id="a_call~~graph~~CallGraph_node661"><a xlink:href=".././interface/rmvs_util_spill_pl.html" xlink:title="rmvs_util_spill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-1436 527.5,-1436 527.5,-1412 621.5,-1412 621.5,-1436"/>
-<text text-anchor="middle" x="574.5" y="-1421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_pl</text>
-</a>
+<!-- nf90_create -->
+<g id="call~~graph~~CallGraph_node713" class="node">
+<title>nf90_create</title>
+<polygon fill="#777777" stroke="#777777" points="609.5,-8376 539.5,-8376 539.5,-8352 609.5,-8352 609.5,-8376"/>
+<text text-anchor="middle" x="574.5" y="-8361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_create</text>
 </g>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_create -->
+<g id="call~~graph~~CallGraph_edge619" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_create</title>
+<path fill="none" stroke="#000000" d="M387.74,-8339.79C431.39,-8345.48 489.62,-8353.07 529.17,-8358.22"/>
+<polygon fill="#000000" stroke="#000000" points="528.93,-8361.72 539.3,-8359.54 529.83,-8354.78 528.93,-8361.72"/>
 </g>
-<!-- interface~rmvs_util_spill_pl&#45;&gt;proc~rmvs_util_spill_pl -->
-<g id="call~~graph~~CallGraph_edge607" class="edge">
-<title>interface~rmvs_util_spill_pl&#45;&gt;proc~rmvs_util_spill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-1424C666.35,-1424 734.33,-1424 782.24,-1424"/>
-<polygon fill="#000000" stroke="#000000" points="782.44,-1427.5 792.44,-1424 782.44,-1420.5 782.44,-1427.5"/>
+<!-- nf90_def_var_fill -->
+<g id="call~~graph~~CallGraph_node741" class="node">
+<title>nf90_def_var_fill</title>
+<polygon fill="#777777" stroke="#777777" points="620,-8334 529,-8334 529,-8310 620,-8310 620,-8334"/>
+<text text-anchor="middle" x="574.5" y="-8319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var_fill</text>
 </g>
-<!-- setup_construct_system -->
-<g id="call~~graph~~CallGraph_node700" class="node">
-<title>setup_construct_system</title>
-<polygon fill="#777777" stroke="#777777" points="1632.5,-86 1504.5,-86 1504.5,-62 1632.5,-62 1632.5,-86"/>
-<text text-anchor="middle" x="1568.5" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var_fill -->
+<g id="call~~graph~~CallGraph_edge620" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var_fill</title>
+<path fill="none" stroke="#000000" d="M387.74,-8329.57C427.74,-8327.94 479.99,-8325.81 518.88,-8324.22"/>
+<polygon fill="#000000" stroke="#000000" points="519.12,-8327.72 528.96,-8323.81 518.83,-8320.72 519.12,-8327.72"/>
 </g>
-<!-- proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system -->
-<g id="call~~graph~~CallGraph_edge608" class="edge">
-<title>proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system</title>
-<path fill="none" stroke="#000000" d="M1405.93,-24.03C1418.62,-26.72 1431.78,-29.74 1444,-33 1471.32,-40.28 1501.43,-50.24 1525.09,-58.52"/>
-<polygon fill="#000000" stroke="#000000" points="1524.21,-61.92 1534.8,-61.95 1526.54,-55.32 1524.21,-61.92"/>
+<!-- nf90_inquire_variable -->
+<g id="call~~graph~~CallGraph_node747" class="node">
+<title>nf90_inquire_variable</title>
+<polygon fill="#777777" stroke="#777777" points="632,-8292 517,-8292 517,-8268 632,-8268 632,-8292"/>
+<text text-anchor="middle" x="574.5" y="-8277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inquire_variable</text>
 </g>
-<!-- interface~rmvs_util_spill_tp -->
-<g id="call~~graph~~CallGraph_node663" class="node">
-<title>interface~rmvs_util_spill_tp</title>
-<g id="a_call~~graph~~CallGraph_node663"><a xlink:href=".././interface/rmvs_util_spill_tp.html" xlink:title="rmvs_util_spill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="621.5,-1478 527.5,-1478 527.5,-1454 621.5,-1454 621.5,-1478"/>
-<text text-anchor="middle" x="574.5" y="-1463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util_spill_tp</text>
-</a>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_inquire_variable -->
+<g id="call~~graph~~CallGraph_edge622" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_inquire_variable</title>
+<path fill="none" stroke="#000000" d="M376.77,-8319.96C401.62,-8313.97 432.35,-8306.8 460,-8301 475.12,-8297.83 491.43,-8294.66 506.84,-8291.78"/>
+<polygon fill="#000000" stroke="#000000" points="507.62,-8295.2 516.82,-8289.94 506.35,-8288.32 507.62,-8295.2"/>
 </g>
+<!-- nf90_def_var -->
+<g id="call~~graph~~CallGraph_node764" class="node">
+<title>nf90_def_var</title>
+<polygon fill="#777777" stroke="#777777" points="612.5,-8250 536.5,-8250 536.5,-8226 612.5,-8226 612.5,-8250"/>
+<text text-anchor="middle" x="574.5" y="-8235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var</text>
 </g>
-<!-- interface~rmvs_util_spill_tp&#45;&gt;proc~rmvs_util_spill_tp -->
-<g id="call~~graph~~CallGraph_edge609" class="edge">
-<title>interface~rmvs_util_spill_tp&#45;&gt;proc~rmvs_util_spill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.61,-1466C666.35,-1466 734.33,-1466 782.24,-1466"/>
-<polygon fill="#000000" stroke="#000000" points="782.44,-1469.5 792.44,-1466 782.44,-1462.5 782.44,-1469.5"/>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var -->
+<g id="call~~graph~~CallGraph_edge617" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var</title>
+<path fill="none" stroke="#000000" d="M351,-8319.8C370.52,-8309.39 399.22,-8293.94 424,-8280 440.15,-8270.92 442.64,-8265.45 460,-8259 481.05,-8251.18 505.42,-8246.19 526.17,-8243.04"/>
+<polygon fill="#000000" stroke="#000000" points="526.94,-8246.46 536.35,-8241.6 525.95,-8239.53 526.94,-8246.46"/>
 </g>
-<!-- interface~rmvs_step_system -->
-<g id="call~~graph~~CallGraph_node664" class="node">
-<title>interface~rmvs_step_system</title>
-<g id="a_call~~graph~~CallGraph_node664"><a xlink:href=".././interface/rmvs_step_system.html" xlink:title="rmvs_step_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="148,-1230 46,-1230 46,-1206 148,-1206 148,-1230"/>
-<text text-anchor="middle" x="97" y="-1215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_system</text>
+<!-- interface~helio_kick_vb_tp -->
+<g id="call~~graph~~CallGraph_node675" class="node">
+<title>interface~helio_kick_vb_tp</title>
+<g id="a_call~~graph~~CallGraph_node675"><a xlink:href=".././interface/helio_kick_vb_tp.html" xlink:title="helio_kick_vb_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-5920 51.5,-5920 51.5,-5896 142.5,-5896 142.5,-5920"/>
+<text text-anchor="middle" x="97" y="-5905.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick_vb_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~rmvs_step_system&#45;&gt;proc~rmvs_step_system -->
-<g id="call~~graph~~CallGraph_edge610" class="edge">
-<title>interface~rmvs_step_system&#45;&gt;proc~rmvs_step_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.04,-1218C182.66,-1218 228.93,-1218 265.61,-1218"/>
-<polygon fill="#000000" stroke="#000000" points="265.69,-1221.5 275.69,-1218 265.69,-1214.5 265.69,-1221.5"/>
-</g>
-<!-- proc~util_fill_body&#45;&gt;interface~util_fill~2 -->
-<g id="call~~graph~~CallGraph_edge611" class="edge">
-<title>proc~util_fill_body&#45;&gt;interface~util_fill~2</title>
-<path fill="none" stroke="#000000" d="M875.15,-12147C922.93,-12147 1008.66,-12147 1057.27,-12147"/>
-<polygon fill="#000000" stroke="#000000" points="1057.34,-12150.5 1067.34,-12147 1057.34,-12143.5 1057.34,-12150.5"/>
+<!-- interface~helio_kick_vb_tp&#45;&gt;proc~helio_kick_vb_tp -->
+<g id="call~~graph~~CallGraph_edge623" class="edge">
+<title>interface~helio_kick_vb_tp&#45;&gt;proc~helio_kick_vb_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.5,-5908C179.26,-5908 231.61,-5908 270.99,-5908"/>
+<polygon fill="#000000" stroke="#000000" points="271.22,-5911.5 281.22,-5908 271.22,-5904.5 271.22,-5911.5"/>
 </g>
-<!-- proc~symba_drift_tp&#45;&gt;helio_drift_body -->
-<g id="call~~graph~~CallGraph_edge612" class="edge">
-<title>proc~symba_drift_tp&#45;&gt;helio_drift_body</title>
-<path fill="none" stroke="#000000" d="M368.54,-4362.94C410.07,-4370.04 474.83,-4381.12 520.42,-4388.92"/>
-<polygon fill="#000000" stroke="#000000" points="519.97,-4392.39 530.42,-4390.63 521.15,-4385.49 519.97,-4392.39"/>
+<!-- proc~util_sort_rearrange_arr_dp -->
+<g id="call~~graph~~CallGraph_node676" class="node">
+<title>proc~util_sort_rearrange_arr_dp</title>
+<g id="a_call~~graph~~CallGraph_node676"><a xlink:href=".././proc/util_sort_rearrange_arr_dp.html" xlink:title="util_sort_rearrange_arr_DP">
+<polygon fill="#d9534f" stroke="#d9534f" points="168.5,-14196 25.5,-14196 25.5,-14172 168.5,-14172 168.5,-14196"/>
+<text text-anchor="middle" x="97" y="-14181.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_DP</text>
+</a>
 </g>
-<!-- proc~util_fill_pl&#45;&gt;interface~util_fill~2 -->
-<g id="call~~graph~~CallGraph_edge613" class="edge">
-<title>proc~util_fill_pl&#45;&gt;interface~util_fill~2</title>
-<path fill="none" stroke="#000000" d="M355.22,-12178.86C442.47,-12181.33 723,-12187.15 954,-12168 989.28,-12165.08 1029.19,-12158.76 1057.25,-12153.81"/>
-<polygon fill="#000000" stroke="#000000" points="1058.17,-12157.21 1067.4,-12152 1056.94,-12150.32 1058.17,-12157.21"/>
 </g>
-<!-- proc~util_fill_pl&#45;&gt;interface~util_fill_body -->
-<g id="call~~graph~~CallGraph_edge614" class="edge">
-<title>proc~util_fill_pl&#45;&gt;interface~util_fill_body</title>
-<path fill="none" stroke="#000000" d="M355.21,-12174.56C397.14,-12169.27 477.99,-12159.06 528.66,-12152.66"/>
-<polygon fill="#000000" stroke="#000000" points="529.2,-12156.12 538.68,-12151.4 528.32,-12149.18 529.2,-12156.12"/>
+<!-- interface~helio_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_node677" class="node">
+<title>interface~helio_setup_initialize_system</title>
+<g id="a_call~~graph~~CallGraph_node677"><a xlink:href=".././interface/helio_setup_initialize_system.html" xlink:title="helio_setup_initialize_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="172.5,-3160 21.5,-3160 21.5,-3136 172.5,-3136 172.5,-3160"/>
+<text text-anchor="middle" x="97" y="-3145.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup_initialize_system</text>
+</a>
 </g>
-<!-- io_param_writer -->
-<g id="call~~graph~~CallGraph_node728" class="node">
-<title>io_param_writer</title>
-<polygon fill="#777777" stroke="#777777" points="619.5,-4578 529.5,-4578 529.5,-4554 619.5,-4554 619.5,-4578"/>
-<text text-anchor="middle" x="574.5" y="-4563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_writer</text>
 </g>
-<!-- proc~symba_io_param_writer&#45;&gt;io_param_writer -->
-<g id="call~~graph~~CallGraph_edge615" class="edge">
-<title>proc~symba_io_param_writer&#45;&gt;io_param_writer</title>
-<path fill="none" stroke="#000000" d="M390.59,-4566C430.19,-4566 480.9,-4566 518.87,-4566"/>
-<polygon fill="#000000" stroke="#000000" points="519.23,-4569.5 529.23,-4566 519.23,-4562.5 519.23,-4569.5"/>
+<!-- interface~helio_setup_initialize_system&#45;&gt;proc~helio_setup_initialize_system -->
+<g id="call~~graph~~CallGraph_edge624" class="edge">
+<title>interface~helio_setup_initialize_system&#45;&gt;proc~helio_setup_initialize_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.66,-3148C194.5,-3148 218.55,-3148 240.99,-3148"/>
+<polygon fill="#000000" stroke="#000000" points="241.18,-3151.5 251.18,-3148 241.18,-3144.5 241.18,-3151.5"/>
 </g>
-<!-- proc~util_spill_arr_logical -->
-<g id="call~~graph~~CallGraph_node670" class="node">
-<title>proc~util_spill_arr_logical</title>
-<g id="a_call~~graph~~CallGraph_node670"><a xlink:href=".././proc/util_spill_arr_logical.html" xlink:title="util_spill_arr_logical">
-<polygon fill="#d9534f" stroke="#d9534f" points="150,-14458 44,-14458 44,-14434 150,-14434 150,-14458"/>
-<text text-anchor="middle" x="97" y="-14443.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_logical</text>
+<!-- interface~helio_step_pl -->
+<g id="call~~graph~~CallGraph_node678" class="node">
+<title>interface~helio_step_pl</title>
+<g id="a_call~~graph~~CallGraph_node678"><a xlink:href=".././interface/helio_step_pl.html" xlink:title="helio_step_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="135,-3250 59,-3250 59,-3226 135,-3226 135,-3250"/>
+<text text-anchor="middle" x="97" y="-3235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system -->
-<g id="call~~graph~~CallGraph_edge616" class="edge">
-<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system</title>
-<path fill="none" stroke="#000000" d="M932.2,-54C949.34,-54 967.4,-54 984.99,-54"/>
-<polygon fill="#000000" stroke="#000000" points="985.29,-57.5 995.29,-54 985.29,-50.5 985.29,-57.5"/>
+<!-- interface~helio_step_pl&#45;&gt;proc~helio_step_pl -->
+<g id="call~~graph~~CallGraph_edge625" class="edge">
+<title>interface~helio_step_pl&#45;&gt;proc~helio_step_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-3238C174.31,-3238 236.14,-3238 278.75,-3238"/>
+<polygon fill="#000000" stroke="#000000" points="278.88,-3241.5 288.88,-3238 278.88,-3234.5 278.88,-3241.5"/>
 </g>
-<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system -->
-<g id="call~~graph~~CallGraph_edge618" class="edge">
-<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system</title>
-<path fill="none" stroke="#000000" d="M913,-41.96C943.57,-36.89 979.31,-30.96 1010.89,-25.71"/>
-<polygon fill="#000000" stroke="#000000" points="1011.7,-29.13 1020.99,-24.04 1010.55,-22.22 1011.7,-29.13"/>
+<!-- interface~helio_step_system -->
+<g id="call~~graph~~CallGraph_node679" class="node">
+<title>interface~helio_step_system</title>
+<g id="a_call~~graph~~CallGraph_node679"><a xlink:href=".././interface/helio_step_system.html" xlink:title="helio_step_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="147.5,-1562 46.5,-1562 46.5,-1538 147.5,-1538 147.5,-1562"/>
+<text text-anchor="middle" x="97" y="-1547.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_system</text>
+</a>
 </g>
-<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge617" class="edge">
-<title>proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M885.29,-66.08C910,-75.24 938.7,-90.53 954,-115 1059.55,-283.76 885.32,-840.7 990,-1010 1004.92,-1034.12 1033.91,-1048.81 1057.42,-1057.23"/>
-<polygon fill="#000000" stroke="#000000" points="1056.51,-1060.61 1067.1,-1060.46 1058.73,-1053.97 1056.51,-1060.61"/>
 </g>
-<!-- proc~xv2el -->
-<g id="call~~graph~~CallGraph_node674" class="node">
-<title>proc~xv2el</title>
-<g id="a_call~~graph~~CallGraph_node674"><a xlink:href=".././proc/xv2el.html" xlink:title="xv2el">
-<polygon fill="#d9534f" stroke="#d9534f" points="124,-14500 70,-14500 70,-14476 124,-14476 124,-14500"/>
-<text text-anchor="middle" x="97" y="-14485.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xv2el</text>
+<!-- interface~helio_step_system&#45;&gt;proc~helio_step_system -->
+<g id="call~~graph~~CallGraph_edge626" class="edge">
+<title>interface~helio_step_system&#45;&gt;proc~helio_step_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.75,-1550C182.61,-1550 229.35,-1550 266.23,-1550"/>
+<polygon fill="#000000" stroke="#000000" points="266.35,-1553.5 276.35,-1550 266.35,-1546.5 266.35,-1553.5"/>
+</g>
+<!-- proc~util_sort_rearrange_arr_dpvec -->
+<g id="call~~graph~~CallGraph_node680" class="node">
+<title>proc~util_sort_rearrange_arr_dpvec</title>
+<g id="a_call~~graph~~CallGraph_node680"><a xlink:href=".././proc/util_sort_rearrange_arr_dpvec.html" xlink:title="util_sort_rearrange_arr_DPvec">
+<polygon fill="#d9534f" stroke="#d9534f" points="177,-14238 17,-14238 17,-14214 177,-14214 177,-14238"/>
+<text text-anchor="middle" x="97" y="-14223.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_DPvec</text>
 </a>
 </g>
 </g>
-<!-- proc~check -->
-<g id="call~~graph~~CallGraph_node675" class="node">
-<title>proc~check</title>
-<g id="a_call~~graph~~CallGraph_node675"><a xlink:href=".././proc/check.html" xlink:title="check">
-<polygon fill="#d9534f" stroke="#d9534f" points="866.5,-2356 812.5,-2356 812.5,-2332 866.5,-2332 866.5,-2356"/>
-<text text-anchor="middle" x="839.5" y="-2341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">check</text>
+<!-- interface~helio_step_tp -->
+<g id="call~~graph~~CallGraph_node681" class="node">
+<title>interface~helio_step_tp</title>
+<g id="a_call~~graph~~CallGraph_node681"><a xlink:href=".././interface/helio_step_tp.html" xlink:title="helio_step_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="135,-3344 59,-3344 59,-3320 135,-3320 135,-3344"/>
+<text text-anchor="middle" x="97" y="-3329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~check&#45;&gt;interface~util_exit -->
-<g id="call~~graph~~CallGraph_edge620" class="edge">
-<title>proc~check&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M866.87,-2341.54C892.33,-2340.68 930.39,-2343.6 954,-2365 971.96,-2381.28 1063.84,-2733.18 1087.79,-2825.82"/>
-<polygon fill="#000000" stroke="#000000" points="1084.41,-2826.76 1090.3,-2835.57 1091.19,-2825.01 1084.41,-2826.76"/>
-</g>
-<!-- nf90_strerror -->
-<g id="call~~graph~~CallGraph_node736" class="node">
-<title>nf90_strerror</title>
-<polygon fill="#777777" stroke="#777777" points="1132,-2356 1057,-2356 1057,-2332 1132,-2332 1132,-2356"/>
-<text text-anchor="middle" x="1094.5" y="-2341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_strerror</text>
+<!-- interface~helio_step_tp&#45;&gt;proc~helio_step_tp -->
+<g id="call~~graph~~CallGraph_edge627" class="edge">
+<title>interface~helio_step_tp&#45;&gt;proc~helio_step_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.14,-3332C174.31,-3332 236.14,-3332 278.75,-3332"/>
+<polygon fill="#000000" stroke="#000000" points="278.88,-3335.5 288.88,-3332 278.88,-3328.5 278.88,-3335.5"/>
 </g>
-<!-- proc~check&#45;&gt;nf90_strerror -->
-<g id="call~~graph~~CallGraph_edge619" class="edge">
-<title>proc~check&#45;&gt;nf90_strerror</title>
-<path fill="none" stroke="#000000" d="M866.62,-2344C909.11,-2344 993.78,-2344 1046.81,-2344"/>
-<polygon fill="#000000" stroke="#000000" points="1046.97,-2347.5 1056.97,-2344 1046.97,-2340.5 1046.97,-2347.5"/>
+<!-- proc~util_fill_tp&#45;&gt;interface~util_fill_body -->
+<g id="call~~graph~~CallGraph_edge629" class="edge">
+<title>proc~util_fill_tp&#45;&gt;interface~util_fill_body</title>
+<path fill="none" stroke="#000000" d="M355.68,-7837.38C397.8,-7842.53 478.39,-7852.38 528.85,-7858.54"/>
+<polygon fill="#000000" stroke="#000000" points="528.48,-7862.02 538.83,-7859.76 529.33,-7855.08 528.48,-7862.02"/>
 </g>
 <!-- proc~util_fill_tp&#45;&gt;interface~util_fill~2 -->
-<g id="call~~graph~~CallGraph_edge621" class="edge">
+<g id="call~~graph~~CallGraph_edge628" class="edge">
 <title>proc~util_fill_tp&#45;&gt;interface~util_fill~2</title>
-<path fill="none" stroke="#000000" d="M355.52,-12116.07C443.12,-12113.41 723.26,-12107.06 954,-12126 989.28,-12128.9 1029.19,-12135.22 1057.26,-12140.17"/>
-<polygon fill="#000000" stroke="#000000" points="1056.94,-12143.67 1067.4,-12141.99 1058.17,-12136.78 1056.94,-12143.67"/>
+<path fill="none" stroke="#000000" d="M355.52,-7833.07C443.12,-7830.41 723.26,-7824.06 954,-7843 989.28,-7845.9 1029.19,-7852.22 1057.26,-7857.17"/>
+<polygon fill="#000000" stroke="#000000" points="1056.94,-7860.67 1067.4,-7858.99 1058.17,-7853.78 1056.94,-7860.67"/>
 </g>
-<!-- proc~util_fill_tp&#45;&gt;interface~util_fill_body -->
-<g id="call~~graph~~CallGraph_edge622" class="edge">
-<title>proc~util_fill_tp&#45;&gt;interface~util_fill_body</title>
-<path fill="none" stroke="#000000" d="M355.68,-12120.38C397.8,-12125.53 478.39,-12135.38 528.85,-12141.54"/>
-<polygon fill="#000000" stroke="#000000" points="528.48,-12145.02 538.83,-12142.76 529.33,-12138.08 528.48,-12145.02"/>
+<!-- proc~util_sort_rearrange_arr_i4b -->
+<g id="call~~graph~~CallGraph_node683" class="node">
+<title>proc~util_sort_rearrange_arr_i4b</title>
+<g id="a_call~~graph~~CallGraph_node683"><a xlink:href=".././proc/util_sort_rearrange_arr_i4b.html" xlink:title="util_sort_rearrange_arr_I4B">
+<polygon fill="#d9534f" stroke="#d9534f" points="169.5,-14280 24.5,-14280 24.5,-14256 169.5,-14256 169.5,-14280"/>
+<text text-anchor="middle" x="97" y="-14265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_I4B</text>
+</a>
 </g>
-<!-- proc~symba_io_write_discard&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge623" class="edge">
-<title>proc~symba_io_write_discard&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M903.2,-1119.67C919.8,-1116.59 937.64,-1112.96 954,-1109 989.58,-1100.38 1029.51,-1088.08 1057.51,-1079.02"/>
-<polygon fill="#000000" stroke="#000000" points="1058.83,-1082.27 1067.25,-1075.84 1056.66,-1075.62 1058.83,-1082.27"/>
 </g>
-<!-- proc~util_spill_encounter&#45;&gt;interface~util_spill~2 -->
-<g id="call~~graph~~CallGraph_edge624" class="edge">
-<title>proc~util_spill_encounter&#45;&gt;interface~util_spill~2</title>
-<path fill="none" stroke="#000000" d="M891.67,-11472.56C911.19,-11477.02 933.64,-11482.19 954,-11487 989.22,-11495.33 1029.35,-11505.14 1057.5,-11512.08"/>
-<polygon fill="#000000" stroke="#000000" points="1056.75,-11515.5 1067.3,-11514.5 1058.43,-11508.71 1056.75,-11515.5"/>
+<!-- proc~util_append_body&#45;&gt;interface~util_append~2 -->
+<g id="call~~graph~~CallGraph_edge630" class="edge">
+<title>proc~util_append_body&#45;&gt;interface~util_append~2</title>
+<path fill="none" stroke="#000000" d="M1388.09,-455.6C1428.31,-451.88 1485.42,-446.59 1524.33,-442.99"/>
+<polygon fill="#000000" stroke="#000000" points="1524.67,-446.48 1534.3,-442.07 1524.02,-439.51 1524.67,-446.48"/>
+</g>
+<!-- proc~util_sort_rearrange_arr_logical -->
+<g id="call~~graph~~CallGraph_node685" class="node">
+<title>proc~util_sort_rearrange_arr_logical</title>
+<g id="a_call~~graph~~CallGraph_node685"><a xlink:href=".././proc/util_sort_rearrange_arr_logical.html" xlink:title="util_sort_rearrange_arr_logical">
+<polygon fill="#d9534f" stroke="#d9534f" points="176.5,-14322 17.5,-14322 17.5,-14298 176.5,-14298 176.5,-14322"/>
+<text text-anchor="middle" x="97" y="-14307.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_logical</text>
+</a>
+</g>
 </g>
 <!-- proc~util_resize_arr_char_string -->
-<g id="call~~graph~~CallGraph_node680" class="node">
+<g id="call~~graph~~CallGraph_node686" class="node">
 <title>proc~util_resize_arr_char_string</title>
-<g id="a_call~~graph~~CallGraph_node680"><a xlink:href=".././proc/util_resize_arr_char_string.html" xlink:title="util_resize_arr_char_string">
-<polygon fill="#d9534f" stroke="#d9534f" points="166.5,-14542 27.5,-14542 27.5,-14518 166.5,-14518 166.5,-14542"/>
-<text text-anchor="middle" x="97" y="-14527.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_char_string</text>
+<g id="a_call~~graph~~CallGraph_node686"><a xlink:href=".././proc/util_resize_arr_char_string.html" xlink:title="util_resize_arr_char_string">
+<polygon fill="#d9534f" stroke="#d9534f" points="166.5,-14364 27.5,-14364 27.5,-14340 166.5,-14340 166.5,-14364"/>
+<text text-anchor="middle" x="97" y="-14349.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_char_string</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_arr_dp -->
-<g id="call~~graph~~CallGraph_node681" class="node">
-<title>proc~util_resize_arr_dp</title>
-<g id="a_call~~graph~~CallGraph_node681"><a xlink:href=".././proc/util_resize_arr_dp.html" xlink:title="util_resize_arr_DP">
-<polygon fill="#d9534f" stroke="#d9534f" points="147,-14584 47,-14584 47,-14560 147,-14560 147,-14584"/>
-<text text-anchor="middle" x="97" y="-14569.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_DP</text>
+<!-- proc~util_sort_rearrange_arr_info -->
+<g id="call~~graph~~CallGraph_node687" class="node">
+<title>proc~util_sort_rearrange_arr_info</title>
+<g id="a_call~~graph~~CallGraph_node687"><a xlink:href=".././proc/util_sort_rearrange_arr_info.html" xlink:title="util_sort_rearrange_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="170,-7720 24,-7720 24,-7696 170,-7696 170,-7720"/>
+<text text-anchor="middle" x="97" y="-7705.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_arr_dpvec -->
-<g id="call~~graph~~CallGraph_node682" class="node">
-<title>proc~util_resize_arr_dpvec</title>
-<g id="a_call~~graph~~CallGraph_node682"><a xlink:href=".././proc/util_resize_arr_dpvec.html" xlink:title="util_resize_arr_DPvec">
-<polygon fill="#d9534f" stroke="#d9534f" points="155.5,-14626 38.5,-14626 38.5,-14602 155.5,-14602 155.5,-14626"/>
-<text text-anchor="middle" x="97" y="-14611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_arr_DPvec</text>
+<!-- proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<g id="call~~graph~~CallGraph_edge631" class="edge">
+<title>proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M163.34,-7720.04C190.64,-7725.07 222.54,-7730.94 250.82,-7736.15"/>
+<polygon fill="#000000" stroke="#000000" points="250.19,-7739.59 260.65,-7737.96 251.45,-7732.71 250.19,-7739.59"/>
+</g>
+<!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
+<g id="call~~graph~~CallGraph_edge632" class="edge">
+<title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.67,-3906.25C939.59,-3906.39 982.97,-3906.56 1019.34,-3906.71"/>
+<polygon fill="#000000" stroke="#000000" points="1019.38,-3910.21 1029.4,-3906.75 1019.41,-3903.21 1019.38,-3910.21"/>
+</g>
+<!-- interface~fraggle_generate_fragments -->
+<g id="call~~graph~~CallGraph_node689" class="node">
+<title>interface~fraggle_generate_fragments</title>
+<g id="a_call~~graph~~CallGraph_node689"><a xlink:href=".././interface/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
+<polygon fill="#a7506f" stroke="#a7506f" points="171,-4003 23,-4003 23,-3979 171,-3979 171,-4003"/>
+<text text-anchor="middle" x="97" y="-3988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
 </a>
 </g>
 </g>
+<!-- interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments -->
+<g id="call~~graph~~CallGraph_edge633" class="edge">
+<title>interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M171.08,-3991C193.89,-3991 219.21,-3991 242.67,-3991"/>
+<polygon fill="#000000" stroke="#000000" points="242.94,-3994.5 252.94,-3991 242.94,-3987.5 242.94,-3994.5"/>
+</g>
 <!-- program~swiftest_driver -->
-<g id="call~~graph~~CallGraph_node683" class="node">
+<g id="call~~graph~~CallGraph_node690" class="node">
 <title>program~swiftest_driver</title>
-<g id="a_call~~graph~~CallGraph_node683"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="880,-148 799,-148 799,-124 880,-124 880,-148"/>
-<text text-anchor="middle" x="839.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<g id="a_call~~graph~~CallGraph_node690"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="880,-1599 799,-1599 799,-1575 880,-1575 880,-1599"/>
+<text text-anchor="middle" x="839.5" y="-1584.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;setup_construct_system -->
-<g id="call~~graph~~CallGraph_edge625" class="edge">
-<title>program~swiftest_driver&#45;&gt;setup_construct_system</title>
-<path fill="none" stroke="#000000" d="M880.08,-134.72C946.21,-132.4 1083.33,-126.8 1199,-117 1301.67,-108.3 1419.92,-93.68 1494.19,-83.94"/>
-<polygon fill="#000000" stroke="#000000" points="1494.92,-87.37 1504.37,-82.6 1494,-80.43 1494.92,-87.37"/>
+<!-- program~swiftest_driver&#45;&gt;util_exit -->
+<g id="call~~graph~~CallGraph_edge634" class="edge">
+<title>program~swiftest_driver&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M880.11,-1588.53C905.48,-1591.79 936.78,-1600.52 954,-1623 1009.66,-1695.66 947.88,-2364.74 990,-2446 1004.74,-2474.43 1034.63,-2495.81 1058.52,-2509.28"/>
+<polygon fill="#000000" stroke="#000000" points="1056.88,-2512.37 1067.34,-2514.06 1060.21,-2506.22 1056.88,-2512.37"/>
 </g>
 <!-- io_get_args -->
-<g id="call~~graph~~CallGraph_node716" class="node">
+<g id="call~~graph~~CallGraph_node746" class="node">
 <title>io_get_args</title>
-<polygon fill="#777777" stroke="#777777" points="1129,-108 1060,-108 1060,-84 1129,-84 1129,-108"/>
-<text text-anchor="middle" x="1094.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<polygon fill="#777777" stroke="#777777" points="1129,-1559 1060,-1559 1060,-1535 1129,-1535 1129,-1559"/>
+<text text-anchor="middle" x="1094.5" y="-1544.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </g>
 <!-- program~swiftest_driver&#45;&gt;io_get_args -->
-<g id="call~~graph~~CallGraph_edge626" class="edge">
+<g id="call~~graph~~CallGraph_edge635" class="edge">
 <title>program~swiftest_driver&#45;&gt;io_get_args</title>
-<path fill="none" stroke="#000000" d="M880.03,-129.75C926.12,-122.46 1002.08,-110.45 1049.86,-102.9"/>
-<polygon fill="#000000" stroke="#000000" points="1050.57,-106.33 1059.9,-101.31 1049.48,-99.42 1050.57,-106.33"/>
+<path fill="none" stroke="#000000" d="M880.03,-1580.75C926.12,-1573.46 1002.08,-1561.45 1049.86,-1553.9"/>
+<polygon fill="#000000" stroke="#000000" points="1050.57,-1557.33 1059.9,-1552.31 1049.48,-1550.42 1050.57,-1557.33"/>
 </g>
-<!-- program~swiftest_driver&#45;&gt;util_exit -->
-<g id="call~~graph~~CallGraph_edge627" class="edge">
-<title>program~swiftest_driver&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M880.24,-135.71C905.5,-137.84 936.61,-145.2 954,-167 1012.47,-240.29 940.59,-930.32 990,-1010 1004.94,-1034.1 1033.93,-1048.8 1057.44,-1057.21"/>
-<polygon fill="#000000" stroke="#000000" points="1056.53,-1060.6 1067.12,-1060.45 1058.74,-1053.96 1056.53,-1060.6"/>
+<!-- program~swiftest_driver&#45;&gt;setup_construct_system -->
+<g id="call~~graph~~CallGraph_edge636" class="edge">
+<title>program~swiftest_driver&#45;&gt;setup_construct_system</title>
+<path fill="none" stroke="#000000" d="M880.1,-1585.31C997.05,-1580.32 1342.17,-1565.61 1494.19,-1559.13"/>
+<polygon fill="#000000" stroke="#000000" points="1494.51,-1562.62 1504.35,-1558.69 1494.21,-1555.62 1494.51,-1562.62"/>
 </g>
 </g>
 </svg>
diff --git a/docs/lists/types.html b/docs/lists/types.html
index b85f45276..8bbd1ced9 100644
--- a/docs/lists/types.html
+++ b/docs/lists/types.html
@@ -220,647 +220,648 @@ <h1>Derived Types</h1>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~graph~~TypeGraph Pages: 1 -->
-<svg id="typegraphTypeGraph" width="855pt" height="397pt"
- viewBox="0.00 0.00 855.00 397.38" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~graph~~TypeGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 583)">
+<svg id="typegraphTypeGraph" width="855pt" height="478pt"
+ viewBox="0.00 0.00 855.00 477.93" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~graph~~TypeGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 702)">
 <title>type~~graph~~TypeGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-583 1259,-583 1259,4 -4,4"/>
-<!-- type~walltimer -->
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-702 1259,-702 1259,4 -4,4"/>
+<!-- type~fraggle_fragments -->
 <g id="type~~graph~~TypeGraph_node1" class="node">
-<title>type~walltimer</title>
-<g id="a_type~~graph~~TypeGraph_node1"><a xlink:href=".././type/walltimer.html" xlink:title="walltimer">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1223,-24 1168,-24 1168,0 1223,0 1223,-24"/>
-<text text-anchor="middle" x="1195.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltimer</text>
-</a>
-</g>
-</g>
-<!-- type~symba_parameters -->
-<g id="type~~graph~~TypeGraph_node2" class="node">
-<title>type~symba_parameters</title>
-<g id="a_type~~graph~~TypeGraph_node2"><a xlink:href=".././type/symba_parameters.html" xlink:title="symba_parameters">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1248,-66 1143,-66 1143,-42 1248,-42 1248,-66"/>
-<text text-anchor="middle" x="1195.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_parameters</text>
+<title>type~fraggle_fragments</title>
+<g id="a_type~~graph~~TypeGraph_node1"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="557.5,-198 457.5,-198 457.5,-174 557.5,-174 557.5,-198"/>
+<text text-anchor="middle" x="507.5" y="-183.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_parameters -->
-<g id="type~~graph~~TypeGraph_node21" class="node">
-<title>type~swiftest_parameters</title>
-<g id="a_type~~graph~~TypeGraph_node21"><a xlink:href=".././type/swiftest_parameters.html" xlink:title="swiftest_parameters">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="979,-66 870,-66 870,-42 979,-42 979,-66"/>
-<text text-anchor="middle" x="924.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_parameters</text>
+<!-- type~swiftest_pl -->
+<g id="type~~graph~~TypeGraph_node16" class="node">
+<title>type~swiftest_pl</title>
+<g id="a_type~~graph~~TypeGraph_node16"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="343.5,-205 281.5,-205 281.5,-181 343.5,-181 343.5,-205"/>
+<text text-anchor="middle" x="312.5" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_parameters&#45;&gt;type~swiftest_parameters -->
+<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
 <g id="type~~graph~~TypeGraph_edge1" class="edge">
-<title>type~symba_parameters&#45;&gt;type~swiftest_parameters</title>
-<path fill="none" stroke="#000000" d="M1142.95,-54C1099.18,-54 1036.17,-54 989.23,-54"/>
-<polygon fill="#000000" stroke="#000000" points="989.18,-50.5 979.18,-54 989.18,-57.5 989.18,-50.5"/>
+<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" d="M478.82,-173.98C449.28,-161.44 405.62,-143.88 397.5,-146"/>
 </g>
-<!-- type~symba_cb -->
-<g id="type~~graph~~TypeGraph_node3" class="node">
-<title>type~symba_cb</title>
-<g id="a_type~~graph~~TypeGraph_node3"><a xlink:href=".././type/symba_cb.html" xlink:title="symba_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="538,-495 477,-495 477,-471 538,-471 538,-495"/>
-<text text-anchor="middle" x="507.5" y="-480.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_cb</text>
+<!-- type~rmvs_pl -->
+<g id="type~~graph~~TypeGraph_node2" class="node">
+<title>type~rmvs_pl</title>
+<g id="a_type~~graph~~TypeGraph_node2"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1222.5,-240 1168.5,-240 1168.5,-216 1222.5,-216 1222.5,-240"/>
+<text text-anchor="middle" x="1195.5" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
-<!-- type~helio_cb -->
-<g id="type~~graph~~TypeGraph_node32" class="node">
-<title>type~helio_cb</title>
-<g id="a_type~~graph~~TypeGraph_node32"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="339.5,-472 285.5,-472 285.5,-448 339.5,-448 339.5,-472"/>
-<text text-anchor="middle" x="312.5" y="-457.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_cb</text>
+<!-- type~whm_pl -->
+<g id="type~~graph~~TypeGraph_node3" class="node">
+<title>type~whm_pl</title>
+<g id="a_type~~graph~~TypeGraph_node3"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="851,-158 797,-158 797,-134 851,-134 851,-158"/>
+<text text-anchor="middle" x="824" y="-143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_cb&#45;&gt;type~helio_cb -->
-<g id="type~~graph~~TypeGraph_edge2" class="edge">
-<title>type~symba_cb&#45;&gt;type~helio_cb</title>
-<path fill="none" stroke="#000000" d="M476.77,-479.46C442.6,-475.39 386.54,-468.7 349.82,-464.33"/>
-<polygon fill="#000000" stroke="#000000" points="349.9,-460.81 339.55,-463.1 349.07,-467.76 349.9,-460.81"/>
-</g>
-<!-- type~symba_pl -->
-<g id="type~~graph~~TypeGraph_node4" class="node">
-<title>type~symba_pl</title>
-<g id="a_type~~graph~~TypeGraph_node4"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="753,-108 695,-108 695,-84 753,-84 753,-108"/>
-<text text-anchor="middle" x="724" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
-</a>
-</g>
+<!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
+<g id="type~~graph~~TypeGraph_edge4" class="edge">
+<title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
+<path fill="none" stroke="#000000" d="M1168.43,-218.84C1128.41,-205.11 1049.18,-179.3 980,-165 939.81,-156.69 892.95,-151.57 861.36,-148.76"/>
+<polygon fill="#000000" stroke="#000000" points="861.53,-145.27 851.27,-147.9 860.93,-152.24 861.53,-145.27"/>
 </g>
-<!-- type~symba_kinship -->
-<g id="type~~graph~~TypeGraph_node11" class="node">
-<title>type~symba_kinship</title>
-<g id="a_type~~graph~~TypeGraph_node11"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="549,-108 466,-108 466,-84 549,-84 549,-108"/>
-<text text-anchor="middle" x="507.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
+<!-- type~rmvs_nbody_system -->
+<g id="type~~graph~~TypeGraph_node18" class="node">
+<title>type~rmvs_nbody_system</title>
+<g id="a_type~~graph~~TypeGraph_node18"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="980,-240 869,-240 869,-216 980,-216 980,-240"/>
+<text text-anchor="middle" x="924.5" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
 <g id="type~~graph~~TypeGraph_edge3" class="edge">
-<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.96,-96C660.55,-96 601.56,-96 559.14,-96"/>
-<polygon fill="#000000" stroke="#000000" points="559,-92.5 549,-96 559,-99.5 559,-92.5"/>
-<text text-anchor="middle" x="619" y="-98.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
-</g>
-<!-- type~helio_pl -->
-<g id="type~~graph~~TypeGraph_node37" class="node">
-<title>type~helio_pl</title>
-<g id="a_type~~graph~~TypeGraph_node37"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-66 480.5,-66 480.5,-42 534.5,-42 534.5,-66"/>
-<text text-anchor="middle" x="507.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
-</a>
-</g>
-</g>
-<!-- type~symba_pl&#45;&gt;type~helio_pl -->
-<g id="type~~graph~~TypeGraph_edge4" class="edge">
-<title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M694.96,-90.51C656.35,-82.95 586.81,-69.33 544.43,-61.04"/>
-<polygon fill="#000000" stroke="#000000" points="545.02,-57.58 534.53,-59.1 543.68,-64.45 545.02,-57.58"/>
+<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1168.22,-228C1127.31,-228 1047.2,-228 990.21,-228"/>
+<polygon fill="#000000" stroke="#000000" points="990.21,-224.5 980.21,-228 990.21,-231.5 990.21,-224.5"/>
+<text text-anchor="middle" x="1058" y="-230.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
-<!-- type~whm_cb -->
-<g id="type~~graph~~TypeGraph_node5" class="node">
-<title>type~whm_cb</title>
-<g id="a_type~~graph~~TypeGraph_node5"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="339.5,-388 285.5,-388 285.5,-364 339.5,-364 339.5,-388"/>
-<text text-anchor="middle" x="312.5" y="-373.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
+<!-- type~rmvs_interp -->
+<g id="type~~graph~~TypeGraph_node22" class="node">
+<title>type~rmvs_interp</title>
+<g id="a_type~~graph~~TypeGraph_node22"><a xlink:href=".././type/rmvs_interp.html" xlink:title="rmvs_interp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="347,-440 278,-440 278,-416 347,-416 347,-440"/>
+<text text-anchor="middle" x="312.5" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb -->
-<g id="type~~graph~~TypeGraph_node39" class="node">
-<title>type~swiftest_cb</title>
-<g id="a_type~~graph~~TypeGraph_node39"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-358 170,-358 170,-334 235,-334 235,-358"/>
-<text text-anchor="middle" x="202.5" y="-343.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
-</a>
-</g>
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_interp -->
+<g id="type~~graph~~TypeGraph_edge2" class="edge">
+<title>type~rmvs_pl&#45;&gt;type~rmvs_interp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1187.18,-240.08C1159.25,-284.47 1054.49,-436 925.5,-436 925.5,-436 925.5,-436 506.5,-436 455.24,-436 396.4,-433.15 357.29,-430.85"/>
+<polygon fill="#000000" stroke="#000000" points="357.49,-427.36 347.3,-430.25 357.07,-434.34 357.49,-427.36"/>
+<text text-anchor="middle" x="724" y="-438.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
 </g>
-<!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
+<!-- type~whm_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~graph~~TypeGraph_edge5" class="edge">
-<title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" d="M294.16,-363.81C284.51,-357.58 272.05,-350.4 260,-346"/>
+<title>type~whm_pl&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" d="M796.9,-144.28C716.49,-139.27 473.45,-126.2 397.5,-146"/>
 </g>
-<!-- type~symba_encounter -->
-<g id="type~~graph~~TypeGraph_node6" class="node">
-<title>type~symba_encounter</title>
-<g id="a_type~~graph~~TypeGraph_node6"><a xlink:href=".././type/symba_encounter.html" xlink:title="symba_encounter">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="773,-192 675,-192 675,-168 773,-168 773,-192"/>
-<text text-anchor="middle" x="724" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter</text>
+<!-- type~netcdf_parameters -->
+<g id="type~~graph~~TypeGraph_node4" class="node">
+<title>type~netcdf_parameters</title>
+<g id="a_type~~graph~~TypeGraph_node4"><a xlink:href=".././type/netcdf_parameters.html" xlink:title="netcdf_parameters">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="775.5,-488 672.5,-488 672.5,-464 775.5,-464 775.5,-488"/>
+<text text-anchor="middle" x="724" y="-473.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_parameters</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_encounter -->
-<g id="type~~graph~~TypeGraph_node18" class="node">
+<g id="type~~graph~~TypeGraph_node5" class="node">
 <title>type~swiftest_encounter</title>
-<g id="a_type~~graph~~TypeGraph_node18"><a xlink:href=".././type/swiftest_encounter.html" xlink:title="swiftest_encounter">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="558.5,-192 456.5,-192 456.5,-168 558.5,-168 558.5,-192"/>
-<text text-anchor="middle" x="507.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_encounter</text>
+<g id="a_type~~graph~~TypeGraph_node5"><a xlink:href=".././type/swiftest_encounter.html" xlink:title="swiftest_encounter">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="558.5,-34 456.5,-34 456.5,-10 558.5,-10 558.5,-34"/>
+<text text-anchor="middle" x="507.5" y="-19.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_encounter</text>
 </a>
 </g>
 </g>
-<!-- type~symba_encounter&#45;&gt;type~swiftest_encounter -->
+<!-- type~swiftest_parameters -->
+<g id="type~~graph~~TypeGraph_node6" class="node">
+<title>type~swiftest_parameters</title>
+<g id="a_type~~graph~~TypeGraph_node6"><a xlink:href=".././type/swiftest_parameters.html" xlink:title="swiftest_parameters">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="979,-488 870,-488 870,-464 979,-464 979,-488"/>
+<text text-anchor="middle" x="924.5" y="-473.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_parameters</text>
+</a>
+</g>
+</g>
+<!-- type~swiftest_parameters&#45;&gt;type~netcdf_parameters -->
 <g id="type~~graph~~TypeGraph_edge6" class="edge">
-<title>type~symba_encounter&#45;&gt;type~swiftest_encounter</title>
-<path fill="none" stroke="#000000" d="M674.86,-180C643.52,-180 602.38,-180 568.86,-180"/>
-<polygon fill="#000000" stroke="#000000" points="568.71,-176.5 558.71,-180 568.71,-183.5 568.71,-176.5"/>
+<title>type~swiftest_parameters&#45;&gt;type~netcdf_parameters</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M869.78,-476C843.82,-476 812.55,-476 785.73,-476"/>
+<polygon fill="#000000" stroke="#000000" points="785.68,-472.5 775.68,-476 785.68,-479.5 785.68,-472.5"/>
+<text text-anchor="middle" x="824" y="-478.4" font-family="Helvetica,sans-Serif" font-size="9.50">nciu</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~symba_pltpenc -->
 <g id="type~~graph~~TypeGraph_node7" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~graph~~TypeGraph_node7"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-367 0,-367 0,-343 112,-343 112,-367"/>
-<text text-anchor="middle" x="56" y="-352.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~symba_pltpenc</title>
+<g id="a_type~~graph~~TypeGraph_node7"><a xlink:href=".././type/symba_pltpenc.html" xlink:title="symba_pltpenc">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="967,-24 882,-24 882,0 967,0 967,-24"/>
+<text text-anchor="middle" x="924.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pltpenc</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_nbody_system -->
-<g id="type~~graph~~TypeGraph_node8" class="node">
-<title>type~rmvs_nbody_system</title>
-<g id="a_type~~graph~~TypeGraph_node8"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="980,-318 869,-318 869,-294 980,-294 980,-318"/>
-<text text-anchor="middle" x="924.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<!-- type~symba_encounter -->
+<g id="type~~graph~~TypeGraph_node34" class="node">
+<title>type~symba_encounter</title>
+<g id="a_type~~graph~~TypeGraph_node34"><a xlink:href=".././type/symba_encounter.html" xlink:title="symba_encounter">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="773,-44 675,-44 675,-20 773,-20 773,-44"/>
+<text text-anchor="middle" x="724" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter</text>
 </a>
 </g>
 </g>
+<!-- type~symba_pltpenc&#45;&gt;type~symba_encounter -->
+<g id="type~~graph~~TypeGraph_edge7" class="edge">
+<title>type~symba_pltpenc&#45;&gt;type~symba_encounter</title>
+<path fill="none" stroke="#000000" d="M891.72,-24C884.24,-26.89 876.32,-30.01 869,-33 849.28,-41.05 846.3,-52.11 825,-52"/>
+<path fill="none" stroke="#000000" d="M823,-52C807.62,-51.92 791.15,-49.5 776.19,-46.37"/>
+<polygon fill="#000000" stroke="#000000" points="776.63,-42.88 766.11,-44.11 775.1,-49.71 776.63,-42.88"/>
+</g>
 <!-- type~whm_nbody_system -->
-<g id="type~~graph~~TypeGraph_node22" class="node">
+<g id="type~~graph~~TypeGraph_node8" class="node">
 <title>type~whm_nbody_system</title>
-<g id="a_type~~graph~~TypeGraph_node22"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="779,-318 669,-318 669,-294 779,-294 779,-318"/>
-<text text-anchor="middle" x="724" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
+<g id="a_type~~graph~~TypeGraph_node8"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="779,-240 669,-240 669,-216 779,-216 779,-240"/>
+<text text-anchor="middle" x="724" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~graph~~TypeGraph_edge7" class="edge">
-<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M869,-306C844.27,-306 814.87,-306 789.09,-306"/>
-<polygon fill="#000000" stroke="#000000" points="789.04,-302.5 779.04,-306 789.04,-309.5 789.04,-302.5"/>
-</g>
-<!-- type~symba_merger -->
-<g id="type~~graph~~TypeGraph_node9" class="node">
-<title>type~symba_merger</title>
-<g id="a_type~~graph~~TypeGraph_node9"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="967,-108 882,-108 882,-84 967,-84 967,-108"/>
-<text text-anchor="middle" x="924.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+<!-- type~swiftest_nbody_system -->
+<g id="type~~graph~~TypeGraph_node17" class="node">
+<title>type~swiftest_nbody_system</title>
+<g id="a_type~~graph~~TypeGraph_node17"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="569,-240 446,-240 446,-216 569,-216 569,-240"/>
+<text text-anchor="middle" x="507.5" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~symba_merger&#45;&gt;type~symba_pl -->
+<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
 <g id="type~~graph~~TypeGraph_edge8" class="edge">
-<title>type~symba_merger&#45;&gt;type~symba_pl</title>
-<path fill="none" stroke="#000000" d="M881.89,-96C846.86,-96 797.17,-96 763.15,-96"/>
-<polygon fill="#000000" stroke="#000000" points="763.13,-92.5 753.13,-96 763.13,-99.5 763.13,-92.5"/>
+<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
+<path fill="none" stroke="#000000" d="M668.87,-228C641.67,-228 608.37,-228 579.18,-228"/>
+<polygon fill="#000000" stroke="#000000" points="579.04,-224.5 569.04,-228 579.04,-231.5 579.04,-224.5"/>
 </g>
-<!-- type~rmvs_interp -->
-<g id="type~~graph~~TypeGraph_node10" class="node">
-<title>type~rmvs_interp</title>
-<g id="a_type~~graph~~TypeGraph_node10"><a xlink:href=".././type/rmvs_interp.html" xlink:title="rmvs_interp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="347,-430 278,-430 278,-406 347,-406 347,-430"/>
-<text text-anchor="middle" x="312.5" y="-415.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp</text>
+<!-- type~tides_derivs_func -->
+<g id="type~~graph~~TypeGraph_node9" class="node">
+<title>type~tides_derivs_func</title>
+<g id="a_type~~graph~~TypeGraph_node9"><a xlink:href=".././type/tides_derivs_func.html" xlink:title="tides_derivs_func">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1243.5,-530 1147.5,-530 1147.5,-506 1243.5,-506 1243.5,-530"/>
+<text text-anchor="middle" x="1195.5" y="-515.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_derivs_func</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body -->
-<g id="type~~graph~~TypeGraph_node12" class="node">
-<title>type~swiftest_body</title>
-<g id="a_type~~graph~~TypeGraph_node12"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-300 164,-300 164,-276 241,-276 241,-300"/>
-<text text-anchor="middle" x="202.5" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
-</a>
-</g>
+<!-- lambda_obj_tvar -->
+<g id="type~~graph~~TypeGraph_node41" class="node">
+<title>lambda_obj_tvar</title>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="970.5,-530 878.5,-530 878.5,-506 970.5,-506 970.5,-530"/>
+<text text-anchor="middle" x="924.5" y="-515.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj_tvar</text>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<!-- type~tides_derivs_func&#45;&gt;lambda_obj_tvar -->
 <g id="type~~graph~~TypeGraph_edge9" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M175.33,-300.13C152.11,-310.9 117.99,-326.72 92.35,-338.61"/>
-<polygon fill="#000000" stroke="#000000" points="90.57,-335.58 82.97,-342.96 93.52,-341.93 90.57,-335.58"/>
-<text text-anchor="middle" x="138" y="-321.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<title>type~tides_derivs_func&#45;&gt;lambda_obj_tvar</title>
+<path fill="none" stroke="#000000" d="M1147.34,-518C1100.91,-518 1030.04,-518 980.94,-518"/>
+<polygon fill="#000000" stroke="#000000" points="980.81,-514.5 970.81,-518 980.81,-521.5 980.81,-514.5"/>
 </g>
 <!-- type~swiftest_base -->
-<g id="type~~graph~~TypeGraph_node25" class="node">
+<g id="type~~graph~~TypeGraph_node10" class="node">
 <title>type~swiftest_base</title>
-<g id="a_type~~graph~~TypeGraph_node25"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-313 17.5,-313 17.5,-289 94.5,-289 94.5,-313"/>
-<text text-anchor="middle" x="56" y="-298.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<g id="a_type~~graph~~TypeGraph_node10"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-298 17.5,-298 17.5,-274 94.5,-274 94.5,-298"/>
+<text text-anchor="middle" x="56" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~graph~~TypeGraph_edge10" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.98,-288.91C153.01,-289.35 141.01,-290.02 130,-291 121.85,-291.73 113.21,-292.72 104.84,-293.79"/>
-<polygon fill="#000000" stroke="#000000" points="104.26,-290.34 94.81,-295.13 105.19,-297.27 104.26,-290.34"/>
-</g>
-<!-- type~fraggle_fragments -->
-<g id="type~~graph~~TypeGraph_node13" class="node">
-<title>type~fraggle_fragments</title>
-<g id="a_type~~graph~~TypeGraph_node13"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="557.5,-150 457.5,-150 457.5,-126 557.5,-126 557.5,-150"/>
-<text text-anchor="middle" x="507.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
+<!-- type~symba_plplenc -->
+<g id="type~~graph~~TypeGraph_node11" class="node">
+<title>type~symba_plplenc</title>
+<g id="a_type~~graph~~TypeGraph_node11"><a xlink:href=".././type/symba_plplenc.html" xlink:title="symba_plplenc">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="966.5,-66 882.5,-66 882.5,-42 966.5,-42 966.5,-66"/>
+<text text-anchor="middle" x="924.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_plplenc</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_pl -->
-<g id="type~~graph~~TypeGraph_node33" class="node">
-<title>type~swiftest_pl</title>
-<g id="a_type~~graph~~TypeGraph_node33"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="343.5,-258 281.5,-258 281.5,-234 343.5,-234 343.5,-258"/>
-<text text-anchor="middle" x="312.5" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
-</a>
+<!-- type~symba_plplenc&#45;&gt;type~symba_encounter -->
+<g id="type~~graph~~TypeGraph_edge10" class="edge">
+<title>type~symba_plplenc&#45;&gt;type~symba_encounter</title>
+<path fill="none" stroke="#000000" d="M882.29,-52.89C864.65,-52.48 843.81,-52.1 825,-52"/>
 </g>
+<!-- type~symba_nbody_system -->
+<g id="type~~graph~~TypeGraph_node12" class="node">
+<title>type~symba_nbody_system</title>
+<g id="a_type~~graph~~TypeGraph_node12"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1255,-88 1136,-88 1136,-64 1255,-64 1255,-88"/>
+<text text-anchor="middle" x="1195.5" y="-73.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+</a>
 </g>
-<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
-<g id="type~~graph~~TypeGraph_edge11" class="edge">
-<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M462.43,-150.01C456.65,-152.51 451,-155.48 446,-159 417.94,-178.71 428.03,-203.39 397.5,-219"/>
 </g>
-<!-- type~symba_tp -->
-<g id="type~~graph~~TypeGraph_node14" class="node">
-<title>type~symba_tp</title>
-<g id="a_type~~graph~~TypeGraph_node14"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="753.5,-272 694.5,-272 694.5,-248 753.5,-248 753.5,-272"/>
-<text text-anchor="middle" x="724" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
-</a>
+<!-- type~symba_nbody_system&#45;&gt;type~symba_pltpenc -->
+<g id="type~~graph~~TypeGraph_edge12" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~symba_pltpenc</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1168.79,-63.96C1154.17,-57.53 1135.37,-49.94 1118,-45 1071.15,-31.66 1016.26,-22.9 977.11,-17.78"/>
+<polygon fill="#000000" stroke="#000000" points="977.37,-14.29 967.01,-16.49 976.48,-21.23 977.37,-14.29"/>
+<text text-anchor="middle" x="1058" y="-47.4" font-family="Helvetica,sans-Serif" font-size="9.50">pltpenc_list</text>
 </g>
+<!-- type~symba_nbody_system&#45;&gt;type~symba_plplenc -->
+<g id="type~~graph~~TypeGraph_edge13" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~symba_plplenc</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1135.63,-69.65C1129.68,-69.07 1123.72,-68.51 1118,-68 1070.2,-63.76 1015.64,-59.89 976.84,-57.29"/>
+<polygon fill="#000000" stroke="#000000" points="977.05,-53.8 966.84,-56.63 976.58,-60.78 977.05,-53.8"/>
+<text text-anchor="middle" x="1058" y="-70.4" font-family="Helvetica,sans-Serif" font-size="9.50">plplenc_list, plplcollision_list</text>
 </g>
-<!-- type~helio_tp -->
-<g id="type~~graph~~TypeGraph_node38" class="node">
-<title>type~helio_tp</title>
-<g id="a_type~~graph~~TypeGraph_node38"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-272 480.5,-272 480.5,-248 534.5,-248 534.5,-272"/>
-<text text-anchor="middle" x="507.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
+<!-- type~helio_nbody_system -->
+<g id="type~~graph~~TypeGraph_node13" class="node">
+<title>type~helio_nbody_system</title>
+<g id="a_type~~graph~~TypeGraph_node13"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="979.5,-198 869.5,-198 869.5,-174 979.5,-174 979.5,-198"/>
+<text text-anchor="middle" x="924.5" y="-183.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~symba_tp&#45;&gt;type~helio_tp -->
-<g id="type~~graph~~TypeGraph_edge12" class="edge">
-<title>type~symba_tp&#45;&gt;type~helio_tp</title>
-<path fill="none" stroke="#000000" d="M694.07,-260C655.38,-260 586.79,-260 544.72,-260"/>
-<polygon fill="#000000" stroke="#000000" points="544.62,-256.5 534.62,-260 544.62,-263.5 544.62,-256.5"/>
+<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<g id="type~~graph~~TypeGraph_edge14" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
+<path fill="none" stroke="#000000" d="M1164.94,-88.09C1116.15,-108.04 1018.74,-147.87 964.41,-170.09"/>
+<polygon fill="#000000" stroke="#000000" points="963.04,-166.87 955.11,-173.89 965.69,-173.35 963.04,-166.87"/>
 </g>
-<!-- type~whm_pl -->
-<g id="type~~graph~~TypeGraph_node15" class="node">
-<title>type~whm_pl</title>
-<g id="a_type~~graph~~TypeGraph_node15"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="851,-271 797,-271 797,-247 851,-247 851,-271"/>
-<text text-anchor="middle" x="824" y="-256.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
+<!-- type~symba_merger -->
+<g id="type~~graph~~TypeGraph_node36" class="node">
+<title>type~symba_merger</title>
+<g id="a_type~~graph~~TypeGraph_node36"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="967,-108 882,-108 882,-84 967,-84 967,-108"/>
+<text text-anchor="middle" x="924.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
 </a>
 </g>
 </g>
-<!-- type~whm_pl&#45;&gt;type~swiftest_pl -->
-<g id="type~~graph~~TypeGraph_edge13" class="edge">
-<title>type~whm_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M800.75,-246.94C793.95,-243.8 786.34,-240.79 779,-239 696.53,-218.86 473.09,-180.35 397.5,-219"/>
-</g>
-<!-- type~netcdf_parameters -->
-<g id="type~~graph~~TypeGraph_node16" class="node">
-<title>type~netcdf_parameters</title>
-<g id="a_type~~graph~~TypeGraph_node16"><a xlink:href=".././type/netcdf_parameters.html" xlink:title="netcdf_parameters">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="775.5,-66 672.5,-66 672.5,-42 775.5,-42 775.5,-66"/>
-<text text-anchor="middle" x="724" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf_parameters</text>
-</a>
+<!-- type~symba_nbody_system&#45;&gt;type~symba_merger -->
+<g id="type~~graph~~TypeGraph_edge11" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~symba_merger</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1135.8,-80.36C1088.61,-83.87 1022.95,-88.75 977.61,-92.13"/>
+<polygon fill="#000000" stroke="#000000" points="977.11,-88.65 967.4,-92.88 977.63,-95.63 977.11,-88.65"/>
+<text text-anchor="middle" x="1058" y="-93.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
 </g>
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~graph~~TypeGraph_edge15" class="edge">
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M823,-228C812.12,-229.12 800.52,-229.68 789.25,-229.89"/>
+<polygon fill="#000000" stroke="#000000" points="788.98,-226.39 779.02,-229.99 789.05,-233.39 788.98,-226.39"/>
+<path fill="none" stroke="#000000" d="M891.06,-198.03C883.76,-200.86 876.08,-203.95 869,-207 849.1,-215.57 846.55,-225.77 825,-228"/>
 </g>
-<!-- type~lambda_obj -->
-<g id="type~~graph~~TypeGraph_node17" class="node">
-<title>type~lambda_obj</title>
-<g id="a_type~~graph~~TypeGraph_node17"><a xlink:href=".././type/lambda_obj.html" xlink:title="lambda_obj">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="958.5,-495 890.5,-495 890.5,-471 958.5,-471 958.5,-495"/>
-<text text-anchor="middle" x="924.5" y="-480.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
+<!-- type~symba_kinship -->
+<g id="type~~graph~~TypeGraph_node14" class="node">
+<title>type~symba_kinship</title>
+<g id="a_type~~graph~~TypeGraph_node14"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="549,-76 466,-76 466,-52 549,-52 549,-76"/>
+<text text-anchor="middle" x="507.5" y="-61.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
 </a>
 </g>
 </g>
-<!-- type~lambda_obj_err -->
-<g id="type~~graph~~TypeGraph_node19" class="node">
-<title>type~lambda_obj_err</title>
-<g id="a_type~~graph~~TypeGraph_node19"><a xlink:href=".././type/lambda_obj_err.html" xlink:title="lambda_obj_err">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1239.5,-495 1151.5,-495 1151.5,-471 1239.5,-471 1239.5,-495"/>
-<text text-anchor="middle" x="1195.5" y="-480.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj_err</text>
+<!-- type~helio_cb -->
+<g id="type~~graph~~TypeGraph_node15" class="node">
+<title>type~helio_cb</title>
+<g id="a_type~~graph~~TypeGraph_node15"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="339.5,-348 285.5,-348 285.5,-324 339.5,-324 339.5,-348"/>
+<text text-anchor="middle" x="312.5" y="-333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_cb</text>
 </a>
 </g>
 </g>
-<!-- type~lambda_obj_err&#45;&gt;type~lambda_obj -->
-<g id="type~~graph~~TypeGraph_edge14" class="edge">
-<title>type~lambda_obj_err&#45;&gt;type~lambda_obj</title>
-<path fill="none" stroke="#000000" d="M1151.41,-481.34C1124.76,-480.72 1089.85,-480.66 1059,-483"/>
-</g>
-<!-- type~symba_pltpenc -->
-<g id="type~~graph~~TypeGraph_node20" class="node">
-<title>type~symba_pltpenc</title>
-<g id="a_type~~graph~~TypeGraph_node20"><a xlink:href=".././type/symba_pltpenc.html" xlink:title="symba_pltpenc">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="967,-192 882,-192 882,-168 967,-168 967,-192"/>
-<text text-anchor="middle" x="924.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pltpenc</text>
+<!-- type~swiftest_cb -->
+<g id="type~~graph~~TypeGraph_node30" class="node">
+<title>type~swiftest_cb</title>
+<g id="a_type~~graph~~TypeGraph_node30"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-292 170,-292 170,-268 235,-268 235,-292"/>
+<text text-anchor="middle" x="202.5" y="-277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pltpenc&#45;&gt;type~symba_encounter -->
-<g id="type~~graph~~TypeGraph_edge15" class="edge">
-<title>type~symba_pltpenc&#45;&gt;type~symba_encounter</title>
-<path fill="none" stroke="#000000" d="M881.71,-178.1C864.15,-177.8 843.54,-178.08 825,-180"/>
-</g>
-<!-- type~swiftest_parameters&#45;&gt;type~netcdf_parameters -->
+<!-- type~helio_cb&#45;&gt;type~swiftest_cb -->
 <g id="type~~graph~~TypeGraph_edge16" class="edge">
-<title>type~swiftest_parameters&#45;&gt;type~netcdf_parameters</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M869.78,-54C843.82,-54 812.55,-54 785.73,-54"/>
-<polygon fill="#000000" stroke="#000000" points="785.68,-50.5 775.68,-54 785.68,-57.5 785.68,-50.5"/>
-<text text-anchor="middle" x="824" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">nciu</text>
+<title>type~helio_cb&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" d="M259,-357C236.3,-345.56 220.8,-319.94 212.07,-301.39"/>
+<polygon fill="#000000" stroke="#000000" points="215.25,-299.94 208.02,-292.2 208.85,-302.76 215.25,-299.94"/>
+<path fill="none" stroke="#000000" d="M290.96,-348.03C279.21,-354.19 265.69,-359.87 260,-357"/>
 </g>
-<!-- type~swiftest_nbody_system -->
-<g id="type~~graph~~TypeGraph_node34" class="node">
-<title>type~swiftest_nbody_system</title>
-<g id="a_type~~graph~~TypeGraph_node34"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="569,-320 446,-320 446,-296 569,-296 569,-320"/>
-<text text-anchor="middle" x="507.5" y="-305.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
+<!-- type~swiftest_body -->
+<g id="type~~graph~~TypeGraph_node37" class="node">
+<title>type~swiftest_body</title>
+<g id="a_type~~graph~~TypeGraph_node37"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-242 164,-242 164,-218 241,-218 241,-242"/>
+<text text-anchor="middle" x="202.5" y="-227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
-<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~graph~~TypeGraph_edge17" class="edge">
-<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
-<path fill="none" stroke="#000000" d="M668.87,-306.5C641.67,-306.76 608.37,-307.07 579.18,-307.34"/>
-<polygon fill="#000000" stroke="#000000" points="579.01,-303.84 569.04,-307.44 579.08,-310.84 579.01,-303.84"/>
-</g>
-<!-- type~swiftest_tp -->
-<g id="type~~graph~~TypeGraph_node23" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~graph~~TypeGraph_node23"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="344,-300 281,-300 281,-276 344,-276 344,-300"/>
-<text text-anchor="middle" x="312.5" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
-</a>
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M281.42,-203.31C271.18,-206.81 259.51,-210.81 248.37,-214.63"/>
+<polygon fill="#000000" stroke="#000000" points="247.1,-211.36 238.77,-217.92 249.37,-217.99 247.1,-211.36"/>
 </g>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
+<g id="type~~graph~~TypeGraph_edge19" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.96,-217.02C415.9,-211.57 380.41,-205.13 353.74,-200.3"/>
+<polygon fill="#000000" stroke="#000000" points="354.08,-196.8 343.61,-198.46 352.83,-203.69 354.08,-196.8"/>
+<text text-anchor="middle" x="396.5" y="-216.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
 <g id="type~~graph~~TypeGraph_edge18" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M280.82,-286.11C273.93,-286.21 266.67,-286.73 260,-288"/>
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.57,-229.13C399.08,-231.13 333.75,-236.39 278,-250 264.53,-253.29 250.29,-258.55 237.9,-263.75"/>
+<polygon fill="#000000" stroke="#000000" points="236.2,-260.68 228.42,-267.87 238.99,-267.1 236.2,-260.68"/>
+<text text-anchor="middle" x="312.5" y="-252.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
-<!-- type~tides_derivs_func -->
-<g id="type~~graph~~TypeGraph_node24" class="node">
-<title>type~tides_derivs_func</title>
-<g id="a_type~~graph~~TypeGraph_node24"><a xlink:href=".././type/tides_derivs_func.html" xlink:title="tides_derivs_func">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1243.5,-537 1147.5,-537 1147.5,-513 1243.5,-513 1243.5,-537"/>
-<text text-anchor="middle" x="1195.5" y="-522.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_derivs_func</text>
+<!-- type~swiftest_tp -->
+<g id="type~~graph~~TypeGraph_node31" class="node">
+<title>type~swiftest_tp</title>
+<g id="a_type~~graph~~TypeGraph_node31"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="344,-293 281,-293 281,-269 344,-269 344,-293"/>
+<text text-anchor="middle" x="312.5" y="-278.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- lambda_obj_tvar -->
-<g id="type~~graph~~TypeGraph_node41" class="node">
-<title>lambda_obj_tvar</title>
-<polygon fill="#5cb85c" stroke="#5cb85c" points="970.5,-537 878.5,-537 878.5,-513 970.5,-513 970.5,-537"/>
-<text text-anchor="middle" x="924.5" y="-522.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj_tvar</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~graph~~TypeGraph_edge20" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M468.28,-240.09C455.51,-244.02 441.18,-248.32 428,-252 403.62,-258.81 376.13,-265.8 354.19,-271.2"/>
+<polygon fill="#000000" stroke="#000000" points="353.1,-267.87 344.22,-273.65 354.77,-274.67 353.1,-267.87"/>
+<text text-anchor="middle" x="396.5" y="-271.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~tides_derivs_func&#45;&gt;lambda_obj_tvar -->
-<g id="type~~graph~~TypeGraph_edge19" class="edge">
-<title>type~tides_derivs_func&#45;&gt;lambda_obj_tvar</title>
-<path fill="none" stroke="#000000" d="M1147.34,-525C1100.91,-525 1030.04,-525 980.94,-525"/>
-<polygon fill="#000000" stroke="#000000" points="980.81,-521.5 970.81,-525 980.81,-528.5 980.81,-521.5"/>
+<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~graph~~TypeGraph_edge21" class="edge">
+<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M868.95,-226C854.62,-226.02 839.2,-226.53 825,-228"/>
 </g>
-<!-- type~symba_plplenc -->
-<g id="type~~graph~~TypeGraph_node26" class="node">
-<title>type~symba_plplenc</title>
-<g id="a_type~~graph~~TypeGraph_node26"><a xlink:href=".././type/symba_plplenc.html" xlink:title="symba_plplenc">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="966.5,-150 882.5,-150 882.5,-126 966.5,-126 966.5,-150"/>
-<text text-anchor="middle" x="924.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_plplenc</text>
+<!-- type~whm_tp -->
+<g id="type~~graph~~TypeGraph_node19" class="node">
+<title>type~whm_tp</title>
+<g id="a_type~~graph~~TypeGraph_node19"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-324 480.5,-324 480.5,-300 534.5,-300 534.5,-324"/>
+<text text-anchor="middle" x="507.5" y="-309.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
 </a>
 </g>
 </g>
-<!-- type~symba_plplenc&#45;&gt;type~symba_encounter -->
-<g id="type~~graph~~TypeGraph_edge20" class="edge">
-<title>type~symba_plplenc&#45;&gt;type~symba_encounter</title>
-<path fill="none" stroke="#000000" d="M823,-180C810.25,-181.32 796.51,-181.86 783.47,-181.97"/>
-<polygon fill="#000000" stroke="#000000" points="783.2,-178.47 773.2,-181.97 783.2,-185.47 783.2,-178.47"/>
-<path fill="none" stroke="#000000" d="M891.06,-150.03C883.76,-152.86 876.08,-155.95 869,-159 849.1,-167.57 846.55,-177.77 825,-180"/>
+<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
+<g id="type~~graph~~TypeGraph_edge22" class="edge">
+<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" d="M480.49,-310.9C458.39,-309.88 425.84,-308.2 397.5,-306"/>
 </g>
-<!-- type~rmvs_pl -->
-<g id="type~~graph~~TypeGraph_node27" class="node">
-<title>type~rmvs_pl</title>
-<g id="a_type~~graph~~TypeGraph_node27"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1222.5,-318 1168.5,-318 1168.5,-294 1222.5,-294 1222.5,-318"/>
-<text text-anchor="middle" x="1195.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<!-- type~lambda_obj -->
+<g id="type~~graph~~TypeGraph_node20" class="node">
+<title>type~lambda_obj</title>
+<g id="a_type~~graph~~TypeGraph_node20"><a xlink:href=".././type/lambda_obj.html" xlink:title="lambda_obj">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="958.5,-614 890.5,-614 890.5,-590 958.5,-590 958.5,-614"/>
+<text text-anchor="middle" x="924.5" y="-599.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
-<g id="type~~graph~~TypeGraph_edge22" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1168.22,-306C1127.31,-306 1047.2,-306 990.21,-306"/>
-<polygon fill="#000000" stroke="#000000" points="990.21,-302.5 980.21,-306 990.21,-309.5 990.21,-302.5"/>
-<text text-anchor="middle" x="1058" y="-308.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<!-- type~helio_pl -->
+<g id="type~~graph~~TypeGraph_node21" class="node">
+<title>type~helio_pl</title>
+<g id="a_type~~graph~~TypeGraph_node21"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-118 480.5,-118 480.5,-94 534.5,-94 534.5,-118"/>
+<text text-anchor="middle" x="507.5" y="-103.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
+</a>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_interp -->
-<g id="type~~graph~~TypeGraph_edge21" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_interp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1181.7,-318.16C1145.01,-351.69 1035.04,-443 925.5,-443 925.5,-443 925.5,-443 506.5,-443 454.86,-443 396.09,-434.09 357.1,-426.91"/>
-<polygon fill="#000000" stroke="#000000" points="357.62,-423.44 347.15,-425.03 356.33,-430.32 357.62,-423.44"/>
-<text text-anchor="middle" x="724" y="-445.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
+<!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~graph~~TypeGraph_edge23" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
-<path fill="none" stroke="#000000" d="M1168.22,-302.66C1103.48,-294.42 936.15,-273.14 861.68,-263.67"/>
-<polygon fill="#000000" stroke="#000000" points="861.75,-260.15 851.39,-262.36 860.87,-267.09 861.75,-260.15"/>
+<title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" d="M480.08,-117.33C458.29,-126.28 426.37,-138.47 397.5,-146"/>
+<path fill="none" stroke="#000000" d="M395.5,-146C374.26,-151.54 352.83,-164.12 337.21,-174.87"/>
+<polygon fill="#000000" stroke="#000000" points="334.84,-172.27 328.73,-180.92 338.9,-177.96 334.84,-172.27"/>
 </g>
-<!-- type~symba_nbody_system -->
-<g id="type~~graph~~TypeGraph_node28" class="node">
-<title>type~symba_nbody_system</title>
-<g id="a_type~~graph~~TypeGraph_node28"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1255,-173 1136,-173 1136,-149 1255,-149 1255,-173"/>
-<text text-anchor="middle" x="1195.5" y="-158.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+<!-- type~lambda_obj_err -->
+<g id="type~~graph~~TypeGraph_node23" class="node">
+<title>type~lambda_obj_err</title>
+<g id="a_type~~graph~~TypeGraph_node23"><a xlink:href=".././type/lambda_obj_err.html" xlink:title="lambda_obj_err">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1239.5,-614 1151.5,-614 1151.5,-590 1239.5,-590 1239.5,-614"/>
+<text text-anchor="middle" x="1195.5" y="-599.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj_err</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~symba_merger -->
+<!-- type~lambda_obj_err&#45;&gt;type~lambda_obj -->
 <g id="type~~graph~~TypeGraph_edge24" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~symba_merger</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1168.78,-149C1154.16,-142.58 1135.35,-134.99 1118,-130 1071.14,-116.53 1016.25,-107.47 977.1,-102.11"/>
-<polygon fill="#000000" stroke="#000000" points="977.38,-98.62 967,-100.77 976.45,-105.56 977.38,-98.62"/>
-<text text-anchor="middle" x="1058" y="-132.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+<title>type~lambda_obj_err&#45;&gt;type~lambda_obj</title>
+<path fill="none" stroke="#000000" d="M1151.41,-600.34C1124.76,-599.72 1089.85,-599.66 1059,-602"/>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~symba_pltpenc -->
+<!-- type~helio_tp -->
+<g id="type~~graph~~TypeGraph_node24" class="node">
+<title>type~helio_tp</title>
+<g id="a_type~~graph~~TypeGraph_node24"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-282 480.5,-282 480.5,-258 534.5,-258 534.5,-282"/>
+<text text-anchor="middle" x="507.5" y="-267.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
+</a>
+</g>
+</g>
+<!-- type~helio_tp&#45;&gt;type~swiftest_tp -->
 <g id="type~~graph~~TypeGraph_edge25" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~symba_pltpenc</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1135.8,-165.15C1088.61,-168.48 1022.95,-173.12 977.61,-176.32"/>
-<polygon fill="#000000" stroke="#000000" points="977.13,-172.84 967.4,-177.04 977.62,-179.83 977.13,-172.84"/>
-<text text-anchor="middle" x="1058" y="-177.4" font-family="Helvetica,sans-Serif" font-size="9.50">pltpenc_list</text>
+<title>type~helio_tp&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" d="M480.23,-278.95C448.67,-289.67 399.65,-306.17 397.5,-306"/>
+<path fill="none" stroke="#000000" d="M395.5,-306C380.81,-304.86 365.23,-300.86 351.63,-296.39"/>
+<polygon fill="#000000" stroke="#000000" points="352.72,-293.06 342.12,-293.08 350.42,-299.68 352.72,-293.06"/>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~symba_plplenc -->
+<!-- type~fraggle_colliders -->
+<g id="type~~graph~~TypeGraph_node25" class="node">
+<title>type~fraggle_colliders</title>
+<g id="a_type~~graph~~TypeGraph_node25"><a xlink:href=".././type/fraggle_colliders.html" xlink:title="fraggle_colliders">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1241,-656 1150,-656 1150,-632 1241,-632 1241,-656"/>
+<text text-anchor="middle" x="1195.5" y="-641.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_colliders</text>
+</a>
+</g>
+</g>
+<!-- type~symba_tp -->
+<g id="type~~graph~~TypeGraph_node26" class="node">
+<title>type~symba_tp</title>
+<g id="a_type~~graph~~TypeGraph_node26"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="753.5,-282 694.5,-282 694.5,-258 753.5,-258 753.5,-282"/>
+<text text-anchor="middle" x="724" y="-267.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
+</a>
+</g>
+</g>
+<!-- type~symba_tp&#45;&gt;type~helio_tp -->
 <g id="type~~graph~~TypeGraph_edge26" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~symba_plplenc</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1135.63,-154.68C1129.67,-154.09 1123.72,-153.52 1118,-153 1070.19,-148.64 1015.64,-144.46 976.84,-141.63"/>
-<polygon fill="#000000" stroke="#000000" points="977.06,-138.14 966.83,-140.9 976.55,-145.12 977.06,-138.14"/>
-<text text-anchor="middle" x="1058" y="-155.4" font-family="Helvetica,sans-Serif" font-size="9.50">plplenc_list, plplcollision_list</text>
+<title>type~symba_tp&#45;&gt;type~helio_tp</title>
+<path fill="none" stroke="#000000" d="M694.07,-270C655.38,-270 586.79,-270 544.72,-270"/>
+<polygon fill="#000000" stroke="#000000" points="544.62,-266.5 534.62,-270 544.62,-273.5 544.62,-266.5"/>
 </g>
-<!-- type~helio_nbody_system -->
-<g id="type~~graph~~TypeGraph_node31" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~graph~~TypeGraph_node31"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="979.5,-236 869.5,-236 869.5,-212 979.5,-212 979.5,-236"/>
-<text text-anchor="middle" x="924.5" y="-221.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<!-- type~symba_parameters -->
+<g id="type~~graph~~TypeGraph_node27" class="node">
+<title>type~symba_parameters</title>
+<g id="a_type~~graph~~TypeGraph_node27"><a xlink:href=".././type/symba_parameters.html" xlink:title="symba_parameters">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1248,-488 1143,-488 1143,-464 1248,-464 1248,-488"/>
+<text text-anchor="middle" x="1195.5" y="-473.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_parameters</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<!-- type~symba_parameters&#45;&gt;type~swiftest_parameters -->
 <g id="type~~graph~~TypeGraph_edge27" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M1165.09,-173.1C1151.02,-178.55 1133.83,-184.7 1118,-189 1075.9,-200.44 1027.6,-209.21 989.91,-215.11"/>
-<polygon fill="#000000" stroke="#000000" points="988.92,-211.72 979.57,-216.7 989.99,-218.64 988.92,-211.72"/>
+<title>type~symba_parameters&#45;&gt;type~swiftest_parameters</title>
+<path fill="none" stroke="#000000" d="M1142.95,-476C1099.18,-476 1036.17,-476 989.23,-476"/>
+<polygon fill="#000000" stroke="#000000" points="989.18,-472.5 979.18,-476 989.18,-479.5 989.18,-472.5"/>
 </g>
-<!-- type~rmvs_cb -->
+<!-- type~walltimer -->
+<g id="type~~graph~~TypeGraph_node28" class="node">
+<title>type~walltimer</title>
+<g id="a_type~~graph~~TypeGraph_node28"><a xlink:href=".././type/walltimer.html" xlink:title="walltimer">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1223,-698 1168,-698 1168,-674 1223,-674 1223,-698"/>
+<text text-anchor="middle" x="1195.5" y="-683.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltimer</text>
+</a>
+</g>
+</g>
+<!-- type~symba_pl -->
 <g id="type~~graph~~TypeGraph_node29" class="node">
-<title>type~rmvs_cb</title>
-<g id="a_type~~graph~~TypeGraph_node29"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-414 480.5,-414 480.5,-390 534.5,-390 534.5,-414"/>
-<text text-anchor="middle" x="507.5" y="-399.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
+<title>type~symba_pl</title>
+<g id="a_type~~graph~~TypeGraph_node29"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="753,-108 695,-108 695,-84 753,-84 753,-108"/>
+<text text-anchor="middle" x="724" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_cb&#45;&gt;type~whm_cb -->
+<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
+<g id="type~~graph~~TypeGraph_edge28" class="edge">
+<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.96,-91.82C660.55,-86.68 601.56,-77.88 559.14,-71.55"/>
+<polygon fill="#000000" stroke="#000000" points="559.41,-68.06 549,-70.04 558.38,-74.98 559.41,-68.06"/>
+<text text-anchor="middle" x="619" y="-87.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
+</g>
+<!-- type~symba_pl&#45;&gt;type~helio_pl -->
 <g id="type~~graph~~TypeGraph_edge29" class="edge">
-<title>type~rmvs_cb&#45;&gt;type~whm_cb</title>
-<path fill="none" stroke="#000000" d="M480.47,-398.49C446.8,-393.96 387.96,-386.03 349.88,-380.9"/>
-<polygon fill="#000000" stroke="#000000" points="350.11,-377.4 339.73,-379.53 349.18,-384.34 350.11,-377.4"/>
+<title>type~symba_pl&#45;&gt;type~helio_pl</title>
+<path fill="none" stroke="#000000" d="M694.96,-97.31C656.43,-99.1 587.1,-102.34 544.7,-104.31"/>
+<polygon fill="#000000" stroke="#000000" points="544.36,-100.82 534.53,-104.79 544.69,-107.82 544.36,-100.82"/>
 </g>
-<!-- type~rmvs_cb&#45;&gt;type~rmvs_interp -->
-<g id="type~~graph~~TypeGraph_edge28" class="edge">
-<title>type~rmvs_cb&#45;&gt;type~rmvs_interp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.47,-404.16C448.96,-406.77 395.42,-411.21 357.47,-414.35"/>
-<polygon fill="#000000" stroke="#000000" points="356.89,-410.89 347.21,-415.21 357.46,-417.87 356.89,-410.89"/>
-<text text-anchor="middle" x="396.5" y="-415.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
+<g id="type~~graph~~TypeGraph_edge31" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M169.81,-281.82C162.02,-282.24 153.71,-282.66 146,-283 132.72,-283.58 118.31,-284.11 105.04,-284.56"/>
+<polygon fill="#000000" stroke="#000000" points="104.56,-281.07 94.68,-284.9 104.79,-288.07 104.56,-281.07"/>
 </g>
-<!-- type~lambda_obj_tvar -->
-<g id="type~~graph~~TypeGraph_node30" class="node">
-<title>type~lambda_obj_tvar</title>
-<g id="a_type~~graph~~TypeGraph_node30"><a xlink:href=".././type/lambda_obj_tvar.html" xlink:title="lambda_obj_tvar">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1241.5,-453 1149.5,-453 1149.5,-429 1241.5,-429 1241.5,-453"/>
-<text text-anchor="middle" x="1195.5" y="-438.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj_tvar</text>
+<!-- type~swiftest_particle_info -->
+<g id="type~~graph~~TypeGraph_node35" class="node">
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~graph~~TypeGraph_node35"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-246 0,-246 0,-222 112,-222 112,-246"/>
+<text text-anchor="middle" x="56" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~lambda_obj_tvar&#45;&gt;type~lambda_obj -->
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~graph~~TypeGraph_edge30" class="edge">
-<title>type~lambda_obj_tvar&#45;&gt;type~lambda_obj</title>
-<path fill="none" stroke="#000000" d="M1161.46,-453.11C1128.17,-464.97 1078.95,-481.49 1059,-483"/>
-<path fill="none" stroke="#000000" d="M1057,-483C1027.59,-485.23 994.37,-485.21 968.68,-484.64"/>
-<polygon fill="#000000" stroke="#000000" points="968.6,-481.14 958.52,-484.38 968.42,-488.14 968.6,-481.14"/>
-</g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~graph~~TypeGraph_edge31" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M869.31,-221.09C845.11,-222.39 817.5,-227.77 797,-243 782,-254.14 792.27,-267.84 779,-281 776.11,-283.86 772.83,-286.44 769.35,-288.74"/>
-<polygon fill="#000000" stroke="#000000" points="767.3,-285.89 760.4,-293.94 770.81,-291.95 767.3,-285.89"/>
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-269.91C150.63,-263.8 125.84,-255.91 104.38,-249.08"/>
+<polygon fill="#000000" stroke="#000000" points="105.38,-245.73 94.79,-246.03 103.25,-252.4 105.38,-245.73"/>
+<text text-anchor="middle" x="138" y="-264.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~helio_cb&#45;&gt;type~swiftest_cb -->
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
 <g id="type~~graph~~TypeGraph_edge32" class="edge">
-<title>type~helio_cb&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" d="M286.75,-447.89C283.41,-445.35 280.33,-442.4 278,-439 254.19,-404.28 299.55,-360.44 260,-346"/>
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M285.91,-268.91C271.75,-262.23 253.96,-253.83 238.53,-246.54"/>
+<polygon fill="#000000" stroke="#000000" points="239.82,-243.28 229.29,-242.18 236.83,-249.61 239.82,-243.28"/>
 </g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
+<!-- type~symba_cb -->
+<g id="type~~graph~~TypeGraph_node32" class="node">
+<title>type~symba_cb</title>
+<g id="a_type~~graph~~TypeGraph_node32"><a xlink:href=".././type/symba_cb.html" xlink:title="symba_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="538,-366 477,-366 477,-342 538,-342 538,-366"/>
+<text text-anchor="middle" x="507.5" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_cb</text>
+</a>
+</g>
+</g>
+<!-- type~symba_cb&#45;&gt;type~helio_cb -->
 <g id="type~~graph~~TypeGraph_edge33" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M259,-288C256.52,-288.47 253.96,-288.85 251.37,-289.15"/>
-<polygon fill="#000000" stroke="#000000" points="251,-285.66 241.3,-289.91 251.53,-292.64 251,-285.66"/>
-<path fill="none" stroke="#000000" d="M289.91,-258.18C285.79,-260.87 281.64,-263.86 278,-267 268.69,-275.02 272.07,-285.7 260,-288"/>
+<title>type~symba_cb&#45;&gt;type~helio_cb</title>
+<path fill="none" stroke="#000000" d="M476.77,-351.23C442.6,-348.04 386.54,-342.81 349.82,-339.39"/>
+<polygon fill="#000000" stroke="#000000" points="349.83,-335.87 339.55,-338.43 349.18,-342.84 349.83,-335.87"/>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~graph~~TypeGraph_edge36" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.96,-301.73C416.1,-298.63 380.87,-294.98 354.26,-292.22"/>
-<polygon fill="#000000" stroke="#000000" points="354.45,-288.73 344.15,-291.18 353.73,-295.69 354.45,-288.73"/>
-<text text-anchor="middle" x="396.5" y="-301.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+<!-- type~whm_cb -->
+<g id="type~~graph~~TypeGraph_node33" class="node">
+<title>type~whm_cb</title>
+<g id="a_type~~graph~~TypeGraph_node33"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="339.5,-390 285.5,-390 285.5,-366 339.5,-366 339.5,-390"/>
+<text text-anchor="middle" x="312.5" y="-375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
+</a>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
-<g id="type~~graph~~TypeGraph_edge35" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.36,-295.9C461.02,-290.48 443.74,-284.17 428,-279 403.46,-270.94 375.61,-262.89 353.53,-256.76"/>
-<polygon fill="#000000" stroke="#000000" points="354.39,-253.37 343.82,-254.09 352.53,-260.12 354.39,-253.37"/>
-<text text-anchor="middle" x="396.5" y="-281.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
+<!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
 <g id="type~~graph~~TypeGraph_edge34" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259,-346C254.71,-344.43 250.1,-343.45 245.45,-342.88"/>
-<polygon fill="#000000" stroke="#000000" points="245.48,-339.37 235.28,-342.24 245.04,-346.36 245.48,-339.37"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.71,-318.1C374.14,-329.89 264.37,-347.6 260,-346"/>
-<text text-anchor="middle" x="312.5" y="-346.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
+<title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" d="M285.47,-368.32C277.2,-365 268.11,-361.08 260,-357"/>
 </g>
-<!-- type~whm_tp -->
-<g id="type~~graph~~TypeGraph_node35" class="node">
-<title>type~whm_tp</title>
-<g id="a_type~~graph~~TypeGraph_node35"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-372 480.5,-372 480.5,-348 534.5,-348 534.5,-372"/>
-<text text-anchor="middle" x="507.5" y="-357.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
-</a>
+<!-- type~symba_encounter&#45;&gt;type~swiftest_encounter -->
+<g id="type~~graph~~TypeGraph_edge35" class="edge">
+<title>type~symba_encounter&#45;&gt;type~swiftest_encounter</title>
+<path fill="none" stroke="#000000" d="M674.86,-29.76C643.52,-28.29 602.38,-26.38 568.86,-24.81"/>
+<polygon fill="#000000" stroke="#000000" points="568.87,-21.31 558.71,-24.34 568.54,-28.3 568.87,-21.31"/>
+</g>
+<!-- type~symba_merger&#45;&gt;type~symba_pl -->
+<g id="type~~graph~~TypeGraph_edge36" class="edge">
+<title>type~symba_merger&#45;&gt;type~symba_pl</title>
+<path fill="none" stroke="#000000" d="M881.89,-96C846.86,-96 797.17,-96 763.15,-96"/>
+<polygon fill="#000000" stroke="#000000" points="763.13,-92.5 753.13,-96 763.13,-99.5 763.13,-92.5"/>
 </g>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~graph~~TypeGraph_edge38" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M165.69,-242.01C154.23,-245.99 141.53,-250.54 130,-255 118.06,-259.62 105.17,-264.97 93.58,-269.91"/>
+<polygon fill="#000000" stroke="#000000" points="92.02,-266.78 84.21,-273.95 94.78,-273.21 92.02,-266.78"/>
 </g>
-<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~graph~~TypeGraph_edge37" class="edge">
-<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" d="M480.31,-352.43C451.62,-343.88 404.44,-329.04 365,-313 358.84,-310.49 352.38,-307.59 346.19,-304.66"/>
-<polygon fill="#000000" stroke="#000000" points="347.32,-301.32 336.79,-300.11 344.27,-307.62 347.32,-301.32"/>
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.86,-218.4C157.93,-216.99 151.84,-215.77 146,-215 130.22,-212.91 113.08,-215.4 98.09,-219.2"/>
+<polygon fill="#000000" stroke="#000000" points="96.78,-215.93 88.09,-222 98.67,-222.67 96.78,-215.93"/>
+<text text-anchor="middle" x="138" y="-217.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~rmvs_tp -->
-<g id="type~~graph~~TypeGraph_node36" class="node">
-<title>type~rmvs_tp</title>
-<g id="a_type~~graph~~TypeGraph_node36"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="751,-394 697,-394 697,-370 751,-370 751,-394"/>
-<text text-anchor="middle" x="724" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
+<!-- type~rmvs_cb -->
+<g id="type~~graph~~TypeGraph_node38" class="node">
+<title>type~rmvs_cb</title>
+<g id="a_type~~graph~~TypeGraph_node38"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="534.5,-408 480.5,-408 480.5,-384 534.5,-384 534.5,-408"/>
+<text text-anchor="middle" x="507.5" y="-393.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
-<g id="type~~graph~~TypeGraph_edge38" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M696.7,-384.45C658.56,-388.01 587.78,-394.61 544.73,-398.62"/>
-<polygon fill="#000000" stroke="#000000" points="544.31,-395.15 534.68,-399.56 544.96,-402.12 544.31,-395.15"/>
-<text text-anchor="middle" x="619" y="-396.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
-</g>
-<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
+<!-- type~rmvs_cb&#45;&gt;type~rmvs_interp -->
 <g id="type~~graph~~TypeGraph_edge39" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
-<path fill="none" stroke="#000000" d="M696.7,-379.3C658.56,-375.39 587.78,-368.13 544.73,-363.72"/>
-<polygon fill="#000000" stroke="#000000" points="544.99,-360.22 534.68,-362.69 544.27,-367.19 544.99,-360.22"/>
+<title>type~rmvs_cb&#45;&gt;type~rmvs_interp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.45,-397.47C451.88,-399.42 404.8,-403.65 365,-412 362.34,-412.56 359.63,-413.19 356.9,-413.89"/>
+<polygon fill="#000000" stroke="#000000" points="355.78,-410.56 347.06,-416.58 357.63,-417.31 355.78,-410.56"/>
+<text text-anchor="middle" x="396.5" y="-414.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
 </g>
-<!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
+<!-- type~rmvs_cb&#45;&gt;type~whm_cb -->
 <g id="type~~graph~~TypeGraph_edge40" class="edge">
-<title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M395.5,-219C382.29,-225.75 367.04,-231.32 353.3,-235.61"/>
-<polygon fill="#000000" stroke="#000000" points="352.19,-232.29 343.61,-238.51 354.19,-238.99 352.19,-232.29"/>
-<path fill="none" stroke="#000000" d="M480.46,-57.68C468.58,-60.58 455.16,-65.76 446,-75 398.47,-122.97 457.63,-188.26 397.5,-219"/>
+<title>type~rmvs_cb&#45;&gt;type~whm_cb</title>
+<path fill="none" stroke="#000000" d="M480.47,-393.57C446.8,-390.43 387.96,-384.94 349.88,-381.39"/>
+<polygon fill="#000000" stroke="#000000" points="350.01,-377.89 339.73,-380.45 349.36,-384.86 350.01,-377.89"/>
 </g>
-<!-- type~helio_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~graph~~TypeGraph_edge41" class="edge">
-<title>type~helio_tp&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" d="M480.41,-255.42C451.61,-251.32 404.14,-247.43 365,-258 362.25,-258.74 352.33,-264.4 341.92,-270.61"/>
-<polygon fill="#000000" stroke="#000000" points="339.97,-267.7 333.21,-275.85 343.58,-273.69 339.97,-267.7"/>
+<!-- type~rmvs_tp -->
+<g id="type~~graph~~TypeGraph_node39" class="node">
+<title>type~rmvs_tp</title>
+<g id="a_type~~graph~~TypeGraph_node39"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="751,-374 697,-374 697,-350 751,-350 751,-374"/>
+<text text-anchor="middle" x="724" y="-359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
+</a>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+</g>
+<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
 <g id="type~~graph~~TypeGraph_edge42" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-347.98C155.82,-348.84 138.87,-349.9 122.39,-350.93"/>
-<polygon fill="#000000" stroke="#000000" points="121.99,-347.45 112.23,-351.56 122.43,-354.43 121.99,-347.45"/>
-<text text-anchor="middle" x="138" y="-352.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
+<path fill="none" stroke="#000000" d="M696.7,-355.87C658.48,-346.96 587.48,-330.41 544.46,-320.38"/>
+<polygon fill="#000000" stroke="#000000" points="545.21,-316.96 534.68,-318.1 543.63,-323.78 545.21,-316.96"/>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~graph~~TypeGraph_edge43" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.79,-336.12C150.55,-330.13 125.65,-322.38 104.14,-315.68"/>
-<polygon fill="#000000" stroke="#000000" points="105.11,-312.32 94.52,-312.69 103.03,-319 105.11,-312.32"/>
+<!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
+<g id="type~~graph~~TypeGraph_edge41" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M696.7,-366.17C658.56,-372.21 587.78,-383.43 544.73,-390.26"/>
+<polygon fill="#000000" stroke="#000000" points="544.01,-386.83 534.68,-391.85 545.11,-393.74 544.01,-386.83"/>
+<text text-anchor="middle" x="619" y="-386.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
 </g>
-<!-- type~fraggle_colliders -->
+<!-- type~lambda_obj_tvar -->
 <g id="type~~graph~~TypeGraph_node40" class="node">
-<title>type~fraggle_colliders</title>
-<g id="a_type~~graph~~TypeGraph_node40"><a xlink:href=".././type/fraggle_colliders.html" xlink:title="fraggle_colliders">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1241,-579 1150,-579 1150,-555 1241,-555 1241,-579"/>
-<text text-anchor="middle" x="1195.5" y="-564.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_colliders</text>
+<title>type~lambda_obj_tvar</title>
+<g id="a_type~~graph~~TypeGraph_node40"><a xlink:href=".././type/lambda_obj_tvar.html" xlink:title="lambda_obj_tvar">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1241.5,-572 1149.5,-572 1149.5,-548 1241.5,-548 1241.5,-572"/>
+<text text-anchor="middle" x="1195.5" y="-557.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj_tvar</text>
 </a>
 </g>
 </g>
+<!-- type~lambda_obj_tvar&#45;&gt;type~lambda_obj -->
+<g id="type~~graph~~TypeGraph_edge43" class="edge">
+<title>type~lambda_obj_tvar&#45;&gt;type~lambda_obj</title>
+<path fill="none" stroke="#000000" d="M1161.46,-572.11C1128.17,-583.97 1078.95,-600.49 1059,-602"/>
+<path fill="none" stroke="#000000" d="M1057,-602C1027.59,-604.23 994.37,-604.21 968.68,-603.64"/>
+<polygon fill="#000000" stroke="#000000" points="968.6,-600.14 958.52,-603.38 968.42,-607.14 968.6,-600.14"/>
+</g>
 </g>
 </svg>
 </div><script>var pantypegraphTypeGraph = svgPanZoom('#typegraphTypeGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/module/drift_implementation.html b/docs/module/drift_implementation.html
index 6e69378bd..55f5f1581 100644
--- a/docs/module/drift_implementation.html
+++ b/docs/module/drift_implementation.html
@@ -299,311 +299,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~drift_implementation~~UsesGraph Pages: 1 -->
-<svg id="moduledrift_implementationUsesGraph" width="641pt" height="262pt"
- viewBox="0.00 0.00 641.00 261.65" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~drift_implementation~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 387.05)">
+<svg id="moduledrift_implementationUsesGraph" width="641pt" height="273pt"
+ viewBox="0.00 0.00 641.00 273.22" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~drift_implementation~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 404.34)">
 <title>module~~drift_implementation~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 954,-387.05 954,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 954,-404.34 954,4 -4,4"/>
 <!-- module~drift_implementation -->
 <g id="module~~drift_implementation~~UsesGraph_node1" class="node">
 <title>module~drift_implementation</title>
-<polygon fill="none" stroke="black" points="950,-318.05 841,-318.05 841,-294.05 950,-294.05 950,-318.05"/>
-<text text-anchor="middle" x="895.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">drift_implementation</text>
+<polygon fill="none" stroke="black" points="950,-102.05 841,-102.05 841,-78.05 950,-78.05 950,-102.05"/>
+<text text-anchor="middle" x="895.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">drift_implementation</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~drift_implementation~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~drift_implementation~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~drift_implementation&#45;&gt;module~swiftest -->
 <g id="module~~drift_implementation~~UsesGraph_edge1" class="edge">
 <title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.45,-294.01C857.49,-281.38 827.47,-261.36 805.75,-246.88"/>
-<polygon fill="#000000" stroke="#000000" points="807.56,-243.88 797.3,-241.25 803.68,-249.71 807.56,-243.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M883.43,-102.13C863.47,-123.9 821.3,-169.9 797.1,-196.3"/>
+<polygon fill="#000000" stroke="#000000" points="794.39,-194.08 790.21,-203.82 799.55,-198.81 794.39,-194.08"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~drift_implementation~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~drift_implementation~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~drift_implementation&#45;&gt;module~swiftest_classes -->
 <g id="module~~drift_implementation~~UsesGraph_edge2" class="edge">
 <title>module~drift_implementation&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M874.3,-318.08C835.98,-339.73 749.45,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M851.53,-78.03C806.71,-66.57 734.25,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge10" class="edge">
+<g id="module~~drift_implementation~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~drift_implementation~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~drift_implementation~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~drift_implementation~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~drift_implementation~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~drift_implementation~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~drift_implementation~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~drift_implementation~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~drift_implementation~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge6" class="edge">
+<g id="module~~drift_implementation~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~drift_implementation~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~drift_implementation~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~drift_implementation~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~drift_implementation~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~drift_implementation~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~drift_implementation~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~drift_implementation~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~drift_implementation~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~drift_implementation~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~drift_implementation~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~drift_implementation~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~drift_implementation~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~drift_implementation~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~drift_implementation~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~drift_implementation~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~drift_implementation~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~drift_implementation~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~drift_implementation~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~drift_implementation~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~drift_implementation~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~drift_implementation~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge20" class="edge">
+<g id="module~~drift_implementation~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge21" class="edge">
+<g id="module~~drift_implementation~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~drift_implementation~~UsesGraph_edge19" class="edge">
+<g id="module~~drift_implementation~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~drift_implementation~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~drift_implementation~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~drift_implementation~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~drift_implementation~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~drift_implementation~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~drift_implementation~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~drift_implementation~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~drift_implementation~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~drift_implementation~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~drift_implementation~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~drift_implementation~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~drift_implementation~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~drift_implementation~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~drift_implementation~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
@@ -2534,7 +2528,7 @@ <h4>Arguments</h4>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-drift_all"></span><h3>
-pure module subroutine <a href='../proc/drift_all.html'>drift_all</a>(mu, x, v, n, param, dt, mask, iflag)
+module subroutine <a href='../proc/drift_all.html'>drift_all</a>(mu, x, v, n, param, dt, lmask, iflag)
     
     
    <a href='../interface/drift_all.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -2677,7 +2671,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td>dimension(:)</td><td>::</td>
-  <td><strong>mask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
+  <td><strong>lmask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
   
 </tr>
 
diff --git a/docs/module/fraggle_classes.html b/docs/module/fraggle_classes.html
index d3164a21d..e1c69397a 100644
--- a/docs/module/fraggle_classes.html
+++ b/docs/module/fraggle_classes.html
@@ -494,1167 +494,1167 @@ <h3 class="panel-title">Used by</h3>
 <!-- module~fraggle_classes -->
 <g id="module~~fraggle_classes~~UsedByGraph_node1" class="node">
 <title>module~fraggle_classes</title>
-<polygon fill="none" stroke="black" points="87,-1410 0,-1410 0,-1386 87,-1386 87,-1410"/>
-<text text-anchor="middle" x="43.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_classes</text>
+<polygon fill="none" stroke="black" points="87,-1473 0,-1473 0,-1449 87,-1449 87,-1473"/>
+<text text-anchor="middle" x="43.5" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_classes</text>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_fraggle_util -->
 <g id="module~~fraggle_classes~~UsedByGraph_node2" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="471.5,-2880 353.5,-2880 353.5,-2856 471.5,-2856 471.5,-2880"/>
-<text text-anchor="middle" x="412.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="450.5,-2880 374.5,-2880 374.5,-2856 450.5,-2856 450.5,-2880"/>
+<text text-anchor="middle" x="412.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes -->
+<!-- module~s_fraggle_util&#45;&gt;module~fraggle_classes -->
 <g id="module~~fraggle_classes~~UsedByGraph_edge3" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M353.4,-2855.92C346.64,-2853.46 340.02,-2850.52 334,-2847 300.08,-2827.17 304.15,-2806.57 272,-2784"/>
+<title>module~s_fraggle_util&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M374.31,-2858.42C361.49,-2854.99 347.07,-2850.98 334,-2847 306.17,-2838.52 301.01,-2823.86 272,-2826"/>
 </g>
 <!-- module~swiftest -->
 <g id="module~~fraggle_classes~~UsedByGraph_node7" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~fraggle_classes~~UsedByGraph_node7"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="298,-1410 244,-1410 244,-1386 298,-1386 298,-1410"/>
-<text text-anchor="middle" x="271" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="298,-1473 244,-1473 244,-1449 298,-1449 298,-1473"/>
+<text text-anchor="middle" x="271" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge38" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.19,-2861.08C345.79,-2857.85 339.05,-2853.31 334,-2847 287.48,-2788.82 273.98,-1599.73 272.21,-1420.53"/>
-<polygon fill="#000000" stroke="#000000" points="275.71,-1420.38 272.11,-1410.42 268.71,-1420.45 275.71,-1420.38"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge81" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.39,-2867.04C359.53,-2864.63 343.67,-2859.08 334,-2847 289.51,-2791.47 274.33,-1657.45 272.25,-1483.35"/>
+<polygon fill="#000000" stroke="#000000" points="275.75,-1483.25 272.14,-1473.29 268.75,-1483.33 275.75,-1483.25"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~fraggle_classes~~UsedByGraph_node3" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="465.5,-2838 359.5,-2838 359.5,-2814 465.5,-2814 465.5,-2838"/>
-<text text-anchor="middle" x="412.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="471.5,-2838 353.5,-2838 353.5,-2814 471.5,-2814 471.5,-2838"/>
+<text text-anchor="middle" x="412.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~fraggle_classes -->
+<!-- module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes -->
 <g id="module~~fraggle_classes~~UsedByGraph_edge4" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M359.29,-2818.46C331.47,-2812.52 297.77,-2802.09 272,-2784"/>
+<title>module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M353.4,-2824.09C328.33,-2823.76 298.69,-2824.03 272,-2826"/>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge46" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.46,-2821.46C349.64,-2818.2 340.45,-2813.05 334,-2805 288.81,-2748.56 274.2,-1595.04 272.24,-1420.14"/>
-<polygon fill="#000000" stroke="#000000" points="275.74,-1420.02 272.13,-1410.06 268.74,-1420.1 275.74,-1420.02"/>
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge20" class="edge">
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.21,-2819.06C345.8,-2815.83 339.06,-2811.31 334,-2805 290.89,-2751.26 274.58,-1654.87 272.29,-1483.45"/>
+<polygon fill="#000000" stroke="#000000" points="275.79,-1483.28 272.15,-1473.32 268.79,-1483.37 275.79,-1483.28"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~fraggle_classes~~UsedByGraph_node4" class="node">
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="457,-2796 368,-2796 368,-2772 457,-2772 457,-2796"/>
+<text text-anchor="middle" x="412.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+</a>
+</g>
+</g>
+<!-- module~s_fraggle_setup&#45;&gt;module~fraggle_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge5" class="edge">
+<title>module~s_fraggle_setup&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M367.92,-2795.3C356.82,-2798.32 344.94,-2801.67 334,-2805 306.17,-2813.48 301.01,-2823.86 272,-2826"/>
+</g>
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge25" class="edge">
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.94,-2781.78C355.11,-2778.88 342.3,-2773.32 334,-2763 292.26,-2711.05 274.84,-1652.08 272.32,-1483.52"/>
+<polygon fill="#000000" stroke="#000000" points="275.82,-1483.29 272.17,-1473.34 268.82,-1483.39 275.82,-1483.29"/>
+</g>
+<!-- module~s_fraggle_regime -->
+<g id="module~~fraggle_classes~~UsedByGraph_node5" class="node">
 <title>module~s_fraggle_regime</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-2796 364.5,-2796 364.5,-2772 460.5,-2772 460.5,-2796"/>
-<text text-anchor="middle" x="412.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-2754 364.5,-2754 364.5,-2730 460.5,-2730 460.5,-2754"/>
+<text text-anchor="middle" x="412.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_regime&#45;&gt;module~fraggle_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge5" class="edge">
+<g id="module~~fraggle_classes~~UsedByGraph_edge6" class="edge">
 <title>module~s_fraggle_regime&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M368.3,-2796.06C338.59,-2801.67 299.65,-2803.41 272,-2784"/>
+<path fill="none" stroke="#000000" d="M364.41,-2750.5C353.97,-2753.52 343.27,-2757.58 334,-2763 300.08,-2782.83 311.18,-2823.11 272,-2826"/>
+<path fill="none" stroke="#000000" d="M270,-2826C224.12,-2829.39 212.48,-2827.48 166.5,-2826"/>
 </g>
 <!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge74" class="edge">
+<g id="module~~fraggle_classes~~UsedByGraph_edge46" class="edge">
 <title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.28,-2780.89C352.71,-2777.79 341.5,-2772.35 334,-2763 290.19,-2708.36 274.44,-1592.59 272.27,-1420.27"/>
-<polygon fill="#000000" stroke="#000000" points="275.77,-1420.06 272.14,-1410.1 268.77,-1420.15 275.77,-1420.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.31,-2738.87C352.73,-2735.77 341.52,-2730.34 334,-2721 293.64,-2670.86 275.12,-1650.08 272.37,-1483.8"/>
+<polygon fill="#000000" stroke="#000000" points="275.86,-1483.28 272.19,-1473.33 268.86,-1483.39 275.86,-1483.28"/>
 </g>
-<!-- module~s_fraggle_setup -->
-<g id="module~~fraggle_classes~~UsedByGraph_node5" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="457,-2754 368,-2754 368,-2730 457,-2730 457,-2754"/>
-<text text-anchor="middle" x="412.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<!-- module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_node6" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="208,-1473 123,-1473 123,-1449 208,-1449 208,-1473"/>
+<text text-anchor="middle" x="165.5" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~fraggle_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge6" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M367.92,-2753.3C356.82,-2756.32 344.94,-2759.67 334,-2763 306.17,-2771.48 295.81,-2800.72 272,-2784"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge2" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.87,-1461C114.69,-1461 106,-1461 97.5,-1461"/>
+<polygon fill="#000000" stroke="#000000" points="97.28,-1457.5 87.28,-1461 97.28,-1464.5 97.28,-1457.5"/>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge50" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.93,-2739.78C355.1,-2736.88 342.29,-2731.33 334,-2721 291.56,-2668.14 274.7,-1589.92 272.3,-1420.36"/>
-<polygon fill="#000000" stroke="#000000" points="275.8,-1420.08 272.16,-1410.13 268.8,-1420.18 275.8,-1420.08"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge1" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.74,-1473.24C266.79,-1608.99 238.28,-2828.31 166.5,-2826"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M164.5,-2826C94.19,-2823.74 51.36,-1660.13 45.25,-1483.39"/>
+<polygon fill="#000000" stroke="#000000" points="48.75,-1483.07 44.91,-1473.2 41.75,-1483.31 48.75,-1483.07"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.88,-1461C236.13,-1461 227.36,-1461 218.58,-1461"/>
+<polygon fill="#000000" stroke="#000000" points="218.32,-1457.5 208.32,-1461 218.32,-1464.5 218.32,-1457.5"/>
 </g>
 <!-- module~s_fraggle_set -->
-<g id="module~~fraggle_classes~~UsedByGraph_node6" class="node">
+<g id="module~~fraggle_classes~~UsedByGraph_node8" class="node">
 <title>module~s_fraggle_set</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="451,-2712 374,-2712 374,-2688 451,-2688 451,-2712"/>
-<text text-anchor="middle" x="412.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="451,-108 374,-108 374,-84 451,-84 451,-108"/>
+<text text-anchor="middle" x="412.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_set&#45;&gt;module~fraggle_classes -->
 <g id="module~~fraggle_classes~~UsedByGraph_edge7" class="edge">
 <title>module~s_fraggle_set&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M270,-2784C125.75,-2784 55.48,-1599.36 45.7,-1420.5"/>
-<polygon fill="#000000" stroke="#000000" points="49.18,-1420.2 45.15,-1410.41 42.19,-1420.58 49.18,-1420.2"/>
-<path fill="none" stroke="#000000" d="M373.64,-2706.05C360.49,-2709.22 346.03,-2713.96 334,-2721 300.08,-2740.83 304.15,-2806.57 272,-2784"/>
+<path fill="none" stroke="#000000" d="M373.78,-85.69C345.81,-79.18 306.68,-72.44 272,-75"/>
 </g>
 <!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge66" class="edge">
+<g id="module~~fraggle_classes~~UsedByGraph_edge35" class="edge">
 <title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.6,-2698.89C358.99,-2696.41 343.52,-2690.84 334,-2679 292.91,-2627.9 274.94,-1586 272.34,-1420.16"/>
-<polygon fill="#000000" stroke="#000000" points="275.84,-1420.08 272.18,-1410.14 268.84,-1420.19 275.84,-1420.08"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge1" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.73,-1385.95C266.67,-1252.28 237.18,-51.7 166.5,-54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.99,-97.03C359.25,-99.48 343.6,-105.04 334,-117 290.89,-170.74 274.58,-1267.13 272.29,-1438.55"/>
+<polygon fill="#000000" stroke="#000000" points="268.79,-1438.63 272.15,-1448.68 275.79,-1438.72 268.79,-1438.63"/>
 </g>
-<!-- module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_node8" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node8"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="208,-1410 123,-1410 123,-1386 208,-1386 208,-1410"/>
-<text text-anchor="middle" x="165.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<!-- module~s_fraggle_generate -->
+<g id="module~~fraggle_classes~~UsedByGraph_node9" class="node">
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="465.5,-66 359.5,-66 359.5,-42 465.5,-42 465.5,-66"/>
+<text text-anchor="middle" x="412.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge79" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.88,-1398C236.13,-1398 227.36,-1398 218.58,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="218.32,-1394.5 208.32,-1398 218.32,-1401.5 218.32,-1394.5"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~fraggle_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge8" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M359.38,-63.76C333.25,-68.17 301.07,-72.85 272,-75"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge2" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.87,-1398C114.69,-1398 106,-1398 97.5,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="97.28,-1394.5 87.28,-1398 97.28,-1401.5 97.28,-1394.5"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge86" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.46,-58.54C349.65,-61.8 340.45,-66.95 334,-75 289.51,-130.53 274.33,-1264.55 272.25,-1438.65"/>
+<polygon fill="#000000" stroke="#000000" points="268.75,-1438.67 272.14,-1448.71 275.75,-1438.75 268.75,-1438.67"/>
 </g>
 <!-- module~s_fraggle_io -->
-<g id="module~~fraggle_classes~~UsedByGraph_node9" class="node">
+<g id="module~~fraggle_classes~~UsedByGraph_node10" class="node">
 <title>module~s_fraggle_io</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="448,-66 377,-66 377,-42 448,-42 448,-66"/>
-<text text-anchor="middle" x="412.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="448,-24 377,-24 377,0 448,0 448,-24"/>
+<text text-anchor="middle" x="412.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_io&#45;&gt;module~fraggle_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge8" class="edge">
+<g id="module~~fraggle_classes~~UsedByGraph_edge9" class="edge">
 <title>module~s_fraggle_io&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M376.76,-52.58C348.51,-51.77 307.63,-51.37 272,-54"/>
+<path fill="none" stroke="#000000" d="M270,-75C126.14,-85.62 55.54,-1261.24 45.7,-1438.68"/>
+<polygon fill="#000000" stroke="#000000" points="42.21,-1438.52 45.15,-1448.7 49.19,-1438.9 42.21,-1438.52"/>
+<path fill="none" stroke="#000000" d="M376.69,-18.84C363.03,-22.18 347.43,-26.84 334,-33 303.75,-46.88 297.73,-53.88 272,-75"/>
 </g>
 <!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge33" class="edge">
+<g id="module~~fraggle_classes~~UsedByGraph_edge36" class="edge">
 <title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.8,-54.6C361.28,-56.8 344.21,-62.28 334,-75 291.56,-127.86 274.7,-1206.08 272.3,-1375.64"/>
-<polygon fill="#000000" stroke="#000000" points="268.8,-1375.82 272.16,-1385.87 275.8,-1375.92 268.8,-1375.82"/>
-</g>
-<!-- module~s_fraggle_util -->
-<g id="module~~fraggle_classes~~UsedByGraph_node10" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="450.5,-24 374.5,-24 374.5,0 450.5,0 450.5,-24"/>
-<text text-anchor="middle" x="412.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
-</a>
-</g>
-</g>
-<!-- module~s_fraggle_util&#45;&gt;module~fraggle_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge9" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M374.31,-21.58C361.49,-25.01 347.07,-29.02 334,-33 306.17,-41.48 301.01,-51.86 272,-54"/>
-<path fill="none" stroke="#000000" d="M164.5,-54C95.27,-56.26 51.52,-1201.94 45.27,-1375.96"/>
-<polygon fill="#000000" stroke="#000000" points="41.77,-1375.87 44.92,-1385.99 48.77,-1376.12 41.77,-1375.87"/>
-<path fill="none" stroke="#000000" d="M270,-54C224.12,-57.39 212.48,-52.5 166.5,-54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.78,-12.59C361.25,-14.78 344.19,-20.26 334,-33 288.16,-90.3 274.1,-1261.02 272.23,-1438.53"/>
+<polygon fill="#000000" stroke="#000000" points="268.72,-1438.73 272.12,-1448.76 275.72,-1438.8 268.72,-1438.73"/>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge78" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.39,-12.96C359.53,-15.38 343.68,-20.93 334,-33 290.19,-87.64 274.44,-1203.41 272.27,-1375.73"/>
-<polygon fill="#000000" stroke="#000000" points="268.77,-1375.85 272.14,-1385.9 275.77,-1375.94 268.77,-1375.85"/>
-</g>
-<!-- module~s_symba_kick -->
+<!-- module~s_gr -->
 <g id="module~~fraggle_classes~~UsedByGraph_node11" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-2670 373,-2670 373,-2646 452,-2646 452,-2670"/>
-<text text-anchor="middle" x="412.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_gr</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-2628 385.5,-2628 385.5,-2604 439.5,-2604 439.5,-2628"/>
+<text text-anchor="middle" x="412.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge10" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.81,-2656.74C358.43,-2654.19 343.36,-2648.62 334,-2637 294.29,-2587.71 275.23,-1583.94 272.38,-1420.43"/>
-<polygon fill="#000000" stroke="#000000" points="275.87,-1420.07 272.2,-1410.13 268.87,-1420.19 275.87,-1420.07"/>
-</g>
-<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge80" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M372.99,-2653.61C359.63,-2650.6 345.2,-2645.53 334,-2637 290.89,-2604.16 312.06,-2568.5 272,-2532"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge21" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.37,-2616.29C367.99,-2614.96 346.19,-2610.06 334,-2595 297.7,-2550.14 275.94,-1638.73 272.48,-1483.41"/>
+<polygon fill="#000000" stroke="#000000" points="275.98,-1483.12 272.26,-1473.2 268.98,-1483.27 275.98,-1483.12"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_symba_collision -->
 <g id="module~~fraggle_classes~~UsedByGraph_node12" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-2628 373,-2628 373,-2604 452,-2604 452,-2628"/>
-<text text-anchor="middle" x="412.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="462,-2712 363,-2712 363,-2688 462,-2688 462,-2712"/>
+<text text-anchor="middle" x="412.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
 <g id="module~~fraggle_classes~~UsedByGraph_edge13" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.82,-2614.74C358.44,-2612.18 343.37,-2606.61 334,-2595 295.64,-2547.46 275.48,-1579.65 272.41,-1420.16"/>
-<polygon fill="#000000" stroke="#000000" points="275.91,-1420.03 272.22,-1410.1 268.91,-1420.16 275.91,-1420.03"/>
+<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M362.8,-2705.36C333,-2705.86 296.1,-2701.1 272,-2679"/>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge81" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M372.85,-2609.75C359.92,-2606.59 345.79,-2601.89 334,-2595 300.08,-2575.17 301.04,-2558.46 272,-2532"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge23" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.7,-2696.42C351.7,-2693.25 341.17,-2687.9 334,-2679 294.99,-2630.61 275.37,-1645.83 272.4,-1483.55"/>
+<polygon fill="#000000" stroke="#000000" points="275.9,-1483.24 272.21,-1473.31 268.9,-1483.37 275.9,-1483.24"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_util_valid -->
 <g id="module~~fraggle_classes~~UsedByGraph_node13" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442.5,-2376 382.5,-2376 382.5,-2352 442.5,-2352 442.5,-2376"/>
-<text text-anchor="middle" x="412.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="445,-2586 380,-2586 380,-2562 445,-2562 445,-2586"/>
+<text text-anchor="middle" x="412.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge11" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.38,-2363.98C365.59,-2362.3 345.57,-2357.13 334,-2343 273.74,-2269.36 271.76,-1556.18 271.94,-1420.3"/>
-<polygon fill="#000000" stroke="#000000" points="275.44,-1420.24 271.96,-1410.24 268.44,-1420.23 275.44,-1420.24"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge22" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.62,-2573.72C363.41,-2571.77 344.89,-2566.43 334,-2553 299.06,-2509.92 276.25,-1635.73 272.54,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="276.03,-1483.02 272.28,-1473.11 269.03,-1483.19 276.03,-1483.02"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_obl -->
 <g id="module~~fraggle_classes~~UsedByGraph_node14" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node14"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="439.5,-2334 385.5,-2334 385.5,-2310 439.5,-2310 439.5,-2334"/>
-<text text-anchor="middle" x="412.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_obl</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-2544 385.5,-2544 385.5,-2520 439.5,-2520 439.5,-2544"/>
+<text text-anchor="middle" x="412.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge12" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.44,-2322.24C368.09,-2320.88 346.29,-2315.98 334,-2301 276.42,-2230.85 272.27,-1551.96 272.01,-1420.12"/>
-<polygon fill="#000000" stroke="#000000" points="275.51,-1420.01 272,-1410.01 268.51,-1420.02 275.51,-1420.01"/>
+<!-- module~s_obl&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge24" class="edge">
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.39,-2532.27C368.02,-2530.93 346.22,-2526.04 334,-2511 266.99,-2428.57 270.57,-1628.44 271.78,-1483.47"/>
+<polygon fill="#000000" stroke="#000000" points="275.28,-1483.19 271.87,-1473.16 268.28,-1483.12 275.28,-1483.19"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_util_coord -->
 <g id="module~~fraggle_classes~~UsedByGraph_node15" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-2292 379.5,-2292 379.5,-2268 445.5,-2268 445.5,-2292"/>
-<text text-anchor="middle" x="412.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-2502 377.5,-2502 377.5,-2478 447.5,-2478 447.5,-2502"/>
+<text text-anchor="middle" x="412.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge14" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.31,-2279.6C363.22,-2277.6 344.9,-2272.23 334,-2259 279.14,-2192.4 272.81,-1548.83 272.09,-1420.28"/>
-<polygon fill="#000000" stroke="#000000" points="275.59,-1420.06 272.04,-1410.08 268.59,-1420.09 275.59,-1420.06"/>
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge26" class="edge">
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.28,-2489.39C361.67,-2487.21 344.39,-2481.75 334,-2469 269.69,-2390.1 271.04,-1624.9 271.84,-1483.43"/>
+<polygon fill="#000000" stroke="#000000" points="275.34,-1483.03 271.91,-1473.01 268.34,-1482.99 275.34,-1483.03"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~fraggle_classes~~UsedByGraph_node16" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-2250 373,-2250 373,-2226 452,-2226 452,-2250"/>
-<text text-anchor="middle" x="412.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="484,-2670 341,-2670 341,-2646 484,-2646 484,-2670"/>
+<text text-anchor="middle" x="412.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge15" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.96,-2236.62C358.6,-2234.05 343.5,-2228.5 334,-2217 281.85,-2153.92 273.37,-1545.29 272.18,-1420.35"/>
-<polygon fill="#000000" stroke="#000000" points="275.68,-1420.06 272.09,-1410.09 268.68,-1420.12 275.68,-1420.06"/>
+<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge17" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M270,-2679C178.26,-2594.86 167.74,-1641.9 166.63,-1483.31"/>
+<polygon fill="#000000" stroke="#000000" points="170.13,-1483.26 166.56,-1473.29 163.13,-1483.31 170.13,-1483.26"/>
+<path fill="none" stroke="#000000" d="M358.11,-2670.04C321.52,-2677.62 278.48,-2684.94 272,-2679"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge27" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M343.77,-2645.87C340.12,-2643.4 336.8,-2640.47 334,-2637 296.32,-2590.36 275.63,-1641.44 272.44,-1483.26"/>
+<polygon fill="#000000" stroke="#000000" points="275.94,-1483.19 272.24,-1473.26 268.94,-1483.33 275.94,-1483.19"/>
+</g>
+<!-- module~s_whm_coord -->
 <g id="module~~fraggle_classes~~UsedByGraph_node17" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="446.5,-2208 378.5,-2208 378.5,-2184 446.5,-2184 446.5,-2208"/>
-<text text-anchor="middle" x="412.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_whm_coord</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-2460 373,-2460 373,-2436 452,-2436 452,-2460"/>
+<text text-anchor="middle" x="412.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge16" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.17,-2195.41C362.38,-2193.29 344.69,-2187.87 334,-2175 284.54,-2115.43 273.96,-1541.35 272.27,-1420.33"/>
-<polygon fill="#000000" stroke="#000000" points="275.77,-1420.01 272.14,-1410.06 268.77,-1420.11 275.77,-1420.01"/>
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge28" class="edge">
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.89,-2446.68C358.53,-2444.11 343.44,-2438.55 334,-2427 272.39,-2351.61 271.52,-1621.15 271.9,-1483.36"/>
+<polygon fill="#000000" stroke="#000000" points="275.41,-1483.18 271.94,-1473.17 268.41,-1483.16 275.41,-1483.18"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~s_util_rescale -->
 <g id="module~~fraggle_classes~~UsedByGraph_node18" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-2166 373,-2166 373,-2142 452,-2142 452,-2166"/>
-<text text-anchor="middle" x="412.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="451.5,-2418 373.5,-2418 373.5,-2394 451.5,-2394 451.5,-2418"/>
+<text text-anchor="middle" x="412.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge17" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.61,-2152.51C358.38,-2149.9 343.46,-2144.35 334,-2133 287.27,-2076.97 274.6,-1538.15 272.39,-1420.58"/>
-<polygon fill="#000000" stroke="#000000" points="275.88,-1420.21 272.2,-1410.27 268.88,-1420.33 275.88,-1420.21"/>
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge29" class="edge">
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.31,-2404.73C358.83,-2402.2 343.54,-2396.64 334,-2385 275.14,-2313.18 272.02,-1618.53 271.97,-1483.63"/>
+<polygon fill="#000000" stroke="#000000" points="275.47,-1483.29 271.98,-1473.29 268.47,-1483.29 275.47,-1483.29"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~fraggle_classes~~UsedByGraph_node19" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-2124 385.5,-2124 385.5,-2100 439.5,-2100 439.5,-2124"/>
-<text text-anchor="middle" x="412.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="491,-2376 334,-2376 334,-2352 491,-2352 491,-2376"/>
+<text text-anchor="middle" x="412.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge18" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.16,-2112.12C367.91,-2110.69 346.36,-2105.74 334,-2091 289.92,-2038.42 275.25,-1533.34 272.5,-1420.35"/>
-<polygon fill="#000000" stroke="#000000" points="276,-1420.04 272.26,-1410.13 269,-1420.21 276,-1420.04"/>
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge30" class="edge">
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M343.84,-2351.82C340.17,-2349.36 336.83,-2346.45 334,-2343 277.81,-2274.66 272.54,-1614.11 272.05,-1483.41"/>
+<polygon fill="#000000" stroke="#000000" points="275.55,-1483.04 272.02,-1473.05 268.55,-1483.06 275.55,-1483.04"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_rmvs_step -->
 <g id="module~~fraggle_classes~~UsedByGraph_node20" class="node">
-<title>module~s_io</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-2082 385.5,-2082 385.5,-2058 439.5,-2058 439.5,-2082"/>
-<text text-anchor="middle" x="412.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_rmvs_step</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="449,-2334 376,-2334 376,-2310 449,-2310 449,-2334"/>
+<text text-anchor="middle" x="412.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge19" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.19,-2070.1C367.95,-2068.66 346.4,-2063.71 334,-2049 292.6,-1999.91 275.95,-1529.13 272.64,-1420.35"/>
-<polygon fill="#000000" stroke="#000000" points="276.13,-1420.09 272.34,-1410.2 269.14,-1420.3 276.13,-1420.09"/>
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge31" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.75,-2321.1C360.59,-2318.76 344.11,-2313.26 334,-2301 280.47,-2236.13 273.08,-1609.48 272.13,-1483.13"/>
+<polygon fill="#000000" stroke="#000000" points="275.63,-1483.07 272.06,-1473.09 268.63,-1483.11 275.63,-1483.07"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_util_index -->
 <g id="module~~fraggle_classes~~UsedByGraph_node21" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="449,-2040 376,-2040 376,-2016 449,-2016 449,-2040"/>
-<text text-anchor="middle" x="412.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_util_index</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="447,-2292 378,-2292 378,-2268 447,-2268 447,-2292"/>
+<text text-anchor="middle" x="412.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge20" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.91,-2026.97C360.78,-2024.6 344.28,-2019.12 334,-2007 295.26,-1961.37 276.69,-1524.4 272.79,-1420.22"/>
-<polygon fill="#000000" stroke="#000000" points="276.29,-1420.06 272.42,-1410.19 269.29,-1420.31 276.29,-1420.06"/>
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge32" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.76,-2279.37C362.07,-2277.21 344.58,-2271.77 334,-2259 283.17,-2197.65 273.65,-1605.77 272.22,-1483.16"/>
+<polygon fill="#000000" stroke="#000000" points="275.72,-1483.04 272.11,-1473.08 268.72,-1483.12 275.72,-1483.04"/>
 </g>
-<!-- module~orbel -->
+<!-- proc~ge_wpp -->
 <g id="module~~fraggle_classes~~UsedByGraph_node22" class="node">
-<title>module~orbel</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node22"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="439.5,-1998 385.5,-1998 385.5,-1974 439.5,-1974 439.5,-1998"/>
-<text text-anchor="middle" x="412.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node22"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="439.5,-2250 385.5,-2250 385.5,-2226 439.5,-2226 439.5,-2250"/>
+<text text-anchor="middle" x="412.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge21" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.25,-1986.05C368.05,-1984.58 346.5,-1979.62 334,-1965 297.94,-1922.84 277.5,-1519.95 272.97,-1420.24"/>
-<polygon fill="#000000" stroke="#000000" points="276.46,-1419.93 272.51,-1410.1 269.46,-1420.24 276.46,-1419.93"/>
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge33" class="edge">
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.5,-2238.18C368.18,-2236.81 346.39,-2231.89 334,-2217 285.86,-2159.14 274.25,-1601.66 272.32,-1483.1"/>
+<polygon fill="#000000" stroke="#000000" points="275.82,-1482.97 272.17,-1473.03 268.82,-1483.08 275.82,-1482.97"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- module~s_operator_cross -->
 <g id="module~~fraggle_classes~~UsedByGraph_node23" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="450,-2586 375,-2586 375,-2562 450,-2562 450,-2586"/>
-<text text-anchor="middle" x="412.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>module~s_operator_cross</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-2208 364.5,-2208 364.5,-2184 460.5,-2184 460.5,-2208"/>
+<text text-anchor="middle" x="412.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge22" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.84,-2573.07C359.88,-2570.68 343.82,-2565.14 334,-2553 297.01,-2507.25 275.78,-1577.09 272.46,-1420.33"/>
-<polygon fill="#000000" stroke="#000000" points="275.95,-1419.97 272.24,-1410.05 268.96,-1420.12 275.95,-1419.97"/>
-</g>
-<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge85" class="edge">
-<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M374.9,-2571.62C343.98,-2567.78 300.32,-2557.81 272,-2532"/>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge34" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.13,-2192.58C352.7,-2189.46 341.6,-2184.09 334,-2175 288.57,-2120.67 274.91,-1598.27 272.44,-1483.3"/>
+<polygon fill="#000000" stroke="#000000" points="275.94,-1483.13 272.23,-1473.21 268.94,-1483.28 275.94,-1483.13"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~fraggle_classes~~UsedByGraph_node24" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="462,-2544 363,-2544 363,-2520 462,-2520 462,-2544"/>
-<text text-anchor="middle" x="412.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="448,-2166 377,-2166 377,-2142 448,-2142 448,-2166"/>
+<text text-anchor="middle" x="412.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge23" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.73,-2528.39C351.73,-2525.23 341.2,-2519.88 334,-2511 298.38,-2467.04 276.09,-1574.31 272.51,-1420.48"/>
-<polygon fill="#000000" stroke="#000000" points="276.01,-1420.26 272.28,-1410.34 269.01,-1420.42 276.01,-1420.26"/>
-</g>
-<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge84" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M375.53,-2544.04C344.16,-2552.05 299.48,-2557.04 272,-2532"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge37" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.65,-2153.13C361.29,-2150.85 344.41,-2145.38 334,-2133 291.26,-2082.17 275.59,-1594.27 272.57,-1483.36"/>
+<polygon fill="#000000" stroke="#000000" points="276.06,-1482.94 272.3,-1473.03 269.06,-1483.12 276.06,-1482.94"/>
 </g>
-<!-- module~s_symba_encounter_check -->
+<!-- module~s_util_set -->
 <g id="module~~fraggle_classes~~UsedByGraph_node25" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="484,-2502 341,-2502 341,-2478 484,-2478 484,-2502"/>
-<text text-anchor="middle" x="412.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>module~s_util_set</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441.5,-2124 383.5,-2124 383.5,-2100 441.5,-2100 441.5,-2124"/>
+<text text-anchor="middle" x="412.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge24" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M343.79,-2477.86C340.13,-2475.39 336.81,-2472.46 334,-2469 265.63,-2384.8 270.35,-1567.08 271.75,-1420.45"/>
-<polygon fill="#000000" stroke="#000000" points="275.26,-1420.08 271.86,-1410.04 268.26,-1420.01 275.26,-1420.08"/>
-</g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge83" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M365.06,-2502.08C354.79,-2504.89 344,-2507.95 334,-2511 306.17,-2519.48 293.5,-2551.6 272,-2532"/>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge38" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M383.31,-2111.92C366.42,-2110.27 345.97,-2105.15 334,-2091 293.94,-2043.64 276.32,-1589.8 272.71,-1483.29"/>
+<polygon fill="#000000" stroke="#000000" points="276.2,-1482.95 272.37,-1473.07 269.21,-1483.18 276.2,-1482.95"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_rmvs_io -->
 <g id="module~~fraggle_classes~~UsedByGraph_node26" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-1956 377.5,-1956 377.5,-1932 447.5,-1932 447.5,-1956"/>
-<text text-anchor="middle" x="412.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-2082 382,-2082 382,-2058 443,-2058 443,-2082"/>
+<text text-anchor="middle" x="412.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge25" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.19,-1943.07C361.76,-1940.8 344.65,-1935.35 334,-1923 300.62,-1884.31 278.4,-1515.69 273.18,-1420.4"/>
-<polygon fill="#000000" stroke="#000000" points="276.68,-1420.2 272.64,-1410.4 269.69,-1420.57 276.68,-1420.2"/>
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge39" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.81,-2069.73C365.25,-2067.91 345.66,-2062.69 334,-2049 296.58,-2005.08 277.07,-1584.8 272.87,-1483.09"/>
+<polygon fill="#000000" stroke="#000000" points="276.36,-1482.88 272.46,-1473.03 269.37,-1483.16 276.36,-1482.88"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_util_version -->
 <g id="module~~fraggle_classes~~UsedByGraph_node27" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="453.5,-2460 371.5,-2460 371.5,-2436 453.5,-2436 453.5,-2460"/>
-<text text-anchor="middle" x="412.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_util_version</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="451.5,-2040 373.5,-2040 373.5,-2016 451.5,-2016 451.5,-2040"/>
+<text text-anchor="middle" x="412.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge26" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.25,-2446.4C357.38,-2443.71 343.06,-2438.14 334,-2427 268.34,-2346.34 270.8,-1563.74 271.81,-1420.47"/>
-<polygon fill="#000000" stroke="#000000" points="275.31,-1420.28 271.89,-1410.26 268.31,-1420.23 275.31,-1420.28"/>
-</g>
-<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge87" class="edge">
-<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M371.26,-2454.64C358.77,-2457.8 345.31,-2462.39 334,-2469 300.08,-2488.83 301.04,-2558.46 272,-2532"/>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge40" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.18,-2026.44C358.85,-2023.84 343.72,-2018.32 334,-2007 299.32,-1966.62 277.99,-1581.73 273.09,-1483.65"/>
+<polygon fill="#000000" stroke="#000000" points="276.57,-1483.21 272.58,-1473.39 269.58,-1483.55 276.57,-1483.21"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_tides_step_spin -->
 <g id="module~~fraggle_classes~~UsedByGraph_node28" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="449,-1914 376,-1914 376,-1890 449,-1890 449,-1914"/>
-<text text-anchor="middle" x="412.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="461.5,-1998 363.5,-1998 363.5,-1974 461.5,-1974 461.5,-1998"/>
+<text text-anchor="middle" x="412.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge27" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.66,-1900.78C360.66,-1898.36 344.35,-1892.87 334,-1881 273,-1811.01 271.03,-1505.58 271.7,-1420.23"/>
-<polygon fill="#000000" stroke="#000000" points="275.21,-1420.14 271.81,-1410.1 268.21,-1420.07 275.21,-1420.14"/>
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge41" class="edge">
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.14,-1982.05C352.13,-1978.9 341.49,-1973.64 334,-1965 270.37,-1891.62 270.34,-1571.18 271.57,-1483.34"/>
+<polygon fill="#000000" stroke="#000000" points="275.07,-1483.22 271.73,-1473.17 268.07,-1483.11 275.07,-1483.22"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- proc~solve_wbs -->
 <g id="module~~fraggle_classes~~UsedByGraph_node29" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="443.5,-1872 381.5,-1872 381.5,-1848 443.5,-1848 443.5,-1872"/>
-<text text-anchor="middle" x="412.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node29"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="443.5,-1956 381.5,-1956 381.5,-1932 443.5,-1932 443.5,-1956"/>
+<text text-anchor="middle" x="412.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge28" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.22,-1859.49C364.88,-1857.55 345.71,-1852.28 334,-1839 278.31,-1775.88 272.5,-1501.06 272.01,-1420.36"/>
-<polygon fill="#000000" stroke="#000000" points="275.51,-1420.29 271.97,-1410.3 268.51,-1420.31 275.51,-1420.29"/>
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge42" class="edge">
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.19,-1943.52C364.84,-1941.58 345.67,-1936.31 334,-1923 275.6,-1856.39 271.74,-1565.8 271.85,-1483.06"/>
+<polygon fill="#000000" stroke="#000000" points="275.35,-1483.02 271.89,-1473.01 268.35,-1483 275.35,-1483.02"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_orbel -->
 <g id="module~~fraggle_classes~~UsedByGraph_node30" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-2418 364.5,-2418 364.5,-2394 460.5,-2394 460.5,-2418"/>
-<text text-anchor="middle" x="412.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_orbel</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-1914 385.5,-1914 385.5,-1890 439.5,-1890 439.5,-1914"/>
+<text text-anchor="middle" x="412.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge29" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.39,-2402.81C352.81,-2399.71 341.58,-2394.29 334,-2385 271.05,-2307.86 271.27,-1560.06 271.87,-1420.4"/>
-<polygon fill="#000000" stroke="#000000" points="275.37,-1420.11 271.92,-1410.09 268.37,-1420.08 275.37,-1420.11"/>
-</g>
-<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge88" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M270,-2532C184.64,-2454.21 168.88,-1573.69 166.78,-1420.62"/>
-<polygon fill="#000000" stroke="#000000" points="170.27,-1420.12 166.64,-1410.16 163.27,-1420.21 170.27,-1420.12"/>
-<path fill="none" stroke="#000000" d="M364.15,-2412.66C353.49,-2415.77 342.76,-2420.33 334,-2427 290.89,-2459.84 312.06,-2568.5 272,-2532"/>
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge43" class="edge">
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.43,-1901.89C368.3,-1900.36 346.78,-1895.38 334,-1881 280.93,-1821.26 273.28,-1561.4 272.18,-1483.29"/>
+<polygon fill="#000000" stroke="#000000" points="275.68,-1483.09 272.06,-1473.13 268.68,-1483.17 275.68,-1483.09"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_whm_gr -->
 <g id="module~~fraggle_classes~~UsedByGraph_node31" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="456.5,-1830 368.5,-1830 368.5,-1806 456.5,-1806 456.5,-1830"/>
-<text text-anchor="middle" x="412.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="443.5,-1872 381.5,-1872 381.5,-1848 443.5,-1848 443.5,-1872"/>
+<text text-anchor="middle" x="412.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge30" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.17,-1815.14C355.51,-1812.19 342.74,-1806.76 334,-1797 283.63,-1740.74 274.13,-1496.59 272.38,-1420.64"/>
-<polygon fill="#000000" stroke="#000000" points="275.88,-1420.24 272.17,-1410.32 268.88,-1420.39 275.88,-1420.24"/>
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge44" class="edge">
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.33,-1859.39C365.03,-1857.41 345.86,-1852.14 334,-1839 286.2,-1786.05 274.97,-1556.41 272.59,-1483.38"/>
+<polygon fill="#000000" stroke="#000000" points="276.08,-1482.95 272.28,-1473.06 269.08,-1483.16 276.08,-1482.95"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~fraggle_classes~~UsedByGraph_node32" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node32"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-1788 383,-1788 383,-1764 442,-1764 442,-1788"/>
-<text text-anchor="middle" x="412.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-1830 377.5,-1830 377.5,-1806 447.5,-1806 447.5,-1830"/>
+<text text-anchor="middle" x="412.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge31" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.91,-1775.52C366.31,-1773.68 346.3,-1768.5 334,-1755 288.84,-1705.45 275.9,-1490.95 272.83,-1420.51"/>
-<polygon fill="#000000" stroke="#000000" points="276.32,-1419.98 272.41,-1410.14 269.32,-1420.27 276.32,-1419.98"/>
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge45" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.15,-1816.7C361.89,-1814.32 344.96,-1808.89 334,-1797 291.45,-1750.81 276.87,-1551.15 273.1,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="276.58,-1482.95 272.55,-1473.15 269.59,-1483.32 276.58,-1482.95"/>
 </g>
-<!-- module~s_rmvs_util -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~fraggle_classes~~UsedByGraph_node33" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="446,-1746 379,-1746 379,-1722 446,-1722 446,-1746"/>
-<text text-anchor="middle" x="412.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="456.5,-1788 368.5,-1788 368.5,-1764 456.5,-1764 456.5,-1788"/>
+<text text-anchor="middle" x="412.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge32" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.78,-1732.88C363.15,-1730.62 345.41,-1725.24 334,-1713 294.03,-1670.11 277.88,-1485 273.4,-1420.37"/>
-<polygon fill="#000000" stroke="#000000" points="276.87,-1419.83 272.71,-1410.09 269.88,-1420.3 276.87,-1419.83"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge49" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.48,-1772.86C355.84,-1769.89 343,-1764.52 334,-1755 296.65,-1715.47 279.01,-1545.28 273.75,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="277.22,-1482.97 272.91,-1473.29 270.24,-1483.54 277.22,-1482.97"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_util_exit -->
 <g id="module~~fraggle_classes~~UsedByGraph_node34" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-1704 382,-1704 382,-1680 443,-1680 443,-1704"/>
-<text text-anchor="middle" x="412.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="442.5,-1746 382.5,-1746 382.5,-1722 442.5,-1722 442.5,-1746"/>
+<text text-anchor="middle" x="412.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge37" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.63,-1691.11C365.43,-1689.04 346.26,-1683.77 334,-1671 299.15,-1634.68 280.1,-1478.39 274.1,-1420.06"/>
-<polygon fill="#000000" stroke="#000000" points="277.58,-1419.67 273.11,-1410.06 270.62,-1420.36 277.58,-1419.67"/>
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge47" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.48,-1733.12C366.15,-1731.1 346.57,-1725.86 334,-1713 301.75,-1679.98 281.41,-1538.4 274.57,-1483.18"/>
+<polygon fill="#000000" stroke="#000000" points="278.02,-1482.57 273.35,-1473.06 271.07,-1483.41 278.02,-1482.57"/>
 </g>
-<!-- module~s_util_append -->
+<!-- module~s_netcdf -->
 <g id="module~~fraggle_classes~~UsedByGraph_node35" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-1662 373,-1662 373,-1638 452,-1638 452,-1662"/>
-<text text-anchor="middle" x="412.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-1704 385.5,-1704 385.5,-1680 439.5,-1680 439.5,-1704"/>
+<text text-anchor="middle" x="412.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge34" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.81,-1647.44C358.95,-1644.65 344.24,-1639.26 334,-1629 276.29,-1571.15 270.67,-1465.75 271.15,-1420.08"/>
-<polygon fill="#000000" stroke="#000000" points="274.65,-1420.14 271.37,-1410.06 267.66,-1419.98 274.65,-1420.14"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge48" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-1691.22C368.58,-1689.35 347.56,-1684.25 334,-1671 281.48,-1619.65 272.92,-1526.17 271.88,-1483.42"/>
+<polygon fill="#000000" stroke="#000000" points="275.38,-1483.2 271.76,-1473.24 268.38,-1483.28 275.38,-1483.2"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_util_peri -->
 <g id="module~~fraggle_classes~~UsedByGraph_node36" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="448,-1620 377,-1620 377,-1596 448,-1596 448,-1620"/>
-<text text-anchor="middle" x="412.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-1662 382,-1662 382,-1638 443,-1638 443,-1662"/>
+<text text-anchor="middle" x="412.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge35" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.67,-1605.81C361.87,-1603.21 345.43,-1597.84 334,-1587 286.48,-1541.9 275.34,-1459.85 272.76,-1420.38"/>
-<polygon fill="#000000" stroke="#000000" points="276.25,-1420.03 272.23,-1410.23 269.26,-1420.4 276.25,-1420.03"/>
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge50" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.87,-1648.43C365.94,-1646.13 346.96,-1640.86 334,-1629 291.38,-1590.01 277.97,-1519.14 273.82,-1483.19"/>
+<polygon fill="#000000" stroke="#000000" points="277.3,-1482.82 272.8,-1473.22 270.33,-1483.53 277.3,-1482.82"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_helio_drift -->
 <g id="module~~fraggle_classes~~UsedByGraph_node37" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-1578 385.5,-1578 385.5,-1554 439.5,-1554 439.5,-1578"/>
-<text text-anchor="middle" x="412.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-1620 377.5,-1620 377.5,-1596 447.5,-1596 447.5,-1620"/>
+<text text-anchor="middle" x="412.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge36" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.42,-1564.66C368.95,-1562.55 348.17,-1557.38 334,-1545 296.5,-1512.23 281.09,-1452.98 275.24,-1420.61"/>
-<polygon fill="#000000" stroke="#000000" points="278.63,-1419.66 273.55,-1410.37 271.73,-1420.8 278.63,-1419.66"/>
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge51" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.35,-1605.04C362.68,-1602.28 346.16,-1597.02 334,-1587 301.13,-1559.92 284.25,-1511.13 276.84,-1482.87"/>
+<polygon fill="#000000" stroke="#000000" points="280.24,-1482.01 274.45,-1473.13 273.44,-1483.67 280.24,-1482.01"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_setup -->
 <g id="module~~fraggle_classes~~UsedByGraph_node38" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-1536 373,-1536 373,-1512 452,-1512 452,-1536"/>
-<text text-anchor="middle" x="412.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_setup</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-1578 385.5,-1578 385.5,-1554 439.5,-1554 439.5,-1578"/>
+<text text-anchor="middle" x="412.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge39" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.99,-1519.61C359.63,-1516.6 345.2,-1511.53 334,-1503 305.98,-1481.66 288.19,-1443.7 279.17,-1419.75"/>
-<polygon fill="#000000" stroke="#000000" points="282.4,-1418.37 275.74,-1410.13 275.81,-1420.73 282.4,-1418.37"/>
+<!-- module~s_setup&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge52" class="edge">
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.26,-1563.3C369.32,-1560.65 349.19,-1555.39 334,-1545 310.58,-1528.98 292.62,-1501.14 282.2,-1481.93"/>
+<polygon fill="#000000" stroke="#000000" points="285.29,-1480.29 277.57,-1473.03 279.08,-1483.52 285.29,-1480.29"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_helio_kick -->
 <g id="module~~fraggle_classes~~UsedByGraph_node39" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="443.5,-1494 381.5,-1494 381.5,-1470 443.5,-1470 443.5,-1494"/>
-<text text-anchor="middle" x="412.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-1536 377.5,-1536 377.5,-1512 447.5,-1512 447.5,-1536"/>
+<text text-anchor="middle" x="412.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge40" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.35,-1477.66C366.37,-1474.58 348.44,-1469.44 334,-1461 315.35,-1450.1 298.46,-1432.13 287.04,-1418.17"/>
-<polygon fill="#000000" stroke="#000000" points="289.61,-1415.78 280.66,-1410.1 284.11,-1420.11 289.61,-1415.78"/>
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge53" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.46,-1517.35C363.62,-1513.99 347.68,-1509.28 334,-1503 320.25,-1496.69 306.19,-1487.45 294.95,-1479.23"/>
+<polygon fill="#000000" stroke="#000000" points="297.04,-1476.43 286.95,-1473.22 292.84,-1482.02 297.04,-1476.43"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_util_append -->
 <g id="module~~fraggle_classes~~UsedByGraph_node40" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="461.5,-1452 363.5,-1452 363.5,-1428 461.5,-1428 461.5,-1452"/>
-<text text-anchor="middle" x="412.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_util_append</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-1494 373,-1494 373,-1470 452,-1470 452,-1494"/>
+<text text-anchor="middle" x="412.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge41" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.06,-1427.92C354.79,-1425.11 344,-1422.05 334,-1419 325.48,-1416.41 316.37,-1413.43 307.83,-1410.56"/>
-<polygon fill="#000000" stroke="#000000" points="308.72,-1407.16 298.13,-1407.25 306.47,-1413.79 308.72,-1407.16"/>
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge54" class="edge">
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.64,-1476.15C352.55,-1473.13 328.17,-1469.46 308.44,-1466.49"/>
+<polygon fill="#000000" stroke="#000000" points="308.72,-1462.99 298.31,-1464.96 307.68,-1469.91 308.72,-1462.99"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_rmvs_util -->
 <g id="module~~fraggle_classes~~UsedByGraph_node41" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-1410 385.5,-1410 385.5,-1386 439.5,-1386 439.5,-1410"/>
-<text text-anchor="middle" x="412.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="446,-1452 379,-1452 379,-1428 446,-1428 446,-1452"/>
+<text text-anchor="middle" x="412.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge42" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.26,-1398C363.54,-1398 332.43,-1398 308.32,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="308.12,-1394.5 298.12,-1398 308.12,-1401.5 308.12,-1394.5"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge56" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.79,-1444.92C357.75,-1448.09 330.38,-1452.21 308.62,-1455.49"/>
+<polygon fill="#000000" stroke="#000000" points="307.8,-1452.07 298.43,-1457.02 308.84,-1458.99 307.8,-1452.07"/>
 </g>
-<!-- module~s_discard -->
+<!-- program~swiftest_driver -->
 <g id="module~~fraggle_classes~~UsedByGraph_node42" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441.5,-1368 383.5,-1368 383.5,-1344 441.5,-1344 441.5,-1368"/>
-<text text-anchor="middle" x="412.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node42"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="453,-1410 372,-1410 372,-1386 453,-1386 453,-1410"/>
+<text text-anchor="middle" x="412.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge43" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M383.4,-1363.17C368.63,-1367.04 350.27,-1372.05 334,-1377 325.48,-1379.59 316.37,-1382.57 307.83,-1385.44"/>
-<polygon fill="#000000" stroke="#000000" points="306.47,-1382.21 298.13,-1388.75 308.72,-1388.84 306.47,-1382.21"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge57" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.98,-1406.02C359.52,-1409.25 345.91,-1413.54 334,-1419 320.25,-1425.31 306.19,-1434.55 294.95,-1442.77"/>
+<polygon fill="#000000" stroke="#000000" points="292.84,-1439.98 286.95,-1448.78 297.04,-1445.57 292.84,-1439.98"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- module~s_symba_step -->
 <g id="module~~fraggle_classes~~UsedByGraph_node43" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="448.5,-1326 376.5,-1326 376.5,-1302 448.5,-1302 448.5,-1326"/>
-<text text-anchor="middle" x="412.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="453.5,-402 371.5,-402 371.5,-378 453.5,-378 453.5,-402"/>
+<text text-anchor="middle" x="412.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge44" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.39,-1319.41C362.53,-1322.57 346.88,-1327.47 334,-1335 315.35,-1345.9 298.46,-1363.87 287.04,-1377.83"/>
-<polygon fill="#000000" stroke="#000000" points="284.11,-1375.89 280.66,-1385.9 289.61,-1380.22 284.11,-1375.89"/>
+<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge15" class="edge">
+<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M371.47,-384.5C358.71,-381.4 345.05,-376.55 334,-369 295.7,-342.81 303.85,-251.25 272,-285"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge58" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.25,-391.6C357.37,-394.28 343.06,-399.86 334,-411 266.99,-493.43 270.57,-1293.56 271.78,-1438.53"/>
+<polygon fill="#000000" stroke="#000000" points="268.28,-1438.88 271.87,-1448.84 275.28,-1438.81 268.28,-1438.88"/>
+</g>
+<!-- module~s_symba_util -->
 <g id="module~~fraggle_classes~~UsedByGraph_node44" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node44"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="467,-1284 358,-1284 358,-1260 467,-1260 467,-1284"/>
-<text text-anchor="middle" x="412.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="450,-360 375,-360 375,-336 450,-336 450,-360"/>
+<text text-anchor="middle" x="412.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge45" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.68,-1280.74C349.23,-1283.7 340.99,-1287.68 334,-1293 305.98,-1314.34 288.19,-1352.3 279.17,-1376.25"/>
-<polygon fill="#000000" stroke="#000000" points="275.81,-1375.27 275.74,-1385.87 282.4,-1377.63 275.81,-1375.27"/>
+<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge16" class="edge">
+<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M374.75,-340.68C361.56,-337.38 346.8,-332.87 334,-327 303.75,-313.12 294.84,-260.79 272,-285"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge59" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.86,-348.95C359.9,-351.34 343.83,-356.87 334,-369 299.06,-412.08 276.25,-1286.27 272.54,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="269.03,-1438.81 272.28,-1448.89 276.03,-1438.98 269.03,-1438.81"/>
+</g>
+<!-- module~s_util_copy -->
 <g id="module~~fraggle_classes~~UsedByGraph_node45" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-1242 364.5,-1242 364.5,-1218 460.5,-1218 460.5,-1242"/>
-<text text-anchor="middle" x="412.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-1368 379.5,-1368 379.5,-1344 445.5,-1344 445.5,-1368"/>
+<text text-anchor="middle" x="412.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge47" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.29,-1235.61C353.38,-1238.74 342.5,-1243.57 334,-1251 296.5,-1283.77 281.09,-1343.02 275.24,-1375.39"/>
-<polygon fill="#000000" stroke="#000000" points="271.73,-1375.2 273.55,-1385.63 278.63,-1376.34 271.73,-1375.2"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge60" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.29,-1359.78C364.51,-1362.7 347.35,-1367.87 334,-1377 310.58,-1393.02 292.62,-1420.86 282.2,-1440.07"/>
+<polygon fill="#000000" stroke="#000000" points="279.08,-1438.48 277.57,-1448.97 285.29,-1441.71 279.08,-1438.48"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_discard -->
 <g id="module~~fraggle_classes~~UsedByGraph_node46" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="456.5,-150 368.5,-150 368.5,-126 456.5,-126 456.5,-150"/>
-<text text-anchor="middle" x="412.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_discard</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441.5,-1326 383.5,-1326 383.5,-1302 441.5,-1302 441.5,-1326"/>
+<text text-anchor="middle" x="412.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge48" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.36,-140.14C355.39,-143.02 342.39,-148.58 334,-159 294.29,-208.29 275.23,-1212.06 272.38,-1375.57"/>
-<polygon fill="#000000" stroke="#000000" points="268.87,-1375.81 272.2,-1385.87 275.87,-1375.93 268.87,-1375.81"/>
-</g>
-<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge86" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M378.24,-125.99C346.08,-116.76 298.43,-109.83 272,-138"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge61" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M383.45,-1315.94C367.45,-1318.32 347.88,-1323.57 334,-1335 301.13,-1362.08 284.25,-1410.87 276.84,-1439.13"/>
+<polygon fill="#000000" stroke="#000000" points="273.44,-1438.33 274.45,-1448.87 280.24,-1439.99 273.44,-1438.33"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_util_sort -->
 <g id="module~~fraggle_classes~~UsedByGraph_node47" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node47"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="443.5,-1200 381.5,-1200 381.5,-1176 443.5,-1176 443.5,-1200"/>
-<text text-anchor="middle" x="412.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_util_sort</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-1284 382,-1284 382,-1260 443,-1260 443,-1284"/>
+<text text-anchor="middle" x="412.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge49" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.32,-1189.45C365.41,-1191.72 346.64,-1197.01 334,-1209 286.48,-1254.1 275.34,-1336.15 272.76,-1375.62"/>
-<polygon fill="#000000" stroke="#000000" points="269.26,-1375.6 272.23,-1385.77 276.25,-1375.97 269.26,-1375.6"/>
+<!-- module~s_util_sort&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge62" class="edge">
+<title>module~s_util_sort&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.87,-1273.57C365.94,-1275.87 346.96,-1281.14 334,-1293 291.38,-1331.99 277.97,-1402.86 273.82,-1438.81"/>
+<polygon fill="#000000" stroke="#000000" points="270.33,-1438.47 272.8,-1448.78 277.3,-1439.18 270.33,-1438.47"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_whm_setup -->
 <g id="module~~fraggle_classes~~UsedByGraph_node48" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node48"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="453,-1158 372,-1158 372,-1134 453,-1134 453,-1158"/>
-<text text-anchor="middle" x="412.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-1242 373,-1242 373,-1218 452,-1218 452,-1242"/>
+<text text-anchor="middle" x="412.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge51" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.61,-1148.81C358.1,-1151.66 343.94,-1157.03 334,-1167 276.29,-1224.85 270.67,-1330.25 271.15,-1375.92"/>
-<polygon fill="#000000" stroke="#000000" points="267.66,-1376.02 271.37,-1385.94 274.65,-1375.86 267.66,-1376.02"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge63" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.94,-1232.7C359.1,-1235.5 344.37,-1240.86 334,-1251 281.48,-1302.35 272.92,-1395.83 271.88,-1438.58"/>
+<polygon fill="#000000" stroke="#000000" points="268.38,-1438.72 271.76,-1448.76 275.38,-1438.8 268.38,-1438.72"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_resize -->
 <g id="module~~fraggle_classes~~UsedByGraph_node49" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-1116 385.5,-1116 385.5,-1092 439.5,-1092 439.5,-1116"/>
-<text text-anchor="middle" x="412.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="448.5,-1200 376.5,-1200 376.5,-1176 448.5,-1176 448.5,-1200"/>
+<text text-anchor="middle" x="412.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge52" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.4,-1104.46C368.49,-1106.17 347.22,-1111.22 334,-1125 299.15,-1161.32 280.1,-1317.61 274.1,-1375.94"/>
-<polygon fill="#000000" stroke="#000000" points="270.62,-1375.64 273.11,-1385.94 277.58,-1376.33 270.62,-1375.64"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge64" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.27,-1189.79C361.4,-1192.32 345.01,-1197.73 334,-1209 301.75,-1242.02 281.41,-1383.6 274.57,-1438.82"/>
+<polygon fill="#000000" stroke="#000000" points="271.07,-1438.59 273.35,-1448.94 278.02,-1439.43 271.07,-1438.59"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~s_helio_gr -->
 <g id="module~~fraggle_classes~~UsedByGraph_node50" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="468.5,-1074 356.5,-1074 356.5,-1050 468.5,-1050 468.5,-1074"/>
-<text text-anchor="middle" x="412.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="443.5,-1158 381.5,-1158 381.5,-1134 443.5,-1134 443.5,-1158"/>
+<text text-anchor="middle" x="412.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge53" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M356.37,-1068.71C347.97,-1071.9 340.08,-1076.47 334,-1083 294.03,-1125.89 277.88,-1311 273.4,-1375.63"/>
-<polygon fill="#000000" stroke="#000000" points="269.88,-1375.7 272.71,-1385.91 276.87,-1376.17 269.88,-1375.7"/>
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge65" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.17,-1146.87C365.03,-1148.95 346.06,-1154.23 334,-1167 296.65,-1206.53 279.01,-1376.72 273.75,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="270.24,-1438.46 272.91,-1448.71 277.22,-1439.03 270.24,-1438.46"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~orbel -->
 <g id="module~~fraggle_classes~~UsedByGraph_node51" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="451.5,-1032 373.5,-1032 373.5,-1008 451.5,-1008 451.5,-1032"/>
-<text text-anchor="middle" x="412.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~orbel</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node51"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="439.5,-1116 385.5,-1116 385.5,-1092 439.5,-1092 439.5,-1116"/>
+<text text-anchor="middle" x="412.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge54" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.11,-1021.93C358.95,-1024.6 343.95,-1030.08 334,-1041 288.84,-1090.55 275.9,-1305.05 272.83,-1375.49"/>
-<polygon fill="#000000" stroke="#000000" points="269.32,-1375.73 272.41,-1385.86 276.32,-1376.02 269.32,-1375.73"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge66" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.22,-1104.29C368.22,-1105.93 346.94,-1110.95 334,-1125 291.45,-1171.19 276.87,-1370.85 273.1,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="269.59,-1438.68 272.55,-1448.85 276.58,-1439.05 269.59,-1438.68"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_whm_util -->
 <g id="module~~fraggle_classes~~UsedByGraph_node52" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="491,-990 334,-990 334,-966 491,-966 491,-990"/>
-<text text-anchor="middle" x="412.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-1074 379.5,-1074 379.5,-1050 445.5,-1050 445.5,-1074"/>
+<text text-anchor="middle" x="412.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge55" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M344.87,-990.02C340.85,-992.5 337.16,-995.47 334,-999 283.63,-1055.26 274.13,-1299.41 272.38,-1375.36"/>
-<polygon fill="#000000" stroke="#000000" points="268.88,-1375.61 272.17,-1385.68 275.88,-1375.76 268.88,-1375.61"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge67" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.4,-1062.86C363.53,-1065.02 345.4,-1070.38 334,-1083 286.2,-1135.95 274.97,-1365.59 272.59,-1438.62"/>
+<polygon fill="#000000" stroke="#000000" points="269.08,-1438.84 272.28,-1448.94 276.08,-1439.05 269.08,-1438.84"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~fraggle_classes~~UsedByGraph_node53" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-948 385.5,-948 385.5,-924 439.5,-924 439.5,-948"/>
-<text text-anchor="middle" x="412.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-1032 373,-1032 373,-1008 452,-1008 452,-1032"/>
+<text text-anchor="middle" x="412.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge56" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.39,-936.08C368.25,-937.6 346.73,-942.57 334,-957 278.31,-1020.12 272.5,-1294.94 272.01,-1375.64"/>
-<polygon fill="#000000" stroke="#000000" points="268.51,-1375.69 271.97,-1385.7 275.51,-1375.71 268.51,-1375.69"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge68" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.97,-1021.8C358.79,-1024.45 343.81,-1029.95 334,-1041 280.93,-1100.74 273.28,-1360.6 272.18,-1438.71"/>
+<polygon fill="#000000" stroke="#000000" points="268.68,-1438.83 272.06,-1448.87 275.68,-1438.91 268.68,-1438.83"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_util_spill -->
 <g id="module~~fraggle_classes~~UsedByGraph_node54" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-906 373,-906 373,-882 452,-882 452,-906"/>
-<text text-anchor="middle" x="412.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-990 382,-990 382,-966 443,-966 443,-990"/>
+<text text-anchor="middle" x="412.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge57" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.86,-895.71C358.67,-898.35 343.71,-903.86 334,-915 273,-984.99 271.03,-1290.42 271.7,-1375.77"/>
-<polygon fill="#000000" stroke="#000000" points="268.21,-1375.93 271.81,-1385.9 275.21,-1375.86 268.21,-1375.93"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge69" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.96,-978.39C365.44,-980.25 345.85,-985.48 334,-999 275.6,-1065.61 271.74,-1356.2 271.85,-1438.94"/>
+<polygon fill="#000000" stroke="#000000" points="268.35,-1439 271.89,-1448.99 275.35,-1438.98 268.35,-1439"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~fraggle_classes~~UsedByGraph_node55" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447,-864 378,-864 378,-840 447,-840 447,-864"/>
-<text text-anchor="middle" x="412.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="468.5,-948 356.5,-948 356.5,-924 468.5,-924 468.5,-948"/>
+<text text-anchor="middle" x="412.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge58" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.98,-852.81C362.34,-855.02 344.84,-860.44 334,-873 300.62,-911.69 278.4,-1280.31 273.18,-1375.6"/>
-<polygon fill="#000000" stroke="#000000" points="269.69,-1375.43 272.64,-1385.6 276.68,-1375.8 269.69,-1375.43"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge70" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M356.36,-942.19C347.85,-945.43 339.94,-950.15 334,-957 270.37,-1030.38 270.34,-1350.82 271.57,-1438.66"/>
+<polygon fill="#000000" stroke="#000000" points="268.07,-1438.89 271.73,-1448.83 275.07,-1438.78 268.07,-1438.89"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~fraggle_classes~~UsedByGraph_node56" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="445,-822 380,-822 380,-798 445,-798 445,-822"/>
-<text text-anchor="middle" x="412.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="468.5,-906 356.5,-906 356.5,-882 468.5,-882 468.5,-906"/>
+<text text-anchor="middle" x="412.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge59" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.9,-810.51C363.77,-812.53 345.24,-817.86 334,-831 297.94,-873.16 277.5,-1276.05 272.97,-1375.76"/>
-<polygon fill="#000000" stroke="#000000" points="269.46,-1375.76 272.51,-1385.9 276.46,-1376.07 269.46,-1375.76"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge71" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M356.31,-900.15C347.81,-903.39 339.9,-908.13 334,-915 299.32,-955.38 277.99,-1340.27 273.09,-1438.35"/>
+<polygon fill="#000000" stroke="#000000" points="269.58,-1438.45 272.58,-1448.61 276.57,-1438.79 269.58,-1438.45"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- module~s_symba_discard -->
 <g id="module~~fraggle_classes~~UsedByGraph_node57" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-780 377.5,-780 377.5,-756 447.5,-756 447.5,-780"/>
-<text text-anchor="middle" x="412.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-318 364.5,-318 364.5,-294 460.5,-294 460.5,-318"/>
+<text text-anchor="middle" x="412.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge60" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.5,-768.8C361.94,-771.02 344.64,-776.46 334,-789 295.26,-834.63 276.69,-1271.6 272.79,-1375.78"/>
-<polygon fill="#000000" stroke="#000000" points="269.29,-1375.69 272.42,-1385.81 276.29,-1375.94 269.29,-1375.69"/>
+<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge11" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M364.3,-295.07C326.37,-286.9 278.39,-278.23 272,-285"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge73" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.34,-309.15C352.76,-312.25 341.54,-317.68 334,-327 297.7,-371.86 275.94,-1283.27 272.48,-1438.59"/>
+<polygon fill="#000000" stroke="#000000" points="268.98,-1438.73 272.26,-1448.8 275.98,-1438.88 268.98,-1438.73"/>
+</g>
+<!-- module~s_symba_drift -->
 <g id="module~~fraggle_classes~~UsedByGraph_node58" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-738 377.5,-738 377.5,-714 447.5,-714 447.5,-738"/>
-<text text-anchor="middle" x="412.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-276 373,-276 373,-252 452,-252 452,-276"/>
+<text text-anchor="middle" x="412.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge61" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.46,-726.77C361.9,-728.98 344.6,-734.42 334,-747 292.6,-796.09 275.95,-1266.87 272.64,-1375.65"/>
-<polygon fill="#000000" stroke="#000000" points="269.14,-1375.7 272.34,-1385.8 276.13,-1375.91 269.14,-1375.7"/>
+<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge12" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M372.84,-258.1C341.07,-255.65 297.3,-258.19 272,-285"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge74" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.82,-265.27C358.45,-267.82 343.37,-273.4 334,-285 296.32,-331.64 275.63,-1280.56 272.44,-1438.74"/>
+<polygon fill="#000000" stroke="#000000" points="268.94,-1438.67 272.24,-1448.74 275.94,-1438.81 268.94,-1438.67"/>
+</g>
+<!-- module~s_whm_kick -->
 <g id="module~~fraggle_classes~~UsedByGraph_node59" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441.5,-696 383.5,-696 383.5,-672 441.5,-672 441.5,-696"/>
-<text text-anchor="middle" x="412.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_whm_kick</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-864 377.5,-864 377.5,-840 447.5,-840 447.5,-864"/>
+<text text-anchor="middle" x="412.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge62" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M383.27,-684.05C366.36,-685.68 345.91,-690.79 334,-705 289.92,-757.58 275.25,-1262.66 272.5,-1375.65"/>
-<polygon fill="#000000" stroke="#000000" points="269,-1375.79 272.26,-1385.87 276,-1375.96 269,-1375.79"/>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge72" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.12,-852.87C361.67,-855.13 344.58,-860.58 334,-873 296.58,-916.92 277.07,-1337.2 272.87,-1438.91"/>
+<polygon fill="#000000" stroke="#000000" points="269.37,-1438.84 272.46,-1448.97 276.36,-1439.12 269.37,-1438.84"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~whm_drift -->
 <g id="module~~fraggle_classes~~UsedByGraph_node60" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-654 382,-654 382,-630 443,-630 443,-654"/>
-<text text-anchor="middle" x="412.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~whm_drift</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node60"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-822 383,-822 383,-798 442,-798 442,-822"/>
+<text text-anchor="middle" x="412.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge63" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.71,-642.18C365.11,-643.97 345.52,-649.19 334,-663 287.27,-719.03 274.6,-1257.85 272.39,-1375.42"/>
-<polygon fill="#000000" stroke="#000000" points="268.88,-1375.67 272.2,-1385.73 275.88,-1375.79 268.88,-1375.67"/>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge75" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.93,-810.12C366.12,-811.81 345.88,-816.95 334,-831 293.94,-878.36 276.32,-1332.2 272.71,-1438.71"/>
+<polygon fill="#000000" stroke="#000000" points="269.21,-1438.82 272.37,-1448.93 276.2,-1439.05 269.21,-1438.82"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_symba_kick -->
 <g id="module~~fraggle_classes~~UsedByGraph_node61" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="468.5,-612 356.5,-612 356.5,-588 468.5,-588 468.5,-612"/>
-<text text-anchor="middle" x="412.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-234 373,-234 373,-210 452,-210 452,-234"/>
+<text text-anchor="middle" x="412.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge64" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M356.12,-605.98C347.63,-609.24 339.79,-614.03 334,-621 284.54,-680.57 273.96,-1254.65 272.27,-1375.67"/>
-<polygon fill="#000000" stroke="#000000" points="268.77,-1375.89 272.14,-1385.94 275.77,-1375.99 268.77,-1375.89"/>
+<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge14" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M372.78,-229.82C360.1,-233.07 346.16,-237.42 334,-243 303.75,-256.88 294.84,-260.79 272,-285"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge80" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.81,-223.26C358.44,-225.81 343.36,-231.39 334,-243 294.99,-291.39 275.37,-1276.17 272.4,-1438.45"/>
+<polygon fill="#000000" stroke="#000000" points="268.9,-1438.63 272.21,-1448.69 275.9,-1438.76 268.9,-1438.63"/>
+</g>
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~fraggle_classes~~UsedByGraph_node62" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-570 377.5,-570 377.5,-546 447.5,-546 447.5,-570"/>
-<text text-anchor="middle" x="412.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="469.5,-780 355.5,-780 355.5,-756 469.5,-756 469.5,-780"/>
+<text text-anchor="middle" x="412.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge65" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.36,-558.68C361.77,-560.87 344.48,-566.32 334,-579 281.85,-642.08 273.37,-1250.71 272.18,-1375.65"/>
-<polygon fill="#000000" stroke="#000000" points="268.68,-1375.88 272.09,-1385.91 275.68,-1375.94 268.68,-1375.88"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge76" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.41,-774.35C347.22,-777.59 339.65,-782.28 334,-789 291.26,-839.83 275.59,-1327.73 272.57,-1438.64"/>
+<polygon fill="#000000" stroke="#000000" points="269.06,-1438.88 272.3,-1448.97 276.06,-1439.06 269.06,-1438.88"/>
 </g>
-<!-- module~s_rmvs_step -->
+<!-- module~s_util_fill -->
 <g id="module~~fraggle_classes~~UsedByGraph_node63" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="449,-528 376,-528 376,-504 449,-504 449,-528"/>
-<text text-anchor="middle" x="412.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-738 385.5,-738 385.5,-714 439.5,-714 439.5,-738"/>
+<text text-anchor="middle" x="412.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge67" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.74,-516.89C360.58,-519.23 344.1,-524.73 334,-537 279.14,-603.6 272.81,-1247.17 272.09,-1375.72"/>
-<polygon fill="#000000" stroke="#000000" points="268.59,-1375.91 272.04,-1385.92 275.59,-1375.94 268.59,-1375.91"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge77" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.15,-725.87C367.9,-727.29 346.34,-732.24 334,-747 288.57,-801.33 274.91,-1323.73 272.44,-1438.7"/>
+<polygon fill="#000000" stroke="#000000" points="268.94,-1438.72 272.23,-1448.79 275.94,-1438.87 268.94,-1438.72"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_io -->
 <g id="module~~fraggle_classes~~UsedByGraph_node64" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-486 382,-486 382,-462 443,-462 443,-486"/>
-<text text-anchor="middle" x="412.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_io</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-696 385.5,-696 385.5,-672 439.5,-672 439.5,-696"/>
+<text text-anchor="middle" x="412.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge68" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.63,-474.11C365,-475.88 345.41,-481.1 334,-495 276.42,-565.15 272.27,-1244.04 272.01,-1375.88"/>
-<polygon fill="#000000" stroke="#000000" points="268.51,-1375.98 272,-1385.99 275.51,-1375.99 268.51,-1375.98"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge78" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.5,-683.82C368.18,-685.19 346.39,-690.11 334,-705 285.86,-762.86 274.25,-1320.34 272.32,-1438.9"/>
+<polygon fill="#000000" stroke="#000000" points="268.82,-1438.92 272.17,-1448.97 275.82,-1439.03 268.82,-1438.92"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_helio_setup -->
 <g id="module~~fraggle_classes~~UsedByGraph_node65" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-444 377.5,-444 377.5,-420 447.5,-420 447.5,-444"/>
-<text text-anchor="middle" x="412.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-654 373,-654 373,-630 452,-630 452,-654"/>
+<text text-anchor="middle" x="412.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge69" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.3,-432.63C361.7,-434.81 344.42,-440.27 334,-453 273.74,-526.64 271.76,-1239.82 271.94,-1375.7"/>
-<polygon fill="#000000" stroke="#000000" points="268.44,-1375.77 271.96,-1385.76 275.44,-1375.76 268.44,-1375.77"/>
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge79" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.97,-643.39C358.62,-645.96 343.52,-651.51 334,-663 283.17,-724.35 273.65,-1316.23 272.22,-1438.84"/>
+<polygon fill="#000000" stroke="#000000" points="268.72,-1438.88 272.11,-1448.92 275.72,-1438.96 268.72,-1438.88"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_util_solve -->
 <g id="module~~fraggle_classes~~UsedByGraph_node66" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-402 379.5,-402 379.5,-378 445.5,-378 445.5,-402"/>
-<text text-anchor="middle" x="412.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="446.5,-612 378.5,-612 378.5,-588 446.5,-588 446.5,-612"/>
+<text text-anchor="middle" x="412.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge70" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.26,-390.36C363.16,-392.35 344.84,-397.72 334,-411 271.05,-488.14 271.27,-1235.94 271.87,-1375.6"/>
-<polygon fill="#000000" stroke="#000000" points="268.37,-1375.92 271.92,-1385.91 275.37,-1375.89 268.37,-1375.92"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge82" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.14,-600.56C362.34,-602.68 344.65,-608.1 334,-621 280.47,-685.87 273.08,-1312.52 272.13,-1438.87"/>
+<polygon fill="#000000" stroke="#000000" points="268.63,-1438.89 272.06,-1448.91 275.63,-1438.93 268.63,-1438.89"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_helio_step -->
 <g id="module~~fraggle_classes~~UsedByGraph_node67" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-360 385.5,-360 385.5,-336 439.5,-336 439.5,-360"/>
-<text text-anchor="middle" x="412.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="449,-570 376,-570 376,-546 449,-546 449,-570"/>
+<text text-anchor="middle" x="412.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge71" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.4,-347.73C368.03,-349.07 346.23,-353.97 334,-369 268.34,-449.66 270.8,-1232.26 271.81,-1375.53"/>
-<polygon fill="#000000" stroke="#000000" points="268.31,-1375.77 271.89,-1385.74 275.31,-1375.72 268.31,-1375.77"/>
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge83" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.73,-558.89C360.57,-561.22 344.09,-566.73 334,-579 277.81,-647.34 272.54,-1307.89 272.05,-1438.59"/>
+<polygon fill="#000000" stroke="#000000" points="268.55,-1438.94 272.02,-1448.95 275.55,-1438.96 268.55,-1438.94"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_whm_step -->
 <g id="module~~fraggle_classes~~UsedByGraph_node68" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="469.5,-318 355.5,-318 355.5,-294 469.5,-294 469.5,-318"/>
-<text text-anchor="middle" x="412.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="449,-528 376,-528 376,-504 449,-504 449,-528"/>
+<text text-anchor="middle" x="412.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge72" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.21,-312.19C347.04,-315.45 339.54,-320.18 334,-327 265.63,-411.2 270.35,-1228.92 271.75,-1375.55"/>
-<polygon fill="#000000" stroke="#000000" points="268.26,-1375.99 271.86,-1385.96 275.26,-1375.92 268.26,-1375.99"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge84" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.72,-516.87C360.54,-519.2 344.07,-524.71 334,-537 275.14,-608.82 272.02,-1303.47 271.97,-1438.37"/>
+<polygon fill="#000000" stroke="#000000" points="268.47,-1438.71 271.98,-1448.71 275.47,-1438.71 268.47,-1438.71"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_symba_setup -->
 <g id="module~~fraggle_classes~~UsedByGraph_node69" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-108 377.5,-108 377.5,-84 447.5,-84 447.5,-108"/>
-<text text-anchor="middle" x="412.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="456.5,-192 368.5,-192 368.5,-168 456.5,-168 456.5,-192"/>
+<text text-anchor="middle" x="412.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge73" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.2,-96.55C361.58,-98.72 344.31,-104.18 334,-117 292.91,-168.1 274.94,-1210 272.34,-1375.84"/>
-<polygon fill="#000000" stroke="#000000" points="268.84,-1375.81 272.18,-1385.86 275.84,-1375.92 268.84,-1375.81"/>
+<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge18" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M368.26,-186.32C356.45,-189.43 344.13,-194.08 334,-201 295.7,-227.19 303.85,-251.25 272,-285"/>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge82" class="edge">
-<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M270,-138C181.83,-231.99 168.33,-1214.05 166.7,-1375.57"/>
-<polygon fill="#000000" stroke="#000000" points="163.2,-1375.73 166.6,-1385.76 170.2,-1375.79 163.2,-1375.73"/>
-<path fill="none" stroke="#000000" d="M377.24,-96.99C345.48,-99.8 299.17,-109.04 272,-138"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge55" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.35,-182.14C355.39,-185.02 342.39,-190.57 334,-201 293.64,-251.14 275.12,-1271.92 272.37,-1438.2"/>
+<polygon fill="#000000" stroke="#000000" points="268.86,-1438.61 272.19,-1448.67 275.86,-1438.72 268.86,-1438.61"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_symba_io -->
 <g id="module~~fraggle_classes~~UsedByGraph_node70" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-276 385.5,-276 385.5,-252 439.5,-252 439.5,-276"/>
-<text text-anchor="middle" x="412.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="447.5,-150 377.5,-150 377.5,-126 447.5,-126 447.5,-150"/>
+<text text-anchor="middle" x="412.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge75" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.38,-263.72C368,-265.05 346.2,-269.94 334,-285 298.38,-328.96 276.09,-1221.69 272.51,-1375.52"/>
-<polygon fill="#000000" stroke="#000000" points="269.01,-1375.58 272.28,-1385.66 276.01,-1375.74 269.01,-1375.58"/>
+<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge19" class="edge">
+<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M377.35,-140.96C362.68,-143.72 346.16,-148.98 334,-159 285.83,-198.68 314.84,-239.61 272,-285"/>
+<path fill="none" stroke="#000000" d="M270,-285C187.66,-372.25 169.36,-1283.64 166.83,-1438.65"/>
+<polygon fill="#000000" stroke="#000000" points="163.33,-1438.79 166.67,-1448.84 170.33,-1438.9 163.33,-1438.79"/>
 </g>
-<!-- module~s_util_sort -->
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge87" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.2,-138.55C361.57,-140.71 344.3,-146.18 334,-159 292.26,-210.95 274.84,-1269.92 272.32,-1438.48"/>
+<polygon fill="#000000" stroke="#000000" points="268.82,-1438.61 272.17,-1448.66 275.82,-1438.71 268.82,-1438.61"/>
+</g>
+<!-- module~s_kick -->
 <g id="module~~fraggle_classes~~UsedByGraph_node71" class="node">
-<title>module~s_util_sort</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="443,-234 382,-234 382,-210 443,-210 443,-234"/>
-<text text-anchor="middle" x="412.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
+<title>module~s_kick</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-486 385.5,-486 385.5,-462 439.5,-462 439.5,-486"/>
+<text text-anchor="middle" x="412.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge76" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.94,-222.01C365.2,-223.71 345.39,-228.91 334,-243 297.01,-288.75 275.78,-1218.91 272.46,-1375.67"/>
-<polygon fill="#000000" stroke="#000000" points="268.96,-1375.88 272.24,-1385.95 275.95,-1376.03 268.96,-1375.88"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge85" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.42,-473.75C368.06,-475.09 346.26,-480 334,-495 272.39,-570.39 271.52,-1300.85 271.9,-1438.64"/>
+<polygon fill="#000000" stroke="#000000" points="268.41,-1438.84 271.94,-1448.83 275.41,-1438.82 268.41,-1438.84"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~drift_implementation -->
 <g id="module~~fraggle_classes~~UsedByGraph_node72" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~fraggle_classes~~UsedByGraph_node72"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="451.5,-192 373.5,-192 373.5,-168 451.5,-168 451.5,-192"/>
-<text text-anchor="middle" x="412.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~fraggle_classes~~UsedByGraph_node72"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="467,-444 358,-444 358,-420 467,-420 467,-444"/>
+<text text-anchor="middle" x="412.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~fraggle_classes~~UsedByGraph_edge77" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.22,-181.19C358.73,-183.72 343.45,-189.28 334,-201 295.64,-248.54 275.48,-1216.35 272.41,-1375.84"/>
-<polygon fill="#000000" stroke="#000000" points="268.91,-1375.84 272.22,-1385.9 275.91,-1375.97 268.91,-1375.84"/>
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
+<g id="module~~fraggle_classes~~UsedByGraph_edge88" class="edge">
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.98,-437.17C348.75,-440.44 340.16,-445.44 334,-453 269.69,-531.9 271.04,-1297.1 271.84,-1438.57"/>
+<polygon fill="#000000" stroke="#000000" points="268.34,-1439.01 271.91,-1448.99 275.34,-1438.97 268.34,-1439.01"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/helio_classes.html b/docs/module/helio_classes.html
index ddd58796e..3429683f2 100644
--- a/docs/module/helio_classes.html
+++ b/docs/module/helio_classes.html
@@ -312,95 +312,94 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~helio_classes~~UsesGraph Pages: 1 -->
-<svg id="modulehelio_classesUsesGraph" width="568pt" height="73pt"
- viewBox="0.00 0.00 568.00 73.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~helio_classes~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 69.13)">
+<svg id="modulehelio_classesUsesGraph" width="568pt" height="72pt"
+ viewBox="0.00 0.00 568.00 72.49" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~helio_classes~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 68.49)">
 <title>module~~helio_classes~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-69.13 564,-69.13 564,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-68.49 564,-68.49 564,4 -4,4"/>
 <!-- module~helio_classes -->
 <g id="module~~helio_classes~~UsesGraph_node1" class="node">
 <title>module~helio_classes</title>
-<polygon fill="none" stroke="black" points="560,-57.04 484,-57.04 484,-33.04 560,-33.04 560,-57.04"/>
-<text text-anchor="middle" x="522" y="-42.64" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes</text>
+<polygon fill="none" stroke="black" points="560,-36.45 484,-36.45 484,-12.45 560,-12.45 560,-36.45"/>
+<text text-anchor="middle" x="522" y="-22.05" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes</text>
 </g>
 <!-- module~swiftest_globals -->
 <g id="module~~helio_classes~~UsesGraph_node2" class="node">
 <title>module~swiftest_globals</title>
 <g id="a_module~~helio_classes~~UsesGraph_node2"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-37.04 123,-37.04 123,-13.04 211,-13.04 211,-37.04"/>
-<text text-anchor="middle" x="167" y="-22.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-56.45 123,-56.45 123,-32.45 211,-32.45 211,-56.45"/>
+<text text-anchor="middle" x="167" y="-42.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~helio_classes~~UsesGraph_edge1" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409,-65.04C336.51,-65.39 318.21,-59.61 247,-46.04 237.79,-44.29 228.06,-42.04 218.71,-39.67"/>
-<polygon fill="#000000" stroke="#000000" points="219.31,-36.21 208.75,-37.06 217.54,-42.98 219.31,-36.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.77,-36.39C472.38,-39.71 459.76,-43.05 448,-45.45 379.77,-59.34 362.12,-64.17 292.5,-64.45"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~whm_classes -->
 <g id="module~~helio_classes~~UsesGraph_node3" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~helio_classes~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="336,-37.04 247,-37.04 247,-13.04 336,-13.04 336,-37.04"/>
-<text text-anchor="middle" x="291.5" y="-22.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~whm_classes</title>
+<g id="a_module~~helio_classes~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="448,-36.45 372,-36.45 372,-12.45 448,-12.45 448,-36.45"/>
+<text text-anchor="middle" x="410" y="-22.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~helio_classes~~UsesGraph_edge2" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409,-65.04C378.5,-65.19 345.82,-52.75 322.86,-41.71"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-38.45 313.65,-37.11 321.03,-44.71 324.16,-38.45"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.88,-55.13C462.7,-60.04 435.55,-64.93 411,-65.04"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.76,-24.45C475.61,-24.45 466.87,-24.45 458.38,-24.45"/>
+<polygon fill="#000000" stroke="#000000" points="458.2,-20.95 448.2,-24.45 458.2,-27.95 458.2,-20.95"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~helio_classes~~UsesGraph_node4" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~helio_classes~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="448,-37.04 372,-37.04 372,-13.04 448,-13.04 448,-37.04"/>
-<text text-anchor="middle" x="410" y="-22.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~helio_classes~~UsesGraph_node4"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="336,-36.45 247,-36.45 247,-12.45 336,-12.45 336,-36.45"/>
+<text text-anchor="middle" x="291.5" y="-22.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~helio_classes~~UsesGraph_edge3" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.76,-38.27C475.52,-36.77 466.68,-35.17 458.1,-33.61"/>
-<polygon fill="#000000" stroke="#000000" points="458.67,-30.15 448.2,-31.81 457.42,-37.04 458.67,-30.15"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.53,-12.38C474.49,-8.75 460.8,-5.25 448,-3.45 414.55,1.27 405.5,0.9 372,-3.45 361.49,-4.81 350.38,-7.15 339.92,-9.79"/>
+<polygon fill="#000000" stroke="#000000" points="338.89,-6.44 330.11,-12.38 340.68,-13.2 338.89,-6.44"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~helio_classes~~UsesGraph_node5" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~helio_classes~~UsesGraph_node5"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-37.04 0,-37.04 0,-13.04 87,-13.04 87,-37.04"/>
-<text text-anchor="middle" x="43.5" y="-22.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-56.45 0,-56.45 0,-32.45 87,-32.45 87,-56.45"/>
+<text text-anchor="middle" x="43.5" y="-42.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
 <g id="module~~helio_classes~~UsesGraph_edge4" class="edge">
 <title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-25.04C114.58,-25.04 105.86,-25.04 97.36,-25.04"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-21.54 87.13,-25.04 97.13,-28.54 97.13,-21.54"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~helio_classes~~UsesGraph_edge5" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.97,-25.04C238.75,-25.04 230.07,-25.04 221.59,-25.04"/>
-<polygon fill="#000000" stroke="#000000" points="221.39,-21.54 211.39,-25.04 221.39,-28.54 221.39,-21.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-44.45C114.58,-44.45 105.86,-44.45 97.36,-44.45"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-40.95 87.13,-44.45 97.13,-47.95 97.13,-40.95"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~helio_classes~~UsesGraph_edge6" class="edge">
+<g id="module~~helio_classes~~UsesGraph_edge5" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.53,-12.98C362.49,-9.35 348.8,-5.85 336,-4.04 296.83,1.48 286.22,1.08 247,-4.04 236.55,-5.41 225.51,-7.75 215.11,-10.38"/>
-<polygon fill="#000000" stroke="#000000" points="214.14,-7.02 205.37,-12.98 215.94,-13.78 214.14,-7.02"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.43,-36.61C364.59,-48.33 327.14,-64.31 292.5,-64.45"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.5,-64.45C267.53,-64.54 242.44,-61.08 220.99,-57.02"/>
+<polygon fill="#000000" stroke="#000000" points="221.58,-53.57 211.09,-55.06 220.22,-60.44 221.58,-53.57"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~helio_classes~~UsesGraph_edge7" class="edge">
+<g id="module~~helio_classes~~UsesGraph_edge6" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.82,-25.04C363.68,-25.04 354.91,-25.04 346.27,-25.04"/>
-<polygon fill="#000000" stroke="#000000" points="346.24,-21.54 336.24,-25.04 346.24,-28.54 346.24,-21.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.82,-24.45C363.68,-24.45 354.91,-24.45 346.27,-24.45"/>
+<polygon fill="#000000" stroke="#000000" points="346.24,-20.95 336.24,-24.45 346.24,-27.95 346.24,-20.95"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~helio_classes~~UsesGraph_edge7" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.97,-31.55C238.66,-32.91 229.88,-34.34 221.31,-35.74"/>
+<polygon fill="#000000" stroke="#000000" points="220.7,-32.29 211.39,-37.36 221.83,-39.2 220.7,-32.29"/>
 </g>
 </g>
 </svg>
@@ -509,8 +508,8 @@ <h3 class="panel-title">Used by</h3>
 <!-- module~helio_classes -->
 <g id="module~~helio_classes~~UsedByGraph_node1" class="node">
 <title>module~helio_classes</title>
-<polygon fill="none" stroke="black" points="76,-2060 0,-2060 0,-2036 76,-2036 76,-2060"/>
-<text text-anchor="middle" x="38" y="-2045.6" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes</text>
+<polygon fill="none" stroke="black" points="76,-1473 0,-1473 0,-1449 76,-1449 76,-1473"/>
+<text text-anchor="middle" x="38" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes</text>
 </g>
 <!-- module~s_helio_setup -->
 <g id="module~~helio_classes~~UsedByGraph_node2" class="node">
@@ -524,68 +523,96 @@ <h3 class="panel-title">Used by</h3>
 <!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
 <g id="module~~helio_classes~~UsedByGraph_edge3" class="edge">
 <title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M361.71,-2863.97C348.32,-2860.99 333.95,-2855.86 323,-2847 255,-2791.99 266.11,-2752.95 233,-2672 139.48,-2443.34 64.69,-2152.19 44.43,-2070.31"/>
-<polygon fill="#000000" stroke="#000000" points="47.73,-2069.04 41.94,-2060.17 40.93,-2070.72 47.73,-2069.04"/>
+<path fill="none" stroke="#000000" d="M361.96,-2866.48C333.92,-2865.74 295.06,-2865.49 261,-2868"/>
 </g>
 <!-- module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_node7" class="node">
+<g id="module~~helio_classes~~UsedByGraph_node5" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node7"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="287,-1431 233,-1431 233,-1407 287,-1407 287,-1431"/>
-<text text-anchor="middle" x="260" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~helio_classes~~UsedByGraph_node5"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="287,-1473 233,-1473 233,-1449 287,-1449 287,-1473"/>
+<text text-anchor="middle" x="260" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_helio_setup&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge13" class="edge">
+<g id="module~~helio_classes~~UsedByGraph_edge77" class="edge">
 <title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.77,-2866.78C347.39,-2864.23 332.32,-2858.65 323,-2847 277.16,-2789.7 263.1,-1618.98 261.23,-1441.47"/>
-<polygon fill="#000000" stroke="#000000" points="264.72,-1441.2 261.12,-1431.24 257.72,-1441.27 264.72,-1441.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.78,-2866.77C347.4,-2864.22 332.33,-2858.64 323,-2847 278.51,-2791.47 263.33,-1657.45 261.25,-1483.35"/>
+<polygon fill="#000000" stroke="#000000" points="264.75,-1483.25 261.14,-1473.29 257.75,-1483.33 264.75,-1483.25"/>
 </g>
 <!-- module~s_helio_step -->
 <g id="module~~helio_classes~~UsedByGraph_node3" class="node">
 <title>module~s_helio_step</title>
 <g id="a_module~~helio_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-150 365,-150 365,-126 438,-126 438,-150"/>
-<text text-anchor="middle" x="401.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-2838 365,-2838 365,-2814 438,-2814 438,-2838"/>
+<text text-anchor="middle" x="401.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
 <!-- module~s_helio_step&#45;&gt;module~helio_classes -->
 <g id="module~~helio_classes~~UsedByGraph_edge4" class="edge">
 <title>module~s_helio_step&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M364.87,-128.84C351.67,-125.32 336.6,-121.14 323,-117 295.17,-108.52 290.01,-93.86 261,-96"/>
+<path fill="none" stroke="#000000" d="M364.87,-2835.16C351.67,-2838.68 336.6,-2842.86 323,-2847 295.17,-2855.48 290.01,-2865.86 261,-2868"/>
+<path fill="none" stroke="#000000" d="M259,-2868C213.12,-2871.39 201.47,-2869.52 155.5,-2868"/>
 </g>
 <!-- module~s_helio_step&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge18" class="edge">
+<g id="module~~helio_classes~~UsedByGraph_edge81" class="edge">
 <title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.61,-138.79C349.42,-141.1 332.96,-146.62 323,-159 282.64,-209.14 264.12,-1229.92 261.37,-1396.2"/>
-<polygon fill="#000000" stroke="#000000" points="257.86,-1396.61 261.19,-1406.67 264.86,-1396.72 257.86,-1396.61"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365,-2825.29C349.69,-2823.01 333.03,-2817.5 323,-2805 279.89,-2751.26 263.58,-1654.87 261.29,-1483.45"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-1483.28 261.15,-1473.32 257.79,-1483.37 264.79,-1483.28"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~symba_classes -->
 <g id="module~~helio_classes~~UsedByGraph_node4" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<title>module~symba_classes</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node4"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="197,-1473 112,-1473 112,-1449 197,-1449 197,-1473"/>
+<text text-anchor="middle" x="154.5" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+</a>
+</g>
+</g>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge2" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M111.84,-1461C103.57,-1461 94.82,-1461 86.37,-1461"/>
+<polygon fill="#000000" stroke="#000000" points="86.27,-1457.5 76.27,-1461 86.27,-1464.5 86.27,-1457.5"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge1" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.5,-2868C80.96,-2865.6 44.62,-1662.57 39.6,-1483.24"/>
+<polygon fill="#000000" stroke="#000000" points="43.1,-1483.04 39.33,-1473.14 36.1,-1483.23 43.1,-1483.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.77,-1473.19C256.09,-1610.95 229.55,-2870.45 155.5,-2868"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M232.88,-1461C225.13,-1461 216.36,-1461 207.58,-1461"/>
+<polygon fill="#000000" stroke="#000000" points="207.32,-1457.5 197.32,-1461 207.32,-1464.5 207.32,-1457.5"/>
+</g>
+<!-- module~s_helio_drift -->
+<g id="module~~helio_classes~~UsedByGraph_node6" class="node">
+<title>module~s_helio_drift</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-108 366.5,-108 366.5,-84 436.5,-84 436.5,-108"/>
-<text text-anchor="middle" x="401.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<text text-anchor="middle" x="401.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
+<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
 <g id="module~~helio_classes~~UsedByGraph_edge5" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M366.34,-94.6C338.06,-93.78 296.87,-93.35 261,-96"/>
+<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M366.27,-86.52C338.13,-79.77 297.15,-72.33 261,-75"/>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge23" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.2,-96.55C350.57,-98.71 333.3,-104.18 323,-117 281.26,-168.95 263.84,-1227.92 261.32,-1396.48"/>
-<polygon fill="#000000" stroke="#000000" points="257.82,-1396.61 261.17,-1406.66 264.82,-1396.71 257.82,-1396.61"/>
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge49" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.19,-96.54C350.56,-98.71 333.29,-104.17 323,-117 279.89,-170.74 263.58,-1267.13 261.29,-1438.55"/>
+<polygon fill="#000000" stroke="#000000" points="257.79,-1438.63 261.15,-1448.68 264.79,-1438.72 257.79,-1438.63"/>
 </g>
 <!-- module~s_helio_gr -->
-<g id="module~~helio_classes~~UsedByGraph_node5" class="node">
+<g id="module~~helio_classes~~UsedByGraph_node7" class="node">
 <title>module~s_helio_gr</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<g id="a_module~~helio_classes~~UsedByGraph_node7"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="432.5,-66 370.5,-66 370.5,-42 432.5,-42 432.5,-66"/>
 <text text-anchor="middle" x="401.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
@@ -594,1069 +621,1044 @@ <h3 class="panel-title">Used by</h3>
 <!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
 <g id="module~~helio_classes~~UsedByGraph_edge6" class="edge">
 <title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M370.2,-61.75C355.83,-65.54 338.47,-70.29 323,-75 295.17,-83.48 290.01,-93.86 261,-96"/>
+<path fill="none" stroke="#000000" d="M370.44,-59.87C342.29,-65.05 298.98,-72.2 261,-75"/>
 </g>
 <!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge26" class="edge">
+<g id="module~~helio_classes~~UsedByGraph_edge63" class="edge">
 <title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.12,-54.06C353.54,-55.83 334.17,-61.08 323,-75 279.89,-128.74 263.58,-1225.13 261.29,-1396.55"/>
-<polygon fill="#000000" stroke="#000000" points="257.79,-1396.63 261.15,-1406.68 264.79,-1396.72 257.79,-1396.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.12,-54.06C353.53,-55.82 334.16,-61.07 323,-75 278.51,-130.53 263.33,-1264.55 261.25,-1438.65"/>
+<polygon fill="#000000" stroke="#000000" points="257.75,-1438.67 261.14,-1448.71 264.75,-1438.75 257.75,-1438.67"/>
 </g>
-<!-- module~s_helio_drift -->
-<g id="module~~helio_classes~~UsedByGraph_node6" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<!-- module~s_helio_kick -->
+<g id="module~~helio_classes~~UsedByGraph_node8" class="node">
+<title>module~s_helio_kick</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-24 366.5,-24 366.5,0 436.5,0 436.5,-24"/>
-<text text-anchor="middle" x="401.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<text text-anchor="middle" x="401.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
+<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
 <g id="module~~helio_classes~~UsedByGraph_edge7" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M259,-96C213.12,-99.39 201.44,-93.73 155.5,-96"/>
-<path fill="none" stroke="#000000" d="M153.5,-96C51.9,-101.01 40.18,-1808.13 39.1,-2025.36"/>
-<polygon fill="#000000" stroke="#000000" points="35.6,-2025.55 39.05,-2035.57 42.6,-2025.59 35.6,-2025.55"/>
-<path fill="none" stroke="#000000" d="M366.16,-17.24C352.11,-20.39 336.12,-25.33 323,-33 289.08,-52.83 300.18,-93.11 261,-96"/>
-</g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge63" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.18,-12.54C350.55,-14.7 333.28,-20.16 323,-33 278.51,-88.53 263.33,-1222.55 261.25,-1396.65"/>
-<polygon fill="#000000" stroke="#000000" points="257.75,-1396.67 261.14,-1406.71 264.75,-1396.75 257.75,-1396.67"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge1" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.71,-1406.71C255.48,-1272.99 224.96,-92.57 155.5,-96"/>
-</g>
-<!-- module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_node8" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node8"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="197,-2060 112,-2060 112,-2036 197,-2036 197,-2060"/>
-<text text-anchor="middle" x="154.5" y="-2045.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge77" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.02,-1431C244.47,-1507.29 175.81,-1924.57 159.15,-2025.85"/>
-<polygon fill="#000000" stroke="#000000" points="155.67,-2025.43 157.5,-2035.87 162.57,-2026.57 155.67,-2025.43"/>
+<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M366.46,-18.65C352.62,-22.01 336.68,-26.72 323,-33 292.75,-46.88 294.19,-72.55 261,-75"/>
+<path fill="none" stroke="#000000" d="M259,-75C115.23,-85.61 49.26,-1261.24 40.11,-1438.68"/>
+<polygon fill="#000000" stroke="#000000" points="36.62,-1438.53 39.6,-1448.7 43.61,-1438.89 36.62,-1438.53"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge2" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M111.84,-2048C103.57,-2048 94.82,-2048 86.37,-2048"/>
-<polygon fill="#000000" stroke="#000000" points="86.27,-2044.5 76.27,-2048 86.27,-2051.5 86.27,-2044.5"/>
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge51" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.18,-12.53C350.55,-14.69 333.28,-20.16 323,-33 277.16,-90.3 263.1,-1261.02 261.23,-1438.53"/>
+<polygon fill="#000000" stroke="#000000" points="257.72,-1438.73 261.12,-1448.76 264.72,-1438.8 257.72,-1438.73"/>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~helio_classes~~UsedByGraph_node9" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-2586 362,-2586 362,-2562 441,-2562 441,-2586"/>
-<text text-anchor="middle" x="401.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-2712 342.5,-2712 342.5,-2688 460.5,-2688 460.5,-2712"/>
+<text text-anchor="middle" x="401.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge8" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.84,-2572.72C347.46,-2570.17 332.38,-2564.59 323,-2553 286.7,-2508.14 264.94,-1596.73 261.48,-1441.41"/>
-<polygon fill="#000000" stroke="#000000" points="264.98,-1441.12 261.26,-1431.2 257.98,-1441.27 264.98,-1441.12"/>
-</g>
-<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge78" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M361.85,-2580.25C348.92,-2583.41 334.79,-2588.11 323,-2595 289.08,-2614.83 291.05,-2683.3 261,-2658"/>
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge18" class="edge">
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.24,-2693.04C334.83,-2689.81 328.07,-2685.29 323,-2679 283.99,-2630.61 264.37,-1645.83 261.4,-1483.55"/>
+<polygon fill="#000000" stroke="#000000" points="264.9,-1483.24 261.21,-1473.31 257.9,-1483.37 264.9,-1483.24"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_gr -->
 <g id="module~~helio_classes~~UsedByGraph_node10" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-2544 362,-2544 362,-2520 441,-2520 441,-2544"/>
-<text text-anchor="middle" x="401.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_gr</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-2670 374.5,-2670 374.5,-2646 428.5,-2646 428.5,-2670"/>
+<text text-anchor="middle" x="401.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge11" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.85,-2530.71C347.48,-2528.15 332.4,-2522.58 323,-2511 288.06,-2467.92 265.25,-1593.73 261.54,-1441.51"/>
-<polygon fill="#000000" stroke="#000000" points="265.03,-1441.02 261.28,-1431.11 258.03,-1441.19 265.03,-1441.02"/>
-</g>
-<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge79" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M361.99,-2536.39C348.63,-2539.4 334.2,-2544.47 323,-2553 279.89,-2585.84 302.46,-2692.9 261,-2658"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge19" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.36,-2658.3C356.98,-2656.97 335.18,-2652.07 323,-2637 285.32,-2590.36 264.63,-1641.44 261.44,-1483.26"/>
+<polygon fill="#000000" stroke="#000000" points="264.94,-1483.19 261.24,-1473.26 257.94,-1483.33 264.94,-1483.19"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_symba_collision -->
 <g id="module~~helio_classes~~UsedByGraph_node11" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="431.5,-2418 371.5,-2418 371.5,-2394 431.5,-2394 431.5,-2418"/>
-<text text-anchor="middle" x="401.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="451,-2796 352,-2796 352,-2772 451,-2772 451,-2796"/>
+<text text-anchor="middle" x="401.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge9" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.38,-2405.98C354.58,-2404.31 334.56,-2399.14 323,-2385 261.39,-2309.61 260.52,-1579.15 260.9,-1441.36"/>
-<polygon fill="#000000" stroke="#000000" points="264.41,-1441.18 260.94,-1431.17 257.41,-1441.16 264.41,-1441.18"/>
+<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge11" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M351.75,-2789.4C321.94,-2789.92 285.04,-2785.17 261,-2763"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge21" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M351.68,-2780.43C340.68,-2777.27 330.16,-2771.91 323,-2763 281.26,-2711.05 263.84,-1652.08 261.32,-1483.52"/>
+<polygon fill="#000000" stroke="#000000" points="264.82,-1483.29 261.17,-1473.34 257.82,-1483.39 264.82,-1483.29"/>
+</g>
+<!-- module~s_util_valid -->
 <g id="module~~helio_classes~~UsedByGraph_node12" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node12"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="428.5,-2376 374.5,-2376 374.5,-2352 428.5,-2352 428.5,-2376"/>
-<text text-anchor="middle" x="401.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="434,-2628 369,-2628 369,-2604 434,-2604 434,-2628"/>
+<text text-anchor="middle" x="401.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge10" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.43,-2364.24C357.08,-2362.89 335.28,-2357.99 323,-2343 264.14,-2271.18 261.02,-1576.53 260.97,-1441.63"/>
-<polygon fill="#000000" stroke="#000000" points="264.47,-1441.29 260.98,-1431.29 257.47,-1441.29 264.47,-1441.29"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge20" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369,-2615.77C352.7,-2613.87 333.96,-2608.54 323,-2595 286.7,-2550.14 264.94,-1638.73 261.48,-1483.41"/>
+<polygon fill="#000000" stroke="#000000" points="264.98,-1483.12 261.26,-1473.2 257.98,-1483.27 264.98,-1483.12"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_obl -->
 <g id="module~~helio_classes~~UsedByGraph_node13" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="434.5,-2334 368.5,-2334 368.5,-2310 434.5,-2310 434.5,-2334"/>
-<text text-anchor="middle" x="401.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_obl</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-2586 374.5,-2586 374.5,-2562 428.5,-2562 428.5,-2586"/>
+<text text-anchor="middle" x="401.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge12" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.3,-2321.61C352.21,-2319.61 333.89,-2314.24 323,-2301 266.81,-2232.66 261.54,-1572.11 261.05,-1441.41"/>
-<polygon fill="#000000" stroke="#000000" points="264.55,-1441.04 261.02,-1431.05 257.55,-1441.06 264.55,-1441.04"/>
+<!-- module~s_obl&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge22" class="edge">
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.38,-2574.28C357,-2572.95 335.21,-2568.05 323,-2553 288.06,-2509.92 265.25,-1635.73 261.54,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="265.03,-1483.02 261.28,-1473.11 258.03,-1483.19 265.03,-1483.02"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~helio_classes~~UsedByGraph_node14" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-2292 374.5,-2292 374.5,-2268 428.5,-2268 428.5,-2292"/>
-<text text-anchor="middle" x="401.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="446,-2544 357,-2544 357,-2520 446,-2520 446,-2544"/>
+<text text-anchor="middle" x="401.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge16" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.46,-2280.22C357.12,-2278.85 335.33,-2273.95 323,-2259 269.47,-2194.13 262.08,-1567.48 261.13,-1441.13"/>
-<polygon fill="#000000" stroke="#000000" points="264.63,-1441.07 261.06,-1431.09 257.63,-1441.11 264.63,-1441.07"/>
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge23" class="edge">
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M356.6,-2529.63C343.91,-2526.7 331.27,-2521.17 323,-2511 255.99,-2428.57 259.57,-1628.44 260.78,-1483.47"/>
+<polygon fill="#000000" stroke="#000000" points="264.28,-1483.19 260.87,-1473.16 257.28,-1483.12 264.28,-1483.19"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_util_coord -->
 <g id="module~~helio_classes~~UsedByGraph_node15" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="435.5,-2250 367.5,-2250 367.5,-2226 435.5,-2226 435.5,-2250"/>
-<text text-anchor="middle" x="401.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-2502 366.5,-2502 366.5,-2478 436.5,-2478 436.5,-2502"/>
+<text text-anchor="middle" x="401.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge14" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.16,-2237.42C351.37,-2235.3 333.67,-2229.88 323,-2217 272.17,-2155.65 262.65,-1563.77 261.22,-1441.16"/>
-<polygon fill="#000000" stroke="#000000" points="264.72,-1441.04 261.11,-1431.08 257.72,-1441.12 264.72,-1441.04"/>
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge24" class="edge">
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.28,-2489.39C350.67,-2487.21 333.39,-2481.75 323,-2469 258.69,-2390.1 260.04,-1624.9 260.84,-1483.43"/>
+<polygon fill="#000000" stroke="#000000" points="264.34,-1483.03 260.91,-1473.01 257.34,-1482.99 264.34,-1483.03"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~helio_classes~~UsedByGraph_node16" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-2208 362,-2208 362,-2184 441,-2184 441,-2208"/>
-<text text-anchor="middle" x="401.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="473,-2754 330,-2754 330,-2730 473,-2730 473,-2754"/>
+<text text-anchor="middle" x="401.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
 <g id="module~~helio_classes~~UsedByGraph_edge15" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362,-2194.59C347.64,-2192.02 332.54,-2186.47 323,-2175 274.86,-2117.14 263.25,-1559.66 261.32,-1441.1"/>
-<polygon fill="#000000" stroke="#000000" points="264.82,-1440.97 261.17,-1431.03 257.82,-1441.08 264.82,-1440.97"/>
+<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M347.1,-2754.05C310.51,-2761.64 267.46,-2768.96 261,-2763"/>
+<path fill="none" stroke="#000000" d="M259,-2763C161.03,-2672.64 155.71,-1650.1 155.5,-1483.79"/>
+<polygon fill="#000000" stroke="#000000" points="159,-1483.32 155.49,-1473.33 152,-1483.33 159,-1483.32"/>
 </g>
-<!-- module~s_rmvs_step -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge25" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.75,-2729.88C329.11,-2727.41 325.8,-2724.48 323,-2721 282.64,-2670.86 264.12,-1650.08 261.37,-1483.8"/>
+<polygon fill="#000000" stroke="#000000" points="264.86,-1483.28 261.19,-1473.33 257.86,-1483.39 264.86,-1483.28"/>
+</g>
+<!-- module~s_whm_coord -->
 <g id="module~~helio_classes~~UsedByGraph_node17" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-2166 365,-2166 365,-2142 438,-2142 438,-2166"/>
-<text text-anchor="middle" x="401.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<title>module~s_whm_coord</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-2460 362,-2460 362,-2436 441,-2436 441,-2460"/>
+<text text-anchor="middle" x="401.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge65" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.83,-2153.04C349.68,-2150.69 333.19,-2145.19 323,-2133 277.57,-2078.67 263.91,-1556.27 261.44,-1441.3"/>
-<polygon fill="#000000" stroke="#000000" points="264.94,-1441.13 261.23,-1431.21 257.94,-1441.28 264.94,-1441.13"/>
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge26" class="edge">
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.89,-2446.68C347.53,-2444.11 332.44,-2438.55 323,-2427 261.39,-2351.61 260.52,-1621.15 260.9,-1483.36"/>
+<polygon fill="#000000" stroke="#000000" points="264.41,-1483.18 260.94,-1473.17 257.41,-1483.16 264.41,-1483.18"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_rescale -->
 <g id="module~~helio_classes~~UsedByGraph_node18" class="node">
-<title>module~s_io</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-2124 374.5,-2124 374.5,-2100 428.5,-2100 428.5,-2124"/>
-<text text-anchor="middle" x="401.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="440.5,-2418 362.5,-2418 362.5,-2394 440.5,-2394 440.5,-2418"/>
+<text text-anchor="middle" x="401.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge17" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.17,-2112.11C356.93,-2110.68 335.38,-2105.72 323,-2091 280.26,-2040.17 264.59,-1552.27 261.57,-1441.36"/>
-<polygon fill="#000000" stroke="#000000" points="265.06,-1440.94 261.3,-1431.03 258.06,-1441.12 265.06,-1440.94"/>
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge27" class="edge">
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.31,-2404.73C347.83,-2402.2 332.54,-2396.64 323,-2385 264.14,-2313.18 261.02,-1618.53 260.97,-1483.63"/>
+<polygon fill="#000000" stroke="#000000" points="264.47,-1483.29 260.98,-1473.29 257.47,-1483.29 264.47,-1483.29"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~helio_classes~~UsedByGraph_node19" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="451,-2502 352,-2502 352,-2478 451,-2478 451,-2502"/>
-<text text-anchor="middle" x="401.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="480,-2376 323,-2376 323,-2352 480,-2352 480,-2376"/>
+<text text-anchor="middle" x="401.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge21" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M351.75,-2486.38C340.75,-2483.21 330.21,-2477.87 323,-2469 255.99,-2386.57 259.57,-1586.44 260.78,-1441.47"/>
-<polygon fill="#000000" stroke="#000000" points="264.28,-1441.19 260.87,-1431.16 257.28,-1441.12 264.28,-1441.19"/>
-</g>
-<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge82" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M351.67,-2496.08C341.31,-2499.22 331.08,-2503.94 323,-2511 269.61,-2557.66 315.24,-2703.67 261,-2658"/>
-<path fill="none" stroke="#000000" d="M259,-2658C166.92,-2580.48 156.74,-2171.19 155.63,-2070.43"/>
-<polygon fill="#000000" stroke="#000000" points="159.13,-2070.16 155.54,-2060.19 152.13,-2070.22 159.13,-2070.16"/>
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge28" class="edge">
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.84,-2351.82C329.17,-2349.36 325.83,-2346.45 323,-2343 266.81,-2274.66 261.54,-1614.11 261.05,-1483.41"/>
+<polygon fill="#000000" stroke="#000000" points="264.55,-1483.04 261.02,-1473.05 257.55,-1483.06 264.55,-1483.04"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_rmvs_step -->
 <g id="module~~helio_classes~~UsedByGraph_node20" class="node">
-<title>module~orbel</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node20"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="428.5,-2082 374.5,-2082 374.5,-2058 428.5,-2058 428.5,-2082"/>
-<text text-anchor="middle" x="401.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_rmvs_step</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-2334 365,-2334 365,-2310 438,-2310 438,-2334"/>
+<text text-anchor="middle" x="401.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge19" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.2,-2070.09C356.97,-2068.64 335.42,-2063.69 323,-2049 282.94,-2001.64 265.32,-1547.8 261.71,-1441.29"/>
-<polygon fill="#000000" stroke="#000000" points="265.2,-1440.95 261.37,-1431.07 258.21,-1441.18 265.2,-1440.95"/>
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge29" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.75,-2321.1C349.59,-2318.76 333.11,-2313.26 323,-2301 269.47,-2236.13 262.08,-1609.48 261.13,-1483.13"/>
+<polygon fill="#000000" stroke="#000000" points="264.63,-1483.07 261.06,-1473.09 257.63,-1483.11 264.63,-1483.07"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- module~s_util_index -->
 <g id="module~~helio_classes~~UsedByGraph_node21" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439,-2838 364,-2838 364,-2814 439,-2814 439,-2838"/>
-<text text-anchor="middle" x="401.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>module~s_util_index</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="436,-2292 367,-2292 367,-2268 436,-2268 436,-2292"/>
+<text text-anchor="middle" x="401.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge20" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.79,-2825.11C348.82,-2822.73 332.76,-2817.18 323,-2805 278.51,-2749.47 263.33,-1615.45 261.25,-1441.35"/>
-<polygon fill="#000000" stroke="#000000" points="264.75,-1441.25 261.14,-1431.29 257.75,-1441.33 264.75,-1441.25"/>
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge30" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.76,-2279.37C351.07,-2277.21 333.58,-2271.77 323,-2259 272.17,-2197.65 262.65,-1605.77 261.22,-1483.16"/>
+<polygon fill="#000000" stroke="#000000" points="264.72,-1483.04 261.11,-1473.08 257.72,-1483.12 264.72,-1483.04"/>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge83" class="edge">
-<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M363.71,-2822.91C349.61,-2820.09 334.23,-2814.81 323,-2805 269.61,-2758.34 315.24,-2703.67 261,-2658"/>
-</g>
-<!-- module~s_symba_encounter_check -->
+<!-- proc~ge_wpp -->
 <g id="module~~helio_classes~~UsedByGraph_node22" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="473,-2796 330,-2796 330,-2772 473,-2772 473,-2796"/>
-<text text-anchor="middle" x="401.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node22"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="428.5,-2250 374.5,-2250 374.5,-2226 428.5,-2226 428.5,-2250"/>
+<text text-anchor="middle" x="401.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge22" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.74,-2771.89C329.1,-2769.42 325.79,-2766.48 323,-2763 279.89,-2709.26 263.58,-1612.87 261.29,-1441.45"/>
-<polygon fill="#000000" stroke="#000000" points="264.79,-1441.28 261.15,-1431.32 257.79,-1441.37 264.79,-1441.28"/>
-</g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge81" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M338.34,-2771.95C332.87,-2769.5 327.66,-2766.55 323,-2763 279.89,-2730.16 302.46,-2692.9 261,-2658"/>
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge31" class="edge">
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.5,-2238.18C357.18,-2236.81 335.39,-2231.89 323,-2217 274.86,-2159.14 263.25,-1601.66 261.32,-1483.1"/>
+<polygon fill="#000000" stroke="#000000" points="264.82,-1482.97 261.17,-1473.03 257.82,-1483.08 264.82,-1482.97"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- module~s_operator_cross -->
 <g id="module~~helio_classes~~UsedByGraph_node23" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-2040 366.5,-2040 366.5,-2016 436.5,-2016 436.5,-2040"/>
-<text text-anchor="middle" x="401.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<title>module~s_operator_cross</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="449.5,-2208 353.5,-2208 353.5,-2184 449.5,-2184 449.5,-2208"/>
+<text text-anchor="middle" x="401.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge58" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.12,-2027.13C350.67,-2024.87 333.58,-2019.42 323,-2007 285.58,-1963.08 266.07,-1542.8 261.87,-1441.09"/>
-<polygon fill="#000000" stroke="#000000" points="265.36,-1440.88 261.46,-1431.03 258.37,-1441.16 265.36,-1440.88"/>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge32" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.13,-2192.58C341.7,-2189.46 330.6,-2184.09 323,-2175 277.57,-2120.67 263.91,-1598.27 261.44,-1483.3"/>
+<polygon fill="#000000" stroke="#000000" points="264.94,-1483.13 261.23,-1473.21 257.94,-1483.28 264.94,-1483.13"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_fraggle_set -->
 <g id="module~~helio_classes~~UsedByGraph_node24" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442.5,-2754 360.5,-2754 360.5,-2730 442.5,-2730 442.5,-2754"/>
-<text text-anchor="middle" x="401.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="440,-2166 363,-2166 363,-2142 440,-2142 440,-2166"/>
+<text text-anchor="middle" x="401.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge24" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M360.18,-2740.46C346.3,-2737.78 331.99,-2732.19 323,-2721 281.26,-2669.05 263.84,-1610.08 261.32,-1441.52"/>
-<polygon fill="#000000" stroke="#000000" points="264.82,-1441.29 261.17,-1431.34 257.82,-1441.39 264.82,-1441.29"/>
-</g>
-<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge85" class="edge">
-<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M360.26,-2735.36C347.77,-2732.2 334.31,-2727.61 323,-2721 289.08,-2701.17 291.05,-2683.3 261,-2658"/>
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge33" class="edge">
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.86,-2152.68C348.28,-2150.16 332.78,-2144.63 323,-2133 280.26,-2082.17 264.59,-1594.27 261.57,-1483.36"/>
+<polygon fill="#000000" stroke="#000000" points="265.06,-1482.94 261.3,-1473.03 258.06,-1483.12 265.06,-1482.94"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_fraggle_io -->
 <g id="module~~helio_classes~~UsedByGraph_node25" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-1998 365,-1998 365,-1974 438,-1974 438,-1998"/>
-<text text-anchor="middle" x="401.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="437,-2124 366,-2124 366,-2100 437,-2100 437,-2124"/>
+<text text-anchor="middle" x="401.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge25" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.98,-1984.91C349.86,-1982.54 333.35,-1977.06 323,-1965 288.32,-1924.62 266.99,-1539.73 262.09,-1441.65"/>
-<polygon fill="#000000" stroke="#000000" points="265.57,-1441.21 261.58,-1431.39 258.58,-1441.55 265.57,-1441.21"/>
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge34" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.69,-2111.1C350.34,-2108.81 333.44,-2103.35 323,-2091 282.94,-2043.64 265.32,-1589.8 261.71,-1483.29"/>
+<polygon fill="#000000" stroke="#000000" points="265.2,-1482.95 261.37,-1473.07 258.21,-1483.18 265.2,-1482.95"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~helio_classes~~UsedByGraph_node26" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="449.5,-2712 353.5,-2712 353.5,-2688 449.5,-2688 449.5,-2712"/>
-<text text-anchor="middle" x="401.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="437,-2082 366,-2082 366,-2058 437,-2058 437,-2082"/>
+<text text-anchor="middle" x="401.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge27" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.31,-2696.87C341.73,-2693.77 330.52,-2688.34 323,-2679 282.64,-2628.86 264.12,-1608.08 261.37,-1441.8"/>
-<polygon fill="#000000" stroke="#000000" points="264.86,-1441.28 261.19,-1431.33 257.86,-1441.39 264.86,-1441.28"/>
-</g>
-<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge86" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M353.32,-2695.35C323.93,-2690.31 286.93,-2679.83 261,-2658"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge35" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.73,-2069.07C350.38,-2066.77 333.49,-2061.31 323,-2049 285.58,-2005.08 266.07,-1584.8 261.87,-1483.09"/>
+<polygon fill="#000000" stroke="#000000" points="265.36,-1482.88 261.46,-1473.03 258.37,-1483.16 265.36,-1482.88"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_util_set -->
 <g id="module~~helio_classes~~UsedByGraph_node27" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-1956 357.5,-1956 357.5,-1932 445.5,-1932 445.5,-1956"/>
-<text text-anchor="middle" x="401.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<title>module~s_util_set</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="430.5,-2040 372.5,-2040 372.5,-2016 430.5,-2016 430.5,-2040"/>
+<text text-anchor="middle" x="401.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge28" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.39,-1941.4C344.58,-1938.48 331.68,-1933.01 323,-1923 259.37,-1849.62 259.34,-1529.18 260.57,-1441.34"/>
-<polygon fill="#000000" stroke="#000000" points="264.07,-1441.22 260.73,-1431.17 257.07,-1441.11 264.07,-1441.22"/>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge36" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.39,-2027.86C355.53,-2026.18 335.08,-2021.06 323,-2007 288.32,-1966.62 266.99,-1581.73 262.09,-1483.65"/>
+<polygon fill="#000000" stroke="#000000" points="265.57,-1483.21 261.58,-1473.39 258.58,-1483.55 265.57,-1483.21"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_rmvs_io -->
 <g id="module~~helio_classes~~UsedByGraph_node28" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node28"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="431,-1914 372,-1914 372,-1890 431,-1890 431,-1914"/>
-<text text-anchor="middle" x="401.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-1998 371,-1998 371,-1974 432,-1974 432,-1998"/>
+<text text-anchor="middle" x="401.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge29" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.72,-1901.69C355.05,-1899.91 335.04,-1894.73 323,-1881 264.6,-1814.39 260.74,-1523.8 260.85,-1441.06"/>
-<polygon fill="#000000" stroke="#000000" points="264.35,-1441.02 260.89,-1431.01 257.35,-1441 264.35,-1441.02"/>
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge37" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.9,-1985.65C354.37,-1983.81 334.78,-1978.59 323,-1965 259.37,-1891.62 259.34,-1571.18 260.57,-1483.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.07,-1483.22 260.73,-1473.17 257.07,-1483.11 264.07,-1483.22"/>
 </g>
-<!-- module~s_rmvs_util -->
+<!-- module~s_util_version -->
 <g id="module~~helio_classes~~UsedByGraph_node29" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="435,-1872 368,-1872 368,-1848 435,-1848 435,-1872"/>
-<text text-anchor="middle" x="401.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<title>module~s_util_version</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="440.5,-1956 362.5,-1956 362.5,-1932 440.5,-1932 440.5,-1956"/>
+<text text-anchor="middle" x="401.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge30" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.92,-1859.16C352.13,-1856.99 334.2,-1851.61 323,-1839 269.93,-1779.26 262.28,-1519.4 261.18,-1441.29"/>
-<polygon fill="#000000" stroke="#000000" points="264.68,-1441.09 261.06,-1431.13 257.68,-1441.17 264.68,-1441.09"/>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge38" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.29,-1942.34C347.99,-1939.72 332.83,-1934.22 323,-1923 264.6,-1856.39 260.74,-1565.8 260.85,-1483.06"/>
+<polygon fill="#000000" stroke="#000000" points="264.35,-1483.02 260.89,-1473.01 257.35,-1483 264.35,-1483.02"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- module~s_tides_step_spin -->
 <g id="module~~helio_classes~~UsedByGraph_node30" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437,-1830 366,-1830 366,-1806 437,-1806 437,-1830"/>
-<text text-anchor="middle" x="401.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="450.5,-1914 352.5,-1914 352.5,-1890 450.5,-1890 450.5,-1914"/>
+<text text-anchor="middle" x="401.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge31" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.64,-1816.73C350.47,-1814.35 333.74,-1808.9 323,-1797 275.2,-1744.05 263.97,-1514.41 261.59,-1441.38"/>
-<polygon fill="#000000" stroke="#000000" points="265.08,-1440.95 261.28,-1431.06 258.08,-1441.16 265.08,-1440.95"/>
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge39" class="edge">
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M352.28,-1897.93C341.27,-1894.77 330.59,-1889.55 323,-1881 269.93,-1821.26 262.28,-1561.4 261.18,-1483.29"/>
+<polygon fill="#000000" stroke="#000000" points="264.68,-1483.09 261.06,-1473.13 257.68,-1483.17 264.68,-1483.09"/>
 </g>
-<!-- module~s_util_append -->
+<!-- proc~solve_wbs -->
 <g id="module~~helio_classes~~UsedByGraph_node31" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-1788 362,-1788 362,-1764 441,-1764 441,-1788"/>
-<text text-anchor="middle" x="401.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node31"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="432.5,-1872 370.5,-1872 370.5,-1848 432.5,-1848 432.5,-1872"/>
+<text text-anchor="middle" x="401.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge32" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.77,-1773.94C347.74,-1771.23 332.92,-1765.77 323,-1755 280.45,-1708.81 265.87,-1509.15 262.1,-1441.51"/>
-<polygon fill="#000000" stroke="#000000" points="265.58,-1440.95 261.55,-1431.15 258.59,-1441.32 265.58,-1440.95"/>
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge40" class="edge">
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.33,-1859.39C354.03,-1857.41 334.86,-1852.14 323,-1839 275.2,-1786.05 263.97,-1556.41 261.59,-1483.38"/>
+<polygon fill="#000000" stroke="#000000" points="265.08,-1482.95 261.28,-1473.06 258.08,-1483.16 265.08,-1482.95"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_orbel -->
 <g id="module~~helio_classes~~UsedByGraph_node32" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437,-1746 366,-1746 366,-1722 437,-1722 437,-1746"/>
-<text text-anchor="middle" x="401.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_orbel</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-1830 374.5,-1830 374.5,-1806 428.5,-1806 428.5,-1830"/>
+<text text-anchor="middle" x="401.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge33" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.89,-1732.51C350.77,-1730.07 334.01,-1724.65 323,-1713 285.65,-1673.47 268.01,-1503.28 262.75,-1441.51"/>
-<polygon fill="#000000" stroke="#000000" points="266.22,-1440.97 261.91,-1431.29 259.24,-1441.54 266.22,-1440.97"/>
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge41" class="edge">
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.22,-1817.71C357.22,-1816.07 335.94,-1811.05 323,-1797 280.45,-1750.81 265.87,-1551.15 262.1,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="265.58,-1482.95 261.55,-1473.15 258.59,-1483.32 265.58,-1482.95"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_whm_gr -->
 <g id="module~~helio_classes~~UsedByGraph_node33" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-1704 374.5,-1704 374.5,-1680 428.5,-1680 428.5,-1704"/>
-<text text-anchor="middle" x="401.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="432.5,-1788 370.5,-1788 370.5,-1764 432.5,-1764 432.5,-1788"/>
+<text text-anchor="middle" x="401.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge34" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.48,-1691.46C357.6,-1689.71 336.35,-1684.66 323,-1671 290.75,-1637.98 270.41,-1496.4 263.57,-1441.18"/>
-<polygon fill="#000000" stroke="#000000" points="267.02,-1440.57 262.35,-1431.06 260.07,-1441.41 267.02,-1440.57"/>
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge42" class="edge">
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.17,-1775.13C354.03,-1773.05 335.06,-1767.77 323,-1755 285.65,-1715.47 268.01,-1545.28 262.75,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="266.22,-1482.97 261.91,-1473.29 259.24,-1483.54 266.22,-1482.97"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~helio_classes~~UsedByGraph_node34" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-1662 371,-1662 371,-1638 432,-1638 432,-1662"/>
-<text text-anchor="middle" x="401.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-1746 366.5,-1746 366.5,-1722 436.5,-1722 436.5,-1746"/>
+<text text-anchor="middle" x="401.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge35" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.94,-1648.81C354.83,-1646.64 335.66,-1641.38 323,-1629 270.48,-1577.65 261.92,-1484.17 260.88,-1441.42"/>
-<polygon fill="#000000" stroke="#000000" points="264.38,-1441.2 260.76,-1431.24 257.38,-1441.28 264.38,-1441.2"/>
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge43" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.46,-1732.41C351.27,-1729.96 334.3,-1724.57 323,-1713 290.75,-1679.98 270.41,-1538.4 263.57,-1483.18"/>
+<polygon fill="#000000" stroke="#000000" points="267.02,-1482.57 262.35,-1473.06 260.07,-1483.41 267.02,-1482.57"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~helio_classes~~UsedByGraph_node35" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="460.5,-1620 342.5,-1620 342.5,-1596 460.5,-1596 460.5,-1620"/>
-<text text-anchor="middle" x="401.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="449.5,-1704 353.5,-1704 353.5,-1680 449.5,-1680 449.5,-1704"/>
+<text text-anchor="middle" x="401.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge36" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.26,-1598.9C335.21,-1595.95 328.55,-1592.08 323,-1587 280.38,-1548.01 266.97,-1477.14 262.82,-1441.19"/>
-<polygon fill="#000000" stroke="#000000" points="266.3,-1440.82 261.8,-1431.22 259.33,-1441.53 266.3,-1440.82"/>
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge44" class="edge">
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.49,-1687.27C342.33,-1684.14 331.27,-1679.09 323,-1671 270.48,-1619.65 261.92,-1526.17 260.88,-1483.42"/>
+<polygon fill="#000000" stroke="#000000" points="264.38,-1483.2 260.76,-1473.24 257.38,-1483.28 264.38,-1483.2"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_util_exit -->
 <g id="module~~helio_classes~~UsedByGraph_node36" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-1578 362,-1578 362,-1554 441,-1554 441,-1578"/>
-<text text-anchor="middle" x="401.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="431.5,-1662 371.5,-1662 371.5,-1638 431.5,-1638 431.5,-1662"/>
+<text text-anchor="middle" x="401.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge37" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.62,-1562.07C348.22,-1559.11 333.87,-1553.95 323,-1545 290.13,-1517.92 273.25,-1469.13 265.84,-1440.87"/>
-<polygon fill="#000000" stroke="#000000" points="269.24,-1440.01 263.45,-1431.13 262.44,-1441.67 269.24,-1440.01"/>
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge45" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.25,-1648.48C355.24,-1646.21 336.06,-1640.95 323,-1629 280.38,-1590.01 266.97,-1519.14 262.82,-1483.19"/>
+<polygon fill="#000000" stroke="#000000" points="266.3,-1482.82 261.8,-1473.22 259.33,-1483.53 266.3,-1482.82"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_netcdf -->
 <g id="module~~helio_classes~~UsedByGraph_node37" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="432.5,-1536 370.5,-1536 370.5,-1512 432.5,-1512 432.5,-1536"/>
-<text text-anchor="middle" x="401.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-1620 374.5,-1620 374.5,-1596 428.5,-1596 428.5,-1620"/>
+<text text-anchor="middle" x="401.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge38" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.19,-1520.58C355,-1517.73 336.92,-1512.52 323,-1503 299.58,-1486.98 281.62,-1459.14 271.2,-1439.93"/>
-<polygon fill="#000000" stroke="#000000" points="274.29,-1438.29 266.57,-1431.03 268.08,-1441.52 274.29,-1438.29"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge46" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.3,-1606.33C357.98,-1604.07 337.42,-1598.88 323,-1587 290.13,-1559.92 273.25,-1511.13 265.84,-1482.87"/>
+<polygon fill="#000000" stroke="#000000" points="269.24,-1482.01 263.45,-1473.13 262.44,-1483.67 269.24,-1482.01"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~helio_classes~~UsedByGraph_node38" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="450.5,-1494 352.5,-1494 352.5,-1470 450.5,-1470 450.5,-1494"/>
-<text text-anchor="middle" x="401.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-1578 357.5,-1578 357.5,-1554 445.5,-1554 445.5,-1578"/>
+<text text-anchor="middle" x="401.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge39" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M352.49,-1471.65C342.53,-1468.77 332.25,-1465.24 323,-1461 309.25,-1454.69 295.19,-1445.45 283.95,-1437.23"/>
-<polygon fill="#000000" stroke="#000000" points="286.04,-1434.43 275.95,-1431.22 281.84,-1440.02 286.04,-1434.43"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge47" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.26,-1559.68C345.45,-1556.57 333.13,-1551.92 323,-1545 299.58,-1528.98 281.62,-1501.14 271.2,-1481.93"/>
+<polygon fill="#000000" stroke="#000000" points="274.29,-1480.29 266.57,-1473.03 268.08,-1483.52 274.29,-1480.29"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_util_peri -->
 <g id="module~~helio_classes~~UsedByGraph_node39" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-1452 374.5,-1452 374.5,-1428 428.5,-1428 428.5,-1452"/>
-<text text-anchor="middle" x="401.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-1536 371,-1536 371,-1512 432,-1512 432,-1536"/>
+<text text-anchor="middle" x="401.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge40" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.26,-1436.05C352.54,-1432.78 321.43,-1428.1 297.32,-1424.47"/>
-<polygon fill="#000000" stroke="#000000" points="297.53,-1420.96 287.12,-1422.93 296.49,-1427.88 297.53,-1420.96"/>
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge48" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371,-1518.42C356.18,-1515.02 338.21,-1509.97 323,-1503 309.25,-1496.69 295.19,-1487.45 283.95,-1479.23"/>
+<polygon fill="#000000" stroke="#000000" points="286.04,-1476.43 275.95,-1473.22 281.84,-1482.02 286.04,-1476.43"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_setup -->
 <g id="module~~helio_classes~~UsedByGraph_node40" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="430.5,-1410 372.5,-1410 372.5,-1386 430.5,-1386 430.5,-1410"/>
-<text text-anchor="middle" x="401.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_setup</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-1494 374.5,-1494 374.5,-1470 428.5,-1470 428.5,-1494"/>
+<text text-anchor="middle" x="401.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge41" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.27,-1402.25C350.63,-1405.51 320.61,-1410.03 297.21,-1413.55"/>
-<polygon fill="#000000" stroke="#000000" points="296.67,-1410.09 287.3,-1415.04 297.71,-1417.01 296.67,-1410.09"/>
+<!-- module~s_setup&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge50" class="edge">
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.26,-1478.05C352.54,-1474.78 321.43,-1470.1 297.32,-1466.47"/>
+<polygon fill="#000000" stroke="#000000" points="297.53,-1462.96 287.12,-1464.93 296.49,-1469.88 297.53,-1462.96"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- module~s_util_append -->
 <g id="module~~helio_classes~~UsedByGraph_node41" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-1368 365.5,-1368 365.5,-1344 437.5,-1344 437.5,-1368"/>
-<text text-anchor="middle" x="401.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>module~s_util_append</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-1452 362,-1452 362,-1428 441,-1428 441,-1452"/>
+<text text-anchor="middle" x="401.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge42" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.3,-1362.93C351.73,-1366.27 336.3,-1370.9 323,-1377 309.25,-1383.31 295.19,-1392.55 283.95,-1400.77"/>
-<polygon fill="#000000" stroke="#000000" points="281.84,-1397.98 275.95,-1406.78 286.04,-1403.57 281.84,-1397.98"/>
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge52" class="edge">
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.64,-1445.85C341.55,-1448.87 317.17,-1452.54 297.44,-1455.51"/>
+<polygon fill="#000000" stroke="#000000" points="296.68,-1452.09 287.31,-1457.04 297.72,-1459.01 296.68,-1452.09"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- module~s_rmvs_util -->
 <g id="module~~helio_classes~~UsedByGraph_node42" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node42"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="456,-1326 347,-1326 347,-1302 456,-1302 456,-1326"/>
-<text text-anchor="middle" x="401.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="435,-1410 368,-1410 368,-1386 435,-1386 435,-1410"/>
+<text text-anchor="middle" x="401.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge43" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346.73,-1323.5C338.36,-1326.37 330.13,-1330.12 323,-1335 299.58,-1351.02 281.62,-1378.86 271.2,-1398.07"/>
-<polygon fill="#000000" stroke="#000000" points="268.08,-1396.48 266.57,-1406.97 274.29,-1399.71 268.08,-1396.48"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge54" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.99,-1404.28C353.8,-1407.66 337.19,-1412.49 323,-1419 309.25,-1425.31 295.19,-1434.55 283.95,-1442.77"/>
+<polygon fill="#000000" stroke="#000000" points="281.84,-1439.98 275.95,-1448.78 286.04,-1445.57 281.84,-1439.98"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- program~swiftest_driver -->
 <g id="module~~helio_classes~~UsedByGraph_node43" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="454.5,-1284 348.5,-1284 348.5,-1260 454.5,-1260 454.5,-1284"/>
-<text text-anchor="middle" x="401.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node43"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="442,-1368 361,-1368 361,-1344 442,-1344 442,-1368"/>
+<text text-anchor="middle" x="401.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge44" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M348.34,-1279.59C339.21,-1282.67 330.32,-1286.97 323,-1293 290.13,-1320.08 273.25,-1368.87 265.84,-1397.13"/>
-<polygon fill="#000000" stroke="#000000" points="262.44,-1396.33 263.45,-1406.87 269.24,-1397.99 262.44,-1396.33"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge55" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M360.87,-1361.41C347.99,-1364.5 334.16,-1369.37 323,-1377 299.58,-1393.02 281.62,-1420.86 271.2,-1440.07"/>
+<polygon fill="#000000" stroke="#000000" points="268.08,-1438.48 266.57,-1448.97 274.29,-1441.71 268.08,-1438.48"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_symba_step -->
 <g id="module~~helio_classes~~UsedByGraph_node44" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="449.5,-1242 353.5,-1242 353.5,-1218 449.5,-1218 449.5,-1242"/>
-<text text-anchor="middle" x="401.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="442.5,-402 360.5,-402 360.5,-378 442.5,-378 442.5,-402"/>
+<text text-anchor="middle" x="401.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge45" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.45,-1235.22C342.42,-1238.36 331.43,-1243.28 323,-1251 280.38,-1289.99 266.97,-1360.86 262.82,-1396.81"/>
-<polygon fill="#000000" stroke="#000000" points="259.33,-1396.47 261.8,-1406.78 266.3,-1397.18 259.33,-1396.47"/>
+<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge13" class="edge">
+<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M360.47,-384.5C347.71,-381.4 334.05,-376.55 323,-369 284.7,-342.81 292.85,-251.25 261,-285"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge56" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M360.25,-391.6C346.37,-394.28 332.06,-399.86 323,-411 255.99,-493.43 259.57,-1293.56 260.78,-1438.53"/>
+<polygon fill="#000000" stroke="#000000" points="257.28,-1438.88 260.87,-1448.84 264.28,-1438.81 257.28,-1438.88"/>
+</g>
+<!-- module~s_symba_util -->
 <g id="module~~helio_classes~~UsedByGraph_node45" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-2670 357.5,-2670 357.5,-2646 445.5,-2646 445.5,-2670"/>
-<text text-anchor="middle" x="401.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439,-360 364,-360 364,-336 439,-336 439,-360"/>
+<text text-anchor="middle" x="401.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge46" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.36,-2655.85C344.4,-2652.98 331.4,-2647.42 323,-2637 283.99,-2588.61 264.37,-1603.83 261.4,-1441.55"/>
-<polygon fill="#000000" stroke="#000000" points="264.9,-1441.24 261.21,-1431.31 257.9,-1441.37 264.9,-1441.24"/>
-</g>
-<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge84" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M362.85,-2670.03C331.91,-2677.38 288.79,-2681.4 261,-2658"/>
+<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge14" class="edge">
+<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M363.75,-340.68C350.56,-337.38 335.8,-332.87 323,-327 292.75,-313.12 283.84,-260.79 261,-285"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge57" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.86,-348.95C348.9,-351.34 332.83,-356.87 323,-369 288.06,-412.08 265.25,-1286.27 261.54,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="258.03,-1438.81 261.28,-1448.89 265.03,-1438.98 258.03,-1438.81"/>
+</g>
+<!-- module~s_util_copy -->
 <g id="module~~helio_classes~~UsedByGraph_node46" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node46"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="432.5,-1200 370.5,-1200 370.5,-1176 432.5,-1176 432.5,-1200"/>
-<text text-anchor="middle" x="401.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="434.5,-1326 368.5,-1326 368.5,-1302 434.5,-1302 434.5,-1326"/>
+<text text-anchor="middle" x="401.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge47" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.18,-1189.3C354.23,-1191.53 335.46,-1196.82 323,-1209 270.48,-1260.35 261.92,-1353.83 260.88,-1396.58"/>
-<polygon fill="#000000" stroke="#000000" points="257.38,-1396.72 260.76,-1406.76 264.38,-1396.8 257.38,-1396.72"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge58" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.29,-1316.61C353.15,-1319.26 335.7,-1324.54 323,-1335 290.13,-1362.08 273.25,-1410.87 265.84,-1439.13"/>
+<polygon fill="#000000" stroke="#000000" points="262.44,-1438.33 263.45,-1448.87 269.24,-1439.99 262.44,-1438.33"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_discard -->
 <g id="module~~helio_classes~~UsedByGraph_node47" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="446,-1158 357,-1158 357,-1134 446,-1134 446,-1158"/>
-<text text-anchor="middle" x="401.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~s_discard</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="430.5,-1284 372.5,-1284 372.5,-1260 430.5,-1260 430.5,-1284"/>
+<text text-anchor="middle" x="401.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge48" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M356.87,-1149.52C344.49,-1152.53 331.96,-1157.83 323,-1167 290.75,-1200.02 270.41,-1341.6 263.57,-1396.82"/>
-<polygon fill="#000000" stroke="#000000" points="260.07,-1396.59 262.35,-1406.94 267.02,-1397.43 260.07,-1396.59"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge59" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.38,-1273.36C356.15,-1275.54 336.37,-1280.77 323,-1293 280.38,-1331.99 266.97,-1402.86 262.82,-1438.81"/>
+<polygon fill="#000000" stroke="#000000" points="259.33,-1438.47 261.8,-1448.78 266.3,-1439.18 259.33,-1438.47"/>
 </g>
 <!-- module~s_util_sort -->
 <g id="module~~helio_classes~~UsedByGraph_node48" class="node">
 <title>module~s_util_sort</title>
 <g id="a_module~~helio_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-1116 371,-1116 371,-1092 432,-1092 432,-1116"/>
-<text text-anchor="middle" x="401.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-1242 371,-1242 371,-1218 432,-1218 432,-1242"/>
+<text text-anchor="middle" x="401.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge74" class="edge">
+<g id="module~~helio_classes~~UsedByGraph_edge60" class="edge">
 <title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.94,-1104.77C354.63,-1106.78 335.25,-1112.03 323,-1125 285.65,-1164.53 268.01,-1334.72 262.75,-1396.49"/>
-<polygon fill="#000000" stroke="#000000" points="259.24,-1396.46 261.91,-1406.71 266.22,-1397.03 259.24,-1396.46"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.94,-1231.19C354.83,-1233.36 335.66,-1238.62 323,-1251 270.48,-1302.35 261.92,-1395.83 260.88,-1438.58"/>
+<polygon fill="#000000" stroke="#000000" points="257.38,-1438.72 260.76,-1448.76 264.38,-1438.8 257.38,-1438.72"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_whm_setup -->
 <g id="module~~helio_classes~~UsedByGraph_node49" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node49"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="442,-1074 361,-1074 361,-1050 442,-1050 442,-1074"/>
-<text text-anchor="middle" x="401.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-1200 362,-1200 362,-1176 441,-1176 441,-1200"/>
+<text text-anchor="middle" x="401.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge49" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M360.97,-1064.22C347.17,-1066.98 332.73,-1072.44 323,-1083 280.45,-1129.19 265.87,-1328.85 262.1,-1396.49"/>
-<polygon fill="#000000" stroke="#000000" points="258.59,-1396.68 261.55,-1406.85 265.58,-1397.05 258.59,-1396.68"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge61" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.69,-1190.45C347.82,-1193.22 333.13,-1198.63 323,-1209 290.75,-1242.02 270.41,-1383.6 263.57,-1438.82"/>
+<polygon fill="#000000" stroke="#000000" points="260.07,-1438.59 262.35,-1448.94 267.02,-1439.43 260.07,-1438.59"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_resize -->
 <g id="module~~helio_classes~~UsedByGraph_node50" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-1032 374.5,-1032 374.5,-1008 428.5,-1008 428.5,-1032"/>
-<text text-anchor="middle" x="401.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-1158 365.5,-1158 365.5,-1134 437.5,-1134 437.5,-1158"/>
+<text text-anchor="middle" x="401.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge50" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.5,-1020.17C357.4,-1021.73 335.89,-1026.72 323,-1041 275.2,-1093.95 263.97,-1323.59 261.59,-1396.62"/>
-<polygon fill="#000000" stroke="#000000" points="258.08,-1396.84 261.28,-1406.94 265.08,-1397.05 258.08,-1396.84"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge62" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.49,-1147.55C350.48,-1150.02 333.91,-1155.45 323,-1167 285.65,-1206.53 268.01,-1376.72 262.75,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="259.24,-1438.46 261.91,-1448.71 266.22,-1439.03 259.24,-1438.46"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~orbel -->
 <g id="module~~helio_classes~~UsedByGraph_node51" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="457.5,-990 345.5,-990 345.5,-966 457.5,-966 457.5,-990"/>
-<text text-anchor="middle" x="401.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~orbel</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node51"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="428.5,-1116 374.5,-1116 374.5,-1092 428.5,-1092 428.5,-1116"/>
+<text text-anchor="middle" x="401.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge51" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M345.11,-984.46C336.73,-987.68 328.93,-992.33 323,-999 269.93,-1058.74 262.28,-1318.6 261.18,-1396.71"/>
-<polygon fill="#000000" stroke="#000000" points="257.68,-1396.83 261.06,-1406.87 264.68,-1396.91 257.68,-1396.83"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge64" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.22,-1104.29C357.22,-1105.93 335.94,-1110.95 323,-1125 280.45,-1171.19 265.87,-1370.85 262.1,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="258.59,-1438.68 261.55,-1448.85 265.58,-1439.05 258.59,-1438.68"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~s_whm_util -->
 <g id="module~~helio_classes~~UsedByGraph_node52" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="440.5,-948 362.5,-948 362.5,-924 440.5,-924 440.5,-948"/>
-<text text-anchor="middle" x="401.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="434.5,-1074 368.5,-1074 368.5,-1050 434.5,-1050 434.5,-1074"/>
+<text text-anchor="middle" x="401.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge52" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.29,-937.66C347.99,-940.28 332.83,-945.78 323,-957 264.6,-1023.61 260.74,-1314.2 260.85,-1396.94"/>
-<polygon fill="#000000" stroke="#000000" points="257.35,-1397 260.89,-1406.99 264.35,-1396.98 257.35,-1397"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge65" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.4,-1062.86C352.53,-1065.02 334.4,-1070.38 323,-1083 275.2,-1135.95 263.97,-1365.59 261.59,-1438.62"/>
+<polygon fill="#000000" stroke="#000000" points="258.08,-1438.84 261.28,-1448.94 265.08,-1439.05 258.08,-1438.84"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~helio_classes~~UsedByGraph_node53" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="480,-906 323,-906 323,-882 480,-882 480,-906"/>
-<text text-anchor="middle" x="401.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-1032 362,-1032 362,-1008 441,-1008 441,-1032"/>
+<text text-anchor="middle" x="401.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge53" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.39,-906.13C329.54,-908.6 326.01,-911.52 323,-915 259.37,-988.38 259.34,-1308.82 260.57,-1396.66"/>
-<polygon fill="#000000" stroke="#000000" points="257.07,-1396.89 260.73,-1406.83 264.07,-1396.78 257.07,-1396.89"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge66" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.97,-1021.8C347.79,-1024.45 332.81,-1029.95 323,-1041 269.93,-1100.74 262.28,-1360.6 261.18,-1438.71"/>
+<polygon fill="#000000" stroke="#000000" points="257.68,-1438.83 261.06,-1448.87 264.68,-1438.91 257.68,-1438.83"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~s_util_spill -->
 <g id="module~~helio_classes~~UsedByGraph_node54" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-864 374.5,-864 374.5,-840 428.5,-840 428.5,-864"/>
-<text text-anchor="middle" x="401.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-990 371,-990 371,-966 432,-966 432,-990"/>
+<text text-anchor="middle" x="401.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge54" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.27,-851.97C357.08,-853.44 335.53,-858.41 323,-873 288.32,-913.38 266.99,-1298.27 262.09,-1396.35"/>
-<polygon fill="#000000" stroke="#000000" points="258.58,-1396.45 261.58,-1406.61 265.57,-1396.79 258.58,-1396.45"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge67" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.96,-978.39C354.44,-980.25 334.85,-985.48 323,-999 264.6,-1065.61 260.74,-1356.2 260.85,-1438.94"/>
+<polygon fill="#000000" stroke="#000000" points="257.35,-1439 260.89,-1448.99 264.35,-1438.98 257.35,-1439"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~helio_classes~~UsedByGraph_node55" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-822 362,-822 362,-798 441,-798 441,-822"/>
-<text text-anchor="middle" x="401.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="457.5,-948 345.5,-948 345.5,-924 457.5,-924 457.5,-948"/>
+<text text-anchor="middle" x="401.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge55" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.73,-811.6C347.52,-814.22 332.58,-819.75 323,-831 285.58,-874.92 266.07,-1295.2 261.87,-1396.91"/>
-<polygon fill="#000000" stroke="#000000" points="258.37,-1396.84 261.46,-1406.97 265.36,-1397.12 258.37,-1396.84"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge68" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M345.36,-942.19C336.85,-945.43 328.94,-950.15 323,-957 259.37,-1030.38 259.34,-1350.82 260.57,-1438.66"/>
+<polygon fill="#000000" stroke="#000000" points="257.07,-1438.89 260.73,-1448.83 264.07,-1438.78 257.07,-1438.89"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~helio_classes~~UsedByGraph_node56" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="436,-780 367,-780 367,-756 436,-756 436,-780"/>
-<text text-anchor="middle" x="401.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="457.5,-906 345.5,-906 345.5,-882 457.5,-882 457.5,-906"/>
+<text text-anchor="middle" x="401.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge56" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.87,-768.72C351.21,-770.91 333.71,-776.34 323,-789 282.94,-836.36 265.32,-1290.2 261.71,-1396.71"/>
-<polygon fill="#000000" stroke="#000000" points="258.21,-1396.82 261.37,-1406.93 265.2,-1397.05 258.21,-1396.82"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge69" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M345.31,-900.15C336.81,-903.39 328.9,-908.13 323,-915 288.32,-955.38 266.99,-1340.27 262.09,-1438.35"/>
+<polygon fill="#000000" stroke="#000000" points="258.58,-1438.45 261.58,-1448.61 265.57,-1438.79 258.58,-1438.45"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_symba_discard -->
 <g id="module~~helio_classes~~UsedByGraph_node57" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="434,-738 369,-738 369,-714 434,-714 434,-738"/>
-<text text-anchor="middle" x="401.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="449.5,-318 353.5,-318 353.5,-294 449.5,-294 449.5,-318"/>
+<text text-anchor="middle" x="401.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge57" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.81,-726.44C352.65,-728.43 334.12,-733.77 323,-747 280.26,-797.83 264.59,-1285.73 261.57,-1396.64"/>
-<polygon fill="#000000" stroke="#000000" points="258.06,-1396.88 261.3,-1406.97 265.06,-1397.06 258.06,-1396.88"/>
+<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge9" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M353.3,-295.07C315.37,-286.9 267.39,-278.23 261,-285"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge71" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.34,-309.15C341.76,-312.25 330.54,-317.68 323,-327 286.7,-371.86 264.94,-1283.27 261.48,-1438.59"/>
+<polygon fill="#000000" stroke="#000000" points="257.98,-1438.73 261.26,-1448.8 264.98,-1438.88 257.98,-1438.73"/>
+</g>
+<!-- module~s_symba_drift -->
 <g id="module~~helio_classes~~UsedByGraph_node58" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-696 366.5,-696 366.5,-672 436.5,-672 436.5,-696"/>
-<text text-anchor="middle" x="401.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-276 362,-276 362,-252 441,-252 441,-276"/>
+<text text-anchor="middle" x="401.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge59" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.42,-684.73C350.84,-686.93 333.55,-692.38 323,-705 277.57,-759.33 263.91,-1281.73 261.44,-1396.7"/>
-<polygon fill="#000000" stroke="#000000" points="257.94,-1396.72 261.23,-1406.79 264.94,-1396.87 257.94,-1396.72"/>
+<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge10" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M361.84,-258.1C330.07,-255.65 286.3,-258.19 261,-285"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge72" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.82,-265.27C347.45,-267.82 332.37,-273.4 323,-285 285.32,-331.64 264.63,-1280.56 261.44,-1438.74"/>
+<polygon fill="#000000" stroke="#000000" points="257.94,-1438.67 261.24,-1448.74 264.94,-1438.81 257.94,-1438.67"/>
+</g>
+<!-- module~s_whm_kick -->
 <g id="module~~helio_classes~~UsedByGraph_node59" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="430.5,-654 372.5,-654 372.5,-630 430.5,-630 430.5,-654"/>
-<text text-anchor="middle" x="401.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_whm_kick</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-864 366.5,-864 366.5,-840 436.5,-840 436.5,-864"/>
+<text text-anchor="middle" x="401.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge60" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.23,-642.02C355.31,-643.64 334.86,-648.75 323,-663 274.86,-720.86 263.25,-1278.34 261.32,-1396.9"/>
-<polygon fill="#000000" stroke="#000000" points="257.82,-1396.92 261.17,-1406.97 264.82,-1397.03 257.82,-1396.92"/>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge70" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.12,-852.87C350.67,-855.13 333.58,-860.58 323,-873 285.58,-916.92 266.07,-1337.2 261.87,-1438.91"/>
+<polygon fill="#000000" stroke="#000000" points="258.37,-1438.84 261.46,-1448.97 265.36,-1439.12 258.37,-1438.84"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~whm_drift -->
 <g id="module~~helio_classes~~UsedByGraph_node60" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-612 371,-612 371,-588 432,-588 432,-612"/>
-<text text-anchor="middle" x="401.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~whm_drift</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node60"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="431,-822 372,-822 372,-798 431,-798 431,-822"/>
+<text text-anchor="middle" x="401.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge61" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.67,-600.15C354.06,-601.93 334.47,-607.15 323,-621 272.17,-682.35 262.65,-1274.23 261.22,-1396.84"/>
-<polygon fill="#000000" stroke="#000000" points="257.72,-1396.88 261.11,-1406.92 264.72,-1396.96 257.72,-1396.88"/>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge73" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.93,-810.12C355.12,-811.81 334.88,-816.95 323,-831 282.94,-878.36 265.32,-1332.2 261.71,-1438.71"/>
+<polygon fill="#000000" stroke="#000000" points="258.21,-1438.82 261.37,-1448.93 265.2,-1439.05 258.21,-1438.82"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_symba_kick -->
 <g id="module~~helio_classes~~UsedByGraph_node61" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="457.5,-570 345.5,-570 345.5,-546 457.5,-546 457.5,-570"/>
-<text text-anchor="middle" x="401.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-234 362,-234 362,-210 441,-210 441,-234"/>
+<text text-anchor="middle" x="401.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge62" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M345.47,-563.81C336.84,-567.07 328.86,-571.9 323,-579 269.47,-643.87 262.08,-1270.52 261.13,-1396.87"/>
-<polygon fill="#000000" stroke="#000000" points="257.63,-1396.89 261.06,-1406.91 264.63,-1396.93 257.63,-1396.89"/>
+<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge12" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M361.78,-229.82C349.1,-233.07 335.16,-237.42 323,-243 292.75,-256.88 283.84,-260.79 261,-285"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge78" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.81,-223.26C347.44,-225.81 332.36,-231.39 323,-243 283.99,-291.39 264.37,-1276.17 261.4,-1438.45"/>
+<polygon fill="#000000" stroke="#000000" points="257.9,-1438.63 261.21,-1448.69 264.9,-1438.76 257.9,-1438.63"/>
+</g>
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~helio_classes~~UsedByGraph_node62" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-528 371,-528 371,-504 432,-504 432,-528"/>
-<text text-anchor="middle" x="401.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="458.5,-780 344.5,-780 344.5,-756 458.5,-756 458.5,-780"/>
+<text text-anchor="middle" x="401.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge66" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.64,-516.12C354.01,-517.89 334.42,-523.11 323,-537 266.81,-605.34 261.54,-1265.89 261.05,-1396.59"/>
-<polygon fill="#000000" stroke="#000000" points="257.55,-1396.94 261.02,-1406.95 264.55,-1396.96 257.55,-1396.94"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge74" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M344.41,-774.35C336.22,-777.59 328.65,-782.28 323,-789 280.26,-839.83 264.59,-1327.73 261.57,-1438.64"/>
+<polygon fill="#000000" stroke="#000000" points="258.06,-1438.88 261.3,-1448.97 265.06,-1439.06 258.06,-1438.88"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_util_fill -->
 <g id="module~~helio_classes~~UsedByGraph_node63" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-486 366.5,-486 366.5,-462 436.5,-462 436.5,-486"/>
-<text text-anchor="middle" x="401.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-738 374.5,-738 374.5,-714 428.5,-714 428.5,-738"/>
+<text text-anchor="middle" x="401.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge67" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.31,-474.64C350.71,-476.82 333.43,-482.28 323,-495 264.14,-566.82 261.02,-1261.47 260.97,-1396.37"/>
-<polygon fill="#000000" stroke="#000000" points="257.47,-1396.71 260.98,-1406.71 264.47,-1396.71 257.47,-1396.71"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge75" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.15,-725.87C356.9,-727.29 335.34,-732.24 323,-747 277.57,-801.33 263.91,-1323.73 261.44,-1438.7"/>
+<polygon fill="#000000" stroke="#000000" points="257.94,-1438.72 261.23,-1448.79 264.94,-1438.87 257.94,-1438.72"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_io -->
 <g id="module~~helio_classes~~UsedByGraph_node64" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="434.5,-444 368.5,-444 368.5,-420 434.5,-420 434.5,-444"/>
-<text text-anchor="middle" x="401.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_io</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-696 374.5,-696 374.5,-672 428.5,-672 428.5,-696"/>
+<text text-anchor="middle" x="401.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge68" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.27,-432.36C352.16,-434.36 333.85,-439.72 323,-453 261.39,-528.39 260.52,-1258.85 260.9,-1396.64"/>
-<polygon fill="#000000" stroke="#000000" points="257.41,-1396.84 260.94,-1406.83 264.41,-1396.82 257.41,-1396.84"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge76" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.5,-683.82C357.18,-685.19 335.39,-690.11 323,-705 274.86,-762.86 263.25,-1320.34 261.32,-1438.9"/>
+<polygon fill="#000000" stroke="#000000" points="257.82,-1438.92 261.17,-1448.97 264.82,-1439.03 257.82,-1438.92"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_fraggle_util -->
 <g id="module~~helio_classes~~UsedByGraph_node65" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-402 374.5,-402 374.5,-378 428.5,-378 428.5,-402"/>
-<text text-anchor="middle" x="401.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-654 363.5,-654 363.5,-630 439.5,-630 439.5,-654"/>
+<text text-anchor="middle" x="401.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge69" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.4,-389.74C357.04,-391.08 335.24,-395.98 323,-411 258.69,-489.9 260.04,-1255.1 260.84,-1396.57"/>
-<polygon fill="#000000" stroke="#000000" points="257.34,-1397.01 260.91,-1406.99 264.34,-1396.97 257.34,-1397.01"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge79" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.18,-643.18C348.47,-645.65 332.78,-651.19 323,-663 272.17,-724.35 262.65,-1316.23 261.22,-1438.84"/>
+<polygon fill="#000000" stroke="#000000" points="257.72,-1438.88 261.11,-1448.92 264.72,-1438.96 257.72,-1438.88"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_util_solve -->
 <g id="module~~helio_classes~~UsedByGraph_node66" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="458.5,-360 344.5,-360 344.5,-336 458.5,-336 458.5,-360"/>
-<text text-anchor="middle" x="401.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="435.5,-612 367.5,-612 367.5,-588 435.5,-588 435.5,-612"/>
+<text text-anchor="middle" x="401.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge70" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M344.22,-354.19C336.05,-357.45 328.54,-362.19 323,-369 255.99,-451.43 259.57,-1251.56 260.78,-1396.53"/>
-<polygon fill="#000000" stroke="#000000" points="257.28,-1396.88 260.87,-1406.84 264.28,-1396.81 257.28,-1396.88"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge80" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.14,-600.56C351.34,-602.68 333.65,-608.1 323,-621 269.47,-685.87 262.08,-1312.52 261.13,-1438.87"/>
+<polygon fill="#000000" stroke="#000000" points="257.63,-1438.89 261.06,-1448.91 264.63,-1438.93 257.63,-1438.89"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_whm_step -->
 <g id="module~~helio_classes~~UsedByGraph_node67" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-2628 366.5,-2628 366.5,-2604 436.5,-2604 436.5,-2628"/>
-<text text-anchor="middle" x="401.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-570 365,-570 365,-546 438,-546 438,-570"/>
+<text text-anchor="middle" x="401.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge71" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.23,-2615.43C350.61,-2613.26 333.34,-2607.8 323,-2595 285.32,-2548.36 264.63,-1599.44 261.44,-1441.26"/>
-<polygon fill="#000000" stroke="#000000" points="264.94,-1441.19 261.24,-1431.26 257.94,-1441.33 264.94,-1441.19"/>
-</g>
-<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
-<g id="module~~helio_classes~~UsedByGraph_edge80" class="edge">
-<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M366.42,-2624.75C352.85,-2628.36 337.14,-2632.7 323,-2637 295.17,-2645.48 283.26,-2676.74 261,-2658"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge82" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.73,-558.89C349.57,-561.22 333.09,-566.73 323,-579 266.81,-647.34 261.54,-1307.89 261.05,-1438.59"/>
+<polygon fill="#000000" stroke="#000000" points="257.55,-1438.94 261.02,-1448.95 264.55,-1438.96 257.55,-1438.94"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_symba_setup -->
 <g id="module~~helio_classes~~UsedByGraph_node68" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="449.5,-318 353.5,-318 353.5,-294 449.5,-294 449.5,-318"/>
-<text text-anchor="middle" x="401.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="445.5,-192 357.5,-192 357.5,-168 445.5,-168 445.5,-192"/>
+<text text-anchor="middle" x="401.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge72" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.35,-309.16C341.78,-312.26 330.55,-317.69 323,-327 288.06,-370.08 265.25,-1244.27 261.54,-1396.49"/>
-<polygon fill="#000000" stroke="#000000" points="258.03,-1396.81 261.28,-1406.89 265.03,-1396.98 258.03,-1396.81"/>
+<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge16" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M357.26,-186.32C345.45,-189.43 333.13,-194.08 323,-201 284.7,-227.19 292.85,-251.25 261,-285"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge53" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.35,-182.14C344.39,-185.02 331.39,-190.57 323,-201 282.64,-251.14 264.12,-1271.92 261.37,-1438.2"/>
+<polygon fill="#000000" stroke="#000000" points="257.86,-1438.61 261.19,-1448.67 264.86,-1438.72 257.86,-1438.61"/>
+</g>
+<!-- module~s_fraggle_generate -->
 <g id="module~~helio_classes~~UsedByGraph_node69" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-276 374.5,-276 374.5,-252 428.5,-252 428.5,-276"/>
-<text text-anchor="middle" x="401.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="454.5,-528 348.5,-528 348.5,-504 454.5,-504 454.5,-528"/>
+<text text-anchor="middle" x="401.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge73" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.37,-263.71C356.99,-265.04 335.19,-269.94 323,-285 286.7,-329.86 264.94,-1241.27 261.48,-1396.59"/>
-<polygon fill="#000000" stroke="#000000" points="257.98,-1396.73 261.26,-1406.8 264.98,-1396.88 257.98,-1396.73"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge84" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M348.2,-520.79C338.52,-524.04 329.45,-529.13 323,-537 264.14,-608.82 261.02,-1303.47 260.97,-1438.37"/>
+<polygon fill="#000000" stroke="#000000" points="257.47,-1438.71 260.98,-1448.71 264.47,-1438.71 257.47,-1438.71"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_symba_io -->
 <g id="module~~helio_classes~~UsedByGraph_node70" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="440,-234 363,-234 363,-210 440,-210 440,-234"/>
-<text text-anchor="middle" x="401.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-150 366.5,-150 366.5,-126 436.5,-126 436.5,-150"/>
+<text text-anchor="middle" x="401.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge64" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.63,-223.13C348.01,-225.62 332.55,-231.18 323,-243 285.32,-289.64 264.63,-1238.56 261.44,-1396.74"/>
-<polygon fill="#000000" stroke="#000000" points="257.94,-1396.67 261.24,-1406.74 264.94,-1396.81 257.94,-1396.67"/>
+<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
+<g id="module~~helio_classes~~UsedByGraph_edge17" class="edge">
+<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M366.35,-140.96C351.68,-143.72 335.16,-148.98 323,-159 274.83,-198.68 303.84,-239.61 261,-285"/>
+<path fill="none" stroke="#000000" d="M259,-285C176.66,-372.25 158.36,-1283.64 155.83,-1438.65"/>
+<polygon fill="#000000" stroke="#000000" points="152.33,-1438.79 155.67,-1448.84 159.33,-1438.9 152.33,-1438.79"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge85" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.2,-138.55C350.57,-140.71 333.3,-146.18 323,-159 281.26,-210.95 263.84,-1269.92 261.32,-1438.48"/>
+<polygon fill="#000000" stroke="#000000" points="257.82,-1438.61 261.17,-1448.66 264.82,-1438.71 257.82,-1438.61"/>
+</g>
+<!-- module~s_kick -->
 <g id="module~~helio_classes~~UsedByGraph_node71" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="440.5,-192 362.5,-192 362.5,-168 440.5,-168 440.5,-192"/>
-<text text-anchor="middle" x="401.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~s_kick</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="428.5,-486 374.5,-486 374.5,-462 428.5,-462 428.5,-486"/>
+<text text-anchor="middle" x="401.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge75" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.22,-181.19C347.72,-183.71 332.45,-189.28 323,-201 283.99,-249.39 264.37,-1234.17 261.4,-1396.45"/>
-<polygon fill="#000000" stroke="#000000" points="257.9,-1396.63 261.21,-1406.69 264.9,-1396.76 257.9,-1396.63"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge83" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M374.42,-473.75C357.06,-475.09 335.26,-480 323,-495 261.39,-570.39 260.52,-1300.85 260.9,-1438.64"/>
+<polygon fill="#000000" stroke="#000000" points="257.41,-1438.84 260.94,-1448.83 264.41,-1438.82 257.41,-1438.84"/>
 </g>
-<!-- module~s_fraggle_util -->
+<!-- module~drift_implementation -->
 <g id="module~~helio_classes~~UsedByGraph_node72" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~helio_classes~~UsedByGraph_node72"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439.5,-2460 363.5,-2460 363.5,-2436 439.5,-2436 439.5,-2460"/>
-<text text-anchor="middle" x="401.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~helio_classes~~UsedByGraph_node72"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="456,-444 347,-444 347,-420 456,-420 456,-444"/>
+<text text-anchor="middle" x="401.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
-<g id="module~~helio_classes~~UsedByGraph_edge76" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.48,-2446.96C348.64,-2444.54 332.78,-2438.99 323,-2427 258.69,-2348.1 260.04,-1582.9 260.84,-1441.43"/>
-<polygon fill="#000000" stroke="#000000" points="264.34,-1441.03 260.91,-1431.01 257.34,-1440.99 264.34,-1441.03"/>
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
+<g id="module~~helio_classes~~UsedByGraph_edge86" class="edge">
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346.98,-437.17C337.75,-440.44 329.16,-445.44 323,-453 258.69,-531.9 260.04,-1297.1 260.84,-1438.57"/>
+<polygon fill="#000000" stroke="#000000" points="257.34,-1439.01 260.91,-1448.99 264.34,-1438.97 257.34,-1439.01"/>
 </g>
 </g>
 </svg>
@@ -2374,7 +2376,7 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine helio_gr_kick_getacch_pl(self, param)
+public pure module subroutine helio_gr_kick_getacch_pl(self, param)
     
     
    
@@ -2451,7 +2453,7 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine helio_gr_kick_getacch_tp(self, param)
+public pure module subroutine helio_gr_kick_getacch_tp(self, param)
     
     
    
diff --git a/docs/module/lambda_function.html b/docs/module/lambda_function.html
index 280c9769b..bddd4329a 100644
--- a/docs/module/lambda_function.html
+++ b/docs/module/lambda_function.html
@@ -571,619 +571,619 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M126.95,-1440C119.16,-1440 110.32,-1440 101.41,-1440"/>
 <polygon fill="#000000" stroke="#000000" points="101.38,-1436.5 91.38,-1440 101.38,-1443.5 101.38,-1436.5"/>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~lambda_function~~UsedByGraph_node3" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node3"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-2880 256,-2880 256,-2856 335,-2856 335,-2880"/>
-<text text-anchor="middle" x="295.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node3"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="354.5,-2880 236.5,-2880 236.5,-2856 354.5,-2856 354.5,-2880"/>
+<text text-anchor="middle" x="295.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge2" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.77,-2866.77C241.39,-2864.22 226.32,-2858.64 217,-2847 171.81,-2790.56 157.2,-1637.04 155.24,-1462.14"/>
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M236.2,-2861.07C228.79,-2857.84 222.05,-2853.31 217,-2847 171.81,-2790.56 157.2,-1637.04 155.24,-1462.14"/>
 <polygon fill="#000000" stroke="#000000" points="158.74,-1462.02 155.13,-1452.06 151.74,-1462.1 158.74,-1462.02"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_gr -->
 <g id="module~~lambda_function~~UsedByGraph_node4" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node4"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-2838 256,-2838 256,-2814 335,-2814 335,-2838"/>
-<text text-anchor="middle" x="295.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_gr</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node4"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-2838 268.5,-2838 268.5,-2814 322.5,-2814 322.5,-2838"/>
+<text text-anchor="middle" x="295.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge5" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.78,-2824.77C241.4,-2822.22 226.33,-2816.64 217,-2805 173.19,-2750.36 157.44,-1634.59 155.27,-1462.27"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge3" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.33,-2826.32C250.93,-2825.01 229.12,-2820.12 217,-2805 173.19,-2750.36 157.44,-1634.59 155.27,-1462.27"/>
 <polygon fill="#000000" stroke="#000000" points="158.77,-1462.06 155.14,-1452.1 151.77,-1462.15 158.77,-1462.06"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_util_valid -->
 <g id="module~~lambda_function~~UsedByGraph_node5" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node5"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-2796 265.5,-2796 265.5,-2772 325.5,-2772 325.5,-2796"/>
-<text text-anchor="middle" x="295.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node5"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="328,-2796 263,-2796 263,-2772 328,-2772 328,-2796"/>
+<text text-anchor="middle" x="295.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge3" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.29,-2784.05C248.46,-2782.4 228.43,-2777.24 217,-2763 174.56,-2710.14 157.7,-1631.92 155.3,-1462.36"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge4" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.96,-2783.8C246.64,-2781.91 227.91,-2776.59 217,-2763 174.56,-2710.14 157.7,-1631.92 155.3,-1462.36"/>
 <polygon fill="#000000" stroke="#000000" points="158.8,-1462.08 155.16,-1452.13 151.8,-1462.18 158.8,-1462.08"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_symba_collision -->
 <g id="module~~lambda_function~~UsedByGraph_node6" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node6"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="322.5,-2754 268.5,-2754 268.5,-2730 322.5,-2730 322.5,-2754"/>
-<text text-anchor="middle" x="295.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node6"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="345,-2754 246,-2754 246,-2730 345,-2730 345,-2754"/>
+<text text-anchor="middle" x="295.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge4" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.34,-2742.31C250.95,-2740.99 229.14,-2736.1 217,-2721 175.91,-2669.9 157.94,-1628 155.34,-1462.16"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge5" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.69,-2738.43C234.69,-2735.26 224.16,-2729.91 217,-2721 175.91,-2669.9 157.94,-1628 155.34,-1462.16"/>
 <polygon fill="#000000" stroke="#000000" points="158.84,-1462.08 155.18,-1452.14 151.84,-1462.19 158.84,-1462.08"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_obl -->
 <g id="module~~lambda_function~~UsedByGraph_node7" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node7"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-2712 262.5,-2712 262.5,-2688 328.5,-2688 328.5,-2712"/>
-<text text-anchor="middle" x="295.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_obl</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node7"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-2712 268.5,-2712 268.5,-2688 322.5,-2688 322.5,-2712"/>
+<text text-anchor="middle" x="295.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<!-- module~s_obl&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge6" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.19,-2699.7C246.07,-2697.72 227.76,-2692.35 217,-2679 177.29,-2629.71 158.23,-1625.94 155.38,-1462.43"/>
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.35,-2700.31C250.96,-2698.98 229.16,-2694.09 217,-2679 177.29,-2629.71 158.23,-1625.94 155.38,-1462.43"/>
 <polygon fill="#000000" stroke="#000000" points="158.87,-1462.07 155.2,-1452.13 151.87,-1462.19 158.87,-1462.07"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~lambda_function~~UsedByGraph_node8" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node8"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-2670 256,-2670 256,-2646 335,-2646 335,-2670"/>
-<text text-anchor="middle" x="295.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node8"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="340,-2670 251,-2670 251,-2646 340,-2646 340,-2670"/>
+<text text-anchor="middle" x="295.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge7" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.82,-2656.74C241.44,-2654.18 226.37,-2648.61 217,-2637 178.64,-2589.46 158.48,-1621.65 155.41,-1462.16"/>
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.96,-2655.76C238.13,-2652.85 225.32,-2647.31 217,-2637 178.64,-2589.46 158.48,-1621.65 155.41,-1462.16"/>
 <polygon fill="#000000" stroke="#000000" points="158.91,-1462.03 155.22,-1452.1 151.91,-1462.16 158.91,-1462.03"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_util_coord -->
 <g id="module~~lambda_function~~UsedByGraph_node9" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node9"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-2628 261.5,-2628 261.5,-2604 329.5,-2604 329.5,-2628"/>
-<text text-anchor="middle" x="295.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node9"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-2628 260.5,-2628 260.5,-2604 330.5,-2604 330.5,-2628"/>
+<text text-anchor="middle" x="295.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge8" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.42,-2615.58C245.5,-2613.53 227.6,-2608.12 217,-2595 180.01,-2549.25 158.78,-1619.09 155.46,-1462.33"/>
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.23,-2615.42C244.62,-2613.25 227.34,-2607.79 217,-2595 180.01,-2549.25 158.78,-1619.09 155.46,-1462.33"/>
 <polygon fill="#000000" stroke="#000000" points="158.95,-1461.97 155.24,-1452.05 151.96,-1462.12 158.95,-1461.97"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~lambda_function~~UsedByGraph_node10" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node10"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-2586 256,-2586 256,-2562 335,-2562 335,-2586"/>
-<text text-anchor="middle" x="295.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node10"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="367,-2586 224,-2586 224,-2562 367,-2562 367,-2586"/>
+<text text-anchor="middle" x="295.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge9" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.84,-2572.72C241.47,-2570.16 226.39,-2564.59 217,-2553 181.38,-2509.04 159.09,-1616.31 155.51,-1462.48"/>
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M226.78,-2561.86C223.13,-2559.39 219.81,-2556.47 217,-2553 181.38,-2509.04 159.09,-1616.31 155.51,-1462.48"/>
 <polygon fill="#000000" stroke="#000000" points="159.01,-1462.26 155.28,-1452.34 152.01,-1462.42 159.01,-1462.26"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_whm_coord -->
 <g id="module~~lambda_function~~UsedByGraph_node11" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node11"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-2544 268.5,-2544 268.5,-2520 322.5,-2520 322.5,-2544"/>
-<text text-anchor="middle" x="295.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_whm_coord</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node11"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-2544 256,-2544 256,-2520 335,-2520 335,-2544"/>
+<text text-anchor="middle" x="295.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge10" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.39,-2532.28C251.01,-2530.94 229.21,-2526.04 217,-2511 148.63,-2426.8 153.35,-1609.08 154.75,-1462.45"/>
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.85,-2530.71C241.48,-2528.15 226.4,-2522.58 217,-2511 148.63,-2426.8 153.35,-1609.08 154.75,-1462.45"/>
 <polygon fill="#000000" stroke="#000000" points="158.26,-1462.08 154.86,-1452.04 151.26,-1462.01 158.26,-1462.08"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_rescale -->
 <g id="module~~lambda_function~~UsedByGraph_node12" class="node">
-<title>module~s_io</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node12"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-2502 268.5,-2502 268.5,-2478 322.5,-2478 322.5,-2502"/>
-<text text-anchor="middle" x="295.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node12"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="334.5,-2502 256.5,-2502 256.5,-2478 334.5,-2478 334.5,-2502"/>
+<text text-anchor="middle" x="295.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge11" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.4,-2490.27C251.03,-2488.93 229.23,-2484.03 217,-2469 151.34,-2388.34 153.8,-1605.74 154.81,-1462.47"/>
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.27,-2488.77C241.78,-2486.24 226.5,-2480.68 217,-2469 151.34,-2388.34 153.8,-1605.74 154.81,-1462.47"/>
 <polygon fill="#000000" stroke="#000000" points="158.31,-1462.28 154.89,-1452.26 151.31,-1462.23 158.31,-1462.28"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~lambda_function~~UsedByGraph_node13" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node13"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-2460 259,-2460 259,-2436 332,-2436 332,-2460"/>
-<text text-anchor="middle" x="295.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node13"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="374,-2460 217,-2460 217,-2436 374,-2436 374,-2460"/>
+<text text-anchor="middle" x="295.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge12" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.69,-2447.15C243.52,-2444.82 227.05,-2439.31 217,-2427 154.05,-2349.86 154.27,-1602.06 154.87,-1462.4"/>
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M226.81,-2435.84C223.15,-2433.38 219.82,-2430.46 217,-2427 154.05,-2349.86 154.27,-1602.06 154.87,-1462.4"/>
 <polygon fill="#000000" stroke="#000000" points="158.37,-1462.11 154.92,-1452.09 151.37,-1462.08 158.37,-1462.11"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_rmvs_step -->
 <g id="module~~lambda_function~~UsedByGraph_node14" class="node">
-<title>module~orbel</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node14"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="322.5,-2418 268.5,-2418 268.5,-2394 322.5,-2394 322.5,-2418"/>
-<text text-anchor="middle" x="295.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_rmvs_step</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node14"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-2418 259,-2418 259,-2394 332,-2394 332,-2418"/>
+<text text-anchor="middle" x="295.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge13" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.42,-2406.25C251.07,-2404.9 229.27,-2400 217,-2385 156.74,-2311.36 154.76,-1598.18 154.94,-1462.3"/>
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.71,-2405.14C243.53,-2402.81 227.06,-2397.3 217,-2385 156.74,-2311.36 154.76,-1598.18 154.94,-1462.3"/>
 <polygon fill="#000000" stroke="#000000" points="158.44,-1462.24 154.96,-1452.24 151.44,-1462.23 158.44,-1462.24"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- module~s_util_index -->
 <g id="module~~lambda_function~~UsedByGraph_node15" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node15"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-2376 258,-2376 258,-2352 333,-2352 333,-2376"/>
-<text text-anchor="middle" x="295.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>module~s_util_index</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node15"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330,-2376 261,-2376 261,-2352 330,-2352 330,-2376"/>
+<text text-anchor="middle" x="295.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge14" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.93,-2363C242.98,-2360.6 226.91,-2355.07 217,-2343 159.42,-2272.85 155.27,-1593.96 155.01,-1462.12"/>
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.71,-2363.41C245.01,-2361.26 227.53,-2355.82 217,-2343 159.42,-2272.85 155.27,-1593.96 155.01,-1462.12"/>
 <polygon fill="#000000" stroke="#000000" points="158.51,-1462.01 155,-1452.01 151.51,-1462.02 158.51,-1462.01"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- proc~ge_wpp -->
 <g id="module~~lambda_function~~UsedByGraph_node16" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node16"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="345,-2334 246,-2334 246,-2310 345,-2310 345,-2334"/>
-<text text-anchor="middle" x="295.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node16"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="322.5,-2334 268.5,-2334 268.5,-2310 322.5,-2310 322.5,-2334"/>
+<text text-anchor="middle" x="295.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge15" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.83,-2318.31C234.83,-2315.15 224.27,-2309.82 217,-2301 162.14,-2234.4 155.81,-1590.83 155.09,-1462.28"/>
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.45,-2322.22C251.11,-2320.86 229.32,-2315.96 217,-2301 162.14,-2234.4 155.81,-1590.83 155.09,-1462.28"/>
 <polygon fill="#000000" stroke="#000000" points="158.59,-1462.06 155.04,-1452.08 151.59,-1462.09 158.59,-1462.06"/>
 </g>
-<!-- module~s_symba_encounter_check -->
+<!-- module~s_operator_cross -->
 <g id="module~~lambda_function~~UsedByGraph_node17" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node17"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="367,-2292 224,-2292 224,-2268 367,-2268 367,-2292"/>
-<text text-anchor="middle" x="295.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>module~s_operator_cross</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node17"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="343.5,-2292 247.5,-2292 247.5,-2268 343.5,-2268 343.5,-2292"/>
+<text text-anchor="middle" x="295.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge16" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M226.86,-2267.8C223.19,-2265.34 219.84,-2262.44 217,-2259 164.85,-2195.92 156.37,-1587.29 155.18,-1462.35"/>
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.47,-2276.74C235.89,-2273.64 224.64,-2268.24 217,-2259 164.85,-2195.92 156.37,-1587.29 155.18,-1462.35"/>
 <polygon fill="#000000" stroke="#000000" points="158.68,-1462.06 155.09,-1452.09 151.68,-1462.12 158.68,-1462.06"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_fraggle_set -->
 <g id="module~~lambda_function~~UsedByGraph_node18" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node18"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-2250 260.5,-2250 260.5,-2226 330.5,-2226 330.5,-2250"/>
-<text text-anchor="middle" x="295.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node18"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="334,-2250 257,-2250 257,-2226 334,-2226 334,-2250"/>
+<text text-anchor="middle" x="295.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge17" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.38,-2237.31C244.79,-2235.11 227.51,-2229.66 217,-2217 167.54,-2157.43 156.96,-1583.35 155.27,-1462.33"/>
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.79,-2236.74C242.2,-2234.23 226.71,-2228.69 217,-2217 167.54,-2157.43 156.96,-1583.35 155.27,-1462.33"/>
 <polygon fill="#000000" stroke="#000000" points="158.77,-1462.01 155.14,-1452.06 151.77,-1462.11 158.77,-1462.01"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_fraggle_io -->
 <g id="module~~lambda_function~~UsedByGraph_node19" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node19"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336.5,-2208 254.5,-2208 254.5,-2184 336.5,-2184 336.5,-2208"/>
-<text text-anchor="middle" x="295.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node19"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331,-2208 260,-2208 260,-2184 331,-2184 331,-2208"/>
+<text text-anchor="middle" x="295.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge18" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.4,-2194.28C240.54,-2191.58 226.2,-2186.03 217,-2175 170.27,-2118.97 157.6,-1580.15 155.39,-1462.58"/>
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.61,-2195.17C244.24,-2192.89 227.36,-2187.42 217,-2175 170.27,-2118.97 157.6,-1580.15 155.39,-1462.58"/>
 <polygon fill="#000000" stroke="#000000" points="158.88,-1462.21 155.2,-1452.27 151.88,-1462.33 158.88,-1462.21"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~lambda_function~~UsedByGraph_node20" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node20"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-2166 259,-2166 259,-2142 332,-2142 332,-2166"/>
-<text text-anchor="middle" x="295.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node20"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331,-2166 260,-2166 260,-2142 331,-2142 331,-2166"/>
+<text text-anchor="middle" x="295.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge19" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.84,-2153.03C243.69,-2150.67 227.21,-2145.18 217,-2133 172.92,-2080.42 158.25,-1575.34 155.5,-1462.35"/>
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.64,-2153.15C244.28,-2150.87 227.39,-2145.39 217,-2133 172.92,-2080.42 158.25,-1575.34 155.5,-1462.35"/>
 <polygon fill="#000000" stroke="#000000" points="159,-1462.04 155.26,-1452.13 152,-1462.21 159,-1462.04"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- module~s_util_set -->
 <g id="module~~lambda_function~~UsedByGraph_node21" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node21"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326.5,-2124 264.5,-2124 264.5,-2100 326.5,-2100 326.5,-2124"/>
-<text text-anchor="middle" x="295.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>module~s_util_set</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node21"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-2124 266.5,-2124 266.5,-2100 324.5,-2100 324.5,-2124"/>
+<text text-anchor="middle" x="295.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge20" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.38,-2111.73C247.88,-2109.89 228.5,-2104.64 217,-2091 175.6,-2041.91 158.95,-1571.13 155.64,-1462.35"/>
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.3,-2111.93C249.4,-2110.29 228.95,-2105.17 217,-2091 175.6,-2041.91 158.95,-1571.13 155.64,-1462.35"/>
 <polygon fill="#000000" stroke="#000000" points="159.13,-1462.09 155.34,-1452.2 152.14,-1462.3 159.13,-1462.09"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_rmvs_io -->
 <g id="module~~lambda_function~~UsedByGraph_node22" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node22"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="343.5,-2082 247.5,-2082 247.5,-2058 343.5,-2058 343.5,-2082"/>
-<text text-anchor="middle" x="295.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node22"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-2082 265,-2082 265,-2058 326,-2058 326,-2082"/>
+<text text-anchor="middle" x="295.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge21" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.22,-2066.5C235.79,-2063.38 224.67,-2058.03 217,-2049 178.26,-2003.37 159.69,-1566.4 155.79,-1462.22"/>
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.8,-2069.75C248.23,-2067.93 228.64,-2062.71 217,-2049 178.26,-2003.37 159.69,-1566.4 155.79,-1462.22"/>
 <polygon fill="#000000" stroke="#000000" points="159.29,-1462.06 155.42,-1452.19 152.29,-1462.31 159.29,-1462.06"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_util_version -->
 <g id="module~~lambda_function~~UsedByGraph_node23" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node23"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="339.5,-2040 251.5,-2040 251.5,-2016 339.5,-2016 339.5,-2040"/>
-<text text-anchor="middle" x="295.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<title>module~s_util_version</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node23"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="334.5,-2040 256.5,-2040 256.5,-2016 334.5,-2016 334.5,-2040"/>
+<text text-anchor="middle" x="295.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge22" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.31,-2025.47C238.5,-2022.55 225.61,-2017.06 217,-2007 180.94,-1964.84 160.5,-1561.95 155.97,-1462.24"/>
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.15,-2026.46C241.82,-2023.86 226.69,-2018.34 217,-2007 180.94,-1964.84 160.5,-1561.95 155.97,-1462.24"/>
 <polygon fill="#000000" stroke="#000000" points="159.46,-1461.93 155.51,-1452.1 152.46,-1462.24 159.46,-1461.93"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_tides_step_spin -->
 <g id="module~~lambda_function~~UsedByGraph_node24" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node24"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="325,-1998 266,-1998 266,-1974 325,-1974 325,-1998"/>
-<text text-anchor="middle" x="295.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node24"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-1998 246.5,-1998 246.5,-1974 344.5,-1974 344.5,-1998"/>
+<text text-anchor="middle" x="295.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge23" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.64,-1985.76C248.94,-1984 228.93,-1978.83 217,-1965 183.62,-1926.31 161.4,-1557.69 156.18,-1462.4"/>
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.11,-1982.08C235.1,-1978.92 224.47,-1973.65 217,-1965 183.62,-1926.31 161.4,-1557.69 156.18,-1462.4"/>
 <polygon fill="#000000" stroke="#000000" points="159.68,-1462.2 155.64,-1452.4 152.69,-1462.57 159.68,-1462.2"/>
 </g>
-<!-- module~s_rmvs_util -->
+<!-- proc~solve_wbs -->
 <g id="module~~lambda_function~~UsedByGraph_node25" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node25"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-1956 262,-1956 262,-1932 329,-1932 329,-1956"/>
-<text text-anchor="middle" x="295.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node25"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="326.5,-1956 264.5,-1956 264.5,-1932 326.5,-1932 326.5,-1956"/>
+<text text-anchor="middle" x="295.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge24" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.82,-1943.25C246,-1941.1 228.08,-1935.72 217,-1923 156,-1853.01 154.03,-1547.58 154.7,-1462.23"/>
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.16,-1943.54C247.8,-1941.62 228.63,-1936.35 217,-1923 156,-1853.01 154.03,-1547.58 154.7,-1462.23"/>
 <polygon fill="#000000" stroke="#000000" points="158.21,-1462.14 154.81,-1452.1 151.21,-1462.07 158.21,-1462.14"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- module~s_orbel -->
 <g id="module~~lambda_function~~UsedByGraph_node26" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node26"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331,-1914 260,-1914 260,-1890 331,-1890 331,-1914"/>
-<text text-anchor="middle" x="295.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_orbel</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node26"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-1914 268.5,-1914 268.5,-1890 322.5,-1890 322.5,-1914"/>
+<text text-anchor="middle" x="295.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge25" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.92,-1900.91C244.61,-1898.57 227.7,-1893.13 217,-1881 161.31,-1817.88 155.5,-1543.06 155.01,-1462.36"/>
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.39,-1901.92C251.25,-1900.4 229.73,-1895.43 217,-1881 161.31,-1817.88 155.5,-1543.06 155.01,-1462.36"/>
 <polygon fill="#000000" stroke="#000000" points="158.51,-1462.29 154.97,-1452.3 151.51,-1462.31 158.51,-1462.29"/>
 </g>
-<!-- module~s_util_append -->
+<!-- module~s_whm_gr -->
 <g id="module~~lambda_function~~UsedByGraph_node27" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node27"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-1872 256,-1872 256,-1848 335,-1848 335,-1872"/>
-<text text-anchor="middle" x="295.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node27"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326.5,-1872 264.5,-1872 264.5,-1848 326.5,-1848 326.5,-1872"/>
+<text text-anchor="middle" x="295.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge26" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.61,-1858.08C241.55,-1855.4 226.76,-1849.91 217,-1839 166.63,-1782.74 157.13,-1538.59 155.38,-1462.64"/>
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.29,-1859.42C247.97,-1857.46 228.81,-1852.19 217,-1839 166.63,-1782.74 157.13,-1538.59 155.38,-1462.64"/>
 <polygon fill="#000000" stroke="#000000" points="158.88,-1462.24 155.17,-1452.32 151.88,-1462.39 158.88,-1462.24"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~lambda_function~~UsedByGraph_node28" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node28"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331,-1830 260,-1830 260,-1806 331,-1806 331,-1830"/>
-<text text-anchor="middle" x="295.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node28"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-1830 260.5,-1830 260.5,-1806 330.5,-1806 330.5,-1830"/>
+<text text-anchor="middle" x="295.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge27" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.69,-1816.69C244.53,-1814.29 227.8,-1808.85 217,-1797 171.84,-1747.45 158.9,-1532.95 155.83,-1462.51"/>
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.48,-1816.81C245.12,-1814.48 227.99,-1809.05 217,-1797 171.84,-1747.45 158.9,-1532.95 155.83,-1462.51"/>
 <polygon fill="#000000" stroke="#000000" points="159.32,-1461.98 155.41,-1452.14 152.32,-1462.27 159.32,-1461.98"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~lambda_function~~UsedByGraph_node29" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node29"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-1788 268.5,-1788 268.5,-1764 322.5,-1764 322.5,-1788"/>
-<text text-anchor="middle" x="295.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node29"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="343.5,-1788 247.5,-1788 247.5,-1764 343.5,-1764 343.5,-1788"/>
+<text text-anchor="middle" x="295.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge28" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.27,-1775.66C251.3,-1774 230.02,-1768.97 217,-1755 177.03,-1712.11 160.88,-1527 156.4,-1462.37"/>
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.37,-1771.9C236.07,-1768.77 224.98,-1763.57 217,-1755 177.03,-1712.11 160.88,-1527 156.4,-1462.37"/>
 <polygon fill="#000000" stroke="#000000" points="159.87,-1461.83 155.71,-1452.09 152.88,-1462.3 159.87,-1461.83"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_util_exit -->
 <g id="module~~lambda_function~~UsedByGraph_node30" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node30"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-1746 265,-1746 265,-1722 326,-1722 326,-1746"/>
-<text text-anchor="middle" x="295.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node30"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-1746 265.5,-1746 265.5,-1722 325.5,-1722 325.5,-1746"/>
+<text text-anchor="middle" x="295.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge29" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.63,-1733.11C248.43,-1731.04 229.26,-1725.77 217,-1713 182.15,-1676.68 163.1,-1520.39 157.1,-1462.06"/>
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.4,-1733.2C249.03,-1731.21 229.45,-1725.98 217,-1713 182.15,-1676.68 163.1,-1520.39 157.1,-1462.06"/>
 <polygon fill="#000000" stroke="#000000" points="160.58,-1461.67 156.11,-1452.06 153.62,-1462.36 160.58,-1461.67"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_netcdf -->
 <g id="module~~lambda_function~~UsedByGraph_node31" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node31"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="354.5,-1704 236.5,-1704 236.5,-1680 354.5,-1680 354.5,-1704"/>
-<text text-anchor="middle" x="295.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node31"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-1704 268.5,-1704 268.5,-1680 322.5,-1680 322.5,-1704"/>
+<text text-anchor="middle" x="295.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge30" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M236.21,-1683.53C229.08,-1680.49 222.41,-1676.43 217,-1671 159.29,-1613.15 153.67,-1507.75 154.15,-1462.08"/>
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.2,-1691.33C251.43,-1689.51 230.39,-1684.42 217,-1671 159.29,-1613.15 153.67,-1507.75 154.15,-1462.08"/>
 <polygon fill="#000000" stroke="#000000" points="157.65,-1462.14 154.37,-1452.06 150.66,-1461.98 157.65,-1462.14"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~lambda_function~~UsedByGraph_node32" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-1662 256,-1662 256,-1638 335,-1638 335,-1662"/>
-<text text-anchor="middle" x="295.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="339.5,-1662 251.5,-1662 251.5,-1638 339.5,-1638 339.5,-1662"/>
+<text text-anchor="middle" x="295.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge31" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.7,-1647.05C242,-1644.21 227.42,-1638.88 217,-1629 169.48,-1583.9 158.34,-1501.85 155.76,-1462.38"/>
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.29,-1646.06C238.93,-1643.02 226.3,-1637.83 217,-1629 169.48,-1583.9 158.34,-1501.85 155.76,-1462.38"/>
 <polygon fill="#000000" stroke="#000000" points="159.25,-1462.03 155.23,-1452.23 152.26,-1462.4 159.25,-1462.03"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_util_peri -->
 <g id="module~~lambda_function~~UsedByGraph_node33" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node33"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326.5,-1620 264.5,-1620 264.5,-1596 326.5,-1596 326.5,-1620"/>
-<text text-anchor="middle" x="295.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node33"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-1620 265,-1620 265,-1596 326,-1596 326,-1620"/>
+<text text-anchor="middle" x="295.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge32" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.32,-1606.08C248.61,-1603.66 230.02,-1598.37 217,-1587 179.5,-1554.23 164.09,-1494.98 158.24,-1462.61"/>
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.7,-1606.14C248.91,-1603.74 230.12,-1598.47 217,-1587 179.5,-1554.23 164.09,-1494.98 158.24,-1462.61"/>
 <polygon fill="#000000" stroke="#000000" points="161.63,-1461.66 156.55,-1452.37 154.73,-1462.8 161.63,-1461.66"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_helio_drift -->
 <g id="module~~lambda_function~~UsedByGraph_node34" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node34"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-1578 246.5,-1578 246.5,-1554 344.5,-1554 344.5,-1578"/>
-<text text-anchor="middle" x="295.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node34"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-1578 260.5,-1578 260.5,-1554 330.5,-1554 330.5,-1578"/>
+<text text-anchor="middle" x="295.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge33" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.34,-1559.1C235.95,-1556 225.54,-1551.5 217,-1545 188.98,-1523.66 171.19,-1485.7 162.17,-1461.75"/>
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.31,-1562.52C245.81,-1559.66 229.42,-1554.46 217,-1545 188.98,-1523.66 171.19,-1485.7 162.17,-1461.75"/>
 <polygon fill="#000000" stroke="#000000" points="165.4,-1460.37 158.74,-1452.13 158.81,-1462.73 165.4,-1460.37"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_setup -->
 <g id="module~~lambda_function~~UsedByGraph_node35" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node35"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<title>module~s_setup</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node35"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-1536 268.5,-1536 268.5,-1512 322.5,-1512 322.5,-1536"/>
-<text text-anchor="middle" x="295.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<text text-anchor="middle" x="295.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
+<!-- module~s_setup&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge34" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
+<title>module~s_setup&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.39,-1520.46C252.69,-1517.5 232.77,-1512.22 217,-1503 198.35,-1492.1 181.46,-1474.13 170.04,-1460.17"/>
 <polygon fill="#000000" stroke="#000000" points="172.61,-1457.78 163.66,-1452.1 167.11,-1462.11 172.61,-1457.78"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_helio_kick -->
 <g id="module~~lambda_function~~UsedByGraph_node36" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node36"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-1494 266.5,-1494 266.5,-1470 324.5,-1470 324.5,-1494"/>
-<text text-anchor="middle" x="295.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node36"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-1494 260.5,-1494 260.5,-1470 330.5,-1470 330.5,-1494"/>
+<text text-anchor="middle" x="295.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge35" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.4,-1474.83C251.63,-1470.96 233.27,-1465.95 217,-1461 208.48,-1458.41 199.37,-1455.43 190.83,-1452.56"/>
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.42,-1473.25C246.85,-1469.64 231.14,-1465.3 217,-1461 208.48,-1458.41 199.37,-1455.43 190.83,-1452.56"/>
 <polygon fill="#000000" stroke="#000000" points="191.72,-1449.16 181.13,-1449.25 189.47,-1455.79 191.72,-1449.16"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- module~s_util_append -->
 <g id="module~~lambda_function~~UsedByGraph_node37" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node37"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-1452 259.5,-1452 259.5,-1428 331.5,-1428 331.5,-1452"/>
-<text text-anchor="middle" x="295.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>module~s_util_append</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node37"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-1452 256,-1452 256,-1428 335,-1428 335,-1452"/>
+<text text-anchor="middle" x="295.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge36" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.3,-1440C238.58,-1440 212.43,-1440 191.5,-1440"/>
-<polygon fill="#000000" stroke="#000000" points="191.38,-1436.5 181.38,-1440 191.38,-1443.5 191.38,-1436.5"/>
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.64,-1440C235.55,-1440 211.17,-1440 191.44,-1440"/>
+<polygon fill="#000000" stroke="#000000" points="191.31,-1436.5 181.31,-1440 191.31,-1443.5 191.31,-1436.5"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- module~s_rmvs_util -->
 <g id="module~~lambda_function~~UsedByGraph_node38" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node38"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="350,-1410 241,-1410 241,-1386 350,-1386 350,-1410"/>
-<text text-anchor="middle" x="295.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node38"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-1410 262,-1410 262,-1386 329,-1386 329,-1410"/>
+<text text-anchor="middle" x="295.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge37" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.06,-1410.08C237.79,-1412.89 227,-1415.95 217,-1419 208.48,-1421.59 199.37,-1424.57 190.83,-1427.44"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge38" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.94,-1406.34C248.04,-1410.03 231.67,-1414.53 217,-1419 208.48,-1421.59 199.37,-1424.57 190.83,-1427.44"/>
 <polygon fill="#000000" stroke="#000000" points="189.47,-1424.21 181.13,-1430.75 191.72,-1430.84 189.47,-1424.21"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- program~swiftest_driver -->
 <g id="module~~lambda_function~~UsedByGraph_node39" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node39"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="348.5,-1368 242.5,-1368 242.5,-1344 348.5,-1344 348.5,-1368"/>
-<text text-anchor="middle" x="295.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node39"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="336,-1368 255,-1368 255,-1344 336,-1344 336,-1368"/>
+<text text-anchor="middle" x="295.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge38" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M242.11,-1366.12C233.4,-1368.93 224.7,-1372.5 217,-1377 198.35,-1387.9 181.46,-1405.87 170.04,-1419.83"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge39" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.66,-1362.54C242.05,-1365.7 228.43,-1370.32 217,-1377 198.35,-1387.9 181.46,-1405.87 170.04,-1419.83"/>
 <polygon fill="#000000" stroke="#000000" points="167.11,-1417.89 163.66,-1427.9 172.61,-1422.22 167.11,-1417.89"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_symba_step -->
 <g id="module~~lambda_function~~UsedByGraph_node40" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node40"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="343.5,-1326 247.5,-1326 247.5,-1302 343.5,-1302 343.5,-1326"/>
-<text text-anchor="middle" x="295.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node40"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336.5,-1326 254.5,-1326 254.5,-1302 336.5,-1302 336.5,-1326"/>
+<text text-anchor="middle" x="295.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge39" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.15,-1320.66C236.49,-1323.77 225.76,-1328.33 217,-1335 188.98,-1356.34 171.19,-1394.3 162.17,-1418.25"/>
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge40" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.4,-1318.76C241.49,-1321.81 227.76,-1326.81 217,-1335 188.98,-1356.34 171.19,-1394.3 162.17,-1418.25"/>
 <polygon fill="#000000" stroke="#000000" points="158.81,-1417.27 158.74,-1427.87 165.4,-1419.63 158.81,-1417.27"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_symba_util -->
 <g id="module~~lambda_function~~UsedByGraph_node41" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node41"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="339.5,-1284 251.5,-1284 251.5,-1260 339.5,-1260 339.5,-1284"/>
-<text text-anchor="middle" x="295.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node41"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-1284 258,-1284 258,-1260 333,-1260 333,-1284"/>
+<text text-anchor="middle" x="295.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge40" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.32,-1276.52C239.11,-1279.59 226.55,-1284.65 217,-1293 179.5,-1325.77 164.09,-1385.02 158.24,-1417.39"/>
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge41" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.71,-1275.09C243.61,-1277.91 228.23,-1283.19 217,-1293 179.5,-1325.77 164.09,-1385.02 158.24,-1417.39"/>
 <polygon fill="#000000" stroke="#000000" points="154.73,-1417.2 156.55,-1427.63 161.63,-1418.34 154.73,-1417.2"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_util_copy -->
 <g id="module~~lambda_function~~UsedByGraph_node42" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node42"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="326.5,-1242 264.5,-1242 264.5,-1218 326.5,-1218 326.5,-1242"/>
-<text text-anchor="middle" x="295.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node42"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-1242 262.5,-1242 262.5,-1218 328.5,-1218 328.5,-1242"/>
+<text text-anchor="middle" x="295.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge41" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.32,-1231.45C248.41,-1233.72 229.64,-1239.01 217,-1251 169.48,-1296.1 158.34,-1378.15 155.76,-1417.62"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge42" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.4,-1231.73C246.92,-1234.15 229.13,-1239.49 217,-1251 169.48,-1296.1 158.34,-1378.15 155.76,-1417.62"/>
 <polygon fill="#000000" stroke="#000000" points="152.26,-1417.6 155.23,-1427.77 159.25,-1417.97 152.26,-1417.6"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_discard -->
 <g id="module~~lambda_function~~UsedByGraph_node43" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node43"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="340,-1200 251,-1200 251,-1176 340,-1176 340,-1200"/>
-<text text-anchor="middle" x="295.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~s_discard</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node43"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-1200 266.5,-1200 266.5,-1176 324.5,-1176 324.5,-1200"/>
+<text text-anchor="middle" x="295.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge42" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.99,-1191.63C238.61,-1194.65 226.06,-1199.92 217,-1209 159.29,-1266.85 153.67,-1372.25 154.15,-1417.92"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge43" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.34,-1188.88C249.89,-1190.88 229.9,-1196.07 217,-1209 159.29,-1266.85 153.67,-1372.25 154.15,-1417.92"/>
 <polygon fill="#000000" stroke="#000000" points="150.66,-1418.02 154.37,-1427.94 157.65,-1417.86 150.66,-1418.02"/>
 </g>
 <!-- module~s_util_sort -->
@@ -1196,414 +1196,414 @@ <h3 class="panel-title">Used by</h3>
 </g>
 </g>
 <!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge68" class="edge">
+<g id="module~~lambda_function~~UsedByGraph_edge44" class="edge">
 <title>module~s_util_sort&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.63,-1146.89C248.43,-1148.96 229.26,-1154.23 217,-1167 182.15,-1203.32 163.1,-1359.61 157.1,-1417.94"/>
 <polygon fill="#000000" stroke="#000000" points="153.62,-1417.64 156.11,-1427.94 160.58,-1418.33 153.62,-1417.64"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_whm_setup -->
 <g id="module~~lambda_function~~UsedByGraph_node45" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node45"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="336,-1116 255,-1116 255,-1092 336,-1092 336,-1116"/>
-<text text-anchor="middle" x="295.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node45"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-1116 256,-1116 256,-1092 335,-1092 335,-1116"/>
+<text text-anchor="middle" x="295.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge43" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.63,-1106.36C240.97,-1109.15 226.69,-1114.6 217,-1125 177.03,-1167.89 160.88,-1353 156.4,-1417.63"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge45" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.83,-1106.12C241.81,-1108.84 226.98,-1114.29 217,-1125 177.03,-1167.89 160.88,-1353 156.4,-1417.63"/>
 <polygon fill="#000000" stroke="#000000" points="152.88,-1417.7 155.71,-1427.91 159.87,-1418.17 152.88,-1417.7"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_resize -->
 <g id="module~~lambda_function~~UsedByGraph_node46" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node46"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-1074 268.5,-1074 268.5,-1050 322.5,-1050 322.5,-1074"/>
-<text text-anchor="middle" x="295.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node46"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-1074 259.5,-1074 259.5,-1050 331.5,-1050 331.5,-1074"/>
+<text text-anchor="middle" x="295.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge44" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.17,-1062.24C251.16,-1063.86 229.86,-1068.88 217,-1083 171.84,-1132.55 158.9,-1347.05 155.83,-1417.49"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge46" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.3,-1063.37C244.24,-1065.81 227.7,-1071.25 217,-1083 171.84,-1132.55 158.9,-1347.05 155.83,-1417.49"/>
 <polygon fill="#000000" stroke="#000000" points="152.32,-1417.73 155.41,-1427.86 159.32,-1418.02 152.32,-1417.73"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~s_helio_gr -->
 <g id="module~~lambda_function~~UsedByGraph_node47" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node47"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="351.5,-1032 239.5,-1032 239.5,-1008 351.5,-1008 351.5,-1032"/>
-<text text-anchor="middle" x="295.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node47"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326.5,-1032 264.5,-1032 264.5,-1008 326.5,-1008 326.5,-1032"/>
+<text text-anchor="middle" x="295.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge45" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.15,-1026.5C230.77,-1029.72 222.95,-1034.35 217,-1041 166.63,-1097.26 157.13,-1341.41 155.38,-1417.36"/>
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge47" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.29,-1020.58C247.97,-1022.54 228.81,-1027.81 217,-1041 166.63,-1097.26 157.13,-1341.41 155.38,-1417.36"/>
 <polygon fill="#000000" stroke="#000000" points="151.88,-1417.61 155.17,-1427.68 158.88,-1417.76 151.88,-1417.61"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~orbel -->
 <g id="module~~lambda_function~~UsedByGraph_node48" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node48"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="334.5,-990 256.5,-990 256.5,-966 334.5,-966 334.5,-990"/>
-<text text-anchor="middle" x="295.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~orbel</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node48"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="322.5,-990 268.5,-990 268.5,-966 322.5,-966 322.5,-990"/>
+<text text-anchor="middle" x="295.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge46" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.33,-979.69C242.03,-982.31 226.87,-987.82 217,-999 161.31,-1062.12 155.5,-1336.94 155.01,-1417.64"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge48" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.39,-978.08C251.25,-979.6 229.73,-984.57 217,-999 161.31,-1062.12 155.5,-1336.94 155.01,-1417.64"/>
 <polygon fill="#000000" stroke="#000000" points="151.51,-1417.69 154.97,-1427.7 158.51,-1417.71 151.51,-1417.69"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_whm_util -->
 <g id="module~~lambda_function~~UsedByGraph_node49" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node49"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="374,-948 217,-948 217,-924 374,-924 374,-948"/>
-<text text-anchor="middle" x="295.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node49"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-948 262.5,-948 262.5,-924 328.5,-924 328.5,-948"/>
+<text text-anchor="middle" x="295.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge47" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M227.41,-948.15C223.55,-950.61 220.02,-953.53 217,-957 156,-1026.99 154.03,-1332.42 154.7,-1417.77"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge49" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.21,-936.7C246.3,-938.81 228.17,-944.18 217,-957 156,-1026.99 154.03,-1332.42 154.7,-1417.77"/>
 <polygon fill="#000000" stroke="#000000" points="151.21,-1417.93 154.81,-1427.9 158.21,-1417.86 151.21,-1417.93"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~lambda_function~~UsedByGraph_node50" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node50"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-906 268.5,-906 268.5,-882 322.5,-882 322.5,-906"/>
-<text text-anchor="middle" x="295.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node50"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-906 256,-906 256,-882 335,-882 335,-906"/>
+<text text-anchor="middle" x="295.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge48" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.29,-893.99C251.11,-895.47 229.57,-900.43 217,-915 183.62,-953.69 161.4,-1322.31 156.18,-1417.6"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge50" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.8,-895.66C241.6,-898.29 226.65,-903.81 217,-915 183.62,-953.69 161.4,-1322.31 156.18,-1417.6"/>
 <polygon fill="#000000" stroke="#000000" points="152.69,-1417.43 155.64,-1427.6 159.68,-1417.8 152.69,-1417.43"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_util_spill -->
 <g id="module~~lambda_function~~UsedByGraph_node51" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node51"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-864 256,-864 256,-840 335,-840 335,-864"/>
-<text text-anchor="middle" x="295.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node51"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-864 265,-864 265,-840 326,-840 326,-864"/>
+<text text-anchor="middle" x="295.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge49" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.75,-853.61C241.54,-856.24 226.6,-861.77 217,-873 180.94,-915.16 160.5,-1318.05 155.97,-1417.76"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge51" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.83,-852.29C248.28,-854.11 228.69,-859.33 217,-873 180.94,-915.16 160.5,-1318.05 155.97,-1417.76"/>
 <polygon fill="#000000" stroke="#000000" points="152.46,-1417.76 155.51,-1427.9 159.46,-1418.07 152.46,-1417.76"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~lambda_function~~UsedByGraph_node52" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node52"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330,-822 261,-822 261,-798 330,-798 330,-822"/>
-<text text-anchor="middle" x="295.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node52"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="351.5,-822 239.5,-822 239.5,-798 351.5,-798 351.5,-822"/>
+<text text-anchor="middle" x="295.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge50" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.89,-810.74C245.24,-812.93 227.74,-818.35 217,-831 178.26,-876.63 159.69,-1313.6 155.79,-1417.78"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge52" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.24,-816.09C230.75,-819.34 222.86,-824.09 217,-831 178.26,-876.63 159.69,-1313.6 155.79,-1417.78"/>
 <polygon fill="#000000" stroke="#000000" points="152.29,-1417.69 155.42,-1427.81 159.29,-1417.94 152.29,-1417.69"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~lambda_function~~UsedByGraph_node53" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node53"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="328,-780 263,-780 263,-756 328,-756 328,-780"/>
-<text text-anchor="middle" x="295.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node53"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="351.5,-780 239.5,-780 239.5,-756 351.5,-756 351.5,-780"/>
+<text text-anchor="middle" x="295.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge51" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.82,-768.45C246.67,-770.45 228.14,-775.79 217,-789 175.6,-838.09 158.95,-1308.87 155.64,-1417.65"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge53" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.21,-774.06C230.71,-777.31 222.84,-782.07 217,-789 175.6,-838.09 158.95,-1308.87 155.64,-1417.65"/>
 <polygon fill="#000000" stroke="#000000" points="152.14,-1417.7 155.34,-1427.8 159.13,-1417.91 152.14,-1417.7"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- module~s_whm_kick -->
 <g id="module~~lambda_function~~UsedByGraph_node54" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node54"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<title>module~s_whm_kick</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-738 260.5,-738 260.5,-714 330.5,-714 330.5,-738"/>
-<text text-anchor="middle" x="295.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<text text-anchor="middle" x="295.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge52" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge54" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.43,-726.74C244.86,-728.95 227.57,-734.39 217,-747 172.92,-799.58 158.25,-1304.66 155.5,-1417.65"/>
 <polygon fill="#000000" stroke="#000000" points="152,-1417.79 155.26,-1427.87 159,-1417.96 152,-1417.79"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~s_symba_discard -->
 <g id="module~~lambda_function~~UsedByGraph_node55" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node55"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-696 260.5,-696 260.5,-672 330.5,-672 330.5,-696"/>
-<text text-anchor="middle" x="295.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node55"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="343.5,-696 247.5,-696 247.5,-672 343.5,-672 343.5,-696"/>
+<text text-anchor="middle" x="295.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge53" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.4,-684.72C244.83,-686.92 227.54,-692.37 217,-705 170.27,-761.03 157.6,-1299.85 155.39,-1417.42"/>
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge55" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.12,-687.41C235.68,-690.53 224.59,-695.9 217,-705 170.27,-761.03 157.6,-1299.85 155.39,-1417.42"/>
 <polygon fill="#000000" stroke="#000000" points="151.88,-1417.67 155.2,-1427.73 158.88,-1417.79 151.88,-1417.67"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_symba_drift -->
 <g id="module~~lambda_function~~UsedByGraph_node56" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node56"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-654 266.5,-654 266.5,-630 324.5,-630 324.5,-654"/>
-<text text-anchor="middle" x="295.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node56"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-654 256,-654 256,-630 335,-630 335,-654"/>
+<text text-anchor="middle" x="295.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge54" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.22,-642.01C249.3,-643.62 228.84,-648.74 217,-663 167.54,-722.57 156.96,-1296.65 155.27,-1417.67"/>
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge56" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.98,-643.4C241.63,-645.97 226.53,-651.52 217,-663 167.54,-722.57 156.96,-1296.65 155.27,-1417.67"/>
 <polygon fill="#000000" stroke="#000000" points="151.77,-1417.89 155.14,-1427.94 158.77,-1417.99 151.77,-1417.89"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~whm_drift -->
 <g id="module~~lambda_function~~UsedByGraph_node57" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node57"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-612 265,-612 265,-588 326,-588 326,-612"/>
-<text text-anchor="middle" x="295.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~whm_drift</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node57"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325,-612 266,-612 266,-588 325,-588 325,-612"/>
+<text text-anchor="middle" x="295.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge55" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.66,-600.14C248.05,-601.92 228.46,-607.14 217,-621 164.85,-684.08 156.37,-1292.71 155.18,-1417.65"/>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge57" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.82,-600.03C248.96,-601.68 228.73,-606.82 217,-621 164.85,-684.08 156.37,-1292.71 155.18,-1417.65"/>
 <polygon fill="#000000" stroke="#000000" points="151.68,-1417.88 155.09,-1427.91 158.68,-1417.94 151.68,-1417.88"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~lambda_function~~UsedByGraph_node58" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node58"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="351.5,-570 239.5,-570 239.5,-546 351.5,-546 351.5,-570"/>
-<text text-anchor="middle" x="295.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node58"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="352.5,-570 238.5,-570 238.5,-546 352.5,-546 352.5,-570"/>
+<text text-anchor="middle" x="295.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge56" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.46,-563.8C230.83,-567.06 222.85,-571.9 217,-579 162.14,-645.6 155.81,-1289.17 155.09,-1417.72"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge58" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M238.29,-564.25C230.11,-567.51 222.58,-572.22 217,-579 162.14,-645.6 155.81,-1289.17 155.09,-1417.72"/>
 <polygon fill="#000000" stroke="#000000" points="151.59,-1417.91 155.04,-1427.92 158.59,-1417.94 151.59,-1417.91"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~s_util_fill -->
 <g id="module~~lambda_function~~UsedByGraph_node59" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node59"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-528 260.5,-528 260.5,-504 330.5,-504 330.5,-528"/>
-<text text-anchor="middle" x="295.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node59"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-528 268.5,-528 268.5,-504 322.5,-504 322.5,-528"/>
+<text text-anchor="middle" x="295.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge57" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.32,-516.64C244.72,-518.83 227.44,-524.29 217,-537 159.42,-607.15 155.27,-1286.04 155.01,-1417.88"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge59" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.44,-515.76C251.09,-517.12 229.29,-522.02 217,-537 159.42,-607.15 155.27,-1286.04 155.01,-1417.88"/>
 <polygon fill="#000000" stroke="#000000" points="151.51,-1417.98 155,-1427.99 158.51,-1417.99 151.51,-1417.98"/>
 </g>
-<!-- module~s_rmvs_step -->
+<!-- module~s_io -->
 <g id="module~~lambda_function~~UsedByGraph_node60" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node60"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-486 259,-486 259,-462 332,-462 332,-486"/>
-<text text-anchor="middle" x="295.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<title>module~s_io</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node60"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-486 268.5,-486 268.5,-462 322.5,-462 322.5,-486"/>
+<text text-anchor="middle" x="295.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge59" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.71,-474.86C243.53,-477.19 227.06,-482.7 217,-495 156.74,-568.64 154.76,-1281.82 154.94,-1417.7"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge60" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.42,-473.75C251.07,-475.1 229.27,-480 217,-495 156.74,-568.64 154.76,-1281.82 154.94,-1417.7"/>
 <polygon fill="#000000" stroke="#000000" points="151.44,-1417.77 154.96,-1427.76 158.44,-1417.76 151.44,-1417.77"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_helio_setup -->
 <g id="module~~lambda_function~~UsedByGraph_node61" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node61"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-444 265,-444 265,-420 326,-420 326,-444"/>
-<text text-anchor="middle" x="295.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node61"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-444 256,-444 256,-420 335,-420 335,-444"/>
+<text text-anchor="middle" x="295.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge60" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M264.98,-432.05C248.26,-433.76 228.46,-438.96 217,-453 154.05,-530.14 154.27,-1277.94 154.87,-1417.6"/>
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge61" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.88,-433.32C241.52,-435.88 226.43,-441.44 217,-453 154.05,-530.14 154.27,-1277.94 154.87,-1417.6"/>
 <polygon fill="#000000" stroke="#000000" points="151.37,-1417.92 154.92,-1427.91 158.37,-1417.89 151.37,-1417.92"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_symba_kick -->
 <g id="module~~lambda_function~~UsedByGraph_node62" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node62"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-402 260.5,-402 260.5,-378 330.5,-378 330.5,-402"/>
-<text text-anchor="middle" x="295.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node62"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-402 256,-402 256,-378 335,-378 335,-402"/>
+<text text-anchor="middle" x="295.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge61" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.27,-390.61C244.66,-392.78 227.38,-398.24 217,-411 151.34,-491.66 153.8,-1274.26 154.81,-1417.53"/>
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge62" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.87,-391.3C241.5,-393.87 226.42,-399.43 217,-411 151.34,-491.66 153.8,-1274.26 154.81,-1417.53"/>
 <polygon fill="#000000" stroke="#000000" points="151.31,-1417.77 154.89,-1427.74 158.31,-1417.72 151.31,-1417.77"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_fraggle_util -->
 <g id="module~~lambda_function~~UsedByGraph_node63" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node63"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-360 262.5,-360 262.5,-336 328.5,-336 328.5,-360"/>
-<text text-anchor="middle" x="295.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node63"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="333.5,-360 257.5,-360 257.5,-336 333.5,-336 333.5,-360"/>
+<text text-anchor="middle" x="295.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge62" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.23,-348.34C246.12,-350.32 227.81,-355.69 217,-369 148.63,-453.2 153.35,-1270.92 154.75,-1417.55"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge63" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.46,-349.02C242.62,-351.44 226.75,-356.99 217,-369 148.63,-453.2 153.35,-1270.92 154.75,-1417.55"/>
 <polygon fill="#000000" stroke="#000000" points="151.26,-1417.99 154.86,-1427.96 158.26,-1417.92 151.26,-1417.99"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_util_solve -->
 <g id="module~~lambda_function~~UsedByGraph_node64" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node64"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-318 268.5,-318 268.5,-294 322.5,-294 322.5,-318"/>
-<text text-anchor="middle" x="295.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node64"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-318 261.5,-318 261.5,-294 329.5,-294 329.5,-318"/>
+<text text-anchor="middle" x="295.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge63" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.38,-305.72C251,-307.05 229.2,-311.94 217,-327 181.38,-370.96 159.09,-1263.69 155.51,-1417.52"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge64" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.43,-306.43C245.51,-308.49 227.62,-313.89 217,-327 181.38,-370.96 159.09,-1263.69 155.51,-1417.52"/>
 <polygon fill="#000000" stroke="#000000" points="152.01,-1417.58 155.28,-1427.66 159.01,-1417.74 152.01,-1417.58"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_helio_step -->
 <g id="module~~lambda_function~~UsedByGraph_node65" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node65"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="352.5,-276 238.5,-276 238.5,-252 352.5,-252 352.5,-276"/>
-<text text-anchor="middle" x="295.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node65"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-276 259,-276 259,-252 332,-252 332,-276"/>
+<text text-anchor="middle" x="295.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge64" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M238.19,-270.17C230.02,-273.43 222.52,-278.17 217,-285 180.01,-330.75 158.78,-1260.91 155.46,-1417.67"/>
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge65" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.64,-264.81C243.45,-267.13 226.99,-272.64 217,-285 180.01,-330.75 158.78,-1260.91 155.46,-1417.67"/>
 <polygon fill="#000000" stroke="#000000" points="151.96,-1417.88 155.24,-1427.95 158.95,-1418.03 151.96,-1417.88"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_whm_step -->
 <g id="module~~lambda_function~~UsedByGraph_node66" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node66"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-234 260.5,-234 260.5,-210 330.5,-210 330.5,-234"/>
-<text text-anchor="middle" x="295.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node66"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-234 259,-234 259,-210 332,-210 332,-234"/>
+<text text-anchor="middle" x="295.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge65" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.22,-222.57C244.6,-224.74 227.33,-230.2 217,-243 178.64,-290.54 158.48,-1258.35 155.41,-1417.84"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge66" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.63,-222.8C243.44,-225.12 226.98,-230.63 217,-243 178.64,-290.54 158.48,-1258.35 155.41,-1417.84"/>
 <polygon fill="#000000" stroke="#000000" points="151.91,-1417.84 155.22,-1427.9 158.91,-1417.97 151.91,-1417.84"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_symba_setup -->
 <g id="module~~lambda_function~~UsedByGraph_node67" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node67"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="343.5,-192 247.5,-192 247.5,-168 343.5,-168 343.5,-192"/>
-<text text-anchor="middle" x="295.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="339.5,-192 251.5,-192 251.5,-168 339.5,-168 339.5,-192"/>
+<text text-anchor="middle" x="295.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge66" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.31,-183.13C235.73,-186.23 224.52,-191.66 217,-201 177.29,-250.29 158.23,-1254.06 155.38,-1417.57"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge37" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.36,-182.14C238.39,-185.02 225.39,-190.58 217,-201 177.29,-250.29 158.23,-1254.06 155.38,-1417.57"/>
 <polygon fill="#000000" stroke="#000000" points="151.87,-1417.81 155.2,-1427.87 158.87,-1417.93 151.87,-1417.81"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_fraggle_generate -->
 <g id="module~~lambda_function~~UsedByGraph_node68" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node68"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-150 268.5,-150 268.5,-126 322.5,-126 322.5,-150"/>
-<text text-anchor="middle" x="295.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node68"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="348.5,-150 242.5,-150 242.5,-126 348.5,-126 348.5,-150"/>
+<text text-anchor="middle" x="295.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge67" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.34,-137.69C250.95,-139.01 229.14,-143.9 217,-159 175.91,-210.1 157.94,-1252 155.34,-1417.84"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge68" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M242.49,-142.56C232.67,-145.82 223.46,-150.96 217,-159 175.91,-210.1 157.94,-1252 155.34,-1417.84"/>
 <polygon fill="#000000" stroke="#000000" points="151.84,-1417.81 155.18,-1427.86 158.84,-1417.92 151.84,-1417.81"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_symba_io -->
 <g id="module~~lambda_function~~UsedByGraph_node69" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node69"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="334,-108 257,-108 257,-84 334,-84 334,-108"/>
-<text text-anchor="middle" x="295.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node69"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-108 260.5,-108 260.5,-84 330.5,-84 330.5,-108"/>
+<text text-anchor="middle" x="295.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge58" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257,-97.03C242.26,-99.48 226.6,-105.04 217,-117 174.56,-169.86 157.7,-1248.08 155.3,-1417.64"/>
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge69" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.2,-96.55C244.57,-98.71 227.3,-104.17 217,-117 174.56,-169.86 157.7,-1248.08 155.3,-1417.64"/>
 <polygon fill="#000000" stroke="#000000" points="151.8,-1417.82 155.16,-1427.87 158.8,-1417.92 151.8,-1417.82"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~s_kick -->
 <g id="module~~lambda_function~~UsedByGraph_node70" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node70"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="334.5,-66 256.5,-66 256.5,-42 334.5,-42 334.5,-66"/>
-<text text-anchor="middle" x="295.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~s_kick</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node70"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-66 268.5,-66 268.5,-42 322.5,-42 322.5,-66"/>
+<text text-anchor="middle" x="295.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~lambda_function~~UsedByGraph_edge69" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.18,-55.16C241.68,-57.68 226.42,-63.25 217,-75 173.19,-129.64 157.44,-1245.41 155.27,-1417.73"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~lambda_function~~UsedByGraph_edge67" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.33,-53.68C250.93,-54.99 229.12,-59.88 217,-75 173.19,-129.64 157.44,-1245.41 155.27,-1417.73"/>
 <polygon fill="#000000" stroke="#000000" points="151.77,-1417.85 155.14,-1427.9 158.77,-1417.94 151.77,-1417.85"/>
 </g>
-<!-- module~s_fraggle_util -->
+<!-- module~drift_implementation -->
 <g id="module~~lambda_function~~UsedByGraph_node71" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~lambda_function~~UsedByGraph_node71"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="333.5,-24 257.5,-24 257.5,0 333.5,0 333.5,-24"/>
-<text text-anchor="middle" x="295.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~lambda_function~~UsedByGraph_node71"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="350,-24 241,-24 241,0 350,0 350,-24"/>
+<text text-anchor="middle" x="295.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
 <g id="module~~lambda_function~~UsedByGraph_edge70" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.38,-12.95C242.53,-15.37 226.67,-20.92 217,-33 171.81,-89.44 157.2,-1242.96 155.24,-1417.86"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.87,-17.08C231.66,-20.36 223.1,-25.38 217,-33 171.81,-89.44 157.2,-1242.96 155.24,-1417.86"/>
 <polygon fill="#000000" stroke="#000000" points="151.74,-1417.9 155.13,-1427.94 158.74,-1417.98 151.74,-1417.9"/>
 </g>
 </g>
diff --git a/docs/module/orbel.html b/docs/module/orbel.html
index 413785c52..2c9f39fe7 100644
--- a/docs/module/orbel.html
+++ b/docs/module/orbel.html
@@ -235,241 +235,286 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~orbel~~UsesGraph Pages: 1 -->
-<svg id="moduleorbelUsesGraph" width="641pt" height="214pt"
- viewBox="0.00 0.00 641.00 214.50" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~orbel~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 298.17)">
+<svg id="moduleorbelUsesGraph" width="641pt" height="262pt"
+ viewBox="0.00 0.00 641.00 261.99" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~orbel~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 365.08)">
 <title>module~~orbel~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-298.17 899,-298.17 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.08 899,-365.08 899,4 -4,4"/>
 <!-- module~orbel -->
 <g id="module~~orbel~~UsesGraph_node1" class="node">
 <title>module~orbel</title>
-<polygon fill="none" stroke="black" points="895,-142 841,-142 841,-118 895,-118 895,-142"/>
-<text text-anchor="middle" x="868" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50">orbel</text>
+<polygon fill="none" stroke="black" points="895,-104 841,-104 841,-80 895,-80 895,-104"/>
+<text text-anchor="middle" x="868" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50">orbel</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~orbel~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~orbel~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-142 751,-142 751,-118 805,-118 805,-142"/>
-<text text-anchor="middle" x="778" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-104 751,-104 751,-80 805,-80 805,-104"/>
+<text text-anchor="middle" x="778" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~orbel&#45;&gt;module~swiftest -->
 <g id="module~~orbel~~UsesGraph_edge1" class="edge">
 <title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.6,-130C832.61,-130 823.69,-130 815.18,-130"/>
-<polygon fill="#000000" stroke="#000000" points="815.08,-126.5 805.08,-130 815.08,-133.5 815.08,-126.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.6,-92C832.61,-92 823.69,-92 815.18,-92"/>
+<polygon fill="#000000" stroke="#000000" points="815.08,-88.5 805.08,-92 815.08,-95.5 815.08,-88.5"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~orbel~~UsesGraph_node3" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~orbel~~UsesGraph_node3"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-260 247,-260 247,-236 347,-236 347,-260"/>
-<text text-anchor="middle" x="297" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~orbel~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-260 391,-260 391,-236 467,-236 467,-260"/>
+<text text-anchor="middle" x="429" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~orbel~~UsesGraph_edge2" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-288C398.02,-282.17 365.15,-272.02 339.97,-263.41"/>
-<polygon fill="#000000" stroke="#000000" points="340.96,-260.05 330.37,-260.07 338.66,-266.66 340.96,-260.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-278C522.76,-276.93 494.78,-270.13 472.48,-263.27"/>
+<polygon fill="#000000" stroke="#000000" points="473.25,-259.85 462.66,-260.14 471.12,-266.51 473.25,-259.85"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C622.83,-303.78 602.9,-280.17 550.5,-278"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~orbel~~UsesGraph_node4" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~orbel~~UsesGraph_node4"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-182 511,-182 511,-158 588,-158 588,-182"/>
-<text text-anchor="middle" x="549.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~orbel~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-280 247,-280 247,-256 347,-256 347,-280"/>
+<text text-anchor="middle" x="297" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~orbel~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-130C637.51,-130 604.25,-142.53 580.97,-153.56"/>
-<polygon fill="#000000" stroke="#000000" points="579.37,-150.44 571.94,-158 582.46,-156.73 579.37,-150.44"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-278C483.2,-275.3 408.32,-272.32 357.57,-270.33"/>
+<polygon fill="#000000" stroke="#000000" points="357.56,-266.82 347.43,-269.93 357.29,-273.82 357.56,-266.82"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~orbel~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~orbel~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-260 385.5,-260 385.5,-236 472.5,-236 472.5,-260"/>
-<text text-anchor="middle" x="429" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~orbel~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~orbel~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.97,-142.04C742.33,-180.36 652.76,-296.43 550.5,-288"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-288C516.44,-291.48 481.69,-277.45 458.16,-265.07"/>
-<polygon fill="#000000" stroke="#000000" points="459.56,-261.84 449.12,-260.09 456.19,-267.98 459.56,-261.84"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~orbel~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-101.79C739.37,-106.13 725.44,-111.37 712.45,-116.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-113.09 702.76,-119.88 713.35,-119.64 710.89,-113.09"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~orbel~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~orbel~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-102 511.5,-102 511.5,-78 587.5,-78 587.5,-102"/>
-<text text-anchor="middle" x="549.5" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-250 511.5,-250 511.5,-226 587.5,-226 587.5,-250"/>
+<text text-anchor="middle" x="549.5" y="-235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~orbel~~UsesGraph_edge5" class="edge">
+<g id="module~~orbel~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.74,-130C729.18,-130 697.86,-130 670.5,-130"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-130C637.51,-130 604.25,-117.47 580.97,-106.44"/>
-<polygon fill="#000000" stroke="#000000" points="582.46,-103.27 571.94,-102 579.37,-109.56 582.46,-103.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C653.54,-286.44 611.73,-269.02 582.14,-254.57"/>
+<polygon fill="#000000" stroke="#000000" points="583.52,-251.35 573.01,-250.02 580.4,-257.61 583.52,-251.35"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~orbel~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~orbel~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-142 391,-142 391,-118 467,-118 467,-142"/>
-<text text-anchor="middle" x="429" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~orbel~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-104 385.5,-104 385.5,-80 472.5,-80 472.5,-104"/>
+<text text-anchor="middle" x="429" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~orbel~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-130C602.15,-130 525.42,-130 477.3,-130"/>
-<polygon fill="#000000" stroke="#000000" points="477.18,-126.5 467.18,-130 477.18,-133.5 477.18,-126.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.92,-92C694.17,-92 558.52,-92 483.02,-92"/>
+<polygon fill="#000000" stroke="#000000" points="482.77,-88.5 472.77,-92 482.77,-95.5 482.77,-88.5"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~orbel~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~orbel~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-220 123,-220 123,-196 211,-196 211,-220"/>
-<text text-anchor="middle" x="167" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~orbel~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-64 624,-64 624,-40 715,-40 715,-64"/>
+<text text-anchor="middle" x="669.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~orbel~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-288C348.6,-272.57 322.08,-299.08 247,-269 223.79,-259.7 201.65,-241.51 186.74,-227.4"/>
-<polygon fill="#000000" stroke="#000000" points="188.84,-224.56 179.25,-220.06 183.95,-229.56 188.84,-224.56"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-82.21C739.37,-77.87 725.44,-72.63 712.45,-67.76"/>
+<polygon fill="#000000" stroke="#000000" points="713.35,-64.36 702.76,-64.12 710.89,-70.91 713.35,-64.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~orbel~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~orbel~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-182 627,-182 627,-158 712,-158 712,-182"/>
-<text text-anchor="middle" x="669.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~orbel~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-144 252.5,-144 252.5,-120 341.5,-120 341.5,-144"/>
+<text text-anchor="middle" x="297" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~orbel~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-139.79C739.37,-144.13 725.44,-149.37 712.45,-154.24"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-151.09 702.76,-157.88 713.35,-157.64 710.89,-151.09"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.51,-104.14C766.62,-139.03 738.55,-239.59 670.5,-278"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C629.41,-300.07 628.09,-237.2 588,-217 510.27,-177.83 411.49,-153.73 351.59,-141.62"/>
+<polygon fill="#000000" stroke="#000000" points="352.09,-138.15 341.6,-139.64 350.73,-145.02 352.09,-138.15"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~orbel~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~orbel~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-180 252.5,-180 252.5,-156 341.5,-156 341.5,-180"/>
-<text text-anchor="middle" x="297" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~orbel~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-330 511,-330 511,-306 588,-306 588,-330"/>
+<text text-anchor="middle" x="549.5" y="-315.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~orbel~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-288C496.14,-293.68 481.7,-298.05 430,-288"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-288C406.69,-283.86 398.72,-283.98 383,-269 356.24,-243.49 372.61,-220.67 347,-194 344,-190.87 340.54,-188.04 336.87,-185.5"/>
-<polygon fill="#000000" stroke="#000000" points="338.42,-182.35 328.07,-180.09 334.75,-188.31 338.42,-182.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C646.61,-290.36 620.28,-299.74 598.05,-306.3"/>
+<polygon fill="#000000" stroke="#000000" points="596.82,-303.01 588.16,-309.11 598.73,-309.74 596.82,-303.01"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~orbel~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~orbel~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-83 624,-83 624,-59 715,-59 715,-83"/>
-<text text-anchor="middle" x="669.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~orbel~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~orbel~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M755.19,-117.92C739.68,-109.33 718.64,-97.67 701.4,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="702.72,-84.85 692.28,-83.07 699.33,-90.97 702.72,-84.85"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.82,-79.79C758.31,-65.24 738.56,-41.57 715,-31 640.85,2.29 544.82,0.74 485.32,-4.69"/>
+<polygon fill="#000000" stroke="#000000" points="484.62,-1.24 475.01,-5.7 485.31,-8.2 484.62,-1.24"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~orbel~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~orbel~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
-<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~orbel~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-220 123,-220 123,-196 211,-196 211,-220"/>
+<text text-anchor="middle" x="167" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~orbel~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.4,-117.81C762.36,-99.65 742.72,-65.95 715,-50 643.52,-8.88 545.62,-5.01 485.16,-7.43"/>
-<polygon fill="#000000" stroke="#000000" points="484.88,-3.94 475.05,-7.91 485.21,-10.93 484.88,-3.94"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C629.61,-300.42 629.62,-322.18 588,-339 522.42,-365.5 500.59,-362.34 430,-358"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~orbel~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.28,-236C397.16,-231.95 389.51,-227.15 383,-222 356.27,-200.87 330.05,-171.39 313.96,-152.01"/>
+<polygon fill="#000000" stroke="#000000" points="316.55,-149.66 307.51,-144.13 311.13,-154.09 316.55,-149.66"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~orbel~~UsesGraph_edge12" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-236C244.68,-231.96 230.09,-227.4 216.5,-223.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-219.77 206.82,-220.13 215.32,-226.45 217.41,-219.77"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.3,-235.93C375.49,-225.2 334.97,-210.78 298,-208"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~orbel~~UsesGraph_edge14" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-158C501.22,-154.04 488.01,-149.58 475.64,-145.4"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-142.01 465.94,-142.13 474.29,-148.65 476.53,-142.01"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-255.86C250.84,-246.83 224.35,-234.41 203.17,-224.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-221.2 193.86,-220.12 201.43,-227.54 204.4,-221.2"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge13" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.74,-171C476.34,-170.68 424.69,-167.09 383,-151 339.62,-134.26 341.43,-73.38 298,-90"/>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~orbel~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.96,-144.16C634.51,-162.53 595.57,-197.51 571.45,-219.18"/>
+<polygon fill="#000000" stroke="#000000" points="568.98,-216.7 563.88,-225.98 573.66,-221.9 568.98,-216.7"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge15" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.3,-235.93C375.49,-225.2 334.97,-210.78 298,-208"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~orbel~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-133.66C604.29,-134.15 575.82,-134.09 550.5,-132"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C518.77,-129.55 486.83,-118.21 463.6,-108.23"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-104.92 454.22,-104.06 461.94,-111.32 464.78,-104.92"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~orbel~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.66,-235.89C398.31,-231.7 390.19,-226.84 383,-222 366.19,-210.68 364.02,-205.01 347,-194 342.2,-190.89 336.99,-187.83 331.82,-184.95"/>
-<polygon fill="#000000" stroke="#000000" points="333.12,-181.68 322.65,-180.02 329.8,-187.84 333.12,-181.68"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C403,-130.12 375.23,-129.87 351.79,-130.19"/>
+<polygon fill="#000000" stroke="#000000" points="351.63,-126.69 341.69,-130.37 351.75,-133.69 351.63,-126.69"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~orbel~~UsesGraph_edge15" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C367.72,-127.46 352.71,-66.28 298,-92"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.01,-127.67 482.52,-135.96 430,-132"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~orbel~~UsesGraph_edge19" class="edge">
+<g id="module~~orbel~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-102C501.22,-105.96 488.01,-110.42 475.64,-114.6"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-111.35 465.94,-117.87 476.53,-117.99 474.29,-111.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-241.14C500.52,-242.05 488.57,-243.06 477.23,-244.01"/>
+<polygon fill="#000000" stroke="#000000" points="476.71,-240.55 467.04,-244.87 477.3,-247.52 476.71,-240.55"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~orbel~~UsesGraph_edge21" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C386.89,-196.97 345.49,-169.23 320.8,-150.5"/>
+<polygon fill="#000000" stroke="#000000" points="322.84,-147.65 312.79,-144.29 318.55,-153.18 322.84,-147.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.34,-228.88C487.95,-223.07 457.16,-215.29 430,-208"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge17" class="edge">
+<g id="module~~orbel~~UsesGraph_edge19" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C370.82,-98.27 351.8,-68.94 298,-90"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.47,-87.29C488.01,-86.24 457.08,-86.08 430,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-208C271.5,-206.15 244.29,-205.9 221.27,-206.21"/>
+<polygon fill="#000000" stroke="#000000" points="220.96,-202.72 211.02,-206.39 221.08,-209.72 220.96,-202.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C372.2,-193.03 355.61,-212.34 298,-208"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~orbel~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C384.19,-96.34 341.84,-128.01 317.94,-148.99"/>
-<polygon fill="#000000" stroke="#000000" points="315.35,-146.61 310.28,-155.91 320.04,-151.81 315.35,-146.61"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~orbel~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-104C375.88,-108.04 361.06,-112.6 347.26,-116.84"/>
+<polygon fill="#000000" stroke="#000000" points="345.95,-113.58 337.43,-119.87 348.01,-120.27 345.95,-113.58"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge20" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-117.93C370.04,-103.65 317.13,-82.68 298,-90"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~orbel~~UsesGraph_edge22" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.32,-83.12C358.94,-79.72 325.06,-79.28 298,-92"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~orbel~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-140.89C377.83,-144.67 363.11,-148.97 349.26,-153.02"/>
-<polygon fill="#000000" stroke="#000000" points="347.98,-149.74 339.37,-155.91 349.95,-156.46 347.98,-149.74"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~orbel~~UsesGraph_edge24" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.81,-47.77C551.57,-42.87 406.32,-41.08 298,-92"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~orbel~~UsesGraph_edge25" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.72,-144.04C254.59,-156.59 221.29,-176.36 197.3,-190.6"/>
+<polygon fill="#000000" stroke="#000000" points="195.42,-187.65 188.61,-195.76 199,-193.67 195.42,-187.65"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~orbel~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.13,-305.97C509.14,-294.75 480.6,-277.89 459.19,-265.24"/>
+<polygon fill="#000000" stroke="#000000" points="460.89,-262.18 450.5,-260.11 457.33,-268.21 460.89,-262.18"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~orbel~~UsesGraph_edge26" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-358C342.2,-365.07 318.96,-336.26 247,-289 221.6,-272.32 198.05,-246.22 183.39,-228.18"/>
+<polygon fill="#000000" stroke="#000000" points="185.9,-225.71 176.94,-220.05 180.41,-230.06 185.9,-225.71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.2,-330.18C505.12,-342.74 465.98,-360.21 430,-358"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~orbel~~UsesGraph_edge28" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-92C274.86,-101.94 265.89,-97.27 247,-111 218.38,-131.8 194.2,-165.41 180.39,-187.1"/>
+<polygon fill="#000000" stroke="#000000" points="177.25,-185.52 174.96,-195.86 183.2,-189.2 177.25,-185.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.38,-24.25C398.93,-28.53 390.56,-33.42 383,-38 344.73,-61.2 338.5,-72.96 298,-92"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~orbel~~UsesGraph_node13" class="node">
@@ -481,62 +526,11 @@ <h3 class="panel-title">Uses</h3>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~orbel~~UsesGraph_edge22" class="edge">
+<g id="module~~orbel~~UsesGraph_edge29" class="edge">
 <title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-208C114.58,-208 105.86,-208 97.36,-208"/>
 <polygon fill="#000000" stroke="#000000" points="97.13,-204.5 87.13,-208 97.13,-211.5 97.13,-204.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~orbel~~UsesGraph_edge23" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-170C617.64,-170 607.75,-170 598.27,-170"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-166.5 588.18,-170 598.18,-173.5 598.18,-166.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~orbel~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-210C522.97,-216.11 494.97,-224.99 472.61,-232.62"/>
-<polygon fill="#000000" stroke="#000000" points="471.38,-229.34 463.08,-235.91 473.67,-235.96 471.38,-229.34"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~orbel~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-157.75C639.23,-153.55 631.18,-148.72 624,-144 606.9,-132.77 588.34,-119.12 574.15,-108.36"/>
-<polygon fill="#000000" stroke="#000000" points="576,-105.37 565.93,-102.07 571.75,-110.93 576,-105.37"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-208C271.5,-206.15 244.29,-205.9 221.27,-206.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-202.72 211.02,-206.39 221.08,-209.72 220.96,-202.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C370.42,-203.18 355.61,-212.34 298,-208"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~orbel~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.9,-182.1C614.34,-191 580.79,-202.75 550.5,-210"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C395.45,-205.28 360.12,-193.82 334.52,-183.86"/>
-<polygon fill="#000000" stroke="#000000" points="335.79,-180.6 325.21,-180.14 333.19,-187.1 335.79,-180.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-210C497.27,-222.27 482.49,-212.39 430,-208"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-180C244.68,-184.04 230.09,-188.6 216.5,-192.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-189.55 206.82,-195.87 217.41,-196.23 215.32,-189.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge29" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.84,-64.48C552.26,-55.94 408.66,-46.69 298,-90"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~orbel~~UsesGraph_edge30" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-90C245.57,-109.3 203.18,-159.14 182.18,-187.48"/>
-<polygon fill="#000000" stroke="#000000" points="179.14,-185.71 176.13,-195.87 184.82,-189.81 179.14,-185.71"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-24.06C399.32,-28.41 390.76,-33.39 383,-38 344.94,-60.64 339.36,-74.17 298,-90"/>
-</g>
 </g>
 </svg>
 </div><script>var panmoduleorbelUsesGraph = svgPanZoom('#moduleorbelUsesGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/module/rmvs_classes.html b/docs/module/rmvs_classes.html
index 7f994f473..75b846a38 100644
--- a/docs/module/rmvs_classes.html
+++ b/docs/module/rmvs_classes.html
@@ -136,7 +136,7 @@ <h1>rmvs_classes
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.3% of total for modules and submodules.">210 statements</a>
+    title=" 1.3% of total for modules and submodules.">214 statements</a>
      </li> 
      
      
@@ -208,10 +208,10 @@ <h3>Contents</h3>
   <div id="inters-0" class="panel-collapse collapse">
     <div class="list-group">
       
-      <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_chk_ind">rmvs_chk_ind</a>
-      
       <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_encounter_check_tp">rmvs_encounter_check_tp</a>
       
+      <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_chk_ind">rmvs_chk_ind</a>
+      
       <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_discard_tp">rmvs_discard_tp</a>
       
       <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_io_write_encounter">rmvs_io_write_encounter</a>
@@ -376,9 +376,9 @@ <h3 class="panel-title">Uses</h3>
 <polygon fill="#000000" stroke="#000000" points="458.64,-17.07 448.17,-18.73 457.39,-23.95 458.64,-17.07"/>
 </g>
 <!-- iso_fortran_env -->
-<g id="module~~rmvs_classes~~UsesGraph_node5" class="node">
+<g id="module~~rmvs_classes~~UsesGraph_node4" class="node">
 <title>iso_fortran_env</title>
-<g id="a_module~~rmvs_classes~~UsesGraph_node5"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<g id="a_module~~rmvs_classes~~UsesGraph_node4"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
 <polygon fill="#337ab7" stroke="#337ab7" points="87,-44 0,-44 0,-20 87,-20 87,-44"/>
 <text text-anchor="middle" x="43.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
@@ -398,9 +398,9 @@ <h3 class="panel-title">Uses</h3>
 <polygon fill="#000000" stroke="#000000" points="221.58,-41.13 211.09,-42.61 220.22,-47.99 221.58,-41.13"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~rmvs_classes~~UsesGraph_node4" class="node">
+<g id="module~~rmvs_classes~~UsesGraph_node5" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~rmvs_classes~~UsesGraph_node4"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<g id="a_module~~rmvs_classes~~UsesGraph_node5"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
 <polygon fill="#337ab7" stroke="#337ab7" points="336,-24 247,-24 247,0 336,0 336,-24"/>
 <text text-anchor="middle" x="291.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
@@ -521,1175 +521,1103 @@ <h3 class="panel-title">Used by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~rmvs_classes~~UsedByGraph Pages: 1 -->
-<svg id="modulermvs_classesUsedByGraph" width="489pt" height="2888pt"
- viewBox="0.00 0.00 489.00 2888.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="modulermvs_classesUsedByGraph" width="368pt" height="2888pt"
+ viewBox="0.00 0.00 368.00 2888.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="module~~rmvs_classes~~UsedByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 2884)">
 <title>module~~rmvs_classes~~UsedByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-2884 485,-2884 485,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-2884 364,-2884 364,4 -4,4"/>
 <!-- module~rmvs_classes -->
 <g id="module~~rmvs_classes~~UsedByGraph_node1" class="node">
 <title>module~rmvs_classes</title>
-<polygon fill="none" stroke="black" points="77,-1410 0,-1410 0,-1386 77,-1386 77,-1410"/>
-<text text-anchor="middle" x="38.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_classes</text>
+<polygon fill="none" stroke="black" points="77,-2103 0,-2103 0,-2079 77,-2079 77,-2103"/>
+<text text-anchor="middle" x="38.5" y="-2088.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_classes</text>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_rmvs_io -->
 <g id="module~~rmvs_classes~~UsedByGraph_node2" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-2880 363,-2880 363,-2856 442,-2856 442,-2880"/>
-<text text-anchor="middle" x="402.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="312,-2880 251,-2880 251,-2856 312,-2856 312,-2880"/>
+<text text-anchor="middle" x="281.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge3" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M362.85,-2861.75C349.92,-2858.59 335.79,-2853.89 324,-2847 290.08,-2827.17 294.15,-2806.57 262,-2784"/>
+<!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge2" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M250.9,-2865.36C235.36,-2862.73 216.75,-2857.47 203,-2847 159.89,-2814.16 182.17,-2777.25 141,-2742"/>
 </g>
 <!-- module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_node7" class="node">
+<g id="module~~rmvs_classes~~UsedByGraph_node6" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node7"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="288,-1410 234,-1410 234,-1386 288,-1386 288,-1410"/>
-<text text-anchor="middle" x="261" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
-</a>
-</g>
-</g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge39" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.77,-2866.78C348.38,-2864.23 333.31,-2858.65 324,-2847 277.48,-2788.82 263.98,-1599.73 262.21,-1420.53"/>
-<polygon fill="#000000" stroke="#000000" points="265.71,-1420.38 262.11,-1410.42 258.71,-1420.45 265.71,-1420.38"/>
-</g>
-<!-- module~s_rmvs_step -->
-<g id="module~~rmvs_classes~~UsedByGraph_node3" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439,-2838 366,-2838 366,-2814 439,-2814 439,-2838"/>
-<text text-anchor="middle" x="402.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node6"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="167,-1473 113,-1473 113,-1449 167,-1449 167,-1473"/>
+<text text-anchor="middle" x="140" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge4" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M365.83,-2821.62C335.89,-2816.54 293.16,-2805.87 262,-2784"/>
-</g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge67" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.99,-2825.3C350.68,-2823.02 334.02,-2817.51 324,-2805 278.81,-2748.56 264.2,-1595.04 262.24,-1420.14"/>
-<polygon fill="#000000" stroke="#000000" points="265.74,-1420.02 262.13,-1410.06 258.74,-1420.1 265.74,-1420.02"/>
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge28" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.89,-2868.02C234.14,-2866.34 214.33,-2861.14 203,-2847 158.51,-2791.47 143.33,-1657.45 141.25,-1483.35"/>
+<polygon fill="#000000" stroke="#000000" points="144.75,-1483.25 141.14,-1473.29 137.75,-1483.33 144.75,-1483.25"/>
 </g>
 <!-- module~s_rmvs_chk -->
-<g id="module~~rmvs_classes~~UsedByGraph_node4" class="node">
+<g id="module~~rmvs_classes~~UsedByGraph_node3" class="node">
 <title>module~s_rmvs_chk</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-2796 367.5,-2796 367.5,-2772 437.5,-2772 437.5,-2796"/>
-<text text-anchor="middle" x="402.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-2838 246.5,-2838 246.5,-2814 316.5,-2814 316.5,-2838"/>
+<text text-anchor="middle" x="281.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge5" class="edge">
+<g id="module~~rmvs_classes~~UsedByGraph_edge3" class="edge">
 <title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M367.25,-2794.21C336.81,-2801.08 292.53,-2805.43 262,-2784"/>
+<path fill="none" stroke="#000000" d="M246.16,-2820.76C232.11,-2817.61 216.12,-2812.67 203,-2805 169.08,-2785.17 170.84,-2767.55 141,-2742"/>
 </g>
 <!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge60" class="edge">
+<g id="module~~rmvs_classes~~UsedByGraph_edge34" class="edge">
 <title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.19,-2783.46C351.56,-2781.3 334.29,-2775.83 324,-2763 280.19,-2708.36 264.44,-1592.59 262.27,-1420.27"/>
-<polygon fill="#000000" stroke="#000000" points="265.77,-1420.06 262.14,-1410.1 258.77,-1420.15 265.77,-1420.06"/>
-</g>
-<!-- module~s_rmvs_util -->
-<g id="module~~rmvs_classes~~UsedByGraph_node5" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="436,-2754 369,-2754 369,-2730 436,-2730 436,-2754"/>
-<text text-anchor="middle" x="402.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
-</a>
-</g>
-</g>
-<!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge7" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M368.94,-2750.34C355.04,-2754.03 338.67,-2758.53 324,-2763 296.17,-2771.48 285.81,-2800.72 262,-2784"/>
-</g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge32" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.78,-2741.66C352.75,-2739.65 334.65,-2734.26 324,-2721 281.56,-2668.14 264.7,-1589.92 262.3,-1420.36"/>
-<polygon fill="#000000" stroke="#000000" points="265.8,-1420.08 262.16,-1410.13 258.8,-1420.18 265.8,-1420.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.19,-2825.46C230.56,-2823.29 213.29,-2817.83 203,-2805 159.89,-2751.26 143.58,-1654.87 141.29,-1483.45"/>
+<polygon fill="#000000" stroke="#000000" points="144.79,-1483.28 141.15,-1473.32 137.79,-1483.37 144.79,-1483.28"/>
 </g>
 <!-- module~s_rmvs_discard -->
-<g id="module~~rmvs_classes~~UsedByGraph_node6" class="node">
+<g id="module~~rmvs_classes~~UsedByGraph_node4" class="node">
 <title>module~s_rmvs_discard</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="446.5,-2712 358.5,-2712 358.5,-2688 446.5,-2688 446.5,-2712"/>
-<text text-anchor="middle" x="402.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-2796 237.5,-2796 237.5,-2772 325.5,-2772 325.5,-2796"/>
+<text text-anchor="middle" x="281.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge6" class="edge">
+<g id="module~~rmvs_classes~~UsedByGraph_edge4" class="edge">
 <title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M260,-2784C115.84,-2784 49.77,-1599.36 40.62,-1420.5"/>
-<polygon fill="#000000" stroke="#000000" points="44.11,-1420.22 40.1,-1410.41 37.11,-1420.57 44.11,-1420.22"/>
-<path fill="none" stroke="#000000" d="M358.46,-2707.37C346.77,-2710.49 334.47,-2714.88 324,-2721 290.08,-2740.83 294.15,-2806.57 262,-2784"/>
+<path fill="none" stroke="#000000" d="M237.42,-2780.18C207.38,-2775.51 167.99,-2765.11 141,-2742"/>
 </g>
 <!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge30" class="edge">
+<g id="module~~rmvs_classes~~UsedByGraph_edge38" class="edge">
 <title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M358.35,-2697.87C345.38,-2694.99 332.39,-2689.43 324,-2679 282.91,-2627.9 264.94,-1586 262.34,-1420.16"/>
-<polygon fill="#000000" stroke="#000000" points="265.84,-1420.08 262.18,-1410.14 258.84,-1420.19 265.84,-1420.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M237.34,-2781.87C224.38,-2778.99 211.38,-2773.43 203,-2763 161.26,-2711.05 143.84,-1652.08 141.32,-1483.52"/>
+<polygon fill="#000000" stroke="#000000" points="144.82,-1483.29 141.17,-1473.34 137.82,-1483.39 144.82,-1483.29"/>
+</g>
+<!-- module~s_rmvs_step -->
+<g id="module~~rmvs_classes~~UsedByGraph_node5" class="node">
+<title>module~s_rmvs_step</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="318,-2754 245,-2754 245,-2730 318,-2730 318,-2754"/>
+<text text-anchor="middle" x="281.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+</a>
+</g>
+</g>
+<!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge5" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M244.9,-2753.63C213.77,-2761.36 169.24,-2766.18 141,-2742"/>
+</g>
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge20" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M244.61,-2741.21C229.42,-2738.9 212.96,-2733.38 203,-2721 162.64,-2670.86 144.12,-1650.08 141.37,-1483.8"/>
+<polygon fill="#000000" stroke="#000000" points="144.86,-1483.28 141.19,-1473.33 137.86,-1483.39 144.86,-1483.28"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge1" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.73,-1385.95C256.67,-1252.27 227.18,-51.56 156.5,-54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M137.1,-1473.02C125.03,-1549.43 59.02,-1967.37 43,-2068.81"/>
+<polygon fill="#000000" stroke="#000000" points="39.52,-2068.43 41.42,-2078.85 46.44,-2069.52 39.52,-2068.43"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~s_rmvs_setup -->
+<g id="module~~rmvs_classes~~UsedByGraph_node7" class="node">
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node7"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-2712 242,-2712 242,-2688 321,-2688 321,-2712"/>
+<text text-anchor="middle" x="281.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+</a>
+</g>
+</g>
+<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge6" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M241.73,-2710C229.31,-2713.34 215.54,-2717.18 203,-2721 175.17,-2729.48 163.1,-2760.92 141,-2742"/>
+</g>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge57" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.81,-2698.74C227.44,-2696.19 212.36,-2690.61 203,-2679 163.99,-2630.61 144.37,-1645.83 141.4,-1483.55"/>
+<polygon fill="#000000" stroke="#000000" points="144.9,-1483.24 141.21,-1473.31 137.9,-1483.37 144.9,-1483.24"/>
+</g>
+<!-- module~s_rmvs_kick -->
 <g id="module~~rmvs_classes~~UsedByGraph_node8" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node8"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="198,-1410 113,-1410 113,-1386 198,-1386 198,-1410"/>
-<text text-anchor="middle" x="155.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="317,-2670 246,-2670 246,-2646 317,-2646 317,-2670"/>
+<text text-anchor="middle" x="281.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge79" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.88,-1398C226.13,-1398 217.36,-1398 208.58,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="208.32,-1394.5 198.32,-1398 208.32,-1401.5 208.32,-1394.5"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge7" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M245.77,-2663.32C231.82,-2666.48 216,-2671.4 203,-2679 169.08,-2698.83 170.84,-2767.55 141,-2742"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge2" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M112.98,-1398C104.66,-1398 95.85,-1398 87.33,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="87.14,-1394.5 77.14,-1398 87.14,-1401.5 87.14,-1394.5"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge26" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.83,-2657.37C230.32,-2655.16 213.25,-2649.69 203,-2637 165.32,-2590.36 144.63,-1641.44 141.44,-1483.26"/>
+<polygon fill="#000000" stroke="#000000" points="144.94,-1483.19 141.24,-1473.26 137.94,-1483.33 144.94,-1483.19"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_rmvs_util -->
 <g id="module~~rmvs_classes~~UsedByGraph_node9" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="433,-66 372,-66 372,-42 433,-42 433,-66"/>
-<text text-anchor="middle" x="402.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="315,-2628 248,-2628 248,-2604 315,-2604 315,-2628"/>
+<text text-anchor="middle" x="281.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
+<!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge8" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M371.79,-52.74C343.52,-51.83 299.8,-51.21 262,-54"/>
+<title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M139,-2742C41.17,-2658.24 38.47,-2217.72 39.23,-2113.24"/>
+<polygon fill="#000000" stroke="#000000" points="42.73,-2113.22 39.32,-2103.19 35.73,-2113.16 42.73,-2113.22"/>
+<path fill="none" stroke="#000000" d="M247.86,-2619.18C232.98,-2621.97 215.86,-2627.2 203,-2637 159.89,-2669.84 182.17,-2777.25 141,-2742"/>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge37" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.9,-53.98C355.15,-55.67 335.35,-60.87 324,-75 281.56,-127.86 264.7,-1206.08 262.3,-1375.64"/>
-<polygon fill="#000000" stroke="#000000" points="258.8,-1375.82 262.16,-1385.87 265.8,-1375.92 258.8,-1375.82"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge45" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.82,-2615.63C231.8,-2613.61 213.7,-2608.22 203,-2595 166.7,-2550.14 144.94,-1638.73 141.48,-1483.41"/>
+<polygon fill="#000000" stroke="#000000" points="144.98,-1483.12 141.26,-1473.2 137.98,-1483.27 144.98,-1483.12"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~rmvs_classes~~UsedByGraph_node10" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-24 367,-24 367,0 438,0 438,-24"/>
-<text text-anchor="middle" x="402.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="340.5,-1704 222.5,-1704 222.5,-1680 340.5,-1680 340.5,-1704"/>
+<text text-anchor="middle" x="281.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge9" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M366.65,-20.95C353.26,-24.52 337.87,-28.78 324,-33 296.17,-41.48 291.01,-51.86 262,-54"/>
-<path fill="none" stroke="#000000" d="M154.5,-54C85.29,-56.38 45.79,-1201.96 40.19,-1375.96"/>
-<polygon fill="#000000" stroke="#000000" points="36.69,-1375.89 39.87,-1385.99 43.69,-1376.11 36.69,-1375.89"/>
-<path fill="none" stroke="#000000" d="M260,-54C214.12,-57.39 202.47,-52.42 156.5,-54"/>
-</g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge35" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.79,-12.6C351.27,-14.79 334.2,-20.27 324,-33 280.19,-87.64 264.44,-1203.41 262.27,-1375.73"/>
-<polygon fill="#000000" stroke="#000000" points="258.77,-1375.85 262.14,-1385.9 265.77,-1375.94 258.77,-1375.85"/>
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M222.33,-1683.4C215.19,-1680.39 208.48,-1676.36 203,-1671 150.48,-1619.65 141.92,-1526.17 140.88,-1483.42"/>
+<polygon fill="#000000" stroke="#000000" points="144.38,-1483.2 140.76,-1473.24 137.38,-1483.28 144.38,-1483.2"/>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_gr -->
 <g id="module~~rmvs_classes~~UsedByGraph_node11" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-2670 363,-2670 363,-2646 442,-2646 442,-2670"/>
-<text text-anchor="middle" x="402.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_gr</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-1662 254.5,-1662 254.5,-1638 308.5,-1638 308.5,-1662"/>
+<text text-anchor="middle" x="281.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<!-- module~s_gr&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge10" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.81,-2656.74C348.43,-2654.19 333.36,-2648.62 324,-2637 284.29,-2587.71 265.23,-1583.94 262.38,-1420.43"/>
-<polygon fill="#000000" stroke="#000000" points="265.87,-1420.07 262.2,-1410.13 258.87,-1420.19 265.87,-1420.07"/>
-</g>
-<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge80" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M362.99,-2653.61C349.63,-2650.6 335.2,-2645.53 324,-2637 280.89,-2604.16 302.06,-2568.5 262,-2532"/>
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.23,-1648.87C237.68,-1646.85 216.89,-1641.7 203,-1629 160.38,-1590.01 146.97,-1519.14 142.82,-1483.19"/>
+<polygon fill="#000000" stroke="#000000" points="146.3,-1482.82 141.8,-1473.22 139.33,-1483.53 146.3,-1482.82"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_util_valid -->
 <g id="module~~rmvs_classes~~UsedByGraph_node12" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-2628 363,-2628 363,-2604 442,-2604 442,-2628"/>
-<text text-anchor="middle" x="402.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="314,-1620 249,-1620 249,-1596 314,-1596 314,-1620"/>
+<text text-anchor="middle" x="281.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge13" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.82,-2614.74C348.44,-2612.18 333.37,-2606.61 324,-2595 285.64,-2547.46 265.48,-1579.65 262.41,-1420.16"/>
-<polygon fill="#000000" stroke="#000000" points="265.91,-1420.03 262.22,-1410.1 258.91,-1420.16 265.91,-1420.03"/>
-</g>
-<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge81" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M362.85,-2609.75C349.92,-2606.59 335.79,-2601.89 324,-2595 290.08,-2575.17 291.04,-2558.46 262,-2532"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge11" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.67,-1605.46C233.45,-1602.83 215.8,-1597.55 203,-1587 170.13,-1559.92 153.25,-1511.13 145.84,-1482.87"/>
+<polygon fill="#000000" stroke="#000000" points="149.24,-1482.01 143.45,-1473.13 142.44,-1483.67 149.24,-1482.01"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_symba_collision -->
 <g id="module~~rmvs_classes~~UsedByGraph_node13" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="432.5,-2376 372.5,-2376 372.5,-2352 432.5,-2352 432.5,-2376"/>
-<text text-anchor="middle" x="402.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331,-1578 232,-1578 232,-1554 331,-1554 331,-1578"/>
+<text text-anchor="middle" x="281.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge11" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.38,-2363.98C355.59,-2362.3 335.57,-2357.13 324,-2343 263.74,-2269.36 261.76,-1556.18 261.94,-1420.3"/>
-<polygon fill="#000000" stroke="#000000" points="265.44,-1420.24 261.96,-1410.24 258.44,-1420.23 265.44,-1420.24"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge12" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M231.59,-1558.08C221.58,-1555.03 211.52,-1550.82 203,-1545 179.58,-1528.98 161.62,-1501.14 151.2,-1481.93"/>
+<polygon fill="#000000" stroke="#000000" points="154.29,-1480.29 146.57,-1473.03 148.08,-1483.52 154.29,-1480.29"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_obl -->
 <g id="module~~rmvs_classes~~UsedByGraph_node14" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node14"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="429.5,-2334 375.5,-2334 375.5,-2310 429.5,-2310 429.5,-2334"/>
-<text text-anchor="middle" x="402.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_obl</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-1536 254.5,-1536 254.5,-1512 308.5,-1512 308.5,-1536"/>
+<text text-anchor="middle" x="281.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge12" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.44,-2322.24C358.09,-2320.88 336.29,-2315.98 324,-2301 266.42,-2230.85 262.27,-1551.96 262.01,-1420.12"/>
-<polygon fill="#000000" stroke="#000000" points="265.51,-1420.01 262,-1410.01 258.51,-1420.02 265.51,-1420.01"/>
+<!-- module~s_obl&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge13" class="edge">
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.27,-1519.16C238.9,-1515.77 219.35,-1510.5 203,-1503 189.25,-1496.69 175.19,-1487.45 163.95,-1479.23"/>
+<polygon fill="#000000" stroke="#000000" points="166.04,-1476.43 155.95,-1473.22 161.84,-1482.02 166.04,-1476.43"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~rmvs_classes~~UsedByGraph_node15" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="435.5,-2292 369.5,-2292 369.5,-2268 435.5,-2268 435.5,-2292"/>
-<text text-anchor="middle" x="402.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-1494 237,-1494 237,-1470 326,-1470 326,-1494"/>
+<text text-anchor="middle" x="281.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge14" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369.31,-2279.6C353.22,-2277.6 334.9,-2272.23 324,-2259 269.14,-2192.4 262.81,-1548.83 262.09,-1420.28"/>
-<polygon fill="#000000" stroke="#000000" points="265.59,-1420.06 262.04,-1410.08 258.59,-1420.09 265.59,-1420.06"/>
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M236.74,-1475.41C217.55,-1472.52 195.29,-1469.17 177.07,-1466.43"/>
+<polygon fill="#000000" stroke="#000000" points="177.55,-1462.96 167.14,-1464.93 176.51,-1469.88 177.55,-1462.96"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_util_coord -->
 <g id="module~~rmvs_classes~~UsedByGraph_node16" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-2250 363,-2250 363,-2226 442,-2226 442,-2250"/>
-<text text-anchor="middle" x="402.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1452 246.5,-1452 246.5,-1428 316.5,-1428 316.5,-1452"/>
+<text text-anchor="middle" x="281.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge15" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.96,-2236.62C348.6,-2234.05 333.5,-2228.5 324,-2217 271.85,-2153.92 263.37,-1545.29 262.18,-1420.35"/>
-<polygon fill="#000000" stroke="#000000" points="265.68,-1420.06 262.09,-1410.09 258.68,-1420.12 265.68,-1420.06"/>
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.37,-1445.14C225.44,-1448.29 198.65,-1452.32 177.33,-1455.53"/>
+<polygon fill="#000000" stroke="#000000" points="176.71,-1452.08 167.35,-1457.03 177.75,-1459.01 176.71,-1452.08"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~rmvs_classes~~UsedByGraph_node17" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="436.5,-2208 368.5,-2208 368.5,-2184 436.5,-2184 436.5,-2208"/>
-<text text-anchor="middle" x="402.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="353,-1410 210,-1410 210,-1386 353,-1386 353,-1410"/>
+<text text-anchor="middle" x="281.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge16" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.17,-2195.41C352.38,-2193.29 334.69,-2187.87 324,-2175 274.54,-2115.43 263.96,-1541.35 262.27,-1420.33"/>
-<polygon fill="#000000" stroke="#000000" points="265.77,-1420.01 262.14,-1410.06 258.77,-1420.11 265.77,-1420.01"/>
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M226.73,-1410.08C218.62,-1412.61 210.48,-1415.57 203,-1419 189.25,-1425.31 175.19,-1434.55 163.95,-1442.77"/>
+<polygon fill="#000000" stroke="#000000" points="161.84,-1439.98 155.95,-1448.78 166.04,-1445.57 161.84,-1439.98"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~s_whm_coord -->
 <g id="module~~rmvs_classes~~UsedByGraph_node18" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-2166 363,-2166 363,-2142 442,-2142 442,-2166"/>
-<text text-anchor="middle" x="402.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~s_whm_coord</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-1368 242,-1368 242,-1344 321,-1344 321,-1368"/>
+<text text-anchor="middle" x="281.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge17" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.61,-2152.51C348.38,-2149.9 333.46,-2144.35 324,-2133 277.27,-2076.97 264.6,-1538.15 262.39,-1420.58"/>
-<polygon fill="#000000" stroke="#000000" points="265.88,-1420.21 262.2,-1410.27 258.88,-1420.33 265.88,-1420.21"/>
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.66,-1361.22C228.56,-1364.3 214.39,-1369.21 203,-1377 179.58,-1393.02 161.62,-1420.86 151.2,-1440.07"/>
+<polygon fill="#000000" stroke="#000000" points="148.08,-1438.48 146.57,-1448.97 154.29,-1441.71 148.08,-1438.48"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_util_rescale -->
 <g id="module~~rmvs_classes~~UsedByGraph_node19" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-2124 375.5,-2124 375.5,-2100 429.5,-2100 429.5,-2124"/>
-<text text-anchor="middle" x="402.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320.5,-1326 242.5,-1326 242.5,-1302 320.5,-1302 320.5,-1326"/>
+<text text-anchor="middle" x="281.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge18" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.16,-2112.12C357.91,-2110.69 336.36,-2105.74 324,-2091 279.92,-2038.42 265.25,-1533.34 262.5,-1420.35"/>
-<polygon fill="#000000" stroke="#000000" points="266,-1420.04 262.26,-1410.13 259,-1420.21 266,-1420.04"/>
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M242.42,-1317.75C228.79,-1320.69 214.08,-1325.87 203,-1335 170.13,-1362.08 153.25,-1410.87 145.84,-1439.13"/>
+<polygon fill="#000000" stroke="#000000" points="142.44,-1438.33 143.45,-1448.87 149.24,-1439.99 142.44,-1438.33"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~rmvs_classes~~UsedByGraph_node20" class="node">
-<title>module~s_io</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-2082 375.5,-2082 375.5,-2058 429.5,-2058 429.5,-2082"/>
-<text text-anchor="middle" x="402.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="360,-1284 203,-1284 203,-1260 360,-1260 360,-1284"/>
+<text text-anchor="middle" x="281.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge19" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.19,-2070.1C357.95,-2068.66 336.4,-2063.71 324,-2049 282.6,-1999.91 265.95,-1529.13 262.64,-1420.35"/>
-<polygon fill="#000000" stroke="#000000" points="266.13,-1420.09 262.34,-1410.2 259.14,-1420.3 266.13,-1420.09"/>
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M215.74,-1284.17C211.13,-1286.6 206.81,-1289.52 203,-1293 160.38,-1331.99 146.97,-1402.86 142.82,-1438.81"/>
+<polygon fill="#000000" stroke="#000000" points="139.33,-1438.47 141.8,-1448.78 146.3,-1439.18 139.33,-1438.47"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_util_index -->
 <g id="module~~rmvs_classes~~UsedByGraph_node21" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439,-2040 366,-2040 366,-2016 439,-2016 439,-2040"/>
-<text text-anchor="middle" x="402.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_util_index</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316,-1242 247,-1242 247,-1218 316,-1218 316,-1242"/>
+<text text-anchor="middle" x="281.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge20" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.91,-2026.97C350.78,-2024.6 334.28,-2019.12 324,-2007 285.26,-1961.37 266.69,-1524.4 262.79,-1420.22"/>
-<polygon fill="#000000" stroke="#000000" points="266.29,-1420.06 262.42,-1410.19 259.29,-1420.31 266.29,-1420.06"/>
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge21" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.69,-1231.83C231.56,-1234.32 214.56,-1239.69 203,-1251 150.48,-1302.35 141.92,-1395.83 140.88,-1438.58"/>
+<polygon fill="#000000" stroke="#000000" points="137.38,-1438.72 140.76,-1448.76 144.38,-1438.8 137.38,-1438.72"/>
 </g>
-<!-- module~orbel -->
+<!-- proc~ge_wpp -->
 <g id="module~~rmvs_classes~~UsedByGraph_node22" class="node">
-<title>module~orbel</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node22"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="429.5,-1998 375.5,-1998 375.5,-1974 429.5,-1974 429.5,-1998"/>
-<text text-anchor="middle" x="402.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node22"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="308.5,-1200 254.5,-1200 254.5,-1176 308.5,-1176 308.5,-1200"/>
+<text text-anchor="middle" x="281.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge21" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.25,-1986.05C358.05,-1984.58 336.5,-1979.62 324,-1965 287.94,-1922.84 267.5,-1519.95 262.97,-1420.24"/>
-<polygon fill="#000000" stroke="#000000" points="266.46,-1419.93 262.51,-1410.1 259.46,-1420.24 266.46,-1419.93"/>
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge22" class="edge">
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.48,-1188.54C237.6,-1190.29 216.35,-1195.34 203,-1209 170.75,-1242.02 150.41,-1383.6 143.57,-1438.82"/>
+<polygon fill="#000000" stroke="#000000" points="140.07,-1438.59 142.35,-1448.94 147.02,-1439.43 140.07,-1438.59"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- module~s_operator_cross -->
 <g id="module~~rmvs_classes~~UsedByGraph_node23" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="440,-2586 365,-2586 365,-2562 440,-2562 440,-2586"/>
-<text text-anchor="middle" x="402.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>module~s_operator_cross</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-1158 233.5,-1158 233.5,-1134 329.5,-1134 329.5,-1158"/>
+<text text-anchor="middle" x="281.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge22" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.84,-2573.07C349.88,-2570.68 333.82,-2565.14 324,-2553 287.01,-2507.25 265.78,-1577.09 262.46,-1420.33"/>
-<polygon fill="#000000" stroke="#000000" points="265.95,-1419.97 262.24,-1410.05 258.96,-1420.12 265.95,-1419.97"/>
-</g>
-<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge85" class="edge">
-<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M364.9,-2571.62C333.98,-2567.78 290.32,-2557.81 262,-2532"/>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge23" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.45,-1150.17C222.15,-1153.3 211.04,-1158.49 203,-1167 165.65,-1206.53 148.01,-1376.72 142.75,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="139.24,-1438.46 141.91,-1448.71 146.22,-1439.03 139.24,-1438.46"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- module~s_fraggle_set -->
 <g id="module~~rmvs_classes~~UsedByGraph_node24" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="452,-2544 353,-2544 353,-2520 452,-2520 452,-2544"/>
-<text text-anchor="middle" x="402.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-1116 243,-1116 243,-1092 320,-1092 320,-1116"/>
+<text text-anchor="middle" x="281.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge23" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M352.73,-2528.39C341.73,-2525.23 331.2,-2519.88 324,-2511 288.38,-2467.04 266.09,-1574.31 262.51,-1420.48"/>
-<polygon fill="#000000" stroke="#000000" points="266.01,-1420.26 262.28,-1410.34 259.01,-1420.42 266.01,-1420.26"/>
-</g>
-<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge84" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M365.53,-2544.04C334.16,-2552.05 289.48,-2557.04 262,-2532"/>
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge24" class="edge">
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M242.97,-1105.84C228.59,-1108.46 213.2,-1113.93 203,-1125 160.45,-1171.19 145.87,-1370.85 142.1,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="138.59,-1438.68 141.55,-1448.85 145.58,-1439.05 138.59,-1438.68"/>
 </g>
-<!-- module~s_symba_encounter_check -->
+<!-- module~s_fraggle_io -->
 <g id="module~~rmvs_classes~~UsedByGraph_node25" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="474,-2502 331,-2502 331,-2478 474,-2478 474,-2502"/>
-<text text-anchor="middle" x="402.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="317,-1074 246,-1074 246,-1050 317,-1050 317,-1074"/>
+<text text-anchor="middle" x="281.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge24" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.79,-2477.86C330.13,-2475.39 326.81,-2472.46 324,-2469 255.63,-2384.8 260.35,-1567.08 261.75,-1420.45"/>
-<polygon fill="#000000" stroke="#000000" points="265.26,-1420.08 261.86,-1410.04 258.26,-1420.01 265.26,-1420.08"/>
-</g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge83" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M355.06,-2502.08C344.79,-2504.89 334,-2507.95 324,-2511 296.17,-2519.48 283.5,-2551.6 262,-2532"/>
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge25" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.64,-1063.27C230.47,-1065.65 213.74,-1071.1 203,-1083 155.2,-1135.95 143.97,-1365.59 141.59,-1438.62"/>
+<polygon fill="#000000" stroke="#000000" points="138.08,-1438.84 141.28,-1448.94 145.08,-1439.05 138.08,-1438.84"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_util_set -->
 <g id="module~~rmvs_classes~~UsedByGraph_node26" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-1956 367.5,-1956 367.5,-1932 437.5,-1932 437.5,-1956"/>
-<text text-anchor="middle" x="402.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_util_set</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="310.5,-1032 252.5,-1032 252.5,-1008 310.5,-1008 310.5,-1032"/>
+<text text-anchor="middle" x="281.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge25" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.19,-1943.07C351.76,-1940.8 334.65,-1935.35 324,-1923 290.62,-1884.31 268.4,-1515.69 263.18,-1420.4"/>
-<polygon fill="#000000" stroke="#000000" points="266.68,-1420.2 262.64,-1410.4 259.69,-1420.57 266.68,-1420.2"/>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge27" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.17,-1020.33C235.44,-1022.09 215.22,-1027.24 203,-1041 149.93,-1100.74 142.28,-1360.6 141.18,-1438.71"/>
+<polygon fill="#000000" stroke="#000000" points="137.68,-1438.83 141.06,-1448.87 144.68,-1438.91 137.68,-1438.83"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_util_version -->
 <g id="module~~rmvs_classes~~UsedByGraph_node27" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="443.5,-2460 361.5,-2460 361.5,-2436 443.5,-2436 443.5,-2460"/>
-<text text-anchor="middle" x="402.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_util_version</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320.5,-990 242.5,-990 242.5,-966 320.5,-966 320.5,-990"/>
+<text text-anchor="middle" x="281.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge26" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.25,-2446.4C347.38,-2443.71 333.06,-2438.14 324,-2427 258.34,-2346.34 260.8,-1563.74 261.81,-1420.47"/>
-<polygon fill="#000000" stroke="#000000" points="265.31,-1420.28 261.89,-1410.26 258.31,-1420.23 265.31,-1420.28"/>
-</g>
-<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge87" class="edge">
-<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M361.26,-2454.64C348.77,-2457.8 335.31,-2462.39 324,-2469 290.08,-2488.83 291.04,-2558.46 262,-2532"/>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge29" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M242.29,-979.66C227.99,-982.28 212.83,-987.78 203,-999 144.6,-1065.61 140.74,-1356.2 140.85,-1438.94"/>
+<polygon fill="#000000" stroke="#000000" points="137.35,-1439 140.89,-1448.99 144.35,-1438.98 137.35,-1439"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_tides_step_spin -->
 <g id="module~~rmvs_classes~~UsedByGraph_node28" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="439,-1914 366,-1914 366,-1890 439,-1890 439,-1914"/>
-<text text-anchor="middle" x="402.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-948 232.5,-948 232.5,-924 330.5,-924 330.5,-948"/>
+<text text-anchor="middle" x="281.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge27" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.66,-1900.78C350.66,-1898.36 334.35,-1892.87 324,-1881 263,-1811.01 261.03,-1505.58 261.7,-1420.23"/>
-<polygon fill="#000000" stroke="#000000" points="265.21,-1420.14 261.81,-1410.1 258.21,-1420.07 265.21,-1420.14"/>
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge30" class="edge">
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M232.14,-939.95C221.13,-943.1 210.49,-948.36 203,-957 139.37,-1030.38 139.34,-1350.82 140.57,-1438.66"/>
+<polygon fill="#000000" stroke="#000000" points="137.07,-1438.89 140.73,-1448.83 144.07,-1438.78 137.07,-1438.89"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- proc~solve_wbs -->
 <g id="module~~rmvs_classes~~UsedByGraph_node29" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="433.5,-1872 371.5,-1872 371.5,-1848 433.5,-1848 433.5,-1872"/>
-<text text-anchor="middle" x="402.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node29"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="312.5,-906 250.5,-906 250.5,-882 312.5,-882 312.5,-906"/>
+<text text-anchor="middle" x="281.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge28" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.22,-1859.49C354.88,-1857.55 335.71,-1852.28 324,-1839 268.31,-1775.88 262.5,-1501.06 262.01,-1420.36"/>
-<polygon fill="#000000" stroke="#000000" points="265.51,-1420.29 261.97,-1410.3 258.51,-1420.31 265.51,-1420.29"/>
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge31" class="edge">
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.47,-894.35C234,-896.21 214.63,-901.46 203,-915 168.32,-955.38 146.99,-1340.27 142.09,-1438.35"/>
+<polygon fill="#000000" stroke="#000000" points="138.58,-1438.45 141.58,-1448.61 145.57,-1438.79 138.58,-1438.45"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_orbel -->
 <g id="module~~rmvs_classes~~UsedByGraph_node30" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="450.5,-2418 354.5,-2418 354.5,-2394 450.5,-2394 450.5,-2418"/>
-<text text-anchor="middle" x="402.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_orbel</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-864 254.5,-864 254.5,-840 308.5,-840 308.5,-864"/>
+<text text-anchor="middle" x="281.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge29" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M354.39,-2402.81C342.81,-2399.71 331.58,-2394.29 324,-2385 261.05,-2307.86 261.27,-1560.06 261.87,-1420.4"/>
-<polygon fill="#000000" stroke="#000000" points="265.37,-1420.11 261.92,-1410.09 258.37,-1420.08 265.37,-1420.11"/>
-</g>
-<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge88" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M354.15,-2412.66C343.49,-2415.77 332.76,-2420.33 324,-2427 280.89,-2459.84 302.06,-2568.5 262,-2532"/>
-<path fill="none" stroke="#000000" d="M260,-2532C174.64,-2454.21 158.88,-1573.69 156.78,-1420.62"/>
-<polygon fill="#000000" stroke="#000000" points="160.27,-1420.12 156.64,-1410.16 153.27,-1420.21 160.27,-1420.12"/>
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge32" class="edge">
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.23,-851.94C237.02,-853.4 215.48,-858.36 203,-873 165.58,-916.92 146.07,-1337.2 141.87,-1438.91"/>
+<polygon fill="#000000" stroke="#000000" points="138.37,-1438.84 141.46,-1448.97 145.36,-1439.12 138.37,-1438.84"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_whm_gr -->
 <g id="module~~rmvs_classes~~UsedByGraph_node31" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node31"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="432,-1830 373,-1830 373,-1806 432,-1806 432,-1830"/>
-<text text-anchor="middle" x="402.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="312.5,-822 250.5,-822 250.5,-798 312.5,-798 312.5,-822"/>
+<text text-anchor="middle" x="281.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge31" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M372.82,-1817.6C356.19,-1815.79 336.18,-1810.61 324,-1797 273.63,-1740.74 264.13,-1496.59 262.38,-1420.64"/>
-<polygon fill="#000000" stroke="#000000" points="265.88,-1420.24 262.17,-1410.32 258.88,-1420.39 265.88,-1420.24"/>
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge33" class="edge">
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.39,-810.28C233.9,-812.13 214.52,-817.38 203,-831 162.94,-878.36 145.32,-1332.2 141.71,-1438.71"/>
+<polygon fill="#000000" stroke="#000000" points="138.21,-1438.82 141.37,-1448.93 145.2,-1439.05 138.21,-1438.82"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~rmvs_classes~~UsedByGraph_node32" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="438,-1788 367,-1788 367,-1764 438,-1764 438,-1788"/>
-<text text-anchor="middle" x="402.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-780 233.5,-780 233.5,-756 329.5,-756 329.5,-780"/>
+<text text-anchor="middle" x="281.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge33" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.69,-1774.69C351.53,-1772.29 334.8,-1766.85 324,-1755 278.84,-1705.45 265.9,-1490.95 262.83,-1420.51"/>
-<polygon fill="#000000" stroke="#000000" points="266.32,-1419.98 262.41,-1410.14 259.32,-1420.27 266.32,-1419.98"/>
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge35" class="edge">
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.16,-771.45C221.73,-774.57 210.63,-779.93 203,-789 160.26,-839.83 144.59,-1327.73 141.57,-1438.64"/>
+<polygon fill="#000000" stroke="#000000" points="138.06,-1438.88 141.3,-1448.97 145.06,-1439.06 138.06,-1438.88"/>
 </g>
-<!-- module~s_util_append -->
+<!-- module~s_util_exit -->
 <g id="module~~rmvs_classes~~UsedByGraph_node33" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-1746 363,-1746 363,-1722 442,-1722 442,-1746"/>
-<text text-anchor="middle" x="402.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="311.5,-738 251.5,-738 251.5,-714 311.5,-714 311.5,-738"/>
+<text text-anchor="middle" x="281.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge34" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.83,-1731.88C348.81,-1729.16 333.98,-1723.71 324,-1713 284.03,-1670.11 267.88,-1485 263.4,-1420.37"/>
-<polygon fill="#000000" stroke="#000000" points="266.87,-1419.83 262.71,-1410.09 259.88,-1420.3 266.87,-1419.83"/>
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge36" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.49,-726.11C234.73,-727.82 214.71,-732.99 203,-747 157.57,-801.33 143.91,-1323.73 141.44,-1438.7"/>
+<polygon fill="#000000" stroke="#000000" points="137.94,-1438.72 141.23,-1448.79 144.94,-1438.87 137.94,-1438.72"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_netcdf -->
 <g id="module~~rmvs_classes~~UsedByGraph_node34" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-1704 375.5,-1704 375.5,-1680 429.5,-1680 429.5,-1704"/>
-<text text-anchor="middle" x="402.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-696 254.5,-696 254.5,-672 308.5,-672 308.5,-696"/>
+<text text-anchor="middle" x="281.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge36" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.4,-1691.54C358.49,-1689.83 337.22,-1684.78 324,-1671 289.15,-1634.68 270.1,-1478.39 264.1,-1420.06"/>
-<polygon fill="#000000" stroke="#000000" points="267.58,-1419.67 263.11,-1410.06 260.62,-1420.36 267.58,-1419.67"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge37" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.5,-683.82C237.18,-685.19 215.39,-690.11 203,-705 154.86,-762.86 143.25,-1320.34 141.32,-1438.9"/>
+<polygon fill="#000000" stroke="#000000" points="137.82,-1438.92 141.17,-1448.97 144.82,-1439.03 137.82,-1438.92"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_util_peri -->
 <g id="module~~rmvs_classes~~UsedByGraph_node35" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="461.5,-1662 343.5,-1662 343.5,-1638 461.5,-1638 461.5,-1662"/>
-<text text-anchor="middle" x="402.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="312,-654 251,-654 251,-630 312,-630 312,-654"/>
+<text text-anchor="middle" x="281.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge38" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M343.21,-1641.53C336.08,-1638.49 329.41,-1634.43 324,-1629 266.29,-1571.15 260.67,-1465.75 261.15,-1420.08"/>
-<polygon fill="#000000" stroke="#000000" points="264.65,-1420.14 261.37,-1410.06 257.66,-1419.98 264.65,-1420.14"/>
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge39" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.67,-642.15C234.06,-643.93 214.47,-649.15 203,-663 152.17,-724.35 142.65,-1316.23 141.22,-1438.84"/>
+<polygon fill="#000000" stroke="#000000" points="137.72,-1438.88 141.11,-1448.92 144.72,-1438.96 137.72,-1438.88"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_helio_drift -->
 <g id="module~~rmvs_classes~~UsedByGraph_node36" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="433.5,-1620 371.5,-1620 371.5,-1596 433.5,-1596 433.5,-1620"/>
-<text text-anchor="middle" x="402.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-612 246.5,-612 246.5,-588 316.5,-588 316.5,-612"/>
+<text text-anchor="middle" x="281.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge40" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.32,-1606.55C355.41,-1604.28 336.64,-1598.99 324,-1587 276.48,-1541.9 265.34,-1459.85 262.76,-1420.38"/>
-<polygon fill="#000000" stroke="#000000" points="266.25,-1420.03 262.23,-1410.23 259.26,-1420.4 266.25,-1420.03"/>
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.35,-600.67C230.75,-602.86 213.47,-608.31 203,-621 149.47,-685.87 142.08,-1312.52 141.13,-1438.87"/>
+<polygon fill="#000000" stroke="#000000" points="137.63,-1438.89 141.06,-1448.91 144.63,-1438.93 137.63,-1438.89"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_setup -->
 <g id="module~~rmvs_classes~~UsedByGraph_node37" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="451.5,-1578 353.5,-1578 353.5,-1554 451.5,-1554 451.5,-1578"/>
-<text text-anchor="middle" x="402.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_setup</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-570 254.5,-570 254.5,-546 308.5,-546 308.5,-570"/>
+<text text-anchor="middle" x="281.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<!-- module~s_setup&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge41" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M353.48,-1560.16C342.85,-1557.02 332.29,-1552.25 324,-1545 286.5,-1512.23 271.09,-1452.98 265.24,-1420.61"/>
-<polygon fill="#000000" stroke="#000000" points="268.63,-1419.66 263.55,-1410.37 261.73,-1420.8 268.63,-1419.66"/>
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.44,-557.77C237.1,-559.13 215.31,-564.03 203,-579 146.81,-647.34 141.54,-1307.89 141.05,-1438.59"/>
+<polygon fill="#000000" stroke="#000000" points="137.55,-1438.94 141.02,-1448.95 144.55,-1438.96 137.55,-1438.94"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_helio_kick -->
 <g id="module~~rmvs_classes~~UsedByGraph_node38" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-1536 375.5,-1536 375.5,-1512 429.5,-1512 429.5,-1536"/>
-<text text-anchor="middle" x="402.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-528 246.5,-528 246.5,-504 316.5,-504 316.5,-528"/>
+<text text-anchor="middle" x="281.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge42" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.23,-1521.9C359.09,-1519.46 338.75,-1514.24 324,-1503 295.98,-1481.66 278.19,-1443.7 269.17,-1419.75"/>
-<polygon fill="#000000" stroke="#000000" points="272.4,-1418.37 265.74,-1410.13 265.81,-1420.73 272.4,-1418.37"/>
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.31,-516.64C230.71,-518.82 213.43,-524.28 203,-537 144.14,-608.82 141.02,-1303.47 140.97,-1438.37"/>
+<polygon fill="#000000" stroke="#000000" points="137.47,-1438.71 140.98,-1448.71 144.47,-1438.71 137.47,-1438.71"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_util_append -->
 <g id="module~~rmvs_classes~~UsedByGraph_node39" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="431.5,-1494 373.5,-1494 373.5,-1470 431.5,-1470 431.5,-1494"/>
-<text text-anchor="middle" x="402.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_util_append</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-486 242,-486 242,-462 321,-462 321,-486"/>
+<text text-anchor="middle" x="281.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge43" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.21,-1478.04C357.87,-1475.01 339.04,-1469.79 324,-1461 305.35,-1450.1 288.46,-1432.13 277.04,-1418.17"/>
-<polygon fill="#000000" stroke="#000000" points="279.61,-1415.78 270.66,-1410.1 274.11,-1420.11 279.61,-1415.78"/>
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.89,-475.32C227.53,-477.89 212.44,-483.45 203,-495 141.39,-570.39 140.52,-1300.85 140.9,-1438.64"/>
+<polygon fill="#000000" stroke="#000000" points="137.41,-1438.84 140.94,-1448.83 144.41,-1438.82 137.41,-1438.84"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- program~swiftest_driver -->
 <g id="module~~rmvs_classes~~UsedByGraph_node40" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="438.5,-1452 366.5,-1452 366.5,-1428 438.5,-1428 438.5,-1452"/>
-<text text-anchor="middle" x="402.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node40"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="322,-444 241,-444 241,-420 322,-420 322,-444"/>
+<text text-anchor="middle" x="281.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge44" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M366.26,-1430.95C352.96,-1427.4 337.74,-1423.18 324,-1419 315.48,-1416.41 306.37,-1413.43 297.83,-1410.56"/>
-<polygon fill="#000000" stroke="#000000" points="298.72,-1407.16 288.13,-1407.25 296.47,-1413.79 298.72,-1407.16"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge46" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.67,-433.53C226.67,-436.19 212.16,-441.76 203,-453 138.69,-531.9 140.04,-1297.1 140.84,-1438.57"/>
+<polygon fill="#000000" stroke="#000000" points="137.34,-1439.01 140.91,-1448.99 144.34,-1438.97 137.34,-1439.01"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- module~s_symba_step -->
 <g id="module~~rmvs_classes~~UsedByGraph_node41" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node41"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="457,-1410 348,-1410 348,-1386 457,-1386 457,-1410"/>
-<text text-anchor="middle" x="402.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-402 240.5,-402 240.5,-378 322.5,-378 322.5,-402"/>
+<text text-anchor="middle" x="281.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge45" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M347.96,-1398C331.52,-1398 313.8,-1398 298.74,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="298.31,-1394.5 288.31,-1398 298.31,-1401.5 298.31,-1394.5"/>
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge47" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.25,-391.6C226.37,-394.28 212.06,-399.86 203,-411 135.99,-493.43 139.57,-1293.56 140.78,-1438.53"/>
+<polygon fill="#000000" stroke="#000000" points="137.28,-1438.88 140.87,-1448.84 144.28,-1438.81 137.28,-1438.88"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- module~s_symba_util -->
 <g id="module~~rmvs_classes~~UsedByGraph_node42" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="455.5,-1368 349.5,-1368 349.5,-1344 455.5,-1344 455.5,-1368"/>
-<text text-anchor="middle" x="402.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="319,-360 244,-360 244,-336 319,-336 319,-360"/>
+<text text-anchor="middle" x="281.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge46" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.06,-1368.08C344.79,-1370.89 334,-1373.95 324,-1377 315.48,-1379.59 306.37,-1382.57 297.83,-1385.44"/>
-<polygon fill="#000000" stroke="#000000" points="296.47,-1382.21 288.13,-1388.75 298.72,-1388.84 296.47,-1382.21"/>
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge48" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.86,-348.95C228.9,-351.34 212.83,-356.87 203,-369 168.06,-412.08 145.25,-1286.27 141.54,-1438.49"/>
+<polygon fill="#000000" stroke="#000000" points="138.03,-1438.81 141.28,-1448.89 145.03,-1438.98 138.03,-1438.81"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_util_copy -->
 <g id="module~~rmvs_classes~~UsedByGraph_node43" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="450.5,-1326 354.5,-1326 354.5,-1302 450.5,-1302 450.5,-1326"/>
-<text text-anchor="middle" x="402.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="314.5,-318 248.5,-318 248.5,-294 314.5,-294 314.5,-318"/>
+<text text-anchor="middle" x="281.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge47" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M354.41,-1322.5C343.97,-1325.52 333.27,-1329.58 324,-1335 305.35,-1345.9 288.46,-1363.87 277.04,-1377.83"/>
-<polygon fill="#000000" stroke="#000000" points="274.11,-1375.89 270.66,-1385.9 279.61,-1380.22 274.11,-1375.89"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge49" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.22,-306.32C232.1,-308.3 213.79,-313.67 203,-327 166.7,-371.86 144.94,-1283.27 141.48,-1438.59"/>
+<polygon fill="#000000" stroke="#000000" points="137.98,-1438.73 141.26,-1448.8 144.98,-1438.88 137.98,-1438.73"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_discard -->
 <g id="module~~rmvs_classes~~UsedByGraph_node44" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="446.5,-150 358.5,-150 358.5,-126 446.5,-126 446.5,-150"/>
-<text text-anchor="middle" x="402.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_discard</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="310.5,-276 252.5,-276 252.5,-252 310.5,-252 310.5,-276"/>
+<text text-anchor="middle" x="281.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge48" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M358.36,-140.14C345.39,-143.02 332.39,-148.58 324,-159 284.29,-208.29 265.23,-1212.06 262.38,-1375.57"/>
-<polygon fill="#000000" stroke="#000000" points="258.87,-1375.81 262.2,-1385.87 265.87,-1375.93 258.87,-1375.81"/>
-</g>
-<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge86" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M368.24,-125.99C336.08,-116.76 288.43,-109.83 262,-138"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge50" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.47,-263.86C235.42,-265.4 214.74,-270.47 203,-285 165.32,-331.64 144.63,-1280.56 141.44,-1438.74"/>
+<polygon fill="#000000" stroke="#000000" points="137.94,-1438.67 141.24,-1448.74 144.94,-1438.81 137.94,-1438.67"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_util_sort -->
 <g id="module~~rmvs_classes~~UsedByGraph_node45" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node45"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="433.5,-1284 371.5,-1284 371.5,-1260 433.5,-1260 433.5,-1284"/>
-<text text-anchor="middle" x="402.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_util_sort</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="312,-234 251,-234 251,-210 312,-210 312,-234"/>
+<text text-anchor="middle" x="281.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge49" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.15,-1274.77C355.76,-1277.44 337.53,-1282.69 324,-1293 295.98,-1314.34 278.19,-1352.3 269.17,-1376.25"/>
-<polygon fill="#000000" stroke="#000000" points="265.81,-1375.27 265.74,-1385.87 272.4,-1377.63 265.81,-1375.27"/>
+<!-- module~s_util_sort&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge51" class="edge">
+<title>module~s_util_sort&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.92,-222C234.18,-223.7 214.37,-228.89 203,-243 163.99,-291.39 144.37,-1276.17 141.4,-1438.45"/>
+<polygon fill="#000000" stroke="#000000" points="137.9,-1438.63 141.21,-1448.69 144.9,-1438.76 137.9,-1438.63"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_whm_setup -->
 <g id="module~~rmvs_classes~~UsedByGraph_node46" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="447,-1242 358,-1242 358,-1218 447,-1218 447,-1242"/>
-<text text-anchor="middle" x="402.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-192 242,-192 242,-168 321,-168 321,-192"/>
+<text text-anchor="middle" x="281.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge50" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.92,-1234.63C345.83,-1237.7 333.45,-1242.74 324,-1251 286.5,-1283.77 271.09,-1343.02 265.24,-1375.39"/>
-<polygon fill="#000000" stroke="#000000" points="261.73,-1375.2 263.55,-1385.63 268.63,-1376.34 261.73,-1375.2"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge52" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.8,-181.25C227.43,-183.8 212.35,-189.38 203,-201 162.64,-251.14 144.12,-1271.92 141.37,-1438.2"/>
+<polygon fill="#000000" stroke="#000000" points="137.86,-1438.61 141.19,-1448.67 144.86,-1438.72 137.86,-1438.61"/>
 </g>
-<!-- module~s_util_sort -->
+<!-- module~s_util_resize -->
 <g id="module~~rmvs_classes~~UsedByGraph_node47" class="node">
-<title>module~s_util_sort</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="433,-1200 372,-1200 372,-1176 433,-1176 433,-1200"/>
-<text text-anchor="middle" x="402.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="317.5,-150 245.5,-150 245.5,-126 317.5,-126 317.5,-150"/>
+<text text-anchor="middle" x="281.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge76" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.7,-1189.39C355.71,-1191.63 336.74,-1196.91 324,-1209 276.48,-1254.1 265.34,-1336.15 262.76,-1375.62"/>
-<polygon fill="#000000" stroke="#000000" points="259.26,-1375.6 262.23,-1385.77 266.25,-1375.97 259.26,-1375.6"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge53" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.4,-138.66C229.99,-140.9 213.13,-146.39 203,-159 161.26,-210.95 143.84,-1269.92 141.32,-1438.48"/>
+<polygon fill="#000000" stroke="#000000" points="137.82,-1438.61 141.17,-1448.66 144.82,-1438.71 137.82,-1438.61"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_helio_gr -->
 <g id="module~~rmvs_classes~~UsedByGraph_node48" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node48"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="443,-1158 362,-1158 362,-1134 443,-1134 443,-1158"/>
-<text text-anchor="middle" x="402.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="312.5,-108 250.5,-108 250.5,-84 312.5,-84 312.5,-108"/>
+<text text-anchor="middle" x="281.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge51" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.61,-1148.81C348.1,-1151.66 333.94,-1157.03 324,-1167 266.29,-1224.85 260.67,-1330.25 261.15,-1375.92"/>
-<polygon fill="#000000" stroke="#000000" points="257.66,-1376.02 261.37,-1385.94 264.65,-1375.86 257.66,-1376.02"/>
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge54" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.12,-96.06C233.54,-97.83 214.17,-103.08 203,-117 159.89,-170.74 143.58,-1267.13 141.29,-1438.55"/>
+<polygon fill="#000000" stroke="#000000" points="137.79,-1438.63 141.15,-1448.68 144.79,-1438.72 137.79,-1438.63"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~orbel -->
 <g id="module~~rmvs_classes~~UsedByGraph_node49" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-1116 375.5,-1116 375.5,-1092 429.5,-1092 429.5,-1116"/>
-<text text-anchor="middle" x="402.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~orbel</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node49"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="308.5,-66 254.5,-66 254.5,-42 308.5,-42 308.5,-66"/>
+<text text-anchor="middle" x="281.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge52" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.4,-1104.46C358.49,-1106.17 337.22,-1111.22 324,-1125 289.15,-1161.32 270.1,-1317.61 264.1,-1375.94"/>
-<polygon fill="#000000" stroke="#000000" points="260.62,-1375.64 263.11,-1385.94 267.58,-1376.33 260.62,-1375.64"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge55" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.32,-53.67C236.92,-54.99 215.12,-59.88 203,-75 158.51,-130.53 143.33,-1264.55 141.25,-1438.65"/>
+<polygon fill="#000000" stroke="#000000" points="137.75,-1438.67 141.14,-1448.71 144.75,-1438.75 137.75,-1438.67"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~s_whm_util -->
 <g id="module~~rmvs_classes~~UsedByGraph_node50" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="458.5,-1074 346.5,-1074 346.5,-1050 458.5,-1050 458.5,-1074"/>
-<text text-anchor="middle" x="402.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="314.5,-24 248.5,-24 248.5,0 314.5,0 314.5,-24"/>
+<text text-anchor="middle" x="281.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge53" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346.37,-1068.71C337.97,-1071.9 330.08,-1076.47 324,-1083 284.03,-1125.89 267.88,-1311 263.4,-1375.63"/>
-<polygon fill="#000000" stroke="#000000" points="259.88,-1375.7 262.71,-1385.91 266.87,-1376.17 259.88,-1375.7"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge56" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.15,-12.27C232.02,-14.24 213.71,-19.61 203,-33 157.16,-90.3 143.1,-1261.02 141.23,-1438.53"/>
+<polygon fill="#000000" stroke="#000000" points="137.72,-1438.73 141.12,-1448.76 144.72,-1438.8 137.72,-1438.73"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~s_util_spill -->
 <g id="module~~rmvs_classes~~UsedByGraph_node51" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441.5,-1032 363.5,-1032 363.5,-1008 441.5,-1008 441.5,-1032"/>
-<text text-anchor="middle" x="402.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="312,-2586 251,-2586 251,-2562 312,-2562 312,-2586"/>
+<text text-anchor="middle" x="281.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge54" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.11,-1021.93C348.95,-1024.6 333.95,-1030.08 324,-1041 278.84,-1090.55 265.9,-1305.05 262.83,-1375.49"/>
-<polygon fill="#000000" stroke="#000000" points="259.32,-1375.73 262.41,-1385.86 266.32,-1376.02 259.32,-1375.73"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge58" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.95,-2573.97C234.22,-2572.27 214.42,-2567.07 203,-2553 168.06,-2509.92 145.25,-1635.73 141.54,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="145.03,-1483.02 141.28,-1473.11 138.03,-1483.19 145.03,-1483.02"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~rmvs_classes~~UsedByGraph_node52" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="481,-990 324,-990 324,-966 481,-966 481,-990"/>
-<text text-anchor="middle" x="402.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-2544 225.5,-2544 225.5,-2520 337.5,-2520 337.5,-2544"/>
+<text text-anchor="middle" x="281.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge55" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M334.87,-990.02C330.85,-992.5 327.16,-995.47 324,-999 273.63,-1055.26 264.13,-1299.41 262.38,-1375.36"/>
-<polygon fill="#000000" stroke="#000000" points="258.88,-1375.61 262.17,-1385.68 265.88,-1375.76 258.88,-1375.61"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge59" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M225.39,-2526.27C216.77,-2522.99 208.8,-2518.14 203,-2511 135.99,-2428.57 139.57,-1628.44 140.78,-1483.47"/>
+<polygon fill="#000000" stroke="#000000" points="144.28,-1483.19 140.87,-1473.16 137.28,-1483.12 144.28,-1483.19"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~rmvs_classes~~UsedByGraph_node53" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-948 375.5,-948 375.5,-924 429.5,-924 429.5,-948"/>
-<text text-anchor="middle" x="402.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-2502 225.5,-2502 225.5,-2478 337.5,-2478 337.5,-2502"/>
+<text text-anchor="middle" x="281.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge56" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.39,-936.08C358.25,-937.6 336.73,-942.57 324,-957 268.31,-1020.12 262.5,-1294.94 262.01,-1375.64"/>
-<polygon fill="#000000" stroke="#000000" points="258.51,-1375.69 261.97,-1385.7 265.51,-1375.71 258.51,-1375.69"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge60" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M225.4,-2484.25C216.78,-2480.98 208.81,-2476.13 203,-2469 138.69,-2390.1 140.04,-1624.9 140.84,-1483.43"/>
+<polygon fill="#000000" stroke="#000000" points="144.34,-1483.03 140.91,-1473.01 137.34,-1482.99 144.34,-1483.03"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_whm_kick -->
 <g id="module~~rmvs_classes~~UsedByGraph_node54" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="442,-906 363,-906 363,-882 442,-882 442,-906"/>
-<text text-anchor="middle" x="402.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_whm_kick</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-2460 246.5,-2460 246.5,-2436 316.5,-2436 316.5,-2460"/>
+<text text-anchor="middle" x="281.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge57" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M362.86,-895.71C348.67,-898.35 333.71,-903.86 324,-915 263,-984.99 261.03,-1290.42 261.7,-1375.77"/>
-<polygon fill="#000000" stroke="#000000" points="258.21,-1375.93 261.81,-1385.9 265.21,-1375.86 258.21,-1375.93"/>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge61" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.29,-2447.38C230.69,-2445.19 213.41,-2439.74 203,-2427 141.39,-2351.61 140.52,-1621.15 140.9,-1483.36"/>
+<polygon fill="#000000" stroke="#000000" points="144.41,-1483.18 140.94,-1473.17 137.41,-1483.16 144.41,-1483.18"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_symba_discard -->
 <g id="module~~rmvs_classes~~UsedByGraph_node55" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437,-864 368,-864 368,-840 437,-840 437,-864"/>
-<text text-anchor="middle" x="402.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-2418 233.5,-2418 233.5,-2394 329.5,-2394 329.5,-2418"/>
+<text text-anchor="middle" x="281.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge58" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.98,-852.81C352.34,-855.02 334.84,-860.44 324,-873 290.62,-911.69 268.4,-1280.31 263.18,-1375.6"/>
-<polygon fill="#000000" stroke="#000000" points="259.69,-1375.43 262.64,-1385.6 266.68,-1375.8 259.69,-1375.43"/>
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge62" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.42,-2402.78C221.84,-2399.68 210.6,-2394.27 203,-2385 144.14,-2313.18 141.02,-1618.53 140.97,-1483.63"/>
+<polygon fill="#000000" stroke="#000000" points="144.47,-1483.29 140.98,-1473.29 137.47,-1483.29 144.47,-1483.29"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_symba_drift -->
 <g id="module~~rmvs_classes~~UsedByGraph_node56" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="435,-822 370,-822 370,-798 435,-798 435,-822"/>
-<text text-anchor="middle" x="402.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-2376 242,-2376 242,-2352 321,-2352 321,-2376"/>
+<text text-anchor="middle" x="281.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge59" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369.9,-810.51C353.77,-812.53 335.24,-817.86 324,-831 287.94,-873.16 267.5,-1276.05 262.97,-1375.76"/>
-<polygon fill="#000000" stroke="#000000" points="259.46,-1375.76 262.51,-1385.9 266.46,-1376.07 259.46,-1375.76"/>
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge63" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.93,-2362.65C227.57,-2360.08 212.47,-2354.52 203,-2343 146.81,-2274.66 141.54,-1614.11 141.05,-1483.41"/>
+<polygon fill="#000000" stroke="#000000" points="144.55,-1483.04 141.02,-1473.05 137.55,-1483.06 144.55,-1483.04"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~whm_drift -->
 <g id="module~~rmvs_classes~~UsedByGraph_node57" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-780 367.5,-780 367.5,-756 437.5,-756 437.5,-780"/>
-<text text-anchor="middle" x="402.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~whm_drift</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node57"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="311,-2334 252,-2334 252,-2310 311,-2310 311,-2334"/>
+<text text-anchor="middle" x="281.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge61" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.5,-768.8C351.94,-771.02 334.64,-776.46 324,-789 285.26,-834.63 266.69,-1271.6 262.79,-1375.78"/>
-<polygon fill="#000000" stroke="#000000" points="259.29,-1375.69 262.42,-1385.81 266.29,-1375.94 259.29,-1375.69"/>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge64" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.81,-2321.98C234.95,-2320.33 214.71,-2315.19 203,-2301 149.47,-2236.13 142.08,-1609.48 141.13,-1483.13"/>
+<polygon fill="#000000" stroke="#000000" points="144.63,-1483.07 141.06,-1473.09 137.63,-1483.11 144.63,-1483.07"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~rmvs_classes~~UsedByGraph_node58" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="431.5,-738 373.5,-738 373.5,-714 431.5,-714 431.5,-738"/>
-<text text-anchor="middle" x="402.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="338.5,-2292 224.5,-2292 224.5,-2268 338.5,-2268 338.5,-2292"/>
+<text text-anchor="middle" x="281.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge62" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.3,-726.07C356.4,-727.71 335.95,-732.83 324,-747 282.6,-796.09 265.95,-1266.87 262.64,-1375.65"/>
-<polygon fill="#000000" stroke="#000000" points="259.14,-1375.7 262.34,-1385.8 266.13,-1375.91 259.14,-1375.7"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge65" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M224.32,-2273.72C216.14,-2270.47 208.6,-2265.76 203,-2259 152.17,-2197.65 142.65,-1605.77 141.22,-1483.16"/>
+<polygon fill="#000000" stroke="#000000" points="144.72,-1483.04 141.11,-1473.08 137.72,-1483.12 144.72,-1483.04"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~s_util_fill -->
 <g id="module~~rmvs_classes~~UsedByGraph_node59" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="433,-696 372,-696 372,-672 433,-672 433,-696"/>
-<text text-anchor="middle" x="402.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-2250 254.5,-2250 254.5,-2226 308.5,-2226 308.5,-2250"/>
+<text text-anchor="middle" x="281.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge63" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.73,-684.2C355.14,-685.99 335.55,-691.22 324,-705 279.92,-757.58 265.25,-1262.66 262.5,-1375.65"/>
-<polygon fill="#000000" stroke="#000000" points="259,-1375.79 262.26,-1385.87 266,-1375.96 259,-1375.79"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge66" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.5,-2238.18C237.18,-2236.81 215.39,-2231.89 203,-2217 154.86,-2159.14 143.25,-1601.66 141.32,-1483.1"/>
+<polygon fill="#000000" stroke="#000000" points="144.82,-1482.97 141.17,-1473.03 137.82,-1483.08 144.82,-1482.97"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_io -->
 <g id="module~~rmvs_classes~~UsedByGraph_node60" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="458.5,-654 346.5,-654 346.5,-630 458.5,-630 458.5,-654"/>
-<text text-anchor="middle" x="402.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_io</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-2208 254.5,-2208 254.5,-2184 308.5,-2184 308.5,-2208"/>
+<text text-anchor="middle" x="281.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge64" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346.14,-648.01C337.66,-651.26 329.8,-656.04 324,-663 277.27,-719.03 264.6,-1257.85 262.39,-1375.42"/>
-<polygon fill="#000000" stroke="#000000" points="258.88,-1375.67 262.2,-1385.73 265.88,-1375.79 258.88,-1375.67"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge67" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.15,-2196.13C236.9,-2194.71 215.34,-2189.76 203,-2175 157.57,-2120.67 143.91,-1598.27 141.44,-1483.3"/>
+<polygon fill="#000000" stroke="#000000" points="144.94,-1483.13 141.23,-1473.21 137.94,-1483.28 144.94,-1483.13"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~s_helio_setup -->
 <g id="module~~rmvs_classes~~UsedByGraph_node61" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-612 367.5,-612 367.5,-588 437.5,-588 437.5,-612"/>
-<text text-anchor="middle" x="402.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-2166 242,-2166 242,-2142 321,-2142 321,-2166"/>
+<text text-anchor="middle" x="281.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge65" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.38,-600.69C351.79,-602.89 334.51,-608.34 324,-621 274.54,-680.57 263.96,-1254.65 262.27,-1375.67"/>
-<polygon fill="#000000" stroke="#000000" points="258.77,-1375.89 262.14,-1385.94 265.77,-1375.99 258.77,-1375.89"/>
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge68" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.65,-2152.47C227.43,-2149.85 212.51,-2144.31 203,-2133 160.26,-2082.17 144.59,-1594.27 141.57,-1483.36"/>
+<polygon fill="#000000" stroke="#000000" points="145.06,-1482.94 141.3,-1473.03 138.06,-1483.12 145.06,-1482.94"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_symba_kick -->
 <g id="module~~rmvs_classes~~UsedByGraph_node62" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="433,-570 372,-570 372,-546 433,-546 433,-570"/>
-<text text-anchor="middle" x="402.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-2124 242,-2124 242,-2100 321,-2100 321,-2124"/>
+<text text-anchor="middle" x="281.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge68" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.66,-558.14C355.05,-559.92 335.46,-565.14 324,-579 271.85,-642.08 263.37,-1250.71 262.18,-1375.65"/>
-<polygon fill="#000000" stroke="#000000" points="258.68,-1375.88 262.09,-1385.91 265.68,-1375.94 258.68,-1375.88"/>
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge69" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.69,-2110.44C227.47,-2107.82 212.54,-2102.28 203,-2091 162.94,-2043.64 145.32,-1589.8 141.71,-1483.29"/>
+<polygon fill="#000000" stroke="#000000" points="145.2,-1482.95 141.37,-1473.07 138.21,-1483.18 145.2,-1482.95"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_fraggle_util -->
 <g id="module~~rmvs_classes~~UsedByGraph_node63" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-528 367.5,-528 367.5,-504 437.5,-504 437.5,-528"/>
-<text text-anchor="middle" x="402.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="319.5,-2082 243.5,-2082 243.5,-2058 319.5,-2058 319.5,-2082"/>
+<text text-anchor="middle" x="281.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge69" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.34,-516.66C351.74,-518.85 334.46,-524.3 324,-537 269.14,-603.6 262.81,-1247.17 262.09,-1375.72"/>
-<polygon fill="#000000" stroke="#000000" points="258.59,-1375.91 262.04,-1385.92 265.59,-1375.94 258.59,-1375.91"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge70" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.33,-2068.69C228.65,-2066.19 212.94,-2060.67 203,-2049 165.58,-2005.08 146.07,-1584.8 141.87,-1483.09"/>
+<polygon fill="#000000" stroke="#000000" points="145.36,-1482.88 141.46,-1473.03 138.37,-1483.16 145.36,-1482.88"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_util_solve -->
 <g id="module~~rmvs_classes~~UsedByGraph_node64" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="435.5,-486 369.5,-486 369.5,-462 435.5,-462 435.5,-486"/>
-<text text-anchor="middle" x="402.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="315.5,-2040 247.5,-2040 247.5,-2016 315.5,-2016 315.5,-2040"/>
+<text text-anchor="middle" x="281.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge70" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369.29,-474.38C353.2,-476.38 334.88,-481.75 324,-495 266.42,-565.15 262.27,-1244.04 262.01,-1375.88"/>
-<polygon fill="#000000" stroke="#000000" points="258.51,-1375.98 262,-1385.99 265.51,-1375.99 258.51,-1375.98"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge71" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.35,-2027.26C231.61,-2025.1 213.9,-2019.69 203,-2007 168.32,-1966.62 146.99,-1581.73 142.09,-1483.65"/>
+<polygon fill="#000000" stroke="#000000" points="145.57,-1483.21 141.58,-1473.39 138.58,-1483.55 145.57,-1483.21"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_helio_step -->
 <g id="module~~rmvs_classes~~UsedByGraph_node65" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-444 375.5,-444 375.5,-420 429.5,-420 429.5,-444"/>
-<text text-anchor="middle" x="402.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="318,-1998 245,-1998 245,-1974 318,-1974 318,-1998"/>
+<text text-anchor="middle" x="281.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge71" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.42,-431.75C358.07,-433.1 336.27,-438 324,-453 263.74,-526.64 261.76,-1239.82 261.94,-1375.7"/>
-<polygon fill="#000000" stroke="#000000" points="258.44,-1375.77 261.96,-1385.76 265.44,-1375.76 258.44,-1375.77"/>
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge72" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M244.63,-1984.8C229.63,-1982.39 213.32,-1976.9 203,-1965 139.37,-1891.62 139.34,-1571.18 140.57,-1483.34"/>
+<polygon fill="#000000" stroke="#000000" points="144.07,-1483.22 140.73,-1473.17 137.07,-1483.11 144.07,-1483.22"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_whm_step -->
 <g id="module~~rmvs_classes~~UsedByGraph_node66" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="459.5,-402 345.5,-402 345.5,-378 459.5,-378 459.5,-402"/>
-<text text-anchor="middle" x="402.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="318,-1956 245,-1956 245,-1932 318,-1932 318,-1956"/>
+<text text-anchor="middle" x="281.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge72" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M345.24,-396.21C337.07,-399.47 329.55,-404.2 324,-411 261.05,-488.14 261.27,-1235.94 261.87,-1375.6"/>
-<polygon fill="#000000" stroke="#000000" points="258.37,-1375.92 261.92,-1385.91 265.37,-1375.89 258.37,-1375.92"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge73" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M244.69,-1942.75C229.7,-1940.32 213.38,-1934.84 203,-1923 144.6,-1856.39 140.74,-1565.8 140.85,-1483.06"/>
+<polygon fill="#000000" stroke="#000000" points="144.35,-1483.02 140.89,-1473.01 137.35,-1483 144.35,-1483.02"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_symba_setup -->
 <g id="module~~rmvs_classes~~UsedByGraph_node67" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="437.5,-108 367.5,-108 367.5,-84 437.5,-84 437.5,-108"/>
-<text text-anchor="middle" x="402.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-1914 237.5,-1914 237.5,-1890 325.5,-1890 325.5,-1914"/>
+<text text-anchor="middle" x="281.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge73" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.2,-96.55C351.58,-98.72 334.31,-104.18 324,-117 282.91,-168.1 264.94,-1210 262.34,-1375.84"/>
-<polygon fill="#000000" stroke="#000000" points="258.84,-1375.81 262.18,-1385.86 265.84,-1375.92 258.84,-1375.81"/>
-</g>
-<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge82" class="edge">
-<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M260,-138C171.83,-231.99 158.33,-1214.05 156.7,-1375.57"/>
-<polygon fill="#000000" stroke="#000000" points="153.2,-1375.73 156.6,-1385.76 160.2,-1375.79 153.2,-1375.73"/>
-<path fill="none" stroke="#000000" d="M367.24,-96.99C335.48,-99.8 289.17,-109.04 262,-138"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge44" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M237.13,-1899.18C224.46,-1896.23 211.7,-1890.8 203,-1881 149.93,-1821.26 142.28,-1561.4 141.18,-1483.29"/>
+<polygon fill="#000000" stroke="#000000" points="144.68,-1483.09 141.06,-1473.13 137.68,-1483.17 144.68,-1483.09"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_fraggle_generate -->
 <g id="module~~rmvs_classes~~UsedByGraph_node68" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="450.5,-360 354.5,-360 354.5,-336 450.5,-336 450.5,-360"/>
-<text text-anchor="middle" x="402.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="334.5,-1872 228.5,-1872 228.5,-1848 334.5,-1848 334.5,-1872"/>
+<text text-anchor="middle" x="281.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge74" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M354.37,-351.18C342.8,-354.28 331.57,-359.7 324,-369 258.34,-449.66 260.8,-1232.26 261.81,-1375.53"/>
-<polygon fill="#000000" stroke="#000000" points="258.31,-1375.77 261.89,-1385.74 265.31,-1375.72 258.31,-1375.77"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge75" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M228.37,-1854.59C218.8,-1851.37 209.73,-1846.45 203,-1839 155.2,-1786.05 143.97,-1556.41 141.59,-1483.38"/>
+<polygon fill="#000000" stroke="#000000" points="145.08,-1482.95 141.28,-1473.06 138.08,-1483.16 145.08,-1482.95"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_symba_io -->
 <g id="module~~rmvs_classes~~UsedByGraph_node69" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="429.5,-318 375.5,-318 375.5,-294 429.5,-294 429.5,-318"/>
-<text text-anchor="middle" x="402.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1830 246.5,-1830 246.5,-1806 316.5,-1806 316.5,-1830"/>
+<text text-anchor="middle" x="281.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge75" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.39,-305.72C358.01,-307.06 336.21,-311.96 324,-327 255.63,-411.2 260.35,-1228.92 261.75,-1375.55"/>
-<polygon fill="#000000" stroke="#000000" points="258.26,-1375.99 261.86,-1385.96 265.26,-1375.92 258.26,-1375.99"/>
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge76" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.15,-1816.7C230.89,-1814.32 213.96,-1808.89 203,-1797 160.45,-1750.81 145.87,-1551.15 142.1,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="145.58,-1482.95 141.55,-1473.15 138.59,-1483.32 145.58,-1482.95"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_kick -->
 <g id="module~~rmvs_classes~~UsedByGraph_node70" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441,-276 364,-276 364,-252 441,-252 441,-276"/>
-<text text-anchor="middle" x="402.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_kick</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="308.5,-1788 254.5,-1788 254.5,-1764 308.5,-1764 308.5,-1788"/>
+<text text-anchor="middle" x="281.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge66" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.65,-265.14C349.03,-267.63 333.57,-273.19 324,-285 288.38,-328.96 266.09,-1221.69 262.51,-1375.52"/>
-<polygon fill="#000000" stroke="#000000" points="259.01,-1375.58 262.28,-1385.66 266.01,-1375.74 259.01,-1375.58"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~rmvs_classes~~UsedByGraph_edge74" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.33,-1775.6C237.39,-1773.92 216.12,-1768.88 203,-1755 165.65,-1715.47 148.01,-1545.28 142.75,-1483.51"/>
+<polygon fill="#000000" stroke="#000000" points="146.22,-1482.97 141.91,-1473.29 139.24,-1483.54 146.22,-1482.97"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~drift_implementation -->
 <g id="module~~rmvs_classes~~UsedByGraph_node71" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="441.5,-234 363.5,-234 363.5,-210 441.5,-210 441.5,-234"/>
-<text text-anchor="middle" x="402.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~rmvs_classes~~UsedByGraph_node71"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-1746 227,-1746 227,-1722 336,-1722 336,-1746"/>
+<text text-anchor="middle" x="281.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
 <g id="module~~rmvs_classes~~UsedByGraph_edge77" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M363.23,-223.2C348.74,-225.73 333.47,-231.29 324,-243 287.01,-288.75 265.78,-1218.91 262.46,-1375.67"/>
-<polygon fill="#000000" stroke="#000000" points="258.96,-1375.88 262.24,-1385.95 265.95,-1376.03 258.96,-1375.88"/>
-</g>
-<!-- module~s_fraggle_util -->
-<g id="module~~rmvs_classes~~UsedByGraph_node72" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~rmvs_classes~~UsedByGraph_node72"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="440.5,-192 364.5,-192 364.5,-168 440.5,-168 440.5,-192"/>
-<text text-anchor="middle" x="402.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
-</a>
-</g>
-</g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
-<g id="module~~rmvs_classes~~UsedByGraph_edge78" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.43,-180.99C349.58,-183.41 333.72,-188.96 324,-201 285.64,-248.54 265.48,-1216.35 262.41,-1375.84"/>
-<polygon fill="#000000" stroke="#000000" points="258.91,-1375.84 262.22,-1385.9 265.91,-1375.97 258.91,-1375.84"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M226.82,-1727.49C217.95,-1724.3 209.53,-1719.68 203,-1713 170.75,-1679.98 150.41,-1538.4 143.57,-1483.18"/>
+<polygon fill="#000000" stroke="#000000" points="147.02,-1482.57 142.35,-1473.06 140.07,-1483.41 147.02,-1482.57"/>
 </g>
 </g>
 </svg>
@@ -1800,10 +1728,10 @@ <h3>Contents</h3>
   <div id="inters-1" class="panel-collapse collapse">
     <div class="list-group">
       
-      <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_chk_ind">rmvs_chk_ind</a>
-      
       <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_encounter_check_tp">rmvs_encounter_check_tp</a>
       
+      <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_chk_ind">rmvs_chk_ind</a>
+      
       <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_discard_tp">rmvs_discard_tp</a>
       
       <a class="list-group-item" href="../module/rmvs_classes.html#interface-rmvs_io_write_encounter">rmvs_io_write_encounter</a>
@@ -1998,7 +1926,7 @@ <h2>Interfaces</h2>
    
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-rmvs_chk_ind"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-rmvs_encounter_check_tp"></span><h3>interface 
     
   </h3></div>
   
@@ -2008,11 +1936,11 @@ <h2>Interfaces</h2>
     
     
     <h3>
-public elemental module function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag)
+public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter)
     
     
    
-   <a href='../proc/rmvs_chk_ind.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/rmvs_encounter_check_tp.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -2036,42 +1964,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>r2</strong></td><td></td>
-  
-</tr>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>v2</strong></td><td></td>
-  
-</tr>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>class(<a href='../type/rmvs_tp.html'>rmvs_tp</a>),</td>
+  <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>vdotr</strong></td><td></td>
+  <td><strong>self</strong></td><td><p>RMVS test particle object  </p></td>
   
 </tr>
 
@@ -2081,12 +1979,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>class(<a href='../type/rmvs_nbody_system.html'>rmvs_nbody_system</a>),</td>
+  <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>dt</strong></td><td></td>
+  <td><strong>system</strong></td><td><p>RMVS nbody system object</p></td>
   
 </tr>
 
@@ -2101,7 +1999,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>r2crit</strong></td><td></td>
+  <td><strong>dt</strong></td><td><p>step size</p></td>
   
 </tr>
 
@@ -2118,7 +2016,7 @@ <h4>Arguments</h4>
   
      <h4>Return Value <small>logical
   </small></h4>
-  
+  <p>Returns true if there is at least one close encounter      </p>
     
 
     </li>
@@ -2129,7 +2027,7 @@ <h4>Return Value <small>logical
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-rmvs_encounter_check_tp"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-rmvs_chk_ind"></span><h3>interface 
     
   </h3></div>
   
@@ -2139,11 +2037,11 @@ <h4>Return Value <small>logical
     
     
     <h3>
-public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter)
+public pure module subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr)
     
     
    
-   <a href='../proc/rmvs_encounter_check_tp.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/rmvs_chk_ind.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -2167,12 +2065,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/rmvs_tp.html'>rmvs_tp</a>),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>RMVS test particle object  </p></td>
+  <td><strong>xr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -2182,12 +2080,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/rmvs_nbody_system.html'>rmvs_nbody_system</a>),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>system</strong></td><td><p>RMVS nbody system object</p></td>
+  <td><strong>yr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -2202,24 +2100,120 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>dt</strong></td><td><p>step size</p></td>
+  <td><strong>zr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
-</tbody>
-</table>
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vxr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
 
-      
-    
-    
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vyr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
 
   
   
   
   
-     <h4>Return Value <small>logical
-  </small></h4>
-  <p>Returns true if there is at least one close encounter      </p>
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vzr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>dt</strong></td><td><p>Step size</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>r2crit</strong></td><td><p>Square of the critical encounter distance</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lencounter</strong></td><td><p>Flag indicating that an encounter has occurred</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lvdotr</strong></td><td><p>Logical flag indicating the direction of the v .dot. r vector</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
     
 
     </li>
diff --git a/docs/module/s_discard.html b/docs/module/s_discard.html
index 8e4994684..07ac0877a 100644
--- a/docs/module/s_discard.html
+++ b/docs/module/s_discard.html
@@ -267,311 +267,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_discard~~UsesGraph Pages: 1 -->
-<svg id="modules_discardUsesGraph" width="641pt" height="276pt"
- viewBox="0.00 0.00 641.00 276.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_discard~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_discardUsesGraph" width="641pt" height="289pt"
+ viewBox="0.00 0.00 641.00 288.58" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_discard~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_discard~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 903,-387.05 903,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 903,-404.34 903,4 -4,4"/>
 <!-- module~s_discard -->
 <g id="module~~s_discard~~UsesGraph_node1" class="node">
 <title>module~s_discard</title>
-<polygon fill="none" stroke="black" points="899,-318.05 841,-318.05 841,-294.05 899,-294.05 899,-318.05"/>
-<text text-anchor="middle" x="870" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_discard</text>
+<polygon fill="none" stroke="black" points="899,-102.05 841,-102.05 841,-78.05 899,-78.05 899,-102.05"/>
+<text text-anchor="middle" x="870" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_discard</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_discard~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_discard~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_discard&#45;&gt;module~swiftest -->
 <g id="module~~s_discard~~UsesGraph_edge1" class="edge">
 <title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M854.94,-294.01C840.49,-281.66 817.8,-262.24 800.98,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.13,-245.09 793.26,-241.25 798.58,-250.41 803.13,-245.09"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M860.37,-102.13C844.95,-123.71 812.53,-169.11 793.6,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.7,-193.65 787.74,-203.82 796.4,-197.72 790.7,-193.65"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_discard~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_discard~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_discard&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_discard~~UsesGraph_edge2" class="edge">
 <title>module~s_discard&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M851.29,-318.08C817.64,-339.73 741.47,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.74,-80.91C802.55,-69.38 732.14,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_discard~~UsesGraph_edge10" class="edge">
+<g id="module~~s_discard~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_discard~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_discard~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_discard~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_discard~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_discard~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_discard~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_discard~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_discard~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_discard~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_discard~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_discard~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_discard~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_discard~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_discard~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_discard~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_discard~~UsesGraph_edge6" class="edge">
+<g id="module~~s_discard~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_discard~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_discard~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_discard~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_discard~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_discard~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_discard~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_discard~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_discard~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_discard~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_discard~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_discard~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_discard~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_discard~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_discard~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_discard~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_discard~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_discard~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_discard~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_discard~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_discard~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_discard~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_discard~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_discard~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_discard~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_discard~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_discard~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_discard~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_discard~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_discard~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_discard~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_discard~~UsesGraph_edge20" class="edge">
+<g id="module~~s_discard~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_discard~~UsesGraph_edge21" class="edge">
+<g id="module~~s_discard~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_discard~~UsesGraph_edge19" class="edge">
+<g id="module~~s_discard~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_discard~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_discard~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_discard~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_discard~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_discard~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_discard~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_discard~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_discard~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_discard~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_discard~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_discard~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_discard~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_discard~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_discard~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_discard~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_discard~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_discard~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_discard~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_fraggle_generate.html b/docs/module/s_fraggle_generate.html
index 89c975ae3..80be94ebc 100644
--- a/docs/module/s_fraggle_generate.html
+++ b/docs/module/s_fraggle_generate.html
@@ -134,7 +134,7 @@ <h1>s_fraggle_generate
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 2.5% of total for modules and submodules.">400 statements</a>
+    title=" 2.5% of total for modules and submodules.">402 statements</a>
      </li> 
      
      
@@ -281,31 +281,31 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_fraggle_generate~~UsesGraph Pages: 1 -->
-<svg id="modules_fraggle_generateUsesGraph" width="641pt" height="237pt"
- viewBox="0.00 0.00 641.00 236.50" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_fraggle_generate~~UsesGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 352.04)">
+<svg id="modules_fraggle_generateUsesGraph" width="641pt" height="217pt"
+ viewBox="0.00 0.00 641.00 217.02" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_fraggle_generate~~UsesGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 322.71)">
 <title>module~~s_fraggle_generate~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-352.04 961,-352.04 961,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.71 961,-322.71 961,4 -4,4"/>
 <!-- module~s_fraggle_generate -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node1" class="node">
 <title>module~s_fraggle_generate</title>
-<polygon fill="none" stroke="black" points="957,-84 851,-84 851,-60 957,-60 957,-84"/>
-<text text-anchor="middle" x="904" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_generate</text>
+<polygon fill="none" stroke="black" points="957,-83 851,-83 851,-59 957,-59 957,-83"/>
+<text text-anchor="middle" x="904" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_generate</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_fraggle_generate~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="815,-182 761,-182 761,-158 815,-158 815,-182"/>
-<text text-anchor="middle" x="788" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="815,-103 761,-103 761,-79 815,-79 815,-103"/>
+<text text-anchor="middle" x="788" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge1" class="edge">
 <title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M889.02,-84.02C869.53,-100.77 834.01,-131.31 810.97,-151.12"/>
-<polygon fill="#000000" stroke="#000000" points="808.39,-148.71 803.09,-157.88 812.96,-154.02 808.39,-148.71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M850.67,-80.18C842.03,-81.7 833.24,-83.24 825.11,-84.66"/>
+<polygon fill="#000000" stroke="#000000" points="824.47,-81.22 815.23,-86.4 825.68,-88.12 824.47,-81.22"/>
 </g>
 <!-- module~fraggle_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node3" class="node">
@@ -319,277 +319,270 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~s_fraggle_generate&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge2" class="edge">
 <title>module~s_fraggle_generate&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M850.91,-61.53C815.47,-54.54 767.48,-45.31 725,-38 685.91,-31.27 641.61,-24.51 608.1,-19.56"/>
-<polygon fill="#000000" stroke="#000000" points="608.46,-16.08 598.06,-18.09 607.45,-23 608.46,-16.08"/>
+<path fill="none" stroke="#000000" d="M850.56,-70.77C804.99,-69.52 737.54,-65.1 680.5,-51"/>
+<path fill="none" stroke="#000000" d="M678.5,-51C652.77,-43.67 624.27,-34.69 601.19,-27.2"/>
+<polygon fill="#000000" stroke="#000000" points="602.25,-23.86 591.66,-24.08 600.08,-30.51 602.25,-23.86"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge5" class="edge">
+<g id="module~~s_fraggle_generate~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M780.04,-157.81C765.26,-133.17 728.15,-77.6 680.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C656.44,-40.15 630.27,-31.04 607.74,-24.52"/>
-<polygon fill="#000000" stroke="#000000" points="608.58,-21.12 598.01,-21.8 606.7,-27.86 608.58,-21.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.85,-79.21C739.62,-70.12 708.69,-57.97 680.5,-51"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-239 247,-239 247,-215 347,-215 347,-239"/>
-<text text-anchor="middle" x="297" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
+<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C483.42,-270.7 398.23,-255.42 346.08,-241.78"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-238.31 336.1,-239.08 344.84,-245.07 346.67,-238.31"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C638.56,-194.13 634.23,-213.69 598,-231 579.33,-239.92 575.24,-243.79 555.5,-250"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C611.33,-191.86 528.44,-184.94 477.41,-177.11"/>
+<polygon fill="#000000" stroke="#000000" points="477.76,-173.63 467.33,-175.49 476.65,-180.54 477.76,-173.63"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
-<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
+<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C653.46,-192.29 625.81,-196.62 603.08,-200.67"/>
-<polygon fill="#000000" stroke="#000000" points="602.22,-197.27 593.01,-202.5 603.47,-204.15 602.22,-197.27"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.47,-243.03 360.14,-231.59 334.53,-221.7"/>
+<polygon fill="#000000" stroke="#000000" points="335.81,-218.44 325.22,-218.01 333.22,-224.95 335.81,-218.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C501.88,-268.73 484.69,-251 430,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C636.07,-184.64 636.63,-208.14 598,-231 580.19,-241.54 574.95,-242.94 555.5,-250"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
-<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="722,-103 637,-103 637,-79 722,-79 722,-103"/>
+<text text-anchor="middle" x="679.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C668.61,-190.9 619.13,-165.01 586.02,-146.95"/>
-<polygon fill="#000000" stroke="#000000" points="587.61,-143.83 577.16,-142.1 584.25,-149.97 587.61,-143.83"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.93,-176.32C739.49,-181.18 708.23,-187.47 680.5,-190"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-91C752.26,-91 742.26,-91 732.32,-91"/>
+<polygon fill="#000000" stroke="#000000" points="732.05,-87.5 722.05,-91 732.05,-94.5 732.05,-87.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
+<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C640.68,-193.46 538.08,-181.86 477.19,-174.2"/>
-<polygon fill="#000000" stroke="#000000" points="477.42,-170.7 467.06,-172.92 476.54,-177.65 477.42,-170.7"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C661.93,-175.39 620.24,-159.54 589.98,-146.23"/>
+<polygon fill="#000000" stroke="#000000" points="591.16,-142.92 580.61,-142.02 588.3,-149.31 591.16,-142.92"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-180 123,-180 123,-156 211,-156 211,-180"/>
-<text text-anchor="middle" x="167" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="725,-280 634,-280 634,-256 725,-256 725,-280"/>
+<text text-anchor="middle" x="679.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.49,-182.21C776.36,-204.84 757.97,-253.3 725,-279 663.34,-327.06 632.12,-310.46 555.5,-326"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M779.68,-103.17C761.82,-132.85 715.83,-209.28 693.31,-246.71"/>
+<polygon fill="#000000" stroke="#000000" points="690.03,-245.38 687.87,-255.75 696.03,-248.98 690.03,-245.38"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="722,-142 637,-142 637,-118 722,-118 722,-142"/>
-<text text-anchor="middle" x="679.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-66 252.5,-66 252.5,-42 341.5,-42 341.5,-66"/>
+<text text-anchor="middle" x="297" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-160.21C749.37,-155.87 735.44,-150.63 722.45,-145.76"/>
-<polygon fill="#000000" stroke="#000000" points="723.35,-142.36 712.76,-142.12 720.89,-148.91 723.35,-142.36"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.99,-103.02C758.1,-121.58 720.64,-156.47 680.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C635.96,-184.34 639.08,-127.09 598,-109 575.81,-99.23 431.79,-75.28 351.64,-62.45"/>
+<polygon fill="#000000" stroke="#000000" points="352.15,-58.99 341.72,-60.87 351.05,-65.9 352.15,-58.99"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-102 252.5,-102 252.5,-78 341.5,-78 341.5,-102"/>
-<text text-anchor="middle" x="297" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
+<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C623.33,-22.36 442.8,-57.05 351.66,-77.35"/>
-<polygon fill="#000000" stroke="#000000" points="350.78,-73.96 341.8,-79.57 352.32,-80.79 350.78,-73.96"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C653.28,-178.21 625.14,-187.36 602.15,-194.83"/>
+<polygon fill="#000000" stroke="#000000" points="601.07,-191.51 592.64,-197.93 603.23,-198.16 601.07,-191.51"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="725,-270 634,-270 634,-246 725,-246 725,-270"/>
-<text text-anchor="middle" x="679.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
+<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.19,-182.24C754.23,-197.08 723.77,-222.25 702.92,-239.47"/>
-<polygon fill="#000000" stroke="#000000" points="700.66,-236.8 695.18,-245.87 705.12,-242.2 700.66,-236.8"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C531.29,-258.06 506.34,-265.61 484.72,-271.69"/>
+<polygon fill="#000000" stroke="#000000" points="483.74,-268.33 475.04,-274.37 485.61,-275.07 483.74,-268.33"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_fraggle_generate~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_fraggle_generate~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
+<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C529.82,-256.99 503.56,-264.66 481.36,-271.12"/>
-<polygon fill="#000000" stroke="#000000" points="480.1,-267.84 471.47,-273.99 482.05,-274.56 480.1,-267.84"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.46,-240.74 351.07,-268.85 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
+<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
+</g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge14" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C395.45,-16.71 360.12,-28.17 334.52,-38.14"/>
+<polygon fill="#000000" stroke="#000000" points="333.19,-34.9 325.21,-41.86 335.79,-41.39 333.19,-34.9"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge13" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.75,-8.7C486.76,-7.83 456.43,-8.41 430,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C369.35,-26.41 354.09,-28.83 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-50C274.15,-58.25 265.82,-55.17 247,-69 217.85,-90.42 193.54,-125.19 179.89,-147.31"/>
-<polygon fill="#000000" stroke="#000000" points="176.86,-145.56 174.71,-155.94 182.86,-149.16 176.86,-145.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C274.14,-22.23 264.83,-17.91 247,-33 210.85,-63.6 187.02,-115.15 175.69,-144.27"/>
+<polygon fill="#000000" stroke="#000000" points="172.31,-143.31 172.08,-153.9 178.86,-145.77 172.31,-143.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.42,-18.8 352.07,6.36 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.85,-11.29C487.02,-11.24 456.82,-11.76 430,-14"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge14" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C386.61,-22.76 382.92,-41.65 347,-64 341.97,-67.13 336.53,-70.26 331.17,-73.2"/>
-<polygon fill="#000000" stroke="#000000" points="329.46,-70.14 322.3,-77.95 332.77,-76.31 329.46,-70.14"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.31,-155.95C397.19,-151.91 389.54,-147.11 383,-142 356.61,-121.38 330.49,-92.78 314.31,-73.85"/>
+<polygon fill="#000000" stroke="#000000" points="316.93,-71.53 307.81,-66.14 311.58,-76.04 316.93,-71.53"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-214.92C250.63,-206.09 224.44,-194.02 203.43,-184.33"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-181.07 194.18,-180.07 201.79,-187.43 204.72,-181.07"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-167.27C364.75,-166.8 329.26,-166.24 298,-166"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
-<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
+<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.72,-206.66C481.03,-203.28 428.31,-197.36 383,-189 344.73,-181.94 336.91,-168 298,-168"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.47,-78.79C649.2,-74.6 641.16,-69.75 634,-65 617.34,-53.94 614.55,-49.23 598,-38 593.73,-35.1 589.13,-32.14 584.6,-29.3"/>
+<polygon fill="#000000" stroke="#000000" points="586.42,-26.31 576.07,-24.05 582.75,-32.27 586.42,-26.31"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.59,-103.02C628.56,-106.83 615.11,-111.1 602.52,-115.09"/>
+<polygon fill="#000000" stroke="#000000" points="601.12,-111.86 592.65,-118.22 603.24,-118.53 601.12,-111.86"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C402.99,-50.3 375.21,-50.45 351.77,-51.17"/>
+<polygon fill="#000000" stroke="#000000" points="351.55,-47.68 341.68,-51.52 351.79,-54.67 351.55,-47.68"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C367.94,-47.92 354.33,7.21 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.98,-82.19C587.84,-72.3 503.42,-56.98 430,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.45,-141.4C503.99,-145.23 489.93,-149.56 476.82,-153.59"/>
 <polygon fill="#000000" stroke="#000000" points="475.56,-150.32 467.03,-156.61 477.62,-157.01 475.56,-150.32"/>
 </g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge24" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C384.45,-124.7 342.02,-93.8 318.03,-72.99"/>
+<polygon fill="#000000" stroke="#000000" points="320.13,-70.17 310.34,-66.11 315.46,-75.38 320.13,-70.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.43,-130.55C491.87,-130.63 458.97,-130.2 430,-128"/>
+</g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge18" class="edge">
+<g id="module~~s_fraggle_generate~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-168C271.53,-168 244.42,-168 221.48,-168"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-164.5 211.25,-168 221.25,-171.5 221.25,-164.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.55,-127.75 358.45,-168 298,-168"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.98,-123.45 358.19,-166.46 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C394.85,-127.86 358.78,-116.35 333.07,-106.03"/>
-<polygon fill="#000000" stroke="#000000" points="334.32,-102.77 323.75,-102.17 331.64,-109.23 334.32,-102.77"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.48,-129.17C491.95,-128.67 459.06,-128.12 430,-128"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.22,-280.12C595.27,-300.66 477.09,-337.27 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-168C364.75,-168 329.26,-168 298,-168"/>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.81,-66.41C259.4,-86.03 215.65,-124.31 189.4,-147.27"/>
+<polygon fill="#000000" stroke="#000000" points="187.08,-144.65 181.86,-153.87 191.69,-149.92 187.08,-144.65"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-155.94C399.32,-151.59 390.76,-146.61 383,-142 363.93,-130.66 342.63,-117.63 326.13,-107.45"/>
-<polygon fill="#000000" stroke="#000000" points="327.84,-104.4 317.5,-102.12 324.16,-110.35 327.84,-104.4"/>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
+<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.67,-206.89C480.96,-203.67 428.22,-197.86 383,-189 344.59,-181.48 337.14,-166.3 298,-166"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_generate~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_fraggle_generate~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_fraggle_generate~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-180 0,-180 0,-156 87,-156 87,-180"/>
-<text text-anchor="middle" x="43.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
+<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-168C114.58,-168 105.86,-168 97.36,-168"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-164.5 87.13,-168 97.13,-171.5 97.13,-164.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.8,-117.82C644.44,-97.32 601.16,-55.8 575.63,-31.31"/>
-<polygon fill="#000000" stroke="#000000" points="577.95,-28.69 568.32,-24.29 573.11,-33.74 577.95,-28.69"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.82,-142.15C639.2,-155.56 605.83,-177.26 582.4,-192.5"/>
-<polygon fill="#000000" stroke="#000000" points="580.43,-189.61 573.95,-198 584.25,-195.48 580.43,-189.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.86,-130C625.87,-130 613.93,-130 602.66,-130"/>
-<polygon fill="#000000" stroke="#000000" points="602.56,-126.5 592.56,-130 602.56,-133.5 602.56,-126.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C367.72,-85.46 354.56,-28.65 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.97,-117.96C624.52,-114.68 610.78,-111.38 598,-109 524.12,-95.26 504.93,-95.64 430,-90"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C403,-88.12 375.23,-87.87 351.79,-88.19"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-84.69 341.69,-88.37 351.75,-91.69 351.63,-84.69"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.28,-102.02C255.01,-114.98 220.95,-135.73 196.71,-150.5"/>
-<polygon fill="#000000" stroke="#000000" points="194.67,-147.65 187.95,-155.84 198.31,-153.63 194.67,-147.65"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_generate~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-326C440.94,-341.03 404.04,-366.64 298,-326"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M663.8,-270.11C641.87,-287.2 598.54,-317.27 555.5,-326"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_generate~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C233.63,-302.1 193.53,-227.22 176.85,-189.77"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-188.08 172.77,-180.28 173.51,-190.84 179.94,-188.08"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-298.07C370.04,-312.35 317.13,-333.33 298,-326"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_fraggle_io.html b/docs/module/s_fraggle_io.html
index 22eb3e2d9..4f3b3d09d 100644
--- a/docs/module/s_fraggle_io.html
+++ b/docs/module/s_fraggle_io.html
@@ -134,7 +134,7 @@ <h1>s_fraggle_io
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.3% of total for modules and submodules.">203 statements</a>
+    title=" 1.2% of total for modules and submodules.">203 statements</a>
      </li> 
      
      
@@ -253,31 +253,31 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_fraggle_io~~UsesGraph Pages: 1 -->
-<svg id="modules_fraggle_ioUsesGraph" width="641pt" height="245pt"
- viewBox="0.00 0.00 641.00 245.40" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_fraggle_io~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 352.04)">
+<svg id="modules_fraggle_ioUsesGraph" width="641pt" height="225pt"
+ viewBox="0.00 0.00 641.00 225.18" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_fraggle_io~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 322.71)">
 <title>module~~s_fraggle_io~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-352.04 926,-352.04 926,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.71 926,-322.71 926,4 -4,4"/>
 <!-- module~s_fraggle_io -->
 <g id="module~~s_fraggle_io~~UsesGraph_node1" class="node">
 <title>module~s_fraggle_io</title>
-<polygon fill="none" stroke="black" points="922,-84 851,-84 851,-60 922,-60 922,-84"/>
-<text text-anchor="middle" x="886.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_io</text>
+<polygon fill="none" stroke="black" points="922,-83 851,-83 851,-59 922,-59 922,-83"/>
+<text text-anchor="middle" x="886.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_io</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_fraggle_io~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_fraggle_io~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="815,-182 761,-182 761,-158 815,-158 815,-182"/>
-<text text-anchor="middle" x="788" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="815,-103 761,-103 761,-79 815,-79 815,-103"/>
+<text text-anchor="middle" x="788" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge1" class="edge">
 <title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M873.67,-84.02C857.32,-100.62 827.63,-130.77 808.11,-150.59"/>
-<polygon fill="#000000" stroke="#000000" points="805.45,-148.3 800.93,-157.88 810.44,-153.22 805.45,-148.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M850.93,-78.16C842.55,-79.9 833.57,-81.76 825.12,-83.51"/>
+<polygon fill="#000000" stroke="#000000" points="824.23,-80.12 815.15,-85.58 825.65,-86.98 824.23,-80.12"/>
 </g>
 <!-- module~fraggle_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_node3" class="node">
@@ -291,277 +291,270 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~s_fraggle_io&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge2" class="edge">
 <title>module~s_fraggle_io&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M850.86,-64.07C818.43,-56.79 768.57,-45.95 725,-38 685.98,-30.88 641.67,-24.13 608.14,-19.29"/>
-<polygon fill="#000000" stroke="#000000" points="608.5,-15.81 598.1,-17.85 607.51,-22.74 608.5,-15.81"/>
+<path fill="none" stroke="#000000" d="M850.89,-70.67C809.72,-69.57 739.17,-65.5 680.5,-51"/>
+<path fill="none" stroke="#000000" d="M678.5,-51C652.66,-43.7 624.05,-34.68 600.93,-27.16"/>
+<polygon fill="#000000" stroke="#000000" points="601.97,-23.82 591.38,-24.04 599.8,-30.47 601.97,-23.82"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge5" class="edge">
+<g id="module~~s_fraggle_io~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M780.04,-157.81C765.26,-133.17 728.15,-77.6 680.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C656.44,-40.15 630.27,-31.04 607.74,-24.52"/>
-<polygon fill="#000000" stroke="#000000" points="608.58,-21.12 598.01,-21.8 606.7,-27.86 608.58,-21.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.85,-79.21C739.62,-70.12 708.69,-57.97 680.5,-51"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-239 247,-239 247,-215 347,-215 347,-239"/>
-<text text-anchor="middle" x="297" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
+<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C483.42,-270.7 398.23,-255.42 346.08,-241.78"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-238.31 336.1,-239.08 344.84,-245.07 346.67,-238.31"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C638.56,-194.13 634.23,-213.69 598,-231 579.33,-239.92 575.24,-243.79 555.5,-250"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C611.33,-191.86 528.44,-184.94 477.41,-177.11"/>
+<polygon fill="#000000" stroke="#000000" points="477.76,-173.63 467.33,-175.49 476.65,-180.54 477.76,-173.63"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_fraggle_io~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
-<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
+<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C653.46,-192.29 625.81,-196.62 603.08,-200.67"/>
-<polygon fill="#000000" stroke="#000000" points="602.22,-197.27 593.01,-202.5 603.47,-204.15 602.22,-197.27"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.47,-243.03 360.14,-231.59 334.53,-221.7"/>
+<polygon fill="#000000" stroke="#000000" points="335.81,-218.44 325.22,-218.01 333.22,-224.95 335.81,-218.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C501.88,-268.73 484.69,-251 430,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C636.07,-184.64 636.63,-208.14 598,-231 580.19,-241.54 574.95,-242.94 555.5,-250"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
-<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="722,-103 637,-103 637,-79 722,-79 722,-103"/>
+<text text-anchor="middle" x="679.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C668.61,-190.9 619.13,-165.01 586.02,-146.95"/>
-<polygon fill="#000000" stroke="#000000" points="587.61,-143.83 577.16,-142.1 584.25,-149.97 587.61,-143.83"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.93,-176.32C739.49,-181.18 708.23,-187.47 680.5,-190"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-91C752.26,-91 742.26,-91 732.32,-91"/>
+<polygon fill="#000000" stroke="#000000" points="732.05,-87.5 722.05,-91 732.05,-94.5 732.05,-87.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
+<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C640.68,-193.46 538.08,-181.86 477.19,-174.2"/>
-<polygon fill="#000000" stroke="#000000" points="477.42,-170.7 467.06,-172.92 476.54,-177.65 477.42,-170.7"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C661.93,-175.39 620.24,-159.54 589.98,-146.23"/>
+<polygon fill="#000000" stroke="#000000" points="591.16,-142.92 580.61,-142.02 588.3,-149.31 591.16,-142.92"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_fraggle_io~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-180 123,-180 123,-156 211,-156 211,-180"/>
-<text text-anchor="middle" x="167" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="725,-280 634,-280 634,-256 725,-256 725,-280"/>
+<text text-anchor="middle" x="679.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.49,-182.21C776.36,-204.84 757.97,-253.3 725,-279 663.34,-327.06 632.12,-310.46 555.5,-326"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M779.68,-103.17C761.82,-132.85 715.83,-209.28 693.31,-246.71"/>
+<polygon fill="#000000" stroke="#000000" points="690.03,-245.38 687.87,-255.75 696.03,-248.98 690.03,-245.38"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="722,-142 637,-142 637,-118 722,-118 722,-142"/>
-<text text-anchor="middle" x="679.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-66 252.5,-66 252.5,-42 341.5,-42 341.5,-66"/>
+<text text-anchor="middle" x="297" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-160.21C749.37,-155.87 735.44,-150.63 722.45,-145.76"/>
-<polygon fill="#000000" stroke="#000000" points="723.35,-142.36 712.76,-142.12 720.89,-148.91 723.35,-142.36"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.99,-103.02C758.1,-121.58 720.64,-156.47 680.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C635.96,-184.34 639.08,-127.09 598,-109 575.81,-99.23 431.79,-75.28 351.64,-62.45"/>
+<polygon fill="#000000" stroke="#000000" points="352.15,-58.99 341.72,-60.87 351.05,-65.9 352.15,-58.99"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-102 252.5,-102 252.5,-78 341.5,-78 341.5,-102"/>
-<text text-anchor="middle" x="297" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
+<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C623.33,-22.36 442.8,-57.05 351.66,-77.35"/>
-<polygon fill="#000000" stroke="#000000" points="350.78,-73.96 341.8,-79.57 352.32,-80.79 350.78,-73.96"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C653.28,-178.21 625.14,-187.36 602.15,-194.83"/>
+<polygon fill="#000000" stroke="#000000" points="601.07,-191.51 592.64,-197.93 603.23,-198.16 601.07,-191.51"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="725,-270 634,-270 634,-246 725,-246 725,-270"/>
-<text text-anchor="middle" x="679.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
+<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.19,-182.24C754.23,-197.08 723.77,-222.25 702.92,-239.47"/>
-<polygon fill="#000000" stroke="#000000" points="700.66,-236.8 695.18,-245.87 705.12,-242.2 700.66,-236.8"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C531.29,-258.06 506.34,-265.61 484.72,-271.69"/>
+<polygon fill="#000000" stroke="#000000" points="483.74,-268.33 475.04,-274.37 485.61,-275.07 483.74,-268.33"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_fraggle_io~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_fraggle_io~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_fraggle_io~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
+<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C529.82,-256.99 503.56,-264.66 481.36,-271.12"/>
-<polygon fill="#000000" stroke="#000000" points="480.1,-267.84 471.47,-273.99 482.05,-274.56 480.1,-267.84"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.46,-240.74 351.07,-268.85 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
+<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
+</g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge14" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C395.45,-16.71 360.12,-28.17 334.52,-38.14"/>
+<polygon fill="#000000" stroke="#000000" points="333.19,-34.9 325.21,-41.86 335.79,-41.39 333.19,-34.9"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge13" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.75,-8.7C486.76,-7.83 456.43,-8.41 430,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C369.35,-26.41 354.09,-28.83 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-50C274.15,-58.25 265.82,-55.17 247,-69 217.85,-90.42 193.54,-125.19 179.89,-147.31"/>
-<polygon fill="#000000" stroke="#000000" points="176.86,-145.56 174.71,-155.94 182.86,-149.16 176.86,-145.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C274.14,-22.23 264.83,-17.91 247,-33 210.85,-63.6 187.02,-115.15 175.69,-144.27"/>
+<polygon fill="#000000" stroke="#000000" points="172.31,-143.31 172.08,-153.9 178.86,-145.77 172.31,-143.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.42,-18.8 352.07,6.36 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.85,-11.29C487.02,-11.24 456.82,-11.76 430,-14"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge14" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C386.61,-22.76 382.92,-41.65 347,-64 341.97,-67.13 336.53,-70.26 331.17,-73.2"/>
-<polygon fill="#000000" stroke="#000000" points="329.46,-70.14 322.3,-77.95 332.77,-76.31 329.46,-70.14"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.31,-155.95C397.19,-151.91 389.54,-147.11 383,-142 356.61,-121.38 330.49,-92.78 314.31,-73.85"/>
+<polygon fill="#000000" stroke="#000000" points="316.93,-71.53 307.81,-66.14 311.58,-76.04 316.93,-71.53"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-214.92C250.63,-206.09 224.44,-194.02 203.43,-184.33"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-181.07 194.18,-180.07 201.79,-187.43 204.72,-181.07"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-167.27C364.75,-166.8 329.26,-166.24 298,-166"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
-<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
+<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.72,-206.66C481.03,-203.28 428.31,-197.36 383,-189 344.73,-181.94 336.91,-168 298,-168"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.47,-78.79C649.2,-74.6 641.16,-69.75 634,-65 617.34,-53.94 614.55,-49.23 598,-38 593.73,-35.1 589.13,-32.14 584.6,-29.3"/>
+<polygon fill="#000000" stroke="#000000" points="586.42,-26.31 576.07,-24.05 582.75,-32.27 586.42,-26.31"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.59,-103.02C628.56,-106.83 615.11,-111.1 602.52,-115.09"/>
+<polygon fill="#000000" stroke="#000000" points="601.12,-111.86 592.65,-118.22 603.24,-118.53 601.12,-111.86"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C402.99,-50.3 375.21,-50.45 351.77,-51.17"/>
+<polygon fill="#000000" stroke="#000000" points="351.55,-47.68 341.68,-51.52 351.79,-54.67 351.55,-47.68"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C367.94,-47.92 354.33,7.21 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.98,-82.19C587.84,-72.3 503.42,-56.98 430,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.45,-141.4C503.99,-145.23 489.93,-149.56 476.82,-153.59"/>
 <polygon fill="#000000" stroke="#000000" points="475.56,-150.32 467.03,-156.61 477.62,-157.01 475.56,-150.32"/>
 </g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge24" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C384.45,-124.7 342.02,-93.8 318.03,-72.99"/>
+<polygon fill="#000000" stroke="#000000" points="320.13,-70.17 310.34,-66.11 315.46,-75.38 320.13,-70.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.43,-130.55C491.87,-130.63 458.97,-130.2 430,-128"/>
+</g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge18" class="edge">
+<g id="module~~s_fraggle_io~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-168C271.53,-168 244.42,-168 221.48,-168"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-164.5 211.25,-168 221.25,-171.5 221.25,-164.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.55,-127.75 358.45,-168 298,-168"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.98,-123.45 358.19,-166.46 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C394.85,-127.86 358.78,-116.35 333.07,-106.03"/>
-<polygon fill="#000000" stroke="#000000" points="334.32,-102.77 323.75,-102.17 331.64,-109.23 334.32,-102.77"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.48,-129.17C491.95,-128.67 459.06,-128.12 430,-128"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.22,-280.12C595.27,-300.66 477.09,-337.27 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-168C364.75,-168 329.26,-168 298,-168"/>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.81,-66.41C259.4,-86.03 215.65,-124.31 189.4,-147.27"/>
+<polygon fill="#000000" stroke="#000000" points="187.08,-144.65 181.86,-153.87 191.69,-149.92 187.08,-144.65"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-155.94C399.32,-151.59 390.76,-146.61 383,-142 363.93,-130.66 342.63,-117.63 326.13,-107.45"/>
-<polygon fill="#000000" stroke="#000000" points="327.84,-104.4 317.5,-102.12 324.16,-110.35 327.84,-104.4"/>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
+<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.67,-206.89C480.96,-203.67 428.22,-197.86 383,-189 344.59,-181.48 337.14,-166.3 298,-166"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_io~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_fraggle_io~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_fraggle_io~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-180 0,-180 0,-156 87,-156 87,-180"/>
-<text text-anchor="middle" x="43.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
+<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-168C114.58,-168 105.86,-168 97.36,-168"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-164.5 87.13,-168 97.13,-171.5 97.13,-164.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.8,-117.82C644.44,-97.32 601.16,-55.8 575.63,-31.31"/>
-<polygon fill="#000000" stroke="#000000" points="577.95,-28.69 568.32,-24.29 573.11,-33.74 577.95,-28.69"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.82,-142.15C639.2,-155.56 605.83,-177.26 582.4,-192.5"/>
-<polygon fill="#000000" stroke="#000000" points="580.43,-189.61 573.95,-198 584.25,-195.48 580.43,-189.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.86,-130C625.87,-130 613.93,-130 602.66,-130"/>
-<polygon fill="#000000" stroke="#000000" points="602.56,-126.5 592.56,-130 602.56,-133.5 602.56,-126.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C367.72,-85.46 354.56,-28.65 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.97,-117.96C624.52,-114.68 610.78,-111.38 598,-109 524.12,-95.26 504.93,-95.64 430,-90"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C403,-88.12 375.23,-87.87 351.79,-88.19"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-84.69 341.69,-88.37 351.75,-91.69 351.63,-84.69"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.28,-102.02C255.01,-114.98 220.95,-135.73 196.71,-150.5"/>
-<polygon fill="#000000" stroke="#000000" points="194.67,-147.65 187.95,-155.84 198.31,-153.63 194.67,-147.65"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_io~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-326C440.94,-341.03 404.04,-366.64 298,-326"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M663.8,-270.11C641.87,-287.2 598.54,-317.27 555.5,-326"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_io~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C233.63,-302.1 193.53,-227.22 176.85,-189.77"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-188.08 172.77,-180.28 173.51,-190.84 179.94,-188.08"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-298.07C370.04,-312.35 317.13,-333.33 298,-326"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_fraggle_placeholder.html b/docs/module/s_fraggle_placeholder.html
index 164dc0ff5..dd692cc56 100644
--- a/docs/module/s_fraggle_placeholder.html
+++ b/docs/module/s_fraggle_placeholder.html
@@ -249,31 +249,31 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_fraggle_placeholder~~UsesGraph Pages: 1 -->
-<svg id="modules_fraggle_placeholderUsesGraph" width="641pt" height="234pt"
- viewBox="0.00 0.00 641.00 233.60" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_fraggle_placeholder~~UsesGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 352.04)">
+<svg id="modules_fraggle_placeholderUsesGraph" width="641pt" height="214pt"
+ viewBox="0.00 0.00 641.00 214.35" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_fraggle_placeholder~~UsesGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 322.71)">
 <title>module~~s_fraggle_placeholder~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-352.04 973,-352.04 973,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.71 973,-322.71 973,4 -4,4"/>
 <!-- module~s_fraggle_placeholder -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node1" class="node">
 <title>module~s_fraggle_placeholder</title>
-<polygon fill="none" stroke="black" points="969,-84 851,-84 851,-60 969,-60 969,-84"/>
-<text text-anchor="middle" x="910" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_placeholder</text>
+<polygon fill="none" stroke="black" points="969,-83 851,-83 851,-59 969,-59 969,-83"/>
+<text text-anchor="middle" x="910" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_placeholder</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_fraggle_placeholder~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="815,-182 761,-182 761,-158 815,-158 815,-182"/>
-<text text-anchor="middle" x="788" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="815,-103 761,-103 761,-79 815,-79 815,-103"/>
+<text text-anchor="middle" x="788" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge1" class="edge">
 <title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M894.29,-84.02C873.68,-100.84 836.05,-131.58 811.8,-151.38"/>
-<polygon fill="#000000" stroke="#000000" points="809.37,-148.85 803.83,-157.88 813.79,-154.27 809.37,-148.85"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M850.76,-80.71C841.94,-82.18 833.07,-83.65 824.92,-85.01"/>
+<polygon fill="#000000" stroke="#000000" points="824.31,-81.57 815.02,-86.66 825.46,-88.47 824.31,-81.57"/>
 </g>
 <!-- module~fraggle_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node3" class="node">
@@ -287,277 +287,270 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge2" class="edge">
 <title>module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M850.66,-60.75C814.52,-53.9 767.12,-45.12 725,-38 685.89,-31.39 641.59,-24.62 608.08,-19.64"/>
-<polygon fill="#000000" stroke="#000000" points="608.45,-16.16 598.05,-18.16 607.43,-23.08 608.45,-16.16"/>
+<path fill="none" stroke="#000000" d="M850.91,-70.85C804.23,-69.56 737.33,-65.05 680.5,-51"/>
+<path fill="none" stroke="#000000" d="M678.5,-51C652.66,-43.7 624.05,-34.68 600.93,-27.16"/>
+<polygon fill="#000000" stroke="#000000" points="601.97,-23.82 591.38,-24.04 599.8,-30.47 601.97,-23.82"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge5" class="edge">
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M780.04,-157.81C765.26,-133.17 728.15,-77.6 680.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C656.44,-40.15 630.27,-31.04 607.74,-24.52"/>
-<polygon fill="#000000" stroke="#000000" points="608.58,-21.12 598.01,-21.8 606.7,-27.86 608.58,-21.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.85,-79.21C739.62,-70.12 708.69,-57.97 680.5,-51"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-239 247,-239 247,-215 347,-215 347,-239"/>
-<text text-anchor="middle" x="297" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
+<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C483.42,-270.7 398.23,-255.42 346.08,-241.78"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-238.31 336.1,-239.08 344.84,-245.07 346.67,-238.31"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C638.56,-194.13 634.23,-213.69 598,-231 579.33,-239.92 575.24,-243.79 555.5,-250"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C611.33,-191.86 528.44,-184.94 477.41,-177.11"/>
+<polygon fill="#000000" stroke="#000000" points="477.76,-173.63 467.33,-175.49 476.65,-180.54 477.76,-173.63"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
-<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
+<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C653.46,-192.29 625.81,-196.62 603.08,-200.67"/>
-<polygon fill="#000000" stroke="#000000" points="602.22,-197.27 593.01,-202.5 603.47,-204.15 602.22,-197.27"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.47,-243.03 360.14,-231.59 334.53,-221.7"/>
+<polygon fill="#000000" stroke="#000000" points="335.81,-218.44 325.22,-218.01 333.22,-224.95 335.81,-218.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C501.88,-268.73 484.69,-251 430,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C636.07,-184.64 636.63,-208.14 598,-231 580.19,-241.54 574.95,-242.94 555.5,-250"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
-<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="722,-103 637,-103 637,-79 722,-79 722,-103"/>
+<text text-anchor="middle" x="679.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C668.61,-190.9 619.13,-165.01 586.02,-146.95"/>
-<polygon fill="#000000" stroke="#000000" points="587.61,-143.83 577.16,-142.1 584.25,-149.97 587.61,-143.83"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.93,-176.32C739.49,-181.18 708.23,-187.47 680.5,-190"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-91C752.26,-91 742.26,-91 732.32,-91"/>
+<polygon fill="#000000" stroke="#000000" points="732.05,-87.5 722.05,-91 732.05,-94.5 732.05,-87.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
+<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C640.68,-193.46 538.08,-181.86 477.19,-174.2"/>
-<polygon fill="#000000" stroke="#000000" points="477.42,-170.7 467.06,-172.92 476.54,-177.65 477.42,-170.7"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C661.93,-175.39 620.24,-159.54 589.98,-146.23"/>
+<polygon fill="#000000" stroke="#000000" points="591.16,-142.92 580.61,-142.02 588.3,-149.31 591.16,-142.92"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-180 123,-180 123,-156 211,-156 211,-180"/>
-<text text-anchor="middle" x="167" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="725,-280 634,-280 634,-256 725,-256 725,-280"/>
+<text text-anchor="middle" x="679.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.49,-182.21C776.36,-204.84 757.97,-253.3 725,-279 663.34,-327.06 632.12,-310.46 555.5,-326"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M779.68,-103.17C761.82,-132.85 715.83,-209.28 693.31,-246.71"/>
+<polygon fill="#000000" stroke="#000000" points="690.03,-245.38 687.87,-255.75 696.03,-248.98 690.03,-245.38"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="722,-142 637,-142 637,-118 722,-118 722,-142"/>
-<text text-anchor="middle" x="679.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-66 252.5,-66 252.5,-42 341.5,-42 341.5,-66"/>
+<text text-anchor="middle" x="297" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-160.21C749.37,-155.87 735.44,-150.63 722.45,-145.76"/>
-<polygon fill="#000000" stroke="#000000" points="723.35,-142.36 712.76,-142.12 720.89,-148.91 723.35,-142.36"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.99,-103.02C758.1,-121.58 720.64,-156.47 680.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C635.96,-184.34 639.08,-127.09 598,-109 575.81,-99.23 431.79,-75.28 351.64,-62.45"/>
+<polygon fill="#000000" stroke="#000000" points="352.15,-58.99 341.72,-60.87 351.05,-65.9 352.15,-58.99"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-102 252.5,-102 252.5,-78 341.5,-78 341.5,-102"/>
-<text text-anchor="middle" x="297" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
+<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C623.33,-22.36 442.8,-57.05 351.66,-77.35"/>
-<polygon fill="#000000" stroke="#000000" points="350.78,-73.96 341.8,-79.57 352.32,-80.79 350.78,-73.96"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C653.28,-178.21 625.14,-187.36 602.15,-194.83"/>
+<polygon fill="#000000" stroke="#000000" points="601.07,-191.51 592.64,-197.93 603.23,-198.16 601.07,-191.51"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="725,-270 634,-270 634,-246 725,-246 725,-270"/>
-<text text-anchor="middle" x="679.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
+<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.19,-182.24C754.23,-197.08 723.77,-222.25 702.92,-239.47"/>
-<polygon fill="#000000" stroke="#000000" points="700.66,-236.8 695.18,-245.87 705.12,-242.2 700.66,-236.8"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C531.29,-258.06 506.34,-265.61 484.72,-271.69"/>
+<polygon fill="#000000" stroke="#000000" points="483.74,-268.33 475.04,-274.37 485.61,-275.07 483.74,-268.33"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_fraggle_placeholder~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
+<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C529.82,-256.99 503.56,-264.66 481.36,-271.12"/>
-<polygon fill="#000000" stroke="#000000" points="480.1,-267.84 471.47,-273.99 482.05,-274.56 480.1,-267.84"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.46,-240.74 351.07,-268.85 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
+<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
+</g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge14" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C395.45,-16.71 360.12,-28.17 334.52,-38.14"/>
+<polygon fill="#000000" stroke="#000000" points="333.19,-34.9 325.21,-41.86 335.79,-41.39 333.19,-34.9"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge13" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.75,-8.7C486.76,-7.83 456.43,-8.41 430,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C369.35,-26.41 354.09,-28.83 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-50C274.15,-58.25 265.82,-55.17 247,-69 217.85,-90.42 193.54,-125.19 179.89,-147.31"/>
-<polygon fill="#000000" stroke="#000000" points="176.86,-145.56 174.71,-155.94 182.86,-149.16 176.86,-145.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C274.14,-22.23 264.83,-17.91 247,-33 210.85,-63.6 187.02,-115.15 175.69,-144.27"/>
+<polygon fill="#000000" stroke="#000000" points="172.31,-143.31 172.08,-153.9 178.86,-145.77 172.31,-143.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.42,-18.8 352.07,6.36 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.85,-11.29C487.02,-11.24 456.82,-11.76 430,-14"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge14" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C386.61,-22.76 382.92,-41.65 347,-64 341.97,-67.13 336.53,-70.26 331.17,-73.2"/>
-<polygon fill="#000000" stroke="#000000" points="329.46,-70.14 322.3,-77.95 332.77,-76.31 329.46,-70.14"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.31,-155.95C397.19,-151.91 389.54,-147.11 383,-142 356.61,-121.38 330.49,-92.78 314.31,-73.85"/>
+<polygon fill="#000000" stroke="#000000" points="316.93,-71.53 307.81,-66.14 311.58,-76.04 316.93,-71.53"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-214.92C250.63,-206.09 224.44,-194.02 203.43,-184.33"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-181.07 194.18,-180.07 201.79,-187.43 204.72,-181.07"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-167.27C364.75,-166.8 329.26,-166.24 298,-166"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
-<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
+<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.72,-206.66C481.03,-203.28 428.31,-197.36 383,-189 344.73,-181.94 336.91,-168 298,-168"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.47,-78.79C649.2,-74.6 641.16,-69.75 634,-65 617.34,-53.94 614.55,-49.23 598,-38 593.73,-35.1 589.13,-32.14 584.6,-29.3"/>
+<polygon fill="#000000" stroke="#000000" points="586.42,-26.31 576.07,-24.05 582.75,-32.27 586.42,-26.31"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.59,-103.02C628.56,-106.83 615.11,-111.1 602.52,-115.09"/>
+<polygon fill="#000000" stroke="#000000" points="601.12,-111.86 592.65,-118.22 603.24,-118.53 601.12,-111.86"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C402.99,-50.3 375.21,-50.45 351.77,-51.17"/>
+<polygon fill="#000000" stroke="#000000" points="351.55,-47.68 341.68,-51.52 351.79,-54.67 351.55,-47.68"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C367.94,-47.92 354.33,7.21 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.98,-82.19C587.84,-72.3 503.42,-56.98 430,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.45,-141.4C503.99,-145.23 489.93,-149.56 476.82,-153.59"/>
 <polygon fill="#000000" stroke="#000000" points="475.56,-150.32 467.03,-156.61 477.62,-157.01 475.56,-150.32"/>
 </g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge24" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C384.45,-124.7 342.02,-93.8 318.03,-72.99"/>
+<polygon fill="#000000" stroke="#000000" points="320.13,-70.17 310.34,-66.11 315.46,-75.38 320.13,-70.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.43,-130.55C491.87,-130.63 458.97,-130.2 430,-128"/>
+</g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge18" class="edge">
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-168C271.53,-168 244.42,-168 221.48,-168"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-164.5 211.25,-168 221.25,-171.5 221.25,-164.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.55,-127.75 358.45,-168 298,-168"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.98,-123.45 358.19,-166.46 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C394.85,-127.86 358.78,-116.35 333.07,-106.03"/>
-<polygon fill="#000000" stroke="#000000" points="334.32,-102.77 323.75,-102.17 331.64,-109.23 334.32,-102.77"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.48,-129.17C491.95,-128.67 459.06,-128.12 430,-128"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.22,-280.12C595.27,-300.66 477.09,-337.27 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-168C364.75,-168 329.26,-168 298,-168"/>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.81,-66.41C259.4,-86.03 215.65,-124.31 189.4,-147.27"/>
+<polygon fill="#000000" stroke="#000000" points="187.08,-144.65 181.86,-153.87 191.69,-149.92 187.08,-144.65"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-155.94C399.32,-151.59 390.76,-146.61 383,-142 363.93,-130.66 342.63,-117.63 326.13,-107.45"/>
-<polygon fill="#000000" stroke="#000000" points="327.84,-104.4 317.5,-102.12 324.16,-110.35 327.84,-104.4"/>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
+<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.67,-206.89C480.96,-203.67 428.22,-197.86 383,-189 344.59,-181.48 337.14,-166.3 298,-166"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_placeholder~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_fraggle_placeholder~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-180 0,-180 0,-156 87,-156 87,-180"/>
-<text text-anchor="middle" x="43.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
+<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-168C114.58,-168 105.86,-168 97.36,-168"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-164.5 87.13,-168 97.13,-171.5 97.13,-164.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.8,-117.82C644.44,-97.32 601.16,-55.8 575.63,-31.31"/>
-<polygon fill="#000000" stroke="#000000" points="577.95,-28.69 568.32,-24.29 573.11,-33.74 577.95,-28.69"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.82,-142.15C639.2,-155.56 605.83,-177.26 582.4,-192.5"/>
-<polygon fill="#000000" stroke="#000000" points="580.43,-189.61 573.95,-198 584.25,-195.48 580.43,-189.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.86,-130C625.87,-130 613.93,-130 602.66,-130"/>
-<polygon fill="#000000" stroke="#000000" points="602.56,-126.5 592.56,-130 602.56,-133.5 602.56,-126.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C367.72,-85.46 354.56,-28.65 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.97,-117.96C624.52,-114.68 610.78,-111.38 598,-109 524.12,-95.26 504.93,-95.64 430,-90"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C403,-88.12 375.23,-87.87 351.79,-88.19"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-84.69 341.69,-88.37 351.75,-91.69 351.63,-84.69"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.28,-102.02C255.01,-114.98 220.95,-135.73 196.71,-150.5"/>
-<polygon fill="#000000" stroke="#000000" points="194.67,-147.65 187.95,-155.84 198.31,-153.63 194.67,-147.65"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_placeholder~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-326C440.94,-341.03 404.04,-366.64 298,-326"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M663.8,-270.11C641.87,-287.2 598.54,-317.27 555.5,-326"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_placeholder~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C233.63,-302.1 193.53,-227.22 176.85,-189.77"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-188.08 172.77,-180.28 173.51,-190.84 179.94,-188.08"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-298.07C370.04,-312.35 317.13,-333.33 298,-326"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_fraggle_regime.html b/docs/module/s_fraggle_regime.html
index 0ca76f62d..660fdb585 100644
--- a/docs/module/s_fraggle_regime.html
+++ b/docs/module/s_fraggle_regime.html
@@ -257,31 +257,31 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_fraggle_regime~~UsesGraph Pages: 1 -->
-<svg id="modules_fraggle_regimeUsesGraph" width="641pt" height="239pt"
- viewBox="0.00 0.00 641.00 238.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_fraggle_regime~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 352.04)">
+<svg id="modules_fraggle_regimeUsesGraph" width="641pt" height="219pt"
+ viewBox="0.00 0.00 641.00 219.29" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_fraggle_regime~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 322.71)">
 <title>module~~s_fraggle_regime~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-352.04 951,-352.04 951,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.71 951,-322.71 951,4 -4,4"/>
 <!-- module~s_fraggle_regime -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node1" class="node">
 <title>module~s_fraggle_regime</title>
-<polygon fill="none" stroke="black" points="947,-84 851,-84 851,-60 947,-60 947,-84"/>
-<text text-anchor="middle" x="899" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_regime</text>
+<polygon fill="none" stroke="black" points="947,-83 851,-83 851,-59 947,-59 947,-83"/>
+<text text-anchor="middle" x="899" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_regime</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_fraggle_regime~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="815,-182 761,-182 761,-158 815,-158 815,-182"/>
-<text text-anchor="middle" x="788" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="815,-103 761,-103 761,-79 815,-79 815,-103"/>
+<text text-anchor="middle" x="788" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge1" class="edge">
 <title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.63,-84.02C866,-100.77 832.04,-131.31 810,-151.12"/>
-<polygon fill="#000000" stroke="#000000" points="807.57,-148.6 802.47,-157.88 812.25,-153.8 807.57,-148.6"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M850.82,-79.66C842.25,-81.23 833.43,-82.85 825.23,-84.35"/>
+<polygon fill="#000000" stroke="#000000" points="824.44,-80.94 815.24,-86.19 825.71,-87.82 824.44,-80.94"/>
 </g>
 <!-- module~fraggle_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node3" class="node">
@@ -295,277 +295,270 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~s_fraggle_regime&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge2" class="edge">
 <title>module~s_fraggle_regime&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M850.74,-62.16C816.02,-55.06 767.66,-45.46 725,-38 685.93,-31.17 641.62,-24.41 608.11,-19.49"/>
-<polygon fill="#000000" stroke="#000000" points="608.47,-16.01 598.07,-18.03 607.46,-22.93 608.47,-16.01"/>
+<path fill="none" stroke="#000000" d="M850.65,-70.73C806.13,-69.52 737.93,-65.2 680.5,-51"/>
+<path fill="none" stroke="#000000" d="M678.5,-51C652.77,-43.67 624.27,-34.69 601.19,-27.2"/>
+<polygon fill="#000000" stroke="#000000" points="602.25,-23.86 591.66,-24.08 600.08,-30.51 602.25,-23.86"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge5" class="edge">
+<g id="module~~s_fraggle_regime~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M780.04,-157.81C765.26,-133.17 728.15,-77.6 680.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C656.44,-40.15 630.27,-31.04 607.74,-24.52"/>
-<polygon fill="#000000" stroke="#000000" points="608.58,-21.12 598.01,-21.8 606.7,-27.86 608.58,-21.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.85,-79.21C739.62,-70.12 708.69,-57.97 680.5,-51"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-239 247,-239 247,-215 347,-215 347,-239"/>
-<text text-anchor="middle" x="297" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
+<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C483.42,-270.7 398.23,-255.42 346.08,-241.78"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-238.31 336.1,-239.08 344.84,-245.07 346.67,-238.31"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C638.56,-194.13 634.23,-213.69 598,-231 579.33,-239.92 575.24,-243.79 555.5,-250"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C611.33,-191.86 528.44,-184.94 477.41,-177.11"/>
+<polygon fill="#000000" stroke="#000000" points="477.76,-173.63 467.33,-175.49 476.65,-180.54 477.76,-173.63"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
-<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
+<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C653.46,-192.29 625.81,-196.62 603.08,-200.67"/>
-<polygon fill="#000000" stroke="#000000" points="602.22,-197.27 593.01,-202.5 603.47,-204.15 602.22,-197.27"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.47,-243.03 360.14,-231.59 334.53,-221.7"/>
+<polygon fill="#000000" stroke="#000000" points="335.81,-218.44 325.22,-218.01 333.22,-224.95 335.81,-218.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C501.88,-268.73 484.69,-251 430,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C636.07,-184.64 636.63,-208.14 598,-231 580.19,-241.54 574.95,-242.94 555.5,-250"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
-<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="722,-103 637,-103 637,-79 722,-79 722,-103"/>
+<text text-anchor="middle" x="679.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C668.61,-190.9 619.13,-165.01 586.02,-146.95"/>
-<polygon fill="#000000" stroke="#000000" points="587.61,-143.83 577.16,-142.1 584.25,-149.97 587.61,-143.83"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.93,-176.32C739.49,-181.18 708.23,-187.47 680.5,-190"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-91C752.26,-91 742.26,-91 732.32,-91"/>
+<polygon fill="#000000" stroke="#000000" points="732.05,-87.5 722.05,-91 732.05,-94.5 732.05,-87.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
+<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C640.68,-193.46 538.08,-181.86 477.19,-174.2"/>
-<polygon fill="#000000" stroke="#000000" points="477.42,-170.7 467.06,-172.92 476.54,-177.65 477.42,-170.7"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C661.93,-175.39 620.24,-159.54 589.98,-146.23"/>
+<polygon fill="#000000" stroke="#000000" points="591.16,-142.92 580.61,-142.02 588.3,-149.31 591.16,-142.92"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-180 123,-180 123,-156 211,-156 211,-180"/>
-<text text-anchor="middle" x="167" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="725,-280 634,-280 634,-256 725,-256 725,-280"/>
+<text text-anchor="middle" x="679.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.49,-182.21C776.36,-204.84 757.97,-253.3 725,-279 663.34,-327.06 632.12,-310.46 555.5,-326"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M779.68,-103.17C761.82,-132.85 715.83,-209.28 693.31,-246.71"/>
+<polygon fill="#000000" stroke="#000000" points="690.03,-245.38 687.87,-255.75 696.03,-248.98 690.03,-245.38"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="722,-142 637,-142 637,-118 722,-118 722,-142"/>
-<text text-anchor="middle" x="679.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-66 252.5,-66 252.5,-42 341.5,-42 341.5,-66"/>
+<text text-anchor="middle" x="297" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-160.21C749.37,-155.87 735.44,-150.63 722.45,-145.76"/>
-<polygon fill="#000000" stroke="#000000" points="723.35,-142.36 712.76,-142.12 720.89,-148.91 723.35,-142.36"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.99,-103.02C758.1,-121.58 720.64,-156.47 680.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C635.96,-184.34 639.08,-127.09 598,-109 575.81,-99.23 431.79,-75.28 351.64,-62.45"/>
+<polygon fill="#000000" stroke="#000000" points="352.15,-58.99 341.72,-60.87 351.05,-65.9 352.15,-58.99"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-102 252.5,-102 252.5,-78 341.5,-78 341.5,-102"/>
-<text text-anchor="middle" x="297" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
+<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C623.33,-22.36 442.8,-57.05 351.66,-77.35"/>
-<polygon fill="#000000" stroke="#000000" points="350.78,-73.96 341.8,-79.57 352.32,-80.79 350.78,-73.96"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C653.28,-178.21 625.14,-187.36 602.15,-194.83"/>
+<polygon fill="#000000" stroke="#000000" points="601.07,-191.51 592.64,-197.93 603.23,-198.16 601.07,-191.51"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="725,-270 634,-270 634,-246 725,-246 725,-270"/>
-<text text-anchor="middle" x="679.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
+<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.19,-182.24C754.23,-197.08 723.77,-222.25 702.92,-239.47"/>
-<polygon fill="#000000" stroke="#000000" points="700.66,-236.8 695.18,-245.87 705.12,-242.2 700.66,-236.8"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C531.29,-258.06 506.34,-265.61 484.72,-271.69"/>
+<polygon fill="#000000" stroke="#000000" points="483.74,-268.33 475.04,-274.37 485.61,-275.07 483.74,-268.33"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_fraggle_regime~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_fraggle_regime~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
+<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C529.82,-256.99 503.56,-264.66 481.36,-271.12"/>
-<polygon fill="#000000" stroke="#000000" points="480.1,-267.84 471.47,-273.99 482.05,-274.56 480.1,-267.84"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.46,-240.74 351.07,-268.85 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
+<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
+</g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge14" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C395.45,-16.71 360.12,-28.17 334.52,-38.14"/>
+<polygon fill="#000000" stroke="#000000" points="333.19,-34.9 325.21,-41.86 335.79,-41.39 333.19,-34.9"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge13" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.75,-8.7C486.76,-7.83 456.43,-8.41 430,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C369.35,-26.41 354.09,-28.83 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-50C274.15,-58.25 265.82,-55.17 247,-69 217.85,-90.42 193.54,-125.19 179.89,-147.31"/>
-<polygon fill="#000000" stroke="#000000" points="176.86,-145.56 174.71,-155.94 182.86,-149.16 176.86,-145.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C274.14,-22.23 264.83,-17.91 247,-33 210.85,-63.6 187.02,-115.15 175.69,-144.27"/>
+<polygon fill="#000000" stroke="#000000" points="172.31,-143.31 172.08,-153.9 178.86,-145.77 172.31,-143.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.42,-18.8 352.07,6.36 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.85,-11.29C487.02,-11.24 456.82,-11.76 430,-14"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge14" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C386.61,-22.76 382.92,-41.65 347,-64 341.97,-67.13 336.53,-70.26 331.17,-73.2"/>
-<polygon fill="#000000" stroke="#000000" points="329.46,-70.14 322.3,-77.95 332.77,-76.31 329.46,-70.14"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.31,-155.95C397.19,-151.91 389.54,-147.11 383,-142 356.61,-121.38 330.49,-92.78 314.31,-73.85"/>
+<polygon fill="#000000" stroke="#000000" points="316.93,-71.53 307.81,-66.14 311.58,-76.04 316.93,-71.53"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-214.92C250.63,-206.09 224.44,-194.02 203.43,-184.33"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-181.07 194.18,-180.07 201.79,-187.43 204.72,-181.07"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-167.27C364.75,-166.8 329.26,-166.24 298,-166"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
-<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
+<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.72,-206.66C481.03,-203.28 428.31,-197.36 383,-189 344.73,-181.94 336.91,-168 298,-168"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.47,-78.79C649.2,-74.6 641.16,-69.75 634,-65 617.34,-53.94 614.55,-49.23 598,-38 593.73,-35.1 589.13,-32.14 584.6,-29.3"/>
+<polygon fill="#000000" stroke="#000000" points="586.42,-26.31 576.07,-24.05 582.75,-32.27 586.42,-26.31"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.59,-103.02C628.56,-106.83 615.11,-111.1 602.52,-115.09"/>
+<polygon fill="#000000" stroke="#000000" points="601.12,-111.86 592.65,-118.22 603.24,-118.53 601.12,-111.86"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C402.99,-50.3 375.21,-50.45 351.77,-51.17"/>
+<polygon fill="#000000" stroke="#000000" points="351.55,-47.68 341.68,-51.52 351.79,-54.67 351.55,-47.68"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C367.94,-47.92 354.33,7.21 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.98,-82.19C587.84,-72.3 503.42,-56.98 430,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.45,-141.4C503.99,-145.23 489.93,-149.56 476.82,-153.59"/>
 <polygon fill="#000000" stroke="#000000" points="475.56,-150.32 467.03,-156.61 477.62,-157.01 475.56,-150.32"/>
 </g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge24" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C384.45,-124.7 342.02,-93.8 318.03,-72.99"/>
+<polygon fill="#000000" stroke="#000000" points="320.13,-70.17 310.34,-66.11 315.46,-75.38 320.13,-70.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.43,-130.55C491.87,-130.63 458.97,-130.2 430,-128"/>
+</g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge18" class="edge">
+<g id="module~~s_fraggle_regime~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-168C271.53,-168 244.42,-168 221.48,-168"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-164.5 211.25,-168 221.25,-171.5 221.25,-164.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.55,-127.75 358.45,-168 298,-168"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.98,-123.45 358.19,-166.46 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C394.85,-127.86 358.78,-116.35 333.07,-106.03"/>
-<polygon fill="#000000" stroke="#000000" points="334.32,-102.77 323.75,-102.17 331.64,-109.23 334.32,-102.77"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.48,-129.17C491.95,-128.67 459.06,-128.12 430,-128"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.22,-280.12C595.27,-300.66 477.09,-337.27 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-168C364.75,-168 329.26,-168 298,-168"/>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.81,-66.41C259.4,-86.03 215.65,-124.31 189.4,-147.27"/>
+<polygon fill="#000000" stroke="#000000" points="187.08,-144.65 181.86,-153.87 191.69,-149.92 187.08,-144.65"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-155.94C399.32,-151.59 390.76,-146.61 383,-142 363.93,-130.66 342.63,-117.63 326.13,-107.45"/>
-<polygon fill="#000000" stroke="#000000" points="327.84,-104.4 317.5,-102.12 324.16,-110.35 327.84,-104.4"/>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
+<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.67,-206.89C480.96,-203.67 428.22,-197.86 383,-189 344.59,-181.48 337.14,-166.3 298,-166"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_regime~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_fraggle_regime~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_fraggle_regime~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-180 0,-180 0,-156 87,-156 87,-180"/>
-<text text-anchor="middle" x="43.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
+<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-168C114.58,-168 105.86,-168 97.36,-168"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-164.5 87.13,-168 97.13,-171.5 97.13,-164.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.8,-117.82C644.44,-97.32 601.16,-55.8 575.63,-31.31"/>
-<polygon fill="#000000" stroke="#000000" points="577.95,-28.69 568.32,-24.29 573.11,-33.74 577.95,-28.69"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.82,-142.15C639.2,-155.56 605.83,-177.26 582.4,-192.5"/>
-<polygon fill="#000000" stroke="#000000" points="580.43,-189.61 573.95,-198 584.25,-195.48 580.43,-189.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.86,-130C625.87,-130 613.93,-130 602.66,-130"/>
-<polygon fill="#000000" stroke="#000000" points="602.56,-126.5 592.56,-130 602.56,-133.5 602.56,-126.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C367.72,-85.46 354.56,-28.65 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.97,-117.96C624.52,-114.68 610.78,-111.38 598,-109 524.12,-95.26 504.93,-95.64 430,-90"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C403,-88.12 375.23,-87.87 351.79,-88.19"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-84.69 341.69,-88.37 351.75,-91.69 351.63,-84.69"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.28,-102.02C255.01,-114.98 220.95,-135.73 196.71,-150.5"/>
-<polygon fill="#000000" stroke="#000000" points="194.67,-147.65 187.95,-155.84 198.31,-153.63 194.67,-147.65"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_regime~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-326C440.94,-341.03 404.04,-366.64 298,-326"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M663.8,-270.11C641.87,-287.2 598.54,-317.27 555.5,-326"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_regime~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C233.63,-302.1 193.53,-227.22 176.85,-189.77"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-188.08 172.77,-180.28 173.51,-190.84 179.94,-188.08"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-298.07C370.04,-312.35 317.13,-333.33 298,-326"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_fraggle_set.html b/docs/module/s_fraggle_set.html
index ba0c67ec2..a5f1ee69f 100644
--- a/docs/module/s_fraggle_set.html
+++ b/docs/module/s_fraggle_set.html
@@ -253,31 +253,31 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_fraggle_set~~UsesGraph Pages: 1 -->
-<svg id="modules_fraggle_setUsesGraph" width="641pt" height="244pt"
- viewBox="0.00 0.00 641.00 243.83" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_fraggle_set~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 352.04)">
+<svg id="modules_fraggle_setUsesGraph" width="641pt" height="224pt"
+ viewBox="0.00 0.00 641.00 223.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_fraggle_set~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 322.71)">
 <title>module~~s_fraggle_set~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-352.04 932,-352.04 932,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.71 932,-322.71 932,4 -4,4"/>
 <!-- module~s_fraggle_set -->
 <g id="module~~s_fraggle_set~~UsesGraph_node1" class="node">
 <title>module~s_fraggle_set</title>
-<polygon fill="none" stroke="black" points="928,-84 851,-84 851,-60 928,-60 928,-84"/>
-<text text-anchor="middle" x="889.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_set</text>
+<polygon fill="none" stroke="black" points="928,-83 851,-83 851,-59 928,-59 928,-83"/>
+<text text-anchor="middle" x="889.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_set</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_fraggle_set~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_fraggle_set~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="815,-182 761,-182 761,-158 815,-158 815,-182"/>
-<text text-anchor="middle" x="788" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="815,-103 761,-103 761,-79 815,-79 815,-103"/>
+<text text-anchor="middle" x="788" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge1" class="edge">
 <title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.3,-84.02C859.37,-100.69 828.56,-131.04 808.44,-150.86"/>
-<polygon fill="#000000" stroke="#000000" points="805.97,-148.37 801.3,-157.88 810.88,-153.36 805.97,-148.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M850.88,-78.56C842.43,-80.26 833.48,-82.06 825.1,-83.74"/>
+<polygon fill="#000000" stroke="#000000" points="824.33,-80.33 815.22,-85.73 825.71,-87.19 824.33,-80.33"/>
 </g>
 <!-- module~fraggle_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_node3" class="node">
@@ -291,277 +291,270 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~s_fraggle_set&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge2" class="edge">
 <title>module~s_fraggle_set&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M850.94,-63.6C817.88,-56.35 768.37,-45.83 725,-38 685.97,-30.95 641.66,-24.2 608.14,-19.34"/>
-<polygon fill="#000000" stroke="#000000" points="608.49,-15.86 598.1,-17.9 607.49,-22.79 608.49,-15.86"/>
+<path fill="none" stroke="#000000" d="M850.75,-70.67C808.64,-69.55 738.78,-65.41 680.5,-51"/>
+<path fill="none" stroke="#000000" d="M678.5,-51C652.77,-43.67 624.27,-34.69 601.19,-27.2"/>
+<polygon fill="#000000" stroke="#000000" points="602.25,-23.86 591.66,-24.08 600.08,-30.51 602.25,-23.86"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge5" class="edge">
+<g id="module~~s_fraggle_set~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M780.04,-157.81C765.26,-133.17 728.15,-77.6 680.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C656.44,-40.15 630.27,-31.04 607.74,-24.52"/>
-<polygon fill="#000000" stroke="#000000" points="608.58,-21.12 598.01,-21.8 606.7,-27.86 608.58,-21.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.85,-79.21C739.62,-70.12 708.69,-57.97 680.5,-51"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-239 247,-239 247,-215 347,-215 347,-239"/>
-<text text-anchor="middle" x="297" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
+<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C483.42,-270.7 398.23,-255.42 346.08,-241.78"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-238.31 336.1,-239.08 344.84,-245.07 346.67,-238.31"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C638.56,-194.13 634.23,-213.69 598,-231 579.33,-239.92 575.24,-243.79 555.5,-250"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C611.33,-191.86 528.44,-184.94 477.41,-177.11"/>
+<polygon fill="#000000" stroke="#000000" points="477.76,-173.63 467.33,-175.49 476.65,-180.54 477.76,-173.63"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_fraggle_set~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
-<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
+<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C653.46,-192.29 625.81,-196.62 603.08,-200.67"/>
-<polygon fill="#000000" stroke="#000000" points="602.22,-197.27 593.01,-202.5 603.47,-204.15 602.22,-197.27"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.47,-243.03 360.14,-231.59 334.53,-221.7"/>
+<polygon fill="#000000" stroke="#000000" points="335.81,-218.44 325.22,-218.01 333.22,-224.95 335.81,-218.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C501.88,-268.73 484.69,-251 430,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C636.07,-184.64 636.63,-208.14 598,-231 580.19,-241.54 574.95,-242.94 555.5,-250"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
-<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="722,-103 637,-103 637,-79 722,-79 722,-103"/>
+<text text-anchor="middle" x="679.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C668.61,-190.9 619.13,-165.01 586.02,-146.95"/>
-<polygon fill="#000000" stroke="#000000" points="587.61,-143.83 577.16,-142.1 584.25,-149.97 587.61,-143.83"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.93,-176.32C739.49,-181.18 708.23,-187.47 680.5,-190"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-91C752.26,-91 742.26,-91 732.32,-91"/>
+<polygon fill="#000000" stroke="#000000" points="732.05,-87.5 722.05,-91 732.05,-94.5 732.05,-87.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
+<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C640.68,-193.46 538.08,-181.86 477.19,-174.2"/>
-<polygon fill="#000000" stroke="#000000" points="477.42,-170.7 467.06,-172.92 476.54,-177.65 477.42,-170.7"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C661.93,-175.39 620.24,-159.54 589.98,-146.23"/>
+<polygon fill="#000000" stroke="#000000" points="591.16,-142.92 580.61,-142.02 588.3,-149.31 591.16,-142.92"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_fraggle_set~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-180 123,-180 123,-156 211,-156 211,-180"/>
-<text text-anchor="middle" x="167" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="725,-280 634,-280 634,-256 725,-256 725,-280"/>
+<text text-anchor="middle" x="679.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.49,-182.21C776.36,-204.84 757.97,-253.3 725,-279 663.34,-327.06 632.12,-310.46 555.5,-326"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M779.68,-103.17C761.82,-132.85 715.83,-209.28 693.31,-246.71"/>
+<polygon fill="#000000" stroke="#000000" points="690.03,-245.38 687.87,-255.75 696.03,-248.98 690.03,-245.38"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="722,-142 637,-142 637,-118 722,-118 722,-142"/>
-<text text-anchor="middle" x="679.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-66 252.5,-66 252.5,-42 341.5,-42 341.5,-66"/>
+<text text-anchor="middle" x="297" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-160.21C749.37,-155.87 735.44,-150.63 722.45,-145.76"/>
-<polygon fill="#000000" stroke="#000000" points="723.35,-142.36 712.76,-142.12 720.89,-148.91 723.35,-142.36"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.99,-103.02C758.1,-121.58 720.64,-156.47 680.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C635.96,-184.34 639.08,-127.09 598,-109 575.81,-99.23 431.79,-75.28 351.64,-62.45"/>
+<polygon fill="#000000" stroke="#000000" points="352.15,-58.99 341.72,-60.87 351.05,-65.9 352.15,-58.99"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-102 252.5,-102 252.5,-78 341.5,-78 341.5,-102"/>
-<text text-anchor="middle" x="297" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
+<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C623.33,-22.36 442.8,-57.05 351.66,-77.35"/>
-<polygon fill="#000000" stroke="#000000" points="350.78,-73.96 341.8,-79.57 352.32,-80.79 350.78,-73.96"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C653.28,-178.21 625.14,-187.36 602.15,-194.83"/>
+<polygon fill="#000000" stroke="#000000" points="601.07,-191.51 592.64,-197.93 603.23,-198.16 601.07,-191.51"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="725,-270 634,-270 634,-246 725,-246 725,-270"/>
-<text text-anchor="middle" x="679.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
+<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.19,-182.24C754.23,-197.08 723.77,-222.25 702.92,-239.47"/>
-<polygon fill="#000000" stroke="#000000" points="700.66,-236.8 695.18,-245.87 705.12,-242.2 700.66,-236.8"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C531.29,-258.06 506.34,-265.61 484.72,-271.69"/>
+<polygon fill="#000000" stroke="#000000" points="483.74,-268.33 475.04,-274.37 485.61,-275.07 483.74,-268.33"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_fraggle_set~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_fraggle_set~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_fraggle_set~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
+<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C529.82,-256.99 503.56,-264.66 481.36,-271.12"/>
-<polygon fill="#000000" stroke="#000000" points="480.1,-267.84 471.47,-273.99 482.05,-274.56 480.1,-267.84"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.46,-240.74 351.07,-268.85 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
+<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
+</g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge14" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C395.45,-16.71 360.12,-28.17 334.52,-38.14"/>
+<polygon fill="#000000" stroke="#000000" points="333.19,-34.9 325.21,-41.86 335.79,-41.39 333.19,-34.9"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge13" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.75,-8.7C486.76,-7.83 456.43,-8.41 430,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C369.35,-26.41 354.09,-28.83 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-50C274.15,-58.25 265.82,-55.17 247,-69 217.85,-90.42 193.54,-125.19 179.89,-147.31"/>
-<polygon fill="#000000" stroke="#000000" points="176.86,-145.56 174.71,-155.94 182.86,-149.16 176.86,-145.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C274.14,-22.23 264.83,-17.91 247,-33 210.85,-63.6 187.02,-115.15 175.69,-144.27"/>
+<polygon fill="#000000" stroke="#000000" points="172.31,-143.31 172.08,-153.9 178.86,-145.77 172.31,-143.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.42,-18.8 352.07,6.36 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.85,-11.29C487.02,-11.24 456.82,-11.76 430,-14"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge14" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C386.61,-22.76 382.92,-41.65 347,-64 341.97,-67.13 336.53,-70.26 331.17,-73.2"/>
-<polygon fill="#000000" stroke="#000000" points="329.46,-70.14 322.3,-77.95 332.77,-76.31 329.46,-70.14"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.31,-155.95C397.19,-151.91 389.54,-147.11 383,-142 356.61,-121.38 330.49,-92.78 314.31,-73.85"/>
+<polygon fill="#000000" stroke="#000000" points="316.93,-71.53 307.81,-66.14 311.58,-76.04 316.93,-71.53"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-214.92C250.63,-206.09 224.44,-194.02 203.43,-184.33"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-181.07 194.18,-180.07 201.79,-187.43 204.72,-181.07"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-167.27C364.75,-166.8 329.26,-166.24 298,-166"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
-<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
+<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.72,-206.66C481.03,-203.28 428.31,-197.36 383,-189 344.73,-181.94 336.91,-168 298,-168"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.47,-78.79C649.2,-74.6 641.16,-69.75 634,-65 617.34,-53.94 614.55,-49.23 598,-38 593.73,-35.1 589.13,-32.14 584.6,-29.3"/>
+<polygon fill="#000000" stroke="#000000" points="586.42,-26.31 576.07,-24.05 582.75,-32.27 586.42,-26.31"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.59,-103.02C628.56,-106.83 615.11,-111.1 602.52,-115.09"/>
+<polygon fill="#000000" stroke="#000000" points="601.12,-111.86 592.65,-118.22 603.24,-118.53 601.12,-111.86"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C402.99,-50.3 375.21,-50.45 351.77,-51.17"/>
+<polygon fill="#000000" stroke="#000000" points="351.55,-47.68 341.68,-51.52 351.79,-54.67 351.55,-47.68"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C367.94,-47.92 354.33,7.21 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.98,-82.19C587.84,-72.3 503.42,-56.98 430,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.45,-141.4C503.99,-145.23 489.93,-149.56 476.82,-153.59"/>
 <polygon fill="#000000" stroke="#000000" points="475.56,-150.32 467.03,-156.61 477.62,-157.01 475.56,-150.32"/>
 </g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge24" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C384.45,-124.7 342.02,-93.8 318.03,-72.99"/>
+<polygon fill="#000000" stroke="#000000" points="320.13,-70.17 310.34,-66.11 315.46,-75.38 320.13,-70.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.43,-130.55C491.87,-130.63 458.97,-130.2 430,-128"/>
+</g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge18" class="edge">
+<g id="module~~s_fraggle_set~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-168C271.53,-168 244.42,-168 221.48,-168"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-164.5 211.25,-168 221.25,-171.5 221.25,-164.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.55,-127.75 358.45,-168 298,-168"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.98,-123.45 358.19,-166.46 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C394.85,-127.86 358.78,-116.35 333.07,-106.03"/>
-<polygon fill="#000000" stroke="#000000" points="334.32,-102.77 323.75,-102.17 331.64,-109.23 334.32,-102.77"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.48,-129.17C491.95,-128.67 459.06,-128.12 430,-128"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.22,-280.12C595.27,-300.66 477.09,-337.27 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-168C364.75,-168 329.26,-168 298,-168"/>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.81,-66.41C259.4,-86.03 215.65,-124.31 189.4,-147.27"/>
+<polygon fill="#000000" stroke="#000000" points="187.08,-144.65 181.86,-153.87 191.69,-149.92 187.08,-144.65"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-155.94C399.32,-151.59 390.76,-146.61 383,-142 363.93,-130.66 342.63,-117.63 326.13,-107.45"/>
-<polygon fill="#000000" stroke="#000000" points="327.84,-104.4 317.5,-102.12 324.16,-110.35 327.84,-104.4"/>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
+<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.67,-206.89C480.96,-203.67 428.22,-197.86 383,-189 344.59,-181.48 337.14,-166.3 298,-166"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_set~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_fraggle_set~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_fraggle_set~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-180 0,-180 0,-156 87,-156 87,-180"/>
-<text text-anchor="middle" x="43.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
+<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-168C114.58,-168 105.86,-168 97.36,-168"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-164.5 87.13,-168 97.13,-171.5 97.13,-164.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.8,-117.82C644.44,-97.32 601.16,-55.8 575.63,-31.31"/>
-<polygon fill="#000000" stroke="#000000" points="577.95,-28.69 568.32,-24.29 573.11,-33.74 577.95,-28.69"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.82,-142.15C639.2,-155.56 605.83,-177.26 582.4,-192.5"/>
-<polygon fill="#000000" stroke="#000000" points="580.43,-189.61 573.95,-198 584.25,-195.48 580.43,-189.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.86,-130C625.87,-130 613.93,-130 602.66,-130"/>
-<polygon fill="#000000" stroke="#000000" points="602.56,-126.5 592.56,-130 602.56,-133.5 602.56,-126.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C367.72,-85.46 354.56,-28.65 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.97,-117.96C624.52,-114.68 610.78,-111.38 598,-109 524.12,-95.26 504.93,-95.64 430,-90"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C403,-88.12 375.23,-87.87 351.79,-88.19"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-84.69 341.69,-88.37 351.75,-91.69 351.63,-84.69"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.28,-102.02C255.01,-114.98 220.95,-135.73 196.71,-150.5"/>
-<polygon fill="#000000" stroke="#000000" points="194.67,-147.65 187.95,-155.84 198.31,-153.63 194.67,-147.65"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_set~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-326C440.94,-341.03 404.04,-366.64 298,-326"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M663.8,-270.11C641.87,-287.2 598.54,-317.27 555.5,-326"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_set~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C233.63,-302.1 193.53,-227.22 176.85,-189.77"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-188.08 172.77,-180.28 173.51,-190.84 179.94,-188.08"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-298.07C370.04,-312.35 317.13,-333.33 298,-326"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_fraggle_setup.html b/docs/module/s_fraggle_setup.html
index b67e9f1d3..d5adf9c7e 100644
--- a/docs/module/s_fraggle_setup.html
+++ b/docs/module/s_fraggle_setup.html
@@ -247,31 +247,31 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_fraggle_setup~~UsesGraph Pages: 1 -->
-<svg id="modules_fraggle_setupUsesGraph" width="641pt" height="241pt"
- viewBox="0.00 0.00 641.00 240.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_fraggle_setup~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 352.04)">
+<svg id="modules_fraggle_setupUsesGraph" width="641pt" height="221pt"
+ viewBox="0.00 0.00 641.00 220.91" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_fraggle_setup~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 322.71)">
 <title>module~~s_fraggle_setup~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-352.04 944,-352.04 944,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.71 944,-322.71 944,4 -4,4"/>
 <!-- module~s_fraggle_setup -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node1" class="node">
 <title>module~s_fraggle_setup</title>
-<polygon fill="none" stroke="black" points="940,-84 851,-84 851,-60 940,-60 940,-84"/>
-<text text-anchor="middle" x="895.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_setup</text>
+<polygon fill="none" stroke="black" points="940,-83 851,-83 851,-59 940,-59 940,-83"/>
+<text text-anchor="middle" x="895.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_setup</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_fraggle_setup~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="815,-182 761,-182 761,-158 815,-158 815,-182"/>
-<text text-anchor="middle" x="788" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="815,-103 761,-103 761,-79 815,-79 815,-103"/>
+<text text-anchor="middle" x="788" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge1" class="edge">
 <title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M881.56,-84.02C863.61,-100.69 830.94,-131.04 809.61,-150.86"/>
-<polygon fill="#000000" stroke="#000000" points="806.99,-148.51 802.04,-157.88 811.75,-153.64 806.99,-148.51"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M850.98,-79.25C842.44,-80.87 833.57,-82.55 825.29,-84.12"/>
+<polygon fill="#000000" stroke="#000000" points="824.38,-80.73 815.2,-86.03 825.68,-87.61 824.38,-80.73"/>
 </g>
 <!-- module~fraggle_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node3" class="node">
@@ -285,277 +285,270 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~s_fraggle_setup&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge2" class="edge">
 <title>module~s_fraggle_setup&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M850.7,-62.64C816.54,-55.48 767.85,-45.58 725,-38 685.95,-31.09 641.64,-24.33 608.12,-19.44"/>
-<polygon fill="#000000" stroke="#000000" points="608.48,-15.95 598.08,-17.98 607.47,-22.88 608.48,-15.95"/>
+<path fill="none" stroke="#000000" d="M850.83,-70.71C807.13,-69.53 738.28,-65.28 680.5,-51"/>
+<path fill="none" stroke="#000000" d="M678.5,-51C652.66,-43.7 624.05,-34.68 600.93,-27.16"/>
+<polygon fill="#000000" stroke="#000000" points="601.97,-23.82 591.38,-24.04 599.8,-30.47 601.97,-23.82"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge5" class="edge">
+<g id="module~~s_fraggle_setup~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M780.04,-157.81C765.26,-133.17 728.15,-77.6 680.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C656.44,-40.15 630.27,-31.04 607.74,-24.52"/>
-<polygon fill="#000000" stroke="#000000" points="608.58,-21.12 598.01,-21.8 606.7,-27.86 608.58,-21.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.85,-79.21C739.62,-70.12 708.69,-57.97 680.5,-51"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-239 247,-239 247,-215 347,-215 347,-239"/>
-<text text-anchor="middle" x="297" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
+<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C483.42,-270.7 398.23,-255.42 346.08,-241.78"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-238.31 336.1,-239.08 344.84,-245.07 346.67,-238.31"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C638.56,-194.13 634.23,-213.69 598,-231 579.33,-239.92 575.24,-243.79 555.5,-250"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C611.33,-191.86 528.44,-184.94 477.41,-177.11"/>
+<polygon fill="#000000" stroke="#000000" points="477.76,-173.63 467.33,-175.49 476.65,-180.54 477.76,-173.63"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
-<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
+<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C653.46,-192.29 625.81,-196.62 603.08,-200.67"/>
-<polygon fill="#000000" stroke="#000000" points="602.22,-197.27 593.01,-202.5 603.47,-204.15 602.22,-197.27"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.47,-243.03 360.14,-231.59 334.53,-221.7"/>
+<polygon fill="#000000" stroke="#000000" points="335.81,-218.44 325.22,-218.01 333.22,-224.95 335.81,-218.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C501.88,-268.73 484.69,-251 430,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C636.07,-184.64 636.63,-208.14 598,-231 580.19,-241.54 574.95,-242.94 555.5,-250"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
-<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="722,-103 637,-103 637,-79 722,-79 722,-103"/>
+<text text-anchor="middle" x="679.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C668.61,-190.9 619.13,-165.01 586.02,-146.95"/>
-<polygon fill="#000000" stroke="#000000" points="587.61,-143.83 577.16,-142.1 584.25,-149.97 587.61,-143.83"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.93,-176.32C739.49,-181.18 708.23,-187.47 680.5,-190"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-91C752.26,-91 742.26,-91 732.32,-91"/>
+<polygon fill="#000000" stroke="#000000" points="732.05,-87.5 722.05,-91 732.05,-94.5 732.05,-87.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
+<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C640.68,-193.46 538.08,-181.86 477.19,-174.2"/>
-<polygon fill="#000000" stroke="#000000" points="477.42,-170.7 467.06,-172.92 476.54,-177.65 477.42,-170.7"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C661.93,-175.39 620.24,-159.54 589.98,-146.23"/>
+<polygon fill="#000000" stroke="#000000" points="591.16,-142.92 580.61,-142.02 588.3,-149.31 591.16,-142.92"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-180 123,-180 123,-156 211,-156 211,-180"/>
-<text text-anchor="middle" x="167" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="725,-280 634,-280 634,-256 725,-256 725,-280"/>
+<text text-anchor="middle" x="679.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.49,-182.21C776.36,-204.84 757.97,-253.3 725,-279 663.34,-327.06 632.12,-310.46 555.5,-326"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M779.68,-103.17C761.82,-132.85 715.83,-209.28 693.31,-246.71"/>
+<polygon fill="#000000" stroke="#000000" points="690.03,-245.38 687.87,-255.75 696.03,-248.98 690.03,-245.38"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="722,-142 637,-142 637,-118 722,-118 722,-142"/>
-<text text-anchor="middle" x="679.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-66 252.5,-66 252.5,-42 341.5,-42 341.5,-66"/>
+<text text-anchor="middle" x="297" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-160.21C749.37,-155.87 735.44,-150.63 722.45,-145.76"/>
-<polygon fill="#000000" stroke="#000000" points="723.35,-142.36 712.76,-142.12 720.89,-148.91 723.35,-142.36"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.99,-103.02C758.1,-121.58 720.64,-156.47 680.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C635.96,-184.34 639.08,-127.09 598,-109 575.81,-99.23 431.79,-75.28 351.64,-62.45"/>
+<polygon fill="#000000" stroke="#000000" points="352.15,-58.99 341.72,-60.87 351.05,-65.9 352.15,-58.99"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-102 252.5,-102 252.5,-78 341.5,-78 341.5,-102"/>
-<text text-anchor="middle" x="297" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
+<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C623.33,-22.36 442.8,-57.05 351.66,-77.35"/>
-<polygon fill="#000000" stroke="#000000" points="350.78,-73.96 341.8,-79.57 352.32,-80.79 350.78,-73.96"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C653.28,-178.21 625.14,-187.36 602.15,-194.83"/>
+<polygon fill="#000000" stroke="#000000" points="601.07,-191.51 592.64,-197.93 603.23,-198.16 601.07,-191.51"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="725,-270 634,-270 634,-246 725,-246 725,-270"/>
-<text text-anchor="middle" x="679.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
+<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.19,-182.24C754.23,-197.08 723.77,-222.25 702.92,-239.47"/>
-<polygon fill="#000000" stroke="#000000" points="700.66,-236.8 695.18,-245.87 705.12,-242.2 700.66,-236.8"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C531.29,-258.06 506.34,-265.61 484.72,-271.69"/>
+<polygon fill="#000000" stroke="#000000" points="483.74,-268.33 475.04,-274.37 485.61,-275.07 483.74,-268.33"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_fraggle_setup~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_fraggle_setup~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
+<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C529.82,-256.99 503.56,-264.66 481.36,-271.12"/>
-<polygon fill="#000000" stroke="#000000" points="480.1,-267.84 471.47,-273.99 482.05,-274.56 480.1,-267.84"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.46,-240.74 351.07,-268.85 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
+<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
+</g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge14" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C395.45,-16.71 360.12,-28.17 334.52,-38.14"/>
+<polygon fill="#000000" stroke="#000000" points="333.19,-34.9 325.21,-41.86 335.79,-41.39 333.19,-34.9"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge13" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.75,-8.7C486.76,-7.83 456.43,-8.41 430,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C369.35,-26.41 354.09,-28.83 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-50C274.15,-58.25 265.82,-55.17 247,-69 217.85,-90.42 193.54,-125.19 179.89,-147.31"/>
-<polygon fill="#000000" stroke="#000000" points="176.86,-145.56 174.71,-155.94 182.86,-149.16 176.86,-145.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C274.14,-22.23 264.83,-17.91 247,-33 210.85,-63.6 187.02,-115.15 175.69,-144.27"/>
+<polygon fill="#000000" stroke="#000000" points="172.31,-143.31 172.08,-153.9 178.86,-145.77 172.31,-143.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.42,-18.8 352.07,6.36 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.85,-11.29C487.02,-11.24 456.82,-11.76 430,-14"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge14" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C386.61,-22.76 382.92,-41.65 347,-64 341.97,-67.13 336.53,-70.26 331.17,-73.2"/>
-<polygon fill="#000000" stroke="#000000" points="329.46,-70.14 322.3,-77.95 332.77,-76.31 329.46,-70.14"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.31,-155.95C397.19,-151.91 389.54,-147.11 383,-142 356.61,-121.38 330.49,-92.78 314.31,-73.85"/>
+<polygon fill="#000000" stroke="#000000" points="316.93,-71.53 307.81,-66.14 311.58,-76.04 316.93,-71.53"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-214.92C250.63,-206.09 224.44,-194.02 203.43,-184.33"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-181.07 194.18,-180.07 201.79,-187.43 204.72,-181.07"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-167.27C364.75,-166.8 329.26,-166.24 298,-166"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
-<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
+<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.72,-206.66C481.03,-203.28 428.31,-197.36 383,-189 344.73,-181.94 336.91,-168 298,-168"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.47,-78.79C649.2,-74.6 641.16,-69.75 634,-65 617.34,-53.94 614.55,-49.23 598,-38 593.73,-35.1 589.13,-32.14 584.6,-29.3"/>
+<polygon fill="#000000" stroke="#000000" points="586.42,-26.31 576.07,-24.05 582.75,-32.27 586.42,-26.31"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.59,-103.02C628.56,-106.83 615.11,-111.1 602.52,-115.09"/>
+<polygon fill="#000000" stroke="#000000" points="601.12,-111.86 592.65,-118.22 603.24,-118.53 601.12,-111.86"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C402.99,-50.3 375.21,-50.45 351.77,-51.17"/>
+<polygon fill="#000000" stroke="#000000" points="351.55,-47.68 341.68,-51.52 351.79,-54.67 351.55,-47.68"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C367.94,-47.92 354.33,7.21 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.98,-82.19C587.84,-72.3 503.42,-56.98 430,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.45,-141.4C503.99,-145.23 489.93,-149.56 476.82,-153.59"/>
 <polygon fill="#000000" stroke="#000000" points="475.56,-150.32 467.03,-156.61 477.62,-157.01 475.56,-150.32"/>
 </g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge24" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C384.45,-124.7 342.02,-93.8 318.03,-72.99"/>
+<polygon fill="#000000" stroke="#000000" points="320.13,-70.17 310.34,-66.11 315.46,-75.38 320.13,-70.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.43,-130.55C491.87,-130.63 458.97,-130.2 430,-128"/>
+</g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge18" class="edge">
+<g id="module~~s_fraggle_setup~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-168C271.53,-168 244.42,-168 221.48,-168"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-164.5 211.25,-168 221.25,-171.5 221.25,-164.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.55,-127.75 358.45,-168 298,-168"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.98,-123.45 358.19,-166.46 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C394.85,-127.86 358.78,-116.35 333.07,-106.03"/>
-<polygon fill="#000000" stroke="#000000" points="334.32,-102.77 323.75,-102.17 331.64,-109.23 334.32,-102.77"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.48,-129.17C491.95,-128.67 459.06,-128.12 430,-128"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.22,-280.12C595.27,-300.66 477.09,-337.27 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-168C364.75,-168 329.26,-168 298,-168"/>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.81,-66.41C259.4,-86.03 215.65,-124.31 189.4,-147.27"/>
+<polygon fill="#000000" stroke="#000000" points="187.08,-144.65 181.86,-153.87 191.69,-149.92 187.08,-144.65"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-155.94C399.32,-151.59 390.76,-146.61 383,-142 363.93,-130.66 342.63,-117.63 326.13,-107.45"/>
-<polygon fill="#000000" stroke="#000000" points="327.84,-104.4 317.5,-102.12 324.16,-110.35 327.84,-104.4"/>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
+<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.67,-206.89C480.96,-203.67 428.22,-197.86 383,-189 344.59,-181.48 337.14,-166.3 298,-166"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_setup~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_fraggle_setup~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_fraggle_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-180 0,-180 0,-156 87,-156 87,-180"/>
-<text text-anchor="middle" x="43.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
+<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-168C114.58,-168 105.86,-168 97.36,-168"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-164.5 87.13,-168 97.13,-171.5 97.13,-164.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.8,-117.82C644.44,-97.32 601.16,-55.8 575.63,-31.31"/>
-<polygon fill="#000000" stroke="#000000" points="577.95,-28.69 568.32,-24.29 573.11,-33.74 577.95,-28.69"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.82,-142.15C639.2,-155.56 605.83,-177.26 582.4,-192.5"/>
-<polygon fill="#000000" stroke="#000000" points="580.43,-189.61 573.95,-198 584.25,-195.48 580.43,-189.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.86,-130C625.87,-130 613.93,-130 602.66,-130"/>
-<polygon fill="#000000" stroke="#000000" points="602.56,-126.5 592.56,-130 602.56,-133.5 602.56,-126.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C367.72,-85.46 354.56,-28.65 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.97,-117.96C624.52,-114.68 610.78,-111.38 598,-109 524.12,-95.26 504.93,-95.64 430,-90"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C403,-88.12 375.23,-87.87 351.79,-88.19"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-84.69 341.69,-88.37 351.75,-91.69 351.63,-84.69"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.28,-102.02C255.01,-114.98 220.95,-135.73 196.71,-150.5"/>
-<polygon fill="#000000" stroke="#000000" points="194.67,-147.65 187.95,-155.84 198.31,-153.63 194.67,-147.65"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_setup~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-326C440.94,-341.03 404.04,-366.64 298,-326"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M663.8,-270.11C641.87,-287.2 598.54,-317.27 555.5,-326"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_setup~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C233.63,-302.1 193.53,-227.22 176.85,-189.77"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-188.08 172.77,-180.28 173.51,-190.84 179.94,-188.08"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-298.07C370.04,-312.35 317.13,-333.33 298,-326"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_fraggle_util.html b/docs/module/s_fraggle_util.html
index 44891cc5c..3bf51b2d9 100644
--- a/docs/module/s_fraggle_util.html
+++ b/docs/module/s_fraggle_util.html
@@ -267,31 +267,31 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_fraggle_util~~UsesGraph Pages: 1 -->
-<svg id="modules_fraggle_utilUsesGraph" width="641pt" height="244pt"
- viewBox="0.00 0.00 641.00 244.09" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_fraggle_util~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 352.04)">
+<svg id="modules_fraggle_utilUsesGraph" width="641pt" height="224pt"
+ viewBox="0.00 0.00 641.00 223.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_fraggle_util~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 322.71)">
 <title>module~~s_fraggle_util~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-352.04 931,-352.04 931,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.71 931,-322.71 931,4 -4,4"/>
 <!-- module~s_fraggle_util -->
 <g id="module~~s_fraggle_util~~UsesGraph_node1" class="node">
 <title>module~s_fraggle_util</title>
-<polygon fill="none" stroke="black" points="927,-84 851,-84 851,-60 927,-60 927,-84"/>
-<text text-anchor="middle" x="889" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_util</text>
+<polygon fill="none" stroke="black" points="927,-83 851,-83 851,-59 927,-59 927,-83"/>
+<text text-anchor="middle" x="889" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_fraggle_util</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_fraggle_util~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_fraggle_util~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="815,-182 761,-182 761,-158 815,-158 815,-182"/>
-<text text-anchor="middle" x="788" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="815,-103 761,-103 761,-79 815,-79 815,-103"/>
+<text text-anchor="middle" x="788" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge1" class="edge">
 <title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M875.86,-84.02C859.09,-100.62 828.63,-130.77 808.6,-150.59"/>
-<polygon fill="#000000" stroke="#000000" points="805.88,-148.36 801.24,-157.88 810.81,-153.34 805.88,-148.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M850.85,-78.5C842.43,-80.21 833.49,-82.01 825.11,-83.7"/>
+<polygon fill="#000000" stroke="#000000" points="824.34,-80.29 815.23,-85.7 825.73,-87.15 824.34,-80.29"/>
 </g>
 <!-- module~fraggle_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_node3" class="node">
@@ -305,277 +305,270 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~s_fraggle_util&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge2" class="edge">
 <title>module~s_fraggle_util&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M850.89,-63.67C817.92,-56.41 768.38,-45.85 725,-38 685.97,-30.94 641.66,-24.19 608.14,-19.33"/>
-<polygon fill="#000000" stroke="#000000" points="608.49,-15.85 598.1,-17.89 607.5,-22.78 608.49,-15.85"/>
+<path fill="none" stroke="#000000" d="M850.72,-70.67C808.76,-69.55 738.82,-65.42 680.5,-51"/>
+<path fill="none" stroke="#000000" d="M678.5,-51C652.77,-43.67 624.27,-34.69 601.19,-27.2"/>
+<polygon fill="#000000" stroke="#000000" points="602.25,-23.86 591.66,-24.08 600.08,-30.51 602.25,-23.86"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge5" class="edge">
+<g id="module~~s_fraggle_util~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M780.04,-157.81C765.26,-133.17 728.15,-77.6 680.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C656.44,-40.15 630.27,-31.04 607.74,-24.52"/>
-<polygon fill="#000000" stroke="#000000" points="608.58,-21.12 598.01,-21.8 606.7,-27.86 608.58,-21.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.85,-79.21C739.62,-70.12 708.69,-57.97 680.5,-51"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-239 247,-239 247,-215 347,-215 347,-239"/>
-<text text-anchor="middle" x="297" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
+<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C483.42,-270.7 398.23,-255.42 346.08,-241.78"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-238.31 336.1,-239.08 344.84,-245.07 346.67,-238.31"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C638.56,-194.13 634.23,-213.69 598,-231 579.33,-239.92 575.24,-243.79 555.5,-250"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C611.33,-191.86 528.44,-184.94 477.41,-177.11"/>
+<polygon fill="#000000" stroke="#000000" points="477.76,-173.63 467.33,-175.49 476.65,-180.54 477.76,-173.63"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_fraggle_util~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
-<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
+<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C653.46,-192.29 625.81,-196.62 603.08,-200.67"/>
-<polygon fill="#000000" stroke="#000000" points="602.22,-197.27 593.01,-202.5 603.47,-204.15 602.22,-197.27"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.47,-243.03 360.14,-231.59 334.53,-221.7"/>
+<polygon fill="#000000" stroke="#000000" points="335.81,-218.44 325.22,-218.01 333.22,-224.95 335.81,-218.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C501.88,-268.73 484.69,-251 430,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C636.07,-184.64 636.63,-208.14 598,-231 580.19,-241.54 574.95,-242.94 555.5,-250"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
-<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="722,-103 637,-103 637,-79 722,-79 722,-103"/>
+<text text-anchor="middle" x="679.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C668.61,-190.9 619.13,-165.01 586.02,-146.95"/>
-<polygon fill="#000000" stroke="#000000" points="587.61,-143.83 577.16,-142.1 584.25,-149.97 587.61,-143.83"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.93,-176.32C739.49,-181.18 708.23,-187.47 680.5,-190"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-91C752.26,-91 742.26,-91 732.32,-91"/>
+<polygon fill="#000000" stroke="#000000" points="732.05,-87.5 722.05,-91 732.05,-94.5 732.05,-87.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-180 391,-180 391,-156 467,-156 467,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="592.5,-142 516.5,-142 516.5,-118 592.5,-118 592.5,-142"/>
+<text text-anchor="middle" x="554.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-190C640.68,-193.46 538.08,-181.86 477.19,-174.2"/>
-<polygon fill="#000000" stroke="#000000" points="477.42,-170.7 467.06,-172.92 476.54,-177.65 477.42,-170.7"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C661.93,-175.39 620.24,-159.54 589.98,-146.23"/>
+<polygon fill="#000000" stroke="#000000" points="591.16,-142.92 580.61,-142.02 588.3,-149.31 591.16,-142.92"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_fraggle_util~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-180 123,-180 123,-156 211,-156 211,-180"/>
-<text text-anchor="middle" x="167" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="725,-280 634,-280 634,-256 725,-256 725,-280"/>
+<text text-anchor="middle" x="679.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M783.49,-182.21C776.36,-204.84 757.97,-253.3 725,-279 663.34,-327.06 632.12,-310.46 555.5,-326"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M779.68,-103.17C761.82,-132.85 715.83,-209.28 693.31,-246.71"/>
+<polygon fill="#000000" stroke="#000000" points="690.03,-245.38 687.87,-255.75 696.03,-248.98 690.03,-245.38"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="722,-142 637,-142 637,-118 722,-118 722,-142"/>
-<text text-anchor="middle" x="679.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-66 252.5,-66 252.5,-42 341.5,-42 341.5,-66"/>
+<text text-anchor="middle" x="297" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.95,-160.21C749.37,-155.87 735.44,-150.63 722.45,-145.76"/>
-<polygon fill="#000000" stroke="#000000" points="723.35,-142.36 712.76,-142.12 720.89,-148.91 723.35,-142.36"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.99,-103.02C758.1,-121.58 720.64,-156.47 680.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C635.96,-184.34 639.08,-127.09 598,-109 575.81,-99.23 431.79,-75.28 351.64,-62.45"/>
+<polygon fill="#000000" stroke="#000000" points="352.15,-58.99 341.72,-60.87 351.05,-65.9 352.15,-58.99"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-102 252.5,-102 252.5,-78 341.5,-78 341.5,-102"/>
-<text text-anchor="middle" x="297" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="593,-222 516,-222 516,-198 593,-198 593,-222"/>
+<text text-anchor="middle" x="554.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-52C623.33,-22.36 442.8,-57.05 351.66,-77.35"/>
-<polygon fill="#000000" stroke="#000000" points="350.78,-73.96 341.8,-79.57 352.32,-80.79 350.78,-73.96"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M678.5,-170C653.28,-178.21 625.14,-187.36 602.15,-194.83"/>
+<polygon fill="#000000" stroke="#000000" points="601.07,-191.51 592.64,-197.93 603.23,-198.16 601.07,-191.51"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="725,-270 634,-270 634,-246 725,-246 725,-270"/>
-<text text-anchor="middle" x="679.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
+<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.19,-182.24C754.23,-197.08 723.77,-222.25 702.92,-239.47"/>
-<polygon fill="#000000" stroke="#000000" points="700.66,-236.8 695.18,-245.87 705.12,-242.2 700.66,-236.8"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C531.29,-258.06 506.34,-265.61 484.72,-271.69"/>
+<polygon fill="#000000" stroke="#000000" points="483.74,-268.33 475.04,-274.37 485.61,-275.07 483.74,-268.33"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_fraggle_util~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_fraggle_util~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_fraggle_util~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
+<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-250C529.82,-256.99 503.56,-264.66 481.36,-271.12"/>
-<polygon fill="#000000" stroke="#000000" points="480.1,-267.84 471.47,-273.99 482.05,-274.56 480.1,-267.84"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.46,-240.74 351.07,-268.85 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
+<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
+</g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge14" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C395.45,-16.71 360.12,-28.17 334.52,-38.14"/>
+<polygon fill="#000000" stroke="#000000" points="333.19,-34.9 325.21,-41.86 335.79,-41.39 333.19,-34.9"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge13" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.75,-8.7C486.76,-7.83 456.43,-8.41 430,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C369.35,-26.41 354.09,-28.83 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-50C274.15,-58.25 265.82,-55.17 247,-69 217.85,-90.42 193.54,-125.19 179.89,-147.31"/>
-<polygon fill="#000000" stroke="#000000" points="176.86,-145.56 174.71,-155.94 182.86,-149.16 176.86,-145.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C274.14,-22.23 264.83,-17.91 247,-33 210.85,-63.6 187.02,-115.15 175.69,-144.27"/>
+<polygon fill="#000000" stroke="#000000" points="172.31,-143.31 172.08,-153.9 178.86,-145.77 172.31,-143.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.42,-18.8 352.07,6.36 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.85,-11.29C487.02,-11.24 456.82,-11.76 430,-14"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge14" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C386.61,-22.76 382.92,-41.65 347,-64 341.97,-67.13 336.53,-70.26 331.17,-73.2"/>
-<polygon fill="#000000" stroke="#000000" points="329.46,-70.14 322.3,-77.95 332.77,-76.31 329.46,-70.14"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.31,-155.95C397.19,-151.91 389.54,-147.11 383,-142 356.61,-121.38 330.49,-92.78 314.31,-73.85"/>
+<polygon fill="#000000" stroke="#000000" points="316.93,-71.53 307.81,-66.14 311.58,-76.04 316.93,-71.53"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-214.92C250.63,-206.09 224.44,-194.02 203.43,-184.33"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-181.07 194.18,-180.07 201.79,-187.43 204.72,-181.07"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-167.27C364.75,-166.8 329.26,-166.24 298,-166"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
-<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
+<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.72,-206.66C481.03,-203.28 428.31,-197.36 383,-189 344.73,-181.94 336.91,-168 298,-168"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.47,-78.79C649.2,-74.6 641.16,-69.75 634,-65 617.34,-53.94 614.55,-49.23 598,-38 593.73,-35.1 589.13,-32.14 584.6,-29.3"/>
+<polygon fill="#000000" stroke="#000000" points="586.42,-26.31 576.07,-24.05 582.75,-32.27 586.42,-26.31"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.59,-103.02C628.56,-106.83 615.11,-111.1 602.52,-115.09"/>
+<polygon fill="#000000" stroke="#000000" points="601.12,-111.86 592.65,-118.22 603.24,-118.53 601.12,-111.86"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C402.99,-50.3 375.21,-50.45 351.77,-51.17"/>
+<polygon fill="#000000" stroke="#000000" points="351.55,-47.68 341.68,-51.52 351.79,-54.67 351.55,-47.68"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52C367.94,-47.92 354.33,7.21 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.98,-82.19C587.84,-72.3 503.42,-56.98 430,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.45,-141.4C503.99,-145.23 489.93,-149.56 476.82,-153.59"/>
 <polygon fill="#000000" stroke="#000000" points="475.56,-150.32 467.03,-156.61 477.62,-157.01 475.56,-150.32"/>
 </g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge24" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C384.45,-124.7 342.02,-93.8 318.03,-72.99"/>
+<polygon fill="#000000" stroke="#000000" points="320.13,-70.17 310.34,-66.11 315.46,-75.38 320.13,-70.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.43,-130.55C491.87,-130.63 458.97,-130.2 430,-128"/>
+</g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge18" class="edge">
+<g id="module~~s_fraggle_util~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-168C271.53,-168 244.42,-168 221.48,-168"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-164.5 211.25,-168 221.25,-171.5 221.25,-164.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.55,-127.75 358.45,-168 298,-168"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C367.98,-123.45 358.19,-166.46 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C394.85,-127.86 358.78,-116.35 333.07,-106.03"/>
-<polygon fill="#000000" stroke="#000000" points="334.32,-102.77 323.75,-102.17 331.64,-109.23 334.32,-102.77"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M516.48,-129.17C491.95,-128.67 459.06,-128.12 430,-128"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.22,-280.12C595.27,-300.66 477.09,-337.27 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-168C364.75,-168 329.26,-168 298,-168"/>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.81,-66.41C259.4,-86.03 215.65,-124.31 189.4,-147.27"/>
+<polygon fill="#000000" stroke="#000000" points="187.08,-144.65 181.86,-153.87 191.69,-149.92 187.08,-144.65"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-155.94C399.32,-151.59 390.76,-146.61 383,-142 363.93,-130.66 342.63,-117.63 326.13,-107.45"/>
-<polygon fill="#000000" stroke="#000000" points="327.84,-104.4 317.5,-102.12 324.16,-110.35 327.84,-104.4"/>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M518.11,-197.96C504.67,-193.4 489.19,-188.13 474.98,-183.3"/>
+<polygon fill="#000000" stroke="#000000" points="475.99,-179.94 465.4,-180.04 473.74,-186.57 475.99,-179.94"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.67,-206.89C480.96,-203.67 428.22,-197.86 383,-189 344.59,-181.48 337.14,-166.3 298,-166"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_fraggle_util~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_fraggle_util~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_fraggle_util~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-180 0,-180 0,-156 87,-156 87,-180"/>
-<text text-anchor="middle" x="43.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
+<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-168C114.58,-168 105.86,-168 97.36,-168"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-164.5 87.13,-168 97.13,-171.5 97.13,-164.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.8,-117.82C644.44,-97.32 601.16,-55.8 575.63,-31.31"/>
-<polygon fill="#000000" stroke="#000000" points="577.95,-28.69 568.32,-24.29 573.11,-33.74 577.95,-28.69"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.82,-142.15C639.2,-155.56 605.83,-177.26 582.4,-192.5"/>
-<polygon fill="#000000" stroke="#000000" points="580.43,-189.61 573.95,-198 584.25,-195.48 580.43,-189.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.86,-130C625.87,-130 613.93,-130 602.66,-130"/>
-<polygon fill="#000000" stroke="#000000" points="602.56,-126.5 592.56,-130 602.56,-133.5 602.56,-126.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C367.72,-85.46 354.56,-28.65 298,-50"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.97,-117.96C624.52,-114.68 610.78,-111.38 598,-109 524.12,-95.26 504.93,-95.64 430,-90"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C403,-88.12 375.23,-87.87 351.79,-88.19"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-84.69 341.69,-88.37 351.75,-91.69 351.63,-84.69"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.28,-102.02C255.01,-114.98 220.95,-135.73 196.71,-150.5"/>
-<polygon fill="#000000" stroke="#000000" points="194.67,-147.65 187.95,-155.84 198.31,-153.63 194.67,-147.65"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_fraggle_util~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.5,-326C440.94,-341.03 404.04,-366.64 298,-326"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M663.8,-270.11C641.87,-287.2 598.54,-317.27 555.5,-326"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_fraggle_util~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C233.63,-302.1 193.53,-227.22 176.85,-189.77"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-188.08 172.77,-180.28 173.51,-190.84 179.94,-188.08"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-298.07C370.04,-312.35 317.13,-333.33 298,-326"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_gr.html b/docs/module/s_gr.html
index cb76214b1..359432111 100644
--- a/docs/module/s_gr.html
+++ b/docs/module/s_gr.html
@@ -257,311 +257,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_gr~~UsesGraph Pages: 1 -->
-<svg id="modules_grUsesGraph" width="641pt" height="278pt"
- viewBox="0.00 0.00 641.00 277.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_gr~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_grUsesGraph" width="641pt" height="290pt"
+ viewBox="0.00 0.00 641.00 289.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_gr~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_gr~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 899,-387.05 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 899,-404.34 899,4 -4,4"/>
 <!-- module~s_gr -->
 <g id="module~~s_gr~~UsesGraph_node1" class="node">
 <title>module~s_gr</title>
-<polygon fill="none" stroke="black" points="895,-318.05 841,-318.05 841,-294.05 895,-294.05 895,-318.05"/>
-<text text-anchor="middle" x="868" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_gr</text>
+<polygon fill="none" stroke="black" points="895,-102.05 841,-102.05 841,-78.05 895,-78.05 895,-102.05"/>
+<text text-anchor="middle" x="868" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_gr</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_gr~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_gr~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_gr&#45;&gt;module~swiftest -->
 <g id="module~~s_gr~~UsesGraph_edge1" class="edge">
 <title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.25,-294.01C839.13,-281.66 816.94,-262.24 800.5,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="802.77,-245.2 792.94,-241.25 798.16,-250.47 802.77,-245.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.56,-102.13C843.49,-123.71 811.78,-169.11 793.27,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.4,-193.62 787.54,-203.82 796.14,-197.63 790.4,-193.62"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_gr~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_gr~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_gr&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_gr~~UsesGraph_edge2" class="edge">
 <title>module~s_gr&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M849.49,-318.08C816.21,-339.73 740.85,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-81.49C803.62,-70.01 732.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_gr~~UsesGraph_edge10" class="edge">
+<g id="module~~s_gr~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_gr~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_gr~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_gr~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_gr~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_gr~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_gr~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_gr~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_gr~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_gr~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_gr~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_gr~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_gr~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_gr~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_gr~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_gr~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_gr~~UsesGraph_edge6" class="edge">
+<g id="module~~s_gr~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_gr~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_gr~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_gr~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_gr~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_gr~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_gr~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_gr~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_gr~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_gr~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_gr~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_gr~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_gr~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_gr~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_gr~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_gr~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_gr~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_gr~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_gr~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_gr~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_gr~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_gr~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_gr~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_gr~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_gr~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_gr~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_gr~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_gr~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_gr~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_gr~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_gr~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_gr~~UsesGraph_edge20" class="edge">
+<g id="module~~s_gr~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_gr~~UsesGraph_edge21" class="edge">
+<g id="module~~s_gr~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_gr~~UsesGraph_edge19" class="edge">
+<g id="module~~s_gr~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_gr~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_gr~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_gr~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_gr~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_gr~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_gr~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_gr~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_gr~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_gr~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_gr~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_gr~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_gr~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_gr~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_gr~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_gr~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_gr~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_gr~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_gr~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
@@ -816,7 +810,7 @@ <h4>Arguments</h4>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-gr_kick_getacch"></span><h3>
-module subroutine <a href='../proc/gr_kick_getacch.html'>gr_kick_getacch</a>(mu, x, lmask, n, inv_c2, agr)
+pure module subroutine <a href='../proc/gr_kick_getacch.html'>gr_kick_getacch</a>(mu, x, lmask, n, inv_c2, agr)
     
     
    <a href='../interface/gr_kick_getacch.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/module/s_helio_drift.html b/docs/module/s_helio_drift.html
index 05af73105..14e6261e5 100644
--- a/docs/module/s_helio_drift.html
+++ b/docs/module/s_helio_drift.html
@@ -253,314 +253,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_helio_drift~~UsesGraph Pages: 1 -->
-<svg id="modules_helio_driftUsesGraph" width="641pt" height="228pt"
- viewBox="0.00 0.00 641.00 227.50" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_helio_drift~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 322.17)">
+<svg id="modules_helio_driftUsesGraph" width="641pt" height="233pt"
+ viewBox="0.00 0.00 641.00 232.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_helio_drift~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 329.5)">
 <title>module~~s_helio_drift~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.17 915,-322.17 915,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-329.5 915,-329.5 915,4 -4,4"/>
 <!-- module~s_helio_drift -->
 <g id="module~~s_helio_drift~~UsesGraph_node1" class="node">
 <title>module~s_helio_drift</title>
-<polygon fill="none" stroke="black" points="911,-83 841,-83 841,-59 911,-59 911,-83"/>
-<text text-anchor="middle" x="876" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_drift</text>
-</g>
-<!-- module~helio_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_node2" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node2"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-24 511.5,-24 511.5,0 587.5,0 587.5,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
-</a>
-</g>
-</g>
-<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge2" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M840.76,-63.46C808.42,-56.45 758.53,-45.92 715,-38 675.73,-30.85 630.97,-23.85 598.07,-18.92"/>
-<polygon fill="#000000" stroke="#000000" points="598.23,-15.4 587.82,-17.39 597.2,-22.33 598.23,-15.4"/>
+<polygon fill="none" stroke="black" points="911,-240 841,-240 841,-216 911,-216 911,-240"/>
+<text text-anchor="middle" x="876" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_drift</text>
 </g>
 <!-- module~swiftest -->
-<g id="module~~s_helio_drift~~UsesGraph_node3" class="node">
+<g id="module~~s_helio_drift~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node3"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-142 751,-142 751,-118 805,-118 805,-142"/>
-<text text-anchor="middle" x="778" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~s_helio_drift~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-201 751,-201 751,-177 805,-177 805,-201"/>
+<text text-anchor="middle" x="778" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_helio_drift&#45;&gt;module~swiftest -->
 <g id="module~~s_helio_drift~~UsesGraph_edge1" class="edge">
 <title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M855.11,-83.22C841.24,-91.75 822.55,-103.24 807.16,-112.7"/>
-<polygon fill="#000000" stroke="#000000" points="805.22,-109.77 798.54,-117.99 808.89,-115.74 805.22,-109.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M845.41,-215.98C835.64,-212.01 824.68,-207.56 814.51,-203.43"/>
+<polygon fill="#000000" stroke="#000000" points="815.66,-200.11 805.07,-199.59 813.02,-206.6 815.66,-200.11"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-62 391,-62 391,-38 467,-38 467,-62"/>
-<text text-anchor="middle" x="429" y="-47.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~helio_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_node3" class="node">
+<title>module~helio_classes</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node3"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-182 511.5,-182 511.5,-158 587.5,-158 587.5,-182"/>
+<text text-anchor="middle" x="549.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge2" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M840.6,-233.89C791.19,-240.93 697.93,-248.89 624,-224 603.18,-216.99 583.33,-201.71 569.52,-189.19"/>
+<polygon fill="#000000" stroke="#000000" points="571.81,-186.53 562.13,-182.22 567,-191.63 571.81,-186.53"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_helio_drift~~UsesGraph_edge5" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-23.92C500.41,-27.42 488.32,-31.3 476.88,-34.97"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-31.74 467.04,-38.12 477.63,-38.4 475.49,-31.74"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C636.71,-213.05 602.33,-199.27 578.93,-187.07"/>
+<polygon fill="#000000" stroke="#000000" points="580.38,-183.87 569.92,-182.16 577.03,-190.02 580.38,-183.87"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
-<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~whm_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_node4" class="node">
+<title>module~whm_classes</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-222 391,-222 391,-198 467,-198 467,-222"/>
+<text text-anchor="middle" x="429" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_helio_drift~~UsesGraph_edge3" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C370.53,-15.97 352.02,10.51 298,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.31,-9.09C487.91,-7.82 457.12,-7.18 430,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-10C234.03,-33.53 193.74,-107.5 176.94,-144.49"/>
-<polygon fill="#000000" stroke="#000000" points="173.63,-143.31 172.82,-153.87 180.04,-146.12 173.63,-143.31"/>
-</g>
-<!-- module~swiftest_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-82 252.5,-82 252.5,-58 341.5,-58 341.5,-82"/>
-<text text-anchor="middle" x="297" y="-67.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
-</a>
-</g>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge4" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C388.8,-14.07 348.3,-36.11 323.14,-52.3"/>
-<polygon fill="#000000" stroke="#000000" points="321,-49.52 314.59,-57.96 324.86,-55.35 321,-49.52"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.8,-117.94C746.18,-100.33 708.8,-67.93 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C645.47,-42.42 619.23,-33.35 597.36,-26.28"/>
-<polygon fill="#000000" stroke="#000000" points="598.24,-22.88 587.65,-23.18 596.11,-29.55 598.24,-22.88"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C602.45,-216.33 525.64,-214.74 477.42,-212.66"/>
+<polygon fill="#000000" stroke="#000000" points="477.43,-209.16 467.29,-212.2 477.12,-216.15 477.43,-209.16"/>
 </g>
 <!-- module~swiftest_operators -->
-<g id="module~~s_helio_drift~~UsesGraph_node4" class="node">
+<g id="module~~s_helio_drift~~UsesGraph_node5" class="node">
 <title>module~swiftest_operators</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
-<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<g id="a_module~~s_helio_drift~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-146 247,-146 247,-122 347,-122 347,-146"/>
+<text text-anchor="middle" x="297" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_helio_drift~~UsesGraph_edge6" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C607.71,-184 608.78,-223.76 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C499.29,-264.78 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.22,-243.53 359.65,-231.92 334.01,-221.84"/>
-<polygon fill="#000000" stroke="#000000" points="335.28,-218.58 324.7,-218.07 332.66,-225.06 335.28,-218.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C486.58,-106.4 409.65,-112.31 357.49,-120.96"/>
+<polygon fill="#000000" stroke="#000000" points="356.66,-117.55 347.41,-122.72 357.86,-124.45 356.66,-117.55"/>
 </g>
-<!-- module~rmvs_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-142 511,-142 511,-118 588,-118 588,-142"/>
-<text text-anchor="middle" x="549.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<!-- module~symba_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_node6" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-182 627,-182 627,-158 712,-158 712,-182"/>
+<text text-anchor="middle" x="669.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C635.93,-177.5 599.7,-161.38 576.08,-147.42"/>
-<polygon fill="#000000" stroke="#000000" points="577.73,-144.32 567.39,-142.03 574.04,-150.27 577.73,-144.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.91,-142.03C729.71,-151.26 698.79,-163.48 670.5,-170"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-184.35C742.17,-182.79 732.05,-180.98 722.01,-179.19"/>
+<polygon fill="#000000" stroke="#000000" points="722.51,-175.72 712.05,-177.41 721.28,-182.61 722.51,-175.72"/>
 </g>
 <!-- module~fraggle_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_node6" class="node">
+<g id="module~~s_helio_drift~~UsesGraph_node7" class="node">
 <title>module~fraggle_classes</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-180 385.5,-180 385.5,-156 472.5,-156 472.5,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<g id="a_module~~s_helio_drift~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge8" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C617.39,-181.77 602.8,-166.11 550.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.93,-176.92C731.27,-153.08 658.53,-100.16 588,-76 554.1,-64.39 514.11,-58.89 482.85,-56.3"/>
+<polygon fill="#000000" stroke="#000000" points="482.84,-52.79 472.6,-55.53 482.31,-59.77 482.84,-52.79"/>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C525.14,-53.74 499.11,-53.53 477.42,-52.77"/>
-<polygon fill="#000000" stroke="#000000" points="477.28,-49.26 467.14,-52.36 477,-56.26 477.28,-49.26"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C620.08,-31.86 602.8,-48.12 550.5,-52"/>
+<!-- module~lambda_function -->
+<g id="module~~s_helio_drift~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+</a>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.39,-241.66 351.07,-268.85 298,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
-<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_helio_drift~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.74,-176.62C769.11,-148.87 752.19,-80.77 715,-38 712.37,-34.97 709.29,-32.21 706.01,-29.71"/>
+<polygon fill="#000000" stroke="#000000" points="707.81,-26.7 697.55,-24.03 703.91,-32.51 707.81,-26.7"/>
+</g>
+<!-- module~swiftest_classes -->
 <g id="module~~s_helio_drift~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-142 627,-142 627,-118 712,-118 712,-142"/>
-<text text-anchor="middle" x="669.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-104 252.5,-104 252.5,-80 341.5,-80 341.5,-104"/>
+<text text-anchor="middle" x="297" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-130C742.26,-130 732.26,-130 722.32,-130"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-126.5 712.05,-130 722.05,-133.5 722.05,-126.5"/>
-</g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge13" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C402.74,-89.51 375.04,-85.71 351.72,-81.55"/>
-<polygon fill="#000000" stroke="#000000" points="352.14,-78.07 341.67,-79.69 350.87,-84.95 352.14,-78.07"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C493.34,-56.1 485.3,-91.07 430,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C647.08,-211.93 641.34,-203.72 624,-191 604.18,-176.46 607.34,-164.18 588,-149 573.3,-137.46 567.74,-137.21 550.5,-130"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.96,-195.72C729.53,-200.87 698.28,-207.5 670.5,-210"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C497.72,-108.75 484.4,-102.37 430,-94"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_helio_drift~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-280 624,-280 624,-256 715,-256 715,-280"/>
-<text text-anchor="middle" x="669.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-262 511,-262 511,-238 588,-238 588,-262"/>
+<text text-anchor="middle" x="549.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_helio_drift~~UsesGraph_edge14" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.55,-142.25C749.19,-166.04 708.53,-218.72 686.11,-247.78"/>
-<polygon fill="#000000" stroke="#000000" points="683.12,-245.92 679.78,-255.98 688.66,-250.2 683.12,-245.92"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C639.11,-212.82 607.51,-224 584.42,-233.83"/>
+<polygon fill="#000000" stroke="#000000" points="582.82,-230.71 575.07,-237.93 585.64,-237.12 582.82,-230.71"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_node12" class="node">
+<g id="module~~s_helio_drift~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_helio_drift~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-302 383,-302 383,-278 475,-278 475,-302"/>
+<text text-anchor="middle" x="429" y="-287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge15" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C525.45,-254.79 499.53,-263.66 477.81,-270.8"/>
-<polygon fill="#000000" stroke="#000000" points="476.58,-267.52 468.16,-273.96 478.75,-274.18 476.58,-267.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C623.83,-214.43 629.62,-254.18 588,-271 555.55,-284.11 516.53,-288.9 485.38,-290.39"/>
+<polygon fill="#000000" stroke="#000000" points="485,-286.9 475.14,-290.78 485.27,-293.9 485,-286.9"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge16" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-125 123,-125 123,-101 211,-101 211,-125"/>
+<text text-anchor="middle" x="167" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge18" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M533.08,-117.9C518.45,-106.61 495.68,-89.51 475,-76 470.58,-73.11 465.83,-70.19 461.13,-67.39"/>
-<polygon fill="#000000" stroke="#000000" points="462.67,-64.23 452.26,-62.22 459.14,-70.28 462.67,-64.23"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.87,-132.6C477.22,-135.22 426.62,-139.91 383,-147 344.79,-153.21 336.71,-166.29 298,-166"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M759.98,-201.08C727.98,-223.17 655.9,-269.91 588,-293 501.41,-322.45 470.07,-339.01 383,-311 338.73,-296.76 340.47,-268.94 298,-250"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.26,-167.17C359.9,-166.73 327.12,-166.22 298,-166"/>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge14" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-182C501.22,-185.96 488.01,-190.42 475.64,-194.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-191.35 465.94,-197.87 476.53,-197.99 474.29,-191.35"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge20" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-155.98C389.64,-139.08 348.62,-108.16 322.36,-88.36"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-85.34 314.07,-82.12 319.95,-90.93 324.16,-85.34"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge15" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.58,-157.96C498.89,-136.76 435.77,-94.89 430,-94"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.17,-37.95C370.06,-23.69 317.15,-2.73 298,-10"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_edge13" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-169C477,-169.27 424.96,-172.8 383,-189 339.62,-205.74 340.72,-268.36 298,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-250C241.43,-226.06 199.45,-166.31 179.96,-134.2"/>
+<polygon fill="#000000" stroke="#000000" points="182.74,-132.02 174.65,-125.19 176.71,-135.58 182.74,-132.02"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge22" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge17" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-55.73C378.55,-57.61 364.75,-59.73 351.59,-61.76"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-58.3 341.69,-63.28 352.11,-65.22 351.04,-58.3"/>
-</g>
-<!-- iso_fortran_env -->
-<g id="module~~s_helio_drift~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_helio_drift~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
-<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.69,-198C407.96,-177.96 379.91,-137.5 347,-113 345.16,-111.63 343.22,-110.33 341.21,-109.1"/>
+<polygon fill="#000000" stroke="#000000" points="342.55,-105.84 332.1,-104.12 339.2,-111.99 342.55,-105.84"/>
 </g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.62,-222.05C370.46,-236.59 316.93,-258.13 298,-250"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_helio_drift~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_edge18" class="edge">
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.88,-125.94C238.56,-124.58 229.88,-123.15 221.46,-121.77"/>
+<polygon fill="#000000" stroke="#000000" points="221.78,-118.28 211.35,-120.11 220.65,-125.18 221.78,-118.28"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge26" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge21" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.43,-117.83C645.34,-99.38 616.81,-63.73 588,-38 584.96,-35.29 581.63,-32.62 578.25,-30.08"/>
-<polygon fill="#000000" stroke="#000000" points="580.05,-27.06 569.87,-24.1 575.98,-32.76 580.05,-27.06"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-130C617.64,-130 607.75,-130 598.27,-130"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-126.5 588.18,-130 598.18,-133.5 598.18,-126.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-170C617.54,-170 607.54,-170 597.97,-170"/>
+<polygon fill="#000000" stroke="#000000" points="597.8,-166.5 587.8,-170 597.8,-173.5 597.8,-166.5"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge25" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge22" class="edge">
 <title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.4,-142.19C621.08,-153.01 584.37,-167.48 550.5,-170"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-170C527,-171.6 503.24,-171.56 482.68,-170.94"/>
-<polygon fill="#000000" stroke="#000000" points="482.68,-167.44 472.56,-170.59 482.43,-174.44 482.68,-167.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C527.58,-80.17 503.34,-72.25 482.26,-66.37"/>
+<polygon fill="#000000" stroke="#000000" points="483.07,-62.96 472.5,-63.73 481.24,-69.72 483.07,-62.96"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C403.13,-90.17 375.26,-89.3 351.72,-89.53"/>
+<polygon fill="#000000" stroke="#000000" points="351.52,-86.04 341.58,-89.7 351.64,-93.03 351.52,-86.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C500.8,-67.59 482.08,-102.02 430,-94"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge27" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge19" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.42,-142.13C639.15,-146.33 631.11,-151.19 624,-156 607.21,-167.36 607.02,-177 588,-184 502.47,-215.48 473.34,-201.01 383,-189 344.2,-183.84 337.13,-166.94 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C491.87,-63.4 491.84,-23.52 430,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M653.78,-157.75C632.31,-140.44 590.6,-108.84 550.5,-90"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_drift~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.96,-118.02C614.51,-114.74 600.77,-111.42 588,-109 518.51,-95.82 500.73,-89.79 430,-90"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.87,-66.02C374.89,-69.52 361.66,-73.39 349.15,-77.05"/>
+<polygon fill="#000000" stroke="#000000" points="347.93,-73.76 339.31,-79.92 349.89,-80.48 347.93,-73.76"/>
 </g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.79,-82.16C257.67,-98.75 217.85,-128.61 192.19,-147.86"/>
-<polygon fill="#000000" stroke="#000000" points="189.98,-145.14 184.08,-153.94 194.18,-150.74 189.98,-145.14"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.71,-41.93C368.69,-28.41 317.5,-9.01 298,-14"/>
 </g>
 <!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge30" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge25" class="edge">
 <title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M639.81,-280.08C587.52,-300.34 473.72,-336.18 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.98,0.31 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C248.56,-26.13 206.38,-67.63 184.29,-92.89"/>
+<polygon fill="#000000" stroke="#000000" points="181.41,-90.88 177.6,-100.77 186.74,-95.42 181.41,-90.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-99.17C242.31,-100.81 231.58,-102.57 221.24,-104.27"/>
+<polygon fill="#000000" stroke="#000000" points="220.36,-100.86 211.06,-105.94 221.5,-107.77 220.36,-100.86"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_drift~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-238C501.22,-234.04 488.01,-229.58 475.64,-225.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-222.01 465.94,-222.13 474.29,-228.65 476.53,-222.01"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_drift~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.86,-253.64C450.49,-258.89 335.04,-266.25 298,-250"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_drift~~UsesGraph_edge31" class="edge">
+<g id="module~~s_helio_drift~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.93,-278.7C357.51,-271.7 325.45,-261.79 298,-250"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_helio_drift~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_helio_drift~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-125 0,-125 0,-101 87,-101 87,-125"/>
+<text text-anchor="middle" x="43.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_helio_drift~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-113C114.58,-113 105.86,-113 97.36,-113"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-109.5 87.13,-113 97.13,-116.5 97.13,-109.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_helio_gr.html b/docs/module/s_helio_gr.html
index 4341165d9..b26cc72fb 100644
--- a/docs/module/s_helio_gr.html
+++ b/docs/module/s_helio_gr.html
@@ -251,314 +251,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_helio_gr~~UsesGraph Pages: 1 -->
-<svg id="modules_helio_grUsesGraph" width="641pt" height="229pt"
- viewBox="0.00 0.00 641.00 229.50" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_helio_gr~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 322.17)">
+<svg id="modules_helio_grUsesGraph" width="641pt" height="235pt"
+ viewBox="0.00 0.00 641.00 234.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_helio_gr~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 329.5)">
 <title>module~~s_helio_gr~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.17 907,-322.17 907,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-329.5 907,-329.5 907,4 -4,4"/>
 <!-- module~s_helio_gr -->
 <g id="module~~s_helio_gr~~UsesGraph_node1" class="node">
 <title>module~s_helio_gr</title>
-<polygon fill="none" stroke="black" points="903,-83 841,-83 841,-59 903,-59 903,-83"/>
-<text text-anchor="middle" x="872" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_gr</text>
-</g>
-<!-- module~helio_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_node2" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node2"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-24 511.5,-24 511.5,0 587.5,0 587.5,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
-</a>
-</g>
-</g>
-<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge2" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M840.89,-64.15C809.54,-57.13 758.96,-46.12 715,-38 675.62,-30.73 630.7,-23.71 597.76,-18.81"/>
-<polygon fill="#000000" stroke="#000000" points="597.91,-15.29 587.51,-17.29 596.89,-22.22 597.91,-15.29"/>
+<polygon fill="none" stroke="black" points="903,-240 841,-240 841,-216 903,-216 903,-240"/>
+<text text-anchor="middle" x="872" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_gr</text>
 </g>
 <!-- module~swiftest -->
-<g id="module~~s_helio_gr~~UsesGraph_node3" class="node">
+<g id="module~~s_helio_gr~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node3"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-142 751,-142 751,-118 805,-118 805,-142"/>
-<text text-anchor="middle" x="778" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~s_helio_gr~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-201 751,-201 751,-177 805,-177 805,-201"/>
+<text text-anchor="middle" x="778" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_helio_gr&#45;&gt;module~swiftest -->
 <g id="module~~s_helio_gr~~UsesGraph_edge1" class="edge">
 <title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M851.94,-83.22C838.77,-91.67 821.07,-103.02 806.4,-112.43"/>
-<polygon fill="#000000" stroke="#000000" points="804.25,-109.65 797.72,-117.99 808.03,-115.54 804.25,-109.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M842.65,-215.98C833.79,-212.23 823.91,-208.04 814.62,-204.1"/>
+<polygon fill="#000000" stroke="#000000" points="815.8,-200.8 805.22,-200.12 813.06,-207.24 815.8,-200.8"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-62 391,-62 391,-38 467,-38 467,-62"/>
-<text text-anchor="middle" x="429" y="-47.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~helio_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_node3" class="node">
+<title>module~helio_classes</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node3"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-182 511.5,-182 511.5,-158 587.5,-158 587.5,-182"/>
+<text text-anchor="middle" x="549.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge2" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M840.73,-233.26C793.15,-240.28 698.58,-249.12 624,-224 603.18,-216.99 583.33,-201.71 569.52,-189.19"/>
+<polygon fill="#000000" stroke="#000000" points="571.81,-186.53 562.13,-182.22 567.01,-191.62 571.81,-186.53"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_helio_gr~~UsesGraph_edge5" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-23.92C500.41,-27.42 488.32,-31.3 476.88,-34.97"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-31.74 467.04,-38.12 477.63,-38.4 475.49,-31.74"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C636.71,-213.05 602.33,-199.27 578.93,-187.07"/>
+<polygon fill="#000000" stroke="#000000" points="580.38,-183.87 569.92,-182.16 577.03,-190.02 580.38,-183.87"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
-<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~whm_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_node4" class="node">
+<title>module~whm_classes</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-222 391,-222 391,-198 467,-198 467,-222"/>
+<text text-anchor="middle" x="429" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_helio_gr~~UsesGraph_edge3" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C370.53,-15.97 352.02,10.51 298,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.31,-9.09C487.91,-7.82 457.12,-7.18 430,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-10C234.03,-33.53 193.74,-107.5 176.94,-144.49"/>
-<polygon fill="#000000" stroke="#000000" points="173.63,-143.31 172.82,-153.87 180.04,-146.12 173.63,-143.31"/>
-</g>
-<!-- module~swiftest_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-82 252.5,-82 252.5,-58 341.5,-58 341.5,-82"/>
-<text text-anchor="middle" x="297" y="-67.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
-</a>
-</g>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge4" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C388.8,-14.07 348.3,-36.11 323.14,-52.3"/>
-<polygon fill="#000000" stroke="#000000" points="321,-49.52 314.59,-57.96 324.86,-55.35 321,-49.52"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.8,-117.94C746.18,-100.33 708.8,-67.93 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C645.47,-42.42 619.23,-33.35 597.36,-26.28"/>
-<polygon fill="#000000" stroke="#000000" points="598.24,-22.88 587.65,-23.18 596.11,-29.55 598.24,-22.88"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C602.45,-216.33 525.64,-214.74 477.42,-212.66"/>
+<polygon fill="#000000" stroke="#000000" points="477.43,-209.16 467.29,-212.2 477.12,-216.15 477.43,-209.16"/>
 </g>
 <!-- module~swiftest_operators -->
-<g id="module~~s_helio_gr~~UsesGraph_node4" class="node">
+<g id="module~~s_helio_gr~~UsesGraph_node5" class="node">
 <title>module~swiftest_operators</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
-<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<g id="a_module~~s_helio_gr~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-146 247,-146 247,-122 347,-122 347,-146"/>
+<text text-anchor="middle" x="297" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_helio_gr~~UsesGraph_edge6" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C607.71,-184 608.78,-223.76 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C499.29,-264.78 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.22,-243.53 359.65,-231.92 334.01,-221.84"/>
-<polygon fill="#000000" stroke="#000000" points="335.28,-218.58 324.7,-218.07 332.66,-225.06 335.28,-218.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C486.58,-106.4 409.65,-112.31 357.49,-120.96"/>
+<polygon fill="#000000" stroke="#000000" points="356.66,-117.55 347.41,-122.72 357.86,-124.45 356.66,-117.55"/>
 </g>
-<!-- module~rmvs_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-142 511,-142 511,-118 588,-118 588,-142"/>
-<text text-anchor="middle" x="549.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<!-- module~symba_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_node6" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-182 627,-182 627,-158 712,-158 712,-182"/>
+<text text-anchor="middle" x="669.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C635.93,-177.5 599.7,-161.38 576.08,-147.42"/>
-<polygon fill="#000000" stroke="#000000" points="577.73,-144.32 567.39,-142.03 574.04,-150.27 577.73,-144.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.91,-142.03C729.71,-151.26 698.79,-163.48 670.5,-170"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-184.35C742.17,-182.79 732.05,-180.98 722.01,-179.19"/>
+<polygon fill="#000000" stroke="#000000" points="722.51,-175.72 712.05,-177.41 721.28,-182.61 722.51,-175.72"/>
 </g>
 <!-- module~fraggle_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_node6" class="node">
+<g id="module~~s_helio_gr~~UsesGraph_node7" class="node">
 <title>module~fraggle_classes</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-180 385.5,-180 385.5,-156 472.5,-156 472.5,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<g id="a_module~~s_helio_gr~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge8" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C617.39,-181.77 602.8,-166.11 550.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.93,-176.92C731.27,-153.08 658.53,-100.16 588,-76 554.1,-64.39 514.11,-58.89 482.85,-56.3"/>
+<polygon fill="#000000" stroke="#000000" points="482.84,-52.79 472.6,-55.53 482.31,-59.77 482.84,-52.79"/>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C525.14,-53.74 499.11,-53.53 477.42,-52.77"/>
-<polygon fill="#000000" stroke="#000000" points="477.28,-49.26 467.14,-52.36 477,-56.26 477.28,-49.26"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C620.08,-31.86 602.8,-48.12 550.5,-52"/>
+<!-- module~lambda_function -->
+<g id="module~~s_helio_gr~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+</a>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.39,-241.66 351.07,-268.85 298,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
-<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_helio_gr~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.74,-176.62C769.11,-148.87 752.19,-80.77 715,-38 712.37,-34.97 709.29,-32.21 706.01,-29.71"/>
+<polygon fill="#000000" stroke="#000000" points="707.81,-26.7 697.55,-24.03 703.91,-32.51 707.81,-26.7"/>
+</g>
+<!-- module~swiftest_classes -->
 <g id="module~~s_helio_gr~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-142 627,-142 627,-118 712,-118 712,-142"/>
-<text text-anchor="middle" x="669.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-104 252.5,-104 252.5,-80 341.5,-80 341.5,-104"/>
+<text text-anchor="middle" x="297" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-130C742.26,-130 732.26,-130 722.32,-130"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-126.5 712.05,-130 722.05,-133.5 722.05,-126.5"/>
-</g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge13" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C402.74,-89.51 375.04,-85.71 351.72,-81.55"/>
-<polygon fill="#000000" stroke="#000000" points="352.14,-78.07 341.67,-79.69 350.87,-84.95 352.14,-78.07"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C493.34,-56.1 485.3,-91.07 430,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C647.08,-211.93 641.34,-203.72 624,-191 604.18,-176.46 607.34,-164.18 588,-149 573.3,-137.46 567.74,-137.21 550.5,-130"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.96,-195.72C729.53,-200.87 698.28,-207.5 670.5,-210"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C497.72,-108.75 484.4,-102.37 430,-94"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_helio_gr~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-280 624,-280 624,-256 715,-256 715,-280"/>
-<text text-anchor="middle" x="669.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-262 511,-262 511,-238 588,-238 588,-262"/>
+<text text-anchor="middle" x="549.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_helio_gr~~UsesGraph_edge14" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.55,-142.25C749.19,-166.04 708.53,-218.72 686.11,-247.78"/>
-<polygon fill="#000000" stroke="#000000" points="683.12,-245.92 679.78,-255.98 688.66,-250.2 683.12,-245.92"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C639.11,-212.82 607.51,-224 584.42,-233.83"/>
+<polygon fill="#000000" stroke="#000000" points="582.82,-230.71 575.07,-237.93 585.64,-237.12 582.82,-230.71"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_node12" class="node">
+<g id="module~~s_helio_gr~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_helio_gr~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-302 383,-302 383,-278 475,-278 475,-302"/>
+<text text-anchor="middle" x="429" y="-287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge15" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C525.45,-254.79 499.53,-263.66 477.81,-270.8"/>
-<polygon fill="#000000" stroke="#000000" points="476.58,-267.52 468.16,-273.96 478.75,-274.18 476.58,-267.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C623.83,-214.43 629.62,-254.18 588,-271 555.55,-284.11 516.53,-288.9 485.38,-290.39"/>
+<polygon fill="#000000" stroke="#000000" points="485,-286.9 475.14,-290.78 485.27,-293.9 485,-286.9"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge16" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-125 123,-125 123,-101 211,-101 211,-125"/>
+<text text-anchor="middle" x="167" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge18" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M533.08,-117.9C518.45,-106.61 495.68,-89.51 475,-76 470.58,-73.11 465.83,-70.19 461.13,-67.39"/>
-<polygon fill="#000000" stroke="#000000" points="462.67,-64.23 452.26,-62.22 459.14,-70.28 462.67,-64.23"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.87,-132.6C477.22,-135.22 426.62,-139.91 383,-147 344.79,-153.21 336.71,-166.29 298,-166"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M759.98,-201.08C727.98,-223.17 655.9,-269.91 588,-293 501.41,-322.45 470.07,-339.01 383,-311 338.73,-296.76 340.47,-268.94 298,-250"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.26,-167.17C359.9,-166.73 327.12,-166.22 298,-166"/>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge14" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-182C501.22,-185.96 488.01,-190.42 475.64,-194.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-191.35 465.94,-197.87 476.53,-197.99 474.29,-191.35"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge20" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-155.98C389.64,-139.08 348.62,-108.16 322.36,-88.36"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-85.34 314.07,-82.12 319.95,-90.93 324.16,-85.34"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge15" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.58,-157.96C498.89,-136.76 435.77,-94.89 430,-94"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.17,-37.95C370.06,-23.69 317.15,-2.73 298,-10"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_edge13" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-169C477,-169.27 424.96,-172.8 383,-189 339.62,-205.74 340.72,-268.36 298,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-250C241.43,-226.06 199.45,-166.31 179.96,-134.2"/>
+<polygon fill="#000000" stroke="#000000" points="182.74,-132.02 174.65,-125.19 176.71,-135.58 182.74,-132.02"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge22" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge17" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-55.73C378.55,-57.61 364.75,-59.73 351.59,-61.76"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-58.3 341.69,-63.28 352.11,-65.22 351.04,-58.3"/>
-</g>
-<!-- iso_fortran_env -->
-<g id="module~~s_helio_gr~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_helio_gr~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
-<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.69,-198C407.96,-177.96 379.91,-137.5 347,-113 345.16,-111.63 343.22,-110.33 341.21,-109.1"/>
+<polygon fill="#000000" stroke="#000000" points="342.55,-105.84 332.1,-104.12 339.2,-111.99 342.55,-105.84"/>
 </g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.62,-222.05C370.46,-236.59 316.93,-258.13 298,-250"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_helio_gr~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_edge18" class="edge">
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.88,-125.94C238.56,-124.58 229.88,-123.15 221.46,-121.77"/>
+<polygon fill="#000000" stroke="#000000" points="221.78,-118.28 211.35,-120.11 220.65,-125.18 221.78,-118.28"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge26" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge21" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.43,-117.83C645.34,-99.38 616.81,-63.73 588,-38 584.96,-35.29 581.63,-32.62 578.25,-30.08"/>
-<polygon fill="#000000" stroke="#000000" points="580.05,-27.06 569.87,-24.1 575.98,-32.76 580.05,-27.06"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-130C617.64,-130 607.75,-130 598.27,-130"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-126.5 588.18,-130 598.18,-133.5 598.18,-126.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-170C617.54,-170 607.54,-170 597.97,-170"/>
+<polygon fill="#000000" stroke="#000000" points="597.8,-166.5 587.8,-170 597.8,-173.5 597.8,-166.5"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge25" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge22" class="edge">
 <title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.4,-142.19C621.08,-153.01 584.37,-167.48 550.5,-170"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-170C527,-171.6 503.24,-171.56 482.68,-170.94"/>
-<polygon fill="#000000" stroke="#000000" points="482.68,-167.44 472.56,-170.59 482.43,-174.44 482.68,-167.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C527.58,-80.17 503.34,-72.25 482.26,-66.37"/>
+<polygon fill="#000000" stroke="#000000" points="483.07,-62.96 472.5,-63.73 481.24,-69.72 483.07,-62.96"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C403.13,-90.17 375.26,-89.3 351.72,-89.53"/>
+<polygon fill="#000000" stroke="#000000" points="351.52,-86.04 341.58,-89.7 351.64,-93.03 351.52,-86.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C500.8,-67.59 482.08,-102.02 430,-94"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge27" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge19" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.42,-142.13C639.15,-146.33 631.11,-151.19 624,-156 607.21,-167.36 607.02,-177 588,-184 502.47,-215.48 473.34,-201.01 383,-189 344.2,-183.84 337.13,-166.94 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C491.87,-63.4 491.84,-23.52 430,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M653.78,-157.75C632.31,-140.44 590.6,-108.84 550.5,-90"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_gr~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.96,-118.02C614.51,-114.74 600.77,-111.42 588,-109 518.51,-95.82 500.73,-89.79 430,-90"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.87,-66.02C374.89,-69.52 361.66,-73.39 349.15,-77.05"/>
+<polygon fill="#000000" stroke="#000000" points="347.93,-73.76 339.31,-79.92 349.89,-80.48 347.93,-73.76"/>
 </g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.79,-82.16C257.67,-98.75 217.85,-128.61 192.19,-147.86"/>
-<polygon fill="#000000" stroke="#000000" points="189.98,-145.14 184.08,-153.94 194.18,-150.74 189.98,-145.14"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.71,-41.93C368.69,-28.41 317.5,-9.01 298,-14"/>
 </g>
 <!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge30" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge25" class="edge">
 <title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M639.81,-280.08C587.52,-300.34 473.72,-336.18 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.98,0.31 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C248.56,-26.13 206.38,-67.63 184.29,-92.89"/>
+<polygon fill="#000000" stroke="#000000" points="181.41,-90.88 177.6,-100.77 186.74,-95.42 181.41,-90.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-99.17C242.31,-100.81 231.58,-102.57 221.24,-104.27"/>
+<polygon fill="#000000" stroke="#000000" points="220.36,-100.86 211.06,-105.94 221.5,-107.77 220.36,-100.86"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_gr~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-238C501.22,-234.04 488.01,-229.58 475.64,-225.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-222.01 465.94,-222.13 474.29,-228.65 476.53,-222.01"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_gr~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.86,-253.64C450.49,-258.89 335.04,-266.25 298,-250"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_gr~~UsesGraph_edge31" class="edge">
+<g id="module~~s_helio_gr~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.93,-278.7C357.51,-271.7 325.45,-261.79 298,-250"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_helio_gr~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_helio_gr~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-125 0,-125 0,-101 87,-101 87,-125"/>
+<text text-anchor="middle" x="43.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_helio_gr~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-113C114.58,-113 105.86,-113 97.36,-113"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-109.5 87.13,-113 97.13,-116.5 97.13,-109.5"/>
 </g>
 </g>
 </svg>
@@ -705,7 +694,7 @@ <h2>Module Subroutines</h2>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-helio_gr_kick_getacch_pl"></span><h3>
-module subroutine <a href='../proc/helio_gr_kick_getacch_pl.html'>helio_gr_kick_getacch_pl</a>(self, param)
+pure module subroutine <a href='../proc/helio_gr_kick_getacch_pl.html'>helio_gr_kick_getacch_pl</a>(self, param)
     
     
    <a href='../interface/helio_gr_kick_getacch_pl.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -792,7 +781,7 @@ <h4>Arguments</h4>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-helio_gr_kick_getacch_tp"></span><h3>
-module subroutine <a href='../proc/helio_gr_kick_getacch_tp.html'>helio_gr_kick_getacch_tp</a>(self, param)
+pure module subroutine <a href='../proc/helio_gr_kick_getacch_tp.html'>helio_gr_kick_getacch_tp</a>(self, param)
     
     
    <a href='../interface/helio_gr_kick_getacch_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/module/s_helio_kick.html b/docs/module/s_helio_kick.html
index 3faf12a13..426ebe22d 100644
--- a/docs/module/s_helio_kick.html
+++ b/docs/module/s_helio_kick.html
@@ -134,7 +134,7 @@ <h1>s_helio_kick
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.6% of total for modules and submodules.">99 statements</a>
+    title=" 0.6% of total for modules and submodules.">101 statements</a>
      </li> 
      
      
@@ -251,314 +251,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_helio_kick~~UsesGraph Pages: 1 -->
-<svg id="modules_helio_kickUsesGraph" width="641pt" height="228pt"
- viewBox="0.00 0.00 641.00 227.50" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_helio_kick~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 322.17)">
+<svg id="modules_helio_kickUsesGraph" width="641pt" height="233pt"
+ viewBox="0.00 0.00 641.00 232.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_helio_kick~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 329.5)">
 <title>module~~s_helio_kick~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.17 915,-322.17 915,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-329.5 915,-329.5 915,4 -4,4"/>
 <!-- module~s_helio_kick -->
 <g id="module~~s_helio_kick~~UsesGraph_node1" class="node">
 <title>module~s_helio_kick</title>
-<polygon fill="none" stroke="black" points="911,-83 841,-83 841,-59 911,-59 911,-83"/>
-<text text-anchor="middle" x="876" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_kick</text>
-</g>
-<!-- module~helio_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_node2" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node2"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-24 511.5,-24 511.5,0 587.5,0 587.5,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
-</a>
-</g>
-</g>
-<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge2" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M840.76,-63.46C808.42,-56.45 758.53,-45.92 715,-38 675.73,-30.85 630.97,-23.85 598.07,-18.92"/>
-<polygon fill="#000000" stroke="#000000" points="598.23,-15.4 587.82,-17.39 597.2,-22.33 598.23,-15.4"/>
+<polygon fill="none" stroke="black" points="911,-240 841,-240 841,-216 911,-216 911,-240"/>
+<text text-anchor="middle" x="876" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_kick</text>
 </g>
 <!-- module~swiftest -->
-<g id="module~~s_helio_kick~~UsesGraph_node3" class="node">
+<g id="module~~s_helio_kick~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node3"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-142 751,-142 751,-118 805,-118 805,-142"/>
-<text text-anchor="middle" x="778" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~s_helio_kick~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-201 751,-201 751,-177 805,-177 805,-201"/>
+<text text-anchor="middle" x="778" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_helio_kick&#45;&gt;module~swiftest -->
 <g id="module~~s_helio_kick~~UsesGraph_edge1" class="edge">
 <title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M855.11,-83.22C841.24,-91.75 822.55,-103.24 807.16,-112.7"/>
-<polygon fill="#000000" stroke="#000000" points="805.22,-109.77 798.54,-117.99 808.89,-115.74 805.22,-109.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M845.41,-215.98C835.64,-212.01 824.68,-207.56 814.51,-203.43"/>
+<polygon fill="#000000" stroke="#000000" points="815.66,-200.11 805.07,-199.59 813.02,-206.6 815.66,-200.11"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-62 391,-62 391,-38 467,-38 467,-62"/>
-<text text-anchor="middle" x="429" y="-47.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~helio_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_node3" class="node">
+<title>module~helio_classes</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node3"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-182 511.5,-182 511.5,-158 587.5,-158 587.5,-182"/>
+<text text-anchor="middle" x="549.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge2" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M840.6,-233.89C791.19,-240.93 697.93,-248.89 624,-224 603.18,-216.99 583.33,-201.71 569.52,-189.19"/>
+<polygon fill="#000000" stroke="#000000" points="571.81,-186.53 562.13,-182.22 567,-191.63 571.81,-186.53"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_helio_kick~~UsesGraph_edge5" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-23.92C500.41,-27.42 488.32,-31.3 476.88,-34.97"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-31.74 467.04,-38.12 477.63,-38.4 475.49,-31.74"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C636.71,-213.05 602.33,-199.27 578.93,-187.07"/>
+<polygon fill="#000000" stroke="#000000" points="580.38,-183.87 569.92,-182.16 577.03,-190.02 580.38,-183.87"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
-<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~whm_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_node4" class="node">
+<title>module~whm_classes</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-222 391,-222 391,-198 467,-198 467,-222"/>
+<text text-anchor="middle" x="429" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_helio_kick~~UsesGraph_edge3" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C370.53,-15.97 352.02,10.51 298,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.31,-9.09C487.91,-7.82 457.12,-7.18 430,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-10C234.03,-33.53 193.74,-107.5 176.94,-144.49"/>
-<polygon fill="#000000" stroke="#000000" points="173.63,-143.31 172.82,-153.87 180.04,-146.12 173.63,-143.31"/>
-</g>
-<!-- module~swiftest_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-82 252.5,-82 252.5,-58 341.5,-58 341.5,-82"/>
-<text text-anchor="middle" x="297" y="-67.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
-</a>
-</g>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge4" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C388.8,-14.07 348.3,-36.11 323.14,-52.3"/>
-<polygon fill="#000000" stroke="#000000" points="321,-49.52 314.59,-57.96 324.86,-55.35 321,-49.52"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.8,-117.94C746.18,-100.33 708.8,-67.93 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C645.47,-42.42 619.23,-33.35 597.36,-26.28"/>
-<polygon fill="#000000" stroke="#000000" points="598.24,-22.88 587.65,-23.18 596.11,-29.55 598.24,-22.88"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C602.45,-216.33 525.64,-214.74 477.42,-212.66"/>
+<polygon fill="#000000" stroke="#000000" points="477.43,-209.16 467.29,-212.2 477.12,-216.15 477.43,-209.16"/>
 </g>
 <!-- module~swiftest_operators -->
-<g id="module~~s_helio_kick~~UsesGraph_node4" class="node">
+<g id="module~~s_helio_kick~~UsesGraph_node5" class="node">
 <title>module~swiftest_operators</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
-<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<g id="a_module~~s_helio_kick~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-146 247,-146 247,-122 347,-122 347,-146"/>
+<text text-anchor="middle" x="297" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_helio_kick~~UsesGraph_edge6" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C607.71,-184 608.78,-223.76 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C499.29,-264.78 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.22,-243.53 359.65,-231.92 334.01,-221.84"/>
-<polygon fill="#000000" stroke="#000000" points="335.28,-218.58 324.7,-218.07 332.66,-225.06 335.28,-218.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C486.58,-106.4 409.65,-112.31 357.49,-120.96"/>
+<polygon fill="#000000" stroke="#000000" points="356.66,-117.55 347.41,-122.72 357.86,-124.45 356.66,-117.55"/>
 </g>
-<!-- module~rmvs_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-142 511,-142 511,-118 588,-118 588,-142"/>
-<text text-anchor="middle" x="549.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<!-- module~symba_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_node6" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-182 627,-182 627,-158 712,-158 712,-182"/>
+<text text-anchor="middle" x="669.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C635.93,-177.5 599.7,-161.38 576.08,-147.42"/>
-<polygon fill="#000000" stroke="#000000" points="577.73,-144.32 567.39,-142.03 574.04,-150.27 577.73,-144.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.91,-142.03C729.71,-151.26 698.79,-163.48 670.5,-170"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-184.35C742.17,-182.79 732.05,-180.98 722.01,-179.19"/>
+<polygon fill="#000000" stroke="#000000" points="722.51,-175.72 712.05,-177.41 721.28,-182.61 722.51,-175.72"/>
 </g>
 <!-- module~fraggle_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_node6" class="node">
+<g id="module~~s_helio_kick~~UsesGraph_node7" class="node">
 <title>module~fraggle_classes</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-180 385.5,-180 385.5,-156 472.5,-156 472.5,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<g id="a_module~~s_helio_kick~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge8" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C617.39,-181.77 602.8,-166.11 550.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.93,-176.92C731.27,-153.08 658.53,-100.16 588,-76 554.1,-64.39 514.11,-58.89 482.85,-56.3"/>
+<polygon fill="#000000" stroke="#000000" points="482.84,-52.79 472.6,-55.53 482.31,-59.77 482.84,-52.79"/>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C525.14,-53.74 499.11,-53.53 477.42,-52.77"/>
-<polygon fill="#000000" stroke="#000000" points="477.28,-49.26 467.14,-52.36 477,-56.26 477.28,-49.26"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C620.08,-31.86 602.8,-48.12 550.5,-52"/>
+<!-- module~lambda_function -->
+<g id="module~~s_helio_kick~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+</a>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.39,-241.66 351.07,-268.85 298,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
-<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_helio_kick~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.74,-176.62C769.11,-148.87 752.19,-80.77 715,-38 712.37,-34.97 709.29,-32.21 706.01,-29.71"/>
+<polygon fill="#000000" stroke="#000000" points="707.81,-26.7 697.55,-24.03 703.91,-32.51 707.81,-26.7"/>
+</g>
+<!-- module~swiftest_classes -->
 <g id="module~~s_helio_kick~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-142 627,-142 627,-118 712,-118 712,-142"/>
-<text text-anchor="middle" x="669.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-104 252.5,-104 252.5,-80 341.5,-80 341.5,-104"/>
+<text text-anchor="middle" x="297" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-130C742.26,-130 732.26,-130 722.32,-130"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-126.5 712.05,-130 722.05,-133.5 722.05,-126.5"/>
-</g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge13" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C402.74,-89.51 375.04,-85.71 351.72,-81.55"/>
-<polygon fill="#000000" stroke="#000000" points="352.14,-78.07 341.67,-79.69 350.87,-84.95 352.14,-78.07"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C493.34,-56.1 485.3,-91.07 430,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C647.08,-211.93 641.34,-203.72 624,-191 604.18,-176.46 607.34,-164.18 588,-149 573.3,-137.46 567.74,-137.21 550.5,-130"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.96,-195.72C729.53,-200.87 698.28,-207.5 670.5,-210"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C497.72,-108.75 484.4,-102.37 430,-94"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_helio_kick~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-280 624,-280 624,-256 715,-256 715,-280"/>
-<text text-anchor="middle" x="669.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-262 511,-262 511,-238 588,-238 588,-262"/>
+<text text-anchor="middle" x="549.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_helio_kick~~UsesGraph_edge14" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.55,-142.25C749.19,-166.04 708.53,-218.72 686.11,-247.78"/>
-<polygon fill="#000000" stroke="#000000" points="683.12,-245.92 679.78,-255.98 688.66,-250.2 683.12,-245.92"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C639.11,-212.82 607.51,-224 584.42,-233.83"/>
+<polygon fill="#000000" stroke="#000000" points="582.82,-230.71 575.07,-237.93 585.64,-237.12 582.82,-230.71"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_node12" class="node">
+<g id="module~~s_helio_kick~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_helio_kick~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-302 383,-302 383,-278 475,-278 475,-302"/>
+<text text-anchor="middle" x="429" y="-287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge15" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C525.45,-254.79 499.53,-263.66 477.81,-270.8"/>
-<polygon fill="#000000" stroke="#000000" points="476.58,-267.52 468.16,-273.96 478.75,-274.18 476.58,-267.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C623.83,-214.43 629.62,-254.18 588,-271 555.55,-284.11 516.53,-288.9 485.38,-290.39"/>
+<polygon fill="#000000" stroke="#000000" points="485,-286.9 475.14,-290.78 485.27,-293.9 485,-286.9"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge16" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-125 123,-125 123,-101 211,-101 211,-125"/>
+<text text-anchor="middle" x="167" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge18" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M533.08,-117.9C518.45,-106.61 495.68,-89.51 475,-76 470.58,-73.11 465.83,-70.19 461.13,-67.39"/>
-<polygon fill="#000000" stroke="#000000" points="462.67,-64.23 452.26,-62.22 459.14,-70.28 462.67,-64.23"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.87,-132.6C477.22,-135.22 426.62,-139.91 383,-147 344.79,-153.21 336.71,-166.29 298,-166"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M759.98,-201.08C727.98,-223.17 655.9,-269.91 588,-293 501.41,-322.45 470.07,-339.01 383,-311 338.73,-296.76 340.47,-268.94 298,-250"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.26,-167.17C359.9,-166.73 327.12,-166.22 298,-166"/>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge14" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-182C501.22,-185.96 488.01,-190.42 475.64,-194.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-191.35 465.94,-197.87 476.53,-197.99 474.29,-191.35"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge20" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-155.98C389.64,-139.08 348.62,-108.16 322.36,-88.36"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-85.34 314.07,-82.12 319.95,-90.93 324.16,-85.34"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge15" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.58,-157.96C498.89,-136.76 435.77,-94.89 430,-94"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.17,-37.95C370.06,-23.69 317.15,-2.73 298,-10"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_edge13" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-169C477,-169.27 424.96,-172.8 383,-189 339.62,-205.74 340.72,-268.36 298,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-250C241.43,-226.06 199.45,-166.31 179.96,-134.2"/>
+<polygon fill="#000000" stroke="#000000" points="182.74,-132.02 174.65,-125.19 176.71,-135.58 182.74,-132.02"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge22" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge17" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-55.73C378.55,-57.61 364.75,-59.73 351.59,-61.76"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-58.3 341.69,-63.28 352.11,-65.22 351.04,-58.3"/>
-</g>
-<!-- iso_fortran_env -->
-<g id="module~~s_helio_kick~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_helio_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
-<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.69,-198C407.96,-177.96 379.91,-137.5 347,-113 345.16,-111.63 343.22,-110.33 341.21,-109.1"/>
+<polygon fill="#000000" stroke="#000000" points="342.55,-105.84 332.1,-104.12 339.2,-111.99 342.55,-105.84"/>
 </g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.62,-222.05C370.46,-236.59 316.93,-258.13 298,-250"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_helio_kick~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_edge18" class="edge">
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.88,-125.94C238.56,-124.58 229.88,-123.15 221.46,-121.77"/>
+<polygon fill="#000000" stroke="#000000" points="221.78,-118.28 211.35,-120.11 220.65,-125.18 221.78,-118.28"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge26" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge21" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.43,-117.83C645.34,-99.38 616.81,-63.73 588,-38 584.96,-35.29 581.63,-32.62 578.25,-30.08"/>
-<polygon fill="#000000" stroke="#000000" points="580.05,-27.06 569.87,-24.1 575.98,-32.76 580.05,-27.06"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-130C617.64,-130 607.75,-130 598.27,-130"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-126.5 588.18,-130 598.18,-133.5 598.18,-126.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-170C617.54,-170 607.54,-170 597.97,-170"/>
+<polygon fill="#000000" stroke="#000000" points="597.8,-166.5 587.8,-170 597.8,-173.5 597.8,-166.5"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge25" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge22" class="edge">
 <title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.4,-142.19C621.08,-153.01 584.37,-167.48 550.5,-170"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-170C527,-171.6 503.24,-171.56 482.68,-170.94"/>
-<polygon fill="#000000" stroke="#000000" points="482.68,-167.44 472.56,-170.59 482.43,-174.44 482.68,-167.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C527.58,-80.17 503.34,-72.25 482.26,-66.37"/>
+<polygon fill="#000000" stroke="#000000" points="483.07,-62.96 472.5,-63.73 481.24,-69.72 483.07,-62.96"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C403.13,-90.17 375.26,-89.3 351.72,-89.53"/>
+<polygon fill="#000000" stroke="#000000" points="351.52,-86.04 341.58,-89.7 351.64,-93.03 351.52,-86.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C500.8,-67.59 482.08,-102.02 430,-94"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge27" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge19" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.42,-142.13C639.15,-146.33 631.11,-151.19 624,-156 607.21,-167.36 607.02,-177 588,-184 502.47,-215.48 473.34,-201.01 383,-189 344.2,-183.84 337.13,-166.94 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C491.87,-63.4 491.84,-23.52 430,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M653.78,-157.75C632.31,-140.44 590.6,-108.84 550.5,-90"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_kick~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.96,-118.02C614.51,-114.74 600.77,-111.42 588,-109 518.51,-95.82 500.73,-89.79 430,-90"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.87,-66.02C374.89,-69.52 361.66,-73.39 349.15,-77.05"/>
+<polygon fill="#000000" stroke="#000000" points="347.93,-73.76 339.31,-79.92 349.89,-80.48 347.93,-73.76"/>
 </g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.79,-82.16C257.67,-98.75 217.85,-128.61 192.19,-147.86"/>
-<polygon fill="#000000" stroke="#000000" points="189.98,-145.14 184.08,-153.94 194.18,-150.74 189.98,-145.14"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.71,-41.93C368.69,-28.41 317.5,-9.01 298,-14"/>
 </g>
 <!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge30" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge25" class="edge">
 <title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M639.81,-280.08C587.52,-300.34 473.72,-336.18 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.98,0.31 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C248.56,-26.13 206.38,-67.63 184.29,-92.89"/>
+<polygon fill="#000000" stroke="#000000" points="181.41,-90.88 177.6,-100.77 186.74,-95.42 181.41,-90.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-99.17C242.31,-100.81 231.58,-102.57 221.24,-104.27"/>
+<polygon fill="#000000" stroke="#000000" points="220.36,-100.86 211.06,-105.94 221.5,-107.77 220.36,-100.86"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_kick~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-238C501.22,-234.04 488.01,-229.58 475.64,-225.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-222.01 465.94,-222.13 474.29,-228.65 476.53,-222.01"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_kick~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.86,-253.64C450.49,-258.89 335.04,-266.25 298,-250"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_kick~~UsesGraph_edge31" class="edge">
+<g id="module~~s_helio_kick~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.93,-278.7C357.51,-271.7 325.45,-261.79 298,-250"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_helio_kick~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_helio_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-125 0,-125 0,-101 87,-101 87,-125"/>
+<text text-anchor="middle" x="43.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_helio_kick~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-113C114.58,-113 105.86,-113 97.36,-113"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-109.5 87.13,-113 97.13,-116.5 97.13,-109.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_helio_setup.html b/docs/module/s_helio_setup.html
index 7676acc3a..c10d4f783 100644
--- a/docs/module/s_helio_setup.html
+++ b/docs/module/s_helio_setup.html
@@ -245,314 +245,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_helio_setup~~UsesGraph Pages: 1 -->
-<svg id="modules_helio_setupUsesGraph" width="641pt" height="225pt"
- viewBox="0.00 0.00 641.00 225.30" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_helio_setup~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 322.17)">
+<svg id="modules_helio_setupUsesGraph" width="641pt" height="230pt"
+ viewBox="0.00 0.00 641.00 230.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_helio_setup~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 329.5)">
 <title>module~~s_helio_setup~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.17 924,-322.17 924,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-329.5 924,-329.5 924,4 -4,4"/>
 <!-- module~s_helio_setup -->
 <g id="module~~s_helio_setup~~UsesGraph_node1" class="node">
 <title>module~s_helio_setup</title>
-<polygon fill="none" stroke="black" points="920,-83 841,-83 841,-59 920,-59 920,-83"/>
-<text text-anchor="middle" x="880.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_setup</text>
-</g>
-<!-- module~helio_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_node2" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node2"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-24 511.5,-24 511.5,0 587.5,0 587.5,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
-</a>
-</g>
-</g>
-<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge2" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M840.7,-62.75C807.42,-55.78 758.15,-45.73 715,-38 675.71,-30.96 630.95,-23.95 598.06,-18.99"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-15.47 587.81,-17.45 597.18,-22.39 598.22,-15.47"/>
+<polygon fill="none" stroke="black" points="920,-240 841,-240 841,-216 920,-216 920,-240"/>
+<text text-anchor="middle" x="880.5" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_setup</text>
 </g>
 <!-- module~swiftest -->
-<g id="module~~s_helio_setup~~UsesGraph_node3" class="node">
+<g id="module~~s_helio_setup~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node3"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-142 751,-142 751,-118 805,-118 805,-142"/>
-<text text-anchor="middle" x="778" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~s_helio_setup~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-201 751,-201 751,-177 805,-177 805,-201"/>
+<text text-anchor="middle" x="778" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_helio_setup&#45;&gt;module~swiftest -->
 <g id="module~~s_helio_setup~~UsesGraph_edge1" class="edge">
 <title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.68,-83.22C844.16,-91.75 824.59,-103.24 808.48,-112.7"/>
-<polygon fill="#000000" stroke="#000000" points="806.3,-109.91 799.45,-117.99 809.85,-115.95 806.3,-109.91"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M848.53,-215.98C837.82,-211.83 825.74,-207.14 814.69,-202.85"/>
+<polygon fill="#000000" stroke="#000000" points="815.89,-199.56 805.3,-199.21 813.35,-206.09 815.89,-199.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-62 391,-62 391,-38 467,-38 467,-62"/>
-<text text-anchor="middle" x="429" y="-47.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~helio_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_node3" class="node">
+<title>module~helio_classes</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node3"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-182 511.5,-182 511.5,-158 587.5,-158 587.5,-182"/>
+<text text-anchor="middle" x="549.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge2" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M840.61,-234.55C789.43,-241.58 697.37,-248.69 624,-224 603.18,-216.99 583.33,-201.71 569.52,-189.19"/>
+<polygon fill="#000000" stroke="#000000" points="571.81,-186.53 562.13,-182.22 567,-191.63 571.81,-186.53"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_helio_setup~~UsesGraph_edge5" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-23.92C500.41,-27.42 488.32,-31.3 476.88,-34.97"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-31.74 467.04,-38.12 477.63,-38.4 475.49,-31.74"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C636.71,-213.05 602.33,-199.27 578.93,-187.07"/>
+<polygon fill="#000000" stroke="#000000" points="580.38,-183.87 569.92,-182.16 577.03,-190.02 580.38,-183.87"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
-<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~whm_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_node4" class="node">
+<title>module~whm_classes</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-222 391,-222 391,-198 467,-198 467,-222"/>
+<text text-anchor="middle" x="429" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_helio_setup~~UsesGraph_edge3" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C370.53,-15.97 352.02,10.51 298,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.31,-9.09C487.91,-7.82 457.12,-7.18 430,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-10C234.03,-33.53 193.74,-107.5 176.94,-144.49"/>
-<polygon fill="#000000" stroke="#000000" points="173.63,-143.31 172.82,-153.87 180.04,-146.12 173.63,-143.31"/>
-</g>
-<!-- module~swiftest_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-82 252.5,-82 252.5,-58 341.5,-58 341.5,-82"/>
-<text text-anchor="middle" x="297" y="-67.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
-</a>
-</g>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge4" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C388.8,-14.07 348.3,-36.11 323.14,-52.3"/>
-<polygon fill="#000000" stroke="#000000" points="321,-49.52 314.59,-57.96 324.86,-55.35 321,-49.52"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.8,-117.94C746.18,-100.33 708.8,-67.93 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C645.47,-42.42 619.23,-33.35 597.36,-26.28"/>
-<polygon fill="#000000" stroke="#000000" points="598.24,-22.88 587.65,-23.18 596.11,-29.55 598.24,-22.88"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C602.45,-216.33 525.64,-214.74 477.42,-212.66"/>
+<polygon fill="#000000" stroke="#000000" points="477.43,-209.16 467.29,-212.2 477.12,-216.15 477.43,-209.16"/>
 </g>
 <!-- module~swiftest_operators -->
-<g id="module~~s_helio_setup~~UsesGraph_node4" class="node">
+<g id="module~~s_helio_setup~~UsesGraph_node5" class="node">
 <title>module~swiftest_operators</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
-<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<g id="a_module~~s_helio_setup~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-146 247,-146 247,-122 347,-122 347,-146"/>
+<text text-anchor="middle" x="297" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_helio_setup~~UsesGraph_edge6" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C607.71,-184 608.78,-223.76 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C499.29,-264.78 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.22,-243.53 359.65,-231.92 334.01,-221.84"/>
-<polygon fill="#000000" stroke="#000000" points="335.28,-218.58 324.7,-218.07 332.66,-225.06 335.28,-218.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C486.58,-106.4 409.65,-112.31 357.49,-120.96"/>
+<polygon fill="#000000" stroke="#000000" points="356.66,-117.55 347.41,-122.72 357.86,-124.45 356.66,-117.55"/>
 </g>
-<!-- module~rmvs_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-142 511,-142 511,-118 588,-118 588,-142"/>
-<text text-anchor="middle" x="549.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<!-- module~symba_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_node6" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-182 627,-182 627,-158 712,-158 712,-182"/>
+<text text-anchor="middle" x="669.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C635.93,-177.5 599.7,-161.38 576.08,-147.42"/>
-<polygon fill="#000000" stroke="#000000" points="577.73,-144.32 567.39,-142.03 574.04,-150.27 577.73,-144.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.91,-142.03C729.71,-151.26 698.79,-163.48 670.5,-170"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-184.35C742.17,-182.79 732.05,-180.98 722.01,-179.19"/>
+<polygon fill="#000000" stroke="#000000" points="722.51,-175.72 712.05,-177.41 721.28,-182.61 722.51,-175.72"/>
 </g>
 <!-- module~fraggle_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_node6" class="node">
+<g id="module~~s_helio_setup~~UsesGraph_node7" class="node">
 <title>module~fraggle_classes</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-180 385.5,-180 385.5,-156 472.5,-156 472.5,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<g id="a_module~~s_helio_setup~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge8" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C617.39,-181.77 602.8,-166.11 550.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.93,-176.92C731.27,-153.08 658.53,-100.16 588,-76 554.1,-64.39 514.11,-58.89 482.85,-56.3"/>
+<polygon fill="#000000" stroke="#000000" points="482.84,-52.79 472.6,-55.53 482.31,-59.77 482.84,-52.79"/>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C525.14,-53.74 499.11,-53.53 477.42,-52.77"/>
-<polygon fill="#000000" stroke="#000000" points="477.28,-49.26 467.14,-52.36 477,-56.26 477.28,-49.26"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C620.08,-31.86 602.8,-48.12 550.5,-52"/>
+<!-- module~lambda_function -->
+<g id="module~~s_helio_setup~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+</a>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.39,-241.66 351.07,-268.85 298,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
-<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_helio_setup~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.74,-176.62C769.11,-148.87 752.19,-80.77 715,-38 712.37,-34.97 709.29,-32.21 706.01,-29.71"/>
+<polygon fill="#000000" stroke="#000000" points="707.81,-26.7 697.55,-24.03 703.91,-32.51 707.81,-26.7"/>
+</g>
+<!-- module~swiftest_classes -->
 <g id="module~~s_helio_setup~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-142 627,-142 627,-118 712,-118 712,-142"/>
-<text text-anchor="middle" x="669.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-104 252.5,-104 252.5,-80 341.5,-80 341.5,-104"/>
+<text text-anchor="middle" x="297" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-130C742.26,-130 732.26,-130 722.32,-130"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-126.5 712.05,-130 722.05,-133.5 722.05,-126.5"/>
-</g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge13" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C402.74,-89.51 375.04,-85.71 351.72,-81.55"/>
-<polygon fill="#000000" stroke="#000000" points="352.14,-78.07 341.67,-79.69 350.87,-84.95 352.14,-78.07"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C493.34,-56.1 485.3,-91.07 430,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C647.08,-211.93 641.34,-203.72 624,-191 604.18,-176.46 607.34,-164.18 588,-149 573.3,-137.46 567.74,-137.21 550.5,-130"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.96,-195.72C729.53,-200.87 698.28,-207.5 670.5,-210"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C497.72,-108.75 484.4,-102.37 430,-94"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_helio_setup~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-280 624,-280 624,-256 715,-256 715,-280"/>
-<text text-anchor="middle" x="669.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-262 511,-262 511,-238 588,-238 588,-262"/>
+<text text-anchor="middle" x="549.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_helio_setup~~UsesGraph_edge14" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.55,-142.25C749.19,-166.04 708.53,-218.72 686.11,-247.78"/>
-<polygon fill="#000000" stroke="#000000" points="683.12,-245.92 679.78,-255.98 688.66,-250.2 683.12,-245.92"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C639.11,-212.82 607.51,-224 584.42,-233.83"/>
+<polygon fill="#000000" stroke="#000000" points="582.82,-230.71 575.07,-237.93 585.64,-237.12 582.82,-230.71"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_node12" class="node">
+<g id="module~~s_helio_setup~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_helio_setup~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-302 383,-302 383,-278 475,-278 475,-302"/>
+<text text-anchor="middle" x="429" y="-287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge15" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C525.45,-254.79 499.53,-263.66 477.81,-270.8"/>
-<polygon fill="#000000" stroke="#000000" points="476.58,-267.52 468.16,-273.96 478.75,-274.18 476.58,-267.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C623.83,-214.43 629.62,-254.18 588,-271 555.55,-284.11 516.53,-288.9 485.38,-290.39"/>
+<polygon fill="#000000" stroke="#000000" points="485,-286.9 475.14,-290.78 485.27,-293.9 485,-286.9"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge16" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-125 123,-125 123,-101 211,-101 211,-125"/>
+<text text-anchor="middle" x="167" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge18" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M533.08,-117.9C518.45,-106.61 495.68,-89.51 475,-76 470.58,-73.11 465.83,-70.19 461.13,-67.39"/>
-<polygon fill="#000000" stroke="#000000" points="462.67,-64.23 452.26,-62.22 459.14,-70.28 462.67,-64.23"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.87,-132.6C477.22,-135.22 426.62,-139.91 383,-147 344.79,-153.21 336.71,-166.29 298,-166"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M759.98,-201.08C727.98,-223.17 655.9,-269.91 588,-293 501.41,-322.45 470.07,-339.01 383,-311 338.73,-296.76 340.47,-268.94 298,-250"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.26,-167.17C359.9,-166.73 327.12,-166.22 298,-166"/>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge14" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-182C501.22,-185.96 488.01,-190.42 475.64,-194.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-191.35 465.94,-197.87 476.53,-197.99 474.29,-191.35"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge20" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-155.98C389.64,-139.08 348.62,-108.16 322.36,-88.36"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-85.34 314.07,-82.12 319.95,-90.93 324.16,-85.34"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge15" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.58,-157.96C498.89,-136.76 435.77,-94.89 430,-94"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.17,-37.95C370.06,-23.69 317.15,-2.73 298,-10"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_edge13" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-169C477,-169.27 424.96,-172.8 383,-189 339.62,-205.74 340.72,-268.36 298,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-250C241.43,-226.06 199.45,-166.31 179.96,-134.2"/>
+<polygon fill="#000000" stroke="#000000" points="182.74,-132.02 174.65,-125.19 176.71,-135.58 182.74,-132.02"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge22" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge17" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-55.73C378.55,-57.61 364.75,-59.73 351.59,-61.76"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-58.3 341.69,-63.28 352.11,-65.22 351.04,-58.3"/>
-</g>
-<!-- iso_fortran_env -->
-<g id="module~~s_helio_setup~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_helio_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
-<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.69,-198C407.96,-177.96 379.91,-137.5 347,-113 345.16,-111.63 343.22,-110.33 341.21,-109.1"/>
+<polygon fill="#000000" stroke="#000000" points="342.55,-105.84 332.1,-104.12 339.2,-111.99 342.55,-105.84"/>
 </g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.62,-222.05C370.46,-236.59 316.93,-258.13 298,-250"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_helio_setup~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_edge18" class="edge">
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.88,-125.94C238.56,-124.58 229.88,-123.15 221.46,-121.77"/>
+<polygon fill="#000000" stroke="#000000" points="221.78,-118.28 211.35,-120.11 220.65,-125.18 221.78,-118.28"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge26" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge21" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.43,-117.83C645.34,-99.38 616.81,-63.73 588,-38 584.96,-35.29 581.63,-32.62 578.25,-30.08"/>
-<polygon fill="#000000" stroke="#000000" points="580.05,-27.06 569.87,-24.1 575.98,-32.76 580.05,-27.06"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-130C617.64,-130 607.75,-130 598.27,-130"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-126.5 588.18,-130 598.18,-133.5 598.18,-126.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-170C617.54,-170 607.54,-170 597.97,-170"/>
+<polygon fill="#000000" stroke="#000000" points="597.8,-166.5 587.8,-170 597.8,-173.5 597.8,-166.5"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge25" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge22" class="edge">
 <title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.4,-142.19C621.08,-153.01 584.37,-167.48 550.5,-170"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-170C527,-171.6 503.24,-171.56 482.68,-170.94"/>
-<polygon fill="#000000" stroke="#000000" points="482.68,-167.44 472.56,-170.59 482.43,-174.44 482.68,-167.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C527.58,-80.17 503.34,-72.25 482.26,-66.37"/>
+<polygon fill="#000000" stroke="#000000" points="483.07,-62.96 472.5,-63.73 481.24,-69.72 483.07,-62.96"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C403.13,-90.17 375.26,-89.3 351.72,-89.53"/>
+<polygon fill="#000000" stroke="#000000" points="351.52,-86.04 341.58,-89.7 351.64,-93.03 351.52,-86.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C500.8,-67.59 482.08,-102.02 430,-94"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge27" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge19" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.42,-142.13C639.15,-146.33 631.11,-151.19 624,-156 607.21,-167.36 607.02,-177 588,-184 502.47,-215.48 473.34,-201.01 383,-189 344.2,-183.84 337.13,-166.94 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C491.87,-63.4 491.84,-23.52 430,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M653.78,-157.75C632.31,-140.44 590.6,-108.84 550.5,-90"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_setup~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.96,-118.02C614.51,-114.74 600.77,-111.42 588,-109 518.51,-95.82 500.73,-89.79 430,-90"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.87,-66.02C374.89,-69.52 361.66,-73.39 349.15,-77.05"/>
+<polygon fill="#000000" stroke="#000000" points="347.93,-73.76 339.31,-79.92 349.89,-80.48 347.93,-73.76"/>
 </g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.79,-82.16C257.67,-98.75 217.85,-128.61 192.19,-147.86"/>
-<polygon fill="#000000" stroke="#000000" points="189.98,-145.14 184.08,-153.94 194.18,-150.74 189.98,-145.14"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.71,-41.93C368.69,-28.41 317.5,-9.01 298,-14"/>
 </g>
 <!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge30" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge25" class="edge">
 <title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M639.81,-280.08C587.52,-300.34 473.72,-336.18 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.98,0.31 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C248.56,-26.13 206.38,-67.63 184.29,-92.89"/>
+<polygon fill="#000000" stroke="#000000" points="181.41,-90.88 177.6,-100.77 186.74,-95.42 181.41,-90.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-99.17C242.31,-100.81 231.58,-102.57 221.24,-104.27"/>
+<polygon fill="#000000" stroke="#000000" points="220.36,-100.86 211.06,-105.94 221.5,-107.77 220.36,-100.86"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_setup~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-238C501.22,-234.04 488.01,-229.58 475.64,-225.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-222.01 465.94,-222.13 474.29,-228.65 476.53,-222.01"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_setup~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.86,-253.64C450.49,-258.89 335.04,-266.25 298,-250"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_setup~~UsesGraph_edge31" class="edge">
+<g id="module~~s_helio_setup~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.93,-278.7C357.51,-271.7 325.45,-261.79 298,-250"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_helio_setup~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_helio_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-125 0,-125 0,-101 87,-101 87,-125"/>
+<text text-anchor="middle" x="43.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_helio_setup~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-113C114.58,-113 105.86,-113 97.36,-113"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-109.5 87.13,-113 97.13,-116.5 97.13,-109.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_helio_step.html b/docs/module/s_helio_step.html
index 99135d6d0..0981dbbf9 100644
--- a/docs/module/s_helio_step.html
+++ b/docs/module/s_helio_step.html
@@ -249,314 +249,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_helio_step~~UsesGraph Pages: 1 -->
-<svg id="modules_helio_stepUsesGraph" width="641pt" height="227pt"
- viewBox="0.00 0.00 641.00 226.76" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_helio_step~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 322.17)">
+<svg id="modules_helio_stepUsesGraph" width="641pt" height="232pt"
+ viewBox="0.00 0.00 641.00 231.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_helio_step~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 329.5)">
 <title>module~~s_helio_step~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-322.17 918,-322.17 918,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-329.5 918,-329.5 918,4 -4,4"/>
 <!-- module~s_helio_step -->
 <g id="module~~s_helio_step~~UsesGraph_node1" class="node">
 <title>module~s_helio_step</title>
-<polygon fill="none" stroke="black" points="914,-83 841,-83 841,-59 914,-59 914,-83"/>
-<text text-anchor="middle" x="877.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_step</text>
-</g>
-<!-- module~helio_classes -->
-<g id="module~~s_helio_step~~UsesGraph_node2" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node2"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-24 511.5,-24 511.5,0 587.5,0 587.5,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
-</a>
-</g>
-</g>
-<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge2" class="edge">
-<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M840.99,-63.27C808.32,-56.27 758.51,-45.88 715,-38 675.72,-30.89 630.97,-23.88 598.06,-18.94"/>
-<polygon fill="#000000" stroke="#000000" points="598.23,-15.43 587.82,-17.41 597.19,-22.35 598.23,-15.43"/>
+<polygon fill="none" stroke="black" points="914,-240 841,-240 841,-216 914,-216 914,-240"/>
+<text text-anchor="middle" x="877.5" y="-225.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_helio_step</text>
 </g>
 <!-- module~swiftest -->
-<g id="module~~s_helio_step~~UsesGraph_node3" class="node">
+<g id="module~~s_helio_step~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node3"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-142 751,-142 751,-118 805,-118 805,-142"/>
-<text text-anchor="middle" x="778" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~s_helio_step~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-201 751,-201 751,-177 805,-177 805,-201"/>
+<text text-anchor="middle" x="778" y="-186.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_helio_step&#45;&gt;module~swiftest -->
 <g id="module~~s_helio_step~~UsesGraph_edge1" class="edge">
 <title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.3,-83.22C842.22,-91.75 823.23,-103.24 807.6,-112.7"/>
-<polygon fill="#000000" stroke="#000000" points="805.59,-109.82 798.84,-117.99 809.21,-115.81 805.59,-109.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M846.45,-215.98C836.34,-211.94 824.97,-207.39 814.48,-203.19"/>
+<polygon fill="#000000" stroke="#000000" points="815.74,-199.93 805.16,-199.46 813.14,-206.43 815.74,-199.93"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_helio_step~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-62 391,-62 391,-38 467,-38 467,-62"/>
-<text text-anchor="middle" x="429" y="-47.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~helio_classes -->
+<g id="module~~s_helio_step~~UsesGraph_node3" class="node">
+<title>module~helio_classes</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node3"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-182 511.5,-182 511.5,-158 587.5,-158 587.5,-182"/>
+<text text-anchor="middle" x="549.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge2" class="edge">
+<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M840.64,-234.11C790.62,-241.15 697.75,-248.83 624,-224 603.18,-216.99 583.33,-201.71 569.52,-189.19"/>
+<polygon fill="#000000" stroke="#000000" points="571.81,-186.53 562.13,-182.22 567,-191.63 571.81,-186.53"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_helio_step~~UsesGraph_edge5" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-23.92C500.41,-27.42 488.32,-31.3 476.88,-34.97"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-31.74 467.04,-38.12 477.63,-38.4 475.49,-31.74"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C636.71,-213.05 602.33,-199.27 578.93,-187.07"/>
+<polygon fill="#000000" stroke="#000000" points="580.38,-183.87 569.92,-182.16 577.03,-190.02 580.38,-183.87"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-178 123,-178 123,-154 211,-154 211,-178"/>
-<text text-anchor="middle" x="167" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~whm_classes -->
+<g id="module~~s_helio_step~~UsesGraph_node4" class="node">
+<title>module~whm_classes</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-222 391,-222 391,-198 467,-198 467,-222"/>
+<text text-anchor="middle" x="429" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_helio_step~~UsesGraph_edge3" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C370.53,-15.97 352.02,10.51 298,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.31,-9.09C487.91,-7.82 457.12,-7.18 430,-10"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-10C234.03,-33.53 193.74,-107.5 176.94,-144.49"/>
-<polygon fill="#000000" stroke="#000000" points="173.63,-143.31 172.82,-153.87 180.04,-146.12 173.63,-143.31"/>
-</g>
-<!-- module~swiftest_classes -->
-<g id="module~~s_helio_step~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-82 252.5,-82 252.5,-58 341.5,-58 341.5,-82"/>
-<text text-anchor="middle" x="297" y="-67.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
-</a>
-</g>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge4" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-10C388.8,-14.07 348.3,-36.11 323.14,-52.3"/>
-<polygon fill="#000000" stroke="#000000" points="321,-49.52 314.59,-57.96 324.86,-55.35 321,-49.52"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.8,-117.94C746.18,-100.33 708.8,-67.93 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C645.47,-42.42 619.23,-33.35 597.36,-26.28"/>
-<polygon fill="#000000" stroke="#000000" points="598.24,-22.88 587.65,-23.18 596.11,-29.55 598.24,-22.88"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C602.45,-216.33 525.64,-214.74 477.42,-212.66"/>
+<polygon fill="#000000" stroke="#000000" points="477.43,-209.16 467.29,-212.2 477.12,-216.15 477.43,-209.16"/>
 </g>
 <!-- module~swiftest_operators -->
-<g id="module~~s_helio_step~~UsesGraph_node4" class="node">
+<g id="module~~s_helio_step~~UsesGraph_node5" class="node">
 <title>module~swiftest_operators</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-218 247,-218 247,-194 347,-194 347,-218"/>
-<text text-anchor="middle" x="297" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<g id="a_module~~s_helio_step~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-146 247,-146 247,-122 347,-122 347,-146"/>
+<text text-anchor="middle" x="297" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_helio_step~~UsesGraph_edge6" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C607.71,-184 608.78,-223.76 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C499.29,-264.78 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C395.22,-243.53 359.65,-231.92 334.01,-221.84"/>
-<polygon fill="#000000" stroke="#000000" points="335.28,-218.58 324.7,-218.07 332.66,-225.06 335.28,-218.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C486.58,-106.4 409.65,-112.31 357.49,-120.96"/>
+<polygon fill="#000000" stroke="#000000" points="356.66,-117.55 347.41,-122.72 357.86,-124.45 356.66,-117.55"/>
 </g>
-<!-- module~rmvs_classes -->
-<g id="module~~s_helio_step~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-142 511,-142 511,-118 588,-118 588,-142"/>
-<text text-anchor="middle" x="549.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<!-- module~symba_classes -->
+<g id="module~~s_helio_step~~UsesGraph_node6" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-182 627,-182 627,-158 712,-158 712,-182"/>
+<text text-anchor="middle" x="669.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C635.93,-177.5 599.7,-161.38 576.08,-147.42"/>
-<polygon fill="#000000" stroke="#000000" points="577.73,-144.32 567.39,-142.03 574.04,-150.27 577.73,-144.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.91,-142.03C729.71,-151.26 698.79,-163.48 670.5,-170"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-184.35C742.17,-182.79 732.05,-180.98 722.01,-179.19"/>
+<polygon fill="#000000" stroke="#000000" points="722.51,-175.72 712.05,-177.41 721.28,-182.61 722.51,-175.72"/>
 </g>
 <!-- module~fraggle_classes -->
-<g id="module~~s_helio_step~~UsesGraph_node6" class="node">
+<g id="module~~s_helio_step~~UsesGraph_node7" class="node">
 <title>module~fraggle_classes</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-180 385.5,-180 385.5,-156 472.5,-156 472.5,-180"/>
-<text text-anchor="middle" x="429" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<g id="a_module~~s_helio_step~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge8" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge7" class="edge">
 <title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-170C617.39,-181.77 602.8,-166.11 550.5,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.93,-176.92C731.27,-153.08 658.53,-100.16 588,-76 554.1,-64.39 514.11,-58.89 482.85,-56.3"/>
+<polygon fill="#000000" stroke="#000000" points="482.84,-52.79 472.6,-55.53 482.31,-59.77 482.84,-52.79"/>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C525.14,-53.74 499.11,-53.53 477.42,-52.77"/>
-<polygon fill="#000000" stroke="#000000" points="477.28,-49.26 467.14,-52.36 477,-56.26 477.28,-49.26"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C620.08,-31.86 602.8,-48.12 550.5,-52"/>
+<!-- module~lambda_function -->
+<g id="module~~s_helio_step~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+</a>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C370.39,-241.66 351.07,-268.85 298,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-246C274.55,-236.76 267.34,-238.48 247,-227 225.86,-215.07 204.21,-197.94 188.93,-184.86"/>
-<polygon fill="#000000" stroke="#000000" points="190.98,-182.01 181.14,-178.08 186.38,-187.28 190.98,-182.01"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_helio_step~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.74,-176.62C769.11,-148.87 752.19,-80.77 715,-38 712.37,-34.97 709.29,-32.21 706.01,-29.71"/>
+<polygon fill="#000000" stroke="#000000" points="707.81,-26.7 697.55,-24.03 703.91,-32.51 707.81,-26.7"/>
+</g>
+<!-- module~swiftest_classes -->
 <g id="module~~s_helio_step~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-142 627,-142 627,-118 712,-118 712,-142"/>
-<text text-anchor="middle" x="669.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-104 252.5,-104 252.5,-80 341.5,-80 341.5,-104"/>
+<text text-anchor="middle" x="297" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-130C742.26,-130 732.26,-130 722.32,-130"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-126.5 712.05,-130 722.05,-133.5 722.05,-126.5"/>
-</g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge13" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C402.74,-89.51 375.04,-85.71 351.72,-81.55"/>
-<polygon fill="#000000" stroke="#000000" points="352.14,-78.07 341.67,-79.69 350.87,-84.95 352.14,-78.07"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-52C493.34,-56.1 485.3,-91.07 430,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C647.08,-211.93 641.34,-203.72 624,-191 604.18,-176.46 607.34,-164.18 588,-149 573.3,-137.46 567.74,-137.21 550.5,-130"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.96,-195.72C729.53,-200.87 698.28,-207.5 670.5,-210"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-130C497.72,-108.75 484.4,-102.37 430,-94"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_helio_step~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-280 624,-280 624,-256 715,-256 715,-280"/>
-<text text-anchor="middle" x="669.5" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_helio_step~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-262 511,-262 511,-238 588,-238 588,-262"/>
+<text text-anchor="middle" x="549.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_helio_step~~UsesGraph_edge14" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.55,-142.25C749.19,-166.04 708.53,-218.72 686.11,-247.78"/>
-<polygon fill="#000000" stroke="#000000" points="683.12,-245.92 679.78,-255.98 688.66,-250.2 683.12,-245.92"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C639.11,-212.82 607.51,-224 584.42,-233.83"/>
+<polygon fill="#000000" stroke="#000000" points="582.82,-230.71 575.07,-237.93 585.64,-237.12 582.82,-230.71"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_helio_step~~UsesGraph_node12" class="node">
+<g id="module~~s_helio_step~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_helio_step~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-302 383,-302 383,-278 475,-278 475,-302"/>
+<text text-anchor="middle" x="429" y="-287.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge15" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C525.45,-254.79 499.53,-263.66 477.81,-270.8"/>
-<polygon fill="#000000" stroke="#000000" points="476.58,-267.52 468.16,-273.96 478.75,-274.18 476.58,-267.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-210C623.83,-214.43 629.62,-254.18 588,-271 555.55,-284.11 516.53,-288.9 485.38,-290.39"/>
+<polygon fill="#000000" stroke="#000000" points="485,-286.9 475.14,-290.78 485.27,-293.9 485,-286.9"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge16" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-194C244.68,-189.96 230.09,-185.4 216.5,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-177.77 206.82,-178.13 215.32,-184.45 217.41,-177.77"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-125 123,-125 123,-101 211,-101 211,-125"/>
+<text text-anchor="middle" x="167" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge18" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M533.08,-117.9C518.45,-106.61 495.68,-89.51 475,-76 470.58,-73.11 465.83,-70.19 461.13,-67.39"/>
-<polygon fill="#000000" stroke="#000000" points="462.67,-64.23 452.26,-62.22 459.14,-70.28 462.67,-64.23"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-166C271.53,-165.81 244.42,-165.79 221.48,-165.82"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-162.32 211.25,-165.84 221.26,-169.32 221.25,-162.32"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.87,-132.6C477.22,-135.22 426.62,-139.91 383,-147 344.79,-153.21 336.71,-166.29 298,-166"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M759.98,-201.08C727.98,-223.17 655.9,-269.91 588,-293 501.41,-322.45 470.07,-339.01 383,-311 338.73,-296.76 340.47,-268.94 298,-250"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.26,-167.17C359.9,-166.73 327.12,-166.22 298,-166"/>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge14" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-182C501.22,-185.96 488.01,-190.42 475.64,-194.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-191.35 465.94,-197.87 476.53,-197.99 474.29,-191.35"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge20" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-155.98C389.64,-139.08 348.62,-108.16 322.36,-88.36"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-85.34 314.07,-82.12 319.95,-90.93 324.16,-85.34"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge15" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.58,-157.96C498.89,-136.76 435.77,-94.89 430,-94"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.17,-37.95C370.06,-23.69 317.15,-2.73 298,-10"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_edge13" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-169C477,-169.27 424.96,-172.8 383,-189 339.62,-205.74 340.72,-268.36 298,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-250C241.43,-226.06 199.45,-166.31 179.96,-134.2"/>
+<polygon fill="#000000" stroke="#000000" points="182.74,-132.02 174.65,-125.19 176.71,-135.58 182.74,-132.02"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge22" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge17" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-55.73C378.55,-57.61 364.75,-59.73 351.59,-61.76"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-58.3 341.69,-63.28 352.11,-65.22 351.04,-58.3"/>
-</g>
-<!-- iso_fortran_env -->
-<g id="module~~s_helio_step~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_helio_step~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-178 0,-178 0,-154 87,-154 87,-178"/>
-<text text-anchor="middle" x="43.5" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.69,-198C407.96,-177.96 379.91,-137.5 347,-113 345.16,-111.63 343.22,-110.33 341.21,-109.1"/>
+<polygon fill="#000000" stroke="#000000" points="342.55,-105.84 332.1,-104.12 339.2,-111.99 342.55,-105.84"/>
 </g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.62,-222.05C370.46,-236.59 316.93,-258.13 298,-250"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_helio_step~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-166C114.58,-166 105.86,-166 97.36,-166"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-162.5 87.13,-166 97.13,-169.5 97.13,-162.5"/>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_edge18" class="edge">
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.88,-125.94C238.56,-124.58 229.88,-123.15 221.46,-121.77"/>
+<polygon fill="#000000" stroke="#000000" points="221.78,-118.28 211.35,-120.11 220.65,-125.18 221.78,-118.28"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge26" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge21" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.43,-117.83C645.34,-99.38 616.81,-63.73 588,-38 584.96,-35.29 581.63,-32.62 578.25,-30.08"/>
-<polygon fill="#000000" stroke="#000000" points="580.05,-27.06 569.87,-24.1 575.98,-32.76 580.05,-27.06"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-130C617.64,-130 607.75,-130 598.27,-130"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-126.5 588.18,-130 598.18,-133.5 598.18,-126.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-170C617.54,-170 607.54,-170 597.97,-170"/>
+<polygon fill="#000000" stroke="#000000" points="597.8,-166.5 587.8,-170 597.8,-173.5 597.8,-166.5"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge25" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge22" class="edge">
 <title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.4,-142.19C621.08,-153.01 584.37,-167.48 550.5,-170"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-170C527,-171.6 503.24,-171.56 482.68,-170.94"/>
-<polygon fill="#000000" stroke="#000000" points="482.68,-167.44 472.56,-170.59 482.43,-174.44 482.68,-167.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C527.58,-80.17 503.34,-72.25 482.26,-66.37"/>
+<polygon fill="#000000" stroke="#000000" points="483.07,-62.96 472.5,-63.73 481.24,-69.72 483.07,-62.96"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C403.13,-90.17 375.26,-89.3 351.72,-89.53"/>
+<polygon fill="#000000" stroke="#000000" points="351.52,-86.04 341.58,-89.7 351.64,-93.03 351.52,-86.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C500.8,-67.59 482.08,-102.02 430,-94"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge27" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge19" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.42,-142.13C639.15,-146.33 631.11,-151.19 624,-156 607.21,-167.36 607.02,-177 588,-184 502.47,-215.48 473.34,-201.01 383,-189 344.2,-183.84 337.13,-166.94 298,-166"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C491.87,-63.4 491.84,-23.52 430,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M653.78,-157.75C632.31,-140.44 590.6,-108.84 550.5,-90"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_helio_step~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.96,-118.02C614.51,-114.74 600.77,-111.42 588,-109 518.51,-95.82 500.73,-89.79 430,-90"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.87,-66.02C374.89,-69.52 361.66,-73.39 349.15,-77.05"/>
+<polygon fill="#000000" stroke="#000000" points="347.93,-73.76 339.31,-79.92 349.89,-80.48 347.93,-73.76"/>
 </g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.79,-82.16C257.67,-98.75 217.85,-128.61 192.19,-147.86"/>
-<polygon fill="#000000" stroke="#000000" points="189.98,-145.14 184.08,-153.94 194.18,-150.74 189.98,-145.14"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.71,-41.93C368.69,-28.41 317.5,-9.01 298,-14"/>
 </g>
 <!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge30" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge25" class="edge">
 <title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M639.81,-280.08C587.52,-300.34 473.72,-336.18 383,-307 338.73,-292.76 340.4,-265.09 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.98,0.31 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C248.56,-26.13 206.38,-67.63 184.29,-92.89"/>
+<polygon fill="#000000" stroke="#000000" points="181.41,-90.88 177.6,-100.77 186.74,-95.42 181.41,-90.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_edge26" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-99.17C242.31,-100.81 231.58,-102.57 221.24,-104.27"/>
+<polygon fill="#000000" stroke="#000000" points="220.36,-100.86 211.06,-105.94 221.5,-107.77 220.36,-100.86"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_helio_step~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-238C501.22,-234.04 488.01,-229.58 475.64,-225.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-222.01 465.94,-222.13 474.29,-228.65 476.53,-222.01"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_helio_step~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.86,-253.64C450.49,-258.89 335.04,-266.25 298,-250"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_helio_step~~UsesGraph_edge31" class="edge">
+<g id="module~~s_helio_step~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.77,-275.06C357.3,-268.17 325.24,-258.26 298,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.93,-278.7C357.51,-271.7 325.45,-261.79 298,-250"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_helio_step~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_helio_step~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-125 0,-125 0,-101 87,-101 87,-125"/>
+<text text-anchor="middle" x="43.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_helio_step~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-113C114.58,-113 105.86,-113 97.36,-113"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-109.5 87.13,-113 97.13,-116.5 97.13,-109.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_io.html b/docs/module/s_io.html
index b0196a68d..b85202e5e 100644
--- a/docs/module/s_io.html
+++ b/docs/module/s_io.html
@@ -321,311 +321,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_io~~UsesGraph Pages: 1 -->
-<svg id="modules_ioUsesGraph" width="641pt" height="278pt"
- viewBox="0.00 0.00 641.00 277.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_io~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_ioUsesGraph" width="641pt" height="290pt"
+ viewBox="0.00 0.00 641.00 289.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_io~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_io~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 899,-387.05 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 899,-404.34 899,4 -4,4"/>
 <!-- module~s_io -->
 <g id="module~~s_io~~UsesGraph_node1" class="node">
 <title>module~s_io</title>
-<polygon fill="none" stroke="black" points="895,-318.05 841,-318.05 841,-294.05 895,-294.05 895,-318.05"/>
-<text text-anchor="middle" x="868" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_io</text>
+<polygon fill="none" stroke="black" points="895,-102.05 841,-102.05 841,-78.05 895,-78.05 895,-102.05"/>
+<text text-anchor="middle" x="868" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_io</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_io~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_io~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_io&#45;&gt;module~swiftest -->
 <g id="module~~s_io~~UsesGraph_edge1" class="edge">
 <title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.25,-294.01C839.13,-281.66 816.94,-262.24 800.5,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="802.77,-245.2 792.94,-241.25 798.16,-250.47 802.77,-245.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.56,-102.13C843.49,-123.71 811.78,-169.11 793.27,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.4,-193.62 787.54,-203.82 796.14,-197.63 790.4,-193.62"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_io~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_io~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_io&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_io~~UsesGraph_edge2" class="edge">
 <title>module~s_io&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M849.49,-318.08C816.21,-339.73 740.85,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-81.49C803.62,-70.01 732.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_io~~UsesGraph_edge10" class="edge">
+<g id="module~~s_io~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_io~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_io~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_io~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_io~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_io~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_io~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_io~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_io~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_io~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_io~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_io~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_io~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_io~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_io~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_io~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_io~~UsesGraph_edge6" class="edge">
+<g id="module~~s_io~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_io~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_io~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_io~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_io~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_io~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_io~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_io~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_io~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_io~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_io~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_io~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_io~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_io~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_io~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_io~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_io~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_io~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_io~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_io~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_io~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_io~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_io~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_io~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_io~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_io~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_io~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_io~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_io~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_io~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_io~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_io~~UsesGraph_edge20" class="edge">
+<g id="module~~s_io~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_io~~UsesGraph_edge21" class="edge">
+<g id="module~~s_io~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_io~~UsesGraph_edge19" class="edge">
+<g id="module~~s_io~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_io~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_io~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_io~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_io~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_io~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_io~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_io~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_io~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_io~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_io~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_io~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_io~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_io~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_io~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_io~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_io~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_io~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_io~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_kick.html b/docs/module/s_kick.html
index 290e71779..036cf0743 100644
--- a/docs/module/s_kick.html
+++ b/docs/module/s_kick.html
@@ -134,7 +134,7 @@ <h1>s_kick
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.6% of total for modules and submodules.">99 statements</a>
+    title=" 0.7% of total for modules and submodules.">109 statements</a>
      </li> 
      
      
@@ -196,6 +196,8 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_all_pl">kick_getacch_int_all_pl</a>
       
+      <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_all_tp">kick_getacch_int_all_tp</a>
+      
       <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_one_pl">kick_getacch_int_one_pl</a>
       
       <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_one_tp">kick_getacch_int_one_tp</a>
@@ -253,311 +255,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_kick~~UsesGraph Pages: 1 -->
-<svg id="modules_kickUsesGraph" width="641pt" height="278pt"
- viewBox="0.00 0.00 641.00 277.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_kick~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_kickUsesGraph" width="641pt" height="290pt"
+ viewBox="0.00 0.00 641.00 289.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_kick~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_kick~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 899,-387.05 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 899,-404.34 899,4 -4,4"/>
 <!-- module~s_kick -->
 <g id="module~~s_kick~~UsesGraph_node1" class="node">
 <title>module~s_kick</title>
-<polygon fill="none" stroke="black" points="895,-318.05 841,-318.05 841,-294.05 895,-294.05 895,-318.05"/>
-<text text-anchor="middle" x="868" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_kick</text>
+<polygon fill="none" stroke="black" points="895,-102.05 841,-102.05 841,-78.05 895,-78.05 895,-102.05"/>
+<text text-anchor="middle" x="868" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_kick</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_kick~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_kick~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_kick&#45;&gt;module~swiftest -->
 <g id="module~~s_kick~~UsesGraph_edge1" class="edge">
 <title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.25,-294.01C839.13,-281.66 816.94,-262.24 800.5,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="802.77,-245.2 792.94,-241.25 798.16,-250.47 802.77,-245.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.56,-102.13C843.49,-123.71 811.78,-169.11 793.27,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.4,-193.62 787.54,-203.82 796.14,-197.63 790.4,-193.62"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_kick~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_kick~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_kick&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_kick~~UsesGraph_edge2" class="edge">
 <title>module~s_kick&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M849.49,-318.08C816.21,-339.73 740.85,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-81.49C803.62,-70.01 732.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_kick~~UsesGraph_edge10" class="edge">
+<g id="module~~s_kick~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_kick~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_kick~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_kick~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_kick~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_kick~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_kick~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_kick~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_kick~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_kick~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_kick~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_kick~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_kick~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_kick~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_kick~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_kick~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_kick~~UsesGraph_edge6" class="edge">
+<g id="module~~s_kick~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_kick~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_kick~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_kick~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_kick~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_kick~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_kick~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_kick~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_kick~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_kick~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_kick~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_kick~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_kick~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_kick~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_kick~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_kick~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_kick~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_kick~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_kick~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_kick~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_kick~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_kick~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_kick~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_kick~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_kick~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_kick~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_kick~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_kick~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_kick~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_kick~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_kick~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_kick~~UsesGraph_edge20" class="edge">
+<g id="module~~s_kick~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_kick~~UsesGraph_edge21" class="edge">
+<g id="module~~s_kick~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_kick~~UsesGraph_edge19" class="edge">
+<g id="module~~s_kick~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_kick~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_kick~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_kick~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_kick~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_kick~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_kick~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_kick~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_kick~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_kick~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_kick~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_kick~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_kick~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_kick~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_kick~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_kick~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_kick~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_kick~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
@@ -661,6 +657,8 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_all_pl">kick_getacch_int_all_pl</a>
       
+      <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_all_tp">kick_getacch_int_all_tp</a>
+      
       <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_one_pl">kick_getacch_int_one_pl</a>
       
       <a class="list-group-item" href="../module/s_kick.html#proc-kick_getacch_int_one_tp">kick_getacch_int_one_tp</a>
@@ -759,7 +757,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td></td>
+  <td><strong>self</strong></td><td><p>Swiftest massive body object</p></td>
   
 </tr>
 
@@ -777,7 +775,7 @@ <h4>Arguments</h4>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-kick_getacch_int_tp"></span><h3>
-pure module subroutine <a href='../proc/kick_getacch_int_tp.html'>kick_getacch_int_tp</a>(self, GMpl, xhp, npl)
+module subroutine <a href='../proc/kick_getacch_int_tp.html'>kick_getacch_int_tp</a>(self, GMpl, xhp, npl)
     
     
    <a href='../interface/kick_getacch_int_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -830,7 +828,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest test particle</p></td>
+  <td><strong>self</strong></td><td><p>Swiftest test particle object</p></td>
   
 </tr>
 
@@ -1029,6 +1027,167 @@ <h4>Arguments</h4>
   
   
   
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(inout),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>acc</strong></td><td><p>Acceleration vector array </p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+  </div>
+  </div>
+
+        
+        
+  <div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="proc-kick_getacch_int_all_tp"></span><h3>
+module subroutine <a href='../proc/kick_getacch_int_all_tp.html'>kick_getacch_int_all_tp</a>(ntp, npl, xtp, xpl, GMpl, lmask, acc)
+    
+    
+   <a href='../interface/kick_getacch_int_all_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
+    
+   
+</h3></div>
+  <div class="panel-body">
+       
+    
+
+
+
+
+
+  <dl class="dl-horizontal">
+    
+    <dt>Author</dt><dd>David A. Minton</dd>
+    
+    
+    
+    
+    
+  </dl>
+
+
+
+<p>Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies with parallelisim</p><a href="../proc/kick_getacch_int_all_tp.html" class="pull-right"><emph>Read more&hellip;</emph></a>
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>ntp</strong></td><td><p>Number of test particles</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>npl</strong></td><td><p>Number of massive bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xtp</strong></td><td><p>Test particle position vector array</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xpl</strong></td><td><p>Massive body particle position vector array</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>GMpl</strong></td><td><p>Array of massive body G*mass</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>logical,</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>lmask</strong></td><td><p>Logical mask indicating which test particles should be computed</p></td>
+  
+</tr>
+
+  
+  
+  
+  
 <tr>
   
   <td><span class="anchor" ></span>real(kind=DP),</td>
diff --git a/docs/module/s_netcdf.html b/docs/module/s_netcdf.html
index 876c823ad..9cb53a395 100644
--- a/docs/module/s_netcdf.html
+++ b/docs/module/s_netcdf.html
@@ -134,7 +134,7 @@ <h1>s_netcdf
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 2.4% of total for modules and submodules.">391 statements</a>
+    title=" 2.5% of total for modules and submodules.">410 statements</a>
      </li> 
      
      
@@ -269,324 +269,318 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_netcdf~~UsesGraph Pages: 1 -->
-<svg id="modules_netcdfUsesGraph" width="641pt" height="285pt"
- viewBox="0.00 0.00 641.00 284.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_netcdf~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 396.94)">
+<svg id="modules_netcdfUsesGraph" width="641pt" height="301pt"
+ viewBox="0.00 0.00 641.00 300.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_netcdf~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 420)">
 <title>module~~s_netcdf~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-396.94 899,-396.94 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-420 899,-420 899,4 -4,4"/>
 <!-- module~s_netcdf -->
 <g id="module~~s_netcdf~~UsesGraph_node1" class="node">
 <title>module~s_netcdf</title>
-<polygon fill="none" stroke="black" points="895,-265.94 841,-265.94 841,-241.94 895,-241.94 895,-265.94"/>
-<text text-anchor="middle" x="868" y="-251.54" font-family="Helvetica,sans-Serif" font-size="10.50">s_netcdf</text>
+<polygon fill="none" stroke="black" points="895,-64 841,-64 841,-40 895,-40 895,-64"/>
+<text text-anchor="middle" x="868" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_netcdf</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_netcdf~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_netcdf~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-265.94 751,-265.94 751,-241.94 805,-241.94 805,-265.94"/>
-<text text-anchor="middle" x="778" y="-251.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-219 751,-219 751,-195 805,-195 805,-219"/>
+<text text-anchor="middle" x="778" y="-204.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_netcdf&#45;&gt;module~swiftest -->
 <g id="module~~s_netcdf~~UsesGraph_edge1" class="edge">
 <title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.6,-253.94C832.61,-253.94 823.69,-253.94 815.18,-253.94"/>
-<polygon fill="#000000" stroke="#000000" points="815.08,-250.44 805.08,-253.94 815.08,-257.44 815.08,-250.44"/>
-</g>
-<!-- netcdf -->
-<g id="module~~s_netcdf~~UsesGraph_node3" class="node">
-<title>netcdf</title>
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-223.94 751,-223.94 751,-199.94 805,-199.94 805,-223.94"/>
-<text text-anchor="middle" x="778" y="-209.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf</text>
-</g>
-<!-- module~s_netcdf&#45;&gt;netcdf -->
-<g id="module~~s_netcdf~~UsesGraph_edge2" class="edge">
-<title>module~s_netcdf&#45;&gt;netcdf</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.55,-241.79C832.79,-237.61 822.83,-232.86 813.48,-228.39"/>
-<polygon fill="#000000" stroke="#000000" points="814.93,-225.21 804.4,-224.06 811.91,-231.52 814.93,-225.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M860.09,-64.16C845.12,-90.53 809.52,-153.24 790.87,-186.1"/>
+<polygon fill="#000000" stroke="#000000" points="787.77,-184.47 785.87,-194.89 793.85,-187.93 787.77,-184.47"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_netcdf~~UsesGraph_node4" class="node">
+<g id="module~~s_netcdf~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node4"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-200.94 252.5,-200.94 252.5,-176.94 341.5,-176.94 341.5,-200.94"/>
-<text text-anchor="middle" x="297" y="-186.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_netcdf~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="337.5,-198 248.5,-198 248.5,-174 337.5,-174 337.5,-198"/>
+<text text-anchor="middle" x="293" y="-183.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_netcdf&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_netcdf~~UsesGraph_edge3" class="edge">
 <title>module~s_netcdf&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M854.55,-266.07C830.2,-288.83 773.54,-337.26 715,-354.94 627.78,-381.27 596.67,-383.03 510,-354.94 424.01,-327.06 346.96,-246.58 314.42,-208.88"/>
-<polygon fill="#000000" stroke="#000000" points="316.95,-206.45 307.81,-201.1 311.61,-210.98 316.95,-206.45"/>
+<path fill="none" stroke="#000000" d="M840.94,-52C803.3,-52 731.57,-52 670.5,-52 670.5,-52 670.5,-52 548.5,-52 470.93,-52 441.81,-31.58 375,-71 338.63,-92.46 314.44,-137.39 302.57,-164.3"/>
+<polygon fill="#000000" stroke="#000000" points="299.29,-163.07 298.62,-173.65 305.74,-165.8 299.29,-163.07"/>
+</g>
+<!-- netcdf -->
+<g id="module~~s_netcdf~~UsesGraph_node4" class="node">
+<title>netcdf</title>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-24 751,-24 751,0 805,0 805,-24"/>
+<text text-anchor="middle" x="778" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf</text>
+</g>
+<!-- module~s_netcdf&#45;&gt;netcdf -->
+<g id="module~~s_netcdf~~UsesGraph_edge2" class="edge">
+<title>module~s_netcdf&#45;&gt;netcdf</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.6,-40C832.34,-36.25 823.1,-32.05 814.34,-28.06"/>
+<polygon fill="#000000" stroke="#000000" points="815.63,-24.81 805.08,-23.86 812.74,-31.18 815.63,-24.81"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge11" class="edge">
+<g id="module~~s_netcdf~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-233.94C631.86,-229.64 623.29,-243.26 587,-245.94 496.55,-252.6 469.8,-267.24 383,-240.94 360.09,-234 337.11,-219.37 320.83,-207.39"/>
-<polygon fill="#000000" stroke="#000000" points="322.6,-204.34 312.52,-201.07 318.37,-209.91 322.6,-204.34"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M751.87,-219.02C730.71,-228.44 699.37,-240.79 670.5,-246"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-246C624.32,-253.96 629.64,-201.76 588,-185 520.75,-157.94 497.67,-155.1 426,-166"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_netcdf~~UsesGraph_node5" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-41.94 247,-41.94 247,-17.94 347,-17.94 347,-41.94"/>
-<text text-anchor="middle" x="297" y="-27.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node5"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="463,-258 387,-258 387,-234 463,-234 463,-258"/>
+<text text-anchor="middle" x="425" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_netcdf~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M759.69,-241.89C756.54,-239.19 753.47,-236.16 751,-232.94 697.06,-162.73 741.02,-103.81 670,-50.94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-50.94C635.64,-26.84 626.25,-19.3 587,-9.94 508.5,8.8 414.86,-3.81 355.91,-15.83"/>
-<polygon fill="#000000" stroke="#000000" points="355.1,-12.43 346.03,-17.91 356.54,-19.28 355.1,-12.43"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-246C601.51,-257.67 522.53,-254.62 473.34,-250.77"/>
+<polygon fill="#000000" stroke="#000000" points="473.57,-247.28 463.32,-249.94 472.99,-254.25 473.57,-247.28"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_netcdf~~UsesGraph_node6" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node6"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587,-42.94 510,-42.94 510,-18.94 587,-18.94 587,-42.94"/>
-<text text-anchor="middle" x="548.5" y="-28.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node6"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-416 375,-416 375,-392 475,-392 475,-416"/>
+<text text-anchor="middle" x="425" y="-401.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_netcdf~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-50.94C647.68,-36.39 620.43,-31.08 597.19,-29.54"/>
-<polygon fill="#000000" stroke="#000000" points="597.32,-26.05 587.17,-29.09 597,-33.04 597.32,-26.05"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.2,-219.16C770.54,-246.28 755.45,-311.99 715,-346 650.53,-400.2 549.5,-408.68 485.57,-407.83"/>
+<polygon fill="#000000" stroke="#000000" points="485.32,-404.32 475.25,-407.6 485.17,-411.32 485.32,-404.32"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_netcdf~~UsesGraph_node7" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472,-160.94 385,-160.94 385,-136.94 472,-136.94 472,-160.94"/>
-<text text-anchor="middle" x="428.5" y="-146.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node7"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-180 627,-180 627,-156 712,-156 712,-180"/>
+<text text-anchor="middle" x="669.5" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-233.94C630.23,-227.08 623.12,-216.93 587,-203.94 549.13,-190.31 505.96,-175.27 474.41,-164.37"/>
-<polygon fill="#000000" stroke="#000000" points="475.19,-160.94 464.6,-160.98 472.91,-167.55 475.19,-160.94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.77,-248.03C729.2,-243.41 697.77,-237.24 670,-233.94"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_netcdf~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-197.46C739.56,-193.29 725.91,-188.29 713.11,-183.6"/>
+<polygon fill="#000000" stroke="#000000" points="714.14,-180.25 703.55,-180.1 711.73,-186.83 714.14,-180.25"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_netcdf~~UsesGraph_node8" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_netcdf~~UsesGraph_node8"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="586.5,-236.94 510.5,-236.94 510.5,-212.94 586.5,-212.94 586.5,-236.94"/>
-<text text-anchor="middle" x="548.5" y="-222.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-218 511.5,-218 511.5,-194 587.5,-194 587.5,-218"/>
+<text text-anchor="middle" x="549.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge7" class="edge">
+<g id="module~~s_netcdf~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-233.94C644.69,-229.7 618.45,-227.46 596.6,-226.27"/>
-<polygon fill="#000000" stroke="#000000" points="596.74,-222.77 586.58,-225.78 596.4,-229.76 596.74,-222.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-246C636.14,-251.64 600.66,-236.52 577.14,-223.28"/>
+<polygon fill="#000000" stroke="#000000" points="578.83,-220.21 568.44,-218.16 575.28,-226.25 578.83,-220.21"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_netcdf~~UsesGraph_node9" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node9"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="466.5,-80.94 390.5,-80.94 390.5,-56.94 466.5,-56.94 466.5,-80.94"/>
-<text text-anchor="middle" x="428.5" y="-66.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node9"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="468.5,-104 381.5,-104 381.5,-80 468.5,-80 468.5,-104"/>
+<text text-anchor="middle" x="425" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_netcdf~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-50.94C660.34,-45.46 543.74,-56.79 476.46,-63.85"/>
-<polygon fill="#000000" stroke="#000000" points="476.09,-60.37 466.52,-64.9 476.83,-67.33 476.09,-60.37"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.84,-194.97C756.79,-181.31 736.94,-159.32 715,-147 640.27,-105.04 539.35,-94.46 478.67,-92.15"/>
+<polygon fill="#000000" stroke="#000000" points="478.67,-88.64 468.56,-91.82 478.44,-95.64 478.67,-88.64"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_netcdf~~UsesGraph_node10" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node10"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-160.94 123,-160.94 123,-136.94 211,-136.94 211,-160.94"/>
-<text text-anchor="middle" x="167" y="-146.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node10"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-337 624,-337 624,-313 715,-313 715,-337"/>
+<text text-anchor="middle" x="669.5" y="-322.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_netcdf~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.97,-266.1C757.05,-279.85 737.32,-301.76 715,-312.94 648.29,-346.33 624.1,-340.63 549.5,-340.94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-340.94C492.52,-344.58 484.44,-307.15 429.5,-302.94"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766,-219.18C747.67,-239.5 710.68,-280.48 688.5,-305.05"/>
+<polygon fill="#000000" stroke="#000000" points="685.7,-302.94 681.6,-312.71 690.89,-307.63 685.7,-302.94"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_netcdf~~UsesGraph_node11" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node11"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="711.5,-196.94 626.5,-196.94 626.5,-172.94 711.5,-172.94 711.5,-196.94"/>
-<text text-anchor="middle" x="669" y="-182.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node11"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-298 511,-298 511,-274 588,-274 588,-298"/>
+<text text-anchor="middle" x="549.5" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M758.36,-241.92C741.51,-231.05 716.49,-214.92 697.37,-202.59"/>
-<polygon fill="#000000" stroke="#000000" points="699.08,-199.53 688.78,-197.05 695.29,-205.41 699.08,-199.53"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_netcdf~~UsesGraph_edge11" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-246C640.53,-250.87 610.22,-261.26 587.33,-270.23"/>
+<polygon fill="#000000" stroke="#000000" points="585.98,-267 578,-273.97 588.58,-273.5 585.98,-267"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_netcdf~~UsesGraph_node12" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node12"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="474,-392.94 383,-392.94 383,-368.94 474,-368.94 474,-392.94"/>
-<text text-anchor="middle" x="428.5" y="-378.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="339,-298 247,-298 247,-274 339,-274 339,-298"/>
+<text text-anchor="middle" x="293" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_netcdf~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-340.94C516.7,-341.07 483.66,-353.43 460.4,-364.37"/>
-<polygon fill="#000000" stroke="#000000" points="458.82,-361.25 451.37,-368.78 461.89,-367.54 458.82,-361.25"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424,-326C391.22,-323.53 355.65,-311.92 330.01,-301.84"/>
+<polygon fill="#000000" stroke="#000000" points="331.28,-298.58 320.7,-298.07 328.66,-305.06 331.28,-298.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-246C624.37,-254.22 629.64,-290.24 588,-307 520.75,-334.06 498.29,-331.45 426,-326"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_netcdf~~UsesGraph_node13" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_netcdf~~UsesGraph_node13"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-303.94 623,-303.94 623,-279.94 715,-279.94 715,-303.94"/>
-<text text-anchor="middle" x="669" y="-289.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_netcdf~~UsesGraph_node13"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-258 123,-258 123,-234 211,-234 211,-258"/>
+<text text-anchor="middle" x="167" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_netcdf~~UsesGraph_edge13" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.82,-263.23C739.58,-267.23 726.14,-272 713.48,-276.5"/>
-<polygon fill="#000000" stroke="#000000" points="712.25,-273.22 704,-279.86 714.59,-279.82 712.25,-273.22"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424,-326C366.27,-323.74 346.93,-349.16 294,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292,-326C272.11,-317.3 265.75,-317.95 247,-307 226.17,-294.84 204.63,-277.86 189.31,-264.91"/>
+<polygon fill="#000000" stroke="#000000" points="191.36,-262.04 181.49,-258.18 186.79,-267.35 191.36,-262.04"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_netcdf~~UsesGraph_edge14" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-176.94C244.68,-172.9 230.09,-168.34 216.5,-164.1"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.71 206.82,-161.07 215.32,-167.39 217.41,-160.71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.91,-198.14C248.25,-207.17 222.58,-219.59 202.07,-229.51"/>
+<polygon fill="#000000" stroke="#000000" points="200.53,-226.37 193.06,-233.88 203.58,-232.67 200.53,-226.37"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_netcdf~~UsesGraph_edge16" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.69,-233.86C378.05,-224.79 350.98,-212.3 329.43,-202.35"/>
+<polygon fill="#000000" stroke="#000000" points="330.81,-199.14 320.27,-198.12 327.88,-205.49 330.81,-199.14"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_netcdf~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.22C260.44,-63 215.05,-105.2 188.53,-129.85"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.52 180.95,-136.9 190.66,-132.65 185.89,-127.52"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.74,-246C360.75,-246 325.26,-246 294,-246"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_netcdf~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.16,-42.96C499.41,-46.43 487.53,-50.25 476.28,-53.87"/>
-<polygon fill="#000000" stroke="#000000" points="475.04,-50.6 466.59,-56.99 477.18,-57.26 475.04,-50.6"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_netcdf~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-108.94C267.37,-115.48 235.89,-125.29 211.3,-133.55"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.33 201.56,-136.87 212.16,-136.96 209.9,-130.33"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M509.99,-29.41C475.8,-29.27 424.47,-32.2 383,-47.94 339.53,-64.44 343.33,-98.58 298,-108.94"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.35,-391.96C392.24,-387.69 383.15,-382.77 375,-378 338.07,-356.4 332.97,-343.65 294,-326"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_netcdf~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M388.65,-160.94C375.58,-164.98 360.82,-169.53 347.07,-173.78"/>
-<polygon fill="#000000" stroke="#000000" points="345.8,-170.51 337.27,-176.81 347.86,-177.2 345.8,-170.51"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424,-166C398.93,-169.81 371.14,-174.08 347.71,-177.69"/>
+<polygon fill="#000000" stroke="#000000" points="346.97,-174.27 337.62,-179.25 348.04,-181.18 346.97,-174.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-128C492.2,-119.1 482.36,-157.43 426,-166"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_netcdf~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-180.02C620.41,-183.49 608.53,-187.31 597.28,-190.94"/>
+<polygon fill="#000000" stroke="#000000" points="596.04,-187.66 587.59,-194.05 598.18,-194.32 596.04,-187.66"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_netcdf~~UsesGraph_edge21" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-155.91C618.02,-146.1 582.76,-133.1 550.5,-128"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-128C521.2,-123.68 491.43,-115.03 468.08,-107.29"/>
+<polygon fill="#000000" stroke="#000000" points="469.08,-103.94 458.49,-104.04 466.84,-110.57 469.08,-103.94"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_netcdf~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.87,-136.7C383.92,-121.82 338.14,-99.76 298,-108.94"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.52,-155.9C609.97,-110.37 436.55,45.09 294,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292,-14C206.91,-49.28 178.93,-172.98 170.88,-223.88"/>
+<polygon fill="#000000" stroke="#000000" points="167.41,-223.44 169.42,-233.84 174.34,-224.45 167.41,-223.44"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge21" class="edge">
+<g id="module~~s_netcdf~~UsesGraph_edge24" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.24,-224.37C486.99,-224.31 456.46,-224.77 429.5,-226.94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-226.94C393.33,-229.68 355.92,-216.88 330.13,-205.4"/>
-<polygon fill="#000000" stroke="#000000" points="331.39,-202.13 320.85,-201.1 328.45,-208.48 331.39,-202.13"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424,-206C398.76,-206.95 371.05,-203.35 347.73,-198.95"/>
+<polygon fill="#000000" stroke="#000000" points="348.18,-195.47 337.69,-196.95 346.81,-202.33 348.18,-195.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.5,-205.27C487.19,-204.97 454.69,-204.91 426,-206"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge22" class="edge">
+<g id="module~~s_netcdf~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M538.24,-212.7C517.99,-185.93 469.6,-121.96 444.77,-89.13"/>
-<polygon fill="#000000" stroke="#000000" points="447.54,-86.99 438.72,-81.12 441.96,-91.21 447.54,-86.99"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.75,-218C499.5,-222 485.7,-226.51 472.8,-230.72"/>
+<polygon fill="#000000" stroke="#000000" points="471.57,-227.44 463.15,-233.87 473.74,-234.09 471.57,-227.44"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_netcdf~~UsesGraph_edge20" class="edge">
+<g id="module~~s_netcdf~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-226.94C360.98,-232.28 358.45,-331.21 298,-302.94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-302.94C236.99,-275.34 195.79,-205.64 177.94,-170.25"/>
-<polygon fill="#000000" stroke="#000000" points="181.07,-168.69 173.53,-161.24 174.78,-171.76 181.07,-168.69"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292,-246C268.77,-246 243.09,-246 221.16,-246"/>
+<polygon fill="#000000" stroke="#000000" points="221.04,-242.5 211.04,-246 221.04,-249.5 221.04,-242.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424,-206C363.59,-208.28 354.45,-246 294,-246"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge24" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.13,-81.33C391.52,-102.28 345.6,-144.83 318.77,-169.69"/>
-<polygon fill="#000000" stroke="#000000" points="316.06,-167.43 311.11,-176.79 320.82,-172.56 316.06,-167.43"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_netcdf~~UsesGraph_edge26" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.27,-104.1C384.84,-120.31 344.85,-149.23 318.89,-168"/>
+<polygon fill="#000000" stroke="#000000" points="316.72,-165.25 310.66,-173.95 320.82,-170.93 316.72,-165.25"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_netcdf~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.52,-80.96C367.62,-89.76 330.92,-101.41 298,-108.94"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_netcdf~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.34,-79.94C395.14,-53.38 342.87,6.26 294,-14"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_netcdf~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.93,-336.51C551.14,-352.88 403.86,-375.77 294,-326"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_netcdf~~UsesGraph_edge29" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.75,-274C499.5,-270 485.7,-265.49 472.8,-261.28"/>
+<polygon fill="#000000" stroke="#000000" points="473.74,-257.91 463.15,-258.13 471.57,-264.56 473.74,-257.91"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_netcdf~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.7,-283.44C475.4,-280.68 421.35,-275.5 375,-267 338.42,-260.29 331.19,-246 294,-246"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_netcdf~~UsesGraph_edge30" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.8,-274C242.4,-270 228.43,-265.49 215.37,-261.28"/>
+<polygon fill="#000000" stroke="#000000" points="216.2,-257.87 205.61,-258.13 214.05,-264.53 216.2,-257.87"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_netcdf~~UsesGraph_node14" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_netcdf~~UsesGraph_node14"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-160.94 0,-160.94 0,-136.94 87,-136.94 87,-160.94"/>
-<text text-anchor="middle" x="43.5" y="-146.54" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-258 0,-258 0,-234 87,-234 87,-258"/>
+<text text-anchor="middle" x="43.5" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_netcdf~~UsesGraph_edge25" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-148.94C114.58,-148.94 105.86,-148.94 97.36,-148.94"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.44 87.13,-148.94 97.13,-152.44 97.13,-145.44"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge30" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.28,-185.39C558.86,-186.12 426.03,-187.55 351.66,-188.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.53,-184.86 341.57,-188.47 351.61,-191.86 351.53,-184.86"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M658.7,-172.85C638.45,-146.54 590.19,-83.81 565.16,-51.28"/>
-<polygon fill="#000000" stroke="#000000" points="567.63,-48.76 558.76,-42.97 562.08,-53.03 567.63,-48.76"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-108.94C531.45,-105.7 493.12,-120.28 464.47,-132.74"/>
-<polygon fill="#000000" stroke="#000000" points="462.9,-129.61 455.17,-136.85 465.73,-136.01 462.9,-129.61"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_netcdf~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.45,-196.94C620.72,-200.9 607.51,-205.36 595.14,-209.53"/>
-<polygon fill="#000000" stroke="#000000" points="593.79,-206.29 585.44,-212.81 596.03,-212.92 593.79,-206.29"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_netcdf~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-108.94C438.79,-87.04 406.35,-85.34 298,-108.94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.54,-172.71C635.35,-153.95 593.29,-119.17 549.5,-108.94"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_netcdf~~UsesGraph_edge31" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.62,-368.86C399.15,-364.5 390.68,-359.53 383,-354.94 344.99,-332.21 338.12,-321.7 298,-302.94"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_netcdf~~UsesGraph_edge32" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-302.94C370.12,-298.42 350.14,-327.32 298,-302.94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.67,-297.38C574.65,-302.36 496.65,-308.22 429.5,-302.94"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-246C114.58,-246 105.86,-246 97.36,-246"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-242.5 87.13,-246 97.13,-249.5 97.13,-242.5"/>
 </g>
 </g>
 </svg>
@@ -938,6 +932,7 @@ <h4>Arguments</h4>
 
 
 <p>Initialize a NetCDF file system and defines all variables.
+ Create the new output file, deleting any previously existing output file of the same name
  Define the variables</p>
     
     <h4>Arguments</h4>
diff --git a/docs/module/s_obl.html b/docs/module/s_obl.html
index af707a387..2c323980b 100644
--- a/docs/module/s_obl.html
+++ b/docs/module/s_obl.html
@@ -263,311 +263,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_obl~~UsesGraph Pages: 1 -->
-<svg id="modules_oblUsesGraph" width="641pt" height="278pt"
- viewBox="0.00 0.00 641.00 277.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_obl~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_oblUsesGraph" width="641pt" height="290pt"
+ viewBox="0.00 0.00 641.00 289.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_obl~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_obl~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 899,-387.05 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 899,-404.34 899,4 -4,4"/>
 <!-- module~s_obl -->
 <g id="module~~s_obl~~UsesGraph_node1" class="node">
 <title>module~s_obl</title>
-<polygon fill="none" stroke="black" points="895,-318.05 841,-318.05 841,-294.05 895,-294.05 895,-318.05"/>
-<text text-anchor="middle" x="868" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_obl</text>
+<polygon fill="none" stroke="black" points="895,-102.05 841,-102.05 841,-78.05 895,-78.05 895,-102.05"/>
+<text text-anchor="middle" x="868" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_obl</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_obl~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_obl~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_obl&#45;&gt;module~swiftest -->
 <g id="module~~s_obl~~UsesGraph_edge1" class="edge">
 <title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.25,-294.01C839.13,-281.66 816.94,-262.24 800.5,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="802.77,-245.2 792.94,-241.25 798.16,-250.47 802.77,-245.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.56,-102.13C843.49,-123.71 811.78,-169.11 793.27,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.4,-193.62 787.54,-203.82 796.14,-197.63 790.4,-193.62"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_obl~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_obl~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_obl&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_obl~~UsesGraph_edge2" class="edge">
 <title>module~s_obl&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M849.49,-318.08C816.21,-339.73 740.85,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-81.49C803.62,-70.01 732.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_obl~~UsesGraph_edge10" class="edge">
+<g id="module~~s_obl~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_obl~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_obl~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_obl~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_obl~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_obl~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_obl~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_obl~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_obl~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_obl~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_obl~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_obl~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_obl~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_obl~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_obl~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_obl~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_obl~~UsesGraph_edge6" class="edge">
+<g id="module~~s_obl~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_obl~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_obl~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_obl~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_obl~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_obl~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_obl~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_obl~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_obl~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_obl~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_obl~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_obl~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_obl~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_obl~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_obl~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_obl~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_obl~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_obl~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_obl~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_obl~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_obl~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_obl~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_obl~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_obl~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_obl~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_obl~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_obl~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_obl~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_obl~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_obl~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_obl~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_obl~~UsesGraph_edge20" class="edge">
+<g id="module~~s_obl~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_obl~~UsesGraph_edge21" class="edge">
+<g id="module~~s_obl~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_obl~~UsesGraph_edge19" class="edge">
+<g id="module~~s_obl~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_obl~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_obl~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_obl~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_obl~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_obl~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_obl~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_obl~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_obl~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_obl~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_obl~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_obl~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_obl~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_obl~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_obl~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_obl~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_obl~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_obl~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_obl~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_operator_cross.html b/docs/module/s_operator_cross.html
index 09362889e..9184a37f5 100644
--- a/docs/module/s_operator_cross.html
+++ b/docs/module/s_operator_cross.html
@@ -275,311 +275,307 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_operator_cross~~UsesGraph Pages: 1 -->
-<svg id="modules_operator_crossUsesGraph" width="641pt" height="223pt"
- viewBox="0.00 0.00 641.00 222.68" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_operator_cross~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 324.3)">
+<svg id="modules_operator_crossUsesGraph" width="641pt" height="245pt"
+ viewBox="0.00 0.00 641.00 245.02" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_operator_cross~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 357.22)">
 <title>module~~s_operator_cross~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-324.3 941,-324.3 941,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-357.22 941,-357.22 941,4 -4,4"/>
 <!-- module~s_operator_cross -->
 <g id="module~~s_operator_cross~~UsesGraph_node1" class="node">
 <title>module~s_operator_cross</title>
-<polygon fill="none" stroke="black" points="937,-244 841,-244 841,-220 937,-220 937,-244"/>
-<text text-anchor="middle" x="889" y="-229.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_operator_cross</text>
-</g>
-<!-- module~swiftest_operators -->
-<g id="module~~s_operator_cross~~UsesGraph_node2" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node2"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-264 615,-264 615,-240 715,-240 715,-264"/>
-<text text-anchor="middle" x="665" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
-</a>
-</g>
-</g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_operator_cross~~UsesGraph_edge2" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" d="M840.92,-236.24C807.33,-239.27 761.88,-243.36 725.73,-246.62"/>
-<polygon fill="#000000" stroke="#000000" points="724.97,-243.17 715.32,-247.56 725.59,-250.15 724.97,-243.17"/>
+<polygon fill="none" stroke="black" points="937,-202 841,-202 841,-178 937,-178 937,-202"/>
+<text text-anchor="middle" x="889" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_operator_cross</text>
 </g>
 <!-- module~swiftest -->
-<g id="module~~s_operator_cross~~UsesGraph_node3" class="node">
+<g id="module~~s_operator_cross~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node3"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-224 751,-224 751,-200 805,-200 805,-224"/>
-<text text-anchor="middle" x="778" y="-209.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~s_operator_cross~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-182 751,-182 751,-158 805,-158 805,-182"/>
+<text text-anchor="middle" x="778" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_operator_cross&#45;&gt;module~swiftest -->
 <g id="module~~s_operator_cross~~UsesGraph_edge1" class="edge">
 <title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.82,-223.34C832.25,-221.77 823.43,-220.15 815.23,-218.65"/>
-<polygon fill="#000000" stroke="#000000" points="815.71,-215.18 805.24,-216.81 814.44,-222.06 815.71,-215.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.82,-181.34C832.25,-179.77 823.43,-178.15 815.23,-176.65"/>
+<polygon fill="#000000" stroke="#000000" points="815.71,-173.18 805.24,-174.81 814.44,-180.06 815.71,-173.18"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-224 123,-224 123,-200 211,-200 211,-224"/>
-<text text-anchor="middle" x="167" y="-209.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~swiftest_operators -->
+<g id="module~~s_operator_cross~~UsesGraph_node3" class="node">
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node3"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-222 615,-222 615,-198 715,-198 715,-222"/>
+<text text-anchor="middle" x="665" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge3" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.42,-264.07C566.96,-292.54 380.87,-356.79 247,-292 219.24,-278.57 195.66,-251.25 181.67,-232.3"/>
-<polygon fill="#000000" stroke="#000000" points="184.42,-230.12 175.76,-224.01 178.72,-234.18 184.42,-230.12"/>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_operator_cross~~UsesGraph_edge2" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" d="M840.92,-194.24C807.33,-197.27 761.88,-201.36 725.73,-204.62"/>
+<polygon fill="#000000" stroke="#000000" points="724.97,-201.17 715.32,-205.56 725.59,-208.15 724.97,-201.17"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_operator_cross~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.98,-221.38C738.48,-225.88 723.18,-231.4 709.02,-236.5"/>
-<polygon fill="#000000" stroke="#000000" points="707.67,-233.26 699.44,-239.95 710.04,-239.85 707.67,-233.26"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.98,-179.38C738.48,-183.88 723.18,-189.4 709.02,-194.5"/>
+<polygon fill="#000000" stroke="#000000" points="707.67,-191.26 699.44,-197.95 710.04,-197.85 707.67,-191.26"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~whm_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_node4" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node4"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="579,-24 502,-24 502,0 579,0 579,-24"/>
-<text text-anchor="middle" x="540.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="458,-180 382,-180 382,-156 458,-156 458,-180"/>
+<text text-anchor="middle" x="420" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.03,-199.74C762.03,-168.12 727.84,-84.03 666,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-52C640.36,-39.75 612.23,-30.25 588.89,-23.58"/>
-<polygon fill="#000000" stroke="#000000" points="589.78,-20.2 579.21,-20.9 587.91,-26.95 589.78,-20.2"/>
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<g id="module~~s_operator_cross~~UsesGraph_edge3" class="edge">
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-170C596.03,-172.07 517.33,-170.74 468.35,-169.47"/>
+<polygon fill="#000000" stroke="#000000" points="468.15,-165.97 458.06,-169.2 467.96,-172.96 468.15,-165.97"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="463.5,-184 376.5,-184 376.5,-160 463.5,-160 463.5,-184"/>
-<text text-anchor="middle" x="420" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="707.5,-142 622.5,-142 622.5,-118 707.5,-118 707.5,-142"/>
+<text text-anchor="middle" x="665" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-249C499.85,-251.95 499.58,-219.3 466,-198 461.33,-195.04 456.32,-192.01 451.4,-189.11"/>
-<polygon fill="#000000" stroke="#000000" points="453.14,-186.07 442.73,-184.07 449.62,-192.12 453.14,-186.07"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-212C607.13,-211.43 598.22,-244.77 541.5,-249"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.98,-160.62C738.48,-156.12 723.18,-150.6 709.02,-145.5"/>
+<polygon fill="#000000" stroke="#000000" points="710.04,-142.15 699.44,-142.05 707.67,-148.74 710.04,-142.15"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_operator_cross~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="578.5,-104 502.5,-104 502.5,-80 578.5,-80 578.5,-104"/>
-<text text-anchor="middle" x="540.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="578.5,-142 502.5,-142 502.5,-118 578.5,-118 578.5,-142"/>
+<text text-anchor="middle" x="540.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge7" class="edge">
+<g id="module~~s_operator_cross~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-52C648.2,-43.82 604.75,-61.24 574.1,-75.61"/>
-<polygon fill="#000000" stroke="#000000" points="572.56,-72.47 565.05,-79.94 575.58,-78.79 572.56,-72.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-170C631.62,-170.99 596.69,-158.06 572.44,-146.65"/>
+<polygon fill="#000000" stroke="#000000" points="573.9,-143.47 563.38,-142.22 570.83,-149.76 573.9,-143.47"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="458,-66 382,-66 382,-42 458,-42 458,-66"/>
-<text text-anchor="middle" x="420" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="463.5,-24 376.5,-24 376.5,0 463.5,0 463.5,-24"/>
+<text text-anchor="middle" x="420" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-52C631.15,-34.99 529.29,-42.22 468.37,-48.46"/>
-<polygon fill="#000000" stroke="#000000" points="467.81,-45 458.23,-49.53 468.54,-51.97 467.81,-45"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-249C505.92,-250.89 499.12,-236.85 466,-231 390.05,-217.58 370.63,-212 293.5,-212"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_operator_cross~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.49,-157.67C754.84,-144.51 735.02,-123.57 715,-109 659.87,-68.87 643.68,-59.59 579,-38 545,-26.65 505.18,-20.14 474.01,-16.47"/>
+<polygon fill="#000000" stroke="#000000" points="474.12,-12.96 463.8,-15.33 473.35,-19.92 474.12,-12.96"/>
 </g>
-<!-- module~symba_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="707.5,-144 622.5,-144 622.5,-120 707.5,-120 707.5,-144"/>
-<text text-anchor="middle" x="665" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<!-- module~lambda_function -->
+<g id="module~~s_operator_cross~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="338,-300 247,-300 247,-276 338,-276 338,-300"/>
+<text text-anchor="middle" x="292.5" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.14,-199.85C741.7,-186.56 711.95,-165.12 690.84,-149.9"/>
-<polygon fill="#000000" stroke="#000000" points="692.81,-147.01 682.65,-144 688.72,-152.69 692.81,-147.01"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_operator_cross~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-288C396.04,-284.48 370.43,-283.9 348.37,-284.41"/>
+<polygon fill="#000000" stroke="#000000" points="348.07,-280.91 338.18,-284.73 348.29,-287.91 348.07,-280.91"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_node10" class="node">
+<g id="module~~s_operator_cross~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="337,-165 248,-165 248,-141 337,-141 337,-165"/>
-<text text-anchor="middle" x="292.5" y="-150.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_operator_cross~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="337,-103 248,-103 248,-79 337,-79 337,-103"/>
+<text text-anchor="middle" x="292.5" y="-88.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge11" class="edge">
+<g id="module~~s_operator_cross~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-212C607.15,-211.43 477.65,-127.21 421,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.98,-212.21C728.49,-212.34 695.1,-212.41 666,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.98,-169.55C728.48,-169.27 695.09,-169.11 666,-170"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-170C640.65,-170.71 634.06,-164.5 615,-151 594.93,-136.79 601,-119.97 579,-109 505.16,-72.18 406.92,-75.57 347.04,-82.49"/>
+<polygon fill="#000000" stroke="#000000" points="346.55,-79.02 337.05,-83.71 347.4,-85.97 346.55,-79.02"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_operator_cross~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="338,-283 247,-283 247,-259 338,-259 338,-283"/>
-<text text-anchor="middle" x="292.5" y="-268.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_operator_cross~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="579,-222 502,-222 502,-198 579,-198 579,-222"/>
+<text text-anchor="middle" x="540.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_operator_cross~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-249C505.23,-251.55 499.94,-267.6 466,-273 425.62,-279.43 414.89,-273.51 374,-273 365.66,-272.9 356.84,-272.73 348.21,-272.54"/>
-<polygon fill="#000000" stroke="#000000" points="348.28,-269.04 338.21,-272.31 348.12,-276.04 348.28,-269.04"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_operator_cross~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-170C632.55,-170.96 598.69,-182.93 574.56,-193.53"/>
+<polygon fill="#000000" stroke="#000000" points="572.82,-190.48 565.17,-197.8 575.72,-196.85 572.82,-190.48"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_node12" class="node">
+<g id="module~~s_operator_cross~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="466,-264 374,-264 374,-240 466,-240 466,-264"/>
-<text text-anchor="middle" x="420" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_operator_cross~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="466,-260 374,-260 374,-236 466,-236 466,-260"/>
+<text text-anchor="middle" x="420" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge13" class="edge">
+<g id="module~~s_operator_cross~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-249C518.88,-250.54 496.19,-251.33 476.23,-251.72"/>
-<polygon fill="#000000" stroke="#000000" points="476.01,-248.23 466.07,-251.9 476.13,-255.23 476.01,-248.23"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-288C523.55,-292.88 484.07,-277.5 455.04,-264.41"/>
+<polygon fill="#000000" stroke="#000000" points="456.19,-261.09 445.65,-260.1 453.27,-267.45 456.19,-261.09"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-170C640.65,-170.71 633.58,-174.85 615,-189 571.41,-222.21 593.9,-271.96 541.5,-288"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M505.54,-24.04C492.77,-28.56 478.08,-33.77 464.56,-38.56"/>
-<polygon fill="#000000" stroke="#000000" points="463.22,-35.32 454.96,-41.96 465.56,-41.92 463.22,-35.32"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_operator_cross~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-220 123,-220 123,-196 211,-196 211,-220"/>
+<text text-anchor="middle" x="167" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge14" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.5,-74C239.94,-101.78 199.23,-159.9 180.03,-191.11"/>
-<polygon fill="#000000" stroke="#000000" points="176.92,-189.5 174.77,-199.87 182.92,-193.1 176.92,-189.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M501.92,-13.09C467.86,-14.94 416.63,-19.88 374,-33 335.63,-44.81 328.85,-54.96 293.5,-74"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.5,-212C268.46,-212 242.99,-212 221.2,-212"/>
-<polygon fill="#000000" stroke="#000000" points="221.15,-208.5 211.15,-212 221.15,-215.5 221.15,-208.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.1,-184C371.46,-195.78 330.78,-212 293.5,-212"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_operator_cross~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-288C397.54,-284.71 392.8,-279.86 374,-269 335.13,-246.54 338.39,-208 293.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-288C489.14,-303.42 473.06,-295.97 421,-288"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.16,-165.51C366.89,-164.11 356.96,-162.61 347.33,-161.15"/>
-<polygon fill="#000000" stroke="#000000" points="347.84,-157.69 337.43,-159.65 346.79,-164.61 347.84,-157.69"/>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_operator_cross~~UsesGraph_edge13" class="edge">
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M657.27,-222.11C644.91,-242.95 616.41,-284.98 579,-302 444.66,-363.12 379.67,-373.66 247,-309 213.23,-292.54 189.65,-253.89 177.51,-229.46"/>
+<polygon fill="#000000" stroke="#000000" points="180.59,-227.8 173.14,-220.27 174.27,-230.8 180.59,-227.8"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M502.33,-80.08C491.41,-76.58 479.32,-72.7 467.88,-69.03"/>
-<polygon fill="#000000" stroke="#000000" points="468.63,-65.6 458.04,-65.88 466.49,-72.26 468.63,-65.6"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_operator_cross~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.38,-155.75C389.93,-151.46 381.56,-146.58 374,-142 356.13,-131.19 336.32,-118.64 320.81,-108.69"/>
+<polygon fill="#000000" stroke="#000000" points="322.54,-105.64 312.23,-103.17 318.75,-111.53 322.54,-105.64"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_operator_cross~~UsesGraph_edge14" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.1,-180C371.46,-191.78 330.78,-208 293.5,-208"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M502.45,-95.81C478.98,-97.44 448.05,-98.14 421,-94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-94C363.17,-85.45 343.22,-47.21 293.5,-74"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.19,-130C611.47,-130 599.87,-130 588.9,-130"/>
+<polygon fill="#000000" stroke="#000000" points="588.62,-126.5 578.62,-130 588.62,-133.5 588.62,-126.5"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-132C395.23,-134.01 369.19,-138.06 347.02,-142.07"/>
-<polygon fill="#000000" stroke="#000000" points="346.32,-138.64 337.13,-143.9 347.6,-145.52 346.32,-138.64"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.28,-104.03C491.84,-114.73 454.97,-129.13 421,-132"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-52C516.34,-43.23 490.3,-34.34 468.55,-27.17"/>
+<polygon fill="#000000" stroke="#000000" points="469.47,-23.79 458.87,-24 467.29,-30.44 469.47,-23.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M649.24,-117.71C627.26,-100.11 583.94,-68.08 541.5,-52"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_operator_cross~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-52C387.86,-54.31 354.16,-65.29 329.52,-75.02"/>
+<polygon fill="#000000" stroke="#000000" points="328.17,-71.79 320.22,-78.8 330.8,-78.27 328.17,-71.79"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_operator_cross~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-52C363.37,-56.12 341.85,-23.18 293.5,-51"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-52C490.25,-33.34 473.52,-48.11 421,-52"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.8,-53.57C355.68,-54.74 320.69,-59.35 293.5,-74"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M502.33,-141.92C491.41,-145.42 479.32,-149.3 467.88,-152.97"/>
+<polygon fill="#000000" stroke="#000000" points="466.49,-149.74 458.04,-156.12 468.63,-156.4 466.49,-149.74"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M403.61,-66.14C381.97,-83.21 342.36,-114.45 317.02,-134.45"/>
-<polygon fill="#000000" stroke="#000000" points="314.7,-131.82 309.01,-140.76 319.03,-137.32 314.7,-131.82"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-128C386.41,-130.46 350.8,-118.46 325.87,-107.48"/>
+<polygon fill="#000000" stroke="#000000" points="327.08,-104.19 316.54,-103.2 324.17,-110.55 327.08,-104.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M502.35,-127.62C478.97,-126.56 448.19,-125.95 421,-128"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_operator_cross~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_operator_cross~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-224 0,-224 0,-200 87,-200 87,-224"/>
-<text text-anchor="middle" x="43.5" y="-209.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_operator_cross~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.5,-208C268.46,-208 242.99,-208 221.2,-208"/>
+<polygon fill="#000000" stroke="#000000" points="221.15,-204.5 211.15,-208 221.15,-211.5 221.15,-204.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419,-128C397.35,-129.63 392.8,-136.14 374,-147 335.13,-169.46 338.39,-208 293.5,-208"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_operator_cross~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.71,-24.18C389.36,-28.38 381.23,-33.23 374,-38 357.31,-49.02 354.66,-53.94 338,-65 333.64,-67.9 328.95,-70.83 324.3,-73.62"/>
+<polygon fill="#000000" stroke="#000000" points="322.37,-70.7 315.53,-78.79 325.93,-76.73 322.37,-70.7"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_operator_cross~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-212C114.58,-212 105.86,-212 97.36,-212"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-208.5 87.13,-212 97.13,-215.5 97.13,-208.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_operator_cross~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M651.35,-119.61C629.97,-98.66 586.53,-56.11 561.15,-31.25"/>
-<polygon fill="#000000" stroke="#000000" points="563.49,-28.64 553.9,-24.14 558.59,-33.64 563.49,-28.64"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.5,-51C272.86,-61.73 263.07,-55.7 247,-70 210.29,-102.67 186.43,-156.63 175.31,-186.48"/>
+<polygon fill="#000000" stroke="#000000" points="171.99,-185.36 171.9,-195.95 178.58,-187.73 171.99,-185.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.4,-20.29C351.17,-26.38 319.21,-36.21 293.5,-51"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_operator_cross~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.5,-138.84C608.66,-141.12 593.17,-143.67 579,-146 543.88,-151.78 504.37,-158.28 473.65,-163.34"/>
-<polygon fill="#000000" stroke="#000000" points="472.88,-159.92 463.58,-164.99 474.02,-166.82 472.88,-159.92"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.74,-275.85C252.04,-262.44 218.54,-240.74 195.01,-225.5"/>
+<polygon fill="#000000" stroke="#000000" points="196.82,-222.5 186.53,-220 193.02,-228.38 196.82,-222.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_operator_cross~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M627.25,-120C615,-116 601.2,-111.49 588.3,-107.28"/>
-<polygon fill="#000000" stroke="#000000" points="589.24,-103.91 578.65,-104.13 587.07,-110.56 589.24,-103.91"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-132C484.36,-127.68 475.67,-102.37 421,-94"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.26,-133.61C598.55,-134.13 568.32,-134.1 541.5,-132"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.75,-103.08C257.3,-123.4 213.85,-164.57 188.21,-188.86"/>
+<polygon fill="#000000" stroke="#000000" points="185.72,-186.39 180.87,-195.81 190.53,-191.47 185.72,-186.39"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_operator_cross~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-132C486.99,-127.89 473.48,-127.56 421,-132"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.21,-165.08C247.81,-173.87 222.69,-185.87 202.45,-195.54"/>
-<polygon fill="#000000" stroke="#000000" points="200.77,-192.47 193.26,-199.93 203.79,-198.78 200.77,-192.47"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M505.54,-197.96C492.77,-193.44 478.08,-188.23 464.56,-183.44"/>
+<polygon fill="#000000" stroke="#000000" points="465.56,-180.08 454.96,-180.04 463.22,-186.68 465.56,-180.08"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.21,-258.92C247.81,-250.13 222.69,-238.13 202.45,-228.46"/>
-<polygon fill="#000000" stroke="#000000" points="203.79,-225.22 193.26,-224.07 200.77,-231.53 203.79,-225.22"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_operator_cross~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M501.99,-209.51C453.76,-208.91 367.39,-208 293.5,-208"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_operator_cross~~UsesGraph_edge31" class="edge">
+<g id="module~~s_operator_cross~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.1,-240C371.46,-228.22 330.78,-212 293.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.1,-236C371.46,-224.22 330.78,-208 293.5,-208"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_operator_cross~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_operator_cross~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-220 0,-220 0,-196 87,-196 87,-220"/>
+<text text-anchor="middle" x="43.5" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_operator_cross~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-208C114.58,-208 105.86,-208 97.36,-208"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-204.5 87.13,-208 97.13,-211.5 97.13,-204.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_orbel.html b/docs/module/s_orbel.html
index f2a408df4..8b91185c3 100644
--- a/docs/module/s_orbel.html
+++ b/docs/module/s_orbel.html
@@ -134,7 +134,7 @@ <h1>s_orbel
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 3.8% of total for modules and submodules.">611 statements</a>
+    title=" 3.7% of total for modules and submodules.">611 statements</a>
      </li> 
      
      
@@ -519,311 +519,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_orbel~~UsesGraph Pages: 1 -->
-<svg id="modules_orbelUsesGraph" width="641pt" height="278pt"
- viewBox="0.00 0.00 641.00 277.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_orbel~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_orbelUsesGraph" width="641pt" height="290pt"
+ viewBox="0.00 0.00 641.00 289.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_orbel~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_orbel~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 899,-387.05 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 899,-404.34 899,4 -4,4"/>
 <!-- module~s_orbel -->
 <g id="module~~s_orbel~~UsesGraph_node1" class="node">
 <title>module~s_orbel</title>
-<polygon fill="none" stroke="black" points="895,-318.05 841,-318.05 841,-294.05 895,-294.05 895,-318.05"/>
-<text text-anchor="middle" x="868" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_orbel</text>
+<polygon fill="none" stroke="black" points="895,-102.05 841,-102.05 841,-78.05 895,-78.05 895,-102.05"/>
+<text text-anchor="middle" x="868" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_orbel</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_orbel~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_orbel~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_orbel&#45;&gt;module~swiftest -->
 <g id="module~~s_orbel~~UsesGraph_edge1" class="edge">
 <title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.25,-294.01C839.13,-281.66 816.94,-262.24 800.5,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="802.77,-245.2 792.94,-241.25 798.16,-250.47 802.77,-245.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.56,-102.13C843.49,-123.71 811.78,-169.11 793.27,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.4,-193.62 787.54,-203.82 796.14,-197.63 790.4,-193.62"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_orbel~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_orbel~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_orbel&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_orbel~~UsesGraph_edge2" class="edge">
 <title>module~s_orbel&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M849.49,-318.08C816.21,-339.73 740.85,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-81.49C803.62,-70.01 732.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge10" class="edge">
+<g id="module~~s_orbel~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_orbel~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_orbel~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_orbel~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_orbel~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_orbel~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_orbel~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_orbel~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_orbel~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_orbel~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_orbel~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_orbel~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_orbel~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_orbel~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_orbel~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge6" class="edge">
+<g id="module~~s_orbel~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_orbel~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_orbel~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_orbel~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_orbel~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_orbel~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_orbel~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_orbel~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_orbel~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_orbel~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_orbel~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_orbel~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_orbel~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_orbel~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_orbel~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_orbel~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_orbel~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_orbel~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_orbel~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_orbel~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_orbel~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_orbel~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_orbel~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_orbel~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_orbel~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_orbel~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_orbel~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_orbel~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_orbel~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_orbel~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge20" class="edge">
+<g id="module~~s_orbel~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge21" class="edge">
+<g id="module~~s_orbel~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_orbel~~UsesGraph_edge19" class="edge">
+<g id="module~~s_orbel~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_orbel~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_orbel~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_orbel~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_orbel~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_orbel~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_orbel~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_orbel~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_orbel~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_orbel~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_orbel~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_orbel~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_orbel~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_orbel~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_orbel~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_rmvs_chk.html b/docs/module/s_rmvs_chk.html
index 87a44b205..f90e0e533 100644
--- a/docs/module/s_rmvs_chk.html
+++ b/docs/module/s_rmvs_chk.html
@@ -134,7 +134,7 @@ <h1>s_rmvs_chk
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.4% of total for modules and submodules.">62 statements</a>
+    title=" 0.4% of total for modules and submodules.">64 statements</a>
      </li> 
      
      
@@ -191,6 +191,17 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/s_rmvs_chk.html#proc-rmvs_encounter_check_tp">rmvs_encounter_check_tp</a>
       
+    </div>
+  </div>
+</div>
+
+
+
+<div class="panel panel-primary">
+  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#modsubs-0">Module Subroutines</a></h3></div>
+  <div id="modsubs-0" class="panel-collapse collapse">
+    <div class="list-group">
+      
       <a class="list-group-item" href="../module/s_rmvs_chk.html#proc-rmvs_chk_ind">rmvs_chk_ind</a>
       
     </div>
@@ -204,7 +215,6 @@ <h3>Contents</h3>
 
 
 
-
 </div>
 
     </div>
@@ -247,313 +257,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_rmvs_chk~~UsesGraph Pages: 1 -->
-<svg id="modules_rmvs_chkUsesGraph" width="641pt" height="243pt"
- viewBox="0.00 0.00 641.00 243.38" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_rmvs_chk~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 344.93)">
+<svg id="modules_rmvs_chkUsesGraph" width="641pt" height="217pt"
+ viewBox="0.00 0.00 641.00 216.76" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_rmvs_chk~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 306.77)">
 <title>module~~s_rmvs_chk~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-344.93 915,-344.93 915,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-306.77 915,-306.77 915,4 -4,4"/>
 <!-- module~s_rmvs_chk -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node1" class="node">
 <title>module~s_rmvs_chk</title>
-<polygon fill="none" stroke="black" points="911,-64 841,-64 841,-40 911,-40 911,-64"/>
-<text text-anchor="middle" x="876" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_chk</text>
+<polygon fill="none" stroke="black" points="911,-183 841,-183 841,-159 911,-159 911,-183"/>
+<text text-anchor="middle" x="876" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_chk</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_rmvs_chk~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-123 751,-123 751,-99 805,-99 805,-123"/>
-<text text-anchor="middle" x="778" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-144 751,-144 751,-120 805,-120 805,-144"/>
+<text text-anchor="middle" x="778" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge1" class="edge">
 <title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M855.11,-64.22C841.24,-72.75 822.55,-84.24 807.16,-93.7"/>
-<polygon fill="#000000" stroke="#000000" points="805.22,-90.77 798.54,-98.99 808.89,-96.74 805.22,-90.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M845.41,-158.98C835.64,-155.01 824.68,-150.56 814.51,-146.43"/>
+<polygon fill="#000000" stroke="#000000" points="815.66,-143.11 805.07,-142.59 813.02,-149.6 815.66,-143.11"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node3" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~s_rmvs_chk~~UsesGraph_node3"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-24 511,-24 511,0 588,0 588,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-264 511,-264 511,-240 588,-240 588,-264"/>
+<text text-anchor="middle" x="549.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge2" class="edge">
 <title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M840.89,-47.79C782.81,-40.64 664.6,-26.06 598.31,-17.89"/>
-<polygon fill="#000000" stroke="#000000" points="598.48,-14.39 588.13,-16.64 597.63,-21.34 598.48,-14.39"/>
+<path fill="none" stroke="#000000" d="M845.1,-183.04C813.3,-195.42 761.32,-214.47 715,-226 676.26,-235.64 631.47,-242.44 598.41,-246.67"/>
+<polygon fill="#000000" stroke="#000000" points="597.6,-243.24 588.11,-247.95 598.47,-250.19 597.6,-243.24"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge4" class="edge">
+<g id="module~~s_rmvs_chk~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.16,-98.75C741.28,-84.24 705.53,-60.91 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C642.39,-45.36 613.75,-35.71 591.22,-27.55"/>
-<polygon fill="#000000" stroke="#000000" points="592.25,-24.2 581.65,-24.04 589.84,-30.77 592.25,-24.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C644.15,-219.92 617.09,-229.06 595.03,-236.61"/>
+<polygon fill="#000000" stroke="#000000" points="593.6,-233.4 585.28,-239.96 595.87,-240.02 593.6,-233.4"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-258 247,-258 247,-234 347,-234 347,-258"/>
-<text text-anchor="middle" x="297" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-184 391,-184 391,-160 467,-160 467,-184"/>
+<text text-anchor="middle" x="429" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C404.98,-244.27 379.6,-243.92 357.42,-244.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.09,-240.63 347.14,-244.26 357.19,-247.63 357.09,-240.63"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C618.63,-228.22 602.94,-212 550.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-199.47 460.61,-188.44"/>
+<polygon fill="#000000" stroke="#000000" points="462.06,-185.26 451.54,-184 458.98,-191.54 462.06,-185.26"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-218 385.5,-218 385.5,-194 472.5,-194 472.5,-218"/>
-<text text-anchor="middle" x="429" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-205 247,-205 247,-181 347,-181 347,-205"/>
+<text text-anchor="middle" x="297" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C617.03,-227.65 604.95,-237.58 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C532.35,-248.5 494.24,-234.23 465.57,-222.06"/>
-<polygon fill="#000000" stroke="#000000" points="466.82,-218.78 456.25,-218.03 464.04,-225.21 466.82,-218.78"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C483.01,-212 408.17,-205.46 357.47,-200.06"/>
+<polygon fill="#000000" stroke="#000000" points="357.67,-196.56 347.35,-198.96 356.91,-203.52 357.67,-196.56"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-104 511.5,-104 511.5,-80 587.5,-80 587.5,-104"/>
-<text text-anchor="middle" x="549.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C635.93,-43.72 599.43,-60.22 575.76,-74.48"/>
-<polygon fill="#000000" stroke="#000000" points="573.65,-71.68 567.06,-79.97 577.38,-77.6 573.65,-71.68"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-132C742.26,-132 732.26,-132 722.32,-132"/>
+<polygon fill="#000000" stroke="#000000" points="722.05,-128.5 712.05,-132 722.05,-135.5 722.05,-128.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-100 391,-100 391,-76 467,-76 467,-100"/>
-<text text-anchor="middle" x="429" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-184 511.5,-184 511.5,-160 587.5,-160 587.5,-184"/>
+<text text-anchor="middle" x="549.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C599.73,-34.51 517.51,-55.95 469.77,-72.44"/>
-<polygon fill="#000000" stroke="#000000" points="468.38,-69.22 460.12,-75.87 470.72,-75.82 468.38,-69.22"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C636.03,-222.56 598.74,-204.89 574.92,-189.79"/>
+<polygon fill="#000000" stroke="#000000" points="576.76,-186.81 566.49,-184.19 572.89,-192.64 576.76,-186.81"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-218 123,-218 123,-194 211,-194 211,-218"/>
-<text text-anchor="middle" x="167" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C496.45,-254.04 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C367.72,-241.46 358.28,-210.54 298,-206"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.86,-122.77C739.84,-118.98 726.84,-114.63 715,-111 659.03,-93.82 645.34,-87.84 588,-76 553.15,-68.8 513.49,-63.29 482.62,-59.58"/>
+<polygon fill="#000000" stroke="#000000" points="482.85,-56.08 472.51,-58.39 482.03,-63.04 482.85,-56.08"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~lambda_function -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-123 627,-123 627,-99 712,-99 712,-123"/>
-<text text-anchor="middle" x="669.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-111C742.26,-111 732.26,-111 722.32,-111"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-107.5 712.05,-111 722.05,-114.5 722.05,-107.5"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.24,-119.75C761.72,-100.47 741.12,-62.74 715,-38 711.86,-35.02 708.31,-32.24 704.63,-29.69"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-26.57 695.92,-24.17 702.49,-32.48 706.24,-26.57"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node10" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_rmvs_chk~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-178 252.5,-178 252.5,-154 341.5,-154 341.5,-178"/>
-<text text-anchor="middle" x="297" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-105 252.5,-105 252.5,-81 341.5,-81 341.5,-105"/>
+<text text-anchor="middle" x="297" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge10" class="edge">
+<g id="module~~s_rmvs_chk~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C567.95,-246.39 536.58,-150.97 430,-166"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.09,-123.22C751.61,-144.75 714.03,-188.95 670.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.07,-144.3C748.28,-163.27 710.97,-198.84 670.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.81,-225.88 627.45,-172.42 588,-151 522.39,-115.38 504.49,-98.9 430,-94"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-299 624,-299 624,-275 715,-275 715,-299"/>
-<text text-anchor="middle" x="669.5" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-264 383,-264 383,-240 475,-240 475,-264"/>
+<text text-anchor="middle" x="429" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M770.65,-123.2C759.8,-143.86 736.75,-186.92 715,-222 705.61,-237.15 694.24,-253.73 685.35,-266.35"/>
-<polygon fill="#000000" stroke="#000000" points="682.31,-264.58 679.37,-274.76 688.02,-268.64 682.31,-264.58"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-224.53 460.61,-235.56"/>
+<polygon fill="#000000" stroke="#000000" points="458.98,-232.46 451.54,-240 462.06,-238.74 458.98,-232.46"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_rmvs_chk~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-145 123,-145 123,-121 211,-121 211,-145"/>
+<text text-anchor="middle" x="167" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C520.15,-250.38 489.5,-260.9 466.47,-270.04"/>
-<polygon fill="#000000" stroke="#000000" points="465.04,-266.85 457.1,-273.86 467.68,-273.33 465.04,-266.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.84,-225.99 629.62,-256.18 588,-273 522.42,-299.5 500.49,-286.19 430,-292"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge14" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531,-24.12C512.87,-36.64 485.72,-55.27 475,-62 470.32,-64.94 465.3,-67.96 460.38,-70.85"/>
-<polygon fill="#000000" stroke="#000000" points="458.6,-67.84 451.71,-75.89 462.11,-73.89 458.6,-67.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.5,-239.85C510.73,-226.5 478.78,-204.93 456.22,-189.7"/>
+<polygon fill="#000000" stroke="#000000" points="458.03,-186.7 447.78,-184 454.11,-192.5 458.03,-186.7"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge13" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-107C251.77,-125.54 209.61,-163.37 186.43,-186.53"/>
-<polygon fill="#000000" stroke="#000000" points="183.83,-184.18 179.32,-193.77 188.82,-189.08 183.83,-184.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.91,-23.09C477.06,-33.41 426.15,-49.75 383,-67 344.23,-82.5 336.51,-90.86 298,-107"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-234C244.68,-229.96 230.09,-225.4 216.5,-221.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-217.77 206.82,-218.13 215.32,-224.45 217.41,-217.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-292C370.42,-296.75 351.92,-312.76 298,-292"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.28,-264.06C500.85,-274.79 463.97,-289.2 430,-292"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.49,-207.61C360.07,-208.17 327.14,-208.2 298,-206"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-206C271.5,-204.15 244.29,-203.9 221.27,-204.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-200.72 211.02,-204.39 221.08,-207.72 220.96,-200.72"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-159.82C398.36,-155.62 390.23,-150.77 383,-146 366.31,-134.98 363.88,-129.72 347,-119 342.17,-115.94 336.95,-112.89 331.77,-110.03"/>
+<polygon fill="#000000" stroke="#000000" points="333.07,-106.75 322.6,-105.1 329.75,-112.92 333.07,-106.75"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.77,-160C374.92,-149.53 334.66,-135.63 298,-133"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-194C375.88,-189.96 361.06,-185.4 347.26,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="348.01,-177.73 337.43,-178.13 345.95,-184.42 348.01,-177.73"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.86C250.84,-171.83 224.35,-159.41 203.17,-149.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-146.2 193.86,-145.12 201.43,-152.54 204.4,-146.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-90.75C500.52,-90.38 488.57,-89.98 477.23,-89.59"/>
-<polygon fill="#000000" stroke="#000000" points="477.15,-86.09 467.04,-89.25 476.91,-93.09 477.15,-86.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C369.48,-127.25 351.98,-84.38 298,-107"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.19,-104.18C500.68,-114.8 463.75,-128.43 430,-128"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-166C403.08,-169.51 375.21,-169.97 351.68,-169.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.66,-165.86 341.55,-169.02 351.43,-172.85 351.66,-165.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.74,-104.23C510.82,-117.92 480.58,-138.63 475,-142 455.6,-153.72 452.44,-162.84 430,-166"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-144C621.42,-147.96 608.26,-152.42 595.94,-156.6"/>
+<polygon fill="#000000" stroke="#000000" points="594.63,-153.34 586.29,-159.87 596.88,-159.97 594.63,-153.34"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.82,-88.53C364.09,-90.07 327.66,-94.57 298,-107"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.97,-100.02C386.37,-112.98 351.78,-133.73 327.16,-148.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.04,-145.7 318.26,-153.84 328.64,-151.7 325.04,-145.7"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C526.34,-82.82 501.71,-75.27 480.68,-68.94"/>
+<polygon fill="#000000" stroke="#000000" points="481.56,-65.56 470.97,-66.04 479.55,-72.26 481.56,-65.56"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_rmvs_chk~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_rmvs_chk~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-218 0,-218 0,-194 87,-194 87,-218"/>
-<text text-anchor="middle" x="43.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C498.37,-73.75 482.58,-97.46 430,-94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C402.99,-92.35 375.21,-91.95 351.77,-92.02"/>
+<polygon fill="#000000" stroke="#000000" points="351.66,-88.52 341.68,-92.07 351.7,-95.52 351.66,-88.52"/>
 </g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.11,-119.91C612.5,-111.24 579.67,-99.46 550.5,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C509.18,-77.25 510.68,-53.88 475,-33 456.26,-22.03 451.46,-17.3 430,-14"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-206C114.58,-206 105.86,-206 97.36,-206"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-202.5 87.13,-206 97.13,-209.5 97.13,-202.5"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-172C500.52,-172 488.57,-172 477.23,-172"/>
+<polygon fill="#000000" stroke="#000000" points="477.04,-168.5 467.04,-172 477.04,-175.5 477.04,-168.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.03,-98.86C633.77,-81.86 596.77,-50.82 572.92,-30.81"/>
-<polygon fill="#000000" stroke="#000000" points="575,-27.98 565.09,-24.24 570.5,-33.35 575,-27.98"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C399.68,-125.32 368.43,-116.01 343.67,-108.16"/>
+<polygon fill="#000000" stroke="#000000" points="344.42,-104.72 333.83,-105.01 342.29,-111.39 344.42,-104.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M517.78,-159.85C494.12,-150.94 460.43,-139.18 430,-132"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.43,-123.15C625.88,-130.03 605.93,-138.7 588,-146 549.21,-161.79 504.56,-178.62 472.64,-190.43"/>
-<polygon fill="#000000" stroke="#000000" points="471.33,-187.18 463.16,-193.92 473.76,-193.75 471.33,-187.18"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge22" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-133C271.49,-131.25 244.28,-131.01 221.27,-131.3"/>
+<polygon fill="#000000" stroke="#000000" points="220.95,-127.81 211.01,-131.47 221.07,-134.8 220.95,-127.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C371.76,-118.73 355.63,-137.13 298,-133"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_chk~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-104.3C617.54,-102.79 607.54,-101.19 597.97,-99.64"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-96.14 587.8,-98.01 597.11,-103.05 598.22,-96.14"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.93,-66.02C375.33,-69.8 361.25,-74.02 348.05,-77.99"/>
+<polygon fill="#000000" stroke="#000000" points="346.73,-74.73 338.16,-80.95 348.74,-81.43 346.73,-74.73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.81,-119C604.27,-123.18 575.91,-128.2 550.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.38,-139.8 482.69,-128.68 430,-128"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-42C369.43,-28.18 317.43,-8.09 298,-14"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C494.31,-140.11 484.26,-158.35 430,-166"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C243.39,-30.01 201.11,-83 180.91,-112.58"/>
+<polygon fill="#000000" stroke="#000000" points="177.97,-110.68 175.36,-120.94 183.81,-114.55 177.97,-110.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.27,2.82 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge29" class="edge">
+<g id="module~~s_rmvs_chk~~UsesGraph_edge28" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-178C244.68,-182.04 230.09,-186.6 216.5,-190.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-187.55 206.82,-193.87 217.41,-194.23 215.32,-187.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.45,-299.06C569.66,-321.21 418.27,-362.88 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-105C244.68,-109.04 230.09,-113.6 216.5,-117.84"/>
+<polygon fill="#000000" stroke="#000000" points="215.32,-114.55 206.82,-120.87 217.41,-121.23 215.32,-114.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_chk~~UsesGraph_edge31" class="edge">
+<g id="module~~s_rmvs_chk~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C243.22,-309.81 201.01,-256.4 180.87,-226.58"/>
-<polygon fill="#000000" stroke="#000000" points="183.75,-224.59 175.33,-218.15 177.89,-228.43 183.75,-224.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-298.02C369.43,-311.85 317.42,-331.95 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-292C233.43,-267.91 193.43,-192.57 176.81,-154.9"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-153.18 172.75,-145.35 173.44,-155.92 179.89,-153.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.15,-264.08C370.03,-278.37 317.12,-299.36 298,-292"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_rmvs_chk~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_rmvs_chk~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-145 0,-145 0,-121 87,-121 87,-145"/>
+<text text-anchor="middle" x="43.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_rmvs_chk~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-133C114.58,-133 105.86,-133 97.36,-133"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-129.5 87.13,-133 97.13,-136.5 97.13,-129.5"/>
 </g>
 </g>
 </svg>
@@ -652,6 +657,17 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/s_rmvs_chk.html#proc-rmvs_encounter_check_tp">rmvs_encounter_check_tp</a>
       
+    </div>
+  </div>
+</div>
+
+
+
+<div class="panel panel-primary">
+  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#modsubs-1">Module Subroutines</a></h3></div>
+  <div id="modsubs-1" class="panel-collapse collapse">
+    <div class="list-group">
+      
       <a class="list-group-item" href="../module/s_rmvs_chk.html#proc-rmvs_chk_ind">rmvs_chk_ind</a>
       
     </div>
@@ -665,7 +681,6 @@ <h3>Contents</h3>
 
 
 
-
     </section>
     <br class="visible-xs visible-sm hidden-md">
 
@@ -801,10 +816,18 @@ <h4>Return Value <small>logical
   </div>
 
         
+        </section>
+        <br>
+        
+
+        
+        <section>
+        <h2>Module Subroutines</h2>
+        
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-rmvs_chk_ind"></span><h3>
-elemental module function <a href='../proc/rmvs_chk_ind.html'>rmvs_chk_ind</a>(r2, v2, vdotr, dt, r2crit) result(lflag)
+pure module subroutine <a href='../proc/rmvs_chk_ind.html'>rmvs_chk_ind</a>(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr)
     
     
    <a href='../interface/rmvs_chk_ind.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -857,7 +880,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>r2</strong></td><td></td>
+  <td><strong>xr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -872,7 +895,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>v2</strong></td><td></td>
+  <td><strong>yr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -887,7 +910,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>vdotr</strong></td><td></td>
+  <td><strong>zr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -902,7 +925,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>dt</strong></td><td></td>
+  <td><strong>vxr</strong></td><td><p>Relative velocity vector components</p></td>
   
 </tr>
 
@@ -917,24 +940,90 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>r2crit</strong></td><td></td>
+  <td><strong>vyr</strong></td><td><p>Relative velocity vector components</p></td>
   
 </tr>
 
-</tbody>
-</table>
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vzr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
 
-      
-    
-    
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>dt</strong></td><td><p>Step size</p></td>
+  
+</tr>
 
   
   
   
   
-     <h4>Return Value <small>logical
-  </small></h4>
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>r2crit</strong></td><td><p>Square of the critical encounter distance</p></td>
   
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lencounter</strong></td><td><p>Flag indicating that an encounter has occurred</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lvdotr</strong></td><td><p>Logical flag indicating the direction of the v .dot. r vector</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
     
 
   </div>
@@ -946,8 +1035,6 @@ <h4>Return Value <small>logical
         
 
         
-
-        
     
     
     </div>
diff --git a/docs/module/s_rmvs_discard.html b/docs/module/s_rmvs_discard.html
index 88d12f944..861a71611 100644
--- a/docs/module/s_rmvs_discard.html
+++ b/docs/module/s_rmvs_discard.html
@@ -245,313 +245,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_rmvs_discard~~UsesGraph Pages: 1 -->
-<svg id="modules_rmvs_discardUsesGraph" width="641pt" height="239pt"
- viewBox="0.00 0.00 641.00 238.70" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_rmvs_discard~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 344.93)">
+<svg id="modules_rmvs_discardUsesGraph" width="641pt" height="213pt"
+ viewBox="0.00 0.00 641.00 212.60" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_rmvs_discard~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 306.77)">
 <title>module~~s_rmvs_discard~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-344.93 933,-344.93 933,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-306.77 933,-306.77 933,4 -4,4"/>
 <!-- module~s_rmvs_discard -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node1" class="node">
 <title>module~s_rmvs_discard</title>
-<polygon fill="none" stroke="black" points="929,-64 841,-64 841,-40 929,-40 929,-64"/>
-<text text-anchor="middle" x="885" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_discard</text>
+<polygon fill="none" stroke="black" points="929,-183 841,-183 841,-159 929,-159 929,-183"/>
+<text text-anchor="middle" x="885" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_discard</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_rmvs_discard~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-123 751,-123 751,-99 805,-99 805,-123"/>
-<text text-anchor="middle" x="778" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-144 751,-144 751,-120 805,-120 805,-144"/>
+<text text-anchor="middle" x="778" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge1" class="edge">
 <title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M862.5,-64.08C847.21,-72.67 826.46,-84.33 809.47,-93.88"/>
-<polygon fill="#000000" stroke="#000000" points="807.48,-90.98 800.47,-98.93 810.91,-97.09 807.48,-90.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M851.64,-158.98C839.97,-154.64 826.72,-149.73 814.77,-145.29"/>
+<polygon fill="#000000" stroke="#000000" points="815.7,-141.9 805.1,-141.7 813.26,-148.46 815.7,-141.9"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node3" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~s_rmvs_discard~~UsesGraph_node3"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-24 511,-24 511,0 588,0 588,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-264 511,-264 511,-240 588,-240 588,-264"/>
+<text text-anchor="middle" x="549.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge2" class="edge">
 <title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M840.74,-46.81C778.17,-39.31 662.83,-25.47 597.98,-17.7"/>
-<polygon fill="#000000" stroke="#000000" points="598.37,-14.22 588.02,-16.5 597.54,-21.17 598.37,-14.22"/>
+<path fill="none" stroke="#000000" d="M852.04,-183.08C818.37,-195.4 763.6,-214.33 715,-226 676.19,-235.32 631.39,-242.15 598.36,-246.46"/>
+<polygon fill="#000000" stroke="#000000" points="597.55,-243.04 588.07,-247.78 598.43,-249.98 597.55,-243.04"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge4" class="edge">
+<g id="module~~s_rmvs_discard~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.16,-98.75C741.28,-84.24 705.53,-60.91 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C642.39,-45.36 613.75,-35.71 591.22,-27.55"/>
-<polygon fill="#000000" stroke="#000000" points="592.25,-24.2 581.65,-24.04 589.84,-30.77 592.25,-24.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C644.15,-219.92 617.09,-229.06 595.03,-236.61"/>
+<polygon fill="#000000" stroke="#000000" points="593.6,-233.4 585.28,-239.96 595.87,-240.02 593.6,-233.4"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-258 247,-258 247,-234 347,-234 347,-258"/>
-<text text-anchor="middle" x="297" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-184 391,-184 391,-160 467,-160 467,-184"/>
+<text text-anchor="middle" x="429" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C404.98,-244.27 379.6,-243.92 357.42,-244.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.09,-240.63 347.14,-244.26 357.19,-247.63 357.09,-240.63"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C618.63,-228.22 602.94,-212 550.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-199.47 460.61,-188.44"/>
+<polygon fill="#000000" stroke="#000000" points="462.06,-185.26 451.54,-184 458.98,-191.54 462.06,-185.26"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-218 385.5,-218 385.5,-194 472.5,-194 472.5,-218"/>
-<text text-anchor="middle" x="429" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-205 247,-205 247,-181 347,-181 347,-205"/>
+<text text-anchor="middle" x="297" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C617.03,-227.65 604.95,-237.58 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C532.35,-248.5 494.24,-234.23 465.57,-222.06"/>
-<polygon fill="#000000" stroke="#000000" points="466.82,-218.78 456.25,-218.03 464.04,-225.21 466.82,-218.78"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C483.01,-212 408.17,-205.46 357.47,-200.06"/>
+<polygon fill="#000000" stroke="#000000" points="357.67,-196.56 347.35,-198.96 356.91,-203.52 357.67,-196.56"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-104 511.5,-104 511.5,-80 587.5,-80 587.5,-104"/>
-<text text-anchor="middle" x="549.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C635.93,-43.72 599.43,-60.22 575.76,-74.48"/>
-<polygon fill="#000000" stroke="#000000" points="573.65,-71.68 567.06,-79.97 577.38,-77.6 573.65,-71.68"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-132C742.26,-132 732.26,-132 722.32,-132"/>
+<polygon fill="#000000" stroke="#000000" points="722.05,-128.5 712.05,-132 722.05,-135.5 722.05,-128.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-100 391,-100 391,-76 467,-76 467,-100"/>
-<text text-anchor="middle" x="429" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-184 511.5,-184 511.5,-160 587.5,-160 587.5,-184"/>
+<text text-anchor="middle" x="549.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C599.73,-34.51 517.51,-55.95 469.77,-72.44"/>
-<polygon fill="#000000" stroke="#000000" points="468.38,-69.22 460.12,-75.87 470.72,-75.82 468.38,-69.22"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C636.03,-222.56 598.74,-204.89 574.92,-189.79"/>
+<polygon fill="#000000" stroke="#000000" points="576.76,-186.81 566.49,-184.19 572.89,-192.64 576.76,-186.81"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-218 123,-218 123,-194 211,-194 211,-218"/>
-<text text-anchor="middle" x="167" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C496.45,-254.04 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C367.72,-241.46 358.28,-210.54 298,-206"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.86,-122.77C739.84,-118.98 726.84,-114.63 715,-111 659.03,-93.82 645.34,-87.84 588,-76 553.15,-68.8 513.49,-63.29 482.62,-59.58"/>
+<polygon fill="#000000" stroke="#000000" points="482.85,-56.08 472.51,-58.39 482.03,-63.04 482.85,-56.08"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~lambda_function -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-123 627,-123 627,-99 712,-99 712,-123"/>
-<text text-anchor="middle" x="669.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-111C742.26,-111 732.26,-111 722.32,-111"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-107.5 712.05,-111 722.05,-114.5 722.05,-107.5"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.24,-119.75C761.72,-100.47 741.12,-62.74 715,-38 711.86,-35.02 708.31,-32.24 704.63,-29.69"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-26.57 695.92,-24.17 702.49,-32.48 706.24,-26.57"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node10" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_rmvs_discard~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-178 252.5,-178 252.5,-154 341.5,-154 341.5,-178"/>
-<text text-anchor="middle" x="297" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-105 252.5,-105 252.5,-81 341.5,-81 341.5,-105"/>
+<text text-anchor="middle" x="297" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge10" class="edge">
+<g id="module~~s_rmvs_discard~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C567.95,-246.39 536.58,-150.97 430,-166"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.09,-123.22C751.61,-144.75 714.03,-188.95 670.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.07,-144.3C748.28,-163.27 710.97,-198.84 670.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.81,-225.88 627.45,-172.42 588,-151 522.39,-115.38 504.49,-98.9 430,-94"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-299 624,-299 624,-275 715,-275 715,-299"/>
-<text text-anchor="middle" x="669.5" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-264 383,-264 383,-240 475,-240 475,-264"/>
+<text text-anchor="middle" x="429" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M770.65,-123.2C759.8,-143.86 736.75,-186.92 715,-222 705.61,-237.15 694.24,-253.73 685.35,-266.35"/>
-<polygon fill="#000000" stroke="#000000" points="682.31,-264.58 679.37,-274.76 688.02,-268.64 682.31,-264.58"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-224.53 460.61,-235.56"/>
+<polygon fill="#000000" stroke="#000000" points="458.98,-232.46 451.54,-240 462.06,-238.74 458.98,-232.46"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_rmvs_discard~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-145 123,-145 123,-121 211,-121 211,-145"/>
+<text text-anchor="middle" x="167" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C520.15,-250.38 489.5,-260.9 466.47,-270.04"/>
-<polygon fill="#000000" stroke="#000000" points="465.04,-266.85 457.1,-273.86 467.68,-273.33 465.04,-266.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.84,-225.99 629.62,-256.18 588,-273 522.42,-299.5 500.49,-286.19 430,-292"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge14" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531,-24.12C512.87,-36.64 485.72,-55.27 475,-62 470.32,-64.94 465.3,-67.96 460.38,-70.85"/>
-<polygon fill="#000000" stroke="#000000" points="458.6,-67.84 451.71,-75.89 462.11,-73.89 458.6,-67.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.5,-239.85C510.73,-226.5 478.78,-204.93 456.22,-189.7"/>
+<polygon fill="#000000" stroke="#000000" points="458.03,-186.7 447.78,-184 454.11,-192.5 458.03,-186.7"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge13" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-107C251.77,-125.54 209.61,-163.37 186.43,-186.53"/>
-<polygon fill="#000000" stroke="#000000" points="183.83,-184.18 179.32,-193.77 188.82,-189.08 183.83,-184.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.91,-23.09C477.06,-33.41 426.15,-49.75 383,-67 344.23,-82.5 336.51,-90.86 298,-107"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-234C244.68,-229.96 230.09,-225.4 216.5,-221.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-217.77 206.82,-218.13 215.32,-224.45 217.41,-217.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-292C370.42,-296.75 351.92,-312.76 298,-292"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.28,-264.06C500.85,-274.79 463.97,-289.2 430,-292"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.49,-207.61C360.07,-208.17 327.14,-208.2 298,-206"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-206C271.5,-204.15 244.29,-203.9 221.27,-204.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-200.72 211.02,-204.39 221.08,-207.72 220.96,-200.72"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-159.82C398.36,-155.62 390.23,-150.77 383,-146 366.31,-134.98 363.88,-129.72 347,-119 342.17,-115.94 336.95,-112.89 331.77,-110.03"/>
+<polygon fill="#000000" stroke="#000000" points="333.07,-106.75 322.6,-105.1 329.75,-112.92 333.07,-106.75"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.77,-160C374.92,-149.53 334.66,-135.63 298,-133"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-194C375.88,-189.96 361.06,-185.4 347.26,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="348.01,-177.73 337.43,-178.13 345.95,-184.42 348.01,-177.73"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.86C250.84,-171.83 224.35,-159.41 203.17,-149.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-146.2 193.86,-145.12 201.43,-152.54 204.4,-146.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-90.75C500.52,-90.38 488.57,-89.98 477.23,-89.59"/>
-<polygon fill="#000000" stroke="#000000" points="477.15,-86.09 467.04,-89.25 476.91,-93.09 477.15,-86.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C369.48,-127.25 351.98,-84.38 298,-107"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.19,-104.18C500.68,-114.8 463.75,-128.43 430,-128"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-166C403.08,-169.51 375.21,-169.97 351.68,-169.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.66,-165.86 341.55,-169.02 351.43,-172.85 351.66,-165.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.74,-104.23C510.82,-117.92 480.58,-138.63 475,-142 455.6,-153.72 452.44,-162.84 430,-166"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-144C621.42,-147.96 608.26,-152.42 595.94,-156.6"/>
+<polygon fill="#000000" stroke="#000000" points="594.63,-153.34 586.29,-159.87 596.88,-159.97 594.63,-153.34"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.82,-88.53C364.09,-90.07 327.66,-94.57 298,-107"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.97,-100.02C386.37,-112.98 351.78,-133.73 327.16,-148.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.04,-145.7 318.26,-153.84 328.64,-151.7 325.04,-145.7"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C526.34,-82.82 501.71,-75.27 480.68,-68.94"/>
+<polygon fill="#000000" stroke="#000000" points="481.56,-65.56 470.97,-66.04 479.55,-72.26 481.56,-65.56"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_rmvs_discard~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_rmvs_discard~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-218 0,-218 0,-194 87,-194 87,-218"/>
-<text text-anchor="middle" x="43.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C498.37,-73.75 482.58,-97.46 430,-94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C402.99,-92.35 375.21,-91.95 351.77,-92.02"/>
+<polygon fill="#000000" stroke="#000000" points="351.66,-88.52 341.68,-92.07 351.7,-95.52 351.66,-88.52"/>
 </g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.11,-119.91C612.5,-111.24 579.67,-99.46 550.5,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C509.18,-77.25 510.68,-53.88 475,-33 456.26,-22.03 451.46,-17.3 430,-14"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-206C114.58,-206 105.86,-206 97.36,-206"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-202.5 87.13,-206 97.13,-209.5 97.13,-202.5"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-172C500.52,-172 488.57,-172 477.23,-172"/>
+<polygon fill="#000000" stroke="#000000" points="477.04,-168.5 467.04,-172 477.04,-175.5 477.04,-168.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.03,-98.86C633.77,-81.86 596.77,-50.82 572.92,-30.81"/>
-<polygon fill="#000000" stroke="#000000" points="575,-27.98 565.09,-24.24 570.5,-33.35 575,-27.98"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C399.68,-125.32 368.43,-116.01 343.67,-108.16"/>
+<polygon fill="#000000" stroke="#000000" points="344.42,-104.72 333.83,-105.01 342.29,-111.39 344.42,-104.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M517.78,-159.85C494.12,-150.94 460.43,-139.18 430,-132"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.43,-123.15C625.88,-130.03 605.93,-138.7 588,-146 549.21,-161.79 504.56,-178.62 472.64,-190.43"/>
-<polygon fill="#000000" stroke="#000000" points="471.33,-187.18 463.16,-193.92 473.76,-193.75 471.33,-187.18"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge22" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-133C271.49,-131.25 244.28,-131.01 221.27,-131.3"/>
+<polygon fill="#000000" stroke="#000000" points="220.95,-127.81 211.01,-131.47 221.07,-134.8 220.95,-127.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C371.76,-118.73 355.63,-137.13 298,-133"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_discard~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-104.3C617.54,-102.79 607.54,-101.19 597.97,-99.64"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-96.14 587.8,-98.01 597.11,-103.05 598.22,-96.14"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.93,-66.02C375.33,-69.8 361.25,-74.02 348.05,-77.99"/>
+<polygon fill="#000000" stroke="#000000" points="346.73,-74.73 338.16,-80.95 348.74,-81.43 346.73,-74.73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.81,-119C604.27,-123.18 575.91,-128.2 550.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.38,-139.8 482.69,-128.68 430,-128"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-42C369.43,-28.18 317.43,-8.09 298,-14"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C494.31,-140.11 484.26,-158.35 430,-166"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C243.39,-30.01 201.11,-83 180.91,-112.58"/>
+<polygon fill="#000000" stroke="#000000" points="177.97,-110.68 175.36,-120.94 183.81,-114.55 177.97,-110.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.27,2.82 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge29" class="edge">
+<g id="module~~s_rmvs_discard~~UsesGraph_edge28" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-178C244.68,-182.04 230.09,-186.6 216.5,-190.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-187.55 206.82,-193.87 217.41,-194.23 215.32,-187.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.45,-299.06C569.66,-321.21 418.27,-362.88 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-105C244.68,-109.04 230.09,-113.6 216.5,-117.84"/>
+<polygon fill="#000000" stroke="#000000" points="215.32,-114.55 206.82,-120.87 217.41,-121.23 215.32,-114.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_discard~~UsesGraph_edge31" class="edge">
+<g id="module~~s_rmvs_discard~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C243.22,-309.81 201.01,-256.4 180.87,-226.58"/>
-<polygon fill="#000000" stroke="#000000" points="183.75,-224.59 175.33,-218.15 177.89,-228.43 183.75,-224.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-298.02C369.43,-311.85 317.42,-331.95 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-292C233.43,-267.91 193.43,-192.57 176.81,-154.9"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-153.18 172.75,-145.35 173.44,-155.92 179.89,-153.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.15,-264.08C370.03,-278.37 317.12,-299.36 298,-292"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_rmvs_discard~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_rmvs_discard~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-145 0,-145 0,-121 87,-121 87,-145"/>
+<text text-anchor="middle" x="43.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_rmvs_discard~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-133C114.58,-133 105.86,-133 97.36,-133"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-129.5 87.13,-133 97.13,-136.5 97.13,-129.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_rmvs_io.html b/docs/module/s_rmvs_io.html
index 398e4a024..1733605ec 100644
--- a/docs/module/s_rmvs_io.html
+++ b/docs/module/s_rmvs_io.html
@@ -245,313 +245,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_rmvs_io~~UsesGraph Pages: 1 -->
-<svg id="modules_rmvs_ioUsesGraph" width="641pt" height="246pt"
- viewBox="0.00 0.00 641.00 245.78" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_rmvs_io~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 344.93)">
+<svg id="modules_rmvs_ioUsesGraph" width="641pt" height="219pt"
+ viewBox="0.00 0.00 641.00 218.90" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_rmvs_io~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 306.77)">
 <title>module~~s_rmvs_io~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-344.93 906,-344.93 906,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-306.77 906,-306.77 906,4 -4,4"/>
 <!-- module~s_rmvs_io -->
 <g id="module~~s_rmvs_io~~UsesGraph_node1" class="node">
 <title>module~s_rmvs_io</title>
-<polygon fill="none" stroke="black" points="902,-64 841,-64 841,-40 902,-40 902,-64"/>
-<text text-anchor="middle" x="871.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_io</text>
+<polygon fill="none" stroke="black" points="902,-183 841,-183 841,-159 902,-159 902,-183"/>
+<text text-anchor="middle" x="871.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_io</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_rmvs_io~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_rmvs_io~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-123 751,-123 751,-99 805,-99 805,-123"/>
-<text text-anchor="middle" x="778" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-144 751,-144 751,-120 805,-120 805,-144"/>
+<text text-anchor="middle" x="778" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge1" class="edge">
 <title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M851.54,-64.22C838.45,-72.67 820.84,-84.02 806.25,-93.43"/>
-<polygon fill="#000000" stroke="#000000" points="804.13,-90.63 797.62,-98.99 807.92,-96.51 804.13,-90.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M842.05,-158.87C833.33,-155.16 823.62,-151.02 814.49,-147.13"/>
+<polygon fill="#000000" stroke="#000000" points="815.82,-143.89 805.25,-143.19 813.08,-150.33 815.82,-143.89"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_node3" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~s_rmvs_io~~UsesGraph_node3"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-24 511,-24 511,0 588,0 588,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-264 511,-264 511,-240 588,-240 588,-264"/>
+<text text-anchor="middle" x="549.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge2" class="edge">
 <title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M840.97,-48.31C785.53,-41.38 665.41,-26.36 598.31,-17.98"/>
-<polygon fill="#000000" stroke="#000000" points="598.37,-14.46 588.01,-16.69 597.5,-21.4 598.37,-14.46"/>
+<path fill="none" stroke="#000000" d="M841.47,-183.07C810.6,-195.48 760.1,-214.56 715,-226 676.31,-235.81 631.51,-242.6 598.44,-246.78"/>
+<polygon fill="#000000" stroke="#000000" points="597.63,-243.35 588.14,-248.04 598.49,-250.3 597.63,-243.35"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge4" class="edge">
+<g id="module~~s_rmvs_io~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.16,-98.75C741.28,-84.24 705.53,-60.91 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C642.39,-45.36 613.75,-35.71 591.22,-27.55"/>
-<polygon fill="#000000" stroke="#000000" points="592.25,-24.2 581.65,-24.04 589.84,-30.77 592.25,-24.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C644.15,-219.92 617.09,-229.06 595.03,-236.61"/>
+<polygon fill="#000000" stroke="#000000" points="593.6,-233.4 585.28,-239.96 595.87,-240.02 593.6,-233.4"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-258 247,-258 247,-234 347,-234 347,-258"/>
-<text text-anchor="middle" x="297" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-184 391,-184 391,-160 467,-160 467,-184"/>
+<text text-anchor="middle" x="429" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C404.98,-244.27 379.6,-243.92 357.42,-244.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.09,-240.63 347.14,-244.26 357.19,-247.63 357.09,-240.63"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C618.63,-228.22 602.94,-212 550.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-199.47 460.61,-188.44"/>
+<polygon fill="#000000" stroke="#000000" points="462.06,-185.26 451.54,-184 458.98,-191.54 462.06,-185.26"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_rmvs_io~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-218 385.5,-218 385.5,-194 472.5,-194 472.5,-218"/>
-<text text-anchor="middle" x="429" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-205 247,-205 247,-181 347,-181 347,-205"/>
+<text text-anchor="middle" x="297" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C617.03,-227.65 604.95,-237.58 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C532.35,-248.5 494.24,-234.23 465.57,-222.06"/>
-<polygon fill="#000000" stroke="#000000" points="466.82,-218.78 456.25,-218.03 464.04,-225.21 466.82,-218.78"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C483.01,-212 408.17,-205.46 357.47,-200.06"/>
+<polygon fill="#000000" stroke="#000000" points="357.67,-196.56 347.35,-198.96 356.91,-203.52 357.67,-196.56"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-104 511.5,-104 511.5,-80 587.5,-80 587.5,-104"/>
-<text text-anchor="middle" x="549.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C635.93,-43.72 599.43,-60.22 575.76,-74.48"/>
-<polygon fill="#000000" stroke="#000000" points="573.65,-71.68 567.06,-79.97 577.38,-77.6 573.65,-71.68"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-132C742.26,-132 732.26,-132 722.32,-132"/>
+<polygon fill="#000000" stroke="#000000" points="722.05,-128.5 712.05,-132 722.05,-135.5 722.05,-128.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-100 391,-100 391,-76 467,-76 467,-100"/>
-<text text-anchor="middle" x="429" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-184 511.5,-184 511.5,-160 587.5,-160 587.5,-184"/>
+<text text-anchor="middle" x="549.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C599.73,-34.51 517.51,-55.95 469.77,-72.44"/>
-<polygon fill="#000000" stroke="#000000" points="468.38,-69.22 460.12,-75.87 470.72,-75.82 468.38,-69.22"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C636.03,-222.56 598.74,-204.89 574.92,-189.79"/>
+<polygon fill="#000000" stroke="#000000" points="576.76,-186.81 566.49,-184.19 572.89,-192.64 576.76,-186.81"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-218 123,-218 123,-194 211,-194 211,-218"/>
-<text text-anchor="middle" x="167" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C496.45,-254.04 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C367.72,-241.46 358.28,-210.54 298,-206"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.86,-122.77C739.84,-118.98 726.84,-114.63 715,-111 659.03,-93.82 645.34,-87.84 588,-76 553.15,-68.8 513.49,-63.29 482.62,-59.58"/>
+<polygon fill="#000000" stroke="#000000" points="482.85,-56.08 472.51,-58.39 482.03,-63.04 482.85,-56.08"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~lambda_function -->
 <g id="module~~s_rmvs_io~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-123 627,-123 627,-99 712,-99 712,-123"/>
-<text text-anchor="middle" x="669.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-111C742.26,-111 732.26,-111 722.32,-111"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-107.5 712.05,-111 722.05,-114.5 722.05,-107.5"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.24,-119.75C761.72,-100.47 741.12,-62.74 715,-38 711.86,-35.02 708.31,-32.24 704.63,-29.69"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-26.57 695.92,-24.17 702.49,-32.48 706.24,-26.57"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_node10" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_rmvs_io~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-178 252.5,-178 252.5,-154 341.5,-154 341.5,-178"/>
-<text text-anchor="middle" x="297" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-105 252.5,-105 252.5,-81 341.5,-81 341.5,-105"/>
+<text text-anchor="middle" x="297" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge10" class="edge">
+<g id="module~~s_rmvs_io~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C567.95,-246.39 536.58,-150.97 430,-166"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.09,-123.22C751.61,-144.75 714.03,-188.95 670.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.07,-144.3C748.28,-163.27 710.97,-198.84 670.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.81,-225.88 627.45,-172.42 588,-151 522.39,-115.38 504.49,-98.9 430,-94"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-299 624,-299 624,-275 715,-275 715,-299"/>
-<text text-anchor="middle" x="669.5" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-264 383,-264 383,-240 475,-240 475,-264"/>
+<text text-anchor="middle" x="429" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M770.65,-123.2C759.8,-143.86 736.75,-186.92 715,-222 705.61,-237.15 694.24,-253.73 685.35,-266.35"/>
-<polygon fill="#000000" stroke="#000000" points="682.31,-264.58 679.37,-274.76 688.02,-268.64 682.31,-264.58"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-224.53 460.61,-235.56"/>
+<polygon fill="#000000" stroke="#000000" points="458.98,-232.46 451.54,-240 462.06,-238.74 458.98,-232.46"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_rmvs_io~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-145 123,-145 123,-121 211,-121 211,-145"/>
+<text text-anchor="middle" x="167" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C520.15,-250.38 489.5,-260.9 466.47,-270.04"/>
-<polygon fill="#000000" stroke="#000000" points="465.04,-266.85 457.1,-273.86 467.68,-273.33 465.04,-266.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.84,-225.99 629.62,-256.18 588,-273 522.42,-299.5 500.49,-286.19 430,-292"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge14" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531,-24.12C512.87,-36.64 485.72,-55.27 475,-62 470.32,-64.94 465.3,-67.96 460.38,-70.85"/>
-<polygon fill="#000000" stroke="#000000" points="458.6,-67.84 451.71,-75.89 462.11,-73.89 458.6,-67.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.5,-239.85C510.73,-226.5 478.78,-204.93 456.22,-189.7"/>
+<polygon fill="#000000" stroke="#000000" points="458.03,-186.7 447.78,-184 454.11,-192.5 458.03,-186.7"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge13" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-107C251.77,-125.54 209.61,-163.37 186.43,-186.53"/>
-<polygon fill="#000000" stroke="#000000" points="183.83,-184.18 179.32,-193.77 188.82,-189.08 183.83,-184.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.91,-23.09C477.06,-33.41 426.15,-49.75 383,-67 344.23,-82.5 336.51,-90.86 298,-107"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-234C244.68,-229.96 230.09,-225.4 216.5,-221.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-217.77 206.82,-218.13 215.32,-224.45 217.41,-217.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-292C370.42,-296.75 351.92,-312.76 298,-292"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.28,-264.06C500.85,-274.79 463.97,-289.2 430,-292"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.49,-207.61C360.07,-208.17 327.14,-208.2 298,-206"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-206C271.5,-204.15 244.29,-203.9 221.27,-204.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-200.72 211.02,-204.39 221.08,-207.72 220.96,-200.72"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-159.82C398.36,-155.62 390.23,-150.77 383,-146 366.31,-134.98 363.88,-129.72 347,-119 342.17,-115.94 336.95,-112.89 331.77,-110.03"/>
+<polygon fill="#000000" stroke="#000000" points="333.07,-106.75 322.6,-105.1 329.75,-112.92 333.07,-106.75"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.77,-160C374.92,-149.53 334.66,-135.63 298,-133"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-194C375.88,-189.96 361.06,-185.4 347.26,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="348.01,-177.73 337.43,-178.13 345.95,-184.42 348.01,-177.73"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.86C250.84,-171.83 224.35,-159.41 203.17,-149.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-146.2 193.86,-145.12 201.43,-152.54 204.4,-146.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-90.75C500.52,-90.38 488.57,-89.98 477.23,-89.59"/>
-<polygon fill="#000000" stroke="#000000" points="477.15,-86.09 467.04,-89.25 476.91,-93.09 477.15,-86.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C369.48,-127.25 351.98,-84.38 298,-107"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.19,-104.18C500.68,-114.8 463.75,-128.43 430,-128"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-166C403.08,-169.51 375.21,-169.97 351.68,-169.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.66,-165.86 341.55,-169.02 351.43,-172.85 351.66,-165.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.74,-104.23C510.82,-117.92 480.58,-138.63 475,-142 455.6,-153.72 452.44,-162.84 430,-166"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-144C621.42,-147.96 608.26,-152.42 595.94,-156.6"/>
+<polygon fill="#000000" stroke="#000000" points="594.63,-153.34 586.29,-159.87 596.88,-159.97 594.63,-153.34"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.82,-88.53C364.09,-90.07 327.66,-94.57 298,-107"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.97,-100.02C386.37,-112.98 351.78,-133.73 327.16,-148.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.04,-145.7 318.26,-153.84 328.64,-151.7 325.04,-145.7"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C526.34,-82.82 501.71,-75.27 480.68,-68.94"/>
+<polygon fill="#000000" stroke="#000000" points="481.56,-65.56 470.97,-66.04 479.55,-72.26 481.56,-65.56"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_rmvs_io~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_rmvs_io~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-218 0,-218 0,-194 87,-194 87,-218"/>
-<text text-anchor="middle" x="43.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C498.37,-73.75 482.58,-97.46 430,-94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C402.99,-92.35 375.21,-91.95 351.77,-92.02"/>
+<polygon fill="#000000" stroke="#000000" points="351.66,-88.52 341.68,-92.07 351.7,-95.52 351.66,-88.52"/>
 </g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.11,-119.91C612.5,-111.24 579.67,-99.46 550.5,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C509.18,-77.25 510.68,-53.88 475,-33 456.26,-22.03 451.46,-17.3 430,-14"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-206C114.58,-206 105.86,-206 97.36,-206"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-202.5 87.13,-206 97.13,-209.5 97.13,-202.5"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-172C500.52,-172 488.57,-172 477.23,-172"/>
+<polygon fill="#000000" stroke="#000000" points="477.04,-168.5 467.04,-172 477.04,-175.5 477.04,-168.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.03,-98.86C633.77,-81.86 596.77,-50.82 572.92,-30.81"/>
-<polygon fill="#000000" stroke="#000000" points="575,-27.98 565.09,-24.24 570.5,-33.35 575,-27.98"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C399.68,-125.32 368.43,-116.01 343.67,-108.16"/>
+<polygon fill="#000000" stroke="#000000" points="344.42,-104.72 333.83,-105.01 342.29,-111.39 344.42,-104.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M517.78,-159.85C494.12,-150.94 460.43,-139.18 430,-132"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.43,-123.15C625.88,-130.03 605.93,-138.7 588,-146 549.21,-161.79 504.56,-178.62 472.64,-190.43"/>
-<polygon fill="#000000" stroke="#000000" points="471.33,-187.18 463.16,-193.92 473.76,-193.75 471.33,-187.18"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge22" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-133C271.49,-131.25 244.28,-131.01 221.27,-131.3"/>
+<polygon fill="#000000" stroke="#000000" points="220.95,-127.81 211.01,-131.47 221.07,-134.8 220.95,-127.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C371.76,-118.73 355.63,-137.13 298,-133"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_io~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-104.3C617.54,-102.79 607.54,-101.19 597.97,-99.64"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-96.14 587.8,-98.01 597.11,-103.05 598.22,-96.14"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.93,-66.02C375.33,-69.8 361.25,-74.02 348.05,-77.99"/>
+<polygon fill="#000000" stroke="#000000" points="346.73,-74.73 338.16,-80.95 348.74,-81.43 346.73,-74.73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.81,-119C604.27,-123.18 575.91,-128.2 550.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.38,-139.8 482.69,-128.68 430,-128"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-42C369.43,-28.18 317.43,-8.09 298,-14"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C494.31,-140.11 484.26,-158.35 430,-166"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C243.39,-30.01 201.11,-83 180.91,-112.58"/>
+<polygon fill="#000000" stroke="#000000" points="177.97,-110.68 175.36,-120.94 183.81,-114.55 177.97,-110.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.27,2.82 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge29" class="edge">
+<g id="module~~s_rmvs_io~~UsesGraph_edge28" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-178C244.68,-182.04 230.09,-186.6 216.5,-190.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-187.55 206.82,-193.87 217.41,-194.23 215.32,-187.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.45,-299.06C569.66,-321.21 418.27,-362.88 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-105C244.68,-109.04 230.09,-113.6 216.5,-117.84"/>
+<polygon fill="#000000" stroke="#000000" points="215.32,-114.55 206.82,-120.87 217.41,-121.23 215.32,-114.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_io~~UsesGraph_edge31" class="edge">
+<g id="module~~s_rmvs_io~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C243.22,-309.81 201.01,-256.4 180.87,-226.58"/>
-<polygon fill="#000000" stroke="#000000" points="183.75,-224.59 175.33,-218.15 177.89,-228.43 183.75,-224.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-298.02C369.43,-311.85 317.42,-331.95 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-292C233.43,-267.91 193.43,-192.57 176.81,-154.9"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-153.18 172.75,-145.35 173.44,-155.92 179.89,-153.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.15,-264.08C370.03,-278.37 317.12,-299.36 298,-292"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_rmvs_io~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_rmvs_io~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-145 0,-145 0,-121 87,-121 87,-145"/>
+<text text-anchor="middle" x="43.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_rmvs_io~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-133C114.58,-133 105.86,-133 97.36,-133"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-129.5 87.13,-133 97.13,-136.5 97.13,-129.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_rmvs_kick.html b/docs/module/s_rmvs_kick.html
index 9b7bef6d1..dba49323d 100644
--- a/docs/module/s_rmvs_kick.html
+++ b/docs/module/s_rmvs_kick.html
@@ -245,313 +245,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_rmvs_kick~~UsesGraph Pages: 1 -->
-<svg id="modules_rmvs_kickUsesGraph" width="641pt" height="243pt"
- viewBox="0.00 0.00 641.00 243.11" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_rmvs_kick~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 344.93)">
+<svg id="modules_rmvs_kickUsesGraph" width="641pt" height="217pt"
+ viewBox="0.00 0.00 641.00 216.53" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_rmvs_kick~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 306.77)">
 <title>module~~s_rmvs_kick~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-344.93 916,-344.93 916,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-306.77 916,-306.77 916,4 -4,4"/>
 <!-- module~s_rmvs_kick -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node1" class="node">
 <title>module~s_rmvs_kick</title>
-<polygon fill="none" stroke="black" points="912,-64 841,-64 841,-40 912,-40 912,-64"/>
-<text text-anchor="middle" x="876.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_kick</text>
+<polygon fill="none" stroke="black" points="912,-183 841,-183 841,-159 912,-159 912,-183"/>
+<text text-anchor="middle" x="876.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_kick</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_rmvs_kick~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-123 751,-123 751,-99 805,-99 805,-123"/>
-<text text-anchor="middle" x="778" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-144 751,-144 751,-120 805,-120 805,-144"/>
+<text text-anchor="middle" x="778" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge1" class="edge">
 <title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M855.51,-64.22C841.57,-72.75 822.78,-84.24 807.3,-93.7"/>
-<polygon fill="#000000" stroke="#000000" points="805.35,-90.79 798.64,-98.99 809,-96.76 805.35,-90.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M845.76,-158.98C835.94,-155.01 824.91,-150.56 814.69,-146.43"/>
+<polygon fill="#000000" stroke="#000000" points="815.79,-143.1 805.21,-142.59 813.17,-149.59 815.79,-143.1"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node3" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~s_rmvs_kick~~UsesGraph_node3"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-24 511,-24 511,0 588,0 588,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-264 511,-264 511,-240 588,-240 588,-264"/>
+<text text-anchor="middle" x="549.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge2" class="edge">
 <title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M840.72,-47.72C782.28,-40.53 664.29,-26 598.17,-17.87"/>
-<polygon fill="#000000" stroke="#000000" points="598.37,-14.37 588.02,-16.62 597.52,-21.31 598.37,-14.37"/>
+<path fill="none" stroke="#000000" d="M845.5,-183.03C813.6,-195.41 761.45,-214.46 715,-226 676.26,-235.62 631.46,-242.43 598.41,-246.66"/>
+<polygon fill="#000000" stroke="#000000" points="597.6,-243.23 588.11,-247.94 598.47,-250.18 597.6,-243.23"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge4" class="edge">
+<g id="module~~s_rmvs_kick~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.16,-98.75C741.28,-84.24 705.53,-60.91 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C642.39,-45.36 613.75,-35.71 591.22,-27.55"/>
-<polygon fill="#000000" stroke="#000000" points="592.25,-24.2 581.65,-24.04 589.84,-30.77 592.25,-24.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C644.15,-219.92 617.09,-229.06 595.03,-236.61"/>
+<polygon fill="#000000" stroke="#000000" points="593.6,-233.4 585.28,-239.96 595.87,-240.02 593.6,-233.4"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-258 247,-258 247,-234 347,-234 347,-258"/>
-<text text-anchor="middle" x="297" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-184 391,-184 391,-160 467,-160 467,-184"/>
+<text text-anchor="middle" x="429" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C404.98,-244.27 379.6,-243.92 357.42,-244.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.09,-240.63 347.14,-244.26 357.19,-247.63 357.09,-240.63"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C618.63,-228.22 602.94,-212 550.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-199.47 460.61,-188.44"/>
+<polygon fill="#000000" stroke="#000000" points="462.06,-185.26 451.54,-184 458.98,-191.54 462.06,-185.26"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-218 385.5,-218 385.5,-194 472.5,-194 472.5,-218"/>
-<text text-anchor="middle" x="429" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-205 247,-205 247,-181 347,-181 347,-205"/>
+<text text-anchor="middle" x="297" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C617.03,-227.65 604.95,-237.58 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C532.35,-248.5 494.24,-234.23 465.57,-222.06"/>
-<polygon fill="#000000" stroke="#000000" points="466.82,-218.78 456.25,-218.03 464.04,-225.21 466.82,-218.78"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C483.01,-212 408.17,-205.46 357.47,-200.06"/>
+<polygon fill="#000000" stroke="#000000" points="357.67,-196.56 347.35,-198.96 356.91,-203.52 357.67,-196.56"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-104 511.5,-104 511.5,-80 587.5,-80 587.5,-104"/>
-<text text-anchor="middle" x="549.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C635.93,-43.72 599.43,-60.22 575.76,-74.48"/>
-<polygon fill="#000000" stroke="#000000" points="573.65,-71.68 567.06,-79.97 577.38,-77.6 573.65,-71.68"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-132C742.26,-132 732.26,-132 722.32,-132"/>
+<polygon fill="#000000" stroke="#000000" points="722.05,-128.5 712.05,-132 722.05,-135.5 722.05,-128.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-100 391,-100 391,-76 467,-76 467,-100"/>
-<text text-anchor="middle" x="429" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-184 511.5,-184 511.5,-160 587.5,-160 587.5,-184"/>
+<text text-anchor="middle" x="549.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C599.73,-34.51 517.51,-55.95 469.77,-72.44"/>
-<polygon fill="#000000" stroke="#000000" points="468.38,-69.22 460.12,-75.87 470.72,-75.82 468.38,-69.22"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C636.03,-222.56 598.74,-204.89 574.92,-189.79"/>
+<polygon fill="#000000" stroke="#000000" points="576.76,-186.81 566.49,-184.19 572.89,-192.64 576.76,-186.81"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-218 123,-218 123,-194 211,-194 211,-218"/>
-<text text-anchor="middle" x="167" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C496.45,-254.04 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C367.72,-241.46 358.28,-210.54 298,-206"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.86,-122.77C739.84,-118.98 726.84,-114.63 715,-111 659.03,-93.82 645.34,-87.84 588,-76 553.15,-68.8 513.49,-63.29 482.62,-59.58"/>
+<polygon fill="#000000" stroke="#000000" points="482.85,-56.08 472.51,-58.39 482.03,-63.04 482.85,-56.08"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~lambda_function -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-123 627,-123 627,-99 712,-99 712,-123"/>
-<text text-anchor="middle" x="669.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-111C742.26,-111 732.26,-111 722.32,-111"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-107.5 712.05,-111 722.05,-114.5 722.05,-107.5"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.24,-119.75C761.72,-100.47 741.12,-62.74 715,-38 711.86,-35.02 708.31,-32.24 704.63,-29.69"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-26.57 695.92,-24.17 702.49,-32.48 706.24,-26.57"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node10" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_rmvs_kick~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-178 252.5,-178 252.5,-154 341.5,-154 341.5,-178"/>
-<text text-anchor="middle" x="297" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-105 252.5,-105 252.5,-81 341.5,-81 341.5,-105"/>
+<text text-anchor="middle" x="297" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge10" class="edge">
+<g id="module~~s_rmvs_kick~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C567.95,-246.39 536.58,-150.97 430,-166"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.09,-123.22C751.61,-144.75 714.03,-188.95 670.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.07,-144.3C748.28,-163.27 710.97,-198.84 670.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.81,-225.88 627.45,-172.42 588,-151 522.39,-115.38 504.49,-98.9 430,-94"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-299 624,-299 624,-275 715,-275 715,-299"/>
-<text text-anchor="middle" x="669.5" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-264 383,-264 383,-240 475,-240 475,-264"/>
+<text text-anchor="middle" x="429" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M770.65,-123.2C759.8,-143.86 736.75,-186.92 715,-222 705.61,-237.15 694.24,-253.73 685.35,-266.35"/>
-<polygon fill="#000000" stroke="#000000" points="682.31,-264.58 679.37,-274.76 688.02,-268.64 682.31,-264.58"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-224.53 460.61,-235.56"/>
+<polygon fill="#000000" stroke="#000000" points="458.98,-232.46 451.54,-240 462.06,-238.74 458.98,-232.46"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_rmvs_kick~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-145 123,-145 123,-121 211,-121 211,-145"/>
+<text text-anchor="middle" x="167" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C520.15,-250.38 489.5,-260.9 466.47,-270.04"/>
-<polygon fill="#000000" stroke="#000000" points="465.04,-266.85 457.1,-273.86 467.68,-273.33 465.04,-266.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.84,-225.99 629.62,-256.18 588,-273 522.42,-299.5 500.49,-286.19 430,-292"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge14" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531,-24.12C512.87,-36.64 485.72,-55.27 475,-62 470.32,-64.94 465.3,-67.96 460.38,-70.85"/>
-<polygon fill="#000000" stroke="#000000" points="458.6,-67.84 451.71,-75.89 462.11,-73.89 458.6,-67.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.5,-239.85C510.73,-226.5 478.78,-204.93 456.22,-189.7"/>
+<polygon fill="#000000" stroke="#000000" points="458.03,-186.7 447.78,-184 454.11,-192.5 458.03,-186.7"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge13" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-107C251.77,-125.54 209.61,-163.37 186.43,-186.53"/>
-<polygon fill="#000000" stroke="#000000" points="183.83,-184.18 179.32,-193.77 188.82,-189.08 183.83,-184.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.91,-23.09C477.06,-33.41 426.15,-49.75 383,-67 344.23,-82.5 336.51,-90.86 298,-107"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-234C244.68,-229.96 230.09,-225.4 216.5,-221.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-217.77 206.82,-218.13 215.32,-224.45 217.41,-217.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-292C370.42,-296.75 351.92,-312.76 298,-292"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.28,-264.06C500.85,-274.79 463.97,-289.2 430,-292"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.49,-207.61C360.07,-208.17 327.14,-208.2 298,-206"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-206C271.5,-204.15 244.29,-203.9 221.27,-204.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-200.72 211.02,-204.39 221.08,-207.72 220.96,-200.72"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-159.82C398.36,-155.62 390.23,-150.77 383,-146 366.31,-134.98 363.88,-129.72 347,-119 342.17,-115.94 336.95,-112.89 331.77,-110.03"/>
+<polygon fill="#000000" stroke="#000000" points="333.07,-106.75 322.6,-105.1 329.75,-112.92 333.07,-106.75"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.77,-160C374.92,-149.53 334.66,-135.63 298,-133"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-194C375.88,-189.96 361.06,-185.4 347.26,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="348.01,-177.73 337.43,-178.13 345.95,-184.42 348.01,-177.73"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.86C250.84,-171.83 224.35,-159.41 203.17,-149.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-146.2 193.86,-145.12 201.43,-152.54 204.4,-146.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-90.75C500.52,-90.38 488.57,-89.98 477.23,-89.59"/>
-<polygon fill="#000000" stroke="#000000" points="477.15,-86.09 467.04,-89.25 476.91,-93.09 477.15,-86.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C369.48,-127.25 351.98,-84.38 298,-107"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.19,-104.18C500.68,-114.8 463.75,-128.43 430,-128"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-166C403.08,-169.51 375.21,-169.97 351.68,-169.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.66,-165.86 341.55,-169.02 351.43,-172.85 351.66,-165.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.74,-104.23C510.82,-117.92 480.58,-138.63 475,-142 455.6,-153.72 452.44,-162.84 430,-166"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-144C621.42,-147.96 608.26,-152.42 595.94,-156.6"/>
+<polygon fill="#000000" stroke="#000000" points="594.63,-153.34 586.29,-159.87 596.88,-159.97 594.63,-153.34"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.82,-88.53C364.09,-90.07 327.66,-94.57 298,-107"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.97,-100.02C386.37,-112.98 351.78,-133.73 327.16,-148.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.04,-145.7 318.26,-153.84 328.64,-151.7 325.04,-145.7"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C526.34,-82.82 501.71,-75.27 480.68,-68.94"/>
+<polygon fill="#000000" stroke="#000000" points="481.56,-65.56 470.97,-66.04 479.55,-72.26 481.56,-65.56"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_rmvs_kick~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_rmvs_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-218 0,-218 0,-194 87,-194 87,-218"/>
-<text text-anchor="middle" x="43.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C498.37,-73.75 482.58,-97.46 430,-94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C402.99,-92.35 375.21,-91.95 351.77,-92.02"/>
+<polygon fill="#000000" stroke="#000000" points="351.66,-88.52 341.68,-92.07 351.7,-95.52 351.66,-88.52"/>
 </g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.11,-119.91C612.5,-111.24 579.67,-99.46 550.5,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C509.18,-77.25 510.68,-53.88 475,-33 456.26,-22.03 451.46,-17.3 430,-14"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-206C114.58,-206 105.86,-206 97.36,-206"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-202.5 87.13,-206 97.13,-209.5 97.13,-202.5"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-172C500.52,-172 488.57,-172 477.23,-172"/>
+<polygon fill="#000000" stroke="#000000" points="477.04,-168.5 467.04,-172 477.04,-175.5 477.04,-168.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.03,-98.86C633.77,-81.86 596.77,-50.82 572.92,-30.81"/>
-<polygon fill="#000000" stroke="#000000" points="575,-27.98 565.09,-24.24 570.5,-33.35 575,-27.98"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C399.68,-125.32 368.43,-116.01 343.67,-108.16"/>
+<polygon fill="#000000" stroke="#000000" points="344.42,-104.72 333.83,-105.01 342.29,-111.39 344.42,-104.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M517.78,-159.85C494.12,-150.94 460.43,-139.18 430,-132"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.43,-123.15C625.88,-130.03 605.93,-138.7 588,-146 549.21,-161.79 504.56,-178.62 472.64,-190.43"/>
-<polygon fill="#000000" stroke="#000000" points="471.33,-187.18 463.16,-193.92 473.76,-193.75 471.33,-187.18"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge22" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-133C271.49,-131.25 244.28,-131.01 221.27,-131.3"/>
+<polygon fill="#000000" stroke="#000000" points="220.95,-127.81 211.01,-131.47 221.07,-134.8 220.95,-127.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C371.76,-118.73 355.63,-137.13 298,-133"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_kick~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-104.3C617.54,-102.79 607.54,-101.19 597.97,-99.64"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-96.14 587.8,-98.01 597.11,-103.05 598.22,-96.14"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.93,-66.02C375.33,-69.8 361.25,-74.02 348.05,-77.99"/>
+<polygon fill="#000000" stroke="#000000" points="346.73,-74.73 338.16,-80.95 348.74,-81.43 346.73,-74.73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.81,-119C604.27,-123.18 575.91,-128.2 550.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.38,-139.8 482.69,-128.68 430,-128"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-42C369.43,-28.18 317.43,-8.09 298,-14"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C494.31,-140.11 484.26,-158.35 430,-166"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C243.39,-30.01 201.11,-83 180.91,-112.58"/>
+<polygon fill="#000000" stroke="#000000" points="177.97,-110.68 175.36,-120.94 183.81,-114.55 177.97,-110.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.27,2.82 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge29" class="edge">
+<g id="module~~s_rmvs_kick~~UsesGraph_edge28" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-178C244.68,-182.04 230.09,-186.6 216.5,-190.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-187.55 206.82,-193.87 217.41,-194.23 215.32,-187.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.45,-299.06C569.66,-321.21 418.27,-362.88 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-105C244.68,-109.04 230.09,-113.6 216.5,-117.84"/>
+<polygon fill="#000000" stroke="#000000" points="215.32,-114.55 206.82,-120.87 217.41,-121.23 215.32,-114.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_kick~~UsesGraph_edge31" class="edge">
+<g id="module~~s_rmvs_kick~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C243.22,-309.81 201.01,-256.4 180.87,-226.58"/>
-<polygon fill="#000000" stroke="#000000" points="183.75,-224.59 175.33,-218.15 177.89,-228.43 183.75,-224.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-298.02C369.43,-311.85 317.42,-331.95 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-292C233.43,-267.91 193.43,-192.57 176.81,-154.9"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-153.18 172.75,-145.35 173.44,-155.92 179.89,-153.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.15,-264.08C370.03,-278.37 317.12,-299.36 298,-292"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_rmvs_kick~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_rmvs_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-145 0,-145 0,-121 87,-121 87,-145"/>
+<text text-anchor="middle" x="43.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_rmvs_kick~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-133C114.58,-133 105.86,-133 97.36,-133"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-129.5 87.13,-133 97.13,-136.5 97.13,-129.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_rmvs_setup.html b/docs/module/s_rmvs_setup.html
index fd6d03268..a6a4012bf 100644
--- a/docs/module/s_rmvs_setup.html
+++ b/docs/module/s_rmvs_setup.html
@@ -249,313 +249,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_rmvs_setup~~UsesGraph Pages: 1 -->
-<svg id="modules_rmvs_setupUsesGraph" width="641pt" height="241pt"
- viewBox="0.00 0.00 641.00 241.02" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_rmvs_setup~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 344.93)">
+<svg id="modules_rmvs_setupUsesGraph" width="641pt" height="215pt"
+ viewBox="0.00 0.00 641.00 214.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_rmvs_setup~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 306.77)">
 <title>module~~s_rmvs_setup~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-344.93 924,-344.93 924,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-306.77 924,-306.77 924,4 -4,4"/>
 <!-- module~s_rmvs_setup -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node1" class="node">
 <title>module~s_rmvs_setup</title>
-<polygon fill="none" stroke="black" points="920,-64 841,-64 841,-40 920,-40 920,-64"/>
-<text text-anchor="middle" x="880.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_setup</text>
+<polygon fill="none" stroke="black" points="920,-183 841,-183 841,-159 920,-159 920,-183"/>
+<text text-anchor="middle" x="880.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_setup</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_rmvs_setup~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-123 751,-123 751,-99 805,-99 805,-123"/>
-<text text-anchor="middle" x="778" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-144 751,-144 751,-120 805,-120 805,-144"/>
+<text text-anchor="middle" x="778" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge1" class="edge">
 <title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.68,-64.22C844.16,-72.75 824.59,-84.24 808.48,-93.7"/>
-<polygon fill="#000000" stroke="#000000" points="806.3,-90.91 799.45,-98.99 809.85,-96.95 806.3,-90.91"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M848.53,-158.98C837.82,-154.83 825.74,-150.14 814.69,-145.85"/>
+<polygon fill="#000000" stroke="#000000" points="815.89,-142.56 805.3,-142.21 813.35,-149.09 815.89,-142.56"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node3" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~s_rmvs_setup~~UsesGraph_node3"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-24 511,-24 511,0 588,0 588,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-264 511,-264 511,-240 588,-240 588,-264"/>
+<text text-anchor="middle" x="549.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge2" class="edge">
 <title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M840.79,-47.29C780.33,-39.94 663.63,-25.75 598.11,-17.79"/>
-<polygon fill="#000000" stroke="#000000" points="598.4,-14.3 588.05,-16.57 597.55,-21.25 598.4,-14.3"/>
+<path fill="none" stroke="#000000" d="M848.72,-183C816,-195.35 762.53,-214.38 715,-226 676.22,-235.48 631.43,-242.29 598.38,-246.56"/>
+<polygon fill="#000000" stroke="#000000" points="597.57,-243.14 588.09,-247.86 598.45,-250.08 597.57,-243.14"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge4" class="edge">
+<g id="module~~s_rmvs_setup~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.16,-98.75C741.28,-84.24 705.53,-60.91 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C642.39,-45.36 613.75,-35.71 591.22,-27.55"/>
-<polygon fill="#000000" stroke="#000000" points="592.25,-24.2 581.65,-24.04 589.84,-30.77 592.25,-24.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C644.15,-219.92 617.09,-229.06 595.03,-236.61"/>
+<polygon fill="#000000" stroke="#000000" points="593.6,-233.4 585.28,-239.96 595.87,-240.02 593.6,-233.4"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-258 247,-258 247,-234 347,-234 347,-258"/>
-<text text-anchor="middle" x="297" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-184 391,-184 391,-160 467,-160 467,-184"/>
+<text text-anchor="middle" x="429" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C404.98,-244.27 379.6,-243.92 357.42,-244.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.09,-240.63 347.14,-244.26 357.19,-247.63 357.09,-240.63"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C618.63,-228.22 602.94,-212 550.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-199.47 460.61,-188.44"/>
+<polygon fill="#000000" stroke="#000000" points="462.06,-185.26 451.54,-184 458.98,-191.54 462.06,-185.26"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-218 385.5,-218 385.5,-194 472.5,-194 472.5,-218"/>
-<text text-anchor="middle" x="429" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-205 247,-205 247,-181 347,-181 347,-205"/>
+<text text-anchor="middle" x="297" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C617.03,-227.65 604.95,-237.58 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C532.35,-248.5 494.24,-234.23 465.57,-222.06"/>
-<polygon fill="#000000" stroke="#000000" points="466.82,-218.78 456.25,-218.03 464.04,-225.21 466.82,-218.78"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C483.01,-212 408.17,-205.46 357.47,-200.06"/>
+<polygon fill="#000000" stroke="#000000" points="357.67,-196.56 347.35,-198.96 356.91,-203.52 357.67,-196.56"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-104 511.5,-104 511.5,-80 587.5,-80 587.5,-104"/>
-<text text-anchor="middle" x="549.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C635.93,-43.72 599.43,-60.22 575.76,-74.48"/>
-<polygon fill="#000000" stroke="#000000" points="573.65,-71.68 567.06,-79.97 577.38,-77.6 573.65,-71.68"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-132C742.26,-132 732.26,-132 722.32,-132"/>
+<polygon fill="#000000" stroke="#000000" points="722.05,-128.5 712.05,-132 722.05,-135.5 722.05,-128.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-100 391,-100 391,-76 467,-76 467,-100"/>
-<text text-anchor="middle" x="429" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-184 511.5,-184 511.5,-160 587.5,-160 587.5,-184"/>
+<text text-anchor="middle" x="549.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C599.73,-34.51 517.51,-55.95 469.77,-72.44"/>
-<polygon fill="#000000" stroke="#000000" points="468.38,-69.22 460.12,-75.87 470.72,-75.82 468.38,-69.22"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C636.03,-222.56 598.74,-204.89 574.92,-189.79"/>
+<polygon fill="#000000" stroke="#000000" points="576.76,-186.81 566.49,-184.19 572.89,-192.64 576.76,-186.81"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-218 123,-218 123,-194 211,-194 211,-218"/>
-<text text-anchor="middle" x="167" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C496.45,-254.04 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C367.72,-241.46 358.28,-210.54 298,-206"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.86,-122.77C739.84,-118.98 726.84,-114.63 715,-111 659.03,-93.82 645.34,-87.84 588,-76 553.15,-68.8 513.49,-63.29 482.62,-59.58"/>
+<polygon fill="#000000" stroke="#000000" points="482.85,-56.08 472.51,-58.39 482.03,-63.04 482.85,-56.08"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~lambda_function -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-123 627,-123 627,-99 712,-99 712,-123"/>
-<text text-anchor="middle" x="669.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-111C742.26,-111 732.26,-111 722.32,-111"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-107.5 712.05,-111 722.05,-114.5 722.05,-107.5"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.24,-119.75C761.72,-100.47 741.12,-62.74 715,-38 711.86,-35.02 708.31,-32.24 704.63,-29.69"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-26.57 695.92,-24.17 702.49,-32.48 706.24,-26.57"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node10" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_rmvs_setup~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-178 252.5,-178 252.5,-154 341.5,-154 341.5,-178"/>
-<text text-anchor="middle" x="297" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-105 252.5,-105 252.5,-81 341.5,-81 341.5,-105"/>
+<text text-anchor="middle" x="297" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge10" class="edge">
+<g id="module~~s_rmvs_setup~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C567.95,-246.39 536.58,-150.97 430,-166"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.09,-123.22C751.61,-144.75 714.03,-188.95 670.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.07,-144.3C748.28,-163.27 710.97,-198.84 670.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.81,-225.88 627.45,-172.42 588,-151 522.39,-115.38 504.49,-98.9 430,-94"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-299 624,-299 624,-275 715,-275 715,-299"/>
-<text text-anchor="middle" x="669.5" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-264 383,-264 383,-240 475,-240 475,-264"/>
+<text text-anchor="middle" x="429" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M770.65,-123.2C759.8,-143.86 736.75,-186.92 715,-222 705.61,-237.15 694.24,-253.73 685.35,-266.35"/>
-<polygon fill="#000000" stroke="#000000" points="682.31,-264.58 679.37,-274.76 688.02,-268.64 682.31,-264.58"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-224.53 460.61,-235.56"/>
+<polygon fill="#000000" stroke="#000000" points="458.98,-232.46 451.54,-240 462.06,-238.74 458.98,-232.46"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_rmvs_setup~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-145 123,-145 123,-121 211,-121 211,-145"/>
+<text text-anchor="middle" x="167" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C520.15,-250.38 489.5,-260.9 466.47,-270.04"/>
-<polygon fill="#000000" stroke="#000000" points="465.04,-266.85 457.1,-273.86 467.68,-273.33 465.04,-266.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.84,-225.99 629.62,-256.18 588,-273 522.42,-299.5 500.49,-286.19 430,-292"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge14" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531,-24.12C512.87,-36.64 485.72,-55.27 475,-62 470.32,-64.94 465.3,-67.96 460.38,-70.85"/>
-<polygon fill="#000000" stroke="#000000" points="458.6,-67.84 451.71,-75.89 462.11,-73.89 458.6,-67.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.5,-239.85C510.73,-226.5 478.78,-204.93 456.22,-189.7"/>
+<polygon fill="#000000" stroke="#000000" points="458.03,-186.7 447.78,-184 454.11,-192.5 458.03,-186.7"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge13" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-107C251.77,-125.54 209.61,-163.37 186.43,-186.53"/>
-<polygon fill="#000000" stroke="#000000" points="183.83,-184.18 179.32,-193.77 188.82,-189.08 183.83,-184.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.91,-23.09C477.06,-33.41 426.15,-49.75 383,-67 344.23,-82.5 336.51,-90.86 298,-107"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-234C244.68,-229.96 230.09,-225.4 216.5,-221.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-217.77 206.82,-218.13 215.32,-224.45 217.41,-217.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-292C370.42,-296.75 351.92,-312.76 298,-292"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.28,-264.06C500.85,-274.79 463.97,-289.2 430,-292"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.49,-207.61C360.07,-208.17 327.14,-208.2 298,-206"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-206C271.5,-204.15 244.29,-203.9 221.27,-204.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-200.72 211.02,-204.39 221.08,-207.72 220.96,-200.72"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-159.82C398.36,-155.62 390.23,-150.77 383,-146 366.31,-134.98 363.88,-129.72 347,-119 342.17,-115.94 336.95,-112.89 331.77,-110.03"/>
+<polygon fill="#000000" stroke="#000000" points="333.07,-106.75 322.6,-105.1 329.75,-112.92 333.07,-106.75"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.77,-160C374.92,-149.53 334.66,-135.63 298,-133"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-194C375.88,-189.96 361.06,-185.4 347.26,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="348.01,-177.73 337.43,-178.13 345.95,-184.42 348.01,-177.73"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.86C250.84,-171.83 224.35,-159.41 203.17,-149.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-146.2 193.86,-145.12 201.43,-152.54 204.4,-146.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-90.75C500.52,-90.38 488.57,-89.98 477.23,-89.59"/>
-<polygon fill="#000000" stroke="#000000" points="477.15,-86.09 467.04,-89.25 476.91,-93.09 477.15,-86.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C369.48,-127.25 351.98,-84.38 298,-107"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.19,-104.18C500.68,-114.8 463.75,-128.43 430,-128"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-166C403.08,-169.51 375.21,-169.97 351.68,-169.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.66,-165.86 341.55,-169.02 351.43,-172.85 351.66,-165.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.74,-104.23C510.82,-117.92 480.58,-138.63 475,-142 455.6,-153.72 452.44,-162.84 430,-166"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-144C621.42,-147.96 608.26,-152.42 595.94,-156.6"/>
+<polygon fill="#000000" stroke="#000000" points="594.63,-153.34 586.29,-159.87 596.88,-159.97 594.63,-153.34"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.82,-88.53C364.09,-90.07 327.66,-94.57 298,-107"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.97,-100.02C386.37,-112.98 351.78,-133.73 327.16,-148.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.04,-145.7 318.26,-153.84 328.64,-151.7 325.04,-145.7"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C526.34,-82.82 501.71,-75.27 480.68,-68.94"/>
+<polygon fill="#000000" stroke="#000000" points="481.56,-65.56 470.97,-66.04 479.55,-72.26 481.56,-65.56"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_rmvs_setup~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_rmvs_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-218 0,-218 0,-194 87,-194 87,-218"/>
-<text text-anchor="middle" x="43.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C498.37,-73.75 482.58,-97.46 430,-94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C402.99,-92.35 375.21,-91.95 351.77,-92.02"/>
+<polygon fill="#000000" stroke="#000000" points="351.66,-88.52 341.68,-92.07 351.7,-95.52 351.66,-88.52"/>
 </g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.11,-119.91C612.5,-111.24 579.67,-99.46 550.5,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C509.18,-77.25 510.68,-53.88 475,-33 456.26,-22.03 451.46,-17.3 430,-14"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-206C114.58,-206 105.86,-206 97.36,-206"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-202.5 87.13,-206 97.13,-209.5 97.13,-202.5"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-172C500.52,-172 488.57,-172 477.23,-172"/>
+<polygon fill="#000000" stroke="#000000" points="477.04,-168.5 467.04,-172 477.04,-175.5 477.04,-168.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.03,-98.86C633.77,-81.86 596.77,-50.82 572.92,-30.81"/>
-<polygon fill="#000000" stroke="#000000" points="575,-27.98 565.09,-24.24 570.5,-33.35 575,-27.98"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C399.68,-125.32 368.43,-116.01 343.67,-108.16"/>
+<polygon fill="#000000" stroke="#000000" points="344.42,-104.72 333.83,-105.01 342.29,-111.39 344.42,-104.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M517.78,-159.85C494.12,-150.94 460.43,-139.18 430,-132"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.43,-123.15C625.88,-130.03 605.93,-138.7 588,-146 549.21,-161.79 504.56,-178.62 472.64,-190.43"/>
-<polygon fill="#000000" stroke="#000000" points="471.33,-187.18 463.16,-193.92 473.76,-193.75 471.33,-187.18"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge22" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-133C271.49,-131.25 244.28,-131.01 221.27,-131.3"/>
+<polygon fill="#000000" stroke="#000000" points="220.95,-127.81 211.01,-131.47 221.07,-134.8 220.95,-127.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C371.76,-118.73 355.63,-137.13 298,-133"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_setup~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-104.3C617.54,-102.79 607.54,-101.19 597.97,-99.64"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-96.14 587.8,-98.01 597.11,-103.05 598.22,-96.14"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.93,-66.02C375.33,-69.8 361.25,-74.02 348.05,-77.99"/>
+<polygon fill="#000000" stroke="#000000" points="346.73,-74.73 338.16,-80.95 348.74,-81.43 346.73,-74.73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.81,-119C604.27,-123.18 575.91,-128.2 550.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.38,-139.8 482.69,-128.68 430,-128"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-42C369.43,-28.18 317.43,-8.09 298,-14"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C494.31,-140.11 484.26,-158.35 430,-166"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C243.39,-30.01 201.11,-83 180.91,-112.58"/>
+<polygon fill="#000000" stroke="#000000" points="177.97,-110.68 175.36,-120.94 183.81,-114.55 177.97,-110.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.27,2.82 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge29" class="edge">
+<g id="module~~s_rmvs_setup~~UsesGraph_edge28" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-178C244.68,-182.04 230.09,-186.6 216.5,-190.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-187.55 206.82,-193.87 217.41,-194.23 215.32,-187.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.45,-299.06C569.66,-321.21 418.27,-362.88 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-105C244.68,-109.04 230.09,-113.6 216.5,-117.84"/>
+<polygon fill="#000000" stroke="#000000" points="215.32,-114.55 206.82,-120.87 217.41,-121.23 215.32,-114.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_setup~~UsesGraph_edge31" class="edge">
+<g id="module~~s_rmvs_setup~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C243.22,-309.81 201.01,-256.4 180.87,-226.58"/>
-<polygon fill="#000000" stroke="#000000" points="183.75,-224.59 175.33,-218.15 177.89,-228.43 183.75,-224.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-298.02C369.43,-311.85 317.42,-331.95 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-292C233.43,-267.91 193.43,-192.57 176.81,-154.9"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-153.18 172.75,-145.35 173.44,-155.92 179.89,-153.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.15,-264.08C370.03,-278.37 317.12,-299.36 298,-292"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_rmvs_setup~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_rmvs_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-145 0,-145 0,-121 87,-121 87,-145"/>
+<text text-anchor="middle" x="43.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_rmvs_setup~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-133C114.58,-133 105.86,-133 97.36,-133"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-129.5 87.13,-133 97.13,-136.5 97.13,-129.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_rmvs_step.html b/docs/module/s_rmvs_step.html
index 87470bb89..55099945e 100644
--- a/docs/module/s_rmvs_step.html
+++ b/docs/module/s_rmvs_step.html
@@ -269,313 +269,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_rmvs_step~~UsesGraph Pages: 1 -->
-<svg id="modules_rmvs_stepUsesGraph" width="641pt" height="243pt"
- viewBox="0.00 0.00 641.00 242.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_rmvs_step~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 344.93)">
+<svg id="modules_rmvs_stepUsesGraph" width="641pt" height="216pt"
+ viewBox="0.00 0.00 641.00 216.06" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_rmvs_step~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 306.77)">
 <title>module~~s_rmvs_step~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-344.93 918,-344.93 918,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-306.77 918,-306.77 918,4 -4,4"/>
 <!-- module~s_rmvs_step -->
 <g id="module~~s_rmvs_step~~UsesGraph_node1" class="node">
 <title>module~s_rmvs_step</title>
-<polygon fill="none" stroke="black" points="914,-64 841,-64 841,-40 914,-40 914,-64"/>
-<text text-anchor="middle" x="877.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_step</text>
+<polygon fill="none" stroke="black" points="914,-183 841,-183 841,-159 914,-159 914,-183"/>
+<text text-anchor="middle" x="877.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_step</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_rmvs_step~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_rmvs_step~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-123 751,-123 751,-99 805,-99 805,-123"/>
-<text text-anchor="middle" x="778" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-144 751,-144 751,-120 805,-120 805,-144"/>
+<text text-anchor="middle" x="778" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge1" class="edge">
 <title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.3,-64.22C842.22,-72.75 823.23,-84.24 807.6,-93.7"/>
-<polygon fill="#000000" stroke="#000000" points="805.59,-90.82 798.84,-98.99 809.21,-96.81 805.59,-90.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M846.45,-158.98C836.34,-154.94 824.97,-150.39 814.48,-146.19"/>
+<polygon fill="#000000" stroke="#000000" points="815.74,-142.93 805.16,-142.46 813.14,-149.43 815.74,-142.93"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_node3" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~s_rmvs_step~~UsesGraph_node3"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-24 511,-24 511,0 588,0 588,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-264 511,-264 511,-240 588,-240 588,-264"/>
+<text text-anchor="middle" x="549.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge2" class="edge">
 <title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M840.99,-47.64C782.17,-40.43 664.47,-25.98 598.37,-17.87"/>
-<polygon fill="#000000" stroke="#000000" points="598.57,-14.37 588.22,-16.63 597.72,-21.32 598.57,-14.37"/>
+<path fill="none" stroke="#000000" d="M846.3,-183.03C814.2,-195.4 761.72,-214.44 715,-226 676.25,-235.59 631.45,-242.39 598.4,-246.63"/>
+<polygon fill="#000000" stroke="#000000" points="597.59,-243.21 588.1,-247.92 598.46,-250.15 597.59,-243.21"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge4" class="edge">
+<g id="module~~s_rmvs_step~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.16,-98.75C741.28,-84.24 705.53,-60.91 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C642.39,-45.36 613.75,-35.71 591.22,-27.55"/>
-<polygon fill="#000000" stroke="#000000" points="592.25,-24.2 581.65,-24.04 589.84,-30.77 592.25,-24.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C644.15,-219.92 617.09,-229.06 595.03,-236.61"/>
+<polygon fill="#000000" stroke="#000000" points="593.6,-233.4 585.28,-239.96 595.87,-240.02 593.6,-233.4"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-258 247,-258 247,-234 347,-234 347,-258"/>
-<text text-anchor="middle" x="297" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-184 391,-184 391,-160 467,-160 467,-184"/>
+<text text-anchor="middle" x="429" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C404.98,-244.27 379.6,-243.92 357.42,-244.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.09,-240.63 347.14,-244.26 357.19,-247.63 357.09,-240.63"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C618.63,-228.22 602.94,-212 550.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-199.47 460.61,-188.44"/>
+<polygon fill="#000000" stroke="#000000" points="462.06,-185.26 451.54,-184 458.98,-191.54 462.06,-185.26"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_rmvs_step~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-218 385.5,-218 385.5,-194 472.5,-194 472.5,-218"/>
-<text text-anchor="middle" x="429" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-205 247,-205 247,-181 347,-181 347,-205"/>
+<text text-anchor="middle" x="297" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C617.03,-227.65 604.95,-237.58 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C532.35,-248.5 494.24,-234.23 465.57,-222.06"/>
-<polygon fill="#000000" stroke="#000000" points="466.82,-218.78 456.25,-218.03 464.04,-225.21 466.82,-218.78"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C483.01,-212 408.17,-205.46 357.47,-200.06"/>
+<polygon fill="#000000" stroke="#000000" points="357.67,-196.56 347.35,-198.96 356.91,-203.52 357.67,-196.56"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-104 511.5,-104 511.5,-80 587.5,-80 587.5,-104"/>
-<text text-anchor="middle" x="549.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C635.93,-43.72 599.43,-60.22 575.76,-74.48"/>
-<polygon fill="#000000" stroke="#000000" points="573.65,-71.68 567.06,-79.97 577.38,-77.6 573.65,-71.68"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-132C742.26,-132 732.26,-132 722.32,-132"/>
+<polygon fill="#000000" stroke="#000000" points="722.05,-128.5 712.05,-132 722.05,-135.5 722.05,-128.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-100 391,-100 391,-76 467,-76 467,-100"/>
-<text text-anchor="middle" x="429" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-184 511.5,-184 511.5,-160 587.5,-160 587.5,-184"/>
+<text text-anchor="middle" x="549.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C599.73,-34.51 517.51,-55.95 469.77,-72.44"/>
-<polygon fill="#000000" stroke="#000000" points="468.38,-69.22 460.12,-75.87 470.72,-75.82 468.38,-69.22"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C636.03,-222.56 598.74,-204.89 574.92,-189.79"/>
+<polygon fill="#000000" stroke="#000000" points="576.76,-186.81 566.49,-184.19 572.89,-192.64 576.76,-186.81"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-218 123,-218 123,-194 211,-194 211,-218"/>
-<text text-anchor="middle" x="167" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C496.45,-254.04 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C367.72,-241.46 358.28,-210.54 298,-206"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.86,-122.77C739.84,-118.98 726.84,-114.63 715,-111 659.03,-93.82 645.34,-87.84 588,-76 553.15,-68.8 513.49,-63.29 482.62,-59.58"/>
+<polygon fill="#000000" stroke="#000000" points="482.85,-56.08 472.51,-58.39 482.03,-63.04 482.85,-56.08"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~lambda_function -->
 <g id="module~~s_rmvs_step~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-123 627,-123 627,-99 712,-99 712,-123"/>
-<text text-anchor="middle" x="669.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-111C742.26,-111 732.26,-111 722.32,-111"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-107.5 712.05,-111 722.05,-114.5 722.05,-107.5"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.24,-119.75C761.72,-100.47 741.12,-62.74 715,-38 711.86,-35.02 708.31,-32.24 704.63,-29.69"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-26.57 695.92,-24.17 702.49,-32.48 706.24,-26.57"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_node10" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_rmvs_step~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-178 252.5,-178 252.5,-154 341.5,-154 341.5,-178"/>
-<text text-anchor="middle" x="297" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-105 252.5,-105 252.5,-81 341.5,-81 341.5,-105"/>
+<text text-anchor="middle" x="297" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge10" class="edge">
+<g id="module~~s_rmvs_step~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C567.95,-246.39 536.58,-150.97 430,-166"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.09,-123.22C751.61,-144.75 714.03,-188.95 670.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.07,-144.3C748.28,-163.27 710.97,-198.84 670.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.81,-225.88 627.45,-172.42 588,-151 522.39,-115.38 504.49,-98.9 430,-94"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-299 624,-299 624,-275 715,-275 715,-299"/>
-<text text-anchor="middle" x="669.5" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-264 383,-264 383,-240 475,-240 475,-264"/>
+<text text-anchor="middle" x="429" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M770.65,-123.2C759.8,-143.86 736.75,-186.92 715,-222 705.61,-237.15 694.24,-253.73 685.35,-266.35"/>
-<polygon fill="#000000" stroke="#000000" points="682.31,-264.58 679.37,-274.76 688.02,-268.64 682.31,-264.58"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-224.53 460.61,-235.56"/>
+<polygon fill="#000000" stroke="#000000" points="458.98,-232.46 451.54,-240 462.06,-238.74 458.98,-232.46"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_rmvs_step~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-145 123,-145 123,-121 211,-121 211,-145"/>
+<text text-anchor="middle" x="167" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C520.15,-250.38 489.5,-260.9 466.47,-270.04"/>
-<polygon fill="#000000" stroke="#000000" points="465.04,-266.85 457.1,-273.86 467.68,-273.33 465.04,-266.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.84,-225.99 629.62,-256.18 588,-273 522.42,-299.5 500.49,-286.19 430,-292"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge14" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531,-24.12C512.87,-36.64 485.72,-55.27 475,-62 470.32,-64.94 465.3,-67.96 460.38,-70.85"/>
-<polygon fill="#000000" stroke="#000000" points="458.6,-67.84 451.71,-75.89 462.11,-73.89 458.6,-67.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.5,-239.85C510.73,-226.5 478.78,-204.93 456.22,-189.7"/>
+<polygon fill="#000000" stroke="#000000" points="458.03,-186.7 447.78,-184 454.11,-192.5 458.03,-186.7"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge13" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-107C251.77,-125.54 209.61,-163.37 186.43,-186.53"/>
-<polygon fill="#000000" stroke="#000000" points="183.83,-184.18 179.32,-193.77 188.82,-189.08 183.83,-184.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.91,-23.09C477.06,-33.41 426.15,-49.75 383,-67 344.23,-82.5 336.51,-90.86 298,-107"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-234C244.68,-229.96 230.09,-225.4 216.5,-221.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-217.77 206.82,-218.13 215.32,-224.45 217.41,-217.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-292C370.42,-296.75 351.92,-312.76 298,-292"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.28,-264.06C500.85,-274.79 463.97,-289.2 430,-292"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.49,-207.61C360.07,-208.17 327.14,-208.2 298,-206"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-206C271.5,-204.15 244.29,-203.9 221.27,-204.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-200.72 211.02,-204.39 221.08,-207.72 220.96,-200.72"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-159.82C398.36,-155.62 390.23,-150.77 383,-146 366.31,-134.98 363.88,-129.72 347,-119 342.17,-115.94 336.95,-112.89 331.77,-110.03"/>
+<polygon fill="#000000" stroke="#000000" points="333.07,-106.75 322.6,-105.1 329.75,-112.92 333.07,-106.75"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.77,-160C374.92,-149.53 334.66,-135.63 298,-133"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-194C375.88,-189.96 361.06,-185.4 347.26,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="348.01,-177.73 337.43,-178.13 345.95,-184.42 348.01,-177.73"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.86C250.84,-171.83 224.35,-159.41 203.17,-149.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-146.2 193.86,-145.12 201.43,-152.54 204.4,-146.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-90.75C500.52,-90.38 488.57,-89.98 477.23,-89.59"/>
-<polygon fill="#000000" stroke="#000000" points="477.15,-86.09 467.04,-89.25 476.91,-93.09 477.15,-86.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C369.48,-127.25 351.98,-84.38 298,-107"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.19,-104.18C500.68,-114.8 463.75,-128.43 430,-128"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-166C403.08,-169.51 375.21,-169.97 351.68,-169.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.66,-165.86 341.55,-169.02 351.43,-172.85 351.66,-165.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.74,-104.23C510.82,-117.92 480.58,-138.63 475,-142 455.6,-153.72 452.44,-162.84 430,-166"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-144C621.42,-147.96 608.26,-152.42 595.94,-156.6"/>
+<polygon fill="#000000" stroke="#000000" points="594.63,-153.34 586.29,-159.87 596.88,-159.97 594.63,-153.34"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.82,-88.53C364.09,-90.07 327.66,-94.57 298,-107"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.97,-100.02C386.37,-112.98 351.78,-133.73 327.16,-148.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.04,-145.7 318.26,-153.84 328.64,-151.7 325.04,-145.7"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C526.34,-82.82 501.71,-75.27 480.68,-68.94"/>
+<polygon fill="#000000" stroke="#000000" points="481.56,-65.56 470.97,-66.04 479.55,-72.26 481.56,-65.56"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_rmvs_step~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_rmvs_step~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-218 0,-218 0,-194 87,-194 87,-218"/>
-<text text-anchor="middle" x="43.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C498.37,-73.75 482.58,-97.46 430,-94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C402.99,-92.35 375.21,-91.95 351.77,-92.02"/>
+<polygon fill="#000000" stroke="#000000" points="351.66,-88.52 341.68,-92.07 351.7,-95.52 351.66,-88.52"/>
 </g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.11,-119.91C612.5,-111.24 579.67,-99.46 550.5,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C509.18,-77.25 510.68,-53.88 475,-33 456.26,-22.03 451.46,-17.3 430,-14"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-206C114.58,-206 105.86,-206 97.36,-206"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-202.5 87.13,-206 97.13,-209.5 97.13,-202.5"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-172C500.52,-172 488.57,-172 477.23,-172"/>
+<polygon fill="#000000" stroke="#000000" points="477.04,-168.5 467.04,-172 477.04,-175.5 477.04,-168.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.03,-98.86C633.77,-81.86 596.77,-50.82 572.92,-30.81"/>
-<polygon fill="#000000" stroke="#000000" points="575,-27.98 565.09,-24.24 570.5,-33.35 575,-27.98"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C399.68,-125.32 368.43,-116.01 343.67,-108.16"/>
+<polygon fill="#000000" stroke="#000000" points="344.42,-104.72 333.83,-105.01 342.29,-111.39 344.42,-104.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M517.78,-159.85C494.12,-150.94 460.43,-139.18 430,-132"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.43,-123.15C625.88,-130.03 605.93,-138.7 588,-146 549.21,-161.79 504.56,-178.62 472.64,-190.43"/>
-<polygon fill="#000000" stroke="#000000" points="471.33,-187.18 463.16,-193.92 473.76,-193.75 471.33,-187.18"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge22" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-133C271.49,-131.25 244.28,-131.01 221.27,-131.3"/>
+<polygon fill="#000000" stroke="#000000" points="220.95,-127.81 211.01,-131.47 221.07,-134.8 220.95,-127.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C371.76,-118.73 355.63,-137.13 298,-133"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_step~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-104.3C617.54,-102.79 607.54,-101.19 597.97,-99.64"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-96.14 587.8,-98.01 597.11,-103.05 598.22,-96.14"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.93,-66.02C375.33,-69.8 361.25,-74.02 348.05,-77.99"/>
+<polygon fill="#000000" stroke="#000000" points="346.73,-74.73 338.16,-80.95 348.74,-81.43 346.73,-74.73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.81,-119C604.27,-123.18 575.91,-128.2 550.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.38,-139.8 482.69,-128.68 430,-128"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-42C369.43,-28.18 317.43,-8.09 298,-14"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C494.31,-140.11 484.26,-158.35 430,-166"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C243.39,-30.01 201.11,-83 180.91,-112.58"/>
+<polygon fill="#000000" stroke="#000000" points="177.97,-110.68 175.36,-120.94 183.81,-114.55 177.97,-110.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.27,2.82 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge29" class="edge">
+<g id="module~~s_rmvs_step~~UsesGraph_edge28" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-178C244.68,-182.04 230.09,-186.6 216.5,-190.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-187.55 206.82,-193.87 217.41,-194.23 215.32,-187.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.45,-299.06C569.66,-321.21 418.27,-362.88 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-105C244.68,-109.04 230.09,-113.6 216.5,-117.84"/>
+<polygon fill="#000000" stroke="#000000" points="215.32,-114.55 206.82,-120.87 217.41,-121.23 215.32,-114.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_step~~UsesGraph_edge31" class="edge">
+<g id="module~~s_rmvs_step~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C243.22,-309.81 201.01,-256.4 180.87,-226.58"/>
-<polygon fill="#000000" stroke="#000000" points="183.75,-224.59 175.33,-218.15 177.89,-228.43 183.75,-224.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-298.02C369.43,-311.85 317.42,-331.95 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-292C233.43,-267.91 193.43,-192.57 176.81,-154.9"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-153.18 172.75,-145.35 173.44,-155.92 179.89,-153.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.15,-264.08C370.03,-278.37 317.12,-299.36 298,-292"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_rmvs_step~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_rmvs_step~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-145 0,-145 0,-121 87,-121 87,-145"/>
+<text text-anchor="middle" x="43.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_rmvs_step~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-133C114.58,-133 105.86,-133 97.36,-133"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-129.5 87.13,-133 97.13,-136.5 97.13,-129.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_rmvs_util.html b/docs/module/s_rmvs_util.html
index 28d26093d..1b52f3f65 100644
--- a/docs/module/s_rmvs_util.html
+++ b/docs/module/s_rmvs_util.html
@@ -267,313 +267,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_rmvs_util~~UsesGraph Pages: 1 -->
-<svg id="modules_rmvs_utilUsesGraph" width="641pt" height="244pt"
- viewBox="0.00 0.00 641.00 244.17" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_rmvs_util~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 344.93)">
+<svg id="modules_rmvs_utilUsesGraph" width="641pt" height="217pt"
+ viewBox="0.00 0.00 641.00 217.47" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_rmvs_util~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 306.77)">
 <title>module~~s_rmvs_util~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-344.93 912,-344.93 912,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-306.77 912,-306.77 912,4 -4,4"/>
 <!-- module~s_rmvs_util -->
 <g id="module~~s_rmvs_util~~UsesGraph_node1" class="node">
 <title>module~s_rmvs_util</title>
-<polygon fill="none" stroke="black" points="908,-64 841,-64 841,-40 908,-40 908,-64"/>
-<text text-anchor="middle" x="874.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_util</text>
+<polygon fill="none" stroke="black" points="908,-183 841,-183 841,-159 908,-159 908,-183"/>
+<text text-anchor="middle" x="874.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_rmvs_util</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_rmvs_util~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_rmvs_util~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-123 751,-123 751,-99 805,-99 805,-123"/>
-<text text-anchor="middle" x="778" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-144 751,-144 751,-120 805,-120 805,-144"/>
+<text text-anchor="middle" x="778" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge1" class="edge">
 <title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.92,-64.22C840.27,-72.75 821.87,-84.24 806.72,-93.7"/>
-<polygon fill="#000000" stroke="#000000" points="804.86,-90.73 798.23,-98.99 808.57,-96.67 804.86,-90.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.38,-158.98C835.02,-155.12 824.55,-150.8 814.77,-146.76"/>
+<polygon fill="#000000" stroke="#000000" points="815.88,-143.43 805.3,-142.85 813.21,-149.9 815.88,-143.43"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_node3" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~s_rmvs_util~~UsesGraph_node3"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-24 511,-24 511,0 588,0 588,-24"/>
-<text text-anchor="middle" x="549.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-264 511,-264 511,-240 588,-240 588,-264"/>
+<text text-anchor="middle" x="549.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge2" class="edge">
 <title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M840.75,-47.94C783.43,-40.85 664.72,-26.14 598.24,-17.91"/>
-<polygon fill="#000000" stroke="#000000" points="598.39,-14.4 588.04,-16.65 597.53,-21.35 598.39,-14.4"/>
+<path fill="none" stroke="#000000" d="M843.89,-183.05C812.4,-195.44 760.91,-214.5 715,-226 676.28,-235.7 631.48,-242.5 598.42,-246.7"/>
+<polygon fill="#000000" stroke="#000000" points="597.61,-243.28 588.12,-247.98 598.47,-250.22 597.61,-243.28"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge4" class="edge">
+<g id="module~~s_rmvs_util~~UsesGraph_edge10" class="edge">
 <title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M761.16,-98.75C741.28,-84.24 705.53,-60.91 670.5,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C642.39,-45.36 613.75,-35.71 591.22,-27.55"/>
-<polygon fill="#000000" stroke="#000000" points="592.25,-24.2 581.65,-24.04 589.84,-30.77 592.25,-24.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C644.15,-219.92 617.09,-229.06 595.03,-236.61"/>
+<polygon fill="#000000" stroke="#000000" points="593.6,-233.4 585.28,-239.96 595.87,-240.02 593.6,-233.4"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-258 247,-258 247,-234 347,-234 347,-258"/>
-<text text-anchor="middle" x="297" y="-243.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-184 391,-184 391,-160 467,-160 467,-184"/>
+<text text-anchor="middle" x="429" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C404.98,-244.27 379.6,-243.92 357.42,-244.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.09,-240.63 347.14,-244.26 357.19,-247.63 357.09,-240.63"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C618.63,-228.22 602.94,-212 550.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-199.47 460.61,-188.44"/>
+<polygon fill="#000000" stroke="#000000" points="462.06,-185.26 451.54,-184 458.98,-191.54 462.06,-185.26"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_rmvs_util~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-218 385.5,-218 385.5,-194 472.5,-194 472.5,-218"/>
-<text text-anchor="middle" x="429" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-205 247,-205 247,-181 347,-181 347,-205"/>
+<text text-anchor="middle" x="297" y="-190.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C617.03,-227.65 604.95,-237.58 550.5,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C532.35,-248.5 494.24,-234.23 465.57,-222.06"/>
-<polygon fill="#000000" stroke="#000000" points="466.82,-218.78 456.25,-218.03 464.04,-225.21 466.82,-218.78"/>
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C483.01,-212 408.17,-205.46 357.47,-200.06"/>
+<polygon fill="#000000" stroke="#000000" points="357.67,-196.56 347.35,-198.96 356.91,-203.52 357.67,-196.56"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_node6" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-104 511.5,-104 511.5,-80 587.5,-80 587.5,-104"/>
-<text text-anchor="middle" x="549.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C635.93,-43.72 599.43,-60.22 575.76,-74.48"/>
-<polygon fill="#000000" stroke="#000000" points="573.65,-71.68 567.06,-79.97 577.38,-77.6 573.65,-71.68"/>
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-132C742.26,-132 732.26,-132 722.32,-132"/>
+<polygon fill="#000000" stroke="#000000" points="722.05,-128.5 712.05,-132 722.05,-135.5 722.05,-128.5"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-100 391,-100 391,-76 467,-76 467,-100"/>
-<text text-anchor="middle" x="429" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-184 511.5,-184 511.5,-160 587.5,-160 587.5,-184"/>
+<text text-anchor="middle" x="549.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-52C599.73,-34.51 517.51,-55.95 469.77,-72.44"/>
-<polygon fill="#000000" stroke="#000000" points="468.38,-69.22 460.12,-75.87 470.72,-75.82 468.38,-69.22"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C636.03,-222.56 598.74,-204.89 574.92,-189.79"/>
+<polygon fill="#000000" stroke="#000000" points="576.76,-186.81 566.49,-184.19 572.89,-192.64 576.76,-186.81"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-218 123,-218 123,-194 211,-194 211,-218"/>
-<text text-anchor="middle" x="167" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-66 385.5,-66 385.5,-42 472.5,-42 472.5,-66"/>
+<text text-anchor="middle" x="429" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C496.45,-254.04 482.52,-249.96 430,-246"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-246C367.72,-241.46 358.28,-210.54 298,-206"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.86,-122.77C739.84,-118.98 726.84,-114.63 715,-111 659.03,-93.82 645.34,-87.84 588,-76 553.15,-68.8 513.49,-63.29 482.62,-59.58"/>
+<polygon fill="#000000" stroke="#000000" points="482.85,-56.08 472.51,-58.39 482.03,-63.04 482.85,-56.08"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~lambda_function -->
 <g id="module~~s_rmvs_util~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-123 627,-123 627,-99 712,-99 712,-123"/>
-<text text-anchor="middle" x="669.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-24 624,-24 624,0 715,0 715,-24"/>
+<text text-anchor="middle" x="669.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-111C742.26,-111 732.26,-111 722.32,-111"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-107.5 712.05,-111 722.05,-114.5 722.05,-107.5"/>
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge8" class="edge">
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.24,-119.75C761.72,-100.47 741.12,-62.74 715,-38 711.86,-35.02 708.31,-32.24 704.63,-29.69"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-26.57 695.92,-24.17 702.49,-32.48 706.24,-26.57"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_node10" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_rmvs_util~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-178 252.5,-178 252.5,-154 341.5,-154 341.5,-178"/>
-<text text-anchor="middle" x="297" y="-163.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-105 252.5,-105 252.5,-81 341.5,-81 341.5,-105"/>
+<text text-anchor="middle" x="297" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge10" class="edge">
+<g id="module~~s_rmvs_util~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-208C567.95,-246.39 536.58,-150.97 430,-166"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.09,-123.22C751.61,-144.75 714.03,-188.95 670.5,-208"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.07,-144.3C748.28,-163.27 710.97,-198.84 670.5,-212"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.81,-225.88 627.45,-172.42 588,-151 522.39,-115.38 504.49,-98.9 430,-94"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-299 624,-299 624,-275 715,-275 715,-299"/>
-<text text-anchor="middle" x="669.5" y="-284.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-264 383,-264 383,-240 475,-240 475,-264"/>
+<text text-anchor="middle" x="429" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M770.65,-123.2C759.8,-143.86 736.75,-186.92 715,-222 705.61,-237.15 694.24,-253.73 685.35,-266.35"/>
-<polygon fill="#000000" stroke="#000000" points="682.31,-264.58 679.37,-274.76 688.02,-268.64 682.31,-264.58"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-212C517.39,-212 483.99,-224.53 460.61,-235.56"/>
+<polygon fill="#000000" stroke="#000000" points="458.98,-232.46 451.54,-240 462.06,-238.74 458.98,-232.46"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_rmvs_util~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-298 383,-298 383,-274 475,-274 475,-298"/>
-<text text-anchor="middle" x="429" y="-283.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-145 123,-145 123,-121 211,-121 211,-145"/>
+<text text-anchor="middle" x="167" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-246C520.15,-250.38 489.5,-260.9 466.47,-270.04"/>
-<polygon fill="#000000" stroke="#000000" points="465.04,-266.85 457.1,-273.86 467.68,-273.33 465.04,-266.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-212C625.84,-225.99 629.62,-256.18 588,-273 522.42,-299.5 500.49,-286.19 430,-292"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge14" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531,-24.12C512.87,-36.64 485.72,-55.27 475,-62 470.32,-64.94 465.3,-67.96 460.38,-70.85"/>
-<polygon fill="#000000" stroke="#000000" points="458.6,-67.84 451.71,-75.89 462.11,-73.89 458.6,-67.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.5,-239.85C510.73,-226.5 478.78,-204.93 456.22,-189.7"/>
+<polygon fill="#000000" stroke="#000000" points="458.03,-186.7 447.78,-184 454.11,-192.5 458.03,-186.7"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge13" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-107C251.77,-125.54 209.61,-163.37 186.43,-186.53"/>
-<polygon fill="#000000" stroke="#000000" points="183.83,-184.18 179.32,-193.77 188.82,-189.08 183.83,-184.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.91,-23.09C477.06,-33.41 426.15,-49.75 383,-67 344.23,-82.5 336.51,-90.86 298,-107"/>
-</g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge15" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-234C244.68,-229.96 230.09,-225.4 216.5,-221.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-217.77 206.82,-218.13 215.32,-224.45 217.41,-217.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-292C370.42,-296.75 351.92,-312.76 298,-292"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.28,-264.06C500.85,-274.79 463.97,-289.2 430,-292"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.49,-207.61C360.07,-208.17 327.14,-208.2 298,-206"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-206C271.5,-204.15 244.29,-203.9 221.27,-204.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-200.72 211.02,-204.39 221.08,-207.72 220.96,-200.72"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-159.82C398.36,-155.62 390.23,-150.77 383,-146 366.31,-134.98 363.88,-129.72 347,-119 342.17,-115.94 336.95,-112.89 331.77,-110.03"/>
+<polygon fill="#000000" stroke="#000000" points="333.07,-106.75 322.6,-105.1 329.75,-112.92 333.07,-106.75"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.77,-160C374.92,-149.53 334.66,-135.63 298,-133"/>
+</g>
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-194C375.88,-189.96 361.06,-185.4 347.26,-181.16"/>
-<polygon fill="#000000" stroke="#000000" points="348.01,-177.73 337.43,-178.13 345.95,-184.42 348.01,-177.73"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.86C250.84,-171.83 224.35,-159.41 203.17,-149.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-146.2 193.86,-145.12 201.43,-152.54 204.4,-146.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-90.75C500.52,-90.38 488.57,-89.98 477.23,-89.59"/>
-<polygon fill="#000000" stroke="#000000" points="477.15,-86.09 467.04,-89.25 476.91,-93.09 477.15,-86.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-128C369.48,-127.25 351.98,-84.38 298,-107"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.19,-104.18C500.68,-114.8 463.75,-128.43 430,-128"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-166C403.08,-169.51 375.21,-169.97 351.68,-169.36"/>
-<polygon fill="#000000" stroke="#000000" points="351.66,-165.86 341.55,-169.02 351.43,-172.85 351.66,-165.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.74,-104.23C510.82,-117.92 480.58,-138.63 475,-142 455.6,-153.72 452.44,-162.84 430,-166"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-144C621.42,-147.96 608.26,-152.42 595.94,-156.6"/>
+<polygon fill="#000000" stroke="#000000" points="594.63,-153.34 586.29,-159.87 596.88,-159.97 594.63,-153.34"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.82,-88.53C364.09,-90.07 327.66,-94.57 298,-107"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.97,-100.02C386.37,-112.98 351.78,-133.73 327.16,-148.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.04,-145.7 318.26,-153.84 328.64,-151.7 325.04,-145.7"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C526.34,-82.82 501.71,-75.27 480.68,-68.94"/>
+<polygon fill="#000000" stroke="#000000" points="481.56,-65.56 470.97,-66.04 479.55,-72.26 481.56,-65.56"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_rmvs_util~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_rmvs_util~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-218 0,-218 0,-194 87,-194 87,-218"/>
-<text text-anchor="middle" x="43.5" y="-203.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C498.37,-73.75 482.58,-97.46 430,-94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-94C402.99,-92.35 375.21,-91.95 351.77,-92.02"/>
+<polygon fill="#000000" stroke="#000000" points="351.66,-88.52 341.68,-92.07 351.7,-95.52 351.66,-88.52"/>
 </g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.11,-119.91C612.5,-111.24 579.67,-99.46 550.5,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-90C509.18,-77.25 510.68,-53.88 475,-33 456.26,-22.03 451.46,-17.3 430,-14"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-206C114.58,-206 105.86,-206 97.36,-206"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-202.5 87.13,-206 97.13,-209.5 97.13,-202.5"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-172C500.52,-172 488.57,-172 477.23,-172"/>
+<polygon fill="#000000" stroke="#000000" points="477.04,-168.5 467.04,-172 477.04,-175.5 477.04,-168.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.03,-98.86C633.77,-81.86 596.77,-50.82 572.92,-30.81"/>
-<polygon fill="#000000" stroke="#000000" points="575,-27.98 565.09,-24.24 570.5,-33.35 575,-27.98"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C399.68,-125.32 368.43,-116.01 343.67,-108.16"/>
+<polygon fill="#000000" stroke="#000000" points="344.42,-104.72 333.83,-105.01 342.29,-111.39 344.42,-104.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M517.78,-159.85C494.12,-150.94 460.43,-139.18 430,-132"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.43,-123.15C625.88,-130.03 605.93,-138.7 588,-146 549.21,-161.79 504.56,-178.62 472.64,-190.43"/>
-<polygon fill="#000000" stroke="#000000" points="471.33,-187.18 463.16,-193.92 473.76,-193.75 471.33,-187.18"/>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge22" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-133C271.49,-131.25 244.28,-131.01 221.27,-131.3"/>
+<polygon fill="#000000" stroke="#000000" points="220.95,-127.81 211.01,-131.47 221.07,-134.8 220.95,-127.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C371.76,-118.73 355.63,-137.13 298,-133"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_rmvs_util~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-104.3C617.54,-102.79 607.54,-101.19 597.97,-99.64"/>
-<polygon fill="#000000" stroke="#000000" points="598.22,-96.14 587.8,-98.01 597.11,-103.05 598.22,-96.14"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.93,-66.02C375.33,-69.8 361.25,-74.02 348.05,-77.99"/>
+<polygon fill="#000000" stroke="#000000" points="346.73,-74.73 338.16,-80.95 348.74,-81.43 346.73,-74.73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.81,-119C604.27,-123.18 575.91,-128.2 550.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.38,-139.8 482.69,-128.68 430,-128"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-42C369.43,-28.18 317.43,-8.09 298,-14"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C494.31,-140.11 484.26,-158.35 430,-166"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge27" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-14C243.39,-30.01 201.11,-83 180.91,-112.58"/>
+<polygon fill="#000000" stroke="#000000" points="177.97,-110.68 175.36,-120.94 183.81,-114.55 177.97,-110.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-14C370.89,-5.21 353.27,2.82 298,-14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.8,-16.63C575.64,-20.63 496.91,-24.3 430,-14"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge29" class="edge">
+<g id="module~~s_rmvs_util~~UsesGraph_edge28" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-178C244.68,-182.04 230.09,-186.6 216.5,-190.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-187.55 206.82,-193.87 217.41,-194.23 215.32,-187.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M635.45,-299.06C569.66,-321.21 418.27,-362.88 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-105C244.68,-109.04 230.09,-113.6 216.5,-117.84"/>
+<polygon fill="#000000" stroke="#000000" points="215.32,-114.55 206.82,-120.87 217.41,-121.23 215.32,-114.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_rmvs_util~~UsesGraph_edge31" class="edge">
+<g id="module~~s_rmvs_util~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-326C243.22,-309.81 201.01,-256.4 180.87,-226.58"/>
-<polygon fill="#000000" stroke="#000000" points="183.75,-224.59 175.33,-218.15 177.89,-228.43 183.75,-224.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-298.02C369.43,-311.85 317.42,-331.95 298,-326"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-292C233.43,-267.91 193.43,-192.57 176.81,-154.9"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-153.18 172.75,-145.35 173.44,-155.92 179.89,-153.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.15,-264.08C370.03,-278.37 317.12,-299.36 298,-292"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_rmvs_util~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_rmvs_util~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-145 0,-145 0,-121 87,-121 87,-145"/>
+<text text-anchor="middle" x="43.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_rmvs_util~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-133C114.58,-133 105.86,-133 97.36,-133"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-129.5 87.13,-133 97.13,-136.5 97.13,-129.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_setup.html b/docs/module/s_setup.html
index 4c17a486e..615992968 100644
--- a/docs/module/s_setup.html
+++ b/docs/module/s_setup.html
@@ -257,311 +257,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_setup~~UsesGraph Pages: 1 -->
-<svg id="modules_setupUsesGraph" width="641pt" height="278pt"
- viewBox="0.00 0.00 641.00 277.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_setup~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_setupUsesGraph" width="641pt" height="290pt"
+ viewBox="0.00 0.00 641.00 289.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_setup~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_setup~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 899,-387.05 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 899,-404.34 899,4 -4,4"/>
 <!-- module~s_setup -->
 <g id="module~~s_setup~~UsesGraph_node1" class="node">
 <title>module~s_setup</title>
-<polygon fill="none" stroke="black" points="895,-318.05 841,-318.05 841,-294.05 895,-294.05 895,-318.05"/>
-<text text-anchor="middle" x="868" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_setup</text>
+<polygon fill="none" stroke="black" points="895,-102.05 841,-102.05 841,-78.05 895,-78.05 895,-102.05"/>
+<text text-anchor="middle" x="868" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_setup</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_setup~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_setup~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_setup&#45;&gt;module~swiftest -->
 <g id="module~~s_setup~~UsesGraph_edge1" class="edge">
 <title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.25,-294.01C839.13,-281.66 816.94,-262.24 800.5,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="802.77,-245.2 792.94,-241.25 798.16,-250.47 802.77,-245.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.56,-102.13C843.49,-123.71 811.78,-169.11 793.27,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.4,-193.62 787.54,-203.82 796.14,-197.63 790.4,-193.62"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_setup~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_setup~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_setup&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_setup~~UsesGraph_edge2" class="edge">
 <title>module~s_setup&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M849.49,-318.08C816.21,-339.73 740.85,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-81.49C803.62,-70.01 732.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_setup~~UsesGraph_edge10" class="edge">
+<g id="module~~s_setup~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_setup~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_setup~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_setup~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_setup~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_setup~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_setup~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_setup~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_setup~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_setup~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_setup~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_setup~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_setup~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_setup~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_setup~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_setup~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_setup~~UsesGraph_edge6" class="edge">
+<g id="module~~s_setup~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_setup~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_setup~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_setup~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_setup~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_setup~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_setup~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_setup~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_setup~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_setup~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_setup~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_setup~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_setup~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_setup~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_setup~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_setup~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_setup~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_setup~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_setup~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_setup~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_setup~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_setup~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_setup~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_setup~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_setup~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_setup~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_setup~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_setup~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_setup~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_setup~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_setup~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_setup~~UsesGraph_edge20" class="edge">
+<g id="module~~s_setup~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_setup~~UsesGraph_edge21" class="edge">
+<g id="module~~s_setup~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_setup~~UsesGraph_edge19" class="edge">
+<g id="module~~s_setup~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_setup~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_setup~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_setup~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_setup~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_setup~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_setup~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_setup~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_setup~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_setup~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_setup~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_setup~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_setup~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_setup~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_setup~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_setup~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_setup~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_setup~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_collision.html b/docs/module/s_symba_collision.html
index 4283d32f6..216f59440 100644
--- a/docs/module/s_symba_collision.html
+++ b/docs/module/s_symba_collision.html
@@ -134,7 +134,7 @@ <h1>s_symba_collision
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 4.7% of total for modules and submodules.">758 statements</a>
+    title=" 4.6% of total for modules and submodules.">758 statements</a>
      </li> 
      
      
@@ -301,311 +301,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_collision~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_collisionUsesGraph" width="641pt" height="225pt"
- viewBox="0.00 0.00 641.00 224.58" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_collision~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_collisionUsesGraph" width="641pt" height="208pt"
+ viewBox="0.00 0.00 641.00 208.26" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_collision~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 304)">
 <title>module~~s_symba_collision~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 944,-328.15 944,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 944,-304 944,4 -4,4"/>
 <!-- module~s_symba_collision -->
 <g id="module~~s_symba_collision~~UsesGraph_node1" class="node">
 <title>module~s_symba_collision</title>
-<polygon fill="none" stroke="black" points="940,-204.86 841,-204.86 841,-180.86 940,-180.86 940,-204.86"/>
-<text text-anchor="middle" x="890.5" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_collision</text>
+<polygon fill="none" stroke="black" points="940,-183 841,-183 841,-159 940,-159 940,-183"/>
+<text text-anchor="middle" x="890.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_collision</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_collision~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_collision~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_collision&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_collision~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.71,-184.03C832.09,-182.47 823.26,-180.87 815.07,-179.39"/>
-<polygon fill="#000000" stroke="#000000" points="815.57,-175.92 805.11,-177.58 814.32,-182.81 815.57,-175.92"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.71,-162.17C832.09,-160.61 823.26,-159.01 815.07,-157.53"/>
+<polygon fill="#000000" stroke="#000000" points="815.57,-154.06 805.11,-155.73 814.32,-160.95 815.57,-154.06"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_collision~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.9,-197.3C805.8,-200.5 758.47,-204.83 722.59,-208.1"/>
-<polygon fill="#000000" stroke="#000000" points="721.97,-204.64 712.33,-209.04 722.61,-211.61 721.97,-204.64"/>
+<path fill="none" stroke="#000000" d="M840.9,-175.44C805.8,-178.64 758.47,-182.97 722.59,-186.24"/>
+<polygon fill="#000000" stroke="#000000" points="721.97,-182.78 712.33,-187.18 722.61,-189.76 721.97,-182.78"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_collision~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_collision~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_collision~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_collision~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_collision~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_collision~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_collision~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_collision~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_collision~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_collision~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_collision~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_collision~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_collision~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_collision~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_collision~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_collision~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_collision~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_collision~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_collision~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_collision~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_collision~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_collision~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_collision~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_collision~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_collision~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_collision~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_collision~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_collision~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_collision~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_collision~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_collision~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_collision~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_collision~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_collision~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_collision~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_collision~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_collision~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_collision~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_collision~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_collision~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_collision~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_collision~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_collision~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_collision~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_collision~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_collision~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_collision~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_collision~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_collision~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_discard.html b/docs/module/s_symba_discard.html
index 072ad5599..c6f3032af 100644
--- a/docs/module/s_symba_discard.html
+++ b/docs/module/s_symba_discard.html
@@ -265,311 +265,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_discard~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_discardUsesGraph" width="641pt" height="225pt"
- viewBox="0.00 0.00 641.00 225.30" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_discard~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_discardUsesGraph" width="641pt" height="209pt"
+ viewBox="0.00 0.00 641.00 208.92" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_discard~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 304)">
 <title>module~~s_symba_discard~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 941,-328.15 941,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 941,-304 941,4 -4,4"/>
 <!-- module~s_symba_discard -->
 <g id="module~~s_symba_discard~~UsesGraph_node1" class="node">
 <title>module~s_symba_discard</title>
-<polygon fill="none" stroke="black" points="937,-204.86 841,-204.86 841,-180.86 937,-180.86 937,-204.86"/>
-<text text-anchor="middle" x="889" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_discard</text>
+<polygon fill="none" stroke="black" points="937,-183 841,-183 841,-159 937,-159 937,-183"/>
+<text text-anchor="middle" x="889" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_discard</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_discard~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_discard~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_discard&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_discard~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.82,-184.2C832.25,-182.63 823.43,-181.01 815.23,-179.51"/>
-<polygon fill="#000000" stroke="#000000" points="815.71,-176.04 805.24,-177.67 814.44,-182.92 815.71,-176.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.82,-162.34C832.25,-160.77 823.43,-159.15 815.23,-157.65"/>
+<polygon fill="#000000" stroke="#000000" points="815.71,-154.18 805.24,-155.81 814.44,-161.06 815.71,-154.18"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_discard~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.81,-197.2C805.9,-200.41 758.37,-204.78 722.39,-208.09"/>
-<polygon fill="#000000" stroke="#000000" points="721.73,-204.63 712.1,-209.03 722.38,-211.6 721.73,-204.63"/>
+<path fill="none" stroke="#000000" d="M840.81,-175.34C805.9,-178.55 758.37,-182.92 722.39,-186.23"/>
+<polygon fill="#000000" stroke="#000000" points="721.73,-182.77 712.1,-187.18 722.38,-189.74 721.73,-182.77"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_discard~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_discard~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_discard~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_discard~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_discard~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_discard~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_discard~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_discard~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_discard~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_discard~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_discard~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_discard~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_discard~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_discard~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_discard~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_discard~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_discard~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_discard~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_discard~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_discard~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_discard~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_discard~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_discard~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_discard~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_discard~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_discard~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_discard~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_discard~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_discard~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_discard~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_discard~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_discard~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_discard~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_discard~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_discard~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_discard~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_discard~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_discard~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_discard~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_discard~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_discard~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_discard~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_discard~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_discard~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_discard~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_discard~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_discard~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_discard~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_discard~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_drift.html b/docs/module/s_symba_drift.html
index 3e4567998..6379879b5 100644
--- a/docs/module/s_symba_drift.html
+++ b/docs/module/s_symba_drift.html
@@ -247,311 +247,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_drift~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_driftUsesGraph" width="641pt" height="229pt"
- viewBox="0.00 0.00 641.00 229.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_drift~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_driftUsesGraph" width="641pt" height="213pt"
+ viewBox="0.00 0.00 641.00 212.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_drift~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 304)">
 <title>module~~s_symba_drift~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 924,-328.15 924,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 924,-304 924,4 -4,4"/>
 <!-- module~s_symba_drift -->
 <g id="module~~s_symba_drift~~UsesGraph_node1" class="node">
 <title>module~s_symba_drift</title>
-<polygon fill="none" stroke="black" points="920,-204.86 841,-204.86 841,-180.86 920,-180.86 920,-204.86"/>
-<text text-anchor="middle" x="880.5" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_drift</text>
+<polygon fill="none" stroke="black" points="920,-183 841,-183 841,-159 920,-159 920,-183"/>
+<text text-anchor="middle" x="880.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_drift</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_drift~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_drift~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_drift&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_drift~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.93,-185.18C832.43,-183.49 823.46,-181.71 815.06,-180.04"/>
-<polygon fill="#000000" stroke="#000000" points="815.67,-176.59 805.18,-178.07 814.3,-183.45 815.67,-176.59"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.93,-163.32C832.43,-161.63 823.46,-159.85 815.06,-158.18"/>
+<polygon fill="#000000" stroke="#000000" points="815.67,-154.73 805.18,-156.21 814.3,-161.59 815.67,-154.73"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_drift~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.68,-196.57C807.34,-199.76 758.99,-204.39 722.34,-207.9"/>
-<polygon fill="#000000" stroke="#000000" points="721.96,-204.42 712.34,-208.85 722.63,-211.39 721.96,-204.42"/>
+<path fill="none" stroke="#000000" d="M840.68,-174.71C807.34,-177.91 758.99,-182.53 722.34,-186.04"/>
+<polygon fill="#000000" stroke="#000000" points="721.96,-182.56 712.34,-187 722.63,-189.53 721.96,-182.56"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_drift~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_drift~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_drift~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_drift~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_drift~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_drift~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_drift~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_drift~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_drift~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_drift~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_drift~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_drift~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_drift~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_drift~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_drift~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_drift~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_drift~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_drift~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_drift~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_drift~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_drift~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_drift~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_drift~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_drift~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_drift~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_drift~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_drift~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_drift~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_drift~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_drift~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_drift~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_drift~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_drift~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_drift~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_drift~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_drift~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_drift~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_drift~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_drift~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_drift~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_drift~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_drift~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_drift~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_drift~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_drift~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_drift~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_drift~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_drift~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_drift~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_encounter_check.html b/docs/module/s_symba_encounter_check.html
index dca4a4851..6a1636867 100644
--- a/docs/module/s_symba_encounter_check.html
+++ b/docs/module/s_symba_encounter_check.html
@@ -134,7 +134,7 @@ <h1>s_symba_encounter_check
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.3% of total for modules and submodules.">215 statements</a>
+    title=" 1.4% of total for modules and submodules.">232 statements</a>
      </li> 
      
      
@@ -273,311 +273,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_encounter_check~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_encounter_checkUsesGraph" width="641pt" height="215pt"
- viewBox="0.00 0.00 641.00 214.62" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_encounter_check~~UsesGraph" class="graph" transform="scale(0.65 0.65) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_encounter_checkUsesGraph" width="641pt" height="199pt"
+ viewBox="0.00 0.00 641.00 199.02" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_encounter_check~~UsesGraph" class="graph" transform="scale(0.65 0.65) rotate(0) translate(4 304)">
 <title>module~~s_symba_encounter_check~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 988,-328.15 988,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 988,-304 988,4 -4,4"/>
 <!-- module~s_symba_encounter_check -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_node1" class="node">
 <title>module~s_symba_encounter_check</title>
-<polygon fill="none" stroke="black" points="984,-204.86 841,-204.86 841,-180.86 984,-180.86 984,-204.86"/>
-<text text-anchor="middle" x="912.5" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_encounter_check</text>
+<polygon fill="none" stroke="black" points="984,-183 841,-183 841,-159 984,-159 984,-183"/>
+<text text-anchor="middle" x="912.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_encounter_check</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_encounter_check~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.98,-182.21C832.04,-180.87 823.21,-179.53 815.13,-178.31"/>
-<polygon fill="#000000" stroke="#000000" points="815.42,-174.82 805.01,-176.78 814.38,-181.74 815.42,-174.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.98,-160.36C832.04,-159.01 823.21,-157.67 815.13,-156.45"/>
+<polygon fill="#000000" stroke="#000000" points="815.42,-152.96 805.01,-154.93 814.38,-159.88 815.42,-152.96"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_encounter_check~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.82,-198.72C802.93,-201.87 757.07,-205.67 722.49,-208.54"/>
-<polygon fill="#000000" stroke="#000000" points="721.81,-205.09 712.14,-209.4 722.39,-212.06 721.81,-205.09"/>
+<path fill="none" stroke="#000000" d="M840.82,-176.87C802.93,-180.01 757.07,-183.82 722.49,-186.69"/>
+<polygon fill="#000000" stroke="#000000" points="721.81,-183.23 712.14,-187.54 722.39,-190.21 721.81,-183.23"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_encounter_check~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_encounter_check~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_encounter_check~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_encounter_check~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_encounter_check~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_encounter_check~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_encounter_check~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_encounter_check~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_encounter_check~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
@@ -1323,7 +1315,7 @@ <h2>Module Subroutines</h2>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-symba_encounter_check_one"></span><h3>
-pure elemental module subroutine <a href='../proc/symba_encounter_check_one.html'>symba_encounter_check_one</a>(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+pure module subroutine <a href='../proc/symba_encounter_check_one.html'>symba_encounter_check_one</a>(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
     
     
    <a href='../interface/symba_encounter_check_one.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/module/s_symba_io.html b/docs/module/s_symba_io.html
index 18e1936eb..71e9b8c5d 100644
--- a/docs/module/s_symba_io.html
+++ b/docs/module/s_symba_io.html
@@ -249,311 +249,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_io~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_ioUsesGraph" width="641pt" height="232pt"
- viewBox="0.00 0.00 641.00 231.67" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_io~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_ioUsesGraph" width="641pt" height="215pt"
+ viewBox="0.00 0.00 641.00 214.83" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_io~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 304)">
 <title>module~~s_symba_io~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 915,-328.15 915,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 915,-304 915,4 -4,4"/>
 <!-- module~s_symba_io -->
 <g id="module~~s_symba_io~~UsesGraph_node1" class="node">
 <title>module~s_symba_io</title>
-<polygon fill="none" stroke="black" points="911,-204.86 841,-204.86 841,-180.86 911,-180.86 911,-204.86"/>
-<text text-anchor="middle" x="876" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_io</text>
+<polygon fill="none" stroke="black" points="911,-183 841,-183 841,-159 911,-159 911,-183"/>
+<text text-anchor="middle" x="876" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_io</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_io~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_io~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_io&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_io~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.88,-185.75C832.53,-184.01 823.56,-182.14 815.12,-180.38"/>
-<polygon fill="#000000" stroke="#000000" points="815.66,-176.92 805.16,-178.31 814.24,-183.77 815.66,-176.92"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.88,-163.89C832.53,-162.15 823.56,-160.28 815.12,-158.53"/>
+<polygon fill="#000000" stroke="#000000" points="815.66,-155.06 805.16,-156.45 814.24,-161.92 815.66,-155.06"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_io~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_io~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_io&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.77,-196.21C808.45,-199.37 759.53,-204.15 722.41,-207.78"/>
-<polygon fill="#000000" stroke="#000000" points="721.88,-204.32 712.27,-208.77 722.57,-211.28 721.88,-204.32"/>
+<path fill="none" stroke="#000000" d="M840.77,-174.35C808.45,-177.51 759.53,-182.29 722.41,-185.92"/>
+<polygon fill="#000000" stroke="#000000" points="721.88,-182.46 712.27,-186.91 722.57,-189.42 721.88,-182.46"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_io~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_io~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_io~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_io~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_io~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_io~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_io~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_io~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_io~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_io~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_io~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_io~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_io~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_io~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_io~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_io~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_io~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_io~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_io~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_io~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_io~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_io~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_io~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_io~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_io~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_io~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_io~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_io~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_io~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_io~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_io~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_io~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_io~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_io~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_io~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_io~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_io~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_io~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_io~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_io~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_io~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_io~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_io~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_io~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_io~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_io~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_io~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_io~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_io~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_io~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_io~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_io~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_io~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_io~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_io~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_kick.html b/docs/module/s_symba_kick.html
index df0f42263..4a4141541 100644
--- a/docs/module/s_symba_kick.html
+++ b/docs/module/s_symba_kick.html
@@ -134,7 +134,7 @@ <h1>s_symba_kick
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.2% of total for modules and submodules.">193 statements</a>
+    title=" 1.2% of total for modules and submodules.">195 statements</a>
      </li> 
      
      
@@ -251,311 +251,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_kick~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_kickUsesGraph" width="641pt" height="229pt"
- viewBox="0.00 0.00 641.00 229.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_kick~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_kickUsesGraph" width="641pt" height="213pt"
+ viewBox="0.00 0.00 641.00 212.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_kick~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 304)">
 <title>module~~s_symba_kick~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 924,-328.15 924,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 924,-304 924,4 -4,4"/>
 <!-- module~s_symba_kick -->
 <g id="module~~s_symba_kick~~UsesGraph_node1" class="node">
 <title>module~s_symba_kick</title>
-<polygon fill="none" stroke="black" points="920,-204.86 841,-204.86 841,-180.86 920,-180.86 920,-204.86"/>
-<text text-anchor="middle" x="880.5" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_kick</text>
+<polygon fill="none" stroke="black" points="920,-183 841,-183 841,-159 920,-159 920,-183"/>
+<text text-anchor="middle" x="880.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_kick</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_kick~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_kick~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_kick&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_kick~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.93,-185.18C832.43,-183.49 823.46,-181.71 815.06,-180.04"/>
-<polygon fill="#000000" stroke="#000000" points="815.67,-176.59 805.18,-178.07 814.3,-183.45 815.67,-176.59"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.93,-163.32C832.43,-161.63 823.46,-159.85 815.06,-158.18"/>
+<polygon fill="#000000" stroke="#000000" points="815.67,-154.73 805.18,-156.21 814.3,-161.59 815.67,-154.73"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_kick~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.68,-196.57C807.34,-199.76 758.99,-204.39 722.34,-207.9"/>
-<polygon fill="#000000" stroke="#000000" points="721.96,-204.42 712.34,-208.85 722.63,-211.39 721.96,-204.42"/>
+<path fill="none" stroke="#000000" d="M840.68,-174.71C807.34,-177.91 758.99,-182.53 722.34,-186.04"/>
+<polygon fill="#000000" stroke="#000000" points="721.96,-182.56 712.34,-187 722.63,-189.53 721.96,-182.56"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_kick~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_kick~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_kick~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_kick~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_kick~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_kick~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_kick~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_kick~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_kick~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_kick~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_kick~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_kick~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_kick~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_kick~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_kick~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_kick~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_kick~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_kick~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_kick~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_kick~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_kick~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_kick~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_kick~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_kick~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_kick~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_kick~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_kick~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_kick~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_kick~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_kick~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_kick~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_kick~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_kick~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_kick~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_kick~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_kick~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_kick~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_kick~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_kick~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_kick~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_kick~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_kick~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_kick~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_kick~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_kick~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_kick~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_kick~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_kick~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_setup.html b/docs/module/s_symba_setup.html
index b8209be98..0a42fee88 100644
--- a/docs/module/s_symba_setup.html
+++ b/docs/module/s_symba_setup.html
@@ -253,311 +253,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_setup~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_setupUsesGraph" width="641pt" height="227pt"
- viewBox="0.00 0.00 641.00 227.22" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_setup~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_setupUsesGraph" width="641pt" height="211pt"
+ viewBox="0.00 0.00 641.00 210.70" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_setup~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 304)">
 <title>module~~s_symba_setup~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 933,-328.15 933,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 933,-304 933,4 -4,4"/>
 <!-- module~s_symba_setup -->
 <g id="module~~s_symba_setup~~UsesGraph_node1" class="node">
 <title>module~s_symba_setup</title>
-<polygon fill="none" stroke="black" points="929,-204.86 841,-204.86 841,-180.86 929,-180.86 929,-204.86"/>
-<text text-anchor="middle" x="885" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_setup</text>
+<polygon fill="none" stroke="black" points="929,-183 841,-183 841,-159 929,-159 929,-183"/>
+<text text-anchor="middle" x="885" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_setup</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_setup~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_setup~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_setup&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_setup~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.99,-184.67C832.47,-183.04 823.6,-181.35 815.33,-179.78"/>
-<polygon fill="#000000" stroke="#000000" points="815.72,-176.29 805.24,-177.86 814.41,-183.17 815.72,-176.29"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.99,-162.81C832.47,-161.18 823.6,-159.5 815.33,-157.92"/>
+<polygon fill="#000000" stroke="#000000" points="815.72,-154.43 805.24,-156 814.41,-161.31 815.72,-154.43"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_setup~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.8,-196.91C806.64,-200.11 758.83,-204.58 722.57,-207.98"/>
-<polygon fill="#000000" stroke="#000000" points="721.82,-204.54 712.19,-208.95 722.47,-211.51 721.82,-204.54"/>
+<path fill="none" stroke="#000000" d="M840.8,-175.05C806.64,-178.25 758.83,-182.73 722.57,-186.12"/>
+<polygon fill="#000000" stroke="#000000" points="721.82,-182.68 712.19,-187.09 722.47,-189.65 721.82,-182.68"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_setup~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_setup~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_setup~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_setup~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_setup~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_setup~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_setup~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_setup~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_setup~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_setup~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_setup~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_setup~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_setup~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_setup~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_setup~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_setup~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_setup~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_setup~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_setup~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_setup~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_setup~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_setup~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_setup~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_setup~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_setup~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_setup~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_setup~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_setup~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_setup~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_setup~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_setup~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_setup~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_setup~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_setup~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_setup~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_setup~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_setup~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_setup~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_setup~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_setup~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_setup~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_setup~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_setup~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_setup~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_setup~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_setup~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_setup~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_setup~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_step.html b/docs/module/s_symba_step.html
index afc84676c..7938623f4 100644
--- a/docs/module/s_symba_step.html
+++ b/docs/module/s_symba_step.html
@@ -253,311 +253,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_step~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_stepUsesGraph" width="641pt" height="229pt"
- viewBox="0.00 0.00 641.00 228.68" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_step~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_stepUsesGraph" width="641pt" height="212pt"
+ viewBox="0.00 0.00 641.00 212.06" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_step~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 304)">
 <title>module~~s_symba_step~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 927,-328.15 927,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 927,-304 927,4 -4,4"/>
 <!-- module~s_symba_step -->
 <g id="module~~s_symba_step~~UsesGraph_node1" class="node">
 <title>module~s_symba_step</title>
-<polygon fill="none" stroke="black" points="923,-204.86 841,-204.86 841,-180.86 923,-180.86 923,-204.86"/>
-<text text-anchor="middle" x="882" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_step</text>
+<polygon fill="none" stroke="black" points="923,-183 841,-183 841,-159 923,-159 923,-183"/>
+<text text-anchor="middle" x="882" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_step</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_step~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_step~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_step&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_step~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.98,-185.01C832.41,-183.33 823.4,-181.57 815,-179.92"/>
-<polygon fill="#000000" stroke="#000000" points="815.59,-176.47 805.11,-177.98 814.25,-183.34 815.59,-176.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.98,-163.15C832.41,-161.47 823.4,-159.71 815,-158.06"/>
+<polygon fill="#000000" stroke="#000000" points="815.59,-154.61 805.11,-156.12 814.25,-161.48 815.59,-154.61"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_step~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_step~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_step&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.91,-196.67C807.22,-199.87 758.84,-204.47 722.23,-207.94"/>
-<polygon fill="#000000" stroke="#000000" points="721.86,-204.46 712.24,-208.89 722.53,-211.43 721.86,-204.46"/>
+<path fill="none" stroke="#000000" d="M840.91,-174.81C807.22,-178.01 758.84,-182.61 722.23,-186.08"/>
+<polygon fill="#000000" stroke="#000000" points="721.86,-182.6 712.24,-187.03 722.53,-189.57 721.86,-182.6"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_step~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_step~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_step~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_step~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_step~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_step~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_step~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_step~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_step~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_step~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_step~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_step~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_step~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_step~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_step~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_step~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_step~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_step~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_step~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_step~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_step~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_step~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_step~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_step~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_step~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_step~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_step~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_step~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_step~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_step~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_step~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_step~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_step~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_step~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_step~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_step~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_step~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_step~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_step~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_step~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_step~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_step~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_step~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_step~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_step~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_step~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_step~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_step~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_step~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_step~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_step~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_step~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_step~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_step~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_step~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_symba_util.html b/docs/module/s_symba_util.html
index 03a8d06ba..c740681c0 100644
--- a/docs/module/s_symba_util.html
+++ b/docs/module/s_symba_util.html
@@ -134,7 +134,7 @@ <h1>s_symba_util
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 4.2% of total for modules and submodules.">673 statements</a>
+    title=" 4.1% of total for modules and submodules.">673 statements</a>
      </li> 
      
      
@@ -295,311 +295,303 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_symba_util~~UsesGraph Pages: 1 -->
-<svg id="modules_symba_utilUsesGraph" width="641pt" height="230pt"
- viewBox="0.00 0.00 641.00 230.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_symba_util~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 328.15)">
+<svg id="modules_symba_utilUsesGraph" width="641pt" height="214pt"
+ viewBox="0.00 0.00 641.00 213.67" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_symba_util~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 304)">
 <title>module~~s_symba_util~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-328.15 920,-328.15 920,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-304 920,-304 920,4 -4,4"/>
 <!-- module~s_symba_util -->
 <g id="module~~s_symba_util~~UsesGraph_node1" class="node">
 <title>module~s_symba_util</title>
-<polygon fill="none" stroke="black" points="916,-204.86 841,-204.86 841,-180.86 916,-180.86 916,-204.86"/>
-<text text-anchor="middle" x="878.5" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_util</text>
+<polygon fill="none" stroke="black" points="916,-183 841,-183 841,-159 916,-159 916,-183"/>
+<text text-anchor="middle" x="878.5" y="-168.6" font-family="Helvetica,sans-Serif" font-size="10.50">s_symba_util</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_symba_util~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_symba_util~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-184.86 751,-184.86 751,-160.86 805,-160.86 805,-184.86"/>
-<text text-anchor="middle" x="778" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-163 751,-163 751,-139 805,-139 805,-163"/>
+<text text-anchor="middle" x="778" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_util&#45;&gt;module~swiftest -->
 <g id="module~~s_symba_util~~UsesGraph_edge1" class="edge">
 <title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.82,-185.41C832.42,-183.71 823.5,-181.89 815.12,-180.19"/>
-<polygon fill="#000000" stroke="#000000" points="815.75,-176.75 805.25,-178.19 814.35,-183.61 815.75,-176.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.82,-163.55C832.42,-161.85 823.5,-160.04 815.12,-158.33"/>
+<polygon fill="#000000" stroke="#000000" points="815.75,-154.89 805.25,-156.33 814.35,-161.75 815.75,-154.89"/>
 </g>
 <!-- module~symba_classes -->
 <g id="module~~s_symba_util~~UsesGraph_node3" class="node">
 <title>module~symba_classes</title>
 <g id="a_module~~s_symba_util~~UsesGraph_node3"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-224.86 627,-224.86 627,-200.86 712,-200.86 712,-224.86"/>
-<text text-anchor="middle" x="669.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-203 627,-203 627,-179 712,-179 712,-203"/>
+<text text-anchor="middle" x="669.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_symba_util&#45;&gt;module~symba_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge2" class="edge">
 <title>module~s_symba_util&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M840.97,-196.39C808.08,-199.57 759.38,-204.27 722.45,-207.84"/>
-<polygon fill="#000000" stroke="#000000" points="721.98,-204.37 712.36,-208.81 722.65,-211.34 721.98,-204.37"/>
+<path fill="none" stroke="#000000" d="M840.97,-174.53C808.08,-177.71 759.38,-182.41 722.45,-185.98"/>
+<polygon fill="#000000" stroke="#000000" points="721.98,-182.51 712.36,-186.96 722.65,-189.48 721.98,-182.51"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge9" class="edge">
+<g id="module~~s_symba_util~~UsesGraph_edge6" class="edge">
 <title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-182.64C739.37,-186.99 725.44,-192.22 712.45,-197.1"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-193.95 702.76,-200.74 713.35,-200.5 710.89,-193.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-160.79C739.37,-165.13 725.44,-170.37 712.45,-175.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-172.09 702.76,-178.88 713.35,-178.64 710.89,-172.09"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_symba_util~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-64.86 247,-64.86 247,-40.86 347,-40.86 347,-64.86"/>
-<text text-anchor="middle" x="297" y="-50.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_symba_util~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-123 391,-123 391,-99 467,-99 467,-123"/>
+<text text-anchor="middle" x="429" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C405.26,-47.4 379.62,-46.36 357.17,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="356.94,-43.57 347.1,-47.49 357.24,-50.56 356.94,-43.57"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C525.18,-107.22 498.95,-106.83 477.1,-107.55"/>
+<polygon fill="#000000" stroke="#000000" points="476.92,-104.05 467.08,-107.96 477.21,-111.05 476.92,-104.05"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_symba_util~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-224.86 511,-224.86 511,-200.86 588,-200.86 588,-224.86"/>
-<text text-anchor="middle" x="549.5" y="-210.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_symba_util~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-300 247,-300 247,-276 347,-276 347,-300"/>
+<text text-anchor="middle" x="297" y="-285.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_symba_util~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C636.86,-170.24 602.71,-183.77 579.33,-195.8"/>
-<polygon fill="#000000" stroke="#000000" points="577.47,-192.82 570.32,-200.64 580.78,-198.99 577.47,-192.82"/>
-</g>
-<!-- module~fraggle_classes -->
-<g id="module~~s_symba_util~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-302.86 385.5,-302.86 385.5,-278.86 472.5,-278.86 472.5,-302.86"/>
-<text text-anchor="middle" x="429" y="-288.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M767.88,-185.09C756.87,-198.99 737.07,-221.35 715,-233.86 641.76,-275.38 542.93,-286.99 482.97,-290.04"/>
-<polygon fill="#000000" stroke="#000000" points="482.8,-286.55 472.97,-290.49 483.12,-293.54 482.8,-286.55"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M766.41,-163.21C754.68,-176.29 734.81,-197.14 715,-212 663.27,-250.8 650.43,-266.16 588,-283 510.33,-303.95 416.66,-300.7 357.21,-295.3"/>
+<polygon fill="#000000" stroke="#000000" points="357.54,-291.81 347.25,-294.34 356.87,-298.78 357.54,-291.81"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~s_symba_util~~UsesGraph_node7" class="node">
+<g id="module~~s_symba_util~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-144.86 511.5,-144.86 511.5,-120.86 587.5,-120.86 587.5,-144.86"/>
-<text text-anchor="middle" x="549.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~s_symba_util~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-163 511.5,-163 511.5,-139 587.5,-139 587.5,-163"/>
+<text text-anchor="middle" x="549.5" y="-148.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge6" class="edge">
+<g id="module~~s_symba_util~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C638.89,-170.41 607.07,-159.07 583.95,-149.09"/>
-<polygon fill="#000000" stroke="#000000" points="585.17,-145.8 574.61,-144.92 582.32,-152.19 585.17,-145.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C645.28,-149.99 619.47,-149.87 597.93,-150.06"/>
+<polygon fill="#000000" stroke="#000000" points="597.68,-146.56 587.72,-150.17 597.76,-153.56 597.68,-146.56"/>
 </g>
-<!-- module~whm_classes -->
-<g id="module~~s_symba_util~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-184.86 391,-184.86 391,-160.86 467,-160.86 467,-184.86"/>
-<text text-anchor="middle" x="429" y="-170.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~s_symba_util~~UsesGraph_node7" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_symba_util~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-241 385.5,-241 385.5,-217 472.5,-217 472.5,-241"/>
+<text text-anchor="middle" x="429" y="-226.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C505.41,-82.36 464.75,-125.48 444.11,-152.49"/>
-<polygon fill="#000000" stroke="#000000" points="441.25,-150.48 438.14,-160.61 446.89,-154.63 441.25,-150.48"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C648.57,-150.13 535.02,-190.45 472.06,-213.45"/>
+<polygon fill="#000000" stroke="#000000" points="470.59,-210.26 462.41,-216.99 473,-216.83 470.59,-210.26"/>
 </g>
-<!-- module~swiftest_globals -->
-<g id="module~~s_symba_util~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-144.86 123,-144.86 123,-120.86 211,-120.86 211,-144.86"/>
-<text text-anchor="middle" x="167" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<!-- module~lambda_function -->
+<g id="module~~s_symba_util~~UsesGraph_node8" class="node">
+<title>module~lambda_function</title>
+<g id="a_module~~s_symba_util~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-84 624,-84 624,-60 715,-60 715,-84"/>
+<text text-anchor="middle" x="669.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_symba_util~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C623.73,-169.61 626.06,-135.65 588,-111.86 572.16,-101.95 568.65,-97.28 550.5,-92.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C494.49,-79.71 484.05,-65.83 430,-52.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-173.92C729.12,-174.53 697.79,-174.84 670.5,-172.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-52.86C369.22,-38.76 355.49,5.83 298,-12.86"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-138.66C742.85,-125.67 715.11,-105.09 695.08,-90.24"/>
+<polygon fill="#000000" stroke="#000000" points="697.14,-87.4 687.02,-84.26 692.97,-93.03 697.14,-87.4"/>
 </g>
 <!-- module~swiftest_classes -->
-<g id="module~~s_symba_util~~UsesGraph_node10" class="node">
+<g id="module~~s_symba_util~~UsesGraph_node9" class="node">
 <title>module~swiftest_classes</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-204.86 252.5,-204.86 252.5,-180.86 341.5,-180.86 341.5,-204.86"/>
-<text text-anchor="middle" x="297" y="-190.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<g id="a_module~~s_symba_util~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-182 252.5,-182 252.5,-158 341.5,-158 341.5,-182"/>
+<text text-anchor="middle" x="297" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge10" class="edge">
+<g id="module~~s_symba_util~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-172.86C598.23,-167.04 580.28,-178.76 511,-191.86 474.46,-198.77 467.17,-211.61 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.36,-145.96 430,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-151C402.87,-153.29 375.18,-157.15 351.84,-160.79"/>
+<polygon fill="#000000" stroke="#000000" points="351.11,-157.36 341.79,-162.39 352.21,-164.28 351.11,-157.36"/>
 </g>
-<!-- module~lambda_function -->
-<g id="module~~s_symba_util~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-84.86 624,-84.86 624,-60.86 715,-60.86 715,-84.86"/>
-<text text-anchor="middle" x="669.5" y="-70.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<!-- module~rmvs_classes -->
+<g id="module~~s_symba_util~~UsesGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_symba_util~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-83 511,-83 511,-59 588,-59 588,-83"/>
+<text text-anchor="middle" x="549.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
-<g id="module~~s_symba_util~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-160.6C745.64,-143.41 712.19,-112 690.67,-91.8"/>
-<polygon fill="#000000" stroke="#000000" points="693.02,-89.2 683.33,-84.91 688.23,-94.31 693.02,-89.2"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_symba_util~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.73,-151.64C729.16,-152.01 697.84,-152.19 670.5,-151"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C667.13,-150.94 611.14,-112.65 576.79,-89.07"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-85.91 568.15,-83.14 574.41,-91.68 578.38,-85.91"/>
 </g>
 <!-- module~walltime_classes -->
-<g id="module~~s_symba_util~~UsesGraph_node12" class="node">
+<g id="module~~s_symba_util~~UsesGraph_node11" class="node">
 <title>module~walltime_classes</title>
-<g id="a_module~~s_symba_util~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-104.86 383,-104.86 383,-80.86 475,-80.86 475,-104.86"/>
-<text text-anchor="middle" x="429" y="-90.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<g id="a_module~~s_symba_util~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~walltime_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge12" class="edge">
+<g id="module~~s_symba_util~~UsesGraph_edge11" class="edge">
 <title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-92.86C528.24,-87.93 505.46,-86.9 485.32,-87.46"/>
-<polygon fill="#000000" stroke="#000000" points="484.9,-83.97 475.05,-87.88 485.19,-90.96 484.9,-83.97"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M772.85,-138.77C765.02,-117.55 746,-74.02 715,-51 648.06,-1.29 547.21,0.17 485.16,-4.83"/>
+<polygon fill="#000000" stroke="#000000" points="484.82,-1.35 475.17,-5.72 485.44,-8.32 484.82,-1.35"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge13" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-212.86C617.64,-212.86 607.75,-212.86 598.27,-212.86"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-209.36 588.18,-212.86 598.18,-216.36 598.18,-209.36"/>
+<!-- module~swiftest_globals -->
+<g id="module~~s_symba_util~~UsesGraph_node12" class="node">
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_symba_util~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-202 123,-202 123,-178 211,-178 211,-202"/>
+<text text-anchor="middle" x="167" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge14" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C521.17,-257.18 491.54,-266.68 468.74,-275.11"/>
-<polygon fill="#000000" stroke="#000000" points="467.21,-271.94 459.09,-278.75 469.68,-278.49 467.21,-271.94"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_util~~UsesGraph_edge12" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-111C493.63,-102.1 485.57,-72.38 430,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-151C613.34,-146.15 605.16,-119.87 550.5,-111"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge15" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-200.61C639.23,-196.41 631.18,-191.57 624,-186.86 606.9,-175.63 588.34,-161.98 574.15,-151.22"/>
-<polygon fill="#000000" stroke="#000000" points="576,-148.22 565.93,-144.93 571.75,-153.79 576,-148.22"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-179C621.42,-175.04 608.26,-170.58 595.94,-166.4"/>
+<polygon fill="#000000" stroke="#000000" points="596.88,-163.03 586.29,-163.13 594.63,-169.66 596.88,-163.03"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge16" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M652.78,-224.87C636.99,-236.58 611.67,-254.39 588,-266.86 473.58,-327.14 414.74,-346.52 298,-290.86"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C532.36,-272.37 493.68,-257.67 464.88,-245.15"/>
+<polygon fill="#000000" stroke="#000000" points="466.09,-241.86 455.53,-241.02 463.26,-248.27 466.09,-241.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.89,-203.21C637.24,-222.72 595.21,-259.66 550.5,-269"/>
 </g>
 <!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge17" class="edge">
+<g id="module~~s_symba_util~~UsesGraph_edge14" class="edge">
 <title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M641.51,-224.95C618.02,-234.76 582.76,-247.76 550.5,-252.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-252.86C493.6,-261.53 485.55,-210.99 430,-212.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.82,-187.5C594.93,-184.46 549.97,-179.37 511,-172 474.46,-165.09 467.1,-148.34 430,-151"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_util~~UsesGraph_edge13" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-269C438.14,-292.06 409.53,-245.51 298,-229"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge18" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.56,-65.01C255.1,-78.42 220.38,-100.12 195.99,-115.36"/>
-<polygon fill="#000000" stroke="#000000" points="193.83,-112.59 187.2,-120.86 197.54,-118.52 193.83,-112.59"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-123.08C381.92,-131.91 355.32,-143.98 333.98,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="332.25,-150.61 324.59,-157.93 335.14,-156.99 332.25,-150.61"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge20" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-200.86C501.22,-196.9 488.01,-192.44 475.64,-188.26"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-184.87 465.94,-184.99 474.29,-191.5 476.53,-184.87"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_util~~UsesGraph_edge17" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.37,-98.89C370.21,-84.42 316.97,-63.1 298,-71"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_util~~UsesGraph_edge19" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-290.86C235.89,-262.48 194.96,-190.37 177.51,-154.21"/>
-<polygon fill="#000000" stroke="#000000" points="180.62,-152.61 173.22,-145.03 174.28,-155.57 180.62,-152.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.06,-224.93C447.77,-247.98 308.03,-295.59 298,-290.86"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.3,-275.98C258.23,-259.08 217.84,-228.16 191.99,-208.36"/>
+<polygon fill="#000000" stroke="#000000" points="193.89,-205.42 183.82,-202.12 189.64,-210.97 193.89,-205.42"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge21" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.31,-299.77C358.92,-303.18 325.04,-303.63 298,-290.86"/>
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-139C501.22,-135.04 488.01,-130.58 475.64,-126.4"/>
+<polygon fill="#000000" stroke="#000000" points="476.53,-123.01 465.94,-123.13 474.29,-129.65 476.53,-123.01"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge22" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.06,-278.84C389.64,-261.94 348.62,-231.01 322.36,-211.22"/>
-<polygon fill="#000000" stroke="#000000" points="324.16,-208.2 314.07,-204.97 319.95,-213.79 324.16,-208.2"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_symba_util~~UsesGraph_edge25" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-144.86C501.22,-148.82 488.01,-153.28 475.64,-157.45"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-154.21 465.94,-160.73 476.53,-160.85 474.29,-154.21"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.36,-149.64C487.98,-149.12 457.19,-149.05 430,-151"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_util~~UsesGraph_edge23" class="edge">
+<g id="module~~s_symba_util~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.15,-132.86C462.2,-132.86 373.67,-132.86 298,-132.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.69,-163.05C446.08,-185.34 308.89,-230.6 298,-229"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-229C265.77,-224.52 232.81,-214.35 207.91,-205.52"/>
+<polygon fill="#000000" stroke="#000000" points="209.04,-202.2 198.45,-202.09 206.65,-208.79 209.04,-202.2"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_symba_util~~UsesGraph_edge24" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-212.86C402.75,-213.71 375.05,-210.09 351.73,-205.71"/>
-<polygon fill="#000000" stroke="#000000" points="352.17,-202.23 341.68,-203.72 350.81,-209.09 352.17,-202.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.75,-144.97C523.61,-149.16 516.87,-154.02 511,-158.86 477.6,-186.36 473.24,-211.4 430,-212.86"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-216.92C381.92,-208.09 355.32,-196.02 333.98,-186.33"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-183.01 324.59,-182.07 332.25,-189.39 335.14,-183.01"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_util~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.33,-232.11C359.84,-233.19 326.92,-233.24 298,-229"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_util~~UsesGraph_edge25" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-71C370.22,-71 351.34,-48.79 298,-71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.46,-59.95C618.71,-55.93 602.79,-51.98 588,-50 554.08,-45.45 544.95,-45.67 511,-50 474.11,-54.7 467.19,-71 430,-71"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_util~~UsesGraph_edge26" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-160.86C378.67,-149.08 336.49,-132.86 298,-132.86"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-176.83C242.31,-178.39 231.58,-180.07 221.24,-181.68"/>
+<polygon fill="#000000" stroke="#000000" points="220.4,-178.27 211.06,-183.27 221.48,-185.19 220.4,-178.27"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_symba_util~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-83C501.22,-86.96 488.01,-91.42 475.64,-95.6"/>
+<polygon fill="#000000" stroke="#000000" points="474.29,-92.35 465.94,-98.87 476.53,-98.99 474.29,-92.35"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_util~~UsesGraph_edge27" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-178.59C378.55,-180.47 364.75,-182.59 351.59,-184.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.04,-181.16 341.69,-186.14 352.11,-188.08 351.04,-181.16"/>
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.88,-71C487.58,-71 457.05,-71 430,-71"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_symba_util~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-71C245.96,-91.84 203.42,-141.55 182.29,-169.69"/>
+<polygon fill="#000000" stroke="#000000" points="179.28,-167.86 176.19,-178 184.93,-172 179.28,-167.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.8,-24.01C376.76,-36.28 334.84,-55.66 298,-71"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_symba_util~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_symba_util~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-144.86 0,-144.86 0,-120.86 87,-120.86 87,-144.86"/>
-<text text-anchor="middle" x="43.5" y="-130.46" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-202 0,-202 0,-178 87,-178 87,-202"/>
+<text text-anchor="middle" x="43.5" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_symba_util~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-132.86C114.58,-132.86 105.86,-132.86 97.36,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-129.36 87.13,-132.86 97.13,-136.36 97.13,-129.36"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_util~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-180.72C250.84,-171.69 224.35,-159.27 203.17,-149.35"/>
-<polygon fill="#000000" stroke="#000000" points="204.4,-146.06 193.86,-144.98 201.43,-152.4 204.4,-146.06"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_symba_util~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-12.86C273.67,-19.71 265.76,-17.94 247,-31.86 217.59,-53.68 193.36,-89.16 179.79,-111.74"/>
-<polygon fill="#000000" stroke="#000000" points="176.67,-110.15 174.65,-120.55 182.71,-113.68 176.67,-110.15"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M642.8,-60.83C581.77,-33.94 423.84,25.73 298,-12.86"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_symba_util~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.23,-104.86C378.67,-116.64 336.49,-132.86 298,-132.86"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-132.86C271.53,-132.86 244.42,-132.86 221.48,-132.86"/>
-<polygon fill="#000000" stroke="#000000" points="221.25,-129.36 211.25,-132.86 221.25,-136.36 221.25,-129.36"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-190C114.58,-190 105.86,-190 97.36,-190"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-186.5 87.13,-190 97.13,-193.5 97.13,-186.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_tides_kick_getacch.html b/docs/module/s_tides_kick_getacch.html
index 01190ac80..e8bbbebb6 100644
--- a/docs/module/s_tides_kick_getacch.html
+++ b/docs/module/s_tides_kick_getacch.html
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_tides_kick_getacch~~UsesGraph Pages: 1 -->
-<svg id="modules_tides_kick_getacchUsesGraph" width="641pt" height="260pt"
- viewBox="0.00 0.00 641.00 260.29" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_tides_kick_getacch~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 387.05)">
+<svg id="modules_tides_kick_getacchUsesGraph" width="641pt" height="272pt"
+ viewBox="0.00 0.00 641.00 271.80" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_tides_kick_getacch~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 404.34)">
 <title>module~~s_tides_kick_getacch~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 959,-387.05 959,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 959,-404.34 959,4 -4,4"/>
 <!-- module~s_tides_kick_getacch -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node1" class="node">
 <title>module~s_tides_kick_getacch</title>
-<polygon fill="none" stroke="black" points="955,-318.05 841,-318.05 841,-294.05 955,-294.05 955,-318.05"/>
-<text text-anchor="middle" x="898" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_tides_kick_getacch</text>
+<polygon fill="none" stroke="black" points="955,-102.05 841,-102.05 841,-78.05 955,-78.05 955,-102.05"/>
+<text text-anchor="middle" x="898" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_tides_kick_getacch</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_tides_kick_getacch~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge1" class="edge">
 <title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M878.56,-294.01C859.19,-281.38 828.52,-261.36 806.33,-246.88"/>
-<polygon fill="#000000" stroke="#000000" points="807.98,-243.78 797.7,-241.25 804.16,-249.64 807.98,-243.78"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M885.69,-102.13C865.3,-123.9 822.22,-169.9 797.49,-196.3"/>
+<polygon fill="#000000" stroke="#000000" points="794.73,-194.13 790.45,-203.82 799.84,-198.91 794.73,-194.13"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_tides_kick_getacch~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge2" class="edge">
 <title>module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M876.56,-318.08C837.78,-339.73 750.24,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M853.54,-78.03C808.22,-66.57 734.94,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge10" class="edge">
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_tides_kick_getacch~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge6" class="edge">
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_tides_kick_getacch~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge20" class="edge">
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge21" class="edge">
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge19" class="edge">
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_kick_getacch~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_tides_kick_getacch~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_kick_getacch~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_kick_getacch~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_tides_step_spin.html b/docs/module/s_tides_step_spin.html
index ceb70f13e..224d72259 100644
--- a/docs/module/s_tides_step_spin.html
+++ b/docs/module/s_tides_step_spin.html
@@ -297,311 +297,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_tides_step_spin~~UsesGraph Pages: 1 -->
-<svg id="modules_tides_step_spinUsesGraph" width="641pt" height="265pt"
- viewBox="0.00 0.00 641.00 264.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_tides_step_spin~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 387.05)">
+<svg id="modules_tides_step_spinUsesGraph" width="641pt" height="276pt"
+ viewBox="0.00 0.00 641.00 276.39" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_tides_step_spin~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 404.34)">
 <title>module~~s_tides_step_spin~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 943,-387.05 943,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 943,-404.34 943,4 -4,4"/>
 <!-- module~s_tides_step_spin -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node1" class="node">
 <title>module~s_tides_step_spin</title>
-<polygon fill="none" stroke="black" points="939,-318.05 841,-318.05 841,-294.05 939,-294.05 939,-318.05"/>
-<text text-anchor="middle" x="890" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_tides_step_spin</text>
+<polygon fill="none" stroke="black" points="939,-102.05 841,-102.05 841,-78.05 939,-78.05 939,-102.05"/>
+<text text-anchor="middle" x="890" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_tides_step_spin</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_tides_step_spin~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge1" class="edge">
 <title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M871.81,-294.01C853.84,-281.43 825.41,-261.54 804.76,-247.08"/>
-<polygon fill="#000000" stroke="#000000" points="806.63,-244.11 796.43,-241.25 802.62,-249.85 806.63,-244.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M878.45,-102.13C859.53,-123.81 819.64,-169.51 796.54,-195.96"/>
+<polygon fill="#000000" stroke="#000000" points="793.62,-193.99 789.68,-203.82 798.89,-198.59 793.62,-193.99"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_tides_step_spin~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_tides_step_spin&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge2" class="edge">
 <title>module~s_tides_step_spin&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M869.34,-318.08C832.02,-339.73 747.72,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M847.1,-78.03C803.4,-66.57 732.73,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge10" class="edge">
+<g id="module~~s_tides_step_spin~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_tides_step_spin~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge6" class="edge">
+<g id="module~~s_tides_step_spin~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_tides_step_spin~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_tides_step_spin~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge20" class="edge">
+<g id="module~~s_tides_step_spin~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge21" class="edge">
+<g id="module~~s_tides_step_spin~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge19" class="edge">
+<g id="module~~s_tides_step_spin~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_tides_step_spin~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_tides_step_spin~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_tides_step_spin~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_tides_step_spin~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_tides_step_spin~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_user_kick_getacch.html b/docs/module/s_user_kick_getacch.html
index 3a4d19c8d..573cda30b 100644
--- a/docs/module/s_user_kick_getacch.html
+++ b/docs/module/s_user_kick_getacch.html
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_user_kick_getacch~~UsesGraph Pages: 1 -->
-<svg id="modules_user_kick_getacchUsesGraph" width="641pt" height="261pt"
- viewBox="0.00 0.00 641.00 260.83" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_user_kick_getacch~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 387.05)">
+<svg id="modules_user_kick_getacchUsesGraph" width="641pt" height="272pt"
+ viewBox="0.00 0.00 641.00 272.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_user_kick_getacch~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 404.34)">
 <title>module~~s_user_kick_getacch~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 957,-387.05 957,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 957,-404.34 957,4 -4,4"/>
 <!-- module~s_user_kick_getacch -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node1" class="node">
 <title>module~s_user_kick_getacch</title>
-<polygon fill="none" stroke="black" points="953,-318.05 841,-318.05 841,-294.05 953,-294.05 953,-318.05"/>
-<text text-anchor="middle" x="897" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_user_kick_getacch</text>
+<polygon fill="none" stroke="black" points="953,-102.05 841,-102.05 841,-78.05 953,-78.05 953,-102.05"/>
+<text text-anchor="middle" x="897" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_user_kick_getacch</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_user_kick_getacch~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge1" class="edge">
 <title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M877.72,-294.01C858.51,-281.38 828.1,-261.36 806.1,-246.88"/>
-<polygon fill="#000000" stroke="#000000" points="807.82,-243.82 797.54,-241.25 803.97,-249.67 807.82,-243.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.78,-102.13C864.57,-123.9 821.85,-169.9 797.34,-196.3"/>
+<polygon fill="#000000" stroke="#000000" points="794.6,-194.11 790.36,-203.82 799.73,-198.87 794.6,-194.11"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_user_kick_getacch~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_user_kick_getacch&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge2" class="edge">
 <title>module~s_user_kick_getacch&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M875.66,-318.08C837.06,-339.73 749.93,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M852.73,-78.03C807.62,-66.57 734.66,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge10" class="edge">
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_user_kick_getacch~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge6" class="edge">
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_user_kick_getacch~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_user_kick_getacch~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge20" class="edge">
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge21" class="edge">
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge19" class="edge">
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_user_kick_getacch~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_user_kick_getacch~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_user_kick_getacch~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_user_kick_getacch~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_append.html b/docs/module/s_util_append.html
index bfe6dfc6f..0ba126c37 100644
--- a/docs/module/s_util_append.html
+++ b/docs/module/s_util_append.html
@@ -263,311 +263,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_append~~UsesGraph Pages: 1 -->
-<svg id="modules_util_appendUsesGraph" width="641pt" height="270pt"
- viewBox="0.00 0.00 641.00 270.11" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_append~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 387.05)">
+<svg id="modules_util_appendUsesGraph" width="641pt" height="282pt"
+ viewBox="0.00 0.00 641.00 282.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_append~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 404.34)">
 <title>module~~s_util_append~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 924,-387.05 924,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 924,-404.34 924,4 -4,4"/>
 <!-- module~s_util_append -->
 <g id="module~~s_util_append~~UsesGraph_node1" class="node">
 <title>module~s_util_append</title>
-<polygon fill="none" stroke="black" points="920,-318.05 841,-318.05 841,-294.05 920,-294.05 920,-318.05"/>
-<text text-anchor="middle" x="880.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_append</text>
+<polygon fill="none" stroke="black" points="920,-102.05 841,-102.05 841,-78.05 920,-78.05 920,-102.05"/>
+<text text-anchor="middle" x="880.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_append</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_append~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_append~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_append&#45;&gt;module~swiftest -->
 <g id="module~~s_util_append~~UsesGraph_edge1" class="edge">
 <title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M863.8,-294.01C847.52,-281.54 821.87,-261.89 803.04,-247.46"/>
-<polygon fill="#000000" stroke="#000000" points="804.99,-244.55 794.92,-241.25 800.73,-250.11 804.99,-244.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M869.86,-102.13C852.57,-123.81 816.13,-169.51 795.02,-195.96"/>
+<polygon fill="#000000" stroke="#000000" points="792.25,-193.82 788.75,-203.82 797.73,-198.19 792.25,-193.82"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_append~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_append~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_append&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_append~~UsesGraph_edge2" class="edge">
 <title>module~s_util_append&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M860.76,-318.08C825.18,-339.73 744.74,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M841,-78.46C799.36,-66.96 730.85,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_append~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_append~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_append~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_append~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_append~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_append~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_append~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_append~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_append~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_append~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_append~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_append~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_append~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_append~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_append~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_append~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_append~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_append~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_append~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_append~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_append~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_append~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_append~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_append~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_append~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_append~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_append~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_append~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_append~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_append~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_append~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_append~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_append~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_append~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_append~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_append~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_append~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_append~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_append~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_append~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_append~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_append~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_append~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_append~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_append~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_append~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_append~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_append~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_append~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_append~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_append~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_append~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_append~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_append~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_append~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_append~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_append~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_append~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_append~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_append~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_append~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_append~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_append~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_coord.html b/docs/module/s_util_coord.html
index 314d13f32..b977efc3a 100644
--- a/docs/module/s_util_coord.html
+++ b/docs/module/s_util_coord.html
@@ -263,311 +263,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_coord~~UsesGraph Pages: 1 -->
-<svg id="modules_util_coordUsesGraph" width="641pt" height="273pt"
- viewBox="0.00 0.00 641.00 272.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_coord~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_coordUsesGraph" width="641pt" height="285pt"
+ viewBox="0.00 0.00 641.00 284.82" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_coord~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_coord~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 915,-387.05 915,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 915,-404.34 915,4 -4,4"/>
 <!-- module~s_util_coord -->
 <g id="module~~s_util_coord~~UsesGraph_node1" class="node">
 <title>module~s_util_coord</title>
-<polygon fill="none" stroke="black" points="911,-318.05 841,-318.05 841,-294.05 911,-294.05 911,-318.05"/>
-<text text-anchor="middle" x="876" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_coord</text>
+<polygon fill="none" stroke="black" points="911,-102.05 841,-102.05 841,-78.05 911,-78.05 911,-102.05"/>
+<text text-anchor="middle" x="876" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_coord</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_coord~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_coord~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_coord&#45;&gt;module~swiftest -->
 <g id="module~~s_util_coord~~UsesGraph_edge1" class="edge">
 <title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M860,-294.01C844.59,-281.66 820.39,-262.24 802.45,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="804.2,-244.77 794.21,-241.25 799.82,-250.23 804.2,-244.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M865.8,-102.13C849.35,-123.71 814.76,-169.11 794.57,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="791.59,-193.75 788.32,-203.82 797.16,-197.99 791.59,-193.75"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_coord~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_coord~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_coord&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_coord~~UsesGraph_edge2" class="edge">
 <title>module~s_util_coord&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M856.7,-318.08C821.95,-339.73 743.34,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.64,-79.39C800.32,-67.85 731.22,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_coord~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_coord~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_coord~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_coord~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_coord~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_coord~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_coord~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_coord~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_coord~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_coord~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_coord~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_coord~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_coord~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_coord~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_coord~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_coord~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_coord~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_coord~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_coord~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_coord~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_coord~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_coord~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_coord~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_coord~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_coord~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_coord~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_coord~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_coord~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_coord~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_coord~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_coord~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_coord~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_coord~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_coord~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_coord~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_coord~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_coord~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_coord~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_coord~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_coord~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_coord~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_coord~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_coord~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_coord~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_coord~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_coord~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_coord~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_coord~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_coord~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_copy.html b/docs/module/s_util_copy.html
index dfbaac14f..38f92e9f5 100644
--- a/docs/module/s_util_copy.html
+++ b/docs/module/s_util_copy.html
@@ -249,311 +249,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_copy~~UsesGraph Pages: 1 -->
-<svg id="modules_util_copyUsesGraph" width="641pt" height="274pt"
- viewBox="0.00 0.00 641.00 273.95" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_copy~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_copyUsesGraph" width="641pt" height="286pt"
+ viewBox="0.00 0.00 641.00 286.06" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_copy~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_copy~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 911,-387.05 911,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 911,-404.34 911,4 -4,4"/>
 <!-- module~s_util_copy -->
 <g id="module~~s_util_copy~~UsesGraph_node1" class="node">
 <title>module~s_util_copy</title>
-<polygon fill="none" stroke="black" points="907,-318.05 841,-318.05 841,-294.05 907,-294.05 907,-318.05"/>
-<text text-anchor="middle" x="874" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_copy</text>
+<polygon fill="none" stroke="black" points="907,-102.05 841,-102.05 841,-78.05 907,-78.05 907,-102.05"/>
+<text text-anchor="middle" x="874" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_copy</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_copy~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_copy~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_copy&#45;&gt;module~swiftest -->
 <g id="module~~s_util_copy~~UsesGraph_edge1" class="edge">
 <title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.31,-294.01C843.23,-281.66 819.53,-262.24 801.96,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.85,-244.88 793.89,-241.25 799.41,-250.29 803.85,-244.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M863.99,-102.13C847.89,-123.71 814.02,-169.11 794.24,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="791.3,-193.71 788.12,-203.82 796.91,-197.9 791.3,-193.71"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_copy~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_copy~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_copy&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_copy~~UsesGraph_edge2" class="edge">
 <title>module~s_util_copy&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M854.9,-318.08C820.51,-339.73 742.72,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.75,-79.91C801.1,-68.35 731.54,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_copy~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_copy~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_copy~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_copy~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_copy~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_copy~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_copy~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_copy~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_copy~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_copy~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_copy~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_copy~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_copy~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_copy~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_copy~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_copy~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_copy~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_copy~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_copy~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_copy~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_copy~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_copy~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_copy~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_copy~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_copy~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_copy~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_copy~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_copy~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_copy~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_copy~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_copy~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_copy~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_copy~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_copy~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_copy~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_copy~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_copy~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_copy~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_copy~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_copy~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_copy~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_copy~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_copy~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_copy~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_copy~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_copy~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_copy~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_copy~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_copy~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_exit.html b/docs/module/s_util_exit.html
index b5a01d189..3eb096786 100644
--- a/docs/module/s_util_exit.html
+++ b/docs/module/s_util_exit.html
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_exit~~UsesGraph Pages: 1 -->
-<svg id="modules_util_exitUsesGraph" width="641pt" height="276pt"
- viewBox="0.00 0.00 641.00 275.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_exit~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_util_exitUsesGraph" width="641pt" height="288pt"
+ viewBox="0.00 0.00 641.00 287.95" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_exit~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_util_exit~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 905,-387.05 905,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 905,-404.34 905,4 -4,4"/>
 <!-- module~s_util_exit -->
 <g id="module~~s_util_exit~~UsesGraph_node1" class="node">
 <title>module~s_util_exit</title>
-<polygon fill="none" stroke="black" points="901,-318.05 841,-318.05 841,-294.05 901,-294.05 901,-318.05"/>
-<text text-anchor="middle" x="871" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_exit</text>
+<polygon fill="none" stroke="black" points="901,-102.05 841,-102.05 841,-78.05 901,-78.05 901,-102.05"/>
+<text text-anchor="middle" x="871" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_exit</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_exit~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_exit~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_exit&#45;&gt;module~swiftest -->
 <g id="module~~s_util_exit~~UsesGraph_edge1" class="edge">
 <title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M855.78,-294.01C841.18,-281.66 818.23,-262.24 801.23,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.31,-245.03 793.42,-241.25 798.79,-250.38 803.31,-245.03"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M861.27,-102.13C845.69,-123.71 812.9,-169.11 793.76,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.85,-193.67 787.83,-203.82 796.53,-197.76 790.85,-193.67"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_exit~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_exit~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_exit&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_exit~~UsesGraph_edge2" class="edge">
 <title>module~s_util_exit&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M852.19,-318.08C818.36,-339.73 741.78,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.94,-80.71C802.41,-69.17 732.08,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_exit~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_exit~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_exit~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_exit~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_exit~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_exit~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_exit~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_exit~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_exit~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_exit~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_exit~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_exit~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_exit~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_exit~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_exit~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_exit~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_exit~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_exit~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_exit~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_exit~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_exit~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_exit~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_exit~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_exit~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_exit~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_exit~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_exit~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_exit~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_exit~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_exit~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_exit~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_exit~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_exit~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_exit~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_exit~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_exit~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_exit~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_exit~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_exit~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_exit~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_exit~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_exit~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_exit~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_exit~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_exit~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_exit~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_exit~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_exit~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_exit~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_fill.html b/docs/module/s_util_fill.html
index da44088cd..1d52af850 100644
--- a/docs/module/s_util_fill.html
+++ b/docs/module/s_util_fill.html
@@ -261,311 +261,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_fill~~UsesGraph Pages: 1 -->
-<svg id="modules_util_fillUsesGraph" width="641pt" height="278pt"
- viewBox="0.00 0.00 641.00 277.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_fill~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_util_fillUsesGraph" width="641pt" height="290pt"
+ viewBox="0.00 0.00 641.00 289.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_fill~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_util_fill~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 899,-387.05 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 899,-404.34 899,4 -4,4"/>
 <!-- module~s_util_fill -->
 <g id="module~~s_util_fill~~UsesGraph_node1" class="node">
 <title>module~s_util_fill</title>
-<polygon fill="none" stroke="black" points="895,-318.05 841,-318.05 841,-294.05 895,-294.05 895,-318.05"/>
-<text text-anchor="middle" x="868" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_fill</text>
+<polygon fill="none" stroke="black" points="895,-102.05 841,-102.05 841,-78.05 895,-78.05 895,-102.05"/>
+<text text-anchor="middle" x="868" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_fill</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_fill~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_fill~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_fill&#45;&gt;module~swiftest -->
 <g id="module~~s_util_fill~~UsesGraph_edge1" class="edge">
 <title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.25,-294.01C839.13,-281.66 816.94,-262.24 800.5,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="802.77,-245.2 792.94,-241.25 798.16,-250.47 802.77,-245.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.56,-102.13C843.49,-123.71 811.78,-169.11 793.27,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.4,-193.62 787.54,-203.82 796.14,-197.63 790.4,-193.62"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_fill~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_fill~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_fill&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_fill~~UsesGraph_edge2" class="edge">
 <title>module~s_util_fill&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M849.49,-318.08C816.21,-339.73 740.85,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-81.49C803.62,-70.01 732.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_fill~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_fill~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_fill~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_fill~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_fill~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_fill~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_fill~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_fill~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_fill~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_fill~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_fill~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_fill~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_fill~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_fill~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_fill~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_fill~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_fill~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_fill~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_fill~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_fill~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_fill~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_fill~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_fill~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_fill~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_fill~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_fill~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_fill~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_fill~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_fill~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_fill~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_fill~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_fill~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_fill~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_fill~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_fill~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_fill~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_fill~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_fill~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_fill~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_fill~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_fill~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_fill~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_fill~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_fill~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_fill~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_fill~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_fill~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_fill~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_fill~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_get_energy_momentum.html b/docs/module/s_util_get_energy_momentum.html
index f23e513c3..4c6e27c92 100644
--- a/docs/module/s_util_get_energy_momentum.html
+++ b/docs/module/s_util_get_energy_momentum.html
@@ -134,7 +134,7 @@ <h1>s_util_get_energy_momentum
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.6% of total for modules and submodules.">100 statements</a>
+    title=" 0.7% of total for modules and submodules.">111 statements</a>
      </li> 
      
      
@@ -183,6 +183,18 @@ <h3>Contents</h3>
 
 
 
+<div class="panel panel-primary">
+  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#subs-0">Subroutines</a></h3></div>
+  <div class="list-group">
+    <div id="subs-0" class="panel-collapse collapse">
+      
+      <a class="list-group-item" href="../module/s_util_get_energy_momentum.html#proc-util_get_energy_potential">util_get_energy_potential</a>
+      
+    </div>
+  </div>
+</div>
+
+
 
 
 <div class="panel panel-primary">
@@ -245,311 +257,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_get_energy_momentum~~UsesGraph Pages: 1 -->
-<svg id="modules_util_get_energy_momentumUsesGraph" width="641pt" height="249pt"
- viewBox="0.00 0.00 641.00 249.17" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_get_energy_momentum~~UsesGraph" class="graph" transform="scale(0.64 0.64) rotate(0) translate(4 387.05)">
+<svg id="modules_util_get_energy_momentumUsesGraph" width="641pt" height="260pt"
+ viewBox="0.00 0.00 641.00 260.18" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_get_energy_momentum~~UsesGraph" class="graph" transform="scale(0.64 0.64) rotate(0) translate(4 404.34)">
 <title>module~~s_util_get_energy_momentum~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 1002,-387.05 1002,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 1002,-404.34 1002,4 -4,4"/>
 <!-- module~s_util_get_energy_momentum -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node1" class="node">
 <title>module~s_util_get_energy_momentum</title>
-<polygon fill="none" stroke="black" points="998,-318.05 841,-318.05 841,-294.05 998,-294.05 998,-318.05"/>
-<text text-anchor="middle" x="919.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_get_energy_momentum</text>
+<polygon fill="none" stroke="black" points="998,-102.05 841,-102.05 841,-78.05 998,-78.05 998,-102.05"/>
+<text text-anchor="middle" x="919.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_get_energy_momentum</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge1" class="edge">
 <title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.7,-294.01C873.4,-281.15 836.25,-260.64 809.92,-246.11"/>
-<polygon fill="#000000" stroke="#000000" points="811.55,-243.02 801.1,-241.25 808.17,-249.14 811.55,-243.02"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.12,-102.13C880.81,-124.09 829.21,-170.7 800.11,-196.98"/>
+<polygon fill="#000000" stroke="#000000" points="797.62,-194.52 792.54,-203.82 802.31,-199.72 797.62,-194.52"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge2" class="edge">
 <title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M895.98,-318.08C853.28,-339.73 757.06,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M870.84,-78.03C821.17,-66.57 740.89,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_get_energy_momentum~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_get_energy_momentum~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_get_energy_momentum~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
@@ -640,6 +646,18 @@ <h3>Contents</h3>
 
 
 
+<div class="panel panel-primary">
+  <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#subs-1">Subroutines</a></h3></div>
+  <div class="list-group">
+    <div id="subs-1" class="panel-collapse collapse">
+      
+      <a class="list-group-item" href="../module/s_util_get_energy_momentum.html#proc-util_get_energy_potential">util_get_energy_potential</a>
+      
+    </div>
+  </div>
+</div>
+
+
 
 
 <div class="panel panel-primary">
@@ -678,6 +696,201 @@ <h3>Contents</h3>
     
 
     
+    <section>
+    <h2>Subroutines</h2>
+    
+    
+  <div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="proc-util_get_energy_potential"></span><h3>
+subroutine <a href='../proc/util_get_energy_potential.html'>util_get_energy_potential</a>(npl, nplpl, k_plpl, lmask, GMcb, Gmass, mass, xb, pe)
+    
+    
+   
+</h3></div>
+  <div class="panel-body">
+       
+    
+
+
+
+
+
+  <dl class="dl-horizontal">
+    
+    <dt>Author</dt><dd>David A. Minton</dd>
+    
+    
+    
+    
+    
+  </dl>
+
+
+
+<p>Compute total system potential energy</p>
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>npl</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I8B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>nplpl</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>k_plpl</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>logical,</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>lmask</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>GMcb</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>Gmass</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>mass</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xb</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>pe</strong></td><td></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+  </div>
+  </div>
+
+    
+    </section>    
+    <br>
+    
     
     
     
diff --git a/docs/module/s_util_index.html b/docs/module/s_util_index.html
index 2d4e6ce96..521a096a6 100644
--- a/docs/module/s_util_index.html
+++ b/docs/module/s_util_index.html
@@ -134,7 +134,7 @@ <h1>s_util_index
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.3% of total for modules and submodules.">48 statements</a>
+    title=" 0.5% of total for modules and submodules.">75 statements</a>
      </li> 
      
      
@@ -190,6 +190,10 @@ <h3>Contents</h3>
   <div id="modsubs-0" class="panel-collapse collapse">
     <div class="list-group">
       
+      <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_ij_to_k">util_index_eucl_ij_to_k</a>
+      
+      <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_k_to_ij">util_index_eucl_k_to_ij</a>
+      
       <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_plpl">util_index_eucl_plpl</a>
       
       <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_pltp">util_index_eucl_pltp</a>
@@ -247,311 +251,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_index~~UsesGraph Pages: 1 -->
-<svg id="modules_util_indexUsesGraph" width="641pt" height="273pt"
- viewBox="0.00 0.00 641.00 273.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_index~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_indexUsesGraph" width="641pt" height="285pt"
+ viewBox="0.00 0.00 641.00 285.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_index~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_index~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 914,-387.05 914,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 914,-404.34 914,4 -4,4"/>
 <!-- module~s_util_index -->
 <g id="module~~s_util_index~~UsesGraph_node1" class="node">
 <title>module~s_util_index</title>
-<polygon fill="none" stroke="black" points="910,-318.05 841,-318.05 841,-294.05 910,-294.05 910,-318.05"/>
-<text text-anchor="middle" x="875.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_index</text>
+<polygon fill="none" stroke="black" points="910,-102.05 841,-102.05 841,-78.05 910,-78.05 910,-102.05"/>
+<text text-anchor="middle" x="875.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_index</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_index~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_index~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_index&#45;&gt;module~swiftest -->
 <g id="module~~s_util_index~~UsesGraph_edge1" class="edge">
 <title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M859.58,-294.01C844.25,-281.66 820.17,-262.24 802.33,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="804.11,-244.8 794.13,-241.25 799.72,-250.25 804.11,-244.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M865.34,-102.13C848.98,-123.71 814.58,-169.11 794.49,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="791.52,-193.74 788.27,-203.82 797.1,-197.97 791.52,-193.74"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_index~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_index~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_index&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_index~~UsesGraph_edge2" class="edge">
 <title>module~s_util_index&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M856.25,-318.08C821.59,-339.73 743.18,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.95,-79.6C800.82,-68.05 731.44,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_index~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_index~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_index~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_index~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_index~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_index~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_index~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_index~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_index~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_index~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_index~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_index~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_index~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_index~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_index~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_index~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_index~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_index~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_index~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_index~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_index~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_index~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_index~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_index~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_index~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_index~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_index~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_index~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_index~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_index~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_index~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_index~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_index~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_index~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_index~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_index~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_index~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_index~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_index~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_index~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_index~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_index~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_index~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_index~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_index~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_index~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_index~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_index~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_index~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_index~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_index~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_index~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_index~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_index~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_index~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_index~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_index~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_index~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_index~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_index~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_index~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_index~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_index~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
@@ -649,6 +647,10 @@ <h3>Contents</h3>
   <div id="modsubs-1" class="panel-collapse collapse">
     <div class="list-group">
       
+      <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_ij_to_k">util_index_eucl_ij_to_k</a>
+      
+      <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_k_to_ij">util_index_eucl_k_to_ij</a>
+      
       <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_plpl">util_index_eucl_plpl</a>
       
       <a class="list-group-item" href="../module/s_util_index.html#proc-util_index_eucl_pltp">util_index_eucl_pltp</a>
@@ -692,6 +694,238 @@ <h3>Contents</h3>
         <h2>Module Subroutines</h2>
         
         
+  <div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="proc-util_index_eucl_ij_to_k"></span><h3>
+pure module subroutine <a href='../proc/util_index_eucl_ij_to_k.html'>util_index_eucl_ij_to_k</a>(n, i, j, k)
+    
+    
+   <a href='../interface/util_index_eucl_ij_to_k.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
+    
+   
+</h3></div>
+  <div class="panel-body">
+       
+    
+
+
+
+
+
+  <dl class="dl-horizontal">
+    
+    <dt>Author</dt><dd>Jacob R. Elliott and David A. Minton</dd>
+    
+    
+    
+    
+    
+  </dl>
+
+
+
+<p>Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions.</p><a href="../proc/util_index_eucl_ij_to_k.html" class="pull-right"><emph>Read more&hellip;</emph></a>
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I8B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+  </div>
+  </div>
+
+        
+        
+  <div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="proc-util_index_eucl_k_to_ij"></span><h3>
+pure module subroutine <a href='../proc/util_index_eucl_k_to_ij.html'>util_index_eucl_k_to_ij</a>(n, k, i, j)
+    
+    
+   <a href='../interface/util_index_eucl_k_to_ij.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
+    
+   
+</h3></div>
+  <div class="panel-body">
+       
+    
+
+
+
+
+
+  <dl class="dl-horizontal">
+    
+    <dt>Author</dt><dd>Jacob R. Elliott and David A. Minton</dd>
+    
+    
+    
+    
+    
+  </dl>
+
+
+
+<p>Turns k index into i,j indices for use in the Euclidean distance matrix for pl-pl interactions.</p><a href="../proc/util_index_eucl_k_to_ij.html" class="pull-right"><emph>Read more&hellip;</emph></a>
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I8B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+  </div>
+  </div>
+
+        
+        
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-util_index_eucl_plpl"></span><h3>
 module subroutine <a href='../proc/util_index_eucl_plpl.html'>util_index_eucl_plpl</a>(self, param)
@@ -721,7 +955,7 @@ <h2>Module Subroutines</h2>
 
 
 
-<p>Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions.</p><a href="../proc/util_index_eucl_plpl.html" class="pull-right"><emph>Read more&hellip;</emph></a>
+<p>Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions for a Swiftest massive body object</p><a href="../proc/util_index_eucl_plpl.html" class="pull-right"><emph>Read more&hellip;</emph></a>
     
     <h4>Arguments</h4>
     
diff --git a/docs/module/s_util_minimize_bfgs.html b/docs/module/s_util_minimize_bfgs.html
index d33dab8db..9d12170f8 100644
--- a/docs/module/s_util_minimize_bfgs.html
+++ b/docs/module/s_util_minimize_bfgs.html
@@ -134,7 +134,7 @@ <h1>s_util_minimize_bfgs
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 2.6% of total for modules and submodules.">415 statements</a>
+    title=" 2.5% of total for modules and submodules.">409 statements</a>
      </li> 
      
      
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_minimize_bfgs~~UsesGraph Pages: 1 -->
-<svg id="modules_util_minimize_bfgsUsesGraph" width="641pt" height="261pt"
- viewBox="0.00 0.00 641.00 260.83" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_minimize_bfgs~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 387.05)">
+<svg id="modules_util_minimize_bfgsUsesGraph" width="641pt" height="272pt"
+ viewBox="0.00 0.00 641.00 272.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_minimize_bfgs~~UsesGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 404.34)">
 <title>module~~s_util_minimize_bfgs~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 957,-387.05 957,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 957,-404.34 957,4 -4,4"/>
 <!-- module~s_util_minimize_bfgs -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node1" class="node">
 <title>module~s_util_minimize_bfgs</title>
-<polygon fill="none" stroke="black" points="953,-318.05 841,-318.05 841,-294.05 953,-294.05 953,-318.05"/>
-<text text-anchor="middle" x="897" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_minimize_bfgs</text>
+<polygon fill="none" stroke="black" points="953,-102.05 841,-102.05 841,-78.05 953,-78.05 953,-102.05"/>
+<text text-anchor="middle" x="897" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_minimize_bfgs</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge1" class="edge">
 <title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M877.72,-294.01C858.51,-281.38 828.1,-261.36 806.1,-246.88"/>
-<polygon fill="#000000" stroke="#000000" points="807.82,-243.82 797.54,-241.25 803.97,-249.67 807.82,-243.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.78,-102.13C864.57,-123.9 821.85,-169.9 797.34,-196.3"/>
+<polygon fill="#000000" stroke="#000000" points="794.6,-194.11 790.36,-203.82 799.73,-198.87 794.6,-194.11"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge2" class="edge">
 <title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M875.66,-318.08C837.06,-339.73 749.93,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M852.73,-78.03C807.62,-66.57 734.66,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_minimize_bfgs~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_minimize_bfgs~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_minimize_bfgs~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_peri.html b/docs/module/s_util_peri.html
index b568e560f..a4800d1e0 100644
--- a/docs/module/s_util_peri.html
+++ b/docs/module/s_util_peri.html
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_peri~~UsesGraph Pages: 1 -->
-<svg id="modules_util_periUsesGraph" width="641pt" height="275pt"
- viewBox="0.00 0.00 641.00 275.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_peri~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_periUsesGraph" width="641pt" height="288pt"
+ viewBox="0.00 0.00 641.00 287.63" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_peri~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_peri~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 906,-387.05 906,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 906,-404.34 906,4 -4,4"/>
 <!-- module~s_util_peri -->
 <g id="module~~s_util_peri~~UsesGraph_node1" class="node">
 <title>module~s_util_peri</title>
-<polygon fill="none" stroke="black" points="902,-318.05 841,-318.05 841,-294.05 902,-294.05 902,-318.05"/>
-<text text-anchor="middle" x="871.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_peri</text>
+<polygon fill="none" stroke="black" points="902,-102.05 841,-102.05 841,-78.05 902,-78.05 902,-102.05"/>
+<text text-anchor="middle" x="871.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_peri</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_peri~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_peri~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_peri&#45;&gt;module~swiftest -->
 <g id="module~~s_util_peri~~UsesGraph_edge1" class="edge">
 <title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.2,-294.01C841.52,-281.66 818.45,-262.24 801.35,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.4,-245.01 793.5,-241.25 798.9,-250.36 803.4,-245.01"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M861.73,-102.13C846.05,-123.71 813.09,-169.11 793.84,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.93,-193.67 787.88,-203.82 796.59,-197.79 790.93,-193.67"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_peri~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_peri~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_peri&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_peri~~UsesGraph_edge2" class="edge">
 <title>module~s_util_peri&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M852.64,-318.08C818.72,-339.73 741.94,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.7,-80.51C801.92,-68.96 731.88,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_peri~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_peri~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_peri~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_peri~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_peri~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_peri~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_peri~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_peri~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_peri~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_peri~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_peri~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_peri~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_peri~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_peri~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_peri~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_peri~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_peri~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_peri~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_peri~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_peri~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_peri~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_peri~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_peri~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_peri~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_peri~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_peri~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_peri~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_peri~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_peri~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_peri~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_peri~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_peri~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_peri~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_peri~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_peri~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_peri~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_peri~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_peri~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_peri~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_peri~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_peri~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_peri~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_peri~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_peri~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_peri~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_peri~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_peri~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_peri~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_peri~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_rescale.html b/docs/module/s_util_rescale.html
index 594af24a6..903fed744 100644
--- a/docs/module/s_util_rescale.html
+++ b/docs/module/s_util_rescale.html
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_rescale~~UsesGraph Pages: 1 -->
-<svg id="modules_util_rescaleUsesGraph" width="641pt" height="270pt"
- viewBox="0.00 0.00 641.00 270.40" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_rescale~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 387.05)">
+<svg id="modules_util_rescaleUsesGraph" width="641pt" height="282pt"
+ viewBox="0.00 0.00 641.00 282.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_rescale~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 404.34)">
 <title>module~~s_util_rescale~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 923,-387.05 923,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 923,-404.34 923,4 -4,4"/>
 <!-- module~s_util_rescale -->
 <g id="module~~s_util_rescale~~UsesGraph_node1" class="node">
 <title>module~s_util_rescale</title>
-<polygon fill="none" stroke="black" points="919,-318.05 841,-318.05 841,-294.05 919,-294.05 919,-318.05"/>
-<text text-anchor="middle" x="880" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_rescale</text>
+<polygon fill="none" stroke="black" points="919,-102.05 841,-102.05 841,-78.05 919,-78.05 919,-102.05"/>
+<text text-anchor="middle" x="880" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_rescale</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_rescale~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_rescale~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_rescale&#45;&gt;module~swiftest -->
 <g id="module~~s_util_rescale~~UsesGraph_edge1" class="edge">
 <title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M863.38,-294.01C847.18,-281.54 821.66,-261.89 802.92,-247.46"/>
-<polygon fill="#000000" stroke="#000000" points="804.9,-244.57 794.85,-241.25 800.63,-250.12 804.9,-244.57"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M869.41,-102.13C852.21,-123.81 815.94,-169.51 794.94,-195.96"/>
+<polygon fill="#000000" stroke="#000000" points="792.18,-193.81 788.71,-203.82 797.66,-198.16 792.18,-193.81"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_rescale~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_rescale&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_edge2" class="edge">
 <title>module~s_util_rescale&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M860.31,-318.08C824.83,-339.73 744.59,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.97,-78.56C799.48,-67.06 730.89,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_rescale~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_rescale~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_rescale~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_rescale~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_rescale~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_rescale~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_rescale~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_rescale~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_rescale~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_rescale~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_rescale~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_rescale~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_rescale~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_rescale~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_rescale~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_rescale~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_rescale~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_rescale~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_rescale~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_rescale~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_rescale~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_rescale~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_rescale~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_rescale~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_rescale~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_rescale~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_rescale~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_rescale~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_rescale~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_rescale~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_rescale~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_rescale~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_rescale~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_rescale~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_rescale~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_rescale~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_rescale~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_rescale~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_rescale~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_rescale~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_resize.html b/docs/module/s_util_resize.html
index 797714d9a..a07480d0f 100644
--- a/docs/module/s_util_resize.html
+++ b/docs/module/s_util_resize.html
@@ -263,311 +263,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_resize~~UsesGraph Pages: 1 -->
-<svg id="modules_util_resizeUsesGraph" width="641pt" height="272pt"
- viewBox="0.00 0.00 641.00 272.16" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_resize~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_resizeUsesGraph" width="641pt" height="284pt"
+ viewBox="0.00 0.00 641.00 284.20" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_resize~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_resize~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 917,-387.05 917,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 917,-404.34 917,4 -4,4"/>
 <!-- module~s_util_resize -->
 <g id="module~~s_util_resize~~UsesGraph_node1" class="node">
 <title>module~s_util_resize</title>
-<polygon fill="none" stroke="black" points="913,-318.05 841,-318.05 841,-294.05 913,-294.05 913,-318.05"/>
-<text text-anchor="middle" x="877" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_resize</text>
+<polygon fill="none" stroke="black" points="913,-102.05 841,-102.05 841,-78.05 913,-78.05 913,-102.05"/>
+<text text-anchor="middle" x="877" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_resize</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_resize~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_resize~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_resize&#45;&gt;module~swiftest -->
 <g id="module~~s_util_resize~~UsesGraph_edge1" class="edge">
 <title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M860.84,-294.01C845.27,-281.66 820.82,-262.24 802.69,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="804.38,-244.72 794.37,-241.25 800.03,-250.21 804.38,-244.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M866.7,-102.13C850.08,-123.71 815.14,-169.11 794.73,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="791.74,-193.76 788.42,-203.82 797.29,-198.03 791.74,-193.76"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_resize~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_resize~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_resize&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_resize~~UsesGraph_edge2" class="edge">
 <title>module~s_util_resize&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M857.61,-318.08C822.67,-339.73 743.65,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.75,-79.19C800.12,-67.65 731.14,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_resize~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_resize~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_resize~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_resize~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_resize~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_resize~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_resize~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_resize~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_resize~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_resize~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_resize~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_resize~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_resize~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_resize~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_resize~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_resize~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_resize~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_resize~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_resize~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_resize~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_resize~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_resize~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_resize~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_resize~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_resize~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_resize~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_resize~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_resize~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_resize~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_resize~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_resize~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_resize~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_resize~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_resize~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_resize~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_resize~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_resize~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_resize~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_resize~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_resize~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_resize~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_resize~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_resize~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_resize~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_resize~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_resize~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_resize~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_resize~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_resize~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_set.html b/docs/module/s_util_set.html
index 2b7ed45f7..c3ae0b276 100644
--- a/docs/module/s_util_set.html
+++ b/docs/module/s_util_set.html
@@ -261,311 +261,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_set~~UsesGraph Pages: 1 -->
-<svg id="modules_util_setUsesGraph" width="641pt" height="276pt"
- viewBox="0.00 0.00 641.00 276.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_set~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 387.05)">
+<svg id="modules_util_setUsesGraph" width="641pt" height="289pt"
+ viewBox="0.00 0.00 641.00 288.58" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_set~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 404.34)">
 <title>module~~s_util_set~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 903,-387.05 903,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 903,-404.34 903,4 -4,4"/>
 <!-- module~s_util_set -->
 <g id="module~~s_util_set~~UsesGraph_node1" class="node">
 <title>module~s_util_set</title>
-<polygon fill="none" stroke="black" points="899,-318.05 841,-318.05 841,-294.05 899,-294.05 899,-318.05"/>
-<text text-anchor="middle" x="870" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_set</text>
+<polygon fill="none" stroke="black" points="899,-102.05 841,-102.05 841,-78.05 899,-78.05 899,-102.05"/>
+<text text-anchor="middle" x="870" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_set</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_set~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_set~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_set&#45;&gt;module~swiftest -->
 <g id="module~~s_util_set~~UsesGraph_edge1" class="edge">
 <title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M854.94,-294.01C840.49,-281.66 817.8,-262.24 800.98,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.13,-245.09 793.26,-241.25 798.58,-250.41 803.13,-245.09"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M860.37,-102.13C844.95,-123.71 812.53,-169.11 793.6,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.7,-193.65 787.74,-203.82 796.4,-197.72 790.7,-193.65"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_set~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_set~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_set&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_set~~UsesGraph_edge2" class="edge">
 <title>module~s_util_set&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M851.29,-318.08C817.64,-339.73 741.47,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.74,-80.91C802.55,-69.38 732.14,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_set~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_set~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_set~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_set~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_set~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_set~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_set~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_set~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_set~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_set~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_set~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_set~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_set~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_set~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_set~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_set~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_set~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_set~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_set~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_set~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_set~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_set~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_set~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_set~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_set~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_set~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_set~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_set~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_set~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_set~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_set~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_set~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_set~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_set~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_set~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_set~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_set~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_set~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_set~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_set~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_set~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_set~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_set~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_set~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_set~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_set~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_set~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_set~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_set~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_set~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_set~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_set~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_set~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_set~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_set~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_set~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_set~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_set~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_set~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_set~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_set~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_set~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_set~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_solve.html b/docs/module/s_util_solve.html
index 2932e45f4..c9c40479b 100644
--- a/docs/module/s_util_solve.html
+++ b/docs/module/s_util_solve.html
@@ -263,311 +263,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_solve~~UsesGraph Pages: 1 -->
-<svg id="modules_util_solveUsesGraph" width="641pt" height="273pt"
- viewBox="0.00 0.00 641.00 273.35" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_solve~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_solveUsesGraph" width="641pt" height="285pt"
+ viewBox="0.00 0.00 641.00 285.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_solve~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_solve~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 913,-387.05 913,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 913,-404.34 913,4 -4,4"/>
 <!-- module~s_util_solve -->
 <g id="module~~s_util_solve~~UsesGraph_node1" class="node">
 <title>module~s_util_solve</title>
-<polygon fill="none" stroke="black" points="909,-318.05 841,-318.05 841,-294.05 909,-294.05 909,-318.05"/>
-<text text-anchor="middle" x="875" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_solve</text>
+<polygon fill="none" stroke="black" points="909,-102.05 841,-102.05 841,-78.05 909,-78.05 909,-102.05"/>
+<text text-anchor="middle" x="875" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_solve</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_solve~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_solve~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_solve&#45;&gt;module~swiftest -->
 <g id="module~~s_util_solve~~UsesGraph_edge1" class="edge">
 <title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M859.16,-294.01C843.91,-281.66 819.96,-262.24 802.21,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="804.03,-244.82 794.05,-241.25 799.62,-250.26 804.03,-244.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M864.89,-102.13C848.62,-123.71 814.39,-169.11 794.41,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="791.45,-193.73 788.22,-203.82 797.04,-197.94 791.45,-193.73"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_solve~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_solve~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_solve&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_solve~~UsesGraph_edge2" class="edge">
 <title>module~s_util_solve&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M855.8,-318.08C821.23,-339.73 743.03,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.88,-79.7C800.92,-68.15 731.47,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_solve~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_solve~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_solve~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_solve~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_solve~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_solve~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_solve~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_solve~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_solve~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_solve~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_solve~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_solve~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_solve~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_solve~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_solve~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_solve~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_solve~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_solve~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_solve~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_solve~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_solve~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_solve~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_solve~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_solve~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_solve~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_solve~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_solve~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_solve~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_solve~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_solve~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_solve~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_solve~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_solve~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_solve~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_solve~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_solve~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_solve~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_solve~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_solve~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_solve~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_solve~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_solve~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_solve~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_solve~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_solve~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_solve~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_solve~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_solve~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_solve~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_sort.html b/docs/module/s_util_sort.html
index 925b27cbd..229977825 100644
--- a/docs/module/s_util_sort.html
+++ b/docs/module/s_util_sort.html
@@ -279,311 +279,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_sort~~UsesGraph Pages: 1 -->
-<svg id="modules_util_sortUsesGraph" width="641pt" height="275pt"
- viewBox="0.00 0.00 641.00 275.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_sort~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_sortUsesGraph" width="641pt" height="288pt"
+ viewBox="0.00 0.00 641.00 287.63" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_sort~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_sort~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 906,-387.05 906,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 906,-404.34 906,4 -4,4"/>
 <!-- module~s_util_sort -->
 <g id="module~~s_util_sort~~UsesGraph_node1" class="node">
 <title>module~s_util_sort</title>
-<polygon fill="none" stroke="black" points="902,-318.05 841,-318.05 841,-294.05 902,-294.05 902,-318.05"/>
-<text text-anchor="middle" x="871.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_sort</text>
+<polygon fill="none" stroke="black" points="902,-102.05 841,-102.05 841,-78.05 902,-78.05 902,-102.05"/>
+<text text-anchor="middle" x="871.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_sort</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_sort~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_sort~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_sort&#45;&gt;module~swiftest -->
 <g id="module~~s_util_sort~~UsesGraph_edge1" class="edge">
 <title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.2,-294.01C841.52,-281.66 818.45,-262.24 801.35,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.4,-245.01 793.5,-241.25 798.9,-250.36 803.4,-245.01"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M861.73,-102.13C846.05,-123.71 813.09,-169.11 793.84,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.93,-193.67 787.88,-203.82 796.59,-197.79 790.93,-193.67"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_sort~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_sort~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_sort&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_sort~~UsesGraph_edge2" class="edge">
 <title>module~s_util_sort&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M852.64,-318.08C818.72,-339.73 741.94,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.7,-80.51C801.92,-68.96 731.88,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_sort~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_sort~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_sort~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_sort~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_sort~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_sort~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_sort~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_sort~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_sort~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_sort~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_sort~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_sort~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_sort~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_sort~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_sort~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_sort~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_sort~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_sort~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_sort~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_sort~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_sort~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_sort~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_sort~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_sort~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_sort~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_sort~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_sort~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_sort~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_sort~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_sort~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_sort~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_sort~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_sort~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_sort~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_sort~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_sort~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_sort~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_sort~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_sort~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_sort~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_sort~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_sort~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_sort~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_sort~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_sort~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_sort~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_sort~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_sort~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_sort~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_spill.html b/docs/module/s_util_spill.html
index 3a29b58d9..4c514c327 100644
--- a/docs/module/s_util_spill.html
+++ b/docs/module/s_util_spill.html
@@ -265,311 +265,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_spill~~UsesGraph Pages: 1 -->
-<svg id="modules_util_spillUsesGraph" width="641pt" height="275pt"
- viewBox="0.00 0.00 641.00 275.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_spill~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_spillUsesGraph" width="641pt" height="288pt"
+ viewBox="0.00 0.00 641.00 287.63" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_spill~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_spill~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 906,-387.05 906,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 906,-404.34 906,4 -4,4"/>
 <!-- module~s_util_spill -->
 <g id="module~~s_util_spill~~UsesGraph_node1" class="node">
 <title>module~s_util_spill</title>
-<polygon fill="none" stroke="black" points="902,-318.05 841,-318.05 841,-294.05 902,-294.05 902,-318.05"/>
-<text text-anchor="middle" x="871.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_spill</text>
+<polygon fill="none" stroke="black" points="902,-102.05 841,-102.05 841,-78.05 902,-78.05 902,-102.05"/>
+<text text-anchor="middle" x="871.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_spill</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_spill~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_spill~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_spill&#45;&gt;module~swiftest -->
 <g id="module~~s_util_spill~~UsesGraph_edge1" class="edge">
 <title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.2,-294.01C841.52,-281.66 818.45,-262.24 801.35,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.4,-245.01 793.5,-241.25 798.9,-250.36 803.4,-245.01"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M861.73,-102.13C846.05,-123.71 813.09,-169.11 793.84,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="790.93,-193.67 787.88,-203.82 796.59,-197.79 790.93,-193.67"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_spill~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_spill~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_spill&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_spill~~UsesGraph_edge2" class="edge">
 <title>module~s_util_spill&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M852.64,-318.08C818.72,-339.73 741.94,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.7,-80.51C801.92,-68.96 731.88,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_spill~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_spill~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_spill~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_spill~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_spill~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_spill~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_spill~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_spill~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_spill~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_spill~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_spill~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_spill~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_spill~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_spill~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_spill~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_spill~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_spill~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_spill~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_spill~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_spill~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_spill~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_spill~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_spill~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_spill~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_spill~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_spill~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_spill~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_spill~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_spill~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_spill~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_spill~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_spill~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_spill~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_spill~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_spill~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_spill~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_spill~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_spill~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_spill~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_spill~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_spill~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_spill~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_spill~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_spill~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_spill~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_spill~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_spill~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_spill~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_spill~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_valid.html b/docs/module/s_util_valid.html
index 794677712..6413e55a4 100644
--- a/docs/module/s_util_valid.html
+++ b/docs/module/s_util_valid.html
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_valid~~UsesGraph Pages: 1 -->
-<svg id="modules_util_validUsesGraph" width="641pt" height="274pt"
- viewBox="0.00 0.00 641.00 274.25" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_valid~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 387.05)">
+<svg id="modules_util_validUsesGraph" width="641pt" height="286pt"
+ viewBox="0.00 0.00 641.00 286.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_valid~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 404.34)">
 <title>module~~s_util_valid~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 910,-387.05 910,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 910,-404.34 910,4 -4,4"/>
 <!-- module~s_util_valid -->
 <g id="module~~s_util_valid~~UsesGraph_node1" class="node">
 <title>module~s_util_valid</title>
-<polygon fill="none" stroke="black" points="906,-318.05 841,-318.05 841,-294.05 906,-294.05 906,-318.05"/>
-<text text-anchor="middle" x="873.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_valid</text>
+<polygon fill="none" stroke="black" points="906,-102.05 841,-102.05 841,-78.05 906,-78.05 906,-102.05"/>
+<text text-anchor="middle" x="873.5" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_valid</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_valid~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_valid~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_valid&#45;&gt;module~swiftest -->
 <g id="module~~s_util_valid~~UsesGraph_edge1" class="edge">
 <title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M857.89,-294.01C842.88,-281.66 819.31,-262.24 801.84,-247.85"/>
-<polygon fill="#000000" stroke="#000000" points="803.76,-244.9 793.82,-241.25 799.31,-250.31 803.76,-244.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M863.53,-102.13C847.52,-123.71 813.83,-169.11 794.16,-195.62"/>
+<polygon fill="#000000" stroke="#000000" points="791.22,-193.7 788.08,-203.82 796.85,-197.88 791.22,-193.7"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_valid~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_valid~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_valid&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_valid~~UsesGraph_edge2" class="edge">
 <title>module~s_util_valid&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M854.45,-318.08C820.15,-339.73 742.56,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.68,-80.01C801.19,-68.45 731.58,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_valid~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_valid~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_valid~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_valid~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_valid~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_valid~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_valid~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_valid~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_valid~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_valid~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_valid~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_valid~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_valid~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_valid~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_valid~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_valid~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_valid~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_valid~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_valid~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_valid~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_valid~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_valid~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_valid~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_valid~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_valid~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_valid~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_valid~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_valid~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_valid~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_valid~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_valid~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_valid~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_valid~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_valid~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_valid~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_valid~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_valid~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_valid~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_valid~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_valid~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_valid~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_valid~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_valid~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_valid~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_valid~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_valid~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_valid~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_valid~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_valid~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_util_version.html b/docs/module/s_util_version.html
index 3639e1f28..b1ffff40e 100644
--- a/docs/module/s_util_version.html
+++ b/docs/module/s_util_version.html
@@ -245,311 +245,305 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_util_version~~UsesGraph Pages: 1 -->
-<svg id="modules_util_versionUsesGraph" width="641pt" height="270pt"
- viewBox="0.00 0.00 641.00 270.40" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_util_version~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 387.05)">
+<svg id="modules_util_versionUsesGraph" width="641pt" height="282pt"
+ viewBox="0.00 0.00 641.00 282.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_util_version~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 404.34)">
 <title>module~~s_util_version~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-387.05 923,-387.05 923,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-404.34 923,-404.34 923,4 -4,4"/>
 <!-- module~s_util_version -->
 <g id="module~~s_util_version~~UsesGraph_node1" class="node">
 <title>module~s_util_version</title>
-<polygon fill="none" stroke="black" points="919,-318.05 841,-318.05 841,-294.05 919,-294.05 919,-318.05"/>
-<text text-anchor="middle" x="880" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_version</text>
+<polygon fill="none" stroke="black" points="919,-102.05 841,-102.05 841,-78.05 919,-78.05 919,-102.05"/>
+<text text-anchor="middle" x="880" y="-87.65" font-family="Helvetica,sans-Serif" font-size="10.50">s_util_version</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_util_version~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_util_version~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-241.05 751,-241.05 751,-217.05 805,-217.05 805,-241.05"/>
-<text text-anchor="middle" x="778" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-228.05 751,-228.05 751,-204.05 805,-204.05 805,-228.05"/>
+<text text-anchor="middle" x="778" y="-213.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_version&#45;&gt;module~swiftest -->
 <g id="module~~s_util_version~~UsesGraph_edge1" class="edge">
 <title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M863.38,-294.01C847.18,-281.54 821.66,-261.89 802.92,-247.46"/>
-<polygon fill="#000000" stroke="#000000" points="804.9,-244.57 794.85,-241.25 800.63,-250.12 804.9,-244.57"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M869.41,-102.13C852.21,-123.81 815.94,-169.51 794.94,-195.96"/>
+<polygon fill="#000000" stroke="#000000" points="792.18,-193.81 788.71,-203.82 797.66,-198.16 792.18,-193.81"/>
 </g>
 <!-- module~swiftest_classes -->
 <g id="module~~s_util_version~~UsesGraph_node3" class="node">
 <title>module~swiftest_classes</title>
 <g id="a_module~~s_util_version~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-201.05 252.5,-201.05 252.5,-177.05 341.5,-177.05 341.5,-201.05"/>
-<text text-anchor="middle" x="297" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-196.05 252.5,-196.05 252.5,-172.05 341.5,-172.05 341.5,-196.05"/>
+<text text-anchor="middle" x="297" y="-181.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_util_version&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_version~~UsesGraph_edge2" class="edge">
 <title>module~s_util_version&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M860.31,-318.08C824.83,-339.73 744.59,-383.05 670.5,-383.05 670.5,-383.05 670.5,-383.05 548.5,-383.05 470.7,-383.05 443.8,-374.57 383,-326.05 344.06,-294.96 318.17,-240.87 306.02,-210.79"/>
-<polygon fill="#000000" stroke="#000000" points="309.18,-209.28 302.29,-201.23 302.66,-211.82 309.18,-209.28"/>
+<path fill="none" stroke="#000000" d="M840.97,-78.56C799.48,-67.06 730.89,-51.05 670.5,-51.05 670.5,-51.05 670.5,-51.05 548.5,-51.05 474.46,-51.05 447.17,-33.12 383,-70.05 346,-91.34 320.21,-135.88 307.36,-162.55"/>
+<polygon fill="#000000" stroke="#000000" points="304.1,-161.26 303.07,-171.81 310.45,-164.2 304.1,-161.26"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge10" class="edge">
+<g id="module~~s_util_version~~UsesGraph_edge9" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C606.21,-232.5 610.41,-287.67 550.5,-305.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C529.56,-310.54 400.68,-249.78 383,-241.05 362.59,-230.96 340.69,-217.5 324.24,-206.8"/>
-<polygon fill="#000000" stroke="#000000" points="325.98,-203.75 315.7,-201.18 322.13,-209.6 325.98,-203.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.7,-225.29C729.39,-232.27 698.41,-241.27 670.5,-245.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 629.62,-200.87 588,-184.05 522.42,-157.55 499.94,-154.5 430,-165.05"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="module~~s_util_version~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_module~~s_util_version~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-42.05 247,-42.05 247,-18.05 347,-18.05 347,-42.05"/>
-<text text-anchor="middle" x="297" y="-27.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_module~~s_util_version~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-255.05 391,-255.05 391,-231.05 467,-231.05 467,-255.05"/>
+<text text-anchor="middle" x="429" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="module~~s_util_version~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C635.66,-27.94 627.04,-19.42 588,-10.05 509.14,8.88 415.01,-3.84 355.85,-15.93"/>
-<polygon fill="#000000" stroke="#000000" points="355.01,-12.53 345.95,-18.01 356.46,-19.38 355.01,-12.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.72,-217.03C764.1,-184.25 732.62,-92.9 670.5,-51.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C602.71,-253.69 525.84,-250.73 477.53,-247.31"/>
+<polygon fill="#000000" stroke="#000000" points="477.61,-243.8 467.38,-246.55 477.09,-250.78 477.61,-243.8"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="module~~s_util_version~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_util_version~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-43.05 511,-43.05 511,-19.05 588,-19.05 588,-43.05"/>
-<text text-anchor="middle" x="549.5" y="-28.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_module~~s_util_version~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-374.05 247,-374.05 247,-350.05 347,-350.05 347,-374.05"/>
+<text text-anchor="middle" x="297" y="-359.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~s_util_version~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C648.12,-37.28 621.36,-31.96 598.47,-30.23"/>
-<polygon fill="#000000" stroke="#000000" points="598.45,-26.73 588.27,-29.67 598.06,-33.71 598.45,-26.73"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.8,-228.12C769.48,-253.75 753.37,-313.75 715,-344.05 607.89,-428.63 432.67,-398.5 347.54,-376.67"/>
+<polygon fill="#000000" stroke="#000000" points="348.17,-373.21 337.61,-374.05 346.39,-379.98 348.17,-373.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_util_version~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_util_version~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-161.05 385.5,-161.05 385.5,-137.05 472.5,-137.05 472.5,-161.05"/>
-<text text-anchor="middle" x="429" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_util_version~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-170.05 627,-170.05 627,-146.05 712,-146.05 712,-170.05"/>
+<text text-anchor="middle" x="669.5" y="-155.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C648.5,-228.99 534.98,-188.05 472.04,-164.76"/>
-<polygon fill="#000000" stroke="#000000" points="472.99,-161.38 462.39,-161.19 470.55,-167.94 472.99,-161.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-228.24C729.15,-227.77 697.82,-227.53 670.5,-229.05"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_util_version~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.93,-204.03C739.51,-195.63 718.7,-184.3 701.6,-174.99"/>
+<polygon fill="#000000" stroke="#000000" points="702.99,-171.76 692.54,-170.05 699.65,-177.91 702.99,-171.76"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~s_util_version~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~s_util_version~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-241.05 511.5,-241.05 511.5,-217.05 587.5,-217.05 587.5,-241.05"/>
-<text text-anchor="middle" x="549.5" y="-226.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-217.05 511.5,-217.05 511.5,-193.05 587.5,-193.05 587.5,-217.05"/>
+<text text-anchor="middle" x="549.5" y="-202.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge6" class="edge">
+<g id="module~~s_util_version~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-229.05C645.26,-228.98 619.45,-228.97 597.9,-228.99"/>
-<polygon fill="#000000" stroke="#000000" points="597.7,-225.49 587.7,-228.99 597.7,-232.49 597.7,-225.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C636.46,-249.26 601.62,-234.93 578.17,-222.27"/>
+<polygon fill="#000000" stroke="#000000" points="579.59,-219.05 569.16,-217.18 576.15,-225.15 579.59,-219.05"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_util_version~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~s_util_version~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-81.05 391,-81.05 391,-57.05 467,-57.05 467,-81.05"/>
-<text text-anchor="middle" x="429" y="-66.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_util_version~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-103.05 385.5,-103.05 385.5,-79.05 472.5,-79.05 472.5,-103.05"/>
+<text text-anchor="middle" x="429" y="-88.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_util_version~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-51.05C660.71,-45.78 544.46,-56.99 477.19,-63.99"/>
-<polygon fill="#000000" stroke="#000000" points="476.82,-60.5 467.24,-65.03 477.55,-67.47 476.82,-60.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.1,-203.9C761.79,-186.15 741.97,-153.44 715,-137.05 643.13,-93.38 543.04,-87.19 482.59,-88.12"/>
+<polygon fill="#000000" stroke="#000000" points="482.43,-84.62 472.51,-88.34 482.59,-91.62 482.43,-84.62"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_util_version~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_util_version~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-161.05 123,-161.05 123,-137.05 211,-137.05 211,-161.05"/>
-<text text-anchor="middle" x="167" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_util_version~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-335.05 624,-335.05 624,-311.05 715,-311.05 715,-335.05"/>
+<text text-anchor="middle" x="669.5" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_util_version~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C515.83,-314.37 508.35,-319.54 475,-326.05 397.34,-341.19 371.91,-373.27 298,-345.05"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M764.78,-228.33C746.41,-246.79 711.49,-281.87 689.69,-303.77"/>
+<polygon fill="#000000" stroke="#000000" points="687.15,-301.36 682.57,-310.92 692.11,-306.3 687.15,-301.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_util_version~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_util_version~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-201.05 627,-201.05 627,-177.05 712,-177.05 712,-201.05"/>
-<text text-anchor="middle" x="669.5" y="-186.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_util_version~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-297.05 511,-297.05 511,-273.05 588,-273.05 588,-297.05"/>
+<text text-anchor="middle" x="549.5" y="-282.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-219.26C739.37,-214.91 725.44,-209.68 712.45,-204.8"/>
-<polygon fill="#000000" stroke="#000000" points="713.35,-201.4 702.76,-201.16 710.89,-207.95 713.35,-201.4"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~s_util_version~~UsesGraph_edge10" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C639.79,-248.82 608.84,-259.59 585.84,-269"/>
+<polygon fill="#000000" stroke="#000000" points="584.36,-265.83 576.5,-272.93 587.07,-272.28 584.36,-265.83"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_util_version~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_util_version~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-318.05 624,-318.05 624,-294.05 715,-294.05 715,-318.05"/>
-<text text-anchor="middle" x="669.5" y="-303.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_util_version~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-335.05 383,-335.05 383,-311.05 475,-311.05 475,-335.05"/>
+<text text-anchor="middle" x="429" y="-320.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_util_version~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-241.08C743.03,-253.6 715.68,-273.38 695.7,-287.82"/>
-<polygon fill="#000000" stroke="#000000" points="693.43,-285.15 687.38,-293.85 697.53,-290.82 693.43,-285.15"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-245.05C624.02,-251.08 626.06,-282.26 588,-306.05 572.16,-315.96 567.93,-318.33 550.5,-325.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C528.71,-332.68 505.64,-333.85 485.15,-332.51"/>
+<polygon fill="#000000" stroke="#000000" points="485.27,-329.01 475.01,-331.64 484.67,-335.98 485.27,-329.01"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_util_version~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_util_version~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-317.05 383,-317.05 383,-293.05 475,-293.05 475,-317.05"/>
-<text text-anchor="middle" x="429" y="-302.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_util_version~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-255.05 123,-255.05 123,-231.05 211,-231.05 211,-255.05"/>
+<text text-anchor="middle" x="167" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_version~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-305.05C528.3,-310.9 505.34,-312.08 485.04,-311.39"/>
-<polygon fill="#000000" stroke="#000000" points="485.17,-307.89 475,-310.89 484.82,-314.88 485.17,-307.89"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-325.05C496.9,-344.96 484.37,-373.18 430,-363.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-363.05C406.66,-359.08 401.94,-354.67 383,-344.05 342.44,-321.31 343.94,-290.21 298,-283.05"/>
 </g>
 <!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_version~~UsesGraph_edge13" class="edge">
 <title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-177.04C244.68,-173.01 230.09,-168.45 216.5,-164.2"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-160.82 206.82,-161.18 215.32,-167.5 217.41,-160.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-196.13C250.63,-204.96 224.44,-217.03 203.43,-226.72"/>
+<polygon fill="#000000" stroke="#000000" points="201.79,-223.62 194.18,-230.99 204.72,-229.98 201.79,-223.62"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_version~~UsesGraph_edge15" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-230.97C381.92,-222.14 355.32,-210.07 333.98,-200.38"/>
+<polygon fill="#000000" stroke="#000000" points="335.14,-197.06 324.59,-196.12 332.25,-203.44 335.14,-197.06"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_version~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-42.33C260.44,-63.11 215.05,-105.31 188.53,-129.96"/>
-<polygon fill="#000000" stroke="#000000" points="185.89,-127.63 180.95,-137 190.66,-132.76 185.89,-127.63"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.17,-255.1C383.04,-268.96 338.16,-289.09 298,-283.05"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_version~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.01,-43.07C500.2,-46.53 488.28,-50.36 476.98,-53.98"/>
-<polygon fill="#000000" stroke="#000000" points="475.7,-50.71 467.25,-57.1 477.84,-57.38 475.7,-50.71"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_version~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-109.05C267.37,-115.58 235.88,-125.39 211.3,-133.65"/>
-<polygon fill="#000000" stroke="#000000" points="209.9,-130.43 201.56,-136.97 212.16,-137.06 209.9,-130.43"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.76,-29.48C476.37,-29.31 424.73,-32.22 383,-48.05 339.52,-64.53 343.33,-98.7 298,-109.05"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.78,-349.76C260.44,-328.99 215.05,-286.79 188.53,-262.14"/>
+<polygon fill="#000000" stroke="#000000" points="190.66,-259.34 180.95,-255.09 185.89,-264.47 190.66,-259.34"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_util_version~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-161.05C375.88,-165.08 361.06,-169.64 347.26,-173.89"/>
-<polygon fill="#000000" stroke="#000000" points="345.95,-170.63 337.43,-176.92 348.01,-177.32 345.95,-170.63"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C493.6,-120.31 484.69,-156.8 430,-165.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-165.05C402.95,-168.83 375.17,-172.9 351.74,-176.31"/>
+<polygon fill="#000000" stroke="#000000" points="351.04,-172.87 341.64,-177.77 352.04,-179.8 351.04,-172.87"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~s_util_version~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.11,-170.15C623.52,-175.97 605.85,-183 590.21,-189.23"/>
+<polygon fill="#000000" stroke="#000000" points="588.78,-186.04 580.78,-192.99 591.37,-192.54 588.78,-186.04"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_util_version~~UsesGraph_edge20" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-127.05C521.36,-123.72 491.94,-114.81 469.2,-106.69"/>
+<polygon fill="#000000" stroke="#000000" points="470.17,-103.32 459.58,-103.16 467.76,-109.89 470.17,-103.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.84,-146C609.68,-138.84 578.67,-130.51 550.5,-127.05"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_version~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.29,-136.8C384.24,-121.92 338.29,-99.85 298,-109.05"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-13.05C210.56,-47.63 180.3,-170.5 171.3,-221.06"/>
+<polygon fill="#000000" stroke="#000000" points="167.84,-220.53 169.65,-230.96 174.75,-221.68 167.84,-220.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M655.98,-145.98C608.89,-102.1 437.9,43.56 298,-13.05"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge20" class="edge">
+<g id="module~~s_util_version~~UsesGraph_edge23" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.49,-225.48C488.03,-223.95 457.1,-223.26 430,-227.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C392.95,-231.94 354.17,-217.95 328.17,-205.58"/>
-<polygon fill="#000000" stroke="#000000" points="329.72,-202.44 319.2,-201.13 326.61,-208.71 329.72,-202.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.3,-202.1C487.9,-200.82 457.11,-200.19 430,-203.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C402.81,-205.71 375.01,-202.49 351.6,-197.98"/>
+<polygon fill="#000000" stroke="#000000" points="352.02,-194.5 341.52,-195.92 350.61,-201.35 352.02,-194.5"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge21" class="edge">
+<g id="module~~s_util_version~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.76,-216.86C526.08,-197.81 498.71,-159.87 475,-128.05 465.31,-115.04 454.27,-100.56 445.54,-89.19"/>
-<polygon fill="#000000" stroke="#000000" points="448.26,-86.98 439.39,-81.19 442.71,-91.25 448.26,-86.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-216.97C500.41,-220.47 488.32,-224.35 476.88,-228.02"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-224.79 467.04,-231.17 477.63,-231.45 475.49,-224.79"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_version~~UsesGraph_edge19" class="edge">
+<g id="module~~s_util_version~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-345.05C223.01,-312.84 186.69,-214.77 173.73,-170.79"/>
-<polygon fill="#000000" stroke="#000000" points="177.07,-169.75 170.99,-161.08 170.33,-171.66 177.07,-169.75"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-227.05C350.72,-237.84 369.39,-376.55 298,-345.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-203.05C406.41,-205.33 401.94,-211.43 383,-222.05 342.44,-244.79 343.98,-289.97 298,-283.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-283.05C265.31,-278.44 231.87,-267.78 206.87,-258.63"/>
+<polygon fill="#000000" stroke="#000000" points="207.98,-255.31 197.39,-255.08 205.53,-261.86 207.98,-255.31"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge23" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.58,-81.44C391.88,-102.38 345.78,-144.94 318.85,-169.8"/>
-<polygon fill="#000000" stroke="#000000" points="316.13,-167.55 311.16,-176.9 320.88,-172.69 316.13,-167.55"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_util_version~~UsesGraph_edge25" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-103.21C388.62,-119.22 349.08,-147.51 323.2,-166.02"/>
+<polygon fill="#000000" stroke="#000000" points="321.1,-163.23 315,-171.89 325.17,-168.92 321.1,-163.23"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_version~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.89,-81.06C367.88,-89.85 331.04,-101.5 298,-109.05"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_version~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.37,-79.05C399.21,-52.61 347.04,6.79 298,-13.05"/>
+</g>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_version~~UsesGraph_edge26" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M638.28,-335.12C592.91,-351.65 504.56,-377.72 430,-363.05"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="module~~s_util_version~~UsesGraph_edge28" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-273.02C501.77,-268.49 487.08,-263.28 473.56,-258.49"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-255.13 463.96,-255.09 472.22,-261.73 474.56,-255.13"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_version~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.89,-288.03C461.66,-291.18 372.83,-294.3 298,-283.05"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_util_version~~UsesGraph_edge29" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.87,-310.96C371.9,-301.23 333.14,-288.34 298,-283.05"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~s_util_version~~UsesGraph_node13" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~s_util_version~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-161.05 0,-161.05 0,-137.05 87,-137.05 87,-161.05"/>
-<text text-anchor="middle" x="43.5" y="-146.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-255.05 0,-255.05 0,-231.05 87,-231.05 87,-255.05"/>
+<text text-anchor="middle" x="43.5" y="-240.65" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~s_util_version~~UsesGraph_edge24" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-149.05C114.58,-149.05 105.86,-149.05 97.36,-149.05"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-145.55 87.13,-149.05 97.13,-152.55 97.13,-145.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge29" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.72,-189.05C559.21,-189.05 426.2,-189.05 351.74,-189.05"/>
-<polygon fill="#000000" stroke="#000000" points="351.63,-185.55 341.63,-189.05 351.63,-192.55 351.63,-185.55"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M659.44,-176.91C639.32,-149.98 590.77,-84.97 565.84,-51.58"/>
-<polygon fill="#000000" stroke="#000000" points="568.55,-49.36 559.76,-43.44 562.94,-53.55 568.55,-49.36"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C532.38,-105.58 493.7,-120.3 464.89,-132.85"/>
-<polygon fill="#000000" stroke="#000000" points="463.26,-129.74 455.54,-136.99 466.1,-136.14 463.26,-129.74"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~s_util_version~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M633.1,-201.05C621.42,-205.01 608.26,-209.46 595.94,-213.64"/>
-<polygon fill="#000000" stroke="#000000" points="594.63,-210.39 586.29,-216.92 596.88,-217.02 594.63,-210.39"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_version~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-109.05C439.65,-85.65 406.79,-85.38 298,-109.05"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.88,-176.85C637.23,-157.32 595.19,-120.09 550.5,-109.05"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_util_version~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.54,-318.13C576.71,-343.82 416.64,-397.4 298,-345.05"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_util_version~~UsesGraph_edge31" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.59,-317.16C370.4,-331.76 316.85,-353.36 298,-345.05"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-243.05C114.58,-243.05 105.86,-243.05 97.36,-243.05"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-239.55 87.13,-243.05 97.13,-246.55 97.13,-239.55"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_whm_coord.html b/docs/module/s_whm_coord.html
index 071f9d921..11587d49d 100644
--- a/docs/module/s_whm_coord.html
+++ b/docs/module/s_whm_coord.html
@@ -249,312 +249,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_whm_coord~~UsesGraph Pages: 1 -->
-<svg id="modules_whm_coordUsesGraph" width="641pt" height="280pt"
- viewBox="0.00 0.00 641.00 279.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_whm_coord~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 401.31)">
+<svg id="modules_whm_coordUsesGraph" width="641pt" height="245pt"
+ viewBox="0.00 0.00 641.00 244.99" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_whm_coord~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 350.68)">
 <title>module~~s_whm_coord~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-401.31 924,-401.31 924,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-350.68 924,-350.68 924,4 -4,4"/>
 <!-- module~s_whm_coord -->
 <g id="module~~s_whm_coord~~UsesGraph_node1" class="node">
 <title>module~s_whm_coord</title>
-<polygon fill="none" stroke="black" points="920,-251.35 841,-251.35 841,-227.35 920,-227.35 920,-251.35"/>
-<text text-anchor="middle" x="880.5" y="-236.95" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_coord</text>
+<polygon fill="none" stroke="black" points="920,-211.55 841,-211.55 841,-187.55 920,-187.55 920,-211.55"/>
+<text text-anchor="middle" x="880.5" y="-197.15" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_coord</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_whm_coord~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_whm_coord~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-153.35 751,-153.35 751,-129.35 805,-129.35 805,-153.35"/>
-<text text-anchor="middle" x="778" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-231.55 751,-231.55 751,-207.55 805,-207.55 805,-231.55"/>
+<text text-anchor="middle" x="778" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_coord&#45;&gt;module~swiftest -->
 <g id="module~~s_whm_coord~~UsesGraph_edge1" class="edge">
 <title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M867.18,-227.34C850.07,-210.66 818.95,-180.31 798.63,-160.5"/>
-<polygon fill="#000000" stroke="#000000" points="801.03,-157.95 791.42,-153.47 796.14,-162.96 801.03,-157.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.93,-207.23C832.43,-208.92 823.46,-210.71 815.06,-212.38"/>
+<polygon fill="#000000" stroke="#000000" points="814.3,-208.96 805.18,-214.34 815.67,-215.82 814.3,-208.96"/>
 </g>
 <!-- module~whm_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_node3" class="node">
 <title>module~whm_classes</title>
 <g id="a_module~~s_whm_coord~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-229.35 391,-229.35 391,-205.35 467,-205.35 467,-229.35"/>
-<text text-anchor="middle" x="429" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-189.55 391,-189.55 391,-165.55 467,-165.55 467,-189.55"/>
+<text text-anchor="middle" x="429" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_coord&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge2" class="edge">
 <title>module~s_whm_coord&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M859.71,-251.49C802.83,-284.72 634.98,-370.96 511,-313.35 477.95,-298 453.53,-261.78 440.56,-238.48"/>
-<polygon fill="#000000" stroke="#000000" points="443.5,-236.56 435.71,-229.38 437.33,-239.85 443.5,-236.56"/>
+<path fill="none" stroke="#000000" d="M548.5,-179.55C525.17,-177.43 499.15,-176.8 477.45,-176.75"/>
+<polygon fill="#000000" stroke="#000000" points="477.16,-173.25 467.17,-176.77 477.18,-180.25 477.16,-173.25"/>
+<path fill="none" stroke="#000000" d="M840.95,-197.96C779.44,-195.26 655.36,-189.11 550.5,-179.55"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_coord~~UsesGraph_edge7" class="edge">
+<g id="module~~s_whm_coord~~UsesGraph_edge3" class="edge">
 <title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C626.35,-314.79 629.51,-255.43 588,-238.35 552.67,-223.82 509.49,-218.85 477.21,-217.36"/>
-<polygon fill="#000000" stroke="#000000" points="477.26,-213.86 467.14,-216.99 477,-220.86 477.26,-213.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C613.18,-217.02 605.65,-184.58 550.5,-179.55"/>
 </g>
 <!-- module~swiftest_operators -->
 <g id="module~~s_whm_coord~~UsesGraph_node4" class="node">
 <title>module~swiftest_operators</title>
 <g id="a_module~~s_whm_coord~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-288.35 247,-288.35 247,-264.35 347,-264.35 347,-288.35"/>
-<text text-anchor="middle" x="297" y="-273.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-248.55 247,-248.55 247,-224.55 347,-224.55 347,-248.55"/>
+<text text-anchor="middle" x="297" y="-234.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_whm_coord~~UsesGraph_edge3" class="edge">
+<g id="module~~s_whm_coord~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C619.4,-317.78 602.83,-295.9 550.5,-299.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C483.07,-303.68 408.21,-295.02 357.5,-287.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.8,-283.62 347.37,-285.5 356.69,-290.53 357.8,-283.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C515.87,-305.02 507.96,-282.79 475,-274.55 435.87,-264.77 391.49,-255.25 356.96,-248.18"/>
+<polygon fill="#000000" stroke="#000000" points="357.53,-244.73 347.04,-246.16 356.14,-251.59 357.53,-244.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C606.18,-216.7 610.22,-277.51 550.5,-295.55"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-271.35 511,-271.35 511,-247.35 588,-247.35 588,-271.35"/>
-<text text-anchor="middle" x="549.5" y="-256.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-73.55 627,-73.55 627,-49.55 712,-49.55 712,-73.55"/>
+<text text-anchor="middle" x="669.5" y="-59.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_coord~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C652.76,-305.12 612.83,-289.24 583.77,-275.82"/>
-<polygon fill="#000000" stroke="#000000" points="584.92,-272.49 574.38,-271.39 581.93,-278.82 584.92,-272.49"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_whm_coord~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.9,-207.23C767.04,-182.1 748.48,-124.18 715,-87.55 712.29,-84.59 709.17,-81.87 705.86,-79.39"/>
+<polygon fill="#000000" stroke="#000000" points="707.63,-76.37 697.37,-73.75 703.76,-82.2 707.63,-76.37"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-77.35 385.5,-77.35 385.5,-53.35 472.5,-53.35 472.5,-77.35"/>
-<text text-anchor="middle" x="429" y="-62.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-151.55 511.5,-151.55 511.5,-127.55 587.5,-127.55 587.5,-151.55"/>
+<text text-anchor="middle" x="549.5" y="-137.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.8,-129.76C729.54,-120.78 698.59,-108.68 670.5,-101.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-63.35C527.36,-58.7 503.57,-58.21 482.89,-59.24"/>
-<polygon fill="#000000" stroke="#000000" points="482.47,-55.76 472.71,-59.89 482.91,-62.75 482.47,-55.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C615.19,-87.45 604.31,-75.21 550.5,-63.35"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-220.22C729.16,-220.61 697.84,-220.8 670.5,-219.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C667.13,-219.49 611.14,-181.2 576.79,-157.62"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-154.47 568.15,-151.69 574.41,-160.24 578.38,-154.47"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-191.35 511.5,-191.35 511.5,-167.35 587.5,-167.35 587.5,-191.35"/>
-<text text-anchor="middle" x="549.5" y="-176.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-33.55 385.5,-33.55 385.5,-9.55 472.5,-9.55 472.5,-33.55"/>
+<text text-anchor="middle" x="429" y="-19.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_whm_coord~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C616.85,-318.27 628.82,-242.22 588,-205.35 584.98,-202.63 581.66,-199.94 578.28,-197.4"/>
-<polygon fill="#000000" stroke="#000000" points="580.08,-194.38 569.9,-191.42 576.01,-200.08 580.08,-194.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.99,-153.44C765.03,-186.18 735.11,-275.69 670.5,-299.35"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_whm_coord~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M777.01,-207.41C776.32,-174.29 769.38,-82.06 715,-40.55 648.16,10.46 544.83,2.24 482.68,-9.14"/>
+<polygon fill="#000000" stroke="#000000" points="481.85,-5.73 472.69,-11.06 483.17,-12.61 481.85,-5.73"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_whm_coord~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-229.35 123,-229.35 123,-205.35 211,-205.35 211,-229.35"/>
-<text text-anchor="middle" x="167" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-309.55 624,-309.55 624,-285.55 715,-285.55 715,-309.55"/>
+<text text-anchor="middle" x="669.5" y="-295.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_whm_coord~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C511.12,-358.4 454.96,-435.51 298,-375.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-231.74C742.93,-244.5 715.36,-264.7 695.35,-279.35"/>
+<polygon fill="#000000" stroke="#000000" points="693.02,-276.72 687.02,-285.45 697.16,-282.37 693.02,-276.72"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-153.35 627,-153.35 627,-129.35 712,-129.35 712,-153.35"/>
-<text text-anchor="middle" x="669.5" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-112.55 252.5,-112.55 252.5,-88.55 341.5,-88.55 341.5,-112.55"/>
+<text text-anchor="middle" x="297" y="-98.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-141.35C742.26,-141.35 732.26,-141.35 722.32,-141.35"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-137.85 712.05,-141.35 722.05,-144.85 722.05,-137.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.35,-207.43C728.67,-185.11 656.72,-138.04 588,-118.55 508.11,-95.89 411.05,-94.93 351.94,-97.13"/>
+<polygon fill="#000000" stroke="#000000" points="351.56,-93.65 341.71,-97.56 351.85,-100.64 351.56,-93.65"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-170.35 252.5,-170.35 252.5,-146.35 341.5,-146.35 341.5,-170.35"/>
-<text text-anchor="middle" x="297" y="-155.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-231.55 511,-231.55 511,-207.55 588,-207.55 588,-231.55"/>
+<text text-anchor="middle" x="549.5" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-139.35C402.83,-141.09 375.13,-144.87 351.8,-148.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.05,-145.18 341.75,-150.26 352.18,-152.09 351.05,-145.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C564.64,-74.27 537.08,-131.98 430,-139.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C645.46,-218.5 619.87,-218.37 598.42,-218.56"/>
+<polygon fill="#000000" stroke="#000000" points="598.21,-215.06 588.25,-218.68 598.29,-222.06 598.21,-215.06"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-55.35 624,-55.35 624,-31.35 715,-31.35 715,-55.35"/>
-<text text-anchor="middle" x="669.5" y="-40.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-307.55 383,-307.55 383,-283.55 475,-283.55 475,-307.55"/>
+<text text-anchor="middle" x="429" y="-293.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-129.34C745.82,-112.66 712.84,-82.31 691.3,-62.5"/>
-<polygon fill="#000000" stroke="#000000" points="693.39,-59.67 683.67,-55.47 688.65,-64.82 693.39,-59.67"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C528.3,-301.41 505.34,-302.59 485.04,-301.89"/>
+<polygon fill="#000000" stroke="#000000" points="485.17,-298.4 475,-301.39 484.82,-305.39 485.17,-298.4"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_whm_coord~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-347.35 383,-347.35 383,-323.35 475,-323.35 475,-347.35"/>
-<text text-anchor="middle" x="429" y="-332.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-189.55 123,-189.55 123,-165.55 211,-165.55 211,-189.55"/>
+<text text-anchor="middle" x="167" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_coord~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C520.15,-301.23 489.5,-310.76 466.47,-319.54"/>
-<polygon fill="#000000" stroke="#000000" points="465.12,-316.31 457.1,-323.23 467.69,-322.82 465.12,-316.31"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_coord~~UsesGraph_edge13" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-217.35C364.75,-217.35 329.26,-217.35 298,-217.35"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-335.55C370.6,-342.13 351.95,-356.23 298,-335.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C521.89,-303.59 457.61,-332.39 430,-335.55"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge14" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-205.27C381.92,-196.44 355.32,-184.37 333.98,-174.68"/>
-<polygon fill="#000000" stroke="#000000" points="335.14,-171.37 324.59,-170.42 332.25,-177.74 335.14,-171.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.9,-165.46C399.34,-161.1 390.77,-156.13 383,-151.55 364.11,-140.43 342.97,-127.74 326.49,-117.81"/>
+<polygon fill="#000000" stroke="#000000" points="328.24,-114.77 317.87,-112.6 324.62,-120.76 328.24,-114.77"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_coord~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-177.55C364.75,-177.55 329.26,-177.55 298,-177.55"/>
 </g>
 <!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_coord~~UsesGraph_edge15" class="edge">
 <title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-264.27C250.63,-255.44 224.44,-243.37 203.43,-233.68"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-230.43 194.18,-229.42 201.79,-236.78 204.72,-230.43"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_coord~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-247.32C501.77,-242.79 487.08,-237.58 473.56,-232.79"/>
-<polygon fill="#000000" stroke="#000000" points="474.56,-229.43 463.96,-229.39 472.22,-236.03 474.56,-229.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-224.47C250.63,-215.64 224.44,-203.57 203.43,-193.88"/>
+<polygon fill="#000000" stroke="#000000" points="204.72,-190.63 194.18,-189.62 201.79,-196.98 204.72,-190.63"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_coord~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-255.83C477.17,-252.39 426.56,-246.47 383,-238.35 344.74,-231.23 336.91,-217.35 298,-217.35"/>
-</g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.6,-53.26C370.42,-38.68 316.87,-17.09 298,-25.35"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.32,-73.57C630.8,-86.47 599.59,-107.1 577.27,-121.86"/>
+<polygon fill="#000000" stroke="#000000" points="575.31,-118.96 568.89,-127.39 579.17,-124.8 575.31,-118.96"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-77.51C388.62,-93.53 349.08,-121.82 323.2,-140.32"/>
-<polygon fill="#000000" stroke="#000000" points="321.1,-137.53 315,-146.19 325.17,-143.22 321.1,-137.53"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C518.77,-59.1 486.83,-47.76 463.6,-37.78"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-34.47 454.22,-33.62 461.94,-40.87 464.78,-34.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-63.22C604.29,-63.7 575.82,-63.64 550.5,-61.55"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_coord~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C395.49,-63.88 360.16,-75.08 334.54,-84.88"/>
+<polygon fill="#000000" stroke="#000000" points="333.25,-81.63 325.23,-88.55 335.82,-88.14 333.25,-81.63"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_coord~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C496.01,-57.23 482.53,-57.79 430,-61.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C370.37,-65.68 350.33,-36.05 298,-60.55"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_coord~~UsesGraph_edge22" class="edge">
+<g id="module~~s_whm_coord~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-191.27C500.41,-194.78 488.32,-198.65 476.88,-202.32"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-199.09 467.04,-205.48 477.63,-205.76 475.49,-199.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_coord~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.48,-174.28C487.87,-172.13 456.8,-171.33 430,-177.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-151.47C500.41,-154.97 488.32,-158.85 476.88,-162.52"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-159.29 467.04,-165.68 477.63,-165.96 475.49,-159.29"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_whm_coord~~UsesGraph_edge21" class="edge">
+<g id="module~~s_whm_coord~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.61,-167.31C505.58,-154.65 466.18,-136.86 430,-139.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-138.66C488.05,-138.16 457.26,-137.62 430,-137.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C395.12,-137.47 359.3,-126.39 333.59,-116.38"/>
+<polygon fill="#000000" stroke="#000000" points="334.85,-113.12 324.27,-112.63 332.23,-119.61 334.85,-113.12"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_whm_coord~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_whm_coord~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-229.35 0,-229.35 0,-205.35 87,-205.35 87,-229.35"/>
-<text text-anchor="middle" x="43.5" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_coord~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C367.55,-137.39 358.45,-177.55 298,-177.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-177.55C271.53,-177.55 244.42,-177.55 221.48,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-174.05 211.25,-177.55 221.25,-181.05 221.25,-174.05"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_coord~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-33.73C398.36,-37.93 390.23,-42.78 383,-47.55 366.31,-58.58 363.88,-63.83 347,-74.55 342.17,-77.62 336.95,-80.66 331.77,-83.52"/>
+<polygon fill="#000000" stroke="#000000" points="329.75,-80.64 322.6,-88.46 333.07,-86.8 329.75,-80.64"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_coord~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-217.35C114.58,-217.35 105.86,-217.35 97.36,-217.35"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-213.85 87.13,-217.35 97.13,-220.85 97.13,-213.85"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_coord~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.32,-153.54C635.91,-173.94 594.66,-215.19 570.13,-239.73"/>
-<polygon fill="#000000" stroke="#000000" points="567.39,-237.51 562.79,-247.06 572.34,-242.46 567.39,-237.51"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.28,-31.01C359.34,-37.56 325.96,-47.46 298,-60.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-60.55C274.85,-70.46 265.86,-65.77 247,-79.55 218.13,-100.65 193.89,-134.81 180.16,-156.72"/>
+<polygon fill="#000000" stroke="#000000" points="177.15,-154.93 174.93,-165.29 183.13,-158.57 177.15,-154.93"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_coord~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647,-129.29C639.62,-125.03 631.37,-120.1 624,-115.35 590.36,-93.68 589.58,-71.96 550.5,-63.35"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.91,-306.73C576.18,-316.07 498.11,-329.94 430,-335.55"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_coord~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-153.38C620.41,-156.84 608.53,-160.67 597.28,-164.29"/>
-<polygon fill="#000000" stroke="#000000" points="596.04,-161.01 587.59,-167.41 598.18,-167.68 596.04,-161.01"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_coord~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C493.33,-143.22 483.96,-165.22 430,-177.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-177.35C369.02,-190.62 358.44,-216.44 298,-217.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-217.35C271.53,-217.73 244.42,-217.78 221.48,-217.72"/>
-<polygon fill="#000000" stroke="#000000" points="221.27,-214.21 211.25,-217.68 221.24,-221.21 221.27,-214.21"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276,-112.58C254.8,-125.34 221.12,-145.6 197.01,-160.1"/>
+<polygon fill="#000000" stroke="#000000" points="195.05,-157.2 188.28,-165.35 198.66,-163.2 195.05,-157.2"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_coord~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.95,-138.89C604.32,-137.99 575.84,-137.58 550.5,-139.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C495.96,-143.03 482.54,-135.74 430,-139.35"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_coord~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-170.44C250.63,-179.27 224.44,-191.34 203.43,-201.03"/>
-<polygon fill="#000000" stroke="#000000" points="201.79,-197.92 194.18,-205.29 204.72,-204.28 201.79,-197.92"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-207.52C501.77,-202.99 487.08,-197.78 473.56,-192.99"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-189.63 463.96,-189.59 472.22,-196.23 474.56,-189.63"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_coord~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.12,-31.33C563.44,-10.78 411.42,24.29 298,-25.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-25.35C226.09,-59.78 188.52,-152.74 174.51,-195.41"/>
-<polygon fill="#000000" stroke="#000000" points="171.12,-194.51 171.45,-205.1 177.79,-196.62 171.12,-194.51"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_coord~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-216.03C477.17,-212.59 426.56,-206.67 383,-198.55 344.74,-191.42 336.91,-177.55 298,-177.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_coord~~UsesGraph_edge31" class="edge">
+<g id="module~~s_whm_coord~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-347.42C370.04,-361.71 317.13,-382.69 298,-375.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-375.35C233.63,-351.45 193.53,-276.57 176.85,-239.13"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-237.43 172.77,-229.63 173.51,-240.2 179.94,-237.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-335.55C233.63,-311.65 193.53,-236.77 176.85,-199.32"/>
+<polygon fill="#000000" stroke="#000000" points="179.94,-197.63 172.77,-189.83 173.51,-200.4 179.94,-197.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-307.62C370.04,-321.9 317.13,-342.88 298,-335.55"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_whm_coord~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_whm_coord~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-189.55 0,-189.55 0,-165.55 87,-165.55 87,-189.55"/>
+<text text-anchor="middle" x="43.5" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_whm_coord~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-177.55C114.58,-177.55 105.86,-177.55 97.36,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-174.05 87.13,-177.55 97.13,-181.05 97.13,-174.05"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_whm_gr.html b/docs/module/s_whm_gr.html
index e326bd9fc..5c8907f1c 100644
--- a/docs/module/s_whm_gr.html
+++ b/docs/module/s_whm_gr.html
@@ -251,312 +251,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_whm_gr~~UsesGraph Pages: 1 -->
-<svg id="modules_whm_grUsesGraph" width="641pt" height="285pt"
- viewBox="0.00 0.00 641.00 285.19" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_whm_gr~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 401.31)">
+<svg id="modules_whm_grUsesGraph" width="641pt" height="250pt"
+ viewBox="0.00 0.00 641.00 249.56" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_whm_gr~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 350.68)">
 <title>module~~s_whm_gr~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-401.31 907,-401.31 907,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-350.68 907,-350.68 907,4 -4,4"/>
 <!-- module~s_whm_gr -->
 <g id="module~~s_whm_gr~~UsesGraph_node1" class="node">
 <title>module~s_whm_gr</title>
-<polygon fill="none" stroke="black" points="903,-251.35 841,-251.35 841,-227.35 903,-227.35 903,-251.35"/>
-<text text-anchor="middle" x="872" y="-236.95" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_gr</text>
+<polygon fill="none" stroke="black" points="903,-211.55 841,-211.55 841,-187.55 903,-187.55 903,-211.55"/>
+<text text-anchor="middle" x="872" y="-197.15" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_gr</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_whm_gr~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_whm_gr~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-153.35 751,-153.35 751,-129.35 805,-129.35 805,-153.35"/>
-<text text-anchor="middle" x="778" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-231.55 751,-231.55 751,-207.55 805,-207.55 805,-231.55"/>
+<text text-anchor="middle" x="778" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_gr&#45;&gt;module~swiftest -->
 <g id="module~~s_whm_gr~~UsesGraph_edge1" class="edge">
 <title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M859.72,-227.34C844.13,-210.73 815.83,-180.58 797.22,-160.76"/>
-<polygon fill="#000000" stroke="#000000" points="799.77,-158.36 790.37,-153.47 794.67,-163.16 799.77,-158.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.88,-206.1C832.68,-207.88 823.72,-209.83 815.22,-211.68"/>
+<polygon fill="#000000" stroke="#000000" points="814.2,-208.32 805.17,-213.86 815.69,-215.16 814.2,-208.32"/>
 </g>
 <!-- module~whm_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_node3" class="node">
 <title>module~whm_classes</title>
 <g id="a_module~~s_whm_gr~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-229.35 391,-229.35 391,-205.35 467,-205.35 467,-229.35"/>
-<text text-anchor="middle" x="429" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-189.55 391,-189.55 391,-165.55 467,-165.55 467,-189.55"/>
+<text text-anchor="middle" x="429" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_gr&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge2" class="edge">
 <title>module~s_whm_gr&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M852.31,-251.62C824,-269.38 767.93,-301.44 715,-313.35 626.55,-333.27 593.22,-351.56 511,-313.35 477.95,-298 453.53,-261.78 440.56,-238.48"/>
-<polygon fill="#000000" stroke="#000000" points="443.5,-236.56 435.71,-229.38 437.33,-239.85 443.5,-236.56"/>
+<path fill="none" stroke="#000000" d="M548.5,-179.55C525.17,-177.43 499.15,-176.8 477.45,-176.75"/>
+<polygon fill="#000000" stroke="#000000" points="477.16,-173.25 467.17,-176.77 477.18,-180.25 477.16,-173.25"/>
+<path fill="none" stroke="#000000" d="M840.91,-198.25C784.08,-195.66 657.1,-189.27 550.5,-179.55"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_gr~~UsesGraph_edge7" class="edge">
+<g id="module~~s_whm_gr~~UsesGraph_edge3" class="edge">
 <title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C626.35,-314.79 629.51,-255.43 588,-238.35 552.67,-223.82 509.49,-218.85 477.21,-217.36"/>
-<polygon fill="#000000" stroke="#000000" points="477.26,-213.86 467.14,-216.99 477,-220.86 477.26,-213.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C613.18,-217.02 605.65,-184.58 550.5,-179.55"/>
 </g>
 <!-- module~swiftest_operators -->
 <g id="module~~s_whm_gr~~UsesGraph_node4" class="node">
 <title>module~swiftest_operators</title>
 <g id="a_module~~s_whm_gr~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-288.35 247,-288.35 247,-264.35 347,-264.35 347,-288.35"/>
-<text text-anchor="middle" x="297" y="-273.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-248.55 247,-248.55 247,-224.55 347,-224.55 347,-248.55"/>
+<text text-anchor="middle" x="297" y="-234.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_whm_gr~~UsesGraph_edge3" class="edge">
+<g id="module~~s_whm_gr~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C619.4,-317.78 602.83,-295.9 550.5,-299.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C483.07,-303.68 408.21,-295.02 357.5,-287.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.8,-283.62 347.37,-285.5 356.69,-290.53 357.8,-283.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C515.87,-305.02 507.96,-282.79 475,-274.55 435.87,-264.77 391.49,-255.25 356.96,-248.18"/>
+<polygon fill="#000000" stroke="#000000" points="357.53,-244.73 347.04,-246.16 356.14,-251.59 357.53,-244.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C606.18,-216.7 610.22,-277.51 550.5,-295.55"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-271.35 511,-271.35 511,-247.35 588,-247.35 588,-271.35"/>
-<text text-anchor="middle" x="549.5" y="-256.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-73.55 627,-73.55 627,-49.55 712,-49.55 712,-73.55"/>
+<text text-anchor="middle" x="669.5" y="-59.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_gr~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C652.76,-305.12 612.83,-289.24 583.77,-275.82"/>
-<polygon fill="#000000" stroke="#000000" points="584.92,-272.49 574.38,-271.39 581.93,-278.82 584.92,-272.49"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_whm_gr~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.9,-207.23C767.04,-182.1 748.48,-124.18 715,-87.55 712.29,-84.59 709.17,-81.87 705.86,-79.39"/>
+<polygon fill="#000000" stroke="#000000" points="707.63,-76.37 697.37,-73.75 703.76,-82.2 707.63,-76.37"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-77.35 385.5,-77.35 385.5,-53.35 472.5,-53.35 472.5,-77.35"/>
-<text text-anchor="middle" x="429" y="-62.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-151.55 511.5,-151.55 511.5,-127.55 587.5,-127.55 587.5,-151.55"/>
+<text text-anchor="middle" x="549.5" y="-137.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.8,-129.76C729.54,-120.78 698.59,-108.68 670.5,-101.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-63.35C527.36,-58.7 503.57,-58.21 482.89,-59.24"/>
-<polygon fill="#000000" stroke="#000000" points="482.47,-55.76 472.71,-59.89 482.91,-62.75 482.47,-55.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C615.19,-87.45 604.31,-75.21 550.5,-63.35"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-220.22C729.16,-220.61 697.84,-220.8 670.5,-219.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C667.13,-219.49 611.14,-181.2 576.79,-157.62"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-154.47 568.15,-151.69 574.41,-160.24 578.38,-154.47"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-191.35 511.5,-191.35 511.5,-167.35 587.5,-167.35 587.5,-191.35"/>
-<text text-anchor="middle" x="549.5" y="-176.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-33.55 385.5,-33.55 385.5,-9.55 472.5,-9.55 472.5,-33.55"/>
+<text text-anchor="middle" x="429" y="-19.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_whm_gr~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C616.85,-318.27 628.82,-242.22 588,-205.35 584.98,-202.63 581.66,-199.94 578.28,-197.4"/>
-<polygon fill="#000000" stroke="#000000" points="580.08,-194.38 569.9,-191.42 576.01,-200.08 580.08,-194.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.99,-153.44C765.03,-186.18 735.11,-275.69 670.5,-299.35"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_whm_gr~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M777.01,-207.41C776.32,-174.29 769.38,-82.06 715,-40.55 648.16,10.46 544.83,2.24 482.68,-9.14"/>
+<polygon fill="#000000" stroke="#000000" points="481.85,-5.73 472.69,-11.06 483.17,-12.61 481.85,-5.73"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_whm_gr~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-229.35 123,-229.35 123,-205.35 211,-205.35 211,-229.35"/>
-<text text-anchor="middle" x="167" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-309.55 624,-309.55 624,-285.55 715,-285.55 715,-309.55"/>
+<text text-anchor="middle" x="669.5" y="-295.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_whm_gr~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C511.12,-358.4 454.96,-435.51 298,-375.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-231.74C742.93,-244.5 715.36,-264.7 695.35,-279.35"/>
+<polygon fill="#000000" stroke="#000000" points="693.02,-276.72 687.02,-285.45 697.16,-282.37 693.02,-276.72"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-153.35 627,-153.35 627,-129.35 712,-129.35 712,-153.35"/>
-<text text-anchor="middle" x="669.5" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-112.55 252.5,-112.55 252.5,-88.55 341.5,-88.55 341.5,-112.55"/>
+<text text-anchor="middle" x="297" y="-98.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-141.35C742.26,-141.35 732.26,-141.35 722.32,-141.35"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-137.85 712.05,-141.35 722.05,-144.85 722.05,-137.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.35,-207.43C728.67,-185.11 656.72,-138.04 588,-118.55 508.11,-95.89 411.05,-94.93 351.94,-97.13"/>
+<polygon fill="#000000" stroke="#000000" points="351.56,-93.65 341.71,-97.56 351.85,-100.64 351.56,-93.65"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-170.35 252.5,-170.35 252.5,-146.35 341.5,-146.35 341.5,-170.35"/>
-<text text-anchor="middle" x="297" y="-155.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-231.55 511,-231.55 511,-207.55 588,-207.55 588,-231.55"/>
+<text text-anchor="middle" x="549.5" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-139.35C402.83,-141.09 375.13,-144.87 351.8,-148.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.05,-145.18 341.75,-150.26 352.18,-152.09 351.05,-145.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C564.64,-74.27 537.08,-131.98 430,-139.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C645.46,-218.5 619.87,-218.37 598.42,-218.56"/>
+<polygon fill="#000000" stroke="#000000" points="598.21,-215.06 588.25,-218.68 598.29,-222.06 598.21,-215.06"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-55.35 624,-55.35 624,-31.35 715,-31.35 715,-55.35"/>
-<text text-anchor="middle" x="669.5" y="-40.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-307.55 383,-307.55 383,-283.55 475,-283.55 475,-307.55"/>
+<text text-anchor="middle" x="429" y="-293.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-129.34C745.82,-112.66 712.84,-82.31 691.3,-62.5"/>
-<polygon fill="#000000" stroke="#000000" points="693.39,-59.67 683.67,-55.47 688.65,-64.82 693.39,-59.67"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C528.3,-301.41 505.34,-302.59 485.04,-301.89"/>
+<polygon fill="#000000" stroke="#000000" points="485.17,-298.4 475,-301.39 484.82,-305.39 485.17,-298.4"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_whm_gr~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-347.35 383,-347.35 383,-323.35 475,-323.35 475,-347.35"/>
-<text text-anchor="middle" x="429" y="-332.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-189.55 123,-189.55 123,-165.55 211,-165.55 211,-189.55"/>
+<text text-anchor="middle" x="167" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_gr~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C520.15,-301.23 489.5,-310.76 466.47,-319.54"/>
-<polygon fill="#000000" stroke="#000000" points="465.12,-316.31 457.1,-323.23 467.69,-322.82 465.12,-316.31"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_gr~~UsesGraph_edge13" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-217.35C364.75,-217.35 329.26,-217.35 298,-217.35"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-335.55C370.6,-342.13 351.95,-356.23 298,-335.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C521.89,-303.59 457.61,-332.39 430,-335.55"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge14" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-205.27C381.92,-196.44 355.32,-184.37 333.98,-174.68"/>
-<polygon fill="#000000" stroke="#000000" points="335.14,-171.37 324.59,-170.42 332.25,-177.74 335.14,-171.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.9,-165.46C399.34,-161.1 390.77,-156.13 383,-151.55 364.11,-140.43 342.97,-127.74 326.49,-117.81"/>
+<polygon fill="#000000" stroke="#000000" points="328.24,-114.77 317.87,-112.6 324.62,-120.76 328.24,-114.77"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_gr~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-177.55C364.75,-177.55 329.26,-177.55 298,-177.55"/>
 </g>
 <!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_gr~~UsesGraph_edge15" class="edge">
 <title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-264.27C250.63,-255.44 224.44,-243.37 203.43,-233.68"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-230.43 194.18,-229.42 201.79,-236.78 204.72,-230.43"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_gr~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-247.32C501.77,-242.79 487.08,-237.58 473.56,-232.79"/>
-<polygon fill="#000000" stroke="#000000" points="474.56,-229.43 463.96,-229.39 472.22,-236.03 474.56,-229.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-224.47C250.63,-215.64 224.44,-203.57 203.43,-193.88"/>
+<polygon fill="#000000" stroke="#000000" points="204.72,-190.63 194.18,-189.62 201.79,-196.98 204.72,-190.63"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_gr~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-255.83C477.17,-252.39 426.56,-246.47 383,-238.35 344.74,-231.23 336.91,-217.35 298,-217.35"/>
-</g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.6,-53.26C370.42,-38.68 316.87,-17.09 298,-25.35"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.32,-73.57C630.8,-86.47 599.59,-107.1 577.27,-121.86"/>
+<polygon fill="#000000" stroke="#000000" points="575.31,-118.96 568.89,-127.39 579.17,-124.8 575.31,-118.96"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-77.51C388.62,-93.53 349.08,-121.82 323.2,-140.32"/>
-<polygon fill="#000000" stroke="#000000" points="321.1,-137.53 315,-146.19 325.17,-143.22 321.1,-137.53"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C518.77,-59.1 486.83,-47.76 463.6,-37.78"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-34.47 454.22,-33.62 461.94,-40.87 464.78,-34.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-63.22C604.29,-63.7 575.82,-63.64 550.5,-61.55"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_gr~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C395.49,-63.88 360.16,-75.08 334.54,-84.88"/>
+<polygon fill="#000000" stroke="#000000" points="333.25,-81.63 325.23,-88.55 335.82,-88.14 333.25,-81.63"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_gr~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C496.01,-57.23 482.53,-57.79 430,-61.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C370.37,-65.68 350.33,-36.05 298,-60.55"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_gr~~UsesGraph_edge22" class="edge">
+<g id="module~~s_whm_gr~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-191.27C500.41,-194.78 488.32,-198.65 476.88,-202.32"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-199.09 467.04,-205.48 477.63,-205.76 475.49,-199.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_gr~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.48,-174.28C487.87,-172.13 456.8,-171.33 430,-177.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-151.47C500.41,-154.97 488.32,-158.85 476.88,-162.52"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-159.29 467.04,-165.68 477.63,-165.96 475.49,-159.29"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_whm_gr~~UsesGraph_edge21" class="edge">
+<g id="module~~s_whm_gr~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.61,-167.31C505.58,-154.65 466.18,-136.86 430,-139.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-138.66C488.05,-138.16 457.26,-137.62 430,-137.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C395.12,-137.47 359.3,-126.39 333.59,-116.38"/>
+<polygon fill="#000000" stroke="#000000" points="334.85,-113.12 324.27,-112.63 332.23,-119.61 334.85,-113.12"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_whm_gr~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_whm_gr~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-229.35 0,-229.35 0,-205.35 87,-205.35 87,-229.35"/>
-<text text-anchor="middle" x="43.5" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_gr~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C367.55,-137.39 358.45,-177.55 298,-177.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-177.55C271.53,-177.55 244.42,-177.55 221.48,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-174.05 211.25,-177.55 221.25,-181.05 221.25,-174.05"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_gr~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-33.73C398.36,-37.93 390.23,-42.78 383,-47.55 366.31,-58.58 363.88,-63.83 347,-74.55 342.17,-77.62 336.95,-80.66 331.77,-83.52"/>
+<polygon fill="#000000" stroke="#000000" points="329.75,-80.64 322.6,-88.46 333.07,-86.8 329.75,-80.64"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_gr~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-217.35C114.58,-217.35 105.86,-217.35 97.36,-217.35"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-213.85 87.13,-217.35 97.13,-220.85 97.13,-213.85"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_gr~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.32,-153.54C635.91,-173.94 594.66,-215.19 570.13,-239.73"/>
-<polygon fill="#000000" stroke="#000000" points="567.39,-237.51 562.79,-247.06 572.34,-242.46 567.39,-237.51"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.28,-31.01C359.34,-37.56 325.96,-47.46 298,-60.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-60.55C274.85,-70.46 265.86,-65.77 247,-79.55 218.13,-100.65 193.89,-134.81 180.16,-156.72"/>
+<polygon fill="#000000" stroke="#000000" points="177.15,-154.93 174.93,-165.29 183.13,-158.57 177.15,-154.93"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_gr~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647,-129.29C639.62,-125.03 631.37,-120.1 624,-115.35 590.36,-93.68 589.58,-71.96 550.5,-63.35"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.91,-306.73C576.18,-316.07 498.11,-329.94 430,-335.55"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_gr~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-153.38C620.41,-156.84 608.53,-160.67 597.28,-164.29"/>
-<polygon fill="#000000" stroke="#000000" points="596.04,-161.01 587.59,-167.41 598.18,-167.68 596.04,-161.01"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_gr~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C493.33,-143.22 483.96,-165.22 430,-177.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-177.35C369.02,-190.62 358.44,-216.44 298,-217.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-217.35C271.53,-217.73 244.42,-217.78 221.48,-217.72"/>
-<polygon fill="#000000" stroke="#000000" points="221.27,-214.21 211.25,-217.68 221.24,-221.21 221.27,-214.21"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276,-112.58C254.8,-125.34 221.12,-145.6 197.01,-160.1"/>
+<polygon fill="#000000" stroke="#000000" points="195.05,-157.2 188.28,-165.35 198.66,-163.2 195.05,-157.2"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_gr~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.95,-138.89C604.32,-137.99 575.84,-137.58 550.5,-139.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C495.96,-143.03 482.54,-135.74 430,-139.35"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_gr~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-170.44C250.63,-179.27 224.44,-191.34 203.43,-201.03"/>
-<polygon fill="#000000" stroke="#000000" points="201.79,-197.92 194.18,-205.29 204.72,-204.28 201.79,-197.92"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-207.52C501.77,-202.99 487.08,-197.78 473.56,-192.99"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-189.63 463.96,-189.59 472.22,-196.23 474.56,-189.63"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_gr~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.12,-31.33C563.44,-10.78 411.42,24.29 298,-25.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-25.35C226.09,-59.78 188.52,-152.74 174.51,-195.41"/>
-<polygon fill="#000000" stroke="#000000" points="171.12,-194.51 171.45,-205.1 177.79,-196.62 171.12,-194.51"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_gr~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-216.03C477.17,-212.59 426.56,-206.67 383,-198.55 344.74,-191.42 336.91,-177.55 298,-177.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_gr~~UsesGraph_edge31" class="edge">
+<g id="module~~s_whm_gr~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-347.42C370.04,-361.71 317.13,-382.69 298,-375.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-375.35C233.63,-351.45 193.53,-276.57 176.85,-239.13"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-237.43 172.77,-229.63 173.51,-240.2 179.94,-237.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-335.55C233.63,-311.65 193.53,-236.77 176.85,-199.32"/>
+<polygon fill="#000000" stroke="#000000" points="179.94,-197.63 172.77,-189.83 173.51,-200.4 179.94,-197.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-307.62C370.04,-321.9 317.13,-342.88 298,-335.55"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_whm_gr~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_whm_gr~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-189.55 0,-189.55 0,-165.55 87,-165.55 87,-189.55"/>
+<text text-anchor="middle" x="43.5" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_whm_gr~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-177.55C114.58,-177.55 105.86,-177.55 97.36,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-174.05 87.13,-177.55 97.13,-181.05 97.13,-174.05"/>
 </g>
 </g>
 </svg>
@@ -703,7 +699,7 @@ <h2>Module Subroutines</h2>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-whm_gr_kick_getacch_pl"></span><h3>
-module subroutine <a href='../proc/whm_gr_kick_getacch_pl.html'>whm_gr_kick_getacch_pl</a>(self, param)
+pure module subroutine <a href='../proc/whm_gr_kick_getacch_pl.html'>whm_gr_kick_getacch_pl</a>(self, param)
     
     
    <a href='../interface/whm_gr_kick_getacch_pl.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -790,7 +786,7 @@ <h4>Arguments</h4>
         
   <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-whm_gr_kick_getacch_tp"></span><h3>
-module subroutine <a href='../proc/whm_gr_kick_getacch_tp.html'>whm_gr_kick_getacch_tp</a>(self, param)
+pure module subroutine <a href='../proc/whm_gr_kick_getacch_tp.html'>whm_gr_kick_getacch_tp</a>(self, param)
     
     
    <a href='../interface/whm_gr_kick_getacch_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/module/s_whm_kick.html b/docs/module/s_whm_kick.html
index 03f09479e..42f6f6828 100644
--- a/docs/module/s_whm_kick.html
+++ b/docs/module/s_whm_kick.html
@@ -277,312 +277,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_whm_kick~~UsesGraph Pages: 1 -->
-<svg id="modules_whm_kickUsesGraph" width="641pt" height="283pt"
- viewBox="0.00 0.00 641.00 282.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_whm_kick~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 401.31)">
+<svg id="modules_whm_kickUsesGraph" width="641pt" height="247pt"
+ viewBox="0.00 0.00 641.00 247.39" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_whm_kick~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 350.68)">
 <title>module~~s_whm_kick~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-401.31 915,-401.31 915,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-350.68 915,-350.68 915,4 -4,4"/>
 <!-- module~s_whm_kick -->
 <g id="module~~s_whm_kick~~UsesGraph_node1" class="node">
 <title>module~s_whm_kick</title>
-<polygon fill="none" stroke="black" points="911,-251.35 841,-251.35 841,-227.35 911,-227.35 911,-251.35"/>
-<text text-anchor="middle" x="876" y="-236.95" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_kick</text>
+<polygon fill="none" stroke="black" points="911,-211.55 841,-211.55 841,-187.55 911,-187.55 911,-211.55"/>
+<text text-anchor="middle" x="876" y="-197.15" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_kick</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_whm_kick~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_whm_kick~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-153.35 751,-153.35 751,-129.35 805,-129.35 805,-153.35"/>
-<text text-anchor="middle" x="778" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-231.55 751,-231.55 751,-207.55 805,-207.55 805,-231.55"/>
+<text text-anchor="middle" x="778" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_kick&#45;&gt;module~swiftest -->
 <g id="module~~s_whm_kick~~UsesGraph_edge1" class="edge">
 <title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M863.23,-227.34C846.96,-210.73 817.43,-180.58 798.01,-160.76"/>
-<polygon fill="#000000" stroke="#000000" points="800.37,-158.16 790.87,-153.47 795.37,-163.06 800.37,-158.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.88,-206.66C832.53,-208.4 823.56,-210.27 815.12,-212.03"/>
+<polygon fill="#000000" stroke="#000000" points="814.24,-208.64 805.16,-214.1 815.66,-215.49 814.24,-208.64"/>
 </g>
 <!-- module~whm_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_node3" class="node">
 <title>module~whm_classes</title>
 <g id="a_module~~s_whm_kick~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-229.35 391,-229.35 391,-205.35 467,-205.35 467,-229.35"/>
-<text text-anchor="middle" x="429" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-189.55 391,-189.55 391,-165.55 467,-165.55 467,-189.55"/>
+<text text-anchor="middle" x="429" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_kick&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge2" class="edge">
 <title>module~s_whm_kick&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M855.46,-251.43C799.28,-284.48 633.52,-370.28 511,-313.35 477.95,-298 453.53,-261.78 440.56,-238.48"/>
-<polygon fill="#000000" stroke="#000000" points="443.5,-236.56 435.71,-229.38 437.33,-239.85 443.5,-236.56"/>
+<path fill="none" stroke="#000000" d="M548.5,-179.55C525.17,-177.43 499.15,-176.8 477.45,-176.75"/>
+<polygon fill="#000000" stroke="#000000" points="477.16,-173.25 467.17,-176.77 477.18,-180.25 477.16,-173.25"/>
+<path fill="none" stroke="#000000" d="M840.84,-198.11C781.65,-195.45 656.18,-189.18 550.5,-179.55"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_kick~~UsesGraph_edge7" class="edge">
+<g id="module~~s_whm_kick~~UsesGraph_edge3" class="edge">
 <title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C626.35,-314.79 629.51,-255.43 588,-238.35 552.67,-223.82 509.49,-218.85 477.21,-217.36"/>
-<polygon fill="#000000" stroke="#000000" points="477.26,-213.86 467.14,-216.99 477,-220.86 477.26,-213.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C613.18,-217.02 605.65,-184.58 550.5,-179.55"/>
 </g>
 <!-- module~swiftest_operators -->
 <g id="module~~s_whm_kick~~UsesGraph_node4" class="node">
 <title>module~swiftest_operators</title>
 <g id="a_module~~s_whm_kick~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-288.35 247,-288.35 247,-264.35 347,-264.35 347,-288.35"/>
-<text text-anchor="middle" x="297" y="-273.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-248.55 247,-248.55 247,-224.55 347,-224.55 347,-248.55"/>
+<text text-anchor="middle" x="297" y="-234.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_whm_kick~~UsesGraph_edge3" class="edge">
+<g id="module~~s_whm_kick~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C619.4,-317.78 602.83,-295.9 550.5,-299.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C483.07,-303.68 408.21,-295.02 357.5,-287.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.8,-283.62 347.37,-285.5 356.69,-290.53 357.8,-283.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C515.87,-305.02 507.96,-282.79 475,-274.55 435.87,-264.77 391.49,-255.25 356.96,-248.18"/>
+<polygon fill="#000000" stroke="#000000" points="357.53,-244.73 347.04,-246.16 356.14,-251.59 357.53,-244.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C606.18,-216.7 610.22,-277.51 550.5,-295.55"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-271.35 511,-271.35 511,-247.35 588,-247.35 588,-271.35"/>
-<text text-anchor="middle" x="549.5" y="-256.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-73.55 627,-73.55 627,-49.55 712,-49.55 712,-73.55"/>
+<text text-anchor="middle" x="669.5" y="-59.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_kick~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C652.76,-305.12 612.83,-289.24 583.77,-275.82"/>
-<polygon fill="#000000" stroke="#000000" points="584.92,-272.49 574.38,-271.39 581.93,-278.82 584.92,-272.49"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_whm_kick~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.9,-207.23C767.04,-182.1 748.48,-124.18 715,-87.55 712.29,-84.59 709.17,-81.87 705.86,-79.39"/>
+<polygon fill="#000000" stroke="#000000" points="707.63,-76.37 697.37,-73.75 703.76,-82.2 707.63,-76.37"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-77.35 385.5,-77.35 385.5,-53.35 472.5,-53.35 472.5,-77.35"/>
-<text text-anchor="middle" x="429" y="-62.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-151.55 511.5,-151.55 511.5,-127.55 587.5,-127.55 587.5,-151.55"/>
+<text text-anchor="middle" x="549.5" y="-137.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.8,-129.76C729.54,-120.78 698.59,-108.68 670.5,-101.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-63.35C527.36,-58.7 503.57,-58.21 482.89,-59.24"/>
-<polygon fill="#000000" stroke="#000000" points="482.47,-55.76 472.71,-59.89 482.91,-62.75 482.47,-55.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C615.19,-87.45 604.31,-75.21 550.5,-63.35"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-220.22C729.16,-220.61 697.84,-220.8 670.5,-219.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C667.13,-219.49 611.14,-181.2 576.79,-157.62"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-154.47 568.15,-151.69 574.41,-160.24 578.38,-154.47"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-191.35 511.5,-191.35 511.5,-167.35 587.5,-167.35 587.5,-191.35"/>
-<text text-anchor="middle" x="549.5" y="-176.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-33.55 385.5,-33.55 385.5,-9.55 472.5,-9.55 472.5,-33.55"/>
+<text text-anchor="middle" x="429" y="-19.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_whm_kick~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C616.85,-318.27 628.82,-242.22 588,-205.35 584.98,-202.63 581.66,-199.94 578.28,-197.4"/>
-<polygon fill="#000000" stroke="#000000" points="580.08,-194.38 569.9,-191.42 576.01,-200.08 580.08,-194.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.99,-153.44C765.03,-186.18 735.11,-275.69 670.5,-299.35"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_whm_kick~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M777.01,-207.41C776.32,-174.29 769.38,-82.06 715,-40.55 648.16,10.46 544.83,2.24 482.68,-9.14"/>
+<polygon fill="#000000" stroke="#000000" points="481.85,-5.73 472.69,-11.06 483.17,-12.61 481.85,-5.73"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_whm_kick~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-229.35 123,-229.35 123,-205.35 211,-205.35 211,-229.35"/>
-<text text-anchor="middle" x="167" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-309.55 624,-309.55 624,-285.55 715,-285.55 715,-309.55"/>
+<text text-anchor="middle" x="669.5" y="-295.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_whm_kick~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C511.12,-358.4 454.96,-435.51 298,-375.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-231.74C742.93,-244.5 715.36,-264.7 695.35,-279.35"/>
+<polygon fill="#000000" stroke="#000000" points="693.02,-276.72 687.02,-285.45 697.16,-282.37 693.02,-276.72"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-153.35 627,-153.35 627,-129.35 712,-129.35 712,-153.35"/>
-<text text-anchor="middle" x="669.5" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-112.55 252.5,-112.55 252.5,-88.55 341.5,-88.55 341.5,-112.55"/>
+<text text-anchor="middle" x="297" y="-98.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-141.35C742.26,-141.35 732.26,-141.35 722.32,-141.35"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-137.85 712.05,-141.35 722.05,-144.85 722.05,-137.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.35,-207.43C728.67,-185.11 656.72,-138.04 588,-118.55 508.11,-95.89 411.05,-94.93 351.94,-97.13"/>
+<polygon fill="#000000" stroke="#000000" points="351.56,-93.65 341.71,-97.56 351.85,-100.64 351.56,-93.65"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-170.35 252.5,-170.35 252.5,-146.35 341.5,-146.35 341.5,-170.35"/>
-<text text-anchor="middle" x="297" y="-155.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-231.55 511,-231.55 511,-207.55 588,-207.55 588,-231.55"/>
+<text text-anchor="middle" x="549.5" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-139.35C402.83,-141.09 375.13,-144.87 351.8,-148.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.05,-145.18 341.75,-150.26 352.18,-152.09 351.05,-145.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C564.64,-74.27 537.08,-131.98 430,-139.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C645.46,-218.5 619.87,-218.37 598.42,-218.56"/>
+<polygon fill="#000000" stroke="#000000" points="598.21,-215.06 588.25,-218.68 598.29,-222.06 598.21,-215.06"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-55.35 624,-55.35 624,-31.35 715,-31.35 715,-55.35"/>
-<text text-anchor="middle" x="669.5" y="-40.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-307.55 383,-307.55 383,-283.55 475,-283.55 475,-307.55"/>
+<text text-anchor="middle" x="429" y="-293.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-129.34C745.82,-112.66 712.84,-82.31 691.3,-62.5"/>
-<polygon fill="#000000" stroke="#000000" points="693.39,-59.67 683.67,-55.47 688.65,-64.82 693.39,-59.67"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C528.3,-301.41 505.34,-302.59 485.04,-301.89"/>
+<polygon fill="#000000" stroke="#000000" points="485.17,-298.4 475,-301.39 484.82,-305.39 485.17,-298.4"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_whm_kick~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-347.35 383,-347.35 383,-323.35 475,-323.35 475,-347.35"/>
-<text text-anchor="middle" x="429" y="-332.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-189.55 123,-189.55 123,-165.55 211,-165.55 211,-189.55"/>
+<text text-anchor="middle" x="167" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_kick~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C520.15,-301.23 489.5,-310.76 466.47,-319.54"/>
-<polygon fill="#000000" stroke="#000000" points="465.12,-316.31 457.1,-323.23 467.69,-322.82 465.12,-316.31"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_kick~~UsesGraph_edge13" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-217.35C364.75,-217.35 329.26,-217.35 298,-217.35"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-335.55C370.6,-342.13 351.95,-356.23 298,-335.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C521.89,-303.59 457.61,-332.39 430,-335.55"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge14" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-205.27C381.92,-196.44 355.32,-184.37 333.98,-174.68"/>
-<polygon fill="#000000" stroke="#000000" points="335.14,-171.37 324.59,-170.42 332.25,-177.74 335.14,-171.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.9,-165.46C399.34,-161.1 390.77,-156.13 383,-151.55 364.11,-140.43 342.97,-127.74 326.49,-117.81"/>
+<polygon fill="#000000" stroke="#000000" points="328.24,-114.77 317.87,-112.6 324.62,-120.76 328.24,-114.77"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_kick~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-177.55C364.75,-177.55 329.26,-177.55 298,-177.55"/>
 </g>
 <!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_kick~~UsesGraph_edge15" class="edge">
 <title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-264.27C250.63,-255.44 224.44,-243.37 203.43,-233.68"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-230.43 194.18,-229.42 201.79,-236.78 204.72,-230.43"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_kick~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-247.32C501.77,-242.79 487.08,-237.58 473.56,-232.79"/>
-<polygon fill="#000000" stroke="#000000" points="474.56,-229.43 463.96,-229.39 472.22,-236.03 474.56,-229.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-224.47C250.63,-215.64 224.44,-203.57 203.43,-193.88"/>
+<polygon fill="#000000" stroke="#000000" points="204.72,-190.63 194.18,-189.62 201.79,-196.98 204.72,-190.63"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_kick~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-255.83C477.17,-252.39 426.56,-246.47 383,-238.35 344.74,-231.23 336.91,-217.35 298,-217.35"/>
-</g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.6,-53.26C370.42,-38.68 316.87,-17.09 298,-25.35"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.32,-73.57C630.8,-86.47 599.59,-107.1 577.27,-121.86"/>
+<polygon fill="#000000" stroke="#000000" points="575.31,-118.96 568.89,-127.39 579.17,-124.8 575.31,-118.96"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-77.51C388.62,-93.53 349.08,-121.82 323.2,-140.32"/>
-<polygon fill="#000000" stroke="#000000" points="321.1,-137.53 315,-146.19 325.17,-143.22 321.1,-137.53"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C518.77,-59.1 486.83,-47.76 463.6,-37.78"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-34.47 454.22,-33.62 461.94,-40.87 464.78,-34.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-63.22C604.29,-63.7 575.82,-63.64 550.5,-61.55"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_kick~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C395.49,-63.88 360.16,-75.08 334.54,-84.88"/>
+<polygon fill="#000000" stroke="#000000" points="333.25,-81.63 325.23,-88.55 335.82,-88.14 333.25,-81.63"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_kick~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C496.01,-57.23 482.53,-57.79 430,-61.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C370.37,-65.68 350.33,-36.05 298,-60.55"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_kick~~UsesGraph_edge22" class="edge">
+<g id="module~~s_whm_kick~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-191.27C500.41,-194.78 488.32,-198.65 476.88,-202.32"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-199.09 467.04,-205.48 477.63,-205.76 475.49,-199.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_kick~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.48,-174.28C487.87,-172.13 456.8,-171.33 430,-177.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-151.47C500.41,-154.97 488.32,-158.85 476.88,-162.52"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-159.29 467.04,-165.68 477.63,-165.96 475.49,-159.29"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_whm_kick~~UsesGraph_edge21" class="edge">
+<g id="module~~s_whm_kick~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.61,-167.31C505.58,-154.65 466.18,-136.86 430,-139.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-138.66C488.05,-138.16 457.26,-137.62 430,-137.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C395.12,-137.47 359.3,-126.39 333.59,-116.38"/>
+<polygon fill="#000000" stroke="#000000" points="334.85,-113.12 324.27,-112.63 332.23,-119.61 334.85,-113.12"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_whm_kick~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_whm_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-229.35 0,-229.35 0,-205.35 87,-205.35 87,-229.35"/>
-<text text-anchor="middle" x="43.5" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_kick~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C367.55,-137.39 358.45,-177.55 298,-177.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-177.55C271.53,-177.55 244.42,-177.55 221.48,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-174.05 211.25,-177.55 221.25,-181.05 221.25,-174.05"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_kick~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-33.73C398.36,-37.93 390.23,-42.78 383,-47.55 366.31,-58.58 363.88,-63.83 347,-74.55 342.17,-77.62 336.95,-80.66 331.77,-83.52"/>
+<polygon fill="#000000" stroke="#000000" points="329.75,-80.64 322.6,-88.46 333.07,-86.8 329.75,-80.64"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_kick~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-217.35C114.58,-217.35 105.86,-217.35 97.36,-217.35"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-213.85 87.13,-217.35 97.13,-220.85 97.13,-213.85"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_kick~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.32,-153.54C635.91,-173.94 594.66,-215.19 570.13,-239.73"/>
-<polygon fill="#000000" stroke="#000000" points="567.39,-237.51 562.79,-247.06 572.34,-242.46 567.39,-237.51"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.28,-31.01C359.34,-37.56 325.96,-47.46 298,-60.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-60.55C274.85,-70.46 265.86,-65.77 247,-79.55 218.13,-100.65 193.89,-134.81 180.16,-156.72"/>
+<polygon fill="#000000" stroke="#000000" points="177.15,-154.93 174.93,-165.29 183.13,-158.57 177.15,-154.93"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_kick~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647,-129.29C639.62,-125.03 631.37,-120.1 624,-115.35 590.36,-93.68 589.58,-71.96 550.5,-63.35"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.91,-306.73C576.18,-316.07 498.11,-329.94 430,-335.55"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_kick~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-153.38C620.41,-156.84 608.53,-160.67 597.28,-164.29"/>
-<polygon fill="#000000" stroke="#000000" points="596.04,-161.01 587.59,-167.41 598.18,-167.68 596.04,-161.01"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_kick~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C493.33,-143.22 483.96,-165.22 430,-177.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-177.35C369.02,-190.62 358.44,-216.44 298,-217.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-217.35C271.53,-217.73 244.42,-217.78 221.48,-217.72"/>
-<polygon fill="#000000" stroke="#000000" points="221.27,-214.21 211.25,-217.68 221.24,-221.21 221.27,-214.21"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276,-112.58C254.8,-125.34 221.12,-145.6 197.01,-160.1"/>
+<polygon fill="#000000" stroke="#000000" points="195.05,-157.2 188.28,-165.35 198.66,-163.2 195.05,-157.2"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_kick~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.95,-138.89C604.32,-137.99 575.84,-137.58 550.5,-139.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C495.96,-143.03 482.54,-135.74 430,-139.35"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_kick~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-170.44C250.63,-179.27 224.44,-191.34 203.43,-201.03"/>
-<polygon fill="#000000" stroke="#000000" points="201.79,-197.92 194.18,-205.29 204.72,-204.28 201.79,-197.92"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-207.52C501.77,-202.99 487.08,-197.78 473.56,-192.99"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-189.63 463.96,-189.59 472.22,-196.23 474.56,-189.63"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_kick~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.12,-31.33C563.44,-10.78 411.42,24.29 298,-25.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-25.35C226.09,-59.78 188.52,-152.74 174.51,-195.41"/>
-<polygon fill="#000000" stroke="#000000" points="171.12,-194.51 171.45,-205.1 177.79,-196.62 171.12,-194.51"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_kick~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-216.03C477.17,-212.59 426.56,-206.67 383,-198.55 344.74,-191.42 336.91,-177.55 298,-177.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_kick~~UsesGraph_edge31" class="edge">
+<g id="module~~s_whm_kick~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-347.42C370.04,-361.71 317.13,-382.69 298,-375.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-375.35C233.63,-351.45 193.53,-276.57 176.85,-239.13"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-237.43 172.77,-229.63 173.51,-240.2 179.94,-237.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-335.55C233.63,-311.65 193.53,-236.77 176.85,-199.32"/>
+<polygon fill="#000000" stroke="#000000" points="179.94,-197.63 172.77,-189.83 173.51,-200.4 179.94,-197.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-307.62C370.04,-321.9 317.13,-342.88 298,-335.55"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_whm_kick~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_whm_kick~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-189.55 0,-189.55 0,-165.55 87,-165.55 87,-189.55"/>
+<text text-anchor="middle" x="43.5" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_whm_kick~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-177.55C114.58,-177.55 105.86,-177.55 97.36,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-174.05 87.13,-177.55 97.13,-181.05 97.13,-174.05"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_whm_setup.html b/docs/module/s_whm_setup.html
index 224855f9c..1f42d1488 100644
--- a/docs/module/s_whm_setup.html
+++ b/docs/module/s_whm_setup.html
@@ -249,312 +249,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_whm_setup~~UsesGraph Pages: 1 -->
-<svg id="modules_whm_setupUsesGraph" width="641pt" height="280pt"
- viewBox="0.00 0.00 641.00 279.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_whm_setup~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 401.31)">
+<svg id="modules_whm_setupUsesGraph" width="641pt" height="245pt"
+ viewBox="0.00 0.00 641.00 244.99" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_whm_setup~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 350.68)">
 <title>module~~s_whm_setup~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-401.31 924,-401.31 924,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-350.68 924,-350.68 924,4 -4,4"/>
 <!-- module~s_whm_setup -->
 <g id="module~~s_whm_setup~~UsesGraph_node1" class="node">
 <title>module~s_whm_setup</title>
-<polygon fill="none" stroke="black" points="920,-251.35 841,-251.35 841,-227.35 920,-227.35 920,-251.35"/>
-<text text-anchor="middle" x="880.5" y="-236.95" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_setup</text>
+<polygon fill="none" stroke="black" points="920,-211.55 841,-211.55 841,-187.55 920,-187.55 920,-211.55"/>
+<text text-anchor="middle" x="880.5" y="-197.15" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_setup</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_whm_setup~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_whm_setup~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-153.35 751,-153.35 751,-129.35 805,-129.35 805,-153.35"/>
-<text text-anchor="middle" x="778" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-231.55 751,-231.55 751,-207.55 805,-207.55 805,-231.55"/>
+<text text-anchor="middle" x="778" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_setup&#45;&gt;module~swiftest -->
 <g id="module~~s_whm_setup~~UsesGraph_edge1" class="edge">
 <title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M867.18,-227.34C850.07,-210.66 818.95,-180.31 798.63,-160.5"/>
-<polygon fill="#000000" stroke="#000000" points="801.03,-157.95 791.42,-153.47 796.14,-162.96 801.03,-157.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.93,-207.23C832.43,-208.92 823.46,-210.71 815.06,-212.38"/>
+<polygon fill="#000000" stroke="#000000" points="814.3,-208.96 805.18,-214.34 815.67,-215.82 814.3,-208.96"/>
 </g>
 <!-- module~whm_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_node3" class="node">
 <title>module~whm_classes</title>
 <g id="a_module~~s_whm_setup~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-229.35 391,-229.35 391,-205.35 467,-205.35 467,-229.35"/>
-<text text-anchor="middle" x="429" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-189.55 391,-189.55 391,-165.55 467,-165.55 467,-189.55"/>
+<text text-anchor="middle" x="429" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_setup&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge2" class="edge">
 <title>module~s_whm_setup&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M859.71,-251.49C802.83,-284.72 634.98,-370.96 511,-313.35 477.95,-298 453.53,-261.78 440.56,-238.48"/>
-<polygon fill="#000000" stroke="#000000" points="443.5,-236.56 435.71,-229.38 437.33,-239.85 443.5,-236.56"/>
+<path fill="none" stroke="#000000" d="M548.5,-179.55C525.17,-177.43 499.15,-176.8 477.45,-176.75"/>
+<polygon fill="#000000" stroke="#000000" points="477.16,-173.25 467.17,-176.77 477.18,-180.25 477.16,-173.25"/>
+<path fill="none" stroke="#000000" d="M840.95,-197.96C779.44,-195.26 655.36,-189.11 550.5,-179.55"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_setup~~UsesGraph_edge7" class="edge">
+<g id="module~~s_whm_setup~~UsesGraph_edge3" class="edge">
 <title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C626.35,-314.79 629.51,-255.43 588,-238.35 552.67,-223.82 509.49,-218.85 477.21,-217.36"/>
-<polygon fill="#000000" stroke="#000000" points="477.26,-213.86 467.14,-216.99 477,-220.86 477.26,-213.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C613.18,-217.02 605.65,-184.58 550.5,-179.55"/>
 </g>
 <!-- module~swiftest_operators -->
 <g id="module~~s_whm_setup~~UsesGraph_node4" class="node">
 <title>module~swiftest_operators</title>
 <g id="a_module~~s_whm_setup~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-288.35 247,-288.35 247,-264.35 347,-264.35 347,-288.35"/>
-<text text-anchor="middle" x="297" y="-273.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-248.55 247,-248.55 247,-224.55 347,-224.55 347,-248.55"/>
+<text text-anchor="middle" x="297" y="-234.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_whm_setup~~UsesGraph_edge3" class="edge">
+<g id="module~~s_whm_setup~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C619.4,-317.78 602.83,-295.9 550.5,-299.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C483.07,-303.68 408.21,-295.02 357.5,-287.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.8,-283.62 347.37,-285.5 356.69,-290.53 357.8,-283.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C515.87,-305.02 507.96,-282.79 475,-274.55 435.87,-264.77 391.49,-255.25 356.96,-248.18"/>
+<polygon fill="#000000" stroke="#000000" points="357.53,-244.73 347.04,-246.16 356.14,-251.59 357.53,-244.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C606.18,-216.7 610.22,-277.51 550.5,-295.55"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-271.35 511,-271.35 511,-247.35 588,-247.35 588,-271.35"/>
-<text text-anchor="middle" x="549.5" y="-256.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-73.55 627,-73.55 627,-49.55 712,-49.55 712,-73.55"/>
+<text text-anchor="middle" x="669.5" y="-59.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_setup~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C652.76,-305.12 612.83,-289.24 583.77,-275.82"/>
-<polygon fill="#000000" stroke="#000000" points="584.92,-272.49 574.38,-271.39 581.93,-278.82 584.92,-272.49"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_whm_setup~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.9,-207.23C767.04,-182.1 748.48,-124.18 715,-87.55 712.29,-84.59 709.17,-81.87 705.86,-79.39"/>
+<polygon fill="#000000" stroke="#000000" points="707.63,-76.37 697.37,-73.75 703.76,-82.2 707.63,-76.37"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-77.35 385.5,-77.35 385.5,-53.35 472.5,-53.35 472.5,-77.35"/>
-<text text-anchor="middle" x="429" y="-62.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-151.55 511.5,-151.55 511.5,-127.55 587.5,-127.55 587.5,-151.55"/>
+<text text-anchor="middle" x="549.5" y="-137.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.8,-129.76C729.54,-120.78 698.59,-108.68 670.5,-101.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-63.35C527.36,-58.7 503.57,-58.21 482.89,-59.24"/>
-<polygon fill="#000000" stroke="#000000" points="482.47,-55.76 472.71,-59.89 482.91,-62.75 482.47,-55.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C615.19,-87.45 604.31,-75.21 550.5,-63.35"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-220.22C729.16,-220.61 697.84,-220.8 670.5,-219.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C667.13,-219.49 611.14,-181.2 576.79,-157.62"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-154.47 568.15,-151.69 574.41,-160.24 578.38,-154.47"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-191.35 511.5,-191.35 511.5,-167.35 587.5,-167.35 587.5,-191.35"/>
-<text text-anchor="middle" x="549.5" y="-176.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-33.55 385.5,-33.55 385.5,-9.55 472.5,-9.55 472.5,-33.55"/>
+<text text-anchor="middle" x="429" y="-19.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_whm_setup~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C616.85,-318.27 628.82,-242.22 588,-205.35 584.98,-202.63 581.66,-199.94 578.28,-197.4"/>
-<polygon fill="#000000" stroke="#000000" points="580.08,-194.38 569.9,-191.42 576.01,-200.08 580.08,-194.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.99,-153.44C765.03,-186.18 735.11,-275.69 670.5,-299.35"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_whm_setup~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M777.01,-207.41C776.32,-174.29 769.38,-82.06 715,-40.55 648.16,10.46 544.83,2.24 482.68,-9.14"/>
+<polygon fill="#000000" stroke="#000000" points="481.85,-5.73 472.69,-11.06 483.17,-12.61 481.85,-5.73"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_whm_setup~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-229.35 123,-229.35 123,-205.35 211,-205.35 211,-229.35"/>
-<text text-anchor="middle" x="167" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-309.55 624,-309.55 624,-285.55 715,-285.55 715,-309.55"/>
+<text text-anchor="middle" x="669.5" y="-295.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_whm_setup~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C511.12,-358.4 454.96,-435.51 298,-375.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-231.74C742.93,-244.5 715.36,-264.7 695.35,-279.35"/>
+<polygon fill="#000000" stroke="#000000" points="693.02,-276.72 687.02,-285.45 697.16,-282.37 693.02,-276.72"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-153.35 627,-153.35 627,-129.35 712,-129.35 712,-153.35"/>
-<text text-anchor="middle" x="669.5" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-112.55 252.5,-112.55 252.5,-88.55 341.5,-88.55 341.5,-112.55"/>
+<text text-anchor="middle" x="297" y="-98.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-141.35C742.26,-141.35 732.26,-141.35 722.32,-141.35"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-137.85 712.05,-141.35 722.05,-144.85 722.05,-137.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.35,-207.43C728.67,-185.11 656.72,-138.04 588,-118.55 508.11,-95.89 411.05,-94.93 351.94,-97.13"/>
+<polygon fill="#000000" stroke="#000000" points="351.56,-93.65 341.71,-97.56 351.85,-100.64 351.56,-93.65"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-170.35 252.5,-170.35 252.5,-146.35 341.5,-146.35 341.5,-170.35"/>
-<text text-anchor="middle" x="297" y="-155.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-231.55 511,-231.55 511,-207.55 588,-207.55 588,-231.55"/>
+<text text-anchor="middle" x="549.5" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-139.35C402.83,-141.09 375.13,-144.87 351.8,-148.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.05,-145.18 341.75,-150.26 352.18,-152.09 351.05,-145.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C564.64,-74.27 537.08,-131.98 430,-139.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C645.46,-218.5 619.87,-218.37 598.42,-218.56"/>
+<polygon fill="#000000" stroke="#000000" points="598.21,-215.06 588.25,-218.68 598.29,-222.06 598.21,-215.06"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-55.35 624,-55.35 624,-31.35 715,-31.35 715,-55.35"/>
-<text text-anchor="middle" x="669.5" y="-40.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-307.55 383,-307.55 383,-283.55 475,-283.55 475,-307.55"/>
+<text text-anchor="middle" x="429" y="-293.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-129.34C745.82,-112.66 712.84,-82.31 691.3,-62.5"/>
-<polygon fill="#000000" stroke="#000000" points="693.39,-59.67 683.67,-55.47 688.65,-64.82 693.39,-59.67"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C528.3,-301.41 505.34,-302.59 485.04,-301.89"/>
+<polygon fill="#000000" stroke="#000000" points="485.17,-298.4 475,-301.39 484.82,-305.39 485.17,-298.4"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_whm_setup~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-347.35 383,-347.35 383,-323.35 475,-323.35 475,-347.35"/>
-<text text-anchor="middle" x="429" y="-332.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-189.55 123,-189.55 123,-165.55 211,-165.55 211,-189.55"/>
+<text text-anchor="middle" x="167" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_setup~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C520.15,-301.23 489.5,-310.76 466.47,-319.54"/>
-<polygon fill="#000000" stroke="#000000" points="465.12,-316.31 457.1,-323.23 467.69,-322.82 465.12,-316.31"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_setup~~UsesGraph_edge13" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-217.35C364.75,-217.35 329.26,-217.35 298,-217.35"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-335.55C370.6,-342.13 351.95,-356.23 298,-335.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C521.89,-303.59 457.61,-332.39 430,-335.55"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge14" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-205.27C381.92,-196.44 355.32,-184.37 333.98,-174.68"/>
-<polygon fill="#000000" stroke="#000000" points="335.14,-171.37 324.59,-170.42 332.25,-177.74 335.14,-171.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.9,-165.46C399.34,-161.1 390.77,-156.13 383,-151.55 364.11,-140.43 342.97,-127.74 326.49,-117.81"/>
+<polygon fill="#000000" stroke="#000000" points="328.24,-114.77 317.87,-112.6 324.62,-120.76 328.24,-114.77"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_setup~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-177.55C364.75,-177.55 329.26,-177.55 298,-177.55"/>
 </g>
 <!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_setup~~UsesGraph_edge15" class="edge">
 <title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-264.27C250.63,-255.44 224.44,-243.37 203.43,-233.68"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-230.43 194.18,-229.42 201.79,-236.78 204.72,-230.43"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_setup~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-247.32C501.77,-242.79 487.08,-237.58 473.56,-232.79"/>
-<polygon fill="#000000" stroke="#000000" points="474.56,-229.43 463.96,-229.39 472.22,-236.03 474.56,-229.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-224.47C250.63,-215.64 224.44,-203.57 203.43,-193.88"/>
+<polygon fill="#000000" stroke="#000000" points="204.72,-190.63 194.18,-189.62 201.79,-196.98 204.72,-190.63"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_setup~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-255.83C477.17,-252.39 426.56,-246.47 383,-238.35 344.74,-231.23 336.91,-217.35 298,-217.35"/>
-</g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.6,-53.26C370.42,-38.68 316.87,-17.09 298,-25.35"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.32,-73.57C630.8,-86.47 599.59,-107.1 577.27,-121.86"/>
+<polygon fill="#000000" stroke="#000000" points="575.31,-118.96 568.89,-127.39 579.17,-124.8 575.31,-118.96"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-77.51C388.62,-93.53 349.08,-121.82 323.2,-140.32"/>
-<polygon fill="#000000" stroke="#000000" points="321.1,-137.53 315,-146.19 325.17,-143.22 321.1,-137.53"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C518.77,-59.1 486.83,-47.76 463.6,-37.78"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-34.47 454.22,-33.62 461.94,-40.87 464.78,-34.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-63.22C604.29,-63.7 575.82,-63.64 550.5,-61.55"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_setup~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C395.49,-63.88 360.16,-75.08 334.54,-84.88"/>
+<polygon fill="#000000" stroke="#000000" points="333.25,-81.63 325.23,-88.55 335.82,-88.14 333.25,-81.63"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_setup~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C496.01,-57.23 482.53,-57.79 430,-61.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C370.37,-65.68 350.33,-36.05 298,-60.55"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_setup~~UsesGraph_edge22" class="edge">
+<g id="module~~s_whm_setup~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-191.27C500.41,-194.78 488.32,-198.65 476.88,-202.32"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-199.09 467.04,-205.48 477.63,-205.76 475.49,-199.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_setup~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.48,-174.28C487.87,-172.13 456.8,-171.33 430,-177.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-151.47C500.41,-154.97 488.32,-158.85 476.88,-162.52"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-159.29 467.04,-165.68 477.63,-165.96 475.49,-159.29"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_whm_setup~~UsesGraph_edge21" class="edge">
+<g id="module~~s_whm_setup~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.61,-167.31C505.58,-154.65 466.18,-136.86 430,-139.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-138.66C488.05,-138.16 457.26,-137.62 430,-137.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C395.12,-137.47 359.3,-126.39 333.59,-116.38"/>
+<polygon fill="#000000" stroke="#000000" points="334.85,-113.12 324.27,-112.63 332.23,-119.61 334.85,-113.12"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_whm_setup~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_whm_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-229.35 0,-229.35 0,-205.35 87,-205.35 87,-229.35"/>
-<text text-anchor="middle" x="43.5" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_setup~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C367.55,-137.39 358.45,-177.55 298,-177.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-177.55C271.53,-177.55 244.42,-177.55 221.48,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-174.05 211.25,-177.55 221.25,-181.05 221.25,-174.05"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_setup~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-33.73C398.36,-37.93 390.23,-42.78 383,-47.55 366.31,-58.58 363.88,-63.83 347,-74.55 342.17,-77.62 336.95,-80.66 331.77,-83.52"/>
+<polygon fill="#000000" stroke="#000000" points="329.75,-80.64 322.6,-88.46 333.07,-86.8 329.75,-80.64"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_setup~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-217.35C114.58,-217.35 105.86,-217.35 97.36,-217.35"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-213.85 87.13,-217.35 97.13,-220.85 97.13,-213.85"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_setup~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.32,-153.54C635.91,-173.94 594.66,-215.19 570.13,-239.73"/>
-<polygon fill="#000000" stroke="#000000" points="567.39,-237.51 562.79,-247.06 572.34,-242.46 567.39,-237.51"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.28,-31.01C359.34,-37.56 325.96,-47.46 298,-60.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-60.55C274.85,-70.46 265.86,-65.77 247,-79.55 218.13,-100.65 193.89,-134.81 180.16,-156.72"/>
+<polygon fill="#000000" stroke="#000000" points="177.15,-154.93 174.93,-165.29 183.13,-158.57 177.15,-154.93"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_setup~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647,-129.29C639.62,-125.03 631.37,-120.1 624,-115.35 590.36,-93.68 589.58,-71.96 550.5,-63.35"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.91,-306.73C576.18,-316.07 498.11,-329.94 430,-335.55"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_setup~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-153.38C620.41,-156.84 608.53,-160.67 597.28,-164.29"/>
-<polygon fill="#000000" stroke="#000000" points="596.04,-161.01 587.59,-167.41 598.18,-167.68 596.04,-161.01"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_setup~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C493.33,-143.22 483.96,-165.22 430,-177.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-177.35C369.02,-190.62 358.44,-216.44 298,-217.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-217.35C271.53,-217.73 244.42,-217.78 221.48,-217.72"/>
-<polygon fill="#000000" stroke="#000000" points="221.27,-214.21 211.25,-217.68 221.24,-221.21 221.27,-214.21"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276,-112.58C254.8,-125.34 221.12,-145.6 197.01,-160.1"/>
+<polygon fill="#000000" stroke="#000000" points="195.05,-157.2 188.28,-165.35 198.66,-163.2 195.05,-157.2"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_setup~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.95,-138.89C604.32,-137.99 575.84,-137.58 550.5,-139.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C495.96,-143.03 482.54,-135.74 430,-139.35"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_setup~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-170.44C250.63,-179.27 224.44,-191.34 203.43,-201.03"/>
-<polygon fill="#000000" stroke="#000000" points="201.79,-197.92 194.18,-205.29 204.72,-204.28 201.79,-197.92"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-207.52C501.77,-202.99 487.08,-197.78 473.56,-192.99"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-189.63 463.96,-189.59 472.22,-196.23 474.56,-189.63"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_setup~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.12,-31.33C563.44,-10.78 411.42,24.29 298,-25.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-25.35C226.09,-59.78 188.52,-152.74 174.51,-195.41"/>
-<polygon fill="#000000" stroke="#000000" points="171.12,-194.51 171.45,-205.1 177.79,-196.62 171.12,-194.51"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_setup~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-216.03C477.17,-212.59 426.56,-206.67 383,-198.55 344.74,-191.42 336.91,-177.55 298,-177.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_setup~~UsesGraph_edge31" class="edge">
+<g id="module~~s_whm_setup~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-347.42C370.04,-361.71 317.13,-382.69 298,-375.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-375.35C233.63,-351.45 193.53,-276.57 176.85,-239.13"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-237.43 172.77,-229.63 173.51,-240.2 179.94,-237.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-335.55C233.63,-311.65 193.53,-236.77 176.85,-199.32"/>
+<polygon fill="#000000" stroke="#000000" points="179.94,-197.63 172.77,-189.83 173.51,-200.4 179.94,-197.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-307.62C370.04,-321.9 317.13,-342.88 298,-335.55"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_whm_setup~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_whm_setup~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-189.55 0,-189.55 0,-165.55 87,-165.55 87,-189.55"/>
+<text text-anchor="middle" x="43.5" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_whm_setup~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-177.55C114.58,-177.55 105.86,-177.55 97.36,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-174.05 87.13,-177.55 97.13,-181.05 97.13,-174.05"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_whm_step.html b/docs/module/s_whm_step.html
index b419f3816..ef8a7fb75 100644
--- a/docs/module/s_whm_step.html
+++ b/docs/module/s_whm_step.html
@@ -249,312 +249,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_whm_step~~UsesGraph Pages: 1 -->
-<svg id="modules_whm_stepUsesGraph" width="641pt" height="282pt"
- viewBox="0.00 0.00 641.00 281.79" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_whm_step~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 401.31)">
+<svg id="modules_whm_stepUsesGraph" width="641pt" height="247pt"
+ viewBox="0.00 0.00 641.00 246.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_whm_step~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 350.68)">
 <title>module~~s_whm_step~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-401.31 918,-401.31 918,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-350.68 918,-350.68 918,4 -4,4"/>
 <!-- module~s_whm_step -->
 <g id="module~~s_whm_step~~UsesGraph_node1" class="node">
 <title>module~s_whm_step</title>
-<polygon fill="none" stroke="black" points="914,-251.35 841,-251.35 841,-227.35 914,-227.35 914,-251.35"/>
-<text text-anchor="middle" x="877.5" y="-236.95" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_step</text>
+<polygon fill="none" stroke="black" points="914,-211.55 841,-211.55 841,-187.55 914,-187.55 914,-211.55"/>
+<text text-anchor="middle" x="877.5" y="-197.15" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_step</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_whm_step~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_whm_step~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-153.35 751,-153.35 751,-129.35 805,-129.35 805,-153.35"/>
-<text text-anchor="middle" x="778" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-231.55 751,-231.55 751,-207.55 805,-207.55 805,-231.55"/>
+<text text-anchor="middle" x="778" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_step&#45;&gt;module~swiftest -->
 <g id="module~~s_whm_step~~UsesGraph_edge1" class="edge">
 <title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M864.54,-227.34C848.02,-210.73 818.03,-180.58 798.31,-160.76"/>
-<polygon fill="#000000" stroke="#000000" points="800.59,-158.09 791.05,-153.47 795.62,-163.03 800.59,-158.09"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.75,-206.89C832.4,-208.6 823.51,-210.42 815.15,-212.14"/>
+<polygon fill="#000000" stroke="#000000" points="814.37,-208.72 805.28,-214.16 815.78,-215.58 814.37,-208.72"/>
 </g>
 <!-- module~whm_classes -->
 <g id="module~~s_whm_step~~UsesGraph_node3" class="node">
 <title>module~whm_classes</title>
 <g id="a_module~~s_whm_step~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-229.35 391,-229.35 391,-205.35 467,-205.35 467,-229.35"/>
-<text text-anchor="middle" x="429" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-189.55 391,-189.55 391,-165.55 467,-165.55 467,-189.55"/>
+<text text-anchor="middle" x="429" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_step&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge2" class="edge">
 <title>module~s_whm_step&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M856.88,-251.45C800.47,-284.56 634.01,-370.51 511,-313.35 477.95,-298 453.53,-261.78 440.56,-238.48"/>
-<polygon fill="#000000" stroke="#000000" points="443.5,-236.56 435.71,-229.38 437.33,-239.85 443.5,-236.56"/>
+<path fill="none" stroke="#000000" d="M548.5,-179.55C525.17,-177.43 499.15,-176.8 477.45,-176.75"/>
+<polygon fill="#000000" stroke="#000000" points="477.16,-173.25 467.17,-176.77 477.18,-180.25 477.16,-173.25"/>
+<path fill="none" stroke="#000000" d="M840.75,-198.05C780.7,-195.38 655.82,-189.15 550.5,-179.55"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_step~~UsesGraph_edge7" class="edge">
+<g id="module~~s_whm_step~~UsesGraph_edge3" class="edge">
 <title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C626.35,-314.79 629.51,-255.43 588,-238.35 552.67,-223.82 509.49,-218.85 477.21,-217.36"/>
-<polygon fill="#000000" stroke="#000000" points="477.26,-213.86 467.14,-216.99 477,-220.86 477.26,-213.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C613.18,-217.02 605.65,-184.58 550.5,-179.55"/>
 </g>
 <!-- module~swiftest_operators -->
 <g id="module~~s_whm_step~~UsesGraph_node4" class="node">
 <title>module~swiftest_operators</title>
 <g id="a_module~~s_whm_step~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-288.35 247,-288.35 247,-264.35 347,-264.35 347,-288.35"/>
-<text text-anchor="middle" x="297" y="-273.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-248.55 247,-248.55 247,-224.55 347,-224.55 347,-248.55"/>
+<text text-anchor="middle" x="297" y="-234.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_whm_step~~UsesGraph_edge3" class="edge">
+<g id="module~~s_whm_step~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C619.4,-317.78 602.83,-295.9 550.5,-299.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C483.07,-303.68 408.21,-295.02 357.5,-287.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.8,-283.62 347.37,-285.5 356.69,-290.53 357.8,-283.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C515.87,-305.02 507.96,-282.79 475,-274.55 435.87,-264.77 391.49,-255.25 356.96,-248.18"/>
+<polygon fill="#000000" stroke="#000000" points="357.53,-244.73 347.04,-246.16 356.14,-251.59 357.53,-244.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C606.18,-216.7 610.22,-277.51 550.5,-295.55"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_whm_step~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-271.35 511,-271.35 511,-247.35 588,-247.35 588,-271.35"/>
-<text text-anchor="middle" x="549.5" y="-256.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-73.55 627,-73.55 627,-49.55 712,-49.55 712,-73.55"/>
+<text text-anchor="middle" x="669.5" y="-59.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_step~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C652.76,-305.12 612.83,-289.24 583.77,-275.82"/>
-<polygon fill="#000000" stroke="#000000" points="584.92,-272.49 574.38,-271.39 581.93,-278.82 584.92,-272.49"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_whm_step~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.9,-207.23C767.04,-182.1 748.48,-124.18 715,-87.55 712.29,-84.59 709.17,-81.87 705.86,-79.39"/>
+<polygon fill="#000000" stroke="#000000" points="707.63,-76.37 697.37,-73.75 703.76,-82.2 707.63,-76.37"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_whm_step~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-77.35 385.5,-77.35 385.5,-53.35 472.5,-53.35 472.5,-77.35"/>
-<text text-anchor="middle" x="429" y="-62.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-151.55 511.5,-151.55 511.5,-127.55 587.5,-127.55 587.5,-151.55"/>
+<text text-anchor="middle" x="549.5" y="-137.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.8,-129.76C729.54,-120.78 698.59,-108.68 670.5,-101.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-63.35C527.36,-58.7 503.57,-58.21 482.89,-59.24"/>
-<polygon fill="#000000" stroke="#000000" points="482.47,-55.76 472.71,-59.89 482.91,-62.75 482.47,-55.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C615.19,-87.45 604.31,-75.21 550.5,-63.35"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-220.22C729.16,-220.61 697.84,-220.8 670.5,-219.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C667.13,-219.49 611.14,-181.2 576.79,-157.62"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-154.47 568.15,-151.69 574.41,-160.24 578.38,-154.47"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_whm_step~~UsesGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-191.35 511.5,-191.35 511.5,-167.35 587.5,-167.35 587.5,-191.35"/>
-<text text-anchor="middle" x="549.5" y="-176.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-33.55 385.5,-33.55 385.5,-9.55 472.5,-9.55 472.5,-33.55"/>
+<text text-anchor="middle" x="429" y="-19.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_whm_step~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C616.85,-318.27 628.82,-242.22 588,-205.35 584.98,-202.63 581.66,-199.94 578.28,-197.4"/>
-<polygon fill="#000000" stroke="#000000" points="580.08,-194.38 569.9,-191.42 576.01,-200.08 580.08,-194.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.99,-153.44C765.03,-186.18 735.11,-275.69 670.5,-299.35"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_whm_step~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M777.01,-207.41C776.32,-174.29 769.38,-82.06 715,-40.55 648.16,10.46 544.83,2.24 482.68,-9.14"/>
+<polygon fill="#000000" stroke="#000000" points="481.85,-5.73 472.69,-11.06 483.17,-12.61 481.85,-5.73"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_whm_step~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-229.35 123,-229.35 123,-205.35 211,-205.35 211,-229.35"/>
-<text text-anchor="middle" x="167" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-309.55 624,-309.55 624,-285.55 715,-285.55 715,-309.55"/>
+<text text-anchor="middle" x="669.5" y="-295.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_whm_step~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C511.12,-358.4 454.96,-435.51 298,-375.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-231.74C742.93,-244.5 715.36,-264.7 695.35,-279.35"/>
+<polygon fill="#000000" stroke="#000000" points="693.02,-276.72 687.02,-285.45 697.16,-282.37 693.02,-276.72"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_whm_step~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-153.35 627,-153.35 627,-129.35 712,-129.35 712,-153.35"/>
-<text text-anchor="middle" x="669.5" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-112.55 252.5,-112.55 252.5,-88.55 341.5,-88.55 341.5,-112.55"/>
+<text text-anchor="middle" x="297" y="-98.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-141.35C742.26,-141.35 732.26,-141.35 722.32,-141.35"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-137.85 712.05,-141.35 722.05,-144.85 722.05,-137.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.35,-207.43C728.67,-185.11 656.72,-138.04 588,-118.55 508.11,-95.89 411.05,-94.93 351.94,-97.13"/>
+<polygon fill="#000000" stroke="#000000" points="351.56,-93.65 341.71,-97.56 351.85,-100.64 351.56,-93.65"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_whm_step~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-170.35 252.5,-170.35 252.5,-146.35 341.5,-146.35 341.5,-170.35"/>
-<text text-anchor="middle" x="297" y="-155.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-231.55 511,-231.55 511,-207.55 588,-207.55 588,-231.55"/>
+<text text-anchor="middle" x="549.5" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-139.35C402.83,-141.09 375.13,-144.87 351.8,-148.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.05,-145.18 341.75,-150.26 352.18,-152.09 351.05,-145.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C564.64,-74.27 537.08,-131.98 430,-139.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C645.46,-218.5 619.87,-218.37 598.42,-218.56"/>
+<polygon fill="#000000" stroke="#000000" points="598.21,-215.06 588.25,-218.68 598.29,-222.06 598.21,-215.06"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_whm_step~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-55.35 624,-55.35 624,-31.35 715,-31.35 715,-55.35"/>
-<text text-anchor="middle" x="669.5" y="-40.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-307.55 383,-307.55 383,-283.55 475,-283.55 475,-307.55"/>
+<text text-anchor="middle" x="429" y="-293.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-129.34C745.82,-112.66 712.84,-82.31 691.3,-62.5"/>
-<polygon fill="#000000" stroke="#000000" points="693.39,-59.67 683.67,-55.47 688.65,-64.82 693.39,-59.67"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C528.3,-301.41 505.34,-302.59 485.04,-301.89"/>
+<polygon fill="#000000" stroke="#000000" points="485.17,-298.4 475,-301.39 484.82,-305.39 485.17,-298.4"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_whm_step~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-347.35 383,-347.35 383,-323.35 475,-323.35 475,-347.35"/>
-<text text-anchor="middle" x="429" y="-332.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-189.55 123,-189.55 123,-165.55 211,-165.55 211,-189.55"/>
+<text text-anchor="middle" x="167" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_step~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C520.15,-301.23 489.5,-310.76 466.47,-319.54"/>
-<polygon fill="#000000" stroke="#000000" points="465.12,-316.31 457.1,-323.23 467.69,-322.82 465.12,-316.31"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_step~~UsesGraph_edge13" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-217.35C364.75,-217.35 329.26,-217.35 298,-217.35"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-335.55C370.6,-342.13 351.95,-356.23 298,-335.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C521.89,-303.59 457.61,-332.39 430,-335.55"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge14" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-205.27C381.92,-196.44 355.32,-184.37 333.98,-174.68"/>
-<polygon fill="#000000" stroke="#000000" points="335.14,-171.37 324.59,-170.42 332.25,-177.74 335.14,-171.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.9,-165.46C399.34,-161.1 390.77,-156.13 383,-151.55 364.11,-140.43 342.97,-127.74 326.49,-117.81"/>
+<polygon fill="#000000" stroke="#000000" points="328.24,-114.77 317.87,-112.6 324.62,-120.76 328.24,-114.77"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_step~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-177.55C364.75,-177.55 329.26,-177.55 298,-177.55"/>
 </g>
 <!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_step~~UsesGraph_edge15" class="edge">
 <title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-264.27C250.63,-255.44 224.44,-243.37 203.43,-233.68"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-230.43 194.18,-229.42 201.79,-236.78 204.72,-230.43"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_step~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-247.32C501.77,-242.79 487.08,-237.58 473.56,-232.79"/>
-<polygon fill="#000000" stroke="#000000" points="474.56,-229.43 463.96,-229.39 472.22,-236.03 474.56,-229.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-224.47C250.63,-215.64 224.44,-203.57 203.43,-193.88"/>
+<polygon fill="#000000" stroke="#000000" points="204.72,-190.63 194.18,-189.62 201.79,-196.98 204.72,-190.63"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_step~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-255.83C477.17,-252.39 426.56,-246.47 383,-238.35 344.74,-231.23 336.91,-217.35 298,-217.35"/>
-</g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.6,-53.26C370.42,-38.68 316.87,-17.09 298,-25.35"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.32,-73.57C630.8,-86.47 599.59,-107.1 577.27,-121.86"/>
+<polygon fill="#000000" stroke="#000000" points="575.31,-118.96 568.89,-127.39 579.17,-124.8 575.31,-118.96"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-77.51C388.62,-93.53 349.08,-121.82 323.2,-140.32"/>
-<polygon fill="#000000" stroke="#000000" points="321.1,-137.53 315,-146.19 325.17,-143.22 321.1,-137.53"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C518.77,-59.1 486.83,-47.76 463.6,-37.78"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-34.47 454.22,-33.62 461.94,-40.87 464.78,-34.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-63.22C604.29,-63.7 575.82,-63.64 550.5,-61.55"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_step~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C395.49,-63.88 360.16,-75.08 334.54,-84.88"/>
+<polygon fill="#000000" stroke="#000000" points="333.25,-81.63 325.23,-88.55 335.82,-88.14 333.25,-81.63"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_step~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C496.01,-57.23 482.53,-57.79 430,-61.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C370.37,-65.68 350.33,-36.05 298,-60.55"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_step~~UsesGraph_edge22" class="edge">
+<g id="module~~s_whm_step~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-191.27C500.41,-194.78 488.32,-198.65 476.88,-202.32"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-199.09 467.04,-205.48 477.63,-205.76 475.49,-199.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_step~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.48,-174.28C487.87,-172.13 456.8,-171.33 430,-177.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-151.47C500.41,-154.97 488.32,-158.85 476.88,-162.52"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-159.29 467.04,-165.68 477.63,-165.96 475.49,-159.29"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_whm_step~~UsesGraph_edge21" class="edge">
+<g id="module~~s_whm_step~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.61,-167.31C505.58,-154.65 466.18,-136.86 430,-139.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-138.66C488.05,-138.16 457.26,-137.62 430,-137.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C395.12,-137.47 359.3,-126.39 333.59,-116.38"/>
+<polygon fill="#000000" stroke="#000000" points="334.85,-113.12 324.27,-112.63 332.23,-119.61 334.85,-113.12"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_whm_step~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_whm_step~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-229.35 0,-229.35 0,-205.35 87,-205.35 87,-229.35"/>
-<text text-anchor="middle" x="43.5" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_step~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C367.55,-137.39 358.45,-177.55 298,-177.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-177.55C271.53,-177.55 244.42,-177.55 221.48,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-174.05 211.25,-177.55 221.25,-181.05 221.25,-174.05"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_step~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-33.73C398.36,-37.93 390.23,-42.78 383,-47.55 366.31,-58.58 363.88,-63.83 347,-74.55 342.17,-77.62 336.95,-80.66 331.77,-83.52"/>
+<polygon fill="#000000" stroke="#000000" points="329.75,-80.64 322.6,-88.46 333.07,-86.8 329.75,-80.64"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_step~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-217.35C114.58,-217.35 105.86,-217.35 97.36,-217.35"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-213.85 87.13,-217.35 97.13,-220.85 97.13,-213.85"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_step~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.32,-153.54C635.91,-173.94 594.66,-215.19 570.13,-239.73"/>
-<polygon fill="#000000" stroke="#000000" points="567.39,-237.51 562.79,-247.06 572.34,-242.46 567.39,-237.51"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.28,-31.01C359.34,-37.56 325.96,-47.46 298,-60.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-60.55C274.85,-70.46 265.86,-65.77 247,-79.55 218.13,-100.65 193.89,-134.81 180.16,-156.72"/>
+<polygon fill="#000000" stroke="#000000" points="177.15,-154.93 174.93,-165.29 183.13,-158.57 177.15,-154.93"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_step~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647,-129.29C639.62,-125.03 631.37,-120.1 624,-115.35 590.36,-93.68 589.58,-71.96 550.5,-63.35"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.91,-306.73C576.18,-316.07 498.11,-329.94 430,-335.55"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_step~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-153.38C620.41,-156.84 608.53,-160.67 597.28,-164.29"/>
-<polygon fill="#000000" stroke="#000000" points="596.04,-161.01 587.59,-167.41 598.18,-167.68 596.04,-161.01"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_step~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C493.33,-143.22 483.96,-165.22 430,-177.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-177.35C369.02,-190.62 358.44,-216.44 298,-217.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-217.35C271.53,-217.73 244.42,-217.78 221.48,-217.72"/>
-<polygon fill="#000000" stroke="#000000" points="221.27,-214.21 211.25,-217.68 221.24,-221.21 221.27,-214.21"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276,-112.58C254.8,-125.34 221.12,-145.6 197.01,-160.1"/>
+<polygon fill="#000000" stroke="#000000" points="195.05,-157.2 188.28,-165.35 198.66,-163.2 195.05,-157.2"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_step~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.95,-138.89C604.32,-137.99 575.84,-137.58 550.5,-139.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C495.96,-143.03 482.54,-135.74 430,-139.35"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_step~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-170.44C250.63,-179.27 224.44,-191.34 203.43,-201.03"/>
-<polygon fill="#000000" stroke="#000000" points="201.79,-197.92 194.18,-205.29 204.72,-204.28 201.79,-197.92"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-207.52C501.77,-202.99 487.08,-197.78 473.56,-192.99"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-189.63 463.96,-189.59 472.22,-196.23 474.56,-189.63"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_step~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.12,-31.33C563.44,-10.78 411.42,24.29 298,-25.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-25.35C226.09,-59.78 188.52,-152.74 174.51,-195.41"/>
-<polygon fill="#000000" stroke="#000000" points="171.12,-194.51 171.45,-205.1 177.79,-196.62 171.12,-194.51"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_step~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-216.03C477.17,-212.59 426.56,-206.67 383,-198.55 344.74,-191.42 336.91,-177.55 298,-177.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_step~~UsesGraph_edge31" class="edge">
+<g id="module~~s_whm_step~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-347.42C370.04,-361.71 317.13,-382.69 298,-375.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-375.35C233.63,-351.45 193.53,-276.57 176.85,-239.13"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-237.43 172.77,-229.63 173.51,-240.2 179.94,-237.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-335.55C233.63,-311.65 193.53,-236.77 176.85,-199.32"/>
+<polygon fill="#000000" stroke="#000000" points="179.94,-197.63 172.77,-189.83 173.51,-200.4 179.94,-197.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-307.62C370.04,-321.9 317.13,-342.88 298,-335.55"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_whm_step~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_whm_step~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-189.55 0,-189.55 0,-165.55 87,-165.55 87,-189.55"/>
+<text text-anchor="middle" x="43.5" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_whm_step~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-177.55C114.58,-177.55 105.86,-177.55 97.36,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-174.05 87.13,-177.55 97.13,-181.05 97.13,-174.05"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/s_whm_util.html b/docs/module/s_whm_util.html
index 313d1cbed..81a87d149 100644
--- a/docs/module/s_whm_util.html
+++ b/docs/module/s_whm_util.html
@@ -257,312 +257,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~s_whm_util~~UsesGraph Pages: 1 -->
-<svg id="modules_whm_utilUsesGraph" width="641pt" height="284pt"
- viewBox="0.00 0.00 641.00 283.94" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~s_whm_util~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 401.31)">
+<svg id="modules_whm_utilUsesGraph" width="641pt" height="248pt"
+ viewBox="0.00 0.00 641.00 248.47" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~s_whm_util~~UsesGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 350.68)">
 <title>module~~s_whm_util~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-401.31 911,-401.31 911,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-350.68 911,-350.68 911,4 -4,4"/>
 <!-- module~s_whm_util -->
 <g id="module~~s_whm_util~~UsesGraph_node1" class="node">
 <title>module~s_whm_util</title>
-<polygon fill="none" stroke="black" points="907,-251.35 841,-251.35 841,-227.35 907,-227.35 907,-251.35"/>
-<text text-anchor="middle" x="874" y="-236.95" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_util</text>
+<polygon fill="none" stroke="black" points="907,-211.55 841,-211.55 841,-187.55 907,-187.55 907,-211.55"/>
+<text text-anchor="middle" x="874" y="-197.15" font-family="Helvetica,sans-Serif" font-size="10.50">s_whm_util</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~s_whm_util~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~s_whm_util~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-153.35 751,-153.35 751,-129.35 805,-129.35 805,-153.35"/>
-<text text-anchor="middle" x="778" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-231.55 751,-231.55 751,-207.55 805,-207.55 805,-231.55"/>
+<text text-anchor="middle" x="778" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_util&#45;&gt;module~swiftest -->
 <g id="module~~s_whm_util~~UsesGraph_edge1" class="edge">
 <title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M861.47,-227.34C845.55,-210.73 816.63,-180.58 797.61,-160.76"/>
-<polygon fill="#000000" stroke="#000000" points="800.07,-158.26 790.62,-153.47 795.02,-163.11 800.07,-158.26"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.91,-206.38C832.59,-208.15 823.58,-210.07 815.07,-211.88"/>
+<polygon fill="#000000" stroke="#000000" points="814.08,-208.51 805.03,-214.02 815.54,-215.36 814.08,-208.51"/>
 </g>
 <!-- module~whm_classes -->
 <g id="module~~s_whm_util~~UsesGraph_node3" class="node">
 <title>module~whm_classes</title>
 <g id="a_module~~s_whm_util~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-229.35 391,-229.35 391,-205.35 467,-205.35 467,-229.35"/>
-<text text-anchor="middle" x="429" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-189.55 391,-189.55 391,-165.55 467,-165.55 467,-189.55"/>
+<text text-anchor="middle" x="429" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_util&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge2" class="edge">
 <title>module~s_whm_util&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M853.57,-251.4C797.71,-284.37 632.87,-369.98 511,-313.35 477.95,-298 453.53,-261.78 440.56,-238.48"/>
-<polygon fill="#000000" stroke="#000000" points="443.5,-236.56 435.71,-229.38 437.33,-239.85 443.5,-236.56"/>
+<path fill="none" stroke="#000000" d="M548.5,-179.55C525.17,-177.43 499.15,-176.8 477.45,-176.75"/>
+<polygon fill="#000000" stroke="#000000" points="477.16,-173.25 467.17,-176.77 477.18,-180.25 477.16,-173.25"/>
+<path fill="none" stroke="#000000" d="M840.91,-198.18C782.88,-195.56 656.64,-189.23 550.5,-179.55"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_util~~UsesGraph_edge7" class="edge">
+<g id="module~~s_whm_util~~UsesGraph_edge3" class="edge">
 <title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C626.35,-314.79 629.51,-255.43 588,-238.35 552.67,-223.82 509.49,-218.85 477.21,-217.36"/>
-<polygon fill="#000000" stroke="#000000" points="477.26,-213.86 467.14,-216.99 477,-220.86 477.26,-213.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C613.18,-217.02 605.65,-184.58 550.5,-179.55"/>
 </g>
 <!-- module~swiftest_operators -->
 <g id="module~~s_whm_util~~UsesGraph_node4" class="node">
 <title>module~swiftest_operators</title>
 <g id="a_module~~s_whm_util~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-288.35 247,-288.35 247,-264.35 347,-264.35 347,-288.35"/>
-<text text-anchor="middle" x="297" y="-273.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-248.55 247,-248.55 247,-224.55 347,-224.55 347,-248.55"/>
+<text text-anchor="middle" x="297" y="-234.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~s_whm_util~~UsesGraph_edge3" class="edge">
+<g id="module~~s_whm_util~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C619.4,-317.78 602.83,-295.9 550.5,-299.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C483.07,-303.68 408.21,-295.02 357.5,-287.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.8,-283.62 347.37,-285.5 356.69,-290.53 357.8,-283.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C515.87,-305.02 507.96,-282.79 475,-274.55 435.87,-264.77 391.49,-255.25 356.96,-248.18"/>
+<polygon fill="#000000" stroke="#000000" points="357.53,-244.73 347.04,-246.16 356.14,-251.59 357.53,-244.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C606.18,-216.7 610.22,-277.51 550.5,-295.55"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~symba_classes -->
 <g id="module~~s_whm_util~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-271.35 511,-271.35 511,-247.35 588,-247.35 588,-271.35"/>
-<text text-anchor="middle" x="549.5" y="-256.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-73.55 627,-73.55 627,-49.55 712,-49.55 712,-73.55"/>
+<text text-anchor="middle" x="669.5" y="-59.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_util~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C652.76,-305.12 612.83,-289.24 583.77,-275.82"/>
-<polygon fill="#000000" stroke="#000000" points="584.92,-272.49 574.38,-271.39 581.93,-278.82 584.92,-272.49"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~s_whm_util~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.9,-207.23C767.04,-182.1 748.48,-124.18 715,-87.55 712.29,-84.59 709.17,-81.87 705.86,-79.39"/>
+<polygon fill="#000000" stroke="#000000" points="707.63,-76.37 697.37,-73.75 703.76,-82.2 707.63,-76.37"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~helio_classes -->
 <g id="module~~s_whm_util~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-77.35 385.5,-77.35 385.5,-53.35 472.5,-53.35 472.5,-77.35"/>
-<text text-anchor="middle" x="429" y="-62.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-151.55 511.5,-151.55 511.5,-127.55 587.5,-127.55 587.5,-151.55"/>
+<text text-anchor="middle" x="549.5" y="-137.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.8,-129.76C729.54,-120.78 698.59,-108.68 670.5,-101.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-63.35C527.36,-58.7 503.57,-58.21 482.89,-59.24"/>
-<polygon fill="#000000" stroke="#000000" points="482.47,-55.76 472.71,-59.89 482.91,-62.75 482.47,-55.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C615.19,-87.45 604.31,-75.21 550.5,-63.35"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-220.22C729.16,-220.61 697.84,-220.8 670.5,-219.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C667.13,-219.49 611.14,-181.2 576.79,-157.62"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-154.47 568.15,-151.69 574.41,-160.24 578.38,-154.47"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~s_whm_util~~UsesGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-191.35 511.5,-191.35 511.5,-167.35 587.5,-167.35 587.5,-191.35"/>
-<text text-anchor="middle" x="549.5" y="-176.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-33.55 385.5,-33.55 385.5,-9.55 472.5,-9.55 472.5,-33.55"/>
+<text text-anchor="middle" x="429" y="-19.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~s_whm_util~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C616.85,-318.27 628.82,-242.22 588,-205.35 584.98,-202.63 581.66,-199.94 578.28,-197.4"/>
-<polygon fill="#000000" stroke="#000000" points="580.08,-194.38 569.9,-191.42 576.01,-200.08 580.08,-194.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.99,-153.44C765.03,-186.18 735.11,-275.69 670.5,-299.35"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~s_whm_util~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M777.01,-207.41C776.32,-174.29 769.38,-82.06 715,-40.55 648.16,10.46 544.83,2.24 482.68,-9.14"/>
+<polygon fill="#000000" stroke="#000000" points="481.85,-5.73 472.69,-11.06 483.17,-12.61 481.85,-5.73"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~s_whm_util~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-229.35 123,-229.35 123,-205.35 211,-205.35 211,-229.35"/>
-<text text-anchor="middle" x="167" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-309.55 624,-309.55 624,-285.55 715,-285.55 715,-309.55"/>
+<text text-anchor="middle" x="669.5" y="-295.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~s_whm_util~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C511.12,-358.4 454.96,-435.51 298,-375.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-231.74C742.93,-244.5 715.36,-264.7 695.35,-279.35"/>
+<polygon fill="#000000" stroke="#000000" points="693.02,-276.72 687.02,-285.45 697.16,-282.37 693.02,-276.72"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~s_whm_util~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-153.35 627,-153.35 627,-129.35 712,-129.35 712,-153.35"/>
-<text text-anchor="middle" x="669.5" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-112.55 252.5,-112.55 252.5,-88.55 341.5,-88.55 341.5,-112.55"/>
+<text text-anchor="middle" x="297" y="-98.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-141.35C742.26,-141.35 732.26,-141.35 722.32,-141.35"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-137.85 712.05,-141.35 722.05,-144.85 722.05,-137.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.35,-207.43C728.67,-185.11 656.72,-138.04 588,-118.55 508.11,-95.89 411.05,-94.93 351.94,-97.13"/>
+<polygon fill="#000000" stroke="#000000" points="351.56,-93.65 341.71,-97.56 351.85,-100.64 351.56,-93.65"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~s_whm_util~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-170.35 252.5,-170.35 252.5,-146.35 341.5,-146.35 341.5,-170.35"/>
-<text text-anchor="middle" x="297" y="-155.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-231.55 511,-231.55 511,-207.55 588,-207.55 588,-231.55"/>
+<text text-anchor="middle" x="549.5" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-139.35C402.83,-141.09 375.13,-144.87 351.8,-148.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.05,-145.18 341.75,-150.26 352.18,-152.09 351.05,-145.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C564.64,-74.27 537.08,-131.98 430,-139.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C645.46,-218.5 619.87,-218.37 598.42,-218.56"/>
+<polygon fill="#000000" stroke="#000000" points="598.21,-215.06 588.25,-218.68 598.29,-222.06 598.21,-215.06"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~s_whm_util~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-55.35 624,-55.35 624,-31.35 715,-31.35 715,-55.35"/>
-<text text-anchor="middle" x="669.5" y="-40.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-307.55 383,-307.55 383,-283.55 475,-283.55 475,-307.55"/>
+<text text-anchor="middle" x="429" y="-293.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-129.34C745.82,-112.66 712.84,-82.31 691.3,-62.5"/>
-<polygon fill="#000000" stroke="#000000" points="693.39,-59.67 683.67,-55.47 688.65,-64.82 693.39,-59.67"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C528.3,-301.41 505.34,-302.59 485.04,-301.89"/>
+<polygon fill="#000000" stroke="#000000" points="485.17,-298.4 475,-301.39 484.82,-305.39 485.17,-298.4"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~s_whm_util~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-347.35 383,-347.35 383,-323.35 475,-323.35 475,-347.35"/>
-<text text-anchor="middle" x="429" y="-332.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-189.55 123,-189.55 123,-165.55 211,-165.55 211,-189.55"/>
+<text text-anchor="middle" x="167" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_util~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C520.15,-301.23 489.5,-310.76 466.47,-319.54"/>
-<polygon fill="#000000" stroke="#000000" points="465.12,-316.31 457.1,-323.23 467.69,-322.82 465.12,-316.31"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_util~~UsesGraph_edge13" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-217.35C364.75,-217.35 329.26,-217.35 298,-217.35"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-335.55C370.6,-342.13 351.95,-356.23 298,-335.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C521.89,-303.59 457.61,-332.39 430,-335.55"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge14" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-205.27C381.92,-196.44 355.32,-184.37 333.98,-174.68"/>
-<polygon fill="#000000" stroke="#000000" points="335.14,-171.37 324.59,-170.42 332.25,-177.74 335.14,-171.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.9,-165.46C399.34,-161.1 390.77,-156.13 383,-151.55 364.11,-140.43 342.97,-127.74 326.49,-117.81"/>
+<polygon fill="#000000" stroke="#000000" points="328.24,-114.77 317.87,-112.6 324.62,-120.76 328.24,-114.77"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_util~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-177.55C364.75,-177.55 329.26,-177.55 298,-177.55"/>
 </g>
 <!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_util~~UsesGraph_edge15" class="edge">
 <title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-264.27C250.63,-255.44 224.44,-243.37 203.43,-233.68"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-230.43 194.18,-229.42 201.79,-236.78 204.72,-230.43"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_util~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-247.32C501.77,-242.79 487.08,-237.58 473.56,-232.79"/>
-<polygon fill="#000000" stroke="#000000" points="474.56,-229.43 463.96,-229.39 472.22,-236.03 474.56,-229.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-224.47C250.63,-215.64 224.44,-203.57 203.43,-193.88"/>
+<polygon fill="#000000" stroke="#000000" points="204.72,-190.63 194.18,-189.62 201.79,-196.98 204.72,-190.63"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_util~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-255.83C477.17,-252.39 426.56,-246.47 383,-238.35 344.74,-231.23 336.91,-217.35 298,-217.35"/>
-</g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.6,-53.26C370.42,-38.68 316.87,-17.09 298,-25.35"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.32,-73.57C630.8,-86.47 599.59,-107.1 577.27,-121.86"/>
+<polygon fill="#000000" stroke="#000000" points="575.31,-118.96 568.89,-127.39 579.17,-124.8 575.31,-118.96"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-77.51C388.62,-93.53 349.08,-121.82 323.2,-140.32"/>
-<polygon fill="#000000" stroke="#000000" points="321.1,-137.53 315,-146.19 325.17,-143.22 321.1,-137.53"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C518.77,-59.1 486.83,-47.76 463.6,-37.78"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-34.47 454.22,-33.62 461.94,-40.87 464.78,-34.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-63.22C604.29,-63.7 575.82,-63.64 550.5,-61.55"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_util~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C395.49,-63.88 360.16,-75.08 334.54,-84.88"/>
+<polygon fill="#000000" stroke="#000000" points="333.25,-81.63 325.23,-88.55 335.82,-88.14 333.25,-81.63"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_util~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C496.01,-57.23 482.53,-57.79 430,-61.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C370.37,-65.68 350.33,-36.05 298,-60.55"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~s_whm_util~~UsesGraph_edge22" class="edge">
+<g id="module~~s_whm_util~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-191.27C500.41,-194.78 488.32,-198.65 476.88,-202.32"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-199.09 467.04,-205.48 477.63,-205.76 475.49,-199.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_util~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.48,-174.28C487.87,-172.13 456.8,-171.33 430,-177.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-151.47C500.41,-154.97 488.32,-158.85 476.88,-162.52"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-159.29 467.04,-165.68 477.63,-165.96 475.49,-159.29"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~s_whm_util~~UsesGraph_edge21" class="edge">
+<g id="module~~s_whm_util~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.61,-167.31C505.58,-154.65 466.18,-136.86 430,-139.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-138.66C488.05,-138.16 457.26,-137.62 430,-137.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C395.12,-137.47 359.3,-126.39 333.59,-116.38"/>
+<polygon fill="#000000" stroke="#000000" points="334.85,-113.12 324.27,-112.63 332.23,-119.61 334.85,-113.12"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~s_whm_util~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~s_whm_util~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-229.35 0,-229.35 0,-205.35 87,-205.35 87,-229.35"/>
-<text text-anchor="middle" x="43.5" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_util~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C367.55,-137.39 358.45,-177.55 298,-177.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-177.55C271.53,-177.55 244.42,-177.55 221.48,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-174.05 211.25,-177.55 221.25,-181.05 221.25,-174.05"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~s_whm_util~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-33.73C398.36,-37.93 390.23,-42.78 383,-47.55 366.31,-58.58 363.88,-63.83 347,-74.55 342.17,-77.62 336.95,-80.66 331.77,-83.52"/>
+<polygon fill="#000000" stroke="#000000" points="329.75,-80.64 322.6,-88.46 333.07,-86.8 329.75,-80.64"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_util~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-217.35C114.58,-217.35 105.86,-217.35 97.36,-217.35"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-213.85 87.13,-217.35 97.13,-220.85 97.13,-213.85"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~s_whm_util~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.32,-153.54C635.91,-173.94 594.66,-215.19 570.13,-239.73"/>
-<polygon fill="#000000" stroke="#000000" points="567.39,-237.51 562.79,-247.06 572.34,-242.46 567.39,-237.51"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.28,-31.01C359.34,-37.56 325.96,-47.46 298,-60.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-60.55C274.85,-70.46 265.86,-65.77 247,-79.55 218.13,-100.65 193.89,-134.81 180.16,-156.72"/>
+<polygon fill="#000000" stroke="#000000" points="177.15,-154.93 174.93,-165.29 183.13,-158.57 177.15,-154.93"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_util~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647,-129.29C639.62,-125.03 631.37,-120.1 624,-115.35 590.36,-93.68 589.58,-71.96 550.5,-63.35"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.91,-306.73C576.18,-316.07 498.11,-329.94 430,-335.55"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~s_whm_util~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-153.38C620.41,-156.84 608.53,-160.67 597.28,-164.29"/>
-<polygon fill="#000000" stroke="#000000" points="596.04,-161.01 587.59,-167.41 598.18,-167.68 596.04,-161.01"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_util~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C493.33,-143.22 483.96,-165.22 430,-177.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-177.35C369.02,-190.62 358.44,-216.44 298,-217.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-217.35C271.53,-217.73 244.42,-217.78 221.48,-217.72"/>
-<polygon fill="#000000" stroke="#000000" points="221.27,-214.21 211.25,-217.68 221.24,-221.21 221.27,-214.21"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276,-112.58C254.8,-125.34 221.12,-145.6 197.01,-160.1"/>
+<polygon fill="#000000" stroke="#000000" points="195.05,-157.2 188.28,-165.35 198.66,-163.2 195.05,-157.2"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~s_whm_util~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.95,-138.89C604.32,-137.99 575.84,-137.58 550.5,-139.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C495.96,-143.03 482.54,-135.74 430,-139.35"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_util~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-170.44C250.63,-179.27 224.44,-191.34 203.43,-201.03"/>
-<polygon fill="#000000" stroke="#000000" points="201.79,-197.92 194.18,-205.29 204.72,-204.28 201.79,-197.92"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-207.52C501.77,-202.99 487.08,-197.78 473.56,-192.99"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-189.63 463.96,-189.59 472.22,-196.23 474.56,-189.63"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_util~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.12,-31.33C563.44,-10.78 411.42,24.29 298,-25.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-25.35C226.09,-59.78 188.52,-152.74 174.51,-195.41"/>
-<polygon fill="#000000" stroke="#000000" points="171.12,-194.51 171.45,-205.1 177.79,-196.62 171.12,-194.51"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~s_whm_util~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-216.03C477.17,-212.59 426.56,-206.67 383,-198.55 344.74,-191.42 336.91,-177.55 298,-177.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~s_whm_util~~UsesGraph_edge31" class="edge">
+<g id="module~~s_whm_util~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-347.42C370.04,-361.71 317.13,-382.69 298,-375.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-375.35C233.63,-351.45 193.53,-276.57 176.85,-239.13"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-237.43 172.77,-229.63 173.51,-240.2 179.94,-237.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-335.55C233.63,-311.65 193.53,-236.77 176.85,-199.32"/>
+<polygon fill="#000000" stroke="#000000" points="179.94,-197.63 172.77,-189.83 173.51,-200.4 179.94,-197.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-307.62C370.04,-321.9 317.13,-342.88 298,-335.55"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~s_whm_util~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~s_whm_util~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-189.55 0,-189.55 0,-165.55 87,-165.55 87,-189.55"/>
+<text text-anchor="middle" x="43.5" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~s_whm_util~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-177.55C114.58,-177.55 105.86,-177.55 97.36,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-174.05 87.13,-177.55 97.13,-181.05 97.13,-174.05"/>
 </g>
 </g>
 </svg>
diff --git a/docs/module/swiftest_classes.html b/docs/module/swiftest_classes.html
index 8f41f480a..35d93f29a 100644
--- a/docs/module/swiftest_classes.html
+++ b/docs/module/swiftest_classes.html
@@ -136,7 +136,7 @@ <h1>swiftest_classes
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 8.9% of total for modules and submodules.">1445 statements</a>
+    title=" 9.0% of total for modules and submodules.">1469 statements</a>
      </li> 
      
      
@@ -210,6 +210,10 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-drift_one">drift_one</a>
       
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_ij_to_k">util_index_eucl_ij_to_k</a>
+      
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_k_to_ij">util_index_eucl_k_to_ij</a>
+      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_plpl">util_index_eucl_plpl</a>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_pltp">util_index_eucl_pltp</a>
@@ -270,16 +274,18 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-io_write_hdr_system">io_write_hdr_system</a>
       
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_pl">kick_getacch_int_pl</a>
+      
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_tp">kick_getacch_int_tp</a>
+      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_all_pl">kick_getacch_int_all_pl</a>
       
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_all_tp">kick_getacch_int_all_tp</a>
+      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_one_pl">kick_getacch_int_one_pl</a>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_one_tp">kick_getacch_int_one_tp</a>
       
-      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_pl">kick_getacch_int_pl</a>
-      
-      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_tp">kick_getacch_int_tp</a>
-      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-netcdf_close">netcdf_close</a>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-netcdf_initialize_output">netcdf_initialize_output</a>
@@ -775,533 +781,573 @@ <h3 class="panel-title">Used by</h3>
 <!-- module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_node1" class="node">
 <title>module~swiftest_classes</title>
-<polygon fill="none" stroke="black" points="89,-1514 0,-1514 0,-1490 89,-1490 89,-1514"/>
-<text text-anchor="middle" x="44.5" y="-1499.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_classes</text>
+<polygon fill="none" stroke="black" points="89,-1413 0,-1413 0,-1389 89,-1389 89,-1413"/>
+<text text-anchor="middle" x="44.5" y="-1398.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_classes</text>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_gr -->
 <g id="module~~swiftest_classes~~UsedByGraph_node2" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="679.5,-2880 619.5,-2880 619.5,-2856 679.5,-2856 679.5,-2880"/>
-<text text-anchor="middle" x="649.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_gr</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-2880 622.5,-2880 622.5,-2856 676.5,-2856 676.5,-2880"/>
+<text text-anchor="middle" x="649.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest_classes -->
+<!-- module~s_gr&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge7" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M619.34,-2860.16C554.98,-2842.87 406.26,-2803 403.5,-2803 403.5,-2803 403.5,-2803 279.5,-2803 143.99,-2803 59.34,-1695.53 47.05,-1524.16"/>
-<polygon fill="#000000" stroke="#000000" points="50.53,-1523.78 46.33,-1514.05 43.55,-1524.27 50.53,-1523.78"/>
+<title>module~s_gr&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.17,-2860.92C559.46,-2844.07 406.3,-2803 403.5,-2803 403.5,-2803 403.5,-2803 279.5,-2803 133.34,-2803 57.29,-1602.21 46.77,-1423.21"/>
+<polygon fill="#000000" stroke="#000000" points="50.26,-1422.9 46.18,-1413.12 43.27,-1423.31 50.26,-1422.9"/>
 </g>
 <!-- module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_node28" class="node">
+<g id="module~~swiftest_classes~~UsedByGraph_node7" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node28"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="535,-1473 481,-1473 481,-1449 535,-1449 535,-1473"/>
-<text text-anchor="middle" x="508" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node7"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="535,-1452 481,-1452 481,-1428 535,-1428 535,-1452"/>
+<text text-anchor="middle" x="508" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge73" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.23,-2868.1C602.38,-2866.47 582.36,-2861.3 571,-2847 536.4,-2803.42 537.88,-1901.57 535,-1846 527.86,-1708.04 515.35,-1542.53 510.76,-1483.37"/>
-<polygon fill="#000000" stroke="#000000" points="514.24,-1482.99 509.97,-1473.29 507.26,-1483.53 514.24,-1482.99"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge37" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.27,-2868.37C604.84,-2867.08 583.03,-2862.19 571,-2847 533.56,-2799.71 538.43,-1822.21 535,-1762 528.59,-1649.32 516.19,-1514.82 511.18,-1462.43"/>
+<polygon fill="#000000" stroke="#000000" points="514.64,-1461.89 510.2,-1452.27 507.68,-1462.56 514.64,-1461.89"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_util_valid -->
 <g id="module~~swiftest_classes~~UsedByGraph_node3" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-1158 622.5,-1158 622.5,-1134 676.5,-1134 676.5,-1158"/>
-<text text-anchor="middle" x="649.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="682,-1158 617,-1158 617,-1134 682,-1134 682,-1158"/>
+<text text-anchor="middle" x="649.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_valid&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge8" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.29,-1146.01C605.11,-1144.53 583.57,-1139.57 571,-1125 494.26,-1036.05 604.79,-531.99 509,-600"/>
+<title>module~s_util_valid&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M616.94,-1145.45C600.83,-1143.42 582.29,-1138.09 571,-1125 494.26,-1036.05 606.35,-534.25 509,-600"/>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge80" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.33,-1146.4C605.39,-1148.08 584.12,-1153.12 571,-1167 566.24,-1172.04 526.6,-1371.59 513.32,-1439.01"/>
-<polygon fill="#000000" stroke="#000000" points="509.85,-1438.5 511.36,-1448.98 516.72,-1439.85 509.85,-1438.5"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge38" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.71,-1147.15C600.93,-1149.38 582.77,-1154.73 571,-1167 562.17,-1176.2 526.14,-1353.84 513.45,-1417.52"/>
+<polygon fill="#000000" stroke="#000000" points="509.94,-1417.21 511.43,-1427.7 516.81,-1418.57 509.94,-1417.21"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~s_obl -->
 <g id="module~~swiftest_classes~~UsedByGraph_node4" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node4"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="324,-1435 237,-1435 237,-1411 324,-1411 324,-1435"/>
-<text text-anchor="middle" x="280.5" y="-1420.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~s_obl</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-1116 622.5,-1116 622.5,-1092 676.5,-1092 676.5,-1116"/>
+<text text-anchor="middle" x="649.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge1" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.03,-1435.04C223.04,-1443.2 191.78,-1454.08 164,-1463"/>
+<!-- module~s_obl&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge9" class="edge">
+<title>module~s_obl&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.34,-1103.97C605.17,-1102.47 583.64,-1097.5 571,-1083 499.9,-1001.43 598.68,-539.44 509,-600"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_obl&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge40" class="edge">
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.27,-1104.34C605.3,-1106 584.02,-1111.03 571,-1125 570.68,-1125.34 527.55,-1345.33 513.42,-1417.42"/>
+<polygon fill="#000000" stroke="#000000" points="509.9,-1417.18 511.42,-1427.67 516.77,-1418.53 509.9,-1417.18"/>
+</g>
+<!-- module~s_util_coord -->
 <g id="module~~swiftest_classes~~UsedByGraph_node5" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="683.5,-1116 615.5,-1116 615.5,-1092 683.5,-1092 683.5,-1116"/>
-<text text-anchor="middle" x="649.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-1074 614.5,-1074 614.5,-1050 684.5,-1050 684.5,-1074"/>
+<text text-anchor="middle" x="649.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge9" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M615.43,-1103.19C599.71,-1101.01 581.99,-1095.61 571,-1083 499.9,-1001.43 597.24,-537.35 509,-600"/>
+<!-- module~s_util_coord&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge10" class="edge">
+<title>module~s_util_coord&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M614.31,-1060.97C598.91,-1058.67 581.79,-1053.23 571,-1041 440.05,-892.58 673.03,-489.22 509,-600"/>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge78" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.29,-1105.09C599.73,-1107.36 582.2,-1112.76 571,-1125 509.16,-1192.61 551.79,-1237.92 535,-1328 527.72,-1367.06 518.73,-1412.46 513.45,-1438.84"/>
-<polygon fill="#000000" stroke="#000000" points="509.97,-1438.42 511.44,-1448.91 516.83,-1439.79 509.97,-1438.42"/>
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge42" class="edge">
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.42,-1063.13C599.04,-1065.45 581.91,-1070.88 571,-1083 537.27,-1120.48 543.84,-1257.36 535,-1307 528.04,-1346.12 518.95,-1391.5 513.56,-1417.86"/>
+<polygon fill="#000000" stroke="#000000" points="510.08,-1417.42 511.5,-1427.92 516.94,-1418.83 510.08,-1417.42"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_rescale -->
 <g id="module~~swiftest_classes~~UsedByGraph_node6" class="node">
-<title>module~s_io</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-1074 622.5,-1074 622.5,-1050 676.5,-1050 676.5,-1074"/>
-<text text-anchor="middle" x="649.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="688.5,-1032 610.5,-1032 610.5,-1008 688.5,-1008 688.5,-1032"/>
+<text text-anchor="middle" x="649.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge10" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.39,-1061.92C605.25,-1060.4 583.73,-1055.43 571,-1041 440.05,-892.58 670.39,-485.42 509,-600"/>
+<!-- module~s_util_rescale&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge11" class="edge">
+<title>module~s_util_rescale&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M610.41,-1018.23C596.12,-1015.61 580.95,-1010.11 571,-999 451.3,-865.29 657.72,-499.56 509,-600"/>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge81" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.42,-1062.1C605.29,-1063.64 583.77,-1068.61 571,-1083 534.47,-1124.15 544.28,-1273.76 535,-1328 528.3,-1367.16 519.12,-1412.53 513.66,-1438.88"/>
-<polygon fill="#000000" stroke="#000000" points="510.17,-1438.43 511.56,-1448.93 517.03,-1439.86 510.17,-1438.43"/>
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge45" class="edge">
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.3,-1021.67C595.99,-1024.28 580.84,-1029.79 571,-1041 531.65,-1085.83 544.73,-1248.15 535,-1307 528.52,-1346.2 519.28,-1391.56 513.73,-1417.89"/>
+<polygon fill="#000000" stroke="#000000" points="510.25,-1417.43 511.6,-1427.94 517.1,-1418.88 510.25,-1417.43"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge4" class="edge">
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.5,-1381C228.35,-1385.32 213.98,-1369.3 164,-1381"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.5,-1381C349.26,-1370.24 334.64,-1376.51 281.5,-1381"/>
 </g>
 <!-- module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_node7" class="node">
+<g id="module~~swiftest_classes~~UsedByGraph_node15" class="node">
 <title>module~helio_classes</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="318.5,-1553 242.5,-1553 242.5,-1529 318.5,-1529 318.5,-1553"/>
-<text text-anchor="middle" x="280.5" y="-1538.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node15"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="318.5,-1353 242.5,-1353 242.5,-1329 318.5,-1329 318.5,-1353"/>
+<text text-anchor="middle" x="280.5" y="-1338.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge2" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259,-1528.85C251.96,-1524.58 244.07,-1519.67 237,-1515 203.77,-1493.04 201.93,-1450.82 164,-1463"/>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge105" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.5,-1381C373.83,-1375.3 343.68,-1365.23 320.51,-1356.62"/>
+<polygon fill="#000000" stroke="#000000" points="321.63,-1353.3 311.04,-1353.04 319.16,-1359.85 321.63,-1353.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M492.79,-1427.95C473.9,-1412.91 438.75,-1388.26 403.5,-1381"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~symba_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_node16" class="node">
-<title>module~whm_classes</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node16"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="201,-1553 125,-1553 125,-1529 201,-1529 201,-1553"/>
-<text text-anchor="middle" x="163" y="-1538.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node16"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="445,-1452 360,-1452 360,-1428 445,-1428 445,-1452"/>
+<text text-anchor="middle" x="402.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge62" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M242.32,-1541C232.43,-1541 221.61,-1541 211.26,-1541"/>
-<polygon fill="#000000" stroke="#000000" points="211.11,-1537.5 201.11,-1541 211.11,-1544.5 211.11,-1537.5"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge112" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.88,-1440C473.13,-1440 464.36,-1440 455.58,-1440"/>
+<polygon fill="#000000" stroke="#000000" points="455.32,-1436.5 445.32,-1440 455.32,-1443.5 455.32,-1436.5"/>
 </g>
-<!-- module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_node8" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node8"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="445,-1553 360,-1553 360,-1529 445,-1529 445,-1553"/>
-<text text-anchor="middle" x="402.5" y="-1538.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<!-- module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_node18" class="node">
+<title>module~fraggle_classes</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node18"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="324,-1471 237,-1471 237,-1447 324,-1447 324,-1471"/>
+<text text-anchor="middle" x="280.5" y="-1456.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge5" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.36,-1528.9C312.05,-1505.42 184.2,-1456.51 164,-1463"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge122" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.5,-1381C358.43,-1372.12 317.55,-1412.81 296.43,-1438.76"/>
+<polygon fill="#000000" stroke="#000000" points="293.46,-1436.88 290.04,-1446.91 298.97,-1441.19 293.46,-1436.88"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge37" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.52,-1528.95C372.95,-1524.91 365.92,-1520.11 360,-1515 334.78,-1493.23 310.66,-1463.1 295.97,-1443.33"/>
-<polygon fill="#000000" stroke="#000000" points="298.64,-1441.06 289.91,-1435.05 292.99,-1445.19 298.64,-1441.06"/>
+<!-- module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_node30" class="node">
+<title>module~whm_classes</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node30"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="201,-1433 125,-1433 125,-1409 201,-1409 201,-1433"/>
+<text text-anchor="middle" x="163" y="-1418.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge46" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.87,-1541C349.81,-1541 339,-1541 328.71,-1541"/>
-<polygon fill="#000000" stroke="#000000" points="328.65,-1537.5 318.65,-1541 328.65,-1544.5 328.65,-1537.5"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge131" class="edge">
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.5,-1381C250.45,-1383.45 219.32,-1394.79 196.71,-1404.77"/>
+<polygon fill="#000000" stroke="#000000" points="195.21,-1401.61 187.57,-1408.94 198.12,-1407.98 195.21,-1401.61"/>
 </g>
 <!-- module~rmvs_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_node74" class="node">
 <title>module~rmvs_classes</title>
 <g id="a_module~~swiftest_classes~~UsedByGraph_node74"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="319,-1595 242,-1595 242,-1571 319,-1571 319,-1595"/>
-<text text-anchor="middle" x="280.5" y="-1580.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="441,-2418 364,-2418 364,-2394 441,-2394 441,-2418"/>
+<text text-anchor="middle" x="402.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge142" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M367.11,-1553.04C354.18,-1557.56 339.3,-1562.77 325.61,-1567.56"/>
-<polygon fill="#000000" stroke="#000000" points="324.17,-1564.36 315.89,-1570.96 326.49,-1570.96 324.17,-1564.36"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge141" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M505.69,-1452.21C494.88,-1553.12 420.36,-2248.62 405.92,-2383.4"/>
+<polygon fill="#000000" stroke="#000000" points="402.4,-2383.42 404.81,-2393.73 409.36,-2384.16 402.4,-2383.42"/>
 </g>
-<!-- module~s_util_append -->
-<g id="module~~swiftest_classes~~UsedByGraph_node9" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-1032 610,-1032 610,-1008 689,-1008 689,-1032"/>
-<text text-anchor="middle" x="649.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<!-- module~s_util_get_energy_momentum -->
+<g id="module~~swiftest_classes~~UsedByGraph_node8" class="node">
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="728,-990 571,-990 571,-966 728,-966 728,-990"/>
+<text text-anchor="middle" x="649.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge11" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M609.61,-1018.08C595.55,-1015.4 580.76,-1009.91 571,-999 451.3,-865.29 655.33,-496.11 509,-600"/>
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge12" class="edge">
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M581.94,-965.92C577.9,-963.45 574.19,-960.5 571,-957 462.52,-837.97 642.46,-509.87 509,-600"/>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge96" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.84,-1021.69C595.65,-1024.33 580.69,-1029.85 571,-1041 528.84,-1089.52 545.17,-1264.53 535,-1328 528.71,-1367.23 519.41,-1412.58 513.8,-1438.9"/>
-<polygon fill="#000000" stroke="#000000" points="510.32,-1438.43 511.64,-1448.95 517.16,-1439.9 510.32,-1438.43"/>
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge46" class="edge">
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M581.37,-990.11C577.52,-992.58 574,-995.52 571,-999 526.02,-1051.2 545.62,-1238.91 535,-1307 528.88,-1346.26 519.52,-1391.6 513.86,-1417.91"/>
+<polygon fill="#000000" stroke="#000000" points="510.38,-1417.44 511.68,-1427.95 517.22,-1418.92 510.38,-1417.44"/>
 </g>
-<!-- module~s_util_fill -->
-<g id="module~~swiftest_classes~~UsedByGraph_node10" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-990 622.5,-990 622.5,-966 676.5,-966 676.5,-990"/>
-<text text-anchor="middle" x="649.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<!-- module~s_util_index -->
+<g id="module~~swiftest_classes~~UsedByGraph_node9" class="node">
+<title>module~s_util_index</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="684,-948 615,-948 615,-924 684,-924 684,-948"/>
+<text text-anchor="middle" x="649.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge12" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.17,-977.76C605.16,-976.14 583.86,-971.12 571,-957 462.52,-837.97 640.31,-506.77 509,-600"/>
+<!-- module~s_util_index&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge13" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M615,-934.76C599.56,-932.43 582.22,-927.03 571,-915 473.71,-810.62 627.25,-520.14 509,-600"/>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge98" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.25,-977.95C605.05,-979.42 583.5,-984.38 571,-999 523.19,-1054.89 546.07,-1255.29 535,-1328 529.02,-1367.28 519.62,-1412.61 513.91,-1438.92"/>
-<polygon fill="#000000" stroke="#000000" points="510.43,-1438.44 511.71,-1448.96 517.27,-1439.94 510.43,-1438.44"/>
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge48" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.9,-936.74C599.24,-938.93 581.74,-944.36 571,-957 520.37,-1016.58 546.51,-1229.66 535,-1307 529.15,-1346.3 519.7,-1391.63 513.95,-1417.93"/>
+<polygon fill="#000000" stroke="#000000" points="510.47,-1417.44 511.73,-1427.96 517.31,-1418.95 510.47,-1417.44"/>
 </g>
-<!-- module~s_tides_step_spin -->
-<g id="module~~swiftest_classes~~UsedByGraph_node11" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="698.5,-948 600.5,-948 600.5,-924 698.5,-924 698.5,-948"/>
-<text text-anchor="middle" x="649.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<!-- proc~xv2el -->
+<g id="module~~swiftest_classes~~UsedByGraph_node10" class="node">
+<title>proc~xv2el</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node10"><a xlink:href=".././proc/xv2el.html" xlink:title="xv2el">
+<polygon fill="#d9534f" stroke="#d9534f" points="190,-1353 136,-1353 136,-1329 190,-1329 190,-1353"/>
+<text text-anchor="middle" x="163" y="-1338.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xv2el</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge13" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M600.16,-931.56C589.28,-928.4 578.7,-923.26 571,-915 473.71,-810.62 625.35,-517.4 509,-600"/>
-</g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge103" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.39,-939.7C589.24,-942.85 578.47,-948.16 571,-957 517.55,-1020.28 546.96,-1246.04 535,-1328 529.26,-1367.32 519.78,-1412.64 513.99,-1438.93"/>
-<polygon fill="#000000" stroke="#000000" points="510.51,-1438.44 511.76,-1448.96 517.35,-1439.96 510.51,-1438.44"/>
+<!-- proc~xv2el&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge6" class="edge">
+<title>proc~xv2el&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M138.42,-1353.14C121.05,-1362.09 97.22,-1374.36 78.03,-1384.24"/>
+<polygon fill="#000000" stroke="#000000" points="76.33,-1381.19 69.04,-1388.88 79.53,-1387.41 76.33,-1381.19"/>
 </g>
-<!-- module~s_obl -->
-<g id="module~~swiftest_classes~~UsedByGraph_node12" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-906 622.5,-906 622.5,-882 676.5,-882 676.5,-906"/>
-<text text-anchor="middle" x="649.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<!-- module~s_util_set -->
+<g id="module~~swiftest_classes~~UsedByGraph_node11" class="node">
+<title>module~s_util_set</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="678.5,-906 620.5,-906 620.5,-882 678.5,-882 678.5,-906"/>
+<text text-anchor="middle" x="649.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_set&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge14" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.4,-893.54C605.49,-891.83 584.22,-886.78 571,-873 484.85,-783.22 610.45,-527.97 509,-600"/>
+<title>module~s_util_set&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M620.16,-893.29C603.64,-891.37 583.64,-886.18 571,-873 484.85,-783.22 612.11,-530.36 509,-600"/>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge104" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.15,-893.87C604.9,-895.29 583.34,-900.24 571,-915 511.89,-985.67 547.86,-1236.78 535,-1328 529.46,-1367.34 519.91,-1412.66 514.06,-1438.94"/>
-<polygon fill="#000000" stroke="#000000" points="510.58,-1438.44 511.8,-1448.97 517.41,-1439.98 510.58,-1438.44"/>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge54" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.28,-894.06C603.38,-895.69 582.93,-900.81 571,-915 514.72,-981.97 547.41,-1220.41 535,-1307 529.36,-1346.33 519.85,-1391.65 514.03,-1417.94"/>
+<polygon fill="#000000" stroke="#000000" points="510.55,-1417.44 511.78,-1427.97 517.38,-1418.97 510.55,-1417.44"/>
 </g>
-<!-- module~s_discard -->
-<g id="module~~swiftest_classes~~UsedByGraph_node13" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="678.5,-864 620.5,-864 620.5,-840 678.5,-840 678.5,-864"/>
-<text text-anchor="middle" x="649.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<!-- module~s_util_version -->
+<g id="module~~swiftest_classes~~UsedByGraph_node12" class="node">
+<title>module~s_util_version</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="688.5,-864 610.5,-864 610.5,-840 688.5,-840 688.5,-864"/>
+<text text-anchor="middle" x="649.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_version&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge15" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M620.34,-851.12C603.89,-849.12 583.9,-843.93 571,-831 495.92,-755.74 595.68,-538.46 509,-600"/>
+<title>module~s_util_version&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M610.21,-849.52C596.23,-846.76 581.34,-841.36 571,-831 495.92,-755.74 597.09,-540.51 509,-600"/>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge105" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.22,-852C603.29,-853.62 582.84,-858.73 571,-873 538.62,-912.03 541.88,-1277.75 535,-1328 529.61,-1367.36 520.02,-1412.67 514.11,-1438.95"/>
-<polygon fill="#000000" stroke="#000000" points="510.64,-1438.45 511.83,-1448.97 517.46,-1440 510.64,-1438.45"/>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge56" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.4,-853.34C595.93,-855.89 580.64,-861.43 571,-873 540.03,-910.18 541.65,-1259.07 535,-1307 529.54,-1346.35 519.97,-1391.66 514.09,-1417.95"/>
+<polygon fill="#000000" stroke="#000000" points="510.61,-1417.45 511.81,-1427.97 517.44,-1418.99 510.61,-1417.45"/>
 </g>
-<!-- module~s_util_resize -->
-<g id="module~~swiftest_classes~~UsedByGraph_node14" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="685.5,-822 613.5,-822 613.5,-798 685.5,-798 685.5,-822"/>
-<text text-anchor="middle" x="649.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<!-- module~s_tides_step_spin -->
+<g id="module~~swiftest_classes~~UsedByGraph_node13" class="node">
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="698.5,-822 600.5,-822 600.5,-798 698.5,-798 698.5,-822"/>
+<text text-anchor="middle" x="649.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest_classes -->
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge16" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M613.27,-807.74C598.57,-805.11 582.33,-799.75 571,-789 506.87,-728.15 581.08,-548.82 509,-600"/>
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M600.45,-804.76C589.69,-801.61 579.09,-796.68 571,-789 506.87,-728.15 582.26,-550.52 509,-600"/>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge106" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.15,-810.83C597.87,-813.13 581.2,-818.63 571,-831 535.79,-873.73 542.32,-1273.12 535,-1328 529.74,-1367.38 520.11,-1412.68 514.16,-1438.96"/>
-<polygon fill="#000000" stroke="#000000" points="510.68,-1438.45 511.86,-1448.98 517.51,-1440.01 510.68,-1438.45"/>
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge57" class="edge">
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.26,-813.59C589.11,-816.74 578.37,-822.08 571,-831 537.2,-871.88 542.1,-1254.44 535,-1307 529.68,-1346.37 520.07,-1391.68 514.14,-1417.95"/>
+<polygon fill="#000000" stroke="#000000" points="510.66,-1417.45 511.84,-1427.98 517.49,-1419.01 510.66,-1417.45"/>
 </g>
-<!-- module~drift_implementation -->
-<g id="module~~swiftest_classes~~UsedByGraph_node15" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node15"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="704,-780 595,-780 595,-756 704,-756 704,-780"/>
-<text text-anchor="middle" x="649.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<!-- module~s_orbel -->
+<g id="module~~swiftest_classes~~UsedByGraph_node14" class="node">
+<title>module~s_orbel</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-780 622.5,-780 622.5,-756 676.5,-756 676.5,-780"/>
+<text text-anchor="middle" x="649.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest_classes -->
+<!-- module~s_orbel&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge17" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M594.85,-760.33C586.18,-757.25 577.82,-752.96 571,-747 517.61,-700.34 566.82,-558.95 509,-600"/>
+<title>module~s_orbel&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.42,-766.66C605.95,-764.55 585.17,-759.38 571,-747 517.61,-700.34 567.76,-560.32 509,-600"/>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge107" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.61,-773.34C585.54,-776.6 577.1,-781.56 571,-789 532.96,-835.43 542.77,-1268.48 535,-1328 529.85,-1367.4 520.18,-1412.69 514.2,-1438.96"/>
-<polygon fill="#000000" stroke="#000000" points="510.72,-1438.45 511.88,-1448.98 517.54,-1440.03 510.72,-1438.45"/>
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge59" class="edge">
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.44,-767.77C605.09,-769.12 583.3,-774.03 571,-789 534.37,-833.58 542.55,-1249.8 535,-1307 529.8,-1346.39 520.15,-1391.69 514.18,-1417.96"/>
+<polygon fill="#000000" stroke="#000000" points="510.7,-1417.45 511.87,-1427.98 517.53,-1419.02 510.7,-1417.45"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge3" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M126.1,-1528.98C115.02,-1525.27 102.68,-1521.14 91.05,-1517.25"/>
-<polygon fill="#000000" stroke="#000000" points="92.08,-1513.9 81.49,-1514.05 89.86,-1520.54 92.08,-1513.9"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.6,-1353.06C227.55,-1362.17 194.23,-1374.22 164,-1381"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge133" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.45,-1353.24C251.51,-1357.44 243.83,-1362.28 237,-1367 220.33,-1378.53 217.3,-1382.95 201,-1395 197.52,-1397.57 193.82,-1400.24 190.16,-1402.85"/>
+<polygon fill="#000000" stroke="#000000" points="187.97,-1400.12 181.82,-1408.74 192,-1405.84 187.97,-1400.12"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge2" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.84,-1428.62C294.32,-1410.88 173.63,-1378.84 164,-1381"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge106" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.1,-1427.81C375.57,-1412.62 349.27,-1386.3 324,-1367 320.16,-1364.07 315.98,-1361.18 311.78,-1358.46"/>
+<polygon fill="#000000" stroke="#000000" points="313.59,-1355.46 303.26,-1353.13 309.88,-1361.4 313.59,-1355.46"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge123" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.87,-1446.59C351.6,-1447.9 342.81,-1449.29 334.22,-1450.65"/>
+<polygon fill="#000000" stroke="#000000" points="333.61,-1447.21 324.28,-1452.23 334.71,-1454.12 333.61,-1447.21"/>
+</g>
+<!-- module~s_util_exit -->
 <g id="module~~swiftest_classes~~UsedByGraph_node17" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-738 622.5,-738 622.5,-714 676.5,-714 676.5,-738"/>
-<text text-anchor="middle" x="649.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="679.5,-738 619.5,-738 619.5,-714 679.5,-714 679.5,-738"/>
+<text text-anchor="middle" x="649.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_exit&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge18" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.23,-723.9C606.09,-721.46 585.75,-716.24 571,-705 527.89,-672.16 553.19,-568.63 509,-600"/>
+<title>module~s_util_exit&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M619.28,-723.43C603.66,-720.81 584.86,-715.56 571,-705 527.89,-672.16 553.91,-569.67 509,-600"/>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge114" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.41,-725.74C605.04,-727.08 583.24,-731.98 571,-747 530.13,-797.13 543.22,-1263.85 535,-1328 529.95,-1367.41 520.25,-1412.7 514.23,-1438.96"/>
-<polygon fill="#000000" stroke="#000000" points="510.76,-1438.45 511.9,-1448.98 517.57,-1440.04 510.76,-1438.45"/>
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge63" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.38,-726.02C602.58,-727.69 582.56,-732.86 571,-747 531.54,-795.28 543,-1245.16 535,-1307 529.9,-1346.4 520.22,-1391.7 514.21,-1417.96"/>
+<polygon fill="#000000" stroke="#000000" points="510.74,-1417.45 511.89,-1427.98 517.56,-1419.03 510.74,-1417.45"/>
 </g>
-<!-- module~s_user_kick_getacch -->
-<g id="module~~swiftest_classes~~UsedByGraph_node18" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="705.5,-696 593.5,-696 593.5,-672 705.5,-672 705.5,-696"/>
-<text text-anchor="middle" x="649.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge5" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.78,-1446.82C250.95,-1442.7 243.49,-1437.89 237,-1433 205.18,-1409.04 202.87,-1372.29 164,-1381"/>
+</g>
+<!-- module~s_netcdf -->
+<g id="module~~swiftest_classes~~UsedByGraph_node19" class="node">
+<title>module~s_netcdf</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-696 622.5,-696 622.5,-672 676.5,-672 676.5,-696"/>
+<text text-anchor="middle" x="649.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest_classes -->
+<!-- module~s_netcdf&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge19" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M593.25,-672.93C585.51,-670.28 577.86,-667.01 571,-663 537.08,-643.17 541.03,-577.26 509,-600"/>
+<title>module~s_netcdf&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.39,-680.46C606.69,-677.5 586.77,-672.22 571,-663 537.08,-643.17 541.56,-578.01 509,-600"/>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge115" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M593.38,-689.73C584.76,-693 576.8,-697.86 571,-705 527.3,-758.83 543.67,-1259.21 535,-1328 530.03,-1367.42 520.3,-1412.71 514.26,-1438.97"/>
-<polygon fill="#000000" stroke="#000000" points="510.78,-1438.45 511.92,-1448.99 517.6,-1440.04 510.78,-1438.45"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge64" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.4,-683.73C605.03,-685.07 583.23,-689.97 571,-705 528.71,-756.98 543.45,-1240.53 535,-1307 529.99,-1346.41 520.28,-1391.7 514.24,-1417.97"/>
+<polygon fill="#000000" stroke="#000000" points="510.77,-1417.45 511.91,-1427.98 517.59,-1419.04 510.77,-1417.45"/>
 </g>
-<!-- module~s_util_rescale -->
-<g id="module~~swiftest_classes~~UsedByGraph_node19" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="688.5,-654 610.5,-654 610.5,-630 688.5,-630 688.5,-654"/>
-<text text-anchor="middle" x="649.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<!-- module~s_util_peri -->
+<g id="module~~swiftest_classes~~UsedByGraph_node20" class="node">
+<title>module~s_util_peri</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="680,-654 619,-654 619,-630 680,-630 680,-654"/>
+<text text-anchor="middle" x="649.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_peri&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge20" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M610.13,-632.11C597.61,-628.74 583.67,-624.86 571,-621 543.17,-612.52 532.72,-583.16 509,-600"/>
+<title>module~s_util_peri&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M618.94,-634.45C604.43,-630.63 586.74,-625.79 571,-621 543.17,-612.52 533.11,-583.72 509,-600"/>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge116" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.24,-643.2C595.74,-645.73 580.47,-651.29 571,-663 524.46,-720.53 544.12,-1254.57 535,-1328 530.1,-1367.43 520.35,-1412.71 514.28,-1438.97"/>
-<polygon fill="#000000" stroke="#000000" points="510.81,-1438.45 511.93,-1448.99 517.62,-1440.05 510.81,-1438.45"/>
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge66" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.95,-642.02C602.22,-643.72 582.41,-648.92 571,-663 525.88,-718.68 543.9,-1235.89 535,-1307 530.07,-1346.42 520.33,-1391.71 514.27,-1417.97"/>
+<polygon fill="#000000" stroke="#000000" points="510.8,-1417.45 511.92,-1427.99 517.61,-1419.05 510.8,-1417.45"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
-<g id="module~~swiftest_classes~~UsedByGraph_node20" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="728,-612 571,-612 571,-588 728,-588 728,-612"/>
-<text text-anchor="middle" x="649.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<!-- module~s_setup -->
+<g id="module~~swiftest_classes~~UsedByGraph_node21" class="node">
+<title>module~s_setup</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-612 622.5,-612 622.5,-588 676.5,-588 676.5,-612"/>
+<text text-anchor="middle" x="649.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes -->
+<!-- module~s_setup&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge21" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M605.88,-587.97C576.06,-582.22 536.75,-580.3 509,-600"/>
+<title>module~s_setup&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.33,-591.93C592.26,-584.34 542.72,-577.23 509,-600"/>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge117" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M580.76,-612.12C577.11,-614.59 573.8,-617.53 571,-621 521.63,-682.23 544.57,-1249.93 535,-1328 530.17,-1367.44 520.4,-1412.72 514.3,-1438.97"/>
-<polygon fill="#000000" stroke="#000000" points="510.83,-1438.45 511.95,-1448.99 517.65,-1440.06 510.83,-1438.45"/>
+<!-- module~s_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge68" class="edge">
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.36,-599.7C604.98,-601.03 583.17,-605.92 571,-621 523.05,-680.38 544.35,-1231.25 535,-1307 530.14,-1346.43 520.37,-1391.72 514.29,-1417.97"/>
+<polygon fill="#000000" stroke="#000000" points="510.82,-1417.45 511.94,-1427.99 517.64,-1419.06 510.82,-1417.45"/>
 </g>
-<!-- module~s_kick -->
-<g id="module~~swiftest_classes~~UsedByGraph_node21" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-570 622.5,-570 622.5,-546 676.5,-546 676.5,-570"/>
-<text text-anchor="middle" x="649.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<!-- module~s_util_append -->
+<g id="module~~swiftest_classes~~UsedByGraph_node22" class="node">
+<title>module~s_util_append</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-570 610,-570 610,-546 689,-546 689,-570"/>
+<text text-anchor="middle" x="649.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_append&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge22" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.4,-560.79C592.6,-565.06 543.54,-575.47 509,-600"/>
+<title>module~s_util_append&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M609.71,-563.26C580.11,-568.73 539.39,-579.47 509,-600"/>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge118" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.34,-557.69C604.95,-559 583.14,-563.9 571,-579 518.8,-643.94 545.02,-1245.29 535,-1328 530.22,-1367.44 520.43,-1412.72 514.32,-1438.98"/>
-<polygon fill="#000000" stroke="#000000" points="510.85,-1438.45 511.96,-1448.99 517.66,-1440.06 510.85,-1438.45"/>
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge70" class="edge">
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.81,-559.25C595.43,-561.81 580.35,-567.38 571,-579 520.21,-642.09 544.79,-1226.61 535,-1307 530.2,-1346.44 520.42,-1391.72 514.31,-1417.98"/>
+<polygon fill="#000000" stroke="#000000" points="510.84,-1417.45 511.95,-1427.99 517.66,-1419.06 510.84,-1417.45"/>
 </g>
-<!-- module~s_util_index -->
-<g id="module~~swiftest_classes~~UsedByGraph_node22" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="684,-528 615,-528 615,-504 684,-504 684,-528"/>
-<text text-anchor="middle" x="649.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<!-- module~s_util_copy -->
+<g id="module~~swiftest_classes~~UsedByGraph_node23" class="node">
+<title>module~s_util_copy</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-528 616.5,-528 616.5,-504 682.5,-504 682.5,-528"/>
+<text text-anchor="middle" x="649.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_copy&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge23" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M614.93,-521.06C600.7,-524.21 584.36,-529.19 571,-537 537.08,-556.83 541.03,-577.26 509,-600"/>
+<title>module~s_util_copy&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M616.46,-520.73C601.88,-523.85 584.84,-528.91 571,-537 537.08,-556.83 541.56,-578.01 509,-600"/>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge120" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.98,-516.43C599.15,-518.52 581.46,-523.95 571,-537 515.96,-605.64 545.47,-1240.65 535,-1328 530.27,-1367.45 520.47,-1412.73 514.34,-1438.98"/>
-<polygon fill="#000000" stroke="#000000" points="510.87,-1438.45 511.97,-1448.99 517.68,-1440.07 510.87,-1438.45"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge76" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.17,-516.29C600.04,-518.26 581.73,-523.63 571,-537 517.38,-603.79 545.24,-1221.97 535,-1307 530.25,-1346.45 520.45,-1391.73 514.33,-1417.98"/>
+<polygon fill="#000000" stroke="#000000" points="510.86,-1417.45 511.96,-1427.99 517.67,-1419.07 510.86,-1417.45"/>
 </g>
-<!-- module~s_util_valid -->
-<g id="module~~swiftest_classes~~UsedByGraph_node23" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="682,-486 617,-486 617,-462 682,-462 682,-486"/>
-<text text-anchor="middle" x="649.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<!-- module~s_discard -->
+<g id="module~~swiftest_classes~~UsedByGraph_node24" class="node">
+<title>module~s_discard</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="678.5,-486 620.5,-486 620.5,-462 678.5,-462 678.5,-486"/>
+<text text-anchor="middle" x="649.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest_classes -->
+<!-- module~s_discard&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge24" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M616.63,-477.04C601.57,-479.79 584.08,-485.03 571,-495 527.89,-527.84 553.19,-568.63 509,-600"/>
+<title>module~s_discard&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M620.4,-476.39C604.57,-478.94 585.19,-484.19 571,-495 527.89,-527.84 553.91,-569.67 509,-600"/>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge121" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.94,-474.18C600.62,-476.07 581.88,-481.39 571,-495 513.13,-567.34 545.92,-1236 535,-1328 530.32,-1367.45 520.5,-1412.73 514.36,-1438.98"/>
-<polygon fill="#000000" stroke="#000000" points="510.89,-1438.45 511.98,-1448.99 517.7,-1440.07 510.89,-1438.45"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge77" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.43,-473.83C603.36,-475.35 582.68,-480.42 571,-495 514.55,-565.49 545.69,-1217.32 535,-1307 530.3,-1346.45 520.48,-1391.73 514.35,-1417.98"/>
+<polygon fill="#000000" stroke="#000000" points="510.88,-1417.45 511.97,-1427.99 517.69,-1419.07 510.88,-1417.45"/>
 </g>
-<!-- module~s_util_coord -->
-<g id="module~~swiftest_classes~~UsedByGraph_node24" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-444 614.5,-444 614.5,-420 684.5,-420 684.5,-444"/>
-<text text-anchor="middle" x="649.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<!-- module~s_util_sort -->
+<g id="module~~swiftest_classes~~UsedByGraph_node25" class="node">
+<title>module~s_util_sort</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="680,-444 619,-444 619,-420 680,-420 680,-444"/>
+<text text-anchor="middle" x="649.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_sort&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge25" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M614.46,-434.56C599.64,-437.24 582.97,-442.54 571,-453 517.61,-499.66 566.82,-558.95 509,-600"/>
+<title>module~s_util_sort&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M618.7,-433.86C602.91,-436.26 584.12,-441.53 571,-453 517.61,-499.66 567.76,-560.32 509,-600"/>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge123" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.16,-432.52C598.53,-434.68 581.26,-440.14 571,-453 540.65,-491.02 540.68,-1279.68 535,-1328 530.36,-1367.46 520.53,-1412.74 514.37,-1438.98"/>
-<polygon fill="#000000" stroke="#000000" points="510.9,-1438.45 511.99,-1448.99 517.71,-1440.08 510.9,-1438.45"/>
+<!-- module~s_util_sort&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge78" class="edge">
+<title>module~s_util_sort&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.88,-431.96C602.12,-433.65 582.31,-438.84 571,-453 541.36,-490.1 540.57,-1259.84 535,-1307 530.34,-1346.46 520.51,-1391.73 514.36,-1417.98"/>
+<polygon fill="#000000" stroke="#000000" points="510.89,-1417.45 511.98,-1427.99 517.7,-1419.08 510.89,-1417.45"/>
 </g>
-<!-- module~s_util_set -->
-<g id="module~~swiftest_classes~~UsedByGraph_node25" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="678.5,-402 620.5,-402 620.5,-378 678.5,-378 678.5,-402"/>
-<text text-anchor="middle" x="649.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<!-- module~s_util_resize -->
+<g id="module~~swiftest_classes~~UsedByGraph_node26" class="node">
+<title>module~s_util_resize</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="685.5,-402 613.5,-402 613.5,-378 685.5,-378 685.5,-402"/>
+<text text-anchor="middle" x="649.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_resize&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge26" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M620.21,-391.19C603.93,-393.31 584.15,-398.53 571,-411 506.87,-471.85 581.08,-548.82 509,-600"/>
+<title>module~s_util_resize&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M613.27,-392.26C598.57,-394.89 582.33,-400.25 571,-411 506.87,-471.85 582.26,-550.52 509,-600"/>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge124" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M620.4,-389.81C603.33,-391.32 582.64,-396.39 571,-411 539.23,-450.88 540.91,-1277.36 535,-1328 530.4,-1367.46 520.55,-1412.74 514.38,-1438.98"/>
-<polygon fill="#000000" stroke="#000000" points="510.91,-1438.45 511.99,-1448.99 517.72,-1440.08 510.91,-1438.45"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge80" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.36,-390.63C597.94,-392.86 581.08,-398.36 571,-411 539.94,-449.95 540.8,-1257.52 535,-1307 530.38,-1346.46 520.54,-1391.74 514.38,-1417.98"/>
+<polygon fill="#000000" stroke="#000000" points="510.91,-1417.45 511.99,-1427.99 517.72,-1419.08 510.91,-1417.45"/>
 </g>
-<!-- module~s_util_peri -->
-<g id="module~~swiftest_classes~~UsedByGraph_node26" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<!-- module~s_util_spill -->
+<g id="module~~swiftest_classes~~UsedByGraph_node27" class="node">
+<title>module~s_util_spill</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="680,-360 619,-360 619,-336 680,-336 680,-360"/>
-<text text-anchor="middle" x="649.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<text text-anchor="middle" x="649.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_spill&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge27" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M618.82,-349.08C602.67,-351.2 583.5,-356.47 571,-369 495.92,-444.26 595.68,-538.46 509,-600"/>
+<title>module~s_util_spill&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M618.82,-349.08C602.67,-351.2 583.5,-356.47 571,-369 495.92,-444.26 597.09,-540.51 509,-600"/>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge125" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.86,-347.95C602.09,-349.62 582.28,-354.82 571,-369 537.81,-410.73 541.13,-1275.04 535,-1328 530.43,-1367.47 520.57,-1412.74 514.4,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.92,-1438.46 512,-1449 517.73,-1440.09 510.92,-1438.46"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge85" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.86,-347.95C602.09,-349.63 582.29,-354.82 571,-369 538.52,-409.8 541.02,-1255.2 535,-1307 530.41,-1346.47 520.56,-1391.74 514.39,-1417.98"/>
+<polygon fill="#000000" stroke="#000000" points="510.92,-1417.46 512,-1427.99 517.73,-1419.08 510.92,-1417.46"/>
 </g>
 <!-- module~s_util_minimize_bfgs -->
-<g id="module~~swiftest_classes~~UsedByGraph_node27" class="node">
+<g id="module~~swiftest_classes~~UsedByGraph_node28" class="node">
 <title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<g id="a_module~~swiftest_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="705.5,-318 593.5,-318 593.5,-294 705.5,-294 705.5,-318"/>
 <text text-anchor="middle" x="649.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
@@ -1310,1000 +1356,953 @@ <h3 class="panel-title">Used by</h3>
 <!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge28" class="edge">
 <title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M593.14,-313.01C584.86,-316.17 577.08,-320.66 571,-327 484.85,-416.78 610.45,-527.97 509,-600"/>
+<path fill="none" stroke="#000000" d="M593.14,-313.01C584.86,-316.17 577.08,-320.66 571,-327 484.85,-416.78 612.11,-530.36 509,-600"/>
 </g>
 <!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge126" class="edge">
+<g id="module~~swiftest_classes~~UsedByGraph_edge86" class="edge">
 <title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M593.25,-311.63C584.64,-314.91 576.72,-319.79 571,-327 536.4,-370.58 541.36,-1272.72 535,-1328 530.46,-1367.47 520.6,-1412.74 514.41,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.94,-1438.46 512.01,-1449 517.74,-1440.09 510.94,-1438.46"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.5,-1463C228.82,-1471.19 212.79,-1447.04 164,-1463"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge36" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.86,-1459.4C459.81,-1458.62 429.56,-1458.63 403.5,-1463"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.5,-1463C368.61,-1468.51 332.52,-1453.41 308.6,-1440.21"/>
-<polygon fill="#000000" stroke="#000000" points="310.16,-1437.07 299.75,-1435.11 306.66,-1443.14 310.16,-1437.07"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge45" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.5,-1463C360.69,-1469.84 322.19,-1500.79 300.27,-1521.59"/>
-<polygon fill="#000000" stroke="#000000" points="297.67,-1519.23 292.97,-1528.73 302.56,-1524.24 297.67,-1519.23"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge52" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M491.28,-1473.15C474.24,-1486.32 446.84,-1507.5 427.19,-1522.69"/>
-<polygon fill="#000000" stroke="#000000" points="424.8,-1520.11 419.03,-1529 429.08,-1525.65 424.8,-1520.11"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge63" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.5,-1463C348.9,-1471.81 334.15,-1454.49 281.5,-1463"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.5,-1463C239.68,-1469.44 202.74,-1500.56 181.82,-1521.5"/>
-<polygon fill="#000000" stroke="#000000" points="179.05,-1519.33 174.61,-1528.95 184.08,-1524.2 179.05,-1519.33"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge141" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.5,-1463C346.39,-1472.24 367.35,-1526.74 324,-1562 322.47,-1563.25 320.85,-1564.44 319.17,-1565.59"/>
-<polygon fill="#000000" stroke="#000000" points="317.19,-1562.7 310.46,-1570.89 320.83,-1568.68 317.19,-1562.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M593.26,-311.63C584.65,-314.91 576.72,-319.8 571,-327 537.11,-369.65 541.25,-1252.88 535,-1307 530.45,-1346.47 520.59,-1391.74 514.4,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.93,-1417.46 512,-1428 517.74,-1419.09 510.93,-1417.46"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~swiftest_classes~~UsedByGraph_node29" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="680,-276 619,-276 619,-252 680,-252 680,-276"/>
-<text text-anchor="middle" x="649.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="705.5,-276 593.5,-276 593.5,-252 705.5,-252 705.5,-276"/>
+<text text-anchor="middle" x="649.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest_classes -->
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge29" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M618.87,-264.71C602.54,-266.7 583.17,-271.95 571,-285 473.71,-389.38 625.35,-517.4 509,-600"/>
-</g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge130" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.84,-263.93C602.07,-265.61 582.26,-270.8 571,-285 534.98,-330.43 541.58,-1270.4 535,-1328 530.49,-1367.47 520.62,-1412.75 514.42,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.95,-1438.46 512.01,-1449 517.75,-1440.09 510.95,-1438.46"/>
-</g>
-<!-- proc~xv2el -->
-<g id="module~~swiftest_classes~~UsedByGraph_node30" class="node">
-<title>proc~xv2el</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node30"><a xlink:href=".././proc/xv2el.html" xlink:title="xv2el">
-<polygon fill="#d9534f" stroke="#d9534f" points="190,-1435 136,-1435 136,-1411 190,-1411 190,-1435"/>
-<text text-anchor="middle" x="163" y="-1420.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xv2el</text>
-</a>
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M593.37,-270.71C584.97,-273.9 577.08,-278.47 571,-285 473.71,-389.38 627.25,-520.14 509,-600"/>
 </g>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge87" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M593.25,-269.62C584.64,-272.91 576.72,-277.79 571,-285 535.69,-329.51 541.47,-1250.56 535,-1307 530.48,-1346.47 520.61,-1391.74 514.41,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.94,-1417.46 512.01,-1428 517.75,-1419.09 510.94,-1417.46"/>
 </g>
-<!-- proc~xv2el&#45;&gt;module~swiftest_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge6" class="edge">
-<title>proc~xv2el&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.05,-1435.17C124.75,-1448.26 93.88,-1469.19 71.83,-1484.14"/>
-<polygon fill="#000000" stroke="#000000" points="69.59,-1481.44 63.28,-1489.95 73.52,-1487.23 69.59,-1481.44"/>
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge1" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.82,-1414.62C116.68,-1413.22 107.91,-1411.71 99.27,-1410.23"/>
+<polygon fill="#000000" stroke="#000000" points="99.69,-1406.75 89.24,-1408.51 98.5,-1413.65 99.69,-1406.75"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~swiftest_classes~~UsedByGraph_node31" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-234 616.5,-234 616.5,-210 682.5,-210 682.5,-234"/>
-<text text-anchor="middle" x="649.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="706.5,-234 592.5,-234 592.5,-210 706.5,-210 706.5,-234"/>
+<text text-anchor="middle" x="649.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest_classes -->
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge30" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M616.44,-222.91C600.59,-225.07 582.46,-230.43 571,-243 462.52,-362.03 640.31,-506.77 509,-600"/>
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M592.47,-228.9C584.37,-232.09 576.82,-236.61 571,-243 462.52,-362.03 642.46,-509.87 509,-600"/>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge132" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.49,-222.18C600.25,-224.1 581.73,-229.45 571,-243 533.56,-290.29 541.81,-1268.07 535,-1328 530.52,-1367.48 520.63,-1412.75 514.43,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.95,-1438.46 512.02,-1449 517.76,-1440.09 510.95,-1438.46"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge92" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M592.46,-227.92C584.15,-231.2 576.54,-236.01 571,-243 534.27,-289.36 541.69,-1248.24 535,-1307 530.5,-1346.48 520.62,-1391.75 514.42,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.95,-1417.46 512.01,-1428 517.76,-1419.09 510.95,-1417.46"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_util_fill -->
 <g id="module~~swiftest_classes~~UsedByGraph_node32" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<title>module~s_util_fill</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-192 622.5,-192 622.5,-168 676.5,-168 676.5,-192"/>
-<text text-anchor="middle" x="649.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<text text-anchor="middle" x="649.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_fill&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge31" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.46,-180.14C605.35,-181.68 583.83,-186.67 571,-201 451.3,-334.71 655.33,-496.11 509,-600"/>
+<title>module~s_util_fill&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.46,-180.14C605.35,-181.68 583.83,-186.67 571,-201 451.3,-334.71 657.72,-499.56 509,-600"/>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge133" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.26,-179.63C604.83,-180.92 583.02,-185.8 571,-201 532.15,-250.14 542.03,-1265.75 535,-1328 530.54,-1367.48 520.65,-1412.75 514.43,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.96,-1438.46 512.02,-1449 517.77,-1440.1 510.96,-1438.46"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge93" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.27,-179.63C604.84,-180.92 583.02,-185.8 571,-201 532.85,-249.21 541.92,-1245.91 535,-1307 530.53,-1346.48 520.64,-1391.75 514.43,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.96,-1417.46 512.02,-1428 517.76,-1419.1 510.96,-1417.46"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_io -->
 <g id="module~~swiftest_classes~~UsedByGraph_node33" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="706.5,-150 592.5,-150 592.5,-126 706.5,-126 706.5,-150"/>
-<text text-anchor="middle" x="649.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_io</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-150 622.5,-150 622.5,-126 676.5,-126 676.5,-150"/>
+<text text-anchor="middle" x="649.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes -->
+<!-- module~s_io&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge32" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M592.29,-144.74C584.21,-147.95 576.72,-152.52 571,-159 440.05,-307.42 670.39,-485.42 509,-600"/>
+<title>module~s_io&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.39,-138.08C605.25,-139.6 583.73,-144.57 571,-159 440.05,-307.42 673.03,-489.22 509,-600"/>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge134" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M592.44,-143.9C584.14,-147.19 576.53,-152 571,-159 530.73,-209.99 542.26,-1263.43 535,-1328 530.56,-1367.48 520.67,-1412.75 514.44,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.97,-1438.46 512.03,-1449 517.78,-1440.1 510.97,-1438.46"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge94" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.26,-137.62C604.83,-138.91 583.01,-143.8 571,-159 531.44,-209.06 542.14,-1243.59 535,-1307 530.55,-1346.48 520.66,-1391.75 514.44,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.97,-1417.46 512.03,-1428 517.77,-1419.1 510.97,-1417.46"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_util_solve -->
 <g id="module~~swiftest_classes~~UsedByGraph_node34" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-108 622.5,-108 622.5,-84 676.5,-84 676.5,-108"/>
-<text text-anchor="middle" x="649.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="683.5,-108 615.5,-108 615.5,-84 683.5,-84 683.5,-108"/>
+<text text-anchor="middle" x="649.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest_classes -->
+<!-- module~s_util_solve&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge33" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M622.34,-96.03C605.17,-97.53 583.64,-102.5 571,-117 499.9,-198.57 597.24,-537.35 509,-600"/>
+<title>module~s_util_solve&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M615.43,-96.81C599.71,-98.99 581.99,-104.39 571,-117 499.9,-198.57 598.68,-539.44 509,-600"/>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge137" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.25,-95.62C604.82,-96.9 583,-101.79 571,-117 529.31,-169.84 542.48,-1261.11 535,-1328 530.58,-1367.49 520.68,-1412.75 514.45,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.98,-1438.46 512.03,-1449 517.78,-1440.1 510.98,-1438.46"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge98" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.29,-96.31C599.34,-98.34 581.45,-103.76 571,-117 530.02,-168.92 542.37,-1241.27 535,-1307 530.57,-1346.48 520.67,-1391.75 514.45,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.97,-1417.46 512.03,-1428 517.78,-1419.1 510.97,-1417.46"/>
 </g>
-<!-- module~s_util_sort -->
+<!-- module~s_kick -->
 <g id="module~~swiftest_classes~~UsedByGraph_node35" class="node">
-<title>module~s_util_sort</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="680,-66 619,-66 619,-42 680,-42 680,-66"/>
-<text text-anchor="middle" x="649.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
+<title>module~s_kick</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="676.5,-66 622.5,-66 622.5,-42 676.5,-42 676.5,-66"/>
+<text text-anchor="middle" x="649.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest_classes -->
+<!-- module~s_kick&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge34" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M618.88,-54.32C602.33,-56.16 582.75,-61.38 571,-75 494.26,-163.95 604.79,-531.99 509,-600"/>
+<title>module~s_kick&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M622.29,-53.99C605.11,-55.47 583.57,-60.43 571,-75 494.26,-163.95 606.35,-534.25 509,-600"/>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge138" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.81,-53.91C602.03,-55.57 582.22,-60.77 571,-75 527.89,-129.7 542.71,-1258.79 535,-1328 530.6,-1367.49 520.69,-1412.75 514.46,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.99,-1438.46 512.04,-1449 517.79,-1440.1 510.99,-1438.46"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge101" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.25,-53.62C604.81,-54.9 583,-59.78 571,-75 528.6,-128.77 542.59,-1238.95 535,-1307 530.59,-1346.49 520.69,-1391.75 514.45,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.98,-1417.46 512.03,-1428 517.79,-1419.1 510.98,-1417.46"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~drift_implementation -->
 <g id="module~~swiftest_classes~~UsedByGraph_node36" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="688.5,-24 610.5,-24 610.5,0 688.5,0 688.5,-24"/>
-<text text-anchor="middle" x="649.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node36"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="704,-24 595,-24 595,0 704,0 704,-24"/>
+<text text-anchor="middle" x="649.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest_classes -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest_classes -->
 <g id="module~~swiftest_classes~~UsedByGraph_edge35" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" d="M610.15,-13.54C595.82,-16.14 580.69,-21.66 571,-33 488.62,-129.33 612.35,-526.62 509,-600"/>
-<path fill="none" stroke="#000000" d="M162,-1463C138.44,-1470.71 112.27,-1479.45 90.71,-1486.71"/>
-<polygon fill="#000000" stroke="#000000" points="89.51,-1483.42 81.15,-1489.92 91.74,-1490.05 89.51,-1483.42"/>
-<path fill="none" stroke="#000000" d="M507,-600C181.66,-830.99 464.73,-1144.58 201,-1444 188.78,-1457.87 181.57,-1457.25 164,-1463"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" d="M507,-600C204.56,-804.26 446.85,-1092.28 201,-1362 188.55,-1375.66 182,-1376.79 164,-1381"/>
+<path fill="none" stroke="#000000" d="M594.86,-17.54C585.76,-20.8 577.25,-25.69 571,-33 488.62,-129.33 620.45,-539.63 509,-600"/>
+<path fill="none" stroke="#000000" d="M162,-1381C141.55,-1384.78 119.04,-1388.7 99.3,-1392.06"/>
+<polygon fill="#000000" stroke="#000000" points="98.53,-1388.64 89.25,-1393.76 99.7,-1395.54 98.53,-1388.64"/>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge139" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.48,-13.01C595.84,-15.48 580.4,-21.06 571,-33 526.48,-89.55 542.93,-1256.47 535,-1328 530.62,-1367.49 520.71,-1412.76 514.46,-1438.99"/>
-<polygon fill="#000000" stroke="#000000" points="510.99,-1438.46 512.04,-1449 517.8,-1440.1 510.99,-1438.46"/>
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge104" class="edge">
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.78,-17.01C585.57,-20.29 577.04,-25.33 571,-33 527.19,-88.62 542.82,-1236.63 535,-1307 530.61,-1346.49 520.7,-1391.76 514.46,-1417.99"/>
+<polygon fill="#000000" stroke="#000000" points="510.99,-1417.46 512.04,-1428 517.79,-1419.1 510.99,-1417.46"/>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~swiftest_classes~~UsedByGraph_node37" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2040 610,-2040 610,-2016 689,-2016 689,-2040"/>
-<text text-anchor="middle" x="649.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="708.5,-2250 590.5,-2250 590.5,-2226 708.5,-2226 708.5,-2250"/>
+<text text-anchor="middle" x="649.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge53" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M609.73,-2024.5C596.19,-2021.59 581.71,-2016.36 571,-2007 517.61,-1960.34 566.47,-1901.53 509,-1860"/>
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge36" class="edge">
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.4,-2230.91C582.96,-2227.7 576.16,-2223.22 571,-2217 538.62,-2177.97 539.04,-1812.55 535,-1762 526.01,-1649.5 515.09,-1514.9 510.83,-1462.46"/>
+<polygon fill="#000000" stroke="#000000" points="514.3,-1461.97 510,-1452.28 507.32,-1462.53 514.3,-1461.97"/>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge72" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.77,-2026.37C595.57,-2023.74 580.63,-2018.21 571,-2007 536.32,-1966.62 514.99,-1581.73 510.09,-1483.65"/>
-<polygon fill="#000000" stroke="#000000" points="513.57,-1483.21 509.58,-1473.39 506.58,-1483.55 513.57,-1483.21"/>
+<!-- module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge125" class="edge">
+<title>module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M590.28,-2227.62C583.39,-2224.87 576.77,-2221.39 571,-2217 527.89,-2184.16 557.58,-2136.01 509,-2112"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_symba_collision -->
 <g id="module~~swiftest_classes~~UsedByGraph_node38" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-1998 610,-1998 610,-1974 689,-1974 689,-1998"/>
-<text text-anchor="middle" x="649.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="699,-1956 600,-1956 600,-1932 699,-1932 699,-1956"/>
+<text text-anchor="middle" x="649.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge54" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M609.99,-1981.61C596.63,-1978.6 582.2,-1973.53 571,-1965 527.89,-1932.16 552.93,-1891.74 509,-1860"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge39" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M599.77,-1939.91C588.9,-1936.74 578.42,-1931.51 571,-1923 540.27,-1887.75 516.34,-1552.59 510.42,-1462.31"/>
+<polygon fill="#000000" stroke="#000000" points="513.91,-1462.08 509.77,-1452.33 506.92,-1462.53 513.91,-1462.08"/>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge75" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.83,-1984.32C595.63,-1981.68 580.68,-1976.16 571,-1965 538.95,-1928.04 515.87,-1576.24 510.3,-1483.38"/>
-<polygon fill="#000000" stroke="#000000" points="513.79,-1483.16 509.7,-1473.38 506.8,-1483.57 513.79,-1483.16"/>
+<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge115" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M599.67,-1937.92C589.31,-1934.78 579.08,-1930.06 571,-1923 517.61,-1876.34 566.16,-1817.96 509,-1776"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~swiftest_classes~~UsedByGraph_node39" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node39"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="676.5,-1620 622.5,-1620 622.5,-1596 676.5,-1596 676.5,-1620"/>
-<text text-anchor="middle" x="649.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="694,-2208 605,-2208 605,-2184 694,-2184 694,-2208"/>
+<text text-anchor="middle" x="649.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge74" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.2,-1606.91C605.63,-1604.9 584.83,-1599.76 571,-1587 536.27,-1554.98 560.31,-1526.88 535,-1487 533.62,-1484.83 532.04,-1482.7 530.34,-1480.65"/>
-<polygon fill="#000000" stroke="#000000" points="532.83,-1478.19 523.47,-1473.23 527.7,-1482.95 532.83,-1478.19"/>
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge41" class="edge">
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M604.76,-2193.5C592.07,-2190.57 579.39,-2185.06 571,-2175 568.06,-2171.48 520.63,-1584.38 510.78,-1462.14"/>
+<polygon fill="#000000" stroke="#000000" points="514.26,-1461.77 509.97,-1452.08 507.29,-1462.33 514.26,-1461.77"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_fraggle_setup&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge126" class="edge">
+<title>module~s_fraggle_setup&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M604.65,-2188.41C593.21,-2185.3 581.23,-2180.98 571,-2175 537.08,-2155.17 544.22,-2129.41 509,-2112"/>
+</g>
+<!-- module~s_symba_encounter_check -->
 <g id="module~~swiftest_classes~~UsedByGraph_node40" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-2838 616.5,-2838 616.5,-2814 682.5,-2814 682.5,-2838"/>
-<text text-anchor="middle" x="649.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="721,-1914 578,-1914 578,-1890 721,-1890 721,-1914"/>
+<text text-anchor="middle" x="649.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge66" class="edge">
-<title>module~s_whm_util&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M616.24,-2822.89C601.28,-2820.12 583.97,-2814.88 571,-2805 527.89,-2772.16 560.73,-2716.15 509,-2700"/>
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge43" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M581.46,-1889.81C577.59,-1887.36 574.04,-1884.45 571,-1881 542.91,-1849.17 517.38,-1547.34 510.7,-1462.24"/>
+<polygon fill="#000000" stroke="#000000" points="514.18,-1461.83 509.91,-1452.13 507.2,-1462.37 514.18,-1461.83"/>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge76" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.12,-2825.75C599.98,-2823.79 581.67,-2818.42 571,-2805 537.81,-2763.27 537.8,-1899.24 535,-1846 527.75,-1708.04 515.31,-1542.53 510.75,-1483.37"/>
-<polygon fill="#000000" stroke="#000000" points="514.23,-1482.99 509.96,-1473.29 507.25,-1483.53 514.23,-1482.99"/>
+<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge119" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M586.34,-1889.95C580.87,-1887.5 575.66,-1884.55 571,-1881 527.89,-1848.16 552.69,-1808.07 509,-1776"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_whm_coord -->
 <g id="module~~swiftest_classes~~UsedByGraph_node41" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2250 610,-2250 610,-2226 689,-2226 689,-2250"/>
-<text text-anchor="middle" x="649.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
-</a>
-</g>
-</g>
-<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge47" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M609.85,-2231.75C596.92,-2228.59 582.79,-2223.89 571,-2217 537.08,-2197.17 541.47,-2176.11 509,-2154"/>
-</g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge77" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610,-2236.59C595.64,-2234.02 580.54,-2228.47 571,-2217 558.93,-2202.49 518.73,-1607.24 510.48,-1483.42"/>
-<polygon fill="#000000" stroke="#000000" points="513.96,-1482.98 509.81,-1473.23 506.98,-1483.44 513.96,-1482.98"/>
-</g>
-<!-- module~s_whm_setup -->
-<g id="module~~swiftest_classes~~UsedByGraph_node42" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2796 610,-2796 610,-2772 689,-2772 689,-2796"/>
-<text text-anchor="middle" x="649.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~s_whm_coord</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2838 610,-2838 610,-2814 689,-2814 689,-2838"/>
+<text text-anchor="middle" x="649.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge67" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M609.85,-2777.75C596.92,-2774.59 582.79,-2769.89 571,-2763 537.08,-2743.17 546.5,-2711.71 509,-2700"/>
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge44" class="edge">
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.72,-2824.82C595.33,-2822.27 580.27,-2816.69 571,-2805 534.98,-2759.57 538.33,-1819.88 535,-1762 528.51,-1649.33 516.16,-1514.82 511.17,-1462.43"/>
+<polygon fill="#000000" stroke="#000000" points="514.63,-1461.89 510.2,-1452.27 507.67,-1462.56 514.63,-1461.89"/>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge79" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.74,-2782.8C595.36,-2780.25 580.29,-2774.67 571,-2763 539.23,-2723.12 537.72,-1896.91 535,-1846 527.64,-1708.05 515.27,-1542.54 510.73,-1483.37"/>
-<polygon fill="#000000" stroke="#000000" points="514.21,-1482.99 509.96,-1473.29 507.23,-1483.53 514.21,-1482.99"/>
+<!-- module~s_whm_coord&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge137" class="edge">
+<title>module~s_whm_coord&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M609.99,-2821.61C596.63,-2818.6 582.2,-2813.53 571,-2805 527.89,-2772.16 563.16,-2697.95 509,-2700"/>
 </g>
 <!-- module~s_rmvs_step -->
-<g id="module~~swiftest_classes~~UsedByGraph_node43" class="node">
+<g id="module~~swiftest_classes~~UsedByGraph_node42" class="node">
 <title>module~s_rmvs_step</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<g id="a_module~~swiftest_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="686,-2544 613,-2544 613,-2520 686,-2520 686,-2544"/>
 <text text-anchor="middle" x="649.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge129" class="edge">
+<g id="module~~swiftest_classes~~UsedByGraph_edge47" class="edge">
 <title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.64,-2531.19C597.46,-2528.87 580.99,-2523.36 571,-2511 524.46,-2453.47 539.49,-1919.86 535,-1846 526.61,-1708.11 514.87,-1542.56 510.62,-1483.38"/>
-<polygon fill="#000000" stroke="#000000" points="514.1,-1483.02 509.89,-1473.3 507.12,-1483.52 514.1,-1483.02"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.61,-2531.22C597.41,-2528.9 580.96,-2523.39 571,-2511 544.9,-2478.53 537.68,-1803.57 535,-1762 527.75,-1649.37 515.83,-1514.84 511.06,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.53,-1461.91 510.14,-1452.27 507.56,-1462.55 514.53,-1461.91"/>
 </g>
 <!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge144" class="edge">
+<g id="module~~swiftest_classes~~UsedByGraph_edge145" class="edge">
 <title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M612.75,-2528.21C598.64,-2525.29 582.98,-2520.12 571,-2511 527.89,-2478.16 557.8,-2429.58 509,-2406"/>
+<path fill="none" stroke="#000000" d="M612.75,-2528.21C598.64,-2525.29 582.98,-2520.12 571,-2511 527.89,-2478.16 563.19,-2406 509,-2406"/>
 </g>
-<!-- module~s_symba_encounter_check -->
-<g id="module~~swiftest_classes~~UsedByGraph_node44" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="721,-1956 578,-1956 578,-1932 721,-1932 721,-1956"/>
-<text text-anchor="middle" x="649.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<!-- proc~ge_wpp -->
+<g id="module~~swiftest_classes~~UsedByGraph_node43" class="node">
+<title>proc~ge_wpp</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node43"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="676.5,-1578 622.5,-1578 622.5,-1554 676.5,-1554 676.5,-1578"/>
+<text text-anchor="middle" x="649.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge56" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M590.4,-1931.92C583.64,-1929.46 577.02,-1926.52 571,-1923 537.08,-1903.17 540.84,-1883.01 509,-1860"/>
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge49" class="edge">
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.23,-1563.9C606.09,-1561.46 585.75,-1556.24 571,-1545 542.98,-1523.66 525.19,-1485.7 516.17,-1461.75"/>
+<polygon fill="#000000" stroke="#000000" points="519.4,-1460.37 512.74,-1452.13 512.81,-1462.73 519.4,-1460.37"/>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge86" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M581.43,-1931.83C577.57,-1929.38 574.03,-1926.46 571,-1923 512.6,-1856.39 508.74,-1565.8 508.85,-1483.06"/>
-<polygon fill="#000000" stroke="#000000" points="512.35,-1483.02 508.89,-1473.01 505.35,-1483 512.35,-1483.02"/>
+<!-- module~s_operator_cross -->
+<g id="module~~swiftest_classes~~UsedByGraph_node44" class="node">
+<title>module~s_operator_cross</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="697.5,-1536 601.5,-1536 601.5,-1512 697.5,-1512 697.5,-1536"/>
+<text text-anchor="middle" x="649.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+</a>
 </g>
-<!-- module~s_helio_step -->
+</g>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge50" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.41,-1515.5C590.97,-1512.48 580.27,-1508.42 571,-1503 552.35,-1492.1 535.46,-1474.13 524.04,-1460.17"/>
+<polygon fill="#000000" stroke="#000000" points="526.61,-1457.78 517.66,-1452.1 521.11,-1462.11 526.61,-1457.78"/>
+</g>
+<!-- module~s_fraggle_set -->
 <g id="module~~swiftest_classes~~UsedByGraph_node45" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="686,-2208 613,-2208 613,-2184 686,-2184 686,-2208"/>
-<text text-anchor="middle" x="649.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="688,-2166 611,-2166 611,-2142 688,-2142 688,-2166"/>
+<text text-anchor="middle" x="649.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge48" class="edge">
-<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M612.98,-2191.4C583.15,-2186.18 540.46,-2175.43 509,-2154"/>
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge51" class="edge">
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.84,-2152.7C596.26,-2150.18 580.76,-2144.64 571,-2133 565.46,-2126.39 520.46,-1580.03 510.82,-1462.22"/>
+<polygon fill="#000000" stroke="#000000" points="514.3,-1461.88 510,-1452.19 507.32,-1462.45 514.3,-1461.88"/>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge82" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.83,-2195.04C597.68,-2192.69 581.19,-2187.19 571,-2175 559.6,-2161.36 519.11,-1602.62 510.58,-1483.28"/>
-<polygon fill="#000000" stroke="#000000" points="514.06,-1482.86 509.86,-1473.14 507.08,-1483.36 514.06,-1482.86"/>
+<!-- module~s_fraggle_set&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge128" class="edge">
+<title>module~s_fraggle_set&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M610.81,-2146.25C581.99,-2139.49 541.76,-2128.19 509,-2112"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- module~s_fraggle_io -->
 <g id="module~~swiftest_classes~~UsedByGraph_node46" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="699,-1914 600,-1914 600,-1890 699,-1890 699,-1914"/>
-<text text-anchor="middle" x="649.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="685,-2124 614,-2124 614,-2100 685,-2100 685,-2124"/>
+<text text-anchor="middle" x="649.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge57" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M599.75,-1895.49C571.21,-1889.79 535.65,-1879.26 509,-1860"/>
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge52" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.67,-2111.12C598.31,-2108.83 581.42,-2103.36 571,-2091 560.61,-2078.68 519.83,-1575.47 510.78,-1462.4"/>
+<polygon fill="#000000" stroke="#000000" points="514.25,-1461.86 509.97,-1452.17 507.27,-1462.41 514.25,-1461.86"/>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge85" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M599.88,-1897.81C589.01,-1894.64 578.5,-1889.44 571,-1881 517.93,-1821.26 510.28,-1561.4 509.18,-1483.29"/>
-<polygon fill="#000000" stroke="#000000" points="512.68,-1483.09 509.06,-1473.13 505.68,-1483.17 512.68,-1483.09"/>
+<!-- module~s_fraggle_io&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge130" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M613.89,-2120.18C584.43,-2125.29 541.78,-2128.2 509,-2112"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~swiftest_classes~~UsedByGraph_node47" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="687,-1872 612,-1872 612,-1848 687,-1848 687,-1872"/>
-<text text-anchor="middle" x="649.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="685,-2502 614,-2502 614,-2478 685,-2478 685,-2502"/>
+<text text-anchor="middle" x="649.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge58" class="edge">
-<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M611.7,-1870.94C581.28,-1877.62 538.45,-1881.28 509,-1860"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge53" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.82,-2489.38C598.3,-2487.17 581.24,-2481.7 571,-2469 521.63,-2407.77 540.17,-1840.49 535,-1762 527.59,-1649.38 515.76,-1514.85 511.04,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.51,-1461.92 510.12,-1452.27 507.54,-1462.55 514.51,-1461.92"/>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge84" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.66,-1858.41C597.03,-1855.86 581.28,-1850.38 571,-1839 523.2,-1786.05 511.97,-1556.41 509.59,-1483.38"/>
-<polygon fill="#000000" stroke="#000000" points="513.08,-1482.95 509.28,-1473.06 506.08,-1483.16 513.08,-1482.95"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge147" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M613.77,-2484.68C599.82,-2481.52 584,-2476.6 571,-2469 537.08,-2449.17 548.28,-2406 509,-2406"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_rmvs_io -->
 <g id="module~~swiftest_classes~~UsedByGraph_node48" class="node">
-<title>module~orbel</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node48"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="676.5,-1578 622.5,-1578 622.5,-1554 676.5,-1554 676.5,-1578"/>
-<text text-anchor="middle" x="649.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="680,-2460 619,-2460 619,-2436 680,-2436 680,-2460"/>
+<text text-anchor="middle" x="649.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge83" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.32,-1563.78C606.21,-1561.31 585.87,-1556.07 571,-1545 546.66,-1526.88 553.85,-1510.77 535,-1487 533.33,-1484.9 531.52,-1482.79 529.64,-1480.73"/>
-<polygon fill="#000000" stroke="#000000" points="531.78,-1477.9 522.31,-1473.15 526.74,-1482.77 531.78,-1477.9"/>
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge55" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.94,-2447.99C602.2,-2446.28 582.4,-2441.09 571,-2427 524.46,-2369.47 539.98,-1835.83 535,-1762 527.41,-1649.39 515.69,-1514.85 511.02,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.49,-1461.92 510.11,-1452.27 507.51,-1462.55 514.49,-1461.92"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge142" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M618.94,-2440.45C604.43,-2436.63 586.74,-2431.79 571,-2427 543.17,-2418.52 538.09,-2406 509,-2406"/>
+</g>
+<!-- proc~solve_wbs -->
 <g id="module~~swiftest_classes~~UsedByGraph_node49" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-2502 614.5,-2502 614.5,-2478 684.5,-2478 684.5,-2502"/>
-<text text-anchor="middle" x="649.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node49"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="680.5,-1494 618.5,-1494 618.5,-1470 680.5,-1470 680.5,-1494"/>
+<text text-anchor="middle" x="649.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge122" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.26,-2489.4C598.64,-2487.23 581.37,-2481.77 571,-2469 527.3,-2415.17 539.34,-1915.2 535,-1846 526.36,-1708.13 514.77,-1542.56 510.59,-1483.38"/>
-<polygon fill="#000000" stroke="#000000" points="514.07,-1483.03 509.87,-1473.3 507.09,-1483.52 514.07,-1483.03"/>
-</g>
-<!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge145" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M614.16,-2484.76C600.11,-2481.61 584.12,-2476.67 571,-2469 537.08,-2449.17 544.37,-2423.09 509,-2406"/>
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge58" class="edge">
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.2,-1474.25C603.83,-1470.46 586.47,-1465.71 571,-1461 562.48,-1458.41 553.37,-1455.43 544.83,-1452.56"/>
+<polygon fill="#000000" stroke="#000000" points="545.72,-1449.16 535.13,-1449.25 543.47,-1455.79 545.72,-1449.16"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_whm_gr -->
 <g id="module~~swiftest_classes~~UsedByGraph_node50" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-2166 614.5,-2166 614.5,-2142 684.5,-2142 684.5,-2166"/>
-<text text-anchor="middle" x="649.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="680.5,-2796 618.5,-2796 618.5,-2772 680.5,-2772 680.5,-2796"/>
+<text text-anchor="middle" x="649.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge49" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M614.39,-2164C584.05,-2170.73 539.83,-2174.99 509,-2154"/>
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge60" class="edge">
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.46,-2784.02C601.77,-2782.31 582.18,-2777.08 571,-2763 536.4,-2719.42 538.24,-1817.55 535,-1762 528.43,-1649.33 516.12,-1514.83 511.16,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.62,-1461.89 510.19,-1452.27 507.65,-1462.56 514.62,-1461.89"/>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge87" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.45,-2153.25C598.88,-2151.04 581.59,-2145.59 571,-2133 549.56,-2107.5 517.28,-1596.89 510.34,-1483.27"/>
-<polygon fill="#000000" stroke="#000000" points="513.82,-1482.78 509.72,-1473.01 506.83,-1483.2 513.82,-1482.78"/>
+<!-- module~s_whm_gr&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge136" class="edge">
+<title>module~s_whm_gr&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M618.35,-2779.66C603.37,-2776.58 585.44,-2771.44 571,-2763 537.08,-2743.17 548.26,-2698.51 509,-2700"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~swiftest_classes~~UsedByGraph_node51" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="690.5,-1830 608.5,-1830 608.5,-1806 690.5,-1806 690.5,-1830"/>
-<text text-anchor="middle" x="649.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-2418 614.5,-2418 614.5,-2394 684.5,-2394 684.5,-2418"/>
+<text text-anchor="middle" x="649.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge60" class="edge">
-<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M608.14,-1828.43C596.14,-1831.66 583,-1835.35 571,-1839 543.17,-1847.48 532.58,-1877.04 509,-1860"/>
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge61" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.26,-2405.4C598.64,-2403.23 581.37,-2397.77 571,-2385 527.3,-2331.17 539.79,-1831.17 535,-1762 527.2,-1649.41 515.6,-1514.86 510.99,-1462.45"/>
+<polygon fill="#000000" stroke="#000000" points="514.46,-1461.93 510.09,-1452.28 507.49,-1462.54 514.46,-1461.93"/>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge88" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.16,-1815.62C594.61,-1812.81 580.54,-1807.36 571,-1797 528.45,-1750.81 513.87,-1551.15 510.1,-1483.51"/>
-<polygon fill="#000000" stroke="#000000" points="513.58,-1482.95 509.55,-1473.15 506.59,-1483.32 513.58,-1482.95"/>
+<!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge143" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M614.39,-2406C586.15,-2406 544.96,-2406 509,-2406"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~swiftest_classes~~UsedByGraph_node52" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="680.5,-2124 618.5,-2124 618.5,-2100 680.5,-2100 680.5,-2124"/>
-<text text-anchor="middle" x="649.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="697.5,-2082 601.5,-2082 601.5,-2058 697.5,-2058 697.5,-2082"/>
+<text text-anchor="middle" x="649.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge50" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M618.2,-2119.75C603.83,-2123.54 586.47,-2128.29 571,-2133 543.17,-2141.48 533.05,-2170.38 509,-2154"/>
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge62" class="edge">
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.22,-2066.5C589.79,-2063.38 578.67,-2058.03 571,-2049 561.28,-2037.54 520.31,-1570.68 510.92,-1462.31"/>
+<polygon fill="#000000" stroke="#000000" points="514.4,-1461.85 510.05,-1452.18 507.42,-1462.45 514.4,-1461.85"/>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge90" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.39,-2111.72C601.9,-2109.87 582.52,-2104.62 571,-2091 550.9,-2067.25 517.84,-1592.42 510.48,-1483.24"/>
-<polygon fill="#000000" stroke="#000000" points="513.96,-1482.81 509.8,-1473.06 506.98,-1483.28 513.96,-1482.81"/>
+<!-- module~s_fraggle_regime&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge127" class="edge">
+<title>module~s_fraggle_regime&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M602.06,-2082.08C591.79,-2084.89 581,-2087.95 571,-2091 543.17,-2099.48 535.08,-2124.89 509,-2112"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~swiftest_classes~~UsedByGraph_node53" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="697.5,-1788 601.5,-1788 601.5,-1764 697.5,-1764 697.5,-1788"/>
-<text text-anchor="middle" x="649.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="693.5,-2376 605.5,-2376 605.5,-2352 693.5,-2352 693.5,-2376"/>
+<text text-anchor="middle" x="649.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge61" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M601.41,-1784.5C590.97,-1787.52 580.27,-1791.58 571,-1797 537.08,-1816.83 540.84,-1883.01 509,-1860"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge65" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.43,-2361.8C592.47,-2358.92 579.46,-2353.37 571,-2343 530.13,-2292.87 539.6,-1826.52 535,-1762 526.97,-1649.42 515.5,-1514.87 510.96,-1462.45"/>
+<polygon fill="#000000" stroke="#000000" points="514.43,-1461.94 510.07,-1452.28 507.45,-1462.54 514.43,-1461.94"/>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge91" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.45,-1771.83C590.15,-1768.7 579.04,-1763.51 571,-1755 533.65,-1715.47 516.01,-1545.28 510.75,-1483.51"/>
-<polygon fill="#000000" stroke="#000000" points="514.22,-1482.97 509.91,-1473.29 507.24,-1483.54 514.22,-1482.97"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge144" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M605.32,-2375.19C594.11,-2378.24 582.07,-2381.63 571,-2385 543.17,-2393.48 538.09,-2406 509,-2406"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_helio_drift -->
 <g id="module~~swiftest_classes~~UsedByGraph_node54" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="686,-2754 613,-2754 613,-2730 686,-2730 686,-2754"/>
-<text text-anchor="middle" x="649.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-1368 614.5,-1368 614.5,-1344 684.5,-1344 684.5,-1368"/>
+<text text-anchor="middle" x="649.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge69" class="edge">
-<title>module~s_whm_step&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M612.87,-2732.84C599.67,-2729.32 584.6,-2725.14 571,-2721 543.17,-2712.52 536.77,-2708.67 509,-2700"/>
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge67" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.16,-1361.24C600.11,-1364.39 584.12,-1369.33 571,-1377 552.35,-1387.9 535.46,-1405.87 524.04,-1419.83"/>
+<polygon fill="#000000" stroke="#000000" points="521.11,-1417.89 517.66,-1427.9 526.61,-1422.22 521.11,-1417.89"/>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge89" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.97,-2741.31C597.66,-2739.04 581,-2733.53 571,-2721 540.65,-2682.98 537.64,-1894.58 535,-1846 527.51,-1708.06 515.21,-1542.54 510.72,-1483.37"/>
-<polygon fill="#000000" stroke="#000000" points="514.2,-1483 509.95,-1473.29 507.22,-1483.53 514.2,-1483"/>
+<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge109" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M614.46,-1349.35C600.62,-1345.99 584.68,-1341.28 571,-1335 540.75,-1321.12 542.19,-1290.55 509,-1293"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_helio_kick -->
 <g id="module~~swiftest_classes~~UsedByGraph_node55" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="693.5,-2460 605.5,-2460 605.5,-2436 693.5,-2436 693.5,-2460"/>
-<text text-anchor="middle" x="649.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
-</a>
-</g>
-</g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge92" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.43,-2445.8C592.47,-2442.92 579.46,-2437.37 571,-2427 530.13,-2376.87 539.18,-1910.54 535,-1846 526.07,-1708.14 514.66,-1542.57 510.56,-1483.38"/>
-<polygon fill="#000000" stroke="#000000" points="514.04,-1483.03 509.86,-1473.3 507.06,-1483.52 514.04,-1483.03"/>
-</g>
-<!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge146" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M605.38,-2438.75C577.13,-2431.8 539.86,-2420.91 509,-2406"/>
-</g>
-<!-- module~whm_drift -->
-<g id="module~~swiftest_classes~~UsedByGraph_node56" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node56"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="679,-2712 620,-2712 620,-2688 679,-2688 679,-2712"/>
-<text text-anchor="middle" x="649.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-1326 614.5,-1326 614.5,-1302 684.5,-1302 684.5,-1326"/>
+<text text-anchor="middle" x="649.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge70" class="edge">
-<title>module~whm_drift&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M619.97,-2704.87C591.23,-2708.66 545.99,-2711.55 509,-2700"/>
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge69" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.31,-1317.48C599.81,-1320.34 583.42,-1325.54 571,-1335 542.98,-1356.34 525.19,-1394.3 516.17,-1418.25"/>
+<polygon fill="#000000" stroke="#000000" points="512.81,-1417.27 512.74,-1427.87 519.4,-1419.63 512.81,-1417.27"/>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge93" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.66,-2700.11C602.74,-2698.5 582.49,-2693.37 571,-2679 542.07,-2642.83 537.56,-1892.25 535,-1846 527.36,-1708.07 515.16,-1542.54 510.7,-1483.37"/>
-<polygon fill="#000000" stroke="#000000" points="514.18,-1483 509.94,-1473.29 507.2,-1483.53 514.18,-1483"/>
+<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge111" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M614.27,-1304.52C586.13,-1297.77 545.15,-1290.33 509,-1293"/>
 </g>
 <!-- module~s_rmvs_util -->
-<g id="module~~swiftest_classes~~UsedByGraph_node57" class="node">
+<g id="module~~swiftest_classes~~UsedByGraph_node56" class="node">
 <title>module~s_rmvs_util</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="683,-2418 616,-2418 616,-2394 683,-2394 683,-2418"/>
-<text text-anchor="middle" x="649.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="683,-2334 616,-2334 616,-2310 683,-2310 683,-2334"/>
+<text text-anchor="middle" x="649.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
 <!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge94" class="edge">
+<g id="module~~swiftest_classes~~UsedByGraph_edge72" class="edge">
 <title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.89,-2405.58C599.89,-2403.54 581.78,-2398.15 571,-2385 532.96,-2338.57 539.02,-1905.89 535,-1846 525.74,-1708.17 514.53,-1542.58 510.52,-1483.38"/>
-<polygon fill="#000000" stroke="#000000" points="514,-1483.04 509.83,-1473.3 507.02,-1483.51 514,-1483.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M615.89,-2321.58C599.89,-2319.54 581.78,-2314.15 571,-2301 532.96,-2254.57 539.42,-1821.86 535,-1762 526.7,-1649.44 515.38,-1514.88 510.92,-1462.45"/>
+<polygon fill="#000000" stroke="#000000" points="514.39,-1461.94 510.05,-1452.28 507.42,-1462.54 514.39,-1461.94"/>
 </g>
 <!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge147" class="edge">
+<g id="module~~swiftest_classes~~UsedByGraph_edge148" class="edge">
 <title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M615.99,-2413.68C586.53,-2418.91 542.69,-2422.28 509,-2406"/>
+<path fill="none" stroke="#000000" d="M615.7,-2326.9C601.29,-2330.03 584.6,-2335.05 571,-2343 537.08,-2362.83 548.28,-2406 509,-2406"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- program~swiftest_driver -->
+<g id="module~~swiftest_classes~~UsedByGraph_node57" class="node">
+<title>program~swiftest_driver</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node57"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="690,-1452 609,-1452 609,-1428 690,-1428 690,-1452"/>
+<text text-anchor="middle" x="649.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+</a>
+</g>
+</g>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge73" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.9,-1440C588.82,-1440 564.62,-1440 545.07,-1440"/>
+<polygon fill="#000000" stroke="#000000" points="545.03,-1436.5 535.03,-1440 545.03,-1443.5 545.03,-1436.5"/>
+</g>
+<!-- module~s_symba_step -->
 <g id="module~~swiftest_classes~~UsedByGraph_node58" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="685,-1662 614,-1662 614,-1638 685,-1638 685,-1662"/>
-<text text-anchor="middle" x="649.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="690.5,-1872 608.5,-1872 608.5,-1848 690.5,-1848 690.5,-1872"/>
+<text text-anchor="middle" x="649.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge43" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M613.68,-1644.06C599.87,-1640.82 584.17,-1636.01 571,-1629 505.63,-1594.22 506.5,-1561.24 445,-1520 409.84,-1496.42 396.41,-1498.6 360,-1477 341.33,-1465.92 321.17,-1452.01 305.96,-1441.08"/>
-<polygon fill="#000000" stroke="#000000" points="307.77,-1438.07 297.62,-1435.04 303.66,-1443.74 307.77,-1438.07"/>
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge74" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.4,-1857.85C594.71,-1855.08 580.48,-1849.59 571,-1839 520.63,-1782.74 511.13,-1538.59 509.38,-1462.64"/>
+<polygon fill="#000000" stroke="#000000" points="512.88,-1462.24 509.17,-1452.32 505.88,-1462.39 512.88,-1462.24"/>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge95" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.71,-1648.24C598.73,-1645.73 582.15,-1640.33 571,-1629 525.34,-1582.59 567.17,-1543.6 535,-1487 533.73,-1484.77 532.22,-1482.59 530.57,-1480.51"/>
-<polygon fill="#000000" stroke="#000000" points="533.09,-1478.09 523.77,-1473.05 527.92,-1482.8 533.09,-1478.09"/>
+<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge117" class="edge">
+<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M608.26,-1853.36C595.77,-1850.2 582.31,-1845.61 571,-1839 537.08,-1819.17 540.67,-1799.25 509,-1776"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_symba_util -->
 <g id="module~~swiftest_classes~~UsedByGraph_node59" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="680,-2376 619,-2376 619,-2352 680,-2352 680,-2376"/>
-<text text-anchor="middle" x="649.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="687,-1830 612,-1830 612,-1806 687,-1806 687,-1830"/>
+<text text-anchor="middle" x="649.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge99" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.64,-2363.88C602.01,-2362.11 582.42,-2356.89 571,-2343 569.23,-2340.85 519.86,-1619.87 510.52,-1483.21"/>
-<polygon fill="#000000" stroke="#000000" points="514,-1482.84 509.83,-1473.1 507.02,-1483.32 514,-1482.84"/>
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge75" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.71,-1816.36C597.09,-1813.8 581.33,-1808.33 571,-1797 525.84,-1747.45 512.9,-1532.95 509.83,-1462.51"/>
+<polygon fill="#000000" stroke="#000000" points="513.32,-1461.98 509.41,-1452.14 506.32,-1462.27 513.32,-1461.98"/>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge148" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M618.94,-2371.55C604.43,-2375.37 586.74,-2380.21 571,-2385 543.17,-2393.48 535.2,-2418.66 509,-2406"/>
+<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge118" class="edge">
+<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M611.98,-1813.86C581.94,-1808.94 539.48,-1798.38 509,-1776"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_whm_setup -->
 <g id="module~~swiftest_classes~~UsedByGraph_node60" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="685,-2334 614,-2334 614,-2310 685,-2310 685,-2334"/>
-<text text-anchor="middle" x="649.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2754 610,-2754 610,-2730 689,-2730 689,-2754"/>
+<text text-anchor="middle" x="649.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge97" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M613.95,-2321.28C598.46,-2319.05 581.38,-2313.58 571,-2301 564.28,-2292.86 519.2,-1615.36 510.46,-1483.21"/>
-<polygon fill="#000000" stroke="#000000" points="513.95,-1482.82 509.79,-1473.07 506.96,-1483.28 513.95,-1482.82"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge79" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.73,-2740.8C595.35,-2738.26 580.28,-2732.67 571,-2721 537.81,-2679.27 538.15,-1815.22 535,-1762 528.34,-1649.33 516.08,-1514.83 511.15,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.61,-1461.89 510.18,-1452.27 507.64,-1462.56 514.61,-1461.89"/>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge149" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M613.77,-2327.32C599.82,-2330.48 584,-2335.4 571,-2343 537.08,-2362.83 544.37,-2423.09 509,-2406"/>
+<!-- module~s_whm_setup&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge139" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M609.73,-2732C597.31,-2728.66 583.54,-2724.82 571,-2721 543.17,-2712.52 538.07,-2698.9 509,-2700"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_helio_gr -->
 <g id="module~~swiftest_classes~~UsedByGraph_node61" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="708.5,-1410 590.5,-1410 590.5,-1386 708.5,-1386 708.5,-1410"/>
-<text text-anchor="middle" x="649.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="680.5,-1284 618.5,-1284 618.5,-1260 680.5,-1260 680.5,-1284"/>
+<text text-anchor="middle" x="649.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge38" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M590.4,-1385.92C583.64,-1383.46 577.02,-1380.52 571,-1377 537.08,-1357.17 548.18,-1311.11 509,-1314"/>
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge81" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.32,-1273.92C602.61,-1276.34 584.02,-1281.63 571,-1293 533.5,-1325.77 518.09,-1385.02 512.24,-1417.39"/>
+<polygon fill="#000000" stroke="#000000" points="508.73,-1417.2 510.55,-1427.63 515.63,-1418.34 508.73,-1417.2"/>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge100" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.73,-1410.08C586.62,-1412.61 578.48,-1415.57 571,-1419 557.25,-1425.31 543.19,-1434.55 531.95,-1442.77"/>
-<polygon fill="#000000" stroke="#000000" points="529.84,-1439.98 523.95,-1448.78 534.04,-1445.57 529.84,-1439.98"/>
+<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge110" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M618.44,-1277.87C590.29,-1283.05 546.98,-1290.2 509,-1293"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~orbel -->
 <g id="module~~swiftest_classes~~UsedByGraph_node62" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2292 610,-2292 610,-2268 689,-2268 689,-2292"/>
-<text text-anchor="middle" x="649.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~orbel</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node62"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="676.5,-1410 622.5,-1410 622.5,-1386 676.5,-1386 676.5,-1410"/>
+<text text-anchor="middle" x="649.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge101" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.97,-2278.61C595.62,-2276.04 580.52,-2270.49 571,-2259 564.62,-2251.3 519.54,-1611.64 510.56,-1483.28"/>
-<polygon fill="#000000" stroke="#000000" points="514.03,-1482.82 509.84,-1473.09 507.05,-1483.31 514.03,-1482.82"/>
-</g>
-<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge143" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M507,-2406C336.06,-2406 290.06,-1737.2 282.66,-1605.4"/>
-<polygon fill="#000000" stroke="#000000" points="286.14,-1605.07 282.11,-1595.27 279.16,-1605.45 286.14,-1605.07"/>
-<path fill="none" stroke="#000000" d="M609.99,-2284.39C596.63,-2287.4 582.2,-2292.47 571,-2301 527.89,-2333.84 557.8,-2429.58 509,-2406"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge82" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.2,-1404.69C607.14,-1408.63 587.94,-1413.84 571,-1419 562.48,-1421.59 553.37,-1424.57 544.83,-1427.44"/>
+<polygon fill="#000000" stroke="#000000" points="543.47,-1424.21 535.13,-1430.75 545.72,-1430.84 543.47,-1424.21"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_whm_util -->
 <g id="module~~swiftest_classes~~UsedByGraph_node63" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="680.5,-2670 618.5,-2670 618.5,-2646 680.5,-2646 680.5,-2670"/>
-<text text-anchor="middle" x="649.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="682.5,-2712 616.5,-2712 616.5,-2688 682.5,-2688 682.5,-2712"/>
+<text text-anchor="middle" x="649.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge65" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M618.2,-2665.75C603.83,-2669.54 586.47,-2674.29 571,-2679 543.17,-2687.48 536.77,-2708.67 509,-2700"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge83" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.13,-2699.74C599.99,-2697.78 581.68,-2692.41 571,-2679 539.23,-2639.12 538.05,-1812.89 535,-1762 528.24,-1649.34 516.04,-1514.83 511.13,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.6,-1461.9 510.17,-1452.27 507.63,-1462.55 514.6,-1461.9"/>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge102" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.12,-2657.94C601.54,-2656.17 582.16,-2650.92 571,-2637 543.48,-2602.68 537.48,-1889.92 535,-1846 527.21,-1708.07 515.1,-1542.54 510.68,-1483.37"/>
-<polygon fill="#000000" stroke="#000000" points="514.17,-1483 509.93,-1473.29 507.19,-1483.53 514.17,-1483"/>
+<!-- module~s_whm_util&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge140" class="edge">
+<title>module~s_whm_util&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M616.35,-2699.31C588.07,-2698.87 545.79,-2698.61 509,-2700"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~swiftest_classes~~UsedByGraph_node64" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="702.5,-1368 596.5,-1368 596.5,-1344 702.5,-1344 702.5,-1368"/>
-<text text-anchor="middle" x="649.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2292 610,-2292 610,-2268 689,-2268 689,-2292"/>
+<text text-anchor="middle" x="649.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge39" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M602.06,-1343.92C591.79,-1341.11 581,-1338.05 571,-1335 543.17,-1326.52 538.01,-1311.86 509,-1314"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge84" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.94,-2278.64C595.58,-2276.07 580.49,-2270.51 571,-2259 535.79,-2216.27 539.23,-1817.21 535,-1762 526.38,-1649.47 515.25,-1514.89 510.88,-1462.45"/>
+<polygon fill="#000000" stroke="#000000" points="514.35,-1461.95 510.03,-1452.28 507.37,-1462.54 514.35,-1461.95"/>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge108" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M596.35,-1364.95C587.42,-1367.9 578.59,-1371.81 571,-1377 547.58,-1393.02 529.62,-1420.86 519.2,-1440.07"/>
-<polygon fill="#000000" stroke="#000000" points="516.08,-1438.48 514.57,-1448.97 522.29,-1441.71 516.08,-1438.48"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge146" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M609.99,-2284.39C596.63,-2287.4 582.2,-2292.47 571,-2301 527.89,-2333.84 563.19,-2406 509,-2406"/>
+<path fill="none" stroke="#000000" d="M507,-2406C488.99,-2406 469.23,-2406 451.84,-2406"/>
+<polygon fill="#000000" stroke="#000000" points="451.35,-2402.5 441.35,-2406 451.35,-2409.5 451.35,-2402.5"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_whm_kick -->
 <g id="module~~swiftest_classes~~UsedByGraph_node65" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="693.5,-1746 605.5,-1746 605.5,-1722 693.5,-1722 693.5,-1746"/>
-<text text-anchor="middle" x="649.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_whm_kick</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-2670 614.5,-2670 614.5,-2646 684.5,-2646 684.5,-2670"/>
+<text text-anchor="middle" x="649.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge59" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M605.19,-1739.55C593.24,-1742.65 580.87,-1747.48 571,-1755 527.89,-1787.84 552.93,-1891.74 509,-1860"/>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge88" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.16,-2657.48C598.53,-2655.32 581.26,-2649.86 571,-2637 540.65,-2598.98 537.96,-1810.56 535,-1762 528.14,-1649.35 516,-1514.83 511.12,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.58,-1461.9 510.17,-1452.27 507.61,-1462.55 514.58,-1461.9"/>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge110" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.27,-1730.58C592.76,-1727.58 580.06,-1722.27 571,-1713 538.75,-1679.98 518.41,-1538.4 511.57,-1483.18"/>
-<polygon fill="#000000" stroke="#000000" points="515.02,-1482.57 510.35,-1473.06 508.07,-1483.41 515.02,-1482.57"/>
+<!-- module~s_whm_kick&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge134" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M614.42,-2666.75C600.85,-2670.36 585.14,-2674.7 571,-2679 543.17,-2687.48 538.07,-2698.9 509,-2700"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_symba_discard -->
 <g id="module~~swiftest_classes~~UsedByGraph_node66" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="697.5,-1536 601.5,-1536 601.5,-1512 697.5,-1512 697.5,-1536"/>
-<text text-anchor="middle" x="649.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="697.5,-1788 601.5,-1788 601.5,-1764 697.5,-1764 697.5,-1788"/>
+<text text-anchor="middle" x="649.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge109" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.31,-1513.89C591.09,-1510.97 580.5,-1507.36 571,-1503 557.25,-1496.69 543.19,-1487.45 531.95,-1479.23"/>
-<polygon fill="#000000" stroke="#000000" points="534.04,-1476.43 523.95,-1473.22 529.84,-1482.02 534.04,-1476.43"/>
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge89" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.37,-1771.9C590.07,-1768.77 578.98,-1763.57 571,-1755 531.03,-1712.11 514.88,-1527 510.4,-1462.37"/>
+<polygon fill="#000000" stroke="#000000" points="513.87,-1461.83 509.71,-1452.09 506.88,-1462.3 513.87,-1461.83"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge113" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M606.96,-1788.04C576.89,-1794.11 536.82,-1796.42 509,-1776"/>
+</g>
+<!-- module~s_symba_drift -->
 <g id="module~~swiftest_classes~~UsedByGraph_node67" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node67"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="680.5,-1494 618.5,-1494 618.5,-1470 680.5,-1470 680.5,-1494"/>
-<text text-anchor="middle" x="649.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-1746 610,-1746 610,-1722 689,-1722 689,-1746"/>
+<text text-anchor="middle" x="649.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge111" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.23,-1477.44C596.83,-1474.22 568.03,-1469.89 545.38,-1466.48"/>
-<polygon fill="#000000" stroke="#000000" points="545.86,-1463.01 535.45,-1464.98 544.82,-1469.93 545.86,-1463.01"/>
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge90" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610,-1731.72C595.99,-1728.99 581.13,-1723.56 571,-1713 536.15,-1676.68 517.1,-1520.39 511.1,-1462.06"/>
+<polygon fill="#000000" stroke="#000000" points="514.58,-1461.67 510.11,-1452.06 507.62,-1462.36 514.58,-1461.67"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge114" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M609.73,-1744C597.31,-1747.34 583.54,-1751.18 571,-1755 543.17,-1763.48 532.45,-1793.22 509,-1776"/>
+</g>
+<!-- module~whm_drift -->
 <g id="module~~swiftest_classes~~UsedByGraph_node68" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="694,-1326 605,-1326 605,-1302 694,-1302 694,-1326"/>
-<text text-anchor="middle" x="649.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~whm_drift</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node68"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="679,-2628 620,-2628 620,-2604 679,-2604 679,-2628"/>
+<text text-anchor="middle" x="649.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge41" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M604.77,-1312.35C577.25,-1311.72 541,-1311.64 509,-1314"/>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge91" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M619.66,-2616.11C602.74,-2614.5 582.49,-2609.37 571,-2595 542.07,-2558.83 537.86,-1808.23 535,-1762 528.02,-1649.35 515.95,-1514.84 511.1,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.57,-1461.9 510.16,-1452.27 507.6,-1462.55 514.57,-1461.9"/>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge112" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M604.81,-1319.08C592.86,-1322.17 580.58,-1327.11 571,-1335 538.13,-1362.08 521.25,-1410.87 513.84,-1439.13"/>
-<polygon fill="#000000" stroke="#000000" points="510.44,-1438.33 511.45,-1448.87 517.24,-1439.99 510.44,-1438.33"/>
+<!-- module~whm_drift&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge135" class="edge">
+<title>module~whm_drift&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M619.84,-2620.03C604.57,-2623.08 585.92,-2628.28 571,-2637 537.08,-2656.83 548.26,-2698.51 509,-2700"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_symba_kick -->
 <g id="module~~swiftest_classes~~UsedByGraph_node69" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node69"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="690,-1452 609,-1452 609,-1428 690,-1428 690,-1452"/>
-<text text-anchor="middle" x="649.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-1704 610,-1704 610,-1680 689,-1680 689,-1704"/>
+<text text-anchor="middle" x="649.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge113" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.9,-1445.96C588.82,-1448.98 564.62,-1452.63 545.07,-1455.57"/>
-<polygon fill="#000000" stroke="#000000" points="544.4,-1452.13 535.03,-1457.08 545.44,-1459.05 544.4,-1452.13"/>
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge96" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.81,-1689.44C595.95,-1686.65 581.24,-1681.26 571,-1671 513.29,-1613.15 507.67,-1507.75 508.15,-1462.08"/>
+<polygon fill="#000000" stroke="#000000" points="511.65,-1462.14 508.37,-1452.06 504.66,-1461.98 511.65,-1462.14"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge116" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M609.85,-1698.25C596.92,-1701.41 582.79,-1706.11 571,-1713 537.08,-1732.83 540.67,-1799.25 509,-1776"/>
+</g>
+<!-- module~s_fraggle_util -->
 <g id="module~~swiftest_classes~~UsedByGraph_node70" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-2628 610,-2628 610,-2604 689,-2604 689,-2628"/>
-<text text-anchor="middle" x="649.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="687.5,-2040 611.5,-2040 611.5,-2016 687.5,-2016 687.5,-2040"/>
+<text text-anchor="middle" x="649.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge68" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M609.85,-2622.25C596.92,-2625.41 582.79,-2630.11 571,-2637 537.08,-2656.83 546.5,-2711.71 509,-2700"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge97" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.36,-2026.67C596.68,-2024.17 580.97,-2018.65 571,-2007 552.91,-1985.85 518.78,-1564.55 510.73,-1462.24"/>
+<polygon fill="#000000" stroke="#000000" points="514.21,-1461.81 509.94,-1452.12 507.23,-1462.36 514.21,-1461.81"/>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge119" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.8,-2614.75C595.42,-2612.2 580.35,-2606.63 571,-2595 544.9,-2562.53 537.4,-1887.59 535,-1846 527.03,-1708.08 515.03,-1542.55 510.66,-1483.37"/>
-<polygon fill="#000000" stroke="#000000" points="514.15,-1483.01 509.92,-1473.29 507.17,-1483.53 514.15,-1483.01"/>
+<!-- module~s_fraggle_util&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge124" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M611.43,-2033.86C598.07,-2037.03 583.28,-2041.82 571,-2049 537.08,-2068.83 544.22,-2129.41 509,-2112"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~s_helio_setup -->
 <g id="module~~swiftest_classes~~UsedByGraph_node71" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-2082 614.5,-2082 614.5,-2058 684.5,-2058 684.5,-2082"/>
-<text text-anchor="middle" x="649.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="689,-1242 610,-1242 610,-1218 689,-1218 689,-1242"/>
+<text text-anchor="middle" x="649.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge51" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M507,-2154C231.6,-2154 502.64,-1771.6 324,-1562 323.16,-1561.01 322.26,-1560.07 321.32,-1559.16"/>
-<polygon fill="#000000" stroke="#000000" points="323.37,-1556.33 313.31,-1553 319.1,-1561.88 323.37,-1556.33"/>
-<path fill="none" stroke="#000000" d="M614.16,-2075.24C600.11,-2078.39 584.12,-2083.33 571,-2091 537.08,-2110.83 541.47,-2176.11 509,-2154"/>
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge95" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.7,-1232.95C596,-1235.79 581.42,-1241.12 571,-1251 546.35,-1274.39 522.97,-1373.49 513.46,-1418.09"/>
+<polygon fill="#000000" stroke="#000000" points="510.02,-1417.43 511.4,-1427.94 516.88,-1418.87 510.02,-1417.43"/>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge127" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.12,-2069.13C598.67,-2066.87 581.58,-2061.42 571,-2049 552.23,-2026.97 518.41,-1587.39 510.63,-1483.07"/>
-<polygon fill="#000000" stroke="#000000" points="514.11,-1482.75 509.88,-1473.04 507.13,-1483.27 514.11,-1482.75"/>
+<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge107" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M609.78,-1237.82C597.1,-1241.07 583.16,-1245.42 571,-1251 540.75,-1264.88 542.19,-1290.55 509,-1293"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_helio_step -->
 <g id="module~~swiftest_classes~~UsedByGraph_node72" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node72"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-2586 614.5,-2586 614.5,-2562 684.5,-2562 684.5,-2586"/>
-<text text-anchor="middle" x="649.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node72"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="686,-1200 613,-1200 613,-1176 686,-1176 686,-1200"/>
+<text text-anchor="middle" x="649.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge71" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M507,-2700C260.58,-2700 177.61,-1724.49 165.59,-1563.4"/>
-<polygon fill="#000000" stroke="#000000" points="169.07,-1562.95 164.84,-1553.23 162.08,-1563.46 169.07,-1562.95"/>
-<path fill="none" stroke="#000000" d="M614.31,-2577.48C599.81,-2580.34 583.42,-2585.54 571,-2595 527.89,-2627.84 560.73,-2716.15 509,-2700"/>
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge99" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.99,-1189.97C598.24,-1192.55 582.03,-1197.95 571,-1209 555.98,-1224.06 525.29,-1362.98 513.63,-1417.85"/>
+<polygon fill="#000000" stroke="#000000" points="510.15,-1417.42 511.5,-1427.93 516.99,-1418.87 510.15,-1417.42"/>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge131" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.22,-2573.44C598.6,-2571.27 581.32,-2565.81 571,-2553 521.63,-2491.77 539.65,-1924.52 535,-1846 526.83,-1708.1 514.95,-1542.55 510.64,-1483.38"/>
-<polygon fill="#000000" stroke="#000000" points="514.12,-1483.01 509.9,-1473.3 507.14,-1483.52 514.12,-1483.01"/>
+<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge108" class="edge">
+<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M507,-1293C444.28,-1297.63 373.61,-1314.66 328.37,-1327.12"/>
+<polygon fill="#000000" stroke="#000000" points="327.24,-1323.8 318.56,-1329.86 329.13,-1330.54 327.24,-1323.8"/>
+<path fill="none" stroke="#000000" d="M612.81,-1192.5C598.87,-1195.53 583.31,-1200.58 571,-1209 532.7,-1235.19 554.86,-1285.9 509,-1293"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_whm_step -->
 <g id="module~~swiftest_classes~~UsedByGraph_node73" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node73"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-1704 614.5,-1704 614.5,-1680 684.5,-1680 684.5,-1704"/>
-<text text-anchor="middle" x="649.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node73"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="686,-2586 613,-2586 613,-2562 686,-2562 686,-2586"/>
+<text text-anchor="middle" x="649.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge55" class="edge">
-<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M614.46,-1694.56C599.64,-1697.24 582.97,-1702.54 571,-1713 517.61,-1759.66 566.47,-1901.53 509,-1860"/>
-<path fill="none" stroke="#000000" d="M507,-1860C409.02,-1789.2 401.89,-1623.42 402.69,-1563.29"/>
-<polygon fill="#000000" stroke="#000000" points="406.2,-1563.11 402.93,-1553.03 399.2,-1562.95 406.2,-1563.11"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge100" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.99,-2573.29C597.69,-2571.02 581.03,-2565.51 571,-2553 543.48,-2518.68 537.77,-1805.9 535,-1762 527.89,-1649.36 515.89,-1514.84 511.08,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.55,-1461.91 510.15,-1452.27 507.58,-1462.55 514.55,-1461.91"/>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge135" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.3,-1690.11C599.27,-1687.58 582.46,-1682.21 571,-1671 518.48,-1619.65 509.92,-1526.17 508.88,-1483.42"/>
-<polygon fill="#000000" stroke="#000000" points="512.38,-1483.2 508.76,-1473.24 505.38,-1483.28 512.38,-1483.2"/>
+<!-- module~s_whm_step&#45;&gt;module~whm_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge138" class="edge">
+<title>module~s_whm_step&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M612.75,-2577.79C598.64,-2580.71 582.98,-2585.88 571,-2595 527.89,-2627.84 563.19,-2700 509,-2700"/>
+<path fill="none" stroke="#000000" d="M507,-2700C406.78,-2700 377.23,-2729.67 281.5,-2700"/>
 </g>
 <!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge64" class="edge">
+<g id="module~~swiftest_classes~~UsedByGraph_edge132" class="edge">
 <title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.4,-1570.96C234.08,-1566.48 219.91,-1561.33 206.84,-1556.58"/>
-<polygon fill="#000000" stroke="#000000" points="207.7,-1553.17 197.1,-1553.04 205.3,-1559.74 207.7,-1553.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.84,-2418.28C402.93,-2478.37 400.77,-2736.97 281.5,-2700"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.5,-2700C216.72,-2680.54 171.59,-1611.52 164.87,-1443.2"/>
+<polygon fill="#000000" stroke="#000000" points="168.36,-1442.9 164.47,-1433.05 161.37,-1443.18 168.36,-1442.9"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_symba_setup -->
 <g id="module~~swiftest_classes~~UsedByGraph_node75" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node75"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="697.5,-1284 601.5,-1284 601.5,-1260 697.5,-1260 697.5,-1284"/>
-<text text-anchor="middle" x="649.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node75"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="693.5,-1662 605.5,-1662 605.5,-1638 693.5,-1638 693.5,-1662"/>
+<text text-anchor="middle" x="649.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge40" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M602.06,-1284.08C591.79,-1286.89 581,-1289.95 571,-1293 543.17,-1301.48 538.01,-1311.86 509,-1314"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge71" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.29,-1646.06C592.93,-1643.02 580.3,-1637.83 571,-1629 523.48,-1583.9 512.34,-1501.85 509.76,-1462.38"/>
+<polygon fill="#000000" stroke="#000000" points="513.25,-1462.03 509.23,-1452.23 506.26,-1462.4 513.25,-1462.03"/>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge136" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.45,-1277.22C590.42,-1280.36 579.43,-1285.28 571,-1293 528.38,-1331.99 514.97,-1402.86 510.82,-1438.81"/>
-<polygon fill="#000000" stroke="#000000" points="507.33,-1438.47 509.8,-1448.78 514.3,-1439.18 507.33,-1438.47"/>
+<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge120" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M605.19,-1655.55C593.24,-1658.65 580.87,-1663.48 571,-1671 527.89,-1703.84 552.69,-1808.07 509,-1776"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_fraggle_generate -->
 <g id="module~~swiftest_classes~~UsedByGraph_node76" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node76"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="688,-1242 611,-1242 611,-1218 688,-1218 688,-1242"/>
-<text text-anchor="middle" x="649.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node76"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="702.5,-1998 596.5,-1998 596.5,-1974 702.5,-1974 702.5,-1998"/>
+<text text-anchor="middle" x="649.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge42" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M610.64,-1236.05C597.49,-1239.22 583.03,-1243.96 571,-1251 537.08,-1270.83 548.18,-1311.11 509,-1314"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge102" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M596.1,-1980.83C586.56,-1977.59 577.56,-1972.6 571,-1965 554.26,-1945.6 519.52,-1560.29 510.95,-1462.44"/>
+<polygon fill="#000000" stroke="#000000" points="514.43,-1462.1 510.07,-1452.45 507.46,-1462.71 514.43,-1462.1"/>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge128" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.74,-1232.54C596.67,-1235.29 581.57,-1240.67 571,-1251 543.89,-1277.5 521.39,-1390.19 512.77,-1438.67"/>
-<polygon fill="#000000" stroke="#000000" points="509.28,-1438.31 511.01,-1448.76 516.18,-1439.51 509.28,-1438.31"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~fraggle_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge129" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" d="M507,-2112C370.47,-2112 298.43,-1595.54 284.16,-1481.22"/>
+<polygon fill="#000000" stroke="#000000" points="287.62,-1480.67 282.92,-1471.17 280.67,-1481.53 287.62,-1480.67"/>
+<path fill="none" stroke="#000000" d="M596.3,-1994.18C587.28,-1997.2 578.43,-2001.34 571,-2007 527.89,-2039.84 557.58,-2136.01 509,-2112"/>
 </g>
-<!-- module~s_fraggle_util -->
+<!-- module~s_symba_io -->
 <g id="module~~swiftest_classes~~UsedByGraph_node77" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~swiftest_classes~~UsedByGraph_node77"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="687.5,-1200 611.5,-1200 611.5,-1176 687.5,-1176 687.5,-1200"/>
-<text text-anchor="middle" x="649.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~swiftest_classes~~UsedByGraph_node77"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="684.5,-1620 614.5,-1620 614.5,-1596 684.5,-1596 684.5,-1620"/>
+<text text-anchor="middle" x="649.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~fraggle_classes -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge44" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" d="M507,-1314C425.96,-1319.98 343.08,-1375.31 304.22,-1404.75"/>
-<polygon fill="#000000" stroke="#000000" points="301.96,-1402.08 296.18,-1410.96 306.24,-1407.62 301.96,-1402.08"/>
-<path fill="none" stroke="#000000" d="M611.18,-1192.13C597.49,-1195.1 582.53,-1200.21 571,-1209 527.89,-1241.84 561.83,-1301.9 509,-1314"/>
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge103" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.46,-1605.44C599.64,-1602.76 582.97,-1597.46 571,-1587 533.5,-1554.23 518.09,-1494.98 512.24,-1462.61"/>
+<polygon fill="#000000" stroke="#000000" points="515.63,-1461.66 510.55,-1452.37 508.73,-1462.8 515.63,-1461.66"/>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_classes~~UsedByGraph_edge140" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.29,-1190.14C596.96,-1192.81 581.52,-1198.23 571,-1209 554.7,-1225.69 524.18,-1380.37 513.13,-1438.8"/>
-<polygon fill="#000000" stroke="#000000" points="509.65,-1438.36 511.24,-1448.83 516.53,-1439.65 509.65,-1438.36"/>
+<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
+<g id="module~~swiftest_classes~~UsedByGraph_edge121" class="edge">
+<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M507,-1776C454.68,-1737.59 417.86,-1531.13 406.9,-1462.33"/>
+<polygon fill="#000000" stroke="#000000" points="410.31,-1461.51 405.31,-1452.17 403.39,-1462.59 410.31,-1461.51"/>
+<path fill="none" stroke="#000000" d="M614.46,-1610.56C599.64,-1613.24 582.97,-1618.54 571,-1629 517.61,-1675.66 566.16,-1817.96 509,-1776"/>
 </g>
 </g>
 </svg>
@@ -2416,6 +2415,10 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-drift_one">drift_one</a>
       
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_ij_to_k">util_index_eucl_ij_to_k</a>
+      
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_k_to_ij">util_index_eucl_k_to_ij</a>
+      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_plpl">util_index_eucl_plpl</a>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-util_index_eucl_pltp">util_index_eucl_pltp</a>
@@ -2476,16 +2479,18 @@ <h3>Contents</h3>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-io_write_hdr_system">io_write_hdr_system</a>
       
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_pl">kick_getacch_int_pl</a>
+      
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_tp">kick_getacch_int_tp</a>
+      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_all_pl">kick_getacch_int_all_pl</a>
       
+      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_all_tp">kick_getacch_int_all_tp</a>
+      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_one_pl">kick_getacch_int_one_pl</a>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_one_tp">kick_getacch_int_one_tp</a>
       
-      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_pl">kick_getacch_int_pl</a>
-      
-      <a class="list-group-item" href="../module/swiftest_classes.html#interface-kick_getacch_int_tp">kick_getacch_int_tp</a>
-      
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-netcdf_close">netcdf_close</a>
       
       <a class="list-group-item" href="../module/swiftest_classes.html#interface-netcdf_initialize_output">netcdf_initialize_output</a>
@@ -3602,7 +3607,7 @@ <h4>Arguments</h4>
     
     
     <h3>
-public pure module subroutine drift_all(mu, x, v, n, param, dt, mask, iflag)
+public module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag)
     
     
    
@@ -3725,7 +3730,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td>dimension(:)</td><td>::</td>
-  <td><strong>mask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
+  <td><strong>lmask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
   
 </tr>
 
@@ -3968,10 +3973,224 @@ <h4>Arguments</h4>
   <td>intent(inout)</td>
   <td></td>
   
-  <td></td><td>::</td>
-  <td><strong>vx</strong></td><td><p>Position and velocity of body to drift</p></td>
+  <td></td><td>::</td>
+  <td><strong>vx</strong></td><td><p>Position and velocity of body to drift</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(inout)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vy</strong></td><td><p>Position and velocity of body to drift</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(inout)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vz</strong></td><td><p>Position and velocity of body to drift</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>dt</strong></td><td><p>Step size</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>iflag</strong></td><td><p>iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+    </li>
+  
+  </ul>
+</div>
+
+    
+     
+<div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="interface-util_index_eucl_ij_to_k"></span><h3>interface 
+    
+  </h3></div>
+  
+  <ul class="list-group">
+  
+    <li class="list-group-item">
+    
+    
+    <h3>
+public pure module subroutine util_index_eucl_ij_to_k(n, i, j, k)
+    
+    
+   
+   <a href='../proc/util_index_eucl_ij_to_k.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h3>
+    
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I8B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+    </li>
+  
+  </ul>
+</div>
+
+    
+     
+<div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="interface-util_index_eucl_k_to_ij"></span><h3>interface 
+    
+  </h3></div>
+  
+  <ul class="list-group">
   
-</tr>
+    <li class="list-group-item">
+    
+    
+    <h3>
+public pure module subroutine util_index_eucl_k_to_ij(n, k, i, j)
+    
+    
+   
+   <a href='../proc/util_index_eucl_k_to_ij.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h3>
+    
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
 
   
   
@@ -3979,12 +4198,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>vy</strong></td><td><p>Position and velocity of body to drift</p></td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
   
 </tr>
 
@@ -3994,12 +4213,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>integer(kind=I8B),</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>vz</strong></td><td><p>Position and velocity of body to drift</p></td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
   
 </tr>
 
@@ -4009,12 +4228,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>dt</strong></td><td><p>Step size</p></td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
   
 </tr>
 
@@ -4029,7 +4248,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>iflag</strong></td><td><p>iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)</p></td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
   
 </tr>
 
@@ -4319,7 +4538,7 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr)
+public pure module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr)
     
     
    
@@ -6003,12 +6222,228 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>iu</strong></td><td><p>Open file unit number</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+    </li>
+  
+  </ul>
+</div>
+
+    
+     
+<div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_read_particle_info_system"></span><h3>interface 
+    
+  </h3></div>
+  
+  <ul class="list-group">
+  
+    <li class="list-group-item">
+    
+    
+    <h3>
+public module subroutine io_read_particle_info_system(self, param)
+    
+    
+   
+   <a href='../proc/io_read_particle_info_system.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h3>
+    
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
+  <td>intent(inout)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>self</strong></td><td><p>Swiftest nbody system object</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
+  <td>intent(inout)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>param</strong></td><td><p>Current run configuration parameters </p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+    </li>
+  
+  </ul>
+</div>
+
+    
+     
+<div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_discard"></span><h3>interface 
+    
+  </h3></div>
+  
+  <ul class="list-group">
+  
+    <li class="list-group-item">
+    
+    
+    <h3>
+public module subroutine io_write_discard(self, param)
+    
+    
+   
+   <a href='../proc/io_write_discard.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h3>
+    
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
+  <td>intent(inout)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>self</strong></td><td><p>Swiftest system object</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
+  <td>intent(inout)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>param</strong></td><td><p>Current run configuration parameters </p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+      
+    
+    
+
+    </li>
+  
+  </ul>
+</div>
+
+    
+     
+<div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_toupper"></span><h3>interface 
+    
+  </h3></div>
+  
+  <ul class="list-group">
+  
+    <li class="list-group-item">
+    
+    
+    <h3>
+public module subroutine io_toupper(string)
+    
+    
+   
+   <a href='../proc/io_toupper.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h3>
+    
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>character(len=*),</td>
+  <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>iu</strong></td><td><p>Open file unit number</p></td>
+  <td><strong>string</strong></td><td><p>String to make upper case</p></td>
   
 </tr>
 
@@ -6027,7 +6462,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_read_particle_info_system"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_encounter"></span><h3>interface 
     
   </h3></div>
   
@@ -6037,11 +6472,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_read_particle_info_system(self, param)
+public module subroutine io_write_encounter(self, pl, encbody, param)
     
     
    
-   <a href='../proc/io_read_particle_info_system.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/io_write_encounter.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6065,12 +6500,42 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_encounter.html'>swiftest_encounter</a>),</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest nbody system object</p></td>
+  <td><strong>self</strong></td><td><p>Swiftest encounter list object</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_pl.html'>swiftest_pl</a>),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>pl</strong></td><td><p>Swiftest massive body object</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_body.html'>swiftest_body</a>),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>encbody</strong></td><td><p>Encountering body - Swiftest generic body object (pl or tp) </p></td>
   
 </tr>
 
@@ -6081,7 +6546,7 @@ <h4>Arguments</h4>
 <tr>
   
   <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
-  <td>intent(inout)</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
@@ -6104,7 +6569,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_discard"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_body"></span><h3>interface 
     
   </h3></div>
   
@@ -6114,11 +6579,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_write_discard(self, param)
+public module subroutine io_write_frame_body(self, iu, param)
     
     
    
-   <a href='../proc/io_write_discard.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/io_write_frame_body.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6142,12 +6607,27 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_body.html'>swiftest_body</a>),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>self</strong></td><td><p>Swiftest body object</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
   <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest system object</p></td>
+  <td><strong>iu</strong></td><td><p>Unit number for the output file to write frame to</p></td>
   
 </tr>
 
@@ -6158,7 +6638,7 @@ <h4>Arguments</h4>
 <tr>
   
   <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
-  <td>intent(inout)</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
@@ -6181,7 +6661,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_toupper"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_cb"></span><h3>interface 
     
   </h3></div>
   
@@ -6191,11 +6671,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_toupper(string)
+public module subroutine io_write_frame_cb(self, iu, param)
     
     
    
-   <a href='../proc/io_toupper.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/io_write_frame_cb.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6219,12 +6699,42 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>character(len=*),</td>
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_cb.html'>swiftest_cb</a>),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>self</strong></td><td><p>Swiftest central body object </p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
   <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>string</strong></td><td><p>String to make upper case</p></td>
+  <td><strong>iu</strong></td><td><p>Unit number for the output file to write frame to</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>param</strong></td><td><p>Current run configuration parameters </p></td>
   
 </tr>
 
@@ -6243,7 +6753,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_encounter"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_encounter"></span><h3>interface 
     
   </h3></div>
   
@@ -6253,11 +6763,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_write_encounter(self, pl, encbody, param)
+public module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2)
     
     
    
-   <a href='../proc/io_write_encounter.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/io_write_frame_encounter.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6281,12 +6791,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_encounter.html'>swiftest_encounter</a>),</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest encounter list object</p></td>
+  <td><strong>iu</strong></td><td><p>Open file unit number</p></td>
   
 </tr>
 
@@ -6296,12 +6806,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_pl.html'>swiftest_pl</a>),</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>pl</strong></td><td><p>Swiftest massive body object</p></td>
+  <td><strong>t</strong></td><td><p>Time of encounter</p></td>
   
 </tr>
 
@@ -6311,12 +6821,132 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_body.html'>swiftest_body</a>),</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>id1</strong></td><td><p>ids of the two encountering bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>id2</strong></td><td><p>ids of the two encountering bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>Gmass1</strong></td><td><p>G*mass of the two encountering bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>Gmass2</strong></td><td><p>G*mass of the two encountering bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>radius1</strong></td><td><p>Radii of the two encountering bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
-  <td></td><td>::</td>
-  <td><strong>encbody</strong></td><td><p>Encountering body - Swiftest generic body object (pl or tp) </p></td>
+  <td></td><td>::</td>
+  <td><strong>radius2</strong></td><td><p>Radii of the two encountering bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>xh1</strong></td><td><p>Swiftestcentric position vectors of the two encountering bodies </p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>xh2</strong></td><td><p>Swiftestcentric position vectors of the two encountering bodies </p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>vh1</strong></td><td><p>Swiftestcentric velocity vectors of the two encountering bodies </p></td>
   
 </tr>
 
@@ -6326,12 +6956,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
   <td></td>
   
-  <td></td><td>::</td>
-  <td><strong>param</strong></td><td><p>Current run configuration parameters </p></td>
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>vh2</strong></td><td><p>Swiftestcentric velocity vectors of the two encountering bodies </p></td>
   
 </tr>
 
@@ -6350,7 +6980,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_body"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_system"></span><h3>interface 
     
   </h3></div>
   
@@ -6360,11 +6990,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_write_frame_body(self, iu, param)
+public module subroutine io_write_frame_system(self, param)
     
     
    
-   <a href='../proc/io_write_frame_body.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/io_write_frame_system.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6388,27 +7018,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_body.html'>swiftest_body</a>),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest body object</p></td>
-  
-</tr>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
   <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>iu</strong></td><td><p>Unit number for the output file to write frame to</p></td>
+  <td><strong>self</strong></td><td><p>Swiftest system object</p></td>
   
 </tr>
 
@@ -6419,7 +7034,7 @@ <h4>Arguments</h4>
 <tr>
   
   <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
-  <td>intent(in)</td>
+  <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
@@ -6442,7 +7057,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_cb"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_hdr_system"></span><h3>interface 
     
   </h3></div>
   
@@ -6452,11 +7067,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_write_frame_cb(self, iu, param)
+public module subroutine io_write_hdr_system(self, iu, param)
     
     
    
-   <a href='../proc/io_write_frame_cb.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/io_write_hdr_system.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6480,12 +7095,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_cb.html'>swiftest_cb</a>),</td>
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest central body object </p></td>
+  <td><strong>self</strong></td><td><p>Swiftest nbody system object</p></td>
   
 </tr>
 
@@ -6500,7 +7115,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>iu</strong></td><td><p>Unit number for the output file to write frame to</p></td>
+  <td><strong>iu</strong></td><td><p>Output file unit number</p></td>
   
 </tr>
 
@@ -6515,7 +7130,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>param</strong></td><td><p>Current run configuration parameters </p></td>
+  <td><strong>param</strong></td><td><p>Current run configuration parameters</p></td>
   
 </tr>
 
@@ -6534,7 +7149,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_encounter"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-kick_getacch_int_pl"></span><h3>interface 
     
   </h3></div>
   
@@ -6544,11 +7159,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2)
+public module subroutine kick_getacch_int_pl(self)
     
     
    
-   <a href='../proc/io_write_frame_encounter.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/kick_getacch_int_pl.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6572,119 +7187,61 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_pl.html'>swiftest_pl</a>),</td>
+  <td>intent(inout)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>iu</strong></td><td><p>Open file unit number</p></td>
+  <td><strong>self</strong></td><td><p>Swiftest massive body object</p></td>
   
 </tr>
 
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>t</strong></td><td><p>Time of encounter</p></td>
-  
-</tr>
+</tbody>
+</table>
 
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>id1</strong></td><td><p>ids of the two encountering bodies</p></td>
-  
-</tr>
+      
+    
+    
 
+    </li>
   
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>id2</strong></td><td><p>ids of the two encountering bodies</p></td>
-  
-</tr>
+  </ul>
+</div>
 
+    
+     
+<div class="panel panel-default">
+  <div class="panel-heading codesum"><span class="anchor" id="interface-kick_getacch_int_tp"></span><h3>interface 
+    
+  </h3></div>
   
+  <ul class="list-group">
   
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>Gmass1</strong></td><td><p>G*mass of the two encountering bodies</p></td>
-  
-</tr>
+    <li class="list-group-item">
+    
+    
+    <h3>
+public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+    
+    
+   
+   <a href='../proc/kick_getacch_int_tp.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+    
+</h3>
+    
+    
+    <h4>Arguments</h4>
+    
+      
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
 
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>Gmass2</strong></td><td><p>G*mass of the two encountering bodies</p></td>
-  
-</tr>
 
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>radius1</strong></td><td><p>Radii of the two encountering bodies</p></td>
-  
-</tr>
 
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>radius2</strong></td><td><p>Radii of the two encountering bodies</p></td>
-  
-</tr>
+<tbody>
 
   
   
@@ -6692,12 +7249,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in),</td>
+  <td><span class="anchor" ></span>class(<a href='../type/swiftest_tp.html'>swiftest_tp</a>),</td>
+  <td>intent(inout)</td>
   <td></td>
   
-  <td>dimension(:)</td><td>::</td>
-  <td><strong>xh1</strong></td><td><p>Swiftestcentric position vectors of the two encountering bodies </p></td>
+  <td></td><td>::</td>
+  <td><strong>self</strong></td><td><p>Swiftest test particle</p></td>
   
 </tr>
 
@@ -6712,7 +7269,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td>dimension(:)</td><td>::</td>
-  <td><strong>xh2</strong></td><td><p>Swiftestcentric position vectors of the two encountering bodies </p></td>
+  <td><strong>GMpl</strong></td><td><p>Massive body masses</p></td>
   
 </tr>
 
@@ -6726,8 +7283,8 @@ <h4>Arguments</h4>
   <td>intent(in),</td>
   <td></td>
   
-  <td>dimension(:)</td><td>::</td>
-  <td><strong>vh1</strong></td><td><p>Swiftestcentric velocity vectors of the two encountering bodies </p></td>
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xhp</strong></td><td><p>Massive body position vectors</p></td>
   
 </tr>
 
@@ -6737,12 +7294,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in),</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
   <td></td>
   
-  <td>dimension(:)</td><td>::</td>
-  <td><strong>vh2</strong></td><td><p>Swiftestcentric velocity vectors of the two encountering bodies </p></td>
+  <td></td><td>::</td>
+  <td><strong>npl</strong></td><td><p>Number of active massive bodies</p></td>
   
 </tr>
 
@@ -6761,7 +7318,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_frame_system"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-kick_getacch_int_all_pl"></span><h3>interface 
     
   </h3></div>
   
@@ -6771,11 +7328,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine io_write_frame_system(self, param)
+public module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc)
     
     
    
-   <a href='../proc/io_write_frame_system.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/kick_getacch_int_all_pl.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6799,12 +7356,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest system object</p></td>
+  <td><strong>npl</strong></td><td><p>Number of massive bodies</p></td>
   
 </tr>
 
@@ -6814,61 +7371,44 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>integer(kind=I8B),</td>
+  <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>param</strong></td><td><p>Current run configuration parameters </p></td>
+  <td><strong>nplpl</strong></td><td><p>Number of massive body interactions to compute</p></td>
   
 </tr>
 
-</tbody>
-</table>
-
-      
-    
-    
-
-    </li>
   
-  </ul>
-</div>
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>k_plpl</strong></td><td><p>Array of interaction pair indices (flattened upper triangular matrix)</p></td>
+  
+</tr>
 
-    
-     
-<div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-io_write_hdr_system"></span><h3>interface 
-    
-  </h3></div>
   
-  <ul class="list-group">
   
-    <li class="list-group-item">
-    
-    
-    <h3>
-public module subroutine io_write_hdr_system(self, iu, param)
-    
-    
-   
-   <a href='../proc/io_write_hdr_system.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
-    
-</h3>
-    
-    
-    <h4>Arguments</h4>
-    
-      
-      
-<table class="table table-striped varlist">
-<thead><tr><th>Type</th>
-<th>Intent</th><th>Optional</th>
-<th>Attributes</th><th></th><th>Name</th><th></th></thead>
-
-
-
-<tbody>
+  
+  
+<tr>
+  
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>x</strong></td><td><p>Position vector array</p></td>
+  
+</tr>
 
   
   
@@ -6876,12 +7416,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_nbody_system.html'>swiftest_nbody_system</a>),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
   <td></td>
   
-  <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest nbody system object</p></td>
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>Gmass</strong></td><td><p>Array of massive body G*mass</p></td>
   
 </tr>
 
@@ -6891,12 +7431,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
-  <td>intent(inout)</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(in),</td>
   <td></td>
   
-  <td></td><td>::</td>
-  <td><strong>iu</strong></td><td><p>Output file unit number</p></td>
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>radius</strong></td><td><p>Array of massive body radii</p></td>
   
 </tr>
 
@@ -6906,12 +7446,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_parameters.html'>swiftest_parameters</a>),</td>
-  <td>intent(in)</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td>intent(inout),</td>
   <td></td>
   
-  <td></td><td>::</td>
-  <td><strong>param</strong></td><td><p>Current run configuration parameters</p></td>
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>acc</strong></td><td><p>Acceleration vector array </p></td>
   
 </tr>
 
@@ -6930,7 +7470,7 @@ <h4>Arguments</h4>
     
      
 <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-kick_getacch_int_all_pl"></span><h3>interface 
+  <div class="panel-heading codesum"><span class="anchor" id="interface-kick_getacch_int_all_tp"></span><h3>interface 
     
   </h3></div>
   
@@ -6940,11 +7480,11 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc)
+public module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc)
     
     
    
-   <a href='../proc/kick_getacch_int_all_pl.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
+   <a href='../proc/kick_getacch_int_all_tp.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
     
 </h3>
     
@@ -6973,7 +7513,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>npl</strong></td><td><p>Number of massive bodies</p></td>
+  <td><strong>ntp</strong></td><td><p>Number of test particles</p></td>
   
 </tr>
 
@@ -6983,12 +7523,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>integer(kind=I8B),</td>
+  <td><span class="anchor" ></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>nplpl</strong></td><td><p>Number of massive body interactions to compute</p></td>
+  <td><strong>npl</strong></td><td><p>Number of massive bodies</p></td>
   
 </tr>
 
@@ -6998,12 +7538,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
+  <td><span class="anchor" ></span>real(kind=DP),</td>
   <td>intent(in),</td>
   <td></td>
   
   <td>dimension(:,:)</td><td>::</td>
-  <td><strong>k_plpl</strong></td><td><p>Array of interaction pair indices (flattened upper triangular matrix)</p></td>
+  <td><strong>xtp</strong></td><td><p>Test particle position vector array</p></td>
   
 </tr>
 
@@ -7018,7 +7558,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td>dimension(:,:)</td><td>::</td>
-  <td><strong>x</strong></td><td><p>Position vector array</p></td>
+  <td><strong>xpl</strong></td><td><p>Massive body particle position vector array</p></td>
   
 </tr>
 
@@ -7033,7 +7573,7 @@ <h4>Arguments</h4>
   <td></td>
   
   <td>dimension(:)</td><td>::</td>
-  <td><strong>Gmass</strong></td><td><p>Array of massive body G*mass</p></td>
+  <td><strong>GMpl</strong></td><td><p>Array of massive body G*mass</p></td>
   
 </tr>
 
@@ -7043,12 +7583,12 @@ <h4>Arguments</h4>
   
 <tr>
   
-  <td><span class="anchor" ></span>real(kind=DP),</td>
+  <td><span class="anchor" ></span>logical,</td>
   <td>intent(in),</td>
   <td></td>
   
   <td>dimension(:)</td><td>::</td>
-  <td><strong>radius</strong></td><td><p>Array of massive body radii</p></td>
+  <td><strong>lmask</strong></td><td><p>Logical mask indicating which test particles should be computed</p></td>
   
 </tr>
 
@@ -7468,175 +8008,6 @@ <h4>Arguments</h4>
     
     
 
-    </li>
-  
-  </ul>
-</div>
-
-    
-     
-<div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-kick_getacch_int_pl"></span><h3>interface 
-    
-  </h3></div>
-  
-  <ul class="list-group">
-  
-    <li class="list-group-item">
-    
-    
-    <h3>
-public module subroutine kick_getacch_int_pl(self)
-    
-    
-   
-   <a href='../proc/kick_getacch_int_pl.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
-    
-</h3>
-    
-    
-    <h4>Arguments</h4>
-    
-      
-      
-<table class="table table-striped varlist">
-<thead><tr><th>Type</th>
-<th>Intent</th><th>Optional</th>
-<th>Attributes</th><th></th><th>Name</th><th></th></thead>
-
-
-
-<tbody>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_pl.html'>swiftest_pl</a>),</td>
-  <td>intent(inout)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest massive body object</p></td>
-  
-</tr>
-
-</tbody>
-</table>
-
-      
-    
-    
-
-    </li>
-  
-  </ul>
-</div>
-
-    
-     
-<div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-kick_getacch_int_tp"></span><h3>interface 
-    
-  </h3></div>
-  
-  <ul class="list-group">
-  
-    <li class="list-group-item">
-    
-    
-    <h3>
-public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
-    
-    
-   
-   <a href='../proc/kick_getacch_int_tp.html'><button type="button" class="btn btn-info depwarn">Implementation &rarr;</button></a>
-    
-</h3>
-    
-    
-    <h4>Arguments</h4>
-    
-      
-      
-<table class="table table-striped varlist">
-<thead><tr><th>Type</th>
-<th>Intent</th><th>Optional</th>
-<th>Attributes</th><th></th><th>Name</th><th></th></thead>
-
-
-
-<tbody>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>class(<a href='../type/swiftest_tp.html'>swiftest_tp</a>),</td>
-  <td>intent(inout)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest test particle</p></td>
-  
-</tr>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in),</td>
-  <td></td>
-  
-  <td>dimension(:)</td><td>::</td>
-  <td><strong>GMpl</strong></td><td><p>Massive body masses</p></td>
-  
-</tr>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>real(kind=DP),</td>
-  <td>intent(in),</td>
-  <td></td>
-  
-  <td>dimension(:,:)</td><td>::</td>
-  <td><strong>xhp</strong></td><td><p>Massive body position vectors</p></td>
-  
-</tr>
-
-  
-  
-  
-  
-<tr>
-  
-  <td><span class="anchor" ></span>integer(kind=I4B),</td>
-  <td>intent(in)</td>
-  <td></td>
-  
-  <td></td><td>::</td>
-  <td><strong>npl</strong></td><td><p>Number of active massive bodies</p></td>
-  
-</tr>
-
-</tbody>
-</table>
-
-      
-    
-    
-
     </li>
   
   </ul>
diff --git a/docs/module/swiftest_operators.html b/docs/module/swiftest_operators.html
index 6a457aece..9ef49a63e 100644
--- a/docs/module/swiftest_operators.html
+++ b/docs/module/swiftest_operators.html
@@ -392,36 +392,15 @@ <h3 class="panel-title">Used by</h3>
 <polygon fill="none" stroke="black" points="100,-1473 0,-1473 0,-1449 100,-1449 100,-1473"/>
 <text text-anchor="middle" x="50" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_operators</text>
 </g>
-<!-- module~s_operator_cross -->
-<g id="module~~swiftest_operators~~UsedByGraph_node2" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node2"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="389.5,-2880 293.5,-2880 293.5,-2856 389.5,-2856 389.5,-2880"/>
-<text text-anchor="middle" x="341.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
-</a>
-</g>
-</g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest_operators -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge2" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" d="M293.12,-2864.13C281.83,-2861 270.8,-2855.73 263,-2847 72.59,-2633.79 53.12,-1645.22 51.2,-1483.42"/>
-<polygon fill="#000000" stroke="#000000" points="54.7,-1483.19 51.09,-1473.23 47.7,-1483.26 54.7,-1483.19"/>
-</g>
 <!-- module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_node3" class="node">
+<g id="module~~swiftest_operators~~UsedByGraph_node2" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node3"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<g id="a_module~~swiftest_operators~~UsedByGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
 <polygon fill="#337ab7" stroke="#337ab7" points="208.5,-1473 154.5,-1473 154.5,-1449 208.5,-1449 208.5,-1473"/>
 <text text-anchor="middle" x="181.5" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge41" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.33,-2864.85C281.75,-2861.75 270.54,-2856.32 263,-2847 215.65,-2788.41 231.36,-2245.2 227,-2170 211.31,-1899.29 189.75,-1570.61 183.97,-1483.21"/>
-<polygon fill="#000000" stroke="#000000" points="187.46,-1482.88 183.31,-1473.14 180.47,-1483.34 187.46,-1482.88"/>
-</g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge1" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
@@ -429,618 +408,639 @@ <h3 class="panel-title">Used by</h3>
 <polygon fill="#000000" stroke="#000000" points="110.22,-1457.5 100.22,-1461 110.22,-1464.5 110.22,-1457.5"/>
 </g>
 <!-- module~s_operator_mag -->
-<g id="module~~swiftest_operators~~UsedByGraph_node4" class="node">
+<g id="module~~swiftest_operators~~UsedByGraph_node3" class="node">
 <title>module~s_operator_mag</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node4"><a xlink:href=".././module/s_operator_mag.html" xlink:title="s_operator_mag">
+<g id="a_module~~swiftest_operators~~UsedByGraph_node3"><a xlink:href=".././module/s_operator_mag.html" xlink:title="s_operator_mag">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="227,-1431 136,-1431 136,-1407 227,-1407 227,-1431"/>
 <text text-anchor="middle" x="181.5" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_mag</text>
 </a>
 </g>
 </g>
 <!-- module~s_operator_mag&#45;&gt;module~swiftest_operators -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge3" class="edge">
+<g id="module~~swiftest_operators~~UsedByGraph_edge2" class="edge">
 <title>module~s_operator_mag&#45;&gt;module~swiftest_operators</title>
 <path fill="none" stroke="#000000" d="M143.39,-1431.04C129.17,-1435.65 112.75,-1440.97 97.74,-1445.84"/>
 <polygon fill="#000000" stroke="#000000" points="96.55,-1442.55 88.11,-1448.96 98.71,-1449.21 96.55,-1442.55"/>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_operator_cross -->
+<g id="module~~swiftest_operators~~UsedByGraph_node4" class="node">
+<title>module~s_operator_cross</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node4"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="389.5,-2880 293.5,-2880 293.5,-2856 389.5,-2856 389.5,-2880"/>
+<text text-anchor="middle" x="341.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+</a>
+</g>
+</g>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest_operators -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge3" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" d="M293.12,-2864.13C281.83,-2861 270.8,-2855.73 263,-2847 72.59,-2633.79 53.12,-1645.22 51.2,-1483.42"/>
+<polygon fill="#000000" stroke="#000000" points="54.7,-1483.19 51.09,-1473.23 47.7,-1483.26 54.7,-1483.19"/>
+</g>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge18" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.33,-2864.85C281.75,-2861.75 270.54,-2856.32 263,-2847 215.65,-2788.41 231.36,-2245.2 227,-2170 211.31,-1899.29 189.75,-1570.61 183.97,-1483.21"/>
+<polygon fill="#000000" stroke="#000000" points="187.46,-1482.88 183.31,-1473.14 180.47,-1483.34 187.46,-1482.88"/>
+</g>
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~swiftest_operators~~UsedByGraph_node5" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node5"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-2838 302,-2838 302,-2814 381,-2814 381,-2838"/>
-<text text-anchor="middle" x="341.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node5"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="400.5,-2838 282.5,-2838 282.5,-2814 400.5,-2814 400.5,-2838"/>
+<text text-anchor="middle" x="341.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge4" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.85,-2824.71C287.48,-2822.15 272.4,-2816.58 263,-2805 218.49,-2750.11 231.21,-2240.54 227,-2170 210.83,-1899.32 189.61,-1570.62 183.94,-1483.21"/>
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.27,-2819.02C274.86,-2815.79 268.09,-2811.28 263,-2805 218.49,-2750.11 231.21,-2240.54 227,-2170 210.83,-1899.32 189.61,-1570.62 183.94,-1483.21"/>
 <polygon fill="#000000" stroke="#000000" points="187.43,-1482.89 183.29,-1473.14 180.44,-1483.34 187.43,-1482.89"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_gr -->
 <g id="module~~swiftest_operators~~UsedByGraph_node6" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node6"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-2796 302,-2796 302,-2772 381,-2772 381,-2796"/>
-<text text-anchor="middle" x="341.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_gr</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node6"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-2796 314.5,-2796 314.5,-2772 368.5,-2772 368.5,-2796"/>
+<text text-anchor="middle" x="341.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge7" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.87,-2782.69C287.5,-2780.13 272.42,-2774.57 263,-2763 221.32,-2711.81 231.07,-2235.88 227,-2170 210.29,-1899.35 189.46,-1570.63 183.91,-1483.22"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge5" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.4,-2784.27C297.03,-2782.93 275.24,-2778.03 263,-2763 221.32,-2711.81 231.07,-2235.88 227,-2170 210.29,-1899.35 189.46,-1570.63 183.91,-1483.22"/>
 <polygon fill="#000000" stroke="#000000" points="187.4,-1482.9 183.27,-1473.14 180.41,-1483.34 187.4,-1482.9"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_util_valid -->
 <g id="module~~swiftest_operators~~UsedByGraph_node7" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node7"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="371.5,-2754 311.5,-2754 311.5,-2730 371.5,-2730 371.5,-2754"/>
-<text text-anchor="middle" x="341.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node7"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="374,-2754 309,-2754 309,-2730 374,-2730 374,-2754"/>
+<text text-anchor="middle" x="341.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge5" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.38,-2741.98C294.58,-2740.31 274.55,-2735.14 263,-2721 261.72,-2719.44 194.48,-1651.47 183.9,-1483.2"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge6" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M308.66,-2741.69C292.46,-2739.73 273.94,-2734.39 263,-2721 261.72,-2719.44 194.48,-1651.47 183.9,-1483.2"/>
 <polygon fill="#000000" stroke="#000000" points="187.38,-1482.81 183.26,-1473.05 180.39,-1483.25 187.38,-1482.81"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_symba_collision -->
 <g id="module~~swiftest_operators~~UsedByGraph_node8" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node8"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="368.5,-2712 314.5,-2712 314.5,-2688 368.5,-2688 368.5,-2712"/>
-<text text-anchor="middle" x="341.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node8"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="391,-2712 292,-2712 292,-2688 391,-2688 391,-2712"/>
+<text text-anchor="middle" x="341.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge6" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.43,-2700.24C297.07,-2698.9 275.28,-2693.99 263,-2679 258.06,-2672.97 194.17,-1648.66 183.89,-1483.39"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge7" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.8,-2696.34C280.8,-2693.18 270.24,-2687.84 263,-2679 258.06,-2672.97 194.17,-1648.66 183.89,-1483.39"/>
 <polygon fill="#000000" stroke="#000000" points="187.38,-1483.15 183.27,-1473.39 180.4,-1483.58 187.38,-1483.15"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_obl -->
 <g id="module~~swiftest_operators~~UsedByGraph_node9" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node9"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="374.5,-2670 308.5,-2670 308.5,-2646 374.5,-2646 374.5,-2670"/>
-<text text-anchor="middle" x="341.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_obl</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node9"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-2670 314.5,-2670 314.5,-2646 368.5,-2646 368.5,-2670"/>
+<text text-anchor="middle" x="341.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<!-- module~s_obl&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge8" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M308.29,-2657.62C292.19,-2655.62 273.88,-2650.25 263,-2637 253.47,-2625.39 193.67,-1645.26 183.86,-1483.49"/>
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.44,-2658.24C297.08,-2656.88 275.29,-2651.98 263,-2637 253.47,-2625.39 193.67,-1645.26 183.86,-1483.49"/>
 <polygon fill="#000000" stroke="#000000" points="187.34,-1483.05 183.24,-1473.28 180.35,-1483.47 187.34,-1483.05"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~swiftest_operators~~UsedByGraph_node10" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node10"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-2628 302,-2628 302,-2604 381,-2604 381,-2628"/>
-<text text-anchor="middle" x="341.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node10"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="386,-2628 297,-2628 297,-2604 386,-2604 386,-2628"/>
+<text text-anchor="middle" x="341.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge9" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.93,-2614.64C287.57,-2612.08 272.48,-2606.52 263,-2595 253.81,-2583.84 193.97,-1642.53 183.93,-1483.65"/>
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296.68,-2613.57C283.99,-2610.64 271.33,-2605.12 263,-2595 253.81,-2583.84 193.97,-1642.53 183.93,-1483.65"/>
 <polygon fill="#000000" stroke="#000000" points="187.39,-1482.98 183.27,-1473.22 180.41,-1483.42 187.39,-1482.98"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_util_coord -->
 <g id="module~~swiftest_operators~~UsedByGraph_node11" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node11"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="375.5,-2586 307.5,-2586 307.5,-2562 375.5,-2562 375.5,-2586"/>
-<text text-anchor="middle" x="341.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node11"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-2586 306.5,-2586 306.5,-2562 376.5,-2562 376.5,-2586"/>
+<text text-anchor="middle" x="341.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge10" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.14,-2573.44C291.34,-2571.32 273.65,-2565.9 263,-2553 245.29,-2531.54 192.64,-1635.86 183.77,-1483.06"/>
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.34,-2573.33C290.75,-2571.14 273.47,-2565.69 263,-2553 245.29,-2531.54 192.64,-1635.86 183.77,-1483.06"/>
 <polygon fill="#000000" stroke="#000000" points="187.26,-1482.79 183.19,-1473.01 180.28,-1483.19 187.26,-1482.79"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~swiftest_operators~~UsedByGraph_node12" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node12"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-2544 302,-2544 302,-2520 381,-2520 381,-2544"/>
-<text text-anchor="middle" x="341.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node12"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="413,-2544 270,-2544 270,-2520 413,-2520 413,-2544"/>
+<text text-anchor="middle" x="341.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge11" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.96,-2530.62C287.61,-2528.04 272.51,-2522.49 263,-2511 245.99,-2490.45 193.08,-1634.44 183.87,-1483.59"/>
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.86,-2519.8C269.19,-2517.34 265.84,-2514.44 263,-2511 245.99,-2490.45 193.08,-1634.44 183.87,-1483.59"/>
 <polygon fill="#000000" stroke="#000000" points="187.34,-1483.03 183.24,-1473.26 180.36,-1483.46 187.34,-1483.03"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_whm_coord -->
 <g id="module~~swiftest_operators~~UsedByGraph_node13" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node13"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-2502 314.5,-2502 314.5,-2478 368.5,-2478 368.5,-2502"/>
-<text text-anchor="middle" x="341.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_whm_coord</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node13"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-2502 302,-2502 302,-2478 381,-2478 381,-2502"/>
+<text text-anchor="middle" x="341.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge12" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.49,-2490.19C297.16,-2488.82 275.38,-2483.91 263,-2469 246.66,-2449.32 193.3,-1629.22 183.92,-1483.14"/>
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.98,-2488.6C287.63,-2486.03 272.53,-2480.48 263,-2469 246.66,-2449.32 193.3,-1629.22 183.92,-1483.14"/>
 <polygon fill="#000000" stroke="#000000" points="187.41,-1482.88 183.27,-1473.12 180.42,-1483.33 187.41,-1482.88"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_rescale -->
 <g id="module~~swiftest_operators~~UsedByGraph_node14" class="node">
-<title>module~s_io</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node14"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-2460 314.5,-2460 314.5,-2436 368.5,-2436 368.5,-2460"/>
-<text text-anchor="middle" x="341.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node14"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="380.5,-2460 302.5,-2460 302.5,-2436 380.5,-2436 380.5,-2460"/>
+<text text-anchor="middle" x="341.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge13" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.13,-2448.15C296.87,-2446.73 275.31,-2441.78 263,-2427 231.7,-2389.43 190.87,-1623.61 183.62,-1483.06"/>
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.41,-2446.66C287.94,-2444.11 272.64,-2438.57 263,-2427 231.7,-2389.43 190.87,-1623.61 183.62,-1483.06"/>
 <polygon fill="#000000" stroke="#000000" points="187.12,-1482.85 183.11,-1473.04 180.13,-1483.21 187.12,-1482.85"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~swiftest_operators~~UsedByGraph_node15" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node15"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="378,-2418 305,-2418 305,-2394 378,-2394 378,-2418"/>
-<text text-anchor="middle" x="341.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node15"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="420,-2418 263,-2418 263,-2394 420,-2394 420,-2418"/>
+<text text-anchor="middle" x="341.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge14" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.83,-2405.04C289.68,-2402.69 273.2,-2397.19 263,-2385 233.07,-2349.22 191.36,-1621.08 183.73,-1483.37"/>
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.25,-2393.99C269.43,-2391.5 265.95,-2388.53 263,-2385 233.07,-2349.22 191.36,-1621.08 183.73,-1483.37"/>
 <polygon fill="#000000" stroke="#000000" points="187.21,-1482.97 183.16,-1473.18 180.22,-1483.36 187.21,-1482.97"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_rmvs_step -->
 <g id="module~~swiftest_operators~~UsedByGraph_node16" class="node">
-<title>module~orbel</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node16"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="368.5,-2376 314.5,-2376 314.5,-2352 368.5,-2352 368.5,-2376"/>
-<text text-anchor="middle" x="341.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_rmvs_step</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node16"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="378,-2376 305,-2376 305,-2352 378,-2352 378,-2376"/>
+<text text-anchor="middle" x="341.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge15" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.17,-2364.12C296.93,-2362.68 275.37,-2357.73 263,-2343 234.44,-2309 191.87,-1618.11 183.83,-1483.59"/>
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.85,-2363.02C289.71,-2360.66 273.22,-2355.17 263,-2343 234.44,-2309 191.87,-1618.11 183.83,-1483.59"/>
 <polygon fill="#000000" stroke="#000000" points="187.31,-1483.05 183.22,-1473.27 180.32,-1483.46 187.31,-1483.05"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- module~s_util_index -->
 <g id="module~~swiftest_operators~~UsedByGraph_node17" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node17"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="379,-2334 304,-2334 304,-2310 379,-2310 379,-2334"/>
-<text text-anchor="middle" x="341.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>module~s_util_index</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node17"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="376,-2334 307,-2334 307,-2310 376,-2310 376,-2334"/>
+<text text-anchor="middle" x="341.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge16" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.68,-2320.8C288.87,-2318.34 272.98,-2312.83 263,-2301 208.66,-2236.6 186.98,-1609.57 183.14,-1483.15"/>
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.86,-2321.29C291.2,-2319.11 273.7,-2313.68 263,-2301 208.66,-2236.6 186.98,-1609.57 183.14,-1483.15"/>
 <polygon fill="#000000" stroke="#000000" points="186.64,-1482.99 182.84,-1473.1 179.64,-1483.2 186.64,-1482.99"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- proc~ge_wpp -->
 <g id="module~~swiftest_operators~~UsedByGraph_node18" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node18"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="391,-2292 292,-2292 292,-2268 391,-2268 391,-2292"/>
-<text text-anchor="middle" x="341.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node18"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="368.5,-2292 314.5,-2292 314.5,-2268 368.5,-2268 368.5,-2292"/>
+<text text-anchor="middle" x="341.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge17" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.6,-2276.05C280.74,-2272.88 270.3,-2267.61 263,-2259 211.36,-2198.11 187.64,-1605.87 183.26,-1483.18"/>
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.21,-2280.08C296.99,-2278.63 275.44,-2273.67 263,-2259 211.36,-2198.11 187.64,-1605.87 183.26,-1483.18"/>
 <polygon fill="#000000" stroke="#000000" points="186.75,-1482.96 182.9,-1473.09 179.76,-1483.21 186.75,-1482.96"/>
 </g>
-<!-- module~s_symba_encounter_check -->
+<!-- module~s_fraggle_set -->
 <g id="module~~swiftest_operators~~UsedByGraph_node19" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node19"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="413,-2250 270,-2250 270,-2226 413,-2226 413,-2250"/>
-<text text-anchor="middle" x="341.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node19"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="380,-2250 303,-2250 303,-2226 380,-2226 380,-2250"/>
+<text text-anchor="middle" x="341.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge18" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.33,-2225.92C269.49,-2223.45 265.99,-2220.5 263,-2217 214.05,-2159.6 188.33,-1601.76 183.39,-1483.12"/>
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge19" class="edge">
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.94,-2236.62C288.37,-2234.08 272.86,-2228.56 263,-2217 214.05,-2159.6 188.33,-1601.76 183.39,-1483.12"/>
 <polygon fill="#000000" stroke="#000000" points="186.88,-1482.88 182.97,-1473.04 179.88,-1483.17 186.88,-1482.88"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_fraggle_io -->
 <g id="module~~swiftest_operators~~UsedByGraph_node20" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node20"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-2208 306.5,-2208 306.5,-2184 376.5,-2184 376.5,-2208"/>
-<text text-anchor="middle" x="341.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node20"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="377,-2208 306,-2208 306,-2184 377,-2184 377,-2208"/>
+<text text-anchor="middle" x="341.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge19" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.16,-2195.1C290.72,-2192.83 273.62,-2187.38 263,-2175 216.76,-2121.12 189.1,-1598.37 183.54,-1483.32"/>
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge20" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.77,-2195.04C290.43,-2192.73 273.53,-2187.27 263,-2175 216.76,-2121.12 189.1,-1598.37 183.54,-1483.32"/>
 <polygon fill="#000000" stroke="#000000" points="187.03,-1483.04 183.06,-1473.21 180.04,-1483.37 187.03,-1483.04"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~swiftest_operators~~UsedByGraph_node21" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node21"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="382.5,-2166 300.5,-2166 300.5,-2142 382.5,-2142 382.5,-2166"/>
-<text text-anchor="middle" x="341.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node21"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="377,-2166 306,-2166 306,-2142 377,-2142 377,-2166"/>
+<text text-anchor="middle" x="341.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge20" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.2,-2152.02C286.49,-2149.28 272.3,-2143.76 263,-2133 219.41,-2082.56 189.84,-1593.39 183.69,-1483.04"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge21" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.8,-2153C290.48,-2150.69 273.57,-2145.23 263,-2133 219.41,-2082.56 189.84,-1593.39 183.69,-1483.04"/>
 <polygon fill="#000000" stroke="#000000" points="187.18,-1482.84 183.14,-1473.04 180.19,-1483.22 187.18,-1482.84"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_util_set -->
 <g id="module~~swiftest_operators~~UsedByGraph_node22" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node22"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="378,-2124 305,-2124 305,-2100 378,-2100 378,-2124"/>
-<text text-anchor="middle" x="341.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_util_set</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node22"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="370.5,-2124 312.5,-2124 312.5,-2100 370.5,-2100 370.5,-2124"/>
+<text text-anchor="middle" x="341.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge21" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.66,-2110.78C289.66,-2108.36 273.35,-2102.88 263,-2091 181.84,-1997.83 181.09,-1584.96 182.16,-1483.55"/>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge22" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.45,-2111.8C295.62,-2110.1 275.18,-2104.98 263,-2091 181.84,-1997.83 181.09,-1584.96 182.16,-1483.55"/>
 <polygon fill="#000000" stroke="#000000" points="185.66,-1483.29 182.29,-1473.25 178.66,-1483.21 185.66,-1483.29"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- module~s_rmvs_io -->
 <g id="module~~swiftest_operators~~UsedByGraph_node23" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node23"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="372.5,-2082 310.5,-2082 310.5,-2058 372.5,-2058 372.5,-2082"/>
-<text text-anchor="middle" x="341.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node23"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="372,-2082 311,-2082 311,-2058 372,-2058 372,-2082"/>
+<text text-anchor="middle" x="341.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge22" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.2,-2069.51C293.85,-2067.57 274.69,-2062.3 263,-2049 187.09,-1962.65 182.35,-1580.02 182.39,-1483.28"/>
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge23" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.97,-2069.6C294.46,-2067.73 274.87,-2062.51 263,-2049 187.09,-1962.65 182.35,-1580.02 182.39,-1483.28"/>
 <polygon fill="#000000" stroke="#000000" points="185.89,-1483.18 182.41,-1473.17 178.89,-1483.16 185.89,-1483.18"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_util_version -->
 <g id="module~~swiftest_operators~~UsedByGraph_node24" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node24"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="389.5,-2040 293.5,-2040 293.5,-2016 389.5,-2016 389.5,-2040"/>
-<text text-anchor="middle" x="341.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_util_version</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node24"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="380.5,-2040 302.5,-2040 302.5,-2016 380.5,-2016 380.5,-2040"/>
+<text text-anchor="middle" x="341.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge23" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.49,-2024.27C282.06,-2021.15 270.87,-2015.86 263,-2007 192.45,-1927.57 183.72,-1576.07 182.65,-1483.44"/>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge24" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.37,-2026.27C288.07,-2023.65 272.91,-2018.15 263,-2007 192.45,-1927.57 183.72,-1576.07 182.65,-1483.44"/>
 <polygon fill="#000000" stroke="#000000" points="186.15,-1483.2 182.55,-1473.24 179.15,-1483.27 186.15,-1483.2"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_tides_step_spin -->
 <g id="module~~swiftest_operators~~UsedByGraph_node25" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node25"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="385.5,-1998 297.5,-1998 297.5,-1974 385.5,-1974 385.5,-1998"/>
-<text text-anchor="middle" x="341.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node25"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="390.5,-1998 292.5,-1998 292.5,-1974 390.5,-1974 390.5,-1998"/>
+<text text-anchor="middle" x="341.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge24" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.2,-1983.12C284.54,-1980.16 271.76,-1974.74 263,-1965 197.73,-1892.4 185.18,-1571.4 182.95,-1483.39"/>
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge25" class="edge">
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.35,-1981.86C281.34,-1978.71 270.64,-1973.5 263,-1965 197.73,-1892.4 185.18,-1571.4 182.95,-1483.39"/>
 <polygon fill="#000000" stroke="#000000" points="186.45,-1483.11 182.71,-1473.2 179.45,-1483.27 186.45,-1483.11"/>
 </g>
-<!-- module~whm_drift -->
+<!-- proc~solve_wbs -->
 <g id="module~~swiftest_operators~~UsedByGraph_node26" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node26"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="371,-1956 312,-1956 312,-1932 371,-1932 371,-1956"/>
-<text text-anchor="middle" x="341.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node26"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="372.5,-1956 310.5,-1956 310.5,-1932 372.5,-1932 372.5,-1956"/>
+<text text-anchor="middle" x="341.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge25" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.91,-1943.52C295.31,-1941.68 275.3,-1936.49 263,-1923 202.95,-1857.14 186.73,-1566.02 183.3,-1483.11"/>
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge26" class="edge">
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.38,-1943.34C294.1,-1941.35 274.93,-1936.08 263,-1923 202.95,-1857.14 186.73,-1566.02 183.3,-1483.11"/>
 <polygon fill="#000000" stroke="#000000" points="186.79,-1482.89 182.9,-1473.03 179.8,-1483.16 186.79,-1482.89"/>
 </g>
-<!-- module~s_rmvs_util -->
+<!-- module~s_orbel -->
 <g id="module~~swiftest_operators~~UsedByGraph_node27" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node27"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="375,-1914 308,-1914 308,-1890 375,-1890 375,-1914"/>
-<text text-anchor="middle" x="341.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<title>module~s_orbel</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node27"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-1914 314.5,-1914 314.5,-1890 368.5,-1890 368.5,-1914"/>
+<text text-anchor="middle" x="341.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge26" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.75,-1900.9C292.12,-1898.65 274.38,-1893.27 263,-1881 208.26,-1821.98 188.5,-1561.62 183.73,-1483.34"/>
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge27" class="edge">
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.25,-1901.68C297.27,-1900.03 275.99,-1895 263,-1881 208.26,-1821.98 188.5,-1561.62 183.73,-1483.34"/>
 <polygon fill="#000000" stroke="#000000" points="187.21,-1482.93 183.14,-1473.16 180.23,-1483.34 187.21,-1482.93"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- module~s_whm_gr -->
 <g id="module~~swiftest_operators~~UsedByGraph_node28" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node28"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="377,-1872 306,-1872 306,-1848 377,-1848 377,-1872"/>
-<text text-anchor="middle" x="341.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node28"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="372.5,-1872 310.5,-1872 310.5,-1848 372.5,-1848 372.5,-1872"/>
+<text text-anchor="middle" x="341.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge27" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.9,-1858.5C290.78,-1856.06 274.02,-1850.64 263,-1839 213.52,-1786.74 190.44,-1556.63 184.26,-1483.44"/>
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge28" class="edge">
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.18,-1859.12C294.04,-1857.04 275.08,-1851.76 263,-1839 213.52,-1786.74 190.44,-1556.63 184.26,-1483.44"/>
 <polygon fill="#000000" stroke="#000000" points="187.72,-1482.77 183.41,-1473.09 180.74,-1483.34 187.72,-1482.77"/>
 </g>
-<!-- module~s_util_append -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~swiftest_operators~~UsedByGraph_node29" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node29"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-1830 302,-1830 302,-1806 381,-1806 381,-1830"/>
-<text text-anchor="middle" x="341.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node29"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-1830 306.5,-1830 306.5,-1806 376.5,-1806 376.5,-1830"/>
+<text text-anchor="middle" x="341.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge28" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.66,-1815.58C287.78,-1812.82 273.1,-1807.4 263,-1797 218.67,-1751.34 192.52,-1550.54 184.87,-1483.14"/>
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge29" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.42,-1816.44C291.23,-1814 274.26,-1808.6 263,-1797 218.67,-1751.34 192.52,-1550.54 184.87,-1483.14"/>
 <polygon fill="#000000" stroke="#000000" points="188.35,-1482.73 183.77,-1473.18 181.39,-1483.5 188.35,-1482.73"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~swiftest_operators~~UsedByGraph_node30" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node30"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="377,-1788 306,-1788 306,-1764 377,-1764 377,-1788"/>
-<text text-anchor="middle" x="341.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node30"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="389.5,-1788 293.5,-1788 293.5,-1764 389.5,-1764 389.5,-1788"/>
+<text text-anchor="middle" x="341.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge29" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.8,-1774.14C290.85,-1771.61 274.25,-1766.22 263,-1755 186.74,-1678.94 180.86,-1538 181.65,-1483.41"/>
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge30" class="edge">
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.38,-1771.39C282.22,-1768.25 271.19,-1763.17 263,-1755 186.74,-1678.94 180.86,-1538 181.65,-1483.41"/>
 <polygon fill="#000000" stroke="#000000" points="185.15,-1483.21 181.9,-1473.13 178.16,-1483.04 185.15,-1483.21"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_util_exit -->
 <g id="module~~swiftest_operators~~UsedByGraph_node31" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node31"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-1746 314.5,-1746 314.5,-1722 368.5,-1722 368.5,-1746"/>
-<text text-anchor="middle" x="341.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node31"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="371.5,-1746 311.5,-1746 311.5,-1722 371.5,-1722 371.5,-1746"/>
+<text text-anchor="middle" x="341.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge30" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.41,-1733.12C297.72,-1731.21 276.7,-1726.1 263,-1713 196.79,-1649.68 184.89,-1532.05 182.86,-1483.18"/>
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge31" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.42,-1732.75C295.27,-1730.58 275.9,-1725.33 263,-1713 196.79,-1649.68 184.89,-1532.05 182.86,-1483.18"/>
 <polygon fill="#000000" stroke="#000000" points="186.35,-1482.96 182.54,-1473.07 179.36,-1483.17 186.35,-1482.96"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_netcdf -->
 <g id="module~~swiftest_operators~~UsedByGraph_node32" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="372,-1704 311,-1704 311,-1680 372,-1680 372,-1704"/>
-<text text-anchor="middle" x="341.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node32"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-1704 314.5,-1704 314.5,-1680 368.5,-1680 368.5,-1704"/>
+<text text-anchor="middle" x="341.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge31" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.92,-1690.36C295.01,-1688.05 276.03,-1682.77 263,-1671 206.88,-1620.3 189.6,-1526.11 184.51,-1483.26"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge32" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.28,-1690.82C297.75,-1688.77 276.96,-1683.62 263,-1671 206.88,-1620.3 189.6,-1526.11 184.51,-1483.26"/>
 <polygon fill="#000000" stroke="#000000" points="187.97,-1482.64 183.42,-1473.07 181.01,-1483.38 187.97,-1482.64"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~swiftest_operators~~UsedByGraph_node33" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node33"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="400.5,-1662 282.5,-1662 282.5,-1638 400.5,-1638 400.5,-1662"/>
-<text text-anchor="middle" x="341.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node33"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="385.5,-1662 297.5,-1662 297.5,-1638 385.5,-1638 385.5,-1662"/>
+<text text-anchor="middle" x="341.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge32" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.3,-1640.25C275.33,-1637.4 268.68,-1633.73 263,-1629 216.82,-1590.56 195.27,-1519.43 186.92,-1483.31"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge33" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.16,-1645.09C285.08,-1642.01 272.64,-1637.03 263,-1629 216.82,-1590.56 195.27,-1519.43 186.92,-1483.31"/>
 <polygon fill="#000000" stroke="#000000" points="190.29,-1482.32 184.74,-1473.3 183.45,-1483.81 190.29,-1482.32"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_util_peri -->
 <g id="module~~swiftest_operators~~UsedByGraph_node34" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node34"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-1620 302,-1620 302,-1596 381,-1596 381,-1620"/>
-<text text-anchor="middle" x="341.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node34"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="372,-1620 311,-1620 311,-1596 372,-1596 372,-1620"/>
+<text text-anchor="middle" x="341.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge33" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.75,-1603.3C288.52,-1600.26 274.24,-1595.25 263,-1587 226.29,-1560.04 202.09,-1510.85 190.49,-1482.56"/>
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge34" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.67,-1605.1C295.25,-1602.39 276.82,-1597.15 263,-1587 226.29,-1560.04 202.09,-1510.85 190.49,-1482.56"/>
 <polygon fill="#000000" stroke="#000000" points="193.71,-1481.19 186.79,-1473.17 187.2,-1483.76 193.71,-1481.19"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_helio_drift -->
 <g id="module~~swiftest_operators~~UsedByGraph_node35" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node35"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="372.5,-1578 310.5,-1578 310.5,-1554 372.5,-1554 372.5,-1578"/>
-<text text-anchor="middle" x="341.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node35"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-1578 306.5,-1578 306.5,-1554 376.5,-1554 376.5,-1578"/>
+<text text-anchor="middle" x="341.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge34" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.3,-1561.75C295.31,-1558.69 277.39,-1553.54 263,-1545 235.59,-1528.73 211.38,-1500.59 196.84,-1481.41"/>
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge35" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.5,-1560.94C292.35,-1557.8 276.19,-1552.83 263,-1545 235.59,-1528.73 211.38,-1500.59 196.84,-1481.41"/>
 <polygon fill="#000000" stroke="#000000" points="199.61,-1479.27 190.87,-1473.3 193.98,-1483.42 199.61,-1479.27"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_setup -->
 <g id="module~~swiftest_operators~~UsedByGraph_node36" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node36"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="390.5,-1536 292.5,-1536 292.5,-1512 390.5,-1512 390.5,-1536"/>
-<text text-anchor="middle" x="341.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_setup</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node36"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-1536 314.5,-1536 314.5,-1512 368.5,-1512 368.5,-1536"/>
+<text text-anchor="middle" x="341.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge35" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.43,-1512.71C282.57,-1509.92 272.35,-1506.66 263,-1503 245.37,-1496.11 226.57,-1486.44 211.57,-1478.12"/>
+<!-- module~s_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge36" class="edge">
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.21,-1518.37C298.99,-1514.75 279.62,-1509.5 263,-1503 245.37,-1496.11 226.57,-1486.44 211.57,-1478.12"/>
 <polygon fill="#000000" stroke="#000000" points="213.2,-1475.02 202.77,-1473.15 209.76,-1481.11 213.2,-1475.02"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_helio_kick -->
 <g id="module~~swiftest_operators~~UsedByGraph_node37" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node37"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-1494 314.5,-1494 314.5,-1470 368.5,-1470 368.5,-1494"/>
-<text text-anchor="middle" x="341.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node37"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-1494 306.5,-1494 306.5,-1470 376.5,-1470 376.5,-1494"/>
+<text text-anchor="middle" x="341.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge36" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.41,-1478.53C288.34,-1475.07 248.03,-1469.71 218.84,-1465.83"/>
-<polygon fill="#000000" stroke="#000000" points="219,-1462.32 208.63,-1464.47 218.08,-1469.26 219,-1462.32"/>
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge37" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.22,-1477.44C280.42,-1474.01 245.13,-1469.32 218.84,-1465.83"/>
+<polygon fill="#000000" stroke="#000000" points="219.27,-1462.36 208.89,-1464.51 218.34,-1469.3 219.27,-1462.36"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_util_append -->
 <g id="module~~swiftest_operators~~UsedByGraph_node38" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node38"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="370.5,-1452 312.5,-1452 312.5,-1428 370.5,-1428 370.5,-1452"/>
-<text text-anchor="middle" x="341.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_util_append</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node38"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-1452 302,-1452 302,-1428 381,-1428 381,-1452"/>
+<text text-anchor="middle" x="341.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge37" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.25,-1443.75C286.09,-1447.23 247.04,-1452.42 218.61,-1456.2"/>
-<polygon fill="#000000" stroke="#000000" points="218.12,-1452.74 208.67,-1457.52 219.04,-1459.67 218.12,-1452.74"/>
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge38" class="edge">
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.85,-1445.14C276.59,-1448.49 243.8,-1452.85 218.99,-1456.15"/>
+<polygon fill="#000000" stroke="#000000" points="218.34,-1452.71 208.89,-1457.49 219.26,-1459.64 218.34,-1452.71"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- module~s_rmvs_util -->
 <g id="module~~swiftest_operators~~UsedByGraph_node39" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node39"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="377.5,-1410 305.5,-1410 305.5,-1386 377.5,-1386 377.5,-1410"/>
-<text text-anchor="middle" x="341.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node39"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="375,-1410 308,-1410 308,-1386 375,-1386 375,-1410"/>
+<text text-anchor="middle" x="341.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge38" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.12,-1405.5C291.67,-1408.89 276.37,-1413.4 263,-1419 245.91,-1426.15 243.39,-1431.37 227,-1440 224.05,-1441.55 220.97,-1443.12 217.86,-1444.66"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge40" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.81,-1404.83C293.74,-1408.29 277.27,-1413.03 263,-1419 245.91,-1426.15 243.39,-1431.37 227,-1440 224.05,-1441.55 220.97,-1443.12 217.86,-1444.66"/>
 <polygon fill="#000000" stroke="#000000" points="216.04,-1441.65 208.57,-1449.16 219.1,-1447.95 216.04,-1441.65"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- program~swiftest_driver -->
 <g id="module~~swiftest_operators~~UsedByGraph_node40" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node40"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="396,-1368 287,-1368 287,-1344 396,-1344 396,-1368"/>
-<text text-anchor="middle" x="341.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node40"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382,-1368 301,-1368 301,-1344 382,-1344 382,-1368"/>
+<text text-anchor="middle" x="341.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge39" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.62,-1364.65C278.17,-1367.63 269.95,-1371.63 263,-1377 237.49,-1396.72 250.68,-1418.11 227,-1440 224.2,-1442.59 221.03,-1444.91 217.69,-1446.99"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge41" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.73,-1360.58C287.7,-1363.61 273.81,-1368.64 263,-1377 237.49,-1396.72 250.68,-1418.11 227,-1440 224.2,-1442.59 221.03,-1444.91 217.69,-1446.99"/>
 <polygon fill="#000000" stroke="#000000" points="215.76,-1444.05 208.64,-1451.9 219.09,-1450.21 215.76,-1444.05"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- module~s_symba_step -->
 <g id="module~~swiftest_operators~~UsedByGraph_node41" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node41"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="394.5,-1326 288.5,-1326 288.5,-1302 394.5,-1302 394.5,-1326"/>
-<text text-anchor="middle" x="341.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node41"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="382.5,-1326 300.5,-1326 300.5,-1302 382.5,-1302 382.5,-1326"/>
+<text text-anchor="middle" x="341.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge40" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.49,-1320.59C279.14,-1323.74 270.12,-1328.33 263,-1335 226.99,-1368.72 259.9,-1403.24 227,-1440 224.32,-1442.99 221.12,-1445.6 217.69,-1447.85"/>
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge42" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.17,-1317.36C286.95,-1320.29 273.07,-1325.57 263,-1335 226.99,-1368.72 259.9,-1403.24 227,-1440 224.32,-1442.99 221.12,-1445.6 217.69,-1447.85"/>
 <polygon fill="#000000" stroke="#000000" points="215.88,-1444.85 208.83,-1452.76 219.27,-1450.98 215.88,-1444.85"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_symba_util -->
 <g id="module~~swiftest_operators~~UsedByGraph_node42" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node42"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="385.5,-1284 297.5,-1284 297.5,-1260 385.5,-1260 385.5,-1284"/>
-<text text-anchor="middle" x="341.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node42"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="379,-1284 304,-1284 304,-1260 379,-1260 379,-1284"/>
+<text text-anchor="middle" x="341.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge42" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.26,-1275.41C284.76,-1278.41 272.05,-1283.72 263,-1293 216.02,-1341.14 269.56,-1387.91 227,-1440 224.4,-1443.18 221.2,-1445.91 217.73,-1448.25"/>
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge43" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.68,-1274.06C289.24,-1276.7 273.61,-1282.13 263,-1293 216.02,-1341.14 269.56,-1387.91 227,-1440 224.4,-1443.18 221.2,-1445.91 217.73,-1448.25"/>
 <polygon fill="#000000" stroke="#000000" points="215.74,-1445.35 208.7,-1453.26 219.14,-1451.47 215.74,-1445.35"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_util_copy -->
 <g id="module~~swiftest_operators~~UsedByGraph_node43" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node43"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="372.5,-1242 310.5,-1242 310.5,-1218 372.5,-1218 372.5,-1242"/>
-<text text-anchor="middle" x="341.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node43"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="374.5,-1242 308.5,-1242 308.5,-1218 374.5,-1218 374.5,-1242"/>
+<text text-anchor="middle" x="341.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge43" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.46,-1230.73C294.2,-1232.74 275.03,-1238.01 263,-1251 204.89,-1313.73 279.36,-1372.4 227,-1440 224.48,-1443.25 221.34,-1446.02 217.89,-1448.38"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge44" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M308.14,-1231.04C292.4,-1233.26 274.46,-1238.63 263,-1251 204.89,-1313.73 279.36,-1372.4 227,-1440 224.48,-1443.25 221.34,-1446.02 217.89,-1448.38"/>
 <polygon fill="#000000" stroke="#000000" points="215.91,-1445.48 208.89,-1453.42 219.33,-1451.58 215.91,-1445.48"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_discard -->
 <g id="module~~swiftest_operators~~UsedByGraph_node44" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node44"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="386,-1200 297,-1200 297,-1176 386,-1176 386,-1200"/>
-<text text-anchor="middle" x="341.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~s_discard</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node44"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="370.5,-1200 312.5,-1200 312.5,-1176 370.5,-1176 370.5,-1200"/>
+<text text-anchor="middle" x="341.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge44" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296.77,-1190.95C284.24,-1193.93 271.65,-1199.34 263,-1209 193.68,-1286.4 289.24,-1356.8 227,-1440 224.41,-1443.46 221.1,-1446.38 217.47,-1448.83"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge45" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.21,-1188.36C295.5,-1190.14 275.28,-1195.29 263,-1209 193.68,-1286.4 289.24,-1356.8 227,-1440 224.41,-1443.46 221.1,-1446.38 217.47,-1448.83"/>
 <polygon fill="#000000" stroke="#000000" points="215.63,-1445.84 208.56,-1453.73 219.01,-1451.97 215.63,-1445.84"/>
 </g>
 <!-- module~s_util_sort -->
@@ -1053,414 +1053,414 @@ <h3 class="panel-title">Used by</h3>
 </g>
 </g>
 <!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge70" class="edge">
+<g id="module~~swiftest_operators~~UsedByGraph_edge46" class="edge">
 <title>module~s_util_sort&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.95,-1146.38C294.43,-1148.24 274.84,-1153.46 263,-1167 182.43,-1259.12 299.15,-1341.15 227,-1440 224.45,-1443.49 221.17,-1446.43 217.54,-1448.88"/>
 <polygon fill="#000000" stroke="#000000" points="215.71,-1445.9 208.65,-1453.8 219.1,-1452.03 215.71,-1445.9"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_whm_setup -->
 <g id="module~~swiftest_operators~~UsedByGraph_node46" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node46"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382,-1116 301,-1116 301,-1092 382,-1092 382,-1116"/>
-<text text-anchor="middle" x="341.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node46"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-1116 302,-1116 302,-1092 381,-1092 381,-1116"/>
+<text text-anchor="middle" x="341.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge45" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.97,-1105.79C287.01,-1108.48 272.45,-1114.01 263,-1125 171.15,-1231.86 309.08,-1325.47 227,-1440 224.48,-1443.52 221.22,-1446.46 217.6,-1448.93"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge47" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.78,-1105.64C287.57,-1108.27 272.63,-1113.79 263,-1125 171.15,-1231.86 309.08,-1325.47 227,-1440 224.48,-1443.52 221.22,-1446.46 217.6,-1448.93"/>
 <polygon fill="#000000" stroke="#000000" points="215.77,-1445.94 208.72,-1453.84 219.16,-1452.06 215.77,-1445.94"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_resize -->
 <g id="module~~swiftest_operators~~UsedByGraph_node47" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node47"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-1074 314.5,-1074 314.5,-1050 368.5,-1050 368.5,-1074"/>
-<text text-anchor="middle" x="341.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node47"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="377.5,-1074 305.5,-1074 305.5,-1050 377.5,-1050 377.5,-1074"/>
+<text text-anchor="middle" x="341.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge46" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.21,-1061.92C296.99,-1063.37 275.44,-1068.33 263,-1083 211.43,-1143.81 273.02,-1374.88 227,-1440 224.5,-1443.53 221.26,-1446.49 217.65,-1448.96"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge48" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.3,-1062.97C290.06,-1065.29 273.37,-1070.77 263,-1083 211.43,-1143.81 273.02,-1374.88 227,-1440 224.5,-1443.53 221.26,-1446.49 217.65,-1448.96"/>
 <polygon fill="#000000" stroke="#000000" points="215.82,-1445.97 208.77,-1453.88 219.21,-1452.09 215.82,-1445.97"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~s_helio_gr -->
 <g id="module~~swiftest_operators~~UsedByGraph_node48" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node48"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="397.5,-1032 285.5,-1032 285.5,-1008 397.5,-1008 397.5,-1032"/>
-<text text-anchor="middle" x="341.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node48"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="372.5,-1032 310.5,-1032 310.5,-1008 372.5,-1008 372.5,-1032"/>
+<text text-anchor="middle" x="341.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge47" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.18,-1026.03C276.69,-1029.29 268.82,-1034.06 263,-1041 205.78,-1109.2 278,-1367.03 227,-1440 224.52,-1443.54 221.29,-1446.51 217.68,-1448.98"/>
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge49" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.35,-1020.25C293.84,-1022.08 274.47,-1027.33 263,-1041 205.78,-1109.2 278,-1367.03 227,-1440 224.52,-1443.54 221.29,-1446.51 217.68,-1448.98"/>
 <polygon fill="#000000" stroke="#000000" points="215.85,-1446 208.81,-1453.91 219.25,-1452.12 215.85,-1446"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~orbel -->
 <g id="module~~swiftest_operators~~UsedByGraph_node49" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node49"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="380.5,-990 302.5,-990 302.5,-966 380.5,-966 380.5,-990"/>
-<text text-anchor="middle" x="341.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~orbel</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node49"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="368.5,-990 314.5,-990 314.5,-966 368.5,-966 368.5,-990"/>
+<text text-anchor="middle" x="341.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge48" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.4,-979.34C287.93,-981.88 272.63,-987.43 263,-999 200.12,-1074.59 282.98,-1359.16 227,-1440 224.54,-1443.56 221.31,-1446.53 217.71,-1449"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge50" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.5,-977.81C297.17,-979.19 275.39,-984.1 263,-999 200.12,-1074.59 282.98,-1359.16 227,-1440 224.54,-1443.56 221.31,-1446.53 217.71,-1449"/>
 <polygon fill="#000000" stroke="#000000" points="215.88,-1446.02 208.85,-1453.93 219.29,-1452.13 215.88,-1446.02"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_whm_util -->
 <g id="module~~swiftest_operators~~UsedByGraph_node50" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node50"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="420,-948 263,-948 263,-924 420,-924 420,-948"/>
-<text text-anchor="middle" x="341.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node50"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="374.5,-948 308.5,-948 308.5,-924 374.5,-924 374.5,-948"/>
+<text text-anchor="middle" x="341.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge49" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.85,-948.2C269.18,-950.65 265.84,-953.56 263,-957 194.46,-1039.99 287.96,-1351.3 227,-1440 224.55,-1443.56 221.33,-1446.54 217.74,-1449.02"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge51" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M308.32,-936.41C292.24,-938.41 273.92,-943.78 263,-957 194.46,-1039.99 287.96,-1351.3 227,-1440 224.55,-1443.56 221.33,-1446.54 217.74,-1449.02"/>
 <polygon fill="#000000" stroke="#000000" points="215.91,-1446.03 208.87,-1453.95 219.31,-1452.15 215.91,-1446.03"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~swiftest_operators~~UsedByGraph_node51" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node51"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-906 314.5,-906 314.5,-882 368.5,-882 368.5,-906"/>
-<text text-anchor="middle" x="341.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node51"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-906 302,-906 302,-882 381,-882 381,-906"/>
+<text text-anchor="middle" x="341.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge50" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.44,-893.76C297.09,-895.12 275.29,-900.02 263,-915 188.8,-1005.39 292.95,-1343.43 227,-1440 224.56,-1443.57 221.35,-1446.55 217.76,-1449.03"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge52" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.92,-895.34C287.56,-897.91 272.46,-903.47 263,-915 188.8,-1005.39 292.95,-1343.43 227,-1440 224.56,-1443.57 221.35,-1446.55 217.76,-1449.03"/>
 <polygon fill="#000000" stroke="#000000" points="215.93,-1446.05 208.9,-1453.97 219.34,-1452.16 215.93,-1446.05"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_util_spill -->
 <g id="module~~swiftest_operators~~UsedByGraph_node52" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node52"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-864 302,-864 302,-840 381,-840 381,-864"/>
-<text text-anchor="middle" x="341.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node52"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="372,-864 311,-864 311,-840 372,-840 372,-864"/>
+<text text-anchor="middle" x="341.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge51" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.89,-853.32C287.52,-855.88 272.43,-861.45 263,-873 183.14,-970.79 297.94,-1335.56 227,-1440 224.57,-1443.58 221.36,-1446.56 217.78,-1449.05"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge53" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.99,-852.05C294.27,-853.77 274.46,-858.96 263,-873 183.14,-970.79 297.94,-1335.56 227,-1440 224.57,-1443.58 221.36,-1446.56 217.78,-1449.05"/>
 <polygon fill="#000000" stroke="#000000" points="215.95,-1446.06 208.92,-1453.98 219.36,-1452.17 215.95,-1446.06"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~swiftest_operators~~UsedByGraph_node53" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node53"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="376,-822 307,-822 307,-798 376,-798 376,-822"/>
-<text text-anchor="middle" x="341.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node53"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="397.5,-822 285.5,-822 285.5,-798 397.5,-798 397.5,-822"/>
+<text text-anchor="middle" x="341.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge52" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.66,-810.55C290.95,-812.69 273.46,-818.13 263,-831 177.48,-936.19 302.93,-1327.69 227,-1440 224.58,-1443.58 221.37,-1446.57 217.79,-1449.06"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge54" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.39,-815.74C276.77,-819.01 268.8,-823.86 263,-831 177.48,-936.19 302.93,-1327.69 227,-1440 224.58,-1443.58 221.37,-1446.57 217.79,-1449.06"/>
 <polygon fill="#000000" stroke="#000000" points="215.96,-1446.07 208.94,-1454 219.37,-1452.18 215.96,-1446.07"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~swiftest_operators~~UsedByGraph_node54" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node54"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="374,-780 309,-780 309,-756 374,-756 374,-780"/>
-<text text-anchor="middle" x="341.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node54"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="397.5,-780 285.5,-780 285.5,-756 397.5,-756 397.5,-780"/>
+<text text-anchor="middle" x="341.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge53" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M308.61,-768.28C292.4,-770.22 273.88,-775.57 263,-789 171.82,-901.6 307.92,-1319.81 227,-1440 224.58,-1443.59 221.38,-1446.58 217.8,-1449.07"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge55" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.37,-773.72C276.75,-776.99 268.79,-781.85 263,-789 171.82,-901.6 307.92,-1319.81 227,-1440 224.58,-1443.59 221.38,-1446.58 217.8,-1449.07"/>
 <polygon fill="#000000" stroke="#000000" points="215.98,-1446.08 208.95,-1454.01 219.39,-1452.19 215.98,-1446.08"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- module~s_whm_kick -->
 <g id="module~~swiftest_operators~~UsedByGraph_node55" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node55"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<title>module~s_whm_kick</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node55"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-738 306.5,-738 306.5,-714 376.5,-714 376.5,-738"/>
-<text text-anchor="middle" x="341.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<text text-anchor="middle" x="341.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge54" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge56" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.22,-726.57C290.6,-728.74 273.33,-734.2 263,-747 166.15,-867 312.91,-1311.94 227,-1440 224.59,-1443.59 221.39,-1446.58 217.82,-1449.07"/>
 <polygon fill="#000000" stroke="#000000" points="215.99,-1446.08 208.96,-1454.02 219.4,-1452.2 215.99,-1446.08"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~s_symba_discard -->
 <g id="module~~swiftest_operators~~UsedByGraph_node56" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node56"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-696 306.5,-696 306.5,-672 376.5,-672 376.5,-696"/>
-<text text-anchor="middle" x="341.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node56"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="389.5,-696 293.5,-696 293.5,-672 389.5,-672 389.5,-696"/>
+<text text-anchor="middle" x="341.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge55" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.21,-684.56C290.58,-686.72 273.31,-692.18 263,-705 211.74,-768.7 272.45,-1372.03 227,-1440 224.54,-1443.67 221.26,-1446.72 217.59,-1449.25"/>
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge57" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.3,-687.13C281.73,-690.23 270.52,-695.66 263,-705 211.74,-768.7 272.45,-1372.03 227,-1440 224.54,-1443.67 221.26,-1446.72 217.59,-1449.25"/>
 <polygon fill="#000000" stroke="#000000" points="215.59,-1446.35 208.51,-1454.23 218.96,-1452.48 215.59,-1446.35"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_symba_drift -->
 <g id="module~~swiftest_operators~~UsedByGraph_node57" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node57"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="370.5,-654 312.5,-654 312.5,-630 370.5,-630 370.5,-654"/>
-<text text-anchor="middle" x="341.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node57"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-654 302,-654 302,-630 381,-630 381,-654"/>
+<text text-anchor="middle" x="341.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge56" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.44,-641.84C295.38,-643.36 274.69,-648.43 263,-663 208.91,-730.41 274.95,-1368.09 227,-1440 224.55,-1443.68 221.27,-1446.73 217.6,-1449.25"/>
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge58" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.79,-643.24C287.41,-645.79 272.34,-651.37 263,-663 208.91,-730.41 274.95,-1368.09 227,-1440 224.55,-1443.68 221.27,-1446.73 217.6,-1449.25"/>
 <polygon fill="#000000" stroke="#000000" points="215.6,-1446.35 208.52,-1454.24 218.97,-1452.49 215.6,-1446.35"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~whm_drift -->
 <g id="module~~swiftest_operators~~UsedByGraph_node58" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node58"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="372,-612 311,-612 311,-588 372,-588 372,-612"/>
-<text text-anchor="middle" x="341.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~whm_drift</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node58"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="371,-612 312,-612 312,-588 371,-588 371,-612"/>
+<text text-anchor="middle" x="341.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge57" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.89,-599.97C294.13,-601.66 274.33,-606.85 263,-621 206.08,-692.11 277.44,-1364.15 227,-1440 224.55,-1443.68 221.27,-1446.73 217.6,-1449.26"/>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge59" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.66,-599.9C294.74,-601.5 274.5,-606.63 263,-621 206.08,-692.11 277.44,-1364.15 227,-1440 224.55,-1443.68 221.27,-1446.73 217.6,-1449.26"/>
 <polygon fill="#000000" stroke="#000000" points="215.61,-1446.36 208.53,-1454.24 218.98,-1452.5 215.61,-1446.36"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~swiftest_operators~~UsedByGraph_node59" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node59"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="397.5,-570 285.5,-570 285.5,-546 397.5,-546 397.5,-570"/>
-<text text-anchor="middle" x="341.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node59"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="398.5,-570 284.5,-570 284.5,-546 398.5,-546 398.5,-570"/>
+<text text-anchor="middle" x="341.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge58" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.29,-563.65C276.67,-566.93 268.74,-571.81 263,-579 203.24,-653.81 279.94,-1360.22 227,-1440 224.56,-1443.68 221.28,-1446.74 217.61,-1449.26"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge60" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.12,-564.11C275.96,-567.38 268.48,-572.14 263,-579 203.24,-653.81 279.94,-1360.22 227,-1440 224.56,-1443.68 221.28,-1446.74 217.61,-1449.26"/>
 <polygon fill="#000000" stroke="#000000" points="215.62,-1446.37 208.54,-1454.25 218.99,-1452.5 215.62,-1446.37"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~s_util_fill -->
 <g id="module~~swiftest_operators~~UsedByGraph_node60" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node60"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-528 306.5,-528 306.5,-504 376.5,-504 376.5,-528"/>
-<text text-anchor="middle" x="341.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node60"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-528 314.5,-528 314.5,-504 368.5,-504 368.5,-528"/>
+<text text-anchor="middle" x="341.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge59" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.16,-516.51C290.52,-518.67 273.25,-524.14 263,-537 200.41,-615.52 282.44,-1356.28 227,-1440 224.56,-1443.69 221.29,-1446.74 217.62,-1449.27"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge61" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.3,-515.66C296.89,-516.96 275.08,-521.85 263,-537 200.41,-615.52 282.44,-1356.28 227,-1440 224.56,-1443.69 221.29,-1446.74 217.62,-1449.27"/>
 <polygon fill="#000000" stroke="#000000" points="215.62,-1446.37 208.55,-1454.26 219,-1452.5 215.62,-1446.37"/>
 </g>
-<!-- module~s_rmvs_step -->
+<!-- module~s_io -->
 <g id="module~~swiftest_operators~~UsedByGraph_node61" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node61"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="378,-486 305,-486 305,-462 378,-462 378,-486"/>
-<text text-anchor="middle" x="341.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<title>module~s_io</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node61"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-486 314.5,-486 314.5,-462 368.5,-462 368.5,-486"/>
+<text text-anchor="middle" x="341.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge61" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.95,-474.68C289.63,-476.94 272.98,-482.46 263,-495 197.57,-577.22 284.93,-1352.34 227,-1440 224.56,-1443.69 221.29,-1446.74 217.63,-1449.27"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge62" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.29,-473.65C296.88,-474.95 275.06,-479.84 263,-495 197.57,-577.22 284.93,-1352.34 227,-1440 224.56,-1443.69 221.29,-1446.74 217.63,-1449.27"/>
 <polygon fill="#000000" stroke="#000000" points="215.63,-1446.37 208.55,-1454.26 219,-1452.51 215.63,-1446.37"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_helio_setup -->
 <g id="module~~swiftest_operators~~UsedByGraph_node62" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node62"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="372,-444 311,-444 311,-420 372,-420 372,-444"/>
-<text text-anchor="middle" x="341.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node62"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-444 302,-444 302,-420 381,-420 381,-444"/>
+<text text-anchor="middle" x="341.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge62" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.85,-431.94C294.08,-433.62 274.27,-438.81 263,-453 194.74,-538.93 287.43,-1348.4 227,-1440 224.57,-1443.69 221.3,-1446.75 217.63,-1449.27"/>
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge63" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.73,-433.19C287.34,-435.74 272.28,-441.32 263,-453 194.74,-538.93 287.43,-1348.4 227,-1440 224.57,-1443.69 221.3,-1446.75 217.63,-1449.27"/>
 <polygon fill="#000000" stroke="#000000" points="215.64,-1446.38 208.56,-1454.26 219.01,-1452.51 215.64,-1446.38"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_symba_kick -->
 <g id="module~~swiftest_operators~~UsedByGraph_node63" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node63"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-402 306.5,-402 306.5,-378 376.5,-378 376.5,-402"/>
-<text text-anchor="middle" x="341.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node63"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="381,-402 302,-402 302,-378 381,-378 381,-402"/>
+<text text-anchor="middle" x="341.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge63" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.13,-390.49C290.49,-392.64 273.22,-398.11 263,-411 191.91,-500.63 289.93,-1344.46 227,-1440 224.57,-1443.69 221.3,-1446.75 217.64,-1449.28"/>
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge64" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.72,-391.18C287.33,-393.73 272.27,-399.31 263,-411 191.91,-500.63 289.93,-1344.46 227,-1440 224.57,-1443.69 221.3,-1446.75 217.64,-1449.28"/>
 <polygon fill="#000000" stroke="#000000" points="215.64,-1446.38 208.57,-1454.27 219.02,-1452.51 215.64,-1446.38"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_fraggle_util -->
 <g id="module~~swiftest_operators~~UsedByGraph_node64" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node64"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="374.5,-360 308.5,-360 308.5,-336 374.5,-336 374.5,-360"/>
-<text text-anchor="middle" x="341.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node64"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="379.5,-360 303.5,-360 303.5,-336 379.5,-336 379.5,-360"/>
+<text text-anchor="middle" x="341.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge64" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M308.49,-348.18C292.25,-350.1 273.73,-355.45 263,-369 189.07,-462.34 292.42,-1340.52 227,-1440 224.57,-1443.69 221.31,-1446.75 217.64,-1449.28"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge65" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.32,-348.91C288.45,-351.31 272.61,-356.87 263,-369 189.07,-462.34 292.42,-1340.52 227,-1440 224.57,-1443.69 221.31,-1446.75 217.64,-1449.28"/>
 <polygon fill="#000000" stroke="#000000" points="215.65,-1446.38 208.57,-1454.27 219.02,-1452.52 215.65,-1446.38"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_util_solve -->
 <g id="module~~swiftest_operators~~UsedByGraph_node65" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node65"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-318 314.5,-318 314.5,-294 368.5,-294 368.5,-318"/>
-<text text-anchor="middle" x="341.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node65"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="375.5,-318 307.5,-318 307.5,-294 375.5,-294 375.5,-318"/>
+<text text-anchor="middle" x="341.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge65" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.27,-305.63C296.84,-306.92 275.02,-311.8 263,-327 186.24,-424.04 294.92,-1336.58 227,-1440 224.57,-1443.7 221.31,-1446.75 217.65,-1449.28"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge66" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.3,-306.32C291.35,-308.36 273.46,-313.77 263,-327 186.24,-424.04 294.92,-1336.58 227,-1440 224.57,-1443.7 221.31,-1446.75 217.65,-1449.28"/>
 <polygon fill="#000000" stroke="#000000" points="215.65,-1446.39 208.58,-1454.28 219.03,-1452.52 215.65,-1446.39"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_helio_step -->
 <g id="module~~swiftest_operators~~UsedByGraph_node66" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node66"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="398.5,-276 284.5,-276 284.5,-252 398.5,-252 398.5,-276"/>
-<text text-anchor="middle" x="341.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node66"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="378,-276 305,-276 305,-252 378,-252 378,-276"/>
+<text text-anchor="middle" x="341.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge66" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.44,-269.91C276.14,-273.19 268.53,-278 263,-285 183.4,-385.75 297.42,-1332.64 227,-1440 224.58,-1443.7 221.31,-1446.76 217.65,-1449.29"/>
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge67" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.91,-264.65C289.59,-266.91 272.94,-272.42 263,-285 183.4,-385.75 297.42,-1332.64 227,-1440 224.58,-1443.7 221.31,-1446.76 217.65,-1449.29"/>
 <polygon fill="#000000" stroke="#000000" points="215.65,-1446.39 208.58,-1454.28 219.03,-1452.52 215.65,-1446.39"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_whm_step -->
 <g id="module~~swiftest_operators~~UsedByGraph_node67" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-234 306.5,-234 306.5,-210 376.5,-210 376.5,-234"/>
-<text text-anchor="middle" x="341.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node67"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="378,-234 305,-234 305,-210 378,-210 378,-234"/>
+<text text-anchor="middle" x="341.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge67" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.5,-222.42C290.75,-224.52 273.28,-229.98 263,-243 180.57,-347.45 299.92,-1328.7 227,-1440 224.58,-1443.7 221.32,-1446.76 217.65,-1449.29"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge68" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.91,-222.64C289.58,-224.9 272.93,-230.42 263,-243 180.57,-347.45 299.92,-1328.7 227,-1440 224.58,-1443.7 221.32,-1446.76 217.65,-1449.29"/>
 <polygon fill="#000000" stroke="#000000" points="215.66,-1446.39 208.59,-1454.28 219.03,-1452.52 215.66,-1446.39"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_symba_setup -->
 <g id="module~~swiftest_operators~~UsedByGraph_node68" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node68"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="389.5,-192 293.5,-192 293.5,-168 389.5,-168 389.5,-192"/>
-<text text-anchor="middle" x="341.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node68"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="385.5,-192 297.5,-192 297.5,-168 385.5,-168 385.5,-192"/>
+<text text-anchor="middle" x="341.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge68" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.18,-183.03C281.6,-186.13 270.42,-191.59 263,-201 177.73,-309.16 302.41,-1324.76 227,-1440 224.58,-1443.7 221.32,-1446.76 217.66,-1449.29"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge39" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.23,-182.04C284.26,-184.91 271.29,-190.49 263,-201 177.73,-309.16 302.41,-1324.76 227,-1440 224.58,-1443.7 221.32,-1446.76 217.66,-1449.29"/>
 <polygon fill="#000000" stroke="#000000" points="215.66,-1446.39 208.59,-1454.28 219.04,-1452.53 215.66,-1446.39"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_fraggle_generate -->
 <g id="module~~swiftest_operators~~UsedByGraph_node69" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node69"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-150 314.5,-150 314.5,-126 368.5,-126 368.5,-150"/>
-<text text-anchor="middle" x="341.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node69"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="394.5,-150 288.5,-150 288.5,-126 394.5,-126 394.5,-150"/>
+<text text-anchor="middle" x="341.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge69" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.25,-137.61C296.81,-138.89 274.99,-143.78 263,-159 174.9,-270.86 304.91,-1320.82 227,-1440 224.58,-1443.7 221.32,-1446.76 217.66,-1449.29"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge70" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.36,-142.46C278.55,-145.72 269.38,-150.9 263,-159 174.9,-270.86 304.91,-1320.82 227,-1440 224.58,-1443.7 221.32,-1446.76 217.66,-1449.29"/>
 <polygon fill="#000000" stroke="#000000" points="215.67,-1446.4 208.59,-1454.29 219.04,-1452.53 215.67,-1446.4"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_symba_io -->
 <g id="module~~swiftest_operators~~UsedByGraph_node70" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node70"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="380,-108 303,-108 303,-84 380,-84 380,-108"/>
-<text text-anchor="middle" x="341.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node70"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="376.5,-108 306.5,-108 306.5,-84 376.5,-84 376.5,-108"/>
+<text text-anchor="middle" x="341.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge60" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.88,-96.94C288.12,-99.38 272.48,-104.95 263,-117 172.06,-232.57 307.41,-1316.88 227,-1440 224.58,-1443.7 221.32,-1446.76 217.66,-1449.3"/>
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge71" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.48,-96.4C290.73,-98.51 273.26,-103.96 263,-117 172.06,-232.57 307.41,-1316.88 227,-1440 224.58,-1443.7 221.32,-1446.76 217.66,-1449.3"/>
 <polygon fill="#000000" stroke="#000000" points="215.67,-1446.4 208.6,-1454.29 219.05,-1452.53 215.67,-1446.4"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~s_kick -->
 <g id="module~~swiftest_operators~~UsedByGraph_node71" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node71"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="380.5,-66 302.5,-66 302.5,-42 380.5,-42 380.5,-66"/>
-<text text-anchor="middle" x="341.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~s_kick</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node71"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368.5,-66 314.5,-66 314.5,-42 368.5,-42 368.5,-66"/>
+<text text-anchor="middle" x="341.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~swiftest_operators~~UsedByGraph_edge71" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.48,-55C287.84,-57.47 272.39,-63.06 263,-75 169.23,-194.27 309.91,-1312.94 227,-1440 224.58,-1443.7 221.33,-1446.77 217.67,-1449.3"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~swiftest_operators~~UsedByGraph_edge69" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.24,-53.6C296.79,-54.89 274.98,-59.77 263,-75 169.23,-194.27 309.91,-1312.94 227,-1440 224.58,-1443.7 221.33,-1446.77 217.67,-1449.3"/>
 <polygon fill="#000000" stroke="#000000" points="215.67,-1446.4 208.6,-1454.29 219.05,-1452.53 215.67,-1446.4"/>
 </g>
-<!-- module~s_fraggle_util -->
+<!-- module~drift_implementation -->
 <g id="module~~swiftest_operators~~UsedByGraph_node72" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~swiftest_operators~~UsedByGraph_node72"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="379.5,-24 303.5,-24 303.5,0 379.5,0 379.5,-24"/>
-<text text-anchor="middle" x="341.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~swiftest_operators~~UsedByGraph_node72"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="396,-24 287,-24 287,0 396,0 396,-24"/>
+<text text-anchor="middle" x="341.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
 <g id="module~~swiftest_operators~~UsedByGraph_edge72" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.28,-12.87C288.4,-15.27 272.56,-20.83 263,-33 166.39,-155.98 312.4,-1309 227,-1440 224.59,-1443.7 221.33,-1446.77 217.67,-1449.3"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.76,-17C277.55,-20.28 269.03,-25.33 263,-33 166.39,-155.98 312.4,-1309 227,-1440 224.59,-1443.7 221.33,-1446.77 217.67,-1449.3"/>
 <polygon fill="#000000" stroke="#000000" points="215.67,-1446.4 208.6,-1454.29 219.05,-1452.53 215.67,-1446.4"/>
 </g>
 </g>
diff --git a/docs/module/symba_classes.html b/docs/module/symba_classes.html
index 89063e73f..1d3c18df3 100644
--- a/docs/module/symba_classes.html
+++ b/docs/module/symba_classes.html
@@ -136,7 +136,7 @@ <h1>symba_classes
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 3.5% of total for modules and submodules.">566 statements</a>
+    title=" 3.5% of total for modules and submodules.">565 statements</a>
      </li> 
      
      
@@ -438,8 +438,6 @@ <h3 class="panel-title">Uses</h3>
     
     <li><a href='../module/helio_classes.html'>helio_classes</a></li>
     
-    <li><a href='../module/rmvs_classes.html'>rmvs_classes</a></li>
-    
     <li><a href='../module/fraggle_classes.html'>fraggle_classes</a></li>
     
   </ul>
@@ -454,175 +452,149 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~symba_classes~~UsesGraph Pages: 1 -->
-<svg id="modulesymba_classesUsesGraph" width="641pt" height="145pt"
- viewBox="0.00 0.00 641.00 145.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~symba_classes~~UsesGraph" class="graph" transform="scale(0.91 0.91) rotate(0) translate(4 155.06)">
+<svg id="modulesymba_classesUsesGraph" width="641pt" height="134pt"
+ viewBox="0.00 0.00 641.00 133.94" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~symba_classes~~UsesGraph" class="graph" transform="scale(0.92 0.92) rotate(0) translate(4 142.27)">
 <title>module~~symba_classes~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-155.06 697,-155.06 697,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-142.27 696,-142.27 696,4 -4,4"/>
 <!-- module~symba_classes -->
 <g id="module~~symba_classes~~UsesGraph_node1" class="node">
 <title>module~symba_classes</title>
-<polygon fill="none" stroke="black" points="693,-97.33 608,-97.33 608,-73.33 693,-73.33 693,-97.33"/>
-<text text-anchor="middle" x="650.5" y="-82.93" font-family="Helvetica,sans-Serif" font-size="10.50">symba_classes</text>
+<polygon fill="none" stroke="black" points="692,-104 607,-104 607,-80 692,-80 692,-104"/>
+<text text-anchor="middle" x="649.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_classes</text>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~symba_classes~~UsesGraph_node2" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~symba_classes~~UsesGraph_node2"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="572,-118.33 495,-118.33 495,-94.33 572,-94.33 572,-118.33"/>
-<text text-anchor="middle" x="533.5" y="-103.93" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~symba_classes~~UsesGraph_node2"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-64 123,-64 123,-40 211,-40 211,-64"/>
+<text text-anchor="middle" x="167" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~symba_classes~~UsesGraph_edge1" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.98,-92.92C599.57,-94.45 590.65,-96.08 582.05,-97.65"/>
-<polygon fill="#000000" stroke="#000000" points="581.34,-94.22 572.14,-99.46 582.6,-101.11 581.34,-94.22"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M608.13,-104.1C596.25,-107.35 583.18,-110.61 571,-113 503.11,-126.3 485.44,-126.17 416.5,-132"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~symba_classes~~UsesGraph_node3" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~symba_classes~~UsesGraph_node3"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="459,-118.33 372,-118.33 372,-94.33 459,-94.33 459,-118.33"/>
-<text text-anchor="middle" x="415.5" y="-103.93" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~symba_classes~~UsesGraph_node3"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="336,-64 247,-64 247,-40 336,-40 336,-64"/>
+<text text-anchor="middle" x="291.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~symba_classes~~UsesGraph_edge2" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M634.69,-97.4C613.86,-113.33 574.01,-140.11 534.5,-146.33"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532.5,-146.33C500.87,-151.32 466.4,-136.66 443.32,-123.71"/>
-<polygon fill="#000000" stroke="#000000" points="444.87,-120.56 434.47,-118.51 441.32,-126.59 444.87,-120.56"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532,-52C482.26,-39.32 467.65,-56.32 416.5,-52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.5,-52C392.19,-50.11 367.51,-49.79 346.21,-50.05"/>
+<polygon fill="#000000" stroke="#000000" points="345.99,-46.55 336.05,-50.22 346.11,-53.55 345.99,-46.55"/>
 </g>
 <!-- module~helio_classes -->
 <g id="module~~symba_classes~~UsesGraph_node4" class="node">
 <title>module~helio_classes</title>
 <g id="a_module~~symba_classes~~UsesGraph_node4"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="571.5,-76.33 495.5,-76.33 495.5,-52.33 571.5,-52.33 571.5,-76.33"/>
-<text text-anchor="middle" x="533.5" y="-61.93" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="571,-104 495,-104 495,-80 571,-80 571,-104"/>
+<text text-anchor="middle" x="533" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~symba_classes~~UsesGraph_edge3" class="edge">
 <title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.98,-77.75C599.47,-76.2 590.46,-74.55 581.76,-72.97"/>
-<polygon fill="#000000" stroke="#000000" points="582.22,-69.49 571.76,-71.14 580.97,-76.38 582.22,-69.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M606.84,-92C598.57,-92 589.82,-92 581.37,-92"/>
+<polygon fill="#000000" stroke="#000000" points="581.27,-88.5 571.27,-92 581.27,-95.5 581.27,-88.5"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~fraggle_classes -->
 <g id="module~~symba_classes~~UsesGraph_node5" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~symba_classes~~UsesGraph_node5"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-76.33 123,-76.33 123,-52.33 211,-52.33 211,-76.33"/>
-<text text-anchor="middle" x="167" y="-61.93" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~symba_classes~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="459,-24 372,-24 372,0 459,0 459,-24"/>
+<text text-anchor="middle" x="415.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~symba_classes~~UsesGraph_edge4" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532.5,-146.33C481.57,-154.36 467.87,-142.01 416.5,-146.33"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532,-52C506.39,-45.47 478.35,-35.82 456.32,-27.64"/>
+<polygon fill="#000000" stroke="#000000" points="457.55,-24.36 446.96,-24.12 455.08,-30.92 457.55,-24.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M618.32,-79.85C595.49,-71.05 563.18,-59.44 534,-52"/>
 </g>
-<!-- module~swiftest_classes -->
-<g id="module~~symba_classes~~UsesGraph_node6" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~symba_classes~~UsesGraph_node6"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="336,-76.33 247,-76.33 247,-52.33 336,-52.33 336,-76.33"/>
-<text text-anchor="middle" x="291.5" y="-61.93" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<!-- iso_fortran_env -->
+<g id="module~~symba_classes~~UsesGraph_node7" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~symba_classes~~UsesGraph_node7"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-64 0,-64 0,-40 87,-40 87,-64"/>
+<text text-anchor="middle" x="43.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
 <g id="module~~symba_classes~~UsesGraph_edge5" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.89,-73.29C616.72,-63.54 593.87,-50.32 572,-43.33 505.67,-22.15 485.94,-19.32 416.5,-24.33"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.5,-24.33C383.4,-26.01 349.9,-37.77 325.88,-48.11"/>
-<polygon fill="#000000" stroke="#000000" points="324.24,-45.01 316.53,-52.28 327.09,-51.41 324.24,-45.01"/>
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-52C114.58,-52 105.86,-52 97.36,-52"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-48.5 87.13,-52 97.13,-55.5 97.13,-48.5"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~symba_classes~~UsesGraph_edge6" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M508.83,-118.4C485.91,-129.12 449.83,-143.53 416.5,-146.33"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.5,-146.33C360.47,-150.88 346.25,-153.51 292.5,-146.33"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.97,-52C238.75,-52 230.07,-52 221.59,-52"/>
+<polygon fill="#000000" stroke="#000000" points="221.39,-48.5 211.39,-52 221.39,-55.5 221.39,-48.5"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~symba_classes~~UsesGraph_edge7" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.5,-132C360.47,-136.57 345.58,-143.07 292.5,-132"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M508.43,-104.06C485.62,-114.79 449.7,-129.19 416.5,-132"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~symba_classes~~UsesGraph_edge9" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M508.43,-79.94C485.62,-69.21 449.7,-54.81 416.5,-52"/>
 </g>
 <!-- module~whm_classes -->
-<g id="module~~symba_classes~~UsesGraph_node7" class="node">
+<g id="module~~symba_classes~~UsesGraph_node6" class="node">
 <title>module~whm_classes</title>
-<g id="a_module~~symba_classes~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="453.5,-76.33 377.5,-76.33 377.5,-52.33 453.5,-52.33 453.5,-76.33"/>
-<text text-anchor="middle" x="415.5" y="-61.93" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<g id="a_module~~symba_classes~~UsesGraph_node6"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="453.5,-104 377.5,-104 377.5,-80 453.5,-80 453.5,-104"/>
+<text text-anchor="middle" x="415.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~symba_classes~~UsesGraph_edge7" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M499.26,-94.3C486.88,-89.82 472.65,-84.67 459.52,-79.91"/>
-<polygon fill="#000000" stroke="#000000" points="460.34,-76.49 449.75,-76.37 457.96,-83.07 460.34,-76.49"/>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~symba_classes~~UsesGraph_edge8" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M494.82,-92C484.93,-92 474.11,-92 463.76,-92"/>
+<polygon fill="#000000" stroke="#000000" points="463.61,-88.5 453.61,-92 463.61,-95.5 463.61,-88.5"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~symba_classes~~UsesGraph_edge8" class="edge">
+<g id="module~~symba_classes~~UsesGraph_edge10" class="edge">
 <title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M395.16,-118.54C371.53,-132.07 330.06,-151.35 292.5,-146.33"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.91,-15.09C337.9,-17.98 289.13,-23.06 247,-31 237.78,-32.74 228.06,-34.98 218.7,-37.35"/>
+<polygon fill="#000000" stroke="#000000" points="217.53,-34.03 208.74,-39.95 219.3,-40.81 217.53,-34.03"/>
 </g>
 <!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~symba_classes~~UsesGraph_edge9" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M379.54,-94.3C366.27,-89.73 350.97,-84.46 336.94,-79.63"/>
-<polygon fill="#000000" stroke="#000000" points="338.06,-76.32 327.47,-76.37 335.78,-82.94 338.06,-76.32"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~symba_classes~~UsesGraph_edge10" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M520.9,-52.04C507.47,-38.8 483.98,-18.52 459,-10.33 368.03,19.49 255.34,-22.7 200.73,-47.88"/>
-<polygon fill="#000000" stroke="#000000" points="199.09,-44.78 191.54,-52.21 202.07,-51.11 199.09,-44.78"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~symba_classes~~UsesGraph_edge11" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M513.05,-52.26C490.54,-39.58 451.98,-21.77 416.5,-24.33"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~symba_classes~~UsesGraph_edge12" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M495.48,-64.33C485.43,-64.33 474.42,-64.33 463.89,-64.33"/>
-<polygon fill="#000000" stroke="#000000" points="463.57,-60.83 453.57,-64.33 463.57,-67.83 463.57,-60.83"/>
-</g>
-<!-- iso_fortran_env -->
-<g id="module~~symba_classes~~UsesGraph_node8" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~symba_classes~~UsesGraph_node8"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-76.33 0,-76.33 0,-52.33 87,-52.33 87,-76.33"/>
-<text text-anchor="middle" x="43.5" y="-61.93" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="module~~symba_classes~~UsesGraph_edge13" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-64.33C114.58,-64.33 105.86,-64.33 97.36,-64.33"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-60.83 87.13,-64.33 97.13,-67.83 97.13,-60.83"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~symba_classes~~UsesGraph_edge14" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.97,-64.33C238.75,-64.33 230.07,-64.33 221.59,-64.33"/>
-<polygon fill="#000000" stroke="#000000" points="221.39,-60.83 211.39,-64.33 221.39,-67.83 221.39,-60.83"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.9,-24C365.7,-28 351.95,-32.51 339.11,-36.72"/>
+<polygon fill="#000000" stroke="#000000" points="337.91,-33.43 329.5,-39.87 340.09,-40.08 337.91,-33.43"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~symba_classes~~UsesGraph_edge15" class="edge">
+<g id="module~~symba_classes~~UsesGraph_edge12" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.99,-76.43C382.59,-79.17 377.03,-82.2 372,-85.33 334.19,-108.87 336.64,-152.23 292.5,-146.33"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.5,-146.33C247.39,-140.58 207.52,-106.32 185.6,-83.94"/>
-<polygon fill="#000000" stroke="#000000" points="188.04,-81.43 178.62,-76.59 182.97,-86.25 188.04,-81.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.5,-132C249.09,-123.36 209.71,-92.1 187.25,-71.31"/>
+<polygon fill="#000000" stroke="#000000" points="189.42,-68.55 179.77,-64.19 184.6,-73.62 189.42,-68.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.65,-104.12C373.18,-118.59 330.47,-139.92 292.5,-132"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~symba_classes~~UsesGraph_edge16" class="edge">
+<g id="module~~symba_classes~~UsesGraph_edge13" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.23,-64.33C367.56,-64.33 356.95,-64.33 346.6,-64.33"/>
-<polygon fill="#000000" stroke="#000000" points="346.39,-60.83 336.39,-64.33 346.39,-67.83 346.39,-60.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.9,-80C365.7,-76 351.95,-71.49 339.11,-67.28"/>
+<polygon fill="#000000" stroke="#000000" points="340.09,-63.92 329.5,-64.13 337.91,-70.57 340.09,-63.92"/>
 </g>
 </g>
 </svg>
@@ -742,33 +714,33 @@ <h3 class="panel-title">Used by</h3>
 <polygon fill="none" stroke="black" points="85,-2082 0,-2082 0,-2058 85,-2058 85,-2082"/>
 <text text-anchor="middle" x="42.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_classes</text>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_symba_discard -->
 <g id="module~~symba_classes~~UsedByGraph_node2" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-2880 250,-2880 250,-2856 329,-2856 329,-2880"/>
-<text text-anchor="middle" x="289.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-2880 241.5,-2880 241.5,-2856 337.5,-2856 337.5,-2880"/>
+<text text-anchor="middle" x="289.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
 <g id="module~~symba_classes~~UsedByGraph_edge2" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M249.73,-2864.5C236.19,-2861.59 221.71,-2856.36 211,-2847 157.61,-2800.34 203.12,-2745.81 149,-2700"/>
+<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M241.29,-2862.39C230.38,-2859.26 219.5,-2854.43 211,-2847 157.61,-2800.34 203.12,-2745.81 149,-2700"/>
 </g>
 <!-- module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_node11" class="node">
+<g id="module~~symba_classes~~UsedByGraph_node9" class="node">
 <title>module~swiftest</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node11"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<g id="a_module~~symba_classes~~UsedByGraph_node9"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
 <polygon fill="#337ab7" stroke="#337ab7" points="175,-1473 121,-1473 121,-1449 175,-1449 175,-1473"/>
 <text text-anchor="middle" x="148" y="-1458.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge11" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.78,-2866.77C235.4,-2864.22 220.33,-2858.64 211,-2847 166.51,-2791.47 151.33,-1657.45 149.25,-1483.35"/>
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge64" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.28,-2864.9C229.7,-2861.8 218.5,-2856.36 211,-2847 166.51,-2791.47 151.33,-1657.45 149.25,-1483.35"/>
 <polygon fill="#000000" stroke="#000000" points="152.75,-1483.25 149.14,-1473.29 145.75,-1483.33 152.75,-1483.25"/>
 </g>
 <!-- module~s_symba_drift -->
@@ -786,69 +758,69 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#000000" d="M249.99,-2821.61C236.63,-2818.6 222.2,-2813.53 211,-2805 167.89,-2772.16 190.37,-2735.01 149,-2700"/>
 </g>
 <!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge14" class="edge">
+<g id="module~~symba_classes~~UsedByGraph_edge65" class="edge">
 <title>module~s_symba_drift&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.79,-2824.76C235.4,-2822.21 220.33,-2816.63 211,-2805 167.89,-2751.26 151.58,-1654.87 149.29,-1483.45"/>
 <polygon fill="#000000" stroke="#000000" points="152.79,-1483.28 149.15,-1473.32 145.79,-1483.37 152.79,-1483.28"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_symba_collision -->
 <g id="module~~symba_classes~~UsedByGraph_node4" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-2796 254.5,-2796 254.5,-2772 324.5,-2772 324.5,-2796"/>
-<text text-anchor="middle" x="289.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="339,-2796 240,-2796 240,-2772 339,-2772 339,-2796"/>
+<text text-anchor="middle" x="289.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
 <g id="module~~symba_classes~~UsedByGraph_edge4" class="edge">
-<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M254.16,-2778.76C240.11,-2775.61 224.12,-2770.67 211,-2763 177.08,-2743.17 178.99,-2725.38 149,-2700"/>
+<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M239.78,-2775.02C229.86,-2772.05 219.79,-2768.14 211,-2763 177.08,-2743.17 178.99,-2725.38 149,-2700"/>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge74" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.2,-2783.45C238.57,-2781.29 221.3,-2775.82 211,-2763 169.26,-2711.05 151.84,-1652.08 149.32,-1483.52"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge14" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.68,-2780.43C228.68,-2777.27 218.16,-2771.91 211,-2763 169.26,-2711.05 151.84,-1652.08 149.32,-1483.52"/>
 <polygon fill="#000000" stroke="#000000" points="152.82,-1483.29 149.17,-1473.34 145.82,-1483.39 152.82,-1483.29"/>
 </g>
-<!-- module~s_symba_encounter_check -->
+<!-- module~s_symba_kick -->
 <g id="module~~symba_classes~~UsedByGraph_node5" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="361,-2754 218,-2754 218,-2730 361,-2730 361,-2754"/>
-<text text-anchor="middle" x="289.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-2754 250,-2754 250,-2730 329,-2730 329,-2754"/>
+<text text-anchor="middle" x="289.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
 <g id="module~~symba_classes~~UsedByGraph_edge5" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M217.73,-2732.42C193.81,-2726.32 168.31,-2716.34 149,-2700"/>
+<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M249.91,-2738.75C219.45,-2734.37 177.47,-2724.1 149,-2700"/>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge25" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M220.75,-2729.88C217.11,-2727.41 213.8,-2724.48 211,-2721 170.64,-2670.86 152.12,-1650.08 149.37,-1483.8"/>
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge71" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.8,-2740.75C235.43,-2738.2 220.35,-2732.62 211,-2721 170.64,-2670.86 152.12,-1650.08 149.37,-1483.8"/>
 <polygon fill="#000000" stroke="#000000" points="152.86,-1483.28 149.19,-1473.33 145.86,-1483.39 152.86,-1483.28"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- module~s_symba_step -->
 <g id="module~~symba_classes~~UsedByGraph_node6" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="339,-2712 240,-2712 240,-2688 339,-2688 339,-2712"/>
-<text text-anchor="middle" x="289.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-2712 248.5,-2712 248.5,-2688 330.5,-2688 330.5,-2712"/>
+<text text-anchor="middle" x="289.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
 <g id="module~~symba_classes~~UsedByGraph_edge6" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
+<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
 <path fill="none" stroke="#000000" d="M250.82,-2712.07C219.86,-2719.44 176.73,-2723.47 149,-2700"/>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge24" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.7,-2696.42C228.7,-2693.25 218.17,-2687.9 211,-2679 171.99,-2630.61 152.37,-1645.83 149.4,-1483.55"/>
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge49" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.2,-2698.44C234.32,-2695.76 220.01,-2690.18 211,-2679 171.99,-2630.61 152.37,-1645.83 149.4,-1483.55"/>
 <polygon fill="#000000" stroke="#000000" points="152.9,-1483.24 149.21,-1473.31 145.9,-1483.37 152.9,-1483.24"/>
 </g>
 <!-- module~s_symba_util -->
@@ -866,977 +838,977 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#000000" d="M251.7,-2667.47C238.78,-2670.93 224.2,-2674.98 211,-2679 183.17,-2687.48 171.21,-2718.8 149,-2700"/>
 </g>
 <!-- module~s_symba_util&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge23" class="edge">
+<g id="module~~symba_classes~~UsedByGraph_edge50" class="edge">
 <title>module~s_symba_util&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.83,-2657.07C236.87,-2654.68 220.81,-2649.15 211,-2637 173.32,-2590.36 152.63,-1641.44 149.44,-1483.26"/>
 <polygon fill="#000000" stroke="#000000" points="152.94,-1483.19 149.24,-1473.26 145.94,-1483.33 152.94,-1483.19"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~symba_classes~~UsedByGraph_node8" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="333.5,-2628 245.5,-2628 245.5,-2604 333.5,-2604 333.5,-2628"/>
-<text text-anchor="middle" x="289.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="361,-2628 218,-2628 218,-2604 361,-2604 361,-2628"/>
+<text text-anchor="middle" x="289.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
 <g id="module~~symba_classes~~UsedByGraph_edge8" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M245.46,-2623.37C233.77,-2626.49 221.47,-2630.88 211,-2637 177.08,-2656.83 178.99,-2725.38 149,-2700"/>
+<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M230.4,-2628.08C223.64,-2630.54 217.02,-2633.48 211,-2637 177.08,-2656.83 178.99,-2725.38 149,-2700"/>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge49" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.39,-2613.83C232.42,-2610.96 219.42,-2605.4 211,-2595 174.7,-2550.14 152.94,-1638.73 149.48,-1483.41"/>
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge18" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M220.78,-2603.87C217.12,-2601.4 213.81,-2598.47 211,-2595 174.7,-2550.14 152.94,-1638.73 149.48,-1483.41"/>
 <polygon fill="#000000" stroke="#000000" points="152.98,-1483.12 149.26,-1473.2 145.98,-1483.27 152.98,-1483.12"/>
 </g>
-<!-- module~s_symba_step -->
-<g id="module~~symba_classes~~UsedByGraph_node9" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-2586 248.5,-2586 248.5,-2562 330.5,-2562 330.5,-2586"/>
-<text text-anchor="middle" x="289.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~symba_classes~~UsedByGraph_edge1" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.93,-1473.17C132.18,-1548.23 64.16,-1948.44 47.29,-2047.71"/>
+<polygon fill="#000000" stroke="#000000" points="43.8,-2047.36 45.57,-2057.81 50.7,-2048.53 43.8,-2047.36"/>
+</g>
+<!-- module~s_symba_setup -->
+<g id="module~~symba_classes~~UsedByGraph_node10" class="node">
+<title>module~s_symba_setup</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="333.5,-2586 245.5,-2586 245.5,-2562 333.5,-2562 333.5,-2586"/>
+<text text-anchor="middle" x="289.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
 <g id="module~~symba_classes~~UsedByGraph_edge9" class="edge">
-<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M248.4,-2578.76C235.49,-2581.81 221.76,-2586.81 211,-2595 167.89,-2627.84 190.37,-2735.01 149,-2700"/>
+<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M245.19,-2579.55C233.24,-2582.65 220.87,-2587.48 211,-2595 167.89,-2627.84 190.37,-2735.01 149,-2700"/>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge27" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.23,-2572.41C234.36,-2569.73 220.04,-2564.15 211,-2553 176.06,-2509.92 153.25,-1635.73 149.54,-1483.51"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge46" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.4,-2571.82C232.44,-2568.95 219.43,-2563.39 211,-2553 176.06,-2509.92 153.25,-1635.73 149.54,-1483.51"/>
 <polygon fill="#000000" stroke="#000000" points="153.03,-1483.02 149.28,-1473.11 146.03,-1483.19 153.03,-1483.02"/>
 </g>
-<!-- module~s_symba_discard -->
-<g id="module~~symba_classes~~UsedByGraph_node10" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-2544 241.5,-2544 241.5,-2520 337.5,-2520 337.5,-2544"/>
-<text text-anchor="middle" x="289.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<!-- module~s_symba_io -->
+<g id="module~~symba_classes~~UsedByGraph_node11" class="node">
+<title>module~s_symba_io</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-2544 254.5,-2544 254.5,-2520 324.5,-2520 324.5,-2544"/>
+<text text-anchor="middle" x="289.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
 <g id="module~~symba_classes~~UsedByGraph_edge10" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
+<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
 <path fill="none" stroke="#000000" d="M147,-2700C51.9,-2619.5 44.01,-2194.5 43.5,-2092.18"/>
 <polygon fill="#000000" stroke="#000000" points="47,-2092.05 43.47,-2082.06 40,-2092.07 47,-2092.05"/>
-<path fill="none" stroke="#000000" d="M241.29,-2537.61C230.38,-2540.74 219.5,-2545.57 211,-2553 157.61,-2599.66 203.12,-2745.81 149,-2700"/>
+<path fill="none" stroke="#000000" d="M254.46,-2534.56C239.64,-2537.24 222.97,-2542.54 211,-2553 157.61,-2599.66 203.12,-2745.81 149,-2700"/>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge30" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.37,-2528.82C229.79,-2525.72 218.56,-2520.3 211,-2511 143.99,-2428.57 147.57,-1628.44 148.78,-1483.47"/>
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge78" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.26,-2531.4C238.65,-2529.22 221.38,-2523.76 211,-2511 143.99,-2428.57 147.57,-1628.44 148.78,-1483.47"/>
 <polygon fill="#000000" stroke="#000000" points="152.28,-1483.19 148.87,-1473.16 145.28,-1483.12 152.28,-1483.19"/>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~symba_classes~~UsedByGraph_edge1" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.93,-1473.17C132.18,-1548.23 64.16,-1948.44 47.29,-2047.71"/>
-<polygon fill="#000000" stroke="#000000" points="43.8,-2047.36 45.57,-2057.81 50.7,-2048.53 43.8,-2047.36"/>
-</g>
-<!-- module~s_util_exit -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~symba_classes~~UsedByGraph_node12" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="319.5,-1368 259.5,-1368 259.5,-1344 319.5,-1344 319.5,-1368"/>
-<text text-anchor="middle" x="289.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="348.5,-1368 230.5,-1368 230.5,-1344 348.5,-1344 348.5,-1368"/>
+<text text-anchor="middle" x="289.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge12" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.31,-1359.21C243.9,-1362.01 225.27,-1367.24 211,-1377 187.58,-1393.02 169.62,-1420.86 159.2,-1440.07"/>
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge11" class="edge">
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M230.29,-1367.11C223.47,-1369.74 216.87,-1372.99 211,-1377 187.58,-1393.02 169.62,-1420.86 159.2,-1440.07"/>
 <polygon fill="#000000" stroke="#000000" points="156.08,-1438.48 154.57,-1448.97 162.29,-1441.71 156.08,-1438.48"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_gr -->
 <g id="module~~symba_classes~~UsedByGraph_node13" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node13"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="316.5,-1326 262.5,-1326 262.5,-1302 316.5,-1302 316.5,-1326"/>
-<text text-anchor="middle" x="289.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_gr</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1326 262.5,-1326 262.5,-1302 316.5,-1302 316.5,-1326"/>
+<text text-anchor="middle" x="289.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge13" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge12" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.3,-1315.67C245.98,-1317.93 225.42,-1323.12 211,-1335 178.13,-1362.08 161.25,-1410.87 153.84,-1439.13"/>
 <polygon fill="#000000" stroke="#000000" points="150.44,-1438.33 151.45,-1448.87 157.24,-1439.99 150.44,-1438.33"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_util_valid -->
 <g id="module~~symba_classes~~UsedByGraph_node14" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1284 262.5,-1284 262.5,-1260 316.5,-1260 316.5,-1284"/>
-<text text-anchor="middle" x="289.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322,-1284 257,-1284 257,-1260 322,-1260 322,-1284"/>
+<text text-anchor="middle" x="289.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge19" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.23,-1273.13C245.68,-1275.15 224.89,-1280.3 211,-1293 168.38,-1331.99 154.97,-1402.86 150.82,-1438.81"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge13" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.96,-1273.86C241.44,-1276.3 223.45,-1281.61 211,-1293 168.38,-1331.99 154.97,-1402.86 150.82,-1438.81"/>
 <polygon fill="#000000" stroke="#000000" points="147.33,-1438.47 149.8,-1448.78 154.3,-1439.18 147.33,-1438.47"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_obl -->
 <g id="module~~symba_classes~~UsedByGraph_node15" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-1242 256.5,-1242 256.5,-1218 322.5,-1218 322.5,-1242"/>
-<text text-anchor="middle" x="289.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_obl</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1242 262.5,-1242 262.5,-1218 316.5,-1218 316.5,-1242"/>
+<text text-anchor="middle" x="289.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<!-- module~s_obl&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge15" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.25,-1231.58C240.74,-1233.96 222.96,-1239.31 211,-1251 158.48,-1302.35 149.92,-1395.83 148.88,-1438.58"/>
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.31,-1230.78C245.58,-1232.65 224.56,-1237.75 211,-1251 158.48,-1302.35 149.92,-1395.83 148.88,-1438.58"/>
 <polygon fill="#000000" stroke="#000000" points="145.38,-1438.72 148.76,-1448.76 152.38,-1438.8 145.38,-1438.72"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~symba_classes~~UsedByGraph_node16" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-1200 250,-1200 250,-1176 329,-1176 329,-1200"/>
-<text text-anchor="middle" x="289.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="334,-1200 245,-1200 245,-1176 334,-1176 334,-1200"/>
+<text text-anchor="middle" x="289.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge16" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.69,-1190.45C235.82,-1193.22 221.13,-1198.63 211,-1209 178.75,-1242.02 158.41,-1383.6 151.57,-1438.82"/>
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M244.87,-1191.52C232.49,-1194.53 219.96,-1199.83 211,-1209 178.75,-1242.02 158.41,-1383.6 151.57,-1438.82"/>
 <polygon fill="#000000" stroke="#000000" points="148.07,-1438.59 150.35,-1448.94 155.02,-1439.43 148.07,-1438.59"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_util_coord -->
 <g id="module~~symba_classes~~UsedByGraph_node17" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-1158 255.5,-1158 255.5,-1134 323.5,-1134 323.5,-1158"/>
-<text text-anchor="middle" x="289.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-1158 254.5,-1158 254.5,-1134 324.5,-1134 324.5,-1158"/>
+<text text-anchor="middle" x="289.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge17" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.46,-1147.25C239.94,-1149.56 222.39,-1154.94 211,-1167 173.65,-1206.53 156.01,-1376.72 150.75,-1438.49"/>
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.28,-1147.43C239.06,-1149.83 222.11,-1155.25 211,-1167 173.65,-1206.53 156.01,-1376.72 150.75,-1438.49"/>
 <polygon fill="#000000" stroke="#000000" points="147.24,-1438.46 149.91,-1448.71 154.22,-1439.03 147.24,-1438.46"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~s_whm_coord -->
 <g id="module~~symba_classes~~UsedByGraph_node18" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<title>module~s_whm_coord</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="329,-1116 250,-1116 250,-1092 329,-1092 329,-1116"/>
-<text text-anchor="middle" x="289.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<text text-anchor="middle" x="289.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge18" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge19" class="edge">
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.77,-1106.06C235.74,-1108.77 220.92,-1114.23 211,-1125 168.45,-1171.19 153.87,-1370.85 150.1,-1438.49"/>
 <polygon fill="#000000" stroke="#000000" points="146.59,-1438.68 149.55,-1448.85 153.58,-1439.05 146.59,-1438.68"/>
 </g>
-<!-- module~s_rmvs_step -->
+<!-- module~s_util_rescale -->
 <g id="module~~symba_classes~~UsedByGraph_node19" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-1074 253,-1074 253,-1050 326,-1050 326,-1074"/>
-<text text-anchor="middle" x="289.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-1074 250.5,-1074 250.5,-1050 328.5,-1050 328.5,-1074"/>
+<text text-anchor="middle" x="289.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge68" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.85,-1063.39C237.89,-1065.85 221.56,-1071.31 211,-1083 163.2,-1135.95 151.97,-1365.59 149.59,-1438.62"/>
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge20" class="edge">
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.46,-1063.81C236.17,-1066.44 221,-1071.93 211,-1083 163.2,-1135.95 151.97,-1365.59 149.59,-1438.62"/>
 <polygon fill="#000000" stroke="#000000" points="146.08,-1438.84 149.28,-1448.94 153.08,-1439.05 146.08,-1438.84"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~symba_classes~~UsedByGraph_node20" class="node">
-<title>module~s_io</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1032 262.5,-1032 262.5,-1008 316.5,-1008 316.5,-1032"/>
-<text text-anchor="middle" x="289.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368,-1032 211,-1032 211,-1008 368,-1008 368,-1032"/>
+<text text-anchor="middle" x="289.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge20" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.43,-1020.11C245.3,-1021.64 223.78,-1026.62 211,-1041 157.93,-1100.74 150.28,-1360.6 149.18,-1438.71"/>
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge21" class="edge">
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M221.49,-1032.21C217.61,-1034.66 214.06,-1037.56 211,-1041 157.93,-1100.74 150.28,-1360.6 149.18,-1438.71"/>
 <polygon fill="#000000" stroke="#000000" points="145.68,-1438.83 149.06,-1448.87 152.68,-1438.91 145.68,-1438.83"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_rmvs_step -->
 <g id="module~~symba_classes~~UsedByGraph_node21" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<title>module~s_rmvs_step</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="326,-990 253,-990 253,-966 326,-966 326,-990"/>
-<text text-anchor="middle" x="289.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<text text-anchor="middle" x="289.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge21" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge22" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.69,-979.25C237.7,-981.68 221.38,-987.16 211,-999 152.6,-1065.61 148.74,-1356.2 148.85,-1438.94"/>
 <polygon fill="#000000" stroke="#000000" points="145.35,-1439 148.89,-1448.99 152.35,-1438.98 145.35,-1439"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_util_index -->
 <g id="module~~symba_classes~~UsedByGraph_node22" class="node">
-<title>module~orbel</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node22"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="316.5,-948 262.5,-948 262.5,-924 316.5,-924 316.5,-948"/>
-<text text-anchor="middle" x="289.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_util_index</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324,-948 255,-948 255,-924 324,-924 324,-948"/>
+<text text-anchor="middle" x="289.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge22" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.31,-936.01C245.14,-937.5 223.6,-942.47 211,-957 147.37,-1030.38 147.34,-1350.82 148.57,-1438.66"/>
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge23" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.61,-936.89C239.08,-939.14 221.78,-944.57 211,-957 147.37,-1030.38 147.34,-1350.82 148.57,-1438.66"/>
 <polygon fill="#000000" stroke="#000000" points="145.07,-1438.89 148.73,-1448.83 152.07,-1438.78 145.07,-1438.89"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- proc~ge_wpp -->
 <g id="module~~symba_classes~~UsedByGraph_node23" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-906 254.5,-906 254.5,-882 324.5,-882 324.5,-906"/>
-<text text-anchor="middle" x="289.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node23"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="316.5,-906 262.5,-906 262.5,-882 316.5,-882 316.5,-906"/>
+<text text-anchor="middle" x="289.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge61" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.17,-894.91C238.73,-897.18 221.63,-902.63 211,-915 176.32,-955.38 154.99,-1340.27 150.09,-1438.35"/>
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge24" class="edge">
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.27,-893.97C245.08,-895.44 223.53,-900.41 211,-915 176.32,-955.38 154.99,-1340.27 150.09,-1438.35"/>
 <polygon fill="#000000" stroke="#000000" points="146.58,-1438.45 149.58,-1448.61 153.57,-1438.79 146.58,-1438.45"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_operator_cross -->
 <g id="module~~symba_classes~~UsedByGraph_node24" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-864 254.5,-864 254.5,-840 324.5,-840 324.5,-864"/>
-<text text-anchor="middle" x="289.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_operator_cross</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-864 241.5,-864 241.5,-840 337.5,-840 337.5,-864"/>
+<text text-anchor="middle" x="289.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge26" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.12,-852.87C238.67,-855.13 221.58,-860.58 211,-873 173.58,-916.92 154.07,-1337.2 149.87,-1438.91"/>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge25" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.24,-855.52C229.81,-858.64 218.68,-863.98 211,-873 173.58,-916.92 154.07,-1337.2 149.87,-1438.91"/>
 <polygon fill="#000000" stroke="#000000" points="146.37,-1438.84 149.46,-1448.97 153.36,-1439.12 146.37,-1438.84"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_fraggle_set -->
 <g id="module~~symba_classes~~UsedByGraph_node25" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-822 253,-822 253,-798 326,-798 326,-822"/>
-<text text-anchor="middle" x="289.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="328,-822 251,-822 251,-798 328,-798 328,-822"/>
+<text text-anchor="middle" x="289.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge28" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.89,-811.02C237.75,-813.38 221.26,-818.87 211,-831 170.94,-878.36 153.32,-1332.2 149.71,-1438.71"/>
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge26" class="edge">
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.89,-811.35C236.32,-813.87 220.81,-819.4 211,-831 170.94,-878.36 153.32,-1332.2 149.71,-1438.71"/>
 <polygon fill="#000000" stroke="#000000" points="146.21,-1438.82 149.37,-1448.93 153.2,-1439.05 146.21,-1438.82"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- module~s_fraggle_io -->
 <g id="module~~symba_classes~~UsedByGraph_node26" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="320.5,-780 258.5,-780 258.5,-756 320.5,-756 320.5,-780"/>
-<text text-anchor="middle" x="289.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325,-780 254,-780 254,-756 325,-756 325,-780"/>
+<text text-anchor="middle" x="289.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge29" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.36,-768.26C241.86,-770.09 222.48,-775.34 211,-789 168.26,-839.83 152.59,-1327.73 149.57,-1438.64"/>
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge27" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M253.65,-768.87C238.29,-771.15 221.41,-776.62 211,-789 168.26,-839.83 152.59,-1327.73 149.57,-1438.64"/>
 <polygon fill="#000000" stroke="#000000" points="146.06,-1438.88 149.3,-1448.97 153.06,-1439.06 146.06,-1438.88"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~symba_classes~~UsedByGraph_node27" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="333.5,-738 245.5,-738 245.5,-714 333.5,-714 333.5,-738"/>
-<text text-anchor="middle" x="289.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325,-738 254,-738 254,-714 325,-714 325,-738"/>
+<text text-anchor="middle" x="289.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge31" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.18,-728.42C232.36,-731.33 219.49,-736.84 211,-747 165.57,-801.33 151.91,-1323.73 149.44,-1438.7"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge28" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M253.62,-726.84C238.26,-729.12 221.37,-734.59 211,-747 165.57,-801.33 151.91,-1323.73 149.44,-1438.7"/>
 <polygon fill="#000000" stroke="#000000" points="145.94,-1438.72 149.23,-1448.79 152.94,-1438.87 145.94,-1438.72"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_util_set -->
 <g id="module~~symba_classes~~UsedByGraph_node28" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node28"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="319,-696 260,-696 260,-672 319,-672 319,-696"/>
-<text text-anchor="middle" x="289.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_util_set</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="318.5,-696 260.5,-696 260.5,-672 318.5,-672 318.5,-696"/>
+<text text-anchor="middle" x="289.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge32" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.85,-684.05C243.01,-685.71 222.77,-690.86 211,-705 162.86,-762.86 151.25,-1320.34 149.32,-1438.9"/>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge29" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.23,-684.02C243.31,-685.64 222.86,-690.75 211,-705 162.86,-762.86 151.25,-1320.34 149.32,-1438.9"/>
 <polygon fill="#000000" stroke="#000000" points="145.82,-1438.92 149.17,-1448.97 152.82,-1439.03 145.82,-1438.92"/>
 </g>
-<!-- module~s_rmvs_util -->
+<!-- module~s_rmvs_io -->
 <g id="module~~symba_classes~~UsedByGraph_node29" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323,-654 256,-654 256,-630 323,-630 323,-654"/>
-<text text-anchor="middle" x="289.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-654 259,-654 259,-630 320,-630 320,-654"/>
+<text text-anchor="middle" x="289.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge33" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.95,-642.47C239.96,-644.52 221.85,-649.9 211,-663 160.17,-724.35 150.65,-1316.23 149.22,-1438.84"/>
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge30" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.67,-642.15C242.06,-643.93 222.47,-649.15 211,-663 160.17,-724.35 150.65,-1316.23 149.22,-1438.84"/>
 <polygon fill="#000000" stroke="#000000" points="145.72,-1438.88 149.11,-1448.92 152.72,-1438.96 145.72,-1438.88"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- module~s_util_version -->
 <g id="module~~symba_classes~~UsedByGraph_node30" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="325,-612 254,-612 254,-588 325,-588 325,-612"/>
-<text text-anchor="middle" x="289.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_util_version</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-612 250.5,-612 250.5,-588 328.5,-588 328.5,-612"/>
+<text text-anchor="middle" x="289.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge34" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M253.95,-600.72C238.46,-602.95 221.38,-608.42 211,-621 157.47,-685.87 150.08,-1312.52 149.13,-1438.87"/>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge31" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.35,-601.3C235.87,-603.84 220.58,-609.39 211,-621 157.47,-685.87 150.08,-1312.52 149.13,-1438.87"/>
 <polygon fill="#000000" stroke="#000000" points="145.63,-1438.89 149.06,-1448.91 152.63,-1438.93 145.63,-1438.89"/>
 </g>
-<!-- module~s_util_append -->
+<!-- module~s_tides_step_spin -->
 <g id="module~~symba_classes~~UsedByGraph_node31" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-570 250,-570 250,-546 329,-546 329,-570"/>
-<text text-anchor="middle" x="289.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="338.5,-570 240.5,-570 240.5,-546 338.5,-546 338.5,-570"/>
+<text text-anchor="middle" x="289.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge35" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.93,-559.35C235.57,-561.92 220.47,-567.48 211,-579 154.81,-647.34 149.54,-1307.89 149.05,-1438.59"/>
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge32" class="edge">
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.23,-561.57C229.08,-564.71 218.35,-570.06 211,-579 154.81,-647.34 149.54,-1307.89 149.05,-1438.59"/>
 <polygon fill="#000000" stroke="#000000" points="145.55,-1438.94 149.02,-1448.95 152.55,-1438.96 145.55,-1438.94"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- proc~solve_wbs -->
 <g id="module~~symba_classes~~UsedByGraph_node32" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="325,-528 254,-528 254,-504 325,-504 325,-528"/>
-<text text-anchor="middle" x="289.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node32"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="320.5,-528 258.5,-528 258.5,-504 320.5,-504 320.5,-528"/>
+<text text-anchor="middle" x="289.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge36" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M253.91,-516.69C238.42,-518.92 221.34,-524.39 211,-537 152.14,-608.82 149.02,-1303.47 148.97,-1438.37"/>
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge33" class="edge">
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.23,-516.15C241.69,-517.95 222.31,-523.2 211,-537 152.14,-608.82 149.02,-1303.47 148.97,-1438.37"/>
 <polygon fill="#000000" stroke="#000000" points="145.47,-1438.71 148.98,-1448.71 152.47,-1438.71 145.47,-1438.71"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_orbel -->
 <g id="module~~symba_classes~~UsedByGraph_node33" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<title>module~s_orbel</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-486 262.5,-486 262.5,-462 316.5,-462 316.5,-486"/>
-<text text-anchor="middle" x="289.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<text text-anchor="middle" x="289.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge37" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge34" class="edge">
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.42,-473.75C245.06,-475.09 223.26,-480 211,-495 149.39,-570.39 148.52,-1300.85 148.9,-1438.64"/>
 <polygon fill="#000000" stroke="#000000" points="145.41,-1438.84 148.94,-1448.83 152.41,-1438.82 145.41,-1438.84"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_whm_gr -->
 <g id="module~~symba_classes~~UsedByGraph_node34" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-444 259,-444 259,-420 320,-420 320,-444"/>
-<text text-anchor="middle" x="289.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320.5,-444 258.5,-444 258.5,-420 320.5,-420 320.5,-444"/>
+<text text-anchor="middle" x="289.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge38" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.98,-432.04C242.25,-433.76 222.45,-438.95 211,-453 146.69,-531.9 148.04,-1297.1 148.84,-1438.57"/>
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge35" class="edge">
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.2,-432.13C241.65,-433.92 222.27,-439.17 211,-453 146.69,-531.9 148.04,-1297.1 148.84,-1438.57"/>
 <polygon fill="#000000" stroke="#000000" points="145.34,-1439.01 148.91,-1448.99 152.34,-1438.97 145.34,-1439.01"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~symba_classes~~UsedByGraph_node35" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="348.5,-402 230.5,-402 230.5,-378 348.5,-378 348.5,-402"/>
-<text text-anchor="middle" x="289.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-402 254.5,-402 254.5,-378 324.5,-378 324.5,-402"/>
+<text text-anchor="middle" x="289.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge39" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M230.28,-397C222.87,-400.22 216.1,-404.73 211,-411 143.99,-493.43 147.57,-1293.56 148.78,-1438.53"/>
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge36" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.26,-390.6C238.65,-392.78 221.38,-398.24 211,-411 143.99,-493.43 147.57,-1293.56 148.78,-1438.53"/>
 <polygon fill="#000000" stroke="#000000" points="145.28,-1438.88 148.87,-1448.84 152.28,-1438.81 145.28,-1438.88"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~symba_classes~~UsedByGraph_node36" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-360 250,-360 250,-336 329,-336 329,-360"/>
-<text text-anchor="middle" x="289.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-360 241.5,-360 241.5,-336 337.5,-336 337.5,-360"/>
+<text text-anchor="middle" x="289.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge40" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.85,-349.29C235.48,-351.85 220.4,-357.42 211,-369 176.06,-412.08 153.25,-1286.27 149.54,-1438.49"/>
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge37" class="edge">
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.35,-351.16C229.78,-354.26 218.55,-359.69 211,-369 176.06,-412.08 153.25,-1286.27 149.54,-1438.49"/>
 <polygon fill="#000000" stroke="#000000" points="146.03,-1438.81 149.28,-1448.89 153.03,-1438.98 146.03,-1438.81"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_util_exit -->
 <g id="module~~symba_classes~~UsedByGraph_node37" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="320.5,-318 258.5,-318 258.5,-294 320.5,-294 320.5,-318"/>
-<text text-anchor="middle" x="289.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="319.5,-318 259.5,-318 259.5,-294 319.5,-294 319.5,-318"/>
+<text text-anchor="middle" x="289.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge41" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.17,-306.1C241.6,-307.88 222.23,-313.13 211,-327 174.7,-371.86 152.94,-1283.27 149.48,-1438.59"/>
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge38" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.33,-305.98C242.51,-307.64 222.49,-312.8 211,-327 174.7,-371.86 152.94,-1283.27 149.48,-1438.59"/>
 <polygon fill="#000000" stroke="#000000" points="145.98,-1438.73 149.26,-1448.8 152.98,-1438.88 145.98,-1438.73"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_netcdf -->
 <g id="module~~symba_classes~~UsedByGraph_node38" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="338.5,-276 240.5,-276 240.5,-252 338.5,-252 338.5,-276"/>
-<text text-anchor="middle" x="289.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-276 262.5,-276 262.5,-252 316.5,-252 316.5,-276"/>
+<text text-anchor="middle" x="289.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge42" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.12,-267.48C228.97,-270.63 218.27,-276 211,-285 173.32,-331.64 152.63,-1280.56 149.44,-1438.74"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge39" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.36,-263.7C244.98,-265.03 223.18,-269.93 211,-285 173.32,-331.64 152.63,-1280.56 149.44,-1438.74"/>
 <polygon fill="#000000" stroke="#000000" points="145.94,-1438.67 149.24,-1448.74 152.94,-1438.81 145.94,-1438.67"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~symba_classes~~UsedByGraph_node39" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-234 262.5,-234 262.5,-210 316.5,-210 316.5,-234"/>
-<text text-anchor="middle" x="289.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="333.5,-234 245.5,-234 245.5,-210 333.5,-210 333.5,-234"/>
+<text text-anchor="middle" x="289.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge43" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.35,-221.7C244.96,-223.02 223.16,-227.92 211,-243 171.99,-291.39 152.37,-1276.17 149.4,-1438.45"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge40" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M245.36,-224.15C232.4,-227.02 219.4,-232.58 211,-243 171.99,-291.39 152.37,-1276.17 149.4,-1438.45"/>
 <polygon fill="#000000" stroke="#000000" points="145.9,-1438.63 149.21,-1448.69 152.9,-1438.76 145.9,-1438.63"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_util_peri -->
 <g id="module~~symba_classes~~UsedByGraph_node40" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="318.5,-192 260.5,-192 260.5,-168 318.5,-168 318.5,-192"/>
-<text text-anchor="middle" x="289.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-192 259,-192 259,-168 320,-168 320,-192"/>
+<text text-anchor="middle" x="289.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge44" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.45,-179.85C243.4,-181.38 222.71,-186.45 211,-201 170.64,-251.14 152.12,-1271.92 149.37,-1438.2"/>
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge41" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.92,-179.99C242.17,-181.69 222.36,-186.88 211,-201 170.64,-251.14 152.12,-1271.92 149.37,-1438.2"/>
 <polygon fill="#000000" stroke="#000000" points="145.86,-1438.61 149.19,-1448.67 152.86,-1438.72 145.86,-1438.61"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- module~s_helio_drift -->
 <g id="module~~symba_classes~~UsedByGraph_node41" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-150 253.5,-150 253.5,-126 325.5,-126 325.5,-150"/>
-<text text-anchor="middle" x="289.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-150 254.5,-150 254.5,-126 324.5,-126 324.5,-150"/>
+<text text-anchor="middle" x="289.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge45" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M253.4,-138.66C237.99,-140.9 221.13,-146.39 211,-159 169.26,-210.95 151.84,-1269.92 149.32,-1438.48"/>
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge42" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.2,-138.55C238.57,-140.71 221.3,-146.18 211,-159 169.26,-210.95 151.84,-1269.92 149.32,-1438.48"/>
 <polygon fill="#000000" stroke="#000000" points="145.82,-1438.61 149.17,-1448.66 152.82,-1438.71 145.82,-1438.61"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- module~s_setup -->
 <g id="module~~symba_classes~~UsedByGraph_node42" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node42"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="344,-108 235,-108 235,-84 344,-84 344,-108"/>
-<text text-anchor="middle" x="289.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>module~s_setup</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-108 262.5,-108 262.5,-84 316.5,-84 316.5,-108"/>
+<text text-anchor="middle" x="289.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge46" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M234.89,-101.09C225.67,-104.37 217.11,-109.39 211,-117 167.89,-170.74 151.58,-1267.13 149.29,-1438.55"/>
+<!-- module~s_setup&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge43" class="edge">
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.33,-95.68C244.93,-96.99 223.13,-101.89 211,-117 167.89,-170.74 151.58,-1267.13 149.29,-1438.55"/>
 <polygon fill="#000000" stroke="#000000" points="145.79,-1438.63 149.15,-1448.68 152.79,-1438.72 145.79,-1438.63"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- module~s_helio_kick -->
 <g id="module~~symba_classes~~UsedByGraph_node43" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="342.5,-66 236.5,-66 236.5,-42 342.5,-42 342.5,-66"/>
-<text text-anchor="middle" x="289.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-66 254.5,-66 254.5,-42 324.5,-42 324.5,-66"/>
+<text text-anchor="middle" x="289.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge47" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M236.46,-58.54C226.65,-61.8 217.45,-66.95 211,-75 166.51,-130.53 151.33,-1264.55 149.25,-1438.65"/>
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge44" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.18,-54.54C238.55,-56.7 221.28,-62.16 211,-75 166.51,-130.53 151.33,-1264.55 149.25,-1438.65"/>
 <polygon fill="#000000" stroke="#000000" points="145.75,-1438.67 149.14,-1448.71 152.75,-1438.75 145.75,-1438.67"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_util_append -->
 <g id="module~~symba_classes~~UsedByGraph_node44" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-24 241.5,-24 241.5,0 337.5,0 337.5,-24"/>
-<text text-anchor="middle" x="289.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>module~s_util_append</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-24 250,-24 250,0 329,0 329,-24"/>
+<text text-anchor="middle" x="289.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge48" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.27,-15.1C229.69,-18.2 218.49,-23.64 211,-33 165.16,-90.3 151.1,-1261.02 149.23,-1438.53"/>
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge45" class="edge">
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.77,-13.22C235.39,-15.77 220.32,-21.35 211,-33 165.16,-90.3 151.1,-1261.02 149.23,-1438.53"/>
 <polygon fill="#000000" stroke="#000000" points="145.72,-1438.73 149.12,-1448.76 152.72,-1438.8 145.72,-1438.73"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_rmvs_util -->
 <g id="module~~symba_classes~~UsedByGraph_node45" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node45"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="320.5,-2502 258.5,-2502 258.5,-2478 320.5,-2478 320.5,-2502"/>
-<text text-anchor="middle" x="289.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323,-2502 256,-2502 256,-2478 323,-2478 323,-2502"/>
+<text text-anchor="middle" x="289.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge50" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.2,-2489.87C241.65,-2488.08 222.27,-2482.83 211,-2469 146.69,-2390.1 148.04,-1624.9 148.84,-1483.43"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge47" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.86,-2489.6C239.85,-2487.57 221.74,-2482.18 211,-2469 146.69,-2390.1 148.04,-1624.9 148.84,-1483.43"/>
 <polygon fill="#000000" stroke="#000000" points="152.34,-1483.03 148.91,-1473.01 145.34,-1482.99 152.34,-1483.03"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- program~swiftest_driver -->
 <g id="module~~symba_classes~~UsedByGraph_node46" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="334,-2460 245,-2460 245,-2436 334,-2436 334,-2460"/>
-<text text-anchor="middle" x="289.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node46"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="330,-2460 249,-2460 249,-2436 330,-2436 330,-2460"/>
+<text text-anchor="middle" x="289.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge51" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M244.63,-2445.6C231.94,-2442.67 219.29,-2437.15 211,-2427 149.39,-2351.61 148.52,-1621.15 148.9,-1483.36"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge48" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.68,-2446.45C234.68,-2443.8 220.17,-2438.23 211,-2427 149.39,-2351.61 148.52,-1621.15 148.9,-1483.36"/>
 <polygon fill="#000000" stroke="#000000" points="152.41,-1483.18 148.94,-1473.17 145.41,-1483.16 152.41,-1483.18"/>
 </g>
-<!-- module~s_util_sort -->
+<!-- module~s_util_copy -->
 <g id="module~~symba_classes~~UsedByGraph_node47" class="node">
-<title>module~s_util_sort</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-2418 259,-2418 259,-2394 320,-2394 320,-2418"/>
-<text text-anchor="middle" x="289.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-2418 256.5,-2418 256.5,-2394 322.5,-2394 322.5,-2418"/>
+<text text-anchor="middle" x="289.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge77" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.62,-2405.89C241.99,-2404.13 222.4,-2398.91 211,-2385 152.14,-2313.18 149.02,-1618.53 148.97,-1483.63"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge51" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.28,-2405.62C240.18,-2403.63 221.87,-2398.26 211,-2385 152.14,-2313.18 149.02,-1618.53 148.97,-1483.63"/>
 <polygon fill="#000000" stroke="#000000" points="152.47,-1483.29 148.98,-1473.29 145.47,-1483.29 152.47,-1483.29"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_discard -->
 <g id="module~~symba_classes~~UsedByGraph_node48" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node48"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="330,-2376 249,-2376 249,-2352 330,-2352 330,-2376"/>
-<text text-anchor="middle" x="289.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_discard</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="318.5,-2376 260.5,-2376 260.5,-2352 318.5,-2352 318.5,-2376"/>
+<text text-anchor="middle" x="289.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<!-- module~s_discard&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge52" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.72,-2362.42C234.72,-2359.76 220.21,-2354.2 211,-2343 154.81,-2274.66 149.54,-1614.11 149.05,-1483.41"/>
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.17,-2364.03C243.23,-2362.43 222.78,-2357.32 211,-2343 154.81,-2274.66 149.54,-1614.11 149.05,-1483.41"/>
 <polygon fill="#000000" stroke="#000000" points="152.55,-1483.04 149.02,-1473.05 145.55,-1483.06 152.55,-1483.04"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_sort -->
 <g id="module~~symba_classes~~UsedByGraph_node49" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-2334 262.5,-2334 262.5,-2310 316.5,-2310 316.5,-2334"/>
-<text text-anchor="middle" x="289.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_sort</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-2334 259,-2334 259,-2310 320,-2310 320,-2334"/>
+<text text-anchor="middle" x="289.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
+<!-- module~s_util_sort&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge53" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.46,-2322.22C245.12,-2320.85 223.33,-2315.95 211,-2301 157.47,-2236.13 150.08,-1609.48 149.13,-1483.13"/>
+<title>module~s_util_sort&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.65,-2321.86C242.04,-2320.09 222.45,-2314.87 211,-2301 157.47,-2236.13 150.08,-1609.48 149.13,-1483.13"/>
 <polygon fill="#000000" stroke="#000000" points="152.63,-1483.07 149.06,-1473.09 145.63,-1483.11 152.63,-1483.07"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~s_whm_setup -->
 <g id="module~~symba_classes~~UsedByGraph_node50" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="345.5,-2292 233.5,-2292 233.5,-2268 345.5,-2268 345.5,-2292"/>
-<text text-anchor="middle" x="289.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-2292 250,-2292 250,-2268 329,-2268 329,-2292"/>
+<text text-anchor="middle" x="289.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge54" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.5,-2274.18C224.86,-2270.91 216.87,-2266.08 211,-2259 160.17,-2197.65 150.65,-1605.77 149.22,-1483.16"/>
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.97,-2278.61C235.62,-2276.04 220.52,-2270.49 211,-2259 160.17,-2197.65 150.65,-1605.77 149.22,-1483.16"/>
 <polygon fill="#000000" stroke="#000000" points="152.72,-1483.04 149.11,-1473.08 145.72,-1483.12 152.72,-1483.04"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~s_util_resize -->
 <g id="module~~symba_classes~~UsedByGraph_node51" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-2250 250.5,-2250 250.5,-2226 328.5,-2226 328.5,-2250"/>
-<text text-anchor="middle" x="289.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-2250 253.5,-2250 253.5,-2226 325.5,-2226 325.5,-2250"/>
+<text text-anchor="middle" x="289.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge55" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.4,-2236.66C235.93,-2234.12 220.63,-2228.57 211,-2217 162.86,-2159.14 151.25,-1601.66 149.32,-1483.1"/>
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M253.2,-2237.12C237.93,-2234.81 221.25,-2229.32 211,-2217 162.86,-2159.14 151.25,-1601.66 149.32,-1483.1"/>
 <polygon fill="#000000" stroke="#000000" points="152.82,-1482.97 149.17,-1473.03 145.82,-1483.08 152.82,-1482.97"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_helio_gr -->
 <g id="module~~symba_classes~~UsedByGraph_node52" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368,-2208 211,-2208 211,-2184 368,-2184 368,-2208"/>
-<text text-anchor="middle" x="289.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320.5,-2208 258.5,-2208 258.5,-2184 320.5,-2184 320.5,-2208"/>
+<text text-anchor="middle" x="289.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge56" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M221.25,-2183.99C217.43,-2181.5 213.95,-2178.53 211,-2175 165.57,-2120.67 151.91,-1598.27 149.44,-1483.3"/>
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.33,-2195.77C241.82,-2193.94 222.45,-2188.69 211,-2175 165.57,-2120.67 151.91,-1598.27 149.44,-1483.3"/>
 <polygon fill="#000000" stroke="#000000" points="152.94,-1483.13 149.23,-1473.21 145.94,-1483.28 152.94,-1483.13"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~orbel -->
 <g id="module~~symba_classes~~UsedByGraph_node53" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-2166 262.5,-2166 262.5,-2142 316.5,-2142 316.5,-2166"/>
-<text text-anchor="middle" x="289.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~orbel</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node53"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="316.5,-2166 262.5,-2166 262.5,-2142 316.5,-2142 316.5,-2166"/>
+<text text-anchor="middle" x="289.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
+<!-- module~orbel&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge57" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
+<title>module~orbel&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.17,-2154.11C244.93,-2152.68 223.38,-2147.72 211,-2133 168.26,-2082.17 152.59,-1594.27 149.57,-1483.36"/>
 <polygon fill="#000000" stroke="#000000" points="153.06,-1482.94 149.3,-1473.03 146.06,-1483.12 153.06,-1482.94"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_whm_util -->
 <g id="module~~symba_classes~~UsedByGraph_node54" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-2124 250,-2124 250,-2100 329,-2100 329,-2124"/>
-<text text-anchor="middle" x="289.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-2124 256.5,-2124 256.5,-2100 322.5,-2100 322.5,-2124"/>
+<text text-anchor="middle" x="289.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge58" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.69,-2110.44C235.47,-2107.82 220.54,-2102.28 211,-2091 170.94,-2043.64 153.32,-1589.8 149.71,-1483.29"/>
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.45,-2111.48C240.4,-2109.45 222.07,-2104.09 211,-2091 170.94,-2043.64 153.32,-1589.8 149.71,-1483.29"/>
 <polygon fill="#000000" stroke="#000000" points="153.2,-1482.95 149.37,-1473.07 146.21,-1483.18 153.2,-1482.95"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~symba_classes~~UsedByGraph_node55" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324,-2082 255,-2082 255,-2058 324,-2058 324,-2082"/>
-<text text-anchor="middle" x="289.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-2082 250,-2082 250,-2058 329,-2058 329,-2082"/>
+<text text-anchor="middle" x="289.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge59" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.91,-2069.24C239.26,-2067.05 221.76,-2061.63 211,-2049 173.58,-2005.08 154.07,-1584.8 149.87,-1483.09"/>
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.73,-2068.4C235.52,-2065.78 220.58,-2060.25 211,-2049 173.58,-2005.08 154.07,-1584.8 149.87,-1483.09"/>
 <polygon fill="#000000" stroke="#000000" points="153.36,-1482.88 149.46,-1473.03 146.37,-1483.16 153.36,-1482.88"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_util_spill -->
 <g id="module~~symba_classes~~UsedByGraph_node56" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322,-2040 257,-2040 257,-2016 322,-2016 322,-2040"/>
-<text text-anchor="middle" x="289.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-2040 259,-2040 259,-2016 320,-2016 320,-2040"/>
+<text text-anchor="middle" x="289.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge60" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.92,-2027.47C240.8,-2025.45 222.26,-2020.11 211,-2007 176.32,-1966.62 154.99,-1581.73 150.09,-1483.65"/>
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.85,-2027.7C242.3,-2025.87 222.72,-2020.64 211,-2007 176.32,-1966.62 154.99,-1581.73 150.09,-1483.65"/>
 <polygon fill="#000000" stroke="#000000" points="153.57,-1483.21 149.58,-1473.39 146.58,-1483.55 153.57,-1483.21"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~symba_classes~~UsedByGraph_node57" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-1998 254.5,-1998 254.5,-1974 324.5,-1974 324.5,-1998"/>
-<text text-anchor="middle" x="289.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="345.5,-1998 233.5,-1998 233.5,-1974 345.5,-1974 345.5,-1998"/>
+<text text-anchor="middle" x="289.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge62" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.22,-1985.05C238.79,-1982.77 221.68,-1977.32 211,-1965 147.37,-1891.62 147.34,-1571.18 148.57,-1483.34"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge61" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.36,-1979.81C224.85,-1976.57 216.94,-1971.85 211,-1965 147.37,-1891.62 147.34,-1571.18 148.57,-1483.34"/>
 <polygon fill="#000000" stroke="#000000" points="152.07,-1483.22 148.73,-1473.17 145.07,-1483.11 152.07,-1483.22"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~symba_classes~~UsedByGraph_node58" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="318.5,-1956 260.5,-1956 260.5,-1932 318.5,-1932 318.5,-1956"/>
-<text text-anchor="middle" x="289.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="345.5,-1956 233.5,-1956 233.5,-1932 345.5,-1932 345.5,-1956"/>
+<text text-anchor="middle" x="289.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge63" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.48,-1943.77C243.66,-1942.06 223.22,-1936.94 211,-1923 152.6,-1856.39 148.74,-1565.8 148.85,-1483.06"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge62" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.43,-1937.75C224.91,-1934.52 216.97,-1929.81 211,-1923 152.6,-1856.39 148.74,-1565.8 148.85,-1483.06"/>
 <polygon fill="#000000" stroke="#000000" points="152.35,-1483.02 148.89,-1473.01 145.35,-1483 152.35,-1483.02"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~s_whm_kick -->
 <g id="module~~symba_classes~~UsedByGraph_node59" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-1914 259,-1914 259,-1890 320,-1890 320,-1914"/>
-<text text-anchor="middle" x="289.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~s_whm_kick</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-1914 254.5,-1914 254.5,-1890 324.5,-1890 324.5,-1914"/>
+<text text-anchor="middle" x="289.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge64" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.64,-1901.5C242.23,-1899.59 222.85,-1894.34 211,-1881 157.93,-1821.26 150.28,-1561.4 149.18,-1483.29"/>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge63" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.35,-1900.93C238.95,-1898.63 221.83,-1893.19 211,-1881 157.93,-1821.26 150.28,-1561.4 149.18,-1483.29"/>
 <polygon fill="#000000" stroke="#000000" points="152.68,-1483.09 149.06,-1473.13 145.68,-1483.17 152.68,-1483.09"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_fraggle_util -->
 <g id="module~~symba_classes~~UsedByGraph_node60" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="345.5,-1872 233.5,-1872 233.5,-1848 345.5,-1848 345.5,-1872"/>
-<text text-anchor="middle" x="289.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="327.5,-1872 251.5,-1872 251.5,-1848 327.5,-1848 327.5,-1872"/>
+<text text-anchor="middle" x="289.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge65" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M233.2,-1853.46C224.81,-1850.25 216.98,-1845.62 211,-1839 163.2,-1786.05 151.97,-1556.41 149.59,-1483.38"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge72" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.26,-1858.34C236.74,-1855.76 221.18,-1850.28 211,-1839 163.2,-1786.05 151.97,-1556.41 149.59,-1483.38"/>
 <polygon fill="#000000" stroke="#000000" points="153.08,-1482.95 149.28,-1473.06 146.08,-1483.16 153.08,-1482.95"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~whm_drift -->
 <g id="module~~symba_classes~~UsedByGraph_node61" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-1830 254.5,-1830 254.5,-1806 324.5,-1806 324.5,-1830"/>
-<text text-anchor="middle" x="289.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~whm_drift</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node61"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="319,-1830 260,-1830 260,-1806 319,-1806 319,-1830"/>
+<text text-anchor="middle" x="289.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge66" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.15,-1816.7C238.89,-1814.32 221.96,-1808.89 211,-1797 168.45,-1750.81 153.87,-1551.15 150.1,-1483.51"/>
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.96,-1817.48C243.38,-1815.62 223.37,-1810.43 211,-1797 168.45,-1750.81 153.87,-1551.15 150.1,-1483.51"/>
 <polygon fill="#000000" stroke="#000000" points="153.58,-1482.95 149.55,-1473.15 146.59,-1483.32 153.58,-1482.95"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~symba_classes~~UsedByGraph_node62" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="320,-1788 259,-1788 259,-1764 320,-1764 320,-1788"/>
-<text text-anchor="middle" x="289.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="346.5,-1788 232.5,-1788 232.5,-1764 346.5,-1764 346.5,-1788"/>
+<text text-anchor="middle" x="289.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge69" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.94,-1775.23C242.63,-1773.22 223.25,-1767.97 211,-1755 173.65,-1715.47 156.01,-1545.28 150.75,-1483.51"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge67" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M232.27,-1768.77C224.3,-1765.61 216.84,-1761.18 211,-1755 173.65,-1715.47 156.01,-1545.28 150.75,-1483.51"/>
 <polygon fill="#000000" stroke="#000000" points="154.22,-1482.97 149.91,-1473.29 147.24,-1483.54 154.22,-1482.97"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_util_fill -->
 <g id="module~~symba_classes~~UsedByGraph_node63" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="324.5,-1746 254.5,-1746 254.5,-1722 324.5,-1722 324.5,-1746"/>
-<text text-anchor="middle" x="289.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1746 262.5,-1746 262.5,-1722 316.5,-1722 316.5,-1746"/>
+<text text-anchor="middle" x="289.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge70" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.46,-1732.41C239.27,-1729.96 222.3,-1724.57 211,-1713 178.75,-1679.98 158.41,-1538.4 151.57,-1483.18"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge68" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.48,-1733.46C245.6,-1731.71 224.35,-1726.66 211,-1713 178.75,-1679.98 158.41,-1538.4 151.57,-1483.18"/>
 <polygon fill="#000000" stroke="#000000" points="155.02,-1482.57 150.35,-1473.06 148.07,-1483.41 155.02,-1482.57"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_io -->
 <g id="module~~symba_classes~~UsedByGraph_node64" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="322.5,-1704 256.5,-1704 256.5,-1680 322.5,-1680 322.5,-1704"/>
-<text text-anchor="middle" x="289.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_io</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1704 262.5,-1704 262.5,-1680 316.5,-1680 316.5,-1704"/>
+<text text-anchor="middle" x="289.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge71" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.25,-1690.42C240.74,-1688.04 222.96,-1682.69 211,-1671 158.48,-1619.65 149.92,-1526.17 148.88,-1483.42"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge69" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.31,-1691.22C245.58,-1689.35 224.56,-1684.25 211,-1671 158.48,-1619.65 149.92,-1526.17 148.88,-1483.42"/>
 <polygon fill="#000000" stroke="#000000" points="152.38,-1483.2 148.76,-1473.24 145.38,-1483.28 152.38,-1483.2"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_helio_setup -->
 <g id="module~~symba_classes~~UsedByGraph_node65" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1662 262.5,-1662 262.5,-1638 316.5,-1638 316.5,-1662"/>
-<text text-anchor="middle" x="289.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-1662 250,-1662 250,-1638 329,-1638 329,-1662"/>
+<text text-anchor="middle" x="289.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge72" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.23,-1648.87C245.68,-1646.85 224.89,-1641.7 211,-1629 168.38,-1590.01 154.97,-1519.14 150.82,-1483.19"/>
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge70" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.89,-1646.85C236.21,-1643.98 221.59,-1638.69 211,-1629 168.38,-1590.01 154.97,-1519.14 150.82,-1483.19"/>
 <polygon fill="#000000" stroke="#000000" points="154.3,-1482.82 149.8,-1473.22 147.33,-1483.53 154.3,-1482.82"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_util_solve -->
 <g id="module~~symba_classes~~UsedByGraph_node66" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="346.5,-1620 232.5,-1620 232.5,-1596 346.5,-1596 346.5,-1620"/>
-<text text-anchor="middle" x="289.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-1620 255.5,-1620 255.5,-1596 323.5,-1596 323.5,-1620"/>
+<text text-anchor="middle" x="289.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge73" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M232.33,-1598.97C224.63,-1596.03 217.24,-1592.14 211,-1587 178.13,-1559.92 161.25,-1511.13 153.84,-1482.87"/>
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.13,-1605.18C240.27,-1602.47 223.37,-1597.19 211,-1587 178.13,-1559.92 161.25,-1511.13 153.84,-1482.87"/>
 <polygon fill="#000000" stroke="#000000" points="157.24,-1482.01 151.45,-1473.13 150.44,-1483.67 157.24,-1482.01"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_helio_step -->
 <g id="module~~symba_classes~~UsedByGraph_node67" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-1578 241.5,-1578 241.5,-1554 337.5,-1554 337.5,-1578"/>
-<text text-anchor="middle" x="289.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-1578 253,-1578 253,-1554 326,-1554 326,-1578"/>
+<text text-anchor="middle" x="289.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge75" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.22,-1558.56C230.68,-1555.48 219.98,-1551.14 211,-1545 187.58,-1528.98 169.62,-1501.14 159.2,-1481.93"/>
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge74" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.81,-1561.5C238.87,-1558.47 223.31,-1553.42 211,-1545 187.58,-1528.98 169.62,-1501.14 159.2,-1481.93"/>
 <polygon fill="#000000" stroke="#000000" points="162.29,-1480.29 154.57,-1473.03 156.08,-1483.52 162.29,-1480.29"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_whm_step -->
 <g id="module~~symba_classes~~UsedByGraph_node68" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1536 262.5,-1536 262.5,-1512 316.5,-1512 316.5,-1536"/>
-<text text-anchor="middle" x="289.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-1536 253,-1536 253,-1512 326,-1512 326,-1536"/>
+<text text-anchor="middle" x="289.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge76" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.27,-1519.16C246.9,-1515.77 227.35,-1510.5 211,-1503 197.25,-1496.69 183.19,-1487.45 171.95,-1479.23"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge75" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.92,-1516.97C239.44,-1513.64 224.18,-1509.04 211,-1503 197.25,-1496.69 183.19,-1487.45 171.95,-1479.23"/>
 <polygon fill="#000000" stroke="#000000" points="174.04,-1476.43 163.95,-1473.22 169.84,-1482.02 174.04,-1476.43"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_kick -->
 <g id="module~~symba_classes~~UsedByGraph_node69" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="328,-1494 251,-1494 251,-1470 328,-1470 328,-1494"/>
-<text text-anchor="middle" x="289.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_kick</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="316.5,-1494 262.5,-1494 262.5,-1470 316.5,-1470 316.5,-1494"/>
+<text text-anchor="middle" x="289.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge67" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.75,-1476.32C230.41,-1473.26 205.44,-1469.5 185.32,-1466.47"/>
-<polygon fill="#000000" stroke="#000000" points="185.7,-1462.99 175.3,-1464.96 184.66,-1469.91 185.7,-1462.99"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge76" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.26,-1478.05C240.54,-1474.78 209.43,-1470.1 185.32,-1466.47"/>
+<polygon fill="#000000" stroke="#000000" points="185.53,-1462.96 175.12,-1464.93 184.49,-1469.88 185.53,-1462.96"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~s_fraggle_generate -->
 <g id="module~~symba_classes~~UsedByGraph_node70" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="328.5,-1452 250.5,-1452 250.5,-1428 328.5,-1428 328.5,-1452"/>
-<text text-anchor="middle" x="289.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="342.5,-1452 236.5,-1452 236.5,-1428 342.5,-1428 342.5,-1452"/>
+<text text-anchor="middle" x="289.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~symba_classes~~UsedByGraph_edge78" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.38,-1445.74C230.05,-1448.8 205.16,-1452.55 185.14,-1455.56"/>
-<polygon fill="#000000" stroke="#000000" points="184.52,-1452.11 175.16,-1457.06 185.57,-1459.03 184.52,-1452.11"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~symba_classes~~UsedByGraph_edge77" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M236.16,-1447.88C219.2,-1450.43 200.77,-1453.21 185.25,-1455.54"/>
+<polygon fill="#000000" stroke="#000000" points="184.39,-1452.13 175.02,-1457.08 185.43,-1459.06 184.39,-1452.13"/>
 </g>
-<!-- module~s_fraggle_util -->
+<!-- module~drift_implementation -->
 <g id="module~~symba_classes~~UsedByGraph_node71" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~symba_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="327.5,-1410 251.5,-1410 251.5,-1386 327.5,-1386 327.5,-1410"/>
-<text text-anchor="middle" x="289.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~symba_classes~~UsedByGraph_node71"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="344,-1410 235,-1410 235,-1386 344,-1386 344,-1410"/>
+<text text-anchor="middle" x="289.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
 <g id="module~~symba_classes~~UsedByGraph_edge79" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.35,-1405.42C238.27,-1408.71 223.67,-1413.19 211,-1419 197.25,-1425.31 183.19,-1434.55 171.95,-1442.77"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M234.73,-1410.08C226.62,-1412.61 218.48,-1415.57 211,-1419 197.25,-1425.31 183.19,-1434.55 171.95,-1442.77"/>
 <polygon fill="#000000" stroke="#000000" points="169.84,-1439.98 163.95,-1448.78 174.04,-1445.57 169.84,-1439.98"/>
 </g>
 </g>
@@ -3985,7 +3957,7 @@ <h4>Arguments</h4>
     
     
     <h3>
-public pure elemental module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+public pure module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
     
     
    
diff --git a/docs/module/walltime_classes.html b/docs/module/walltime_classes.html
index 2fcf7eb11..241922465 100644
--- a/docs/module/walltime_classes.html
+++ b/docs/module/walltime_classes.html
@@ -418,619 +418,619 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M127.82,-1440C120,-1440 111.12,-1440 102.17,-1440"/>
 <polygon fill="#000000" stroke="#000000" points="102.09,-1436.5 92.09,-1440 102.09,-1443.5 102.09,-1436.5"/>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~walltime_classes~~UsedByGraph_node3" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-2880 257,-2880 257,-2856 336,-2856 336,-2880"/>
-<text text-anchor="middle" x="296.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="355.5,-2880 237.5,-2880 237.5,-2856 355.5,-2856 355.5,-2880"/>
+<text text-anchor="middle" x="296.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge2" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.77,-2866.77C242.39,-2864.22 227.32,-2858.64 218,-2847 172.81,-2790.56 158.2,-1637.04 156.24,-1462.14"/>
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M237.2,-2861.07C229.79,-2857.84 223.05,-2853.31 218,-2847 172.81,-2790.56 158.2,-1637.04 156.24,-1462.14"/>
 <polygon fill="#000000" stroke="#000000" points="159.74,-1462.02 156.13,-1452.06 152.74,-1462.1 159.74,-1462.02"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_gr -->
 <g id="module~~walltime_classes~~UsedByGraph_node4" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-2838 257,-2838 257,-2814 336,-2814 336,-2838"/>
-<text text-anchor="middle" x="296.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_gr</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-2838 269.5,-2838 269.5,-2814 323.5,-2814 323.5,-2838"/>
+<text text-anchor="middle" x="296.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge5" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.78,-2824.77C242.4,-2822.22 227.33,-2816.64 218,-2805 174.19,-2750.36 158.44,-1634.59 156.27,-1462.27"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge3" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.33,-2826.32C251.93,-2825.01 230.12,-2820.12 218,-2805 174.19,-2750.36 158.44,-1634.59 156.27,-1462.27"/>
 <polygon fill="#000000" stroke="#000000" points="159.77,-1462.06 156.14,-1452.1 152.77,-1462.15 159.77,-1462.06"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_util_valid -->
 <g id="module~~walltime_classes~~UsedByGraph_node5" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326.5,-2796 266.5,-2796 266.5,-2772 326.5,-2772 326.5,-2796"/>
-<text text-anchor="middle" x="296.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-2796 264,-2796 264,-2772 329,-2772 329,-2796"/>
+<text text-anchor="middle" x="296.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge3" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.29,-2784.05C249.46,-2782.4 229.43,-2777.24 218,-2763 175.56,-2710.14 158.7,-1631.92 156.3,-1462.36"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge4" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.96,-2783.8C247.64,-2781.91 228.91,-2776.59 218,-2763 175.56,-2710.14 158.7,-1631.92 156.3,-1462.36"/>
 <polygon fill="#000000" stroke="#000000" points="159.8,-1462.08 156.16,-1452.13 152.8,-1462.18 159.8,-1462.08"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_symba_collision -->
 <g id="module~~walltime_classes~~UsedByGraph_node6" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node6"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="323.5,-2754 269.5,-2754 269.5,-2730 323.5,-2730 323.5,-2754"/>
-<text text-anchor="middle" x="296.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="346,-2754 247,-2754 247,-2730 346,-2730 346,-2754"/>
+<text text-anchor="middle" x="296.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge4" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.34,-2742.31C251.95,-2740.99 230.14,-2736.1 218,-2721 176.91,-2669.9 158.94,-1628 156.34,-1462.16"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge5" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.69,-2738.43C235.69,-2735.26 225.16,-2729.91 218,-2721 176.91,-2669.9 158.94,-1628 156.34,-1462.16"/>
 <polygon fill="#000000" stroke="#000000" points="159.84,-1462.08 156.18,-1452.14 152.84,-1462.19 159.84,-1462.08"/>
 </g>
-<!-- module~s_whm_util -->
+<!-- module~s_obl -->
 <g id="module~~walltime_classes~~UsedByGraph_node7" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node7"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-2712 263.5,-2712 263.5,-2688 329.5,-2688 329.5,-2712"/>
-<text text-anchor="middle" x="296.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<title>module~s_obl</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node7"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-2712 269.5,-2712 269.5,-2688 323.5,-2688 323.5,-2712"/>
+<text text-anchor="middle" x="296.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<!-- module~s_obl&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge6" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.19,-2699.7C247.07,-2697.72 228.76,-2692.35 218,-2679 178.29,-2629.71 159.23,-1625.94 156.38,-1462.43"/>
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.35,-2700.31C251.96,-2698.98 230.16,-2694.09 218,-2679 178.29,-2629.71 159.23,-1625.94 156.38,-1462.43"/>
 <polygon fill="#000000" stroke="#000000" points="159.87,-1462.07 156.2,-1452.13 152.87,-1462.19 159.87,-1462.07"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~walltime_classes~~UsedByGraph_node8" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-2670 257,-2670 257,-2646 336,-2646 336,-2670"/>
-<text text-anchor="middle" x="296.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="341,-2670 252,-2670 252,-2646 341,-2646 341,-2670"/>
+<text text-anchor="middle" x="296.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge7" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.82,-2656.74C242.44,-2654.18 227.37,-2648.61 218,-2637 179.64,-2589.46 159.48,-1621.65 156.41,-1462.16"/>
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.96,-2655.76C239.13,-2652.85 226.32,-2647.31 218,-2637 179.64,-2589.46 159.48,-1621.65 156.41,-1462.16"/>
 <polygon fill="#000000" stroke="#000000" points="159.91,-1462.03 156.22,-1452.1 152.91,-1462.16 159.91,-1462.03"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_util_coord -->
 <g id="module~~walltime_classes~~UsedByGraph_node9" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-2628 262.5,-2628 262.5,-2604 330.5,-2604 330.5,-2628"/>
-<text text-anchor="middle" x="296.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-2628 261.5,-2628 261.5,-2604 331.5,-2604 331.5,-2628"/>
+<text text-anchor="middle" x="296.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge8" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.42,-2615.58C246.5,-2613.53 228.6,-2608.12 218,-2595 181.01,-2549.25 159.78,-1619.09 156.46,-1462.33"/>
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.23,-2615.42C245.62,-2613.25 228.34,-2607.79 218,-2595 181.01,-2549.25 159.78,-1619.09 156.46,-1462.33"/>
 <polygon fill="#000000" stroke="#000000" points="159.95,-1461.97 156.24,-1452.05 152.96,-1462.12 159.95,-1461.97"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~walltime_classes~~UsedByGraph_node10" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-2586 257,-2586 257,-2562 336,-2562 336,-2586"/>
-<text text-anchor="middle" x="296.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node10"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="368,-2586 225,-2586 225,-2562 368,-2562 368,-2586"/>
+<text text-anchor="middle" x="296.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge9" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.84,-2572.72C242.47,-2570.16 227.39,-2564.59 218,-2553 182.38,-2509.04 160.09,-1616.31 156.51,-1462.48"/>
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M227.78,-2561.86C224.13,-2559.39 220.81,-2556.47 218,-2553 182.38,-2509.04 160.09,-1616.31 156.51,-1462.48"/>
 <polygon fill="#000000" stroke="#000000" points="160.01,-1462.26 156.28,-1452.34 153.01,-1462.42 160.01,-1462.26"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_whm_coord -->
 <g id="module~~walltime_classes~~UsedByGraph_node11" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-2544 269.5,-2544 269.5,-2520 323.5,-2520 323.5,-2544"/>
-<text text-anchor="middle" x="296.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_whm_coord</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-2544 257,-2544 257,-2520 336,-2520 336,-2544"/>
+<text text-anchor="middle" x="296.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge10" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.39,-2532.28C252.01,-2530.94 230.21,-2526.04 218,-2511 149.63,-2426.8 154.35,-1609.08 155.75,-1462.45"/>
+<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.85,-2530.71C242.48,-2528.15 227.4,-2522.58 218,-2511 149.63,-2426.8 154.35,-1609.08 155.75,-1462.45"/>
 <polygon fill="#000000" stroke="#000000" points="159.26,-1462.08 155.86,-1452.04 152.26,-1462.01 159.26,-1462.08"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_rescale -->
 <g id="module~~walltime_classes~~UsedByGraph_node12" class="node">
-<title>module~s_io</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-2502 269.5,-2502 269.5,-2478 323.5,-2478 323.5,-2502"/>
-<text text-anchor="middle" x="296.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335.5,-2502 257.5,-2502 257.5,-2478 335.5,-2478 335.5,-2502"/>
+<text text-anchor="middle" x="296.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge11" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.4,-2490.27C252.03,-2488.93 230.23,-2484.03 218,-2469 152.34,-2388.34 154.8,-1605.74 155.81,-1462.47"/>
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.27,-2488.77C242.78,-2486.24 227.5,-2480.68 218,-2469 152.34,-2388.34 154.8,-1605.74 155.81,-1462.47"/>
 <polygon fill="#000000" stroke="#000000" points="159.31,-1462.28 155.89,-1452.26 152.31,-1462.23 159.31,-1462.28"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~walltime_classes~~UsedByGraph_node13" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-2460 260,-2460 260,-2436 333,-2436 333,-2460"/>
-<text text-anchor="middle" x="296.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="375,-2460 218,-2460 218,-2436 375,-2436 375,-2460"/>
+<text text-anchor="middle" x="296.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge12" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.69,-2447.15C244.52,-2444.82 228.05,-2439.31 218,-2427 155.05,-2349.86 155.27,-1602.06 155.87,-1462.4"/>
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M227.81,-2435.84C224.15,-2433.38 220.82,-2430.46 218,-2427 155.05,-2349.86 155.27,-1602.06 155.87,-1462.4"/>
 <polygon fill="#000000" stroke="#000000" points="159.37,-1462.11 155.92,-1452.09 152.37,-1462.08 159.37,-1462.11"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_rmvs_step -->
 <g id="module~~walltime_classes~~UsedByGraph_node14" class="node">
-<title>module~orbel</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node14"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="323.5,-2418 269.5,-2418 269.5,-2394 323.5,-2394 323.5,-2418"/>
-<text text-anchor="middle" x="296.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_rmvs_step</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-2418 260,-2418 260,-2394 333,-2394 333,-2418"/>
+<text text-anchor="middle" x="296.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge13" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.42,-2406.25C252.07,-2404.9 230.27,-2400 218,-2385 157.74,-2311.36 155.76,-1598.18 155.94,-1462.3"/>
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.71,-2405.14C244.53,-2402.81 228.06,-2397.3 218,-2385 157.74,-2311.36 155.76,-1598.18 155.94,-1462.3"/>
 <polygon fill="#000000" stroke="#000000" points="159.44,-1462.24 155.96,-1452.24 152.44,-1462.23 159.44,-1462.24"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- module~s_util_index -->
 <g id="module~~walltime_classes~~UsedByGraph_node15" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="334,-2376 259,-2376 259,-2352 334,-2352 334,-2376"/>
-<text text-anchor="middle" x="296.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>module~s_util_index</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331,-2376 262,-2376 262,-2352 331,-2352 331,-2376"/>
+<text text-anchor="middle" x="296.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge14" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.93,-2363C243.98,-2360.6 227.91,-2355.07 218,-2343 160.42,-2272.85 156.27,-1593.96 156.01,-1462.12"/>
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.71,-2363.41C246.01,-2361.26 228.53,-2355.82 218,-2343 160.42,-2272.85 156.27,-1593.96 156.01,-1462.12"/>
 <polygon fill="#000000" stroke="#000000" points="159.51,-1462.01 156,-1452.01 152.51,-1462.02 159.51,-1462.01"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- proc~ge_wpp -->
 <g id="module~~walltime_classes~~UsedByGraph_node16" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="346,-2334 247,-2334 247,-2310 346,-2310 346,-2334"/>
-<text text-anchor="middle" x="296.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node16"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="323.5,-2334 269.5,-2334 269.5,-2310 323.5,-2310 323.5,-2334"/>
+<text text-anchor="middle" x="296.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge15" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M246.83,-2318.31C235.83,-2315.15 225.27,-2309.82 218,-2301 163.14,-2234.4 156.81,-1590.83 156.09,-1462.28"/>
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.45,-2322.22C252.11,-2320.86 230.32,-2315.96 218,-2301 163.14,-2234.4 156.81,-1590.83 156.09,-1462.28"/>
 <polygon fill="#000000" stroke="#000000" points="159.59,-1462.06 156.04,-1452.08 152.59,-1462.09 159.59,-1462.06"/>
 </g>
-<!-- module~s_symba_encounter_check -->
+<!-- module~s_operator_cross -->
 <g id="module~~walltime_classes~~UsedByGraph_node17" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="368,-2292 225,-2292 225,-2268 368,-2268 368,-2292"/>
-<text text-anchor="middle" x="296.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>module~s_operator_cross</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-2292 248.5,-2292 248.5,-2268 344.5,-2268 344.5,-2292"/>
+<text text-anchor="middle" x="296.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge16" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M227.86,-2267.8C224.19,-2265.34 220.84,-2262.44 218,-2259 165.85,-2195.92 157.37,-1587.29 156.18,-1462.35"/>
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.47,-2276.74C236.89,-2273.64 225.64,-2268.24 218,-2259 165.85,-2195.92 157.37,-1587.29 156.18,-1462.35"/>
 <polygon fill="#000000" stroke="#000000" points="159.68,-1462.06 156.09,-1452.09 152.68,-1462.12 159.68,-1462.06"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_fraggle_set -->
 <g id="module~~walltime_classes~~UsedByGraph_node18" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-2250 261.5,-2250 261.5,-2226 331.5,-2226 331.5,-2250"/>
-<text text-anchor="middle" x="296.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-2250 258,-2250 258,-2226 335,-2226 335,-2250"/>
+<text text-anchor="middle" x="296.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge17" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.38,-2237.31C245.79,-2235.11 228.51,-2229.66 218,-2217 168.54,-2157.43 157.96,-1583.35 156.27,-1462.33"/>
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.79,-2236.74C243.2,-2234.23 227.71,-2228.69 218,-2217 168.54,-2157.43 157.96,-1583.35 156.27,-1462.33"/>
 <polygon fill="#000000" stroke="#000000" points="159.77,-1462.01 156.14,-1452.06 152.77,-1462.11 159.77,-1462.01"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_fraggle_io -->
 <g id="module~~walltime_classes~~UsedByGraph_node19" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-2208 255.5,-2208 255.5,-2184 337.5,-2184 337.5,-2208"/>
-<text text-anchor="middle" x="296.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-2208 261,-2208 261,-2184 332,-2184 332,-2208"/>
+<text text-anchor="middle" x="296.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge18" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.4,-2194.28C241.54,-2191.58 227.2,-2186.03 218,-2175 171.27,-2118.97 158.6,-1580.15 156.39,-1462.58"/>
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.61,-2195.17C245.24,-2192.89 228.36,-2187.42 218,-2175 171.27,-2118.97 158.6,-1580.15 156.39,-1462.58"/>
 <polygon fill="#000000" stroke="#000000" points="159.88,-1462.21 156.2,-1452.27 152.88,-1462.33 159.88,-1462.21"/>
 </g>
-<!-- module~s_whm_step -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~walltime_classes~~UsedByGraph_node20" class="node">
-<title>module~s_whm_step</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-2166 260,-2166 260,-2142 333,-2142 333,-2166"/>
-<text text-anchor="middle" x="296.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-2166 261,-2166 261,-2142 332,-2142 332,-2166"/>
+<text text-anchor="middle" x="296.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge19" class="edge">
-<title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.84,-2153.03C244.69,-2150.67 228.21,-2145.18 218,-2133 173.92,-2080.42 159.25,-1575.34 156.5,-1462.35"/>
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.64,-2153.15C245.28,-2150.87 228.39,-2145.39 218,-2133 173.92,-2080.42 159.25,-1575.34 156.5,-1462.35"/>
 <polygon fill="#000000" stroke="#000000" points="160,-1462.04 156.26,-1452.13 153,-1462.21 160,-1462.04"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- module~s_util_set -->
 <g id="module~~walltime_classes~~UsedByGraph_node21" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="327.5,-2124 265.5,-2124 265.5,-2100 327.5,-2100 327.5,-2124"/>
-<text text-anchor="middle" x="296.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>module~s_util_set</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-2124 267.5,-2124 267.5,-2100 325.5,-2100 325.5,-2124"/>
+<text text-anchor="middle" x="296.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge20" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.38,-2111.73C248.88,-2109.89 229.5,-2104.64 218,-2091 176.6,-2041.91 159.95,-1571.13 156.64,-1462.35"/>
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.3,-2111.93C250.4,-2110.29 229.95,-2105.17 218,-2091 176.6,-2041.91 159.95,-1571.13 156.64,-1462.35"/>
 <polygon fill="#000000" stroke="#000000" points="160.13,-1462.09 156.34,-1452.2 153.14,-1462.3 160.13,-1462.09"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_rmvs_io -->
 <g id="module~~walltime_classes~~UsedByGraph_node22" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-2082 248.5,-2082 248.5,-2058 344.5,-2058 344.5,-2082"/>
-<text text-anchor="middle" x="296.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-2082 266,-2082 266,-2058 327,-2058 327,-2082"/>
+<text text-anchor="middle" x="296.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge21" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.22,-2066.5C236.79,-2063.38 225.67,-2058.03 218,-2049 179.26,-2003.37 160.69,-1566.4 156.79,-1462.22"/>
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.8,-2069.75C249.23,-2067.93 229.64,-2062.71 218,-2049 179.26,-2003.37 160.69,-1566.4 156.79,-1462.22"/>
 <polygon fill="#000000" stroke="#000000" points="160.29,-1462.06 156.42,-1452.19 153.29,-1462.31 160.29,-1462.06"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_util_version -->
 <g id="module~~walltime_classes~~UsedByGraph_node23" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="340.5,-2040 252.5,-2040 252.5,-2016 340.5,-2016 340.5,-2040"/>
-<text text-anchor="middle" x="296.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<title>module~s_util_version</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="335.5,-2040 257.5,-2040 257.5,-2016 335.5,-2016 335.5,-2040"/>
+<text text-anchor="middle" x="296.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge22" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.31,-2025.47C239.5,-2022.55 226.61,-2017.06 218,-2007 181.94,-1964.84 161.5,-1561.95 156.97,-1462.24"/>
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.15,-2026.46C242.82,-2023.86 227.69,-2018.34 218,-2007 181.94,-1964.84 161.5,-1561.95 156.97,-1462.24"/>
 <polygon fill="#000000" stroke="#000000" points="160.46,-1461.93 156.51,-1452.1 153.46,-1462.24 160.46,-1461.93"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_tides_step_spin -->
 <g id="module~~walltime_classes~~UsedByGraph_node24" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node24"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-1998 267,-1998 267,-1974 326,-1974 326,-1998"/>
-<text text-anchor="middle" x="296.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="345.5,-1998 247.5,-1998 247.5,-1974 345.5,-1974 345.5,-1998"/>
+<text text-anchor="middle" x="296.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge23" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.64,-1985.76C249.94,-1984 229.93,-1978.83 218,-1965 184.62,-1926.31 162.4,-1557.69 157.18,-1462.4"/>
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.11,-1982.08C236.1,-1978.92 225.47,-1973.65 218,-1965 184.62,-1926.31 162.4,-1557.69 157.18,-1462.4"/>
 <polygon fill="#000000" stroke="#000000" points="160.68,-1462.2 156.64,-1452.4 153.69,-1462.57 160.68,-1462.2"/>
 </g>
-<!-- module~s_rmvs_util -->
+<!-- proc~solve_wbs -->
 <g id="module~~walltime_classes~~UsedByGraph_node25" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="330,-1956 263,-1956 263,-1932 330,-1932 330,-1956"/>
-<text text-anchor="middle" x="296.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node25"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="327.5,-1956 265.5,-1956 265.5,-1932 327.5,-1932 327.5,-1956"/>
+<text text-anchor="middle" x="296.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge24" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.82,-1943.25C247,-1941.1 229.08,-1935.72 218,-1923 157,-1853.01 155.03,-1547.58 155.7,-1462.23"/>
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.16,-1943.54C248.8,-1941.62 229.63,-1936.35 218,-1923 157,-1853.01 155.03,-1547.58 155.7,-1462.23"/>
 <polygon fill="#000000" stroke="#000000" points="159.21,-1462.14 155.81,-1452.1 152.21,-1462.07 159.21,-1462.14"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- module~s_orbel -->
 <g id="module~~walltime_classes~~UsedByGraph_node26" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-1914 261,-1914 261,-1890 332,-1890 332,-1914"/>
-<text text-anchor="middle" x="296.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_orbel</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-1914 269.5,-1914 269.5,-1890 323.5,-1890 323.5,-1914"/>
+<text text-anchor="middle" x="296.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge25" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.92,-1900.91C245.61,-1898.57 228.7,-1893.13 218,-1881 162.31,-1817.88 156.5,-1543.06 156.01,-1462.36"/>
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.39,-1901.92C252.25,-1900.4 230.73,-1895.43 218,-1881 162.31,-1817.88 156.5,-1543.06 156.01,-1462.36"/>
 <polygon fill="#000000" stroke="#000000" points="159.51,-1462.29 155.97,-1452.3 152.51,-1462.31 159.51,-1462.29"/>
 </g>
-<!-- module~s_util_append -->
+<!-- module~s_whm_gr -->
 <g id="module~~walltime_classes~~UsedByGraph_node27" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-1872 257,-1872 257,-1848 336,-1848 336,-1872"/>
-<text text-anchor="middle" x="296.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
+<title>module~s_whm_gr</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="327.5,-1872 265.5,-1872 265.5,-1848 327.5,-1848 327.5,-1872"/>
+<text text-anchor="middle" x="296.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge26" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.61,-1858.08C242.55,-1855.4 227.76,-1849.91 218,-1839 167.63,-1782.74 158.13,-1538.59 156.38,-1462.64"/>
+<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.29,-1859.42C248.97,-1857.46 229.81,-1852.19 218,-1839 167.63,-1782.74 158.13,-1538.59 156.38,-1462.64"/>
 <polygon fill="#000000" stroke="#000000" points="159.88,-1462.24 156.17,-1452.32 152.88,-1462.39 159.88,-1462.24"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~walltime_classes~~UsedByGraph_node28" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="332,-1830 261,-1830 261,-1806 332,-1806 332,-1830"/>
-<text text-anchor="middle" x="296.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-1830 261.5,-1830 261.5,-1806 331.5,-1806 331.5,-1830"/>
+<text text-anchor="middle" x="296.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge27" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.69,-1816.69C245.53,-1814.29 228.8,-1808.85 218,-1797 172.84,-1747.45 159.9,-1532.95 156.83,-1462.51"/>
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.48,-1816.81C246.12,-1814.48 228.99,-1809.05 218,-1797 172.84,-1747.45 159.9,-1532.95 156.83,-1462.51"/>
 <polygon fill="#000000" stroke="#000000" points="160.32,-1461.98 156.41,-1452.14 153.32,-1462.27 160.32,-1461.98"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_fraggle_regime -->
 <g id="module~~walltime_classes~~UsedByGraph_node29" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-1788 269.5,-1788 269.5,-1764 323.5,-1764 323.5,-1788"/>
-<text text-anchor="middle" x="296.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-1788 248.5,-1788 248.5,-1764 344.5,-1764 344.5,-1788"/>
+<text text-anchor="middle" x="296.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge28" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.27,-1775.66C252.3,-1774 231.02,-1768.97 218,-1755 178.03,-1712.11 161.88,-1527 157.4,-1462.37"/>
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.37,-1771.9C237.07,-1768.77 225.98,-1763.57 218,-1755 178.03,-1712.11 161.88,-1527 157.4,-1462.37"/>
 <polygon fill="#000000" stroke="#000000" points="160.87,-1461.83 156.71,-1452.09 153.88,-1462.3 160.87,-1461.83"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_util_exit -->
 <g id="module~~walltime_classes~~UsedByGraph_node30" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-1746 266,-1746 266,-1722 327,-1722 327,-1746"/>
-<text text-anchor="middle" x="296.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326.5,-1746 266.5,-1746 266.5,-1722 326.5,-1722 326.5,-1746"/>
+<text text-anchor="middle" x="296.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge29" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.63,-1733.11C249.43,-1731.04 230.26,-1725.77 218,-1713 183.15,-1676.68 164.1,-1520.39 158.1,-1462.06"/>
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.4,-1733.2C250.03,-1731.21 230.45,-1725.98 218,-1713 183.15,-1676.68 164.1,-1520.39 158.1,-1462.06"/>
 <polygon fill="#000000" stroke="#000000" points="161.58,-1461.67 157.11,-1452.06 154.62,-1462.36 161.58,-1461.67"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_netcdf -->
 <g id="module~~walltime_classes~~UsedByGraph_node31" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="355.5,-1704 237.5,-1704 237.5,-1680 355.5,-1680 355.5,-1704"/>
-<text text-anchor="middle" x="296.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-1704 269.5,-1704 269.5,-1680 323.5,-1680 323.5,-1704"/>
+<text text-anchor="middle" x="296.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge30" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M237.21,-1683.53C230.08,-1680.49 223.41,-1676.43 218,-1671 160.29,-1613.15 154.67,-1507.75 155.15,-1462.08"/>
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.2,-1691.33C252.43,-1689.51 231.39,-1684.42 218,-1671 160.29,-1613.15 154.67,-1507.75 155.15,-1462.08"/>
 <polygon fill="#000000" stroke="#000000" points="158.65,-1462.14 155.37,-1452.06 151.66,-1461.98 158.65,-1462.14"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~walltime_classes~~UsedByGraph_node32" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-1662 257,-1662 257,-1638 336,-1638 336,-1662"/>
-<text text-anchor="middle" x="296.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="340.5,-1662 252.5,-1662 252.5,-1638 340.5,-1638 340.5,-1662"/>
+<text text-anchor="middle" x="296.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge31" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.7,-1647.05C243,-1644.21 228.42,-1638.88 218,-1629 170.48,-1583.9 159.34,-1501.85 156.76,-1462.38"/>
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.29,-1646.06C239.93,-1643.02 227.3,-1637.83 218,-1629 170.48,-1583.9 159.34,-1501.85 156.76,-1462.38"/>
 <polygon fill="#000000" stroke="#000000" points="160.25,-1462.03 156.23,-1452.23 153.26,-1462.4 160.25,-1462.03"/>
 </g>
-<!-- module~s_whm_gr -->
+<!-- module~s_util_peri -->
 <g id="module~~walltime_classes~~UsedByGraph_node33" class="node">
-<title>module~s_whm_gr</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="327.5,-1620 265.5,-1620 265.5,-1596 327.5,-1596 327.5,-1620"/>
-<text text-anchor="middle" x="296.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-1620 266,-1620 266,-1596 327,-1596 327,-1620"/>
+<text text-anchor="middle" x="296.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_gr&#45;&gt;module~swiftest -->
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge32" class="edge">
-<title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.32,-1606.08C249.61,-1603.66 231.02,-1598.37 218,-1587 180.5,-1554.23 165.09,-1494.98 159.24,-1462.61"/>
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.7,-1606.14C249.91,-1603.74 231.12,-1598.47 218,-1587 180.5,-1554.23 165.09,-1494.98 159.24,-1462.61"/>
 <polygon fill="#000000" stroke="#000000" points="162.63,-1461.66 157.55,-1452.37 155.73,-1462.8 162.63,-1461.66"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_helio_drift -->
 <g id="module~~walltime_classes~~UsedByGraph_node34" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="345.5,-1578 247.5,-1578 247.5,-1554 345.5,-1554 345.5,-1578"/>
-<text text-anchor="middle" x="296.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-1578 261.5,-1578 261.5,-1554 331.5,-1554 331.5,-1578"/>
+<text text-anchor="middle" x="296.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge33" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.34,-1559.1C236.95,-1556 226.54,-1551.5 218,-1545 189.98,-1523.66 172.19,-1485.7 163.17,-1461.75"/>
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.31,-1562.52C246.81,-1559.66 230.42,-1554.46 218,-1545 189.98,-1523.66 172.19,-1485.7 163.17,-1461.75"/>
 <polygon fill="#000000" stroke="#000000" points="166.4,-1460.37 159.74,-1452.13 159.81,-1462.73 166.4,-1460.37"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_setup -->
 <g id="module~~walltime_classes~~UsedByGraph_node35" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<title>module~s_setup</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-1536 269.5,-1536 269.5,-1512 323.5,-1512 323.5,-1536"/>
-<text text-anchor="middle" x="296.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<text text-anchor="middle" x="296.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
+<!-- module~s_setup&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge34" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
+<title>module~s_setup&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.39,-1520.46C253.69,-1517.5 233.77,-1512.22 218,-1503 199.35,-1492.1 182.46,-1474.13 171.04,-1460.17"/>
 <polygon fill="#000000" stroke="#000000" points="173.61,-1457.78 164.66,-1452.1 168.11,-1462.11 173.61,-1457.78"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_helio_kick -->
 <g id="module~~walltime_classes~~UsedByGraph_node36" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-1494 267.5,-1494 267.5,-1470 325.5,-1470 325.5,-1494"/>
-<text text-anchor="middle" x="296.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-1494 261.5,-1494 261.5,-1470 331.5,-1470 331.5,-1494"/>
+<text text-anchor="middle" x="296.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge35" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.4,-1474.83C252.63,-1470.96 234.27,-1465.95 218,-1461 209.48,-1458.41 200.37,-1455.43 191.83,-1452.56"/>
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.42,-1473.25C247.85,-1469.64 232.14,-1465.3 218,-1461 209.48,-1458.41 200.37,-1455.43 191.83,-1452.56"/>
 <polygon fill="#000000" stroke="#000000" points="192.72,-1449.16 182.13,-1449.25 190.47,-1455.79 192.72,-1449.16"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- module~s_util_append -->
 <g id="module~~walltime_classes~~UsedByGraph_node37" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="332.5,-1452 260.5,-1452 260.5,-1428 332.5,-1428 332.5,-1452"/>
-<text text-anchor="middle" x="296.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>module~s_util_append</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-1452 257,-1452 257,-1428 336,-1428 336,-1452"/>
+<text text-anchor="middle" x="296.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge36" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.3,-1440C239.58,-1440 213.43,-1440 192.5,-1440"/>
-<polygon fill="#000000" stroke="#000000" points="192.38,-1436.5 182.38,-1440 192.38,-1443.5 192.38,-1436.5"/>
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.64,-1440C236.55,-1440 212.17,-1440 192.44,-1440"/>
+<polygon fill="#000000" stroke="#000000" points="192.31,-1436.5 182.31,-1440 192.31,-1443.5 192.31,-1436.5"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- module~s_rmvs_util -->
 <g id="module~~walltime_classes~~UsedByGraph_node38" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node38"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="351,-1410 242,-1410 242,-1386 351,-1386 351,-1410"/>
-<text text-anchor="middle" x="296.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330,-1410 263,-1410 263,-1386 330,-1386 330,-1410"/>
+<text text-anchor="middle" x="296.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge37" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.06,-1410.08C238.79,-1412.89 228,-1415.95 218,-1419 209.48,-1421.59 200.37,-1424.57 191.83,-1427.44"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge38" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.94,-1406.34C249.04,-1410.03 232.67,-1414.53 218,-1419 209.48,-1421.59 200.37,-1424.57 191.83,-1427.44"/>
 <polygon fill="#000000" stroke="#000000" points="190.47,-1424.21 182.13,-1430.75 192.72,-1430.84 190.47,-1424.21"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- program~swiftest_driver -->
 <g id="module~~walltime_classes~~UsedByGraph_node39" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="349.5,-1368 243.5,-1368 243.5,-1344 349.5,-1344 349.5,-1368"/>
-<text text-anchor="middle" x="296.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node39"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="337,-1368 256,-1368 256,-1344 337,-1344 337,-1368"/>
+<text text-anchor="middle" x="296.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge38" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.11,-1366.12C234.4,-1368.93 225.7,-1372.5 218,-1377 199.35,-1387.9 182.46,-1405.87 171.04,-1419.83"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge39" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.66,-1362.54C243.05,-1365.7 229.43,-1370.32 218,-1377 199.35,-1387.9 182.46,-1405.87 171.04,-1419.83"/>
 <polygon fill="#000000" stroke="#000000" points="168.11,-1417.89 164.66,-1427.9 173.61,-1422.22 168.11,-1417.89"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_symba_step -->
 <g id="module~~walltime_classes~~UsedByGraph_node40" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-1326 248.5,-1326 248.5,-1302 344.5,-1302 344.5,-1326"/>
-<text text-anchor="middle" x="296.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="337.5,-1326 255.5,-1326 255.5,-1302 337.5,-1302 337.5,-1326"/>
+<text text-anchor="middle" x="296.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge39" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.15,-1320.66C237.49,-1323.77 226.76,-1328.33 218,-1335 189.98,-1356.34 172.19,-1394.3 163.17,-1418.25"/>
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge40" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.4,-1318.76C242.49,-1321.81 228.76,-1326.81 218,-1335 189.98,-1356.34 172.19,-1394.3 163.17,-1418.25"/>
 <polygon fill="#000000" stroke="#000000" points="159.81,-1417.27 159.74,-1427.87 166.4,-1419.63 159.81,-1417.27"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_symba_util -->
 <g id="module~~walltime_classes~~UsedByGraph_node41" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="340.5,-1284 252.5,-1284 252.5,-1260 340.5,-1260 340.5,-1284"/>
-<text text-anchor="middle" x="296.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="334,-1284 259,-1284 259,-1260 334,-1260 334,-1284"/>
+<text text-anchor="middle" x="296.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge40" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.32,-1276.52C240.11,-1279.59 227.55,-1284.65 218,-1293 180.5,-1325.77 165.09,-1385.02 159.24,-1417.39"/>
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge41" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.71,-1275.09C244.61,-1277.91 229.23,-1283.19 218,-1293 180.5,-1325.77 165.09,-1385.02 159.24,-1417.39"/>
 <polygon fill="#000000" stroke="#000000" points="155.73,-1417.2 157.55,-1427.63 162.63,-1418.34 155.73,-1417.2"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_util_copy -->
 <g id="module~~walltime_classes~~UsedByGraph_node42" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node42"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="327.5,-1242 265.5,-1242 265.5,-1218 327.5,-1218 327.5,-1242"/>
-<text text-anchor="middle" x="296.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-1242 263.5,-1242 263.5,-1218 329.5,-1218 329.5,-1242"/>
+<text text-anchor="middle" x="296.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge41" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.32,-1231.45C249.41,-1233.72 230.64,-1239.01 218,-1251 170.48,-1296.1 159.34,-1378.15 156.76,-1417.62"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge42" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.4,-1231.73C247.92,-1234.15 230.13,-1239.49 218,-1251 170.48,-1296.1 159.34,-1378.15 156.76,-1417.62"/>
 <polygon fill="#000000" stroke="#000000" points="153.26,-1417.6 156.23,-1427.77 160.25,-1417.97 153.26,-1417.6"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_discard -->
 <g id="module~~walltime_classes~~UsedByGraph_node43" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="341,-1200 252,-1200 252,-1176 341,-1176 341,-1200"/>
-<text text-anchor="middle" x="296.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~s_discard</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-1200 267.5,-1200 267.5,-1176 325.5,-1176 325.5,-1200"/>
+<text text-anchor="middle" x="296.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge42" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.99,-1191.63C239.61,-1194.65 227.06,-1199.92 218,-1209 160.29,-1266.85 154.67,-1372.25 155.15,-1417.92"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge43" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.34,-1188.88C250.89,-1190.88 230.9,-1196.07 218,-1209 160.29,-1266.85 154.67,-1372.25 155.15,-1417.92"/>
 <polygon fill="#000000" stroke="#000000" points="151.66,-1418.02 155.37,-1427.94 158.65,-1417.86 151.66,-1418.02"/>
 </g>
 <!-- module~s_util_sort -->
@@ -1043,414 +1043,414 @@ <h3 class="panel-title">Used by</h3>
 </g>
 </g>
 <!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge68" class="edge">
+<g id="module~~walltime_classes~~UsedByGraph_edge44" class="edge">
 <title>module~s_util_sort&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.63,-1146.89C249.43,-1148.96 230.26,-1154.23 218,-1167 183.15,-1203.32 164.1,-1359.61 158.1,-1417.94"/>
 <polygon fill="#000000" stroke="#000000" points="154.62,-1417.64 157.11,-1427.94 161.58,-1418.33 154.62,-1417.64"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_whm_setup -->
 <g id="module~~walltime_classes~~UsedByGraph_node45" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node45"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="337,-1116 256,-1116 256,-1092 337,-1092 337,-1116"/>
-<text text-anchor="middle" x="296.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-1116 257,-1116 257,-1092 336,-1092 336,-1116"/>
+<text text-anchor="middle" x="296.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge43" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.63,-1106.36C241.97,-1109.15 227.69,-1114.6 218,-1125 178.03,-1167.89 161.88,-1353 157.4,-1417.63"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge45" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.83,-1106.12C242.81,-1108.84 227.98,-1114.29 218,-1125 178.03,-1167.89 161.88,-1353 157.4,-1417.63"/>
 <polygon fill="#000000" stroke="#000000" points="153.88,-1417.7 156.71,-1427.91 160.87,-1418.17 153.88,-1417.7"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_resize -->
 <g id="module~~walltime_classes~~UsedByGraph_node46" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-1074 269.5,-1074 269.5,-1050 323.5,-1050 323.5,-1074"/>
-<text text-anchor="middle" x="296.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="332.5,-1074 260.5,-1074 260.5,-1050 332.5,-1050 332.5,-1074"/>
+<text text-anchor="middle" x="296.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge44" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.17,-1062.24C252.16,-1063.86 230.86,-1068.88 218,-1083 172.84,-1132.55 159.9,-1347.05 156.83,-1417.49"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge46" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.3,-1063.37C245.24,-1065.81 228.7,-1071.25 218,-1083 172.84,-1132.55 159.9,-1347.05 156.83,-1417.49"/>
 <polygon fill="#000000" stroke="#000000" points="153.32,-1417.73 156.41,-1427.86 160.32,-1418.02 153.32,-1417.73"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~s_helio_gr -->
 <g id="module~~walltime_classes~~UsedByGraph_node47" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="352.5,-1032 240.5,-1032 240.5,-1008 352.5,-1008 352.5,-1032"/>
-<text text-anchor="middle" x="296.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="327.5,-1032 265.5,-1032 265.5,-1008 327.5,-1008 327.5,-1032"/>
+<text text-anchor="middle" x="296.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge45" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.15,-1026.5C231.77,-1029.72 223.95,-1034.35 218,-1041 167.63,-1097.26 158.13,-1341.41 156.38,-1417.36"/>
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge47" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.29,-1020.58C248.97,-1022.54 229.81,-1027.81 218,-1041 167.63,-1097.26 158.13,-1341.41 156.38,-1417.36"/>
 <polygon fill="#000000" stroke="#000000" points="152.88,-1417.61 156.17,-1427.68 159.88,-1417.76 152.88,-1417.61"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~orbel -->
 <g id="module~~walltime_classes~~UsedByGraph_node48" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335.5,-990 257.5,-990 257.5,-966 335.5,-966 335.5,-990"/>
-<text text-anchor="middle" x="296.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~orbel</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node48"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="323.5,-990 269.5,-990 269.5,-966 323.5,-966 323.5,-990"/>
+<text text-anchor="middle" x="296.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge46" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.33,-979.69C243.03,-982.31 227.87,-987.82 218,-999 162.31,-1062.12 156.5,-1336.94 156.01,-1417.64"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge48" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.39,-978.08C252.25,-979.6 230.73,-984.57 218,-999 162.31,-1062.12 156.5,-1336.94 156.01,-1417.64"/>
 <polygon fill="#000000" stroke="#000000" points="152.51,-1417.69 155.97,-1427.7 159.51,-1417.71 152.51,-1417.69"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_whm_util -->
 <g id="module~~walltime_classes~~UsedByGraph_node49" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="375,-948 218,-948 218,-924 375,-924 375,-948"/>
-<text text-anchor="middle" x="296.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-948 263.5,-948 263.5,-924 329.5,-924 329.5,-948"/>
+<text text-anchor="middle" x="296.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge47" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M228.41,-948.15C224.55,-950.61 221.02,-953.53 218,-957 157,-1026.99 155.03,-1332.42 155.7,-1417.77"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge49" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.21,-936.7C247.3,-938.81 229.17,-944.18 218,-957 157,-1026.99 155.03,-1332.42 155.7,-1417.77"/>
 <polygon fill="#000000" stroke="#000000" points="152.21,-1417.93 155.81,-1427.9 159.21,-1417.86 152.21,-1417.93"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~walltime_classes~~UsedByGraph_node50" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-906 269.5,-906 269.5,-882 323.5,-882 323.5,-906"/>
-<text text-anchor="middle" x="296.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-906 257,-906 257,-882 336,-882 336,-906"/>
+<text text-anchor="middle" x="296.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge48" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.29,-893.99C252.11,-895.47 230.57,-900.43 218,-915 184.62,-953.69 162.4,-1322.31 157.18,-1417.6"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge50" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.8,-895.66C242.6,-898.29 227.65,-903.81 218,-915 184.62,-953.69 162.4,-1322.31 157.18,-1417.6"/>
 <polygon fill="#000000" stroke="#000000" points="153.69,-1417.43 156.64,-1427.6 160.68,-1417.8 153.69,-1417.43"/>
 </g>
-<!-- module~s_whm_coord -->
+<!-- module~s_util_spill -->
 <g id="module~~walltime_classes~~UsedByGraph_node51" class="node">
-<title>module~s_whm_coord</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-864 257,-864 257,-840 336,-840 336,-864"/>
-<text text-anchor="middle" x="296.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-864 266,-864 266,-840 327,-840 327,-864"/>
+<text text-anchor="middle" x="296.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge49" class="edge">
-<title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.75,-853.61C242.54,-856.24 227.6,-861.77 218,-873 181.94,-915.16 161.5,-1318.05 156.97,-1417.76"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge51" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.83,-852.29C249.28,-854.11 229.69,-859.33 218,-873 181.94,-915.16 161.5,-1318.05 156.97,-1417.76"/>
 <polygon fill="#000000" stroke="#000000" points="153.46,-1417.76 156.51,-1427.9 160.46,-1418.07 153.46,-1417.76"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~walltime_classes~~UsedByGraph_node52" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331,-822 262,-822 262,-798 331,-798 331,-822"/>
-<text text-anchor="middle" x="296.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="352.5,-822 240.5,-822 240.5,-798 352.5,-798 352.5,-822"/>
+<text text-anchor="middle" x="296.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge50" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.89,-810.74C246.24,-812.93 228.74,-818.35 218,-831 179.26,-876.63 160.69,-1313.6 156.79,-1417.78"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge52" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.24,-816.09C231.75,-819.34 223.86,-824.09 218,-831 179.26,-876.63 160.69,-1313.6 156.79,-1417.78"/>
 <polygon fill="#000000" stroke="#000000" points="153.29,-1417.69 156.42,-1427.81 160.29,-1417.94 153.29,-1417.69"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~walltime_classes~~UsedByGraph_node53" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329,-780 264,-780 264,-756 329,-756 329,-780"/>
-<text text-anchor="middle" x="296.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="352.5,-780 240.5,-780 240.5,-756 352.5,-756 352.5,-780"/>
+<text text-anchor="middle" x="296.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge51" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.82,-768.45C247.67,-770.45 229.14,-775.79 218,-789 176.6,-838.09 159.95,-1308.87 156.64,-1417.65"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge53" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.21,-774.06C231.71,-777.31 223.84,-782.07 218,-789 176.6,-838.09 159.95,-1308.87 156.64,-1417.65"/>
 <polygon fill="#000000" stroke="#000000" points="153.14,-1417.7 156.34,-1427.8 160.13,-1417.91 153.14,-1417.7"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- module~s_whm_kick -->
 <g id="module~~walltime_classes~~UsedByGraph_node54" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<title>module~s_whm_kick</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-738 261.5,-738 261.5,-714 331.5,-714 331.5,-738"/>
-<text text-anchor="middle" x="296.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<text text-anchor="middle" x="296.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge52" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge54" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.43,-726.74C245.86,-728.95 228.57,-734.39 218,-747 173.92,-799.58 159.25,-1304.66 156.5,-1417.65"/>
 <polygon fill="#000000" stroke="#000000" points="153,-1417.79 156.26,-1427.87 160,-1417.96 153,-1417.79"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~s_symba_discard -->
 <g id="module~~walltime_classes~~UsedByGraph_node55" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-696 261.5,-696 261.5,-672 331.5,-672 331.5,-696"/>
-<text text-anchor="middle" x="296.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-696 248.5,-696 248.5,-672 344.5,-672 344.5,-696"/>
+<text text-anchor="middle" x="296.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge53" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.4,-684.72C245.83,-686.92 228.54,-692.37 218,-705 171.27,-761.03 158.6,-1299.85 156.39,-1417.42"/>
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge55" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.12,-687.41C236.68,-690.53 225.59,-695.9 218,-705 171.27,-761.03 158.6,-1299.85 156.39,-1417.42"/>
 <polygon fill="#000000" stroke="#000000" points="152.88,-1417.67 156.2,-1427.73 159.88,-1417.79 152.88,-1417.67"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_symba_drift -->
 <g id="module~~walltime_classes~~UsedByGraph_node56" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="325.5,-654 267.5,-654 267.5,-630 325.5,-630 325.5,-654"/>
-<text text-anchor="middle" x="296.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-654 257,-654 257,-630 336,-630 336,-654"/>
+<text text-anchor="middle" x="296.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge54" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.22,-642.01C250.3,-643.62 229.84,-648.74 218,-663 168.54,-722.57 157.96,-1296.65 156.27,-1417.67"/>
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge56" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.98,-643.4C242.63,-645.97 227.53,-651.52 218,-663 168.54,-722.57 157.96,-1296.65 156.27,-1417.67"/>
 <polygon fill="#000000" stroke="#000000" points="152.77,-1417.89 156.14,-1427.94 159.77,-1417.99 152.77,-1417.89"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~whm_drift -->
 <g id="module~~walltime_classes~~UsedByGraph_node57" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-612 266,-612 266,-588 327,-588 327,-612"/>
-<text text-anchor="middle" x="296.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~whm_drift</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node57"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="326,-612 267,-612 267,-588 326,-588 326,-612"/>
+<text text-anchor="middle" x="296.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge55" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.66,-600.14C249.05,-601.92 229.46,-607.14 218,-621 165.85,-684.08 157.37,-1292.71 156.18,-1417.65"/>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge57" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.82,-600.03C249.96,-601.68 229.73,-606.82 218,-621 165.85,-684.08 157.37,-1292.71 156.18,-1417.65"/>
 <polygon fill="#000000" stroke="#000000" points="152.68,-1417.88 156.09,-1427.91 159.68,-1417.94 152.68,-1417.88"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~walltime_classes~~UsedByGraph_node58" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="352.5,-570 240.5,-570 240.5,-546 352.5,-546 352.5,-570"/>
-<text text-anchor="middle" x="296.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="353.5,-570 239.5,-570 239.5,-546 353.5,-546 353.5,-570"/>
+<text text-anchor="middle" x="296.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge56" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M240.46,-563.8C231.83,-567.06 223.85,-571.9 218,-579 163.14,-645.6 156.81,-1289.17 156.09,-1417.72"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge58" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.29,-564.25C231.11,-567.51 223.58,-572.22 218,-579 163.14,-645.6 156.81,-1289.17 156.09,-1417.72"/>
 <polygon fill="#000000" stroke="#000000" points="152.59,-1417.91 156.04,-1427.92 159.59,-1417.94 152.59,-1417.91"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~s_util_fill -->
 <g id="module~~walltime_classes~~UsedByGraph_node59" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-528 261.5,-528 261.5,-504 331.5,-504 331.5,-528"/>
-<text text-anchor="middle" x="296.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-528 269.5,-528 269.5,-504 323.5,-504 323.5,-528"/>
+<text text-anchor="middle" x="296.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge57" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.32,-516.64C245.72,-518.83 228.44,-524.29 218,-537 160.42,-607.15 156.27,-1286.04 156.01,-1417.88"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge59" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.44,-515.76C252.09,-517.12 230.29,-522.02 218,-537 160.42,-607.15 156.27,-1286.04 156.01,-1417.88"/>
 <polygon fill="#000000" stroke="#000000" points="152.51,-1417.98 156,-1427.99 159.51,-1417.99 152.51,-1417.98"/>
 </g>
-<!-- module~s_rmvs_step -->
+<!-- module~s_io -->
 <g id="module~~walltime_classes~~UsedByGraph_node60" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-486 260,-486 260,-462 333,-462 333,-486"/>
-<text text-anchor="middle" x="296.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<title>module~s_io</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-486 269.5,-486 269.5,-462 323.5,-462 323.5,-486"/>
+<text text-anchor="middle" x="296.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge59" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.71,-474.86C244.53,-477.19 228.06,-482.7 218,-495 157.74,-568.64 155.76,-1281.82 155.94,-1417.7"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge60" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.42,-473.75C252.07,-475.1 230.27,-480 218,-495 157.74,-568.64 155.76,-1281.82 155.94,-1417.7"/>
 <polygon fill="#000000" stroke="#000000" points="152.44,-1417.77 155.96,-1427.76 159.44,-1417.76 152.44,-1417.77"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_helio_setup -->
 <g id="module~~walltime_classes~~UsedByGraph_node61" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-444 266,-444 266,-420 327,-420 327,-444"/>
-<text text-anchor="middle" x="296.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-444 257,-444 257,-420 336,-420 336,-444"/>
+<text text-anchor="middle" x="296.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge60" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.98,-432.05C249.26,-433.76 229.46,-438.96 218,-453 155.05,-530.14 155.27,-1277.94 155.87,-1417.6"/>
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge61" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.88,-433.32C242.52,-435.88 227.43,-441.44 218,-453 155.05,-530.14 155.27,-1277.94 155.87,-1417.6"/>
 <polygon fill="#000000" stroke="#000000" points="152.37,-1417.92 155.92,-1427.91 159.37,-1417.89 152.37,-1417.92"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_symba_kick -->
 <g id="module~~walltime_classes~~UsedByGraph_node62" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-402 261.5,-402 261.5,-378 331.5,-378 331.5,-402"/>
-<text text-anchor="middle" x="296.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="336,-402 257,-402 257,-378 336,-378 336,-402"/>
+<text text-anchor="middle" x="296.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge61" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.27,-390.61C245.66,-392.78 228.38,-398.24 218,-411 152.34,-491.66 154.8,-1274.26 155.81,-1417.53"/>
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge62" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.87,-391.3C242.5,-393.87 227.42,-399.43 218,-411 152.34,-491.66 154.8,-1274.26 155.81,-1417.53"/>
 <polygon fill="#000000" stroke="#000000" points="152.31,-1417.77 155.89,-1427.74 159.31,-1417.72 152.31,-1417.77"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_fraggle_util -->
 <g id="module~~walltime_classes~~UsedByGraph_node63" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="329.5,-360 263.5,-360 263.5,-336 329.5,-336 329.5,-360"/>
-<text text-anchor="middle" x="296.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="334.5,-360 258.5,-360 258.5,-336 334.5,-336 334.5,-360"/>
+<text text-anchor="middle" x="296.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge62" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.23,-348.34C247.12,-350.32 228.81,-355.69 218,-369 149.63,-453.2 154.35,-1270.92 155.75,-1417.55"/>
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge63" class="edge">
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.46,-349.02C243.62,-351.44 227.75,-356.99 218,-369 149.63,-453.2 154.35,-1270.92 155.75,-1417.55"/>
 <polygon fill="#000000" stroke="#000000" points="152.26,-1417.99 155.86,-1427.96 159.26,-1417.92 152.26,-1417.99"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_util_solve -->
 <g id="module~~walltime_classes~~UsedByGraph_node64" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-318 269.5,-318 269.5,-294 323.5,-294 323.5,-318"/>
-<text text-anchor="middle" x="296.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="330.5,-318 262.5,-318 262.5,-294 330.5,-294 330.5,-318"/>
+<text text-anchor="middle" x="296.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge63" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.38,-305.72C252,-307.05 230.2,-311.94 218,-327 182.38,-370.96 160.09,-1263.69 156.51,-1417.52"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge64" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.43,-306.43C246.51,-308.49 228.62,-313.89 218,-327 182.38,-370.96 160.09,-1263.69 156.51,-1417.52"/>
 <polygon fill="#000000" stroke="#000000" points="153.01,-1417.58 156.28,-1427.66 160.01,-1417.74 153.01,-1417.58"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_helio_step -->
 <g id="module~~walltime_classes~~UsedByGraph_node65" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="353.5,-276 239.5,-276 239.5,-252 353.5,-252 353.5,-276"/>
-<text text-anchor="middle" x="296.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-276 260,-276 260,-252 333,-252 333,-276"/>
+<text text-anchor="middle" x="296.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge64" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M239.19,-270.17C231.02,-273.43 223.52,-278.17 218,-285 181.01,-330.75 159.78,-1260.91 156.46,-1417.67"/>
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge65" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.64,-264.81C244.45,-267.13 227.99,-272.64 218,-285 181.01,-330.75 159.78,-1260.91 156.46,-1417.67"/>
 <polygon fill="#000000" stroke="#000000" points="152.96,-1417.88 156.24,-1427.95 159.95,-1418.03 152.96,-1417.88"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_whm_step -->
 <g id="module~~walltime_classes~~UsedByGraph_node66" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-234 261.5,-234 261.5,-210 331.5,-210 331.5,-234"/>
-<text text-anchor="middle" x="296.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_whm_step</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="333,-234 260,-234 260,-210 333,-210 333,-234"/>
+<text text-anchor="middle" x="296.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge65" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.22,-222.57C245.6,-224.74 228.33,-230.2 218,-243 179.64,-290.54 159.48,-1258.35 156.41,-1417.84"/>
+<!-- module~s_whm_step&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge66" class="edge">
+<title>module~s_whm_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.63,-222.8C244.44,-225.12 227.98,-230.63 218,-243 179.64,-290.54 159.48,-1258.35 156.41,-1417.84"/>
 <polygon fill="#000000" stroke="#000000" points="152.91,-1417.84 156.22,-1427.9 159.91,-1417.97 152.91,-1417.84"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_symba_setup -->
 <g id="module~~walltime_classes~~UsedByGraph_node67" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="344.5,-192 248.5,-192 248.5,-168 344.5,-168 344.5,-192"/>
-<text text-anchor="middle" x="296.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="340.5,-192 252.5,-192 252.5,-168 340.5,-168 340.5,-192"/>
+<text text-anchor="middle" x="296.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge66" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.31,-183.13C236.73,-186.23 225.52,-191.66 218,-201 178.29,-250.29 159.23,-1254.06 156.38,-1417.57"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge37" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.36,-182.14C239.39,-185.02 226.39,-190.58 218,-201 178.29,-250.29 159.23,-1254.06 156.38,-1417.57"/>
 <polygon fill="#000000" stroke="#000000" points="152.87,-1417.81 156.2,-1427.87 159.87,-1417.93 152.87,-1417.81"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_fraggle_generate -->
 <g id="module~~walltime_classes~~UsedByGraph_node68" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-150 269.5,-150 269.5,-126 323.5,-126 323.5,-150"/>
-<text text-anchor="middle" x="296.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="349.5,-150 243.5,-150 243.5,-126 349.5,-126 349.5,-150"/>
+<text text-anchor="middle" x="296.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge67" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.34,-137.69C251.95,-139.01 230.14,-143.9 218,-159 176.91,-210.1 158.94,-1252 156.34,-1417.84"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge68" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.49,-142.56C233.67,-145.82 224.46,-150.96 218,-159 176.91,-210.1 158.94,-1252 156.34,-1417.84"/>
 <polygon fill="#000000" stroke="#000000" points="152.84,-1417.81 156.18,-1427.86 159.84,-1417.92 152.84,-1417.81"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_symba_io -->
 <g id="module~~walltime_classes~~UsedByGraph_node69" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335,-108 258,-108 258,-84 335,-84 335,-108"/>
-<text text-anchor="middle" x="296.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="331.5,-108 261.5,-108 261.5,-84 331.5,-84 331.5,-108"/>
+<text text-anchor="middle" x="296.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge58" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258,-97.03C243.26,-99.48 227.6,-105.04 218,-117 175.56,-169.86 158.7,-1248.08 156.3,-1417.64"/>
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge69" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.2,-96.55C245.57,-98.71 228.3,-104.17 218,-117 175.56,-169.86 158.7,-1248.08 156.3,-1417.64"/>
 <polygon fill="#000000" stroke="#000000" points="152.8,-1417.82 156.16,-1427.87 159.8,-1417.92 152.8,-1417.82"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~s_kick -->
 <g id="module~~walltime_classes~~UsedByGraph_node70" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="335.5,-66 257.5,-66 257.5,-42 335.5,-42 335.5,-66"/>
-<text text-anchor="middle" x="296.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~s_kick</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="323.5,-66 269.5,-66 269.5,-42 323.5,-42 323.5,-66"/>
+<text text-anchor="middle" x="296.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~walltime_classes~~UsedByGraph_edge69" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.18,-55.16C242.68,-57.68 227.42,-63.25 218,-75 174.19,-129.64 158.44,-1245.41 156.27,-1417.73"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~walltime_classes~~UsedByGraph_edge67" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.33,-53.68C251.93,-54.99 230.12,-59.88 218,-75 174.19,-129.64 158.44,-1245.41 156.27,-1417.73"/>
 <polygon fill="#000000" stroke="#000000" points="152.77,-1417.85 156.14,-1427.9 159.77,-1417.94 152.77,-1417.85"/>
 </g>
-<!-- module~s_fraggle_util -->
+<!-- module~drift_implementation -->
 <g id="module~~walltime_classes~~UsedByGraph_node71" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~walltime_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="334.5,-24 258.5,-24 258.5,0 334.5,0 334.5,-24"/>
-<text text-anchor="middle" x="296.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~walltime_classes~~UsedByGraph_node71"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="351,-24 242,-24 242,0 351,0 351,-24"/>
+<text text-anchor="middle" x="296.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
 <g id="module~~walltime_classes~~UsedByGraph_edge70" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.38,-12.95C243.53,-15.37 227.67,-20.92 218,-33 172.81,-89.44 158.2,-1242.96 156.24,-1417.86"/>
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M241.87,-17.08C232.66,-20.36 224.1,-25.38 218,-33 172.81,-89.44 158.2,-1242.96 156.24,-1417.86"/>
 <polygon fill="#000000" stroke="#000000" points="152.74,-1417.9 156.13,-1427.94 159.74,-1417.98 152.74,-1417.9"/>
 </g>
 </g>
diff --git a/docs/module/whm_classes.html b/docs/module/whm_classes.html
index 9bb554e83..39f2e4e58 100644
--- a/docs/module/whm_classes.html
+++ b/docs/module/whm_classes.html
@@ -489,1286 +489,1278 @@ <h3 class="panel-title">Used by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~whm_classes~~UsedByGraph Pages: 1 -->
-<svg id="modulewhm_classesUsedByGraph" width="601pt" height="2888pt"
- viewBox="0.00 0.00 601.00 2888.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="modulewhm_classesUsedByGraph" width="600pt" height="2888pt"
+ viewBox="0.00 0.00 600.00 2888.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="module~~whm_classes~~UsedByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 2884)">
 <title>module~~whm_classes~~UsedByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-2884 597,-2884 597,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-2884 596,-2884 596,4 -4,4"/>
 <!-- module~whm_classes -->
 <g id="module~~whm_classes~~UsedByGraph_node1" class="node">
 <title>module~whm_classes</title>
-<polygon fill="none" stroke="black" points="76,-2254 0,-2254 0,-2230 76,-2230 76,-2254"/>
-<text text-anchor="middle" x="38" y="-2239.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_classes</text>
+<polygon fill="none" stroke="black" points="76,-1390 0,-1390 0,-1366 76,-1366 76,-1390"/>
+<text text-anchor="middle" x="38" y="-1375.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_classes</text>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~s_whm_kick -->
 <g id="module~~whm_classes~~UsedByGraph_node2" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node2"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="189,-2214 112,-2214 112,-2190 189,-2190 189,-2214"/>
-<text text-anchor="middle" x="150.5" y="-2199.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~s_whm_kick</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node2"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="548.5,-2880 478.5,-2880 478.5,-2856 548.5,-2856 548.5,-2880"/>
+<text text-anchor="middle" x="513.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
 </a>
 </g>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge3" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M116.35,-2214C105.63,-2217.88 93.58,-2222.24 82.24,-2226.35"/>
-<polygon fill="#000000" stroke="#000000" points="80.72,-2223.17 72.51,-2229.87 83.11,-2229.76 80.72,-2223.17"/>
+<!-- module~s_whm_kick&#45;&gt;module~whm_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge4" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M478.17,-2862.75C464.13,-2859.6 448.13,-2854.65 435,-2847 385.86,-2818.35 376.62,-2803.28 345,-2756 268.05,-2640.93 262.72,-2601.9 224,-2469 101.79,-2049.52 50.71,-1514.31 40.83,-1400.06"/>
+<polygon fill="#000000" stroke="#000000" points="44.32,-1399.74 39.98,-1390.07 37.34,-1400.33 44.32,-1399.74"/>
 </g>
-<!-- module~s_whm_util -->
-<g id="module~~whm_classes~~UsedByGraph_node3" class="node">
-<title>module~s_whm_util</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node3"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="547.5,-2292 481.5,-2292 481.5,-2268 547.5,-2268 547.5,-2292"/>
-<text text-anchor="middle" x="514.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
+<!-- module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_node7" class="node">
+<title>module~swiftest</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node7"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
+<polygon fill="#337ab7" stroke="#337ab7" points="399,-1410 345,-1410 345,-1386 399,-1386 399,-1410"/>
+<text text-anchor="middle" x="372" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~whm_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge5" class="edge">
-<title>module~s_whm_util&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M481.36,-2279.86C453.09,-2279.77 410.81,-2279.72 374,-2280"/>
+<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge70" class="edge">
+<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.17,-2867.47C462.54,-2865.31 445.27,-2859.85 435,-2847 411.72,-2817.88 378.43,-1601.61 373.59,-1420.46"/>
+<polygon fill="#000000" stroke="#000000" points="377.09,-1420.16 373.32,-1410.26 370.09,-1420.35 377.09,-1420.16"/>
 </g>
-<!-- module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_node10" class="node">
-<title>module~swiftest</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node10"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="400,-1494 346,-1494 346,-1470 400,-1470 400,-1494"/>
-<text text-anchor="middle" x="373" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<!-- module~whm_drift -->
+<g id="module~~whm_classes~~UsedByGraph_node3" class="node">
+<title>module~whm_drift</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node3"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="543,-234 484,-234 484,-210 543,-210 543,-234"/>
+<text text-anchor="middle" x="513.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_util&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge31" class="edge">
-<title>module~s_whm_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M481.35,-2279.57C465.27,-2277.56 446.95,-2272.19 436,-2259 386.54,-2199.43 375.96,-1625.35 374.27,-1504.33"/>
-<polygon fill="#000000" stroke="#000000" points="377.77,-1504.01 374.14,-1494.06 370.77,-1504.11 377.77,-1504.01"/>
+<!-- module~whm_drift&#45;&gt;module~whm_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge5" class="edge">
+<title>module~whm_drift&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M483.84,-217.97C468.57,-214.92 449.92,-209.72 435,-201 401.08,-181.17 401.34,-110.79 373,-138"/>
+</g>
+<!-- module~whm_drift&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge73" class="edge">
+<title>module~whm_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.71,-221.94C466.81,-223.55 446.57,-228.69 435,-243 398.01,-288.75 376.78,-1218.91 373.46,-1375.67"/>
+<polygon fill="#000000" stroke="#000000" points="369.96,-1375.88 373.24,-1385.95 376.95,-1376.03 369.96,-1375.88"/>
 </g>
 <!-- module~s_whm_gr -->
 <g id="module~~whm_classes~~UsedByGraph_node4" class="node">
 <title>module~s_whm_gr</title>
 <g id="a_module~~whm_classes~~UsedByGraph_node4"><a xlink:href=".././module/s_whm_gr.html" xlink:title="s_whm_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="545.5,-2250 483.5,-2250 483.5,-2226 545.5,-2226 545.5,-2250"/>
-<text text-anchor="middle" x="514.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="544.5,-192 482.5,-192 482.5,-168 544.5,-168 544.5,-192"/>
+<text text-anchor="middle" x="513.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_gr</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_gr&#45;&gt;module~whm_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge4" class="edge">
+<g id="module~~whm_classes~~UsedByGraph_edge6" class="edge">
 <title>module~s_whm_gr&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M372,-2280C305.98,-2284.87 290.19,-2267.53 225,-2256 192.25,-2250.21 179.01,-2223.31 151.5,-2242"/>
-<path fill="none" stroke="#000000" d="M483.2,-2245.75C468.83,-2249.54 451.47,-2254.29 436,-2259 408.17,-2267.48 403.09,-2279.78 374,-2280"/>
+<path fill="none" stroke="#000000" d="M482.2,-172.25C467.83,-168.46 450.47,-163.71 435,-159 407.17,-150.52 393.98,-117.85 373,-138"/>
 </g>
 <!-- module~s_whm_gr&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge57" class="edge">
+<g id="module~~whm_classes~~UsedByGraph_edge42" class="edge">
 <title>module~s_whm_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.32,-2237.78C466.8,-2235.95 447.43,-2230.7 436,-2217 389.27,-2160.97 376.6,-1622.15 374.39,-1504.58"/>
-<polygon fill="#000000" stroke="#000000" points="377.88,-1504.21 374.2,-1494.27 370.88,-1504.33 377.88,-1504.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M482.15,-180.09C465.58,-181.86 446.21,-187.11 435,-201 396.64,-248.54 376.48,-1216.35 373.41,-1375.84"/>
+<polygon fill="#000000" stroke="#000000" points="369.91,-1375.84 373.22,-1385.9 376.91,-1375.97 369.91,-1375.84"/>
 </g>
-<!-- module~s_whm_setup -->
+<!-- module~helio_classes -->
 <g id="module~~whm_classes~~UsedByGraph_node5" class="node">
-<title>module~s_whm_setup</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node5"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-486 475,-486 475,-462 554,-462 554,-486"/>
-<text text-anchor="middle" x="514.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
+<title>module~helio_classes</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node5"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="188,-1390 112,-1390 112,-1366 188,-1366 188,-1390"/>
+<text text-anchor="middle" x="150" y="-1375.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_setup&#45;&gt;module~whm_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge6" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M474.73,-464C462.31,-460.66 448.54,-456.82 436,-453 408.17,-444.52 392.75,-409.76 374,-432"/>
-</g>
-<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge34" class="edge">
-<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.88,-475.32C460.52,-477.88 445.43,-483.44 436,-495 373.05,-572.14 373.27,-1319.94 373.87,-1459.6"/>
-<polygon fill="#000000" stroke="#000000" points="370.37,-1459.92 373.92,-1469.91 377.37,-1459.89 370.37,-1459.92"/>
+<!-- module~helio_classes&#45;&gt;module~whm_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge3" class="edge">
+<title>module~helio_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M111.76,-1378C103.61,-1378 94.87,-1378 86.38,-1378"/>
+<polygon fill="#000000" stroke="#000000" points="86.2,-1374.5 76.2,-1378 86.2,-1381.5 86.2,-1374.5"/>
 </g>
 <!-- module~s_whm_coord -->
 <g id="module~~whm_classes~~UsedByGraph_node6" class="node">
 <title>module~s_whm_coord</title>
 <g id="a_module~~whm_classes~~UsedByGraph_node6"><a xlink:href=".././module/s_whm_coord.html" xlink:title="s_whm_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-444 475,-444 475,-420 554,-420 554,-444"/>
-<text text-anchor="middle" x="514.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-150 474,-150 474,-126 553,-126 553,-150"/>
+<text text-anchor="middle" x="513.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_coord</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_coord&#45;&gt;module~whm_classes -->
 <g id="module~~whm_classes~~UsedByGraph_edge7" class="edge">
 <title>module~s_whm_coord&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M481.42,-419.96C448.74,-410.02 399.37,-401.91 374,-432"/>
+<path fill="none" stroke="#000000" d="M477.44,-125.94C445.8,-117.52 400.16,-111.92 373,-138"/>
 </g>
 <!-- module~s_whm_coord&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge74" class="edge">
+<g id="module~~whm_classes~~UsedByGraph_edge26" class="edge">
 <title>module~s_whm_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.87,-433.3C460.5,-435.87 445.42,-441.43 436,-453 370.34,-533.66 372.8,-1316.26 373.81,-1459.53"/>
-<polygon fill="#000000" stroke="#000000" points="370.31,-1459.77 373.89,-1469.74 377.31,-1459.72 370.31,-1459.77"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.81,-139.26C459.43,-141.81 444.36,-147.38 435,-159 395.29,-208.29 376.23,-1212.06 373.38,-1375.57"/>
+<polygon fill="#000000" stroke="#000000" points="369.87,-1375.81 373.2,-1385.87 376.87,-1375.93 369.87,-1375.81"/>
 </g>
-<!-- module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="188.5,-2312 112.5,-2312 112.5,-2288 188.5,-2288 188.5,-2312"/>
-<text text-anchor="middle" x="150.5" y="-2297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge1" class="edge">
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.5,-1343C215.17,-1332.93 188.66,-1293.13 151,-1328"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.29,-1385.85C335.93,-1371.81 301.42,-1349.79 267.5,-1343"/>
+</g>
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge11" class="edge">
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.5,-1343C235.58,-1337.01 202.33,-1349.4 179.41,-1361.05"/>
+<polygon fill="#000000" stroke="#000000" points="177.73,-1357.98 170.55,-1365.78 181.02,-1364.16 177.73,-1357.98"/>
+</g>
+<!-- module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_node10" class="node">
+<title>module~rmvs_classes</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="305,-1315 228,-1315 228,-1291 305,-1291 305,-1315"/>
+<text text-anchor="middle" x="266.5" y="-1300.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge1" class="edge">
-<title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M126.6,-2287.98C110.45,-2279.51 88.61,-2268.04 70.78,-2258.68"/>
-<polygon fill="#000000" stroke="#000000" points="72.35,-2255.55 61.87,-2254 69.09,-2261.75 72.35,-2255.55"/>
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge87" class="edge">
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M361.8,-1385.84C350.42,-1371.27 329.95,-1346.62 309,-1329 305.54,-1326.09 301.72,-1323.27 297.85,-1320.62"/>
+<polygon fill="#000000" stroke="#000000" points="299.7,-1317.64 289.4,-1315.14 295.89,-1323.52 299.7,-1317.64"/>
+</g>
+<!-- module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_node37" class="node">
+<title>module~symba_classes</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node37"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="309,-1410 224,-1410 224,-1386 309,-1386 309,-1410"/>
+<text text-anchor="middle" x="266.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge95" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M344.88,-1398C337.13,-1398 328.36,-1398 319.58,-1398"/>
+<polygon fill="#000000" stroke="#000000" points="319.32,-1394.5 309.32,-1398 319.32,-1401.5 319.32,-1394.5"/>
 </g>
 <!-- module~s_whm_step -->
 <g id="module~~whm_classes~~UsedByGraph_node8" class="node">
 <title>module~s_whm_step</title>
 <g id="a_module~~whm_classes~~UsedByGraph_node8"><a xlink:href=".././module/s_whm_step.html" xlink:title="s_whm_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="551,-402 478,-402 478,-378 551,-378 551,-402"/>
-<text text-anchor="middle" x="514.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="550,-108 477,-108 477,-84 550,-84 550,-108"/>
+<text text-anchor="middle" x="513.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_step</text>
 </a>
 </g>
 </g>
 <!-- module~s_whm_step&#45;&gt;module~whm_classes -->
 <g id="module~~whm_classes~~UsedByGraph_edge8" class="edge">
 <title>module~s_whm_step&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M477.91,-390.41C445.67,-392.83 399.43,-401.83 374,-432"/>
+<path fill="none" stroke="#000000" d="M476.79,-97.87C445.58,-101.37 401,-111.11 373,-138"/>
 </g>
 <!-- module~s_whm_step&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge44" class="edge">
+<g id="module~~whm_classes~~UsedByGraph_edge82" class="edge">
 <title>module~s_whm_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M477.66,-390.83C462.48,-393.15 446.02,-398.66 436,-411 367.63,-495.2 372.35,-1312.92 373.75,-1459.55"/>
-<polygon fill="#000000" stroke="#000000" points="370.26,-1459.99 373.86,-1469.96 377.26,-1459.92 370.26,-1459.99"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M476.61,-96.78C461.42,-99.1 444.96,-104.62 435,-117 393.91,-168.1 375.94,-1210 373.34,-1375.84"/>
+<polygon fill="#000000" stroke="#000000" points="369.84,-1375.81 373.18,-1385.86 376.84,-1375.92 369.84,-1375.81"/>
 </g>
-<!-- module~whm_drift -->
+<!-- module~s_whm_setup -->
 <g id="module~~whm_classes~~UsedByGraph_node9" class="node">
-<title>module~whm_drift</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node9"><a xlink:href=".././module/whm_drift.html" xlink:title="whm_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="544,-360 485,-360 485,-336 544,-336 544,-360"/>
-<text text-anchor="middle" x="514.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift</text>
+<title>module~s_whm_setup</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node9"><a xlink:href=".././module/s_whm_setup.html" xlink:title="s_whm_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-66 474,-66 474,-42 553,-42 553,-66"/>
+<text text-anchor="middle" x="513.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_setup</text>
 </a>
 </g>
 </g>
-<!-- module~whm_drift&#45;&gt;module~whm_classes -->
+<!-- module~s_whm_setup&#45;&gt;module~whm_classes -->
 <g id="module~~whm_classes~~UsedByGraph_edge9" class="edge">
-<title>module~whm_drift&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M484.84,-352.03C469.57,-355.08 450.92,-360.28 436,-369 402.08,-388.83 399.32,-401.96 374,-432"/>
+<title>module~s_whm_setup&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M473.85,-60.25C460.92,-63.41 446.79,-68.11 435,-75 401.08,-94.83 401.34,-110.79 373,-138"/>
 </g>
-<!-- module~whm_drift&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge48" class="edge">
-<title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.72,-347.94C467.83,-349.57 447.58,-354.7 436,-369 400.38,-412.96 378.09,-1305.69 374.51,-1459.52"/>
-<polygon fill="#000000" stroke="#000000" points="371.01,-1459.58 374.28,-1469.66 378.01,-1459.74 371.01,-1459.58"/>
+<!-- module~s_whm_setup&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge61" class="edge">
+<title>module~s_whm_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.79,-55.24C459.41,-57.79 444.34,-63.37 435,-75 392.56,-127.86 375.7,-1206.08 373.3,-1375.64"/>
+<polygon fill="#000000" stroke="#000000" points="369.8,-1375.82 373.16,-1385.87 376.8,-1375.92 369.8,-1375.82"/>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~whm_classes~~UsedByGraph_edge2" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.5,-2242C228.83,-2276.54 193.78,-2213.28 151.5,-2242"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.5,-2242C253.92,-2253.54 211.43,-2234.59 181.79,-2219.04"/>
-<polygon fill="#000000" stroke="#000000" points="183.14,-2215.79 172.67,-2214.15 179.83,-2221.96 183.14,-2215.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.26,-1494.22C365.51,-1587.82 326.41,-2188.91 268.5,-2242"/>
-</g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge20" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.5,-2242C246.38,-2260.45 219.3,-2274.49 196.48,-2284.13"/>
-<polygon fill="#000000" stroke="#000000" points="194.93,-2280.98 186.99,-2287.99 197.57,-2287.47 194.93,-2280.98"/>
-</g>
-<!-- module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_node32" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node32"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="310,-2370 225,-2370 225,-2346 310,-2346 310,-2370"/>
-<text text-anchor="middle" x="267.5" y="-2355.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
-</a>
-</g>
-</g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge96" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M371.53,-1494.21C368.16,-1580.72 346.52,-2102.22 310,-2256 303.12,-2284.96 289.26,-2316.42 279.45,-2336.63"/>
-<polygon fill="#000000" stroke="#000000" points="276.19,-2335.33 274.88,-2345.84 282.46,-2338.44 276.19,-2335.33"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M227.81,-1301.89C203.03,-1303.19 171.53,-1308.99 151,-1328"/>
 </g>
-<!-- module~s_whm_kick -->
+<!-- module~s_whm_util -->
 <g id="module~~whm_classes~~UsedByGraph_node11" class="node">
-<title>module~s_whm_kick</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_whm_kick.html" xlink:title="s_whm_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="549.5,-318 479.5,-318 479.5,-294 549.5,-294 549.5,-318"/>
-<text text-anchor="middle" x="514.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_kick</text>
+<title>module~s_whm_util</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node11"><a xlink:href=".././module/s_whm_util.html" xlink:title="s_whm_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="546.5,-24 480.5,-24 480.5,0 546.5,0 546.5,-24"/>
+<text text-anchor="middle" x="513.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_whm_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~whm_classes -->
+<!-- module~s_whm_util&#45;&gt;module~whm_classes -->
 <g id="module~~whm_classes~~UsedByGraph_edge10" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M372,-432C114.15,-737.89 415.5,-1893.22 189,-2223 178.42,-2238.4 166.93,-2231.46 151.5,-2242"/>
-<path fill="none" stroke="#000000" d="M149.5,-2242C131.25,-2254.3 107.16,-2255.57 86.14,-2253.23"/>
-<polygon fill="#000000" stroke="#000000" points="86.49,-2249.75 76.1,-2251.83 85.52,-2256.68 86.49,-2249.75"/>
-<path fill="none" stroke="#000000" d="M479.31,-309.48C464.81,-312.34 448.42,-317.54 436,-327 392.89,-359.84 408.84,-390.49 374,-432"/>
+<title>module~s_whm_util&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" d="M371,-138C-16.94,-510.54 545.62,-962.54 151,-1328"/>
+<path fill="none" stroke="#000000" d="M480.24,-15.11C465.28,-17.88 447.97,-23.12 435,-33 391.89,-65.84 411.85,-100.22 373,-138"/>
+<path fill="none" stroke="#000000" d="M149,-1328C130.95,-1344.25 106.73,-1356.03 85.61,-1364.06"/>
+<polygon fill="#000000" stroke="#000000" points="84.37,-1360.78 76.16,-1367.48 86.76,-1367.36 84.37,-1360.78"/>
 </g>
-<!-- module~s_whm_kick&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge86" class="edge">
-<title>module~s_whm_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.23,-306.58C463.62,-308.75 446.34,-314.21 436,-327 399.01,-372.75 377.78,-1302.91 374.46,-1459.67"/>
-<polygon fill="#000000" stroke="#000000" points="370.96,-1459.88 374.24,-1469.95 377.95,-1460.03 370.96,-1459.88"/>
+<!-- module~s_whm_util&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge65" class="edge">
+<title>module~s_whm_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.17,-12.28C464.04,-14.25 445.73,-19.62 435,-33 413.08,-60.34 378.8,-1200.32 373.65,-1375.51"/>
+<polygon fill="#000000" stroke="#000000" points="370.15,-1375.53 373.36,-1385.63 377.15,-1375.73 370.15,-1375.53"/>
 </g>
-<!-- module~s_symba_kick -->
+<!-- module~s_fraggle_placeholder -->
 <g id="module~~whm_classes~~UsedByGraph_node12" class="node">
-<title>module~s_symba_kick</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-2712 475,-2712 475,-2688 554,-2688 554,-2712"/>
-<text text-anchor="middle" x="514.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
+<title>module~s_fraggle_placeholder</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node12"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="572.5,-1536 454.5,-1536 454.5,-1512 572.5,-1512 572.5,-1536"/>
+<text text-anchor="middle" x="513.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge27" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.82,-2698.74C460.44,-2696.18 445.37,-2690.61 436,-2679 416.82,-2655.23 380.65,-1667.58 374.81,-1504.65"/>
-<polygon fill="#000000" stroke="#000000" points="378.29,-1504.23 374.44,-1494.37 371.3,-1504.48 378.29,-1504.23"/>
-</g>
-<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge97" class="edge">
-<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M474.73,-2696.5C461.19,-2693.59 446.71,-2688.36 436,-2679 382.61,-2632.34 435.78,-2566.79 374,-2532"/>
+<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge18" class="edge">
+<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M454.28,-1513.62C447.39,-1510.87 440.77,-1507.39 435,-1503 406.98,-1481.66 389.19,-1443.7 380.17,-1419.75"/>
+<polygon fill="#000000" stroke="#000000" points="383.4,-1418.37 376.74,-1410.13 376.81,-1420.73 383.4,-1418.37"/>
 </g>
-<!-- module~s_util_exit -->
+<!-- module~s_gr -->
 <g id="module~~whm_classes~~UsedByGraph_node13" class="node">
-<title>module~s_util_exit</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="544.5,-2208 484.5,-2208 484.5,-2184 544.5,-2184 544.5,-2208"/>
-<text text-anchor="middle" x="514.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
+<title>module~s_gr</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node13"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-1494 486.5,-1494 486.5,-1470 540.5,-1470 540.5,-1494"/>
+<text text-anchor="middle" x="513.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_exit&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge28" class="edge">
-<title>module~s_util_exit&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.12,-2195.84C467.45,-2194.09 447.64,-2188.89 436,-2175 391.92,-2122.42 377.25,-1617.34 374.5,-1504.35"/>
-<polygon fill="#000000" stroke="#000000" points="378,-1504.04 374.26,-1494.13 371,-1504.21 378,-1504.04"/>
+<!-- module~s_gr&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge19" class="edge">
+<title>module~s_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.39,-1478.46C470.69,-1475.5 450.77,-1470.22 435,-1461 416.35,-1450.1 399.46,-1432.13 388.04,-1418.17"/>
+<polygon fill="#000000" stroke="#000000" points="390.61,-1415.78 381.66,-1410.1 385.11,-1420.11 390.61,-1415.78"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- module~s_util_valid -->
 <g id="module~~whm_classes~~UsedByGraph_node14" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node14"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="541.5,-2166 487.5,-2166 487.5,-2142 541.5,-2142 541.5,-2166"/>
-<text text-anchor="middle" x="514.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>module~s_util_valid</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node14"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="546,-1452 481,-1452 481,-1428 546,-1428 546,-1452"/>
+<text text-anchor="middle" x="513.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
 </a>
 </g>
 </g>
-<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge29" class="edge">
-<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.19,-2154.1C469.95,-2152.66 448.4,-2147.71 436,-2133 394.6,-2083.91 377.95,-1613.13 374.64,-1504.35"/>
-<polygon fill="#000000" stroke="#000000" points="378.13,-1504.09 374.34,-1494.2 371.14,-1504.3 378.13,-1504.09"/>
+<!-- module~s_util_valid&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge20" class="edge">
+<title>module~s_util_valid&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.7,-1431.86C466.64,-1428.14 449.94,-1423.55 435,-1419 426.48,-1416.41 417.37,-1413.43 408.83,-1410.56"/>
+<polygon fill="#000000" stroke="#000000" points="409.72,-1407.16 399.13,-1407.25 407.47,-1413.79 409.72,-1407.16"/>
 </g>
-<!-- module~s_symba_drift -->
+<!-- module~s_symba_collision -->
 <g id="module~~whm_classes~~UsedByGraph_node15" class="node">
-<title>module~s_symba_drift</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-2670 475,-2670 475,-2646 554,-2646 554,-2670"/>
-<text text-anchor="middle" x="514.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
+<title>module~s_symba_collision</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node15"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="563,-2418 464,-2418 464,-2394 563,-2394 563,-2418"/>
+<text text-anchor="middle" x="513.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge30" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.83,-2656.73C460.46,-2654.17 445.38,-2648.6 436,-2637 417.49,-2614.1 380.83,-1663.05 374.84,-1504.34"/>
-<polygon fill="#000000" stroke="#000000" points="378.33,-1504.17 374.46,-1494.31 371.34,-1504.44 378.33,-1504.17"/>
+<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge21" class="edge">
+<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M463.78,-2402.36C452.78,-2399.19 442.23,-2393.86 435,-2385 372.05,-2307.86 372.27,-1560.06 372.87,-1420.4"/>
+<polygon fill="#000000" stroke="#000000" points="376.37,-1420.11 372.92,-1410.09 369.37,-1420.08 376.37,-1420.11"/>
 </g>
-<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
+<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
 <g id="module~~whm_classes~~UsedByGraph_edge98" class="edge">
-<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M474.99,-2653.61C461.63,-2650.6 447.2,-2645.53 436,-2637 392.89,-2604.16 421.22,-2558.59 374,-2532"/>
+<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M466.06,-2418.08C455.79,-2420.89 445,-2423.95 435,-2427 407.17,-2435.48 394.58,-2467.52 373,-2448"/>
 </g>
-<!-- module~s_netcdf -->
+<!-- module~s_obl -->
 <g id="module~~whm_classes~~UsedByGraph_node16" class="node">
-<title>module~s_netcdf</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-2124 487.5,-2124 487.5,-2100 541.5,-2100 541.5,-2124"/>
-<text text-anchor="middle" x="514.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
+<title>module~s_obl</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node16"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-1410 486.5,-1410 486.5,-1386 540.5,-1386 540.5,-1410"/>
+<text text-anchor="middle" x="513.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
 </a>
 </g>
 </g>
-<!-- module~s_netcdf&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge35" class="edge">
-<title>module~s_netcdf&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.22,-2112.08C470,-2110.62 448.45,-2105.67 436,-2091 397.26,-2045.37 378.69,-1608.4 374.79,-1504.22"/>
-<polygon fill="#000000" stroke="#000000" points="378.29,-1504.06 374.42,-1494.19 371.29,-1504.31 378.29,-1504.06"/>
+<!-- module~s_obl&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge22" class="edge">
+<title>module~s_obl&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.26,-1398C464.54,-1398 433.43,-1398 409.32,-1398"/>
+<polygon fill="#000000" stroke="#000000" points="409.12,-1394.5 399.12,-1398 409.12,-1401.5 409.12,-1394.5"/>
 </g>
-<!-- module~s_helio_setup -->
+<!-- module~s_fraggle_setup -->
 <g id="module~~whm_classes~~UsedByGraph_node17" class="node">
-<title>module~s_helio_setup</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-2880 475,-2880 475,-2856 554,-2856 554,-2880"/>
-<text text-anchor="middle" x="514.5" y="-2865.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
+<title>module~s_fraggle_setup</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node17"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="558,-1368 469,-1368 469,-1344 558,-1344 558,-1368"/>
+<text text-anchor="middle" x="513.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge22" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M474.73,-2858C462.31,-2854.66 448.54,-2850.82 436,-2847 408.17,-2838.52 401.18,-2836.39 374,-2826"/>
-</g>
-<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge32" class="edge">
-<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.78,-2866.77C460.4,-2864.22 445.33,-2858.64 436,-2847 414.08,-2819.66 379.8,-1679.68 374.65,-1504.49"/>
-<polygon fill="#000000" stroke="#000000" points="378.15,-1504.27 374.36,-1494.37 371.15,-1504.47 378.15,-1504.27"/>
+<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge23" class="edge">
+<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M468.92,-1367.3C457.82,-1370.32 445.94,-1373.67 435,-1377 426.48,-1379.59 417.37,-1382.57 408.83,-1385.44"/>
+<polygon fill="#000000" stroke="#000000" points="407.47,-1382.21 399.13,-1388.75 409.72,-1388.84 407.47,-1382.21"/>
 </g>
-<!-- module~s_util_solve -->
+<!-- module~s_util_coord -->
 <g id="module~~whm_classes~~UsedByGraph_node18" class="node">
-<title>module~s_util_solve</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="548.5,-2082 480.5,-2082 480.5,-2058 548.5,-2058 548.5,-2082"/>
-<text text-anchor="middle" x="514.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
+<title>module~s_util_coord</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node18"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="548.5,-1326 478.5,-1326 478.5,-1302 548.5,-1302 548.5,-1326"/>
+<text text-anchor="middle" x="513.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_solve&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge33" class="edge">
-<title>module~s_util_solve&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.33,-2069.28C464.58,-2067.12 446.87,-2061.71 436,-2049 399.94,-2006.84 379.5,-1603.95 374.97,-1504.24"/>
-<polygon fill="#000000" stroke="#000000" points="378.46,-1503.93 374.51,-1494.1 371.46,-1504.24 378.46,-1503.93"/>
+<!-- module~s_util_coord&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge24" class="edge">
+<title>module~s_util_coord&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.16,-1319.24C464.11,-1322.39 448.12,-1327.33 435,-1335 416.35,-1345.9 399.46,-1363.87 388.04,-1377.83"/>
+<polygon fill="#000000" stroke="#000000" points="385.11,-1375.89 381.66,-1385.9 390.61,-1380.22 385.11,-1375.89"/>
 </g>
-<!-- module~s_rmvs_step -->
+<!-- module~s_symba_encounter_check -->
 <g id="module~~whm_classes~~UsedByGraph_node19" class="node">
-<title>module~s_rmvs_step</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="551,-276 478,-276 478,-252 551,-252 551,-276"/>
-<text text-anchor="middle" x="514.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
+<title>module~s_symba_encounter_check</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node19"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="585,-2376 442,-2376 442,-2352 585,-2352 585,-2376"/>
+<text text-anchor="middle" x="513.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge14" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M477.81,-259.5C463.87,-256.47 448.31,-251.42 436,-243 397.7,-216.81 420.28,-155.58 374,-159"/>
+<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge25" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.82,-2351.83C441.15,-2349.37 437.83,-2346.45 435,-2343 374.74,-2269.36 372.76,-1556.18 372.94,-1420.3"/>
+<polygon fill="#000000" stroke="#000000" points="376.44,-1420.24 372.96,-1410.24 369.44,-1420.23 376.44,-1420.24"/>
 </g>
-<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge84" class="edge">
-<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M477.63,-264.8C462.44,-267.12 445.98,-272.63 436,-285 397.64,-332.54 377.48,-1300.35 374.41,-1459.84"/>
-<polygon fill="#000000" stroke="#000000" points="370.91,-1459.84 374.22,-1469.9 377.91,-1459.97 370.91,-1459.84"/>
+<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge102" class="edge">
+<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M454.4,-2376.08C447.64,-2378.54 441.02,-2381.48 435,-2385 401.08,-2404.83 402.13,-2474.35 373,-2448"/>
 </g>
-<!-- module~s_io -->
+<!-- module~s_util_rescale -->
 <g id="module~~whm_classes~~UsedByGraph_node20" class="node">
-<title>module~s_io</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-2040 487.5,-2040 487.5,-2016 541.5,-2016 541.5,-2040"/>
-<text text-anchor="middle" x="514.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
+<title>module~s_util_rescale</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node20"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="552.5,-1284 474.5,-1284 474.5,-1260 552.5,-1260 552.5,-1284"/>
+<text text-anchor="middle" x="513.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
 </a>
 </g>
 </g>
-<!-- module~s_io&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge36" class="edge">
-<title>module~s_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.29,-2028.01C470.11,-2026.53 448.57,-2021.57 436,-2007 402.62,-1968.31 380.4,-1599.69 375.18,-1504.4"/>
-<polygon fill="#000000" stroke="#000000" points="378.68,-1504.2 374.64,-1494.4 371.69,-1504.57 378.68,-1504.2"/>
+<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge27" class="edge">
+<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.39,-1276.3C460.91,-1279.3 446.31,-1284.38 435,-1293 406.98,-1314.34 389.19,-1352.3 380.17,-1376.25"/>
+<polygon fill="#000000" stroke="#000000" points="376.81,-1375.27 376.74,-1385.87 383.4,-1377.63 376.81,-1375.27"/>
 </g>
-<!-- module~s_rmvs_chk -->
+<!-- module~s_rmvs_step -->
 <g id="module~~whm_classes~~UsedByGraph_node21" class="node">
-<title>module~s_rmvs_chk</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="549.5,-234 479.5,-234 479.5,-210 549.5,-210 549.5,-234"/>
-<text text-anchor="middle" x="514.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
+<title>module~s_rmvs_step</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node21"><a xlink:href=".././module/s_rmvs_step.html" xlink:title="s_rmvs_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="550,-360 477,-360 477,-336 550,-336 550,-360"/>
+<text text-anchor="middle" x="513.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge15" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M479.46,-215.35C465.62,-211.99 449.68,-207.28 436,-201 405.75,-187.12 407.19,-156.55 374,-159"/>
-</g>
-<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge77" class="edge">
-<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.21,-222.56C463.59,-224.73 446.32,-230.19 436,-243 396.29,-292.29 377.23,-1296.06 374.38,-1459.57"/>
-<polygon fill="#000000" stroke="#000000" points="370.87,-1459.81 374.2,-1469.87 377.87,-1459.93 370.87,-1459.81"/>
+<!-- module~s_rmvs_step&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge29" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M476.68,-348.84C461.5,-351.16 445.03,-356.67 435,-369 369.34,-449.66 371.8,-1232.26 372.81,-1375.53"/>
+<polygon fill="#000000" stroke="#000000" points="369.31,-1375.77 372.89,-1385.74 376.31,-1375.72 369.31,-1375.77"/>
 </g>
-<!-- module~s_helio_step -->
+<!-- module~s_rmvs_step&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge91" class="edge">
+<title>module~s_rmvs_step&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M476.92,-355.03C463.44,-358.36 448.18,-362.96 435,-369 404.75,-382.88 396.18,-387.12 373,-411"/>
+</g>
+<!-- module~s_util_get_energy_momentum -->
 <g id="module~~whm_classes~~UsedByGraph_node22" class="node">
-<title>module~s_helio_step</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="551,-2838 478,-2838 478,-2814 551,-2814 551,-2838"/>
-<text text-anchor="middle" x="514.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
+<title>module~s_util_get_energy_momentum</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node22"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="592,-1242 435,-1242 435,-1218 592,-1218 592,-1242"/>
+<text text-anchor="middle" x="513.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge23" class="edge">
-<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M477.84,-2832.83C448.87,-2836.8 407.48,-2838.8 374,-2826"/>
-</g>
-<!-- module~s_helio_step&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge37" class="edge">
-<title>module~s_helio_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M477.6,-2825.22C462.41,-2822.91 445.95,-2817.39 436,-2805 414.77,-2778.56 380.01,-1676.99 374.69,-1504.59"/>
-<polygon fill="#000000" stroke="#000000" points="378.18,-1504.29 374.38,-1494.4 371.19,-1504.5 378.18,-1504.29"/>
+<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge28" class="edge">
+<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.29,-1242.17C443.5,-1244.6 438.99,-1247.51 435,-1251 397.5,-1283.77 382.09,-1343.02 376.24,-1375.39"/>
+<polygon fill="#000000" stroke="#000000" points="372.73,-1375.2 374.55,-1385.63 379.63,-1376.34 372.73,-1375.2"/>
 </g>
-<!-- module~orbel -->
+<!-- module~s_util_index -->
 <g id="module~~whm_classes~~UsedByGraph_node23" class="node">
-<title>module~orbel</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node23"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
-<polygon fill="#337ab7" stroke="#337ab7" points="541.5,-1998 487.5,-1998 487.5,-1974 541.5,-1974 541.5,-1998"/>
-<text text-anchor="middle" x="514.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
+<title>module~s_util_index</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node23"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="548,-1200 479,-1200 479,-1176 548,-1176 548,-1200"/>
+<text text-anchor="middle" x="513.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
 </a>
 </g>
 </g>
-<!-- module~orbel&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge38" class="edge">
-<title>module~orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.34,-1985.97C470.17,-1984.47 448.64,-1979.5 436,-1965 375,-1895.01 373.03,-1589.58 373.7,-1504.23"/>
-<polygon fill="#000000" stroke="#000000" points="377.21,-1504.14 373.81,-1494.1 370.21,-1504.07 377.21,-1504.14"/>
+<!-- module~s_util_index&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge30" class="edge">
+<title>module~s_util_index&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.84,-1189.99C463.74,-1192.51 446.73,-1197.87 435,-1209 387.48,-1254.1 376.34,-1336.15 373.76,-1375.62"/>
+<polygon fill="#000000" stroke="#000000" points="370.26,-1375.6 373.23,-1385.77 377.25,-1375.97 370.26,-1375.6"/>
 </g>
-<!-- module~s_symba_util -->
+<!-- proc~ge_wpp -->
 <g id="module~~whm_classes~~UsedByGraph_node24" class="node">
-<title>module~s_symba_util</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node24"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="552,-2628 477,-2628 477,-2604 552,-2604 552,-2628"/>
-<text text-anchor="middle" x="514.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
+<title>proc~ge_wpp</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node24"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="540.5,-1158 486.5,-1158 486.5,-1134 540.5,-1134 540.5,-1158"/>
+<text text-anchor="middle" x="513.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_util&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge39" class="edge">
-<title>module~s_symba_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M476.85,-2615.06C461.89,-2612.67 445.83,-2607.13 436,-2595 400.38,-2551.04 378.09,-1658.31 374.51,-1504.48"/>
-<polygon fill="#000000" stroke="#000000" points="378.01,-1504.26 374.28,-1494.34 371.01,-1504.42 378.01,-1504.26"/>
-</g>
-<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge102" class="edge">
-<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M476.82,-2610.23C463.36,-2607.06 448.4,-2602.25 436,-2595 402.08,-2575.17 408.23,-2551.28 374,-2532"/>
+<!-- proc~ge_wpp&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge31" class="edge">
+<title>proc~ge_wpp&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.2,-1146.67C469.43,-1148.49 448.39,-1153.58 435,-1167 377.29,-1224.85 371.67,-1330.25 372.15,-1375.92"/>
+<polygon fill="#000000" stroke="#000000" points="368.66,-1376.02 372.37,-1385.94 375.65,-1375.86 368.66,-1376.02"/>
 </g>
-<!-- module~s_symba_collision -->
+<!-- module~s_operator_cross -->
 <g id="module~~whm_classes~~UsedByGraph_node25" class="node">
-<title>module~s_symba_collision</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_symba_collision.html" xlink:title="s_symba_collision">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="564,-2586 465,-2586 465,-2562 564,-2562 564,-2586"/>
-<text text-anchor="middle" x="514.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_collision</text>
+<title>module~s_operator_cross</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node25"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="561.5,-1116 465.5,-1116 465.5,-1092 561.5,-1092 561.5,-1116"/>
+<text text-anchor="middle" x="513.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_collision&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge40" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.75,-2570.38C453.75,-2567.22 443.21,-2561.87 436,-2553 401.75,-2510.81 378.41,-1655.16 374.56,-1504.54"/>
-<polygon fill="#000000" stroke="#000000" points="378.05,-1504.14 374.3,-1494.23 371.06,-1504.32 378.05,-1504.14"/>
-</g>
-<!-- module~s_symba_collision&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge101" class="edge">
-<title>module~s_symba_collision&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M464.91,-2564.91C437.08,-2558.39 402.21,-2547.89 374,-2532"/>
+<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge32" class="edge">
+<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.13,-1108.37C453.97,-1111.51 443.01,-1116.65 435,-1125 400.15,-1161.32 381.1,-1317.61 375.1,-1375.94"/>
+<polygon fill="#000000" stroke="#000000" points="371.62,-1375.64 374.11,-1385.94 378.58,-1376.33 371.62,-1375.64"/>
 </g>
-<!-- module~s_helio_kick -->
+<!-- module~s_fraggle_set -->
 <g id="module~~whm_classes~~UsedByGraph_node26" class="node">
-<title>module~s_helio_kick</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="549.5,-2796 479.5,-2796 479.5,-2772 549.5,-2772 549.5,-2796"/>
-<text text-anchor="middle" x="514.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
+<title>module~s_fraggle_set</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node26"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="552,-1074 475,-1074 475,-1050 552,-1050 552,-1074"/>
+<text text-anchor="middle" x="513.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge24" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M479.42,-2792.75C465.85,-2796.36 450.14,-2800.7 436,-2805 408.17,-2813.48 401.18,-2836.39 374,-2826"/>
-</g>
-<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge42" class="edge">
-<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.2,-2783.45C463.58,-2781.28 446.31,-2775.82 436,-2763 415.43,-2737.43 380.14,-1671.86 374.71,-1504.12"/>
-<polygon fill="#000000" stroke="#000000" points="378.21,-1503.89 374.38,-1494.01 371.21,-1504.11 378.21,-1503.89"/>
+<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge33" class="edge">
+<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.64,-1063.97C460.38,-1066.63 445.17,-1072.09 435,-1083 395.03,-1125.89 378.88,-1311 374.4,-1375.63"/>
+<polygon fill="#000000" stroke="#000000" points="370.88,-1375.7 373.71,-1385.91 377.87,-1376.17 370.88,-1375.7"/>
 </g>
-<!-- module~s_symba_encounter_check -->
+<!-- module~s_fraggle_io -->
 <g id="module~~whm_classes~~UsedByGraph_node27" class="node">
-<title>module~s_symba_encounter_check</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_symba_encounter_check.html" xlink:title="s_symba_encounter_check">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="586,-2544 443,-2544 443,-2520 586,-2520 586,-2544"/>
-<text text-anchor="middle" x="514.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_encounter_check</text>
+<title>module~s_fraggle_io</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node27"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="549,-1032 478,-1032 478,-1008 549,-1008 549,-1032"/>
+<text text-anchor="middle" x="513.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge41" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M445.8,-2519.85C442.14,-2517.38 438.82,-2514.46 436,-2511 403.07,-2470.54 378.69,-1650.1 374.61,-1504.12"/>
-<polygon fill="#000000" stroke="#000000" points="378.1,-1504.01 374.33,-1494.11 371.11,-1504.2 378.1,-1504.01"/>
-</g>
-<!-- module~s_symba_encounter_check&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge100" class="edge">
-<title>module~s_symba_encounter_check&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M459,-2544.04C431.83,-2547.16 399.43,-2546.32 374,-2532"/>
+<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge34" class="edge">
+<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M477.69,-1021.31C462.53,-1023.71 445.8,-1029.15 435,-1041 389.84,-1090.55 376.9,-1305.05 373.83,-1375.49"/>
+<polygon fill="#000000" stroke="#000000" points="370.32,-1375.73 373.41,-1385.86 377.32,-1376.02 370.32,-1375.73"/>
 </g>
-<!-- module~s_helio_gr -->
+<!-- module~s_rmvs_kick -->
 <g id="module~~whm_classes~~UsedByGraph_node28" class="node">
-<title>module~s_helio_gr</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="545.5,-2754 483.5,-2754 483.5,-2730 545.5,-2730 545.5,-2754"/>
-<text text-anchor="middle" x="514.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
+<title>module~s_rmvs_kick</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node28"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="549,-318 478,-318 478,-294 549,-294 549,-318"/>
+<text text-anchor="middle" x="513.5" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge25" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M483.35,-2746.34C468.37,-2749.42 450.44,-2754.56 436,-2763 402.08,-2782.83 413.18,-2823.11 374,-2826"/>
-<path fill="none" stroke="#000000" d="M372,-2826C261.11,-2834.18 175.08,-2423.2 155.64,-2322.19"/>
-<polygon fill="#000000" stroke="#000000" points="159.04,-2321.35 153.73,-2312.18 152.16,-2322.66 159.04,-2321.35"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge35" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M477.86,-306.65C462.35,-308.86 445.28,-314.34 435,-327 366.63,-411.2 371.35,-1228.92 372.75,-1375.55"/>
+<polygon fill="#000000" stroke="#000000" points="369.26,-1375.99 372.86,-1385.96 376.26,-1375.92 369.26,-1375.99"/>
 </g>
-<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge45" class="edge">
-<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.14,-2741.92C466.57,-2740.15 447.19,-2734.9 436,-2721 416.13,-2696.33 380.39,-1669.83 374.76,-1504.4"/>
-<polygon fill="#000000" stroke="#000000" points="378.24,-1503.88 374.4,-1494 371.25,-1504.12 378.24,-1503.88"/>
+<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge93" class="edge">
+<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M477.98,-310.25C463.75,-313.25 447.66,-318.34 435,-327 396.7,-353.19 405.32,-377.71 373,-411"/>
 </g>
-<!-- module~s_symba_step -->
+<!-- module~s_util_set -->
 <g id="module~~whm_classes~~UsedByGraph_node29" class="node">
-<title>module~s_symba_step</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="555.5,-2502 473.5,-2502 473.5,-2478 555.5,-2478 555.5,-2502"/>
-<text text-anchor="middle" x="514.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
+<title>module~s_util_set</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node29"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="542.5,-990 484.5,-990 484.5,-966 542.5,-966 542.5,-990"/>
+<text text-anchor="middle" x="513.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_step&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge43" class="edge">
-<title>module~s_symba_step&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.27,-2488.38C459.4,-2485.7 445.08,-2480.12 436,-2469 404.46,-2430.35 379.08,-1648.1 374.68,-1504.53"/>
-<polygon fill="#000000" stroke="#000000" points="378.17,-1504.19 374.37,-1494.3 371.17,-1504.4 378.17,-1504.19"/>
-</g>
-<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge104" class="edge">
-<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M473.14,-2500.43C461.14,-2503.66 448,-2507.35 436,-2511 408.17,-2519.48 399.35,-2546.28 374,-2532"/>
+<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge36" class="edge">
+<title>module~s_util_set&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.2,-978.36C467.49,-980.14 447.27,-985.29 435,-999 384.63,-1055.26 375.13,-1299.41 373.38,-1375.36"/>
+<polygon fill="#000000" stroke="#000000" points="369.88,-1375.61 373.17,-1385.68 376.88,-1375.76 369.88,-1375.61"/>
 </g>
-<!-- module~s_symba_discard -->
+<!-- module~s_rmvs_io -->
 <g id="module~~whm_classes~~UsedByGraph_node30" class="node">
-<title>module~s_symba_discard</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="562.5,-2460 466.5,-2460 466.5,-2436 562.5,-2436 562.5,-2460"/>
-<text text-anchor="middle" x="514.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
+<title>module~s_rmvs_io</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node30"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="544,-528 483,-528 483,-504 544,-504 544,-528"/>
+<text text-anchor="middle" x="513.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge46" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M466.41,-2444.79C454.83,-2441.69 443.59,-2436.28 436,-2427 375.74,-2353.36 373.76,-1640.18 373.94,-1504.3"/>
-<polygon fill="#000000" stroke="#000000" points="377.44,-1504.24 373.96,-1494.24 370.44,-1504.23 377.44,-1504.24"/>
+<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge37" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M482.65,-516.13C466.02,-517.9 446.43,-523.12 435,-537 380.14,-603.6 373.81,-1247.17 373.09,-1375.72"/>
+<polygon fill="#000000" stroke="#000000" points="369.59,-1375.91 373.04,-1385.92 376.59,-1375.94 369.59,-1375.91"/>
 </g>
-<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge105" class="edge">
-<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M466.41,-2456.5C455.97,-2459.52 445.27,-2463.58 436,-2469 402.08,-2488.83 408.23,-2551.28 374,-2532"/>
+<!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge88" class="edge">
+<title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M482.94,-512.72C467.6,-509.9 449.15,-504.68 435,-495 396.7,-468.81 405.32,-377.71 373,-411"/>
 </g>
-<!-- module~s_rmvs_discard -->
+<!-- module~s_util_version -->
 <g id="module~~whm_classes~~UsedByGraph_node31" class="node">
-<title>module~s_rmvs_discard</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="558.5,-192 470.5,-192 470.5,-168 558.5,-168 558.5,-192"/>
-<text text-anchor="middle" x="514.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
+<title>module~s_util_version</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node31"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="552.5,-948 474.5,-948 474.5,-924 552.5,-924 552.5,-948"/>
+<text text-anchor="middle" x="513.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge16" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M470.33,-168.45C442.87,-162.36 406.49,-156.6 374,-159"/>
+<!-- module~s_util_version&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge38" class="edge">
+<title>module~s_util_version&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.33,-937.69C460.03,-940.31 444.87,-945.82 435,-957 379.31,-1020.12 373.5,-1294.94 373.01,-1375.64"/>
+<polygon fill="#000000" stroke="#000000" points="369.51,-1375.69 372.97,-1385.7 376.51,-1375.71 369.51,-1375.69"/>
 </g>
-<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge47" class="edge">
-<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.35,-182.13C457.38,-185.01 444.39,-190.57 436,-201 394.91,-252.1 376.94,-1294 374.34,-1459.84"/>
-<polygon fill="#000000" stroke="#000000" points="370.84,-1459.81 374.18,-1469.86 377.84,-1459.92 370.84,-1459.81"/>
+<!-- module~s_tides_step_spin -->
+<g id="module~~whm_classes~~UsedByGraph_node32" class="node">
+<title>module~s_tides_step_spin</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node32"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="562.5,-906 464.5,-906 464.5,-882 562.5,-882 562.5,-906"/>
+<text text-anchor="middle" x="513.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+</a>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge12" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.35,-2345.75C250.63,-2321.28 223.97,-2265.45 189,-2228 186.42,-2225.23 183.49,-2222.59 180.44,-2220.12"/>
-<polygon fill="#000000" stroke="#000000" points="182.34,-2217.18 172.22,-2214.04 178.17,-2222.81 182.34,-2217.18"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge21" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M242.67,-2345.98C225.79,-2337.47 202.92,-2325.93 184.31,-2316.55"/>
-<polygon fill="#000000" stroke="#000000" points="185.8,-2313.38 175.3,-2312 182.65,-2319.63 185.8,-2313.38"/>
+<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge39" class="edge">
+<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.17,-897.97C453.16,-901.13 442.51,-906.38 435,-915 374,-984.99 372.03,-1290.42 372.7,-1375.77"/>
+<polygon fill="#000000" stroke="#000000" points="369.21,-1375.93 372.81,-1385.9 376.21,-1375.86 369.21,-1375.93"/>
 </g>
-<!-- module~s_rmvs_util -->
+<!-- proc~solve_wbs -->
 <g id="module~~whm_classes~~UsedByGraph_node33" class="node">
-<title>module~s_rmvs_util</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node33"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="548,-150 481,-150 481,-126 548,-126 548,-150"/>
-<text text-anchor="middle" x="514.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
+<title>proc~solve_wbs</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node33"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="544.5,-864 482.5,-864 482.5,-840 544.5,-840 544.5,-864"/>
+<text text-anchor="middle" x="513.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge17" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M480.96,-144.33C452.79,-149.46 410.88,-156.28 374,-159"/>
-</g>
-<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge49" class="edge">
-<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.78,-138.34C464.75,-140.35 446.65,-145.74 436,-159 393.56,-211.86 376.7,-1290.08 374.3,-1459.64"/>
-<polygon fill="#000000" stroke="#000000" points="370.8,-1459.82 374.16,-1469.87 377.8,-1459.92 370.8,-1459.82"/>
+<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge40" class="edge">
+<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M482.49,-852.37C466.03,-854.24 446.66,-859.49 435,-873 401.62,-911.69 379.4,-1280.31 374.18,-1375.6"/>
+<polygon fill="#000000" stroke="#000000" points="370.69,-1375.43 373.64,-1385.6 377.68,-1375.8 370.69,-1375.43"/>
 </g>
-<!-- module~s_rmvs_io -->
+<!-- module~s_orbel -->
 <g id="module~~whm_classes~~UsedByGraph_node34" class="node">
-<title>module~s_rmvs_io</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_rmvs_io.html" xlink:title="s_rmvs_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="545,-108 484,-108 484,-84 545,-84 545,-108"/>
-<text text-anchor="middle" x="514.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_io</text>
+<title>module~s_orbel</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node34"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-822 486.5,-822 486.5,-798 540.5,-798 540.5,-822"/>
+<text text-anchor="middle" x="513.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_io&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge18" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M484,-101.58C469.18,-104.98 451.21,-110.03 436,-117 405.75,-130.88 407.19,-156.55 374,-159"/>
-</g>
-<!-- module~s_rmvs_io&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge54" class="edge">
-<title>module~s_rmvs_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.9,-95.98C467.14,-97.67 447.34,-102.86 436,-117 392.19,-171.64 376.44,-1287.41 374.27,-1459.73"/>
-<polygon fill="#000000" stroke="#000000" points="370.77,-1459.85 374.14,-1469.9 377.77,-1459.94 370.77,-1459.85"/>
+<!-- module~s_orbel&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge41" class="edge">
+<title>module~s_orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.25,-809.95C469.05,-811.42 447.5,-816.38 435,-831 398.94,-873.16 378.5,-1276.05 373.97,-1375.76"/>
+<polygon fill="#000000" stroke="#000000" points="370.46,-1375.76 373.51,-1385.9 377.46,-1376.07 370.46,-1375.76"/>
 </g>
-<!-- module~s_fraggle_io -->
+<!-- module~s_rmvs_chk -->
 <g id="module~~whm_classes~~UsedByGraph_node35" class="node">
-<title>module~s_fraggle_io</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_fraggle_io.html" xlink:title="s_fraggle_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="550,-1956 479,-1956 479,-1932 550,-1932 550,-1956"/>
-<text text-anchor="middle" x="514.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_io</text>
+<title>module~s_rmvs_chk</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node35"><a xlink:href=".././module/s_rmvs_chk.html" xlink:title="s_rmvs_chk">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="548.5,-486 478.5,-486 478.5,-462 548.5,-462 548.5,-486"/>
+<text text-anchor="middle" x="513.5" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_chk</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_io&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge50" class="edge">
-<title>module~s_fraggle_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.92,-1942.91C463.61,-1940.57 446.7,-1935.13 436,-1923 380.31,-1859.88 374.5,-1585.06 374.01,-1504.36"/>
-<polygon fill="#000000" stroke="#000000" points="377.51,-1504.29 373.97,-1494.3 370.51,-1504.31 377.51,-1504.29"/>
+<!-- module~s_rmvs_chk&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge43" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.32,-474.64C462.72,-476.83 445.44,-482.29 435,-495 377.42,-565.15 373.27,-1244.04 373.01,-1375.88"/>
+<polygon fill="#000000" stroke="#000000" points="369.51,-1375.98 373,-1385.99 376.51,-1375.99 369.51,-1375.98"/>
 </g>
-<!-- module~s_rmvs_kick -->
+<!-- module~s_rmvs_chk&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge89" class="edge">
+<title>module~s_rmvs_chk&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M478.46,-467.35C464.62,-463.99 448.68,-459.28 435,-453 404.75,-439.12 396.18,-387.12 373,-411"/>
+</g>
+<!-- module~s_fraggle_regime -->
 <g id="module~~whm_classes~~UsedByGraph_node36" class="node">
-<title>module~s_rmvs_kick</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_rmvs_kick.html" xlink:title="s_rmvs_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="550,-66 479,-66 479,-42 550,-42 550,-66"/>
-<text text-anchor="middle" x="514.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_kick</text>
+<title>module~s_fraggle_regime</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node36"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="561.5,-780 465.5,-780 465.5,-756 561.5,-756 561.5,-780"/>
+<text text-anchor="middle" x="513.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_kick&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge19" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M478.98,-58.25C464.75,-61.25 448.66,-66.34 436,-75 397.7,-101.19 420.28,-155.58 374,-159"/>
-</g>
-<!-- module~s_rmvs_kick&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge52" class="edge">
-<title>module~s_rmvs_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.78,-54.59C463.26,-56.79 446.19,-62.27 436,-75 413.4,-103.23 379.59,-1281.85 374.62,-1459.64"/>
-<polygon fill="#000000" stroke="#000000" points="371.12,-1459.58 374.34,-1469.67 378.12,-1459.78 371.12,-1459.58"/>
-</g>
-<!-- module~s_util_append -->
-<g id="module~~whm_classes~~UsedByGraph_node37" class="node">
-<title>module~s_util_append</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node37"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-1914 475,-1914 475,-1890 554,-1890 554,-1914"/>
-<text text-anchor="middle" x="514.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
-</a>
-</g>
+<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge44" class="edge">
+<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.22,-771.5C453.79,-774.62 442.67,-779.97 435,-789 396.26,-834.63 377.69,-1271.6 373.79,-1375.78"/>
+<polygon fill="#000000" stroke="#000000" points="370.29,-1375.69 373.42,-1385.81 377.29,-1375.94 370.29,-1375.69"/>
 </g>
-<!-- module~s_util_append&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge51" class="edge">
-<title>module~s_util_append&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.61,-1900.08C460.55,-1897.4 445.76,-1891.91 436,-1881 385.63,-1824.74 376.13,-1580.59 374.38,-1504.64"/>
-<polygon fill="#000000" stroke="#000000" points="377.88,-1504.24 374.17,-1494.32 370.88,-1504.39 377.88,-1504.24"/>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge12" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M223.84,-1390.72C215.57,-1389.28 206.82,-1387.75 198.37,-1386.27"/>
+<polygon fill="#000000" stroke="#000000" points="198.72,-1382.78 188.27,-1384.51 197.52,-1389.68 198.72,-1382.78"/>
 </g>
-<!-- module~s_util_fill -->
+<!-- module~s_util_exit -->
 <g id="module~~whm_classes~~UsedByGraph_node38" class="node">
-<title>module~s_util_fill</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-1872 487.5,-1872 487.5,-1848 541.5,-1848 541.5,-1872"/>
-<text text-anchor="middle" x="514.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
+<title>module~s_util_exit</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node38"><a xlink:href=".././module/s_util_exit.html" xlink:title="s_util_exit">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="543.5,-738 483.5,-738 483.5,-714 543.5,-714 543.5,-738"/>
+<text text-anchor="middle" x="513.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_exit</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_fill&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge53" class="edge">
-<title>module~s_util_fill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.17,-1859.76C470.16,-1858.14 448.86,-1853.12 436,-1839 390.84,-1789.45 377.9,-1574.95 374.83,-1504.51"/>
-<polygon fill="#000000" stroke="#000000" points="378.32,-1503.98 374.41,-1494.14 371.32,-1504.27 378.32,-1503.98"/>
+<!-- module~s_util_exit&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge45" class="edge">
+<title>module~s_util_exit&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.15,-726.19C466.49,-727.95 446.68,-733.15 435,-747 393.6,-796.09 376.95,-1266.87 373.64,-1375.65"/>
+<polygon fill="#000000" stroke="#000000" points="370.14,-1375.7 373.34,-1385.8 377.13,-1375.91 370.14,-1375.7"/>
 </g>
-<!-- module~s_fraggle_placeholder -->
+<!-- module~s_netcdf -->
 <g id="module~~whm_classes~~UsedByGraph_node39" class="node">
-<title>module~s_fraggle_placeholder</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_fraggle_placeholder.html" xlink:title="s_fraggle_placeholder">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="573.5,-1830 455.5,-1830 455.5,-1806 573.5,-1806 573.5,-1830"/>
-<text text-anchor="middle" x="514.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_placeholder</text>
+<title>module~s_netcdf</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node39"><a xlink:href=".././module/s_netcdf.html" xlink:title="s_netcdf">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-696 486.5,-696 486.5,-672 540.5,-672 540.5,-696"/>
+<text text-anchor="middle" x="513.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_netcdf</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_placeholder&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge55" class="edge">
-<title>module~s_fraggle_placeholder&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M455.25,-1810.03C448.03,-1806.93 441.32,-1802.71 436,-1797 396.03,-1754.11 379.88,-1569 375.4,-1504.37"/>
-<polygon fill="#000000" stroke="#000000" points="378.87,-1503.83 374.71,-1494.09 371.88,-1504.3 378.87,-1503.83"/>
+<!-- module~s_netcdf&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge46" class="edge">
+<title>module~s_netcdf&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.16,-683.88C468.91,-685.31 447.36,-690.26 435,-705 390.92,-757.58 376.25,-1262.66 373.5,-1375.65"/>
+<polygon fill="#000000" stroke="#000000" points="370,-1375.79 373.26,-1385.87 377,-1375.96 370,-1375.79"/>
 </g>
-<!-- module~s_rmvs_setup -->
+<!-- module~s_rmvs_discard -->
 <g id="module~~whm_classes~~UsedByGraph_node40" class="node">
-<title>module~s_rmvs_setup</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="554,-24 475,-24 475,0 554,0 554,-24"/>
-<text text-anchor="middle" x="514.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
+<title>module~s_rmvs_discard</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node40"><a xlink:href=".././module/s_rmvs_discard.html" xlink:title="s_rmvs_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="557.5,-444 469.5,-444 469.5,-420 557.5,-420 557.5,-444"/>
+<text text-anchor="middle" x="513.5" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge13" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" d="M474.62,-15.93C461.22,-18.89 446.87,-24.05 436,-33 387.83,-72.68 436.24,-154.41 374,-159"/>
-<path fill="none" stroke="#000000" d="M372,-159C158.36,-174.77 151.51,-1959.53 151.47,-2179.79"/>
-<polygon fill="#000000" stroke="#000000" points="147.97,-2179.84 151.48,-2189.84 154.97,-2179.84 147.97,-2179.84"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge47" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M469.45,-434.22C456.49,-437.1 443.48,-442.64 435,-453 374.74,-526.64 372.76,-1239.82 372.94,-1375.7"/>
+<polygon fill="#000000" stroke="#000000" points="369.44,-1375.77 372.96,-1385.76 376.44,-1375.76 369.44,-1375.77"/>
 </g>
-<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge56" class="edge">
-<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M474.77,-13.22C460.38,-15.77 445.31,-21.35 436,-33 412.72,-62.12 379.43,-1278.39 374.59,-1459.54"/>
-<polygon fill="#000000" stroke="#000000" points="371.09,-1459.65 374.32,-1469.74 378.09,-1459.84 371.09,-1459.65"/>
+<!-- module~s_rmvs_discard&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge90" class="edge">
+<title>module~s_rmvs_discard&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M469.42,-421.99C430.97,-413.62 379.72,-404.08 373,-411"/>
 </g>
-<!-- module~s_tides_step_spin -->
+<!-- module~s_helio_drift -->
 <g id="module~~whm_classes~~UsedByGraph_node41" class="node">
-<title>module~s_tides_step_spin</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_tides_step_spin.html" xlink:title="s_tides_step_spin">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="563.5,-1788 465.5,-1788 465.5,-1764 563.5,-1764 563.5,-1788"/>
-<text text-anchor="middle" x="514.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_step_spin</text>
+<title>module~s_helio_drift</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node41"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="548.5,-2838 478.5,-2838 478.5,-2814 548.5,-2814 548.5,-2838"/>
+<text text-anchor="middle" x="513.5" y="-2823.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_step_spin&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge58" class="edge">
-<title>module~s_tides_step_spin&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.33,-1771.4C454.45,-1768.24 443.82,-1763.15 436,-1755 401.15,-1718.68 382.1,-1562.39 376.1,-1504.06"/>
-<polygon fill="#000000" stroke="#000000" points="379.58,-1503.67 375.11,-1494.06 372.62,-1504.36 379.58,-1503.67"/>
+<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge15" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M478.16,-2820.76C464.11,-2817.61 448.12,-2812.67 435,-2805 401.08,-2785.17 405.22,-2764.48 373,-2742"/>
 </g>
-<!-- module~s_obl -->
+<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge49" class="edge">
+<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.18,-2825.47C462.55,-2823.31 445.28,-2817.84 435,-2805 412.4,-2776.77 378.59,-1598.15 373.62,-1420.36"/>
+<polygon fill="#000000" stroke="#000000" points="377.12,-1420.22 373.34,-1410.33 370.12,-1420.42 377.12,-1420.22"/>
+</g>
+<!-- module~s_util_peri -->
 <g id="module~~whm_classes~~UsedByGraph_node42" class="node">
-<title>module~s_obl</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_obl.html" xlink:title="s_obl">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-1746 487.5,-1746 487.5,-1722 541.5,-1722 541.5,-1746"/>
-<text text-anchor="middle" x="514.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_obl</text>
+<title>module~s_util_peri</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node42"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="544,-654 483,-654 483,-630 544,-630 544,-654"/>
+<text text-anchor="middle" x="513.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
 </a>
 </g>
 </g>
-<!-- module~s_obl&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge59" class="edge">
-<title>module~s_obl&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.2,-1733.33C470.43,-1731.51 449.39,-1726.42 436,-1713 378.29,-1655.15 372.67,-1549.75 373.15,-1504.08"/>
-<polygon fill="#000000" stroke="#000000" points="376.65,-1504.14 373.37,-1494.06 369.66,-1503.98 376.65,-1504.14"/>
+<!-- module~s_util_peri&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge48" class="edge">
+<title>module~s_util_peri&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M482.71,-642.18C466.11,-643.97 446.52,-649.19 435,-663 388.27,-719.03 375.6,-1257.85 373.39,-1375.42"/>
+<polygon fill="#000000" stroke="#000000" points="369.88,-1375.67 373.2,-1385.73 376.88,-1375.79 369.88,-1375.67"/>
 </g>
-<!-- module~s_discard -->
+<!-- module~s_setup -->
 <g id="module~~whm_classes~~UsedByGraph_node43" class="node">
-<title>module~s_discard</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="543.5,-1704 485.5,-1704 485.5,-1680 543.5,-1680 543.5,-1704"/>
-<text text-anchor="middle" x="514.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
+<title>module~s_setup</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node43"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-612 486.5,-612 486.5,-588 540.5,-588 540.5,-612"/>
+<text text-anchor="middle" x="513.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_discard&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge60" class="edge">
-<title>module~s_discard&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M485.21,-1690.81C468.93,-1688.69 449.15,-1683.47 436,-1671 388.48,-1625.9 377.34,-1543.85 374.76,-1504.38"/>
-<polygon fill="#000000" stroke="#000000" points="378.25,-1504.03 374.23,-1494.23 371.26,-1504.4 378.25,-1504.03"/>
+<!-- module~s_setup&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge50" class="edge">
+<title>module~s_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.49,-599.81C469.16,-601.18 447.38,-606.09 435,-621 385.54,-680.57 374.96,-1254.65 373.27,-1375.67"/>
+<polygon fill="#000000" stroke="#000000" points="369.77,-1375.89 373.14,-1385.94 376.77,-1375.99 369.77,-1375.89"/>
 </g>
-<!-- module~s_util_resize -->
+<!-- module~s_helio_kick -->
 <g id="module~~whm_classes~~UsedByGraph_node44" class="node">
-<title>module~s_util_resize</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="550.5,-1662 478.5,-1662 478.5,-1638 550.5,-1638 550.5,-1662"/>
-<text text-anchor="middle" x="514.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
+<title>module~s_helio_kick</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node44"><a xlink:href=".././module/s_helio_kick.html" xlink:title="s_helio_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="548.5,-2796 478.5,-2796 478.5,-2772 548.5,-2772 548.5,-2796"/>
+<text text-anchor="middle" x="513.5" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_resize&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge61" class="edge">
-<title>module~s_util_resize&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.29,-1647.22C463.77,-1644.48 447.65,-1639.18 436,-1629 398.5,-1596.23 383.09,-1536.98 377.24,-1504.61"/>
-<polygon fill="#000000" stroke="#000000" points="380.63,-1503.66 375.55,-1494.37 373.73,-1504.8 380.63,-1503.66"/>
+<!-- module~s_helio_kick&#45;&gt;module~helio_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge17" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M478.34,-2779.83C448.36,-2774.82 404.73,-2764.15 373,-2742"/>
 </g>
-<!-- module~drift_implementation -->
+<!-- module~s_helio_kick&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge51" class="edge">
+<title>module~s_helio_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.19,-2783.46C462.56,-2781.3 445.29,-2775.83 435,-2763 391.19,-2708.36 375.44,-1592.59 373.27,-1420.27"/>
+<polygon fill="#000000" stroke="#000000" points="376.77,-1420.06 373.14,-1410.1 369.77,-1420.15 376.77,-1420.06"/>
+</g>
+<!-- module~s_util_append -->
 <g id="module~~whm_classes~~UsedByGraph_node45" class="node">
-<title>module~drift_implementation</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node45"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="569,-1620 460,-1620 460,-1596 569,-1596 569,-1620"/>
-<text text-anchor="middle" x="514.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
+<title>module~s_util_append</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node45"><a xlink:href=".././module/s_util_append.html" xlink:title="s_util_append">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-570 474,-570 474,-546 553,-546 553,-570"/>
+<text text-anchor="middle" x="513.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_append</text>
 </a>
 </g>
 </g>
-<!-- module~drift_implementation&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge62" class="edge">
-<title>module~drift_implementation&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.68,-1599.26C451.23,-1596.3 442.99,-1592.32 436,-1587 407.98,-1565.66 390.19,-1527.7 381.17,-1503.75"/>
-<polygon fill="#000000" stroke="#000000" points="384.4,-1502.37 377.74,-1494.13 377.81,-1504.73 384.4,-1502.37"/>
+<!-- module~s_util_append&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge52" class="edge">
+<title>module~s_util_append&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.96,-559.38C459.6,-561.95 444.5,-567.5 435,-579 382.85,-642.08 374.37,-1250.71 373.18,-1375.65"/>
+<polygon fill="#000000" stroke="#000000" points="369.68,-1375.88 373.09,-1385.91 376.68,-1375.94 369.68,-1375.88"/>
 </g>
-<!-- module~s_fraggle_generate -->
+<!-- module~s_rmvs_util -->
 <g id="module~~whm_classes~~UsedByGraph_node46" class="node">
-<title>module~s_fraggle_generate</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="567.5,-1578 461.5,-1578 461.5,-1554 567.5,-1554 567.5,-1578"/>
-<text text-anchor="middle" x="514.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
+<title>module~s_rmvs_util</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node46"><a xlink:href=".././module/s_rmvs_util.html" xlink:title="s_rmvs_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="547,-402 480,-402 480,-378 547,-378 547,-402"/>
+<text text-anchor="middle" x="513.5" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge63" class="edge">
-<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.11,-1555.88C452.4,-1553.07 443.7,-1549.5 436,-1545 417.35,-1534.1 400.46,-1516.13 389.04,-1502.17"/>
-<polygon fill="#000000" stroke="#000000" points="391.61,-1499.78 382.66,-1494.1 386.11,-1504.11 391.61,-1499.78"/>
+<!-- module~s_rmvs_util&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge54" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.87,-390.41C463.86,-392.44 445.75,-397.82 435,-411 372.05,-488.14 372.27,-1235.94 372.87,-1375.6"/>
+<polygon fill="#000000" stroke="#000000" points="369.37,-1375.92 372.92,-1385.91 376.37,-1375.89 369.37,-1375.92"/>
 </g>
-<!-- module~s_operator_cross -->
+<!-- module~s_rmvs_util&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge94" class="edge">
+<title>module~s_rmvs_util&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M479.88,-384.78C447.96,-381.71 400.3,-382.88 373,-411"/>
+</g>
+<!-- program~swiftest_driver -->
 <g id="module~~whm_classes~~UsedByGraph_node47" class="node">
-<title>module~s_operator_cross</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node47"><a xlink:href=".././module/s_operator_cross.html" xlink:title="s_operator_cross">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="562.5,-1536 466.5,-1536 466.5,-1512 562.5,-1512 562.5,-1536"/>
-<text text-anchor="middle" x="514.5" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_operator_cross</text>
+<title>program~swiftest_driver</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node47"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="554,-2250 473,-2250 473,-2226 554,-2226 554,-2250"/>
+<text text-anchor="middle" x="513.5" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
 </a>
 </g>
 </g>
-<!-- module~s_operator_cross&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge64" class="edge">
-<title>module~s_operator_cross&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.06,-1511.92C456.79,-1509.11 446,-1506.05 436,-1503 427.48,-1500.41 418.37,-1497.43 409.83,-1494.56"/>
-<polygon fill="#000000" stroke="#000000" points="410.72,-1491.16 400.13,-1491.25 408.47,-1497.79 410.72,-1491.16"/>
+<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge55" class="edge">
+<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M472.75,-2236.4C458.76,-2233.73 444.24,-2228.17 435,-2217 382.85,-2153.92 374.37,-1545.29 373.18,-1420.35"/>
+<polygon fill="#000000" stroke="#000000" points="376.68,-1420.06 373.09,-1410.09 369.68,-1420.12 376.68,-1420.06"/>
 </g>
-<!-- module~s_symba_setup -->
+<!-- module~s_symba_step -->
 <g id="module~~whm_classes~~UsedByGraph_node48" class="node">
-<title>module~s_symba_setup</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="558.5,-2418 470.5,-2418 470.5,-2394 558.5,-2394 558.5,-2418"/>
-<text text-anchor="middle" x="514.5" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
+<title>module~s_symba_step</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node48"><a xlink:href=".././module/s_symba_step.html" xlink:title="s_symba_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="554.5,-2334 472.5,-2334 472.5,-2310 554.5,-2310 554.5,-2334"/>
+<text text-anchor="middle" x="513.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge65" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.47,-2403.77C457.51,-2400.88 444.49,-2395.34 436,-2385 378.42,-2314.85 374.27,-1635.96 374.01,-1504.12"/>
-<polygon fill="#000000" stroke="#000000" points="377.51,-1504.01 374,-1494.01 370.51,-1504.02 377.51,-1504.01"/>
+<!-- module~s_symba_step&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge56" class="edge">
+<title>module~s_symba_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M472.3,-2320.36C458.44,-2317.66 444.11,-2312.1 435,-2301 377.42,-2230.85 373.27,-1551.96 373.01,-1420.12"/>
+<polygon fill="#000000" stroke="#000000" points="376.51,-1420.01 373,-1410.01 369.51,-1420.02 376.51,-1420.01"/>
 </g>
-<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge103" class="edge">
-<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M470.19,-2411.55C458.24,-2414.65 445.87,-2419.48 436,-2427 392.89,-2459.84 421.22,-2558.59 374,-2532"/>
+<!-- module~s_symba_step&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge100" class="edge">
+<title>module~s_symba_step&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M472.4,-2326.76C459.49,-2329.81 445.76,-2334.81 435,-2343 391.89,-2375.84 413.19,-2484.36 373,-2448"/>
 </g>
-<!-- proc~solve_wbs -->
+<!-- module~s_symba_util -->
 <g id="module~~whm_classes~~UsedByGraph_node49" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node49"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="545.5,-1494 483.5,-1494 483.5,-1470 545.5,-1470 545.5,-1494"/>
-<text text-anchor="middle" x="514.5" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>module~s_symba_util</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node49"><a xlink:href=".././module/s_symba_util.html" xlink:title="s_symba_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="551,-2292 476,-2292 476,-2268 551,-2268 551,-2292"/>
+<text text-anchor="middle" x="513.5" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_util</text>
 </a>
 </g>
 </g>
-<!-- proc~solve_wbs&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge66" class="edge">
-<title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.23,-1482C461.92,-1482 433.29,-1482 410.68,-1482"/>
-<polygon fill="#000000" stroke="#000000" points="410.45,-1478.5 400.45,-1482 410.45,-1485.5 410.45,-1478.5"/>
+<!-- module~s_symba_util&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge57" class="edge">
+<title>module~s_symba_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.94,-2278.98C461,-2276.58 444.93,-2271.05 435,-2259 380.14,-2192.4 373.81,-1548.83 373.09,-1420.28"/>
+<polygon fill="#000000" stroke="#000000" points="376.59,-1420.06 373.04,-1410.08 369.59,-1420.09 376.59,-1420.06"/>
 </g>
-<!-- module~s_fraggle_setup -->
+<!-- module~s_symba_util&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge101" class="edge">
+<title>module~s_symba_util&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M475.71,-2283.09C461.61,-2285.91 446.23,-2291.19 435,-2301 381.61,-2347.66 425.59,-2495.57 373,-2448"/>
+<path fill="none" stroke="#000000" d="M371,-2448C291.97,-2376.52 271.1,-1567.43 267.95,-1420.74"/>
+<polygon fill="#000000" stroke="#000000" points="271.44,-1420.23 267.73,-1410.3 264.44,-1420.38 271.44,-1420.23"/>
+</g>
+<!-- module~s_util_copy -->
 <g id="module~~whm_classes~~UsedByGraph_node50" class="node">
-<title>module~s_fraggle_setup</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_fraggle_setup.html" xlink:title="s_fraggle_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="559,-1452 470,-1452 470,-1428 559,-1428 559,-1452"/>
-<text text-anchor="middle" x="514.5" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_setup</text>
+<title>module~s_util_copy</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node50"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="546.5,-2208 480.5,-2208 480.5,-2184 546.5,-2184 546.5,-2208"/>
+<text text-anchor="middle" x="513.5" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_setup&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge67" class="edge">
-<title>module~s_fraggle_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M469.92,-1451.3C458.82,-1454.32 446.94,-1457.67 436,-1461 427.48,-1463.59 418.37,-1466.57 409.83,-1469.44"/>
-<polygon fill="#000000" stroke="#000000" points="408.47,-1466.21 400.13,-1472.75 410.72,-1472.84 408.47,-1466.21"/>
+<!-- module~s_util_copy&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge58" class="edge">
+<title>module~s_util_copy&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M480.35,-2195.57C464.27,-2193.56 445.95,-2188.19 435,-2175 385.54,-2115.43 374.96,-1541.35 373.27,-1420.33"/>
+<polygon fill="#000000" stroke="#000000" points="376.77,-1420.01 373.14,-1410.06 369.77,-1420.11 376.77,-1420.01"/>
 </g>
-<!-- module~s_util_sort -->
+<!-- module~s_discard -->
 <g id="module~~whm_classes~~UsedByGraph_node51" class="node">
-<title>module~s_util_sort</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="545,-1410 484,-1410 484,-1386 545,-1386 545,-1410"/>
-<text text-anchor="middle" x="514.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
+<title>module~s_discard</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node51"><a xlink:href=".././module/s_discard.html" xlink:title="s_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="542.5,-2166 484.5,-2166 484.5,-2142 542.5,-2142 542.5,-2166"/>
+<text text-anchor="middle" x="513.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_sort&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge93" class="edge">
-<title>module~s_util_sort&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.72,-1402.26C468.67,-1405.33 450.56,-1410.49 436,-1419 417.35,-1429.9 400.46,-1447.87 389.04,-1461.83"/>
-<polygon fill="#000000" stroke="#000000" points="386.11,-1459.89 382.66,-1469.9 391.61,-1464.22 386.11,-1459.89"/>
+<!-- module~s_discard&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge59" class="edge">
+<title>module~s_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.24,-2153.98C467.33,-2152.35 446.88,-2147.24 435,-2133 388.27,-2076.97 375.6,-1538.15 373.39,-1420.58"/>
+<polygon fill="#000000" stroke="#000000" points="376.88,-1420.21 373.2,-1410.27 369.88,-1420.33 376.88,-1420.21"/>
 </g>
-<!-- program~swiftest_driver -->
+<!-- module~s_util_sort -->
 <g id="module~~whm_classes~~UsedByGraph_node52" class="node">
-<title>program~swiftest_driver</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node52"><a xlink:href=".././program/swiftest_driver.html" xlink:title="swiftest_driver">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="555,-1368 474,-1368 474,-1344 555,-1344 555,-1368"/>
-<text text-anchor="middle" x="514.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver</text>
+<title>module~s_util_sort</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node52"><a xlink:href=".././module/s_util_sort.html" xlink:title="s_util_sort">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="544,-2124 483,-2124 483,-2100 544,-2100 544,-2124"/>
+<text text-anchor="middle" x="513.5" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_sort</text>
 </a>
 </g>
 </g>
-<!-- program~swiftest_driver&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge68" class="edge">
-<title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.79,-1360.66C460.77,-1363.7 446.87,-1368.72 436,-1377 407.98,-1398.34 390.19,-1436.3 381.17,-1460.25"/>
-<polygon fill="#000000" stroke="#000000" points="377.81,-1459.27 377.74,-1469.87 384.4,-1461.63 377.81,-1459.27"/>
+<!-- module~s_util_sort&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge60" class="edge">
+<title>module~s_util_sort&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M482.73,-2111.8C466.14,-2110.01 446.55,-2104.78 435,-2091 390.92,-2038.42 376.25,-1533.34 373.5,-1420.35"/>
+<polygon fill="#000000" stroke="#000000" points="377,-1420.04 373.26,-1410.13 370,-1420.21 377,-1420.04"/>
 </g>
-<!-- module~s_gr -->
+<!-- module~s_util_resize -->
 <g id="module~~whm_classes~~UsedByGraph_node53" class="node">
-<title>module~s_gr</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_gr.html" xlink:title="s_gr">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-1326 487.5,-1326 487.5,-1302 541.5,-1302 541.5,-1326"/>
-<text text-anchor="middle" x="514.5" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_gr</text>
+<title>module~s_util_resize</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node53"><a xlink:href=".././module/s_util_resize.html" xlink:title="s_util_resize">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="549.5,-2082 477.5,-2082 477.5,-2058 549.5,-2058 549.5,-2082"/>
+<text text-anchor="middle" x="513.5" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_resize</text>
 </a>
 </g>
 </g>
-<!-- module~s_gr&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge69" class="edge">
-<title>module~s_gr&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.42,-1315.34C470.95,-1317.45 450.17,-1322.62 436,-1335 398.5,-1367.77 383.09,-1427.02 377.24,-1459.39"/>
-<polygon fill="#000000" stroke="#000000" points="373.73,-1459.2 375.55,-1469.63 380.63,-1460.34 373.73,-1459.2"/>
+<!-- module~s_util_resize&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge62" class="edge">
+<title>module~s_util_resize&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M477.27,-2069.06C462.02,-2066.74 445.33,-2061.26 435,-2049 393.6,-1999.91 376.95,-1529.13 373.64,-1420.35"/>
+<polygon fill="#000000" stroke="#000000" points="377.13,-1420.09 373.34,-1410.2 370.14,-1420.3 377.13,-1420.09"/>
 </g>
-<!-- module~s_user_kick_getacch -->
+<!-- module~s_helio_gr -->
 <g id="module~~whm_classes~~UsedByGraph_node54" class="node">
-<title>module~s_user_kick_getacch</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="570.5,-1284 458.5,-1284 458.5,-1260 570.5,-1260 570.5,-1284"/>
-<text text-anchor="middle" x="514.5" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
+<title>module~s_helio_gr</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node54"><a xlink:href=".././module/s_helio_gr.html" xlink:title="s_helio_gr">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="544.5,-2754 482.5,-2754 482.5,-2730 544.5,-2730 544.5,-2754"/>
+<text text-anchor="middle" x="513.5" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_gr</text>
 </a>
 </g>
 </g>
-<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge70" class="edge">
-<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M458.24,-1279.65C450.05,-1282.75 442.27,-1287.05 436,-1293 388.48,-1338.1 377.34,-1420.15 374.76,-1459.62"/>
-<polygon fill="#000000" stroke="#000000" points="371.26,-1459.6 374.23,-1469.77 378.25,-1459.97 371.26,-1459.6"/>
+<!-- module~s_helio_gr&#45;&gt;module~helio_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge16" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M482.34,-2751.22C451.91,-2758.56 404.98,-2764.31 373,-2742"/>
 </g>
-<!-- module~s_util_rescale -->
+<!-- module~s_helio_gr&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge63" class="edge">
+<title>module~s_helio_gr&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M482.13,-2741.94C465.55,-2740.16 446.17,-2734.91 435,-2721 392.56,-2668.14 375.7,-1589.92 373.3,-1420.36"/>
+<polygon fill="#000000" stroke="#000000" points="376.8,-1420.08 373.16,-1410.13 369.8,-1420.18 376.8,-1420.08"/>
+</g>
+<!-- module~orbel -->
 <g id="module~~whm_classes~~UsedByGraph_node55" class="node">
-<title>module~s_util_rescale</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node55"><a xlink:href=".././module/s_util_rescale.html" xlink:title="s_util_rescale">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="553.5,-1242 475.5,-1242 475.5,-1218 553.5,-1218 553.5,-1242"/>
-<text text-anchor="middle" x="514.5" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_rescale</text>
+<title>module~orbel</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node55"><a xlink:href=".././module/orbel.html" xlink:title="orbel">
+<polygon fill="#337ab7" stroke="#337ab7" points="540.5,-2040 486.5,-2040 486.5,-2016 540.5,-2016 540.5,-2040"/>
+<text text-anchor="middle" x="513.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_rescale&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge71" class="edge">
-<title>module~s_util_rescale&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.21,-1232.48C461.23,-1235.24 446.34,-1240.64 436,-1251 378.29,-1308.85 372.67,-1414.25 373.15,-1459.92"/>
-<polygon fill="#000000" stroke="#000000" points="369.66,-1460.02 373.37,-1469.94 376.65,-1459.86 369.66,-1460.02"/>
+<!-- module~orbel&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge64" class="edge">
+<title>module~orbel&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.22,-2028.08C469,-2026.62 447.45,-2021.67 435,-2007 396.26,-1961.37 377.69,-1524.4 373.79,-1420.22"/>
+<polygon fill="#000000" stroke="#000000" points="377.29,-1420.06 373.42,-1410.19 370.29,-1420.31 377.29,-1420.06"/>
 </g>
-<!-- module~s_util_get_energy_momentum -->
+<!-- module~s_rmvs_setup -->
 <g id="module~~whm_classes~~UsedByGraph_node56" class="node">
-<title>module~s_util_get_energy_momentum</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_util_get_energy_momentum.html" xlink:title="s_util_get_energy_momentum">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="593,-1200 436,-1200 436,-1176 593,-1176 593,-1200"/>
-<text text-anchor="middle" x="514.5" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_get_energy_momentum</text>
+<title>module~s_rmvs_setup</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node56"><a xlink:href=".././module/s_rmvs_setup.html" xlink:title="s_rmvs_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-276 474,-276 474,-252 553,-252 553,-276"/>
+<text text-anchor="middle" x="513.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_rmvs_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_get_energy_momentum&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge72" class="edge">
-<title>module~s_util_get_energy_momentum&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.5,-1200.06C443.28,-1202.53 439.38,-1205.48 436,-1209 401.15,-1245.32 382.1,-1401.61 376.1,-1459.94"/>
-<polygon fill="#000000" stroke="#000000" points="372.62,-1459.64 375.11,-1469.94 379.58,-1460.33 372.62,-1459.64"/>
+<!-- module~s_rmvs_setup&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge66" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.84,-265.28C459.47,-267.84 444.39,-273.41 435,-285 399.38,-328.96 377.09,-1221.69 373.51,-1375.52"/>
+<polygon fill="#000000" stroke="#000000" points="370.01,-1375.58 373.28,-1385.66 377.01,-1375.74 370.01,-1375.58"/>
 </g>
-<!-- module~s_kick -->
+<!-- module~s_rmvs_setup&#45;&gt;module~rmvs_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge92" class="edge">
+<title>module~s_rmvs_setup&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" d="M371,-411C308.35,-475.53 274.55,-1148.59 268.49,-1280.6"/>
+<polygon fill="#000000" stroke="#000000" points="264.99,-1280.59 268.03,-1290.74 271.98,-1280.91 264.99,-1280.59"/>
+<path fill="none" stroke="#000000" d="M473.62,-267.93C460.22,-270.89 445.87,-276.05 435,-285 386.83,-324.68 416.47,-366.22 373,-411"/>
+</g>
+<!-- module~s_util_spill -->
 <g id="module~~whm_classes~~UsedByGraph_node57" class="node">
-<title>module~s_kick</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-1158 487.5,-1158 487.5,-1134 541.5,-1134 541.5,-1158"/>
-<text text-anchor="middle" x="514.5" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
+<title>module~s_util_spill</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node57"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="544,-1998 483,-1998 483,-1974 544,-1974 544,-1998"/>
+<text text-anchor="middle" x="513.5" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
 </a>
 </g>
 </g>
-<!-- module~s_kick&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge73" class="edge">
-<title>module~s_kick&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.27,-1146.34C470.3,-1148 449.02,-1153.03 436,-1167 396.03,-1209.89 379.88,-1395 375.4,-1459.63"/>
-<polygon fill="#000000" stroke="#000000" points="371.88,-1459.7 374.71,-1469.91 378.87,-1460.17 371.88,-1459.7"/>
+<!-- module~s_util_spill&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge67" class="edge">
+<title>module~s_util_spill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M482.83,-1985.71C466.28,-1983.89 446.69,-1978.67 435,-1965 398.94,-1922.84 378.5,-1519.95 373.97,-1420.24"/>
+<polygon fill="#000000" stroke="#000000" points="377.46,-1419.93 373.51,-1410.1 370.46,-1420.24 377.46,-1419.93"/>
 </g>
-<!-- module~s_util_index -->
+<!-- module~s_util_minimize_bfgs -->
 <g id="module~~whm_classes~~UsedByGraph_node58" class="node">
-<title>module~s_util_index</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_util_index.html" xlink:title="s_util_index">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="549,-1116 480,-1116 480,-1092 549,-1092 549,-1116"/>
-<text text-anchor="middle" x="514.5" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_index</text>
+<title>module~s_util_minimize_bfgs</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node58"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="569.5,-1956 457.5,-1956 457.5,-1932 569.5,-1932 569.5,-1956"/>
+<text text-anchor="middle" x="513.5" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_index&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge75" class="edge">
-<title>module~s_util_index&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.88,-1105.13C464.41,-1107.43 447.08,-1112.84 436,-1125 390.84,-1174.55 377.9,-1389.05 374.83,-1459.49"/>
-<polygon fill="#000000" stroke="#000000" points="371.32,-1459.73 374.41,-1469.86 378.32,-1460.02 371.32,-1459.73"/>
+<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge68" class="edge">
+<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.34,-1937.83C448.83,-1934.59 440.92,-1929.86 435,-1923 401.62,-1884.31 379.4,-1515.69 374.18,-1420.4"/>
+<polygon fill="#000000" stroke="#000000" points="377.68,-1420.2 373.64,-1410.4 370.69,-1420.57 377.68,-1420.2"/>
 </g>
-<!-- module~s_util_valid -->
+<!-- module~s_user_kick_getacch -->
 <g id="module~~whm_classes~~UsedByGraph_node59" class="node">
-<title>module~s_util_valid</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_util_valid.html" xlink:title="s_util_valid">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="547,-1074 482,-1074 482,-1050 547,-1050 547,-1074"/>
-<text text-anchor="middle" x="514.5" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_valid</text>
+<title>module~s_user_kick_getacch</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node59"><a xlink:href=".././module/s_user_kick_getacch.html" xlink:title="s_user_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="569.5,-1914 457.5,-1914 457.5,-1890 569.5,-1890 569.5,-1914"/>
+<text text-anchor="middle" x="513.5" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_user_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_valid&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge76" class="edge">
-<title>module~s_util_valid&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M481.74,-1062.77C465.77,-1064.88 447.44,-1070.22 436,-1083 385.63,-1139.26 376.13,-1383.41 374.38,-1459.36"/>
-<polygon fill="#000000" stroke="#000000" points="370.88,-1459.61 374.17,-1469.68 377.88,-1459.76 370.88,-1459.61"/>
+<!-- module~s_user_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge69" class="edge">
+<title>module~s_user_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.39,-1895.78C448.88,-1892.55 440.95,-1887.83 435,-1881 374,-1811.01 372.03,-1505.58 372.7,-1420.23"/>
+<polygon fill="#000000" stroke="#000000" points="376.21,-1420.14 372.81,-1410.1 369.21,-1420.07 376.21,-1420.14"/>
 </g>
-<!-- module~s_util_coord -->
+<!-- module~s_symba_discard -->
 <g id="module~~whm_classes~~UsedByGraph_node60" class="node">
-<title>module~s_util_coord</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_util_coord.html" xlink:title="s_util_coord">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="549.5,-1032 479.5,-1032 479.5,-1008 549.5,-1008 549.5,-1032"/>
-<text text-anchor="middle" x="514.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_coord</text>
+<title>module~s_symba_discard</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node60"><a xlink:href=".././module/s_symba_discard.html" xlink:title="s_symba_discard">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="561.5,-2628 465.5,-2628 465.5,-2604 561.5,-2604 561.5,-2628"/>
+<text text-anchor="middle" x="513.5" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_discard</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_coord&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge78" class="edge">
-<title>module~s_util_coord&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.31,-1021.03C463.91,-1023.33 446.79,-1028.77 436,-1041 380.31,-1104.12 374.5,-1378.94 374.01,-1459.64"/>
-<polygon fill="#000000" stroke="#000000" points="370.51,-1459.69 373.97,-1469.7 377.51,-1459.71 370.51,-1459.69"/>
+<!-- module~s_symba_discard&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge71" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.32,-2612.86C453.75,-2609.76 442.53,-2604.33 435,-2595 396.64,-2547.46 376.48,-1579.65 373.41,-1420.16"/>
+<polygon fill="#000000" stroke="#000000" points="376.91,-1420.03 373.22,-1410.1 369.91,-1420.16 376.91,-1420.03"/>
 </g>
-<!-- module~s_helio_drift -->
+<!-- module~s_symba_discard&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge96" class="edge">
+<title>module~s_symba_discard&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M465.29,-2610.39C454.38,-2607.26 443.5,-2602.43 435,-2595 381.61,-2548.34 425.59,-2495.57 373,-2448"/>
+</g>
+<!-- module~s_symba_drift -->
 <g id="module~~whm_classes~~UsedByGraph_node61" class="node">
-<title>module~s_helio_drift</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_helio_drift.html" xlink:title="s_helio_drift">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="549.5,-2334 479.5,-2334 479.5,-2310 549.5,-2310 549.5,-2334"/>
-<text text-anchor="middle" x="514.5" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_drift</text>
+<title>module~s_symba_drift</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node61"><a xlink:href=".././module/s_symba_drift.html" xlink:title="s_symba_drift">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-2586 474,-2586 474,-2562 553,-2562 553,-2586"/>
+<text text-anchor="middle" x="513.5" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_drift</text>
 </a>
 </g>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~helio_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge26" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" d="M479.44,-2319.93C414.47,-2315.98 272.72,-2307.37 198.67,-2302.87"/>
-<polygon fill="#000000" stroke="#000000" points="198.88,-2299.37 188.69,-2302.26 198.46,-2306.36 198.88,-2299.37"/>
+<!-- module~s_symba_drift&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge72" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.83,-2572.73C459.46,-2570.17 444.38,-2564.6 435,-2553 398.01,-2507.25 376.78,-1577.09 373.46,-1420.33"/>
+<polygon fill="#000000" stroke="#000000" points="376.95,-1419.97 373.24,-1410.05 369.96,-1420.12 376.95,-1419.97"/>
 </g>
-<!-- module~s_helio_drift&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge82" class="edge">
-<title>module~s_helio_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.36,-2321.32C463.77,-2319.13 446.48,-2313.68 436,-2301 383.85,-2237.92 375.37,-1629.29 374.18,-1504.35"/>
-<polygon fill="#000000" stroke="#000000" points="377.68,-1504.06 374.09,-1494.09 370.68,-1504.12 377.68,-1504.06"/>
+<!-- module~s_symba_drift&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge97" class="edge">
+<title>module~s_symba_drift&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M473.99,-2569.61C460.63,-2566.6 446.2,-2561.53 435,-2553 391.89,-2520.16 413.19,-2484.36 373,-2448"/>
 </g>
-<!-- module~s_util_set -->
+<!-- module~s_fraggle_util -->
 <g id="module~~whm_classes~~UsedByGraph_node62" class="node">
-<title>module~s_util_set</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_util_set.html" xlink:title="s_util_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="543.5,-990 485.5,-990 485.5,-966 543.5,-966 543.5,-990"/>
-<text text-anchor="middle" x="514.5" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_set</text>
+<title>module~s_fraggle_util</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node62"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="551.5,-1872 475.5,-1872 475.5,-1848 551.5,-1848 551.5,-1872"/>
+<text text-anchor="middle" x="513.5" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_set&#45;&gt;module~swiftest -->
+<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
 <g id="module~~whm_classes~~UsedByGraph_edge79" class="edge">
-<title>module~s_util_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M485.46,-978.21C468.62,-979.9 448.18,-985.02 436,-999 375,-1068.99 373.03,-1374.42 373.7,-1459.77"/>
-<polygon fill="#000000" stroke="#000000" points="370.21,-1459.93 373.81,-1469.9 377.21,-1459.86 370.21,-1459.93"/>
+<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.13,-1858.45C460.59,-1855.89 445.05,-1850.39 435,-1839 379.31,-1775.88 373.5,-1501.06 373.01,-1420.36"/>
+<polygon fill="#000000" stroke="#000000" points="376.51,-1420.29 372.97,-1410.3 369.51,-1420.31 376.51,-1420.29"/>
 </g>
-<!-- module~s_util_peri -->
+<!-- module~s_tides_kick_getacch -->
 <g id="module~~whm_classes~~UsedByGraph_node63" class="node">
-<title>module~s_util_peri</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_util_peri.html" xlink:title="s_util_peri">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="545,-948 484,-948 484,-924 545,-924 545,-948"/>
-<text text-anchor="middle" x="514.5" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_peri</text>
+<title>module~s_tides_kick_getacch</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node63"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="570.5,-1830 456.5,-1830 456.5,-1806 570.5,-1806 570.5,-1830"/>
+<text text-anchor="middle" x="513.5" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_peri&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge80" class="edge">
-<title>module~s_util_peri&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.88,-936.32C467.33,-938.16 447.75,-943.38 436,-957 402.62,-995.69 380.4,-1364.31 375.18,-1459.6"/>
-<polygon fill="#000000" stroke="#000000" points="371.69,-1459.43 374.64,-1469.6 378.68,-1459.8 371.69,-1459.43"/>
+<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge74" class="edge">
+<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M456.37,-1811.19C448.28,-1807.99 440.76,-1803.44 435,-1797 384.63,-1740.74 375.13,-1496.59 373.38,-1420.64"/>
+<polygon fill="#000000" stroke="#000000" points="376.88,-1420.24 373.17,-1410.32 369.88,-1420.39 376.88,-1420.24"/>
 </g>
-<!-- module~s_util_minimize_bfgs -->
+<!-- module~s_util_fill -->
 <g id="module~~whm_classes~~UsedByGraph_node64" class="node">
-<title>module~s_util_minimize_bfgs</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_minimize_bfgs.html" xlink:title="s_util_minimize_bfgs">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="570.5,-906 458.5,-906 458.5,-882 570.5,-882 570.5,-906"/>
-<text text-anchor="middle" x="514.5" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_minimize_bfgs</text>
+<title>module~s_util_fill</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node64"><a xlink:href=".././module/s_util_fill.html" xlink:title="s_util_fill">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-1788 486.5,-1788 486.5,-1764 540.5,-1764 540.5,-1788"/>
+<text text-anchor="middle" x="513.5" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_fill</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_minimize_bfgs&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge81" class="edge">
-<title>module~s_util_minimize_bfgs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M458.29,-900.13C449.78,-903.37 441.89,-908.11 436,-915 399.94,-957.16 379.5,-1360.05 374.97,-1459.76"/>
-<polygon fill="#000000" stroke="#000000" points="371.46,-1459.76 374.51,-1469.9 378.46,-1460.07 371.46,-1459.76"/>
+<!-- module~s_util_fill&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge75" class="edge">
+<title>module~s_util_fill&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.17,-1775.76C469.16,-1774.14 447.86,-1769.12 435,-1755 389.84,-1705.45 376.9,-1490.95 373.83,-1420.51"/>
+<polygon fill="#000000" stroke="#000000" points="377.32,-1419.98 373.41,-1410.14 370.32,-1420.27 377.32,-1419.98"/>
 </g>
-<!-- module~s_util_spill -->
+<!-- module~s_io -->
 <g id="module~~whm_classes~~UsedByGraph_node65" class="node">
-<title>module~s_util_spill</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_util_spill.html" xlink:title="s_util_spill">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="545,-864 484,-864 484,-840 545,-840 545,-864"/>
-<text text-anchor="middle" x="514.5" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_spill</text>
+<title>module~s_io</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node65"><a xlink:href=".././module/s_io.html" xlink:title="s_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-1746 486.5,-1746 486.5,-1722 540.5,-1722 540.5,-1746"/>
+<text text-anchor="middle" x="513.5" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_spill&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge85" class="edge">
-<title>module~s_util_spill&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M483.8,-852.25C467.23,-854.07 447.64,-859.29 436,-873 397.26,-918.63 378.69,-1355.6 374.79,-1459.78"/>
-<polygon fill="#000000" stroke="#000000" points="371.29,-1459.69 374.42,-1469.81 378.29,-1459.94 371.29,-1459.69"/>
+<!-- module~s_io&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge76" class="edge">
+<title>module~s_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.27,-1733.66C469.3,-1732 448.02,-1726.97 435,-1713 395.03,-1670.11 378.88,-1485 374.4,-1420.37"/>
+<polygon fill="#000000" stroke="#000000" points="377.87,-1419.83 373.71,-1410.09 370.88,-1420.3 377.87,-1419.83"/>
 </g>
-<!-- module~s_util_copy -->
+<!-- module~s_helio_setup -->
 <g id="module~~whm_classes~~UsedByGraph_node66" class="node">
-<title>module~s_util_copy</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_util_copy.html" xlink:title="s_util_copy">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="547.5,-822 481.5,-822 481.5,-798 547.5,-798 547.5,-822"/>
-<text text-anchor="middle" x="514.5" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_copy</text>
+<title>module~s_helio_setup</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node66"><a xlink:href=".././module/s_helio_setup.html" xlink:title="s_helio_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-2712 474,-2712 474,-2688 553,-2688 553,-2712"/>
+<text text-anchor="middle" x="513.5" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_copy&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge87" class="edge">
-<title>module~s_util_copy&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M481.43,-810.5C465.38,-812.53 447.05,-817.89 436,-831 394.6,-880.09 377.95,-1350.87 374.64,-1459.65"/>
-<polygon fill="#000000" stroke="#000000" points="371.14,-1459.7 374.34,-1469.8 378.13,-1459.91 371.14,-1459.7"/>
+<!-- module~s_helio_setup&#45;&gt;module~helio_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge13" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M473.73,-2710C461.31,-2713.34 447.54,-2717.18 435,-2721 407.17,-2729.48 396.86,-2758.65 373,-2742"/>
 </g>
-<!-- module~s_orbel -->
+<!-- module~s_helio_setup&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge77" class="edge">
+<title>module~s_helio_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.8,-2698.75C459.42,-2696.2 444.35,-2690.62 435,-2679 393.91,-2627.9 375.94,-1586 373.34,-1420.16"/>
+<polygon fill="#000000" stroke="#000000" points="376.84,-1420.08 373.18,-1410.14 369.84,-1420.19 376.84,-1420.08"/>
+</g>
+<!-- module~s_symba_kick -->
 <g id="module~~whm_classes~~UsedByGraph_node67" class="node">
-<title>module~s_orbel</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_orbel.html" xlink:title="s_orbel">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-780 487.5,-780 487.5,-756 541.5,-756 541.5,-780"/>
-<text text-anchor="middle" x="514.5" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_orbel</text>
+<title>module~s_symba_kick</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node67"><a xlink:href=".././module/s_symba_kick.html" xlink:title="s_symba_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-2544 474,-2544 474,-2520 553,-2520 553,-2544"/>
+<text text-anchor="middle" x="513.5" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_orbel&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge88" class="edge">
-<title>module~s_orbel&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.16,-767.88C469.91,-769.31 448.36,-774.26 436,-789 391.92,-841.58 377.25,-1346.66 374.5,-1459.65"/>
-<polygon fill="#000000" stroke="#000000" points="371,-1459.79 374.26,-1469.87 378,-1459.96 371,-1459.79"/>
+<!-- module~s_symba_kick&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge78" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.84,-2530.72C459.47,-2528.16 444.39,-2522.59 435,-2511 399.38,-2467.04 377.09,-1574.31 373.51,-1420.48"/>
+<polygon fill="#000000" stroke="#000000" points="377.01,-1420.26 373.28,-1410.34 370.01,-1420.42 377.01,-1420.26"/>
 </g>
-<!-- module~s_tides_kick_getacch -->
+<!-- module~s_symba_kick&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge99" class="edge">
+<title>module~s_symba_kick&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M473.85,-2525.75C460.92,-2522.59 446.79,-2517.89 435,-2511 401.08,-2491.17 402.13,-2474.35 373,-2448"/>
+</g>
+<!-- module~s_helio_step -->
 <g id="module~~whm_classes~~UsedByGraph_node68" class="node">
-<title>module~s_tides_kick_getacch</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_tides_kick_getacch.html" xlink:title="s_tides_kick_getacch">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="571.5,-738 457.5,-738 457.5,-714 571.5,-714 571.5,-738"/>
-<text text-anchor="middle" x="514.5" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_tides_kick_getacch</text>
+<title>module~s_helio_step</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node68"><a xlink:href=".././module/s_helio_step.html" xlink:title="s_helio_step">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="550,-2670 477,-2670 477,-2646 550,-2646 550,-2670"/>
+<text text-anchor="middle" x="513.5" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_helio_step</text>
 </a>
 </g>
 </g>
-<!-- module~s_tides_kick_getacch&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge89" class="edge">
-<title>module~s_tides_kick_getacch&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.36,-732.31C449.18,-735.56 441.63,-740.26 436,-747 389.27,-803.03 376.6,-1341.85 374.39,-1459.42"/>
-<polygon fill="#000000" stroke="#000000" points="370.88,-1459.67 374.2,-1469.73 377.88,-1459.79 370.88,-1459.67"/>
+<!-- module~s_helio_step&#45;&gt;module~helio_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge14" class="edge">
+<title>module~s_helio_step&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" d="M477,-2663.5C463.24,-2666.66 447.76,-2671.54 435,-2679 401.08,-2698.83 412.28,-2742 373,-2742"/>
+<path fill="none" stroke="#000000" d="M371,-2742C229.15,-2742 161.6,-1577.33 152.16,-1400.41"/>
+<polygon fill="#000000" stroke="#000000" points="155.64,-1400.01 151.62,-1390.21 148.65,-1400.38 155.64,-1400.01"/>
 </g>
-<!-- module~s_symba_io -->
+<!-- module~s_helio_step&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge81" class="edge">
+<title>module~s_helio_step&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M476.62,-2657.21C461.43,-2654.89 444.97,-2649.38 435,-2637 395.29,-2587.71 376.23,-1583.94 373.38,-1420.43"/>
+<polygon fill="#000000" stroke="#000000" points="376.87,-1420.07 373.2,-1410.13 369.87,-1420.19 376.87,-1420.07"/>
+</g>
+<!-- module~s_util_solve -->
 <g id="module~~whm_classes~~UsedByGraph_node69" class="node">
-<title>module~s_symba_io</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="549.5,-2376 479.5,-2376 479.5,-2352 549.5,-2352 549.5,-2376"/>
-<text text-anchor="middle" x="514.5" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
+<title>module~s_util_solve</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node69"><a xlink:href=".././module/s_util_solve.html" xlink:title="s_util_solve">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="547.5,-1704 479.5,-1704 479.5,-1680 547.5,-1680 547.5,-1704"/>
+<text text-anchor="middle" x="513.5" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_solve</text>
 </a>
 </g>
 </g>
-<!-- module~s_symba_io&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge90" class="edge">
-<title>module~s_symba_io&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.34,-2363.34C463.74,-2361.15 446.46,-2355.7 436,-2343 381.14,-2276.4 374.81,-1632.83 374.09,-1504.28"/>
-<polygon fill="#000000" stroke="#000000" points="377.59,-1504.06 374.04,-1494.08 370.59,-1504.09 377.59,-1504.06"/>
-</g>
-<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
-<g id="module~~whm_classes~~UsedByGraph_edge99" class="edge">
-<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" d="M372,-2532C313.77,-2499.21 284.95,-2419.15 273.97,-2380.12"/>
-<polygon fill="#000000" stroke="#000000" points="277.3,-2379.03 271.33,-2370.27 270.54,-2380.84 277.3,-2379.03"/>
-<path fill="none" stroke="#000000" d="M479.46,-2366.56C464.64,-2369.24 447.97,-2374.54 436,-2385 382.61,-2431.66 435.78,-2566.79 374,-2532"/>
+<!-- module~s_util_solve&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge80" class="edge">
+<title>module~s_util_solve&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.15,-1690.62C463.74,-1688.26 446.39,-1682.87 435,-1671 400.15,-1634.68 381.1,-1478.39 375.1,-1420.06"/>
+<polygon fill="#000000" stroke="#000000" points="378.58,-1419.67 374.11,-1410.06 371.62,-1420.36 378.58,-1419.67"/>
 </g>
-<!-- module~s_fraggle_regime -->
+<!-- module~s_symba_setup -->
 <g id="module~~whm_classes~~UsedByGraph_node70" class="node">
-<title>module~s_fraggle_regime</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_fraggle_regime.html" xlink:title="s_fraggle_regime">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="562.5,-696 466.5,-696 466.5,-672 562.5,-672 562.5,-696"/>
-<text text-anchor="middle" x="514.5" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_regime</text>
+<title>module~s_symba_setup</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node70"><a xlink:href=".././module/s_symba_setup.html" xlink:title="s_symba_setup">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="557.5,-2502 469.5,-2502 469.5,-2478 557.5,-2478 557.5,-2502"/>
+<text text-anchor="middle" x="513.5" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_setup</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_regime&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge91" class="edge">
-<title>module~s_fraggle_regime&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M466.49,-687.28C454.92,-690.38 443.66,-695.78 436,-705 386.54,-764.57 375.96,-1338.65 374.27,-1459.67"/>
-<polygon fill="#000000" stroke="#000000" points="370.77,-1459.89 374.14,-1469.94 377.77,-1459.99 370.77,-1459.89"/>
+<!-- module~s_symba_setup&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge53" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M469.41,-2487.82C456.44,-2484.94 443.44,-2479.39 435,-2469 366.63,-2384.8 371.35,-1567.08 372.75,-1420.45"/>
+<polygon fill="#000000" stroke="#000000" points="376.26,-1420.08 372.86,-1410.04 369.26,-1420.01 376.26,-1420.08"/>
 </g>
-<!-- module~s_setup -->
+<!-- module~s_symba_setup&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge103" class="edge">
+<title>module~s_symba_setup&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M469.35,-2486.67C439.08,-2482.23 399.45,-2471.92 373,-2448"/>
+</g>
+<!-- module~s_fraggle_generate -->
 <g id="module~~whm_classes~~UsedByGraph_node71" class="node">
-<title>module~s_setup</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_setup.html" xlink:title="s_setup">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="541.5,-654 487.5,-654 487.5,-630 541.5,-630 541.5,-654"/>
-<text text-anchor="middle" x="514.5" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_setup</text>
+<title>module~s_fraggle_generate</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node71"><a xlink:href=".././module/s_fraggle_generate.html" xlink:title="s_fraggle_generate">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="566.5,-1662 460.5,-1662 460.5,-1638 566.5,-1638 566.5,-1662"/>
+<text text-anchor="middle" x="513.5" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_generate</text>
 </a>
 </g>
 </g>
-<!-- module~s_setup&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge92" class="edge">
-<title>module~s_setup&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.47,-641.79C470.13,-643.16 448.35,-648.07 436,-663 383.85,-726.08 375.37,-1334.71 374.18,-1459.65"/>
-<polygon fill="#000000" stroke="#000000" points="370.68,-1459.88 374.09,-1469.91 377.68,-1459.94 370.68,-1459.88"/>
+<!-- module~s_fraggle_generate&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge84" class="edge">
+<title>module~s_fraggle_generate&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M460.13,-1643.79C450.81,-1640.61 441.89,-1635.91 435,-1629 377.29,-1571.15 371.67,-1465.75 372.15,-1420.08"/>
+<polygon fill="#000000" stroke="#000000" points="375.65,-1420.14 372.37,-1410.06 368.66,-1419.98 375.65,-1420.14"/>
 </g>
-<!-- module~s_fraggle_set -->
+<!-- module~s_symba_io -->
 <g id="module~~whm_classes~~UsedByGraph_node72" class="node">
-<title>module~s_fraggle_set</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node72"><a xlink:href=".././module/s_fraggle_set.html" xlink:title="s_fraggle_set">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="553,-612 476,-612 476,-588 553,-588 553,-612"/>
-<text text-anchor="middle" x="514.5" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_set</text>
+<title>module~s_symba_io</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node72"><a xlink:href=".././module/s_symba_io.html" xlink:title="s_symba_io">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="548.5,-2460 478.5,-2460 478.5,-2436 548.5,-2436 548.5,-2460"/>
+<text text-anchor="middle" x="513.5" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_symba_io</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_set&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge83" class="edge">
-<title>module~s_fraggle_set&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.74,-601.22C461.14,-603.72 445.66,-609.27 436,-621 381.14,-687.6 374.81,-1331.17 374.09,-1459.72"/>
-<polygon fill="#000000" stroke="#000000" points="370.59,-1459.91 374.04,-1469.92 377.59,-1459.94 370.59,-1459.91"/>
+<!-- module~s_symba_io&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge85" class="edge">
+<title>module~s_symba_io&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M478.27,-2447.39C462.66,-2445.22 445.38,-2439.76 435,-2427 369.34,-2346.34 371.8,-1563.74 372.81,-1420.47"/>
+<polygon fill="#000000" stroke="#000000" points="376.31,-1420.28 372.89,-1410.26 369.31,-1420.23 376.31,-1420.28"/>
 </g>
-<!-- module~s_util_version -->
+<!-- module~s_symba_io&#45;&gt;module~symba_classes -->
+<g id="module~~whm_classes~~UsedByGraph_edge104" class="edge">
+<title>module~s_symba_io&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" d="M478.4,-2459.52C446.98,-2467.76 401.11,-2473.43 373,-2448"/>
+</g>
+<!-- module~s_kick -->
 <g id="module~~whm_classes~~UsedByGraph_node73" class="node">
-<title>module~s_util_version</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node73"><a xlink:href=".././module/s_util_version.html" xlink:title="s_util_version">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="553.5,-570 475.5,-570 475.5,-546 553.5,-546 553.5,-570"/>
-<text text-anchor="middle" x="514.5" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_util_version</text>
+<title>module~s_kick</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node73"><a xlink:href=".././module/s_kick.html" xlink:title="s_kick">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="540.5,-1620 486.5,-1620 486.5,-1596 540.5,-1596 540.5,-1620"/>
+<text text-anchor="middle" x="513.5" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_kick</text>
 </a>
 </g>
 </g>
-<!-- module~s_util_version&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge94" class="edge">
-<title>module~s_util_version&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.32,-559.27C460.84,-561.81 445.55,-567.36 436,-579 378.42,-649.15 374.27,-1328.04 374.01,-1459.88"/>
-<polygon fill="#000000" stroke="#000000" points="370.51,-1459.98 374,-1469.99 377.51,-1459.99 370.51,-1459.98"/>
+<!-- module~s_kick&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge83" class="edge">
+<title>module~s_kick&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M486.44,-1607.09C469.77,-1605.16 448.75,-1600.05 435,-1587 387.48,-1541.9 376.34,-1459.85 373.76,-1420.38"/>
+<polygon fill="#000000" stroke="#000000" points="377.25,-1420.03 373.23,-1410.23 370.26,-1420.4 377.25,-1420.03"/>
 </g>
-<!-- module~s_fraggle_util -->
+<!-- module~drift_implementation -->
 <g id="module~~whm_classes~~UsedByGraph_node74" class="node">
-<title>module~s_fraggle_util</title>
-<g id="a_module~~whm_classes~~UsedByGraph_node74"><a xlink:href=".././module/s_fraggle_util.html" xlink:title="s_fraggle_util">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="552.5,-528 476.5,-528 476.5,-504 552.5,-504 552.5,-528"/>
-<text text-anchor="middle" x="514.5" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">s_fraggle_util</text>
+<title>module~drift_implementation</title>
+<g id="a_module~~whm_classes~~UsedByGraph_node74"><a xlink:href=".././module/drift_implementation.html" xlink:title="drift_implementation">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="568,-1578 459,-1578 459,-1554 568,-1554 568,-1578"/>
+<text text-anchor="middle" x="513.5" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_implementation</text>
 </a>
 </g>
 </g>
-<!-- module~s_fraggle_util&#45;&gt;module~swiftest -->
-<g id="module~~whm_classes~~UsedByGraph_edge95" class="edge">
-<title>module~s_fraggle_util&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M476.11,-517.12C461.39,-519.59 445.71,-525.13 436,-537 375.74,-610.64 373.76,-1323.82 373.94,-1459.7"/>
-<polygon fill="#000000" stroke="#000000" points="370.44,-1459.77 373.96,-1469.76 377.44,-1459.76 370.44,-1459.77"/>
+<!-- module~drift_implementation&#45;&gt;module~swiftest -->
+<g id="module~~whm_classes~~UsedByGraph_edge86" class="edge">
+<title>module~drift_implementation&#45;&gt;module~swiftest</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M458.85,-1558.33C450.18,-1555.25 441.82,-1550.96 435,-1545 397.5,-1512.23 382.09,-1452.98 376.24,-1420.61"/>
+<polygon fill="#000000" stroke="#000000" points="379.63,-1419.66 374.55,-1410.37 372.73,-1420.8 379.63,-1419.66"/>
 </g>
 </g>
 </svg>
@@ -2908,7 +2900,7 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine whm_gr_kick_getacch_pl(self, param)
+public pure module subroutine whm_gr_kick_getacch_pl(self, param)
     
     
    
@@ -2985,7 +2977,7 @@ <h4>Arguments</h4>
     
     
     <h3>
-public module subroutine whm_gr_kick_getacch_tp(self, param)
+public pure module subroutine whm_gr_kick_getacch_tp(self, param)
     
     
    
diff --git a/docs/module/whm_drift.html b/docs/module/whm_drift.html
index 2606eeb90..7d76216c0 100644
--- a/docs/module/whm_drift.html
+++ b/docs/module/whm_drift.html
@@ -245,312 +245,308 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: module~~whm_drift~~UsesGraph Pages: 1 -->
-<svg id="modulewhm_driftUsesGraph" width="641pt" height="286pt"
- viewBox="0.00 0.00 641.00 286.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~whm_drift~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 401.31)">
+<svg id="modulewhm_driftUsesGraph" width="641pt" height="250pt"
+ viewBox="0.00 0.00 641.00 250.39" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~whm_drift~~UsesGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 350.68)">
 <title>module~~whm_drift~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-401.31 904,-401.31 904,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-350.68 904,-350.68 904,4 -4,4"/>
 <!-- module~whm_drift -->
 <g id="module~~whm_drift~~UsesGraph_node1" class="node">
 <title>module~whm_drift</title>
-<polygon fill="none" stroke="black" points="900,-251.35 841,-251.35 841,-227.35 900,-227.35 900,-251.35"/>
-<text text-anchor="middle" x="870.5" y="-236.95" font-family="Helvetica,sans-Serif" font-size="10.50">whm_drift</text>
+<polygon fill="none" stroke="black" points="900,-211.55 841,-211.55 841,-187.55 900,-187.55 900,-211.55"/>
+<text text-anchor="middle" x="870.5" y="-197.15" font-family="Helvetica,sans-Serif" font-size="10.50">whm_drift</text>
 </g>
 <!-- module~swiftest -->
 <g id="module~~whm_drift~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_module~~whm_drift~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-153.35 751,-153.35 751,-129.35 805,-129.35 805,-153.35"/>
-<text text-anchor="middle" x="778" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-231.55 751,-231.55 751,-207.55 805,-207.55 805,-231.55"/>
+<text text-anchor="middle" x="778" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- module~whm_drift&#45;&gt;module~swiftest -->
 <g id="module~~whm_drift~~UsesGraph_edge1" class="edge">
 <title>module~whm_drift&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M858.4,-227.34C843.14,-210.81 815.47,-180.85 797.16,-161.02"/>
-<polygon fill="#000000" stroke="#000000" points="799.54,-158.44 790.19,-153.47 794.4,-163.19 799.54,-158.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.87,-205.88C832.68,-207.69 823.65,-209.69 815.07,-211.58"/>
+<polygon fill="#000000" stroke="#000000" points="814.31,-208.17 805.3,-213.74 815.82,-215 814.31,-208.17"/>
 </g>
 <!-- module~whm_classes -->
 <g id="module~~whm_drift~~UsesGraph_node3" class="node">
 <title>module~whm_classes</title>
 <g id="a_module~~whm_drift~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-229.35 391,-229.35 391,-205.35 467,-205.35 467,-229.35"/>
-<text text-anchor="middle" x="429" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-189.55 391,-189.55 391,-165.55 467,-165.55 467,-189.55"/>
+<text text-anchor="middle" x="429" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
 <!-- module~whm_drift&#45;&gt;module~whm_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge2" class="edge">
 <title>module~whm_drift&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" d="M851,-251.62C822.99,-269.38 767.49,-301.43 715,-313.35 626.59,-333.44 593.22,-351.56 511,-313.35 477.95,-298 453.53,-261.78 440.56,-238.48"/>
-<polygon fill="#000000" stroke="#000000" points="443.5,-236.56 435.71,-229.38 437.33,-239.85 443.5,-236.56"/>
+<path fill="none" stroke="#000000" d="M548.5,-179.55C525.17,-177.43 499.15,-176.8 477.45,-176.75"/>
+<polygon fill="#000000" stroke="#000000" points="477.16,-173.25 467.17,-176.77 477.18,-180.25 477.16,-173.25"/>
+<path fill="none" stroke="#000000" d="M840.86,-198.3C784.96,-195.74 657.43,-189.3 550.5,-179.55"/>
 </g>
 <!-- module~swiftest&#45;&gt;module~whm_classes -->
-<g id="module~~whm_drift~~UsesGraph_edge7" class="edge">
+<g id="module~~whm_drift~~UsesGraph_edge3" class="edge">
 <title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C626.35,-314.79 629.51,-255.43 588,-238.35 552.67,-223.82 509.49,-218.85 477.21,-217.36"/>
-<polygon fill="#000000" stroke="#000000" points="477.26,-213.86 467.14,-216.99 477,-220.86 477.26,-213.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C613.18,-217.02 605.65,-184.58 550.5,-179.55"/>
 </g>
 <!-- module~swiftest_operators -->
 <g id="module~~whm_drift~~UsesGraph_node4" class="node">
 <title>module~swiftest_operators</title>
 <g id="a_module~~whm_drift~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-288.35 247,-288.35 247,-264.35 347,-264.35 347,-288.35"/>
-<text text-anchor="middle" x="297" y="-273.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-248.55 247,-248.55 247,-224.55 347,-224.55 347,-248.55"/>
+<text text-anchor="middle" x="297" y="-234.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~swiftest_operators -->
-<g id="module~~whm_drift~~UsesGraph_edge3" class="edge">
+<g id="module~~whm_drift~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C619.4,-317.78 602.83,-295.9 550.5,-299.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C483.07,-303.68 408.21,-295.02 357.5,-287.12"/>
-<polygon fill="#000000" stroke="#000000" points="357.8,-283.62 347.37,-285.5 356.69,-290.53 357.8,-283.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C515.87,-305.02 507.96,-282.79 475,-274.55 435.87,-264.77 391.49,-255.25 356.96,-248.18"/>
+<polygon fill="#000000" stroke="#000000" points="357.53,-244.73 347.04,-246.16 356.14,-251.59 357.53,-244.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C606.18,-216.7 610.22,-277.51 550.5,-295.55"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~symba_classes -->
 <g id="module~~whm_drift~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_module~~whm_drift~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-271.35 511,-271.35 511,-247.35 588,-247.35 588,-271.35"/>
-<text text-anchor="middle" x="549.5" y="-256.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~symba_classes</title>
+<g id="a_module~~whm_drift~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-73.55 627,-73.55 627,-49.55 712,-49.55 712,-73.55"/>
+<text text-anchor="middle" x="669.5" y="-59.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_drift~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C652.76,-305.12 612.83,-289.24 583.77,-275.82"/>
-<polygon fill="#000000" stroke="#000000" points="584.92,-272.49 574.38,-271.39 581.93,-278.82 584.92,-272.49"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="module~~whm_drift~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.9,-207.23C767.04,-182.1 748.48,-124.18 715,-87.55 712.29,-84.59 709.17,-81.87 705.86,-79.39"/>
+<polygon fill="#000000" stroke="#000000" points="707.63,-76.37 697.37,-73.75 703.76,-82.2 707.63,-76.37"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~helio_classes -->
 <g id="module~~whm_drift~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_module~~whm_drift~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-77.35 385.5,-77.35 385.5,-53.35 472.5,-53.35 472.5,-77.35"/>
-<text text-anchor="middle" x="429" y="-62.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~helio_classes</title>
+<g id="a_module~~whm_drift~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-151.55 511.5,-151.55 511.5,-127.55 587.5,-127.55 587.5,-151.55"/>
+<text text-anchor="middle" x="549.5" y="-137.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<!-- module~swiftest&#45;&gt;module~helio_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.8,-129.76C729.54,-120.78 698.59,-108.68 670.5,-101.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-63.35C527.36,-58.7 503.57,-58.21 482.89,-59.24"/>
-<polygon fill="#000000" stroke="#000000" points="482.47,-55.76 472.71,-59.89 482.91,-62.75 482.47,-55.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C615.19,-87.45 604.31,-75.21 550.5,-63.35"/>
+<title>module~swiftest&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.72,-220.22C729.16,-220.61 697.84,-220.8 670.5,-219.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C667.13,-219.49 611.14,-181.2 576.79,-157.62"/>
+<polygon fill="#000000" stroke="#000000" points="578.38,-154.47 568.15,-151.69 574.41,-160.24 578.38,-154.47"/>
 </g>
-<!-- module~helio_classes -->
+<!-- module~fraggle_classes -->
 <g id="module~~whm_drift~~UsesGraph_node7" class="node">
-<title>module~helio_classes</title>
-<g id="a_module~~whm_drift~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-191.35 511.5,-191.35 511.5,-167.35 587.5,-167.35 587.5,-191.35"/>
-<text text-anchor="middle" x="549.5" y="-176.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_module~~whm_drift~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-33.55 385.5,-33.55 385.5,-9.55 472.5,-9.55 472.5,-33.55"/>
+<text text-anchor="middle" x="429" y="-19.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="module~~whm_drift~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C616.85,-318.27 628.82,-242.22 588,-205.35 584.98,-202.63 581.66,-199.94 578.28,-197.4"/>
-<polygon fill="#000000" stroke="#000000" points="580.08,-194.38 569.9,-191.42 576.01,-200.08 580.08,-194.38"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.99,-153.44C765.03,-186.18 735.11,-275.69 670.5,-299.35"/>
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
+<g id="module~~whm_drift~~UsesGraph_edge7" class="edge">
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M777.01,-207.41C776.32,-174.29 769.38,-82.06 715,-40.55 648.16,10.46 544.83,2.24 482.68,-9.14"/>
+<polygon fill="#000000" stroke="#000000" points="481.85,-5.73 472.69,-11.06 483.17,-12.61 481.85,-5.73"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="module~~whm_drift~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_module~~whm_drift~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-229.35 123,-229.35 123,-205.35 211,-205.35 211,-229.35"/>
-<text text-anchor="middle" x="167" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_module~~whm_drift~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-309.55 624,-309.55 624,-285.55 715,-285.55 715,-309.55"/>
+<text text-anchor="middle" x="669.5" y="-295.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="module~~whm_drift~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-299.35C511.12,-358.4 454.96,-435.51 298,-375.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.36,-231.74C742.93,-244.5 715.36,-264.7 695.35,-279.35"/>
+<polygon fill="#000000" stroke="#000000" points="693.02,-276.72 687.02,-285.45 697.16,-282.37 693.02,-276.72"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="module~~whm_drift~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_module~~whm_drift~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-153.35 627,-153.35 627,-129.35 712,-129.35 712,-153.35"/>
-<text text-anchor="middle" x="669.5" y="-138.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_module~~whm_drift~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-112.55 252.5,-112.55 252.5,-88.55 341.5,-88.55 341.5,-112.55"/>
+<text text-anchor="middle" x="297" y="-98.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-141.35C742.26,-141.35 732.26,-141.35 722.32,-141.35"/>
-<polygon fill="#000000" stroke="#000000" points="722.05,-137.85 712.05,-141.35 722.05,-144.85 722.05,-137.85"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M760.35,-207.43C728.67,-185.11 656.72,-138.04 588,-118.55 508.11,-95.89 411.05,-94.93 351.94,-97.13"/>
+<polygon fill="#000000" stroke="#000000" points="351.56,-93.65 341.71,-97.56 351.85,-100.64 351.56,-93.65"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="module~~whm_drift~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_module~~whm_drift~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-170.35 252.5,-170.35 252.5,-146.35 341.5,-146.35 341.5,-170.35"/>
-<text text-anchor="middle" x="297" y="-155.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_module~~whm_drift~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-231.55 511,-231.55 511,-207.55 588,-207.55 588,-231.55"/>
+<text text-anchor="middle" x="549.5" y="-217.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-139.35C402.83,-141.09 375.13,-144.87 351.8,-148.61"/>
-<polygon fill="#000000" stroke="#000000" points="351.05,-145.18 341.75,-150.26 352.18,-152.09 351.05,-145.18"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-101.35C564.64,-74.27 537.08,-131.98 430,-139.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-219.55C645.46,-218.5 619.87,-218.37 598.42,-218.56"/>
+<polygon fill="#000000" stroke="#000000" points="598.21,-215.06 588.25,-218.68 598.29,-222.06 598.21,-215.06"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="module~~whm_drift~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_module~~whm_drift~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-55.35 624,-55.35 624,-31.35 715,-31.35 715,-55.35"/>
-<text text-anchor="middle" x="669.5" y="-40.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_module~~whm_drift~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-307.55 383,-307.55 383,-283.55 475,-283.55 475,-307.55"/>
+<text text-anchor="middle" x="429" y="-293.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M763.94,-129.34C745.82,-112.66 712.84,-82.31 691.3,-62.5"/>
-<polygon fill="#000000" stroke="#000000" points="693.39,-59.67 683.67,-55.47 688.65,-64.82 693.39,-59.67"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C528.3,-301.41 505.34,-302.59 485.04,-301.89"/>
+<polygon fill="#000000" stroke="#000000" points="485.17,-298.4 475,-301.39 484.82,-305.39 485.17,-298.4"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="module~~whm_drift~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_module~~whm_drift~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-347.35 383,-347.35 383,-323.35 475,-323.35 475,-347.35"/>
-<text text-anchor="middle" x="429" y="-332.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_module~~whm_drift~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-189.55 123,-189.55 123,-165.55 211,-165.55 211,-189.55"/>
+<text text-anchor="middle" x="167" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="module~~whm_drift~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-299.35C520.15,-301.23 489.5,-310.76 466.47,-319.54"/>
-<polygon fill="#000000" stroke="#000000" points="465.12,-316.31 457.1,-323.23 467.69,-322.82 465.12,-316.31"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~whm_drift~~UsesGraph_edge13" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-217.35C364.75,-217.35 329.26,-217.35 298,-217.35"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-335.55C370.6,-342.13 351.95,-356.23 298,-335.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-295.55C521.89,-303.59 457.61,-332.39 430,-335.55"/>
 </g>
 <!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge14" class="edge">
 <title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.38,-205.27C381.92,-196.44 355.32,-184.37 333.98,-174.68"/>
-<polygon fill="#000000" stroke="#000000" points="335.14,-171.37 324.59,-170.42 332.25,-177.74 335.14,-171.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.9,-165.46C399.34,-161.1 390.77,-156.13 383,-151.55 364.11,-140.43 342.97,-127.74 326.49,-117.81"/>
+<polygon fill="#000000" stroke="#000000" points="328.24,-114.77 317.87,-112.6 324.62,-120.76 328.24,-114.77"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~whm_drift~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.74,-177.55C364.75,-177.55 329.26,-177.55 298,-177.55"/>
 </g>
 <!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="module~~whm_drift~~UsesGraph_edge15" class="edge">
 <title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-264.27C250.63,-255.44 224.44,-243.37 203.43,-233.68"/>
-<polygon fill="#000000" stroke="#000000" points="204.72,-230.43 194.18,-229.42 201.79,-236.78 204.72,-230.43"/>
-</g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
-<g id="module~~whm_drift~~UsesGraph_edge17" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-247.32C501.77,-242.79 487.08,-237.58 473.56,-232.79"/>
-<polygon fill="#000000" stroke="#000000" points="474.56,-229.43 463.96,-229.39 472.22,-236.03 474.56,-229.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-224.47C250.63,-215.64 224.44,-203.57 203.43,-193.88"/>
+<polygon fill="#000000" stroke="#000000" points="204.72,-190.63 194.18,-189.62 201.79,-196.98 204.72,-190.63"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~whm_drift~~UsesGraph_edge16" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-255.83C477.17,-252.39 426.56,-246.47 383,-238.35 344.74,-231.23 336.91,-217.35 298,-217.35"/>
-</g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge18" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.6,-53.26C370.42,-38.68 316.87,-17.09 298,-25.35"/>
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M650.32,-73.57C630.8,-86.47 599.59,-107.1 577.27,-121.86"/>
+<polygon fill="#000000" stroke="#000000" points="575.31,-118.96 568.89,-127.39 579.17,-124.8 575.31,-118.96"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge19" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411,-77.51C388.62,-93.53 349.08,-121.82 323.2,-140.32"/>
-<polygon fill="#000000" stroke="#000000" points="321.1,-137.53 315,-146.19 325.17,-143.22 321.1,-137.53"/>
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C518.77,-59.1 486.83,-47.76 463.6,-37.78"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-34.47 454.22,-33.62 461.94,-40.87 464.78,-34.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-63.22C604.29,-63.7 575.82,-63.64 550.5,-61.55"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~whm_drift~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C395.49,-63.88 360.16,-75.08 334.54,-84.88"/>
+<polygon fill="#000000" stroke="#000000" points="333.25,-81.63 325.23,-88.55 335.82,-88.14 333.25,-81.63"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~whm_drift~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-61.55C496.01,-57.23 482.53,-57.79 430,-61.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-61.55C370.37,-65.68 350.33,-36.05 298,-60.55"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="module~~whm_drift~~UsesGraph_edge22" class="edge">
+<g id="module~~whm_drift~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-191.27C500.41,-194.78 488.32,-198.65 476.88,-202.32"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-199.09 467.04,-205.48 477.63,-205.76 475.49,-199.09"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~whm_drift~~UsesGraph_edge20" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.48,-174.28C487.87,-172.13 456.8,-171.33 430,-177.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-151.47C500.41,-154.97 488.32,-158.85 476.88,-162.52"/>
+<polygon fill="#000000" stroke="#000000" points="475.49,-159.29 467.04,-165.68 477.63,-165.96 475.49,-159.29"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="module~~whm_drift~~UsesGraph_edge21" class="edge">
+<g id="module~~whm_drift~~UsesGraph_edge22" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.61,-167.31C505.58,-154.65 466.18,-136.86 430,-139.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.41,-138.66C488.05,-138.16 457.26,-137.62 430,-137.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C395.12,-137.47 359.3,-126.39 333.59,-116.38"/>
+<polygon fill="#000000" stroke="#000000" points="334.85,-113.12 324.27,-112.63 332.23,-119.61 334.85,-113.12"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="module~~whm_drift~~UsesGraph_node13" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~whm_drift~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-229.35 0,-229.35 0,-205.35 87,-205.35 87,-229.35"/>
-<text text-anchor="middle" x="43.5" y="-214.95" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~whm_drift~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-137.55C367.55,-137.39 358.45,-177.55 298,-177.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-177.55C271.53,-177.55 244.42,-177.55 221.48,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="221.25,-174.05 211.25,-177.55 221.25,-181.05 221.25,-174.05"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="module~~whm_drift~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.71,-33.73C398.36,-37.93 390.23,-42.78 383,-47.55 366.31,-58.58 363.88,-63.83 347,-74.55 342.17,-77.62 336.95,-80.66 331.77,-83.52"/>
+<polygon fill="#000000" stroke="#000000" points="329.75,-80.64 322.6,-88.46 333.07,-86.8 329.75,-80.64"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~whm_drift~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-217.35C114.58,-217.35 105.86,-217.35 97.36,-217.35"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-213.85 87.13,-217.35 97.13,-220.85 97.13,-213.85"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="module~~whm_drift~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M656.32,-153.54C635.91,-173.94 594.66,-215.19 570.13,-239.73"/>
-<polygon fill="#000000" stroke="#000000" points="567.39,-237.51 562.79,-247.06 572.34,-242.46 567.39,-237.51"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.28,-31.01C359.34,-37.56 325.96,-47.46 298,-60.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-60.55C274.85,-70.46 265.86,-65.77 247,-79.55 218.13,-100.65 193.89,-134.81 180.16,-156.72"/>
+<polygon fill="#000000" stroke="#000000" points="177.15,-154.93 174.93,-165.29 183.13,-158.57 177.15,-154.93"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="module~~whm_drift~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M647,-129.29C639.62,-125.03 631.37,-120.1 624,-115.35 590.36,-93.68 589.58,-71.96 550.5,-63.35"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.91,-306.73C576.18,-316.07 498.11,-329.94 430,-335.55"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="module~~whm_drift~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M631.16,-153.38C620.41,-156.84 608.53,-160.67 597.28,-164.29"/>
-<polygon fill="#000000" stroke="#000000" points="596.04,-161.01 587.59,-167.41 598.18,-167.68 596.04,-161.01"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~whm_drift~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C493.33,-143.22 483.96,-165.22 430,-177.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-177.35C369.02,-190.62 358.44,-216.44 298,-217.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-217.35C271.53,-217.73 244.42,-217.78 221.48,-217.72"/>
-<polygon fill="#000000" stroke="#000000" points="221.27,-214.21 211.25,-217.68 221.24,-221.21 221.27,-214.21"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276,-112.58C254.8,-125.34 221.12,-145.6 197.01,-160.1"/>
+<polygon fill="#000000" stroke="#000000" points="195.05,-157.2 188.28,-165.35 198.66,-163.2 195.05,-157.2"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="module~~whm_drift~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.95,-138.89C604.32,-137.99 575.84,-137.58 550.5,-139.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-139.35C495.96,-143.03 482.54,-135.74 430,-139.35"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~whm_drift~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.79,-170.44C250.63,-179.27 224.44,-191.34 203.43,-201.03"/>
-<polygon fill="#000000" stroke="#000000" points="201.79,-197.92 194.18,-205.29 204.72,-204.28 201.79,-197.92"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M514.54,-207.52C501.77,-202.99 487.08,-197.78 473.56,-192.99"/>
+<polygon fill="#000000" stroke="#000000" points="474.56,-189.63 463.96,-189.59 472.22,-196.23 474.56,-189.63"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="module~~whm_drift~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632.12,-31.33C563.44,-10.78 411.42,24.29 298,-25.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-25.35C226.09,-59.78 188.52,-152.74 174.51,-195.41"/>
-<polygon fill="#000000" stroke="#000000" points="171.12,-194.51 171.45,-205.1 177.79,-196.62 171.12,-194.51"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="module~~whm_drift~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.84,-216.03C477.17,-212.59 426.56,-206.67 383,-198.55 344.74,-191.42 336.91,-177.55 298,-177.55"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="module~~whm_drift~~UsesGraph_edge31" class="edge">
+<g id="module~~whm_drift~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-347.42C370.04,-361.71 317.13,-382.69 298,-375.35"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-375.35C233.63,-351.45 193.53,-276.57 176.85,-239.13"/>
-<polygon fill="#000000" stroke="#000000" points="179.94,-237.43 172.77,-229.63 173.51,-240.2 179.94,-237.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-335.55C233.63,-311.65 193.53,-236.77 176.85,-199.32"/>
+<polygon fill="#000000" stroke="#000000" points="179.94,-197.63 172.77,-189.83 173.51,-200.4 179.94,-197.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-307.62C370.04,-321.9 317.13,-342.88 298,-335.55"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="module~~whm_drift~~UsesGraph_node13" class="node">
+<title>iso_fortran_env</title>
+<g id="a_module~~whm_drift~~UsesGraph_node13"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-189.55 0,-189.55 0,-165.55 87,-165.55 87,-189.55"/>
+<text text-anchor="middle" x="43.5" y="-175.15" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="module~~whm_drift~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-177.55C114.58,-177.55 105.86,-177.55 97.36,-177.55"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-174.05 87.13,-177.55 97.13,-181.05 97.13,-174.05"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/check.html b/docs/proc/check.html
index 0634774e9..aa34bf272 100644
--- a/docs/proc/check.html
+++ b/docs/proc/check.html
@@ -274,47 +274,47 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="54,-45 0,-45 0,-21 54,-21 54,-45"/>
 <text text-anchor="middle" x="27" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">check</text>
 </g>
-<!-- nf90_strerror -->
-<g id="proc~~check~~CallsGraph_node2" class="node">
-<title>nf90_strerror</title>
-<polygon fill="#777777" stroke="#777777" points="165,-66 90,-66 90,-42 165,-42 165,-66"/>
-<text text-anchor="middle" x="127.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_strerror</text>
-</g>
-<!-- proc~check&#45;&gt;nf90_strerror -->
-<g id="proc~~check~~CallsGraph_edge1" class="edge">
-<title>proc~check&#45;&gt;nf90_strerror</title>
-<path fill="none" stroke="#000000" d="M54.14,-38.57C62.09,-40.27 71.08,-42.18 79.95,-44.08"/>
-<polygon fill="#000000" stroke="#000000" points="79.35,-47.53 89.86,-46.19 80.81,-40.68 79.35,-47.53"/>
-</g>
 <!-- interface~util_exit -->
-<g id="proc~~check~~CallsGraph_node3" class="node">
+<g id="proc~~check~~CallsGraph_node2" class="node">
 <title>interface~util_exit</title>
-<g id="a_proc~~check~~CallsGraph_node3"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
-<polygon fill="#a7506f" stroke="#a7506f" points="154.5,-24 100.5,-24 100.5,0 154.5,0 154.5,-24"/>
-<text text-anchor="middle" x="127.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<g id="a_proc~~check~~CallsGraph_node2"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
+<polygon fill="#a7506f" stroke="#a7506f" points="154.5,-66 100.5,-66 100.5,-42 154.5,-42 154.5,-66"/>
+<text text-anchor="middle" x="127.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
 <!-- proc~check&#45;&gt;interface~util_exit -->
-<g id="proc~~check~~CallsGraph_edge2" class="edge">
+<g id="proc~~check~~CallsGraph_edge1" class="edge">
 <title>proc~check&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M54.14,-27.43C65.16,-25.08 78.18,-22.3 90.11,-19.76"/>
-<polygon fill="#000000" stroke="#000000" points="91.19,-23.11 100.24,-17.6 89.73,-16.26 91.19,-23.11"/>
+<path fill="none" stroke="#000000" d="M54.14,-38.57C65.16,-40.92 78.18,-43.7 90.11,-46.24"/>
+<polygon fill="#000000" stroke="#000000" points="89.73,-49.74 100.24,-48.4 91.19,-42.89 89.73,-49.74"/>
+</g>
+<!-- nf90_strerror -->
+<g id="proc~~check~~CallsGraph_node3" class="node">
+<title>nf90_strerror</title>
+<polygon fill="#777777" stroke="#777777" points="165,-24 90,-24 90,0 165,0 165,-24"/>
+<text text-anchor="middle" x="127.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_strerror</text>
+</g>
+<!-- proc~check&#45;&gt;nf90_strerror -->
+<g id="proc~~check~~CallsGraph_edge2" class="edge">
+<title>proc~check&#45;&gt;nf90_strerror</title>
+<path fill="none" stroke="#000000" d="M54.14,-27.43C62.09,-25.73 71.08,-23.82 79.95,-21.92"/>
+<polygon fill="#000000" stroke="#000000" points="80.81,-25.32 89.86,-19.81 79.35,-18.47 80.81,-25.32"/>
 </g>
 <!-- proc~util_exit -->
 <g id="proc~~check~~CallsGraph_node4" class="node">
 <title>proc~util_exit</title>
 <g id="a_proc~~check~~CallsGraph_node4"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
-<polygon fill="#d9534f" stroke="#d9534f" points="255,-24 201,-24 201,0 255,0 255,-24"/>
-<text text-anchor="middle" x="228" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="255,-66 201,-66 201,-42 255,-42 255,-66"/>
+<text text-anchor="middle" x="228" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
 <!-- interface~util_exit&#45;&gt;proc~util_exit -->
 <g id="proc~~check~~CallsGraph_edge3" class="edge">
 <title>interface~util_exit&#45;&gt;proc~util_exit</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M154.64,-12C165.66,-12 178.68,-12 190.61,-12"/>
-<polygon fill="#000000" stroke="#000000" points="190.74,-15.5 200.74,-12 190.74,-8.5 190.74,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M154.64,-54C165.66,-54 178.68,-54 190.61,-54"/>
+<polygon fill="#000000" stroke="#000000" points="190.74,-57.5 200.74,-54 190.74,-50.5 190.74,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/drift_all.html b/docs/proc/drift_all.html
index 3407b57d0..177ffeb52 100644
--- a/docs/proc/drift_all.html
+++ b/docs/proc/drift_all.html
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-pure module subroutine drift_all(mu, x, v, n, param, dt, mask, iflag)
+module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag)
     
     
    <a href='../interface/drift_all.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -283,7 +283,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~31"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~35"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -328,12 +328,12 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-mask~2"></span>logical,</td>
+  <td><span class="anchor" id="variable-lmask~8"></span>logical,</td>
   <td>intent(in),</td>
   <td></td>
   
   <td>dimension(:)</td><td>::</td>
-  <td><strong>mask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
+  <td><strong>lmask</strong></td><td><p>Logical mask of size self%nbody that determines which bodies to drift.</p></td>
   
 </tr>
 
diff --git a/docs/proc/drift_dan.html b/docs/proc/drift_dan.html
index 69f4bde40..6c46449d3 100644
--- a/docs/proc/drift_dan.html
+++ b/docs/proc/drift_dan.html
@@ -333,114 +333,120 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~drift_dan -->
 <g id="proc~~drift_dan~~CallsGraph_node1" class="node">
 <title>proc~drift_dan</title>
-<polygon fill="none" stroke="black" points="55,-87 0,-87 0,-63 55,-63 55,-87"/>
-<text text-anchor="middle" x="27.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">drift_dan</text>
+<polygon fill="none" stroke="black" points="55,-129 0,-129 0,-105 55,-105 55,-129"/>
+<text text-anchor="middle" x="27.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">drift_dan</text>
 </g>
-<!-- proc~drift_kepu -->
+<!-- proc~drift_kepmd -->
 <g id="proc~~drift_dan~~CallsGraph_node2" class="node">
-<title>proc~drift_kepu</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node2"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
-<polygon fill="#d9534f" stroke="#d9534f" points="155.5,-108 95.5,-108 95.5,-84 155.5,-84 155.5,-108"/>
-<text text-anchor="middle" x="125.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
+<title>proc~drift_kepmd</title>
+<g id="a_proc~~drift_dan~~CallsGraph_node2"><a xlink:href=".././proc/drift_kepmd.html" xlink:title="drift_kepmd">
+<polygon fill="#d9534f" stroke="#d9534f" points="160,-150 91,-150 91,-126 160,-126 160,-150"/>
+<text text-anchor="middle" x="125.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepmd</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
+<!-- proc~drift_dan&#45;&gt;proc~drift_kepmd -->
 <g id="proc~~drift_dan~~CallsGraph_edge1" class="edge">
-<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
-<path fill="none" stroke="#000000" d="M55.24,-80.85C64.56,-82.89 75.22,-85.22 85.34,-87.43"/>
-<polygon fill="#000000" stroke="#000000" points="84.69,-90.87 95.21,-89.59 86.19,-84.04 84.69,-90.87"/>
+<title>proc~drift_dan&#45;&gt;proc~drift_kepmd</title>
+<path fill="none" stroke="#000000" d="M55.24,-122.85C63.14,-124.58 71.99,-126.51 80.67,-128.41"/>
+<polygon fill="#000000" stroke="#000000" points="80.18,-131.89 90.7,-130.61 81.68,-125.05 80.18,-131.89"/>
 </g>
-<!-- proc~drift_kepmd -->
+<!-- proc~drift_kepu -->
 <g id="proc~~drift_dan~~CallsGraph_node3" class="node">
-<title>proc~drift_kepmd</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node3"><a xlink:href=".././proc/drift_kepmd.html" xlink:title="drift_kepmd">
-<polygon fill="#d9534f" stroke="#d9534f" points="160,-66 91,-66 91,-42 160,-42 160,-66"/>
-<text text-anchor="middle" x="125.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepmd</text>
+<title>proc~drift_kepu</title>
+<g id="a_proc~~drift_dan~~CallsGraph_node3"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
+<polygon fill="#d9534f" stroke="#d9534f" points="155.5,-108 95.5,-108 95.5,-84 155.5,-84 155.5,-108"/>
+<text text-anchor="middle" x="125.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_dan&#45;&gt;proc~drift_kepmd -->
+<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
 <g id="proc~~drift_dan~~CallsGraph_edge2" class="edge">
-<title>proc~drift_dan&#45;&gt;proc~drift_kepmd</title>
-<path fill="none" stroke="#000000" d="M55.24,-69.15C63.14,-67.42 71.99,-65.49 80.67,-63.59"/>
-<polygon fill="#000000" stroke="#000000" points="81.68,-66.95 90.7,-61.39 80.18,-60.11 81.68,-66.95"/>
+<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
+<path fill="none" stroke="#000000" d="M55.24,-111.15C64.56,-109.11 75.22,-106.78 85.34,-104.57"/>
+<polygon fill="#000000" stroke="#000000" points="86.19,-107.96 95.21,-102.41 84.69,-101.13 86.19,-107.96"/>
 </g>
-<!-- proc~drift_kepu_new -->
+<!-- proc~drift_kepu_fchk -->
 <g id="proc~~drift_dan~~CallsGraph_node4" class="node">
-<title>proc~drift_kepu_new</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node4"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
+<title>proc~drift_kepu_fchk</title>
+<g id="a_proc~~drift_dan~~CallsGraph_node4"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
 <polygon fill="#d9534f" stroke="#d9534f" points="285.5,-171 200.5,-171 200.5,-147 285.5,-147 285.5,-171"/>
-<text text-anchor="middle" x="243" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
+<text text-anchor="middle" x="243" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
 <g id="proc~~drift_dan~~CallsGraph_edge3" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
-<path fill="none" stroke="#000000" d="M145.04,-108.01C158.85,-116.75 178.3,-128.65 196,-138 198.87,-139.52 201.88,-141.03 204.91,-142.52"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
+<path fill="none" stroke="#000000" d="M145.91,-108.07C162.9,-118.58 186.34,-132.9 196,-138 198.87,-139.52 201.88,-141.03 204.91,-142.52"/>
 <polygon fill="#000000" stroke="#000000" points="203.48,-145.72 214.02,-146.85 206.49,-139.4 203.48,-145.72"/>
 </g>
-<!-- proc~drift_kepu_guess -->
+<!-- proc~drift_kepu_lag -->
 <g id="proc~~drift_dan~~CallsGraph_node5" class="node">
-<title>proc~drift_kepu_guess</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node5"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
-<polygon fill="#d9534f" stroke="#d9534f" points="290,-45 196,-45 196,-21 290,-21 290,-45"/>
-<text text-anchor="middle" x="243" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
+<title>proc~drift_kepu_lag</title>
+<g id="a_proc~~drift_dan~~CallsGraph_node5"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
+<polygon fill="#d9534f" stroke="#d9534f" points="283,-129 203,-129 203,-105 283,-105 283,-129"/>
+<text text-anchor="middle" x="243" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
 <g id="proc~~drift_dan~~CallsGraph_edge4" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
-<path fill="none" stroke="#000000" d="M145.91,-83.93C162.9,-73.42 186.34,-59.1 196,-54 198.87,-52.48 201.88,-50.97 204.91,-49.48"/>
-<polygon fill="#000000" stroke="#000000" points="206.49,-52.6 214.02,-45.15 203.48,-46.28 206.49,-52.6"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
+<path fill="none" stroke="#000000" d="M155.65,-101.3C166.93,-103.35 180.16,-105.76 192.83,-108.06"/>
+<polygon fill="#000000" stroke="#000000" points="192.36,-111.53 202.83,-109.88 193.61,-104.65 192.36,-111.53"/>
 </g>
-<!-- proc~drift_kepu_fchk -->
+<!-- proc~drift_kepu_guess -->
 <g id="proc~~drift_dan~~CallsGraph_node6" class="node">
-<title>proc~drift_kepu_fchk</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node6"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
-<polygon fill="#d9534f" stroke="#d9534f" points="285.5,-129 200.5,-129 200.5,-105 285.5,-105 285.5,-129"/>
-<text text-anchor="middle" x="243" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
+<title>proc~drift_kepu_guess</title>
+<g id="a_proc~~drift_dan~~CallsGraph_node6"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
+<polygon fill="#d9534f" stroke="#d9534f" points="290,-45 196,-45 196,-21 290,-21 290,-45"/>
+<text text-anchor="middle" x="243" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
 <g id="proc~~drift_dan~~CallsGraph_edge5" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
-<path fill="none" stroke="#000000" d="M155.65,-101.3C166.19,-103.22 178.44,-105.44 190.34,-107.61"/>
-<polygon fill="#000000" stroke="#000000" points="189.75,-111.06 200.21,-109.4 191,-104.17 189.75,-111.06"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
+<path fill="none" stroke="#000000" d="M145.04,-83.99C158.85,-75.25 178.3,-63.35 196,-54 198.87,-52.48 201.88,-50.97 204.91,-49.48"/>
+<polygon fill="#000000" stroke="#000000" points="206.49,-52.6 214.02,-45.15 203.48,-46.28 206.49,-52.6"/>
 </g>
-<!-- proc~drift_kepu_lag -->
+<!-- proc~drift_kepu_new -->
 <g id="proc~~drift_dan~~CallsGraph_node7" class="node">
-<title>proc~drift_kepu_lag</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node7"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
-<polygon fill="#d9534f" stroke="#d9534f" points="283,-87 203,-87 203,-63 283,-63 283,-87"/>
-<text text-anchor="middle" x="243" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
+<title>proc~drift_kepu_new</title>
+<g id="a_proc~~drift_dan~~CallsGraph_node7"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
+<polygon fill="#d9534f" stroke="#d9534f" points="285.5,-87 200.5,-87 200.5,-63 285.5,-63 285.5,-87"/>
+<text text-anchor="middle" x="243" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
 <g id="proc~~drift_dan~~CallsGraph_edge6" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
-<path fill="none" stroke="#000000" d="M155.65,-90.7C166.93,-88.65 180.16,-86.24 192.83,-83.94"/>
-<polygon fill="#000000" stroke="#000000" points="193.61,-87.35 202.83,-82.12 192.36,-80.47 193.61,-87.35"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
+<path fill="none" stroke="#000000" d="M155.65,-90.7C166.19,-88.78 178.44,-86.56 190.34,-84.39"/>
+<polygon fill="#000000" stroke="#000000" points="191,-87.83 200.21,-82.6 189.75,-80.94 191,-87.83"/>
 </g>
 <!-- proc~drift_kepu_stumpff -->
-<g id="proc~~drift_dan~~CallsGraph_node10" class="node">
+<g id="proc~~drift_dan~~CallsGraph_node9" class="node">
 <title>proc~drift_kepu_stumpff</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node10"><a xlink:href=".././proc/drift_kepu_stumpff.html" xlink:title="drift_kepu_stumpff">
+<g id="a_proc~~drift_dan~~CallsGraph_node9"><a xlink:href=".././proc/drift_kepu_stumpff.html" xlink:title="drift_kepu_stumpff">
 <polygon fill="#d9534f" stroke="#d9534f" points="428,-129 327,-129 327,-105 428,-105 428,-129"/>
 <text text-anchor="middle" x="377.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_stumpff</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
 <g id="proc~~drift_dan~~CallsGraph_edge7" class="edge">
-<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
+<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
 <path fill="none" stroke="#000000" d="M281.97,-146.96C296.52,-142.35 313.32,-137.03 328.68,-132.16"/>
 <polygon fill="#000000" stroke="#000000" points="330.05,-135.4 338.53,-129.04 327.94,-128.72 330.05,-135.4"/>
 </g>
+<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
+<g id="proc~~drift_dan~~CallsGraph_edge8" class="edge">
+<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
+<path fill="none" stroke="#000000" d="M283.04,-117C293.56,-117 305.19,-117 316.56,-117"/>
+<polygon fill="#000000" stroke="#000000" points="316.9,-120.5 326.9,-117 316.9,-113.5 316.9,-120.5"/>
+</g>
 <!-- interface~orbel_scget -->
 <g id="proc~~drift_dan~~CallsGraph_node8" class="node">
 <title>interface~orbel_scget</title>
@@ -451,35 +457,29 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
-<g id="proc~~drift_dan~~CallsGraph_edge8" class="edge">
+<g id="proc~~drift_dan~~CallsGraph_edge9" class="edge">
 <title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
 <path fill="none" stroke="#000000" d="M290.34,-40.34C304.26,-42.55 319.47,-44.96 333.18,-47.13"/>
 <polygon fill="#000000" stroke="#000000" points="332.9,-50.63 343.33,-48.74 334,-43.72 332.9,-50.63"/>
 </g>
 <!-- proc~drift_kepu_p3solve -->
-<g id="proc~~drift_dan~~CallsGraph_node9" class="node">
+<g id="proc~~drift_dan~~CallsGraph_node10" class="node">
 <title>proc~drift_kepu_p3solve</title>
-<g id="a_proc~~drift_dan~~CallsGraph_node9"><a xlink:href=".././proc/drift_kepu_p3solve.html" xlink:title="drift_kepu_p3solve">
+<g id="a_proc~~drift_dan~~CallsGraph_node10"><a xlink:href=".././proc/drift_kepu_p3solve.html" xlink:title="drift_kepu_p3solve">
 <polygon fill="#d9534f" stroke="#d9534f" points="429,-24 326,-24 326,0 429,0 429,-24"/>
 <text text-anchor="middle" x="377.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_p3solve</text>
 </a>
 </g>
 </g>
 <!-- proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve -->
-<g id="proc~~drift_dan~~CallsGraph_edge9" class="edge">
+<g id="proc~~drift_dan~~CallsGraph_edge10" class="edge">
 <title>proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve</title>
 <path fill="none" stroke="#000000" d="M290.34,-25.66C298.6,-24.35 307.32,-22.96 315.91,-21.6"/>
 <polygon fill="#000000" stroke="#000000" points="316.56,-25.04 325.89,-20.02 315.47,-18.13 316.56,-25.04"/>
 </g>
-<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
-<g id="proc~~drift_dan~~CallsGraph_edge10" class="edge">
-<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
-<path fill="none" stroke="#000000" d="M285.56,-117C295.35,-117 305.98,-117 316.41,-117"/>
-<polygon fill="#000000" stroke="#000000" points="316.72,-120.5 326.72,-117 316.72,-113.5 316.72,-120.5"/>
-</g>
-<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
 <g id="proc~~drift_dan~~CallsGraph_edge11" class="edge">
-<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
+<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
 <path fill="none" stroke="#000000" d="M281.97,-87.04C296.52,-91.65 313.32,-96.97 328.68,-101.84"/>
 <polygon fill="#000000" stroke="#000000" points="327.94,-105.28 338.53,-104.96 330.05,-98.6 327.94,-105.28"/>
 </g>
diff --git a/docs/proc/drift_kepu.html b/docs/proc/drift_kepu.html
index d8ccde0fa..2b3ba952a 100644
--- a/docs/proc/drift_kepu.html
+++ b/docs/proc/drift_kepu.html
@@ -411,81 +411,87 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="60,-108 0,-108 0,-84 60,-84 60,-108"/>
 <text text-anchor="middle" x="30" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">drift_kepu</text>
 </g>
-<!-- proc~drift_kepu_new -->
+<!-- proc~drift_kepu_fchk -->
 <g id="proc~~drift_kepu~~CallsGraph_node2" class="node">
-<title>proc~drift_kepu_new</title>
-<g id="a_proc~~drift_kepu~~CallsGraph_node2"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
+<title>proc~drift_kepu_fchk</title>
+<g id="a_proc~~drift_kepu~~CallsGraph_node2"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
 <polygon fill="#d9534f" stroke="#d9534f" points="185.5,-171 100.5,-171 100.5,-147 185.5,-147 185.5,-171"/>
-<text text-anchor="middle" x="143" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
+<text text-anchor="middle" x="143" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
 <g id="proc~~drift_kepu~~CallsGraph_edge1" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
 <path fill="none" stroke="#000000" d="M48.23,-108.12C61.1,-116.92 79.27,-128.84 96,-138 98.85,-139.56 101.84,-141.11 104.86,-142.61"/>
 <polygon fill="#000000" stroke="#000000" points="103.42,-145.81 113.95,-146.98 106.45,-139.5 103.42,-145.81"/>
 </g>
-<!-- proc~drift_kepu_guess -->
+<!-- proc~drift_kepu_lag -->
 <g id="proc~~drift_kepu~~CallsGraph_node3" class="node">
-<title>proc~drift_kepu_guess</title>
-<g id="a_proc~~drift_kepu~~CallsGraph_node3"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
-<polygon fill="#d9534f" stroke="#d9534f" points="190,-45 96,-45 96,-21 190,-21 190,-45"/>
-<text text-anchor="middle" x="143" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
+<title>proc~drift_kepu_lag</title>
+<g id="a_proc~~drift_kepu~~CallsGraph_node3"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
+<polygon fill="#d9534f" stroke="#d9534f" points="183,-129 103,-129 103,-105 183,-105 183,-129"/>
+<text text-anchor="middle" x="143" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
 <g id="proc~~drift_kepu~~CallsGraph_edge2" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
-<path fill="none" stroke="#000000" d="M48.23,-83.88C61.1,-75.08 79.27,-63.16 96,-54 98.85,-52.44 101.84,-50.89 104.86,-49.39"/>
-<polygon fill="#000000" stroke="#000000" points="106.45,-52.5 113.95,-45.02 103.42,-46.19 106.45,-52.5"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
+<path fill="none" stroke="#000000" d="M60.16,-101.52C70.1,-103.4 81.5,-105.55 92.57,-107.65"/>
+<polygon fill="#000000" stroke="#000000" points="92.12,-111.13 102.6,-109.55 93.42,-104.25 92.12,-111.13"/>
 </g>
-<!-- proc~drift_kepu_fchk -->
+<!-- proc~drift_kepu_guess -->
 <g id="proc~~drift_kepu~~CallsGraph_node4" class="node">
-<title>proc~drift_kepu_fchk</title>
-<g id="a_proc~~drift_kepu~~CallsGraph_node4"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
-<polygon fill="#d9534f" stroke="#d9534f" points="185.5,-129 100.5,-129 100.5,-105 185.5,-105 185.5,-129"/>
-<text text-anchor="middle" x="143" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
+<title>proc~drift_kepu_guess</title>
+<g id="a_proc~~drift_kepu~~CallsGraph_node4"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
+<polygon fill="#d9534f" stroke="#d9534f" points="190,-45 96,-45 96,-21 190,-21 190,-45"/>
+<text text-anchor="middle" x="143" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
 <g id="proc~~drift_kepu~~CallsGraph_edge3" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
-<path fill="none" stroke="#000000" d="M60.16,-101.52C69.32,-103.25 79.71,-105.22 89.95,-107.15"/>
-<polygon fill="#000000" stroke="#000000" points="89.61,-110.65 100.09,-109.07 90.91,-103.77 89.61,-110.65"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
+<path fill="none" stroke="#000000" d="M48.23,-83.88C61.1,-75.08 79.27,-63.16 96,-54 98.85,-52.44 101.84,-50.89 104.86,-49.39"/>
+<polygon fill="#000000" stroke="#000000" points="106.45,-52.5 113.95,-45.02 103.42,-46.19 106.45,-52.5"/>
 </g>
-<!-- proc~drift_kepu_lag -->
+<!-- proc~drift_kepu_new -->
 <g id="proc~~drift_kepu~~CallsGraph_node5" class="node">
-<title>proc~drift_kepu_lag</title>
-<g id="a_proc~~drift_kepu~~CallsGraph_node5"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
-<polygon fill="#d9534f" stroke="#d9534f" points="183,-87 103,-87 103,-63 183,-63 183,-87"/>
-<text text-anchor="middle" x="143" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
+<title>proc~drift_kepu_new</title>
+<g id="a_proc~~drift_kepu~~CallsGraph_node5"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
+<polygon fill="#d9534f" stroke="#d9534f" points="185.5,-87 100.5,-87 100.5,-63 185.5,-63 185.5,-87"/>
+<text text-anchor="middle" x="143" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
 <g id="proc~~drift_kepu~~CallsGraph_edge4" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
-<path fill="none" stroke="#000000" d="M60.16,-90.48C70.1,-88.6 81.5,-86.45 92.57,-84.35"/>
-<polygon fill="#000000" stroke="#000000" points="93.42,-87.75 102.6,-82.45 92.12,-80.87 93.42,-87.75"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
+<path fill="none" stroke="#000000" d="M60.16,-90.48C69.32,-88.75 79.71,-86.78 89.95,-84.85"/>
+<polygon fill="#000000" stroke="#000000" points="90.91,-88.23 100.09,-82.93 89.61,-81.35 90.91,-88.23"/>
 </g>
 <!-- proc~drift_kepu_stumpff -->
-<g id="proc~~drift_kepu~~CallsGraph_node8" class="node">
+<g id="proc~~drift_kepu~~CallsGraph_node7" class="node">
 <title>proc~drift_kepu_stumpff</title>
-<g id="a_proc~~drift_kepu~~CallsGraph_node8"><a xlink:href=".././proc/drift_kepu_stumpff.html" xlink:title="drift_kepu_stumpff">
+<g id="a_proc~~drift_kepu~~CallsGraph_node7"><a xlink:href=".././proc/drift_kepu_stumpff.html" xlink:title="drift_kepu_stumpff">
 <polygon fill="#d9534f" stroke="#d9534f" points="328,-129 227,-129 227,-105 328,-105 328,-129"/>
 <text text-anchor="middle" x="277.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_stumpff</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
 <g id="proc~~drift_kepu~~CallsGraph_edge5" class="edge">
-<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
+<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
 <path fill="none" stroke="#000000" d="M181.97,-146.96C196.52,-142.35 213.32,-137.03 228.68,-132.16"/>
 <polygon fill="#000000" stroke="#000000" points="230.05,-135.4 238.53,-129.04 227.94,-128.72 230.05,-135.4"/>
 </g>
+<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
+<g id="proc~~drift_kepu~~CallsGraph_edge6" class="edge">
+<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
+<path fill="none" stroke="#000000" d="M183.04,-117C193.56,-117 205.19,-117 216.56,-117"/>
+<polygon fill="#000000" stroke="#000000" points="216.9,-120.5 226.9,-117 216.9,-113.5 216.9,-120.5"/>
+</g>
 <!-- interface~orbel_scget -->
 <g id="proc~~drift_kepu~~CallsGraph_node6" class="node">
 <title>interface~orbel_scget</title>
@@ -496,35 +502,29 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
-<g id="proc~~drift_kepu~~CallsGraph_edge6" class="edge">
+<g id="proc~~drift_kepu~~CallsGraph_edge7" class="edge">
 <title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
 <path fill="none" stroke="#000000" d="M190.34,-40.34C204.26,-42.55 219.47,-44.96 233.18,-47.13"/>
 <polygon fill="#000000" stroke="#000000" points="232.9,-50.63 243.33,-48.74 234,-43.72 232.9,-50.63"/>
 </g>
 <!-- proc~drift_kepu_p3solve -->
-<g id="proc~~drift_kepu~~CallsGraph_node7" class="node">
+<g id="proc~~drift_kepu~~CallsGraph_node8" class="node">
 <title>proc~drift_kepu_p3solve</title>
-<g id="a_proc~~drift_kepu~~CallsGraph_node7"><a xlink:href=".././proc/drift_kepu_p3solve.html" xlink:title="drift_kepu_p3solve">
+<g id="a_proc~~drift_kepu~~CallsGraph_node8"><a xlink:href=".././proc/drift_kepu_p3solve.html" xlink:title="drift_kepu_p3solve">
 <polygon fill="#d9534f" stroke="#d9534f" points="329,-24 226,-24 226,0 329,0 329,-24"/>
 <text text-anchor="middle" x="277.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_p3solve</text>
 </a>
 </g>
 </g>
 <!-- proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve -->
-<g id="proc~~drift_kepu~~CallsGraph_edge7" class="edge">
+<g id="proc~~drift_kepu~~CallsGraph_edge8" class="edge">
 <title>proc~drift_kepu_guess&#45;&gt;proc~drift_kepu_p3solve</title>
 <path fill="none" stroke="#000000" d="M190.34,-25.66C198.6,-24.35 207.32,-22.96 215.91,-21.6"/>
 <polygon fill="#000000" stroke="#000000" points="216.56,-25.04 225.89,-20.02 215.47,-18.13 216.56,-25.04"/>
 </g>
-<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
-<g id="proc~~drift_kepu~~CallsGraph_edge8" class="edge">
-<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
-<path fill="none" stroke="#000000" d="M185.56,-117C195.35,-117 205.98,-117 216.41,-117"/>
-<polygon fill="#000000" stroke="#000000" points="216.72,-120.5 226.72,-117 216.72,-113.5 216.72,-120.5"/>
-</g>
-<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
 <g id="proc~~drift_kepu~~CallsGraph_edge9" class="edge">
-<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
+<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
 <path fill="none" stroke="#000000" d="M181.97,-87.04C196.52,-91.65 213.32,-96.97 228.68,-101.84"/>
 <polygon fill="#000000" stroke="#000000" points="227.94,-105.28 238.53,-104.96 230.05,-98.6 227.94,-105.28"/>
 </g>
diff --git a/docs/proc/drift_kepu_lag.html b/docs/proc/drift_kepu_lag.html
index 76500912a..5772564f1 100644
--- a/docs/proc/drift_kepu_lag.html
+++ b/docs/proc/drift_kepu_lag.html
@@ -136,7 +136,7 @@ <h1>drift_kepu_lag
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
diff --git a/docs/proc/drift_kepu_p3solve.html b/docs/proc/drift_kepu_p3solve.html
index 0b25ebc0e..3535e97fe 100644
--- a/docs/proc/drift_kepu_p3solve.html
+++ b/docs/proc/drift_kepu_p3solve.html
@@ -136,7 +136,7 @@ <h1>drift_kepu_p3solve
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">33 statements</a>
+    title=" 0.0% of total for procedures.">33 statements</a>
      </li> 
      
      
diff --git a/docs/proc/drift_kepu_stumpff.html b/docs/proc/drift_kepu_stumpff.html
index fddc7260c..fe43d4a74 100644
--- a/docs/proc/drift_kepu_stumpff.html
+++ b/docs/proc/drift_kepu_stumpff.html
@@ -338,48 +338,48 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="409,-66 308,-66 308,-42 409,-42 409,-66"/>
 <text text-anchor="middle" x="358.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">drift_kepu_stumpff</text>
 </g>
-<!-- proc~drift_kepu_new -->
+<!-- proc~drift_kepu_fchk -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_node2" class="node">
-<title>proc~drift_kepu_new</title>
-<g id="a_proc~~drift_kepu_stumpff~~CalledByGraph_node2"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
+<title>proc~drift_kepu_fchk</title>
+<g id="a_proc~~drift_kepu_stumpff~~CalledByGraph_node2"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
 <polygon fill="#d9534f" stroke="#d9534f" points="272,-108 187,-108 187,-84 272,-84 272,-108"/>
-<text text-anchor="middle" x="229.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
+<text text-anchor="middle" x="229.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_edge1" class="edge">
-<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
+<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
 <path fill="none" stroke="#000000" d="M266.89,-83.96C280.71,-79.4 296.63,-74.13 311.24,-69.3"/>
 <polygon fill="#000000" stroke="#000000" points="312.71,-72.5 321.1,-66.04 310.51,-65.85 312.71,-72.5"/>
 </g>
-<!-- proc~drift_kepu_fchk -->
+<!-- proc~drift_kepu_lag -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_node3" class="node">
-<title>proc~drift_kepu_fchk</title>
-<g id="a_proc~~drift_kepu_stumpff~~CalledByGraph_node3"><a xlink:href=".././proc/drift_kepu_fchk.html" xlink:title="drift_kepu_fchk">
-<polygon fill="#d9534f" stroke="#d9534f" points="272,-66 187,-66 187,-42 272,-42 272,-66"/>
-<text text-anchor="middle" x="229.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_fchk</text>
+<title>proc~drift_kepu_lag</title>
+<g id="a_proc~~drift_kepu_stumpff~~CalledByGraph_node3"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
+<polygon fill="#d9534f" stroke="#d9534f" points="269.5,-66 189.5,-66 189.5,-42 269.5,-42 269.5,-66"/>
+<text text-anchor="middle" x="229.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_edge2" class="edge">
-<title>proc~drift_kepu_fchk&#45;&gt;proc~drift_kepu_stumpff</title>
-<path fill="none" stroke="#000000" d="M272.08,-54C280.3,-54 289.07,-54 297.75,-54"/>
-<polygon fill="#000000" stroke="#000000" points="297.86,-57.5 307.86,-54 297.86,-50.5 297.86,-57.5"/>
+<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
+<path fill="none" stroke="#000000" d="M269.64,-54C278.53,-54 288.16,-54 297.68,-54"/>
+<polygon fill="#000000" stroke="#000000" points="297.93,-57.5 307.93,-54 297.93,-50.5 297.93,-57.5"/>
 </g>
-<!-- proc~drift_kepu_lag -->
+<!-- proc~drift_kepu_new -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_node4" class="node">
-<title>proc~drift_kepu_lag</title>
-<g id="a_proc~~drift_kepu_stumpff~~CalledByGraph_node4"><a xlink:href=".././proc/drift_kepu_lag.html" xlink:title="drift_kepu_lag">
-<polygon fill="#d9534f" stroke="#d9534f" points="269.5,-24 189.5,-24 189.5,0 269.5,0 269.5,-24"/>
-<text text-anchor="middle" x="229.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_lag</text>
+<title>proc~drift_kepu_new</title>
+<g id="a_proc~~drift_kepu_stumpff~~CalledByGraph_node4"><a xlink:href=".././proc/drift_kepu_new.html" xlink:title="drift_kepu_new">
+<polygon fill="#d9534f" stroke="#d9534f" points="272,-24 187,-24 187,0 272,0 272,-24"/>
+<text text-anchor="middle" x="229.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_new</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff -->
+<!-- proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_edge3" class="edge">
-<title>proc~drift_kepu_lag&#45;&gt;proc~drift_kepu_stumpff</title>
+<title>proc~drift_kepu_new&#45;&gt;proc~drift_kepu_stumpff</title>
 <path fill="none" stroke="#000000" d="M266.89,-24.04C280.71,-28.6 296.63,-33.87 311.24,-38.7"/>
 <polygon fill="#000000" stroke="#000000" points="310.51,-42.15 321.1,-41.96 312.71,-35.5 310.51,-42.15"/>
 </g>
@@ -392,21 +392,21 @@ <h3 class="panel-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_edge4" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
 <path fill="none" stroke="#000000" d="M151.1,-65.48C162.57,-70 175.94,-75.27 188.3,-80.15"/>
 <polygon fill="#000000" stroke="#000000" points="187.36,-83.54 197.95,-83.95 189.93,-77.03 187.36,-83.54"/>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_edge5" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_fchk</title>
-<path fill="none" stroke="#000000" d="M151.1,-54C158.98,-54 167.76,-54 176.49,-54"/>
-<polygon fill="#000000" stroke="#000000" points="176.66,-57.5 186.66,-54 176.66,-50.5 176.66,-57.5"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
+<path fill="none" stroke="#000000" d="M151.1,-54C159.79,-54 169.56,-54 179.16,-54"/>
+<polygon fill="#000000" stroke="#000000" points="179.45,-57.5 189.45,-54 179.45,-50.5 179.45,-57.5"/>
 </g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_lag -->
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_new -->
 <g id="proc~~drift_kepu_stumpff~~CalledByGraph_edge6" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_lag</title>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_new</title>
 <path fill="none" stroke="#000000" d="M151.1,-42.52C162.57,-38 175.94,-32.73 188.3,-27.85"/>
 <polygon fill="#000000" stroke="#000000" points="189.93,-30.97 197.95,-24.05 187.36,-24.46 189.93,-30.97"/>
 </g>
diff --git a/docs/proc/fraggle_generate_fragments.html b/docs/proc/fraggle_generate_fragments.html
index 392361869..139d130fb 100644
--- a/docs/proc/fraggle_generate_fragments.html
+++ b/docs/proc/fraggle_generate_fragments.html
@@ -439,262 +439,262 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~fraggle_generate_fragments~~CallsGraph Pages: 1 -->
-<svg id="procfraggle_generate_fragmentsCallsGraph" width="641pt" height="138pt"
- viewBox="0.00 0.00 641.00 138.18" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~fraggle_generate_fragments~~CallsGraph" class="graph" transform="scale(0.57 0.57) rotate(0) translate(4 238.72)">
+<svg id="procfraggle_generate_fragmentsCallsGraph" width="641pt" height="153pt"
+ viewBox="0.00 0.00 641.00 152.56" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~fraggle_generate_fragments~~CallsGraph" class="graph" transform="scale(0.57 0.57) rotate(0) translate(4 264)">
 <title>proc~~fraggle_generate_fragments~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-238.72 1122,-238.72 1122,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-264 1122,-264 1122,4 -4,4"/>
 <!-- proc~fraggle_generate_fragments -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node1" class="node">
 <title>proc~fraggle_generate_fragments</title>
-<polygon fill="none" stroke="black" points="148,-147 0,-147 0,-123 148,-123 148,-147"/>
-<text text-anchor="middle" x="74" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate_fragments</text>
+<polygon fill="none" stroke="black" points="148,-159 0,-159 0,-135 148,-135 148,-159"/>
+<text text-anchor="middle" x="74" y="-144.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate_fragments</text>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- interface~fraggle_io_log_generate -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node2" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node2"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="319.5,-168 184.5,-168 184.5,-144 319.5,-144 319.5,-168"/>
-<text text-anchor="middle" x="252" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>interface~fraggle_io_log_generate</title>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node2"><a xlink:href=".././interface/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
+<polygon fill="#a7506f" stroke="#a7506f" points="316.5,-260 187.5,-260 187.5,-236 316.5,-236 316.5,-260"/>
+<text text-anchor="middle" x="252" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge1" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
-<path fill="none" stroke="#000000" d="M148.11,-143.72C156.73,-144.75 165.55,-145.8 174.22,-146.84"/>
-<polygon fill="#000000" stroke="#000000" points="173.96,-150.33 184.31,-148.04 174.79,-143.38 173.96,-150.33"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate</title>
+<path fill="none" stroke="#000000" d="M90.16,-159.13C110.58,-175.06 148.46,-203.21 184,-222 190.9,-225.65 198.43,-229.07 205.87,-232.15"/>
+<polygon fill="#000000" stroke="#000000" points="204.61,-235.42 215.2,-235.87 207.2,-228.91 204.61,-235.42"/>
 </g>
 <!-- proc~fraggle_generate_pos_vec -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node3" class="node">
 <title>proc~fraggle_generate_pos_vec</title>
 <g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node3"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="693,-74 553,-74 553,-50 693,-50 693,-74"/>
-<text text-anchor="middle" x="623" y="-59.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="693,-24 553,-24 553,0 693,0 693,-24"/>
+<text text-anchor="middle" x="623" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge2" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec</title>
-<path fill="none" stroke="#000000" d="M101.29,-122.81C123.02,-113.24 154.9,-100.35 184,-93 306.46,-62.06 453.88,-58.18 542.65,-59.3"/>
-<polygon fill="#000000" stroke="#000000" points="542.86,-62.8 552.92,-59.45 542.97,-55.8 542.86,-62.8"/>
+<path fill="none" stroke="#000000" d="M87.23,-134.72C106.25,-116.35 144.81,-81.84 184,-63 299.6,-7.44 451.5,-2.76 542.66,-6.16"/>
+<polygon fill="#000000" stroke="#000000" points="542.79,-9.67 552.93,-6.58 543.08,-2.67 542.79,-9.67"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node4" class="node">
 <title>proc~fraggle_generate_rad_vel</title>
 <g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node4"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="320,-126 184,-126 184,-102 320,-102 320,-126"/>
-<text text-anchor="middle" x="252" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="320,-96 184,-96 184,-72 320,-72 320,-96"/>
+<text text-anchor="middle" x="252" y="-81.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge3" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M148.11,-126.28C156.6,-125.26 165.27,-124.23 173.81,-123.21"/>
-<polygon fill="#000000" stroke="#000000" points="174.23,-126.68 183.75,-122.02 173.4,-119.73 174.23,-126.68"/>
+<path fill="none" stroke="#000000" d="M104.88,-134.89C126.68,-126.21 157,-114.42 184,-105 189.6,-103.04 195.5,-101.07 201.37,-99.16"/>
+<polygon fill="#000000" stroke="#000000" points="202.73,-102.4 211.18,-96.02 200.59,-95.74 202.73,-102.4"/>
 </g>
-<!-- proc~fraggle_generate_spins -->
+<!-- interface~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node5" class="node">
-<title>proc~fraggle_generate_spins</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node5"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
-<polygon fill="#d9534f" stroke="#d9534f" points="314.5,-210 189.5,-210 189.5,-186 314.5,-186 314.5,-210"/>
-<text text-anchor="middle" x="252" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
+<title>interface~fraggle_io_log_one_message</title>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node5"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#a7506f" stroke="#a7506f" points="510,-180 356,-180 356,-156 510,-156 510,-180"/>
+<text text-anchor="middle" x="433" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge4" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins</title>
-<path fill="none" stroke="#000000" d="M104.88,-147.11C126.68,-155.79 157,-167.58 184,-177 189.6,-178.96 195.5,-180.93 201.37,-182.84"/>
-<polygon fill="#000000" stroke="#000000" points="200.59,-186.26 211.18,-185.98 202.73,-179.6 200.59,-186.26"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M98.92,-159.17C120.52,-169.43 153.5,-183.33 184,-189 247.39,-200.79 321.14,-191.7 371.64,-182.07"/>
+<polygon fill="#000000" stroke="#000000" points="372.6,-185.44 381.73,-180.07 371.24,-178.58 372.6,-185.44"/>
 </g>
-<!-- interface~fraggle_io_log_one_message -->
+<!-- proc~fraggle_generate_tan_vel -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node6" class="node">
-<title>interface~fraggle_io_log_one_message</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node6"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#a7506f" stroke="#a7506f" points="510,-230 356,-230 356,-206 510,-206 510,-230"/>
-<text text-anchor="middle" x="433" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="319.5,-138 184.5,-138 184.5,-114 319.5,-114 319.5,-138"/>
+<text text-anchor="middle" x="252" y="-123.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge5" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M85.56,-147.19C103.46,-166.82 141.94,-204.67 184,-219 238.53,-237.57 303.79,-236.46 353.68,-231.17"/>
-<polygon fill="#000000" stroke="#000000" points="354.22,-234.63 363.76,-230.02 353.43,-227.67 354.22,-234.63"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<path fill="none" stroke="#000000" d="M148.11,-138.28C156.73,-137.25 165.55,-136.2 174.22,-135.16"/>
+<polygon fill="#000000" stroke="#000000" points="174.79,-138.62 184.31,-133.96 173.96,-131.67 174.79,-138.62"/>
 </g>
-<!-- interface~fraggle_io_log_generate -->
+<!-- proc~fraggle_generate_spins -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node7" class="node">
-<title>interface~fraggle_io_log_generate</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node7"><a xlink:href=".././interface/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
-<polygon fill="#a7506f" stroke="#a7506f" points="316.5,-24 187.5,-24 187.5,0 316.5,0 316.5,-24"/>
-<text text-anchor="middle" x="252" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
+<title>proc~fraggle_generate_spins</title>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
+<polygon fill="#d9534f" stroke="#d9534f" points="314.5,-180 189.5,-180 189.5,-156 314.5,-156 314.5,-180"/>
+<text text-anchor="middle" x="252" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge6" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_generate</title>
-<path fill="none" stroke="#000000" d="M85.98,-122.72C104.47,-102.65 143.8,-62.57 184,-38 190.15,-34.24 196.93,-30.86 203.75,-27.87"/>
-<polygon fill="#000000" stroke="#000000" points="205.11,-31.09 213.02,-24.04 202.44,-24.62 205.11,-31.09"/>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge9" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M296.01,-168.05C304.08,-170.72 312.38,-173.73 320,-177 336.82,-184.22 339.06,-190.07 356,-197 361.07,-199.07 366.41,-201.01 371.81,-202.81"/>
-<polygon fill="#000000" stroke="#000000" points="370.97,-206.21 381.56,-205.88 373.07,-199.53 370.97,-206.21"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_spins</title>
+<path fill="none" stroke="#000000" d="M148.11,-155.72C158.38,-156.95 168.93,-158.21 179.18,-159.43"/>
+<polygon fill="#000000" stroke="#000000" points="178.96,-162.93 189.3,-160.64 179.79,-155.98 178.96,-162.93"/>
 </g>
-<!-- util_minimize_bfgs -->
+<!-- proc~fraggle_io_log_generate -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node10" class="node">
-<title>util_minimize_bfgs</title>
-<polygon fill="#777777" stroke="#777777" points="483,-104 383,-104 383,-80 483,-80 483,-104"/>
-<text text-anchor="middle" x="433" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge7" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M296.83,-143.96C304.67,-141.33 312.67,-138.33 320,-135 337.07,-127.25 338.8,-120.46 356,-113 361.39,-110.66 367.11,-108.52 372.9,-106.57"/>
-<polygon fill="#000000" stroke="#000000" points="374.18,-109.83 382.65,-103.47 372.06,-103.16 374.18,-109.83"/>
-</g>
-<!-- interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_node11" class="node">
-<title>interface~fraggle_util_vmag_to_vb</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node11"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#a7506f" stroke="#a7506f" points="498,-146 368,-146 368,-122 498,-122 498,-146"/>
-<text text-anchor="middle" x="433" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<title>proc~fraggle_io_log_generate</title>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node10"><a xlink:href=".././proc/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
+<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-260 368.5,-260 368.5,-236 497.5,-236 497.5,-260"/>
+<text text-anchor="middle" x="433" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge8" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M319.65,-147.81C332.12,-146.28 345.23,-144.66 357.91,-143.11"/>
-<polygon fill="#000000" stroke="#000000" points="358.47,-146.56 367.97,-141.87 357.61,-139.62 358.47,-146.56"/>
-</g>
-<!-- lambda_obj -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_node13" class="node">
-<title>lambda_obj</title>
-<polygon fill="#777777" stroke="#777777" points="467,-188 399,-188 399,-164 467,-164 467,-188"/>
-<text text-anchor="middle" x="433" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge10" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M319.65,-163.45C342.78,-166.03 368.09,-168.86 388.82,-171.18"/>
-<polygon fill="#000000" stroke="#000000" points="388.58,-174.67 398.91,-172.3 389.36,-167.71 388.58,-174.67"/>
+<!-- interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge7" class="edge">
+<title>interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M316.61,-248C329.99,-248 344.2,-248 357.92,-248"/>
+<polygon fill="#000000" stroke="#000000" points="358.29,-251.5 368.29,-248 358.29,-244.5 358.29,-251.5"/>
 </g>
 <!-- interface~fraggle_util_shift_vector_to_origin -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_node8" class="node">
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_node13" class="node">
 <title>interface~fraggle_util_shift_vector_to_origin</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node8"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#a7506f" stroke="#a7506f" points="909,-95 736,-95 736,-71 909,-71 909,-95"/>
-<text text-anchor="middle" x="822.5" y="-80.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node13"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
+<polygon fill="#a7506f" stroke="#a7506f" points="909,-45 736,-45 736,-21 909,-21 909,-45"/>
+<text text-anchor="middle" x="822.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge11" class="edge">
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge8" class="edge">
 <title>proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M693.08,-69.34C703.64,-70.47 714.7,-71.64 725.71,-72.81"/>
-<polygon fill="#000000" stroke="#000000" points="725.48,-76.31 735.79,-73.89 726.22,-69.35 725.48,-76.31"/>
+<path fill="none" stroke="#000000" d="M693.08,-19.34C703.64,-20.47 714.7,-21.64 725.71,-22.81"/>
+<polygon fill="#000000" stroke="#000000" points="725.48,-26.31 735.79,-23.89 726.22,-19.35 725.48,-26.31"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge14" class="edge">
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge11" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M305.44,-126.14C310.65,-128.58 315.62,-131.5 320,-135 344.89,-154.89 330.77,-177.54 356,-197 357.85,-198.43 359.79,-199.76 361.8,-201"/>
-<polygon fill="#000000" stroke="#000000" points="360.53,-204.29 371.01,-205.87 363.81,-198.1 360.53,-204.29"/>
+<path fill="none" stroke="#000000" d="M302.75,-96.11C308.8,-98.57 314.71,-101.51 320,-105 340.52,-118.53 335.25,-133.82 356,-147 358.77,-148.76 361.69,-150.38 364.71,-151.86"/>
+<polygon fill="#000000" stroke="#000000" points="363.43,-155.12 374,-155.92 366.23,-148.71 363.43,-155.12"/>
+</g>
+<!-- lambda_obj -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_node8" class="node">
+<title>lambda_obj</title>
+<polygon fill="#777777" stroke="#777777" points="467,-54 399,-54 399,-30 467,-30 467,-54"/>
+<text text-anchor="middle" x="433" y="-39.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
+</g>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge10" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj</title>
+<path fill="none" stroke="#000000" d="M304.29,-71.96C331.11,-65.67 363.55,-58.06 389.03,-52.08"/>
+<polygon fill="#000000" stroke="#000000" points="389.84,-55.49 398.78,-49.79 388.24,-48.67 389.84,-55.49"/>
+</g>
+<!-- util_minimize_bfgs -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_node11" class="node">
+<title>util_minimize_bfgs</title>
+<polygon fill="#777777" stroke="#777777" points="483,-138 383,-138 383,-114 483,-114 483,-138"/>
+<text text-anchor="middle" x="433" y="-123.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge12" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M320.16,-105.75C337.41,-103.63 355.85,-101.36 372.67,-99.29"/>
-<polygon fill="#000000" stroke="#000000" points="373.42,-102.73 382.92,-98.03 372.56,-95.78 373.42,-102.73"/>
+<path fill="none" stroke="#000000" d="M304.29,-96.04C325.71,-101.06 350.71,-106.93 372.89,-112.13"/>
+<polygon fill="#000000" stroke="#000000" points="372.32,-115.59 382.86,-114.47 373.92,-108.78 372.32,-115.59"/>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge13" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M320.16,-121.5C332.33,-122.86 345.09,-124.29 357.45,-125.67"/>
-<polygon fill="#000000" stroke="#000000" points="357.4,-129.19 367.72,-126.82 358.17,-122.23 357.4,-129.19"/>
+<!-- interface~fraggle_util_vmag_to_vb -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_node12" class="node">
+<title>interface~fraggle_util_vmag_to_vb</title>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node12"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#a7506f" stroke="#a7506f" points="498,-96 368,-96 368,-72 498,-72 498,-96"/>
+<text text-anchor="middle" x="433" y="-81.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+</a>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge15" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M296.01,-126.05C304.08,-128.72 312.38,-131.73 320,-135 336.82,-142.22 339.06,-148.07 356,-155 366.48,-159.29 378.11,-162.99 389.07,-166.05"/>
-<polygon fill="#000000" stroke="#000000" points="388.32,-169.47 398.89,-168.67 390.13,-162.71 388.32,-169.47"/>
 </g>
-<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge16" class="edge">
-<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M314.6,-204.88C324.64,-206 335.2,-207.18 345.7,-208.36"/>
-<polygon fill="#000000" stroke="#000000" points="345.41,-211.85 355.73,-209.48 346.18,-204.89 345.41,-211.85"/>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge9" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M320.16,-84C332.33,-84 345.09,-84 357.45,-84"/>
+<polygon fill="#000000" stroke="#000000" points="357.72,-87.5 367.72,-84 357.72,-80.5 357.72,-87.5"/>
 </g>
 <!-- proc~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node9" class="node">
 <title>proc~fraggle_io_log_one_message</title>
 <g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node9"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="700,-230 546,-230 546,-206 700,-206 700,-230"/>
-<text text-anchor="middle" x="623" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="700,-180 546,-180 546,-156 700,-156 700,-180"/>
+<text text-anchor="middle" x="623" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge17" class="edge">
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge13" class="edge">
 <title>interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.2,-218C518.52,-218 527.03,-218 535.47,-218"/>
-<polygon fill="#000000" stroke="#000000" points="535.7,-221.5 545.7,-218 535.7,-214.5 535.7,-221.5"/>
-</g>
-<!-- proc~fraggle_io_log_generate -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_node12" class="node">
-<title>proc~fraggle_io_log_generate</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node12"><a xlink:href=".././proc/fraggle_io_log_generate.html" xlink:title="fraggle_io_log_generate">
-<polygon fill="#d9534f" stroke="#d9534f" points="497.5,-24 368.5,-24 368.5,0 497.5,0 497.5,-24"/>
-<text text-anchor="middle" x="433" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_generate</text>
-</a>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.2,-168C518.52,-168 527.03,-168 535.47,-168"/>
+<polygon fill="#000000" stroke="#000000" points="535.7,-171.5 545.7,-168 535.7,-164.5 535.7,-171.5"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge16" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M304.29,-138.04C325.08,-142.91 349.25,-148.58 370.93,-153.67"/>
+<polygon fill="#000000" stroke="#000000" points="370.16,-157.09 380.7,-155.96 371.76,-150.27 370.16,-157.09"/>
 </g>
-<!-- interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge18" class="edge">
-<title>interface~fraggle_io_log_generate&#45;&gt;proc~fraggle_io_log_generate</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M316.61,-12C329.99,-12 344.2,-12 357.92,-12"/>
-<polygon fill="#000000" stroke="#000000" points="358.29,-15.5 368.29,-12 358.29,-8.5 358.29,-15.5"/>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge15" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj</title>
+<path fill="none" stroke="#000000" d="M302.75,-113.89C308.8,-111.43 314.71,-108.49 320,-105 340.52,-91.47 335.25,-76.18 356,-63 365.92,-56.7 377.73,-52.26 389.06,-49.15"/>
+<polygon fill="#000000" stroke="#000000" points="389.95,-52.53 398.82,-46.74 388.27,-45.74 389.95,-52.53"/>
 </g>
-<!-- proc~fraggle_util_shift_vector_to_origin -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_node14" class="node">
-<title>proc~fraggle_util_shift_vector_to_origin</title>
-<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node14"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#d9534f" stroke="#d9534f" points="1118,-95 945,-95 945,-71 1118,-71 1118,-95"/>
-<text text-anchor="middle" x="1031.5" y="-80.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
-</a>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge17" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
+<path fill="none" stroke="#000000" d="M319.65,-126C337.02,-126 355.62,-126 372.59,-126"/>
+<polygon fill="#000000" stroke="#000000" points="372.91,-129.5 382.91,-126 372.91,-122.5 372.91,-129.5"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge14" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M304.29,-113.96C325.08,-109.09 349.25,-103.42 370.93,-98.33"/>
+<polygon fill="#000000" stroke="#000000" points="371.76,-101.73 380.7,-96.04 370.16,-94.91 371.76,-101.73"/>
 </g>
-<!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge19" class="edge">
-<title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.19,-83C917.66,-83 926.3,-83 934.87,-83"/>
-<polygon fill="#000000" stroke="#000000" points="934.88,-86.5 944.88,-83 934.88,-79.5 934.88,-86.5"/>
+<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge18" class="edge">
+<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M314.6,-168C324.64,-168 335.2,-168 345.7,-168"/>
+<polygon fill="#000000" stroke="#000000" points="345.73,-171.5 355.73,-168 345.73,-164.5 345.73,-171.5"/>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_node15" class="node">
 <title>proc~fraggle_util_vmag_to_vb</title>
 <g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node15"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="688,-126 558,-126 558,-102 688,-102 688,-126"/>
-<text text-anchor="middle" x="623" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="688,-76 558,-76 558,-52 688,-52 688,-76"/>
+<text text-anchor="middle" x="623" y="-61.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge20" class="edge">
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge19" class="edge">
 <title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M498.17,-127.17C514.12,-125.48 531.34,-123.64 547.72,-121.9"/>
-<polygon fill="#000000" stroke="#000000" points="548.22,-125.37 557.8,-120.83 547.48,-118.41 548.22,-125.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M498.17,-77.17C514.12,-75.48 531.34,-73.64 547.72,-71.9"/>
+<polygon fill="#000000" stroke="#000000" points="548.22,-75.37 557.8,-70.83 547.48,-68.41 548.22,-75.37"/>
+</g>
+<!-- proc~fraggle_util_shift_vector_to_origin -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_node14" class="node">
+<title>proc~fraggle_util_shift_vector_to_origin</title>
+<g id="a_proc~~fraggle_generate_fragments~~CallsGraph_node14"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
+<polygon fill="#d9534f" stroke="#d9534f" points="1118,-45 945,-45 945,-21 1118,-21 1118,-45"/>
+<text text-anchor="middle" x="1031.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+</a>
+</g>
+</g>
+<!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
+<g id="proc~~fraggle_generate_fragments~~CallsGraph_edge20" class="edge">
+<title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.19,-33C917.66,-33 926.3,-33 934.87,-33"/>
+<polygon fill="#000000" stroke="#000000" points="934.88,-36.5 944.88,-33 934.88,-29.5 934.88,-36.5"/>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_fragments~~CallsGraph_edge21" class="edge">
 <title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M688.12,-103.94C703,-101.6 719.07,-99.08 734.74,-96.62"/>
-<polygon fill="#000000" stroke="#000000" points="735.63,-100.02 744.96,-95.01 734.54,-93.11 735.63,-100.02"/>
+<path fill="none" stroke="#000000" d="M688.12,-53.94C703,-51.6 719.07,-49.08 734.74,-46.62"/>
+<polygon fill="#000000" stroke="#000000" points="735.63,-50.02 744.96,-45.01 734.54,-43.11 735.63,-50.02"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/fraggle_generate_rad_vel.html b/docs/proc/fraggle_generate_rad_vel.html
index 115baec2f..5fd18f271 100644
--- a/docs/proc/fraggle_generate_rad_vel.html
+++ b/docs/proc/fraggle_generate_rad_vel.html
@@ -136,7 +136,7 @@ <h1>fraggle_generate_rad_vel
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">77 statements</a>
+    title=" 0.1% of total for procedures.">79 statements</a>
      </li> 
      
      
@@ -304,119 +304,119 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="136,-87 0,-87 0,-63 136,-63 136,-87"/>
 <text text-anchor="middle" x="68" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate_rad_vel</text>
 </g>
-<!-- util_minimize_bfgs -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node2" class="node">
-<title>util_minimize_bfgs</title>
-<polygon fill="#777777" stroke="#777777" points="299,-150 199,-150 199,-126 299,-126 299,-150"/>
-<text text-anchor="middle" x="249" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
-</g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge1" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M96.21,-87.12C116.78,-96.03 145.86,-108.09 172,-117 178.27,-119.14 184.88,-121.21 191.48,-123.18"/>
-<polygon fill="#000000" stroke="#000000" points="190.53,-126.55 201.11,-125.98 192.48,-119.83 190.53,-126.55"/>
-</g>
 <!-- interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node3" class="node">
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node2" class="node">
 <title>interface~fraggle_util_vmag_to_vb</title>
-<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node3"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#a7506f" stroke="#a7506f" points="314,-108 184,-108 184,-84 314,-84 314,-108"/>
-<text text-anchor="middle" x="249" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node2"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#a7506f" stroke="#a7506f" points="314,-150 184,-150 184,-126 314,-126 314,-150"/>
+<text text-anchor="middle" x="249" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge2" class="edge">
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge1" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M136.16,-82.88C148.33,-84.31 161.09,-85.8 173.45,-87.25"/>
-<polygon fill="#000000" stroke="#000000" points="173.38,-90.77 183.72,-88.46 174.2,-83.82 173.38,-90.77"/>
+<path fill="none" stroke="#000000" d="M96.21,-87.12C116.78,-96.03 145.86,-108.09 172,-117 178.27,-119.14 184.88,-121.21 191.48,-123.18"/>
+<polygon fill="#000000" stroke="#000000" points="190.53,-126.55 201.11,-125.98 192.48,-119.83 190.53,-126.55"/>
 </g>
 <!-- lambda_obj -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node4" class="node">
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node3" class="node">
 <title>lambda_obj</title>
-<polygon fill="#777777" stroke="#777777" points="283,-66 215,-66 215,-42 283,-42 283,-66"/>
-<text text-anchor="middle" x="249" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
+<polygon fill="#777777" stroke="#777777" points="283,-108 215,-108 215,-84 283,-84 283,-108"/>
+<text text-anchor="middle" x="249" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge4" class="edge">
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge2" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M136.16,-67.12C159.08,-64.43 184.08,-61.5 204.62,-59.09"/>
-<polygon fill="#000000" stroke="#000000" points="205.09,-62.56 214.62,-57.92 204.28,-55.61 205.09,-62.56"/>
+<path fill="none" stroke="#000000" d="M136.16,-82.88C159.08,-85.57 184.08,-88.5 204.62,-90.91"/>
+<polygon fill="#000000" stroke="#000000" points="204.28,-94.39 214.62,-92.08 205.09,-87.44 204.28,-94.39"/>
 </g>
 <!-- interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node5" class="node">
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node4" class="node">
 <title>interface~fraggle_io_log_one_message</title>
-<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node5"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#a7506f" stroke="#a7506f" points="326,-24 172,-24 172,0 326,0 326,-24"/>
-<text text-anchor="middle" x="249" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node4"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#a7506f" stroke="#a7506f" points="326,-66 172,-66 172,-42 326,-42 326,-66"/>
+<text text-anchor="middle" x="249" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge3" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M136.16,-67.12C144.5,-66.14 153.12,-65.13 161.7,-64.12"/>
+<polygon fill="#000000" stroke="#000000" points="162.21,-67.59 171.74,-62.95 161.4,-60.64 162.21,-67.59"/>
+</g>
+<!-- util_minimize_bfgs -->
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node5" class="node">
+<title>util_minimize_bfgs</title>
+<polygon fill="#777777" stroke="#777777" points="299,-24 199,-24 199,0 299,0 299,-24"/>
+<text text-anchor="middle" x="249" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
+</g>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs -->
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge4" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;util_minimize_bfgs</title>
 <path fill="none" stroke="#000000" d="M96.21,-62.88C116.78,-53.97 145.86,-41.91 172,-33 178.27,-30.86 184.88,-28.79 191.48,-26.82"/>
 <polygon fill="#000000" stroke="#000000" points="192.48,-30.17 201.11,-24.02 190.53,-23.45 192.48,-30.17"/>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node7" class="node">
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node6" class="node">
 <title>proc~fraggle_util_vmag_to_vb</title>
-<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="504,-108 374,-108 374,-84 504,-84 504,-108"/>
-<text text-anchor="middle" x="439" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="504,-150 374,-150 374,-126 504,-126 504,-150"/>
+<text text-anchor="middle" x="439" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
 <g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge5" class="edge">
 <title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.17,-96C330.12,-96 347.34,-96 363.72,-96"/>
-<polygon fill="#000000" stroke="#000000" points="363.8,-99.5 373.8,-96 363.8,-92.5 363.8,-99.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.17,-138C330.12,-138 347.34,-138 363.72,-138"/>
+<polygon fill="#000000" stroke="#000000" points="363.8,-141.5 373.8,-138 363.8,-134.5 363.8,-141.5"/>
 </g>
 <!-- proc~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node6" class="node">
+<g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node7" class="node">
 <title>proc~fraggle_io_log_one_message</title>
-<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="516,-24 362,-24 362,0 516,0 516,-24"/>
-<text text-anchor="middle" x="439" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#d9534f" stroke="#d9534f" points="516,-66 362,-66 362,-42 516,-42 516,-66"/>
+<text text-anchor="middle" x="439" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge6" class="edge">
 <title>interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.2,-12C334.52,-12 343.03,-12 351.47,-12"/>
-<polygon fill="#000000" stroke="#000000" points="351.7,-15.5 361.7,-12 351.7,-8.5 351.7,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.2,-54C334.52,-54 343.03,-54 351.47,-54"/>
+<polygon fill="#000000" stroke="#000000" points="351.7,-57.5 361.7,-54 351.7,-50.5 351.7,-57.5"/>
 </g>
 <!-- interface~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node8" class="node">
 <title>interface~fraggle_util_shift_vector_to_origin</title>
 <g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node8"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#a7506f" stroke="#a7506f" points="725,-108 552,-108 552,-84 725,-84 725,-108"/>
-<text text-anchor="middle" x="638.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="725,-150 552,-150 552,-126 725,-126 725,-150"/>
+<text text-anchor="middle" x="638.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge7" class="edge">
 <title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M504.12,-96C516.12,-96 528.9,-96 541.62,-96"/>
-<polygon fill="#000000" stroke="#000000" points="541.78,-99.5 551.78,-96 541.78,-92.5 541.78,-99.5"/>
+<path fill="none" stroke="#000000" d="M504.12,-138C516.12,-138 528.9,-138 541.62,-138"/>
+<polygon fill="#000000" stroke="#000000" points="541.78,-141.5 551.78,-138 541.78,-134.5 541.78,-141.5"/>
 </g>
 <!-- proc~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_rad_vel~~CallsGraph_node9" class="node">
 <title>proc~fraggle_util_shift_vector_to_origin</title>
 <g id="a_proc~~fraggle_generate_rad_vel~~CallsGraph_node9"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#d9534f" stroke="#d9534f" points="934,-108 761,-108 761,-84 934,-84 934,-108"/>
-<text text-anchor="middle" x="847.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="934,-150 761,-150 761,-126 934,-126 934,-150"/>
+<text text-anchor="middle" x="847.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_rad_vel~~CallsGraph_edge8" class="edge">
 <title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M725.19,-96C733.66,-96 742.3,-96 750.87,-96"/>
-<polygon fill="#000000" stroke="#000000" points="750.88,-99.5 760.88,-96 750.88,-92.5 750.88,-99.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M725.19,-138C733.66,-138 742.3,-138 750.87,-138"/>
+<polygon fill="#000000" stroke="#000000" points="750.88,-141.5 760.88,-138 750.88,-134.5 750.88,-141.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/fraggle_generate_tan_vel.html b/docs/proc/fraggle_generate_tan_vel.html
index ddd4fb210..5a4efc40a 100644
--- a/docs/proc/fraggle_generate_tan_vel.html
+++ b/docs/proc/fraggle_generate_tan_vel.html
@@ -311,119 +311,119 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="135,-87 0,-87 0,-63 135,-63 135,-87"/>
 <text text-anchor="middle" x="67.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate_tan_vel</text>
 </g>
-<!-- util_minimize_bfgs -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node2" class="node">
-<title>util_minimize_bfgs</title>
-<polygon fill="#777777" stroke="#777777" points="298,-150 198,-150 198,-126 298,-126 298,-150"/>
-<text text-anchor="middle" x="248" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge1" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
-<path fill="none" stroke="#000000" d="M95.57,-87.13C116.04,-96.05 144.98,-108.11 171,-117 177.27,-119.14 183.88,-121.22 190.48,-123.19"/>
-<polygon fill="#000000" stroke="#000000" points="189.53,-126.56 200.11,-125.99 191.48,-119.84 189.53,-126.56"/>
-</g>
 <!-- interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node3" class="node">
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node2" class="node">
 <title>interface~fraggle_util_vmag_to_vb</title>
-<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node3"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#a7506f" stroke="#a7506f" points="313,-108 183,-108 183,-84 313,-84 313,-108"/>
-<text text-anchor="middle" x="248" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node2"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#a7506f" stroke="#a7506f" points="313,-150 183,-150 183,-126 313,-126 313,-150"/>
+<text text-anchor="middle" x="248" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge2" class="edge">
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge1" class="edge">
 <title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M135.22,-82.85C147.37,-84.28 160.11,-85.78 172.46,-87.23"/>
-<polygon fill="#000000" stroke="#000000" points="172.39,-90.75 182.73,-88.44 173.21,-83.79 172.39,-90.75"/>
+<path fill="none" stroke="#000000" d="M95.57,-87.13C116.04,-96.05 144.98,-108.11 171,-117 177.27,-119.14 183.88,-121.22 190.48,-123.19"/>
+<polygon fill="#000000" stroke="#000000" points="189.53,-126.56 200.11,-125.99 191.48,-119.84 189.53,-126.56"/>
 </g>
 <!-- lambda_obj -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node4" class="node">
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node3" class="node">
 <title>lambda_obj</title>
-<polygon fill="#777777" stroke="#777777" points="282,-66 214,-66 214,-42 282,-42 282,-66"/>
-<text text-anchor="middle" x="248" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
+<polygon fill="#777777" stroke="#777777" points="282,-108 214,-108 214,-84 282,-84 282,-108"/>
+<text text-anchor="middle" x="248" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_obj</text>
 </g>
 <!-- proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge4" class="edge">
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge2" class="edge">
 <title>proc~fraggle_generate_tan_vel&#45;&gt;lambda_obj</title>
-<path fill="none" stroke="#000000" d="M135.22,-67.15C158.09,-64.46 183.08,-61.52 203.61,-59.1"/>
-<polygon fill="#000000" stroke="#000000" points="204.09,-62.57 213.61,-57.93 203.27,-55.62 204.09,-62.57"/>
+<path fill="none" stroke="#000000" d="M135.22,-82.85C158.09,-85.54 183.08,-88.48 203.61,-90.9"/>
+<polygon fill="#000000" stroke="#000000" points="203.27,-94.38 213.61,-92.07 204.09,-87.43 203.27,-94.38"/>
 </g>
 <!-- interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node5" class="node">
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node4" class="node">
 <title>interface~fraggle_io_log_one_message</title>
-<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node5"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#a7506f" stroke="#a7506f" points="325,-24 171,-24 171,0 325,0 325,-24"/>
-<text text-anchor="middle" x="248" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node4"><a xlink:href=".././interface/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#a7506f" stroke="#a7506f" points="325,-66 171,-66 171,-42 325,-42 325,-66"/>
+<text text-anchor="middle" x="248" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge3" class="edge">
 <title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M135.22,-67.15C143.55,-66.17 152.16,-65.16 160.73,-64.15"/>
+<polygon fill="#000000" stroke="#000000" points="161.23,-67.61 170.75,-62.97 160.41,-60.66 161.23,-67.61"/>
+</g>
+<!-- util_minimize_bfgs -->
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node5" class="node">
+<title>util_minimize_bfgs</title>
+<polygon fill="#777777" stroke="#777777" points="298,-24 198,-24 198,0 298,0 298,-24"/>
+<text text-anchor="middle" x="248" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs</text>
+</g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs -->
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge4" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;util_minimize_bfgs</title>
 <path fill="none" stroke="#000000" d="M95.57,-62.87C116.04,-53.95 144.98,-41.89 171,-33 177.27,-30.86 183.88,-28.78 190.48,-26.81"/>
 <polygon fill="#000000" stroke="#000000" points="191.48,-30.16 200.11,-24.01 189.53,-23.44 191.48,-30.16"/>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node7" class="node">
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node6" class="node">
 <title>proc~fraggle_util_vmag_to_vb</title>
-<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="503,-108 373,-108 373,-84 503,-84 503,-108"/>
-<text text-anchor="middle" x="438" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="503,-150 373,-150 373,-126 503,-126 503,-150"/>
+<text text-anchor="middle" x="438" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
 <g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge5" class="edge">
 <title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.17,-96C329.12,-96 346.34,-96 362.72,-96"/>
-<polygon fill="#000000" stroke="#000000" points="362.8,-99.5 372.8,-96 362.8,-92.5 362.8,-99.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.17,-138C329.12,-138 346.34,-138 362.72,-138"/>
+<polygon fill="#000000" stroke="#000000" points="362.8,-141.5 372.8,-138 362.8,-134.5 362.8,-141.5"/>
 </g>
 <!-- proc~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node6" class="node">
+<g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node7" class="node">
 <title>proc~fraggle_io_log_one_message</title>
-<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="515,-24 361,-24 361,0 515,0 515,-24"/>
-<text text-anchor="middle" x="438" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node7"><a xlink:href=".././proc/fraggle_io_log_one_message.html" xlink:title="fraggle_io_log_one_message">
+<polygon fill="#d9534f" stroke="#d9534f" points="515,-66 361,-66 361,-42 515,-42 515,-66"/>
+<text text-anchor="middle" x="438" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge6" class="edge">
 <title>interface~fraggle_io_log_one_message&#45;&gt;proc~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M325.2,-12C333.52,-12 342.03,-12 350.47,-12"/>
-<polygon fill="#000000" stroke="#000000" points="350.7,-15.5 360.7,-12 350.7,-8.5 350.7,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M325.2,-54C333.52,-54 342.03,-54 350.47,-54"/>
+<polygon fill="#000000" stroke="#000000" points="350.7,-57.5 360.7,-54 350.7,-50.5 350.7,-57.5"/>
 </g>
 <!-- interface~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node8" class="node">
 <title>interface~fraggle_util_shift_vector_to_origin</title>
 <g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node8"><a xlink:href=".././interface/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#a7506f" stroke="#a7506f" points="724,-108 551,-108 551,-84 724,-84 724,-108"/>
-<text text-anchor="middle" x="637.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="724,-150 551,-150 551,-126 724,-126 724,-150"/>
+<text text-anchor="middle" x="637.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge7" class="edge">
 <title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M503.12,-96C515.12,-96 527.9,-96 540.62,-96"/>
-<polygon fill="#000000" stroke="#000000" points="540.78,-99.5 550.78,-96 540.78,-92.5 540.78,-99.5"/>
+<path fill="none" stroke="#000000" d="M503.12,-138C515.12,-138 527.9,-138 540.62,-138"/>
+<polygon fill="#000000" stroke="#000000" points="540.78,-141.5 550.78,-138 540.78,-134.5 540.78,-141.5"/>
 </g>
 <!-- proc~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_tan_vel~~CallsGraph_node9" class="node">
 <title>proc~fraggle_util_shift_vector_to_origin</title>
 <g id="a_proc~~fraggle_generate_tan_vel~~CallsGraph_node9"><a xlink:href=".././proc/fraggle_util_shift_vector_to_origin.html" xlink:title="fraggle_util_shift_vector_to_origin">
-<polygon fill="#d9534f" stroke="#d9534f" points="933,-108 760,-108 760,-84 933,-84 933,-108"/>
-<text text-anchor="middle" x="846.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="933,-150 760,-150 760,-126 933,-126 933,-150"/>
+<text text-anchor="middle" x="846.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_shift_vector_to_origin</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin -->
 <g id="proc~~fraggle_generate_tan_vel~~CallsGraph_edge8" class="edge">
 <title>interface~fraggle_util_shift_vector_to_origin&#45;&gt;proc~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M724.19,-96C732.66,-96 741.3,-96 749.87,-96"/>
-<polygon fill="#000000" stroke="#000000" points="749.88,-99.5 759.88,-96 749.88,-92.5 749.88,-99.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M724.19,-138C732.66,-138 741.3,-138 749.87,-138"/>
+<polygon fill="#000000" stroke="#000000" points="749.88,-141.5 759.88,-138 749.88,-134.5 749.88,-141.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/fraggle_io_log_one_message.html b/docs/proc/fraggle_io_log_one_message.html
index 5030b09d0..421b9ae49 100644
--- a/docs/proc/fraggle_io_log_one_message.html
+++ b/docs/proc/fraggle_io_log_one_message.html
@@ -292,67 +292,55 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M699.2,-96C707.52,-96 716.03,-96 724.47,-96"/>
 <polygon fill="#000000" stroke="#000000" points="724.7,-99.5 734.7,-96 724.7,-92.5 724.7,-99.5"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments -->
 <g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node3" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="506,-150 371,-150 371,-126 506,-126 506,-150"/>
-<text text-anchor="middle" x="438.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>proc~fraggle_generate_fragments</title>
+<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
+<polygon fill="#d9534f" stroke="#d9534f" points="332,-129 184,-129 184,-105 332,-105 332,-129"/>
+<text text-anchor="middle" x="258" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
 <g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge2" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M491.51,-125.96C512.59,-121.09 537.09,-115.42 559.08,-110.33"/>
-<polygon fill="#000000" stroke="#000000" points="560.03,-113.7 568.98,-108.04 558.45,-106.88 560.03,-113.7"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M282.92,-129.17C304.52,-139.43 337.5,-153.33 368,-159 429.61,-170.46 448.38,-174.88 509,-159 542,-150.35 575.55,-129.56 597.2,-114.21"/>
+<polygon fill="#000000" stroke="#000000" points="599.41,-116.93 605.45,-108.22 595.3,-111.27 599.41,-116.93"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel -->
 <g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node4" class="node">
 <title>proc~fraggle_generate_rad_vel</title>
 <g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-108 370.5,-108 370.5,-84 506.5,-84 506.5,-108"/>
-<text text-anchor="middle" x="438.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="506.5,-150 370.5,-150 370.5,-126 506.5,-126 506.5,-150"/>
+<text text-anchor="middle" x="438.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge3" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M506.57,-96C515.69,-96 525.15,-96 534.56,-96"/>
-<polygon fill="#000000" stroke="#000000" points="534.72,-99.5 544.72,-96 534.72,-92.5 534.72,-99.5"/>
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge8" class="edge">
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
+<path fill="none" stroke="#000000" d="M332.12,-125.6C341.38,-126.69 350.88,-127.81 360.21,-128.91"/>
+<polygon fill="#000000" stroke="#000000" points="359.9,-132.39 370.24,-130.09 360.71,-125.44 359.9,-132.39"/>
 </g>
-<!-- proc~fraggle_generate_fragments -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node5" class="node">
-<title>proc~fraggle_generate_fragments</title>
-<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node5"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
-<polygon fill="#d9534f" stroke="#d9534f" points="332,-129 184,-129 184,-105 332,-105 332,-129"/>
-<text text-anchor="middle" x="258" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
+<!-- proc~fraggle_generate_tan_vel -->
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node6" class="node">
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node6"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="506,-108 371,-108 371,-84 506,-84 506,-108"/>
+<text text-anchor="middle" x="438.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge4" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M282.92,-129.17C304.52,-139.43 337.5,-153.33 368,-159 429.61,-170.46 448.38,-174.88 509,-159 542,-150.35 575.55,-129.56 597.2,-114.21"/>
-<polygon fill="#000000" stroke="#000000" points="599.41,-116.93 605.45,-108.22 595.3,-111.27 599.41,-116.93"/>
-</g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge7" class="edge">
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge9" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
-<path fill="none" stroke="#000000" d="M332.12,-125.6C341.52,-126.71 351.17,-127.84 360.63,-128.96"/>
-<polygon fill="#000000" stroke="#000000" points="360.47,-132.46 370.81,-130.15 361.28,-125.51 360.47,-132.46"/>
-</g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge8" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M332.12,-108.4C341.38,-107.31 350.88,-106.19 360.21,-105.09"/>
-<polygon fill="#000000" stroke="#000000" points="360.71,-108.56 370.24,-103.91 359.9,-101.61 360.71,-108.56"/>
+<path fill="none" stroke="#000000" d="M332.12,-108.4C341.52,-107.29 351.17,-106.16 360.63,-105.04"/>
+<polygon fill="#000000" stroke="#000000" points="361.28,-108.49 370.81,-103.85 360.47,-101.54 361.28,-108.49"/>
 </g>
 <!-- proc~fraggle_generate_spins -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node6" class="node">
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node7" class="node">
 <title>proc~fraggle_generate_spins</title>
-<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node6"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
+<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node7"><a xlink:href=".././proc/fraggle_generate_spins.html" xlink:title="fraggle_generate_spins">
 <polygon fill="#d9534f" stroke="#d9534f" points="501,-66 376,-66 376,-42 501,-42 501,-66"/>
 <text text-anchor="middle" x="438.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_spins</text>
 </a>
@@ -364,27 +352,39 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M288.39,-104.99C310.2,-96.25 340.76,-84.35 368,-75 373.87,-72.99 380.05,-70.97 386.2,-69.03"/>
 <polygon fill="#000000" stroke="#000000" points="387.3,-72.35 395.81,-66.05 385.22,-65.67 387.3,-72.35"/>
 </g>
-<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge5" class="edge">
-<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M491.51,-66.04C512.59,-70.91 537.09,-76.58 559.08,-81.67"/>
-<polygon fill="#000000" stroke="#000000" points="558.45,-85.12 568.98,-83.96 560.03,-78.3 558.45,-85.12"/>
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge3" class="edge">
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M491.51,-125.96C512.59,-121.09 537.09,-115.42 559.08,-110.33"/>
+<polygon fill="#000000" stroke="#000000" points="560.03,-113.7 568.98,-108.04 558.45,-106.88 560.03,-113.7"/>
 </g>
 <!-- proc~fraggle_regime_collresolve -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node7" class="node">
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node5" class="node">
 <title>proc~fraggle_regime_collresolve</title>
-<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node7"><a xlink:href=".././proc/fraggle_regime_collresolve.html" xlink:title="fraggle_regime_collresolve">
+<g id="a_proc~~fraggle_io_log_one_message~~CalledByGraph_node5"><a xlink:href=".././proc/fraggle_regime_collresolve.html" xlink:title="fraggle_regime_collresolve">
 <polygon fill="#d9534f" stroke="#d9534f" points="509,-24 368,-24 368,0 509,0 509,-24"/>
 <text text-anchor="middle" x="438.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime_collresolve</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge6" class="edge">
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge4" class="edge">
 <title>proc~fraggle_regime_collresolve&#45;&gt;interface~fraggle_io_log_one_message</title>
 <path fill="none" stroke="#000000" d="M484.51,-24.02C492.77,-26.67 501.23,-29.69 509,-33 539.3,-45.92 571.91,-64.89 594.08,-78.64"/>
 <polygon fill="#000000" stroke="#000000" points="592.29,-81.65 602.62,-83.99 596.01,-75.72 592.29,-81.65"/>
 </g>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge5" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M506.05,-96C515.44,-96 525.2,-96 534.89,-96"/>
+<polygon fill="#000000" stroke="#000000" points="534.94,-99.5 544.94,-96 534.94,-92.5 534.94,-99.5"/>
+</g>
+<!-- proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message -->
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge6" class="edge">
+<title>proc~fraggle_generate_spins&#45;&gt;interface~fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M491.51,-66.04C512.59,-70.91 537.09,-76.58 559.08,-81.67"/>
+<polygon fill="#000000" stroke="#000000" points="558.45,-85.12 568.98,-83.96 560.03,-78.3 558.45,-85.12"/>
+</g>
 <!-- interface~fraggle_generate_fragments -->
 <g id="proc~~fraggle_io_log_one_message~~CalledByGraph_node8" class="node">
 <title>interface~fraggle_generate_fragments</title>
@@ -395,7 +395,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments -->
-<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge9" class="edge">
+<g id="proc~~fraggle_io_log_one_message~~CalledByGraph_edge7" class="edge">
 <title>interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.24,-117C156.6,-117 165.16,-117 173.64,-117"/>
 <polygon fill="#000000" stroke="#000000" points="173.91,-120.5 183.91,-117 173.91,-113.5 173.91,-120.5"/>
diff --git a/docs/proc/fraggle_setup_fragments.html b/docs/proc/fraggle_setup_fragments.html
index e9ecc82c7..db2778222 100644
--- a/docs/proc/fraggle_setup_fragments.html
+++ b/docs/proc/fraggle_setup_fragments.html
@@ -251,7 +251,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~37"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~41"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/fraggle_util_get_energy_momentum.html b/docs/proc/fraggle_util_get_energy_momentum.html
index 234efae02..b8099e8c6 100644
--- a/docs/proc/fraggle_util_get_energy_momentum.html
+++ b/docs/proc/fraggle_util_get_energy_momentum.html
@@ -339,20 +339,17 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="185,-66 0,-66 0,-42 185,-42 185,-66"/>
 <text text-anchor="middle" x="92.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_util_get_energy_momentum</text>
 </g>
-<!-- interface~fraggle_util_construct_temporary_system -->
+<!-- util_exit -->
 <g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node2" class="node">
-<title>interface~fraggle_util_construct_temporary_system</title>
-<g id="a_proc~~fraggle_util_get_energy_momentum~~CallsGraph_node2"><a xlink:href=".././interface/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="430,-108 221,-108 221,-84 430,-84 430,-108"/>
-<text text-anchor="middle" x="325.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
-</a>
-</g>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="352.5,-108 298.5,-108 298.5,-84 352.5,-84 352.5,-108"/>
+<text text-anchor="middle" x="325.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system -->
-<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge3" class="edge">
-<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system</title>
-<path fill="none" stroke="#000000" d="M159.7,-66.04C187.36,-71.07 219.68,-76.94 248.33,-82.15"/>
-<polygon fill="#000000" stroke="#000000" points="247.83,-85.62 258.3,-83.96 249.08,-78.73 247.83,-85.62"/>
+<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit -->
+<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge1" class="edge">
+<title>proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M159.7,-66.04C201.5,-73.64 253.91,-83.17 288.26,-89.41"/>
+<polygon fill="#000000" stroke="#000000" points="287.84,-92.89 298.31,-91.24 289.1,-86.01 287.84,-92.89"/>
 </g>
 <!-- interface~fraggle_util_add_fragments_to_system -->
 <g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node3" class="node">
@@ -364,64 +361,67 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system -->
-<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge1" class="edge">
+<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge2" class="edge">
 <title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_add_fragments_to_system</title>
 <path fill="none" stroke="#000000" d="M185.13,-54C195.24,-54 205.6,-54 215.89,-54"/>
 <polygon fill="#000000" stroke="#000000" points="216.15,-57.5 226.15,-54 216.15,-50.5 216.15,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- interface~fraggle_util_construct_temporary_system -->
 <g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="352.5,-24 298.5,-24 298.5,0 352.5,0 352.5,-24"/>
-<text text-anchor="middle" x="325.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit -->
-<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge2" class="edge">
-<title>proc~fraggle_util_get_energy_momentum&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M159.7,-41.96C201.5,-34.36 253.91,-24.83 288.26,-18.59"/>
-<polygon fill="#000000" stroke="#000000" points="289.1,-21.99 298.31,-16.76 287.84,-15.11 289.1,-21.99"/>
-</g>
-<!-- proc~fraggle_util_construct_temporary_system -->
-<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node6" class="node">
-<title>proc~fraggle_util_construct_temporary_system</title>
-<g id="a_proc~~fraggle_util_get_energy_momentum~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="675,-108 466,-108 466,-84 675,-84 675,-108"/>
-<text text-anchor="middle" x="570.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
+<title>interface~fraggle_util_construct_temporary_system</title>
+<g id="a_proc~~fraggle_util_get_energy_momentum~~CallsGraph_node4"><a xlink:href=".././interface/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="430,-24 221,-24 221,0 430,0 430,-24"/>
+<text text-anchor="middle" x="325.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
 </a>
 </g>
 </g>
-<!-- interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system -->
-<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge4" class="edge">
-<title>interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M430.26,-96C438.6,-96 447.06,-96 455.48,-96"/>
-<polygon fill="#000000" stroke="#000000" points="455.7,-99.5 465.7,-96 455.7,-92.5 455.7,-99.5"/>
+<!-- proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system -->
+<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge3" class="edge">
+<title>proc~fraggle_util_get_energy_momentum&#45;&gt;interface~fraggle_util_construct_temporary_system</title>
+<path fill="none" stroke="#000000" d="M159.7,-41.96C187.36,-36.93 219.68,-31.06 248.33,-25.85"/>
+<polygon fill="#000000" stroke="#000000" points="249.08,-29.27 258.3,-24.04 247.83,-22.38 249.08,-29.27"/>
 </g>
 <!-- proc~fraggle_util_add_fragments_to_system -->
-<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node5" class="node">
+<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node6" class="node">
 <title>proc~fraggle_util_add_fragments_to_system</title>
-<g id="a_proc~~fraggle_util_get_energy_momentum~~CallsGraph_node5"><a xlink:href=".././proc/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
+<g id="a_proc~~fraggle_util_get_energy_momentum~~CallsGraph_node6"><a xlink:href=".././proc/fraggle_util_add_fragments_to_system.html" xlink:title="fraggle_util_add_fragments_to_system">
 <polygon fill="#d9534f" stroke="#d9534f" points="669.5,-66 471.5,-66 471.5,-42 669.5,-42 669.5,-66"/>
 <text text-anchor="middle" x="570.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_add_fragments_to_system</text>
 </a>
 </g>
 </g>
 <!-- interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system -->
-<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge5" class="edge">
+<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge4" class="edge">
 <title>interface~fraggle_util_add_fragments_to_system&#45;&gt;proc~fraggle_util_add_fragments_to_system</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.64,-54C436.68,-54 449.04,-54 461.21,-54"/>
 <polygon fill="#000000" stroke="#000000" points="461.39,-57.5 471.39,-54 461.39,-50.5 461.39,-57.5"/>
 </g>
+<!-- proc~fraggle_util_construct_temporary_system -->
+<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node5" class="node">
+<title>proc~fraggle_util_construct_temporary_system</title>
+<g id="a_proc~~fraggle_util_get_energy_momentum~~CallsGraph_node5"><a xlink:href=".././proc/fraggle_util_construct_temporary_system.html" xlink:title="fraggle_util_construct_temporary_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="675,-24 466,-24 466,0 675,0 675,-24"/>
+<text text-anchor="middle" x="570.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_construct_temporary_system</text>
+</a>
+</g>
+</g>
+<!-- interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system -->
+<g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge5" class="edge">
+<title>interface~fraggle_util_construct_temporary_system&#45;&gt;proc~fraggle_util_construct_temporary_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M430.26,-12C438.6,-12 447.06,-12 455.48,-12"/>
+<polygon fill="#000000" stroke="#000000" points="455.7,-15.5 465.7,-12 455.7,-8.5 455.7,-15.5"/>
+</g>
 <!-- setup_construct_system -->
 <g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_node7" class="node">
 <title>setup_construct_system</title>
-<polygon fill="#777777" stroke="#777777" points="839,-108 711,-108 711,-84 839,-84 839,-108"/>
-<text text-anchor="middle" x="775" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<polygon fill="#777777" stroke="#777777" points="839,-24 711,-24 711,0 839,0 839,-24"/>
+<text text-anchor="middle" x="775" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </g>
 <!-- proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system -->
 <g id="proc~~fraggle_util_get_energy_momentum~~CallsGraph_edge6" class="edge">
 <title>proc~fraggle_util_construct_temporary_system&#45;&gt;setup_construct_system</title>
-<path fill="none" stroke="#000000" d="M675.12,-96C683.77,-96 692.39,-96 700.74,-96"/>
-<polygon fill="#000000" stroke="#000000" points="700.77,-99.5 710.77,-96 700.77,-92.5 700.77,-99.5"/>
+<path fill="none" stroke="#000000" d="M675.12,-12C683.77,-12 692.39,-12 700.74,-12"/>
+<polygon fill="#000000" stroke="#000000" points="700.77,-15.5 710.77,-12 700.77,-8.5 700.77,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/fraggle_util_shift_vector_to_origin.html b/docs/proc/fraggle_util_shift_vector_to_origin.html
index 4aa1ce462..9efed1914 100644
--- a/docs/proc/fraggle_util_shift_vector_to_origin.html
+++ b/docs/proc/fraggle_util_shift_vector_to_origin.html
@@ -307,105 +307,105 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1055.19,-73C1063.66,-73 1072.3,-73 1080.87,-73"/>
 <polygon fill="#000000" stroke="#000000" points="1080.88,-76.5 1090.88,-73 1080.88,-69.5 1080.88,-76.5"/>
 </g>
-<!-- proc~fraggle_generate_pos_vec -->
+<!-- proc~fraggle_util_vmag_to_vb -->
 <g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node3" class="node">
+<title>proc~fraggle_util_vmag_to_vb</title>
+<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="846,-65 716,-65 716,-41 846,-41 846,-65"/>
+<text text-anchor="middle" x="781" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+</a>
+</g>
+</g>
+<!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge2" class="edge">
+<title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
+<path fill="none" stroke="#000000" d="M846.1,-59.91C854.38,-60.8 863,-61.73 871.65,-62.67"/>
+<polygon fill="#000000" stroke="#000000" points="871.49,-66.17 881.81,-63.76 872.24,-59.21 871.49,-66.17"/>
+</g>
+<!-- proc~fraggle_generate_pos_vec -->
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4" class="node">
 <title>proc~fraggle_generate_pos_vec</title>
-<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
+<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_generate_pos_vec.html" xlink:title="fraggle_generate_pos_vec">
 <polygon fill="#d9534f" stroke="#d9534f" points="680,-106 540,-106 540,-82 680,-82 680,-106"/>
 <text text-anchor="middle" x="610" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_pos_vec</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge2" class="edge">
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge3" class="edge">
 <title>proc~fraggle_generate_pos_vec&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
 <path fill="none" stroke="#000000" d="M680.16,-89.93C734.62,-86.72 811.14,-82.21 871.53,-78.65"/>
 <polygon fill="#000000" stroke="#000000" points="872.07,-82.13 881.84,-78.05 871.65,-75.14 872.07,-82.13"/>
 </g>
-<!-- proc~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4" class="node">
-<title>proc~fraggle_util_vmag_to_vb</title>
-<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="846,-65 716,-65 716,-41 846,-41 846,-65"/>
-<text text-anchor="middle" x="781" y="-50.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
+<!-- interface~fraggle_util_vmag_to_vb -->
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5" class="node">
+<title>interface~fraggle_util_vmag_to_vb</title>
+<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
+<polygon fill="#a7506f" stroke="#a7506f" points="675,-64 545,-64 545,-40 675,-40 675,-64"/>
+<text text-anchor="middle" x="610" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge3" class="edge">
-<title>proc~fraggle_util_vmag_to_vb&#45;&gt;interface~fraggle_util_shift_vector_to_origin</title>
-<path fill="none" stroke="#000000" d="M846.1,-59.91C854.38,-60.8 863,-61.73 871.65,-62.67"/>
-<polygon fill="#000000" stroke="#000000" points="871.49,-66.17 881.81,-63.76 872.24,-59.21 871.49,-66.17"/>
+<!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge4" class="edge">
+<title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M675.37,-52.38C685.31,-52.44 695.64,-52.5 705.77,-52.56"/>
+<polygon fill="#000000" stroke="#000000" points="705.78,-56.06 715.81,-52.62 705.83,-49.06 705.78,-56.06"/>
 </g>
 <!-- proc~fraggle_generate_fragments -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5" class="node">
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node6" class="node">
 <title>proc~fraggle_generate_fragments</title>
-<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node5"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
+<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node6"><a xlink:href=".././proc/fraggle_generate_fragments.html" xlink:title="fraggle_generate_fragments">
 <polygon fill="#d9534f" stroke="#d9534f" points="332,-66 184,-66 184,-42 332,-42 332,-66"/>
 <text text-anchor="middle" x="258" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_fragments</text>
 </a>
 </g>
 </g>
 <!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge4" class="edge">
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge5" class="edge">
 <title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_pos_vec</title>
 <path fill="none" stroke="#000000" d="M315.09,-66.05C332.03,-69.35 350.72,-72.66 368,-75 421.76,-82.28 482.68,-87.05 529.82,-89.99"/>
 <polygon fill="#000000" stroke="#000000" points="529.77,-93.49 539.96,-90.61 530.19,-86.51 529.77,-93.49"/>
 </g>
-<!-- proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_tan_vel -->
 <g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node7" class="node">
-<title>proc~fraggle_generate_rad_vel</title>
-<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node7"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="504,-66 368,-66 368,-42 504,-42 504,-66"/>
-<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node7"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-66 368.5,-66 368.5,-42 503.5,-42 503.5,-66"/>
+<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
 <g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge9" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-54C340.5,-54 349.08,-54 357.53,-54"/>
-<polygon fill="#000000" stroke="#000000" points="357.75,-57.5 367.75,-54 357.75,-50.5 357.75,-57.5"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<path fill="none" stroke="#000000" d="M332.11,-54C340.73,-54 349.55,-54 358.22,-54"/>
+<polygon fill="#000000" stroke="#000000" points="358.31,-57.5 368.31,-54 358.31,-50.5 358.31,-57.5"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_rad_vel -->
 <g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node8" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node8"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-24 368.5,-24 368.5,0 503.5,0 503.5,-24"/>
-<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>proc~fraggle_generate_rad_vel</title>
+<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node8"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="504,-24 368,-24 368,0 504,0 504,-24"/>
+<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
 <g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge10" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
 <path fill="none" stroke="#000000" d="M309.43,-41.96C329.78,-37.11 353.42,-31.47 374.67,-26.4"/>
 <polygon fill="#000000" stroke="#000000" points="375.64,-29.76 384.56,-24.04 374.02,-22.95 375.64,-29.76"/>
 </g>
-<!-- interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node6" class="node">
-<title>interface~fraggle_util_vmag_to_vb</title>
-<g id="a_proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_node6"><a xlink:href=".././interface/fraggle_util_vmag_to_vb.html" xlink:title="fraggle_util_vmag_to_vb">
-<polygon fill="#a7506f" stroke="#a7506f" points="675,-64 545,-64 545,-40 675,-40 675,-64"/>
-<text text-anchor="middle" x="610" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util_vmag_to_vb</text>
-</a>
-</g>
-</g>
-<!-- interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge5" class="edge">
-<title>interface~fraggle_util_vmag_to_vb&#45;&gt;proc~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M675.37,-52.38C685.31,-52.44 695.64,-52.5 705.77,-52.56"/>
-<polygon fill="#000000" stroke="#000000" points="705.78,-56.06 715.81,-52.62 705.83,-49.06 705.78,-56.06"/>
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge6" class="edge">
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M503.99,-53.22C514.04,-53.1 524.45,-52.98 534.64,-52.86"/>
+<polygon fill="#000000" stroke="#000000" points="534.77,-56.36 544.73,-52.75 534.69,-49.36 534.77,-56.36"/>
 </g>
 <!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
 <g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge7" class="edge">
 <title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M504.49,-53.22C514.33,-53.1 524.52,-52.98 534.5,-52.87"/>
-<polygon fill="#000000" stroke="#000000" points="534.84,-56.36 544.8,-52.75 534.76,-49.36 534.84,-56.36"/>
-</g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge8" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
 <path fill="none" stroke="#000000" d="M488.61,-24C507.06,-28.29 528.04,-33.17 547.27,-37.64"/>
 <polygon fill="#000000" stroke="#000000" points="546.6,-41.08 557.13,-39.94 548.19,-34.26 546.6,-41.08"/>
 </g>
@@ -419,7 +419,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments -->
-<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge6" class="edge">
+<g id="proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph_edge8" class="edge">
 <title>interface~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_fragments</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.24,-54C156.6,-54 165.16,-54 173.64,-54"/>
 <polygon fill="#000000" stroke="#000000" points="173.91,-57.5 183.91,-54 173.91,-50.5 173.91,-57.5"/>
diff --git a/docs/proc/fraggle_util_vmag_to_vb.html b/docs/proc/fraggle_util_vmag_to_vb.html
index 779ebf980..0b2ddeddc 100644
--- a/docs/proc/fraggle_util_vmag_to_vb.html
+++ b/docs/proc/fraggle_util_vmag_to_vb.html
@@ -492,35 +492,35 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M670.35,-33C678.64,-33 687.19,-33 695.62,-33"/>
 <polygon fill="#000000" stroke="#000000" points="695.84,-36.5 705.84,-33 695.84,-29.5 695.84,-36.5"/>
 </g>
-<!-- proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_tan_vel -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node3" class="node">
-<title>proc~fraggle_generate_rad_vel</title>
-<g id="a_proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="504,-66 368,-66 368,-42 504,-42 504,-66"/>
-<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
+<title>proc~fraggle_generate_tan_vel</title>
+<g id="a_proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node3"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-66 368.5,-66 368.5,-42 503.5,-42 503.5,-66"/>
+<text text-anchor="middle" x="436" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_edge2" class="edge">
-<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M504.44,-45.52C512.75,-44.48 521.27,-43.4 529.67,-42.35"/>
-<polygon fill="#000000" stroke="#000000" points="530.34,-45.79 539.82,-41.07 529.46,-38.85 530.34,-45.79"/>
+<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M503.96,-45.58C512.44,-44.51 521.16,-43.42 529.74,-42.34"/>
+<polygon fill="#000000" stroke="#000000" points="530.25,-45.8 539.74,-41.08 529.38,-38.86 530.25,-45.8"/>
 </g>
-<!-- proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_rad_vel -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node4" class="node">
-<title>proc~fraggle_generate_tan_vel</title>
-<g id="a_proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_generate_tan_vel.html" xlink:title="fraggle_generate_tan_vel">
-<polygon fill="#d9534f" stroke="#d9534f" points="503.5,-24 368.5,-24 368.5,0 503.5,0 503.5,-24"/>
-<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_tan_vel</text>
+<title>proc~fraggle_generate_rad_vel</title>
+<g id="a_proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node4"><a xlink:href=".././proc/fraggle_generate_rad_vel.html" xlink:title="fraggle_generate_rad_vel">
+<polygon fill="#d9534f" stroke="#d9534f" points="504,-24 368,-24 368,0 504,0 504,-24"/>
+<text text-anchor="middle" x="436" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate_rad_vel</text>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
+<!-- proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_edge3" class="edge">
-<title>proc~fraggle_generate_tan_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
-<path fill="none" stroke="#000000" d="M503.96,-20.42C512.44,-21.49 521.16,-22.58 529.74,-23.66"/>
-<polygon fill="#000000" stroke="#000000" points="529.38,-27.14 539.74,-24.92 530.25,-20.2 529.38,-27.14"/>
+<title>proc~fraggle_generate_rad_vel&#45;&gt;interface~fraggle_util_vmag_to_vb</title>
+<path fill="none" stroke="#000000" d="M504.44,-20.48C512.75,-21.52 521.27,-22.6 529.67,-23.65"/>
+<polygon fill="#000000" stroke="#000000" points="529.46,-27.15 539.82,-24.93 530.34,-20.21 529.46,-27.15"/>
 </g>
 <!-- proc~fraggle_generate_fragments -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node5" class="node">
@@ -531,17 +531,17 @@ <h3 class="panel-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_edge4" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-41.72C340.6,-42.74 349.27,-43.77 357.81,-44.79"/>
-<polygon fill="#000000" stroke="#000000" points="357.4,-48.27 367.75,-45.98 358.23,-41.32 357.4,-48.27"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
+<path fill="none" stroke="#000000" d="M332.11,-41.72C340.73,-42.75 349.55,-43.8 358.22,-44.84"/>
+<polygon fill="#000000" stroke="#000000" points="357.96,-48.33 368.31,-46.04 358.79,-41.38 357.96,-48.33"/>
 </g>
-<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel -->
+<!-- proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_edge5" class="edge">
-<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_tan_vel</title>
-<path fill="none" stroke="#000000" d="M332.11,-24.28C340.73,-23.25 349.55,-22.2 358.22,-21.16"/>
-<polygon fill="#000000" stroke="#000000" points="358.79,-24.62 368.31,-19.96 357.96,-17.67 358.79,-24.62"/>
+<title>proc~fraggle_generate_fragments&#45;&gt;proc~fraggle_generate_rad_vel</title>
+<path fill="none" stroke="#000000" d="M332.11,-24.28C340.6,-23.26 349.27,-22.23 357.81,-21.21"/>
+<polygon fill="#000000" stroke="#000000" points="358.23,-24.68 367.75,-20.02 357.4,-17.73 358.23,-24.68"/>
 </g>
 <!-- interface~fraggle_generate_fragments -->
 <g id="proc~~fraggle_util_vmag_to_vb~~CalledByGraph_node6" class="node">
diff --git a/docs/proc/ge_wpp.html b/docs/proc/ge_wpp.html
index 71c6a43f5..10b112bf7 100644
--- a/docs/proc/ge_wpp.html
+++ b/docs/proc/ge_wpp.html
@@ -233,322 +233,316 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~ge_wpp~~UsesGraph Pages: 1 -->
-<svg id="procge_wppUsesGraph" width="641pt" height="195pt"
- viewBox="0.00 0.00 641.00 195.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~ge_wpp~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 282.27)">
+<svg id="procge_wppUsesGraph" width="641pt" height="252pt"
+ viewBox="0.00 0.00 641.00 252.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~ge_wpp~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 365.8)">
 <title>proc~~ge_wpp~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-282.27 935,-282.27 935,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.8 935,-365.8 935,4 -4,4"/>
 <!-- proc~ge_wpp -->
 <g id="proc~~ge_wpp~~UsesGraph_node1" class="node">
 <title>proc~ge_wpp</title>
-<polygon fill="none" stroke="black" points="931,-125.79 877,-125.79 877,-101.79 931,-101.79 931,-125.79"/>
-<text text-anchor="middle" x="904" y="-111.39" font-family="Helvetica,sans-Serif" font-size="10.50">ge_wpp</text>
+<polygon fill="none" stroke="black" points="931,-192 877,-192 877,-168 931,-168 931,-192"/>
+<text text-anchor="middle" x="904" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50">ge_wpp</text>
 </g>
 <!-- module~swiftest -->
 <g id="proc~~ge_wpp~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_proc~~ge_wpp~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="823,-146.79 769,-146.79 769,-122.79 823,-122.79 823,-146.79"/>
-<text text-anchor="middle" x="796" y="-132.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="823,-213 769,-213 769,-189 823,-189 823,-213"/>
+<text text-anchor="middle" x="796" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- proc~ge_wpp&#45;&gt;module~swiftest -->
 <g id="proc~~ge_wpp~~UsesGraph_edge1" class="edge">
 <title>proc~ge_wpp&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.8,-118.98C863.67,-121.58 847.58,-124.77 833.29,-127.6"/>
-<polygon fill="#000000" stroke="#000000" points="832.4,-124.21 823.27,-129.59 833.76,-131.08 832.4,-124.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.8,-185.19C863.67,-187.79 847.58,-190.98 833.29,-193.81"/>
+<polygon fill="#000000" stroke="#000000" points="832.4,-190.42 823.27,-195.8 833.76,-197.29 832.4,-190.42"/>
 </g>
 <!-- ieee_exceptions -->
 <g id="proc~~ge_wpp~~UsesGraph_node3" class="node">
 <title>ieee_exceptions</title>
 <g id="a_proc~~ge_wpp~~UsesGraph_node3"><a xlink:href="http://fortranwiki.org/fortran/show/IEEE+arithmetic" xlink:title="ieee_exceptions">
-<polygon fill="#337ab7" stroke="#337ab7" points="841,-104.79 751,-104.79 751,-80.79 841,-80.79 841,-104.79"/>
-<text text-anchor="middle" x="796" y="-90.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_exceptions</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="841,-171 751,-171 751,-147 841,-147 841,-171"/>
+<text text-anchor="middle" x="796" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_exceptions</text>
 </a>
 </g>
 </g>
 <!-- proc~ge_wpp&#45;&gt;ieee_exceptions -->
 <g id="proc~~ge_wpp~~UsesGraph_edge2" class="edge">
 <title>proc~ge_wpp&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.8,-108.6C868.96,-107.05 860.06,-105.28 851.11,-103.51"/>
-<polygon fill="#000000" stroke="#000000" points="851.54,-100.03 841.05,-101.52 850.18,-106.9 851.54,-100.03"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.8,-174.81C868.96,-173.26 860.06,-171.49 851.11,-169.72"/>
+<polygon fill="#000000" stroke="#000000" points="851.54,-166.24 841.05,-167.73 850.18,-173.1 851.54,-166.24"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-244.79 247,-244.79 247,-220.79 347,-220.79 347,-244.79"/>
-<text text-anchor="middle" x="297" y="-230.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="458.5,-262 382.5,-262 382.5,-238 458.5,-238 458.5,-262"/>
+<text text-anchor="middle" x="420.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-272.79C397.63,-266.97 364.89,-256.82 339.8,-248.2"/>
-<polygon fill="#000000" stroke="#000000" points="340.83,-244.85 330.24,-244.86 338.53,-251.46 340.83,-244.85"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-201C626.68,-199.5 528.12,-222.66 468.77,-237.66"/>
+<polygon fill="#000000" stroke="#000000" points="467.72,-234.32 458.89,-240.18 469.44,-241.1 467.72,-234.32"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="proc~~ge_wpp~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587,-166.79 510,-166.79 510,-142.79 587,-142.79 587,-166.79"/>
-<text text-anchor="middle" x="548.5" y="-152.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-262 615,-262 615,-238 715,-238 715,-262"/>
+<text text-anchor="middle" x="665" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="proc~~ge_wpp~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C635.45,-109.53 599.83,-124.58 576.22,-137.7"/>
-<polygon fill="#000000" stroke="#000000" points="574.38,-134.72 567.49,-142.77 577.9,-140.78 574.38,-134.72"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.89,-210.92C751.31,-217.6 727.73,-226.55 707.58,-234.21"/>
+<polygon fill="#000000" stroke="#000000" points="706.11,-231.02 698.01,-237.84 708.6,-237.56 706.11,-231.02"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472,-244.79 385,-244.79 385,-220.79 472,-220.79 472,-244.79"/>
-<text text-anchor="middle" x="428.5" y="-230.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="707.5,-173 622.5,-173 622.5,-149 707.5,-149 707.5,-173"/>
+<text text-anchor="middle" x="665" y="-158.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="proc~~ge_wpp~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M784.44,-146.87C752.42,-182.03 652.31,-281.3 549.5,-272.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-272.79C515.82,-274.9 481.68,-261.44 458.31,-249.57"/>
-<polygon fill="#000000" stroke="#000000" points="459.78,-246.39 449.3,-244.8 456.5,-252.57 459.78,-246.39"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="proc~~ge_wpp~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.89,-192.91C753.29,-188.07 732.98,-181.77 714.53,-176.05"/>
+<polygon fill="#000000" stroke="#000000" points="715.39,-172.65 704.8,-173.03 713.31,-179.33 715.39,-172.65"/>
 </g>
 <!-- module~helio_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_proc~~ge_wpp~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="586.5,-86.79 510.5,-86.79 510.5,-62.79 586.5,-62.79 586.5,-86.79"/>
-<text text-anchor="middle" x="548.5" y="-72.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="578.5,-203 502.5,-203 502.5,-179 578.5,-179 578.5,-203"/>
+<text text-anchor="middle" x="540.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="proc~~ge_wpp~~UsesGraph_edge6" class="edge">
+<g id="proc~~ge_wpp~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C639.68,-110.21 609.03,-99.7 585.99,-90.61"/>
-<polygon fill="#000000" stroke="#000000" points="587.2,-87.32 576.62,-86.82 584.58,-93.81 587.2,-87.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-201C639.13,-200 611.5,-197.84 588.78,-195.78"/>
+<polygon fill="#000000" stroke="#000000" points="588.99,-192.28 578.71,-194.84 588.34,-199.25 588.99,-192.28"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="466.5,-126.79 390.5,-126.79 390.5,-102.79 466.5,-102.79 466.5,-126.79"/>
-<text text-anchor="middle" x="428.5" y="-112.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="464,-85 377,-85 377,-61 464,-61 464,-85"/>
+<text text-anchor="middle" x="420.5" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C602.31,-104.17 525.11,-106.88 476.73,-110.38"/>
-<polygon fill="#000000" stroke="#000000" points="476.27,-106.9 466.56,-111.15 476.8,-113.88 476.27,-106.9"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-31C523.33,-31.04 486.14,-45.21 457.8,-57.07"/>
+<polygon fill="#000000" stroke="#000000" points="456.41,-53.86 448.57,-60.98 459.14,-60.3 456.41,-53.86"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="proc~~ge_wpp~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-204.79 123,-204.79 123,-180.79 211,-180.79 211,-204.79"/>
-<text text-anchor="middle" x="167" y="-190.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="466,-43 375,-43 375,-19 466,-19 466,-43"/>
+<text text-anchor="middle" x="420.5" y="-28.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="proc~~ge_wpp~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-272.79C348.33,-257.35 321.88,-283.8 247,-253.79 223.79,-244.49 201.65,-226.3 186.75,-212.19"/>
-<polygon fill="#000000" stroke="#000000" points="188.84,-209.35 179.25,-204.85 183.95,-214.35 188.84,-209.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-31C518.83,-31.06 496.12,-31.07 476.19,-31.06"/>
+<polygon fill="#000000" stroke="#000000" points="476.05,-27.56 466.05,-31.06 476.04,-34.56 476.05,-27.56"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="711.5,-166.79 626.5,-166.79 626.5,-142.79 711.5,-142.79 711.5,-166.79"/>
-<text text-anchor="middle" x="669" y="-152.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="337.5,-125 248.5,-125 248.5,-101 337.5,-101 337.5,-125"/>
+<text text-anchor="middle" x="293" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.8,-138.98C755.16,-141.17 738,-143.91 721.82,-146.5"/>
-<polygon fill="#000000" stroke="#000000" points="721.23,-143.05 711.91,-148.09 722.34,-149.96 721.23,-143.05"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.79,-201.82C742.71,-202.44 701.56,-202.9 666,-201"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-201C623.85,-198.86 617.72,-180.86 579,-170 536.23,-158 417.45,-135.54 347.47,-122.69"/>
+<polygon fill="#000000" stroke="#000000" points="347.98,-119.22 337.51,-120.86 346.72,-126.11 347.98,-119.22"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_node11" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node11"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-164.79 252.5,-164.79 252.5,-140.79 341.5,-140.79 341.5,-164.79"/>
-<text text-anchor="middle" x="297" y="-150.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node11"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="579,-321 502,-321 502,-297 579,-297 579,-321"/>
+<text text-anchor="middle" x="540.5" y="-306.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-272.79C406.39,-268.67 398.54,-268.66 383,-253.79 356.29,-228.23 372.61,-205.46 347,-178.79 344,-175.67 340.54,-172.84 336.87,-170.29"/>
-<polygon fill="#000000" stroke="#000000" points="338.42,-167.14 328.07,-164.88 334.75,-173.1 338.42,-167.14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-272.79C495.17,-276.27 480.97,-282.83 429.5,-272.79"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M789.73,-213.03C775.36,-243.93 732.11,-325.35 666,-349"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-349C630.23,-361.08 590.72,-342.34 565.9,-326.65"/>
+<polygon fill="#000000" stroke="#000000" points="567.73,-323.66 557.45,-321.07 563.86,-329.5 567.73,-323.66"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_node12" class="node">
-<title>module~lambda_function</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node12"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="474,-46.79 383,-46.79 383,-22.79 474,-22.79 474,-46.79"/>
-<text text-anchor="middle" x="428.5" y="-32.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="339,-24 247,-24 247,0 339,0 339,-24"/>
+<text text-anchor="middle" x="293" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.64,-130.73C743.32,-126.79 704.02,-120.57 670,-114.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C623.57,-107.24 628.81,-70.62 587,-53.79 554.52,-40.71 515.46,-35.94 484.36,-34.45"/>
-<polygon fill="#000000" stroke="#000000" points="484.27,-30.94 474.14,-34.06 484,-37.94 484.27,-30.94"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-31C505.53,-31.09 499.65,-14.71 466,-10 425.95,-4.39 415.44,-9.5 375,-10 366.8,-10.1 358.13,-10.26 349.64,-10.45"/>
+<polygon fill="#000000" stroke="#000000" points="349.32,-6.95 339.41,-10.68 349.49,-13.95 349.32,-6.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.9,-190.62C762.76,-187.62 756.42,-184.05 751,-180 731.84,-165.69 733.3,-155.4 715,-140 645.32,-81.37 632.53,-28.47 541.5,-31"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="proc~~ge_wpp~~UsesGraph_node13" class="node">
-<title>module~walltime_classes</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node13"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-46.79 623,-46.79 623,-22.79 715,-22.79 715,-46.79"/>
-<text text-anchor="middle" x="669" y="-32.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node13"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-105 123,-105 123,-81 211,-81 211,-105"/>
+<text text-anchor="middle" x="167" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="proc~~ge_wpp~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.62,-123.93C762.61,-120.99 756.41,-117.57 751,-113.79 726.49,-96.7 702.51,-72.03 687.08,-54.82"/>
-<polygon fill="#000000" stroke="#000000" points="689.47,-52.23 680.23,-47.04 684.21,-56.85 689.47,-52.23"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-349C561.15,-385.79 527.88,-333.82 421.5,-309"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="proc~~ge_wpp~~UsesGraph_edge14" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M394.71,-237.92C387.93,-234 380.84,-229.28 375,-224 345.44,-197.3 319.98,-158.2 305.84,-134.24"/>
+<polygon fill="#000000" stroke="#000000" points="308.7,-132.18 300.67,-125.27 302.64,-135.68 308.7,-132.18"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="proc~~ge_wpp~~UsesGraph_edge13" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-220.79C244.68,-216.75 230.09,-212.2 216.5,-207.95"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-204.57 206.82,-204.92 215.32,-211.25 217.41,-204.57"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.28,-258.54C356.15,-262.57 321.17,-263.87 294,-250"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="proc~~ge_wpp~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.1,-142.79C500.42,-138.83 487.26,-134.37 474.94,-130.2"/>
-<polygon fill="#000000" stroke="#000000" points="475.88,-126.82 465.29,-126.92 473.63,-133.45 475.88,-126.82"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-309C359.31,-295.75 348.89,-278.03 294,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.65,-261.24C582.52,-268.64 539.72,-278.66 502,-288 466.11,-296.89 457.61,-316.95 421.5,-309"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge14" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M509.97,-155.75C475.77,-155.41 424.43,-151.8 383,-135.79 339.63,-119.03 341.38,-58.04 298,-74.79"/>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="proc~~ge_wpp~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.19,-171.24C611.36,-173.89 599.63,-176.76 588.56,-179.48"/>
+<polygon fill="#000000" stroke="#000000" points="587.5,-176.13 578.62,-181.91 589.16,-182.93 587.5,-176.13"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.91,-220.72C375.2,-209.99 334.84,-195.58 298,-192.79"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="proc~~ge_wpp~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-113C513.87,-106 485.67,-96.51 463.27,-88.53"/>
+<polygon fill="#000000" stroke="#000000" points="464.32,-85.19 453.73,-85.1 461.96,-91.78 464.32,-85.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.79,-148.84C613.36,-137.96 575.65,-122.33 541.5,-113"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.42,-220.66C398.15,-216.47 390.11,-211.61 383,-206.79 366.21,-195.43 364.02,-189.81 347,-178.79 342.2,-175.68 336.99,-172.62 331.82,-169.75"/>
-<polygon fill="#000000" stroke="#000000" points="333.12,-166.47 322.65,-164.81 329.8,-172.63 333.12,-166.47"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-113C396.06,-111.17 370.08,-110.89 347.87,-111.17"/>
+<polygon fill="#000000" stroke="#000000" points="347.57,-107.67 337.63,-111.34 347.68,-114.67 347.57,-107.67"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="proc~~ge_wpp~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-113C488.91,-99.19 473.79,-117.08 421.5,-113"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-113C361.13,-108.45 352.35,-68.24 294,-73"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="proc~~ge_wpp~~UsesGraph_edge20" class="edge">
+<g id="proc~~ge_wpp~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.1,-86.79C500.42,-90.75 487.26,-95.21 474.94,-99.39"/>
-<polygon fill="#000000" stroke="#000000" points="473.63,-96.14 465.29,-102.66 475.88,-102.77 473.63,-96.14"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-74.79C370.54,-83.06 351.53,-53.65 298,-74.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.37,-72.07C487.03,-71.03 456.36,-70.89 429.5,-74.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.34,-203.08C497.84,-211.83 473.97,-223.77 454.68,-233.41"/>
+<polygon fill="#000000" stroke="#000000" points="453.01,-230.33 445.63,-237.93 456.14,-236.59 453.01,-230.33"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="proc~~ge_wpp~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-74.79C383.82,-81.13 341.64,-112.8 317.84,-133.79"/>
-<polygon fill="#000000" stroke="#000000" points="315.27,-131.39 310.22,-140.71 319.98,-136.58 315.27,-131.39"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.75,-102.72C369.76,-88.43 317.04,-67.44 298,-74.79"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.39,-125.68C377.52,-129.46 362.86,-133.76 349.06,-137.81"/>
-<polygon fill="#000000" stroke="#000000" points="347.82,-134.53 339.21,-140.7 349.79,-141.24 347.82,-134.53"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M502.27,-200.72C479.16,-205.82 448.77,-210.86 421.5,-210"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-210C370.08,-208.45 328.24,-161.35 307.66,-133.36"/>
+<polygon fill="#000000" stroke="#000000" points="310.39,-131.16 301.75,-125.03 304.68,-135.21 310.39,-131.16"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="proc~~ge_wpp~~UsesGraph_node14" class="node">
-<title>iso_fortran_env</title>
-<g id="a_proc~~ge_wpp~~UsesGraph_node14"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-204.79 0,-204.79 0,-180.79 87,-180.79 87,-204.79"/>
-<text text-anchor="middle" x="43.5" y="-190.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="proc~~ge_wpp~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-210C360.99,-208.16 346.14,-276.62 294,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292,-250C234.28,-220.53 194.83,-150.62 177.68,-114.87"/>
+<polygon fill="#000000" stroke="#000000" points="180.64,-112.95 173.25,-105.36 174.29,-115.9 180.64,-112.95"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="proc~~ge_wpp~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.85,-85C369.3,-89 355.16,-93.51 341.94,-97.72"/>
+<polygon fill="#000000" stroke="#000000" points="340.53,-94.5 332.06,-100.87 342.65,-101.17 340.53,-94.5"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="proc~~ge_wpp~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-192.79C114.58,-192.79 105.86,-192.79 97.36,-192.79"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-189.29 87.13,-192.79 97.13,-196.29 97.13,-189.29"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="proc~~ge_wpp~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.22,-154.79C616.92,-154.79 607,-154.79 597.47,-154.79"/>
-<polygon fill="#000000" stroke="#000000" points="597.34,-151.29 587.34,-154.79 597.34,-158.29 597.34,-151.29"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.74,-71.28C352.44,-70.73 321.47,-70.76 294,-73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="proc~~ge_wpp~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-194.79C521.97,-200.9 493.99,-209.81 471.68,-217.47"/>
-<polygon fill="#000000" stroke="#000000" points="470.47,-214.18 462.18,-220.77 472.77,-220.79 470.47,-214.18"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M395.25,-43.03C370.5,-54.35 330.64,-70.01 294,-73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292,-73C268.64,-74.9 243.04,-78.73 221.2,-82.54"/>
+<polygon fill="#000000" stroke="#000000" points="220.35,-79.13 211.12,-84.34 221.58,-86.02 220.35,-79.13"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="proc~~ge_wpp~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.74,-142.57C638.39,-138.37 630.25,-133.53 623,-128.79 605.88,-117.6 587.32,-103.95 573.13,-93.18"/>
-<polygon fill="#000000" stroke="#000000" points="574.99,-90.19 564.92,-86.89 570.73,-95.75 574.99,-90.19"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-192.79C370.15,-187.97 355.39,-197.13 298,-192.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-192.79C271.5,-190.94 244.29,-190.69 221.27,-191"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-187.5 211.02,-191.18 221.08,-194.5 220.96,-187.5"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.28,-105.95C239.57,-104.54 230.33,-103.05 221.33,-101.6"/>
+<polygon fill="#000000" stroke="#000000" points="221.75,-98.12 211.32,-99.99 220.64,-105.04 221.75,-98.12"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="proc~~ge_wpp~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-192.79C395.21,-190.08 360.18,-178.71 334.71,-168.78"/>
-<polygon fill="#000000" stroke="#000000" points="335.68,-165.4 325.1,-164.93 333.08,-171.9 335.68,-165.4"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-194.79C496.49,-206.99 481.77,-197.18 429.5,-192.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.26,-166.89C613.6,-175.77 579.91,-187.52 549.5,-194.79"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-164.79C244.68,-168.83 230.09,-173.39 216.5,-177.63"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-174.34 206.82,-180.66 217.41,-181.02 215.32,-174.34"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.34,-296.92C497.84,-288.17 473.97,-276.23 454.68,-266.59"/>
+<polygon fill="#000000" stroke="#000000" points="456.14,-263.41 445.63,-262.07 453.01,-269.67 456.14,-263.41"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M383.23,-46.83C357.97,-54.1 325.88,-64.03 298,-74.79"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="proc~~ge_wpp~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M501.85,-313.09C478.46,-314.63 447.91,-314.81 421.5,-309"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~ge_wpp~~UsesGraph_edge31" class="edge">
+<g id="proc~~ge_wpp~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M628.63,-22.73C572.61,-7.58 467.3,13.33 383,-13.79 338.73,-28.03 341.25,-57.71 298,-74.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-74.79C245.6,-94.17 203.2,-143.97 182.19,-172.3"/>
-<polygon fill="#000000" stroke="#000000" points="179.15,-170.52 176.13,-180.67 184.83,-174.62 179.15,-170.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.44,-24.13C252.71,-37.67 218.96,-59.71 195.24,-75.2"/>
+<polygon fill="#000000" stroke="#000000" points="193.15,-72.39 186.69,-80.79 196.98,-78.25 193.15,-72.39"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="proc~~ge_wpp~~UsesGraph_node14" class="node">
+<title>iso_fortran_env</title>
+<g id="a_proc~~ge_wpp~~UsesGraph_node14"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-105 0,-105 0,-81 87,-81 87,-105"/>
+<text text-anchor="middle" x="43.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="proc~~ge_wpp~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-93C114.58,-93 105.86,-93 97.36,-93"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-89.5 87.13,-93 97.13,-96.5 97.13,-89.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/gr_kick_getacch.html b/docs/proc/gr_kick_getacch.html
index f68c8c94e..78c0652fe 100644
--- a/docs/proc/gr_kick_getacch.html
+++ b/docs/proc/gr_kick_getacch.html
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr)
+pure module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr)
     
     
    <a href='../interface/gr_kick_getacch.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -268,7 +268,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-lmask~3"></span>logical,</td>
+  <td><span class="anchor" id="variable-lmask~7"></span>logical,</td>
   <td>intent(in),</td>
   <td></td>
   
@@ -283,7 +283,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~26"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~30"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/helio_drift_body.html b/docs/proc/helio_drift_body.html
index ddba61934..90d8e386f 100644
--- a/docs/proc/helio_drift_body.html
+++ b/docs/proc/helio_drift_body.html
@@ -467,25 +467,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M184.07,-18.59C192.21,-20.07 201.03,-21.68 209.71,-23.27"/>
 <polygon fill="#000000" stroke="#000000" points="209.33,-26.76 219.8,-25.11 210.59,-19.87 209.33,-26.76"/>
 </g>
-<!-- interface~helio_drift_tp -->
-<g id="proc~~helio_drift_body~~CalledByGraph_node5" class="node">
-<title>interface~helio_drift_tp</title>
-<g id="a_proc~~helio_drift_body~~CalledByGraph_node5"><a xlink:href=".././interface/helio_drift_tp.html" xlink:title="helio_drift_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="74,-24 0,-24 0,0 74,0 74,-24"/>
-<text text-anchor="middle" x="37" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp -->
-<g id="proc~~helio_drift_body~~CalledByGraph_edge5" class="edge">
-<title>interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M74.26,-12C82.37,-12 91.07,-12 99.52,-12"/>
-<polygon fill="#000000" stroke="#000000" points="99.65,-15.5 109.65,-12 99.65,-8.5 99.65,-15.5"/>
-</g>
 <!-- interface~helio_drift_pl -->
-<g id="proc~~helio_drift_body~~CalledByGraph_node6" class="node">
+<g id="proc~~helio_drift_body~~CalledByGraph_node5" class="node">
 <title>interface~helio_drift_pl</title>
-<g id="a_proc~~helio_drift_body~~CalledByGraph_node6"><a xlink:href=".././interface/helio_drift_pl.html" xlink:title="helio_drift_pl">
+<g id="a_proc~~helio_drift_body~~CalledByGraph_node5"><a xlink:href=".././interface/helio_drift_pl.html" xlink:title="helio_drift_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="73.5,-66 0.5,-66 0.5,-42 73.5,-42 73.5,-66"/>
 <text text-anchor="middle" x="37" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_pl</text>
 </a>
@@ -497,6 +482,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M73.66,-54C82.14,-54 91.3,-54 100.17,-54"/>
 <polygon fill="#000000" stroke="#000000" points="100.37,-57.5 110.37,-54 100.37,-50.5 100.37,-57.5"/>
 </g>
+<!-- interface~helio_drift_tp -->
+<g id="proc~~helio_drift_body~~CalledByGraph_node6" class="node">
+<title>interface~helio_drift_tp</title>
+<g id="a_proc~~helio_drift_body~~CalledByGraph_node6"><a xlink:href=".././interface/helio_drift_tp.html" xlink:title="helio_drift_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="74,-24 0,-24 0,0 74,0 74,-24"/>
+<text text-anchor="middle" x="37" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp -->
+<g id="proc~~helio_drift_body~~CalledByGraph_edge5" class="edge">
+<title>interface~helio_drift_tp&#45;&gt;proc~helio_drift_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M74.26,-12C82.37,-12 91.07,-12 99.52,-12"/>
+<polygon fill="#000000" stroke="#000000" points="99.65,-15.5 109.65,-12 99.65,-8.5 99.65,-15.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/helio_gr_kick_getacch_pl.html b/docs/proc/helio_gr_kick_getacch_pl.html
index b5cd030f7..cf37fe3f7 100644
--- a/docs/proc/helio_gr_kick_getacch_pl.html
+++ b/docs/proc/helio_gr_kick_getacch_pl.html
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-module subroutine helio_gr_kick_getacch_pl(self, param)
+pure module subroutine helio_gr_kick_getacch_pl(self, param)
     
     
    <a href='../interface/helio_gr_kick_getacch_pl.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/proc/helio_gr_kick_getacch_tp.html b/docs/proc/helio_gr_kick_getacch_tp.html
index 84e7f3651..750c8a44e 100644
--- a/docs/proc/helio_gr_kick_getacch_tp.html
+++ b/docs/proc/helio_gr_kick_getacch_tp.html
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-module subroutine helio_gr_kick_getacch_tp(self, param)
+pure module subroutine helio_gr_kick_getacch_tp(self, param)
     
     
    <a href='../interface/helio_gr_kick_getacch_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/proc/helio_kick_vb_pl.html b/docs/proc/helio_kick_vb_pl.html
index 20e359d23..eaea9fabf 100644
--- a/docs/proc/helio_kick_vb_pl.html
+++ b/docs/proc/helio_kick_vb_pl.html
@@ -136,7 +136,7 @@ <h1>helio_kick_vb_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">24 statements</a>
+    title=" 0.0% of total for procedures.">26 statements</a>
      </li> 
      
      
diff --git a/docs/proc/io_dump_base.html b/docs/proc/io_dump_base.html
index aa899c9c9..755dc308f 100644
--- a/docs/proc/io_dump_base.html
+++ b/docs/proc/io_dump_base.html
@@ -290,110 +290,110 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~io_dump_base -->
 <g id="proc~~io_dump_base~~CallsGraph_node1" class="node">
 <title>proc~io_dump_base</title>
-<polygon fill="none" stroke="black" points="83,-46.04 0,-46.04 0,-22.04 83,-22.04 83,-46.04"/>
-<text text-anchor="middle" x="41.5" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50">io_dump_base</text>
+<polygon fill="none" stroke="black" points="83,-66 0,-66 0,-42 83,-42 83,-66"/>
+<text text-anchor="middle" x="41.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">io_dump_base</text>
 </g>
-<!-- interface~io_write_frame_cb -->
+<!-- interface~util_exit -->
 <g id="proc~~io_dump_base~~CallsGraph_node2" class="node">
+<title>interface~util_exit</title>
+<g id="a_proc~~io_dump_base~~CallsGraph_node2"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
+<polygon fill="#a7506f" stroke="#a7506f" points="469,-66 415,-66 415,-42 469,-42 469,-66"/>
+<text text-anchor="middle" x="442" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</a>
+</g>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
+<g id="proc~~io_dump_base~~CallsGraph_edge2" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M78.67,-66.06C91.28,-69.7 105.62,-73.2 119,-75 233.52,-90.43 264.98,-93.79 379,-75 387.7,-73.57 396.83,-71.07 405.32,-68.29"/>
+<polygon fill="#000000" stroke="#000000" points="406.64,-71.54 414.94,-64.94 404.34,-64.93 406.64,-71.54"/>
+</g>
+<!-- interface~io_write_frame_cb -->
+<g id="proc~~io_dump_base~~CallsGraph_node3" class="node">
 <title>interface~io_write_frame_cb</title>
-<g id="a_proc~~io_dump_base~~CallsGraph_node2"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="225,-88.04 125,-88.04 125,-64.04 225,-64.04 225,-88.04"/>
-<text text-anchor="middle" x="175" y="-73.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<g id="a_proc~~io_dump_base~~CallsGraph_node3"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="225,-66 125,-66 125,-42 225,-42 225,-66"/>
+<text text-anchor="middle" x="175" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
 </a>
 </g>
 </g>
 <!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
 <g id="proc~~io_dump_base~~CallsGraph_edge1" class="edge">
 <title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" d="M80.18,-46.08C94.63,-50.69 111.29,-56.01 126.54,-60.88"/>
-<polygon fill="#000000" stroke="#000000" points="125.72,-64.3 136.31,-64 127.85,-57.63 125.72,-64.3"/>
+<path fill="none" stroke="#000000" d="M83.03,-54C92.98,-54 103.84,-54 114.48,-54"/>
+<polygon fill="#000000" stroke="#000000" points="114.57,-57.5 124.57,-54 114.57,-50.5 114.57,-57.5"/>
 </g>
 <!-- interface~io_write_frame_body -->
-<g id="proc~~io_dump_base~~CallsGraph_node3" class="node">
+<g id="proc~~io_dump_base~~CallsGraph_node4" class="node">
 <title>interface~io_write_frame_body</title>
-<g id="a_proc~~io_dump_base~~CallsGraph_node3"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="231,-46.04 119,-46.04 119,-22.04 231,-22.04 231,-46.04"/>
-<text text-anchor="middle" x="175" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<g id="a_proc~~io_dump_base~~CallsGraph_node4"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="231,-24 119,-24 119,0 231,0 231,-24"/>
+<text text-anchor="middle" x="175" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
 <!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
-<g id="proc~~io_dump_base~~CallsGraph_edge2" class="edge">
+<g id="proc~~io_dump_base~~CallsGraph_edge3" class="edge">
 <title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
-<path fill="none" stroke="#000000" d="M83.03,-34.04C91.16,-34.04 99.91,-34.04 108.64,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="108.85,-37.54 118.85,-34.04 108.85,-30.54 108.85,-37.54"/>
+<path fill="none" stroke="#000000" d="M80.18,-41.96C94.63,-37.35 111.29,-32.03 126.54,-27.16"/>
+<polygon fill="#000000" stroke="#000000" points="127.85,-30.41 136.31,-24.04 125.72,-23.75 127.85,-30.41"/>
 </g>
-<!-- interface~util_exit -->
-<g id="proc~~io_dump_base~~CallsGraph_node4" class="node">
-<title>interface~util_exit</title>
-<g id="a_proc~~io_dump_base~~CallsGraph_node4"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
-<polygon fill="#a7506f" stroke="#a7506f" points="469,-46.04 415,-46.04 415,-22.04 469,-22.04 469,-46.04"/>
-<text text-anchor="middle" x="442" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<!-- proc~util_exit -->
+<g id="proc~~io_dump_base~~CallsGraph_node7" class="node">
+<title>proc~util_exit</title>
+<g id="a_proc~~io_dump_base~~CallsGraph_node7"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<polygon fill="#d9534f" stroke="#d9534f" points="559,-66 505,-66 505,-42 559,-42 559,-66"/>
+<text text-anchor="middle" x="532" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
-<g id="proc~~io_dump_base~~CallsGraph_edge3" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M78.67,-21.98C91.28,-18.34 105.62,-14.84 119,-13.04 233.52,2.39 264.98,5.74 379,-13.04 387.7,-14.48 396.83,-16.97 405.32,-19.75"/>
-<polygon fill="#000000" stroke="#000000" points="404.34,-23.12 414.94,-23.1 406.64,-16.51 404.34,-23.12"/>
+<!-- interface~util_exit&#45;&gt;proc~util_exit -->
+<g id="proc~~io_dump_base~~CallsGraph_edge4" class="edge">
+<title>interface~util_exit&#45;&gt;proc~util_exit</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M469.4,-54C477.39,-54 486.31,-54 494.82,-54"/>
+<polygon fill="#000000" stroke="#000000" points="494.92,-57.5 504.92,-54 494.92,-50.5 494.92,-57.5"/>
 </g>
 <!-- proc~io_write_frame_cb -->
 <g id="proc~~io_dump_base~~CallsGraph_node6" class="node">
 <title>proc~io_write_frame_cb</title>
 <g id="a_proc~~io_dump_base~~CallsGraph_node6"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="373,-88.04 273,-88.04 273,-64.04 373,-64.04 373,-88.04"/>
-<text text-anchor="middle" x="323" y="-73.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="373,-66 273,-66 273,-42 373,-42 373,-66"/>
+<text text-anchor="middle" x="323" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
 </a>
 </g>
 </g>
 <!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
-<g id="proc~~io_dump_base~~CallsGraph_edge4" class="edge">
+<g id="proc~~io_dump_base~~CallsGraph_edge5" class="edge">
 <title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M225.02,-76.04C237.06,-76.04 250.08,-76.04 262.55,-76.04"/>
-<polygon fill="#000000" stroke="#000000" points="262.86,-79.54 272.86,-76.04 262.86,-72.54 262.86,-79.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M225.02,-54C237.06,-54 250.08,-54 262.55,-54"/>
+<polygon fill="#000000" stroke="#000000" points="262.86,-57.5 272.86,-54 262.86,-50.5 262.86,-57.5"/>
 </g>
 <!-- proc~io_write_frame_body -->
-<g id="proc~~io_dump_base~~CallsGraph_node7" class="node">
+<g id="proc~~io_dump_base~~CallsGraph_node5" class="node">
 <title>proc~io_write_frame_body</title>
-<g id="a_proc~~io_dump_base~~CallsGraph_node7"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="379,-46.04 267,-46.04 267,-22.04 379,-22.04 379,-46.04"/>
-<text text-anchor="middle" x="323" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<g id="a_proc~~io_dump_base~~CallsGraph_node5"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="379,-24 267,-24 267,0 379,0 379,-24"/>
+<text text-anchor="middle" x="323" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
 <!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
-<g id="proc~~io_dump_base~~CallsGraph_edge5" class="edge">
-<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M231.2,-34.04C239.46,-34.04 248.05,-34.04 256.51,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="256.73,-37.54 266.73,-34.04 256.73,-30.54 256.73,-37.54"/>
-</g>
-<!-- proc~util_exit -->
-<g id="proc~~io_dump_base~~CallsGraph_node5" class="node">
-<title>proc~util_exit</title>
-<g id="a_proc~~io_dump_base~~CallsGraph_node5"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
-<polygon fill="#d9534f" stroke="#d9534f" points="559,-46.04 505,-46.04 505,-22.04 559,-22.04 559,-46.04"/>
-<text text-anchor="middle" x="532" y="-31.64" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</a>
-</g>
-</g>
-<!-- interface~util_exit&#45;&gt;proc~util_exit -->
 <g id="proc~~io_dump_base~~CallsGraph_edge6" class="edge">
-<title>interface~util_exit&#45;&gt;proc~util_exit</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M469.4,-34.04C477.39,-34.04 486.31,-34.04 494.82,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="494.92,-37.54 504.92,-34.04 494.92,-30.54 494.92,-37.54"/>
+<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M231.2,-12C239.46,-12 248.05,-12 256.51,-12"/>
+<polygon fill="#000000" stroke="#000000" points="256.73,-15.5 266.73,-12 256.73,-8.5 256.73,-15.5"/>
 </g>
-<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
 <g id="proc~~io_dump_base~~CallsGraph_edge7" class="edge">
-<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M357.53,-64.01C372.48,-58.64 390.12,-52.31 405.32,-46.85"/>
-<polygon fill="#000000" stroke="#000000" points="406.67,-50.08 414.9,-43.41 404.31,-43.49 406.67,-50.08"/>
+<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M357.53,-24.04C372.48,-29.4 390.12,-35.74 405.32,-41.19"/>
+<polygon fill="#000000" stroke="#000000" points="404.31,-44.55 414.9,-44.63 406.67,-37.96 404.31,-44.55"/>
 </g>
-<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
 <g id="proc~~io_dump_base~~CallsGraph_edge8" class="edge">
-<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M379.07,-34.04C387.73,-34.04 396.48,-34.04 404.58,-34.04"/>
-<polygon fill="#000000" stroke="#000000" points="404.77,-37.54 414.77,-34.04 404.77,-30.54 404.77,-37.54"/>
+<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M373.28,-54C383.74,-54 394.6,-54 404.48,-54"/>
+<polygon fill="#000000" stroke="#000000" points="404.75,-57.5 414.75,-54 404.75,-50.5 404.75,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/io_dump_system.html b/docs/proc/io_dump_system.html
index 45383bfd8..6ac26b04c 100644
--- a/docs/proc/io_dump_system.html
+++ b/docs/proc/io_dump_system.html
@@ -293,15 +293,15 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="94,-87 0,-87 0,-63 94,-63 94,-87"/>
 <text text-anchor="middle" x="47" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">io_dump_system</text>
 </g>
-<!-- dump_cb_file -->
+<!-- dump_tp_file -->
 <g id="proc~~io_dump_system~~CallsGraph_node2" class="node">
-<title>dump_cb_file</title>
-<polygon fill="#777777" stroke="#777777" points="216,-150 140,-150 140,-126 216,-126 216,-150"/>
-<text text-anchor="middle" x="178" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_cb_file</text>
+<title>dump_tp_file</title>
+<polygon fill="#777777" stroke="#777777" points="215,-150 141,-150 141,-126 215,-126 215,-150"/>
+<text text-anchor="middle" x="178" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_tp_file</text>
 </g>
-<!-- proc~io_dump_system&#45;&gt;dump_cb_file -->
+<!-- proc~io_dump_system&#45;&gt;dump_tp_file -->
 <g id="proc~~io_dump_system~~CallsGraph_edge1" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_cb_file</title>
+<title>proc~io_dump_system&#45;&gt;dump_tp_file</title>
 <path fill="none" stroke="#000000" d="M70.81,-87.1C87.17,-95.67 109.81,-107.32 130,-117 133.16,-118.51 136.45,-120.06 139.76,-121.58"/>
 <polygon fill="#000000" stroke="#000000" points="138.5,-124.85 149.05,-125.81 141.4,-118.48 138.5,-124.85"/>
 </g>
@@ -312,7 +312,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="178" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_param_file</text>
 </g>
 <!-- proc~io_dump_system&#45;&gt;dump_param_file -->
-<g id="proc~~io_dump_system~~CallsGraph_edge2" class="edge">
+<g id="proc~~io_dump_system~~CallsGraph_edge3" class="edge">
 <title>proc~io_dump_system&#45;&gt;dump_param_file</title>
 <path fill="none" stroke="#000000" d="M94.21,-82.52C102.52,-83.88 111.28,-85.3 119.86,-86.7"/>
 <polygon fill="#000000" stroke="#000000" points="119.38,-90.17 129.81,-88.32 120.5,-83.26 119.38,-90.17"/>
@@ -324,20 +324,20 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="178" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_pl_file</text>
 </g>
 <!-- proc~io_dump_system&#45;&gt;dump_pl_file -->
-<g id="proc~~io_dump_system~~CallsGraph_edge3" class="edge">
+<g id="proc~~io_dump_system~~CallsGraph_edge2" class="edge">
 <title>proc~io_dump_system&#45;&gt;dump_pl_file</title>
 <path fill="none" stroke="#000000" d="M94.21,-67.48C106.17,-65.53 119.06,-63.43 131.01,-61.49"/>
 <polygon fill="#000000" stroke="#000000" points="131.92,-64.88 141.23,-59.82 130.8,-57.98 131.92,-64.88"/>
 </g>
-<!-- dump_tp_file -->
+<!-- dump_cb_file -->
 <g id="proc~~io_dump_system~~CallsGraph_node5" class="node">
-<title>dump_tp_file</title>
-<polygon fill="#777777" stroke="#777777" points="215,-24 141,-24 141,0 215,0 215,-24"/>
-<text text-anchor="middle" x="178" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_tp_file</text>
+<title>dump_cb_file</title>
+<polygon fill="#777777" stroke="#777777" points="216,-24 140,-24 140,0 216,0 216,-24"/>
+<text text-anchor="middle" x="178" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">dump_cb_file</text>
 </g>
-<!-- proc~io_dump_system&#45;&gt;dump_tp_file -->
+<!-- proc~io_dump_system&#45;&gt;dump_cb_file -->
 <g id="proc~~io_dump_system~~CallsGraph_edge4" class="edge">
-<title>proc~io_dump_system&#45;&gt;dump_tp_file</title>
+<title>proc~io_dump_system&#45;&gt;dump_cb_file</title>
 <path fill="none" stroke="#000000" d="M70.81,-62.9C87.17,-54.33 109.81,-42.68 130,-33 133.16,-31.49 136.45,-29.94 139.76,-28.42"/>
 <polygon fill="#000000" stroke="#000000" points="141.4,-31.52 149.05,-24.19 138.5,-25.15 141.4,-31.52"/>
 </g>
diff --git a/docs/proc/io_get_args.html b/docs/proc/io_get_args.html
index 5cdb5b63b..58d3fc517 100644
--- a/docs/proc/io_get_args.html
+++ b/docs/proc/io_get_args.html
@@ -300,18 +300,18 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="69,-66 0,-66 0,-42 69,-42 69,-66"/>
 <text text-anchor="middle" x="34.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">io_get_args</text>
 </g>
-<!-- interface~io_toupper -->
+<!-- interface~util_version -->
 <g id="proc~~io_get_args~~CallsGraph_node2" class="node">
-<title>interface~io_toupper</title>
-<g id="a_proc~~io_get_args~~CallsGraph_node2"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-108 106.5,-108 106.5,-84 170.5,-84 170.5,-108"/>
-<text text-anchor="middle" x="138.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>interface~util_version</title>
+<g id="a_proc~~io_get_args~~CallsGraph_node2"><a xlink:href=".././interface/util_version.html" xlink:title="util_version">
+<polygon fill="#a7506f" stroke="#a7506f" points="172,-108 105,-108 105,-84 172,-84 172,-108"/>
+<text text-anchor="middle" x="138.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
+<!-- proc~io_get_args&#45;&gt;interface~util_version -->
 <g id="proc~~io_get_args~~CallsGraph_edge1" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
+<title>proc~io_get_args&#45;&gt;interface~util_version</title>
 <path fill="none" stroke="#000000" d="M64.73,-66.04C75.4,-70.43 87.63,-75.47 98.99,-80.14"/>
 <polygon fill="#000000" stroke="#000000" points="97.69,-83.39 108.27,-83.96 100.35,-76.92 97.69,-83.39"/>
 </g>
@@ -330,40 +330,40 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M69.18,-54C79.45,-54 90.79,-54 101.22,-54"/>
 <polygon fill="#000000" stroke="#000000" points="101.28,-57.5 111.28,-54 101.28,-50.5 101.28,-57.5"/>
 </g>
-<!-- interface~util_version -->
+<!-- interface~io_toupper -->
 <g id="proc~~io_get_args~~CallsGraph_node4" class="node">
-<title>interface~util_version</title>
-<g id="a_proc~~io_get_args~~CallsGraph_node4"><a xlink:href=".././interface/util_version.html" xlink:title="util_version">
-<polygon fill="#a7506f" stroke="#a7506f" points="172,-24 105,-24 105,0 172,0 172,-24"/>
-<text text-anchor="middle" x="138.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
+<title>interface~io_toupper</title>
+<g id="a_proc~~io_get_args~~CallsGraph_node4"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#a7506f" stroke="#a7506f" points="170.5,-24 106.5,-24 106.5,0 170.5,0 170.5,-24"/>
+<text text-anchor="middle" x="138.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~util_version -->
+<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
 <g id="proc~~io_get_args~~CallsGraph_edge3" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~util_version</title>
+<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
 <path fill="none" stroke="#000000" d="M64.73,-41.96C75.4,-37.57 87.63,-32.53 98.99,-27.86"/>
 <polygon fill="#000000" stroke="#000000" points="100.35,-31.08 108.27,-24.04 97.69,-24.61 100.35,-31.08"/>
 </g>
-<!-- proc~io_toupper -->
+<!-- proc~util_version -->
 <g id="proc~~io_get_args~~CallsGraph_node7" class="node">
-<title>proc~io_toupper</title>
-<g id="a_proc~~io_get_args~~CallsGraph_node7"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#d9534f" stroke="#d9534f" points="273.5,-108 209.5,-108 209.5,-84 273.5,-84 273.5,-108"/>
-<text text-anchor="middle" x="241.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>proc~util_version</title>
+<g id="a_proc~~io_get_args~~CallsGraph_node7"><a xlink:href=".././proc/util_version.html" xlink:title="util_version">
+<polygon fill="#d9534f" stroke="#d9534f" points="275,-108 208,-108 208,-84 275,-84 275,-108"/>
+<text text-anchor="middle" x="241.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
 </a>
 </g>
 </g>
-<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
+<!-- interface~util_version&#45;&gt;proc~util_version -->
 <g id="proc~~io_get_args~~CallsGraph_edge4" class="edge">
-<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.63,-96C179.65,-96 189.65,-96 199.19,-96"/>
-<polygon fill="#000000" stroke="#000000" points="199.3,-99.5 209.3,-96 199.3,-92.5 199.3,-99.5"/>
+<title>interface~util_version&#45;&gt;proc~util_version</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.01,-96C180.13,-96 188.96,-96 197.5,-96"/>
+<polygon fill="#000000" stroke="#000000" points="197.7,-99.5 207.7,-96 197.7,-92.5 197.7,-99.5"/>
 </g>
 <!-- proc~util_exit -->
-<g id="proc~~io_get_args~~CallsGraph_node5" class="node">
+<g id="proc~~io_get_args~~CallsGraph_node6" class="node">
 <title>proc~util_exit</title>
-<g id="a_proc~~io_get_args~~CallsGraph_node5"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<g id="a_proc~~io_get_args~~CallsGraph_node6"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
 <polygon fill="#d9534f" stroke="#d9534f" points="268.5,-66 214.5,-66 214.5,-42 268.5,-42 268.5,-66"/>
 <text text-anchor="middle" x="241.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
@@ -375,20 +375,20 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.51,-54C177.2,-54 191.2,-54 203.92,-54"/>
 <polygon fill="#000000" stroke="#000000" points="204.23,-57.5 214.23,-54 204.23,-50.5 204.23,-57.5"/>
 </g>
-<!-- proc~util_version -->
-<g id="proc~~io_get_args~~CallsGraph_node6" class="node">
-<title>proc~util_version</title>
-<g id="a_proc~~io_get_args~~CallsGraph_node6"><a xlink:href=".././proc/util_version.html" xlink:title="util_version">
-<polygon fill="#d9534f" stroke="#d9534f" points="275,-24 208,-24 208,0 275,0 275,-24"/>
-<text text-anchor="middle" x="241.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version</text>
+<!-- proc~io_toupper -->
+<g id="proc~~io_get_args~~CallsGraph_node5" class="node">
+<title>proc~io_toupper</title>
+<g id="a_proc~~io_get_args~~CallsGraph_node5"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#d9534f" stroke="#d9534f" points="273.5,-24 209.5,-24 209.5,0 273.5,0 273.5,-24"/>
+<text text-anchor="middle" x="241.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- interface~util_version&#45;&gt;proc~util_version -->
+<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
 <g id="proc~~io_get_args~~CallsGraph_edge6" class="edge">
-<title>interface~util_version&#45;&gt;proc~util_version</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M172.01,-12C180.13,-12 188.96,-12 197.5,-12"/>
-<polygon fill="#000000" stroke="#000000" points="197.7,-15.5 207.7,-12 197.7,-8.5 197.7,-15.5"/>
+<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.63,-12C179.65,-12 189.65,-12 199.19,-12"/>
+<polygon fill="#000000" stroke="#000000" points="199.3,-15.5 209.3,-12 199.3,-8.5 199.3,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/io_get_token.html b/docs/proc/io_get_token.html
index a58a0f605..6a4700b77 100644
--- a/docs/proc/io_get_token.html
+++ b/docs/proc/io_get_token.html
@@ -136,7 +136,7 @@ <h1>io_get_token
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
diff --git a/docs/proc/io_param_reader.html b/docs/proc/io_param_reader.html
index 19f47f433..f5a11aa39 100644
--- a/docs/proc/io_param_reader.html
+++ b/docs/proc/io_param_reader.html
@@ -358,65 +358,65 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="95,-45 0,-45 0,-21 95,-21 95,-45"/>
 <text text-anchor="middle" x="47.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">io_param_reader</text>
 </g>
-<!-- interface~io_toupper -->
+<!-- interface~io_get_token -->
 <g id="proc~~io_param_reader~~CallsGraph_node2" class="node">
-<title>interface~io_toupper</title>
-<g id="a_proc~~io_param_reader~~CallsGraph_node2"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#a7506f" stroke="#a7506f" points="200,-66 136,-66 136,-42 200,-42 200,-66"/>
-<text text-anchor="middle" x="168" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>interface~io_get_token</title>
+<g id="a_proc~~io_param_reader~~CallsGraph_node2"><a xlink:href=".././interface/io_get_token.html" xlink:title="io_get_token">
+<polygon fill="#a7506f" stroke="#a7506f" points="205,-66 131,-66 131,-42 205,-42 205,-66"/>
+<text text-anchor="middle" x="168" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </a>
 </g>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
+<!-- proc~io_param_reader&#45;&gt;interface~io_get_token -->
 <g id="proc~~io_param_reader~~CallsGraph_edge1" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M95.33,-41.3C105.42,-43.09 116,-44.96 125.85,-46.71"/>
-<polygon fill="#000000" stroke="#000000" points="125.34,-50.17 135.79,-48.47 126.56,-43.28 125.34,-50.17"/>
+<title>proc~io_param_reader&#45;&gt;interface~io_get_token</title>
+<path fill="none" stroke="#000000" d="M95.33,-41.3C103.7,-42.78 112.42,-44.33 120.78,-45.81"/>
+<polygon fill="#000000" stroke="#000000" points="120.28,-49.27 130.74,-47.57 121.5,-42.38 120.28,-49.27"/>
 </g>
-<!-- interface~io_get_token -->
+<!-- interface~io_toupper -->
 <g id="proc~~io_param_reader~~CallsGraph_node3" class="node">
-<title>interface~io_get_token</title>
-<g id="a_proc~~io_param_reader~~CallsGraph_node3"><a xlink:href=".././interface/io_get_token.html" xlink:title="io_get_token">
-<polygon fill="#a7506f" stroke="#a7506f" points="205,-24 131,-24 131,0 205,0 205,-24"/>
-<text text-anchor="middle" x="168" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<title>interface~io_toupper</title>
+<g id="a_proc~~io_param_reader~~CallsGraph_node3"><a xlink:href=".././interface/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#a7506f" stroke="#a7506f" points="200,-24 136,-24 136,0 200,0 200,-24"/>
+<text text-anchor="middle" x="168" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_get_token -->
+<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
 <g id="proc~~io_param_reader~~CallsGraph_edge2" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_get_token</title>
-<path fill="none" stroke="#000000" d="M95.33,-24.7C103.7,-23.22 112.42,-21.67 120.78,-20.19"/>
-<polygon fill="#000000" stroke="#000000" points="121.5,-23.62 130.74,-18.43 120.28,-16.73 121.5,-23.62"/>
+<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M95.33,-24.7C105.42,-22.91 116,-21.04 125.85,-19.29"/>
+<polygon fill="#000000" stroke="#000000" points="126.56,-22.72 135.79,-17.53 125.34,-15.83 126.56,-22.72"/>
 </g>
-<!-- proc~io_toupper -->
+<!-- proc~io_get_token -->
 <g id="proc~~io_param_reader~~CallsGraph_node5" class="node">
-<title>proc~io_toupper</title>
-<g id="a_proc~~io_param_reader~~CallsGraph_node5"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
-<polygon fill="#d9534f" stroke="#d9534f" points="310,-66 246,-66 246,-42 310,-42 310,-66"/>
-<text text-anchor="middle" x="278" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+<title>proc~io_get_token</title>
+<g id="a_proc~~io_param_reader~~CallsGraph_node5"><a xlink:href=".././proc/io_get_token.html" xlink:title="io_get_token">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="315,-66 241,-66 241,-42 315,-42 315,-66"/>
+<text text-anchor="middle" x="278" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </a>
 </g>
 </g>
-<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
+<!-- interface~io_get_token&#45;&gt;proc~io_get_token -->
 <g id="proc~~io_param_reader~~CallsGraph_edge3" class="edge">
-<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200.24,-54C211.32,-54 223.97,-54 235.76,-54"/>
-<polygon fill="#000000" stroke="#000000" points="235.83,-57.5 245.83,-54 235.83,-50.5 235.83,-57.5"/>
+<title>interface~io_get_token&#45;&gt;proc~io_get_token</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.26,-54C213.37,-54 222.07,-54 230.52,-54"/>
+<polygon fill="#000000" stroke="#000000" points="230.65,-57.5 240.65,-54 230.65,-50.5 230.65,-57.5"/>
 </g>
-<!-- proc~io_get_token -->
+<!-- proc~io_toupper -->
 <g id="proc~~io_param_reader~~CallsGraph_node4" class="node">
-<title>proc~io_get_token</title>
-<g id="a_proc~~io_param_reader~~CallsGraph_node4"><a xlink:href=".././proc/io_get_token.html" xlink:title="io_get_token">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="315,-24 241,-24 241,0 315,0 315,-24"/>
-<text text-anchor="middle" x="278" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<title>proc~io_toupper</title>
+<g id="a_proc~~io_param_reader~~CallsGraph_node4"><a xlink:href=".././proc/io_toupper.html" xlink:title="io_toupper">
+<polygon fill="#d9534f" stroke="#d9534f" points="310,-24 246,-24 246,0 310,0 310,-24"/>
+<text text-anchor="middle" x="278" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_token&#45;&gt;proc~io_get_token -->
+<!-- interface~io_toupper&#45;&gt;proc~io_toupper -->
 <g id="proc~~io_param_reader~~CallsGraph_edge4" class="edge">
-<title>interface~io_get_token&#45;&gt;proc~io_get_token</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.26,-12C213.37,-12 222.07,-12 230.52,-12"/>
-<polygon fill="#000000" stroke="#000000" points="230.65,-15.5 240.65,-12 230.65,-8.5 230.65,-15.5"/>
+<title>interface~io_toupper&#45;&gt;proc~io_toupper</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200.24,-12C211.32,-12 223.97,-12 235.76,-12"/>
+<polygon fill="#000000" stroke="#000000" points="235.83,-15.5 245.83,-12 235.83,-8.5 235.83,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/io_read_frame_cb.html b/docs/proc/io_read_frame_cb.html
index d1509b38d..36bc2e83a 100644
--- a/docs/proc/io_read_frame_cb.html
+++ b/docs/proc/io_read_frame_cb.html
@@ -136,7 +136,7 @@ <h1>io_read_frame_cb
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
diff --git a/docs/proc/io_read_hdr.html b/docs/proc/io_read_hdr.html
index f93d38a6d..4aa786c1b 100644
--- a/docs/proc/io_read_hdr.html
+++ b/docs/proc/io_read_hdr.html
@@ -267,7 +267,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-npl~2"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-npl~3"></span>integer(kind=I4B),</td>
   <td>intent(out)</td>
   <td></td>
   
diff --git a/docs/proc/io_toupper.html b/docs/proc/io_toupper.html
index 9aef91fc1..bba3e5e93 100644
--- a/docs/proc/io_toupper.html
+++ b/docs/proc/io_toupper.html
@@ -293,65 +293,65 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.01,-33C334.14,-33 343.04,-33 351.62,-33"/>
 <polygon fill="#000000" stroke="#000000" points="351.86,-36.5 361.86,-33 351.86,-29.5 351.86,-36.5"/>
 </g>
-<!-- proc~io_param_reader -->
+<!-- proc~io_get_args -->
 <g id="proc~~io_toupper~~CalledByGraph_node3" class="node">
-<title>proc~io_param_reader</title>
-<g id="a_proc~~io_toupper~~CalledByGraph_node3"><a xlink:href=".././proc/io_param_reader.html" xlink:title="io_param_reader">
-<polygon fill="#d9534f" stroke="#d9534f" points="226,-66 131,-66 131,-42 226,-42 226,-66"/>
-<text text-anchor="middle" x="178.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<title>proc~io_get_args</title>
+<g id="a_proc~~io_toupper~~CalledByGraph_node3"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="213,-66 144,-66 144,-42 213,-42 213,-66"/>
+<text text-anchor="middle" x="178.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
-<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
+<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
 <g id="proc~~io_toupper~~CalledByGraph_edge2" class="edge">
-<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M226.32,-45.34C234.83,-43.76 243.65,-42.13 251.97,-40.59"/>
-<polygon fill="#000000" stroke="#000000" points="252.63,-44.03 261.83,-38.77 251.36,-37.14 252.63,-44.03"/>
+<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M213.25,-47.76C225.41,-45.5 239.28,-42.94 252,-40.59"/>
+<polygon fill="#000000" stroke="#000000" points="252.71,-44.01 261.9,-38.75 251.43,-37.13 252.71,-44.01"/>
 </g>
-<!-- proc~io_get_args -->
+<!-- proc~io_param_reader -->
 <g id="proc~~io_toupper~~CalledByGraph_node4" class="node">
-<title>proc~io_get_args</title>
-<g id="a_proc~~io_toupper~~CalledByGraph_node4"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="213,-24 144,-24 144,0 213,0 213,-24"/>
-<text text-anchor="middle" x="178.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<title>proc~io_param_reader</title>
+<g id="a_proc~~io_toupper~~CalledByGraph_node4"><a xlink:href=".././proc/io_param_reader.html" xlink:title="io_param_reader">
+<polygon fill="#d9534f" stroke="#d9534f" points="226,-24 131,-24 131,0 226,0 226,-24"/>
+<text text-anchor="middle" x="178.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~io_toupper -->
+<!-- proc~io_param_reader&#45;&gt;interface~io_toupper -->
 <g id="proc~~io_toupper~~CalledByGraph_edge3" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~io_toupper</title>
-<path fill="none" stroke="#000000" d="M213.25,-18.24C225.41,-20.5 239.28,-23.06 252,-25.41"/>
-<polygon fill="#000000" stroke="#000000" points="251.43,-28.87 261.9,-27.25 252.71,-21.99 251.43,-28.87"/>
+<title>proc~io_param_reader&#45;&gt;interface~io_toupper</title>
+<path fill="none" stroke="#000000" d="M226.32,-20.66C234.83,-22.24 243.65,-23.87 251.97,-25.41"/>
+<polygon fill="#000000" stroke="#000000" points="251.36,-28.86 261.83,-27.23 252.63,-21.97 251.36,-28.86"/>
 </g>
 <!-- interface~io_get_args -->
 <g id="proc~~io_toupper~~CalledByGraph_node5" class="node">
 <title>interface~io_get_args</title>
 <g id="a_proc~~io_toupper~~CalledByGraph_node5"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#a7506f" stroke="#a7506f" points="82,-24 13,-24 13,0 82,0 82,-24"/>
-<text text-anchor="middle" x="47.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="82,-66 13,-66 13,-42 82,-42 82,-66"/>
+<text text-anchor="middle" x="47.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
 <!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
-<g id="proc~~io_toupper~~CalledByGraph_edge5" class="edge">
+<g id="proc~~io_toupper~~CalledByGraph_edge4" class="edge">
 <title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.06,-12C97.76,-12 116.67,-12 133.5,-12"/>
-<polygon fill="#000000" stroke="#000000" points="133.66,-15.5 143.66,-12 133.66,-8.5 133.66,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.06,-54C97.76,-54 116.67,-54 133.5,-54"/>
+<polygon fill="#000000" stroke="#000000" points="133.66,-57.5 143.66,-54 133.66,-50.5 133.66,-57.5"/>
 </g>
 <!-- interface~io_param_reader -->
 <g id="proc~~io_toupper~~CalledByGraph_node6" class="node">
 <title>interface~io_param_reader</title>
 <g id="a_proc~~io_toupper~~CalledByGraph_node6"><a xlink:href=".././interface/io_param_reader.html" xlink:title="io_param_reader">
-<polygon fill="#a7506f" stroke="#a7506f" points="95,-66 0,-66 0,-42 95,-42 95,-66"/>
-<text text-anchor="middle" x="47.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="95,-24 0,-24 0,0 95,0 95,-24"/>
+<text text-anchor="middle" x="47.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </a>
 </g>
 </g>
 <!-- interface~io_param_reader&#45;&gt;proc~io_param_reader -->
-<g id="proc~~io_toupper~~CalledByGraph_edge4" class="edge">
+<g id="proc~~io_toupper~~CalledByGraph_edge5" class="edge">
 <title>interface~io_param_reader&#45;&gt;proc~io_param_reader</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M95.07,-54C103.48,-54 112.32,-54 120.97,-54"/>
-<polygon fill="#000000" stroke="#000000" points="121,-57.5 131,-54 121,-50.5 121,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M95.07,-12C103.48,-12 112.32,-12 120.97,-12"/>
+<polygon fill="#000000" stroke="#000000" points="121,-15.5 131,-12 121,-8.5 121,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/kick_getacch_int_all_pl.html b/docs/proc/kick_getacch_int_all_pl.html
index c493c50c0..1f039c5fa 100644
--- a/docs/proc/kick_getacch_int_all_pl.html
+++ b/docs/proc/kick_getacch_int_all_pl.html
@@ -136,7 +136,7 @@ <h1>kick_getacch_int_all_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">29 statements</a>
+    title=" 0.0% of total for procedures.">31 statements</a>
      </li> 
      
      
@@ -238,7 +238,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-npl~6"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-npl~8"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-nplpl~3"></span>integer(kind=I8B),</td>
+  <td><span class="anchor" id="variable-nplpl~4"></span>integer(kind=I8B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -268,7 +268,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-k_plpl~4"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-k_plpl~5"></span>integer(kind=I4B),</td>
   <td>intent(in),</td>
   <td></td>
   
@@ -298,7 +298,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-gmass~4"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-gmass~5"></span>real(kind=DP),</td>
   <td>intent(in),</td>
   <td></td>
   
@@ -328,7 +328,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-acc~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-acc~3"></span>real(kind=DP),</td>
   <td>intent(inout),</td>
   <td></td>
   
diff --git a/docs/proc/kick_getacch_int_all_tp.html b/docs/proc/kick_getacch_int_all_tp.html
new file mode 100644
index 000000000..f26b8248d
--- /dev/null
+++ b/docs/proc/kick_getacch_int_all_tp.html
@@ -0,0 +1,587 @@
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+   
+   <meta name="description" content="Swiftest - The Fastest Symplectic Massive Body Integrator in the West (someday, hopefully)">
+    
+    <meta name="author" content="David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott" >
+    <link rel="icon" href="../favicon.png">
+
+    <title>kick_getacch_int_all_tp &ndash; swiftest</title>
+
+    <link href="../css/bootstrap.min.css" rel="stylesheet">
+    <link href="../css/pygments.css" rel="stylesheet">
+    <link href="../css/font-awesome.min.css" rel="stylesheet">
+    <link href="../css/local.css" rel="stylesheet">
+    
+    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
+    
+    
+
+    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
+      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
+    <![endif]-->
+    
+    <script src="../js/jquery-2.1.3.min.js"></script>
+    <script src="../js/svg-pan-zoom.min.js"></script>
+
+  </head>
+
+  <body>
+
+    <!-- Fixed navbar -->
+    <nav class="navbar navbar-inverse navbar-fixed-top">
+      <div class="container">
+        <div class="navbar-header">
+          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
+            <span class="sr-only">Toggle navigation</span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+          </button>
+          <a class="navbar-brand" href="../index.html">swiftest </a>
+        </div>
+        <div id="navbar" class="navbar-collapse collapse">
+          <ul class="nav navbar-nav">
+        
+            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
+              <a href="#" class="dropdown-toggle"
+              data-toggle="dropdown" role="button"
+              aria-haspopup="true"
+     aria-expanded="false">Contents <span class="caret"></span></a>
+        <ul class="dropdown-menu">
+          
+              
+            <li><a href="../lists/files.html">Source Files</a></li>
+        
+        
+        
+            <li><a href="../lists/modules.html">Modules</a></li>
+        
+            
+                                
+            <li><a href="../lists/procedures.html">Procedures</a></li>
+        
+        
+            <li><a href="../lists/absint.html">Abstract Interfaces</a></li>
+               
+            <li><a href="../lists/types.html">Derived Types</a></li>
+        
+        
+            <li><a href="../program/swiftest_driver.html">Program</a></li>
+      
+            </ul>
+            </li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/absint.html">Abstract Interfaces</a></li>
+                             
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../program/swiftest_driver.html">Program</a></li>
+
+          </ul>
+        
+        <form action="../search.html" class="navbar-form navbar-right" role="search">
+        <div class="form-group">
+          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
+        </div>
+<!--
+        <button type="submit" class="btn btn-default">Submit</button>
+-->
+        </form>
+        
+        </div><!--/.nav-collapse -->
+      </div>
+    </nav>
+
+    <div class="container">
+    
+  
+  <div class="row">
+    <h1>kick_getacch_int_all_tp
+      <small>Module Subroutine</small>
+    
+    </h1>
+    
+<div class="row">
+  <div class="col-lg-12">
+<div class="well well-sm">
+  <ul class="list-inline" style="margin-bottom:0px;display:inline">
+     
+     <li><i class="fa fa-pencil"></i> David A. Minton</li>
+     
+     
+     
+     
+    
+    
+     <li><i class="fa fa-list-ol"></i>
+       <a data-toggle="tooltip"
+    data-placement="bottom" data-html="true"
+    title=" 0.0% of total for procedures.">25 statements</a>
+     </li> 
+     
+     
+     
+    <li><i class="fa fa-code"></i><a href="../src/kick.f90"> Source File</a></li>
+     
+     
+  </ul>
+  <ol class="breadcrumb in-well text-right">
+  
+    
+     <li><a href='../sourcefile/kick.f90.html'>kick.f90</a></li>
+    
+     <li><a href='../module/s_kick.html'>s_kick</a></li>
+    
+  
+     <li class="active">kick_getacch_int_all_tp</li>
+  </ol>
+</div>
+</div>
+</div>
+<script>
+  $(function () {
+  $('[data-toggle="tooltip"]').tooltip()
+  })
+</script>
+
+  </div>
+  
+  <div class="row">
+    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
+    
+<div id="sidebar">
+  
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+</div>
+
+    </div>
+    
+    <div class="col-md-9" id='text'>
+    <h2>
+module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc)
+    
+    
+   <a href='../interface/kick_getacch_int_all_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
+    
+   
+</h2>
+    
+  
+
+
+    
+    <p>Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies with parallelisim</p>
+<p>Adapted from Hal Levison's Swift routine getacch_ah3_tp.f
+ Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f99</p>
+    
+
+    <h3>Arguments</h3>
+    
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-ntp~3"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>ntp</strong></td><td><p>Number of test particles</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-npl~9"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>npl</strong></td><td><p>Number of massive bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-xtp~2"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xtp</strong></td><td><p>Test particle position vector array</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-xpl~2"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xpl</strong></td><td><p>Massive body particle position vector array</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-gmpl~5"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>GMpl</strong></td><td><p>Array of massive body G*mass</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-lmask~6"></span>logical,</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>lmask</strong></td><td><p>Logical mask indicating which test particles should be computed</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-acc~4"></span>real(kind=DP),</td>
+  <td>intent(inout),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>acc</strong></td><td><p>Acceleration vector array </p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+    
+    
+    
+    <br>
+    
+    
+     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Called by</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~kick_getacch_int_all_tp~~CalledByGraph Pages: 1 -->
+<svg id="prockick_getacch_int_all_tpCalledByGraph" width="574pt" height="32pt"
+ viewBox="0.00 0.00 574.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~kick_getacch_int_all_tp~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 570,-28 570,4 -4,4"/>
+<!-- proc~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph_node1" class="node">
+<title>proc~kick_getacch_int_all_tp</title>
+<polygon fill="none" stroke="black" points="566,-24 443,-24 443,0 566,0 566,-24"/>
+<text text-anchor="middle" x="504.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">kick_getacch_int_all_tp</text>
+</g>
+<!-- interface~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph_node2" class="node">
+<title>interface~kick_getacch_int_all_tp</title>
+<g id="a_proc~~kick_getacch_int_all_tp~~CalledByGraph_node2"><a xlink:href=".././interface/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="407,-24 284,-24 284,0 407,0 407,-24"/>
+<text text-anchor="middle" x="345.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph_edge1" class="edge">
+<title>interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.2,-12C415.64,-12 424.36,-12 432.95,-12"/>
+<polygon fill="#000000" stroke="#000000" points="432.96,-15.5 442.96,-12 432.96,-8.5 432.96,-15.5"/>
+</g>
+<!-- proc~kick_getacch_int_tp -->
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph_node3" class="node">
+<title>proc~kick_getacch_int_tp</title>
+<g id="a_proc~~kick_getacch_int_all_tp~~CalledByGraph_node3"><a xlink:href=".././proc/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="248,-24 142,-24 142,0 248,0 248,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
+</a>
+</g>
+</g>
+<!-- proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph_edge2" class="edge">
+<title>proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" d="M248.36,-12C256.64,-12 265.32,-12 273.94,-12"/>
+<polygon fill="#000000" stroke="#000000" points="273.99,-15.5 283.99,-12 273.99,-8.5 273.99,-15.5"/>
+</g>
+<!-- interface~kick_getacch_int_tp -->
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph_node4" class="node">
+<title>interface~kick_getacch_int_tp</title>
+<g id="a_proc~~kick_getacch_int_all_tp~~CalledByGraph_node4"><a xlink:href=".././interface/kick_getacch_int_tp.html" xlink:title="kick_getacch_int_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="106,-24 0,-24 0,0 106,0 106,-24"/>
+<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp -->
+<g id="proc~~kick_getacch_int_all_tp~~CalledByGraph_edge3" class="edge">
+<title>interface~kick_getacch_int_tp&#45;&gt;proc~kick_getacch_int_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M106.13,-12C114.42,-12 123.07,-12 131.57,-12"/>
+<polygon fill="#000000" stroke="#000000" points="131.83,-15.5 141.83,-12 131.83,-8.5 131.83,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+    <br>
+
+    <section class="visible-xs visible-sm hidden-md">
+      
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+    </section>
+    <br class="visible-xs visible-sm hidden-md">
+
+    
+
+    
+    
+    
+    
+    
+
+    
+    
+    
+    
+    
+
+
+    
+    
+    
+    
+    </div>
+  </div>
+
+
+    <hr>    
+    </div> <!-- /container -->
+    <footer>
+      <div class="container">
+      <div class="row">
+        <div class="col-xs-6 col-md-4"><p>&copy; 2021 <a rel="license" href="http://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons License" style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a>
+                                          </p></div>
+        <div class="col-xs-6 col-md-4 col-md-push-4">
+          <p class="text-right">
+            Documentation generated by 
+            <a href="https://github.com/cmacmackin/ford">FORD</a>
+            
+          </p>
+        </div>
+        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> swiftest was developed by David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</p></div>
+      </div>
+      <br>
+      </div> <!-- /container -->    
+    </footer>
+
+    <!-- Bootstrap core JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+<!--
+    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
+-->
+    <script src="../js/bootstrap.min.js"></script>
+    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
+    <script src="../js/ie10-viewport-bug-workaround.js"></script>
+
+    <!-- MathJax JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+    <script type="text/x-mathjax-config">
+      MathJax.Hub.Config({
+        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
+        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
+        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js']
+      });
+    </script>
+    
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.1/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
+    
+    
+    <script src="../tipuesearch/tipuesearch_content.js"></script>
+    <script src="../tipuesearch/tipuesearch_set.js"></script>
+    <script src="../tipuesearch/tipuesearch.js"></script>
+    
+    
+  </body>
+</html>
\ No newline at end of file
diff --git a/docs/proc/kick_getacch_int_one_pl.html b/docs/proc/kick_getacch_int_one_pl.html
index 386fb6ff1..66d99998f 100644
--- a/docs/proc/kick_getacch_int_one_pl.html
+++ b/docs/proc/kick_getacch_int_one_pl.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-xr~5"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~6"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -268,7 +268,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-yr~5"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~6"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -283,7 +283,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-zr~5"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~6"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/kick_getacch_int_one_tp.html b/docs/proc/kick_getacch_int_one_tp.html
index cff293b15..00e0a8a00 100644
--- a/docs/proc/kick_getacch_int_one_tp.html
+++ b/docs/proc/kick_getacch_int_one_tp.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-xr~6"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~7"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -268,7 +268,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-yr~6"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~7"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -283,7 +283,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-zr~6"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~7"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/kick_getacch_int_pl.html b/docs/proc/kick_getacch_int_pl.html
index dde294416..278fd77e8 100644
--- a/docs/proc/kick_getacch_int_pl.html
+++ b/docs/proc/kick_getacch_int_pl.html
@@ -243,7 +243,7 @@ <h3>Arguments</h3>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td></td>
+  <td><strong>self</strong></td><td><p>Swiftest massive body object</p></td>
   
 </tr>
 
diff --git a/docs/proc/kick_getacch_int_tp.html b/docs/proc/kick_getacch_int_tp.html
index 3e5d61d15..cac35188f 100644
--- a/docs/proc/kick_getacch_int_tp.html
+++ b/docs/proc/kick_getacch_int_tp.html
@@ -136,7 +136,7 @@ <h1>kick_getacch_int_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">27 statements</a>
+    title=" 0.0% of total for procedures.">10 statements</a>
      </li> 
      
      
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
     
     
    <a href='../interface/kick_getacch_int_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -243,7 +243,7 @@ <h3>Arguments</h3>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>self</strong></td><td><p>Swiftest test particle</p></td>
+  <td><strong>self</strong></td><td><p>Swiftest test particle object</p></td>
   
 </tr>
 
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-gmpl~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-gmpl~4"></span>real(kind=DP),</td>
   <td>intent(in),</td>
   <td></td>
   
@@ -283,7 +283,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-npl~5"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-npl~7"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -301,6 +301,122 @@ <h3>Arguments</h3>
     <br>
     
     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Calls</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~kick_getacch_int_tp~~CallsGraph Pages: 1 -->
+<svg id="prockick_getacch_int_tpCallsGraph" width="432pt" height="32pt"
+ viewBox="0.00 0.00 432.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~kick_getacch_int_tp~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~kick_getacch_int_tp~~CallsGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 428,-28 428,4 -4,4"/>
+<!-- proc~kick_getacch_int_tp -->
+<g id="proc~~kick_getacch_int_tp~~CallsGraph_node1" class="node">
+<title>proc~kick_getacch_int_tp</title>
+<polygon fill="none" stroke="black" points="106,-24 0,-24 0,0 106,0 106,-24"/>
+<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">kick_getacch_int_tp</text>
+</g>
+<!-- interface~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_tp~~CallsGraph_node2" class="node">
+<title>interface~kick_getacch_int_all_tp</title>
+<g id="a_proc~~kick_getacch_int_tp~~CallsGraph_node2"><a xlink:href=".././interface/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="265,-24 142,-24 142,0 265,0 265,-24"/>
+<text text-anchor="middle" x="203.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
+</a>
+</g>
+</g>
+<!-- proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_tp~~CallsGraph_edge1" class="edge">
+<title>proc~kick_getacch_int_tp&#45;&gt;interface~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" d="M106.36,-12C114.64,-12 123.32,-12 131.94,-12"/>
+<polygon fill="#000000" stroke="#000000" points="131.99,-15.5 141.99,-12 131.99,-8.5 131.99,-15.5"/>
+</g>
+<!-- proc~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_tp~~CallsGraph_node3" class="node">
+<title>proc~kick_getacch_int_all_tp</title>
+<g id="a_proc~~kick_getacch_int_tp~~CallsGraph_node3"><a xlink:href=".././proc/kick_getacch_int_all_tp.html" xlink:title="kick_getacch_int_all_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="424,-24 301,-24 301,0 424,0 424,-24"/>
+<text text-anchor="middle" x="362.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick_getacch_int_all_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp -->
+<g id="proc~~kick_getacch_int_tp~~CallsGraph_edge2" class="edge">
+<title>interface~kick_getacch_int_all_tp&#45;&gt;proc~kick_getacch_int_all_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.2,-12C273.64,-12 282.36,-12 290.95,-12"/>
+<polygon fill="#000000" stroke="#000000" points="290.96,-15.5 300.96,-12 290.96,-8.5 290.96,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
      
     <div class="panel panel-default">
       <div class="panel-heading">
diff --git a/docs/proc/netcdf_initialize_output.html b/docs/proc/netcdf_initialize_output.html
index b45db12df..d6e7225e2 100644
--- a/docs/proc/netcdf_initialize_output.html
+++ b/docs/proc/netcdf_initialize_output.html
@@ -136,7 +136,7 @@ <h1>netcdf_initialize_output
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">90 statements</a>
+    title=" 0.2% of total for procedures.">108 statements</a>
      </li> 
      
      
@@ -212,10 +212,125 @@ <h2>
 </h2>
     
   
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Uses</h3>
+      </div>
+      <ul class="list-group">
+      
+      <li class="list-group-item">
+  <ul class="list-inline">
+    
+    <li><a href="http://fortranwiki.org/fortran/show/IEEE_ARITHMETIC">ieee_arithmetic</a></li>
+    
+  </ul>
+      </li>
+      
+      
+      
+      <li class="list-group-item">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~netcdf_initialize_output~~UsesGraph Pages: 1 -->
+<svg id="procnetcdf_initialize_outputUsesGraph" width="250pt" height="32pt"
+ viewBox="0.00 0.00 250.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~netcdf_initialize_output~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~netcdf_initialize_output~~UsesGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 246,-28 246,4 -4,4"/>
+<!-- proc~netcdf_initialize_output -->
+<g id="proc~~netcdf_initialize_output~~UsesGraph_node1" class="node">
+<title>proc~netcdf_initialize_output</title>
+<polygon fill="none" stroke="black" points="242,-24 121,-24 121,0 242,0 242,-24"/>
+<text text-anchor="middle" x="181.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_initialize_output</text>
+</g>
+<!-- ieee_arithmetic -->
+<g id="proc~~netcdf_initialize_output~~UsesGraph_node2" class="node">
+<title>ieee_arithmetic</title>
+<g id="a_proc~~netcdf_initialize_output~~UsesGraph_node2"><a xlink:href="http://fortranwiki.org/fortran/show/IEEE_ARITHMETIC" xlink:title="ieee_arithmetic">
+<polygon fill="#337ab7" stroke="#337ab7" points="85,-24 0,-24 0,0 85,0 85,-24"/>
+<text text-anchor="middle" x="42.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_arithmetic</text>
+</a>
+</g>
+</g>
+<!-- proc~netcdf_initialize_output&#45;&gt;ieee_arithmetic -->
+<g id="proc~~netcdf_initialize_output~~UsesGraph_edge1" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;ieee_arithmetic</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M120.81,-12C112.39,-12 103.8,-12 95.54,-12"/>
+<polygon fill="#000000" stroke="#000000" points="95.3,-8.5 85.3,-12 95.3,-15.5 95.3,-8.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="490pt" height="32pt"
+ viewBox="0.00 0.00 489.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 485.5,-28 485.5,4 -4,4"/>
+<!-- Module -->
+<g id="node1" class="node">
+<title>Module</title>
+<polygon fill="#337ab7" stroke="#337ab7" points="54,-24 0,-24 0,0 54,0 54,-24"/>
+<text text-anchor="middle" x="27" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Module</text>
+</g>
+<!-- Submodule -->
+<g id="node2" class="node">
+<title>Submodule</title>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="139.5,-24 72.5,-24 72.5,0 139.5,0 139.5,-24"/>
+<text text-anchor="middle" x="106" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Submodule</text>
+</g>
+<!-- Subroutine -->
+<g id="node3" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="222,-24 158,-24 158,0 222,0 222,-24"/>
+<text text-anchor="middle" x="190" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node4" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="294,-24 240,-24 240,0 294,0 294,-24"/>
+<text text-anchor="middle" x="267" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-24 312,-24 312,0 366,0 366,-24"/>
+<text text-anchor="middle" x="339" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="481.5,-24 384.5,-24 384.5,0 481.5,0 481.5,-24"/>
+<text text-anchor="middle" x="433" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a submodule to the (sub)module which it is
+    descended from. Dashed arrows point from a module or program unit to 
+    modules which it uses.
+    </p>
+    </div></div></div></div>
+      </li>
+      
+      </ul>
+    </div>
+    
 
 
     
     <p>Initialize a NetCDF file system and defines all variables.
+ Create the new output file, deleting any previously existing output file of the same name
  Define the variables</p>
     
 
@@ -281,64 +396,88 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~netcdf_initialize_output~~CallsGraph Pages: 1 -->
-<svg id="procnetcdf_initialize_outputCallsGraph" width="243pt" height="158pt"
- viewBox="0.00 0.00 243.00 158.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~netcdf_initialize_output~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 154)">
+<svg id="procnetcdf_initialize_outputCallsGraph" width="280pt" height="242pt"
+ viewBox="0.00 0.00 280.00 242.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~netcdf_initialize_output~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 238)">
 <title>proc~~netcdf_initialize_output~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-154 239,-154 239,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-238 276,-238 276,4 -4,4"/>
 <!-- proc~netcdf_initialize_output -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_node1" class="node">
 <title>proc~netcdf_initialize_output</title>
-<polygon fill="none" stroke="black" points="121,-87 0,-87 0,-63 121,-63 121,-87"/>
-<text text-anchor="middle" x="60.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_initialize_output</text>
+<polygon fill="none" stroke="black" points="121,-129 0,-129 0,-105 121,-105 121,-129"/>
+<text text-anchor="middle" x="60.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_initialize_output</text>
 </g>
-<!-- nf90_create -->
+<!-- nf90_def_var -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_node2" class="node">
-<title>nf90_create</title>
-<polygon fill="#777777" stroke="#777777" points="231,-150 161,-150 161,-126 231,-126 231,-150"/>
-<text text-anchor="middle" x="196" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_create</text>
+<title>nf90_def_var</title>
+<polygon fill="#777777" stroke="#777777" points="252.5,-234 176.5,-234 176.5,-210 252.5,-210 252.5,-234"/>
+<text text-anchor="middle" x="214.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_create -->
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_edge1" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_create</title>
-<path fill="none" stroke="#000000" d="M87.24,-87.15C107.92,-96.91 137.19,-110.72 160,-121.48"/>
-<polygon fill="#000000" stroke="#000000" points="158.8,-124.79 169.34,-125.89 161.79,-118.46 158.8,-124.79"/>
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var</title>
+<path fill="none" stroke="#000000" d="M72.45,-129.13C89.16,-147 122.69,-180.5 157,-201 160.2,-202.91 163.6,-204.7 167.08,-206.35"/>
+<polygon fill="#000000" stroke="#000000" points="165.86,-209.64 176.43,-210.44 168.67,-203.23 165.86,-209.64"/>
 </g>
 <!-- nf90_def_dim -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_node3" class="node">
 <title>nf90_def_dim</title>
-<polygon fill="#777777" stroke="#777777" points="235,-108 157,-108 157,-84 235,-84 235,-108"/>
-<text text-anchor="middle" x="196" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_dim</text>
+<polygon fill="#777777" stroke="#777777" points="253.5,-192 175.5,-192 175.5,-168 253.5,-168 253.5,-192"/>
+<text text-anchor="middle" x="214.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_dim</text>
 </g>
 <!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_dim -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_edge2" class="edge">
 <title>proc~netcdf_initialize_output&#45;&gt;nf90_def_dim</title>
-<path fill="none" stroke="#000000" d="M121.22,-84.39C129.81,-85.75 138.55,-87.12 146.88,-88.43"/>
-<polygon fill="#000000" stroke="#000000" points="146.36,-91.89 156.79,-89.99 147.45,-84.98 146.36,-91.89"/>
+<path fill="none" stroke="#000000" d="M87.67,-129C106.76,-137.64 133.33,-149.41 157,-159 161.43,-160.8 166.09,-162.62 170.74,-164.41"/>
+<polygon fill="#000000" stroke="#000000" points="169.62,-167.73 180.21,-168 172.1,-161.18 169.62,-167.73"/>
 </g>
-<!-- nf90_set_fill -->
+<!-- nf90_create -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_node4" class="node">
-<title>nf90_set_fill</title>
-<polygon fill="#777777" stroke="#777777" points="231,-66 161,-66 161,-42 231,-42 231,-66"/>
-<text text-anchor="middle" x="196" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
+<title>nf90_create</title>
+<polygon fill="#777777" stroke="#777777" points="249.5,-150 179.5,-150 179.5,-126 249.5,-126 249.5,-150"/>
+<text text-anchor="middle" x="214.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_create</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_set_fill -->
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_create -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_edge3" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M121.22,-65.61C131.21,-64.03 141.42,-62.43 150.93,-60.93"/>
-<polygon fill="#000000" stroke="#000000" points="151.59,-64.37 160.93,-59.36 150.51,-57.46 151.59,-64.37"/>
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_create</title>
+<path fill="none" stroke="#000000" d="M121.14,-125.24C137.22,-127.46 154.33,-129.83 169.4,-131.91"/>
+<polygon fill="#000000" stroke="#000000" points="169.08,-135.4 179.46,-133.3 170.04,-128.46 169.08,-135.4"/>
 </g>
-<!-- nf90_def_var -->
+<!-- nf90_def_var_fill -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_node5" class="node">
-<title>nf90_def_var</title>
-<polygon fill="#777777" stroke="#777777" points="234,-24 158,-24 158,0 234,0 234,-24"/>
-<text text-anchor="middle" x="196" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var</text>
+<title>nf90_def_var_fill</title>
+<polygon fill="#777777" stroke="#777777" points="260,-108 169,-108 169,-84 260,-84 260,-108"/>
+<text text-anchor="middle" x="214.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_def_var_fill</text>
 </g>
-<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var -->
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_def_var_fill -->
 <g id="proc~~netcdf_initialize_output~~CallsGraph_edge4" class="edge">
-<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var</title>
-<path fill="none" stroke="#000000" d="M87.24,-62.85C107.92,-53.09 137.19,-39.28 160,-28.52"/>
-<polygon fill="#000000" stroke="#000000" points="161.79,-31.54 169.34,-24.11 158.8,-25.21 161.79,-31.54"/>
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_def_var_fill</title>
+<path fill="none" stroke="#000000" d="M121.14,-108.76C133.48,-107.05 146.43,-105.27 158.6,-103.58"/>
+<polygon fill="#000000" stroke="#000000" points="159.18,-107.04 168.61,-102.2 158.22,-100.1 159.18,-107.04"/>
+</g>
+<!-- nf90_inquire -->
+<g id="proc~~netcdf_initialize_output~~CallsGraph_node6" class="node">
+<title>nf90_inquire</title>
+<polygon fill="#777777" stroke="#777777" points="250.5,-66 178.5,-66 178.5,-42 250.5,-42 250.5,-66"/>
+<text text-anchor="middle" x="214.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inquire</text>
+</g>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_inquire -->
+<g id="proc~~netcdf_initialize_output~~CallsGraph_edge5" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_inquire</title>
+<path fill="none" stroke="#000000" d="M87.67,-105C106.76,-96.36 133.33,-84.59 157,-75 161.43,-73.2 166.09,-71.38 170.74,-69.59"/>
+<polygon fill="#000000" stroke="#000000" points="172.1,-72.82 180.21,-66 169.62,-66.27 172.1,-72.82"/>
+</g>
+<!-- nf90_inquire_variable -->
+<g id="proc~~netcdf_initialize_output~~CallsGraph_node7" class="node">
+<title>nf90_inquire_variable</title>
+<polygon fill="#777777" stroke="#777777" points="272,-24 157,-24 157,0 272,0 272,-24"/>
+<text text-anchor="middle" x="214.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inquire_variable</text>
+</g>
+<!-- proc~netcdf_initialize_output&#45;&gt;nf90_inquire_variable -->
+<g id="proc~~netcdf_initialize_output~~CallsGraph_edge6" class="edge">
+<title>proc~netcdf_initialize_output&#45;&gt;nf90_inquire_variable</title>
+<path fill="none" stroke="#000000" d="M72.45,-104.87C89.16,-87 122.69,-53.5 157,-33 159.83,-31.31 162.82,-29.72 165.88,-28.22"/>
+<polygon fill="#000000" stroke="#000000" points="167.53,-31.32 175.23,-24.04 164.67,-24.93 167.53,-31.32"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/netcdf_open.html b/docs/proc/netcdf_open.html
index 3b0890ce2..5bd4e2478 100644
--- a/docs/proc/netcdf_open.html
+++ b/docs/proc/netcdf_open.html
@@ -136,7 +136,7 @@ <h1>netcdf_open
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">80 statements</a>
+    title=" 0.1% of total for procedures.">78 statements</a>
      </li> 
      
      
@@ -280,52 +280,40 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~netcdf_open~~CallsGraph Pages: 1 -->
-<svg id="procnetcdf_openCallsGraph" width="199pt" height="116pt"
- viewBox="0.00 0.00 199.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~netcdf_open~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="procnetcdf_openCallsGraph" width="199pt" height="74pt"
+ viewBox="0.00 0.00 199.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~netcdf_open~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~netcdf_open~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 195,-112 195,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 195,-70 195,4 -4,4"/>
 <!-- proc~netcdf_open -->
 <g id="proc~~netcdf_open~~CallsGraph_node1" class="node">
 <title>proc~netcdf_open</title>
-<polygon fill="none" stroke="black" points="72,-66 0,-66 0,-42 72,-42 72,-66"/>
-<text text-anchor="middle" x="36" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_open</text>
+<polygon fill="none" stroke="black" points="72,-45 0,-45 0,-21 72,-21 72,-45"/>
+<text text-anchor="middle" x="36" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_open</text>
 </g>
 <!-- nf90_inq_varid -->
 <g id="proc~~netcdf_open~~CallsGraph_node2" class="node">
 <title>nf90_inq_varid</title>
-<polygon fill="#777777" stroke="#777777" points="191,-108 108,-108 108,-84 191,-84 191,-108"/>
-<text text-anchor="middle" x="149.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inq_varid</text>
+<polygon fill="#777777" stroke="#777777" points="191,-66 108,-66 108,-42 191,-42 191,-66"/>
+<text text-anchor="middle" x="149.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_inq_varid</text>
 </g>
 <!-- proc~netcdf_open&#45;&gt;nf90_inq_varid -->
 <g id="proc~~netcdf_open~~CallsGraph_edge1" class="edge">
 <title>proc~netcdf_open&#45;&gt;nf90_inq_varid</title>
-<path fill="none" stroke="#000000" d="M68.95,-66.04C80.85,-70.52 94.53,-75.67 107.15,-80.42"/>
-<polygon fill="#000000" stroke="#000000" points="105.95,-83.71 116.54,-83.96 108.42,-77.16 105.95,-83.71"/>
-</g>
-<!-- nf90_set_fill -->
-<g id="proc~~netcdf_open~~CallsGraph_node3" class="node">
-<title>nf90_set_fill</title>
-<polygon fill="#777777" stroke="#777777" points="184.5,-66 114.5,-66 114.5,-42 184.5,-42 184.5,-66"/>
-<text text-anchor="middle" x="149.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
-</g>
-<!-- proc~netcdf_open&#45;&gt;nf90_set_fill -->
-<g id="proc~~netcdf_open~~CallsGraph_edge2" class="edge">
-<title>proc~netcdf_open&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M72.28,-54C82.33,-54 93.41,-54 103.93,-54"/>
-<polygon fill="#000000" stroke="#000000" points="104.21,-57.5 114.21,-54 104.21,-50.5 104.21,-57.5"/>
+<path fill="none" stroke="#000000" d="M72.28,-39.64C80.35,-41.16 89.09,-42.81 97.66,-44.43"/>
+<polygon fill="#000000" stroke="#000000" points="97.14,-47.89 107.61,-46.3 98.44,-41.01 97.14,-47.89"/>
 </g>
 <!-- nf90_open -->
-<g id="proc~~netcdf_open~~CallsGraph_node4" class="node">
+<g id="proc~~netcdf_open~~CallsGraph_node3" class="node">
 <title>nf90_open</title>
 <polygon fill="#777777" stroke="#777777" points="181.5,-24 117.5,-24 117.5,0 181.5,0 181.5,-24"/>
 <text text-anchor="middle" x="149.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_open</text>
 </g>
 <!-- proc~netcdf_open&#45;&gt;nf90_open -->
-<g id="proc~~netcdf_open~~CallsGraph_edge3" class="edge">
+<g id="proc~~netcdf_open~~CallsGraph_edge2" class="edge">
 <title>proc~netcdf_open&#45;&gt;nf90_open</title>
-<path fill="none" stroke="#000000" d="M68.95,-41.96C81.05,-37.41 95,-32.15 107.8,-27.33"/>
-<polygon fill="#000000" stroke="#000000" points="109.19,-30.55 117.31,-23.75 106.72,-24 109.19,-30.55"/>
+<path fill="none" stroke="#000000" d="M72.28,-26.36C83.43,-24.26 95.85,-21.92 107.38,-19.75"/>
+<polygon fill="#000000" stroke="#000000" points="108.04,-23.18 117.22,-17.89 106.74,-16.3 108.04,-23.18"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/netcdf_write_frame_base.html b/docs/proc/netcdf_write_frame_base.html
index 9f2985eac..abaf3f4d0 100644
--- a/docs/proc/netcdf_write_frame_base.html
+++ b/docs/proc/netcdf_write_frame_base.html
@@ -136,7 +136,7 @@ <h1>netcdf_write_frame_base
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">79 statements</a>
+    title=" 0.1% of total for procedures.">81 statements</a>
      </li> 
      
      
@@ -296,43 +296,55 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~netcdf_write_frame_base~~CallsGraph Pages: 1 -->
-<svg id="procnetcdf_write_frame_baseCallsGraph" width="253pt" height="74pt"
- viewBox="0.00 0.00 253.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~netcdf_write_frame_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procnetcdf_write_frame_baseCallsGraph" width="253pt" height="116pt"
+ viewBox="0.00 0.00 253.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~netcdf_write_frame_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~netcdf_write_frame_base~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 249,-70 249,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 249,-112 249,4 -4,4"/>
 <!-- proc~netcdf_write_frame_base -->
 <g id="proc~~netcdf_write_frame_base~~CallsGraph_node1" class="node">
 <title>proc~netcdf_write_frame_base</title>
-<polygon fill="none" stroke="black" points="133,-45 0,-45 0,-21 133,-21 133,-45"/>
-<text text-anchor="middle" x="66.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_frame_base</text>
+<polygon fill="none" stroke="black" points="133,-66 0,-66 0,-42 133,-42 133,-66"/>
+<text text-anchor="middle" x="66.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_frame_base</text>
 </g>
-<!-- interface~util_sort -->
+<!-- nf90_set_fill -->
 <g id="proc~~netcdf_write_frame_base~~CallsGraph_node2" class="node">
-<title>interface~util_sort</title>
-<g id="a_proc~~netcdf_write_frame_base~~CallsGraph_node2"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
-<polygon fill="#a7506f" stroke="#a7506f" points="234,-66 180,-66 180,-42 234,-42 234,-66"/>
-<text text-anchor="middle" x="207" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
-</a>
-</g>
+<title>nf90_set_fill</title>
+<polygon fill="#777777" stroke="#777777" points="242,-108 172,-108 172,-84 242,-84 242,-108"/>
+<text text-anchor="middle" x="207" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
 </g>
-<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
+<!-- proc~netcdf_write_frame_base&#45;&gt;nf90_set_fill -->
 <g id="proc~~netcdf_write_frame_base~~CallsGraph_edge1" class="edge">
-<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M133.1,-42.95C145.6,-44.84 158.27,-46.76 169.45,-48.46"/>
-<polygon fill="#000000" stroke="#000000" points="169.26,-51.97 179.67,-50.01 170.31,-45.05 169.26,-51.97"/>
+<title>proc~netcdf_write_frame_base&#45;&gt;nf90_set_fill</title>
+<path fill="none" stroke="#000000" d="M107.19,-66.04C124.29,-71.22 144.36,-77.31 161.93,-82.64"/>
+<polygon fill="#000000" stroke="#000000" points="161.36,-86.12 171.94,-85.67 163.39,-79.42 161.36,-86.12"/>
 </g>
 <!-- nf90_put_var -->
 <g id="proc~~netcdf_write_frame_base~~CallsGraph_node3" class="node">
 <title>nf90_put_var</title>
-<polygon fill="#777777" stroke="#777777" points="245,-24 169,-24 169,0 245,0 245,-24"/>
-<text text-anchor="middle" x="207" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
+<polygon fill="#777777" stroke="#777777" points="245,-66 169,-66 169,-42 245,-42 245,-66"/>
+<text text-anchor="middle" x="207" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
 </g>
 <!-- proc~netcdf_write_frame_base&#45;&gt;nf90_put_var -->
 <g id="proc~~netcdf_write_frame_base~~CallsGraph_edge2" class="edge">
 <title>proc~netcdf_write_frame_base&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M133.1,-23.05C141.85,-21.73 150.67,-20.39 159.02,-19.12"/>
-<polygon fill="#000000" stroke="#000000" points="159.56,-22.58 168.92,-17.62 158.51,-15.66 159.56,-22.58"/>
+<path fill="none" stroke="#000000" d="M133.1,-54C141.75,-54 150.48,-54 158.74,-54"/>
+<polygon fill="#000000" stroke="#000000" points="158.92,-57.5 168.92,-54 158.92,-50.5 158.92,-57.5"/>
+</g>
+<!-- interface~util_sort -->
+<g id="proc~~netcdf_write_frame_base~~CallsGraph_node4" class="node">
+<title>interface~util_sort</title>
+<g id="a_proc~~netcdf_write_frame_base~~CallsGraph_node4"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
+<polygon fill="#a7506f" stroke="#a7506f" points="234,-24 180,-24 180,0 234,0 234,-24"/>
+<text text-anchor="middle" x="207" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
+</a>
+</g>
+</g>
+<!-- proc~netcdf_write_frame_base&#45;&gt;interface~util_sort -->
+<g id="proc~~netcdf_write_frame_base~~CallsGraph_edge3" class="edge">
+<title>proc~netcdf_write_frame_base&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M107.19,-41.96C127.06,-35.94 150.94,-28.7 170.24,-22.84"/>
+<polygon fill="#000000" stroke="#000000" points="171.32,-26.17 179.88,-19.92 169.29,-19.47 171.32,-26.17"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/netcdf_write_hdr_system.html b/docs/proc/netcdf_write_hdr_system.html
index 5f5cfe899..91369364e 100644
--- a/docs/proc/netcdf_write_hdr_system.html
+++ b/docs/proc/netcdf_write_hdr_system.html
@@ -136,7 +136,7 @@ <h1>netcdf_write_hdr_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">31 statements</a>
+    title=" 0.0% of total for procedures.">30 statements</a>
      </li> 
      
      
@@ -297,31 +297,19 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~netcdf_write_hdr_system~~CallsGraph Pages: 1 -->
-<svg id="procnetcdf_write_hdr_systemCallsGraph" width="252pt" height="116pt"
- viewBox="0.00 0.00 252.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~netcdf_write_hdr_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
+<svg id="procnetcdf_write_hdr_systemCallsGraph" width="252pt" height="74pt"
+ viewBox="0.00 0.00 252.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~netcdf_write_hdr_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~netcdf_write_hdr_system~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 248,-112 248,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 248,-70 248,4 -4,4"/>
 <!-- proc~netcdf_write_hdr_system -->
 <g id="proc~~netcdf_write_hdr_system~~CallsGraph_node1" class="node">
 <title>proc~netcdf_write_hdr_system</title>
-<polygon fill="none" stroke="black" points="132,-66 0,-66 0,-42 132,-42 132,-66"/>
-<text text-anchor="middle" x="66" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_hdr_system</text>
-</g>
-<!-- nf90_set_fill -->
-<g id="proc~~netcdf_write_hdr_system~~CallsGraph_node2" class="node">
-<title>nf90_set_fill</title>
-<polygon fill="#777777" stroke="#777777" points="241,-108 171,-108 171,-84 241,-84 241,-108"/>
-<text text-anchor="middle" x="206" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
-</g>
-<!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_set_fill -->
-<g id="proc~~netcdf_write_hdr_system~~CallsGraph_edge2" class="edge">
-<title>proc~netcdf_write_hdr_system&#45;&gt;nf90_set_fill</title>
-<path fill="none" stroke="#000000" d="M106.55,-66.04C123.46,-71.18 143.27,-77.21 160.68,-82.51"/>
-<polygon fill="#000000" stroke="#000000" points="160.02,-85.97 170.61,-85.53 162.06,-79.27 160.02,-85.97"/>
+<polygon fill="none" stroke="black" points="132,-45 0,-45 0,-21 132,-21 132,-45"/>
+<text text-anchor="middle" x="66" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_hdr_system</text>
 </g>
 <!-- nf90_put_var -->
-<g id="proc~~netcdf_write_hdr_system~~CallsGraph_node3" class="node">
+<g id="proc~~netcdf_write_hdr_system~~CallsGraph_node2" class="node">
 <title>nf90_put_var</title>
 <polygon fill="#777777" stroke="#777777" points="244,-66 168,-66 168,-42 244,-42 244,-66"/>
 <text text-anchor="middle" x="206" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
@@ -329,20 +317,20 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var -->
 <g id="proc~~netcdf_write_hdr_system~~CallsGraph_edge1" class="edge">
 <title>proc~netcdf_write_hdr_system&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M132.36,-54C140.89,-54 149.48,-54 157.63,-54"/>
-<polygon fill="#000000" stroke="#000000" points="157.68,-57.5 167.68,-54 157.68,-50.5 157.68,-57.5"/>
+<path fill="none" stroke="#000000" d="M132.36,-42.95C140.89,-44.24 149.48,-45.55 157.63,-46.79"/>
+<polygon fill="#000000" stroke="#000000" points="157.26,-50.28 167.68,-48.32 158.32,-43.36 157.26,-50.28"/>
 </g>
 <!-- nf90_open -->
-<g id="proc~~netcdf_write_hdr_system~~CallsGraph_node4" class="node">
+<g id="proc~~netcdf_write_hdr_system~~CallsGraph_node3" class="node">
 <title>nf90_open</title>
 <polygon fill="#777777" stroke="#777777" points="238,-24 174,-24 174,0 238,0 238,-24"/>
 <text text-anchor="middle" x="206" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_open</text>
 </g>
 <!-- proc~netcdf_write_hdr_system&#45;&gt;nf90_open -->
-<g id="proc~~netcdf_write_hdr_system~~CallsGraph_edge3" class="edge">
+<g id="proc~~netcdf_write_hdr_system~~CallsGraph_edge2" class="edge">
 <title>proc~netcdf_write_hdr_system&#45;&gt;nf90_open</title>
-<path fill="none" stroke="#000000" d="M106.55,-41.96C124.56,-36.48 145.86,-30 164.04,-24.47"/>
-<polygon fill="#000000" stroke="#000000" points="165.23,-27.76 173.77,-21.5 163.19,-21.07 165.23,-27.76"/>
+<path fill="none" stroke="#000000" d="M132.36,-23.05C143.12,-21.42 153.99,-19.76 163.93,-18.25"/>
+<polygon fill="#000000" stroke="#000000" points="164.55,-21.7 173.91,-16.73 163.5,-14.78 164.55,-21.7"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/netcdf_write_particle_info_base.html b/docs/proc/netcdf_write_particle_info_base.html
index 357737dba..2120502d6 100644
--- a/docs/proc/netcdf_write_particle_info_base.html
+++ b/docs/proc/netcdf_write_particle_info_base.html
@@ -136,7 +136,7 @@ <h1>netcdf_write_particle_info_base
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">90 statements</a>
+    title=" 0.1% of total for procedures.">92 statements</a>
      </li> 
      
      
@@ -280,43 +280,55 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~netcdf_write_particle_info_base~~CallsGraph Pages: 1 -->
-<svg id="procnetcdf_write_particle_info_baseCallsGraph" width="283pt" height="74pt"
- viewBox="0.00 0.00 283.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~netcdf_write_particle_info_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procnetcdf_write_particle_info_baseCallsGraph" width="283pt" height="116pt"
+ viewBox="0.00 0.00 283.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~netcdf_write_particle_info_base~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~netcdf_write_particle_info_base~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 279,-70 279,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 279,-112 279,4 -4,4"/>
 <!-- proc~netcdf_write_particle_info_base -->
 <g id="proc~~netcdf_write_particle_info_base~~CallsGraph_node1" class="node">
 <title>proc~netcdf_write_particle_info_base</title>
-<polygon fill="none" stroke="black" points="163,-45 0,-45 0,-21 163,-21 163,-45"/>
-<text text-anchor="middle" x="81.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_particle_info_base</text>
+<polygon fill="none" stroke="black" points="163,-66 0,-66 0,-42 163,-42 163,-66"/>
+<text text-anchor="middle" x="81.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf_write_particle_info_base</text>
 </g>
-<!-- interface~util_sort -->
+<!-- nf90_set_fill -->
 <g id="proc~~netcdf_write_particle_info_base~~CallsGraph_node2" class="node">
-<title>interface~util_sort</title>
-<g id="a_proc~~netcdf_write_particle_info_base~~CallsGraph_node2"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
-<polygon fill="#a7506f" stroke="#a7506f" points="264,-66 210,-66 210,-42 264,-42 264,-66"/>
-<text text-anchor="middle" x="237" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
-</a>
-</g>
+<title>nf90_set_fill</title>
+<polygon fill="#777777" stroke="#777777" points="272,-108 202,-108 202,-84 272,-84 272,-108"/>
+<text text-anchor="middle" x="237" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_set_fill</text>
 </g>
-<!-- proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort -->
+<!-- proc~netcdf_write_particle_info_base&#45;&gt;nf90_set_fill -->
 <g id="proc~~netcdf_write_particle_info_base~~CallsGraph_edge1" class="edge">
-<title>proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort</title>
-<path fill="none" stroke="#000000" d="M163.3,-44.05C176.1,-45.81 188.76,-47.54 199.84,-49.05"/>
-<polygon fill="#000000" stroke="#000000" points="199.54,-52.54 209.92,-50.43 200.49,-45.61 199.54,-52.54"/>
+<title>proc~netcdf_write_particle_info_base&#45;&gt;nf90_set_fill</title>
+<path fill="none" stroke="#000000" d="M126.49,-66.04C147.04,-71.66 171.46,-78.34 192.01,-83.97"/>
+<polygon fill="#000000" stroke="#000000" points="191.19,-87.37 201.76,-86.63 193.04,-80.62 191.19,-87.37"/>
 </g>
 <!-- nf90_put_var -->
 <g id="proc~~netcdf_write_particle_info_base~~CallsGraph_node3" class="node">
 <title>nf90_put_var</title>
-<polygon fill="#777777" stroke="#777777" points="275,-24 199,-24 199,0 275,0 275,-24"/>
-<text text-anchor="middle" x="237" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
+<polygon fill="#777777" stroke="#777777" points="275,-66 199,-66 199,-42 275,-42 275,-66"/>
+<text text-anchor="middle" x="237" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">nf90_put_var</text>
 </g>
 <!-- proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var -->
 <g id="proc~~netcdf_write_particle_info_base~~CallsGraph_edge2" class="edge">
 <title>proc~netcdf_write_particle_info_base&#45;&gt;nf90_put_var</title>
-<path fill="none" stroke="#000000" d="M163.3,-21.95C172.03,-20.75 180.7,-19.57 188.84,-18.45"/>
-<polygon fill="#000000" stroke="#000000" points="189.4,-21.91 198.83,-17.08 188.45,-14.97 189.4,-21.91"/>
+<path fill="none" stroke="#000000" d="M163.3,-54C171.93,-54 180.5,-54 188.56,-54"/>
+<polygon fill="#000000" stroke="#000000" points="188.83,-57.5 198.83,-54 188.83,-50.5 188.83,-57.5"/>
+</g>
+<!-- interface~util_sort -->
+<g id="proc~~netcdf_write_particle_info_base~~CallsGraph_node4" class="node">
+<title>interface~util_sort</title>
+<g id="a_proc~~netcdf_write_particle_info_base~~CallsGraph_node4"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
+<polygon fill="#a7506f" stroke="#a7506f" points="264,-24 210,-24 210,0 264,0 264,-24"/>
+<text text-anchor="middle" x="237" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
+</a>
+</g>
+</g>
+<!-- proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort -->
+<g id="proc~~netcdf_write_particle_info_base~~CallsGraph_edge3" class="edge">
+<title>proc~netcdf_write_particle_info_base&#45;&gt;interface~util_sort</title>
+<path fill="none" stroke="#000000" d="M126.49,-41.96C149.74,-35.6 177.92,-27.89 199.88,-21.88"/>
+<polygon fill="#000000" stroke="#000000" points="201.08,-25.18 209.8,-19.17 199.23,-18.43 201.08,-25.18"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/obl_acc_body.html b/docs/proc/obl_acc_body.html
index 9308738c1..ebbe820c2 100644
--- a/docs/proc/obl_acc_body.html
+++ b/docs/proc/obl_acc_body.html
@@ -310,33 +310,33 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.07,-33C287.25,-33 296,-33 304.51,-33"/>
 <polygon fill="#000000" stroke="#000000" points="304.72,-36.5 314.72,-33 304.72,-29.5 304.72,-36.5"/>
 </g>
-<!-- proc~obl_acc_tp -->
+<!-- proc~obl_acc_pl -->
 <g id="proc~~obl_acc_body~~CalledByGraph_node3" class="node">
-<title>proc~obl_acc_tp</title>
-<g id="a_proc~~obl_acc_body~~CalledByGraph_node3"><a xlink:href=".././proc/obl_acc_tp.html" xlink:title="obl_acc_tp">
+<title>proc~obl_acc_pl</title>
+<g id="a_proc~~obl_acc_body~~CalledByGraph_node3"><a xlink:href=".././proc/obl_acc_pl.html" xlink:title="obl_acc_pl">
 <polygon fill="#d9534f" stroke="#d9534f" points="164,-66 100,-66 100,-42 164,-42 164,-66"/>
-<text text-anchor="middle" x="132" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
+<text text-anchor="middle" x="132" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~obl_acc_tp&#45;&gt;interface~obl_acc_body -->
+<!-- proc~obl_acc_pl&#45;&gt;interface~obl_acc_body -->
 <g id="proc~~obl_acc_body~~CalledByGraph_edge2" class="edge">
-<title>proc~obl_acc_tp&#45;&gt;interface~obl_acc_body</title>
+<title>proc~obl_acc_pl&#45;&gt;interface~obl_acc_body</title>
 <path fill="none" stroke="#000000" d="M164.08,-47.81C172.21,-46.2 181.16,-44.41 189.96,-42.66"/>
 <polygon fill="#000000" stroke="#000000" points="190.65,-46.09 199.78,-40.71 189.29,-39.23 190.65,-46.09"/>
 </g>
-<!-- proc~obl_acc_pl -->
+<!-- proc~obl_acc_tp -->
 <g id="proc~~obl_acc_body~~CalledByGraph_node4" class="node">
-<title>proc~obl_acc_pl</title>
-<g id="a_proc~~obl_acc_body~~CalledByGraph_node4"><a xlink:href=".././proc/obl_acc_pl.html" xlink:title="obl_acc_pl">
+<title>proc~obl_acc_tp</title>
+<g id="a_proc~~obl_acc_body~~CalledByGraph_node4"><a xlink:href=".././proc/obl_acc_tp.html" xlink:title="obl_acc_tp">
 <polygon fill="#d9534f" stroke="#d9534f" points="164,-24 100,-24 100,0 164,0 164,-24"/>
-<text text-anchor="middle" x="132" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
+<text text-anchor="middle" x="132" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~obl_acc_pl&#45;&gt;interface~obl_acc_body -->
+<!-- proc~obl_acc_tp&#45;&gt;interface~obl_acc_body -->
 <g id="proc~~obl_acc_body~~CalledByGraph_edge3" class="edge">
-<title>proc~obl_acc_pl&#45;&gt;interface~obl_acc_body</title>
+<title>proc~obl_acc_tp&#45;&gt;interface~obl_acc_body</title>
 <path fill="none" stroke="#000000" d="M164.08,-18.19C172.21,-19.8 181.16,-21.59 189.96,-23.34"/>
 <polygon fill="#000000" stroke="#000000" points="189.29,-26.77 199.78,-25.29 190.65,-19.91 189.29,-26.77"/>
 </g>
@@ -344,31 +344,31 @@ <h3 class="panel-title">Called by</h3>
 <g id="proc~~obl_acc_body~~CalledByGraph_node5" class="node">
 <title>interface~obl_acc_tp</title>
 <g id="a_proc~~obl_acc_body~~CalledByGraph_node5"><a xlink:href=".././interface/obl_acc_tp.html" xlink:title="obl_acc_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="64,-66 0,-66 0,-42 64,-42 64,-66"/>
-<text text-anchor="middle" x="32" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp -->
-<g id="proc~~obl_acc_body~~CalledByGraph_edge4" class="edge">
+<g id="proc~~obl_acc_body~~CalledByGraph_edge5" class="edge">
 <title>interface~obl_acc_tp&#45;&gt;proc~obl_acc_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-54C72.14,-54 81.04,-54 89.62,-54"/>
-<polygon fill="#000000" stroke="#000000" points="89.86,-57.5 99.86,-54 89.86,-50.5 89.86,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-12C72.14,-12 81.04,-12 89.62,-12"/>
+<polygon fill="#000000" stroke="#000000" points="89.86,-15.5 99.86,-12 89.86,-8.5 89.86,-15.5"/>
 </g>
 <!-- interface~obl_acc_pl -->
 <g id="proc~~obl_acc_body~~CalledByGraph_node6" class="node">
 <title>interface~obl_acc_pl</title>
 <g id="a_proc~~obl_acc_body~~CalledByGraph_node6"><a xlink:href=".././interface/obl_acc_pl.html" xlink:title="obl_acc_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
-<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="64,-66 0,-66 0,-42 64,-42 64,-66"/>
+<text text-anchor="middle" x="32" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl_acc_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl -->
-<g id="proc~~obl_acc_body~~CalledByGraph_edge5" class="edge">
+<g id="proc~~obl_acc_body~~CalledByGraph_edge4" class="edge">
 <title>interface~obl_acc_pl&#45;&gt;proc~obl_acc_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-12C72.14,-12 81.04,-12 89.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="89.86,-15.5 99.86,-12 89.86,-8.5 89.86,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.01,-54C72.14,-54 81.04,-54 89.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="89.86,-57.5 99.86,-54 89.86,-50.5 89.86,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/orbel_ehie.html b/docs/proc/orbel_ehie.html
index 829c28d6d..89fec7768 100644
--- a/docs/proc/orbel_ehie.html
+++ b/docs/proc/orbel_ehie.html
@@ -134,7 +134,7 @@ <h1>orbel_ehie
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
diff --git a/docs/proc/orbel_ehybrid.html b/docs/proc/orbel_ehybrid.html
index 975faba33..8cc3fcce1 100644
--- a/docs/proc/orbel_ehybrid.html
+++ b/docs/proc/orbel_ehybrid.html
@@ -294,35 +294,35 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="78,-66 0,-66 0,-42 78,-42 78,-66"/>
 <text text-anchor="middle" x="39" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_ehybrid</text>
 </g>
-<!-- proc~orbel_ehie -->
+<!-- proc~orbel_esolmd -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_node2" class="node">
-<title>proc~orbel_ehie</title>
-<g id="a_proc~~orbel_ehybrid~~CallsGraph_node2"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="184,-108 121,-108 121,-84 184,-84 184,-108"/>
-<text text-anchor="middle" x="152.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
+<title>proc~orbel_esolmd</title>
+<g id="a_proc~~orbel_ehybrid~~CallsGraph_node2"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="191,-108 114,-108 114,-84 191,-84 191,-108"/>
+<text text-anchor="middle" x="152.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_edge1" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
-<path fill="none" stroke="#000000" d="M71.95,-66.04C84.16,-70.63 98.23,-75.94 111.12,-80.79"/>
-<polygon fill="#000000" stroke="#000000" points="110.1,-84.15 120.7,-84.4 112.57,-77.6 110.1,-84.15"/>
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
+<path fill="none" stroke="#000000" d="M71.95,-66.04C83.85,-70.52 97.53,-75.67 110.15,-80.42"/>
+<polygon fill="#000000" stroke="#000000" points="108.95,-83.71 119.54,-83.96 111.42,-77.16 108.95,-83.71"/>
 </g>
-<!-- proc~orbel_esolmd -->
+<!-- proc~orbel_ehie -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_node3" class="node">
-<title>proc~orbel_esolmd</title>
-<g id="a_proc~~orbel_ehybrid~~CallsGraph_node3"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="191,-66 114,-66 114,-42 191,-42 191,-66"/>
-<text text-anchor="middle" x="152.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+<title>proc~orbel_ehie</title>
+<g id="a_proc~~orbel_ehybrid~~CallsGraph_node3"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="184,-66 121,-66 121,-42 184,-42 184,-66"/>
+<text text-anchor="middle" x="152.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_edge2" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
-<path fill="none" stroke="#000000" d="M78.06,-54C86.31,-54 95.14,-54 103.72,-54"/>
-<polygon fill="#000000" stroke="#000000" points="103.99,-57.5 113.99,-54 103.99,-50.5 103.99,-57.5"/>
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
+<path fill="none" stroke="#000000" d="M78.06,-54C88.56,-54 100,-54 110.66,-54"/>
+<polygon fill="#000000" stroke="#000000" points="110.99,-57.5 120.99,-54 110.99,-50.5 110.99,-57.5"/>
 </g>
 <!-- proc~orbel_eget -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_node4" class="node">
@@ -348,17 +348,17 @@ <h3 class="panel-title">Calls</h3>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_edge4" class="edge">
-<title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
+<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
 <path fill="none" stroke="#000000" d="M184.02,-83.96C195.27,-79.53 208.19,-74.43 220.15,-69.72"/>
 <polygon fill="#000000" stroke="#000000" points="221.46,-72.96 229.48,-66.04 218.89,-66.45 221.46,-72.96"/>
 </g>
-<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_edge5" class="edge">
-<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M191.05,-54C199.31,-54 208.12,-54 216.59,-54"/>
-<polygon fill="#000000" stroke="#000000" points="216.69,-57.5 226.69,-54 216.69,-50.5 216.69,-57.5"/>
+<title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M184.02,-54C194.17,-54 205.68,-54 216.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="216.87,-57.5 226.87,-54 216.87,-50.5 216.87,-57.5"/>
 </g>
 <!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_ehybrid~~CallsGraph_edge6" class="edge">
diff --git a/docs/proc/orbel_el2xv.html b/docs/proc/orbel_el2xv.html
index afbbdf364..20fc31bff 100644
--- a/docs/proc/orbel_el2xv.html
+++ b/docs/proc/orbel_el2xv.html
@@ -395,217 +395,217 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~orbel_el2xv~~CallsGraph Pages: 1 -->
-<svg id="procorbel_el2xvCallsGraph" width="516pt" height="243pt"
- viewBox="0.00 0.00 516.00 243.22" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~orbel_el2xv~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 239.22)">
+<svg id="procorbel_el2xvCallsGraph" width="516pt" height="254pt"
+ viewBox="0.00 0.00 516.00 253.60" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~orbel_el2xv~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 249.6)">
 <title>proc~~orbel_el2xv~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-239.22 512,-239.22 512,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-249.6 512,-249.6 512,4 -4,4"/>
 <!-- proc~orbel_el2xv -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node1" class="node">
 <title>proc~orbel_el2xv</title>
-<polygon fill="none" stroke="black" points="67,-93.62 0,-93.62 0,-69.62 67,-69.62 67,-93.62"/>
-<text text-anchor="middle" x="33.5" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_el2xv</text>
+<polygon fill="none" stroke="black" points="67,-163.6 0,-163.6 0,-139.6 67,-139.6 67,-163.6"/>
+<text text-anchor="middle" x="33.5" y="-149.2" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_el2xv</text>
 </g>
-<!-- interface~orbel_scget -->
+<!-- proc~orbel_zget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node2" class="node">
-<title>interface~orbel_scget</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node2"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#a7506f" stroke="#a7506f" points="401,-198.62 333,-198.62 333,-174.62 401,-174.62 401,-198.62"/>
-<text text-anchor="middle" x="367" y="-184.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+<title>proc~orbel_zget</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node2"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="173.5,-245.6 110.5,-245.6 110.5,-221.6 173.5,-221.6 173.5,-245.6"/>
+<text text-anchor="middle" x="142" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge1" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M42.15,-93.69C53.7,-111.2 77,-143.91 103,-165.62 147.43,-202.73 160.95,-214.16 217,-228.62 250.14,-237.17 260.96,-237.55 294,-228.62 311.53,-223.88 329.18,-213.69 342.62,-204.54"/>
-<polygon fill="#000000" stroke="#000000" points="344.66,-207.38 350.79,-198.74 340.61,-201.67 344.66,-207.38"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
+<path fill="none" stroke="#000000" d="M46.42,-163.73C59.57,-176.72 81.69,-197.51 103,-212.6 104.8,-213.88 106.68,-215.13 108.61,-216.36"/>
+<polygon fill="#000000" stroke="#000000" points="106.82,-219.37 117.19,-221.51 110.42,-213.36 106.82,-219.37"/>
 </g>
-<!-- proc~orbel_ehybrid -->
+<!-- proc~orbel_fhybrid -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node3" class="node">
-<title>proc~orbel_ehybrid</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node3"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="181,-156.62 103,-156.62 103,-132.62 181,-132.62 181,-156.62"/>
-<text text-anchor="middle" x="142" y="-142.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
+<title>proc~orbel_fhybrid</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node3"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="179.5,-203.6 104.5,-203.6 104.5,-179.6 179.5,-179.6 179.5,-203.6"/>
+<text text-anchor="middle" x="142" y="-189.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge2" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
-<path fill="none" stroke="#000000" d="M55.03,-93.77C71.09,-103.27 93.63,-116.6 111.61,-127.23"/>
-<polygon fill="#000000" stroke="#000000" points="110.14,-130.43 120.53,-132.51 113.7,-124.41 110.14,-130.43"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
+<path fill="none" stroke="#000000" d="M66.45,-163.6C76.78,-167.48 88.4,-171.84 99.32,-175.95"/>
+<polygon fill="#000000" stroke="#000000" points="98.11,-179.23 108.7,-179.47 100.57,-172.68 98.11,-179.23"/>
 </g>
-<!-- proc~orbel_fhybrid -->
+<!-- proc~orbel_schget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node4" class="node">
-<title>proc~orbel_fhybrid</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node4"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="179.5,-93.62 104.5,-93.62 104.5,-69.62 179.5,-69.62 179.5,-93.62"/>
-<text text-anchor="middle" x="142" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
+<title>proc~orbel_schget</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node4"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
+<polygon fill="#d9534f" stroke="#d9534f" points="404,-183.6 330,-183.6 330,-159.6 404,-159.6 404,-183.6"/>
+<text text-anchor="middle" x="367" y="-169.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge3" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
-<path fill="none" stroke="#000000" d="M67.03,-81.62C75.57,-81.62 84.94,-81.62 94.06,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="94.2,-85.12 104.2,-81.62 94.2,-78.12 94.2,-85.12"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
+<path fill="none" stroke="#000000" d="M67.19,-153.57C126.47,-157.15 251.81,-164.71 319.8,-168.82"/>
+<polygon fill="#000000" stroke="#000000" points="319.61,-172.31 329.8,-169.42 320.03,-165.32 319.61,-172.31"/>
 </g>
-<!-- proc~orbel_zget -->
+<!-- proc~orbel_ehybrid -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node5" class="node">
-<title>proc~orbel_zget</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node5"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="173.5,-51.62 110.5,-51.62 110.5,-27.62 173.5,-27.62 173.5,-51.62"/>
-<text text-anchor="middle" x="142" y="-37.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
+<title>proc~orbel_ehybrid</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node5"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="181,-102.6 103,-102.6 103,-78.6 181,-78.6 181,-102.6"/>
+<text text-anchor="middle" x="142" y="-88.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge4" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
-<path fill="none" stroke="#000000" d="M65.02,-69.59C76.27,-65.15 89.19,-60.05 101.15,-55.34"/>
-<polygon fill="#000000" stroke="#000000" points="102.46,-58.58 110.48,-51.66 99.89,-52.07 102.46,-58.58"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
+<path fill="none" stroke="#000000" d="M55.54,-139.55C71.44,-130.44 93.48,-117.82 111.19,-107.68"/>
+<polygon fill="#000000" stroke="#000000" points="113.06,-110.64 120,-102.63 109.59,-104.56 113.06,-110.64"/>
 </g>
-<!-- proc~orbel_schget -->
+<!-- interface~orbel_scget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node6" class="node">
-<title>proc~orbel_schget</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node6"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
-<polygon fill="#d9534f" stroke="#d9534f" points="404,-31.62 330,-31.62 330,-7.62 404,-7.62 404,-31.62"/>
-<text text-anchor="middle" x="367" y="-17.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
+<title>interface~orbel_scget</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node6"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#a7506f" stroke="#a7506f" points="401,-60.6 333,-60.6 333,-36.6 401,-36.6 401,-60.6"/>
+<text text-anchor="middle" x="367" y="-46.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
+<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge5" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M43.02,-69.51C54.57,-54.27 76.81,-28.83 103,-18.62 174.54,9.27 265.57,0.09 319.63,-9.5"/>
-<polygon fill="#000000" stroke="#000000" points="319.13,-12.96 329.6,-11.35 320.41,-6.08 319.13,-12.96"/>
+<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M42.41,-139.55C54.1,-122.41 77.39,-90.73 103,-69.6 147.65,-32.76 160.95,-21.06 217,-6.6 250.14,1.94 260.96,2.33 294,-6.6 311.53,-11.34 329.18,-21.53 342.62,-30.68"/>
+<polygon fill="#000000" stroke="#000000" points="340.61,-33.55 350.79,-36.48 344.66,-27.84 340.61,-33.55"/>
 </g>
-<!-- proc~orbel_scget -->
-<g id="proc~~orbel_el2xv~~CallsGraph_node11" class="node">
-<title>proc~orbel_scget</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node11"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#d9534f" stroke="#d9534f" points="508,-198.62 440,-198.62 440,-174.62 508,-174.62 508,-198.62"/>
-<text text-anchor="middle" x="474" y="-184.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+<!-- proc~orbel_flon -->
+<g id="proc~~orbel_el2xv~~CallsGraph_node8" class="node">
+<title>proc~orbel_flon</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node8"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="285.5,-245.6 225.5,-245.6 225.5,-221.6 285.5,-221.6 285.5,-245.6"/>
+<text text-anchor="middle" x="255.5" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
-<g id="proc~~orbel_el2xv~~CallsGraph_edge6" class="edge">
-<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.22,-186.62C410.31,-186.62 420.3,-186.62 429.85,-186.62"/>
-<polygon fill="#000000" stroke="#000000" points="429.99,-190.12 439.99,-186.62 429.99,-183.12 429.99,-190.12"/>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
+<g id="proc~~orbel_el2xv~~CallsGraph_edge7" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
+<path fill="none" stroke="#000000" d="M174.95,-203.64C187.69,-208.44 202.47,-214 215.81,-219.03"/>
+<polygon fill="#000000" stroke="#000000" points="214.62,-222.32 225.21,-222.57 217.09,-215.77 214.62,-222.32"/>
 </g>
-<!-- proc~orbel_esolmd -->
-<g id="proc~~orbel_el2xv~~CallsGraph_node8" class="node">
-<title>proc~orbel_esolmd</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node8"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="294,-219.62 217,-219.62 217,-195.62 294,-195.62 294,-219.62"/>
-<text text-anchor="middle" x="255.5" y="-205.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+<!-- proc~orbel_fget -->
+<g id="proc~~orbel_el2xv~~CallsGraph_node11" class="node">
+<title>proc~orbel_fget</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node11"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="286,-203.6 225,-203.6 225,-179.6 286,-179.6 286,-203.6"/>
+<text text-anchor="middle" x="255.5" y="-189.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
-<g id="proc~~orbel_el2xv~~CallsGraph_edge8" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
-<path fill="none" stroke="#000000" d="M164.35,-156.78C179.13,-165.19 199.24,-176.61 217,-186.62 219.22,-187.87 221.51,-189.16 223.82,-190.46"/>
-<polygon fill="#000000" stroke="#000000" points="222.24,-193.59 232.68,-195.43 225.67,-187.48 222.24,-193.59"/>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<g id="proc~~orbel_el2xv~~CallsGraph_edge6" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
+<path fill="none" stroke="#000000" d="M179.51,-191.6C190.79,-191.6 203.27,-191.6 214.76,-191.6"/>
+<polygon fill="#000000" stroke="#000000" points="214.97,-195.1 224.97,-191.6 214.97,-188.1 214.97,-195.1"/>
 </g>
 <!-- proc~orbel_eget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node9" class="node">
 <title>proc~orbel_eget</title>
 <g id="a_proc~~orbel_el2xv~~CallsGraph_node9"><a xlink:href=".././proc/orbel_eget.html" xlink:title="orbel_eget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="287.5,-177.62 223.5,-177.62 223.5,-153.62 287.5,-153.62 287.5,-177.62"/>
-<text text-anchor="middle" x="255.5" y="-163.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="287.5,-123.6 223.5,-123.6 223.5,-99.6 287.5,-99.6 287.5,-123.6"/>
+<text text-anchor="middle" x="255.5" y="-109.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_eget -->
-<g id="proc~~orbel_el2xv~~CallsGraph_edge9" class="edge">
+<g id="proc~~orbel_el2xv~~CallsGraph_edge10" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_eget</title>
-<path fill="none" stroke="#000000" d="M181.06,-151.79C191.48,-153.75 202.82,-155.89 213.41,-157.88"/>
-<polygon fill="#000000" stroke="#000000" points="212.79,-161.33 223.27,-159.74 214.09,-154.45 212.79,-161.33"/>
+<path fill="none" stroke="#000000" d="M181.06,-97.77C191.48,-99.73 202.82,-101.87 213.41,-103.86"/>
+<polygon fill="#000000" stroke="#000000" points="212.79,-107.31 223.27,-105.72 214.09,-100.43 212.79,-107.31"/>
+</g>
+<!-- proc~orbel_esolmd -->
+<g id="proc~~orbel_el2xv~~CallsGraph_node10" class="node">
+<title>proc~orbel_esolmd</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node10"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="294,-81.6 217,-81.6 217,-57.6 294,-57.6 294,-81.6"/>
+<text text-anchor="middle" x="255.5" y="-67.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+</a>
+</g>
+</g>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<g id="proc~~orbel_el2xv~~CallsGraph_edge8" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
+<path fill="none" stroke="#000000" d="M181.06,-83.43C189.4,-81.86 198.34,-80.18 207,-78.55"/>
+<polygon fill="#000000" stroke="#000000" points="207.81,-81.96 216.99,-76.67 206.51,-75.08 207.81,-81.96"/>
 </g>
 <!-- proc~orbel_ehie -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node12" class="node">
 <title>proc~orbel_ehie</title>
 <g id="a_proc~~orbel_el2xv~~CallsGraph_node12"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="287,-135.62 224,-135.62 224,-111.62 287,-111.62 287,-135.62"/>
-<text text-anchor="middle" x="255.5" y="-121.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="287,-39.6 224,-39.6 224,-15.6 287,-15.6 287,-39.6"/>
+<text text-anchor="middle" x="255.5" y="-25.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
-<g id="proc~~orbel_el2xv~~CallsGraph_edge7" class="edge">
+<g id="proc~~orbel_el2xv~~CallsGraph_edge9" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
-<path fill="none" stroke="#000000" d="M181.06,-137.45C191.67,-135.45 203.24,-133.28 213.99,-131.25"/>
-<polygon fill="#000000" stroke="#000000" points="214.81,-134.66 223.99,-129.37 213.51,-127.78 214.81,-134.66"/>
+<path fill="none" stroke="#000000" d="M164.35,-78.44C179.13,-70.04 199.24,-58.61 217,-48.6 219.22,-47.35 221.51,-46.06 223.82,-44.76"/>
+<polygon fill="#000000" stroke="#000000" points="225.67,-47.74 232.68,-39.8 222.24,-41.64 225.67,-47.74"/>
 </g>
-<!-- proc~orbel_flon -->
+<!-- proc~orbel_scget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node7" class="node">
-<title>proc~orbel_flon</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node7"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="285.5,-93.62 225.5,-93.62 225.5,-69.62 285.5,-69.62 285.5,-93.62"/>
-<text text-anchor="middle" x="255.5" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
-</a>
-</g>
-</g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
-<g id="proc~~orbel_el2xv~~CallsGraph_edge10" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
-<path fill="none" stroke="#000000" d="M179.51,-81.62C190.89,-81.62 203.49,-81.62 215.06,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="215.33,-85.12 225.33,-81.62 215.33,-78.12 215.33,-85.12"/>
-</g>
-<!-- proc~orbel_fget -->
-<g id="proc~~orbel_el2xv~~CallsGraph_node10" class="node">
-<title>proc~orbel_fget</title>
-<g id="a_proc~~orbel_el2xv~~CallsGraph_node10"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="286,-51.62 225,-51.62 225,-27.62 286,-27.62 286,-51.62"/>
-<text text-anchor="middle" x="255.5" y="-37.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
+<title>proc~orbel_scget</title>
+<g id="a_proc~~orbel_el2xv~~CallsGraph_node7"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#d9534f" stroke="#d9534f" points="508,-60.6 440,-60.6 440,-36.6 508,-36.6 508,-60.6"/>
+<text text-anchor="middle" x="474" y="-46.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge11" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
-<path fill="none" stroke="#000000" d="M174.95,-69.59C187.46,-64.87 201.95,-59.42 215.1,-54.46"/>
-<polygon fill="#000000" stroke="#000000" points="216.71,-57.6 224.84,-50.79 214.25,-51.04 216.71,-57.6"/>
+<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.22,-48.6C410.31,-48.6 420.3,-48.6 429.85,-48.6"/>
+<polygon fill="#000000" stroke="#000000" points="429.99,-52.1 439.99,-48.6 429.99,-45.1 429.99,-52.1"/>
 </g>
 <!-- 3 -->
 <g id="proc~~orbel_el2xv~~CallsGraph_node13" class="node">
 <title>3</title>
-<polygon fill="#777777" stroke="#777777" points="394,-93.62 340,-93.62 340,-69.62 394,-69.62 394,-93.62"/>
-<text text-anchor="middle" x="367" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
+<polygon fill="#777777" stroke="#777777" points="394,-245.6 340,-245.6 340,-221.6 394,-221.6 394,-245.6"/>
+<text text-anchor="middle" x="367" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
 </g>
 <!-- proc~orbel_flon&#45;&gt;3 -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge12" class="edge">
 <title>proc~orbel_flon&#45;&gt;3</title>
-<path fill="none" stroke="#000000" d="M285.56,-81.62C299.12,-81.62 315.4,-81.62 329.76,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="329.81,-85.12 339.81,-81.62 329.81,-78.12 329.81,-85.12"/>
+<path fill="none" stroke="#000000" d="M285.56,-233.6C299.12,-233.6 315.4,-233.6 329.76,-233.6"/>
+<polygon fill="#000000" stroke="#000000" points="329.81,-237.1 339.81,-233.6 329.81,-230.1 329.81,-237.1"/>
 </g>
-<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge13" class="edge">
-<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M294.18,-200.39C303.36,-198.63 313.25,-196.74 322.67,-194.93"/>
-<polygon fill="#000000" stroke="#000000" points="323.48,-198.34 332.64,-193.02 322.16,-191.46 323.48,-198.34"/>
+<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M278.35,-99.45C283.49,-96.57 288.95,-93.49 294,-90.6 308.05,-82.57 323.57,-73.54 336.59,-65.92"/>
+<polygon fill="#000000" stroke="#000000" points="338.72,-68.73 345.57,-60.65 335.18,-62.69 338.72,-68.73"/>
 </g>
-<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge14" class="edge">
-<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M287.59,-171.58C298.54,-173.68 311.06,-176.08 322.83,-178.34"/>
-<polygon fill="#000000" stroke="#000000" points="322.44,-181.83 332.92,-180.28 323.76,-174.96 322.44,-181.83"/>
+<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M294.18,-62.38C303.36,-60.62 313.25,-58.72 322.67,-56.91"/>
+<polygon fill="#000000" stroke="#000000" points="323.48,-60.32 332.64,-55 322.16,-53.45 323.48,-60.32"/>
 </g>
 <!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge15" class="edge">
 <title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M286.13,-34.21C296.52,-32.31 308.44,-30.13 319.86,-28.05"/>
-<polygon fill="#000000" stroke="#000000" points="320.49,-31.49 329.7,-26.25 319.24,-24.6 320.49,-31.49"/>
+<path fill="none" stroke="#000000" d="M286.13,-186.19C296.52,-184.29 308.44,-182.12 319.86,-180.03"/>
+<polygon fill="#000000" stroke="#000000" points="320.49,-183.47 329.7,-178.23 319.24,-176.59 320.49,-183.47"/>
 </g>
 <!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv~~CallsGraph_edge16" class="edge">
 <title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M278.35,-135.77C283.49,-138.66 288.95,-141.73 294,-144.62 308.05,-152.65 323.57,-161.69 336.59,-169.31"/>
-<polygon fill="#000000" stroke="#000000" points="335.18,-172.54 345.57,-174.58 338.72,-166.5 335.18,-172.54"/>
+<path fill="none" stroke="#000000" d="M287,-33.45C298.18,-35.59 311.04,-38.06 323.09,-40.37"/>
+<polygon fill="#000000" stroke="#000000" points="322.5,-43.82 332.98,-42.27 323.82,-36.95 322.5,-43.82"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/orbel_el2xv_vec.html b/docs/proc/orbel_el2xv_vec.html
index f045687f5..f2bc1b249 100644
--- a/docs/proc/orbel_el2xv_vec.html
+++ b/docs/proc/orbel_el2xv_vec.html
@@ -281,232 +281,232 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~orbel_el2xv_vec~~CallsGraph Pages: 1 -->
-<svg id="procorbel_el2xv_vecCallsGraph" width="641pt" height="243pt"
- viewBox="0.00 0.00 641.00 242.84" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~orbel_el2xv_vec~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 239.22)">
+<svg id="procorbel_el2xv_vecCallsGraph" width="641pt" height="253pt"
+ viewBox="0.00 0.00 641.00 253.21" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~orbel_el2xv_vec~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 249.6)">
 <title>proc~~orbel_el2xv_vec~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-239.22 638,-239.22 638,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-249.6 638,-249.6 638,4 -4,4"/>
 <!-- proc~orbel_el2xv_vec -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node1" class="node">
 <title>proc~orbel_el2xv_vec</title>
-<polygon fill="none" stroke="black" points="90,-93.62 0,-93.62 0,-69.62 90,-69.62 90,-93.62"/>
-<text text-anchor="middle" x="45" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_el2xv_vec</text>
+<polygon fill="none" stroke="black" points="90,-163.6 0,-163.6 0,-139.6 90,-139.6 90,-163.6"/>
+<text text-anchor="middle" x="45" y="-149.2" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_el2xv_vec</text>
 </g>
 <!-- proc~orbel_el2xv -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node2" class="node">
 <title>proc~orbel_el2xv</title>
 <g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node2"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
-<polygon fill="#d9534f" stroke="#d9534f" points="193,-93.62 126,-93.62 126,-69.62 193,-69.62 193,-93.62"/>
-<text text-anchor="middle" x="159.5" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="193,-163.6 126,-163.6 126,-139.6 193,-139.6 193,-163.6"/>
+<text text-anchor="middle" x="159.5" y="-149.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge1" class="edge">
 <title>proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv</title>
-<path fill="none" stroke="#000000" d="M90.14,-81.62C98.63,-81.62 107.51,-81.62 115.95,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="115.97,-85.12 125.97,-81.62 115.97,-78.12 115.97,-85.12"/>
+<path fill="none" stroke="#000000" d="M90.14,-151.6C98.63,-151.6 107.51,-151.6 115.95,-151.6"/>
+<polygon fill="#000000" stroke="#000000" points="115.97,-155.1 125.97,-151.6 115.97,-148.1 115.97,-155.1"/>
 </g>
-<!-- interface~orbel_scget -->
+<!-- proc~orbel_zget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node3" class="node">
-<title>interface~orbel_scget</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node3"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#a7506f" stroke="#a7506f" points="527,-198.62 459,-198.62 459,-174.62 527,-174.62 527,-198.62"/>
-<text text-anchor="middle" x="493" y="-184.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+<title>proc~orbel_zget</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node3"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="299.5,-245.6 236.5,-245.6 236.5,-221.6 299.5,-221.6 299.5,-245.6"/>
+<text text-anchor="middle" x="268" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge2" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M168.15,-93.69C179.7,-111.2 203,-143.91 229,-165.62 273.43,-202.73 286.95,-214.16 343,-228.62 376.14,-237.17 386.96,-237.55 420,-228.62 437.53,-223.88 455.18,-213.69 468.62,-204.54"/>
-<polygon fill="#000000" stroke="#000000" points="470.66,-207.38 476.79,-198.74 466.61,-201.67 470.66,-207.38"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
+<path fill="none" stroke="#000000" d="M172.42,-163.73C185.57,-176.72 207.69,-197.51 229,-212.6 230.8,-213.88 232.68,-215.13 234.61,-216.36"/>
+<polygon fill="#000000" stroke="#000000" points="232.82,-219.37 243.19,-221.51 236.42,-213.36 232.82,-219.37"/>
 </g>
-<!-- proc~orbel_ehybrid -->
+<!-- proc~orbel_fhybrid -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node4" class="node">
-<title>proc~orbel_ehybrid</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node4"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="307,-156.62 229,-156.62 229,-132.62 307,-132.62 307,-156.62"/>
-<text text-anchor="middle" x="268" y="-142.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
+<title>proc~orbel_fhybrid</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node4"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="305.5,-203.6 230.5,-203.6 230.5,-179.6 305.5,-179.6 305.5,-203.6"/>
+<text text-anchor="middle" x="268" y="-189.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge3" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
-<path fill="none" stroke="#000000" d="M181.03,-93.77C197.09,-103.27 219.63,-116.6 237.61,-127.23"/>
-<polygon fill="#000000" stroke="#000000" points="236.14,-130.43 246.53,-132.51 239.7,-124.41 236.14,-130.43"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
+<path fill="none" stroke="#000000" d="M192.45,-163.6C202.78,-167.48 214.4,-171.84 225.32,-175.95"/>
+<polygon fill="#000000" stroke="#000000" points="224.11,-179.23 234.7,-179.47 226.57,-172.68 224.11,-179.23"/>
 </g>
-<!-- proc~orbel_fhybrid -->
+<!-- proc~orbel_schget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node5" class="node">
-<title>proc~orbel_fhybrid</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node5"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="305.5,-93.62 230.5,-93.62 230.5,-69.62 305.5,-69.62 305.5,-93.62"/>
-<text text-anchor="middle" x="268" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
+<title>proc~orbel_schget</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node5"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
+<polygon fill="#d9534f" stroke="#d9534f" points="530,-183.6 456,-183.6 456,-159.6 530,-159.6 530,-183.6"/>
+<text text-anchor="middle" x="493" y="-169.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge4" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
-<path fill="none" stroke="#000000" d="M193.03,-81.62C201.57,-81.62 210.94,-81.62 220.06,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="220.2,-85.12 230.2,-81.62 220.2,-78.12 220.2,-85.12"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
+<path fill="none" stroke="#000000" d="M193.19,-153.57C252.47,-157.15 377.81,-164.71 445.8,-168.82"/>
+<polygon fill="#000000" stroke="#000000" points="445.61,-172.31 455.8,-169.42 446.03,-165.32 445.61,-172.31"/>
 </g>
-<!-- proc~orbel_zget -->
+<!-- proc~orbel_ehybrid -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node6" class="node">
-<title>proc~orbel_zget</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node6"><a xlink:href=".././proc/orbel_zget.html" xlink:title="orbel_zget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="299.5,-51.62 236.5,-51.62 236.5,-27.62 299.5,-27.62 299.5,-51.62"/>
-<text text-anchor="middle" x="268" y="-37.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_zget</text>
+<title>proc~orbel_ehybrid</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node6"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="307,-102.6 229,-102.6 229,-78.6 307,-78.6 307,-102.6"/>
+<text text-anchor="middle" x="268" y="-88.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_zget -->
+<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge5" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_zget</title>
-<path fill="none" stroke="#000000" d="M191.02,-69.59C202.27,-65.15 215.19,-60.05 227.15,-55.34"/>
-<polygon fill="#000000" stroke="#000000" points="228.46,-58.58 236.48,-51.66 225.89,-52.07 228.46,-58.58"/>
+<title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
+<path fill="none" stroke="#000000" d="M181.54,-139.55C197.44,-130.44 219.48,-117.82 237.19,-107.68"/>
+<polygon fill="#000000" stroke="#000000" points="239.06,-110.64 246,-102.63 235.59,-104.56 239.06,-110.64"/>
 </g>
-<!-- proc~orbel_schget -->
+<!-- interface~orbel_scget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node7" class="node">
-<title>proc~orbel_schget</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node7"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
-<polygon fill="#d9534f" stroke="#d9534f" points="530,-31.62 456,-31.62 456,-7.62 530,-7.62 530,-31.62"/>
-<text text-anchor="middle" x="493" y="-17.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
+<title>interface~orbel_scget</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node7"><a xlink:href=".././interface/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#a7506f" stroke="#a7506f" points="527,-60.6 459,-60.6 459,-36.6 527,-36.6 527,-60.6"/>
+<text text-anchor="middle" x="493" y="-46.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
+<!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge6" class="edge">
-<title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M169.02,-69.51C180.57,-54.27 202.81,-28.83 229,-18.62 300.54,9.27 391.57,0.09 445.63,-9.5"/>
-<polygon fill="#000000" stroke="#000000" points="445.13,-12.96 455.6,-11.35 446.41,-6.08 445.13,-12.96"/>
+<title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M168.41,-139.55C180.1,-122.41 203.39,-90.73 229,-69.6 273.65,-32.76 286.95,-21.06 343,-6.6 376.14,1.94 386.96,2.33 420,-6.6 437.53,-11.34 455.18,-21.53 468.62,-30.68"/>
+<polygon fill="#000000" stroke="#000000" points="466.61,-33.55 476.79,-36.48 470.66,-27.84 466.61,-33.55"/>
 </g>
-<!-- proc~orbel_scget -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_node12" class="node">
-<title>proc~orbel_scget</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node12"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
-<polygon fill="#d9534f" stroke="#d9534f" points="634,-198.62 566,-198.62 566,-174.62 634,-174.62 634,-198.62"/>
-<text text-anchor="middle" x="600" y="-184.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
+<!-- proc~orbel_flon -->
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_node9" class="node">
+<title>proc~orbel_flon</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node9"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="411.5,-245.6 351.5,-245.6 351.5,-221.6 411.5,-221.6 411.5,-245.6"/>
+<text text-anchor="middle" x="381.5" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge7" class="edge">
-<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M527.22,-186.62C536.31,-186.62 546.3,-186.62 555.85,-186.62"/>
-<polygon fill="#000000" stroke="#000000" points="555.99,-190.12 565.99,-186.62 555.99,-183.12 555.99,-190.12"/>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge8" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
+<path fill="none" stroke="#000000" d="M300.95,-203.64C313.69,-208.44 328.47,-214 341.81,-219.03"/>
+<polygon fill="#000000" stroke="#000000" points="340.62,-222.32 351.21,-222.57 343.09,-215.77 340.62,-222.32"/>
 </g>
-<!-- proc~orbel_esolmd -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_node9" class="node">
-<title>proc~orbel_esolmd</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node9"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="420,-219.62 343,-219.62 343,-195.62 420,-195.62 420,-219.62"/>
-<text text-anchor="middle" x="381.5" y="-205.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+<!-- proc~orbel_fget -->
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_node12" class="node">
+<title>proc~orbel_fget</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node12"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="412,-203.6 351,-203.6 351,-179.6 412,-179.6 412,-203.6"/>
+<text text-anchor="middle" x="381.5" y="-189.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge9" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
-<path fill="none" stroke="#000000" d="M290.35,-156.78C305.13,-165.19 325.24,-176.61 343,-186.62 345.22,-187.87 347.51,-189.16 349.82,-190.46"/>
-<polygon fill="#000000" stroke="#000000" points="348.24,-193.59 358.68,-195.43 351.67,-187.48 348.24,-193.59"/>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge7" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
+<path fill="none" stroke="#000000" d="M305.51,-191.6C316.79,-191.6 329.27,-191.6 340.76,-191.6"/>
+<polygon fill="#000000" stroke="#000000" points="340.97,-195.1 350.97,-191.6 340.97,-188.1 340.97,-195.1"/>
 </g>
 <!-- proc~orbel_eget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node10" class="node">
 <title>proc~orbel_eget</title>
 <g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node10"><a xlink:href=".././proc/orbel_eget.html" xlink:title="orbel_eget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="413.5,-177.62 349.5,-177.62 349.5,-153.62 413.5,-153.62 413.5,-177.62"/>
-<text text-anchor="middle" x="381.5" y="-163.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="413.5,-123.6 349.5,-123.6 349.5,-99.6 413.5,-99.6 413.5,-123.6"/>
+<text text-anchor="middle" x="381.5" y="-109.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_eget</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_eget -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge10" class="edge">
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge11" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_eget</title>
-<path fill="none" stroke="#000000" d="M307.06,-151.79C317.48,-153.75 328.82,-155.89 339.41,-157.88"/>
-<polygon fill="#000000" stroke="#000000" points="338.79,-161.33 349.27,-159.74 340.09,-154.45 338.79,-161.33"/>
+<path fill="none" stroke="#000000" d="M307.06,-97.77C317.48,-99.73 328.82,-101.87 339.41,-103.86"/>
+<polygon fill="#000000" stroke="#000000" points="338.79,-107.31 349.27,-105.72 340.09,-100.43 338.79,-107.31"/>
+</g>
+<!-- proc~orbel_esolmd -->
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_node11" class="node">
+<title>proc~orbel_esolmd</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node11"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="420,-81.6 343,-81.6 343,-57.6 420,-57.6 420,-81.6"/>
+<text text-anchor="middle" x="381.5" y="-67.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+</a>
+</g>
+</g>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge9" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
+<path fill="none" stroke="#000000" d="M307.06,-83.43C315.4,-81.86 324.34,-80.18 333,-78.55"/>
+<polygon fill="#000000" stroke="#000000" points="333.81,-81.96 342.99,-76.67 332.51,-75.08 333.81,-81.96"/>
 </g>
 <!-- proc~orbel_ehie -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node13" class="node">
 <title>proc~orbel_ehie</title>
 <g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node13"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="413,-135.62 350,-135.62 350,-111.62 413,-111.62 413,-135.62"/>
-<text text-anchor="middle" x="381.5" y="-121.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="413,-39.6 350,-39.6 350,-15.6 413,-15.6 413,-39.6"/>
+<text text-anchor="middle" x="381.5" y="-25.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge8" class="edge">
+<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge10" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
-<path fill="none" stroke="#000000" d="M307.06,-137.45C317.67,-135.45 329.24,-133.28 339.99,-131.25"/>
-<polygon fill="#000000" stroke="#000000" points="340.81,-134.66 349.99,-129.37 339.51,-127.78 340.81,-134.66"/>
+<path fill="none" stroke="#000000" d="M290.35,-78.44C305.13,-70.04 325.24,-58.61 343,-48.6 345.22,-47.35 347.51,-46.06 349.82,-44.76"/>
+<polygon fill="#000000" stroke="#000000" points="351.67,-47.74 358.68,-39.8 348.24,-41.64 351.67,-47.74"/>
 </g>
-<!-- proc~orbel_flon -->
+<!-- proc~orbel_scget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node8" class="node">
-<title>proc~orbel_flon</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node8"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="411.5,-93.62 351.5,-93.62 351.5,-69.62 411.5,-69.62 411.5,-93.62"/>
-<text text-anchor="middle" x="381.5" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
-</a>
-</g>
-</g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_edge11" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
-<path fill="none" stroke="#000000" d="M305.51,-81.62C316.89,-81.62 329.49,-81.62 341.06,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="341.33,-85.12 351.33,-81.62 341.33,-78.12 341.33,-85.12"/>
-</g>
-<!-- proc~orbel_fget -->
-<g id="proc~~orbel_el2xv_vec~~CallsGraph_node11" class="node">
-<title>proc~orbel_fget</title>
-<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node11"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="412,-51.62 351,-51.62 351,-27.62 412,-27.62 412,-51.62"/>
-<text text-anchor="middle" x="381.5" y="-37.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
+<title>proc~orbel_scget</title>
+<g id="a_proc~~orbel_el2xv_vec~~CallsGraph_node8"><a xlink:href=".././proc/orbel_scget.html" xlink:title="orbel_scget">
+<polygon fill="#d9534f" stroke="#d9534f" points="634,-60.6 566,-60.6 566,-36.6 634,-36.6 634,-60.6"/>
+<text text-anchor="middle" x="600" y="-46.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_scget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<!-- interface~orbel_scget&#45;&gt;proc~orbel_scget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge12" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
-<path fill="none" stroke="#000000" d="M300.95,-69.59C313.46,-64.87 327.95,-59.42 341.1,-54.46"/>
-<polygon fill="#000000" stroke="#000000" points="342.71,-57.6 350.84,-50.79 340.25,-51.04 342.71,-57.6"/>
+<title>interface~orbel_scget&#45;&gt;proc~orbel_scget</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M527.22,-48.6C536.31,-48.6 546.3,-48.6 555.85,-48.6"/>
+<polygon fill="#000000" stroke="#000000" points="555.99,-52.1 565.99,-48.6 555.99,-45.1 555.99,-52.1"/>
 </g>
 <!-- 3 -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_node14" class="node">
 <title>3</title>
-<polygon fill="#777777" stroke="#777777" points="520,-93.62 466,-93.62 466,-69.62 520,-69.62 520,-93.62"/>
-<text text-anchor="middle" x="493" y="-79.22" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
+<polygon fill="#777777" stroke="#777777" points="520,-245.6 466,-245.6 466,-221.6 520,-221.6 520,-245.6"/>
+<text text-anchor="middle" x="493" y="-231.2" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
 </g>
 <!-- proc~orbel_flon&#45;&gt;3 -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge13" class="edge">
 <title>proc~orbel_flon&#45;&gt;3</title>
-<path fill="none" stroke="#000000" d="M411.56,-81.62C425.12,-81.62 441.4,-81.62 455.76,-81.62"/>
-<polygon fill="#000000" stroke="#000000" points="455.81,-85.12 465.81,-81.62 455.81,-78.12 455.81,-85.12"/>
+<path fill="none" stroke="#000000" d="M411.56,-233.6C425.12,-233.6 441.4,-233.6 455.76,-233.6"/>
+<polygon fill="#000000" stroke="#000000" points="455.81,-237.1 465.81,-233.6 455.81,-230.1 455.81,-237.1"/>
 </g>
-<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge14" class="edge">
-<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M420.18,-200.39C429.36,-198.63 439.25,-196.74 448.67,-194.93"/>
-<polygon fill="#000000" stroke="#000000" points="449.48,-198.34 458.64,-193.02 448.16,-191.46 449.48,-198.34"/>
+<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M404.35,-99.45C409.49,-96.57 414.95,-93.49 420,-90.6 434.05,-82.57 449.57,-73.54 462.59,-65.92"/>
+<polygon fill="#000000" stroke="#000000" points="464.72,-68.73 471.57,-60.65 461.18,-62.69 464.72,-68.73"/>
 </g>
-<!-- proc~orbel_eget&#45;&gt;interface~orbel_scget -->
+<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge15" class="edge">
-<title>proc~orbel_eget&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M413.59,-171.58C424.54,-173.68 437.06,-176.08 448.83,-178.34"/>
-<polygon fill="#000000" stroke="#000000" points="448.44,-181.83 458.92,-180.28 449.76,-174.96 448.44,-181.83"/>
+<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M420.18,-62.38C429.36,-60.62 439.25,-58.72 448.67,-56.91"/>
+<polygon fill="#000000" stroke="#000000" points="449.48,-60.32 458.64,-55 448.16,-53.45 449.48,-60.32"/>
 </g>
 <!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge16" class="edge">
 <title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M412.13,-34.21C422.52,-32.31 434.44,-30.13 445.86,-28.05"/>
-<polygon fill="#000000" stroke="#000000" points="446.49,-31.49 455.7,-26.25 445.24,-24.6 446.49,-31.49"/>
+<path fill="none" stroke="#000000" d="M412.13,-186.19C422.52,-184.29 434.44,-182.12 445.86,-180.03"/>
+<polygon fill="#000000" stroke="#000000" points="446.49,-183.47 455.7,-178.23 445.24,-176.59 446.49,-183.47"/>
 </g>
 <!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_el2xv_vec~~CallsGraph_edge17" class="edge">
 <title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M404.35,-135.77C409.49,-138.66 414.95,-141.73 420,-144.62 434.05,-152.65 449.57,-161.69 462.59,-169.31"/>
-<polygon fill="#000000" stroke="#000000" points="461.18,-172.54 471.57,-174.58 464.72,-166.5 461.18,-172.54"/>
+<path fill="none" stroke="#000000" d="M413,-33.45C424.18,-35.59 437.04,-38.06 449.09,-40.37"/>
+<polygon fill="#000000" stroke="#000000" points="448.5,-43.82 458.98,-42.27 449.82,-36.95 448.5,-43.82"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/orbel_fhybrid.html b/docs/proc/orbel_fhybrid.html
index 8a946661f..34b0c24e4 100644
--- a/docs/proc/orbel_fhybrid.html
+++ b/docs/proc/orbel_fhybrid.html
@@ -294,62 +294,62 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="75,-45 0,-45 0,-21 75,-21 75,-45"/>
 <text text-anchor="middle" x="37.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_fhybrid</text>
 </g>
-<!-- proc~orbel_flon -->
+<!-- proc~orbel_fget -->
 <g id="proc~~orbel_fhybrid~~CallsGraph_node2" class="node">
-<title>proc~orbel_flon</title>
-<g id="a_proc~~orbel_fhybrid~~CallsGraph_node2"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="171.5,-66 111.5,-66 111.5,-42 171.5,-42 171.5,-66"/>
-<text text-anchor="middle" x="141.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
+<title>proc~orbel_fget</title>
+<g id="a_proc~~orbel_fhybrid~~CallsGraph_node2"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="172,-66 111,-66 111,-42 172,-42 172,-66"/>
+<text text-anchor="middle" x="141.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
 <g id="proc~~orbel_fhybrid~~CallsGraph_edge1" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
-<path fill="none" stroke="#000000" d="M75.04,-40.52C83.58,-42.28 92.72,-44.16 101.37,-45.94"/>
-<polygon fill="#000000" stroke="#000000" points="100.74,-49.39 111.25,-47.98 102.16,-42.53 100.74,-49.39"/>
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
+<path fill="none" stroke="#000000" d="M75.04,-40.52C83.5,-42.26 92.54,-44.13 101.12,-45.89"/>
+<polygon fill="#000000" stroke="#000000" points="100.42,-49.32 110.92,-47.91 101.83,-42.47 100.42,-49.32"/>
 </g>
-<!-- proc~orbel_fget -->
+<!-- proc~orbel_flon -->
 <g id="proc~~orbel_fhybrid~~CallsGraph_node3" class="node">
-<title>proc~orbel_fget</title>
-<g id="a_proc~~orbel_fhybrid~~CallsGraph_node3"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="172,-24 111,-24 111,0 172,0 172,-24"/>
-<text text-anchor="middle" x="141.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
+<title>proc~orbel_flon</title>
+<g id="a_proc~~orbel_fhybrid~~CallsGraph_node3"><a xlink:href=".././proc/orbel_flon.html" xlink:title="orbel_flon">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="171.5,-24 111.5,-24 111.5,0 171.5,0 171.5,-24"/>
+<text text-anchor="middle" x="141.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_flon</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_flon -->
 <g id="proc~~orbel_fhybrid~~CallsGraph_edge2" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
-<path fill="none" stroke="#000000" d="M75.04,-25.48C83.5,-23.74 92.54,-21.87 101.12,-20.11"/>
-<polygon fill="#000000" stroke="#000000" points="101.83,-23.53 110.92,-18.09 100.42,-16.68 101.83,-23.53"/>
-</g>
-<!-- 3 -->
-<g id="proc~~orbel_fhybrid~~CallsGraph_node5" class="node">
-<title>3</title>
-<polygon fill="#777777" stroke="#777777" points="272,-66 218,-66 218,-42 272,-42 272,-66"/>
-<text text-anchor="middle" x="245" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
-</g>
-<!-- proc~orbel_flon&#45;&gt;3 -->
-<g id="proc~~orbel_fhybrid~~CallsGraph_edge3" class="edge">
-<title>proc~orbel_flon&#45;&gt;3</title>
-<path fill="none" stroke="#000000" d="M171.59,-54C182.82,-54 195.8,-54 207.64,-54"/>
-<polygon fill="#000000" stroke="#000000" points="207.68,-57.5 217.68,-54 207.68,-50.5 207.68,-57.5"/>
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_flon</title>
+<path fill="none" stroke="#000000" d="M75.04,-25.48C83.58,-23.72 92.72,-21.84 101.37,-20.06"/>
+<polygon fill="#000000" stroke="#000000" points="102.16,-23.47 111.25,-18.02 100.74,-16.61 102.16,-23.47"/>
 </g>
 <!-- proc~orbel_schget -->
-<g id="proc~~orbel_fhybrid~~CallsGraph_node4" class="node">
+<g id="proc~~orbel_fhybrid~~CallsGraph_node5" class="node">
 <title>proc~orbel_schget</title>
-<g id="a_proc~~orbel_fhybrid~~CallsGraph_node4"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
-<polygon fill="#d9534f" stroke="#d9534f" points="282,-24 208,-24 208,0 282,0 282,-24"/>
-<text text-anchor="middle" x="245" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
+<g id="a_proc~~orbel_fhybrid~~CallsGraph_node5"><a xlink:href=".././proc/orbel_schget.html" xlink:title="orbel_schget">
+<polygon fill="#d9534f" stroke="#d9534f" points="282,-66 208,-66 208,-42 282,-42 282,-66"/>
+<text text-anchor="middle" x="245" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_schget</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
-<g id="proc~~orbel_fhybrid~~CallsGraph_edge4" class="edge">
+<g id="proc~~orbel_fhybrid~~CallsGraph_edge3" class="edge">
 <title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M172.13,-12C180.12,-12 188.96,-12 197.63,-12"/>
-<polygon fill="#000000" stroke="#000000" points="197.67,-15.5 207.67,-12 197.67,-8.5 197.67,-15.5"/>
+<path fill="none" stroke="#000000" d="M172.13,-54C180.12,-54 188.96,-54 197.63,-54"/>
+<polygon fill="#000000" stroke="#000000" points="197.67,-57.5 207.67,-54 197.67,-50.5 197.67,-57.5"/>
+</g>
+<!-- 3 -->
+<g id="proc~~orbel_fhybrid~~CallsGraph_node4" class="node">
+<title>3</title>
+<polygon fill="#777777" stroke="#777777" points="272,-24 218,-24 218,0 272,0 272,-24"/>
+<text text-anchor="middle" x="245" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">3</text>
+</g>
+<!-- proc~orbel_flon&#45;&gt;3 -->
+<g id="proc~~orbel_fhybrid~~CallsGraph_edge4" class="edge">
+<title>proc~orbel_flon&#45;&gt;3</title>
+<path fill="none" stroke="#000000" d="M171.59,-12C182.82,-12 195.8,-12 207.64,-12"/>
+<polygon fill="#000000" stroke="#000000" points="207.68,-15.5 217.68,-12 207.68,-8.5 207.68,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/orbel_scget.html b/docs/proc/orbel_scget.html
index 3ec5aa2e4..68508fcf0 100644
--- a/docs/proc/orbel_scget.html
+++ b/docs/proc/orbel_scget.html
@@ -299,11 +299,11 @@ <h3 class="panel-title">Called by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~orbel_scget~~CalledByGraph Pages: 1 -->
-<svg id="procorbel_scgetCalledByGraph" width="641pt" height="150pt"
- viewBox="0.00 0.00 641.00 150.19" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~orbel_scget~~CalledByGraph" class="graph" transform="scale(0.82 0.82) rotate(0) translate(4 178.53)">
+<svg id="procorbel_scgetCalledByGraph" width="641pt" height="161pt"
+ viewBox="0.00 0.00 641.00 161.28" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~orbel_scget~~CalledByGraph" class="graph" transform="scale(0.82 0.82) rotate(0) translate(4 192)">
 <title>proc~~orbel_scget~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-178.53 775,-178.53 775,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-192 775,-192 775,4 -4,4"/>
 <!-- proc~orbel_scget -->
 <g id="proc~~orbel_scget~~CalledByGraph_node1" class="node">
 <title>proc~orbel_scget</title>
@@ -325,20 +325,20 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M667.12,-96C675.22,-96 684.02,-96 692.53,-96"/>
 <polygon fill="#000000" stroke="#000000" points="692.7,-99.5 702.7,-96 692.7,-92.5 692.7,-99.5"/>
 </g>
-<!-- proc~orbel_esolmd -->
+<!-- proc~drift_kepu_guess -->
 <g id="proc~~orbel_scget~~CalledByGraph_node3" class="node">
-<title>proc~orbel_esolmd</title>
-<g id="a_proc~~orbel_scget~~CalledByGraph_node3"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="554.5,-150 477.5,-150 477.5,-126 554.5,-126 554.5,-150"/>
-<text text-anchor="middle" x="516" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+<title>proc~drift_kepu_guess</title>
+<g id="a_proc~~orbel_scget~~CalledByGraph_node3"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
+<polygon fill="#d9534f" stroke="#d9534f" points="563,-188 469,-188 469,-164 563,-164 563,-188"/>
+<text text-anchor="middle" x="516" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
 </a>
 </g>
 </g>
-<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_scget~~CalledByGraph_edge2" class="edge">
-<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M549.95,-125.96C562.22,-121.48 576.33,-116.33 589.35,-111.58"/>
-<polygon fill="#000000" stroke="#000000" points="590.85,-114.76 599.04,-108.04 588.45,-108.18 590.85,-114.76"/>
+<title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M539.87,-163.96C547.38,-159.77 555.68,-154.89 563,-150 579.29,-139.11 596.65,-125.51 609.88,-114.69"/>
+<polygon fill="#000000" stroke="#000000" points="612.46,-117.1 617.93,-108.03 608,-111.7 612.46,-117.1"/>
 </g>
 <!-- proc~orbel_eget -->
 <g id="proc~~orbel_scget~~CalledByGraph_node4" class="node">
@@ -355,143 +355,143 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M548.12,-96C560.63,-96 575.27,-96 588.78,-96"/>
 <polygon fill="#000000" stroke="#000000" points="588.84,-99.5 598.84,-96 588.84,-92.5 588.84,-99.5"/>
 </g>
-<!-- proc~orbel_el2xv -->
+<!-- proc~orbel_esolmd -->
 <g id="proc~~orbel_scget~~CalledByGraph_node5" class="node">
+<title>proc~orbel_esolmd</title>
+<g id="a_proc~~orbel_scget~~CalledByGraph_node5"><a xlink:href=".././proc/orbel_esolmd.html" xlink:title="orbel_esolmd">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="554.5,-66 477.5,-66 477.5,-42 554.5,-42 554.5,-66"/>
+<text text-anchor="middle" x="516" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_esolmd</text>
+</a>
+</g>
+</g>
+<!-- proc~orbel_esolmd&#45;&gt;interface~orbel_scget -->
+<g id="proc~~orbel_scget~~CalledByGraph_edge4" class="edge">
+<title>proc~orbel_esolmd&#45;&gt;interface~orbel_scget</title>
+<path fill="none" stroke="#000000" d="M549.95,-66.04C562.22,-70.52 576.33,-75.67 589.35,-80.42"/>
+<polygon fill="#000000" stroke="#000000" points="588.45,-83.82 599.04,-83.96 590.85,-77.24 588.45,-83.82"/>
+</g>
+<!-- proc~orbel_el2xv -->
+<g id="proc~~orbel_scget~~CalledByGraph_node6" class="node">
 <title>proc~orbel_el2xv</title>
-<g id="a_proc~~orbel_scget~~CalledByGraph_node5"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
-<polygon fill="#d9534f" stroke="#d9534f" points="319,-149 252,-149 252,-125 319,-125 319,-149"/>
-<text text-anchor="middle" x="285.5" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
+<g id="a_proc~~orbel_scget~~CalledByGraph_node6"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
+<polygon fill="#d9534f" stroke="#d9534f" points="319,-117 252,-117 252,-93 319,-93 319,-117"/>
+<text text-anchor="middle" x="285.5" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv&#45;&gt;interface~orbel_scget -->
-<g id="proc~~orbel_scget~~CalledByGraph_edge4" class="edge">
+<g id="proc~~orbel_scget~~CalledByGraph_edge5" class="edge">
 <title>proc~orbel_el2xv&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M319.34,-148.57C372.53,-165.38 479.94,-191.21 563,-159 585,-150.47 604.27,-131.29 616.82,-116.32"/>
-<polygon fill="#000000" stroke="#000000" points="619.88,-118.1 623.4,-108.11 614.41,-113.73 619.88,-118.1"/>
+<path fill="none" stroke="#000000" d="M319.06,-110.4C370.97,-118.12 475.55,-130.01 563,-117 571.82,-115.69 581.07,-113.48 589.83,-110.98"/>
+<polygon fill="#000000" stroke="#000000" points="590.91,-114.31 599.46,-108.06 588.88,-107.61 590.91,-114.31"/>
 </g>
 <!-- proc~orbel_ehybrid -->
-<g id="proc~~orbel_scget~~CalledByGraph_node8" class="node">
+<g id="proc~~orbel_scget~~CalledByGraph_node9" class="node">
 <title>proc~orbel_ehybrid</title>
-<g id="a_proc~~orbel_scget~~CalledByGraph_node8"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="433,-129 355,-129 355,-105 433,-105 433,-129"/>
-<text text-anchor="middle" x="394" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
+<g id="a_proc~~orbel_scget~~CalledByGraph_node9"><a xlink:href=".././proc/orbel_ehybrid.html" xlink:title="orbel_ehybrid">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="433,-87 355,-87 355,-63 433,-63 433,-87"/>
+<text text-anchor="middle" x="394" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehybrid</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid -->
-<g id="proc~~orbel_scget~~CalledByGraph_edge12" class="edge">
+<g id="proc~~orbel_scget~~CalledByGraph_edge13" class="edge">
 <title>proc~orbel_el2xv&#45;&gt;proc~orbel_ehybrid</title>
-<path fill="none" stroke="#000000" d="M319.03,-130.89C327.12,-129.37 335.97,-127.71 344.64,-126.08"/>
-<polygon fill="#000000" stroke="#000000" points="345.5,-129.48 354.68,-124.2 344.21,-122.6 345.5,-129.48"/>
-</g>
-<!-- proc~drift_kepu_guess -->
-<g id="proc~~orbel_scget~~CalledByGraph_node6" class="node">
-<title>proc~drift_kepu_guess</title>
-<g id="a_proc~~orbel_scget~~CalledByGraph_node6"><a xlink:href=".././proc/drift_kepu_guess.html" xlink:title="drift_kepu_guess">
-<polygon fill="#d9534f" stroke="#d9534f" points="563,-24 469,-24 469,0 563,0 563,-24"/>
-<text text-anchor="middle" x="516" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu_guess</text>
-</a>
-</g>
-</g>
-<!-- proc~drift_kepu_guess&#45;&gt;interface~orbel_scget -->
-<g id="proc~~orbel_scget~~CalledByGraph_edge5" class="edge">
-<title>proc~drift_kepu_guess&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M546.93,-24.02C552.44,-26.68 558.02,-29.71 563,-33 581.78,-45.41 600.47,-62.88 613.66,-76.27"/>
-<polygon fill="#000000" stroke="#000000" points="611.28,-78.85 620.74,-83.62 616.32,-73.99 611.28,-78.85"/>
+<path fill="none" stroke="#000000" d="M319.03,-95.84C327.21,-93.53 336.16,-91.01 344.92,-88.54"/>
+<polygon fill="#000000" stroke="#000000" points="346.01,-91.87 354.68,-85.79 344.11,-85.14 346.01,-91.87"/>
 </g>
 <!-- proc~orbel_ehie -->
 <g id="proc~~orbel_scget~~CalledByGraph_node7" class="node">
 <title>proc~orbel_ehie</title>
 <g id="a_proc~~orbel_scget~~CalledByGraph_node7"><a xlink:href=".././proc/orbel_ehie.html" xlink:title="orbel_ehie">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="547.5,-66 484.5,-66 484.5,-42 547.5,-42 547.5,-66"/>
-<text text-anchor="middle" x="516" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="547.5,-24 484.5,-24 484.5,0 547.5,0 547.5,-24"/>
+<text text-anchor="middle" x="516" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_ehie</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_ehie&#45;&gt;interface~orbel_scget -->
 <g id="proc~~orbel_scget~~CalledByGraph_edge6" class="edge">
 <title>proc~orbel_ehie&#45;&gt;interface~orbel_scget</title>
-<path fill="none" stroke="#000000" d="M547.52,-65.14C560.38,-69.84 575.58,-75.4 589.52,-80.48"/>
-<polygon fill="#000000" stroke="#000000" points="588.32,-83.77 598.92,-83.92 590.72,-77.2 588.32,-83.77"/>
+<path fill="none" stroke="#000000" d="M546.93,-24.02C552.44,-26.68 558.02,-29.71 563,-33 581.78,-45.41 600.47,-62.88 613.66,-76.27"/>
+<polygon fill="#000000" stroke="#000000" points="611.28,-78.85 620.74,-83.62 616.32,-73.99 611.28,-78.85"/>
 </g>
-<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<!-- proc~drift_kepu -->
+<g id="proc~~orbel_scget~~CalledByGraph_node8" class="node">
+<title>proc~drift_kepu</title>
+<g id="a_proc~~orbel_scget~~CalledByGraph_node8"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
+<polygon fill="#d9534f" stroke="#d9534f" points="424,-188 364,-188 364,-164 424,-164 424,-188"/>
+<text text-anchor="middle" x="394" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
+</a>
+</g>
+</g>
+<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
 <g id="proc~~orbel_scget~~CalledByGraph_edge7" class="edge">
-<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
-<path fill="none" stroke="#000000" d="M433.3,-123.7C444.12,-125.6 456.02,-127.68 467.32,-129.66"/>
-<polygon fill="#000000" stroke="#000000" points="467.02,-133.16 477.47,-131.43 468.23,-126.26 467.02,-133.16"/>
+<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
+<path fill="none" stroke="#000000" d="M424.05,-176C434.56,-176 446.82,-176 458.87,-176"/>
+<polygon fill="#000000" stroke="#000000" points="458.9,-179.5 468.9,-176 458.9,-172.5 458.9,-179.5"/>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_eget -->
 <g id="proc~~orbel_scget~~CalledByGraph_edge8" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_eget</title>
-<path fill="none" stroke="#000000" d="M433.3,-110.3C446.18,-108.04 460.6,-105.52 473.7,-103.23"/>
-<polygon fill="#000000" stroke="#000000" points="474.63,-106.62 483.87,-101.45 473.42,-99.72 474.63,-106.62"/>
+<path fill="none" stroke="#000000" d="M433.3,-81.7C446.18,-83.96 460.6,-86.48 473.7,-88.77"/>
+<polygon fill="#000000" stroke="#000000" points="473.42,-92.28 483.87,-90.55 474.63,-85.38 473.42,-92.28"/>
+</g>
+<!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd -->
+<g id="proc~~orbel_scget~~CalledByGraph_edge9" class="edge">
+<title>proc~orbel_ehybrid&#45;&gt;proc~orbel_esolmd</title>
+<path fill="none" stroke="#000000" d="M433.3,-68.3C444.12,-66.4 456.02,-64.32 467.32,-62.34"/>
+<polygon fill="#000000" stroke="#000000" points="468.23,-65.74 477.47,-60.57 467.02,-58.84 468.23,-65.74"/>
 </g>
 <!-- proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie -->
 <g id="proc~~orbel_scget~~CalledByGraph_edge11" class="edge">
 <title>proc~orbel_ehybrid&#45;&gt;proc~orbel_ehie</title>
-<path fill="none" stroke="#000000" d="M415.15,-104.92C429.89,-96.25 450.45,-84.47 469,-75 472.06,-73.44 475.27,-71.86 478.5,-70.31"/>
-<polygon fill="#000000" stroke="#000000" points="480.01,-73.47 487.57,-66.05 477.03,-67.13 480.01,-73.47"/>
-</g>
-<!-- proc~drift_kepu -->
-<g id="proc~~orbel_scget~~CalledByGraph_node9" class="node">
-<title>proc~drift_kepu</title>
-<g id="a_proc~~orbel_scget~~CalledByGraph_node9"><a xlink:href=".././proc/drift_kepu.html" xlink:title="drift_kepu">
-<polygon fill="#d9534f" stroke="#d9534f" points="424,-24 364,-24 364,0 424,0 424,-24"/>
-<text text-anchor="middle" x="394" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_kepu</text>
-</a>
-</g>
-</g>
-<!-- proc~drift_kepu&#45;&gt;proc~drift_kepu_guess -->
-<g id="proc~~orbel_scget~~CalledByGraph_edge10" class="edge">
-<title>proc~drift_kepu&#45;&gt;proc~drift_kepu_guess</title>
-<path fill="none" stroke="#000000" d="M424.05,-12C434.56,-12 446.82,-12 458.87,-12"/>
-<polygon fill="#000000" stroke="#000000" points="458.9,-15.5 468.9,-12 458.9,-8.5 458.9,-15.5"/>
+<path fill="none" stroke="#000000" d="M415.15,-62.92C429.89,-54.25 450.45,-42.47 469,-33 472.06,-31.44 475.27,-29.86 478.5,-28.31"/>
+<polygon fill="#000000" stroke="#000000" points="480.01,-31.47 487.57,-24.05 477.03,-25.13 480.01,-31.47"/>
 </g>
 <!-- proc~orbel_el2xv_vec -->
 <g id="proc~~orbel_scget~~CalledByGraph_node10" class="node">
 <title>proc~orbel_el2xv_vec</title>
 <g id="a_proc~~orbel_scget~~CalledByGraph_node10"><a xlink:href=".././proc/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
-<polygon fill="#d9534f" stroke="#d9534f" points="216,-149 126,-149 126,-125 216,-125 216,-149"/>
-<text text-anchor="middle" x="171" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="216,-117 126,-117 126,-93 216,-93 216,-117"/>
+<text text-anchor="middle" x="171" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv -->
-<g id="proc~~orbel_scget~~CalledByGraph_edge9" class="edge">
+<g id="proc~~orbel_scget~~CalledByGraph_edge10" class="edge">
 <title>proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv</title>
-<path fill="none" stroke="#000000" d="M216.14,-137C224.63,-137 233.51,-137 241.95,-137"/>
-<polygon fill="#000000" stroke="#000000" points="241.97,-140.5 251.97,-137 241.97,-133.5 241.97,-140.5"/>
+<path fill="none" stroke="#000000" d="M216.14,-105C224.63,-105 233.51,-105 241.95,-105"/>
+<polygon fill="#000000" stroke="#000000" points="241.97,-108.5 251.97,-105 241.97,-101.5 241.97,-108.5"/>
 </g>
-<!-- proc~drift_dan -->
+<!-- interface~orbel_el2xv_vec -->
 <g id="proc~~orbel_scget~~CalledByGraph_node11" class="node">
-<title>proc~drift_dan</title>
-<g id="a_proc~~orbel_scget~~CalledByGraph_node11"><a xlink:href=".././proc/drift_dan.html" xlink:title="drift_dan">
-<polygon fill="#d9534f" stroke="#d9534f" points="313,-24 258,-24 258,0 313,0 313,-24"/>
-<text text-anchor="middle" x="285.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_dan</text>
+<title>interface~orbel_el2xv_vec</title>
+<g id="a_proc~~orbel_scget~~CalledByGraph_node11"><a xlink:href=".././interface/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
+<polygon fill="#a7506f" stroke="#a7506f" points="90,-117 0,-117 0,-93 90,-93 90,-117"/>
+<text text-anchor="middle" x="45" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
-<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
-<g id="proc~~orbel_scget~~CalledByGraph_edge13" class="edge">
-<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
-<path fill="none" stroke="#000000" d="M313.1,-12C325.37,-12 340.19,-12 353.72,-12"/>
-<polygon fill="#000000" stroke="#000000" points="353.75,-15.5 363.75,-12 353.75,-8.5 353.75,-15.5"/>
+<!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
+<g id="proc~~orbel_scget~~CalledByGraph_edge14" class="edge">
+<title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M90.07,-105C98.28,-105 106.96,-105 115.44,-105"/>
+<polygon fill="#000000" stroke="#000000" points="115.66,-108.5 125.66,-105 115.66,-101.5 115.66,-108.5"/>
 </g>
-<!-- interface~orbel_el2xv_vec -->
+<!-- proc~drift_dan -->
 <g id="proc~~orbel_scget~~CalledByGraph_node12" class="node">
-<title>interface~orbel_el2xv_vec</title>
-<g id="a_proc~~orbel_scget~~CalledByGraph_node12"><a xlink:href=".././interface/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
-<polygon fill="#a7506f" stroke="#a7506f" points="90,-149 0,-149 0,-125 90,-125 90,-149"/>
-<text text-anchor="middle" x="45" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
+<title>proc~drift_dan</title>
+<g id="a_proc~~orbel_scget~~CalledByGraph_node12"><a xlink:href=".././proc/drift_dan.html" xlink:title="drift_dan">
+<polygon fill="#d9534f" stroke="#d9534f" points="313,-188 258,-188 258,-164 313,-164 313,-188"/>
+<text text-anchor="middle" x="285.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_dan</text>
 </a>
 </g>
 </g>
-<!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
-<g id="proc~~orbel_scget~~CalledByGraph_edge14" class="edge">
-<title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M90.07,-137C98.28,-137 106.96,-137 115.44,-137"/>
-<polygon fill="#000000" stroke="#000000" points="115.66,-140.5 125.66,-137 115.66,-133.5 115.66,-140.5"/>
+<!-- proc~drift_dan&#45;&gt;proc~drift_kepu -->
+<g id="proc~~orbel_scget~~CalledByGraph_edge12" class="edge">
+<title>proc~drift_dan&#45;&gt;proc~drift_kepu</title>
+<path fill="none" stroke="#000000" d="M313.1,-176C325.37,-176 340.19,-176 353.72,-176"/>
+<polygon fill="#000000" stroke="#000000" points="353.75,-179.5 363.75,-176 353.75,-172.5 353.75,-179.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/orbel_schget.html b/docs/proc/orbel_schget.html
index 4980bc4fd..7c8754615 100644
--- a/docs/proc/orbel_schget.html
+++ b/docs/proc/orbel_schget.html
@@ -301,72 +301,72 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="637,-44 563,-44 563,-20 637,-20 637,-44"/>
 <text text-anchor="middle" x="600" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">orbel_schget</text>
 </g>
-<!-- proc~orbel_el2xv -->
+<!-- proc~orbel_fget -->
 <g id="proc~~orbel_schget~~CalledByGraph_node2" class="node">
+<title>proc~orbel_fget</title>
+<g id="a_proc~~orbel_schget~~CalledByGraph_node2"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="527,-24 466,-24 466,0 527,0 527,-24"/>
+<text text-anchor="middle" x="496.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
+</a>
+</g>
+</g>
+<!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
+<g id="proc~~orbel_schget~~CalledByGraph_edge1" class="edge">
+<title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
+<path fill="none" stroke="#000000" d="M527.13,-17.84C535.12,-19.41 543.96,-21.16 552.63,-22.86"/>
+<polygon fill="#000000" stroke="#000000" points="552.18,-26.34 562.67,-24.84 553.53,-19.47 552.18,-26.34"/>
+</g>
+<!-- proc~orbel_el2xv -->
+<g id="proc~~orbel_schget~~CalledByGraph_node3" class="node">
 <title>proc~orbel_el2xv</title>
-<g id="a_proc~~orbel_schget~~CalledByGraph_node2"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
+<g id="a_proc~~orbel_schget~~CalledByGraph_node3"><a xlink:href=".././proc/orbel_el2xv.html" xlink:title="orbel_el2xv">
 <polygon fill="#d9534f" stroke="#d9534f" points="319,-44 252,-44 252,-20 319,-20 319,-44"/>
 <text text-anchor="middle" x="285.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv&#45;&gt;proc~orbel_schget -->
-<g id="proc~~orbel_schget~~CalledByGraph_edge1" class="edge">
+<g id="proc~~orbel_schget~~CalledByGraph_edge2" class="edge">
 <title>proc~orbel_el2xv&#45;&gt;proc~orbel_schget</title>
 <path fill="none" stroke="#000000" d="M319.25,-32.58C330.57,-32.75 343.34,-32.91 355,-33 431.44,-33.56 450.56,-33.53 527,-33 535.27,-32.94 544.06,-32.85 552.57,-32.74"/>
 <polygon fill="#000000" stroke="#000000" points="552.79,-36.24 562.74,-32.6 552.7,-29.24 552.79,-36.24"/>
 </g>
 <!-- proc~orbel_fhybrid -->
-<g id="proc~~orbel_schget~~CalledByGraph_node4" class="node">
+<g id="proc~~orbel_schget~~CalledByGraph_node5" class="node">
 <title>proc~orbel_fhybrid</title>
-<g id="a_proc~~orbel_schget~~CalledByGraph_node4"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
+<g id="a_proc~~orbel_schget~~CalledByGraph_node5"><a xlink:href=".././proc/orbel_fhybrid.html" xlink:title="orbel_fhybrid">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="430,-24 355,-24 355,0 430,0 430,-24"/>
 <text text-anchor="middle" x="392.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fhybrid</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid -->
-<g id="proc~~orbel_schget~~CalledByGraph_edge5" class="edge">
+<g id="proc~~orbel_schget~~CalledByGraph_edge6" class="edge">
 <title>proc~orbel_el2xv&#45;&gt;proc~orbel_fhybrid</title>
 <path fill="none" stroke="#000000" d="M319.15,-25.78C327.28,-24.23 336.16,-22.54 344.83,-20.89"/>
 <polygon fill="#000000" stroke="#000000" points="345.68,-24.29 354.85,-18.98 344.37,-17.41 345.68,-24.29"/>
 </g>
-<!-- proc~orbel_fget -->
-<g id="proc~~orbel_schget~~CalledByGraph_node3" class="node">
-<title>proc~orbel_fget</title>
-<g id="a_proc~~orbel_schget~~CalledByGraph_node3"><a xlink:href=".././proc/orbel_fget.html" xlink:title="orbel_fget">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="527,-24 466,-24 466,0 527,0 527,-24"/>
-<text text-anchor="middle" x="496.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_fget</text>
-</a>
-</g>
-</g>
-<!-- proc~orbel_fget&#45;&gt;proc~orbel_schget -->
-<g id="proc~~orbel_schget~~CalledByGraph_edge2" class="edge">
-<title>proc~orbel_fget&#45;&gt;proc~orbel_schget</title>
-<path fill="none" stroke="#000000" d="M527.13,-17.84C535.12,-19.41 543.96,-21.16 552.63,-22.86"/>
-<polygon fill="#000000" stroke="#000000" points="552.18,-26.34 562.67,-24.84 553.53,-19.47 552.18,-26.34"/>
-</g>
-<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
-<g id="proc~~orbel_schget~~CalledByGraph_edge4" class="edge">
-<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
-<path fill="none" stroke="#000000" d="M430.04,-12C438.41,-12 447.35,-12 455.84,-12"/>
-<polygon fill="#000000" stroke="#000000" points="455.92,-15.5 465.92,-12 455.92,-8.5 455.92,-15.5"/>
-</g>
 <!-- proc~orbel_el2xv_vec -->
-<g id="proc~~orbel_schget~~CalledByGraph_node5" class="node">
+<g id="proc~~orbel_schget~~CalledByGraph_node4" class="node">
 <title>proc~orbel_el2xv_vec</title>
-<g id="a_proc~~orbel_schget~~CalledByGraph_node5"><a xlink:href=".././proc/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
+<g id="a_proc~~orbel_schget~~CalledByGraph_node4"><a xlink:href=".././proc/orbel_el2xv_vec.html" xlink:title="orbel_el2xv_vec">
 <polygon fill="#d9534f" stroke="#d9534f" points="216,-44 126,-44 126,-20 216,-20 216,-44"/>
 <text text-anchor="middle" x="171" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_el2xv_vec</text>
 </a>
 </g>
 </g>
 <!-- proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv -->
-<g id="proc~~orbel_schget~~CalledByGraph_edge3" class="edge">
+<g id="proc~~orbel_schget~~CalledByGraph_edge4" class="edge">
 <title>proc~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv</title>
 <path fill="none" stroke="#000000" d="M216.14,-32C224.63,-32 233.51,-32 241.95,-32"/>
 <polygon fill="#000000" stroke="#000000" points="241.97,-35.5 251.97,-32 241.97,-28.5 241.97,-35.5"/>
 </g>
+<!-- proc~orbel_fhybrid&#45;&gt;proc~orbel_fget -->
+<g id="proc~~orbel_schget~~CalledByGraph_edge3" class="edge">
+<title>proc~orbel_fhybrid&#45;&gt;proc~orbel_fget</title>
+<path fill="none" stroke="#000000" d="M430.04,-12C438.41,-12 447.35,-12 455.84,-12"/>
+<polygon fill="#000000" stroke="#000000" points="455.92,-15.5 465.92,-12 455.92,-8.5 455.92,-15.5"/>
+</g>
 <!-- interface~orbel_el2xv_vec -->
 <g id="proc~~orbel_schget~~CalledByGraph_node6" class="node">
 <title>interface~orbel_el2xv_vec</title>
@@ -377,7 +377,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec -->
-<g id="proc~~orbel_schget~~CalledByGraph_edge6" class="edge">
+<g id="proc~~orbel_schget~~CalledByGraph_edge5" class="edge">
 <title>interface~orbel_el2xv_vec&#45;&gt;proc~orbel_el2xv_vec</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M90.07,-32C98.28,-32 106.96,-32 115.44,-32"/>
 <polygon fill="#000000" stroke="#000000" points="115.66,-35.5 125.66,-32 115.66,-28.5 115.66,-35.5"/>
diff --git a/docs/proc/rmvs_chk_ind.html b/docs/proc/rmvs_chk_ind.html
index 9f9237e94..3a1869f7e 100644
--- a/docs/proc/rmvs_chk_ind.html
+++ b/docs/proc/rmvs_chk_ind.html
@@ -117,7 +117,7 @@
   
   <div class="row">
     <h1>rmvs_chk_ind
-      <small>Module Function</small>
+      <small>Module Subroutine</small>
     
     </h1>
     
@@ -136,7 +136,7 @@ <h1>rmvs_chk_ind
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">22 statements</a>
+    title=" 0.0% of total for procedures.">24 statements</a>
      </li> 
      
      
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-elemental module function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag)
+pure module subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr)
     
     
    <a href='../interface/rmvs_chk_ind.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -238,12 +238,12 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-r2~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~9"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>r2</strong></td><td></td>
+  <td><strong>xr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -253,12 +253,12 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-v2~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~9"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>v2</strong></td><td></td>
+  <td><strong>yr</strong></td><td><p>Relative distance vector components</p></td>
   
 </tr>
 
@@ -268,12 +268,57 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vdotr~2"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~9"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>vdotr</strong></td><td></td>
+  <td><strong>zr</strong></td><td><p>Relative distance vector components</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-vxr~5"></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vxr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-vyr~5"></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vyr</strong></td><td><p>Relative velocity vector components</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-vzr~5"></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>vzr</strong></td><td><p>Relative velocity vector components</p></td>
   
 </tr>
 
@@ -288,7 +333,7 @@ <h3>Arguments</h3>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>dt</strong></td><td></td>
+  <td><strong>dt</strong></td><td><p>Step size</p></td>
   
 </tr>
 
@@ -303,7 +348,37 @@ <h3>Arguments</h3>
   <td></td>
   
   <td></td><td>::</td>
-  <td><strong>r2crit</strong></td><td></td>
+  <td><strong>r2crit</strong></td><td><p>Square of the critical encounter distance</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-lencounter~8"></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lencounter</strong></td><td><p>Flag indicating that an encounter has occurred</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-lvdotr~6"></span>logical,</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>lvdotr</strong></td><td><p>Logical flag indicating the direction of the v .dot. r vector</p></td>
   
 </tr>
 
@@ -313,15 +388,6 @@ <h3>Arguments</h3>
     
     
     
-    
-    
-    
-    
-   <h3>Return Value <small><span class="anchor" id="variable-lflag~3"></span>logical
-  </small></h3>
-    
-    
-    
     <br>
     
     
@@ -337,91 +403,31 @@ <h3 class="panel-title">Called by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~rmvs_chk_ind~~CalledByGraph Pages: 1 -->
-<svg id="procrmvs_chk_indCalledByGraph" width="586pt" height="74pt"
- viewBox="0.00 0.00 586.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~rmvs_chk_ind~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
+<svg id="procrmvs_chk_indCalledByGraph" width="202pt" height="32pt"
+ viewBox="0.00 0.00 202.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~rmvs_chk_ind~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~rmvs_chk_ind~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 582,-70 582,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 198,-28 198,4 -4,4"/>
 <!-- proc~rmvs_chk_ind -->
 <g id="proc~~rmvs_chk_ind~~CalledByGraph_node1" class="node">
 <title>proc~rmvs_chk_ind</title>
-<polygon fill="none" stroke="black" points="578,-45 499,-45 499,-21 578,-21 578,-45"/>
-<text text-anchor="middle" x="538.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_chk_ind</text>
+<polygon fill="none" stroke="black" points="194,-24 115,-24 115,0 194,0 194,-24"/>
+<text text-anchor="middle" x="154.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_chk_ind</text>
 </g>
 <!-- interface~rmvs_chk_ind -->
 <g id="proc~~rmvs_chk_ind~~CalledByGraph_node2" class="node">
 <title>interface~rmvs_chk_ind</title>
 <g id="a_proc~~rmvs_chk_ind~~CalledByGraph_node2"><a xlink:href=".././interface/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#a7506f" stroke="#a7506f" points="463,-45 384,-45 384,-21 463,-21 463,-45"/>
-<text text-anchor="middle" x="423.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="79,-24 0,-24 0,0 79,0 79,-24"/>
+<text text-anchor="middle" x="39.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
 </a>
 </g>
 </g>
 <!-- interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind -->
 <g id="proc~~rmvs_chk_ind~~CalledByGraph_edge1" class="edge">
 <title>interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M463.07,-33C471.25,-33 480,-33 488.51,-33"/>
-<polygon fill="#000000" stroke="#000000" points="488.72,-36.5 498.72,-33 488.72,-29.5 488.72,-36.5"/>
-</g>
-<!-- proc~rmvs_encounter_check_tp -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_node3" class="node">
-<title>proc~rmvs_encounter_check_tp</title>
-<g id="a_proc~~rmvs_chk_ind~~CalledByGraph_node3"><a xlink:href=".././proc/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="339.5,-66 200.5,-66 200.5,-42 339.5,-42 339.5,-66"/>
-<text text-anchor="middle" x="270" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
-</a>
-</g>
-</g>
-<!-- proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_edge2" class="edge">
-<title>proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M339.66,-44.48C351.17,-42.89 362.9,-41.26 373.77,-39.75"/>
-<polygon fill="#000000" stroke="#000000" points="374.48,-43.19 383.9,-38.35 373.52,-36.26 374.48,-43.19"/>
-</g>
-<!-- proc~symba_encounter_check_one -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_node4" class="node">
-<title>proc~symba_encounter_check_one</title>
-<g id="a_proc~~rmvs_chk_ind~~CalledByGraph_node4"><a xlink:href=".././proc/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
-<polygon fill="#d9534f" stroke="#d9534f" points="348,-24 192,-24 192,0 348,0 348,-24"/>
-<text text-anchor="middle" x="270" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
-</a>
-</g>
-</g>
-<!-- proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_edge3" class="edge">
-<title>proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M348.08,-22.68C356.82,-23.9 365.53,-25.1 373.76,-26.24"/>
-<polygon fill="#000000" stroke="#000000" points="373.49,-29.74 383.88,-27.65 374.45,-22.81 373.49,-29.74"/>
-</g>
-<!-- interface~symba_encounter_check_one -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_node5" class="node">
-<title>interface~symba_encounter_check_one</title>
-<g id="a_proc~~rmvs_chk_ind~~CalledByGraph_node5"><a xlink:href=".././interface/symba_encounter_check_one.html" xlink:title="symba_encounter_check_one">
-<polygon fill="#a7506f" stroke="#a7506f" points="156,-24 0,-24 0,0 156,0 156,-24"/>
-<text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_one</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_edge5" class="edge">
-<title>interface~symba_encounter_check_one&#45;&gt;proc~symba_encounter_check_one</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.01,-12C164.51,-12 173.21,-12 181.83,-12"/>
-<polygon fill="#000000" stroke="#000000" points="181.88,-15.5 191.88,-12 181.88,-8.5 181.88,-15.5"/>
-</g>
-<!-- interface~rmvs_encounter_check_tp -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_node6" class="node">
-<title>interface~rmvs_encounter_check_tp</title>
-<g id="a_proc~~rmvs_chk_ind~~CalledByGraph_node6"><a xlink:href=".././interface/rmvs_encounter_check_tp.html" xlink:title="rmvs_encounter_check_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="147.5,-66 8.5,-66 8.5,-42 147.5,-42 147.5,-66"/>
-<text text-anchor="middle" x="78" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp -->
-<g id="proc~~rmvs_chk_ind~~CalledByGraph_edge4" class="edge">
-<title>interface~rmvs_encounter_check_tp&#45;&gt;proc~rmvs_encounter_check_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.59,-54C161.37,-54 175.94,-54 190.03,-54"/>
-<polygon fill="#000000" stroke="#000000" points="190.19,-57.5 200.19,-54 190.19,-50.5 190.19,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M79.07,-12C87.25,-12 96,-12 104.51,-12"/>
+<polygon fill="#000000" stroke="#000000" points="104.72,-15.5 114.72,-12 104.72,-8.5 104.72,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_encounter_check_tp.html b/docs/proc/rmvs_encounter_check_tp.html
index 3ec67f82b..91a5f0f06 100644
--- a/docs/proc/rmvs_encounter_check_tp.html
+++ b/docs/proc/rmvs_encounter_check_tp.html
@@ -287,7 +287,7 @@ <h3>Arguments</h3>
     
     
     
-   <h3>Return Value <small><span class="anchor" id="variable-lencounter~6"></span>logical
+   <h3>Return Value <small><span class="anchor" id="variable-lencounter~7"></span>logical
   </small></h3>
     <p>Returns true if there is at least one close encounter</p>
     
@@ -295,122 +295,6 @@ <h3>Return Value <small><span class="anchor" id="variable-lencounter~6"></span>l
     <br>
     
     
-    <div class="panel panel-default">
-      <div class="panel-heading">
-  <h3 class="panel-title">Calls</h3>
-      </div>
-      <div class="panel-body">
-  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.47.1 (20210417.1919)
- -->
-<!-- Title: proc~~rmvs_encounter_check_tp~~CallsGraph Pages: 1 -->
-<svg id="procrmvs_encounter_check_tpCallsGraph" width="377pt" height="32pt"
- viewBox="0.00 0.00 377.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~rmvs_encounter_check_tp~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
-<title>proc~~rmvs_encounter_check_tp~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 373,-28 373,4 -4,4"/>
-<!-- proc~rmvs_encounter_check_tp -->
-<g id="proc~~rmvs_encounter_check_tp~~CallsGraph_node1" class="node">
-<title>proc~rmvs_encounter_check_tp</title>
-<polygon fill="none" stroke="black" points="139,-24 0,-24 0,0 139,0 139,-24"/>
-<text text-anchor="middle" x="69.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_encounter_check_tp</text>
-</g>
-<!-- interface~rmvs_chk_ind -->
-<g id="proc~~rmvs_encounter_check_tp~~CallsGraph_node2" class="node">
-<title>interface~rmvs_chk_ind</title>
-<g id="a_proc~~rmvs_encounter_check_tp~~CallsGraph_node2"><a xlink:href=".././interface/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#a7506f" stroke="#a7506f" points="254,-24 175,-24 175,0 254,0 254,-24"/>
-<text text-anchor="middle" x="214.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
-</g>
-<!-- proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind -->
-<g id="proc~~rmvs_encounter_check_tp~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_encounter_check_tp&#45;&gt;interface~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" d="M139.07,-12C147.74,-12 156.46,-12 164.74,-12"/>
-<polygon fill="#000000" stroke="#000000" points="164.93,-15.5 174.93,-12 164.93,-8.5 164.93,-15.5"/>
-</g>
-<!-- proc~rmvs_chk_ind -->
-<g id="proc~~rmvs_encounter_check_tp~~CallsGraph_node3" class="node">
-<title>proc~rmvs_chk_ind</title>
-<g id="a_proc~~rmvs_encounter_check_tp~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="369,-24 290,-24 290,0 369,0 369,-24"/>
-<text text-anchor="middle" x="329.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
-</g>
-<!-- interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind -->
-<g id="proc~~rmvs_encounter_check_tp~~CallsGraph_edge2" class="edge">
-<title>interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M254.07,-12C262.25,-12 271,-12 279.51,-12"/>
-<polygon fill="#000000" stroke="#000000" points="279.72,-15.5 289.72,-12 279.72,-8.5 279.72,-15.5"/>
-</g>
-</g>
-</svg>
-</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
-    <p>Nodes of different colours represent the following: </p>
-    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
-<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
- "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
-<!-- Generated by graphviz version 2.47.1 (20210417.1919)
- -->
-<!-- Title: Graph Key Pages: 1 -->
-<svg width="560pt" height="32pt"
- viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
-<title>Graph Key</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
-<!-- Subroutine -->
-<g id="node1" class="node">
-<title>Subroutine</title>
-<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
-<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
-</g>
-<!-- Function -->
-<g id="node2" class="node">
-<title>Function</title>
-<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
-<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
-</g>
-<!-- Interface -->
-<g id="node3" class="node">
-<title>Interface</title>
-<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
-<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
-</g>
-<!-- Unknown Procedure Type -->
-<g id="node4" class="node">
-<title>Unknown Procedure Type</title>
-<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
-<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
-</g>
-<!-- Program -->
-<g id="node5" class="node">
-<title>Program</title>
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
-<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
-</g>
-<!-- This Page&#39;s Entity -->
-<g id="node6" class="node">
-<title>This Page&#39;s Entity</title>
-<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
-<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
-</g>
-</g>
-</svg>
-
-    
-    <p>Solid arrows point from a procedure to one which it calls. Dashed 
-    arrows point from an interface to procedures which implement that interface.
-    This could include the module procedures in a generic interface or the
-    implementation in a submodule of an interface in a parent module.
-    </p>
-    </div></div></div></div>
-      </div>
-    </div>
-     
      
     <div class="panel panel-default">
       <div class="panel-heading">
diff --git a/docs/proc/rmvs_interp_in.html b/docs/proc/rmvs_interp_in.html
index a654030b6..5c591f0a3 100644
--- a/docs/proc/rmvs_interp_in.html
+++ b/docs/proc/rmvs_interp_in.html
@@ -136,7 +136,7 @@ <h1>rmvs_interp_in
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">102 statements</a>
+    title=" 0.1% of total for procedures.">102 statements</a>
      </li> 
      
      
diff --git a/docs/proc/rmvs_io_write_encounter.html b/docs/proc/rmvs_io_write_encounter.html
index f72bd2e89..a383a717a 100644
--- a/docs/proc/rmvs_io_write_encounter.html
+++ b/docs/proc/rmvs_io_write_encounter.html
@@ -451,7 +451,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="237.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
 <!-- proc~rmvs_io_write_encounter&#45;&gt;util_exit -->
-<g id="proc~~rmvs_io_write_encounter~~CallsGraph_edge2" class="edge">
+<g id="proc~~rmvs_io_write_encounter~~CallsGraph_edge1" class="edge">
 <title>proc~rmvs_io_write_encounter&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M133.32,-41.18C156.11,-44.01 180.8,-47.08 200.31,-49.5"/>
 <polygon fill="#000000" stroke="#000000" points="199.93,-52.98 210.29,-50.74 200.8,-46.04 199.93,-52.98"/>
@@ -463,7 +463,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="237.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </g>
 <!-- proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter -->
-<g id="proc~~rmvs_io_write_encounter~~CallsGraph_edge1" class="edge">
+<g id="proc~~rmvs_io_write_encounter~~CallsGraph_edge2" class="edge">
 <title>proc~rmvs_io_write_encounter&#45;&gt;io_write_frame_encounter</title>
 <path fill="none" stroke="#000000" d="M133.32,-24.82C141.72,-23.78 150.37,-22.7 158.93,-21.64"/>
 <polygon fill="#000000" stroke="#000000" points="159.41,-25.11 168.91,-20.4 158.55,-18.16 159.41,-25.11"/>
diff --git a/docs/proc/rmvs_peri_tp.html b/docs/proc/rmvs_peri_tp.html
index e2cf37d7f..609145815 100644
--- a/docs/proc/rmvs_peri_tp.html
+++ b/docs/proc/rmvs_peri_tp.html
@@ -381,27 +381,27 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="75,-45 0,-45 0,-21 75,-21 75,-45"/>
 <text text-anchor="middle" x="37.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_peri_tp</text>
 </g>
-<!-- xpc -->
+<!-- vpc -->
 <g id="proc~~rmvs_peri_tp~~CallsGraph_node2" class="node">
-<title>xpc</title>
+<title>vpc</title>
 <polygon fill="#777777" stroke="#777777" points="165,-66 111,-66 111,-42 165,-42 165,-66"/>
-<text text-anchor="middle" x="138" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
+<text text-anchor="middle" x="138" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
 <g id="proc~~rmvs_peri_tp~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
+<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
 <path fill="none" stroke="#000000" d="M75.18,-40.82C83.58,-42.61 92.5,-44.51 100.88,-46.3"/>
 <polygon fill="#000000" stroke="#000000" points="100.24,-49.74 110.75,-48.4 101.7,-42.9 100.24,-49.74"/>
 </g>
-<!-- vpc -->
+<!-- xpc -->
 <g id="proc~~rmvs_peri_tp~~CallsGraph_node3" class="node">
-<title>vpc</title>
+<title>xpc</title>
 <polygon fill="#777777" stroke="#777777" points="165,-24 111,-24 111,0 165,0 165,-24"/>
-<text text-anchor="middle" x="138" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
+<text text-anchor="middle" x="138" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
 <g id="proc~~rmvs_peri_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
+<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
 <path fill="none" stroke="#000000" d="M75.18,-25.18C83.58,-23.39 92.5,-21.49 100.88,-19.7"/>
 <polygon fill="#000000" stroke="#000000" points="101.7,-23.1 110.75,-17.6 100.24,-16.26 101.7,-23.1"/>
 </g>
diff --git a/docs/proc/rmvs_setup_pl.html b/docs/proc/rmvs_setup_pl.html
index 28fb494cd..b04e11ce8 100644
--- a/docs/proc/rmvs_setup_pl.html
+++ b/docs/proc/rmvs_setup_pl.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~38"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~42"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/rmvs_setup_tp.html b/docs/proc/rmvs_setup_tp.html
index e729df5cc..6d5f3a2b7 100644
--- a/docs/proc/rmvs_setup_tp.html
+++ b/docs/proc/rmvs_setup_tp.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~39"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~43"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/rmvs_step_in.html b/docs/proc/rmvs_step_in.html
index 005bae66b..59c268e13 100644
--- a/docs/proc/rmvs_step_in.html
+++ b/docs/proc/rmvs_step_in.html
@@ -340,85 +340,85 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~rmvs_step_in~~CallsGraph Pages: 1 -->
-<svg id="procrmvs_step_inCallsGraph" width="351pt" height="137pt"
- viewBox="0.00 0.00 351.00 137.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~rmvs_step_in~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 133)">
+<svg id="procrmvs_step_inCallsGraph" width="351pt" height="116pt"
+ viewBox="0.00 0.00 351.00 116.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~rmvs_step_in~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 112)">
 <title>proc~~rmvs_step_in~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-133 347,-133 347,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-112 347,-112 347,4 -4,4"/>
 <!-- proc~rmvs_step_in -->
 <g id="proc~~rmvs_step_in~~CallsGraph_node1" class="node">
 <title>proc~rmvs_step_in</title>
 <polygon fill="none" stroke="black" points="76,-66 0,-66 0,-42 76,-42 76,-66"/>
 <text text-anchor="middle" x="38" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_step_in</text>
 </g>
-<!-- proc~rmvs_peri_tp -->
+<!-- proc~rmvs_make_planetocentric -->
 <g id="proc~~rmvs_step_in~~CallsGraph_node2" class="node">
-<title>proc~rmvs_peri_tp</title>
-<g id="a_proc~~rmvs_step_in~~CallsGraph_node2"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="220,-108 145,-108 145,-84 220,-84 220,-108"/>
-<text text-anchor="middle" x="182.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
+<title>proc~rmvs_make_planetocentric</title>
+<g id="a_proc~~rmvs_step_in~~CallsGraph_node2"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="253,-108 112,-108 112,-84 253,-84 253,-108"/>
+<text text-anchor="middle" x="182.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
 <g id="proc~~rmvs_step_in~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
-<path fill="none" stroke="#000000" d="M76.07,-64.93C94.05,-70.22 115.83,-76.64 134.92,-82.27"/>
-<polygon fill="#000000" stroke="#000000" points="134.04,-85.66 144.62,-85.13 136.01,-78.94 134.04,-85.66"/>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
+<path fill="none" stroke="#000000" d="M76.07,-64.93C92.77,-69.85 112.75,-75.74 130.81,-81.06"/>
+<polygon fill="#000000" stroke="#000000" points="130.02,-84.48 140.61,-83.95 132,-77.76 130.02,-84.48"/>
 </g>
-<!-- proc~rmvs_end_planetocentric -->
+<!-- proc~rmvs_peri_tp -->
 <g id="proc~~rmvs_step_in~~CallsGraph_node3" class="node">
-<title>proc~rmvs_end_planetocentric</title>
-<g id="a_proc~~rmvs_step_in~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="249,-66 116,-66 116,-42 249,-42 249,-66"/>
-<text text-anchor="middle" x="182.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
+<title>proc~rmvs_peri_tp</title>
+<g id="a_proc~~rmvs_step_in~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="220,-66 145,-66 145,-42 220,-42 220,-66"/>
+<text text-anchor="middle" x="182.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
 <g id="proc~~rmvs_step_in~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
-<path fill="none" stroke="#000000" d="M76.07,-54C85.22,-54 95.36,-54 105.63,-54"/>
-<polygon fill="#000000" stroke="#000000" points="105.91,-57.5 115.91,-54 105.91,-50.5 105.91,-57.5"/>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
+<path fill="none" stroke="#000000" d="M76.07,-54C93.88,-54 115.43,-54 134.39,-54"/>
+<polygon fill="#000000" stroke="#000000" points="134.62,-57.5 144.62,-54 134.62,-50.5 134.62,-57.5"/>
 </g>
-<!-- proc~rmvs_make_planetocentric -->
+<!-- proc~rmvs_end_planetocentric -->
 <g id="proc~~rmvs_step_in~~CallsGraph_node4" class="node">
-<title>proc~rmvs_make_planetocentric</title>
-<g id="a_proc~~rmvs_step_in~~CallsGraph_node4"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="253,-24 112,-24 112,0 253,0 253,-24"/>
-<text text-anchor="middle" x="182.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
+<title>proc~rmvs_end_planetocentric</title>
+<g id="a_proc~~rmvs_step_in~~CallsGraph_node4"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="249,-24 116,-24 116,0 249,0 249,-24"/>
+<text text-anchor="middle" x="182.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
 <g id="proc~~rmvs_step_in~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
 <path fill="none" stroke="#000000" d="M76.07,-43.07C92.77,-38.15 112.75,-32.26 130.81,-26.94"/>
 <polygon fill="#000000" stroke="#000000" points="132,-30.24 140.61,-24.05 130.02,-23.52 132,-30.24"/>
 </g>
-<!-- xpc -->
-<g id="proc~~rmvs_step_in~~CallsGraph_node5" class="node">
-<title>xpc</title>
-<polygon fill="#777777" stroke="#777777" points="343,-129 289,-129 289,-105 343,-105 343,-129"/>
-<text text-anchor="middle" x="316" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
-</g>
-<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
-<g id="proc~~rmvs_step_in~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
-<path fill="none" stroke="#000000" d="M220.13,-101.85C238.51,-104.79 260.7,-108.33 278.99,-111.25"/>
-<polygon fill="#000000" stroke="#000000" points="278.55,-114.72 288.98,-112.84 279.66,-107.81 278.55,-114.72"/>
-</g>
 <!-- vpc -->
-<g id="proc~~rmvs_step_in~~CallsGraph_node6" class="node">
+<g id="proc~~rmvs_step_in~~CallsGraph_node5" class="node">
 <title>vpc</title>
 <polygon fill="#777777" stroke="#777777" points="343,-87 289,-87 289,-63 343,-63 343,-87"/>
 <text text-anchor="middle" x="316" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
 </g>
 <!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
-<g id="proc~~rmvs_step_in~~CallsGraph_edge5" class="edge">
+<g id="proc~~rmvs_step_in~~CallsGraph_edge4" class="edge">
 <title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
-<path fill="none" stroke="#000000" d="M220.13,-90.15C238.51,-87.21 260.7,-83.67 278.99,-80.75"/>
-<polygon fill="#000000" stroke="#000000" points="279.66,-84.19 288.98,-79.16 278.55,-77.28 279.66,-84.19"/>
+<path fill="none" stroke="#000000" d="M220.13,-59.85C238.51,-62.79 260.7,-66.33 278.99,-69.25"/>
+<polygon fill="#000000" stroke="#000000" points="278.55,-72.72 288.98,-70.84 279.66,-65.81 278.55,-72.72"/>
+</g>
+<!-- xpc -->
+<g id="proc~~rmvs_step_in~~CallsGraph_node6" class="node">
+<title>xpc</title>
+<polygon fill="#777777" stroke="#777777" points="343,-45 289,-45 289,-21 343,-21 343,-45"/>
+<text text-anchor="middle" x="316" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
+</g>
+<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
+<g id="proc~~rmvs_step_in~~CallsGraph_edge5" class="edge">
+<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
+<path fill="none" stroke="#000000" d="M220.13,-48.15C238.51,-45.21 260.7,-41.67 278.99,-38.75"/>
+<polygon fill="#000000" stroke="#000000" points="279.66,-42.19 288.98,-37.16 278.55,-35.28 279.66,-42.19"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_step_out.html b/docs/proc/rmvs_step_out.html
index 3313f2ee5..f1d308a45 100644
--- a/docs/proc/rmvs_step_out.html
+++ b/docs/proc/rmvs_step_out.html
@@ -356,127 +356,127 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~rmvs_step_out~~CallsGraph Pages: 1 -->
-<svg id="procrmvs_step_outCallsGraph" width="477pt" height="179pt"
- viewBox="0.00 0.00 477.00 179.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~rmvs_step_out~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 175)">
+<svg id="procrmvs_step_outCallsGraph" width="477pt" height="158pt"
+ viewBox="0.00 0.00 477.00 158.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~rmvs_step_out~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 154)">
 <title>proc~~rmvs_step_out~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-175 473,-175 473,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-154 473,-154 473,4 -4,4"/>
 <!-- proc~rmvs_step_out -->
 <g id="proc~~rmvs_step_out~~CallsGraph_node1" class="node">
 <title>proc~rmvs_step_out</title>
-<polygon fill="none" stroke="black" points="83,-66 0,-66 0,-42 83,-42 83,-66"/>
-<text text-anchor="middle" x="41.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_step_out</text>
-</g>
-<!-- proc~rmvs_step_in -->
-<g id="proc~~rmvs_step_out~~CallsGraph_node2" class="node">
-<title>proc~rmvs_step_in</title>
-<g id="a_proc~~rmvs_step_out~~CallsGraph_node2"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="198.5,-97 122.5,-97 122.5,-73 198.5,-73 198.5,-97"/>
-<text text-anchor="middle" x="160.5" y="-82.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
-</a>
-</g>
-</g>
-<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
-<g id="proc~~rmvs_step_out~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
-<path fill="none" stroke="#000000" d="M83.09,-64.76C92.5,-67.25 102.59,-69.92 112.25,-72.48"/>
-<polygon fill="#000000" stroke="#000000" points="111.56,-75.92 122.12,-75.1 113.35,-69.15 111.56,-75.92"/>
+<polygon fill="none" stroke="black" points="83,-108 0,-108 0,-84 83,-84 83,-108"/>
+<text text-anchor="middle" x="41.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_step_out</text>
 </g>
 <!-- proc~rmvs_interp_in -->
-<g id="proc~~rmvs_step_out~~CallsGraph_node3" class="node">
+<g id="proc~~rmvs_step_out~~CallsGraph_node2" class="node">
 <title>proc~rmvs_interp_in</title>
-<g id="a_proc~~rmvs_step_out~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_interp_in.html" xlink:title="rmvs_interp_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="202,-45 119,-45 119,-21 202,-21 202,-45"/>
-<text text-anchor="middle" x="160.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
+<g id="a_proc~~rmvs_step_out~~CallsGraph_node2"><a xlink:href=".././proc/rmvs_interp_in.html" xlink:title="rmvs_interp_in">
+<polygon fill="#d9534f" stroke="#d9534f" points="202,-139 119,-139 119,-115 202,-115 202,-139"/>
+<text text-anchor="middle" x="160.5" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
 </a>
 </g>
 </g>
 <!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in -->
 <g id="proc~~rmvs_step_out~~CallsGraph_edge2" class="edge">
 <title>proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in</title>
-<path fill="none" stroke="#000000" d="M83.09,-46.71C91.44,-45.22 100.33,-43.62 108.98,-42.07"/>
-<polygon fill="#000000" stroke="#000000" points="109.75,-45.48 118.98,-40.27 108.52,-38.59 109.75,-45.48"/>
+<path fill="none" stroke="#000000" d="M83.09,-106.76C91.53,-108.99 100.52,-111.37 109.26,-113.69"/>
+<polygon fill="#000000" stroke="#000000" points="108.42,-117.09 118.98,-116.26 110.21,-110.32 108.42,-117.09"/>
 </g>
-<!-- proc~rmvs_peri_tp -->
-<g id="proc~~rmvs_step_out~~CallsGraph_node4" class="node">
-<title>proc~rmvs_peri_tp</title>
-<g id="a_proc~~rmvs_step_out~~CallsGraph_node4"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="346,-150 271,-150 271,-126 346,-126 346,-150"/>
-<text text-anchor="middle" x="308.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
+<!-- proc~rmvs_step_in -->
+<g id="proc~~rmvs_step_out~~CallsGraph_node3" class="node">
+<title>proc~rmvs_step_in</title>
+<g id="a_proc~~rmvs_step_out~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
+<polygon fill="#d9534f" stroke="#d9534f" points="198.5,-87 122.5,-87 122.5,-63 198.5,-63 198.5,-87"/>
+<text text-anchor="middle" x="160.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
+<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
+<g id="proc~~rmvs_step_out~~CallsGraph_edge1" class="edge">
+<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
+<path fill="none" stroke="#000000" d="M83.09,-88.71C92.5,-87.03 102.59,-85.22 112.25,-83.48"/>
+<polygon fill="#000000" stroke="#000000" points="112.89,-86.92 122.12,-81.71 111.66,-80.03 112.89,-86.92"/>
+</g>
+<!-- util_exit -->
+<g id="proc~~rmvs_step_out~~CallsGraph_node4" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="335.5,-150 281.5,-150 281.5,-126 335.5,-126 335.5,-150"/>
+<text text-anchor="middle" x="308.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
 <g id="proc~~rmvs_step_out~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
-<path fill="none" stroke="#000000" d="M188.5,-97.09C203.02,-103.39 221.33,-111.01 238,-117 245.42,-119.67 253.37,-122.28 261.14,-124.72"/>
-<polygon fill="#000000" stroke="#000000" points="260.25,-128.11 270.84,-127.69 262.3,-121.41 260.25,-128.11"/>
+<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M202.17,-130.06C223.82,-131.7 250.23,-133.69 271.19,-135.26"/>
+<polygon fill="#000000" stroke="#000000" points="271.06,-138.76 281.3,-136.03 271.59,-131.78 271.06,-138.76"/>
 </g>
-<!-- proc~rmvs_end_planetocentric -->
+<!-- proc~rmvs_make_planetocentric -->
 <g id="proc~~rmvs_step_out~~CallsGraph_node5" class="node">
-<title>proc~rmvs_end_planetocentric</title>
-<g id="a_proc~~rmvs_step_out~~CallsGraph_node5"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="375,-108 242,-108 242,-84 375,-84 375,-108"/>
-<text text-anchor="middle" x="308.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
+<title>proc~rmvs_make_planetocentric</title>
+<g id="a_proc~~rmvs_step_out~~CallsGraph_node5"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="379,-108 238,-108 238,-84 379,-84 379,-108"/>
+<text text-anchor="middle" x="308.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
 <g id="proc~~rmvs_step_out~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
-<path fill="none" stroke="#000000" d="M198.72,-87.8C208.91,-88.57 220.34,-89.43 231.86,-90.3"/>
-<polygon fill="#000000" stroke="#000000" points="231.74,-93.8 241.98,-91.06 232.27,-86.82 231.74,-93.8"/>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
+<path fill="none" stroke="#000000" d="M198.72,-80.35C207.72,-81.65 217.68,-83.08 227.81,-84.54"/>
+<polygon fill="#000000" stroke="#000000" points="227.58,-88.04 237.98,-86 228.58,-81.11 227.58,-88.04"/>
 </g>
-<!-- proc~rmvs_make_planetocentric -->
+<!-- proc~rmvs_peri_tp -->
 <g id="proc~~rmvs_step_out~~CallsGraph_node6" class="node">
-<title>proc~rmvs_make_planetocentric</title>
-<g id="a_proc~~rmvs_step_out~~CallsGraph_node6"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="379,-66 238,-66 238,-42 379,-42 379,-66"/>
-<text text-anchor="middle" x="308.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
+<title>proc~rmvs_peri_tp</title>
+<g id="a_proc~~rmvs_step_out~~CallsGraph_node6"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="346,-66 271,-66 271,-42 346,-42 346,-66"/>
+<text text-anchor="middle" x="308.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
 <g id="proc~~rmvs_step_out~~CallsGraph_edge5" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
-<path fill="none" stroke="#000000" d="M198.72,-77.1C211.56,-74.37 226.35,-71.23 240.82,-68.16"/>
-<polygon fill="#000000" stroke="#000000" points="241.69,-71.55 250.75,-66.05 240.24,-64.7 241.69,-71.55"/>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
+<path fill="none" stroke="#000000" d="M198.72,-69.65C217.57,-66.94 240.65,-63.62 260.69,-60.73"/>
+<polygon fill="#000000" stroke="#000000" points="261.45,-64.16 270.85,-59.27 260.46,-57.23 261.45,-64.16"/>
 </g>
-<!-- util_exit -->
+<!-- proc~rmvs_end_planetocentric -->
 <g id="proc~~rmvs_step_out~~CallsGraph_node7" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="335.5,-24 281.5,-24 281.5,0 335.5,0 335.5,-24"/>
-<text text-anchor="middle" x="308.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>proc~rmvs_end_planetocentric</title>
+<g id="a_proc~~rmvs_step_out~~CallsGraph_node7"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="375,-24 242,-24 242,0 375,0 375,-24"/>
+<text text-anchor="middle" x="308.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
+</a>
 </g>
-<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
+</g>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
 <g id="proc~~rmvs_step_out~~CallsGraph_edge6" class="edge">
-<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M202.17,-27.15C223.82,-24.04 250.23,-20.24 271.19,-17.22"/>
-<polygon fill="#000000" stroke="#000000" points="271.9,-20.66 281.3,-15.77 270.9,-13.73 271.9,-20.66"/>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
+<path fill="none" stroke="#000000" d="M180.75,-62.96C195.89,-53.85 217.75,-41.51 238,-33 242.74,-31.01 247.74,-29.11 252.79,-27.34"/>
+<polygon fill="#000000" stroke="#000000" points="254.15,-30.58 262.52,-24.09 251.93,-23.94 254.15,-30.58"/>
 </g>
-<!-- xpc -->
+<!-- vpc -->
 <g id="proc~~rmvs_step_out~~CallsGraph_node8" class="node">
-<title>xpc</title>
-<polygon fill="#777777" stroke="#777777" points="469,-171 415,-171 415,-147 469,-147 469,-171"/>
-<text text-anchor="middle" x="442" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
+<title>vpc</title>
+<polygon fill="#777777" stroke="#777777" points="469,-87 415,-87 415,-63 469,-63 469,-87"/>
+<text text-anchor="middle" x="442" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
 <g id="proc~~rmvs_step_out~~CallsGraph_edge7" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
-<path fill="none" stroke="#000000" d="M346.13,-143.85C364.51,-146.79 386.7,-150.33 404.99,-153.25"/>
-<polygon fill="#000000" stroke="#000000" points="404.55,-156.72 414.98,-154.84 405.66,-149.81 404.55,-156.72"/>
+<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
+<path fill="none" stroke="#000000" d="M346.13,-59.85C364.51,-62.79 386.7,-66.33 404.99,-69.25"/>
+<polygon fill="#000000" stroke="#000000" points="404.55,-72.72 414.98,-70.84 405.66,-65.81 404.55,-72.72"/>
 </g>
-<!-- vpc -->
+<!-- xpc -->
 <g id="proc~~rmvs_step_out~~CallsGraph_node9" class="node">
-<title>vpc</title>
-<polygon fill="#777777" stroke="#777777" points="469,-129 415,-129 415,-105 469,-105 469,-129"/>
-<text text-anchor="middle" x="442" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
+<title>xpc</title>
+<polygon fill="#777777" stroke="#777777" points="469,-45 415,-45 415,-21 469,-21 469,-45"/>
+<text text-anchor="middle" x="442" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
 <g id="proc~~rmvs_step_out~~CallsGraph_edge8" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
-<path fill="none" stroke="#000000" d="M346.13,-132.15C364.51,-129.21 386.7,-125.67 404.99,-122.75"/>
-<polygon fill="#000000" stroke="#000000" points="405.66,-126.19 414.98,-121.16 404.55,-119.28 405.66,-126.19"/>
+<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
+<path fill="none" stroke="#000000" d="M346.13,-48.15C364.51,-45.21 386.7,-41.67 404.99,-38.75"/>
+<polygon fill="#000000" stroke="#000000" points="405.66,-42.19 414.98,-37.16 404.55,-35.28 405.66,-42.19"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_step_system.html b/docs/proc/rmvs_step_system.html
index 052ffe9f4..e8c8b0501 100644
--- a/docs/proc/rmvs_step_system.html
+++ b/docs/proc/rmvs_step_system.html
@@ -312,11 +312,11 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~rmvs_step_system~~CallsGraph Pages: 1 -->
-<svg id="procrmvs_step_systemCallsGraph" width="640pt" height="218pt"
- viewBox="0.00 0.00 640.00 218.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~rmvs_step_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 214)">
+<svg id="procrmvs_step_systemCallsGraph" width="640pt" height="158pt"
+ viewBox="0.00 0.00 640.00 158.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~rmvs_step_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 154)">
 <title>proc~~rmvs_step_system~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-214 636,-214 636,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-154 636,-154 636,4 -4,4"/>
 <!-- proc~rmvs_step_system -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node1" class="node">
 <title>proc~rmvs_step_system</title>
@@ -327,160 +327,160 @@ <h3 class="panel-title">Calls</h3>
 <g id="proc~~rmvs_step_system~~CallsGraph_node2" class="node">
 <title>proc~rmvs_step_out</title>
 <g id="a_proc~~rmvs_step_system~~CallsGraph_node2"><a xlink:href=".././proc/rmvs_step_out.html" xlink:title="rmvs_step_out">
-<polygon fill="#d9534f" stroke="#d9534f" points="230,-105 147,-105 147,-81 230,-81 230,-105"/>
-<text text-anchor="middle" x="188.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_out</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="230,-106 147,-106 147,-82 230,-82 230,-106"/>
+<text text-anchor="middle" x="188.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_out</text>
 </a>
 </g>
 </g>
 <!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out -->
 <g id="proc~~rmvs_step_system~~CallsGraph_edge1" class="edge">
 <title>proc~rmvs_step_system&#45;&gt;proc~rmvs_step_out</title>
-<path fill="none" stroke="#000000" d="M91.92,-64.08C106.27,-68.42 122.62,-73.37 137.7,-77.93"/>
-<polygon fill="#000000" stroke="#000000" points="136.81,-81.32 147.4,-80.87 138.84,-74.62 136.81,-81.32"/>
-</g>
-<!-- proc~rmvs_interp_out -->
-<g id="proc~~rmvs_step_system~~CallsGraph_node3" class="node">
-<title>proc~rmvs_interp_out</title>
-<g id="a_proc~~rmvs_step_system~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_interp_out.html" xlink:title="rmvs_interp_out">
-<polygon fill="#d9534f" stroke="#d9534f" points="365,-63 275,-63 275,-39 365,-39 365,-63"/>
-<text text-anchor="middle" x="320" y="-48.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_out</text>
-</a>
-</g>
-</g>
-<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out -->
-<g id="proc~~rmvs_step_system~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out</title>
-<path fill="none" stroke="#000000" d="M102.22,-51.81C148.52,-51.64 217.08,-51.38 264.65,-51.2"/>
-<polygon fill="#000000" stroke="#000000" points="264.78,-54.7 274.76,-51.17 264.75,-47.7 264.78,-54.7"/>
+<path fill="none" stroke="#000000" d="M90.83,-64.04C105.85,-68.69 123.21,-74.07 139.04,-78.98"/>
+<polygon fill="#000000" stroke="#000000" points="138.08,-82.35 148.67,-81.96 140.15,-75.66 138.08,-82.35"/>
 </g>
 <!-- whm_step_system -->
-<g id="proc~~rmvs_step_system~~CallsGraph_node4" class="node">
+<g id="proc~~rmvs_step_system~~CallsGraph_node3" class="node">
 <title>whm_step_system</title>
-<polygon fill="#777777" stroke="#777777" points="239,-24 138,-24 138,0 239,0 239,-24"/>
-<text text-anchor="middle" x="188.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
+<polygon fill="#777777" stroke="#777777" points="239,-64 138,-64 138,-40 239,-40 239,-64"/>
+<text text-anchor="middle" x="188.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step_system</text>
 </g>
 <!-- proc~rmvs_step_system&#45;&gt;whm_step_system -->
-<g id="proc~~rmvs_step_system~~CallsGraph_edge3" class="edge">
+<g id="proc~~rmvs_step_system~~CallsGraph_edge2" class="edge">
 <title>proc~rmvs_step_system&#45;&gt;whm_step_system</title>
-<path fill="none" stroke="#000000" d="M92.65,-40C106.46,-35.92 122.07,-31.32 136.57,-27.03"/>
-<polygon fill="#000000" stroke="#000000" points="137.81,-30.32 146.41,-24.13 135.82,-23.61 137.81,-30.32"/>
+<path fill="none" stroke="#000000" d="M102.07,-52C110.32,-52 118.95,-52 127.42,-52"/>
+<polygon fill="#000000" stroke="#000000" points="127.64,-55.5 137.64,-52 127.64,-48.5 127.64,-55.5"/>
 </g>
-<!-- proc~rmvs_step_in -->
-<g id="proc~~rmvs_step_system~~CallsGraph_node5" class="node">
-<title>proc~rmvs_step_in</title>
-<g id="a_proc~~rmvs_step_system~~CallsGraph_node5"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="358,-147 282,-147 282,-123 358,-123 358,-147"/>
-<text text-anchor="middle" x="320" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
+<!-- proc~rmvs_interp_out -->
+<g id="proc~~rmvs_step_system~~CallsGraph_node4" class="node">
+<title>proc~rmvs_interp_out</title>
+<g id="a_proc~~rmvs_step_system~~CallsGraph_node4"><a xlink:href=".././proc/rmvs_interp_out.html" xlink:title="rmvs_interp_out">
+<polygon fill="#d9534f" stroke="#d9534f" points="365,-24 275,-24 275,0 365,0 365,-24"/>
+<text text-anchor="middle" x="320" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_out</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
-<g id="proc~~rmvs_step_system~~CallsGraph_edge4" class="edge">
-<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
-<path fill="none" stroke="#000000" d="M226.61,-105.04C240.83,-109.65 257.25,-114.97 272.26,-119.84"/>
-<polygon fill="#000000" stroke="#000000" points="271.29,-123.21 281.89,-122.96 273.45,-116.55 271.29,-123.21"/>
+<!-- proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out -->
+<g id="proc~~rmvs_step_system~~CallsGraph_edge3" class="edge">
+<title>proc~rmvs_step_system&#45;&gt;proc~rmvs_interp_out</title>
+<path fill="none" stroke="#000000" d="M96.4,-39.95C109.7,-36.67 124.37,-33.37 138,-31 180.22,-23.66 228.5,-18.77 264.57,-15.79"/>
+<polygon fill="#000000" stroke="#000000" points="265.19,-19.25 274.88,-14.96 264.63,-12.27 265.19,-19.25"/>
 </g>
 <!-- proc~rmvs_interp_in -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node6" class="node">
 <title>proc~rmvs_interp_in</title>
 <g id="a_proc~~rmvs_step_system~~CallsGraph_node6"><a xlink:href=".././proc/rmvs_interp_in.html" xlink:title="rmvs_interp_in">
-<polygon fill="#d9534f" stroke="#d9534f" points="361.5,-105 278.5,-105 278.5,-81 361.5,-81 361.5,-105"/>
-<text text-anchor="middle" x="320" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="361.5,-66 278.5,-66 278.5,-42 361.5,-42 361.5,-66"/>
+<text text-anchor="middle" x="320" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp_in</text>
 </a>
 </g>
 </g>
 <!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in -->
 <g id="proc~~rmvs_step_system~~CallsGraph_edge5" class="edge">
 <title>proc~rmvs_step_out&#45;&gt;proc~rmvs_interp_in</title>
-<path fill="none" stroke="#000000" d="M230.12,-93C242.06,-93 255.27,-93 267.78,-93"/>
-<polygon fill="#000000" stroke="#000000" points="268.08,-96.5 278.08,-93 268.08,-89.5 268.08,-96.5"/>
+<path fill="none" stroke="#000000" d="M228.35,-82C241.42,-77.96 256.18,-73.4 269.93,-69.16"/>
+<polygon fill="#000000" stroke="#000000" points="271.2,-72.43 279.73,-66.13 269.14,-65.74 271.2,-72.43"/>
 </g>
-<!-- util_exit -->
+<!-- proc~rmvs_step_in -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node7" class="node">
+<title>proc~rmvs_step_in</title>
+<g id="a_proc~~rmvs_step_system~~CallsGraph_node7"><a xlink:href=".././proc/rmvs_step_in.html" xlink:title="rmvs_step_in">
+<polygon fill="#d9534f" stroke="#d9534f" points="358,-108 282,-108 282,-84 358,-84 358,-108"/>
+<text text-anchor="middle" x="320" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step_in</text>
+</a>
+</g>
+</g>
+<!-- proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in -->
+<g id="proc~~rmvs_step_system~~CallsGraph_edge4" class="edge">
+<title>proc~rmvs_step_out&#45;&gt;proc~rmvs_step_in</title>
+<path fill="none" stroke="#000000" d="M230.12,-94.63C243.24,-94.83 257.91,-95.06 271.48,-95.27"/>
+<polygon fill="#000000" stroke="#000000" points="271.55,-98.77 281.61,-95.42 271.66,-91.77 271.55,-98.77"/>
+</g>
+<!-- util_exit -->
+<g id="proc~~rmvs_step_system~~CallsGraph_node5" class="node">
 <title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="498.5,-63 444.5,-63 444.5,-39 498.5,-39 498.5,-63"/>
-<text text-anchor="middle" x="471.5" y="-48.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<polygon fill="#777777" stroke="#777777" points="498.5,-24 444.5,-24 444.5,0 498.5,0 498.5,-24"/>
+<text text-anchor="middle" x="471.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
 <!-- proc~rmvs_interp_out&#45;&gt;util_exit -->
 <g id="proc~~rmvs_step_system~~CallsGraph_edge6" class="edge">
 <title>proc~rmvs_interp_out&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M365.05,-51C387,-51 413.24,-51 434.05,-51"/>
-<polygon fill="#000000" stroke="#000000" points="434.08,-54.5 444.08,-51 434.08,-47.5 434.08,-54.5"/>
+<path fill="none" stroke="#000000" d="M365.05,-12C387,-12 413.24,-12 434.05,-12"/>
+<polygon fill="#000000" stroke="#000000" points="434.08,-15.5 444.08,-12 434.08,-8.5 434.08,-15.5"/>
 </g>
-<!-- proc~rmvs_peri_tp -->
+<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
+<g id="proc~~rmvs_step_system~~CallsGraph_edge7" class="edge">
+<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M361.85,-42.52C384.54,-36.15 412.51,-28.29 434.4,-22.14"/>
+<polygon fill="#000000" stroke="#000000" points="435.61,-25.44 444.29,-19.36 433.71,-18.7 435.61,-25.44"/>
+</g>
+<!-- proc~rmvs_make_planetocentric -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node8" class="node">
-<title>proc~rmvs_peri_tp</title>
-<g id="a_proc~~rmvs_step_system~~CallsGraph_node8"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="509,-189 434,-189 434,-165 509,-165 509,-189"/>
-<text text-anchor="middle" x="471.5" y="-174.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
+<title>proc~rmvs_make_planetocentric</title>
+<g id="a_proc~~rmvs_step_system~~CallsGraph_node8"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="542,-108 401,-108 401,-84 542,-84 542,-108"/>
+<text text-anchor="middle" x="471.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
-<g id="proc~~rmvs_step_system~~CallsGraph_edge7" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
-<path fill="none" stroke="#000000" d="M358.34,-145.49C378.27,-151.09 402.99,-158.03 424.15,-163.98"/>
-<polygon fill="#000000" stroke="#000000" points="423.32,-167.38 433.89,-166.72 425.21,-160.64 423.32,-167.38"/>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
+<g id="proc~~rmvs_step_system~~CallsGraph_edge8" class="edge">
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
+<path fill="none" stroke="#000000" d="M358.34,-96C368.21,-96 379.24,-96 390.44,-96"/>
+<polygon fill="#000000" stroke="#000000" points="390.74,-99.5 400.74,-96 390.74,-92.5 390.74,-99.5"/>
 </g>
-<!-- proc~rmvs_end_planetocentric -->
+<!-- proc~rmvs_peri_tp -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node9" class="node">
-<title>proc~rmvs_end_planetocentric</title>
-<g id="a_proc~~rmvs_step_system~~CallsGraph_node9"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="538,-147 405,-147 405,-123 538,-123 538,-147"/>
-<text text-anchor="middle" x="471.5" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
+<title>proc~rmvs_peri_tp</title>
+<g id="a_proc~~rmvs_step_system~~CallsGraph_node9"><a xlink:href=".././proc/rmvs_peri_tp.html" xlink:title="rmvs_peri_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="509,-66 434,-66 434,-42 509,-42 509,-66"/>
+<text text-anchor="middle" x="471.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_peri_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
-<g id="proc~~rmvs_step_system~~CallsGraph_edge8" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
-<path fill="none" stroke="#000000" d="M358.34,-135C369.46,-135 382.08,-135 394.73,-135"/>
-<polygon fill="#000000" stroke="#000000" points="394.85,-138.5 404.85,-135 394.85,-131.5 394.85,-138.5"/>
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp -->
+<g id="proc~~rmvs_step_system~~CallsGraph_edge9" class="edge">
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_peri_tp</title>
+<path fill="none" stroke="#000000" d="M358.34,-85.51C378.27,-79.91 402.99,-72.97 424.15,-67.02"/>
+<polygon fill="#000000" stroke="#000000" points="425.21,-70.36 433.89,-64.28 423.32,-63.62 425.21,-70.36"/>
 </g>
-<!-- proc~rmvs_make_planetocentric -->
+<!-- proc~rmvs_end_planetocentric -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node10" class="node">
-<title>proc~rmvs_make_planetocentric</title>
-<g id="a_proc~~rmvs_step_system~~CallsGraph_node10"><a xlink:href=".././proc/rmvs_make_planetocentric.html" xlink:title="rmvs_make_planetocentric">
-<polygon fill="#d9534f" stroke="#d9534f" points="542,-105 401,-105 401,-81 542,-81 542,-105"/>
-<text text-anchor="middle" x="471.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_make_planetocentric</text>
+<title>proc~rmvs_end_planetocentric</title>
+<g id="a_proc~~rmvs_step_system~~CallsGraph_node10"><a xlink:href=".././proc/rmvs_end_planetocentric.html" xlink:title="rmvs_end_planetocentric">
+<polygon fill="#d9534f" stroke="#d9534f" points="538,-150 405,-150 405,-126 538,-126 538,-150"/>
+<text text-anchor="middle" x="471.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_end_planetocentric</text>
 </a>
 </g>
 </g>
-<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric -->
-<g id="proc~~rmvs_step_system~~CallsGraph_edge9" class="edge">
-<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_make_planetocentric</title>
-<path fill="none" stroke="#000000" d="M358.34,-124.51C376.32,-119.46 398.19,-113.32 417.82,-107.8"/>
-<polygon fill="#000000" stroke="#000000" points="418.87,-111.14 427.56,-105.06 416.98,-104.4 418.87,-111.14"/>
-</g>
-<!-- proc~rmvs_interp_in&#45;&gt;util_exit -->
+<!-- proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric -->
 <g id="proc~~rmvs_step_system~~CallsGraph_edge10" class="edge">
-<title>proc~rmvs_interp_in&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M361.85,-81.52C384.54,-75.15 412.51,-67.29 434.4,-61.14"/>
-<polygon fill="#000000" stroke="#000000" points="435.61,-64.44 444.29,-58.36 433.71,-57.7 435.61,-64.44"/>
+<title>proc~rmvs_step_in&#45;&gt;proc~rmvs_end_planetocentric</title>
+<path fill="none" stroke="#000000" d="M358.34,-106.49C376.32,-111.54 398.19,-117.68 417.82,-123.2"/>
+<polygon fill="#000000" stroke="#000000" points="416.98,-126.6 427.56,-125.94 418.87,-119.86 416.98,-126.6"/>
 </g>
-<!-- xpc -->
+<!-- vpc -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node11" class="node">
-<title>xpc</title>
-<polygon fill="#777777" stroke="#777777" points="632,-210 578,-210 578,-186 632,-186 632,-210"/>
-<text text-anchor="middle" x="605" y="-195.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
+<title>vpc</title>
+<polygon fill="#777777" stroke="#777777" points="632,-87 578,-87 578,-63 632,-63 632,-87"/>
+<text text-anchor="middle" x="605" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
 <g id="proc~~rmvs_step_system~~CallsGraph_edge11" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
-<path fill="none" stroke="#000000" d="M509.13,-182.85C527.51,-185.79 549.7,-189.33 567.99,-192.25"/>
-<polygon fill="#000000" stroke="#000000" points="567.55,-195.72 577.98,-193.84 568.66,-188.81 567.55,-195.72"/>
+<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
+<path fill="none" stroke="#000000" d="M509.13,-59.85C527.51,-62.79 549.7,-66.33 567.99,-69.25"/>
+<polygon fill="#000000" stroke="#000000" points="567.55,-72.72 577.98,-70.84 568.66,-65.81 567.55,-72.72"/>
 </g>
-<!-- vpc -->
+<!-- xpc -->
 <g id="proc~~rmvs_step_system~~CallsGraph_node12" class="node">
-<title>vpc</title>
-<polygon fill="#777777" stroke="#777777" points="632,-168 578,-168 578,-144 632,-144 632,-168"/>
-<text text-anchor="middle" x="605" y="-153.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vpc</text>
+<title>xpc</title>
+<polygon fill="#777777" stroke="#777777" points="632,-45 578,-45 578,-21 632,-21 632,-45"/>
+<text text-anchor="middle" x="605" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xpc</text>
 </g>
-<!-- proc~rmvs_peri_tp&#45;&gt;vpc -->
+<!-- proc~rmvs_peri_tp&#45;&gt;xpc -->
 <g id="proc~~rmvs_step_system~~CallsGraph_edge12" class="edge">
-<title>proc~rmvs_peri_tp&#45;&gt;vpc</title>
-<path fill="none" stroke="#000000" d="M509.13,-171.15C527.51,-168.21 549.7,-164.67 567.99,-161.75"/>
-<polygon fill="#000000" stroke="#000000" points="568.66,-165.19 577.98,-160.16 567.55,-158.28 568.66,-165.19"/>
+<title>proc~rmvs_peri_tp&#45;&gt;xpc</title>
+<path fill="none" stroke="#000000" d="M509.13,-48.15C527.51,-45.21 549.7,-41.67 567.99,-38.75"/>
+<polygon fill="#000000" stroke="#000000" points="568.66,-42.19 577.98,-37.16 567.55,-35.28 568.66,-42.19"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_util_append_pl.html b/docs/proc/rmvs_util_append_pl.html
index 54ccc2b09..30a5c29f7 100644
--- a/docs/proc/rmvs_util_append_pl.html
+++ b/docs/proc/rmvs_util_append_pl.html
@@ -308,41 +308,41 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
 <text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_append_pl</text>
 </g>
-<!-- util_append -->
+<!-- util_exit -->
 <g id="proc~~rmvs_util_append_pl~~CallsGraph_node2" class="node">
-<title>util_append</title>
-<polygon fill="#777777" stroke="#777777" points="237.5,-108 169.5,-108 169.5,-84 237.5,-84 237.5,-108"/>
-<text text-anchor="middle" x="203.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="230.5,-108 176.5,-108 176.5,-84 230.5,-84 230.5,-108"/>
+<text text-anchor="middle" x="203.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_append_pl&#45;&gt;util_append -->
+<!-- proc~rmvs_util_append_pl&#45;&gt;util_exit -->
 <g id="proc~~rmvs_util_append_pl~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_append_pl&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M98.69,-66.04C117.72,-71.53 140.22,-78.02 159.41,-83.56"/>
-<polygon fill="#000000" stroke="#000000" points="158.53,-86.95 169.11,-86.36 160.47,-80.22 158.53,-86.95"/>
+<title>proc~rmvs_util_append_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M98.69,-66.04C120.2,-72.24 146.16,-79.74 166.74,-85.68"/>
+<polygon fill="#000000" stroke="#000000" points="165.79,-89.05 176.37,-88.46 167.73,-82.32 165.79,-89.05"/>
 </g>
-<!-- whm_util_append_pl -->
+<!-- util_append -->
 <g id="proc~~rmvs_util_append_pl~~CallsGraph_node3" class="node">
-<title>whm_util_append_pl</title>
-<polygon fill="#777777" stroke="#777777" points="259,-66 148,-66 148,-42 259,-42 259,-66"/>
-<text text-anchor="middle" x="203.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
+<title>util_append</title>
+<polygon fill="#777777" stroke="#777777" points="237.5,-66 169.5,-66 169.5,-42 237.5,-42 237.5,-66"/>
+<text text-anchor="middle" x="203.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </g>
-<!-- proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl -->
+<!-- proc~rmvs_util_append_pl&#45;&gt;util_append -->
 <g id="proc~~rmvs_util_append_pl~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl</title>
-<path fill="none" stroke="#000000" d="M112.01,-54C120.45,-54 129.24,-54 137.87,-54"/>
-<polygon fill="#000000" stroke="#000000" points="137.9,-57.5 147.9,-54 137.9,-50.5 137.9,-57.5"/>
+<title>proc~rmvs_util_append_pl&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M112.01,-54C127.55,-54 144.24,-54 159,-54"/>
+<polygon fill="#000000" stroke="#000000" points="159.37,-57.5 169.37,-54 159.37,-50.5 159.37,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- whm_util_append_pl -->
 <g id="proc~~rmvs_util_append_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="230.5,-24 176.5,-24 176.5,0 230.5,0 230.5,-24"/>
-<text text-anchor="middle" x="203.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>whm_util_append_pl</title>
+<polygon fill="#777777" stroke="#777777" points="259,-24 148,-24 148,0 259,0 259,-24"/>
+<text text-anchor="middle" x="203.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_append_pl</text>
 </g>
-<!-- proc~rmvs_util_append_pl&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl -->
 <g id="proc~~rmvs_util_append_pl~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_append_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M98.69,-41.96C120.2,-35.76 146.16,-28.26 166.74,-22.32"/>
-<polygon fill="#000000" stroke="#000000" points="167.73,-25.68 176.37,-19.54 165.79,-18.95 167.73,-25.68"/>
+<title>proc~rmvs_util_append_pl&#45;&gt;whm_util_append_pl</title>
+<path fill="none" stroke="#000000" d="M98.69,-41.96C114.98,-37.26 133.82,-31.82 150.95,-26.88"/>
+<polygon fill="#000000" stroke="#000000" points="152.16,-30.17 160.8,-24.04 150.22,-23.45 152.16,-30.17"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_util_append_tp.html b/docs/proc/rmvs_util_append_tp.html
index d2b8614fa..2882c16eb 100644
--- a/docs/proc/rmvs_util_append_tp.html
+++ b/docs/proc/rmvs_util_append_tp.html
@@ -308,17 +308,17 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
 <text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_append_tp</text>
 </g>
-<!-- util_append -->
+<!-- util_exit -->
 <g id="proc~~rmvs_util_append_tp~~CallsGraph_node2" class="node">
-<title>util_append</title>
-<polygon fill="#777777" stroke="#777777" points="223.5,-108 155.5,-108 155.5,-84 223.5,-84 223.5,-108"/>
-<text text-anchor="middle" x="189.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="216.5,-108 162.5,-108 162.5,-84 216.5,-84 216.5,-108"/>
+<text text-anchor="middle" x="189.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_append_tp&#45;&gt;util_append -->
+<!-- proc~rmvs_util_append_tp&#45;&gt;util_exit -->
 <g id="proc~~rmvs_util_append_tp~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_append_tp&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M94.68,-66.04C110.52,-71.09 129.03,-77.01 145.41,-82.24"/>
-<polygon fill="#000000" stroke="#000000" points="144.7,-85.68 155.29,-85.39 146.83,-79.02 144.7,-85.68"/>
+<title>proc~rmvs_util_append_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M94.68,-66.04C113,-71.88 134.89,-78.88 152.92,-84.63"/>
+<polygon fill="#000000" stroke="#000000" points="151.9,-87.98 162.49,-87.69 154.03,-81.31 151.9,-87.98"/>
 </g>
 <!-- util_append_tp -->
 <g id="proc~~rmvs_util_append_tp~~CallsGraph_node3" class="node">
@@ -332,17 +332,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M112.01,-54C120.51,-54 129.26,-54 137.67,-54"/>
 <polygon fill="#000000" stroke="#000000" points="137.72,-57.5 147.72,-54 137.72,-50.5 137.72,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_append -->
 <g id="proc~~rmvs_util_append_tp~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="216.5,-24 162.5,-24 162.5,0 216.5,0 216.5,-24"/>
-<text text-anchor="middle" x="189.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_append</title>
+<polygon fill="#777777" stroke="#777777" points="223.5,-24 155.5,-24 155.5,0 223.5,0 223.5,-24"/>
+<text text-anchor="middle" x="189.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </g>
-<!-- proc~rmvs_util_append_tp&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_append_tp&#45;&gt;util_append -->
 <g id="proc~~rmvs_util_append_tp~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_append_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M94.68,-41.96C113,-36.12 134.89,-29.12 152.92,-23.37"/>
-<polygon fill="#000000" stroke="#000000" points="154.03,-26.69 162.49,-20.31 151.9,-20.02 154.03,-26.69"/>
+<title>proc~rmvs_util_append_tp&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M94.68,-41.96C110.52,-36.91 129.03,-30.99 145.41,-25.76"/>
+<polygon fill="#000000" stroke="#000000" points="146.83,-28.98 155.29,-22.61 144.7,-22.32 146.83,-28.98"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_util_fill_pl.html b/docs/proc/rmvs_util_fill_pl.html
index 4ae7d4593..40d315860 100644
--- a/docs/proc/rmvs_util_fill_pl.html
+++ b/docs/proc/rmvs_util_fill_pl.html
@@ -307,17 +307,17 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="85,-66 0,-66 0,-42 85,-42 85,-66"/>
 <text text-anchor="middle" x="42.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_fill_pl</text>
 </g>
-<!-- whm_util_fill_pl -->
+<!-- util_exit -->
 <g id="proc~~rmvs_util_fill_pl~~CallsGraph_node2" class="node">
-<title>whm_util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="206,-108 121,-108 121,-84 206,-84 206,-108"/>
-<text text-anchor="middle" x="163.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="190.5,-108 136.5,-108 136.5,-84 190.5,-84 190.5,-108"/>
+<text text-anchor="middle" x="163.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl -->
+<!-- proc~rmvs_util_fill_pl&#45;&gt;util_exit -->
 <g id="proc~~rmvs_util_fill_pl~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M77.6,-66.04C90.42,-70.56 105.18,-75.77 118.76,-80.56"/>
-<polygon fill="#000000" stroke="#000000" points="117.8,-83.93 128.39,-83.96 120.13,-77.33 117.8,-83.93"/>
+<title>proc~rmvs_util_fill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M77.6,-66.04C92.92,-71.44 111.02,-77.83 126.55,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="125.74,-86.74 136.34,-86.77 128.07,-80.14 125.74,-86.74"/>
 </g>
 <!-- util_fill -->
 <g id="proc~~rmvs_util_fill_pl~~CallsGraph_node3" class="node">
@@ -326,22 +326,22 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="163.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </g>
 <!-- proc~rmvs_util_fill_pl&#45;&gt;util_fill -->
-<g id="proc~~rmvs_util_fill_pl~~CallsGraph_edge2" class="edge">
+<g id="proc~~rmvs_util_fill_pl~~CallsGraph_edge3" class="edge">
 <title>proc~rmvs_util_fill_pl&#45;&gt;util_fill</title>
 <path fill="none" stroke="#000000" d="M85.12,-54C98.42,-54 113.03,-54 125.95,-54"/>
 <polygon fill="#000000" stroke="#000000" points="126.33,-57.5 136.33,-54 126.33,-50.5 126.33,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- whm_util_fill_pl -->
 <g id="proc~~rmvs_util_fill_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="190.5,-24 136.5,-24 136.5,0 190.5,0 190.5,-24"/>
-<text text-anchor="middle" x="163.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>whm_util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="206,-24 121,-24 121,0 206,0 206,-24"/>
+<text text-anchor="middle" x="163.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_fill_pl</text>
 </g>
-<!-- proc~rmvs_util_fill_pl&#45;&gt;util_exit -->
-<g id="proc~~rmvs_util_fill_pl~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M77.6,-41.96C92.92,-36.56 111.02,-30.17 126.55,-24.69"/>
-<polygon fill="#000000" stroke="#000000" points="128.07,-27.86 136.34,-21.23 125.74,-21.26 128.07,-27.86"/>
+<!-- proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl -->
+<g id="proc~~rmvs_util_fill_pl~~CallsGraph_edge2" class="edge">
+<title>proc~rmvs_util_fill_pl&#45;&gt;whm_util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M77.6,-41.96C90.42,-37.44 105.18,-32.23 118.76,-27.44"/>
+<polygon fill="#000000" stroke="#000000" points="120.13,-30.67 128.39,-24.04 117.8,-24.07 120.13,-30.67"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_util_fill_tp.html b/docs/proc/rmvs_util_fill_tp.html
index a4939680d..26b28c616 100644
--- a/docs/proc/rmvs_util_fill_tp.html
+++ b/docs/proc/rmvs_util_fill_tp.html
@@ -307,15 +307,15 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="86,-66 0,-66 0,-42 86,-42 86,-66"/>
 <text text-anchor="middle" x="43" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_fill_tp</text>
 </g>
-<!-- util_fill -->
+<!-- util_exit -->
 <g id="proc~~rmvs_util_fill_tp~~CallsGraph_node2" class="node">
-<title>util_fill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="177.5,-108 123.5,-108 123.5,-84 177.5,-84 177.5,-108"/>
-<text text-anchor="middle" x="150.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+<text text-anchor="middle" x="150.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill -->
+<!-- proc~rmvs_util_fill_tp&#45;&gt;util_exit -->
 <g id="proc~~rmvs_util_fill_tp~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill</title>
+<title>proc~rmvs_util_fill_tp&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M74.23,-66.04C86.56,-70.94 100.9,-76.65 113.74,-81.76"/>
 <polygon fill="#000000" stroke="#000000" points="112.62,-85.09 123.21,-85.53 115.21,-78.58 112.62,-85.09"/>
 </g>
@@ -331,15 +331,15 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M86.3,-54C94.69,-54 103.44,-54 111.66,-54"/>
 <polygon fill="#000000" stroke="#000000" points="111.73,-57.5 121.73,-54 111.73,-50.5 111.73,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill -->
 <g id="proc~~rmvs_util_fill_tp~~CallsGraph_node4" class="node">
-<title>util_exit</title>
+<title>util_fill</title>
 <polygon fill="#777777" stroke="#777777" points="177.5,-24 123.5,-24 123.5,0 177.5,0 177.5,-24"/>
-<text text-anchor="middle" x="150.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="150.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </g>
-<!-- proc~rmvs_util_fill_tp&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_fill_tp&#45;&gt;util_fill -->
 <g id="proc~~rmvs_util_fill_tp~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_fill_tp&#45;&gt;util_exit</title>
+<title>proc~rmvs_util_fill_tp&#45;&gt;util_fill</title>
 <path fill="none" stroke="#000000" d="M74.23,-41.96C86.56,-37.06 100.9,-31.35 113.74,-26.24"/>
 <polygon fill="#000000" stroke="#000000" points="115.21,-29.42 123.21,-22.47 112.62,-22.91 115.21,-29.42"/>
 </g>
diff --git a/docs/proc/rmvs_util_resize_tp.html b/docs/proc/rmvs_util_resize_tp.html
index 7dae40298..13218cec8 100644
--- a/docs/proc/rmvs_util_resize_tp.html
+++ b/docs/proc/rmvs_util_resize_tp.html
@@ -291,29 +291,29 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="105,-45 0,-45 0,-21 105,-21 105,-45"/>
 <text text-anchor="middle" x="52.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_resize_tp</text>
 </g>
-<!-- util_resize -->
+<!-- util_resize_tp -->
 <g id="proc~~rmvs_util_resize_tp~~CallsGraph_node2" class="node">
-<title>util_resize</title>
-<polygon fill="#777777" stroke="#777777" points="209.5,-66 148.5,-66 148.5,-42 209.5,-42 209.5,-66"/>
-<text text-anchor="middle" x="179" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>util_resize_tp</title>
+<polygon fill="#777777" stroke="#777777" points="217,-66 141,-66 141,-42 217,-42 217,-66"/>
+<text text-anchor="middle" x="179" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </g>
-<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize -->
+<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp -->
 <g id="proc~~rmvs_util_resize_tp~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize</title>
-<path fill="none" stroke="#000000" d="M105.22,-41.72C116.24,-43.58 127.72,-45.52 138.21,-47.29"/>
-<polygon fill="#000000" stroke="#000000" points="137.88,-50.78 148.32,-48.99 139.05,-43.88 137.88,-50.78"/>
+<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp</title>
+<path fill="none" stroke="#000000" d="M105.22,-41.72C113.67,-43.15 122.39,-44.62 130.73,-46.03"/>
+<polygon fill="#000000" stroke="#000000" points="130.23,-49.49 140.67,-47.7 131.4,-42.59 130.23,-49.49"/>
 </g>
-<!-- util_resize_tp -->
+<!-- util_resize -->
 <g id="proc~~rmvs_util_resize_tp~~CallsGraph_node3" class="node">
-<title>util_resize_tp</title>
-<polygon fill="#777777" stroke="#777777" points="217,-24 141,-24 141,0 217,0 217,-24"/>
-<text text-anchor="middle" x="179" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<title>util_resize</title>
+<polygon fill="#777777" stroke="#777777" points="209.5,-24 148.5,-24 148.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="179" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </g>
-<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp -->
+<!-- proc~rmvs_util_resize_tp&#45;&gt;util_resize -->
 <g id="proc~~rmvs_util_resize_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize_tp</title>
-<path fill="none" stroke="#000000" d="M105.22,-24.28C113.67,-22.85 122.39,-21.38 130.73,-19.97"/>
-<polygon fill="#000000" stroke="#000000" points="131.4,-23.41 140.67,-18.3 130.23,-16.51 131.4,-23.41"/>
+<title>proc~rmvs_util_resize_tp&#45;&gt;util_resize</title>
+<path fill="none" stroke="#000000" d="M105.22,-24.28C116.24,-22.42 127.72,-20.48 138.21,-18.71"/>
+<polygon fill="#000000" stroke="#000000" points="139.05,-22.12 148.32,-17.01 137.88,-15.22 139.05,-22.12"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_util_sort_rearrange_tp.html b/docs/proc/rmvs_util_sort_rearrange_tp.html
index 5e6fc9b5e..9e3f1d77b 100644
--- a/docs/proc/rmvs_util_sort_rearrange_tp.html
+++ b/docs/proc/rmvs_util_sort_rearrange_tp.html
@@ -292,29 +292,29 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="148,-45 0,-45 0,-21 148,-21 148,-45"/>
 <text text-anchor="middle" x="74" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_sort_rearrange_tp</text>
 </g>
-<!-- util_sort_rearrange_tp -->
+<!-- util_sort_rearrange -->
 <g id="proc~~rmvs_util_sort_rearrange_tp~~CallsGraph_node2" class="node">
-<title>util_sort_rearrange_tp</title>
-<polygon fill="#777777" stroke="#777777" points="302,-66 184,-66 184,-42 302,-42 302,-66"/>
-<text text-anchor="middle" x="243" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<title>util_sort_rearrange</title>
+<polygon fill="#777777" stroke="#777777" points="294.5,-66 191.5,-66 191.5,-42 294.5,-42 294.5,-66"/>
+<text text-anchor="middle" x="243" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
+<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange -->
 <g id="proc~~rmvs_util_sort_rearrange_tp~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" d="M148.25,-42.21C156.72,-43.28 165.34,-44.36 173.74,-45.42"/>
-<polygon fill="#000000" stroke="#000000" points="173.5,-48.91 183.86,-46.69 174.38,-41.97 173.5,-48.91"/>
+<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M148.25,-42.21C159.27,-43.6 170.54,-45.01 181.26,-46.36"/>
+<polygon fill="#000000" stroke="#000000" points="181,-49.86 191.35,-47.63 181.87,-42.91 181,-49.86"/>
 </g>
-<!-- util_sort_rearrange -->
+<!-- util_sort_rearrange_tp -->
 <g id="proc~~rmvs_util_sort_rearrange_tp~~CallsGraph_node3" class="node">
-<title>util_sort_rearrange</title>
-<polygon fill="#777777" stroke="#777777" points="294.5,-24 191.5,-24 191.5,0 294.5,0 294.5,-24"/>
-<text text-anchor="middle" x="243" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<title>util_sort_rearrange_tp</title>
+<polygon fill="#777777" stroke="#777777" points="302,-24 184,-24 184,0 302,0 302,-24"/>
+<text text-anchor="middle" x="243" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </g>
-<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange -->
+<!-- proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
 <g id="proc~~rmvs_util_sort_rearrange_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M148.25,-23.79C159.27,-22.4 170.54,-20.99 181.26,-19.64"/>
-<polygon fill="#000000" stroke="#000000" points="181.87,-23.09 191.35,-18.37 181,-16.14 181.87,-23.09"/>
+<title>proc~rmvs_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" d="M148.25,-23.79C156.72,-22.72 165.34,-21.64 173.74,-20.58"/>
+<polygon fill="#000000" stroke="#000000" points="174.38,-24.03 183.86,-19.31 173.5,-17.09 174.38,-24.03"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/rmvs_util_spill_pl.html b/docs/proc/rmvs_util_spill_pl.html
index bde3ced64..5e5230fa2 100644
--- a/docs/proc/rmvs_util_spill_pl.html
+++ b/docs/proc/rmvs_util_spill_pl.html
@@ -322,15 +322,15 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
 <text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_spill_pl</text>
 </g>
-<!-- util_spill -->
+<!-- util_exit -->
 <g id="proc~~rmvs_util_spill_pl~~CallsGraph_node2" class="node">
-<title>util_spill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="203.5,-108 149.5,-108 149.5,-84 203.5,-84 203.5,-108"/>
-<text text-anchor="middle" x="176.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<text text-anchor="middle" x="176.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_spill_pl&#45;&gt;util_spill -->
+<!-- proc~rmvs_util_spill_pl&#45;&gt;util_exit -->
 <g id="proc~~rmvs_util_spill_pl~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_spill_pl&#45;&gt;util_spill</title>
+<title>proc~rmvs_util_spill_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M84.54,-66.04C101.88,-71.75 122.54,-78.55 139.78,-84.23"/>
 <polygon fill="#000000" stroke="#000000" points="138.89,-87.63 149.49,-87.43 141.08,-80.98 138.89,-87.63"/>
 </g>
@@ -341,20 +341,20 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="176.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util_spill_pl</text>
 </g>
 <!-- proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl -->
-<g id="proc~~rmvs_util_spill_pl~~CallsGraph_edge3" class="edge">
+<g id="proc~~rmvs_util_spill_pl~~CallsGraph_edge2" class="edge">
 <title>proc~rmvs_util_spill_pl&#45;&gt;whm_util_spill_pl</title>
 <path fill="none" stroke="#000000" d="M94.03,-54C102.44,-54 111.29,-54 119.94,-54"/>
 <polygon fill="#000000" stroke="#000000" points="119.96,-57.5 129.96,-54 119.96,-50.5 119.96,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_spill -->
 <g id="proc~~rmvs_util_spill_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
+<title>util_spill</title>
 <polygon fill="#777777" stroke="#777777" points="203.5,-24 149.5,-24 149.5,0 203.5,0 203.5,-24"/>
-<text text-anchor="middle" x="176.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="176.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </g>
-<!-- proc~rmvs_util_spill_pl&#45;&gt;util_exit -->
-<g id="proc~~rmvs_util_spill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_spill_pl&#45;&gt;util_exit</title>
+<!-- proc~rmvs_util_spill_pl&#45;&gt;util_spill -->
+<g id="proc~~rmvs_util_spill_pl~~CallsGraph_edge3" class="edge">
+<title>proc~rmvs_util_spill_pl&#45;&gt;util_spill</title>
 <path fill="none" stroke="#000000" d="M84.54,-41.96C101.88,-36.25 122.54,-29.45 139.78,-23.77"/>
 <polygon fill="#000000" stroke="#000000" points="141.08,-27.02 149.49,-20.57 138.89,-20.37 141.08,-27.02"/>
 </g>
diff --git a/docs/proc/rmvs_util_spill_tp.html b/docs/proc/rmvs_util_spill_tp.html
index 3be56aae9..87660f9fc 100644
--- a/docs/proc/rmvs_util_spill_tp.html
+++ b/docs/proc/rmvs_util_spill_tp.html
@@ -322,41 +322,41 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
 <text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util_spill_tp</text>
 </g>
-<!-- util_spill -->
+<!-- util_exit -->
 <g id="proc~~rmvs_util_spill_tp~~CallsGraph_node2" class="node">
-<title>util_spill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="189.5,-108 135.5,-108 135.5,-84 189.5,-84 189.5,-108"/>
-<text text-anchor="middle" x="162.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<text text-anchor="middle" x="162.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill -->
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_exit -->
 <g id="proc~~rmvs_util_spill_tp~~CallsGraph_edge1" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill</title>
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M80.52,-66.04C94.68,-71.27 111.32,-77.43 125.81,-82.79"/>
 <polygon fill="#000000" stroke="#000000" points="124.86,-86.17 135.45,-86.36 127.29,-79.61 124.86,-86.17"/>
 </g>
-<!-- util_spill_tp -->
+<!-- util_spill -->
 <g id="proc~~rmvs_util_spill_tp~~CallsGraph_node3" class="node">
-<title>util_spill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="195,-66 130,-66 130,-42 195,-42 195,-66"/>
-<text text-anchor="middle" x="162.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>util_spill</title>
+<polygon fill="#777777" stroke="#777777" points="189.5,-66 135.5,-66 135.5,-42 189.5,-42 189.5,-66"/>
+<text text-anchor="middle" x="162.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp -->
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill -->
 <g id="proc~~rmvs_util_spill_tp~~CallsGraph_edge2" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp</title>
-<path fill="none" stroke="#000000" d="M94.16,-54C102.62,-54 111.41,-54 119.73,-54"/>
-<polygon fill="#000000" stroke="#000000" points="119.96,-57.5 129.96,-54 119.96,-50.5 119.96,-57.5"/>
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill</title>
+<path fill="none" stroke="#000000" d="M94.16,-54C104.44,-54 115.2,-54 125.02,-54"/>
+<polygon fill="#000000" stroke="#000000" points="125.25,-57.5 135.25,-54 125.25,-50.5 125.25,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_spill_tp -->
 <g id="proc~~rmvs_util_spill_tp~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="189.5,-24 135.5,-24 135.5,0 189.5,0 189.5,-24"/>
-<text text-anchor="middle" x="162.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_spill_tp</title>
+<polygon fill="#777777" stroke="#777777" points="195,-24 130,-24 130,0 195,0 195,-24"/>
+<text text-anchor="middle" x="162.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </g>
-<!-- proc~rmvs_util_spill_tp&#45;&gt;util_exit -->
+<!-- proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp -->
 <g id="proc~~rmvs_util_spill_tp~~CallsGraph_edge3" class="edge">
-<title>proc~rmvs_util_spill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M80.52,-41.96C94.68,-36.73 111.32,-30.57 125.81,-25.21"/>
-<polygon fill="#000000" stroke="#000000" points="127.29,-28.39 135.45,-21.64 124.86,-21.83 127.29,-28.39"/>
+<title>proc~rmvs_util_spill_tp&#45;&gt;util_spill_tp</title>
+<path fill="none" stroke="#000000" d="M80.52,-41.96C92.84,-37.41 107.04,-32.15 120.07,-27.33"/>
+<polygon fill="#000000" stroke="#000000" points="121.59,-30.5 129.75,-23.75 119.16,-23.94 121.59,-30.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/setup_body.html b/docs/proc/setup_body.html
index 10ec32cd6..e911e9cf7 100644
--- a/docs/proc/setup_body.html
+++ b/docs/proc/setup_body.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~28"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~32"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -354,25 +354,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M144.21,-17.79C152.19,-19.56 161.18,-21.55 169.97,-23.49"/>
 <polygon fill="#000000" stroke="#000000" points="169.22,-26.91 179.74,-25.65 170.73,-20.07 169.22,-26.91"/>
 </g>
-<!-- interface~setup_pl -->
-<g id="proc~~setup_body~~CalledByGraph_node5" class="node">
-<title>interface~setup_pl</title>
-<g id="a_proc~~setup_body~~CalledByGraph_node5"><a xlink:href=".././interface/setup_pl.html" xlink:title="setup_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="54,-66 0,-66 0,-42 54,-42 54,-66"/>
-<text text-anchor="middle" x="27" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
-</a>
-</g>
-</g>
-<!-- interface~setup_pl&#45;&gt;proc~setup_pl -->
-<g id="proc~~setup_body~~CalledByGraph_edge4" class="edge">
-<title>interface~setup_pl&#45;&gt;proc~setup_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.4,-54C62.39,-54 71.31,-54 79.82,-54"/>
-<polygon fill="#000000" stroke="#000000" points="79.92,-57.5 89.92,-54 79.92,-50.5 79.92,-57.5"/>
-</g>
 <!-- interface~setup_tp -->
-<g id="proc~~setup_body~~CalledByGraph_node6" class="node">
+<g id="proc~~setup_body~~CalledByGraph_node5" class="node">
 <title>interface~setup_tp</title>
-<g id="a_proc~~setup_body~~CalledByGraph_node6"><a xlink:href=".././interface/setup_tp.html" xlink:title="setup_tp">
+<g id="a_proc~~setup_body~~CalledByGraph_node5"><a xlink:href=".././interface/setup_tp.html" xlink:title="setup_tp">
 <polygon fill="#a7506f" stroke="#a7506f" points="54,-24 0,-24 0,0 54,0 54,-24"/>
 <text text-anchor="middle" x="27" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_tp</text>
 </a>
@@ -384,6 +369,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.4,-12C62.39,-12 71.31,-12 79.82,-12"/>
 <polygon fill="#000000" stroke="#000000" points="79.92,-15.5 89.92,-12 79.92,-8.5 79.92,-15.5"/>
 </g>
+<!-- interface~setup_pl -->
+<g id="proc~~setup_body~~CalledByGraph_node6" class="node">
+<title>interface~setup_pl</title>
+<g id="a_proc~~setup_body~~CalledByGraph_node6"><a xlink:href=".././interface/setup_pl.html" xlink:title="setup_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="54,-66 0,-66 0,-42 54,-42 54,-66"/>
+<text text-anchor="middle" x="27" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_pl</text>
+</a>
+</g>
+</g>
+<!-- interface~setup_pl&#45;&gt;proc~setup_pl -->
+<g id="proc~~setup_body~~CalledByGraph_edge4" class="edge">
+<title>interface~setup_pl&#45;&gt;proc~setup_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M54.4,-54C62.39,-54 71.31,-54 79.82,-54"/>
+<polygon fill="#000000" stroke="#000000" points="79.92,-57.5 89.92,-54 79.92,-50.5 79.92,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/setup_encounter.html b/docs/proc/setup_encounter.html
index aed7e7304..7008ec803 100644
--- a/docs/proc/setup_encounter.html
+++ b/docs/proc/setup_encounter.html
@@ -251,7 +251,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~27"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~31"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/setup_pl.html b/docs/proc/setup_pl.html
index ad4866790..72c72d7a4 100644
--- a/docs/proc/setup_pl.html
+++ b/docs/proc/setup_pl.html
@@ -254,7 +254,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~29"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~33"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/setup_tp.html b/docs/proc/setup_tp.html
index 3a69f3396..950d5778a 100644
--- a/docs/proc/setup_tp.html
+++ b/docs/proc/setup_tp.html
@@ -254,7 +254,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~30"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~34"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/solve_wbs.html b/docs/proc/solve_wbs.html
index 0b6cfd769..9b0cd16f0 100644
--- a/docs/proc/solve_wbs.html
+++ b/docs/proc/solve_wbs.html
@@ -233,322 +233,316 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~solve_wbs~~UsesGraph Pages: 1 -->
-<svg id="procsolve_wbsUsesGraph" width="641pt" height="194pt"
- viewBox="0.00 0.00 641.00 193.77" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~solve_wbs~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 282.27)">
+<svg id="procsolve_wbsUsesGraph" width="641pt" height="250pt"
+ viewBox="0.00 0.00 641.00 250.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~solve_wbs~~UsesGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 365.8)">
 <title>proc~~solve_wbs~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-282.27 943,-282.27 943,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.8 943,-365.8 943,4 -4,4"/>
 <!-- proc~solve_wbs -->
 <g id="proc~~solve_wbs~~UsesGraph_node1" class="node">
 <title>proc~solve_wbs</title>
-<polygon fill="none" stroke="black" points="939,-125.79 877,-125.79 877,-101.79 939,-101.79 939,-125.79"/>
-<text text-anchor="middle" x="908" y="-111.39" font-family="Helvetica,sans-Serif" font-size="10.50">solve_wbs</text>
+<polygon fill="none" stroke="black" points="939,-192 877,-192 877,-168 939,-168 939,-192"/>
+<text text-anchor="middle" x="908" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50">solve_wbs</text>
 </g>
 <!-- module~swiftest -->
 <g id="proc~~solve_wbs~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_proc~~solve_wbs~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="823,-146.79 769,-146.79 769,-122.79 823,-122.79 823,-146.79"/>
-<text text-anchor="middle" x="796" y="-132.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="823,-213 769,-213 769,-189 823,-189 823,-213"/>
+<text text-anchor="middle" x="796" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- proc~solve_wbs&#45;&gt;module~swiftest -->
 <g id="proc~~solve_wbs~~UsesGraph_edge1" class="edge">
 <title>proc~solve_wbs&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.94,-119.53C863.43,-122.11 847.37,-125.18 833.2,-127.88"/>
-<polygon fill="#000000" stroke="#000000" points="832.44,-124.46 823.28,-129.78 833.76,-131.34 832.44,-124.46"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.94,-185.74C863.43,-188.32 847.37,-191.38 833.2,-194.09"/>
+<polygon fill="#000000" stroke="#000000" points="832.44,-190.67 823.28,-195.98 833.76,-197.55 832.44,-190.67"/>
 </g>
 <!-- ieee_exceptions -->
 <g id="proc~~solve_wbs~~UsesGraph_node3" class="node">
 <title>ieee_exceptions</title>
 <g id="a_proc~~solve_wbs~~UsesGraph_node3"><a xlink:href="http://fortranwiki.org/fortran/show/IEEE+arithmetic" xlink:title="ieee_exceptions">
-<polygon fill="#337ab7" stroke="#337ab7" points="841,-104.79 751,-104.79 751,-80.79 841,-80.79 841,-104.79"/>
-<text text-anchor="middle" x="796" y="-90.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_exceptions</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="841,-171 751,-171 751,-147 841,-147 841,-171"/>
+<text text-anchor="middle" x="796" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ieee_exceptions</text>
 </a>
 </g>
 </g>
 <!-- proc~solve_wbs&#45;&gt;ieee_exceptions -->
 <g id="proc~~solve_wbs~~UsesGraph_edge2" class="edge">
 <title>proc~solve_wbs&#45;&gt;ieee_exceptions</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.94,-108.05C868.9,-106.52 859.96,-104.81 851.04,-103.11"/>
-<polygon fill="#000000" stroke="#000000" points="851.53,-99.64 841.05,-101.2 850.21,-106.51 851.53,-99.64"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.94,-174.26C868.9,-172.73 859.96,-171.02 851.04,-169.32"/>
+<polygon fill="#000000" stroke="#000000" points="851.53,-165.85 841.05,-167.41 850.21,-172.72 851.53,-165.85"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_node4" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-244.79 247,-244.79 247,-220.79 347,-220.79 347,-244.79"/>
-<text text-anchor="middle" x="297" y="-230.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node4"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="458.5,-262 382.5,-262 382.5,-238 458.5,-238 458.5,-262"/>
+<text text-anchor="middle" x="420.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-272.79C397.63,-266.97 364.89,-256.82 339.8,-248.2"/>
-<polygon fill="#000000" stroke="#000000" points="340.83,-244.85 330.24,-244.86 338.53,-251.46 340.83,-244.85"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-201C626.68,-199.5 528.12,-222.66 468.77,-237.66"/>
+<polygon fill="#000000" stroke="#000000" points="467.72,-234.32 458.89,-240.18 469.44,-241.1 467.72,-234.32"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="proc~~solve_wbs~~UsesGraph_node5" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node5"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587,-166.79 510,-166.79 510,-142.79 587,-142.79 587,-166.79"/>
-<text text-anchor="middle" x="548.5" y="-152.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node5"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-262 615,-262 615,-238 715,-238 715,-262"/>
+<text text-anchor="middle" x="665" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="proc~~solve_wbs~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C635.45,-109.53 599.83,-124.58 576.22,-137.7"/>
-<polygon fill="#000000" stroke="#000000" points="574.38,-134.72 567.49,-142.77 577.9,-140.78 574.38,-134.72"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.89,-210.92C751.31,-217.6 727.73,-226.55 707.58,-234.21"/>
+<polygon fill="#000000" stroke="#000000" points="706.11,-231.02 698.01,-237.84 708.6,-237.56 706.11,-231.02"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_node6" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node6"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472,-244.79 385,-244.79 385,-220.79 472,-220.79 472,-244.79"/>
-<text text-anchor="middle" x="428.5" y="-230.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node6"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="707.5,-173 622.5,-173 622.5,-149 707.5,-149 707.5,-173"/>
+<text text-anchor="middle" x="665" y="-158.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="proc~~solve_wbs~~UsesGraph_edge5" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M784.44,-146.87C752.42,-182.03 652.31,-281.3 549.5,-272.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-272.79C515.82,-274.9 481.68,-261.44 458.31,-249.57"/>
-<polygon fill="#000000" stroke="#000000" points="459.78,-246.39 449.3,-244.8 456.5,-252.57 459.78,-246.39"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="proc~~solve_wbs~~UsesGraph_edge6" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.89,-192.91C753.29,-188.07 732.98,-181.77 714.53,-176.05"/>
+<polygon fill="#000000" stroke="#000000" points="715.39,-172.65 704.8,-173.03 713.31,-179.33 715.39,-172.65"/>
 </g>
 <!-- module~helio_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_node7" class="node">
 <title>module~helio_classes</title>
 <g id="a_proc~~solve_wbs~~UsesGraph_node7"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="586.5,-86.79 510.5,-86.79 510.5,-62.79 586.5,-62.79 586.5,-86.79"/>
-<text text-anchor="middle" x="548.5" y="-72.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="578.5,-203 502.5,-203 502.5,-179 578.5,-179 578.5,-203"/>
+<text text-anchor="middle" x="540.5" y="-188.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="proc~~solve_wbs~~UsesGraph_edge6" class="edge">
+<g id="proc~~solve_wbs~~UsesGraph_edge5" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C639.68,-110.21 609.03,-99.7 585.99,-90.61"/>
-<polygon fill="#000000" stroke="#000000" points="587.2,-87.32 576.62,-86.82 584.58,-93.81 587.2,-87.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-201C639.13,-200 611.5,-197.84 588.78,-195.78"/>
+<polygon fill="#000000" stroke="#000000" points="588.99,-192.28 578.71,-194.84 588.34,-199.25 588.99,-192.28"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_node8" class="node">
-<title>module~whm_classes</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node8"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="466.5,-126.79 390.5,-126.79 390.5,-102.79 466.5,-102.79 466.5,-126.79"/>
-<text text-anchor="middle" x="428.5" y="-112.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node8"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="464,-85 377,-85 377,-61 464,-61 464,-85"/>
+<text text-anchor="middle" x="420.5" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C602.31,-104.17 525.11,-106.88 476.73,-110.38"/>
-<polygon fill="#000000" stroke="#000000" points="476.27,-106.9 466.56,-111.15 476.8,-113.88 476.27,-106.9"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-31C523.33,-31.04 486.14,-45.21 457.8,-57.07"/>
+<polygon fill="#000000" stroke="#000000" points="456.41,-53.86 448.57,-60.98 459.14,-60.3 456.41,-53.86"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="proc~~solve_wbs~~UsesGraph_node9" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node9"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-204.79 123,-204.79 123,-180.79 211,-180.79 211,-204.79"/>
-<text text-anchor="middle" x="167" y="-190.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node9"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="466,-43 375,-43 375,-19 466,-19 466,-43"/>
+<text text-anchor="middle" x="420.5" y="-28.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="proc~~solve_wbs~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-272.79C348.33,-257.35 321.88,-283.8 247,-253.79 223.79,-244.49 201.65,-226.3 186.75,-212.19"/>
-<polygon fill="#000000" stroke="#000000" points="188.84,-209.35 179.25,-204.85 183.95,-214.35 188.84,-209.35"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-31C518.83,-31.06 496.12,-31.07 476.19,-31.06"/>
+<polygon fill="#000000" stroke="#000000" points="476.05,-27.56 466.05,-31.06 476.04,-34.56 476.05,-27.56"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_node10" class="node">
-<title>module~symba_classes</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node10"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="711.5,-166.79 626.5,-166.79 626.5,-142.79 711.5,-142.79 711.5,-166.79"/>
-<text text-anchor="middle" x="669" y="-152.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="337.5,-125 248.5,-125 248.5,-101 337.5,-101 337.5,-125"/>
+<text text-anchor="middle" x="293" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.8,-138.98C755.16,-141.17 738,-143.91 721.82,-146.5"/>
-<polygon fill="#000000" stroke="#000000" points="721.23,-143.05 711.91,-148.09 722.34,-149.96 721.23,-143.05"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.79,-201.82C742.71,-202.44 701.56,-202.9 666,-201"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-201C623.85,-198.86 617.72,-180.86 579,-170 536.23,-158 417.45,-135.54 347.47,-122.69"/>
+<polygon fill="#000000" stroke="#000000" points="347.98,-119.22 337.51,-120.86 346.72,-126.11 347.98,-119.22"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_node11" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node11"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-164.79 252.5,-164.79 252.5,-140.79 341.5,-140.79 341.5,-164.79"/>
-<text text-anchor="middle" x="297" y="-150.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node11"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="579,-321 502,-321 502,-297 579,-297 579,-321"/>
+<text text-anchor="middle" x="540.5" y="-306.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-272.79C406.39,-268.67 398.54,-268.66 383,-253.79 356.29,-228.23 372.61,-205.46 347,-178.79 344,-175.67 340.54,-172.84 336.87,-170.29"/>
-<polygon fill="#000000" stroke="#000000" points="338.42,-167.14 328.07,-164.88 334.75,-173.1 338.42,-167.14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-272.79C495.17,-276.27 480.97,-282.83 429.5,-272.79"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M789.73,-213.03C775.36,-243.93 732.11,-325.35 666,-349"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-349C630.23,-361.08 590.72,-342.34 565.9,-326.65"/>
+<polygon fill="#000000" stroke="#000000" points="567.73,-323.66 557.45,-321.07 563.86,-329.5 567.73,-323.66"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_node12" class="node">
-<title>module~lambda_function</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node12"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="474,-46.79 383,-46.79 383,-22.79 474,-22.79 474,-46.79"/>
-<text text-anchor="middle" x="428.5" y="-32.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="339,-24 247,-24 247,0 339,0 339,-24"/>
+<text text-anchor="middle" x="293" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.64,-130.73C743.32,-126.79 704.02,-120.57 670,-114.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668,-114.79C623.57,-107.24 628.81,-70.62 587,-53.79 554.52,-40.71 515.46,-35.94 484.36,-34.45"/>
-<polygon fill="#000000" stroke="#000000" points="484.27,-30.94 474.14,-34.06 484,-37.94 484.27,-30.94"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-31C505.53,-31.09 499.65,-14.71 466,-10 425.95,-4.39 415.44,-9.5 375,-10 366.8,-10.1 358.13,-10.26 349.64,-10.45"/>
+<polygon fill="#000000" stroke="#000000" points="349.32,-6.95 339.41,-10.68 349.49,-13.95 349.32,-6.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.9,-190.62C762.76,-187.62 756.42,-184.05 751,-180 731.84,-165.69 733.3,-155.4 715,-140 645.32,-81.37 632.53,-28.47 541.5,-31"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="proc~~solve_wbs~~UsesGraph_node13" class="node">
-<title>module~walltime_classes</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node13"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-46.79 623,-46.79 623,-22.79 715,-22.79 715,-46.79"/>
-<text text-anchor="middle" x="669" y="-32.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node13"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-105 123,-105 123,-81 211,-81 211,-105"/>
+<text text-anchor="middle" x="167" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="proc~~solve_wbs~~UsesGraph_edge12" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.62,-123.93C762.61,-120.99 756.41,-117.57 751,-113.79 726.49,-96.7 702.51,-72.03 687.08,-54.82"/>
-<polygon fill="#000000" stroke="#000000" points="689.47,-52.23 680.23,-47.04 684.21,-56.85 689.47,-52.23"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664,-349C561.15,-385.79 527.88,-333.82 421.5,-309"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="proc~~solve_wbs~~UsesGraph_edge14" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M394.71,-237.92C387.93,-234 380.84,-229.28 375,-224 345.44,-197.3 319.98,-158.2 305.84,-134.24"/>
+<polygon fill="#000000" stroke="#000000" points="308.7,-132.18 300.67,-125.27 302.64,-135.68 308.7,-132.18"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="proc~~solve_wbs~~UsesGraph_edge13" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-220.79C244.68,-216.75 230.09,-212.2 216.5,-207.95"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-204.57 206.82,-204.92 215.32,-211.25 217.41,-204.57"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.28,-258.54C356.15,-262.57 321.17,-263.87 294,-250"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="proc~~solve_wbs~~UsesGraph_edge15" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.1,-142.79C500.42,-138.83 487.26,-134.37 474.94,-130.2"/>
-<polygon fill="#000000" stroke="#000000" points="475.88,-126.82 465.29,-126.92 473.63,-133.45 475.88,-126.82"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-309C359.31,-295.75 348.89,-278.03 294,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.65,-261.24C582.52,-268.64 539.72,-278.66 502,-288 466.11,-296.89 457.61,-316.95 421.5,-309"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge14" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M509.97,-155.75C475.77,-155.41 424.43,-151.8 383,-135.79 339.63,-119.03 341.38,-58.04 298,-74.79"/>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="proc~~solve_wbs~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.19,-171.24C611.36,-173.89 599.63,-176.76 588.56,-179.48"/>
+<polygon fill="#000000" stroke="#000000" points="587.5,-176.13 578.62,-181.91 589.16,-182.93 587.5,-176.13"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.91,-220.72C375.2,-209.99 334.84,-195.58 298,-192.79"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="proc~~solve_wbs~~UsesGraph_edge19" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-113C513.87,-106 485.67,-96.51 463.27,-88.53"/>
+<polygon fill="#000000" stroke="#000000" points="464.32,-85.19 453.73,-85.1 461.96,-91.78 464.32,-85.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.79,-148.84C613.36,-137.96 575.65,-122.33 541.5,-113"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge17" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.42,-220.66C398.15,-216.47 390.11,-211.61 383,-206.79 366.21,-195.43 364.02,-189.81 347,-178.79 342.2,-175.68 336.99,-172.62 331.82,-169.75"/>
-<polygon fill="#000000" stroke="#000000" points="333.12,-166.47 322.65,-164.81 329.8,-172.63 333.12,-166.47"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-113C396.06,-111.17 370.08,-110.89 347.87,-111.17"/>
+<polygon fill="#000000" stroke="#000000" points="347.57,-107.67 337.63,-111.34 347.68,-114.67 347.57,-107.67"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="proc~~solve_wbs~~UsesGraph_edge16" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.5,-113C488.91,-99.19 473.79,-117.08 421.5,-113"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-113C361.13,-108.45 352.35,-68.24 294,-73"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="proc~~solve_wbs~~UsesGraph_edge20" class="edge">
+<g id="proc~~solve_wbs~~UsesGraph_edge21" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.1,-86.79C500.42,-90.75 487.26,-95.21 474.94,-99.39"/>
-<polygon fill="#000000" stroke="#000000" points="473.63,-96.14 465.29,-102.66 475.88,-102.77 473.63,-96.14"/>
-</g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-74.79C370.54,-83.06 351.53,-53.65 298,-74.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.37,-72.07C487.03,-71.03 456.36,-70.89 429.5,-74.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.34,-203.08C497.84,-211.83 473.97,-223.77 454.68,-233.41"/>
+<polygon fill="#000000" stroke="#000000" points="453.01,-230.33 445.63,-237.93 456.14,-236.59 453.01,-230.33"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="proc~~solve_wbs~~UsesGraph_edge19" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-74.79C383.82,-81.13 341.64,-112.8 317.84,-133.79"/>
-<polygon fill="#000000" stroke="#000000" points="315.27,-131.39 310.22,-140.71 319.98,-136.58 315.27,-131.39"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.75,-102.72C369.76,-88.43 317.04,-67.44 298,-74.79"/>
-</g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge22" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.39,-125.68C377.52,-129.46 362.86,-133.76 349.06,-137.81"/>
-<polygon fill="#000000" stroke="#000000" points="347.82,-134.53 339.21,-140.7 349.79,-141.24 347.82,-134.53"/>
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M502.27,-200.72C479.16,-205.82 448.77,-210.86 421.5,-210"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-210C370.08,-208.45 328.24,-161.35 307.66,-133.36"/>
+<polygon fill="#000000" stroke="#000000" points="310.39,-131.16 301.75,-125.03 304.68,-135.21 310.39,-131.16"/>
 </g>
-<!-- iso_fortran_env -->
-<g id="proc~~solve_wbs~~UsesGraph_node14" class="node">
-<title>iso_fortran_env</title>
-<g id="a_proc~~solve_wbs~~UsesGraph_node14"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="87,-204.79 0,-204.79 0,-180.79 87,-180.79 87,-204.79"/>
-<text text-anchor="middle" x="43.5" y="-190.39" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
-</a>
+<!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
+<g id="proc~~solve_wbs~~UsesGraph_edge20" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.5,-210C360.99,-208.16 346.14,-276.62 294,-250"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292,-250C234.28,-220.53 194.83,-150.62 177.68,-114.87"/>
+<polygon fill="#000000" stroke="#000000" points="180.64,-112.95 173.25,-105.36 174.29,-115.9 180.64,-112.95"/>
 </g>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="proc~~solve_wbs~~UsesGraph_edge24" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.85,-85C369.3,-89 355.16,-93.51 341.94,-97.72"/>
+<polygon fill="#000000" stroke="#000000" points="340.53,-94.5 332.06,-100.87 342.65,-101.17 340.53,-94.5"/>
 </g>
-<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
 <g id="proc~~solve_wbs~~UsesGraph_edge23" class="edge">
-<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-192.79C114.58,-192.79 105.86,-192.79 97.36,-192.79"/>
-<polygon fill="#000000" stroke="#000000" points="97.13,-189.29 87.13,-192.79 97.13,-196.29 97.13,-189.29"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="proc~~solve_wbs~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.22,-154.79C616.92,-154.79 607,-154.79 597.47,-154.79"/>
-<polygon fill="#000000" stroke="#000000" points="597.34,-151.29 587.34,-154.79 597.34,-158.29 597.34,-151.29"/>
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M376.74,-71.28C352.44,-70.73 321.47,-70.76 294,-73"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
 <g id="proc~~solve_wbs~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-194.79C521.97,-200.9 493.99,-209.81 471.68,-217.47"/>
-<polygon fill="#000000" stroke="#000000" points="470.47,-214.18 462.18,-220.77 472.77,-220.79 470.47,-214.18"/>
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M395.25,-43.03C370.5,-54.35 330.64,-70.01 294,-73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292,-73C268.64,-74.9 243.04,-78.73 221.2,-82.54"/>
+<polygon fill="#000000" stroke="#000000" points="220.35,-79.13 211.12,-84.34 221.58,-86.02 220.35,-79.13"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
 <g id="proc~~solve_wbs~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.74,-142.57C638.39,-138.37 630.25,-133.53 623,-128.79 605.88,-117.6 587.32,-103.95 573.13,-93.18"/>
-<polygon fill="#000000" stroke="#000000" points="574.99,-90.19 564.92,-86.89 570.73,-95.75 574.99,-90.19"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-192.79C370.15,-187.97 355.39,-197.13 298,-192.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-192.79C271.5,-190.94 244.29,-190.69 221.27,-191"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-187.5 211.02,-191.18 221.08,-194.5 220.96,-187.5"/>
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M248.28,-105.95C239.57,-104.54 230.33,-103.05 221.33,-101.6"/>
+<polygon fill="#000000" stroke="#000000" points="221.75,-98.12 211.32,-99.99 220.64,-105.04 221.75,-98.12"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
 <g id="proc~~solve_wbs~~UsesGraph_edge28" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.5,-192.79C395.21,-190.08 360.18,-178.71 334.71,-168.78"/>
-<polygon fill="#000000" stroke="#000000" points="335.68,-165.4 325.1,-164.93 333.08,-171.9 335.68,-165.4"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.5,-194.79C496.49,-206.99 481.77,-197.18 429.5,-192.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.26,-166.89C613.6,-175.77 579.91,-187.52 549.5,-194.79"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge29" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-164.79C244.68,-168.83 230.09,-173.39 216.5,-177.63"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-174.34 206.82,-180.66 217.41,-181.02 215.32,-174.34"/>
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.34,-296.92C497.84,-288.17 473.97,-276.23 454.68,-266.59"/>
+<polygon fill="#000000" stroke="#000000" points="456.14,-263.41 445.63,-262.07 453.01,-269.67 456.14,-263.41"/>
 </g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge30" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M383.23,-46.83C357.97,-54.1 325.88,-64.03 298,-74.79"/>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="proc~~solve_wbs~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M501.85,-313.09C478.46,-314.63 447.91,-314.81 421.5,-309"/>
 </g>
 <!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="proc~~solve_wbs~~UsesGraph_edge31" class="edge">
+<g id="proc~~solve_wbs~~UsesGraph_edge29" class="edge">
 <title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M628.63,-22.73C572.61,-7.58 467.3,13.33 383,-13.79 338.73,-28.03 341.25,-57.71 298,-74.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-74.79C245.6,-94.17 203.2,-143.97 182.19,-172.3"/>
-<polygon fill="#000000" stroke="#000000" points="179.15,-170.52 176.13,-180.67 184.83,-174.62 179.15,-170.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.44,-24.13C252.71,-37.67 218.96,-59.71 195.24,-75.2"/>
+<polygon fill="#000000" stroke="#000000" points="193.15,-72.39 186.69,-80.79 196.98,-78.25 193.15,-72.39"/>
+</g>
+<!-- iso_fortran_env -->
+<g id="proc~~solve_wbs~~UsesGraph_node14" class="node">
+<title>iso_fortran_env</title>
+<g id="a_proc~~solve_wbs~~UsesGraph_node14"><a xlink:href="http://fortranwiki.org/fortran/show/ISO_FORTRAN_ENV" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="87,-105 0,-105 0,-81 87,-81 87,-105"/>
+<text text-anchor="middle" x="43.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+</a>
+</g>
+</g>
+<!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
+<g id="proc~~solve_wbs~~UsesGraph_edge30" class="edge">
+<title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-93C114.58,-93 105.86,-93 97.36,-93"/>
+<polygon fill="#000000" stroke="#000000" points="97.13,-89.5 87.13,-93 97.13,-96.5 97.13,-89.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_collision_casemerge.html b/docs/proc/symba_collision_casemerge.html
index 304bb83fa..ccc83e045 100644
--- a/docs/proc/symba_collision_casemerge.html
+++ b/docs/proc/symba_collision_casemerge.html
@@ -518,25 +518,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M446.12,-22.16C454.68,-23.02 463.27,-23.88 471.66,-24.72"/>
 <polygon fill="#000000" stroke="#000000" points="471.48,-28.22 481.78,-25.73 472.18,-21.25 471.48,-28.22"/>
 </g>
-<!-- interface~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_casemerge~~CalledByGraph_node5" class="node">
-<title>interface~symba_collision_resolve_mergers</title>
-<g id="a_proc~~symba_collision_casemerge~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
-<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-66 15.5,-66 15.5,-42 189.5,-42 189.5,-66"/>
-<text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_casemerge~~CalledByGraph_edge4" class="edge">
-<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-54C208.06,-54 227.46,-54 246.09,-54"/>
-<polygon fill="#000000" stroke="#000000" points="246.34,-57.5 256.34,-54 246.34,-50.5 246.34,-57.5"/>
-</g>
 <!-- interface~symba_collision_resolve_fragmentations -->
-<g id="proc~~symba_collision_casemerge~~CalledByGraph_node6" class="node">
+<g id="proc~~symba_collision_casemerge~~CalledByGraph_node5" class="node">
 <title>interface~symba_collision_resolve_fragmentations</title>
-<g id="a_proc~~symba_collision_casemerge~~CalledByGraph_node6"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
+<g id="a_proc~~symba_collision_casemerge~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
 <polygon fill="#a7506f" stroke="#a7506f" points="205,-24 0,-24 0,0 205,0 205,-24"/>
 <text text-anchor="middle" x="102.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
 </a>
@@ -548,6 +533,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.2,-12C213.7,-12 222.31,-12 230.87,-12"/>
 <polygon fill="#000000" stroke="#000000" points="230.89,-15.5 240.89,-12 230.89,-8.5 230.89,-15.5"/>
 </g>
+<!-- interface~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_casemerge~~CalledByGraph_node6" class="node">
+<title>interface~symba_collision_resolve_mergers</title>
+<g id="a_proc~~symba_collision_casemerge~~CalledByGraph_node6"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
+<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-66 15.5,-66 15.5,-42 189.5,-42 189.5,-66"/>
+<text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_casemerge~~CalledByGraph_edge4" class="edge">
+<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-54C208.06,-54 227.46,-54 246.09,-54"/>
+<polygon fill="#000000" stroke="#000000" points="246.34,-57.5 256.34,-54 246.34,-50.5 246.34,-57.5"/>
+</g>
 </g>
 </svg>
 </div><script>var panprocsymba_collision_casemergeCalledByGraph = svgPanZoom('#procsymba_collision_casemergeCalledByGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/symba_collision_check_encounter.html b/docs/proc/symba_collision_check_encounter.html
index 614e0f88f..e1aadb36f 100644
--- a/docs/proc/symba_collision_check_encounter.html
+++ b/docs/proc/symba_collision_check_encounter.html
@@ -136,7 +136,7 @@ <h1>symba_collision_check_encounter
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">102 statements</a>
+    title=" 0.1% of total for procedures.">102 statements</a>
      </li> 
      
      
@@ -362,44 +362,44 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="175,-45 0,-45 0,-21 175,-21 175,-45"/>
 <text text-anchor="middle" x="87.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision_check_encounter</text>
 </g>
-<!-- fraggle_io_log_one_message -->
-<g id="proc~~symba_collision_check_encounter~~CallsGraph_node2" class="node">
-<title>fraggle_io_log_one_message</title>
-<polygon fill="#777777" stroke="#777777" points="365,-66 211,-66 211,-42 365,-42 365,-66"/>
-<text text-anchor="middle" x="288" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
-</g>
-<!-- proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message -->
-<g id="proc~~symba_collision_check_encounter~~CallsGraph_edge1" class="edge">
-<title>proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M175.28,-42.18C183.82,-43.08 192.5,-44 201.04,-44.91"/>
-<polygon fill="#000000" stroke="#000000" points="200.67,-48.39 210.99,-45.96 201.41,-41.43 200.67,-48.39"/>
-</g>
 <!-- proc~symba_collision_check_one -->
-<g id="proc~~symba_collision_check_encounter~~CallsGraph_node3" class="node">
+<g id="proc~~symba_collision_check_encounter~~CallsGraph_node2" class="node">
 <title>proc~symba_collision_check_one</title>
-<g id="a_proc~~symba_collision_check_encounter~~CallsGraph_node3"><a xlink:href=".././proc/symba_collision_check_one.html" xlink:title="symba_collision_check_one">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="360.5,-24 215.5,-24 215.5,0 360.5,0 360.5,-24"/>
-<text text-anchor="middle" x="288" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_one</text>
+<g id="a_proc~~symba_collision_check_encounter~~CallsGraph_node2"><a xlink:href=".././proc/symba_collision_check_one.html" xlink:title="symba_collision_check_one">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="360.5,-66 215.5,-66 215.5,-42 360.5,-42 360.5,-66"/>
+<text text-anchor="middle" x="288" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_check_one</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one -->
-<g id="proc~~symba_collision_check_encounter~~CallsGraph_edge2" class="edge">
+<g id="proc~~symba_collision_check_encounter~~CallsGraph_edge1" class="edge">
 <title>proc~symba_collision_check_encounter&#45;&gt;proc~symba_collision_check_one</title>
-<path fill="none" stroke="#000000" d="M175.28,-23.82C185.19,-22.77 195.27,-21.7 205.11,-20.66"/>
-<polygon fill="#000000" stroke="#000000" points="205.69,-24.12 215.27,-19.59 204.95,-17.16 205.69,-24.12"/>
+<path fill="none" stroke="#000000" d="M175.28,-42.18C185.19,-43.23 195.27,-44.3 205.11,-45.34"/>
+<polygon fill="#000000" stroke="#000000" points="204.95,-48.84 215.27,-46.41 205.69,-41.88 204.95,-48.84"/>
+</g>
+<!-- fraggle_io_log_one_message -->
+<g id="proc~~symba_collision_check_encounter~~CallsGraph_node3" class="node">
+<title>fraggle_io_log_one_message</title>
+<polygon fill="#777777" stroke="#777777" points="365,-24 211,-24 211,0 365,0 365,-24"/>
+<text text-anchor="middle" x="288" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+</g>
+<!-- proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message -->
+<g id="proc~~symba_collision_check_encounter~~CallsGraph_edge2" class="edge">
+<title>proc~symba_collision_check_encounter&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M175.28,-23.82C183.82,-22.92 192.5,-22 201.04,-21.09"/>
+<polygon fill="#000000" stroke="#000000" points="201.41,-24.57 210.99,-20.04 200.67,-17.61 201.41,-24.57"/>
 </g>
 <!-- orbel_xv2aeq -->
 <g id="proc~~symba_collision_check_encounter~~CallsGraph_node4" class="node">
 <title>orbel_xv2aeq</title>
-<polygon fill="#777777" stroke="#777777" points="478,-24 401,-24 401,0 478,0 478,-24"/>
-<text text-anchor="middle" x="439.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
+<polygon fill="#777777" stroke="#777777" points="478,-66 401,-66 401,-42 478,-42 478,-66"/>
+<text text-anchor="middle" x="439.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel_xv2aeq</text>
 </g>
 <!-- proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq -->
 <g id="proc~~symba_collision_check_encounter~~CallsGraph_edge3" class="edge">
 <title>proc~symba_collision_check_one&#45;&gt;orbel_xv2aeq</title>
-<path fill="none" stroke="#000000" d="M360.68,-12C370.92,-12 381.23,-12 390.85,-12"/>
-<polygon fill="#000000" stroke="#000000" points="390.98,-15.5 400.98,-12 390.98,-8.5 390.98,-15.5"/>
+<path fill="none" stroke="#000000" d="M360.68,-54C370.92,-54 381.23,-54 390.85,-54"/>
+<polygon fill="#000000" stroke="#000000" points="390.98,-57.5 400.98,-54 390.98,-50.5 390.98,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_collision_collider_message.html b/docs/proc/symba_collision_collider_message.html
index 3eee113d1..0849a06e8 100644
--- a/docs/proc/symba_collision_collider_message.html
+++ b/docs/proc/symba_collision_collider_message.html
@@ -306,80 +306,80 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="1057,-66 880,-66 880,-42 1057,-42 1057,-66"/>
 <text text-anchor="middle" x="968.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision_collider_message</text>
 </g>
-<!-- proc~symba_collision_casehitandrun -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_node2" class="node">
-<title>proc~symba_collision_casehitandrun</title>
-<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node2"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="843,-24 682,-24 682,0 843,0 843,-24"/>
-<text text-anchor="middle" x="762.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
-</a>
-</g>
-</g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge1" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M821.96,-24.04C846.07,-29 874.18,-34.79 899.24,-39.95"/>
-<polygon fill="#000000" stroke="#000000" points="898.53,-43.37 909.03,-41.96 899.94,-36.52 898.53,-43.37"/>
-</g>
 <!-- proc~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_node3" class="node">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_node2" class="node">
 <title>proc~symba_collision_casedisruption</title>
-<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node3"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="844,-66 681,-66 681,-42 844,-42 844,-66"/>
-<text text-anchor="middle" x="762.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node2"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="844,-24 681,-24 681,0 844,0 844,-24"/>
+<text text-anchor="middle" x="762.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge2" class="edge">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge1" class="edge">
 <title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M844.13,-54C852.53,-54 861.14,-54 869.71,-54"/>
-<polygon fill="#000000" stroke="#000000" points="869.73,-57.5 879.73,-54 869.73,-50.5 869.73,-57.5"/>
+<path fill="none" stroke="#000000" d="M821.96,-24.04C846.07,-29 874.18,-34.79 899.24,-39.95"/>
+<polygon fill="#000000" stroke="#000000" points="898.53,-43.37 909.03,-41.96 899.94,-36.52 898.53,-43.37"/>
 </g>
 <!-- proc~symba_collision_casemerge -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_node4" class="node">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_node3" class="node">
 <title>proc~symba_collision_casemerge</title>
-<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node4"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node3"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="836,-108 689,-108 689,-84 836,-84 836,-108"/>
 <text text-anchor="middle" x="762.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge3" class="edge">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge2" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message</title>
 <path fill="none" stroke="#000000" d="M821.96,-83.96C846.07,-79 874.18,-73.21 899.24,-68.05"/>
 <polygon fill="#000000" stroke="#000000" points="899.94,-71.48 909.03,-66.04 898.53,-64.63 899.94,-71.48"/>
 </g>
-<!-- interface~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_node5" class="node">
-<title>interface~symba_collision_casedisruption</title>
-<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
-<polygon fill="#a7506f" stroke="#a7506f" points="645,-66 482,-66 482,-42 645,-42 645,-66"/>
-<text text-anchor="middle" x="563.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+<!-- proc~symba_collision_casehitandrun -->
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_node4" class="node">
+<title>proc~symba_collision_casehitandrun</title>
+<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node4"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="843,-66 682,-66 682,-42 843,-42 843,-66"/>
+<text text-anchor="middle" x="762.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge5" class="edge">
-<title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.2,-54C653.67,-54 662.33,-54 670.91,-54"/>
-<polygon fill="#000000" stroke="#000000" points="670.93,-57.5 680.93,-54 670.93,-50.5 670.93,-57.5"/>
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge3" class="edge">
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M843.25,-54C851.84,-54 860.66,-54 869.44,-54"/>
+<polygon fill="#000000" stroke="#000000" points="869.71,-57.5 879.71,-54 869.71,-50.5 869.71,-57.5"/>
 </g>
 <!-- interface~symba_collision_casehitandrun -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_node6" class="node">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_node5" class="node">
 <title>interface~symba_collision_casehitandrun</title>
-<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node6"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#a7506f" stroke="#a7506f" points="644,-24 483,-24 483,0 644,0 644,-24"/>
-<text text-anchor="middle" x="563.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#a7506f" stroke="#a7506f" points="644,-66 483,-66 483,-42 644,-42 644,-66"/>
+<text text-anchor="middle" x="563.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
 </a>
 </g>
 </g>
 <!-- interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge4" class="edge">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge6" class="edge">
 <title>interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.06,-12C653.23,-12 662.64,-12 671.93,-12"/>
-<polygon fill="#000000" stroke="#000000" points="671.96,-15.5 681.96,-12 671.96,-8.5 671.96,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.06,-54C653.23,-54 662.64,-54 671.93,-54"/>
+<polygon fill="#000000" stroke="#000000" points="671.96,-57.5 681.96,-54 671.96,-50.5 671.96,-57.5"/>
+</g>
+<!-- interface~symba_collision_casedisruption -->
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_node6" class="node">
+<title>interface~symba_collision_casedisruption</title>
+<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node6"><a xlink:href=".././interface/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<polygon fill="#a7506f" stroke="#a7506f" points="645,-24 482,-24 482,0 645,0 645,-24"/>
+<text text-anchor="middle" x="563.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge4" class="edge">
+<title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.2,-12C653.67,-12 662.33,-12 670.91,-12"/>
+<polygon fill="#000000" stroke="#000000" points="670.93,-15.5 680.93,-12 670.93,-8.5 670.93,-15.5"/>
 </g>
 <!-- interface~symba_collision_casemerge -->
 <g id="proc~~symba_collision_collider_message~~CalledByGraph_node7" class="node">
@@ -391,7 +391,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge6" class="edge">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge5" class="edge">
 <title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.02,-96C650.61,-96 664.92,-96 678.8,-96"/>
 <polygon fill="#000000" stroke="#000000" points="678.81,-99.5 688.81,-96 678.81,-92.5 678.81,-99.5"/>
@@ -420,15 +420,15 @@ <h3 class="panel-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
 <g id="proc~~symba_collision_collider_message~~CalledByGraph_edge7" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
-<path fill="none" stroke="#000000" d="M446.16,-54C454.68,-54 463.27,-54 471.7,-54"/>
-<polygon fill="#000000" stroke="#000000" points="471.9,-57.5 481.9,-54 471.9,-50.5 471.9,-57.5"/>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
+<path fill="none" stroke="#000000" d="M446.16,-54C455.02,-54 463.94,-54 472.69,-54"/>
+<polygon fill="#000000" stroke="#000000" points="472.87,-57.5 482.87,-54 472.87,-50.5 472.87,-57.5"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
 <g id="proc~~symba_collision_collider_message~~CalledByGraph_edge8" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
 <path fill="none" stroke="#000000" d="M406.97,-41.96C432.85,-36.98 463.05,-31.16 489.91,-25.99"/>
 <polygon fill="#000000" stroke="#000000" points="490.86,-29.37 500.02,-24.04 489.54,-22.49 490.86,-29.37"/>
 </g>
@@ -438,25 +438,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M406.97,-66.04C432.85,-71.02 463.05,-76.84 489.91,-82.01"/>
 <polygon fill="#000000" stroke="#000000" points="489.54,-85.51 500.02,-83.96 490.86,-78.63 489.54,-85.51"/>
 </g>
-<!-- interface~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_node10" class="node">
-<title>interface~symba_collision_resolve_mergers</title>
-<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node10"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
-<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-108 15.5,-108 15.5,-84 189.5,-84 189.5,-108"/>
-<text text-anchor="middle" x="102.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge11" class="edge">
-<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-96C208.06,-96 227.46,-96 246.09,-96"/>
-<polygon fill="#000000" stroke="#000000" points="246.34,-99.5 256.34,-96 246.34,-92.5 246.34,-99.5"/>
-</g>
 <!-- interface~symba_collision_resolve_fragmentations -->
-<g id="proc~~symba_collision_collider_message~~CalledByGraph_node11" class="node">
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_node10" class="node">
 <title>interface~symba_collision_resolve_fragmentations</title>
-<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node11"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
+<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node10"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
 <polygon fill="#a7506f" stroke="#a7506f" points="205,-66 0,-66 0,-42 205,-42 205,-66"/>
 <text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
 </a>
@@ -468,6 +453,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.2,-54C213.7,-54 222.31,-54 230.87,-54"/>
 <polygon fill="#000000" stroke="#000000" points="230.89,-57.5 240.89,-54 230.89,-50.5 230.89,-57.5"/>
 </g>
+<!-- interface~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_node11" class="node">
+<title>interface~symba_collision_resolve_mergers</title>
+<g id="a_proc~~symba_collision_collider_message~~CalledByGraph_node11"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
+<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-108 15.5,-108 15.5,-84 189.5,-84 189.5,-108"/>
+<text text-anchor="middle" x="102.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_collider_message~~CalledByGraph_edge11" class="edge">
+<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-96C208.06,-96 227.46,-96 246.09,-96"/>
+<polygon fill="#000000" stroke="#000000" points="246.34,-99.5 256.34,-96 246.34,-92.5 246.34,-99.5"/>
+</g>
 </g>
 </svg>
 </div><script>var panprocsymba_collision_collider_messageCalledByGraph = svgPanZoom('#procsymba_collision_collider_messageCalledByGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/symba_collision_consolidate_colliders.html b/docs/proc/symba_collision_consolidate_colliders.html
index c59b1b4f5..4250a4364 100644
--- a/docs/proc/symba_collision_consolidate_colliders.html
+++ b/docs/proc/symba_collision_consolidate_colliders.html
@@ -136,7 +136,7 @@ <h1>symba_collision_consolidate_colliders
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.2% of total for procedures.">101 statements</a>
+    title=" 0.1% of total for procedures.">101 statements</a>
      </li> 
      
      
@@ -344,27 +344,27 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="193,-45 0,-45 0,-21 193,-21 193,-45"/>
 <text text-anchor="middle" x="96.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision_consolidate_colliders</text>
 </g>
-<!-- id_arr -->
+<!-- idx_arr -->
 <g id="proc~~symba_collision_consolidate_colliders~~CallsGraph_node2" class="node">
-<title>id_arr</title>
+<title>idx_arr</title>
 <polygon fill="#777777" stroke="#777777" points="283,-66 229,-66 229,-42 283,-42 283,-66"/>
-<text text-anchor="middle" x="256" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
+<text text-anchor="middle" x="256" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
 <g id="proc~~symba_collision_consolidate_colliders~~CallsGraph_edge1" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
 <path fill="none" stroke="#000000" d="M187.75,-45.03C198.64,-46.48 209.22,-47.9 218.65,-49.15"/>
 <polygon fill="#000000" stroke="#000000" points="218.39,-52.65 228.76,-50.5 219.31,-45.71 218.39,-52.65"/>
 </g>
-<!-- idx_arr -->
+<!-- id_arr -->
 <g id="proc~~symba_collision_consolidate_colliders~~CallsGraph_node3" class="node">
-<title>idx_arr</title>
+<title>id_arr</title>
 <polygon fill="#777777" stroke="#777777" points="283,-24 229,-24 229,0 283,0 283,-24"/>
-<text text-anchor="middle" x="256" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
+<text text-anchor="middle" x="256" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
 <g id="proc~~symba_collision_consolidate_colliders~~CallsGraph_edge2" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
 <path fill="none" stroke="#000000" d="M187.75,-20.97C198.64,-19.52 209.22,-18.1 218.65,-16.85"/>
 <polygon fill="#000000" stroke="#000000" points="219.31,-20.29 228.76,-15.5 218.39,-13.35 219.31,-20.29"/>
 </g>
@@ -485,25 +485,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M446.02,-21.15C454.57,-21.92 463.23,-22.7 471.81,-23.47"/>
 <polygon fill="#000000" stroke="#000000" points="471.56,-26.97 481.83,-24.38 472.19,-19.99 471.56,-26.97"/>
 </g>
-<!-- interface~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_consolidate_colliders~~CalledByGraph_node4" class="node">
-<title>interface~symba_collision_resolve_mergers</title>
-<g id="a_proc~~symba_collision_consolidate_colliders~~CalledByGraph_node4"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
-<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-66 15.5,-66 15.5,-42 189.5,-42 189.5,-66"/>
-<text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_consolidate_colliders~~CalledByGraph_edge3" class="edge">
-<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-54C208.06,-54 227.46,-54 246.09,-54"/>
-<polygon fill="#000000" stroke="#000000" points="246.34,-57.5 256.34,-54 246.34,-50.5 246.34,-57.5"/>
-</g>
 <!-- interface~symba_collision_resolve_fragmentations -->
-<g id="proc~~symba_collision_consolidate_colliders~~CalledByGraph_node5" class="node">
+<g id="proc~~symba_collision_consolidate_colliders~~CalledByGraph_node4" class="node">
 <title>interface~symba_collision_resolve_fragmentations</title>
-<g id="a_proc~~symba_collision_consolidate_colliders~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
+<g id="a_proc~~symba_collision_consolidate_colliders~~CalledByGraph_node4"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
 <polygon fill="#a7506f" stroke="#a7506f" points="205,-24 0,-24 0,0 205,0 205,-24"/>
 <text text-anchor="middle" x="102.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
 </a>
@@ -515,6 +500,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.2,-12C213.7,-12 222.31,-12 230.87,-12"/>
 <polygon fill="#000000" stroke="#000000" points="230.89,-15.5 240.89,-12 230.89,-8.5 230.89,-15.5"/>
 </g>
+<!-- interface~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_consolidate_colliders~~CalledByGraph_node5" class="node">
+<title>interface~symba_collision_resolve_mergers</title>
+<g id="a_proc~~symba_collision_consolidate_colliders~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
+<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-66 15.5,-66 15.5,-42 189.5,-42 189.5,-66"/>
+<text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_consolidate_colliders~~CalledByGraph_edge3" class="edge">
+<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-54C208.06,-54 227.46,-54 246.09,-54"/>
+<polygon fill="#000000" stroke="#000000" points="246.34,-57.5 256.34,-54 246.34,-50.5 246.34,-57.5"/>
+</g>
 </g>
 </svg>
 </div><script>var panprocsymba_collision_consolidate_collidersCalledByGraph = svgPanZoom('#procsymba_collision_consolidate_collidersCalledByGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/symba_collision_mergeaddsub.html b/docs/proc/symba_collision_mergeaddsub.html
index 3955706e5..a0dee9319 100644
--- a/docs/proc/symba_collision_mergeaddsub.html
+++ b/docs/proc/symba_collision_mergeaddsub.html
@@ -433,80 +433,80 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="1040,-66 880,-66 880,-42 1040,-42 1040,-66"/>
 <text text-anchor="middle" x="960" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision_mergeaddsub</text>
 </g>
-<!-- proc~symba_collision_casehitandrun -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node2" class="node">
-<title>proc~symba_collision_casehitandrun</title>
-<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node2"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="843,-24 682,-24 682,0 843,0 843,-24"/>
-<text text-anchor="middle" x="762.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
-</a>
-</g>
-</g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge1" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M819.52,-24.04C842.43,-28.96 869.1,-34.69 892.94,-39.81"/>
-<polygon fill="#000000" stroke="#000000" points="892.46,-43.28 902.97,-41.96 893.93,-36.44 892.46,-43.28"/>
-</g>
 <!-- proc~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node3" class="node">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node2" class="node">
 <title>proc~symba_collision_casedisruption</title>
-<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node3"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="844,-66 681,-66 681,-42 844,-42 844,-66"/>
-<text text-anchor="middle" x="762.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node2"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="844,-24 681,-24 681,0 844,0 844,-24"/>
+<text text-anchor="middle" x="762.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge2" class="edge">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge1" class="edge">
 <title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M844.15,-54C852.52,-54 861.07,-54 869.53,-54"/>
-<polygon fill="#000000" stroke="#000000" points="869.8,-57.5 879.8,-54 869.8,-50.5 869.8,-57.5"/>
+<path fill="none" stroke="#000000" d="M819.52,-24.04C842.43,-28.96 869.1,-34.69 892.94,-39.81"/>
+<polygon fill="#000000" stroke="#000000" points="892.46,-43.28 902.97,-41.96 893.93,-36.44 892.46,-43.28"/>
 </g>
 <!-- proc~symba_collision_casemerge -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node4" class="node">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node3" class="node">
 <title>proc~symba_collision_casemerge</title>
-<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node4"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node3"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="836,-108 689,-108 689,-84 836,-84 836,-108"/>
 <text text-anchor="middle" x="762.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge3" class="edge">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge2" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub</title>
 <path fill="none" stroke="#000000" d="M819.52,-83.96C842.43,-79.04 869.1,-73.31 892.94,-68.19"/>
 <polygon fill="#000000" stroke="#000000" points="893.93,-71.56 902.97,-66.04 892.46,-64.72 893.93,-71.56"/>
 </g>
-<!-- interface~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node5" class="node">
-<title>interface~symba_collision_casedisruption</title>
-<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
-<polygon fill="#a7506f" stroke="#a7506f" points="645,-66 482,-66 482,-42 645,-42 645,-66"/>
-<text text-anchor="middle" x="563.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+<!-- proc~symba_collision_casehitandrun -->
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node4" class="node">
+<title>proc~symba_collision_casehitandrun</title>
+<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node4"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="843,-66 682,-66 682,-42 843,-42 843,-66"/>
+<text text-anchor="middle" x="762.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
 </a>
 </g>
 </g>
-<!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge5" class="edge">
-<title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.2,-54C653.67,-54 662.33,-54 670.91,-54"/>
-<polygon fill="#000000" stroke="#000000" points="670.93,-57.5 680.93,-54 670.93,-50.5 670.93,-57.5"/>
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge3" class="edge">
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M843.02,-54C851.85,-54 860.89,-54 869.83,-54"/>
+<polygon fill="#000000" stroke="#000000" points="869.87,-57.5 879.87,-54 869.87,-50.5 869.87,-57.5"/>
 </g>
 <!-- interface~symba_collision_casehitandrun -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node6" class="node">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node5" class="node">
 <title>interface~symba_collision_casehitandrun</title>
-<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node6"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#a7506f" stroke="#a7506f" points="644,-24 483,-24 483,0 644,0 644,-24"/>
-<text text-anchor="middle" x="563.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node5"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#a7506f" stroke="#a7506f" points="644,-66 483,-66 483,-42 644,-42 644,-66"/>
+<text text-anchor="middle" x="563.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
 </a>
 </g>
 </g>
 <!-- interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge4" class="edge">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge6" class="edge">
 <title>interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.06,-12C653.23,-12 662.64,-12 671.93,-12"/>
-<polygon fill="#000000" stroke="#000000" points="671.96,-15.5 681.96,-12 671.96,-8.5 671.96,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M644.06,-54C653.23,-54 662.64,-54 671.93,-54"/>
+<polygon fill="#000000" stroke="#000000" points="671.96,-57.5 681.96,-54 671.96,-50.5 671.96,-57.5"/>
+</g>
+<!-- interface~symba_collision_casedisruption -->
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node6" class="node">
+<title>interface~symba_collision_casedisruption</title>
+<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node6"><a xlink:href=".././interface/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<polygon fill="#a7506f" stroke="#a7506f" points="645,-24 482,-24 482,0 645,0 645,-24"/>
+<text text-anchor="middle" x="563.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge4" class="edge">
+<title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M645.2,-12C653.67,-12 662.33,-12 670.91,-12"/>
+<polygon fill="#000000" stroke="#000000" points="670.93,-15.5 680.93,-12 670.93,-8.5 670.93,-15.5"/>
 </g>
 <!-- interface~symba_collision_casemerge -->
 <g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node7" class="node">
@@ -518,7 +518,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge6" class="edge">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge5" class="edge">
 <title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.02,-96C650.61,-96 664.92,-96 678.8,-96"/>
 <polygon fill="#000000" stroke="#000000" points="678.81,-99.5 688.81,-96 678.81,-92.5 678.81,-99.5"/>
@@ -547,15 +547,15 @@ <h3 class="panel-title">Called by</h3>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
 <g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge7" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
-<path fill="none" stroke="#000000" d="M446.16,-54C454.68,-54 463.27,-54 471.7,-54"/>
-<polygon fill="#000000" stroke="#000000" points="471.9,-57.5 481.9,-54 471.9,-50.5 471.9,-57.5"/>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
+<path fill="none" stroke="#000000" d="M446.16,-54C455.02,-54 463.94,-54 472.69,-54"/>
+<polygon fill="#000000" stroke="#000000" points="472.87,-57.5 482.87,-54 472.87,-50.5 472.87,-57.5"/>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
 <g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge8" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
 <path fill="none" stroke="#000000" d="M406.97,-41.96C432.85,-36.98 463.05,-31.16 489.91,-25.99"/>
 <polygon fill="#000000" stroke="#000000" points="490.86,-29.37 500.02,-24.04 489.54,-22.49 490.86,-29.37"/>
 </g>
@@ -565,25 +565,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M406.97,-66.04C432.85,-71.02 463.05,-76.84 489.91,-82.01"/>
 <polygon fill="#000000" stroke="#000000" points="489.54,-85.51 500.02,-83.96 490.86,-78.63 489.54,-85.51"/>
 </g>
-<!-- interface~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node10" class="node">
-<title>interface~symba_collision_resolve_mergers</title>
-<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node10"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
-<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-108 15.5,-108 15.5,-84 189.5,-84 189.5,-108"/>
-<text text-anchor="middle" x="102.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
-</a>
-</g>
-</g>
-<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge11" class="edge">
-<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-96C208.06,-96 227.46,-96 246.09,-96"/>
-<polygon fill="#000000" stroke="#000000" points="246.34,-99.5 256.34,-96 246.34,-92.5 246.34,-99.5"/>
-</g>
 <!-- interface~symba_collision_resolve_fragmentations -->
-<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node11" class="node">
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node10" class="node">
 <title>interface~symba_collision_resolve_fragmentations</title>
-<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node11"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
+<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node10"><a xlink:href=".././interface/symba_collision_resolve_fragmentations.html" xlink:title="symba_collision_resolve_fragmentations">
 <polygon fill="#a7506f" stroke="#a7506f" points="205,-66 0,-66 0,-42 205,-42 205,-66"/>
 <text text-anchor="middle" x="102.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_fragmentations</text>
 </a>
@@ -595,6 +580,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M205.2,-54C213.7,-54 222.31,-54 230.87,-54"/>
 <polygon fill="#000000" stroke="#000000" points="230.89,-57.5 240.89,-54 230.89,-50.5 230.89,-57.5"/>
 </g>
+<!-- interface~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_node11" class="node">
+<title>interface~symba_collision_resolve_mergers</title>
+<g id="a_proc~~symba_collision_mergeaddsub~~CalledByGraph_node11"><a xlink:href=".././interface/symba_collision_resolve_mergers.html" xlink:title="symba_collision_resolve_mergers">
+<polygon fill="#a7506f" stroke="#a7506f" points="189.5,-108 15.5,-108 15.5,-84 189.5,-84 189.5,-108"/>
+<text text-anchor="middle" x="102.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_resolve_mergers</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers -->
+<g id="proc~~symba_collision_mergeaddsub~~CalledByGraph_edge11" class="edge">
+<title>interface~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_resolve_mergers</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189.78,-96C208.06,-96 227.46,-96 246.09,-96"/>
+<polygon fill="#000000" stroke="#000000" points="246.34,-99.5 256.34,-96 246.34,-92.5 246.34,-99.5"/>
+</g>
 </g>
 </svg>
 </div><script>var panprocsymba_collision_mergeaddsubCalledByGraph = svgPanZoom('#procsymba_collision_mergeaddsubCalledByGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/symba_collision_resolve_fragmentations.html b/docs/proc/symba_collision_resolve_fragmentations.html
index e1f5f388d..97132573d 100644
--- a/docs/proc/symba_collision_resolve_fragmentations.html
+++ b/docs/proc/symba_collision_resolve_fragmentations.html
@@ -295,41 +295,38 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~symba_collision_resolve_fragmentations~~CallsGraph Pages: 1 -->
-<svg id="procsymba_collision_resolve_fragmentationsCallsGraph" width="641pt" height="199pt"
- viewBox="0.00 0.00 641.00 198.68" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph" class="graph" transform="scale(0.65 0.65) rotate(0) translate(4 301)">
+<svg id="procsymba_collision_resolve_fragmentationsCallsGraph" width="641pt" height="185pt"
+ viewBox="0.00 0.00 641.00 185.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph" class="graph" transform="scale(0.65 0.65) rotate(0) translate(4 280)">
 <title>proc~~symba_collision_resolve_fragmentations~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-301 980,-301 980,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-280 980,-280 980,4 -4,4"/>
 <!-- proc~symba_collision_resolve_fragmentations -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node1" class="node">
 <title>proc~symba_collision_resolve_fragmentations</title>
 <polygon fill="none" stroke="black" points="205,-150 0,-150 0,-126 205,-126 205,-150"/>
 <text text-anchor="middle" x="102.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision_resolve_fragmentations</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders -->
+<!-- idx2 -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node2" class="node">
-<title>proc~symba_collision_consolidate_colliders</title>
-<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node2"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="434,-276 241,-276 241,-252 434,-252 434,-276"/>
-<text text-anchor="middle" x="337.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
-</a>
-</g>
+<title>idx2</title>
+<polygon fill="#777777" stroke="#777777" points="364.5,-276 310.5,-276 310.5,-252 364.5,-252 364.5,-276"/>
+<text text-anchor="middle" x="337.5" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx2 -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge1" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders</title>
-<path fill="none" stroke="#000000" d="M115.53,-150.2C138.03,-172.29 188.96,-218.86 241,-243 245.65,-245.15 250.52,-247.09 255.51,-248.84"/>
-<polygon fill="#000000" stroke="#000000" points="254.62,-252.23 265.21,-251.95 256.76,-245.56 254.62,-252.23"/>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx2</title>
+<path fill="none" stroke="#000000" d="M115.53,-150.2C138.03,-172.29 188.96,-218.86 241,-243 259.62,-251.64 281.96,-256.8 300.35,-259.85"/>
+<polygon fill="#000000" stroke="#000000" points="299.98,-263.33 310.39,-261.37 301.03,-256.41 299.98,-263.33"/>
 </g>
-<!-- idx2 -->
+<!-- util_exit -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node3" class="node">
-<title>idx2</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="364.5,-234 310.5,-234 310.5,-210 364.5,-210 364.5,-234"/>
-<text text-anchor="middle" x="337.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
+<text text-anchor="middle" x="337.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;idx2 -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge2" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;idx2</title>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M125.77,-150C152.48,-163.97 198.92,-186.91 241,-201 260.2,-207.43 282.23,-212.42 300.3,-215.93"/>
 <polygon fill="#000000" stroke="#000000" points="299.68,-219.37 310.15,-217.77 300.96,-212.49 299.68,-219.37"/>
 </g>
@@ -345,20 +342,20 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M170.27,-150.04C212.56,-157.66 265.61,-167.22 300.25,-173.47"/>
 <polygon fill="#000000" stroke="#000000" points="299.91,-176.96 310.37,-175.29 301.15,-170.07 299.91,-176.96"/>
 </g>
-<!-- interface~symba_collision_casemerge -->
+<!-- proc~symba_collision_consolidate_colliders -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node5" class="node">
-<title>interface~symba_collision_casemerge</title>
-<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node5"><a xlink:href=".././interface/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
-<polygon fill="#a7506f" stroke="#a7506f" points="411,-66 264,-66 264,-42 411,-42 411,-66"/>
-<text text-anchor="middle" x="337.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
+<title>proc~symba_collision_consolidate_colliders</title>
+<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node5"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="434,-150 241,-150 241,-126 434,-126 434,-150"/>
+<text text-anchor="middle" x="337.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge4" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge</title>
-<path fill="none" stroke="#000000" d="M125.77,-126C152.48,-112.03 198.92,-89.09 241,-75 248.05,-72.64 255.49,-70.47 262.97,-68.5"/>
-<polygon fill="#000000" stroke="#000000" points="263.96,-71.86 272.8,-66.02 262.24,-65.07 263.96,-71.86"/>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders -->
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge5" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;proc~symba_collision_consolidate_colliders</title>
+<path fill="none" stroke="#000000" d="M205.02,-138C213.57,-138 222.23,-138 230.81,-138"/>
+<polygon fill="#000000" stroke="#000000" points="230.83,-141.5 240.83,-138 230.83,-134.5 230.83,-141.5"/>
 </g>
 <!-- interface~symba_collision_casedisruption -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node6" class="node">
@@ -370,196 +367,199 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge5" class="edge">
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge4" class="edge">
 <title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casedisruption</title>
 <path fill="none" stroke="#000000" d="M170.27,-125.96C198.18,-120.93 230.77,-115.06 259.67,-109.85"/>
 <polygon fill="#000000" stroke="#000000" points="260.5,-113.26 269.72,-108.04 259.26,-106.37 260.5,-113.26"/>
 </g>
-<!-- interface~symba_collision_casehitandrun -->
+<!-- interface~symba_collision_casemerge -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node7" class="node">
-<title>interface~symba_collision_casehitandrun</title>
-<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node7"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#a7506f" stroke="#a7506f" points="418,-150 257,-150 257,-126 418,-126 418,-150"/>
-<text text-anchor="middle" x="337.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<title>interface~symba_collision_casemerge</title>
+<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node7"><a xlink:href=".././interface/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<polygon fill="#a7506f" stroke="#a7506f" points="411,-24 264,-24 264,0 411,0 411,-24"/>
+<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge6" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" d="M205.02,-138C218.8,-138 232.86,-138 246.42,-138"/>
-<polygon fill="#000000" stroke="#000000" points="246.68,-141.5 256.68,-138 246.68,-134.5 246.68,-141.5"/>
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casemerge</title>
+<path fill="none" stroke="#000000" d="M115.53,-125.8C138.03,-103.71 188.96,-57.14 241,-33 245.65,-30.85 250.52,-28.91 255.51,-27.16"/>
+<polygon fill="#000000" stroke="#000000" points="256.76,-30.44 265.21,-24.05 254.62,-23.77 256.76,-30.44"/>
 </g>
-<!-- util_exit -->
+<!-- interface~symba_collision_casehitandrun -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node8" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="364.5,-24 310.5,-24 310.5,0 364.5,0 364.5,-24"/>
-<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge7" class="edge">
-<title>proc~symba_collision_resolve_fragmentations&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M115.53,-125.8C138.03,-103.71 188.96,-57.14 241,-33 259.62,-24.36 281.96,-19.2 300.35,-16.15"/>
-<polygon fill="#000000" stroke="#000000" points="301.03,-19.59 310.39,-14.63 299.98,-12.67 301.03,-19.59"/>
+<title>interface~symba_collision_casehitandrun</title>
+<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node8"><a xlink:href=".././interface/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
+<polygon fill="#a7506f" stroke="#a7506f" points="418,-66 257,-66 257,-42 418,-42 418,-66"/>
+<text text-anchor="middle" x="337.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+</a>
 </g>
-<!-- id_arr -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node9" class="node">
-<title>id_arr</title>
-<polygon fill="#777777" stroke="#777777" points="578.5,-255 524.5,-255 524.5,-231 578.5,-231 578.5,-255"/>
-<text text-anchor="middle" x="551.5" y="-240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge8" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
-<path fill="none" stroke="#000000" d="M434.27,-254.51C462.56,-251.71 491.83,-248.81 513.92,-246.62"/>
-<polygon fill="#000000" stroke="#000000" points="514.54,-250.08 524.15,-245.61 513.85,-243.11 514.54,-250.08"/>
+<!-- proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun -->
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge7" class="edge">
+<title>proc~symba_collision_resolve_fragmentations&#45;&gt;interface~symba_collision_casehitandrun</title>
+<path fill="none" stroke="#000000" d="M125.77,-126C152.48,-112.03 198.92,-89.09 241,-75 248.05,-72.64 255.49,-70.47 262.97,-68.5"/>
+<polygon fill="#000000" stroke="#000000" points="263.96,-71.86 272.8,-66.02 262.24,-65.07 263.96,-71.86"/>
 </g>
 <!-- idx_arr -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node12" class="node">
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node11" class="node">
 <title>idx_arr</title>
-<polygon fill="#777777" stroke="#777777" points="578.5,-297 524.5,-297 524.5,-273 578.5,-273 578.5,-297"/>
-<text text-anchor="middle" x="551.5" y="-282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
+<polygon fill="#777777" stroke="#777777" points="578.5,-150 524.5,-150 524.5,-126 578.5,-126 578.5,-150"/>
+<text text-anchor="middle" x="551.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
 </g>
 <!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge9" class="edge">
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge8" class="edge">
 <title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
-<path fill="none" stroke="#000000" d="M434.27,-273.49C462.56,-276.29 491.83,-279.19 513.92,-281.38"/>
-<polygon fill="#000000" stroke="#000000" points="513.85,-284.89 524.15,-282.39 514.54,-277.92 513.85,-284.89"/>
+<path fill="none" stroke="#000000" d="M434.27,-138C462.56,-138 491.83,-138 513.92,-138"/>
+<polygon fill="#000000" stroke="#000000" points="514.15,-141.5 524.15,-138 514.15,-134.5 514.15,-141.5"/>
 </g>
-<!-- proc~symba_collision_casemerge -->
+<!-- id_arr -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node13" class="node">
-<title>proc~symba_collision_casemerge</title>
-<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node13"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="625,-66 478,-66 478,-42 625,-42 625,-66"/>
-<text text-anchor="middle" x="551.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
-</a>
-</g>
+<title>id_arr</title>
+<polygon fill="#777777" stroke="#777777" points="578.5,-192 524.5,-192 524.5,-168 578.5,-168 578.5,-192"/>
+<text text-anchor="middle" x="551.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
 </g>
-<!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge10" class="edge">
-<title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.16,-54C429.37,-54 449.03,-54 467.69,-54"/>
-<polygon fill="#000000" stroke="#000000" points="467.93,-57.5 477.93,-54 467.93,-50.5 467.93,-57.5"/>
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge9" class="edge">
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
+<path fill="none" stroke="#000000" d="M399.25,-150.04C436.41,-157.4 482.69,-166.57 514.21,-172.81"/>
+<polygon fill="#000000" stroke="#000000" points="513.81,-176.3 524.3,-174.81 515.17,-169.43 513.81,-176.3"/>
 </g>
 <!-- proc~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node11" class="node">
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node9" class="node">
 <title>proc~symba_collision_casedisruption</title>
-<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node11"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
+<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node9"><a xlink:href=".././proc/symba_collision_casedisruption.html" xlink:title="symba_collision_casedisruption">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="633,-108 470,-108 470,-84 633,-84 633,-108"/>
 <text text-anchor="middle" x="551.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casedisruption</text>
 </a>
 </g>
 </g>
 <!-- interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption -->
-<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge11" class="edge">
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge10" class="edge">
 <title>interface~symba_collision_casedisruption&#45;&gt;proc~symba_collision_casedisruption</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.25,-96C432.49,-96 446.29,-96 459.76,-96"/>
 <polygon fill="#000000" stroke="#000000" points="459.97,-99.5 469.97,-96 459.97,-92.5 459.97,-99.5"/>
 </g>
+<!-- proc~symba_collision_casemerge -->
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node12" class="node">
+<title>proc~symba_collision_casemerge</title>
+<g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node12"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="625,-24 478,-24 478,0 625,0 625,-24"/>
+<text text-anchor="middle" x="551.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
+</a>
+</g>
+</g>
+<!-- interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge -->
+<g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge11" class="edge">
+<title>interface~symba_collision_casemerge&#45;&gt;proc~symba_collision_casemerge</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.16,-12C429.37,-12 449.03,-12 467.69,-12"/>
+<polygon fill="#000000" stroke="#000000" points="467.93,-15.5 477.93,-12 467.93,-8.5 467.93,-15.5"/>
+</g>
 <!-- proc~symba_collision_casehitandrun -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node10" class="node">
 <title>proc~symba_collision_casehitandrun</title>
 <g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node10"><a xlink:href=".././proc/symba_collision_casehitandrun.html" xlink:title="symba_collision_casehitandrun">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="632,-150 471,-150 471,-126 632,-126 632,-150"/>
-<text text-anchor="middle" x="551.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="632,-66 471,-66 471,-42 632,-42 632,-66"/>
+<text text-anchor="middle" x="551.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casehitandrun</text>
 </a>
 </g>
 </g>
 <!-- interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge12" class="edge">
 <title>interface~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_casehitandrun</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.04,-138C431.94,-138 446.49,-138 460.64,-138"/>
-<polygon fill="#000000" stroke="#000000" points="460.86,-141.5 470.86,-138 460.86,-134.5 460.86,-141.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.04,-54C431.94,-54 446.49,-54 460.64,-54"/>
+<polygon fill="#000000" stroke="#000000" points="460.86,-57.5 470.86,-54 460.86,-50.5 460.86,-57.5"/>
 </g>
 <!-- proc~symba_collision_collider_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node14" class="node">
 <title>proc~symba_collision_collider_message</title>
 <g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node14"><a xlink:href=".././proc/symba_collision_collider_message.html" xlink:title="symba_collision_collider_message">
-<polygon fill="#d9534f" stroke="#d9534f" points="846,-150 669,-150 669,-126 846,-126 846,-150"/>
-<text text-anchor="middle" x="757.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_collider_message</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="846,-108 669,-108 669,-84 846,-84 846,-108"/>
+<text text-anchor="middle" x="757.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_collider_message</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
+<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge13" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M632.25,-138C640.84,-138 649.66,-138 658.44,-138"/>
-<polygon fill="#000000" stroke="#000000" points="658.71,-141.5 668.71,-138 658.71,-134.5 658.71,-141.5"/>
+<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M633.13,-96C641.53,-96 650.14,-96 658.71,-96"/>
+<polygon fill="#000000" stroke="#000000" points="658.73,-99.5 668.73,-96 658.73,-92.5 658.73,-99.5"/>
 </g>
 <!-- proc~symba_collision_mergeaddsub -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node15" class="node">
 <title>proc~symba_collision_mergeaddsub</title>
 <g id="a_proc~~symba_collision_resolve_fragmentations~~CallsGraph_node15"><a xlink:href=".././proc/symba_collision_mergeaddsub.html" xlink:title="symba_collision_mergeaddsub">
-<polygon fill="#d9534f" stroke="#d9534f" points="837.5,-108 677.5,-108 677.5,-84 837.5,-84 837.5,-108"/>
-<text text-anchor="middle" x="757.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_mergeaddsub</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="837.5,-66 677.5,-66 677.5,-42 837.5,-42 837.5,-66"/>
+<text text-anchor="middle" x="757.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_mergeaddsub</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
+<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge14" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M610.96,-125.96C635.07,-121 663.18,-115.21 688.24,-110.05"/>
-<polygon fill="#000000" stroke="#000000" points="688.94,-113.48 698.03,-108.04 687.53,-106.63 688.94,-113.48"/>
+<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M610.96,-83.96C635.07,-79 663.18,-73.21 688.24,-68.05"/>
+<polygon fill="#000000" stroke="#000000" points="688.94,-71.48 698.03,-66.04 687.53,-64.63 688.94,-71.48"/>
 </g>
 <!-- fraggle_io_log_one_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node16" class="node">
 <title>fraggle_io_log_one_message</title>
-<polygon fill="#777777" stroke="#777777" points="834.5,-66 680.5,-66 680.5,-42 834.5,-42 834.5,-66"/>
-<text text-anchor="middle" x="757.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<polygon fill="#777777" stroke="#777777" points="834.5,-24 680.5,-24 680.5,0 834.5,0 834.5,-24"/>
+<text text-anchor="middle" x="757.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </g>
-<!-- proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message -->
+<!-- proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge15" class="edge">
-<title>proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M614.76,-125.9C621.16,-123.46 627.37,-120.52 633,-117 653.85,-103.97 648.03,-87.83 669,-75 671.96,-73.19 675.05,-71.54 678.25,-70.03"/>
-<polygon fill="#000000" stroke="#000000" points="679.62,-73.25 687.48,-66.14 676.9,-66.8 679.62,-73.25"/>
+<title>proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M614.76,-83.9C621.16,-81.46 627.37,-78.52 633,-75 653.85,-61.97 648.03,-45.83 669,-33 671.96,-31.19 675.05,-29.54 678.25,-28.03"/>
+<polygon fill="#000000" stroke="#000000" points="679.62,-31.25 687.48,-24.14 676.9,-24.8 679.62,-31.25"/>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message -->
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge16" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M610.96,-108.04C635.07,-113 663.18,-118.79 688.24,-123.95"/>
-<polygon fill="#000000" stroke="#000000" points="687.53,-127.37 698.03,-125.96 688.94,-120.52 687.53,-127.37"/>
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_collider_message</title>
+<path fill="none" stroke="#000000" d="M610.96,-66.04C635.07,-71 663.18,-76.79 688.24,-81.95"/>
+<polygon fill="#000000" stroke="#000000" points="687.53,-85.37 698.03,-83.96 688.94,-78.52 687.53,-85.37"/>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub -->
+<!-- proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge17" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M633.13,-96C644.3,-96 655.82,-96 667.14,-96"/>
-<polygon fill="#000000" stroke="#000000" points="667.46,-99.5 677.46,-96 667.46,-92.5 667.46,-99.5"/>
+<title>proc~symba_collision_casehitandrun&#45;&gt;proc~symba_collision_mergeaddsub</title>
+<path fill="none" stroke="#000000" d="M632.25,-54C643.74,-54 655.64,-54 667.3,-54"/>
+<polygon fill="#000000" stroke="#000000" points="667.48,-57.5 677.48,-54 667.48,-50.5 667.48,-57.5"/>
 </g>
-<!-- proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message -->
+<!-- proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge18" class="edge">
-<title>proc~symba_collision_casedisruption&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M610.96,-83.96C635.07,-79 663.18,-73.21 688.24,-68.05"/>
-<polygon fill="#000000" stroke="#000000" points="688.94,-71.48 698.03,-66.04 687.53,-64.63 688.94,-71.48"/>
+<title>proc~symba_collision_casehitandrun&#45;&gt;fraggle_io_log_one_message</title>
+<path fill="none" stroke="#000000" d="M610.96,-41.96C635.07,-37 663.18,-31.21 688.24,-26.05"/>
+<polygon fill="#000000" stroke="#000000" points="688.94,-29.48 698.03,-24.04 687.53,-22.63 688.94,-29.48"/>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge19" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_collider_message</title>
-<path fill="none" stroke="#000000" d="M614.76,-66.1C621.16,-68.54 627.37,-71.48 633,-75 653.85,-88.03 648.03,-104.17 669,-117 671.96,-118.81 675.05,-120.46 678.25,-121.97"/>
-<polygon fill="#000000" stroke="#000000" points="676.9,-125.2 687.48,-125.86 679.62,-118.75 676.9,-125.2"/>
+<path fill="none" stroke="#000000" d="M614.76,-24.1C621.16,-26.54 627.37,-29.48 633,-33 653.85,-46.03 648.03,-62.17 669,-75 671.96,-76.81 675.05,-78.46 678.25,-79.97"/>
+<polygon fill="#000000" stroke="#000000" points="676.9,-83.2 687.48,-83.86 679.62,-76.75 676.9,-83.2"/>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge20" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;proc~symba_collision_mergeaddsub</title>
-<path fill="none" stroke="#000000" d="M610.96,-66.04C635.07,-71 663.18,-76.79 688.24,-81.95"/>
-<polygon fill="#000000" stroke="#000000" points="687.53,-85.37 698.03,-83.96 688.94,-78.52 687.53,-85.37"/>
+<path fill="none" stroke="#000000" d="M610.96,-24.04C635.07,-29 663.18,-34.79 688.24,-39.95"/>
+<polygon fill="#000000" stroke="#000000" points="687.53,-43.37 698.03,-41.96 688.94,-36.52 687.53,-43.37"/>
 </g>
 <!-- proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge21" class="edge">
 <title>proc~symba_collision_casemerge&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M625.28,-54C639.79,-54 655.15,-54 670.06,-54"/>
-<polygon fill="#000000" stroke="#000000" points="670.3,-57.5 680.3,-54 670.3,-50.5 670.3,-57.5"/>
+<path fill="none" stroke="#000000" d="M625.28,-12C639.79,-12 655.15,-12 670.06,-12"/>
+<polygon fill="#000000" stroke="#000000" points="670.3,-15.5 680.3,-12 670.3,-8.5 670.3,-15.5"/>
 </g>
 <!-- fraggle_io_log_pl -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_node17" class="node">
 <title>fraggle_io_log_pl</title>
-<polygon fill="#777777" stroke="#777777" points="976,-108 882,-108 882,-84 976,-84 976,-108"/>
-<text text-anchor="middle" x="929" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
+<polygon fill="#777777" stroke="#777777" points="976,-66 882,-66 882,-42 976,-42 976,-66"/>
+<text text-anchor="middle" x="929" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_pl</text>
 </g>
 <!-- proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl -->
 <g id="proc~~symba_collision_resolve_fragmentations~~CallsGraph_edge22" class="edge">
 <title>proc~symba_collision_mergeaddsub&#45;&gt;fraggle_io_log_pl</title>
-<path fill="none" stroke="#000000" d="M837.79,-96C849.15,-96 860.64,-96 871.45,-96"/>
-<polygon fill="#000000" stroke="#000000" points="871.57,-99.5 881.57,-96 871.57,-92.5 871.57,-99.5"/>
+<path fill="none" stroke="#000000" d="M837.79,-54C849.15,-54 860.64,-54 871.45,-54"/>
+<polygon fill="#000000" stroke="#000000" points="871.57,-57.5 881.57,-54 871.57,-50.5 871.57,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_collision_resolve_mergers.html b/docs/proc/symba_collision_resolve_mergers.html
index 5abac636f..9a321e596 100644
--- a/docs/proc/symba_collision_resolve_mergers.html
+++ b/docs/proc/symba_collision_resolve_mergers.html
@@ -136,7 +136,7 @@ <h1>symba_collision_resolve_mergers
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
@@ -295,43 +295,43 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~symba_collision_resolve_mergers~~CallsGraph Pages: 1 -->
-<svg id="procsymba_collision_resolve_mergersCallsGraph" width="641pt" height="151pt"
- viewBox="0.00 0.00 641.00 151.19" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 217)">
+<svg id="procsymba_collision_resolve_mergersCallsGraph" width="641pt" height="137pt"
+ viewBox="0.00 0.00 641.00 136.82" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 196)">
 <title>proc~~symba_collision_resolve_mergers~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-217 933,-217 933,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 933,-196 933,4 -4,4"/>
 <!-- proc~symba_collision_resolve_mergers -->
 <g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node1" class="node">
 <title>proc~symba_collision_resolve_mergers</title>
 <polygon fill="none" stroke="black" points="174,-129 0,-129 0,-105 174,-105 174,-129"/>
 <text text-anchor="middle" x="87" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision_resolve_mergers</text>
 </g>
-<!-- proc~symba_collision_consolidate_colliders -->
+<!-- idx2 -->
 <g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node2" class="node">
+<title>idx2</title>
+<polygon fill="#777777" stroke="#777777" points="333.5,-192 279.5,-192 279.5,-168 333.5,-168 333.5,-192"/>
+<text text-anchor="middle" x="306.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
+</g>
+<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx2 -->
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge1" class="edge">
+<title>proc~symba_collision_resolve_mergers&#45;&gt;idx2</title>
+<path fill="none" stroke="#000000" d="M119.79,-129.07C144.23,-138.07 178.95,-150.27 210,-159 229.49,-164.48 251.55,-169.41 269.55,-173.11"/>
+<polygon fill="#000000" stroke="#000000" points="268.86,-176.55 279.36,-175.1 270.25,-169.69 268.86,-176.55"/>
+</g>
+<!-- proc~symba_collision_consolidate_colliders -->
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node3" class="node">
 <title>proc~symba_collision_consolidate_colliders</title>
-<g id="a_proc~~symba_collision_resolve_mergers~~CallsGraph_node2"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="403,-192 210,-192 210,-168 403,-168 403,-192"/>
-<text text-anchor="middle" x="306.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
+<g id="a_proc~~symba_collision_resolve_mergers~~CallsGraph_node3"><a xlink:href=".././proc/symba_collision_consolidate_colliders.html" xlink:title="symba_collision_consolidate_colliders">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="403,-150 210,-150 210,-126 403,-126 403,-150"/>
+<text text-anchor="middle" x="306.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_consolidate_colliders</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge1" class="edge">
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge3" class="edge">
 <title>proc~symba_collision_resolve_mergers&#45;&gt;proc~symba_collision_consolidate_colliders</title>
-<path fill="none" stroke="#000000" d="M119.79,-129.07C144.23,-138.07 178.95,-150.27 210,-159 218.31,-161.34 227.09,-163.57 235.82,-165.66"/>
-<polygon fill="#000000" stroke="#000000" points="235.1,-169.08 245.63,-167.94 236.69,-162.27 235.1,-169.08"/>
-</g>
-<!-- idx2 -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node3" class="node">
-<title>idx2</title>
-<polygon fill="#777777" stroke="#777777" points="333.5,-150 279.5,-150 279.5,-126 333.5,-126 333.5,-150"/>
-<text text-anchor="middle" x="306.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx2</text>
-</g>
-<!-- proc~symba_collision_resolve_mergers&#45;&gt;idx2 -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge2" class="edge">
-<title>proc~symba_collision_resolve_mergers&#45;&gt;idx2</title>
-<path fill="none" stroke="#000000" d="M174.27,-125.33C207.21,-128.51 243.03,-131.97 268.91,-134.47"/>
-<polygon fill="#000000" stroke="#000000" points="268.72,-137.96 279.01,-135.44 269.39,-131 268.72,-137.96"/>
+<path fill="none" stroke="#000000" d="M174.27,-125.33C182.63,-126.14 191.17,-126.96 199.68,-127.78"/>
+<polygon fill="#000000" stroke="#000000" points="199.36,-131.27 209.65,-128.75 200.04,-124.3 199.36,-131.27"/>
 </g>
 <!-- idx1 -->
 <g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node4" class="node">
@@ -340,7 +340,7 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="306.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx1</text>
 </g>
 <!-- proc~symba_collision_resolve_mergers&#45;&gt;idx1 -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge3" class="edge">
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge4" class="edge">
 <title>proc~symba_collision_resolve_mergers&#45;&gt;idx1</title>
 <path fill="none" stroke="#000000" d="M174.27,-108.67C207.21,-105.49 243.03,-102.03 268.91,-99.53"/>
 <polygon fill="#000000" stroke="#000000" points="269.39,-103 279.01,-98.56 268.72,-96.04 269.39,-103"/>
@@ -355,39 +355,39 @@ <h3 class="panel-title">Calls</h3>
 </g>
 </g>
 <!-- proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge4" class="edge">
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge2" class="edge">
 <title>proc~symba_collision_resolve_mergers&#45;&gt;interface~symba_collision_casemerge</title>
 <path fill="none" stroke="#000000" d="M119.79,-104.93C144.23,-95.93 178.95,-83.73 210,-75 218.31,-72.66 227.09,-70.43 235.82,-68.34"/>
 <polygon fill="#000000" stroke="#000000" points="236.69,-71.73 245.63,-66.06 235.1,-64.92 236.69,-71.73"/>
 </g>
-<!-- id_arr -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node6" class="node">
-<title>id_arr</title>
-<polygon fill="#777777" stroke="#777777" points="539.5,-213 485.5,-213 485.5,-189 539.5,-189 539.5,-213"/>
-<text text-anchor="middle" x="512.5" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
-</g>
-<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge5" class="edge">
-<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
-<path fill="none" stroke="#000000" d="M403.23,-189.85C428.97,-192.5 455.24,-195.21 475.46,-197.29"/>
-<polygon fill="#000000" stroke="#000000" points="475.15,-200.78 485.45,-198.32 475.86,-193.81 475.15,-200.78"/>
-</g>
 <!-- idx_arr -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node7" class="node">
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node6" class="node">
 <title>idx_arr</title>
 <polygon fill="#777777" stroke="#777777" points="539.5,-171 485.5,-171 485.5,-147 539.5,-147 539.5,-171"/>
 <text text-anchor="middle" x="512.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">idx_arr</text>
 </g>
 <!-- proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr -->
-<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge6" class="edge">
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge5" class="edge">
 <title>proc~symba_collision_consolidate_colliders&#45;&gt;idx_arr</title>
-<path fill="none" stroke="#000000" d="M403.23,-170.15C428.97,-167.5 455.24,-164.79 475.46,-162.71"/>
-<polygon fill="#000000" stroke="#000000" points="475.86,-166.19 485.45,-161.68 475.15,-159.22 475.86,-166.19"/>
+<path fill="none" stroke="#000000" d="M403.23,-147.85C428.97,-150.5 455.24,-153.21 475.46,-155.29"/>
+<polygon fill="#000000" stroke="#000000" points="475.15,-158.78 485.45,-156.32 475.86,-151.81 475.15,-158.78"/>
 </g>
-<!-- proc~symba_collision_casemerge -->
+<!-- id_arr -->
 <g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node8" class="node">
+<title>id_arr</title>
+<polygon fill="#777777" stroke="#777777" points="539.5,-129 485.5,-129 485.5,-105 539.5,-105 539.5,-129"/>
+<text text-anchor="middle" x="512.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">id_arr</text>
+</g>
+<!-- proc~symba_collision_consolidate_colliders&#45;&gt;id_arr -->
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_edge6" class="edge">
+<title>proc~symba_collision_consolidate_colliders&#45;&gt;id_arr</title>
+<path fill="none" stroke="#000000" d="M403.23,-128.15C428.97,-125.5 455.24,-122.79 475.46,-120.71"/>
+<polygon fill="#000000" stroke="#000000" points="475.86,-124.19 485.45,-119.68 475.15,-117.22 475.86,-124.19"/>
+</g>
+<!-- proc~symba_collision_casemerge -->
+<g id="proc~~symba_collision_resolve_mergers~~CallsGraph_node7" class="node">
 <title>proc~symba_collision_casemerge</title>
-<g id="a_proc~~symba_collision_resolve_mergers~~CallsGraph_node8"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
+<g id="a_proc~~symba_collision_resolve_mergers~~CallsGraph_node7"><a xlink:href=".././proc/symba_collision_casemerge.html" xlink:title="symba_collision_casemerge">
 <polygon fill="#d94e8f" stroke="#d94e8f" points="586,-66 439,-66 439,-42 586,-42 586,-66"/>
 <text text-anchor="middle" x="512.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision_casemerge</text>
 </a>
diff --git a/docs/proc/symba_discard_pl.html b/docs/proc/symba_discard_pl.html
index 6b8c927b1..5bc1cfeac 100644
--- a/docs/proc/symba_discard_pl.html
+++ b/docs/proc/symba_discard_pl.html
@@ -136,7 +136,7 @@ <h1>symba_discard_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">33 statements</a>
+    title=" 0.0% of total for procedures.">33 statements</a>
      </li> 
      
      
@@ -306,62 +306,62 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="99,-45 0,-45 0,-21 99,-21 99,-45"/>
 <text text-anchor="middle" x="49.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_discard_pl</text>
 </g>
-<!-- proc~symba_discard_nonplpl_conservation -->
+<!-- proc~symba_discard_nonplpl -->
 <g id="proc~~symba_discard_pl~~CallsGraph_node2" class="node">
-<title>proc~symba_discard_nonplpl_conservation</title>
-<g id="a_proc~~symba_discard_pl~~CallsGraph_node2"><a xlink:href=".././proc/symba_discard_nonplpl_conservation.html" xlink:title="symba_discard_nonplpl_conservation">
-<polygon fill="#d9534f" stroke="#d9534f" points="327,-66 135,-66 135,-42 327,-42 327,-66"/>
-<text text-anchor="middle" x="231" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl_conservation</text>
+<title>proc~symba_discard_nonplpl</title>
+<g id="a_proc~~symba_discard_pl~~CallsGraph_node2"><a xlink:href=".././proc/symba_discard_nonplpl.html" xlink:title="symba_discard_nonplpl">
+<polygon fill="#d9534f" stroke="#d9534f" points="293.5,-66 168.5,-66 168.5,-42 293.5,-42 293.5,-66"/>
+<text text-anchor="middle" x="231" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation -->
+<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl -->
 <g id="proc~~symba_discard_pl~~CallsGraph_edge1" class="edge">
-<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation</title>
-<path fill="none" stroke="#000000" d="M99.08,-38.68C107.15,-39.63 115.79,-40.64 124.63,-41.67"/>
-<polygon fill="#000000" stroke="#000000" points="124.35,-45.16 134.69,-42.85 125.17,-38.21 124.35,-45.16"/>
+<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl</title>
+<path fill="none" stroke="#000000" d="M99.08,-38.68C117.28,-40.81 138.38,-43.28 158.25,-45.61"/>
+<polygon fill="#000000" stroke="#000000" points="157.85,-49.08 168.19,-46.77 158.67,-42.13 157.85,-49.08"/>
 </g>
-<!-- proc~symba_discard_nonplpl -->
+<!-- proc~symba_discard_nonplpl_conservation -->
 <g id="proc~~symba_discard_pl~~CallsGraph_node3" class="node">
-<title>proc~symba_discard_nonplpl</title>
-<g id="a_proc~~symba_discard_pl~~CallsGraph_node3"><a xlink:href=".././proc/symba_discard_nonplpl.html" xlink:title="symba_discard_nonplpl">
-<polygon fill="#d9534f" stroke="#d9534f" points="293.5,-24 168.5,-24 168.5,0 293.5,0 293.5,-24"/>
-<text text-anchor="middle" x="231" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl</text>
+<title>proc~symba_discard_nonplpl_conservation</title>
+<g id="a_proc~~symba_discard_pl~~CallsGraph_node3"><a xlink:href=".././proc/symba_discard_nonplpl_conservation.html" xlink:title="symba_discard_nonplpl_conservation">
+<polygon fill="#d9534f" stroke="#d9534f" points="327,-24 135,-24 135,0 327,0 327,-24"/>
+<text text-anchor="middle" x="231" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_nonplpl_conservation</text>
 </a>
 </g>
 </g>
-<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl -->
+<!-- proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation -->
 <g id="proc~~symba_discard_pl~~CallsGraph_edge2" class="edge">
-<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl</title>
-<path fill="none" stroke="#000000" d="M99.08,-27.32C117.28,-25.19 138.38,-22.72 158.25,-20.39"/>
-<polygon fill="#000000" stroke="#000000" points="158.67,-23.87 168.19,-19.23 157.85,-16.92 158.67,-23.87"/>
+<title>proc~symba_discard_pl&#45;&gt;proc~symba_discard_nonplpl_conservation</title>
+<path fill="none" stroke="#000000" d="M99.08,-27.32C107.15,-26.37 115.79,-25.36 124.63,-24.33"/>
+<polygon fill="#000000" stroke="#000000" points="125.17,-27.79 134.69,-23.15 124.35,-20.84 125.17,-27.79"/>
 </g>
 <!-- proc~symba_discard_cb_pl -->
 <g id="proc~~symba_discard_pl~~CallsGraph_node4" class="node">
 <title>proc~symba_discard_cb_pl</title>
 <g id="a_proc~~symba_discard_pl~~CallsGraph_node4"><a xlink:href=".././proc/symba_discard_cb_pl.html" xlink:title="symba_discard_cb_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="479,-24 363,-24 363,0 479,0 479,-24"/>
-<text text-anchor="middle" x="421" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_cb_pl</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="479,-66 363,-66 363,-42 479,-42 479,-66"/>
+<text text-anchor="middle" x="421" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard_cb_pl</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl -->
 <g id="proc~~symba_discard_pl~~CallsGraph_edge3" class="edge">
 <title>proc~symba_discard_nonplpl&#45;&gt;proc~symba_discard_cb_pl</title>
-<path fill="none" stroke="#000000" d="M293.56,-12C312.44,-12 333.31,-12 352.56,-12"/>
-<polygon fill="#000000" stroke="#000000" points="352.76,-15.5 362.76,-12 352.76,-8.5 352.76,-15.5"/>
+<path fill="none" stroke="#000000" d="M293.56,-54C312.44,-54 333.31,-54 352.56,-54"/>
+<polygon fill="#000000" stroke="#000000" points="352.76,-57.5 362.76,-54 352.76,-50.5 352.76,-57.5"/>
 </g>
 <!-- fraggle_io_log_one_message -->
 <g id="proc~~symba_discard_pl~~CallsGraph_node5" class="node">
 <title>fraggle_io_log_one_message</title>
-<polygon fill="#777777" stroke="#777777" points="669,-24 515,-24 515,0 669,0 669,-24"/>
-<text text-anchor="middle" x="592" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
+<polygon fill="#777777" stroke="#777777" points="669,-66 515,-66 515,-42 669,-42 669,-66"/>
+<text text-anchor="middle" x="592" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_one_message</text>
 </g>
 <!-- proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message -->
 <g id="proc~~symba_discard_pl~~CallsGraph_edge4" class="edge">
 <title>proc~symba_discard_cb_pl&#45;&gt;fraggle_io_log_one_message</title>
-<path fill="none" stroke="#000000" d="M479.22,-12C487.47,-12 496.12,-12 504.8,-12"/>
-<polygon fill="#000000" stroke="#000000" points="504.97,-15.5 514.97,-12 504.97,-8.5 504.97,-15.5"/>
+<path fill="none" stroke="#000000" d="M479.22,-54C487.47,-54 496.12,-54 504.8,-54"/>
+<polygon fill="#000000" stroke="#000000" points="504.97,-57.5 514.97,-54 504.97,-50.5 504.97,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_encounter_check.html b/docs/proc/symba_encounter_check.html
index 259f261e9..0fcf3bfab 100644
--- a/docs/proc/symba_encounter_check.html
+++ b/docs/proc/symba_encounter_check.html
@@ -136,7 +136,7 @@ <h1>symba_encounter_check
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">65 statements</a>
+    title=" 0.1% of total for procedures.">70 statements</a>
      </li> 
      
      
diff --git a/docs/proc/symba_encounter_check_all.html b/docs/proc/symba_encounter_check_all.html
index 768d7bd88..5fd338066 100644
--- a/docs/proc/symba_encounter_check_all.html
+++ b/docs/proc/symba_encounter_check_all.html
@@ -136,7 +136,7 @@ <h1>symba_encounter_check_all
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">29 statements</a>
+    title=" 0.0% of total for procedures.">27 statements</a>
      </li> 
      
      
@@ -249,7 +249,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-k_plpl~2"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-k_plpl~3"></span>integer(kind=I4B),</td>
   <td>intent(in),</td>
   <td></td>
   
diff --git a/docs/proc/symba_encounter_check_one.html b/docs/proc/symba_encounter_check_one.html
index b48505c92..db870164d 100644
--- a/docs/proc/symba_encounter_check_one.html
+++ b/docs/proc/symba_encounter_check_one.html
@@ -136,7 +136,7 @@ <h1>symba_encounter_check_one
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">16 statements</a>
+    title=" 0.0% of total for procedures.">17 statements</a>
      </li> 
      
      
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-pure elemental module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+pure module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
     
     
    <a href='../interface/symba_encounter_check_one.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
@@ -238,7 +238,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-xr~7"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-xr~8"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-yr~7"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-yr~8"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -268,7 +268,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-zr~7"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-zr~8"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -283,7 +283,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vxr~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-vxr~4"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -298,7 +298,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vyr~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-vyr~4"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -313,7 +313,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-vzr~3"></span>real(kind=DP),</td>
+  <td><span class="anchor" id="variable-vzr~4"></span>real(kind=DP),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -388,7 +388,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-lencounter~5"></span>logical,</td>
+  <td><span class="anchor" id="variable-lencounter~6"></span>logical,</td>
   <td>intent(out)</td>
   <td></td>
   
@@ -403,7 +403,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-lvdotr~4"></span>logical,</td>
+  <td><span class="anchor" id="variable-lvdotr~5"></span>logical,</td>
   <td>intent(out)</td>
   <td></td>
   
@@ -432,47 +432,29 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~symba_encounter_check_one~~CallsGraph Pages: 1 -->
-<svg id="procsymba_encounter_check_oneCallsGraph" width="394pt" height="32pt"
- viewBox="0.00 0.00 394.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="procsymba_encounter_check_oneCallsGraph" width="279pt" height="32pt"
+ viewBox="0.00 0.00 279.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="proc~~symba_encounter_check_one~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
 <title>proc~~symba_encounter_check_one~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 390,-28 390,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 275,-28 275,4 -4,4"/>
 <!-- proc~symba_encounter_check_one -->
 <g id="proc~~symba_encounter_check_one~~CallsGraph_node1" class="node">
 <title>proc~symba_encounter_check_one</title>
 <polygon fill="none" stroke="black" points="156,-24 0,-24 0,0 156,0 156,-24"/>
 <text text-anchor="middle" x="78" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_encounter_check_one</text>
 </g>
-<!-- interface~rmvs_chk_ind -->
+<!-- rmvs_chk_ind -->
 <g id="proc~~symba_encounter_check_one~~CallsGraph_node2" class="node">
-<title>interface~rmvs_chk_ind</title>
-<g id="a_proc~~symba_encounter_check_one~~CallsGraph_node2"><a xlink:href=".././interface/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#a7506f" stroke="#a7506f" points="271,-24 192,-24 192,0 271,0 271,-24"/>
+<title>rmvs_chk_ind</title>
+<polygon fill="#777777" stroke="#777777" points="271,-24 192,-24 192,0 271,0 271,-24"/>
 <text text-anchor="middle" x="231.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
 </g>
-<!-- proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind -->
+<!-- proc~symba_encounter_check_one&#45;&gt;rmvs_chk_ind -->
 <g id="proc~~symba_encounter_check_one~~CallsGraph_edge1" class="edge">
-<title>proc~symba_encounter_check_one&#45;&gt;interface~rmvs_chk_ind</title>
+<title>proc~symba_encounter_check_one&#45;&gt;rmvs_chk_ind</title>
 <path fill="none" stroke="#000000" d="M156.08,-12C164.82,-12 173.53,-12 181.76,-12"/>
 <polygon fill="#000000" stroke="#000000" points="181.88,-15.5 191.88,-12 181.88,-8.5 181.88,-15.5"/>
 </g>
-<!-- proc~rmvs_chk_ind -->
-<g id="proc~~symba_encounter_check_one~~CallsGraph_node3" class="node">
-<title>proc~rmvs_chk_ind</title>
-<g id="a_proc~~symba_encounter_check_one~~CallsGraph_node3"><a xlink:href=".././proc/rmvs_chk_ind.html" xlink:title="rmvs_chk_ind">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="386,-24 307,-24 307,0 386,0 386,-24"/>
-<text text-anchor="middle" x="346.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_chk_ind</text>
-</a>
-</g>
-</g>
-<!-- interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind -->
-<g id="proc~~symba_encounter_check_one~~CallsGraph_edge2" class="edge">
-<title>interface~rmvs_chk_ind&#45;&gt;proc~rmvs_chk_ind</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.07,-12C279.25,-12 288,-12 296.51,-12"/>
-<polygon fill="#000000" stroke="#000000" points="296.72,-15.5 306.72,-12 296.72,-8.5 296.72,-15.5"/>
-</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/symba_encounter_check_pl.html b/docs/proc/symba_encounter_check_pl.html
index bbf3495b6..f50e03b6a 100644
--- a/docs/proc/symba_encounter_check_pl.html
+++ b/docs/proc/symba_encounter_check_pl.html
@@ -136,7 +136,7 @@ <h1>symba_encounter_check_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">47 statements</a>
+    title=" 0.1% of total for procedures.">56 statements</a>
      </li> 
      
      
@@ -319,31 +319,43 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: proc~~symba_encounter_check_pl~~CallsGraph Pages: 1 -->
-<svg id="procsymba_encounter_check_plCallsGraph" width="338pt" height="32pt"
- viewBox="0.00 0.00 338.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~symba_encounter_check_pl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<svg id="procsymba_encounter_check_plCallsGraph" width="338pt" height="74pt"
+ viewBox="0.00 0.00 338.00 74.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~symba_encounter_check_pl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>proc~~symba_encounter_check_pl~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 334,-28 334,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-70 334,-70 334,4 -4,4"/>
 <!-- proc~symba_encounter_check_pl -->
 <g id="proc~~symba_encounter_check_pl~~CallsGraph_node1" class="node">
 <title>proc~symba_encounter_check_pl</title>
-<polygon fill="none" stroke="black" points="146,-24 0,-24 0,0 146,0 146,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_encounter_check_pl</text>
+<polygon fill="none" stroke="black" points="146,-45 0,-45 0,-21 146,-21 146,-45"/>
+<text text-anchor="middle" x="73" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_encounter_check_pl</text>
 </g>
-<!-- proc~symba_encounter_check_all -->
+<!-- util_index_eucl_ij_to_k -->
 <g id="proc~~symba_encounter_check_pl~~CallsGraph_node2" class="node">
+<title>util_index_eucl_ij_to_k</title>
+<polygon fill="#777777" stroke="#777777" points="316,-66 196,-66 196,-42 316,-42 316,-66"/>
+<text text-anchor="middle" x="256" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</g>
+<!-- proc~symba_encounter_check_pl&#45;&gt;util_index_eucl_ij_to_k -->
+<g id="proc~~symba_encounter_check_pl~~CallsGraph_edge1" class="edge">
+<title>proc~symba_encounter_check_pl&#45;&gt;util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M146.06,-41.36C159.12,-42.88 172.73,-44.45 185.72,-45.96"/>
+<polygon fill="#000000" stroke="#000000" points="185.64,-49.48 195.98,-47.15 186.45,-42.52 185.64,-49.48"/>
+</g>
+<!-- proc~symba_encounter_check_all -->
+<g id="proc~~symba_encounter_check_pl~~CallsGraph_node3" class="node">
 <title>proc~symba_encounter_check_all</title>
-<g id="a_proc~~symba_encounter_check_pl~~CallsGraph_node2"><a xlink:href=".././proc/symba_encounter_check_all.html" xlink:title="symba_encounter_check_all">
+<g id="a_proc~~symba_encounter_check_pl~~CallsGraph_node3"><a xlink:href=".././proc/symba_encounter_check_all.html" xlink:title="symba_encounter_check_all">
 <polygon fill="#d9534f" stroke="#d9534f" points="330,-24 182,-24 182,0 330,0 330,-24"/>
 <text text-anchor="middle" x="256" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check_all</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all -->
-<g id="proc~~symba_encounter_check_pl~~CallsGraph_edge1" class="edge">
+<g id="proc~~symba_encounter_check_pl~~CallsGraph_edge2" class="edge">
 <title>proc~symba_encounter_check_pl&#45;&gt;proc~symba_encounter_check_all</title>
-<path fill="none" stroke="#000000" d="M146.06,-12C154.49,-12 163.14,-12 171.71,-12"/>
-<polygon fill="#000000" stroke="#000000" points="171.71,-15.5 181.71,-12 171.71,-8.5 171.71,-15.5"/>
+<path fill="none" stroke="#000000" d="M146.06,-24.64C154.49,-23.66 163.14,-22.66 171.71,-21.66"/>
+<polygon fill="#000000" stroke="#000000" points="172.18,-25.13 181.71,-20.5 171.37,-18.18 172.18,-25.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_encounter_check_tp.html b/docs/proc/symba_encounter_check_tp.html
index e4c926077..4ac9b19ab 100644
--- a/docs/proc/symba_encounter_check_tp.html
+++ b/docs/proc/symba_encounter_check_tp.html
@@ -136,7 +136,7 @@ <h1>symba_encounter_check_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">54 statements</a>
+    title=" 0.1% of total for procedures.">58 statements</a>
      </li> 
      
      
diff --git a/docs/proc/symba_io_param_reader.html b/docs/proc/symba_io_param_reader.html
index 278a1dd10..79735f7bc 100644
--- a/docs/proc/symba_io_param_reader.html
+++ b/docs/proc/symba_io_param_reader.html
@@ -354,51 +354,51 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="133,-87 0,-87 0,-63 133,-63 133,-87"/>
 <text text-anchor="middle" x="66.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_io_param_reader</text>
 </g>
-<!-- fraggle_io_log_start -->
+<!-- io_get_token -->
 <g id="proc~~symba_io_param_reader~~CallsGraph_node2" class="node">
-<title>fraggle_io_log_start</title>
-<polygon fill="#777777" stroke="#777777" points="276,-150 169,-150 169,-126 276,-126 276,-150"/>
-<text text-anchor="middle" x="222.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
+<title>io_get_token</title>
+<polygon fill="#777777" stroke="#777777" points="259.5,-150 185.5,-150 185.5,-126 259.5,-126 259.5,-150"/>
+<text text-anchor="middle" x="222.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start -->
+<!-- proc~symba_io_param_reader&#45;&gt;io_get_token -->
 <g id="proc~~symba_io_param_reader~~CallsGraph_edge1" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start</title>
+<title>proc~symba_io_param_reader&#45;&gt;io_get_token</title>
 <path fill="none" stroke="#000000" d="M96.34,-87.04C116.63,-95.49 144.45,-107.01 169,-117 173.15,-118.69 177.49,-120.44 181.83,-122.19"/>
 <polygon fill="#000000" stroke="#000000" points="180.63,-125.48 191.21,-125.96 183.24,-118.98 180.63,-125.48"/>
 </g>
-<!-- io_param_reader -->
+<!-- io_toupper -->
 <g id="proc~~symba_io_param_reader~~CallsGraph_node3" class="node">
+<title>io_toupper</title>
+<polygon fill="#777777" stroke="#777777" points="254.5,-108 190.5,-108 190.5,-84 254.5,-84 254.5,-108"/>
+<text text-anchor="middle" x="222.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
+</g>
+<!-- proc~symba_io_param_reader&#45;&gt;io_toupper -->
+<g id="proc~~symba_io_param_reader~~CallsGraph_edge4" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;io_toupper</title>
+<path fill="none" stroke="#000000" d="M133.26,-83.97C149.18,-86.14 165.75,-88.4 180.18,-90.37"/>
+<polygon fill="#000000" stroke="#000000" points="179.89,-93.86 190.27,-91.74 180.83,-86.92 179.89,-93.86"/>
+</g>
+<!-- io_param_reader -->
+<g id="proc~~symba_io_param_reader~~CallsGraph_node4" class="node">
 <title>io_param_reader</title>
-<polygon fill="#777777" stroke="#777777" points="270,-108 175,-108 175,-84 270,-84 270,-108"/>
-<text text-anchor="middle" x="222.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
+<polygon fill="#777777" stroke="#777777" points="270,-66 175,-66 175,-42 270,-42 270,-66"/>
+<text text-anchor="middle" x="222.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_param_reader</text>
 </g>
 <!-- proc~symba_io_param_reader&#45;&gt;io_param_reader -->
 <g id="proc~~symba_io_param_reader~~CallsGraph_edge2" class="edge">
 <title>proc~symba_io_param_reader&#45;&gt;io_param_reader</title>
-<path fill="none" stroke="#000000" d="M133.26,-83.97C143.68,-85.39 154.38,-86.85 164.58,-88.24"/>
-<polygon fill="#000000" stroke="#000000" points="164.2,-91.72 174.58,-89.6 165.15,-84.78 164.2,-91.72"/>
+<path fill="none" stroke="#000000" d="M133.26,-66.03C143.68,-64.61 154.38,-63.15 164.58,-61.76"/>
+<polygon fill="#000000" stroke="#000000" points="165.15,-65.22 174.58,-60.4 164.2,-58.28 165.15,-65.22"/>
 </g>
-<!-- io_toupper -->
-<g id="proc~~symba_io_param_reader~~CallsGraph_node4" class="node">
-<title>io_toupper</title>
-<polygon fill="#777777" stroke="#777777" points="254.5,-66 190.5,-66 190.5,-42 254.5,-42 254.5,-66"/>
-<text text-anchor="middle" x="222.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_toupper</text>
-</g>
-<!-- proc~symba_io_param_reader&#45;&gt;io_toupper -->
-<g id="proc~~symba_io_param_reader~~CallsGraph_edge3" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;io_toupper</title>
-<path fill="none" stroke="#000000" d="M133.26,-66.03C149.18,-63.86 165.75,-61.6 180.18,-59.63"/>
-<polygon fill="#000000" stroke="#000000" points="180.83,-63.08 190.27,-58.26 179.89,-56.14 180.83,-63.08"/>
-</g>
-<!-- io_get_token -->
+<!-- fraggle_io_log_start -->
 <g id="proc~~symba_io_param_reader~~CallsGraph_node5" class="node">
-<title>io_get_token</title>
-<polygon fill="#777777" stroke="#777777" points="259.5,-24 185.5,-24 185.5,0 259.5,0 259.5,-24"/>
-<text text-anchor="middle" x="222.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_token</text>
+<title>fraggle_io_log_start</title>
+<polygon fill="#777777" stroke="#777777" points="276,-24 169,-24 169,0 276,0 276,-24"/>
+<text text-anchor="middle" x="222.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io_log_start</text>
 </g>
-<!-- proc~symba_io_param_reader&#45;&gt;io_get_token -->
-<g id="proc~~symba_io_param_reader~~CallsGraph_edge4" class="edge">
-<title>proc~symba_io_param_reader&#45;&gt;io_get_token</title>
+<!-- proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start -->
+<g id="proc~~symba_io_param_reader~~CallsGraph_edge3" class="edge">
+<title>proc~symba_io_param_reader&#45;&gt;fraggle_io_log_start</title>
 <path fill="none" stroke="#000000" d="M96.34,-62.96C116.63,-54.51 144.45,-42.99 169,-33 173.15,-31.31 177.49,-29.56 181.83,-27.81"/>
 <polygon fill="#000000" stroke="#000000" points="183.24,-31.02 191.21,-24.04 180.63,-24.52 183.24,-31.02"/>
 </g>
diff --git a/docs/proc/symba_kick_getacch_pl.html b/docs/proc/symba_kick_getacch_pl.html
index a5d8c2aec..c708deffa 100644
--- a/docs/proc/symba_kick_getacch_pl.html
+++ b/docs/proc/symba_kick_getacch_pl.html
@@ -136,7 +136,7 @@ <h1>symba_kick_getacch_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">27 statements</a>
+    title=" 0.0% of total for procedures.">29 statements</a>
      </li> 
      
      
diff --git a/docs/proc/symba_kick_getacch_tp.html b/docs/proc/symba_kick_getacch_tp.html
index bed8a3855..c8c072307 100644
--- a/docs/proc/symba_kick_getacch_tp.html
+++ b/docs/proc/symba_kick_getacch_tp.html
@@ -136,7 +136,7 @@ <h1>symba_kick_getacch_tp
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">33 statements</a>
+    title=" 0.0% of total for procedures.">33 statements</a>
      </li> 
      
      
diff --git a/docs/proc/symba_setup_encounter.html b/docs/proc/symba_setup_encounter.html
index b3717c0f2..a66eb5431 100644
--- a/docs/proc/symba_setup_encounter.html
+++ b/docs/proc/symba_setup_encounter.html
@@ -251,7 +251,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~35"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~39"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/symba_setup_merger.html b/docs/proc/symba_setup_merger.html
index d86b2fdca..a9ce2209a 100644
--- a/docs/proc/symba_setup_merger.html
+++ b/docs/proc/symba_setup_merger.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~33"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~37"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/symba_setup_pl.html b/docs/proc/symba_setup_pl.html
index fa79a107c..00f598729 100644
--- a/docs/proc/symba_setup_pl.html
+++ b/docs/proc/symba_setup_pl.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~34"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~38"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/symba_setup_tp.html b/docs/proc/symba_setup_tp.html
index 460b97852..5be5b21a5 100644
--- a/docs/proc/symba_setup_tp.html
+++ b/docs/proc/symba_setup_tp.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~36"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~40"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/symba_util_append_merger.html b/docs/proc/symba_util_append_merger.html
index d6dda012e..a9b561e60 100644
--- a/docs/proc/symba_util_append_merger.html
+++ b/docs/proc/symba_util_append_merger.html
@@ -322,33 +322,33 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M128.44,-66.04C145.51,-69.43 164.47,-72.78 182,-75 292.69,-89 424.18,-93.71 490.75,-95.26"/>
 <polygon fill="#000000" stroke="#000000" points="490.79,-98.76 500.86,-95.48 490.94,-91.76 490.79,-98.76"/>
 </g>
-<!-- interface~symba_util_append_pl -->
+<!-- util_exit -->
 <g id="proc~~symba_util_append_merger~~CallsGraph_node3" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="562,-24 508,-24 508,0 562,0 562,-24"/>
+<text text-anchor="middle" x="535" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_append_merger&#45;&gt;util_exit -->
+<g id="proc~~symba_util_append_merger~~CallsGraph_edge2" class="edge">
+<title>proc~symba_util_append_merger&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M128.44,-41.96C145.51,-38.57 164.47,-35.22 182,-33 296.54,-18.51 433.35,-13.97 497.46,-12.59"/>
+<polygon fill="#000000" stroke="#000000" points="497.91,-16.08 507.84,-12.38 497.77,-9.08 497.91,-16.08"/>
+</g>
+<!-- interface~symba_util_append_pl -->
+<g id="proc~~symba_util_append_merger~~CallsGraph_node4" class="node">
 <title>interface~symba_util_append_pl</title>
-<g id="a_proc~~symba_util_append_merger~~CallsGraph_node3"><a xlink:href=".././interface/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
+<g id="a_proc~~symba_util_append_merger~~CallsGraph_node4"><a xlink:href=".././interface/symba_util_append_pl.html" xlink:title="symba_util_append_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="302,-66 182,-66 182,-42 302,-42 302,-66"/>
 <text text-anchor="middle" x="242" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util_append_pl</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl -->
-<g id="proc~~symba_util_append_merger~~CallsGraph_edge2" class="edge">
+<g id="proc~~symba_util_append_merger~~CallsGraph_edge3" class="edge">
 <title>proc~symba_util_append_merger&#45;&gt;interface~symba_util_append_pl</title>
 <path fill="none" stroke="#000000" d="M146.28,-54C154.74,-54 163.35,-54 171.77,-54"/>
 <polygon fill="#000000" stroke="#000000" points="171.92,-57.5 181.92,-54 171.92,-50.5 171.92,-57.5"/>
 </g>
-<!-- util_exit -->
-<g id="proc~~symba_util_append_merger~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="562,-24 508,-24 508,0 562,0 562,-24"/>
-<text text-anchor="middle" x="535" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_append_merger&#45;&gt;util_exit -->
-<g id="proc~~symba_util_append_merger~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_append_merger&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M128.44,-41.96C145.51,-38.57 164.47,-35.22 182,-33 296.54,-18.51 433.35,-13.97 497.46,-12.59"/>
-<polygon fill="#000000" stroke="#000000" points="497.91,-16.08 507.84,-12.38 497.77,-9.08 497.91,-16.08"/>
-</g>
 <!-- proc~symba_util_append_pl -->
 <g id="proc~~symba_util_append_merger~~CallsGraph_node5" class="node">
 <title>proc~symba_util_append_pl</title>
diff --git a/docs/proc/symba_util_append_tp.html b/docs/proc/symba_util_append_tp.html
index 16c277fa7..e8106505e 100644
--- a/docs/proc/symba_util_append_tp.html
+++ b/docs/proc/symba_util_append_tp.html
@@ -323,29 +323,29 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M100.47,-66.04C117.27,-71.22 136.98,-77.31 154.22,-82.64"/>
 <polygon fill="#000000" stroke="#000000" points="153.47,-86.07 164.06,-85.67 155.53,-79.38 153.47,-86.07"/>
 </g>
-<!-- util_append_tp -->
+<!-- util_exit -->
 <g id="proc~~symba_util_append_tp~~CallsGraph_node3" class="node">
-<title>util_append_tp</title>
-<polygon fill="#777777" stroke="#777777" points="240,-66 157,-66 157,-42 240,-42 240,-66"/>
-<text text-anchor="middle" x="198.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="225.5,-66 171.5,-66 171.5,-42 225.5,-42 225.5,-66"/>
+<text text-anchor="middle" x="198.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_util_append_tp&#45;&gt;util_append_tp -->
+<!-- proc~symba_util_append_tp&#45;&gt;util_exit -->
 <g id="proc~~symba_util_append_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;util_append_tp</title>
-<path fill="none" stroke="#000000" d="M121.15,-54C129.58,-54 138.19,-54 146.44,-54"/>
-<polygon fill="#000000" stroke="#000000" points="146.66,-57.5 156.66,-54 146.66,-50.5 146.66,-57.5"/>
+<title>proc~symba_util_append_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M121.15,-54C134.73,-54 148.76,-54 161.03,-54"/>
+<polygon fill="#000000" stroke="#000000" points="161.31,-57.5 171.31,-54 161.31,-50.5 161.31,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_append_tp -->
 <g id="proc~~symba_util_append_tp~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="225.5,-24 171.5,-24 171.5,0 225.5,0 225.5,-24"/>
-<text text-anchor="middle" x="198.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_append_tp</title>
+<polygon fill="#777777" stroke="#777777" points="240,-24 157,-24 157,0 240,0 240,-24"/>
+<text text-anchor="middle" x="198.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </g>
-<!-- proc~symba_util_append_tp&#45;&gt;util_exit -->
+<!-- proc~symba_util_append_tp&#45;&gt;util_append_tp -->
 <g id="proc~~symba_util_append_tp~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_append_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M100.47,-41.96C119.77,-36.01 142.9,-28.86 161.74,-23.04"/>
-<polygon fill="#000000" stroke="#000000" points="162.91,-26.35 171.43,-20.05 160.84,-19.66 162.91,-26.35"/>
+<title>proc~symba_util_append_tp&#45;&gt;util_append_tp</title>
+<path fill="none" stroke="#000000" d="M100.47,-41.96C115.55,-37.31 132.98,-31.93 148.86,-27.02"/>
+<polygon fill="#000000" stroke="#000000" points="150,-30.33 158.52,-24.04 147.93,-23.64 150,-30.33"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_fill_pl.html b/docs/proc/symba_util_fill_pl.html
index 194777aad..76df414fe 100644
--- a/docs/proc/symba_util_fill_pl.html
+++ b/docs/proc/symba_util_fill_pl.html
@@ -307,44 +307,44 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
 <text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_fill_pl</text>
 </g>
-<!-- interface~util_fill -->
+<!-- util_exit -->
 <g id="proc~~symba_util_fill_pl~~CallsGraph_node2" class="node">
-<title>interface~util_fill</title>
-<g id="a_proc~~symba_util_fill_pl~~CallsGraph_node2"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
-<polygon fill="#a7506f" stroke="#a7506f" points="185,-108 131,-108 131,-84 185,-84 185,-108"/>
-<text text-anchor="middle" x="158" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
-</a>
-</g>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="185,-108 131,-108 131,-84 185,-84 185,-108"/>
+<text text-anchor="middle" x="158" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;interface~util_fill -->
+<!-- proc~symba_util_fill_pl&#45;&gt;util_exit -->
 <g id="proc~~symba_util_fill_pl~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;interface~util_fill</title>
+<title>proc~symba_util_fill_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M79.24,-66.04C92.4,-71.11 107.79,-77.04 121.39,-82.28"/>
 <polygon fill="#000000" stroke="#000000" points="120.33,-85.62 130.92,-85.95 122.84,-79.09 120.33,-85.62"/>
 </g>
-<!-- util_fill_pl -->
+<!-- interface~util_fill -->
 <g id="proc~~symba_util_fill_pl~~CallsGraph_node3" class="node">
-<title>util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="186,-66 130,-66 130,-42 186,-42 186,-66"/>
-<text text-anchor="middle" x="158" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<title>interface~util_fill</title>
+<g id="a_proc~~symba_util_fill_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
+<polygon fill="#a7506f" stroke="#a7506f" points="185,-66 131,-66 131,-42 185,-42 185,-66"/>
+<text text-anchor="middle" x="158" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+</a>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;util_fill_pl -->
+</g>
+<!-- proc~symba_util_fill_pl&#45;&gt;interface~util_fill -->
 <g id="proc~~symba_util_fill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M94.23,-54C102.79,-54 111.64,-54 119.89,-54"/>
-<polygon fill="#000000" stroke="#000000" points="119.96,-57.5 129.96,-54 119.96,-50.5 119.96,-57.5"/>
+<title>proc~symba_util_fill_pl&#45;&gt;interface~util_fill</title>
+<path fill="none" stroke="#000000" d="M94.23,-54C103.14,-54 112.35,-54 120.88,-54"/>
+<polygon fill="#000000" stroke="#000000" points="120.88,-57.5 130.88,-54 120.88,-50.5 120.88,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill_pl -->
 <g id="proc~~symba_util_fill_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="185,-24 131,-24 131,0 185,0 185,-24"/>
-<text text-anchor="middle" x="158" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="186,-24 130,-24 130,0 186,0 186,-24"/>
+<text text-anchor="middle" x="158" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </g>
-<!-- proc~symba_util_fill_pl&#45;&gt;util_exit -->
+<!-- proc~symba_util_fill_pl&#45;&gt;util_fill_pl -->
 <g id="proc~~symba_util_fill_pl~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M79.24,-41.96C92.4,-36.89 107.79,-30.96 121.39,-25.72"/>
-<polygon fill="#000000" stroke="#000000" points="122.84,-28.91 130.92,-22.05 120.33,-22.38 122.84,-28.91"/>
+<title>proc~symba_util_fill_pl&#45;&gt;util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M79.24,-41.96C92.09,-37.01 107.08,-31.24 120.44,-26.09"/>
+<polygon fill="#000000" stroke="#000000" points="121.76,-29.33 129.83,-22.47 119.24,-22.8 121.76,-29.33"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_fill_tp.html b/docs/proc/symba_util_fill_tp.html
index b4d2df73c..64db608a2 100644
--- a/docs/proc/symba_util_fill_tp.html
+++ b/docs/proc/symba_util_fill_tp.html
@@ -307,44 +307,44 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="94,-66 0,-66 0,-42 94,-42 94,-66"/>
 <text text-anchor="middle" x="47" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_fill_tp</text>
 </g>
-<!-- interface~util_fill -->
+<!-- util_exit -->
 <g id="proc~~symba_util_fill_tp~~CallsGraph_node2" class="node">
-<title>interface~util_fill</title>
-<g id="a_proc~~symba_util_fill_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
-<polygon fill="#a7506f" stroke="#a7506f" points="185.5,-108 131.5,-108 131.5,-84 185.5,-84 185.5,-108"/>
-<text text-anchor="middle" x="158.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
-</a>
-</g>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="185.5,-108 131.5,-108 131.5,-84 185.5,-84 185.5,-108"/>
+<text text-anchor="middle" x="158.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;interface~util_fill -->
+<!-- proc~symba_util_fill_tp&#45;&gt;util_exit -->
 <g id="proc~~symba_util_fill_tp~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;interface~util_fill</title>
+<title>proc~symba_util_fill_tp&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M79.38,-66.04C92.6,-71.11 108.06,-77.04 121.72,-82.28"/>
 <polygon fill="#000000" stroke="#000000" points="120.71,-85.64 131.3,-85.95 123.21,-79.1 120.71,-85.64"/>
 </g>
-<!-- util_fill_tp -->
+<!-- interface~util_fill -->
 <g id="proc~~symba_util_fill_tp~~CallsGraph_node3" class="node">
-<title>util_fill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="187,-66 130,-66 130,-42 187,-42 187,-66"/>
-<text text-anchor="middle" x="158.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<title>interface~util_fill</title>
+<g id="a_proc~~symba_util_fill_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_fill.html" xlink:title="util_fill">
+<polygon fill="#a7506f" stroke="#a7506f" points="185.5,-66 131.5,-66 131.5,-42 185.5,-42 185.5,-66"/>
+<text text-anchor="middle" x="158.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
+</a>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;util_fill_tp -->
+</g>
+<!-- proc~symba_util_fill_tp&#45;&gt;interface~util_fill -->
 <g id="proc~~symba_util_fill_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;util_fill_tp</title>
-<path fill="none" stroke="#000000" d="M94.12,-54C102.67,-54 111.5,-54 119.77,-54"/>
-<polygon fill="#000000" stroke="#000000" points="119.86,-57.5 129.86,-54 119.86,-50.5 119.86,-57.5"/>
+<title>proc~symba_util_fill_tp&#45;&gt;interface~util_fill</title>
+<path fill="none" stroke="#000000" d="M94.12,-54C103.18,-54 112.56,-54 121.24,-54"/>
+<polygon fill="#000000" stroke="#000000" points="121.41,-57.5 131.41,-54 121.41,-50.5 121.41,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill_tp -->
 <g id="proc~~symba_util_fill_tp~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="185.5,-24 131.5,-24 131.5,0 185.5,0 185.5,-24"/>
-<text text-anchor="middle" x="158.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_fill_tp</title>
+<polygon fill="#777777" stroke="#777777" points="187,-24 130,-24 130,0 187,0 187,-24"/>
+<text text-anchor="middle" x="158.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </g>
-<!-- proc~symba_util_fill_tp&#45;&gt;util_exit -->
+<!-- proc~symba_util_fill_tp&#45;&gt;util_fill_tp -->
 <g id="proc~~symba_util_fill_tp~~CallsGraph_edge3" class="edge">
-<title>proc~symba_util_fill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M79.38,-41.96C92.6,-36.89 108.06,-30.96 121.72,-25.72"/>
-<polygon fill="#000000" stroke="#000000" points="123.21,-28.9 131.3,-22.05 120.71,-22.36 123.21,-28.9"/>
+<title>proc~symba_util_fill_tp&#45;&gt;util_fill_tp</title>
+<path fill="none" stroke="#000000" d="M79.38,-41.96C92.19,-37.05 107.11,-31.33 120.46,-26.21"/>
+<polygon fill="#000000" stroke="#000000" points="121.76,-29.46 129.84,-22.61 119.25,-22.92 121.76,-29.46"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_index_eucl_plpl.html b/docs/proc/symba_util_index_eucl_plpl.html
index afd79bbe9..c40919a7f 100644
--- a/docs/proc/symba_util_index_eucl_plpl.html
+++ b/docs/proc/symba_util_index_eucl_plpl.html
@@ -275,6 +275,104 @@ <h3>Arguments</h3>
     <br>
     
     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Calls</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~symba_util_index_eucl_plpl~~CallsGraph Pages: 1 -->
+<svg id="procsymba_util_index_eucl_plplCallsGraph" width="307pt" height="32pt"
+ viewBox="0.00 0.00 307.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~symba_util_index_eucl_plpl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~symba_util_index_eucl_plpl~~CallsGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 303,-28 303,4 -4,4"/>
+<!-- proc~symba_util_index_eucl_plpl -->
+<g id="proc~~symba_util_index_eucl_plpl~~CallsGraph_node1" class="node">
+<title>proc~symba_util_index_eucl_plpl</title>
+<polygon fill="none" stroke="black" points="143,-24 0,-24 0,0 143,0 143,-24"/>
+<text text-anchor="middle" x="71.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_index_eucl_plpl</text>
+</g>
+<!-- util_index_eucl_ij_to_k -->
+<g id="proc~~symba_util_index_eucl_plpl~~CallsGraph_node2" class="node">
+<title>util_index_eucl_ij_to_k</title>
+<polygon fill="#777777" stroke="#777777" points="299,-24 179,-24 179,0 299,0 299,-24"/>
+<text text-anchor="middle" x="239" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</g>
+<!-- proc~symba_util_index_eucl_plpl&#45;&gt;util_index_eucl_ij_to_k -->
+<g id="proc~~symba_util_index_eucl_plpl~~CallsGraph_edge1" class="edge">
+<title>proc~symba_util_index_eucl_plpl&#45;&gt;util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M143.17,-12C151.6,-12 160.2,-12 168.62,-12"/>
+<polygon fill="#000000" stroke="#000000" points="168.76,-15.5 178.76,-12 168.76,-8.5 168.76,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
      
     <div class="panel panel-default">
       <div class="panel-heading">
diff --git a/docs/proc/symba_util_resize_tp.html b/docs/proc/symba_util_resize_tp.html
index 2b8d72404..756868aa8 100644
--- a/docs/proc/symba_util_resize_tp.html
+++ b/docs/proc/symba_util_resize_tp.html
@@ -291,32 +291,32 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="113,-45 0,-45 0,-21 113,-21 113,-45"/>
 <text text-anchor="middle" x="56.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_resize_tp</text>
 </g>
-<!-- interface~util_resize -->
+<!-- util_resize_tp -->
 <g id="proc~~symba_util_resize_tp~~CallsGraph_node2" class="node">
-<title>interface~util_resize</title>
-<g id="a_proc~~symba_util_resize_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_resize.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="217.5,-66 156.5,-66 156.5,-42 217.5,-42 217.5,-66"/>
-<text text-anchor="middle" x="187" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
-</a>
-</g>
+<title>util_resize_tp</title>
+<polygon fill="#777777" stroke="#777777" points="225,-66 149,-66 149,-42 225,-42 225,-66"/>
+<text text-anchor="middle" x="187" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </g>
-<!-- proc~symba_util_resize_tp&#45;&gt;interface~util_resize -->
+<!-- proc~symba_util_resize_tp&#45;&gt;util_resize_tp -->
 <g id="proc~~symba_util_resize_tp~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_resize_tp&#45;&gt;interface~util_resize</title>
-<path fill="none" stroke="#000000" d="M113.11,-42.09C124.31,-43.92 135.85,-45.8 146.37,-47.52"/>
-<polygon fill="#000000" stroke="#000000" points="146.05,-51.02 156.48,-49.18 147.18,-44.11 146.05,-51.02"/>
+<title>proc~symba_util_resize_tp&#45;&gt;util_resize_tp</title>
+<path fill="none" stroke="#000000" d="M113.11,-42.09C121.7,-43.49 130.49,-44.93 138.87,-46.3"/>
+<polygon fill="#000000" stroke="#000000" points="138.4,-49.77 148.83,-47.93 139.53,-42.86 138.4,-49.77"/>
 </g>
-<!-- util_resize_tp -->
+<!-- interface~util_resize -->
 <g id="proc~~symba_util_resize_tp~~CallsGraph_node3" class="node">
-<title>util_resize_tp</title>
-<polygon fill="#777777" stroke="#777777" points="225,-24 149,-24 149,0 225,0 225,-24"/>
-<text text-anchor="middle" x="187" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<title>interface~util_resize</title>
+<g id="a_proc~~symba_util_resize_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_resize.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="217.5,-24 156.5,-24 156.5,0 217.5,0 217.5,-24"/>
+<text text-anchor="middle" x="187" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+</a>
 </g>
-<!-- proc~symba_util_resize_tp&#45;&gt;util_resize_tp -->
+</g>
+<!-- proc~symba_util_resize_tp&#45;&gt;interface~util_resize -->
 <g id="proc~~symba_util_resize_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_resize_tp&#45;&gt;util_resize_tp</title>
-<path fill="none" stroke="#000000" d="M113.11,-23.91C121.7,-22.51 130.49,-21.07 138.87,-19.7"/>
-<polygon fill="#000000" stroke="#000000" points="139.53,-23.14 148.83,-18.07 138.4,-16.23 139.53,-23.14"/>
+<title>proc~symba_util_resize_tp&#45;&gt;interface~util_resize</title>
+<path fill="none" stroke="#000000" d="M113.11,-23.91C124.31,-22.08 135.85,-20.2 146.37,-18.48"/>
+<polygon fill="#000000" stroke="#000000" points="147.18,-21.89 156.48,-16.82 146.05,-14.98 147.18,-21.89"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_sort_rearrange_arr_kin.html b/docs/proc/symba_util_sort_rearrange_arr_kin.html
index 7f01d6b4f..3aa4a7ef7 100644
--- a/docs/proc/symba_util_sort_rearrange_arr_kin.html
+++ b/docs/proc/symba_util_sort_rearrange_arr_kin.html
@@ -264,7 +264,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~32"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~36"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/symba_util_sort_rearrange_pl.html b/docs/proc/symba_util_sort_rearrange_pl.html
index a462ed51c..8af8ecfaa 100644
--- a/docs/proc/symba_util_sort_rearrange_pl.html
+++ b/docs/proc/symba_util_sort_rearrange_pl.html
@@ -292,32 +292,32 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="155,-45 0,-45 0,-21 155,-21 155,-45"/>
 <text text-anchor="middle" x="77.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_sort_rearrange_pl</text>
 </g>
-<!-- interface~util_sort_rearrange -->
+<!-- util_sort_rearrange_pl -->
 <g id="proc~~symba_util_sort_rearrange_pl~~CallsGraph_node2" class="node">
-<title>interface~util_sort_rearrange</title>
-<g id="a_proc~~symba_util_sort_rearrange_pl~~CallsGraph_node2"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="301.5,-66 198.5,-66 198.5,-42 301.5,-42 301.5,-66"/>
-<text text-anchor="middle" x="250" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
-</a>
-</g>
+<title>util_sort_rearrange_pl</title>
+<polygon fill="#777777" stroke="#777777" points="309,-66 191,-66 191,-42 309,-42 309,-66"/>
+<text text-anchor="middle" x="250" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </g>
-<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange -->
+<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
 <g id="proc~~symba_util_sort_rearrange_pl~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M155.27,-42.46C166.26,-43.81 177.43,-45.19 188.06,-46.49"/>
-<polygon fill="#000000" stroke="#000000" points="187.7,-49.98 198.05,-47.72 188.55,-43.03 187.7,-49.98"/>
+<title>proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
+<path fill="none" stroke="#000000" d="M155.27,-42.46C163.75,-43.5 172.35,-44.56 180.72,-45.59"/>
+<polygon fill="#000000" stroke="#000000" points="180.44,-49.08 190.79,-46.83 181.29,-42.13 180.44,-49.08"/>
 </g>
-<!-- util_sort_rearrange_pl -->
+<!-- interface~util_sort_rearrange -->
 <g id="proc~~symba_util_sort_rearrange_pl~~CallsGraph_node3" class="node">
-<title>util_sort_rearrange_pl</title>
-<polygon fill="#777777" stroke="#777777" points="309,-24 191,-24 191,0 309,0 309,-24"/>
-<text text-anchor="middle" x="250" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
+<title>interface~util_sort_rearrange</title>
+<g id="a_proc~~symba_util_sort_rearrange_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="301.5,-24 198.5,-24 198.5,0 301.5,0 301.5,-24"/>
+<text text-anchor="middle" x="250" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+</a>
 </g>
-<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl -->
+</g>
+<!-- proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange -->
 <g id="proc~~symba_util_sort_rearrange_pl~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_sort_rearrange_pl&#45;&gt;util_sort_rearrange_pl</title>
-<path fill="none" stroke="#000000" d="M155.27,-23.54C163.75,-22.5 172.35,-21.44 180.72,-20.41"/>
-<polygon fill="#000000" stroke="#000000" points="181.29,-23.87 190.79,-19.17 180.44,-16.92 181.29,-23.87"/>
+<title>proc~symba_util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M155.27,-23.54C166.26,-22.19 177.43,-20.81 188.06,-19.51"/>
+<polygon fill="#000000" stroke="#000000" points="188.55,-22.97 198.05,-18.28 187.7,-16.02 188.55,-22.97"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_sort_rearrange_tp.html b/docs/proc/symba_util_sort_rearrange_tp.html
index c584a0ea3..e6f7c5b12 100644
--- a/docs/proc/symba_util_sort_rearrange_tp.html
+++ b/docs/proc/symba_util_sort_rearrange_tp.html
@@ -292,32 +292,32 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="156,-45 0,-45 0,-21 156,-21 156,-45"/>
 <text text-anchor="middle" x="78" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_sort_rearrange_tp</text>
 </g>
-<!-- interface~util_sort_rearrange -->
+<!-- util_sort_rearrange_tp -->
 <g id="proc~~symba_util_sort_rearrange_tp~~CallsGraph_node2" class="node">
-<title>interface~util_sort_rearrange</title>
-<g id="a_proc~~symba_util_sort_rearrange_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="302.5,-66 199.5,-66 199.5,-42 302.5,-42 302.5,-66"/>
-<text text-anchor="middle" x="251" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
-</a>
-</g>
+<title>util_sort_rearrange_tp</title>
+<polygon fill="#777777" stroke="#777777" points="310,-66 192,-66 192,-42 310,-42 310,-66"/>
+<text text-anchor="middle" x="251" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
 </g>
-<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange -->
+<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
 <g id="proc~~symba_util_sort_rearrange_tp~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange</title>
-<path fill="none" stroke="#000000" d="M156.49,-42.52C167.48,-43.87 178.64,-45.24 189.24,-46.54"/>
-<polygon fill="#000000" stroke="#000000" points="188.86,-50.02 199.22,-47.76 189.72,-43.07 188.86,-50.02"/>
+<title>proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" d="M156.49,-42.52C164.98,-43.56 173.56,-44.61 181.92,-45.64"/>
+<polygon fill="#000000" stroke="#000000" points="181.62,-49.13 191.97,-46.87 182.47,-42.18 181.62,-49.13"/>
 </g>
-<!-- util_sort_rearrange_tp -->
+<!-- interface~util_sort_rearrange -->
 <g id="proc~~symba_util_sort_rearrange_tp~~CallsGraph_node3" class="node">
-<title>util_sort_rearrange_tp</title>
-<polygon fill="#777777" stroke="#777777" points="310,-24 192,-24 192,0 310,0 310,-24"/>
-<text text-anchor="middle" x="251" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+<title>interface~util_sort_rearrange</title>
+<g id="a_proc~~symba_util_sort_rearrange_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="302.5,-24 199.5,-24 199.5,0 302.5,0 302.5,-24"/>
+<text text-anchor="middle" x="251" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+</a>
 </g>
-<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp -->
+</g>
+<!-- proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange -->
 <g id="proc~~symba_util_sort_rearrange_tp~~CallsGraph_edge2" class="edge">
-<title>proc~symba_util_sort_rearrange_tp&#45;&gt;util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" d="M156.49,-23.48C164.98,-22.44 173.56,-21.39 181.92,-20.36"/>
-<polygon fill="#000000" stroke="#000000" points="182.47,-23.82 191.97,-19.13 181.62,-16.87 182.47,-23.82"/>
+<title>proc~symba_util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange</title>
+<path fill="none" stroke="#000000" d="M156.49,-23.48C167.48,-22.13 178.64,-20.76 189.24,-19.46"/>
+<polygon fill="#000000" stroke="#000000" points="189.72,-22.93 199.22,-18.24 188.86,-15.98 189.72,-22.93"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_spill_encounter.html b/docs/proc/symba_util_spill_encounter.html
index f6ce10337..5d0539395 100644
--- a/docs/proc/symba_util_spill_encounter.html
+++ b/docs/proc/symba_util_spill_encounter.html
@@ -322,44 +322,44 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="142,-66 0,-66 0,-42 142,-42 142,-66"/>
 <text text-anchor="middle" x="71" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_spill_encounter</text>
 </g>
-<!-- interface~util_spill -->
+<!-- util_exit -->
 <g id="proc~~symba_util_spill_encounter~~CallsGraph_node2" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="257,-108 203,-108 203,-84 257,-84 257,-108"/>
+<text text-anchor="middle" x="230" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_spill_encounter&#45;&gt;util_exit -->
+<g id="proc~~symba_util_spill_encounter~~CallsGraph_edge1" class="edge">
+<title>proc~symba_util_spill_encounter&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M116.99,-66.04C141.03,-72.47 170.24,-80.28 192.8,-86.32"/>
+<polygon fill="#000000" stroke="#000000" points="192.09,-89.75 202.66,-88.95 193.9,-82.99 192.09,-89.75"/>
+</g>
+<!-- interface~util_spill -->
+<g id="proc~~symba_util_spill_encounter~~CallsGraph_node3" class="node">
 <title>interface~util_spill</title>
-<g id="a_proc~~symba_util_spill_encounter~~CallsGraph_node2"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="257,-108 203,-108 203,-84 257,-84 257,-108"/>
-<text text-anchor="middle" x="230" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<g id="a_proc~~symba_util_spill_encounter~~CallsGraph_node3"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="257,-66 203,-66 203,-42 257,-42 257,-66"/>
+<text text-anchor="middle" x="230" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_spill_encounter&#45;&gt;interface~util_spill -->
-<g id="proc~~symba_util_spill_encounter~~CallsGraph_edge3" class="edge">
+<g id="proc~~symba_util_spill_encounter~~CallsGraph_edge2" class="edge">
 <title>proc~symba_util_spill_encounter&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M116.99,-66.04C141.03,-72.47 170.24,-80.28 192.8,-86.32"/>
-<polygon fill="#000000" stroke="#000000" points="192.09,-89.75 202.66,-88.95 193.9,-82.99 192.09,-89.75"/>
+<path fill="none" stroke="#000000" d="M142.23,-54C159.58,-54 177.47,-54 192.46,-54"/>
+<polygon fill="#000000" stroke="#000000" points="192.82,-57.5 202.82,-54 192.82,-50.5 192.82,-57.5"/>
 </g>
 <!-- util_spill_encounter -->
-<g id="proc~~symba_util_spill_encounter~~CallsGraph_node3" class="node">
+<g id="proc~~symba_util_spill_encounter~~CallsGraph_node4" class="node">
 <title>util_spill_encounter</title>
-<polygon fill="#777777" stroke="#777777" points="282,-66 178,-66 178,-42 282,-42 282,-66"/>
-<text text-anchor="middle" x="230" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
+<polygon fill="#777777" stroke="#777777" points="282,-24 178,-24 178,0 282,0 282,-24"/>
+<text text-anchor="middle" x="230" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_encounter</text>
 </g>
 <!-- proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter -->
-<g id="proc~~symba_util_spill_encounter~~CallsGraph_edge2" class="edge">
+<g id="proc~~symba_util_spill_encounter~~CallsGraph_edge3" class="edge">
 <title>proc~symba_util_spill_encounter&#45;&gt;util_spill_encounter</title>
-<path fill="none" stroke="#000000" d="M142.23,-54C150.71,-54 159.31,-54 167.65,-54"/>
-<polygon fill="#000000" stroke="#000000" points="167.65,-57.5 177.65,-54 167.65,-50.5 167.65,-57.5"/>
-</g>
-<!-- util_exit -->
-<g id="proc~~symba_util_spill_encounter~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="257,-24 203,-24 203,0 257,0 257,-24"/>
-<text text-anchor="middle" x="230" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_spill_encounter&#45;&gt;util_exit -->
-<g id="proc~~symba_util_spill_encounter~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_spill_encounter&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M116.99,-41.96C141.03,-35.53 170.24,-27.72 192.8,-21.68"/>
-<polygon fill="#000000" stroke="#000000" points="193.9,-25.01 202.66,-19.05 192.09,-18.25 193.9,-25.01"/>
+<path fill="none" stroke="#000000" d="M116.99,-41.96C134.81,-37.2 155.46,-31.67 174.15,-26.67"/>
+<polygon fill="#000000" stroke="#000000" points="175.25,-30 184,-24.04 173.44,-23.24 175.25,-30"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_spill_pl.html b/docs/proc/symba_util_spill_pl.html
index 9930f17a3..f43400da0 100644
--- a/docs/proc/symba_util_spill_pl.html
+++ b/docs/proc/symba_util_spill_pl.html
@@ -323,44 +323,44 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="102,-66 0,-66 0,-42 102,-42 102,-66"/>
 <text text-anchor="middle" x="51" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_spill_pl</text>
 </g>
-<!-- interface~util_spill -->
+<!-- util_exit -->
 <g id="proc~~symba_util_spill_pl~~CallsGraph_node2" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="197,-108 143,-108 143,-84 197,-84 197,-108"/>
+<text text-anchor="middle" x="170" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_spill_pl&#45;&gt;util_exit -->
+<g id="proc~~symba_util_spill_pl~~CallsGraph_edge1" class="edge">
+<title>proc~symba_util_spill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M85.53,-66.04C100.48,-71.4 118.12,-77.74 133.32,-83.19"/>
+<polygon fill="#000000" stroke="#000000" points="132.31,-86.55 142.9,-86.63 134.67,-79.96 132.31,-86.55"/>
+</g>
+<!-- interface~util_spill -->
+<g id="proc~~symba_util_spill_pl~~CallsGraph_node3" class="node">
 <title>interface~util_spill</title>
-<g id="a_proc~~symba_util_spill_pl~~CallsGraph_node2"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="197,-108 143,-108 143,-84 197,-84 197,-108"/>
-<text text-anchor="middle" x="170" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<g id="a_proc~~symba_util_spill_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="197,-66 143,-66 143,-42 197,-42 197,-66"/>
+<text text-anchor="middle" x="170" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_spill_pl&#45;&gt;interface~util_spill -->
-<g id="proc~~symba_util_spill_pl~~CallsGraph_edge3" class="edge">
+<g id="proc~~symba_util_spill_pl~~CallsGraph_edge2" class="edge">
 <title>proc~symba_util_spill_pl&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M85.53,-66.04C100.48,-71.4 118.12,-77.74 133.32,-83.19"/>
-<polygon fill="#000000" stroke="#000000" points="132.31,-86.55 142.9,-86.63 134.67,-79.96 132.31,-86.55"/>
+<path fill="none" stroke="#000000" d="M102.3,-54C112.58,-54 123.2,-54 132.87,-54"/>
+<polygon fill="#000000" stroke="#000000" points="132.92,-57.5 142.92,-54 132.92,-50.5 132.92,-57.5"/>
 </g>
 <!-- util_spill_pl -->
-<g id="proc~~symba_util_spill_pl~~CallsGraph_node3" class="node">
+<g id="proc~~symba_util_spill_pl~~CallsGraph_node4" class="node">
 <title>util_spill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="202,-66 138,-66 138,-42 202,-42 202,-66"/>
-<text text-anchor="middle" x="170" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<polygon fill="#777777" stroke="#777777" points="202,-24 138,-24 138,0 202,0 202,-24"/>
+<text text-anchor="middle" x="170" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </g>
 <!-- proc~symba_util_spill_pl&#45;&gt;util_spill_pl -->
-<g id="proc~~symba_util_spill_pl~~CallsGraph_edge2" class="edge">
+<g id="proc~~symba_util_spill_pl~~CallsGraph_edge3" class="edge">
 <title>proc~symba_util_spill_pl&#45;&gt;util_spill_pl</title>
-<path fill="none" stroke="#000000" d="M102.3,-54C110.75,-54 119.43,-54 127.62,-54"/>
-<polygon fill="#000000" stroke="#000000" points="127.68,-57.5 137.67,-54 127.67,-50.5 127.68,-57.5"/>
-</g>
-<!-- util_exit -->
-<g id="proc~~symba_util_spill_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="197,-24 143,-24 143,0 197,0 197,-24"/>
-<text text-anchor="middle" x="170" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_spill_pl&#45;&gt;util_exit -->
-<g id="proc~~symba_util_spill_pl~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_spill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M85.53,-41.96C100.48,-36.6 118.12,-30.26 133.32,-24.81"/>
-<polygon fill="#000000" stroke="#000000" points="134.67,-28.04 142.9,-21.37 132.31,-21.45 134.67,-28.04"/>
+<path fill="none" stroke="#000000" d="M85.53,-41.96C98.91,-37.16 114.45,-31.58 128.46,-26.55"/>
+<polygon fill="#000000" stroke="#000000" points="129.64,-29.85 137.87,-23.17 127.28,-23.26 129.64,-29.85"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/symba_util_spill_tp.html b/docs/proc/symba_util_spill_tp.html
index bf3524517..82c9b4f38 100644
--- a/docs/proc/symba_util_spill_tp.html
+++ b/docs/proc/symba_util_spill_tp.html
@@ -323,44 +323,44 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="103,-66 0,-66 0,-42 103,-42 103,-66"/>
 <text text-anchor="middle" x="51.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util_spill_tp</text>
 </g>
-<!-- interface~util_spill -->
+<!-- util_exit -->
 <g id="proc~~symba_util_spill_tp~~CallsGraph_node2" class="node">
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="198.5,-108 144.5,-108 144.5,-84 198.5,-84 198.5,-108"/>
+<text text-anchor="middle" x="171.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+</g>
+<!-- proc~symba_util_spill_tp&#45;&gt;util_exit -->
+<g id="proc~~symba_util_spill_tp~~CallsGraph_edge1" class="edge">
+<title>proc~symba_util_spill_tp&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M86.31,-66.04C101.4,-71.4 119.19,-77.74 134.51,-83.19"/>
+<polygon fill="#000000" stroke="#000000" points="133.59,-86.58 144.18,-86.63 135.93,-79.98 133.59,-86.58"/>
+</g>
+<!-- interface~util_spill -->
+<g id="proc~~symba_util_spill_tp~~CallsGraph_node3" class="node">
 <title>interface~util_spill</title>
-<g id="a_proc~~symba_util_spill_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
-<polygon fill="#a7506f" stroke="#a7506f" points="198.5,-108 144.5,-108 144.5,-84 198.5,-84 198.5,-108"/>
-<text text-anchor="middle" x="171.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<g id="a_proc~~symba_util_spill_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_spill.html" xlink:title="util_spill">
+<polygon fill="#a7506f" stroke="#a7506f" points="198.5,-66 144.5,-66 144.5,-42 198.5,-42 198.5,-66"/>
+<text text-anchor="middle" x="171.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </a>
 </g>
 </g>
 <!-- proc~symba_util_spill_tp&#45;&gt;interface~util_spill -->
-<g id="proc~~symba_util_spill_tp~~CallsGraph_edge3" class="edge">
+<g id="proc~~symba_util_spill_tp~~CallsGraph_edge2" class="edge">
 <title>proc~symba_util_spill_tp&#45;&gt;interface~util_spill</title>
-<path fill="none" stroke="#000000" d="M86.31,-66.04C101.4,-71.4 119.19,-77.74 134.51,-83.19"/>
-<polygon fill="#000000" stroke="#000000" points="133.59,-86.58 144.18,-86.63 135.93,-79.98 133.59,-86.58"/>
+<path fill="none" stroke="#000000" d="M103.23,-54C113.59,-54 124.31,-54 134.06,-54"/>
+<polygon fill="#000000" stroke="#000000" points="134.19,-57.5 144.19,-54 134.19,-50.5 134.19,-57.5"/>
 </g>
 <!-- util_spill_tp -->
-<g id="proc~~symba_util_spill_tp~~CallsGraph_node3" class="node">
+<g id="proc~~symba_util_spill_tp~~CallsGraph_node4" class="node">
 <title>util_spill_tp</title>
-<polygon fill="#777777" stroke="#777777" points="204,-66 139,-66 139,-42 204,-42 204,-66"/>
-<text text-anchor="middle" x="171.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<polygon fill="#777777" stroke="#777777" points="204,-24 139,-24 139,0 204,0 204,-24"/>
+<text text-anchor="middle" x="171.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </g>
 <!-- proc~symba_util_spill_tp&#45;&gt;util_spill_tp -->
-<g id="proc~~symba_util_spill_tp~~CallsGraph_edge2" class="edge">
+<g id="proc~~symba_util_spill_tp~~CallsGraph_edge3" class="edge">
 <title>proc~symba_util_spill_tp&#45;&gt;util_spill_tp</title>
-<path fill="none" stroke="#000000" d="M103.23,-54C111.75,-54 120.5,-54 128.76,-54"/>
-<polygon fill="#000000" stroke="#000000" points="128.91,-57.5 138.91,-54 128.91,-50.5 128.91,-57.5"/>
-</g>
-<!-- util_exit -->
-<g id="proc~~symba_util_spill_tp~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="198.5,-24 144.5,-24 144.5,0 198.5,0 198.5,-24"/>
-<text text-anchor="middle" x="171.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
-</g>
-<!-- proc~symba_util_spill_tp&#45;&gt;util_exit -->
-<g id="proc~~symba_util_spill_tp~~CallsGraph_edge1" class="edge">
-<title>proc~symba_util_spill_tp&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M86.31,-41.96C101.4,-36.6 119.19,-30.26 134.51,-24.81"/>
-<polygon fill="#000000" stroke="#000000" points="135.93,-28.02 144.18,-21.37 133.59,-21.42 135.93,-28.02"/>
+<path fill="none" stroke="#000000" d="M86.31,-41.96C99.7,-37.2 115.23,-31.67 129.27,-26.68"/>
+<polygon fill="#000000" stroke="#000000" points="130.46,-29.97 138.71,-23.32 128.11,-23.37 130.46,-29.97"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/tides_kick_getacch_pl.html b/docs/proc/tides_kick_getacch_pl.html
index 9e54a3069..46fd8670b 100644
--- a/docs/proc/tides_kick_getacch_pl.html
+++ b/docs/proc/tides_kick_getacch_pl.html
@@ -136,7 +136,7 @@ <h1>tides_kick_getacch_pl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
diff --git a/docs/proc/util_append_body.html b/docs/proc/util_append_body.html
index 25fadcaf1..68941a044 100644
--- a/docs/proc/util_append_body.html
+++ b/docs/proc/util_append_body.html
@@ -136,7 +136,7 @@ <h1>util_append_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">33 statements</a>
+    title=" 0.0% of total for procedures.">33 statements</a>
      </li> 
      
      
@@ -424,65 +424,65 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.16,-33C343.38,-33 352.01,-33 360.46,-33"/>
 <polygon fill="#000000" stroke="#000000" points="360.65,-36.5 370.65,-33 360.65,-29.5 360.65,-36.5"/>
 </g>
-<!-- proc~util_append_tp -->
+<!-- proc~util_append_pl -->
 <g id="proc~~util_append_body~~CalledByGraph_node3" class="node">
-<title>proc~util_append_tp</title>
-<g id="a_proc~~util_append_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="202,-66 119,-66 119,-42 202,-42 202,-66"/>
-<text text-anchor="middle" x="160.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>proc~util_append_pl</title>
+<g id="a_proc~~util_append_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="201.5,-66 119.5,-66 119.5,-42 201.5,-42 201.5,-66"/>
+<text text-anchor="middle" x="160.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
+<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
 <g id="proc~~util_append_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M202.1,-47.12C210.33,-45.73 219.12,-44.24 227.81,-42.77"/>
-<polygon fill="#000000" stroke="#000000" points="228.63,-46.18 237.91,-41.06 227.46,-39.28 228.63,-46.18"/>
+<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M201.76,-47.18C209.99,-45.79 218.81,-44.29 227.53,-42.82"/>
+<polygon fill="#000000" stroke="#000000" points="228.39,-46.22 237.67,-41.1 227.22,-39.32 228.39,-46.22"/>
 </g>
-<!-- proc~util_append_pl -->
+<!-- proc~util_append_tp -->
 <g id="proc~~util_append_body~~CalledByGraph_node4" class="node">
-<title>proc~util_append_pl</title>
-<g id="a_proc~~util_append_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="201.5,-24 119.5,-24 119.5,0 201.5,0 201.5,-24"/>
-<text text-anchor="middle" x="160.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>proc~util_append_tp</title>
+<g id="a_proc~~util_append_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="202,-24 119,-24 119,0 202,0 202,-24"/>
+<text text-anchor="middle" x="160.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_append_body -->
+<!-- proc~util_append_tp&#45;&gt;interface~util_append_body -->
 <g id="proc~~util_append_body~~CalledByGraph_edge3" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_append_body</title>
-<path fill="none" stroke="#000000" d="M201.76,-18.82C209.99,-20.21 218.81,-21.71 227.53,-23.18"/>
-<polygon fill="#000000" stroke="#000000" points="227.22,-26.68 237.67,-24.9 228.39,-19.78 227.22,-26.68"/>
+<title>proc~util_append_tp&#45;&gt;interface~util_append_body</title>
+<path fill="none" stroke="#000000" d="M202.1,-18.88C210.33,-20.27 219.12,-21.76 227.81,-23.23"/>
+<polygon fill="#000000" stroke="#000000" points="227.46,-26.72 237.91,-24.94 228.63,-19.82 227.46,-26.72"/>
 </g>
-<!-- interface~util_append_pl -->
+<!-- interface~util_append_tp -->
 <g id="proc~~util_append_body~~CalledByGraph_node5" class="node">
-<title>interface~util_append_pl</title>
-<g id="a_proc~~util_append_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="82.5,-24 0.5,-24 0.5,0 82.5,0 82.5,-24"/>
-<text text-anchor="middle" x="41.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>interface~util_append_tp</title>
+<g id="a_proc~~util_append_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="83,-24 0,-24 0,0 83,0 83,-24"/>
+<text text-anchor="middle" x="41.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
+<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
 <g id="proc~~util_append_body~~CalledByGraph_edge5" class="edge">
-<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.76,-12C91.22,-12 100.24,-12 109.02,-12"/>
-<polygon fill="#000000" stroke="#000000" points="109.16,-15.5 119.16,-12 109.16,-8.5 109.16,-15.5"/>
+<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-12C91.35,-12 100.14,-12 108.7,-12"/>
+<polygon fill="#000000" stroke="#000000" points="108.98,-15.5 118.98,-12 108.98,-8.5 108.98,-15.5"/>
 </g>
-<!-- interface~util_append_tp -->
+<!-- interface~util_append_pl -->
 <g id="proc~~util_append_body~~CalledByGraph_node6" class="node">
-<title>interface~util_append_tp</title>
-<g id="a_proc~~util_append_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="83,-66 0,-66 0,-42 83,-42 83,-66"/>
-<text text-anchor="middle" x="41.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>interface~util_append_pl</title>
+<g id="a_proc~~util_append_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="82.5,-66 0.5,-66 0.5,-42 82.5,-42 82.5,-66"/>
+<text text-anchor="middle" x="41.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
+<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
 <g id="proc~~util_append_body~~CalledByGraph_edge4" class="edge">
-<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-54C91.35,-54 100.14,-54 108.7,-54"/>
-<polygon fill="#000000" stroke="#000000" points="108.98,-57.5 118.98,-54 108.98,-50.5 108.98,-57.5"/>
+<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M82.76,-54C91.22,-54 100.24,-54 109.02,-54"/>
+<polygon fill="#000000" stroke="#000000" points="109.16,-57.5 119.16,-54 109.16,-50.5 109.16,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_append_pl.html b/docs/proc/util_append_pl.html
index 66cb6631c..8f630b3a3 100644
--- a/docs/proc/util_append_pl.html
+++ b/docs/proc/util_append_pl.html
@@ -353,9 +353,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="131.01,-26.85 139.45,-20.44 128.86,-20.19 131.01,-26.85"/>
 </g>
 <!-- proc~util_append_body -->
-<g id="proc~~util_append_pl~~CallsGraph_node6" class="node">
+<g id="proc~~util_append_pl~~CallsGraph_node5" class="node">
 <title>proc~util_append_body</title>
-<g id="a_proc~~util_append_pl~~CallsGraph_node6"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
+<g id="a_proc~~util_append_pl~~CallsGraph_node5"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
 <polygon fill="#d9534f" stroke="#d9534f" points="348,-104 251,-104 251,-80 348,-80 348,-104"/>
 <text text-anchor="middle" x="299.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
@@ -368,9 +368,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="240.65,-95.5 250.65,-92 240.65,-88.5 240.65,-95.5"/>
 </g>
 <!-- proc~util_exit -->
-<g id="proc~~util_append_pl~~CallsGraph_node5" class="node">
+<g id="proc~~util_append_pl~~CallsGraph_node6" class="node">
 <title>proc~util_exit</title>
-<g id="a_proc~~util_append_pl~~CallsGraph_node5"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<g id="a_proc~~util_append_pl~~CallsGraph_node6"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
 <polygon fill="#d9534f" stroke="#d9534f" points="326.5,-24 272.5,-24 272.5,0 326.5,0 326.5,-24"/>
 <text text-anchor="middle" x="299.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
diff --git a/docs/proc/util_append_tp.html b/docs/proc/util_append_tp.html
index 3aed5b757..e29538dc6 100644
--- a/docs/proc/util_append_tp.html
+++ b/docs/proc/util_append_tp.html
@@ -353,9 +353,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="131.9,-26.84 140.34,-20.44 129.75,-20.18 131.9,-26.84"/>
 </g>
 <!-- proc~util_append_body -->
-<g id="proc~~util_append_tp~~CallsGraph_node6" class="node">
+<g id="proc~~util_append_tp~~CallsGraph_node5" class="node">
 <title>proc~util_append_body</title>
-<g id="a_proc~~util_append_tp~~CallsGraph_node6"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
+<g id="a_proc~~util_append_tp~~CallsGraph_node5"><a xlink:href=".././proc/util_append_body.html" xlink:title="util_append_body">
 <polygon fill="#d9534f" stroke="#d9534f" points="349,-104 252,-104 252,-80 349,-80 349,-104"/>
 <text text-anchor="middle" x="300.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_body</text>
 </a>
@@ -368,9 +368,9 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="#000000" stroke="#000000" points="241.65,-95.5 251.65,-92 241.65,-88.5 241.65,-95.5"/>
 </g>
 <!-- proc~util_exit -->
-<g id="proc~~util_append_tp~~CallsGraph_node5" class="node">
+<g id="proc~~util_append_tp~~CallsGraph_node6" class="node">
 <title>proc~util_exit</title>
-<g id="a_proc~~util_append_tp~~CallsGraph_node5"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
+<g id="a_proc~~util_append_tp~~CallsGraph_node6"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
 <polygon fill="#d9534f" stroke="#d9534f" points="327.5,-24 273.5,-24 273.5,0 327.5,0 327.5,-24"/>
 <text text-anchor="middle" x="300.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
diff --git a/docs/proc/util_copy_particle_info_arr.html b/docs/proc/util_copy_particle_info_arr.html
index 4245b2c62..1e5d0c17c 100644
--- a/docs/proc/util_copy_particle_info_arr.html
+++ b/docs/proc/util_copy_particle_info_arr.html
@@ -322,50 +322,50 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.47,-54C328.73,-54 337.22,-54 345.6,-54"/>
 <polygon fill="#000000" stroke="#000000" points="345.76,-57.5 355.76,-54 345.76,-50.5 345.76,-57.5"/>
 </g>
-<!-- proc~util_fill_arr_info -->
+<!-- proc~util_sort_rearrange_arr_info -->
 <g id="proc~~util_copy_particle_info_arr~~CalledByGraph_node3" class="node">
-<title>proc~util_fill_arr_info</title>
-<g id="a_proc~~util_copy_particle_info_arr~~CalledByGraph_node3"><a xlink:href=".././proc/util_fill_arr_info.html" xlink:title="util_fill_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="115.5,-108 30.5,-108 30.5,-84 115.5,-84 115.5,-108"/>
-<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_info</text>
+<title>proc~util_sort_rearrange_arr_info</title>
+<g id="a_proc~~util_copy_particle_info_arr~~CalledByGraph_node3"><a xlink:href=".././proc/util_sort_rearrange_arr_info.html" xlink:title="util_sort_rearrange_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="146,-108 0,-108 0,-84 146,-84 146,-108"/>
+<text text-anchor="middle" x="73" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<!-- proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
 <g id="proc~~util_copy_particle_info_arr~~CalledByGraph_edge2" class="edge">
-<title>proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M115.71,-86.05C137.78,-80.78 165.27,-74.22 189.63,-68.41"/>
-<polygon fill="#000000" stroke="#000000" points="190.58,-71.78 199.49,-66.05 188.95,-64.97 190.58,-71.78"/>
+<title>proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M124.43,-83.96C144.78,-79.11 168.42,-73.47 189.67,-68.4"/>
+<polygon fill="#000000" stroke="#000000" points="190.64,-71.76 199.56,-66.04 189.02,-64.95 190.64,-71.76"/>
 </g>
-<!-- proc~util_spill_arr_info -->
+<!-- proc~util_fill_arr_info -->
 <g id="proc~~util_copy_particle_info_arr~~CalledByGraph_node4" class="node">
-<title>proc~util_spill_arr_info</title>
-<g id="a_proc~~util_copy_particle_info_arr~~CalledByGraph_node4"><a xlink:href=".././proc/util_spill_arr_info.html" xlink:title="util_spill_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="119.5,-66 26.5,-66 26.5,-42 119.5,-42 119.5,-66"/>
-<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_info</text>
+<title>proc~util_fill_arr_info</title>
+<g id="a_proc~~util_copy_particle_info_arr~~CalledByGraph_node4"><a xlink:href=".././proc/util_fill_arr_info.html" xlink:title="util_fill_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="115.5,-66 30.5,-66 30.5,-42 115.5,-42 115.5,-66"/>
+<text text-anchor="middle" x="73" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<!-- proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
 <g id="proc~~util_copy_particle_info_arr~~CalledByGraph_edge3" class="edge">
-<title>proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M119.78,-54C135.62,-54 153.85,-54 171.55,-54"/>
-<polygon fill="#000000" stroke="#000000" points="171.89,-57.5 181.89,-54 171.89,-50.5 171.89,-57.5"/>
+<title>proc~util_fill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M115.71,-54C132.5,-54 152.44,-54 171.74,-54"/>
+<polygon fill="#000000" stroke="#000000" points="171.76,-57.5 181.76,-54 171.76,-50.5 171.76,-57.5"/>
 </g>
-<!-- proc~util_sort_rearrange_arr_info -->
+<!-- proc~util_spill_arr_info -->
 <g id="proc~~util_copy_particle_info_arr~~CalledByGraph_node5" class="node">
-<title>proc~util_sort_rearrange_arr_info</title>
-<g id="a_proc~~util_copy_particle_info_arr~~CalledByGraph_node5"><a xlink:href=".././proc/util_sort_rearrange_arr_info.html" xlink:title="util_sort_rearrange_arr_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="146,-24 0,-24 0,0 146,0 146,-24"/>
-<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_arr_info</text>
+<title>proc~util_spill_arr_info</title>
+<g id="a_proc~~util_copy_particle_info_arr~~CalledByGraph_node5"><a xlink:href=".././proc/util_spill_arr_info.html" xlink:title="util_spill_arr_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="119.5,-24 26.5,-24 26.5,0 119.5,0 119.5,-24"/>
+<text text-anchor="middle" x="73" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_arr_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
+<!-- proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr -->
 <g id="proc~~util_copy_particle_info_arr~~CalledByGraph_edge4" class="edge">
-<title>proc~util_sort_rearrange_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
-<path fill="none" stroke="#000000" d="M124.43,-24.04C144.78,-28.89 168.42,-34.53 189.67,-39.6"/>
-<polygon fill="#000000" stroke="#000000" points="189.02,-43.05 199.56,-41.96 190.64,-36.24 189.02,-43.05"/>
+<title>proc~util_spill_arr_info&#45;&gt;interface~util_copy_particle_info_arr</title>
+<path fill="none" stroke="#000000" d="M119.78,-22.93C141.08,-28.01 166.69,-34.12 189.55,-39.57"/>
+<polygon fill="#000000" stroke="#000000" points="188.95,-43.03 199.49,-41.95 190.58,-36.22 188.95,-43.03"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_exit.html b/docs/proc/util_exit.html
index 3377a89e3..40bc602e0 100644
--- a/docs/proc/util_exit.html
+++ b/docs/proc/util_exit.html
@@ -276,815 +276,815 @@ <h3 class="panel-title">Called by</h3>
 <!-- proc~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_node1" class="node">
 <title>proc~util_exit</title>
-<polygon fill="none" stroke="black" points="758,-570 704,-570 704,-546 758,-546 758,-570"/>
-<text text-anchor="middle" x="731" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_exit</text>
+<polygon fill="none" stroke="black" points="758,-566 704,-566 704,-542 758,-542 758,-566"/>
+<text text-anchor="middle" x="731" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_exit</text>
 </g>
 <!-- interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_node2" class="node">
 <title>interface~util_exit</title>
 <g id="a_proc~~util_exit~~CalledByGraph_node2"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
-<polygon fill="#a7506f" stroke="#a7506f" points="668,-570 614,-570 614,-546 668,-546 668,-570"/>
-<text text-anchor="middle" x="641" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="668,-566 614,-566 614,-542 668,-542 668,-566"/>
+<text text-anchor="middle" x="641" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
 <!-- interface~util_exit&#45;&gt;proc~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge1" class="edge">
 <title>interface~util_exit&#45;&gt;proc~util_exit</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.4,-558C676.39,-558 685.31,-558 693.82,-558"/>
-<polygon fill="#000000" stroke="#000000" points="693.92,-561.5 703.92,-558 693.92,-554.5 693.92,-561.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.4,-554C676.39,-554 685.31,-554 693.82,-554"/>
+<polygon fill="#000000" stroke="#000000" points="693.92,-557.5 703.92,-554 693.92,-550.5 693.92,-557.5"/>
 </g>
-<!-- proc~io_write_hdr_system -->
+<!-- proc~io_write_encounter -->
 <g id="proc~~util_exit~~CalledByGraph_node3" class="node">
-<title>proc~io_write_hdr_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node3"><a xlink:href=".././proc/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="557.5,-1112 446.5,-1112 446.5,-1088 557.5,-1088 557.5,-1112"/>
-<text text-anchor="middle" x="502" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
+<title>proc~io_write_encounter</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node3"><a xlink:href=".././proc/io_write_encounter.html" xlink:title="io_write_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="553.5,-1112 450.5,-1112 450.5,-1088 553.5,-1088 553.5,-1112"/>
+<text text-anchor="middle" x="502" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_hdr_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_encounter&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge2" class="edge">
-<title>proc~io_write_hdr_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M557.7,-1089.3C565.47,-1085.61 572.64,-1080.65 578,-1074 640.44,-996.52 641.31,-669.51 640.35,-580.47"/>
-<polygon fill="#000000" stroke="#000000" points="643.85,-580.34 640.23,-570.39 636.85,-580.43 643.85,-580.34"/>
+<title>proc~io_write_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M553.73,-1094.51C562.97,-1091.3 571.67,-1086.4 578,-1079 611.21,-1040.17 633.56,-671.65 638.81,-576.39"/>
+<polygon fill="#000000" stroke="#000000" points="642.31,-576.57 639.35,-566.4 635.32,-576.19 642.31,-576.57"/>
 </g>
-<!-- proc~io_dump_base -->
+<!-- proc~io_read_in_cb -->
 <g id="proc~~util_exit~~CalledByGraph_node4" class="node">
-<title>proc~io_dump_base</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node4"><a xlink:href=".././proc/io_dump_base.html" xlink:title="io_dump_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="202,-1032 119,-1032 119,-1008 202,-1008 202,-1032"/>
-<text text-anchor="middle" x="160.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+<title>proc~io_read_in_cb</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node4"><a xlink:href=".././proc/io_read_in_cb.html" xlink:title="io_read_in_cb">
+<polygon fill="#d9534f" stroke="#d9534f" points="542,-1070 462,-1070 462,-1046 542,-1046 542,-1070"/>
+<text text-anchor="middle" x="502" y="-1055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_in_cb&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge3" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M197.67,-1032.06C210.28,-1035.7 224.62,-1039.2 238,-1041 312.88,-1051.09 521.27,-1090.91 578,-1041 613.11,-1010.11 633.85,-671.78 638.83,-580.55"/>
-<polygon fill="#000000" stroke="#000000" points="642.33,-580.64 639.37,-570.46 635.34,-580.26 642.33,-580.64"/>
-</g>
-<!-- interface~io_write_frame_body -->
-<g id="proc~~util_exit~~CalledByGraph_node35" class="node">
-<title>interface~io_write_frame_body</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node35"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="370,-1032 258,-1032 258,-1008 370,-1008 370,-1032"/>
-<text text-anchor="middle" x="314" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
-</a>
-</g>
-</g>
-<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
-<g id="proc~~util_exit~~CalledByGraph_edge54" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
-<path fill="none" stroke="#000000" d="M202.1,-1020C216.12,-1020 232.2,-1020 247.69,-1020"/>
-<polygon fill="#000000" stroke="#000000" points="247.76,-1023.5 257.76,-1020 247.76,-1016.5 247.76,-1023.5"/>
-</g>
-<!-- interface~io_write_frame_cb -->
-<g id="proc~~util_exit~~CalledByGraph_node42" class="node">
-<title>interface~io_write_frame_cb</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node42"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="364,-990 264,-990 264,-966 364,-966 364,-990"/>
-<text text-anchor="middle" x="314" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
-</a>
-</g>
-</g>
-<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
-<g id="proc~~util_exit~~CalledByGraph_edge55" class="edge">
-<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" d="M202.1,-1008.74C219.86,-1003.82 240.94,-997.98 259.93,-992.71"/>
-<polygon fill="#000000" stroke="#000000" points="260.93,-996.07 269.63,-990.02 259.06,-989.32 260.93,-996.07"/>
+<title>proc~io_read_in_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M542.37,-1055.59C555.51,-1052.78 569.07,-1047.33 578,-1037 638.71,-966.76 640.88,-661.51 640.28,-576.21"/>
+<polygon fill="#000000" stroke="#000000" points="643.78,-576.06 640.18,-566.1 636.78,-576.13 643.78,-576.06"/>
 </g>
-<!-- proc~io_get_args -->
+<!-- proc~util_append_pl -->
 <g id="proc~~util_exit~~CalledByGraph_node5" class="node">
-<title>proc~io_get_args</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node5"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="536.5,-948 467.5,-948 467.5,-924 536.5,-924 536.5,-948"/>
-<text text-anchor="middle" x="502" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<title>proc~util_append_pl</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node5"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="543,-1028 461,-1028 461,-1004 543,-1004 543,-1028"/>
+<text text-anchor="middle" x="502" y="-1013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_args&#45;&gt;interface~util_exit -->
+<!-- proc~util_append_pl&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge4" class="edge">
-<title>proc~io_get_args&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M536.7,-934.41C551.38,-931.95 567.57,-926.54 578,-915 622.95,-865.26 636.03,-650.89 639.15,-580.49"/>
-<polygon fill="#000000" stroke="#000000" points="642.66,-580.26 639.58,-570.13 635.67,-579.97 642.66,-580.26"/>
+<title>proc~util_append_pl&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M543.08,-1013.36C555.97,-1010.5 569.19,-1005.08 578,-995 633.43,-931.64 639.42,-656.99 639.97,-576.34"/>
+<polygon fill="#000000" stroke="#000000" points="643.47,-576.31 640.02,-566.29 636.47,-576.28 643.47,-576.31"/>
 </g>
-<!-- proc~io_write_frame_system -->
+<!-- proc~util_append_tp -->
 <g id="proc~~util_exit~~CalledByGraph_node6" class="node">
-<title>proc~io_write_frame_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node6"><a xlink:href=".././proc/io_write_frame_system.html" xlink:title="io_write_frame_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="563.5,-906 440.5,-906 440.5,-882 563.5,-882 563.5,-906"/>
-<text text-anchor="middle" x="502" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
+<title>proc~util_append_tp</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node6"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="543.5,-986 460.5,-986 460.5,-962 543.5,-962 543.5,-986"/>
+<text text-anchor="middle" x="502" y="-971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_system&#45;&gt;interface~util_exit -->
+<!-- proc~util_append_tp&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge5" class="edge">
-<title>proc~io_write_frame_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M563.81,-883.64C569.1,-880.86 573.96,-877.37 578,-873 617.79,-829.95 634.05,-644.94 638.59,-580.35"/>
-<polygon fill="#000000" stroke="#000000" points="642.1,-580.29 639.28,-570.08 635.11,-579.82 642.1,-580.29"/>
+<title>proc~util_append_tp&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M543.78,-971.11C556.42,-968.2 569.29,-962.81 578,-953 628.13,-896.53 637.8,-652.52 639.6,-576.62"/>
+<polygon fill="#000000" stroke="#000000" points="643.11,-576.38 639.82,-566.31 636.11,-576.23 643.11,-576.38"/>
 </g>
-<!-- proc~io_dump_particle_info_base -->
+<!-- proc~io_read_encounter -->
 <g id="proc~~util_exit~~CalledByGraph_node7" class="node">
-<title>proc~io_dump_particle_info_base</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node7"><a xlink:href=".././proc/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
-<polygon fill="#d9534f" stroke="#d9534f" points="575.5,-864 428.5,-864 428.5,-840 575.5,-840 575.5,-864"/>
-<text text-anchor="middle" x="502" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
+<title>proc~io_read_encounter</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node7"><a xlink:href=".././proc/io_read_encounter.html" xlink:title="io_read_encounter">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-944 450.5,-944 450.5,-920 553.5,-920 553.5,-944"/>
+<text text-anchor="middle" x="502" y="-929.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_particle_info_base&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_encounter&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge6" class="edge">
-<title>proc~io_dump_particle_info_base&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M566.53,-839.94C570.75,-837.48 574.64,-834.53 578,-831 612.7,-794.53 631.84,-638.33 637.88,-580.04"/>
-<polygon fill="#000000" stroke="#000000" points="641.37,-580.35 638.88,-570.05 634.4,-579.65 641.37,-580.35"/>
+<title>proc~io_read_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M553.81,-926.11C562.93,-922.91 571.56,-918.12 578,-911 622.95,-861.26 636.03,-646.89 639.15,-576.49"/>
+<polygon fill="#000000" stroke="#000000" points="642.66,-576.26 639.58,-566.13 635.67,-575.97 642.66,-576.26"/>
 </g>
-<!-- proc~io_write_frame_body -->
+<!-- proc~setup_construct_system -->
 <g id="proc~~util_exit~~CalledByGraph_node8" class="node">
-<title>proc~io_write_frame_body</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node8"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="558,-1032 446,-1032 446,-1008 558,-1008 558,-1032"/>
-<text text-anchor="middle" x="502" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+<title>proc~setup_construct_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node8"><a xlink:href=".././proc/setup_construct_system.html" xlink:title="setup_construct_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="566,-902 438,-902 438,-878 566,-878 566,-902"/>
+<text text-anchor="middle" x="502" y="-887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
+<!-- proc~setup_construct_system&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge7" class="edge">
-<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M558.18,-1012.66C565.7,-1009.5 572.66,-1005.11 578,-999 633.43,-935.64 639.42,-660.99 639.97,-580.34"/>
-<polygon fill="#000000" stroke="#000000" points="643.47,-580.31 640.02,-570.29 636.47,-580.28 643.47,-580.31"/>
+<title>proc~setup_construct_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M566.3,-878.26C570.62,-875.72 574.6,-872.67 578,-869 617.79,-825.95 634.05,-640.94 638.59,-576.35"/>
+<polygon fill="#000000" stroke="#000000" points="642.1,-576.29 639.28,-566.08 635.11,-575.82 642.1,-576.29"/>
 </g>
-<!-- proc~io_write_encounter -->
+<!-- proc~io_read_particle_info_system -->
 <g id="proc~~util_exit~~CalledByGraph_node9" class="node">
-<title>proc~io_write_encounter</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node9"><a xlink:href=".././proc/io_write_encounter.html" xlink:title="io_write_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="553.5,-822 450.5,-822 450.5,-798 553.5,-798 553.5,-822"/>
-<text text-anchor="middle" x="502" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
+<title>proc~io_read_particle_info_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node9"><a xlink:href=".././proc/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="578,-860 426,-860 426,-836 578,-836 578,-860"/>
+<text text-anchor="middle" x="502" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_encounter&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_particle_info_system&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge8" class="edge">
-<title>proc~io_write_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M553.7,-803.51C562.72,-800.35 571.34,-795.73 578,-789 635.46,-730.91 641.22,-625.64 640.81,-580.04"/>
-<polygon fill="#000000" stroke="#000000" points="644.31,-579.97 640.6,-570.04 637.31,-580.11 644.31,-579.97"/>
+<title>proc~io_read_particle_info_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M566.53,-835.94C570.75,-833.48 574.64,-830.53 578,-827 612.7,-790.53 631.84,-634.33 637.88,-576.04"/>
+<polygon fill="#000000" stroke="#000000" points="641.37,-576.35 638.88,-566.05 634.4,-575.65 641.37,-576.35"/>
 </g>
-<!-- proc~io_write_frame_encounter -->
+<!-- proc~check -->
 <g id="proc~~util_exit~~CalledByGraph_node10" class="node">
-<title>proc~io_write_frame_encounter</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node10"><a xlink:href=".././proc/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
-<polygon fill="#d9534f" stroke="#d9534f" points="570.5,-780 433.5,-780 433.5,-756 570.5,-756 570.5,-780"/>
-<text text-anchor="middle" x="502" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
+<title>proc~check</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node10"><a xlink:href=".././proc/check.html" xlink:title="check">
+<polygon fill="#d9534f" stroke="#d9534f" points="529,-818 475,-818 475,-794 529,-794 529,-818"/>
+<text text-anchor="middle" x="502" y="-803.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">check</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_encounter&#45;&gt;interface~util_exit -->
+<!-- proc~check&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge9" class="edge">
-<title>proc~io_write_frame_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M565.46,-755.98C570.03,-753.51 574.29,-750.55 578,-747 625.33,-701.7 636.56,-619.74 639.2,-580.34"/>
-<polygon fill="#000000" stroke="#000000" points="642.71,-580.38 639.75,-570.2 635.72,-580 642.71,-580.38"/>
+<title>proc~check&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M529.18,-805.01C545.31,-803.03 565.26,-797.88 578,-785 635.46,-726.91 641.22,-621.64 640.81,-576.04"/>
+<polygon fill="#000000" stroke="#000000" points="644.31,-575.97 640.6,-566.04 637.31,-576.11 644.31,-575.97"/>
 </g>
-<!-- proc~io_dump_particle_info -->
+<!-- proc~io_write_discard -->
 <g id="proc~~util_exit~~CalledByGraph_node11" class="node">
-<title>proc~io_dump_particle_info</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node11"><a xlink:href=".././proc/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="561,-738 443,-738 443,-714 561,-714 561,-738"/>
-<text text-anchor="middle" x="502" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
+<title>proc~io_write_discard</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node11"><a xlink:href=".././proc/io_write_discard.html" xlink:title="io_write_discard">
+<polygon fill="#d9534f" stroke="#d9534f" points="547,-776 457,-776 457,-752 547,-752 547,-776"/>
+<text text-anchor="middle" x="502" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_particle_info&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_discard&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge10" class="edge">
-<title>proc~io_dump_particle_info&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M561.06,-715.61C567.21,-712.85 573.03,-709.38 578,-705 615.36,-672.07 630.83,-612.89 636.72,-580.57"/>
-<polygon fill="#000000" stroke="#000000" points="640.23,-580.78 638.43,-570.34 633.33,-579.63 640.23,-580.78"/>
+<title>proc~io_write_discard&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.18,-759.15C558.38,-756.05 569.6,-751.04 578,-743 625.33,-697.7 636.56,-615.74 639.2,-576.34"/>
+<polygon fill="#000000" stroke="#000000" points="642.71,-576.38 639.75,-566.2 635.72,-576 642.71,-576.38"/>
 </g>
-<!-- proc~util_append_tp -->
+<!-- proc~io_dump_particle_info_base -->
 <g id="proc~~util_exit~~CalledByGraph_node12" class="node">
-<title>proc~util_append_tp</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node12"><a xlink:href=".././proc/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="543.5,-696 460.5,-696 460.5,-672 543.5,-672 543.5,-696"/>
-<text text-anchor="middle" x="502" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>proc~io_dump_particle_info_base</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node12"><a xlink:href=".././proc/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="575.5,-734 428.5,-734 428.5,-710 575.5,-710 575.5,-734"/>
+<text text-anchor="middle" x="502" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_tp&#45;&gt;interface~util_exit -->
-<g id="proc~~util_exit~~CalledByGraph_edge11" class="edge">
-<title>proc~util_append_tp&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M543.76,-678.52C555.68,-675.42 568.14,-670.58 578,-663 605.93,-641.54 623.74,-603.62 632.79,-579.7"/>
-<polygon fill="#000000" stroke="#000000" points="636.15,-580.7 636.24,-570.11 629.57,-578.33 636.15,-580.7"/>
+<!-- proc~io_dump_particle_info_base&#45;&gt;interface~util_exit -->
+<g id="proc~~util_exit~~CalledByGraph_edge13" class="edge">
+<title>proc~io_dump_particle_info_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M564.78,-709.83C569.55,-707.4 574.04,-704.49 578,-701 615.36,-668.07 630.83,-608.89 636.72,-576.57"/>
+<polygon fill="#000000" stroke="#000000" points="640.23,-576.78 638.43,-566.34 633.33,-575.63 640.23,-576.78"/>
 </g>
-<!-- proc~util_valid_id_system -->
+<!-- proc~io_dump_particle_info -->
 <g id="proc~~util_exit~~CalledByGraph_node13" class="node">
-<title>proc~util_valid_id_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node13"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="556,-654 448,-654 448,-630 556,-630 556,-654"/>
-<text text-anchor="middle" x="502" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+<title>proc~io_dump_particle_info</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node13"><a xlink:href=".././proc/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
+<polygon fill="#d9534f" stroke="#d9534f" points="561,-692 443,-692 443,-668 561,-668 561,-692"/>
+<text text-anchor="middle" x="502" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
-<g id="proc~~util_exit~~CalledByGraph_edge12" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M556.07,-630.9C563.7,-628.24 571.25,-624.99 578,-621 596.6,-610.02 613.5,-592.06 624.93,-578.12"/>
-<polygon fill="#000000" stroke="#000000" points="627.85,-580.08 631.32,-570.06 622.36,-575.73 627.85,-580.08"/>
+<!-- proc~io_dump_particle_info&#45;&gt;interface~util_exit -->
+<g id="proc~~util_exit~~CalledByGraph_edge11" class="edge">
+<title>proc~io_dump_particle_info&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M561.27,-668.61C567.24,-666.03 572.96,-662.87 578,-659 605.93,-637.54 623.74,-599.62 632.79,-575.7"/>
+<polygon fill="#000000" stroke="#000000" points="636.15,-576.7 636.24,-566.11 629.57,-574.33 636.15,-576.7"/>
 </g>
-<!-- proc~util_solve_rkf45 -->
+<!-- proc~io_dump_param -->
 <g id="proc~~util_exit~~CalledByGraph_node14" class="node">
-<title>proc~util_solve_rkf45</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node14"><a xlink:href=".././proc/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="545.5,-612 458.5,-612 458.5,-588 545.5,-588 545.5,-612"/>
-<text text-anchor="middle" x="502" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
+<title>proc~io_dump_param</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node14"><a xlink:href=".././proc/io_dump_param.html" xlink:title="io_dump_param">
+<polygon fill="#d9534f" stroke="#d9534f" points="547.5,-650 456.5,-650 456.5,-626 547.5,-626 547.5,-650"/>
+<text text-anchor="middle" x="502" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_rkf45&#45;&gt;interface~util_exit -->
-<g id="proc~~util_exit~~CalledByGraph_edge13" class="edge">
-<title>proc~util_solve_rkf45&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M545.56,-588.51C556.19,-585.52 567.54,-582.23 578,-579 586.51,-576.37 595.61,-573.38 604.16,-570.5"/>
-<polygon fill="#000000" stroke="#000000" points="605.52,-573.74 613.86,-567.2 603.26,-567.11 605.52,-573.74"/>
+<!-- proc~io_dump_param&#45;&gt;interface~util_exit -->
+<g id="proc~~util_exit~~CalledByGraph_edge12" class="edge">
+<title>proc~io_dump_param&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.79,-629.55C558.14,-626.51 568.8,-622.43 578,-617 596.6,-606.02 613.5,-588.06 624.93,-574.12"/>
+<polygon fill="#000000" stroke="#000000" points="627.85,-576.08 631.32,-566.06 622.36,-571.73 627.85,-576.08"/>
 </g>
-<!-- proc~io_read_particle_info_system -->
+<!-- proc~io_write_frame_encounter -->
 <g id="proc~~util_exit~~CalledByGraph_node15" class="node">
-<title>proc~io_read_particle_info_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node15"><a xlink:href=".././proc/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="578,-570 426,-570 426,-546 578,-546 578,-570"/>
-<text text-anchor="middle" x="502" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
+<title>proc~io_write_frame_encounter</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node15"><a xlink:href=".././proc/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
+<polygon fill="#d9534f" stroke="#d9534f" points="570.5,-608 433.5,-608 433.5,-584 570.5,-584 570.5,-608"/>
+<text text-anchor="middle" x="502" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_particle_info_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_encounter&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge14" class="edge">
-<title>proc~io_read_particle_info_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M578.31,-558C587.22,-558 595.97,-558 603.96,-558"/>
-<polygon fill="#000000" stroke="#000000" points="603.96,-561.5 613.96,-558 603.96,-554.5 603.96,-561.5"/>
+<title>proc~io_write_frame_encounter&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.53,-583.95C557.58,-581.12 568.18,-578.03 578,-575 586.51,-572.37 595.61,-569.38 604.16,-566.5"/>
+<polygon fill="#000000" stroke="#000000" points="605.52,-569.74 613.86,-563.2 603.26,-563.11 605.52,-569.74"/>
 </g>
-<!-- proc~io_read_in_cb -->
+<!-- proc~io_conservation_report -->
 <g id="proc~~util_exit~~CalledByGraph_node16" class="node">
-<title>proc~io_read_in_cb</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node16"><a xlink:href=".././proc/io_read_in_cb.html" xlink:title="io_read_in_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="542,-528 462,-528 462,-504 542,-504 542,-528"/>
-<text text-anchor="middle" x="502" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
+<title>proc~io_conservation_report</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node16"><a xlink:href=".././proc/io_conservation_report.html" xlink:title="io_conservation_report">
+<polygon fill="#d9534f" stroke="#d9534f" points="563,-566 441,-566 441,-542 563,-542 563,-566"/>
+<text text-anchor="middle" x="502" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_in_cb&#45;&gt;interface~util_exit -->
+<!-- proc~io_conservation_report&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge15" class="edge">
-<title>proc~io_read_in_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M542.04,-526.5C553.65,-529.74 566.37,-533.41 578,-537 586.51,-539.63 595.61,-542.62 604.16,-545.5"/>
-<polygon fill="#000000" stroke="#000000" points="603.26,-548.89 613.86,-548.8 605.52,-542.26 603.26,-548.89"/>
+<title>proc~io_conservation_report&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M563.09,-554C577.02,-554 591.42,-554 603.94,-554"/>
+<polygon fill="#000000" stroke="#000000" points="603.96,-557.5 613.96,-554 603.96,-550.5 603.96,-557.5"/>
 </g>
-<!-- proc~io_read_frame_body -->
+<!-- proc~io_read_frame_cb -->
 <g id="proc~~util_exit~~CalledByGraph_node17" class="node">
-<title>proc~io_read_frame_body</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node17"><a xlink:href=".././proc/io_read_frame_body.html" xlink:title="io_read_frame_body">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="558,-486 446,-486 446,-462 558,-462 558,-486"/>
-<text text-anchor="middle" x="502" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
+<title>proc~io_read_frame_cb</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node17"><a xlink:href=".././proc/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="552,-524 452,-524 452,-500 552,-500 552,-524"/>
+<text text-anchor="middle" x="502" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_frame_body&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_frame_cb&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge16" class="edge">
-<title>proc~io_read_frame_body&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M558.04,-485.8C565,-488.32 571.83,-491.36 578,-495 596.6,-505.98 613.5,-523.94 624.93,-537.88"/>
-<polygon fill="#000000" stroke="#000000" points="622.36,-540.27 631.32,-545.94 627.85,-535.92 622.36,-540.27"/>
+<title>proc~io_read_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M547.53,-524.05C557.58,-526.88 568.18,-529.97 578,-533 586.51,-535.63 595.61,-538.62 604.16,-541.5"/>
+<polygon fill="#000000" stroke="#000000" points="603.26,-544.89 613.86,-544.8 605.52,-538.26 603.26,-544.89"/>
 </g>
 <!-- proc~io_read_in_particle_info -->
 <g id="proc~~util_exit~~CalledByGraph_node18" class="node">
 <title>proc~io_read_in_particle_info</title>
 <g id="a_proc~~util_exit~~CalledByGraph_node18"><a xlink:href=".././proc/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
-<polygon fill="#d9534f" stroke="#d9534f" points="565.5,-444 438.5,-444 438.5,-420 565.5,-420 565.5,-444"/>
-<text text-anchor="middle" x="502" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="565.5,-482 438.5,-482 438.5,-458 565.5,-458 565.5,-482"/>
+<text text-anchor="middle" x="502" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
 </a>
 </g>
 </g>
 <!-- proc~io_read_in_particle_info&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge17" class="edge">
 <title>proc~io_read_in_particle_info&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M562.79,-444.06C568.21,-446.51 573.39,-449.46 578,-453 605.93,-474.46 623.74,-512.38 632.79,-536.3"/>
-<polygon fill="#000000" stroke="#000000" points="629.57,-537.67 636.24,-545.89 636.15,-535.3 629.57,-537.67"/>
+<path fill="none" stroke="#000000" d="M558.83,-482.09C565.51,-484.55 572.06,-487.49 578,-491 596.6,-501.98 613.5,-519.94 624.93,-533.88"/>
+<polygon fill="#000000" stroke="#000000" points="622.36,-536.27 631.32,-541.94 627.85,-531.92 622.36,-536.27"/>
 </g>
-<!-- proc~io_write_discard -->
+<!-- proc~io_get_old_t_final_system -->
 <g id="proc~~util_exit~~CalledByGraph_node19" class="node">
-<title>proc~io_write_discard</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node19"><a xlink:href=".././proc/io_write_discard.html" xlink:title="io_write_discard">
-<polygon fill="#d9534f" stroke="#d9534f" points="547,-402 457,-402 457,-378 547,-378 547,-402"/>
-<text text-anchor="middle" x="502" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
+<title>proc~io_get_old_t_final_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node19"><a xlink:href=".././proc/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="570,-440 434,-440 434,-416 570,-416 570,-440"/>
+<text text-anchor="middle" x="502" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_discard&#45;&gt;interface~util_exit -->
+<!-- proc~io_get_old_t_final_system&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge18" class="edge">
-<title>proc~io_write_discard&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M547.14,-395.42C558.21,-398.53 569.38,-403.4 578,-411 615.36,-443.93 630.83,-503.11 636.72,-535.43"/>
-<polygon fill="#000000" stroke="#000000" points="633.33,-536.37 638.43,-545.66 640.23,-535.22 633.33,-536.37"/>
+<title>proc~io_get_old_t_final_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M562.79,-440.06C568.21,-442.51 573.39,-445.46 578,-449 605.93,-470.46 623.74,-508.38 632.79,-532.3"/>
+<polygon fill="#000000" stroke="#000000" points="629.57,-533.67 636.24,-541.89 636.15,-531.3 629.57,-533.67"/>
 </g>
-<!-- proc~io_read_encounter -->
+<!-- proc~io_dump_base -->
 <g id="proc~~util_exit~~CalledByGraph_node20" class="node">
-<title>proc~io_read_encounter</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node20"><a xlink:href=".././proc/io_read_encounter.html" xlink:title="io_read_encounter">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="553.5,-360 450.5,-360 450.5,-336 553.5,-336 553.5,-360"/>
-<text text-anchor="middle" x="502" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_encounter</text>
+<title>proc~io_dump_base</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node20"><a xlink:href=".././proc/io_dump_base.html" xlink:title="io_dump_base">
+<polygon fill="#d9534f" stroke="#d9534f" points="202,-360 119,-360 119,-336 202,-336 202,-360"/>
+<text text-anchor="middle" x="160.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_encounter&#45;&gt;interface~util_exit -->
+<!-- proc~io_dump_base&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge19" class="edge">
-<title>proc~io_read_encounter&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M553.8,-354.92C562.7,-358.05 571.26,-362.55 578,-369 625.33,-414.3 636.56,-496.26 639.2,-535.66"/>
-<polygon fill="#000000" stroke="#000000" points="635.72,-536 639.75,-545.8 642.71,-535.62 635.72,-536"/>
+<title>proc~io_dump_base&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M200.93,-360.09C212.76,-363.37 225.83,-366.66 238,-369 312.66,-383.33 517.09,-361.51 578,-407 618.27,-437.08 632.61,-498.39 637.54,-531.53"/>
+<polygon fill="#000000" stroke="#000000" points="634.09,-532.15 638.87,-541.61 641.03,-531.23 634.09,-532.15"/>
 </g>
-<!-- proc~check -->
+<!-- interface~io_write_frame_body -->
+<g id="proc~~util_exit~~CalledByGraph_node43" class="node">
+<title>interface~io_write_frame_body</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node43"><a xlink:href=".././interface/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="370,-360 258,-360 258,-336 370,-336 370,-360"/>
+<text text-anchor="middle" x="314" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
+</a>
+</g>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_body -->
+<g id="proc~~util_exit~~CalledByGraph_edge54" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_body</title>
+<path fill="none" stroke="#000000" d="M202.1,-348C216.12,-348 232.2,-348 247.69,-348"/>
+<polygon fill="#000000" stroke="#000000" points="247.76,-351.5 257.76,-348 247.76,-344.5 247.76,-351.5"/>
+</g>
+<!-- interface~io_write_frame_cb -->
+<g id="proc~~util_exit~~CalledByGraph_node52" class="node">
+<title>interface~io_write_frame_cb</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node52"><a xlink:href=".././interface/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="364,-318 264,-318 264,-294 364,-294 364,-318"/>
+<text text-anchor="middle" x="314" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+</a>
+</g>
+</g>
+<!-- proc~io_dump_base&#45;&gt;interface~io_write_frame_cb -->
+<g id="proc~~util_exit~~CalledByGraph_edge55" class="edge">
+<title>proc~io_dump_base&#45;&gt;interface~io_write_frame_cb</title>
+<path fill="none" stroke="#000000" d="M202.1,-336.74C219.86,-331.82 240.94,-325.98 259.93,-320.71"/>
+<polygon fill="#000000" stroke="#000000" points="260.93,-324.07 269.63,-318.02 259.06,-317.32 260.93,-324.07"/>
+</g>
+<!-- proc~io_write_hdr_system -->
 <g id="proc~~util_exit~~CalledByGraph_node21" class="node">
-<title>proc~check</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node21"><a xlink:href=".././proc/check.html" xlink:title="check">
-<polygon fill="#d9534f" stroke="#d9534f" points="529,-318 475,-318 475,-294 529,-294 529,-318"/>
-<text text-anchor="middle" x="502" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">check</text>
+<title>proc~io_write_hdr_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node21"><a xlink:href=".././proc/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="557.5,-276 446.5,-276 446.5,-252 557.5,-252 557.5,-276"/>
+<text text-anchor="middle" x="502" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
 </a>
 </g>
 </g>
-<!-- proc~check&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_hdr_system&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge20" class="edge">
-<title>proc~check&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M529.18,-306.99C545.31,-308.97 565.26,-314.12 578,-327 635.46,-385.09 641.22,-490.36 640.81,-535.96"/>
-<polygon fill="#000000" stroke="#000000" points="637.31,-535.89 640.6,-545.96 644.31,-536.03 637.31,-535.89"/>
+<title>proc~io_write_hdr_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M557.72,-271.76C565.3,-274.86 572.4,-279.13 578,-285 612.13,-320.75 631.51,-473.5 637.75,-531.52"/>
+<polygon fill="#000000" stroke="#000000" points="634.31,-532.22 638.83,-541.8 641.27,-531.49 634.31,-532.22"/>
 </g>
-<!-- proc~io_conservation_report -->
+<!-- proc~io_read_in_param -->
 <g id="proc~~util_exit~~CalledByGraph_node22" class="node">
-<title>proc~io_conservation_report</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node22"><a xlink:href=".././proc/io_conservation_report.html" xlink:title="io_conservation_report">
-<polygon fill="#d9534f" stroke="#d9534f" points="563,-276 441,-276 441,-252 563,-252 563,-276"/>
-<text text-anchor="middle" x="502" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
+<title>proc~io_read_in_param</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node22"><a xlink:href=".././proc/io_read_in_param.html" xlink:title="io_read_in_param">
+<polygon fill="#d9534f" stroke="#d9534f" points="552,-234 452,-234 452,-210 552,-210 552,-234"/>
+<text text-anchor="middle" x="502" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
 </a>
 </g>
 </g>
-<!-- proc~io_conservation_report&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_in_param&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge21" class="edge">
-<title>proc~io_conservation_report&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M563.31,-274.3C568.77,-277.08 573.81,-280.59 578,-285 612.7,-321.47 631.84,-477.67 637.88,-535.96"/>
-<polygon fill="#000000" stroke="#000000" points="634.4,-536.35 638.88,-545.95 641.37,-535.65 634.4,-536.35"/>
+<title>proc~io_read_in_param&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M552.12,-227.49C561.82,-230.68 571.11,-235.56 578,-243 617.27,-285.38 633.82,-467.34 638.51,-531.5"/>
+<polygon fill="#000000" stroke="#000000" points="635.04,-531.99 639.23,-541.73 642.02,-531.5 635.04,-531.99"/>
 </g>
-<!-- proc~io_write_frame_cb -->
+<!-- proc~util_solve_rkf45 -->
 <g id="proc~~util_exit~~CalledByGraph_node23" class="node">
-<title>proc~io_write_frame_cb</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node23"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
-<polygon fill="#d9534f" stroke="#d9534f" points="552,-990 452,-990 452,-966 552,-966 552,-990"/>
-<text text-anchor="middle" x="502" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
+<title>proc~util_solve_rkf45</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node23"><a xlink:href=".././proc/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="545.5,-192 458.5,-192 458.5,-168 545.5,-168 545.5,-192"/>
+<text text-anchor="middle" x="502" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
 </a>
 </g>
 </g>
-<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
+<!-- proc~util_solve_rkf45&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge22" class="edge">
-<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M552.36,-972.73C562.04,-969.53 571.27,-964.58 578,-957 628.13,-900.53 637.8,-656.52 639.6,-580.62"/>
-<polygon fill="#000000" stroke="#000000" points="643.11,-580.38 639.82,-570.31 636.11,-580.23 643.11,-580.38"/>
+<title>proc~util_solve_rkf45&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M545.62,-183.46C557.62,-186.47 569.65,-191.78 578,-201 622.41,-250.04 635.82,-461.2 639.09,-531.29"/>
+<polygon fill="#000000" stroke="#000000" points="635.61,-531.8 639.54,-541.63 642.6,-531.49 635.61,-531.8"/>
 </g>
-<!-- proc~setup_construct_system -->
+<!-- proc~io_read_frame_body -->
 <g id="proc~~util_exit~~CalledByGraph_node24" class="node">
-<title>proc~setup_construct_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node24"><a xlink:href=".././proc/setup_construct_system.html" xlink:title="setup_construct_system">
-<polygon fill="#d9534f" stroke="#d9534f" points="566,-234 438,-234 438,-210 566,-210 566,-234"/>
-<text text-anchor="middle" x="502" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<title>proc~io_read_frame_body</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node24"><a xlink:href=".././proc/io_read_frame_body.html" xlink:title="io_read_frame_body">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="558,-150 446,-150 446,-126 558,-126 558,-150"/>
+<text text-anchor="middle" x="502" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
 </a>
 </g>
 </g>
-<!-- proc~setup_construct_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_read_frame_body&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge23" class="edge">
-<title>proc~setup_construct_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M566.3,-233.74C570.62,-236.28 574.6,-239.33 578,-243 617.79,-286.05 634.05,-471.06 638.59,-535.65"/>
-<polygon fill="#000000" stroke="#000000" points="635.11,-536.18 639.28,-545.92 642.1,-535.71 635.11,-536.18"/>
+<title>proc~io_read_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M558.09,-145.42C565.63,-148.56 572.61,-152.94 578,-159 627.68,-214.88 637.65,-456.46 639.57,-531.6"/>
+<polygon fill="#000000" stroke="#000000" points="636.07,-531.9 639.8,-541.81 643.07,-531.74 636.07,-531.9"/>
 </g>
-<!-- proc~util_append_pl -->
+<!-- proc~io_write_frame_body -->
 <g id="proc~~util_exit~~CalledByGraph_node25" class="node">
-<title>proc~util_append_pl</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node25"><a xlink:href=".././proc/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="543,-192 461,-192 461,-168 543,-168 543,-192"/>
-<text text-anchor="middle" x="502" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>proc~io_write_frame_body</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node25"><a xlink:href=".././proc/io_write_frame_body.html" xlink:title="io_write_frame_body">
+<polygon fill="#d9534f" stroke="#d9534f" points="558,-360 446,-360 446,-336 558,-336 558,-360"/>
+<text text-anchor="middle" x="502" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_append_pl&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_body&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge24" class="edge">
-<title>proc~util_append_pl&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M543.29,-182.89C556.04,-185.79 569.12,-191.17 578,-201 622.95,-250.74 636.03,-465.11 639.15,-535.51"/>
-<polygon fill="#000000" stroke="#000000" points="635.67,-536.03 639.58,-545.87 642.66,-535.74 635.67,-536.03"/>
+<title>proc~io_write_frame_body&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M557.3,-360.09C564.94,-363.61 572.16,-368.15 578,-374 621.59,-417.67 634.57,-493.37 638.41,-531.16"/>
+<polygon fill="#000000" stroke="#000000" points="634.97,-531.94 639.33,-541.6 641.94,-531.33 634.97,-531.94"/>
 </g>
-<!-- proc~io_read_frame_cb -->
+<!-- proc~util_valid_id_system -->
 <g id="proc~~util_exit~~CalledByGraph_node26" class="node">
-<title>proc~io_read_frame_cb</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node26"><a xlink:href=".././proc/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="552,-150 452,-150 452,-126 552,-126 552,-150"/>
-<text text-anchor="middle" x="502" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+<title>proc~util_valid_id_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node26"><a xlink:href=".././proc/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="556,-108 448,-108 448,-84 556,-84 556,-108"/>
+<text text-anchor="middle" x="502" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_frame_cb&#45;&gt;interface~util_exit -->
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge25" class="edge">
-<title>proc~io_read_frame_cb&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M552.36,-143.27C562.04,-146.47 571.27,-151.42 578,-159 628.13,-215.47 637.8,-459.48 639.6,-535.38"/>
-<polygon fill="#000000" stroke="#000000" points="636.11,-535.77 639.82,-545.69 643.11,-535.62 636.11,-535.77"/>
+<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M556.28,-102.59C564.52,-105.78 572.21,-110.39 578,-117 632.86,-179.63 639.26,-450.83 639.94,-531.37"/>
+<polygon fill="#000000" stroke="#000000" points="636.44,-531.84 640,-541.82 643.44,-531.8 636.44,-531.84"/>
 </g>
-<!-- proc~io_get_old_t_final_system -->
+<!-- proc~io_write_frame_cb -->
 <g id="proc~~util_exit~~CalledByGraph_node27" class="node">
-<title>proc~io_get_old_t_final_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node27"><a xlink:href=".././proc/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="570,-108 434,-108 434,-84 570,-84 570,-108"/>
-<text text-anchor="middle" x="502" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
+<title>proc~io_write_frame_cb</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node27"><a xlink:href=".././proc/io_write_frame_cb.html" xlink:title="io_write_frame_cb">
+<polygon fill="#d9534f" stroke="#d9534f" points="552,-318 452,-318 452,-294 552,-294 552,-318"/>
+<text text-anchor="middle" x="502" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_cb</text>
 </a>
 </g>
 </g>
-<!-- proc~io_get_old_t_final_system&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_cb&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge26" class="edge">
-<title>proc~io_get_old_t_final_system&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M567.55,-108.18C571.43,-110.63 574.97,-113.54 578,-117 633.43,-180.36 639.42,-455.01 639.97,-535.66"/>
-<polygon fill="#000000" stroke="#000000" points="636.47,-535.72 640.02,-545.71 643.47,-535.69 636.47,-535.72"/>
+<title>proc~io_write_frame_cb&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M552.13,-311.99C561.71,-315.15 570.95,-319.9 578,-327 634.41,-383.77 640.79,-486.58 640.68,-531.73"/>
+<polygon fill="#000000" stroke="#000000" points="637.18,-531.85 640.54,-541.9 644.18,-531.95 637.18,-531.85"/>
 </g>
-<!-- proc~io_dump_param -->
+<!-- proc~io_write_frame_system -->
 <g id="proc~~util_exit~~CalledByGraph_node28" class="node">
-<title>proc~io_dump_param</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node28"><a xlink:href=".././proc/io_dump_param.html" xlink:title="io_dump_param">
-<polygon fill="#d9534f" stroke="#d9534f" points="547.5,-66 456.5,-66 456.5,-42 547.5,-42 547.5,-66"/>
-<text text-anchor="middle" x="502" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
+<title>proc~io_write_frame_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node28"><a xlink:href=".././proc/io_write_frame_system.html" xlink:title="io_write_frame_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="563.5,-66 440.5,-66 440.5,-42 563.5,-42 563.5,-66"/>
+<text text-anchor="middle" x="502" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
 </a>
 </g>
 </g>
-<!-- proc~io_dump_param&#45;&gt;interface~util_exit -->
+<!-- proc~io_write_frame_system&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge27" class="edge">
-<title>proc~io_dump_param&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M547.84,-57.74C559.18,-60.82 570.31,-66.1 578,-75 638.71,-145.24 640.88,-450.49 640.28,-535.79"/>
-<polygon fill="#000000" stroke="#000000" points="636.78,-535.87 640.18,-545.9 643.78,-535.94 636.78,-535.87"/>
+<title>proc~io_write_frame_system&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M563.75,-63.9C569.12,-66.77 574.02,-70.4 578,-75 638.12,-144.49 640.74,-446.06 640.25,-531.41"/>
+<polygon fill="#000000" stroke="#000000" points="636.75,-531.53 640.17,-541.56 643.75,-531.59 636.75,-531.53"/>
 </g>
-<!-- proc~io_read_in_param -->
+<!-- proc~io_get_args -->
 <g id="proc~~util_exit~~CalledByGraph_node29" class="node">
-<title>proc~io_read_in_param</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node29"><a xlink:href=".././proc/io_read_in_param.html" xlink:title="io_read_in_param">
-<polygon fill="#d9534f" stroke="#d9534f" points="552,-24 452,-24 452,0 552,0 552,-24"/>
-<text text-anchor="middle" x="502" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
+<title>proc~io_get_args</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node29"><a xlink:href=".././proc/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="536.5,-24 467.5,-24 467.5,0 536.5,0 536.5,-24"/>
+<text text-anchor="middle" x="502" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
-<!-- proc~io_read_in_param&#45;&gt;interface~util_exit -->
+<!-- proc~io_get_args&#45;&gt;interface~util_exit -->
 <g id="proc~~util_exit~~CalledByGraph_edge28" class="edge">
-<title>proc~io_read_in_param&#45;&gt;interface~util_exit</title>
-<path fill="none" stroke="#000000" d="M552.19,-16.96C562,-20.17 571.32,-25.19 578,-33 611.21,-71.83 633.56,-440.35 638.81,-535.61"/>
-<polygon fill="#000000" stroke="#000000" points="635.32,-535.81 639.35,-545.6 642.31,-535.43 635.32,-535.81"/>
+<title>proc~io_get_args&#45;&gt;interface~util_exit</title>
+<path fill="none" stroke="#000000" d="M536.6,-13.28C551.44,-15.66 567.8,-21.09 578,-33 643.48,-109.47 642.11,-442.32 640.51,-531.79"/>
+<polygon fill="#000000" stroke="#000000" points="637.01,-531.83 640.31,-541.9 644.01,-531.97 637.01,-531.83"/>
 </g>
-<!-- interface~io_read_frame_cb -->
+<!-- interface~io_conservation_report -->
 <g id="proc~~util_exit~~CalledByGraph_node30" class="node">
-<title>interface~io_read_frame_cb</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node30"><a xlink:href=".././interface/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="364,-150 264,-150 264,-126 364,-126 364,-150"/>
-<text text-anchor="middle" x="314" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+<title>interface~io_conservation_report</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node30"><a xlink:href=".././interface/io_conservation_report.html" xlink:title="io_conservation_report">
+<polygon fill="#a7506f" stroke="#a7506f" points="375,-566 253,-566 253,-542 375,-542 375,-566"/>
+<text text-anchor="middle" x="314" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb -->
-<g id="proc~~util_exit~~CalledByGraph_edge50" class="edge">
-<title>interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-138C388.1,-138 416.75,-138 441.67,-138"/>
-<polygon fill="#000000" stroke="#000000" points="441.74,-141.5 451.74,-138 441.74,-134.5 441.74,-141.5"/>
+<!-- interface~io_conservation_report&#45;&gt;proc~io_conservation_report -->
+<g id="proc~~util_exit~~CalledByGraph_edge40" class="edge">
+<title>interface~io_conservation_report&#45;&gt;proc~io_conservation_report</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.13,-554C392.86,-554 412.42,-554 430.73,-554"/>
+<polygon fill="#000000" stroke="#000000" points="430.76,-557.5 440.76,-554 430.76,-550.5 430.76,-557.5"/>
 </g>
-<!-- interface~util_valid_id_system -->
+<!-- interface~util_solve_rkf45 -->
 <g id="proc~~util_exit~~CalledByGraph_node31" class="node">
-<title>interface~util_valid_id_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node31"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="368,-654 260,-654 260,-630 368,-630 368,-654"/>
-<text text-anchor="middle" x="314" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
+<title>interface~util_solve_rkf45</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node31"><a xlink:href=".././interface/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
+<polygon fill="#a7506f" stroke="#a7506f" points="357.5,-192 270.5,-192 270.5,-168 357.5,-168 357.5,-192"/>
+<text text-anchor="middle" x="314" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
 </a>
 </g>
 </g>
-<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
-<g id="proc~~util_exit~~CalledByGraph_edge39" class="edge">
-<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.3,-642C389.9,-642 415.01,-642 437.54,-642"/>
-<polygon fill="#000000" stroke="#000000" points="437.69,-645.5 447.69,-642 437.69,-638.5 437.69,-645.5"/>
+<!-- interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45 -->
+<g id="proc~~util_exit~~CalledByGraph_edge47" class="edge">
+<title>interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.67,-180C384.51,-180 419.36,-180 447.97,-180"/>
+<polygon fill="#000000" stroke="#000000" points="448.2,-183.5 458.2,-180 448.2,-176.5 448.2,-183.5"/>
 </g>
-<!-- interface~io_write_encounter -->
+<!-- interface~io_dump_particle_info_base -->
 <g id="proc~~util_exit~~CalledByGraph_node32" class="node">
-<title>interface~io_write_encounter</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node32"><a xlink:href=".././interface/io_write_encounter.html" xlink:title="io_write_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="365.5,-822 262.5,-822 262.5,-798 365.5,-798 365.5,-822"/>
-<text text-anchor="middle" x="314" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
+<title>interface~io_dump_particle_info_base</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node32"><a xlink:href=".././interface/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="387.5,-734 240.5,-734 240.5,-710 387.5,-710 387.5,-734"/>
+<text text-anchor="middle" x="314" y="-719.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_encounter&#45;&gt;proc~io_write_encounter -->
-<g id="proc~~util_exit~~CalledByGraph_edge35" class="edge">
-<title>interface~io_write_encounter&#45;&gt;proc~io_write_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.83,-810C388.79,-810 416.11,-810 440.15,-810"/>
-<polygon fill="#000000" stroke="#000000" points="440.24,-813.5 450.24,-810 440.24,-806.5 440.24,-813.5"/>
+<!-- interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base -->
+<g id="proc~~util_exit~~CalledByGraph_edge36" class="edge">
+<title>interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.71,-722C397.72,-722 408.06,-722 418.24,-722"/>
+<polygon fill="#000000" stroke="#000000" points="418.34,-725.5 428.34,-722 418.34,-718.5 418.34,-725.5"/>
 </g>
-<!-- interface~util_append_pl -->
+<!-- interface~setup_construct_system -->
 <g id="proc~~util_exit~~CalledByGraph_node33" class="node">
-<title>interface~util_append_pl</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node33"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="355,-192 273,-192 273,-168 355,-168 355,-192"/>
-<text text-anchor="middle" x="314" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
+<title>interface~setup_construct_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node33"><a xlink:href=".././interface/setup_construct_system.html" xlink:title="setup_construct_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="378,-902 250,-902 250,-878 378,-878 378,-902"/>
+<text text-anchor="middle" x="314" y="-887.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
-<g id="proc~~util_exit~~CalledByGraph_edge49" class="edge">
-<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.36,-180C383.27,-180 420.61,-180 450.49,-180"/>
-<polygon fill="#000000" stroke="#000000" points="450.72,-183.5 460.72,-180 450.72,-176.5 450.72,-183.5"/>
+<!-- interface~setup_construct_system&#45;&gt;proc~setup_construct_system -->
+<g id="proc~~util_exit~~CalledByGraph_edge33" class="edge">
+<title>interface~setup_construct_system&#45;&gt;proc~setup_construct_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.23,-890C394.19,-890 411.46,-890 427.86,-890"/>
+<polygon fill="#000000" stroke="#000000" points="427.94,-893.5 437.94,-890 427.94,-886.5 427.94,-893.5"/>
 </g>
 <!-- interface~io_write_hdr_system -->
 <g id="proc~~util_exit~~CalledByGraph_node34" class="node">
 <title>interface~io_write_hdr_system</title>
 <g id="a_proc~~util_exit~~CalledByGraph_node34"><a xlink:href=".././interface/io_write_hdr_system.html" xlink:title="io_write_hdr_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="369.5,-1112 258.5,-1112 258.5,-1088 369.5,-1088 369.5,-1112"/>
-<text text-anchor="middle" x="314" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="369.5,-276 258.5,-276 258.5,-252 369.5,-252 369.5,-276"/>
+<text text-anchor="middle" x="314" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_hdr_system</text>
 </a>
 </g>
 </g>
 <!-- interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system -->
-<g id="proc~~util_exit~~CalledByGraph_edge29" class="edge">
+<g id="proc~~util_exit~~CalledByGraph_edge45" class="edge">
 <title>interface~io_write_hdr_system&#45;&gt;proc~io_write_hdr_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369.55,-1100C390.46,-1100 414.53,-1100 436.3,-1100"/>
-<polygon fill="#000000" stroke="#000000" points="436.45,-1103.5 446.45,-1100 436.45,-1096.5 436.45,-1103.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M369.55,-264C390.46,-264 414.53,-264 436.3,-264"/>
+<polygon fill="#000000" stroke="#000000" points="436.45,-267.5 446.45,-264 436.45,-260.5 436.45,-267.5"/>
 </g>
-<!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
-<g id="proc~~util_exit~~CalledByGraph_edge34" class="edge">
-<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-1020C390.67,-1020 414.3,-1020 435.76,-1020"/>
-<polygon fill="#000000" stroke="#000000" points="435.77,-1023.5 445.77,-1020 435.77,-1016.5 435.77,-1023.5"/>
+<!-- interface~io_read_frame_cb -->
+<g id="proc~~util_exit~~CalledByGraph_node35" class="node">
+<title>interface~io_read_frame_cb</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node35"><a xlink:href=".././interface/io_read_frame_cb.html" xlink:title="io_read_frame_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="364,-524 264,-524 264,-500 364,-500 364,-524"/>
+<text text-anchor="middle" x="314" y="-509.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_cb</text>
+</a>
 </g>
-<!-- interface~io_write_frame_encounter -->
+</g>
+<!-- interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb -->
+<g id="proc~~util_exit~~CalledByGraph_edge41" class="edge">
+<title>interface~io_read_frame_cb&#45;&gt;proc~io_read_frame_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-512C388.1,-512 416.75,-512 441.67,-512"/>
+<polygon fill="#000000" stroke="#000000" points="441.74,-515.5 451.74,-512 441.74,-508.5 441.74,-515.5"/>
+</g>
+<!-- interface~io_read_in_cb -->
 <g id="proc~~util_exit~~CalledByGraph_node36" class="node">
-<title>interface~io_write_frame_encounter</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node36"><a xlink:href=".././interface/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
-<polygon fill="#a7506f" stroke="#a7506f" points="382.5,-780 245.5,-780 245.5,-756 382.5,-756 382.5,-780"/>
-<text text-anchor="middle" x="314" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
+<title>interface~io_read_in_cb</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node36"><a xlink:href=".././interface/io_read_in_cb.html" xlink:title="io_read_in_cb">
+<polygon fill="#a7506f" stroke="#a7506f" points="354,-1070 274,-1070 274,-1046 354,-1046 354,-1070"/>
+<text text-anchor="middle" x="314" y="-1055.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter -->
-<g id="proc~~util_exit~~CalledByGraph_edge36" class="edge">
-<title>interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.68,-768C395.84,-768 409.73,-768 423.19,-768"/>
-<polygon fill="#000000" stroke="#000000" points="423.37,-771.5 433.37,-768 423.37,-764.5 423.37,-771.5"/>
+<!-- interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb -->
+<g id="proc~~util_exit~~CalledByGraph_edge30" class="edge">
+<title>interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M354.45,-1058C382.78,-1058 421.17,-1058 451.55,-1058"/>
+<polygon fill="#000000" stroke="#000000" points="451.93,-1061.5 461.93,-1058 451.93,-1054.5 451.93,-1061.5"/>
 </g>
-<!-- interface~io_read_particle_info_system -->
+<!-- interface~io_write_encounter -->
 <g id="proc~~util_exit~~CalledByGraph_node37" class="node">
-<title>interface~io_read_particle_info_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node37"><a xlink:href=".././interface/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="390,-570 238,-570 238,-546 390,-546 390,-570"/>
-<text text-anchor="middle" x="314" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
+<title>interface~io_write_encounter</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node37"><a xlink:href=".././interface/io_write_encounter.html" xlink:title="io_write_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="365.5,-1112 262.5,-1112 262.5,-1088 365.5,-1088 365.5,-1112"/>
+<text text-anchor="middle" x="314" y="-1097.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system -->
-<g id="proc~~util_exit~~CalledByGraph_edge41" class="edge">
-<title>interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.12,-558C398.6,-558 407.28,-558 415.87,-558"/>
-<polygon fill="#000000" stroke="#000000" points="415.9,-561.5 425.9,-558 415.9,-554.5 415.9,-561.5"/>
+<!-- interface~io_write_encounter&#45;&gt;proc~io_write_encounter -->
+<g id="proc~~util_exit~~CalledByGraph_edge29" class="edge">
+<title>interface~io_write_encounter&#45;&gt;proc~io_write_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M365.83,-1100C388.79,-1100 416.11,-1100 440.15,-1100"/>
+<polygon fill="#000000" stroke="#000000" points="440.24,-1103.5 450.24,-1100 440.24,-1096.5 440.24,-1103.5"/>
 </g>
-<!-- interface~io_read_frame_body -->
+<!-- interface~io_dump_param -->
 <g id="proc~~util_exit~~CalledByGraph_node38" class="node">
-<title>interface~io_read_frame_body</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node38"><a xlink:href=".././interface/io_read_frame_body.html" xlink:title="io_read_frame_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="370,-486 258,-486 258,-462 370,-462 370,-486"/>
-<text text-anchor="middle" x="314" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
+<title>interface~io_dump_param</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node38"><a xlink:href=".././interface/io_dump_param.html" xlink:title="io_dump_param">
+<polygon fill="#a7506f" stroke="#a7506f" points="359.5,-650 268.5,-650 268.5,-626 359.5,-626 359.5,-650"/>
+<text text-anchor="middle" x="314" y="-635.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body -->
-<g id="proc~~util_exit~~CalledByGraph_edge43" class="edge">
-<title>interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-474C390.67,-474 414.3,-474 435.76,-474"/>
-<polygon fill="#000000" stroke="#000000" points="435.77,-477.5 445.77,-474 435.77,-470.5 435.77,-477.5"/>
+<!-- interface~io_dump_param&#45;&gt;proc~io_dump_param -->
+<g id="proc~~util_exit~~CalledByGraph_edge38" class="edge">
+<title>interface~io_dump_param&#45;&gt;proc~io_dump_param</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.55,-638C385.57,-638 418.6,-638 446.2,-638"/>
+<polygon fill="#000000" stroke="#000000" points="446.49,-641.5 456.49,-638 446.49,-634.5 446.49,-641.5"/>
 </g>
-<!-- interface~io_dump_base -->
+<!-- interface~io_get_args -->
 <g id="proc~~util_exit~~CalledByGraph_node39" class="node">
-<title>interface~io_dump_base</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node39"><a xlink:href=".././interface/io_dump_base.html" xlink:title="io_dump_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="83,-1032 0,-1032 0,-1008 83,-1008 83,-1032"/>
-<text text-anchor="middle" x="41.5" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
+<title>interface~io_get_args</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node39"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
+<polygon fill="#a7506f" stroke="#a7506f" points="348.5,-24 279.5,-24 279.5,0 348.5,0 348.5,-24"/>
+<text text-anchor="middle" x="314" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_base&#45;&gt;proc~io_dump_base -->
-<g id="proc~~util_exit~~CalledByGraph_edge30" class="edge">
-<title>interface~io_dump_base&#45;&gt;proc~io_dump_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-1020C91.35,-1020 100.14,-1020 108.7,-1020"/>
-<polygon fill="#000000" stroke="#000000" points="108.98,-1023.5 118.98,-1020 108.98,-1016.5 108.98,-1023.5"/>
+<!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
+<g id="proc~~util_exit~~CalledByGraph_edge53" class="edge">
+<title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M348.68,-12C379.01,-12 423.77,-12 456.93,-12"/>
+<polygon fill="#000000" stroke="#000000" points="457.25,-15.5 467.25,-12 457.25,-8.5 457.25,-15.5"/>
 </g>
-<!-- interface~io_get_args -->
+<!-- interface~io_read_frame_body -->
 <g id="proc~~util_exit~~CalledByGraph_node40" class="node">
-<title>interface~io_get_args</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node40"><a xlink:href=".././interface/io_get_args.html" xlink:title="io_get_args">
-<polygon fill="#a7506f" stroke="#a7506f" points="348.5,-948 279.5,-948 279.5,-924 348.5,-924 348.5,-948"/>
-<text text-anchor="middle" x="314" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_args</text>
+<title>interface~io_read_frame_body</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node40"><a xlink:href=".././interface/io_read_frame_body.html" xlink:title="io_read_frame_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="370,-150 258,-150 258,-126 370,-126 370,-150"/>
+<text text-anchor="middle" x="314" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_frame_body</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_args&#45;&gt;proc~io_get_args -->
-<g id="proc~~util_exit~~CalledByGraph_edge31" class="edge">
-<title>interface~io_get_args&#45;&gt;proc~io_get_args</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M348.68,-936C379.01,-936 423.77,-936 456.93,-936"/>
-<polygon fill="#000000" stroke="#000000" points="457.25,-939.5 467.25,-936 457.25,-932.5 457.25,-939.5"/>
+<!-- interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body -->
+<g id="proc~~util_exit~~CalledByGraph_edge48" class="edge">
+<title>interface~io_read_frame_body&#45;&gt;proc~io_read_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-138C390.67,-138 414.3,-138 435.76,-138"/>
+<polygon fill="#000000" stroke="#000000" points="435.77,-141.5 445.77,-138 435.77,-134.5 435.77,-141.5"/>
 </g>
-<!-- interface~io_get_old_t_final_system -->
+<!-- interface~util_append_tp -->
 <g id="proc~~util_exit~~CalledByGraph_node41" class="node">
-<title>interface~io_get_old_t_final_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node41"><a xlink:href=".././interface/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="382,-108 246,-108 246,-84 382,-84 382,-108"/>
-<text text-anchor="middle" x="314" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
+<title>interface~util_append_tp</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node41"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="355.5,-986 272.5,-986 272.5,-962 355.5,-962 355.5,-986"/>
+<text text-anchor="middle" x="314" y="-971.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system -->
-<g id="proc~~util_exit~~CalledByGraph_edge51" class="edge">
-<title>interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.15,-96C395.58,-96 409.8,-96 423.55,-96"/>
-<polygon fill="#000000" stroke="#000000" points="423.95,-99.5 433.95,-96 423.95,-92.5 423.95,-99.5"/>
-</g>
-<!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
-<g id="proc~~util_exit~~CalledByGraph_edge47" class="edge">
-<title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-978C388.1,-978 416.75,-978 441.67,-978"/>
-<polygon fill="#000000" stroke="#000000" points="441.74,-981.5 451.74,-978 441.74,-974.5 441.74,-981.5"/>
+<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
+<g id="proc~~util_exit~~CalledByGraph_edge32" class="edge">
+<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.82,-974C383.56,-974 420.46,-974 450.12,-974"/>
+<polygon fill="#000000" stroke="#000000" points="450.28,-977.5 460.28,-974 450.28,-970.5 450.28,-977.5"/>
 </g>
-<!-- interface~setup_construct_system -->
-<g id="proc~~util_exit~~CalledByGraph_node43" class="node">
-<title>interface~setup_construct_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node43"><a xlink:href=".././interface/setup_construct_system.html" xlink:title="setup_construct_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="378,-234 250,-234 250,-210 378,-210 378,-234"/>
-<text text-anchor="middle" x="314" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<!-- interface~io_write_frame_encounter -->
+<g id="proc~~util_exit~~CalledByGraph_node42" class="node">
+<title>interface~io_write_frame_encounter</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node42"><a xlink:href=".././interface/io_write_frame_encounter.html" xlink:title="io_write_frame_encounter">
+<polygon fill="#a7506f" stroke="#a7506f" points="382.5,-608 245.5,-608 245.5,-584 382.5,-584 382.5,-608"/>
+<text text-anchor="middle" x="314" y="-593.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_encounter</text>
 </a>
 </g>
 </g>
-<!-- interface~setup_construct_system&#45;&gt;proc~setup_construct_system -->
-<g id="proc~~util_exit~~CalledByGraph_edge48" class="edge">
-<title>interface~setup_construct_system&#45;&gt;proc~setup_construct_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M378.23,-222C394.19,-222 411.46,-222 427.86,-222"/>
-<polygon fill="#000000" stroke="#000000" points="427.94,-225.5 437.94,-222 427.94,-218.5 427.94,-225.5"/>
+<!-- interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter -->
+<g id="proc~~util_exit~~CalledByGraph_edge39" class="edge">
+<title>interface~io_write_frame_encounter&#45;&gt;proc~io_write_frame_encounter</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.68,-596C395.84,-596 409.73,-596 423.19,-596"/>
+<polygon fill="#000000" stroke="#000000" points="423.37,-599.5 433.37,-596 423.37,-592.5 423.37,-599.5"/>
 </g>
-<!-- interface~io_write_discard -->
+<!-- interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body -->
+<g id="proc~~util_exit~~CalledByGraph_edge49" class="edge">
+<title>interface~io_write_frame_body&#45;&gt;proc~io_write_frame_body</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M370.05,-348C390.67,-348 414.3,-348 435.76,-348"/>
+<polygon fill="#000000" stroke="#000000" points="435.77,-351.5 445.77,-348 435.77,-344.5 435.77,-351.5"/>
+</g>
+<!-- interface~util_valid_id_system -->
 <g id="proc~~util_exit~~CalledByGraph_node44" class="node">
-<title>interface~io_write_discard</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node44"><a xlink:href=".././interface/io_write_discard.html" xlink:title="io_write_discard">
-<polygon fill="#a7506f" stroke="#a7506f" points="359,-402 269,-402 269,-378 359,-378 359,-402"/>
-<text text-anchor="middle" x="314" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
+<title>interface~util_valid_id_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node44"><a xlink:href=".././interface/util_valid_id_system.html" xlink:title="util_valid_id_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="368,-108 260,-108 260,-84 368,-84 368,-108"/>
+<text text-anchor="middle" x="314" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid_id_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_discard&#45;&gt;proc~io_write_discard -->
-<g id="proc~~util_exit~~CalledByGraph_edge45" class="edge">
-<title>interface~io_write_discard&#45;&gt;proc~io_write_discard</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.08,-390C385.39,-390 419.01,-390 446.91,-390"/>
-<polygon fill="#000000" stroke="#000000" points="446.92,-393.5 456.92,-390 446.92,-386.5 446.92,-393.5"/>
+<!-- interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system -->
+<g id="proc~~util_exit~~CalledByGraph_edge50" class="edge">
+<title>interface~util_valid_id_system&#45;&gt;proc~util_valid_id_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M368.3,-96C389.9,-96 415.01,-96 437.54,-96"/>
+<polygon fill="#000000" stroke="#000000" points="437.69,-99.5 447.69,-96 437.69,-92.5 437.69,-99.5"/>
 </g>
-<!-- interface~io_dump_particle_info -->
+<!-- interface~io_read_particle_info_system -->
 <g id="proc~~util_exit~~CalledByGraph_node45" class="node">
-<title>interface~io_dump_particle_info</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node45"><a xlink:href=".././interface/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="373,-738 255,-738 255,-714 373,-714 373,-738"/>
-<text text-anchor="middle" x="314" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
+<title>interface~io_read_particle_info_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node45"><a xlink:href=".././interface/io_read_particle_info_system.html" xlink:title="io_read_particle_info_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="390,-860 238,-860 238,-836 390,-836 390,-860"/>
+<text text-anchor="middle" x="314" y="-845.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_particle_info_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info -->
-<g id="proc~~util_exit~~CalledByGraph_edge37" class="edge">
-<title>interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.09,-726C391.97,-726 413.09,-726 432.65,-726"/>
-<polygon fill="#000000" stroke="#000000" points="432.71,-729.5 442.71,-726 432.71,-722.5 432.71,-729.5"/>
+<!-- interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system -->
+<g id="proc~~util_exit~~CalledByGraph_edge34" class="edge">
+<title>interface~io_read_particle_info_system&#45;&gt;proc~io_read_particle_info_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.12,-848C398.6,-848 407.28,-848 415.87,-848"/>
+<polygon fill="#000000" stroke="#000000" points="415.9,-851.5 425.9,-848 415.9,-844.5 415.9,-851.5"/>
 </g>
-<!-- interface~io_read_in_cb -->
+<!-- interface~io_write_discard -->
 <g id="proc~~util_exit~~CalledByGraph_node46" class="node">
-<title>interface~io_read_in_cb</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node46"><a xlink:href=".././interface/io_read_in_cb.html" xlink:title="io_read_in_cb">
-<polygon fill="#a7506f" stroke="#a7506f" points="354,-528 274,-528 274,-504 354,-504 354,-528"/>
-<text text-anchor="middle" x="314" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_cb</text>
+<title>interface~io_write_discard</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node46"><a xlink:href=".././interface/io_write_discard.html" xlink:title="io_write_discard">
+<polygon fill="#a7506f" stroke="#a7506f" points="359,-776 269,-776 269,-752 359,-752 359,-776"/>
+<text text-anchor="middle" x="314" y="-761.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_discard</text>
 </a>
 </g>
 </g>
-<!-- interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb -->
-<g id="proc~~util_exit~~CalledByGraph_edge42" class="edge">
-<title>interface~io_read_in_cb&#45;&gt;proc~io_read_in_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M354.45,-516C382.78,-516 421.17,-516 451.55,-516"/>
-<polygon fill="#000000" stroke="#000000" points="451.93,-519.5 461.93,-516 451.93,-512.5 451.93,-519.5"/>
+<!-- interface~io_write_discard&#45;&gt;proc~io_write_discard -->
+<g id="proc~~util_exit~~CalledByGraph_edge35" class="edge">
+<title>interface~io_write_discard&#45;&gt;proc~io_write_discard</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.08,-764C385.39,-764 419.01,-764 446.91,-764"/>
+<polygon fill="#000000" stroke="#000000" points="446.92,-767.5 456.92,-764 446.92,-760.5 446.92,-767.5"/>
 </g>
-<!-- interface~util_append_tp -->
+<!-- interface~io_dump_base -->
 <g id="proc~~util_exit~~CalledByGraph_node47" class="node">
-<title>interface~util_append_tp</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node47"><a xlink:href=".././interface/util_append_tp.html" xlink:title="util_append_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="355.5,-696 272.5,-696 272.5,-672 355.5,-672 355.5,-696"/>
-<text text-anchor="middle" x="314" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_tp</text>
+<title>interface~io_dump_base</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node47"><a xlink:href=".././interface/io_dump_base.html" xlink:title="io_dump_base">
+<polygon fill="#a7506f" stroke="#a7506f" points="83,-360 0,-360 0,-336 83,-336 83,-360"/>
+<text text-anchor="middle" x="41.5" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_base</text>
 </a>
 </g>
 </g>
-<!-- interface~util_append_tp&#45;&gt;proc~util_append_tp -->
-<g id="proc~~util_exit~~CalledByGraph_edge38" class="edge">
-<title>interface~util_append_tp&#45;&gt;proc~util_append_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.82,-684C383.56,-684 420.46,-684 450.12,-684"/>
-<polygon fill="#000000" stroke="#000000" points="450.28,-687.5 460.28,-684 450.28,-680.5 450.28,-687.5"/>
+<!-- interface~io_dump_base&#45;&gt;proc~io_dump_base -->
+<g id="proc~~util_exit~~CalledByGraph_edge44" class="edge">
+<title>interface~io_dump_base&#45;&gt;proc~io_dump_base</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M83.09,-348C91.35,-348 100.14,-348 108.7,-348"/>
+<polygon fill="#000000" stroke="#000000" points="108.98,-351.5 118.98,-348 108.98,-344.5 108.98,-351.5"/>
 </g>
-<!-- interface~util_solve_rkf45 -->
+<!-- interface~util_append_pl -->
 <g id="proc~~util_exit~~CalledByGraph_node48" class="node">
-<title>interface~util_solve_rkf45</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node48"><a xlink:href=".././interface/util_solve_rkf45.html" xlink:title="util_solve_rkf45">
-<polygon fill="#a7506f" stroke="#a7506f" points="357.5,-612 270.5,-612 270.5,-588 357.5,-588 357.5,-612"/>
-<text text-anchor="middle" x="314" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve_rkf45</text>
+<title>interface~util_append_pl</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node48"><a xlink:href=".././interface/util_append_pl.html" xlink:title="util_append_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="355,-1028 273,-1028 273,-1004 355,-1004 355,-1028"/>
+<text text-anchor="middle" x="314" y="-1013.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45 -->
-<g id="proc~~util_exit~~CalledByGraph_edge40" class="edge">
-<title>interface~util_solve_rkf45&#45;&gt;proc~util_solve_rkf45</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M357.67,-600C384.51,-600 419.36,-600 447.97,-600"/>
-<polygon fill="#000000" stroke="#000000" points="448.2,-603.5 458.2,-600 448.2,-596.5 448.2,-603.5"/>
+<!-- interface~util_append_pl&#45;&gt;proc~util_append_pl -->
+<g id="proc~~util_exit~~CalledByGraph_edge31" class="edge">
+<title>interface~util_append_pl&#45;&gt;proc~util_append_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M355.36,-1016C383.27,-1016 420.61,-1016 450.49,-1016"/>
+<polygon fill="#000000" stroke="#000000" points="450.72,-1019.5 460.72,-1016 450.72,-1012.5 450.72,-1019.5"/>
 </g>
-<!-- interface~io_conservation_report -->
+<!-- interface~io_dump_particle_info -->
 <g id="proc~~util_exit~~CalledByGraph_node49" class="node">
-<title>interface~io_conservation_report</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node49"><a xlink:href=".././interface/io_conservation_report.html" xlink:title="io_conservation_report">
-<polygon fill="#a7506f" stroke="#a7506f" points="375,-276 253,-276 253,-252 375,-252 375,-276"/>
-<text text-anchor="middle" x="314" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_conservation_report</text>
+<title>interface~io_dump_particle_info</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node49"><a xlink:href=".././interface/io_dump_particle_info.html" xlink:title="io_dump_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="373,-692 255,-692 255,-668 373,-668 373,-692"/>
+<text text-anchor="middle" x="314" y="-677.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~io_conservation_report&#45;&gt;proc~io_conservation_report -->
-<g id="proc~~util_exit~~CalledByGraph_edge46" class="edge">
-<title>interface~io_conservation_report&#45;&gt;proc~io_conservation_report</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.13,-264C392.86,-264 412.42,-264 430.73,-264"/>
-<polygon fill="#000000" stroke="#000000" points="430.76,-267.5 440.76,-264 430.76,-260.5 430.76,-267.5"/>
+<!-- interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info -->
+<g id="proc~~util_exit~~CalledByGraph_edge37" class="edge">
+<title>interface~io_dump_particle_info&#45;&gt;proc~io_dump_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M373.09,-680C391.97,-680 413.09,-680 432.65,-680"/>
+<polygon fill="#000000" stroke="#000000" points="432.71,-683.5 442.71,-680 432.71,-676.5 432.71,-683.5"/>
 </g>
-<!-- interface~io_dump_particle_info_base -->
+<!-- interface~io_write_frame_system -->
 <g id="proc~~util_exit~~CalledByGraph_node50" class="node">
-<title>interface~io_dump_particle_info_base</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node50"><a xlink:href=".././interface/io_dump_particle_info_base.html" xlink:title="io_dump_particle_info_base">
-<polygon fill="#a7506f" stroke="#a7506f" points="387.5,-864 240.5,-864 240.5,-840 387.5,-840 387.5,-864"/>
-<text text-anchor="middle" x="314" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_particle_info_base</text>
+<title>interface~io_write_frame_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node50"><a xlink:href=".././interface/io_write_frame_system.html" xlink:title="io_write_frame_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="375.5,-66 252.5,-66 252.5,-42 375.5,-42 375.5,-66"/>
+<text text-anchor="middle" x="314" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base -->
-<g id="proc~~util_exit~~CalledByGraph_edge33" class="edge">
-<title>interface~io_dump_particle_info_base&#45;&gt;proc~io_dump_particle_info_base</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M387.71,-852C397.72,-852 408.06,-852 418.24,-852"/>
-<polygon fill="#000000" stroke="#000000" points="418.34,-855.5 428.34,-852 418.34,-848.5 418.34,-855.5"/>
+<!-- interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system -->
+<g id="proc~~util_exit~~CalledByGraph_edge52" class="edge">
+<title>interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.65,-54C393.1,-54 412.28,-54 430.29,-54"/>
+<polygon fill="#000000" stroke="#000000" points="430.44,-57.5 440.44,-54 430.44,-50.5 430.44,-57.5"/>
 </g>
 <!-- interface~io_read_in_param -->
 <g id="proc~~util_exit~~CalledByGraph_node51" class="node">
 <title>interface~io_read_in_param</title>
 <g id="a_proc~~util_exit~~CalledByGraph_node51"><a xlink:href=".././interface/io_read_in_param.html" xlink:title="io_read_in_param">
-<polygon fill="#a7506f" stroke="#a7506f" points="364,-24 264,-24 264,0 364,0 364,-24"/>
-<text text-anchor="middle" x="314" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="364,-234 264,-234 264,-210 364,-210 364,-234"/>
+<text text-anchor="middle" x="314" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_param</text>
 </a>
 </g>
 </g>
 <!-- interface~io_read_in_param&#45;&gt;proc~io_read_in_param -->
-<g id="proc~~util_exit~~CalledByGraph_edge53" class="edge">
+<g id="proc~~util_exit~~CalledByGraph_edge46" class="edge">
 <title>interface~io_read_in_param&#45;&gt;proc~io_read_in_param</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-12C388.1,-12 416.75,-12 441.67,-12"/>
-<polygon fill="#000000" stroke="#000000" points="441.74,-15.5 451.74,-12 441.74,-8.5 441.74,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-222C388.1,-222 416.75,-222 441.67,-222"/>
+<polygon fill="#000000" stroke="#000000" points="441.74,-225.5 451.74,-222 441.74,-218.5 441.74,-225.5"/>
 </g>
-<!-- interface~io_read_in_particle_info -->
-<g id="proc~~util_exit~~CalledByGraph_node52" class="node">
-<title>interface~io_read_in_particle_info</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node52"><a xlink:href=".././interface/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
-<polygon fill="#a7506f" stroke="#a7506f" points="377.5,-444 250.5,-444 250.5,-420 377.5,-420 377.5,-444"/>
-<text text-anchor="middle" x="314" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
-</a>
-</g>
-</g>
-<!-- interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info -->
-<g id="proc~~util_exit~~CalledByGraph_edge44" class="edge">
-<title>interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.71,-432C393.87,-432 411.4,-432 428.03,-432"/>
-<polygon fill="#000000" stroke="#000000" points="428.24,-435.5 438.24,-432 428.24,-428.5 428.24,-435.5"/>
+<!-- interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb -->
+<g id="proc~~util_exit~~CalledByGraph_edge51" class="edge">
+<title>interface~io_write_frame_cb&#45;&gt;proc~io_write_frame_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M364.36,-306C388.1,-306 416.75,-306 441.67,-306"/>
+<polygon fill="#000000" stroke="#000000" points="441.74,-309.5 451.74,-306 441.74,-302.5 441.74,-309.5"/>
 </g>
-<!-- interface~io_write_frame_system -->
+<!-- interface~io_get_old_t_final_system -->
 <g id="proc~~util_exit~~CalledByGraph_node53" class="node">
-<title>interface~io_write_frame_system</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node53"><a xlink:href=".././interface/io_write_frame_system.html" xlink:title="io_write_frame_system">
-<polygon fill="#a7506f" stroke="#a7506f" points="375.5,-906 252.5,-906 252.5,-882 375.5,-882 375.5,-906"/>
-<text text-anchor="middle" x="314" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_write_frame_system</text>
+<title>interface~io_get_old_t_final_system</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node53"><a xlink:href=".././interface/io_get_old_t_final_system.html" xlink:title="io_get_old_t_final_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="382,-440 246,-440 246,-416 382,-416 382,-440"/>
+<text text-anchor="middle" x="314" y="-425.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_get_old_t_final_system</text>
 </a>
 </g>
 </g>
-<!-- interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system -->
-<g id="proc~~util_exit~~CalledByGraph_edge32" class="edge">
-<title>interface~io_write_frame_system&#45;&gt;proc~io_write_frame_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M375.65,-894C393.1,-894 412.28,-894 430.29,-894"/>
-<polygon fill="#000000" stroke="#000000" points="430.44,-897.5 440.44,-894 430.44,-890.5 430.44,-897.5"/>
+<!-- interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system -->
+<g id="proc~~util_exit~~CalledByGraph_edge43" class="edge">
+<title>interface~io_get_old_t_final_system&#45;&gt;proc~io_get_old_t_final_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.15,-428C395.58,-428 409.8,-428 423.55,-428"/>
+<polygon fill="#000000" stroke="#000000" points="423.95,-431.5 433.95,-428 423.95,-424.5 423.95,-431.5"/>
 </g>
-<!-- interface~io_dump_param -->
+<!-- interface~io_read_in_particle_info -->
 <g id="proc~~util_exit~~CalledByGraph_node54" class="node">
-<title>interface~io_dump_param</title>
-<g id="a_proc~~util_exit~~CalledByGraph_node54"><a xlink:href=".././interface/io_dump_param.html" xlink:title="io_dump_param">
-<polygon fill="#a7506f" stroke="#a7506f" points="359.5,-66 268.5,-66 268.5,-42 359.5,-42 359.5,-66"/>
-<text text-anchor="middle" x="314" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_dump_param</text>
+<title>interface~io_read_in_particle_info</title>
+<g id="a_proc~~util_exit~~CalledByGraph_node54"><a xlink:href=".././interface/io_read_in_particle_info.html" xlink:title="io_read_in_particle_info">
+<polygon fill="#a7506f" stroke="#a7506f" points="377.5,-482 250.5,-482 250.5,-458 377.5,-458 377.5,-482"/>
+<text text-anchor="middle" x="314" y="-467.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io_read_in_particle_info</text>
 </a>
 </g>
 </g>
-<!-- interface~io_dump_param&#45;&gt;proc~io_dump_param -->
-<g id="proc~~util_exit~~CalledByGraph_edge52" class="edge">
-<title>interface~io_dump_param&#45;&gt;proc~io_dump_param</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M359.55,-54C385.57,-54 418.6,-54 446.2,-54"/>
-<polygon fill="#000000" stroke="#000000" points="446.49,-57.5 456.49,-54 446.49,-50.5 446.49,-57.5"/>
+<!-- interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info -->
+<g id="proc~~util_exit~~CalledByGraph_edge42" class="edge">
+<title>interface~io_read_in_particle_info&#45;&gt;proc~io_read_in_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M377.71,-470C393.87,-470 411.4,-470 428.03,-470"/>
+<polygon fill="#000000" stroke="#000000" points="428.24,-473.5 438.24,-470 428.24,-466.5 428.24,-473.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_fill_body.html b/docs/proc/util_fill_body.html
index 6c7620ea5..69b671209 100644
--- a/docs/proc/util_fill_body.html
+++ b/docs/proc/util_fill_body.html
@@ -425,65 +425,65 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.17,-33C265.33,-33 274.13,-33 282.66,-33"/>
 <polygon fill="#000000" stroke="#000000" points="282.86,-36.5 292.86,-33 282.86,-29.5 282.86,-36.5"/>
 </g>
-<!-- proc~util_fill_pl -->
+<!-- proc~util_fill_tp -->
 <g id="proc~~util_fill_body~~CalledByGraph_node3" class="node">
-<title>proc~util_fill_pl</title>
-<g id="a_proc~~util_fill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_fill_pl.html" xlink:title="util_fill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="149.5,-66 93.5,-66 93.5,-42 149.5,-42 149.5,-66"/>
-<text text-anchor="middle" x="121.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<title>proc~util_fill_tp</title>
+<g id="a_proc~~util_fill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_fill_tp.html" xlink:title="util_fill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="150,-66 93,-66 93,-42 150,-42 150,-66"/>
+<text text-anchor="middle" x="121.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_pl&#45;&gt;interface~util_fill_body -->
-<g id="proc~~util_fill_body~~CalledByGraph_edge3" class="edge">
-<title>proc~util_fill_pl&#45;&gt;interface~util_fill_body</title>
-<path fill="none" stroke="#000000" d="M149.54,-48.21C157.69,-46.46 166.86,-44.49 175.84,-42.57"/>
-<polygon fill="#000000" stroke="#000000" points="176.78,-45.95 185.82,-40.43 175.31,-39.1 176.78,-45.95"/>
+<!-- proc~util_fill_tp&#45;&gt;interface~util_fill_body -->
+<g id="proc~~util_fill_body~~CalledByGraph_edge2" class="edge">
+<title>proc~util_fill_tp&#45;&gt;interface~util_fill_body</title>
+<path fill="none" stroke="#000000" d="M150.06,-48.09C158.12,-46.37 167.15,-44.43 175.98,-42.54"/>
+<polygon fill="#000000" stroke="#000000" points="176.76,-45.95 185.8,-40.43 175.29,-39.11 176.76,-45.95"/>
 </g>
-<!-- proc~util_fill_tp -->
+<!-- proc~util_fill_pl -->
 <g id="proc~~util_fill_body~~CalledByGraph_node4" class="node">
-<title>proc~util_fill_tp</title>
-<g id="a_proc~~util_fill_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_fill_tp.html" xlink:title="util_fill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="150,-24 93,-24 93,0 150,0 150,-24"/>
-<text text-anchor="middle" x="121.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<title>proc~util_fill_pl</title>
+<g id="a_proc~~util_fill_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_fill_pl.html" xlink:title="util_fill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="149.5,-24 93.5,-24 93.5,0 149.5,0 149.5,-24"/>
+<text text-anchor="middle" x="121.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_fill_tp&#45;&gt;interface~util_fill_body -->
-<g id="proc~~util_fill_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_fill_tp&#45;&gt;interface~util_fill_body</title>
-<path fill="none" stroke="#000000" d="M150.06,-17.91C158.12,-19.63 167.15,-21.57 175.98,-23.46"/>
-<polygon fill="#000000" stroke="#000000" points="175.29,-26.89 185.8,-25.57 176.76,-20.05 175.29,-26.89"/>
+<!-- proc~util_fill_pl&#45;&gt;interface~util_fill_body -->
+<g id="proc~~util_fill_body~~CalledByGraph_edge3" class="edge">
+<title>proc~util_fill_pl&#45;&gt;interface~util_fill_body</title>
+<path fill="none" stroke="#000000" d="M149.54,-17.79C157.69,-19.54 166.86,-21.51 175.84,-23.43"/>
+<polygon fill="#000000" stroke="#000000" points="175.31,-26.9 185.82,-25.57 176.78,-20.05 175.31,-26.9"/>
 </g>
 <!-- interface~util_fill_tp -->
 <g id="proc~~util_fill_body~~CalledByGraph_node5" class="node">
 <title>interface~util_fill_tp</title>
 <g id="a_proc~~util_fill_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_fill_tp.html" xlink:title="util_fill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="57,-24 0,-24 0,0 57,0 57,-24"/>
-<text text-anchor="middle" x="28.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="57,-66 0,-66 0,-42 57,-42 57,-66"/>
+<text text-anchor="middle" x="28.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~util_fill_tp&#45;&gt;proc~util_fill_tp -->
-<g id="proc~~util_fill_body~~CalledByGraph_edge5" class="edge">
+<g id="proc~~util_fill_body~~CalledByGraph_edge4" class="edge">
 <title>interface~util_fill_tp&#45;&gt;proc~util_fill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M57.3,-12C65.32,-12 74.22,-12 82.74,-12"/>
-<polygon fill="#000000" stroke="#000000" points="82.87,-15.5 92.87,-12 82.87,-8.5 82.87,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M57.3,-54C65.32,-54 74.22,-54 82.74,-54"/>
+<polygon fill="#000000" stroke="#000000" points="82.87,-57.5 92.87,-54 82.87,-50.5 82.87,-57.5"/>
 </g>
 <!-- interface~util_fill_pl -->
 <g id="proc~~util_fill_body~~CalledByGraph_node6" class="node">
 <title>interface~util_fill_pl</title>
 <g id="a_proc~~util_fill_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_fill_pl.html" xlink:title="util_fill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="56.5,-66 0.5,-66 0.5,-42 56.5,-42 56.5,-66"/>
-<text text-anchor="middle" x="28.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="56.5,-24 0.5,-24 0.5,0 56.5,0 56.5,-24"/>
+<text text-anchor="middle" x="28.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~util_fill_pl&#45;&gt;proc~util_fill_pl -->
-<g id="proc~~util_fill_body~~CalledByGraph_edge4" class="edge">
+<g id="proc~~util_fill_body~~CalledByGraph_edge5" class="edge">
 <title>interface~util_fill_pl&#45;&gt;proc~util_fill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M56.8,-54C65.08,-54 74.32,-54 83.14,-54"/>
-<polygon fill="#000000" stroke="#000000" points="83.22,-57.5 93.22,-54 83.22,-50.5 83.22,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M56.8,-12C65.08,-12 74.32,-12 83.14,-12"/>
+<polygon fill="#000000" stroke="#000000" points="83.22,-15.5 93.22,-12 83.22,-8.5 83.22,-15.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_get_energy_momentum_system.html b/docs/proc/util_get_energy_momentum_system.html
index 7df57abd1..efcc2e54f 100644
--- a/docs/proc/util_get_energy_momentum_system.html
+++ b/docs/proc/util_get_energy_momentum_system.html
@@ -136,7 +136,7 @@ <h1>util_get_energy_momentum_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">96 statements</a>
+    title=" 0.1% of total for procedures.">72 statements</a>
      </li> 
      
      
@@ -271,6 +271,107 @@ <h3>Arguments</h3>
     <br>
     
     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Calls</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~util_get_energy_momentum_system~~CallsGraph Pages: 1 -->
+<svg id="procutil_get_energy_momentum_systemCallsGraph" width="363pt" height="32pt"
+ viewBox="0.00 0.00 363.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~util_get_energy_momentum_system~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~util_get_energy_momentum_system~~CallsGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 359,-28 359,4 -4,4"/>
+<!-- proc~util_get_energy_momentum_system -->
+<g id="proc~~util_get_energy_momentum_system~~CallsGraph_node1" class="node">
+<title>proc~util_get_energy_momentum_system</title>
+<polygon fill="none" stroke="black" points="186,-24 0,-24 0,0 186,0 186,-24"/>
+<text text-anchor="middle" x="93" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_get_energy_momentum_system</text>
+</g>
+<!-- proc~util_get_energy_potential -->
+<g id="proc~~util_get_energy_momentum_system~~CallsGraph_node2" class="node">
+<title>proc~util_get_energy_potential</title>
+<g id="a_proc~~util_get_energy_momentum_system~~CallsGraph_node2"><a xlink:href=".././proc/util_get_energy_potential.html" xlink:title="util_get_energy_potential">
+<polygon fill="#d9534f" stroke="#d9534f" points="355,-24 222,-24 222,0 355,0 355,-24"/>
+<text text-anchor="middle" x="288.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_potential</text>
+</a>
+</g>
+</g>
+<!-- proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential -->
+<g id="proc~~util_get_energy_momentum_system~~CallsGraph_edge1" class="edge">
+<title>proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential</title>
+<path fill="none" stroke="#000000" d="M186.22,-12C194.8,-12 203.43,-12 211.83,-12"/>
+<polygon fill="#000000" stroke="#000000" points="211.96,-15.5 221.96,-12 211.96,-8.5 211.96,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
      
     <div class="panel panel-default">
       <div class="panel-heading">
diff --git a/docs/proc/util_get_energy_potential.html b/docs/proc/util_get_energy_potential.html
new file mode 100644
index 000000000..362779a45
--- /dev/null
+++ b/docs/proc/util_get_energy_potential.html
@@ -0,0 +1,598 @@
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+   
+   <meta name="description" content="Swiftest - The Fastest Symplectic Massive Body Integrator in the West (someday, hopefully)">
+    
+    <meta name="author" content="David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott" >
+    <link rel="icon" href="../favicon.png">
+
+    <title>util_get_energy_potential &ndash; swiftest</title>
+
+    <link href="../css/bootstrap.min.css" rel="stylesheet">
+    <link href="../css/pygments.css" rel="stylesheet">
+    <link href="../css/font-awesome.min.css" rel="stylesheet">
+    <link href="../css/local.css" rel="stylesheet">
+    
+    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
+    
+    
+
+    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
+      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
+    <![endif]-->
+    
+    <script src="../js/jquery-2.1.3.min.js"></script>
+    <script src="../js/svg-pan-zoom.min.js"></script>
+
+  </head>
+
+  <body>
+
+    <!-- Fixed navbar -->
+    <nav class="navbar navbar-inverse navbar-fixed-top">
+      <div class="container">
+        <div class="navbar-header">
+          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
+            <span class="sr-only">Toggle navigation</span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+          </button>
+          <a class="navbar-brand" href="../index.html">swiftest </a>
+        </div>
+        <div id="navbar" class="navbar-collapse collapse">
+          <ul class="nav navbar-nav">
+        
+            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
+              <a href="#" class="dropdown-toggle"
+              data-toggle="dropdown" role="button"
+              aria-haspopup="true"
+     aria-expanded="false">Contents <span class="caret"></span></a>
+        <ul class="dropdown-menu">
+          
+              
+            <li><a href="../lists/files.html">Source Files</a></li>
+        
+        
+        
+            <li><a href="../lists/modules.html">Modules</a></li>
+        
+            
+                                
+            <li><a href="../lists/procedures.html">Procedures</a></li>
+        
+        
+            <li><a href="../lists/absint.html">Abstract Interfaces</a></li>
+               
+            <li><a href="../lists/types.html">Derived Types</a></li>
+        
+        
+            <li><a href="../program/swiftest_driver.html">Program</a></li>
+      
+            </ul>
+            </li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/absint.html">Abstract Interfaces</a></li>
+                             
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../program/swiftest_driver.html">Program</a></li>
+
+          </ul>
+        
+        <form action="../search.html" class="navbar-form navbar-right" role="search">
+        <div class="form-group">
+          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
+        </div>
+<!--
+        <button type="submit" class="btn btn-default">Submit</button>
+-->
+        </form>
+        
+        </div><!--/.nav-collapse -->
+      </div>
+    </nav>
+
+    <div class="container">
+    
+  
+  <div class="row">
+    <h1>util_get_energy_potential
+      <small>Subroutine</small>
+    
+    </h1>
+    
+<div class="row">
+  <div class="col-lg-12">
+<div class="well well-sm">
+  <ul class="list-inline" style="margin-bottom:0px;display:inline">
+     
+     <li><i class="fa fa-pencil"></i> David A. Minton</li>
+     
+     
+     
+     
+    
+    
+     <li><i class="fa fa-list-ol"></i>
+       <a data-toggle="tooltip"
+    data-placement="bottom" data-html="true"
+    title=" 0.1% of total for procedures.">35 statements</a>
+     </li> 
+     
+     
+     
+    <li><i class="fa fa-code"></i><a href="../src/util_get_energy_momentum.f90"> Source File</a></li>
+     
+     
+  </ul>
+  <ol class="breadcrumb in-well text-right">
+  
+    
+     <li><a href='../sourcefile/util_get_energy_momentum.f90.html'>util_get_energy_momentum.f90</a></li>
+    
+     <li><a href='../module/s_util_get_energy_momentum.html'>s_util_get_energy_momentum</a></li>
+    
+  
+     <li class="active">util_get_energy_potential</li>
+  </ol>
+</div>
+</div>
+</div>
+<script>
+  $(function () {
+  $('[data-toggle="tooltip"]').tooltip()
+  })
+</script>
+
+  </div>
+  
+  <div class="row">
+    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
+    
+<div id="sidebar">
+  
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+</div>
+
+    </div>
+    
+    <div class="col-md-9" id='text'>
+    <h2>
+subroutine util_get_energy_potential(npl, nplpl, k_plpl, lmask, GMcb, Gmass, mass, xb, pe)
+    
+    
+   
+</h2>
+    
+  
+
+
+    
+    <p>Compute total system potential energy</p>
+    
+
+    <h3>Arguments</h3>
+    
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-npl~2"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>npl</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-nplpl~2"></span>integer(kind=I8B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>nplpl</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-k_plpl~2"></span>integer(kind=I4B),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>k_plpl</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-lmask~2"></span>logical,</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>lmask</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-gmcb~2"></span>real(kind=DP),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>GMcb</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-gmass~3"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>Gmass</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-mass~4"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:)</td><td>::</td>
+  <td><strong>mass</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-xb~4"></span>real(kind=DP),</td>
+  <td>intent(in),</td>
+  <td></td>
+  
+  <td>dimension(:,:)</td><td>::</td>
+  <td><strong>xb</strong></td><td></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-pe~2"></span>real(kind=DP),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>pe</strong></td><td></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+    
+    
+    
+    <br>
+    
+    
+     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Called by</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~util_get_energy_potential~~CalledByGraph Pages: 1 -->
+<svg id="procutil_get_energy_potentialCalledByGraph" width="585pt" height="32pt"
+ viewBox="0.00 0.00 585.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~util_get_energy_potential~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~util_get_energy_potential~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 581,-28 581,4 -4,4"/>
+<!-- proc~util_get_energy_potential -->
+<g id="proc~~util_get_energy_potential~~CalledByGraph_node1" class="node">
+<title>proc~util_get_energy_potential</title>
+<polygon fill="none" stroke="black" points="577,-24 444,-24 444,0 577,0 577,-24"/>
+<text text-anchor="middle" x="510.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_get_energy_potential</text>
+</g>
+<!-- proc~util_get_energy_momentum_system -->
+<g id="proc~~util_get_energy_potential~~CalledByGraph_node2" class="node">
+<title>proc~util_get_energy_momentum_system</title>
+<g id="a_proc~~util_get_energy_potential~~CalledByGraph_node2"><a xlink:href=".././proc/util_get_energy_momentum_system.html" xlink:title="util_get_energy_momentum_system">
+<polygon fill="#d9534f" stroke="#d9534f" points="408,-24 222,-24 222,0 408,0 408,-24"/>
+<text text-anchor="middle" x="315" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum_system</text>
+</a>
+</g>
+</g>
+<!-- proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential -->
+<g id="proc~~util_get_energy_potential~~CalledByGraph_edge1" class="edge">
+<title>proc~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_potential</title>
+<path fill="none" stroke="#000000" d="M408.22,-12C416.8,-12 425.43,-12 433.83,-12"/>
+<polygon fill="#000000" stroke="#000000" points="433.96,-15.5 443.96,-12 433.96,-8.5 433.96,-15.5"/>
+</g>
+<!-- interface~util_get_energy_momentum_system -->
+<g id="proc~~util_get_energy_potential~~CalledByGraph_node3" class="node">
+<title>interface~util_get_energy_momentum_system</title>
+<g id="a_proc~~util_get_energy_potential~~CalledByGraph_node3"><a xlink:href=".././interface/util_get_energy_momentum_system.html" xlink:title="util_get_energy_momentum_system">
+<polygon fill="#a7506f" stroke="#a7506f" points="186,-24 0,-24 0,0 186,0 186,-24"/>
+<text text-anchor="middle" x="93" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum_system</text>
+</a>
+</g>
+</g>
+<!-- interface~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_momentum_system -->
+<g id="proc~~util_get_energy_potential~~CalledByGraph_edge2" class="edge">
+<title>interface~util_get_energy_momentum_system&#45;&gt;proc~util_get_energy_momentum_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M186.03,-12C194.57,-12 203.27,-12 211.9,-12"/>
+<polygon fill="#000000" stroke="#000000" points="211.99,-15.5 221.99,-12 211.99,-8.5 211.99,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+    <br>
+
+    <section class="visible-xs visible-sm hidden-md">
+      
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+    </section>
+    <br class="visible-xs visible-sm hidden-md">
+
+    
+
+    
+    
+    
+    
+    
+
+    
+    
+    
+    
+    
+
+
+    
+    
+    
+    
+    </div>
+  </div>
+
+
+    <hr>    
+    </div> <!-- /container -->
+    <footer>
+      <div class="container">
+      <div class="row">
+        <div class="col-xs-6 col-md-4"><p>&copy; 2021 <a rel="license" href="http://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons License" style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a>
+                                          </p></div>
+        <div class="col-xs-6 col-md-4 col-md-push-4">
+          <p class="text-right">
+            Documentation generated by 
+            <a href="https://github.com/cmacmackin/ford">FORD</a>
+            
+          </p>
+        </div>
+        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> swiftest was developed by David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</p></div>
+      </div>
+      <br>
+      </div> <!-- /container -->    
+    </footer>
+
+    <!-- Bootstrap core JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+<!--
+    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
+-->
+    <script src="../js/bootstrap.min.js"></script>
+    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
+    <script src="../js/ie10-viewport-bug-workaround.js"></script>
+
+    <!-- MathJax JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+    <script type="text/x-mathjax-config">
+      MathJax.Hub.Config({
+        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
+        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
+        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js']
+      });
+    </script>
+    
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.1/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
+    
+    
+    <script src="../tipuesearch/tipuesearch_content.js"></script>
+    <script src="../tipuesearch/tipuesearch_set.js"></script>
+    <script src="../tipuesearch/tipuesearch.js"></script>
+    
+    
+  </body>
+</html>
\ No newline at end of file
diff --git a/docs/proc/util_index_eucl_ij_to_k.html b/docs/proc/util_index_eucl_ij_to_k.html
new file mode 100644
index 000000000..64f5030af
--- /dev/null
+++ b/docs/proc/util_index_eucl_ij_to_k.html
@@ -0,0 +1,544 @@
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+   
+   <meta name="description" content="Swiftest - The Fastest Symplectic Massive Body Integrator in the West (someday, hopefully)">
+    
+    <meta name="author" content="David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott" >
+    <link rel="icon" href="../favicon.png">
+
+    <title>util_index_eucl_ij_to_k &ndash; swiftest</title>
+
+    <link href="../css/bootstrap.min.css" rel="stylesheet">
+    <link href="../css/pygments.css" rel="stylesheet">
+    <link href="../css/font-awesome.min.css" rel="stylesheet">
+    <link href="../css/local.css" rel="stylesheet">
+    
+    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
+    
+    
+
+    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
+      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
+    <![endif]-->
+    
+    <script src="../js/jquery-2.1.3.min.js"></script>
+    <script src="../js/svg-pan-zoom.min.js"></script>
+
+  </head>
+
+  <body>
+
+    <!-- Fixed navbar -->
+    <nav class="navbar navbar-inverse navbar-fixed-top">
+      <div class="container">
+        <div class="navbar-header">
+          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
+            <span class="sr-only">Toggle navigation</span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+          </button>
+          <a class="navbar-brand" href="../index.html">swiftest </a>
+        </div>
+        <div id="navbar" class="navbar-collapse collapse">
+          <ul class="nav navbar-nav">
+        
+            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
+              <a href="#" class="dropdown-toggle"
+              data-toggle="dropdown" role="button"
+              aria-haspopup="true"
+     aria-expanded="false">Contents <span class="caret"></span></a>
+        <ul class="dropdown-menu">
+          
+              
+            <li><a href="../lists/files.html">Source Files</a></li>
+        
+        
+        
+            <li><a href="../lists/modules.html">Modules</a></li>
+        
+            
+                                
+            <li><a href="../lists/procedures.html">Procedures</a></li>
+        
+        
+            <li><a href="../lists/absint.html">Abstract Interfaces</a></li>
+               
+            <li><a href="../lists/types.html">Derived Types</a></li>
+        
+        
+            <li><a href="../program/swiftest_driver.html">Program</a></li>
+      
+            </ul>
+            </li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/absint.html">Abstract Interfaces</a></li>
+                             
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../program/swiftest_driver.html">Program</a></li>
+
+          </ul>
+        
+        <form action="../search.html" class="navbar-form navbar-right" role="search">
+        <div class="form-group">
+          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
+        </div>
+<!--
+        <button type="submit" class="btn btn-default">Submit</button>
+-->
+        </form>
+        
+        </div><!--/.nav-collapse -->
+      </div>
+    </nav>
+
+    <div class="container">
+    
+  
+  <div class="row">
+    <h1>util_index_eucl_ij_to_k
+      <small>Module Subroutine</small>
+    
+    </h1>
+    
+<div class="row">
+  <div class="col-lg-12">
+<div class="well well-sm">
+  <ul class="list-inline" style="margin-bottom:0px;display:inline">
+     
+     <li><i class="fa fa-pencil"></i> Jacob R. Elliott and David A. Minton</li>
+     
+     
+     
+     
+    
+    
+     <li><i class="fa fa-list-ol"></i>
+       <a data-toggle="tooltip"
+    data-placement="bottom" data-html="true"
+    title=" 0.0% of total for procedures.">13 statements</a>
+     </li> 
+     
+     
+     
+    <li><i class="fa fa-code"></i><a href="../src/util_index.f90"> Source File</a></li>
+     
+     
+  </ul>
+  <ol class="breadcrumb in-well text-right">
+  
+    
+     <li><a href='../sourcefile/util_index.f90.html'>util_index.f90</a></li>
+    
+     <li><a href='../module/s_util_index.html'>s_util_index</a></li>
+    
+  
+     <li class="active">util_index_eucl_ij_to_k</li>
+  </ol>
+</div>
+</div>
+</div>
+<script>
+  $(function () {
+  $('[data-toggle="tooltip"]').tooltip()
+  })
+</script>
+
+  </div>
+  
+  <div class="row">
+    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
+    
+<div id="sidebar">
+  
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+</div>
+
+    </div>
+    
+    <div class="col-md-9" id='text'>
+    <h2>
+pure module subroutine util_index_eucl_ij_to_k(n, i, j, k)
+    
+    
+   <a href='../interface/util_index_eucl_ij_to_k.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
+    
+   
+</h2>
+    
+  
+
+
+    
+    <p>Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions.</p>
+<p>Reference:</p>
+<div class="codehilite"><pre><span></span><code><span class="err">Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
+<span class="err">   2019. hal-0204751</span>
+</code></pre></div>
+    
+
+    <h3>Arguments</h3>
+    
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-n~22"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-i~3"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-j~3"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-k~3"></span>integer(kind=I8B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+    
+    
+    
+    <br>
+    
+    
+     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Called by</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~util_index_eucl_ij_to_k~~CalledByGraph Pages: 1 -->
+<svg id="procutil_index_eucl_ij_to_kCalledByGraph" width="568pt" height="32pt"
+ viewBox="0.00 0.00 568.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~util_index_eucl_ij_to_k~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 564,-28 564,4 -4,4"/>
+<!-- proc~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph_node1" class="node">
+<title>proc~util_index_eucl_ij_to_k</title>
+<polygon fill="none" stroke="black" points="560,-24 440,-24 440,0 560,0 560,-24"/>
+<text text-anchor="middle" x="500" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_index_eucl_ij_to_k</text>
+</g>
+<!-- interface~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph_node2" class="node">
+<title>interface~util_index_eucl_ij_to_k</title>
+<g id="a_proc~~util_index_eucl_ij_to_k~~CalledByGraph_node2"><a xlink:href=".././interface/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#a7506f" stroke="#a7506f" points="404,-24 284,-24 284,0 404,0 404,-24"/>
+<text text-anchor="middle" x="344" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph_edge1" class="edge">
+<title>interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.1,-12C412.42,-12 421.04,-12 429.53,-12"/>
+<polygon fill="#000000" stroke="#000000" points="429.8,-15.5 439.8,-12 429.8,-8.5 429.8,-15.5"/>
+</g>
+<!-- proc~util_index_eucl_plpl -->
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph_node3" class="node">
+<title>proc~util_index_eucl_plpl</title>
+<g id="a_proc~~util_index_eucl_ij_to_k~~CalledByGraph_node3"><a xlink:href=".././proc/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
+<polygon fill="#d9534f" stroke="#d9534f" points="248,-24 142,-24 142,0 248,0 248,-24"/>
+<text text-anchor="middle" x="195" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
+</a>
+</g>
+</g>
+<!-- proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph_edge2" class="edge">
+<title>proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M248.24,-12C256.54,-12 265.24,-12 273.86,-12"/>
+<polygon fill="#000000" stroke="#000000" points="273.92,-15.5 283.92,-12 273.92,-8.5 273.92,-15.5"/>
+</g>
+<!-- interface~util_index_eucl_plpl -->
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph_node4" class="node">
+<title>interface~util_index_eucl_plpl</title>
+<g id="a_proc~~util_index_eucl_ij_to_k~~CalledByGraph_node4"><a xlink:href=".././interface/util_index_eucl_plpl.html" xlink:title="util_index_eucl_plpl">
+<polygon fill="#a7506f" stroke="#a7506f" points="106,-24 0,-24 0,0 106,0 106,-24"/>
+<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_plpl</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl -->
+<g id="proc~~util_index_eucl_ij_to_k~~CalledByGraph_edge3" class="edge">
+<title>interface~util_index_eucl_plpl&#45;&gt;proc~util_index_eucl_plpl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M106.13,-12C114.42,-12 123.07,-12 131.57,-12"/>
+<polygon fill="#000000" stroke="#000000" points="131.83,-15.5 141.83,-12 131.83,-8.5 131.83,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+    <br>
+
+    <section class="visible-xs visible-sm hidden-md">
+      
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+    </section>
+    <br class="visible-xs visible-sm hidden-md">
+
+    
+
+    
+    
+    
+    
+    
+
+    
+    
+    
+    
+    
+
+
+    
+    
+    
+    
+    </div>
+  </div>
+
+
+    <hr>    
+    </div> <!-- /container -->
+    <footer>
+      <div class="container">
+      <div class="row">
+        <div class="col-xs-6 col-md-4"><p>&copy; 2021 <a rel="license" href="http://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons License" style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a>
+                                          </p></div>
+        <div class="col-xs-6 col-md-4 col-md-push-4">
+          <p class="text-right">
+            Documentation generated by 
+            <a href="https://github.com/cmacmackin/ford">FORD</a>
+            
+          </p>
+        </div>
+        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> swiftest was developed by David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</p></div>
+      </div>
+      <br>
+      </div> <!-- /container -->    
+    </footer>
+
+    <!-- Bootstrap core JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+<!--
+    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
+-->
+    <script src="../js/bootstrap.min.js"></script>
+    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
+    <script src="../js/ie10-viewport-bug-workaround.js"></script>
+
+    <!-- MathJax JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+    <script type="text/x-mathjax-config">
+      MathJax.Hub.Config({
+        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
+        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
+        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js']
+      });
+    </script>
+    
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.1/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
+    
+    
+    <script src="../tipuesearch/tipuesearch_content.js"></script>
+    <script src="../tipuesearch/tipuesearch_set.js"></script>
+    <script src="../tipuesearch/tipuesearch.js"></script>
+    
+    
+  </body>
+</html>
\ No newline at end of file
diff --git a/docs/proc/util_index_eucl_k_to_ij.html b/docs/proc/util_index_eucl_k_to_ij.html
new file mode 100644
index 000000000..37b7f17f7
--- /dev/null
+++ b/docs/proc/util_index_eucl_k_to_ij.html
@@ -0,0 +1,514 @@
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+   
+   <meta name="description" content="Swiftest - The Fastest Symplectic Massive Body Integrator in the West (someday, hopefully)">
+    
+    <meta name="author" content="David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott" >
+    <link rel="icon" href="../favicon.png">
+
+    <title>util_index_eucl_k_to_ij &ndash; swiftest</title>
+
+    <link href="../css/bootstrap.min.css" rel="stylesheet">
+    <link href="../css/pygments.css" rel="stylesheet">
+    <link href="../css/font-awesome.min.css" rel="stylesheet">
+    <link href="../css/local.css" rel="stylesheet">
+    
+    <link  href="../tipuesearch/tipuesearch.css" rel="stylesheet">
+    
+    
+
+    <!-- HTML5 shim and Respond.js for IE8 support of HTML5 elements and media queries -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
+      <script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
+    <![endif]-->
+    
+    <script src="../js/jquery-2.1.3.min.js"></script>
+    <script src="../js/svg-pan-zoom.min.js"></script>
+
+  </head>
+
+  <body>
+
+    <!-- Fixed navbar -->
+    <nav class="navbar navbar-inverse navbar-fixed-top">
+      <div class="container">
+        <div class="navbar-header">
+          <button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar" aria-expanded="false" aria-controls="navbar">
+            <span class="sr-only">Toggle navigation</span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+            <span class="icon-bar"></span>
+          </button>
+          <a class="navbar-brand" href="../index.html">swiftest </a>
+        </div>
+        <div id="navbar" class="navbar-collapse collapse">
+          <ul class="nav navbar-nav">
+        
+            <li class="dropdown hidden-xs visible-sm visible-md hidden-lg">
+              <a href="#" class="dropdown-toggle"
+              data-toggle="dropdown" role="button"
+              aria-haspopup="true"
+     aria-expanded="false">Contents <span class="caret"></span></a>
+        <ul class="dropdown-menu">
+          
+              
+            <li><a href="../lists/files.html">Source Files</a></li>
+        
+        
+        
+            <li><a href="../lists/modules.html">Modules</a></li>
+        
+            
+                                
+            <li><a href="../lists/procedures.html">Procedures</a></li>
+        
+        
+            <li><a href="../lists/absint.html">Abstract Interfaces</a></li>
+               
+            <li><a href="../lists/types.html">Derived Types</a></li>
+        
+        
+            <li><a href="../program/swiftest_driver.html">Program</a></li>
+      
+            </ul>
+            </li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/files.html">Source Files</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/modules.html">Modules</a></li>
+
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/procedures.html">Procedures</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/absint.html">Abstract Interfaces</a></li>
+                             
+<li class="visible-xs hidden-sm visible-lg"><a href="../lists/types.html">Derived Types</a></li>
+
+
+<li class="visible-xs hidden-sm visible-lg"><a href="../program/swiftest_driver.html">Program</a></li>
+
+          </ul>
+        
+        <form action="../search.html" class="navbar-form navbar-right" role="search">
+        <div class="form-group">
+          <input type="text" class="form-control" placeholder="Search" name="q" id="tipue_search_input" autocomplete="off" required>
+        </div>
+<!--
+        <button type="submit" class="btn btn-default">Submit</button>
+-->
+        </form>
+        
+        </div><!--/.nav-collapse -->
+      </div>
+    </nav>
+
+    <div class="container">
+    
+  
+  <div class="row">
+    <h1>util_index_eucl_k_to_ij
+      <small>Module Subroutine</small>
+    
+    </h1>
+    
+<div class="row">
+  <div class="col-lg-12">
+<div class="well well-sm">
+  <ul class="list-inline" style="margin-bottom:0px;display:inline">
+     
+     <li><i class="fa fa-pencil"></i> Jacob R. Elliott and David A. Minton</li>
+     
+     
+     
+     
+    
+    
+     <li><i class="fa fa-list-ol"></i>
+       <a data-toggle="tooltip"
+    data-placement="bottom" data-html="true"
+    title=" 0.0% of total for procedures.">16 statements</a>
+     </li> 
+     
+     
+     
+    <li><i class="fa fa-code"></i><a href="../src/util_index.f90"> Source File</a></li>
+     
+     
+  </ul>
+  <ol class="breadcrumb in-well text-right">
+  
+    
+     <li><a href='../sourcefile/util_index.f90.html'>util_index.f90</a></li>
+    
+     <li><a href='../module/s_util_index.html'>s_util_index</a></li>
+    
+  
+     <li class="active">util_index_eucl_k_to_ij</li>
+  </ol>
+</div>
+</div>
+</div>
+<script>
+  $(function () {
+  $('[data-toggle="tooltip"]').tooltip()
+  })
+</script>
+
+  </div>
+  
+  <div class="row">
+    <div class="col-md-3 hidden-xs hidden-sm visible-md visible-lg">
+    
+<div id="sidebar">
+  
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+</div>
+
+    </div>
+    
+    <div class="col-md-9" id='text'>
+    <h2>
+pure module subroutine util_index_eucl_k_to_ij(n, k, i, j)
+    
+    
+   <a href='../interface/util_index_eucl_k_to_ij.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
+    
+   
+</h2>
+    
+  
+
+
+    
+    <p>Turns k index into i,j indices for use in the Euclidean distance matrix for pl-pl interactions.</p>
+<p>Reference:</p>
+<div class="codehilite"><pre><span></span><code><span class="err">Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
+<span class="err">   2019. hal-0204751</span>
+</code></pre></div>
+    
+
+    <h3>Arguments</h3>
+    
+      
+<table class="table table-striped varlist">
+<thead><tr><th>Type</th>
+<th>Intent</th><th>Optional</th>
+<th>Attributes</th><th></th><th>Name</th><th></th></thead>
+
+
+
+<tbody>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-n~23"></span>integer(kind=I4B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>n</strong></td><td><p>Number of bodies</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-k~4"></span>integer(kind=I8B),</td>
+  <td>intent(in)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>k</strong></td><td><p>Index of the flattened matrix</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-i~4"></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>i</strong></td><td><p>Index of the ith body</p></td>
+  
+</tr>
+
+  
+  
+  
+  
+<tr>
+  
+  <td><span class="anchor" id="variable-j~4"></span>integer(kind=I4B),</td>
+  <td>intent(out)</td>
+  <td></td>
+  
+  <td></td><td>::</td>
+  <td><strong>j</strong></td><td><p>Index of the jth body</p></td>
+  
+</tr>
+
+</tbody>
+</table>
+
+    
+    
+    
+    <br>
+    
+    
+     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Called by</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~util_index_eucl_k_to_ij~~CalledByGraph Pages: 1 -->
+<svg id="procutil_index_eucl_k_to_ijCalledByGraph" width="284pt" height="32pt"
+ viewBox="0.00 0.00 284.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~util_index_eucl_k_to_ij~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~util_index_eucl_k_to_ij~~CalledByGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 280,-28 280,4 -4,4"/>
+<!-- proc~util_index_eucl_k_to_ij -->
+<g id="proc~~util_index_eucl_k_to_ij~~CalledByGraph_node1" class="node">
+<title>proc~util_index_eucl_k_to_ij</title>
+<polygon fill="none" stroke="black" points="276,-24 156,-24 156,0 276,0 276,-24"/>
+<text text-anchor="middle" x="216" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_index_eucl_k_to_ij</text>
+</g>
+<!-- interface~util_index_eucl_k_to_ij -->
+<g id="proc~~util_index_eucl_k_to_ij~~CalledByGraph_node2" class="node">
+<title>interface~util_index_eucl_k_to_ij</title>
+<g id="a_proc~~util_index_eucl_k_to_ij~~CalledByGraph_node2"><a xlink:href=".././interface/util_index_eucl_k_to_ij.html" xlink:title="util_index_eucl_k_to_ij">
+<polygon fill="#a7506f" stroke="#a7506f" points="120,-24 0,-24 0,0 120,0 120,-24"/>
+<text text-anchor="middle" x="60" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_k_to_ij</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_k_to_ij&#45;&gt;proc~util_index_eucl_k_to_ij -->
+<g id="proc~~util_index_eucl_k_to_ij~~CalledByGraph_edge1" class="edge">
+<title>interface~util_index_eucl_k_to_ij&#45;&gt;proc~util_index_eucl_k_to_ij</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M120.1,-12C128.42,-12 137.04,-12 145.53,-12"/>
+<polygon fill="#000000" stroke="#000000" points="145.8,-15.5 155.8,-12 145.8,-8.5 145.8,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
+    <br>
+
+    <section class="visible-xs visible-sm hidden-md">
+      
+<h3>Contents</h3>
+ 
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+<em>None</em>
+
+
+    </section>
+    <br class="visible-xs visible-sm hidden-md">
+
+    
+
+    
+    
+    
+    
+    
+
+    
+    
+    
+    
+    
+
+
+    
+    
+    
+    
+    </div>
+  </div>
+
+
+    <hr>    
+    </div> <!-- /container -->
+    <footer>
+      <div class="container">
+      <div class="row">
+        <div class="col-xs-6 col-md-4"><p>&copy; 2021 <a rel="license" href="http://creativecommons.org/licenses/by/4.0/"><img alt="Creative Commons License" style="border-width:0" src="https://i.creativecommons.org/l/by/4.0/80x15.png" /></a>
+                                          </p></div>
+        <div class="col-xs-6 col-md-4 col-md-push-4">
+          <p class="text-right">
+            Documentation generated by 
+            <a href="https://github.com/cmacmackin/ford">FORD</a>
+            
+          </p>
+        </div>
+        <div class="col-xs-12 col-md-4 col-md-pull-4"><p class="text-center"> swiftest was developed by David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</p></div>
+      </div>
+      <br>
+      </div> <!-- /container -->    
+    </footer>
+
+    <!-- Bootstrap core JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+<!--
+    <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"></script>
+-->
+    <script src="../js/bootstrap.min.js"></script>
+    <!-- IE10 viewport hack for Surface/desktop Windows 8 bug -->
+    <script src="../js/ie10-viewport-bug-workaround.js"></script>
+
+    <!-- MathJax JavaScript
+    ================================================== -->
+    <!-- Placed at the end of the document so the pages load faster -->
+    <script type="text/x-mathjax-config">
+      MathJax.Hub.Config({
+        TeX: { extensions: ['AMSmath.js','AMSsymbols.js','noErrors.js','noUndefined.js'], equationNumbers: { autoNumber: 'AMS' } },
+        jax: ['input/TeX','input/MathML','output/HTML-CSS'],
+        extensions: ['tex2jax.js','mml2jax.js','MathMenu.js','MathZoom.js']
+      });
+    </script>
+    
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.1/MathJax.js?config=TeX-AMS-MML_HTMLorMML"></script>
+    
+    
+    <script src="../tipuesearch/tipuesearch_content.js"></script>
+    <script src="../tipuesearch/tipuesearch_set.js"></script>
+    <script src="../tipuesearch/tipuesearch.js"></script>
+    
+    
+  </body>
+</html>
\ No newline at end of file
diff --git a/docs/proc/util_index_eucl_plpl.html b/docs/proc/util_index_eucl_plpl.html
index 10f7f377f..63402dae1 100644
--- a/docs/proc/util_index_eucl_plpl.html
+++ b/docs/proc/util_index_eucl_plpl.html
@@ -136,7 +136,7 @@ <h1>util_index_eucl_plpl
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.0% of total for procedures.">21 statements</a>
+    title=" 0.0% of total for procedures.">19 statements</a>
      </li> 
      
      
@@ -215,7 +215,7 @@ <h2>
 
 
     
-    <p>Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions.</p>
+    <p>Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions for a Swiftest massive body object</p>
 <p>Reference:</p>
 <div class="codehilite"><pre><span></span><code><span class="err">Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
 <span class="err">   2019. hal-0204751</span>
@@ -273,6 +273,122 @@ <h3>Arguments</h3>
     <br>
     
     
+    <div class="panel panel-default">
+      <div class="panel-heading">
+  <h3 class="panel-title">Calls</h3>
+      </div>
+      <div class="panel-body">
+  <div class="depgraph"><?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: proc~~util_index_eucl_plpl~~CallsGraph Pages: 1 -->
+<svg id="procutil_index_eucl_plplCallsGraph" width="426pt" height="32pt"
+ viewBox="0.00 0.00 426.00 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~util_index_eucl_plpl~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>proc~~util_index_eucl_plpl~~CallsGraph</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 422,-28 422,4 -4,4"/>
+<!-- proc~util_index_eucl_plpl -->
+<g id="proc~~util_index_eucl_plpl~~CallsGraph_node1" class="node">
+<title>proc~util_index_eucl_plpl</title>
+<polygon fill="none" stroke="black" points="106,-24 0,-24 0,0 106,0 106,-24"/>
+<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_index_eucl_plpl</text>
+</g>
+<!-- interface~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_plpl~~CallsGraph_node2" class="node">
+<title>interface~util_index_eucl_ij_to_k</title>
+<g id="a_proc~~util_index_eucl_plpl~~CallsGraph_node2"><a xlink:href=".././interface/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#a7506f" stroke="#a7506f" points="262,-24 142,-24 142,0 262,0 262,-24"/>
+<text text-anchor="middle" x="202" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</a>
+</g>
+</g>
+<!-- proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_plpl~~CallsGraph_edge1" class="edge">
+<title>proc~util_index_eucl_plpl&#45;&gt;interface~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" d="M106.24,-12C114.54,-12 123.24,-12 131.86,-12"/>
+<polygon fill="#000000" stroke="#000000" points="131.92,-15.5 141.92,-12 131.92,-8.5 131.92,-15.5"/>
+</g>
+<!-- proc~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_plpl~~CallsGraph_node3" class="node">
+<title>proc~util_index_eucl_ij_to_k</title>
+<g id="a_proc~~util_index_eucl_plpl~~CallsGraph_node3"><a xlink:href=".././proc/util_index_eucl_ij_to_k.html" xlink:title="util_index_eucl_ij_to_k">
+<polygon fill="#d9534f" stroke="#d9534f" points="418,-24 298,-24 298,0 418,0 418,-24"/>
+<text text-anchor="middle" x="358" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index_eucl_ij_to_k</text>
+</a>
+</g>
+</g>
+<!-- interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k -->
+<g id="proc~~util_index_eucl_plpl~~CallsGraph_edge2" class="edge">
+<title>interface~util_index_eucl_ij_to_k&#45;&gt;proc~util_index_eucl_ij_to_k</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.1,-12C270.42,-12 279.04,-12 287.53,-12"/>
+<polygon fill="#000000" stroke="#000000" points="287.8,-15.5 297.8,-12 287.8,-8.5 287.8,-15.5"/>
+</g>
+</g>
+</svg>
+</div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
+    <p>Nodes of different colours represent the following: </p>
+    <?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
+ "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
+<!-- Generated by graphviz version 2.47.1 (20210417.1919)
+ -->
+<!-- Title: Graph Key Pages: 1 -->
+<svg width="560pt" height="32pt"
+ viewBox="0.00 0.00 559.50 32.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 28)">
+<title>Graph Key</title>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-28 555.5,-28 555.5,4 -4,4"/>
+<!-- Subroutine -->
+<g id="node1" class="node">
+<title>Subroutine</title>
+<polygon fill="#d9534f" stroke="#d9534f" points="64,-24 0,-24 0,0 64,0 64,-24"/>
+<text text-anchor="middle" x="32" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Subroutine</text>
+</g>
+<!-- Function -->
+<g id="node2" class="node">
+<title>Function</title>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="136,-24 82,-24 82,0 136,0 136,-24"/>
+<text text-anchor="middle" x="109" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Function</text>
+</g>
+<!-- Interface -->
+<g id="node3" class="node">
+<title>Interface</title>
+<polygon fill="#a7506f" stroke="#a7506f" points="209.5,-24 154.5,-24 154.5,0 209.5,0 209.5,-24"/>
+<text text-anchor="middle" x="182" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Interface</text>
+</g>
+<!-- Unknown Procedure Type -->
+<g id="node4" class="node">
+<title>Unknown Procedure Type</title>
+<polygon fill="#777777" stroke="#777777" points="364,-24 228,-24 228,0 364,0 364,-24"/>
+<text text-anchor="middle" x="296" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Unknown Procedure Type</text>
+</g>
+<!-- Program -->
+<g id="node5" class="node">
+<title>Program</title>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="436,-24 382,-24 382,0 436,0 436,-24"/>
+<text text-anchor="middle" x="409" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">Program</text>
+</g>
+<!-- This Page&#39;s Entity -->
+<g id="node6" class="node">
+<title>This Page&#39;s Entity</title>
+<polygon fill="none" stroke="black" points="551.5,-24 454.5,-24 454.5,0 551.5,0 551.5,-24"/>
+<text text-anchor="middle" x="503" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">This Page&#39;s Entity</text>
+</g>
+</g>
+</svg>
+
+    
+    <p>Solid arrows point from a procedure to one which it calls. Dashed 
+    arrows point from an interface to procedures which implement that interface.
+    This could include the module procedures in a generic interface or the
+    implementation in a submodule of an interface in a parent module.
+    </p>
+    </div></div></div></div>
+      </div>
+    </div>
+     
      
     <div class="panel panel-default">
       <div class="panel-heading">
diff --git a/docs/proc/util_minimize_bfgs.html b/docs/proc/util_minimize_bfgs.html
index bd43879ad..094ae6a03 100644
--- a/docs/proc/util_minimize_bfgs.html
+++ b/docs/proc/util_minimize_bfgs.html
@@ -136,7 +136,7 @@ <h1>util_minimize_bfgs
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.6% of total for procedures.">411 statements</a>
+    title=" 0.6% of total for procedures.">405 statements</a>
      </li> 
      
      
diff --git a/docs/proc/util_rescale_system.html b/docs/proc/util_rescale_system.html
index 63f377419..a95af7d6b 100644
--- a/docs/proc/util_rescale_system.html
+++ b/docs/proc/util_rescale_system.html
@@ -136,7 +136,7 @@ <h1>util_rescale_system
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">33 statements</a>
+    title=" 0.0% of total for procedures.">33 statements</a>
      </li> 
      
      
diff --git a/docs/proc/util_resize_body.html b/docs/proc/util_resize_body.html
index d222e4175..068aeba2e 100644
--- a/docs/proc/util_resize_body.html
+++ b/docs/proc/util_resize_body.html
@@ -408,65 +408,65 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.07,-33C322.28,-33 330.96,-33 339.44,-33"/>
 <polygon fill="#000000" stroke="#000000" points="339.66,-36.5 349.66,-33 339.66,-29.5 339.66,-36.5"/>
 </g>
-<!-- proc~util_resize_pl -->
+<!-- proc~util_resize_tp -->
 <g id="proc~~util_resize_body~~CalledByGraph_node3" class="node">
-<title>proc~util_resize_pl</title>
-<g id="a_proc~~util_resize_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="187.5,-66 112.5,-66 112.5,-42 187.5,-42 187.5,-66"/>
-<text text-anchor="middle" x="150" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<title>proc~util_resize_tp</title>
+<g id="a_proc~~util_resize_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-66 112,-66 112,-42 188,-42 188,-66"/>
+<text text-anchor="middle" x="150" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
 <g id="proc~~util_resize_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M187.7,-47.41C195.98,-45.93 204.93,-44.32 213.76,-42.74"/>
-<polygon fill="#000000" stroke="#000000" points="214.4,-46.18 223.63,-40.96 213.17,-39.29 214.4,-46.18"/>
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M188.02,-47.36C196.2,-45.89 205.03,-44.3 213.74,-42.74"/>
+<polygon fill="#000000" stroke="#000000" points="214.63,-46.14 223.85,-40.92 213.39,-39.25 214.63,-46.14"/>
 </g>
-<!-- proc~util_resize_tp -->
+<!-- proc~util_resize_pl -->
 <g id="proc~~util_resize_body~~CalledByGraph_node4" class="node">
-<title>proc~util_resize_tp</title>
-<g id="a_proc~~util_resize_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-24 112,-24 112,0 188,0 188,-24"/>
-<text text-anchor="middle" x="150" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<title>proc~util_resize_pl</title>
+<g id="a_proc~~util_resize_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_resize_pl.html" xlink:title="util_resize_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="187.5,-24 112.5,-24 112.5,0 187.5,0 187.5,-24"/>
+<text text-anchor="middle" x="150" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
 <g id="proc~~util_resize_body~~CalledByGraph_edge3" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M188.02,-18.64C196.2,-20.11 205.03,-21.7 213.74,-23.26"/>
-<polygon fill="#000000" stroke="#000000" points="213.39,-26.75 223.85,-25.08 214.63,-19.86 213.39,-26.75"/>
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M187.7,-18.59C195.98,-20.07 204.93,-21.68 213.76,-23.26"/>
+<polygon fill="#000000" stroke="#000000" points="213.17,-26.71 223.63,-25.04 214.4,-19.82 213.17,-26.71"/>
 </g>
 <!-- interface~util_resize_pl -->
 <g id="proc~~util_resize_body~~CalledByGraph_node5" class="node">
 <title>interface~util_resize_pl</title>
 <g id="a_proc~~util_resize_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_resize_pl.html" xlink:title="util_resize_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="75.5,-66 0.5,-66 0.5,-42 75.5,-42 75.5,-66"/>
-<text text-anchor="middle" x="38" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="75.5,-24 0.5,-24 0.5,0 75.5,0 75.5,-24"/>
+<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_pl&#45;&gt;proc~util_resize_pl -->
-<g id="proc~~util_resize_body~~CalledByGraph_edge4" class="edge">
+<g id="proc~~util_resize_body~~CalledByGraph_edge5" class="edge">
 <title>interface~util_resize_pl&#45;&gt;proc~util_resize_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.63,-54C84.07,-54 93.17,-54 101.99,-54"/>
-<polygon fill="#000000" stroke="#000000" points="102.16,-57.5 112.16,-54 102.16,-50.5 102.16,-57.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M75.63,-12C84.07,-12 93.17,-12 101.99,-12"/>
+<polygon fill="#000000" stroke="#000000" points="102.16,-15.5 112.16,-12 102.16,-8.5 102.16,-15.5"/>
 </g>
 <!-- interface~util_resize_tp -->
 <g id="proc~~util_resize_body~~CalledByGraph_node6" class="node">
 <title>interface~util_resize_tp</title>
 <g id="a_proc~~util_resize_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_resize_tp.html" xlink:title="util_resize_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="76,-24 0,-24 0,0 76,0 76,-24"/>
-<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="76,-66 0,-66 0,-42 76,-42 76,-66"/>
+<text text-anchor="middle" x="38" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_tp</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_tp&#45;&gt;proc~util_resize_tp -->
-<g id="proc~~util_resize_body~~CalledByGraph_edge5" class="edge">
+<g id="proc~~util_resize_body~~CalledByGraph_edge4" class="edge">
 <title>interface~util_resize_tp&#45;&gt;proc~util_resize_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-12C84.39,-12 93.13,-12 101.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="101.8,-15.5 111.8,-12 101.8,-8.5 101.8,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M76.24,-54C84.39,-54 93.13,-54 101.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="101.8,-57.5 111.8,-54 101.8,-50.5 101.8,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_resize_pl.html b/docs/proc/util_resize_pl.html
index 66d9abfeb..565123312 100644
--- a/docs/proc/util_resize_pl.html
+++ b/docs/proc/util_resize_pl.html
@@ -288,59 +288,59 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~util_resize_pl -->
 <g id="proc~~util_resize_pl~~CallsGraph_node1" class="node">
 <title>proc~util_resize_pl</title>
-<polygon fill="none" stroke="black" points="75,-24 0,-24 0,0 75,0 75,-24"/>
-<text text-anchor="middle" x="37.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_pl</text>
+<polygon fill="none" stroke="black" points="75,-44 0,-44 0,-20 75,-20 75,-44"/>
+<text text-anchor="middle" x="37.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_pl</text>
 </g>
-<!-- interface~util_resize_body -->
+<!-- interface~util_resize~2 -->
 <g id="proc~~util_resize_pl~~CallsGraph_node2" class="node">
-<title>interface~util_resize_body</title>
-<g id="a_proc~~util_resize_pl~~CallsGraph_node2"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="201,-44 111,-44 111,-20 201,-20 201,-44"/>
-<text text-anchor="middle" x="156" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<title>interface~util_resize~2</title>
+<g id="a_proc~~util_resize_pl~~CallsGraph_node2"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="424,-44 363,-44 363,-20 424,-20 424,-44"/>
+<text text-anchor="middle" x="393.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
 <g id="proc~~util_resize_pl~~CallsGraph_edge1" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M75.04,-18.27C83.2,-19.67 92.01,-21.19 100.71,-22.68"/>
-<polygon fill="#000000" stroke="#000000" points="100.37,-26.17 110.82,-24.42 101.55,-19.27 100.37,-26.17"/>
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M75.01,-32.6C86.52,-32.77 99.29,-32.92 111,-33 207,-33.66 231,-33.73 327,-33 335.33,-32.94 344.25,-32.83 352.75,-32.7"/>
+<polygon fill="#000000" stroke="#000000" points="352.88,-36.2 362.83,-32.55 352.78,-29.2 352.88,-36.2"/>
 </g>
-<!-- interface~util_resize~2 -->
+<!-- interface~util_resize_body -->
 <g id="proc~~util_resize_pl~~CallsGraph_node3" class="node">
-<title>interface~util_resize~2</title>
-<g id="a_proc~~util_resize_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="424,-24 363,-24 363,0 424,0 424,-24"/>
-<text text-anchor="middle" x="393.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>interface~util_resize_body</title>
+<g id="a_proc~~util_resize_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="201,-24 111,-24 111,0 201,0 201,-24"/>
+<text text-anchor="middle" x="156" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_pl&#45;&gt;interface~util_resize~2 -->
+<!-- proc~util_resize_pl&#45;&gt;interface~util_resize_body -->
 <g id="proc~~util_resize_pl~~CallsGraph_edge2" class="edge">
-<title>proc~util_resize_pl&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M75.01,-11.4C86.52,-11.23 99.29,-11.08 111,-11 207,-10.34 231,-10.27 327,-11 335.33,-11.06 344.25,-11.17 352.75,-11.3"/>
-<polygon fill="#000000" stroke="#000000" points="352.78,-14.8 362.83,-11.45 352.88,-7.8 352.78,-14.8"/>
+<title>proc~util_resize_pl&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M75.04,-25.73C83.2,-24.33 92.01,-22.81 100.71,-21.32"/>
+<polygon fill="#000000" stroke="#000000" points="101.55,-24.73 110.82,-19.58 100.37,-17.83 101.55,-24.73"/>
 </g>
 <!-- proc~util_resize_body -->
 <g id="proc~~util_resize_pl~~CallsGraph_node4" class="node">
 <title>proc~util_resize_body</title>
 <g id="a_proc~~util_resize_pl~~CallsGraph_node4"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="327,-44 237,-44 237,-20 327,-20 327,-44"/>
-<text text-anchor="middle" x="282" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="327,-24 237,-24 237,0 327,0 327,-24"/>
+<text text-anchor="middle" x="282" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
 <g id="proc~~util_resize_pl~~CallsGraph_edge3" class="edge">
 <title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M201.07,-32C209.28,-32 217.96,-32 226.44,-32"/>
-<polygon fill="#000000" stroke="#000000" points="226.66,-35.5 236.66,-32 226.66,-28.5 226.66,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M201.07,-12C209.28,-12 217.96,-12 226.44,-12"/>
+<polygon fill="#000000" stroke="#000000" points="226.66,-15.5 236.66,-12 226.66,-8.5 226.66,-15.5"/>
 </g>
 <!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
 <g id="proc~~util_resize_pl~~CallsGraph_edge4" class="edge">
 <title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M327.22,-23.92C335.75,-22.37 344.62,-20.74 352.99,-19.22"/>
-<polygon fill="#000000" stroke="#000000" points="353.66,-22.65 362.87,-17.41 352.41,-15.77 353.66,-22.65"/>
+<path fill="none" stroke="#000000" d="M327.22,-20.08C335.75,-21.63 344.62,-23.26 352.99,-24.78"/>
+<polygon fill="#000000" stroke="#000000" points="352.41,-28.23 362.87,-26.59 353.66,-21.35 352.41,-28.23"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_resize_tp.html b/docs/proc/util_resize_tp.html
index 764880724..8b49a4163 100644
--- a/docs/proc/util_resize_tp.html
+++ b/docs/proc/util_resize_tp.html
@@ -288,59 +288,59 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~util_resize_tp -->
 <g id="proc~~util_resize_tp~~CallsGraph_node1" class="node">
 <title>proc~util_resize_tp</title>
-<polygon fill="none" stroke="black" points="76,-24 0,-24 0,0 76,0 76,-24"/>
-<text text-anchor="middle" x="38" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_tp</text>
+<polygon fill="none" stroke="black" points="76,-44 0,-44 0,-20 76,-20 76,-44"/>
+<text text-anchor="middle" x="38" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize_tp</text>
 </g>
-<!-- interface~util_resize_body -->
+<!-- interface~util_resize~2 -->
 <g id="proc~~util_resize_tp~~CallsGraph_node2" class="node">
-<title>interface~util_resize_body</title>
-<g id="a_proc~~util_resize_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="202,-44 112,-44 112,-20 202,-20 202,-44"/>
-<text text-anchor="middle" x="157" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<title>interface~util_resize~2</title>
+<g id="a_proc~~util_resize_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
+<polygon fill="#a7506f" stroke="#a7506f" points="425,-44 364,-44 364,-20 425,-20 425,-44"/>
+<text text-anchor="middle" x="394.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
 <g id="proc~~util_resize_tp~~CallsGraph_edge1" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
-<path fill="none" stroke="#000000" d="M76.02,-18.33C84.2,-19.73 93.03,-21.24 101.74,-22.72"/>
-<polygon fill="#000000" stroke="#000000" points="101.4,-26.22 111.85,-24.45 102.58,-19.32 101.4,-26.22"/>
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
+<path fill="none" stroke="#000000" d="M76.14,-32.61C87.63,-32.77 100.34,-32.92 112,-33 208,-33.66 232,-33.73 328,-33 336.33,-32.94 345.25,-32.83 353.75,-32.7"/>
+<polygon fill="#000000" stroke="#000000" points="353.88,-36.2 363.83,-32.55 353.78,-29.2 353.88,-36.2"/>
 </g>
-<!-- interface~util_resize~2 -->
+<!-- interface~util_resize_body -->
 <g id="proc~~util_resize_tp~~CallsGraph_node3" class="node">
-<title>interface~util_resize~2</title>
-<g id="a_proc~~util_resize_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_resize~2.html" xlink:title="util_resize">
-<polygon fill="#a7506f" stroke="#a7506f" points="425,-24 364,-24 364,0 425,0 425,-24"/>
-<text text-anchor="middle" x="394.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>interface~util_resize_body</title>
+<g id="a_proc~~util_resize_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_resize_body.html" xlink:title="util_resize_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="202,-24 112,-24 112,0 202,0 202,-24"/>
+<text text-anchor="middle" x="157" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_resize_tp&#45;&gt;interface~util_resize~2 -->
+<!-- proc~util_resize_tp&#45;&gt;interface~util_resize_body -->
 <g id="proc~~util_resize_tp~~CallsGraph_edge2" class="edge">
-<title>proc~util_resize_tp&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M76.14,-11.39C87.63,-11.23 100.34,-11.08 112,-11 208,-10.34 232,-10.27 328,-11 336.33,-11.06 345.25,-11.17 353.75,-11.3"/>
-<polygon fill="#000000" stroke="#000000" points="353.78,-14.8 363.83,-11.45 353.88,-7.8 353.78,-14.8"/>
+<title>proc~util_resize_tp&#45;&gt;interface~util_resize_body</title>
+<path fill="none" stroke="#000000" d="M76.02,-25.67C84.2,-24.27 93.03,-22.76 101.74,-21.28"/>
+<polygon fill="#000000" stroke="#000000" points="102.58,-24.68 111.85,-19.55 101.4,-17.78 102.58,-24.68"/>
 </g>
 <!-- proc~util_resize_body -->
 <g id="proc~~util_resize_tp~~CallsGraph_node4" class="node">
 <title>proc~util_resize_body</title>
 <g id="a_proc~~util_resize_tp~~CallsGraph_node4"><a xlink:href=".././proc/util_resize_body.html" xlink:title="util_resize_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="328,-44 238,-44 238,-20 328,-20 328,-44"/>
-<text text-anchor="middle" x="283" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="328,-24 238,-24 238,0 328,0 328,-24"/>
+<text text-anchor="middle" x="283" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_resize_body&#45;&gt;proc~util_resize_body -->
 <g id="proc~~util_resize_tp~~CallsGraph_edge3" class="edge">
 <title>interface~util_resize_body&#45;&gt;proc~util_resize_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M202.07,-32C210.28,-32 218.96,-32 227.44,-32"/>
-<polygon fill="#000000" stroke="#000000" points="227.66,-35.5 237.66,-32 227.66,-28.5 227.66,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M202.07,-12C210.28,-12 218.96,-12 227.44,-12"/>
+<polygon fill="#000000" stroke="#000000" points="227.66,-15.5 237.66,-12 227.66,-8.5 227.66,-15.5"/>
 </g>
 <!-- proc~util_resize_body&#45;&gt;interface~util_resize~2 -->
 <g id="proc~~util_resize_tp~~CallsGraph_edge4" class="edge">
 <title>proc~util_resize_body&#45;&gt;interface~util_resize~2</title>
-<path fill="none" stroke="#000000" d="M328.22,-23.92C336.75,-22.37 345.62,-20.74 353.99,-19.22"/>
-<polygon fill="#000000" stroke="#000000" points="354.66,-22.65 363.87,-17.41 353.41,-15.77 354.66,-22.65"/>
+<path fill="none" stroke="#000000" d="M328.22,-20.08C336.75,-21.63 345.62,-23.26 353.99,-24.78"/>
+<polygon fill="#000000" stroke="#000000" points="353.41,-28.23 363.87,-26.59 354.66,-21.35 353.41,-28.23"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_solve_linear_system_d.html b/docs/proc/util_solve_linear_system_d.html
index 6deccd73c..44e2ca839 100644
--- a/docs/proc/util_solve_linear_system_d.html
+++ b/docs/proc/util_solve_linear_system_d.html
@@ -382,7 +382,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~18"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~20"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -446,35 +446,35 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="141,-45 0,-45 0,-21 141,-21 141,-45"/>
 <text text-anchor="middle" x="70.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_solve_linear_system_d</text>
 </g>
-<!-- proc~solve_wbs -->
+<!-- proc~ge_wpp -->
 <g id="proc~~util_solve_linear_system_d~~CallsGraph_node2" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_proc~~util_solve_linear_system_d~~CallsGraph_node2"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="239,-66 177,-66 177,-42 239,-42 239,-66"/>
-<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>proc~ge_wpp</title>
+<g id="a_proc~~util_solve_linear_system_d~~CallsGraph_node2"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="235,-66 181,-66 181,-42 235,-42 235,-66"/>
+<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs -->
+<!-- proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp -->
 <g id="proc~~util_solve_linear_system_d~~CallsGraph_edge1" class="edge">
-<title>proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs</title>
-<path fill="none" stroke="#000000" d="M141.23,-43.81C150.08,-45.18 158.88,-46.54 167.03,-47.81"/>
-<polygon fill="#000000" stroke="#000000" points="166.55,-51.27 176.96,-49.34 167.62,-44.35 166.55,-51.27"/>
+<title>proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp</title>
+<path fill="none" stroke="#000000" d="M141.23,-43.81C151.51,-45.4 161.72,-46.98 170.92,-48.41"/>
+<polygon fill="#000000" stroke="#000000" points="170.41,-51.87 180.83,-49.94 171.49,-44.95 170.41,-51.87"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- proc~solve_wbs -->
 <g id="proc~~util_solve_linear_system_d~~CallsGraph_node3" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_proc~~util_solve_linear_system_d~~CallsGraph_node3"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="235,-24 181,-24 181,0 235,0 235,-24"/>
-<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>proc~solve_wbs</title>
+<g id="a_proc~~util_solve_linear_system_d~~CallsGraph_node3"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="239,-24 177,-24 177,0 239,0 239,-24"/>
+<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp -->
+<!-- proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs -->
 <g id="proc~~util_solve_linear_system_d~~CallsGraph_edge2" class="edge">
-<title>proc~util_solve_linear_system_d&#45;&gt;proc~ge_wpp</title>
-<path fill="none" stroke="#000000" d="M141.23,-22.19C151.51,-20.6 161.72,-19.02 170.92,-17.59"/>
-<polygon fill="#000000" stroke="#000000" points="171.49,-21.05 180.83,-16.06 170.41,-14.13 171.49,-21.05"/>
+<title>proc~util_solve_linear_system_d&#45;&gt;proc~solve_wbs</title>
+<path fill="none" stroke="#000000" d="M141.23,-22.19C150.08,-20.82 158.88,-19.46 167.03,-18.19"/>
+<polygon fill="#000000" stroke="#000000" points="167.62,-21.65 176.96,-16.66 166.55,-14.73 167.62,-21.65"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_solve_linear_system_q.html b/docs/proc/util_solve_linear_system_q.html
index b5e8fedfc..925fd4947 100644
--- a/docs/proc/util_solve_linear_system_q.html
+++ b/docs/proc/util_solve_linear_system_q.html
@@ -382,7 +382,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~19"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~21"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
@@ -446,35 +446,35 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="141,-45 0,-45 0,-21 141,-21 141,-45"/>
 <text text-anchor="middle" x="70.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_solve_linear_system_q</text>
 </g>
-<!-- proc~solve_wbs -->
+<!-- proc~ge_wpp -->
 <g id="proc~~util_solve_linear_system_q~~CallsGraph_node2" class="node">
-<title>proc~solve_wbs</title>
-<g id="a_proc~~util_solve_linear_system_q~~CallsGraph_node2"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="239,-66 177,-66 177,-42 239,-42 239,-66"/>
-<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
+<title>proc~ge_wpp</title>
+<g id="a_proc~~util_solve_linear_system_q~~CallsGraph_node2"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="235,-66 181,-66 181,-42 235,-42 235,-66"/>
+<text text-anchor="middle" x="208" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs -->
+<!-- proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp -->
 <g id="proc~~util_solve_linear_system_q~~CallsGraph_edge1" class="edge">
-<title>proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs</title>
-<path fill="none" stroke="#000000" d="M141.23,-43.81C150.08,-45.18 158.88,-46.54 167.03,-47.81"/>
-<polygon fill="#000000" stroke="#000000" points="166.55,-51.27 176.96,-49.34 167.62,-44.35 166.55,-51.27"/>
+<title>proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp</title>
+<path fill="none" stroke="#000000" d="M141.23,-43.81C151.51,-45.4 161.72,-46.98 170.92,-48.41"/>
+<polygon fill="#000000" stroke="#000000" points="170.41,-51.87 180.83,-49.94 171.49,-44.95 170.41,-51.87"/>
 </g>
-<!-- proc~ge_wpp -->
+<!-- proc~solve_wbs -->
 <g id="proc~~util_solve_linear_system_q~~CallsGraph_node3" class="node">
-<title>proc~ge_wpp</title>
-<g id="a_proc~~util_solve_linear_system_q~~CallsGraph_node3"><a xlink:href=".././proc/ge_wpp.html" xlink:title="ge_wpp">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="235,-24 181,-24 181,0 235,0 235,-24"/>
-<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">ge_wpp</text>
+<title>proc~solve_wbs</title>
+<g id="a_proc~~util_solve_linear_system_q~~CallsGraph_node3"><a xlink:href=".././proc/solve_wbs.html" xlink:title="solve_wbs">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="239,-24 177,-24 177,0 239,0 239,-24"/>
+<text text-anchor="middle" x="208" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">solve_wbs</text>
 </a>
 </g>
 </g>
-<!-- proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp -->
+<!-- proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs -->
 <g id="proc~~util_solve_linear_system_q~~CallsGraph_edge2" class="edge">
-<title>proc~util_solve_linear_system_q&#45;&gt;proc~ge_wpp</title>
-<path fill="none" stroke="#000000" d="M141.23,-22.19C151.51,-20.6 161.72,-19.02 170.92,-17.59"/>
-<polygon fill="#000000" stroke="#000000" points="171.49,-21.05 180.83,-16.06 170.41,-14.13 171.49,-21.05"/>
+<title>proc~util_solve_linear_system_q&#45;&gt;proc~solve_wbs</title>
+<path fill="none" stroke="#000000" d="M141.23,-22.19C150.08,-20.82 158.88,-19.46 167.03,-18.19"/>
+<polygon fill="#000000" stroke="#000000" points="167.62,-21.65 176.96,-16.66 166.55,-14.73 167.62,-21.65"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_sort_body.html b/docs/proc/util_sort_body.html
index 142d33d8a..b23346a3e 100644
--- a/docs/proc/util_sort_body.html
+++ b/docs/proc/util_sort_body.html
@@ -323,65 +323,65 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.07,-33C289.25,-33 298,-33 306.51,-33"/>
 <polygon fill="#000000" stroke="#000000" points="306.72,-36.5 316.72,-33 306.72,-29.5 306.72,-36.5"/>
 </g>
-<!-- proc~util_sort_tp -->
+<!-- proc~util_sort_pl -->
 <g id="proc~~util_sort_body~~CalledByGraph_node3" class="node">
-<title>proc~util_sort_tp</title>
-<g id="a_proc~~util_sort_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_sort_tp.html" xlink:title="util_sort_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="166,-66 101,-66 101,-42 166,-42 166,-66"/>
-<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+<title>proc~util_sort_pl</title>
+<g id="a_proc~~util_sort_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_sort_pl.html" xlink:title="util_sort_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-66 101.5,-66 101.5,-42 165.5,-42 165.5,-66"/>
+<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_tp&#45;&gt;interface~util_sort_body -->
+<!-- proc~util_sort_pl&#45;&gt;interface~util_sort_body -->
 <g id="proc~~util_sort_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_sort_tp&#45;&gt;interface~util_sort_body</title>
-<path fill="none" stroke="#000000" d="M166.02,-47.76C174.18,-46.14 183.15,-44.36 191.96,-42.62"/>
-<polygon fill="#000000" stroke="#000000" points="192.66,-46.05 201.79,-40.67 191.3,-39.18 192.66,-46.05"/>
+<title>proc~util_sort_pl&#45;&gt;interface~util_sort_body</title>
+<path fill="none" stroke="#000000" d="M165.73,-47.81C173.98,-46.18 183.09,-44.37 192.02,-42.6"/>
+<polygon fill="#000000" stroke="#000000" points="192.85,-46.01 201.98,-40.63 191.49,-39.14 192.85,-46.01"/>
 </g>
-<!-- proc~util_sort_pl -->
+<!-- proc~util_sort_tp -->
 <g id="proc~~util_sort_body~~CalledByGraph_node4" class="node">
-<title>proc~util_sort_pl</title>
-<g id="a_proc~~util_sort_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_sort_pl.html" xlink:title="util_sort_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-24 101.5,-24 101.5,0 165.5,0 165.5,-24"/>
-<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
+<title>proc~util_sort_tp</title>
+<g id="a_proc~~util_sort_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_sort_tp.html" xlink:title="util_sort_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="166,-24 101,-24 101,0 166,0 166,-24"/>
+<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_pl&#45;&gt;interface~util_sort_body -->
+<!-- proc~util_sort_tp&#45;&gt;interface~util_sort_body -->
 <g id="proc~~util_sort_body~~CalledByGraph_edge3" class="edge">
-<title>proc~util_sort_pl&#45;&gt;interface~util_sort_body</title>
-<path fill="none" stroke="#000000" d="M165.73,-18.19C173.98,-19.82 183.09,-21.63 192.02,-23.4"/>
-<polygon fill="#000000" stroke="#000000" points="191.49,-26.86 201.98,-25.37 192.85,-19.99 191.49,-26.86"/>
+<title>proc~util_sort_tp&#45;&gt;interface~util_sort_body</title>
+<path fill="none" stroke="#000000" d="M166.02,-18.24C174.18,-19.86 183.15,-21.64 191.96,-23.38"/>
+<polygon fill="#000000" stroke="#000000" points="191.3,-26.82 201.79,-25.33 192.66,-19.95 191.3,-26.82"/>
 </g>
-<!-- interface~util_sort_pl -->
+<!-- interface~util_sort_tp -->
 <g id="proc~~util_sort_body~~CalledByGraph_node5" class="node">
-<title>interface~util_sort_pl</title>
-<g id="a_proc~~util_sort_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_pl.html" xlink:title="util_sort_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-24 0.5,-24 0.5,0 64.5,0 64.5,-24"/>
-<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
+<title>interface~util_sort_tp</title>
+<g id="a_proc~~util_sort_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_tp.html" xlink:title="util_sort_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="65,-24 0,-24 0,0 65,0 65,-24"/>
+<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_pl&#45;&gt;proc~util_sort_pl -->
+<!-- interface~util_sort_tp&#45;&gt;proc~util_sort_tp -->
 <g id="proc~~util_sort_body~~CalledByGraph_edge5" class="edge">
-<title>interface~util_sort_pl&#45;&gt;proc~util_sort_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-12C72.95,-12 82.17,-12 91.04,-12"/>
-<polygon fill="#000000" stroke="#000000" points="91.22,-15.5 101.22,-12 91.22,-8.5 91.22,-15.5"/>
+<title>interface~util_sort_tp&#45;&gt;proc~util_sort_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-12C73.22,-12 82.09,-12 90.65,-12"/>
+<polygon fill="#000000" stroke="#000000" points="90.86,-15.5 100.86,-12 90.86,-8.5 90.86,-15.5"/>
 </g>
-<!-- interface~util_sort_tp -->
+<!-- interface~util_sort_pl -->
 <g id="proc~~util_sort_body~~CalledByGraph_node6" class="node">
-<title>interface~util_sort_tp</title>
-<g id="a_proc~~util_sort_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_sort_tp.html" xlink:title="util_sort_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="65,-66 0,-66 0,-42 65,-42 65,-66"/>
-<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_tp</text>
+<title>interface~util_sort_pl</title>
+<g id="a_proc~~util_sort_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_sort_pl.html" xlink:title="util_sort_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-66 0.5,-66 0.5,-42 64.5,-42 64.5,-66"/>
+<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_sort_tp&#45;&gt;proc~util_sort_tp -->
+<!-- interface~util_sort_pl&#45;&gt;proc~util_sort_pl -->
 <g id="proc~~util_sort_body~~CalledByGraph_edge4" class="edge">
-<title>interface~util_sort_tp&#45;&gt;proc~util_sort_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-54C73.22,-54 82.09,-54 90.65,-54"/>
-<polygon fill="#000000" stroke="#000000" points="90.86,-57.5 100.86,-54 90.86,-50.5 90.86,-57.5"/>
+<title>interface~util_sort_pl&#45;&gt;proc~util_sort_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-54C72.95,-54 82.17,-54 91.04,-54"/>
+<polygon fill="#000000" stroke="#000000" points="91.22,-57.5 101.22,-54 91.22,-50.5 91.22,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_sort_rearrange_arr_char_string.html b/docs/proc/util_sort_rearrange_arr_char_string.html
index d1f50e68e..c855c65f0 100644
--- a/docs/proc/util_sort_rearrange_arr_char_string.html
+++ b/docs/proc/util_sort_rearrange_arr_char_string.html
@@ -264,7 +264,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~20"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~24"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/util_sort_rearrange_arr_dp.html b/docs/proc/util_sort_rearrange_arr_dp.html
index 7b008c892..778fb08cf 100644
--- a/docs/proc/util_sort_rearrange_arr_dp.html
+++ b/docs/proc/util_sort_rearrange_arr_dp.html
@@ -264,7 +264,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~21"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~25"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/util_sort_rearrange_arr_dpvec.html b/docs/proc/util_sort_rearrange_arr_dpvec.html
index 519f7a0de..c0abf41f3 100644
--- a/docs/proc/util_sort_rearrange_arr_dpvec.html
+++ b/docs/proc/util_sort_rearrange_arr_dpvec.html
@@ -264,7 +264,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~22"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~26"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/util_sort_rearrange_arr_i4b.html b/docs/proc/util_sort_rearrange_arr_i4b.html
index 9177b9358..eda2eca0c 100644
--- a/docs/proc/util_sort_rearrange_arr_i4b.html
+++ b/docs/proc/util_sort_rearrange_arr_i4b.html
@@ -264,7 +264,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~23"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~27"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/util_sort_rearrange_arr_info.html b/docs/proc/util_sort_rearrange_arr_info.html
index b08b11f26..7c921f846 100644
--- a/docs/proc/util_sort_rearrange_arr_info.html
+++ b/docs/proc/util_sort_rearrange_arr_info.html
@@ -264,7 +264,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~25"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~29"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/util_sort_rearrange_arr_logical.html b/docs/proc/util_sort_rearrange_arr_logical.html
index fc0878cc1..b0cb0a16c 100644
--- a/docs/proc/util_sort_rearrange_arr_logical.html
+++ b/docs/proc/util_sort_rearrange_arr_logical.html
@@ -264,7 +264,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~24"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~28"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/util_sort_rearrange_body.html b/docs/proc/util_sort_rearrange_body.html
index e15a68446..816b6e936 100644
--- a/docs/proc/util_sort_rearrange_body.html
+++ b/docs/proc/util_sort_rearrange_body.html
@@ -439,25 +439,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" d="M272.03,-19.64C280.42,-20.75 289.15,-21.89 297.82,-23.04"/>
 <polygon fill="#000000" stroke="#000000" points="297.58,-26.53 307.95,-24.37 298.49,-19.59 297.58,-26.53"/>
 </g>
-<!-- interface~util_sort_rearrange_tp -->
-<g id="proc~~util_sort_rearrange_body~~CalledByGraph_node5" class="node">
-<title>interface~util_sort_rearrange_tp</title>
-<g id="a_proc~~util_sort_rearrange_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="118,-66 0,-66 0,-42 118,-42 118,-66"/>
-<text text-anchor="middle" x="59" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
-</a>
-</g>
-</g>
-<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
-<g id="proc~~util_sort_rearrange_body~~CalledByGraph_edge4" class="edge">
-<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-54C126.61,-54 135.17,-54 143.62,-54"/>
-<polygon fill="#000000" stroke="#000000" points="143.82,-57.5 153.82,-54 143.82,-50.5 143.82,-57.5"/>
-</g>
 <!-- interface~util_sort_rearrange_pl -->
-<g id="proc~~util_sort_rearrange_body~~CalledByGraph_node6" class="node">
+<g id="proc~~util_sort_rearrange_body~~CalledByGraph_node5" class="node">
 <title>interface~util_sort_rearrange_pl</title>
-<g id="a_proc~~util_sort_rearrange_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
+<g id="a_proc~~util_sort_rearrange_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_sort_rearrange_pl.html" xlink:title="util_sort_rearrange_pl">
 <polygon fill="#a7506f" stroke="#a7506f" points="118,-24 0,-24 0,0 118,0 118,-24"/>
 <text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_pl</text>
 </a>
@@ -469,6 +454,21 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-12C126.61,-12 135.17,-12 143.62,-12"/>
 <polygon fill="#000000" stroke="#000000" points="143.82,-15.5 153.82,-12 143.82,-8.5 143.82,-15.5"/>
 </g>
+<!-- interface~util_sort_rearrange_tp -->
+<g id="proc~~util_sort_rearrange_body~~CalledByGraph_node6" class="node">
+<title>interface~util_sort_rearrange_tp</title>
+<g id="a_proc~~util_sort_rearrange_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_sort_rearrange_tp.html" xlink:title="util_sort_rearrange_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="118,-66 0,-66 0,-42 118,-42 118,-66"/>
+<text text-anchor="middle" x="59" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_tp</text>
+</a>
+</g>
+</g>
+<!-- interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp -->
+<g id="proc~~util_sort_rearrange_body~~CalledByGraph_edge4" class="edge">
+<title>interface~util_sort_rearrange_tp&#45;&gt;proc~util_sort_rearrange_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-54C126.61,-54 135.17,-54 143.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="143.82,-57.5 153.82,-54 143.82,-50.5 143.82,-57.5"/>
+</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
diff --git a/docs/proc/util_sort_rearrange_pl.html b/docs/proc/util_sort_rearrange_pl.html
index 347a7d5f2..742cd30ef 100644
--- a/docs/proc/util_sort_rearrange_pl.html
+++ b/docs/proc/util_sort_rearrange_pl.html
@@ -289,59 +289,59 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~util_sort_rearrange_pl -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_node1" class="node">
 <title>proc~util_sort_rearrange_pl</title>
-<polygon fill="none" stroke="black" points="118,-24 0,-24 0,0 118,0 118,-24"/>
-<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_pl</text>
+<polygon fill="none" stroke="black" points="118,-44 0,-44 0,-20 118,-20 118,-44"/>
+<text text-anchor="middle" x="59" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_pl</text>
 </g>
-<!-- interface~util_sort_rearrange_body -->
+<!-- interface~util_sort_rearrange~2 -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_node2" class="node">
-<title>interface~util_sort_rearrange_body</title>
-<g id="a_proc~~util_sort_rearrange_pl~~CallsGraph_node2"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="287,-44 154,-44 154,-20 287,-20 287,-44"/>
-<text text-anchor="middle" x="220.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<title>interface~util_sort_rearrange~2</title>
+<g id="a_proc~~util_sort_rearrange_pl~~CallsGraph_node2"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="595,-44 492,-44 492,-20 595,-20 595,-44"/>
+<text text-anchor="middle" x="543.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_edge1" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" d="M118.03,-19.28C126.42,-20.33 135.15,-21.42 143.82,-22.51"/>
-<polygon fill="#000000" stroke="#000000" points="143.59,-26.01 153.95,-23.78 144.46,-19.06 143.59,-26.01"/>
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
+<path fill="none" stroke="#000000" d="M118.17,-32.72C130.02,-32.83 142.41,-32.94 154,-33 288.22,-33.71 321.78,-33.78 456,-33 464.31,-32.95 473.07,-32.88 481.7,-32.79"/>
+<polygon fill="#000000" stroke="#000000" points="481.77,-36.29 491.73,-32.68 481.69,-29.29 481.77,-36.29"/>
 </g>
-<!-- interface~util_sort_rearrange~2 -->
+<!-- interface~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_node3" class="node">
-<title>interface~util_sort_rearrange~2</title>
-<g id="a_proc~~util_sort_rearrange_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="595,-24 492,-24 492,0 595,0 595,-24"/>
-<text text-anchor="middle" x="543.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<title>interface~util_sort_rearrange_body</title>
+<g id="a_proc~~util_sort_rearrange_pl~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="287,-24 154,-24 154,0 287,0 287,-24"/>
+<text text-anchor="middle" x="220.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2 -->
+<!-- proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_edge2" class="edge">
-<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M118.17,-11.28C130.02,-11.17 142.41,-11.06 154,-11 288.22,-10.29 321.78,-10.22 456,-11 464.31,-11.05 473.07,-11.12 481.7,-11.21"/>
-<polygon fill="#000000" stroke="#000000" points="481.69,-14.71 491.73,-11.32 481.77,-7.71 481.69,-14.71"/>
+<title>proc~util_sort_rearrange_pl&#45;&gt;interface~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" d="M118.03,-24.72C126.42,-23.67 135.15,-22.58 143.82,-21.49"/>
+<polygon fill="#000000" stroke="#000000" points="144.46,-24.94 153.95,-20.22 143.59,-17.99 144.46,-24.94"/>
 </g>
 <!-- proc~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_node4" class="node">
 <title>proc~util_sort_rearrange_body</title>
 <g id="a_proc~~util_sort_rearrange_pl~~CallsGraph_node4"><a xlink:href=".././proc/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="456,-44 323,-44 323,-20 456,-20 456,-44"/>
-<text text-anchor="middle" x="389.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="456,-24 323,-24 323,0 456,0 456,-24"/>
+<text text-anchor="middle" x="389.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_edge3" class="edge">
 <title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.02,-32C295.5,-32 304.23,-32 312.85,-32"/>
-<polygon fill="#000000" stroke="#000000" points="312.89,-35.5 322.89,-32 312.89,-28.5 312.89,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.02,-12C295.5,-12 304.23,-12 312.85,-12"/>
+<polygon fill="#000000" stroke="#000000" points="312.89,-15.5 322.89,-12 312.89,-8.5 312.89,-15.5"/>
 </g>
 <!-- proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="proc~~util_sort_rearrange_pl~~CallsGraph_edge4" class="edge">
 <title>proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M456.29,-23.34C464.73,-22.23 473.34,-21.1 481.7,-20"/>
-<polygon fill="#000000" stroke="#000000" points="482.28,-23.45 491.74,-18.68 481.37,-16.51 482.28,-23.45"/>
+<path fill="none" stroke="#000000" d="M456.29,-20.66C464.73,-21.77 473.34,-22.9 481.7,-24"/>
+<polygon fill="#000000" stroke="#000000" points="481.37,-27.49 491.74,-25.32 482.28,-20.55 481.37,-27.49"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_sort_rearrange_tp.html b/docs/proc/util_sort_rearrange_tp.html
index 09da022d3..b8166818b 100644
--- a/docs/proc/util_sort_rearrange_tp.html
+++ b/docs/proc/util_sort_rearrange_tp.html
@@ -289,59 +289,59 @@ <h3 class="panel-title">Calls</h3>
 <!-- proc~util_sort_rearrange_tp -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_node1" class="node">
 <title>proc~util_sort_rearrange_tp</title>
-<polygon fill="none" stroke="black" points="118,-24 0,-24 0,0 118,0 118,-24"/>
-<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_tp</text>
+<polygon fill="none" stroke="black" points="118,-44 0,-44 0,-20 118,-20 118,-44"/>
+<text text-anchor="middle" x="59" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort_rearrange_tp</text>
 </g>
-<!-- interface~util_sort_rearrange_body -->
+<!-- interface~util_sort_rearrange~2 -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_node2" class="node">
-<title>interface~util_sort_rearrange_body</title>
-<g id="a_proc~~util_sort_rearrange_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#a7506f" stroke="#a7506f" points="287,-44 154,-44 154,-20 287,-20 287,-44"/>
-<text text-anchor="middle" x="220.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<title>interface~util_sort_rearrange~2</title>
+<g id="a_proc~~util_sort_rearrange_tp~~CallsGraph_node2"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
+<polygon fill="#a7506f" stroke="#a7506f" points="595,-44 492,-44 492,-20 595,-20 595,-44"/>
+<text text-anchor="middle" x="543.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_edge1" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" d="M118.03,-19.28C126.42,-20.33 135.15,-21.42 143.82,-22.51"/>
-<polygon fill="#000000" stroke="#000000" points="143.59,-26.01 153.95,-23.78 144.46,-19.06 143.59,-26.01"/>
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
+<path fill="none" stroke="#000000" d="M118.17,-32.72C130.02,-32.83 142.41,-32.94 154,-33 288.22,-33.71 321.78,-33.78 456,-33 464.31,-32.95 473.07,-32.88 481.7,-32.79"/>
+<polygon fill="#000000" stroke="#000000" points="481.77,-36.29 491.73,-32.68 481.69,-29.29 481.77,-36.29"/>
 </g>
-<!-- interface~util_sort_rearrange~2 -->
+<!-- interface~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_node3" class="node">
-<title>interface~util_sort_rearrange~2</title>
-<g id="a_proc~~util_sort_rearrange_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange~2.html" xlink:title="util_sort_rearrange">
-<polygon fill="#a7506f" stroke="#a7506f" points="595,-24 492,-24 492,0 595,0 595,-24"/>
-<text text-anchor="middle" x="543.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange</text>
+<title>interface~util_sort_rearrange_body</title>
+<g id="a_proc~~util_sort_rearrange_tp~~CallsGraph_node3"><a xlink:href=".././interface/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
+<polygon fill="#a7506f" stroke="#a7506f" points="287,-24 154,-24 154,0 287,0 287,-24"/>
+<text text-anchor="middle" x="220.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
-<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2 -->
+<!-- proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_edge2" class="edge">
-<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M118.17,-11.28C130.02,-11.17 142.41,-11.06 154,-11 288.22,-10.29 321.78,-10.22 456,-11 464.31,-11.05 473.07,-11.12 481.7,-11.21"/>
-<polygon fill="#000000" stroke="#000000" points="481.69,-14.71 491.73,-11.32 481.77,-7.71 481.69,-14.71"/>
+<title>proc~util_sort_rearrange_tp&#45;&gt;interface~util_sort_rearrange_body</title>
+<path fill="none" stroke="#000000" d="M118.03,-24.72C126.42,-23.67 135.15,-22.58 143.82,-21.49"/>
+<polygon fill="#000000" stroke="#000000" points="144.46,-24.94 153.95,-20.22 143.59,-17.99 144.46,-24.94"/>
 </g>
 <!-- proc~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_node4" class="node">
 <title>proc~util_sort_rearrange_body</title>
 <g id="a_proc~~util_sort_rearrange_tp~~CallsGraph_node4"><a xlink:href=".././proc/util_sort_rearrange_body.html" xlink:title="util_sort_rearrange_body">
-<polygon fill="#d9534f" stroke="#d9534f" points="456,-44 323,-44 323,-20 456,-20 456,-44"/>
-<text text-anchor="middle" x="389.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="456,-24 323,-24 323,0 456,0 456,-24"/>
+<text text-anchor="middle" x="389.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort_rearrange_body</text>
 </a>
 </g>
 </g>
 <!-- interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_edge3" class="edge">
 <title>interface~util_sort_rearrange_body&#45;&gt;proc~util_sort_rearrange_body</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.02,-32C295.5,-32 304.23,-32 312.85,-32"/>
-<polygon fill="#000000" stroke="#000000" points="312.89,-35.5 322.89,-32 312.89,-28.5 312.89,-35.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.02,-12C295.5,-12 304.23,-12 312.85,-12"/>
+<polygon fill="#000000" stroke="#000000" points="312.89,-15.5 322.89,-12 312.89,-8.5 312.89,-15.5"/>
 </g>
 <!-- proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2 -->
 <g id="proc~~util_sort_rearrange_tp~~CallsGraph_edge4" class="edge">
 <title>proc~util_sort_rearrange_body&#45;&gt;interface~util_sort_rearrange~2</title>
-<path fill="none" stroke="#000000" d="M456.29,-23.34C464.73,-22.23 473.34,-21.1 481.7,-20"/>
-<polygon fill="#000000" stroke="#000000" points="482.28,-23.45 491.74,-18.68 481.37,-16.51 482.28,-23.45"/>
+<path fill="none" stroke="#000000" d="M456.29,-20.66C464.73,-21.77 473.34,-22.9 481.7,-24"/>
+<polygon fill="#000000" stroke="#000000" points="481.37,-27.49 491.74,-25.32 482.28,-20.55 481.37,-27.49"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_spill_arr_dpvec.html b/docs/proc/util_spill_arr_dpvec.html
index 12c5ec7d0..31f2300a5 100644
--- a/docs/proc/util_spill_arr_dpvec.html
+++ b/docs/proc/util_spill_arr_dpvec.html
@@ -136,7 +136,7 @@ <h1>util_spill_arr_DPvec
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
diff --git a/docs/proc/util_spill_body.html b/docs/proc/util_spill_body.html
index 76881d7ab..7982e8a32 100644
--- a/docs/proc/util_spill_body.html
+++ b/docs/proc/util_spill_body.html
@@ -136,7 +136,7 @@ <h1>util_spill_body
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.1% of total for procedures.">34 statements</a>
+    title=" 0.0% of total for procedures.">34 statements</a>
      </li> 
      
      
@@ -440,65 +440,65 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.07,-33C289.25,-33 298,-33 306.51,-33"/>
 <polygon fill="#000000" stroke="#000000" points="306.72,-36.5 316.72,-33 306.72,-29.5 306.72,-36.5"/>
 </g>
-<!-- proc~util_spill_tp -->
+<!-- proc~util_spill_pl -->
 <g id="proc~~util_spill_body~~CalledByGraph_node3" class="node">
-<title>proc~util_spill_tp</title>
-<g id="a_proc~~util_spill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="166,-66 101,-66 101,-42 166,-42 166,-66"/>
-<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>proc~util_spill_pl</title>
+<g id="a_proc~~util_spill_body~~CalledByGraph_node3"><a xlink:href=".././proc/util_spill_pl.html" xlink:title="util_spill_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-66 101.5,-66 101.5,-42 165.5,-42 165.5,-66"/>
+<text text-anchor="middle" x="133.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_tp&#45;&gt;interface~util_spill_body -->
+<!-- proc~util_spill_pl&#45;&gt;interface~util_spill_body -->
 <g id="proc~~util_spill_body~~CalledByGraph_edge2" class="edge">
-<title>proc~util_spill_tp&#45;&gt;interface~util_spill_body</title>
-<path fill="none" stroke="#000000" d="M166.02,-47.76C174.18,-46.14 183.15,-44.36 191.96,-42.62"/>
-<polygon fill="#000000" stroke="#000000" points="192.66,-46.05 201.79,-40.67 191.3,-39.18 192.66,-46.05"/>
+<title>proc~util_spill_pl&#45;&gt;interface~util_spill_body</title>
+<path fill="none" stroke="#000000" d="M165.73,-47.81C173.98,-46.18 183.09,-44.37 192.02,-42.6"/>
+<polygon fill="#000000" stroke="#000000" points="192.85,-46.01 201.98,-40.63 191.49,-39.14 192.85,-46.01"/>
 </g>
-<!-- proc~util_spill_pl -->
+<!-- proc~util_spill_tp -->
 <g id="proc~~util_spill_body~~CalledByGraph_node4" class="node">
-<title>proc~util_spill_pl</title>
-<g id="a_proc~~util_spill_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_spill_pl.html" xlink:title="util_spill_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="165.5,-24 101.5,-24 101.5,0 165.5,0 165.5,-24"/>
-<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<title>proc~util_spill_tp</title>
+<g id="a_proc~~util_spill_body~~CalledByGraph_node4"><a xlink:href=".././proc/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="166,-24 101,-24 101,0 166,0 166,-24"/>
+<text text-anchor="middle" x="133.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~util_spill_pl&#45;&gt;interface~util_spill_body -->
+<!-- proc~util_spill_tp&#45;&gt;interface~util_spill_body -->
 <g id="proc~~util_spill_body~~CalledByGraph_edge3" class="edge">
-<title>proc~util_spill_pl&#45;&gt;interface~util_spill_body</title>
-<path fill="none" stroke="#000000" d="M165.73,-18.19C173.98,-19.82 183.09,-21.63 192.02,-23.4"/>
-<polygon fill="#000000" stroke="#000000" points="191.49,-26.86 201.98,-25.37 192.85,-19.99 191.49,-26.86"/>
+<title>proc~util_spill_tp&#45;&gt;interface~util_spill_body</title>
+<path fill="none" stroke="#000000" d="M166.02,-18.24C174.18,-19.86 183.15,-21.64 191.96,-23.38"/>
+<polygon fill="#000000" stroke="#000000" points="191.3,-26.82 201.79,-25.33 192.66,-19.95 191.3,-26.82"/>
 </g>
-<!-- interface~util_spill_pl -->
+<!-- interface~util_spill_tp -->
 <g id="proc~~util_spill_body~~CalledByGraph_node5" class="node">
-<title>interface~util_spill_pl</title>
-<g id="a_proc~~util_spill_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-24 0.5,-24 0.5,0 64.5,0 64.5,-24"/>
-<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<title>interface~util_spill_tp</title>
+<g id="a_proc~~util_spill_body~~CalledByGraph_node5"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="65,-24 0,-24 0,0 65,0 65,-24"/>
+<text text-anchor="middle" x="32.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_pl&#45;&gt;proc~util_spill_pl -->
+<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
 <g id="proc~~util_spill_body~~CalledByGraph_edge5" class="edge">
-<title>interface~util_spill_pl&#45;&gt;proc~util_spill_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-12C72.95,-12 82.17,-12 91.04,-12"/>
-<polygon fill="#000000" stroke="#000000" points="91.22,-15.5 101.22,-12 91.22,-8.5 91.22,-15.5"/>
+<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-12C73.22,-12 82.09,-12 90.65,-12"/>
+<polygon fill="#000000" stroke="#000000" points="90.86,-15.5 100.86,-12 90.86,-8.5 90.86,-15.5"/>
 </g>
-<!-- interface~util_spill_tp -->
+<!-- interface~util_spill_pl -->
 <g id="proc~~util_spill_body~~CalledByGraph_node6" class="node">
-<title>interface~util_spill_tp</title>
-<g id="a_proc~~util_spill_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_spill_tp.html" xlink:title="util_spill_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="65,-66 0,-66 0,-42 65,-42 65,-66"/>
-<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_tp</text>
+<title>interface~util_spill_pl</title>
+<g id="a_proc~~util_spill_body~~CalledByGraph_node6"><a xlink:href=".././interface/util_spill_pl.html" xlink:title="util_spill_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="64.5,-66 0.5,-66 0.5,-42 64.5,-42 64.5,-66"/>
+<text text-anchor="middle" x="32.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~util_spill_tp&#45;&gt;proc~util_spill_tp -->
+<!-- interface~util_spill_pl&#45;&gt;proc~util_spill_pl -->
 <g id="proc~~util_spill_body~~CalledByGraph_edge4" class="edge">
-<title>interface~util_spill_tp&#45;&gt;proc~util_spill_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M65.1,-54C73.22,-54 82.09,-54 90.65,-54"/>
-<polygon fill="#000000" stroke="#000000" points="90.86,-57.5 100.86,-54 90.86,-50.5 90.86,-57.5"/>
+<title>interface~util_spill_pl&#45;&gt;proc~util_spill_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M64.55,-54C72.95,-54 82.17,-54 91.04,-54"/>
+<polygon fill="#000000" stroke="#000000" points="91.22,-57.5 101.22,-54 91.22,-50.5 91.22,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/util_valid_id_system.html b/docs/proc/util_valid_id_system.html
index f9fbd3541..52511b064 100644
--- a/docs/proc/util_valid_id_system.html
+++ b/docs/proc/util_valid_id_system.html
@@ -293,33 +293,33 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="108,-45 0,-45 0,-21 108,-21 108,-45"/>
 <text text-anchor="middle" x="54" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">util_valid_id_system</text>
 </g>
-<!-- interface~util_sort -->
+<!-- interface~util_exit -->
 <g id="proc~~util_valid_id_system~~CallsGraph_node2" class="node">
-<title>interface~util_sort</title>
-<g id="a_proc~~util_valid_id_system~~CallsGraph_node2"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
+<title>interface~util_exit</title>
+<g id="a_proc~~util_valid_id_system~~CallsGraph_node2"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
 <polygon fill="#a7506f" stroke="#a7506f" points="198,-66 144,-66 144,-42 198,-42 198,-66"/>
-<text text-anchor="middle" x="171" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
+<text text-anchor="middle" x="171" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
-<g id="proc~~util_valid_id_system~~CallsGraph_edge2" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
+<g id="proc~~util_valid_id_system~~CallsGraph_edge1" class="edge">
+<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
 <path fill="none" stroke="#000000" d="M108.12,-42.7C116.81,-44.29 125.64,-45.9 133.8,-47.39"/>
 <polygon fill="#000000" stroke="#000000" points="133.25,-50.85 143.71,-49.2 134.5,-43.96 133.25,-50.85"/>
 </g>
-<!-- interface~util_exit -->
+<!-- interface~util_sort -->
 <g id="proc~~util_valid_id_system~~CallsGraph_node3" class="node">
-<title>interface~util_exit</title>
-<g id="a_proc~~util_valid_id_system~~CallsGraph_node3"><a xlink:href=".././interface/util_exit.html" xlink:title="util_exit">
+<title>interface~util_sort</title>
+<g id="a_proc~~util_valid_id_system~~CallsGraph_node3"><a xlink:href=".././interface/util_sort.html" xlink:title="util_sort">
 <polygon fill="#a7506f" stroke="#a7506f" points="198,-24 144,-24 144,0 198,0 198,-24"/>
-<text text-anchor="middle" x="171" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="171" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort</text>
 </a>
 </g>
 </g>
-<!-- proc~util_valid_id_system&#45;&gt;interface~util_exit -->
-<g id="proc~~util_valid_id_system~~CallsGraph_edge1" class="edge">
-<title>proc~util_valid_id_system&#45;&gt;interface~util_exit</title>
+<!-- proc~util_valid_id_system&#45;&gt;interface~util_sort -->
+<g id="proc~~util_valid_id_system~~CallsGraph_edge2" class="edge">
+<title>proc~util_valid_id_system&#45;&gt;interface~util_sort</title>
 <path fill="none" stroke="#000000" d="M108.12,-23.3C116.81,-21.71 125.64,-20.1 133.8,-18.61"/>
 <polygon fill="#000000" stroke="#000000" points="134.5,-22.04 143.71,-16.8 133.25,-15.15 134.5,-22.04"/>
 </g>
@@ -327,16 +327,16 @@ <h3 class="panel-title">Calls</h3>
 <g id="proc~~util_valid_id_system~~CallsGraph_node4" class="node">
 <title>proc~util_exit</title>
 <g id="a_proc~~util_valid_id_system~~CallsGraph_node4"><a xlink:href=".././proc/util_exit.html" xlink:title="util_exit">
-<polygon fill="#d9534f" stroke="#d9534f" points="288,-24 234,-24 234,0 288,0 288,-24"/>
-<text text-anchor="middle" x="261" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="288,-66 234,-66 234,-42 288,-42 288,-66"/>
+<text text-anchor="middle" x="261" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </a>
 </g>
 </g>
 <!-- interface~util_exit&#45;&gt;proc~util_exit -->
 <g id="proc~~util_valid_id_system~~CallsGraph_edge3" class="edge">
 <title>interface~util_exit&#45;&gt;proc~util_exit</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M198.4,-12C206.39,-12 215.31,-12 223.82,-12"/>
-<polygon fill="#000000" stroke="#000000" points="223.92,-15.5 233.92,-12 223.92,-8.5 223.92,-15.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M198.4,-54C206.39,-54 215.31,-54 223.82,-54"/>
+<polygon fill="#000000" stroke="#000000" points="223.92,-57.5 233.92,-54 223.92,-50.5 223.92,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/whm_coord_h2j_pl.html b/docs/proc/whm_coord_h2j_pl.html
index 6ad363f15..34f6e2f14 100644
--- a/docs/proc/whm_coord_h2j_pl.html
+++ b/docs/proc/whm_coord_h2j_pl.html
@@ -294,39 +294,39 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="103,-129 0,-129 0,-105 103,-105 103,-129"/>
 <text text-anchor="middle" x="51.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_coord_h2j_pl</text>
 </g>
-<!-- vj -->
+<!-- vh -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_node2" class="node">
-<title>vj</title>
+<title>vh</title>
 <polygon fill="#777777" stroke="#777777" points="193,-234 139,-234 139,-210 193,-210 193,-234"/>
-<text text-anchor="middle" x="166" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
+<text text-anchor="middle" x="166" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;vj -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;vh -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_edge1" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;vj</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;vh</title>
 <path fill="none" stroke="#000000" d="M64.21,-129.04C80.53,-145.68 111.27,-176.43 139,-201 139.83,-201.73 140.67,-202.47 141.53,-203.21"/>
 <polygon fill="#000000" stroke="#000000" points="139.49,-206.07 149.41,-209.79 143.98,-200.69 139.49,-206.07"/>
 </g>
-<!-- vh -->
+<!-- xj -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_node3" class="node">
-<title>vh</title>
+<title>xj</title>
 <polygon fill="#777777" stroke="#777777" points="193,-192 139,-192 139,-168 193,-168 193,-192"/>
-<text text-anchor="middle" x="166" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+<text text-anchor="middle" x="166" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;vh -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;xj -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;vh</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;xj</title>
 <path fill="none" stroke="#000000" d="M74.19,-129.15C91.31,-138.73 115.4,-152.23 134.47,-162.9"/>
 <polygon fill="#000000" stroke="#000000" points="132.94,-166.06 143.38,-167.89 136.36,-159.95 132.94,-166.06"/>
 </g>
-<!-- xj -->
+<!-- eta -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_node4" class="node">
-<title>xj</title>
+<title>eta</title>
 <polygon fill="#777777" stroke="#777777" points="193,-150 139,-150 139,-126 193,-126 193,-150"/>
-<text text-anchor="middle" x="166" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
+<text text-anchor="middle" x="166" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;xj -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;eta -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;xj</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;eta</title>
 <path fill="none" stroke="#000000" d="M103.16,-126.46C111.85,-128.08 120.72,-129.73 128.93,-131.27"/>
 <polygon fill="#000000" stroke="#000000" points="128.45,-134.74 138.92,-133.13 129.73,-127.86 128.45,-134.74"/>
 </g>
@@ -342,27 +342,27 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M103.16,-107.54C111.85,-105.92 120.72,-104.27 128.93,-102.73"/>
 <polygon fill="#000000" stroke="#000000" points="129.73,-106.14 138.92,-100.87 128.45,-99.26 129.73,-106.14"/>
 </g>
-<!-- gmpl -->
+<!-- vj -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_node6" class="node">
-<title>gmpl</title>
+<title>vj</title>
 <polygon fill="#777777" stroke="#777777" points="193,-66 139,-66 139,-42 193,-42 193,-66"/>
-<text text-anchor="middle" x="166" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
+<text text-anchor="middle" x="166" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;gmpl -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;vj -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_edge5" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;gmpl</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;vj</title>
 <path fill="none" stroke="#000000" d="M74.19,-104.85C91.31,-95.27 115.4,-81.77 134.47,-71.1"/>
 <polygon fill="#000000" stroke="#000000" points="136.36,-74.05 143.38,-66.11 132.94,-67.94 136.36,-74.05"/>
 </g>
-<!-- eta -->
+<!-- gmpl -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_node7" class="node">
-<title>eta</title>
+<title>gmpl</title>
 <polygon fill="#777777" stroke="#777777" points="193,-24 139,-24 139,0 193,0 193,-24"/>
-<text text-anchor="middle" x="166" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
+<text text-anchor="middle" x="166" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
 </g>
-<!-- proc~whm_coord_h2j_pl&#45;&gt;eta -->
+<!-- proc~whm_coord_h2j_pl&#45;&gt;gmpl -->
 <g id="proc~~whm_coord_h2j_pl~~CallsGraph_edge6" class="edge">
-<title>proc~whm_coord_h2j_pl&#45;&gt;eta</title>
+<title>proc~whm_coord_h2j_pl&#45;&gt;gmpl</title>
 <path fill="none" stroke="#000000" d="M64.21,-104.96C80.53,-88.32 111.27,-57.57 139,-33 139.83,-32.27 140.67,-31.53 141.53,-30.79"/>
 <polygon fill="#000000" stroke="#000000" points="143.98,-33.31 149.41,-24.21 139.49,-27.93 143.98,-33.31"/>
 </g>
diff --git a/docs/proc/whm_coord_j2h_pl.html b/docs/proc/whm_coord_j2h_pl.html
index 612430bf0..a553f268b 100644
--- a/docs/proc/whm_coord_j2h_pl.html
+++ b/docs/proc/whm_coord_j2h_pl.html
@@ -294,39 +294,39 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="103,-129 0,-129 0,-105 103,-105 103,-129"/>
 <text text-anchor="middle" x="51.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_coord_j2h_pl</text>
 </g>
-<!-- vj -->
+<!-- vh -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_node2" class="node">
-<title>vj</title>
+<title>vh</title>
 <polygon fill="#777777" stroke="#777777" points="193,-234 139,-234 139,-210 193,-210 193,-234"/>
-<text text-anchor="middle" x="166" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
+<text text-anchor="middle" x="166" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;vj -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;vh -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_edge1" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;vj</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;vh</title>
 <path fill="none" stroke="#000000" d="M64.21,-129.04C80.53,-145.68 111.27,-176.43 139,-201 139.83,-201.73 140.67,-202.47 141.53,-203.21"/>
 <polygon fill="#000000" stroke="#000000" points="139.49,-206.07 149.41,-209.79 143.98,-200.69 139.49,-206.07"/>
 </g>
-<!-- vh -->
+<!-- xj -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_node3" class="node">
-<title>vh</title>
+<title>xj</title>
 <polygon fill="#777777" stroke="#777777" points="193,-192 139,-192 139,-168 193,-168 193,-192"/>
-<text text-anchor="middle" x="166" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+<text text-anchor="middle" x="166" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;vh -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;xj -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;vh</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;xj</title>
 <path fill="none" stroke="#000000" d="M74.19,-129.15C91.31,-138.73 115.4,-152.23 134.47,-162.9"/>
 <polygon fill="#000000" stroke="#000000" points="132.94,-166.06 143.38,-167.89 136.36,-159.95 132.94,-166.06"/>
 </g>
-<!-- xj -->
+<!-- eta -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_node4" class="node">
-<title>xj</title>
+<title>eta</title>
 <polygon fill="#777777" stroke="#777777" points="193,-150 139,-150 139,-126 193,-126 193,-150"/>
-<text text-anchor="middle" x="166" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">xj</text>
+<text text-anchor="middle" x="166" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;xj -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;eta -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;xj</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;eta</title>
 <path fill="none" stroke="#000000" d="M103.16,-126.46C111.85,-128.08 120.72,-129.73 128.93,-131.27"/>
 <polygon fill="#000000" stroke="#000000" points="128.45,-134.74 138.92,-133.13 129.73,-127.86 128.45,-134.74"/>
 </g>
@@ -342,27 +342,27 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M103.16,-107.54C111.85,-105.92 120.72,-104.27 128.93,-102.73"/>
 <polygon fill="#000000" stroke="#000000" points="129.73,-106.14 138.92,-100.87 128.45,-99.26 129.73,-106.14"/>
 </g>
-<!-- gmpl -->
+<!-- vj -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_node6" class="node">
-<title>gmpl</title>
+<title>vj</title>
 <polygon fill="#777777" stroke="#777777" points="193,-66 139,-66 139,-42 193,-42 193,-66"/>
-<text text-anchor="middle" x="166" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
+<text text-anchor="middle" x="166" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;gmpl -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;vj -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_edge5" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;gmpl</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;vj</title>
 <path fill="none" stroke="#000000" d="M74.19,-104.85C91.31,-95.27 115.4,-81.77 134.47,-71.1"/>
 <polygon fill="#000000" stroke="#000000" points="136.36,-74.05 143.38,-66.11 132.94,-67.94 136.36,-74.05"/>
 </g>
-<!-- eta -->
+<!-- gmpl -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_node7" class="node">
-<title>eta</title>
+<title>gmpl</title>
 <polygon fill="#777777" stroke="#777777" points="193,-24 139,-24 139,0 193,0 193,-24"/>
-<text text-anchor="middle" x="166" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
+<text text-anchor="middle" x="166" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
 </g>
-<!-- proc~whm_coord_j2h_pl&#45;&gt;eta -->
+<!-- proc~whm_coord_j2h_pl&#45;&gt;gmpl -->
 <g id="proc~~whm_coord_j2h_pl~~CallsGraph_edge6" class="edge">
-<title>proc~whm_coord_j2h_pl&#45;&gt;eta</title>
+<title>proc~whm_coord_j2h_pl&#45;&gt;gmpl</title>
 <path fill="none" stroke="#000000" d="M64.21,-104.96C80.53,-88.32 111.27,-57.57 139,-33 139.83,-32.27 140.67,-31.53 141.53,-30.79"/>
 <polygon fill="#000000" stroke="#000000" points="143.98,-33.31 149.41,-24.21 139.49,-27.93 143.98,-33.31"/>
 </g>
diff --git a/docs/proc/whm_coord_vh2vj_pl.html b/docs/proc/whm_coord_vh2vj_pl.html
index e6f6acb36..72ffd6481 100644
--- a/docs/proc/whm_coord_vh2vj_pl.html
+++ b/docs/proc/whm_coord_vh2vj_pl.html
@@ -294,27 +294,27 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="113,-87 0,-87 0,-63 113,-63 113,-87"/>
 <text text-anchor="middle" x="56.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_coord_vh2vj_pl</text>
 </g>
-<!-- eta -->
+<!-- vj -->
 <g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_node2" class="node">
-<title>eta</title>
+<title>vj</title>
 <polygon fill="#777777" stroke="#777777" points="203,-150 149,-150 149,-126 203,-126 203,-150"/>
-<text text-anchor="middle" x="176" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
+<text text-anchor="middle" x="176" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;eta -->
-<g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;eta</title>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vj -->
+<g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_edge1" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;vj</title>
 <path fill="none" stroke="#000000" d="M80.16,-87.15C98.12,-96.78 123.43,-110.35 143.39,-121.05"/>
 <polygon fill="#000000" stroke="#000000" points="141.95,-124.25 152.41,-125.89 145.26,-118.08 141.95,-124.25"/>
 </g>
-<!-- vj -->
+<!-- vh -->
 <g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_node3" class="node">
-<title>vj</title>
+<title>vh</title>
 <polygon fill="#777777" stroke="#777777" points="203,-108 149,-108 149,-84 203,-84 203,-108"/>
-<text text-anchor="middle" x="176" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vj</text>
+<text text-anchor="middle" x="176" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vj -->
-<g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;vj</title>
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vh -->
+<g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_edge2" class="edge">
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;vh</title>
 <path fill="none" stroke="#000000" d="M113.15,-84.95C121.91,-86.51 130.76,-88.09 138.92,-89.55"/>
 <polygon fill="#000000" stroke="#000000" points="138.37,-93.01 148.83,-91.32 139.6,-86.12 138.37,-93.01"/>
 </g>
@@ -325,20 +325,20 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="176" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gmpl</text>
 </g>
 <!-- proc~whm_coord_vh2vj_pl&#45;&gt;gmpl -->
-<g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_edge1" class="edge">
+<g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_edge3" class="edge">
 <title>proc~whm_coord_vh2vj_pl&#45;&gt;gmpl</title>
 <path fill="none" stroke="#000000" d="M113.15,-65.05C121.91,-63.49 130.76,-61.91 138.92,-60.45"/>
 <polygon fill="#000000" stroke="#000000" points="139.6,-63.88 148.83,-58.68 138.37,-56.99 139.6,-63.88"/>
 </g>
-<!-- vh -->
+<!-- eta -->
 <g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_node5" class="node">
-<title>vh</title>
+<title>eta</title>
 <polygon fill="#777777" stroke="#777777" points="203,-24 149,-24 149,0 203,0 203,-24"/>
-<text text-anchor="middle" x="176" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">vh</text>
+<text text-anchor="middle" x="176" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">eta</text>
 </g>
-<!-- proc~whm_coord_vh2vj_pl&#45;&gt;vh -->
+<!-- proc~whm_coord_vh2vj_pl&#45;&gt;eta -->
 <g id="proc~~whm_coord_vh2vj_pl~~CallsGraph_edge4" class="edge">
-<title>proc~whm_coord_vh2vj_pl&#45;&gt;vh</title>
+<title>proc~whm_coord_vh2vj_pl&#45;&gt;eta</title>
 <path fill="none" stroke="#000000" d="M80.16,-62.85C98.12,-53.22 123.43,-39.65 143.39,-28.95"/>
 <polygon fill="#000000" stroke="#000000" points="145.26,-31.92 152.41,-24.11 141.95,-25.75 145.26,-31.92"/>
 </g>
diff --git a/docs/proc/whm_drift_pl.html b/docs/proc/whm_drift_pl.html
index f601cc9b4..5852337f3 100644
--- a/docs/proc/whm_drift_pl.html
+++ b/docs/proc/whm_drift_pl.html
@@ -323,27 +323,27 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="73,-45 0,-45 0,-21 73,-21 73,-45"/>
 <text text-anchor="middle" x="36.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_drift_pl</text>
 </g>
-<!-- drift_all -->
+<!-- util_exit -->
 <g id="proc~~whm_drift_pl~~CallsGraph_node2" class="node">
-<title>drift_all</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="163,-66 109,-66 109,-42 163,-42 163,-66"/>
-<text text-anchor="middle" x="136" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
+<text text-anchor="middle" x="136" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_drift_pl&#45;&gt;drift_all -->
-<g id="proc~~whm_drift_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_drift_pl&#45;&gt;drift_all</title>
+<!-- proc~whm_drift_pl&#45;&gt;util_exit -->
+<g id="proc~~whm_drift_pl~~CallsGraph_edge1" class="edge">
+<title>proc~whm_drift_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M73.25,-40.7C81.6,-42.5 90.49,-44.41 98.85,-46.21"/>
 <polygon fill="#000000" stroke="#000000" points="98.21,-49.66 108.72,-48.34 99.68,-42.81 98.21,-49.66"/>
 </g>
-<!-- util_exit -->
+<!-- drift_all -->
 <g id="proc~~whm_drift_pl~~CallsGraph_node3" class="node">
-<title>util_exit</title>
+<title>drift_all</title>
 <polygon fill="#777777" stroke="#777777" points="163,-24 109,-24 109,0 163,0 163,-24"/>
-<text text-anchor="middle" x="136" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<text text-anchor="middle" x="136" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift_all</text>
 </g>
-<!-- proc~whm_drift_pl&#45;&gt;util_exit -->
-<g id="proc~~whm_drift_pl~~CallsGraph_edge1" class="edge">
-<title>proc~whm_drift_pl&#45;&gt;util_exit</title>
+<!-- proc~whm_drift_pl&#45;&gt;drift_all -->
+<g id="proc~~whm_drift_pl~~CallsGraph_edge2" class="edge">
+<title>proc~whm_drift_pl&#45;&gt;drift_all</title>
 <path fill="none" stroke="#000000" d="M73.25,-25.3C81.6,-23.5 90.49,-21.59 98.85,-19.79"/>
 <polygon fill="#000000" stroke="#000000" points="99.68,-23.19 108.72,-17.66 98.21,-16.34 99.68,-23.19"/>
 </g>
diff --git a/docs/proc/whm_gr_kick_getacch_pl.html b/docs/proc/whm_gr_kick_getacch_pl.html
index 24f90cb90..68b1afedd 100644
--- a/docs/proc/whm_gr_kick_getacch_pl.html
+++ b/docs/proc/whm_gr_kick_getacch_pl.html
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-module subroutine whm_gr_kick_getacch_pl(self, param)
+pure module subroutine whm_gr_kick_getacch_pl(self, param)
     
     
    <a href='../interface/whm_gr_kick_getacch_pl.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/proc/whm_gr_kick_getacch_tp.html b/docs/proc/whm_gr_kick_getacch_tp.html
index a5802674d..097b9ffb7 100644
--- a/docs/proc/whm_gr_kick_getacch_tp.html
+++ b/docs/proc/whm_gr_kick_getacch_tp.html
@@ -203,7 +203,7 @@ <h3>Contents</h3>
     
     <div class="col-md-9" id='text'>
     <h2>
-module subroutine whm_gr_kick_getacch_tp(self, param)
+pure module subroutine whm_gr_kick_getacch_tp(self, param)
     
     
    <a href='../interface/whm_gr_kick_getacch_tp.html'><button type="button" class="btn btn-info depwarn">Interface &rarr;</button></a>
diff --git a/docs/proc/whm_kick_getacch_ah0.html b/docs/proc/whm_kick_getacch_ah0.html
index f3d66e662..3524bb8d4 100644
--- a/docs/proc/whm_kick_getacch_ah0.html
+++ b/docs/proc/whm_kick_getacch_ah0.html
@@ -314,65 +314,65 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="none" stroke="black" points="435,-45 308,-45 308,-21 435,-21 435,-45"/>
 <text text-anchor="middle" x="371.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_kick_getacch_ah0</text>
 </g>
-<!-- proc~whm_kick_getacch_pl -->
+<!-- proc~whm_kick_getacch_tp -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_node2" class="node">
-<title>proc~whm_kick_getacch_pl</title>
-<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node2"><a xlink:href=".././proc/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
-<polygon fill="#d9534f" stroke="#d9534f" points="271.5,-66 154.5,-66 154.5,-42 271.5,-42 271.5,-66"/>
-<text text-anchor="middle" x="213" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
+<title>proc~whm_kick_getacch_tp</title>
+<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node2"><a xlink:href=".././proc/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
+<polygon fill="#d9534f" stroke="#d9534f" points="272,-66 154,-66 154,-42 272,-42 272,-66"/>
+<text text-anchor="middle" x="213" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0 -->
+<!-- proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0 -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_edge1" class="edge">
-<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0</title>
-<path fill="none" stroke="#000000" d="M271.83,-46.24C280.28,-45.11 289.07,-43.93 297.77,-42.76"/>
-<polygon fill="#000000" stroke="#000000" points="298.47,-46.2 307.91,-41.4 297.54,-39.26 298.47,-46.2"/>
+<title>proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0</title>
+<path fill="none" stroke="#000000" d="M272.27,-46.18C280.64,-45.06 289.34,-43.89 297.95,-42.74"/>
+<polygon fill="#000000" stroke="#000000" points="298.53,-46.19 307.98,-41.39 297.6,-39.25 298.53,-46.19"/>
 </g>
-<!-- proc~whm_kick_getacch_tp -->
+<!-- proc~whm_kick_getacch_pl -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_node3" class="node">
-<title>proc~whm_kick_getacch_tp</title>
-<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node3"><a xlink:href=".././proc/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
-<polygon fill="#d9534f" stroke="#d9534f" points="272,-24 154,-24 154,0 272,0 272,-24"/>
-<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
+<title>proc~whm_kick_getacch_pl</title>
+<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node3"><a xlink:href=".././proc/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
+<polygon fill="#d9534f" stroke="#d9534f" points="271.5,-24 154.5,-24 154.5,0 271.5,0 271.5,-24"/>
+<text text-anchor="middle" x="213" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0 -->
+<!-- proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0 -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_edge2" class="edge">
-<title>proc~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_ah0</title>
-<path fill="none" stroke="#000000" d="M272.27,-19.82C280.64,-20.94 289.34,-22.11 297.95,-23.26"/>
-<polygon fill="#000000" stroke="#000000" points="297.6,-26.75 307.98,-24.61 298.53,-19.81 297.6,-26.75"/>
+<title>proc~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_ah0</title>
+<path fill="none" stroke="#000000" d="M271.83,-19.76C280.28,-20.89 289.07,-22.07 297.77,-23.24"/>
+<polygon fill="#000000" stroke="#000000" points="297.54,-26.74 307.91,-24.6 298.47,-19.8 297.54,-26.74"/>
 </g>
-<!-- interface~whm_kick_getacch_tp -->
+<!-- interface~whm_kick_getacch_pl -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_node4" class="node">
-<title>interface~whm_kick_getacch_tp</title>
-<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node4"><a xlink:href=".././interface/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
-<polygon fill="#a7506f" stroke="#a7506f" points="118,-24 0,-24 0,0 118,0 118,-24"/>
-<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
+<title>interface~whm_kick_getacch_pl</title>
+<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node4"><a xlink:href=".././interface/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
+<polygon fill="#a7506f" stroke="#a7506f" points="117.5,-24 0.5,-24 0.5,0 117.5,0 117.5,-24"/>
+<text text-anchor="middle" x="59" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp -->
+<!-- interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_edge4" class="edge">
-<title>interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-12C126.61,-12 135.17,-12 143.62,-12"/>
-<polygon fill="#000000" stroke="#000000" points="143.82,-15.5 153.82,-12 143.82,-8.5 143.82,-15.5"/>
+<title>interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M117.9,-12C126.46,-12 135.35,-12 144.09,-12"/>
+<polygon fill="#000000" stroke="#000000" points="144.26,-15.5 154.26,-12 144.26,-8.5 144.26,-15.5"/>
 </g>
-<!-- interface~whm_kick_getacch_pl -->
+<!-- interface~whm_kick_getacch_tp -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_node5" class="node">
-<title>interface~whm_kick_getacch_pl</title>
-<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node5"><a xlink:href=".././interface/whm_kick_getacch_pl.html" xlink:title="whm_kick_getacch_pl">
-<polygon fill="#a7506f" stroke="#a7506f" points="117.5,-66 0.5,-66 0.5,-42 117.5,-42 117.5,-66"/>
-<text text-anchor="middle" x="59" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_pl</text>
+<title>interface~whm_kick_getacch_tp</title>
+<g id="a_proc~~whm_kick_getacch_ah0~~CalledByGraph_node5"><a xlink:href=".././interface/whm_kick_getacch_tp.html" xlink:title="whm_kick_getacch_tp">
+<polygon fill="#a7506f" stroke="#a7506f" points="118,-66 0,-66 0,-42 118,-42 118,-66"/>
+<text text-anchor="middle" x="59" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick_getacch_tp</text>
 </a>
 </g>
 </g>
-<!-- interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl -->
+<!-- interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp -->
 <g id="proc~~whm_kick_getacch_ah0~~CalledByGraph_edge3" class="edge">
-<title>interface~whm_kick_getacch_pl&#45;&gt;proc~whm_kick_getacch_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M117.9,-54C126.46,-54 135.35,-54 144.09,-54"/>
-<polygon fill="#000000" stroke="#000000" points="144.26,-57.5 154.26,-54 144.26,-50.5 144.26,-57.5"/>
+<title>interface~whm_kick_getacch_tp&#45;&gt;proc~whm_kick_getacch_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M118.33,-54C126.61,-54 135.17,-54 143.62,-54"/>
+<polygon fill="#000000" stroke="#000000" points="143.82,-57.5 153.82,-54 143.82,-50.5 143.82,-57.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/whm_setup_pl.html b/docs/proc/whm_setup_pl.html
index bf3e24f94..fb7ad0caf 100644
--- a/docs/proc/whm_setup_pl.html
+++ b/docs/proc/whm_setup_pl.html
@@ -253,7 +253,7 @@ <h3>Arguments</h3>
   
 <tr>
   
-  <td><span class="anchor" id="variable-n~17"></span>integer(kind=I4B),</td>
+  <td><span class="anchor" id="variable-n~19"></span>integer(kind=I4B),</td>
   <td>intent(in)</td>
   <td></td>
   
diff --git a/docs/proc/whm_util_append_pl.html b/docs/proc/whm_util_append_pl.html
index fd0736690..9a90678c4 100644
--- a/docs/proc/whm_util_append_pl.html
+++ b/docs/proc/whm_util_append_pl.html
@@ -308,17 +308,17 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="111,-66 0,-66 0,-42 111,-42 111,-66"/>
 <text text-anchor="middle" x="55.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_util_append_pl</text>
 </g>
-<!-- util_append -->
+<!-- util_exit -->
 <g id="proc~~whm_util_append_pl~~CallsGraph_node2" class="node">
-<title>util_append</title>
-<polygon fill="#777777" stroke="#777777" points="222,-108 154,-108 154,-84 222,-84 222,-108"/>
-<text text-anchor="middle" x="188" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="215,-108 161,-108 161,-84 215,-84 215,-108"/>
+<text text-anchor="middle" x="188" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_util_append_pl&#45;&gt;util_append -->
+<!-- proc~whm_util_append_pl&#45;&gt;util_exit -->
 <g id="proc~~whm_util_append_pl~~CallsGraph_edge1" class="edge">
-<title>proc~whm_util_append_pl&#45;&gt;util_append</title>
-<path fill="none" stroke="#000000" d="M93.9,-66.04C109.49,-71.05 127.69,-76.91 143.85,-82.11"/>
-<polygon fill="#000000" stroke="#000000" points="143.01,-85.52 153.6,-85.25 145.16,-78.86 143.01,-85.52"/>
+<title>proc~whm_util_append_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M93.9,-66.04C111.78,-71.79 133.09,-78.65 150.81,-84.35"/>
+<polygon fill="#000000" stroke="#000000" points="150.19,-87.83 160.78,-87.56 152.33,-81.17 150.19,-87.83"/>
 </g>
 <!-- util_append_pl -->
 <g id="proc~~whm_util_append_pl~~CallsGraph_node3" class="node">
@@ -327,22 +327,22 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="188" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append_pl</text>
 </g>
 <!-- proc~whm_util_append_pl&#45;&gt;util_append_pl -->
-<g id="proc~~whm_util_append_pl~~CallsGraph_edge3" class="edge">
+<g id="proc~~whm_util_append_pl~~CallsGraph_edge2" class="edge">
 <title>proc~whm_util_append_pl&#45;&gt;util_append_pl</title>
 <path fill="none" stroke="#000000" d="M111.09,-54C119.63,-54 128.42,-54 136.85,-54"/>
 <polygon fill="#000000" stroke="#000000" points="136.93,-57.5 146.93,-54 136.93,-50.5 136.93,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_append -->
 <g id="proc~~whm_util_append_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="215,-24 161,-24 161,0 215,0 215,-24"/>
-<text text-anchor="middle" x="188" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_append</title>
+<polygon fill="#777777" stroke="#777777" points="222,-24 154,-24 154,0 222,0 222,-24"/>
+<text text-anchor="middle" x="188" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append</text>
 </g>
-<!-- proc~whm_util_append_pl&#45;&gt;util_exit -->
-<g id="proc~~whm_util_append_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_util_append_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M93.9,-41.96C111.78,-36.21 133.09,-29.35 150.81,-23.65"/>
-<polygon fill="#000000" stroke="#000000" points="152.33,-26.83 160.78,-20.44 150.19,-20.17 152.33,-26.83"/>
+<!-- proc~whm_util_append_pl&#45;&gt;util_append -->
+<g id="proc~~whm_util_append_pl~~CallsGraph_edge3" class="edge">
+<title>proc~whm_util_append_pl&#45;&gt;util_append</title>
+<path fill="none" stroke="#000000" d="M93.9,-41.96C109.49,-36.95 127.69,-31.09 143.85,-25.89"/>
+<polygon fill="#000000" stroke="#000000" points="145.16,-29.14 153.6,-22.75 143.01,-22.48 145.16,-29.14"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/whm_util_fill_pl.html b/docs/proc/whm_util_fill_pl.html
index 4fb014762..1f6294ec9 100644
--- a/docs/proc/whm_util_fill_pl.html
+++ b/docs/proc/whm_util_fill_pl.html
@@ -308,17 +308,17 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="85,-66 0,-66 0,-42 85,-42 85,-66"/>
 <text text-anchor="middle" x="42.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_util_fill_pl</text>
 </g>
-<!-- util_fill_pl -->
+<!-- util_exit -->
 <g id="proc~~whm_util_fill_pl~~CallsGraph_node2" class="node">
-<title>util_fill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="177,-108 121,-108 121,-84 177,-84 177,-108"/>
-<text text-anchor="middle" x="149" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="176,-108 122,-108 122,-84 176,-84 176,-108"/>
+<text text-anchor="middle" x="149" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_util_fill_pl&#45;&gt;util_fill_pl -->
+<!-- proc~whm_util_fill_pl&#45;&gt;util_exit -->
 <g id="proc~~whm_util_fill_pl~~CallsGraph_edge1" class="edge">
-<title>proc~whm_util_fill_pl&#45;&gt;util_fill_pl</title>
-<path fill="none" stroke="#000000" d="M73.45,-66.04C85.25,-70.78 98.92,-76.27 111.31,-81.25"/>
-<polygon fill="#000000" stroke="#000000" points="110.32,-84.63 120.91,-85.11 112.93,-78.13 110.32,-84.63"/>
+<title>proc~whm_util_fill_pl&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M73.45,-66.04C85.65,-70.94 99.86,-76.65 112.58,-81.76"/>
+<polygon fill="#000000" stroke="#000000" points="111.37,-85.05 121.96,-85.53 113.98,-78.56 111.37,-85.05"/>
 </g>
 <!-- util_fill -->
 <g id="proc~~whm_util_fill_pl~~CallsGraph_node3" class="node">
@@ -327,22 +327,22 @@ <h3 class="panel-title">Calls</h3>
 <text text-anchor="middle" x="149" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill</text>
 </g>
 <!-- proc~whm_util_fill_pl&#45;&gt;util_fill -->
-<g id="proc~~whm_util_fill_pl~~CallsGraph_edge2" class="edge">
+<g id="proc~~whm_util_fill_pl~~CallsGraph_edge3" class="edge">
 <title>proc~whm_util_fill_pl&#45;&gt;util_fill</title>
 <path fill="none" stroke="#000000" d="M85.1,-54C93.92,-54 103.17,-54 111.77,-54"/>
 <polygon fill="#000000" stroke="#000000" points="111.87,-57.5 121.87,-54 111.87,-50.5 111.87,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_fill_pl -->
 <g id="proc~~whm_util_fill_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="176,-24 122,-24 122,0 176,0 176,-24"/>
-<text text-anchor="middle" x="149" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_fill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="177,-24 121,-24 121,0 177,0 177,-24"/>
+<text text-anchor="middle" x="149" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill_pl</text>
 </g>
-<!-- proc~whm_util_fill_pl&#45;&gt;util_exit -->
-<g id="proc~~whm_util_fill_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_util_fill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M73.45,-41.96C85.65,-37.06 99.86,-31.35 112.58,-26.24"/>
-<polygon fill="#000000" stroke="#000000" points="113.98,-29.44 121.96,-22.47 111.37,-22.95 113.98,-29.44"/>
+<!-- proc~whm_util_fill_pl&#45;&gt;util_fill_pl -->
+<g id="proc~~whm_util_fill_pl~~CallsGraph_edge2" class="edge">
+<title>proc~whm_util_fill_pl&#45;&gt;util_fill_pl</title>
+<path fill="none" stroke="#000000" d="M73.45,-41.96C85.25,-37.22 98.92,-31.73 111.31,-26.75"/>
+<polygon fill="#000000" stroke="#000000" points="112.93,-29.87 120.91,-22.89 110.32,-23.37 112.93,-29.87"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/whm_util_resize_pl.html b/docs/proc/whm_util_resize_pl.html
index 6610827f3..e27f178c7 100644
--- a/docs/proc/whm_util_resize_pl.html
+++ b/docs/proc/whm_util_resize_pl.html
@@ -291,29 +291,29 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="103,-45 0,-45 0,-21 103,-21 103,-45"/>
 <text text-anchor="middle" x="51.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_util_resize_pl</text>
 </g>
-<!-- util_resize -->
+<!-- util_resize_pl -->
 <g id="proc~~whm_util_resize_pl~~CallsGraph_node2" class="node">
-<title>util_resize</title>
-<polygon fill="#777777" stroke="#777777" points="207,-66 146,-66 146,-42 207,-42 207,-66"/>
-<text text-anchor="middle" x="176.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
+<title>util_resize_pl</title>
+<polygon fill="#777777" stroke="#777777" points="214,-66 139,-66 139,-42 214,-42 214,-66"/>
+<text text-anchor="middle" x="176.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
 </g>
-<!-- proc~whm_util_resize_pl&#45;&gt;util_resize -->
+<!-- proc~whm_util_resize_pl&#45;&gt;util_resize_pl -->
 <g id="proc~~whm_util_resize_pl~~CallsGraph_edge1" class="edge">
-<title>proc~whm_util_resize_pl&#45;&gt;util_resize</title>
-<path fill="none" stroke="#000000" d="M103.24,-41.66C114.06,-43.51 125.34,-45.44 135.68,-47.2"/>
-<polygon fill="#000000" stroke="#000000" points="135.21,-50.67 145.65,-48.9 136.39,-43.77 135.21,-50.67"/>
+<title>proc~whm_util_resize_pl&#45;&gt;util_resize_pl</title>
+<path fill="none" stroke="#000000" d="M103.24,-41.66C111.71,-43.11 120.46,-44.6 128.82,-46.03"/>
+<polygon fill="#000000" stroke="#000000" points="128.33,-49.5 138.78,-47.73 129.51,-42.6 128.33,-49.5"/>
 </g>
-<!-- util_resize_pl -->
+<!-- util_resize -->
 <g id="proc~~whm_util_resize_pl~~CallsGraph_node3" class="node">
-<title>util_resize_pl</title>
-<polygon fill="#777777" stroke="#777777" points="214,-24 139,-24 139,0 214,0 214,-24"/>
-<text text-anchor="middle" x="176.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize_pl</text>
+<title>util_resize</title>
+<polygon fill="#777777" stroke="#777777" points="207,-24 146,-24 146,0 207,0 207,-24"/>
+<text text-anchor="middle" x="176.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize</text>
 </g>
-<!-- proc~whm_util_resize_pl&#45;&gt;util_resize_pl -->
+<!-- proc~whm_util_resize_pl&#45;&gt;util_resize -->
 <g id="proc~~whm_util_resize_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_util_resize_pl&#45;&gt;util_resize_pl</title>
-<path fill="none" stroke="#000000" d="M103.24,-24.34C111.71,-22.89 120.46,-21.4 128.82,-19.97"/>
-<polygon fill="#000000" stroke="#000000" points="129.51,-23.4 138.78,-18.27 128.33,-16.5 129.51,-23.4"/>
+<title>proc~whm_util_resize_pl&#45;&gt;util_resize</title>
+<path fill="none" stroke="#000000" d="M103.24,-24.34C114.06,-22.49 125.34,-20.56 135.68,-18.8"/>
+<polygon fill="#000000" stroke="#000000" points="136.39,-22.23 145.65,-17.1 135.21,-15.33 136.39,-22.23"/>
 </g>
 </g>
 </svg>
diff --git a/docs/proc/whm_util_spill_pl.html b/docs/proc/whm_util_spill_pl.html
index 04a8f6890..9897059ec 100644
--- a/docs/proc/whm_util_spill_pl.html
+++ b/docs/proc/whm_util_spill_pl.html
@@ -322,41 +322,41 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="93,-66 0,-66 0,-42 93,-42 93,-66"/>
 <text text-anchor="middle" x="46.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_util_spill_pl</text>
 </g>
-<!-- util_spill -->
+<!-- util_exit -->
 <g id="proc~~whm_util_spill_pl~~CallsGraph_node2" class="node">
-<title>util_spill</title>
+<title>util_exit</title>
 <polygon fill="#777777" stroke="#777777" points="188,-108 134,-108 134,-84 188,-84 188,-108"/>
-<text text-anchor="middle" x="161" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
+<text text-anchor="middle" x="161" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_spill -->
+<!-- proc~whm_util_spill_pl&#45;&gt;util_exit -->
 <g id="proc~~whm_util_spill_pl~~CallsGraph_edge1" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_spill</title>
+<title>proc~whm_util_spill_pl&#45;&gt;util_exit</title>
 <path fill="none" stroke="#000000" d="M79.74,-66.04C93.67,-71.24 110.01,-77.34 124.3,-82.67"/>
 <polygon fill="#000000" stroke="#000000" points="123.22,-86.01 133.81,-86.22 125.67,-79.45 123.22,-86.01"/>
 </g>
-<!-- util_spill_pl -->
+<!-- util_spill -->
 <g id="proc~~whm_util_spill_pl~~CallsGraph_node3" class="node">
-<title>util_spill_pl</title>
-<polygon fill="#777777" stroke="#777777" points="193,-66 129,-66 129,-42 193,-42 193,-66"/>
-<text text-anchor="middle" x="161" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
+<title>util_spill</title>
+<polygon fill="#777777" stroke="#777777" points="188,-66 134,-66 134,-42 188,-42 188,-66"/>
+<text text-anchor="middle" x="161" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill</text>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_spill_pl -->
+<!-- proc~whm_util_spill_pl&#45;&gt;util_spill -->
 <g id="proc~~whm_util_spill_pl~~CallsGraph_edge2" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_spill_pl</title>
-<path fill="none" stroke="#000000" d="M93.26,-54C101.64,-54 110.35,-54 118.59,-54"/>
-<polygon fill="#000000" stroke="#000000" points="118.74,-57.5 128.74,-54 118.74,-50.5 118.74,-57.5"/>
+<title>proc~whm_util_spill_pl&#45;&gt;util_spill</title>
+<path fill="none" stroke="#000000" d="M93.26,-54C103.44,-54 114.11,-54 123.84,-54"/>
+<polygon fill="#000000" stroke="#000000" points="123.98,-57.5 133.98,-54 123.98,-50.5 123.98,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- util_spill_pl -->
 <g id="proc~~whm_util_spill_pl~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="188,-24 134,-24 134,0 188,0 188,-24"/>
-<text text-anchor="middle" x="161" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>util_spill_pl</title>
+<polygon fill="#777777" stroke="#777777" points="193,-24 129,-24 129,0 193,0 193,-24"/>
+<text text-anchor="middle" x="161" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill_pl</text>
 </g>
-<!-- proc~whm_util_spill_pl&#45;&gt;util_exit -->
+<!-- proc~whm_util_spill_pl&#45;&gt;util_spill_pl -->
 <g id="proc~~whm_util_spill_pl~~CallsGraph_edge3" class="edge">
-<title>proc~whm_util_spill_pl&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M79.74,-41.96C93.67,-36.76 110.01,-30.66 124.3,-25.33"/>
-<polygon fill="#000000" stroke="#000000" points="125.67,-28.55 133.81,-21.78 123.22,-21.99 125.67,-28.55"/>
+<title>proc~whm_util_spill_pl&#45;&gt;util_spill_pl</title>
+<path fill="none" stroke="#000000" d="M79.74,-41.96C92.05,-37.37 106.26,-32.06 119.26,-27.21"/>
+<polygon fill="#000000" stroke="#000000" points="120.78,-30.38 128.92,-23.6 118.33,-23.82 120.78,-30.38"/>
 </g>
 </g>
 </svg>
diff --git a/docs/program/swiftest_driver.html b/docs/program/swiftest_driver.html
index b4857e201..b4dc58760 100644
--- a/docs/program/swiftest_driver.html
+++ b/docs/program/swiftest_driver.html
@@ -257,241 +257,286 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: program~~swiftest_driver~~UsesGraph Pages: 1 -->
-<svg id="programswiftest_driverUsesGraph" width="641pt" height="208pt"
- viewBox="0.00 0.00 641.00 208.27" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="program~~swiftest_driver~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 298.17)">
+<svg id="programswiftest_driverUsesGraph" width="641pt" height="254pt"
+ viewBox="0.00 0.00 641.00 254.39" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="program~~swiftest_driver~~UsesGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 365.08)">
 <title>program~~swiftest_driver~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-298.17 926,-298.17 926,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.08 926,-365.08 926,4 -4,4"/>
 <!-- program~swiftest_driver -->
 <g id="program~~swiftest_driver~~UsesGraph_node1" class="node">
 <title>program~swiftest_driver</title>
-<polygon fill="none" stroke="black" points="922,-142 841,-142 841,-118 922,-118 922,-142"/>
-<text text-anchor="middle" x="881.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_driver</text>
+<polygon fill="none" stroke="black" points="922,-104 841,-104 841,-80 922,-80 922,-104"/>
+<text text-anchor="middle" x="881.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_driver</text>
 </g>
 <!-- module~swiftest -->
 <g id="program~~swiftest_driver~~UsesGraph_node2" class="node">
 <title>module~swiftest</title>
 <g id="a_program~~swiftest_driver~~UsesGraph_node2"><a xlink:href=".././module/swiftest.html" xlink:title="swiftest">
-<polygon fill="#337ab7" stroke="#337ab7" points="805,-142 751,-142 751,-118 805,-118 805,-142"/>
-<text text-anchor="middle" x="778" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="805,-104 751,-104 751,-80 805,-80 805,-104"/>
+<text text-anchor="middle" x="778" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest</text>
 </a>
 </g>
 </g>
 <!-- program~swiftest_driver&#45;&gt;module~swiftest -->
 <g id="program~~swiftest_driver~~UsesGraph_edge1" class="edge">
 <title>program~swiftest_driver&#45;&gt;module~swiftest</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.97,-130C832.51,-130 823.62,-130 815.3,-130"/>
-<polygon fill="#000000" stroke="#000000" points="815.13,-126.5 805.13,-130 815.13,-133.5 815.13,-126.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.97,-92C832.51,-92 823.62,-92 815.3,-92"/>
+<polygon fill="#000000" stroke="#000000" points="815.13,-88.5 805.13,-92 815.13,-95.5 815.13,-88.5"/>
 </g>
-<!-- module~swiftest_operators -->
+<!-- module~whm_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_node3" class="node">
-<title>module~swiftest_operators</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node3"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
-<polygon fill="#337ab7" stroke="#337ab7" points="347,-260 247,-260 247,-236 347,-236 347,-260"/>
-<text text-anchor="middle" x="297" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
+<title>module~whm_classes</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node3"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="467,-260 391,-260 391,-236 467,-236 467,-260"/>
+<text text-anchor="middle" x="429" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
+<!-- module~swiftest&#45;&gt;module~whm_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_edge2" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-288C398.02,-282.17 365.15,-272.02 339.97,-263.41"/>
-<polygon fill="#000000" stroke="#000000" points="340.96,-260.05 330.37,-260.07 338.66,-266.66 340.96,-260.05"/>
+<title>module~swiftest&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-278C522.76,-276.93 494.78,-270.13 472.48,-263.27"/>
+<polygon fill="#000000" stroke="#000000" points="473.25,-259.85 462.66,-260.14 471.12,-266.51 473.25,-259.85"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C622.83,-303.78 602.9,-280.17 550.5,-278"/>
 </g>
-<!-- module~rmvs_classes -->
+<!-- module~swiftest_operators -->
 <g id="program~~swiftest_driver~~UsesGraph_node4" class="node">
-<title>module~rmvs_classes</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node4"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="588,-182 511,-182 511,-158 588,-158 588,-182"/>
-<text text-anchor="middle" x="549.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
+<title>module~swiftest_operators</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node4"><a xlink:href=".././module/swiftest_operators.html" xlink:title="swiftest_operators">
+<polygon fill="#337ab7" stroke="#337ab7" points="347,-280 247,-280 247,-256 347,-256 347,-280"/>
+<text text-anchor="middle" x="297" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_operators -->
 <g id="program~~swiftest_driver~~UsesGraph_edge3" class="edge">
-<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-130C637.51,-130 604.25,-142.53 580.97,-153.56"/>
-<polygon fill="#000000" stroke="#000000" points="579.37,-150.44 571.94,-158 582.46,-156.73 579.37,-150.44"/>
+<title>module~swiftest&#45;&gt;module~swiftest_operators</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-278C483.2,-275.3 408.32,-272.32 357.57,-270.33"/>
+<polygon fill="#000000" stroke="#000000" points="357.56,-266.82 347.43,-269.93 357.29,-273.82 357.56,-266.82"/>
 </g>
-<!-- module~fraggle_classes -->
+<!-- module~symba_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_node5" class="node">
-<title>module~fraggle_classes</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node5"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-260 385.5,-260 385.5,-236 472.5,-236 472.5,-260"/>
-<text text-anchor="middle" x="429" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
+<title>module~symba_classes</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node5"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="712,-144 627,-144 627,-120 712,-120 712,-144"/>
+<text text-anchor="middle" x="669.5" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge4" class="edge">
-<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.97,-142.04C742.33,-180.36 652.76,-296.43 550.5,-288"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-288C516.44,-291.48 481.69,-277.45 458.16,-265.07"/>
-<polygon fill="#000000" stroke="#000000" points="459.56,-261.84 449.12,-260.09 456.19,-267.98 459.56,-261.84"/>
+<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<g id="program~~swiftest_driver~~UsesGraph_edge5" class="edge">
+<title>module~swiftest&#45;&gt;module~symba_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-101.79C739.37,-106.13 725.44,-111.37 712.45,-116.24"/>
+<polygon fill="#000000" stroke="#000000" points="710.89,-113.09 702.76,-119.88 713.35,-119.64 710.89,-113.09"/>
 </g>
 <!-- module~helio_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_node6" class="node">
 <title>module~helio_classes</title>
 <g id="a_program~~swiftest_driver~~UsesGraph_node6"><a xlink:href=".././module/helio_classes.html" xlink:title="helio_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-102 511.5,-102 511.5,-78 587.5,-78 587.5,-102"/>
-<text text-anchor="middle" x="549.5" y="-87.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="587.5,-250 511.5,-250 511.5,-226 587.5,-226 587.5,-250"/>
+<text text-anchor="middle" x="549.5" y="-235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes</text>
 </a>
 </g>
 </g>
 <!-- module~swiftest&#45;&gt;module~helio_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge5" class="edge">
+<g id="program~~swiftest_driver~~UsesGraph_edge4" class="edge">
 <title>module~swiftest&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.74,-130C729.18,-130 697.86,-130 670.5,-130"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-130C637.51,-130 604.25,-117.47 580.97,-106.44"/>
-<polygon fill="#000000" stroke="#000000" points="582.46,-103.27 571.94,-102 579.37,-109.56 582.46,-103.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C653.54,-286.44 611.73,-269.02 582.14,-254.57"/>
+<polygon fill="#000000" stroke="#000000" points="583.52,-251.35 573.01,-250.02 580.4,-257.61 583.52,-251.35"/>
 </g>
-<!-- module~whm_classes -->
+<!-- module~fraggle_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_node7" class="node">
-<title>module~whm_classes</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node7"><a xlink:href=".././module/whm_classes.html" xlink:title="whm_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="467,-142 391,-142 391,-118 467,-118 467,-142"/>
-<text text-anchor="middle" x="429" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes</text>
+<title>module~fraggle_classes</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node7"><a xlink:href=".././module/fraggle_classes.html" xlink:title="fraggle_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="472.5,-104 385.5,-104 385.5,-80 472.5,-80 472.5,-104"/>
+<text text-anchor="middle" x="429" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~whm_classes -->
+<!-- module~swiftest&#45;&gt;module~fraggle_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_edge6" class="edge">
-<title>module~swiftest&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-130C602.15,-130 525.42,-130 477.3,-130"/>
-<polygon fill="#000000" stroke="#000000" points="477.18,-126.5 467.18,-130 477.18,-133.5 477.18,-126.5"/>
+<title>module~swiftest&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.92,-92C694.17,-92 558.52,-92 483.02,-92"/>
+<polygon fill="#000000" stroke="#000000" points="482.77,-88.5 472.77,-92 482.77,-95.5 482.77,-88.5"/>
 </g>
-<!-- module~swiftest_globals -->
+<!-- module~lambda_function -->
 <g id="program~~swiftest_driver~~UsesGraph_node8" class="node">
-<title>module~swiftest_globals</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node8"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
-<polygon fill="#337ab7" stroke="#337ab7" points="211,-220 123,-220 123,-196 211,-196 211,-220"/>
-<text text-anchor="middle" x="167" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
+<title>module~lambda_function</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node8"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
+<polygon fill="#337ab7" stroke="#337ab7" points="715,-64 624,-64 624,-40 715,-40 715,-64"/>
+<text text-anchor="middle" x="669.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
+<!-- module~swiftest&#45;&gt;module~lambda_function -->
 <g id="program~~swiftest_driver~~UsesGraph_edge7" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-288C348.6,-272.57 322.08,-299.08 247,-269 223.79,-259.7 201.65,-241.51 186.74,-227.4"/>
-<polygon fill="#000000" stroke="#000000" points="188.84,-224.56 179.25,-220.06 183.95,-229.56 188.84,-224.56"/>
+<title>module~swiftest&#45;&gt;module~lambda_function</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-82.21C739.37,-77.87 725.44,-72.63 712.45,-67.76"/>
+<polygon fill="#000000" stroke="#000000" points="713.35,-64.36 702.76,-64.12 710.89,-70.91 713.35,-64.36"/>
 </g>
-<!-- module~symba_classes -->
+<!-- module~swiftest_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_node9" class="node">
-<title>module~symba_classes</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node9"><a xlink:href=".././module/symba_classes.html" xlink:title="symba_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="712,-182 627,-182 627,-158 712,-158 712,-182"/>
-<text text-anchor="middle" x="669.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes</text>
+<title>module~swiftest_classes</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node9"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-144 252.5,-144 252.5,-120 341.5,-120 341.5,-144"/>
+<text text-anchor="middle" x="297" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~symba_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_edge8" class="edge">
-<title>module~swiftest&#45;&gt;module~symba_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M750.95,-139.79C739.37,-144.13 725.44,-149.37 712.45,-154.24"/>
-<polygon fill="#000000" stroke="#000000" points="710.89,-151.09 702.76,-157.88 713.35,-157.64 710.89,-151.09"/>
+<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.51,-104.14C766.62,-139.03 738.55,-239.59 670.5,-278"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C629.41,-300.07 628.09,-237.2 588,-217 510.27,-177.83 411.49,-153.73 351.59,-141.62"/>
+<polygon fill="#000000" stroke="#000000" points="352.09,-138.15 341.6,-139.64 350.73,-145.02 352.09,-138.15"/>
 </g>
-<!-- module~swiftest_classes -->
+<!-- module~rmvs_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_node10" class="node">
-<title>module~swiftest_classes</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node10"><a xlink:href=".././module/swiftest_classes.html" xlink:title="swiftest_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-180 252.5,-180 252.5,-156 341.5,-156 341.5,-180"/>
-<text text-anchor="middle" x="297" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes</text>
+<title>module~rmvs_classes</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node10"><a xlink:href=".././module/rmvs_classes.html" xlink:title="rmvs_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="588,-330 511,-330 511,-306 588,-306 588,-330"/>
+<text text-anchor="middle" x="549.5" y="-315.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~swiftest_classes -->
+<!-- module~swiftest&#45;&gt;module~rmvs_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_edge9" class="edge">
-<title>module~swiftest&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-288C496.14,-293.68 481.7,-298.05 430,-288"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-288C406.69,-283.86 398.72,-283.98 383,-269 356.24,-243.49 372.61,-220.67 347,-194 344,-190.87 340.54,-188.04 336.87,-185.5"/>
-<polygon fill="#000000" stroke="#000000" points="338.42,-182.35 328.07,-180.09 334.75,-188.31 338.42,-182.35"/>
+<title>module~swiftest&#45;&gt;module~rmvs_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C646.61,-290.36 620.28,-299.74 598.05,-306.3"/>
+<polygon fill="#000000" stroke="#000000" points="596.82,-303.01 588.16,-309.11 598.73,-309.74 596.82,-303.01"/>
 </g>
-<!-- module~lambda_function -->
+<!-- module~walltime_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_node11" class="node">
-<title>module~lambda_function</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node11"><a xlink:href=".././module/lambda_function.html" xlink:title="lambda_function">
-<polygon fill="#337ab7" stroke="#337ab7" points="715,-83 624,-83 624,-59 715,-59 715,-83"/>
-<text text-anchor="middle" x="669.5" y="-68.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function</text>
+<title>module~walltime_classes</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node11"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
+<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
+<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~lambda_function -->
+<!-- module~swiftest&#45;&gt;module~walltime_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_edge10" class="edge">
-<title>module~swiftest&#45;&gt;module~lambda_function</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M755.19,-117.92C739.68,-109.33 718.64,-97.67 701.4,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="702.72,-84.85 692.28,-83.07 699.33,-90.97 702.72,-84.85"/>
+<title>module~swiftest&#45;&gt;module~walltime_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M768.82,-79.79C758.31,-65.24 738.56,-41.57 715,-31 640.85,2.29 544.82,0.74 485.32,-4.69"/>
+<polygon fill="#000000" stroke="#000000" points="484.62,-1.24 475.01,-5.7 485.31,-8.2 484.62,-1.24"/>
 </g>
-<!-- module~walltime_classes -->
+<!-- module~swiftest_globals -->
 <g id="program~~swiftest_driver~~UsesGraph_node12" class="node">
-<title>module~walltime_classes</title>
-<g id="a_program~~swiftest_driver~~UsesGraph_node12"><a xlink:href=".././module/walltime_classes.html" xlink:title="walltime_classes">
-<polygon fill="#337ab7" stroke="#337ab7" points="475,-24 383,-24 383,0 475,0 475,-24"/>
-<text text-anchor="middle" x="429" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes</text>
+<title>module~swiftest_globals</title>
+<g id="a_program~~swiftest_driver~~UsesGraph_node12"><a xlink:href=".././module/swiftest_globals.html" xlink:title="swiftest_globals">
+<polygon fill="#337ab7" stroke="#337ab7" points="211,-220 123,-220 123,-196 211,-196 211,-220"/>
+<text text-anchor="middle" x="167" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals</text>
 </a>
 </g>
 </g>
-<!-- module~swiftest&#45;&gt;module~walltime_classes -->
+<!-- module~swiftest&#45;&gt;module~swiftest_globals -->
 <g id="program~~swiftest_driver~~UsesGraph_edge11" class="edge">
-<title>module~swiftest&#45;&gt;module~walltime_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.4,-117.81C762.36,-99.65 742.72,-65.95 715,-50 643.52,-8.88 545.62,-5.01 485.16,-7.43"/>
-<polygon fill="#000000" stroke="#000000" points="484.88,-3.94 475.05,-7.91 485.21,-10.93 484.88,-3.94"/>
+<title>module~swiftest&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M668.5,-278C629.61,-300.42 629.62,-322.18 588,-339 522.42,-365.5 500.59,-362.34 430,-358"/>
 </g>
-<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
+<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
+<g id="program~~swiftest_driver~~UsesGraph_edge13" class="edge">
+<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.28,-236C397.16,-231.95 389.51,-227.15 383,-222 356.27,-200.87 330.05,-171.39 313.96,-152.01"/>
+<polygon fill="#000000" stroke="#000000" points="316.55,-149.66 307.51,-144.13 311.13,-154.09 316.55,-149.66"/>
+</g>
+<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
 <g id="program~~swiftest_driver~~UsesGraph_edge12" class="edge">
-<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-236C244.68,-231.96 230.09,-227.4 216.5,-223.16"/>
-<polygon fill="#000000" stroke="#000000" points="217.41,-219.77 206.82,-220.13 215.32,-226.45 217.41,-219.77"/>
+<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.3,-235.93C375.49,-225.2 334.97,-210.78 298,-208"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<!-- module~swiftest_operators&#45;&gt;module~swiftest_globals -->
 <g id="program~~swiftest_driver~~UsesGraph_edge14" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-158C501.22,-154.04 488.01,-149.58 475.64,-145.4"/>
-<polygon fill="#000000" stroke="#000000" points="476.53,-142.01 465.94,-142.13 474.29,-148.65 476.53,-142.01"/>
+<title>module~swiftest_operators&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.1,-255.86C250.84,-246.83 224.35,-234.41 203.17,-224.49"/>
+<polygon fill="#000000" stroke="#000000" points="204.4,-221.2 193.86,-220.12 201.43,-227.54 204.4,-221.2"/>
 </g>
-<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge13" class="edge">
-<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.74,-171C476.34,-170.68 424.69,-167.09 383,-151 339.62,-134.26 341.43,-73.38 298,-90"/>
+<!-- module~symba_classes&#45;&gt;module~helio_classes -->
+<g id="program~~swiftest_driver~~UsesGraph_edge17" class="edge">
+<title>module~symba_classes&#45;&gt;module~helio_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M654.96,-144.16C634.51,-162.53 595.57,-197.51 571.45,-219.18"/>
+<polygon fill="#000000" stroke="#000000" points="568.98,-216.7 563.88,-225.98 573.66,-221.9 568.98,-216.7"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge15" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.3,-235.93C375.49,-225.2 334.97,-210.78 298,-208"/>
+<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
+<g id="program~~swiftest_driver~~UsesGraph_edge18" class="edge">
+<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.93,-133.66C604.29,-134.15 575.82,-134.09 550.5,-132"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C518.77,-129.55 486.83,-118.21 463.6,-108.23"/>
+<polygon fill="#000000" stroke="#000000" points="464.78,-104.92 454.22,-104.06 461.94,-111.32 464.78,-104.92"/>
 </g>
-<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
 <g id="program~~swiftest_driver~~UsesGraph_edge16" class="edge">
-<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.66,-235.89C398.31,-231.7 390.19,-226.84 383,-222 366.19,-210.68 364.02,-205.01 347,-194 342.2,-190.89 336.99,-187.83 331.82,-184.95"/>
-<polygon fill="#000000" stroke="#000000" points="333.12,-181.68 322.65,-180.02 329.8,-187.84 333.12,-181.68"/>
+<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C403,-130.12 375.23,-129.87 351.79,-130.19"/>
+<polygon fill="#000000" stroke="#000000" points="351.63,-126.69 341.69,-130.37 351.75,-133.69 351.63,-126.69"/>
+</g>
+<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
+<g id="program~~swiftest_driver~~UsesGraph_edge15" class="edge">
+<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-132C367.72,-127.46 352.71,-66.28 298,-92"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-132C496.01,-127.67 482.52,-135.96 430,-132"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~whm_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge19" class="edge">
+<g id="program~~swiftest_driver~~UsesGraph_edge20" class="edge">
 <title>module~helio_classes&#45;&gt;module~whm_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.95,-102C501.22,-105.96 488.01,-110.42 475.64,-114.6"/>
-<polygon fill="#000000" stroke="#000000" points="474.29,-111.35 465.94,-117.87 476.53,-117.99 474.29,-111.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.33,-241.14C500.52,-242.05 488.57,-243.06 477.23,-244.01"/>
+<polygon fill="#000000" stroke="#000000" points="476.71,-240.55 467.04,-244.87 477.3,-247.52 476.71,-240.55"/>
+</g>
+<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
+<g id="program~~swiftest_driver~~UsesGraph_edge21" class="edge">
+<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C386.89,-196.97 345.49,-169.23 320.8,-150.5"/>
+<polygon fill="#000000" stroke="#000000" points="322.84,-147.65 312.79,-144.29 318.55,-153.18 322.84,-147.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.34,-228.88C487.95,-223.07 457.16,-215.29 430,-208"/>
 </g>
 <!-- module~helio_classes&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge17" class="edge">
+<g id="program~~swiftest_driver~~UsesGraph_edge19" class="edge">
 <title>module~helio_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C370.82,-98.27 351.8,-68.94 298,-90"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.47,-87.29C488.01,-86.24 457.08,-86.08 430,-90"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-208C271.5,-206.15 244.29,-205.9 221.27,-206.21"/>
+<polygon fill="#000000" stroke="#000000" points="220.96,-202.72 211.02,-206.39 221.08,-209.72 220.96,-202.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C372.2,-193.03 355.61,-212.34 298,-208"/>
 </g>
-<!-- module~helio_classes&#45;&gt;module~swiftest_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge18" class="edge">
-<title>module~helio_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-90C384.19,-96.34 341.84,-128.01 317.94,-148.99"/>
-<polygon fill="#000000" stroke="#000000" points="315.35,-146.61 310.28,-155.91 320.04,-151.81 315.35,-146.61"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_classes -->
+<g id="program~~swiftest_driver~~UsesGraph_edge23" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389,-104C375.88,-108.04 361.06,-112.6 347.26,-116.84"/>
+<polygon fill="#000000" stroke="#000000" points="345.95,-113.58 337.43,-119.87 348.01,-120.27 345.95,-113.58"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge20" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.16,-117.93C370.04,-103.65 317.13,-82.68 298,-90"/>
+<!-- module~fraggle_classes&#45;&gt;module~swiftest_globals -->
+<g id="program~~swiftest_driver~~UsesGraph_edge22" class="edge">
+<title>module~fraggle_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M385.32,-83.12C358.94,-79.72 325.06,-79.28 298,-92"/>
 </g>
-<!-- module~whm_classes&#45;&gt;module~swiftest_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge21" class="edge">
-<title>module~whm_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.75,-140.89C377.83,-144.67 363.11,-148.97 349.26,-153.02"/>
-<polygon fill="#000000" stroke="#000000" points="347.98,-149.74 339.37,-155.91 349.95,-156.46 347.98,-149.74"/>
+<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
+<g id="program~~swiftest_driver~~UsesGraph_edge24" class="edge">
+<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.81,-47.77C551.57,-42.87 406.32,-41.08 298,-92"/>
+</g>
+<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
+<g id="program~~swiftest_driver~~UsesGraph_edge25" class="edge">
+<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.72,-144.04C254.59,-156.59 221.29,-176.36 197.3,-190.6"/>
+<polygon fill="#000000" stroke="#000000" points="195.42,-187.65 188.61,-195.76 199,-193.67 195.42,-187.65"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~whm_classes -->
+<g id="program~~swiftest_driver~~UsesGraph_edge27" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~whm_classes</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.13,-305.97C509.14,-294.75 480.6,-277.89 459.19,-265.24"/>
+<polygon fill="#000000" stroke="#000000" points="460.89,-262.18 450.5,-260.11 457.33,-268.21 460.89,-262.18"/>
+</g>
+<!-- module~rmvs_classes&#45;&gt;module~swiftest_globals -->
+<g id="program~~swiftest_driver~~UsesGraph_edge26" class="edge">
+<title>module~rmvs_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-358C342.2,-365.07 318.96,-336.26 247,-289 221.6,-272.32 198.05,-246.22 183.39,-228.18"/>
+<polygon fill="#000000" stroke="#000000" points="185.9,-225.71 176.94,-220.05 180.41,-230.06 185.9,-225.71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.2,-330.18C505.12,-342.74 465.98,-360.21 430,-358"/>
+</g>
+<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
+<g id="program~~swiftest_driver~~UsesGraph_edge28" class="edge">
+<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-92C274.86,-101.94 265.89,-97.27 247,-111 218.38,-131.8 194.2,-165.41 180.39,-187.1"/>
+<polygon fill="#000000" stroke="#000000" points="177.25,-185.52 174.96,-195.86 183.2,-189.2 177.25,-185.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.38,-24.25C398.93,-28.53 390.56,-33.42 383,-38 344.73,-61.2 338.5,-72.96 298,-92"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="program~~swiftest_driver~~UsesGraph_node13" class="node">
@@ -503,62 +548,11 @@ <h3 class="panel-title">Uses</h3>
 </g>
 </g>
 <!-- module~swiftest_globals&#45;&gt;iso_fortran_env -->
-<g id="program~~swiftest_driver~~UsesGraph_edge22" class="edge">
+<g id="program~~swiftest_driver~~UsesGraph_edge29" class="edge">
 <title>module~swiftest_globals&#45;&gt;iso_fortran_env</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M122.82,-208C114.58,-208 105.86,-208 97.36,-208"/>
 <polygon fill="#000000" stroke="#000000" points="97.13,-204.5 87.13,-208 97.13,-211.5 97.13,-204.5"/>
 </g>
-<!-- module~symba_classes&#45;&gt;module~rmvs_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge23" class="edge">
-<title>module~symba_classes&#45;&gt;module~rmvs_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.9,-170C617.64,-170 607.75,-170 598.27,-170"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-166.5 588.18,-170 598.18,-173.5 598.18,-166.5"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~fraggle_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge24" class="edge">
-<title>module~symba_classes&#45;&gt;module~fraggle_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-210C522.97,-216.11 494.97,-224.99 472.61,-232.62"/>
-<polygon fill="#000000" stroke="#000000" points="471.38,-229.34 463.08,-235.91 473.67,-235.96 471.38,-229.34"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~helio_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge25" class="edge">
-<title>module~symba_classes&#45;&gt;module~helio_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M646.49,-157.75C639.23,-153.55 631.18,-148.72 624,-144 606.9,-132.77 588.34,-119.12 574.15,-108.36"/>
-<polygon fill="#000000" stroke="#000000" points="576,-105.37 565.93,-102.07 571.75,-110.93 576,-105.37"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge26" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-208C271.5,-206.15 244.29,-205.9 221.27,-206.21"/>
-<polygon fill="#000000" stroke="#000000" points="220.96,-202.72 211.02,-206.39 221.08,-209.72 220.96,-202.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C370.42,-203.18 355.61,-212.34 298,-208"/>
-</g>
-<!-- module~symba_classes&#45;&gt;module~swiftest_classes -->
-<g id="program~~swiftest_driver~~UsesGraph_edge27" class="edge">
-<title>module~symba_classes&#45;&gt;module~swiftest_classes</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.9,-182.1C614.34,-191 580.79,-202.75 550.5,-210"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428,-208C395.45,-205.28 360.12,-193.82 334.52,-183.86"/>
-<polygon fill="#000000" stroke="#000000" points="335.79,-180.6 325.21,-180.14 333.19,-187.1 335.79,-180.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.5,-210C497.27,-222.27 482.49,-212.39 430,-208"/>
-</g>
-<!-- module~swiftest_classes&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge28" class="edge">
-<title>module~swiftest_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.6,-180C244.68,-184.04 230.09,-188.6 216.5,-192.84"/>
-<polygon fill="#000000" stroke="#000000" points="215.32,-189.55 206.82,-195.87 217.41,-196.23 215.32,-189.55"/>
-</g>
-<!-- module~lambda_function&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge29" class="edge">
-<title>module~lambda_function&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M623.84,-64.48C552.26,-55.94 408.66,-46.69 298,-90"/>
-</g>
-<!-- module~walltime_classes&#45;&gt;module~swiftest_globals -->
-<g id="program~~swiftest_driver~~UsesGraph_edge30" class="edge">
-<title>module~walltime_classes&#45;&gt;module~swiftest_globals</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-90C245.57,-109.3 203.18,-159.14 182.18,-187.48"/>
-<polygon fill="#000000" stroke="#000000" points="179.14,-185.71 176.13,-195.87 184.82,-189.81 179.14,-185.71"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.87,-24.06C399.32,-28.41 390.76,-33.39 383,-38 344.94,-60.64 339.36,-74.17 298,-90"/>
-</g>
 </g>
 </svg>
 </div><script>var panprogramswiftest_driverUsesGraph = svgPanZoom('#programswiftest_driverUsesGraph', {zoomEnabled: true,controlIconsEnabled: true, fit: true, center: true,}); </script><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
@@ -659,17 +653,17 @@ <h3 class="panel-title">Calls</h3>
 <polygon fill="none" stroke="black" points="81,-66 0,-66 0,-42 81,-42 81,-66"/>
 <text text-anchor="middle" x="40.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_driver</text>
 </g>
-<!-- setup_construct_system -->
+<!-- util_exit -->
 <g id="program~~swiftest_driver~~CallsGraph_node2" class="node">
-<title>setup_construct_system</title>
-<polygon fill="#777777" stroke="#777777" points="245,-108 117,-108 117,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="181" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
+<title>util_exit</title>
+<polygon fill="#777777" stroke="#777777" points="208,-108 154,-108 154,-84 208,-84 208,-108"/>
+<text text-anchor="middle" x="181" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
 </g>
-<!-- program~swiftest_driver&#45;&gt;setup_construct_system -->
+<!-- program~swiftest_driver&#45;&gt;util_exit -->
 <g id="program~~swiftest_driver~~CallsGraph_edge1" class="edge">
-<title>program~swiftest_driver&#45;&gt;setup_construct_system</title>
-<path fill="none" stroke="#000000" d="M81.19,-66.04C96.55,-70.69 114.29,-76.07 130.47,-80.98"/>
-<polygon fill="#000000" stroke="#000000" points="129.72,-84.41 140.31,-83.96 131.75,-77.71 129.72,-84.41"/>
+<title>program~swiftest_driver&#45;&gt;util_exit</title>
+<path fill="none" stroke="#000000" d="M81.19,-66.04C101.06,-72.06 124.94,-79.3 144.24,-85.16"/>
+<polygon fill="#000000" stroke="#000000" points="143.29,-88.53 153.88,-88.08 145.32,-81.83 143.29,-88.53"/>
 </g>
 <!-- io_get_args -->
 <g id="program~~swiftest_driver~~CallsGraph_node3" class="node">
@@ -683,17 +677,17 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#000000" d="M81.19,-54C98.43,-54 118.68,-54 136.34,-54"/>
 <polygon fill="#000000" stroke="#000000" points="136.4,-57.5 146.4,-54 136.4,-50.5 136.4,-57.5"/>
 </g>
-<!-- util_exit -->
+<!-- setup_construct_system -->
 <g id="program~~swiftest_driver~~CallsGraph_node4" class="node">
-<title>util_exit</title>
-<polygon fill="#777777" stroke="#777777" points="208,-24 154,-24 154,0 208,0 208,-24"/>
-<text text-anchor="middle" x="181" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit</text>
+<title>setup_construct_system</title>
+<polygon fill="#777777" stroke="#777777" points="245,-24 117,-24 117,0 245,0 245,-24"/>
+<text text-anchor="middle" x="181" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup_construct_system</text>
 </g>
-<!-- program~swiftest_driver&#45;&gt;util_exit -->
+<!-- program~swiftest_driver&#45;&gt;setup_construct_system -->
 <g id="program~~swiftest_driver~~CallsGraph_edge3" class="edge">
-<title>program~swiftest_driver&#45;&gt;util_exit</title>
-<path fill="none" stroke="#000000" d="M81.19,-41.96C101.06,-35.94 124.94,-28.7 144.24,-22.84"/>
-<polygon fill="#000000" stroke="#000000" points="145.32,-26.17 153.88,-19.92 143.29,-19.47 145.32,-26.17"/>
+<title>program~swiftest_driver&#45;&gt;setup_construct_system</title>
+<path fill="none" stroke="#000000" d="M81.19,-41.96C96.55,-37.31 114.29,-31.93 130.47,-27.02"/>
+<polygon fill="#000000" stroke="#000000" points="131.75,-30.29 140.31,-24.04 129.72,-23.59 131.75,-30.29"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/discard.f90.html b/docs/sourcefile/discard.f90.html
index 6f78e56a1..de67a9259 100644
--- a/docs/sourcefile/discard.f90.html
+++ b/docs/sourcefile/discard.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~discard.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilediscardf90EfferentGraph" width="641pt" height="299pt"
- viewBox="0.00 0.00 641.00 298.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~discard.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefilediscardf90EfferentGraph" width="641pt" height="246pt"
+ viewBox="0.00 0.00 641.00 246.38" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~discard.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~discard.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 889,-412.12 889,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 889,-339.24 889,4 -4,4"/>
 <!-- sourcefile~discard.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~discard.f90</title>
-<polygon fill="none" stroke="black" points="885,-133.12 820,-133.12 820,-109.12 885,-109.12 885,-133.12"/>
-<text text-anchor="middle" x="852.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">discard.f90</text>
+<polygon fill="none" stroke="black" points="885,-235.24 820,-235.24 820,-211.24 885,-211.24 885,-235.24"/>
+<text text-anchor="middle" x="852.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">discard.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~discard.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M831.4,-109.09C793.26,-87.43 707.14,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M824.6,-235.38C783.24,-252.91 701.12,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~discard.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M838.9,-133.4C822,-149.87 791.82,-179.29 771.86,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="769.22,-196.45 764.5,-205.93 774.1,-201.46 769.22,-196.45"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M821.65,-211.24C812.19,-207.43 801.58,-203.17 791.56,-199.14"/>
+<polygon fill="#000000" stroke="#000000" points="792.76,-195.85 782.18,-195.37 790.15,-202.35 792.76,-195.85"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~discard.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~discard.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~discard.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~discard.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~discard.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~discard.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~discard.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/drift.f90.html b/docs/sourcefile/drift.f90.html
index 3f8c17407..3224a8b4c 100644
--- a/docs/sourcefile/drift.f90.html
+++ b/docs/sourcefile/drift.f90.html
@@ -134,7 +134,7 @@ <h1>drift.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 2.2% of total for source files.">352 statements</a>
+    title=" 2.1% of total for source files.">352 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~drift.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefiledriftf90EfferentGraph" width="641pt" height="302pt"
- viewBox="0.00 0.00 641.00 302.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~drift.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 412.12)">
+<svg id="sourcefiledriftf90EfferentGraph" width="641pt" height="249pt"
+ viewBox="0.00 0.00 641.00 249.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~drift.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 339.24)">
 <title>sourcefile~~drift.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 878,-412.12 878,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 878,-339.24 878,4 -4,4"/>
 <!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~drift.f90</title>
-<polygon fill="none" stroke="black" points="874,-133.12 820,-133.12 820,-109.12 874,-109.12 874,-133.12"/>
-<text text-anchor="middle" x="847" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">drift.f90</text>
+<polygon fill="none" stroke="black" points="874,-235.24 820,-235.24 820,-211.24 874,-211.24 874,-235.24"/>
+<text text-anchor="middle" x="847" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">drift.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~drift.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.44,-109.09C789.3,-87.43 705.41,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-235.38C779.49,-252.91 699.44,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~drift.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.09,-133.4C818.2,-149.8 789.87,-179.03 771.01,-198.5"/>
-<polygon fill="#000000" stroke="#000000" points="768.25,-196.32 763.81,-205.93 773.28,-201.19 768.25,-196.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.82,-212.1C810.51,-208.14 799.84,-203.6 789.77,-199.31"/>
+<polygon fill="#000000" stroke="#000000" points="790.92,-196 780.35,-195.3 788.18,-202.44 790.92,-196"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~drift.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~drift.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~drift.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~drift.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~drift.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -657,7 +649,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-43"></a><span class="k">   end subroutine </span><span class="n">drift_body</span>
 <a name="ln-44"></a>
 <a name="ln-45"></a>
-<a name="ln-46"></a>   <span class="k">module pure subroutine </span><span class="n">drift_all</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">mask</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-46"></a>   <span class="k">module subroutine </span><span class="n">drift_all</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
 <a name="ln-47"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-48"></a>      <span class="c">!!</span>
 <a name="ln-49"></a>      <span class="c">!! Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector.</span>
@@ -669,9 +661,9 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-55"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! Vector of gravitational constants</span>
 <a name="ln-56"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span>  <span class="c">!! Position and velocity vectors</span>
 <a name="ln-57"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! number of bodies</span>
-<a name="ln-58"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-58"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
 <a name="ln-59"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Stepsize</span>
-<a name="ln-60"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">mask</span>  <span class="c">!! Logical mask of size self%nbody that determines which bodies to drift.</span>
+<a name="ln-60"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lmask</span> <span class="c">!! Logical mask of size self%nbody that determines which bodies to drift.</span>
 <a name="ln-61"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">iflag</span> <span class="c">!! Vector of error flags. 0 means no problem</span>
 <a name="ln-62"></a>      <span class="c">! Internals</span>
 <a name="ln-63"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span>   
@@ -682,432 +674,435 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-68"></a>
 <a name="ln-69"></a><span class="k">      allocate</span><span class="p">(</span><span class="n">dtp</span><span class="p">(</span><span class="n">n</span><span class="p">))</span>
 <a name="ln-70"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lgr</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-71"></a><span class="k">         do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">,</span> <span class="n">mask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-71"></a><span class="k">         do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">,</span> <span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
 <a name="ln-72"></a>            <span class="n">rmag</span> <span class="o">=</span> <span class="nb">norm2</span><span class="p">(</span><span class="n">x</span><span class="p">(:,</span> <span class="n">i</span><span class="p">))</span>
 <a name="ln-73"></a>            <span class="n">vmag2</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">v</span><span class="p">(:,</span> <span class="n">i</span><span class="p">),</span> <span class="n">v</span><span class="p">(:,</span> <span class="n">i</span><span class="p">))</span>
 <a name="ln-74"></a>            <span class="n">energy</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="n">vmag2</span> <span class="o">-</span> <span class="n">mu</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">/</span> <span class="n">rmag</span>
 <a name="ln-75"></a>            <span class="n">dtp</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">+</span> <span class="mi">3</span> <span class="o">*</span> <span class="n">param</span><span class="p">%</span><span class="n">inv_c2</span> <span class="o">*</span> <span class="n">energy</span><span class="p">)</span>
 <a name="ln-76"></a>         <span class="k">end do</span>
 <a name="ln-77"></a><span class="k">      else</span>
-<a name="ln-78"></a><span class="k">         where</span><span class="p">(</span><span class="n">mask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">))</span> <span class="n">dtp</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">)</span> <span class="o">=</span> <span class="n">dt</span>
-<a name="ln-79"></a>      <span class="k">end if </span>
-<a name="ln-80"></a><span class="k">      do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">,</span> <span class="n">mask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-81"></a>         <span class="k">call </span><span class="n">drift_one</span><span class="p">(</span><span class="n">mu</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">dtp</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">iflag</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-82"></a>      <span class="k">end do</span>
-<a name="ln-83"></a>
-<a name="ln-84"></a><span class="k">      return</span>
-<a name="ln-85"></a><span class="k">   end subroutine </span><span class="n">drift_all</span>
+<a name="ln-78"></a><span class="k">         where</span><span class="p">(</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">))</span> <span class="n">dtp</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">)</span> <span class="o">=</span> <span class="n">dt</span>
+<a name="ln-79"></a>      <span class="k">end if</span> 
+<a name="ln-80"></a>      <span class="c">!$omp parallel do default(private) &amp;</span>
+<a name="ln-81"></a>      <span class="c">!$omp shared(n, lmask, mu, x, v, dtp, iflag)</span>
+<a name="ln-82"></a>      <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span><span class="n">n</span>
+<a name="ln-83"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span> <span class="k">call </span><span class="n">drift_one</span><span class="p">(</span><span class="n">mu</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">dtp</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">iflag</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-84"></a>      <span class="k">end do</span>
+<a name="ln-85"></a>      <span class="c">!$omp end parallel do</span>
 <a name="ln-86"></a>
-<a name="ln-87"></a>
-<a name="ln-88"></a>   <span class="k">module pure elemental subroutine </span><span class="n">drift_one</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">px</span><span class="p">,</span> <span class="n">py</span><span class="p">,</span> <span class="n">pz</span><span class="p">,</span> <span class="n">vx</span><span class="p">,</span> <span class="n">vy</span><span class="p">,</span> <span class="n">vz</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span> 
-<a name="ln-89"></a>      <span class="c">!! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</span>
-<a name="ln-90"></a>      <span class="c">!!</span>
-<a name="ln-91"></a>      <span class="c">!! Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient</span>
-<a name="ln-92"></a>      <span class="c">!!</span>
-<a name="ln-93"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine routine drift_one.f90</span>
-<a name="ln-94"></a>      <span class="c">!! Adapted from Hal Levison and Martin Duncan&#39;s Swift routine drift_one.f</span>
-<a name="ln-95"></a>      <span class="k">implicit none</span>
-<a name="ln-96"></a>      <span class="c">! Arguments</span>
-<a name="ln-97"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">mu</span>                     <span class="c">!! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift</span>
-<a name="ln-98"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">px</span><span class="p">,</span> <span class="n">py</span><span class="p">,</span> <span class="n">pz</span><span class="p">,</span> <span class="n">vx</span><span class="p">,</span> <span class="n">vy</span><span class="p">,</span> <span class="n">vz</span> <span class="c">!! Position and velocity of body to drift</span>
-<a name="ln-99"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span>                     <span class="c">!! Step size</span>
-<a name="ln-100"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>                  <span class="c">!! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)</span>
-<a name="ln-101"></a>      <span class="c">! Internals</span>
-<a name="ln-102"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
-<a name="ln-103"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">dttmp</span>
-<a name="ln-104"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span>
-<a name="ln-105"></a>
-<a name="ln-106"></a>      <span class="n">x</span> <span class="o">=</span> <span class="p">[</span><span class="n">px</span><span class="p">,</span> <span class="n">py</span><span class="p">,</span> <span class="n">pz</span><span class="p">]</span>
-<a name="ln-107"></a>      <span class="n">v</span> <span class="o">=</span> <span class="p">[</span><span class="n">vx</span><span class="p">,</span> <span class="n">vy</span><span class="p">,</span> <span class="n">vz</span><span class="p">]</span>
+<a name="ln-87"></a>      <span class="k">return</span>
+<a name="ln-88"></a><span class="k">   end subroutine </span><span class="n">drift_all</span>
+<a name="ln-89"></a>
+<a name="ln-90"></a>
+<a name="ln-91"></a>   <span class="k">module pure elemental subroutine </span><span class="n">drift_one</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">px</span><span class="p">,</span> <span class="n">py</span><span class="p">,</span> <span class="n">pz</span><span class="p">,</span> <span class="n">vx</span><span class="p">,</span> <span class="n">vy</span><span class="p">,</span> <span class="n">vz</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span> 
+<a name="ln-92"></a>      <span class="c">!! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott</span>
+<a name="ln-93"></a>      <span class="c">!!</span>
+<a name="ln-94"></a>      <span class="c">!! Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient</span>
+<a name="ln-95"></a>      <span class="c">!!</span>
+<a name="ln-96"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine routine drift_one.f90</span>
+<a name="ln-97"></a>      <span class="c">!! Adapted from Hal Levison and Martin Duncan&#39;s Swift routine drift_one.f</span>
+<a name="ln-98"></a>      <span class="k">implicit none</span>
+<a name="ln-99"></a>      <span class="c">! Arguments</span>
+<a name="ln-100"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">mu</span>                     <span class="c">!! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift</span>
+<a name="ln-101"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">px</span><span class="p">,</span> <span class="n">py</span><span class="p">,</span> <span class="n">pz</span><span class="p">,</span> <span class="n">vx</span><span class="p">,</span> <span class="n">vy</span><span class="p">,</span> <span class="n">vz</span> <span class="c">!! Position and velocity of body to drift</span>
+<a name="ln-102"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span>                     <span class="c">!! Step size</span>
+<a name="ln-103"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>                  <span class="c">!! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)</span>
+<a name="ln-104"></a>      <span class="c">! Internals</span>
+<a name="ln-105"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
+<a name="ln-106"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">dttmp</span>
+<a name="ln-107"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span>
 <a name="ln-108"></a>
-<a name="ln-109"></a>      <span class="k">call </span><span class="n">drift_dan</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">(:),</span> <span class="n">v</span><span class="p">(:),</span> <span class="n">dt</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-110"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-111"></a><span class="k">         </span><span class="n">dttmp</span> <span class="o">=</span> <span class="mf">0.1_DP</span> <span class="o">*</span> <span class="n">dt</span>
-<a name="ln-112"></a>         <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="mi">10</span>
-<a name="ln-113"></a>            <span class="k">call </span><span class="n">drift_dan</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">(:),</span> <span class="n">v</span><span class="p">(:),</span> <span class="n">dttmp</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-114"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">exit</span>
-<a name="ln-115"></a><span class="k">         end do</span>
-<a name="ln-116"></a><span class="k">      end if</span>
-<a name="ln-117"></a><span class="k">      </span><span class="n">px</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">);</span> <span class="n">py</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">);</span> <span class="n">pz</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span>
-<a name="ln-118"></a>      <span class="n">vx</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">);</span> <span class="n">vy</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">);</span> <span class="n">vz</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span>
-<a name="ln-119"></a>   
-<a name="ln-120"></a>      <span class="k">return</span>
-<a name="ln-121"></a><span class="k">   end subroutine </span><span class="n">drift_one</span>
-<a name="ln-122"></a>
-<a name="ln-123"></a>
-<a name="ln-124"></a>   <span class="k">pure subroutine </span><span class="n">drift_dan</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">v0</span><span class="p">,</span> <span class="n">dt0</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-125"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-126"></a>      <span class="c">!!</span>
-<a name="ln-127"></a>      <span class="c">!! Perform Kepler drift, solving Kepler&#39;s equation in appropriate variables</span>
-<a name="ln-128"></a>      <span class="c">!!</span>
-<a name="ln-129"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_dan.f90</span>
-<a name="ln-130"></a>      <span class="c">!! Adapted from Hal Levison and Martin Duncan&#39;s Swift routine drift_dan.f</span>
-<a name="ln-131"></a>      <span class="k">implicit none</span>
-<a name="ln-132"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">iflag</span>
-<a name="ln-133"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>                     <span class="kd">::</span> <span class="n">mu</span><span class="p">,</span> <span class="n">dt0</span>
-<a name="ln-134"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">v0</span>      
-<a name="ln-135"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>        <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">g</span><span class="p">,</span> <span class="n">fdot</span><span class="p">,</span> <span class="n">gdot</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">r0</span>
-<a name="ln-136"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>        <span class="kd">::</span> <span class="n">v0s</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">asq</span><span class="p">,</span> <span class="n">en</span><span class="p">,</span> <span class="n">dm</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">esq</span><span class="p">,</span> <span class="n">xkep</span><span class="p">,</span> <span class="n">fchk</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span>
-<a name="ln-137"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span>
-<a name="ln-138"></a>
-<a name="ln-139"></a>      <span class="c">! Executable code</span>
-<a name="ln-140"></a>      <span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-141"></a>      <span class="n">dt</span> <span class="o">=</span> <span class="n">dt0</span>
-<a name="ln-142"></a>      <span class="n">r0</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="nb">dot_product</span><span class="p">(</span><span class="n">x0</span><span class="p">(:),</span> <span class="n">x0</span><span class="p">(:)))</span> 
-<a name="ln-143"></a>      <span class="n">v0s</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">v0</span><span class="p">(:),</span> <span class="n">v0</span><span class="p">(:))</span>
-<a name="ln-144"></a>      <span class="n">u</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">x0</span><span class="p">(:),</span>  <span class="n">v0</span><span class="p">(:))</span>
-<a name="ln-145"></a>      <span class="n">alpha</span> <span class="o">=</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">-</span> <span class="n">v0s</span>
-<a name="ln-146"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">alpha</span> <span class="o">&gt;</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-147"></a><span class="k">         </span><span class="n">a</span> <span class="o">=</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">alpha</span>
-<a name="ln-148"></a>         <span class="n">asq</span> <span class="o">=</span> <span class="n">a</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-149"></a>         <span class="n">en</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">mu</span> <span class="o">/</span> <span class="p">(</span><span class="n">a</span> <span class="o">*</span> <span class="n">asq</span><span class="p">))</span>
-<a name="ln-150"></a>         <span class="n">ec</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">r0</span> <span class="o">/</span> <span class="n">a</span>
-<a name="ln-151"></a>         <span class="n">es</span> <span class="o">=</span> <span class="n">u</span> <span class="o">/</span> <span class="p">(</span><span class="n">en</span> <span class="o">*</span> <span class="n">asq</span><span class="p">)</span>
-<a name="ln-152"></a>         <span class="n">esq</span> <span class="o">=</span> <span class="n">ec</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">es</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-153"></a>         <span class="n">dm</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">en</span> <span class="o">-</span> <span class="nb">int</span><span class="p">(</span><span class="n">dt</span> <span class="o">*</span> <span class="n">en</span> <span class="o">/</span> <span class="n">TWOPI</span><span class="p">,</span> <span class="nb">kind</span> <span class="o">=</span> <span class="n">I4B</span><span class="p">)</span> <span class="o">*</span> <span class="n">TWOPI</span>
-<a name="ln-154"></a>         <span class="n">dt</span> <span class="o">=</span> <span class="n">dm</span> <span class="o">/</span> <span class="n">en</span>
-<a name="ln-155"></a>         <span class="k">if</span> <span class="p">((</span><span class="n">esq</span> <span class="o">&lt;</span> <span class="n">E2MAX</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">dm</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">DM2MAX</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">esq</span> <span class="o">*</span> <span class="n">dm</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">E2DM2MAX</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-156"></a><span class="k">            call </span><span class="n">drift_kepmd</span><span class="p">(</span><span class="n">dm</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">xkep</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span><span class="p">)</span>
-<a name="ln-157"></a>            <span class="n">fchk</span> <span class="o">=</span> <span class="p">(</span><span class="n">xkep</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">s</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">c</span><span class="p">)</span> <span class="o">-</span> <span class="n">dm</span><span class="p">)</span>
-<a name="ln-158"></a>            <span class="c">! DEK - original code compared fchk*fchk with DANBYB, but i think it should</span>
-<a name="ln-159"></a>            <span class="c">! DEK - be compared with DANBYB*DANBYB, and i changed it accordingly - please</span>
-<a name="ln-160"></a>            <span class="c">! DEK - check with hal and/or martin about this</span>
-<a name="ln-161"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">fchk</span><span class="o">**</span><span class="mi">2</span> <span class="o">&gt;</span> <span class="n">DANBYB</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-162"></a><span class="k">               </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">1</span>
-<a name="ln-163"></a>               <span class="k">return</span>
-<a name="ln-164"></a><span class="k">            end if</span>
-<a name="ln-165"></a><span class="k">            </span><span class="n">fp</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">c</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="n">s</span>
-<a name="ln-166"></a>            <span class="n">f</span> <span class="o">=</span> <span class="n">a</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">*</span> <span class="p">(</span><span class="n">c</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span> <span class="o">+</span> <span class="mf">1.0_DP</span>
-<a name="ln-167"></a>            <span class="n">g</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">+</span> <span class="p">(</span><span class="n">s</span> <span class="o">-</span> <span class="n">xkep</span><span class="p">)</span> <span class="o">/</span> <span class="n">en</span>
-<a name="ln-168"></a>            <span class="n">fdot</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="n">a</span> <span class="o">/</span> <span class="p">(</span><span class="n">r0</span> <span class="o">*</span> <span class="n">fp</span><span class="p">))</span> <span class="o">*</span> <span class="n">en</span> <span class="o">*</span> <span class="n">s</span>
-<a name="ln-169"></a>            <span class="n">gdot</span> <span class="o">=</span> <span class="p">(</span><span class="n">c</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="n">fp</span> <span class="o">+</span> <span class="mf">1.0_DP</span>
-<a name="ln-170"></a>            <span class="n">x</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">f</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">g</span>
-<a name="ln-171"></a>            <span class="n">v</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">fdot</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">gdot</span>
-<a name="ln-172"></a>            <span class="n">x0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x</span><span class="p">(:)</span>
-<a name="ln-173"></a>            <span class="n">v0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">v</span><span class="p">(:)</span>
-<a name="ln-174"></a>            <span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-175"></a>            <span class="k">return</span>
-<a name="ln-176"></a><span class="k">         end if</span>
-<a name="ln-177"></a><span class="k">      end if</span>
-<a name="ln-178"></a>
-<a name="ln-179"></a><span class="k">      call </span><span class="n">drift_kepu</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-180"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-181"></a><span class="k">         </span><span class="n">f</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c2</span>
-<a name="ln-182"></a>         <span class="n">g</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">-</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span>
-<a name="ln-183"></a>         <span class="n">fdot</span> <span class="o">=</span> <span class="o">-</span><span class="n">mu</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">*</span> <span class="n">r0</span><span class="p">)</span> <span class="o">*</span> <span class="n">c1</span>
-<a name="ln-184"></a>         <span class="n">gdot</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">fp</span> <span class="o">*</span> <span class="n">c2</span>
-<a name="ln-185"></a>         <span class="n">x</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">f</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">g</span>
-<a name="ln-186"></a>         <span class="n">v</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">fdot</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">gdot</span>
-<a name="ln-187"></a>         <span class="n">x0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x</span><span class="p">(:)</span>
-<a name="ln-188"></a>         <span class="n">v0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">v</span><span class="p">(:)</span>
-<a name="ln-189"></a>      <span class="k">end if</span>
-<a name="ln-190"></a>
-<a name="ln-191"></a><span class="k">      return</span>
-<a name="ln-192"></a><span class="k">   end subroutine </span><span class="n">drift_dan</span>
+<a name="ln-109"></a>      <span class="n">x</span> <span class="o">=</span> <span class="p">[</span><span class="n">px</span><span class="p">,</span> <span class="n">py</span><span class="p">,</span> <span class="n">pz</span><span class="p">]</span>
+<a name="ln-110"></a>      <span class="n">v</span> <span class="o">=</span> <span class="p">[</span><span class="n">vx</span><span class="p">,</span> <span class="n">vy</span><span class="p">,</span> <span class="n">vz</span><span class="p">]</span>
+<a name="ln-111"></a>
+<a name="ln-112"></a>      <span class="k">call </span><span class="n">drift_dan</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">(:),</span> <span class="n">v</span><span class="p">(:),</span> <span class="n">dt</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-113"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-114"></a><span class="k">         </span><span class="n">dttmp</span> <span class="o">=</span> <span class="mf">0.1_DP</span> <span class="o">*</span> <span class="n">dt</span>
+<a name="ln-115"></a>         <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="mi">10</span>
+<a name="ln-116"></a>            <span class="k">call </span><span class="n">drift_dan</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">(:),</span> <span class="n">v</span><span class="p">(:),</span> <span class="n">dttmp</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-117"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">exit</span>
+<a name="ln-118"></a><span class="k">         end do</span>
+<a name="ln-119"></a><span class="k">      end if</span>
+<a name="ln-120"></a><span class="k">      </span><span class="n">px</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">);</span> <span class="n">py</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">);</span> <span class="n">pz</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span>
+<a name="ln-121"></a>      <span class="n">vx</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">);</span> <span class="n">vy</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">);</span> <span class="n">vz</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span>
+<a name="ln-122"></a>   
+<a name="ln-123"></a>      <span class="k">return</span>
+<a name="ln-124"></a><span class="k">   end subroutine </span><span class="n">drift_one</span>
+<a name="ln-125"></a>
+<a name="ln-126"></a>
+<a name="ln-127"></a>   <span class="k">pure subroutine </span><span class="n">drift_dan</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">v0</span><span class="p">,</span> <span class="n">dt0</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-128"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-129"></a>      <span class="c">!!</span>
+<a name="ln-130"></a>      <span class="c">!! Perform Kepler drift, solving Kepler&#39;s equation in appropriate variables</span>
+<a name="ln-131"></a>      <span class="c">!!</span>
+<a name="ln-132"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_dan.f90</span>
+<a name="ln-133"></a>      <span class="c">!! Adapted from Hal Levison and Martin Duncan&#39;s Swift routine drift_dan.f</span>
+<a name="ln-134"></a>      <span class="k">implicit none</span>
+<a name="ln-135"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">iflag</span>
+<a name="ln-136"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>                     <span class="kd">::</span> <span class="n">mu</span><span class="p">,</span> <span class="n">dt0</span>
+<a name="ln-137"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">v0</span>      
+<a name="ln-138"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>        <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">g</span><span class="p">,</span> <span class="n">fdot</span><span class="p">,</span> <span class="n">gdot</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">r0</span>
+<a name="ln-139"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>        <span class="kd">::</span> <span class="n">v0s</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">asq</span><span class="p">,</span> <span class="n">en</span><span class="p">,</span> <span class="n">dm</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">esq</span><span class="p">,</span> <span class="n">xkep</span><span class="p">,</span> <span class="n">fchk</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span>
+<a name="ln-140"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span>
+<a name="ln-141"></a>
+<a name="ln-142"></a>      <span class="c">! Executable code</span>
+<a name="ln-143"></a>      <span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-144"></a>      <span class="n">dt</span> <span class="o">=</span> <span class="n">dt0</span>
+<a name="ln-145"></a>      <span class="n">r0</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="nb">dot_product</span><span class="p">(</span><span class="n">x0</span><span class="p">(:),</span> <span class="n">x0</span><span class="p">(:)))</span> 
+<a name="ln-146"></a>      <span class="n">v0s</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">v0</span><span class="p">(:),</span> <span class="n">v0</span><span class="p">(:))</span>
+<a name="ln-147"></a>      <span class="n">u</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">x0</span><span class="p">(:),</span>  <span class="n">v0</span><span class="p">(:))</span>
+<a name="ln-148"></a>      <span class="n">alpha</span> <span class="o">=</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">-</span> <span class="n">v0s</span>
+<a name="ln-149"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">alpha</span> <span class="o">&gt;</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-150"></a><span class="k">         </span><span class="n">a</span> <span class="o">=</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">alpha</span>
+<a name="ln-151"></a>         <span class="n">asq</span> <span class="o">=</span> <span class="n">a</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-152"></a>         <span class="n">en</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">mu</span> <span class="o">/</span> <span class="p">(</span><span class="n">a</span> <span class="o">*</span> <span class="n">asq</span><span class="p">))</span>
+<a name="ln-153"></a>         <span class="n">ec</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">r0</span> <span class="o">/</span> <span class="n">a</span>
+<a name="ln-154"></a>         <span class="n">es</span> <span class="o">=</span> <span class="n">u</span> <span class="o">/</span> <span class="p">(</span><span class="n">en</span> <span class="o">*</span> <span class="n">asq</span><span class="p">)</span>
+<a name="ln-155"></a>         <span class="n">esq</span> <span class="o">=</span> <span class="n">ec</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">es</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-156"></a>         <span class="n">dm</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">en</span> <span class="o">-</span> <span class="nb">int</span><span class="p">(</span><span class="n">dt</span> <span class="o">*</span> <span class="n">en</span> <span class="o">/</span> <span class="n">TWOPI</span><span class="p">,</span> <span class="nb">kind</span> <span class="o">=</span> <span class="n">I4B</span><span class="p">)</span> <span class="o">*</span> <span class="n">TWOPI</span>
+<a name="ln-157"></a>         <span class="n">dt</span> <span class="o">=</span> <span class="n">dm</span> <span class="o">/</span> <span class="n">en</span>
+<a name="ln-158"></a>         <span class="k">if</span> <span class="p">((</span><span class="n">esq</span> <span class="o">&lt;</span> <span class="n">E2MAX</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">dm</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">DM2MAX</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">esq</span> <span class="o">*</span> <span class="n">dm</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">E2DM2MAX</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-159"></a><span class="k">            call </span><span class="n">drift_kepmd</span><span class="p">(</span><span class="n">dm</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">xkep</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span><span class="p">)</span>
+<a name="ln-160"></a>            <span class="n">fchk</span> <span class="o">=</span> <span class="p">(</span><span class="n">xkep</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">s</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">c</span><span class="p">)</span> <span class="o">-</span> <span class="n">dm</span><span class="p">)</span>
+<a name="ln-161"></a>            <span class="c">! DEK - original code compared fchk*fchk with DANBYB, but i think it should</span>
+<a name="ln-162"></a>            <span class="c">! DEK - be compared with DANBYB*DANBYB, and i changed it accordingly - please</span>
+<a name="ln-163"></a>            <span class="c">! DEK - check with hal and/or martin about this</span>
+<a name="ln-164"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">fchk</span><span class="o">**</span><span class="mi">2</span> <span class="o">&gt;</span> <span class="n">DANBYB</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-165"></a><span class="k">               </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">1</span>
+<a name="ln-166"></a>               <span class="k">return</span>
+<a name="ln-167"></a><span class="k">            end if</span>
+<a name="ln-168"></a><span class="k">            </span><span class="n">fp</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">c</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="n">s</span>
+<a name="ln-169"></a>            <span class="n">f</span> <span class="o">=</span> <span class="n">a</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">*</span> <span class="p">(</span><span class="n">c</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span> <span class="o">+</span> <span class="mf">1.0_DP</span>
+<a name="ln-170"></a>            <span class="n">g</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">+</span> <span class="p">(</span><span class="n">s</span> <span class="o">-</span> <span class="n">xkep</span><span class="p">)</span> <span class="o">/</span> <span class="n">en</span>
+<a name="ln-171"></a>            <span class="n">fdot</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="n">a</span> <span class="o">/</span> <span class="p">(</span><span class="n">r0</span> <span class="o">*</span> <span class="n">fp</span><span class="p">))</span> <span class="o">*</span> <span class="n">en</span> <span class="o">*</span> <span class="n">s</span>
+<a name="ln-172"></a>            <span class="n">gdot</span> <span class="o">=</span> <span class="p">(</span><span class="n">c</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="n">fp</span> <span class="o">+</span> <span class="mf">1.0_DP</span>
+<a name="ln-173"></a>            <span class="n">x</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">f</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">g</span>
+<a name="ln-174"></a>            <span class="n">v</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">fdot</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">gdot</span>
+<a name="ln-175"></a>            <span class="n">x0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x</span><span class="p">(:)</span>
+<a name="ln-176"></a>            <span class="n">v0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">v</span><span class="p">(:)</span>
+<a name="ln-177"></a>            <span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-178"></a>            <span class="k">return</span>
+<a name="ln-179"></a><span class="k">         end if</span>
+<a name="ln-180"></a><span class="k">      end if</span>
+<a name="ln-181"></a>
+<a name="ln-182"></a><span class="k">      call </span><span class="n">drift_kepu</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-183"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-184"></a><span class="k">         </span><span class="n">f</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c2</span>
+<a name="ln-185"></a>         <span class="n">g</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">-</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span>
+<a name="ln-186"></a>         <span class="n">fdot</span> <span class="o">=</span> <span class="o">-</span><span class="n">mu</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">*</span> <span class="n">r0</span><span class="p">)</span> <span class="o">*</span> <span class="n">c1</span>
+<a name="ln-187"></a>         <span class="n">gdot</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">fp</span> <span class="o">*</span> <span class="n">c2</span>
+<a name="ln-188"></a>         <span class="n">x</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">f</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">g</span>
+<a name="ln-189"></a>         <span class="n">v</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">fdot</span> <span class="o">+</span> <span class="n">v0</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">gdot</span>
+<a name="ln-190"></a>         <span class="n">x0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x</span><span class="p">(:)</span>
+<a name="ln-191"></a>         <span class="n">v0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">v</span><span class="p">(:)</span>
+<a name="ln-192"></a>      <span class="k">end if</span>
 <a name="ln-193"></a>
-<a name="ln-194"></a>
-<a name="ln-195"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepmd</span><span class="p">(</span><span class="n">dm</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span><span class="p">)</span>
-<a name="ln-196"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-197"></a>      <span class="c">!!</span>
-<a name="ln-198"></a>      <span class="c">!! Solve Kepler&#39;s equation in difference form for an ellipse for small input dm and eccentricity</span>
-<a name="ln-199"></a>      <span class="c">!!    Original disclaimer: built for speed, does not check how well the original equation is solved</span>
-<a name="ln-200"></a>      <span class="c">!!    Can do that in calling routine by checking how close (x - ec*s + es*(1.0 - c) - dm) is to zero</span>
-<a name="ln-201"></a>      <span class="c">!!</span>
-<a name="ln-202"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepmd.f90</span>
-<a name="ln-203"></a>      <span class="c">!! Adapted from Martin Duncan&#39;s Swift routine drift_kepmd.f</span>
-<a name="ln-204"></a>      <span class="k">implicit none</span>
-<a name="ln-205"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dm</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">ec</span>
-<a name="ln-206"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span>      
-<a name="ln-207"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">a0</span> <span class="o">=</span> <span class="mi">3991680</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a1</span> <span class="o">=</span> <span class="mi">665280</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a2</span> <span class="o">=</span> <span class="mi">33264</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a3</span> <span class="o">=</span> <span class="mi">792</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a4</span> <span class="o">=</span> <span class="mi">11</span><span class="mf">0.0_DP</span>
-<a name="ln-208"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dx</span><span class="p">,</span> <span class="n">fac1</span><span class="p">,</span> <span class="n">fac2</span><span class="p">,</span> <span class="n">q</span><span class="p">,</span> <span class="n">y</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">fpp</span><span class="p">,</span> <span class="n">fppp</span>
-<a name="ln-209"></a>      
-<a name="ln-210"></a>      <span class="c">! executable code</span>
-<a name="ln-211"></a>      <span class="n">fac1</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">/</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">ec</span><span class="p">)</span>
-<a name="ln-212"></a>      <span class="n">q</span> <span class="o">=</span> <span class="n">fac1</span> <span class="o">*</span> <span class="n">dm</span>
-<a name="ln-213"></a>      <span class="n">fac2</span> <span class="o">=</span> <span class="n">es</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">fac1</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">/</span> <span class="mf">3.0_DP</span>
-<a name="ln-214"></a>      <span class="n">x</span> <span class="o">=</span> <span class="n">q</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="n">fac1</span> <span class="o">*</span> <span class="n">q</span> <span class="o">*</span> <span class="p">(</span><span class="n">es</span> <span class="o">-</span> <span class="n">q</span> <span class="o">*</span> <span class="n">fac2</span><span class="p">))</span>
-<a name="ln-215"></a>      <span class="n">y</span> <span class="o">=</span> <span class="n">x</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-216"></a>      <span class="n">s</span> <span class="o">=</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="n">a0</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a2</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a3</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a4</span> <span class="o">-</span> <span class="n">y</span><span class="p">)))))</span> <span class="o">/</span> <span class="n">a0</span>
-<a name="ln-217"></a>      <span class="n">c</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
-<a name="ln-218"></a>      <span class="n">f</span> <span class="o">=</span> <span class="n">x</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">s</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">c</span><span class="p">)</span> <span class="o">-</span> <span class="n">dm</span>
-<a name="ln-219"></a>      <span class="n">fp</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">c</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="n">s</span>
-<a name="ln-220"></a>      <span class="n">fpp</span> <span class="o">=</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">s</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="n">c</span>
-<a name="ln-221"></a>      <span class="n">fppp</span> <span class="o">=</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">c</span> <span class="o">-</span> <span class="n">es</span> <span class="o">*</span> <span class="n">s</span>
-<a name="ln-222"></a>      <span class="n">dx</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="n">fp</span>
-<a name="ln-223"></a>      <span class="n">dx</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">dx</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span><span class="p">)</span>
-<a name="ln-224"></a>      <span class="n">dx</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">dx</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span> <span class="o">+</span> <span class="n">dx</span><span class="o">**</span><span class="mi">2</span><span class="o">*</span> <span class="n">fppp</span> <span class="o">/</span> <span class="mf">6.0_DP</span><span class="p">)</span>
-<a name="ln-225"></a>      <span class="n">x</span> <span class="o">=</span> <span class="n">x</span> <span class="o">+</span> <span class="n">dx</span>
-<a name="ln-226"></a>      <span class="n">y</span> <span class="o">=</span> <span class="n">x</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-227"></a>      <span class="n">s</span> <span class="o">=</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="n">a0</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a2</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a3</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a4</span> <span class="o">-</span> <span class="n">y</span><span class="p">)))))</span> <span class="o">/</span> <span class="n">a0</span>
-<a name="ln-228"></a>      <span class="n">c</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
-<a name="ln-229"></a>      
-<a name="ln-230"></a>      <span class="k">return</span>
-<a name="ln-231"></a><span class="k">   end subroutine </span><span class="n">drift_kepmd</span>
-<a name="ln-232"></a>
-<a name="ln-233"></a>
-<a name="ln-234"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span><span class="n">r0</span><span class="p">,</span><span class="n">mu</span><span class="p">,</span><span class="n">alpha</span><span class="p">,</span><span class="n">u</span><span class="p">,</span><span class="n">fp</span><span class="p">,</span><span class="n">c1</span><span class="p">,</span><span class="n">c2</span><span class="p">,</span><span class="n">c3</span><span class="p">,</span><span class="n">iflag</span><span class="p">)</span>
-<a name="ln-235"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-236"></a>      <span class="c">!!</span>
-<a name="ln-237"></a>      <span class="c">!! Solve Kepler&#39;s equation in universal variables</span>
-<a name="ln-238"></a>      <span class="c">!!</span>
-<a name="ln-239"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu.f90</span>
-<a name="ln-240"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu.f</span>
-<a name="ln-241"></a>      <span class="k">implicit none</span>
-<a name="ln-242"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
-<a name="ln-243"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
-<a name="ln-244"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>      
-<a name="ln-245"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">s</span><span class="p">,</span> <span class="n">st</span><span class="p">,</span> <span class="n">fo</span><span class="p">,</span> <span class="n">fn</span>
-<a name="ln-246"></a>      
-<a name="ln-247"></a>      <span class="c">! executable code</span>
-<a name="ln-248"></a>      <span class="k">call </span><span class="n">drift_kepu_guess</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">)</span>
-<a name="ln-249"></a>      <span class="n">st</span> <span class="o">=</span> <span class="n">s</span>
-<a name="ln-250"></a>      <span class="k">call </span><span class="n">drift_kepu_new</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-251"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-252"></a><span class="k">         call </span><span class="n">drift_kepu_fchk</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">st</span><span class="p">,</span> <span class="n">fo</span><span class="p">)</span>
-<a name="ln-253"></a>         <span class="k">call </span><span class="n">drift_kepu_fchk</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">fn</span><span class="p">)</span>
-<a name="ln-254"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">fo</span><span class="p">)</span> <span class="o">&lt;</span> <span class="nb">abs</span><span class="p">(</span><span class="n">fn</span><span class="p">))</span> <span class="n">s</span> <span class="o">=</span> <span class="n">st</span>
-<a name="ln-255"></a>         <span class="k">call </span><span class="n">drift_kepu_lag</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-256"></a>      <span class="k">end if</span>
-<a name="ln-257"></a><span class="k">      </span>
-<a name="ln-258"></a><span class="k">      return</span>
-<a name="ln-259"></a><span class="k">   end subroutine </span><span class="n">drift_kepu</span>
-<a name="ln-260"></a>
-<a name="ln-261"></a>
-<a name="ln-262"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_fchk</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">f</span><span class="p">)</span>
-<a name="ln-263"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-264"></a>      <span class="c">!!</span>
-<a name="ln-265"></a>      <span class="c">!! Computes the value of f, the function whose root we are trying to find in universal variables</span>
-<a name="ln-266"></a>      <span class="c">!!</span>
-<a name="ln-267"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_fchk.f90</span>
-<a name="ln-268"></a>      <span class="c">!! Adapted from Martin Duncan&#39;s Swift routine drift_kepu_fchk.f</span>
-<a name="ln-269"></a>      <span class="k">implicit none</span>
-<a name="ln-270"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span>
-<a name="ln-271"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-272"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>
-<a name="ln-273"></a>
-<a name="ln-274"></a>      <span class="n">x</span> <span class="o">=</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">alpha</span>
-<a name="ln-275"></a>      <span class="k">call </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
-<a name="ln-276"></a>      <span class="n">c1</span> <span class="o">=</span> <span class="n">c1</span> <span class="o">*</span> <span class="n">s</span>
-<a name="ln-277"></a>      <span class="n">c2</span> <span class="o">=</span> <span class="n">c2</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-278"></a>      <span class="n">c3</span> <span class="o">=</span> <span class="n">c3</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">3</span>
-<a name="ln-279"></a>      <span class="n">f</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c2</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span> <span class="o">-</span> <span class="n">dt</span>
-<a name="ln-280"></a>
-<a name="ln-281"></a>      <span class="k">return</span>
-<a name="ln-282"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_fchk</span>
+<a name="ln-194"></a><span class="k">      return</span>
+<a name="ln-195"></a><span class="k">   end subroutine </span><span class="n">drift_dan</span>
+<a name="ln-196"></a>
+<a name="ln-197"></a>
+<a name="ln-198"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepmd</span><span class="p">(</span><span class="n">dm</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span><span class="p">)</span>
+<a name="ln-199"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-200"></a>      <span class="c">!!</span>
+<a name="ln-201"></a>      <span class="c">!! Solve Kepler&#39;s equation in difference form for an ellipse for small input dm and eccentricity</span>
+<a name="ln-202"></a>      <span class="c">!!    Original disclaimer: built for speed, does not check how well the original equation is solved</span>
+<a name="ln-203"></a>      <span class="c">!!    Can do that in calling routine by checking how close (x - ec*s + es*(1.0 - c) - dm) is to zero</span>
+<a name="ln-204"></a>      <span class="c">!!</span>
+<a name="ln-205"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepmd.f90</span>
+<a name="ln-206"></a>      <span class="c">!! Adapted from Martin Duncan&#39;s Swift routine drift_kepmd.f</span>
+<a name="ln-207"></a>      <span class="k">implicit none</span>
+<a name="ln-208"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dm</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">ec</span>
+<a name="ln-209"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">c</span>      
+<a name="ln-210"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">a0</span> <span class="o">=</span> <span class="mi">3991680</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a1</span> <span class="o">=</span> <span class="mi">665280</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a2</span> <span class="o">=</span> <span class="mi">33264</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a3</span> <span class="o">=</span> <span class="mi">792</span><span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">a4</span> <span class="o">=</span> <span class="mi">11</span><span class="mf">0.0_DP</span>
+<a name="ln-211"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dx</span><span class="p">,</span> <span class="n">fac1</span><span class="p">,</span> <span class="n">fac2</span><span class="p">,</span> <span class="n">q</span><span class="p">,</span> <span class="n">y</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">fpp</span><span class="p">,</span> <span class="n">fppp</span>
+<a name="ln-212"></a>      
+<a name="ln-213"></a>      <span class="c">! executable code</span>
+<a name="ln-214"></a>      <span class="n">fac1</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">/</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">ec</span><span class="p">)</span>
+<a name="ln-215"></a>      <span class="n">q</span> <span class="o">=</span> <span class="n">fac1</span> <span class="o">*</span> <span class="n">dm</span>
+<a name="ln-216"></a>      <span class="n">fac2</span> <span class="o">=</span> <span class="n">es</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">fac1</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">/</span> <span class="mf">3.0_DP</span>
+<a name="ln-217"></a>      <span class="n">x</span> <span class="o">=</span> <span class="n">q</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="n">fac1</span> <span class="o">*</span> <span class="n">q</span> <span class="o">*</span> <span class="p">(</span><span class="n">es</span> <span class="o">-</span> <span class="n">q</span> <span class="o">*</span> <span class="n">fac2</span><span class="p">))</span>
+<a name="ln-218"></a>      <span class="n">y</span> <span class="o">=</span> <span class="n">x</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-219"></a>      <span class="n">s</span> <span class="o">=</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="n">a0</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a2</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a3</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a4</span> <span class="o">-</span> <span class="n">y</span><span class="p">)))))</span> <span class="o">/</span> <span class="n">a0</span>
+<a name="ln-220"></a>      <span class="n">c</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
+<a name="ln-221"></a>      <span class="n">f</span> <span class="o">=</span> <span class="n">x</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">s</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">c</span><span class="p">)</span> <span class="o">-</span> <span class="n">dm</span>
+<a name="ln-222"></a>      <span class="n">fp</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">c</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="n">s</span>
+<a name="ln-223"></a>      <span class="n">fpp</span> <span class="o">=</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">s</span> <span class="o">+</span> <span class="n">es</span> <span class="o">*</span> <span class="n">c</span>
+<a name="ln-224"></a>      <span class="n">fppp</span> <span class="o">=</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">c</span> <span class="o">-</span> <span class="n">es</span> <span class="o">*</span> <span class="n">s</span>
+<a name="ln-225"></a>      <span class="n">dx</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="n">fp</span>
+<a name="ln-226"></a>      <span class="n">dx</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">dx</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span><span class="p">)</span>
+<a name="ln-227"></a>      <span class="n">dx</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">dx</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span> <span class="o">+</span> <span class="n">dx</span><span class="o">**</span><span class="mi">2</span><span class="o">*</span> <span class="n">fppp</span> <span class="o">/</span> <span class="mf">6.0_DP</span><span class="p">)</span>
+<a name="ln-228"></a>      <span class="n">x</span> <span class="o">=</span> <span class="n">x</span> <span class="o">+</span> <span class="n">dx</span>
+<a name="ln-229"></a>      <span class="n">y</span> <span class="o">=</span> <span class="n">x</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-230"></a>      <span class="n">s</span> <span class="o">=</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="n">a0</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a2</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a3</span> <span class="o">-</span> <span class="n">y</span> <span class="o">*</span> <span class="p">(</span><span class="n">a4</span> <span class="o">-</span> <span class="n">y</span><span class="p">)))))</span> <span class="o">/</span> <span class="n">a0</span>
+<a name="ln-231"></a>      <span class="n">c</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
+<a name="ln-232"></a>      
+<a name="ln-233"></a>      <span class="k">return</span>
+<a name="ln-234"></a><span class="k">   end subroutine </span><span class="n">drift_kepmd</span>
+<a name="ln-235"></a>
+<a name="ln-236"></a>
+<a name="ln-237"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span><span class="n">r0</span><span class="p">,</span><span class="n">mu</span><span class="p">,</span><span class="n">alpha</span><span class="p">,</span><span class="n">u</span><span class="p">,</span><span class="n">fp</span><span class="p">,</span><span class="n">c1</span><span class="p">,</span><span class="n">c2</span><span class="p">,</span><span class="n">c3</span><span class="p">,</span><span class="n">iflag</span><span class="p">)</span>
+<a name="ln-238"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-239"></a>      <span class="c">!!</span>
+<a name="ln-240"></a>      <span class="c">!! Solve Kepler&#39;s equation in universal variables</span>
+<a name="ln-241"></a>      <span class="c">!!</span>
+<a name="ln-242"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu.f90</span>
+<a name="ln-243"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu.f</span>
+<a name="ln-244"></a>      <span class="k">implicit none</span>
+<a name="ln-245"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
+<a name="ln-246"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
+<a name="ln-247"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>      
+<a name="ln-248"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">s</span><span class="p">,</span> <span class="n">st</span><span class="p">,</span> <span class="n">fo</span><span class="p">,</span> <span class="n">fn</span>
+<a name="ln-249"></a>      
+<a name="ln-250"></a>      <span class="c">! executable code</span>
+<a name="ln-251"></a>      <span class="k">call </span><span class="n">drift_kepu_guess</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">)</span>
+<a name="ln-252"></a>      <span class="n">st</span> <span class="o">=</span> <span class="n">s</span>
+<a name="ln-253"></a>      <span class="k">call </span><span class="n">drift_kepu_new</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-254"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-255"></a><span class="k">         call </span><span class="n">drift_kepu_fchk</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">st</span><span class="p">,</span> <span class="n">fo</span><span class="p">)</span>
+<a name="ln-256"></a>         <span class="k">call </span><span class="n">drift_kepu_fchk</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">fn</span><span class="p">)</span>
+<a name="ln-257"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">fo</span><span class="p">)</span> <span class="o">&lt;</span> <span class="nb">abs</span><span class="p">(</span><span class="n">fn</span><span class="p">))</span> <span class="n">s</span> <span class="o">=</span> <span class="n">st</span>
+<a name="ln-258"></a>         <span class="k">call </span><span class="n">drift_kepu_lag</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-259"></a>      <span class="k">end if</span>
+<a name="ln-260"></a><span class="k">      </span>
+<a name="ln-261"></a><span class="k">      return</span>
+<a name="ln-262"></a><span class="k">   end subroutine </span><span class="n">drift_kepu</span>
+<a name="ln-263"></a>
+<a name="ln-264"></a>
+<a name="ln-265"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_fchk</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">f</span><span class="p">)</span>
+<a name="ln-266"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-267"></a>      <span class="c">!!</span>
+<a name="ln-268"></a>      <span class="c">!! Computes the value of f, the function whose root we are trying to find in universal variables</span>
+<a name="ln-269"></a>      <span class="c">!!</span>
+<a name="ln-270"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_fchk.f90</span>
+<a name="ln-271"></a>      <span class="c">!! Adapted from Martin Duncan&#39;s Swift routine drift_kepu_fchk.f</span>
+<a name="ln-272"></a>      <span class="k">implicit none</span>
+<a name="ln-273"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span>
+<a name="ln-274"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-275"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>
+<a name="ln-276"></a>
+<a name="ln-277"></a>      <span class="n">x</span> <span class="o">=</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">alpha</span>
+<a name="ln-278"></a>      <span class="k">call </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
+<a name="ln-279"></a>      <span class="n">c1</span> <span class="o">=</span> <span class="n">c1</span> <span class="o">*</span> <span class="n">s</span>
+<a name="ln-280"></a>      <span class="n">c2</span> <span class="o">=</span> <span class="n">c2</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-281"></a>      <span class="n">c3</span> <span class="o">=</span> <span class="n">c3</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">3</span>
+<a name="ln-282"></a>      <span class="n">f</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c2</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span> <span class="o">-</span> <span class="n">dt</span>
 <a name="ln-283"></a>
-<a name="ln-284"></a>
-<a name="ln-285"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_guess</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">)</span>
-<a name="ln-286"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-287"></a>      <span class="c">!!</span>
-<a name="ln-288"></a>      <span class="c">!! Compute initial guess for solving Kepler&#39;s equation using universal variables</span>
-<a name="ln-289"></a>      <span class="c">!!</span>
-<a name="ln-290"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_guess.f90</span>
-<a name="ln-291"></a>      <span class="c">!! Adapted from Hal Levison and Martin Duncan&#39;s Swift routine drift_kepu_guess.f</span>
-<a name="ln-292"></a>      <span class="k">implicit none</span>
-<a name="ln-293"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
-<a name="ln-294"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">s</span>      
-<a name="ln-295"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">iflag</span>
-<a name="ln-296"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">thresh</span> <span class="o">=</span> <span class="mf">0.4_DP</span><span class="p">,</span> <span class="n">danbyk</span> <span class="o">=</span> <span class="mf">0.85_DP</span>
-<a name="ln-297"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>        <span class="kd">::</span> <span class="n">y</span><span class="p">,</span> <span class="n">sy</span><span class="p">,</span> <span class="n">cy</span><span class="p">,</span> <span class="n">sigma</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">en</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">e</span>
-<a name="ln-298"></a>
-<a name="ln-299"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">alpha</span> <span class="o">&gt;</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-300"></a><span class="k">         if</span> <span class="p">(</span><span class="n">dt</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">&lt;=</span> <span class="n">thresh</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-301"></a><span class="k">            </span><span class="n">s</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">-</span> <span class="p">(</span><span class="n">dt</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">u</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">r0</span><span class="o">**</span><span class="mi">3</span><span class="p">)</span>
-<a name="ln-302"></a>         <span class="k">else</span>
-<a name="ln-303"></a><span class="k">            </span><span class="n">a</span> <span class="o">=</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">alpha</span>
-<a name="ln-304"></a>            <span class="n">en</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">mu</span> <span class="o">/</span> <span class="n">a</span><span class="o">**</span><span class="mi">3</span><span class="p">)</span>
-<a name="ln-305"></a>            <span class="n">ec</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">r0</span> <span class="o">/</span> <span class="n">a</span>
-<a name="ln-306"></a>            <span class="n">es</span> <span class="o">=</span> <span class="n">u</span> <span class="o">/</span> <span class="p">(</span><span class="n">en</span> <span class="o">*</span> <span class="n">a</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
-<a name="ln-307"></a>            <span class="n">e</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">ec</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">es</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
-<a name="ln-308"></a>            <span class="n">y</span> <span class="o">=</span> <span class="n">en</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">-</span> <span class="n">es</span>
-<a name="ln-309"></a>            <span class="k">call </span><span class="n">orbel_scget</span><span class="p">(</span><span class="n">y</span><span class="p">,</span> <span class="n">sy</span><span class="p">,</span> <span class="n">cy</span><span class="p">)</span>
-<a name="ln-310"></a>            <span class="n">sigma</span> <span class="o">=</span> <span class="nb">sign</span><span class="p">(</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">es</span> <span class="o">*</span> <span class="n">cy</span> <span class="o">+</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">sy</span><span class="p">)</span>
-<a name="ln-311"></a>            <span class="n">x</span> <span class="o">=</span> <span class="n">y</span> <span class="o">+</span> <span class="n">sigma</span> <span class="o">*</span> <span class="n">danbyk</span> <span class="o">*</span> <span class="n">e</span>
-<a name="ln-312"></a>            <span class="n">s</span> <span class="o">=</span> <span class="n">x</span> <span class="o">/</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">alpha</span><span class="p">)</span>
-<a name="ln-313"></a>         <span class="k">end if</span>
-<a name="ln-314"></a><span class="k">      else</span>
-<a name="ln-315"></a><span class="k">         call </span><span class="n">drift_kepu_p3solve</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-316"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="n">s</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">/</span> <span class="n">r0</span>
-<a name="ln-317"></a>      <span class="k">end if</span>
-<a name="ln-318"></a>
-<a name="ln-319"></a><span class="k">      return</span>
-<a name="ln-320"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_guess</span>
+<a name="ln-284"></a>      <span class="k">return</span>
+<a name="ln-285"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_fchk</span>
+<a name="ln-286"></a>
+<a name="ln-287"></a>
+<a name="ln-288"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_guess</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">)</span>
+<a name="ln-289"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-290"></a>      <span class="c">!!</span>
+<a name="ln-291"></a>      <span class="c">!! Compute initial guess for solving Kepler&#39;s equation using universal variables</span>
+<a name="ln-292"></a>      <span class="c">!!</span>
+<a name="ln-293"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_guess.f90</span>
+<a name="ln-294"></a>      <span class="c">!! Adapted from Hal Levison and Martin Duncan&#39;s Swift routine drift_kepu_guess.f</span>
+<a name="ln-295"></a>      <span class="k">implicit none</span>
+<a name="ln-296"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
+<a name="ln-297"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">s</span>      
+<a name="ln-298"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">iflag</span>
+<a name="ln-299"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">thresh</span> <span class="o">=</span> <span class="mf">0.4_DP</span><span class="p">,</span> <span class="n">danbyk</span> <span class="o">=</span> <span class="mf">0.85_DP</span>
+<a name="ln-300"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>        <span class="kd">::</span> <span class="n">y</span><span class="p">,</span> <span class="n">sy</span><span class="p">,</span> <span class="n">cy</span><span class="p">,</span> <span class="n">sigma</span><span class="p">,</span> <span class="n">es</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">en</span><span class="p">,</span> <span class="n">ec</span><span class="p">,</span> <span class="n">e</span>
+<a name="ln-301"></a>
+<a name="ln-302"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">alpha</span> <span class="o">&gt;</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-303"></a><span class="k">         if</span> <span class="p">(</span><span class="n">dt</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">&lt;=</span> <span class="n">thresh</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-304"></a><span class="k">            </span><span class="n">s</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">/</span> <span class="n">r0</span> <span class="o">-</span> <span class="p">(</span><span class="n">dt</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">u</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">r0</span><span class="o">**</span><span class="mi">3</span><span class="p">)</span>
+<a name="ln-305"></a>         <span class="k">else</span>
+<a name="ln-306"></a><span class="k">            </span><span class="n">a</span> <span class="o">=</span> <span class="n">mu</span> <span class="o">/</span> <span class="n">alpha</span>
+<a name="ln-307"></a>            <span class="n">en</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">mu</span> <span class="o">/</span> <span class="n">a</span><span class="o">**</span><span class="mi">3</span><span class="p">)</span>
+<a name="ln-308"></a>            <span class="n">ec</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">r0</span> <span class="o">/</span> <span class="n">a</span>
+<a name="ln-309"></a>            <span class="n">es</span> <span class="o">=</span> <span class="n">u</span> <span class="o">/</span> <span class="p">(</span><span class="n">en</span> <span class="o">*</span> <span class="n">a</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
+<a name="ln-310"></a>            <span class="n">e</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">ec</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">es</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
+<a name="ln-311"></a>            <span class="n">y</span> <span class="o">=</span> <span class="n">en</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">-</span> <span class="n">es</span>
+<a name="ln-312"></a>            <span class="k">call </span><span class="n">orbel_scget</span><span class="p">(</span><span class="n">y</span><span class="p">,</span> <span class="n">sy</span><span class="p">,</span> <span class="n">cy</span><span class="p">)</span>
+<a name="ln-313"></a>            <span class="n">sigma</span> <span class="o">=</span> <span class="nb">sign</span><span class="p">(</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">es</span> <span class="o">*</span> <span class="n">cy</span> <span class="o">+</span> <span class="n">ec</span> <span class="o">*</span> <span class="n">sy</span><span class="p">)</span>
+<a name="ln-314"></a>            <span class="n">x</span> <span class="o">=</span> <span class="n">y</span> <span class="o">+</span> <span class="n">sigma</span> <span class="o">*</span> <span class="n">danbyk</span> <span class="o">*</span> <span class="n">e</span>
+<a name="ln-315"></a>            <span class="n">s</span> <span class="o">=</span> <span class="n">x</span> <span class="o">/</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">alpha</span><span class="p">)</span>
+<a name="ln-316"></a>         <span class="k">end if</span>
+<a name="ln-317"></a><span class="k">      else</span>
+<a name="ln-318"></a><span class="k">         call </span><span class="n">drift_kepu_p3solve</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-319"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">iflag</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="n">s</span> <span class="o">=</span> <span class="n">dt</span> <span class="o">/</span> <span class="n">r0</span>
+<a name="ln-320"></a>      <span class="k">end if</span>
 <a name="ln-321"></a>
-<a name="ln-322"></a>
-<a name="ln-323"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_lag</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-324"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-325"></a>      <span class="c">!!</span>
-<a name="ln-326"></a>      <span class="c">!! Solve Kepler&#39;s equation in universal variables using Laguerre&#39;s method</span>
-<a name="ln-327"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180.</span>
+<a name="ln-322"></a><span class="k">      return</span>
+<a name="ln-323"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_guess</span>
+<a name="ln-324"></a>
+<a name="ln-325"></a>
+<a name="ln-326"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_lag</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-327"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-328"></a>      <span class="c">!!</span>
-<a name="ln-329"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_lag.f90</span>
-<a name="ln-330"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu_lag.f</span>
-<a name="ln-331"></a>      <span class="k">implicit none</span>
-<a name="ln-332"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
-<a name="ln-333"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
-<a name="ln-334"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">s</span>
-<a name="ln-335"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>      
-<a name="ln-336"></a>      <span class="kt">integer</span><span class="p">(</span> <span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">nc</span><span class="p">,</span> <span class="n">ncmax</span>
-<a name="ln-337"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">ln</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">fpp</span><span class="p">,</span> <span class="n">ds</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">fdt</span>
-<a name="ln-338"></a>   
-<a name="ln-339"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">alpha</span> <span class="o">&lt;</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-340"></a><span class="k">         </span><span class="n">ncmax</span> <span class="o">=</span> <span class="n">NLAG2</span>
-<a name="ln-341"></a>      <span class="k">else</span>
-<a name="ln-342"></a><span class="k">         </span><span class="n">ncmax</span> <span class="o">=</span> <span class="n">NLAG1</span>
-<a name="ln-343"></a>      <span class="k">end if</span>
-<a name="ln-344"></a><span class="k">      </span><span class="n">ln</span> <span class="o">=</span> <span class="mf">5.0_DP</span>
-<a name="ln-345"></a>      <span class="k">do </span><span class="n">nc</span> <span class="o">=</span> <span class="mi">0</span><span class="p">,</span> <span class="n">ncmax</span>
-<a name="ln-346"></a>         <span class="n">x</span> <span class="o">=</span> <span class="n">s</span> <span class="o">*</span> <span class="n">s</span> <span class="o">*</span> <span class="n">alpha</span>
-<a name="ln-347"></a>         <span class="k">call </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
-<a name="ln-348"></a>         <span class="n">c1</span> <span class="o">=</span> <span class="n">c1</span> <span class="o">*</span> <span class="n">s</span>
-<a name="ln-349"></a>         <span class="n">c2</span> <span class="o">=</span> <span class="n">c2</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-350"></a>         <span class="n">c3</span> <span class="o">=</span> <span class="n">c3</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">3</span>
-<a name="ln-351"></a>         <span class="n">f</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c2</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span> <span class="o">-</span> <span class="n">dt</span>
-<a name="ln-352"></a>         <span class="n">fp</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c0</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c2</span>
-<a name="ln-353"></a>         <span class="n">fpp</span> <span class="o">=</span> <span class="p">(</span><span class="o">-</span><span class="n">r0</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">+</span> <span class="n">mu</span><span class="p">)</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c0</span>
-<a name="ln-354"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">ln</span> <span class="o">*</span> <span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="nb">sign</span><span class="p">(</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">fp</span><span class="p">)</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="nb">abs</span><span class="p">((</span><span class="n">ln</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">fp</span><span class="o">**</span><span class="mi">2</span> <span class="o">-</span> <span class="p">(</span><span class="n">ln</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span> <span class="o">*</span> <span class="n">ln</span> <span class="o">*</span> <span class="n">f</span> <span class="o">*</span> <span class="n">fpp</span><span class="p">)))</span>
-<a name="ln-355"></a>         <span class="n">s</span> <span class="o">=</span> <span class="n">s</span> <span class="o">+</span> <span class="n">ds</span>
-<a name="ln-356"></a>         <span class="n">fdt</span> <span class="o">=</span> <span class="n">f</span> <span class="o">/</span> <span class="n">dt</span>
-<a name="ln-357"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">fdt</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">DANBYB</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-358"></a><span class="k">            </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-359"></a>            <span class="k">return</span>
-<a name="ln-360"></a><span class="k">         end if</span>
-<a name="ln-361"></a><span class="k">      end do</span>
-<a name="ln-362"></a><span class="k">      </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">2</span>
-<a name="ln-363"></a>   
-<a name="ln-364"></a>      <span class="k">return</span>
-<a name="ln-365"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_lag</span>
-<a name="ln-366"></a>
-<a name="ln-367"></a>
-<a name="ln-368"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_new</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-369"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-370"></a>      <span class="c">!!</span>
-<a name="ln-371"></a>      <span class="c">!! Solve Kepler&#39;s equation in universal variables using Newton&#39;s method</span>
-<a name="ln-372"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175.</span>
+<a name="ln-329"></a>      <span class="c">!! Solve Kepler&#39;s equation in universal variables using Laguerre&#39;s method</span>
+<a name="ln-330"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180.</span>
+<a name="ln-331"></a>      <span class="c">!!</span>
+<a name="ln-332"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_lag.f90</span>
+<a name="ln-333"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu_lag.f</span>
+<a name="ln-334"></a>      <span class="k">implicit none</span>
+<a name="ln-335"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
+<a name="ln-336"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
+<a name="ln-337"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">s</span>
+<a name="ln-338"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>      
+<a name="ln-339"></a>      <span class="kt">integer</span><span class="p">(</span> <span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">nc</span><span class="p">,</span> <span class="n">ncmax</span>
+<a name="ln-340"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">ln</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">fpp</span><span class="p">,</span> <span class="n">ds</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">fdt</span>
+<a name="ln-341"></a>   
+<a name="ln-342"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">alpha</span> <span class="o">&lt;</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-343"></a><span class="k">         </span><span class="n">ncmax</span> <span class="o">=</span> <span class="n">NLAG2</span>
+<a name="ln-344"></a>      <span class="k">else</span>
+<a name="ln-345"></a><span class="k">         </span><span class="n">ncmax</span> <span class="o">=</span> <span class="n">NLAG1</span>
+<a name="ln-346"></a>      <span class="k">end if</span>
+<a name="ln-347"></a><span class="k">      </span><span class="n">ln</span> <span class="o">=</span> <span class="mf">5.0_DP</span>
+<a name="ln-348"></a>      <span class="k">do </span><span class="n">nc</span> <span class="o">=</span> <span class="mi">0</span><span class="p">,</span> <span class="n">ncmax</span>
+<a name="ln-349"></a>         <span class="n">x</span> <span class="o">=</span> <span class="n">s</span> <span class="o">*</span> <span class="n">s</span> <span class="o">*</span> <span class="n">alpha</span>
+<a name="ln-350"></a>         <span class="k">call </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
+<a name="ln-351"></a>         <span class="n">c1</span> <span class="o">=</span> <span class="n">c1</span> <span class="o">*</span> <span class="n">s</span>
+<a name="ln-352"></a>         <span class="n">c2</span> <span class="o">=</span> <span class="n">c2</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-353"></a>         <span class="n">c3</span> <span class="o">=</span> <span class="n">c3</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">3</span>
+<a name="ln-354"></a>         <span class="n">f</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c2</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span> <span class="o">-</span> <span class="n">dt</span>
+<a name="ln-355"></a>         <span class="n">fp</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c0</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c2</span>
+<a name="ln-356"></a>         <span class="n">fpp</span> <span class="o">=</span> <span class="p">(</span><span class="o">-</span><span class="n">r0</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">+</span> <span class="n">mu</span><span class="p">)</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c0</span>
+<a name="ln-357"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">ln</span> <span class="o">*</span> <span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="nb">sign</span><span class="p">(</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">fp</span><span class="p">)</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="nb">abs</span><span class="p">((</span><span class="n">ln</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">fp</span><span class="o">**</span><span class="mi">2</span> <span class="o">-</span> <span class="p">(</span><span class="n">ln</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span> <span class="o">*</span> <span class="n">ln</span> <span class="o">*</span> <span class="n">f</span> <span class="o">*</span> <span class="n">fpp</span><span class="p">)))</span>
+<a name="ln-358"></a>         <span class="n">s</span> <span class="o">=</span> <span class="n">s</span> <span class="o">+</span> <span class="n">ds</span>
+<a name="ln-359"></a>         <span class="n">fdt</span> <span class="o">=</span> <span class="n">f</span> <span class="o">/</span> <span class="n">dt</span>
+<a name="ln-360"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">fdt</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">DANBYB</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-361"></a><span class="k">            </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-362"></a>            <span class="k">return</span>
+<a name="ln-363"></a><span class="k">         end if</span>
+<a name="ln-364"></a><span class="k">      end do</span>
+<a name="ln-365"></a><span class="k">      </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">2</span>
+<a name="ln-366"></a>   
+<a name="ln-367"></a>      <span class="k">return</span>
+<a name="ln-368"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_lag</span>
+<a name="ln-369"></a>
+<a name="ln-370"></a>
+<a name="ln-371"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_new</span><span class="p">(</span><span class="n">s</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-372"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-373"></a>      <span class="c">!!</span>
-<a name="ln-374"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_new.f90</span>
-<a name="ln-375"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu_new.f</span>
-<a name="ln-376"></a>      <span class="k">implicit none</span>
-<a name="ln-377"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
-<a name="ln-378"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
-<a name="ln-379"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">s</span>
-<a name="ln-380"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>      
-<a name="ln-381"></a>      <span class="kt">integer</span><span class="p">(</span> <span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">nc</span>
-<a name="ln-382"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">ds</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">fpp</span><span class="p">,</span> <span class="n">fppp</span><span class="p">,</span> <span class="n">fdt</span>
-<a name="ln-383"></a>   
-<a name="ln-384"></a>      <span class="k">do </span><span class="n">nc</span> <span class="o">=</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">6</span>
-<a name="ln-385"></a>         <span class="n">x</span> <span class="o">=</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">alpha</span>
-<a name="ln-386"></a>         <span class="k">call </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
-<a name="ln-387"></a>         <span class="n">c1</span> <span class="o">=</span> <span class="n">c1</span> <span class="o">*</span> <span class="n">s</span>
-<a name="ln-388"></a>         <span class="n">c2</span> <span class="o">=</span> <span class="n">c2</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-389"></a>         <span class="n">c3</span> <span class="o">=</span> <span class="n">c3</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">3</span>
-<a name="ln-390"></a>         <span class="n">f</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c2</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span> <span class="o">-</span> <span class="n">dt</span>
-<a name="ln-391"></a>         <span class="n">fp</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c0</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c2</span>
-<a name="ln-392"></a>         <span class="n">fpp</span> <span class="o">=</span> <span class="p">(</span><span class="o">-</span><span class="n">r0</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">+</span> <span class="n">mu</span><span class="p">)</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c0</span>
-<a name="ln-393"></a>         <span class="n">fppp</span> <span class="o">=</span> <span class="p">(</span><span class="o">-</span><span class="n">r0</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">+</span> <span class="n">mu</span><span class="p">)</span> <span class="o">*</span> <span class="n">c0</span> <span class="o">-</span> <span class="n">u</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">*</span> <span class="n">c1</span>
-<a name="ln-394"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="n">fp</span>
-<a name="ln-395"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">ds</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span><span class="p">)</span>
-<a name="ln-396"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">ds</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span> <span class="o">+</span> <span class="n">ds</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">fppp</span> <span class="o">/</span> <span class="mf">6.0_DP</span><span class="p">)</span>
-<a name="ln-397"></a>         <span class="n">s</span> <span class="o">=</span> <span class="n">s</span> <span class="o">+</span> <span class="n">ds</span>
-<a name="ln-398"></a>         <span class="n">fdt</span> <span class="o">=</span> <span class="n">f</span> <span class="o">/</span> <span class="n">dt</span>
-<a name="ln-399"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">fdt</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">DANBYB</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-400"></a><span class="k">            </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-401"></a>            <span class="k">return</span>
-<a name="ln-402"></a><span class="k">         end if</span>
-<a name="ln-403"></a><span class="k">      end do</span>
-<a name="ln-404"></a><span class="k">      </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">1</span>
-<a name="ln-405"></a>   
-<a name="ln-406"></a>      <span class="k">return</span>
-<a name="ln-407"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_new</span>
-<a name="ln-408"></a>
-<a name="ln-409"></a>
-<a name="ln-410"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_p3solve</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
-<a name="ln-411"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-412"></a>      <span class="c">!!</span>
-<a name="ln-413"></a>      <span class="c">!! Computes real root of cubic involved in setting initial guess for solving Kepler&#39;s equation in universal variables</span>
-<a name="ln-414"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178.</span>
+<a name="ln-374"></a>      <span class="c">!! Solve Kepler&#39;s equation in universal variables using Newton&#39;s method</span>
+<a name="ln-375"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175.</span>
+<a name="ln-376"></a>      <span class="c">!!</span>
+<a name="ln-377"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_new.f90</span>
+<a name="ln-378"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu_new.f</span>
+<a name="ln-379"></a>      <span class="k">implicit none</span>
+<a name="ln-380"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
+<a name="ln-381"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
+<a name="ln-382"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">s</span>
+<a name="ln-383"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>      
+<a name="ln-384"></a>      <span class="kt">integer</span><span class="p">(</span> <span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">nc</span>
+<a name="ln-385"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">ds</span><span class="p">,</span> <span class="n">f</span><span class="p">,</span> <span class="n">fpp</span><span class="p">,</span> <span class="n">fppp</span><span class="p">,</span> <span class="n">fdt</span>
+<a name="ln-386"></a>   
+<a name="ln-387"></a>      <span class="k">do </span><span class="n">nc</span> <span class="o">=</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">6</span>
+<a name="ln-388"></a>         <span class="n">x</span> <span class="o">=</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">alpha</span>
+<a name="ln-389"></a>         <span class="k">call </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
+<a name="ln-390"></a>         <span class="n">c1</span> <span class="o">=</span> <span class="n">c1</span> <span class="o">*</span> <span class="n">s</span>
+<a name="ln-391"></a>         <span class="n">c2</span> <span class="o">=</span> <span class="n">c2</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-392"></a>         <span class="n">c3</span> <span class="o">=</span> <span class="n">c3</span> <span class="o">*</span> <span class="n">s</span><span class="o">**</span><span class="mi">3</span>
+<a name="ln-393"></a>         <span class="n">f</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c2</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c3</span> <span class="o">-</span> <span class="n">dt</span>
+<a name="ln-394"></a>         <span class="n">fp</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">*</span> <span class="n">c0</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">mu</span> <span class="o">*</span> <span class="n">c2</span>
+<a name="ln-395"></a>         <span class="n">fpp</span> <span class="o">=</span> <span class="p">(</span><span class="o">-</span><span class="n">r0</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">+</span> <span class="n">mu</span><span class="p">)</span> <span class="o">*</span> <span class="n">c1</span> <span class="o">+</span> <span class="n">u</span> <span class="o">*</span> <span class="n">c0</span>
+<a name="ln-396"></a>         <span class="n">fppp</span> <span class="o">=</span> <span class="p">(</span><span class="o">-</span><span class="n">r0</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">+</span> <span class="n">mu</span><span class="p">)</span> <span class="o">*</span> <span class="n">c0</span> <span class="o">-</span> <span class="n">u</span> <span class="o">*</span> <span class="n">alpha</span> <span class="o">*</span> <span class="n">c1</span>
+<a name="ln-397"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="n">fp</span>
+<a name="ln-398"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">ds</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span><span class="p">)</span>
+<a name="ln-399"></a>         <span class="n">ds</span> <span class="o">=</span> <span class="o">-</span><span class="n">f</span> <span class="o">/</span> <span class="p">(</span><span class="n">fp</span> <span class="o">+</span> <span class="n">ds</span> <span class="o">*</span> <span class="n">fpp</span> <span class="o">/</span> <span class="mf">2.0_DP</span> <span class="o">+</span> <span class="n">ds</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">fppp</span> <span class="o">/</span> <span class="mf">6.0_DP</span><span class="p">)</span>
+<a name="ln-400"></a>         <span class="n">s</span> <span class="o">=</span> <span class="n">s</span> <span class="o">+</span> <span class="n">ds</span>
+<a name="ln-401"></a>         <span class="n">fdt</span> <span class="o">=</span> <span class="n">f</span> <span class="o">/</span> <span class="n">dt</span>
+<a name="ln-402"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">fdt</span><span class="o">**</span><span class="mi">2</span> <span class="o">&lt;</span> <span class="n">DANBYB</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-403"></a><span class="k">            </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-404"></a>            <span class="k">return</span>
+<a name="ln-405"></a><span class="k">         end if</span>
+<a name="ln-406"></a><span class="k">      end do</span>
+<a name="ln-407"></a><span class="k">      </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">1</span>
+<a name="ln-408"></a>   
+<a name="ln-409"></a>      <span class="k">return</span>
+<a name="ln-410"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_new</span>
+<a name="ln-411"></a>
+<a name="ln-412"></a>
+<a name="ln-413"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_p3solve</span><span class="p">(</span><span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span><span class="p">,</span> <span class="n">s</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-414"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-415"></a>      <span class="c">!!</span>
-<a name="ln-416"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_p3solve.f90</span>
-<a name="ln-417"></a>      <span class="c">!! Adapted from Martin Duncan&#39;s Swift routine drift_kepu_p3solve.f</span>
-<a name="ln-418"></a>      <span class="k">implicit none</span>
-<a name="ln-419"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
-<a name="ln-420"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
-<a name="ln-421"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">s</span>
-<a name="ln-422"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">denom</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">q</span><span class="p">,</span> <span class="n">r</span><span class="p">,</span> <span class="n">sq2</span><span class="p">,</span> <span class="n">sq</span><span class="p">,</span> <span class="n">p1</span><span class="p">,</span> <span class="n">p2</span>
-<a name="ln-423"></a>
-<a name="ln-424"></a>      <span class="n">denom</span> <span class="o">=</span> <span class="p">(</span><span class="n">mu</span> <span class="o">-</span> <span class="n">alpha</span> <span class="o">*</span> <span class="n">r0</span><span class="p">)</span> <span class="o">/</span> <span class="mf">6.0_DP</span>
-<a name="ln-425"></a>      <span class="n">a2</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="n">u</span> <span class="o">/</span> <span class="n">denom</span>
-<a name="ln-426"></a>      <span class="n">a1</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">/</span> <span class="n">denom</span>
-<a name="ln-427"></a>      <span class="n">a0</span> <span class="o">=</span> <span class="o">-</span><span class="n">dt</span> <span class="o">/</span> <span class="n">denom</span>
-<a name="ln-428"></a>      <span class="n">q</span> <span class="o">=</span> <span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">a2</span><span class="o">**</span><span class="mi">2</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mf">3.0_DP</span>
-<a name="ln-429"></a>      <span class="n">r</span> <span class="o">=</span> <span class="p">(</span><span class="n">a1</span> <span class="o">*</span> <span class="n">a2</span> <span class="o">-</span> <span class="mi">3</span> <span class="o">*</span> <span class="n">a0</span><span class="p">)</span> <span class="o">/</span> <span class="mf">6.0_DP</span> <span class="o">-</span> <span class="n">a2</span><span class="o">**</span><span class="mi">3</span> <span class="o">/</span> <span class="mi">2</span><span class="mf">7.0_DP</span>
-<a name="ln-430"></a>      <span class="n">sq2</span> <span class="o">=</span> <span class="n">q</span><span class="o">**</span><span class="mi">3</span> <span class="o">+</span> <span class="n">r</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-431"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">sq2</span> <span class="o">&gt;=</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-432"></a><span class="k">         </span><span class="n">sq</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">sq2</span><span class="p">)</span>
-<a name="ln-433"></a>         <span class="k">if</span> <span class="p">((</span><span class="n">r</span> <span class="o">+</span> <span class="n">sq</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-434"></a><span class="k">            </span><span class="n">p1</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="o">-</span><span class="p">(</span><span class="n">r</span> <span class="o">+</span> <span class="n">sq</span><span class="p">))</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
-<a name="ln-435"></a>         <span class="k">else</span>
-<a name="ln-436"></a><span class="k">            </span><span class="n">p1</span> <span class="o">=</span> <span class="p">(</span><span class="n">r</span> <span class="o">+</span> <span class="n">sq</span><span class="p">)</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
-<a name="ln-437"></a>         <span class="k">end if</span>
-<a name="ln-438"></a><span class="k">         if</span> <span class="p">((</span><span class="n">r</span> <span class="o">-</span> <span class="n">sq</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-439"></a><span class="k">            </span><span class="n">p2</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="o">-</span><span class="p">(</span><span class="n">r</span> <span class="o">-</span> <span class="n">sq</span><span class="p">))</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
-<a name="ln-440"></a>         <span class="k">else</span>
-<a name="ln-441"></a><span class="k">            </span><span class="n">p2</span> <span class="o">=</span> <span class="p">(</span><span class="n">r</span> <span class="o">-</span> <span class="n">sq</span><span class="p">)</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
-<a name="ln-442"></a>         <span class="k">end if</span>
-<a name="ln-443"></a><span class="k">         </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-444"></a>         <span class="n">s</span> <span class="o">=</span> <span class="n">p1</span> <span class="o">+</span> <span class="n">p2</span> <span class="o">-</span> <span class="n">a2</span> <span class="o">/</span> <span class="mf">3.0_DP</span>
-<a name="ln-445"></a>      <span class="k">else</span>
-<a name="ln-446"></a><span class="k">         </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">1</span>
-<a name="ln-447"></a>         <span class="n">s</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-448"></a>      <span class="k">end if</span>
-<a name="ln-449"></a>
-<a name="ln-450"></a><span class="k">      return</span>
-<a name="ln-451"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_p3solve</span>
-<a name="ln-452"></a>   
-<a name="ln-453"></a>
-<a name="ln-454"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
-<a name="ln-455"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-456"></a>      <span class="c">!!</span>
-<a name="ln-457"></a>      <span class="c">!! Compute Stumpff functions needed for Kepler drift in universal variables</span>
-<a name="ln-458"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172.</span>
+<a name="ln-416"></a>      <span class="c">!! Computes real root of cubic involved in setting initial guess for solving Kepler&#39;s equation in universal variables</span>
+<a name="ln-417"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178.</span>
+<a name="ln-418"></a>      <span class="c">!!</span>
+<a name="ln-419"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_p3solve.f90</span>
+<a name="ln-420"></a>      <span class="c">!! Adapted from Martin Duncan&#39;s Swift routine drift_kepu_p3solve.f</span>
+<a name="ln-421"></a>      <span class="k">implicit none</span>
+<a name="ln-422"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iflag</span>
+<a name="ln-423"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r0</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">alpha</span><span class="p">,</span> <span class="n">u</span>
+<a name="ln-424"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">s</span>
+<a name="ln-425"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">denom</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">q</span><span class="p">,</span> <span class="n">r</span><span class="p">,</span> <span class="n">sq2</span><span class="p">,</span> <span class="n">sq</span><span class="p">,</span> <span class="n">p1</span><span class="p">,</span> <span class="n">p2</span>
+<a name="ln-426"></a>
+<a name="ln-427"></a>      <span class="n">denom</span> <span class="o">=</span> <span class="p">(</span><span class="n">mu</span> <span class="o">-</span> <span class="n">alpha</span> <span class="o">*</span> <span class="n">r0</span><span class="p">)</span> <span class="o">/</span> <span class="mf">6.0_DP</span>
+<a name="ln-428"></a>      <span class="n">a2</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="n">u</span> <span class="o">/</span> <span class="n">denom</span>
+<a name="ln-429"></a>      <span class="n">a1</span> <span class="o">=</span> <span class="n">r0</span> <span class="o">/</span> <span class="n">denom</span>
+<a name="ln-430"></a>      <span class="n">a0</span> <span class="o">=</span> <span class="o">-</span><span class="n">dt</span> <span class="o">/</span> <span class="n">denom</span>
+<a name="ln-431"></a>      <span class="n">q</span> <span class="o">=</span> <span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">a2</span><span class="o">**</span><span class="mi">2</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mf">3.0_DP</span>
+<a name="ln-432"></a>      <span class="n">r</span> <span class="o">=</span> <span class="p">(</span><span class="n">a1</span> <span class="o">*</span> <span class="n">a2</span> <span class="o">-</span> <span class="mi">3</span> <span class="o">*</span> <span class="n">a0</span><span class="p">)</span> <span class="o">/</span> <span class="mf">6.0_DP</span> <span class="o">-</span> <span class="n">a2</span><span class="o">**</span><span class="mi">3</span> <span class="o">/</span> <span class="mi">2</span><span class="mf">7.0_DP</span>
+<a name="ln-433"></a>      <span class="n">sq2</span> <span class="o">=</span> <span class="n">q</span><span class="o">**</span><span class="mi">3</span> <span class="o">+</span> <span class="n">r</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-434"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">sq2</span> <span class="o">&gt;=</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-435"></a><span class="k">         </span><span class="n">sq</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">sq2</span><span class="p">)</span>
+<a name="ln-436"></a>         <span class="k">if</span> <span class="p">((</span><span class="n">r</span> <span class="o">+</span> <span class="n">sq</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-437"></a><span class="k">            </span><span class="n">p1</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="o">-</span><span class="p">(</span><span class="n">r</span> <span class="o">+</span> <span class="n">sq</span><span class="p">))</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
+<a name="ln-438"></a>         <span class="k">else</span>
+<a name="ln-439"></a><span class="k">            </span><span class="n">p1</span> <span class="o">=</span> <span class="p">(</span><span class="n">r</span> <span class="o">+</span> <span class="n">sq</span><span class="p">)</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
+<a name="ln-440"></a>         <span class="k">end if</span>
+<a name="ln-441"></a><span class="k">         if</span> <span class="p">((</span><span class="n">r</span> <span class="o">-</span> <span class="n">sq</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-442"></a><span class="k">            </span><span class="n">p2</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="o">-</span><span class="p">(</span><span class="n">r</span> <span class="o">-</span> <span class="n">sq</span><span class="p">))</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
+<a name="ln-443"></a>         <span class="k">else</span>
+<a name="ln-444"></a><span class="k">            </span><span class="n">p2</span> <span class="o">=</span> <span class="p">(</span><span class="n">r</span> <span class="o">-</span> <span class="n">sq</span><span class="p">)</span><span class="o">**</span><span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">/</span> <span class="mf">3.0_DP</span><span class="p">)</span>
+<a name="ln-445"></a>         <span class="k">end if</span>
+<a name="ln-446"></a><span class="k">         </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-447"></a>         <span class="n">s</span> <span class="o">=</span> <span class="n">p1</span> <span class="o">+</span> <span class="n">p2</span> <span class="o">-</span> <span class="n">a2</span> <span class="o">/</span> <span class="mf">3.0_DP</span>
+<a name="ln-448"></a>      <span class="k">else</span>
+<a name="ln-449"></a><span class="k">         </span><span class="n">iflag</span> <span class="o">=</span> <span class="mi">1</span>
+<a name="ln-450"></a>         <span class="n">s</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-451"></a>      <span class="k">end if</span>
+<a name="ln-452"></a>
+<a name="ln-453"></a><span class="k">      return</span>
+<a name="ln-454"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_p3solve</span>
+<a name="ln-455"></a>   
+<a name="ln-456"></a>
+<a name="ln-457"></a>   <span class="k">pure subroutine </span><span class="n">drift_kepu_stumpff</span><span class="p">(</span><span class="n">x</span><span class="p">,</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span><span class="p">)</span>
+<a name="ln-458"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-459"></a>      <span class="c">!!</span>
-<a name="ln-460"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_stumpff.f90</span>
-<a name="ln-461"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu_stumpff.f</span>
-<a name="ln-462"></a>      <span class="k">implicit none</span>
-<a name="ln-463"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span>
-<a name="ln-464"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>
-<a name="ln-465"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">n</span>
-<a name="ln-466"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">xm</span>
-<a name="ln-467"></a>
-<a name="ln-468"></a>      <span class="n">n</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-469"></a>      <span class="n">xm</span> <span class="o">=</span> <span class="mf">0.1_DP</span>
-<a name="ln-470"></a>      <span class="k">do while</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">x</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">xm</span><span class="p">)</span>
-<a name="ln-471"></a>         <span class="n">n</span> <span class="o">=</span> <span class="n">n</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-472"></a>         <span class="n">x</span> <span class="o">=</span> <span class="n">x</span> <span class="o">/</span> <span class="mf">4.0_DP</span>
-<a name="ln-473"></a>      <span class="k">end do</span>
-<a name="ln-474"></a><span class="k">      </span><span class="n">c2</span> <span class="o">=</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">&amp;</span>
-<a name="ln-475"></a>            <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">/</span> <span class="mi">18</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">13</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">9</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">5</span><span class="mf">6.0_DP</span><span class="p">)</span> <span class="o">/</span>        <span class="p">&amp;</span>
-<a name="ln-476"></a>             <span class="mi">3</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">1</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mf">2.0_DP</span>
-<a name="ln-477"></a>      <span class="n">c3</span> <span class="o">=</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">&amp;</span>
-<a name="ln-478"></a>            <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">/</span> <span class="mi">21</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">15</span><span class="mf">6.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">11</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">7</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span>       <span class="p">&amp;</span>
-<a name="ln-479"></a>             <span class="mi">4</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span><span class="mf">0.0_DP</span> <span class="p">)</span> <span class="o">/</span> <span class="mf">6.0_DP</span>
-<a name="ln-480"></a>      <span class="n">c1</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="n">c3</span>
-<a name="ln-481"></a>      <span class="n">c0</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="n">c2</span>
-<a name="ln-482"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">n</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-483"></a><span class="k">         do </span><span class="n">i</span> <span class="o">=</span> <span class="n">n</span><span class="p">,</span> <span class="mi">1</span><span class="p">,</span> <span class="o">-</span><span class="mi">1</span>
-<a name="ln-484"></a>            <span class="n">c3</span> <span class="o">=</span> <span class="p">(</span><span class="n">c2</span> <span class="o">+</span> <span class="n">c0</span> <span class="o">*</span> <span class="n">c3</span><span class="p">)</span> <span class="o">/</span> <span class="mf">4.0_DP</span>
-<a name="ln-485"></a>            <span class="n">c2</span> <span class="o">=</span> <span class="n">c1</span><span class="o">**</span><span class="mi">2</span> <span class="o">/</span> <span class="mf">2.0_DP</span>
-<a name="ln-486"></a>            <span class="n">c1</span> <span class="o">=</span> <span class="n">c0</span> <span class="o">*</span> <span class="n">c1</span>
-<a name="ln-487"></a>            <span class="n">c0</span> <span class="o">=</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">c0</span><span class="o">**</span><span class="mi">2</span> <span class="o">-</span> <span class="mf">1.0_DP</span>
-<a name="ln-488"></a>            <span class="n">x</span> <span class="o">=</span> <span class="n">x</span> <span class="o">*</span> <span class="mi">4</span>
-<a name="ln-489"></a>         <span class="k">end do</span>
-<a name="ln-490"></a><span class="k">      end if</span>
-<a name="ln-491"></a>
-<a name="ln-492"></a><span class="k">      return</span>
-<a name="ln-493"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_stumpff</span>
+<a name="ln-460"></a>      <span class="c">!! Compute Stumpff functions needed for Kepler drift in universal variables</span>
+<a name="ln-461"></a>      <span class="c">!!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172.</span>
+<a name="ln-462"></a>      <span class="c">!!</span>
+<a name="ln-463"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: drift_kepu_stumpff.f90</span>
+<a name="ln-464"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine drift_kepu_stumpff.f</span>
+<a name="ln-465"></a>      <span class="k">implicit none</span>
+<a name="ln-466"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span>
+<a name="ln-467"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">c0</span><span class="p">,</span> <span class="n">c1</span><span class="p">,</span> <span class="n">c2</span><span class="p">,</span> <span class="n">c3</span>
+<a name="ln-468"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">n</span>
+<a name="ln-469"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">xm</span>
+<a name="ln-470"></a>
+<a name="ln-471"></a>      <span class="n">n</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-472"></a>      <span class="n">xm</span> <span class="o">=</span> <span class="mf">0.1_DP</span>
+<a name="ln-473"></a>      <span class="k">do while</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">x</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">xm</span><span class="p">)</span>
+<a name="ln-474"></a>         <span class="n">n</span> <span class="o">=</span> <span class="n">n</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-475"></a>         <span class="n">x</span> <span class="o">=</span> <span class="n">x</span> <span class="o">/</span> <span class="mf">4.0_DP</span>
+<a name="ln-476"></a>      <span class="k">end do</span>
+<a name="ln-477"></a><span class="k">      </span><span class="n">c2</span> <span class="o">=</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">&amp;</span>
+<a name="ln-478"></a>            <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">/</span> <span class="mi">18</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">13</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">9</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">5</span><span class="mf">6.0_DP</span><span class="p">)</span> <span class="o">/</span>        <span class="p">&amp;</span>
+<a name="ln-479"></a>             <span class="mi">3</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">1</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mf">2.0_DP</span>
+<a name="ln-480"></a>      <span class="n">c3</span> <span class="o">=</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="p">&amp;</span>
+<a name="ln-481"></a>            <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">/</span> <span class="mi">21</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">15</span><span class="mf">6.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">11</span><span class="mf">0.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">7</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span>       <span class="p">&amp;</span>
+<a name="ln-482"></a>             <span class="mi">4</span><span class="mf">2.0_DP</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span><span class="mf">0.0_DP</span> <span class="p">)</span> <span class="o">/</span> <span class="mf">6.0_DP</span>
+<a name="ln-483"></a>      <span class="n">c1</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="n">c3</span>
+<a name="ln-484"></a>      <span class="n">c0</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">x</span> <span class="o">*</span> <span class="n">c2</span>
+<a name="ln-485"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">n</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-486"></a><span class="k">         do </span><span class="n">i</span> <span class="o">=</span> <span class="n">n</span><span class="p">,</span> <span class="mi">1</span><span class="p">,</span> <span class="o">-</span><span class="mi">1</span>
+<a name="ln-487"></a>            <span class="n">c3</span> <span class="o">=</span> <span class="p">(</span><span class="n">c2</span> <span class="o">+</span> <span class="n">c0</span> <span class="o">*</span> <span class="n">c3</span><span class="p">)</span> <span class="o">/</span> <span class="mf">4.0_DP</span>
+<a name="ln-488"></a>            <span class="n">c2</span> <span class="o">=</span> <span class="n">c1</span><span class="o">**</span><span class="mi">2</span> <span class="o">/</span> <span class="mf">2.0_DP</span>
+<a name="ln-489"></a>            <span class="n">c1</span> <span class="o">=</span> <span class="n">c0</span> <span class="o">*</span> <span class="n">c1</span>
+<a name="ln-490"></a>            <span class="n">c0</span> <span class="o">=</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">c0</span><span class="o">**</span><span class="mi">2</span> <span class="o">-</span> <span class="mf">1.0_DP</span>
+<a name="ln-491"></a>            <span class="n">x</span> <span class="o">=</span> <span class="n">x</span> <span class="o">*</span> <span class="mi">4</span>
+<a name="ln-492"></a>         <span class="k">end do</span>
+<a name="ln-493"></a><span class="k">      end if</span>
 <a name="ln-494"></a>
-<a name="ln-495"></a>
-<a name="ln-496"></a><span class="k">end submodule </span><span class="n">drift_implementation</span>
+<a name="ln-495"></a><span class="k">      return</span>
+<a name="ln-496"></a><span class="k">   end subroutine </span><span class="n">drift_kepu_stumpff</span>
+<a name="ln-497"></a>
+<a name="ln-498"></a>
+<a name="ln-499"></a><span class="k">end submodule </span><span class="n">drift_implementation</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/fraggle_classes.f90.html b/docs/sourcefile/fraggle_classes.f90.html
index a7d805d7d..a49506d90 100644
--- a/docs/sourcefile/fraggle_classes.f90.html
+++ b/docs/sourcefile/fraggle_classes.f90.html
@@ -234,44 +234,44 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
-<polygon fill="none" stroke="black" points="390,-24 285,-24 285,0 390,0 390,-24"/>
-<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_classes.f90</text>
+<polygon fill="none" stroke="black" points="390,-44 285,-44 285,-20 390,-20 390,-44"/>
+<text text-anchor="middle" x="337.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_classes.f90</text>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~EfferentGraph_node2" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-44 142,-44 142,-20 249,-20 249,-44"/>
-<text text-anchor="middle" x="195.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-44 0,-44 0,-20 106,-20 106,-44"/>
+<text text-anchor="middle" x="53" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~EfferentGraph_edge1" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.77,-19.39C276.57,-20.56 268.02,-21.78 259.6,-22.99"/>
-<polygon fill="#000000" stroke="#000000" points="258.83,-19.56 249.42,-24.44 259.82,-26.49 258.83,-19.56"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.68,-32.69C272.95,-32.82 260.55,-32.93 249,-33 201.45,-33.27 189.55,-33.27 142,-33 133.65,-32.95 124.86,-32.88 116.2,-32.79"/>
+<polygon fill="#000000" stroke="#000000" points="116.15,-29.29 106.12,-32.69 116.08,-36.29 116.15,-29.29"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-24 0,-24 0,0 106,0 106,-24"/>
-<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-24 142,-24 142,0 249,0 249,-24"/>
+<text text-anchor="middle" x="195.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.68,-11.31C272.95,-11.18 260.55,-11.07 249,-11 201.45,-10.73 189.55,-10.73 142,-11 133.65,-11.05 124.86,-11.12 116.2,-11.21"/>
-<polygon fill="#000000" stroke="#000000" points="116.08,-7.71 106.12,-11.31 116.15,-14.71 116.08,-7.71"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.77,-24.61C276.57,-23.44 268.02,-22.22 259.6,-21.01"/>
+<polygon fill="#000000" stroke="#000000" points="259.82,-17.51 249.42,-19.56 258.83,-24.44 259.82,-17.51"/>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-24.5C133.39,-23.3 124.64,-22.06 116.05,-20.83"/>
-<polygon fill="#000000" stroke="#000000" points="116.47,-17.36 106.08,-19.41 115.49,-24.29 116.47,-17.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-19.5C133.39,-20.7 124.64,-21.94 116.05,-23.17"/>
+<polygon fill="#000000" stroke="#000000" points="115.49,-19.71 106.08,-24.59 116.47,-26.64 115.49,-19.71"/>
 </g>
 </g>
 </svg>
@@ -332,1137 +332,1136 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
-<polygon fill="none" stroke="black" points="105,-1368 0,-1368 0,-1344 105,-1344 105,-1368"/>
-<text text-anchor="middle" x="52.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_classes.f90</text>
+<polygon fill="none" stroke="black" points="105,-1431 0,-1431 0,-1407 105,-1407 105,-1431"/>
+<text text-anchor="middle" x="52.5" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_classes.f90</text>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506,-2796 422,-2796 422,-2772 506,-2772 506,-2796"/>
-<text text-anchor="middle" x="464" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="520,-2796 408,-2796 408,-2772 520,-2772 520,-2796"/>
+<text text-anchor="middle" x="464" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.78,-2778.41C390.48,-2772.78 347.3,-2761.98 314,-2742"/>
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.55,-2771.92C403.08,-2769.15 392.14,-2766.11 382,-2763 297,-2736.93 282.35,-2699.44 193.5,-2696"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node9" class="node">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node6" class="node">
 <title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="346,-1368 280,-1368 280,-1344 346,-1344 346,-1368"/>
-<text text-anchor="middle" x="313" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="346,-1431 280,-1431 280,-1407 346,-1407 346,-1431"/>
+<text text-anchor="middle" x="313" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.75,-2783.05C406.98,-2780.49 391.62,-2774.83 382,-2763 336.38,-2706.89 317.01,-1553.09 314.33,-1378.15"/>
-<polygon fill="#000000" stroke="#000000" points="317.83,-1378.01 314.18,-1368.06 310.83,-1378.11 317.83,-1378.01"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge38" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.86,-2779.61C397.91,-2776.32 388.61,-2771.11 382,-2763 338.47,-2709.59 317.42,-1612.92 314.38,-1441.46"/>
+<polygon fill="#000000" stroke="#000000" points="317.88,-1441.26 314.21,-1431.33 310.88,-1441.39 317.88,-1441.26"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-2754 425,-2754 425,-2730 503,-2730 503,-2754"/>
-<text text-anchor="middle" x="464" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="244,-1431 141,-1431 141,-1407 244,-1407 244,-1431"/>
+<text text-anchor="middle" x="192.5" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.95,-2752.2C393.01,-2758.51 347.39,-2762.03 314,-2742"/>
-</g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.7,-2741.52C409.06,-2739.21 392.27,-2733.62 382,-2721 337.76,-2666.68 317.27,-1550.64 314.36,-1378.27"/>
-<polygon fill="#000000" stroke="#000000" points="317.86,-1378.05 314.19,-1368.11 310.86,-1378.16 317.86,-1378.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.9,-1419C132.49,-1419 123.7,-1419 115.06,-1419"/>
+<polygon fill="#000000" stroke="#000000" points="115.02,-1415.5 105.02,-1419 115.02,-1422.5 115.02,-1415.5"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="520,-2712 408,-2712 408,-2688 520,-2688 520,-2712"/>
-<text text-anchor="middle" x="464" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="512,-234 416,-234 416,-210 512,-210 512,-234"/>
+<text text-anchor="middle" x="464" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.93,-2712.07C404.07,-2714.91 392.62,-2717.98 382,-2721 351.57,-2729.64 341.13,-2758.27 314,-2742"/>
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.67,-213.89C404.22,-210.82 392.32,-206.65 382,-201 345.85,-181.23 355.1,-135.16 314,-138"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M407.86,-2695.61C397.91,-2692.31 388.61,-2687.11 382,-2679 339.15,-2626.46 317.54,-1547.97 314.4,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="317.9,-1378.07 314.21,-1368.13 310.9,-1378.2 317.9,-1378.07"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge69" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.88,-224.19C403.05,-227.18 390.39,-232.78 382,-243 343.94,-289.35 318.53,-1238.51 314.55,-1396.73"/>
+<polygon fill="#000000" stroke="#000000" points="311.05,-1396.65 314.3,-1406.73 318.05,-1396.82 311.05,-1396.65"/>
 </g>
 <!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node5" class="node">
 <title>sourcefile~fraggle_util.f90</title>
 <g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505.5,-2670 422.5,-2670 422.5,-2646 505.5,-2646 505.5,-2670"/>
-<text text-anchor="middle" x="464" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505.5,-192 422.5,-192 422.5,-168 505.5,-168 505.5,-192"/>
+<text text-anchor="middle" x="464" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge5" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge4" class="edge">
 <title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312,-2742C167.37,-2752.01 69.04,-1556.4 55.18,-1378.12"/>
-<polygon fill="#000000" stroke="#000000" points="58.67,-1377.78 54.41,-1368.07 51.69,-1378.31 58.67,-1377.78"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.38,-2664.41C408.99,-2667.59 394.36,-2672.24 382,-2679 345.85,-2698.77 349.33,-2763.19 314,-2742"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.11,-169.79C409.24,-166.47 395,-162.69 382,-159 351.57,-150.36 345.56,-135.82 314,-138"/>
 </g>
 <!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge77" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge78" class="edge">
 <title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.2,-2657.1C407.31,-2654.57 391.74,-2648.92 382,-2637 340.5,-2586.21 317.79,-1544.05 314.44,-1378.17"/>
-<polygon fill="#000000" stroke="#000000" points="317.94,-1378.07 314.24,-1368.14 310.94,-1378.21 317.94,-1378.07"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.21,-180.91C407.32,-183.44 391.76,-189.09 382,-201 342.59,-249.09 318.26,-1234.12 314.51,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="311,-1396.61 314.27,-1406.69 318,-1396.77 311,-1396.61"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="244,-1368 141,-1368 141,-1344 244,-1344 244,-1368"/>
-<text text-anchor="middle" x="192.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge5" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.53,-1431.26C306.47,-1562.21 260.59,-2698.6 193.5,-2696"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M191.5,-2696C60.06,-2690.92 53.68,-1610.41 53.49,-1441.18"/>
+<polygon fill="#000000" stroke="#000000" points="56.99,-1441.18 53.48,-1431.18 49.99,-1441.18 56.99,-1441.18"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.93,-1419C272.05,-1419 263.35,-1419 254.59,-1419"/>
+<polygon fill="#000000" stroke="#000000" points="254.33,-1415.5 244.33,-1419 254.33,-1422.5 254.33,-1415.5"/>
+</g>
+<!-- sourcefile~fraggle_placeholder.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node7" class="node">
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="526,-150 402,-150 402,-126 526,-126 526,-150"/>
+<text text-anchor="middle" x="464" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.9,-1356C132.49,-1356 123.7,-1356 115.06,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="115.02,-1352.5 105.02,-1356 115.02,-1359.5 115.02,-1352.5"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge6" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.68,-136.1C374.75,-135.75 342.77,-136.01 314,-138"/>
+</g>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge59" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.76,-144.72C394.17,-147.99 387.24,-152.59 382,-159 341.24,-208.84 317.99,-1229.87 314.47,-1396.19"/>
+<polygon fill="#000000" stroke="#000000" points="310.96,-1396.59 314.25,-1406.66 317.96,-1396.74 310.96,-1396.59"/>
 </g>
 <!-- sourcefile~fraggle_regime.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node7" class="node">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node8" class="node">
 <title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="515.5,-108 412.5,-108 412.5,-84 515.5,-84 515.5,-108"/>
 <text text-anchor="middle" x="464" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge6" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge7" class="edge">
 <title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.42,-92.62C383.48,-91.52 346.55,-91.56 314,-96"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.93,-108.07C404.07,-110.91 392.62,-113.98 382,-117 351.57,-125.64 345.56,-135.82 314,-138"/>
 </g>
 <!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge67" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge34" class="edge">
 <title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.49,-99.03C400.84,-102.18 389.64,-107.67 382,-117 341.9,-165.99 318.1,-1170.01 314.48,-1333.57"/>
-<polygon fill="#000000" stroke="#000000" points="310.98,-1333.79 314.26,-1343.87 317.98,-1333.95 310.98,-1333.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.47,-99.01C400.82,-102.17 389.63,-107.66 382,-117 339.85,-168.63 317.69,-1227.87 314.42,-1396.47"/>
+<polygon fill="#000000" stroke="#000000" points="310.92,-1396.59 314.23,-1406.66 317.92,-1396.73 310.92,-1396.59"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="526,-66 402,-66 402,-42 526,-42 526,-66"/>
-<text text-anchor="middle" x="464" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<!-- sourcefile~fraggle_io.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node9" class="node">
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-66 425,-66 425,-42 503,-42 503,-66"/>
+<text text-anchor="middle" x="464" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.93,-66.07C404.07,-68.91 392.62,-71.98 382,-75 351.57,-83.64 345.34,-91.72 314,-96"/>
-</g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge83" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.76,-60.72C394.16,-63.99 387.24,-68.59 382,-75 340.5,-125.79 317.79,-1167.95 314.44,-1333.83"/>
-<polygon fill="#000000" stroke="#000000" points="310.94,-1333.79 314.24,-1343.86 317.94,-1333.93 310.94,-1333.79"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.52,-1343.91C306.37,-1214.69 259.71,-93.41 193.5,-96"/>
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.85,-59.84C410.8,-63.02 395.13,-67.82 382,-75 345.85,-94.77 355.1,-135.16 314,-138"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.93,-1356C272.05,-1356 263.35,-1356 254.59,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="254.33,-1352.5 244.33,-1356 254.33,-1359.5 254.33,-1352.5"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge37" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.7,-54.49C409.07,-56.79 392.28,-62.39 382,-75 338.47,-128.41 317.42,-1225.08 314.38,-1396.54"/>
+<polygon fill="#000000" stroke="#000000" points="310.88,-1396.61 314.21,-1406.67 317.88,-1396.74 310.88,-1396.61"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="512,-24 416,-24 416,0 512,0 512,-24"/>
-<text text-anchor="middle" x="464" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506,-24 422,-24 422,0 506,0 506,-24"/>
+<text text-anchor="middle" x="464" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.67,-20.11C404.22,-23.18 392.32,-27.35 382,-33 345.85,-52.77 354.82,-90.43 314,-96"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312,-96C259.82,-103.12 246.13,-93.94 193.5,-96"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M191.5,-96C61.86,-101.08 53.96,-1166.09 53.52,-1333.86"/>
-<polygon fill="#000000" stroke="#000000" points="50.02,-1333.98 53.5,-1343.99 57.02,-1333.99 50.02,-1333.98"/>
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312,-138C45.11,-156.47 50.57,-1228.02 53.09,-1396.74"/>
+<polygon fill="#000000" stroke="#000000" points="49.59,-1396.98 53.26,-1406.92 56.59,-1396.86 49.59,-1396.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.72,-16.61C408.12,-19.64 393.55,-24.67 382,-33 336.91,-65.53 363.15,-112.01 314,-138"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.84,-14.16C403.01,-17.14 390.36,-22.76 382,-33 339.15,-85.54 317.54,-1164.03 314.4,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="310.9,-1333.8 314.21,-1343.87 317.9,-1333.93 310.9,-1333.8"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge86" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.75,-12.95C406.98,-15.51 391.63,-21.17 382,-33 359.52,-60.63 320.52,-1220.65 314.73,-1396.71"/>
+<polygon fill="#000000" stroke="#000000" points="311.23,-1396.75 314.4,-1406.86 318.22,-1396.98 311.23,-1396.75"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="539,-2628 389,-2628 389,-2604 539,-2604 539,-2628"/>
-<text text-anchor="middle" x="464" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="517,-2754 411,-2754 411,-2730 517,-2730 517,-2754"/>
+<text text-anchor="middle" x="464" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M399.83,-2603.93C393.56,-2601.48 387.5,-2598.54 382,-2595 341.61,-2569 349.68,-2543.15 314,-2511"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge10" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.67,-2733.13C400.73,-2730.16 390.72,-2726.22 382,-2721 361.76,-2708.88 363.51,-2697.81 346,-2682 332.81,-2670.09 326.31,-2670.83 314,-2658"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M391.89,-2603.93C388.2,-2601.43 384.85,-2598.48 382,-2595 341.9,-2546.01 318.1,-1541.99 314.48,-1378.43"/>
-<polygon fill="#000000" stroke="#000000" points="317.98,-1378.05 314.26,-1368.13 310.98,-1378.21 317.98,-1378.05"/>
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.79,-2738.52C399.75,-2735.29 389.26,-2729.89 382,-2721 339.85,-2669.37 317.69,-1610.13 314.42,-1441.53"/>
+<polygon fill="#000000" stroke="#000000" points="317.92,-1441.27 314.23,-1431.34 310.92,-1441.41 317.92,-1441.27"/>
 </g>
 <!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node12" class="node">
 <title>sourcefile~symba_step.f90</title>
 <g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="508,-2586 420,-2586 420,-2562 508,-2562 508,-2586"/>
-<text text-anchor="middle" x="464" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="508,-2712 420,-2712 420,-2688 508,-2688 508,-2712"/>
+<text text-anchor="middle" x="464" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge14" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge11" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.74,-2565.33C407.3,-2562.16 393.89,-2558.08 382,-2553 349.33,-2539.05 340.39,-2534.78 314,-2511"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.84,-2699.15C386.42,-2696.12 341.35,-2686.51 314,-2658"/>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge21" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge29" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.69,-2572.62C405.59,-2569.89 391.21,-2564.23 382,-2553 343.25,-2505.75 318.37,-1537.7 314.52,-1378.17"/>
-<polygon fill="#000000" stroke="#000000" points="318.02,-1378.01 314.28,-1368.1 311.02,-1378.18 318.02,-1378.01"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.67,-2698.64C405.57,-2695.91 391.2,-2690.25 382,-2679 341.24,-2629.16 317.99,-1608.13 314.47,-1441.81"/>
+<polygon fill="#000000" stroke="#000000" points="317.96,-1441.26 314.25,-1431.34 310.96,-1441.41 317.96,-1441.26"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-2376 427.5,-2376 427.5,-2352 500.5,-2352 500.5,-2376"/>
-<text text-anchor="middle" x="464" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-2586 437,-2586 437,-2562 491,-2562 491,-2586"/>
+<text text-anchor="middle" x="464" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.31,-2363.77C411.02,-2361.68 392.95,-2356.19 382,-2343 318.37,-2266.36 314.22,-1518.16 314,-1378.42"/>
-<polygon fill="#000000" stroke="#000000" points="317.5,-1378.1 313.99,-1368.1 310.5,-1378.11 317.5,-1378.1"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.92,-2574.69C418.6,-2573.65 395.11,-2568.93 382,-2553 308.8,-2464.03 312.57,-1592.74 313.79,-1441.36"/>
+<polygon fill="#000000" stroke="#000000" points="317.29,-1441.05 313.88,-1431.02 310.29,-1440.99 317.29,-1441.05"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="519.5,-2334 408.5,-2334 408.5,-2310 519.5,-2310 519.5,-2334"/>
-<text text-anchor="middle" x="464" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-2670 421,-2670 421,-2646 507,-2646 507,-2670"/>
+<text text-anchor="middle" x="464" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.41,-2317.64C398.29,-2314.36 388.79,-2309.15 382,-2301 321.08,-2227.85 314.73,-1514.27 314.08,-1378.31"/>
-<polygon fill="#000000" stroke="#000000" points="317.58,-1378.23 314.03,-1368.24 310.58,-1378.26 317.58,-1378.23"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.85,-2670.05C395.62,-2680.1 343.19,-2688.42 314,-2658"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.95,-2656.87C406.45,-2654.23 391.48,-2648.57 382,-2637 342.59,-2588.91 318.26,-1603.88 314.51,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="318,-1441.23 314.27,-1431.31 311,-1441.39 318,-1441.23"/>
+</g>
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-2292 425.5,-2292 425.5,-2268 502.5,-2268 502.5,-2292"/>
-<text text-anchor="middle" x="464" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497.5,-2544 430.5,-2544 430.5,-2520 497.5,-2520 497.5,-2544"/>
+<text text-anchor="middle" x="464" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.27,-2279.45C409.54,-2277.16 392.53,-2271.6 382,-2259 323.77,-2189.33 315.26,-1510.05 314.15,-1378.13"/>
-<polygon fill="#000000" stroke="#000000" points="317.65,-1377.99 314.07,-1368.02 310.65,-1378.05 317.65,-1377.99"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M430.15,-2532.14C413.14,-2530.34 393.55,-2525.01 382,-2511 311.55,-2425.58 313.02,-1589.81 313.85,-1441.46"/>
+<polygon fill="#000000" stroke="#000000" points="317.35,-1441.31 313.91,-1431.29 310.35,-1441.27 317.35,-1441.31"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="517,-2544 411,-2544 411,-2520 517,-2520 517,-2544"/>
-<text text-anchor="middle" x="464" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="515.5,-2628 412.5,-2628 412.5,-2604 515.5,-2604 515.5,-2628"/>
+<text text-anchor="middle" x="464" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.74,-2538.22C379.02,-2539.02 339.81,-2534.26 314,-2511"/>
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312,-2658C224.15,-2566.45 197.75,-1600.03 193.99,-1441.07"/>
+<polygon fill="#000000" stroke="#000000" points="197.49,-1440.96 193.76,-1431.05 190.49,-1441.12 197.49,-1440.96"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.93,-2628.07C404.07,-2630.91 392.62,-2633.98 382,-2637 351.57,-2645.64 335.9,-2680.82 314,-2658"/>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.83,-2528.48C399.79,-2525.26 389.29,-2519.87 382,-2511 307.42,-2420.26 312.36,-1531.17 313.77,-1378.31"/>
-<polygon fill="#000000" stroke="#000000" points="317.27,-1378.28 313.86,-1368.25 310.27,-1378.21 317.27,-1378.28"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.08,-2612.84C400.59,-2609.67 389.56,-2604.21 382,-2595 343.94,-2548.65 318.53,-1599.49 314.55,-1441.27"/>
+<polygon fill="#000000" stroke="#000000" points="318.05,-1441.18 314.3,-1431.27 311.05,-1441.35 318.05,-1441.18"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="523,-2250 405,-2250 405,-2226 523,-2226 523,-2250"/>
-<text text-anchor="middle" x="464" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502,-2502 426,-2502 426,-2478 502,-2478 502,-2502"/>
+<text text-anchor="middle" x="464" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.74,-2232.3C396.03,-2229 387.98,-2224.12 382,-2217 326.52,-2150.86 315.83,-1506.92 314.24,-1378.29"/>
-<polygon fill="#000000" stroke="#000000" points="317.74,-1378.04 314.12,-1368.08 310.74,-1378.12 317.74,-1378.04"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.62,-2489.57C409.77,-2487.32 392.55,-2481.76 382,-2469 314.28,-2387.1 313.49,-1586.54 313.9,-1441.48"/>
+<polygon fill="#000000" stroke="#000000" points="317.41,-1441.17 313.94,-1431.16 310.41,-1441.15 317.41,-1441.17"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-2208 430,-2208 430,-2184 498,-2184 498,-2208"/>
-<text text-anchor="middle" x="464" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="516.5,-2460 411.5,-2460 411.5,-2436 516.5,-2436 516.5,-2460"/>
+<text text-anchor="middle" x="464" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.86,-2196C412.97,-2194.14 393.6,-2188.78 382,-2175 329.25,-2112.37 316.42,-1503.38 314.34,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="317.83,-1378.04 314.17,-1368.1 310.83,-1378.16 317.83,-1378.04"/>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.3,-2444.56C400.11,-2441.35 389.42,-2435.95 382,-2427 316.94,-2348.53 313.97,-1581.46 313.97,-1441.02"/>
+<polygon fill="#000000" stroke="#000000" points="317.47,-1441.02 313.97,-1431.02 310.47,-1441.01 317.47,-1441.02"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-2166 421.5,-2166 421.5,-2142 506.5,-2142 506.5,-2166"/>
-<text text-anchor="middle" x="464" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-2418 425.5,-2418 425.5,-2394 502.5,-2394 502.5,-2418"/>
+<text text-anchor="middle" x="464" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.14,-2152.7C406.66,-2150.05 391.66,-2144.42 382,-2133 331.96,-2073.85 317.04,-1499.44 314.44,-1378.34"/>
-<polygon fill="#000000" stroke="#000000" points="317.94,-1378 314.23,-1368.07 310.94,-1378.14 317.94,-1378"/>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge27" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.24,-2405.48C409.51,-2403.19 392.5,-2397.62 382,-2385 319.72,-2310.11 314.47,-1579.25 314.04,-1441.37"/>
+<polygon fill="#000000" stroke="#000000" points="317.54,-1441.17 314.01,-1431.18 310.54,-1441.19 317.54,-1441.17"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497.5,-2124 430.5,-2124 430.5,-2100 497.5,-2100 497.5,-2124"/>
-<text text-anchor="middle" x="464" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-2376 421.5,-2376 421.5,-2352 506.5,-2352 506.5,-2376"/>
+<text text-anchor="middle" x="464" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M430.32,-2112C413.35,-2110.17 393.76,-2104.83 382,-2091 334.7,-2035.38 317.72,-1496.24 314.57,-1378.6"/>
-<polygon fill="#000000" stroke="#000000" points="318.06,-1378.18 314.3,-1368.28 311.06,-1378.37 318.06,-1378.18"/>
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge28" class="edge">
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.48,-2362.85C406.86,-2360.24 391.68,-2354.6 382,-2343 322.49,-2271.67 315.01,-1576.62 314.12,-1441.64"/>
+<polygon fill="#000000" stroke="#000000" points="317.61,-1441.28 314.05,-1431.3 310.61,-1441.32 317.61,-1441.28"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-2082 421.5,-2082 421.5,-2058 506.5,-2058 506.5,-2082"/>
-<text text-anchor="middle" x="464" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535,-2334 393,-2334 393,-2310 535,-2310 535,-2334"/>
+<text text-anchor="middle" x="464" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.21,-2068.65C406.74,-2065.99 391.72,-2060.37 382,-2049 337.37,-1996.81 318.4,-1491.42 314.69,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="318.18,-1378.02 314.37,-1368.14 311.19,-1378.24 318.18,-1378.02"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge30" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M392.7,-2310.32C388.71,-2307.75 385.08,-2304.68 382,-2301 325.18,-2233.13 315.55,-1572.2 314.2,-1441.42"/>
+<polygon fill="#000000" stroke="#000000" points="317.69,-1441.02 314.1,-1431.06 310.69,-1441.09 317.69,-1441.02"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-2040 425,-2040 425,-2016 503,-2016 503,-2040"/>
-<text text-anchor="middle" x="464" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-2292 430,-2292 430,-2268 498,-2268 498,-2292"/>
+<text text-anchor="middle" x="464" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.6,-2027.18C409.14,-2024.79 392.52,-2019.22 382,-2007 340.08,-1958.28 319.14,-1487.22 314.84,-1378.37"/>
-<polygon fill="#000000" stroke="#000000" points="318.33,-1378.06 314.45,-1368.21 311.34,-1378.33 318.33,-1378.06"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge84" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.85,-2280.01C412.96,-2278.15 393.59,-2272.79 382,-2259 327.86,-2194.58 316.11,-1567.57 314.29,-1441.15"/>
+<polygon fill="#000000" stroke="#000000" points="317.78,-1441.05 314.15,-1431.1 310.79,-1441.15 317.78,-1441.05"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503.5,-1998 424.5,-1998 424.5,-1974 503.5,-1974 503.5,-1998"/>
-<text text-anchor="middle" x="464" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-2250 382,-2250 382,-2226 546,-2226 546,-2250"/>
+<text text-anchor="middle" x="464" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.23,-1985.08C408.89,-1982.65 392.47,-1977.08 382,-1965 342.75,-1919.72 319.92,-1482.48 315.01,-1378.23"/>
-<polygon fill="#000000" stroke="#000000" points="318.5,-1378.03 314.54,-1368.2 311.51,-1378.35 318.5,-1378.03"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M392.01,-2225.82C388.29,-2223.36 384.9,-2220.44 382,-2217 330.58,-2156.08 316.72,-1563.86 314.39,-1441.18"/>
+<polygon fill="#000000" stroke="#000000" points="317.88,-1441.03 314.2,-1431.09 310.88,-1441.15 317.88,-1441.03"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="515.5,-2502 412.5,-2502 412.5,-2478 515.5,-2478 515.5,-2502"/>
-<text text-anchor="middle" x="464" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="515.5,-2208 412.5,-2208 412.5,-2184 515.5,-2184 515.5,-2208"/>
+<text text-anchor="middle" x="464" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.46,-2500.95C372.18,-2509.05 321.35,-2517.62 314,-2511"/>
-</g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.11,-2486.83C400.61,-2483.65 389.57,-2478.19 382,-2469 310.17,-2381.81 312.8,-1528.31 313.82,-1378.42"/>
-<polygon fill="#000000" stroke="#000000" points="317.32,-1378.19 313.89,-1368.16 310.32,-1378.13 317.32,-1378.19"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.29,-2192.67C400.78,-2189.5 389.71,-2184.08 382,-2175 333.28,-2117.56 317.35,-1559.75 314.5,-1441.11"/>
+<polygon fill="#000000" stroke="#000000" points="317.99,-1440.95 314.26,-1431.04 310.99,-1441.12 317.99,-1440.95"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-1956 427.5,-1956 427.5,-1932 500.5,-1932 500.5,-1956"/>
-<text text-anchor="middle" x="464" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-2166 430,-2166 430,-2142 498,-2142 498,-2166"/>
+<text text-anchor="middle" x="464" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.18,-1943.47C411.07,-1941.28 393.19,-1935.8 382,-1923 345.45,-1881.17 320.78,-1478.03 315.2,-1378.25"/>
-<polygon fill="#000000" stroke="#000000" points="318.69,-1377.9 314.64,-1368.11 311.7,-1378.28 318.69,-1377.9"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.92,-2153.94C413.06,-2152.06 393.69,-2146.71 382,-2133 336.02,-2079.07 318.04,-1556.35 314.62,-1441.32"/>
+<polygon fill="#000000" stroke="#000000" points="318.12,-1441.11 314.33,-1431.21 311.12,-1441.31 318.12,-1441.11"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="511,-2460 417,-2460 417,-2436 511,-2436 511,-2460"/>
-<text text-anchor="middle" x="464" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-2124 428.5,-2124 428.5,-2100 499.5,-2100 499.5,-2124"/>
+<text text-anchor="middle" x="464" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.79,-2457.43C405.2,-2460.49 392.96,-2464.32 382,-2469 349.33,-2482.95 340.39,-2534.78 314,-2511"/>
-</g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.77,-2445.97C403.64,-2443.04 390.6,-2437.42 382,-2427 312.91,-2343.34 313.25,-1525.17 313.87,-1378.47"/>
-<polygon fill="#000000" stroke="#000000" points="317.38,-1378.07 313.92,-1368.05 310.38,-1378.03 317.38,-1378.07"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428.32,-2111.72C411.86,-2109.67 393.35,-2104.23 382,-2091 338.68,-2040.5 318.73,-1551.37 314.75,-1441.04"/>
+<polygon fill="#000000" stroke="#000000" points="318.25,-1440.91 314.4,-1431.04 311.26,-1441.16 318.25,-1440.91"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505,-2418 423,-2418 423,-2394 505,-2394 505,-2418"/>
-<text text-anchor="middle" x="464" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-2082 436.5,-2082 436.5,-2058 491.5,-2058 491.5,-2082"/>
+<text text-anchor="middle" x="464" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.62,-2411.22C408.95,-2414.31 394.09,-2419.22 382,-2427 341.61,-2453 349.68,-2543.15 314,-2511"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312,-2511C224.35,-2432.01 197.9,-1531.34 194.03,-1378.1"/>
-<polygon fill="#000000" stroke="#000000" points="197.52,-1377.93 193.78,-1368.02 190.53,-1378.11 197.52,-1377.93"/>
-</g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.7,-2405.11C407.69,-2402.61 391.91,-2396.97 382,-2385 315.65,-2304.86 313.73,-1521.84 313.94,-1378.48"/>
-<polygon fill="#000000" stroke="#000000" points="317.44,-1378.27 313.96,-1368.27 310.44,-1378.26 317.44,-1378.27"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.37,-2070.45C418.27,-2069.23 395.29,-2064.39 382,-2049 341.42,-2002 319.53,-1547.89 314.92,-1441.31"/>
+<polygon fill="#000000" stroke="#000000" points="318.41,-1440.92 314.49,-1431.08 311.42,-1441.22 318.41,-1440.92"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1914 430,-1914 430,-1890 498,-1890 498,-1914"/>
-<text text-anchor="middle" x="464" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494,-2040 434,-2040 434,-2016 494,-2016 494,-2040"/>
+<text text-anchor="middle" x="464" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.7,-1901.73C412.98,-1899.77 393.82,-1894.4 382,-1881 314.79,-1804.83 312.95,-1468.78 313.7,-1378.43"/>
-<polygon fill="#000000" stroke="#000000" points="317.2,-1378.26 313.8,-1368.23 310.2,-1378.19 317.2,-1378.26"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge39" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M433.66,-2028.21C416.05,-2026.67 394.68,-2021.58 382,-2007 344.08,-1963.43 320.32,-1542.89 315.09,-1441.1"/>
+<polygon fill="#000000" stroke="#000000" points="318.58,-1440.84 314.58,-1431.03 311.59,-1441.2 318.58,-1440.84"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1872 425.5,-1872 425.5,-1848 502.5,-1848 502.5,-1872"/>
-<text text-anchor="middle" x="464" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1998 425.5,-1998 425.5,-1974 502.5,-1974 502.5,-1998"/>
+<text text-anchor="middle" x="464" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.23,-1859.07C409.69,-1856.68 392.83,-1851.14 382,-1839 320.09,-1769.61 314.36,-1463.75 313.98,-1378.26"/>
-<polygon fill="#000000" stroke="#000000" points="317.48,-1378.12 313.96,-1368.12 310.48,-1378.13 317.48,-1378.12"/>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.14,-1985.15C409.58,-1982.77 392.73,-1977.23 382,-1965 312.12,-1885.41 312.28,-1534.03 313.57,-1441.43"/>
+<polygon fill="#000000" stroke="#000000" points="317.08,-1441.29 313.74,-1431.23 310.08,-1441.17 317.08,-1441.29"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="501.5,-1830 426.5,-1830 426.5,-1806 501.5,-1806 501.5,-1830"/>
-<text text-anchor="middle" x="464" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1956 430,-1956 430,-1932 498,-1932 498,-1956"/>
+<text text-anchor="middle" x="464" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.13,-1817.12C410.38,-1814.79 393.11,-1809.29 382,-1797 325.44,-1734.43 315.9,-1459.22 314.31,-1378.39"/>
-<polygon fill="#000000" stroke="#000000" points="317.81,-1378.26 314.14,-1368.32 310.81,-1378.38 317.81,-1378.26"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge41" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.73,-1943.71C413.02,-1941.74 393.86,-1936.37 382,-1923 317.45,-1850.23 313.64,-1529.35 313.83,-1441.38"/>
+<polygon fill="#000000" stroke="#000000" points="317.33,-1441.2 313.88,-1431.19 310.33,-1441.17 317.33,-1441.2"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1788 425.5,-1788 425.5,-1764 502.5,-1764 502.5,-1788"/>
-<text text-anchor="middle" x="464" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="519.5,-1914 408.5,-1914 408.5,-1890 519.5,-1890 519.5,-1914"/>
+<text text-anchor="middle" x="464" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.39,-1774.92C409.89,-1772.5 393.01,-1766.98 382,-1755 330.79,-1699.25 317.61,-1454.75 314.72,-1378.68"/>
-<polygon fill="#000000" stroke="#000000" points="318.21,-1378.21 314.36,-1368.34 311.21,-1378.46 318.21,-1378.21"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge42" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.45,-1897.11C398.45,-1893.85 388.99,-1888.78 382,-1881 322.71,-1814.96 315.1,-1523.97 314.13,-1441.1"/>
+<polygon fill="#000000" stroke="#000000" points="317.63,-1440.99 314.04,-1431.03 310.63,-1441.06 317.63,-1440.99"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504,-1746 424,-1746 424,-1722 504,-1722 504,-1746"/>
-<text text-anchor="middle" x="464" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1872 425.5,-1872 425.5,-1848 502.5,-1848 502.5,-1872"/>
+<text text-anchor="middle" x="464" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M423.84,-1732.54C408.82,-1729.98 392.73,-1724.45 382,-1713 336.04,-1663.93 319.47,-1449.11 315.22,-1378.55"/>
-<polygon fill="#000000" stroke="#000000" points="318.69,-1377.94 314.62,-1368.16 311.7,-1378.34 318.69,-1377.94"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.35,-1858.96C409.83,-1856.55 392.96,-1851.03 382,-1839 328.07,-1779.8 316.71,-1519.56 314.5,-1441.32"/>
+<polygon fill="#000000" stroke="#000000" points="318,-1441.05 314.24,-1431.15 311,-1441.24 318,-1441.05"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-1704 432,-1704 432,-1680 496,-1680 496,-1704"/>
-<text text-anchor="middle" x="464" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-1830 437,-1830 437,-1806 491,-1806 491,-1830"/>
+<text text-anchor="middle" x="464" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431.76,-1691.52C414.81,-1689.58 394.78,-1684.31 382,-1671 341.25,-1628.54 321.55,-1443.15 315.83,-1378.41"/>
-<polygon fill="#000000" stroke="#000000" points="319.29,-1377.77 314.95,-1368.11 312.31,-1378.37 319.29,-1377.77"/>
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.7,-1818.16C418.76,-1816.8 395.83,-1811.92 382,-1797 333.38,-1744.55 318.49,-1514.57 314.95,-1441.42"/>
+<polygon fill="#000000" stroke="#000000" points="318.43,-1440.91 314.47,-1431.08 311.44,-1441.23 318.43,-1440.91"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-1662 382,-1662 382,-1638 546,-1638 546,-1662"/>
-<text text-anchor="middle" x="464" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-1788 432,-1788 432,-1764 496,-1764 496,-1788"/>
+<text text-anchor="middle" x="464" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.75,-1637.93C389.46,-1635.46 385.48,-1632.51 382,-1629 346.4,-1593.06 323.89,-1436.53 316.59,-1378.1"/>
-<polygon fill="#000000" stroke="#000000" points="320.06,-1377.59 315.37,-1368.09 313.11,-1378.44 320.06,-1377.59"/>
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431.69,-1775.58C414.72,-1773.67 394.69,-1768.39 382,-1755 338.66,-1709.26 320.49,-1509.3 315.51,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="318.97,-1440.9 314.77,-1431.17 311.99,-1441.39 318.97,-1440.9"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-1620 437,-1620 437,-1596 491,-1596 491,-1620"/>
-<text text-anchor="middle" x="464" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-1746 427.5,-1746 427.5,-1722 500.5,-1722 500.5,-1746"/>
+<text text-anchor="middle" x="464" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.8,-1607.65C419.14,-1606.03 396.51,-1601.04 382,-1587 322.89,-1529.79 314.47,-1424.05 313.74,-1378.18"/>
-<polygon fill="#000000" stroke="#000000" points="317.24,-1378.1 313.7,-1368.12 310.24,-1378.14 317.24,-1378.1"/>
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.37,-1732.86C411.49,-1730.52 393.76,-1725.07 382,-1713 343.89,-1673.87 322.75,-1503.43 316.22,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="319.67,-1440.91 315.17,-1431.31 312.71,-1441.62 319.67,-1440.91"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1578 425.5,-1578 425.5,-1554 502.5,-1554 502.5,-1578"/>
-<text text-anchor="middle" x="464" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502,-444 426,-444 426,-420 502,-420 502,-444"/>
+<text text-anchor="middle" x="464" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.94,-424.86C411.87,-421.51 395.9,-416.93 382,-411 349.33,-397.05 338.82,-343.58 314,-369"/>
+</g>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.12,-1563.74C410.12,-1561.06 393.7,-1555.67 382,-1545 333.12,-1500.41 319.34,-1418.11 315.49,-1378.48"/>
-<polygon fill="#000000" stroke="#000000" points="318.95,-1377.96 314.62,-1368.29 311.98,-1378.55 318.95,-1377.96"/>
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.66,-432.46C409.81,-434.71 392.59,-440.27 382,-453 319.72,-527.89 314.47,-1258.75 314.04,-1396.63"/>
+<polygon fill="#000000" stroke="#000000" points="310.54,-1396.81 314.01,-1406.82 317.54,-1396.83 310.54,-1396.81"/>
 </g>
 <!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node37" class="node">
 <title>sourcefile~util_append.f90</title>
 <g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-1536 421,-1536 421,-1512 507,-1512 507,-1536"/>
-<text text-anchor="middle" x="464" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-1704 421,-1704 421,-1680 507,-1680 507,-1704"/>
+<text text-anchor="middle" x="464" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge49" class="edge">
 <title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.59,-1520.21C407.07,-1517.23 392.82,-1512.03 382,-1503 342.99,-1470.44 325.17,-1410.61 318.07,-1378.22"/>
-<polygon fill="#000000" stroke="#000000" points="321.41,-1377.1 315.98,-1368 314.55,-1378.5 321.41,-1377.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.92,-1689.5C406.94,-1686.66 392.32,-1681.22 382,-1671 317.77,-1607.4 312.35,-1489.93 313.09,-1441.14"/>
+<polygon fill="#000000" stroke="#000000" points="316.59,-1441.13 313.35,-1431.05 309.59,-1440.95 316.59,-1441.13"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1494 430,-1494 430,-1470 498,-1470 498,-1494"/>
-<text text-anchor="middle" x="464" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503.5,-1662 424.5,-1662 424.5,-1638 503.5,-1638 503.5,-1662"/>
+<text text-anchor="middle" x="464" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.88,-1479.01C414.2,-1476.27 395.9,-1471.03 382,-1461 352.56,-1439.77 332.58,-1401.51 322.25,-1377.5"/>
-<polygon fill="#000000" stroke="#000000" points="325.46,-1376.09 318.42,-1368.18 318.98,-1378.76 325.46,-1376.09"/>
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.12,-1647.77C409.32,-1645.08 393.31,-1639.66 382,-1629 327.98,-1578.1 316.78,-1484.01 314.52,-1441.22"/>
+<polygon fill="#000000" stroke="#000000" points="318.01,-1440.89 314.11,-1431.05 311.02,-1441.18 318.01,-1440.89"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494,-1452 434,-1452 434,-1428 494,-1428 494,-1452"/>
-<text text-anchor="middle" x="464" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-1620 425,-1620 425,-1596 503,-1596 503,-1620"/>
+<text text-anchor="middle" x="464" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M433.97,-1436.05C417.93,-1433.01 398.06,-1427.78 382,-1419 361.93,-1408.03 343.19,-1389.82 330.49,-1375.8"/>
-<polygon fill="#000000" stroke="#000000" points="332.97,-1373.32 323.74,-1368.11 327.7,-1377.93 332.97,-1373.32"/>
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.91,-1605.43C410.06,-1602.7 393.8,-1597.34 382,-1587 338.05,-1548.46 322.08,-1477.38 316.62,-1441.29"/>
+<polygon fill="#000000" stroke="#000000" points="320.08,-1440.71 315.25,-1431.28 313.14,-1441.67 320.08,-1440.71"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="516.5,-1410 411.5,-1410 411.5,-1386 516.5,-1386 516.5,-1410"/>
-<text text-anchor="middle" x="464" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-1578 437,-1578 437,-1554 491,-1554 491,-1578"/>
+<text text-anchor="middle" x="464" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.93,-1385.93C404.07,-1383.09 392.62,-1380.02 382,-1377 373.45,-1374.57 364.34,-1371.85 355.65,-1369.19"/>
-<polygon fill="#000000" stroke="#000000" points="356.67,-1365.84 346.08,-1366.24 354.6,-1372.53 356.67,-1365.84"/>
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.92,-1564.56C419.76,-1562.43 397.66,-1557.28 382,-1545 347.83,-1518.21 328.63,-1469.32 319.88,-1440.95"/>
+<polygon fill="#000000" stroke="#000000" points="323.19,-1439.8 317.03,-1431.18 316.47,-1441.76 323.19,-1439.8"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1368 435.5,-1368 435.5,-1344 492.5,-1344 492.5,-1368"/>
-<text text-anchor="middle" x="464" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-1536 437,-1536 437,-1512 491,-1512 491,-1536"/>
+<text text-anchor="middle" x="464" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.32,-1356C413.13,-1356 381.62,-1356 356.28,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="356.19,-1352.5 346.19,-1356 356.19,-1359.5 356.19,-1352.5"/>
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.87,-1521.48C420.11,-1518.88 398.49,-1513.62 382,-1503 357.19,-1487.03 337.2,-1458.98 325.47,-1439.72"/>
+<polygon fill="#000000" stroke="#000000" points="328.47,-1437.92 320.39,-1431.06 322.43,-1441.46 328.47,-1437.92"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-234 421,-234 421,-210 507,-210 507,-234"/>
-<text text-anchor="middle" x="464" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1494 430,-1494 430,-1470 498,-1470 498,-1494"/>
+<text text-anchor="middle" x="464" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.84,-212.59C379.42,-203.89 321.37,-193.37 314,-201"/>
-</g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.98,-223.16C406.48,-225.8 391.51,-231.45 382,-243 310.17,-330.19 312.8,-1183.69 313.82,-1333.58"/>
-<polygon fill="#000000" stroke="#000000" points="310.32,-1333.87 313.89,-1343.84 317.32,-1333.81 310.32,-1333.87"/>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge55" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.94,-1475.79C414.96,-1472.38 397.23,-1467.5 382,-1461 366.9,-1454.56 351.24,-1445.1 338.76,-1436.79"/>
+<polygon fill="#000000" stroke="#000000" points="340.51,-1433.75 330.28,-1431 336.57,-1439.53 340.51,-1433.75"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1326 425.5,-1326 425.5,-1302 502.5,-1302 502.5,-1326"/>
-<text text-anchor="middle" x="464" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505,-402 423,-402 423,-378 505,-378 505,-402"/>
+<text text-anchor="middle" x="464" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.4,-1323.37C411.7,-1326.88 396.11,-1330.99 382,-1335 373.45,-1337.43 364.34,-1340.15 355.65,-1342.81"/>
-<polygon fill="#000000" stroke="#000000" points="354.6,-1339.47 346.08,-1345.76 356.67,-1346.16 354.6,-1339.47"/>
-</g>
-<!-- sourcefile~util_sort.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1284 430,-1284 430,-1260 498,-1260 498,-1284"/>
-<text text-anchor="middle" x="464" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
-</a>
-</g>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.76,-381C381.25,-372.24 321.53,-361.29 314,-369"/>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.69,-1276.8C414.49,-1279.93 396.66,-1284.98 382,-1293 361.93,-1303.97 343.19,-1322.18 330.49,-1336.2"/>
-<polygon fill="#000000" stroke="#000000" points="327.7,-1334.07 323.74,-1343.89 332.97,-1338.68 327.7,-1334.07"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge56" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.71,-390.9C407.7,-393.4 391.92,-399.03 382,-411 316.94,-489.47 313.97,-1256.54 313.97,-1396.98"/>
+<polygon fill="#000000" stroke="#000000" points="310.47,-1396.99 313.97,-1406.98 317.47,-1396.98 310.47,-1396.99"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-1242 421,-1242 421,-1218 507,-1218 507,-1242"/>
-<text text-anchor="middle" x="464" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<!-- sourcefile~swiftest_driver.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node44" class="node">
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="513,-1452 415,-1452 415,-1428 513,-1428 513,-1452"/>
+<text text-anchor="middle" x="464" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.88,-1234.79C407.53,-1237.85 393.31,-1242.84 382,-1251 352.56,-1272.23 332.58,-1310.49 322.25,-1334.5"/>
-<polygon fill="#000000" stroke="#000000" points="318.98,-1333.24 318.42,-1343.82 325.46,-1335.91 318.98,-1333.24"/>
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.62,-1433.18C395.78,-1430.53 374.39,-1427.51 356.19,-1424.95"/>
+<polygon fill="#000000" stroke="#000000" points="356.56,-1421.46 346.16,-1423.53 355.58,-1428.39 356.56,-1421.46"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500,-1200 428,-1200 428,-1176 500,-1176 500,-1200"/>
-<text text-anchor="middle" x="464" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<!-- sourcefile~whm_step.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node45" class="node">
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503.5,-1410 424.5,-1410 424.5,-1386 503.5,-1386 503.5,-1410"/>
+<text text-anchor="middle" x="464" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.62,-1190.42C412.17,-1193.06 394.71,-1198.39 382,-1209 342.99,-1241.56 325.17,-1301.39 318.07,-1333.78"/>
-<polygon fill="#000000" stroke="#000000" points="314.55,-1333.5 315.98,-1344 321.41,-1334.9 314.55,-1333.5"/>
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.24,-1403.46C403.34,-1406.41 377.53,-1410.05 356.14,-1413.06"/>
+<polygon fill="#000000" stroke="#000000" points="355.45,-1409.62 346.03,-1414.49 356.42,-1416.56 355.45,-1409.62"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-1158 436.5,-1158 436.5,-1134 491.5,-1134 491.5,-1158"/>
-<text text-anchor="middle" x="464" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<!-- sourcefile~rmvs_io.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node46" class="node">
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1368 430,-1368 430,-1344 498,-1344 498,-1368"/>
+<text text-anchor="middle" x="464" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.3,-1146.7C418.87,-1148.52 396.7,-1153.59 382,-1167 333.12,-1211.59 319.34,-1293.89 315.49,-1333.52"/>
-<polygon fill="#000000" stroke="#000000" points="311.98,-1333.45 314.62,-1343.71 318.95,-1334.04 311.98,-1333.45"/>
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.94,-1362.21C414.96,-1365.62 397.23,-1370.5 382,-1377 366.9,-1383.44 351.24,-1392.9 338.76,-1401.21"/>
+<polygon fill="#000000" stroke="#000000" points="336.57,-1398.47 330.28,-1407 340.51,-1404.25 336.57,-1398.47"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="499.5,-1116 428.5,-1116 428.5,-1092 499.5,-1092 499.5,-1116"/>
-<text text-anchor="middle" x="464" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<!-- sourcefile~whm_kick.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node47" class="node">
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1326 425.5,-1326 425.5,-1302 502.5,-1302 502.5,-1326"/>
+<text text-anchor="middle" x="464" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428.09,-1105.39C412.18,-1107.78 394.21,-1113.18 382,-1125 322.89,-1182.21 314.47,-1287.95 313.74,-1333.82"/>
-<polygon fill="#000000" stroke="#000000" points="310.24,-1333.86 313.7,-1343.88 317.24,-1333.9 310.24,-1333.86"/>
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.5,-1318.6C411.06,-1321.63 394.95,-1326.66 382,-1335 357.19,-1350.97 337.2,-1379.02 325.47,-1398.28"/>
+<polygon fill="#000000" stroke="#000000" points="322.43,-1396.54 320.39,-1406.94 328.47,-1400.08 322.43,-1396.54"/>
 </g>
-<!-- sourcefile~kick.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-1074 437,-1074 437,-1050 491,-1050 491,-1074"/>
-<text text-anchor="middle" x="464" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<!-- sourcefile~util_peri.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node48" class="node">
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-1284 430,-1284 430,-1260 498,-1260 498,-1284"/>
+<text text-anchor="middle" x="464" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.99,-1062.13C419.2,-1063.62 396.31,-1068.55 382,-1083 346.4,-1118.94 323.89,-1275.47 316.59,-1333.9"/>
-<polygon fill="#000000" stroke="#000000" points="313.11,-1333.56 315.37,-1343.91 320.06,-1334.41 313.11,-1333.56"/>
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.93,-1274.44C414.07,-1277.05 395.61,-1282.34 382,-1293 347.83,-1319.79 328.63,-1368.68 319.88,-1397.05"/>
+<polygon fill="#000000" stroke="#000000" points="316.47,-1396.24 317.03,-1406.82 323.19,-1398.2 316.47,-1396.24"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503.5,-1032 424.5,-1032 424.5,-1008 503.5,-1008 503.5,-1032"/>
-<text text-anchor="middle" x="464" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<!-- sourcefile~helio_kick.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node49" class="node">
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502.5,-1242 425.5,-1242 425.5,-1218 502.5,-1218 502.5,-1242"/>
+<text text-anchor="middle" x="464" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.39,-1021.52C409.28,-1024.07 392.96,-1029.58 382,-1041 341.25,-1083.46 321.55,-1268.85 315.83,-1333.59"/>
-<polygon fill="#000000" stroke="#000000" points="312.31,-1333.63 314.95,-1343.89 319.29,-1334.23 312.31,-1333.63"/>
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.33,-1232.49C410.36,-1235.2 393.91,-1240.56 382,-1251 338.05,-1289.54 322.08,-1360.62 316.62,-1396.71"/>
+<polygon fill="#000000" stroke="#000000" points="313.14,-1396.33 315.25,-1406.72 320.08,-1397.29 313.14,-1396.33"/>
 </g>
-<!-- sourcefile~drift.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-990 437,-990 437,-966 491,-966 491,-990"/>
-<text text-anchor="middle" x="464" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<!-- sourcefile~whm_coord.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node50" class="node">
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-1200 421,-1200 421,-1176 507,-1176 507,-1200"/>
+<text text-anchor="middle" x="464" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.74,-977.88C418.82,-979.27 395.9,-984.16 382,-999 336.04,-1048.07 319.47,-1262.89 315.22,-1333.45"/>
-<polygon fill="#000000" stroke="#000000" points="311.7,-1333.66 314.62,-1343.84 318.69,-1334.06 311.7,-1333.66"/>
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.78,-1190.88C406.95,-1193.76 392.47,-1199.14 382,-1209 327.98,-1259.9 316.78,-1353.99 314.52,-1396.78"/>
+<polygon fill="#000000" stroke="#000000" points="311.02,-1396.82 314.11,-1406.95 318.01,-1397.11 311.02,-1396.82"/>
 </g>
 <!-- sourcefile~discard.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node52" class="node">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node51" class="node">
 <title>sourcefile~discard.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496.5,-948 431.5,-948 431.5,-924 496.5,-924 496.5,-948"/>
-<text text-anchor="middle" x="464" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496.5,-1158 431.5,-1158 431.5,-1134 496.5,-1134 496.5,-1158"/>
+<text text-anchor="middle" x="464" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge65" class="edge">
 <title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431.13,-936.32C414.2,-938.22 394.38,-943.52 382,-957 330.79,-1012.75 317.61,-1257.25 314.72,-1333.32"/>
-<polygon fill="#000000" stroke="#000000" points="311.21,-1333.54 314.36,-1343.66 318.21,-1333.79 311.21,-1333.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431.21,-1146.83C414.52,-1148.92 394.9,-1154.22 382,-1167 317.77,-1230.6 312.35,-1348.07 313.09,-1396.86"/>
+<polygon fill="#000000" stroke="#000000" points="309.59,-1397.05 313.35,-1406.95 316.59,-1396.87 309.59,-1397.05"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-906 421.5,-906 421.5,-882 506.5,-882 506.5,-906"/>
-<text text-anchor="middle" x="464" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<!-- sourcefile~orbel.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node52" class="node">
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-1116 436.5,-1116 436.5,-1092 491.5,-1092 491.5,-1116"/>
+<text text-anchor="middle" x="464" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.12,-895.72C406.81,-898.44 391.94,-904.01 382,-915 325.44,-977.57 315.9,-1252.78 314.31,-1333.61"/>
-<polygon fill="#000000" stroke="#000000" points="310.81,-1333.62 314.14,-1343.68 317.81,-1333.74 310.81,-1333.62"/>
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.15,-1104.12C418.43,-1105.66 395.99,-1110.64 382,-1125 343.89,-1164.13 322.75,-1334.57 316.22,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="312.71,-1396.38 315.17,-1406.69 319.67,-1397.09 312.71,-1396.38"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node53" class="node">
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-1074 421.5,-1074 421.5,-1050 506.5,-1050 506.5,-1074"/>
+<text text-anchor="middle" x="464" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge67" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.39,-1063.98C407.12,-1066.72 392.19,-1072.24 382,-1083 338.66,-1128.74 320.49,-1328.7 315.51,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="311.99,-1396.61 314.77,-1406.83 318.97,-1397.1 311.99,-1396.61"/>
+</g>
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-864 430,-864 430,-840 498,-840 498,-864"/>
-<text text-anchor="middle" x="464" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="511.5,-1032 416.5,-1032 416.5,-1008 511.5,-1008 511.5,-1032"/>
+<text text-anchor="middle" x="464" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.76,-852.32C413.06,-854.3 393.9,-859.67 382,-873 320.09,-942.39 314.36,-1248.25 313.98,-1333.74"/>
-<polygon fill="#000000" stroke="#000000" points="310.48,-1333.87 313.96,-1343.88 317.48,-1333.88 310.48,-1333.87"/>
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.21,-1022.94C403.54,-1025.97 390.89,-1031.41 382,-1041 333.38,-1093.45 318.49,-1323.43 314.95,-1396.58"/>
+<polygon fill="#000000" stroke="#000000" points="311.44,-1396.77 314.47,-1406.92 318.43,-1397.09 311.44,-1396.77"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-822 436.5,-822 436.5,-798 491.5,-798 491.5,-822"/>
-<text text-anchor="middle" x="464" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-990 437,-990 437,-966 491,-966 491,-990"/>
+<text text-anchor="middle" x="464" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge69" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.47,-809.63C418.42,-810.9 395.46,-815.75 382,-831 314.79,-907.17 312.95,-1243.22 313.7,-1333.57"/>
-<polygon fill="#000000" stroke="#000000" points="310.2,-1333.81 313.8,-1343.77 317.2,-1333.74 310.2,-1333.81"/>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge70" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M437,-977.74C418.97,-979.02 395.79,-983.86 382,-999 328.07,-1058.2 316.71,-1318.44 314.5,-1396.68"/>
+<polygon fill="#000000" stroke="#000000" points="311,-1396.76 314.24,-1406.85 318,-1396.95 311,-1396.76"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="515.5,-780 412.5,-780 412.5,-756 515.5,-756 515.5,-780"/>
-<text text-anchor="middle" x="464" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="539,-360 389,-360 389,-336 539,-336 539,-360"/>
+<text text-anchor="middle" x="464" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge70" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.47,-771.49C400.97,-774.65 389.84,-780.03 382,-789 345.45,-830.83 320.78,-1233.97 315.2,-1333.75"/>
-<polygon fill="#000000" stroke="#000000" points="311.7,-1333.72 314.64,-1343.89 318.69,-1334.1 311.7,-1333.72"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M388.64,-340.81C361.67,-342.31 333.16,-349.37 314,-369"/>
+</g>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge76" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M391.93,-360.11C388.23,-362.59 384.87,-365.53 382,-369 314.28,-450.9 313.49,-1251.46 313.9,-1396.52"/>
+<polygon fill="#000000" stroke="#000000" points="310.41,-1396.85 313.94,-1406.84 317.41,-1396.83 310.41,-1396.85"/>
 </g>
 <!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node57" class="node">
 <title>sourcefile~symba_drift.f90</title>
 <g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-192 421,-192 421,-168 507,-168 507,-192"/>
-<text text-anchor="middle" x="464" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-318 421,-318 421,-294 507,-294 507,-318"/>
+<text text-anchor="middle" x="464" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge18" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge16" class="edge">
 <title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.85,-173.27C387.09,-170.49 341.05,-173.01 314,-201"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.99,-314.38C388,-322.96 342.94,-339.36 314,-369"/>
 </g>
 <!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge72" class="edge">
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge77" class="edge">
 <title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.97,-181.15C406.47,-183.78 391.5,-189.44 382,-201 307.42,-291.74 312.36,-1180.83 313.77,-1333.69"/>
-<polygon fill="#000000" stroke="#000000" points="310.27,-1333.79 313.86,-1343.75 317.27,-1333.72 310.27,-1333.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.99,-307.17C406.49,-309.8 391.52,-315.46 382,-327 311.55,-412.42 313.02,-1248.19 313.85,-1396.54"/>
+<polygon fill="#000000" stroke="#000000" points="310.35,-1396.73 313.91,-1406.71 317.35,-1396.69 310.35,-1396.73"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-738 437,-738 437,-714 491,-714 491,-738"/>
-<text text-anchor="middle" x="464" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-948 427.5,-948 427.5,-924 500.5,-924 500.5,-948"/>
+<text text-anchor="middle" x="464" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge71" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.77,-725.54C418.63,-726.72 395.42,-731.52 382,-747 342.75,-792.28 319.92,-1229.52 315.01,-1333.77"/>
-<polygon fill="#000000" stroke="#000000" points="311.51,-1333.65 314.54,-1343.8 318.5,-1333.97 311.51,-1333.65"/>
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.34,-936.66C411.25,-938.88 393.36,-944.35 382,-957 322.71,-1023.04 315.1,-1314.03 314.13,-1396.9"/>
+<polygon fill="#000000" stroke="#000000" points="310.63,-1396.94 314.04,-1406.97 317.63,-1397.01 310.63,-1396.94"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-696 421,-696 421,-672 507,-672 507,-696"/>
-<text text-anchor="middle" x="464" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-906 421.5,-906 421.5,-882 506.5,-882 506.5,-906"/>
+<text text-anchor="middle" x="464" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge73" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.82,-685.46C406.49,-688.15 391.67,-693.77 382,-705 340.08,-753.72 319.14,-1224.78 314.84,-1333.63"/>
-<polygon fill="#000000" stroke="#000000" points="311.34,-1333.67 314.45,-1343.79 318.33,-1333.94 311.34,-1333.67"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge72" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.43,-895.54C406.98,-898.22 391.93,-903.81 382,-915 317.45,-987.77 313.64,-1308.65 313.83,-1396.62"/>
+<polygon fill="#000000" stroke="#000000" points="310.33,-1396.83 313.88,-1406.81 317.33,-1396.8 310.33,-1396.83"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="511.5,-654 416.5,-654 416.5,-630 511.5,-630 511.5,-654"/>
-<text text-anchor="middle" x="464" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-864 435.5,-864 435.5,-840 492.5,-840 492.5,-864"/>
+<text text-anchor="middle" x="464" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge74" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.14,-644.4C403.31,-647.39 390.59,-652.95 382,-663 337.37,-715.19 318.4,-1220.58 314.69,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="311.19,-1333.76 314.37,-1343.86 318.18,-1333.98 311.19,-1333.76"/>
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge73" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M435.28,-851.7C417.41,-853.08 395.13,-858.04 382,-873 312.12,-952.59 312.28,-1303.97 313.57,-1396.57"/>
+<polygon fill="#000000" stroke="#000000" points="310.08,-1396.83 313.74,-1406.77 317.08,-1396.71 310.08,-1396.83"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535,-612 393,-612 393,-588 535,-588 535,-612"/>
-<text text-anchor="middle" x="464" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494,-822 434,-822 434,-798 494,-798 494,-822"/>
+<text text-anchor="middle" x="464" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge75" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M392.76,-611.73C388.76,-614.29 385.11,-617.35 382,-621 334.7,-676.62 317.72,-1215.76 314.57,-1333.4"/>
-<polygon fill="#000000" stroke="#000000" points="311.06,-1333.63 314.3,-1343.72 318.06,-1333.82 311.06,-1333.63"/>
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge74" class="edge">
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M433.66,-809.79C416.05,-811.33 394.68,-816.42 382,-831 344.08,-874.57 320.32,-1295.11 315.09,-1396.9"/>
+<polygon fill="#000000" stroke="#000000" points="311.59,-1396.8 314.58,-1406.97 318.58,-1397.16 311.59,-1396.8"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494,-570 434,-570 434,-546 494,-546 494,-570"/>
-<text text-anchor="middle" x="464" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500,-780 428,-780 428,-756 500,-756 500,-780"/>
+<text text-anchor="middle" x="464" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge76" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M433.91,-557.64C416.18,-559.08 394.57,-564.14 382,-579 331.96,-638.15 317.04,-1212.56 314.44,-1333.66"/>
-<polygon fill="#000000" stroke="#000000" points="310.94,-1333.86 314.23,-1343.93 317.94,-1334 310.94,-1333.86"/>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge75" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.94,-768.36C411.6,-770.46 393.3,-775.92 382,-789 341.42,-836 319.53,-1290.11 314.92,-1396.69"/>
+<polygon fill="#000000" stroke="#000000" points="311.42,-1396.78 314.49,-1406.92 318.41,-1397.08 311.42,-1396.78"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="513,-528 415,-528 415,-504 513,-504 513,-528"/>
-<text text-anchor="middle" x="464" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-738 421.5,-738 421.5,-714 506.5,-714 506.5,-738"/>
+<text text-anchor="middle" x="464" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge78" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.77,-518.63C402.38,-521.68 390.24,-527.22 382,-537 329.25,-599.63 316.42,-1208.62 314.34,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="310.83,-1333.84 314.17,-1343.9 317.83,-1333.96 310.83,-1333.84"/>
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge79" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.22,-727.37C406.76,-730.02 391.74,-735.64 382,-747 338.68,-797.5 318.73,-1286.63 314.75,-1396.96"/>
+<polygon fill="#000000" stroke="#000000" points="311.26,-1396.84 314.4,-1406.96 318.25,-1397.09 311.26,-1396.84"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="511,-486 417,-486 417,-462 511,-462 511,-486"/>
-<text text-anchor="middle" x="464" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-696 421,-696 421,-672 507,-672 507,-696"/>
+<text text-anchor="middle" x="464" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge79" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.86,-476.11C403.75,-479.05 390.68,-484.65 382,-495 326.52,-561.14 315.83,-1205.08 314.24,-1333.71"/>
-<polygon fill="#000000" stroke="#000000" points="310.74,-1333.88 314.12,-1343.92 317.74,-1333.96 310.74,-1333.88"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge80" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.77,-685.41C406.43,-688.1 391.61,-693.72 382,-705 336.02,-758.93 318.04,-1281.65 314.62,-1396.68"/>
+<polygon fill="#000000" stroke="#000000" points="311.12,-1396.69 314.33,-1406.79 318.12,-1396.89 311.12,-1396.69"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502,-444 426,-444 426,-420 502,-420 502,-444"/>
-<text text-anchor="middle" x="464" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="501.5,-654 426.5,-654 426.5,-630 501.5,-630 501.5,-654"/>
+<text text-anchor="middle" x="464" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge80" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.68,-432.49C409.84,-434.74 392.62,-440.29 382,-453 323.77,-522.67 315.26,-1201.95 314.15,-1333.87"/>
-<polygon fill="#000000" stroke="#000000" points="310.65,-1333.95 314.07,-1343.98 317.65,-1334.01 310.65,-1333.95"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge81" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.19,-642.5C410.25,-644.73 392.81,-650.26 382,-663 333.28,-720.44 317.35,-1278.25 314.5,-1396.89"/>
+<polygon fill="#000000" stroke="#000000" points="310.99,-1396.88 314.26,-1406.96 317.99,-1397.05 310.99,-1396.88"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503.5,-402 424.5,-402 424.5,-378 503.5,-378 503.5,-402"/>
-<text text-anchor="middle" x="464" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503.5,-612 424.5,-612 424.5,-588 503.5,-588 503.5,-612"/>
+<text text-anchor="middle" x="464" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge81" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.41,-390.65C408.92,-393.02 392.32,-398.61 382,-411 321.08,-484.15 314.73,-1197.73 314.08,-1333.69"/>
-<polygon fill="#000000" stroke="#000000" points="310.58,-1333.74 314.03,-1343.76 317.58,-1333.77 310.58,-1333.74"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge82" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.49,-600.72C409.01,-603.09 392.4,-608.68 382,-621 330.58,-681.92 316.72,-1274.14 314.39,-1396.82"/>
+<polygon fill="#000000" stroke="#000000" points="310.88,-1396.85 314.2,-1406.91 317.88,-1396.97 310.88,-1396.85"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502,-150 426,-150 426,-126 502,-126 502,-150"/>
-<text text-anchor="middle" x="464" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="523,-570 405,-570 405,-546 523,-546 523,-570"/>
+<text text-anchor="middle" x="464" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.85,-145.06C392.49,-153.2 344.25,-169.7 314,-201"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312,-201C230.09,-285.76 198.94,-1179.8 194.17,-1333.55"/>
-<polygon fill="#000000" stroke="#000000" points="190.66,-1333.58 193.86,-1343.68 197.66,-1333.79 190.66,-1333.58"/>
-</g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge82" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.99,-138.34C410.02,-140.53 392.59,-146.08 382,-159 343.25,-206.25 318.37,-1174.3 314.52,-1333.83"/>
-<polygon fill="#000000" stroke="#000000" points="311.02,-1333.82 314.28,-1343.9 318.02,-1333.99 311.02,-1333.82"/>
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge83" class="edge">
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.75,-563.71C396.04,-567.01 387.98,-571.88 382,-579 327.86,-643.42 316.11,-1270.43 314.29,-1396.85"/>
+<polygon fill="#000000" stroke="#000000" points="310.79,-1396.85 314.15,-1406.9 317.78,-1396.95 310.79,-1396.85"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-360 437,-360 437,-336 491,-336 491,-360"/>
-<text text-anchor="middle" x="464" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="511,-276 417,-276 417,-252 511,-252 511,-276"/>
+<text text-anchor="middle" x="464" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge84" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.96,-347.34C418.66,-348.4 395.18,-353.13 382,-369 318.37,-445.64 314.22,-1193.84 314,-1333.58"/>
-<polygon fill="#000000" stroke="#000000" points="310.5,-1333.89 313.99,-1343.9 317.5,-1333.9 310.5,-1333.89"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge19" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312,-369C237.45,-445.36 200.52,-1250.45 194.41,-1396.38"/>
+<polygon fill="#000000" stroke="#000000" points="190.9,-1396.63 193.99,-1406.76 197.89,-1396.91 190.9,-1396.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.76,-270.65C404.8,-273.76 392.38,-278.32 382,-285 341.61,-311 347.56,-334.63 314,-369"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.74,-266.01C403.62,-268.94 390.58,-274.57 382,-285 308.8,-373.97 312.57,-1245.26 313.79,-1396.64"/>
+<polygon fill="#000000" stroke="#000000" points="310.29,-1397.01 313.88,-1406.98 317.29,-1396.95 310.29,-1397.01"/>
+</g>
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-318 430,-318 430,-294 498,-294 498,-318"/>
-<text text-anchor="middle" x="464" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="511,-528 417,-528 417,-504 511,-504 511,-528"/>
+<text text-anchor="middle" x="464" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge85" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M429.77,-305.92C412.85,-307.76 393.49,-313.12 382,-327 315.65,-407.14 313.73,-1190.16 313.94,-1333.52"/>
-<polygon fill="#000000" stroke="#000000" points="310.44,-1333.74 313.96,-1343.73 317.44,-1333.73 310.44,-1333.74"/>
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.85,-518.1C403.73,-521.04 390.67,-526.64 382,-537 325.18,-604.87 315.55,-1265.8 314.2,-1396.58"/>
+<polygon fill="#000000" stroke="#000000" points="310.69,-1396.91 314.1,-1406.94 317.69,-1396.98 310.69,-1396.91"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_node70" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-276 421.5,-276 421.5,-252 506.5,-252 506.5,-276"/>
-<text text-anchor="middle" x="464" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~fraggle_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504,-486 424,-486 424,-462 504,-462 504,-486"/>
+<text text-anchor="middle" x="464" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge86" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.42,-265.1C406.79,-267.7 391.62,-273.35 382,-285 312.91,-368.66 313.25,-1186.83 313.87,-1333.53"/>
-<polygon fill="#000000" stroke="#000000" points="310.38,-1333.97 313.92,-1343.95 317.38,-1333.93 310.38,-1333.97"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~fraggle_classes.f90~~AfferentGraph_edge54" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M423.58,-474.79C408.33,-477.23 392.14,-482.84 382,-495 322.49,-566.33 315.01,-1261.38 314.12,-1396.36"/>
+<polygon fill="#000000" stroke="#000000" points="310.61,-1396.68 314.05,-1406.7 317.61,-1396.72 310.61,-1396.68"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/fraggle_generate.f90.html b/docs/sourcefile/fraggle_generate.f90.html
index 149549f0a..beaecf239 100644
--- a/docs/sourcefile/fraggle_generate.f90.html
+++ b/docs/sourcefile/fraggle_generate.f90.html
@@ -134,7 +134,7 @@ <h1>fraggle_generate.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 2.5% of total for source files.">400 statements</a>
+    title=" 2.5% of total for source files.">402 statements</a>
      </li> 
      
      
@@ -226,298 +226,293 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~fraggle_generate.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilefraggle_generatef90EfferentGraph" width="641pt" height="249pt"
- viewBox="0.00 0.00 641.00 249.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 365.7)">
+<svg id="sourcefilefraggle_generatef90EfferentGraph" width="641pt" height="232pt"
+ viewBox="0.00 0.00 641.00 231.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 339.45)">
 <title>sourcefile~~fraggle_generate.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.7 946,-365.7 946,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.45 946,-339.45 946,4 -4,4"/>
 <!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_generate.f90</title>
-<polygon fill="none" stroke="black" points="942,-244.7 830,-244.7 830,-220.7 942,-220.7 942,-244.7"/>
-<text text-anchor="middle" x="886" y="-230.3" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate.f90</text>
+<polygon fill="none" stroke="black" points="942,-245.21 830,-245.21 830,-221.21 942,-221.21 942,-245.21"/>
+<text text-anchor="middle" x="886" y="-230.81" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_generate.f90</text>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
 <g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="547,-285.7 442,-285.7 442,-261.7 547,-261.7 547,-285.7"/>
-<text text-anchor="middle" x="494.5" y="-271.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-284.21 441,-284.21 441,-260.21 546,-260.21 546,-284.21"/>
+<text text-anchor="middle" x="493.5" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.61,-238.53C757.7,-246.1 632.55,-259.27 557.52,-267.17"/>
-<polygon fill="#000000" stroke="#000000" points="556.86,-263.72 547.28,-268.25 557.59,-270.68 556.86,-263.72"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M867.13,-245.26C834.22,-266.64 761.08,-310.44 692,-326.21 644.34,-337.1 629.03,-339.56 582,-326.21 557.58,-319.28 533.29,-303.39 516.52,-290.63"/>
+<polygon fill="#000000" stroke="#000000" points="518.5,-287.73 508.47,-284.3 514.17,-293.23 518.5,-287.73"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-224.7 728,-224.7 728,-200.7 794,-200.7 794,-224.7"/>
-<text text-anchor="middle" x="761" y="-210.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-186.21 728,-186.21 728,-162.21 794,-162.21 794,-186.21"/>
+<text text-anchor="middle" x="761" y="-171.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.98,-223.75C821.24,-222.33 812.34,-220.88 803.97,-219.52"/>
-<polygon fill="#000000" stroke="#000000" points="804.51,-216.07 794.08,-217.92 803.38,-222.97 804.51,-216.07"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M859.81,-221.13C841.49,-212.34 816.46,-200.34 796.31,-190.67"/>
+<polygon fill="#000000" stroke="#000000" points="797.68,-187.45 787.15,-186.28 794.66,-193.76 797.68,-187.45"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-207.7 143.5,-207.7 143.5,-183.7 250.5,-183.7 250.5,-207.7"/>
-<text text-anchor="middle" x="197" y="-193.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.21 0,-244.21 0,-220.21 106,-220.21 106,-244.21"/>
+<text text-anchor="middle" x="53" y="-229.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-274.39C414.08,-274.42 379.12,-273.87 348,-271.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C296.86,-268.27 247.51,-235.68 220.04,-214.3"/>
-<polygon fill="#000000" stroke="#000000" points="221.91,-211.32 211.92,-207.81 217.54,-216.79 221.91,-211.32"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C283.05,-257.29 269.56,-236.49 202,-232.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-167.7 0,-167.7 0,-143.7 106,-143.7 106,-167.7"/>
-<text text-anchor="middle" x="53" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-204.21 147.5,-204.21 147.5,-180.21 254.5,-180.21 254.5,-204.21"/>
+<text text-anchor="middle" x="201" y="-189.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-309.7C133.55,-282.43 86.44,-212.57 65.68,-177.08"/>
-<polygon fill="#000000" stroke="#000000" points="68.52,-175 60.53,-168.05 62.44,-178.47 68.52,-175"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C278.25,-266.96 260.24,-336.88 198,-309.7"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-275.84C413.94,-276.63 380.7,-275.89 351.5,-270.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C323.92,-265.24 318.33,-259.64 296,-246.21 278.63,-235.77 277.37,-228.65 260,-218.21 254.22,-214.74 247.89,-211.44 241.6,-208.43"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-205.24 232.5,-204.24 240.12,-211.6 243.05,-205.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C603.13,-238.87 566.47,-249.43 538.9,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.56,-255.15 529.17,-261.62 539.76,-261.8 537.56,-255.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.32,-186.64C739.96,-216.22 698.98,-289.94 638,-312.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C616.93,-319.18 566.94,-302.05 531.81,-288.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.91,-284.75 522.33,-284.24 530.29,-291.23 532.91,-284.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C502.08,-254.52 342.57,-228.01 257.86,-209.93"/>
-<polygon fill="#000000" stroke="#000000" points="258.43,-206.47 247.91,-207.77 256.94,-213.31 258.43,-206.47"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.79,-218.43C703.32,-222.74 668.81,-228.74 638.5,-233.7"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-284.21 142,-284.21 142,-260.21 260,-260.21 260,-284.21"/>
+<text text-anchor="middle" x="201" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C312.16,-309.72 271.19,-297.83 241.92,-287.66"/>
+<polygon fill="#000000" stroke="#000000" points="243.06,-284.35 232.47,-284.29 240.71,-290.94 243.06,-284.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C517.23,-355.59 477.67,-320.61 351.5,-312.21"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-129.7 300,-129.7 300,-105.7 394,-105.7 394,-129.7"/>
-<text text-anchor="middle" x="347" y="-115.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="688.5,-225.21 585.5,-225.21 585.5,-201.21 688.5,-201.21 688.5,-225.21"/>
+<text text-anchor="middle" x="637" y="-210.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C596.2,-98.55 476.3,-105.76 404.38,-112.06"/>
-<polygon fill="#000000" stroke="#000000" points="403.78,-108.6 394.14,-112.98 404.41,-115.57 403.78,-108.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.95,-184.46C714.98,-188.6 699.75,-193.47 685.54,-198.01"/>
+<polygon fill="#000000" stroke="#000000" points="684.37,-194.71 675.91,-201.09 686.5,-201.38 684.37,-194.71"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-88.7 142,-88.7 142,-64.7 252,-64.7 252,-88.7"/>
-<text text-anchor="middle" x="197" y="-74.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-87.21 582,-87.21 582,-63.21 692,-63.21 692,-87.21"/>
+<text text-anchor="middle" x="637" y="-72.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge7" class="edge">
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M749.01,-200.42C729.22,-179.2 685.3,-136 638.5,-115.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C592.34,-96.55 593,-68.88 547,-54.7 445.26,-23.32 319.13,-45.26 249.77,-62.19"/>
-<polygon fill="#000000" stroke="#000000" points="248.81,-58.82 239.96,-64.65 250.51,-65.61 248.81,-58.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.04,-162.07C724,-145 685.5,-113.76 660.86,-93.76"/>
+<polygon fill="#000000" stroke="#000000" points="663.05,-91.03 653.08,-87.45 658.64,-96.47 663.05,-91.03"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="542,-87.7 447,-87.7 447,-63.7 542,-63.7 542,-87.7"/>
-<text text-anchor="middle" x="494.5" y="-73.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="540.5,-166.21 446.5,-166.21 446.5,-142.21 540.5,-142.21 540.5,-166.21"/>
+<text text-anchor="middle" x="493.5" y="-151.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C609.51,-104.21 578.24,-94.96 552.01,-88.26"/>
-<polygon fill="#000000" stroke="#000000" points="552.78,-84.84 542.23,-85.82 551.08,-91.63 552.78,-84.84"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.2,-224.84C712.94,-259.68 604.11,-357.03 495.5,-349.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C453.65,-353.1 445.46,-335.2 406,-328.7 314.41,-313.61 283.07,-346.85 198,-309.7"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C608.12,-150.02 576.8,-149.59 550.73,-150.38"/>
+<polygon fill="#000000" stroke="#000000" points="550.5,-146.89 540.64,-150.76 550.76,-153.89 550.5,-146.89"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-48.7 583,-48.7 583,-24.7 692,-24.7 692,-48.7"/>
-<text text-anchor="middle" x="637.5" y="-34.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-126.21 303.5,-126.21 303.5,-102.21 397.5,-102.21 397.5,-126.21"/>
+<text text-anchor="middle" x="350.5" y="-111.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.37,-200.69C741.77,-179.94 716.66,-136.3 692,-101.7 680.73,-85.88 666.74,-68.97 655.9,-56.36"/>
-<polygon fill="#000000" stroke="#000000" points="658.49,-54.01 649.28,-48.76 653.2,-58.6 658.49,-54.01"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.38,-148.11 586.53,-139.89 546,-133.21 499.75,-125.59 446.77,-120.66 407.8,-117.74"/>
+<polygon fill="#000000" stroke="#000000" points="407.93,-114.24 397.7,-117 407.42,-121.22 407.93,-114.24"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541.5,-167.7 447.5,-167.7 447.5,-143.7 541.5,-143.7 541.5,-167.7"/>
-<text text-anchor="middle" x="494.5" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-27.21 296,-27.21 296,-3.21 405,-3.21 405,-27.21"/>
+<text text-anchor="middle" x="350.5" y="-12.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C617.77,-107.73 567.4,-125.34 532.24,-139.67"/>
-<polygon fill="#000000" stroke="#000000" points="530.66,-136.54 522.76,-143.6 533.34,-143 530.66,-136.54"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="689,-205.7 586,-205.7 586,-181.7 689,-181.7 689,-205.7"/>
-<text text-anchor="middle" x="637.5" y="-191.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.74,-162.16C749.48,-137.73 729.59,-82.32 692,-54.21 611.67,5.85 489.49,3.72 415.41,-4.73"/>
+<polygon fill="#000000" stroke="#000000" points="414.79,-1.28 405.28,-5.96 415.63,-8.23 414.79,-1.28"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.76,-207.66C718.99,-206.29 709.2,-204.76 699.41,-203.22"/>
-<polygon fill="#000000" stroke="#000000" points="699.66,-199.72 689.24,-201.63 698.58,-206.64 699.66,-199.72"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C257.58,-300.92 229.03,-324.86 142,-293.21 116.33,-283.88 91.13,-265.16 74.32,-250.91"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-248.26 66.78,-244.33 72.02,-253.54 76.62,-248.26"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-361.7 288,-361.7 288,-337.7 406,-337.7 406,-361.7"/>
-<text text-anchor="middle" x="347" y="-347.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~fraggle_generate.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541,-86.21 446,-86.21 446,-62.21 541,-62.21 541,-86.21"/>
+<text text-anchor="middle" x="493.5" y="-71.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C468.36,-348 440.72,-347.63 416.35,-347.8"/>
-<polygon fill="#000000" stroke="#000000" points="416.08,-344.31 406.12,-347.91 416.15,-351.31 416.08,-344.31"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.93,-168.71C703.34,-164.56 668.56,-158.81 638,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C589.87,-147.28 586.85,-122.74 546,-100.21 540.36,-97.1 534.3,-93.91 528.39,-90.88"/>
+<polygon fill="#000000" stroke="#000000" points="529.82,-87.68 519.31,-86.28 526.65,-93.92 529.82,-87.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.32,-148.52 586.68,-169.51 546,-175.21 448.56,-188.87 334.25,-192 265.02,-192.48"/>
+<polygon fill="#000000" stroke="#000000" points="264.71,-188.98 254.73,-192.54 264.75,-195.98 264.71,-188.98"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-183.7C138.79,-179.58 122.26,-174.93 106.93,-170.61"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-167.17 97.07,-167.83 105.74,-173.91 107.64,-167.17"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-260.21C140.96,-256.04 123.7,-251.31 107.75,-246.94"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-243.54 98.03,-244.27 106.75,-250.29 108.6,-243.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.91,-129.79C306.76,-133.84 296.79,-138.62 288,-143.7 270.91,-153.57 268.96,-159.6 252,-169.7 246.49,-172.98 240.49,-176.19 234.57,-179.18"/>
-<polygon fill="#000000" stroke="#000000" points="232.86,-176.12 225.41,-183.65 235.93,-182.41 232.86,-176.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-225.29C585.56,-234.24 556.11,-246.52 532.72,-256.27"/>
+<polygon fill="#000000" stroke="#000000" points="531.32,-253.07 523.44,-260.15 534.01,-259.53 531.32,-253.07"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-129.8C284.05,-139.95 238.78,-153.19 198,-155.7"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-201.13C585.56,-192.18 556.11,-179.9 532.72,-170.15"/>
+<polygon fill="#000000" stroke="#000000" points="534.01,-166.89 523.44,-166.28 531.32,-173.36 534.01,-166.89"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-88.87C150.18,-102.19 111.63,-123.64 84.68,-138.63"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-135.72 75.67,-143.64 86.11,-141.84 82.71,-135.72"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C284.05,-228.54 267.42,-236.35 202,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-232.21C172.53,-230.47 142.1,-230.21 116.16,-230.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.03,-226.98 106.08,-230.62 116.13,-233.98 116.03,-226.98"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.81,-87.74C435.52,-92.44 416.68,-97.87 399.55,-102.82"/>
-<polygon fill="#000000" stroke="#000000" points="398.34,-99.53 389.7,-105.66 400.28,-106.25 398.34,-99.53"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.38,-220.66C528.49,-228.09 433.37,-237.66 351.5,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C311.9,-230.1 270.64,-218.03 241.35,-207.7"/>
+<polygon fill="#000000" stroke="#000000" points="242.49,-204.39 231.9,-204.28 240.11,-210.97 242.49,-204.39"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.83,-74.25C404.26,-74.35 340.22,-78.17 288,-96.7 242.93,-112.7 245.74,-152.77 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-155.7C169.93,-157.11 141.13,-157.35 116.31,-157.15"/>
-<polygon fill="#000000" stroke="#000000" points="116.34,-153.65 106.3,-157.05 116.26,-160.65 116.34,-153.65"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-74.21C282.93,-87.72 264.06,-86.6 202,-114.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.61,-63.15C580.23,-59.14 562.45,-55.19 546,-53.21 499.67,-47.63 487.36,-47.85 441,-53.21 400.41,-57.91 391.54,-66.09 351.5,-74.21"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.78,-24.69C496.9,-3.61 285.6,30.18 142,-55.7 108.86,-75.52 81.51,-112.03 66.5,-135.03"/>
-<polygon fill="#000000" stroke="#000000" points="63.41,-133.36 61.01,-143.68 69.32,-137.11 63.41,-133.36"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-142.21C435.69,-138.09 419.28,-133.44 404.06,-129.12"/>
+<polygon fill="#000000" stroke="#000000" points="404.84,-125.7 394.26,-126.34 402.93,-132.44 404.84,-125.7"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C309.65,-160.12 269.72,-170.88 240.5,-180.33"/>
-<polygon fill="#000000" stroke="#000000" points="239.03,-177.13 230.64,-183.6 241.23,-183.78 239.03,-177.13"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.46,-154.29C418.91,-154.32 383.2,-154.32 351.5,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C281.58,-153.98 264.06,-86.6 202,-114.21"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.46,-143.68C433.66,-140.07 418.37,-136.08 404.01,-132.33"/>
-<polygon fill="#000000" stroke="#000000" points="404.8,-128.92 394.24,-129.78 403.03,-135.69 404.8,-128.92"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C311.49,-154.08 269.66,-166.08 240.28,-176.63"/>
+<polygon fill="#000000" stroke="#000000" points="238.98,-173.37 230.82,-180.13 241.41,-179.94 238.98,-173.37"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C280.36,-162.07 263.66,-151.67 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.25,-155.09C418.63,-155.02 381.15,-155.49 348,-157.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.38,-205.75C601.59,-209.97 591.78,-214.87 583,-219.7 562.41,-231.02 539.86,-244.97 522.81,-255.86"/>
-<polygon fill="#000000" stroke="#000000" points="520.47,-253.21 513.95,-261.56 524.26,-259.09 520.47,-253.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.3,-104.84C273.17,-100.93 233.7,-100.11 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C318.16,-193.85 287.31,-193.57 261.01,-193.86"/>
-<polygon fill="#000000" stroke="#000000" points="260.75,-190.36 250.8,-194 260.85,-197.36 260.75,-190.36"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.05,-126.24C315.13,-130.55 305.07,-135.5 296,-140.21 274.33,-151.46 250.25,-164.8 231.89,-175.15"/>
+<polygon fill="#000000" stroke="#000000" points="230.09,-172.15 223.11,-180.12 233.53,-178.24 230.09,-172.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.94,-181.52C597.35,-160.94 547.41,-119.15 518.19,-94.69"/>
-<polygon fill="#000000" stroke="#000000" points="520.11,-91.73 510.19,-87.99 515.61,-97.1 520.11,-91.73"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-114.21C147.11,-137.74 97.33,-185.43 71.8,-212.42"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-210.37 64.68,-220.08 74.05,-215.14 68.92,-210.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.02,-27.47C309.69,-48.3 254.98,-90.64 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C278.01,-191.19 266.04,-152.02 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.88,-196.29C528.22,-198.72 431.21,-201.22 348,-195.7"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-86.21C435.69,-90.33 419.28,-94.98 404.06,-99.3"/>
+<polygon fill="#000000" stroke="#000000" points="402.93,-95.98 394.26,-102.08 404.84,-102.72 402.93,-95.98"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M591.89,-181.68C578.64,-178.11 563.98,-174.16 550.18,-170.44"/>
-<polygon fill="#000000" stroke="#000000" points="550.87,-167 540.31,-167.78 549.05,-173.76 550.87,-167"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-69.59C418.28,-67.98 382.57,-67.91 351.5,-74.21"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.73,-338.15C259.91,-331.59 226.54,-322.16 198,-309.7"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_generate.f90~~EfferentGraph_edge29" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-204.21C140.96,-208.39 123.7,-213.12 107.75,-217.48"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-214.13 98.03,-220.15 108.6,-220.88 106.75,-214.13"/>
 </g>
 </g>
 </svg>
@@ -1159,26 +1154,30 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-545"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                          <span class="kd">::</span> <span class="n">i</span>
 <a name="ln-546"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">v_shift</span>
 <a name="ln-547"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">frag</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>       <span class="kd">::</span> <span class="n">kearr</span>
-<a name="ln-548"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">keo</span><span class="p">,</span> <span class="n">ke_radial</span>
+<a name="ln-548"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">keo</span><span class="p">,</span> <span class="n">ke_radial</span><span class="p">,</span> <span class="n">rotmag2</span><span class="p">,</span> <span class="n">vmag2</span>
 <a name="ln-549"></a>      
 <a name="ln-550"></a>            <span class="k">associate</span><span class="p">(</span><span class="n">nfrag</span> <span class="o">=&gt;</span> <span class="n">frag</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
 <a name="ln-551"></a>               <span class="k">allocate</span><span class="p">(</span><span class="n">v_shift</span><span class="p">,</span> <span class="n">mold</span><span class="o">=</span><span class="n">frag</span><span class="p">%</span><span class="n">vb</span><span class="p">)</span>
 <a name="ln-552"></a>               <span class="n">v_shift</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="n">fraggle_util_vmag_to_vb</span><span class="p">(</span><span class="n">v_r_mag_input</span><span class="p">,</span> <span class="n">frag</span><span class="p">%</span><span class="n">v_r_unit</span><span class="p">,</span> <span class="n">frag</span><span class="p">%</span><span class="n">v_t_mag</span><span class="p">,</span> <span class="n">frag</span><span class="p">%</span><span class="n">v_t_unit</span><span class="p">,</span> <span class="n">frag</span><span class="p">%</span><span class="n">mass</span><span class="p">,</span> <span class="n">frag</span><span class="p">%</span><span class="n">vbcom</span><span class="p">)</span> 
-<a name="ln-553"></a>               <span class="k">do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">nfrag</span><span class="p">)</span>
-<a name="ln-554"></a>                  <span class="n">kearr</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">frag</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">frag</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">frag</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">frag</span><span class="p">%</span><span class="n">rot</span><span class="p">(:,</span> <span class="n">i</span><span class="p">),</span> <span class="n">frag</span><span class="p">%</span><span class="n">rot</span><span class="p">(:,</span> <span class="n">i</span><span class="p">))</span> <span class="o">+</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">v_shift</span><span class="p">(:,</span> <span class="n">i</span><span class="p">),</span> <span class="n">v_shift</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)))</span>
-<a name="ln-555"></a>               <span class="k">end do</span>
-<a name="ln-556"></a><span class="k">               </span><span class="n">keo</span> <span class="o">=</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_budget</span> <span class="o">-</span> <span class="nb">sum</span><span class="p">(</span><span class="n">kearr</span><span class="p">(:))</span>
-<a name="ln-557"></a>               <span class="n">ke_radial</span> <span class="o">=</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_budget</span> <span class="o">-</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">-</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_spin</span>
-<a name="ln-558"></a>               <span class="c">! The following ensures that fval = 0 is a local minimum, which is what the BFGS method is searching for</span>
-<a name="ln-559"></a>               <span class="n">fval</span> <span class="o">=</span> <span class="p">(</span><span class="n">keo</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">ke_radial</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-560"></a>            <span class="k">end associate</span>
-<a name="ln-561"></a><span class="k">      </span>
-<a name="ln-562"></a><span class="k">            return</span>
-<a name="ln-563"></a><span class="k">         end function </span><span class="n">radial_objective_function</span>
-<a name="ln-564"></a>
-<a name="ln-565"></a>      <span class="k">end subroutine </span><span class="n">fraggle_generate_rad_vel</span>
-<a name="ln-566"></a>
-<a name="ln-567"></a><span class="k">end submodule </span><span class="n">s_fraggle_generate</span>
+<a name="ln-553"></a>               <span class="c">!$omp do simd </span>
+<a name="ln-554"></a>               <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span><span class="n">nfrag</span>
+<a name="ln-555"></a>                  <span class="n">rotmag2</span> <span class="o">=</span> <span class="n">frag</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">frag</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">frag</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-556"></a>                  <span class="n">vmag2</span> <span class="o">=</span> <span class="n">v_shift</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">v_shift</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">v_shift</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-557"></a>                  <span class="n">kearr</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">frag</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">frag</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">frag</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">rotmag2</span> <span class="o">+</span> <span class="n">vmag2</span><span class="p">)</span> 
+<a name="ln-558"></a>               <span class="k">end do</span>
+<a name="ln-559"></a>               <span class="c">!$omp end do simd</span>
+<a name="ln-560"></a>               <span class="n">keo</span> <span class="o">=</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_budget</span> <span class="o">-</span> <span class="nb">sum</span><span class="p">(</span><span class="n">kearr</span><span class="p">(:))</span>
+<a name="ln-561"></a>               <span class="n">ke_radial</span> <span class="o">=</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_budget</span> <span class="o">-</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">-</span> <span class="n">frag</span><span class="p">%</span><span class="n">ke_spin</span>
+<a name="ln-562"></a>               <span class="c">! The following ensures that fval = 0 is a local minimum, which is what the BFGS method is searching for</span>
+<a name="ln-563"></a>               <span class="n">fval</span> <span class="o">=</span> <span class="p">(</span><span class="n">keo</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">ke_radial</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-564"></a>            <span class="k">end associate</span>
+<a name="ln-565"></a><span class="k">      </span>
+<a name="ln-566"></a><span class="k">            return</span>
+<a name="ln-567"></a><span class="k">         end function </span><span class="n">radial_objective_function</span>
+<a name="ln-568"></a>
+<a name="ln-569"></a>      <span class="k">end subroutine </span><span class="n">fraggle_generate_rad_vel</span>
+<a name="ln-570"></a>
+<a name="ln-571"></a><span class="k">end submodule </span><span class="n">s_fraggle_generate</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/fraggle_io.f90.html b/docs/sourcefile/fraggle_io.f90.html
index b3a16e29c..70b2a6a7b 100644
--- a/docs/sourcefile/fraggle_io.f90.html
+++ b/docs/sourcefile/fraggle_io.f90.html
@@ -226,298 +226,293 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~fraggle_io.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilefraggle_iof90EfferentGraph" width="641pt" height="259pt"
- viewBox="0.00 0.00 641.00 258.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 365.7)">
+<svg id="sourcefilefraggle_iof90EfferentGraph" width="641pt" height="241pt"
+ viewBox="0.00 0.00 641.00 240.53" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 339.73)">
 <title>sourcefile~~fraggle_io.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.7 912,-365.7 912,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.73 912,-339.73 912,4 -4,4"/>
 <!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_io.f90</title>
-<polygon fill="none" stroke="black" points="908,-244.7 830,-244.7 830,-220.7 908,-220.7 908,-244.7"/>
-<text text-anchor="middle" x="869" y="-230.3" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_io.f90</text>
+<polygon fill="none" stroke="black" points="908,-245.21 830,-245.21 830,-221.21 908,-221.21 908,-245.21"/>
+<text text-anchor="middle" x="869" y="-230.81" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_io.f90</text>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
 <g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="547,-285.7 442,-285.7 442,-261.7 547,-261.7 547,-285.7"/>
-<text text-anchor="middle" x="494.5" y="-271.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-284.21 441,-284.21 441,-260.21 546,-260.21 546,-284.21"/>
+<text text-anchor="middle" x="493.5" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.89,-236.89C765.56,-243.97 634.88,-258.36 557.3,-266.9"/>
-<polygon fill="#000000" stroke="#000000" points="556.74,-263.44 547.19,-268.01 557.51,-270.4 556.74,-263.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M851.65,-245.42C821.81,-266.83 755.73,-310.41 692,-326.21 644.55,-337.98 629.03,-339.56 582,-326.21 557.58,-319.28 533.29,-303.39 516.52,-290.63"/>
+<polygon fill="#000000" stroke="#000000" points="518.5,-287.73 508.47,-284.3 514.17,-293.23 518.5,-287.73"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-224.7 728,-224.7 728,-200.7 794,-200.7 794,-224.7"/>
-<text text-anchor="middle" x="761" y="-210.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-186.21 728,-186.21 728,-162.21 794,-162.21 794,-186.21"/>
+<text text-anchor="middle" x="761" y="-171.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.73,-225.48C821.47,-223.92 812.69,-222.26 804.28,-220.68"/>
-<polygon fill="#000000" stroke="#000000" points="804.75,-217.2 794.27,-218.79 803.45,-224.08 804.75,-217.2"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M846.29,-221.13C830.86,-212.54 809.91,-200.88 792.76,-191.33"/>
+<polygon fill="#000000" stroke="#000000" points="794.12,-188.08 783.68,-186.28 790.71,-194.2 794.12,-188.08"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-207.7 143.5,-207.7 143.5,-183.7 250.5,-183.7 250.5,-207.7"/>
-<text text-anchor="middle" x="197" y="-193.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.21 0,-244.21 0,-220.21 106,-220.21 106,-244.21"/>
+<text text-anchor="middle" x="53" y="-229.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-274.39C414.08,-274.42 379.12,-273.87 348,-271.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C296.86,-268.27 247.51,-235.68 220.04,-214.3"/>
-<polygon fill="#000000" stroke="#000000" points="221.91,-211.32 211.92,-207.81 217.54,-216.79 221.91,-211.32"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C283.05,-257.29 269.56,-236.49 202,-232.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-167.7 0,-167.7 0,-143.7 106,-143.7 106,-167.7"/>
-<text text-anchor="middle" x="53" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-204.21 147.5,-204.21 147.5,-180.21 254.5,-180.21 254.5,-204.21"/>
+<text text-anchor="middle" x="201" y="-189.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-309.7C133.55,-282.43 86.44,-212.57 65.68,-177.08"/>
-<polygon fill="#000000" stroke="#000000" points="68.52,-175 60.53,-168.05 62.44,-178.47 68.52,-175"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C278.25,-266.96 260.24,-336.88 198,-309.7"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-275.84C413.94,-276.63 380.7,-275.89 351.5,-270.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C323.92,-265.24 318.33,-259.64 296,-246.21 278.63,-235.77 277.37,-228.65 260,-218.21 254.22,-214.74 247.89,-211.44 241.6,-208.43"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-205.24 232.5,-204.24 240.12,-211.6 243.05,-205.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C603.13,-238.87 566.47,-249.43 538.9,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.56,-255.15 529.17,-261.62 539.76,-261.8 537.56,-255.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.32,-186.64C739.96,-216.22 698.98,-289.94 638,-312.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C616.93,-319.18 566.94,-302.05 531.81,-288.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.91,-284.75 522.33,-284.24 530.29,-291.23 532.91,-284.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C502.08,-254.52 342.57,-228.01 257.86,-209.93"/>
-<polygon fill="#000000" stroke="#000000" points="258.43,-206.47 247.91,-207.77 256.94,-213.31 258.43,-206.47"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.79,-218.43C703.32,-222.74 668.81,-228.74 638.5,-233.7"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-284.21 142,-284.21 142,-260.21 260,-260.21 260,-284.21"/>
+<text text-anchor="middle" x="201" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C312.16,-309.72 271.19,-297.83 241.92,-287.66"/>
+<polygon fill="#000000" stroke="#000000" points="243.06,-284.35 232.47,-284.29 240.71,-290.94 243.06,-284.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C517.23,-355.59 477.67,-320.61 351.5,-312.21"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-129.7 300,-129.7 300,-105.7 394,-105.7 394,-129.7"/>
-<text text-anchor="middle" x="347" y="-115.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="688.5,-225.21 585.5,-225.21 585.5,-201.21 688.5,-201.21 688.5,-225.21"/>
+<text text-anchor="middle" x="637" y="-210.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C596.2,-98.55 476.3,-105.76 404.38,-112.06"/>
-<polygon fill="#000000" stroke="#000000" points="403.78,-108.6 394.14,-112.98 404.41,-115.57 403.78,-108.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.95,-184.46C714.98,-188.6 699.75,-193.47 685.54,-198.01"/>
+<polygon fill="#000000" stroke="#000000" points="684.37,-194.71 675.91,-201.09 686.5,-201.38 684.37,-194.71"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-88.7 142,-88.7 142,-64.7 252,-64.7 252,-88.7"/>
-<text text-anchor="middle" x="197" y="-74.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-87.21 582,-87.21 582,-63.21 692,-63.21 692,-87.21"/>
+<text text-anchor="middle" x="637" y="-72.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge7" class="edge">
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M749.01,-200.42C729.22,-179.2 685.3,-136 638.5,-115.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C592.34,-96.55 593,-68.88 547,-54.7 445.26,-23.32 319.13,-45.26 249.77,-62.19"/>
-<polygon fill="#000000" stroke="#000000" points="248.81,-58.82 239.96,-64.65 250.51,-65.61 248.81,-58.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.04,-162.07C724,-145 685.5,-113.76 660.86,-93.76"/>
+<polygon fill="#000000" stroke="#000000" points="663.05,-91.03 653.08,-87.45 658.64,-96.47 663.05,-91.03"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="542,-87.7 447,-87.7 447,-63.7 542,-63.7 542,-87.7"/>
-<text text-anchor="middle" x="494.5" y="-73.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="540.5,-166.21 446.5,-166.21 446.5,-142.21 540.5,-142.21 540.5,-166.21"/>
+<text text-anchor="middle" x="493.5" y="-151.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C609.51,-104.21 578.24,-94.96 552.01,-88.26"/>
-<polygon fill="#000000" stroke="#000000" points="552.78,-84.84 542.23,-85.82 551.08,-91.63 552.78,-84.84"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.2,-224.84C712.94,-259.68 604.11,-357.03 495.5,-349.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C453.65,-353.1 445.46,-335.2 406,-328.7 314.41,-313.61 283.07,-346.85 198,-309.7"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C608.12,-150.02 576.8,-149.59 550.73,-150.38"/>
+<polygon fill="#000000" stroke="#000000" points="550.5,-146.89 540.64,-150.76 550.76,-153.89 550.5,-146.89"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-48.7 583,-48.7 583,-24.7 692,-24.7 692,-48.7"/>
-<text text-anchor="middle" x="637.5" y="-34.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-126.21 303.5,-126.21 303.5,-102.21 397.5,-102.21 397.5,-126.21"/>
+<text text-anchor="middle" x="350.5" y="-111.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.37,-200.69C741.77,-179.94 716.66,-136.3 692,-101.7 680.73,-85.88 666.74,-68.97 655.9,-56.36"/>
-<polygon fill="#000000" stroke="#000000" points="658.49,-54.01 649.28,-48.76 653.2,-58.6 658.49,-54.01"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.38,-148.11 586.53,-139.89 546,-133.21 499.75,-125.59 446.77,-120.66 407.8,-117.74"/>
+<polygon fill="#000000" stroke="#000000" points="407.93,-114.24 397.7,-117 407.42,-121.22 407.93,-114.24"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541.5,-167.7 447.5,-167.7 447.5,-143.7 541.5,-143.7 541.5,-167.7"/>
-<text text-anchor="middle" x="494.5" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-27.21 296,-27.21 296,-3.21 405,-3.21 405,-27.21"/>
+<text text-anchor="middle" x="350.5" y="-12.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C617.77,-107.73 567.4,-125.34 532.24,-139.67"/>
-<polygon fill="#000000" stroke="#000000" points="530.66,-136.54 522.76,-143.6 533.34,-143 530.66,-136.54"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="689,-205.7 586,-205.7 586,-181.7 689,-181.7 689,-205.7"/>
-<text text-anchor="middle" x="637.5" y="-191.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.74,-162.16C749.48,-137.73 729.59,-82.32 692,-54.21 611.67,5.85 489.49,3.72 415.41,-4.73"/>
+<polygon fill="#000000" stroke="#000000" points="414.79,-1.28 405.28,-5.96 415.63,-8.23 414.79,-1.28"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.76,-207.66C718.99,-206.29 709.2,-204.76 699.41,-203.22"/>
-<polygon fill="#000000" stroke="#000000" points="699.66,-199.72 689.24,-201.63 698.58,-206.64 699.66,-199.72"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C257.58,-300.92 229.03,-324.86 142,-293.21 116.33,-283.88 91.13,-265.16 74.32,-250.91"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-248.26 66.78,-244.33 72.02,-253.54 76.62,-248.26"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-361.7 288,-361.7 288,-337.7 406,-337.7 406,-361.7"/>
-<text text-anchor="middle" x="347" y="-347.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~fraggle_io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541,-86.21 446,-86.21 446,-62.21 541,-62.21 541,-86.21"/>
+<text text-anchor="middle" x="493.5" y="-71.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C468.36,-348 440.72,-347.63 416.35,-347.8"/>
-<polygon fill="#000000" stroke="#000000" points="416.08,-344.31 406.12,-347.91 416.15,-351.31 416.08,-344.31"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.93,-168.71C703.34,-164.56 668.56,-158.81 638,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C589.87,-147.28 586.85,-122.74 546,-100.21 540.36,-97.1 534.3,-93.91 528.39,-90.88"/>
+<polygon fill="#000000" stroke="#000000" points="529.82,-87.68 519.31,-86.28 526.65,-93.92 529.82,-87.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.32,-148.52 586.68,-169.51 546,-175.21 448.56,-188.87 334.25,-192 265.02,-192.48"/>
+<polygon fill="#000000" stroke="#000000" points="264.71,-188.98 254.73,-192.54 264.75,-195.98 264.71,-188.98"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-183.7C138.79,-179.58 122.26,-174.93 106.93,-170.61"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-167.17 97.07,-167.83 105.74,-173.91 107.64,-167.17"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-260.21C140.96,-256.04 123.7,-251.31 107.75,-246.94"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-243.54 98.03,-244.27 106.75,-250.29 108.6,-243.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.91,-129.79C306.76,-133.84 296.79,-138.62 288,-143.7 270.91,-153.57 268.96,-159.6 252,-169.7 246.49,-172.98 240.49,-176.19 234.57,-179.18"/>
-<polygon fill="#000000" stroke="#000000" points="232.86,-176.12 225.41,-183.65 235.93,-182.41 232.86,-176.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-225.29C585.56,-234.24 556.11,-246.52 532.72,-256.27"/>
+<polygon fill="#000000" stroke="#000000" points="531.32,-253.07 523.44,-260.15 534.01,-259.53 531.32,-253.07"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-129.8C284.05,-139.95 238.78,-153.19 198,-155.7"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-201.13C585.56,-192.18 556.11,-179.9 532.72,-170.15"/>
+<polygon fill="#000000" stroke="#000000" points="534.01,-166.89 523.44,-166.28 531.32,-173.36 534.01,-166.89"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-88.87C150.18,-102.19 111.63,-123.64 84.68,-138.63"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-135.72 75.67,-143.64 86.11,-141.84 82.71,-135.72"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C284.05,-228.54 267.42,-236.35 202,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-232.21C172.53,-230.47 142.1,-230.21 116.16,-230.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.03,-226.98 106.08,-230.62 116.13,-233.98 116.03,-226.98"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.81,-87.74C435.52,-92.44 416.68,-97.87 399.55,-102.82"/>
-<polygon fill="#000000" stroke="#000000" points="398.34,-99.53 389.7,-105.66 400.28,-106.25 398.34,-99.53"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.38,-220.66C528.49,-228.09 433.37,-237.66 351.5,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C311.9,-230.1 270.64,-218.03 241.35,-207.7"/>
+<polygon fill="#000000" stroke="#000000" points="242.49,-204.39 231.9,-204.28 240.11,-210.97 242.49,-204.39"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.83,-74.25C404.26,-74.35 340.22,-78.17 288,-96.7 242.93,-112.7 245.74,-152.77 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-155.7C169.93,-157.11 141.13,-157.35 116.31,-157.15"/>
-<polygon fill="#000000" stroke="#000000" points="116.34,-153.65 106.3,-157.05 116.26,-160.65 116.34,-153.65"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-74.21C282.93,-87.72 264.06,-86.6 202,-114.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.61,-63.15C580.23,-59.14 562.45,-55.19 546,-53.21 499.67,-47.63 487.36,-47.85 441,-53.21 400.41,-57.91 391.54,-66.09 351.5,-74.21"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.78,-24.69C496.9,-3.61 285.6,30.18 142,-55.7 108.86,-75.52 81.51,-112.03 66.5,-135.03"/>
-<polygon fill="#000000" stroke="#000000" points="63.41,-133.36 61.01,-143.68 69.32,-137.11 63.41,-133.36"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-142.21C435.69,-138.09 419.28,-133.44 404.06,-129.12"/>
+<polygon fill="#000000" stroke="#000000" points="404.84,-125.7 394.26,-126.34 402.93,-132.44 404.84,-125.7"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C309.65,-160.12 269.72,-170.88 240.5,-180.33"/>
-<polygon fill="#000000" stroke="#000000" points="239.03,-177.13 230.64,-183.6 241.23,-183.78 239.03,-177.13"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.46,-154.29C418.91,-154.32 383.2,-154.32 351.5,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C281.58,-153.98 264.06,-86.6 202,-114.21"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.46,-143.68C433.66,-140.07 418.37,-136.08 404.01,-132.33"/>
-<polygon fill="#000000" stroke="#000000" points="404.8,-128.92 394.24,-129.78 403.03,-135.69 404.8,-128.92"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C311.49,-154.08 269.66,-166.08 240.28,-176.63"/>
+<polygon fill="#000000" stroke="#000000" points="238.98,-173.37 230.82,-180.13 241.41,-179.94 238.98,-173.37"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C280.36,-162.07 263.66,-151.67 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.25,-155.09C418.63,-155.02 381.15,-155.49 348,-157.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.38,-205.75C601.59,-209.97 591.78,-214.87 583,-219.7 562.41,-231.02 539.86,-244.97 522.81,-255.86"/>
-<polygon fill="#000000" stroke="#000000" points="520.47,-253.21 513.95,-261.56 524.26,-259.09 520.47,-253.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.3,-104.84C273.17,-100.93 233.7,-100.11 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C318.16,-193.85 287.31,-193.57 261.01,-193.86"/>
-<polygon fill="#000000" stroke="#000000" points="260.75,-190.36 250.8,-194 260.85,-197.36 260.75,-190.36"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.05,-126.24C315.13,-130.55 305.07,-135.5 296,-140.21 274.33,-151.46 250.25,-164.8 231.89,-175.15"/>
+<polygon fill="#000000" stroke="#000000" points="230.09,-172.15 223.11,-180.12 233.53,-178.24 230.09,-172.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.94,-181.52C597.35,-160.94 547.41,-119.15 518.19,-94.69"/>
-<polygon fill="#000000" stroke="#000000" points="520.11,-91.73 510.19,-87.99 515.61,-97.1 520.11,-91.73"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-114.21C147.11,-137.74 97.33,-185.43 71.8,-212.42"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-210.37 64.68,-220.08 74.05,-215.14 68.92,-210.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.02,-27.47C309.69,-48.3 254.98,-90.64 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C278.01,-191.19 266.04,-152.02 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.88,-196.29C528.22,-198.72 431.21,-201.22 348,-195.7"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-86.21C435.69,-90.33 419.28,-94.98 404.06,-99.3"/>
+<polygon fill="#000000" stroke="#000000" points="402.93,-95.98 394.26,-102.08 404.84,-102.72 402.93,-95.98"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M591.89,-181.68C578.64,-178.11 563.98,-174.16 550.18,-170.44"/>
-<polygon fill="#000000" stroke="#000000" points="550.87,-167 540.31,-167.78 549.05,-173.76 550.87,-167"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-69.59C418.28,-67.98 382.57,-67.91 351.5,-74.21"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.73,-338.15C259.91,-331.59 226.54,-322.16 198,-309.7"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_io.f90~~EfferentGraph_edge29" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-204.21C140.96,-208.39 123.7,-213.12 107.75,-217.48"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-214.13 98.03,-220.15 108.6,-220.88 106.75,-214.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/fraggle_placeholder.f90.html b/docs/sourcefile/fraggle_placeholder.f90.html
index dcdbb6fd9..ea8f7bb74 100644
--- a/docs/sourcefile/fraggle_placeholder.f90.html
+++ b/docs/sourcefile/fraggle_placeholder.f90.html
@@ -226,298 +226,293 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~fraggle_placeholder.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilefraggle_placeholderf90EfferentGraph" width="641pt" height="246pt"
- viewBox="0.00 0.00 641.00 246.34" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 365.7)">
+<svg id="sourcefilefraggle_placeholderf90EfferentGraph" width="641pt" height="229pt"
+ viewBox="0.00 0.00 641.00 228.79" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph" class="graph" transform="scale(0.67 0.67) rotate(0) translate(4 339.36)">
 <title>sourcefile~~fraggle_placeholder.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.7 958,-365.7 958,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.36 958,-339.36 958,4 -4,4"/>
 <!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_placeholder.f90</title>
-<polygon fill="none" stroke="black" points="954,-244.7 830,-244.7 830,-220.7 954,-220.7 954,-244.7"/>
-<text text-anchor="middle" x="892" y="-230.3" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_placeholder.f90</text>
+<polygon fill="none" stroke="black" points="954,-245.21 830,-245.21 830,-221.21 954,-221.21 954,-245.21"/>
+<text text-anchor="middle" x="892" y="-230.81" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_placeholder.f90</text>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
 <g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="547,-285.7 442,-285.7 442,-261.7 547,-261.7 547,-285.7"/>
-<text text-anchor="middle" x="494.5" y="-271.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-284.21 441,-284.21 441,-260.21 546,-260.21 546,-284.21"/>
+<text text-anchor="middle" x="493.5" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.64,-239.06C755.55,-246.74 631.68,-259.58 557.37,-267.29"/>
-<polygon fill="#000000" stroke="#000000" points="556.81,-263.82 547.23,-268.34 557.53,-270.79 556.81,-263.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M872.51,-245.27C838.49,-266.65 762.92,-310.46 692,-326.21 644.27,-336.81 629.03,-339.56 582,-326.21 557.58,-319.28 533.29,-303.39 516.52,-290.63"/>
+<polygon fill="#000000" stroke="#000000" points="518.5,-287.73 508.47,-284.3 514.17,-293.23 518.5,-287.73"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-224.7 728,-224.7 728,-200.7 794,-200.7 794,-224.7"/>
-<text text-anchor="middle" x="761" y="-210.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-186.21 728,-186.21 728,-162.21 794,-162.21 794,-186.21"/>
+<text text-anchor="middle" x="761" y="-171.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.9,-223.23C821.2,-221.88 812.42,-220.52 804.19,-219.24"/>
-<polygon fill="#000000" stroke="#000000" points="804.52,-215.75 794.11,-217.68 803.45,-222.67 804.52,-215.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M864.58,-221.13C845.28,-212.3 818.88,-200.23 797.7,-190.54"/>
+<polygon fill="#000000" stroke="#000000" points="798.93,-187.25 788.38,-186.28 796.02,-193.62 798.93,-187.25"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-207.7 143.5,-207.7 143.5,-183.7 250.5,-183.7 250.5,-207.7"/>
-<text text-anchor="middle" x="197" y="-193.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.21 0,-244.21 0,-220.21 106,-220.21 106,-244.21"/>
+<text text-anchor="middle" x="53" y="-229.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-274.39C414.08,-274.42 379.12,-273.87 348,-271.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C296.86,-268.27 247.51,-235.68 220.04,-214.3"/>
-<polygon fill="#000000" stroke="#000000" points="221.91,-211.32 211.92,-207.81 217.54,-216.79 221.91,-211.32"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C283.05,-257.29 269.56,-236.49 202,-232.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-167.7 0,-167.7 0,-143.7 106,-143.7 106,-167.7"/>
-<text text-anchor="middle" x="53" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-204.21 147.5,-204.21 147.5,-180.21 254.5,-180.21 254.5,-204.21"/>
+<text text-anchor="middle" x="201" y="-189.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-309.7C133.55,-282.43 86.44,-212.57 65.68,-177.08"/>
-<polygon fill="#000000" stroke="#000000" points="68.52,-175 60.53,-168.05 62.44,-178.47 68.52,-175"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C278.25,-266.96 260.24,-336.88 198,-309.7"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-275.84C413.94,-276.63 380.7,-275.89 351.5,-270.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C323.92,-265.24 318.33,-259.64 296,-246.21 278.63,-235.77 277.37,-228.65 260,-218.21 254.22,-214.74 247.89,-211.44 241.6,-208.43"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-205.24 232.5,-204.24 240.12,-211.6 243.05,-205.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C603.13,-238.87 566.47,-249.43 538.9,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.56,-255.15 529.17,-261.62 539.76,-261.8 537.56,-255.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.32,-186.64C739.96,-216.22 698.98,-289.94 638,-312.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C616.93,-319.18 566.94,-302.05 531.81,-288.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.91,-284.75 522.33,-284.24 530.29,-291.23 532.91,-284.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C502.08,-254.52 342.57,-228.01 257.86,-209.93"/>
-<polygon fill="#000000" stroke="#000000" points="258.43,-206.47 247.91,-207.77 256.94,-213.31 258.43,-206.47"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.79,-218.43C703.32,-222.74 668.81,-228.74 638.5,-233.7"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-284.21 142,-284.21 142,-260.21 260,-260.21 260,-284.21"/>
+<text text-anchor="middle" x="201" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C312.16,-309.72 271.19,-297.83 241.92,-287.66"/>
+<polygon fill="#000000" stroke="#000000" points="243.06,-284.35 232.47,-284.29 240.71,-290.94 243.06,-284.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C517.23,-355.59 477.67,-320.61 351.5,-312.21"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-129.7 300,-129.7 300,-105.7 394,-105.7 394,-129.7"/>
-<text text-anchor="middle" x="347" y="-115.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="688.5,-225.21 585.5,-225.21 585.5,-201.21 688.5,-201.21 688.5,-225.21"/>
+<text text-anchor="middle" x="637" y="-210.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C596.2,-98.55 476.3,-105.76 404.38,-112.06"/>
-<polygon fill="#000000" stroke="#000000" points="403.78,-108.6 394.14,-112.98 404.41,-115.57 403.78,-108.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.95,-184.46C714.98,-188.6 699.75,-193.47 685.54,-198.01"/>
+<polygon fill="#000000" stroke="#000000" points="684.37,-194.71 675.91,-201.09 686.5,-201.38 684.37,-194.71"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-88.7 142,-88.7 142,-64.7 252,-64.7 252,-88.7"/>
-<text text-anchor="middle" x="197" y="-74.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-87.21 582,-87.21 582,-63.21 692,-63.21 692,-87.21"/>
+<text text-anchor="middle" x="637" y="-72.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge7" class="edge">
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M749.01,-200.42C729.22,-179.2 685.3,-136 638.5,-115.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C592.34,-96.55 593,-68.88 547,-54.7 445.26,-23.32 319.13,-45.26 249.77,-62.19"/>
-<polygon fill="#000000" stroke="#000000" points="248.81,-58.82 239.96,-64.65 250.51,-65.61 248.81,-58.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.04,-162.07C724,-145 685.5,-113.76 660.86,-93.76"/>
+<polygon fill="#000000" stroke="#000000" points="663.05,-91.03 653.08,-87.45 658.64,-96.47 663.05,-91.03"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="542,-87.7 447,-87.7 447,-63.7 542,-63.7 542,-87.7"/>
-<text text-anchor="middle" x="494.5" y="-73.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="540.5,-166.21 446.5,-166.21 446.5,-142.21 540.5,-142.21 540.5,-166.21"/>
+<text text-anchor="middle" x="493.5" y="-151.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C609.51,-104.21 578.24,-94.96 552.01,-88.26"/>
-<polygon fill="#000000" stroke="#000000" points="552.78,-84.84 542.23,-85.82 551.08,-91.63 552.78,-84.84"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.2,-224.84C712.94,-259.68 604.11,-357.03 495.5,-349.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C453.65,-353.1 445.46,-335.2 406,-328.7 314.41,-313.61 283.07,-346.85 198,-309.7"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C608.12,-150.02 576.8,-149.59 550.73,-150.38"/>
+<polygon fill="#000000" stroke="#000000" points="550.5,-146.89 540.64,-150.76 550.76,-153.89 550.5,-146.89"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-48.7 583,-48.7 583,-24.7 692,-24.7 692,-48.7"/>
-<text text-anchor="middle" x="637.5" y="-34.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-126.21 303.5,-126.21 303.5,-102.21 397.5,-102.21 397.5,-126.21"/>
+<text text-anchor="middle" x="350.5" y="-111.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.37,-200.69C741.77,-179.94 716.66,-136.3 692,-101.7 680.73,-85.88 666.74,-68.97 655.9,-56.36"/>
-<polygon fill="#000000" stroke="#000000" points="658.49,-54.01 649.28,-48.76 653.2,-58.6 658.49,-54.01"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.38,-148.11 586.53,-139.89 546,-133.21 499.75,-125.59 446.77,-120.66 407.8,-117.74"/>
+<polygon fill="#000000" stroke="#000000" points="407.93,-114.24 397.7,-117 407.42,-121.22 407.93,-114.24"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541.5,-167.7 447.5,-167.7 447.5,-143.7 541.5,-143.7 541.5,-167.7"/>
-<text text-anchor="middle" x="494.5" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-27.21 296,-27.21 296,-3.21 405,-3.21 405,-27.21"/>
+<text text-anchor="middle" x="350.5" y="-12.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C617.77,-107.73 567.4,-125.34 532.24,-139.67"/>
-<polygon fill="#000000" stroke="#000000" points="530.66,-136.54 522.76,-143.6 533.34,-143 530.66,-136.54"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="689,-205.7 586,-205.7 586,-181.7 689,-181.7 689,-205.7"/>
-<text text-anchor="middle" x="637.5" y="-191.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.74,-162.16C749.48,-137.73 729.59,-82.32 692,-54.21 611.67,5.85 489.49,3.72 415.41,-4.73"/>
+<polygon fill="#000000" stroke="#000000" points="414.79,-1.28 405.28,-5.96 415.63,-8.23 414.79,-1.28"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.76,-207.66C718.99,-206.29 709.2,-204.76 699.41,-203.22"/>
-<polygon fill="#000000" stroke="#000000" points="699.66,-199.72 689.24,-201.63 698.58,-206.64 699.66,-199.72"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C257.58,-300.92 229.03,-324.86 142,-293.21 116.33,-283.88 91.13,-265.16 74.32,-250.91"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-248.26 66.78,-244.33 72.02,-253.54 76.62,-248.26"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-361.7 288,-361.7 288,-337.7 406,-337.7 406,-361.7"/>
-<text text-anchor="middle" x="347" y="-347.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~fraggle_placeholder.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541,-86.21 446,-86.21 446,-62.21 541,-62.21 541,-86.21"/>
+<text text-anchor="middle" x="493.5" y="-71.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C468.36,-348 440.72,-347.63 416.35,-347.8"/>
-<polygon fill="#000000" stroke="#000000" points="416.08,-344.31 406.12,-347.91 416.15,-351.31 416.08,-344.31"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.93,-168.71C703.34,-164.56 668.56,-158.81 638,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C589.87,-147.28 586.85,-122.74 546,-100.21 540.36,-97.1 534.3,-93.91 528.39,-90.88"/>
+<polygon fill="#000000" stroke="#000000" points="529.82,-87.68 519.31,-86.28 526.65,-93.92 529.82,-87.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.32,-148.52 586.68,-169.51 546,-175.21 448.56,-188.87 334.25,-192 265.02,-192.48"/>
+<polygon fill="#000000" stroke="#000000" points="264.71,-188.98 254.73,-192.54 264.75,-195.98 264.71,-188.98"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-183.7C138.79,-179.58 122.26,-174.93 106.93,-170.61"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-167.17 97.07,-167.83 105.74,-173.91 107.64,-167.17"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-260.21C140.96,-256.04 123.7,-251.31 107.75,-246.94"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-243.54 98.03,-244.27 106.75,-250.29 108.6,-243.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.91,-129.79C306.76,-133.84 296.79,-138.62 288,-143.7 270.91,-153.57 268.96,-159.6 252,-169.7 246.49,-172.98 240.49,-176.19 234.57,-179.18"/>
-<polygon fill="#000000" stroke="#000000" points="232.86,-176.12 225.41,-183.65 235.93,-182.41 232.86,-176.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-225.29C585.56,-234.24 556.11,-246.52 532.72,-256.27"/>
+<polygon fill="#000000" stroke="#000000" points="531.32,-253.07 523.44,-260.15 534.01,-259.53 531.32,-253.07"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-129.8C284.05,-139.95 238.78,-153.19 198,-155.7"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-201.13C585.56,-192.18 556.11,-179.9 532.72,-170.15"/>
+<polygon fill="#000000" stroke="#000000" points="534.01,-166.89 523.44,-166.28 531.32,-173.36 534.01,-166.89"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-88.87C150.18,-102.19 111.63,-123.64 84.68,-138.63"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-135.72 75.67,-143.64 86.11,-141.84 82.71,-135.72"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C284.05,-228.54 267.42,-236.35 202,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-232.21C172.53,-230.47 142.1,-230.21 116.16,-230.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.03,-226.98 106.08,-230.62 116.13,-233.98 116.03,-226.98"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.81,-87.74C435.52,-92.44 416.68,-97.87 399.55,-102.82"/>
-<polygon fill="#000000" stroke="#000000" points="398.34,-99.53 389.7,-105.66 400.28,-106.25 398.34,-99.53"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.38,-220.66C528.49,-228.09 433.37,-237.66 351.5,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C311.9,-230.1 270.64,-218.03 241.35,-207.7"/>
+<polygon fill="#000000" stroke="#000000" points="242.49,-204.39 231.9,-204.28 240.11,-210.97 242.49,-204.39"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.83,-74.25C404.26,-74.35 340.22,-78.17 288,-96.7 242.93,-112.7 245.74,-152.77 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-155.7C169.93,-157.11 141.13,-157.35 116.31,-157.15"/>
-<polygon fill="#000000" stroke="#000000" points="116.34,-153.65 106.3,-157.05 116.26,-160.65 116.34,-153.65"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-74.21C282.93,-87.72 264.06,-86.6 202,-114.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.61,-63.15C580.23,-59.14 562.45,-55.19 546,-53.21 499.67,-47.63 487.36,-47.85 441,-53.21 400.41,-57.91 391.54,-66.09 351.5,-74.21"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.78,-24.69C496.9,-3.61 285.6,30.18 142,-55.7 108.86,-75.52 81.51,-112.03 66.5,-135.03"/>
-<polygon fill="#000000" stroke="#000000" points="63.41,-133.36 61.01,-143.68 69.32,-137.11 63.41,-133.36"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-142.21C435.69,-138.09 419.28,-133.44 404.06,-129.12"/>
+<polygon fill="#000000" stroke="#000000" points="404.84,-125.7 394.26,-126.34 402.93,-132.44 404.84,-125.7"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C309.65,-160.12 269.72,-170.88 240.5,-180.33"/>
-<polygon fill="#000000" stroke="#000000" points="239.03,-177.13 230.64,-183.6 241.23,-183.78 239.03,-177.13"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.46,-154.29C418.91,-154.32 383.2,-154.32 351.5,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C281.58,-153.98 264.06,-86.6 202,-114.21"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.46,-143.68C433.66,-140.07 418.37,-136.08 404.01,-132.33"/>
-<polygon fill="#000000" stroke="#000000" points="404.8,-128.92 394.24,-129.78 403.03,-135.69 404.8,-128.92"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C311.49,-154.08 269.66,-166.08 240.28,-176.63"/>
+<polygon fill="#000000" stroke="#000000" points="238.98,-173.37 230.82,-180.13 241.41,-179.94 238.98,-173.37"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C280.36,-162.07 263.66,-151.67 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.25,-155.09C418.63,-155.02 381.15,-155.49 348,-157.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.38,-205.75C601.59,-209.97 591.78,-214.87 583,-219.7 562.41,-231.02 539.86,-244.97 522.81,-255.86"/>
-<polygon fill="#000000" stroke="#000000" points="520.47,-253.21 513.95,-261.56 524.26,-259.09 520.47,-253.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.3,-104.84C273.17,-100.93 233.7,-100.11 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C318.16,-193.85 287.31,-193.57 261.01,-193.86"/>
-<polygon fill="#000000" stroke="#000000" points="260.75,-190.36 250.8,-194 260.85,-197.36 260.75,-190.36"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.05,-126.24C315.13,-130.55 305.07,-135.5 296,-140.21 274.33,-151.46 250.25,-164.8 231.89,-175.15"/>
+<polygon fill="#000000" stroke="#000000" points="230.09,-172.15 223.11,-180.12 233.53,-178.24 230.09,-172.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.94,-181.52C597.35,-160.94 547.41,-119.15 518.19,-94.69"/>
-<polygon fill="#000000" stroke="#000000" points="520.11,-91.73 510.19,-87.99 515.61,-97.1 520.11,-91.73"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-114.21C147.11,-137.74 97.33,-185.43 71.8,-212.42"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-210.37 64.68,-220.08 74.05,-215.14 68.92,-210.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.02,-27.47C309.69,-48.3 254.98,-90.64 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C278.01,-191.19 266.04,-152.02 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.88,-196.29C528.22,-198.72 431.21,-201.22 348,-195.7"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-86.21C435.69,-90.33 419.28,-94.98 404.06,-99.3"/>
+<polygon fill="#000000" stroke="#000000" points="402.93,-95.98 394.26,-102.08 404.84,-102.72 402.93,-95.98"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M591.89,-181.68C578.64,-178.11 563.98,-174.16 550.18,-170.44"/>
-<polygon fill="#000000" stroke="#000000" points="550.87,-167 540.31,-167.78 549.05,-173.76 550.87,-167"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-69.59C418.28,-67.98 382.57,-67.91 351.5,-74.21"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.73,-338.15C259.91,-331.59 226.54,-322.16 198,-309.7"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_placeholder.f90~~EfferentGraph_edge29" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-204.21C140.96,-208.39 123.7,-213.12 107.75,-217.48"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-214.13 98.03,-220.15 108.6,-220.88 106.75,-214.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/fraggle_regime.f90.html b/docs/sourcefile/fraggle_regime.f90.html
index 8e2beb795..310d766a1 100644
--- a/docs/sourcefile/fraggle_regime.f90.html
+++ b/docs/sourcefile/fraggle_regime.f90.html
@@ -226,298 +226,293 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~fraggle_regime.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilefraggle_regimef90EfferentGraph" width="641pt" height="252pt"
- viewBox="0.00 0.00 641.00 251.84" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 365.7)">
+<svg id="sourcefilefraggle_regimef90EfferentGraph" width="641pt" height="234pt"
+ viewBox="0.00 0.00 641.00 234.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 339.52)">
 <title>sourcefile~~fraggle_regime.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.7 937,-365.7 937,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.52 937,-339.52 937,4 -4,4"/>
 <!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_regime.f90</title>
-<polygon fill="none" stroke="black" points="933,-244.7 830,-244.7 830,-220.7 933,-220.7 933,-244.7"/>
-<text text-anchor="middle" x="881.5" y="-230.3" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_regime.f90</text>
+<polygon fill="none" stroke="black" points="933,-245.21 830,-245.21 830,-221.21 933,-221.21 933,-245.21"/>
+<text text-anchor="middle" x="881.5" y="-230.81" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_regime.f90</text>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
 <g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="547,-285.7 442,-285.7 442,-261.7 547,-261.7 547,-285.7"/>
-<text text-anchor="middle" x="494.5" y="-271.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-284.21 441,-284.21 441,-260.21 546,-260.21 546,-284.21"/>
+<text text-anchor="middle" x="493.5" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.77,-238.1C759.66,-245.57 633.26,-259.03 557.59,-267.09"/>
-<polygon fill="#000000" stroke="#000000" points="556.84,-263.65 547.26,-268.19 557.58,-270.61 556.84,-263.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M863.09,-245.26C831.02,-266.63 759.7,-310.42 692,-326.21 644.39,-337.32 629.03,-339.56 582,-326.21 557.58,-319.28 533.29,-303.39 516.52,-290.63"/>
+<polygon fill="#000000" stroke="#000000" points="518.5,-287.73 508.47,-284.3 514.17,-293.23 518.5,-287.73"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-224.7 728,-224.7 728,-200.7 794,-200.7 794,-224.7"/>
-<text text-anchor="middle" x="761" y="-210.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-186.21 728,-186.21 728,-162.21 794,-162.21 794,-186.21"/>
+<text text-anchor="middle" x="761" y="-171.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.9,-224.16C821.31,-222.71 812.48,-221.22 804.14,-219.81"/>
-<polygon fill="#000000" stroke="#000000" points="804.71,-216.36 794.26,-218.14 803.54,-223.26 804.71,-216.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.23,-221.13C838.66,-212.38 814.69,-200.44 795.32,-190.8"/>
+<polygon fill="#000000" stroke="#000000" points="796.75,-187.6 786.23,-186.28 793.63,-193.87 796.75,-187.6"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-207.7 143.5,-207.7 143.5,-183.7 250.5,-183.7 250.5,-207.7"/>
-<text text-anchor="middle" x="197" y="-193.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.21 0,-244.21 0,-220.21 106,-220.21 106,-244.21"/>
+<text text-anchor="middle" x="53" y="-229.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-274.39C414.08,-274.42 379.12,-273.87 348,-271.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C296.86,-268.27 247.51,-235.68 220.04,-214.3"/>
-<polygon fill="#000000" stroke="#000000" points="221.91,-211.32 211.92,-207.81 217.54,-216.79 221.91,-211.32"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C283.05,-257.29 269.56,-236.49 202,-232.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-167.7 0,-167.7 0,-143.7 106,-143.7 106,-167.7"/>
-<text text-anchor="middle" x="53" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-204.21 147.5,-204.21 147.5,-180.21 254.5,-180.21 254.5,-204.21"/>
+<text text-anchor="middle" x="201" y="-189.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-309.7C133.55,-282.43 86.44,-212.57 65.68,-177.08"/>
-<polygon fill="#000000" stroke="#000000" points="68.52,-175 60.53,-168.05 62.44,-178.47 68.52,-175"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C278.25,-266.96 260.24,-336.88 198,-309.7"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-275.84C413.94,-276.63 380.7,-275.89 351.5,-270.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C323.92,-265.24 318.33,-259.64 296,-246.21 278.63,-235.77 277.37,-228.65 260,-218.21 254.22,-214.74 247.89,-211.44 241.6,-208.43"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-205.24 232.5,-204.24 240.12,-211.6 243.05,-205.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C603.13,-238.87 566.47,-249.43 538.9,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.56,-255.15 529.17,-261.62 539.76,-261.8 537.56,-255.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.32,-186.64C739.96,-216.22 698.98,-289.94 638,-312.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C616.93,-319.18 566.94,-302.05 531.81,-288.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.91,-284.75 522.33,-284.24 530.29,-291.23 532.91,-284.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C502.08,-254.52 342.57,-228.01 257.86,-209.93"/>
-<polygon fill="#000000" stroke="#000000" points="258.43,-206.47 247.91,-207.77 256.94,-213.31 258.43,-206.47"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.79,-218.43C703.32,-222.74 668.81,-228.74 638.5,-233.7"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-284.21 142,-284.21 142,-260.21 260,-260.21 260,-284.21"/>
+<text text-anchor="middle" x="201" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C312.16,-309.72 271.19,-297.83 241.92,-287.66"/>
+<polygon fill="#000000" stroke="#000000" points="243.06,-284.35 232.47,-284.29 240.71,-290.94 243.06,-284.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C517.23,-355.59 477.67,-320.61 351.5,-312.21"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-129.7 300,-129.7 300,-105.7 394,-105.7 394,-129.7"/>
-<text text-anchor="middle" x="347" y="-115.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="688.5,-225.21 585.5,-225.21 585.5,-201.21 688.5,-201.21 688.5,-225.21"/>
+<text text-anchor="middle" x="637" y="-210.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C596.2,-98.55 476.3,-105.76 404.38,-112.06"/>
-<polygon fill="#000000" stroke="#000000" points="403.78,-108.6 394.14,-112.98 404.41,-115.57 403.78,-108.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.95,-184.46C714.98,-188.6 699.75,-193.47 685.54,-198.01"/>
+<polygon fill="#000000" stroke="#000000" points="684.37,-194.71 675.91,-201.09 686.5,-201.38 684.37,-194.71"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-88.7 142,-88.7 142,-64.7 252,-64.7 252,-88.7"/>
-<text text-anchor="middle" x="197" y="-74.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-87.21 582,-87.21 582,-63.21 692,-63.21 692,-87.21"/>
+<text text-anchor="middle" x="637" y="-72.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge7" class="edge">
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M749.01,-200.42C729.22,-179.2 685.3,-136 638.5,-115.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C592.34,-96.55 593,-68.88 547,-54.7 445.26,-23.32 319.13,-45.26 249.77,-62.19"/>
-<polygon fill="#000000" stroke="#000000" points="248.81,-58.82 239.96,-64.65 250.51,-65.61 248.81,-58.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.04,-162.07C724,-145 685.5,-113.76 660.86,-93.76"/>
+<polygon fill="#000000" stroke="#000000" points="663.05,-91.03 653.08,-87.45 658.64,-96.47 663.05,-91.03"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="542,-87.7 447,-87.7 447,-63.7 542,-63.7 542,-87.7"/>
-<text text-anchor="middle" x="494.5" y="-73.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="540.5,-166.21 446.5,-166.21 446.5,-142.21 540.5,-142.21 540.5,-166.21"/>
+<text text-anchor="middle" x="493.5" y="-151.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C609.51,-104.21 578.24,-94.96 552.01,-88.26"/>
-<polygon fill="#000000" stroke="#000000" points="552.78,-84.84 542.23,-85.82 551.08,-91.63 552.78,-84.84"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.2,-224.84C712.94,-259.68 604.11,-357.03 495.5,-349.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C453.65,-353.1 445.46,-335.2 406,-328.7 314.41,-313.61 283.07,-346.85 198,-309.7"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C608.12,-150.02 576.8,-149.59 550.73,-150.38"/>
+<polygon fill="#000000" stroke="#000000" points="550.5,-146.89 540.64,-150.76 550.76,-153.89 550.5,-146.89"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-48.7 583,-48.7 583,-24.7 692,-24.7 692,-48.7"/>
-<text text-anchor="middle" x="637.5" y="-34.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-126.21 303.5,-126.21 303.5,-102.21 397.5,-102.21 397.5,-126.21"/>
+<text text-anchor="middle" x="350.5" y="-111.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.37,-200.69C741.77,-179.94 716.66,-136.3 692,-101.7 680.73,-85.88 666.74,-68.97 655.9,-56.36"/>
-<polygon fill="#000000" stroke="#000000" points="658.49,-54.01 649.28,-48.76 653.2,-58.6 658.49,-54.01"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.38,-148.11 586.53,-139.89 546,-133.21 499.75,-125.59 446.77,-120.66 407.8,-117.74"/>
+<polygon fill="#000000" stroke="#000000" points="407.93,-114.24 397.7,-117 407.42,-121.22 407.93,-114.24"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541.5,-167.7 447.5,-167.7 447.5,-143.7 541.5,-143.7 541.5,-167.7"/>
-<text text-anchor="middle" x="494.5" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-27.21 296,-27.21 296,-3.21 405,-3.21 405,-27.21"/>
+<text text-anchor="middle" x="350.5" y="-12.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C617.77,-107.73 567.4,-125.34 532.24,-139.67"/>
-<polygon fill="#000000" stroke="#000000" points="530.66,-136.54 522.76,-143.6 533.34,-143 530.66,-136.54"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="689,-205.7 586,-205.7 586,-181.7 689,-181.7 689,-205.7"/>
-<text text-anchor="middle" x="637.5" y="-191.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.74,-162.16C749.48,-137.73 729.59,-82.32 692,-54.21 611.67,5.85 489.49,3.72 415.41,-4.73"/>
+<polygon fill="#000000" stroke="#000000" points="414.79,-1.28 405.28,-5.96 415.63,-8.23 414.79,-1.28"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.76,-207.66C718.99,-206.29 709.2,-204.76 699.41,-203.22"/>
-<polygon fill="#000000" stroke="#000000" points="699.66,-199.72 689.24,-201.63 698.58,-206.64 699.66,-199.72"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C257.58,-300.92 229.03,-324.86 142,-293.21 116.33,-283.88 91.13,-265.16 74.32,-250.91"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-248.26 66.78,-244.33 72.02,-253.54 76.62,-248.26"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-361.7 288,-361.7 288,-337.7 406,-337.7 406,-361.7"/>
-<text text-anchor="middle" x="347" y="-347.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~fraggle_regime.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541,-86.21 446,-86.21 446,-62.21 541,-62.21 541,-86.21"/>
+<text text-anchor="middle" x="493.5" y="-71.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C468.36,-348 440.72,-347.63 416.35,-347.8"/>
-<polygon fill="#000000" stroke="#000000" points="416.08,-344.31 406.12,-347.91 416.15,-351.31 416.08,-344.31"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.93,-168.71C703.34,-164.56 668.56,-158.81 638,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C589.87,-147.28 586.85,-122.74 546,-100.21 540.36,-97.1 534.3,-93.91 528.39,-90.88"/>
+<polygon fill="#000000" stroke="#000000" points="529.82,-87.68 519.31,-86.28 526.65,-93.92 529.82,-87.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.32,-148.52 586.68,-169.51 546,-175.21 448.56,-188.87 334.25,-192 265.02,-192.48"/>
+<polygon fill="#000000" stroke="#000000" points="264.71,-188.98 254.73,-192.54 264.75,-195.98 264.71,-188.98"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-183.7C138.79,-179.58 122.26,-174.93 106.93,-170.61"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-167.17 97.07,-167.83 105.74,-173.91 107.64,-167.17"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-260.21C140.96,-256.04 123.7,-251.31 107.75,-246.94"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-243.54 98.03,-244.27 106.75,-250.29 108.6,-243.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.91,-129.79C306.76,-133.84 296.79,-138.62 288,-143.7 270.91,-153.57 268.96,-159.6 252,-169.7 246.49,-172.98 240.49,-176.19 234.57,-179.18"/>
-<polygon fill="#000000" stroke="#000000" points="232.86,-176.12 225.41,-183.65 235.93,-182.41 232.86,-176.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-225.29C585.56,-234.24 556.11,-246.52 532.72,-256.27"/>
+<polygon fill="#000000" stroke="#000000" points="531.32,-253.07 523.44,-260.15 534.01,-259.53 531.32,-253.07"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-129.8C284.05,-139.95 238.78,-153.19 198,-155.7"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-201.13C585.56,-192.18 556.11,-179.9 532.72,-170.15"/>
+<polygon fill="#000000" stroke="#000000" points="534.01,-166.89 523.44,-166.28 531.32,-173.36 534.01,-166.89"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-88.87C150.18,-102.19 111.63,-123.64 84.68,-138.63"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-135.72 75.67,-143.64 86.11,-141.84 82.71,-135.72"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C284.05,-228.54 267.42,-236.35 202,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-232.21C172.53,-230.47 142.1,-230.21 116.16,-230.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.03,-226.98 106.08,-230.62 116.13,-233.98 116.03,-226.98"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.81,-87.74C435.52,-92.44 416.68,-97.87 399.55,-102.82"/>
-<polygon fill="#000000" stroke="#000000" points="398.34,-99.53 389.7,-105.66 400.28,-106.25 398.34,-99.53"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.38,-220.66C528.49,-228.09 433.37,-237.66 351.5,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C311.9,-230.1 270.64,-218.03 241.35,-207.7"/>
+<polygon fill="#000000" stroke="#000000" points="242.49,-204.39 231.9,-204.28 240.11,-210.97 242.49,-204.39"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.83,-74.25C404.26,-74.35 340.22,-78.17 288,-96.7 242.93,-112.7 245.74,-152.77 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-155.7C169.93,-157.11 141.13,-157.35 116.31,-157.15"/>
-<polygon fill="#000000" stroke="#000000" points="116.34,-153.65 106.3,-157.05 116.26,-160.65 116.34,-153.65"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-74.21C282.93,-87.72 264.06,-86.6 202,-114.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.61,-63.15C580.23,-59.14 562.45,-55.19 546,-53.21 499.67,-47.63 487.36,-47.85 441,-53.21 400.41,-57.91 391.54,-66.09 351.5,-74.21"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.78,-24.69C496.9,-3.61 285.6,30.18 142,-55.7 108.86,-75.52 81.51,-112.03 66.5,-135.03"/>
-<polygon fill="#000000" stroke="#000000" points="63.41,-133.36 61.01,-143.68 69.32,-137.11 63.41,-133.36"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-142.21C435.69,-138.09 419.28,-133.44 404.06,-129.12"/>
+<polygon fill="#000000" stroke="#000000" points="404.84,-125.7 394.26,-126.34 402.93,-132.44 404.84,-125.7"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C309.65,-160.12 269.72,-170.88 240.5,-180.33"/>
-<polygon fill="#000000" stroke="#000000" points="239.03,-177.13 230.64,-183.6 241.23,-183.78 239.03,-177.13"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.46,-154.29C418.91,-154.32 383.2,-154.32 351.5,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C281.58,-153.98 264.06,-86.6 202,-114.21"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.46,-143.68C433.66,-140.07 418.37,-136.08 404.01,-132.33"/>
-<polygon fill="#000000" stroke="#000000" points="404.8,-128.92 394.24,-129.78 403.03,-135.69 404.8,-128.92"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C311.49,-154.08 269.66,-166.08 240.28,-176.63"/>
+<polygon fill="#000000" stroke="#000000" points="238.98,-173.37 230.82,-180.13 241.41,-179.94 238.98,-173.37"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C280.36,-162.07 263.66,-151.67 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.25,-155.09C418.63,-155.02 381.15,-155.49 348,-157.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.38,-205.75C601.59,-209.97 591.78,-214.87 583,-219.7 562.41,-231.02 539.86,-244.97 522.81,-255.86"/>
-<polygon fill="#000000" stroke="#000000" points="520.47,-253.21 513.95,-261.56 524.26,-259.09 520.47,-253.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.3,-104.84C273.17,-100.93 233.7,-100.11 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C318.16,-193.85 287.31,-193.57 261.01,-193.86"/>
-<polygon fill="#000000" stroke="#000000" points="260.75,-190.36 250.8,-194 260.85,-197.36 260.75,-190.36"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.05,-126.24C315.13,-130.55 305.07,-135.5 296,-140.21 274.33,-151.46 250.25,-164.8 231.89,-175.15"/>
+<polygon fill="#000000" stroke="#000000" points="230.09,-172.15 223.11,-180.12 233.53,-178.24 230.09,-172.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.94,-181.52C597.35,-160.94 547.41,-119.15 518.19,-94.69"/>
-<polygon fill="#000000" stroke="#000000" points="520.11,-91.73 510.19,-87.99 515.61,-97.1 520.11,-91.73"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-114.21C147.11,-137.74 97.33,-185.43 71.8,-212.42"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-210.37 64.68,-220.08 74.05,-215.14 68.92,-210.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.02,-27.47C309.69,-48.3 254.98,-90.64 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C278.01,-191.19 266.04,-152.02 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.88,-196.29C528.22,-198.72 431.21,-201.22 348,-195.7"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-86.21C435.69,-90.33 419.28,-94.98 404.06,-99.3"/>
+<polygon fill="#000000" stroke="#000000" points="402.93,-95.98 394.26,-102.08 404.84,-102.72 402.93,-95.98"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M591.89,-181.68C578.64,-178.11 563.98,-174.16 550.18,-170.44"/>
-<polygon fill="#000000" stroke="#000000" points="550.87,-167 540.31,-167.78 549.05,-173.76 550.87,-167"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-69.59C418.28,-67.98 382.57,-67.91 351.5,-74.21"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.73,-338.15C259.91,-331.59 226.54,-322.16 198,-309.7"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_regime.f90~~EfferentGraph_edge29" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-204.21C140.96,-208.39 123.7,-213.12 107.75,-217.48"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-214.13 98.03,-220.15 108.6,-220.88 106.75,-214.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/fraggle_set.f90.html b/docs/sourcefile/fraggle_set.f90.html
index 269ba7f00..3fe232e48 100644
--- a/docs/sourcefile/fraggle_set.f90.html
+++ b/docs/sourcefile/fraggle_set.f90.html
@@ -226,298 +226,293 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~fraggle_set.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilefraggle_setf90EfferentGraph" width="641pt" height="257pt"
- viewBox="0.00 0.00 641.00 257.03" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 365.7)">
+<svg id="sourcefilefraggle_setf90EfferentGraph" width="641pt" height="239pt"
+ viewBox="0.00 0.00 641.00 238.93" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 339.67)">
 <title>sourcefile~~fraggle_set.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.7 918,-365.7 918,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.67 918,-339.67 918,4 -4,4"/>
 <!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_set.f90</title>
-<polygon fill="none" stroke="black" points="914,-244.7 830,-244.7 830,-220.7 914,-220.7 914,-244.7"/>
-<text text-anchor="middle" x="872" y="-230.3" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_set.f90</text>
+<polygon fill="none" stroke="black" points="914,-245.21 830,-245.21 830,-221.21 914,-221.21 914,-245.21"/>
+<text text-anchor="middle" x="872" y="-230.81" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_set.f90</text>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
 <g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="547,-285.7 442,-285.7 442,-261.7 547,-261.7 547,-285.7"/>
-<text text-anchor="middle" x="494.5" y="-271.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-284.21 441,-284.21 441,-260.21 546,-260.21 546,-284.21"/>
+<text text-anchor="middle" x="493.5" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.74,-237.2C763.83,-244.4 634.38,-258.54 557.36,-266.95"/>
-<polygon fill="#000000" stroke="#000000" points="556.87,-263.48 547.31,-268.04 557.63,-270.44 556.87,-263.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M854.33,-245.42C823.93,-266.84 756.64,-310.42 692,-326.21 644.51,-337.81 629.03,-339.56 582,-326.21 557.58,-319.28 533.29,-303.39 516.52,-290.63"/>
+<polygon fill="#000000" stroke="#000000" points="518.5,-287.73 508.47,-284.3 514.17,-293.23 518.5,-287.73"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-224.7 728,-224.7 728,-200.7 794,-200.7 794,-224.7"/>
-<text text-anchor="middle" x="761" y="-210.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-186.21 728,-186.21 728,-162.21 794,-162.21 794,-186.21"/>
+<text text-anchor="middle" x="761" y="-171.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.79,-225.14C821.39,-223.6 812.54,-221.97 804.11,-220.43"/>
-<polygon fill="#000000" stroke="#000000" points="804.56,-216.95 794.09,-218.59 803.3,-223.84 804.56,-216.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M848.68,-221.13C832.66,-212.46 810.87,-200.66 793.14,-191.07"/>
+<polygon fill="#000000" stroke="#000000" points="794.75,-187.96 784.29,-186.28 791.42,-194.12 794.75,-187.96"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-207.7 143.5,-207.7 143.5,-183.7 250.5,-183.7 250.5,-207.7"/>
-<text text-anchor="middle" x="197" y="-193.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.21 0,-244.21 0,-220.21 106,-220.21 106,-244.21"/>
+<text text-anchor="middle" x="53" y="-229.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-274.39C414.08,-274.42 379.12,-273.87 348,-271.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C296.86,-268.27 247.51,-235.68 220.04,-214.3"/>
-<polygon fill="#000000" stroke="#000000" points="221.91,-211.32 211.92,-207.81 217.54,-216.79 221.91,-211.32"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C283.05,-257.29 269.56,-236.49 202,-232.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-167.7 0,-167.7 0,-143.7 106,-143.7 106,-167.7"/>
-<text text-anchor="middle" x="53" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-204.21 147.5,-204.21 147.5,-180.21 254.5,-180.21 254.5,-204.21"/>
+<text text-anchor="middle" x="201" y="-189.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-309.7C133.55,-282.43 86.44,-212.57 65.68,-177.08"/>
-<polygon fill="#000000" stroke="#000000" points="68.52,-175 60.53,-168.05 62.44,-178.47 68.52,-175"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C278.25,-266.96 260.24,-336.88 198,-309.7"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-275.84C413.94,-276.63 380.7,-275.89 351.5,-270.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C323.92,-265.24 318.33,-259.64 296,-246.21 278.63,-235.77 277.37,-228.65 260,-218.21 254.22,-214.74 247.89,-211.44 241.6,-208.43"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-205.24 232.5,-204.24 240.12,-211.6 243.05,-205.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C603.13,-238.87 566.47,-249.43 538.9,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.56,-255.15 529.17,-261.62 539.76,-261.8 537.56,-255.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.32,-186.64C739.96,-216.22 698.98,-289.94 638,-312.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C616.93,-319.18 566.94,-302.05 531.81,-288.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.91,-284.75 522.33,-284.24 530.29,-291.23 532.91,-284.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C502.08,-254.52 342.57,-228.01 257.86,-209.93"/>
-<polygon fill="#000000" stroke="#000000" points="258.43,-206.47 247.91,-207.77 256.94,-213.31 258.43,-206.47"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.79,-218.43C703.32,-222.74 668.81,-228.74 638.5,-233.7"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-284.21 142,-284.21 142,-260.21 260,-260.21 260,-284.21"/>
+<text text-anchor="middle" x="201" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C312.16,-309.72 271.19,-297.83 241.92,-287.66"/>
+<polygon fill="#000000" stroke="#000000" points="243.06,-284.35 232.47,-284.29 240.71,-290.94 243.06,-284.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C517.23,-355.59 477.67,-320.61 351.5,-312.21"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-129.7 300,-129.7 300,-105.7 394,-105.7 394,-129.7"/>
-<text text-anchor="middle" x="347" y="-115.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="688.5,-225.21 585.5,-225.21 585.5,-201.21 688.5,-201.21 688.5,-225.21"/>
+<text text-anchor="middle" x="637" y="-210.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C596.2,-98.55 476.3,-105.76 404.38,-112.06"/>
-<polygon fill="#000000" stroke="#000000" points="403.78,-108.6 394.14,-112.98 404.41,-115.57 403.78,-108.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.95,-184.46C714.98,-188.6 699.75,-193.47 685.54,-198.01"/>
+<polygon fill="#000000" stroke="#000000" points="684.37,-194.71 675.91,-201.09 686.5,-201.38 684.37,-194.71"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-88.7 142,-88.7 142,-64.7 252,-64.7 252,-88.7"/>
-<text text-anchor="middle" x="197" y="-74.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-87.21 582,-87.21 582,-63.21 692,-63.21 692,-87.21"/>
+<text text-anchor="middle" x="637" y="-72.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge7" class="edge">
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M749.01,-200.42C729.22,-179.2 685.3,-136 638.5,-115.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C592.34,-96.55 593,-68.88 547,-54.7 445.26,-23.32 319.13,-45.26 249.77,-62.19"/>
-<polygon fill="#000000" stroke="#000000" points="248.81,-58.82 239.96,-64.65 250.51,-65.61 248.81,-58.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.04,-162.07C724,-145 685.5,-113.76 660.86,-93.76"/>
+<polygon fill="#000000" stroke="#000000" points="663.05,-91.03 653.08,-87.45 658.64,-96.47 663.05,-91.03"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="542,-87.7 447,-87.7 447,-63.7 542,-63.7 542,-87.7"/>
-<text text-anchor="middle" x="494.5" y="-73.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="540.5,-166.21 446.5,-166.21 446.5,-142.21 540.5,-142.21 540.5,-166.21"/>
+<text text-anchor="middle" x="493.5" y="-151.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C609.51,-104.21 578.24,-94.96 552.01,-88.26"/>
-<polygon fill="#000000" stroke="#000000" points="552.78,-84.84 542.23,-85.82 551.08,-91.63 552.78,-84.84"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.2,-224.84C712.94,-259.68 604.11,-357.03 495.5,-349.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C453.65,-353.1 445.46,-335.2 406,-328.7 314.41,-313.61 283.07,-346.85 198,-309.7"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C608.12,-150.02 576.8,-149.59 550.73,-150.38"/>
+<polygon fill="#000000" stroke="#000000" points="550.5,-146.89 540.64,-150.76 550.76,-153.89 550.5,-146.89"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-48.7 583,-48.7 583,-24.7 692,-24.7 692,-48.7"/>
-<text text-anchor="middle" x="637.5" y="-34.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-126.21 303.5,-126.21 303.5,-102.21 397.5,-102.21 397.5,-126.21"/>
+<text text-anchor="middle" x="350.5" y="-111.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.37,-200.69C741.77,-179.94 716.66,-136.3 692,-101.7 680.73,-85.88 666.74,-68.97 655.9,-56.36"/>
-<polygon fill="#000000" stroke="#000000" points="658.49,-54.01 649.28,-48.76 653.2,-58.6 658.49,-54.01"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.38,-148.11 586.53,-139.89 546,-133.21 499.75,-125.59 446.77,-120.66 407.8,-117.74"/>
+<polygon fill="#000000" stroke="#000000" points="407.93,-114.24 397.7,-117 407.42,-121.22 407.93,-114.24"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541.5,-167.7 447.5,-167.7 447.5,-143.7 541.5,-143.7 541.5,-167.7"/>
-<text text-anchor="middle" x="494.5" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-27.21 296,-27.21 296,-3.21 405,-3.21 405,-27.21"/>
+<text text-anchor="middle" x="350.5" y="-12.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C617.77,-107.73 567.4,-125.34 532.24,-139.67"/>
-<polygon fill="#000000" stroke="#000000" points="530.66,-136.54 522.76,-143.6 533.34,-143 530.66,-136.54"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="689,-205.7 586,-205.7 586,-181.7 689,-181.7 689,-205.7"/>
-<text text-anchor="middle" x="637.5" y="-191.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.74,-162.16C749.48,-137.73 729.59,-82.32 692,-54.21 611.67,5.85 489.49,3.72 415.41,-4.73"/>
+<polygon fill="#000000" stroke="#000000" points="414.79,-1.28 405.28,-5.96 415.63,-8.23 414.79,-1.28"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.76,-207.66C718.99,-206.29 709.2,-204.76 699.41,-203.22"/>
-<polygon fill="#000000" stroke="#000000" points="699.66,-199.72 689.24,-201.63 698.58,-206.64 699.66,-199.72"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C257.58,-300.92 229.03,-324.86 142,-293.21 116.33,-283.88 91.13,-265.16 74.32,-250.91"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-248.26 66.78,-244.33 72.02,-253.54 76.62,-248.26"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-361.7 288,-361.7 288,-337.7 406,-337.7 406,-361.7"/>
-<text text-anchor="middle" x="347" y="-347.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~fraggle_set.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541,-86.21 446,-86.21 446,-62.21 541,-62.21 541,-86.21"/>
+<text text-anchor="middle" x="493.5" y="-71.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C468.36,-348 440.72,-347.63 416.35,-347.8"/>
-<polygon fill="#000000" stroke="#000000" points="416.08,-344.31 406.12,-347.91 416.15,-351.31 416.08,-344.31"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.93,-168.71C703.34,-164.56 668.56,-158.81 638,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C589.87,-147.28 586.85,-122.74 546,-100.21 540.36,-97.1 534.3,-93.91 528.39,-90.88"/>
+<polygon fill="#000000" stroke="#000000" points="529.82,-87.68 519.31,-86.28 526.65,-93.92 529.82,-87.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.32,-148.52 586.68,-169.51 546,-175.21 448.56,-188.87 334.25,-192 265.02,-192.48"/>
+<polygon fill="#000000" stroke="#000000" points="264.71,-188.98 254.73,-192.54 264.75,-195.98 264.71,-188.98"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-183.7C138.79,-179.58 122.26,-174.93 106.93,-170.61"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-167.17 97.07,-167.83 105.74,-173.91 107.64,-167.17"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-260.21C140.96,-256.04 123.7,-251.31 107.75,-246.94"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-243.54 98.03,-244.27 106.75,-250.29 108.6,-243.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.91,-129.79C306.76,-133.84 296.79,-138.62 288,-143.7 270.91,-153.57 268.96,-159.6 252,-169.7 246.49,-172.98 240.49,-176.19 234.57,-179.18"/>
-<polygon fill="#000000" stroke="#000000" points="232.86,-176.12 225.41,-183.65 235.93,-182.41 232.86,-176.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-225.29C585.56,-234.24 556.11,-246.52 532.72,-256.27"/>
+<polygon fill="#000000" stroke="#000000" points="531.32,-253.07 523.44,-260.15 534.01,-259.53 531.32,-253.07"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-129.8C284.05,-139.95 238.78,-153.19 198,-155.7"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-201.13C585.56,-192.18 556.11,-179.9 532.72,-170.15"/>
+<polygon fill="#000000" stroke="#000000" points="534.01,-166.89 523.44,-166.28 531.32,-173.36 534.01,-166.89"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-88.87C150.18,-102.19 111.63,-123.64 84.68,-138.63"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-135.72 75.67,-143.64 86.11,-141.84 82.71,-135.72"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C284.05,-228.54 267.42,-236.35 202,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-232.21C172.53,-230.47 142.1,-230.21 116.16,-230.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.03,-226.98 106.08,-230.62 116.13,-233.98 116.03,-226.98"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.81,-87.74C435.52,-92.44 416.68,-97.87 399.55,-102.82"/>
-<polygon fill="#000000" stroke="#000000" points="398.34,-99.53 389.7,-105.66 400.28,-106.25 398.34,-99.53"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.38,-220.66C528.49,-228.09 433.37,-237.66 351.5,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C311.9,-230.1 270.64,-218.03 241.35,-207.7"/>
+<polygon fill="#000000" stroke="#000000" points="242.49,-204.39 231.9,-204.28 240.11,-210.97 242.49,-204.39"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.83,-74.25C404.26,-74.35 340.22,-78.17 288,-96.7 242.93,-112.7 245.74,-152.77 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-155.7C169.93,-157.11 141.13,-157.35 116.31,-157.15"/>
-<polygon fill="#000000" stroke="#000000" points="116.34,-153.65 106.3,-157.05 116.26,-160.65 116.34,-153.65"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-74.21C282.93,-87.72 264.06,-86.6 202,-114.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.61,-63.15C580.23,-59.14 562.45,-55.19 546,-53.21 499.67,-47.63 487.36,-47.85 441,-53.21 400.41,-57.91 391.54,-66.09 351.5,-74.21"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.78,-24.69C496.9,-3.61 285.6,30.18 142,-55.7 108.86,-75.52 81.51,-112.03 66.5,-135.03"/>
-<polygon fill="#000000" stroke="#000000" points="63.41,-133.36 61.01,-143.68 69.32,-137.11 63.41,-133.36"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-142.21C435.69,-138.09 419.28,-133.44 404.06,-129.12"/>
+<polygon fill="#000000" stroke="#000000" points="404.84,-125.7 394.26,-126.34 402.93,-132.44 404.84,-125.7"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C309.65,-160.12 269.72,-170.88 240.5,-180.33"/>
-<polygon fill="#000000" stroke="#000000" points="239.03,-177.13 230.64,-183.6 241.23,-183.78 239.03,-177.13"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.46,-154.29C418.91,-154.32 383.2,-154.32 351.5,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C281.58,-153.98 264.06,-86.6 202,-114.21"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.46,-143.68C433.66,-140.07 418.37,-136.08 404.01,-132.33"/>
-<polygon fill="#000000" stroke="#000000" points="404.8,-128.92 394.24,-129.78 403.03,-135.69 404.8,-128.92"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C311.49,-154.08 269.66,-166.08 240.28,-176.63"/>
+<polygon fill="#000000" stroke="#000000" points="238.98,-173.37 230.82,-180.13 241.41,-179.94 238.98,-173.37"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C280.36,-162.07 263.66,-151.67 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.25,-155.09C418.63,-155.02 381.15,-155.49 348,-157.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.38,-205.75C601.59,-209.97 591.78,-214.87 583,-219.7 562.41,-231.02 539.86,-244.97 522.81,-255.86"/>
-<polygon fill="#000000" stroke="#000000" points="520.47,-253.21 513.95,-261.56 524.26,-259.09 520.47,-253.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.3,-104.84C273.17,-100.93 233.7,-100.11 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C318.16,-193.85 287.31,-193.57 261.01,-193.86"/>
-<polygon fill="#000000" stroke="#000000" points="260.75,-190.36 250.8,-194 260.85,-197.36 260.75,-190.36"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.05,-126.24C315.13,-130.55 305.07,-135.5 296,-140.21 274.33,-151.46 250.25,-164.8 231.89,-175.15"/>
+<polygon fill="#000000" stroke="#000000" points="230.09,-172.15 223.11,-180.12 233.53,-178.24 230.09,-172.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.94,-181.52C597.35,-160.94 547.41,-119.15 518.19,-94.69"/>
-<polygon fill="#000000" stroke="#000000" points="520.11,-91.73 510.19,-87.99 515.61,-97.1 520.11,-91.73"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-114.21C147.11,-137.74 97.33,-185.43 71.8,-212.42"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-210.37 64.68,-220.08 74.05,-215.14 68.92,-210.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.02,-27.47C309.69,-48.3 254.98,-90.64 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C278.01,-191.19 266.04,-152.02 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.88,-196.29C528.22,-198.72 431.21,-201.22 348,-195.7"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-86.21C435.69,-90.33 419.28,-94.98 404.06,-99.3"/>
+<polygon fill="#000000" stroke="#000000" points="402.93,-95.98 394.26,-102.08 404.84,-102.72 402.93,-95.98"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M591.89,-181.68C578.64,-178.11 563.98,-174.16 550.18,-170.44"/>
-<polygon fill="#000000" stroke="#000000" points="550.87,-167 540.31,-167.78 549.05,-173.76 550.87,-167"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-69.59C418.28,-67.98 382.57,-67.91 351.5,-74.21"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.73,-338.15C259.91,-331.59 226.54,-322.16 198,-309.7"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_set.f90~~EfferentGraph_edge29" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-204.21C140.96,-208.39 123.7,-213.12 107.75,-217.48"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-214.13 98.03,-220.15 108.6,-220.88 106.75,-214.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/fraggle_setup.f90.html b/docs/sourcefile/fraggle_setup.f90.html
index e8f8f2350..49688705e 100644
--- a/docs/sourcefile/fraggle_setup.f90.html
+++ b/docs/sourcefile/fraggle_setup.f90.html
@@ -226,298 +226,293 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~fraggle_setup.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilefraggle_setupf90EfferentGraph" width="641pt" height="254pt"
- viewBox="0.00 0.00 641.00 253.72" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 365.7)">
+<svg id="sourcefilefraggle_setupf90EfferentGraph" width="641pt" height="236pt"
+ viewBox="0.00 0.00 641.00 235.79" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 339.58)">
 <title>sourcefile~~fraggle_setup.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.7 930,-365.7 930,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.58 930,-339.58 930,4 -4,4"/>
 <!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_setup.f90</title>
-<polygon fill="none" stroke="black" points="926,-244.7 830,-244.7 830,-220.7 926,-220.7 926,-244.7"/>
-<text text-anchor="middle" x="878" y="-230.3" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_setup.f90</text>
+<polygon fill="none" stroke="black" points="926,-245.21 830,-245.21 830,-221.21 926,-221.21 926,-245.21"/>
+<text text-anchor="middle" x="878" y="-230.81" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_setup.f90</text>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
 <g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="547,-285.7 442,-285.7 442,-261.7 547,-261.7 547,-285.7"/>
-<text text-anchor="middle" x="494.5" y="-271.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-284.21 441,-284.21 441,-260.21 546,-260.21 546,-284.21"/>
+<text text-anchor="middle" x="493.5" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.84,-237.77C761.2,-245.14 633.68,-258.85 557.51,-267.03"/>
-<polygon fill="#000000" stroke="#000000" points="556.69,-263.6 547.12,-268.15 557.44,-270.56 556.69,-263.6"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M859.7,-245.42C828.17,-266.85 758.46,-310.45 692,-326.21 644.43,-337.49 629.03,-339.56 582,-326.21 557.58,-319.28 533.29,-303.39 516.52,-290.63"/>
+<polygon fill="#000000" stroke="#000000" points="518.5,-287.73 508.47,-284.3 514.17,-293.23 518.5,-287.73"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-224.7 728,-224.7 728,-200.7 794,-200.7 794,-224.7"/>
-<text text-anchor="middle" x="761" y="-210.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-186.21 728,-186.21 728,-162.21 794,-162.21 794,-186.21"/>
+<text text-anchor="middle" x="761" y="-171.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.89,-224.51C821.34,-223.02 812.47,-221.48 804.07,-220.02"/>
-<polygon fill="#000000" stroke="#000000" points="804.56,-216.55 794.11,-218.28 803.36,-223.45 804.56,-216.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.45,-221.13C836.47,-212.42 813.34,-200.55 794.6,-190.93"/>
+<polygon fill="#000000" stroke="#000000" points="796.01,-187.73 785.52,-186.28 792.82,-193.96 796.01,-187.73"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-207.7 143.5,-207.7 143.5,-183.7 250.5,-183.7 250.5,-207.7"/>
-<text text-anchor="middle" x="197" y="-193.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.21 0,-244.21 0,-220.21 106,-220.21 106,-244.21"/>
+<text text-anchor="middle" x="53" y="-229.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-274.39C414.08,-274.42 379.12,-273.87 348,-271.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C296.86,-268.27 247.51,-235.68 220.04,-214.3"/>
-<polygon fill="#000000" stroke="#000000" points="221.91,-211.32 211.92,-207.81 217.54,-216.79 221.91,-211.32"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C283.05,-257.29 269.56,-236.49 202,-232.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-167.7 0,-167.7 0,-143.7 106,-143.7 106,-167.7"/>
-<text text-anchor="middle" x="53" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-204.21 147.5,-204.21 147.5,-180.21 254.5,-180.21 254.5,-204.21"/>
+<text text-anchor="middle" x="201" y="-189.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-309.7C133.55,-282.43 86.44,-212.57 65.68,-177.08"/>
-<polygon fill="#000000" stroke="#000000" points="68.52,-175 60.53,-168.05 62.44,-178.47 68.52,-175"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C278.25,-266.96 260.24,-336.88 198,-309.7"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-275.84C413.94,-276.63 380.7,-275.89 351.5,-270.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C323.92,-265.24 318.33,-259.64 296,-246.21 278.63,-235.77 277.37,-228.65 260,-218.21 254.22,-214.74 247.89,-211.44 241.6,-208.43"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-205.24 232.5,-204.24 240.12,-211.6 243.05,-205.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C603.13,-238.87 566.47,-249.43 538.9,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.56,-255.15 529.17,-261.62 539.76,-261.8 537.56,-255.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.32,-186.64C739.96,-216.22 698.98,-289.94 638,-312.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C616.93,-319.18 566.94,-302.05 531.81,-288.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.91,-284.75 522.33,-284.24 530.29,-291.23 532.91,-284.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C502.08,-254.52 342.57,-228.01 257.86,-209.93"/>
-<polygon fill="#000000" stroke="#000000" points="258.43,-206.47 247.91,-207.77 256.94,-213.31 258.43,-206.47"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.79,-218.43C703.32,-222.74 668.81,-228.74 638.5,-233.7"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-284.21 142,-284.21 142,-260.21 260,-260.21 260,-284.21"/>
+<text text-anchor="middle" x="201" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C312.16,-309.72 271.19,-297.83 241.92,-287.66"/>
+<polygon fill="#000000" stroke="#000000" points="243.06,-284.35 232.47,-284.29 240.71,-290.94 243.06,-284.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C517.23,-355.59 477.67,-320.61 351.5,-312.21"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-129.7 300,-129.7 300,-105.7 394,-105.7 394,-129.7"/>
-<text text-anchor="middle" x="347" y="-115.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="688.5,-225.21 585.5,-225.21 585.5,-201.21 688.5,-201.21 688.5,-225.21"/>
+<text text-anchor="middle" x="637" y="-210.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C596.2,-98.55 476.3,-105.76 404.38,-112.06"/>
-<polygon fill="#000000" stroke="#000000" points="403.78,-108.6 394.14,-112.98 404.41,-115.57 403.78,-108.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.95,-184.46C714.98,-188.6 699.75,-193.47 685.54,-198.01"/>
+<polygon fill="#000000" stroke="#000000" points="684.37,-194.71 675.91,-201.09 686.5,-201.38 684.37,-194.71"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-88.7 142,-88.7 142,-64.7 252,-64.7 252,-88.7"/>
-<text text-anchor="middle" x="197" y="-74.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-87.21 582,-87.21 582,-63.21 692,-63.21 692,-87.21"/>
+<text text-anchor="middle" x="637" y="-72.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge7" class="edge">
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M749.01,-200.42C729.22,-179.2 685.3,-136 638.5,-115.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C592.34,-96.55 593,-68.88 547,-54.7 445.26,-23.32 319.13,-45.26 249.77,-62.19"/>
-<polygon fill="#000000" stroke="#000000" points="248.81,-58.82 239.96,-64.65 250.51,-65.61 248.81,-58.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.04,-162.07C724,-145 685.5,-113.76 660.86,-93.76"/>
+<polygon fill="#000000" stroke="#000000" points="663.05,-91.03 653.08,-87.45 658.64,-96.47 663.05,-91.03"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="542,-87.7 447,-87.7 447,-63.7 542,-63.7 542,-87.7"/>
-<text text-anchor="middle" x="494.5" y="-73.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="540.5,-166.21 446.5,-166.21 446.5,-142.21 540.5,-142.21 540.5,-166.21"/>
+<text text-anchor="middle" x="493.5" y="-151.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C609.51,-104.21 578.24,-94.96 552.01,-88.26"/>
-<polygon fill="#000000" stroke="#000000" points="552.78,-84.84 542.23,-85.82 551.08,-91.63 552.78,-84.84"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.2,-224.84C712.94,-259.68 604.11,-357.03 495.5,-349.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C453.65,-353.1 445.46,-335.2 406,-328.7 314.41,-313.61 283.07,-346.85 198,-309.7"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C608.12,-150.02 576.8,-149.59 550.73,-150.38"/>
+<polygon fill="#000000" stroke="#000000" points="550.5,-146.89 540.64,-150.76 550.76,-153.89 550.5,-146.89"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-48.7 583,-48.7 583,-24.7 692,-24.7 692,-48.7"/>
-<text text-anchor="middle" x="637.5" y="-34.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-126.21 303.5,-126.21 303.5,-102.21 397.5,-102.21 397.5,-126.21"/>
+<text text-anchor="middle" x="350.5" y="-111.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.37,-200.69C741.77,-179.94 716.66,-136.3 692,-101.7 680.73,-85.88 666.74,-68.97 655.9,-56.36"/>
-<polygon fill="#000000" stroke="#000000" points="658.49,-54.01 649.28,-48.76 653.2,-58.6 658.49,-54.01"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.38,-148.11 586.53,-139.89 546,-133.21 499.75,-125.59 446.77,-120.66 407.8,-117.74"/>
+<polygon fill="#000000" stroke="#000000" points="407.93,-114.24 397.7,-117 407.42,-121.22 407.93,-114.24"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541.5,-167.7 447.5,-167.7 447.5,-143.7 541.5,-143.7 541.5,-167.7"/>
-<text text-anchor="middle" x="494.5" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-27.21 296,-27.21 296,-3.21 405,-3.21 405,-27.21"/>
+<text text-anchor="middle" x="350.5" y="-12.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C617.77,-107.73 567.4,-125.34 532.24,-139.67"/>
-<polygon fill="#000000" stroke="#000000" points="530.66,-136.54 522.76,-143.6 533.34,-143 530.66,-136.54"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="689,-205.7 586,-205.7 586,-181.7 689,-181.7 689,-205.7"/>
-<text text-anchor="middle" x="637.5" y="-191.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.74,-162.16C749.48,-137.73 729.59,-82.32 692,-54.21 611.67,5.85 489.49,3.72 415.41,-4.73"/>
+<polygon fill="#000000" stroke="#000000" points="414.79,-1.28 405.28,-5.96 415.63,-8.23 414.79,-1.28"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.76,-207.66C718.99,-206.29 709.2,-204.76 699.41,-203.22"/>
-<polygon fill="#000000" stroke="#000000" points="699.66,-199.72 689.24,-201.63 698.58,-206.64 699.66,-199.72"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C257.58,-300.92 229.03,-324.86 142,-293.21 116.33,-283.88 91.13,-265.16 74.32,-250.91"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-248.26 66.78,-244.33 72.02,-253.54 76.62,-248.26"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-361.7 288,-361.7 288,-337.7 406,-337.7 406,-361.7"/>
-<text text-anchor="middle" x="347" y="-347.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~fraggle_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541,-86.21 446,-86.21 446,-62.21 541,-62.21 541,-86.21"/>
+<text text-anchor="middle" x="493.5" y="-71.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C468.36,-348 440.72,-347.63 416.35,-347.8"/>
-<polygon fill="#000000" stroke="#000000" points="416.08,-344.31 406.12,-347.91 416.15,-351.31 416.08,-344.31"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.93,-168.71C703.34,-164.56 668.56,-158.81 638,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C589.87,-147.28 586.85,-122.74 546,-100.21 540.36,-97.1 534.3,-93.91 528.39,-90.88"/>
+<polygon fill="#000000" stroke="#000000" points="529.82,-87.68 519.31,-86.28 526.65,-93.92 529.82,-87.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.32,-148.52 586.68,-169.51 546,-175.21 448.56,-188.87 334.25,-192 265.02,-192.48"/>
+<polygon fill="#000000" stroke="#000000" points="264.71,-188.98 254.73,-192.54 264.75,-195.98 264.71,-188.98"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-183.7C138.79,-179.58 122.26,-174.93 106.93,-170.61"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-167.17 97.07,-167.83 105.74,-173.91 107.64,-167.17"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-260.21C140.96,-256.04 123.7,-251.31 107.75,-246.94"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-243.54 98.03,-244.27 106.75,-250.29 108.6,-243.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.91,-129.79C306.76,-133.84 296.79,-138.62 288,-143.7 270.91,-153.57 268.96,-159.6 252,-169.7 246.49,-172.98 240.49,-176.19 234.57,-179.18"/>
-<polygon fill="#000000" stroke="#000000" points="232.86,-176.12 225.41,-183.65 235.93,-182.41 232.86,-176.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-225.29C585.56,-234.24 556.11,-246.52 532.72,-256.27"/>
+<polygon fill="#000000" stroke="#000000" points="531.32,-253.07 523.44,-260.15 534.01,-259.53 531.32,-253.07"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-129.8C284.05,-139.95 238.78,-153.19 198,-155.7"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-201.13C585.56,-192.18 556.11,-179.9 532.72,-170.15"/>
+<polygon fill="#000000" stroke="#000000" points="534.01,-166.89 523.44,-166.28 531.32,-173.36 534.01,-166.89"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-88.87C150.18,-102.19 111.63,-123.64 84.68,-138.63"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-135.72 75.67,-143.64 86.11,-141.84 82.71,-135.72"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C284.05,-228.54 267.42,-236.35 202,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-232.21C172.53,-230.47 142.1,-230.21 116.16,-230.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.03,-226.98 106.08,-230.62 116.13,-233.98 116.03,-226.98"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.81,-87.74C435.52,-92.44 416.68,-97.87 399.55,-102.82"/>
-<polygon fill="#000000" stroke="#000000" points="398.34,-99.53 389.7,-105.66 400.28,-106.25 398.34,-99.53"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.38,-220.66C528.49,-228.09 433.37,-237.66 351.5,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C311.9,-230.1 270.64,-218.03 241.35,-207.7"/>
+<polygon fill="#000000" stroke="#000000" points="242.49,-204.39 231.9,-204.28 240.11,-210.97 242.49,-204.39"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.83,-74.25C404.26,-74.35 340.22,-78.17 288,-96.7 242.93,-112.7 245.74,-152.77 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-155.7C169.93,-157.11 141.13,-157.35 116.31,-157.15"/>
-<polygon fill="#000000" stroke="#000000" points="116.34,-153.65 106.3,-157.05 116.26,-160.65 116.34,-153.65"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-74.21C282.93,-87.72 264.06,-86.6 202,-114.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.61,-63.15C580.23,-59.14 562.45,-55.19 546,-53.21 499.67,-47.63 487.36,-47.85 441,-53.21 400.41,-57.91 391.54,-66.09 351.5,-74.21"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.78,-24.69C496.9,-3.61 285.6,30.18 142,-55.7 108.86,-75.52 81.51,-112.03 66.5,-135.03"/>
-<polygon fill="#000000" stroke="#000000" points="63.41,-133.36 61.01,-143.68 69.32,-137.11 63.41,-133.36"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-142.21C435.69,-138.09 419.28,-133.44 404.06,-129.12"/>
+<polygon fill="#000000" stroke="#000000" points="404.84,-125.7 394.26,-126.34 402.93,-132.44 404.84,-125.7"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C309.65,-160.12 269.72,-170.88 240.5,-180.33"/>
-<polygon fill="#000000" stroke="#000000" points="239.03,-177.13 230.64,-183.6 241.23,-183.78 239.03,-177.13"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.46,-154.29C418.91,-154.32 383.2,-154.32 351.5,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C281.58,-153.98 264.06,-86.6 202,-114.21"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.46,-143.68C433.66,-140.07 418.37,-136.08 404.01,-132.33"/>
-<polygon fill="#000000" stroke="#000000" points="404.8,-128.92 394.24,-129.78 403.03,-135.69 404.8,-128.92"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C311.49,-154.08 269.66,-166.08 240.28,-176.63"/>
+<polygon fill="#000000" stroke="#000000" points="238.98,-173.37 230.82,-180.13 241.41,-179.94 238.98,-173.37"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C280.36,-162.07 263.66,-151.67 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.25,-155.09C418.63,-155.02 381.15,-155.49 348,-157.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.38,-205.75C601.59,-209.97 591.78,-214.87 583,-219.7 562.41,-231.02 539.86,-244.97 522.81,-255.86"/>
-<polygon fill="#000000" stroke="#000000" points="520.47,-253.21 513.95,-261.56 524.26,-259.09 520.47,-253.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.3,-104.84C273.17,-100.93 233.7,-100.11 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C318.16,-193.85 287.31,-193.57 261.01,-193.86"/>
-<polygon fill="#000000" stroke="#000000" points="260.75,-190.36 250.8,-194 260.85,-197.36 260.75,-190.36"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.05,-126.24C315.13,-130.55 305.07,-135.5 296,-140.21 274.33,-151.46 250.25,-164.8 231.89,-175.15"/>
+<polygon fill="#000000" stroke="#000000" points="230.09,-172.15 223.11,-180.12 233.53,-178.24 230.09,-172.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.94,-181.52C597.35,-160.94 547.41,-119.15 518.19,-94.69"/>
-<polygon fill="#000000" stroke="#000000" points="520.11,-91.73 510.19,-87.99 515.61,-97.1 520.11,-91.73"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-114.21C147.11,-137.74 97.33,-185.43 71.8,-212.42"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-210.37 64.68,-220.08 74.05,-215.14 68.92,-210.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.02,-27.47C309.69,-48.3 254.98,-90.64 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C278.01,-191.19 266.04,-152.02 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.88,-196.29C528.22,-198.72 431.21,-201.22 348,-195.7"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-86.21C435.69,-90.33 419.28,-94.98 404.06,-99.3"/>
+<polygon fill="#000000" stroke="#000000" points="402.93,-95.98 394.26,-102.08 404.84,-102.72 402.93,-95.98"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M591.89,-181.68C578.64,-178.11 563.98,-174.16 550.18,-170.44"/>
-<polygon fill="#000000" stroke="#000000" points="550.87,-167 540.31,-167.78 549.05,-173.76 550.87,-167"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-69.59C418.28,-67.98 382.57,-67.91 351.5,-74.21"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.73,-338.15C259.91,-331.59 226.54,-322.16 198,-309.7"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_setup.f90~~EfferentGraph_edge29" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-204.21C140.96,-208.39 123.7,-213.12 107.75,-217.48"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-214.13 98.03,-220.15 108.6,-220.88 106.75,-214.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/fraggle_util.f90.html b/docs/sourcefile/fraggle_util.f90.html
index fd1311832..75076c561 100644
--- a/docs/sourcefile/fraggle_util.f90.html
+++ b/docs/sourcefile/fraggle_util.f90.html
@@ -226,298 +226,293 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~fraggle_util.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilefraggle_utilf90EfferentGraph" width="641pt" height="257pt"
- viewBox="0.00 0.00 641.00 257.30" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 365.7)">
+<svg id="sourcefilefraggle_utilf90EfferentGraph" width="641pt" height="239pt"
+ viewBox="0.00 0.00 641.00 239.20" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 339.68)">
 <title>sourcefile~~fraggle_util.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-365.7 917,-365.7 917,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.68 917,-339.68 917,4 -4,4"/>
 <!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~fraggle_util.f90</title>
-<polygon fill="none" stroke="black" points="913,-244.7 830,-244.7 830,-220.7 913,-220.7 913,-244.7"/>
-<text text-anchor="middle" x="871.5" y="-230.3" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_util.f90</text>
+<polygon fill="none" stroke="black" points="913,-245.21 830,-245.21 830,-221.21 913,-221.21 913,-245.21"/>
+<text text-anchor="middle" x="871.5" y="-230.81" font-family="Helvetica,sans-Serif" font-size="10.50">fraggle_util.f90</text>
 </g>
 <!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~fraggle_classes.f90</title>
 <g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="547,-285.7 442,-285.7 442,-261.7 547,-261.7 547,-285.7"/>
-<text text-anchor="middle" x="494.5" y="-271.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="546,-284.21 441,-284.21 441,-260.21 546,-260.21 546,-284.21"/>
+<text text-anchor="middle" x="493.5" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.65,-237.17C763.89,-244.36 634.13,-258.54 557.09,-266.97"/>
-<polygon fill="#000000" stroke="#000000" points="556.6,-263.5 547.04,-268.06 557.36,-270.46 556.6,-263.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M853.88,-245.42C823.58,-266.84 756.49,-310.42 692,-326.21 644.51,-337.84 629.03,-339.56 582,-326.21 557.58,-319.28 533.29,-303.39 516.52,-290.63"/>
+<polygon fill="#000000" stroke="#000000" points="518.5,-287.73 508.47,-284.3 514.17,-293.23 518.5,-287.73"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-224.7 728,-224.7 728,-200.7 794,-200.7 794,-224.7"/>
-<text text-anchor="middle" x="761" y="-210.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="794,-186.21 728,-186.21 728,-162.21 794,-162.21 794,-186.21"/>
+<text text-anchor="middle" x="761" y="-171.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.79,-225.2C821.41,-223.65 812.57,-222.02 804.14,-220.47"/>
-<polygon fill="#000000" stroke="#000000" points="804.59,-216.99 794.12,-218.62 803.32,-223.88 804.59,-216.99"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M848.28,-221.13C832.34,-212.46 810.64,-200.66 793,-191.07"/>
+<polygon fill="#000000" stroke="#000000" points="794.65,-187.98 784.19,-186.28 791.3,-194.13 794.65,-187.98"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-207.7 143.5,-207.7 143.5,-183.7 250.5,-183.7 250.5,-207.7"/>
-<text text-anchor="middle" x="197" y="-193.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.21 0,-244.21 0,-220.21 106,-220.21 106,-244.21"/>
+<text text-anchor="middle" x="53" y="-229.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-274.39C414.08,-274.42 379.12,-273.87 348,-271.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C296.86,-268.27 247.51,-235.68 220.04,-214.3"/>
-<polygon fill="#000000" stroke="#000000" points="221.91,-211.32 211.92,-207.81 217.54,-216.79 221.91,-211.32"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C283.05,-257.29 269.56,-236.49 202,-232.21"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-167.7 0,-167.7 0,-143.7 106,-143.7 106,-167.7"/>
-<text text-anchor="middle" x="53" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-204.21 147.5,-204.21 147.5,-180.21 254.5,-180.21 254.5,-204.21"/>
+<text text-anchor="middle" x="201" y="-189.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-309.7C133.55,-282.43 86.44,-212.57 65.68,-177.08"/>
-<polygon fill="#000000" stroke="#000000" points="68.52,-175 60.53,-168.05 62.44,-178.47 68.52,-175"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-271.7C278.25,-266.96 260.24,-336.88 198,-309.7"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.81,-275.84C413.94,-276.63 380.7,-275.89 351.5,-270.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-270.21C323.92,-265.24 318.33,-259.64 296,-246.21 278.63,-235.77 277.37,-228.65 260,-218.21 254.22,-214.74 247.89,-211.44 241.6,-208.43"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-205.24 232.5,-204.24 240.12,-211.6 243.05,-205.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C603.13,-238.87 566.47,-249.43 538.9,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.56,-255.15 529.17,-261.62 539.76,-261.8 537.56,-255.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M754.32,-186.64C739.96,-216.22 698.98,-289.94 638,-312.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C616.93,-319.18 566.94,-302.05 531.81,-288.07"/>
+<polygon fill="#000000" stroke="#000000" points="532.91,-284.75 522.33,-284.24 530.29,-291.23 532.91,-284.75"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-233.7C502.08,-254.52 342.57,-228.01 257.86,-209.93"/>
-<polygon fill="#000000" stroke="#000000" points="258.43,-206.47 247.91,-207.77 256.94,-213.31 258.43,-206.47"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.79,-218.43C703.32,-222.74 668.81,-228.74 638.5,-233.7"/>
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-284.21 142,-284.21 142,-260.21 260,-260.21 260,-284.21"/>
+<text text-anchor="middle" x="201" y="-269.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C312.16,-309.72 271.19,-297.83 241.92,-287.66"/>
+<polygon fill="#000000" stroke="#000000" points="243.06,-284.35 232.47,-284.29 240.71,-290.94 243.06,-284.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-312.21C517.23,-355.59 477.67,-320.61 351.5,-312.21"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-129.7 300,-129.7 300,-105.7 394,-105.7 394,-129.7"/>
-<text text-anchor="middle" x="347" y="-115.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="688.5,-225.21 585.5,-225.21 585.5,-201.21 688.5,-201.21 688.5,-225.21"/>
+<text text-anchor="middle" x="637" y="-210.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C596.2,-98.55 476.3,-105.76 404.38,-112.06"/>
-<polygon fill="#000000" stroke="#000000" points="403.78,-108.6 394.14,-112.98 404.41,-115.57 403.78,-108.6"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.95,-184.46C714.98,-188.6 699.75,-193.47 685.54,-198.01"/>
+<polygon fill="#000000" stroke="#000000" points="684.37,-194.71 675.91,-201.09 686.5,-201.38 684.37,-194.71"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-88.7 142,-88.7 142,-64.7 252,-64.7 252,-88.7"/>
-<text text-anchor="middle" x="197" y="-74.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-87.21 582,-87.21 582,-63.21 692,-63.21 692,-87.21"/>
+<text text-anchor="middle" x="637" y="-72.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge7" class="edge">
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M749.01,-200.42C729.22,-179.2 685.3,-136 638.5,-115.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C592.34,-96.55 593,-68.88 547,-54.7 445.26,-23.32 319.13,-45.26 249.77,-62.19"/>
-<polygon fill="#000000" stroke="#000000" points="248.81,-58.82 239.96,-64.65 250.51,-65.61 248.81,-58.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.04,-162.07C724,-145 685.5,-113.76 660.86,-93.76"/>
+<polygon fill="#000000" stroke="#000000" points="663.05,-91.03 653.08,-87.45 658.64,-96.47 663.05,-91.03"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="542,-87.7 447,-87.7 447,-63.7 542,-63.7 542,-87.7"/>
-<text text-anchor="middle" x="494.5" y="-73.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="540.5,-166.21 446.5,-166.21 446.5,-142.21 540.5,-142.21 540.5,-166.21"/>
+<text text-anchor="middle" x="493.5" y="-151.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C609.51,-104.21 578.24,-94.96 552.01,-88.26"/>
-<polygon fill="#000000" stroke="#000000" points="552.78,-84.84 542.23,-85.82 551.08,-91.63 552.78,-84.84"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.2,-224.84C712.94,-259.68 604.11,-357.03 495.5,-349.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C453.65,-353.1 445.46,-335.2 406,-328.7 314.41,-313.61 283.07,-346.85 198,-309.7"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C608.12,-150.02 576.8,-149.59 550.73,-150.38"/>
+<polygon fill="#000000" stroke="#000000" points="550.5,-146.89 540.64,-150.76 550.76,-153.89 550.5,-146.89"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-48.7 583,-48.7 583,-24.7 692,-24.7 692,-48.7"/>
-<text text-anchor="middle" x="637.5" y="-34.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-126.21 303.5,-126.21 303.5,-102.21 397.5,-102.21 397.5,-126.21"/>
+<text text-anchor="middle" x="350.5" y="-111.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M753.37,-200.69C741.77,-179.94 716.66,-136.3 692,-101.7 680.73,-85.88 666.74,-68.97 655.9,-56.36"/>
-<polygon fill="#000000" stroke="#000000" points="658.49,-54.01 649.28,-48.76 653.2,-58.6 658.49,-54.01"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.38,-148.11 586.53,-139.89 546,-133.21 499.75,-125.59 446.77,-120.66 407.8,-117.74"/>
+<polygon fill="#000000" stroke="#000000" points="407.93,-114.24 397.7,-117 407.42,-121.22 407.93,-114.24"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541.5,-167.7 447.5,-167.7 447.5,-143.7 541.5,-143.7 541.5,-167.7"/>
-<text text-anchor="middle" x="494.5" y="-153.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-27.21 296,-27.21 296,-3.21 405,-3.21 405,-27.21"/>
+<text text-anchor="middle" x="350.5" y="-12.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636.5,-115.7C617.77,-107.73 567.4,-125.34 532.24,-139.67"/>
-<polygon fill="#000000" stroke="#000000" points="530.66,-136.54 522.76,-143.6 533.34,-143 530.66,-136.54"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="689,-205.7 586,-205.7 586,-181.7 689,-181.7 689,-205.7"/>
-<text text-anchor="middle" x="637.5" y="-191.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M756.74,-162.16C749.48,-137.73 729.59,-82.32 692,-54.21 611.67,5.85 489.49,3.72 415.41,-4.73"/>
+<polygon fill="#000000" stroke="#000000" points="414.79,-1.28 405.28,-5.96 415.63,-8.23 414.79,-1.28"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.76,-207.66C718.99,-206.29 709.2,-204.76 699.41,-203.22"/>
-<polygon fill="#000000" stroke="#000000" points="699.66,-199.72 689.24,-201.63 698.58,-206.64 699.66,-199.72"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-312.21C257.58,-300.92 229.03,-324.86 142,-293.21 116.33,-283.88 91.13,-265.16 74.32,-250.91"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-248.26 66.78,-244.33 72.02,-253.54 76.62,-248.26"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-361.7 288,-361.7 288,-337.7 406,-337.7 406,-361.7"/>
-<text text-anchor="middle" x="347" y="-347.3" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~fraggle_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="541,-86.21 446,-86.21 446,-62.21 541,-62.21 541,-86.21"/>
+<text text-anchor="middle" x="493.5" y="-71.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M493.5,-349.7C468.36,-348 440.72,-347.63 416.35,-347.8"/>
-<polygon fill="#000000" stroke="#000000" points="416.08,-344.31 406.12,-347.91 416.15,-351.31 416.08,-344.31"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M727.93,-168.71C703.34,-164.56 668.56,-158.81 638,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C589.87,-147.28 586.85,-122.74 546,-100.21 540.36,-97.1 534.3,-93.91 528.39,-90.88"/>
+<polygon fill="#000000" stroke="#000000" points="529.82,-87.68 519.31,-86.28 526.65,-93.92 529.82,-87.68"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M636,-154.21C595.32,-148.52 586.68,-169.51 546,-175.21 448.56,-188.87 334.25,-192 265.02,-192.48"/>
+<polygon fill="#000000" stroke="#000000" points="264.71,-188.98 254.73,-192.54 264.75,-195.98 264.71,-188.98"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-183.7C138.79,-179.58 122.26,-174.93 106.93,-170.61"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-167.17 97.07,-167.83 105.74,-173.91 107.64,-167.17"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-260.21C140.96,-256.04 123.7,-251.31 107.75,-246.94"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-243.54 98.03,-244.27 106.75,-250.29 108.6,-243.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.91,-129.79C306.76,-133.84 296.79,-138.62 288,-143.7 270.91,-153.57 268.96,-159.6 252,-169.7 246.49,-172.98 240.49,-176.19 234.57,-179.18"/>
-<polygon fill="#000000" stroke="#000000" points="232.86,-176.12 225.41,-183.65 235.93,-182.41 232.86,-176.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-225.29C585.56,-234.24 556.11,-246.52 532.72,-256.27"/>
+<polygon fill="#000000" stroke="#000000" points="531.32,-253.07 523.44,-260.15 534.01,-259.53 531.32,-253.07"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-129.8C284.05,-139.95 238.78,-153.19 198,-155.7"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M607.02,-201.13C585.56,-192.18 556.11,-179.9 532.72,-170.15"/>
+<polygon fill="#000000" stroke="#000000" points="534.01,-166.89 523.44,-166.28 531.32,-173.36 534.01,-166.89"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-88.87C150.18,-102.19 111.63,-123.64 84.68,-138.63"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-135.72 75.67,-143.64 86.11,-141.84 82.71,-135.72"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C284.05,-228.54 267.42,-236.35 202,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-232.21C172.53,-230.47 142.1,-230.21 116.16,-230.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.03,-226.98 106.08,-230.62 116.13,-233.98 116.03,-226.98"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.81,-87.74C435.52,-92.44 416.68,-97.87 399.55,-102.82"/>
-<polygon fill="#000000" stroke="#000000" points="398.34,-99.53 389.7,-105.66 400.28,-106.25 398.34,-99.53"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.38,-220.66C528.49,-228.09 433.37,-237.66 351.5,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-232.21C311.9,-230.1 270.64,-218.03 241.35,-207.7"/>
+<polygon fill="#000000" stroke="#000000" points="242.49,-204.39 231.9,-204.28 240.11,-210.97 242.49,-204.39"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.83,-74.25C404.26,-74.35 340.22,-78.17 288,-96.7 242.93,-112.7 245.74,-152.77 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-155.7C169.93,-157.11 141.13,-157.35 116.31,-157.15"/>
-<polygon fill="#000000" stroke="#000000" points="116.34,-153.65 106.3,-157.05 116.26,-160.65 116.34,-153.65"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-74.21C282.93,-87.72 264.06,-86.6 202,-114.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.61,-63.15C580.23,-59.14 562.45,-55.19 546,-53.21 499.67,-47.63 487.36,-47.85 441,-53.21 400.41,-57.91 391.54,-66.09 351.5,-74.21"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.78,-24.69C496.9,-3.61 285.6,30.18 142,-55.7 108.86,-75.52 81.51,-112.03 66.5,-135.03"/>
-<polygon fill="#000000" stroke="#000000" points="63.41,-133.36 61.01,-143.68 69.32,-137.11 63.41,-133.36"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-142.21C435.69,-138.09 419.28,-133.44 404.06,-129.12"/>
+<polygon fill="#000000" stroke="#000000" points="404.84,-125.7 394.26,-126.34 402.93,-132.44 404.84,-125.7"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C309.65,-160.12 269.72,-170.88 240.5,-180.33"/>
-<polygon fill="#000000" stroke="#000000" points="239.03,-177.13 230.64,-183.6 241.23,-183.78 239.03,-177.13"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.46,-154.29C418.91,-154.32 383.2,-154.32 351.5,-154.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C281.58,-153.98 264.06,-86.6 202,-114.21"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.46,-143.68C433.66,-140.07 418.37,-136.08 404.01,-132.33"/>
-<polygon fill="#000000" stroke="#000000" points="404.8,-128.92 394.24,-129.78 403.03,-135.69 404.8,-128.92"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-154.21C311.49,-154.08 269.66,-166.08 240.28,-176.63"/>
+<polygon fill="#000000" stroke="#000000" points="238.98,-173.37 230.82,-180.13 241.41,-179.94 238.98,-173.37"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-157.7C280.36,-162.07 263.66,-151.67 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.25,-155.09C418.63,-155.02 381.15,-155.49 348,-157.7"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.38,-205.75C601.59,-209.97 591.78,-214.87 583,-219.7 562.41,-231.02 539.86,-244.97 522.81,-255.86"/>
-<polygon fill="#000000" stroke="#000000" points="520.47,-253.21 513.95,-261.56 524.26,-259.09 520.47,-253.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.3,-104.84C273.17,-100.93 233.7,-100.11 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C318.16,-193.85 287.31,-193.57 261.01,-193.86"/>
-<polygon fill="#000000" stroke="#000000" points="260.75,-190.36 250.8,-194 260.85,-197.36 260.75,-190.36"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.05,-126.24C315.13,-130.55 305.07,-135.5 296,-140.21 274.33,-151.46 250.25,-164.8 231.89,-175.15"/>
+<polygon fill="#000000" stroke="#000000" points="230.09,-172.15 223.11,-180.12 233.53,-178.24 230.09,-172.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M621.94,-181.52C597.35,-160.94 547.41,-119.15 518.19,-94.69"/>
-<polygon fill="#000000" stroke="#000000" points="520.11,-91.73 510.19,-87.99 515.61,-97.1 520.11,-91.73"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-114.21C147.11,-137.74 97.33,-185.43 71.8,-212.42"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-210.37 64.68,-220.08 74.05,-215.14 68.92,-210.37"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.02,-27.47C309.69,-48.3 254.98,-90.64 202,-114.21"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-195.7C278.01,-191.19 266.04,-152.02 198,-155.7"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.88,-196.29C528.22,-198.72 431.21,-201.22 348,-195.7"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M450.2,-86.21C435.69,-90.33 419.28,-94.98 404.06,-99.3"/>
+<polygon fill="#000000" stroke="#000000" points="402.93,-95.98 394.26,-102.08 404.84,-102.72 402.93,-95.98"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M591.89,-181.68C578.64,-178.11 563.98,-174.16 550.18,-170.44"/>
-<polygon fill="#000000" stroke="#000000" points="550.87,-167 540.31,-167.78 549.05,-173.76 550.87,-167"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446,-69.59C418.28,-67.98 382.57,-67.91 351.5,-74.21"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.73,-338.15C259.91,-331.59 226.54,-322.16 198,-309.7"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~fraggle_util.f90~~EfferentGraph_edge29" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-204.21C140.96,-208.39 123.7,-213.12 107.75,-217.48"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-214.13 98.03,-220.15 108.6,-220.88 106.75,-214.13"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/gr.f90.html b/docs/sourcefile/gr.f90.html
index 9c1e91515..5e86a8cd9 100644
--- a/docs/sourcefile/gr.f90.html
+++ b/docs/sourcefile/gr.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~gr.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilegrf90EfferentGraph" width="641pt" height="302pt"
- viewBox="0.00 0.00 641.00 302.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~gr.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 412.12)">
+<svg id="sourcefilegrf90EfferentGraph" width="641pt" height="249pt"
+ viewBox="0.00 0.00 641.00 249.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~gr.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 339.24)">
 <title>sourcefile~~gr.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 878,-412.12 878,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 878,-339.24 878,4 -4,4"/>
 <!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~gr.f90</title>
-<polygon fill="none" stroke="black" points="874,-133.12 820,-133.12 820,-109.12 874,-109.12 874,-133.12"/>
-<text text-anchor="middle" x="847" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">gr.f90</text>
+<polygon fill="none" stroke="black" points="874,-235.24 820,-235.24 820,-211.24 874,-211.24 874,-235.24"/>
+<text text-anchor="middle" x="847" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">gr.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~gr.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.44,-109.09C789.3,-87.43 705.41,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-235.38C779.49,-252.91 699.44,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~gr.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.09,-133.4C818.2,-149.8 789.87,-179.03 771.01,-198.5"/>
-<polygon fill="#000000" stroke="#000000" points="768.25,-196.32 763.81,-205.93 773.28,-201.19 768.25,-196.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.82,-212.1C810.51,-208.14 799.84,-203.6 789.77,-199.31"/>
+<polygon fill="#000000" stroke="#000000" points="790.92,-196 780.35,-195.3 788.18,-202.44 790.92,-196"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~gr.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~gr.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~gr.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~gr.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~gr.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~gr.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~gr.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -657,7 +649,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-43"></a><span class="k">   end subroutine </span><span class="n">gr_kick_getaccb_ns_body</span>
 <a name="ln-44"></a>
 <a name="ln-45"></a>
-<a name="ln-46"></a>   <span class="k">module subroutine </span><span class="n">gr_kick_getacch</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">inv_c2</span><span class="p">,</span> <span class="n">agr</span><span class="p">)</span> 
+<a name="ln-46"></a>   <span class="k">module pure subroutine </span><span class="n">gr_kick_getacch</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">inv_c2</span><span class="p">,</span> <span class="n">agr</span><span class="p">)</span> 
 <a name="ln-47"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-48"></a>      <span class="c">!!</span>
 <a name="ln-49"></a>      <span class="c">!! Compute relativisitic accelerations of massive bodies</span>
diff --git a/docs/sourcefile/helio_classes.f90.html b/docs/sourcefile/helio_classes.f90.html
index ff7cb3f44..86730c208 100644
--- a/docs/sourcefile/helio_classes.f90.html
+++ b/docs/sourcefile/helio_classes.f90.html
@@ -226,79 +226,80 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~helio_classes.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilehelio_classesf90EfferentGraph" width="517pt" height="73pt"
- viewBox="0.00 0.00 517.00 73.12" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~helio_classes.f90~~EfferentGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 69.12)">
+<svg id="sourcefilehelio_classesf90EfferentGraph" width="517pt" height="74pt"
+ viewBox="0.00 0.00 517.00 73.51" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~helio_classes.f90~~EfferentGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 69.51)">
 <title>sourcefile~~helio_classes.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-69.12 513,-69.12 513,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-69.51 513,-69.51 513,4 -4,4"/>
 <!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<polygon fill="none" stroke="black" points="509,-52.29 415,-52.29 415,-28.29 509,-28.29 509,-52.29"/>
-<text text-anchor="middle" x="462" y="-37.89" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes.f90</text>
+<polygon fill="none" stroke="black" points="509,-32.15 415,-32.15 415,-8.15 509,-8.15 509,-32.15"/>
+<text text-anchor="middle" x="462" y="-17.75" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes.f90</text>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_node2" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-52.29 142,-52.29 142,-28.29 249,-28.29 249,-52.29"/>
-<text text-anchor="middle" x="195.5" y="-37.89" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="379,-52.15 285,-52.15 285,-28.15 379,-28.15 379,-52.15"/>
+<text text-anchor="middle" x="332" y="-37.75" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_edge1" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.18,-52.36C408.65,-55.99 393.29,-59.49 379,-61.29 337.55,-66.51 326.49,-66.15 285,-61.29 272.99,-59.89 260.25,-57.44 248.29,-54.71"/>
-<polygon fill="#000000" stroke="#000000" points="249,-51.28 238.46,-52.36 247.37,-58.09 249,-51.28"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.79,-27.37C406.45,-28.67 397.68,-30.05 389.09,-31.39"/>
+<polygon fill="#000000" stroke="#000000" points="388.48,-27.94 379.14,-32.94 389.56,-34.86 388.48,-27.94"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="379,-52.29 285,-52.29 285,-28.29 379,-28.29 379,-52.29"/>
-<text text-anchor="middle" x="332" y="-37.89" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-52.15 0,-52.15 0,-28.15 106,-28.15 106,-52.15"/>
+<text text-anchor="middle" x="53" y="-37.75" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.79,-40.29C406.54,-40.29 397.87,-40.29 389.37,-40.29"/>
-<polygon fill="#000000" stroke="#000000" points="389.14,-36.79 379.14,-40.29 389.14,-43.79 389.14,-36.79"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.76,-9.47C390.55,-4.76 360.33,-0.25 333,-0.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331,-0.15C246.58,0.15 225.25,-5.1 142,-19.15 131.33,-20.95 120.03,-23.31 109.21,-25.78"/>
+<polygon fill="#000000" stroke="#000000" points="108.37,-22.38 99.44,-28.08 109.97,-29.2 108.37,-22.38"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-32.29 0,-32.29 0,-8.29 106,-8.29 106,-32.29"/>
-<text text-anchor="middle" x="53" y="-17.89" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-52.15 142,-52.15 142,-28.15 249,-28.15 249,-52.15"/>
+<text text-anchor="middle" x="195.5" y="-37.75" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.7,-28.19C406.02,-24.91 392.02,-21.62 379,-19.29 298.73,-4.91 278.05,-0.54 196.5,-0.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M194.5,-0.29C168.74,0.29 140.59,-2.94 116.29,-6.96"/>
-<polygon fill="#000000" stroke="#000000" points="115.38,-3.57 106.13,-8.73 116.58,-10.47 115.38,-3.57"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331,-0.15C295.63,-0.02 257.13,-12.9 230.41,-24.08"/>
+<polygon fill="#000000" stroke="#000000" points="228.92,-20.91 221.13,-28.09 231.7,-27.34 228.92,-20.91"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-32.79C133.39,-31.59 124.64,-30.35 116.05,-29.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.47,-25.65 106.08,-27.7 115.49,-32.58 116.47,-25.65"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.18,-52.22C278.65,-55.85 263.29,-59.35 249,-61.15 201.82,-67.1 189.23,-66.71 142,-61.15 130.06,-59.75 117.39,-57.3 105.49,-54.57"/>
+<polygon fill="#000000" stroke="#000000" points="106.26,-51.15 95.72,-52.22 104.62,-57.96 106.26,-51.15"/>
 </g>
 <!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.71,-40.29C276.61,-40.29 268.05,-40.29 259.59,-40.29"/>
-<polygon fill="#000000" stroke="#000000" points="259.34,-36.79 249.34,-40.29 259.34,-43.79 259.34,-36.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.71,-40.15C276.61,-40.15 268.05,-40.15 259.59,-40.15"/>
+<polygon fill="#000000" stroke="#000000" points="259.34,-36.65 249.34,-40.15 259.34,-43.65 259.34,-36.65"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_classes.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.88,-28.12C279.34,-16.4 235.97,-0.41 196.5,-0.29"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-40.15C133.48,-40.15 124.83,-40.15 116.33,-40.15"/>
+<polygon fill="#000000" stroke="#000000" points="116.08,-36.65 106.08,-40.15 116.08,-43.65 116.08,-36.65"/>
 </g>
 </g>
 </svg>
@@ -359,1126 +360,1123 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node1" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<polygon fill="none" stroke="black" points="94,-1368 0,-1368 0,-1344 94,-1344 94,-1368"/>
-<text text-anchor="middle" x="47" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes.f90</text>
+<polygon fill="none" stroke="black" points="94,-2082 0,-2082 0,-2058 94,-2058 94,-2082"/>
+<text text-anchor="middle" x="47" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50">helio_classes.f90</text>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-2796 413.5,-2796 413.5,-2772 492.5,-2772 492.5,-2796"/>
-<text text-anchor="middle" x="453" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="233,-1431 130,-1431 130,-1407 233,-1407 233,-1431"/>
+<text text-anchor="middle" x="181.5" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.35,-2778.86C381.88,-2773.37 337.23,-2762.53 303,-2742"/>
-</g>
-<!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="335,-1368 269,-1368 269,-1344 335,-1344 335,-1368"/>
-<text text-anchor="middle" x="302" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.27,-2783.46C397.75,-2781.12 381.17,-2775.51 371,-2763 325.38,-2706.89 306.01,-1553.09 303.33,-1378.15"/>
-<polygon fill="#000000" stroke="#000000" points="306.83,-1378.01 303.18,-1368.06 299.83,-1378.11 306.83,-1378.01"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M178.03,-1431.14C162.07,-1509.57 73.5,-1944.74 52.48,-2048.01"/>
+<polygon fill="#000000" stroke="#000000" points="49.02,-2047.45 50.45,-2057.95 55.88,-2048.85 49.02,-2047.45"/>
 </g>
 <!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node3" class="node">
 <title>sourcefile~helio_gr.f90</title>
 <g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-2754 419,-2754 419,-2730 487,-2730 487,-2754"/>
-<text text-anchor="middle" x="453" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-2796 419,-2796 419,-2772 487,-2772 487,-2796"/>
+<text text-anchor="middle" x="453" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge2" class="edge">
 <title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.92,-2751.18C386.9,-2758.06 338.16,-2763.09 303,-2742"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.69,-2779.2C403.49,-2776.07 385.66,-2771.02 371,-2763 334.85,-2743.23 344.2,-2700 303,-2700"/>
+</g>
+<!-- sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_node5" class="node">
+<title>sourcefile~swiftest.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="335,-1431 269,-1431 269,-1407 335,-1407 335,-1431"/>
+<text text-anchor="middle" x="302" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+</a>
+</g>
 </g>
 <!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge38" class="edge">
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge53" class="edge">
 <title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.68,-2742.15C401.73,-2740.33 382.38,-2734.97 371,-2721 326.76,-2666.68 306.27,-1550.64 303.36,-1378.27"/>
-<polygon fill="#000000" stroke="#000000" points="306.86,-1378.05 303.19,-1368.11 299.86,-1378.16 306.86,-1378.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.68,-2784.15C401.74,-2782.33 382.38,-2776.96 371,-2763 327.47,-2709.59 306.42,-1612.92 303.38,-1441.46"/>
+<polygon fill="#000000" stroke="#000000" points="306.88,-1441.26 303.21,-1431.33 299.88,-1441.39 306.88,-1441.26"/>
 </g>
 <!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node4" class="node">
 <title>sourcefile~helio_drift.f90</title>
 <g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-2712 414.5,-2712 414.5,-2688 491.5,-2688 491.5,-2712"/>
-<text text-anchor="middle" x="453" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-2754 414.5,-2754 414.5,-2730 491.5,-2730 491.5,-2754"/>
+<text text-anchor="middle" x="453" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge3" class="edge">
 <title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.4,-2709.37C400.7,-2712.88 385.11,-2716.99 371,-2721 340.57,-2729.64 330.13,-2758.27 303,-2742"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.4,-2732.63C400.7,-2729.12 385.11,-2725.01 371,-2721 340.57,-2712.36 334.63,-2700 303,-2700"/>
 </g>
 <!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge46" class="edge">
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge41" class="edge">
 <title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.13,-2699.57C398.37,-2697.3 381.38,-2691.72 371,-2679 328.15,-2626.46 306.54,-1547.97 303.4,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="306.9,-1378.07 303.21,-1368.13 299.9,-1378.2 306.9,-1378.07"/>
-</g>
-<!-- sourcefile~helio_kick.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-2670 414.5,-2670 414.5,-2646 491.5,-2646 491.5,-2670"/>
-<text text-anchor="middle" x="453" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
-</a>
-</g>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.13,-2741.57C398.38,-2739.3 381.38,-2733.72 371,-2721 328.85,-2669.37 306.69,-1610.13 303.42,-1441.53"/>
+<polygon fill="#000000" stroke="#000000" points="306.92,-1441.27 303.23,-1431.34 299.92,-1441.41 306.92,-1441.27"/>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.26,-2663.75C400.11,-2666.93 384.26,-2671.75 371,-2679 334.85,-2698.77 344.1,-2739.16 303,-2742"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2742C156.47,-2752 62.76,-1556.4 49.6,-1378.12"/>
-<polygon fill="#000000" stroke="#000000" points="53.08,-1377.79 48.86,-1368.07 46.1,-1378.3 53.08,-1377.79"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M180.5,-2700C53.54,-2701.55 47.57,-2204.14 47.83,-2092.19"/>
+<polygon fill="#000000" stroke="#000000" points="51.33,-2092.07 47.88,-2082.05 44.33,-2092.04 51.33,-2092.07"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.54,-1431.26C295.5,-1562.27 249.85,-2699.18 182.5,-2700"/>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.14,-2657.56C398.39,-2655.29 381.39,-2649.71 371,-2637 329.5,-2586.21 306.79,-1544.05 303.44,-1378.17"/>
-<polygon fill="#000000" stroke="#000000" points="306.94,-1378.07 303.24,-1368.14 299.94,-1378.21 306.94,-1378.07"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.93,-1419C261.05,-1419 252.35,-1419 243.59,-1419"/>
+<polygon fill="#000000" stroke="#000000" points="243.33,-1415.5 233.33,-1419 243.33,-1422.5 243.33,-1415.5"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="233,-1368 130,-1368 130,-1344 233,-1344 233,-1368"/>
-<text text-anchor="middle" x="181.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-2712 410.5,-2712 410.5,-2688 495.5,-2688 495.5,-2712"/>
+<text text-anchor="middle" x="453" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.65,-1356C121.35,-1356 112.71,-1356 104.28,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="104.16,-1352.5 94.16,-1356 104.16,-1359.5 104.16,-1352.5"/>
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.25,-2700C380.38,-2700 339.22,-2700 303,-2700"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge77" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.36,-2698.95C395.73,-2696.35 380.56,-2690.7 371,-2679 330.24,-2629.16 306.99,-1608.13 303.47,-1441.81"/>
+<polygon fill="#000000" stroke="#000000" points="306.96,-1441.26 303.25,-1431.34 299.96,-1441.41 306.96,-1441.26"/>
+</g>
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-24 410.5,-24 410.5,0 495.5,0 495.5,-24"/>
-<text text-anchor="middle" x="453" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-2670 413.5,-2670 413.5,-2646 492.5,-2646 492.5,-2670"/>
+<text text-anchor="middle" x="453" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.18,-22.09C397.53,-25.35 383.64,-29.12 371,-33 286,-59.07 271.34,-96.32 182.5,-100"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M180.5,-100C51.49,-105.71 47.71,-1164.59 47.93,-1333.42"/>
-<polygon fill="#000000" stroke="#000000" points="44.43,-1333.64 47.95,-1343.63 51.43,-1333.62 44.43,-1333.64"/>
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.17,-2667.68C399.78,-2671.12 384.7,-2675.11 371,-2679 340.57,-2687.64 334.63,-2700 303,-2700"/>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.34,-13.04C395.71,-15.63 380.55,-21.29 371,-33 328.15,-85.54 306.54,-1164.03 303.4,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="299.9,-1333.8 303.21,-1343.87 306.9,-1333.93 299.9,-1333.8"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge80" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.32,-2657.43C397.81,-2655.08 381.22,-2649.47 371,-2637 331.59,-2588.91 307.26,-1603.88 303.51,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="307,-1441.23 303.27,-1431.31 300,-1441.39 307,-1441.23"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_node8" class="node">
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-2628 414.5,-2628 414.5,-2604 491.5,-2604 491.5,-2628"/>
+<text text-anchor="middle" x="453" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.52,-1343.94C295.34,-1215.12 248.49,-97.26 182.5,-100"/>
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2700C248.33,-2700 235.16,-2699.36 182.5,-2700"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.26,-2621.75C400.11,-2624.93 384.26,-2629.75 371,-2637 334.85,-2656.77 344.2,-2700 303,-2700"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M268.93,-1356C261.05,-1356 252.35,-1356 243.59,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="243.33,-1352.5 233.33,-1356 243.33,-1359.5 243.33,-1352.5"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge61" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.16,-2615.54C398.42,-2613.27 381.42,-2607.69 371,-2595 332.94,-2548.65 307.53,-1599.49 303.55,-1441.27"/>
+<polygon fill="#000000" stroke="#000000" points="307.05,-1441.18 303.3,-1431.27 300.05,-1441.35 307.05,-1441.18"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="528,-2628 378,-2628 378,-2604 528,-2604 528,-2628"/>
-<text text-anchor="middle" x="453" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506,-24 400,-24 400,0 506,0 506,-24"/>
+<text text-anchor="middle" x="453" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M388.83,-2603.93C382.56,-2601.48 376.5,-2598.54 371,-2595 330.61,-2569 338.68,-2543.15 303,-2511"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge8" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M399.65,-18C389.26,-21.17 379.08,-25.91 371,-33 310.44,-86.11 358.82,-142.93 303,-201"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-201C214.73,-290.75 187.1,-1237.16 183.05,-1396.34"/>
+<polygon fill="#000000" stroke="#000000" points="179.54,-1396.7 182.79,-1406.78 186.53,-1396.87 179.54,-1396.7"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M380.89,-2603.93C377.2,-2601.43 373.85,-2598.48 371,-2595 330.9,-2546.01 307.1,-1541.99 303.48,-1378.43"/>
-<polygon fill="#000000" stroke="#000000" points="306.98,-1378.05 303.26,-1368.13 299.98,-1378.21 306.98,-1378.05"/>
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M399.77,-15.47C388.73,-18.69 378.24,-24.1 371,-33 326.08,-88.2 306.15,-1222.5 303.35,-1396.65"/>
+<polygon fill="#000000" stroke="#000000" points="299.85,-1396.65 303.19,-1406.71 306.85,-1396.76 299.85,-1396.65"/>
 </g>
 <!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node10" class="node">
 <title>sourcefile~symba_step.f90</title>
 <g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497,-2586 409,-2586 409,-2562 497,-2562 497,-2586"/>
-<text text-anchor="middle" x="453" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497,-360 409,-360 409,-336 497,-336 497,-360"/>
+<text text-anchor="middle" x="453" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge12" class="edge">
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge9" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.74,-2565.33C396.3,-2562.16 382.89,-2558.08 371,-2553 338.33,-2539.05 329.39,-2534.78 303,-2511"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.65,-343.54C395.52,-340.49 381.75,-335.42 371,-327 320.92,-287.74 347.1,-155.12 303,-201"/>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge19" class="edge">
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge27" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.69,-2572.62C394.59,-2569.89 380.21,-2564.23 371,-2553 332.25,-2505.75 307.37,-1537.7 303.52,-1378.17"/>
-<polygon fill="#000000" stroke="#000000" points="307.02,-1378.01 303.28,-1368.1 300.02,-1378.18 307.02,-1378.01"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M408.74,-349.42C394.64,-352.15 380.26,-357.8 371,-369 303.28,-450.9 302.49,-1251.46 302.9,-1396.52"/>
+<polygon fill="#000000" stroke="#000000" points="299.41,-1396.85 302.94,-1406.84 306.41,-1396.83 299.41,-1396.85"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492,-2376 414,-2376 414,-2352 492,-2352 492,-2376"/>
-<text text-anchor="middle" x="453" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-822 426,-822 426,-798 480,-798 480,-822"/>
+<text text-anchor="middle" x="453" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.81,-2363.42C398.2,-2361.1 381.39,-2355.52 371,-2343 307.37,-2266.36 303.22,-1518.16 303,-1378.42"/>
-<polygon fill="#000000" stroke="#000000" points="306.5,-1378.1 302.99,-1368.1 299.5,-1378.11 306.5,-1378.1"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge19" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.79,-809.55C407.65,-810.75 384.45,-815.55 371,-831 333.08,-874.57 309.32,-1295.11 304.09,-1396.9"/>
+<polygon fill="#000000" stroke="#000000" points="300.59,-1396.8 303.58,-1406.97 307.58,-1397.16 300.59,-1396.8"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="509,-2334 397,-2334 397,-2310 509,-2310 509,-2334"/>
-<text text-anchor="middle" x="453" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-318 410,-318 410,-294 496,-294 496,-318"/>
+<text text-anchor="middle" x="453" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.99,-2317.51C387.03,-2314.21 377.69,-2309.04 371,-2301 310.08,-2227.85 303.73,-1514.27 303.08,-1378.31"/>
-<polygon fill="#000000" stroke="#000000" points="306.58,-1378.23 303.03,-1368.24 299.58,-1378.26 306.58,-1378.23"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge10" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.95,-300.39C396.75,-297.29 382.6,-292.47 371,-285 330.61,-259 336.29,-166.37 303,-201"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.99,-307.17C395.49,-309.8 380.52,-315.46 371,-327 300.55,-412.42 302.02,-1248.19 302.85,-1396.54"/>
+<polygon fill="#000000" stroke="#000000" points="299.35,-1396.73 302.91,-1406.71 306.35,-1396.69 299.35,-1396.73"/>
+</g>
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="489.5,-2292 416.5,-2292 416.5,-2268 489.5,-2268 489.5,-2292"/>
-<text text-anchor="middle" x="453" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="486.5,-780 419.5,-780 419.5,-756 486.5,-756 486.5,-780"/>
+<text text-anchor="middle" x="453" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.35,-2279.74C400.06,-2277.64 381.99,-2272.15 371,-2259 312.77,-2189.33 304.26,-1510.05 303.15,-1378.13"/>
-<polygon fill="#000000" stroke="#000000" points="306.65,-1377.99 303.07,-1368.02 299.65,-1378.05 306.65,-1377.99"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.4,-768.07C402.46,-769.93 382.87,-775.26 371,-789 330.42,-836 308.53,-1290.11 303.92,-1396.69"/>
+<polygon fill="#000000" stroke="#000000" points="300.42,-1396.78 303.49,-1406.92 307.41,-1397.08 300.42,-1396.78"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="508.5,-2250 397.5,-2250 397.5,-2226 508.5,-2226 508.5,-2250"/>
-<text text-anchor="middle" x="453" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504.5,-276 401.5,-276 401.5,-252 504.5,-252 504.5,-276"/>
+<text text-anchor="middle" x="453" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.1,-253.29C390.94,-250.47 380.49,-247.05 371,-243 338.33,-229.05 327.62,-175.39 303,-201"/>
+</g>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.45,-2233.6C387.33,-2230.32 377.82,-2225.13 371,-2217 315.52,-2150.86 304.83,-1506.92 303.24,-1378.29"/>
-<polygon fill="#000000" stroke="#000000" points="306.74,-1378.04 303.12,-1368.08 299.74,-1378.12 306.74,-1378.04"/>
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.1,-267.17C389.6,-270.34 378.57,-275.8 371,-285 297.8,-373.97 301.57,-1245.26 302.79,-1396.64"/>
+<polygon fill="#000000" stroke="#000000" points="299.29,-1397.01 302.88,-1406.98 306.29,-1396.95 299.29,-1397.01"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506,-2544 400,-2544 400,-2520 506,-2520 506,-2544"/>
-<text text-anchor="middle" x="453" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-738 415,-738 415,-714 491,-714 491,-738"/>
+<text text-anchor="middle" x="453" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M399.74,-2538.22C368.02,-2539.02 328.81,-2534.26 303,-2511"/>
-</g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M399.83,-2528.48C388.79,-2525.26 378.29,-2519.87 371,-2511 296.42,-2420.26 301.36,-1531.17 302.77,-1378.31"/>
-<polygon fill="#000000" stroke="#000000" points="306.27,-1378.28 302.86,-1368.25 299.27,-1378.21 306.27,-1378.28"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.83,-726.61C399.02,-728.89 381.78,-734.43 371,-747 327.68,-797.5 307.73,-1286.63 303.75,-1396.96"/>
+<polygon fill="#000000" stroke="#000000" points="300.26,-1396.84 303.4,-1406.96 307.25,-1397.09 300.26,-1396.84"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="512,-2208 394,-2208 394,-2184 512,-2184 512,-2208"/>
-<text text-anchor="middle" x="453" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505.5,-696 400.5,-696 400.5,-672 505.5,-672 505.5,-696"/>
+<text text-anchor="middle" x="453" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.76,-2190.28C385.05,-2186.98 376.99,-2182.11 371,-2175 318.25,-2112.37 305.42,-1503.38 303.34,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="306.83,-1378.04 303.17,-1368.1 299.83,-1378.16 306.83,-1378.04"/>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.48,-687.59C389.28,-690.79 378.54,-696.16 371,-705 325.02,-758.93 307.04,-1281.65 303.62,-1396.68"/>
+<polygon fill="#000000" stroke="#000000" points="300.12,-1396.69 303.33,-1406.79 307.12,-1396.89 300.12,-1396.69"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-2166 419,-2166 419,-2142 487,-2142 487,-2166"/>
-<text text-anchor="middle" x="453" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-654 414.5,-654 414.5,-630 491.5,-630 491.5,-654"/>
+<text text-anchor="middle" x="453" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.88,-2153.98C402,-2152.11 382.64,-2146.75 371,-2133 320.96,-2073.85 306.04,-1499.44 303.44,-1378.34"/>
-<polygon fill="#000000" stroke="#000000" points="306.94,-1378 303.23,-1368.07 299.94,-1378.14 306.94,-1378"/>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.35,-642.62C398.64,-644.92 381.62,-650.48 371,-663 322.28,-720.44 306.35,-1278.25 303.5,-1396.89"/>
+<polygon fill="#000000" stroke="#000000" points="299.99,-1396.88 303.26,-1406.96 306.99,-1397.05 299.99,-1396.88"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-2124 410.5,-2124 410.5,-2100 495.5,-2100 495.5,-2124"/>
-<text text-anchor="middle" x="453" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-612 410.5,-612 410.5,-588 495.5,-588 495.5,-612"/>
+<text text-anchor="middle" x="453" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.17,-2110.68C395.7,-2108.03 380.69,-2102.4 371,-2091 323.7,-2035.38 306.72,-1496.24 303.57,-1378.6"/>
-<polygon fill="#000000" stroke="#000000" points="307.06,-1378.18 303.3,-1368.28 300.06,-1378.37 307.06,-1378.18"/>
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.13,-601.28C395.65,-603.93 380.65,-609.57 371,-621 319.58,-681.92 305.72,-1274.14 303.39,-1396.82"/>
+<polygon fill="#000000" stroke="#000000" points="299.88,-1396.85 303.2,-1406.91 306.88,-1396.97 299.88,-1396.85"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="486.5,-2082 419.5,-2082 419.5,-2058 486.5,-2058 486.5,-2082"/>
-<text text-anchor="middle" x="453" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="524,-570 382,-570 382,-546 524,-546 524,-570"/>
+<text text-anchor="middle" x="453" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.35,-2069.97C402.39,-2068.13 382.8,-2062.8 371,-2049 326.37,-1996.81 307.4,-1491.42 303.69,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="307.18,-1378.02 303.37,-1368.14 300.19,-1378.24 307.18,-1378.02"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge28" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.71,-569.69C377.72,-572.26 374.08,-575.33 371,-579 316.86,-643.42 305.11,-1270.43 303.29,-1396.85"/>
+<polygon fill="#000000" stroke="#000000" points="299.79,-1396.85 303.15,-1406.9 306.78,-1396.95 299.79,-1396.85"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-2040 410.5,-2040 410.5,-2016 495.5,-2016 495.5,-2040"/>
-<text text-anchor="middle" x="453" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-528 419,-528 419,-504 487,-504 487,-528"/>
+<text text-anchor="middle" x="453" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.24,-2026.62C395.78,-2023.96 380.76,-2018.34 371,-2007 329.08,-1958.28 308.14,-1487.22 303.84,-1378.37"/>
-<polygon fill="#000000" stroke="#000000" points="307.33,-1378.06 303.45,-1368.21 300.34,-1378.33 307.33,-1378.06"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge82" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.83,-515.98C401.93,-517.83 382.56,-523.19 371,-537 314.18,-604.87 304.55,-1265.8 303.2,-1396.58"/>
+<polygon fill="#000000" stroke="#000000" points="299.69,-1396.91 303.1,-1406.94 306.69,-1396.98 299.69,-1396.91"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492,-1998 414,-1998 414,-1974 492,-1974 492,-1998"/>
-<text text-anchor="middle" x="453" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535,-486 371,-486 371,-462 535,-462 535,-486"/>
+<text text-anchor="middle" x="453" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.64,-1985.15C398.19,-1982.75 381.56,-1977.19 371,-1965 331.75,-1919.72 308.92,-1482.48 304.01,-1378.23"/>
-<polygon fill="#000000" stroke="#000000" points="307.5,-1378.03 303.54,-1368.2 300.51,-1378.35 307.5,-1378.03"/>
-</g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge29" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M380.96,-486.14C377.26,-488.61 373.88,-491.54 371,-495 311.49,-566.33 304.01,-1261.38 303.12,-1396.36"/>
+<polygon fill="#000000" stroke="#000000" points="299.61,-1396.68 303.05,-1406.7 306.61,-1396.72 299.61,-1396.68"/>
+</g>
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="501,-1956 405,-1956 405,-1932 501,-1932 501,-1956"/>
-<text text-anchor="middle" x="453" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504.5,-444 401.5,-444 401.5,-420 504.5,-420 504.5,-444"/>
+<text text-anchor="middle" x="453" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.85,-1941.38C392.17,-1938.36 379.6,-1932.84 371,-1923 334.45,-1881.17 309.78,-1478.03 304.2,-1378.25"/>
-<polygon fill="#000000" stroke="#000000" points="307.69,-1377.9 303.64,-1368.11 300.7,-1378.28 307.69,-1377.9"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge30" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.16,-435.22C389.66,-438.39 378.62,-443.84 371,-453 308.72,-527.89 303.47,-1258.75 303.04,-1396.63"/>
+<polygon fill="#000000" stroke="#000000" points="299.54,-1396.81 303.01,-1406.82 306.54,-1396.83 299.54,-1396.81"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504.5,-2502 401.5,-2502 401.5,-2478 504.5,-2478 504.5,-2502"/>
-<text text-anchor="middle" x="453" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-402 419,-402 419,-378 487,-378 487,-402"/>
+<text text-anchor="middle" x="453" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.46,-2500.95C361.18,-2509.05 310.35,-2517.62 303,-2511"/>
-</g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.11,-2486.83C389.61,-2483.65 378.57,-2478.19 371,-2469 299.17,-2381.81 301.8,-1528.31 302.82,-1378.42"/>
-<polygon fill="#000000" stroke="#000000" points="306.32,-1378.19 302.89,-1368.16 299.32,-1378.13 306.32,-1378.19"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.77,-389.93C401.86,-391.77 382.5,-397.13 371,-411 305.94,-489.47 302.97,-1256.54 302.97,-1396.98"/>
+<polygon fill="#000000" stroke="#000000" points="299.47,-1396.99 302.97,-1406.98 306.47,-1396.98 299.47,-1396.99"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="489.5,-1914 416.5,-1914 416.5,-1890 489.5,-1890 489.5,-1914"/>
-<text text-anchor="middle" x="453" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504.5,-2586 401.5,-2586 401.5,-2562 504.5,-2562 504.5,-2586"/>
+<text text-anchor="middle" x="453" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.24,-1901.42C400.13,-1899.23 382.25,-1893.75 371,-1881 303.79,-1804.83 301.95,-1468.78 302.7,-1378.43"/>
-<polygon fill="#000000" stroke="#000000" points="306.2,-1378.26 302.8,-1368.23 299.2,-1378.19 306.2,-1378.26"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.1,-2570.83C389.6,-2567.66 378.57,-2562.2 371,-2553 297.8,-2464.03 301.57,-1592.74 302.79,-1441.36"/>
+<polygon fill="#000000" stroke="#000000" points="306.29,-1441.05 302.88,-1431.02 299.29,-1440.99 306.29,-1441.05"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500,-2460 406,-2460 406,-2436 500,-2436 500,-2460"/>
-<text text-anchor="middle" x="453" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488.5,-2544 417.5,-2544 417.5,-2520 488.5,-2520 488.5,-2544"/>
+<text text-anchor="middle" x="453" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.79,-2457.43C394.2,-2460.49 381.96,-2464.32 371,-2469 338.33,-2482.95 329.39,-2534.78 303,-2511"/>
-</g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.77,-2445.97C392.64,-2443.04 379.6,-2437.42 371,-2427 301.91,-2343.34 302.25,-1525.17 302.87,-1378.47"/>
-<polygon fill="#000000" stroke="#000000" points="306.38,-1378.07 302.92,-1368.05 299.38,-1378.03 306.38,-1378.07"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M417.1,-2531.9C400.58,-2529.9 382.09,-2524.45 371,-2511 300.55,-2425.58 302.02,-1589.81 302.85,-1441.46"/>
+<polygon fill="#000000" stroke="#000000" points="306.35,-1441.31 302.91,-1431.29 299.35,-1441.27 306.35,-1441.31"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494,-2418 412,-2418 412,-2394 494,-2394 494,-2418"/>
-<text text-anchor="middle" x="453" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480.5,-2502 425.5,-2502 425.5,-2478 480.5,-2478 480.5,-2502"/>
+<text text-anchor="middle" x="453" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.62,-2411.22C397.95,-2414.31 383.09,-2419.22 371,-2427 330.61,-2453 338.68,-2543.15 303,-2511"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-2511C213.35,-2432.01 186.9,-1531.34 183.03,-1378.1"/>
-<polygon fill="#000000" stroke="#000000" points="186.52,-1377.93 182.78,-1368.02 179.53,-1378.11 186.52,-1377.93"/>
-</g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.7,-2405.11C396.69,-2402.61 380.91,-2396.97 371,-2385 304.65,-2304.86 302.73,-1521.84 302.94,-1378.48"/>
-<polygon fill="#000000" stroke="#000000" points="306.44,-1378.27 302.96,-1368.27 299.44,-1378.26 306.44,-1378.27"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.16,-2490.63C406.97,-2489.49 383.96,-2484.67 371,-2469 303.28,-2387.1 302.49,-1586.54 302.9,-1441.48"/>
+<polygon fill="#000000" stroke="#000000" points="306.41,-1441.17 302.94,-1431.16 299.41,-1441.15 306.41,-1441.17"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-1872 414.5,-1872 414.5,-1848 491.5,-1848 491.5,-1872"/>
-<text text-anchor="middle" x="453" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492,-2460 414,-2460 414,-2436 492,-2436 492,-2460"/>
+<text text-anchor="middle" x="453" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.23,-1859.07C398.69,-1856.68 381.83,-1851.14 371,-1839 309.09,-1769.61 303.36,-1463.75 302.98,-1378.26"/>
-<polygon fill="#000000" stroke="#000000" points="306.48,-1378.12 302.96,-1368.12 299.48,-1378.13 306.48,-1378.12"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.8,-2447.43C398.19,-2445.11 381.39,-2439.53 371,-2427 305.94,-2348.53 302.97,-1581.46 302.97,-1441.02"/>
+<polygon fill="#000000" stroke="#000000" points="306.47,-1441.02 302.97,-1431.02 299.47,-1441.01 306.47,-1441.02"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="490.5,-1830 415.5,-1830 415.5,-1806 490.5,-1806 490.5,-1830"/>
-<text text-anchor="middle" x="453" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="509,-2418 397,-2418 397,-2394 509,-2394 509,-2418"/>
+<text text-anchor="middle" x="453" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.13,-1817.12C399.38,-1814.79 382.11,-1809.29 371,-1797 314.44,-1734.43 304.9,-1459.22 303.31,-1378.39"/>
-<polygon fill="#000000" stroke="#000000" points="306.81,-1378.26 303.14,-1368.32 299.81,-1378.38 306.81,-1378.26"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M396.98,-2401.51C387.02,-2398.22 377.69,-2393.04 371,-2385 308.72,-2310.11 303.47,-1579.25 303.04,-1441.37"/>
+<polygon fill="#000000" stroke="#000000" points="306.54,-1441.17 303.01,-1431.18 299.54,-1441.19 306.54,-1441.17"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-1788 414.5,-1788 414.5,-1764 491.5,-1764 491.5,-1788"/>
-<text text-anchor="middle" x="453" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="483,-2376 423,-2376 423,-2352 483,-2352 483,-2376"/>
+<text text-anchor="middle" x="453" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.39,-1774.92C398.89,-1772.5 382.01,-1766.98 371,-1755 319.79,-1699.25 306.61,-1454.75 303.72,-1378.68"/>
-<polygon fill="#000000" stroke="#000000" points="307.21,-1378.21 303.36,-1368.34 300.21,-1378.46 307.21,-1378.21"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge37" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.84,-2364.42C405.08,-2363 383.47,-2357.95 371,-2343 311.49,-2271.67 304.01,-1576.62 303.12,-1441.64"/>
+<polygon fill="#000000" stroke="#000000" points="306.61,-1441.28 303.05,-1431.3 299.61,-1441.32 306.61,-1441.28"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="493,-1746 413,-1746 413,-1722 493,-1722 493,-1746"/>
-<text text-anchor="middle" x="453" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-2334 414.5,-2334 414.5,-2310 491.5,-2310 491.5,-2334"/>
+<text text-anchor="middle" x="453" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.84,-1732.54C397.82,-1729.98 381.73,-1724.45 371,-1713 325.04,-1663.93 308.47,-1449.11 304.22,-1378.55"/>
-<polygon fill="#000000" stroke="#000000" points="307.69,-1377.94 303.62,-1368.16 300.7,-1378.34 307.69,-1377.94"/>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge38" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.28,-2321.45C398.56,-2319.15 381.54,-2313.59 371,-2301 314.18,-2233.13 304.55,-1572.2 303.2,-1441.42"/>
+<polygon fill="#000000" stroke="#000000" points="306.69,-1441.02 303.1,-1431.06 299.69,-1441.09 306.69,-1441.02"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-1704 421,-1704 421,-1680 485,-1680 485,-1704"/>
-<text text-anchor="middle" x="453" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-2292 419,-2292 419,-2268 487,-2268 487,-2292"/>
+<text text-anchor="middle" x="453" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.76,-1691.52C403.81,-1689.58 383.78,-1684.31 371,-1671 330.25,-1628.54 310.55,-1443.15 304.83,-1378.41"/>
-<polygon fill="#000000" stroke="#000000" points="308.29,-1377.77 303.95,-1368.11 301.31,-1378.37 308.29,-1377.77"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge39" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.85,-2280.01C401.96,-2278.15 382.59,-2272.79 371,-2259 316.86,-2194.58 305.11,-1567.57 303.29,-1441.15"/>
+<polygon fill="#000000" stroke="#000000" points="306.78,-1441.05 303.15,-1431.1 299.79,-1441.15 306.78,-1441.05"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535,-1662 371,-1662 371,-1638 535,-1638 535,-1662"/>
-<text text-anchor="middle" x="453" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="508.5,-2250 397.5,-2250 397.5,-2226 508.5,-2226 508.5,-2250"/>
+<text text-anchor="middle" x="453" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.75,-1637.93C378.46,-1635.46 374.48,-1632.51 371,-1629 335.4,-1593.06 312.89,-1436.53 305.59,-1378.1"/>
-<polygon fill="#000000" stroke="#000000" points="309.06,-1377.59 304.37,-1368.09 302.11,-1378.44 309.06,-1377.59"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.49,-2233.57C387.37,-2230.29 377.84,-2225.1 371,-2217 319.58,-2156.08 305.72,-1563.86 303.39,-1441.18"/>
+<polygon fill="#000000" stroke="#000000" points="306.88,-1441.03 303.2,-1431.09 299.88,-1441.15 306.88,-1441.03"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-1620 426,-1620 426,-1596 480,-1596 480,-1620"/>
-<text text-anchor="middle" x="453" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-2208 426,-2208 426,-2184 480,-2184 480,-2208"/>
+<text text-anchor="middle" x="453" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.8,-1607.65C408.14,-1606.03 385.51,-1601.04 371,-1587 311.89,-1529.79 303.47,-1424.05 302.74,-1378.18"/>
-<polygon fill="#000000" stroke="#000000" points="306.24,-1378.1 302.7,-1368.12 299.24,-1378.14 306.24,-1378.1"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.67,-2196.55C407.48,-2195.41 384.25,-2190.62 371,-2175 322.28,-2117.56 306.35,-1559.75 303.5,-1441.11"/>
+<polygon fill="#000000" stroke="#000000" points="306.99,-1440.95 303.26,-1431.04 299.99,-1441.12 306.99,-1440.95"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-1578 410,-1578 410,-1554 496,-1554 496,-1578"/>
-<text text-anchor="middle" x="453" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485,-2166 421,-2166 421,-2142 485,-2142 485,-2166"/>
+<text text-anchor="middle" x="453" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.96,-1562.93C396.15,-1560.03 381.63,-1554.69 371,-1545 322.12,-1500.41 308.34,-1418.11 304.49,-1378.48"/>
-<polygon fill="#000000" stroke="#000000" points="307.95,-1377.96 303.62,-1368.29 300.98,-1378.55 307.95,-1377.96"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.95,-2154.15C403.63,-2152.48 383.16,-2147.26 371,-2133 325.02,-2079.07 307.04,-1556.35 303.62,-1441.32"/>
+<polygon fill="#000000" stroke="#000000" points="307.12,-1441.11 303.33,-1431.21 300.12,-1441.31 307.12,-1441.11"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-1536 419,-1536 419,-1512 487,-1512 487,-1536"/>
-<text text-anchor="middle" x="453" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="489.5,-2124 416.5,-2124 416.5,-2100 489.5,-2100 489.5,-2124"/>
+<text text-anchor="middle" x="453" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.64,-1521.91C402.71,-1519.4 384.27,-1514.08 371,-1503 331.99,-1470.44 314.17,-1410.61 307.07,-1378.22"/>
-<polygon fill="#000000" stroke="#000000" points="310.41,-1377.1 304.98,-1368 303.55,-1378.5 310.41,-1377.1"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge45" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.49,-2111.61C400.24,-2109.49 382.16,-2104.01 371,-2091 327.68,-2040.5 307.73,-1551.37 303.75,-1441.04"/>
+<polygon fill="#000000" stroke="#000000" points="307.25,-1440.91 303.4,-1431.04 300.26,-1441.16 307.25,-1440.91"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="483,-1494 423,-1494 423,-1470 483,-1470 483,-1494"/>
-<text text-anchor="middle" x="453" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-192 415,-192 415,-168 491,-168 491,-192"/>
+<text text-anchor="middle" x="453" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.81,-1479.66C406.33,-1477.13 386.08,-1471.88 371,-1461 341.56,-1439.77 321.58,-1401.51 311.25,-1377.5"/>
-<polygon fill="#000000" stroke="#000000" points="314.46,-1376.09 307.42,-1368.18 307.98,-1378.76 314.46,-1376.09"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.81,-173.69C380.71,-170.24 331.33,-171.52 303,-201"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge46" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.99,-180.33C399.01,-182.53 381.59,-188.08 371,-201 331.59,-249.09 307.26,-1234.12 303.51,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="300,-1396.61 303.27,-1406.69 307,-1396.77 300,-1396.61"/>
+</g>
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505.5,-1452 400.5,-1452 400.5,-1428 505.5,-1428 505.5,-1452"/>
-<text text-anchor="middle" x="453" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495,-2082 411,-2082 411,-2058 495,-2058 495,-2082"/>
+<text text-anchor="middle" x="453" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.41,-1430.7C390.31,-1427.77 380.05,-1423.95 371,-1419 350.93,-1408.03 332.19,-1389.82 319.49,-1375.8"/>
-<polygon fill="#000000" stroke="#000000" points="321.97,-1373.32 312.74,-1368.11 316.7,-1377.93 321.97,-1373.32"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge84" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.69,-2068.68C396.09,-2066.04 380.87,-2060.43 371,-2049 330.42,-2002 308.53,-1547.89 303.92,-1441.31"/>
+<polygon fill="#000000" stroke="#000000" points="307.41,-1440.92 303.49,-1431.08 300.42,-1441.22 307.41,-1440.92"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481.5,-1410 424.5,-1410 424.5,-1386 481.5,-1386 481.5,-1410"/>
-<text text-anchor="middle" x="453" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~util_append.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-2040 410,-2040 410,-2016 496,-2016 496,-2040"/>
+<text text-anchor="middle" x="453" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.17,-1391.12C408.51,-1387.16 388.61,-1382 371,-1377 362.45,-1374.57 353.34,-1371.85 344.65,-1369.19"/>
-<polygon fill="#000000" stroke="#000000" points="345.67,-1365.84 335.08,-1366.24 343.6,-1372.53 345.67,-1365.84"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge47" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.89,-2026.48C395.56,-2023.78 380.73,-2018.18 371,-2007 333.08,-1963.43 309.32,-1542.89 304.09,-1441.1"/>
+<polygon fill="#000000" stroke="#000000" points="307.58,-1440.84 303.58,-1431.03 300.59,-1441.2 307.58,-1440.84"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-150 410,-150 410,-126 496,-126 496,-150"/>
-<text text-anchor="middle" x="453" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1998 413.5,-1998 413.5,-1974 492.5,-1974 492.5,-1998"/>
+<text text-anchor="middle" x="453" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.74,-131.22C370.51,-126.07 316.23,-122.26 303,-138"/>
-</g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.95,-139.14C395.45,-141.77 380.49,-147.43 371,-159 332.25,-206.25 307.37,-1174.3 303.52,-1333.83"/>
-<polygon fill="#000000" stroke="#000000" points="300.02,-1333.82 303.28,-1343.9 307.02,-1333.99 300.02,-1333.82"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge48" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.3,-1985.02C397.98,-1982.57 381.54,-1977.01 371,-1965 301.12,-1885.41 301.28,-1534.03 302.57,-1441.43"/>
+<polygon fill="#000000" stroke="#000000" points="306.08,-1441.29 302.74,-1431.23 299.08,-1441.17 306.08,-1441.29"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-1368 414.5,-1368 414.5,-1344 491.5,-1344 491.5,-1368"/>
-<text text-anchor="middle" x="453" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492,-1956 414,-1956 414,-1932 492,-1932 492,-1956"/>
+<text text-anchor="middle" x="453" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.4,-1356C393.36,-1356 367.07,-1356 345.31,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="345.03,-1352.5 335.03,-1356 345.03,-1359.5 345.03,-1352.5"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge49" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.78,-1943.03C398.35,-1940.61 381.7,-1935.06 371,-1923 306.45,-1850.23 302.64,-1529.35 302.83,-1441.38"/>
+<polygon fill="#000000" stroke="#000000" points="306.33,-1441.2 302.88,-1431.19 299.33,-1441.17 306.33,-1441.2"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-1326 419,-1326 419,-1302 487,-1302 487,-1326"/>
-<text text-anchor="middle" x="453" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-1914 426,-1914 426,-1890 480,-1890 480,-1914"/>
+<text text-anchor="middle" x="453" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.8,-1322.24C404.11,-1325.98 386.65,-1330.56 371,-1335 362.45,-1337.43 353.34,-1340.15 344.65,-1342.81"/>
-<polygon fill="#000000" stroke="#000000" points="343.6,-1339.47 335.08,-1345.76 345.67,-1346.16 343.6,-1339.47"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge50" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.93,-1902.32C407.87,-1901.06 384.68,-1896.24 371,-1881 311.71,-1814.96 304.1,-1523.97 303.13,-1441.1"/>
+<polygon fill="#000000" stroke="#000000" points="306.63,-1440.99 303.04,-1431.03 299.63,-1441.06 306.63,-1440.99"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-1284 410,-1284 410,-1260 496,-1260 496,-1284"/>
-<text text-anchor="middle" x="453" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-1872 426,-1872 426,-1848 480,-1848 480,-1872"/>
+<text text-anchor="middle" x="453" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.72,-1278.81C396.78,-1281.97 382.85,-1286.52 371,-1293 350.93,-1303.97 332.19,-1322.18 319.49,-1336.2"/>
-<polygon fill="#000000" stroke="#000000" points="316.7,-1334.07 312.74,-1343.89 321.97,-1338.68 316.7,-1334.07"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge51" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426,-1860.26C407.97,-1858.98 384.79,-1854.14 371,-1839 317.07,-1779.8 305.71,-1519.56 303.5,-1441.32"/>
+<polygon fill="#000000" stroke="#000000" points="307,-1441.05 303.24,-1431.15 300,-1441.24 307,-1441.05"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="489,-1242 417,-1242 417,-1218 489,-1218 489,-1242"/>
-<text text-anchor="middle" x="453" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494,-150 412,-150 412,-126 494,-126 494,-150"/>
+<text text-anchor="middle" x="453" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.88,-1233.35C401.66,-1236.18 384.31,-1241.4 371,-1251 341.56,-1272.23 321.58,-1310.49 311.25,-1334.5"/>
-<polygon fill="#000000" stroke="#000000" points="307.98,-1333.24 307.42,-1343.82 314.46,-1335.91 307.98,-1333.24"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge11" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.87,-145.75C378.64,-154.11 332.29,-170.53 303,-201"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge54" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.62,-138.83C396.61,-141.32 380.84,-146.97 371,-159 330.24,-208.84 306.99,-1229.87 303.47,-1396.19"/>
+<polygon fill="#000000" stroke="#000000" points="299.96,-1396.59 303.25,-1406.66 306.96,-1396.74 299.96,-1396.59"/>
+</g>
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495,-1200 411,-1200 411,-1176 495,-1176 495,-1200"/>
-<text text-anchor="middle" x="453" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502,-1830 404,-1830 404,-1806 502,-1806 502,-1830"/>
+<text text-anchor="middle" x="453" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.85,-1191.52C396.95,-1194.45 382.15,-1199.69 371,-1209 331.99,-1241.56 314.17,-1301.39 307.07,-1333.78"/>
-<polygon fill="#000000" stroke="#000000" points="303.55,-1333.5 304.98,-1344 310.41,-1334.9 303.55,-1333.5"/>
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge55" class="edge">
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M403.94,-1814.75C391.7,-1811.66 379.59,-1806.27 371,-1797 322.38,-1744.55 307.49,-1514.57 303.95,-1441.42"/>
+<polygon fill="#000000" stroke="#000000" points="307.43,-1440.91 303.47,-1431.08 300.44,-1441.23 307.43,-1440.91"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480.5,-1158 425.5,-1158 425.5,-1134 480.5,-1134 480.5,-1158"/>
-<text text-anchor="middle" x="453" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1788 413.5,-1788 413.5,-1764 492.5,-1764 492.5,-1788"/>
+<text text-anchor="middle" x="453" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.3,-1146.7C407.87,-1148.52 385.7,-1153.59 371,-1167 322.12,-1211.59 308.34,-1293.89 304.49,-1333.52"/>
-<polygon fill="#000000" stroke="#000000" points="300.98,-1333.45 303.62,-1343.71 307.95,-1334.04 300.98,-1333.45"/>
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge56" class="edge">
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.32,-1774.55C398.19,-1772.01 381.89,-1766.5 371,-1755 327.66,-1709.26 309.49,-1509.3 304.51,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="307.97,-1440.9 303.77,-1431.17 300.99,-1441.39 307.97,-1440.9"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488.5,-1116 417.5,-1116 417.5,-1092 488.5,-1092 488.5,-1116"/>
-<text text-anchor="middle" x="453" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="515,-1746 391,-1746 391,-1722 515,-1722 515,-1746"/>
+<text text-anchor="middle" x="453" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M417.09,-1105.39C401.18,-1107.78 383.21,-1113.18 371,-1125 311.89,-1182.21 303.47,-1287.95 302.74,-1333.82"/>
-<polygon fill="#000000" stroke="#000000" points="299.24,-1333.86 302.7,-1343.88 306.24,-1333.9 299.24,-1333.86"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge57" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.92,-1726.08C383.49,-1722.96 376.57,-1718.72 371,-1713 332.89,-1673.87 311.75,-1503.43 305.22,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="308.67,-1440.91 304.17,-1431.31 301.71,-1441.62 308.67,-1440.91"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-1074 426,-1074 426,-1050 480,-1050 480,-1074"/>
-<text text-anchor="middle" x="453" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-1704 419,-1704 419,-1680 487,-1680 487,-1704"/>
+<text text-anchor="middle" x="453" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.99,-1062.13C408.2,-1063.62 385.31,-1068.55 371,-1083 335.4,-1118.94 312.89,-1275.47 305.59,-1333.9"/>
-<polygon fill="#000000" stroke="#000000" points="302.11,-1333.56 304.37,-1343.91 309.06,-1334.41 302.11,-1333.56"/>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge58" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.6,-1690.96C402.27,-1688.74 383.49,-1683.37 371,-1671 306.77,-1607.4 301.35,-1489.93 302.09,-1441.14"/>
+<polygon fill="#000000" stroke="#000000" points="305.59,-1441.13 302.35,-1431.05 298.59,-1440.95 305.59,-1441.13"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1032 413.5,-1032 413.5,-1008 492.5,-1008 492.5,-1032"/>
-<text text-anchor="middle" x="453" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-1662 414.5,-1662 414.5,-1638 491.5,-1638 491.5,-1662"/>
+<text text-anchor="middle" x="453" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.39,-1021.52C398.28,-1024.07 381.96,-1029.58 371,-1041 330.25,-1083.46 310.55,-1268.85 304.83,-1333.59"/>
-<polygon fill="#000000" stroke="#000000" points="301.31,-1333.63 303.95,-1343.89 308.29,-1334.23 301.31,-1333.63"/>
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge59" class="edge">
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.36,-1647.99C399.22,-1645.38 382.63,-1639.96 371,-1629 316.98,-1578.1 305.78,-1484.01 303.52,-1441.22"/>
+<polygon fill="#000000" stroke="#000000" points="307.01,-1440.89 303.11,-1431.05 300.02,-1441.18 307.01,-1440.89"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-990 426,-990 426,-966 480,-966 480,-990"/>
-<text text-anchor="middle" x="453" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-1620 419,-1620 419,-1596 487,-1596 487,-1620"/>
+<text text-anchor="middle" x="453" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.74,-977.88C407.82,-979.27 384.9,-984.16 371,-999 325.04,-1048.07 308.47,-1262.89 304.22,-1333.45"/>
-<polygon fill="#000000" stroke="#000000" points="300.7,-1333.66 303.62,-1343.84 307.69,-1334.06 300.7,-1333.66"/>
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge60" class="edge">
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.81,-1606.25C402.72,-1603.83 384.11,-1598.49 371,-1587 327.05,-1548.46 311.08,-1477.38 305.62,-1441.29"/>
+<polygon fill="#000000" stroke="#000000" points="309.08,-1440.71 304.25,-1431.28 302.14,-1441.67 309.08,-1440.71"/>
 </g>
-<!-- sourcefile~discard.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~discard.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485.5,-948 420.5,-948 420.5,-924 485.5,-924 485.5,-948"/>
-<text text-anchor="middle" x="453" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-1578 410,-1578 410,-1554 496,-1554 496,-1578"/>
+<text text-anchor="middle" x="453" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.13,-936.32C403.2,-938.22 383.38,-943.52 371,-957 319.79,-1012.75 306.61,-1257.25 303.72,-1333.32"/>
-<polygon fill="#000000" stroke="#000000" points="300.21,-1333.54 303.36,-1343.66 307.21,-1333.79 300.21,-1333.54"/>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge62" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.91,-1561.82C396.41,-1558.81 382.09,-1553.69 371,-1545 336.83,-1518.21 317.63,-1469.32 308.88,-1440.95"/>
+<polygon fill="#000000" stroke="#000000" points="312.19,-1439.8 306.03,-1431.18 305.47,-1441.76 312.19,-1439.8"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~discard.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504.5,-906 401.5,-906 401.5,-882 504.5,-882 504.5,-906"/>
-<text text-anchor="middle" x="453" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~discard.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="485.5,-1536 420.5,-1536 420.5,-1512 485.5,-1512 485.5,-1536"/>
+<text text-anchor="middle" x="453" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.26,-897.79C389.9,-900.96 378.89,-906.27 371,-915 314.44,-977.57 304.9,-1252.78 303.31,-1333.61"/>
-<polygon fill="#000000" stroke="#000000" points="299.81,-1333.62 303.14,-1343.68 306.81,-1333.74 299.81,-1333.62"/>
+<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge63" class="edge">
+<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.12,-1520.51C404.37,-1517.64 385.66,-1512.44 371,-1503 346.19,-1487.03 326.2,-1458.98 314.47,-1439.72"/>
+<polygon fill="#000000" stroke="#000000" points="317.47,-1437.92 309.39,-1431.06 311.43,-1441.46 317.47,-1437.92"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-864 419,-864 419,-840 487,-840 487,-864"/>
-<text text-anchor="middle" x="453" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480.5,-1494 425.5,-1494 425.5,-1470 480.5,-1470 480.5,-1494"/>
+<text text-anchor="middle" x="453" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.76,-852.32C402.06,-854.3 382.9,-859.67 371,-873 309.09,-942.39 303.36,-1248.25 302.98,-1333.74"/>
-<polygon fill="#000000" stroke="#000000" points="299.48,-1333.87 302.96,-1343.88 306.48,-1333.88 299.48,-1333.87"/>
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge64" class="edge">
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.44,-1477.21C409.3,-1473.8 388.5,-1468.47 371,-1461 355.9,-1454.56 340.24,-1445.1 327.76,-1436.79"/>
+<polygon fill="#000000" stroke="#000000" points="329.51,-1433.75 319.28,-1431 325.57,-1439.53 329.51,-1433.75"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480.5,-822 425.5,-822 425.5,-798 480.5,-798 480.5,-822"/>
-<text text-anchor="middle" x="453" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-1452 410.5,-1452 410.5,-1428 495.5,-1428 495.5,-1452"/>
+<text text-anchor="middle" x="453" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.47,-809.63C407.42,-810.9 384.46,-815.75 371,-831 303.79,-907.17 301.95,-1243.22 302.7,-1333.57"/>
-<polygon fill="#000000" stroke="#000000" points="299.2,-1333.81 302.8,-1343.77 306.2,-1333.74 299.2,-1333.81"/>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge65" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.5,-1434.15C390.16,-1431.28 365.72,-1427.84 345.29,-1424.96"/>
+<polygon fill="#000000" stroke="#000000" points="345.7,-1421.48 335.31,-1423.55 344.73,-1428.42 345.7,-1421.48"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="504.5,-780 401.5,-780 401.5,-756 504.5,-756 504.5,-780"/>
-<text text-anchor="middle" x="453" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-1410 405.5,-1410 405.5,-1386 500.5,-1386 500.5,-1410"/>
+<text text-anchor="middle" x="453" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.47,-771.49C389.97,-774.65 378.84,-780.03 371,-789 334.45,-830.83 309.78,-1233.97 304.2,-1333.75"/>
-<polygon fill="#000000" stroke="#000000" points="300.7,-1333.72 303.64,-1343.89 307.69,-1334.1 300.7,-1333.72"/>
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.26,-1404.59C386.11,-1407.29 364.1,-1410.39 345.41,-1413.02"/>
+<polygon fill="#000000" stroke="#000000" points="344.83,-1409.57 335.42,-1414.43 345.81,-1416.5 344.83,-1409.57"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-108 410,-108 410,-84 496,-84 496,-108"/>
-<text text-anchor="middle" x="453" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="501,-1368 405,-1368 405,-1344 501,-1344 501,-1368"/>
+<text text-anchor="middle" x="453" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.96,-102.48C370.9,-109.4 316.75,-121.65 303,-138"/>
-</g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge70" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.94,-97.13C395.44,-99.76 380.48,-105.42 371,-117 330.9,-165.99 307.1,-1170.01 303.48,-1333.57"/>
-<polygon fill="#000000" stroke="#000000" points="299.98,-1333.79 303.26,-1343.87 306.98,-1333.95 299.98,-1333.79"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge67" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.94,-1365.66C393.61,-1368.68 381.69,-1372.44 371,-1377 355.9,-1383.44 340.24,-1392.9 327.76,-1401.21"/>
+<polygon fill="#000000" stroke="#000000" points="325.57,-1398.47 319.28,-1407 329.51,-1404.25 325.57,-1398.47"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-738 426,-738 426,-714 480,-714 480,-738"/>
-<text text-anchor="middle" x="453" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-1326 426,-1326 426,-1302 480,-1302 480,-1326"/>
+<text text-anchor="middle" x="453" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge69" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.77,-725.54C407.63,-726.72 384.42,-731.52 371,-747 331.75,-792.28 308.92,-1229.52 304.01,-1333.77"/>
-<polygon fill="#000000" stroke="#000000" points="300.51,-1333.65 303.54,-1343.8 307.5,-1333.97 300.51,-1333.65"/>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.87,-1316.52C409.11,-1319.12 387.49,-1324.38 371,-1335 346.19,-1350.97 326.2,-1379.02 314.47,-1398.28"/>
+<polygon fill="#000000" stroke="#000000" points="311.43,-1396.54 309.39,-1406.94 317.47,-1400.08 311.43,-1396.54"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-696 410,-696 410,-672 496,-672 496,-696"/>
-<text text-anchor="middle" x="453" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="528,-108 378,-108 378,-84 528,-84 528,-108"/>
+<text text-anchor="middle" x="453" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge71" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.82,-685.46C395.49,-688.15 380.67,-693.77 371,-705 329.08,-753.72 308.14,-1224.78 303.84,-1333.63"/>
-<polygon fill="#000000" stroke="#000000" points="300.34,-1333.67 303.45,-1343.79 307.33,-1333.94 300.34,-1333.67"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M388.83,-108.07C382.56,-110.52 376.5,-113.46 371,-117 330.61,-143 336.29,-166.37 303,-201"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge74" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M380.88,-108.07C377.19,-110.56 373.85,-113.51 371,-117 328.85,-168.63 306.69,-1227.87 303.42,-1396.47"/>
+<polygon fill="#000000" stroke="#000000" points="299.92,-1396.59 303.23,-1406.66 306.92,-1396.73 299.92,-1396.59"/>
+</g>
+<!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500.5,-654 405.5,-654 405.5,-630 500.5,-630 500.5,-654"/>
-<text text-anchor="middle" x="453" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-66 410,-66 410,-42 496,-42 496,-66"/>
+<text text-anchor="middle" x="453" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge72" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.14,-644.4C392.31,-647.39 379.59,-652.95 371,-663 326.37,-715.19 307.4,-1220.58 303.69,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="300.19,-1333.76 303.37,-1343.86 307.18,-1333.98 300.19,-1333.76"/>
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.91,-58.18C396.41,-61.19 382.09,-66.31 371,-75 320.92,-114.26 347.1,-155.12 303,-201"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge75" class="edge">
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.92,-55.11C395.41,-57.74 380.45,-63.4 371,-75 327.47,-128.41 306.42,-1225.08 303.38,-1396.54"/>
+<polygon fill="#000000" stroke="#000000" points="299.88,-1396.61 303.21,-1406.67 306.88,-1396.74 299.88,-1396.61"/>
+</g>
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="524,-612 382,-612 382,-588 524,-588 524,-612"/>
-<text text-anchor="middle" x="453" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="489.5,-1284 416.5,-1284 416.5,-1260 489.5,-1260 489.5,-1284"/>
+<text text-anchor="middle" x="453" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge73" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.76,-611.73C377.76,-614.29 374.11,-617.35 371,-621 323.7,-676.62 306.72,-1215.76 303.57,-1333.4"/>
-<polygon fill="#000000" stroke="#000000" points="300.06,-1333.63 303.3,-1343.72 307.06,-1333.82 300.06,-1333.63"/>
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge69" class="edge">
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.1,-1274.93C400.91,-1277.69 383.81,-1282.96 371,-1293 336.83,-1319.79 317.63,-1368.68 308.88,-1397.05"/>
+<polygon fill="#000000" stroke="#000000" points="305.47,-1396.24 306.03,-1406.82 312.19,-1398.2 305.47,-1396.24"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="483,-570 423,-570 423,-546 483,-546 483,-570"/>
-<text text-anchor="middle" x="453" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-1242 410.5,-1242 410.5,-1218 495.5,-1218 495.5,-1242"/>
+<text text-anchor="middle" x="453" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge74" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.91,-557.64C405.18,-559.08 383.57,-564.14 371,-579 320.96,-638.15 306.04,-1212.56 303.44,-1333.66"/>
-<polygon fill="#000000" stroke="#000000" points="299.94,-1333.86 303.23,-1343.93 306.94,-1334 299.94,-1333.86"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge70" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.17,-1233.31C396.38,-1236.23 381.81,-1241.52 371,-1251 327.05,-1289.54 311.08,-1360.62 305.62,-1396.71"/>
+<polygon fill="#000000" stroke="#000000" points="302.14,-1396.33 304.25,-1406.72 309.08,-1397.29 302.14,-1396.33"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494.5,-528 411.5,-528 411.5,-504 494.5,-504 494.5,-528"/>
-<text text-anchor="middle" x="453" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481.5,-1200 424.5,-1200 424.5,-1176 481.5,-1176 481.5,-1200"/>
+<text text-anchor="middle" x="453" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge75" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.38,-517.05C396.51,-519.6 380.92,-525.22 371,-537 318.25,-599.63 305.42,-1208.62 303.34,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="299.83,-1333.84 303.17,-1343.9 306.83,-1333.96 299.83,-1333.84"/>
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge71" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.39,-1188.63C407.02,-1190.45 385.27,-1195.55 371,-1209 316.98,-1259.9 305.78,-1353.99 303.52,-1396.78"/>
+<polygon fill="#000000" stroke="#000000" points="300.02,-1396.82 303.11,-1406.95 307.01,-1397.11 300.02,-1396.82"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502,-486 404,-486 404,-462 502,-462 502,-486"/>
-<text text-anchor="middle" x="453" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="483,-1158 423,-1158 423,-1134 483,-1134 483,-1158"/>
+<text text-anchor="middle" x="453" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge76" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M403.75,-476.61C391.35,-479.66 379.22,-485.21 371,-495 315.52,-561.14 304.83,-1205.08 303.24,-1333.71"/>
-<polygon fill="#000000" stroke="#000000" points="299.74,-1333.88 303.12,-1343.92 306.74,-1333.96 299.74,-1333.88"/>
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge72" class="edge">
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M422.99,-1146.51C405.74,-1148.35 384.63,-1153.51 371,-1167 306.77,-1230.6 301.35,-1348.07 302.09,-1396.86"/>
+<polygon fill="#000000" stroke="#000000" points="298.59,-1397.05 302.35,-1406.95 305.59,-1396.87 298.59,-1397.05"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500,-444 406,-444 406,-420 500,-420 500,-444"/>
-<text text-anchor="middle" x="453" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="489,-1116 417,-1116 417,-1092 489,-1092 489,-1116"/>
+<text text-anchor="middle" x="453" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge77" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.84,-434.09C392.72,-437.03 379.66,-442.63 371,-453 312.77,-522.67 304.26,-1201.95 303.15,-1333.87"/>
-<polygon fill="#000000" stroke="#000000" points="299.65,-1333.95 303.07,-1343.98 306.65,-1334.01 299.65,-1333.95"/>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge73" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.78,-1105.08C400.8,-1107.39 382.86,-1112.82 371,-1125 332.89,-1164.13 311.75,-1334.57 305.22,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="301.71,-1396.38 304.17,-1406.69 308.67,-1397.09 301.71,-1396.38"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-402 415,-402 415,-378 491,-378 491,-402"/>
-<text text-anchor="middle" x="453" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494.5,-1074 411.5,-1074 411.5,-1050 494.5,-1050 494.5,-1074"/>
+<text text-anchor="middle" x="453" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge78" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.67,-390.47C398.82,-392.72 381.6,-398.27 371,-411 310.08,-484.15 303.73,-1197.73 303.08,-1333.69"/>
-<polygon fill="#000000" stroke="#000000" points="299.58,-1333.74 303.03,-1343.76 306.58,-1333.77 299.58,-1333.74"/>
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge76" class="edge">
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.23,-1063.82C396.71,-1066.51 381.39,-1072.03 371,-1083 327.66,-1128.74 309.49,-1328.7 304.51,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="300.99,-1396.61 303.77,-1406.83 307.97,-1397.1 300.99,-1396.61"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-360 413.5,-360 413.5,-336 492.5,-336 492.5,-360"/>
-<text text-anchor="middle" x="453" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-1032 410,-1032 410,-1008 496,-1008 496,-1032"/>
+<text text-anchor="middle" x="453" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge79" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.39,-348.64C397.9,-351 381.3,-356.59 371,-369 307.37,-445.64 303.22,-1193.84 303,-1333.58"/>
-<polygon fill="#000000" stroke="#000000" points="299.5,-1333.89 302.99,-1343.9 306.5,-1333.9 299.5,-1333.89"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge78" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.85,-1021.94C395.69,-1024.7 380.98,-1030.24 371,-1041 322.38,-1093.45 307.49,-1323.43 303.95,-1396.58"/>
+<polygon fill="#000000" stroke="#000000" points="300.44,-1396.77 303.47,-1406.92 307.43,-1397.09 300.44,-1396.77"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491,-66 415,-66 415,-42 491,-42 491,-66"/>
-<text text-anchor="middle" x="453" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="490.5,-990 415.5,-990 415.5,-966 490.5,-966 490.5,-990"/>
+<text text-anchor="middle" x="453" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.77,-59.03C400.37,-62.13 384.21,-67.09 371,-75 350.76,-87.12 352.51,-98.19 335,-114 321.81,-125.91 314.44,-124.39 303,-138"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301,-138C220.89,-233.29 188.14,-1175.09 183.18,-1333.45"/>
-<polygon fill="#000000" stroke="#000000" points="179.67,-1333.74 182.86,-1343.85 186.66,-1333.96 179.67,-1333.74"/>
-</g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge80" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.97,-54.32C398.99,-56.51 381.57,-62.06 371,-75 329.5,-125.79 306.79,-1167.95 303.44,-1333.83"/>
-<polygon fill="#000000" stroke="#000000" points="299.94,-1333.79 303.24,-1343.86 306.94,-1333.93 299.94,-1333.79"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge79" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.18,-978.91C399.43,-981.25 382.15,-986.76 371,-999 317.07,-1058.2 305.71,-1318.44 303.5,-1396.68"/>
+<polygon fill="#000000" stroke="#000000" points="300,-1396.76 303.24,-1406.85 307,-1396.95 300,-1396.76"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="515,-318 391,-318 391,-294 515,-294 515,-318"/>
-<text text-anchor="middle" x="453" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="512,-948 394,-948 394,-924 512,-924 512,-948"/>
+<text text-anchor="middle" x="453" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge81" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M390.83,-312.78C383.23,-316.04 376.28,-320.62 371,-327 304.65,-407.14 302.73,-1190.16 302.94,-1333.52"/>
-<polygon fill="#000000" stroke="#000000" points="299.44,-1333.74 302.96,-1343.73 306.44,-1333.73 299.44,-1333.74"/>
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M393.73,-942.2C385.13,-945.46 377.11,-950.19 371,-957 311.71,-1023.04 304.1,-1314.03 303.13,-1396.9"/>
+<polygon fill="#000000" stroke="#000000" points="299.63,-1396.94 303.04,-1406.97 306.63,-1397.01 299.63,-1396.94"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="480,-276 426,-276 426,-252 480,-252 480,-276"/>
-<text text-anchor="middle" x="453" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500,-234 406,-234 406,-210 500,-210 500,-234"/>
+<text text-anchor="middle" x="453" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge82" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.93,-263.32C407.62,-264.37 384.14,-269.09 371,-285 301.91,-368.66 302.25,-1186.83 302.87,-1333.53"/>
-<polygon fill="#000000" stroke="#000000" points="299.38,-1333.97 302.92,-1343.95 306.38,-1333.93 299.38,-1333.97"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.96,-211.77C364.88,-203.24 310.13,-193.58 303,-201"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge42" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.73,-224C392.61,-226.93 379.57,-232.56 371,-243 332.94,-289.35 307.53,-1238.51 303.55,-1396.73"/>
+<polygon fill="#000000" stroke="#000000" points="300.05,-1396.65 303.3,-1406.73 307.05,-1396.82 300.05,-1396.65"/>
+</g>
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487,-234 419,-234 419,-210 487,-210 487,-234"/>
-<text text-anchor="middle" x="453" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="500,-906 406,-906 406,-882 500,-882 500,-906"/>
+<text text-anchor="middle" x="453" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge83" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.74,-221.9C401.82,-223.73 382.45,-229.1 371,-243 299.17,-330.19 301.8,-1183.69 302.82,-1333.58"/>
-<polygon fill="#000000" stroke="#000000" points="299.32,-1333.87 302.89,-1343.84 306.32,-1333.81 299.32,-1333.87"/>
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.78,-896.5C392.82,-899.48 379.87,-905 371,-915 306.45,-987.77 302.64,-1308.65 302.83,-1396.62"/>
+<polygon fill="#000000" stroke="#000000" points="299.33,-1396.83 302.88,-1406.81 306.33,-1396.8 299.33,-1396.83"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~helio_classes.f90~~AfferentGraph_node70" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-192 410.5,-192 410.5,-168 495.5,-168 495.5,-192"/>
-<text text-anchor="middle" x="453" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~helio_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="493,-864 413,-864 413,-840 493,-840 493,-864"/>
+<text text-anchor="middle" x="453" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge84" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.39,-181.07C395.76,-183.67 380.59,-189.33 371,-201 296.42,-291.74 301.36,-1180.83 302.77,-1333.69"/>
-<polygon fill="#000000" stroke="#000000" points="299.27,-1333.79 302.86,-1343.75 306.27,-1333.72 299.27,-1333.79"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~helio_classes.f90~~AfferentGraph_edge52" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.88,-853.05C397.68,-855.53 381.45,-861.1 371,-873 301.12,-952.59 301.28,-1303.97 302.57,-1396.57"/>
+<polygon fill="#000000" stroke="#000000" points="299.08,-1396.83 302.74,-1406.77 306.08,-1396.71 299.08,-1396.83"/>
 </g>
 </g>
 </svg>
@@ -1679,14 +1677,14 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-105"></a>         <span class="kt">logical</span><span class="p">,</span>                       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span> <span class="c">!! Argument that determines whether or not this is the beginning or end of the step</span>
 <a name="ln-106"></a>      <span class="k">end subroutine </span><span class="n">helio_drift_linear_tp</span>
 <a name="ln-107"></a>
-<a name="ln-108"></a>      <span class="k">module subroutine </span><span class="n">helio_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-108"></a>      <span class="k">module pure subroutine </span><span class="n">helio_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
 <a name="ln-109"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
 <a name="ln-110"></a>         <span class="k">implicit none</span>
 <a name="ln-111"></a><span class="k">         class</span><span class="p">(</span><span class="n">helio_pl</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Helio massive body particle data structure</span>
 <a name="ln-112"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
 <a name="ln-113"></a>      <span class="k">end subroutine </span><span class="n">helio_gr_kick_getacch_pl</span>
 <a name="ln-114"></a>   
-<a name="ln-115"></a>      <span class="k">module subroutine </span><span class="n">helio_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-115"></a>      <span class="k">module pure subroutine </span><span class="n">helio_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-116"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
 <a name="ln-117"></a>         <span class="k">implicit none</span>
 <a name="ln-118"></a><span class="k">         class</span><span class="p">(</span><span class="n">helio_tp</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Helio massive body particle data structure</span>
diff --git a/docs/sourcefile/helio_drift.f90.html b/docs/sourcefile/helio_drift.f90.html
index 89831059c..c3384cdcc 100644
--- a/docs/sourcefile/helio_drift.f90.html
+++ b/docs/sourcefile/helio_drift.f90.html
@@ -226,297 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~helio_drift.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilehelio_driftf90EfferentGraph" width="641pt" height="264pt"
- viewBox="0.00 0.00 641.00 264.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 369.36)">
+<svg id="sourcefilehelio_driftf90EfferentGraph" width="641pt" height="255pt"
+ viewBox="0.00 0.00 641.00 254.64" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 355.51)">
 <title>sourcefile~~helio_drift.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-369.36 901,-369.36 901,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.51 901,-355.51 901,4 -4,4"/>
 <!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~helio_drift.f90</title>
-<polygon fill="none" stroke="black" points="897,-244.36 820,-244.36 820,-220.36 897,-220.36 897,-244.36"/>
-<text text-anchor="middle" x="858.5" y="-229.96" font-family="Helvetica,sans-Serif" font-size="10.50">helio_drift.f90</text>
+<polygon fill="none" stroke="black" points="897,-147.47 820,-147.47 820,-123.47 897,-123.47 897,-147.47"/>
+<text text-anchor="middle" x="858.5" y="-133.07" font-family="Helvetica,sans-Serif" font-size="10.50">helio_drift.f90</text>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~helio_classes.f90</title>
 <g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-285.36 442.5,-285.36 442.5,-261.36 536.5,-261.36 536.5,-285.36"/>
-<text text-anchor="middle" x="489.5" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-167.47 442.5,-167.47 442.5,-143.47 536.5,-143.47 536.5,-167.47"/>
+<text text-anchor="middle" x="489.5" y="-153.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.95,-236.56C755.3,-243.78 622.65,-258.6 546.87,-267.07"/>
-<polygon fill="#000000" stroke="#000000" points="546.12,-263.63 536.57,-268.22 546.9,-270.59 546.12,-263.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.95,-137.51C755.3,-141.04 622.65,-148.26 546.87,-152.39"/>
+<polygon fill="#000000" stroke="#000000" points="546.37,-148.92 536.57,-152.96 546.75,-155.91 546.37,-148.92"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-205.36 718,-205.36 718,-181.36 784,-181.36 784,-205.36"/>
-<text text-anchor="middle" x="751" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-127.47 718,-127.47 718,-103.47 784,-103.47 784,-127.47"/>
+<text text-anchor="middle" x="751" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M824.99,-220.35C815.17,-216.72 804.25,-212.68 793.91,-208.86"/>
-<polygon fill="#000000" stroke="#000000" points="794.82,-205.46 784.23,-205.28 792.39,-212.03 794.82,-205.46"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-169.36 143.5,-169.36 143.5,-145.36 250.5,-145.36 250.5,-169.36"/>
-<text text-anchor="middle" x="197" y="-154.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.02,-261.36C416.3,-253.71 379.94,-243.39 348,-233.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.71,-128.3C811.47,-126.74 802.7,-125.08 794.3,-123.49"/>
+<polygon fill="#000000" stroke="#000000" points="794.77,-120.01 784.3,-121.59 793.47,-126.89 794.77,-120.01"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-285.36 300,-285.36 300,-261.36 394,-261.36 394,-285.36"/>
-<text text-anchor="middle" x="347" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-127.47 304,-127.47 304,-103.47 398,-103.47 398,-127.47"/>
+<text text-anchor="middle" x="351" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-273.36C430.24,-273.36 416.87,-273.36 404.14,-273.36"/>
-<polygon fill="#000000" stroke="#000000" points="404.11,-269.86 394.11,-273.36 404.11,-276.86 404.11,-269.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-143.46C433.64,-139.39 417.92,-134.78 403.3,-130.5"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-127.05 393.4,-127.6 402.01,-133.77 403.98,-127.05"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-129.36 0,-129.36 0,-105.36 106,-105.36 106,-129.36"/>
-<text text-anchor="middle" x="53" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.47 0,-244.47 0,-220.47 106,-220.47 106,-244.47"/>
+<text text-anchor="middle" x="53" y="-230.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge5" class="edge">
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-313.36C280.38,-317.95 256.69,-343.07 198,-313.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.54,-285.44C431.57,-296.17 387.72,-310.59 348,-313.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C278.76,-214.75 276.07,-277.9 202,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-271.47C164.11,-268.35 124.72,-257.35 95.91,-247.83"/>
+<polygon fill="#000000" stroke="#000000" points="96.77,-244.43 86.18,-244.54 94.53,-251.06 96.77,-244.43"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-224.47 147.5,-224.47 147.5,-200.47 254.5,-200.47 254.5,-224.47"/>
+<text text-anchor="middle" x="201" y="-210.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C322.6,-201.65 291.31,-206.31 264.58,-208.96"/>
+<polygon fill="#000000" stroke="#000000" points="264.21,-205.48 254.57,-209.88 264.85,-212.45 264.21,-205.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M443.5,-167.54C416.83,-174.81 382.41,-184.38 352,-193.47"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge12" class="edge">
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C596.91,-241.25 564.16,-250.59 538.22,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.18,-255.06 528.63,-261.31 539.21,-261.76 537.18,-255.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C589.99,-112.83 550,-126.76 522.89,-138.9"/>
+<polygon fill="#000000" stroke="#000000" points="521.11,-135.86 513.52,-143.25 524.06,-142.21 521.11,-135.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-283.47 298.5,-283.47 298.5,-259.47 403.5,-259.47 403.5,-283.47"/>
+<text text-anchor="middle" x="351" y="-269.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C566.22,-248.39 407.05,-251.9 348,-233.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-233.36C301.78,-218.48 254.45,-192.12 225.53,-174.7"/>
-<polygon fill="#000000" stroke="#000000" points="227.17,-171.6 216.81,-169.38 223.53,-177.58 227.17,-171.6"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.54,-127.73C721.08,-178.39 623.91,-367.89 490.5,-349.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C440.86,-353.14 394.55,-315.31 370.02,-291.03"/>
+<polygon fill="#000000" stroke="#000000" points="372.34,-288.4 362.85,-283.69 367.34,-293.29 372.34,-288.4"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-342.47 142,-342.47 142,-318.47 260,-318.47 260,-342.47"/>
+<text text-anchor="middle" x="201" y="-328.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C469.29,-318.47 420.92,-302.33 386.31,-289.04"/>
-<polygon fill="#000000" stroke="#000000" points="387.54,-285.76 376.95,-285.39 384.99,-292.28 387.54,-285.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C579.86,-245.22 579.27,-271.86 537,-294.36 517.29,-304.86 512.08,-307.63 490.5,-313.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C413.95,-355.21 328.41,-347.7 270.34,-340.5"/>
+<polygon fill="#000000" stroke="#000000" points="270.55,-336.99 260.19,-339.2 269.67,-343.94 270.55,-336.99"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-71.36 142,-71.36 142,-47.36 252,-47.36 252,-71.36"/>
-<text text-anchor="middle" x="197" y="-56.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-207.47 576,-207.47 576,-183.47 679,-183.47 679,-207.47"/>
+<text text-anchor="middle" x="627.5" y="-193.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M721.11,-181.24C673.9,-162.21 576.83,-126.39 490.5,-115.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C450.37,-105.72 444.18,-92.81 406,-83.36 358.57,-71.63 303.6,-65.61 262.09,-62.53"/>
-<polygon fill="#000000" stroke="#000000" points="262.33,-59.03 252.11,-61.82 261.84,-66.02 262.33,-59.03"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-127.62C711.27,-140.97 678.51,-162.54 655.38,-177.77"/>
+<polygon fill="#000000" stroke="#000000" points="653.16,-175.04 646.73,-183.46 657.01,-180.89 653.16,-175.04"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-205.36 442,-205.36 442,-181.36 537,-181.36 537,-205.36"/>
-<text text-anchor="middle" x="489.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-47.47 296,-47.47 296,-23.47 406,-23.47 406,-47.47"/>
+<text text-anchor="middle" x="351" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C607.75,-238.73 561.31,-222.53 527.91,-209.22"/>
-<polygon fill="#000000" stroke="#000000" points="529.02,-205.89 518.44,-205.38 526.39,-212.38 529.02,-205.89"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M719.51,-205.49C695.22,-214.7 660.16,-227 628.5,-234.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-116.72C693.45,-117.38 658.8,-117.65 628.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C578.49,-112 582.21,-70.99 537,-54.47 498.47,-40.39 452.62,-35.6 416.2,-34.36"/>
+<polygon fill="#000000" stroke="#000000" points="416.28,-30.86 406.19,-34.09 416.1,-37.86 416.28,-30.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C428.15,-329.42 410.29,-309.01 348,-313.36"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C462.17,-115.47 432.97,-115.47 408.37,-115.47"/>
+<polygon fill="#000000" stroke="#000000" points="408.12,-111.97 398.12,-115.47 408.12,-118.97 408.12,-111.97"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-50.36 573,-50.36 573,-26.36 682,-26.36 682,-50.36"/>
-<text text-anchor="middle" x="627.5" y="-35.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-47.47 573,-47.47 573,-23.47 682,-23.47 682,-47.47"/>
+<text text-anchor="middle" x="627.5" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.45,-181.26C728.8,-163.48 704.21,-129.38 682,-101.36 670.41,-86.75 656.8,-70.73 646.2,-58.5"/>
-<polygon fill="#000000" stroke="#000000" points="648.62,-55.95 639.41,-50.71 643.34,-60.55 648.62,-55.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-103.32C711.27,-89.96 678.51,-68.39 655.38,-53.16"/>
+<polygon fill="#000000" stroke="#000000" points="657.01,-50.04 646.73,-47.47 653.16,-55.89 657.01,-50.04"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-205.36 576,-205.36 576,-181.36 679,-181.36 679,-205.36"/>
-<text text-anchor="middle" x="627.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-193.36C708.99,-193.36 699.2,-193.36 689.41,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-189.86 679.24,-193.36 689.24,-196.86 689.24,-189.86"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C566.18,-111.66 550.94,-115.39 490.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C425.28,-115.54 415.06,-80 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-129.36 294.5,-129.36 294.5,-105.36 399.5,-105.36 399.5,-129.36"/>
-<text text-anchor="middle" x="347" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C462.88,-112.09 434.42,-111.87 409.85,-112.73"/>
-<polygon fill="#000000" stroke="#000000" points="409.42,-109.25 399.58,-113.16 409.72,-116.24 409.42,-109.25"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-365.36 288,-365.36 288,-341.36 406,-341.36 406,-365.36"/>
-<text text-anchor="middle" x="347" y="-350.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~helio_drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-87.47 442,-87.47 442,-63.47 537,-63.47 537,-87.47"/>
+<text text-anchor="middle" x="489.5" y="-73.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C458.62,-321.31 425.33,-330.76 398.66,-338.48"/>
-<polygon fill="#000000" stroke="#000000" points="397.41,-335.2 388.78,-341.35 399.36,-341.92 397.41,-335.2"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C592.18,-112.99 554.77,-101.29 527.9,-91.17"/>
+<polygon fill="#000000" stroke="#000000" points="529.08,-87.88 518.5,-87.54 526.56,-94.41 529.08,-87.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C463.43,-115.47 316.4,-169.42 243.26,-196.85"/>
+<polygon fill="#000000" stroke="#000000" points="242.01,-193.58 233.88,-200.38 244.47,-200.14 242.01,-193.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-145.36C138.79,-141.25 122.26,-136.59 106.93,-132.27"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-128.84 97.07,-129.5 105.74,-135.58 107.64,-128.84"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.19,-273.66C269.75,-274.31 233.87,-274.24 202,-271.47"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.58,-261.32C304.92,-257.45 295.81,-252.75 288,-247.36 258.87,-227.29 230.97,-197.11 214.16,-177.33"/>
-<polygon fill="#000000" stroke="#000000" points="216.75,-174.98 207.66,-169.55 211.38,-179.47 216.75,-174.98"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.69,-259.38C297.15,-250.4 266.17,-238.05 241.65,-228.27"/>
+<polygon fill="#000000" stroke="#000000" points="242.85,-224.98 232.27,-224.53 240.26,-231.49 242.85,-224.98"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-313.36C122.75,-276.29 78.59,-181.63 61.79,-138.89"/>
-<polygon fill="#000000" stroke="#000000" points="65.02,-137.53 58.19,-129.43 58.48,-140.03 65.02,-137.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-285.48C281.72,-300.81 219.02,-324 198,-313.36"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-71.38C145.16,-80.13 115.94,-92.06 92.64,-101.58"/>
-<polygon fill="#000000" stroke="#000000" points="91.32,-98.34 83.38,-105.36 93.97,-104.82 91.32,-98.34"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M182.1,-318.45C156.7,-301.4 110.04,-270.08 80.59,-250.32"/>
+<polygon fill="#000000" stroke="#000000" points="82.3,-247.25 72.05,-244.58 78.4,-253.06 82.3,-247.25"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M471.61,-205.56C455.27,-217.08 429.58,-234.47 406,-247.36 399.89,-250.71 393.26,-253.99 386.74,-257.02"/>
-<polygon fill="#000000" stroke="#000000" points="385.01,-253.97 377.35,-261.29 387.9,-260.34 385.01,-253.97"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.7,-183.46C571.84,-179.39 556.17,-174.78 541.61,-170.5"/>
+<polygon fill="#000000" stroke="#000000" points="542.33,-167.06 531.75,-167.6 540.35,-173.78 542.33,-167.06"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge19" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C464.61,-277.61 437.58,-278.76 413.91,-277.96"/>
+<polygon fill="#000000" stroke="#000000" points="413.8,-274.45 403.65,-277.48 413.47,-281.44 413.8,-274.45"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.54,-181.34C366.43,-160.05 210.45,-117.89 198,-117.36"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.95,-281.24 443.54,-287.76 406,-292.47 357.49,-298.54 344.59,-297.83 296,-292.47 253.45,-287.77 244.65,-275.17 202,-271.47"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M578.57,-26.29C488.58,-6.16 290.1,26.04 142,-38.36 112.15,-51.34 85.52,-78.55 69.57,-97.38"/>
-<polygon fill="#000000" stroke="#000000" points="66.86,-95.16 63.22,-105.11 72.27,-99.61 66.86,-95.16"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-205.47C592.17,-209.95 582.03,-215.2 573,-220.36 553.67,-231.41 532.56,-245 516.53,-255.66"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-252.77 508.19,-261.24 518.45,-258.58 514.56,-252.77"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.32,-207.47C587.34,-225.6 538.44,-259.14 490.5,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.86,-280.89 442.95,-258.6 406,-250.47 358.81,-240.08 305.06,-230.14 264.59,-223.04"/>
+<polygon fill="#000000" stroke="#000000" points="265.05,-219.57 254.6,-221.29 263.85,-226.46 265.05,-219.57"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C412.11,-132.65 320.22,-138.83 260.53,-146.72"/>
-<polygon fill="#000000" stroke="#000000" points="259.93,-143.27 250.51,-148.1 260.89,-150.21 259.93,-143.27"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.96,-44.39C267.01,-50.55 231.37,-60.41 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-193.36C566.54,-193.36 556.76,-193.36 547.27,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-189.86 537.14,-193.36 547.14,-196.86 547.14,-189.86"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.72,-103.45C286.04,-88.09 223.02,-64.69 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.76,-181.29C558.75,-173.31 522.53,-162.65 490.5,-153.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C466.16,-146.89 461.07,-142.67 442,-129.36 424.2,-116.94 426.23,-104.23 406,-96.36 357.12,-77.35 340.1,-90.37 288,-96.36 247.2,-101.06 239.07,-117.23 198,-117.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-117.36C169.89,-117.02 141.08,-116.96 116.28,-117.01"/>
-<polygon fill="#000000" stroke="#000000" points="116.26,-113.51 106.27,-117.03 116.28,-120.51 116.26,-113.51"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.25,-127.54C313.65,-131.62 304.26,-136.43 296,-141.47 270.11,-157.26 242.67,-178.58 224.17,-193.72"/>
+<polygon fill="#000000" stroke="#000000" points="221.81,-191.14 216.33,-200.21 226.27,-196.53 221.81,-191.14"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.45,-23.44C519.34,-7.59 395.65,15.03 296,-14.47 248.25,-28.6 246.32,-52.75 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-75.47C137.62,-106.67 88.34,-176.31 66.4,-211.4"/>
+<polygon fill="#000000" stroke="#000000" points="63.18,-209.96 60.95,-220.32 69.15,-213.61 63.18,-209.96"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C461.57,-146.06 431.64,-138.34 406.34,-131.93"/>
-<polygon fill="#000000" stroke="#000000" points="407.08,-128.5 396.53,-129.44 405.37,-135.29 407.08,-128.5"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-87.47C433.64,-91.54 417.92,-96.15 403.3,-100.43"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-97.16 393.4,-103.33 403.98,-103.88 402.01,-97.16"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-129.37C286.15,-133.54 268.65,-138.27 252.49,-142.64"/>
-<polygon fill="#000000" stroke="#000000" points="251.37,-139.31 242.63,-145.3 253.2,-146.07 251.37,-139.31"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-75.47C284.39,-70.75 260.53,-45.46 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.69,-77.12C415.31,-77.64 381.78,-77.61 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.27,-118.43C265.84,-118.75 229.96,-118.71 198,-117.36"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_drift.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.77,-343.39C259.66,-337.16 226.02,-327.55 198,-313.36"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.29,-219.69C137.24,-221.06 126.64,-222.52 116.33,-223.93"/>
+<polygon fill="#000000" stroke="#000000" points="115.57,-220.5 106.14,-225.32 116.53,-227.43 115.57,-220.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/helio_gr.f90.html b/docs/sourcefile/helio_gr.f90.html
index 5ea4306a5..bf30085e1 100644
--- a/docs/sourcefile/helio_gr.f90.html
+++ b/docs/sourcefile/helio_gr.f90.html
@@ -226,297 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~helio_gr.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilehelio_grf90EfferentGraph" width="641pt" height="267pt"
- viewBox="0.00 0.00 641.00 267.11" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 369.36)">
+<svg id="sourcefilehelio_grf90EfferentGraph" width="641pt" height="257pt"
+ viewBox="0.00 0.00 641.00 257.19" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 355.51)">
 <title>sourcefile~~helio_gr.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-369.36 892,-369.36 892,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.51 892,-355.51 892,4 -4,4"/>
 <!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~helio_gr.f90</title>
-<polygon fill="none" stroke="black" points="888,-244.36 820,-244.36 820,-220.36 888,-220.36 888,-244.36"/>
-<text text-anchor="middle" x="854" y="-229.96" font-family="Helvetica,sans-Serif" font-size="10.50">helio_gr.f90</text>
+<polygon fill="none" stroke="black" points="888,-147.47 820,-147.47 820,-123.47 888,-123.47 888,-147.47"/>
+<text text-anchor="middle" x="854" y="-133.07" font-family="Helvetica,sans-Serif" font-size="10.50">helio_gr.f90</text>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~helio_classes.f90</title>
 <g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-285.36 442.5,-285.36 442.5,-261.36 536.5,-261.36 536.5,-285.36"/>
-<text text-anchor="middle" x="489.5" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-167.47 442.5,-167.47 442.5,-143.47 536.5,-143.47 536.5,-167.47"/>
+<text text-anchor="middle" x="489.5" y="-153.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.87,-236.11C757.73,-243.14 623.07,-258.37 546.57,-267.02"/>
-<polygon fill="#000000" stroke="#000000" points="546.17,-263.55 536.63,-268.15 546.96,-270.5 546.17,-263.55"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.87,-137.29C757.86,-140.72 623.62,-148.12 547.04,-152.35"/>
+<polygon fill="#000000" stroke="#000000" points="546.42,-148.88 536.63,-152.92 546.8,-155.86 546.42,-148.88"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-205.36 718,-205.36 718,-181.36 784,-181.36 784,-205.36"/>
-<text text-anchor="middle" x="751" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-127.47 718,-127.47 718,-103.47 784,-103.47 784,-127.47"/>
+<text text-anchor="middle" x="751" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M821.87,-220.35C812.66,-216.79 802.43,-212.84 792.7,-209.08"/>
-<polygon fill="#000000" stroke="#000000" points="793.79,-205.75 783.2,-205.41 791.27,-212.28 793.79,-205.75"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-169.36 143.5,-169.36 143.5,-145.36 250.5,-145.36 250.5,-169.36"/>
-<text text-anchor="middle" x="197" y="-154.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.02,-261.36C416.3,-253.71 379.94,-243.39 348,-233.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.93,-128.92C811.66,-127.28 802.68,-125.5 794.04,-123.79"/>
+<polygon fill="#000000" stroke="#000000" points="794.6,-120.33 784.11,-121.83 793.24,-127.2 794.6,-120.33"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-285.36 300,-285.36 300,-261.36 394,-261.36 394,-285.36"/>
-<text text-anchor="middle" x="347" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-127.47 304,-127.47 304,-103.47 398,-103.47 398,-127.47"/>
+<text text-anchor="middle" x="351" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-273.36C430.24,-273.36 416.87,-273.36 404.14,-273.36"/>
-<polygon fill="#000000" stroke="#000000" points="404.11,-269.86 394.11,-273.36 404.11,-276.86 404.11,-269.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-143.46C433.64,-139.39 417.92,-134.78 403.3,-130.5"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-127.05 393.4,-127.6 402.01,-133.77 403.98,-127.05"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-129.36 0,-129.36 0,-105.36 106,-105.36 106,-129.36"/>
-<text text-anchor="middle" x="53" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.47 0,-244.47 0,-220.47 106,-220.47 106,-244.47"/>
+<text text-anchor="middle" x="53" y="-230.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge5" class="edge">
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-313.36C280.38,-317.95 256.69,-343.07 198,-313.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.54,-285.44C431.57,-296.17 387.72,-310.59 348,-313.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C278.76,-214.75 276.07,-277.9 202,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-271.47C164.11,-268.35 124.72,-257.35 95.91,-247.83"/>
+<polygon fill="#000000" stroke="#000000" points="96.77,-244.43 86.18,-244.54 94.53,-251.06 96.77,-244.43"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-224.47 147.5,-224.47 147.5,-200.47 254.5,-200.47 254.5,-224.47"/>
+<text text-anchor="middle" x="201" y="-210.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C322.6,-201.65 291.31,-206.31 264.58,-208.96"/>
+<polygon fill="#000000" stroke="#000000" points="264.21,-205.48 254.57,-209.88 264.85,-212.45 264.21,-205.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M443.5,-167.54C416.83,-174.81 382.41,-184.38 352,-193.47"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge12" class="edge">
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C596.91,-241.25 564.16,-250.59 538.22,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.18,-255.06 528.63,-261.31 539.21,-261.76 537.18,-255.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C589.99,-112.83 550,-126.76 522.89,-138.9"/>
+<polygon fill="#000000" stroke="#000000" points="521.11,-135.86 513.52,-143.25 524.06,-142.21 521.11,-135.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-283.47 298.5,-283.47 298.5,-259.47 403.5,-259.47 403.5,-283.47"/>
+<text text-anchor="middle" x="351" y="-269.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C566.22,-248.39 407.05,-251.9 348,-233.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-233.36C301.78,-218.48 254.45,-192.12 225.53,-174.7"/>
-<polygon fill="#000000" stroke="#000000" points="227.17,-171.6 216.81,-169.38 223.53,-177.58 227.17,-171.6"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.54,-127.73C721.08,-178.39 623.91,-367.89 490.5,-349.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C440.86,-353.14 394.55,-315.31 370.02,-291.03"/>
+<polygon fill="#000000" stroke="#000000" points="372.34,-288.4 362.85,-283.69 367.34,-293.29 372.34,-288.4"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-342.47 142,-342.47 142,-318.47 260,-318.47 260,-342.47"/>
+<text text-anchor="middle" x="201" y="-328.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C469.29,-318.47 420.92,-302.33 386.31,-289.04"/>
-<polygon fill="#000000" stroke="#000000" points="387.54,-285.76 376.95,-285.39 384.99,-292.28 387.54,-285.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C579.86,-245.22 579.27,-271.86 537,-294.36 517.29,-304.86 512.08,-307.63 490.5,-313.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C413.95,-355.21 328.41,-347.7 270.34,-340.5"/>
+<polygon fill="#000000" stroke="#000000" points="270.55,-336.99 260.19,-339.2 269.67,-343.94 270.55,-336.99"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-71.36 142,-71.36 142,-47.36 252,-47.36 252,-71.36"/>
-<text text-anchor="middle" x="197" y="-56.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-207.47 576,-207.47 576,-183.47 679,-183.47 679,-207.47"/>
+<text text-anchor="middle" x="627.5" y="-193.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M721.11,-181.24C673.9,-162.21 576.83,-126.39 490.5,-115.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C450.37,-105.72 444.18,-92.81 406,-83.36 358.57,-71.63 303.6,-65.61 262.09,-62.53"/>
-<polygon fill="#000000" stroke="#000000" points="262.33,-59.03 252.11,-61.82 261.84,-66.02 262.33,-59.03"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-127.62C711.27,-140.97 678.51,-162.54 655.38,-177.77"/>
+<polygon fill="#000000" stroke="#000000" points="653.16,-175.04 646.73,-183.46 657.01,-180.89 653.16,-175.04"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-205.36 442,-205.36 442,-181.36 537,-181.36 537,-205.36"/>
-<text text-anchor="middle" x="489.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-47.47 296,-47.47 296,-23.47 406,-23.47 406,-47.47"/>
+<text text-anchor="middle" x="351" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C607.75,-238.73 561.31,-222.53 527.91,-209.22"/>
-<polygon fill="#000000" stroke="#000000" points="529.02,-205.89 518.44,-205.38 526.39,-212.38 529.02,-205.89"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M719.51,-205.49C695.22,-214.7 660.16,-227 628.5,-234.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-116.72C693.45,-117.38 658.8,-117.65 628.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C578.49,-112 582.21,-70.99 537,-54.47 498.47,-40.39 452.62,-35.6 416.2,-34.36"/>
+<polygon fill="#000000" stroke="#000000" points="416.28,-30.86 406.19,-34.09 416.1,-37.86 416.28,-30.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C428.15,-329.42 410.29,-309.01 348,-313.36"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C462.17,-115.47 432.97,-115.47 408.37,-115.47"/>
+<polygon fill="#000000" stroke="#000000" points="408.12,-111.97 398.12,-115.47 408.12,-118.97 408.12,-111.97"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-50.36 573,-50.36 573,-26.36 682,-26.36 682,-50.36"/>
-<text text-anchor="middle" x="627.5" y="-35.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-47.47 573,-47.47 573,-23.47 682,-23.47 682,-47.47"/>
+<text text-anchor="middle" x="627.5" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.45,-181.26C728.8,-163.48 704.21,-129.38 682,-101.36 670.41,-86.75 656.8,-70.73 646.2,-58.5"/>
-<polygon fill="#000000" stroke="#000000" points="648.62,-55.95 639.41,-50.71 643.34,-60.55 648.62,-55.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-103.32C711.27,-89.96 678.51,-68.39 655.38,-53.16"/>
+<polygon fill="#000000" stroke="#000000" points="657.01,-50.04 646.73,-47.47 653.16,-55.89 657.01,-50.04"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-205.36 576,-205.36 576,-181.36 679,-181.36 679,-205.36"/>
-<text text-anchor="middle" x="627.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-193.36C708.99,-193.36 699.2,-193.36 689.41,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-189.86 679.24,-193.36 689.24,-196.86 689.24,-189.86"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C566.18,-111.66 550.94,-115.39 490.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C425.28,-115.54 415.06,-80 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-129.36 294.5,-129.36 294.5,-105.36 399.5,-105.36 399.5,-129.36"/>
-<text text-anchor="middle" x="347" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C462.88,-112.09 434.42,-111.87 409.85,-112.73"/>
-<polygon fill="#000000" stroke="#000000" points="409.42,-109.25 399.58,-113.16 409.72,-116.24 409.42,-109.25"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-365.36 288,-365.36 288,-341.36 406,-341.36 406,-365.36"/>
-<text text-anchor="middle" x="347" y="-350.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~helio_gr.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-87.47 442,-87.47 442,-63.47 537,-63.47 537,-87.47"/>
+<text text-anchor="middle" x="489.5" y="-73.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C458.62,-321.31 425.33,-330.76 398.66,-338.48"/>
-<polygon fill="#000000" stroke="#000000" points="397.41,-335.2 388.78,-341.35 399.36,-341.92 397.41,-335.2"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C592.18,-112.99 554.77,-101.29 527.9,-91.17"/>
+<polygon fill="#000000" stroke="#000000" points="529.08,-87.88 518.5,-87.54 526.56,-94.41 529.08,-87.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C463.43,-115.47 316.4,-169.42 243.26,-196.85"/>
+<polygon fill="#000000" stroke="#000000" points="242.01,-193.58 233.88,-200.38 244.47,-200.14 242.01,-193.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-145.36C138.79,-141.25 122.26,-136.59 106.93,-132.27"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-128.84 97.07,-129.5 105.74,-135.58 107.64,-128.84"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.19,-273.66C269.75,-274.31 233.87,-274.24 202,-271.47"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.58,-261.32C304.92,-257.45 295.81,-252.75 288,-247.36 258.87,-227.29 230.97,-197.11 214.16,-177.33"/>
-<polygon fill="#000000" stroke="#000000" points="216.75,-174.98 207.66,-169.55 211.38,-179.47 216.75,-174.98"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.69,-259.38C297.15,-250.4 266.17,-238.05 241.65,-228.27"/>
+<polygon fill="#000000" stroke="#000000" points="242.85,-224.98 232.27,-224.53 240.26,-231.49 242.85,-224.98"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-313.36C122.75,-276.29 78.59,-181.63 61.79,-138.89"/>
-<polygon fill="#000000" stroke="#000000" points="65.02,-137.53 58.19,-129.43 58.48,-140.03 65.02,-137.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-285.48C281.72,-300.81 219.02,-324 198,-313.36"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-71.38C145.16,-80.13 115.94,-92.06 92.64,-101.58"/>
-<polygon fill="#000000" stroke="#000000" points="91.32,-98.34 83.38,-105.36 93.97,-104.82 91.32,-98.34"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M182.1,-318.45C156.7,-301.4 110.04,-270.08 80.59,-250.32"/>
+<polygon fill="#000000" stroke="#000000" points="82.3,-247.25 72.05,-244.58 78.4,-253.06 82.3,-247.25"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M471.61,-205.56C455.27,-217.08 429.58,-234.47 406,-247.36 399.89,-250.71 393.26,-253.99 386.74,-257.02"/>
-<polygon fill="#000000" stroke="#000000" points="385.01,-253.97 377.35,-261.29 387.9,-260.34 385.01,-253.97"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.7,-183.46C571.84,-179.39 556.17,-174.78 541.61,-170.5"/>
+<polygon fill="#000000" stroke="#000000" points="542.33,-167.06 531.75,-167.6 540.35,-173.78 542.33,-167.06"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge19" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C464.61,-277.61 437.58,-278.76 413.91,-277.96"/>
+<polygon fill="#000000" stroke="#000000" points="413.8,-274.45 403.65,-277.48 413.47,-281.44 413.8,-274.45"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.54,-181.34C366.43,-160.05 210.45,-117.89 198,-117.36"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.95,-281.24 443.54,-287.76 406,-292.47 357.49,-298.54 344.59,-297.83 296,-292.47 253.45,-287.77 244.65,-275.17 202,-271.47"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M578.57,-26.29C488.58,-6.16 290.1,26.04 142,-38.36 112.15,-51.34 85.52,-78.55 69.57,-97.38"/>
-<polygon fill="#000000" stroke="#000000" points="66.86,-95.16 63.22,-105.11 72.27,-99.61 66.86,-95.16"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-205.47C592.17,-209.95 582.03,-215.2 573,-220.36 553.67,-231.41 532.56,-245 516.53,-255.66"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-252.77 508.19,-261.24 518.45,-258.58 514.56,-252.77"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.32,-207.47C587.34,-225.6 538.44,-259.14 490.5,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.86,-280.89 442.95,-258.6 406,-250.47 358.81,-240.08 305.06,-230.14 264.59,-223.04"/>
+<polygon fill="#000000" stroke="#000000" points="265.05,-219.57 254.6,-221.29 263.85,-226.46 265.05,-219.57"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C412.11,-132.65 320.22,-138.83 260.53,-146.72"/>
-<polygon fill="#000000" stroke="#000000" points="259.93,-143.27 250.51,-148.1 260.89,-150.21 259.93,-143.27"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.96,-44.39C267.01,-50.55 231.37,-60.41 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-193.36C566.54,-193.36 556.76,-193.36 547.27,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-189.86 537.14,-193.36 547.14,-196.86 547.14,-189.86"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.72,-103.45C286.04,-88.09 223.02,-64.69 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.76,-181.29C558.75,-173.31 522.53,-162.65 490.5,-153.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C466.16,-146.89 461.07,-142.67 442,-129.36 424.2,-116.94 426.23,-104.23 406,-96.36 357.12,-77.35 340.1,-90.37 288,-96.36 247.2,-101.06 239.07,-117.23 198,-117.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-117.36C169.89,-117.02 141.08,-116.96 116.28,-117.01"/>
-<polygon fill="#000000" stroke="#000000" points="116.26,-113.51 106.27,-117.03 116.28,-120.51 116.26,-113.51"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.25,-127.54C313.65,-131.62 304.26,-136.43 296,-141.47 270.11,-157.26 242.67,-178.58 224.17,-193.72"/>
+<polygon fill="#000000" stroke="#000000" points="221.81,-191.14 216.33,-200.21 226.27,-196.53 221.81,-191.14"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.45,-23.44C519.34,-7.59 395.65,15.03 296,-14.47 248.25,-28.6 246.32,-52.75 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-75.47C137.62,-106.67 88.34,-176.31 66.4,-211.4"/>
+<polygon fill="#000000" stroke="#000000" points="63.18,-209.96 60.95,-220.32 69.15,-213.61 63.18,-209.96"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C461.57,-146.06 431.64,-138.34 406.34,-131.93"/>
-<polygon fill="#000000" stroke="#000000" points="407.08,-128.5 396.53,-129.44 405.37,-135.29 407.08,-128.5"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-87.47C433.64,-91.54 417.92,-96.15 403.3,-100.43"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-97.16 393.4,-103.33 403.98,-103.88 402.01,-97.16"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-129.37C286.15,-133.54 268.65,-138.27 252.49,-142.64"/>
-<polygon fill="#000000" stroke="#000000" points="251.37,-139.31 242.63,-145.3 253.2,-146.07 251.37,-139.31"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-75.47C284.39,-70.75 260.53,-45.46 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.69,-77.12C415.31,-77.64 381.78,-77.61 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.27,-118.43C265.84,-118.75 229.96,-118.71 198,-117.36"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_gr.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.77,-343.39C259.66,-337.16 226.02,-327.55 198,-313.36"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.29,-219.69C137.24,-221.06 126.64,-222.52 116.33,-223.93"/>
+<polygon fill="#000000" stroke="#000000" points="115.57,-220.5 106.14,-225.32 116.53,-227.43 115.57,-220.5"/>
 </g>
 </g>
 </svg>
@@ -615,7 +609,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-2"></a>   <span class="k">use </span><span class="n">swiftest</span>
 <a name="ln-3"></a><span class="k">contains</span>
 <a name="ln-4"></a>
-<a name="ln-5"></a><span class="k">   module subroutine </span><span class="n">helio_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-5"></a><span class="k">   module pure subroutine </span><span class="n">helio_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
 <a name="ln-6"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-7"></a>      <span class="c">!!</span>
 <a name="ln-8"></a>      <span class="c">!! Compute relativisitic accelerations of massive bodies</span>
@@ -643,7 +637,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-30"></a><span class="k">   end subroutine </span><span class="n">helio_gr_kick_getacch_pl</span>
 <a name="ln-31"></a>
 <a name="ln-32"></a>
-<a name="ln-33"></a>   <span class="k">module subroutine </span><span class="n">helio_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-33"></a>   <span class="k">module pure subroutine </span><span class="n">helio_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-34"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-35"></a>      <span class="c">!!</span>
 <a name="ln-36"></a>      <span class="c">!! Compute relativisitic accelerations of test particles</span>
diff --git a/docs/sourcefile/helio_kick.f90.html b/docs/sourcefile/helio_kick.f90.html
index 0fa9cb557..d601d4bf6 100644
--- a/docs/sourcefile/helio_kick.f90.html
+++ b/docs/sourcefile/helio_kick.f90.html
@@ -134,7 +134,7 @@ <h1>helio_kick.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.6% of total for source files.">99 statements</a>
+    title=" 0.6% of total for source files.">101 statements</a>
      </li> 
      
      
@@ -226,297 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~helio_kick.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilehelio_kickf90EfferentGraph" width="641pt" height="264pt"
- viewBox="0.00 0.00 641.00 264.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 369.36)">
+<svg id="sourcefilehelio_kickf90EfferentGraph" width="641pt" height="255pt"
+ viewBox="0.00 0.00 641.00 254.64" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 355.51)">
 <title>sourcefile~~helio_kick.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-369.36 901,-369.36 901,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.51 901,-355.51 901,4 -4,4"/>
 <!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~helio_kick.f90</title>
-<polygon fill="none" stroke="black" points="897,-244.36 820,-244.36 820,-220.36 897,-220.36 897,-244.36"/>
-<text text-anchor="middle" x="858.5" y="-229.96" font-family="Helvetica,sans-Serif" font-size="10.50">helio_kick.f90</text>
+<polygon fill="none" stroke="black" points="897,-147.47 820,-147.47 820,-123.47 897,-123.47 897,-147.47"/>
+<text text-anchor="middle" x="858.5" y="-133.07" font-family="Helvetica,sans-Serif" font-size="10.50">helio_kick.f90</text>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~helio_classes.f90</title>
 <g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-285.36 442.5,-285.36 442.5,-261.36 536.5,-261.36 536.5,-285.36"/>
-<text text-anchor="middle" x="489.5" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-167.47 442.5,-167.47 442.5,-143.47 536.5,-143.47 536.5,-167.47"/>
+<text text-anchor="middle" x="489.5" y="-153.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.95,-236.56C755.3,-243.78 622.65,-258.6 546.87,-267.07"/>
-<polygon fill="#000000" stroke="#000000" points="546.12,-263.63 536.57,-268.22 546.9,-270.59 546.12,-263.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.95,-137.51C755.3,-141.04 622.65,-148.26 546.87,-152.39"/>
+<polygon fill="#000000" stroke="#000000" points="546.37,-148.92 536.57,-152.96 546.75,-155.91 546.37,-148.92"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-205.36 718,-205.36 718,-181.36 784,-181.36 784,-205.36"/>
-<text text-anchor="middle" x="751" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-127.47 718,-127.47 718,-103.47 784,-103.47 784,-127.47"/>
+<text text-anchor="middle" x="751" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M824.99,-220.35C815.17,-216.72 804.25,-212.68 793.91,-208.86"/>
-<polygon fill="#000000" stroke="#000000" points="794.82,-205.46 784.23,-205.28 792.39,-212.03 794.82,-205.46"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-169.36 143.5,-169.36 143.5,-145.36 250.5,-145.36 250.5,-169.36"/>
-<text text-anchor="middle" x="197" y="-154.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.02,-261.36C416.3,-253.71 379.94,-243.39 348,-233.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.71,-128.3C811.47,-126.74 802.7,-125.08 794.3,-123.49"/>
+<polygon fill="#000000" stroke="#000000" points="794.77,-120.01 784.3,-121.59 793.47,-126.89 794.77,-120.01"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-285.36 300,-285.36 300,-261.36 394,-261.36 394,-285.36"/>
-<text text-anchor="middle" x="347" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-127.47 304,-127.47 304,-103.47 398,-103.47 398,-127.47"/>
+<text text-anchor="middle" x="351" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-273.36C430.24,-273.36 416.87,-273.36 404.14,-273.36"/>
-<polygon fill="#000000" stroke="#000000" points="404.11,-269.86 394.11,-273.36 404.11,-276.86 404.11,-269.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-143.46C433.64,-139.39 417.92,-134.78 403.3,-130.5"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-127.05 393.4,-127.6 402.01,-133.77 403.98,-127.05"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-129.36 0,-129.36 0,-105.36 106,-105.36 106,-129.36"/>
-<text text-anchor="middle" x="53" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.47 0,-244.47 0,-220.47 106,-220.47 106,-244.47"/>
+<text text-anchor="middle" x="53" y="-230.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge5" class="edge">
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-313.36C280.38,-317.95 256.69,-343.07 198,-313.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.54,-285.44C431.57,-296.17 387.72,-310.59 348,-313.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C278.76,-214.75 276.07,-277.9 202,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-271.47C164.11,-268.35 124.72,-257.35 95.91,-247.83"/>
+<polygon fill="#000000" stroke="#000000" points="96.77,-244.43 86.18,-244.54 94.53,-251.06 96.77,-244.43"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-224.47 147.5,-224.47 147.5,-200.47 254.5,-200.47 254.5,-224.47"/>
+<text text-anchor="middle" x="201" y="-210.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C322.6,-201.65 291.31,-206.31 264.58,-208.96"/>
+<polygon fill="#000000" stroke="#000000" points="264.21,-205.48 254.57,-209.88 264.85,-212.45 264.21,-205.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M443.5,-167.54C416.83,-174.81 382.41,-184.38 352,-193.47"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge12" class="edge">
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C596.91,-241.25 564.16,-250.59 538.22,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.18,-255.06 528.63,-261.31 539.21,-261.76 537.18,-255.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C589.99,-112.83 550,-126.76 522.89,-138.9"/>
+<polygon fill="#000000" stroke="#000000" points="521.11,-135.86 513.52,-143.25 524.06,-142.21 521.11,-135.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-283.47 298.5,-283.47 298.5,-259.47 403.5,-259.47 403.5,-283.47"/>
+<text text-anchor="middle" x="351" y="-269.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C566.22,-248.39 407.05,-251.9 348,-233.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-233.36C301.78,-218.48 254.45,-192.12 225.53,-174.7"/>
-<polygon fill="#000000" stroke="#000000" points="227.17,-171.6 216.81,-169.38 223.53,-177.58 227.17,-171.6"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.54,-127.73C721.08,-178.39 623.91,-367.89 490.5,-349.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C440.86,-353.14 394.55,-315.31 370.02,-291.03"/>
+<polygon fill="#000000" stroke="#000000" points="372.34,-288.4 362.85,-283.69 367.34,-293.29 372.34,-288.4"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-342.47 142,-342.47 142,-318.47 260,-318.47 260,-342.47"/>
+<text text-anchor="middle" x="201" y="-328.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C469.29,-318.47 420.92,-302.33 386.31,-289.04"/>
-<polygon fill="#000000" stroke="#000000" points="387.54,-285.76 376.95,-285.39 384.99,-292.28 387.54,-285.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C579.86,-245.22 579.27,-271.86 537,-294.36 517.29,-304.86 512.08,-307.63 490.5,-313.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C413.95,-355.21 328.41,-347.7 270.34,-340.5"/>
+<polygon fill="#000000" stroke="#000000" points="270.55,-336.99 260.19,-339.2 269.67,-343.94 270.55,-336.99"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-71.36 142,-71.36 142,-47.36 252,-47.36 252,-71.36"/>
-<text text-anchor="middle" x="197" y="-56.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-207.47 576,-207.47 576,-183.47 679,-183.47 679,-207.47"/>
+<text text-anchor="middle" x="627.5" y="-193.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M721.11,-181.24C673.9,-162.21 576.83,-126.39 490.5,-115.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C450.37,-105.72 444.18,-92.81 406,-83.36 358.57,-71.63 303.6,-65.61 262.09,-62.53"/>
-<polygon fill="#000000" stroke="#000000" points="262.33,-59.03 252.11,-61.82 261.84,-66.02 262.33,-59.03"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-127.62C711.27,-140.97 678.51,-162.54 655.38,-177.77"/>
+<polygon fill="#000000" stroke="#000000" points="653.16,-175.04 646.73,-183.46 657.01,-180.89 653.16,-175.04"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-205.36 442,-205.36 442,-181.36 537,-181.36 537,-205.36"/>
-<text text-anchor="middle" x="489.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-47.47 296,-47.47 296,-23.47 406,-23.47 406,-47.47"/>
+<text text-anchor="middle" x="351" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C607.75,-238.73 561.31,-222.53 527.91,-209.22"/>
-<polygon fill="#000000" stroke="#000000" points="529.02,-205.89 518.44,-205.38 526.39,-212.38 529.02,-205.89"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M719.51,-205.49C695.22,-214.7 660.16,-227 628.5,-234.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-116.72C693.45,-117.38 658.8,-117.65 628.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C578.49,-112 582.21,-70.99 537,-54.47 498.47,-40.39 452.62,-35.6 416.2,-34.36"/>
+<polygon fill="#000000" stroke="#000000" points="416.28,-30.86 406.19,-34.09 416.1,-37.86 416.28,-30.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C428.15,-329.42 410.29,-309.01 348,-313.36"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C462.17,-115.47 432.97,-115.47 408.37,-115.47"/>
+<polygon fill="#000000" stroke="#000000" points="408.12,-111.97 398.12,-115.47 408.12,-118.97 408.12,-111.97"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-50.36 573,-50.36 573,-26.36 682,-26.36 682,-50.36"/>
-<text text-anchor="middle" x="627.5" y="-35.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-47.47 573,-47.47 573,-23.47 682,-23.47 682,-47.47"/>
+<text text-anchor="middle" x="627.5" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.45,-181.26C728.8,-163.48 704.21,-129.38 682,-101.36 670.41,-86.75 656.8,-70.73 646.2,-58.5"/>
-<polygon fill="#000000" stroke="#000000" points="648.62,-55.95 639.41,-50.71 643.34,-60.55 648.62,-55.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-103.32C711.27,-89.96 678.51,-68.39 655.38,-53.16"/>
+<polygon fill="#000000" stroke="#000000" points="657.01,-50.04 646.73,-47.47 653.16,-55.89 657.01,-50.04"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-205.36 576,-205.36 576,-181.36 679,-181.36 679,-205.36"/>
-<text text-anchor="middle" x="627.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-193.36C708.99,-193.36 699.2,-193.36 689.41,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-189.86 679.24,-193.36 689.24,-196.86 689.24,-189.86"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C566.18,-111.66 550.94,-115.39 490.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C425.28,-115.54 415.06,-80 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-129.36 294.5,-129.36 294.5,-105.36 399.5,-105.36 399.5,-129.36"/>
-<text text-anchor="middle" x="347" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C462.88,-112.09 434.42,-111.87 409.85,-112.73"/>
-<polygon fill="#000000" stroke="#000000" points="409.42,-109.25 399.58,-113.16 409.72,-116.24 409.42,-109.25"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-365.36 288,-365.36 288,-341.36 406,-341.36 406,-365.36"/>
-<text text-anchor="middle" x="347" y="-350.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~helio_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-87.47 442,-87.47 442,-63.47 537,-63.47 537,-87.47"/>
+<text text-anchor="middle" x="489.5" y="-73.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C458.62,-321.31 425.33,-330.76 398.66,-338.48"/>
-<polygon fill="#000000" stroke="#000000" points="397.41,-335.2 388.78,-341.35 399.36,-341.92 397.41,-335.2"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C592.18,-112.99 554.77,-101.29 527.9,-91.17"/>
+<polygon fill="#000000" stroke="#000000" points="529.08,-87.88 518.5,-87.54 526.56,-94.41 529.08,-87.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C463.43,-115.47 316.4,-169.42 243.26,-196.85"/>
+<polygon fill="#000000" stroke="#000000" points="242.01,-193.58 233.88,-200.38 244.47,-200.14 242.01,-193.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-145.36C138.79,-141.25 122.26,-136.59 106.93,-132.27"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-128.84 97.07,-129.5 105.74,-135.58 107.64,-128.84"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.19,-273.66C269.75,-274.31 233.87,-274.24 202,-271.47"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.58,-261.32C304.92,-257.45 295.81,-252.75 288,-247.36 258.87,-227.29 230.97,-197.11 214.16,-177.33"/>
-<polygon fill="#000000" stroke="#000000" points="216.75,-174.98 207.66,-169.55 211.38,-179.47 216.75,-174.98"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.69,-259.38C297.15,-250.4 266.17,-238.05 241.65,-228.27"/>
+<polygon fill="#000000" stroke="#000000" points="242.85,-224.98 232.27,-224.53 240.26,-231.49 242.85,-224.98"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-313.36C122.75,-276.29 78.59,-181.63 61.79,-138.89"/>
-<polygon fill="#000000" stroke="#000000" points="65.02,-137.53 58.19,-129.43 58.48,-140.03 65.02,-137.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-285.48C281.72,-300.81 219.02,-324 198,-313.36"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-71.38C145.16,-80.13 115.94,-92.06 92.64,-101.58"/>
-<polygon fill="#000000" stroke="#000000" points="91.32,-98.34 83.38,-105.36 93.97,-104.82 91.32,-98.34"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M182.1,-318.45C156.7,-301.4 110.04,-270.08 80.59,-250.32"/>
+<polygon fill="#000000" stroke="#000000" points="82.3,-247.25 72.05,-244.58 78.4,-253.06 82.3,-247.25"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M471.61,-205.56C455.27,-217.08 429.58,-234.47 406,-247.36 399.89,-250.71 393.26,-253.99 386.74,-257.02"/>
-<polygon fill="#000000" stroke="#000000" points="385.01,-253.97 377.35,-261.29 387.9,-260.34 385.01,-253.97"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.7,-183.46C571.84,-179.39 556.17,-174.78 541.61,-170.5"/>
+<polygon fill="#000000" stroke="#000000" points="542.33,-167.06 531.75,-167.6 540.35,-173.78 542.33,-167.06"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge19" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C464.61,-277.61 437.58,-278.76 413.91,-277.96"/>
+<polygon fill="#000000" stroke="#000000" points="413.8,-274.45 403.65,-277.48 413.47,-281.44 413.8,-274.45"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.54,-181.34C366.43,-160.05 210.45,-117.89 198,-117.36"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.95,-281.24 443.54,-287.76 406,-292.47 357.49,-298.54 344.59,-297.83 296,-292.47 253.45,-287.77 244.65,-275.17 202,-271.47"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M578.57,-26.29C488.58,-6.16 290.1,26.04 142,-38.36 112.15,-51.34 85.52,-78.55 69.57,-97.38"/>
-<polygon fill="#000000" stroke="#000000" points="66.86,-95.16 63.22,-105.11 72.27,-99.61 66.86,-95.16"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-205.47C592.17,-209.95 582.03,-215.2 573,-220.36 553.67,-231.41 532.56,-245 516.53,-255.66"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-252.77 508.19,-261.24 518.45,-258.58 514.56,-252.77"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.32,-207.47C587.34,-225.6 538.44,-259.14 490.5,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.86,-280.89 442.95,-258.6 406,-250.47 358.81,-240.08 305.06,-230.14 264.59,-223.04"/>
+<polygon fill="#000000" stroke="#000000" points="265.05,-219.57 254.6,-221.29 263.85,-226.46 265.05,-219.57"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C412.11,-132.65 320.22,-138.83 260.53,-146.72"/>
-<polygon fill="#000000" stroke="#000000" points="259.93,-143.27 250.51,-148.1 260.89,-150.21 259.93,-143.27"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.96,-44.39C267.01,-50.55 231.37,-60.41 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-193.36C566.54,-193.36 556.76,-193.36 547.27,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-189.86 537.14,-193.36 547.14,-196.86 547.14,-189.86"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.72,-103.45C286.04,-88.09 223.02,-64.69 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.76,-181.29C558.75,-173.31 522.53,-162.65 490.5,-153.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C466.16,-146.89 461.07,-142.67 442,-129.36 424.2,-116.94 426.23,-104.23 406,-96.36 357.12,-77.35 340.1,-90.37 288,-96.36 247.2,-101.06 239.07,-117.23 198,-117.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-117.36C169.89,-117.02 141.08,-116.96 116.28,-117.01"/>
-<polygon fill="#000000" stroke="#000000" points="116.26,-113.51 106.27,-117.03 116.28,-120.51 116.26,-113.51"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.25,-127.54C313.65,-131.62 304.26,-136.43 296,-141.47 270.11,-157.26 242.67,-178.58 224.17,-193.72"/>
+<polygon fill="#000000" stroke="#000000" points="221.81,-191.14 216.33,-200.21 226.27,-196.53 221.81,-191.14"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.45,-23.44C519.34,-7.59 395.65,15.03 296,-14.47 248.25,-28.6 246.32,-52.75 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-75.47C137.62,-106.67 88.34,-176.31 66.4,-211.4"/>
+<polygon fill="#000000" stroke="#000000" points="63.18,-209.96 60.95,-220.32 69.15,-213.61 63.18,-209.96"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C461.57,-146.06 431.64,-138.34 406.34,-131.93"/>
-<polygon fill="#000000" stroke="#000000" points="407.08,-128.5 396.53,-129.44 405.37,-135.29 407.08,-128.5"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-87.47C433.64,-91.54 417.92,-96.15 403.3,-100.43"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-97.16 393.4,-103.33 403.98,-103.88 402.01,-97.16"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-129.37C286.15,-133.54 268.65,-138.27 252.49,-142.64"/>
-<polygon fill="#000000" stroke="#000000" points="251.37,-139.31 242.63,-145.3 253.2,-146.07 251.37,-139.31"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-75.47C284.39,-70.75 260.53,-45.46 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.69,-77.12C415.31,-77.64 381.78,-77.61 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.27,-118.43C265.84,-118.75 229.96,-118.71 198,-117.36"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_kick.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.77,-343.39C259.66,-337.16 226.02,-327.55 198,-313.36"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.29,-219.69C137.24,-221.06 126.64,-222.52 116.33,-223.93"/>
+<polygon fill="#000000" stroke="#000000" points="115.57,-220.5 106.14,-225.32 116.53,-227.43 115.57,-220.5"/>
 </g>
 </g>
 </svg>
@@ -720,46 +714,48 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-107"></a><span class="k">            call </span><span class="n">pl</span><span class="p">%</span><span class="n">set_beg_end</span><span class="p">(</span><span class="n">xend</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">)</span>
 <a name="ln-108"></a>         <span class="k">end if</span>
 <a name="ln-109"></a><span class="k">         do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span> 
-<a name="ln-110"></a>            <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">dt</span>
-<a name="ln-111"></a>         <span class="k">end do</span>
-<a name="ln-112"></a><span class="k">      end associate</span>
-<a name="ln-113"></a><span class="k">   </span>
-<a name="ln-114"></a><span class="k">      return</span>
-<a name="ln-115"></a><span class="k">   end subroutine </span><span class="n">helio_kick_vb_pl</span>
-<a name="ln-116"></a>
-<a name="ln-117"></a>
-<a name="ln-118"></a>   <span class="k">module subroutine </span><span class="n">helio_kick_vb_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-119"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-120"></a>      <span class="c">!!</span>
-<a name="ln-121"></a>      <span class="c">!! Kick barycentric velocities of bodies</span>
+<a name="ln-110"></a>            <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">dt</span>
+<a name="ln-111"></a>            <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">dt</span>
+<a name="ln-112"></a>            <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">dt</span>
+<a name="ln-113"></a>         <span class="k">end do</span>
+<a name="ln-114"></a><span class="k">      end associate</span>
+<a name="ln-115"></a><span class="k">   </span>
+<a name="ln-116"></a><span class="k">      return</span>
+<a name="ln-117"></a><span class="k">   end subroutine </span><span class="n">helio_kick_vb_pl</span>
+<a name="ln-118"></a>
+<a name="ln-119"></a>
+<a name="ln-120"></a>   <span class="k">module subroutine </span><span class="n">helio_kick_vb_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-121"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-122"></a>      <span class="c">!!</span>
-<a name="ln-123"></a>      <span class="c">!! Adapted from Martin Duncan and Hal Levison&#39;s Swift routine kickvh_tp.f</span>
-<a name="ln-124"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine helio_kick_vb_tp.f90</span>
-<a name="ln-125"></a>      <span class="k">implicit none</span>
-<a name="ln-126"></a>      <span class="c">! Arguments</span>
-<a name="ln-127"></a>      <span class="k">class</span><span class="p">(</span><span class="n">helio_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest generic body object</span>
-<a name="ln-128"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-129"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-130"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>     <span class="c">!! Current time</span>
-<a name="ln-131"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Stepsize</span>
-<a name="ln-132"></a>      <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>  <span class="c">!! Logical flag indicating whether this is the beginning of the half step or not. </span>
-<a name="ln-133"></a>      <span class="c">! Internals</span>
-<a name="ln-134"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
-<a name="ln-135"></a>
-<a name="ln-136"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-123"></a>      <span class="c">!! Kick barycentric velocities of bodies</span>
+<a name="ln-124"></a>      <span class="c">!!</span>
+<a name="ln-125"></a>      <span class="c">!! Adapted from Martin Duncan and Hal Levison&#39;s Swift routine kickvh_tp.f</span>
+<a name="ln-126"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine helio_kick_vb_tp.f90</span>
+<a name="ln-127"></a>      <span class="k">implicit none</span>
+<a name="ln-128"></a>      <span class="c">! Arguments</span>
+<a name="ln-129"></a>      <span class="k">class</span><span class="p">(</span><span class="n">helio_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest generic body object</span>
+<a name="ln-130"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-131"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-132"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>     <span class="c">!! Current time</span>
+<a name="ln-133"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Stepsize</span>
+<a name="ln-134"></a>      <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>  <span class="c">!! Logical flag indicating whether this is the beginning of the half step or not. </span>
+<a name="ln-135"></a>      <span class="c">! Internals</span>
+<a name="ln-136"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
 <a name="ln-137"></a>
-<a name="ln-138"></a><span class="k">      associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
-<a name="ln-139"></a>         <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-140"></a>         <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel</span><span class="p">(</span><span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-141"></a>         <span class="k">do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span> 
-<a name="ln-142"></a>            <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">dt</span>
-<a name="ln-143"></a>         <span class="k">end do</span>
-<a name="ln-144"></a><span class="k">      end associate</span>
-<a name="ln-145"></a><span class="k">   </span>
-<a name="ln-146"></a><span class="k">      return</span>
-<a name="ln-147"></a><span class="k">   end subroutine </span><span class="n">helio_kick_vb_tp</span>
-<a name="ln-148"></a>
-<a name="ln-149"></a><span class="k">end submodule </span><span class="n">s_helio_kick</span>
+<a name="ln-138"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-139"></a>
+<a name="ln-140"></a><span class="k">      associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
+<a name="ln-141"></a>         <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-142"></a>         <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel</span><span class="p">(</span><span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-143"></a>         <span class="k">do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span> 
+<a name="ln-144"></a>            <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">dt</span>
+<a name="ln-145"></a>         <span class="k">end do</span>
+<a name="ln-146"></a><span class="k">      end associate</span>
+<a name="ln-147"></a><span class="k">   </span>
+<a name="ln-148"></a><span class="k">      return</span>
+<a name="ln-149"></a><span class="k">   end subroutine </span><span class="n">helio_kick_vb_tp</span>
+<a name="ln-150"></a>
+<a name="ln-151"></a><span class="k">end submodule </span><span class="n">s_helio_kick</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/helio_setup.f90.html b/docs/sourcefile/helio_setup.f90.html
index 3e1dfce67..19f6f5990 100644
--- a/docs/sourcefile/helio_setup.f90.html
+++ b/docs/sourcefile/helio_setup.f90.html
@@ -226,297 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~helio_setup.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilehelio_setupf90EfferentGraph" width="641pt" height="262pt"
- viewBox="0.00 0.00 641.00 262.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 369.36)">
+<svg id="sourcefilehelio_setupf90EfferentGraph" width="641pt" height="252pt"
+ viewBox="0.00 0.00 641.00 252.40" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 355.51)">
 <title>sourcefile~~helio_setup.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-369.36 909,-369.36 909,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.51 909,-355.51 909,4 -4,4"/>
 <!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~helio_setup.f90</title>
-<polygon fill="none" stroke="black" points="905,-244.36 820,-244.36 820,-220.36 905,-220.36 905,-244.36"/>
-<text text-anchor="middle" x="862.5" y="-229.96" font-family="Helvetica,sans-Serif" font-size="10.50">helio_setup.f90</text>
+<polygon fill="none" stroke="black" points="905,-147.47 820,-147.47 820,-123.47 905,-123.47 905,-147.47"/>
+<text text-anchor="middle" x="862.5" y="-133.07" font-family="Helvetica,sans-Serif" font-size="10.50">helio_setup.f90</text>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~helio_classes.f90</title>
 <g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-285.36 442.5,-285.36 442.5,-261.36 536.5,-261.36 536.5,-285.36"/>
-<text text-anchor="middle" x="489.5" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-167.47 442.5,-167.47 442.5,-143.47 536.5,-143.47 536.5,-167.47"/>
+<text text-anchor="middle" x="489.5" y="-153.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.66,-236.99C752.79,-244.38 621.72,-258.86 546.73,-267.15"/>
-<polygon fill="#000000" stroke="#000000" points="546.08,-263.7 536.53,-268.28 546.85,-270.66 546.08,-263.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.66,-137.72C752.79,-141.33 621.72,-148.39 546.73,-152.44"/>
+<polygon fill="#000000" stroke="#000000" points="546.32,-148.95 536.53,-152.98 546.7,-155.94 546.32,-148.95"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-205.36 718,-205.36 718,-181.36 784,-181.36 784,-205.36"/>
-<text text-anchor="middle" x="751" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-127.47 718,-127.47 718,-103.47 784,-103.47 784,-127.47"/>
+<text text-anchor="middle" x="751" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M827.75,-220.35C817.06,-216.54 805.11,-212.28 793.91,-208.29"/>
-<polygon fill="#000000" stroke="#000000" points="794.92,-204.94 784.32,-204.88 792.57,-211.53 794.92,-204.94"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-169.36 143.5,-169.36 143.5,-145.36 250.5,-145.36 250.5,-169.36"/>
-<text text-anchor="middle" x="197" y="-154.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.02,-261.36C416.3,-253.71 379.94,-243.39 348,-233.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-127.85C811.37,-126.31 802.51,-124.69 794.08,-123.15"/>
+<polygon fill="#000000" stroke="#000000" points="794.52,-119.67 784.06,-121.32 793.26,-126.56 794.52,-119.67"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-285.36 300,-285.36 300,-261.36 394,-261.36 394,-285.36"/>
-<text text-anchor="middle" x="347" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-127.47 304,-127.47 304,-103.47 398,-103.47 398,-127.47"/>
+<text text-anchor="middle" x="351" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-273.36C430.24,-273.36 416.87,-273.36 404.14,-273.36"/>
-<polygon fill="#000000" stroke="#000000" points="404.11,-269.86 394.11,-273.36 404.11,-276.86 404.11,-269.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-143.46C433.64,-139.39 417.92,-134.78 403.3,-130.5"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-127.05 393.4,-127.6 402.01,-133.77 403.98,-127.05"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-129.36 0,-129.36 0,-105.36 106,-105.36 106,-129.36"/>
-<text text-anchor="middle" x="53" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.47 0,-244.47 0,-220.47 106,-220.47 106,-244.47"/>
+<text text-anchor="middle" x="53" y="-230.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge5" class="edge">
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-313.36C280.38,-317.95 256.69,-343.07 198,-313.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.54,-285.44C431.57,-296.17 387.72,-310.59 348,-313.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C278.76,-214.75 276.07,-277.9 202,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-271.47C164.11,-268.35 124.72,-257.35 95.91,-247.83"/>
+<polygon fill="#000000" stroke="#000000" points="96.77,-244.43 86.18,-244.54 94.53,-251.06 96.77,-244.43"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-224.47 147.5,-224.47 147.5,-200.47 254.5,-200.47 254.5,-224.47"/>
+<text text-anchor="middle" x="201" y="-210.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C322.6,-201.65 291.31,-206.31 264.58,-208.96"/>
+<polygon fill="#000000" stroke="#000000" points="264.21,-205.48 254.57,-209.88 264.85,-212.45 264.21,-205.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M443.5,-167.54C416.83,-174.81 382.41,-184.38 352,-193.47"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge12" class="edge">
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C596.91,-241.25 564.16,-250.59 538.22,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.18,-255.06 528.63,-261.31 539.21,-261.76 537.18,-255.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C589.99,-112.83 550,-126.76 522.89,-138.9"/>
+<polygon fill="#000000" stroke="#000000" points="521.11,-135.86 513.52,-143.25 524.06,-142.21 521.11,-135.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-283.47 298.5,-283.47 298.5,-259.47 403.5,-259.47 403.5,-283.47"/>
+<text text-anchor="middle" x="351" y="-269.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C566.22,-248.39 407.05,-251.9 348,-233.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-233.36C301.78,-218.48 254.45,-192.12 225.53,-174.7"/>
-<polygon fill="#000000" stroke="#000000" points="227.17,-171.6 216.81,-169.38 223.53,-177.58 227.17,-171.6"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.54,-127.73C721.08,-178.39 623.91,-367.89 490.5,-349.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C440.86,-353.14 394.55,-315.31 370.02,-291.03"/>
+<polygon fill="#000000" stroke="#000000" points="372.34,-288.4 362.85,-283.69 367.34,-293.29 372.34,-288.4"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-342.47 142,-342.47 142,-318.47 260,-318.47 260,-342.47"/>
+<text text-anchor="middle" x="201" y="-328.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C469.29,-318.47 420.92,-302.33 386.31,-289.04"/>
-<polygon fill="#000000" stroke="#000000" points="387.54,-285.76 376.95,-285.39 384.99,-292.28 387.54,-285.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C579.86,-245.22 579.27,-271.86 537,-294.36 517.29,-304.86 512.08,-307.63 490.5,-313.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C413.95,-355.21 328.41,-347.7 270.34,-340.5"/>
+<polygon fill="#000000" stroke="#000000" points="270.55,-336.99 260.19,-339.2 269.67,-343.94 270.55,-336.99"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-71.36 142,-71.36 142,-47.36 252,-47.36 252,-71.36"/>
-<text text-anchor="middle" x="197" y="-56.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-207.47 576,-207.47 576,-183.47 679,-183.47 679,-207.47"/>
+<text text-anchor="middle" x="627.5" y="-193.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M721.11,-181.24C673.9,-162.21 576.83,-126.39 490.5,-115.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C450.37,-105.72 444.18,-92.81 406,-83.36 358.57,-71.63 303.6,-65.61 262.09,-62.53"/>
-<polygon fill="#000000" stroke="#000000" points="262.33,-59.03 252.11,-61.82 261.84,-66.02 262.33,-59.03"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-127.62C711.27,-140.97 678.51,-162.54 655.38,-177.77"/>
+<polygon fill="#000000" stroke="#000000" points="653.16,-175.04 646.73,-183.46 657.01,-180.89 653.16,-175.04"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-205.36 442,-205.36 442,-181.36 537,-181.36 537,-205.36"/>
-<text text-anchor="middle" x="489.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-47.47 296,-47.47 296,-23.47 406,-23.47 406,-47.47"/>
+<text text-anchor="middle" x="351" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C607.75,-238.73 561.31,-222.53 527.91,-209.22"/>
-<polygon fill="#000000" stroke="#000000" points="529.02,-205.89 518.44,-205.38 526.39,-212.38 529.02,-205.89"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M719.51,-205.49C695.22,-214.7 660.16,-227 628.5,-234.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-116.72C693.45,-117.38 658.8,-117.65 628.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C578.49,-112 582.21,-70.99 537,-54.47 498.47,-40.39 452.62,-35.6 416.2,-34.36"/>
+<polygon fill="#000000" stroke="#000000" points="416.28,-30.86 406.19,-34.09 416.1,-37.86 416.28,-30.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C428.15,-329.42 410.29,-309.01 348,-313.36"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C462.17,-115.47 432.97,-115.47 408.37,-115.47"/>
+<polygon fill="#000000" stroke="#000000" points="408.12,-111.97 398.12,-115.47 408.12,-118.97 408.12,-111.97"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-50.36 573,-50.36 573,-26.36 682,-26.36 682,-50.36"/>
-<text text-anchor="middle" x="627.5" y="-35.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-47.47 573,-47.47 573,-23.47 682,-23.47 682,-47.47"/>
+<text text-anchor="middle" x="627.5" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.45,-181.26C728.8,-163.48 704.21,-129.38 682,-101.36 670.41,-86.75 656.8,-70.73 646.2,-58.5"/>
-<polygon fill="#000000" stroke="#000000" points="648.62,-55.95 639.41,-50.71 643.34,-60.55 648.62,-55.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-103.32C711.27,-89.96 678.51,-68.39 655.38,-53.16"/>
+<polygon fill="#000000" stroke="#000000" points="657.01,-50.04 646.73,-47.47 653.16,-55.89 657.01,-50.04"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-205.36 576,-205.36 576,-181.36 679,-181.36 679,-205.36"/>
-<text text-anchor="middle" x="627.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-193.36C708.99,-193.36 699.2,-193.36 689.41,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-189.86 679.24,-193.36 689.24,-196.86 689.24,-189.86"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C566.18,-111.66 550.94,-115.39 490.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C425.28,-115.54 415.06,-80 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-129.36 294.5,-129.36 294.5,-105.36 399.5,-105.36 399.5,-129.36"/>
-<text text-anchor="middle" x="347" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C462.88,-112.09 434.42,-111.87 409.85,-112.73"/>
-<polygon fill="#000000" stroke="#000000" points="409.42,-109.25 399.58,-113.16 409.72,-116.24 409.42,-109.25"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-365.36 288,-365.36 288,-341.36 406,-341.36 406,-365.36"/>
-<text text-anchor="middle" x="347" y="-350.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~helio_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-87.47 442,-87.47 442,-63.47 537,-63.47 537,-87.47"/>
+<text text-anchor="middle" x="489.5" y="-73.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C458.62,-321.31 425.33,-330.76 398.66,-338.48"/>
-<polygon fill="#000000" stroke="#000000" points="397.41,-335.2 388.78,-341.35 399.36,-341.92 397.41,-335.2"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C592.18,-112.99 554.77,-101.29 527.9,-91.17"/>
+<polygon fill="#000000" stroke="#000000" points="529.08,-87.88 518.5,-87.54 526.56,-94.41 529.08,-87.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C463.43,-115.47 316.4,-169.42 243.26,-196.85"/>
+<polygon fill="#000000" stroke="#000000" points="242.01,-193.58 233.88,-200.38 244.47,-200.14 242.01,-193.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-145.36C138.79,-141.25 122.26,-136.59 106.93,-132.27"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-128.84 97.07,-129.5 105.74,-135.58 107.64,-128.84"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.19,-273.66C269.75,-274.31 233.87,-274.24 202,-271.47"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.58,-261.32C304.92,-257.45 295.81,-252.75 288,-247.36 258.87,-227.29 230.97,-197.11 214.16,-177.33"/>
-<polygon fill="#000000" stroke="#000000" points="216.75,-174.98 207.66,-169.55 211.38,-179.47 216.75,-174.98"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.69,-259.38C297.15,-250.4 266.17,-238.05 241.65,-228.27"/>
+<polygon fill="#000000" stroke="#000000" points="242.85,-224.98 232.27,-224.53 240.26,-231.49 242.85,-224.98"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-313.36C122.75,-276.29 78.59,-181.63 61.79,-138.89"/>
-<polygon fill="#000000" stroke="#000000" points="65.02,-137.53 58.19,-129.43 58.48,-140.03 65.02,-137.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-285.48C281.72,-300.81 219.02,-324 198,-313.36"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-71.38C145.16,-80.13 115.94,-92.06 92.64,-101.58"/>
-<polygon fill="#000000" stroke="#000000" points="91.32,-98.34 83.38,-105.36 93.97,-104.82 91.32,-98.34"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M182.1,-318.45C156.7,-301.4 110.04,-270.08 80.59,-250.32"/>
+<polygon fill="#000000" stroke="#000000" points="82.3,-247.25 72.05,-244.58 78.4,-253.06 82.3,-247.25"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M471.61,-205.56C455.27,-217.08 429.58,-234.47 406,-247.36 399.89,-250.71 393.26,-253.99 386.74,-257.02"/>
-<polygon fill="#000000" stroke="#000000" points="385.01,-253.97 377.35,-261.29 387.9,-260.34 385.01,-253.97"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.7,-183.46C571.84,-179.39 556.17,-174.78 541.61,-170.5"/>
+<polygon fill="#000000" stroke="#000000" points="542.33,-167.06 531.75,-167.6 540.35,-173.78 542.33,-167.06"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge19" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C464.61,-277.61 437.58,-278.76 413.91,-277.96"/>
+<polygon fill="#000000" stroke="#000000" points="413.8,-274.45 403.65,-277.48 413.47,-281.44 413.8,-274.45"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.54,-181.34C366.43,-160.05 210.45,-117.89 198,-117.36"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.95,-281.24 443.54,-287.76 406,-292.47 357.49,-298.54 344.59,-297.83 296,-292.47 253.45,-287.77 244.65,-275.17 202,-271.47"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M578.57,-26.29C488.58,-6.16 290.1,26.04 142,-38.36 112.15,-51.34 85.52,-78.55 69.57,-97.38"/>
-<polygon fill="#000000" stroke="#000000" points="66.86,-95.16 63.22,-105.11 72.27,-99.61 66.86,-95.16"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-205.47C592.17,-209.95 582.03,-215.2 573,-220.36 553.67,-231.41 532.56,-245 516.53,-255.66"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-252.77 508.19,-261.24 518.45,-258.58 514.56,-252.77"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.32,-207.47C587.34,-225.6 538.44,-259.14 490.5,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.86,-280.89 442.95,-258.6 406,-250.47 358.81,-240.08 305.06,-230.14 264.59,-223.04"/>
+<polygon fill="#000000" stroke="#000000" points="265.05,-219.57 254.6,-221.29 263.85,-226.46 265.05,-219.57"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C412.11,-132.65 320.22,-138.83 260.53,-146.72"/>
-<polygon fill="#000000" stroke="#000000" points="259.93,-143.27 250.51,-148.1 260.89,-150.21 259.93,-143.27"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.96,-44.39C267.01,-50.55 231.37,-60.41 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-193.36C566.54,-193.36 556.76,-193.36 547.27,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-189.86 537.14,-193.36 547.14,-196.86 547.14,-189.86"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.72,-103.45C286.04,-88.09 223.02,-64.69 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.76,-181.29C558.75,-173.31 522.53,-162.65 490.5,-153.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C466.16,-146.89 461.07,-142.67 442,-129.36 424.2,-116.94 426.23,-104.23 406,-96.36 357.12,-77.35 340.1,-90.37 288,-96.36 247.2,-101.06 239.07,-117.23 198,-117.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-117.36C169.89,-117.02 141.08,-116.96 116.28,-117.01"/>
-<polygon fill="#000000" stroke="#000000" points="116.26,-113.51 106.27,-117.03 116.28,-120.51 116.26,-113.51"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.25,-127.54C313.65,-131.62 304.26,-136.43 296,-141.47 270.11,-157.26 242.67,-178.58 224.17,-193.72"/>
+<polygon fill="#000000" stroke="#000000" points="221.81,-191.14 216.33,-200.21 226.27,-196.53 221.81,-191.14"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.45,-23.44C519.34,-7.59 395.65,15.03 296,-14.47 248.25,-28.6 246.32,-52.75 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-75.47C137.62,-106.67 88.34,-176.31 66.4,-211.4"/>
+<polygon fill="#000000" stroke="#000000" points="63.18,-209.96 60.95,-220.32 69.15,-213.61 63.18,-209.96"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C461.57,-146.06 431.64,-138.34 406.34,-131.93"/>
-<polygon fill="#000000" stroke="#000000" points="407.08,-128.5 396.53,-129.44 405.37,-135.29 407.08,-128.5"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-87.47C433.64,-91.54 417.92,-96.15 403.3,-100.43"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-97.16 393.4,-103.33 403.98,-103.88 402.01,-97.16"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-129.37C286.15,-133.54 268.65,-138.27 252.49,-142.64"/>
-<polygon fill="#000000" stroke="#000000" points="251.37,-139.31 242.63,-145.3 253.2,-146.07 251.37,-139.31"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-75.47C284.39,-70.75 260.53,-45.46 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.69,-77.12C415.31,-77.64 381.78,-77.61 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.27,-118.43C265.84,-118.75 229.96,-118.71 198,-117.36"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_setup.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.77,-343.39C259.66,-337.16 226.02,-327.55 198,-313.36"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.29,-219.69C137.24,-221.06 126.64,-222.52 116.33,-223.93"/>
+<polygon fill="#000000" stroke="#000000" points="115.57,-220.5 106.14,-225.32 116.53,-227.43 115.57,-220.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/helio_step.f90.html b/docs/sourcefile/helio_step.f90.html
index 4534208b7..8e835b9f4 100644
--- a/docs/sourcefile/helio_step.f90.html
+++ b/docs/sourcefile/helio_step.f90.html
@@ -226,297 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~helio_step.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilehelio_stepf90EfferentGraph" width="641pt" height="264pt"
- viewBox="0.00 0.00 641.00 263.87" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~helio_step.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 369.36)">
+<svg id="sourcefilehelio_stepf90EfferentGraph" width="641pt" height="254pt"
+ viewBox="0.00 0.00 641.00 254.07" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~helio_step.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 355.51)">
 <title>sourcefile~~helio_step.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-369.36 903,-369.36 903,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.51 903,-355.51 903,4 -4,4"/>
 <!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~helio_step.f90</title>
-<polygon fill="none" stroke="black" points="899,-244.36 820,-244.36 820,-220.36 899,-220.36 899,-244.36"/>
-<text text-anchor="middle" x="859.5" y="-229.96" font-family="Helvetica,sans-Serif" font-size="10.50">helio_step.f90</text>
+<polygon fill="none" stroke="black" points="899,-147.47 820,-147.47 820,-123.47 899,-123.47 899,-147.47"/>
+<text text-anchor="middle" x="859.5" y="-133.07" font-family="Helvetica,sans-Serif" font-size="10.50">helio_step.f90</text>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~helio_classes.f90</title>
 <g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-285.36 442.5,-285.36 442.5,-261.36 536.5,-261.36 536.5,-285.36"/>
-<text text-anchor="middle" x="489.5" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-167.47 442.5,-167.47 442.5,-143.47 536.5,-143.47 536.5,-167.47"/>
+<text text-anchor="middle" x="489.5" y="-153.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.81,-236.67C754.6,-243.94 622.53,-258.65 546.96,-267.07"/>
-<polygon fill="#000000" stroke="#000000" points="546.24,-263.63 536.69,-268.22 547.01,-270.59 546.24,-263.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.81,-137.57C754.6,-141.11 622.53,-148.29 546.96,-152.4"/>
+<polygon fill="#000000" stroke="#000000" points="546.48,-148.92 536.69,-152.96 546.86,-155.91 546.48,-148.92"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-205.36 718,-205.36 718,-181.36 784,-181.36 784,-205.36"/>
-<text text-anchor="middle" x="751" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-127.47 718,-127.47 718,-103.47 784,-103.47 784,-127.47"/>
+<text text-anchor="middle" x="751" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.68,-220.35C815.57,-216.64 804.31,-212.52 793.69,-208.63"/>
-<polygon fill="#000000" stroke="#000000" points="794.76,-205.3 784.17,-205.14 792.35,-211.87 794.76,-205.3"/>
-</g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-169.36 143.5,-169.36 143.5,-145.36 250.5,-145.36 250.5,-169.36"/>
-<text text-anchor="middle" x="197" y="-154.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.02,-261.36C416.3,-253.71 379.94,-243.39 348,-233.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.75,-128.19C811.46,-126.63 802.67,-124.98 794.26,-123.4"/>
+<polygon fill="#000000" stroke="#000000" points="794.72,-119.93 784.24,-121.52 793.43,-126.81 794.72,-119.93"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-285.36 300,-285.36 300,-261.36 394,-261.36 394,-285.36"/>
-<text text-anchor="middle" x="347" y="-270.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-127.47 304,-127.47 304,-103.47 398,-103.47 398,-127.47"/>
+<text text-anchor="middle" x="351" y="-113.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-273.36C430.24,-273.36 416.87,-273.36 404.14,-273.36"/>
-<polygon fill="#000000" stroke="#000000" points="404.11,-269.86 394.11,-273.36 404.11,-276.86 404.11,-269.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-143.46C433.64,-139.39 417.92,-134.78 403.3,-130.5"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-127.05 393.4,-127.6 402.01,-133.77 403.98,-127.05"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-129.36 0,-129.36 0,-105.36 106,-105.36 106,-129.36"/>
-<text text-anchor="middle" x="53" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-244.47 0,-244.47 0,-220.47 106,-220.47 106,-244.47"/>
+<text text-anchor="middle" x="53" y="-230.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge5" class="edge">
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-313.36C280.38,-317.95 256.69,-343.07 198,-313.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.54,-285.44C431.57,-296.17 387.72,-310.59 348,-313.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C278.76,-214.75 276.07,-277.9 202,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-271.47C164.11,-268.35 124.72,-257.35 95.91,-247.83"/>
+<polygon fill="#000000" stroke="#000000" points="96.77,-244.43 86.18,-244.54 94.53,-251.06 96.77,-244.43"/>
+</g>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-224.47 147.5,-224.47 147.5,-200.47 254.5,-200.47 254.5,-224.47"/>
+<text text-anchor="middle" x="201" y="-210.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-193.47C322.6,-201.65 291.31,-206.31 264.58,-208.96"/>
+<polygon fill="#000000" stroke="#000000" points="264.21,-205.48 254.57,-209.88 264.85,-212.45 264.21,-205.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M443.5,-167.54C416.83,-174.81 382.41,-184.38 352,-193.47"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge12" class="edge">
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C596.91,-241.25 564.16,-250.59 538.22,-258.4"/>
-<polygon fill="#000000" stroke="#000000" points="537.18,-255.06 528.63,-261.31 539.21,-261.76 537.18,-255.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C589.99,-112.83 550,-126.76 522.89,-138.9"/>
+<polygon fill="#000000" stroke="#000000" points="521.11,-135.86 513.52,-143.25 524.06,-142.21 521.11,-135.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-283.47 298.5,-283.47 298.5,-259.47 403.5,-259.47 403.5,-283.47"/>
+<text text-anchor="middle" x="351" y="-269.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C566.22,-248.39 407.05,-251.9 348,-233.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-233.36C301.78,-218.48 254.45,-192.12 225.53,-174.7"/>
-<polygon fill="#000000" stroke="#000000" points="227.17,-171.6 216.81,-169.38 223.53,-177.58 227.17,-171.6"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.54,-127.73C721.08,-178.39 623.91,-367.89 490.5,-349.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C440.86,-353.14 394.55,-315.31 370.02,-291.03"/>
+<polygon fill="#000000" stroke="#000000" points="372.34,-288.4 362.85,-283.69 367.34,-293.29 372.34,-288.4"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-342.47 142,-342.47 142,-318.47 260,-318.47 260,-342.47"/>
+<text text-anchor="middle" x="201" y="-328.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C469.29,-318.47 420.92,-302.33 386.31,-289.04"/>
-<polygon fill="#000000" stroke="#000000" points="387.54,-285.76 376.95,-285.39 384.99,-292.28 387.54,-285.76"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C579.86,-245.22 579.27,-271.86 537,-294.36 517.29,-304.86 512.08,-307.63 490.5,-313.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-349.47C413.95,-355.21 328.41,-347.7 270.34,-340.5"/>
+<polygon fill="#000000" stroke="#000000" points="270.55,-336.99 260.19,-339.2 269.67,-343.94 270.55,-336.99"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-71.36 142,-71.36 142,-47.36 252,-47.36 252,-71.36"/>
-<text text-anchor="middle" x="197" y="-56.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-207.47 576,-207.47 576,-183.47 679,-183.47 679,-207.47"/>
+<text text-anchor="middle" x="627.5" y="-193.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M721.11,-181.24C673.9,-162.21 576.83,-126.39 490.5,-115.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C450.37,-105.72 444.18,-92.81 406,-83.36 358.57,-71.63 303.6,-65.61 262.09,-62.53"/>
-<polygon fill="#000000" stroke="#000000" points="262.33,-59.03 252.11,-61.82 261.84,-66.02 262.33,-59.03"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-127.62C711.27,-140.97 678.51,-162.54 655.38,-177.77"/>
+<polygon fill="#000000" stroke="#000000" points="653.16,-175.04 646.73,-183.46 657.01,-180.89 653.16,-175.04"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-205.36 442,-205.36 442,-181.36 537,-181.36 537,-205.36"/>
-<text text-anchor="middle" x="489.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-47.47 296,-47.47 296,-23.47 406,-23.47 406,-47.47"/>
+<text text-anchor="middle" x="351" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-234.36C607.75,-238.73 561.31,-222.53 527.91,-209.22"/>
-<polygon fill="#000000" stroke="#000000" points="529.02,-205.89 518.44,-205.38 526.39,-212.38 529.02,-205.89"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M719.51,-205.49C695.22,-214.7 660.16,-227 628.5,-234.36"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-116.72C693.45,-117.38 658.8,-117.65 628.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C578.49,-112 582.21,-70.99 537,-54.47 498.47,-40.39 452.62,-35.6 416.2,-34.36"/>
+<polygon fill="#000000" stroke="#000000" points="416.28,-30.86 406.19,-34.09 416.1,-37.86 416.28,-30.86"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C428.15,-329.42 410.29,-309.01 348,-313.36"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C462.17,-115.47 432.97,-115.47 408.37,-115.47"/>
+<polygon fill="#000000" stroke="#000000" points="408.12,-111.97 398.12,-115.47 408.12,-118.97 408.12,-111.97"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-50.36 573,-50.36 573,-26.36 682,-26.36 682,-50.36"/>
-<text text-anchor="middle" x="627.5" y="-35.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-47.47 573,-47.47 573,-23.47 682,-23.47 682,-47.47"/>
+<text text-anchor="middle" x="627.5" y="-33.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.45,-181.26C728.8,-163.48 704.21,-129.38 682,-101.36 670.41,-86.75 656.8,-70.73 646.2,-58.5"/>
-<polygon fill="#000000" stroke="#000000" points="648.62,-55.95 639.41,-50.71 643.34,-60.55 648.62,-55.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-103.32C711.27,-89.96 678.51,-68.39 655.38,-53.16"/>
+<polygon fill="#000000" stroke="#000000" points="657.01,-50.04 646.73,-47.47 653.16,-55.89 657.01,-50.04"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-205.36 576,-205.36 576,-181.36 679,-181.36 679,-205.36"/>
-<text text-anchor="middle" x="627.5" y="-190.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-193.36C708.99,-193.36 699.2,-193.36 689.41,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-189.86 679.24,-193.36 689.24,-196.86 689.24,-189.86"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C566.18,-111.66 550.94,-115.39 490.5,-115.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C425.28,-115.54 415.06,-80 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-129.36 294.5,-129.36 294.5,-105.36 399.5,-105.36 399.5,-129.36"/>
-<text text-anchor="middle" x="347" y="-114.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.36C462.88,-112.09 434.42,-111.87 409.85,-112.73"/>
-<polygon fill="#000000" stroke="#000000" points="409.42,-109.25 399.58,-113.16 409.72,-116.24 409.42,-109.25"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-365.36 288,-365.36 288,-341.36 406,-341.36 406,-365.36"/>
-<text text-anchor="middle" x="347" y="-350.96" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~helio_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-87.47 442,-87.47 442,-63.47 537,-63.47 537,-87.47"/>
+<text text-anchor="middle" x="489.5" y="-73.07" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-313.36C458.62,-321.31 425.33,-330.76 398.66,-338.48"/>
-<polygon fill="#000000" stroke="#000000" points="397.41,-335.2 388.78,-341.35 399.36,-341.92 397.41,-335.2"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-115.47C592.18,-112.99 554.77,-101.29 527.9,-91.17"/>
+<polygon fill="#000000" stroke="#000000" points="529.08,-87.88 518.5,-87.54 526.56,-94.41 529.08,-87.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-115.47C463.43,-115.47 316.4,-169.42 243.26,-196.85"/>
+<polygon fill="#000000" stroke="#000000" points="242.01,-193.58 233.88,-200.38 244.47,-200.14 242.01,-193.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-145.36C138.79,-141.25 122.26,-136.59 106.93,-132.27"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-128.84 97.07,-129.5 105.74,-135.58 107.64,-128.84"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.19,-273.66C269.75,-274.31 233.87,-274.24 202,-271.47"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.58,-261.32C304.92,-257.45 295.81,-252.75 288,-247.36 258.87,-227.29 230.97,-197.11 214.16,-177.33"/>
-<polygon fill="#000000" stroke="#000000" points="216.75,-174.98 207.66,-169.55 211.38,-179.47 216.75,-174.98"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.69,-259.38C297.15,-250.4 266.17,-238.05 241.65,-228.27"/>
+<polygon fill="#000000" stroke="#000000" points="242.85,-224.98 232.27,-224.53 240.26,-231.49 242.85,-224.98"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-313.36C122.75,-276.29 78.59,-181.63 61.79,-138.89"/>
-<polygon fill="#000000" stroke="#000000" points="65.02,-137.53 58.19,-129.43 58.48,-140.03 65.02,-137.53"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-285.48C281.72,-300.81 219.02,-324 198,-313.36"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-71.38C145.16,-80.13 115.94,-92.06 92.64,-101.58"/>
-<polygon fill="#000000" stroke="#000000" points="91.32,-98.34 83.38,-105.36 93.97,-104.82 91.32,-98.34"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M182.1,-318.45C156.7,-301.4 110.04,-270.08 80.59,-250.32"/>
+<polygon fill="#000000" stroke="#000000" points="82.3,-247.25 72.05,-244.58 78.4,-253.06 82.3,-247.25"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M471.61,-205.56C455.27,-217.08 429.58,-234.47 406,-247.36 399.89,-250.71 393.26,-253.99 386.74,-257.02"/>
-<polygon fill="#000000" stroke="#000000" points="385.01,-253.97 377.35,-261.29 387.9,-260.34 385.01,-253.97"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.7,-183.46C571.84,-179.39 556.17,-174.78 541.61,-170.5"/>
+<polygon fill="#000000" stroke="#000000" points="542.33,-167.06 531.75,-167.6 540.35,-173.78 542.33,-167.06"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge19" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C464.61,-277.61 437.58,-278.76 413.91,-277.96"/>
+<polygon fill="#000000" stroke="#000000" points="413.8,-274.45 403.65,-277.48 413.47,-281.44 413.8,-274.45"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.54,-181.34C366.43,-160.05 210.45,-117.89 198,-117.36"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.95,-281.24 443.54,-287.76 406,-292.47 357.49,-298.54 344.59,-297.83 296,-292.47 253.45,-287.77 244.65,-275.17 202,-271.47"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M578.57,-26.29C488.58,-6.16 290.1,26.04 142,-38.36 112.15,-51.34 85.52,-78.55 69.57,-97.38"/>
-<polygon fill="#000000" stroke="#000000" points="66.86,-95.16 63.22,-105.11 72.27,-99.61 66.86,-95.16"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-205.47C592.17,-209.95 582.03,-215.2 573,-220.36 553.67,-231.41 532.56,-245 516.53,-255.66"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-252.77 508.19,-261.24 518.45,-258.58 514.56,-252.77"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.32,-207.47C587.34,-225.6 538.44,-259.14 490.5,-271.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-271.47C451.86,-280.89 442.95,-258.6 406,-250.47 358.81,-240.08 305.06,-230.14 264.59,-223.04"/>
+<polygon fill="#000000" stroke="#000000" points="265.05,-219.57 254.6,-221.29 263.85,-226.46 265.05,-219.57"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C412.11,-132.65 320.22,-138.83 260.53,-146.72"/>
-<polygon fill="#000000" stroke="#000000" points="259.93,-143.27 250.51,-148.1 260.89,-150.21 259.93,-143.27"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.96,-44.39C267.01,-50.55 231.37,-60.41 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-193.36C566.54,-193.36 556.76,-193.36 547.27,-193.36"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-189.86 537.14,-193.36 547.14,-196.86 547.14,-189.86"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.72,-103.45C286.04,-88.09 223.02,-64.69 202,-75.47"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.76,-181.29C558.75,-173.31 522.53,-162.65 490.5,-153.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C466.16,-146.89 461.07,-142.67 442,-129.36 424.2,-116.94 426.23,-104.23 406,-96.36 357.12,-77.35 340.1,-90.37 288,-96.36 247.2,-101.06 239.07,-117.23 198,-117.36"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-117.36C169.89,-117.02 141.08,-116.96 116.28,-117.01"/>
-<polygon fill="#000000" stroke="#000000" points="116.26,-113.51 106.27,-117.03 116.28,-120.51 116.26,-113.51"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.25,-127.54C313.65,-131.62 304.26,-136.43 296,-141.47 270.11,-157.26 242.67,-178.58 224.17,-193.72"/>
+<polygon fill="#000000" stroke="#000000" points="221.81,-191.14 216.33,-200.21 226.27,-196.53 221.81,-191.14"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.45,-23.44C519.34,-7.59 395.65,15.03 296,-14.47 248.25,-28.6 246.32,-52.75 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-75.47C137.62,-106.67 88.34,-176.31 66.4,-211.4"/>
+<polygon fill="#000000" stroke="#000000" points="63.18,-209.96 60.95,-220.32 69.15,-213.61 63.18,-209.96"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-153.36C461.57,-146.06 431.64,-138.34 406.34,-131.93"/>
-<polygon fill="#000000" stroke="#000000" points="407.08,-128.5 396.53,-129.44 405.37,-135.29 407.08,-128.5"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-87.47C433.64,-91.54 417.92,-96.15 403.3,-100.43"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-97.16 393.4,-103.33 403.98,-103.88 402.01,-97.16"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-129.37C286.15,-133.54 268.65,-138.27 252.49,-142.64"/>
-<polygon fill="#000000" stroke="#000000" points="251.37,-139.31 242.63,-145.3 253.2,-146.07 251.37,-139.31"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-75.47C284.39,-70.75 260.53,-45.46 202,-75.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.69,-77.12C415.31,-77.64 381.78,-77.61 352,-75.47"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~helio_step.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.27,-118.43C265.84,-118.75 229.96,-118.71 198,-117.36"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~helio_step.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.77,-343.39C259.66,-337.16 226.02,-327.55 198,-313.36"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.29,-219.69C137.24,-221.06 126.64,-222.52 116.33,-223.93"/>
+<polygon fill="#000000" stroke="#000000" points="115.57,-220.5 106.14,-225.32 116.53,-227.43 115.57,-220.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/io.f90.html b/docs/sourcefile/io.f90.html
index b1b7235f6..df8105575 100644
--- a/docs/sourcefile/io.f90.html
+++ b/docs/sourcefile/io.f90.html
@@ -134,7 +134,7 @@ <h1>io.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title="10.0% of total for source files.">1628 statements</a>
+    title=" 9.9% of total for source files.">1628 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~io.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileiof90EfferentGraph" width="641pt" height="302pt"
- viewBox="0.00 0.00 641.00 302.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~io.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 412.12)">
+<svg id="sourcefileiof90EfferentGraph" width="641pt" height="249pt"
+ viewBox="0.00 0.00 641.00 249.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~io.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 339.24)">
 <title>sourcefile~~io.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 878,-412.12 878,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 878,-339.24 878,4 -4,4"/>
 <!-- sourcefile~io.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~io.f90</title>
-<polygon fill="none" stroke="black" points="874,-133.12 820,-133.12 820,-109.12 874,-109.12 874,-133.12"/>
-<text text-anchor="middle" x="847" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">io.f90</text>
+<polygon fill="none" stroke="black" points="874,-235.24 820,-235.24 820,-211.24 874,-211.24 874,-235.24"/>
+<text text-anchor="middle" x="847" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">io.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~io.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~io.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.44,-109.09C789.3,-87.43 705.41,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-235.38C779.49,-252.91 699.44,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~io.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~io.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.09,-133.4C818.2,-149.8 789.87,-179.03 771.01,-198.5"/>
-<polygon fill="#000000" stroke="#000000" points="768.25,-196.32 763.81,-205.93 773.28,-201.19 768.25,-196.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.82,-212.1C810.51,-208.14 799.84,-203.6 789.77,-199.31"/>
+<polygon fill="#000000" stroke="#000000" points="790.92,-196 780.35,-195.3 788.18,-202.44 790.92,-196"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~io.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~io.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~io.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~io.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~io.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~io.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~io.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~io.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~io.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -1816,15 +1808,15 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-1202"></a>                  <span class="k">else</span>
 <a name="ln-1203"></a><span class="k">                     read</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="o">*</span><span class="p">,</span> <span class="n">err</span> <span class="o">=</span> <span class="mi">667</span><span class="p">,</span> <span class="n">iomsg</span> <span class="o">=</span> <span class="n">errmsg</span><span class="p">)</span> <span class="n">name</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">val</span>
 <a name="ln-1204"></a>                  <span class="k">end if</span>
-<a name="ln-1205"></a><span class="k">                  call </span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">i</span><span class="p">)%</span><span class="n">set_value</span><span class="p">(</span><span class="n">name</span><span class="o">=</span><span class="n">name</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-1206"></a>                  <span class="n">self</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="kt">real</span><span class="p">(</span><span class="n">val</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">DP</span><span class="p">)</span>
-<a name="ln-1207"></a>                  <span class="n">self</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="kt">real</span><span class="p">(</span><span class="n">val</span> <span class="o">/</span> <span class="n">param</span><span class="p">%</span><span class="n">GU</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">DP</span><span class="p">)</span>
-<a name="ln-1208"></a>                  <span class="k">read</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="o">*</span><span class="p">,</span> <span class="n">err</span> <span class="o">=</span> <span class="mi">667</span><span class="p">,</span> <span class="n">iomsg</span> <span class="o">=</span> <span class="n">errmsg</span><span class="p">)</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-1209"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_tp</span><span class="p">)</span>
-<a name="ln-1210"></a>                  <span class="k">read</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="o">*</span><span class="p">,</span> <span class="n">err</span> <span class="o">=</span> <span class="mi">667</span><span class="p">,</span> <span class="n">iomsg</span> <span class="o">=</span> <span class="n">errmsg</span><span class="p">)</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-1211"></a>               <span class="k">end select</span>
+<a name="ln-1205"></a><span class="k">                  </span><span class="n">self</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="kt">real</span><span class="p">(</span><span class="n">val</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">DP</span><span class="p">)</span>
+<a name="ln-1206"></a>                  <span class="n">self</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="kt">real</span><span class="p">(</span><span class="n">val</span> <span class="o">/</span> <span class="n">param</span><span class="p">%</span><span class="n">GU</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">DP</span><span class="p">)</span>
+<a name="ln-1207"></a>                  <span class="k">read</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="o">*</span><span class="p">,</span> <span class="n">err</span> <span class="o">=</span> <span class="mi">667</span><span class="p">,</span> <span class="n">iomsg</span> <span class="o">=</span> <span class="n">errmsg</span><span class="p">)</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-1208"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_tp</span><span class="p">)</span>
+<a name="ln-1209"></a>                  <span class="k">read</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="o">*</span><span class="p">,</span> <span class="n">err</span> <span class="o">=</span> <span class="mi">667</span><span class="p">,</span> <span class="n">iomsg</span> <span class="o">=</span> <span class="n">errmsg</span><span class="p">)</span> <span class="n">name</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-1210"></a>               <span class="k">end select</span>
+<a name="ln-1211"></a><span class="k">               call </span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">i</span><span class="p">)%</span><span class="n">set_value</span><span class="p">(</span><span class="n">name</span><span class="o">=</span><span class="n">name</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
 <a name="ln-1212"></a>
-<a name="ln-1213"></a><span class="k">               select case</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">in_form</span><span class="p">)</span>
+<a name="ln-1213"></a>               <span class="k">select case</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">in_form</span><span class="p">)</span>
 <a name="ln-1214"></a>               <span class="k">case</span> <span class="p">(</span><span class="n">XV</span><span class="p">)</span>
 <a name="ln-1215"></a>                  <span class="k">read</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="o">*</span><span class="p">,</span> <span class="n">err</span> <span class="o">=</span> <span class="mi">667</span><span class="p">,</span> <span class="n">iomsg</span> <span class="o">=</span> <span class="n">errmsg</span><span class="p">)</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">),</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">),</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
 <a name="ln-1216"></a>                  <span class="k">read</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="o">*</span><span class="p">,</span> <span class="n">err</span> <span class="o">=</span> <span class="mi">667</span><span class="p">,</span> <span class="n">iomsg</span> <span class="o">=</span> <span class="n">errmsg</span><span class="p">)</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">),</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">),</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
diff --git a/docs/sourcefile/kick.f90.html b/docs/sourcefile/kick.f90.html
index e2e41f83b..d0fb6d5d1 100644
--- a/docs/sourcefile/kick.f90.html
+++ b/docs/sourcefile/kick.f90.html
@@ -134,7 +134,7 @@ <h1>kick.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.6% of total for source files.">99 statements</a>
+    title=" 0.7% of total for source files.">109 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~kick.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilekickf90EfferentGraph" width="641pt" height="302pt"
- viewBox="0.00 0.00 641.00 302.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~kick.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 412.12)">
+<svg id="sourcefilekickf90EfferentGraph" width="641pt" height="249pt"
+ viewBox="0.00 0.00 641.00 249.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~kick.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 339.24)">
 <title>sourcefile~~kick.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 878,-412.12 878,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 878,-339.24 878,4 -4,4"/>
 <!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~kick.f90</title>
-<polygon fill="none" stroke="black" points="874,-133.12 820,-133.12 820,-109.12 874,-109.12 874,-133.12"/>
-<text text-anchor="middle" x="847" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">kick.f90</text>
+<polygon fill="none" stroke="black" points="874,-235.24 820,-235.24 820,-211.24 874,-211.24 874,-235.24"/>
+<text text-anchor="middle" x="847" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">kick.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~kick.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.44,-109.09C789.3,-87.43 705.41,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-235.38C779.49,-252.91 699.44,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~kick.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.09,-133.4C818.2,-149.8 789.87,-179.03 771.01,-198.5"/>
-<polygon fill="#000000" stroke="#000000" points="768.25,-196.32 763.81,-205.93 773.28,-201.19 768.25,-196.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.82,-212.1C810.51,-208.14 799.84,-203.6 789.77,-199.31"/>
+<polygon fill="#000000" stroke="#000000" points="790.92,-196 780.35,-195.3 788.18,-202.44 790.92,-196"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~kick.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~kick.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~kick.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~kick.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~kick.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -625,7 +617,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-11"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f90</span>
 <a name="ln-12"></a>      <span class="k">implicit none</span>
 <a name="ln-13"></a>      <span class="c">! Arguments</span>
-<a name="ln-14"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>
+<a name="ln-14"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
 <a name="ln-15"></a>
 <a name="ln-16"></a>      <span class="k">call </span><span class="n">kick_getacch_int_all_pl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">nplpl</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ah</span><span class="p">)</span>
 <a name="ln-17"></a>
@@ -633,7 +625,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-19"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_pl</span>
 <a name="ln-20"></a>
 <a name="ln-21"></a>
-<a name="ln-22"></a>   <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">xhp</span><span class="p">,</span> <span class="n">npl</span><span class="p">)</span>
+<a name="ln-22"></a>   <span class="k">module subroutine </span><span class="n">kick_getacch_int_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">xhp</span><span class="p">,</span> <span class="n">npl</span><span class="p">)</span>
 <a name="ln-23"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-24"></a>      <span class="c">!!</span>
 <a name="ln-25"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies</span>
@@ -642,136 +634,166 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-28"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90</span>
 <a name="ln-29"></a>      <span class="k">implicit none</span>
 <a name="ln-30"></a>      <span class="c">! Arguments</span>
-<a name="ln-31"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle</span>
+<a name="ln-31"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
 <a name="ln-32"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">GMpl</span> <span class="c">!! Massive body masses</span>
 <a name="ln-33"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">xhp</span>  <span class="c">!! Massive body position vectors</span>
 <a name="ln-34"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>  <span class="c">!! Number of active massive bodies</span>
-<a name="ln-35"></a>      <span class="c">! Internals</span>
-<a name="ln-36"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
+<a name="ln-35"></a>
+<a name="ln-36"></a>      <span class="k">if</span> <span class="p">((</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">npl</span> <span class="o">==</span> <span class="mi">0</span><span class="p">))</span> <span class="k">return</span>
 <a name="ln-37"></a>
-<a name="ln-38"></a>      <span class="k">if</span> <span class="p">((</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">npl</span> <span class="o">==</span> <span class="mi">0</span><span class="p">))</span> <span class="k">return</span>
-<a name="ln-39"></a>
-<a name="ln-40"></a><span class="k">      associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
-<a name="ln-41"></a>         <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span>
-<a name="ln-42"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-43"></a><span class="k">               do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-44"></a>                  <span class="k">block</span>
-<a name="ln-45"></a><span class="k">                     </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">rji2</span>
-<a name="ln-46"></a>                     <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>
-<a name="ln-47"></a>                     <span class="n">xr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">xhp</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-48"></a>                     <span class="n">yr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">xhp</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-49"></a>                     <span class="n">zr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">xhp</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-50"></a>                     <span class="n">rji2</span> <span class="o">=</span> <span class="n">xr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">yr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">zr</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-51"></a>                     <span class="k">call </span><span class="n">kick_getacch_int_one_tp</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-52"></a>                  <span class="k">end block</span>
-<a name="ln-53"></a><span class="k">               end do</span>
-<a name="ln-54"></a><span class="k">            end if</span>
-<a name="ln-55"></a><span class="k">         end do</span>
-<a name="ln-56"></a><span class="k">      end associate</span>
-<a name="ln-57"></a><span class="k">      </span>
-<a name="ln-58"></a><span class="k">      return</span>
-<a name="ln-59"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_tp</span>
-<a name="ln-60"></a>
-<a name="ln-61"></a>
-<a name="ln-62"></a>   <span class="k">module subroutine </span><span class="n">kick_getacch_int_all_pl</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">k_plpl</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">Gmass</span><span class="p">,</span> <span class="n">radius</span><span class="p">,</span> <span class="n">acc</span><span class="p">)</span>
-<a name="ln-63"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-64"></a>      <span class="c">!!</span>
-<a name="ln-65"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization</span>
-<a name="ln-66"></a>      <span class="c">!!</span>
-<a name="ln-67"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine getacch_ah3.f</span>
-<a name="ln-68"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9</span>
-<a name="ln-69"></a>      <span class="k">implicit none</span>
-<a name="ln-70"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>    <span class="c">!! Number of massive bodies</span>
-<a name="ln-71"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nplpl</span>  <span class="c">!! Number of massive body interactions to compute</span>
-<a name="ln-72"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">k_plpl</span> <span class="c">!! Array of interaction pair indices (flattened upper triangular matrix)</span>
-<a name="ln-73"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x</span>      <span class="c">!! Position vector array</span>
-<a name="ln-74"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">Gmass</span>  <span class="c">!! Array of massive body G*mass</span>
-<a name="ln-75"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">radius</span> <span class="c">!! Array of massive body radii</span>
-<a name="ln-76"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">acc</span>    <span class="c">!! Acceleration vector array </span>
-<a name="ln-77"></a>      <span class="c">! Internals</span>
-<a name="ln-78"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span>                      <span class="kd">::</span> <span class="n">k</span>
-<a name="ln-79"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                          <span class="kd">::</span> <span class="n">rji2</span><span class="p">,</span> <span class="n">rlim2</span>
-<a name="ln-80"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                          <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>
-<a name="ln-81"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
-<a name="ln-82"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">,</span><span class="n">npl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">ahj</span>
-<a name="ln-83"></a>
-<a name="ln-84"></a>      <span class="n">ahi</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-85"></a>      <span class="n">ahj</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-86"></a>      <span class="c">!$omp parallel do default(private)&amp;</span>
-<a name="ln-87"></a>      <span class="c">!$omp shared(nplpl, k_plpl, x, Gmass, radius)  &amp;</span>
-<a name="ln-88"></a>      <span class="c">!$omp reduction(+:ahi) &amp;</span>
-<a name="ln-89"></a>      <span class="c">!$omp reduction(-:ahj) </span>
-<a name="ln-90"></a>      <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">nplpl</span>
-<a name="ln-91"></a>         <span class="n">i</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-92"></a>         <span class="n">j</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-93"></a>         <span class="n">xr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-94"></a>         <span class="n">yr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-95"></a>         <span class="n">zr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-96"></a>         <span class="n">rji2</span> <span class="o">=</span> <span class="n">xr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">yr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">zr</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-97"></a>         <span class="n">rlim2</span> <span class="o">=</span> <span class="p">(</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">radius</span><span class="p">(</span><span class="n">j</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-98"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">rji2</span> <span class="o">&gt;</span> <span class="n">rlim2</span><span class="p">)</span> <span class="k">call </span><span class="n">kick_getacch_int_one_pl</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">Gmass</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">ahi</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">ahi</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">ahi</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">ahj</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">j</span><span class="p">),</span> <span class="n">ahj</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">j</span><span class="p">),</span> <span class="n">ahj</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">j</span><span class="p">))</span>
-<a name="ln-99"></a>      <span class="k">end do</span>
-<a name="ln-100"></a>      <span class="c">!$omp end parallel do</span>
-<a name="ln-101"></a>      
-<a name="ln-102"></a>      <span class="n">acc</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="n">acc</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">+</span> <span class="n">ahi</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">+</span> <span class="n">ahj</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span>
-<a name="ln-103"></a>      <span class="k">return</span>
-<a name="ln-104"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_all_pl</span>
-<a name="ln-105"></a>
-<a name="ln-106"></a>
-<a name="ln-107"></a>   <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_pl</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmi</span><span class="p">,</span> <span class="n">Gmj</span><span class="p">,</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span><span class="p">,</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span><span class="p">)</span>
-<a name="ln-108"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-109"></a>      <span class="c">!!</span>
-<a name="ln-110"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies</span>
-<a name="ln-111"></a>      <span class="c">!!</span>
-<a name="ln-112"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine getacch_ah3.f</span>
-<a name="ln-113"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9</span>
-<a name="ln-114"></a>      <span class="k">implicit none</span>
-<a name="ln-115"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>            <span class="c">!! Square of distance between the two bodies</span>
-<a name="ln-116"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>      <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
-<a name="ln-117"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmi</span>             <span class="c">!! G*mass of body i</span>
-<a name="ln-118"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmj</span>             <span class="c">!! G*mass of body j</span>
-<a name="ln-119"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span> <span class="c">!! Acceleration vector components of body i</span>
-<a name="ln-120"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span> <span class="c">!! Acceleration vector components of body j</span>
-<a name="ln-121"></a>      <span class="c">! Internals</span>
-<a name="ln-122"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">faci</span><span class="p">,</span> <span class="n">facj</span><span class="p">,</span> <span class="n">irij3</span>
-<a name="ln-123"></a>
-<a name="ln-124"></a>      <span class="n">irij3</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">/</span> <span class="p">(</span><span class="n">rji2</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">rji2</span><span class="p">))</span>
-<a name="ln-125"></a>      <span class="n">faci</span> <span class="o">=</span> <span class="n">Gmi</span> <span class="o">*</span> <span class="n">irij3</span>
-<a name="ln-126"></a>      <span class="n">facj</span> <span class="o">=</span> <span class="n">Gmj</span> <span class="o">*</span> <span class="n">irij3</span>
-<a name="ln-127"></a>      <span class="n">axi</span> <span class="o">=</span> <span class="n">axi</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">xr</span>
-<a name="ln-128"></a>      <span class="n">ayi</span> <span class="o">=</span> <span class="n">ayi</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">yr</span>
-<a name="ln-129"></a>      <span class="n">azi</span> <span class="o">=</span> <span class="n">azi</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">zr</span>
-<a name="ln-130"></a>      <span class="n">axj</span> <span class="o">=</span> <span class="n">axj</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">xr</span>
-<a name="ln-131"></a>      <span class="n">ayj</span> <span class="o">=</span> <span class="n">ayj</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">yr</span>
-<a name="ln-132"></a>      <span class="n">azj</span> <span class="o">=</span> <span class="n">azj</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">zr</span>
+<a name="ln-38"></a><span class="k">      call </span><span class="n">kick_getacch_int_all_tp</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">npl</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">xhp</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">lmask</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ah</span><span class="p">)</span>
+<a name="ln-39"></a>      
+<a name="ln-40"></a>      <span class="k">return</span>
+<a name="ln-41"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_tp</span>
+<a name="ln-42"></a>
+<a name="ln-43"></a>
+<a name="ln-44"></a>   <span class="k">module subroutine </span><span class="n">kick_getacch_int_all_pl</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">k_plpl</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">Gmass</span><span class="p">,</span> <span class="n">radius</span><span class="p">,</span> <span class="n">acc</span><span class="p">)</span>
+<a name="ln-45"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-46"></a>      <span class="c">!!</span>
+<a name="ln-47"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization</span>
+<a name="ln-48"></a>      <span class="c">!!</span>
+<a name="ln-49"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine getacch_ah3.f</span>
+<a name="ln-50"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9</span>
+<a name="ln-51"></a>      <span class="k">implicit none</span>
+<a name="ln-52"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>    <span class="c">!! Number of massive bodies</span>
+<a name="ln-53"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nplpl</span>  <span class="c">!! Number of massive body interactions to compute</span>
+<a name="ln-54"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">k_plpl</span> <span class="c">!! Array of interaction pair indices (flattened upper triangular matrix)</span>
+<a name="ln-55"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x</span>      <span class="c">!! Position vector array</span>
+<a name="ln-56"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">Gmass</span>  <span class="c">!! Array of massive body G*mass</span>
+<a name="ln-57"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">radius</span> <span class="c">!! Array of massive body radii</span>
+<a name="ln-58"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">acc</span>    <span class="c">!! Acceleration vector array </span>
+<a name="ln-59"></a>      <span class="c">! Internals</span>
+<a name="ln-60"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span>                      <span class="kd">::</span> <span class="n">k</span>
+<a name="ln-61"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">,</span><span class="n">npl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">ahj</span>
+<a name="ln-62"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
+<a name="ln-63"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">rji2</span><span class="p">,</span> <span class="n">rlim2</span>
+<a name="ln-64"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>
+<a name="ln-65"></a>
+<a name="ln-66"></a>      <span class="n">ahi</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-67"></a>      <span class="n">ahj</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-68"></a>
+<a name="ln-69"></a>      <span class="c">!$omp parallel do default(private) schedule(static)&amp;</span>
+<a name="ln-70"></a>      <span class="c">!$omp shared(nplpl, k_plpl, x, Gmass, radius) &amp;</span>
+<a name="ln-71"></a>      <span class="c">!$omp lastprivate(rji2, rlim2, xr, yr, zr) &amp;</span>
+<a name="ln-72"></a>      <span class="c">!$omp reduction(+:ahi) &amp;</span>
+<a name="ln-73"></a>      <span class="c">!$omp reduction(-:ahj) </span>
+<a name="ln-74"></a>      <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">nplpl</span>
+<a name="ln-75"></a>         <span class="n">i</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-76"></a>         <span class="n">j</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-77"></a>         <span class="n">xr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> 
+<a name="ln-78"></a>         <span class="n">yr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> 
+<a name="ln-79"></a>         <span class="n">zr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> 
+<a name="ln-80"></a>         <span class="n">rji2</span> <span class="o">=</span> <span class="n">xr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">yr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">zr</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-81"></a>         <span class="n">rlim2</span> <span class="o">=</span> <span class="p">(</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">radius</span><span class="p">(</span><span class="n">j</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-82"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">rji2</span> <span class="o">&gt;</span> <span class="n">rlim2</span><span class="p">)</span> <span class="k">call </span><span class="n">kick_getacch_int_one_pl</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">Gmass</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">ahi</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">ahi</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">ahi</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">ahj</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">j</span><span class="p">),</span> <span class="n">ahj</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">j</span><span class="p">),</span> <span class="n">ahj</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">j</span><span class="p">))</span>
+<a name="ln-83"></a>      <span class="k">end do</span>
+<a name="ln-84"></a>      <span class="c">!$omp end parallel do </span>
+<a name="ln-85"></a>     
+<a name="ln-86"></a>      <span class="k">do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span>
+<a name="ln-87"></a>         <span class="n">acc</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">acc</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">ahi</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">ahj</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-88"></a>      <span class="k">end do</span>
+<a name="ln-89"></a>
+<a name="ln-90"></a><span class="k">      return</span>
+<a name="ln-91"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_all_pl</span>
+<a name="ln-92"></a>
+<a name="ln-93"></a>
+<a name="ln-94"></a>   <span class="k">module subroutine </span><span class="n">kick_getacch_int_all_tp</span><span class="p">(</span><span class="n">ntp</span><span class="p">,</span> <span class="n">npl</span><span class="p">,</span> <span class="n">xtp</span><span class="p">,</span> <span class="n">xpl</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">acc</span><span class="p">)</span>
+<a name="ln-95"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-96"></a>      <span class="c">!!</span>
+<a name="ln-97"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies with parallelisim</span>
+<a name="ln-98"></a>      <span class="c">!!</span>
+<a name="ln-99"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine getacch_ah3_tp.f</span>
+<a name="ln-100"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f99</span>
+<a name="ln-101"></a>      <span class="k">implicit none</span>
+<a name="ln-102"></a><span class="k">      </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ntp</span>    <span class="c">!! Number of test particles</span>
+<a name="ln-103"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>    <span class="c">!! Number of massive bodies</span>
+<a name="ln-104"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">xtp</span>    <span class="c">!! Test particle position vector array</span>
+<a name="ln-105"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">xpl</span>    <span class="c">!! Massive body particle position vector array</span>
+<a name="ln-106"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">GMpl</span>   <span class="c">!! Array of massive body G*mass</span>
+<a name="ln-107"></a>      <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lmask</span>  <span class="c">!! Logical mask indicating which test particles should be computed</span>
+<a name="ln-108"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">acc</span>    <span class="c">!! Acceleration vector array </span>
+<a name="ln-109"></a>      <span class="c">! Internals</span>
+<a name="ln-110"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">rji2</span>
+<a name="ln-111"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>
+<a name="ln-112"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
+<a name="ln-113"></a>
+<a name="ln-114"></a>      <span class="c">!$omp parallel do default(private) schedule(static)&amp;</span>
+<a name="ln-115"></a>      <span class="c">!$omp shared(npl, ntp, lmask, xtp, xpl) &amp;</span>
+<a name="ln-116"></a>      <span class="c">!$omp reduction(-:acc)</span>
+<a name="ln-117"></a>      <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span>
+<a name="ln-118"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-119"></a><span class="k">            do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span>
+<a name="ln-120"></a>               <span class="n">xr</span> <span class="o">=</span> <span class="n">xtp</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">xpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-121"></a>               <span class="n">yr</span> <span class="o">=</span> <span class="n">xtp</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">xpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-122"></a>               <span class="n">zr</span> <span class="o">=</span> <span class="n">xtp</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">xpl</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-123"></a>               <span class="n">rji2</span> <span class="o">=</span> <span class="n">xr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">yr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">zr</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-124"></a>               <span class="k">call </span><span class="n">kick_getacch_int_one_tp</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">acc</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">acc</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">),</span> <span class="n">acc</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-125"></a>            <span class="k">end do</span>
+<a name="ln-126"></a><span class="k">         end if</span>
+<a name="ln-127"></a><span class="k">      end do</span>
+<a name="ln-128"></a>      <span class="c">!$omp end parallel do</span>
+<a name="ln-129"></a>      
+<a name="ln-130"></a>      <span class="k">return</span>
+<a name="ln-131"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_all_tp</span>
+<a name="ln-132"></a>
 <a name="ln-133"></a>
-<a name="ln-134"></a>      <span class="k">return</span>
-<a name="ln-135"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_one_pl</span>
-<a name="ln-136"></a>
-<a name="ln-137"></a>
-<a name="ln-138"></a>   <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_tp</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span><span class="p">)</span>
-<a name="ln-139"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-140"></a>      <span class="c">!!</span>
-<a name="ln-141"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair.</span>
-<a name="ln-142"></a>      <span class="c">!!</span>
-<a name="ln-143"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine getacch_ah3_tp.f</span>
-<a name="ln-144"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90</span>
-<a name="ln-145"></a>      <span class="k">implicit none</span>
-<a name="ln-146"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>         <span class="c">!! Square of distance between the test particle and massive body</span>
-<a name="ln-147"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>   <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
-<a name="ln-148"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmpl</span>         <span class="c">!! G*mass of massive body</span>
-<a name="ln-149"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span> <span class="c">!! Acceleration vector components of test particle</span>
-<a name="ln-150"></a>      <span class="c">! Internals</span>
-<a name="ln-151"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">fac</span>
-<a name="ln-152"></a>
-<a name="ln-153"></a>      <span class="n">fac</span> <span class="o">=</span> <span class="n">GMpl</span> <span class="o">/</span> <span class="p">(</span><span class="n">rji2</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">rji2</span><span class="p">))</span>
-<a name="ln-154"></a>      <span class="n">ax</span> <span class="o">=</span> <span class="n">ax</span> <span class="o">-</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">xr</span>
-<a name="ln-155"></a>      <span class="n">ay</span> <span class="o">=</span> <span class="n">ay</span> <span class="o">-</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">yr</span>
-<a name="ln-156"></a>      <span class="n">az</span> <span class="o">=</span> <span class="n">az</span> <span class="o">-</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">zr</span>
-<a name="ln-157"></a>      <span class="k">return</span>
-<a name="ln-158"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_one_tp</span>
-<a name="ln-159"></a>
-<a name="ln-160"></a><span class="k">end submodule </span><span class="n">s_kick</span>
+<a name="ln-134"></a>   <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_pl</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmi</span><span class="p">,</span> <span class="n">Gmj</span><span class="p">,</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span><span class="p">,</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span><span class="p">)</span>
+<a name="ln-135"></a>      <span class="c">!$omp declare simd(kick_getacch_int_one_pl)</span>
+<a name="ln-136"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-137"></a>      <span class="c">!!</span>
+<a name="ln-138"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies</span>
+<a name="ln-139"></a>      <span class="c">!!</span>
+<a name="ln-140"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine getacch_ah3.f</span>
+<a name="ln-141"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9</span>
+<a name="ln-142"></a>      <span class="k">implicit none</span>
+<a name="ln-143"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>            <span class="c">!! Square of distance between the two bodies</span>
+<a name="ln-144"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>      <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
+<a name="ln-145"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmi</span>             <span class="c">!! G*mass of body i</span>
+<a name="ln-146"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmj</span>             <span class="c">!! G*mass of body j</span>
+<a name="ln-147"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span> <span class="c">!! Acceleration vector components of body i</span>
+<a name="ln-148"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span> <span class="c">!! Acceleration vector components of body j</span>
+<a name="ln-149"></a>      <span class="c">! Internals</span>
+<a name="ln-150"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">faci</span><span class="p">,</span> <span class="n">facj</span><span class="p">,</span> <span class="n">irij3</span>
+<a name="ln-151"></a>
+<a name="ln-152"></a>      <span class="n">irij3</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">/</span> <span class="p">(</span><span class="n">rji2</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">rji2</span><span class="p">))</span>
+<a name="ln-153"></a>      <span class="n">faci</span> <span class="o">=</span> <span class="n">Gmi</span> <span class="o">*</span> <span class="n">irij3</span>
+<a name="ln-154"></a>      <span class="n">facj</span> <span class="o">=</span> <span class="n">Gmj</span> <span class="o">*</span> <span class="n">irij3</span>
+<a name="ln-155"></a>      <span class="n">axi</span> <span class="o">=</span> <span class="n">axi</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">xr</span>
+<a name="ln-156"></a>      <span class="n">ayi</span> <span class="o">=</span> <span class="n">ayi</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">yr</span>
+<a name="ln-157"></a>      <span class="n">azi</span> <span class="o">=</span> <span class="n">azi</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">zr</span>
+<a name="ln-158"></a>      <span class="n">axj</span> <span class="o">=</span> <span class="n">axj</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">xr</span>
+<a name="ln-159"></a>      <span class="n">ayj</span> <span class="o">=</span> <span class="n">ayj</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">yr</span>
+<a name="ln-160"></a>      <span class="n">azj</span> <span class="o">=</span> <span class="n">azj</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">zr</span>
+<a name="ln-161"></a>
+<a name="ln-162"></a>      <span class="k">return</span>
+<a name="ln-163"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_one_pl</span>
+<a name="ln-164"></a>
+<a name="ln-165"></a>
+<a name="ln-166"></a>   <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_tp</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span><span class="p">)</span>
+<a name="ln-167"></a>      <span class="c">!$omp declare simd(kick_getacch_int_one_tp)</span>
+<a name="ln-168"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-169"></a>      <span class="c">!!</span>
+<a name="ln-170"></a>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair.</span>
+<a name="ln-171"></a>      <span class="c">!!</span>
+<a name="ln-172"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine getacch_ah3_tp.f</span>
+<a name="ln-173"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90</span>
+<a name="ln-174"></a>      <span class="k">implicit none</span>
+<a name="ln-175"></a><span class="k">      </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>         <span class="c">!! Square of distance between the test particle and massive body</span>
+<a name="ln-176"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>   <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
+<a name="ln-177"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmpl</span>         <span class="c">!! G*mass of massive body</span>
+<a name="ln-178"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span> <span class="c">!! Acceleration vector components of test particle</span>
+<a name="ln-179"></a>      <span class="c">! Internals</span>
+<a name="ln-180"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">fac</span>
+<a name="ln-181"></a>
+<a name="ln-182"></a>      <span class="n">fac</span> <span class="o">=</span> <span class="n">GMpl</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">rji2</span><span class="o">**</span><span class="p">(</span><span class="o">-</span><span class="mi">3</span><span class="p">))</span>
+<a name="ln-183"></a>      <span class="n">ax</span> <span class="o">=</span> <span class="n">ax</span> <span class="o">-</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">xr</span>
+<a name="ln-184"></a>      <span class="n">ay</span> <span class="o">=</span> <span class="n">ay</span> <span class="o">-</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">yr</span>
+<a name="ln-185"></a>      <span class="n">az</span> <span class="o">=</span> <span class="n">az</span> <span class="o">-</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">zr</span>
+<a name="ln-186"></a>
+<a name="ln-187"></a>      <span class="k">return</span>
+<a name="ln-188"></a><span class="k">   end subroutine </span><span class="n">kick_getacch_int_one_tp</span>
+<a name="ln-189"></a>
+<a name="ln-190"></a><span class="k">end submodule </span><span class="n">s_kick</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/lambda_function.f90.html b/docs/sourcefile/lambda_function.f90.html
index 113dd51fd..7430418b3 100644
--- a/docs/sourcefile/lambda_function.f90.html
+++ b/docs/sourcefile/lambda_function.f90.html
@@ -329,679 +329,679 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.76,-1398C136.79,-1398 127.98,-1398 119.08,-1398"/>
 <polygon fill="#000000" stroke="#000000" points="119.04,-1394.5 109.04,-1398 119.04,-1401.5 119.04,-1394.5"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-2796 254,-2796 254,-2772 404,-2772 404,-2796"/>
-<text text-anchor="middle" x="329" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382,-2796 276,-2796 276,-2772 382,-2772 382,-2796"/>
+<text text-anchor="middle" x="329" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.87,-2771.94C253.19,-2769.45 249.84,-2766.49 247,-2763 202.76,-2708.68 182.27,-1592.64 179.36,-1420.27"/>
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.77,-2780.53C264.74,-2777.31 254.25,-2771.9 247,-2763 202.76,-2708.68 182.27,-1592.64 179.36,-1420.27"/>
 <polygon fill="#000000" stroke="#000000" points="182.86,-1420.05 179.19,-1410.11 175.86,-1420.16 182.86,-1420.05"/>
 </g>
-<!-- sourcefile~symba_step.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~symba_step.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-2754 285,-2754 285,-2730 373,-2730 373,-2754"/>
-<text text-anchor="middle" x="329" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-2754 302,-2754 302,-2730 356,-2730 356,-2754"/>
+<text text-anchor="middle" x="329" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.65,-2740.65C270.55,-2737.92 256.18,-2732.26 247,-2721 204.15,-2668.46 182.54,-1589.97 179.4,-1420.36"/>
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.88,-2742.73C283.53,-2741.7 260.04,-2736.99 247,-2721 204.15,-2668.46 182.54,-1589.97 179.4,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="182.9,-1420.07 179.21,-1410.13 175.9,-1420.2 182.9,-1420.07"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="385,-2712 273,-2712 273,-2688 385,-2688 385,-2712"/>
-<text text-anchor="middle" x="329" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-2712 295.5,-2712 295.5,-2688 362.5,-2688 362.5,-2712"/>
+<text text-anchor="middle" x="329" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.87,-2695.6C262.92,-2692.3 253.62,-2687.1 247,-2679 205.5,-2628.21 182.79,-1586.05 179.44,-1420.17"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge4" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.1,-2700.18C278.07,-2698.4 258.49,-2693.06 247,-2679 205.5,-2628.21 182.79,-1586.05 179.44,-1420.17"/>
 <polygon fill="#000000" stroke="#000000" points="182.94,-1420.07 179.24,-1410.14 175.94,-1420.21 182.94,-1420.07"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-2670 290,-2670 290,-2646 368,-2646 368,-2670"/>
-<text text-anchor="middle" x="329" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367,-2670 291,-2670 291,-2646 367,-2646 367,-2670"/>
+<text text-anchor="middle" x="329" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.73,-2657.49C274.1,-2655.18 257.31,-2649.59 247,-2637 206.9,-2588.01 183.1,-1583.99 179.48,-1420.43"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge5" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.98,-2657.67C275,-2655.48 257.58,-2649.93 247,-2637 206.9,-2588.01 183.1,-1583.99 179.48,-1420.43"/>
 <polygon fill="#000000" stroke="#000000" points="182.98,-1420.05 179.26,-1410.13 175.98,-1420.21 182.98,-1420.05"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-2628 292.5,-2628 292.5,-2604 365.5,-2604 365.5,-2628"/>
-<text text-anchor="middle" x="329" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-2628 286,-2628 286,-2604 372,-2604 372,-2628"/>
+<text text-anchor="middle" x="329" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.24,-2615.83C275.93,-2613.75 257.87,-2608.25 247,-2595 208.25,-2547.75 183.37,-1579.7 179.52,-1420.17"/>
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.95,-2614.86C271.45,-2612.23 256.49,-2606.57 247,-2595 208.25,-2547.75 183.37,-1579.7 179.52,-1420.17"/>
 <polygon fill="#000000" stroke="#000000" points="183.02,-1420.01 179.28,-1410.1 176.02,-1420.18 183.02,-1420.01"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="384.5,-2586 273.5,-2586 273.5,-2562 384.5,-2562 384.5,-2586"/>
-<text text-anchor="middle" x="329" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="380.5,-2586 277.5,-2586 277.5,-2562 380.5,-2562 380.5,-2586"/>
+<text text-anchor="middle" x="329" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.33,-2569.71C263.21,-2566.42 253.73,-2561.19 247,-2553 172.42,-2462.26 177.36,-1573.17 178.77,-1420.31"/>
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.09,-2570.84C265.59,-2567.66 254.56,-2562.2 247,-2553 172.42,-2462.26 177.36,-1573.17 178.77,-1420.31"/>
 <polygon fill="#000000" stroke="#000000" points="182.27,-1420.28 178.86,-1410.25 175.27,-1420.21 182.27,-1420.28"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-2544 290.5,-2544 290.5,-2520 367.5,-2520 367.5,-2544"/>
-<text text-anchor="middle" x="329" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-2544 276.5,-2544 276.5,-2520 381.5,-2520 381.5,-2544"/>
+<text text-anchor="middle" x="329" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.18,-2531.52C274.44,-2529.25 257.44,-2523.67 247,-2511 175.17,-2423.81 177.8,-1570.31 178.82,-1420.42"/>
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.26,-2528.59C265.07,-2525.38 254.39,-2519.97 247,-2511 175.17,-2423.81 177.8,-1570.31 178.82,-1420.42"/>
 <polygon fill="#000000" stroke="#000000" points="182.32,-1420.19 178.89,-1410.16 175.32,-1420.13 182.32,-1420.19"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382,-2502 276,-2502 276,-2478 382,-2478 382,-2502"/>
-<text text-anchor="middle" x="329" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-2502 290.5,-2502 290.5,-2478 367.5,-2478 367.5,-2502"/>
+<text text-anchor="middle" x="329" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.86,-2486.46C264.82,-2483.24 254.31,-2477.85 247,-2469 177.91,-2385.34 178.25,-1567.17 178.87,-1420.47"/>
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.2,-2489.51C274.46,-2487.23 257.45,-2481.66 247,-2469 177.91,-2385.34 178.25,-1567.17 178.87,-1420.47"/>
 <polygon fill="#000000" stroke="#000000" points="182.38,-1420.07 178.92,-1410.05 175.38,-1420.03 182.38,-1420.07"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="388,-2460 270,-2460 270,-2436 388,-2436 388,-2460"/>
-<text text-anchor="middle" x="329" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-2460 286.5,-2460 286.5,-2436 371.5,-2436 371.5,-2460"/>
+<text text-anchor="middle" x="329" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.66,-2442.37C260.96,-2439.05 252.93,-2434.16 247,-2427 180.65,-2346.86 178.73,-1563.84 178.94,-1420.48"/>
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.43,-2446.89C271.81,-2444.29 256.64,-2438.64 247,-2427 180.65,-2346.86 178.73,-1563.84 178.94,-1420.48"/>
 <polygon fill="#000000" stroke="#000000" points="182.44,-1420.27 178.96,-1410.27 175.44,-1420.26 182.44,-1420.27"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-2418 295,-2418 295,-2394 363,-2394 363,-2418"/>
-<text text-anchor="middle" x="329" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~symba_step.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-2418 285,-2418 285,-2394 373,-2394 373,-2418"/>
+<text text-anchor="middle" x="329" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.78,-2406.06C277.87,-2404.22 258.51,-2398.86 247,-2385 183.37,-2308.36 179.22,-1560.16 179,-1420.42"/>
+<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.76,-2404.56C270.67,-2401.83 256.28,-2396.18 247,-2385 183.37,-2308.36 179.22,-1560.16 179,-1420.42"/>
 <polygon fill="#000000" stroke="#000000" points="182.5,-1420.1 178.99,-1410.1 175.5,-1420.11 182.5,-1420.1"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-2376 286.5,-2376 286.5,-2352 371.5,-2352 371.5,-2376"/>
-<text text-anchor="middle" x="329" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="400,-2376 258,-2376 258,-2352 400,-2352 400,-2376"/>
+<text text-anchor="middle" x="329" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.47,-2362.86C271.85,-2360.25 256.67,-2354.61 247,-2343 186.08,-2269.85 179.73,-1556.27 179.08,-1420.31"/>
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.68,-2352.34C253.69,-2349.77 250.07,-2346.68 247,-2343 186.08,-2269.85 179.73,-1556.27 179.08,-1420.31"/>
 <polygon fill="#000000" stroke="#000000" points="182.58,-1420.23 179.03,-1410.24 175.58,-1420.26 182.58,-1420.23"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-2334 295.5,-2334 295.5,-2310 362.5,-2310 362.5,-2334"/>
-<text text-anchor="middle" x="329" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-2334 295,-2334 295,-2310 363,-2310 363,-2334"/>
+<text text-anchor="middle" x="329" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.22,-2322.08C278.23,-2320.27 258.64,-2314.93 247,-2301 188.77,-2231.33 180.26,-1552.05 179.15,-1420.13"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.82,-2322.03C277.92,-2320.18 258.55,-2314.82 247,-2301 188.77,-2231.33 180.26,-1552.05 179.15,-1420.13"/>
 <polygon fill="#000000" stroke="#000000" points="182.65,-1419.99 179.07,-1410.02 175.65,-1420.05 182.65,-1419.99"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-2292 286.5,-2292 286.5,-2268 371.5,-2268 371.5,-2292"/>
-<text text-anchor="middle" x="329" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="411,-2292 247,-2292 247,-2268 411,-2268 411,-2292"/>
+<text text-anchor="middle" x="329" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.09,-2278.75C271.61,-2276.1 256.62,-2270.46 247,-2259 191.52,-2192.86 180.83,-1548.92 179.24,-1420.29"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.98,-2267.85C253.28,-2265.37 249.89,-2262.45 247,-2259 191.52,-2192.86 180.83,-1548.92 179.24,-1420.29"/>
 <polygon fill="#000000" stroke="#000000" points="182.74,-1420.04 179.12,-1410.08 175.74,-1420.12 182.74,-1420.04"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-2250 290,-2250 290,-2226 368,-2226 368,-2250"/>
-<text text-anchor="middle" x="329" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="380.5,-2250 277.5,-2250 277.5,-2226 380.5,-2226 380.5,-2250"/>
+<text text-anchor="middle" x="329" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.9,-2237.35C274.3,-2235.02 257.48,-2229.44 247,-2217 194.25,-2154.37 181.42,-1545.38 179.34,-1420.36"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.24,-2234.71C265.74,-2231.54 254.67,-2226.11 247,-2217 194.25,-2154.37 181.42,-1545.38 179.34,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="182.83,-1420.04 179.17,-1410.1 175.83,-1420.16 182.83,-1420.04"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377,-2208 281,-2208 281,-2184 377,-2184 377,-2208"/>
-<text text-anchor="middle" x="329" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-2208 295,-2208 295,-2184 363,-2184 363,-2208"/>
+<text text-anchor="middle" x="329" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.65,-2193.55C267.96,-2190.54 255.44,-2184.98 247,-2175 196.96,-2115.85 182.04,-1541.44 179.44,-1420.34"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.88,-2195.98C278,-2194.11 258.64,-2188.75 247,-2175 196.96,-2115.85 182.04,-1541.44 179.44,-1420.34"/>
 <polygon fill="#000000" stroke="#000000" points="182.94,-1420 179.23,-1410.07 175.94,-1420.14 182.94,-1420"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-2166 289.5,-2166 289.5,-2142 368.5,-2142 368.5,-2166"/>
-<text text-anchor="middle" x="329" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="380.5,-2166 277.5,-2166 277.5,-2142 380.5,-2142 380.5,-2166"/>
+<text text-anchor="middle" x="329" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.11,-2153.18C273.76,-2150.76 257.35,-2145.17 247,-2133 199.7,-2077.38 182.72,-1538.24 179.57,-1420.6"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.3,-2150.66C265.8,-2147.49 254.72,-2142.08 247,-2133 199.7,-2077.38 182.72,-1538.24 179.57,-1420.6"/>
 <polygon fill="#000000" stroke="#000000" points="183.06,-1420.18 179.3,-1410.28 176.06,-1420.37 183.06,-1420.18"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="380.5,-2124 277.5,-2124 277.5,-2100 380.5,-2100 380.5,-2124"/>
-<text text-anchor="middle" x="329" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364.5,-2124 293.5,-2124 293.5,-2100 364.5,-2100 364.5,-2124"/>
+<text text-anchor="middle" x="329" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.34,-2108.63C265.83,-2105.46 254.74,-2100.05 247,-2091 202.37,-2038.81 183.4,-1533.42 179.69,-1420.36"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.3,-2111.73C276.84,-2109.69 258.33,-2104.25 247,-2091 202.37,-2038.81 183.4,-1533.42 179.69,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="183.18,-1420.02 179.37,-1410.14 176.19,-1420.24 183.18,-1420.02"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-2082 292.5,-2082 292.5,-2058 365.5,-2058 365.5,-2082"/>
-<text text-anchor="middle" x="329" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-2082 290,-2082 290,-2058 368,-2058 368,-2082"/>
+<text text-anchor="middle" x="329" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.1,-2069.54C275.96,-2067.38 258.09,-2061.88 247,-2049 205.08,-2000.28 184.14,-1529.22 179.84,-1420.37"/>
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.6,-2069.18C274.14,-2066.79 257.52,-2061.22 247,-2049 205.08,-2000.28 184.14,-1529.22 179.84,-1420.37"/>
 <polygon fill="#000000" stroke="#000000" points="183.33,-1420.06 179.45,-1410.21 176.34,-1420.33 183.33,-1420.06"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376,-2040 282,-2040 282,-2016 376,-2016 376,-2040"/>
-<text text-anchor="middle" x="329" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356.5,-2040 301.5,-2040 301.5,-2016 356.5,-2016 356.5,-2040"/>
+<text text-anchor="middle" x="329" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.64,-2025.62C268.68,-2022.65 255.75,-2017.1 247,-2007 207.75,-1961.72 184.92,-1524.48 180.01,-1420.23"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.38,-2028.44C283.3,-2027.21 260.32,-2022.37 247,-2007 207.75,-1961.72 184.92,-1524.48 180.01,-1420.23"/>
 <polygon fill="#000000" stroke="#000000" points="183.5,-1420.03 179.54,-1410.2 176.51,-1420.35 183.5,-1420.03"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-1998 288,-1998 288,-1974 370,-1974 370,-1998"/>
-<text text-anchor="middle" x="329" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="385,-1998 273,-1998 273,-1974 385,-1974 385,-1998"/>
+<text text-anchor="middle" x="329" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.6,-1984.76C272.76,-1982.19 257.13,-1976.59 247,-1965 210.45,-1923.17 185.78,-1520.03 180.2,-1420.25"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.87,-1981.12C263.04,-1977.84 253.79,-1972.77 247,-1965 210.45,-1923.17 185.78,-1520.03 180.2,-1420.25"/>
 <polygon fill="#000000" stroke="#000000" points="183.69,-1419.9 179.64,-1410.11 176.7,-1420.28 183.69,-1419.9"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1956 295,-1956 295,-1932 363,-1932 363,-1956"/>
-<text text-anchor="middle" x="329" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-1956 299,-1956 299,-1932 359,-1932 359,-1956"/>
+<text text-anchor="middle" x="329" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.7,-1943.73C277.98,-1941.77 258.82,-1936.4 247,-1923 179.79,-1846.83 177.95,-1510.78 178.7,-1420.43"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.72,-1944.15C281.15,-1942.59 259.78,-1937.49 247,-1923 179.79,-1846.83 177.95,-1510.78 178.7,-1420.43"/>
 <polygon fill="#000000" stroke="#000000" points="182.2,-1420.26 178.8,-1410.23 175.2,-1420.19 182.2,-1420.26"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1914 290.5,-1914 290.5,-1890 367.5,-1890 367.5,-1914"/>
-<text text-anchor="middle" x="329" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<text text-anchor="middle" x="329" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.23,-1901.07C274.69,-1898.68 257.83,-1893.14 247,-1881 185.09,-1811.61 179.36,-1505.75 178.98,-1420.26"/>
 <polygon fill="#000000" stroke="#000000" points="182.48,-1420.12 178.96,-1410.12 175.48,-1420.13 182.48,-1420.12"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-1872 291.5,-1872 291.5,-1848 366.5,-1848 366.5,-1872"/>
-<text text-anchor="middle" x="329" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1872 295,-1872 295,-1848 363,-1848 363,-1872"/>
+<text text-anchor="middle" x="329" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.13,-1859.12C275.38,-1856.79 258.11,-1851.29 247,-1839 190.44,-1776.43 180.9,-1501.22 179.31,-1420.39"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.83,-1859.62C278.15,-1857.62 258.98,-1852.25 247,-1839 190.44,-1776.43 180.9,-1501.22 179.31,-1420.39"/>
 <polygon fill="#000000" stroke="#000000" points="182.81,-1420.26 179.14,-1410.32 175.81,-1420.38 182.81,-1420.26"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1830 290.5,-1830 290.5,-1806 367.5,-1806 367.5,-1830"/>
-<text text-anchor="middle" x="329" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="384.5,-1830 273.5,-1830 273.5,-1806 384.5,-1806 384.5,-1830"/>
+<text text-anchor="middle" x="329" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.39,-1816.92C274.89,-1814.5 258.01,-1808.98 247,-1797 195.79,-1741.25 182.61,-1496.75 179.72,-1420.68"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.17,-1812.85C263.32,-1809.59 253.98,-1804.6 247,-1797 195.79,-1741.25 182.61,-1496.75 179.72,-1420.68"/>
 <polygon fill="#000000" stroke="#000000" points="183.21,-1420.21 179.36,-1410.34 176.21,-1420.46 183.21,-1420.21"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369,-1788 289,-1788 289,-1764 369,-1764 369,-1788"/>
-<text text-anchor="middle" x="329" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1788 290.5,-1788 290.5,-1764 367.5,-1764 367.5,-1788"/>
+<text text-anchor="middle" x="329" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.84,-1774.54C273.82,-1771.98 257.73,-1766.45 247,-1755 201.04,-1705.93 184.47,-1491.11 180.22,-1420.55"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.09,-1774.75C274.72,-1772.28 258.02,-1766.77 247,-1755 201.04,-1705.93 184.47,-1491.11 180.22,-1420.55"/>
 <polygon fill="#000000" stroke="#000000" points="183.69,-1419.94 179.62,-1410.16 176.7,-1420.34 183.69,-1419.94"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361,-1746 297,-1746 297,-1722 361,-1722 361,-1746"/>
-<text text-anchor="middle" x="329" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-1746 302,-1746 302,-1722 356,-1722 356,-1746"/>
+<text text-anchor="middle" x="329" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296.76,-1733.52C279.81,-1731.58 259.78,-1726.31 247,-1713 206.25,-1670.54 186.55,-1485.15 180.83,-1420.41"/>
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.85,-1734.01C283.99,-1732.58 261.08,-1727.67 247,-1713 206.25,-1670.54 186.55,-1485.15 180.83,-1420.41"/>
 <polygon fill="#000000" stroke="#000000" points="184.29,-1419.77 179.95,-1410.11 177.31,-1420.37 184.29,-1419.77"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="411,-1704 247,-1704 247,-1680 411,-1680 411,-1704"/>
-<text text-anchor="middle" x="329" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361,-1704 297,-1704 297,-1680 361,-1680 361,-1704"/>
+<text text-anchor="middle" x="329" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.75,-1679.93C254.46,-1677.46 250.48,-1674.51 247,-1671 211.4,-1635.06 188.89,-1478.53 181.59,-1420.1"/>
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296.92,-1691.36C280.02,-1689.38 259.98,-1684.11 247,-1671 211.4,-1635.06 188.89,-1478.53 181.59,-1420.1"/>
 <polygon fill="#000000" stroke="#000000" points="185.06,-1419.59 180.37,-1410.09 178.11,-1420.44 185.06,-1419.59"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-1662 302,-1662 302,-1638 356,-1638 356,-1662"/>
-<text text-anchor="middle" x="329" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-1662 292.5,-1662 292.5,-1638 365.5,-1638 365.5,-1662"/>
+<text text-anchor="middle" x="329" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.8,-1649.65C284.14,-1648.03 261.51,-1643.04 247,-1629 187.89,-1571.79 179.47,-1466.05 178.74,-1420.18"/>
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.28,-1648.48C276.57,-1646.04 259,-1640.62 247,-1629 187.89,-1571.79 179.47,-1466.05 178.74,-1420.18"/>
 <polygon fill="#000000" stroke="#000000" points="182.24,-1420.1 178.7,-1410.12 175.24,-1420.14 182.24,-1420.1"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1620 290.5,-1620 290.5,-1596 367.5,-1596 367.5,-1620"/>
-<text text-anchor="middle" x="329" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367,-1620 291,-1620 291,-1596 367,-1596 367,-1620"/>
+<text text-anchor="middle" x="329" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.12,-1605.74C275.12,-1603.06 258.7,-1597.67 247,-1587 198.12,-1542.41 184.34,-1460.11 180.49,-1420.48"/>
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.94,-1605.88C275.72,-1603.26 258.91,-1597.87 247,-1587 198.12,-1542.41 184.34,-1460.11 180.49,-1420.48"/>
 <polygon fill="#000000" stroke="#000000" points="183.95,-1419.96 179.62,-1410.29 176.98,-1420.55 183.95,-1419.96"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-1578 286,-1578 286,-1554 372,-1554 372,-1578"/>
-<text text-anchor="middle" x="329" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371,-1578 287,-1578 287,-1554 371,-1554 371,-1578"/>
+<text text-anchor="middle" x="329" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.59,-1562.21C272.07,-1559.23 257.82,-1554.03 247,-1545 207.99,-1512.44 190.17,-1452.61 183.07,-1420.22"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.85,-1562.48C272.95,-1559.55 258.15,-1554.31 247,-1545 207.99,-1512.44 190.17,-1452.61 183.07,-1420.22"/>
 <polygon fill="#000000" stroke="#000000" points="186.41,-1419.1 180.98,-1410 179.55,-1420.5 186.41,-1419.1"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1536 295,-1536 295,-1512 363,-1512 363,-1536"/>
-<text text-anchor="middle" x="329" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_append.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-1536 286,-1536 286,-1512 372,-1512 372,-1536"/>
+<text text-anchor="middle" x="329" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.88,-1521.01C279.2,-1518.27 260.9,-1513.03 247,-1503 217.56,-1481.77 197.58,-1443.51 187.25,-1419.5"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.88,-1519.21C272.53,-1516.15 258.31,-1511.16 247,-1503 217.56,-1481.77 197.58,-1443.51 187.25,-1419.5"/>
 <polygon fill="#000000" stroke="#000000" points="190.46,-1418.09 183.42,-1410.18 183.98,-1420.76 190.46,-1418.09"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-1494 299,-1494 299,-1470 359,-1470 359,-1494"/>
-<text text-anchor="middle" x="329" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1494 289.5,-1494 289.5,-1470 368.5,-1470 368.5,-1494"/>
+<text text-anchor="middle" x="329" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.97,-1478.05C282.93,-1475.01 263.06,-1469.78 247,-1461 226.93,-1450.03 208.19,-1431.82 195.49,-1417.8"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.44,-1476.06C275.5,-1472.89 260,-1468.11 247,-1461 226.93,-1450.03 208.19,-1431.82 195.49,-1417.8"/>
 <polygon fill="#000000" stroke="#000000" points="197.97,-1415.32 188.74,-1410.11 192.7,-1419.93 197.97,-1415.32"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-1452 276.5,-1452 276.5,-1428 381.5,-1428 381.5,-1452"/>
-<text text-anchor="middle" x="329" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-1452 290,-1452 290,-1428 368,-1428 368,-1452"/>
+<text text-anchor="middle" x="329" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.93,-1427.93C269.07,-1425.09 257.62,-1422.02 247,-1419 238.45,-1416.57 229.34,-1413.85 220.65,-1411.19"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.99,-1430.53C276.39,-1427.04 260.98,-1422.97 247,-1419 238.45,-1416.57 229.34,-1413.85 220.65,-1411.19"/>
 <polygon fill="#000000" stroke="#000000" points="221.67,-1407.84 211.08,-1408.24 219.6,-1414.53 221.67,-1407.84"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-1410 300.5,-1410 300.5,-1386 357.5,-1386 357.5,-1410"/>
-<text text-anchor="middle" x="329" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-1410 302,-1410 302,-1386 356,-1386 356,-1410"/>
+<text text-anchor="middle" x="329" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.32,-1398C278.13,-1398 246.62,-1398 221.28,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="221.19,-1394.5 211.19,-1398 221.19,-1401.5 221.19,-1394.5"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.7,-1398C279.53,-1398 247.37,-1398 221.54,-1398"/>
+<polygon fill="#000000" stroke="#000000" points="221.26,-1394.5 211.26,-1398 221.26,-1401.5 221.26,-1394.5"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1368 290.5,-1368 290.5,-1344 367.5,-1344 367.5,-1368"/>
-<text text-anchor="middle" x="329" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-1368 302,-1368 302,-1344 356,-1344 356,-1368"/>
+<text text-anchor="middle" x="329" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
-</g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.4,-1365.37C276.7,-1368.88 261.11,-1372.99 247,-1377 238.45,-1379.43 229.34,-1382.15 220.65,-1384.81"/>
+</g>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.65,-1362.51C285.77,-1366.51 265.17,-1371.84 247,-1377 238.45,-1379.43 229.34,-1382.15 220.65,-1384.81"/>
 <polygon fill="#000000" stroke="#000000" points="219.6,-1381.47 211.08,-1387.76 221.67,-1388.16 219.6,-1381.47"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1326 295,-1326 295,-1302 363,-1302 363,-1326"/>
-<text text-anchor="middle" x="329" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<text text-anchor="middle" x="329" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.69,-1318.8C279.49,-1321.93 261.66,-1326.98 247,-1335 226.93,-1345.97 208.19,-1364.18 195.49,-1378.2"/>
 <polygon fill="#000000" stroke="#000000" points="192.7,-1376.07 188.74,-1385.89 197.97,-1380.68 192.7,-1376.07"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-1284 286,-1284 286,-1260 372,-1260 372,-1284"/>
-<text text-anchor="middle" x="329" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-1284 288,-1284 288,-1260 370,-1260 370,-1284"/>
+<text text-anchor="middle" x="329" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.88,-1276.79C272.53,-1279.85 258.31,-1284.84 247,-1293 217.56,-1314.23 197.58,-1352.49 187.25,-1376.5"/>
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.96,-1276.33C274.02,-1279.34 258.9,-1284.42 247,-1293 217.56,-1314.23 197.58,-1352.49 187.25,-1376.5"/>
 <polygon fill="#000000" stroke="#000000" points="183.98,-1375.24 183.42,-1385.82 190.46,-1377.91 183.98,-1375.24"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-1242 286,-1242 286,-1218 372,-1218 372,-1242"/>
-<text text-anchor="middle" x="329" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378,-1242 280,-1242 280,-1218 378,-1218 378,-1242"/>
+<text text-anchor="middle" x="329" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.59,-1233.79C272.07,-1236.77 257.82,-1241.97 247,-1251 207.99,-1283.56 190.17,-1343.39 183.07,-1375.78"/>
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.7,-1235.22C268.03,-1238.35 256.26,-1243.27 247,-1251 207.99,-1283.56 190.17,-1343.39 183.07,-1375.78"/>
 <polygon fill="#000000" stroke="#000000" points="179.55,-1375.5 180.98,-1386 186.41,-1376.9 179.55,-1375.5"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365,-1200 293,-1200 293,-1176 365,-1176 365,-1200"/>
-<text text-anchor="middle" x="329" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1200 289.5,-1200 289.5,-1176 368.5,-1176 368.5,-1200"/>
+<text text-anchor="middle" x="329" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.99,-1189.78C277.25,-1192.27 259.45,-1197.64 247,-1209 198.12,-1253.59 184.34,-1335.89 180.49,-1375.52"/>
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.29,-1190.41C274.52,-1193.14 258.48,-1198.52 247,-1209 198.12,-1253.59 184.34,-1335.89 180.49,-1375.52"/>
 <polygon fill="#000000" stroke="#000000" points="176.98,-1375.45 179.62,-1385.71 183.95,-1376.04 176.98,-1375.45"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371,-1158 287,-1158 287,-1134 371,-1134 371,-1158"/>
-<text text-anchor="middle" x="329" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="391,-1158 267,-1158 267,-1134 391,-1134 391,-1158"/>
+<text text-anchor="middle" x="329" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.89,-1148.47C272.67,-1151.27 257.65,-1156.69 247,-1167 187.89,-1224.21 179.47,-1329.95 178.74,-1375.82"/>
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.82,-1154.4C259.5,-1157.46 252.64,-1161.54 247,-1167 187.89,-1224.21 179.47,-1329.95 178.74,-1375.82"/>
 <polygon fill="#000000" stroke="#000000" points="175.24,-1375.86 178.7,-1385.88 182.24,-1375.9 175.24,-1375.86"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356.5,-1116 301.5,-1116 301.5,-1092 356.5,-1092 356.5,-1116"/>
-<text text-anchor="middle" x="329" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1116 295,-1116 295,-1092 363,-1092 363,-1116"/>
+<text text-anchor="middle" x="329" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.23,-1104.19C283.54,-1105.77 261.11,-1110.76 247,-1125 211.4,-1160.94 188.89,-1317.47 181.59,-1375.9"/>
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.91,-1104.89C278.45,-1107.05 259.47,-1112.41 247,-1125 211.4,-1160.94 188.89,-1317.47 181.59,-1375.9"/>
 <polygon fill="#000000" stroke="#000000" points="178.11,-1375.56 180.37,-1385.91 185.06,-1376.41 178.11,-1375.56"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364.5,-1074 293.5,-1074 293.5,-1050 364.5,-1050 364.5,-1074"/>
-<text text-anchor="middle" x="329" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1074 290.5,-1074 290.5,-1050 367.5,-1050 367.5,-1074"/>
+<text text-anchor="middle" x="329" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.11,-1062.95C277.01,-1065.2 258.87,-1070.63 247,-1083 206.25,-1125.46 186.55,-1310.85 180.83,-1375.59"/>
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.23,-1063.38C274.88,-1065.87 258.17,-1071.37 247,-1083 206.25,-1125.46 186.55,-1310.85 180.83,-1375.59"/>
 <polygon fill="#000000" stroke="#000000" points="177.31,-1375.63 179.95,-1385.89 184.29,-1376.23 177.31,-1375.63"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-1032 302,-1032 302,-1008 356,-1008 356,-1032"/>
-<text text-anchor="middle" x="329" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1032 295,-1032 295,-1008 363,-1008 363,-1032"/>
+<text text-anchor="middle" x="329" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.74,-1019.88C283.82,-1021.27 260.9,-1026.16 247,-1041 201.04,-1090.07 184.47,-1304.89 180.22,-1375.45"/>
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.61,-1020.61C278.08,-1022.69 259.12,-1028.06 247,-1041 201.04,-1090.07 184.47,-1304.89 180.22,-1375.45"/>
 <polygon fill="#000000" stroke="#000000" points="176.7,-1375.66 179.62,-1385.84 183.69,-1376.06 176.7,-1375.66"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-990 289.5,-990 289.5,-966 368.5,-966 368.5,-990"/>
-<text text-anchor="middle" x="329" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-990 290.5,-990 290.5,-966 367.5,-966 367.5,-990"/>
+<text text-anchor="middle" x="329" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.14,-979.29C273.99,-981.8 257.71,-987.34 247,-999 195.79,-1054.75 182.61,-1299.25 179.72,-1375.32"/>
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.39,-979.08C274.89,-981.5 258.01,-987.02 247,-999 195.79,-1054.75 182.61,-1299.25 179.72,-1375.32"/>
 <polygon fill="#000000" stroke="#000000" points="176.21,-1375.54 179.36,-1385.66 183.21,-1375.79 176.21,-1375.54"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-948 302,-948 302,-924 356,-924 356,-948"/>
-<text text-anchor="middle" x="329" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-948 286,-948 286,-924 372,-924 372,-948"/>
+<text text-anchor="middle" x="329" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.96,-935.71C283.91,-936.98 260.74,-941.81 247,-957 190.44,-1019.57 180.9,-1294.78 179.31,-1375.61"/>
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.7,-937.8C271.52,-940.55 256.84,-946.12 247,-957 190.44,-1019.57 180.9,-1294.78 179.31,-1375.61"/>
 <polygon fill="#000000" stroke="#000000" points="175.81,-1375.62 179.14,-1385.68 182.81,-1375.74 175.81,-1375.62"/>
 </g>
 <!-- sourcefile~discard.f90 -->
@@ -1019,319 +1019,319 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296.38,-894.14C279.31,-895.96 259.28,-901.23 247,-915 185.09,-984.39 179.36,-1290.25 178.98,-1375.74"/>
 <polygon fill="#000000" stroke="#000000" points="175.48,-1375.87 178.96,-1385.88 182.48,-1375.88 175.48,-1375.87"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-864 286.5,-864 286.5,-840 371.5,-840 371.5,-864"/>
-<text text-anchor="middle" x="329" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356.5,-864 301.5,-864 301.5,-840 356.5,-840 356.5,-864"/>
+<text text-anchor="middle" x="329" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.39,-853.51C271.95,-856.19 256.9,-861.78 247,-873 179.79,-949.17 177.95,-1285.22 178.7,-1375.57"/>
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.47,-851.63C283.42,-852.9 260.46,-857.75 247,-873 179.79,-949.17 177.95,-1285.22 178.7,-1375.57"/>
 <polygon fill="#000000" stroke="#000000" points="175.2,-1375.81 178.8,-1385.77 182.2,-1375.74 175.2,-1375.81"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="380.5,-822 277.5,-822 277.5,-798 380.5,-798 380.5,-822"/>
-<text text-anchor="middle" x="329" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-822 286.5,-822 286.5,-798 371.5,-798 371.5,-822"/>
+<text text-anchor="middle" x="329" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.47,-813.49C265.97,-816.65 254.84,-822.03 247,-831 210.45,-872.83 185.78,-1275.97 180.2,-1375.75"/>
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.34,-811.46C271.88,-814.13 256.85,-819.73 247,-831 210.45,-872.83 185.78,-1275.97 180.2,-1375.75"/>
 <polygon fill="#000000" stroke="#000000" points="176.7,-1375.72 179.64,-1385.89 183.69,-1376.1 176.7,-1375.72"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-780 295,-780 295,-756 363,-756 363,-780"/>
-<text text-anchor="middle" x="329" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376.5,-780 281.5,-780 281.5,-756 376.5,-756 376.5,-780"/>
+<text text-anchor="middle" x="329" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.61,-768.18C277.86,-770.12 258.7,-775.5 247,-789 207.75,-834.28 184.92,-1271.52 180.01,-1375.77"/>
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.22,-770.48C268.4,-773.47 255.66,-779.01 247,-789 207.75,-834.28 184.92,-1271.52 180.01,-1375.77"/>
 <polygon fill="#000000" stroke="#000000" points="176.51,-1375.65 179.54,-1385.8 183.5,-1375.97 176.51,-1375.65"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356.5,-738 301.5,-738 301.5,-714 356.5,-714 356.5,-738"/>
-<text text-anchor="middle" x="329" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377,-738 281,-738 281,-714 377,-714 377,-738"/>
+<text text-anchor="middle" x="329" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.35,-725.53C283.25,-726.75 260.27,-731.58 247,-747 205.08,-795.72 184.14,-1266.78 179.84,-1375.63"/>
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.75,-728.54C268.07,-731.55 255.53,-737.09 247,-747 205.08,-795.72 184.14,-1266.78 179.84,-1375.63"/>
 <polygon fill="#000000" stroke="#000000" points="176.34,-1375.67 179.45,-1385.79 183.33,-1375.94 176.34,-1375.67"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="380.5,-696 277.5,-696 277.5,-672 380.5,-672 380.5,-696"/>
-<text text-anchor="middle" x="329" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-696 302,-696 302,-672 356,-672 356,-696"/>
+<text text-anchor="middle" x="329" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.34,-687.37C265.83,-690.54 254.74,-695.95 247,-705 202.37,-757.19 183.4,-1262.58 179.69,-1375.64"/>
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.71,-683.48C283.53,-684.64 260.31,-689.43 247,-705 202.37,-757.19 183.4,-1262.58 179.69,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="176.19,-1375.76 179.37,-1385.86 183.18,-1375.98 176.19,-1375.76"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-654 302,-654 302,-630 356,-630 356,-654"/>
-<text text-anchor="middle" x="329" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-654 292.5,-654 292.5,-630 365.5,-630 365.5,-654"/>
+<text text-anchor="middle" x="329" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.68,-641.46C283.49,-642.61 260.27,-647.4 247,-663 199.7,-718.62 182.72,-1257.76 179.57,-1375.4"/>
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.44,-642.34C276.18,-644.46 258.1,-649.94 247,-663 199.7,-718.62 182.72,-1257.76 179.57,-1375.4"/>
 <polygon fill="#000000" stroke="#000000" points="176.06,-1375.63 179.3,-1385.72 183.06,-1375.82 176.06,-1375.63"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-612 286,-612 286,-588 372,-588 372,-612"/>
-<text text-anchor="middle" x="329" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-612 286.5,-612 286.5,-588 371.5,-588 371.5,-612"/>
+<text text-anchor="middle" x="329" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.72,-601.37C271.37,-604.06 256.57,-609.69 247,-621 196.96,-680.15 182.04,-1254.56 179.44,-1375.66"/>
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.14,-601.3C271.66,-603.95 256.66,-609.58 247,-621 196.96,-680.15 182.04,-1254.56 179.44,-1375.66"/>
 <polygon fill="#000000" stroke="#000000" points="175.94,-1375.86 179.23,-1385.93 182.94,-1376 175.94,-1375.86"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-570 286,-570 286,-546 372,-546 372,-570"/>
-<text text-anchor="middle" x="329" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-570 300.5,-570 300.5,-546 357.5,-546 357.5,-570"/>
+<text text-anchor="middle" x="329" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.69,-559.35C271.34,-562.03 256.55,-567.67 247,-579 194.25,-641.63 181.42,-1250.62 179.34,-1375.64"/>
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M300.47,-557.5C282.44,-558.76 259.91,-563.67 247,-579 194.25,-641.63 181.42,-1250.62 179.34,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="175.83,-1375.84 179.17,-1385.9 182.83,-1375.96 175.83,-1375.84"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376.5,-528 281.5,-528 281.5,-504 376.5,-504 376.5,-528"/>
-<text text-anchor="middle" x="329" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-528 299,-528 299,-504 359,-504 359,-528"/>
+<text text-anchor="middle" x="329" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.44,-518.21C268.47,-521.17 255.59,-526.76 247,-537 191.52,-603.14 180.83,-1247.08 179.24,-1375.71"/>
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.87,-515.6C281.12,-517.03 259.51,-522.09 247,-537 191.52,-603.14 180.83,-1247.08 179.24,-1375.71"/>
 <polygon fill="#000000" stroke="#000000" points="175.74,-1375.88 179.12,-1385.92 182.74,-1375.96 175.74,-1375.88"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="400,-486 258,-486 258,-462 400,-462 400,-486"/>
-<text text-anchor="middle" x="329" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365,-486 293,-486 293,-462 365,-462 365,-486"/>
+<text text-anchor="middle" x="329" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.69,-485.67C253.7,-488.24 250.07,-491.32 247,-495 188.77,-564.67 180.26,-1243.95 179.15,-1375.87"/>
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.76,-474.21C276.37,-476.26 258.09,-481.73 247,-495 188.77,-564.67 180.26,-1243.95 179.15,-1375.87"/>
 <polygon fill="#000000" stroke="#000000" points="175.65,-1375.95 179.07,-1385.98 182.65,-1376.01 175.65,-1375.95"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-444 299,-444 299,-420 359,-420 359,-444"/>
-<text text-anchor="middle" x="329" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-444 254,-444 254,-420 404,-420 404,-444"/>
+<text text-anchor="middle" x="329" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.83,-431.57C281.07,-432.99 259.46,-438.04 247,-453 186.08,-526.15 179.73,-1239.73 179.08,-1375.69"/>
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M256.95,-444.13C253.25,-446.61 249.88,-449.54 247,-453 186.08,-526.15 179.73,-1239.73 179.08,-1375.69"/>
 <polygon fill="#000000" stroke="#000000" points="175.58,-1375.74 179.03,-1385.76 182.58,-1375.77 175.58,-1375.74"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
+<!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370.5,-402 287.5,-402 287.5,-378 370.5,-378 370.5,-402"/>
-<text text-anchor="middle" x="329" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-402 286,-402 286,-378 372,-378 372,-402"/>
+<text text-anchor="middle" x="329" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.29,-390.98C272.42,-393.52 256.84,-399.15 247,-411 183.37,-487.64 179.22,-1235.84 179,-1375.58"/>
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.61,-391.28C271.25,-393.95 256.47,-399.6 247,-411 183.37,-487.64 179.22,-1235.84 179,-1375.58"/>
 <polygon fill="#000000" stroke="#000000" points="175.5,-1375.89 178.99,-1385.9 182.5,-1375.9 175.5,-1375.89"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378,-360 280,-360 280,-336 378,-336 378,-360"/>
-<text text-anchor="middle" x="329" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370.5,-360 287.5,-360 287.5,-336 370.5,-336 370.5,-360"/>
+<text text-anchor="middle" x="329" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.67,-350.54C267.27,-353.59 255.15,-359.15 247,-369 180.65,-449.14 178.73,-1232.16 178.94,-1375.52"/>
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.28,-348.96C272.4,-351.5 256.82,-357.14 247,-369 180.65,-449.14 178.73,-1232.16 178.94,-1375.52"/>
 <polygon fill="#000000" stroke="#000000" points="175.44,-1375.74 178.96,-1385.73 182.44,-1375.73 175.44,-1375.74"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376,-318 282,-318 282,-294 376,-294 376,-318"/>
-<text text-anchor="middle" x="329" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-318 286.5,-318 286.5,-294 371.5,-294 371.5,-318"/>
+<text text-anchor="middle" x="329" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.77,-308.03C268.64,-310.96 255.6,-316.58 247,-327 177.91,-410.66 178.25,-1228.83 178.87,-1375.53"/>
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.42,-307.1C271.79,-309.7 256.62,-315.35 247,-327 177.91,-410.66 178.25,-1228.83 178.87,-1375.53"/>
 <polygon fill="#000000" stroke="#000000" points="175.38,-1375.97 178.92,-1385.95 182.38,-1375.93 175.38,-1375.97"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367,-276 291,-276 291,-252 367,-252 367,-276"/>
-<text text-anchor="middle" x="329" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-276 286,-276 286,-252 372,-252 372,-276"/>
+<text text-anchor="middle" x="329" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.6,-264.42C274.74,-266.65 257.53,-272.22 247,-285 175.17,-372.19 177.8,-1225.69 178.82,-1375.58"/>
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.98,-265.16C271.48,-267.8 256.51,-273.45 247,-285 175.17,-372.19 177.8,-1225.69 178.82,-1375.58"/>
 <polygon fill="#000000" stroke="#000000" points="175.32,-1375.87 178.89,-1385.84 182.32,-1375.81 175.32,-1375.87"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-234 289.5,-234 289.5,-210 368.5,-210 368.5,-234"/>
-<text text-anchor="middle" x="329" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-234 291.5,-234 291.5,-210 366.5,-210 366.5,-234"/>
+<text text-anchor="middle" x="329" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.33,-222.59C273.83,-224.94 257.24,-230.54 247,-243 172.42,-333.74 177.36,-1222.83 178.77,-1375.69"/>
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.42,-222.29C275.33,-224.45 257.7,-229.98 247,-243 172.42,-333.74 177.36,-1222.83 178.77,-1375.69"/>
 <polygon fill="#000000" stroke="#000000" points="175.27,-1375.79 178.86,-1385.75 182.27,-1375.72 175.27,-1375.79"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367,-192 291,-192 291,-168 367,-168 367,-192"/>
-<text text-anchor="middle" x="329" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-192 289.5,-192 289.5,-168 368.5,-168 368.5,-192"/>
+<text text-anchor="middle" x="329" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.99,-180.34C275.02,-182.53 257.59,-188.08 247,-201 208.25,-248.25 183.37,-1216.3 179.52,-1375.83"/>
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.32,-180.58C273.81,-182.93 257.23,-188.53 247,-201 208.25,-248.25 183.37,-1216.3 179.52,-1375.83"/>
 <polygon fill="#000000" stroke="#000000" points="176.02,-1375.82 179.28,-1385.9 183.02,-1375.99 176.02,-1375.82"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="391,-150 267,-150 267,-126 391,-126 391,-150"/>
-<text text-anchor="middle" x="329" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="388,-150 270,-150 270,-126 388,-126 388,-150"/>
+<text text-anchor="middle" x="329" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.77,-144.72C259.17,-148 252.25,-152.59 247,-159 206.9,-207.99 183.1,-1212.01 179.48,-1375.57"/>
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.59,-143.58C260.9,-146.9 252.89,-151.81 247,-159 206.9,-207.99 183.1,-1212.01 179.48,-1375.57"/>
 <polygon fill="#000000" stroke="#000000" points="175.98,-1375.79 179.26,-1385.87 182.98,-1375.95 175.98,-1375.79"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-108 302,-108 302,-84 356,-84 356,-108"/>
-<text text-anchor="middle" x="329" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376,-108 282,-108 282,-84 376,-84 376,-108"/>
+<text text-anchor="middle" x="329" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.88,-95.28C283.55,-96.31 260.05,-101.03 247,-117 205.5,-167.79 182.79,-1209.95 179.44,-1375.83"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.7,-97.97C268.58,-100.91 255.55,-106.54 247,-117 205.5,-167.79 182.79,-1209.95 179.44,-1375.83"/>
 <polygon fill="#000000" stroke="#000000" points="175.94,-1375.79 179.24,-1385.86 182.94,-1375.93 175.94,-1375.79"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-66 295,-66 295,-42 363,-42 363,-66"/>
-<text text-anchor="middle" x="329" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376,-66 282,-66 282,-42 376,-42 376,-66"/>
+<text text-anchor="middle" x="329" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.68,-53.86C277.75,-55.68 258.39,-61.04 247,-75 204.15,-127.54 182.54,-1206.03 179.4,-1375.64"/>
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.69,-55.97C268.56,-58.9 255.54,-64.53 247,-75 204.15,-127.54 182.54,-1206.03 179.4,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="175.9,-1375.8 179.21,-1385.87 182.9,-1375.93 175.9,-1375.8"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~lambda_function.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-24 286.5,-24 286.5,0 371.5,0 371.5,-24"/>
-<text text-anchor="middle" x="329" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~lambda_function.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369,-24 289,-24 289,0 369,0 369,-24"/>
+<text text-anchor="middle" x="329" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.33,-13.03C271.7,-15.62 256.54,-21.28 247,-33 202.76,-87.32 182.27,-1203.36 179.36,-1375.73"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~lambda_function.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.86,-12.61C273.47,-14.99 257.09,-20.61 247,-33 202.76,-87.32 182.27,-1203.36 179.36,-1375.73"/>
 <polygon fill="#000000" stroke="#000000" points="175.86,-1375.84 179.19,-1385.89 182.86,-1375.95 175.86,-1375.84"/>
 </g>
 </g>
diff --git a/docs/sourcefile/netcdf.f90.html b/docs/sourcefile/netcdf.f90.html
index 3af7feeb7..062cec563 100644
--- a/docs/sourcefile/netcdf.f90.html
+++ b/docs/sourcefile/netcdf.f90.html
@@ -134,7 +134,7 @@ <h1>netcdf.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 2.4% of total for source files.">391 statements</a>
+    title=" 2.5% of total for source files.">410 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~netcdf.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilenetcdff90EfferentGraph" width="641pt" height="300pt"
- viewBox="0.00 0.00 641.00 300.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~netcdf.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefilenetcdff90EfferentGraph" width="641pt" height="248pt"
+ viewBox="0.00 0.00 641.00 247.76" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~netcdf.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 884,-412.12 884,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 884,-339.24 884,4 -4,4"/>
 <!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~netcdf.f90</title>
-<polygon fill="none" stroke="black" points="880,-133.12 820,-133.12 820,-109.12 880,-109.12 880,-133.12"/>
-<text text-anchor="middle" x="850" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf.f90</text>
+<polygon fill="none" stroke="black" points="880,-235.24 820,-235.24 820,-211.24 880,-211.24 880,-235.24"/>
+<text text-anchor="middle" x="850" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">netcdf.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.14,-109.09C791.46,-87.43 706.35,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M822.42,-235.38C781.53,-252.91 700.36,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M836.71,-133.4C820.24,-149.87 790.82,-179.29 771.36,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="768.78,-196.39 764.19,-205.93 773.73,-201.34 768.78,-196.39"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-211.24C810.77,-207.47 800.55,-203.26 790.87,-199.26"/>
+<polygon fill="#000000" stroke="#000000" points="792,-195.95 781.42,-195.37 789.33,-202.42 792,-195.95"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~netcdf.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~netcdf.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~netcdf.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -652,466 +644,487 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-38"></a>      <span class="c">!! author: Carlisle A. Wishard, Dana Singh, and David A. Minton</span>
 <a name="ln-39"></a>      <span class="c">!!</span>
 <a name="ln-40"></a>      <span class="c">!! Initialize a NetCDF file system and defines all variables.</span>
-<a name="ln-41"></a>      <span class="k">implicit none</span>
-<a name="ln-42"></a>      <span class="c">! Arguments</span>
-<a name="ln-43"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
-<a name="ln-44"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>           <span class="c">!! Current run configuration parameters </span>
-<a name="ln-45"></a>      <span class="c">! Internals</span>
-<a name="ln-46"></a>      <span class="kt">logical</span> <span class="kd">::</span> <span class="n">fileExists</span>
-<a name="ln-47"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">old_mode</span>
-<a name="ln-48"></a>
-<a name="ln-49"></a>      <span class="c">!! Create the new output file, deleting any previously existing output file of the same name</span>
-<a name="ln-50"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_create</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">outfile</span><span class="p">,</span> <span class="n">NF90_NETCDF4</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-51"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_set_fill</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">nf90_nofill</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-52"></a>
-<a name="ln-53"></a>      <span class="c">! Define the NetCDF dimensions with particle name as the record dimension</span>
-<a name="ln-54"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_dim</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ID_DIMNAME</span><span class="p">,</span> <span class="n">NF90_UNLIMITED</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">)</span> <span class="p">)</span>     <span class="c">! &#39;x&#39; dimension</span>
-<a name="ln-55"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_dim</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">TIME_DIMNAME</span><span class="p">,</span> <span class="n">NF90_UNLIMITED</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">)</span> <span class="p">)</span> <span class="c">! &#39;y&#39; dimension</span>
-<a name="ln-56"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_dim</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">STR_DIMNAME</span><span class="p">,</span> <span class="n">NAMELEN</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">)</span> <span class="p">)</span> <span class="c">! Dimension for string variables (aka character arrays)</span>
+<a name="ln-41"></a>      <span class="k">use</span><span class="p">,</span> <span class="k">intrinsic</span> <span class="kd">::</span> <span class="n">ieee_arithmetic</span>
+<a name="ln-42"></a>      <span class="k">implicit none</span>
+<a name="ln-43"></a>      <span class="c">! Arguments</span>
+<a name="ln-44"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
+<a name="ln-45"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>           <span class="c">!! Current run configuration parameters </span>
+<a name="ln-46"></a>      <span class="c">! Internals</span>
+<a name="ln-47"></a>      <span class="kt">logical</span> <span class="kd">::</span> <span class="n">fileExists</span>
+<a name="ln-48"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">old_mode</span><span class="p">,</span> <span class="n">nvar</span><span class="p">,</span> <span class="n">varid</span><span class="p">,</span> <span class="n">vartype</span>
+<a name="ln-49"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dfill</span>
+<a name="ln-50"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">SP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">sfill</span>
+<a name="ln-51"></a>
+<a name="ln-52"></a>      <span class="n">dfill</span> <span class="o">=</span> <span class="n">ieee_value</span><span class="p">(</span><span class="n">dfill</span><span class="p">,</span> <span class="n">IEEE_QUIET_NAN</span><span class="p">)</span>
+<a name="ln-53"></a>      <span class="n">sfill</span> <span class="o">=</span> <span class="n">ieee_value</span><span class="p">(</span><span class="n">sfill</span><span class="p">,</span> <span class="n">IEEE_QUIET_NAN</span><span class="p">)</span>
+<a name="ln-54"></a>
+<a name="ln-55"></a>      <span class="c">!! Create the new output file, deleting any previously existing output file of the same name</span>
+<a name="ln-56"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_create</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">outfile</span><span class="p">,</span> <span class="n">NF90_NETCDF4</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">)</span> <span class="p">)</span>
 <a name="ln-57"></a>
-<a name="ln-58"></a>      <span class="k">select case</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_type</span><span class="p">)</span>
-<a name="ln-59"></a>      <span class="k">case</span><span class="p">(</span><span class="n">NETCDF_FLOAT_TYPE</span><span class="p">)</span>
-<a name="ln-60"></a>         <span class="n">self</span><span class="p">%</span><span class="n">out_type</span> <span class="o">=</span> <span class="n">NF90_FLOAT</span>
-<a name="ln-61"></a>      <span class="k">case</span><span class="p">(</span><span class="n">NETCDF_DOUBLE_TYPE</span><span class="p">)</span>
-<a name="ln-62"></a>         <span class="n">self</span><span class="p">%</span><span class="n">out_type</span> <span class="o">=</span> <span class="n">NF90_DOUBLE</span>
-<a name="ln-63"></a>      <span class="k">end select</span>
-<a name="ln-64"></a>
-<a name="ln-65"></a>      <span class="c">!! Define the variables</span>
-<a name="ln-66"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">TIME_DIMNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-67"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ID_DIMNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-68"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NPL_VARNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">npl_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-69"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NTP_VARNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ntp_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-70"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NAME_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">name_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-71"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PTYPE_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-72"></a>      <span class="k">if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XV</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-73"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">xhx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-74"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">xhy_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-75"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">xhz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-76"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">vhx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-77"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">vhy_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-78"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">vhz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-79"></a>      <span class="k">end if</span>
-<a name="ln-80"></a><span class="k">   </span>
-<a name="ln-81"></a><span class="k">      if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">EL</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-82"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">A_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">a_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-83"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">E_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">e_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-84"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">INC_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">inc_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-85"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPOM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">capom_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-86"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">OMEGA_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">omega_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-87"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">capm_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-88"></a>      <span class="k">end if</span>
-<a name="ln-89"></a>
-<a name="ln-90"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMASS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-91"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrhill_present</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RHILL_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">rhill_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-92"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lclose</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RADIUS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-93"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-94"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP1_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-95"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-96"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP3_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-97"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-98"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-99"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-100"></a>      <span class="k">end if</span>
-<a name="ln-101"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-102"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">K2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-103"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">Q_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-104"></a>      <span class="k">end if</span>
-<a name="ln-105"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lenergy</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-106"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_ORB_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_orb_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-107"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_SPIN_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_spin_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-108"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">PE_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-109"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-110"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orby_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-111"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-112"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-113"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spiny_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-114"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-115"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapex_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-116"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapey_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-117"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapez_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-118"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ECOLLISIONS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ecollisions_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-119"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">EUNTRACKED_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Euntracked_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-120"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMESCAPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">GMescape_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-121"></a>      <span class="k">end if</span>
-<a name="ln-122"></a>
-<a name="ln-123"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">STATUS_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">status_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-124"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TYPE_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-125"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-126"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-127"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-128"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-129"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-130"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-131"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span>  <span class="n">self</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-132"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-133"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-134"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-135"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-136"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-137"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-138"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span>  <span class="n">self</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-139"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_BODY_ID_VARNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_body_id_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-140"></a>
-<a name="ln-141"></a>      <span class="k">return</span>
-<a name="ln-142"></a><span class="k">   end subroutine </span><span class="n">netcdf_initialize_output</span>
-<a name="ln-143"></a>
-<a name="ln-144"></a>
-<a name="ln-145"></a>   <span class="k">module subroutine </span><span class="n">netcdf_open</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-146"></a>      <span class="c">!! author: Carlisle A. Wishard, Dana Singh, and David A. Minton</span>
-<a name="ln-147"></a>      <span class="c">!!</span>
-<a name="ln-148"></a>      <span class="c">!! Opens a NetCDF file and does the variable inquiries to activate variable ids</span>
-<a name="ln-149"></a>      <span class="k">implicit none</span>
-<a name="ln-150"></a>      <span class="c">! Arguments</span>
-<a name="ln-151"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
-<a name="ln-152"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-153"></a>      <span class="c">! Internals</span>
-<a name="ln-154"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">old_mode</span>
-<a name="ln-155"></a>
-<a name="ln-156"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_open</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">outfile</span><span class="p">,</span> <span class="n">nf90_write</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-157"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_set_fill</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">nf90_nofill</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-158"></a>
-<a name="ln-159"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">TIME_DIMNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_varid</span><span class="p">))</span>
-<a name="ln-160"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ID_DIMNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_varid</span><span class="p">))</span>
-<a name="ln-161"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NPL_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">npl_varid</span><span class="p">))</span>
-<a name="ln-162"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NTP_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ntp_varid</span><span class="p">))</span>
-<a name="ln-163"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NAME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">name_varid</span><span class="p">))</span>
-<a name="ln-164"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PTYPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">))</span>
+<a name="ln-58"></a>      <span class="c">! Define the NetCDF dimensions with particle name as the record dimension</span>
+<a name="ln-59"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_dim</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ID_DIMNAME</span><span class="p">,</span> <span class="n">NF90_UNLIMITED</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">)</span> <span class="p">)</span>     <span class="c">! &#39;x&#39; dimension</span>
+<a name="ln-60"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_dim</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">TIME_DIMNAME</span><span class="p">,</span> <span class="n">NF90_UNLIMITED</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">)</span> <span class="p">)</span> <span class="c">! &#39;y&#39; dimension</span>
+<a name="ln-61"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_dim</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">STR_DIMNAME</span><span class="p">,</span> <span class="n">NAMELEN</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">)</span> <span class="p">)</span> <span class="c">! Dimension for string variables (aka character arrays)</span>
+<a name="ln-62"></a>
+<a name="ln-63"></a>      <span class="k">select case</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_type</span><span class="p">)</span>
+<a name="ln-64"></a>      <span class="k">case</span><span class="p">(</span><span class="n">NETCDF_FLOAT_TYPE</span><span class="p">)</span>
+<a name="ln-65"></a>         <span class="n">self</span><span class="p">%</span><span class="n">out_type</span> <span class="o">=</span> <span class="n">NF90_FLOAT</span>
+<a name="ln-66"></a>      <span class="k">case</span><span class="p">(</span><span class="n">NETCDF_DOUBLE_TYPE</span><span class="p">)</span>
+<a name="ln-67"></a>         <span class="n">self</span><span class="p">%</span><span class="n">out_type</span> <span class="o">=</span> <span class="n">NF90_DOUBLE</span>
+<a name="ln-68"></a>      <span class="k">end select</span>
+<a name="ln-69"></a>
+<a name="ln-70"></a>      <span class="c">!! Define the variables</span>
+<a name="ln-71"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">TIME_DIMNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-72"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ID_DIMNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-73"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NPL_VARNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">npl_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-74"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NTP_VARNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ntp_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-75"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NAME_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">name_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-76"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PTYPE_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-77"></a>      <span class="k">if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XV</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-78"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">xhx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-79"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">xhy_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-80"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">xhz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-81"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">vhx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-82"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">vhy_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-83"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">vhz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-84"></a>      <span class="k">end if</span>
+<a name="ln-85"></a><span class="k">   </span>
+<a name="ln-86"></a><span class="k">      if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">EL</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-87"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">A_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">a_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-88"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">E_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">e_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-89"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">INC_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">inc_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-90"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPOM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">capom_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-91"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">OMEGA_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">omega_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-92"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">capm_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-93"></a>      <span class="k">end if</span>
+<a name="ln-94"></a>
+<a name="ln-95"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMASS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-96"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrhill_present</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RHILL_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">rhill_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-97"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lclose</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RADIUS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-98"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-99"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP1_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-100"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-101"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP3_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-102"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-103"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-104"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-105"></a>      <span class="k">end if</span>
+<a name="ln-106"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-107"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">K2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-108"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">Q_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-109"></a>      <span class="k">end if</span>
+<a name="ln-110"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lenergy</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-111"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_ORB_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_orb_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-112"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_SPIN_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_spin_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-113"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">PE_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-114"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-115"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orby_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-116"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-117"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-118"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spiny_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-119"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-120"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapex_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-121"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapey_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-122"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapez_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-123"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ECOLLISIONS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ecollisions_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-124"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">EUNTRACKED_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Euntracked_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-125"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMESCAPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">GMescape_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-126"></a>      <span class="k">end if</span>
+<a name="ln-127"></a>
+<a name="ln-128"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">STATUS_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">status_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-129"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TYPE_VARNAME</span><span class="p">,</span> <span class="n">NF90_CHAR</span><span class="p">,</span> <span class="p">[</span><span class="n">self</span><span class="p">%</span><span class="n">str_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">],</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-130"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-131"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-132"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-133"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-134"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-135"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-136"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span>  <span class="n">self</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-137"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-138"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-139"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-140"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-141"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-142"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-143"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">out_type</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span>  <span class="n">self</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-144"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_BODY_ID_VARNAME</span><span class="p">,</span> <span class="n">NF90_INT</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_dimid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_body_id_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-145"></a>
+<a name="ln-146"></a>      <span class="c">! Set fill mode to NaN for all variables</span>
+<a name="ln-147"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inquire</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">nVariables</span><span class="o">=</span><span class="n">nvar</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-148"></a>      <span class="k">do </span><span class="n">varid</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nvar</span>
+<a name="ln-149"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inquire_variable</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">varid</span><span class="p">,</span> <span class="n">xtype</span><span class="o">=</span><span class="n">vartype</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-150"></a>         <span class="k">select case</span><span class="p">(</span><span class="n">vartype</span><span class="p">)</span>
+<a name="ln-151"></a>         <span class="k">case</span><span class="p">(</span><span class="n">NF90_INT</span><span class="p">)</span>
+<a name="ln-152"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var_fill</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">varid</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="n">NF90_FILL_INT</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-153"></a>         <span class="k">case</span><span class="p">(</span><span class="n">NF90_FLOAT</span><span class="p">)</span>
+<a name="ln-154"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var_fill</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">varid</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="n">sfill</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-155"></a>         <span class="k">case</span><span class="p">(</span><span class="n">NF90_DOUBLE</span><span class="p">)</span>
+<a name="ln-156"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var_fill</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">varid</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="n">dfill</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-157"></a>         <span class="k">case</span><span class="p">(</span><span class="n">NF90_CHAR</span><span class="p">)</span>
+<a name="ln-158"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_def_var_fill</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">varid</span><span class="p">,</span> <span class="mi">0</span><span class="p">,</span> <span class="mi">0</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-159"></a>         <span class="k">end select</span>
+<a name="ln-160"></a><span class="k">      end do</span>
+<a name="ln-161"></a>
+<a name="ln-162"></a><span class="k">      return</span>
+<a name="ln-163"></a><span class="k">   end subroutine </span><span class="n">netcdf_initialize_output</span>
+<a name="ln-164"></a>
 <a name="ln-165"></a>
-<a name="ln-166"></a>      <span class="k">if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XV</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-167"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xhx_varid</span><span class="p">))</span>
-<a name="ln-168"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xhy_varid</span><span class="p">))</span>
-<a name="ln-169"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xhz_varid</span><span class="p">))</span>
-<a name="ln-170"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vhx_varid</span><span class="p">))</span>
-<a name="ln-171"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vhy_varid</span><span class="p">))</span>
-<a name="ln-172"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vhz_varid</span><span class="p">))</span>
-<a name="ln-173"></a>      <span class="k">end if</span>
-<a name="ln-174"></a><span class="k">      if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">EL</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-175"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">A_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">a_varid</span><span class="p">))</span>
-<a name="ln-176"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">E_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">e_varid</span><span class="p">))</span>
-<a name="ln-177"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">INC_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">inc_varid</span><span class="p">))</span>
-<a name="ln-178"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPOM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capom_varid</span><span class="p">))</span>
-<a name="ln-179"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">OMEGA_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">omega_varid</span><span class="p">))</span>
-<a name="ln-180"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capm_varid</span><span class="p">))</span>
-<a name="ln-181"></a>      <span class="k">end if</span>
-<a name="ln-182"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMASS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">))</span>
-<a name="ln-183"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lclose</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RADIUS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">))</span>
-<a name="ln-184"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrhill_present</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RHILL_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rhill_varid</span><span class="p">))</span>
-<a name="ln-185"></a>
-<a name="ln-186"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-187"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP1_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">))</span>
-<a name="ln-188"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">))</span>
-<a name="ln-189"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP3_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">))</span>
-<a name="ln-190"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">))</span>
-<a name="ln-191"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">))</span>
-<a name="ln-192"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">))</span>
-<a name="ln-193"></a>      <span class="k">end if</span>
-<a name="ln-194"></a>
-<a name="ln-195"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-196"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">K2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">))</span>
-<a name="ln-197"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">Q_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">))</span>
-<a name="ln-198"></a>      <span class="k">end if</span>
-<a name="ln-199"></a>
-<a name="ln-200"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lenergy</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-201"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_ORB_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_orb_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-202"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_SPIN_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_spin_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-203"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">PE_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-204"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-205"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orby_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-206"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-207"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinx_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-208"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spiny_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-209"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinz_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-210"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapex_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-211"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapey_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-212"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapez_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-213"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ECOLLISIONS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ecollisions_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-214"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">EUNTRACKED_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Euntracked_varid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-215"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMESCAPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">GMescape_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-166"></a>   <span class="k">module subroutine </span><span class="n">netcdf_open</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-167"></a>      <span class="c">!! author: Carlisle A. Wishard, Dana Singh, and David A. Minton</span>
+<a name="ln-168"></a>      <span class="c">!!</span>
+<a name="ln-169"></a>      <span class="c">!! Opens a NetCDF file and does the variable inquiries to activate variable ids</span>
+<a name="ln-170"></a>      <span class="k">implicit none</span>
+<a name="ln-171"></a>      <span class="c">! Arguments</span>
+<a name="ln-172"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
+<a name="ln-173"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-174"></a>
+<a name="ln-175"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_open</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">outfile</span><span class="p">,</span> <span class="n">nf90_write</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-176"></a>
+<a name="ln-177"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">TIME_DIMNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">time_varid</span><span class="p">))</span>
+<a name="ln-178"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ID_DIMNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id_varid</span><span class="p">))</span>
+<a name="ln-179"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NPL_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">npl_varid</span><span class="p">))</span>
+<a name="ln-180"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NTP_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ntp_varid</span><span class="p">))</span>
+<a name="ln-181"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">NAME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">name_varid</span><span class="p">))</span>
+<a name="ln-182"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PTYPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">))</span>
+<a name="ln-183"></a>
+<a name="ln-184"></a>      <span class="k">if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XV</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-185"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xhx_varid</span><span class="p">))</span>
+<a name="ln-186"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xhy_varid</span><span class="p">))</span>
+<a name="ln-187"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xhz_varid</span><span class="p">))</span>
+<a name="ln-188"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vhx_varid</span><span class="p">))</span>
+<a name="ln-189"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vhy_varid</span><span class="p">))</span>
+<a name="ln-190"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vhz_varid</span><span class="p">))</span>
+<a name="ln-191"></a>      <span class="k">end if</span>
+<a name="ln-192"></a><span class="k">      if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">EL</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-193"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">A_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">a_varid</span><span class="p">))</span>
+<a name="ln-194"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">E_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">e_varid</span><span class="p">))</span>
+<a name="ln-195"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">INC_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">inc_varid</span><span class="p">))</span>
+<a name="ln-196"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPOM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capom_varid</span><span class="p">))</span>
+<a name="ln-197"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">OMEGA_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">omega_varid</span><span class="p">))</span>
+<a name="ln-198"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">CAPM_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capm_varid</span><span class="p">))</span>
+<a name="ln-199"></a>      <span class="k">end if</span>
+<a name="ln-200"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMASS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">))</span>
+<a name="ln-201"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lclose</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RADIUS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">))</span>
+<a name="ln-202"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrhill_present</span><span class="p">)</span> <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">RHILL_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rhill_varid</span><span class="p">))</span>
+<a name="ln-203"></a>
+<a name="ln-204"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-205"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP1_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">))</span>
+<a name="ln-206"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">))</span>
+<a name="ln-207"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">IP3_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">))</span>
+<a name="ln-208"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">))</span>
+<a name="ln-209"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">))</span>
+<a name="ln-210"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ROTZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">))</span>
+<a name="ln-211"></a>      <span class="k">end if</span>
+<a name="ln-212"></a>
+<a name="ln-213"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-214"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">K2_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">))</span>
+<a name="ln-215"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">Q_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">))</span>
 <a name="ln-216"></a>      <span class="k">end if</span>
 <a name="ln-217"></a>
-<a name="ln-218"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">STATUS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">status_varid</span><span class="p">))</span>
-<a name="ln-219"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TYPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">))</span>
-<a name="ln-220"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">))</span>
-<a name="ln-221"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">))</span>
-<a name="ln-222"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">))</span>
-<a name="ln-223"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">))</span>
-<a name="ln-224"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">))</span>
-<a name="ln-225"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">))</span>
-<a name="ln-226"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">))</span>
-<a name="ln-227"></a>
-<a name="ln-228"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">))</span>
-<a name="ln-229"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">))</span>
-<a name="ln-230"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">))</span>
-<a name="ln-231"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">))</span>
-<a name="ln-232"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">))</span>
-<a name="ln-233"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">))</span>
-<a name="ln-234"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">))</span>
-<a name="ln-235"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_BODY_ID_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_body_id_varid</span><span class="p">))</span>
-<a name="ln-236"></a>
-<a name="ln-237"></a>      <span class="k">return</span>
-<a name="ln-238"></a><span class="k">   end subroutine </span><span class="n">netcdf_open</span>
-<a name="ln-239"></a>
-<a name="ln-240"></a>
-<a name="ln-241"></a>   <span class="k">module subroutine </span><span class="n">netcdf_write_frame_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-242"></a>      <span class="c">!! author: Carlisle A. Wishard, Dana Singh, and David A. Minton</span>
-<a name="ln-243"></a>      <span class="c">!!</span>
-<a name="ln-244"></a>      <span class="c">!! Write a frame of output of either test particle or massive body data to the binary output file</span>
-<a name="ln-245"></a>      <span class="c">!!    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method</span>
-<a name="ln-246"></a>      <span class="k">implicit none</span>
-<a name="ln-247"></a>      <span class="c">! Arguments</span>
-<a name="ln-248"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest particle object</span>
-<a name="ln-249"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>     <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
-<a name="ln-250"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-251"></a>      <span class="c">! Internals</span>
-<a name="ln-252"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">tslot</span><span class="p">,</span> <span class="n">strlen</span><span class="p">,</span> <span class="n">idslot</span>
-<a name="ln-253"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">ind</span>
-<a name="ln-254"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span>             <span class="kd">::</span> <span class="n">charstring</span>
-<a name="ln-255"></a>
-<a name="ln-256"></a>      <span class="k">call </span><span class="n">self</span><span class="p">%</span><span class="n">write_particle_info</span><span class="p">(</span><span class="n">iu</span><span class="p">)</span>
+<a name="ln-218"></a><span class="k">      if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lenergy</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-219"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_ORB_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_orb_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-220"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">KE_SPIN_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">KE_spin_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-221"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">PE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">PE_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-222"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-223"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orby_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-224"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ORBZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_orbz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-225"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinx_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-226"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spiny_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-227"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_SPINZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_spinz_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-228"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapex_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-229"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapey_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-230"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">L_ESCAPEZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">L_escapez_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-231"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ECOLLISIONS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ecollisions_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-232"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">EUNTRACKED_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Euntracked_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-233"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">GMESCAPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">GMescape_varid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-234"></a>      <span class="k">end if</span>
+<a name="ln-235"></a>
+<a name="ln-236"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">STATUS_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">status_varid</span><span class="p">))</span>
+<a name="ln-237"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TYPE_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">))</span>
+<a name="ln-238"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">))</span>
+<a name="ln-239"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">))</span>
+<a name="ln-240"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">))</span>
+<a name="ln-241"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">))</span>
+<a name="ln-242"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">))</span>
+<a name="ln-243"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">))</span>
+<a name="ln-244"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">ORIGIN_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">))</span>
+<a name="ln-245"></a>
+<a name="ln-246"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_TIME_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">))</span>
+<a name="ln-247"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">))</span>
+<a name="ln-248"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">))</span>
+<a name="ln-249"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_XHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">))</span>
+<a name="ln-250"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHX_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">))</span>
+<a name="ln-251"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHY_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">))</span>
+<a name="ln-252"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_VHZ_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">))</span>
+<a name="ln-253"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_inq_varid</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">DISCARD_BODY_ID_VARNAME</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">discard_body_id_varid</span><span class="p">))</span>
+<a name="ln-254"></a>
+<a name="ln-255"></a>      <span class="k">return</span>
+<a name="ln-256"></a><span class="k">   end subroutine </span><span class="n">netcdf_open</span>
 <a name="ln-257"></a>
-<a name="ln-258"></a>      <span class="n">tslot</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ioutput</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-259"></a>
-<a name="ln-260"></a>      <span class="k">select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-261"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_body</span><span class="p">)</span>
-<a name="ln-262"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">n</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
-<a name="ln-263"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">n</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-264"></a>
-<a name="ln-265"></a><span class="k">            allocate</span><span class="p">(</span><span class="n">ind</span><span class="p">(</span><span class="n">n</span><span class="p">))</span>
-<a name="ln-266"></a>            <span class="k">call </span><span class="n">util_sort</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">),</span> <span class="n">ind</span><span class="p">)</span>
-<a name="ln-267"></a>
-<a name="ln-268"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">n</span>
-<a name="ln-269"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">ind</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-270"></a>               <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-271"></a>
-<a name="ln-272"></a>               <span class="k">if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XV</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-273"></a><span class="k">                  call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-274"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-275"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-276"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-277"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-278"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-279"></a>               <span class="k">end if</span>
-<a name="ln-280"></a>
-<a name="ln-281"></a><span class="k">               if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">EL</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-282"></a><span class="k">                  call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">a_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">a</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-283"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">e_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">e</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-284"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">inc_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">inc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-285"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">capom_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capom</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-286"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">omega_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">omega</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-287"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">capm_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span> 
-<a name="ln-288"></a>               <span class="k">end if</span>
-<a name="ln-289"></a>
-<a name="ln-290"></a><span class="k">               select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>  
-<a name="ln-291"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_pl</span><span class="p">)</span>  <span class="c">! Additional output if the passed polymorphic object is a massive body</span>
-<a name="ln-292"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-293"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrhill_present</span><span class="p">)</span> <span class="k">then </span>
-<a name="ln-294"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rhill_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-295"></a>                  <span class="k">end if</span>
-<a name="ln-296"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lclose</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-297"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-298"></a>                  <span class="k">end if</span>
-<a name="ln-299"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-300"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-301"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-302"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-303"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-304"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-305"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-306"></a>                  <span class="k">end if</span>
-<a name="ln-307"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-308"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">k2</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-309"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Q</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-310"></a>                  <span class="k">end if</span>
-<a name="ln-311"></a>
-<a name="ln-312"></a><span class="k">               end select</span>
-<a name="ln-313"></a><span class="k">            end do</span>
-<a name="ln-314"></a><span class="k">         end associate</span>
-<a name="ln-315"></a><span class="k">      class is</span> <span class="p">(</span><span class="n">swiftest_cb</span><span class="p">)</span>
-<a name="ln-316"></a>         <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-317"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">id_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-318"></a>
-<a name="ln-319"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-320"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-321"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-322"></a><span class="k">            call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-323"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-324"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-325"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-326"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-327"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-328"></a>         <span class="k">end if</span>
-<a name="ln-329"></a><span class="k">         if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-330"></a><span class="k">            call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">k2</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-331"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Q</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-332"></a>         <span class="k">end if</span>
-<a name="ln-333"></a>
-<a name="ln-334"></a><span class="k">      end select</span>
-<a name="ln-335"></a>
-<a name="ln-336"></a><span class="k">      return</span>
-<a name="ln-337"></a><span class="k">   end subroutine </span><span class="n">netcdf_write_frame_base</span>
-<a name="ln-338"></a>
-<a name="ln-339"></a>   
-<a name="ln-340"></a>   <span class="k">module subroutine </span><span class="n">netcdf_write_particle_info_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
-<a name="ln-341"></a>      <span class="c">!! author: Carlisle A. Wishard, Dana Singh, and David A. Minton</span>
-<a name="ln-342"></a>      <span class="c">!!</span>
-<a name="ln-343"></a>      <span class="c">!! Write all current particle to file</span>
-<a name="ln-344"></a>      <span class="k">implicit none</span>
-<a name="ln-345"></a>      <span class="c">! Arguments</span>
-<a name="ln-346"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest particle object</span>
-<a name="ln-347"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>     <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
-<a name="ln-348"></a>      <span class="c">! Internals</span>
-<a name="ln-349"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">tslot</span><span class="p">,</span> <span class="n">strlen</span><span class="p">,</span> <span class="n">idslot</span>
-<a name="ln-350"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">ind</span>
-<a name="ln-351"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span>             <span class="kd">::</span> <span class="n">charstring</span>
-<a name="ln-352"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">NAMELEN</span><span class="p">)</span>                    <span class="kd">::</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">lenstr</span>
-<a name="ln-353"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">fmtlabel</span>
-<a name="ln-354"></a>
-<a name="ln-355"></a>      <span class="c">! This string of spaces of length NAMELEN is used to clear out any old data left behind inside the string variables</span>
-<a name="ln-356"></a>      <span class="k">write</span><span class="p">(</span><span class="n">lenstr</span><span class="p">,</span> <span class="o">*</span><span class="p">)</span> <span class="n">NAMELEN</span>
-<a name="ln-357"></a>      <span class="n">fmtlabel</span> <span class="o">=</span> <span class="s2">&quot;(A&quot;</span> <span class="o">//</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">lenstr</span><span class="p">))</span> <span class="o">//</span> <span class="s2">&quot;)&quot;</span>
-<a name="ln-358"></a>      <span class="k">write</span><span class="p">(</span><span class="n">emptystr</span><span class="p">,</span> <span class="n">fmtlabel</span><span class="p">)</span> <span class="s2">&quot; &quot;</span>
-<a name="ln-359"></a>
-<a name="ln-360"></a>      <span class="k">select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-361"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_body</span><span class="p">)</span>
-<a name="ln-362"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">n</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
-<a name="ln-363"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">n</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-364"></a><span class="k">            allocate</span><span class="p">(</span><span class="n">ind</span><span class="p">(</span><span class="n">n</span><span class="p">))</span>
-<a name="ln-365"></a>            <span class="k">call </span><span class="n">util_sort</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">),</span> <span class="n">ind</span><span class="p">)</span>
-<a name="ln-366"></a>
-<a name="ln-367"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">n</span>
-<a name="ln-368"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">ind</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-369"></a>               <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-370"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">id_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-371"></a>
-<a name="ln-372"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">name</span><span class="p">))</span>
-<a name="ln-373"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-374"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-375"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-376"></a>
-<a name="ln-377"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">particle_type</span><span class="p">))</span>
-<a name="ln-378"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-379"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-380"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-381"></a>
-<a name="ln-382"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">status</span><span class="p">))</span>
-<a name="ln-383"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-384"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-385"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-386"></a>
-<a name="ln-387"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_type</span><span class="p">))</span>
-<a name="ln-388"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-389"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-390"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-391"></a>
-<a name="ln-392"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-393"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-394"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-395"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-396"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-397"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-398"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-399"></a>
-<a name="ln-400"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-401"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-402"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-403"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-404"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-405"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-406"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-407"></a>            <span class="k">end do</span>
-<a name="ln-408"></a><span class="k">         end associate</span>
-<a name="ln-409"></a>
-<a name="ln-410"></a><span class="k">      class is</span> <span class="p">(</span><span class="n">swiftest_cb</span><span class="p">)</span>
-<a name="ln-411"></a>         <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-412"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">id_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-413"></a>
-<a name="ln-414"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">name</span><span class="p">))</span>
-<a name="ln-415"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-416"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-417"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-418"></a>
-<a name="ln-419"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">particle_type</span><span class="p">))</span>
-<a name="ln-420"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-421"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-422"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-423"></a>
-<a name="ln-424"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">status</span><span class="p">))</span>
-<a name="ln-425"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-426"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-427"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-428"></a>
-<a name="ln-429"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_type</span><span class="p">))</span>
-<a name="ln-430"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
-<a name="ln-431"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-432"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-433"></a>
-<a name="ln-434"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-435"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-436"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-437"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-438"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-439"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-440"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-441"></a>
-<a name="ln-442"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-443"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-444"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-445"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-446"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-447"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-448"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-449"></a>      <span class="k">end select</span>
-<a name="ln-450"></a>
-<a name="ln-451"></a><span class="k">      return</span>
-<a name="ln-452"></a><span class="k">   end subroutine </span><span class="n">netcdf_write_particle_info_base</span>
-<a name="ln-453"></a>
+<a name="ln-258"></a>
+<a name="ln-259"></a>   <span class="k">module subroutine </span><span class="n">netcdf_write_frame_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-260"></a>      <span class="c">!! author: Carlisle A. Wishard, Dana Singh, and David A. Minton</span>
+<a name="ln-261"></a>      <span class="c">!!</span>
+<a name="ln-262"></a>      <span class="c">!! Write a frame of output of either test particle or massive body data to the binary output file</span>
+<a name="ln-263"></a>      <span class="c">!!    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method</span>
+<a name="ln-264"></a>      <span class="k">implicit none</span>
+<a name="ln-265"></a>      <span class="c">! Arguments</span>
+<a name="ln-266"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest particle object</span>
+<a name="ln-267"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>     <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
+<a name="ln-268"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-269"></a>      <span class="c">! Internals</span>
+<a name="ln-270"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">tslot</span><span class="p">,</span> <span class="n">strlen</span><span class="p">,</span> <span class="n">idslot</span><span class="p">,</span> <span class="n">old_mode</span>
+<a name="ln-271"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">ind</span>
+<a name="ln-272"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span>             <span class="kd">::</span> <span class="n">charstring</span>
+<a name="ln-273"></a>
+<a name="ln-274"></a>      <span class="k">call </span><span class="n">self</span><span class="p">%</span><span class="n">write_particle_info</span><span class="p">(</span><span class="n">iu</span><span class="p">)</span>
+<a name="ln-275"></a>
+<a name="ln-276"></a>      <span class="n">tslot</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ioutput</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-277"></a>
+<a name="ln-278"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_set_fill</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">nf90_nofill</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-279"></a>      <span class="k">select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-280"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_body</span><span class="p">)</span>
+<a name="ln-281"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">n</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
+<a name="ln-282"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">n</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-283"></a>
+<a name="ln-284"></a><span class="k">            allocate</span><span class="p">(</span><span class="n">ind</span><span class="p">(</span><span class="n">n</span><span class="p">))</span>
+<a name="ln-285"></a>            <span class="k">call </span><span class="n">util_sort</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">),</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-286"></a>
+<a name="ln-287"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">n</span>
+<a name="ln-288"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">ind</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-289"></a>               <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-290"></a>
+<a name="ln-291"></a>               <span class="k">if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XV</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-292"></a><span class="k">                  call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-293"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-294"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-295"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-296"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-297"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-298"></a>               <span class="k">end if</span>
+<a name="ln-299"></a>
+<a name="ln-300"></a><span class="k">               if</span> <span class="p">((</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">EL</span><span class="p">)</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">out_form</span> <span class="o">==</span> <span class="n">XVEL</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-301"></a><span class="k">                  call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">a_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">a</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-302"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">e_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">e</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-303"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">inc_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">inc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-304"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">capom_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capom</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-305"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">omega_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">omega</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-306"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">capm_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">capm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">RAD2DEG</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span> 
+<a name="ln-307"></a>               <span class="k">end if</span>
+<a name="ln-308"></a>
+<a name="ln-309"></a><span class="k">               select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>  
+<a name="ln-310"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_pl</span><span class="p">)</span>  <span class="c">! Additional output if the passed polymorphic object is a massive body</span>
+<a name="ln-311"></a>                  <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-312"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrhill_present</span><span class="p">)</span> <span class="k">then </span>
+<a name="ln-313"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rhill_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-314"></a>                  <span class="k">end if</span>
+<a name="ln-315"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lclose</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-316"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-317"></a>                  <span class="k">end if</span>
+<a name="ln-318"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-319"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-320"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-321"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-322"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-323"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-324"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-325"></a>                  <span class="k">end if</span>
+<a name="ln-326"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-327"></a><span class="k">                     call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">k2</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-328"></a>                     <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Q</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-329"></a>                  <span class="k">end if</span>
+<a name="ln-330"></a>
+<a name="ln-331"></a><span class="k">               end select</span>
+<a name="ln-332"></a><span class="k">            end do</span>
+<a name="ln-333"></a><span class="k">         end associate</span>
+<a name="ln-334"></a><span class="k">      class is</span> <span class="p">(</span><span class="n">swiftest_cb</span><span class="p">)</span>
+<a name="ln-335"></a>         <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-336"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">id_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-337"></a>
+<a name="ln-338"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Gmass_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Gmass</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-339"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">radius_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-340"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-341"></a><span class="k">            call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip1_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-342"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-343"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ip3_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-344"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-345"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">roty_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-346"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">rotz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-347"></a>         <span class="k">end if</span>
+<a name="ln-348"></a><span class="k">         if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ltides</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-349"></a><span class="k">            call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">k2_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">k2</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-350"></a>            <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Q_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Q</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">,</span> <span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-351"></a>         <span class="k">end if</span>
+<a name="ln-352"></a>
+<a name="ln-353"></a><span class="k">      end select</span>
+<a name="ln-354"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_set_fill</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-355"></a>
+<a name="ln-356"></a>      <span class="k">return</span>
+<a name="ln-357"></a><span class="k">   end subroutine </span><span class="n">netcdf_write_frame_base</span>
+<a name="ln-358"></a>
+<a name="ln-359"></a>   
+<a name="ln-360"></a>   <span class="k">module subroutine </span><span class="n">netcdf_write_particle_info_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
+<a name="ln-361"></a>      <span class="c">!! author: Carlisle A. Wishard, Dana Singh, and David A. Minton</span>
+<a name="ln-362"></a>      <span class="c">!!</span>
+<a name="ln-363"></a>      <span class="c">!! Write all current particle to file</span>
+<a name="ln-364"></a>      <span class="k">implicit none</span>
+<a name="ln-365"></a>      <span class="c">! Arguments</span>
+<a name="ln-366"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest particle object</span>
+<a name="ln-367"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>     <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
+<a name="ln-368"></a>      <span class="c">! Internals</span>
+<a name="ln-369"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">tslot</span><span class="p">,</span> <span class="n">strlen</span><span class="p">,</span> <span class="n">idslot</span><span class="p">,</span> <span class="n">old_mode</span>
+<a name="ln-370"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">ind</span>
+<a name="ln-371"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span>             <span class="kd">::</span> <span class="n">charstring</span>
+<a name="ln-372"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">NAMELEN</span><span class="p">)</span>                    <span class="kd">::</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">lenstr</span>
+<a name="ln-373"></a>      <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">fmtlabel</span>
+<a name="ln-374"></a>
+<a name="ln-375"></a>      <span class="c">! This string of spaces of length NAMELEN is used to clear out any old data left behind inside the string variables</span>
+<a name="ln-376"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_set_fill</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">nf90_nofill</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-377"></a>      <span class="k">write</span><span class="p">(</span><span class="n">lenstr</span><span class="p">,</span> <span class="o">*</span><span class="p">)</span> <span class="n">NAMELEN</span>
+<a name="ln-378"></a>      <span class="n">fmtlabel</span> <span class="o">=</span> <span class="s2">&quot;(A&quot;</span> <span class="o">//</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">lenstr</span><span class="p">))</span> <span class="o">//</span> <span class="s2">&quot;)&quot;</span>
+<a name="ln-379"></a>      <span class="k">write</span><span class="p">(</span><span class="n">emptystr</span><span class="p">,</span> <span class="n">fmtlabel</span><span class="p">)</span> <span class="s2">&quot; &quot;</span>
+<a name="ln-380"></a>
+<a name="ln-381"></a>      <span class="k">select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-382"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">swiftest_body</span><span class="p">)</span>
+<a name="ln-383"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">n</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
+<a name="ln-384"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">n</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-385"></a><span class="k">            allocate</span><span class="p">(</span><span class="n">ind</span><span class="p">(</span><span class="n">n</span><span class="p">))</span>
+<a name="ln-386"></a>            <span class="k">call </span><span class="n">util_sort</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">n</span><span class="p">),</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-387"></a>
+<a name="ln-388"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">n</span>
+<a name="ln-389"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">ind</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-390"></a>               <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-391"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">id_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-392"></a>
+<a name="ln-393"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">name</span><span class="p">))</span>
+<a name="ln-394"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-395"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-396"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-397"></a>
+<a name="ln-398"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">particle_type</span><span class="p">))</span>
+<a name="ln-399"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-400"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-401"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-402"></a>
+<a name="ln-403"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">status</span><span class="p">))</span>
+<a name="ln-404"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-405"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-406"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-407"></a>
+<a name="ln-408"></a>               <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_type</span><span class="p">))</span>
+<a name="ln-409"></a>               <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-410"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-411"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-412"></a>
+<a name="ln-413"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-414"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-415"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-416"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-417"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-418"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-419"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-420"></a>
+<a name="ln-421"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-422"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-423"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-424"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-425"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-426"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-427"></a>               <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">(</span><span class="n">j</span><span class="p">)%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-428"></a>            <span class="k">end do</span>
+<a name="ln-429"></a><span class="k">         end associate</span>
+<a name="ln-430"></a>
+<a name="ln-431"></a><span class="k">      class is</span> <span class="p">(</span><span class="n">swiftest_cb</span><span class="p">)</span>
+<a name="ln-432"></a>         <span class="n">idslot</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-433"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">id_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">id</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-434"></a>
+<a name="ln-435"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">name</span><span class="p">))</span>
+<a name="ln-436"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-437"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-438"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">name_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-439"></a>
+<a name="ln-440"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">particle_type</span><span class="p">))</span>
+<a name="ln-441"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-442"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-443"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ptype_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-444"></a>
+<a name="ln-445"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">status</span><span class="p">))</span>
+<a name="ln-446"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-447"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-448"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">status_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-449"></a>
+<a name="ln-450"></a>         <span class="n">charstring</span> <span class="o">=</span> <span class="nb">trim</span><span class="p">(</span><span class="nb">adjustl</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_type</span><span class="p">))</span>
+<a name="ln-451"></a>         <span class="n">strlen</span> <span class="o">=</span> <span class="nb">len</span><span class="p">(</span><span class="n">charstring</span><span class="p">)</span>
+<a name="ln-452"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">emptystr</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">NAMELEN</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-453"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_type_varid</span><span class="p">,</span> <span class="n">charstring</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="mi">1</span><span class="p">,</span> <span class="n">idslot</span><span class="p">],</span> <span class="nb">count</span><span class="o">=</span><span class="p">[</span><span class="n">strlen</span><span class="p">,</span> <span class="mi">1</span><span class="p">])</span> <span class="p">)</span>
 <a name="ln-454"></a>
-<a name="ln-455"></a>   <span class="k">module subroutine </span><span class="n">netcdf_write_hdr_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
-<a name="ln-456"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-457"></a>      <span class="c">!!</span>
-<a name="ln-458"></a>      <span class="c">!! Writes header information (variables that change with time, but not particle id). </span>
-<a name="ln-459"></a>      <span class="c">!! This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that </span>
-<a name="ln-460"></a>      <span class="c">!! previously were handled as separate output files.</span>
-<a name="ln-461"></a>      <span class="k">implicit none</span>
-<a name="ln-462"></a>      <span class="c">! Arguments</span>
-<a name="ln-463"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-464"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
-<a name="ln-465"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-466"></a>      <span class="c">! Internals</span>
-<a name="ln-467"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">tslot</span><span class="p">,</span> <span class="n">old_mode</span>
-<a name="ln-468"></a>
-<a name="ln-469"></a>      <span class="n">tslot</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ioutput</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-470"></a>
-<a name="ln-471"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_open</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">outfile</span><span class="p">,</span> <span class="n">nf90_write</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-472"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_set_fill</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">nf90_nofill</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">)</span> <span class="p">)</span>
-<a name="ln-473"></a>
-<a name="ln-474"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">time_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">t</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-475"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">npl_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-476"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ntp_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">tp</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-477"></a>
-<a name="ln-478"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lenergy</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-479"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">KE_orb_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ke_orbit</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-480"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">KE_spin_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ke_spin</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-481"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">PE_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">pe</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-482"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_orbx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-483"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_orby_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-484"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_orbz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-485"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_spinx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-486"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_spiny_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-487"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_spinz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-488"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_escapex_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Lescape</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-489"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_escapey_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Lescape</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-490"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_escapez_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Lescape</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-491"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ecollisions_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Ecollisions</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-492"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Euntracked_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Euntracked</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-493"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">GMescape_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">GMescape</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
-<a name="ln-494"></a>      <span class="k">end if</span>
-<a name="ln-495"></a>
-<a name="ln-496"></a><span class="k">      return</span>
-<a name="ln-497"></a><span class="k">   end subroutine </span><span class="n">netcdf_write_hdr_system</span>
+<a name="ln-455"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-456"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-457"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-458"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-459"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-460"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-461"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">origin_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">origin_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-462"></a>
+<a name="ln-463"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_time_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_time</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-464"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-465"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-466"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_xhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_xh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-467"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-468"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhy_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-469"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">discard_vhz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">info</span><span class="p">%</span><span class="n">discard_vh</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">idslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-470"></a>      <span class="k">end select</span>
+<a name="ln-471"></a>
+<a name="ln-472"></a><span class="k">      call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_set_fill</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">,</span> <span class="n">old_mode</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-473"></a>      <span class="k">return</span>
+<a name="ln-474"></a><span class="k">   end subroutine </span><span class="n">netcdf_write_particle_info_base</span>
+<a name="ln-475"></a>
+<a name="ln-476"></a>
+<a name="ln-477"></a>   <span class="k">module subroutine </span><span class="n">netcdf_write_hdr_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-478"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-479"></a>      <span class="c">!!</span>
+<a name="ln-480"></a>      <span class="c">!! Writes header information (variables that change with time, but not particle id). </span>
+<a name="ln-481"></a>      <span class="c">!! This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that </span>
+<a name="ln-482"></a>      <span class="c">!! previously were handled as separate output files.</span>
+<a name="ln-483"></a>      <span class="k">implicit none</span>
+<a name="ln-484"></a>      <span class="c">! Arguments</span>
+<a name="ln-485"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-486"></a>      <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
+<a name="ln-487"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-488"></a>      <span class="c">! Internals</span>
+<a name="ln-489"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">tslot</span>
+<a name="ln-490"></a>
+<a name="ln-491"></a>      <span class="n">tslot</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">ioutput</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-492"></a>
+<a name="ln-493"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_open</span><span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">outfile</span><span class="p">,</span> <span class="n">nf90_write</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">)</span> <span class="p">)</span>
+<a name="ln-494"></a>
+<a name="ln-495"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">time_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">t</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-496"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">npl_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-497"></a>      <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">ntp_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">tp</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
 <a name="ln-498"></a>
-<a name="ln-499"></a>
-<a name="ln-500"></a><span class="k">end submodule </span><span class="n">s_netcdf</span>
+<a name="ln-499"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lenergy</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-500"></a><span class="k">         call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">KE_orb_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ke_orbit</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-501"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">KE_spin_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">ke_spin</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-502"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">PE_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">pe</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-503"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_orbx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-504"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_orby_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-505"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_orbz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-506"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_spinx_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-507"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_spiny_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-508"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_spinz_varid</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-509"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_escapex_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Lescape</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-510"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_escapey_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Lescape</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-511"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">L_escapez_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Lescape</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-512"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Ecollisions_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Ecollisions</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-513"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">Euntracked_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">Euntracked</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-514"></a>         <span class="k">call </span><span class="n">check</span><span class="p">(</span> <span class="n">nf90_put_var</span><span class="p">(</span><span class="n">iu</span><span class="p">%</span><span class="n">ncid</span><span class="p">,</span> <span class="n">iu</span><span class="p">%</span><span class="n">GMescape_varid</span><span class="p">,</span> <span class="n">param</span><span class="p">%</span><span class="n">GMescape</span><span class="p">,</span> <span class="n">start</span><span class="o">=</span><span class="p">[</span><span class="n">tslot</span><span class="p">])</span> <span class="p">)</span>
+<a name="ln-515"></a>      <span class="k">end if</span>
+<a name="ln-516"></a>
+<a name="ln-517"></a><span class="k">      return</span>
+<a name="ln-518"></a><span class="k">   end subroutine </span><span class="n">netcdf_write_hdr_system</span>
+<a name="ln-519"></a>
+<a name="ln-520"></a>
+<a name="ln-521"></a><span class="k">end submodule </span><span class="n">s_netcdf</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/obl.f90.html b/docs/sourcefile/obl.f90.html
index 76b3c19de..510e6be13 100644
--- a/docs/sourcefile/obl.f90.html
+++ b/docs/sourcefile/obl.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~obl.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileoblf90EfferentGraph" width="641pt" height="302pt"
- viewBox="0.00 0.00 641.00 302.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~obl.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 412.12)">
+<svg id="sourcefileoblf90EfferentGraph" width="641pt" height="249pt"
+ viewBox="0.00 0.00 641.00 249.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~obl.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 339.24)">
 <title>sourcefile~~obl.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 878,-412.12 878,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 878,-339.24 878,4 -4,4"/>
 <!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~obl.f90</title>
-<polygon fill="none" stroke="black" points="874,-133.12 820,-133.12 820,-109.12 874,-109.12 874,-133.12"/>
-<text text-anchor="middle" x="847" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">obl.f90</text>
+<polygon fill="none" stroke="black" points="874,-235.24 820,-235.24 820,-211.24 874,-211.24 874,-235.24"/>
+<text text-anchor="middle" x="847" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">obl.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~obl.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.44,-109.09C789.3,-87.43 705.41,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-235.38C779.49,-252.91 699.44,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~obl.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.09,-133.4C818.2,-149.8 789.87,-179.03 771.01,-198.5"/>
-<polygon fill="#000000" stroke="#000000" points="768.25,-196.32 763.81,-205.93 773.28,-201.19 768.25,-196.32"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.82,-212.1C810.51,-208.14 799.84,-203.6 789.77,-199.31"/>
+<polygon fill="#000000" stroke="#000000" points="790.92,-196 780.35,-195.3 788.18,-202.44 790.92,-196"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~obl.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~obl.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~obl.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~obl.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~obl.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~obl.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~obl.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/operator_cross.f90.html b/docs/sourcefile/operator_cross.f90.html
index 634c41a60..ea7b3ce36 100644
--- a/docs/sourcefile/operator_cross.f90.html
+++ b/docs/sourcefile/operator_cross.f90.html
@@ -134,7 +134,7 @@ <h1>operator_cross.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.1% of total for source files.">172 statements</a>
+    title=" 1.0% of total for source files.">172 statements</a>
      </li> 
      
      
@@ -226,298 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~operator_cross.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileoperator_crossf90EfferentGraph" width="641pt" height="218pt"
- viewBox="0.00 0.00 641.00 217.95" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 312.56)">
+<svg id="sourcefileoperator_crossf90EfferentGraph" width="641pt" height="211pt"
+ viewBox="0.00 0.00 641.00 211.19" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 302.74)">
 <title>sourcefile~~operator_cross.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-312.56 927,-312.56 927,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-302.74 927,-302.74 927,4 -4,4"/>
 <!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~operator_cross.f90</title>
-<polygon fill="none" stroke="black" points="923,-222 820,-222 820,-198 923,-198 923,-222"/>
-<text text-anchor="middle" x="871.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50">operator_cross.f90</text>
+<polygon fill="none" stroke="black" points="923,-259.11 820,-259.11 820,-235.11 923,-235.11 923,-259.11"/>
+<text text-anchor="middle" x="871.5" y="-244.71" font-family="Helvetica,sans-Serif" font-size="10.50">operator_cross.f90</text>
 </g>
 <!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_operators.f90</title>
 <g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-242 564,-242 564,-218 682,-218 682,-242"/>
-<text text-anchor="middle" x="623" y="-227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-279.11 564,-279.11 564,-255.11 682,-255.11 682,-279.11"/>
+<text text-anchor="middle" x="623" y="-264.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.72,-214.12C782.82,-217.11 732.48,-221.2 692.1,-224.47"/>
-<polygon fill="#000000" stroke="#000000" points="691.74,-220.99 682.06,-225.29 692.31,-227.97 691.74,-220.99"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.72,-251.23C782.82,-254.22 732.48,-258.31 692.1,-261.58"/>
+<polygon fill="#000000" stroke="#000000" points="691.74,-258.1 682.06,-262.4 692.31,-265.08 691.74,-258.1"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-202 718,-202 718,-178 784,-178 784,-202"/>
-<text text-anchor="middle" x="751" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-239.11 718,-239.11 718,-215.11 784,-215.11 784,-239.11"/>
+<text text-anchor="middle" x="751" y="-224.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-201.46C811.31,-200.01 802.48,-198.52 794.14,-197.11"/>
-<polygon fill="#000000" stroke="#000000" points="794.71,-193.66 784.26,-195.45 793.54,-200.56 794.71,-193.66"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-238.57C811.31,-237.12 802.48,-235.63 794.14,-234.22"/>
+<polygon fill="#000000" stroke="#000000" points="794.71,-230.77 784.26,-232.55 793.54,-237.67 794.71,-230.77"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-202 0,-202 0,-178 106,-178 106,-202"/>
-<text text-anchor="middle" x="53" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-119.11 0,-119.11 0,-95.11 106,-95.11 106,-119.11"/>
+<text text-anchor="middle" x="53" y="-104.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M589.95,-242.05C571.84,-248.74 548.74,-257.09 528,-264 470.25,-283.25 457.21,-295.01 397,-304 349.09,-311.15 336.28,-307.94 288,-304 222.46,-298.65 200.34,-310.35 142,-280 110.45,-263.58 83.45,-231.67 67.96,-210.59"/>
-<polygon fill="#000000" stroke="#000000" points="70.71,-208.41 62.05,-202.3 65.01,-212.47 70.71,-208.41"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M569.84,-279.14C503.54,-292.44 385.94,-309.37 288,-288.11 245.05,-278.79 238.73,-263.64 198,-247.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge13" class="edge">
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.88,-200.2C703.88,-204.64 687.19,-209.94 671.78,-214.83"/>
-<polygon fill="#000000" stroke="#000000" points="670.36,-211.61 661.89,-217.97 672.48,-218.28 670.36,-211.61"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.88,-237.31C703.88,-241.75 687.19,-247.05 671.78,-251.94"/>
+<polygon fill="#000000" stroke="#000000" points="670.36,-248.72 661.89,-255.08 672.48,-255.39 670.36,-248.72"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-122 143.5,-122 143.5,-98 250.5,-98 250.5,-122"/>
-<text text-anchor="middle" x="197" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="395,-199.11 290,-199.11 290,-175.11 395,-175.11 395,-199.11"/>
+<text text-anchor="middle" x="342.5" y="-184.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-52C555.92,-17.79 360.68,-60.02 288,-76 269.49,-80.07 249.71,-87.21 233.42,-93.9"/>
-<polygon fill="#000000" stroke="#000000" points="231.62,-90.86 223.77,-97.98 234.35,-97.31 231.62,-90.86"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-227.11C443.77,-227.11 404.83,-214.25 377.81,-203.11"/>
+<polygon fill="#000000" stroke="#000000" points="378.99,-199.81 368.42,-199.11 376.25,-206.25 378.99,-199.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-227.11C667.35,-227.11 566.8,-227.11 481.5,-227.11"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="389.5,-182 295.5,-182 295.5,-158 389.5,-158 389.5,-182"/>
-<text text-anchor="middle" x="342.5" y="-167.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="674.5,-199.11 571.5,-199.11 571.5,-175.11 674.5,-175.11 674.5,-199.11"/>
+<text text-anchor="middle" x="623" y="-184.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-190C544.88,-190 456.05,-182.28 399.85,-176.43"/>
-<polygon fill="#000000" stroke="#000000" points="400.06,-172.93 389.75,-175.36 399.32,-179.89 400.06,-172.93"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.88,-216.91C703.88,-212.47 687.19,-207.17 671.78,-202.28"/>
+<polygon fill="#000000" stroke="#000000" points="672.48,-198.83 661.89,-199.14 670.36,-205.5 672.48,-198.83"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-271 142,-271 142,-247 252,-247 252,-271"/>
-<text text-anchor="middle" x="197" y="-256.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-60.11 142,-60.11 142,-36.11 252,-36.11 252,-60.11"/>
+<text text-anchor="middle" x="197" y="-45.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge7" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-250C442.41,-257.49 434.54,-266.3 397,-271 348.93,-277.02 336.34,-274.21 288,-271 279.63,-270.44 270.86,-269.6 262.21,-268.62"/>
-<polygon fill="#000000" stroke="#000000" points="262.49,-265.12 252.14,-267.4 261.65,-272.07 262.49,-265.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-67.11C442.49,-59.27 434.54,-50.81 397,-46.11 348.93,-40.09 336.44,-45.57 288,-46.11 279.69,-46.2 270.94,-46.34 262.31,-46.51"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-43.01 252.25,-46.71 262.32,-50.01 262.18,-43.01"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-107.11C563.7,-78.53 545.42,-78.52 481.5,-67.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="528,-222 433,-222 433,-198 528,-198 528,-222"/>
-<text text-anchor="middle" x="480.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="527.5,-119.11 433.5,-119.11 433.5,-95.11 527.5,-95.11 527.5,-119.11"/>
+<text text-anchor="middle" x="480.5" y="-104.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-190C594.16,-190 563.52,-193.9 537.98,-198.25"/>
-<polygon fill="#000000" stroke="#000000" points="537.33,-194.81 528.1,-200 538.55,-201.7 537.33,-194.81"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-250C448.49,-255.56 374.69,-214.4 343.5,-210"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-190C554.1,-190.77 548.33,-238.01 481.5,-250"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-107.11C596.15,-94.74 564.43,-93.72 537.68,-96.25"/>
+<polygon fill="#000000" stroke="#000000" points="537.24,-92.77 527.69,-97.37 538.02,-99.73 537.24,-92.77"/>
+</g>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="389.5,-79.11 295.5,-79.11 295.5,-55.11 389.5,-55.11 389.5,-79.11"/>
+<text text-anchor="middle" x="342.5" y="-64.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-67.11C453.73,-61.65 424.59,-60.95 399.92,-61.89"/>
+<polygon fill="#000000" stroke="#000000" points="399.46,-58.41 389.64,-62.39 399.8,-65.4 399.46,-58.41"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-262 288,-262 288,-238 397,-238 397,-262"/>
-<text text-anchor="middle" x="342.5" y="-247.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-279.11 288,-279.11 288,-255.11 397,-255.11 397,-279.11"/>
+<text text-anchor="middle" x="342.5" y="-264.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge9" class="edge">
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-250C456.32,-254.68 430.46,-255.7 407.56,-255.2"/>
-<polygon fill="#000000" stroke="#000000" points="407.38,-251.7 397.27,-254.88 407.16,-258.69 407.38,-251.7"/>
-</g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="527.5,-142 433.5,-142 433.5,-118 527.5,-118 527.5,-142"/>
-<text text-anchor="middle" x="480.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
-</a>
-</g>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-227.11C443.77,-227.11 404.83,-239.97 377.81,-251.11"/>
+<polygon fill="#000000" stroke="#000000" points="376.25,-247.97 368.42,-255.11 378.99,-254.41 376.25,-247.97"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.89,-190C692.43,-190 655.94,-190 624,-190"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-190C599.94,-190 547.22,-164.66 513,-146.92"/>
-<polygon fill="#000000" stroke="#000000" points="514.36,-143.68 503.88,-142.14 511.12,-149.88 514.36,-143.68"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-227.11C419.06,-227.11 403.35,-218.66 343.5,-227.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="674.5,-123 571.5,-123 571.5,-99 674.5,-99 674.5,-123"/>
-<text text-anchor="middle" x="623" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="528,-39.11 433,-39.11 433,-15.11 528,-15.11 528,-39.11"/>
+<text text-anchor="middle" x="480.5" y="-24.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.59,-177.83C709.53,-164.63 675.73,-143.44 651.85,-128.46"/>
-<polygon fill="#000000" stroke="#000000" points="653.56,-125.4 643.23,-123.05 649.84,-131.33 653.56,-125.4"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-107.11C578.54,-86.31 569.92,-76.87 528,-53.11 522.85,-50.19 517.36,-47.1 512.03,-44.11"/>
+<polygon fill="#000000" stroke="#000000" points="513.73,-41.05 503.29,-39.23 510.31,-47.16 513.73,-41.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.56,-215.02C723.36,-190.01 677.68,-132.8 624,-107.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="395,-24 290,-24 290,0 395,0 395,-24"/>
-<text text-anchor="middle" x="342.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~operator_cross.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-159.11 143.5,-159.11 143.5,-135.11 250.5,-135.11 250.5,-159.11"/>
+<text text-anchor="middle" x="197" y="-144.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.77,-177.8C733.13,-157.76 709.85,-117.37 682,-90 660.02,-68.4 651.37,-66.17 624,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-52C564.56,-22.26 544.51,-28.65 481.5,-14"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-14C455.66,-8.46 428.83,-7.07 405.33,-7.39"/>
-<polygon fill="#000000" stroke="#000000" points="405.06,-3.9 395.14,-7.64 405.23,-10.9 405.06,-3.9"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-147.11C315.07,-145.2 285.84,-144.88 260.69,-145.16"/>
+<polygon fill="#000000" stroke="#000000" points="260.49,-141.66 250.55,-145.3 260.59,-148.66 260.49,-141.66"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622,-107.11C583.39,-88.63 570.25,-121.24 528,-128.11 446.64,-141.34 425.72,-153.04 343.5,-147.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-122.15C150.42,-135.68 111.43,-157.65 84.34,-172.9"/>
-<polygon fill="#000000" stroke="#000000" points="82.3,-170.04 75.3,-178 85.73,-176.14 82.3,-170.04"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-247.11C136.73,-223.05 89.05,-160.79 67.1,-128.01"/>
+<polygon fill="#000000" stroke="#000000" points="69.76,-125.69 61.37,-119.23 63.9,-129.51 69.76,-125.69"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.2,-199.23C275.37,-217.43 203.75,-249.45 198,-247.11"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.46,-157.86C290.58,-148.71 260.36,-136.08 236.47,-126.09"/>
-<polygon fill="#000000" stroke="#000000" points="237.57,-122.75 227,-122.12 234.87,-129.21 237.57,-122.75"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.45,-175.11C283.68,-170.99 266.98,-166.34 251.49,-162.02"/>
+<polygon fill="#000000" stroke="#000000" points="252.09,-158.55 241.52,-159.24 250.21,-165.3 252.09,-158.55"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.2,-179.77C267.19,-184.84 230.7,-190 198,-190"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-187.11C455.23,-187.11 428.52,-187.11 405.25,-187.11"/>
+<polygon fill="#000000" stroke="#000000" points="405.16,-183.61 395.16,-187.11 405.16,-190.61 405.16,-183.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M171.27,-246.98C148.19,-235.77 113.58,-218.95 87.93,-206.49"/>
-<polygon fill="#000000" stroke="#000000" points="89.45,-203.34 78.93,-202.11 86.39,-209.63 89.45,-203.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.66,-174.96C576.9,-161.43 538.32,-139.46 511.52,-124.2"/>
+<polygon fill="#000000" stroke="#000000" points="513,-121.02 502.58,-119.11 509.54,-127.1 513,-121.02"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.7,-198C424.84,-193.92 409.17,-189.32 394.61,-185.03"/>
-<polygon fill="#000000" stroke="#000000" points="395.33,-181.6 384.75,-182.13 393.35,-188.31 395.33,-181.6"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-187.11C416.5,-187.11 405.89,-218.3 343.5,-227.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-227.11C277.74,-236.11 257.66,-271.33 198,-247.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-210C277.74,-201 262.39,-190 198,-190"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432.7,-213.22C406.36,-214.22 372.96,-214.16 343.5,-210"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M479.5,-187.11C416.5,-187.11 406.34,-151.64 343.5,-147.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.27,-187.11C544.56,-187.11 511.26,-187.11 481.5,-187.11"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.54,-237.86C277.63,-220.33 210.29,-190 198,-190"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M433.49,-128.44C407.12,-127.94 373.42,-127.95 343.5,-130"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-130C313.81,-131.89 283.32,-128.44 257.6,-123.89"/>
-<polygon fill="#000000" stroke="#000000" points="258.1,-120.43 247.63,-122.04 256.82,-127.31 258.1,-120.43"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-60.19C145.38,-69.14 115.83,-81.42 92.36,-91.17"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-87.97 83.04,-95.04 93.62,-94.44 90.93,-87.97"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge22" class="edge">
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge21" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.7,-142C424.84,-146.08 409.17,-150.68 394.61,-154.97"/>
-<polygon fill="#000000" stroke="#000000" points="393.35,-151.69 384.75,-157.87 395.33,-158.4 393.35,-151.69"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.7,-95.11C424.84,-91.03 409.17,-86.42 394.61,-82.14"/>
+<polygon fill="#000000" stroke="#000000" points="395.33,-78.7 384.75,-79.24 393.35,-85.42 395.33,-78.7"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge23" class="edge">
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-190C169.89,-190 141.08,-190 116.27,-190"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-186.5 106.27,-190 116.27,-193.5 116.27,-186.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-130C272.53,-134.72 267.13,-190 198,-190"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-107.11C277.87,-111.46 261.63,-102.76 198,-107.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M433.49,-105.55C407.12,-105.05 373.42,-105.06 343.5,-107.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge23" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-107.11C305.26,-109.59 265.6,-121.39 237.17,-131.53"/>
+<polygon fill="#000000" stroke="#000000" points="235.79,-128.31 227.61,-135.03 238.2,-134.88 235.79,-128.31"/>
+</g>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-90C314.86,-90 285.7,-93.42 260.67,-97.44"/>
-<polygon fill="#000000" stroke="#000000" points="259.86,-94.02 250.57,-99.12 261.01,-100.93 259.86,-94.02"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-107.11C169.95,-108.89 141.15,-109.2 116.34,-108.95"/>
+<polygon fill="#000000" stroke="#000000" points="116.37,-105.45 106.32,-108.81 116.28,-112.45 116.37,-105.45"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.89,-79.19C283.3,-89.92 238.51,-104.34 198,-107.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M604.77,-123.14C580.33,-140.36 535.43,-172 507.09,-191.97"/>
-<polygon fill="#000000" stroke="#000000" points="505.03,-189.14 498.87,-197.76 509.06,-194.86 505.03,-189.14"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.97,-79.14C305.44,-83.22 296.15,-88.03 288,-93.11 270.79,-103.82 269.23,-110.43 252,-121.11 246.66,-124.42 240.84,-127.61 235.05,-130.56"/>
+<polygon fill="#000000" stroke="#000000" points="233.5,-127.43 226.07,-134.98 236.59,-133.71 233.5,-127.43"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.27,-104.87C515.51,-98.67 423.26,-90 343.5,-90"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-90C277.13,-88.37 257,-44.2 198,-70"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.74,-265.87C260.08,-263.69 226.32,-258.61 198,-247.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.28,-117.86C560.44,-119.32 548.94,-120.88 537.91,-122.37"/>
-<polygon fill="#000000" stroke="#000000" points="537.38,-118.91 527.94,-123.72 538.32,-125.85 537.38,-118.91"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.7,-39.11C424.84,-43.19 409.17,-47.79 394.61,-52.08"/>
+<polygon fill="#000000" stroke="#000000" points="393.35,-48.8 384.75,-54.98 395.33,-55.51 393.35,-48.8"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.83,-98.83C572.02,-73.53 495.79,-17.32 481.5,-14"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432.86,-15.7C365.41,-1.67 238.18,15.46 142,-27.11 111.9,-40.43 85.17,-68.18 69.28,-87.23"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-85.06 62.96,-95.03 71.97,-89.46 66.53,-85.06"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.64,-24.06C302.83,-27.88 294.75,-32.55 288,-38 267.81,-54.32 272.22,-67.72 252,-84 247.74,-87.43 242.96,-90.54 238.05,-93.33"/>
-<polygon fill="#000000" stroke="#000000" points="236.39,-90.24 229.15,-97.98 239.64,-96.45 236.39,-90.24"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~operator_cross.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.22,-24.06C281,-35.45 236.28,-53.26 198,-70"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-70C172.69,-80.2 163.05,-74.71 142,-89 110.03,-110.69 82.5,-146.76 67.11,-169.41"/>
-<polygon fill="#000000" stroke="#000000" points="64.06,-167.67 61.45,-177.94 69.9,-171.54 64.06,-167.67"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-135.11C138.79,-130.99 122.26,-126.34 106.93,-122.02"/>
+<polygon fill="#000000" stroke="#000000" points="107.64,-118.58 97.07,-119.24 105.74,-125.32 107.64,-118.58"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/orbel.f90.html b/docs/sourcefile/orbel.f90.html
index 5384beb16..7fc94cb45 100644
--- a/docs/sourcefile/orbel.f90.html
+++ b/docs/sourcefile/orbel.f90.html
@@ -134,7 +134,7 @@ <h1>orbel.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 3.8% of total for source files.">611 statements</a>
+    title=" 3.7% of total for source files.">611 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~orbel.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileorbelf90EfferentGraph" width="641pt" height="302pt"
- viewBox="0.00 0.00 641.00 302.07" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~orbel.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 412.12)">
+<svg id="sourcefileorbelf90EfferentGraph" width="641pt" height="249pt"
+ viewBox="0.00 0.00 641.00 249.17" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~orbel.f90~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 339.24)">
 <title>sourcefile~~orbel.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 879,-412.12 879,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 879,-339.24 879,4 -4,4"/>
 <!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~orbel.f90</title>
-<polygon fill="none" stroke="black" points="875,-133.12 820,-133.12 820,-109.12 875,-109.12 875,-133.12"/>
-<text text-anchor="middle" x="847.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">orbel.f90</text>
+<polygon fill="none" stroke="black" points="875,-235.24 820,-235.24 820,-211.24 875,-211.24 875,-235.24"/>
+<text text-anchor="middle" x="847.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">orbel.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~orbel.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.89,-109.09C789.66,-87.43 705.57,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M820.23,-235.38C779.83,-252.91 699.6,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~orbel.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.53,-133.4C818.48,-149.87 789.82,-179.29 770.86,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="768.34,-196.33 763.87,-205.93 773.36,-201.21 768.34,-196.33"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.92,-211.99C810.58,-208.03 799.88,-203.5 789.79,-199.23"/>
+<polygon fill="#000000" stroke="#000000" points="790.93,-195.92 780.36,-195.24 788.2,-202.36 790.93,-195.92"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~orbel.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/orbel.f90~2.html b/docs/sourcefile/orbel.f90~2.html
index da332e409..c6ffb76f8 100644
--- a/docs/sourcefile/orbel.f90~2.html
+++ b/docs/sourcefile/orbel.f90~2.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~orbel.f90~2~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileorbelf902EfferentGraph" width="641pt" height="302pt"
- viewBox="0.00 0.00 641.00 302.07" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 412.12)">
+<svg id="sourcefileorbelf902EfferentGraph" width="641pt" height="287pt"
+ viewBox="0.00 0.00 641.00 286.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph" class="graph" transform="scale(0.73 0.73) rotate(0) translate(4 391.16)">
 <title>sourcefile~~orbel.f90~2~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 879,-412.12 879,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-391.16 879,-391.16 879,4 -4,4"/>
 <!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node1" class="node">
 <title>sourcefile~orbel.f90~2</title>
-<polygon fill="none" stroke="black" points="875,-133.12 820,-133.12 820,-109.12 875,-109.12 875,-133.12"/>
-<text text-anchor="middle" x="847.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">orbel.f90</text>
-</g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_node2" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge1" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.89,-109.09C789.66,-87.43 705.57,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<polygon fill="none" stroke="black" points="875,-95.81 820,-95.81 820,-71.81 875,-71.81 875,-95.81"/>
+<text text-anchor="middle" x="847.5" y="-81.41" font-family="Helvetica,sans-Serif" font-size="10.50">orbel.f90</text>
 </g>
 <!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_node3" class="node">
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-276.81 718,-276.81 718,-252.81 784,-252.81 784,-276.81"/>
+<text text-anchor="middle" x="751" y="-262.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.53,-133.4C818.48,-149.87 789.82,-179.29 770.86,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="768.34,-196.33 763.87,-205.93 773.36,-201.21 768.34,-196.33"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.15,-95.97C824.35,-126.24 783.08,-205.28 763.13,-243.51"/>
+<polygon fill="#000000" stroke="#000000" points="759.85,-242.23 758.32,-252.71 766.05,-245.47 759.85,-242.23"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_node3" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-116.81 147.5,-116.81 147.5,-92.81 254.5,-92.81 254.5,-116.81"/>
+<text text-anchor="middle" x="201" y="-102.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge1" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.71,-72.26C755.15,-45.79 585.67,15.51 442,-3.81 375.32,-12.78 354.41,-10.42 296,-43.81 276.63,-54.89 278.46,-66.28 260,-78.81 254.97,-82.23 249.42,-85.38 243.8,-88.22"/>
+<polygon fill="#000000" stroke="#000000" points="241.9,-85.24 234.37,-92.7 244.91,-91.57 241.9,-85.24"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge11" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-144.81C316.5,-138.08 279.39,-128.04 250.7,-119.71"/>
+<polygon fill="#000000" stroke="#000000" points="251.51,-116.29 240.93,-116.84 249.54,-123.01 251.51,-116.29"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-104.81C591.2,-84.24 577.29,-119.05 537,-125.81 455.49,-139.51 433.03,-161.11 352,-144.81"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-196.81 298.5,-196.81 298.5,-172.81 403.5,-172.81 403.5,-196.81"/>
+<text text-anchor="middle" x="351" y="-182.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge3" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.79,-268.01C693.32,-270.11 658.81,-272.38 628.5,-271.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-271.81C534.93,-270.11 433.85,-226.29 383.76,-201.51"/>
+<polygon fill="#000000" stroke="#000000" points="385.23,-198.33 374.73,-196.97 382.09,-204.59 385.23,-198.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-355.81 142,-355.81 142,-331.81 260,-331.81 260,-355.81"/>
+<text text-anchor="middle" x="201" y="-341.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.33,-276.83C734.63,-295.8 712.87,-332.05 682,-346.81 539.97,-414.74 346.17,-380.78 254.35,-358.32"/>
+<polygon fill="#000000" stroke="#000000" points="255.01,-354.88 244.46,-355.85 253.31,-361.67 255.01,-354.88"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-221.81 576,-221.81 576,-197.81 679,-197.81 679,-221.81"/>
+<text text-anchor="middle" x="627.5" y="-207.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M723.34,-252.74C706.01,-244.9 683.2,-234.58 664.3,-226.02"/>
+<polygon fill="#000000" stroke="#000000" points="665.65,-222.79 655.1,-221.86 662.77,-229.17 665.65,-222.79"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_node7" class="node">
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-116.81 442.5,-116.81 442.5,-92.81 536.5,-92.81 536.5,-116.81"/>
+<text text-anchor="middle" x="489.5" y="-102.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+</a>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-104.81C602.83,-90.99 572.66,-89.7 546.76,-92.43"/>
+<polygon fill="#000000" stroke="#000000" points="546.17,-88.97 536.69,-93.7 547.05,-95.92 546.17,-88.97"/>
+</g>
+<!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-191.81 0,-191.81 0,-167.81 106,-167.81 106,-191.81"/>
+<text text-anchor="middle" x="53" y="-177.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-334.81C319.54,-330.97 204.78,-275.57 202,-274.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-296.81C426.27,-306.49 414.48,-342.7 352,-334.81"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node9" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-76.81 304,-76.81 304,-52.81 398,-52.81 398,-76.81"/>
+<text text-anchor="middle" x="351" y="-62.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-104.81C559.03,-65.4 466.81,-59.88 408.32,-61.12"/>
+<polygon fill="#000000" stroke="#000000" points="408.06,-57.63 398.17,-61.41 408.26,-64.62 408.06,-57.63"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-337.81 573,-337.81 573,-313.81 682,-313.81 682,-337.81"/>
+<text text-anchor="middle" x="627.5" y="-323.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M726,-276.87C707.52,-286.14 681.79,-299.06 661.4,-309.3"/>
+<polygon fill="#000000" stroke="#000000" points="659.82,-306.17 652.45,-313.79 662.96,-312.43 659.82,-306.17"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node11"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-306.81 296,-306.81 296,-282.81 406,-282.81 406,-306.81"/>
+<text text-anchor="middle" x="351" y="-292.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-271.81C565.05,-270.67 551.23,-287.37 490.5,-296.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-296.81C465.14,-300.45 439.27,-300.94 416.39,-300.2"/>
+<polygon fill="#000000" stroke="#000000" points="416.24,-296.69 406.1,-299.78 415.95,-303.68 416.24,-296.69"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~orbel.f90~2~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-36.81 442,-36.81 442,-12.81 537,-12.81 537,-36.81"/>
+<text text-anchor="middle" x="489.5" y="-22.41" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-252.59C731.01,-221.78 690.24,-140.88 628.5,-104.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-104.81C586.39,-81.38 577.17,-74.15 537,-50.81 531.88,-47.84 526.41,-44.72 521.08,-41.72"/>
+<polygon fill="#000000" stroke="#000000" points="522.78,-38.67 512.35,-36.84 519.36,-44.77 522.78,-38.67"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.54,-116.86C152.17,-129.38 113.85,-149.07 86.55,-163.09"/>
+<polygon fill="#000000" stroke="#000000" points="84.69,-160.11 77.4,-167.79 87.89,-166.34 84.69,-160.11"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.99,-172.76C315.05,-168.49 305.02,-163.57 296,-158.81 273.78,-147.1 249.18,-132.93 230.72,-122.04"/>
+<polygon fill="#000000" stroke="#000000" points="232.32,-118.92 221.93,-116.83 228.75,-124.94 232.32,-118.92"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-274.81C149.15,-261.27 99.98,-222.25 73.69,-198.64"/>
+<polygon fill="#000000" stroke="#000000" points="76.03,-196.04 66.29,-191.86 71.3,-201.19 76.03,-196.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.02,-196.96C305.05,-223.27 231.06,-282.56 202,-274.81"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M186.15,-331.63C174.07,-320.8 156.31,-304.31 142,-288.81 114.76,-259.32 86.06,-222.53 69.11,-200.13"/>
+<polygon fill="#000000" stroke="#000000" points="71.82,-197.91 63.01,-192.02 66.22,-202.12 71.82,-197.91"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.95,-198.91C550.41,-193.62 518.89,-187.43 490.5,-182.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-182.81C426.34,-172.71 413.74,-157.23 352,-144.81"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-182.81C464.25,-178.87 437.26,-178.45 413.72,-179.34"/>
+<polygon fill="#000000" stroke="#000000" points="413.34,-175.86 403.52,-179.82 413.67,-182.85 413.34,-175.86"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.9,-197.77C587.25,-179.51 542.15,-144.69 514.36,-123.24"/>
+<polygon fill="#000000" stroke="#000000" points="516.39,-120.38 506.34,-117.04 512.11,-125.92 516.39,-120.38"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.7,-219.93C470.91,-240.46 237.57,-284.29 202,-274.81"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge23" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-104.81C322.16,-102.97 291.31,-102.69 265.01,-102.98"/>
+<polygon fill="#000000" stroke="#000000" points="264.75,-99.48 254.8,-103.12 264.85,-106.48 264.75,-99.48"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-104.81C282.01,-100.3 265.47,-40.02 202,-64.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.33,-106.33C415.86,-106.82 382.03,-106.81 352,-104.81"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-92.81C433.64,-88.74 417.92,-84.13 403.3,-79.85"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-76.4 393.4,-76.95 402.01,-83.12 403.98,-76.4"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.6,-76.82C290.15,-80.99 272.65,-85.72 256.49,-90.09"/>
+<polygon fill="#000000" stroke="#000000" points="255.37,-86.76 246.63,-92.75 257.2,-93.52 255.37,-86.76"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.72,-56.36C273.7,-52.88 234.31,-52.19 202,-64.81"/>
+</g>
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-332.45C517.4,-338.17 428.31,-344.18 352,-334.81"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.92,-290.8C267.61,-287.88 232.57,-282.96 202,-274.81"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.94,-24.76C383.84,-26.15 282.34,-33.43 202,-64.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-64.81C174.27,-73.41 164.8,-69.11 142,-83.81 110.77,-103.95 83.37,-137.8 67.75,-159.46"/>
+<polygon fill="#000000" stroke="#000000" points="64.88,-157.45 61.99,-167.64 70.61,-161.48 64.88,-157.45"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~orbel.f90~2~~EfferentGraph_edge28" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-36.82C433.64,-40.89 417.92,-45.5 403.3,-49.78"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-46.51 393.4,-52.68 403.98,-53.23 402.01,-46.51"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/rmvs_classes.f90.html b/docs/sourcefile/rmvs_classes.f90.html
index 057fdc009..9f96ae6fb 100644
--- a/docs/sourcefile/rmvs_classes.f90.html
+++ b/docs/sourcefile/rmvs_classes.f90.html
@@ -134,7 +134,7 @@ <h1>rmvs_classes.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.3% of total for source files.">210 statements</a>
+    title=" 1.3% of total for source files.">214 statements</a>
      </li> 
      
      
@@ -268,7 +268,7 @@ <h3 class="panel-title">This file depends on</h3>
 <polygon fill="#000000" stroke="#000000" points="104.62,-14.19 95.72,-19.93 106.26,-21 104.62,-14.19"/>
 </g>
 <!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~rmvs_classes.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.18,-44.07C278.65,-47.7 263.29,-51.2 249,-53 201.82,-58.95 189.23,-58.56 142,-53 130.06,-51.59 117.39,-49.15 105.49,-46.42"/>
 <polygon fill="#000000" stroke="#000000" points="106.26,-43 95.72,-44.07 104.62,-49.81 106.26,-43"/>
@@ -283,7 +283,7 @@ <h3 class="panel-title">This file depends on</h3>
 </g>
 </g>
 <!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~EfferentGraph_edge3" class="edge">
+<g id="sourcefile~~rmvs_classes.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.71,-32C276.61,-32 268.05,-32 259.59,-32"/>
 <polygon fill="#000000" stroke="#000000" points="259.34,-28.5 249.34,-32 259.34,-35.5 259.34,-28.5"/>
@@ -345,1145 +345,1073 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_classes.f90~~AfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_classesf90AfferentGraph" width="544pt" height="2804pt"
- viewBox="0.00 0.00 544.00 2804.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="sourcefilermvs_classesf90AfferentGraph" width="405pt" height="2804pt"
+ viewBox="0.00 0.00 405.00 2804.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 2800)">
 <title>sourcefile~~rmvs_classes.f90~~AfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-2800 540,-2800 540,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-2800 401,-2800 401,4 -4,4"/>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
-<polygon fill="none" stroke="black" points="95,-1368 0,-1368 0,-1344 95,-1344 95,-1368"/>
-<text text-anchor="middle" x="47.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_classes.f90</text>
+<polygon fill="none" stroke="black" points="95,-2040 0,-2040 0,-2016 95,-2016 95,-2040"/>
+<text text-anchor="middle" x="47.5" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_classes.f90</text>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="490.5,-2796 417.5,-2796 417.5,-2772 490.5,-2772 490.5,-2796"/>
-<text text-anchor="middle" x="454" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="386,-2796 244,-2796 244,-2772 386,-2772 386,-2796"/>
+<text text-anchor="middle" x="315" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M417.48,-2779.4C385.9,-2774.09 339.38,-2763.22 304,-2742"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge2" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M249.2,-2771.99C243.45,-2769.53 237.95,-2766.57 233,-2763 187.91,-2730.47 207.74,-2693.56 165,-2658"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="336,-1368 270,-1368 270,-1344 336,-1344 336,-1368"/>
-<text text-anchor="middle" x="303" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M417.19,-2783.87C400.87,-2781.8 382.82,-2776.3 372,-2763 326.38,-2706.89 307.01,-1553.09 304.33,-1378.15"/>
-<polygon fill="#000000" stroke="#000000" points="307.83,-1378.01 304.18,-1368.06 300.83,-1378.11 307.83,-1378.01"/>
-</g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="525,-2754 383,-2754 383,-2730 525,-2730 525,-2754"/>
-<text text-anchor="middle" x="454" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~swiftest.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="197,-1431 131,-1431 131,-1407 197,-1407 197,-1431"/>
+<text text-anchor="middle" x="164" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.68,-2754.04C373.75,-2758.98 333.95,-2759.96 304,-2742"/>
-</g>
 <!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge75" class="edge">
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge19" class="edge">
 <title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M382.94,-2730.65C378.84,-2728.01 375.12,-2724.83 372,-2721 327.76,-2666.68 307.27,-1550.64 304.36,-1378.27"/>
-<polygon fill="#000000" stroke="#000000" points="307.86,-1378.05 304.19,-1368.11 300.86,-1378.16 307.86,-1378.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.95,-2772.65C239.84,-2770.01 236.12,-2766.83 233,-2763 189.47,-2709.59 168.42,-1612.92 165.38,-1441.46"/>
+<polygon fill="#000000" stroke="#000000" points="168.88,-1441.26 165.21,-1431.33 161.88,-1441.39 168.88,-1441.26"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge1" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M160.71,-1431.17C146.6,-1506.23 71.36,-1906.44 52.69,-2005.71"/>
+<polygon fill="#000000" stroke="#000000" points="49.2,-2005.33 50.79,-2015.81 56.08,-2006.62 49.2,-2005.33"/>
+</g>
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="494,-2712 414,-2712 414,-2688 494,-2688 494,-2712"/>
-<text text-anchor="middle" x="454" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358,-2754 272,-2754 272,-2730 358,-2730 358,-2754"/>
+<text text-anchor="middle" x="315" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.76,-2709.79C400.47,-2713.2 385.56,-2717.15 372,-2721 341.57,-2729.64 331.13,-2758.27 304,-2742"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge3" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.72,-2735.19C258.78,-2732.03 244.85,-2727.48 233,-2721 196.85,-2701.23 196.67,-2684.35 165,-2658"/>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.87,-2699.38C398.48,-2697 382.1,-2691.38 372,-2679 329.15,-2626.46 307.54,-1547.97 304.4,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="307.9,-1378.07 304.21,-1368.13 300.9,-1378.2 307.9,-1378.07"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge69" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.93,-2740.88C257.42,-2738.25 242.46,-2732.59 233,-2721 190.85,-2669.37 168.69,-1610.13 165.42,-1441.53"/>
+<polygon fill="#000000" stroke="#000000" points="168.92,-1441.27 165.23,-1431.34 161.92,-1441.41 168.92,-1441.27"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="493,-2670 415,-2670 415,-2646 493,-2646 493,-2670"/>
-<text text-anchor="middle" x="454" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="351.5,-2712 278.5,-2712 278.5,-2688 351.5,-2688 351.5,-2712"/>
+<text text-anchor="middle" x="315" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302,-2742C157.46,-2752 63.33,-1556.4 50.11,-1378.12"/>
-<polygon fill="#000000" stroke="#000000" points="53.59,-1377.79 49.37,-1368.07 46.61,-1378.3 53.59,-1377.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.85,-2663.84C400.8,-2667.02 385.13,-2671.82 372,-2679 335.85,-2698.77 339.33,-2763.19 304,-2742"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge4" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.31,-2698.06C245.51,-2694.55 197.23,-2684.82 165,-2658"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.72,-2657.5C399.09,-2655.19 382.3,-2649.6 372,-2637 330.5,-2586.21 307.79,-1544.05 304.44,-1378.17"/>
-<polygon fill="#000000" stroke="#000000" points="307.94,-1378.07 304.24,-1368.14 300.94,-1378.21 307.94,-1378.07"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.22,-2699.84C261.91,-2697.77 243.85,-2692.27 233,-2679 192.24,-2629.16 168.99,-1608.13 165.47,-1441.81"/>
+<polygon fill="#000000" stroke="#000000" points="168.96,-1441.26 165.25,-1431.34 161.96,-1441.41 168.96,-1441.26"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="234,-1368 131,-1368 131,-1344 234,-1344 234,-1368"/>
-<text text-anchor="middle" x="182.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="349,-2670 281,-2670 281,-2646 349,-2646 349,-2670"/>
+<text text-anchor="middle" x="315" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M130.84,-1356C122.49,-1356 113.78,-1356 105.3,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="105.09,-1352.5 95.09,-1356 105.09,-1359.5 105.09,-1352.5"/>
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.9,-2669C247.69,-2677.77 197.02,-2684.64 165,-2658"/>
+</g>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge49" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.71,-2658.12C263.78,-2656.3 244.42,-2650.93 233,-2637 193.59,-2588.91 169.26,-1603.88 165.51,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="169,-1441.23 165.27,-1431.31 162,-1441.39 169,-1441.23"/>
 </g>
 <!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node7" class="node">
 <title>sourcefile~rmvs_discard.f90</title>
 <g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="501,-108 407,-108 407,-84 501,-84 501,-108"/>
-<text text-anchor="middle" x="454" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-2628 268,-2628 268,-2604 362,-2604 362,-2628"/>
+<text text-anchor="middle" x="315" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge6" class="edge">
 <title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.8,-92.79C377.27,-91.53 338.22,-91.33 304,-96"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.64,-2627.63C256.28,-2630.59 244.18,-2633.83 233,-2637 202.57,-2645.64 189.31,-2678.23 165,-2658"/>
 </g>
 <!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge79" class="edge">
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge74" class="edge">
 <title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.71,-97.98C393.59,-100.92 380.56,-106.55 372,-117 331.9,-165.99 308.1,-1170.01 304.48,-1333.57"/>
-<polygon fill="#000000" stroke="#000000" points="300.98,-1333.79 304.26,-1343.87 307.98,-1333.95 300.98,-1333.79"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.73,-2614C254.61,-2611.07 241.57,-2605.44 233,-2595 194.94,-2548.65 169.53,-1599.49 165.55,-1441.27"/>
+<polygon fill="#000000" stroke="#000000" points="169.05,-1441.18 165.3,-1431.27 162.05,-1441.35 169.05,-1441.18"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497,-66 411,-66 411,-42 497,-42 497,-66"/>
-<text text-anchor="middle" x="454" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="354,-2586 276,-2586 276,-2562 354,-2562 354,-2586"/>
+<text text-anchor="middle" x="315" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.86,-64.53C398.32,-67.77 384.58,-71.43 372,-75 341.57,-83.64 335.34,-91.72 304,-96"/>
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.85,-2579.84C261.8,-2583.02 246.13,-2587.82 233,-2595 196.85,-2614.77 196.67,-2684.35 165,-2658"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.93,-55.12C396.43,-57.75 381.47,-63.41 372,-75 330.5,-125.79 307.79,-1167.95 304.44,-1333.83"/>
-<polygon fill="#000000" stroke="#000000" points="300.94,-1333.79 304.24,-1343.86 307.94,-1333.93 300.94,-1333.79"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.76,-2573.47C260.13,-2571.15 243.34,-2565.56 233,-2553 159.8,-2464.03 163.57,-1592.74 164.79,-1441.36"/>
+<polygon fill="#000000" stroke="#000000" points="168.29,-1441.05 164.88,-1431.02 161.29,-1440.99 168.29,-1441.05"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488,-24 420,-24 420,0 488,0 488,-24"/>
-<text text-anchor="middle" x="454" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="355,-2544 275,-2544 275,-2520 355,-2520 355,-2544"/>
+<text text-anchor="middle" x="315" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.69,-16.8C404.49,-19.93 386.66,-24.98 372,-33 335.85,-52.77 344.82,-90.43 304,-96"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302,-96C249.82,-103.12 236.12,-93.83 183.5,-96"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.5,-96C51.92,-101.33 48.21,-1166.13 48.43,-1333.87"/>
-<polygon fill="#000000" stroke="#000000" points="44.93,-1333.99 48.45,-1343.99 51.93,-1333.98 44.93,-1333.99"/>
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163,-2658C66.94,-2578.07 51.29,-2152.64 48.91,-2050.2"/>
+<polygon fill="#000000" stroke="#000000" points="52.4,-2050 48.69,-2040.08 45.41,-2050.15 52.4,-2050"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.79,-2536.16C260.62,-2539.14 245.14,-2544.25 233,-2553 187.91,-2585.53 207.74,-2693.56 165,-2658"/>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge85" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.68,-11.86C402.75,-13.68 383.39,-19.04 372,-33 329.15,-85.54 307.54,-1164.03 304.4,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="300.9,-1333.8 304.21,-1343.87 307.9,-1333.93 300.9,-1333.8"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.93,-2531.33C259.55,-2528.94 243.17,-2523.33 233,-2511 162.55,-2425.58 164.02,-1589.81 164.85,-1441.46"/>
+<polygon fill="#000000" stroke="#000000" points="168.35,-1441.31 164.91,-1431.29 161.35,-1441.27 168.35,-1441.31"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.52,-1343.91C296.37,-1214.67 249.7,-93.28 183.5,-96"/>
+<!-- sourcefile~symba_collision.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node10" class="node">
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-1620 262,-1620 262,-1596 368,-1596 368,-1620"/>
+<text text-anchor="middle" x="315" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+</a>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.93,-1356C262.05,-1356 253.35,-1356 244.59,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="244.33,-1352.5 234.33,-1356 244.33,-1359.5 244.33,-1352.5"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge9" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M261.65,-1602C251.26,-1598.83 241.08,-1594.09 233,-1587 189.05,-1548.46 173.08,-1477.38 167.62,-1441.29"/>
+<polygon fill="#000000" stroke="#000000" points="171.08,-1440.71 166.25,-1431.28 164.14,-1441.67 171.08,-1440.71"/>
+</g>
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="529,-2628 379,-2628 379,-2604 529,-2604 529,-2628"/>
-<text text-anchor="middle" x="454" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="342,-1578 288,-1578 288,-1554 342,-1554 342,-1578"/>
+<text text-anchor="middle" x="315" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M389.83,-2603.93C383.56,-2601.48 377.5,-2598.54 372,-2595 331.61,-2569 339.68,-2543.15 304,-2511"/>
-</g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M381.89,-2603.93C378.2,-2601.43 374.85,-2598.48 372,-2595 331.9,-2546.01 308.1,-1541.99 304.48,-1378.43"/>
-<polygon fill="#000000" stroke="#000000" points="307.98,-1378.05 304.26,-1368.13 300.98,-1378.21 307.98,-1378.05"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge10" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.92,-1564.56C270.76,-1562.43 248.66,-1557.28 233,-1545 198.83,-1518.21 179.63,-1469.32 170.88,-1440.95"/>
+<polygon fill="#000000" stroke="#000000" points="174.19,-1439.8 168.03,-1431.18 167.47,-1441.76 174.19,-1439.8"/>
 </g>
-<!-- sourcefile~symba_step.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~symba_step.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="498,-2586 410,-2586 410,-2562 498,-2562 498,-2586"/>
-<text text-anchor="middle" x="454" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="348.5,-1536 281.5,-1536 281.5,-1512 348.5,-1512 348.5,-1536"/>
+<text text-anchor="middle" x="315" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.74,-2565.33C397.3,-2562.16 383.89,-2558.08 372,-2553 339.33,-2539.05 330.39,-2534.78 304,-2511"/>
-</g>
-<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M409.69,-2572.62C395.59,-2569.89 381.21,-2564.23 372,-2553 333.25,-2505.75 308.37,-1537.7 304.52,-1378.17"/>
-<polygon fill="#000000" stroke="#000000" points="308.02,-1378.01 304.28,-1368.1 301.02,-1378.18 308.02,-1378.01"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge11" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.33,-1520.36C265.75,-1517.47 247.41,-1512.28 233,-1503 208.19,-1487.03 188.2,-1458.98 176.47,-1439.72"/>
+<polygon fill="#000000" stroke="#000000" points="179.47,-1437.92 171.39,-1431.06 173.43,-1441.46 179.47,-1437.92"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="493,-2376 415,-2376 415,-2352 493,-2352 493,-2376"/>
-<text text-anchor="middle" x="454" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353,-1494 277,-1494 277,-1470 353,-1470 353,-1494"/>
+<text text-anchor="middle" x="315" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.81,-2363.42C399.2,-2361.1 382.39,-2355.52 372,-2343 308.37,-2266.36 304.22,-1518.16 304,-1378.42"/>
-<polygon fill="#000000" stroke="#000000" points="307.5,-1378.1 303.99,-1368.1 300.5,-1378.11 307.5,-1378.1"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.94,-1474.86C262.87,-1471.51 246.9,-1466.93 233,-1461 217.9,-1454.56 202.24,-1445.1 189.76,-1436.79"/>
+<polygon fill="#000000" stroke="#000000" points="191.51,-1433.75 181.28,-1431 187.57,-1439.53 191.51,-1433.75"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="510,-2334 398,-2334 398,-2310 510,-2310 510,-2334"/>
-<text text-anchor="middle" x="454" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358,-1452 272,-1452 272,-1428 358,-1428 358,-1452"/>
+<text text-anchor="middle" x="315" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M397.99,-2317.51C388.03,-2314.21 378.69,-2309.04 372,-2301 311.08,-2227.85 304.73,-1514.27 304.08,-1378.31"/>
-<polygon fill="#000000" stroke="#000000" points="307.58,-1378.23 304.03,-1368.24 300.58,-1378.26 307.58,-1378.23"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.7,-1434.04C251.63,-1431.21 227.69,-1427.84 207.58,-1425"/>
+<polygon fill="#000000" stroke="#000000" points="207.84,-1421.5 197.45,-1423.57 206.86,-1428.44 207.84,-1421.5"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="490.5,-2292 417.5,-2292 417.5,-2268 490.5,-2268 490.5,-2292"/>
-<text text-anchor="middle" x="454" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-1410 263.5,-1410 263.5,-1386 366.5,-1386 366.5,-1410"/>
+<text text-anchor="middle" x="315" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M417.35,-2279.74C401.06,-2277.64 382.99,-2272.15 372,-2259 313.77,-2189.33 305.26,-1510.05 304.15,-1378.13"/>
-<polygon fill="#000000" stroke="#000000" points="307.65,-1377.99 304.07,-1368.02 300.65,-1378.05 307.65,-1377.99"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.14,-1405.17C245.13,-1407.71 225.06,-1410.54 207.79,-1412.97"/>
+<polygon fill="#000000" stroke="#000000" points="206.85,-1409.57 197.44,-1414.43 207.83,-1416.5 206.85,-1409.57"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="509.5,-2250 398.5,-2250 398.5,-2226 509.5,-2226 509.5,-2250"/>
-<text text-anchor="middle" x="454" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1368 262.5,-1368 262.5,-1344 367.5,-1344 367.5,-1368"/>
+<text text-anchor="middle" x="315" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M398.45,-2233.6C388.33,-2230.32 378.82,-2225.13 372,-2217 316.52,-2150.86 305.83,-1506.92 304.24,-1378.29"/>
-<polygon fill="#000000" stroke="#000000" points="307.74,-1378.04 304.12,-1368.08 300.74,-1378.12 307.74,-1378.04"/>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M262.24,-1366.95C252.35,-1369.72 242.22,-1373.06 233,-1377 217.9,-1383.44 202.24,-1392.9 189.76,-1401.21"/>
+<polygon fill="#000000" stroke="#000000" points="187.57,-1398.47 181.28,-1407 191.51,-1404.25 187.57,-1398.47"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-2208 415.5,-2208 415.5,-2184 492.5,-2184 492.5,-2208"/>
-<text text-anchor="middle" x="454" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353.5,-1326 276.5,-1326 276.5,-1302 353.5,-1302 353.5,-1326"/>
+<text text-anchor="middle" x="315" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.31,-2195.42C399.6,-2193.12 382.58,-2187.56 372,-2175 319.25,-2112.37 306.42,-1503.38 304.34,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="307.83,-1378.04 304.17,-1368.1 300.83,-1378.16 307.83,-1378.04"/>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.5,-1318.6C262.06,-1321.63 245.95,-1326.66 233,-1335 208.19,-1350.97 188.2,-1379.02 176.47,-1398.28"/>
+<polygon fill="#000000" stroke="#000000" points="173.43,-1396.54 171.39,-1406.94 179.47,-1400.08 173.43,-1396.54"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="507,-2544 401,-2544 401,-2520 507,-2520 507,-2544"/>
-<text text-anchor="middle" x="454" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-1284 272.5,-1284 272.5,-1260 357.5,-1260 357.5,-1284"/>
+<text text-anchor="middle" x="315" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.74,-2538.22C369.02,-2539.02 329.81,-2534.26 304,-2511"/>
-</g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M400.83,-2528.48C389.79,-2525.26 379.29,-2519.87 372,-2511 297.42,-2420.26 302.36,-1531.17 303.77,-1378.31"/>
-<polygon fill="#000000" stroke="#000000" points="307.27,-1378.28 303.86,-1368.25 300.27,-1378.21 307.27,-1378.28"/>
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.33,-1276.09C258.7,-1279.08 244.21,-1284.22 233,-1293 198.83,-1319.79 179.63,-1368.68 170.88,-1397.05"/>
+<polygon fill="#000000" stroke="#000000" points="167.47,-1396.24 168.03,-1406.82 174.19,-1398.2 167.47,-1396.24"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="513,-2166 395,-2166 395,-2142 513,-2142 513,-2166"/>
-<text text-anchor="middle" x="454" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~symba_step.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-1242 271,-1242 271,-1218 359,-1218 359,-1242"/>
+<text text-anchor="middle" x="315" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M394.79,-2148.26C386.07,-2144.96 378.01,-2140.1 372,-2133 321.96,-2073.85 307.04,-1499.44 304.44,-1378.34"/>
-<polygon fill="#000000" stroke="#000000" points="307.94,-1378 304.23,-1368.07 300.94,-1378.14 307.94,-1378"/>
+<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.92,-1233.58C257.5,-1236.55 243.49,-1241.8 233,-1251 189.05,-1289.54 173.08,-1360.62 167.62,-1396.71"/>
+<polygon fill="#000000" stroke="#000000" points="164.14,-1396.33 166.25,-1406.72 171.08,-1397.29 164.14,-1396.33"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488,-2124 420,-2124 420,-2100 488,-2100 488,-2124"/>
-<text text-anchor="middle" x="454" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="349,-1200 281,-1200 281,-1176 349,-1176 349,-1200"/>
+<text text-anchor="middle" x="315" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.91,-2111.95C403.04,-2110.08 383.67,-2104.72 372,-2091 324.7,-2035.38 307.72,-1496.24 304.57,-1378.6"/>
-<polygon fill="#000000" stroke="#000000" points="308.06,-1378.18 304.3,-1368.28 301.06,-1378.37 308.06,-1378.18"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge73" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.85,-1189.3C264.59,-1191.59 245.79,-1196.95 233,-1209 178.98,-1259.9 167.78,-1353.99 165.52,-1396.78"/>
+<polygon fill="#000000" stroke="#000000" points="162.02,-1396.82 165.11,-1406.95 169.01,-1397.11 162.02,-1396.82"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496.5,-2082 411.5,-2082 411.5,-2058 496.5,-2058 496.5,-2082"/>
-<text text-anchor="middle" x="454" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-1158 233,-1158 233,-1134 397,-1134 397,-1158"/>
+<text text-anchor="middle" x="315" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.21,-2068.65C396.74,-2065.99 381.72,-2060.37 372,-2049 327.37,-1996.81 308.4,-1491.42 304.69,-1378.36"/>
-<polygon fill="#000000" stroke="#000000" points="308.18,-1378.02 304.37,-1368.14 301.19,-1378.24 308.18,-1378.02"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M244.83,-1158.15C240.52,-1160.6 236.51,-1163.52 233,-1167 168.77,-1230.6 163.35,-1348.07 164.09,-1396.86"/>
+<polygon fill="#000000" stroke="#000000" points="160.59,-1397.05 164.35,-1406.95 167.59,-1396.87 160.59,-1397.05"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="487.5,-2040 420.5,-2040 420.5,-2016 487.5,-2016 487.5,-2040"/>
-<text text-anchor="middle" x="454" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-1116 263.5,-1116 263.5,-1092 366.5,-1092 366.5,-1116"/>
+<text text-anchor="middle" x="315" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M420.38,-2027.94C403.43,-2026.09 383.85,-2020.76 372,-2007 330.08,-1958.28 309.14,-1487.22 304.84,-1378.37"/>
-<polygon fill="#000000" stroke="#000000" points="308.33,-1378.06 304.45,-1368.21 301.34,-1378.33 308.33,-1378.06"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.28,-1108.32C252.06,-1111.5 241.11,-1116.67 233,-1125 194.89,-1164.13 173.75,-1334.57 167.22,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="163.71,-1396.38 166.17,-1406.69 170.67,-1397.09 163.71,-1396.38"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496.5,-1998 411.5,-1998 411.5,-1974 496.5,-1974 496.5,-1998"/>
-<text text-anchor="middle" x="454" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="349,-1074 281,-1074 281,-1050 349,-1050 349,-1074"/>
+<text text-anchor="middle" x="315" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.29,-1984.58C396.83,-1981.91 381.8,-1976.31 372,-1965 332.75,-1919.72 309.92,-1482.48 305.01,-1378.23"/>
-<polygon fill="#000000" stroke="#000000" points="308.5,-1378.03 304.54,-1368.2 301.51,-1378.35 308.5,-1378.03"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.67,-1062.66C264.16,-1064.76 245.19,-1070.13 233,-1083 189.66,-1128.74 171.49,-1328.7 166.51,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="162.99,-1396.61 165.77,-1406.83 169.97,-1397.1 162.99,-1396.61"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="502,-1956 406,-1956 406,-1932 502,-1932 502,-1956"/>
-<text text-anchor="middle" x="454" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-1032 263.5,-1032 263.5,-1008 366.5,-1008 366.5,-1032"/>
+<text text-anchor="middle" x="315" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M405.85,-1941.38C393.17,-1938.36 380.6,-1932.84 372,-1923 335.45,-1881.17 310.78,-1478.03 305.2,-1378.25"/>
-<polygon fill="#000000" stroke="#000000" points="308.69,-1377.9 304.64,-1368.11 301.7,-1378.28 308.69,-1377.9"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.41,-1023.93C252.05,-1027.1 241,-1032.37 233,-1041 184.38,-1093.45 169.49,-1323.43 165.95,-1396.58"/>
+<polygon fill="#000000" stroke="#000000" points="162.44,-1396.77 165.47,-1406.92 169.43,-1397.09 162.44,-1396.77"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="493.5,-1914 414.5,-1914 414.5,-1890 493.5,-1890 493.5,-1914"/>
-<text text-anchor="middle" x="454" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350.5,-990 279.5,-990 279.5,-966 350.5,-966 350.5,-990"/>
+<text text-anchor="middle" x="315" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.33,-1900.99C399.01,-1898.55 382.57,-1892.98 372,-1881 304.79,-1804.83 302.95,-1468.78 303.7,-1378.43"/>
-<polygon fill="#000000" stroke="#000000" points="307.2,-1378.26 303.8,-1368.23 300.2,-1378.19 307.2,-1378.26"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.24,-978.63C262.96,-980.78 244.64,-986.22 233,-999 179.07,-1058.2 167.71,-1318.44 165.5,-1396.68"/>
+<polygon fill="#000000" stroke="#000000" points="162,-1396.76 165.24,-1406.85 169,-1396.95 162,-1396.76"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505.5,-2502 402.5,-2502 402.5,-2478 505.5,-2478 505.5,-2502"/>
-<text text-anchor="middle" x="454" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="354,-948 276,-948 276,-924 354,-924 354,-948"/>
+<text text-anchor="middle" x="315" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.46,-2500.95C362.18,-2509.05 311.35,-2517.62 304,-2511"/>
-</g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.11,-2486.83C390.61,-2483.65 379.57,-2478.19 372,-2469 300.17,-2381.81 302.8,-1528.31 303.82,-1378.42"/>
-<polygon fill="#000000" stroke="#000000" points="307.32,-1378.19 303.89,-1368.16 300.32,-1378.13 307.32,-1378.19"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.85,-937.03C260.43,-939.46 243.77,-945 233,-957 173.71,-1023.04 166.1,-1314.03 165.13,-1396.9"/>
+<polygon fill="#000000" stroke="#000000" points="161.63,-1396.94 165.04,-1406.97 168.63,-1397.01 161.63,-1396.94"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="501,-2460 407,-2460 407,-2436 501,-2436 501,-2460"/>
-<text text-anchor="middle" x="454" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="342.5,-906 287.5,-906 287.5,-882 342.5,-882 342.5,-906"/>
+<text text-anchor="middle" x="315" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.79,-2457.43C395.2,-2460.49 382.96,-2464.32 372,-2469 339.33,-2482.95 330.39,-2534.78 304,-2511"/>
-</g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.77,-2445.97C393.64,-2443.04 380.6,-2437.42 372,-2427 302.91,-2343.34 303.25,-1525.17 303.87,-1378.47"/>
-<polygon fill="#000000" stroke="#000000" points="307.38,-1378.07 303.92,-1368.05 300.38,-1378.03 307.38,-1378.07"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.49,-893.66C269.46,-894.93 246.5,-899.79 233,-915 168.45,-987.77 164.64,-1308.65 164.83,-1396.62"/>
+<polygon fill="#000000" stroke="#000000" points="161.33,-1396.83 164.88,-1406.81 168.33,-1396.8 161.33,-1396.83"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495,-2418 413,-2418 413,-2394 495,-2394 495,-2418"/>
-<text text-anchor="middle" x="454" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371,-864 259,-864 259,-840 371,-840 371,-864"/>
+<text text-anchor="middle" x="315" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.62,-2411.22C398.95,-2414.31 384.09,-2419.22 372,-2427 331.61,-2453 339.68,-2543.15 304,-2511"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302,-2511C214.35,-2432.01 187.9,-1531.34 184.03,-1378.1"/>
-<polygon fill="#000000" stroke="#000000" points="187.52,-1377.93 183.78,-1368.02 180.53,-1378.11 187.52,-1377.93"/>
-</g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.7,-2405.11C397.69,-2402.61 381.91,-2396.97 372,-2385 305.65,-2304.86 303.73,-1521.84 303.94,-1378.48"/>
-<polygon fill="#000000" stroke="#000000" points="307.44,-1378.27 303.96,-1368.27 300.44,-1378.26 307.44,-1378.27"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge27" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.9,-856.91C249.07,-860.18 239.81,-865.25 233,-873 163.12,-952.59 163.28,-1303.97 164.57,-1396.57"/>
+<polygon fill="#000000" stroke="#000000" points="161.08,-1396.83 164.74,-1406.77 168.08,-1396.71 161.08,-1396.83"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488,-1872 420,-1872 420,-1848 488,-1848 488,-1872"/>
-<text text-anchor="middle" x="454" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="345,-822 285,-822 285,-798 345,-798 345,-822"/>
+<text text-anchor="middle" x="315" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.76,-1859.68C403.06,-1857.7 383.9,-1852.33 372,-1839 310.09,-1769.61 304.36,-1463.75 303.98,-1378.26"/>
-<polygon fill="#000000" stroke="#000000" points="307.48,-1378.12 303.96,-1368.12 300.48,-1378.13 307.48,-1378.12"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge28" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.66,-809.79C267.05,-811.33 245.68,-816.42 233,-831 195.08,-874.57 171.32,-1295.11 166.09,-1396.9"/>
+<polygon fill="#000000" stroke="#000000" points="162.59,-1396.8 165.58,-1406.97 169.58,-1397.16 162.59,-1396.8"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1830 415.5,-1830 415.5,-1806 492.5,-1806 492.5,-1830"/>
-<text text-anchor="middle" x="454" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353.5,-780 276.5,-780 276.5,-756 353.5,-756 353.5,-780"/>
+<text text-anchor="middle" x="315" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.3,-1817C399.78,-1814.6 382.91,-1809.07 372,-1797 315.44,-1734.43 305.9,-1459.22 304.31,-1378.39"/>
-<polygon fill="#000000" stroke="#000000" points="307.81,-1378.26 304.14,-1368.32 300.81,-1378.38 307.81,-1378.26"/>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge29" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.46,-768.71C260.77,-771.03 243.73,-776.58 233,-789 192.42,-836 170.53,-1290.11 165.92,-1396.69"/>
+<polygon fill="#000000" stroke="#000000" points="162.42,-1396.78 165.49,-1406.92 169.41,-1397.08 162.42,-1396.78"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="491.5,-1788 416.5,-1788 416.5,-1764 491.5,-1764 491.5,-1788"/>
-<text text-anchor="middle" x="454" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="349,-738 281,-738 281,-714 349,-714 349,-738"/>
+<text text-anchor="middle" x="315" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M416.22,-1775.04C400.49,-1772.7 383.2,-1767.2 372,-1755 320.79,-1699.25 307.61,-1454.75 304.72,-1378.68"/>
-<polygon fill="#000000" stroke="#000000" points="308.21,-1378.21 304.36,-1368.34 301.21,-1378.46 308.21,-1378.21"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge30" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.96,-726.09C264.1,-727.97 244.73,-733.33 233,-747 189.68,-797.5 169.73,-1286.63 165.75,-1396.96"/>
+<polygon fill="#000000" stroke="#000000" points="162.26,-1396.84 165.4,-1406.96 169.25,-1397.09 162.26,-1396.84"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1746 415.5,-1746 415.5,-1722 492.5,-1722 492.5,-1746"/>
-<text text-anchor="middle" x="454" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370.5,-696 259.5,-696 259.5,-672 370.5,-672 370.5,-696"/>
+<text text-anchor="middle" x="315" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.09,-1732.75C399.72,-1730.28 383.02,-1724.77 372,-1713 326.04,-1663.93 309.47,-1449.11 305.22,-1378.55"/>
-<polygon fill="#000000" stroke="#000000" points="308.69,-1377.94 304.62,-1368.16 301.7,-1378.34 308.69,-1377.94"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.14,-688.62C249.16,-691.9 239.79,-697.04 233,-705 187.02,-758.93 169.04,-1281.65 165.62,-1396.68"/>
+<polygon fill="#000000" stroke="#000000" points="162.12,-1396.69 165.33,-1406.79 169.12,-1396.89 162.12,-1396.69"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="486,-1704 422,-1704 422,-1680 486,-1680 486,-1704"/>
-<text text-anchor="middle" x="454" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353.5,-654 276.5,-654 276.5,-630 353.5,-630 353.5,-654"/>
+<text text-anchor="middle" x="315" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.76,-1691.52C404.81,-1689.58 384.78,-1684.31 372,-1671 331.25,-1628.54 311.55,-1443.15 305.83,-1378.41"/>
-<polygon fill="#000000" stroke="#000000" points="309.29,-1377.77 304.95,-1368.11 302.31,-1378.37 309.29,-1377.77"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.35,-642.62C260.64,-644.92 243.62,-650.48 233,-663 184.28,-720.44 168.35,-1278.25 165.5,-1396.89"/>
+<polygon fill="#000000" stroke="#000000" points="161.99,-1396.88 165.26,-1406.96 168.99,-1397.05 161.99,-1396.88"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-1662 372,-1662 372,-1638 536,-1638 536,-1662"/>
-<text text-anchor="middle" x="454" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="342,-612 288,-612 288,-588 342,-588 342,-612"/>
+<text text-anchor="middle" x="315" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M383.75,-1637.93C379.46,-1635.46 375.48,-1632.51 372,-1629 336.4,-1593.06 313.89,-1436.53 306.59,-1378.1"/>
-<polygon fill="#000000" stroke="#000000" points="310.06,-1377.59 305.37,-1368.09 303.11,-1378.44 310.06,-1377.59"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.65,-599.43C269.44,-600.57 246.21,-605.35 233,-621 181.58,-681.92 167.72,-1274.14 165.39,-1396.82"/>
+<polygon fill="#000000" stroke="#000000" points="161.88,-1396.85 165.2,-1406.91 168.88,-1396.97 161.88,-1396.85"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481,-1620 427,-1620 427,-1596 481,-1596 481,-1620"/>
-<text text-anchor="middle" x="454" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="347,-570 283,-570 283,-546 347,-546 347,-570"/>
+<text text-anchor="middle" x="315" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.8,-1607.65C409.14,-1606.03 386.51,-1601.04 372,-1587 312.89,-1529.79 304.47,-1424.05 303.74,-1378.18"/>
-<polygon fill="#000000" stroke="#000000" points="307.24,-1378.1 303.7,-1368.12 300.24,-1378.14 307.24,-1378.1"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.88,-557.78C265.53,-559.43 245.06,-564.65 233,-579 178.86,-643.42 167.11,-1270.43 165.29,-1396.85"/>
+<polygon fill="#000000" stroke="#000000" points="161.79,-1396.85 165.15,-1406.9 168.78,-1396.95 161.79,-1396.85"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1578 415.5,-1578 415.5,-1554 492.5,-1554 492.5,-1578"/>
-<text text-anchor="middle" x="454" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353,-528 277,-528 277,-504 353,-504 353,-528"/>
+<text text-anchor="middle" x="315" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.12,-1563.74C400.12,-1561.06 383.7,-1555.67 372,-1545 323.12,-1500.41 309.34,-1418.11 305.49,-1378.48"/>
-<polygon fill="#000000" stroke="#000000" points="308.95,-1377.96 304.62,-1368.29 301.98,-1378.55 308.95,-1377.96"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge37" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.7,-516.49C260.86,-518.75 243.63,-524.3 233,-537 176.18,-604.87 166.55,-1265.8 165.2,-1396.58"/>
+<polygon fill="#000000" stroke="#000000" points="161.69,-1396.91 165.1,-1406.94 168.69,-1396.98 161.69,-1396.91"/>
 </g>
 <!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node37" class="node">
 <title>sourcefile~util_append.f90</title>
 <g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497,-1536 411,-1536 411,-1512 497,-1512 497,-1536"/>
-<text text-anchor="middle" x="454" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358,-486 272,-486 272,-462 358,-462 358,-486"/>
+<text text-anchor="middle" x="315" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge49" class="edge">
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge38" class="edge">
 <title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.59,-1520.21C397.07,-1517.23 382.82,-1512.03 372,-1503 332.99,-1470.44 315.17,-1410.61 308.07,-1378.22"/>
-<polygon fill="#000000" stroke="#000000" points="311.41,-1377.1 305.98,-1368 304.55,-1378.5 311.41,-1377.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.64,-475.3C257.28,-477.98 242.49,-483.62 233,-495 173.49,-566.33 166.01,-1261.38 165.12,-1396.36"/>
+<polygon fill="#000000" stroke="#000000" points="161.61,-1396.68 165.05,-1406.7 168.61,-1396.72 161.61,-1396.68"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488,-1494 420,-1494 420,-1470 488,-1470 488,-1494"/>
-<text text-anchor="middle" x="454" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="354.5,-444 275.5,-444 275.5,-420 354.5,-420 354.5,-444"/>
+<text text-anchor="middle" x="315" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.88,-1479.01C404.2,-1476.27 385.9,-1471.03 372,-1461 342.56,-1439.77 322.58,-1401.51 312.25,-1377.5"/>
-<polygon fill="#000000" stroke="#000000" points="315.46,-1376.09 308.42,-1368.18 308.98,-1378.76 315.46,-1376.09"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge39" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.4,-432.65C259.91,-435.01 243.31,-440.6 233,-453 170.72,-527.89 165.47,-1258.75 165.04,-1396.63"/>
+<polygon fill="#000000" stroke="#000000" points="161.54,-1396.81 165.01,-1406.82 168.54,-1396.83 161.54,-1396.81"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="484,-1452 424,-1452 424,-1428 484,-1428 484,-1452"/>
-<text text-anchor="middle" x="454" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="342,-402 288,-402 288,-378 342,-378 342,-402"/>
+<text text-anchor="middle" x="315" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M423.97,-1436.05C407.93,-1433.01 388.06,-1427.78 372,-1419 351.93,-1408.03 333.19,-1389.82 320.49,-1375.8"/>
-<polygon fill="#000000" stroke="#000000" points="322.97,-1373.32 313.74,-1368.11 317.7,-1377.93 322.97,-1373.32"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge41" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.95,-389.34C269.65,-390.4 246.17,-395.12 233,-411 167.94,-489.47 164.97,-1256.54 164.97,-1396.98"/>
+<polygon fill="#000000" stroke="#000000" points="161.47,-1396.99 164.97,-1406.98 168.47,-1396.98 161.47,-1396.99"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="506.5,-1410 401.5,-1410 401.5,-1386 506.5,-1386 506.5,-1410"/>
-<text text-anchor="middle" x="454" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="342,-360 288,-360 288,-336 342,-336 342,-360"/>
+<text text-anchor="middle" x="315" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.93,-1385.93C394.07,-1383.09 382.62,-1380.02 372,-1377 363.45,-1374.57 354.34,-1371.85 345.65,-1369.19"/>
-<polygon fill="#000000" stroke="#000000" points="346.67,-1365.84 336.08,-1366.24 344.6,-1372.53 346.67,-1365.84"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge42" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.94,-347.33C269.63,-348.38 246.15,-353.1 233,-369 165.28,-450.9 164.49,-1251.46 164.9,-1396.52"/>
+<polygon fill="#000000" stroke="#000000" points="161.41,-1396.85 164.94,-1406.84 168.41,-1396.83 161.41,-1396.85"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="482.5,-1368 425.5,-1368 425.5,-1344 482.5,-1344 482.5,-1368"/>
-<text text-anchor="middle" x="454" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="349,-318 281,-318 281,-294 349,-294 349,-318"/>
+<text text-anchor="middle" x="315" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.32,-1356C403.13,-1356 371.62,-1356 346.28,-1356"/>
-<polygon fill="#000000" stroke="#000000" points="346.19,-1352.5 336.19,-1356 346.19,-1359.5 346.19,-1352.5"/>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.74,-305.91C263.82,-307.74 244.46,-313.1 233,-327 162.55,-412.42 164.02,-1248.19 164.85,-1396.54"/>
+<polygon fill="#000000" stroke="#000000" points="161.35,-1396.73 164.91,-1406.71 168.35,-1396.69 161.35,-1396.73"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497,-234 411,-234 411,-210 497,-210 497,-234"/>
-<text text-anchor="middle" x="454" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356,-276 274,-276 274,-252 356,-252 356,-276"/>
+<text text-anchor="middle" x="315" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.84,-212.59C369.42,-203.89 311.37,-193.37 304,-201"/>
-</g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.98,-223.16C396.48,-225.8 381.51,-231.45 372,-243 300.17,-330.19 302.8,-1183.69 303.82,-1333.58"/>
-<polygon fill="#000000" stroke="#000000" points="300.32,-1333.87 303.89,-1343.84 307.32,-1333.81 300.32,-1333.87"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge45" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.66,-264.86C258.65,-267.36 242.88,-273 233,-285 159.8,-373.97 163.57,-1245.26 164.79,-1396.64"/>
+<polygon fill="#000000" stroke="#000000" points="161.29,-1397.01 164.88,-1406.98 168.29,-1396.95 161.29,-1397.01"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492.5,-1326 415.5,-1326 415.5,-1302 492.5,-1302 492.5,-1326"/>
-<text text-anchor="middle" x="454" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-234 266,-234 266,-210 364,-210 364,-234"/>
+<text text-anchor="middle" x="315" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.4,-1323.37C401.7,-1326.88 386.11,-1330.99 372,-1335 363.45,-1337.43 354.34,-1340.15 345.65,-1342.81"/>
-<polygon fill="#000000" stroke="#000000" points="344.6,-1339.47 336.08,-1345.76 346.67,-1346.16 344.6,-1339.47"/>
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge46" class="edge">
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M265.61,-224.5C253.22,-227.55 241.11,-233.12 233,-243 194.94,-289.35 169.53,-1238.51 165.55,-1396.73"/>
+<polygon fill="#000000" stroke="#000000" points="162.05,-1396.65 165.3,-1406.73 169.05,-1396.82 162.05,-1396.65"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488,-1284 420,-1284 420,-1260 488,-1260 488,-1284"/>
-<text text-anchor="middle" x="454" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="354.5,-192 275.5,-192 275.5,-168 354.5,-168 354.5,-192"/>
+<text text-anchor="middle" x="315" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.69,-1276.8C404.49,-1279.93 386.66,-1284.98 372,-1293 351.93,-1303.97 333.19,-1322.18 320.49,-1336.2"/>
-<polygon fill="#000000" stroke="#000000" points="317.7,-1334.07 313.74,-1343.89 322.97,-1338.68 317.7,-1334.07"/>
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge47" class="edge">
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.32,-180.57C259.81,-182.92 243.22,-188.53 233,-201 193.59,-249.09 169.26,-1234.12 165.51,-1396.45"/>
+<polygon fill="#000000" stroke="#000000" points="162,-1396.61 165.27,-1406.69 169,-1396.77 162,-1396.61"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="490,-1242 418,-1242 418,-1218 490,-1218 490,-1242"/>
-<text text-anchor="middle" x="454" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377,-150 253,-150 253,-126 377,-126 377,-150"/>
+<text text-anchor="middle" x="315" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M417.88,-1233.35C402.66,-1236.18 385.31,-1241.4 372,-1251 342.56,-1272.23 322.58,-1310.49 312.25,-1334.5"/>
-<polygon fill="#000000" stroke="#000000" points="308.98,-1333.24 308.42,-1343.82 315.46,-1335.91 308.98,-1333.24"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge48" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.76,-144.72C245.17,-147.99 238.24,-152.59 233,-159 192.24,-208.84 168.99,-1229.87 165.47,-1396.19"/>
+<polygon fill="#000000" stroke="#000000" points="161.96,-1396.59 165.25,-1406.66 168.96,-1396.74 161.96,-1396.59"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496,-1200 412,-1200 412,-1176 496,-1176 496,-1200"/>
-<text text-anchor="middle" x="454" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353.5,-108 276.5,-108 276.5,-84 353.5,-84 353.5,-108"/>
+<text text-anchor="middle" x="315" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.85,-1191.52C397.95,-1194.45 383.15,-1199.69 372,-1209 332.99,-1241.56 315.17,-1301.39 308.07,-1333.78"/>
-<polygon fill="#000000" stroke="#000000" points="304.55,-1333.5 305.98,-1344 311.41,-1334.9 304.55,-1333.5"/>
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge50" class="edge">
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.13,-96.43C260.38,-98.7 243.38,-104.28 233,-117 190.85,-168.63 168.69,-1227.87 165.42,-1396.47"/>
+<polygon fill="#000000" stroke="#000000" points="161.92,-1396.59 165.23,-1406.66 168.92,-1396.73 161.92,-1396.59"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481.5,-1158 426.5,-1158 426.5,-1134 481.5,-1134 481.5,-1158"/>
-<text text-anchor="middle" x="454" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="349,-66 281,-66 281,-42 349,-42 349,-66"/>
+<text text-anchor="middle" x="315" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.3,-1146.7C408.87,-1148.52 386.7,-1153.59 372,-1167 323.12,-1211.59 309.34,-1293.89 305.49,-1333.52"/>
-<polygon fill="#000000" stroke="#000000" points="301.98,-1333.45 304.62,-1343.71 308.95,-1334.04 301.98,-1333.45"/>
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge51" class="edge">
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.68,-53.85C263.74,-55.67 244.38,-61.04 233,-75 189.47,-128.41 168.42,-1225.08 165.38,-1396.54"/>
+<polygon fill="#000000" stroke="#000000" points="161.88,-1396.61 165.21,-1406.67 168.88,-1396.74 161.88,-1396.61"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="489.5,-1116 418.5,-1116 418.5,-1092 489.5,-1092 489.5,-1116"/>
-<text text-anchor="middle" x="454" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353.5,-24 276.5,-24 276.5,0 353.5,0 353.5,-24"/>
+<text text-anchor="middle" x="315" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M418.09,-1105.39C402.18,-1107.78 384.21,-1113.18 372,-1125 312.89,-1182.21 304.47,-1287.95 303.74,-1333.82"/>
-<polygon fill="#000000" stroke="#000000" points="300.24,-1333.86 303.7,-1343.88 307.24,-1333.9 300.24,-1333.86"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge52" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.11,-12.42C260.36,-14.68 243.36,-20.27 233,-33 188.08,-88.2 168.15,-1222.5 165.35,-1396.65"/>
+<polygon fill="#000000" stroke="#000000" points="161.85,-1396.65 165.19,-1406.71 168.85,-1396.76 161.85,-1396.65"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481,-1074 427,-1074 427,-1050 481,-1050 481,-1074"/>
-<text text-anchor="middle" x="454" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358,-2502 272,-2502 272,-2478 358,-2478 358,-2502"/>
+<text text-anchor="middle" x="315" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.99,-1062.13C409.2,-1063.62 386.31,-1068.55 372,-1083 336.4,-1118.94 313.89,-1275.47 306.59,-1333.9"/>
-<polygon fill="#000000" stroke="#000000" points="303.11,-1333.56 305.37,-1343.91 310.06,-1334.41 303.11,-1333.56"/>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge53" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.58,-2488.74C257.22,-2486.07 242.44,-2480.42 233,-2469 165.28,-2387.1 164.49,-1586.54 164.9,-1441.48"/>
+<polygon fill="#000000" stroke="#000000" points="168.41,-1441.17 164.94,-1431.16 161.41,-1441.15 168.41,-1441.17"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~discard.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="493.5,-1032 414.5,-1032 414.5,-1008 493.5,-1008 493.5,-1032"/>
-<text text-anchor="middle" x="454" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~discard.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="347.5,-2460 282.5,-2460 282.5,-2436 347.5,-2436 347.5,-2460"/>
+<text text-anchor="middle" x="315" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.39,-1021.52C399.28,-1024.07 382.96,-1029.58 372,-1041 331.25,-1083.46 311.55,-1268.85 305.83,-1333.59"/>
-<polygon fill="#000000" stroke="#000000" points="302.31,-1333.63 304.95,-1343.89 309.29,-1334.23 302.31,-1333.63"/>
+<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge54" class="edge">
+<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.4,-2448.24C265.12,-2446.56 244.87,-2441.31 233,-2427 167.94,-2348.53 164.97,-1581.46 164.97,-1441.02"/>
+<polygon fill="#000000" stroke="#000000" points="168.47,-1441.02 164.97,-1431.02 161.47,-1441.01 168.47,-1441.02"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481,-990 427,-990 427,-966 481,-966 481,-990"/>
-<text text-anchor="middle" x="454" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="342.5,-2418 287.5,-2418 287.5,-2394 342.5,-2394 342.5,-2418"/>
+<text text-anchor="middle" x="315" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.74,-977.88C408.82,-979.27 385.9,-984.16 372,-999 326.04,-1048.07 309.47,-1262.89 305.22,-1333.45"/>
-<polygon fill="#000000" stroke="#000000" points="301.7,-1333.66 304.62,-1343.84 308.69,-1334.06 301.7,-1333.66"/>
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge55" class="edge">
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.19,-2406.6C269.01,-2405.45 246,-2400.64 233,-2385 170.72,-2310.11 165.47,-1579.25 165.04,-1441.37"/>
+<polygon fill="#000000" stroke="#000000" points="168.54,-1441.17 165.01,-1431.18 161.54,-1441.19 168.54,-1441.17"/>
 </g>
-<!-- sourcefile~discard.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~discard.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="486.5,-948 421.5,-948 421.5,-924 486.5,-924 486.5,-948"/>
-<text text-anchor="middle" x="454" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-2376 272.5,-2376 272.5,-2352 357.5,-2352 357.5,-2376"/>
+<text text-anchor="middle" x="315" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.13,-936.32C404.2,-938.22 384.38,-943.52 372,-957 320.79,-1012.75 307.61,-1257.25 304.72,-1333.32"/>
-<polygon fill="#000000" stroke="#000000" points="301.21,-1333.54 304.36,-1343.66 308.21,-1333.79 301.21,-1333.54"/>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge56" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.48,-2362.85C257.86,-2360.24 242.68,-2354.6 233,-2343 173.49,-2271.67 166.01,-1576.62 165.12,-1441.64"/>
+<polygon fill="#000000" stroke="#000000" points="168.61,-1441.28 165.05,-1431.3 161.61,-1441.32 168.61,-1441.28"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496.5,-906 411.5,-906 411.5,-882 496.5,-882 496.5,-906"/>
-<text text-anchor="middle" x="454" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-2334 267.5,-2334 267.5,-2310 362.5,-2310 362.5,-2334"/>
+<text text-anchor="middle" x="315" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.12,-895.72C396.81,-898.44 381.94,-904.01 372,-915 315.44,-977.57 305.9,-1252.78 304.31,-1333.61"/>
-<polygon fill="#000000" stroke="#000000" points="300.81,-1333.62 304.14,-1343.68 307.81,-1333.74 300.81,-1333.62"/>
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge57" class="edge">
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.43,-2319.8C254.45,-2316.84 241.58,-2311.25 233,-2301 176.18,-2233.13 166.55,-1572.2 165.2,-1441.42"/>
+<polygon fill="#000000" stroke="#000000" points="168.69,-1441.02 165.1,-1431.06 161.69,-1441.09 168.69,-1441.02"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505.5,-864 402.5,-864 402.5,-840 505.5,-840 505.5,-864"/>
-<text text-anchor="middle" x="454" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-2292 267,-2292 267,-2268 363,-2268 363,-2292"/>
+<text text-anchor="middle" x="315" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.18,-855.71C390.82,-858.89 379.83,-864.22 372,-873 310.09,-942.39 304.36,-1248.25 303.98,-1333.74"/>
-<polygon fill="#000000" stroke="#000000" points="300.48,-1333.87 303.96,-1343.88 307.48,-1333.88 300.48,-1333.87"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge58" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.61,-2277.59C253.92,-2274.58 241.41,-2269.01 233,-2259 178.86,-2194.58 167.11,-1567.57 165.29,-1441.15"/>
+<polygon fill="#000000" stroke="#000000" points="168.78,-1441.05 165.15,-1431.1 161.79,-1441.15 168.78,-1441.05"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="488,-822 420,-822 420,-798 488,-798 488,-822"/>
-<text text-anchor="middle" x="454" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="342,-2250 288,-2250 288,-2226 342,-2226 342,-2250"/>
+<text text-anchor="middle" x="315" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M419.7,-810.27C402.98,-812.23 383.82,-817.6 372,-831 304.79,-907.17 302.95,-1243.22 303.7,-1333.57"/>
-<polygon fill="#000000" stroke="#000000" points="300.2,-1333.81 303.8,-1343.77 307.2,-1333.74 300.2,-1333.81"/>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge59" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.65,-2238.57C269.44,-2237.43 246.21,-2232.65 233,-2217 181.58,-2156.08 167.72,-1563.86 165.39,-1441.18"/>
+<polygon fill="#000000" stroke="#000000" points="168.88,-1441.03 165.2,-1431.09 161.88,-1441.15 168.88,-1441.03"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481.5,-780 426.5,-780 426.5,-756 481.5,-756 481.5,-780"/>
-<text text-anchor="middle" x="454" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="351.5,-2208 278.5,-2208 278.5,-2184 351.5,-2184 351.5,-2208"/>
+<text text-anchor="middle" x="315" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge69" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.42,-767.59C408.35,-768.84 385.38,-773.69 372,-789 335.45,-830.83 310.78,-1233.97 305.2,-1333.75"/>
-<polygon fill="#000000" stroke="#000000" points="301.7,-1333.72 304.64,-1343.89 308.69,-1334.1 301.7,-1333.72"/>
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge60" class="edge">
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.43,-2195.67C262.16,-2193.56 244.09,-2188.07 233,-2175 184.28,-2117.56 168.35,-1559.75 165.5,-1441.11"/>
+<polygon fill="#000000" stroke="#000000" points="168.99,-1440.95 165.26,-1431.04 161.99,-1441.12 168.99,-1440.95"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="505.5,-738 402.5,-738 402.5,-714 505.5,-714 505.5,-738"/>
-<text text-anchor="middle" x="454" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-2166 272.5,-2166 272.5,-2142 357.5,-2142 357.5,-2166"/>
+<text text-anchor="middle" x="315" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge70" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M402.42,-729.44C390.92,-732.61 379.8,-738 372,-747 332.75,-792.28 309.92,-1229.52 305.01,-1333.77"/>
-<polygon fill="#000000" stroke="#000000" points="301.51,-1333.65 304.54,-1343.8 308.5,-1333.97 301.51,-1333.65"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge61" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.19,-2152.66C257.72,-2150.01 242.71,-2144.39 233,-2133 187.02,-2079.07 169.04,-1556.35 165.62,-1441.32"/>
+<polygon fill="#000000" stroke="#000000" points="169.12,-1441.11 165.33,-1431.21 162.12,-1441.31 169.12,-1441.11"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497,-192 411,-192 411,-168 497,-168 497,-192"/>
-<text text-anchor="middle" x="454" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="343.5,-2124 286.5,-2124 286.5,-2100 343.5,-2100 343.5,-2124"/>
+<text text-anchor="middle" x="315" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.85,-173.27C377.09,-170.49 331.05,-173.01 304,-201"/>
-</g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge72" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.97,-181.15C396.47,-183.78 381.5,-189.44 372,-201 297.42,-291.74 302.36,-1180.83 303.77,-1333.69"/>
-<polygon fill="#000000" stroke="#000000" points="300.27,-1333.79 303.86,-1343.75 307.27,-1333.72 300.27,-1333.79"/>
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge62" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.16,-2112.4C268.24,-2111.06 245.96,-2106.11 233,-2091 189.68,-2040.5 169.73,-1551.37 165.75,-1441.04"/>
+<polygon fill="#000000" stroke="#000000" points="169.25,-1440.91 165.4,-1431.04 162.26,-1441.16 169.25,-1440.91"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481,-696 427,-696 427,-672 481,-672 481,-696"/>
-<text text-anchor="middle" x="454" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="345,-2082 285,-2082 285,-2058 345,-2058 345,-2082"/>
+<text text-anchor="middle" x="315" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge71" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.74,-683.51C408.58,-684.68 385.36,-689.47 372,-705 330.08,-753.72 309.14,-1224.78 304.84,-1333.63"/>
-<polygon fill="#000000" stroke="#000000" points="301.34,-1333.67 304.45,-1343.79 308.33,-1333.94 301.34,-1333.67"/>
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge63" class="edge">
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.62,-2070.24C267,-2068.72 245.63,-2063.62 233,-2049 192.42,-2002 170.53,-1547.89 165.92,-1441.31"/>
+<polygon fill="#000000" stroke="#000000" points="169.41,-1440.92 165.49,-1431.08 162.42,-1441.22 169.41,-1440.92"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="497,-654 411,-654 411,-630 497,-630 497,-654"/>
-<text text-anchor="middle" x="454" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="351,-2040 279,-2040 279,-2016 351,-2016 351,-2040"/>
+<text text-anchor="middle" x="315" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge73" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M410.78,-643.43C396.45,-646.12 381.63,-651.74 372,-663 327.37,-715.19 308.4,-1220.58 304.69,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="301.19,-1333.76 304.37,-1343.86 308.18,-1333.98 301.19,-1333.76"/>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge64" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.99,-2027.6C262.65,-2025.5 244.35,-2020.04 233,-2007 195.08,-1963.43 171.32,-1542.89 166.09,-1441.1"/>
+<polygon fill="#000000" stroke="#000000" points="169.58,-1440.84 165.58,-1431.03 162.59,-1441.2 169.58,-1440.84"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="501.5,-612 406.5,-612 406.5,-588 501.5,-588 501.5,-612"/>
-<text text-anchor="middle" x="454" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="390,-1998 240,-1998 240,-1974 390,-1974 390,-1998"/>
+<text text-anchor="middle" x="315" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge74" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M406.1,-602.37C393.27,-605.36 380.56,-610.93 372,-621 324.7,-676.62 307.72,-1215.76 304.57,-1333.4"/>
-<polygon fill="#000000" stroke="#000000" points="301.06,-1333.63 304.3,-1343.72 308.06,-1333.82 301.06,-1333.63"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge65" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M243.53,-1973.93C239.63,-1971.44 236.07,-1968.49 233,-1965 163.12,-1885.41 163.28,-1534.03 164.57,-1441.43"/>
+<polygon fill="#000000" stroke="#000000" points="168.08,-1441.29 164.74,-1431.23 161.08,-1441.17 168.08,-1441.29"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="484,-570 424,-570 424,-546 484,-546 484,-570"/>
-<text text-anchor="middle" x="454" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358,-1956 272,-1956 272,-1932 358,-1932 358,-1956"/>
+<text text-anchor="middle" x="315" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge76" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M423.91,-557.64C406.18,-559.08 384.57,-564.14 372,-579 321.96,-638.15 307.04,-1212.56 304.44,-1333.66"/>
-<polygon fill="#000000" stroke="#000000" points="300.94,-1333.86 304.23,-1343.93 307.94,-1334 300.94,-1333.86"/>
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.58,-1942.3C257.4,-1939.56 242.74,-1933.98 233,-1923 168.45,-1850.23 164.64,-1529.35 164.83,-1441.38"/>
+<polygon fill="#000000" stroke="#000000" points="168.33,-1441.2 164.88,-1431.19 161.33,-1441.17 168.33,-1441.2"/>
 </g>
 <!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node63" class="node">
 <title>sourcefile~fraggle_util.f90</title>
 <g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="495.5,-528 412.5,-528 412.5,-504 495.5,-504 495.5,-528"/>
-<text text-anchor="middle" x="454" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356.5,-1914 273.5,-1914 273.5,-1890 356.5,-1890 356.5,-1914"/>
+<text text-anchor="middle" x="315" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge77" class="edge">
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge67" class="edge">
 <title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.38,-517.05C397.51,-519.6 381.92,-525.22 372,-537 319.25,-599.63 306.42,-1208.62 304.34,-1333.64"/>
-<polygon fill="#000000" stroke="#000000" points="300.83,-1333.84 304.17,-1343.9 307.83,-1333.96 300.83,-1333.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.34,-1900.55C258.65,-1897.92 243.19,-1892.35 233,-1881 173.71,-1814.96 166.1,-1523.97 165.13,-1441.1"/>
+<polygon fill="#000000" stroke="#000000" points="168.63,-1440.99 165.04,-1431.03 161.63,-1441.06 168.63,-1440.99"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="503,-486 405,-486 405,-462 503,-462 503,-486"/>
-<text text-anchor="middle" x="454" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-1872 272.5,-1872 272.5,-1848 357.5,-1848 357.5,-1872"/>
+<text text-anchor="middle" x="315" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge78" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M404.75,-476.61C392.35,-479.66 380.22,-485.21 372,-495 316.52,-561.14 305.83,-1205.08 304.24,-1333.71"/>
-<polygon fill="#000000" stroke="#000000" points="300.74,-1333.88 304.12,-1343.92 307.74,-1333.96 300.74,-1333.88"/>
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.16,-1858.24C257.86,-1855.51 242.98,-1849.95 233,-1839 179.07,-1779.8 167.71,-1519.56 165.5,-1441.32"/>
+<polygon fill="#000000" stroke="#000000" points="169,-1441.05 165.24,-1431.15 162,-1441.24 169,-1441.05"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492,-444 416,-444 416,-420 492,-420 492,-444"/>
-<text text-anchor="middle" x="454" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="352.5,-1830 277.5,-1830 277.5,-1806 352.5,-1806 352.5,-1830"/>
+<text text-anchor="middle" x="315" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge80" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.68,-432.49C399.84,-434.74 382.62,-440.29 372,-453 313.77,-522.67 305.26,-1201.95 304.15,-1333.87"/>
-<polygon fill="#000000" stroke="#000000" points="300.65,-1333.95 304.07,-1343.98 307.65,-1334.01 300.65,-1333.95"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge70" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.27,-1816.99C261.55,-1814.64 244.26,-1809.15 233,-1797 184.38,-1744.55 169.49,-1514.57 165.95,-1441.42"/>
+<polygon fill="#000000" stroke="#000000" points="169.43,-1440.91 165.47,-1431.08 162.44,-1441.23 169.43,-1440.91"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="493.5,-402 414.5,-402 414.5,-378 493.5,-378 493.5,-402"/>
-<text text-anchor="middle" x="454" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="354.5,-1788 275.5,-1788 275.5,-1764 354.5,-1764 354.5,-1788"/>
+<text text-anchor="middle" x="315" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge81" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M414.41,-390.65C398.92,-393.02 382.32,-398.61 372,-411 311.08,-484.15 304.73,-1197.73 304.08,-1333.69"/>
-<polygon fill="#000000" stroke="#000000" points="300.58,-1333.74 304.03,-1343.76 307.58,-1333.77 300.58,-1333.74"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge71" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.32,-1774.55C260.19,-1772.01 243.89,-1766.5 233,-1755 189.66,-1709.26 171.49,-1509.3 166.51,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="169.97,-1440.9 165.77,-1431.17 162.99,-1441.39 169.97,-1440.9"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="492,-150 416,-150 416,-126 492,-126 492,-150"/>
-<text text-anchor="middle" x="454" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374,-1746 256,-1746 256,-1722 374,-1722 374,-1746"/>
+<text text-anchor="middle" x="315" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.85,-145.06C382.49,-153.2 334.25,-169.7 304,-201"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302,-201C220.09,-285.76 188.94,-1179.8 184.17,-1333.55"/>
-<polygon fill="#000000" stroke="#000000" points="180.66,-1333.58 183.86,-1343.68 187.66,-1333.79 180.66,-1333.58"/>
-</g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge82" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M415.99,-138.34C400.02,-140.53 382.59,-146.08 372,-159 333.25,-206.25 308.37,-1174.3 304.52,-1333.83"/>
-<polygon fill="#000000" stroke="#000000" points="301.02,-1333.82 304.28,-1343.9 308.02,-1333.99 301.02,-1333.82"/>
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge72" class="edge">
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M255.78,-1727.21C247.28,-1724.01 239.28,-1719.45 233,-1713 194.89,-1673.87 173.75,-1503.43 167.22,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="170.67,-1440.91 166.17,-1431.31 163.71,-1441.62 170.67,-1440.91"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="516,-360 392,-360 392,-336 516,-336 516,-360"/>
-<text text-anchor="middle" x="454" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-1704 268,-1704 268,-1680 362,-1680 362,-1704"/>
+<text text-anchor="middle" x="315" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge83" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M391.85,-354.79C384.24,-358.05 377.29,-362.63 372,-369 308.37,-445.64 304.22,-1193.84 304,-1333.58"/>
-<polygon fill="#000000" stroke="#000000" points="300.5,-1333.89 303.99,-1343.9 307.5,-1333.9 300.5,-1333.89"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.71,-1688.57C255.06,-1685.53 242.29,-1680.2 233,-1671 168.77,-1607.4 163.35,-1489.93 164.09,-1441.14"/>
+<polygon fill="#000000" stroke="#000000" points="167.59,-1441.13 164.35,-1431.05 160.59,-1440.95 167.59,-1441.13"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="481,-318 427,-318 427,-294 481,-294 481,-318"/>
-<text text-anchor="middle" x="454" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge84" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.94,-305.33C408.64,-306.39 385.16,-311.11 372,-327 305.65,-407.14 303.73,-1190.16 303.94,-1333.52"/>
-<polygon fill="#000000" stroke="#000000" points="300.44,-1333.74 303.96,-1343.73 307.44,-1333.73 300.44,-1333.74"/>
-</g>
-<!-- sourcefile~util_version.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_node70" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="496.5,-276 411.5,-276 411.5,-252 496.5,-252 496.5,-276"/>
-<text text-anchor="middle" x="454" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~rmvs_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1662 273,-1662 273,-1638 357,-1638 357,-1662"/>
+<text text-anchor="middle" x="315" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge86" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M411.42,-265.1C396.79,-267.7 381.62,-273.35 372,-285 302.91,-368.66 303.25,-1186.83 303.87,-1333.53"/>
-<polygon fill="#000000" stroke="#000000" points="300.38,-1333.97 303.92,-1343.95 307.38,-1333.93 300.38,-1333.97"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~rmvs_classes.f90~~AfferentGraph_edge75" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.62,-1647.29C258.54,-1644.45 243.68,-1639.06 233,-1629 178.98,-1578.1 167.78,-1484.01 165.52,-1441.22"/>
+<polygon fill="#000000" stroke="#000000" points="169.01,-1440.89 165.11,-1431.05 162.02,-1441.18 169.01,-1440.89"/>
 </g>
 </g>
 </svg>
@@ -1682,169 +1610,174 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-103"></a>   <span class="k">end type </span><span class="n">rmvs_pl</span>
 <a name="ln-104"></a>
 <a name="ln-105"></a>   <span class="k">interface</span>
-<a name="ln-106"></a><span class="k">      module elemental function </span><span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lflag</span><span class="p">)</span>
-<a name="ln-107"></a>         <span class="k">implicit none</span>
-<a name="ln-108"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>       <span class="kd">::</span> <span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span>
-<a name="ln-109"></a>         <span class="kt">logical</span>                    <span class="kd">::</span> <span class="n">lflag</span>
-<a name="ln-110"></a>      <span class="k">end function </span><span class="n">rmvs_chk_ind</span>
-<a name="ln-111"></a>
-<a name="ln-112"></a>      <span class="k">module subroutine </span><span class="n">rmvs_discard_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-113"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
-<a name="ln-114"></a>         <span class="k">implicit none</span>
-<a name="ln-115"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! RMVS test particle object</span>
-<a name="ln-116"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-117"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-118"></a>      <span class="k">end subroutine </span><span class="n">rmvs_discard_tp</span>
-<a name="ln-119"></a>
-<a name="ln-120"></a>      <span class="k">module function </span><span class="n">rmvs_encounter_check_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lencounter</span><span class="p">)</span>
-<a name="ln-121"></a>         <span class="k">implicit none</span>
-<a name="ln-122"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! RMVS test particle object  </span>
-<a name="ln-123"></a>         <span class="k">class</span><span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>     <span class="c">!! RMVS nbody system object</span>
-<a name="ln-124"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>         <span class="c">!! step size</span>
-<a name="ln-125"></a>         <span class="kt">logical</span>                                 <span class="kd">::</span> <span class="n">lencounter</span> <span class="c">!! Returns true if there is at least one close encounter      </span>
-<a name="ln-126"></a>      <span class="k">end function </span><span class="n">rmvs_encounter_check_tp</span>
-<a name="ln-127"></a>
-<a name="ln-128"></a>      <span class="k">module subroutine </span><span class="n">rmvs_io_write_encounter</span><span class="p">(</span><span class="n">t</span><span class="p">,</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span><span class="p">,</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span><span class="p">,</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span><span class="p">,</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span><span class="p">,</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span><span class="p">,</span> <span class="n">enc_out</span><span class="p">)</span>
-<a name="ln-129"></a>         <span class="k">implicit none</span>
-<a name="ln-130"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span>
-<a name="ln-131"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">t</span><span class="p">,</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span><span class="p">,</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span>
-<a name="ln-132"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span><span class="p">,</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span>
-<a name="ln-133"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">enc_out</span>
-<a name="ln-134"></a>      <span class="k">end subroutine </span><span class="n">rmvs_io_write_encounter</span>
-<a name="ln-135"></a>
-<a name="ln-136"></a>      <span class="k">module subroutine </span><span class="n">rmvs_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-137"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
-<a name="ln-138"></a>         <span class="k">implicit none</span>
-<a name="ln-139"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! RMVS test particle data structure</span>
-<a name="ln-140"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest central body particle data structuree </span>
-<a name="ln-141"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-142"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
-<a name="ln-143"></a>         <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Logical flag that determines whether or not this is the beginning or end of the step</span>
-<a name="ln-144"></a>      <span class="k">end subroutine </span><span class="n">rmvs_kick_getacch_tp</span>
-<a name="ln-145"></a>
-<a name="ln-146"></a>      <span class="k">module subroutine </span><span class="n">rmvs_setup_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-147"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
-<a name="ln-148"></a>         <span class="k">implicit none</span>
-<a name="ln-149"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! RMVS massive body object</span>
-<a name="ln-150"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
-<a name="ln-151"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-152"></a>      <span class="k">end subroutine </span><span class="n">rmvs_setup_pl</span>
-<a name="ln-153"></a>
-<a name="ln-154"></a>      <span class="k">module subroutine </span><span class="n">rmvs_setup_initialize_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-155"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
-<a name="ln-156"></a>         <span class="k">implicit none</span>
-<a name="ln-157"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! RMVS system object</span>
-<a name="ln-158"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-159"></a>      <span class="k">end subroutine </span><span class="n">rmvs_setup_initialize_system</span>
-<a name="ln-160"></a>
-<a name="ln-161"></a>      <span class="k">module subroutine </span><span class="n">rmvs_setup_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-162"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
-<a name="ln-163"></a>         <span class="k">implicit none</span>
-<a name="ln-164"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! RMVS test particle object</span>
-<a name="ln-165"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
-<a name="ln-166"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parametere</span>
-<a name="ln-167"></a>      <span class="k">end subroutine </span><span class="n">rmvs_setup_tp</span>
-<a name="ln-168"></a>
-<a name="ln-169"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_append_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-170"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
-<a name="ln-171"></a>         <span class="k">implicit none</span>
-<a name="ln-172"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS massive body object</span>
-<a name="ln-173"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
-<a name="ln-174"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-175"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_append_pl</span>
-<a name="ln-176"></a>
-<a name="ln-177"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_append_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-178"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
-<a name="ln-179"></a>         <span class="k">implicit none</span>
-<a name="ln-180"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS test particle object</span>
-<a name="ln-181"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
-<a name="ln-182"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-183"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_append_tp</span>
-<a name="ln-184"></a>
-<a name="ln-185"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_fill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
-<a name="ln-186"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
-<a name="ln-187"></a>         <span class="k">implicit none</span>
-<a name="ln-188"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! RMVS massive body object </span>
-<a name="ln-189"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Inserted object </span>
-<a name="ln-190"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-191"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_fill_pl</span>
-<a name="ln-192"></a>
-<a name="ln-193"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_fill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
-<a name="ln-194"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
-<a name="ln-195"></a>         <span class="k">implicit none</span>
-<a name="ln-196"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! RMVS massive body object</span>
-<a name="ln-197"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>     <span class="c">!!  Inserted object </span>
-<a name="ln-198"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-199"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_fill_tp</span>
-<a name="ln-200"></a>
-<a name="ln-201"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_resize_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-202"></a>         <span class="k">implicit none</span>
-<a name="ln-203"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! RMVS massive body object</span>
-<a name="ln-204"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span>  <span class="c">!! New size neded</span>
-<a name="ln-205"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_resize_pl</span>
-<a name="ln-206"></a>
-<a name="ln-207"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_resize_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-208"></a>         <span class="k">implicit none</span>
-<a name="ln-209"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! RMVS test particle object</span>
-<a name="ln-210"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span>  <span class="c">!! New size neded</span>
-<a name="ln-211"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_resize_tp</span>
-<a name="ln-212"></a>
-<a name="ln-213"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
-<a name="ln-214"></a>         <span class="k">implicit none</span>
-<a name="ln-215"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! RMVS massive body object</span>
-<a name="ln-216"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>    <span class="c">!! Sorting attribute</span>
-<a name="ln-217"></a>         <span class="kt">logical</span><span class="p">,</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
-<a name="ln-218"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_pl</span>   
-<a name="ln-219"></a>
-<a name="ln-220"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
-<a name="ln-221"></a>         <span class="k">implicit none</span>
-<a name="ln-222"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! RMVS test particle object</span>
-<a name="ln-223"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>    <span class="c">!! Sorting attribute</span>
-<a name="ln-224"></a>         <span class="kt">logical</span><span class="p">,</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
-<a name="ln-225"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_tp</span>
-<a name="ln-226"></a>
-<a name="ln-227"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_rearrange_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
-<a name="ln-228"></a>         <span class="k">implicit none</span>
-<a name="ln-229"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! RMVS massive body object</span>
-<a name="ln-230"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
-<a name="ln-231"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_rearrange_pl</span>
-<a name="ln-232"></a>
-<a name="ln-233"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_rearrange_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
-<a name="ln-234"></a>         <span class="k">implicit none</span>
-<a name="ln-235"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! RMVS test particle object</span>
-<a name="ln-236"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>    <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
-<a name="ln-237"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_rearrange_tp</span>
-<a name="ln-238"></a>
-<a name="ln-239"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_spill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-240"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
-<a name="ln-241"></a>         <span class="k">implicit none</span>
-<a name="ln-242"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS massive body object</span>
-<a name="ln-243"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Discarded object </span>
-<a name="ln-244"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-245"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-246"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_spill_pl</span>
-<a name="ln-247"></a>
-<a name="ln-248"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_spill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-249"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
-<a name="ln-250"></a>         <span class="k">implicit none</span>
-<a name="ln-251"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS test particle object</span>
-<a name="ln-252"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Discarded object </span>
-<a name="ln-253"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-254"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-255"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_spill_tp</span>
-<a name="ln-256"></a>
-<a name="ln-257"></a>      <span class="k">module subroutine </span><span class="n">rmvs_step_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
-<a name="ln-258"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
-<a name="ln-259"></a>         <span class="k">implicit none</span>
-<a name="ln-260"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! RMVS nbody system object</span>
-<a name="ln-261"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-262"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Simulation time</span>
-<a name="ln-263"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Current stepsize</span>
-<a name="ln-264"></a>      <span class="k">end subroutine </span><span class="n">rmvs_step_system</span>
-<a name="ln-265"></a>
-<a name="ln-266"></a>   <span class="k">end interface</span>
-<a name="ln-267"></a>
-<a name="ln-268"></a><span class="k">end module </span><span class="n">rmvs_classes</span>
+<a name="ln-106"></a><span class="k">      module pure subroutine </span><span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
+<a name="ln-107"></a>         <span class="c">!$omp declare simd(rmvs_chk_ind)</span>
+<a name="ln-108"></a>         <span class="k">implicit none</span>
+<a name="ln-109"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>    <span class="c">!! Relative distance vector components</span>
+<a name="ln-110"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span> <span class="c">!! Relative velocity vector components</span>
+<a name="ln-111"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dt</span>            <span class="c">!! Step size</span>
+<a name="ln-112"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">r2crit</span>        <span class="c">!! Square of the critical encounter distance</span>
+<a name="ln-113"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lencounter</span>    <span class="c">!! Flag indicating that an encounter has occurred</span>
+<a name="ln-114"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lvdotr</span>        <span class="c">!! Logical flag indicating the direction of the v .dot. r vector</span>
+<a name="ln-115"></a>      <span class="k">end subroutine </span><span class="n">rmvs_chk_ind</span>
+<a name="ln-116"></a>
+<a name="ln-117"></a>      <span class="k">module subroutine </span><span class="n">rmvs_discard_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-118"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
+<a name="ln-119"></a>         <span class="k">implicit none</span>
+<a name="ln-120"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! RMVS test particle object</span>
+<a name="ln-121"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-122"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-123"></a>      <span class="k">end subroutine </span><span class="n">rmvs_discard_tp</span>
+<a name="ln-124"></a>
+<a name="ln-125"></a>      <span class="k">module function </span><span class="n">rmvs_encounter_check_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lencounter</span><span class="p">)</span>
+<a name="ln-126"></a>         <span class="k">implicit none</span>
+<a name="ln-127"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! RMVS test particle object  </span>
+<a name="ln-128"></a>         <span class="k">class</span><span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>     <span class="c">!! RMVS nbody system object</span>
+<a name="ln-129"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>         <span class="c">!! step size</span>
+<a name="ln-130"></a>         <span class="kt">logical</span>                                 <span class="kd">::</span> <span class="n">lencounter</span> <span class="c">!! Returns true if there is at least one close encounter      </span>
+<a name="ln-131"></a>      <span class="k">end function </span><span class="n">rmvs_encounter_check_tp</span>
+<a name="ln-132"></a>
+<a name="ln-133"></a>      <span class="k">module subroutine </span><span class="n">rmvs_io_write_encounter</span><span class="p">(</span><span class="n">t</span><span class="p">,</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span><span class="p">,</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span><span class="p">,</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span><span class="p">,</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span><span class="p">,</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span><span class="p">,</span> <span class="n">enc_out</span><span class="p">)</span>
+<a name="ln-134"></a>         <span class="k">implicit none</span>
+<a name="ln-135"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span>
+<a name="ln-136"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">t</span><span class="p">,</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span><span class="p">,</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span>
+<a name="ln-137"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span><span class="p">,</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span>
+<a name="ln-138"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">enc_out</span>
+<a name="ln-139"></a>      <span class="k">end subroutine </span><span class="n">rmvs_io_write_encounter</span>
+<a name="ln-140"></a>
+<a name="ln-141"></a>      <span class="k">module subroutine </span><span class="n">rmvs_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-142"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
+<a name="ln-143"></a>         <span class="k">implicit none</span>
+<a name="ln-144"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! RMVS test particle data structure</span>
+<a name="ln-145"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest central body particle data structuree </span>
+<a name="ln-146"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-147"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
+<a name="ln-148"></a>         <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Logical flag that determines whether or not this is the beginning or end of the step</span>
+<a name="ln-149"></a>      <span class="k">end subroutine </span><span class="n">rmvs_kick_getacch_tp</span>
+<a name="ln-150"></a>
+<a name="ln-151"></a>      <span class="k">module subroutine </span><span class="n">rmvs_setup_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-152"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
+<a name="ln-153"></a>         <span class="k">implicit none</span>
+<a name="ln-154"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! RMVS massive body object</span>
+<a name="ln-155"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
+<a name="ln-156"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-157"></a>      <span class="k">end subroutine </span><span class="n">rmvs_setup_pl</span>
+<a name="ln-158"></a>
+<a name="ln-159"></a>      <span class="k">module subroutine </span><span class="n">rmvs_setup_initialize_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-160"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
+<a name="ln-161"></a>         <span class="k">implicit none</span>
+<a name="ln-162"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! RMVS system object</span>
+<a name="ln-163"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-164"></a>      <span class="k">end subroutine </span><span class="n">rmvs_setup_initialize_system</span>
+<a name="ln-165"></a>
+<a name="ln-166"></a>      <span class="k">module subroutine </span><span class="n">rmvs_setup_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-167"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
+<a name="ln-168"></a>         <span class="k">implicit none</span>
+<a name="ln-169"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! RMVS test particle object</span>
+<a name="ln-170"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
+<a name="ln-171"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parametere</span>
+<a name="ln-172"></a>      <span class="k">end subroutine </span><span class="n">rmvs_setup_tp</span>
+<a name="ln-173"></a>
+<a name="ln-174"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_append_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-175"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
+<a name="ln-176"></a>         <span class="k">implicit none</span>
+<a name="ln-177"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS massive body object</span>
+<a name="ln-178"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
+<a name="ln-179"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-180"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_append_pl</span>
+<a name="ln-181"></a>
+<a name="ln-182"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_append_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-183"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
+<a name="ln-184"></a>         <span class="k">implicit none</span>
+<a name="ln-185"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS test particle object</span>
+<a name="ln-186"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
+<a name="ln-187"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-188"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_append_tp</span>
+<a name="ln-189"></a>
+<a name="ln-190"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_fill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-191"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
+<a name="ln-192"></a>         <span class="k">implicit none</span>
+<a name="ln-193"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! RMVS massive body object </span>
+<a name="ln-194"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Inserted object </span>
+<a name="ln-195"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-196"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_fill_pl</span>
+<a name="ln-197"></a>
+<a name="ln-198"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_fill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-199"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
+<a name="ln-200"></a>         <span class="k">implicit none</span>
+<a name="ln-201"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! RMVS massive body object</span>
+<a name="ln-202"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>     <span class="c">!!  Inserted object </span>
+<a name="ln-203"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-204"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_fill_tp</span>
+<a name="ln-205"></a>
+<a name="ln-206"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_resize_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-207"></a>         <span class="k">implicit none</span>
+<a name="ln-208"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! RMVS massive body object</span>
+<a name="ln-209"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span>  <span class="c">!! New size neded</span>
+<a name="ln-210"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_resize_pl</span>
+<a name="ln-211"></a>
+<a name="ln-212"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_resize_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-213"></a>         <span class="k">implicit none</span>
+<a name="ln-214"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! RMVS test particle object</span>
+<a name="ln-215"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span>  <span class="c">!! New size neded</span>
+<a name="ln-216"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_resize_tp</span>
+<a name="ln-217"></a>
+<a name="ln-218"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
+<a name="ln-219"></a>         <span class="k">implicit none</span>
+<a name="ln-220"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! RMVS massive body object</span>
+<a name="ln-221"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>    <span class="c">!! Sorting attribute</span>
+<a name="ln-222"></a>         <span class="kt">logical</span><span class="p">,</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
+<a name="ln-223"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_pl</span>   
+<a name="ln-224"></a>
+<a name="ln-225"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
+<a name="ln-226"></a>         <span class="k">implicit none</span>
+<a name="ln-227"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! RMVS test particle object</span>
+<a name="ln-228"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>    <span class="c">!! Sorting attribute</span>
+<a name="ln-229"></a>         <span class="kt">logical</span><span class="p">,</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
+<a name="ln-230"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_tp</span>
+<a name="ln-231"></a>
+<a name="ln-232"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_rearrange_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-233"></a>         <span class="k">implicit none</span>
+<a name="ln-234"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! RMVS massive body object</span>
+<a name="ln-235"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
+<a name="ln-236"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_rearrange_pl</span>
+<a name="ln-237"></a>
+<a name="ln-238"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_sort_rearrange_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-239"></a>         <span class="k">implicit none</span>
+<a name="ln-240"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! RMVS test particle object</span>
+<a name="ln-241"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>    <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
+<a name="ln-242"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_sort_rearrange_tp</span>
+<a name="ln-243"></a>
+<a name="ln-244"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_spill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-245"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
+<a name="ln-246"></a>         <span class="k">implicit none</span>
+<a name="ln-247"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_pl</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS massive body object</span>
+<a name="ln-248"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Discarded object </span>
+<a name="ln-249"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-250"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-251"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_spill_pl</span>
+<a name="ln-252"></a>
+<a name="ln-253"></a>      <span class="k">module subroutine </span><span class="n">rmvs_util_spill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-254"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_body</span>
+<a name="ln-255"></a>         <span class="k">implicit none</span>
+<a name="ln-256"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! RMVS test particle object</span>
+<a name="ln-257"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Discarded object </span>
+<a name="ln-258"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-259"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-260"></a>      <span class="k">end subroutine </span><span class="n">rmvs_util_spill_tp</span>
+<a name="ln-261"></a>
+<a name="ln-262"></a>      <span class="k">module subroutine </span><span class="n">rmvs_step_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
+<a name="ln-263"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
+<a name="ln-264"></a>         <span class="k">implicit none</span>
+<a name="ln-265"></a><span class="k">         class</span><span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! RMVS nbody system object</span>
+<a name="ln-266"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-267"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Simulation time</span>
+<a name="ln-268"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Current stepsize</span>
+<a name="ln-269"></a>      <span class="k">end subroutine </span><span class="n">rmvs_step_system</span>
+<a name="ln-270"></a>
+<a name="ln-271"></a>   <span class="k">end interface</span>
+<a name="ln-272"></a>
+<a name="ln-273"></a><span class="k">end module </span><span class="n">rmvs_classes</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/rmvs_discard.f90.html b/docs/sourcefile/rmvs_discard.f90.html
index 013da3c5e..923b65d7a 100644
--- a/docs/sourcefile/rmvs_discard.f90.html
+++ b/docs/sourcefile/rmvs_discard.f90.html
@@ -226,296 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_discard.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_discardf90EfferentGraph" width="641pt" height="231pt"
- viewBox="0.00 0.00 641.00 230.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 327.68)">
+<svg id="sourcefilermvs_discardf90EfferentGraph" width="641pt" height="244pt"
+ viewBox="0.00 0.00 641.00 243.97" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 346.93)">
 <title>sourcefile~~rmvs_discard.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-327.68 918,-327.68 918,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-346.93 918,-346.93 918,4 -4,4"/>
 <!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_discard.f90</title>
-<polygon fill="none" stroke="black" points="914,-235.19 820,-235.19 820,-211.19 914,-211.19 914,-235.19"/>
-<text text-anchor="middle" x="867" y="-220.79" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_discard.f90</text>
+<polygon fill="none" stroke="black" points="914,-234.3 820,-234.3 820,-210.3 914,-210.3 914,-234.3"/>
+<text text-anchor="middle" x="867" y="-219.9" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_discard.f90</text>
 </g>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
 <g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-255.19 442,-255.19 442,-231.19 537,-231.19 537,-255.19"/>
-<text text-anchor="middle" x="489.5" y="-240.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-312.3 441,-312.3 441,-288.3 536,-288.3 536,-312.3"/>
+<text text-anchor="middle" x="488.5" y="-297.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.96,-225.65C751.22,-229.31 621.9,-236.2 547.36,-240.17"/>
-<polygon fill="#000000" stroke="#000000" points="547.02,-236.68 537.22,-240.71 547.39,-243.67 547.02,-236.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.37,-234.3C792.51,-245.99 733.84,-263.53 682,-274.3 636.69,-283.71 584.64,-290.5 546.09,-294.78"/>
+<polygon fill="#000000" stroke="#000000" points="545.66,-291.3 536.1,-295.86 546.42,-298.26 545.66,-291.3"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.19 718,-215.19 718,-191.19 784,-191.19 784,-215.19"/>
-<text text-anchor="middle" x="751" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-194.3 718,-194.3 718,-170.3 784,-170.3 784,-194.3"/>
+<text text-anchor="middle" x="751" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.96,-215.12C811.44,-213.62 802.57,-212.07 794.17,-210.59"/>
-<polygon fill="#000000" stroke="#000000" points="794.66,-207.13 784.21,-208.84 793.45,-214.02 794.66,-207.13"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M831.8,-210.29C819.89,-206.12 806.4,-201.38 793.95,-197.01"/>
+<polygon fill="#000000" stroke="#000000" points="794.82,-193.61 784.23,-193.6 792.5,-200.22 794.82,-193.61"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-215.19 300,-215.19 300,-191.19 394,-191.19 394,-215.19"/>
-<text text-anchor="middle" x="347" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-270.3 303.5,-270.3 303.5,-246.3 397.5,-246.3 397.5,-270.3"/>
+<text text-anchor="middle" x="350.5" y="-255.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-231.19C431.89,-227.08 415.54,-222.42 400.37,-218.1"/>
-<polygon fill="#000000" stroke="#000000" points="401.19,-214.7 390.61,-215.33 399.27,-221.43 401.19,-214.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-288.26C433.45,-283.6 416.02,-278.22 400.14,-273.32"/>
+<polygon fill="#000000" stroke="#000000" points="401.07,-269.94 390.48,-270.33 399,-276.63 401.07,-269.94"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-107.19 0,-107.19 0,-83.19 106,-83.19 106,-107.19"/>
-<text text-anchor="middle" x="53" y="-92.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-230.3 0,-230.3 0,-206.3 106,-206.3 106,-230.3"/>
+<text text-anchor="middle" x="53" y="-215.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-243.19C280.38,-238.61 258.6,-268.78 198,-243.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-244.82C414.55,-245.37 379.27,-245.38 348,-243.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-340.3C255.74,-347.05 225.83,-341.83 142,-299.3 112.64,-284.4 85.9,-256.89 69.79,-238.1"/>
+<polygon fill="#000000" stroke="#000000" points="72.46,-235.83 63.36,-230.4 67.08,-240.32 72.46,-235.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.08,-312.48C435.24,-324.21 391.37,-340.21 351.5,-340.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge8" class="edge">
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge14" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C592.57,-206.66 555.55,-217.87 528.71,-227.64"/>
-<polygon fill="#000000" stroke="#000000" points="527.45,-224.38 519.31,-231.16 529.9,-230.93 527.45,-224.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C595.15,-266.84 561.12,-276.81 534.75,-285.15"/>
+<polygon fill="#000000" stroke="#000000" points="533.5,-281.88 525.05,-288.26 535.64,-288.55 533.5,-281.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-130.19 143.5,-130.19 143.5,-106.19 250.5,-106.19 250.5,-130.19"/>
-<text text-anchor="middle" x="197" y="-115.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-114.3 298,-114.3 298,-90.3 403,-90.3 403,-114.3"/>
+<text text-anchor="middle" x="350.5" y="-99.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-123.19C318.09,-122.66 287.23,-121.68 260.94,-120.73"/>
-<polygon fill="#000000" stroke="#000000" points="260.86,-117.23 250.73,-120.35 260.6,-124.22 260.86,-117.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C517.82,-23.59 472.9,-125.57 348,-123.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-171.85C706.67,-168.31 693.82,-164.45 682,-161.3 617.73,-144.13 601.44,-140.28 536,-128.3 495.46,-120.87 449.56,-114.4 413.69,-109.76"/>
+<polygon fill="#000000" stroke="#000000" points="413.74,-106.24 403.38,-108.45 412.85,-113.19 413.74,-106.24"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-290.3 142,-290.3 142,-266.3 260,-266.3 260,-290.3"/>
+<text text-anchor="middle" x="201" y="-275.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C549.78,-209.76 460.85,-208.02 404.52,-205.91"/>
-<polygon fill="#000000" stroke="#000000" points="404.52,-202.41 394.4,-205.51 404.25,-209.4 404.52,-202.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C449.95,-262.73 442.39,-275.05 405,-279.3 356.87,-284.77 344.44,-279.55 296,-279.3 287.67,-279.25 278.93,-279.19 270.27,-279.11"/>
+<polygon fill="#000000" stroke="#000000" points="270.2,-275.61 260.17,-279.01 270.13,-282.61 270.2,-275.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-28.19 142,-28.19 142,-4.19 252,-4.19 252,-28.19"/>
-<text text-anchor="middle" x="197" y="-13.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-194.3 575.5,-194.3 575.5,-170.3 678.5,-170.3 678.5,-194.3"/>
+<text text-anchor="middle" x="627" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C411.63,5.23 321.33,-0.39 262.05,-7.06"/>
-<polygon fill="#000000" stroke="#000000" points="261.61,-3.58 252.08,-8.22 262.42,-10.54 261.61,-3.58"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C566.15,-51.25 558.44,-22.55 490.5,-9.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.1,-191.08C722.81,-167.05 678.48,-113.3 628.5,-85.19"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C578.75,-207.83 579.27,-241.69 537,-264.19 517.29,-274.69 512.42,-278.97 490.5,-283.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C424.75,-295.47 412.77,-247.72 348,-243.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-182.3C708.94,-182.3 698.85,-182.3 688.76,-182.3"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-178.8 678.72,-182.3 688.72,-185.8 688.72,-178.8"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-315.19 573,-315.19 573,-291.19 682,-291.19 682,-315.19"/>
-<text text-anchor="middle" x="627.5" y="-300.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-76.3 572,-76.3 572,-52.3 682,-52.3 682,-76.3"/>
+<text text-anchor="middle" x="627" y="-61.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M735.1,-215.46C714.04,-232.79 675.39,-264.6 650.87,-284.78"/>
-<polygon fill="#000000" stroke="#000000" points="648.64,-282.09 643.14,-291.14 653.09,-287.49 648.64,-282.09"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.57,-170.09C732.96,-150.93 710.15,-113.6 682,-90.3 677.95,-86.94 673.39,-83.89 668.68,-81.17"/>
+<polygon fill="#000000" stroke="#000000" points="670.01,-77.91 659.54,-76.32 666.73,-84.1 670.01,-77.91"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-175.19 442.5,-175.19 442.5,-151.19 536.5,-151.19 536.5,-175.19"/>
-<text text-anchor="middle" x="489.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-232.3 441.5,-232.3 441.5,-208.3 535.5,-208.3 535.5,-232.3"/>
+<text text-anchor="middle" x="488.5" y="-217.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-202.34C693.45,-201.95 658.8,-202 628.5,-204.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C589.48,-206.88 548.98,-192.24 521.89,-179.71"/>
-<polygon fill="#000000" stroke="#000000" points="523.07,-176.4 512.54,-175.23 520.05,-182.71 523.07,-176.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C588.18,-268.32 545.58,-251.57 518.18,-237.35"/>
+<polygon fill="#000000" stroke="#000000" points="519.61,-234.15 509.15,-232.47 516.28,-240.3 519.61,-234.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C566.65,-272.89 550.04,-256.36 489.5,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C461.31,-262 432.24,-261.84 407.71,-261.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.61,-257.62 397.5,-260.79 407.38,-264.62 407.61,-257.62"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-175.19 576,-175.19 576,-151.19 679,-151.19 679,-175.19"/>
-<text text-anchor="middle" x="627.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-34.3 296,-34.3 296,-10.3 405,-10.3 405,-34.3"/>
+<text text-anchor="middle" x="350.5" y="-19.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-192.58C704.62,-188.25 689.18,-183.17 674.87,-178.46"/>
-<polygon fill="#000000" stroke="#000000" points="675.78,-175.08 665.19,-175.27 673.59,-181.72 675.78,-175.08"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-60.19 294.5,-60.19 294.5,-36.19 399.5,-36.19 399.5,-60.19"/>
-<text text-anchor="middle" x="347" y="-45.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.15,-169.96C743.2,-141.89 726.88,-73.32 682,-43.3 602.41,9.95 486.48,2.8 415.19,-8.69"/>
+<polygon fill="#000000" stroke="#000000" points="414.28,-5.3 405.01,-10.42 415.45,-12.2 414.28,-5.3"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C469.48,-5.63 423.06,-20.23 388.75,-32.58"/>
-<polygon fill="#000000" stroke="#000000" points="387.17,-29.43 378.98,-36.15 389.58,-36 387.17,-29.43"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.26,-194.34C734.31,-213.94 712.01,-252.74 682,-274.3 560.34,-361.68 501.29,-339.97 351.5,-340.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-295.19 288,-295.19 288,-271.19 406,-271.19 406,-295.19"/>
-<text text-anchor="middle" x="347" y="-280.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~rmvs_discard.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-154.3 147.5,-154.3 147.5,-130.3 254.5,-130.3 254.5,-154.3"/>
+<text text-anchor="middle" x="201" y="-139.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C465.24,-287.67 439.4,-288.75 416.29,-288.37"/>
-<polygon fill="#000000" stroke="#000000" points="416.32,-284.87 406.23,-288.11 416.14,-291.87 416.32,-284.87"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M737.88,-194.43C717.42,-213.81 673.74,-250.59 628,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C578.73,-270.32 580.83,-217.32 536,-199.3 523.49,-194.27 357.63,-167.21 264.45,-152.25"/>
+<polygon fill="#000000" stroke="#000000" points="265,-148.8 254.57,-150.67 263.89,-155.71 265,-148.8"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.12,-109.63C134.42,-108.22 125.32,-106.75 116.4,-105.3"/>
-<polygon fill="#000000" stroke="#000000" points="116.88,-101.83 106.45,-103.69 115.76,-108.74 116.88,-101.83"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.71,-92.67C268.5,-89.57 231.97,-89.66 202,-102.3"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.8,-191.02C299.41,-176.44 256.72,-151.92 227.97,-135.41"/>
-<polygon fill="#000000" stroke="#000000" points="229.58,-132.3 219.17,-130.35 226.09,-138.37 229.58,-132.3"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-114.3C289.86,-118.47 272.41,-123.2 256.31,-127.57"/>
+<polygon fill="#000000" stroke="#000000" points="255.21,-124.24 246.48,-130.23 257.05,-130.99 255.21,-124.24"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.68,-215.27C281.09,-230.11 219.52,-252.28 198,-243.19"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.45,-266.15C148.09,-256.96 117.18,-244.26 92.82,-234.25"/>
+<polygon fill="#000000" stroke="#000000" points="94.08,-230.98 83.5,-230.42 91.42,-237.46 94.08,-230.98"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-28.36C150.18,-41.68 111.63,-63.13 84.68,-78.13"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-75.22 75.67,-83.14 86.11,-81.34 82.71,-75.22"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C456.89,-135.69 423.11,-125.77 396.87,-117.46"/>
+<polygon fill="#000000" stroke="#000000" points="397.8,-114.08 387.21,-114.36 395.66,-120.75 397.8,-114.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.15,-170.24C562.83,-161.43 524.14,-149.77 489.5,-142.3"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-312.94C504.91,-323.15 384.91,-333.94 288,-304.19 241.81,-290.01 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M582.81,-194.32C570.11,-197.85 556.07,-201.76 542.82,-205.45"/>
+<polygon fill="#000000" stroke="#000000" points="541.57,-202.17 532.88,-208.22 543.45,-208.91 541.57,-202.17"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.94,-151.18C434.15,-139.69 388.95,-123.97 348,-123.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C428.42,-129.55 411.81,-146.31 351.5,-142.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C281.73,-137.78 264.59,-75.92 202,-102.3"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-175.2C431.89,-179.31 415.54,-183.97 400.37,-188.28"/>
-<polygon fill="#000000" stroke="#000000" points="399.27,-184.96 390.61,-191.06 401.19,-191.69 399.27,-184.96"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C321.76,-140.45 291.01,-140.17 264.8,-140.46"/>
+<polygon fill="#000000" stroke="#000000" points="264.57,-136.96 254.62,-140.6 264.67,-143.96 264.57,-136.96"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.45,-156.12C414.46,-153.54 378.38,-153.3 348,-163.19"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-175.3C592.17,-179.78 582.03,-185.03 573,-190.19 553.67,-201.24 532.56,-214.83 516.53,-225.49"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-222.6 508.19,-231.07 518.45,-228.41 514.56,-222.6"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.95,-58.94C488.85,-52.9 326.29,-49.91 202,-102.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C426.21,-118.74 410.43,-124.38 348,-123.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.51,-151.11C571.46,-140.37 529.04,-125.95 490.5,-123.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-232.32C431.82,-235.85 417.83,-239.76 404.63,-243.45"/>
+<polygon fill="#000000" stroke="#000000" points="403.41,-240.16 394.72,-246.22 405.29,-246.9 403.41,-240.16"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C284.51,-209.69 267.41,-222.65 202,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-218.3C172.54,-216.47 142.1,-216.19 116.16,-216.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-212.98 106.09,-216.62 116.13,-219.98 116.04,-212.98"/>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-243.19C134.83,-217.36 87.43,-150.64 66.2,-116.3"/>
-<polygon fill="#000000" stroke="#000000" points="69.07,-114.29 60.91,-107.54 63.08,-117.91 69.07,-114.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C423.74,-118.57 409.74,-143.1 348,-163.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-163.19C320.21,-171.59 312.35,-170.25 288,-182.19 244.62,-203.48 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.35,-222.28C414.93,-222.76 381.23,-222.23 351.5,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C301.31,-211.91 252.57,-180.93 224.93,-160.54"/>
+<polygon fill="#000000" stroke="#000000" points="226.82,-157.58 216.73,-154.34 222.6,-163.16 226.82,-157.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-163.19C566.43,-163.19 556.52,-163.19 546.94,-163.19"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-159.69 536.69,-163.19 546.69,-166.69 546.69,-159.69"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-246.22C289.62,-235.48 243.56,-221.06 202,-218.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.33,-151.19C591.78,-139.32 563.42,-121.23 537,-109.19 494.23,-89.71 443.42,-73.68 405.26,-62.95"/>
-<polygon fill="#000000" stroke="#000000" points="405.92,-59.5 395.34,-60.2 404.05,-66.24 405.92,-59.5"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.53,-246.24C312.31,-242.29 303.54,-237.55 296,-232.3 266.31,-211.63 236.98,-181.61 219.18,-162.01"/>
+<polygon fill="#000000" stroke="#000000" points="221.57,-159.43 212.29,-154.32 216.35,-164.1 221.57,-159.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.56,-60.23C296.31,-71.7 259.6,-89.06 232.68,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="231.15,-98.64 223.61,-106.08 234.14,-104.97 231.15,-98.64"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.74,-34.37C314.88,-38.64 304.94,-43.56 296,-48.3 253.42,-70.84 246.4,-83.58 202,-102.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-102.3C175,-112.83 164.76,-106.54 142,-121.3 110.64,-141.63 83.28,-175.83 67.7,-197.72"/>
+<polygon fill="#000000" stroke="#000000" points="64.79,-195.79 61.96,-206 70.54,-199.78 64.79,-195.79"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.47,-56.49C244.79,-64.49 169.53,-76.6 116.46,-85.14"/>
-<polygon fill="#000000" stroke="#000000" points="115.81,-81.7 106.49,-86.75 116.92,-88.61 115.81,-81.7"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_discard.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.86,-271.34C260.07,-264.7 226.69,-255.31 198,-243.19"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.87,-154.34C152.55,-166.99 114.11,-187.01 86.7,-201.27"/>
+<polygon fill="#000000" stroke="#000000" points="84.76,-198.34 77.51,-206.06 88,-204.55 84.76,-198.34"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/rmvs_encounter_check.f90.html b/docs/sourcefile/rmvs_encounter_check.f90.html
index 165ac7df1..21222b58c 100644
--- a/docs/sourcefile/rmvs_encounter_check.f90.html
+++ b/docs/sourcefile/rmvs_encounter_check.f90.html
@@ -134,7 +134,7 @@ <h1>rmvs_encounter_check.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.4% of total for source files.">62 statements</a>
+    title=" 0.4% of total for source files.">64 statements</a>
      </li> 
      
      
@@ -226,296 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_encounter_check.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_encounter_checkf90EfferentGraph" width="641pt" height="219pt"
- viewBox="0.00 0.00 641.00 219.18" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 327.68)">
+<svg id="sourcefilermvs_encounter_checkf90EfferentGraph" width="641pt" height="232pt"
+ viewBox="0.00 0.00 641.00 231.90" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 346.93)">
 <title>sourcefile~~rmvs_encounter_check.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-327.68 966,-327.68 966,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-346.93 966,-346.93 966,4 -4,4"/>
 <!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_encounter_check.f90</title>
-<polygon fill="none" stroke="black" points="962,-235.19 820,-235.19 820,-211.19 962,-211.19 962,-235.19"/>
-<text text-anchor="middle" x="891" y="-220.79" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_encounter_check.f90</text>
+<polygon fill="none" stroke="black" points="962,-234.3 820,-234.3 820,-210.3 962,-210.3 962,-234.3"/>
+<text text-anchor="middle" x="891" y="-219.9" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_encounter_check.f90</text>
 </g>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
 <g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-255.19 442,-255.19 442,-231.19 537,-231.19 537,-255.19"/>
-<text text-anchor="middle" x="489.5" y="-240.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-312.3 441,-312.3 441,-288.3 536,-288.3 536,-312.3"/>
+<text text-anchor="middle" x="488.5" y="-297.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.96,-226.7C742.42,-230.58 618.96,-236.76 547.23,-240.35"/>
-<polygon fill="#000000" stroke="#000000" points="546.85,-236.87 537.04,-240.86 547.2,-243.86 546.85,-236.87"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M847.68,-234.34C805.87,-245.89 739.94,-263.18 682,-274.3 636.55,-283.02 584.51,-289.86 546,-294.33"/>
+<polygon fill="#000000" stroke="#000000" points="545.56,-290.86 536.02,-295.47 546.35,-297.82 545.56,-290.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.19 718,-215.19 718,-191.19 784,-191.19 784,-215.19"/>
-<text text-anchor="middle" x="751" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-194.3 718,-194.3 718,-170.3 784,-170.3 784,-194.3"/>
+<text text-anchor="middle" x="751" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-213.02C810.99,-211.74 802.21,-210.47 794.03,-209.29"/>
-<polygon fill="#000000" stroke="#000000" points="794.44,-205.81 784.04,-207.84 793.44,-212.74 794.44,-205.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M848.6,-210.29C831.34,-205.29 811.33,-199.49 794.01,-194.47"/>
+<polygon fill="#000000" stroke="#000000" points="794.74,-191.04 784.16,-191.62 792.79,-197.76 794.74,-191.04"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-215.19 300,-215.19 300,-191.19 394,-191.19 394,-215.19"/>
-<text text-anchor="middle" x="347" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-270.3 303.5,-270.3 303.5,-246.3 397.5,-246.3 397.5,-270.3"/>
+<text text-anchor="middle" x="350.5" y="-255.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-231.19C431.89,-227.08 415.54,-222.42 400.37,-218.1"/>
-<polygon fill="#000000" stroke="#000000" points="401.19,-214.7 390.61,-215.33 399.27,-221.43 401.19,-214.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-288.26C433.45,-283.6 416.02,-278.22 400.14,-273.32"/>
+<polygon fill="#000000" stroke="#000000" points="401.07,-269.94 390.48,-270.33 399,-276.63 401.07,-269.94"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-107.19 0,-107.19 0,-83.19 106,-83.19 106,-107.19"/>
-<text text-anchor="middle" x="53" y="-92.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-230.3 0,-230.3 0,-206.3 106,-206.3 106,-230.3"/>
+<text text-anchor="middle" x="53" y="-215.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-243.19C280.38,-238.61 258.6,-268.78 198,-243.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-244.82C414.55,-245.37 379.27,-245.38 348,-243.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-340.3C255.74,-347.05 225.83,-341.83 142,-299.3 112.64,-284.4 85.9,-256.89 69.79,-238.1"/>
+<polygon fill="#000000" stroke="#000000" points="72.46,-235.83 63.36,-230.4 67.08,-240.32 72.46,-235.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.08,-312.48C435.24,-324.21 391.37,-340.21 351.5,-340.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge8" class="edge">
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge14" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C592.57,-206.66 555.55,-217.87 528.71,-227.64"/>
-<polygon fill="#000000" stroke="#000000" points="527.45,-224.38 519.31,-231.16 529.9,-230.93 527.45,-224.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C595.15,-266.84 561.12,-276.81 534.75,-285.15"/>
+<polygon fill="#000000" stroke="#000000" points="533.5,-281.88 525.05,-288.26 535.64,-288.55 533.5,-281.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-130.19 143.5,-130.19 143.5,-106.19 250.5,-106.19 250.5,-130.19"/>
-<text text-anchor="middle" x="197" y="-115.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-114.3 298,-114.3 298,-90.3 403,-90.3 403,-114.3"/>
+<text text-anchor="middle" x="350.5" y="-99.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-123.19C318.09,-122.66 287.23,-121.68 260.94,-120.73"/>
-<polygon fill="#000000" stroke="#000000" points="260.86,-117.23 250.73,-120.35 260.6,-124.22 260.86,-117.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C517.82,-23.59 472.9,-125.57 348,-123.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-171.85C706.67,-168.31 693.82,-164.45 682,-161.3 617.73,-144.13 601.44,-140.28 536,-128.3 495.46,-120.87 449.56,-114.4 413.69,-109.76"/>
+<polygon fill="#000000" stroke="#000000" points="413.74,-106.24 403.38,-108.45 412.85,-113.19 413.74,-106.24"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-290.3 142,-290.3 142,-266.3 260,-266.3 260,-290.3"/>
+<text text-anchor="middle" x="201" y="-275.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C549.78,-209.76 460.85,-208.02 404.52,-205.91"/>
-<polygon fill="#000000" stroke="#000000" points="404.52,-202.41 394.4,-205.51 404.25,-209.4 404.52,-202.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C449.95,-262.73 442.39,-275.05 405,-279.3 356.87,-284.77 344.44,-279.55 296,-279.3 287.67,-279.25 278.93,-279.19 270.27,-279.11"/>
+<polygon fill="#000000" stroke="#000000" points="270.2,-275.61 260.17,-279.01 270.13,-282.61 270.2,-275.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-28.19 142,-28.19 142,-4.19 252,-4.19 252,-28.19"/>
-<text text-anchor="middle" x="197" y="-13.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-194.3 575.5,-194.3 575.5,-170.3 678.5,-170.3 678.5,-194.3"/>
+<text text-anchor="middle" x="627" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C411.63,5.23 321.33,-0.39 262.05,-7.06"/>
-<polygon fill="#000000" stroke="#000000" points="261.61,-3.58 252.08,-8.22 262.42,-10.54 261.61,-3.58"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C566.15,-51.25 558.44,-22.55 490.5,-9.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.1,-191.08C722.81,-167.05 678.48,-113.3 628.5,-85.19"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C578.75,-207.83 579.27,-241.69 537,-264.19 517.29,-274.69 512.42,-278.97 490.5,-283.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C424.75,-295.47 412.77,-247.72 348,-243.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-182.3C708.94,-182.3 698.85,-182.3 688.76,-182.3"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-178.8 678.72,-182.3 688.72,-185.8 688.72,-178.8"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-315.19 573,-315.19 573,-291.19 682,-291.19 682,-315.19"/>
-<text text-anchor="middle" x="627.5" y="-300.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-76.3 572,-76.3 572,-52.3 682,-52.3 682,-76.3"/>
+<text text-anchor="middle" x="627" y="-61.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M735.1,-215.46C714.04,-232.79 675.39,-264.6 650.87,-284.78"/>
-<polygon fill="#000000" stroke="#000000" points="648.64,-282.09 643.14,-291.14 653.09,-287.49 648.64,-282.09"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.57,-170.09C732.96,-150.93 710.15,-113.6 682,-90.3 677.95,-86.94 673.39,-83.89 668.68,-81.17"/>
+<polygon fill="#000000" stroke="#000000" points="670.01,-77.91 659.54,-76.32 666.73,-84.1 670.01,-77.91"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-175.19 442.5,-175.19 442.5,-151.19 536.5,-151.19 536.5,-175.19"/>
-<text text-anchor="middle" x="489.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-232.3 441.5,-232.3 441.5,-208.3 535.5,-208.3 535.5,-232.3"/>
+<text text-anchor="middle" x="488.5" y="-217.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-202.34C693.45,-201.95 658.8,-202 628.5,-204.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C589.48,-206.88 548.98,-192.24 521.89,-179.71"/>
-<polygon fill="#000000" stroke="#000000" points="523.07,-176.4 512.54,-175.23 520.05,-182.71 523.07,-176.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C588.18,-268.32 545.58,-251.57 518.18,-237.35"/>
+<polygon fill="#000000" stroke="#000000" points="519.61,-234.15 509.15,-232.47 516.28,-240.3 519.61,-234.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C566.65,-272.89 550.04,-256.36 489.5,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C461.31,-262 432.24,-261.84 407.71,-261.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.61,-257.62 397.5,-260.79 407.38,-264.62 407.61,-257.62"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-175.19 576,-175.19 576,-151.19 679,-151.19 679,-175.19"/>
-<text text-anchor="middle" x="627.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-34.3 296,-34.3 296,-10.3 405,-10.3 405,-34.3"/>
+<text text-anchor="middle" x="350.5" y="-19.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-192.58C704.62,-188.25 689.18,-183.17 674.87,-178.46"/>
-<polygon fill="#000000" stroke="#000000" points="675.78,-175.08 665.19,-175.27 673.59,-181.72 675.78,-175.08"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-60.19 294.5,-60.19 294.5,-36.19 399.5,-36.19 399.5,-60.19"/>
-<text text-anchor="middle" x="347" y="-45.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.15,-169.96C743.2,-141.89 726.88,-73.32 682,-43.3 602.41,9.95 486.48,2.8 415.19,-8.69"/>
+<polygon fill="#000000" stroke="#000000" points="414.28,-5.3 405.01,-10.42 415.45,-12.2 414.28,-5.3"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C469.48,-5.63 423.06,-20.23 388.75,-32.58"/>
-<polygon fill="#000000" stroke="#000000" points="387.17,-29.43 378.98,-36.15 389.58,-36 387.17,-29.43"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.26,-194.34C734.31,-213.94 712.01,-252.74 682,-274.3 560.34,-361.68 501.29,-339.97 351.5,-340.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-295.19 288,-295.19 288,-271.19 406,-271.19 406,-295.19"/>
-<text text-anchor="middle" x="347" y="-280.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-154.3 147.5,-154.3 147.5,-130.3 254.5,-130.3 254.5,-154.3"/>
+<text text-anchor="middle" x="201" y="-139.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C465.24,-287.67 439.4,-288.75 416.29,-288.37"/>
-<polygon fill="#000000" stroke="#000000" points="416.32,-284.87 406.23,-288.11 416.14,-291.87 416.32,-284.87"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M737.88,-194.43C717.42,-213.81 673.74,-250.59 628,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C578.73,-270.32 580.83,-217.32 536,-199.3 523.49,-194.27 357.63,-167.21 264.45,-152.25"/>
+<polygon fill="#000000" stroke="#000000" points="265,-148.8 254.57,-150.67 263.89,-155.71 265,-148.8"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.12,-109.63C134.42,-108.22 125.32,-106.75 116.4,-105.3"/>
-<polygon fill="#000000" stroke="#000000" points="116.88,-101.83 106.45,-103.69 115.76,-108.74 116.88,-101.83"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.71,-92.67C268.5,-89.57 231.97,-89.66 202,-102.3"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.8,-191.02C299.41,-176.44 256.72,-151.92 227.97,-135.41"/>
-<polygon fill="#000000" stroke="#000000" points="229.58,-132.3 219.17,-130.35 226.09,-138.37 229.58,-132.3"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-114.3C289.86,-118.47 272.41,-123.2 256.31,-127.57"/>
+<polygon fill="#000000" stroke="#000000" points="255.21,-124.24 246.48,-130.23 257.05,-130.99 255.21,-124.24"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.68,-215.27C281.09,-230.11 219.52,-252.28 198,-243.19"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.45,-266.15C148.09,-256.96 117.18,-244.26 92.82,-234.25"/>
+<polygon fill="#000000" stroke="#000000" points="94.08,-230.98 83.5,-230.42 91.42,-237.46 94.08,-230.98"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-28.36C150.18,-41.68 111.63,-63.13 84.68,-78.13"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-75.22 75.67,-83.14 86.11,-81.34 82.71,-75.22"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C456.89,-135.69 423.11,-125.77 396.87,-117.46"/>
+<polygon fill="#000000" stroke="#000000" points="397.8,-114.08 387.21,-114.36 395.66,-120.75 397.8,-114.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.15,-170.24C562.83,-161.43 524.14,-149.77 489.5,-142.3"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-312.94C504.91,-323.15 384.91,-333.94 288,-304.19 241.81,-290.01 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M582.81,-194.32C570.11,-197.85 556.07,-201.76 542.82,-205.45"/>
+<polygon fill="#000000" stroke="#000000" points="541.57,-202.17 532.88,-208.22 543.45,-208.91 541.57,-202.17"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.94,-151.18C434.15,-139.69 388.95,-123.97 348,-123.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C428.42,-129.55 411.81,-146.31 351.5,-142.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C281.73,-137.78 264.59,-75.92 202,-102.3"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-175.2C431.89,-179.31 415.54,-183.97 400.37,-188.28"/>
-<polygon fill="#000000" stroke="#000000" points="399.27,-184.96 390.61,-191.06 401.19,-191.69 399.27,-184.96"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C321.76,-140.45 291.01,-140.17 264.8,-140.46"/>
+<polygon fill="#000000" stroke="#000000" points="264.57,-136.96 254.62,-140.6 264.67,-143.96 264.57,-136.96"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.45,-156.12C414.46,-153.54 378.38,-153.3 348,-163.19"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-175.3C592.17,-179.78 582.03,-185.03 573,-190.19 553.67,-201.24 532.56,-214.83 516.53,-225.49"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-222.6 508.19,-231.07 518.45,-228.41 514.56,-222.6"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.95,-58.94C488.85,-52.9 326.29,-49.91 202,-102.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C426.21,-118.74 410.43,-124.38 348,-123.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.51,-151.11C571.46,-140.37 529.04,-125.95 490.5,-123.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-232.32C431.82,-235.85 417.83,-239.76 404.63,-243.45"/>
+<polygon fill="#000000" stroke="#000000" points="403.41,-240.16 394.72,-246.22 405.29,-246.9 403.41,-240.16"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C284.51,-209.69 267.41,-222.65 202,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-218.3C172.54,-216.47 142.1,-216.19 116.16,-216.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-212.98 106.09,-216.62 116.13,-219.98 116.04,-212.98"/>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-243.19C134.83,-217.36 87.43,-150.64 66.2,-116.3"/>
-<polygon fill="#000000" stroke="#000000" points="69.07,-114.29 60.91,-107.54 63.08,-117.91 69.07,-114.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C423.74,-118.57 409.74,-143.1 348,-163.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-163.19C320.21,-171.59 312.35,-170.25 288,-182.19 244.62,-203.48 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.35,-222.28C414.93,-222.76 381.23,-222.23 351.5,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C301.31,-211.91 252.57,-180.93 224.93,-160.54"/>
+<polygon fill="#000000" stroke="#000000" points="226.82,-157.58 216.73,-154.34 222.6,-163.16 226.82,-157.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-163.19C566.43,-163.19 556.52,-163.19 546.94,-163.19"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-159.69 536.69,-163.19 546.69,-166.69 546.69,-159.69"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-246.22C289.62,-235.48 243.56,-221.06 202,-218.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.33,-151.19C591.78,-139.32 563.42,-121.23 537,-109.19 494.23,-89.71 443.42,-73.68 405.26,-62.95"/>
-<polygon fill="#000000" stroke="#000000" points="405.92,-59.5 395.34,-60.2 404.05,-66.24 405.92,-59.5"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.53,-246.24C312.31,-242.29 303.54,-237.55 296,-232.3 266.31,-211.63 236.98,-181.61 219.18,-162.01"/>
+<polygon fill="#000000" stroke="#000000" points="221.57,-159.43 212.29,-154.32 216.35,-164.1 221.57,-159.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.56,-60.23C296.31,-71.7 259.6,-89.06 232.68,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="231.15,-98.64 223.61,-106.08 234.14,-104.97 231.15,-98.64"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.74,-34.37C314.88,-38.64 304.94,-43.56 296,-48.3 253.42,-70.84 246.4,-83.58 202,-102.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-102.3C175,-112.83 164.76,-106.54 142,-121.3 110.64,-141.63 83.28,-175.83 67.7,-197.72"/>
+<polygon fill="#000000" stroke="#000000" points="64.79,-195.79 61.96,-206 70.54,-199.78 64.79,-195.79"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.47,-56.49C244.79,-64.49 169.53,-76.6 116.46,-85.14"/>
-<polygon fill="#000000" stroke="#000000" points="115.81,-81.7 106.49,-86.75 116.92,-88.61 115.81,-81.7"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_encounter_check.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.86,-271.34C260.07,-264.7 226.69,-255.31 198,-243.19"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.87,-154.34C152.55,-166.99 114.11,-187.01 86.7,-201.27"/>
+<polygon fill="#000000" stroke="#000000" points="84.76,-198.34 77.51,-206.06 88,-204.55 84.76,-198.34"/>
 </g>
 </g>
 </svg>
@@ -630,73 +626,86 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-18"></a>      <span class="kt">logical</span>                                 <span class="kd">::</span> <span class="n">lencounter</span>  <span class="c">!! Returns true if there is at least one close encounter</span>
 <a name="ln-19"></a>      <span class="c">! Internals</span>
 <a name="ln-20"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                            <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
-<a name="ln-21"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                <span class="kd">::</span> <span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span>
-<a name="ln-22"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span>               <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">vr</span>
-<a name="ln-23"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">r2crit</span>
-<a name="ln-24"></a>      <span class="kt">logical</span>                                 <span class="kd">::</span> <span class="n">lflag</span>
-<a name="ln-25"></a>
-<a name="ln-26"></a>      <span class="n">lencounter</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-27"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-28"></a>
-<a name="ln-29"></a><span class="k">      select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
-<a name="ln-30"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_pl</span><span class="p">)</span>
-<a name="ln-31"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">npl</span> <span class="o">=&gt;</span> <span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">rts</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">rts</span><span class="p">)</span>
-<a name="ln-32"></a>            <span class="n">r2crit</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">rts</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-33"></a>            <span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-34"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-35"></a>               <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span>
-<a name="ln-36"></a>                  <span class="k">if</span> <span class="p">((.</span><span class="nb">not</span><span class="p">.</span><span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">)).</span><span class="nb">or</span><span class="p">.(</span><span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">))</span> <span class="k">cycle</span>
-<a name="ln-37"></a><span class="k">                  </span><span class="n">xr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xbeg</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-38"></a>                  <span class="n">vr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vbeg</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-39"></a>                  <span class="n">r2</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">xr</span><span class="p">(:),</span> <span class="n">xr</span><span class="p">(:))</span>
-<a name="ln-40"></a>                  <span class="n">v2</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">vr</span><span class="p">(:),</span> <span class="n">vr</span><span class="p">(:))</span>
-<a name="ln-41"></a>                  <span class="n">vdotr</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">vr</span><span class="p">(:),</span> <span class="n">xr</span><span class="p">(:))</span>
-<a name="ln-42"></a>                  <span class="n">lflag</span> <span class="o">=</span> <span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">(</span><span class="n">j</span><span class="p">))</span>
-<a name="ln-43"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">lflag</span><span class="p">)</span> <span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
-<a name="ln-44"></a>               <span class="k">end do</span>
-<a name="ln-45"></a><span class="k">               </span><span class="n">pl</span><span class="p">%</span><span class="n">nenc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">==</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-46"></a>            <span class="k">end do</span>
-<a name="ln-47"></a><span class="k">            </span><span class="n">lencounter</span> <span class="o">=</span> <span class="nb">any</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">nenc</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">&gt;</span> <span class="mi">0</span><span class="p">)</span>
-<a name="ln-48"></a>         <span class="k">end associate</span>
-<a name="ln-49"></a><span class="k">      end select</span>
-<a name="ln-50"></a><span class="k">      return</span>
-<a name="ln-51"></a><span class="k">   end function </span><span class="n">rmvs_encounter_check_tp</span>
-<a name="ln-52"></a>
-<a name="ln-53"></a>
-<a name="ln-54"></a>   <span class="k">module elemental function </span><span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lflag</span><span class="p">)</span>
-<a name="ln-55"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-56"></a>      <span class="c">!!</span>
-<a name="ln-57"></a>      <span class="c">!! Determine whether a test particle and planet are having or will have an encounter within the next time step</span>
-<a name="ln-58"></a>      <span class="c">!!</span>
-<a name="ln-59"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: rmvs_chk_ind.f90</span>
-<a name="ln-60"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine rmvs_chk_ind.f</span>
-<a name="ln-61"></a>      <span class="k">implicit none</span>
-<a name="ln-62"></a>      <span class="c">! Arguments</span>
-<a name="ln-63"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>       <span class="kd">::</span> <span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span>
-<a name="ln-64"></a>      <span class="kt">logical</span>                    <span class="kd">::</span> <span class="n">lflag</span>
-<a name="ln-65"></a>      <span class="c">! Internals</span>
-<a name="ln-66"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span>  <span class="n">tmin</span><span class="p">,</span> <span class="n">r2min</span>
-<a name="ln-67"></a>
-<a name="ln-68"></a>      <span class="n">lflag</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-69"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">r2</span> <span class="o">&lt;</span> <span class="n">r2crit</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-70"></a><span class="k">         </span><span class="n">lflag</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-71"></a>      <span class="k">else</span>
-<a name="ln-72"></a><span class="k">         if</span> <span class="p">(</span><span class="n">vdotr</span> <span class="o">&lt;</span> <span class="mf">0.0_DP</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-73"></a><span class="k">            </span><span class="n">tmin</span> <span class="o">=</span> <span class="o">-</span><span class="n">vdotr</span> <span class="o">/</span> <span class="n">v2</span>
-<a name="ln-74"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">tmin</span> <span class="o">&lt;</span> <span class="n">dt</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-75"></a><span class="k">               </span><span class="n">r2min</span> <span class="o">=</span> <span class="n">r2</span> <span class="o">-</span> <span class="n">vdotr</span><span class="o">**</span><span class="mi">2</span> <span class="o">/</span> <span class="n">v2</span>
-<a name="ln-76"></a>            <span class="k">else</span>
-<a name="ln-77"></a><span class="k">               </span><span class="n">r2min</span> <span class="o">=</span> <span class="n">r2</span> <span class="o">+</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">vdotr</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">+</span> <span class="n">v2</span> <span class="o">*</span> <span class="n">dt</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-78"></a>            <span class="k">end if</span>
-<a name="ln-79"></a><span class="k">            </span><span class="n">r2min</span> <span class="o">=</span> <span class="nb">min</span><span class="p">(</span><span class="n">r2min</span><span class="p">,</span> <span class="n">r2</span><span class="p">)</span>
-<a name="ln-80"></a>            <span class="n">lflag</span> <span class="o">=</span> <span class="p">(</span><span class="n">r2min</span> <span class="o">&lt;=</span> <span class="n">r2crit</span><span class="p">)</span>
-<a name="ln-81"></a>         <span class="k">end if</span>
-<a name="ln-82"></a><span class="k">      end if</span>
+<a name="ln-21"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span>
+<a name="ln-22"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">r2crit</span>
+<a name="ln-23"></a>      <span class="kt">logical</span>                                 <span class="kd">::</span> <span class="n">lflag</span><span class="p">,</span> <span class="n">lvdotr</span>
+<a name="ln-24"></a>
+<a name="ln-25"></a>      <span class="c">! The minimization and linear solvers can sometimes lead to floating point exceptions. Rather than halting the code entirely if this occurs, we</span>
+<a name="ln-26"></a>      <span class="c">! can simply fail the attempt and try again. So we need to turn off any floating point exception halting modes temporarily </span>
+<a name="ln-27"></a>
+<a name="ln-28"></a>      <span class="n">lencounter</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-29"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-30"></a>
+<a name="ln-31"></a><span class="k">      select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
+<a name="ln-32"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_pl</span><span class="p">)</span>
+<a name="ln-33"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">npl</span> <span class="o">=&gt;</span> <span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">rts</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">rts</span><span class="p">)</span>
+<a name="ln-34"></a>            <span class="n">r2crit</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">rts</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-35"></a>            <span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-36"></a>            <span class="c">!$omp parallel do default(private)&amp;</span>
+<a name="ln-37"></a>            <span class="c">!$omp shared(npl, ntp, tp, pl, dt, r2crit)</span>
+<a name="ln-38"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span>
+<a name="ln-39"></a>               <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span>
+<a name="ln-40"></a>                  <span class="k">if</span> <span class="p">((.</span><span class="nb">not</span><span class="p">.</span><span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">)).</span><span class="nb">or</span><span class="p">.(</span><span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">/=</span> <span class="mi">0</span><span class="p">))</span> <span class="k">cycle</span>
+<a name="ln-41"></a><span class="k">                  </span><span class="n">xr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xbeg</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-42"></a>                  <span class="n">yr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xbeg</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-43"></a>                  <span class="n">zr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xbeg</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-44"></a>                  <span class="n">vxr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vbeg</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-45"></a>                  <span class="n">vyr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vbeg</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-46"></a>                  <span class="n">vzr</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vbeg</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-47"></a>                  <span class="k">call </span><span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">lflag</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
+<a name="ln-48"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">lflag</span><span class="p">)</span> <span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
+<a name="ln-49"></a>               <span class="k">end do</span>
+<a name="ln-50"></a><span class="k">               </span><span class="n">pl</span><span class="p">%</span><span class="n">nenc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">plencP</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">==</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-51"></a>            <span class="k">end do</span>
+<a name="ln-52"></a>            <span class="c">!$omp end parallel do</span>
+<a name="ln-53"></a>            <span class="n">lencounter</span> <span class="o">=</span> <span class="nb">any</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">nenc</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">&gt;</span> <span class="mi">0</span><span class="p">)</span>
+<a name="ln-54"></a>         <span class="k">end associate</span>
+<a name="ln-55"></a><span class="k">      end select</span>
+<a name="ln-56"></a>
+<a name="ln-57"></a><span class="k">      return</span>
+<a name="ln-58"></a><span class="k">   end function </span><span class="n">rmvs_encounter_check_tp</span>
+<a name="ln-59"></a>
+<a name="ln-60"></a>
+<a name="ln-61"></a>   <span class="k">module pure subroutine </span><span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
+<a name="ln-62"></a>      <span class="c">!$omp declare simd(rmvs_chk_ind)</span>
+<a name="ln-63"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-64"></a>      <span class="c">!!</span>
+<a name="ln-65"></a>      <span class="c">!! Determine whether a test particle and planet are having or will have an encounter within the next time step</span>
+<a name="ln-66"></a>      <span class="c">!!</span>
+<a name="ln-67"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: rmvs_chk_ind.f90</span>
+<a name="ln-68"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine rmvs_chk_ind.f</span>
+<a name="ln-69"></a>      <span class="k">implicit none</span>
+<a name="ln-70"></a>      <span class="c">! Arguments</span>
+<a name="ln-71"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>    <span class="c">!! Relative distance vector components</span>
+<a name="ln-72"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span> <span class="c">!! Relative velocity vector components</span>
+<a name="ln-73"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">dt</span>            <span class="c">!! Step size</span>
+<a name="ln-74"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">r2crit</span>        <span class="c">!! Square of the critical encounter distance</span>
+<a name="ln-75"></a>      <span class="kt">logical</span><span class="p">,</span>  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lencounter</span>    <span class="c">!! Flag indicating that an encounter has occurred</span>
+<a name="ln-76"></a>      <span class="kt">logical</span><span class="p">,</span>  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lvdotr</span>        <span class="c">!! Logical flag indicating the direction of the v .dot. r vector</span>
+<a name="ln-77"></a>      <span class="c">! Internals</span>
+<a name="ln-78"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">r2min</span><span class="p">,</span> <span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span>
+<a name="ln-79"></a>
+<a name="ln-80"></a>      <span class="n">r2</span> <span class="o">=</span> <span class="n">xr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">yr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">zr</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-81"></a>      <span class="n">lencounter</span> <span class="o">=</span> <span class="p">(</span><span class="n">r2</span> <span class="o">&lt;</span> <span class="n">r2crit</span><span class="p">)</span> 
+<a name="ln-82"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">lencounter</span><span class="p">)</span> <span class="k">return </span>
 <a name="ln-83"></a>
-<a name="ln-84"></a><span class="k">      return</span>
-<a name="ln-85"></a><span class="k">   end function </span><span class="n">rmvs_chk_ind</span>
-<a name="ln-86"></a>
-<a name="ln-87"></a><span class="k">end submodule </span><span class="n">s_rmvs_chk</span>
+<a name="ln-84"></a><span class="k">      </span><span class="n">vdotr</span> <span class="o">=</span> <span class="n">vxr</span> <span class="o">*</span> <span class="n">xr</span> <span class="o">+</span> <span class="n">vyr</span> <span class="o">*</span> <span class="n">yr</span> <span class="o">+</span> <span class="n">vzr</span> <span class="o">*</span> <span class="n">zr</span>
+<a name="ln-85"></a>      <span class="n">lvdotr</span> <span class="o">=</span> <span class="p">(</span><span class="n">vdotr</span> <span class="o">&lt;</span> <span class="mf">0.0_DP</span><span class="p">)</span>
+<a name="ln-86"></a>      <span class="k">if</span> <span class="p">(.</span><span class="nb">not</span><span class="p">.</span><span class="n">lvdotr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-87"></a><span class="k">     </span>
+<a name="ln-88"></a><span class="k">      </span><span class="n">v2</span> <span class="o">=</span> <span class="n">vxr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">vyr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">vzr</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-89"></a>
+<a name="ln-90"></a>      <span class="k">if</span> <span class="p">(</span><span class="o">-</span><span class="n">vdotr</span> <span class="o">&lt;</span> <span class="n">v2</span> <span class="o">*</span> <span class="n">dt</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-91"></a><span class="k">         </span><span class="n">r2min</span> <span class="o">=</span> <span class="n">r2</span> <span class="o">-</span> <span class="n">vdotr</span><span class="o">**</span><span class="mi">2</span> <span class="o">/</span> <span class="n">v2</span>
+<a name="ln-92"></a>      <span class="k">else</span>
+<a name="ln-93"></a><span class="k">         </span><span class="n">r2min</span> <span class="o">=</span> <span class="n">r2</span> <span class="o">+</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">vdotr</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">+</span> <span class="n">v2</span> <span class="o">*</span> <span class="n">dt</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-94"></a>      <span class="k">end if</span>
+<a name="ln-95"></a><span class="k">      </span><span class="n">lencounter</span> <span class="o">=</span> <span class="p">(</span><span class="n">r2min</span> <span class="o">&lt;=</span> <span class="n">r2crit</span><span class="p">)</span>
+<a name="ln-96"></a>
+<a name="ln-97"></a>      <span class="k">return</span>
+<a name="ln-98"></a><span class="k">   end subroutine </span><span class="n">rmvs_chk_ind</span>
+<a name="ln-99"></a>
+<a name="ln-100"></a><span class="k">end submodule </span><span class="n">s_rmvs_chk</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/rmvs_io.f90.html b/docs/sourcefile/rmvs_io.f90.html
index c2858aed7..1285ea5e5 100644
--- a/docs/sourcefile/rmvs_io.f90.html
+++ b/docs/sourcefile/rmvs_io.f90.html
@@ -226,296 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_io.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_iof90EfferentGraph" width="641pt" height="237pt"
- viewBox="0.00 0.00 641.00 237.28" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 327.68)">
+<svg id="sourcefilermvs_iof90EfferentGraph" width="641pt" height="251pt"
+ viewBox="0.00 0.00 641.00 251.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 346.93)">
 <title>sourcefile~~rmvs_io.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-327.68 892,-327.68 892,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-346.93 892,-346.93 892,4 -4,4"/>
 <!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_io.f90</title>
-<polygon fill="none" stroke="black" points="888,-235.19 820,-235.19 820,-211.19 888,-211.19 888,-235.19"/>
-<text text-anchor="middle" x="854" y="-220.79" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_io.f90</text>
+<polygon fill="none" stroke="black" points="888,-234.3 820,-234.3 820,-210.3 888,-210.3 888,-234.3"/>
+<text text-anchor="middle" x="854" y="-219.9" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_io.f90</text>
 </g>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
 <g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-255.19 442,-255.19 442,-231.19 537,-231.19 537,-255.19"/>
-<text text-anchor="middle" x="489.5" y="-240.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-312.3 441,-312.3 441,-288.3 536,-288.3 536,-312.3"/>
+<text text-anchor="middle" x="488.5" y="-297.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.87,-225.02C758.02,-228.43 624.34,-235.81 547.66,-240.04"/>
-<polygon fill="#000000" stroke="#000000" points="547.02,-236.57 537.23,-240.62 547.41,-243.56 547.02,-236.57"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M820,-234.07C785.86,-245.83 730.81,-263.65 682,-274.3 636.78,-284.16 584.72,-290.92 546.15,-295.07"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-291.59 536.15,-296.12 546.46,-298.55 545.73,-291.59"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.19 718,-215.19 718,-191.19 784,-191.19 784,-215.19"/>
-<text text-anchor="middle" x="751" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-194.3 718,-194.3 718,-170.3 784,-170.3 784,-194.3"/>
+<text text-anchor="middle" x="751" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.93,-216.65C811.66,-215.01 802.68,-213.23 794.04,-211.52"/>
-<polygon fill="#000000" stroke="#000000" points="794.6,-208.06 784.11,-209.55 793.24,-214.93 794.6,-208.06"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M822.7,-210.29C813.1,-206.49 802.33,-202.23 792.15,-198.2"/>
+<polygon fill="#000000" stroke="#000000" points="793.22,-194.85 782.63,-194.43 790.64,-201.36 793.22,-194.85"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-215.19 300,-215.19 300,-191.19 394,-191.19 394,-215.19"/>
-<text text-anchor="middle" x="347" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-270.3 303.5,-270.3 303.5,-246.3 397.5,-246.3 397.5,-270.3"/>
+<text text-anchor="middle" x="350.5" y="-255.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-231.19C431.89,-227.08 415.54,-222.42 400.37,-218.1"/>
-<polygon fill="#000000" stroke="#000000" points="401.19,-214.7 390.61,-215.33 399.27,-221.43 401.19,-214.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-288.26C433.45,-283.6 416.02,-278.22 400.14,-273.32"/>
+<polygon fill="#000000" stroke="#000000" points="401.07,-269.94 390.48,-270.33 399,-276.63 401.07,-269.94"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-107.19 0,-107.19 0,-83.19 106,-83.19 106,-107.19"/>
-<text text-anchor="middle" x="53" y="-92.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-230.3 0,-230.3 0,-206.3 106,-206.3 106,-230.3"/>
+<text text-anchor="middle" x="53" y="-215.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-243.19C280.38,-238.61 258.6,-268.78 198,-243.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-244.82C414.55,-245.37 379.27,-245.38 348,-243.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-340.3C255.74,-347.05 225.83,-341.83 142,-299.3 112.64,-284.4 85.9,-256.89 69.79,-238.1"/>
+<polygon fill="#000000" stroke="#000000" points="72.46,-235.83 63.36,-230.4 67.08,-240.32 72.46,-235.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.08,-312.48C435.24,-324.21 391.37,-340.21 351.5,-340.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge8" class="edge">
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge14" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C592.57,-206.66 555.55,-217.87 528.71,-227.64"/>
-<polygon fill="#000000" stroke="#000000" points="527.45,-224.38 519.31,-231.16 529.9,-230.93 527.45,-224.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C595.15,-266.84 561.12,-276.81 534.75,-285.15"/>
+<polygon fill="#000000" stroke="#000000" points="533.5,-281.88 525.05,-288.26 535.64,-288.55 533.5,-281.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-130.19 143.5,-130.19 143.5,-106.19 250.5,-106.19 250.5,-130.19"/>
-<text text-anchor="middle" x="197" y="-115.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-114.3 298,-114.3 298,-90.3 403,-90.3 403,-114.3"/>
+<text text-anchor="middle" x="350.5" y="-99.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-123.19C318.09,-122.66 287.23,-121.68 260.94,-120.73"/>
-<polygon fill="#000000" stroke="#000000" points="260.86,-117.23 250.73,-120.35 260.6,-124.22 260.86,-117.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C517.82,-23.59 472.9,-125.57 348,-123.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-171.85C706.67,-168.31 693.82,-164.45 682,-161.3 617.73,-144.13 601.44,-140.28 536,-128.3 495.46,-120.87 449.56,-114.4 413.69,-109.76"/>
+<polygon fill="#000000" stroke="#000000" points="413.74,-106.24 403.38,-108.45 412.85,-113.19 413.74,-106.24"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-290.3 142,-290.3 142,-266.3 260,-266.3 260,-290.3"/>
+<text text-anchor="middle" x="201" y="-275.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C549.78,-209.76 460.85,-208.02 404.52,-205.91"/>
-<polygon fill="#000000" stroke="#000000" points="404.52,-202.41 394.4,-205.51 404.25,-209.4 404.52,-202.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C449.95,-262.73 442.39,-275.05 405,-279.3 356.87,-284.77 344.44,-279.55 296,-279.3 287.67,-279.25 278.93,-279.19 270.27,-279.11"/>
+<polygon fill="#000000" stroke="#000000" points="270.2,-275.61 260.17,-279.01 270.13,-282.61 270.2,-275.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-28.19 142,-28.19 142,-4.19 252,-4.19 252,-28.19"/>
-<text text-anchor="middle" x="197" y="-13.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-194.3 575.5,-194.3 575.5,-170.3 678.5,-170.3 678.5,-194.3"/>
+<text text-anchor="middle" x="627" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C411.63,5.23 321.33,-0.39 262.05,-7.06"/>
-<polygon fill="#000000" stroke="#000000" points="261.61,-3.58 252.08,-8.22 262.42,-10.54 261.61,-3.58"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C566.15,-51.25 558.44,-22.55 490.5,-9.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.1,-191.08C722.81,-167.05 678.48,-113.3 628.5,-85.19"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C578.75,-207.83 579.27,-241.69 537,-264.19 517.29,-274.69 512.42,-278.97 490.5,-283.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C424.75,-295.47 412.77,-247.72 348,-243.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-182.3C708.94,-182.3 698.85,-182.3 688.76,-182.3"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-178.8 678.72,-182.3 688.72,-185.8 688.72,-178.8"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-315.19 573,-315.19 573,-291.19 682,-291.19 682,-315.19"/>
-<text text-anchor="middle" x="627.5" y="-300.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-76.3 572,-76.3 572,-52.3 682,-52.3 682,-76.3"/>
+<text text-anchor="middle" x="627" y="-61.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M735.1,-215.46C714.04,-232.79 675.39,-264.6 650.87,-284.78"/>
-<polygon fill="#000000" stroke="#000000" points="648.64,-282.09 643.14,-291.14 653.09,-287.49 648.64,-282.09"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.57,-170.09C732.96,-150.93 710.15,-113.6 682,-90.3 677.95,-86.94 673.39,-83.89 668.68,-81.17"/>
+<polygon fill="#000000" stroke="#000000" points="670.01,-77.91 659.54,-76.32 666.73,-84.1 670.01,-77.91"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-175.19 442.5,-175.19 442.5,-151.19 536.5,-151.19 536.5,-175.19"/>
-<text text-anchor="middle" x="489.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-232.3 441.5,-232.3 441.5,-208.3 535.5,-208.3 535.5,-232.3"/>
+<text text-anchor="middle" x="488.5" y="-217.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-202.34C693.45,-201.95 658.8,-202 628.5,-204.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C589.48,-206.88 548.98,-192.24 521.89,-179.71"/>
-<polygon fill="#000000" stroke="#000000" points="523.07,-176.4 512.54,-175.23 520.05,-182.71 523.07,-176.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C588.18,-268.32 545.58,-251.57 518.18,-237.35"/>
+<polygon fill="#000000" stroke="#000000" points="519.61,-234.15 509.15,-232.47 516.28,-240.3 519.61,-234.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C566.65,-272.89 550.04,-256.36 489.5,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C461.31,-262 432.24,-261.84 407.71,-261.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.61,-257.62 397.5,-260.79 407.38,-264.62 407.61,-257.62"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-175.19 576,-175.19 576,-151.19 679,-151.19 679,-175.19"/>
-<text text-anchor="middle" x="627.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-34.3 296,-34.3 296,-10.3 405,-10.3 405,-34.3"/>
+<text text-anchor="middle" x="350.5" y="-19.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-192.58C704.62,-188.25 689.18,-183.17 674.87,-178.46"/>
-<polygon fill="#000000" stroke="#000000" points="675.78,-175.08 665.19,-175.27 673.59,-181.72 675.78,-175.08"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-60.19 294.5,-60.19 294.5,-36.19 399.5,-36.19 399.5,-60.19"/>
-<text text-anchor="middle" x="347" y="-45.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.15,-169.96C743.2,-141.89 726.88,-73.32 682,-43.3 602.41,9.95 486.48,2.8 415.19,-8.69"/>
+<polygon fill="#000000" stroke="#000000" points="414.28,-5.3 405.01,-10.42 415.45,-12.2 414.28,-5.3"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C469.48,-5.63 423.06,-20.23 388.75,-32.58"/>
-<polygon fill="#000000" stroke="#000000" points="387.17,-29.43 378.98,-36.15 389.58,-36 387.17,-29.43"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.26,-194.34C734.31,-213.94 712.01,-252.74 682,-274.3 560.34,-361.68 501.29,-339.97 351.5,-340.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-295.19 288,-295.19 288,-271.19 406,-271.19 406,-295.19"/>
-<text text-anchor="middle" x="347" y="-280.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~rmvs_io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-154.3 147.5,-154.3 147.5,-130.3 254.5,-130.3 254.5,-154.3"/>
+<text text-anchor="middle" x="201" y="-139.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C465.24,-287.67 439.4,-288.75 416.29,-288.37"/>
-<polygon fill="#000000" stroke="#000000" points="416.32,-284.87 406.23,-288.11 416.14,-291.87 416.32,-284.87"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M737.88,-194.43C717.42,-213.81 673.74,-250.59 628,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C578.73,-270.32 580.83,-217.32 536,-199.3 523.49,-194.27 357.63,-167.21 264.45,-152.25"/>
+<polygon fill="#000000" stroke="#000000" points="265,-148.8 254.57,-150.67 263.89,-155.71 265,-148.8"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.12,-109.63C134.42,-108.22 125.32,-106.75 116.4,-105.3"/>
-<polygon fill="#000000" stroke="#000000" points="116.88,-101.83 106.45,-103.69 115.76,-108.74 116.88,-101.83"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.71,-92.67C268.5,-89.57 231.97,-89.66 202,-102.3"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.8,-191.02C299.41,-176.44 256.72,-151.92 227.97,-135.41"/>
-<polygon fill="#000000" stroke="#000000" points="229.58,-132.3 219.17,-130.35 226.09,-138.37 229.58,-132.3"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-114.3C289.86,-118.47 272.41,-123.2 256.31,-127.57"/>
+<polygon fill="#000000" stroke="#000000" points="255.21,-124.24 246.48,-130.23 257.05,-130.99 255.21,-124.24"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.68,-215.27C281.09,-230.11 219.52,-252.28 198,-243.19"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.45,-266.15C148.09,-256.96 117.18,-244.26 92.82,-234.25"/>
+<polygon fill="#000000" stroke="#000000" points="94.08,-230.98 83.5,-230.42 91.42,-237.46 94.08,-230.98"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-28.36C150.18,-41.68 111.63,-63.13 84.68,-78.13"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-75.22 75.67,-83.14 86.11,-81.34 82.71,-75.22"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C456.89,-135.69 423.11,-125.77 396.87,-117.46"/>
+<polygon fill="#000000" stroke="#000000" points="397.8,-114.08 387.21,-114.36 395.66,-120.75 397.8,-114.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.15,-170.24C562.83,-161.43 524.14,-149.77 489.5,-142.3"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-312.94C504.91,-323.15 384.91,-333.94 288,-304.19 241.81,-290.01 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M582.81,-194.32C570.11,-197.85 556.07,-201.76 542.82,-205.45"/>
+<polygon fill="#000000" stroke="#000000" points="541.57,-202.17 532.88,-208.22 543.45,-208.91 541.57,-202.17"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.94,-151.18C434.15,-139.69 388.95,-123.97 348,-123.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C428.42,-129.55 411.81,-146.31 351.5,-142.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C281.73,-137.78 264.59,-75.92 202,-102.3"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-175.2C431.89,-179.31 415.54,-183.97 400.37,-188.28"/>
-<polygon fill="#000000" stroke="#000000" points="399.27,-184.96 390.61,-191.06 401.19,-191.69 399.27,-184.96"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C321.76,-140.45 291.01,-140.17 264.8,-140.46"/>
+<polygon fill="#000000" stroke="#000000" points="264.57,-136.96 254.62,-140.6 264.67,-143.96 264.57,-136.96"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.45,-156.12C414.46,-153.54 378.38,-153.3 348,-163.19"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-175.3C592.17,-179.78 582.03,-185.03 573,-190.19 553.67,-201.24 532.56,-214.83 516.53,-225.49"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-222.6 508.19,-231.07 518.45,-228.41 514.56,-222.6"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.95,-58.94C488.85,-52.9 326.29,-49.91 202,-102.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C426.21,-118.74 410.43,-124.38 348,-123.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.51,-151.11C571.46,-140.37 529.04,-125.95 490.5,-123.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-232.32C431.82,-235.85 417.83,-239.76 404.63,-243.45"/>
+<polygon fill="#000000" stroke="#000000" points="403.41,-240.16 394.72,-246.22 405.29,-246.9 403.41,-240.16"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C284.51,-209.69 267.41,-222.65 202,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-218.3C172.54,-216.47 142.1,-216.19 116.16,-216.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-212.98 106.09,-216.62 116.13,-219.98 116.04,-212.98"/>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-243.19C134.83,-217.36 87.43,-150.64 66.2,-116.3"/>
-<polygon fill="#000000" stroke="#000000" points="69.07,-114.29 60.91,-107.54 63.08,-117.91 69.07,-114.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C423.74,-118.57 409.74,-143.1 348,-163.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-163.19C320.21,-171.59 312.35,-170.25 288,-182.19 244.62,-203.48 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.35,-222.28C414.93,-222.76 381.23,-222.23 351.5,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C301.31,-211.91 252.57,-180.93 224.93,-160.54"/>
+<polygon fill="#000000" stroke="#000000" points="226.82,-157.58 216.73,-154.34 222.6,-163.16 226.82,-157.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-163.19C566.43,-163.19 556.52,-163.19 546.94,-163.19"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-159.69 536.69,-163.19 546.69,-166.69 546.69,-159.69"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-246.22C289.62,-235.48 243.56,-221.06 202,-218.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.33,-151.19C591.78,-139.32 563.42,-121.23 537,-109.19 494.23,-89.71 443.42,-73.68 405.26,-62.95"/>
-<polygon fill="#000000" stroke="#000000" points="405.92,-59.5 395.34,-60.2 404.05,-66.24 405.92,-59.5"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.53,-246.24C312.31,-242.29 303.54,-237.55 296,-232.3 266.31,-211.63 236.98,-181.61 219.18,-162.01"/>
+<polygon fill="#000000" stroke="#000000" points="221.57,-159.43 212.29,-154.32 216.35,-164.1 221.57,-159.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.56,-60.23C296.31,-71.7 259.6,-89.06 232.68,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="231.15,-98.64 223.61,-106.08 234.14,-104.97 231.15,-98.64"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.74,-34.37C314.88,-38.64 304.94,-43.56 296,-48.3 253.42,-70.84 246.4,-83.58 202,-102.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-102.3C175,-112.83 164.76,-106.54 142,-121.3 110.64,-141.63 83.28,-175.83 67.7,-197.72"/>
+<polygon fill="#000000" stroke="#000000" points="64.79,-195.79 61.96,-206 70.54,-199.78 64.79,-195.79"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.47,-56.49C244.79,-64.49 169.53,-76.6 116.46,-85.14"/>
-<polygon fill="#000000" stroke="#000000" points="115.81,-81.7 106.49,-86.75 116.92,-88.61 115.81,-81.7"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_io.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.86,-271.34C260.07,-264.7 226.69,-255.31 198,-243.19"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.87,-154.34C152.55,-166.99 114.11,-187.01 86.7,-201.27"/>
+<polygon fill="#000000" stroke="#000000" points="84.76,-198.34 77.51,-206.06 88,-204.55 84.76,-198.34"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/rmvs_kick.f90.html b/docs/sourcefile/rmvs_kick.f90.html
index 0fde63b31..881dfde93 100644
--- a/docs/sourcefile/rmvs_kick.f90.html
+++ b/docs/sourcefile/rmvs_kick.f90.html
@@ -226,296 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_kick.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_kickf90EfferentGraph" width="641pt" height="235pt"
- viewBox="0.00 0.00 641.00 234.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 327.68)">
+<svg id="sourcefilermvs_kickf90EfferentGraph" width="641pt" height="248pt"
+ viewBox="0.00 0.00 641.00 248.28" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 346.93)">
 <title>sourcefile~~rmvs_kick.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-327.68 902,-327.68 902,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-346.93 902,-346.93 902,4 -4,4"/>
 <!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_kick.f90</title>
-<polygon fill="none" stroke="black" points="898,-235.19 820,-235.19 820,-211.19 898,-211.19 898,-235.19"/>
-<text text-anchor="middle" x="859" y="-220.79" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_kick.f90</text>
+<polygon fill="none" stroke="black" points="898,-234.3 820,-234.3 820,-210.3 898,-210.3 898,-234.3"/>
+<text text-anchor="middle" x="859" y="-219.9" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_kick.f90</text>
 </g>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
 <g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-255.19 442,-255.19 442,-231.19 537,-231.19 537,-255.19"/>
-<text text-anchor="middle" x="489.5" y="-240.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-312.3 441,-312.3 441,-288.3 536,-288.3 536,-312.3"/>
+<text text-anchor="middle" x="488.5" y="-297.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.71,-225.28C754.83,-228.81 622.99,-235.98 547.32,-240.1"/>
-<polygon fill="#000000" stroke="#000000" points="546.82,-236.62 537.02,-240.66 547.2,-243.61 546.82,-236.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M823.01,-234.36C787.79,-246.09 731.69,-263.66 682,-274.3 636.74,-283.98 584.69,-290.75 546.13,-294.95"/>
+<polygon fill="#000000" stroke="#000000" points="545.7,-291.48 536.13,-296.02 546.44,-298.44 545.7,-291.48"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.19 718,-215.19 718,-191.19 784,-191.19 784,-215.19"/>
-<text text-anchor="middle" x="751" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-194.3 718,-194.3 718,-170.3 784,-170.3 784,-194.3"/>
+<text text-anchor="middle" x="751" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.73,-215.97C811.47,-214.41 802.69,-212.76 794.28,-211.17"/>
-<polygon fill="#000000" stroke="#000000" points="794.75,-207.7 784.27,-209.28 793.45,-214.58 794.75,-207.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.2,-210.29C816.02,-206.45 804.59,-202.14 793.81,-198.07"/>
+<polygon fill="#000000" stroke="#000000" points="794.74,-194.68 784.15,-194.43 792.27,-201.23 794.74,-194.68"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-215.19 300,-215.19 300,-191.19 394,-191.19 394,-215.19"/>
-<text text-anchor="middle" x="347" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-270.3 303.5,-270.3 303.5,-246.3 397.5,-246.3 397.5,-270.3"/>
+<text text-anchor="middle" x="350.5" y="-255.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-231.19C431.89,-227.08 415.54,-222.42 400.37,-218.1"/>
-<polygon fill="#000000" stroke="#000000" points="401.19,-214.7 390.61,-215.33 399.27,-221.43 401.19,-214.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-288.26C433.45,-283.6 416.02,-278.22 400.14,-273.32"/>
+<polygon fill="#000000" stroke="#000000" points="401.07,-269.94 390.48,-270.33 399,-276.63 401.07,-269.94"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-107.19 0,-107.19 0,-83.19 106,-83.19 106,-107.19"/>
-<text text-anchor="middle" x="53" y="-92.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-230.3 0,-230.3 0,-206.3 106,-206.3 106,-230.3"/>
+<text text-anchor="middle" x="53" y="-215.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-243.19C280.38,-238.61 258.6,-268.78 198,-243.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-244.82C414.55,-245.37 379.27,-245.38 348,-243.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-340.3C255.74,-347.05 225.83,-341.83 142,-299.3 112.64,-284.4 85.9,-256.89 69.79,-238.1"/>
+<polygon fill="#000000" stroke="#000000" points="72.46,-235.83 63.36,-230.4 67.08,-240.32 72.46,-235.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.08,-312.48C435.24,-324.21 391.37,-340.21 351.5,-340.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge8" class="edge">
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge14" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C592.57,-206.66 555.55,-217.87 528.71,-227.64"/>
-<polygon fill="#000000" stroke="#000000" points="527.45,-224.38 519.31,-231.16 529.9,-230.93 527.45,-224.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C595.15,-266.84 561.12,-276.81 534.75,-285.15"/>
+<polygon fill="#000000" stroke="#000000" points="533.5,-281.88 525.05,-288.26 535.64,-288.55 533.5,-281.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-130.19 143.5,-130.19 143.5,-106.19 250.5,-106.19 250.5,-130.19"/>
-<text text-anchor="middle" x="197" y="-115.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-114.3 298,-114.3 298,-90.3 403,-90.3 403,-114.3"/>
+<text text-anchor="middle" x="350.5" y="-99.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-123.19C318.09,-122.66 287.23,-121.68 260.94,-120.73"/>
-<polygon fill="#000000" stroke="#000000" points="260.86,-117.23 250.73,-120.35 260.6,-124.22 260.86,-117.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C517.82,-23.59 472.9,-125.57 348,-123.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-171.85C706.67,-168.31 693.82,-164.45 682,-161.3 617.73,-144.13 601.44,-140.28 536,-128.3 495.46,-120.87 449.56,-114.4 413.69,-109.76"/>
+<polygon fill="#000000" stroke="#000000" points="413.74,-106.24 403.38,-108.45 412.85,-113.19 413.74,-106.24"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-290.3 142,-290.3 142,-266.3 260,-266.3 260,-290.3"/>
+<text text-anchor="middle" x="201" y="-275.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C549.78,-209.76 460.85,-208.02 404.52,-205.91"/>
-<polygon fill="#000000" stroke="#000000" points="404.52,-202.41 394.4,-205.51 404.25,-209.4 404.52,-202.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C449.95,-262.73 442.39,-275.05 405,-279.3 356.87,-284.77 344.44,-279.55 296,-279.3 287.67,-279.25 278.93,-279.19 270.27,-279.11"/>
+<polygon fill="#000000" stroke="#000000" points="270.2,-275.61 260.17,-279.01 270.13,-282.61 270.2,-275.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-28.19 142,-28.19 142,-4.19 252,-4.19 252,-28.19"/>
-<text text-anchor="middle" x="197" y="-13.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-194.3 575.5,-194.3 575.5,-170.3 678.5,-170.3 678.5,-194.3"/>
+<text text-anchor="middle" x="627" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C411.63,5.23 321.33,-0.39 262.05,-7.06"/>
-<polygon fill="#000000" stroke="#000000" points="261.61,-3.58 252.08,-8.22 262.42,-10.54 261.61,-3.58"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C566.15,-51.25 558.44,-22.55 490.5,-9.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.1,-191.08C722.81,-167.05 678.48,-113.3 628.5,-85.19"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C578.75,-207.83 579.27,-241.69 537,-264.19 517.29,-274.69 512.42,-278.97 490.5,-283.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C424.75,-295.47 412.77,-247.72 348,-243.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-182.3C708.94,-182.3 698.85,-182.3 688.76,-182.3"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-178.8 678.72,-182.3 688.72,-185.8 688.72,-178.8"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-315.19 573,-315.19 573,-291.19 682,-291.19 682,-315.19"/>
-<text text-anchor="middle" x="627.5" y="-300.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-76.3 572,-76.3 572,-52.3 682,-52.3 682,-76.3"/>
+<text text-anchor="middle" x="627" y="-61.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M735.1,-215.46C714.04,-232.79 675.39,-264.6 650.87,-284.78"/>
-<polygon fill="#000000" stroke="#000000" points="648.64,-282.09 643.14,-291.14 653.09,-287.49 648.64,-282.09"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.57,-170.09C732.96,-150.93 710.15,-113.6 682,-90.3 677.95,-86.94 673.39,-83.89 668.68,-81.17"/>
+<polygon fill="#000000" stroke="#000000" points="670.01,-77.91 659.54,-76.32 666.73,-84.1 670.01,-77.91"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-175.19 442.5,-175.19 442.5,-151.19 536.5,-151.19 536.5,-175.19"/>
-<text text-anchor="middle" x="489.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-232.3 441.5,-232.3 441.5,-208.3 535.5,-208.3 535.5,-232.3"/>
+<text text-anchor="middle" x="488.5" y="-217.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-202.34C693.45,-201.95 658.8,-202 628.5,-204.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C589.48,-206.88 548.98,-192.24 521.89,-179.71"/>
-<polygon fill="#000000" stroke="#000000" points="523.07,-176.4 512.54,-175.23 520.05,-182.71 523.07,-176.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C588.18,-268.32 545.58,-251.57 518.18,-237.35"/>
+<polygon fill="#000000" stroke="#000000" points="519.61,-234.15 509.15,-232.47 516.28,-240.3 519.61,-234.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C566.65,-272.89 550.04,-256.36 489.5,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C461.31,-262 432.24,-261.84 407.71,-261.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.61,-257.62 397.5,-260.79 407.38,-264.62 407.61,-257.62"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-175.19 576,-175.19 576,-151.19 679,-151.19 679,-175.19"/>
-<text text-anchor="middle" x="627.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-34.3 296,-34.3 296,-10.3 405,-10.3 405,-34.3"/>
+<text text-anchor="middle" x="350.5" y="-19.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-192.58C704.62,-188.25 689.18,-183.17 674.87,-178.46"/>
-<polygon fill="#000000" stroke="#000000" points="675.78,-175.08 665.19,-175.27 673.59,-181.72 675.78,-175.08"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-60.19 294.5,-60.19 294.5,-36.19 399.5,-36.19 399.5,-60.19"/>
-<text text-anchor="middle" x="347" y="-45.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.15,-169.96C743.2,-141.89 726.88,-73.32 682,-43.3 602.41,9.95 486.48,2.8 415.19,-8.69"/>
+<polygon fill="#000000" stroke="#000000" points="414.28,-5.3 405.01,-10.42 415.45,-12.2 414.28,-5.3"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C469.48,-5.63 423.06,-20.23 388.75,-32.58"/>
-<polygon fill="#000000" stroke="#000000" points="387.17,-29.43 378.98,-36.15 389.58,-36 387.17,-29.43"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.26,-194.34C734.31,-213.94 712.01,-252.74 682,-274.3 560.34,-361.68 501.29,-339.97 351.5,-340.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-295.19 288,-295.19 288,-271.19 406,-271.19 406,-295.19"/>
-<text text-anchor="middle" x="347" y="-280.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~rmvs_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-154.3 147.5,-154.3 147.5,-130.3 254.5,-130.3 254.5,-154.3"/>
+<text text-anchor="middle" x="201" y="-139.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C465.24,-287.67 439.4,-288.75 416.29,-288.37"/>
-<polygon fill="#000000" stroke="#000000" points="416.32,-284.87 406.23,-288.11 416.14,-291.87 416.32,-284.87"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M737.88,-194.43C717.42,-213.81 673.74,-250.59 628,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C578.73,-270.32 580.83,-217.32 536,-199.3 523.49,-194.27 357.63,-167.21 264.45,-152.25"/>
+<polygon fill="#000000" stroke="#000000" points="265,-148.8 254.57,-150.67 263.89,-155.71 265,-148.8"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.12,-109.63C134.42,-108.22 125.32,-106.75 116.4,-105.3"/>
-<polygon fill="#000000" stroke="#000000" points="116.88,-101.83 106.45,-103.69 115.76,-108.74 116.88,-101.83"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.71,-92.67C268.5,-89.57 231.97,-89.66 202,-102.3"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.8,-191.02C299.41,-176.44 256.72,-151.92 227.97,-135.41"/>
-<polygon fill="#000000" stroke="#000000" points="229.58,-132.3 219.17,-130.35 226.09,-138.37 229.58,-132.3"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-114.3C289.86,-118.47 272.41,-123.2 256.31,-127.57"/>
+<polygon fill="#000000" stroke="#000000" points="255.21,-124.24 246.48,-130.23 257.05,-130.99 255.21,-124.24"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.68,-215.27C281.09,-230.11 219.52,-252.28 198,-243.19"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.45,-266.15C148.09,-256.96 117.18,-244.26 92.82,-234.25"/>
+<polygon fill="#000000" stroke="#000000" points="94.08,-230.98 83.5,-230.42 91.42,-237.46 94.08,-230.98"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-28.36C150.18,-41.68 111.63,-63.13 84.68,-78.13"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-75.22 75.67,-83.14 86.11,-81.34 82.71,-75.22"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C456.89,-135.69 423.11,-125.77 396.87,-117.46"/>
+<polygon fill="#000000" stroke="#000000" points="397.8,-114.08 387.21,-114.36 395.66,-120.75 397.8,-114.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.15,-170.24C562.83,-161.43 524.14,-149.77 489.5,-142.3"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-312.94C504.91,-323.15 384.91,-333.94 288,-304.19 241.81,-290.01 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M582.81,-194.32C570.11,-197.85 556.07,-201.76 542.82,-205.45"/>
+<polygon fill="#000000" stroke="#000000" points="541.57,-202.17 532.88,-208.22 543.45,-208.91 541.57,-202.17"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.94,-151.18C434.15,-139.69 388.95,-123.97 348,-123.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C428.42,-129.55 411.81,-146.31 351.5,-142.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C281.73,-137.78 264.59,-75.92 202,-102.3"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-175.2C431.89,-179.31 415.54,-183.97 400.37,-188.28"/>
-<polygon fill="#000000" stroke="#000000" points="399.27,-184.96 390.61,-191.06 401.19,-191.69 399.27,-184.96"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C321.76,-140.45 291.01,-140.17 264.8,-140.46"/>
+<polygon fill="#000000" stroke="#000000" points="264.57,-136.96 254.62,-140.6 264.67,-143.96 264.57,-136.96"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.45,-156.12C414.46,-153.54 378.38,-153.3 348,-163.19"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-175.3C592.17,-179.78 582.03,-185.03 573,-190.19 553.67,-201.24 532.56,-214.83 516.53,-225.49"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-222.6 508.19,-231.07 518.45,-228.41 514.56,-222.6"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.95,-58.94C488.85,-52.9 326.29,-49.91 202,-102.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C426.21,-118.74 410.43,-124.38 348,-123.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.51,-151.11C571.46,-140.37 529.04,-125.95 490.5,-123.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-232.32C431.82,-235.85 417.83,-239.76 404.63,-243.45"/>
+<polygon fill="#000000" stroke="#000000" points="403.41,-240.16 394.72,-246.22 405.29,-246.9 403.41,-240.16"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C284.51,-209.69 267.41,-222.65 202,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-218.3C172.54,-216.47 142.1,-216.19 116.16,-216.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-212.98 106.09,-216.62 116.13,-219.98 116.04,-212.98"/>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-243.19C134.83,-217.36 87.43,-150.64 66.2,-116.3"/>
-<polygon fill="#000000" stroke="#000000" points="69.07,-114.29 60.91,-107.54 63.08,-117.91 69.07,-114.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C423.74,-118.57 409.74,-143.1 348,-163.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-163.19C320.21,-171.59 312.35,-170.25 288,-182.19 244.62,-203.48 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.35,-222.28C414.93,-222.76 381.23,-222.23 351.5,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C301.31,-211.91 252.57,-180.93 224.93,-160.54"/>
+<polygon fill="#000000" stroke="#000000" points="226.82,-157.58 216.73,-154.34 222.6,-163.16 226.82,-157.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-163.19C566.43,-163.19 556.52,-163.19 546.94,-163.19"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-159.69 536.69,-163.19 546.69,-166.69 546.69,-159.69"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-246.22C289.62,-235.48 243.56,-221.06 202,-218.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.33,-151.19C591.78,-139.32 563.42,-121.23 537,-109.19 494.23,-89.71 443.42,-73.68 405.26,-62.95"/>
-<polygon fill="#000000" stroke="#000000" points="405.92,-59.5 395.34,-60.2 404.05,-66.24 405.92,-59.5"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.53,-246.24C312.31,-242.29 303.54,-237.55 296,-232.3 266.31,-211.63 236.98,-181.61 219.18,-162.01"/>
+<polygon fill="#000000" stroke="#000000" points="221.57,-159.43 212.29,-154.32 216.35,-164.1 221.57,-159.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.56,-60.23C296.31,-71.7 259.6,-89.06 232.68,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="231.15,-98.64 223.61,-106.08 234.14,-104.97 231.15,-98.64"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.74,-34.37C314.88,-38.64 304.94,-43.56 296,-48.3 253.42,-70.84 246.4,-83.58 202,-102.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-102.3C175,-112.83 164.76,-106.54 142,-121.3 110.64,-141.63 83.28,-175.83 67.7,-197.72"/>
+<polygon fill="#000000" stroke="#000000" points="64.79,-195.79 61.96,-206 70.54,-199.78 64.79,-195.79"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.47,-56.49C244.79,-64.49 169.53,-76.6 116.46,-85.14"/>
-<polygon fill="#000000" stroke="#000000" points="115.81,-81.7 106.49,-86.75 116.92,-88.61 115.81,-81.7"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_kick.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.86,-271.34C260.07,-264.7 226.69,-255.31 198,-243.19"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.87,-154.34C152.55,-166.99 114.11,-187.01 86.7,-201.27"/>
+<polygon fill="#000000" stroke="#000000" points="84.76,-198.34 77.51,-206.06 88,-204.55 84.76,-198.34"/>
 </g>
 </g>
 </svg>
@@ -615,92 +611,91 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-3"></a><span class="k">contains  </span>
 <a name="ln-4"></a>
 <a name="ln-5"></a><span class="k">   module subroutine </span><span class="n">rmvs_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-6"></a>
-<a name="ln-7"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-8"></a>      <span class="c">!!</span>
-<a name="ln-9"></a>      <span class="c">!! Compute the oblateness acceleration in the inner encounter region with planets </span>
-<a name="ln-10"></a>      <span class="c">!! </span>
-<a name="ln-11"></a>      <span class="c">!! Performs a similar task as David E. Kaufmann&#39;s Swifter routine rmvs_kick_getacch_tp.f90, but </span>
-<a name="ln-12"></a>      <span class="c">!! uses object polymorphism, and so is not directly adapted.</span>
-<a name="ln-13"></a>      <span class="k">implicit none</span>
-<a name="ln-14"></a>      <span class="c">! Arguments</span>
-<a name="ln-15"></a>      <span class="k">class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! RMVS test particle data structure</span>
-<a name="ln-16"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest central body particle data structuree </span>
-<a name="ln-17"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-18"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
-<a name="ln-19"></a>      <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Logical flag that determines whether or not this is the beginning or end of the step</span>
-<a name="ln-20"></a>      <span class="c">! Internals</span>
-<a name="ln-21"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">param_planetocen</span>
-<a name="ln-22"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,</span> <span class="p">:),</span> <span class="k">allocatable</span>    <span class="kd">::</span> <span class="n">xh_original</span>
-<a name="ln-23"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                  <span class="kd">::</span> <span class="n">GMcb_original</span>
-<a name="ln-24"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span>
-<a name="ln-25"></a>
-<a name="ln-26"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-27"></a>
-<a name="ln-28"></a><span class="k">      associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">ipleP</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">ipleP</span><span class="p">,</span> <span class="n">inner_index</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="nb">index</span><span class="p">)</span>
-<a name="ln-29"></a>         <span class="k">select type</span><span class="p">(</span><span class="nb">system</span><span class="p">)</span>
-<a name="ln-30"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">)</span>
-<a name="ln-31"></a>            <span class="k">if</span> <span class="p">(</span><span class="nb">system</span><span class="p">%</span><span class="n">lplanetocentric</span><span class="p">)</span> <span class="k">then</span>  <span class="c">! This is a close encounter step, so any accelerations requiring heliocentric position values</span>
-<a name="ln-32"></a>                                              <span class="c">! must be handeled outside the normal WHM method call</span>
-<a name="ln-33"></a>               <span class="k">select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
-<a name="ln-34"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_pl</span><span class="p">)</span>
-<a name="ln-35"></a>                  <span class="k">select type</span> <span class="p">(</span><span class="n">cb</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">cb</span><span class="p">)</span>
-<a name="ln-36"></a>                  <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_cb</span><span class="p">)</span>
-<a name="ln-37"></a>                     <span class="k">associate</span><span class="p">(</span><span class="n">xpc</span> <span class="o">=&gt;</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">xpct</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">apct</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">ah</span><span class="p">,</span> <span class="n">system_planetocen</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">)</span>
-<a name="ln-38"></a>                        <span class="n">system_planetocen</span><span class="p">%</span><span class="n">lbeg</span> <span class="o">=</span> <span class="n">lbeg</span>
-<a name="ln-39"></a>
-<a name="ln-40"></a>                        <span class="c">! Save the original heliocentric position for later</span>
-<a name="ln-41"></a>                        <span class="k">allocate</span><span class="p">(</span><span class="n">xh_original</span><span class="p">,</span> <span class="n">source</span><span class="o">=</span><span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">)</span>
-<a name="ln-42"></a>
-<a name="ln-43"></a>                        <span class="c">! Temporarily turn off the heliocentric-dependent acceleration terms during an inner encounter using a copy of the parameter list with all of the heliocentric-specific acceleration terms turned off</span>
-<a name="ln-44"></a>                        <span class="k">allocate</span><span class="p">(</span><span class="n">param_planetocen</span><span class="p">,</span> <span class="n">source</span><span class="o">=</span><span class="n">param</span><span class="p">)</span>
-<a name="ln-45"></a>                        <span class="n">param_planetocen</span><span class="p">%</span><span class="n">loblatecb</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-46"></a>                        <span class="n">param_planetocen</span><span class="p">%</span><span class="n">lextra_force</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-47"></a>                        <span class="n">param_planetocen</span><span class="p">%</span><span class="n">lgr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-48"></a>
-<a name="ln-49"></a>                        <span class="c">! Compute the planetocentric values of acceleration</span>
-<a name="ln-50"></a>                        <span class="k">call </span><span class="n">whm_kick_getacch_tp</span><span class="p">(</span><span class="n">tp</span><span class="p">,</span> <span class="n">system_planetocen</span><span class="p">,</span> <span class="n">param_planetocen</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-51"></a>
-<a name="ln-52"></a>                        <span class="c">! Now compute any heliocentric values of acceleration </span>
-<a name="ln-53"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">lfirst</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-54"></a><span class="k">                           do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-55"></a>                              <span class="n">tp</span><span class="p">%</span><span class="n">xheliocentric</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">cb</span><span class="p">%</span><span class="n">inner</span><span class="p">(</span><span class="n">inner_index</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)%</span><span class="n">x</span><span class="p">(:,</span><span class="mi">1</span><span class="p">)</span>
-<a name="ln-56"></a>                           <span class="k">end do</span>
-<a name="ln-57"></a><span class="k">                        else</span>
-<a name="ln-58"></a><span class="k">                           do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-59"></a>                              <span class="n">tp</span><span class="p">%</span><span class="n">xheliocentric</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">cb</span><span class="p">%</span><span class="n">inner</span><span class="p">(</span><span class="n">inner_index</span>    <span class="p">)%</span><span class="n">x</span><span class="p">(:,</span><span class="mi">1</span><span class="p">)</span>
-<a name="ln-60"></a>                           <span class="k">end do</span>
-<a name="ln-61"></a><span class="k">                        end if</span>
-<a name="ln-62"></a>
-<a name="ln-63"></a>                        <span class="c">! Swap the planetocentric and heliocentric position vectors and central body masses</span>
-<a name="ln-64"></a>                        <span class="k">do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-65"></a>                           <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xheliocentric</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-66"></a>                        <span class="k">end do</span>
-<a name="ln-67"></a><span class="k">                        </span><span class="n">GMcb_original</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span>
-<a name="ln-68"></a>                        <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">cb_heliocentric</span><span class="p">%</span><span class="n">Gmass</span>
-<a name="ln-69"></a>
-<a name="ln-70"></a>                        <span class="c">! If the heliocentric-specifc acceleration terms are requested, compute those now</span>
-<a name="ln-71"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">loblatecb</span><span class="p">)</span> <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel_obl</span><span class="p">(</span><span class="n">system_planetocen</span><span class="p">)</span>
-<a name="ln-72"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lextra_force</span><span class="p">)</span> <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel_user</span><span class="p">(</span><span class="n">system_planetocen</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-73"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lgr</span><span class="p">)</span> <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel_gr</span><span class="p">(</span><span class="n">param</span><span class="p">)</span>
-<a name="ln-74"></a>
-<a name="ln-75"></a>                        <span class="c">! Put everything back the way we found it</span>
-<a name="ln-76"></a>                        <span class="k">call </span><span class="nb">move_alloc</span><span class="p">(</span><span class="n">xh_original</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">)</span>
-<a name="ln-77"></a>                        <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span> <span class="o">=</span> <span class="n">GMcb_original</span>
-<a name="ln-78"></a>
-<a name="ln-79"></a>                     <span class="k">end associate</span>
-<a name="ln-80"></a><span class="k">                  end select</span>
-<a name="ln-81"></a><span class="k">               end select</span>
-<a name="ln-82"></a><span class="k">            else</span> <span class="c">! Not a close encounter, so just proceded with the standard WHM method</span>
-<a name="ln-83"></a>               <span class="k">call </span><span class="n">whm_kick_getacch_tp</span><span class="p">(</span><span class="n">tp</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-84"></a>            <span class="k">end if</span>
-<a name="ln-85"></a><span class="k">         end select</span>
-<a name="ln-86"></a><span class="k">      end associate</span>
-<a name="ln-87"></a>
-<a name="ln-88"></a><span class="k">      return</span>
-<a name="ln-89"></a><span class="k">   end subroutine </span><span class="n">rmvs_kick_getacch_tp</span>
-<a name="ln-90"></a>
-<a name="ln-91"></a><span class="k">end submodule </span><span class="n">s_rmvs_kick</span>
+<a name="ln-6"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-7"></a>      <span class="c">!!</span>
+<a name="ln-8"></a>      <span class="c">!! Compute the oblateness acceleration in the inner encounter region with planets </span>
+<a name="ln-9"></a>      <span class="c">!! </span>
+<a name="ln-10"></a>      <span class="c">!! Performs a similar task as David E. Kaufmann&#39;s Swifter routine rmvs_kick_getacch_tp.f90, but </span>
+<a name="ln-11"></a>      <span class="c">!! uses object polymorphism, and so is not directly adapted.</span>
+<a name="ln-12"></a>      <span class="k">implicit none</span>
+<a name="ln-13"></a>      <span class="c">! Arguments</span>
+<a name="ln-14"></a>      <span class="k">class</span><span class="p">(</span><span class="n">rmvs_tp</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! RMVS test particle data structure</span>
+<a name="ln-15"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest central body particle data structuree </span>
+<a name="ln-16"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-17"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
+<a name="ln-18"></a>      <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Logical flag that determines whether or not this is the beginning or end of the step</span>
+<a name="ln-19"></a>      <span class="c">! Internals</span>
+<a name="ln-20"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">param_planetocen</span>
+<a name="ln-21"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,</span> <span class="p">:),</span> <span class="k">allocatable</span>    <span class="kd">::</span> <span class="n">xh_original</span>
+<a name="ln-22"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                  <span class="kd">::</span> <span class="n">GMcb_original</span>
+<a name="ln-23"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span>
+<a name="ln-24"></a>
+<a name="ln-25"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-26"></a>
+<a name="ln-27"></a><span class="k">      associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">ipleP</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">ipleP</span><span class="p">,</span> <span class="n">inner_index</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="nb">index</span><span class="p">)</span>
+<a name="ln-28"></a>         <span class="k">select type</span><span class="p">(</span><span class="nb">system</span><span class="p">)</span>
+<a name="ln-29"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_nbody_system</span><span class="p">)</span>
+<a name="ln-30"></a>            <span class="k">if</span> <span class="p">(</span><span class="nb">system</span><span class="p">%</span><span class="n">lplanetocentric</span><span class="p">)</span> <span class="k">then</span>  <span class="c">! This is a close encounter step, so any accelerations requiring heliocentric position values</span>
+<a name="ln-31"></a>                                              <span class="c">! must be handeled outside the normal WHM method call</span>
+<a name="ln-32"></a>               <span class="k">select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
+<a name="ln-33"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_pl</span><span class="p">)</span>
+<a name="ln-34"></a>                  <span class="k">select type</span> <span class="p">(</span><span class="n">cb</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">cb</span><span class="p">)</span>
+<a name="ln-35"></a>                  <span class="k">class is</span> <span class="p">(</span><span class="n">rmvs_cb</span><span class="p">)</span>
+<a name="ln-36"></a>                     <span class="k">associate</span><span class="p">(</span><span class="n">xpc</span> <span class="o">=&gt;</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">xpct</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">apct</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">ah</span><span class="p">,</span> <span class="n">system_planetocen</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">)</span>
+<a name="ln-37"></a>                        <span class="n">system_planetocen</span><span class="p">%</span><span class="n">lbeg</span> <span class="o">=</span> <span class="n">lbeg</span>
+<a name="ln-38"></a>
+<a name="ln-39"></a>                        <span class="c">! Save the original heliocentric position for later</span>
+<a name="ln-40"></a>                        <span class="k">allocate</span><span class="p">(</span><span class="n">xh_original</span><span class="p">,</span> <span class="n">source</span><span class="o">=</span><span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">)</span>
+<a name="ln-41"></a>
+<a name="ln-42"></a>                        <span class="c">! Temporarily turn off the heliocentric-dependent acceleration terms during an inner encounter using a copy of the parameter list with all of the heliocentric-specific acceleration terms turned off</span>
+<a name="ln-43"></a>                        <span class="k">allocate</span><span class="p">(</span><span class="n">param_planetocen</span><span class="p">,</span> <span class="n">source</span><span class="o">=</span><span class="n">param</span><span class="p">)</span>
+<a name="ln-44"></a>                        <span class="n">param_planetocen</span><span class="p">%</span><span class="n">loblatecb</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-45"></a>                        <span class="n">param_planetocen</span><span class="p">%</span><span class="n">lextra_force</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-46"></a>                        <span class="n">param_planetocen</span><span class="p">%</span><span class="n">lgr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-47"></a>
+<a name="ln-48"></a>                        <span class="c">! Compute the planetocentric values of acceleration</span>
+<a name="ln-49"></a>                        <span class="k">call </span><span class="n">whm_kick_getacch_tp</span><span class="p">(</span><span class="n">tp</span><span class="p">,</span> <span class="n">system_planetocen</span><span class="p">,</span> <span class="n">param_planetocen</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-50"></a>
+<a name="ln-51"></a>                        <span class="c">! Now compute any heliocentric values of acceleration </span>
+<a name="ln-52"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">lfirst</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-53"></a><span class="k">                           do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-54"></a>                              <span class="n">tp</span><span class="p">%</span><span class="n">xheliocentric</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">cb</span><span class="p">%</span><span class="n">inner</span><span class="p">(</span><span class="n">inner_index</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)%</span><span class="n">x</span><span class="p">(:,</span><span class="mi">1</span><span class="p">)</span>
+<a name="ln-55"></a>                           <span class="k">end do</span>
+<a name="ln-56"></a><span class="k">                        else</span>
+<a name="ln-57"></a><span class="k">                           do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-58"></a>                              <span class="n">tp</span><span class="p">%</span><span class="n">xheliocentric</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">cb</span><span class="p">%</span><span class="n">inner</span><span class="p">(</span><span class="n">inner_index</span>    <span class="p">)%</span><span class="n">x</span><span class="p">(:,</span><span class="mi">1</span><span class="p">)</span>
+<a name="ln-59"></a>                           <span class="k">end do</span>
+<a name="ln-60"></a><span class="k">                        end if</span>
+<a name="ln-61"></a>
+<a name="ln-62"></a>                        <span class="c">! Swap the planetocentric and heliocentric position vectors and central body masses</span>
+<a name="ln-63"></a>                        <span class="k">do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-64"></a>                           <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xheliocentric</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span>
+<a name="ln-65"></a>                        <span class="k">end do</span>
+<a name="ln-66"></a><span class="k">                        </span><span class="n">GMcb_original</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span>
+<a name="ln-67"></a>                        <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">cb_heliocentric</span><span class="p">%</span><span class="n">Gmass</span>
+<a name="ln-68"></a>
+<a name="ln-69"></a>                        <span class="c">! If the heliocentric-specifc acceleration terms are requested, compute those now</span>
+<a name="ln-70"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">loblatecb</span><span class="p">)</span> <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel_obl</span><span class="p">(</span><span class="n">system_planetocen</span><span class="p">)</span>
+<a name="ln-71"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lextra_force</span><span class="p">)</span> <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel_user</span><span class="p">(</span><span class="n">system_planetocen</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-72"></a>                        <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lgr</span><span class="p">)</span> <span class="k">call </span><span class="n">tp</span><span class="p">%</span><span class="n">accel_gr</span><span class="p">(</span><span class="n">param</span><span class="p">)</span>
+<a name="ln-73"></a>
+<a name="ln-74"></a>                        <span class="c">! Put everything back the way we found it</span>
+<a name="ln-75"></a>                        <span class="k">call </span><span class="nb">move_alloc</span><span class="p">(</span><span class="n">xh_original</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">)</span>
+<a name="ln-76"></a>                        <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span> <span class="o">=</span> <span class="n">GMcb_original</span>
+<a name="ln-77"></a>
+<a name="ln-78"></a>                     <span class="k">end associate</span>
+<a name="ln-79"></a><span class="k">                  end select</span>
+<a name="ln-80"></a><span class="k">               end select</span>
+<a name="ln-81"></a><span class="k">            else</span> <span class="c">! Not a close encounter, so just proceded with the standard WHM method</span>
+<a name="ln-82"></a>               <span class="k">call </span><span class="n">whm_kick_getacch_tp</span><span class="p">(</span><span class="n">tp</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-83"></a>            <span class="k">end if</span>
+<a name="ln-84"></a><span class="k">         end select</span>
+<a name="ln-85"></a><span class="k">      end associate</span>
+<a name="ln-86"></a>
+<a name="ln-87"></a><span class="k">      return</span>
+<a name="ln-88"></a><span class="k">   end subroutine </span><span class="n">rmvs_kick_getacch_tp</span>
+<a name="ln-89"></a>
+<a name="ln-90"></a><span class="k">end submodule </span><span class="n">s_rmvs_kick</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/rmvs_setup.f90.html b/docs/sourcefile/rmvs_setup.f90.html
index 4978739ee..dbc4df709 100644
--- a/docs/sourcefile/rmvs_setup.f90.html
+++ b/docs/sourcefile/rmvs_setup.f90.html
@@ -226,296 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_setup.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_setupf90EfferentGraph" width="641pt" height="233pt"
- viewBox="0.00 0.00 641.00 232.61" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 327.68)">
+<svg id="sourcefilermvs_setupf90EfferentGraph" width="641pt" height="246pt"
+ viewBox="0.00 0.00 641.00 246.11" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 346.93)">
 <title>sourcefile~~rmvs_setup.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-327.68 910,-327.68 910,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-346.93 910,-346.93 910,4 -4,4"/>
 <!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_setup.f90</title>
-<polygon fill="none" stroke="black" points="906,-235.19 820,-235.19 820,-211.19 906,-211.19 906,-235.19"/>
-<text text-anchor="middle" x="863" y="-220.79" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_setup.f90</text>
+<polygon fill="none" stroke="black" points="906,-234.3 820,-234.3 820,-210.3 906,-210.3 906,-234.3"/>
+<text text-anchor="middle" x="863" y="-219.9" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_setup.f90</text>
 </g>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
 <g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-255.19 442,-255.19 442,-231.19 537,-231.19 537,-255.19"/>
-<text text-anchor="middle" x="489.5" y="-240.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-312.3 441,-312.3 441,-288.3 536,-288.3 536,-312.3"/>
+<text text-anchor="middle" x="488.5" y="-297.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.75,-225.47C752.81,-229.07 622.33,-236.1 547.29,-240.14"/>
-<polygon fill="#000000" stroke="#000000" points="546.87,-236.65 537.08,-240.69 547.25,-243.64 546.87,-236.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.19,-234.33C790.15,-246.04 732.77,-263.6 682,-274.3 636.71,-283.84 584.66,-290.62 546.11,-294.86"/>
+<polygon fill="#000000" stroke="#000000" points="545.68,-291.39 536.11,-295.94 546.43,-298.35 545.68,-291.39"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.19 718,-215.19 718,-191.19 784,-191.19 784,-215.19"/>
-<text text-anchor="middle" x="751" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-194.3 718,-194.3 718,-170.3 784,-170.3 784,-194.3"/>
+<text text-anchor="middle" x="751" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-215.52C811.34,-213.98 802.48,-212.37 794.04,-210.84"/>
-<polygon fill="#000000" stroke="#000000" points="794.48,-207.36 784.02,-209.02 793.23,-214.25 794.48,-207.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829,-210.29C817.92,-206.27 805.42,-201.72 793.77,-197.48"/>
+<polygon fill="#000000" stroke="#000000" points="794.82,-194.14 784.22,-194.01 792.43,-200.72 794.82,-194.14"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-215.19 300,-215.19 300,-191.19 394,-191.19 394,-215.19"/>
-<text text-anchor="middle" x="347" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-270.3 303.5,-270.3 303.5,-246.3 397.5,-246.3 397.5,-270.3"/>
+<text text-anchor="middle" x="350.5" y="-255.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-231.19C431.89,-227.08 415.54,-222.42 400.37,-218.1"/>
-<polygon fill="#000000" stroke="#000000" points="401.19,-214.7 390.61,-215.33 399.27,-221.43 401.19,-214.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-288.26C433.45,-283.6 416.02,-278.22 400.14,-273.32"/>
+<polygon fill="#000000" stroke="#000000" points="401.07,-269.94 390.48,-270.33 399,-276.63 401.07,-269.94"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-107.19 0,-107.19 0,-83.19 106,-83.19 106,-107.19"/>
-<text text-anchor="middle" x="53" y="-92.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-230.3 0,-230.3 0,-206.3 106,-206.3 106,-230.3"/>
+<text text-anchor="middle" x="53" y="-215.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-243.19C280.38,-238.61 258.6,-268.78 198,-243.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-244.82C414.55,-245.37 379.27,-245.38 348,-243.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-340.3C255.74,-347.05 225.83,-341.83 142,-299.3 112.64,-284.4 85.9,-256.89 69.79,-238.1"/>
+<polygon fill="#000000" stroke="#000000" points="72.46,-235.83 63.36,-230.4 67.08,-240.32 72.46,-235.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.08,-312.48C435.24,-324.21 391.37,-340.21 351.5,-340.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge8" class="edge">
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge14" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C592.57,-206.66 555.55,-217.87 528.71,-227.64"/>
-<polygon fill="#000000" stroke="#000000" points="527.45,-224.38 519.31,-231.16 529.9,-230.93 527.45,-224.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C595.15,-266.84 561.12,-276.81 534.75,-285.15"/>
+<polygon fill="#000000" stroke="#000000" points="533.5,-281.88 525.05,-288.26 535.64,-288.55 533.5,-281.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-130.19 143.5,-130.19 143.5,-106.19 250.5,-106.19 250.5,-130.19"/>
-<text text-anchor="middle" x="197" y="-115.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-114.3 298,-114.3 298,-90.3 403,-90.3 403,-114.3"/>
+<text text-anchor="middle" x="350.5" y="-99.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-123.19C318.09,-122.66 287.23,-121.68 260.94,-120.73"/>
-<polygon fill="#000000" stroke="#000000" points="260.86,-117.23 250.73,-120.35 260.6,-124.22 260.86,-117.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C517.82,-23.59 472.9,-125.57 348,-123.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-171.85C706.67,-168.31 693.82,-164.45 682,-161.3 617.73,-144.13 601.44,-140.28 536,-128.3 495.46,-120.87 449.56,-114.4 413.69,-109.76"/>
+<polygon fill="#000000" stroke="#000000" points="413.74,-106.24 403.38,-108.45 412.85,-113.19 413.74,-106.24"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-290.3 142,-290.3 142,-266.3 260,-266.3 260,-290.3"/>
+<text text-anchor="middle" x="201" y="-275.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C549.78,-209.76 460.85,-208.02 404.52,-205.91"/>
-<polygon fill="#000000" stroke="#000000" points="404.52,-202.41 394.4,-205.51 404.25,-209.4 404.52,-202.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C449.95,-262.73 442.39,-275.05 405,-279.3 356.87,-284.77 344.44,-279.55 296,-279.3 287.67,-279.25 278.93,-279.19 270.27,-279.11"/>
+<polygon fill="#000000" stroke="#000000" points="270.2,-275.61 260.17,-279.01 270.13,-282.61 270.2,-275.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-28.19 142,-28.19 142,-4.19 252,-4.19 252,-28.19"/>
-<text text-anchor="middle" x="197" y="-13.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-194.3 575.5,-194.3 575.5,-170.3 678.5,-170.3 678.5,-194.3"/>
+<text text-anchor="middle" x="627" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C411.63,5.23 321.33,-0.39 262.05,-7.06"/>
-<polygon fill="#000000" stroke="#000000" points="261.61,-3.58 252.08,-8.22 262.42,-10.54 261.61,-3.58"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C566.15,-51.25 558.44,-22.55 490.5,-9.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.1,-191.08C722.81,-167.05 678.48,-113.3 628.5,-85.19"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C578.75,-207.83 579.27,-241.69 537,-264.19 517.29,-274.69 512.42,-278.97 490.5,-283.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C424.75,-295.47 412.77,-247.72 348,-243.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-182.3C708.94,-182.3 698.85,-182.3 688.76,-182.3"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-178.8 678.72,-182.3 688.72,-185.8 688.72,-178.8"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-315.19 573,-315.19 573,-291.19 682,-291.19 682,-315.19"/>
-<text text-anchor="middle" x="627.5" y="-300.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-76.3 572,-76.3 572,-52.3 682,-52.3 682,-76.3"/>
+<text text-anchor="middle" x="627" y="-61.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M735.1,-215.46C714.04,-232.79 675.39,-264.6 650.87,-284.78"/>
-<polygon fill="#000000" stroke="#000000" points="648.64,-282.09 643.14,-291.14 653.09,-287.49 648.64,-282.09"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.57,-170.09C732.96,-150.93 710.15,-113.6 682,-90.3 677.95,-86.94 673.39,-83.89 668.68,-81.17"/>
+<polygon fill="#000000" stroke="#000000" points="670.01,-77.91 659.54,-76.32 666.73,-84.1 670.01,-77.91"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-175.19 442.5,-175.19 442.5,-151.19 536.5,-151.19 536.5,-175.19"/>
-<text text-anchor="middle" x="489.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-232.3 441.5,-232.3 441.5,-208.3 535.5,-208.3 535.5,-232.3"/>
+<text text-anchor="middle" x="488.5" y="-217.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-202.34C693.45,-201.95 658.8,-202 628.5,-204.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C589.48,-206.88 548.98,-192.24 521.89,-179.71"/>
-<polygon fill="#000000" stroke="#000000" points="523.07,-176.4 512.54,-175.23 520.05,-182.71 523.07,-176.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C588.18,-268.32 545.58,-251.57 518.18,-237.35"/>
+<polygon fill="#000000" stroke="#000000" points="519.61,-234.15 509.15,-232.47 516.28,-240.3 519.61,-234.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C566.65,-272.89 550.04,-256.36 489.5,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C461.31,-262 432.24,-261.84 407.71,-261.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.61,-257.62 397.5,-260.79 407.38,-264.62 407.61,-257.62"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-175.19 576,-175.19 576,-151.19 679,-151.19 679,-175.19"/>
-<text text-anchor="middle" x="627.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-34.3 296,-34.3 296,-10.3 405,-10.3 405,-34.3"/>
+<text text-anchor="middle" x="350.5" y="-19.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-192.58C704.62,-188.25 689.18,-183.17 674.87,-178.46"/>
-<polygon fill="#000000" stroke="#000000" points="675.78,-175.08 665.19,-175.27 673.59,-181.72 675.78,-175.08"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-60.19 294.5,-60.19 294.5,-36.19 399.5,-36.19 399.5,-60.19"/>
-<text text-anchor="middle" x="347" y="-45.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.15,-169.96C743.2,-141.89 726.88,-73.32 682,-43.3 602.41,9.95 486.48,2.8 415.19,-8.69"/>
+<polygon fill="#000000" stroke="#000000" points="414.28,-5.3 405.01,-10.42 415.45,-12.2 414.28,-5.3"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C469.48,-5.63 423.06,-20.23 388.75,-32.58"/>
-<polygon fill="#000000" stroke="#000000" points="387.17,-29.43 378.98,-36.15 389.58,-36 387.17,-29.43"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.26,-194.34C734.31,-213.94 712.01,-252.74 682,-274.3 560.34,-361.68 501.29,-339.97 351.5,-340.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-295.19 288,-295.19 288,-271.19 406,-271.19 406,-295.19"/>
-<text text-anchor="middle" x="347" y="-280.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~rmvs_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-154.3 147.5,-154.3 147.5,-130.3 254.5,-130.3 254.5,-154.3"/>
+<text text-anchor="middle" x="201" y="-139.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C465.24,-287.67 439.4,-288.75 416.29,-288.37"/>
-<polygon fill="#000000" stroke="#000000" points="416.32,-284.87 406.23,-288.11 416.14,-291.87 416.32,-284.87"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M737.88,-194.43C717.42,-213.81 673.74,-250.59 628,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C578.73,-270.32 580.83,-217.32 536,-199.3 523.49,-194.27 357.63,-167.21 264.45,-152.25"/>
+<polygon fill="#000000" stroke="#000000" points="265,-148.8 254.57,-150.67 263.89,-155.71 265,-148.8"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.12,-109.63C134.42,-108.22 125.32,-106.75 116.4,-105.3"/>
-<polygon fill="#000000" stroke="#000000" points="116.88,-101.83 106.45,-103.69 115.76,-108.74 116.88,-101.83"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.71,-92.67C268.5,-89.57 231.97,-89.66 202,-102.3"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.8,-191.02C299.41,-176.44 256.72,-151.92 227.97,-135.41"/>
-<polygon fill="#000000" stroke="#000000" points="229.58,-132.3 219.17,-130.35 226.09,-138.37 229.58,-132.3"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-114.3C289.86,-118.47 272.41,-123.2 256.31,-127.57"/>
+<polygon fill="#000000" stroke="#000000" points="255.21,-124.24 246.48,-130.23 257.05,-130.99 255.21,-124.24"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.68,-215.27C281.09,-230.11 219.52,-252.28 198,-243.19"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.45,-266.15C148.09,-256.96 117.18,-244.26 92.82,-234.25"/>
+<polygon fill="#000000" stroke="#000000" points="94.08,-230.98 83.5,-230.42 91.42,-237.46 94.08,-230.98"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-28.36C150.18,-41.68 111.63,-63.13 84.68,-78.13"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-75.22 75.67,-83.14 86.11,-81.34 82.71,-75.22"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C456.89,-135.69 423.11,-125.77 396.87,-117.46"/>
+<polygon fill="#000000" stroke="#000000" points="397.8,-114.08 387.21,-114.36 395.66,-120.75 397.8,-114.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.15,-170.24C562.83,-161.43 524.14,-149.77 489.5,-142.3"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-312.94C504.91,-323.15 384.91,-333.94 288,-304.19 241.81,-290.01 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M582.81,-194.32C570.11,-197.85 556.07,-201.76 542.82,-205.45"/>
+<polygon fill="#000000" stroke="#000000" points="541.57,-202.17 532.88,-208.22 543.45,-208.91 541.57,-202.17"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.94,-151.18C434.15,-139.69 388.95,-123.97 348,-123.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C428.42,-129.55 411.81,-146.31 351.5,-142.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C281.73,-137.78 264.59,-75.92 202,-102.3"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-175.2C431.89,-179.31 415.54,-183.97 400.37,-188.28"/>
-<polygon fill="#000000" stroke="#000000" points="399.27,-184.96 390.61,-191.06 401.19,-191.69 399.27,-184.96"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C321.76,-140.45 291.01,-140.17 264.8,-140.46"/>
+<polygon fill="#000000" stroke="#000000" points="264.57,-136.96 254.62,-140.6 264.67,-143.96 264.57,-136.96"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.45,-156.12C414.46,-153.54 378.38,-153.3 348,-163.19"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-175.3C592.17,-179.78 582.03,-185.03 573,-190.19 553.67,-201.24 532.56,-214.83 516.53,-225.49"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-222.6 508.19,-231.07 518.45,-228.41 514.56,-222.6"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.95,-58.94C488.85,-52.9 326.29,-49.91 202,-102.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C426.21,-118.74 410.43,-124.38 348,-123.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.51,-151.11C571.46,-140.37 529.04,-125.95 490.5,-123.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-232.32C431.82,-235.85 417.83,-239.76 404.63,-243.45"/>
+<polygon fill="#000000" stroke="#000000" points="403.41,-240.16 394.72,-246.22 405.29,-246.9 403.41,-240.16"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C284.51,-209.69 267.41,-222.65 202,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-218.3C172.54,-216.47 142.1,-216.19 116.16,-216.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-212.98 106.09,-216.62 116.13,-219.98 116.04,-212.98"/>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-243.19C134.83,-217.36 87.43,-150.64 66.2,-116.3"/>
-<polygon fill="#000000" stroke="#000000" points="69.07,-114.29 60.91,-107.54 63.08,-117.91 69.07,-114.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C423.74,-118.57 409.74,-143.1 348,-163.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-163.19C320.21,-171.59 312.35,-170.25 288,-182.19 244.62,-203.48 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.35,-222.28C414.93,-222.76 381.23,-222.23 351.5,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C301.31,-211.91 252.57,-180.93 224.93,-160.54"/>
+<polygon fill="#000000" stroke="#000000" points="226.82,-157.58 216.73,-154.34 222.6,-163.16 226.82,-157.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-163.19C566.43,-163.19 556.52,-163.19 546.94,-163.19"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-159.69 536.69,-163.19 546.69,-166.69 546.69,-159.69"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-246.22C289.62,-235.48 243.56,-221.06 202,-218.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.33,-151.19C591.78,-139.32 563.42,-121.23 537,-109.19 494.23,-89.71 443.42,-73.68 405.26,-62.95"/>
-<polygon fill="#000000" stroke="#000000" points="405.92,-59.5 395.34,-60.2 404.05,-66.24 405.92,-59.5"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.53,-246.24C312.31,-242.29 303.54,-237.55 296,-232.3 266.31,-211.63 236.98,-181.61 219.18,-162.01"/>
+<polygon fill="#000000" stroke="#000000" points="221.57,-159.43 212.29,-154.32 216.35,-164.1 221.57,-159.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.56,-60.23C296.31,-71.7 259.6,-89.06 232.68,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="231.15,-98.64 223.61,-106.08 234.14,-104.97 231.15,-98.64"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.74,-34.37C314.88,-38.64 304.94,-43.56 296,-48.3 253.42,-70.84 246.4,-83.58 202,-102.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-102.3C175,-112.83 164.76,-106.54 142,-121.3 110.64,-141.63 83.28,-175.83 67.7,-197.72"/>
+<polygon fill="#000000" stroke="#000000" points="64.79,-195.79 61.96,-206 70.54,-199.78 64.79,-195.79"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.47,-56.49C244.79,-64.49 169.53,-76.6 116.46,-85.14"/>
-<polygon fill="#000000" stroke="#000000" points="115.81,-81.7 106.49,-86.75 116.92,-88.61 115.81,-81.7"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_setup.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.86,-271.34C260.07,-264.7 226.69,-255.31 198,-243.19"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.87,-154.34C152.55,-166.99 114.11,-187.01 86.7,-201.27"/>
+<polygon fill="#000000" stroke="#000000" points="84.76,-198.34 77.51,-206.06 88,-204.55 84.76,-198.34"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/rmvs_step.f90.html b/docs/sourcefile/rmvs_step.f90.html
index db20b4267..cf5a6e96c 100644
--- a/docs/sourcefile/rmvs_step.f90.html
+++ b/docs/sourcefile/rmvs_step.f90.html
@@ -226,296 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_step.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_stepf90EfferentGraph" width="641pt" height="234pt"
- viewBox="0.00 0.00 641.00 234.15" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 327.68)">
+<svg id="sourcefilermvs_stepf90EfferentGraph" width="641pt" height="248pt"
+ viewBox="0.00 0.00 641.00 247.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 346.93)">
 <title>sourcefile~~rmvs_step.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-327.68 904,-327.68 904,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-346.93 904,-346.93 904,4 -4,4"/>
 <!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_step.f90</title>
-<polygon fill="none" stroke="black" points="900,-235.19 820,-235.19 820,-211.19 900,-211.19 900,-235.19"/>
-<text text-anchor="middle" x="860" y="-220.79" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_step.f90</text>
+<polygon fill="none" stroke="black" points="900,-234.3 820,-234.3 820,-210.3 900,-210.3 900,-234.3"/>
+<text text-anchor="middle" x="860" y="-219.9" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_step.f90</text>
 </g>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
 <g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-255.19 442,-255.19 442,-231.19 537,-231.19 537,-255.19"/>
-<text text-anchor="middle" x="489.5" y="-240.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-312.3 441,-312.3 441,-288.3 536,-288.3 536,-312.3"/>
+<text text-anchor="middle" x="488.5" y="-297.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.91,-225.32C754.63,-228.86 623.15,-235.99 547.53,-240.1"/>
-<polygon fill="#000000" stroke="#000000" points="547.04,-236.62 537.24,-240.66 547.42,-243.61 547.04,-236.62"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M823.81,-234.35C788.38,-246.08 731.96,-263.65 682,-274.3 636.74,-283.94 584.68,-290.72 546.12,-294.93"/>
+<polygon fill="#000000" stroke="#000000" points="545.7,-291.46 536.13,-296 546.44,-298.42 545.7,-291.46"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.19 718,-215.19 718,-191.19 784,-191.19 784,-215.19"/>
-<text text-anchor="middle" x="751" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-194.3 718,-194.3 718,-170.3 784,-170.3 784,-194.3"/>
+<text text-anchor="middle" x="751" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.76,-215.86C811.45,-214.31 802.65,-212.66 794.23,-211.09"/>
-<polygon fill="#000000" stroke="#000000" points="794.69,-207.61 784.22,-209.22 793.4,-214.49 794.69,-207.61"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.9,-210.29C816.42,-206.38 804.64,-201.97 793.57,-197.84"/>
+<polygon fill="#000000" stroke="#000000" points="794.67,-194.51 784.08,-194.29 792.22,-201.07 794.67,-194.51"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-215.19 300,-215.19 300,-191.19 394,-191.19 394,-215.19"/>
-<text text-anchor="middle" x="347" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-270.3 303.5,-270.3 303.5,-246.3 397.5,-246.3 397.5,-270.3"/>
+<text text-anchor="middle" x="350.5" y="-255.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-231.19C431.89,-227.08 415.54,-222.42 400.37,-218.1"/>
-<polygon fill="#000000" stroke="#000000" points="401.19,-214.7 390.61,-215.33 399.27,-221.43 401.19,-214.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-288.26C433.45,-283.6 416.02,-278.22 400.14,-273.32"/>
+<polygon fill="#000000" stroke="#000000" points="401.07,-269.94 390.48,-270.33 399,-276.63 401.07,-269.94"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-107.19 0,-107.19 0,-83.19 106,-83.19 106,-107.19"/>
-<text text-anchor="middle" x="53" y="-92.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-230.3 0,-230.3 0,-206.3 106,-206.3 106,-230.3"/>
+<text text-anchor="middle" x="53" y="-215.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-243.19C280.38,-238.61 258.6,-268.78 198,-243.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-244.82C414.55,-245.37 379.27,-245.38 348,-243.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-340.3C255.74,-347.05 225.83,-341.83 142,-299.3 112.64,-284.4 85.9,-256.89 69.79,-238.1"/>
+<polygon fill="#000000" stroke="#000000" points="72.46,-235.83 63.36,-230.4 67.08,-240.32 72.46,-235.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.08,-312.48C435.24,-324.21 391.37,-340.21 351.5,-340.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge8" class="edge">
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge14" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C592.57,-206.66 555.55,-217.87 528.71,-227.64"/>
-<polygon fill="#000000" stroke="#000000" points="527.45,-224.38 519.31,-231.16 529.9,-230.93 527.45,-224.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C595.15,-266.84 561.12,-276.81 534.75,-285.15"/>
+<polygon fill="#000000" stroke="#000000" points="533.5,-281.88 525.05,-288.26 535.64,-288.55 533.5,-281.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-130.19 143.5,-130.19 143.5,-106.19 250.5,-106.19 250.5,-130.19"/>
-<text text-anchor="middle" x="197" y="-115.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-114.3 298,-114.3 298,-90.3 403,-90.3 403,-114.3"/>
+<text text-anchor="middle" x="350.5" y="-99.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-123.19C318.09,-122.66 287.23,-121.68 260.94,-120.73"/>
-<polygon fill="#000000" stroke="#000000" points="260.86,-117.23 250.73,-120.35 260.6,-124.22 260.86,-117.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C517.82,-23.59 472.9,-125.57 348,-123.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-171.85C706.67,-168.31 693.82,-164.45 682,-161.3 617.73,-144.13 601.44,-140.28 536,-128.3 495.46,-120.87 449.56,-114.4 413.69,-109.76"/>
+<polygon fill="#000000" stroke="#000000" points="413.74,-106.24 403.38,-108.45 412.85,-113.19 413.74,-106.24"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-290.3 142,-290.3 142,-266.3 260,-266.3 260,-290.3"/>
+<text text-anchor="middle" x="201" y="-275.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C549.78,-209.76 460.85,-208.02 404.52,-205.91"/>
-<polygon fill="#000000" stroke="#000000" points="404.52,-202.41 394.4,-205.51 404.25,-209.4 404.52,-202.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C449.95,-262.73 442.39,-275.05 405,-279.3 356.87,-284.77 344.44,-279.55 296,-279.3 287.67,-279.25 278.93,-279.19 270.27,-279.11"/>
+<polygon fill="#000000" stroke="#000000" points="270.2,-275.61 260.17,-279.01 270.13,-282.61 270.2,-275.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-28.19 142,-28.19 142,-4.19 252,-4.19 252,-28.19"/>
-<text text-anchor="middle" x="197" y="-13.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-194.3 575.5,-194.3 575.5,-170.3 678.5,-170.3 678.5,-194.3"/>
+<text text-anchor="middle" x="627" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C411.63,5.23 321.33,-0.39 262.05,-7.06"/>
-<polygon fill="#000000" stroke="#000000" points="261.61,-3.58 252.08,-8.22 262.42,-10.54 261.61,-3.58"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C566.15,-51.25 558.44,-22.55 490.5,-9.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.1,-191.08C722.81,-167.05 678.48,-113.3 628.5,-85.19"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C578.75,-207.83 579.27,-241.69 537,-264.19 517.29,-274.69 512.42,-278.97 490.5,-283.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C424.75,-295.47 412.77,-247.72 348,-243.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-182.3C708.94,-182.3 698.85,-182.3 688.76,-182.3"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-178.8 678.72,-182.3 688.72,-185.8 688.72,-178.8"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-315.19 573,-315.19 573,-291.19 682,-291.19 682,-315.19"/>
-<text text-anchor="middle" x="627.5" y="-300.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-76.3 572,-76.3 572,-52.3 682,-52.3 682,-76.3"/>
+<text text-anchor="middle" x="627" y="-61.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M735.1,-215.46C714.04,-232.79 675.39,-264.6 650.87,-284.78"/>
-<polygon fill="#000000" stroke="#000000" points="648.64,-282.09 643.14,-291.14 653.09,-287.49 648.64,-282.09"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.57,-170.09C732.96,-150.93 710.15,-113.6 682,-90.3 677.95,-86.94 673.39,-83.89 668.68,-81.17"/>
+<polygon fill="#000000" stroke="#000000" points="670.01,-77.91 659.54,-76.32 666.73,-84.1 670.01,-77.91"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-175.19 442.5,-175.19 442.5,-151.19 536.5,-151.19 536.5,-175.19"/>
-<text text-anchor="middle" x="489.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-232.3 441.5,-232.3 441.5,-208.3 535.5,-208.3 535.5,-232.3"/>
+<text text-anchor="middle" x="488.5" y="-217.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-202.34C693.45,-201.95 658.8,-202 628.5,-204.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C589.48,-206.88 548.98,-192.24 521.89,-179.71"/>
-<polygon fill="#000000" stroke="#000000" points="523.07,-176.4 512.54,-175.23 520.05,-182.71 523.07,-176.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C588.18,-268.32 545.58,-251.57 518.18,-237.35"/>
+<polygon fill="#000000" stroke="#000000" points="519.61,-234.15 509.15,-232.47 516.28,-240.3 519.61,-234.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C566.65,-272.89 550.04,-256.36 489.5,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C461.31,-262 432.24,-261.84 407.71,-261.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.61,-257.62 397.5,-260.79 407.38,-264.62 407.61,-257.62"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-175.19 576,-175.19 576,-151.19 679,-151.19 679,-175.19"/>
-<text text-anchor="middle" x="627.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-34.3 296,-34.3 296,-10.3 405,-10.3 405,-34.3"/>
+<text text-anchor="middle" x="350.5" y="-19.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-192.58C704.62,-188.25 689.18,-183.17 674.87,-178.46"/>
-<polygon fill="#000000" stroke="#000000" points="675.78,-175.08 665.19,-175.27 673.59,-181.72 675.78,-175.08"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-60.19 294.5,-60.19 294.5,-36.19 399.5,-36.19 399.5,-60.19"/>
-<text text-anchor="middle" x="347" y="-45.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.15,-169.96C743.2,-141.89 726.88,-73.32 682,-43.3 602.41,9.95 486.48,2.8 415.19,-8.69"/>
+<polygon fill="#000000" stroke="#000000" points="414.28,-5.3 405.01,-10.42 415.45,-12.2 414.28,-5.3"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C469.48,-5.63 423.06,-20.23 388.75,-32.58"/>
-<polygon fill="#000000" stroke="#000000" points="387.17,-29.43 378.98,-36.15 389.58,-36 387.17,-29.43"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.26,-194.34C734.31,-213.94 712.01,-252.74 682,-274.3 560.34,-361.68 501.29,-339.97 351.5,-340.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-295.19 288,-295.19 288,-271.19 406,-271.19 406,-295.19"/>
-<text text-anchor="middle" x="347" y="-280.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~rmvs_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-154.3 147.5,-154.3 147.5,-130.3 254.5,-130.3 254.5,-154.3"/>
+<text text-anchor="middle" x="201" y="-139.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C465.24,-287.67 439.4,-288.75 416.29,-288.37"/>
-<polygon fill="#000000" stroke="#000000" points="416.32,-284.87 406.23,-288.11 416.14,-291.87 416.32,-284.87"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M737.88,-194.43C717.42,-213.81 673.74,-250.59 628,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C578.73,-270.32 580.83,-217.32 536,-199.3 523.49,-194.27 357.63,-167.21 264.45,-152.25"/>
+<polygon fill="#000000" stroke="#000000" points="265,-148.8 254.57,-150.67 263.89,-155.71 265,-148.8"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.12,-109.63C134.42,-108.22 125.32,-106.75 116.4,-105.3"/>
-<polygon fill="#000000" stroke="#000000" points="116.88,-101.83 106.45,-103.69 115.76,-108.74 116.88,-101.83"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.71,-92.67C268.5,-89.57 231.97,-89.66 202,-102.3"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.8,-191.02C299.41,-176.44 256.72,-151.92 227.97,-135.41"/>
-<polygon fill="#000000" stroke="#000000" points="229.58,-132.3 219.17,-130.35 226.09,-138.37 229.58,-132.3"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-114.3C289.86,-118.47 272.41,-123.2 256.31,-127.57"/>
+<polygon fill="#000000" stroke="#000000" points="255.21,-124.24 246.48,-130.23 257.05,-130.99 255.21,-124.24"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.68,-215.27C281.09,-230.11 219.52,-252.28 198,-243.19"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.45,-266.15C148.09,-256.96 117.18,-244.26 92.82,-234.25"/>
+<polygon fill="#000000" stroke="#000000" points="94.08,-230.98 83.5,-230.42 91.42,-237.46 94.08,-230.98"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-28.36C150.18,-41.68 111.63,-63.13 84.68,-78.13"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-75.22 75.67,-83.14 86.11,-81.34 82.71,-75.22"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C456.89,-135.69 423.11,-125.77 396.87,-117.46"/>
+<polygon fill="#000000" stroke="#000000" points="397.8,-114.08 387.21,-114.36 395.66,-120.75 397.8,-114.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.15,-170.24C562.83,-161.43 524.14,-149.77 489.5,-142.3"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-312.94C504.91,-323.15 384.91,-333.94 288,-304.19 241.81,-290.01 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M582.81,-194.32C570.11,-197.85 556.07,-201.76 542.82,-205.45"/>
+<polygon fill="#000000" stroke="#000000" points="541.57,-202.17 532.88,-208.22 543.45,-208.91 541.57,-202.17"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.94,-151.18C434.15,-139.69 388.95,-123.97 348,-123.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C428.42,-129.55 411.81,-146.31 351.5,-142.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C281.73,-137.78 264.59,-75.92 202,-102.3"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-175.2C431.89,-179.31 415.54,-183.97 400.37,-188.28"/>
-<polygon fill="#000000" stroke="#000000" points="399.27,-184.96 390.61,-191.06 401.19,-191.69 399.27,-184.96"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C321.76,-140.45 291.01,-140.17 264.8,-140.46"/>
+<polygon fill="#000000" stroke="#000000" points="264.57,-136.96 254.62,-140.6 264.67,-143.96 264.57,-136.96"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.45,-156.12C414.46,-153.54 378.38,-153.3 348,-163.19"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-175.3C592.17,-179.78 582.03,-185.03 573,-190.19 553.67,-201.24 532.56,-214.83 516.53,-225.49"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-222.6 508.19,-231.07 518.45,-228.41 514.56,-222.6"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.95,-58.94C488.85,-52.9 326.29,-49.91 202,-102.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C426.21,-118.74 410.43,-124.38 348,-123.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.51,-151.11C571.46,-140.37 529.04,-125.95 490.5,-123.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-232.32C431.82,-235.85 417.83,-239.76 404.63,-243.45"/>
+<polygon fill="#000000" stroke="#000000" points="403.41,-240.16 394.72,-246.22 405.29,-246.9 403.41,-240.16"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C284.51,-209.69 267.41,-222.65 202,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-218.3C172.54,-216.47 142.1,-216.19 116.16,-216.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-212.98 106.09,-216.62 116.13,-219.98 116.04,-212.98"/>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-243.19C134.83,-217.36 87.43,-150.64 66.2,-116.3"/>
-<polygon fill="#000000" stroke="#000000" points="69.07,-114.29 60.91,-107.54 63.08,-117.91 69.07,-114.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C423.74,-118.57 409.74,-143.1 348,-163.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-163.19C320.21,-171.59 312.35,-170.25 288,-182.19 244.62,-203.48 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.35,-222.28C414.93,-222.76 381.23,-222.23 351.5,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C301.31,-211.91 252.57,-180.93 224.93,-160.54"/>
+<polygon fill="#000000" stroke="#000000" points="226.82,-157.58 216.73,-154.34 222.6,-163.16 226.82,-157.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-163.19C566.43,-163.19 556.52,-163.19 546.94,-163.19"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-159.69 536.69,-163.19 546.69,-166.69 546.69,-159.69"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-246.22C289.62,-235.48 243.56,-221.06 202,-218.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.33,-151.19C591.78,-139.32 563.42,-121.23 537,-109.19 494.23,-89.71 443.42,-73.68 405.26,-62.95"/>
-<polygon fill="#000000" stroke="#000000" points="405.92,-59.5 395.34,-60.2 404.05,-66.24 405.92,-59.5"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.53,-246.24C312.31,-242.29 303.54,-237.55 296,-232.3 266.31,-211.63 236.98,-181.61 219.18,-162.01"/>
+<polygon fill="#000000" stroke="#000000" points="221.57,-159.43 212.29,-154.32 216.35,-164.1 221.57,-159.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.56,-60.23C296.31,-71.7 259.6,-89.06 232.68,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="231.15,-98.64 223.61,-106.08 234.14,-104.97 231.15,-98.64"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.74,-34.37C314.88,-38.64 304.94,-43.56 296,-48.3 253.42,-70.84 246.4,-83.58 202,-102.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-102.3C175,-112.83 164.76,-106.54 142,-121.3 110.64,-141.63 83.28,-175.83 67.7,-197.72"/>
+<polygon fill="#000000" stroke="#000000" points="64.79,-195.79 61.96,-206 70.54,-199.78 64.79,-195.79"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.47,-56.49C244.79,-64.49 169.53,-76.6 116.46,-85.14"/>
-<polygon fill="#000000" stroke="#000000" points="115.81,-81.7 106.49,-86.75 116.92,-88.61 115.81,-81.7"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_step.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.86,-271.34C260.07,-264.7 226.69,-255.31 198,-243.19"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.87,-154.34C152.55,-166.99 114.11,-187.01 86.7,-201.27"/>
+<polygon fill="#000000" stroke="#000000" points="84.76,-198.34 77.51,-206.06 88,-204.55 84.76,-198.34"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/rmvs_util.f90.html b/docs/sourcefile/rmvs_util.f90.html
index 78ecff095..a7fc7ed75 100644
--- a/docs/sourcefile/rmvs_util.f90.html
+++ b/docs/sourcefile/rmvs_util.f90.html
@@ -226,296 +226,292 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~rmvs_util.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilermvs_utilf90EfferentGraph" width="641pt" height="236pt"
- viewBox="0.00 0.00 641.00 235.97" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 327.68)">
+<svg id="sourcefilermvs_utilf90EfferentGraph" width="641pt" height="250pt"
+ viewBox="0.00 0.00 641.00 249.66" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 346.93)">
 <title>sourcefile~~rmvs_util.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-327.68 897,-327.68 897,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-346.93 897,-346.93 897,4 -4,4"/>
 <!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~rmvs_util.f90</title>
-<polygon fill="none" stroke="black" points="893,-235.19 820,-235.19 820,-211.19 893,-211.19 893,-235.19"/>
-<text text-anchor="middle" x="856.5" y="-220.79" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util.f90</text>
+<polygon fill="none" stroke="black" points="893,-234.3 820,-234.3 820,-210.3 893,-210.3 893,-234.3"/>
+<text text-anchor="middle" x="856.5" y="-219.9" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_util.f90</text>
 </g>
 <!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~rmvs_classes.f90</title>
 <g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-255.19 442,-255.19 442,-231.19 537,-231.19 537,-255.19"/>
-<text text-anchor="middle" x="489.5" y="-240.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-312.3 441,-312.3 441,-288.3 536,-288.3 536,-312.3"/>
+<text text-anchor="middle" x="488.5" y="-297.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.84,-225.15C756.45,-228.62 623.68,-235.9 547.49,-240.07"/>
-<polygon fill="#000000" stroke="#000000" points="546.92,-236.6 537.13,-240.64 547.31,-243.59 546.92,-236.6"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M821.02,-234.38C786.31,-246.13 731.02,-263.71 682,-274.3 636.76,-284.07 584.71,-290.83 546.14,-295.01"/>
+<polygon fill="#000000" stroke="#000000" points="545.72,-291.53 536.14,-296.07 546.45,-298.5 545.72,-291.53"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.19 718,-215.19 718,-191.19 784,-191.19 784,-215.19"/>
-<text text-anchor="middle" x="751" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-194.3 718,-194.3 718,-170.3 784,-170.3 784,-194.3"/>
+<text text-anchor="middle" x="751" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.88,-216.31C811.56,-214.7 802.62,-212.98 794.05,-211.32"/>
-<polygon fill="#000000" stroke="#000000" points="794.7,-207.88 784.21,-209.42 793.37,-214.75 794.7,-207.88"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M824.45,-210.29C814.51,-206.45 803.35,-202.14 792.83,-198.07"/>
+<polygon fill="#000000" stroke="#000000" points="793.98,-194.77 783.39,-194.43 791.46,-201.3 793.98,-194.77"/>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-215.19 300,-215.19 300,-191.19 394,-191.19 394,-215.19"/>
-<text text-anchor="middle" x="347" y="-200.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-270.3 303.5,-270.3 303.5,-246.3 397.5,-246.3 397.5,-270.3"/>
+<text text-anchor="middle" x="350.5" y="-255.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-231.19C431.89,-227.08 415.54,-222.42 400.37,-218.1"/>
-<polygon fill="#000000" stroke="#000000" points="401.19,-214.7 390.61,-215.33 399.27,-221.43 401.19,-214.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-288.26C433.45,-283.6 416.02,-278.22 400.14,-273.32"/>
+<polygon fill="#000000" stroke="#000000" points="401.07,-269.94 390.48,-270.33 399,-276.63 401.07,-269.94"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-107.19 0,-107.19 0,-83.19 106,-83.19 106,-107.19"/>
-<text text-anchor="middle" x="53" y="-92.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-230.3 0,-230.3 0,-206.3 106,-206.3 106,-230.3"/>
+<text text-anchor="middle" x="53" y="-215.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-243.19C280.38,-238.61 258.6,-268.78 198,-243.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.93,-244.82C414.55,-245.37 379.27,-245.38 348,-243.19"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-340.3C255.74,-347.05 225.83,-341.83 142,-299.3 112.64,-284.4 85.9,-256.89 69.79,-238.1"/>
+<polygon fill="#000000" stroke="#000000" points="72.46,-235.83 63.36,-230.4 67.08,-240.32 72.46,-235.83"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.08,-312.48C435.24,-324.21 391.37,-340.21 351.5,-340.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge8" class="edge">
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge14" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C592.57,-206.66 555.55,-217.87 528.71,-227.64"/>
-<polygon fill="#000000" stroke="#000000" points="527.45,-224.38 519.31,-231.16 529.9,-230.93 527.45,-224.38"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C595.15,-266.84 561.12,-276.81 534.75,-285.15"/>
+<polygon fill="#000000" stroke="#000000" points="533.5,-281.88 525.05,-288.26 535.64,-288.55 533.5,-281.88"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-130.19 143.5,-130.19 143.5,-106.19 250.5,-106.19 250.5,-130.19"/>
-<text text-anchor="middle" x="197" y="-115.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-114.3 298,-114.3 298,-90.3 403,-90.3 403,-114.3"/>
+<text text-anchor="middle" x="350.5" y="-99.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-123.19C318.09,-122.66 287.23,-121.68 260.94,-120.73"/>
-<polygon fill="#000000" stroke="#000000" points="260.86,-117.23 250.73,-120.35 260.6,-124.22 260.86,-117.23"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C517.82,-23.59 472.9,-125.57 348,-123.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-171.85C706.67,-168.31 693.82,-164.45 682,-161.3 617.73,-144.13 601.44,-140.28 536,-128.3 495.46,-120.87 449.56,-114.4 413.69,-109.76"/>
+<polygon fill="#000000" stroke="#000000" points="413.74,-106.24 403.38,-108.45 412.85,-113.19 413.74,-106.24"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node5" class="node">
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-290.3 142,-290.3 142,-266.3 260,-266.3 260,-290.3"/>
+<text text-anchor="middle" x="201" y="-275.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C549.78,-209.76 460.85,-208.02 404.52,-205.91"/>
-<polygon fill="#000000" stroke="#000000" points="404.52,-202.41 394.4,-205.51 404.25,-209.4 404.52,-202.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C449.95,-262.73 442.39,-275.05 405,-279.3 356.87,-284.77 344.44,-279.55 296,-279.3 287.67,-279.25 278.93,-279.19 270.27,-279.11"/>
+<polygon fill="#000000" stroke="#000000" points="270.2,-275.61 260.17,-279.01 270.13,-282.61 270.2,-275.61"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-28.19 142,-28.19 142,-4.19 252,-4.19 252,-28.19"/>
-<text text-anchor="middle" x="197" y="-13.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-194.3 575.5,-194.3 575.5,-170.3 678.5,-170.3 678.5,-194.3"/>
+<text text-anchor="middle" x="627" y="-179.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C411.63,5.23 321.33,-0.39 262.05,-7.06"/>
-<polygon fill="#000000" stroke="#000000" points="261.61,-3.58 252.08,-8.22 262.42,-10.54 261.61,-3.58"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-85.19C566.15,-51.25 558.44,-22.55 490.5,-9.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.1,-191.08C722.81,-167.05 678.48,-113.3 628.5,-85.19"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C578.75,-207.83 579.27,-241.69 537,-264.19 517.29,-274.69 512.42,-278.97 490.5,-283.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C424.75,-295.47 412.77,-247.72 348,-243.19"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-182.3C708.94,-182.3 698.85,-182.3 688.76,-182.3"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-178.8 678.72,-182.3 688.72,-185.8 688.72,-178.8"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-315.19 573,-315.19 573,-291.19 682,-291.19 682,-315.19"/>
-<text text-anchor="middle" x="627.5" y="-300.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-76.3 572,-76.3 572,-52.3 682,-52.3 682,-76.3"/>
+<text text-anchor="middle" x="627" y="-61.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M735.1,-215.46C714.04,-232.79 675.39,-264.6 650.87,-284.78"/>
-<polygon fill="#000000" stroke="#000000" points="648.64,-282.09 643.14,-291.14 653.09,-287.49 648.64,-282.09"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.57,-170.09C732.96,-150.93 710.15,-113.6 682,-90.3 677.95,-86.94 673.39,-83.89 668.68,-81.17"/>
+<polygon fill="#000000" stroke="#000000" points="670.01,-77.91 659.54,-76.32 666.73,-84.1 670.01,-77.91"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-175.19 442.5,-175.19 442.5,-151.19 536.5,-151.19 536.5,-175.19"/>
-<text text-anchor="middle" x="489.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-232.3 441.5,-232.3 441.5,-208.3 535.5,-208.3 535.5,-232.3"/>
+<text text-anchor="middle" x="488.5" y="-217.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-202.34C693.45,-201.95 658.8,-202 628.5,-204.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-204.19C589.48,-206.88 548.98,-192.24 521.89,-179.71"/>
-<polygon fill="#000000" stroke="#000000" points="523.07,-176.4 512.54,-175.23 520.05,-182.71 523.07,-176.4"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C588.18,-268.32 545.58,-251.57 518.18,-237.35"/>
+<polygon fill="#000000" stroke="#000000" points="519.61,-234.15 509.15,-232.47 516.28,-240.3 519.61,-234.15"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C566.65,-272.89 550.04,-256.36 489.5,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-260.3C461.31,-262 432.24,-261.84 407.71,-261.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.61,-257.62 397.5,-260.79 407.38,-264.62 407.61,-257.62"/>
+</g>
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-175.19 576,-175.19 576,-151.19 679,-151.19 679,-175.19"/>
-<text text-anchor="middle" x="627.5" y="-160.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-34.3 296,-34.3 296,-10.3 405,-10.3 405,-34.3"/>
+<text text-anchor="middle" x="350.5" y="-19.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-192.58C704.62,-188.25 689.18,-183.17 674.87,-178.46"/>
-<polygon fill="#000000" stroke="#000000" points="675.78,-175.08 665.19,-175.27 673.59,-181.72 675.78,-175.08"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-60.19 294.5,-60.19 294.5,-36.19 399.5,-36.19 399.5,-60.19"/>
-<text text-anchor="middle" x="347" y="-45.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M748.15,-169.96C743.2,-141.89 726.88,-73.32 682,-43.3 602.41,9.95 486.48,2.8 415.19,-8.69"/>
+<polygon fill="#000000" stroke="#000000" points="414.28,-5.3 405.01,-10.42 415.45,-12.2 414.28,-5.3"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-9.19C469.48,-5.63 423.06,-20.23 388.75,-32.58"/>
-<polygon fill="#000000" stroke="#000000" points="387.17,-29.43 378.98,-36.15 389.58,-36 387.17,-29.43"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge12" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.26,-194.34C734.31,-213.94 712.01,-252.74 682,-274.3 560.34,-361.68 501.29,-339.97 351.5,-340.3"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-295.19 288,-295.19 288,-271.19 406,-271.19 406,-295.19"/>
-<text text-anchor="middle" x="347" y="-280.79" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~rmvs_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-154.3 147.5,-154.3 147.5,-130.3 254.5,-130.3 254.5,-154.3"/>
+<text text-anchor="middle" x="201" y="-139.9" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-283.19C465.24,-287.67 439.4,-288.75 416.29,-288.37"/>
-<polygon fill="#000000" stroke="#000000" points="416.32,-284.87 406.23,-288.11 416.14,-291.87 416.32,-284.87"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M737.88,-194.43C717.42,-213.81 673.74,-250.59 628,-260.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-260.3C578.73,-270.32 580.83,-217.32 536,-199.3 523.49,-194.27 357.63,-167.21 264.45,-152.25"/>
+<polygon fill="#000000" stroke="#000000" points="265,-148.8 254.57,-150.67 263.89,-155.71 265,-148.8"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.12,-109.63C134.42,-108.22 125.32,-106.75 116.4,-105.3"/>
-<polygon fill="#000000" stroke="#000000" points="116.88,-101.83 106.45,-103.69 115.76,-108.74 116.88,-101.83"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.71,-92.67C268.5,-89.57 231.97,-89.66 202,-102.3"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.8,-191.02C299.41,-176.44 256.72,-151.92 227.97,-135.41"/>
-<polygon fill="#000000" stroke="#000000" points="229.58,-132.3 219.17,-130.35 226.09,-138.37 229.58,-132.3"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-114.3C289.86,-118.47 272.41,-123.2 256.31,-127.57"/>
+<polygon fill="#000000" stroke="#000000" points="255.21,-124.24 246.48,-130.23 257.05,-130.99 255.21,-124.24"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.68,-215.27C281.09,-230.11 219.52,-252.28 198,-243.19"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.45,-266.15C148.09,-256.96 117.18,-244.26 92.82,-234.25"/>
+<polygon fill="#000000" stroke="#000000" points="94.08,-230.98 83.5,-230.42 91.42,-237.46 94.08,-230.98"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.12,-28.36C150.18,-41.68 111.63,-63.13 84.68,-78.13"/>
-<polygon fill="#000000" stroke="#000000" points="82.71,-75.22 75.67,-83.14 86.11,-81.34 82.71,-75.22"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C456.89,-135.69 423.11,-125.77 396.87,-117.46"/>
+<polygon fill="#000000" stroke="#000000" points="397.8,-114.08 387.21,-114.36 395.66,-120.75 397.8,-114.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.15,-170.24C562.83,-161.43 524.14,-149.77 489.5,-142.3"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.89,-312.94C504.91,-323.15 384.91,-333.94 288,-304.19 241.81,-290.01 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M582.81,-194.32C570.11,-197.85 556.07,-201.76 542.82,-205.45"/>
+<polygon fill="#000000" stroke="#000000" points="541.57,-202.17 532.88,-208.22 543.45,-208.91 541.57,-202.17"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.94,-151.18C434.15,-139.69 388.95,-123.97 348,-123.19"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-142.3C428.42,-129.55 411.81,-146.31 351.5,-142.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C281.73,-137.78 264.59,-75.92 202,-102.3"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.35,-175.2C431.89,-179.31 415.54,-183.97 400.37,-188.28"/>
-<polygon fill="#000000" stroke="#000000" points="399.27,-184.96 390.61,-191.06 401.19,-191.69 399.27,-184.96"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-142.3C321.76,-140.45 291.01,-140.17 264.8,-140.46"/>
+<polygon fill="#000000" stroke="#000000" points="264.57,-136.96 254.62,-140.6 264.67,-143.96 264.57,-136.96"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.45,-156.12C414.46,-153.54 378.38,-153.3 348,-163.19"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.18,-175.3C592.17,-179.78 582.03,-185.03 573,-190.19 553.67,-201.24 532.56,-214.83 516.53,-225.49"/>
-<polygon fill="#000000" stroke="#000000" points="514.56,-222.6 508.19,-231.07 518.45,-228.41 514.56,-222.6"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.95,-58.94C488.85,-52.9 326.29,-49.91 202,-102.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C426.21,-118.74 410.43,-124.38 348,-123.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M598.51,-151.11C571.46,-140.37 529.04,-125.95 490.5,-123.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-232.32C431.82,-235.85 417.83,-239.76 404.63,-243.45"/>
+<polygon fill="#000000" stroke="#000000" points="403.41,-240.16 394.72,-246.22 405.29,-246.9 403.41,-240.16"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C284.51,-209.69 267.41,-222.65 202,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-218.3C172.54,-216.47 142.1,-216.19 116.16,-216.48"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-212.98 106.09,-216.62 116.13,-219.98 116.04,-212.98"/>
+</g>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-243.19C134.83,-217.36 87.43,-150.64 66.2,-116.3"/>
-<polygon fill="#000000" stroke="#000000" points="69.07,-114.29 60.91,-107.54 63.08,-117.91 69.07,-114.29"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-123.19C423.74,-118.57 409.74,-143.1 348,-163.19"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-163.19C320.21,-171.59 312.35,-170.25 288,-182.19 244.62,-203.48 242.52,-261.99 198,-243.19"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.35,-222.28C414.93,-222.76 381.23,-222.23 351.5,-218.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-218.3C301.31,-211.91 252.57,-180.93 224.93,-160.54"/>
+<polygon fill="#000000" stroke="#000000" points="226.82,-157.58 216.73,-154.34 222.6,-163.16 226.82,-157.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-163.19C566.43,-163.19 556.52,-163.19 546.94,-163.19"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-159.69 536.69,-163.19 546.69,-166.69 546.69,-159.69"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-246.22C289.62,-235.48 243.56,-221.06 202,-218.3"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M609.33,-151.19C591.78,-139.32 563.42,-121.23 537,-109.19 494.23,-89.71 443.42,-73.68 405.26,-62.95"/>
-<polygon fill="#000000" stroke="#000000" points="405.92,-59.5 395.34,-60.2 404.05,-66.24 405.92,-59.5"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.53,-246.24C312.31,-242.29 303.54,-237.55 296,-232.3 266.31,-211.63 236.98,-181.61 219.18,-162.01"/>
+<polygon fill="#000000" stroke="#000000" points="221.57,-159.43 212.29,-154.32 216.35,-164.1 221.57,-159.43"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.56,-60.23C296.31,-71.7 259.6,-89.06 232.68,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="231.15,-98.64 223.61,-106.08 234.14,-104.97 231.15,-98.64"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323.74,-34.37C314.88,-38.64 304.94,-43.56 296,-48.3 253.42,-70.84 246.4,-83.58 202,-102.3"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-102.3C175,-112.83 164.76,-106.54 142,-121.3 110.64,-141.63 83.28,-175.83 67.7,-197.72"/>
+<polygon fill="#000000" stroke="#000000" points="64.79,-195.79 61.96,-206 70.54,-199.78 64.79,-195.79"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.47,-56.49C244.79,-64.49 169.53,-76.6 116.46,-85.14"/>
-<polygon fill="#000000" stroke="#000000" points="115.81,-81.7 106.49,-86.75 116.92,-88.61 115.81,-81.7"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~rmvs_util.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.86,-271.34C260.07,-264.7 226.69,-255.31 198,-243.19"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176.87,-154.34C152.55,-166.99 114.11,-187.01 86.7,-201.27"/>
+<polygon fill="#000000" stroke="#000000" points="84.76,-198.34 77.51,-206.06 88,-204.55 84.76,-198.34"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/setup.f90.html b/docs/sourcefile/setup.f90.html
index ba2306607..55c1711aa 100644
--- a/docs/sourcefile/setup.f90.html
+++ b/docs/sourcefile/setup.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~setup.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesetupf90EfferentGraph" width="641pt" height="301pt"
- viewBox="0.00 0.00 641.00 301.39" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~setup.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefilesetupf90EfferentGraph" width="641pt" height="249pt"
+ viewBox="0.00 0.00 641.00 248.60" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~setup.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~setup.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 881,-412.12 881,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 881,-339.24 881,4 -4,4"/>
 <!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~setup.f90</title>
-<polygon fill="none" stroke="black" points="877,-133.12 820,-133.12 820,-109.12 877,-109.12 877,-133.12"/>
-<text text-anchor="middle" x="848.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">setup.f90</text>
+<polygon fill="none" stroke="black" points="877,-235.24 820,-235.24 820,-211.24 877,-211.24 877,-235.24"/>
+<text text-anchor="middle" x="848.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">setup.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~setup.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M827.79,-109.09C790.38,-87.43 705.88,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M821.1,-235.38C780.51,-252.91 699.9,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~setup.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M835.4,-133.4C819.19,-149.87 790.22,-179.29 771.06,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="768.52,-196.35 764,-205.93 773.51,-201.26 768.52,-196.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.88,-211.67C810.61,-207.79 800.1,-203.39 790.17,-199.23"/>
+<polygon fill="#000000" stroke="#000000" points="791.47,-195.97 780.89,-195.34 788.76,-202.43 791.47,-195.97"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~setup.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~setup.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~setup.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~setup.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~setup.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/swiftest.f90.html b/docs/sourcefile/swiftest.f90.html
index e48e4e4b1..462566f0a 100644
--- a/docs/sourcefile/swiftest.f90.html
+++ b/docs/sourcefile/swiftest.f90.html
@@ -226,277 +226,272 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~swiftest.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileswiftestf90EfferentGraph" width="641pt" height="309pt"
- viewBox="0.00 0.00 641.00 309.45" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~swiftest.f90~~EfferentGraph" class="graph" transform="scale(0.81 0.81) rotate(0) translate(4 378.34)">
+<svg id="sourcefileswiftestf90EfferentGraph" width="641pt" height="267pt"
+ viewBox="0.00 0.00 641.00 267.16" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~swiftest.f90~~EfferentGraph" class="graph" transform="scale(0.81 0.81) rotate(0) translate(4 326.1)">
 <title>sourcefile~~swiftest.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-378.34 788,-378.34 788,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-326.1 788,-326.1 788,4 -4,4"/>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~swiftest.f90</title>
-<polygon fill="none" stroke="black" points="784,-144 718,-144 718,-120 784,-120 784,-144"/>
-<text text-anchor="middle" x="751" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest.f90</text>
+<polygon fill="none" stroke="black" points="784,-151.52 718,-151.52 718,-127.52 784,-127.52 784,-151.52"/>
+<text text-anchor="middle" x="751" y="-137.12" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest.f90</text>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node2" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-220 143.5,-220 143.5,-196 250.5,-196 250.5,-220"/>
-<text text-anchor="middle" x="197" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-289.52 298.5,-289.52 298.5,-265.52 403.5,-265.52 403.5,-289.52"/>
+<text text-anchor="middle" x="351" y="-275.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge1" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C583.38,-309.4 582.23,-243.47 537,-227 457.67,-198.11 432.24,-202.41 348,-208"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.94,-144.34C731.46,-175.37 691.38,-256.39 628.5,-288"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-317.52C454.06,-315.05 416.52,-303.34 389.54,-293.23"/>
+<polygon fill="#000000" stroke="#000000" points="390.69,-289.92 380.1,-289.6 388.18,-296.46 390.69,-289.92"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.8,-151.53C712.5,-192.83 608.47,-326 490.5,-317.52"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-320 300,-320 300,-296 394,-296 394,-320"/>
-<text text-anchor="middle" x="347" y="-305.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-289.52 142,-289.52 142,-265.52 260,-265.52 260,-289.52"/>
+<text text-anchor="middle" x="201" y="-275.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C607.09,-297.39 480.19,-303.39 404.55,-306.17"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-302.69 394.23,-306.54 404.35,-309.68 404.1,-302.69"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-317.52C428.25,-324.66 412.53,-321.54 352,-317.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-317.52C312.54,-315.04 271.43,-303.15 242.06,-292.97"/>
+<polygon fill="#000000" stroke="#000000" points="243.17,-289.65 232.57,-289.6 240.83,-296.25 243.17,-289.65"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-104 142,-104 142,-80 252,-80 252,-104"/>
-<text text-anchor="middle" x="197" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-191.52 576,-191.52 576,-167.52 679,-167.52 679,-191.52"/>
+<text text-anchor="middle" x="627.5" y="-177.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-132C450.97,-131.61 443.05,-119.98 406,-114 358.08,-106.26 303.49,-100.61 262.27,-96.97"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-93.46 252.09,-96.09 261.75,-100.44 262.35,-93.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-131.64C668.53,-131.17 572.26,-130.57 490.5,-132"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-150.14C704.62,-154.46 689.18,-159.55 674.87,-164.26"/>
+<polygon fill="#000000" stroke="#000000" points="673.59,-160.99 665.19,-167.44 675.78,-167.64 673.59,-160.99"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-340 442,-340 442,-316 537,-316 537,-340"/>
-<text text-anchor="middle" x="489.5" y="-325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-171.52 442.5,-171.52 442.5,-147.52 536.5,-147.52 536.5,-171.52"/>
+<text text-anchor="middle" x="489.5" y="-157.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C601.47,-300.11 572.03,-309.32 546.96,-315.84"/>
-<polygon fill="#000000" stroke="#000000" points="546.07,-312.45 537.23,-318.29 547.78,-319.24 546.07,-312.45"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C600.08,-139.52 571.09,-143.26 546.68,-147.51"/>
+<polygon fill="#000000" stroke="#000000" points="545.74,-144.12 536.52,-149.35 546.98,-151.01 545.74,-144.12"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
 <g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-144 0,-144 0,-120 106,-120 106,-144"/>
-<text text-anchor="middle" x="53" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-249.52 0,-249.52 0,-225.52 106,-225.52 106,-249.52"/>
+<text text-anchor="middle" x="53" y="-235.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge5" class="edge">
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C583.49,-309.62 582.23,-332.53 537,-349 457.67,-377.89 431.81,-378.15 348,-368"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-317.52C257.37,-311.38 229.25,-330.23 142,-298.52 116.33,-289.19 91.13,-270.47 74.32,-256.22"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-253.58 66.78,-249.64 72.02,-258.85 76.62,-253.58"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-84 573,-84 573,-60 682,-60 682,-84"/>
-<text text-anchor="middle" x="627.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-131.52 304,-131.52 304,-107.52 398,-107.52 398,-131.52"/>
+<text text-anchor="middle" x="351" y="-117.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M725.41,-119.86C707.21,-110.87 682.21,-98.52 662.16,-88.62"/>
-<polygon fill="#000000" stroke="#000000" points="663.57,-85.41 653.05,-84.12 660.47,-91.69 663.57,-85.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C550.7,-139.52 463.45,-131.84 408.03,-126"/>
+<polygon fill="#000000" stroke="#000000" points="408.38,-122.52 398.07,-124.94 407.64,-129.48 408.38,-122.52"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-260 442.5,-260 442.5,-236 536.5,-236 536.5,-260"/>
-<text text-anchor="middle" x="489.5" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.52 573,-72.52 573,-48.52 682,-48.52 682,-72.52"/>
+<text text-anchor="middle" x="627.5" y="-58.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C608.76,-296.58 559.97,-278.76 525.93,-264.22"/>
-<polygon fill="#000000" stroke="#000000" points="526.9,-260.82 516.33,-260.04 524.1,-267.24 526.9,-260.82"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.28,-127.35C711.07,-114.21 678.67,-93.15 655.66,-78.18"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-75.09 647.04,-72.58 653.52,-80.96 657.33,-75.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-222 576,-222 576,-198 679,-198 679,-222"/>
-<text text-anchor="middle" x="627.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-32.52 296,-32.52 296,-8.52 406,-8.52 406,-32.52"/>
+<text text-anchor="middle" x="351" y="-18.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.28,-144.02C711.18,-156.92 679.05,-177.55 656.06,-192.31"/>
-<polygon fill="#000000" stroke="#000000" points="653.96,-189.49 647.44,-197.84 657.75,-195.38 653.96,-189.49"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.75,-127.41C737.37,-105.57 716.5,-59.97 682,-39.52 600.36,8.85 486.49,2.66 416.1,-7.79"/>
+<polygon fill="#000000" stroke="#000000" points="415.38,-4.36 406.04,-9.36 416.46,-11.28 415.38,-4.36"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-180 294.5,-180 294.5,-156 399.5,-156 399.5,-180"/>
-<text text-anchor="middle" x="347" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-91.52 442,-91.52 442,-67.52 537,-67.52 537,-91.52"/>
+<text text-anchor="middle" x="489.5" y="-77.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-132C453.18,-131.63 414.38,-142.47 386.52,-152.35"/>
-<polygon fill="#000000" stroke="#000000" points="384.96,-149.2 376.78,-155.93 387.38,-155.77 384.96,-149.2"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C605.03,-139.52 554.04,-114.19 520.95,-96.44"/>
+<polygon fill="#000000" stroke="#000000" points="522.59,-93.35 512.13,-91.67 519.26,-99.51 522.59,-93.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-139.52C693.28,-139.52 658.77,-139.52 628.5,-139.52"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-24 288,-24 288,0 406,0 406,-24"/>
-<text text-anchor="middle" x="347" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-209.52 147.5,-209.52 147.5,-185.52 254.5,-185.52 254.5,-209.52"/>
+<text text-anchor="middle" x="201" y="-195.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.78,-119.89C733.62,-101.48 711.58,-66.94 682,-51 598.73,-6.12 487.07,-2.43 416.31,-5.77"/>
-<polygon fill="#000000" stroke="#000000" points="415.98,-2.28 406.18,-6.3 416.35,-9.27 415.98,-2.28"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C601.27,-139.82 595.78,-147.66 573,-158.52 556.07,-166.59 554.92,-174.99 537,-180.52 445.58,-208.77 333.5,-207.76 264.95,-203.41"/>
+<polygon fill="#000000" stroke="#000000" points="264.96,-199.9 254.75,-202.72 264.49,-206.89 264.96,-199.9"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M173.5,-195.96C149.85,-183.3 112.46,-163.29 85.81,-149.02"/>
-<polygon fill="#000000" stroke="#000000" points="87.33,-145.87 76.87,-144.24 84.03,-152.04 87.33,-145.87"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.43,-265.45C289.91,-254.71 243.7,-240.29 202,-237.52"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.11,-295.98C306.12,-292 296.44,-287.23 288,-282 262.06,-265.92 235.43,-243.09 217.94,-227.05"/>
-<polygon fill="#000000" stroke="#000000" points="220.28,-224.45 210.58,-220.21 215.52,-229.58 220.28,-224.45"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M321.93,-265.39C313.4,-261.34 304.14,-256.57 296,-251.52 278.77,-240.84 277.37,-233.97 260,-223.52 254.22,-220.05 247.89,-216.75 241.6,-213.74"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-210.55 232.5,-209.56 240.12,-216.91 243.05,-210.55"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.86,-318.28C269.35,-322.68 229.35,-323.72 198,-308"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-265.52C140.96,-261.35 123.7,-256.62 107.75,-252.25"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-248.85 98.03,-249.59 106.75,-255.6 108.6,-248.85"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-104C138.79,-108.12 122.26,-112.77 106.93,-117.09"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-113.79 97.07,-119.87 107.64,-120.53 105.74,-113.79"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.52C459.72,-245.51 427.67,-254.88 401.86,-262.54"/>
+<polygon fill="#000000" stroke="#000000" points="400.52,-259.29 391.93,-265.49 402.51,-265.99 400.52,-259.29"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-321.34C429.74,-319.64 416.74,-317.79 404.34,-316.02"/>
-<polygon fill="#000000" stroke="#000000" points="404.5,-312.51 394.1,-314.56 403.51,-319.44 404.5,-312.51"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-172.08C566.33,-170.67 556.31,-169.2 546.63,-167.78"/>
+<polygon fill="#000000" stroke="#000000" points="547.09,-164.31 536.69,-166.32 546.08,-171.23 547.09,-164.31"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M466.56,-340.03C439.28,-353.62 391.05,-373.21 348,-368"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-368C275.54,-359.47 261.45,-339.81 198,-308"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-237.52C172.54,-235.7 142.1,-235.42 116.16,-235.71"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-232.21 106.09,-235.85 116.13,-239.21 116.04,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-237.52C284.37,-233.17 267.63,-241.88 202,-237.52"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.66,-64.71C473.51,-52.07 265.96,-29.49 198,-52"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M603.59,-191.52C577.1,-204.87 531.81,-226.06 490.5,-237.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-237.52C312.54,-235.04 271.43,-223.15 242.06,-212.97"/>
+<polygon fill="#000000" stroke="#000000" points="243.17,-209.65 232.57,-209.6 240.83,-216.25 243.17,-209.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.52C430.04,-253.74 412.53,-241.54 352,-237.52"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-268C300,-269.68 251.41,-243.94 222.94,-225.64"/>
-<polygon fill="#000000" stroke="#000000" points="224.71,-222.61 214.44,-220.01 220.84,-228.45 224.71,-222.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.21,-257.08C414.92,-261.81 379.64,-266.85 348,-268"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge19" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.38,-159.6C415.93,-159.62 382.1,-159.62 352,-159.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-159.52C281.86,-159.3 264.26,-91.84 202,-119.52"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge19" class="edge">
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge18" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M460.07,-260.14C438.64,-269.29 409.06,-281.92 385.67,-291.91"/>
-<polygon fill="#000000" stroke="#000000" points="384.21,-288.73 376.39,-295.88 386.96,-295.17 384.21,-288.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-147.52C433.64,-143.45 417.92,-138.84 403.3,-134.56"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-131.11 393.4,-131.65 402.01,-137.83 403.98,-131.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-308C128.84,-274.33 82.75,-192.67 63.75,-153.57"/>
-<polygon fill="#000000" stroke="#000000" points="66.84,-151.93 59.41,-144.38 60.52,-154.92 66.84,-151.93"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-268C311.95,-269.24 228.46,-323.27 198,-308"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-159.52C311.87,-159.4 269.89,-171.39 240.42,-181.94"/>
+<polygon fill="#000000" stroke="#000000" points="239.09,-178.7 230.92,-185.44 241.52,-185.26 239.09,-178.7"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-170C424.52,-160.46 412.55,-203.72 348,-208"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-208C318.16,-209.85 287.31,-210.13 261.01,-209.84"/>
-<polygon fill="#000000" stroke="#000000" points="260.85,-206.34 250.8,-209.69 260.75,-213.33 260.85,-206.34"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.98,-110.17C273.71,-106.22 233.93,-105.33 202,-119.52"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.46,-222.18C588.74,-242.76 540.57,-284.55 512.39,-309.01"/>
-<polygon fill="#000000" stroke="#000000" points="509.93,-306.51 504.67,-315.71 514.52,-311.8 509.93,-306.51"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.31,-131.53C315.3,-135.83 305.15,-140.79 296,-145.52 274.31,-156.73 250.23,-170.07 231.87,-180.43"/>
+<polygon fill="#000000" stroke="#000000" points="230.07,-177.43 223.09,-185.41 233.52,-183.52 230.07,-177.43"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.64,-197.91C567.43,-188.24 527.01,-175.45 490.5,-170"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-170C450.85,-164.38 443.5,-153.51 406,-147 314.68,-131.14 290.55,-136.92 198,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-132C169.96,-130.1 141.16,-129.77 116.35,-130.04"/>
-<polygon fill="#000000" stroke="#000000" points="116.28,-126.54 106.33,-130.18 116.38,-133.54 116.28,-126.54"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.55,-59.12C560.83,-58.87 548.5,-58.65 537,-58.52 494.78,-58.05 483.95,-53.69 442,-58.52 401.2,-63.22 392.24,-71.28 352,-79.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-79.52C282.86,-91.17 264.26,-91.84 202,-119.52"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.47,-222.02C570.82,-225.56 556.83,-229.47 543.63,-233.16"/>
-<polygon fill="#000000" stroke="#000000" points="542.41,-229.86 533.72,-235.92 544.29,-236.6 542.41,-229.86"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-170C462.95,-166.19 434.51,-165.19 409.93,-165.33"/>
-<polygon fill="#000000" stroke="#000000" points="409.61,-161.83 399.65,-165.45 409.69,-168.83 409.61,-161.83"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-119.52C147.1,-143.04 97.32,-190.73 71.8,-217.73"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-215.68 64.68,-225.39 74.05,-220.45 68.92,-215.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.46,-32.77C310.03,-53.59 255.11,-95.92 202,-119.52"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-180C286.15,-184.17 268.65,-188.9 252.49,-193.27"/>
-<polygon fill="#000000" stroke="#000000" points="251.37,-189.95 242.63,-195.94 253.2,-196.71 251.37,-189.95"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.91,-74.92C415.31,-73.44 381.48,-73.48 352,-79.52"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.15,-155.96C282.49,-146.35 238.01,-134.13 198,-132"/>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge25" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-91.52C433.64,-95.6 417.92,-100.21 403.3,-104.49"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-101.22 393.4,-107.39 403.98,-107.94 402.01,-101.22"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-52C171.85,-60 164.66,-59.43 142,-71 118.6,-82.95 94.21,-100.3 77.06,-113.45"/>
-<polygon fill="#000000" stroke="#000000" points="74.53,-110.98 68.79,-119.89 78.83,-116.5 74.53,-110.98"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.92,-24.05C267.05,-31.37 230.21,-41.33 198,-52"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest.f90~~EfferentGraph_edge27" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-209.52C140.96,-213.7 123.7,-218.43 107.75,-222.8"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-219.44 98.03,-225.46 108.6,-226.19 106.75,-219.44"/>
 </g>
 </g>
 </svg>
@@ -560,679 +555,679 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="66,-1410 0,-1410 0,-1386 66,-1386 66,-1410"/>
 <text text-anchor="middle" x="33" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest.f90</text>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="259,-2796 109,-2796 109,-2772 259,-2772 259,-2796"/>
-<text text-anchor="middle" x="184" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="237,-2796 131,-2796 131,-2772 237,-2772 237,-2796"/>
+<text text-anchor="middle" x="184" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M111.87,-2771.94C108.19,-2769.45 104.84,-2766.49 102,-2763 57.76,-2708.68 37.27,-1592.64 34.36,-1420.27"/>
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M130.77,-2780.53C119.74,-2777.31 109.25,-2771.9 102,-2763 57.76,-2708.68 37.27,-1592.64 34.36,-1420.27"/>
 <polygon fill="#000000" stroke="#000000" points="37.86,-1420.05 34.19,-1410.11 30.86,-1420.16 37.86,-1420.05"/>
 </g>
-<!-- sourcefile~symba_step.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~symba_step.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="228,-2754 140,-2754 140,-2730 228,-2730 228,-2754"/>
-<text text-anchor="middle" x="184" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-2754 157,-2754 157,-2730 211,-2730 211,-2754"/>
+<text text-anchor="middle" x="184" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.65,-2740.65C125.55,-2737.92 111.18,-2732.26 102,-2721 59.15,-2668.46 37.54,-1589.97 34.4,-1420.36"/>
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.88,-2742.73C138.53,-2741.7 115.04,-2736.99 102,-2721 59.15,-2668.46 37.54,-1589.97 34.4,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="37.9,-1420.07 34.21,-1410.13 30.9,-1420.2 37.9,-1420.07"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="240,-2712 128,-2712 128,-2688 240,-2688 240,-2712"/>
-<text text-anchor="middle" x="184" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="217.5,-2712 150.5,-2712 150.5,-2688 217.5,-2688 217.5,-2712"/>
+<text text-anchor="middle" x="184" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M127.87,-2695.6C117.92,-2692.3 108.62,-2687.1 102,-2679 60.5,-2628.21 37.79,-1586.05 34.44,-1420.17"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge3" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.1,-2700.18C133.07,-2698.4 113.49,-2693.06 102,-2679 60.5,-2628.21 37.79,-1586.05 34.44,-1420.17"/>
 <polygon fill="#000000" stroke="#000000" points="37.94,-1420.07 34.24,-1410.14 30.94,-1420.21 37.94,-1420.07"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223,-2670 145,-2670 145,-2646 223,-2646 223,-2670"/>
-<text text-anchor="middle" x="184" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222,-2670 146,-2670 146,-2646 222,-2646 222,-2670"/>
+<text text-anchor="middle" x="184" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.73,-2657.49C129.1,-2655.18 112.31,-2649.59 102,-2637 61.9,-2588.01 38.1,-1583.99 34.48,-1420.43"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge4" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.98,-2657.67C130,-2655.48 112.58,-2649.93 102,-2637 61.9,-2588.01 38.1,-1583.99 34.48,-1420.43"/>
 <polygon fill="#000000" stroke="#000000" points="37.98,-1420.05 34.26,-1410.13 30.98,-1420.21 37.98,-1420.05"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="220.5,-2628 147.5,-2628 147.5,-2604 220.5,-2604 220.5,-2628"/>
-<text text-anchor="middle" x="184" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-2628 141,-2628 141,-2604 227,-2604 227,-2628"/>
+<text text-anchor="middle" x="184" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.24,-2615.83C130.93,-2613.75 112.87,-2608.25 102,-2595 63.25,-2547.75 38.37,-1579.7 34.52,-1420.17"/>
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.95,-2614.86C126.45,-2612.23 111.49,-2606.57 102,-2595 63.25,-2547.75 38.37,-1579.7 34.52,-1420.17"/>
 <polygon fill="#000000" stroke="#000000" points="38.02,-1420.01 34.28,-1410.1 31.02,-1420.18 38.02,-1420.01"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="239.5,-2586 128.5,-2586 128.5,-2562 239.5,-2562 239.5,-2586"/>
-<text text-anchor="middle" x="184" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="235.5,-2586 132.5,-2586 132.5,-2562 235.5,-2562 235.5,-2586"/>
+<text text-anchor="middle" x="184" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M128.33,-2569.71C118.21,-2566.42 108.73,-2561.19 102,-2553 27.42,-2462.26 32.36,-1573.17 33.77,-1420.31"/>
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.09,-2570.84C120.59,-2567.66 109.56,-2562.2 102,-2553 27.42,-2462.26 32.36,-1573.17 33.77,-1420.31"/>
 <polygon fill="#000000" stroke="#000000" points="37.27,-1420.28 33.86,-1410.25 30.27,-1420.21 37.27,-1420.28"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-2544 145.5,-2544 145.5,-2520 222.5,-2520 222.5,-2544"/>
-<text text-anchor="middle" x="184" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="236.5,-2544 131.5,-2544 131.5,-2520 236.5,-2520 236.5,-2544"/>
+<text text-anchor="middle" x="184" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.18,-2531.52C129.44,-2529.25 112.44,-2523.67 102,-2511 30.17,-2423.81 32.8,-1570.31 33.82,-1420.42"/>
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M131.26,-2528.59C120.07,-2525.38 109.39,-2519.97 102,-2511 30.17,-2423.81 32.8,-1570.31 33.82,-1420.42"/>
 <polygon fill="#000000" stroke="#000000" points="37.32,-1420.19 33.89,-1410.16 30.32,-1420.13 37.32,-1420.19"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="237,-2502 131,-2502 131,-2478 237,-2478 237,-2502"/>
-<text text-anchor="middle" x="184" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-2502 145.5,-2502 145.5,-2478 222.5,-2478 222.5,-2502"/>
+<text text-anchor="middle" x="184" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M130.86,-2486.46C119.82,-2483.24 109.31,-2477.85 102,-2469 32.91,-2385.34 33.25,-1567.17 33.87,-1420.47"/>
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.2,-2489.51C129.46,-2487.23 112.45,-2481.66 102,-2469 32.91,-2385.34 33.25,-1567.17 33.87,-1420.47"/>
 <polygon fill="#000000" stroke="#000000" points="37.38,-1420.07 33.92,-1410.05 30.38,-1420.03 37.38,-1420.07"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="243,-2460 125,-2460 125,-2436 243,-2436 243,-2460"/>
-<text text-anchor="middle" x="184" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-2460 141.5,-2460 141.5,-2436 226.5,-2436 226.5,-2460"/>
+<text text-anchor="middle" x="184" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.66,-2442.37C115.96,-2439.05 107.93,-2434.16 102,-2427 35.65,-2346.86 33.73,-1563.84 33.94,-1420.48"/>
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.43,-2446.89C126.81,-2444.29 111.64,-2438.64 102,-2427 35.65,-2346.86 33.73,-1563.84 33.94,-1420.48"/>
 <polygon fill="#000000" stroke="#000000" points="37.44,-1420.27 33.96,-1410.27 30.44,-1420.26 37.44,-1420.27"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-2418 150,-2418 150,-2394 218,-2394 218,-2418"/>
-<text text-anchor="middle" x="184" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~symba_step.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="228,-2418 140,-2418 140,-2394 228,-2394 228,-2418"/>
+<text text-anchor="middle" x="184" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.78,-2406.06C132.87,-2404.22 113.51,-2398.86 102,-2385 38.37,-2308.36 34.22,-1560.16 34,-1420.42"/>
+<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M139.76,-2404.56C125.67,-2401.83 111.28,-2396.18 102,-2385 38.37,-2308.36 34.22,-1560.16 34,-1420.42"/>
 <polygon fill="#000000" stroke="#000000" points="37.5,-1420.1 33.99,-1410.1 30.5,-1420.11 37.5,-1420.1"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-2376 141.5,-2376 141.5,-2352 226.5,-2352 226.5,-2376"/>
-<text text-anchor="middle" x="184" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-2376 113,-2376 113,-2352 255,-2352 255,-2376"/>
+<text text-anchor="middle" x="184" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.47,-2362.86C126.85,-2360.25 111.67,-2354.61 102,-2343 41.08,-2269.85 34.73,-1556.27 34.08,-1420.31"/>
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M112.68,-2352.34C108.69,-2349.77 105.07,-2346.68 102,-2343 41.08,-2269.85 34.73,-1556.27 34.08,-1420.31"/>
 <polygon fill="#000000" stroke="#000000" points="37.58,-1420.23 34.03,-1410.24 30.58,-1420.26 37.58,-1420.23"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="217.5,-2334 150.5,-2334 150.5,-2310 217.5,-2310 217.5,-2334"/>
-<text text-anchor="middle" x="184" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-2334 150,-2334 150,-2310 218,-2310 218,-2334"/>
+<text text-anchor="middle" x="184" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M150.22,-2322.08C133.23,-2320.27 113.64,-2314.93 102,-2301 43.77,-2231.33 35.26,-1552.05 34.15,-1420.13"/>
-<polygon fill="#000000" stroke="#000000" points="37.65,-1419.99 34.07,-1410.02 30.65,-1420.05 37.65,-1419.99"/>
-</g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge65" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.82,-2322.03C132.92,-2320.18 113.55,-2314.82 102,-2301 43.77,-2231.33 35.26,-1552.05 34.15,-1420.13"/>
+<polygon fill="#000000" stroke="#000000" points="37.65,-1419.99 34.07,-1410.02 30.65,-1420.05 37.65,-1419.99"/>
+</g>
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-2292 141.5,-2292 141.5,-2268 226.5,-2268 226.5,-2292"/>
-<text text-anchor="middle" x="184" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="266,-2292 102,-2292 102,-2268 266,-2268 266,-2292"/>
+<text text-anchor="middle" x="184" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.09,-2278.75C126.61,-2276.1 111.62,-2270.46 102,-2259 46.52,-2192.86 35.83,-1548.92 34.24,-1420.29"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M111.98,-2267.85C108.28,-2265.37 104.89,-2262.45 102,-2259 46.52,-2192.86 35.83,-1548.92 34.24,-1420.29"/>
 <polygon fill="#000000" stroke="#000000" points="37.74,-1420.04 34.12,-1410.08 30.74,-1420.12 37.74,-1420.04"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223,-2250 145,-2250 145,-2226 223,-2226 223,-2250"/>
-<text text-anchor="middle" x="184" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="235.5,-2250 132.5,-2250 132.5,-2226 235.5,-2226 235.5,-2250"/>
+<text text-anchor="middle" x="184" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.9,-2237.35C129.3,-2235.02 112.48,-2229.44 102,-2217 49.25,-2154.37 36.42,-1545.38 34.34,-1420.36"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.24,-2234.71C120.74,-2231.54 109.67,-2226.11 102,-2217 49.25,-2154.37 36.42,-1545.38 34.34,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="37.83,-1420.04 34.17,-1410.1 30.83,-1420.16 37.83,-1420.04"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="232,-2208 136,-2208 136,-2184 232,-2184 232,-2208"/>
-<text text-anchor="middle" x="184" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-2208 150,-2208 150,-2184 218,-2184 218,-2208"/>
+<text text-anchor="middle" x="184" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.65,-2193.55C122.96,-2190.54 110.44,-2184.98 102,-2175 51.96,-2115.85 37.04,-1541.44 34.44,-1420.34"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.88,-2195.98C133,-2194.11 113.64,-2188.75 102,-2175 51.96,-2115.85 37.04,-1541.44 34.44,-1420.34"/>
 <polygon fill="#000000" stroke="#000000" points="37.94,-1420 34.23,-1410.07 30.94,-1420.14 37.94,-1420"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223.5,-2166 144.5,-2166 144.5,-2142 223.5,-2142 223.5,-2166"/>
-<text text-anchor="middle" x="184" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="235.5,-2166 132.5,-2166 132.5,-2142 235.5,-2142 235.5,-2166"/>
+<text text-anchor="middle" x="184" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.11,-2153.18C128.76,-2150.76 112.35,-2145.17 102,-2133 54.7,-2077.38 37.72,-1538.24 34.57,-1420.6"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.3,-2150.66C120.8,-2147.49 109.72,-2142.08 102,-2133 54.7,-2077.38 37.72,-1538.24 34.57,-1420.6"/>
 <polygon fill="#000000" stroke="#000000" points="38.06,-1420.18 34.3,-1410.28 31.06,-1420.37 38.06,-1420.18"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="235.5,-2124 132.5,-2124 132.5,-2100 235.5,-2100 235.5,-2124"/>
-<text text-anchor="middle" x="184" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="219.5,-2124 148.5,-2124 148.5,-2100 219.5,-2100 219.5,-2124"/>
+<text text-anchor="middle" x="184" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.34,-2108.63C120.83,-2105.46 109.74,-2100.05 102,-2091 57.37,-2038.81 38.4,-1533.42 34.69,-1420.36"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.3,-2111.73C131.84,-2109.69 113.33,-2104.25 102,-2091 57.37,-2038.81 38.4,-1533.42 34.69,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="38.18,-1420.02 34.37,-1410.14 31.19,-1420.24 38.18,-1420.02"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="220.5,-2082 147.5,-2082 147.5,-2058 220.5,-2058 220.5,-2082"/>
-<text text-anchor="middle" x="184" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223,-2082 145,-2082 145,-2058 223,-2058 223,-2082"/>
+<text text-anchor="middle" x="184" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.1,-2069.54C130.96,-2067.38 113.09,-2061.88 102,-2049 60.08,-2000.28 39.14,-1529.22 34.84,-1420.37"/>
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.6,-2069.18C129.14,-2066.79 112.52,-2061.22 102,-2049 60.08,-2000.28 39.14,-1529.22 34.84,-1420.37"/>
 <polygon fill="#000000" stroke="#000000" points="38.33,-1420.06 34.45,-1410.21 31.34,-1420.33 38.33,-1420.06"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="231,-2040 137,-2040 137,-2016 231,-2016 231,-2040"/>
-<text text-anchor="middle" x="184" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211.5,-2040 156.5,-2040 156.5,-2016 211.5,-2016 211.5,-2040"/>
+<text text-anchor="middle" x="184" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M136.64,-2025.62C123.68,-2022.65 110.75,-2017.1 102,-2007 62.75,-1961.72 39.92,-1524.48 35.01,-1420.23"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.38,-2028.44C138.3,-2027.21 115.32,-2022.37 102,-2007 62.75,-1961.72 39.92,-1524.48 35.01,-1420.23"/>
 <polygon fill="#000000" stroke="#000000" points="38.5,-1420.03 34.54,-1410.2 31.51,-1420.35 38.5,-1420.03"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="225,-1998 143,-1998 143,-1974 225,-1974 225,-1998"/>
-<text text-anchor="middle" x="184" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="240,-1998 128,-1998 128,-1974 240,-1974 240,-1998"/>
+<text text-anchor="middle" x="184" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.6,-1984.76C127.76,-1982.19 112.13,-1976.59 102,-1965 65.45,-1923.17 40.78,-1520.03 35.2,-1420.25"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge19" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M127.87,-1981.12C118.04,-1977.84 108.79,-1972.77 102,-1965 65.45,-1923.17 40.78,-1520.03 35.2,-1420.25"/>
 <polygon fill="#000000" stroke="#000000" points="38.69,-1419.9 34.64,-1410.11 31.7,-1420.28 38.69,-1419.9"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-1956 150,-1956 150,-1932 218,-1932 218,-1956"/>
-<text text-anchor="middle" x="184" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="214,-1956 154,-1956 154,-1932 214,-1932 214,-1956"/>
+<text text-anchor="middle" x="184" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.7,-1943.73C132.98,-1941.77 113.82,-1936.4 102,-1923 34.79,-1846.83 32.95,-1510.78 33.7,-1420.43"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.72,-1944.15C136.15,-1942.59 114.78,-1937.49 102,-1923 34.79,-1846.83 32.95,-1510.78 33.7,-1420.43"/>
 <polygon fill="#000000" stroke="#000000" points="37.2,-1420.26 33.8,-1410.23 30.2,-1420.19 37.2,-1420.26"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-1914 145.5,-1914 145.5,-1890 222.5,-1890 222.5,-1914"/>
-<text text-anchor="middle" x="184" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<text text-anchor="middle" x="184" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.23,-1901.07C129.69,-1898.68 112.83,-1893.14 102,-1881 40.09,-1811.61 34.36,-1505.75 33.98,-1420.26"/>
 <polygon fill="#000000" stroke="#000000" points="37.48,-1420.12 33.96,-1410.12 30.48,-1420.13 37.48,-1420.12"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="221.5,-1872 146.5,-1872 146.5,-1848 221.5,-1848 221.5,-1872"/>
-<text text-anchor="middle" x="184" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-1872 150,-1872 150,-1848 218,-1848 218,-1872"/>
+<text text-anchor="middle" x="184" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.13,-1859.12C130.38,-1856.79 113.11,-1851.29 102,-1839 45.44,-1776.43 35.9,-1501.22 34.31,-1420.39"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.83,-1859.62C133.15,-1857.62 113.98,-1852.25 102,-1839 45.44,-1776.43 35.9,-1501.22 34.31,-1420.39"/>
 <polygon fill="#000000" stroke="#000000" points="37.81,-1420.26 34.14,-1410.32 30.81,-1420.38 37.81,-1420.26"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-1830 145.5,-1830 145.5,-1806 222.5,-1806 222.5,-1830"/>
-<text text-anchor="middle" x="184" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="239.5,-1830 128.5,-1830 128.5,-1806 239.5,-1806 239.5,-1830"/>
+<text text-anchor="middle" x="184" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.39,-1816.92C129.89,-1814.5 113.01,-1808.98 102,-1797 50.79,-1741.25 37.61,-1496.75 34.72,-1420.68"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M128.17,-1812.85C118.32,-1809.59 108.98,-1804.6 102,-1797 50.79,-1741.25 37.61,-1496.75 34.72,-1420.68"/>
 <polygon fill="#000000" stroke="#000000" points="38.21,-1420.21 34.36,-1410.34 31.21,-1420.46 38.21,-1420.21"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="224,-1788 144,-1788 144,-1764 224,-1764 224,-1788"/>
-<text text-anchor="middle" x="184" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-1788 145.5,-1788 145.5,-1764 222.5,-1764 222.5,-1788"/>
+<text text-anchor="middle" x="184" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.84,-1774.54C128.82,-1771.98 112.73,-1766.45 102,-1755 56.04,-1705.93 39.47,-1491.11 35.22,-1420.55"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.09,-1774.75C129.72,-1772.28 113.02,-1766.77 102,-1755 56.04,-1705.93 39.47,-1491.11 35.22,-1420.55"/>
 <polygon fill="#000000" stroke="#000000" points="38.69,-1419.94 34.62,-1410.16 31.7,-1420.34 38.69,-1419.94"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="216,-1746 152,-1746 152,-1722 216,-1722 216,-1746"/>
-<text text-anchor="middle" x="184" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-1746 157,-1746 157,-1722 211,-1722 211,-1746"/>
+<text text-anchor="middle" x="184" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.76,-1733.52C134.81,-1731.58 114.78,-1726.31 102,-1713 61.25,-1670.54 41.55,-1485.15 35.83,-1420.41"/>
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.85,-1734.01C138.99,-1732.58 116.08,-1727.67 102,-1713 61.25,-1670.54 41.55,-1485.15 35.83,-1420.41"/>
 <polygon fill="#000000" stroke="#000000" points="39.29,-1419.77 34.95,-1410.11 32.31,-1420.37 39.29,-1419.77"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="266,-1704 102,-1704 102,-1680 266,-1680 266,-1704"/>
-<text text-anchor="middle" x="184" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="216,-1704 152,-1704 152,-1680 216,-1680 216,-1704"/>
+<text text-anchor="middle" x="184" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M113.75,-1679.93C109.46,-1677.46 105.48,-1674.51 102,-1671 66.4,-1635.06 43.89,-1478.53 36.59,-1420.1"/>
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.92,-1691.36C135.02,-1689.38 114.98,-1684.11 102,-1671 66.4,-1635.06 43.89,-1478.53 36.59,-1420.1"/>
 <polygon fill="#000000" stroke="#000000" points="40.06,-1419.59 35.37,-1410.09 33.11,-1420.44 40.06,-1419.59"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-1662 157,-1662 157,-1638 211,-1638 211,-1662"/>
-<text text-anchor="middle" x="184" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="220.5,-1662 147.5,-1662 147.5,-1638 220.5,-1638 220.5,-1662"/>
+<text text-anchor="middle" x="184" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.8,-1649.65C139.14,-1648.03 116.51,-1643.04 102,-1629 42.89,-1571.79 34.47,-1466.05 33.74,-1420.18"/>
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.28,-1648.48C131.57,-1646.04 114,-1640.62 102,-1629 42.89,-1571.79 34.47,-1466.05 33.74,-1420.18"/>
 <polygon fill="#000000" stroke="#000000" points="37.24,-1420.1 33.7,-1410.12 30.24,-1420.14 37.24,-1420.1"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-1620 145.5,-1620 145.5,-1596 222.5,-1596 222.5,-1620"/>
-<text text-anchor="middle" x="184" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222,-1620 146,-1620 146,-1596 222,-1596 222,-1620"/>
+<text text-anchor="middle" x="184" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.12,-1605.74C130.12,-1603.06 113.7,-1597.67 102,-1587 53.12,-1542.41 39.34,-1460.11 35.49,-1420.48"/>
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.94,-1605.88C130.72,-1603.26 113.91,-1597.87 102,-1587 53.12,-1542.41 39.34,-1460.11 35.49,-1420.48"/>
 <polygon fill="#000000" stroke="#000000" points="38.95,-1419.96 34.62,-1410.29 31.98,-1420.55 38.95,-1419.96"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-1578 141,-1578 141,-1554 227,-1554 227,-1578"/>
-<text text-anchor="middle" x="184" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226,-1578 142,-1578 142,-1554 226,-1554 226,-1578"/>
+<text text-anchor="middle" x="184" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.59,-1562.21C127.07,-1559.23 112.82,-1554.03 102,-1545 62.99,-1512.44 45.17,-1452.61 38.07,-1420.22"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge67" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.85,-1562.48C127.95,-1559.55 113.15,-1554.31 102,-1545 62.99,-1512.44 45.17,-1452.61 38.07,-1420.22"/>
 <polygon fill="#000000" stroke="#000000" points="41.41,-1419.1 35.98,-1410 34.55,-1420.5 41.41,-1419.1"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-1536 150,-1536 150,-1512 218,-1512 218,-1536"/>
-<text text-anchor="middle" x="184" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_append.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-1536 141,-1536 141,-1512 227,-1512 227,-1536"/>
+<text text-anchor="middle" x="184" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.88,-1521.01C134.2,-1518.27 115.9,-1513.03 102,-1503 72.56,-1481.77 52.58,-1443.51 42.25,-1419.5"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge30" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.88,-1519.21C127.53,-1516.15 113.31,-1511.16 102,-1503 72.56,-1481.77 52.58,-1443.51 42.25,-1419.5"/>
 <polygon fill="#000000" stroke="#000000" points="45.46,-1418.09 38.42,-1410.18 38.98,-1420.76 45.46,-1418.09"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="214,-1494 154,-1494 154,-1470 214,-1470 214,-1494"/>
-<text text-anchor="middle" x="184" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223.5,-1494 144.5,-1494 144.5,-1470 223.5,-1470 223.5,-1494"/>
+<text text-anchor="middle" x="184" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.97,-1478.05C137.93,-1475.01 118.06,-1469.78 102,-1461 81.93,-1450.03 63.19,-1431.82 50.49,-1417.8"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.44,-1476.06C130.5,-1472.89 115,-1468.11 102,-1461 81.93,-1450.03 63.19,-1431.82 50.49,-1417.8"/>
 <polygon fill="#000000" stroke="#000000" points="52.97,-1415.32 43.74,-1410.11 47.7,-1419.93 52.97,-1415.32"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="236.5,-1452 131.5,-1452 131.5,-1428 236.5,-1428 236.5,-1452"/>
-<text text-anchor="middle" x="184" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223,-1452 145,-1452 145,-1428 223,-1428 223,-1452"/>
+<text text-anchor="middle" x="184" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.93,-1427.93C124.07,-1425.09 112.62,-1422.02 102,-1419 93.45,-1416.57 84.34,-1413.85 75.65,-1411.19"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.99,-1430.53C131.39,-1427.04 115.98,-1422.97 102,-1419 93.45,-1416.57 84.34,-1413.85 75.65,-1411.19"/>
 <polygon fill="#000000" stroke="#000000" points="76.67,-1407.84 66.08,-1408.24 74.6,-1414.53 76.67,-1407.84"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="212.5,-1410 155.5,-1410 155.5,-1386 212.5,-1386 212.5,-1410"/>
-<text text-anchor="middle" x="184" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-1410 157,-1410 157,-1386 211,-1386 211,-1410"/>
+<text text-anchor="middle" x="184" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.32,-1398C133.13,-1398 101.62,-1398 76.28,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="76.19,-1394.5 66.19,-1398 76.19,-1401.5 76.19,-1394.5"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.7,-1398C134.53,-1398 102.37,-1398 76.54,-1398"/>
+<polygon fill="#000000" stroke="#000000" points="76.26,-1394.5 66.26,-1398 76.26,-1401.5 76.26,-1394.5"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-1368 145.5,-1368 145.5,-1344 222.5,-1344 222.5,-1368"/>
-<text text-anchor="middle" x="184" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-1368 157,-1368 157,-1344 211,-1344 211,-1368"/>
+<text text-anchor="middle" x="184" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.4,-1365.37C131.7,-1368.88 116.11,-1372.99 102,-1377 93.45,-1379.43 84.34,-1382.15 75.65,-1384.81"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.65,-1362.51C140.77,-1366.51 120.17,-1371.84 102,-1377 93.45,-1379.43 84.34,-1382.15 75.65,-1384.81"/>
 <polygon fill="#000000" stroke="#000000" points="74.6,-1381.47 66.08,-1387.76 76.67,-1388.16 74.6,-1381.47"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-1326 150,-1326 150,-1302 218,-1302 218,-1326"/>
-<text text-anchor="middle" x="184" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<text text-anchor="middle" x="184" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.69,-1318.8C134.49,-1321.93 116.66,-1326.98 102,-1335 81.93,-1345.97 63.19,-1364.18 50.49,-1378.2"/>
 <polygon fill="#000000" stroke="#000000" points="47.7,-1376.07 43.74,-1385.89 52.97,-1380.68 47.7,-1376.07"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-1284 141,-1284 141,-1260 227,-1260 227,-1284"/>
-<text text-anchor="middle" x="184" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="225,-1284 143,-1284 143,-1260 225,-1260 225,-1284"/>
+<text text-anchor="middle" x="184" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.88,-1276.79C127.53,-1279.85 113.31,-1284.84 102,-1293 72.56,-1314.23 52.58,-1352.49 42.25,-1376.5"/>
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.96,-1276.33C129.02,-1279.34 113.9,-1284.42 102,-1293 72.56,-1314.23 52.58,-1352.49 42.25,-1376.5"/>
 <polygon fill="#000000" stroke="#000000" points="38.98,-1375.24 38.42,-1385.82 45.46,-1377.91 38.98,-1375.24"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-1242 141,-1242 141,-1218 227,-1218 227,-1242"/>
-<text text-anchor="middle" x="184" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="233,-1242 135,-1242 135,-1218 233,-1218 233,-1242"/>
+<text text-anchor="middle" x="184" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.59,-1233.79C127.07,-1236.77 112.82,-1241.97 102,-1251 62.99,-1283.56 45.17,-1343.39 38.07,-1375.78"/>
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.7,-1235.22C123.03,-1238.35 111.26,-1243.27 102,-1251 62.99,-1283.56 45.17,-1343.39 38.07,-1375.78"/>
 <polygon fill="#000000" stroke="#000000" points="34.55,-1375.5 35.98,-1386 41.41,-1376.9 34.55,-1375.5"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="220,-1200 148,-1200 148,-1176 220,-1176 220,-1200"/>
-<text text-anchor="middle" x="184" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223.5,-1200 144.5,-1200 144.5,-1176 223.5,-1176 223.5,-1200"/>
+<text text-anchor="middle" x="184" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.99,-1189.78C132.25,-1192.27 114.45,-1197.64 102,-1209 53.12,-1253.59 39.34,-1335.89 35.49,-1375.52"/>
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.29,-1190.41C129.52,-1193.14 113.48,-1198.52 102,-1209 53.12,-1253.59 39.34,-1335.89 35.49,-1375.52"/>
 <polygon fill="#000000" stroke="#000000" points="31.98,-1375.45 34.62,-1385.71 38.95,-1376.04 31.98,-1375.45"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226,-1158 142,-1158 142,-1134 226,-1134 226,-1158"/>
-<text text-anchor="middle" x="184" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="246,-1158 122,-1158 122,-1134 246,-1134 246,-1158"/>
+<text text-anchor="middle" x="184" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.89,-1148.47C127.67,-1151.27 112.65,-1156.69 102,-1167 42.89,-1224.21 34.47,-1329.95 33.74,-1375.82"/>
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M121.82,-1154.4C114.5,-1157.46 107.64,-1161.54 102,-1167 42.89,-1224.21 34.47,-1329.95 33.74,-1375.82"/>
 <polygon fill="#000000" stroke="#000000" points="30.24,-1375.86 33.7,-1385.88 37.24,-1375.9 30.24,-1375.86"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211.5,-1116 156.5,-1116 156.5,-1092 211.5,-1092 211.5,-1116"/>
-<text text-anchor="middle" x="184" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-1116 150,-1116 150,-1092 218,-1092 218,-1116"/>
+<text text-anchor="middle" x="184" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.23,-1104.19C138.54,-1105.77 116.11,-1110.76 102,-1125 66.4,-1160.94 43.89,-1317.47 36.59,-1375.9"/>
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.91,-1104.89C133.45,-1107.05 114.47,-1112.41 102,-1125 66.4,-1160.94 43.89,-1317.47 36.59,-1375.9"/>
 <polygon fill="#000000" stroke="#000000" points="33.11,-1375.56 35.37,-1385.91 40.06,-1376.41 33.11,-1375.56"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="219.5,-1074 148.5,-1074 148.5,-1050 219.5,-1050 219.5,-1074"/>
-<text text-anchor="middle" x="184" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-1074 145.5,-1074 145.5,-1050 222.5,-1050 222.5,-1074"/>
+<text text-anchor="middle" x="184" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M148.11,-1062.95C132.01,-1065.2 113.87,-1070.63 102,-1083 61.25,-1125.46 41.55,-1310.85 35.83,-1375.59"/>
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.23,-1063.38C129.88,-1065.87 113.17,-1071.37 102,-1083 61.25,-1125.46 41.55,-1310.85 35.83,-1375.59"/>
 <polygon fill="#000000" stroke="#000000" points="32.31,-1375.63 34.95,-1385.89 39.29,-1376.23 32.31,-1375.63"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-1032 157,-1032 157,-1008 211,-1008 211,-1032"/>
-<text text-anchor="middle" x="184" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-1032 150,-1032 150,-1008 218,-1008 218,-1032"/>
+<text text-anchor="middle" x="184" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.74,-1019.88C138.82,-1021.27 115.9,-1026.16 102,-1041 56.04,-1090.07 39.47,-1304.89 35.22,-1375.45"/>
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.61,-1020.61C133.08,-1022.69 114.12,-1028.06 102,-1041 56.04,-1090.07 39.47,-1304.89 35.22,-1375.45"/>
 <polygon fill="#000000" stroke="#000000" points="31.7,-1375.66 34.62,-1385.84 38.69,-1376.06 31.7,-1375.66"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223.5,-990 144.5,-990 144.5,-966 223.5,-966 223.5,-990"/>
-<text text-anchor="middle" x="184" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222.5,-990 145.5,-990 145.5,-966 222.5,-966 222.5,-990"/>
+<text text-anchor="middle" x="184" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.14,-979.29C128.99,-981.8 112.71,-987.34 102,-999 50.79,-1054.75 37.61,-1299.25 34.72,-1375.32"/>
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.39,-979.08C129.89,-981.5 113.01,-987.02 102,-999 50.79,-1054.75 37.61,-1299.25 34.72,-1375.32"/>
 <polygon fill="#000000" stroke="#000000" points="31.21,-1375.54 34.36,-1385.66 38.21,-1375.79 31.21,-1375.54"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-948 157,-948 157,-924 211,-924 211,-948"/>
-<text text-anchor="middle" x="184" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-948 141,-948 141,-924 227,-924 227,-948"/>
+<text text-anchor="middle" x="184" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.96,-935.71C138.91,-936.98 115.74,-941.81 102,-957 45.44,-1019.57 35.9,-1294.78 34.31,-1375.61"/>
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.7,-937.8C126.52,-940.55 111.84,-946.12 102,-957 45.44,-1019.57 35.9,-1294.78 34.31,-1375.61"/>
 <polygon fill="#000000" stroke="#000000" points="30.81,-1375.62 34.14,-1385.68 37.81,-1375.74 30.81,-1375.62"/>
 </g>
 <!-- sourcefile~discard.f90 -->
@@ -1250,319 +1245,319 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M151.38,-894.14C134.31,-895.96 114.28,-901.23 102,-915 40.09,-984.39 34.36,-1290.25 33.98,-1375.74"/>
 <polygon fill="#000000" stroke="#000000" points="30.48,-1375.87 33.96,-1385.88 37.48,-1375.88 30.48,-1375.87"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-864 141.5,-864 141.5,-840 226.5,-840 226.5,-864"/>
-<text text-anchor="middle" x="184" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211.5,-864 156.5,-864 156.5,-840 211.5,-840 211.5,-864"/>
+<text text-anchor="middle" x="184" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.39,-853.51C126.95,-856.19 111.9,-861.78 102,-873 34.79,-949.17 32.95,-1285.22 33.7,-1375.57"/>
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.47,-851.63C138.42,-852.9 115.46,-857.75 102,-873 34.79,-949.17 32.95,-1285.22 33.7,-1375.57"/>
 <polygon fill="#000000" stroke="#000000" points="30.2,-1375.81 33.8,-1385.77 37.2,-1375.74 30.2,-1375.81"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="235.5,-822 132.5,-822 132.5,-798 235.5,-798 235.5,-822"/>
-<text text-anchor="middle" x="184" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-822 141.5,-822 141.5,-798 226.5,-798 226.5,-822"/>
+<text text-anchor="middle" x="184" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.47,-813.49C120.97,-816.65 109.84,-822.03 102,-831 65.45,-872.83 40.78,-1275.97 35.2,-1375.75"/>
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.34,-811.46C126.88,-814.13 111.85,-819.73 102,-831 65.45,-872.83 40.78,-1275.97 35.2,-1375.75"/>
 <polygon fill="#000000" stroke="#000000" points="31.7,-1375.72 34.64,-1385.89 38.69,-1376.1 31.7,-1375.72"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-780 150,-780 150,-756 218,-756 218,-780"/>
-<text text-anchor="middle" x="184" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="231.5,-780 136.5,-780 136.5,-756 231.5,-756 231.5,-780"/>
+<text text-anchor="middle" x="184" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.61,-768.18C132.86,-770.12 113.7,-775.5 102,-789 62.75,-834.28 39.92,-1271.52 35.01,-1375.77"/>
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M136.22,-770.48C123.4,-773.47 110.66,-779.01 102,-789 62.75,-834.28 39.92,-1271.52 35.01,-1375.77"/>
 <polygon fill="#000000" stroke="#000000" points="31.51,-1375.65 34.54,-1385.8 38.5,-1375.97 31.51,-1375.65"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211.5,-738 156.5,-738 156.5,-714 211.5,-714 211.5,-738"/>
-<text text-anchor="middle" x="184" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="232,-738 136,-738 136,-714 232,-714 232,-738"/>
+<text text-anchor="middle" x="184" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.35,-725.53C138.25,-726.75 115.27,-731.58 102,-747 60.08,-795.72 39.14,-1266.78 34.84,-1375.63"/>
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M135.75,-728.54C123.07,-731.55 110.53,-737.09 102,-747 60.08,-795.72 39.14,-1266.78 34.84,-1375.63"/>
 <polygon fill="#000000" stroke="#000000" points="31.34,-1375.67 34.45,-1385.79 38.33,-1375.94 31.34,-1375.67"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="235.5,-696 132.5,-696 132.5,-672 235.5,-672 235.5,-696"/>
-<text text-anchor="middle" x="184" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-696 157,-696 157,-672 211,-672 211,-696"/>
+<text text-anchor="middle" x="184" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M132.34,-687.37C120.83,-690.54 109.74,-695.95 102,-705 57.37,-757.19 38.4,-1262.58 34.69,-1375.64"/>
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.71,-683.48C138.53,-684.64 115.31,-689.43 102,-705 57.37,-757.19 38.4,-1262.58 34.69,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="31.19,-1375.76 34.37,-1385.86 38.18,-1375.98 31.19,-1375.76"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-654 157,-654 157,-630 211,-630 211,-654"/>
-<text text-anchor="middle" x="184" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="220.5,-654 147.5,-654 147.5,-630 220.5,-630 220.5,-654"/>
+<text text-anchor="middle" x="184" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.68,-641.46C138.49,-642.61 115.27,-647.4 102,-663 54.7,-718.62 37.72,-1257.76 34.57,-1375.4"/>
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.44,-642.34C131.18,-644.46 113.1,-649.94 102,-663 54.7,-718.62 37.72,-1257.76 34.57,-1375.4"/>
 <polygon fill="#000000" stroke="#000000" points="31.06,-1375.63 34.3,-1385.72 38.06,-1375.82 31.06,-1375.63"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-612 141,-612 141,-588 227,-588 227,-612"/>
-<text text-anchor="middle" x="184" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-612 141.5,-612 141.5,-588 226.5,-588 226.5,-612"/>
+<text text-anchor="middle" x="184" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.72,-601.37C126.37,-604.06 111.57,-609.69 102,-621 51.96,-680.15 37.04,-1254.56 34.44,-1375.66"/>
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.14,-601.3C126.66,-603.95 111.66,-609.58 102,-621 51.96,-680.15 37.04,-1254.56 34.44,-1375.66"/>
 <polygon fill="#000000" stroke="#000000" points="30.94,-1375.86 34.23,-1385.93 37.94,-1376 30.94,-1375.86"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-570 141,-570 141,-546 227,-546 227,-570"/>
-<text text-anchor="middle" x="184" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="212.5,-570 155.5,-570 155.5,-546 212.5,-546 212.5,-570"/>
+<text text-anchor="middle" x="184" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.69,-559.35C126.34,-562.03 111.55,-567.67 102,-579 49.25,-641.63 36.42,-1250.62 34.34,-1375.64"/>
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M155.47,-557.5C137.44,-558.76 114.91,-563.67 102,-579 49.25,-641.63 36.42,-1250.62 34.34,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="30.83,-1375.84 34.17,-1385.9 37.83,-1375.96 30.83,-1375.84"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="231.5,-528 136.5,-528 136.5,-504 231.5,-504 231.5,-528"/>
-<text text-anchor="middle" x="184" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="214,-528 154,-528 154,-504 214,-504 214,-528"/>
+<text text-anchor="middle" x="184" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M136.44,-518.21C123.47,-521.17 110.59,-526.76 102,-537 46.52,-603.14 35.83,-1247.08 34.24,-1375.71"/>
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.87,-515.6C136.12,-517.03 114.51,-522.09 102,-537 46.52,-603.14 35.83,-1247.08 34.24,-1375.71"/>
 <polygon fill="#000000" stroke="#000000" points="30.74,-1375.88 34.12,-1385.92 37.74,-1375.96 30.74,-1375.88"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="255,-486 113,-486 113,-462 255,-462 255,-486"/>
-<text text-anchor="middle" x="184" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="220,-486 148,-486 148,-462 220,-462 220,-486"/>
+<text text-anchor="middle" x="184" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M112.69,-485.67C108.7,-488.24 105.07,-491.32 102,-495 43.77,-564.67 35.26,-1243.95 34.15,-1375.87"/>
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M147.76,-474.21C131.37,-476.26 113.09,-481.73 102,-495 43.77,-564.67 35.26,-1243.95 34.15,-1375.87"/>
 <polygon fill="#000000" stroke="#000000" points="30.65,-1375.95 34.07,-1385.98 37.65,-1376.01 30.65,-1375.95"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="214,-444 154,-444 154,-420 214,-420 214,-444"/>
-<text text-anchor="middle" x="184" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="259,-444 109,-444 109,-420 259,-420 259,-444"/>
+<text text-anchor="middle" x="184" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.83,-431.57C136.07,-432.99 114.46,-438.04 102,-453 41.08,-526.15 34.73,-1239.73 34.08,-1375.69"/>
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M111.95,-444.13C108.25,-446.61 104.88,-449.54 102,-453 41.08,-526.15 34.73,-1239.73 34.08,-1375.69"/>
 <polygon fill="#000000" stroke="#000000" points="30.58,-1375.74 34.03,-1385.76 37.58,-1375.77 30.58,-1375.74"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
+<!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="225.5,-402 142.5,-402 142.5,-378 225.5,-378 225.5,-402"/>
-<text text-anchor="middle" x="184" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-402 141,-402 141,-378 227,-378 227,-402"/>
+<text text-anchor="middle" x="184" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.29,-390.98C127.42,-393.52 111.84,-399.15 102,-411 38.37,-487.64 34.22,-1235.84 34,-1375.58"/>
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.61,-391.28C126.25,-393.95 111.47,-399.6 102,-411 38.37,-487.64 34.22,-1235.84 34,-1375.58"/>
 <polygon fill="#000000" stroke="#000000" points="30.5,-1375.89 33.99,-1385.9 37.5,-1375.9 30.5,-1375.89"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="233,-360 135,-360 135,-336 233,-336 233,-360"/>
-<text text-anchor="middle" x="184" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="225.5,-360 142.5,-360 142.5,-336 225.5,-336 225.5,-360"/>
+<text text-anchor="middle" x="184" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M134.67,-350.54C122.27,-353.59 110.15,-359.15 102,-369 35.65,-449.14 33.73,-1232.16 33.94,-1375.52"/>
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.28,-348.96C127.4,-351.5 111.82,-357.14 102,-369 35.65,-449.14 33.73,-1232.16 33.94,-1375.52"/>
 <polygon fill="#000000" stroke="#000000" points="30.44,-1375.74 33.96,-1385.73 37.44,-1375.73 30.44,-1375.74"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="231,-318 137,-318 137,-294 231,-294 231,-318"/>
-<text text-anchor="middle" x="184" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-318 141.5,-318 141.5,-294 226.5,-294 226.5,-318"/>
+<text text-anchor="middle" x="184" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M136.77,-308.03C123.64,-310.96 110.6,-316.58 102,-327 32.91,-410.66 33.25,-1228.83 33.87,-1375.53"/>
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.42,-307.1C126.79,-309.7 111.62,-315.35 102,-327 32.91,-410.66 33.25,-1228.83 33.87,-1375.53"/>
 <polygon fill="#000000" stroke="#000000" points="30.38,-1375.97 33.92,-1385.95 37.38,-1375.93 30.38,-1375.97"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222,-276 146,-276 146,-252 222,-252 222,-276"/>
-<text text-anchor="middle" x="184" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="227,-276 141,-276 141,-252 227,-252 227,-276"/>
+<text text-anchor="middle" x="184" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.6,-264.42C129.74,-266.65 112.53,-272.22 102,-285 30.17,-372.19 32.8,-1225.69 33.82,-1375.58"/>
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M140.98,-265.16C126.48,-267.8 111.51,-273.45 102,-285 30.17,-372.19 32.8,-1225.69 33.82,-1375.58"/>
 <polygon fill="#000000" stroke="#000000" points="30.32,-1375.87 33.89,-1385.84 37.32,-1375.81 30.32,-1375.87"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223.5,-234 144.5,-234 144.5,-210 223.5,-210 223.5,-234"/>
-<text text-anchor="middle" x="184" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="221.5,-234 146.5,-234 146.5,-210 221.5,-210 221.5,-234"/>
+<text text-anchor="middle" x="184" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.33,-222.59C128.83,-224.94 112.24,-230.54 102,-243 27.42,-333.74 32.36,-1222.83 33.77,-1375.69"/>
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M146.42,-222.29C130.33,-224.45 112.7,-229.98 102,-243 27.42,-333.74 32.36,-1222.83 33.77,-1375.69"/>
 <polygon fill="#000000" stroke="#000000" points="30.27,-1375.79 33.86,-1385.75 37.27,-1375.72 30.27,-1375.79"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="222,-192 146,-192 146,-168 222,-168 222,-192"/>
-<text text-anchor="middle" x="184" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="223.5,-192 144.5,-192 144.5,-168 223.5,-168 223.5,-192"/>
+<text text-anchor="middle" x="184" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.99,-180.34C130.02,-182.53 112.59,-188.08 102,-201 63.25,-248.25 38.37,-1216.3 34.52,-1375.83"/>
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M144.32,-180.58C128.81,-182.93 112.23,-188.53 102,-201 63.25,-248.25 38.37,-1216.3 34.52,-1375.83"/>
 <polygon fill="#000000" stroke="#000000" points="31.02,-1375.82 34.28,-1385.9 38.02,-1375.99 31.02,-1375.82"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="246,-150 122,-150 122,-126 246,-126 246,-150"/>
-<text text-anchor="middle" x="184" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="243,-150 125,-150 125,-126 243,-126 243,-150"/>
+<text text-anchor="middle" x="184" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M121.77,-144.72C114.17,-148 107.25,-152.59 102,-159 61.9,-207.99 38.1,-1212.01 34.48,-1375.57"/>
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M124.59,-143.58C115.9,-146.9 107.89,-151.81 102,-159 61.9,-207.99 38.1,-1212.01 34.48,-1375.57"/>
 <polygon fill="#000000" stroke="#000000" points="30.98,-1375.79 34.26,-1385.87 37.98,-1375.95 30.98,-1375.79"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="211,-108 157,-108 157,-84 211,-84 211,-108"/>
-<text text-anchor="middle" x="184" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="231,-108 137,-108 137,-84 231,-84 231,-108"/>
+<text text-anchor="middle" x="184" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.88,-95.28C138.55,-96.31 115.05,-101.03 102,-117 60.5,-167.79 37.79,-1209.95 34.44,-1375.83"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M136.7,-97.97C123.58,-100.91 110.55,-106.54 102,-117 60.5,-167.79 37.79,-1209.95 34.44,-1375.83"/>
 <polygon fill="#000000" stroke="#000000" points="30.94,-1375.79 34.24,-1385.86 37.94,-1375.93 30.94,-1375.79"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="218,-66 150,-66 150,-42 218,-42 218,-66"/>
-<text text-anchor="middle" x="184" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="231,-66 137,-66 137,-42 231,-42 231,-66"/>
+<text text-anchor="middle" x="184" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M149.68,-53.86C132.75,-55.68 113.39,-61.04 102,-75 59.15,-127.54 37.54,-1206.03 34.4,-1375.64"/>
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M136.69,-55.97C123.56,-58.9 110.54,-64.53 102,-75 59.15,-127.54 37.54,-1206.03 34.4,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="30.9,-1375.8 34.21,-1385.87 37.9,-1375.93 30.9,-1375.8"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~swiftest.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="226.5,-24 141.5,-24 141.5,0 226.5,0 226.5,-24"/>
-<text text-anchor="middle" x="184" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~swiftest.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="224,-24 144,-24 144,0 224,0 224,-24"/>
+<text text-anchor="middle" x="184" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.33,-13.03C126.7,-15.62 111.54,-21.28 102,-33 57.76,-87.32 37.27,-1203.36 34.36,-1375.73"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M143.86,-12.61C128.47,-14.99 112.09,-20.61 102,-33 57.76,-87.32 37.27,-1203.36 34.36,-1375.73"/>
 <polygon fill="#000000" stroke="#000000" points="30.86,-1375.84 34.19,-1385.89 37.86,-1375.95 30.86,-1375.84"/>
 </g>
 </g>
diff --git a/docs/sourcefile/swiftest_classes.f90.html b/docs/sourcefile/swiftest_classes.f90.html
index 4f0b829ce..7ea43bc70 100644
--- a/docs/sourcefile/swiftest_classes.f90.html
+++ b/docs/sourcefile/swiftest_classes.f90.html
@@ -134,7 +134,7 @@ <h1>swiftest_classes.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 8.9% of total for source files.">1445 statements</a>
+    title=" 9.0% of total for source files.">1469 statements</a>
      </li> 
      
      
@@ -311,1501 +311,1489 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node1" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
-<polygon fill="none" stroke="black" points="107,-1959 0,-1959 0,-1935 107,-1935 107,-1959"/>
-<text text-anchor="middle" x="53.5" y="-1944.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_classes.f90</text>
+<polygon fill="none" stroke="black" points="107,-1412 0,-1412 0,-1388 107,-1388 107,-1412"/>
+<text text-anchor="middle" x="53.5" y="-1397.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_classes.f90</text>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="237,-1959 143,-1959 143,-1935 237,-1935 237,-1959"/>
-<text text-anchor="middle" x="190" y="-1944.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378,-1394 273,-1394 273,-1370 378,-1370 378,-1394"/>
+<text text-anchor="middle" x="325.5" y="-1379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.71,-1947C134.61,-1947 126.05,-1947 117.59,-1947"/>
-<polygon fill="#000000" stroke="#000000" points="117.34,-1943.5 107.34,-1947 117.34,-1950.5 117.34,-1943.5"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.36,-1394.08C290.89,-1398.31 281.45,-1403.2 273,-1408 235.47,-1429.31 234.06,-1462.8 191,-1460"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="792.5,-1620 681.5,-1620 681.5,-1596 792.5,-1596 792.5,-1620"/>
-<text text-anchor="middle" x="737" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-2796 710,-2796 710,-2772 764,-2772 764,-2796"/>
+<text text-anchor="middle" x="737" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M681.29,-1602.84C644.58,-1598.6 595.37,-1591.4 553,-1580 532.14,-1574.39 202.53,-1419.73 191,-1438"/>
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.81,-2784.43C691.68,-2783.23 668.48,-2778.42 655,-2763 571.49,-2667.45 701.35,-2251.02 587,-2196"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node7" class="node">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node32" class="node">
 <title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="619,-1451 553,-1451 553,-1427 619,-1427 619,-1451"/>
-<text text-anchor="middle" x="586" y="-1436.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="619,-1402 553,-1402 553,-1378 619,-1378 619,-1402"/>
+<text text-anchor="middle" x="586" y="-1387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M681.37,-1600.92C671.84,-1597.79 662.58,-1593.34 655,-1587 615.65,-1554.06 597.92,-1493.44 590.93,-1460.95"/>
-<polygon fill="#000000" stroke="#000000" points="594.35,-1460.2 588.95,-1451.08 587.48,-1461.58 594.35,-1460.2"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge63" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.76,-2784.82C691.37,-2783.83 667.85,-2779.14 655,-2763 610.17,-2706.7 633.9,-1538.41 619,-1468 614.77,-1448.03 605.66,-1426.67 598.23,-1411.36"/>
+<polygon fill="#000000" stroke="#000000" points="601.27,-1409.62 593.66,-1402.25 595.02,-1412.76 601.27,-1409.62"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="796,-1578 678,-1578 678,-1554 796,-1554 796,-1578"/>
-<text text-anchor="middle" x="737" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="770.5,-2754 703.5,-2754 703.5,-2730 770.5,-2730 770.5,-2754"/>
+<text text-anchor="middle" x="737" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M677.85,-1572.67C649.95,-1574.18 616.31,-1573.54 587,-1566"/>
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M703.11,-2741.78C686.29,-2739.86 666.92,-2734.51 655,-2721 577.17,-2632.79 693.01,-2247.01 587,-2196"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M677.83,-1556.62C669.71,-1553.73 661.82,-1549.94 655,-1545 625.41,-1523.56 605.47,-1484.94 595.2,-1460.7"/>
-<polygon fill="#000000" stroke="#000000" points="598.38,-1459.25 591.39,-1451.29 591.9,-1461.87 598.38,-1459.25"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge64" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M703.38,-2742.33C686.21,-2740.63 666.41,-2735.31 655,-2721 611.6,-2666.54 633.45,-1536.12 619,-1468 614.76,-1448.03 605.65,-1426.67 598.22,-1411.36"/>
+<polygon fill="#000000" stroke="#000000" points="601.27,-1409.63 593.66,-1402.25 595.01,-1412.76 601.27,-1409.63"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="770.5,-1536 703.5,-1536 703.5,-1512 770.5,-1512 770.5,-1536"/>
-<text text-anchor="middle" x="737" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775,-2712 699,-2712 699,-2688 775,-2688 775,-2712"/>
+<text text-anchor="middle" x="737" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-1566C548.41,-1556.59 549.8,-1533.75 517,-1515 458.89,-1481.77 440.3,-1481.48 378,-1457 355.29,-1448.08 350.3,-1432.63 326.5,-1438"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M703.2,-1532.14C688.42,-1535.9 670.79,-1540.52 655,-1545 624.57,-1553.64 617.98,-1572.38 587,-1566"/>
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.64,-2699.13C682.99,-2696.78 665.93,-2691.25 655,-2679 582.84,-2598.12 684.67,-2243 587,-2196"/>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M703.45,-1519.41C688.08,-1516.31 669.88,-1511.21 655,-1503 634.71,-1491.8 615.88,-1473.15 603.2,-1458.87"/>
-<polygon fill="#000000" stroke="#000000" points="605.66,-1456.35 596.48,-1451.05 600.35,-1460.92 605.66,-1456.35"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge65" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.83,-2699.79C682.82,-2697.62 665.42,-2692.06 655,-2679 613.02,-2626.39 633,-1533.84 619,-1468 614.75,-1448.03 605.64,-1426.68 598.22,-1411.37"/>
+<polygon fill="#000000" stroke="#000000" points="601.26,-1409.63 593.66,-1402.25 595,-1412.76 601.26,-1409.63"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node6" class="node">
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="789.5,-2670 684.5,-2670 684.5,-2646 789.5,-2646 789.5,-2670"/>
+<text text-anchor="middle" x="737" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge5" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M684.42,-2653.97C673.36,-2650.77 662.7,-2645.51 655,-2637 588.5,-2563.45 676.35,-2238.99 587,-2196"/>
+</g>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M684.49,-2654.87C673.15,-2651.67 662.34,-2646.19 655,-2637 614.45,-2586.23 632.55,-1531.55 619,-1468 614.74,-1448.04 605.63,-1426.68 598.21,-1411.37"/>
+<polygon fill="#000000" stroke="#000000" points="601.26,-1409.63 593.65,-1402.25 595,-1412.76 601.26,-1409.63"/>
+</g>
+<!-- sourcefile~util_rescale.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node7" class="node">
 <title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-1410 694.5,-1410 694.5,-1386 779.5,-1386 779.5,-1410"/>
-<text text-anchor="middle" x="737" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-2628 694.5,-2628 694.5,-2604 779.5,-2604 779.5,-2628"/>
+<text text-anchor="middle" x="737" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge5" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge6" class="edge">
 <title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.19,-1396.28C664.28,-1395.46 623.11,-1395.2 587,-1398"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.21,-2614.19C679.92,-2611.46 665.02,-2605.91 655,-2595 533.31,-2462.52 749.1,-2274 587,-2196"/>
 </g>
 <!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge58" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge70" class="edge">
 <title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.31,-1408.53C681.66,-1411.8 667.74,-1415.48 655,-1419 646.56,-1421.33 637.56,-1423.92 628.96,-1426.43"/>
-<polygon fill="#000000" stroke="#000000" points="627.71,-1423.15 619.11,-1429.32 629.69,-1429.86 627.71,-1423.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.22,-2615.06C679.57,-2612.48 664.44,-2606.8 655,-2595 615.88,-2546.08 632.1,-1529.26 619,-1468 614.73,-1448.04 605.62,-1426.68 598.2,-1411.37"/>
+<polygon fill="#000000" stroke="#000000" points="601.25,-1409.63 593.65,-1402.26 594.99,-1412.76 601.25,-1409.63"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M552.88,-1436.06C528.94,-1434.52 495.5,-1433.72 466.5,-1438"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.5,-1438C403.82,-1446.95 386.33,-1424.51 326.5,-1438"/>
+<!-- sourcefile~util_get_energy_momentum.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node8" class="node">
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="819,-2586 655,-2586 655,-2562 819,-2562 819,-2586"/>
+<text text-anchor="middle" x="737" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+</a>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.5,-1438C241.08,-1452.16 199.35,-1828.43 192.32,-1924.72"/>
-<polygon fill="#000000" stroke="#000000" points="188.82,-1924.59 191.64,-1934.81 195.8,-1925.06 188.82,-1924.59"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378,-1410 273,-1410 273,-1386 378,-1386 378,-1410"/>
-<text text-anchor="middle" x="325.5" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge7" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M666.15,-2561.92C662.06,-2559.44 658.28,-2556.5 655,-2553 544.59,-2435.11 732.55,-2266.03 587,-2196"/>
+</g>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge73" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664.8,-2562C661.14,-2559.49 657.81,-2556.52 655,-2553 617.31,-2505.92 631.65,-1526.97 619,-1468 614.72,-1448.04 605.61,-1426.68 598.2,-1411.37"/>
+<polygon fill="#000000" stroke="#000000" points="601.24,-1409.64 593.64,-1402.26 594.98,-1412.77 601.24,-1409.64"/>
+</g>
+<!-- sourcefile~util_spill.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node9" class="node">
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-2544 703,-2544 703,-2520 771,-2520 771,-2544"/>
+<text text-anchor="middle" x="737" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge120" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M552.94,-1431.36C541.62,-1428.82 528.78,-1426.1 517,-1424 474.2,-1416.37 425.63,-1409.77 388.25,-1405.13"/>
-<polygon fill="#000000" stroke="#000000" points="388.37,-1401.62 378.02,-1403.88 387.52,-1408.57 388.37,-1401.62"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge8" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.74,-2531.27C686.24,-2529.16 667.27,-2523.79 655,-2511 555.83,-2407.67 716.06,-2258.1 587,-2196"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-2211 278.5,-2211 278.5,-2187 372.5,-2187 372.5,-2211"/>
-<text text-anchor="middle" x="325.5" y="-2196.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge75" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M703,-2532.26C685.94,-2530.51 666.36,-2525.17 655,-2511 618.73,-2465.76 631.19,-1524.68 619,-1468 614.71,-1448.04 605.6,-1426.68 598.19,-1411.37"/>
+<polygon fill="#000000" stroke="#000000" points="601.24,-1409.64 593.64,-1402.26 594.97,-1412.77 601.24,-1409.64"/>
+</g>
+<!-- sourcefile~util_copy.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node10" class="node">
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="772.5,-2502 701.5,-2502 701.5,-2478 772.5,-2478 772.5,-2502"/>
+<text text-anchor="middle" x="737" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge128" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.64,-1451.13C582.77,-1503.28 572.04,-1713.08 517,-1874 474.16,-1999.25 379.98,-2129.61 342.42,-2178.7"/>
-<polygon fill="#000000" stroke="#000000" points="339.43,-2176.84 336.09,-2186.9 344.97,-2181.12 339.43,-2176.84"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge9" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M701.28,-2488.89C685.22,-2486.59 667.06,-2481.18 655,-2469 567.01,-2380.16 699.68,-2250.21 587,-2196"/>
+</g>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge77" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M701.36,-2490.07C684.7,-2488.15 666.01,-2482.71 655,-2469 620.16,-2425.61 630.74,-1522.39 619,-1468 614.69,-1448.05 605.58,-1426.69 598.18,-1411.37"/>
+<polygon fill="#000000" stroke="#000000" points="601.23,-1409.64 593.63,-1402.26 594.96,-1412.77 601.23,-1409.64"/>
+</g>
+<!-- sourcefile~orbel.f90~2 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node11" class="node">
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764.5,-2460 709.5,-2460 709.5,-2436 764.5,-2436 764.5,-2460"/>
+<text text-anchor="middle" x="737" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge10" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.42,-2447.62C691.82,-2445.96 669.41,-2440.94 655,-2427 578.1,-2352.57 683.44,-2242.4 587,-2196"/>
+</g>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge78" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.42,-2448.76C691.11,-2447.71 667.84,-2442.96 655,-2427 588.17,-2343.91 641.58,-1572.21 619,-1468 614.68,-1448.05 605.57,-1426.69 598.17,-1411.38"/>
+<polygon fill="#000000" stroke="#000000" points="601.22,-1409.65 593.62,-1402.26 594.95,-1412.77 601.22,-1409.65"/>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node32" class="node">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node12" class="node">
 <title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="517,-2221 414,-2221 414,-2197 517,-2197 517,-2221"/>
-<text text-anchor="middle" x="465.5" y="-2206.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="517,-1394 414,-1394 414,-1370 517,-1370 517,-1394"/>
+<text text-anchor="middle" x="465.5" y="-1379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge138" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.76,-1451.05C583.02,-1533.18 570.65,-2011.46 517,-2145 510.31,-2161.65 497.87,-2177.5 487.01,-2189.26"/>
-<polygon fill="#000000" stroke="#000000" points="484.25,-2187.08 479.83,-2196.71 489.29,-2191.94 484.25,-2187.08"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge11" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M427.55,-1394.04C358.52,-1416.31 214.8,-1461.55 191,-1460"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-1959 278,-1959 278,-1935 373,-1935 373,-1959"/>
-<text text-anchor="middle" x="325.5" y="-1944.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge37" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.9,-1382C405.49,-1382 396.7,-1382 388.06,-1382"/>
+<polygon fill="#000000" stroke="#000000" points="388.02,-1378.5 378.02,-1382 388.02,-1385.5 388.02,-1378.5"/>
+</g>
+<!-- sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node22" class="node">
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-1352 278.5,-1352 278.5,-1328 372.5,-1328 372.5,-1352"/>
+<text text-anchor="middle" x="325.5" y="-1337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge140" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.5,-1860C434.96,-1890.63 392.56,-1915.27 362.57,-1930.4"/>
-<polygon fill="#000000" stroke="#000000" points="360.72,-1927.41 353.3,-1934.98 363.82,-1933.69 360.72,-1927.41"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.44,-1451.35C586.75,-1507.07 584.58,-1737.58 466.5,-1860"/>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge55" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M424.95,-1369.96C409.65,-1365.31 391.97,-1359.93 375.85,-1355.02"/>
+<polygon fill="#000000" stroke="#000000" points="376.64,-1351.6 366.05,-1352.04 374.6,-1358.3 376.64,-1351.6"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="774.5,-1368 699.5,-1368 699.5,-1344 774.5,-1344 774.5,-1368"/>
-<text text-anchor="middle" x="737" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<!-- sourcefile~netcdf.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node13" class="node">
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="767,-2418 707,-2418 707,-2394 767,-2394 767,-2418"/>
+<text text-anchor="middle" x="737" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-1398C469.09,-1406.99 440.22,-1413.86 326.5,-1438"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M699.21,-1365.16C685.32,-1368.72 669.39,-1372.91 655,-1377 624.57,-1385.64 618.39,-1394.12 587,-1398"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.98,-2405.04C689.94,-2403.02 669.06,-2397.83 655,-2385 589.05,-2324.83 667.44,-2234.71 587,-2196"/>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M699.39,-1361.31C684.92,-1364.46 668.55,-1369.38 655,-1377 635.55,-1387.94 635.54,-1397.02 619,-1412 616,-1414.72 612.78,-1417.54 609.59,-1420.28"/>
-<polygon fill="#000000" stroke="#000000" points="607.21,-1417.71 601.84,-1426.85 611.73,-1423.05 607.21,-1417.71"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge81" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.67,-2406.57C688.83,-2405.2 667.21,-2400.16 655,-2385 591.03,-2305.6 640.68,-1567.64 619,-1468 614.66,-1448.06 605.55,-1426.69 598.16,-1411.38"/>
+<polygon fill="#000000" stroke="#000000" points="601.21,-1409.65 593.62,-1402.26 594.94,-1412.77 601.21,-1409.65"/>
 </g>
 <!-- sourcefile~util_coord.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node9" class="node">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node14" class="node">
 <title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-1326 698.5,-1326 698.5,-1302 775.5,-1302 775.5,-1326"/>
-<text text-anchor="middle" x="737" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-2376 698.5,-2376 698.5,-2352 775.5,-2352 775.5,-2376"/>
+<text text-anchor="middle" x="737" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge8" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge13" class="edge">
 <title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.4,-1312.45C683.08,-1309.93 666.35,-1304.46 655,-1293 567.01,-1204.16 695.55,-957.94 587,-1020"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.16,-2361.14C683.34,-2358.36 667.04,-2353.05 655,-2343 599.74,-2296.87 651.87,-2227.21 587,-2196"/>
 </g>
 <!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge69" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge82" class="edge">
 <title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.18,-1316.88C683.37,-1319.67 667.06,-1324.97 655,-1335 625.95,-1359.15 641.97,-1382.01 619,-1412 616.92,-1414.71 614.53,-1417.34 612.01,-1419.82"/>
-<polygon fill="#000000" stroke="#000000" points="609.36,-1417.49 604.23,-1426.76 614.02,-1422.71 609.36,-1417.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.48,-2363.68C682.6,-2361.46 665.4,-2355.89 655,-2343 593.88,-2267.28 639.78,-1563.06 619,-1468 614.64,-1448.06 605.54,-1426.7 598.15,-1411.38"/>
+<polygon fill="#000000" stroke="#000000" points="601.2,-1409.66 593.61,-1402.26 594.93,-1412.78 601.2,-1409.66"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="769,-1284 705,-1284 705,-1260 769,-1260 769,-1284"/>
-<text text-anchor="middle" x="737" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<!-- sourcefile~tides_getacch_pl.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node15" class="node">
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="792.5,-2334 681.5,-2334 681.5,-2310 792.5,-2310 792.5,-2334"/>
+<text text-anchor="middle" x="737" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.73,-1271.1C687.98,-1269.02 668.15,-1263.73 655,-1251 578.1,-1176.57 679.91,-966.88 587,-1020"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M681.23,-2313.74C671.93,-2310.72 662.78,-2306.61 655,-2301 609.91,-2268.47 637.1,-2220.11 587,-2196"/>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge71" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.76,-1272.94C688.03,-1275.03 668.2,-1280.32 655,-1293 615.15,-1331.28 649.37,-1365.84 619,-1412 617.16,-1414.79 614.95,-1417.45 612.56,-1419.94"/>
-<polygon fill="#000000" stroke="#000000" points="610.05,-1417.49 605.05,-1426.83 614.78,-1422.65 610.05,-1417.49"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge84" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M681.23,-2317.79C671.12,-2314.5 661.67,-2309.25 655,-2301 596.74,-2228.97 638.88,-1558.48 619,-1468 614.59,-1447.95 605.41,-1426.45 598,-1411.11"/>
+<polygon fill="#000000" stroke="#000000" points="601.06,-1409.39 593.46,-1402 594.79,-1412.51 601.06,-1409.39"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="819,-1242 655,-1242 655,-1218 819,-1218 819,-1242"/>
-<text text-anchor="middle" x="737" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<!-- sourcefile~gr.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node16" class="node">
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-2292 710,-2292 710,-2268 764,-2268 764,-2292"/>
+<text text-anchor="middle" x="737" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M667.92,-1217.94C663.24,-1215.47 658.86,-1212.52 655,-1209 589.05,-1148.83 664.5,-975.69 587,-1020"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.98,-2276.6C693.47,-2273.66 672.08,-2268.34 655,-2259 618.85,-2239.23 624.13,-2213.86 587,-2196"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge72" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M666.28,-1242.2C662.15,-1244.65 658.33,-1247.55 655,-1251 604.03,-1303.71 657.01,-1349.3 619,-1412 617.27,-1414.86 615.12,-1417.56 612.77,-1420.07"/>
-<polygon fill="#000000" stroke="#000000" points="610.26,-1417.63 605.3,-1427 615.02,-1422.77 610.26,-1417.63"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge87" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.85,-2280.75C691.49,-2279.73 667.99,-2275.02 655,-2259 599.59,-2190.66 637.98,-1553.91 619,-1468 614.57,-1447.95 605.39,-1426.46 597.99,-1411.12"/>
+<polygon fill="#000000" stroke="#000000" points="601.04,-1409.4 593.46,-1402 594.78,-1412.52 601.04,-1409.4"/>
 </g>
-<!-- sourcefile~obl.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-1200 710,-1200 710,-1176 764,-1176 764,-1200"/>
-<text text-anchor="middle" x="737" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<!-- sourcefile~util_set.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node17" class="node">
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="769,-2250 705,-2250 705,-2226 769,-2226 769,-2250"/>
+<text text-anchor="middle" x="737" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.67,-1186.87C692.4,-1184.87 670.28,-1179.75 655,-1167 599.74,-1120.87 649.49,-984.27 587,-1020"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.91,-2232.52C673.96,-2226.32 625.63,-2214.59 587,-2196"/>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge73" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.68,-1187.83C691.74,-1189.19 668.81,-1194.07 655,-1209 592.79,-1276.27 664.75,-1332.61 619,-1412 617.47,-1414.66 615.57,-1417.17 613.48,-1419.52"/>
-<polygon fill="#000000" stroke="#000000" points="610.63,-1417.39 605.8,-1426.82 615.46,-1422.46 610.63,-1417.39"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge88" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.7,-2238.36C687.3,-2236.76 666.82,-2231.54 655,-2217 602.44,-2152.35 637.07,-1549.33 619,-1468 614.55,-1447.96 605.37,-1426.46 597.98,-1411.12"/>
+<polygon fill="#000000" stroke="#000000" points="601.03,-1409.4 593.45,-1402.01 594.76,-1412.52 601.03,-1409.4"/>
 </g>
 <!-- sourcefile~util_append.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node13" class="node">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node18" class="node">
 <title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-1158 694,-1158 694,-1134 780,-1134 780,-1158"/>
-<text text-anchor="middle" x="737" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-2208 694,-2208 694,-2184 780,-2184 780,-2208"/>
+<text text-anchor="middle" x="737" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge12" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge17" class="edge">
 <title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.88,-1141.21C680.53,-1138.15 666.31,-1133.16 655,-1125 609.91,-1092.47 635.27,-992.41 587,-1020"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.69,-2205.42C662.62,-2210.17 620.22,-2211.98 587,-2196"/>
 </g>
 <!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge75" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge91" class="edge">
 <title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.65,-1147.76C679.48,-1150.51 664.8,-1156.08 655,-1167 581.48,-1248.9 672.53,-1315.84 619,-1412 617.51,-1414.68 615.64,-1417.21 613.56,-1419.57"/>
-<polygon fill="#000000" stroke="#000000" points="610.72,-1417.44 605.9,-1426.88 615.55,-1422.5 610.72,-1417.44"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.92,-2194.89C679.41,-2192.26 664.46,-2186.6 655,-2175 605.3,-2114.04 636.17,-1544.76 619,-1468 614.52,-1447.96 605.34,-1426.47 597.96,-1411.12"/>
+<polygon fill="#000000" stroke="#000000" points="601.01,-1409.41 593.43,-1402.01 594.74,-1412.52 601.01,-1409.41"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-1116 703,-1116 703,-1092 771,-1092 771,-1116"/>
-<text text-anchor="middle" x="737" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<!-- sourcefile~util_resize.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node19" class="node">
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776.5,-2166 697.5,-2166 697.5,-2142 776.5,-2142 776.5,-2166"/>
+<text text-anchor="middle" x="737" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.69,-1099.2C687.49,-1096.07 669.66,-1091.02 655,-1083 618.85,-1063.23 622.77,-999.55 587,-1020"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.17,-2163.68C683.78,-2167.12 668.7,-2171.11 655,-2175 624.57,-2183.64 615.5,-2209.71 587,-2196"/>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge76" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.68,-1104.25C685.95,-1106.21 666.8,-1111.58 655,-1125 570.14,-1221.57 680.33,-1299.02 619,-1412 617.54,-1414.7 615.69,-1417.24 613.62,-1419.6"/>
-<polygon fill="#000000" stroke="#000000" points="610.78,-1417.47 605.98,-1426.92 615.62,-1422.53 610.78,-1417.47"/>
-</g>
-<!-- sourcefile~netcdf.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="767,-1074 707,-1074 707,-1050 767,-1050 767,-1074"/>
-<text text-anchor="middle" x="737" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.67,-1054.74C691.25,-1050.84 672.05,-1045.84 655,-1041 624.57,-1032.36 614.46,-1004.3 587,-1020"/>
-</g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge77" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.63,-1061.76C689.01,-1063.29 667.64,-1068.39 655,-1083 606.89,-1138.63 653.58,-1347.09 619,-1412 617.56,-1414.71 615.72,-1417.25 613.66,-1419.62"/>
-<polygon fill="#000000" stroke="#000000" points="610.82,-1417.5 606.04,-1426.95 615.67,-1422.54 610.82,-1417.5"/>
-</g>
-<!-- sourcefile~tides_spin_step.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="789.5,-1032 684.5,-1032 684.5,-1008 789.5,-1008 789.5,-1032"/>
-<text text-anchor="middle" x="737" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.16,-1007.97C654.75,-1003.58 616.42,-1003.18 587,-1020"/>
-</g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge78" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M684.49,-1023.6C673.29,-1026.8 662.55,-1032.16 655,-1041 601.2,-1103.98 657.49,-1338.66 619,-1412 617.57,-1414.72 615.75,-1417.27 613.7,-1419.64"/>
-<polygon fill="#000000" stroke="#000000" points="610.86,-1417.52 606.08,-1426.97 615.71,-1422.56 610.86,-1417.52"/>
-</g>
-<!-- sourcefile~setup.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="765.5,-990 708.5,-990 708.5,-966 765.5,-966 765.5,-990"/>
-<text text-anchor="middle" x="737" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M708.34,-981.67C677.19,-986.7 625.85,-997.79 587,-1020"/>
-</g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge79" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M708.49,-977.52C690.47,-978.79 667.95,-983.69 655,-999 595.51,-1069.34 661.41,-1330.22 619,-1412 617.59,-1414.72 615.77,-1417.28 613.72,-1419.65"/>
-<polygon fill="#000000" stroke="#000000" points="610.89,-1417.53 606.12,-1426.99 615.74,-1422.57 610.89,-1417.53"/>
-</g>
-<!-- sourcefile~util_sort.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-948 703,-948 703,-924 771,-924 771,-948"/>
-<text text-anchor="middle" x="737" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.69,-940.8C687.49,-943.93 669.66,-948.98 655,-957 618.85,-976.77 622.77,-999.55 587,-1020"/>
-</g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge81" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.84,-935.98C685.94,-937.84 666.58,-943.2 655,-957 589.81,-1034.7 665.34,-1321.78 619,-1412 617.63,-1414.67 615.87,-1417.18 613.88,-1419.51"/>
-<polygon fill="#000000" stroke="#000000" points="611.19,-1417.24 606.48,-1426.73 616.08,-1422.25 611.19,-1417.24"/>
-</g>
-<!-- sourcefile~util_valid.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="773,-906 701,-906 701,-882 773,-882 773,-906"/>
-<text text-anchor="middle" x="737" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.88,-897.35C685.66,-900.18 668.31,-905.4 655,-915 609.91,-947.53 635.27,-992.41 587,-1020"/>
-</g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge84" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.74,-894.19C684.35,-896.25 666.07,-901.72 655,-915 584.11,-1000.07 669.26,-1313.33 619,-1412 617.64,-1414.67 615.89,-1417.18 613.9,-1419.52"/>
-<polygon fill="#000000" stroke="#000000" points="611.21,-1417.25 606.5,-1426.74 616.1,-1422.26 611.21,-1417.25"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge92" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.31,-2153.43C681.79,-2151.09 665.21,-2145.48 655,-2133 608.15,-2075.72 635.27,-1540.19 619,-1468 614.49,-1447.97 605.31,-1426.47 597.94,-1411.13"/>
+<polygon fill="#000000" stroke="#000000" points="601,-1409.42 593.42,-1402.01 594.72,-1412.53 601,-1409.42"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764.5,-864 709.5,-864 709.5,-840 764.5,-840 764.5,-864"/>
-<text text-anchor="middle" x="737" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-2124 710,-2124 710,-2100 764,-2100 764,-2124"/>
+<text text-anchor="middle" x="737" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.29,-853.17C692.08,-855.2 670.17,-860.34 655,-873 599.74,-919.13 649.49,-984.27 587,-1020"/>
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.98,-2115.4C693.47,-2118.34 672.08,-2123.66 655,-2133 618.85,-2152.77 624.13,-2213.86 587,-2196"/>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge86" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.17,-851.38C690.98,-852.53 667.98,-857.34 655,-873 578.41,-965.44 673.19,-1304.88 619,-1412 617.65,-1414.68 615.9,-1417.19 613.92,-1419.53"/>
-<polygon fill="#000000" stroke="#000000" points="611.23,-1417.26 606.53,-1426.75 616.12,-1422.26 611.23,-1417.26"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge94" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.91,-2112.7C691.58,-2111.66 668.09,-2106.94 655,-2091 611,-2037.41 634.37,-1535.61 619,-1468 614.45,-1447.98 605.28,-1426.48 597.92,-1411.13"/>
+<polygon fill="#000000" stroke="#000000" points="600.98,-1409.43 593.41,-1402.01 594.7,-1412.53 600.98,-1409.43"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="772.5,-822 701.5,-822 701.5,-798 772.5,-798 772.5,-822"/>
-<text text-anchor="middle" x="737" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-2082 710,-2082 710,-2058 764,-2058 764,-2082"/>
+<text text-anchor="middle" x="737" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M701.4,-811.72C685.56,-814.17 667.56,-819.54 655,-831 589.05,-891.17 664.5,-975.69 587,-1020"/>
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.85,-2071.9C692.88,-2074.24 671.02,-2079.44 655,-2091 609.91,-2123.53 637.1,-2220.11 587,-2196"/>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge87" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M701.1,-810.09C684.58,-812.09 666.09,-817.55 655,-831 572.71,-930.81 677.11,-1296.43 619,-1412 617.65,-1414.68 615.91,-1417.2 613.93,-1419.53"/>
-<polygon fill="#000000" stroke="#000000" points="611.24,-1417.27 606.54,-1426.76 616.14,-1422.27 611.24,-1417.27"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge95" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.93,-2070.68C691.61,-2069.64 668.12,-2064.92 655,-2049 613.85,-1999.1 633.47,-1531.04 619,-1468 614.41,-1447.99 605.24,-1426.49 597.89,-1411.14"/>
+<polygon fill="#000000" stroke="#000000" points="600.95,-1409.44 593.39,-1402.02 594.68,-1412.54 600.95,-1409.44"/>
 </g>
-<!-- sourcefile~kick.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-780 710,-780 710,-756 764,-756 764,-780"/>
-<text text-anchor="middle" x="737" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
-</a>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189,-1460C148.15,-1457.34 105.78,-1434.54 79.78,-1417.83"/>
+<polygon fill="#000000" stroke="#000000" points="81.56,-1414.81 71.29,-1412.21 77.7,-1420.65 81.56,-1414.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.37,-1352.05C282.98,-1354.6 277.67,-1357.57 273,-1361 226.94,-1394.8 248.01,-1463.71 191,-1460"/>
 </g>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node33" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="237,-1392 143,-1392 143,-1368 237,-1368 237,-1392"/>
+<text text-anchor="middle" x="190" y="-1377.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.8,-768.35C692.14,-769.97 669.51,-774.96 655,-789 578.1,-863.43 679.91,-966.88 587,-1020"/>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge88" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.91,-767.3C691.58,-768.34 668.09,-773.06 655,-789 567,-896.18 681.04,-1287.98 619,-1412 617.66,-1414.68 615.92,-1417.2 613.94,-1419.54"/>
-<polygon fill="#000000" stroke="#000000" points="611.26,-1417.27 606.56,-1426.77 616.15,-1422.27 611.26,-1417.27"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge132" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.45,-1352C270.84,-1356.08 255.47,-1360.68 241.17,-1364.97"/>
+<polygon fill="#000000" stroke="#000000" points="240.06,-1361.65 231.49,-1367.87 242.07,-1368.35 240.06,-1361.65"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-738 710,-738 710,-714 764,-714 764,-738"/>
-<text text-anchor="middle" x="737" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-2040 703,-2040 703,-2016 771,-2016 771,-2040"/>
+<text text-anchor="middle" x="737" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.99,-726.13C692.2,-727.62 669.31,-732.55 655,-747 567.01,-835.84 695.55,-957.94 587,-1020"/>
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.64,-2030.09C686.71,-2032.6 668.27,-2037.92 655,-2049 599.74,-2095.13 651.87,-2227.21 587,-2196"/>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge90" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.89,-725.28C691.55,-726.32 668.06,-731.03 655,-747 608.15,-804.28 651.98,-1345.76 619,-1412 617.66,-1414.68 615.93,-1417.2 613.95,-1419.54"/>
-<polygon fill="#000000" stroke="#000000" points="611.27,-1417.28 606.57,-1426.78 616.16,-1422.28 611.27,-1417.28"/>
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge104" class="edge">
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.77,-2028.07C685.86,-2026.23 666.49,-2020.87 655,-2007 616.71,-1960.78 632.57,-1526.47 619,-1468 614.36,-1448 605.2,-1426.5 597.86,-1411.15"/>
+<polygon fill="#000000" stroke="#000000" points="600.93,-1409.45 593.37,-1402.02 594.65,-1412.54 600.93,-1409.45"/>
 </g>
 <!-- sourcefile~discard.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node24" class="node">
 <title>sourcefile~discard.f90</title>
 <g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="769.5,-696 704.5,-696 704.5,-672 769.5,-672 769.5,-696"/>
-<text text-anchor="middle" x="737" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="769.5,-1998 704.5,-1998 704.5,-1974 769.5,-1974 769.5,-1998"/>
+<text text-anchor="middle" x="737" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge23" class="edge">
 <title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.36,-684.53C687.49,-686.5 667.67,-691.79 655,-705 555.83,-808.33 711.34,-948.92 587,-1020"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.5,-1438C266.36,-1449.84 221.8,-1387.29 191,-1438"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-1020C395.37,-1128.41 540.54,-1394.4 326.5,-1438"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.22,-1987.31C687.73,-1989.55 668.31,-1994.86 655,-2007 589.05,-2067.17 667.44,-2234.71 587,-2196"/>
 </g>
 <!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge91" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge107" class="edge">
 <title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.31,-683.69C687,-685.34 666.75,-690.59 655,-705 605.3,-765.96 653.95,-1341.53 619,-1412 617.67,-1414.69 615.93,-1417.21 613.96,-1419.55"/>
-<polygon fill="#000000" stroke="#000000" points="611.27,-1417.28 606.58,-1426.78 616.18,-1422.28 611.27,-1417.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M704.43,-1986.21C687.15,-1984.54 666.9,-1979.29 655,-1965 619.56,-1922.47 631.67,-1521.9 619,-1468 614.3,-1448.01 605.15,-1426.51 597.83,-1411.15"/>
+<polygon fill="#000000" stroke="#000000" points="600.9,-1409.46 593.35,-1402.03 594.61,-1412.55 600.9,-1409.46"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~orbel.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node25" class="node">
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764.5,-1956 709.5,-1956 709.5,-1932 764.5,-1932 764.5,-1956"/>
+<text text-anchor="middle" x="737" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M272.87,-1398.05C243,-1401.2 208.04,-1410.99 191,-1438"/>
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.42,-1944.38C691.82,-1946.04 669.41,-1951.06 655,-1965 578.1,-2039.43 683.44,-2242.4 587,-2196"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge108" class="edge">
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.23,-1944.57C691.07,-1943.4 668.07,-1938.58 655,-1923 589.81,-1845.3 642.53,-1566.66 619,-1468 614.24,-1448.03 605.09,-1426.52 597.79,-1411.16"/>
+<polygon fill="#000000" stroke="#000000" points="600.86,-1409.48 593.32,-1402.03 594.57,-1412.56 600.86,-1409.48"/>
+</g>
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-360 703,-360 703,-336 771,-336 771,-360"/>
-<text text-anchor="middle" x="737" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784.5,-1914 689.5,-1914 689.5,-1890 784.5,-1890 784.5,-1914"/>
+<text text-anchor="middle" x="737" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.88,-345.01C687.2,-342.27 668.9,-337.03 655,-327 609.91,-294.47 634.59,-193.25 587,-222"/>
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.18,-1905.42C676.66,-1908.48 664.1,-1913.81 655,-1923 567.01,-2011.84 699.68,-2250.21 587,-2196"/>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge94" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M703,-347.74C685.94,-349.49 666.36,-354.83 655,-369 582.46,-459.47 669.67,-1307.7 619,-1412 617.69,-1414.7 615.97,-1417.23 614.01,-1419.57"/>
-<polygon fill="#000000" stroke="#000000" points="611.32,-1417.3 606.64,-1426.81 616.23,-1422.3 611.32,-1417.3"/>
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge110" class="edge">
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.49,-1899.75C676.52,-1896.79 663.63,-1891.2 655,-1881 595.51,-1810.66 640.73,-1557.53 619,-1468 614.16,-1448.05 605.01,-1426.54 597.74,-1411.18"/>
+<polygon fill="#000000" stroke="#000000" points="600.81,-1409.5 593.29,-1402.04 594.52,-1412.57 600.81,-1409.5"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764.5,-318 709.5,-318 709.5,-294 764.5,-294 764.5,-318"/>
-<text text-anchor="middle" x="737" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-1872 710,-1872 710,-1848 764,-1848 764,-1872"/>
+<text text-anchor="middle" x="737" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.24,-302.47C692.83,-299.5 671.82,-294.2 655,-285 618.85,-265.23 622.26,-200.7 587,-222"/>
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.85,-1859.99C691.99,-1861.42 669.08,-1866.33 655,-1881 555.83,-1984.33 716.06,-2258.1 587,-2196"/>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge95" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.4,-305.23C691.07,-306.26 667.8,-311.01 655,-327 579.61,-421.16 671.64,-1303.47 619,-1412 617.69,-1414.7 615.97,-1417.23 614.01,-1419.57"/>
-<polygon fill="#000000" stroke="#000000" points="611.33,-1417.31 606.65,-1426.81 616.23,-1422.3 611.33,-1417.31"/>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge112" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.7,-1860.52C691.53,-1859.36 668.3,-1854.57 655,-1839 601.2,-1776.02 638.93,-1548.4 619,-1468 614.06,-1448.07 604.93,-1426.56 597.68,-1411.19"/>
+<polygon fill="#000000" stroke="#000000" points="600.76,-1409.53 593.25,-1402.05 594.46,-1412.58 600.76,-1409.53"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-276 710,-276 710,-252 764,-252 764,-276"/>
-<text text-anchor="middle" x="737" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="765.5,-1830 708.5,-1830 708.5,-1806 765.5,-1806 765.5,-1830"/>
+<text text-anchor="middle" x="737" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.65,-257.49C693.77,-253.49 673.17,-248.16 655,-243 624.57,-234.36 614.07,-205.64 587,-222"/>
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M708.19,-1818.01C690.52,-1819.55 668.51,-1824.58 655,-1839 544.59,-1956.89 732.55,-2266.03 587,-2196"/>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge97" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.78,-263.2C691.4,-264.19 667.88,-268.89 655,-285 576.76,-382.85 673.6,-1299.24 619,-1412 617.69,-1414.7 615.98,-1417.23 614.02,-1419.57"/>
-<polygon fill="#000000" stroke="#000000" points="611.33,-1417.31 606.65,-1426.82 616.24,-1422.3 611.33,-1417.31"/>
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge115" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M708.2,-1818.36C690.3,-1817.01 668.02,-1812.05 655,-1797 606.89,-1741.37 637.14,-1539.28 619,-1468 613.94,-1448.1 604.81,-1426.59 597.6,-1411.21"/>
+<polygon fill="#000000" stroke="#000000" points="600.69,-1409.56 593.2,-1402.06 594.38,-1412.59 600.69,-1409.56"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784.5,-234 689.5,-234 689.5,-210 784.5,-210 784.5,-234"/>
-<text text-anchor="middle" x="737" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-1788 694.5,-1788 694.5,-1764 779.5,-1764 779.5,-1788"/>
+<text text-anchor="middle" x="737" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.35,-210.18C658.17,-204.97 617.44,-203.61 587,-222"/>
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.21,-1777.81C679.92,-1780.54 665.02,-1786.09 655,-1797 533.31,-1929.48 749.1,-2274 587,-2196"/>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge100" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.13,-223.96C676.15,-226.91 663.34,-232.56 655,-243 573.9,-344.54 675.57,-1295.01 619,-1412 617.69,-1414.7 615.98,-1417.23 614.02,-1419.58"/>
-<polygon fill="#000000" stroke="#000000" points="611.33,-1417.31 606.66,-1426.82 616.24,-1422.3 611.33,-1417.31"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge114" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.37,-1774.51C679.92,-1771.83 664.88,-1766.24 655,-1755 612.57,-1706.72 635.34,-1530.17 619,-1468 613.78,-1448.14 604.67,-1426.63 597.51,-1411.23"/>
+<polygon fill="#000000" stroke="#000000" points="600.6,-1409.6 593.14,-1402.08 594.29,-1412.61 600.6,-1409.6"/>
 </g>
 <!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node30" class="node">
 <title>sourcefile~util_fill.f90</title>
 <g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="767,-192 707,-192 707,-168 767,-168 767,-192"/>
-<text text-anchor="middle" x="737" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="767,-1746 707,-1746 707,-1722 767,-1722 767,-1746"/>
+<text text-anchor="middle" x="737" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge29" class="edge">
 <title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.72,-183.54C675.27,-188.38 624.73,-199.21 587,-222"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.85,-1733.96C689.31,-1735.56 667.96,-1740.67 655,-1755 588.5,-1828.55 676.35,-2238.99 587,-2196"/>
 </g>
 <!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge102" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge116" class="edge">
 <title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.62,-179.39C688.76,-180.74 667.14,-185.78 655,-201 571.05,-306.23 677.53,-1290.78 619,-1412 617.7,-1414.7 615.98,-1417.23 614.02,-1419.58"/>
-<polygon fill="#000000" stroke="#000000" points="611.34,-1417.31 606.66,-1426.82 616.25,-1422.3 611.34,-1417.31"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M706.81,-1734.07C689.27,-1732.48 667.91,-1727.38 655,-1713 618.24,-1672.05 633.55,-1521.07 619,-1468 613.57,-1448.2 604.48,-1426.68 597.38,-1411.27"/>
+<polygon fill="#000000" stroke="#000000" points="600.49,-1409.65 593.05,-1402.1 594.15,-1412.64 600.49,-1409.65"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_valid.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node31" class="node">
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="773,-1704 701,-1704 701,-1680 773,-1680 773,-1704"/>
+<text text-anchor="middle" x="737" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.21,-2191.79C251.19,-2186.01 217.33,-2175.98 191,-2159"/>
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.71,-1692.58C684.51,-1694.75 666.41,-1700.21 655,-1713 582.84,-1793.88 684.67,-2243 587,-2196"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.84,-2186.81C303.9,-2172.68 285.91,-2148.45 273,-2126 241.65,-2071.49 213.01,-2002.88 199.38,-1968.59"/>
-<polygon fill="#000000" stroke="#000000" points="202.56,-1967.13 195.64,-1959.11 196.05,-1969.69 202.56,-1967.13"/>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge117" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.91,-1691.24C684.76,-1689.03 666.64,-1683.59 655,-1671 592.79,-1603.73 644.54,-1556 619,-1468 613.28,-1448.28 604.22,-1426.75 597.2,-1411.32"/>
+<polygon fill="#000000" stroke="#000000" points="600.32,-1409.73 592.93,-1402.14 593.97,-1412.68 600.32,-1409.73"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189,-2159C117.25,-2112.74 76.56,-2013.18 61.4,-1968.95"/>
-<polygon fill="#000000" stroke="#000000" points="64.64,-1967.59 58.17,-1959.2 58,-1969.79 64.64,-1967.59"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M436.19,-2196.88C419.54,-2190.26 397.92,-2182.51 378,-2178 337.26,-2168.78 226.11,-2181.63 191,-2159"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge116" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.7,-2196.98C465.95,-2108.38 469.93,-1556.51 378,-1424 375.94,-1421.03 373.44,-1418.38 370.66,-1416.02"/>
-<polygon fill="#000000" stroke="#000000" points="372.42,-1412.98 362.23,-1410.11 368.4,-1418.72 372.42,-1412.98"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.5,-1460C265.39,-1454.87 250.2,-1463.97 191,-1460"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge126" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M413.9,-2205.33C403.74,-2204.6 393.02,-2203.82 382.69,-2203.07"/>
-<polygon fill="#000000" stroke="#000000" points="382.75,-2199.57 372.52,-2202.34 382.24,-2206.55 382.75,-2199.57"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.5,-1444C420.88,-1445.71 375.73,-1419.06 349.42,-1400.16"/>
+<polygon fill="#000000" stroke="#000000" points="351.37,-1397.25 341.25,-1394.1 347.2,-1402.87 351.37,-1397.25"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge143" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M458.03,-2196.71C436.25,-2155.37 365.45,-2020.94 337.75,-1968.36"/>
-<polygon fill="#000000" stroke="#000000" points="340.71,-1966.48 332.96,-1959.26 334.52,-1969.74 340.71,-1966.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge52" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M552.93,-1387.84C545.05,-1387.3 536.35,-1386.72 527.59,-1386.12"/>
+<polygon fill="#000000" stroke="#000000" points="527.55,-1382.61 517.33,-1385.43 527.08,-1389.6 527.55,-1382.61"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775,-150 699,-150 699,-126 775,-126 775,-150"/>
-<text text-anchor="middle" x="737" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge58" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.5,-1444C411.26,-1446.08 421.22,-1392.16 378,-1361 375.94,-1359.52 373.77,-1358.12 371.52,-1356.8"/>
+<polygon fill="#000000" stroke="#000000" points="373.06,-1353.66 362.58,-1352.12 369.81,-1359.86 373.06,-1353.66"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M569.16,-1402.07C547.36,-1417.5 506.26,-1442.44 466.5,-1444"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge135" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.5,-1444C402.8,-1446.42 388.01,-1465.34 326.5,-1460"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.5,-1460C278.55,-1456.01 234.52,-1421.77 210.28,-1399.4"/>
+<polygon fill="#000000" stroke="#000000" points="212.5,-1396.68 202.85,-1392.32 207.68,-1401.75 212.5,-1396.68"/>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.67,-143.66C684.41,-146.83 668.38,-151.68 655,-159 618.85,-178.77 622.26,-200.7 587,-222"/>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node62" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="513,-338 418,-338 418,-314 513,-314 513,-338"/>
+<text text-anchor="middle" x="465.5" y="-323.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+</a>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge106" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.83,-138.2C682.82,-140.37 665.41,-145.94 655,-159 568.19,-267.92 679.5,-1286.55 619,-1412 617.7,-1414.7 615.98,-1417.23 614.03,-1419.58"/>
-<polygon fill="#000000" stroke="#000000" points="611.34,-1417.31 606.67,-1426.82 616.25,-1422.3 611.34,-1417.31"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge139" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.63,-1377.68C571.65,-1270.11 484.85,-490.77 468.99,-348.32"/>
+<polygon fill="#000000" stroke="#000000" points="472.44,-347.73 467.86,-338.18 465.48,-348.5 472.44,-347.73"/>
+</g>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M142.71,-1386.88C134.52,-1388.1 125.87,-1389.39 117.31,-1390.66"/>
+<polygon fill="#000000" stroke="#000000" points="116.72,-1387.21 107.34,-1392.14 117.75,-1394.13 116.72,-1387.21"/>
+</g>
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776.5,-108 697.5,-108 697.5,-84 776.5,-84 776.5,-108"/>
-<text text-anchor="middle" x="737" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="774.5,-1662 699.5,-1662 699.5,-1638 774.5,-1638 774.5,-1662"/>
+<text text-anchor="middle" x="737" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.2,-100.07C682.92,-103.04 667.25,-108.16 655,-117 609.91,-149.53 634.59,-193.25 587,-222"/>
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M699.41,-1650.69C683.52,-1652.96 666.05,-1658.47 655,-1671 577.17,-1759.21 693.01,-2247.01 587,-2196"/>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge107" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.15,-96.44C681.61,-98.76 665.04,-104.39 655,-117 565.34,-229.61 681.46,-1282.31 619,-1412 617.7,-1414.7 615.99,-1417.23 614.03,-1419.58"/>
-<polygon fill="#000000" stroke="#000000" points="611.34,-1417.31 606.67,-1426.82 616.25,-1422.3 611.34,-1417.31"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge123" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M699.09,-1648.71C683.53,-1646.28 666.41,-1640.8 655,-1629 604.03,-1576.29 640.99,-1537.95 619,-1468 612.84,-1448.41 603.82,-1426.87 596.93,-1411.4"/>
+<polygon fill="#000000" stroke="#000000" points="600.07,-1409.85 592.76,-1402.19 593.7,-1412.74 600.07,-1409.85"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="764,-66 710,-66 710,-42 764,-42 764,-66"/>
-<text text-anchor="middle" x="737" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="796,-1620 678,-1620 678,-1596 796,-1596 796,-1620"/>
+<text text-anchor="middle" x="737" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.67,-55.13C692.4,-57.13 670.28,-62.25 655,-75 599.74,-121.13 648.61,-184.78 587,-222"/>
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M677.98,-1613.91C669.24,-1617.19 661.12,-1622 655,-1629 571.49,-1724.55 701.35,-2251.02 587,-2196"/>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge110" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M709.76,-53.18C691.36,-54.16 667.84,-58.86 655,-75 608.74,-133.15 651.21,-1345.04 619,-1412 617.7,-1414.7 615.99,-1417.23 614.03,-1419.58"/>
-<polygon fill="#000000" stroke="#000000" points="611.34,-1417.32 606.67,-1426.83 616.25,-1422.3 611.34,-1417.32"/>
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge125" class="edge">
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M677.73,-1600.7C669.33,-1597.55 661.39,-1593.14 655,-1587 615.15,-1548.72 637.51,-1520.06 619,-1468 612.08,-1448.54 603.07,-1426.84 596.37,-1411.28"/>
+<polygon fill="#000000" stroke="#000000" points="599.55,-1409.8 592.35,-1402.02 593.13,-1412.59 599.55,-1409.8"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-24 694.5,-24 694.5,0 779.5,0 779.5,-24"/>
-<text text-anchor="middle" x="737" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-1578 703,-1578 703,-1554 771,-1554 771,-1578"/>
+<text text-anchor="middle" x="737" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-222C432.7,-314.01 474.74,-416.75 414,-584 280.09,-952.72 394.65,-1102.72 191,-1438"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M189,-1438C82.89,-1603.37 60.15,-1849.91 55.58,-1924.7"/>
-<polygon fill="#000000" stroke="#000000" points="52.08,-1924.65 55.01,-1934.83 59.07,-1925.04 52.08,-1924.65"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.38,-14.98C680.44,-17.86 665.73,-23.21 655,-33 589.05,-93.17 657.49,-167.23 587,-222"/>
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.61,-1566.18C685.86,-1568.12 666.7,-1573.5 655,-1587 565.81,-1689.9 703.44,-2266.6 587,-2196"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-2196C267.73,-2003.63 561.2,-1484.82 191,-1460"/>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge112" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.19,-12.91C679.53,-15.49 664.4,-21.17 655,-33 607.31,-92.99 652.2,-1342.93 619,-1412 617.7,-1414.7 615.99,-1417.24 614.03,-1419.58"/>
-<polygon fill="#000000" stroke="#000000" points="611.35,-1417.32 606.68,-1426.83 616.26,-1422.3 611.35,-1417.32"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge126" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.94,-1564.09C686.9,-1561.62 668.27,-1556.3 655,-1545 649.55,-1540.36 612.97,-1452.92 595.83,-1411.46"/>
+<polygon fill="#000000" stroke="#000000" points="599.07,-1410.13 592.02,-1402.22 592.6,-1412.8 599.07,-1410.13"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="812,-2418 662,-2418 662,-2394 812,-2394 812,-2418"/>
-<text text-anchor="middle" x="737" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="790,-1326 684,-1326 684,-1302 790,-1302 790,-1326"/>
+<text text-anchor="middle" x="737" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M664.84,-2393.96C661.17,-2391.46 657.83,-2388.5 655,-2385 596.74,-2312.97 633.72,-1643.46 619,-1552 613.8,-1519.68 602.53,-1483.45 594.86,-1460.93"/>
-<polygon fill="#000000" stroke="#000000" points="598.11,-1459.62 591.52,-1451.33 591.5,-1461.92 598.11,-1459.62"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge45" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M683.8,-1307.18C673.52,-1304.06 663.35,-1299.54 655,-1293 604.92,-1253.74 639.55,-1131.12 587,-1167"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge131" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M683.86,-2418.05C653.72,-2422.19 616.11,-2422.32 587,-2406"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge62" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M683.81,-1324.02C673.96,-1326.88 663.95,-1330.49 655,-1335 636.81,-1344.17 619.01,-1358.83 606.19,-1370.71"/>
+<polygon fill="#000000" stroke="#000000" points="603.71,-1368.24 598.89,-1377.68 608.54,-1373.31 603.71,-1368.24"/>
 </g>
 <!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node38" class="node">
 <title>sourcefile~symba_step.f90</title>
 <g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="781,-2376 693,-2376 693,-2352 781,-2352 781,-2376"/>
-<text text-anchor="middle" x="737" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="781,-1284 693,-1284 693,-1260 781,-1260 781,-1284"/>
+<text text-anchor="middle" x="737" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M692.62,-2362.68C678.51,-2359.96 664.15,-2354.28 655,-2343 599.59,-2274.66 633.08,-1638.85 619,-1552 613.76,-1519.68 602.5,-1483.45 594.84,-1460.93"/>
-<polygon fill="#000000" stroke="#000000" points="598.09,-1459.63 591.51,-1451.33 591.48,-1461.92 598.09,-1459.63"/>
-</g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge133" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge46" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M692.6,-2374.86C680.41,-2378.02 667.16,-2381.55 655,-2385 624.57,-2393.64 614.59,-2421.47 587,-2406"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M692.7,-1266.09C679.86,-1262.98 666.24,-1258.23 655,-1251 614.61,-1225 626.67,-1139.92 587,-1167"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge71" class="edge">
+<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M692.8,-1277.33C679.83,-1280.42 666.1,-1285.3 655,-1293 627.45,-1312.11 607.41,-1346.22 596.49,-1368.48"/>
+<polygon fill="#000000" stroke="#000000" points="593.21,-1367.23 592.12,-1377.77 599.54,-1370.21 593.21,-1367.23"/>
+</g>
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776,-528 698,-528 698,-504 776,-504 776,-528"/>
-<text text-anchor="middle" x="737" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-1242 694,-1242 694,-1218 780,-1218 780,-1242"/>
+<text text-anchor="middle" x="737" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.65,-516.44C682,-518.74 665.22,-524.34 655,-537 593.88,-612.72 661.81,-1324.62 619,-1412 617.68,-1414.69 615.96,-1417.22 613.99,-1419.56"/>
-<polygon fill="#000000" stroke="#000000" points="611.3,-1417.3 606.62,-1426.8 616.21,-1422.29 611.3,-1417.3"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge47" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694,-1221.65C681.21,-1218.44 667.29,-1214.25 655,-1209 622.33,-1195.05 616.34,-1146.97 587,-1167"/>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge114" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.88,-522.89C667.87,-527.95 624.92,-534.38 587,-537"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.71,-1233.93C680.19,-1236.91 665.92,-1242.09 655,-1251 617.77,-1281.4 599.37,-1337.2 591.66,-1368.05"/>
+<polygon fill="#000000" stroke="#000000" points="588.24,-1367.3 589.36,-1377.83 595.05,-1368.9 588.24,-1367.3"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="793,-486 681,-486 681,-462 793,-462 793,-486"/>
-<text text-anchor="middle" x="737" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="788.5,-1200 685.5,-1200 685.5,-1176 788.5,-1176 788.5,-1200"/>
+<text text-anchor="middle" x="737" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M680.79,-478.33C670.84,-481.63 661.56,-486.85 655,-495 591.03,-574.4 663.77,-1320.39 619,-1412 617.68,-1414.69 615.96,-1417.22 614,-1419.56"/>
-<polygon fill="#000000" stroke="#000000" points="611.31,-1417.3 606.63,-1426.8 616.21,-1422.29 611.31,-1417.3"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge50" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.47,-1177.49C645.52,-1169.74 595.14,-1161.44 587,-1167"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge115" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M680.79,-485.93C672.02,-488.51 663.15,-491.52 655,-495 622.33,-508.95 622.44,-534.55 587,-537"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge67" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.2,-1193.35C674.24,-1196.51 663.42,-1201.42 655,-1209 607.98,-1251.29 593.34,-1329.37 588.88,-1367.65"/>
+<polygon fill="#000000" stroke="#000000" points="585.39,-1367.45 587.84,-1377.75 592.35,-1368.16 585.39,-1367.45"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="773.5,-2124 700.5,-2124 700.5,-2100 773.5,-2100 773.5,-2124"/>
-<text text-anchor="middle" x="737" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-276 698.5,-276 698.5,-252 775.5,-252 775.5,-276"/>
+<text text-anchor="middle" x="737" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.3,-2109.39C670.01,-2107.8 625.47,-2106.93 587,-2112"/>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge69" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.48,-264.32C682.6,-266.53 665.4,-272.11 655,-285 623.73,-323.78 623.78,-1131.41 619,-1181 612.4,-1249.51 598.3,-1329.77 591.23,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.76,-1367.34 589.36,-1377.81 594.64,-1368.63 587.76,-1367.34"/>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.3,-2111.78C684,-2109.69 665.94,-2104.2 655,-2091 616.71,-2044.78 629.23,-1611.14 619,-1552 613.39,-1519.57 602.13,-1483.1 594.58,-1460.59"/>
-<polygon fill="#000000" stroke="#000000" points="597.85,-1459.34 591.3,-1451.01 591.23,-1461.61 597.85,-1459.34"/>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge133" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.26,-258.25C684.11,-255.07 668.26,-250.25 655,-243 618.85,-223.23 627.82,-174.43 587,-180"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-2670 698.5,-2670 698.5,-2646 775.5,-2646 775.5,-2670"/>
-<text text-anchor="middle" x="737" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="808,-570 666,-570 666,-546 808,-546 808,-570"/>
+<text text-anchor="middle" x="737" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.44,-2657.72C682.55,-2655.51 665.35,-2649.93 655,-2637 617.31,-2589.92 628.28,-1611.59 619,-1552 613.96,-1519.65 602.65,-1483.43 594.92,-1460.91"/>
-<polygon fill="#000000" stroke="#000000" points="598.17,-1459.6 591.56,-1451.32 591.57,-1461.92 598.17,-1459.6"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge72" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.99,-569.38C661.87,-572.01 658.14,-575.19 655,-579 612.43,-630.75 626.08,-1114.37 619,-1181 611.73,-1249.44 597.94,-1329.74 591.09,-1367.81"/>
+<polygon fill="#000000" stroke="#000000" points="587.62,-1367.34 589.27,-1377.8 594.5,-1368.59 587.62,-1367.34"/>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge125" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.4,-2667.37C684.7,-2670.88 669.11,-2674.99 655,-2679 624.57,-2687.64 617.74,-2707.44 587,-2700"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge140" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M671.2,-545.99C665.45,-543.53 659.95,-540.57 655,-537 609.91,-504.47 639.02,-451.62 587,-432"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="790,-2334 684,-2334 684,-2310 790,-2310 790,-2334"/>
-<text text-anchor="middle" x="737" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="788.5,-1368 685.5,-1368 685.5,-1344 788.5,-1344 788.5,-1368"/>
+<text text-anchor="middle" x="737" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M683.76,-2318.54C672.72,-2315.31 662.24,-2309.91 655,-2301 602.44,-2236.35 632.44,-1634.23 619,-1552 613.69,-1519.52 602.35,-1483.07 594.7,-1460.57"/>
-<polygon fill="#000000" stroke="#000000" points="597.97,-1459.3 591.38,-1451 591.35,-1461.6 597.97,-1459.3"/>
-</g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge134" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M683.99,-2331.42C674.02,-2334.34 663.92,-2338.12 655,-2343 618.85,-2362.77 622.94,-2426.15 587,-2406"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge74" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.14,-1367.61C666.96,-1371.75 646.68,-1376.38 629.3,-1380.35"/>
+<polygon fill="#000000" stroke="#000000" points="628.41,-1376.96 619.44,-1382.6 629.96,-1383.79 628.41,-1376.96"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-2082 703,-2082 703,-2058 771,-2058 771,-2082"/>
-<text text-anchor="middle" x="737" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="788.5,-1452 685.5,-1452 685.5,-1428 788.5,-1428 788.5,-1452"/>
+<text text-anchor="middle" x="737" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.8,-2078.24C688.11,-2081.98 670.65,-2086.56 655,-2091 624.57,-2099.64 618.36,-2107.87 587,-2112"/>
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M687.93,-1452.07C677.07,-1454.91 665.62,-1457.98 655,-1461 624.57,-1469.64 618.63,-1482 587,-1482"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-1482C508.26,-1482 483.84,-1489.8 414,-1458 385.42,-1444.98 359.16,-1419.59 343.02,-1401.74"/>
+<polygon fill="#000000" stroke="#000000" points="345.57,-1399.35 336.34,-1394.15 340.32,-1403.97 345.57,-1399.35"/>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.8,-2070.05C685.9,-2068.2 666.53,-2062.84 655,-2049 619.56,-2006.47 628.59,-1606.53 619,-1552 613.3,-1519.58 602.06,-1483.11 594.54,-1460.6"/>
-<polygon fill="#000000" stroke="#000000" points="597.82,-1459.36 591.28,-1451.02 591.19,-1461.61 597.82,-1459.36"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge76" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.1,-1428.05C675.04,-1425.34 664.63,-1422.28 655,-1419 644.12,-1415.29 632.53,-1410.63 622.05,-1406.13"/>
+<polygon fill="#000000" stroke="#000000" points="623.37,-1402.89 612.8,-1402.08 620.56,-1409.3 623.37,-1402.89"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-2040 694.5,-2040 694.5,-2016 779.5,-2016 779.5,-2040"/>
-<text text-anchor="middle" x="737" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776,-948 698,-948 698,-924 776,-924 776,-948"/>
+<text text-anchor="middle" x="737" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.14,-2034.71C681.08,-2037.88 666.98,-2042.45 655,-2049 618.85,-2068.77 628.2,-2112.37 587,-2112"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.5,-2112C263.91,-2078.18 220.23,-2004.85 201.36,-1968.42"/>
-<polygon fill="#000000" stroke="#000000" points="204.33,-1966.54 196.7,-1959.19 198.08,-1969.7 204.33,-1966.54"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-2112C470.12,-2110.95 426.82,-2167.99 326.5,-2112"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.99,-926.53C684.39,-923.04 668.98,-918.97 655,-915 624.57,-906.36 618.56,-891.82 587,-894"/>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.09,-2026.75C679.61,-2024.1 664.62,-2018.46 655,-2007 589.81,-1929.3 636.9,-1651.83 619,-1552 613.19,-1519.6 601.98,-1483.13 594.5,-1460.6"/>
-<polygon fill="#000000" stroke="#000000" points="597.77,-1459.37 591.25,-1451.02 591.14,-1461.62 597.77,-1459.37"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge79" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.9,-937.08C682.5,-939.52 665.83,-945.05 655,-957 653.24,-958.94 604.03,-1278.97 590.45,-1367.52"/>
+<polygon fill="#000000" stroke="#000000" points="586.96,-1367.16 588.9,-1377.57 593.88,-1368.22 586.96,-1367.16"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776,-1746 698,-1746 698,-1722 776,-1722 776,-1746"/>
-<text text-anchor="middle" x="737" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="793,-906 681,-906 681,-882 793,-882 793,-906"/>
+<text text-anchor="middle" x="737" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.85,-1732.51C682.62,-1729.98 666.11,-1724.49 655,-1713 604.03,-1660.29 637,-1623.08 619,-1552 610.92,-1520.09 600.31,-1483.49 593.57,-1460.8"/>
-<polygon fill="#000000" stroke="#000000" points="596.9,-1459.73 590.68,-1451.15 590.19,-1461.73 596.9,-1459.73"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M680.74,-892.19C652.64,-891.72 617.97,-891.86 587,-894"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge147" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.61,-1737.99C683.22,-1740.94 667.37,-1746.08 655,-1755 609.91,-1787.53 642.6,-1860 587,-1860"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-1860C532.33,-1860 503.06,-1822.09 466.5,-1860"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge80" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M680.96,-898.96C671.13,-902.23 661.85,-907.29 655,-915 615.41,-959.62 627.51,-1121.96 619,-1181 609.18,-1249.12 596.58,-1329.57 590.54,-1367.74"/>
+<polygon fill="#000000" stroke="#000000" points="587.06,-1367.34 588.95,-1377.76 593.97,-1368.43 587.06,-1367.34"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="785,-444 689,-444 689,-420 785,-420 785,-444"/>
-<text text-anchor="middle" x="737" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-150 703,-150 703,-126 771,-126 771,-150"/>
+<text text-anchor="middle" x="737" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M688.75,-434.09C675.91,-437.07 663.29,-442.7 655,-453 588.17,-536.09 665.74,-1316.16 619,-1412 617.69,-1414.7 615.96,-1417.22 614,-1419.57"/>
-<polygon fill="#000000" stroke="#000000" points="611.31,-1417.3 606.63,-1426.81 616.22,-1422.29 611.31,-1417.3"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge83" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.59,-137.79C685.63,-139.58 666.27,-144.95 655,-159 619.45,-203.31 624.31,-1124.44 619,-1181 612.57,-1249.52 598.39,-1329.78 591.27,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.8,-1367.34 589.38,-1377.81 594.68,-1368.64 587.8,-1367.34"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge121" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M688.91,-438.87C677.22,-441.97 665.14,-446.47 655,-453 614.61,-479 634.92,-533.68 587,-537"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge131" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.8,-146.24C688.11,-149.98 670.65,-154.56 655,-159 624.57,-167.64 618.34,-175.72 587,-180"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776.5,-2628 697.5,-2628 697.5,-2604 776.5,-2604 776.5,-2628"/>
-<text text-anchor="middle" x="737" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-780 698.5,-780 698.5,-756 775.5,-756 775.5,-780"/>
+<text text-anchor="middle" x="737" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.19,-2615.53C681.65,-2613.2 665.09,-2607.58 655,-2595 618.73,-2549.76 627.96,-1609.28 619,-1552 613.94,-1519.65 602.64,-1483.43 594.91,-1460.92"/>
-<polygon fill="#000000" stroke="#000000" points="598.16,-1459.6 591.55,-1451.32 591.56,-1461.92 598.16,-1459.6"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge57" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.12,-760.66C684.26,-757.33 668.63,-752.82 655,-747 622.33,-733.05 622.44,-702.55 587,-705"/>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge122" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-2700C366.58,-2700 332.53,-2319.28 327.39,-2221.61"/>
-<polygon fill="#000000" stroke="#000000" points="330.87,-2221.21 326.9,-2211.38 323.88,-2221.54 330.87,-2221.21"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.44,-2621.94C683.5,-2625.11 668,-2629.89 655,-2637 618.85,-2656.77 627.04,-2709.7 587,-2700"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge85" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.36,-768.63C682.66,-770.93 665.63,-776.49 655,-789 598.35,-855.66 629.62,-1094.17 619,-1181 610.64,-1249.31 597.36,-1329.67 590.85,-1367.79"/>
+<polygon fill="#000000" stroke="#000000" points="587.38,-1367.34 589.13,-1377.79 594.28,-1368.52 587.38,-1367.34"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="788.5,-2292 685.5,-2292 685.5,-2268 788.5,-2268 788.5,-2292"/>
-<text text-anchor="middle" x="737" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="773.5,-528 700.5,-528 700.5,-504 773.5,-504 773.5,-528"/>
+<text text-anchor="middle" x="737" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.46,-2276.99C673.81,-2273.84 662.62,-2268.35 655,-2259 605.3,-2198.04 631.8,-1629.61 619,-1552 613.64,-1519.52 602.32,-1483.07 594.68,-1460.57"/>
-<polygon fill="#000000" stroke="#000000" points="597.95,-1459.31 591.37,-1451 591.33,-1461.6 597.95,-1459.31"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge89" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.24,-516.17C683.92,-518.24 665.87,-523.74 655,-537 609.58,-592.43 626.43,-1109.72 619,-1181 611.86,-1249.45 598.02,-1329.74 591.12,-1367.82"/>
+<polygon fill="#000000" stroke="#000000" points="587.64,-1367.34 589.29,-1377.8 594.53,-1368.6 587.64,-1367.34"/>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge129" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.46,-2286.97C674.73,-2290.07 663.95,-2294.54 655,-2301 609.91,-2333.53 635.5,-2433.19 587,-2406"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge142" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.29,-510.7C685.64,-507.53 668.89,-502.6 655,-495 618.85,-475.23 625.55,-446.54 587,-432"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="773.5,-1998 700.5,-1998 700.5,-1974 773.5,-1974 773.5,-1998"/>
-<text text-anchor="middle" x="737" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775,-1116 699,-1116 699,-1092 775,-1092 775,-1116"/>
+<text text-anchor="middle" x="737" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.41,-1985.68C684.14,-1983.57 666.07,-1978.09 655,-1965 595.51,-1894.66 635.62,-1642.61 619,-1552 613.06,-1519.62 601.89,-1483.15 594.44,-1460.61"/>
-<polygon fill="#000000" stroke="#000000" points="597.72,-1459.39 591.22,-1451.03 591.09,-1461.62 597.72,-1459.39"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge53" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.94,-1111.14C684.87,-1114.49 668.9,-1119.07 655,-1125 622.33,-1138.95 616.34,-1146.97 587,-1167"/>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge139" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.47,-1982.58C685.35,-1979.73 668.2,-1974.52 655,-1965 609.91,-1932.47 642.6,-1860 587,-1860"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge90" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.85,-1105.52C683.43,-1108.02 666.49,-1113.48 655,-1125 620.41,-1159.68 597.42,-1310.49 589.79,-1367.79"/>
+<polygon fill="#000000" stroke="#000000" points="586.29,-1367.58 588.47,-1377.95 593.23,-1368.48 586.29,-1367.58"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-2250 690,-2250 690,-2226 784,-2226 784,-2250"/>
-<text text-anchor="middle" x="737" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776,-486 698,-486 698,-462 776,-462 776,-486"/>
+<text text-anchor="middle" x="737" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.71,-2236.02C676.58,-2233.09 663.55,-2227.46 655,-2217 608.15,-2159.72 631.16,-1624.99 619,-1552 613.59,-1519.53 602.28,-1483.08 594.66,-1460.58"/>
-<polygon fill="#000000" stroke="#000000" points="597.93,-1459.32 591.36,-1451.01 591.31,-1461.6 597.93,-1459.32"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge93" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.71,-474.5C682.08,-476.8 665.29,-482.4 655,-495 606.72,-554.12 626.79,-1105.07 619,-1181 611.98,-1249.46 598.08,-1329.75 591.14,-1367.82"/>
+<polygon fill="#000000" stroke="#000000" points="587.67,-1367.34 589.3,-1377.8 594.55,-1368.6 587.67,-1367.34"/>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge130" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-2406C517.12,-2367.95 483.9,-2273.58 471.92,-2230.76"/>
-<polygon fill="#000000" stroke="#000000" points="475.29,-2229.8 469.32,-2221.05 468.52,-2231.61 475.29,-2229.8"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.81,-2242.68C677.45,-2245.77 664.81,-2250.81 655,-2259 599.74,-2305.13 649.79,-2441.2 587,-2406"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge145" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.76,-465.15C667.31,-457.64 623.84,-445.9 587,-432"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="778,-2586 696,-2586 696,-2562 778,-2562 778,-2586"/>
-<text text-anchor="middle" x="737" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="777,-444 697,-444 697,-420 777,-420 777,-444"/>
+<text text-anchor="middle" x="737" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.93,-2573.33C680.77,-2570.88 664.82,-2565.23 655,-2553 620.16,-2509.61 627.64,-1606.97 619,-1552 613.91,-1519.66 602.62,-1483.43 594.9,-1460.92"/>
-<polygon fill="#000000" stroke="#000000" points="598.15,-1459.61 591.55,-1451.32 591.55,-1461.92 598.15,-1459.61"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge96" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M696.86,-432.61C681.46,-434.99 665.09,-440.61 655,-453 603.87,-515.81 627.14,-1100.42 619,-1181 612.08,-1249.48 598.13,-1329.76 591.16,-1367.82"/>
+<polygon fill="#000000" stroke="#000000" points="587.69,-1367.34 589.32,-1377.81 594.58,-1368.61 587.69,-1367.34"/>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge132" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.68,-2570.65C681.54,-2567.76 666.38,-2562.5 655,-2553 599.74,-2506.87 649.79,-2441.2 587,-2406"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge146" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M696.68,-439.38C665.83,-443.46 622.34,-445.33 587,-432"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.81,-1947C268.1,-1947 257.76,-1947 247.74,-1947"/>
-<polygon fill="#000000" stroke="#000000" points="247.44,-1943.5 237.44,-1947 247.44,-1950.5 247.44,-1943.5"/>
+<!-- sourcefile~helio_gr.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node53" class="node">
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-738 703,-738 703,-714 771,-714 771,-738"/>
+<text text-anchor="middle" x="737" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+</g>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge56" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.71,-717.26C672.6,-710.33 627,-702.23 587,-705"/>
+</g>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge97" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.86,-726C685.97,-727.86 666.6,-733.22 655,-747 623.83,-784.01 624.67,-1132.94 619,-1181 610.94,-1249.35 597.52,-1329.69 590.92,-1367.79"/>
+<polygon fill="#000000" stroke="#000000" points="587.44,-1367.34 589.17,-1377.79 594.34,-1368.54 587.44,-1367.34"/>
+</g>
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-1704 698.5,-1704 698.5,-1680 775.5,-1680 775.5,-1704"/>
-<text text-anchor="middle" x="737" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="778,-1074 696,-1074 696,-1050 778,-1050 778,-1074"/>
+<text text-anchor="middle" x="737" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.29,-1690.56C668.14,-1689.76 624.81,-1689.38 587,-1692"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge48" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.62,-1067.22C681.95,-1070.31 667.09,-1075.22 655,-1083 614.61,-1109 626.67,-1139.92 587,-1167"/>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.21,-1690.15C683.04,-1687.56 666.48,-1682.12 655,-1671 653.05,-1669.11 609.73,-1518.37 593.27,-1460.91"/>
-<polygon fill="#000000" stroke="#000000" points="596.56,-1459.68 590.44,-1451.03 589.83,-1461.61 596.56,-1459.68"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge98" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.76,-1063.84C681.12,-1066.52 665.59,-1072.02 655,-1083 634.89,-1103.84 601.4,-1301.04 590.53,-1367.93"/>
+<polygon fill="#000000" stroke="#000000" points="587.07,-1367.41 588.93,-1377.84 593.98,-1368.53 587.07,-1367.41"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-2796 703,-2796 703,-2772 771,-2772 771,-2796"/>
-<text text-anchor="middle" x="737" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="786,-1410 688,-1410 688,-1386 786,-1386 786,-1410"/>
+<text text-anchor="middle" x="737" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.97,-2784.28C685.9,-2782.53 666.33,-2777.19 655,-2763 613.02,-2710.39 629.25,-1618.52 619,-1552 614.02,-1519.64 602.69,-1483.42 594.95,-1460.91"/>
-<polygon fill="#000000" stroke="#000000" points="598.19,-1459.59 591.57,-1451.32 591.59,-1461.91 598.19,-1459.59"/>
-</g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge123" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.69,-2779.2C687.49,-2776.07 669.66,-2771.02 655,-2763 618.85,-2743.23 627.04,-2709.7 587,-2700"/>
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge99" class="edge">
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M687.62,-1395.4C668.78,-1394.39 647.39,-1393.24 629.19,-1392.27"/>
+<polygon fill="#000000" stroke="#000000" points="629.34,-1388.77 619.16,-1391.73 628.96,-1395.76 629.34,-1388.77"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="777,-1956 697,-1956 697,-1932 777,-1932 777,-1956"/>
-<text text-anchor="middle" x="737" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776.5,-66 697.5,-66 697.5,-42 776.5,-42 776.5,-66"/>
+<text text-anchor="middle" x="737" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge70" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M696.72,-1943.09C681.5,-1940.63 665.28,-1935.04 655,-1923 601.2,-1860.02 634.35,-1633.4 619,-1552 612.9,-1519.65 601.77,-1483.17 594.38,-1460.63"/>
-<polygon fill="#000000" stroke="#000000" points="597.66,-1459.42 591.18,-1451.04 591.02,-1461.63 597.66,-1459.42"/>
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge100" class="edge">
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.18,-54.46C681.64,-56.79 665.07,-62.41 655,-75 616.59,-123 624.66,-1119.78 619,-1181 612.66,-1249.53 598.44,-1329.79 591.29,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.82,-1367.34 589.39,-1377.81 594.7,-1368.64 587.82,-1367.34"/>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge142" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M696.62,-1937.88C682.89,-1934.7 667.75,-1929.97 655,-1923 618.85,-1903.23 628.2,-1860 587,-1860"/>
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge134" class="edge">
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.2,-58.07C682.92,-61.04 667.25,-66.16 655,-75 609.91,-107.53 642.09,-172.48 587,-180"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-2754 698.5,-2754 698.5,-2730 775.5,-2730 775.5,-2754"/>
-<text text-anchor="middle" x="737" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="799,-864 675,-864 675,-840 799,-840 799,-864"/>
+<text text-anchor="middle" x="737" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge74" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.42,-2741.73C682.53,-2739.52 665.34,-2733.94 655,-2721 614.45,-2670.23 628.93,-1616.21 619,-1552 614,-1519.64 602.68,-1483.42 594.94,-1460.91"/>
-<polygon fill="#000000" stroke="#000000" points="598.19,-1459.59 591.57,-1451.32 591.58,-1461.91 598.19,-1459.59"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge41" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M687.93,-864.07C677.07,-866.91 665.62,-869.98 655,-873 624.57,-881.64 618.56,-891.82 587,-894"/>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge124" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.4,-2732.63C684.7,-2729.12 669.11,-2725.01 655,-2721 624.57,-2712.36 617.74,-2707.44 587,-2700"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge101" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M674.72,-859.19C667.23,-862.41 660.34,-866.87 655,-873 609.73,-924.96 628.22,-1112.71 619,-1181 609.8,-1249.21 596.91,-1329.61 590.67,-1367.76"/>
+<polygon fill="#000000" stroke="#000000" points="587.19,-1367.34 589.03,-1377.77 594.1,-1368.47 587.19,-1367.34"/>
+</g>
+<!-- sourcefile~rmvs_io.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node58" class="node">
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-402 703,-402 703,-378 771,-378 771,-402"/>
+<text text-anchor="middle" x="737" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge102" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.66,-389.84C685.71,-391.65 666.35,-397.01 655,-411 601.02,-477.49 627.49,-1095.77 619,-1181 612.18,-1249.48 598.18,-1329.76 591.18,-1367.82"/>
+<polygon fill="#000000" stroke="#000000" points="587.71,-1367.34 589.33,-1377.81 594.59,-1368.61 587.71,-1367.34"/>
+</g>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge143" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.8,-398.24C688.11,-401.98 670.65,-406.56 655,-411 624.57,-419.64 616.59,-443.16 587,-432"/>
 </g>
 <!-- sourcefile~whm_kick.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node58" class="node">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node59" class="node">
 <title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-1662 698.5,-1662 698.5,-1638 775.5,-1638 775.5,-1662"/>
-<text text-anchor="middle" x="737" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-24 698.5,-24 698.5,0 775.5,0 775.5,-24"/>
+<text text-anchor="middle" x="737" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.4,-1659.37C684.7,-1662.88 669.11,-1666.99 655,-1671 624.57,-1679.64 618.56,-1689.82 587,-1692"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-1692C413.78,-1703.85 257.58,-1868.84 207.6,-1926.94"/>
-<polygon fill="#000000" stroke="#000000" points="204.81,-1924.81 201.01,-1934.7 210.15,-1929.34 204.81,-1924.81"/>
-</g>
 <!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge80" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge103" class="edge">
 <title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.11,-1647.75C683.11,-1645.07 666.69,-1639.68 655,-1629 642.08,-1617.19 607.88,-1507.99 593.51,-1460.68"/>
-<polygon fill="#000000" stroke="#000000" points="596.85,-1459.64 590.6,-1451.08 590.15,-1461.67 596.85,-1459.64"/>
-</g>
-<!-- sourcefile~symba_kick.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-2544 694,-2544 694,-2520 780,-2520 780,-2544"/>
-<text text-anchor="middle" x="737" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge82" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.83,-2530.96C679.32,-2528.34 664.38,-2522.66 655,-2511 621.59,-2469.45 627.32,-1604.66 619,-1552 613.89,-1519.66 602.6,-1483.43 594.89,-1460.92"/>
-<polygon fill="#000000" stroke="#000000" points="598.14,-1459.61 591.54,-1451.32 591.54,-1461.92 598.14,-1459.61"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.43,-12.27C682.53,-14.48 665.34,-20.06 655,-33 615.16,-82.85 624.84,-1117.46 619,-1181 612.7,-1249.54 598.46,-1329.79 591.3,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.83,-1367.34 589.39,-1377.81 594.7,-1368.65 587.83,-1367.34"/>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge135" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.88,-2527.21C680.53,-2524.15 666.31,-2519.16 655,-2511 609.91,-2478.47 635.5,-2433.19 587,-2406"/>
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge136" class="edge">
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.16,-14.86C683.34,-17.64 667.04,-22.95 655,-33 599.74,-79.13 658.32,-170.27 587,-180"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-180C471.17,-195.54 427.93,-126.05 326.5,-180"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.5,-180C216.78,-239.28 194.38,-1197.83 191.38,-1357.53"/>
+<polygon fill="#000000" stroke="#000000" points="187.88,-1357.56 191.2,-1367.62 194.88,-1357.69 187.88,-1357.56"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-1914 694,-1914 694,-1890 780,-1890 780,-1914"/>
-<text text-anchor="middle" x="737" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775.5,-654 698.5,-654 698.5,-630 775.5,-630 775.5,-654"/>
+<text text-anchor="middle" x="737" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge83" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.85,-1900.51C679.52,-1897.82 664.69,-1892.21 655,-1881 606.89,-1825.37 633.07,-1624.19 619,-1552 612.7,-1519.69 601.62,-1483.2 594.3,-1460.64"/>
-<polygon fill="#000000" stroke="#000000" points="597.59,-1459.45 591.13,-1451.05 590.94,-1461.64 597.59,-1459.45"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge61" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.12,-649.34C684.26,-652.67 668.63,-657.18 655,-663 622.33,-676.95 622.44,-702.55 587,-705"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge145" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.86,-1891.47C681.32,-1888.23 667.58,-1884.57 655,-1881 624.57,-1872.36 618.63,-1860 587,-1860"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge105" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.23,-642.52C682.5,-644.8 665.49,-650.37 655,-663 618.13,-707.38 625.37,-1123.66 619,-1181 611.4,-1249.4 597.77,-1329.72 591.02,-1367.8"/>
+<polygon fill="#000000" stroke="#000000" points="587.54,-1367.34 589.23,-1377.8 594.43,-1368.57 587.54,-1367.34"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779,-402 695,-402 695,-378 779,-378 779,-402"/>
-<text text-anchor="middle" x="737" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-234 694,-234 694,-210 780,-210 780,-234"/>
+<text text-anchor="middle" x="737" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge85" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.67,-390.89C679.89,-393.44 664.55,-399.11 655,-411 585.32,-497.78 667.7,-1311.93 619,-1412 617.69,-1414.7 615.97,-1417.22 614.01,-1419.57"/>
-<polygon fill="#000000" stroke="#000000" points="611.32,-1417.3 606.64,-1426.81 616.22,-1422.3 611.32,-1417.3"/>
-</g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge113" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.74,-394C681,-396.98 666.32,-402.13 655,-411 604.92,-450.26 650.48,-532.61 587,-537"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-537C405.16,-549.45 339.39,-1240.58 328.27,-1375.36"/>
-<polygon fill="#000000" stroke="#000000" points="324.75,-1375.44 327.43,-1385.69 331.73,-1376.01 324.75,-1375.44"/>
-</g>
-<!-- sourcefile~whm_step.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776.5,-2208 697.5,-2208 697.5,-2184 776.5,-2184 776.5,-2208"/>
-<text text-anchor="middle" x="737" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
-</a>
-</g>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge106" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.84,-223.05C679.33,-225.67 664.38,-231.34 655,-243 622.3,-283.62 623.95,-1129.09 619,-1181 612.46,-1249.51 598.34,-1329.78 591.24,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.77,-1367.34 589.36,-1377.81 594.65,-1368.63 587.77,-1367.34"/>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.36,-2196.92C620.52,-2196.97 445.69,-2187.97 326.5,-2112"/>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge137" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.86,-211.47C681.32,-208.23 667.58,-204.57 655,-201 624.57,-192.36 618.34,-175.72 587,-180"/>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge89" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.33,-2195.42C681.82,-2193.07 665.23,-2187.46 655,-2175 611,-2121.41 630.51,-1620.37 619,-1552 613.53,-1519.54 602.24,-1483.08 594.64,-1460.58"/>
-<polygon fill="#000000" stroke="#000000" points="597.91,-1459.32 591.34,-1451.01 591.29,-1461.6 597.91,-1459.32"/>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge138" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M460.32,-313.83C445.53,-272.88 393.01,-144.62 326.5,-180"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-2712 694.5,-2712 694.5,-2688 779.5,-2688 779.5,-2712"/>
-<text text-anchor="middle" x="737" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-192 694.5,-192 694.5,-168 779.5,-168 779.5,-192"/>
+<text text-anchor="middle" x="737" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge92" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.22,-2699.06C679.57,-2696.48 664.44,-2690.8 655,-2679 615.88,-2630.08 628.61,-1613.9 619,-1552 613.98,-1519.65 602.67,-1483.42 594.93,-1460.91"/>
-<polygon fill="#000000" stroke="#000000" points="598.18,-1459.6 591.56,-1451.32 591.57,-1461.91 598.18,-1459.6"/>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge109" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.25,-180.96C679.61,-183.55 664.46,-189.22 655,-201 620.87,-243.47 624.13,-1126.76 619,-1181 612.52,-1249.52 598.37,-1329.78 591.26,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.79,-1367.34 589.37,-1377.81 594.67,-1368.63 587.79,-1367.34"/>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge127" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.27,-2705.2C664.05,-2707.71 622.45,-2708.58 587,-2700"/>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge129" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.37,-177C664.37,-175.57 623.01,-175.09 587,-180"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="788.5,-654 685.5,-654 685.5,-630 788.5,-630 788.5,-654"/>
-<text text-anchor="middle" x="737" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="785,-822 689,-822 689,-798 785,-798 785,-822"/>
+<text text-anchor="middle" x="737" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge93" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.44,-644.99C673.79,-648.15 662.61,-653.64 655,-663 602.44,-727.65 655.91,-1337.3 619,-1412 617.67,-1414.69 615.94,-1417.21 613.97,-1419.55"/>
-<polygon fill="#000000" stroke="#000000" points="611.28,-1417.29 606.59,-1426.79 616.18,-1422.28 611.28,-1417.29"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge38" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M688.67,-818.11C677.22,-821.18 665.32,-825.35 655,-831 618.85,-850.77 628.1,-891.16 587,-894"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-894C358.51,-909.67 540.93,-1202.89 378,-1361 376.76,-1362.2 375.44,-1363.34 374.07,-1364.41"/>
+<polygon fill="#000000" stroke="#000000" points="372.1,-1361.52 365.62,-1369.91 375.91,-1367.39 372.1,-1361.52"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge118" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.1,-634.07C674.62,-631.03 664.04,-626.82 655,-621 614.61,-595 634.92,-533.68 587,-537"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge111" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M688.74,-812.53C676.06,-815.54 663.52,-821.08 655,-831 604.05,-890.3 628.92,-1103.44 619,-1181 610.27,-1249.27 597.16,-1329.65 590.77,-1367.78"/>
+<polygon fill="#000000" stroke="#000000" points="587.3,-1367.34 589.09,-1377.78 594.2,-1368.5 587.3,-1367.34"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="788.5,-1452 685.5,-1452 685.5,-1428 788.5,-1428 788.5,-1452"/>
-<text text-anchor="middle" x="737" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="812,-1032 662,-1032 662,-1008 812,-1008 812,-1032"/>
+<text text-anchor="middle" x="737" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge96" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M685.14,-1439.66C667.13,-1439.54 647.06,-1439.4 629.79,-1439.29"/>
-<polygon fill="#000000" stroke="#000000" points="629.46,-1435.78 619.44,-1439.22 629.41,-1442.78 629.46,-1435.78"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge49" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M669.68,-1032.15C664.44,-1034.59 659.46,-1037.5 655,-1041 604.92,-1080.26 639.55,-1131.12 587,-1167"/>
+</g>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge118" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M666.17,-1032.09C662.07,-1034.57 658.28,-1037.51 655,-1041 643.61,-1053.11 603.23,-1292.01 590.72,-1367.41"/>
+<polygon fill="#000000" stroke="#000000" points="587.2,-1367.23 589.02,-1377.67 594.11,-1368.38 587.2,-1367.23"/>
 </g>
 <!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node66" class="node">
 <title>sourcefile~symba_drift.f90</title>
 <g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-2502 694,-2502 694,-2478 780,-2478 780,-2502"/>
-<text text-anchor="middle" x="737" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-990 694,-990 694,-966 780,-966 780,-990"/>
+<text text-anchor="middle" x="737" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge98" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.85,-2488.95C679.33,-2486.33 664.39,-2480.65 655,-2469 623.01,-2429.3 627,-1602.35 619,-1552 613.86,-1519.67 602.58,-1483.44 594.88,-1460.92"/>
-<polygon fill="#000000" stroke="#000000" points="598.13,-1459.61 591.53,-1451.32 591.52,-1461.92 598.13,-1459.61"/>
-</g>
 <!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge137" class="edge">
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge51" class="edge">
 <title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.72,-2483.19C680.78,-2480.03 666.85,-2475.48 655,-2469 618.85,-2449.23 622.94,-2426.15 587,-2406"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.75,-981.4C680.08,-984.34 665.7,-989.61 655,-999 594.44,-1052.11 653.52,-1121.58 587,-1167"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-1167C515.9,-1214.18 483.09,-1315.43 471.55,-1360.08"/>
+<polygon fill="#000000" stroke="#000000" points="468.13,-1359.36 469.12,-1369.91 474.92,-1361.04 468.13,-1359.36"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge119" class="edge">
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.81,-979.91C679.65,-982.67 664.94,-988.21 655,-999 648.62,-1005.92 603.61,-1285.76 590.55,-1367.69"/>
+<polygon fill="#000000" stroke="#000000" points="587.07,-1367.26 588.95,-1377.68 593.98,-1368.36 587.07,-1367.26"/>
+</g>
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-2166 694,-2166 694,-2142 780,-2142 780,-2166"/>
-<text text-anchor="middle" x="737" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="773.5,-108 700.5,-108 700.5,-84 773.5,-84 773.5,-108"/>
+<text text-anchor="middle" x="737" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.86,-2143.47C681.32,-2140.23 667.58,-2136.57 655,-2133 624.57,-2124.36 618.36,-2107.87 587,-2112"/>
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge113" class="edge">
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.11,-96.07C683.77,-98.12 665.72,-103.62 655,-117 618.02,-163.16 624.49,-1122.11 619,-1181 612.62,-1249.53 598.42,-1329.78 591.28,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.81,-1367.34 589.38,-1377.81 594.69,-1368.64 587.81,-1367.34"/>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge99" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.99,-2152.83C679.49,-2150.2 664.52,-2144.55 655,-2133 613.85,-2083.1 629.87,-1615.76 619,-1552 613.47,-1519.55 602.19,-1483.09 594.61,-1460.58"/>
-<polygon fill="#000000" stroke="#000000" points="597.88,-1459.33 591.32,-1451.01 591.26,-1461.61 597.88,-1459.33"/>
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge130" class="edge">
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M700.29,-101.3C685.64,-104.47 668.89,-109.4 655,-117 618.85,-136.77 627.82,-174.43 587,-180"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="808,-1872 666,-1872 666,-1848 808,-1848 808,-1872"/>
-<text text-anchor="middle" x="737" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="778.5,-1536 695.5,-1536 695.5,-1512 778.5,-1512 778.5,-1536"/>
+<text text-anchor="middle" x="737" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge101" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.89,-1848.15C661.86,-1845.62 658.16,-1842.6 655,-1839 612.57,-1790.72 631.79,-1614.99 619,-1552 612.45,-1519.74 601.43,-1483.23 594.19,-1460.66"/>
-<polygon fill="#000000" stroke="#000000" points="597.49,-1459.48 591.07,-1451.06 590.83,-1461.65 597.49,-1459.48"/>
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge39" class="edge">
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.11,-1513.79C682.24,-1510.47 668,-1506.69 655,-1503 624.57,-1494.36 618.59,-1483.57 587,-1482"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge141" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M665.89,-1860C640.98,-1860 612.74,-1860 587,-1860"/>
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge120" class="edge">
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.39,-1519.79C681.55,-1516.8 666.64,-1511.69 655,-1503 623.88,-1479.76 604.14,-1437.71 594.37,-1411.97"/>
+<polygon fill="#000000" stroke="#000000" points="597.59,-1410.57 590.89,-1402.36 591,-1412.95 597.59,-1410.57"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="778.5,-612 695.5,-612 695.5,-588 778.5,-588 778.5,-612"/>
-<text text-anchor="middle" x="737" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779.5,-612 694.5,-612 694.5,-588 779.5,-588 779.5,-612"/>
+<text text-anchor="middle" x="737" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge103" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.15,-600.86C680.25,-603.38 664.7,-609.04 655,-621 599.59,-689.34 657.88,-1333.08 619,-1412 617.68,-1414.69 615.95,-1417.21 613.98,-1419.56"/>
-<polygon fill="#000000" stroke="#000000" points="611.29,-1417.29 606.6,-1426.79 616.19,-1422.29 611.29,-1417.29"/>
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge59" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.37,-605.51C681.05,-608.61 666.73,-613.45 655,-621 614.61,-647 634.92,-701.68 587,-705"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-705C465.95,-713.24 465.48,-804.34 414,-912 345.18,-1055.91 330.38,-1252.26 327.29,-1317.74"/>
+<polygon fill="#000000" stroke="#000000" points="323.79,-1317.61 326.86,-1327.75 330.79,-1317.91 323.79,-1317.61"/>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge117" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M695.25,-591.96C682.12,-588.71 667.69,-584.42 655,-579 622.33,-565.05 622.44,-534.55 587,-537"/>
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge121" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.42,-601.1C679.8,-603.7 664.62,-609.35 655,-621 615.28,-669.06 625.72,-1119.01 619,-1181 611.58,-1249.42 597.86,-1329.73 591.05,-1367.81"/>
+<polygon fill="#000000" stroke="#000000" points="587.58,-1367.34 589.25,-1377.8 594.47,-1368.58 587.58,-1367.34"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node70" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="786,-1494 688,-1494 688,-1470 786,-1470 786,-1494"/>
-<text text-anchor="middle" x="737" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="780,-360 694,-360 694,-336 780,-336 780,-360"/>
+<text text-anchor="middle" x="737" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge104" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M687.9,-1470.03C677.05,-1467.19 665.6,-1464.09 655,-1461 646.43,-1458.51 637.31,-1455.68 628.62,-1452.9"/>
-<polygon fill="#000000" stroke="#000000" points="629.64,-1449.55 619.05,-1449.8 627.49,-1456.21 629.64,-1449.55"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge122" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.88,-349.08C679.37,-351.7 664.42,-357.37 655,-369 626.58,-404.09 623.42,-1136.06 619,-1181 612.26,-1249.49 598.23,-1329.77 591.2,-1367.82"/>
+<polygon fill="#000000" stroke="#000000" points="587.73,-1367.34 589.34,-1377.81 594.61,-1368.62 587.73,-1367.34"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge141" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M693.72,-354.81C680.78,-357.97 666.85,-362.52 655,-369 618.85,-388.77 625.55,-446.54 587,-432"/>
+</g>
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node71" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node71"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-1830 690,-1830 690,-1806 784,-1806 784,-1830"/>
-<text text-anchor="middle" x="737" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node71"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="776.5,-696 697.5,-696 697.5,-672 776.5,-672 776.5,-696"/>
+<text text-anchor="middle" x="737" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge105" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.86,-1815.43C676.9,-1812.46 663.93,-1806.95 655,-1797 618.24,-1756.05 630.52,-1605.81 619,-1552 612.11,-1519.81 601.18,-1483.29 594.05,-1460.69"/>
-<polygon fill="#000000" stroke="#000000" points="597.36,-1459.54 590.98,-1451.08 590.69,-1461.67 597.36,-1459.54"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge60" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.26,-691C667.28,-696.04 624.66,-702.39 587,-705"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge144" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.64,-1829.63C678.28,-1832.59 666.18,-1835.83 655,-1839 624.57,-1847.64 618.63,-1860 587,-1860"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge124" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M697.43,-684.67C681.94,-687.04 665.34,-692.63 655,-705 620.98,-745.69 625.02,-1128.3 619,-1181 611.19,-1249.38 597.66,-1329.7 590.97,-1367.8"/>
+<polygon fill="#000000" stroke="#000000" points="587.5,-1367.34 589.2,-1377.79 594.39,-1368.56 587.5,-1367.34"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node72" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node72"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="775,-2460 699,-2460 699,-2436 775,-2436 775,-2460"/>
-<text text-anchor="middle" x="737" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node72"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-1158 690,-1158 690,-1134 784,-1134 784,-1158"/>
+<text text-anchor="middle" x="737" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge108" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.9,-2447.74C682.9,-2445.56 665.49,-2440 655,-2427 593.88,-2351.28 634.36,-1648.08 619,-1552 613.83,-1519.67 602.56,-1483.44 594.87,-1460.92"/>
-<polygon fill="#000000" stroke="#000000" points="598.12,-1459.62 591.53,-1451.33 591.51,-1461.92 598.12,-1459.62"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge54" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.87,-1142.32C658.34,-1142.09 616.99,-1146.52 587,-1167"/>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge136" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M698.92,-2442.56C667.58,-2436.82 622.28,-2425.78 587,-2406"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge86" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.9,-1149.63C677.25,-1152.67 664.44,-1157.95 655,-1167 597.89,-1221.74 588.35,-1322.87 587.03,-1367.65"/>
+<polygon fill="#000000" stroke="#000000" points="583.53,-1367.7 586.85,-1377.76 590.53,-1367.83 583.53,-1367.7"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node73" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node73"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="799,-570 675,-570 675,-546 799,-546 799,-570"/>
-<text text-anchor="middle" x="737" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node73"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-318 690,-318 690,-294 784,-294 784,-318"/>
+<text text-anchor="middle" x="737" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge109" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M674.7,-564.67C667.11,-567.95 660.21,-572.56 655,-579 596.74,-651.03 659.84,-1328.85 619,-1412 617.68,-1414.69 615.95,-1417.22 613.98,-1419.56"/>
-<polygon fill="#000000" stroke="#000000" points="611.3,-1417.29 606.61,-1426.8 616.2,-1422.29 611.3,-1417.29"/>
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge127" class="edge">
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.63,-307.92C676.5,-310.85 663.49,-316.49 655,-327 625.15,-363.94 623.6,-1133.74 619,-1181 612.33,-1249.5 598.27,-1329.77 591.22,-1367.83"/>
+<polygon fill="#000000" stroke="#000000" points="587.75,-1367.34 589.35,-1377.81 594.63,-1368.62 587.75,-1367.34"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge119" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M687.53,-545.97C658.48,-540.07 620.75,-534.66 587,-537"/>
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge144" class="edge">
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585,-432C539.99,-415.02 501.34,-372.02 481.25,-346.31"/>
+<polygon fill="#000000" stroke="#000000" points="484.01,-344.15 475.17,-338.31 478.44,-348.39 484.01,-344.15"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M689.69,-311.81C677.6,-314.92 665.13,-319.69 655,-327 609.91,-359.53 639.02,-451.62 587,-432"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_node74" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node74"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="771,-1788 703,-1788 703,-1764 771,-1764 771,-1788"/>
-<text text-anchor="middle" x="737" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~swiftest_classes.f90~~AfferentGraph_node74"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="779,-1494 695,-1494 695,-1470 779,-1470 779,-1494"/>
+<text text-anchor="middle" x="737" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge111" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.95,-1775.51C686.3,-1773.48 667.13,-1768.12 655,-1755 592.79,-1687.73 639.51,-1641.31 619,-1552 611.63,-1519.92 600.83,-1483.36 593.86,-1460.73"/>
-<polygon fill="#000000" stroke="#000000" points="597.17,-1459.61 590.86,-1451.1 590.49,-1461.69 597.17,-1459.61"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.86,-1483.1C664.93,-1483.63 623.43,-1483.81 587,-1482"/>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge146" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M702.69,-1780.8C687.49,-1783.93 669.66,-1788.98 655,-1797 618.85,-1816.77 628.2,-1860 587,-1860"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_classes.f90~~AfferentGraph_edge128" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M694.73,-1475.91C681.43,-1472.77 667.03,-1468.05 655,-1461 633.14,-1448.18 613.76,-1426.34 601.34,-1410.26"/>
+<polygon fill="#000000" stroke="#000000" points="603.97,-1407.94 595.18,-1402.02 598.36,-1412.12 603.97,-1407.94"/>
 </g>
 </g>
 </svg>
@@ -2435,14 +2423,14 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-534"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
 <a name="ln-535"></a>      <span class="k">end subroutine </span><span class="n">discard_tp</span>
 <a name="ln-536"></a>
-<a name="ln-537"></a>      <span class="k">module pure subroutine </span><span class="n">drift_all</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">mask</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
+<a name="ln-537"></a>      <span class="k">module subroutine </span><span class="n">drift_all</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">iflag</span><span class="p">)</span>
 <a name="ln-538"></a>         <span class="k">implicit none</span>
 <a name="ln-539"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! Vector of gravitational constants</span>
 <a name="ln-540"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span>  <span class="c">!! Position and velocity vectors</span>
 <a name="ln-541"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! number of bodies</span>
 <a name="ln-542"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
 <a name="ln-543"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Stepsize</span>
-<a name="ln-544"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">mask</span>  <span class="c">!! Logical mask of size self%nbody that determines which bodies to drift.</span>
+<a name="ln-544"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lmask</span> <span class="c">!! Logical mask of size self%nbody that determines which bodies to drift.</span>
 <a name="ln-545"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">iflag</span> <span class="c">!! Vector of error flags. 0 means no problem</span>
 <a name="ln-546"></a>      <span class="k">end subroutine </span><span class="n">drift_all</span>
 <a name="ln-547"></a>
@@ -2462,1141 +2450,1171 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-561"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>      <span class="kd">::</span> <span class="n">iflag</span> <span class="c">!! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)</span>
 <a name="ln-562"></a>      <span class="k">end subroutine </span><span class="n">drift_one</span>
 <a name="ln-563"></a>
-<a name="ln-564"></a>      <span class="k">module subroutine </span><span class="n">util_index_eucl_plpl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-565"></a>         <span class="k">implicit none</span>
-<a name="ln-566"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest massive body object</span>
-<a name="ln-567"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-568"></a>      <span class="k">end subroutine</span>
-<a name="ln-569"></a>
-<a name="ln-570"></a><span class="k">      module subroutine </span><span class="n">util_index_eucl_pltp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">pl</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-571"></a>         <span class="k">implicit none</span>
-<a name="ln-572"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest test particle object</span>
-<a name="ln-573"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">pl</span>    <span class="c">!! Swiftest massive body object</span>
-<a name="ln-574"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-575"></a>      <span class="k">end subroutine</span>
-<a name="ln-576"></a>
-<a name="ln-577"></a><span class="k">      module pure subroutine </span><span class="n">gr_kick_getaccb_ns_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-578"></a>         <span class="k">implicit none</span>
-<a name="ln-579"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest generic body object</span>
-<a name="ln-580"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-581"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-582"></a>      <span class="k">end subroutine </span><span class="n">gr_kick_getaccb_ns_body</span>
-<a name="ln-583"></a>
-<a name="ln-584"></a>      <span class="k">module subroutine </span><span class="n">gr_kick_getacch</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">inv_c2</span><span class="p">,</span> <span class="n">agr</span><span class="p">)</span> 
-<a name="ln-585"></a>         <span class="k">implicit none</span>
-<a name="ln-586"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>     <span class="c">!! Gravitational constant</span>
-<a name="ln-587"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>      <span class="c">!! Position vectors</span>
-<a name="ln-588"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">lmask</span>  <span class="c">!! Logical mask indicating which bodies to compute</span>
-<a name="ln-589"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>      <span class="c">!! Total number of bodies</span>
-<a name="ln-590"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">inv_c2</span> <span class="c">!! Inverse speed of light squared: 1 / c**2</span>
-<a name="ln-591"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">agr</span>    <span class="c">!! Accelerations</span>
-<a name="ln-592"></a>      <span class="k">end subroutine </span><span class="n">gr_kick_getacch</span>
+<a name="ln-564"></a>      <span class="k">module pure subroutine </span><span class="n">util_index_eucl_ij_to_k</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-565"></a>         <span class="c">!$omp declare simd(util_index_eucl_ij_to_k)</span>
+<a name="ln-566"></a>         <span class="k">implicit none</span>
+<a name="ln-567"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span> <span class="c">!! Number of bodies</span>
+<a name="ln-568"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">i</span> <span class="c">!! Index of the ith body</span>
+<a name="ln-569"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">j</span> <span class="c">!! Index of the jth body</span>
+<a name="ln-570"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span> <span class="c">!! Index of the flattened matrix</span>
+<a name="ln-571"></a>      <span class="k">end subroutine </span><span class="n">util_index_eucl_ij_to_k</span>
+<a name="ln-572"></a>
+<a name="ln-573"></a>      <span class="k">module pure subroutine </span><span class="n">util_index_eucl_k_to_ij</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="n">k</span><span class="p">,</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-574"></a>         <span class="k">implicit none</span>
+<a name="ln-575"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span> <span class="c">!! Number of bodies</span>
+<a name="ln-576"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">k</span> <span class="c">!! Index of the flattened matrix</span>
+<a name="ln-577"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span> <span class="c">!! Index of the ith body</span>
+<a name="ln-578"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">j</span> <span class="c">!! Index of the jth body</span>
+<a name="ln-579"></a>      <span class="k">end subroutine </span><span class="n">util_index_eucl_k_to_ij</span>
+<a name="ln-580"></a>
+<a name="ln-581"></a>      <span class="k">module subroutine </span><span class="n">util_index_eucl_plpl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-582"></a>         <span class="k">implicit none</span>
+<a name="ln-583"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest massive body object</span>
+<a name="ln-584"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-585"></a>      <span class="k">end subroutine</span>
+<a name="ln-586"></a>
+<a name="ln-587"></a><span class="k">      module subroutine </span><span class="n">util_index_eucl_pltp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">pl</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-588"></a>         <span class="k">implicit none</span>
+<a name="ln-589"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest test particle object</span>
+<a name="ln-590"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">pl</span>    <span class="c">!! Swiftest massive body object</span>
+<a name="ln-591"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-592"></a>      <span class="k">end subroutine</span>
 <a name="ln-593"></a>
-<a name="ln-594"></a>      <span class="k">module pure subroutine </span><span class="n">gr_p4_pos_kick</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
+<a name="ln-594"></a><span class="k">      module pure subroutine </span><span class="n">gr_kick_getaccb_ns_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-595"></a>         <span class="k">implicit none</span>
-<a name="ln-596"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-597"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span>     <span class="c">!! Position vector</span>
-<a name="ln-598"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">v</span>     <span class="c">!! Velocity vector</span>
-<a name="ln-599"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Step size</span>
-<a name="ln-600"></a>      <span class="k">end subroutine </span><span class="n">gr_p4_pos_kick</span>
-<a name="ln-601"></a>
-<a name="ln-602"></a>      <span class="k">module pure subroutine </span><span class="n">gr_pseudovel2vel</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">xh</span><span class="p">,</span> <span class="n">pv</span><span class="p">,</span> <span class="n">vh</span><span class="p">)</span> 
-<a name="ln-603"></a>         <span class="k">implicit none</span>
-<a name="ln-604"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-605"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body</span>
-<a name="ln-606"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xh</span>    <span class="c">!! Swiftestcentric position vector </span>
-<a name="ln-607"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">pv</span>    <span class="c">!! Pseudovelocity velocity vector - see Saha &amp; Tremain (1994), eq. (32)</span>
-<a name="ln-608"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">vh</span>    <span class="c">!! Swiftestcentric velocity vector </span>
-<a name="ln-609"></a>      <span class="k">end subroutine </span><span class="n">gr_pseudovel2vel</span>
+<a name="ln-596"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest generic body object</span>
+<a name="ln-597"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-598"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-599"></a>      <span class="k">end subroutine </span><span class="n">gr_kick_getaccb_ns_body</span>
+<a name="ln-600"></a>
+<a name="ln-601"></a>      <span class="k">module pure subroutine </span><span class="n">gr_kick_getacch</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">inv_c2</span><span class="p">,</span> <span class="n">agr</span><span class="p">)</span> 
+<a name="ln-602"></a>         <span class="k">implicit none</span>
+<a name="ln-603"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>     <span class="c">!! Gravitational constant</span>
+<a name="ln-604"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>      <span class="c">!! Position vectors</span>
+<a name="ln-605"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">lmask</span>  <span class="c">!! Logical mask indicating which bodies to compute</span>
+<a name="ln-606"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>      <span class="c">!! Total number of bodies</span>
+<a name="ln-607"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">inv_c2</span> <span class="c">!! Inverse speed of light squared: 1 / c**2</span>
+<a name="ln-608"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">agr</span>    <span class="c">!! Accelerations</span>
+<a name="ln-609"></a>      <span class="k">end subroutine </span><span class="n">gr_kick_getacch</span>
 <a name="ln-610"></a>
-<a name="ln-611"></a>      <span class="k">module pure subroutine </span><span class="n">gr_pv2vh_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-611"></a>      <span class="k">module pure subroutine </span><span class="n">gr_p4_pos_kick</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
 <a name="ln-612"></a>         <span class="k">implicit none</span>
-<a name="ln-613"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest particle object</span>
-<a name="ln-614"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-615"></a>      <span class="k">end subroutine </span><span class="n">gr_pv2vh_body</span>
-<a name="ln-616"></a>
-<a name="ln-617"></a>      <span class="k">module pure subroutine </span><span class="n">gr_vel2pseudovel</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">xh</span><span class="p">,</span> <span class="n">vh</span><span class="p">,</span> <span class="n">pv</span><span class="p">)</span>
-<a name="ln-618"></a>         <span class="k">implicit none</span>
-<a name="ln-619"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-620"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body</span>
-<a name="ln-621"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xh</span>    <span class="c">!! Swiftestcentric position vector </span>
-<a name="ln-622"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">vh</span>    <span class="c">!! Swiftestcentric velocity vector </span>
-<a name="ln-623"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">pv</span>    <span class="c">!! Pseudovelocity vector - see Saha &amp; Tremain (1994), eq. (32)</span>
-<a name="ln-624"></a>      <span class="k">end subroutine </span><span class="n">gr_vel2pseudovel</span>
-<a name="ln-625"></a>
-<a name="ln-626"></a>      <span class="k">module pure subroutine </span><span class="n">gr_vh2pv_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-627"></a>         <span class="k">implicit none</span>
-<a name="ln-628"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest particle object</span>
-<a name="ln-629"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-630"></a>      <span class="k">end subroutine </span><span class="n">gr_vh2pv_body</span>
-<a name="ln-631"></a>
-<a name="ln-632"></a>      <span class="k">module subroutine </span><span class="n">io_conservation_report</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">lterminal</span><span class="p">)</span>
-<a name="ln-633"></a>         <span class="k">implicit none</span>
-<a name="ln-634"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-635"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>     <span class="c">!! Input colleciton of user-defined parameters</span>
-<a name="ln-636"></a>         <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lterminal</span> <span class="c">!! Indicates whether to output information to the terminal screen</span>
-<a name="ln-637"></a>      <span class="k">end subroutine </span><span class="n">io_conservation_report</span>
-<a name="ln-638"></a>
-<a name="ln-639"></a>      <span class="k">module subroutine </span><span class="n">io_dump_param</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param_file_name</span><span class="p">)</span>
-<a name="ln-640"></a>         <span class="k">implicit none</span>
-<a name="ln-641"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span><span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>            <span class="c">!! Output collection of parameters</span>
-<a name="ln-642"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param_file_name</span> <span class="c">!! Parameter input file name (i.e. param.in)</span>
-<a name="ln-643"></a>      <span class="k">end subroutine </span><span class="n">io_dump_param</span>
-<a name="ln-644"></a>
-<a name="ln-645"></a>      <span class="k">module subroutine </span><span class="n">io_dump_particle_info_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">idx</span><span class="p">)</span>
-<a name="ln-646"></a>         <span class="k">implicit none</span>
-<a name="ln-647"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest base object (can be cb, pl, or tp)</span>
-<a name="ln-648"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-649"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">optional</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">idx</span>   <span class="c">!! Array of test particle indices to append to the particle file</span>
-<a name="ln-650"></a>      <span class="k">end subroutine </span><span class="n">io_dump_particle_info_base</span>
-<a name="ln-651"></a>
-<a name="ln-652"></a>      <span class="k">module subroutine </span><span class="n">io_dump_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
-<a name="ln-653"></a>         <span class="k">implicit none</span>
-<a name="ln-654"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest particle info metadata object</span>
-<a name="ln-655"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>   <span class="c">!! Open unformatted file unit number</span>
-<a name="ln-656"></a>      <span class="k">end subroutine </span><span class="n">io_dump_particle_info</span>
-<a name="ln-657"></a>
-<a name="ln-658"></a>      <span class="k">module subroutine </span><span class="n">io_dump_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-659"></a>         <span class="k">implicit none</span>
-<a name="ln-660"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>          <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest base object</span>
-<a name="ln-661"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-662"></a>      <span class="k">end subroutine </span><span class="n">io_dump_base</span>
-<a name="ln-663"></a>
-<a name="ln-664"></a>      <span class="k">module subroutine </span><span class="n">io_dump_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-665"></a>         <span class="k">implicit none</span>
-<a name="ln-666"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest system object</span>
-<a name="ln-667"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-668"></a>      <span class="k">end subroutine </span><span class="n">io_dump_system</span>
-<a name="ln-669"></a>
-<a name="ln-670"></a>      <span class="k">module function </span><span class="n">io_get_args</span><span class="p">(</span><span class="n">integrator</span><span class="p">,</span> <span class="n">param_file_name</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
-<a name="ln-671"></a>         <span class="k">implicit none</span>
-<a name="ln-672"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">integrator</span>      <span class="c">!! Symbolic code of the requested integrator  </span>
-<a name="ln-673"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">param_file_name</span> <span class="c">!! Name of the input parameters file</span>
-<a name="ln-674"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">ierr</span>             <span class="c">!! I/O error code </span>
-<a name="ln-675"></a>      <span class="k">end function </span><span class="n">io_get_args</span>
-<a name="ln-676"></a>
-<a name="ln-677"></a>      <span class="k">module function </span><span class="n">io_get_old_t_final_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">old_t_final</span><span class="p">)</span>
-<a name="ln-678"></a>         <span class="k">implicit none</span>
-<a name="ln-679"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>
-<a name="ln-680"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>
-<a name="ln-681"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                 <span class="kd">::</span> <span class="n">old_t_final</span>
-<a name="ln-682"></a>      <span class="k">end function </span><span class="n">io_get_old_t_final_system</span>
-<a name="ln-683"></a>
-<a name="ln-684"></a>      <span class="k">module function </span><span class="n">io_get_token</span><span class="p">(</span><span class="n">buffer</span><span class="p">,</span> <span class="n">ifirst</span><span class="p">,</span> <span class="n">ilast</span><span class="p">,</span> <span class="n">ierr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">token</span><span class="p">)</span>
-<a name="ln-685"></a>         <span class="k">implicit none</span>
-<a name="ln-686"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">buffer</span>         <span class="c">!! Input string buffer</span>
-<a name="ln-687"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ifirst</span>         <span class="c">!! Index of the buffer at which to start the search for a token</span>
-<a name="ln-688"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">ilast</span>          <span class="c">!! Index of the buffer at the end of the returned token</span>
-<a name="ln-689"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">ierr</span>           <span class="c">!! Error code</span>
-<a name="ln-690"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">token</span>          <span class="c">!! Returned token string</span>
-<a name="ln-691"></a>      <span class="k">end function </span><span class="n">io_get_token</span>
-<a name="ln-692"></a>
-<a name="ln-693"></a>      <span class="k">module subroutine </span><span class="n">io_param_reader</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">unit</span><span class="p">,</span> <span class="n">iotype</span><span class="p">,</span> <span class="n">v_list</span><span class="p">,</span> <span class="n">iostat</span><span class="p">,</span> <span class="n">iomsg</span><span class="p">)</span> 
-<a name="ln-694"></a>         <span class="k">implicit none</span>
-<a name="ln-695"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Collection of parameters</span>
-<a name="ln-696"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">unit</span>       <span class="c">!! File unit number</span>
-<a name="ln-697"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">iotype</span>     <span class="c">!! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. </span>
-<a name="ln-698"></a>                                                                 <span class="c">!!    If you do not include a char-literal-constant, the iotype argument contains only DT.</span>
-<a name="ln-699"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">v_list</span><span class="p">(:)</span>  <span class="c">!! The first element passes the integrator code to the reader</span>
-<a name="ln-700"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">iostat</span>     <span class="c">!! IO status code</span>
-<a name="ln-701"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iomsg</span>      <span class="c">!! Message to pass if iostat /= 0</span>
-<a name="ln-702"></a>      <span class="k">end subroutine </span><span class="n">io_param_reader</span>
-<a name="ln-703"></a>
-<a name="ln-704"></a>      <span class="k">module subroutine </span><span class="n">io_param_writer</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">unit</span><span class="p">,</span> <span class="n">iotype</span><span class="p">,</span> <span class="n">v_list</span><span class="p">,</span> <span class="n">iostat</span><span class="p">,</span> <span class="n">iomsg</span><span class="p">)</span> 
-<a name="ln-705"></a>         <span class="k">implicit none</span>
-<a name="ln-706"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! Collection of parameters</span>
-<a name="ln-707"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">unit</span>      <span class="c">!! File unit number</span>
-<a name="ln-708"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">iotype</span>    <span class="c">!! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. </span>
-<a name="ln-709"></a>                                                                <span class="c">!!    If you do not include a char-literal-constant, the iotype argument contains only DT.</span>
-<a name="ln-710"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">v_list</span><span class="p">(:)</span> <span class="c">!! Not used in this procedure</span>
-<a name="ln-711"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">iostat</span>    <span class="c">!! IO status code</span>
-<a name="ln-712"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iomsg</span>     <span class="c">!! Message to pass if iostat /= 0</span>
-<a name="ln-713"></a>      <span class="k">end subroutine </span><span class="n">io_param_writer</span>
-<a name="ln-714"></a>
-<a name="ln-715"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
-<a name="ln-716"></a>         <span class="k">implicit none</span>
-<a name="ln-717"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
-<a name="ln-718"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-719"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_body</span>
+<a name="ln-613"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-614"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x</span>     <span class="c">!! Position vector</span>
+<a name="ln-615"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">v</span>     <span class="c">!! Velocity vector</span>
+<a name="ln-616"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Step size</span>
+<a name="ln-617"></a>      <span class="k">end subroutine </span><span class="n">gr_p4_pos_kick</span>
+<a name="ln-618"></a>
+<a name="ln-619"></a>      <span class="k">module pure subroutine </span><span class="n">gr_pseudovel2vel</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">xh</span><span class="p">,</span> <span class="n">pv</span><span class="p">,</span> <span class="n">vh</span><span class="p">)</span> 
+<a name="ln-620"></a>         <span class="k">implicit none</span>
+<a name="ln-621"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-622"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body</span>
+<a name="ln-623"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xh</span>    <span class="c">!! Swiftestcentric position vector </span>
+<a name="ln-624"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">pv</span>    <span class="c">!! Pseudovelocity velocity vector - see Saha &amp; Tremain (1994), eq. (32)</span>
+<a name="ln-625"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">vh</span>    <span class="c">!! Swiftestcentric velocity vector </span>
+<a name="ln-626"></a>      <span class="k">end subroutine </span><span class="n">gr_pseudovel2vel</span>
+<a name="ln-627"></a>
+<a name="ln-628"></a>      <span class="k">module pure subroutine </span><span class="n">gr_pv2vh_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-629"></a>         <span class="k">implicit none</span>
+<a name="ln-630"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest particle object</span>
+<a name="ln-631"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-632"></a>      <span class="k">end subroutine </span><span class="n">gr_pv2vh_body</span>
+<a name="ln-633"></a>
+<a name="ln-634"></a>      <span class="k">module pure subroutine </span><span class="n">gr_vel2pseudovel</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">mu</span><span class="p">,</span> <span class="n">xh</span><span class="p">,</span> <span class="n">vh</span><span class="p">,</span> <span class="n">pv</span><span class="p">)</span>
+<a name="ln-635"></a>         <span class="k">implicit none</span>
+<a name="ln-636"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-637"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body</span>
+<a name="ln-638"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xh</span>    <span class="c">!! Swiftestcentric position vector </span>
+<a name="ln-639"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">vh</span>    <span class="c">!! Swiftestcentric velocity vector </span>
+<a name="ln-640"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">pv</span>    <span class="c">!! Pseudovelocity vector - see Saha &amp; Tremain (1994), eq. (32)</span>
+<a name="ln-641"></a>      <span class="k">end subroutine </span><span class="n">gr_vel2pseudovel</span>
+<a name="ln-642"></a>
+<a name="ln-643"></a>      <span class="k">module pure subroutine </span><span class="n">gr_vh2pv_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-644"></a>         <span class="k">implicit none</span>
+<a name="ln-645"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest particle object</span>
+<a name="ln-646"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-647"></a>      <span class="k">end subroutine </span><span class="n">gr_vh2pv_body</span>
+<a name="ln-648"></a>
+<a name="ln-649"></a>      <span class="k">module subroutine </span><span class="n">io_conservation_report</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">lterminal</span><span class="p">)</span>
+<a name="ln-650"></a>         <span class="k">implicit none</span>
+<a name="ln-651"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-652"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>     <span class="c">!! Input colleciton of user-defined parameters</span>
+<a name="ln-653"></a>         <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lterminal</span> <span class="c">!! Indicates whether to output information to the terminal screen</span>
+<a name="ln-654"></a>      <span class="k">end subroutine </span><span class="n">io_conservation_report</span>
+<a name="ln-655"></a>
+<a name="ln-656"></a>      <span class="k">module subroutine </span><span class="n">io_dump_param</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param_file_name</span><span class="p">)</span>
+<a name="ln-657"></a>         <span class="k">implicit none</span>
+<a name="ln-658"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span><span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>            <span class="c">!! Output collection of parameters</span>
+<a name="ln-659"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param_file_name</span> <span class="c">!! Parameter input file name (i.e. param.in)</span>
+<a name="ln-660"></a>      <span class="k">end subroutine </span><span class="n">io_dump_param</span>
+<a name="ln-661"></a>
+<a name="ln-662"></a>      <span class="k">module subroutine </span><span class="n">io_dump_particle_info_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">idx</span><span class="p">)</span>
+<a name="ln-663"></a>         <span class="k">implicit none</span>
+<a name="ln-664"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest base object (can be cb, pl, or tp)</span>
+<a name="ln-665"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-666"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">optional</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">idx</span>   <span class="c">!! Array of test particle indices to append to the particle file</span>
+<a name="ln-667"></a>      <span class="k">end subroutine </span><span class="n">io_dump_particle_info_base</span>
+<a name="ln-668"></a>
+<a name="ln-669"></a>      <span class="k">module subroutine </span><span class="n">io_dump_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
+<a name="ln-670"></a>         <span class="k">implicit none</span>
+<a name="ln-671"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest particle info metadata object</span>
+<a name="ln-672"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>   <span class="c">!! Open unformatted file unit number</span>
+<a name="ln-673"></a>      <span class="k">end subroutine </span><span class="n">io_dump_particle_info</span>
+<a name="ln-674"></a>
+<a name="ln-675"></a>      <span class="k">module subroutine </span><span class="n">io_dump_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-676"></a>         <span class="k">implicit none</span>
+<a name="ln-677"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>          <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest base object</span>
+<a name="ln-678"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-679"></a>      <span class="k">end subroutine </span><span class="n">io_dump_base</span>
+<a name="ln-680"></a>
+<a name="ln-681"></a>      <span class="k">module subroutine </span><span class="n">io_dump_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-682"></a>         <span class="k">implicit none</span>
+<a name="ln-683"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest system object</span>
+<a name="ln-684"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-685"></a>      <span class="k">end subroutine </span><span class="n">io_dump_system</span>
+<a name="ln-686"></a>
+<a name="ln-687"></a>      <span class="k">module function </span><span class="n">io_get_args</span><span class="p">(</span><span class="n">integrator</span><span class="p">,</span> <span class="n">param_file_name</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
+<a name="ln-688"></a>         <span class="k">implicit none</span>
+<a name="ln-689"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">integrator</span>      <span class="c">!! Symbolic code of the requested integrator  </span>
+<a name="ln-690"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">param_file_name</span> <span class="c">!! Name of the input parameters file</span>
+<a name="ln-691"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">ierr</span>             <span class="c">!! I/O error code </span>
+<a name="ln-692"></a>      <span class="k">end function </span><span class="n">io_get_args</span>
+<a name="ln-693"></a>
+<a name="ln-694"></a>      <span class="k">module function </span><span class="n">io_get_old_t_final_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">old_t_final</span><span class="p">)</span>
+<a name="ln-695"></a>         <span class="k">implicit none</span>
+<a name="ln-696"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>
+<a name="ln-697"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>
+<a name="ln-698"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                 <span class="kd">::</span> <span class="n">old_t_final</span>
+<a name="ln-699"></a>      <span class="k">end function </span><span class="n">io_get_old_t_final_system</span>
+<a name="ln-700"></a>
+<a name="ln-701"></a>      <span class="k">module function </span><span class="n">io_get_token</span><span class="p">(</span><span class="n">buffer</span><span class="p">,</span> <span class="n">ifirst</span><span class="p">,</span> <span class="n">ilast</span><span class="p">,</span> <span class="n">ierr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">token</span><span class="p">)</span>
+<a name="ln-702"></a>         <span class="k">implicit none</span>
+<a name="ln-703"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">buffer</span>         <span class="c">!! Input string buffer</span>
+<a name="ln-704"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ifirst</span>         <span class="c">!! Index of the buffer at which to start the search for a token</span>
+<a name="ln-705"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">ilast</span>          <span class="c">!! Index of the buffer at the end of the returned token</span>
+<a name="ln-706"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">ierr</span>           <span class="c">!! Error code</span>
+<a name="ln-707"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="p">:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">token</span>          <span class="c">!! Returned token string</span>
+<a name="ln-708"></a>      <span class="k">end function </span><span class="n">io_get_token</span>
+<a name="ln-709"></a>
+<a name="ln-710"></a>      <span class="k">module subroutine </span><span class="n">io_param_reader</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">unit</span><span class="p">,</span> <span class="n">iotype</span><span class="p">,</span> <span class="n">v_list</span><span class="p">,</span> <span class="n">iostat</span><span class="p">,</span> <span class="n">iomsg</span><span class="p">)</span> 
+<a name="ln-711"></a>         <span class="k">implicit none</span>
+<a name="ln-712"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Collection of parameters</span>
+<a name="ln-713"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">unit</span>       <span class="c">!! File unit number</span>
+<a name="ln-714"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">iotype</span>     <span class="c">!! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. </span>
+<a name="ln-715"></a>                                                                 <span class="c">!!    If you do not include a char-literal-constant, the iotype argument contains only DT.</span>
+<a name="ln-716"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">v_list</span><span class="p">(:)</span>  <span class="c">!! The first element passes the integrator code to the reader</span>
+<a name="ln-717"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">iostat</span>     <span class="c">!! IO status code</span>
+<a name="ln-718"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iomsg</span>      <span class="c">!! Message to pass if iostat /= 0</span>
+<a name="ln-719"></a>      <span class="k">end subroutine </span><span class="n">io_param_reader</span>
 <a name="ln-720"></a>
-<a name="ln-721"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_cb</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-721"></a>      <span class="k">module subroutine </span><span class="n">io_param_writer</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">unit</span><span class="p">,</span> <span class="n">iotype</span><span class="p">,</span> <span class="n">v_list</span><span class="p">,</span> <span class="n">iostat</span><span class="p">,</span> <span class="n">iomsg</span><span class="p">)</span> 
 <a name="ln-722"></a>         <span class="k">implicit none</span>
-<a name="ln-723"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest central body object</span>
-<a name="ln-724"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-725"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_cb</span>
-<a name="ln-726"></a>
-<a name="ln-727"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_param</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param_file_name</span><span class="p">)</span> 
-<a name="ln-728"></a>         <span class="k">implicit none</span>
-<a name="ln-729"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>            <span class="c">!! Current run configuration parameters</span>
-<a name="ln-730"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param_file_name</span> <span class="c">!! Parameter input file name (i.e. param.in)</span>
-<a name="ln-731"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_param</span>
-<a name="ln-732"></a>
-<a name="ln-733"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
-<a name="ln-734"></a>         <span class="k">implicit none</span>
-<a name="ln-735"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Particle metadata information object</span>
-<a name="ln-736"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">iu</span>   <span class="c">!! Open file unit number</span>
-<a name="ln-737"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_particle_info</span>
-<a name="ln-738"></a>
-<a name="ln-739"></a>      <span class="k">module function </span><span class="n">io_read_frame_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
-<a name="ln-740"></a>         <span class="k">implicit none</span>
-<a name="ln-741"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
-<a name="ln-742"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
-<a name="ln-743"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-744"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">ierr</span>  <span class="c">!! Error code: returns 0 if the read is successful</span>
-<a name="ln-745"></a>      <span class="k">end function </span><span class="n">io_read_frame_body</span>
-<a name="ln-746"></a>
-<a name="ln-747"></a>      <span class="k">module function </span><span class="n">io_read_frame_cb</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
-<a name="ln-748"></a>         <span class="k">implicit none</span>
-<a name="ln-749"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest central body object</span>
-<a name="ln-750"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
-<a name="ln-751"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-752"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">ierr</span>  <span class="c">!! Error code: returns 0 if the read is successful</span>
-<a name="ln-753"></a>      <span class="k">end function </span><span class="n">io_read_frame_cb</span>
-<a name="ln-754"></a>
-<a name="ln-755"></a>      <span class="k">module function </span><span class="n">io_read_frame_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
-<a name="ln-756"></a>         <span class="k">implicit none</span>
-<a name="ln-757"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span><span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
-<a name="ln-758"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
-<a name="ln-759"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-760"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                               <span class="kd">::</span> <span class="n">ierr</span>  <span class="c">!! Error code: returns 0 if the read is successful</span>
-<a name="ln-761"></a>      <span class="k">end function </span><span class="n">io_read_frame_system</span>
-<a name="ln-762"></a>
-<a name="ln-763"></a>      <span class="k">module subroutine </span><span class="n">io_read_particle_info_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-764"></a>         <span class="k">implicit none</span>
-<a name="ln-765"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-766"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-767"></a>      <span class="k">end subroutine </span><span class="n">io_read_particle_info_system</span>
-<a name="ln-768"></a>
-<a name="ln-769"></a>      <span class="k">module subroutine </span><span class="n">io_write_discard</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-770"></a>         <span class="k">implicit none</span>
-<a name="ln-771"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
-<a name="ln-772"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-773"></a>      <span class="k">end subroutine </span><span class="n">io_write_discard</span>
-<a name="ln-774"></a>
-<a name="ln-775"></a>      <span class="k">module subroutine </span><span class="n">io_toupper</span><span class="p">(</span><span class="n">string</span><span class="p">)</span>
-<a name="ln-776"></a>         <span class="k">implicit none</span>
-<a name="ln-777"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">string</span> <span class="c">!! String to make upper case</span>
-<a name="ln-778"></a>      <span class="k">end subroutine </span><span class="n">io_toupper</span>
+<a name="ln-723"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>      <span class="c">!! Collection of parameters</span>
+<a name="ln-724"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">unit</span>      <span class="c">!! File unit number</span>
+<a name="ln-725"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">iotype</span>    <span class="c">!! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. </span>
+<a name="ln-726"></a>                                                                <span class="c">!!    If you do not include a char-literal-constant, the iotype argument contains only DT.</span>
+<a name="ln-727"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">v_list</span><span class="p">(:)</span> <span class="c">!! Not used in this procedure</span>
+<a name="ln-728"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">iostat</span>    <span class="c">!! IO status code</span>
+<a name="ln-729"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iomsg</span>     <span class="c">!! Message to pass if iostat /= 0</span>
+<a name="ln-730"></a>      <span class="k">end subroutine </span><span class="n">io_param_writer</span>
+<a name="ln-731"></a>
+<a name="ln-732"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-733"></a>         <span class="k">implicit none</span>
+<a name="ln-734"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
+<a name="ln-735"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-736"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_body</span>
+<a name="ln-737"></a>
+<a name="ln-738"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_cb</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-739"></a>         <span class="k">implicit none</span>
+<a name="ln-740"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest central body object</span>
+<a name="ln-741"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-742"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_cb</span>
+<a name="ln-743"></a>
+<a name="ln-744"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_param</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param_file_name</span><span class="p">)</span> 
+<a name="ln-745"></a>         <span class="k">implicit none</span>
+<a name="ln-746"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>            <span class="c">!! Current run configuration parameters</span>
+<a name="ln-747"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param_file_name</span> <span class="c">!! Parameter input file name (i.e. param.in)</span>
+<a name="ln-748"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_param</span>
+<a name="ln-749"></a>
+<a name="ln-750"></a>      <span class="k">module subroutine </span><span class="n">io_read_in_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
+<a name="ln-751"></a>         <span class="k">implicit none</span>
+<a name="ln-752"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Particle metadata information object</span>
+<a name="ln-753"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">iu</span>   <span class="c">!! Open file unit number</span>
+<a name="ln-754"></a>      <span class="k">end subroutine </span><span class="n">io_read_in_particle_info</span>
+<a name="ln-755"></a>
+<a name="ln-756"></a>      <span class="k">module function </span><span class="n">io_read_frame_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
+<a name="ln-757"></a>         <span class="k">implicit none</span>
+<a name="ln-758"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
+<a name="ln-759"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
+<a name="ln-760"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-761"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">ierr</span>  <span class="c">!! Error code: returns 0 if the read is successful</span>
+<a name="ln-762"></a>      <span class="k">end function </span><span class="n">io_read_frame_body</span>
+<a name="ln-763"></a>
+<a name="ln-764"></a>      <span class="k">module function </span><span class="n">io_read_frame_cb</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
+<a name="ln-765"></a>         <span class="k">implicit none</span>
+<a name="ln-766"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest central body object</span>
+<a name="ln-767"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
+<a name="ln-768"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-769"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">ierr</span>  <span class="c">!! Error code: returns 0 if the read is successful</span>
+<a name="ln-770"></a>      <span class="k">end function </span><span class="n">io_read_frame_cb</span>
+<a name="ln-771"></a>
+<a name="ln-772"></a>      <span class="k">module function </span><span class="n">io_read_frame_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">ierr</span><span class="p">)</span>
+<a name="ln-773"></a>         <span class="k">implicit none</span>
+<a name="ln-774"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span><span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
+<a name="ln-775"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
+<a name="ln-776"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-777"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                               <span class="kd">::</span> <span class="n">ierr</span>  <span class="c">!! Error code: returns 0 if the read is successful</span>
+<a name="ln-778"></a>      <span class="k">end function </span><span class="n">io_read_frame_system</span>
 <a name="ln-779"></a>
-<a name="ln-780"></a>      <span class="k">module subroutine </span><span class="n">io_write_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">pl</span><span class="p">,</span> <span class="n">encbody</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-780"></a>      <span class="k">module subroutine </span><span class="n">io_read_particle_info_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-781"></a>         <span class="k">implicit none</span>
-<a name="ln-782"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest encounter list object</span>
-<a name="ln-783"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">pl</span>      <span class="c">!! Swiftest massive body object</span>
-<a name="ln-784"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">encbody</span> <span class="c">!! Encountering body - Swiftest generic body object (pl or tp) </span>
-<a name="ln-785"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>   <span class="c">!! Current run configuration parameters </span>
-<a name="ln-786"></a>      <span class="k">end subroutine </span><span class="n">io_write_encounter</span>
-<a name="ln-787"></a>
-<a name="ln-788"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-789"></a>         <span class="k">implicit none</span>
-<a name="ln-790"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
-<a name="ln-791"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
-<a name="ln-792"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-793"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_body</span>
-<a name="ln-794"></a>
-<a name="ln-795"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_cb</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-796"></a>         <span class="k">implicit none</span>
-<a name="ln-797"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest central body object </span>
-<a name="ln-798"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
-<a name="ln-799"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-800"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_cb</span>
-<a name="ln-801"></a>
-<a name="ln-802"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_encounter</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span><span class="p">,</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span><span class="p">,</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span><span class="p">,</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span><span class="p">,</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span><span class="p">)</span>
-<a name="ln-803"></a>         <span class="k">implicit none</span>
-<a name="ln-804"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>               <span class="c">!! Open file unit number</span>
-<a name="ln-805"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">t</span>                <span class="c">!! Time of encounter</span>
-<a name="ln-806"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span>         <span class="c">!! ids of the two encountering bodies</span>
-<a name="ln-807"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span>   <span class="c">!! G*mass of the two encountering bodies</span>
-<a name="ln-808"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span> <span class="c">!! Radii of the two encountering bodies</span>
-<a name="ln-809"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span>         <span class="c">!! Swiftestcentric position vectors of the two encountering bodies </span>
-<a name="ln-810"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span>         <span class="c">!! Swiftestcentric velocity vectors of the two encountering bodies </span>
-<a name="ln-811"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_encounter</span>
-<a name="ln-812"></a>
-<a name="ln-813"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-814"></a>         <span class="k">implicit none</span>
-<a name="ln-815"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
-<a name="ln-816"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-817"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_system</span>
+<a name="ln-782"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-783"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-784"></a>      <span class="k">end subroutine </span><span class="n">io_read_particle_info_system</span>
+<a name="ln-785"></a>
+<a name="ln-786"></a>      <span class="k">module subroutine </span><span class="n">io_write_discard</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-787"></a>         <span class="k">implicit none</span>
+<a name="ln-788"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
+<a name="ln-789"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-790"></a>      <span class="k">end subroutine </span><span class="n">io_write_discard</span>
+<a name="ln-791"></a>
+<a name="ln-792"></a>      <span class="k">module subroutine </span><span class="n">io_toupper</span><span class="p">(</span><span class="n">string</span><span class="p">)</span>
+<a name="ln-793"></a>         <span class="k">implicit none</span>
+<a name="ln-794"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">string</span> <span class="c">!! String to make upper case</span>
+<a name="ln-795"></a>      <span class="k">end subroutine </span><span class="n">io_toupper</span>
+<a name="ln-796"></a>
+<a name="ln-797"></a>      <span class="k">module subroutine </span><span class="n">io_write_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">pl</span><span class="p">,</span> <span class="n">encbody</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-798"></a>         <span class="k">implicit none</span>
+<a name="ln-799"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest encounter list object</span>
+<a name="ln-800"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">pl</span>      <span class="c">!! Swiftest massive body object</span>
+<a name="ln-801"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">encbody</span> <span class="c">!! Encountering body - Swiftest generic body object (pl or tp) </span>
+<a name="ln-802"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>   <span class="c">!! Current run configuration parameters </span>
+<a name="ln-803"></a>      <span class="k">end subroutine </span><span class="n">io_write_encounter</span>
+<a name="ln-804"></a>
+<a name="ln-805"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-806"></a>         <span class="k">implicit none</span>
+<a name="ln-807"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
+<a name="ln-808"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
+<a name="ln-809"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-810"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_body</span>
+<a name="ln-811"></a>
+<a name="ln-812"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_cb</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-813"></a>         <span class="k">implicit none</span>
+<a name="ln-814"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest central body object </span>
+<a name="ln-815"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Unit number for the output file to write frame to</span>
+<a name="ln-816"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-817"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_cb</span>
 <a name="ln-818"></a>
-<a name="ln-819"></a>      <span class="k">module subroutine </span><span class="n">io_write_hdr_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-819"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_encounter</span><span class="p">(</span><span class="n">iu</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span><span class="p">,</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span><span class="p">,</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span><span class="p">,</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span><span class="p">,</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span><span class="p">)</span>
 <a name="ln-820"></a>         <span class="k">implicit none</span>
-<a name="ln-821"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-822"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Output file unit number</span>
-<a name="ln-823"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-824"></a>      <span class="k">end subroutine </span><span class="n">io_write_hdr_system</span>
-<a name="ln-825"></a>
-<a name="ln-826"></a>      <span class="k">module subroutine </span><span class="n">kick_getacch_int_all_pl</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">k_plpl</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">Gmass</span><span class="p">,</span> <span class="n">radius</span><span class="p">,</span> <span class="n">acc</span><span class="p">)</span>
-<a name="ln-827"></a>         <span class="k">implicit none</span>
-<a name="ln-828"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>    <span class="c">!! Number of massive bodies</span>
-<a name="ln-829"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nplpl</span>  <span class="c">!! Number of massive body interactions to compute</span>
-<a name="ln-830"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">k_plpl</span> <span class="c">!! Array of interaction pair indices (flattened upper triangular matrix)</span>
-<a name="ln-831"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x</span>      <span class="c">!! Position vector array</span>
-<a name="ln-832"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">Gmass</span>  <span class="c">!! Array of massive body G*mass</span>
-<a name="ln-833"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">radius</span> <span class="c">!! Array of massive body radii</span>
-<a name="ln-834"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">acc</span>    <span class="c">!! Acceleration vector array </span>
-<a name="ln-835"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_all_pl</span>
-<a name="ln-836"></a>
-<a name="ln-837"></a>      <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_pl</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmi</span><span class="p">,</span> <span class="n">Gmj</span><span class="p">,</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span><span class="p">,</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span><span class="p">)</span>
-<a name="ln-838"></a>         <span class="k">implicit none</span>
-<a name="ln-839"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>            <span class="c">!! Square of distance between the two bodies</span>
-<a name="ln-840"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>      <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
-<a name="ln-841"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmi</span>             <span class="c">!! G*mass of body i</span>
-<a name="ln-842"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmj</span>             <span class="c">!! G*mass of body j</span>
-<a name="ln-843"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span> <span class="c">!! Acceleration vector components of body i</span>
-<a name="ln-844"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span> <span class="c">!! Acceleration vector components of body j</span>
-<a name="ln-845"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_one_pl</span>
-<a name="ln-846"></a>
-<a name="ln-847"></a>      <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_tp</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmpl</span><span class="p">,</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span><span class="p">)</span>
-<a name="ln-848"></a>         <span class="k">implicit none</span>
-<a name="ln-849"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>         <span class="c">!! Square of distance between the test particle and massive body</span>
-<a name="ln-850"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>   <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
-<a name="ln-851"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmpl</span>         <span class="c">!! G*mass of massive body</span>
-<a name="ln-852"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span> <span class="c">!! Acceleration vector components of test particle</span>
-<a name="ln-853"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_one_tp</span>
-<a name="ln-854"></a>
-<a name="ln-855"></a>      <span class="k">module subroutine </span><span class="n">kick_getacch_int_pl</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-856"></a>         <span class="k">implicit none</span>
-<a name="ln-857"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-858"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_pl</span>
-<a name="ln-859"></a>
-<a name="ln-860"></a>      <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">xhp</span><span class="p">,</span> <span class="n">npl</span><span class="p">)</span>
-<a name="ln-861"></a>         <span class="k">implicit none</span>
-<a name="ln-862"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle</span>
-<a name="ln-863"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">GMpl</span> <span class="c">!! Massive body masses</span>
-<a name="ln-864"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">xhp</span>  <span class="c">!! Massive body position vectors</span>
-<a name="ln-865"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>  <span class="c">!! Number of active massive bodies</span>
-<a name="ln-866"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_tp</span>
-<a name="ln-867"></a>
-<a name="ln-868"></a>      <span class="k">module subroutine </span><span class="n">netcdf_close</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-869"></a>         <span class="k">implicit none</span>
-<a name="ln-870"></a><span class="k">         class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
-<a name="ln-871"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-872"></a>      <span class="k">end subroutine </span><span class="n">netcdf_close</span>
-<a name="ln-873"></a>
-<a name="ln-874"></a>      <span class="k">module subroutine </span><span class="n">netcdf_initialize_output</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-875"></a>         <span class="k">implicit none</span>
-<a name="ln-876"></a><span class="k">         class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
-<a name="ln-877"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-878"></a>      <span class="k">end subroutine </span><span class="n">netcdf_initialize_output</span>
-<a name="ln-879"></a>
-<a name="ln-880"></a>      <span class="k">module subroutine </span><span class="n">netcdf_open</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-881"></a>         <span class="k">implicit none</span>
-<a name="ln-882"></a><span class="k">         class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
-<a name="ln-883"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-884"></a>      <span class="k">end subroutine </span><span class="n">netcdf_open</span>
-<a name="ln-885"></a>
-<a name="ln-886"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_frame_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-887"></a>         <span class="k">implicit none</span>
-<a name="ln-888"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest base object</span>
-<a name="ln-889"></a>         <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
-<a name="ln-890"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-891"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_frame_base</span>
-<a name="ln-892"></a>
-<a name="ln-893"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_frame_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-894"></a>         <span class="k">implicit none</span>
-<a name="ln-895"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
-<a name="ln-896"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
-<a name="ln-897"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-898"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_frame_system</span>
-<a name="ln-899"></a>
-<a name="ln-900"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_hdr_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
-<a name="ln-901"></a>         <span class="k">implicit none</span>
-<a name="ln-902"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-903"></a>         <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
-<a name="ln-904"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-905"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_hdr_system</span>
-<a name="ln-906"></a>
-<a name="ln-907"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_particle_info_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
-<a name="ln-908"></a>         <span class="k">implicit none</span>
-<a name="ln-909"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest particle object</span>
-<a name="ln-910"></a>         <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>     <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
-<a name="ln-911"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_particle_info_base</span>
-<a name="ln-912"></a>
-<a name="ln-913"></a>      <span class="k">module subroutine </span><span class="n">obl_acc_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
-<a name="ln-914"></a>         <span class="k">implicit none</span>
-<a name="ln-915"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest body object </span>
-<a name="ln-916"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-917"></a>      <span class="k">end subroutine </span><span class="n">obl_acc_body</span>
-<a name="ln-918"></a>
-<a name="ln-919"></a>      <span class="k">module subroutine </span><span class="n">obl_acc_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
-<a name="ln-920"></a>         <span class="k">implicit none</span>
-<a name="ln-921"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest massive body object</span>
-<a name="ln-922"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-923"></a>      <span class="k">end subroutine </span><span class="n">obl_acc_pl</span>
-<a name="ln-924"></a>
-<a name="ln-925"></a>      <span class="k">module subroutine </span><span class="n">obl_acc_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
-<a name="ln-926"></a>         <span class="k">implicit none</span>
-<a name="ln-927"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest test particle object</span>
-<a name="ln-928"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-929"></a>      <span class="k">end subroutine </span><span class="n">obl_acc_tp</span>
-<a name="ln-930"></a>
-<a name="ln-931"></a>      <span class="k">module subroutine </span><span class="n">obl_pot_system</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-932"></a>         <span class="k">implicit none</span>
-<a name="ln-933"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-934"></a>      <span class="k">end subroutine </span><span class="n">obl_pot_system</span>
-<a name="ln-935"></a>
-<a name="ln-936"></a>      <span class="k">module subroutine </span><span class="n">orbel_el2xv_vec</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
-<a name="ln-937"></a>         <span class="k">implicit none</span>
-<a name="ln-938"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
-<a name="ln-939"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-940"></a>      <span class="k">end subroutine </span><span class="n">orbel_el2xv_vec</span>
-<a name="ln-941"></a>
-<a name="ln-942"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_scget</span><span class="p">(</span><span class="n">angle</span><span class="p">,</span> <span class="n">sx</span><span class="p">,</span> <span class="n">cx</span><span class="p">)</span>
-<a name="ln-943"></a>         <span class="k">implicit none</span>
-<a name="ln-944"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">angle</span>
-<a name="ln-945"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">sx</span><span class="p">,</span> <span class="n">cx</span>
-<a name="ln-946"></a>      <span class="k">end subroutine </span><span class="n">orbel_scget</span>
-<a name="ln-947"></a>
-<a name="ln-948"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_xv2aeq</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">e</span><span class="p">,</span> <span class="n">q</span><span class="p">)</span>
-<a name="ln-949"></a>         <span class="k">implicit none</span>
-<a name="ln-950"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span> <span class="c">!! Gravitational constant</span>
-<a name="ln-951"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>  <span class="c">!! Position vector</span>
-<a name="ln-952"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">v</span>  <span class="c">!! Velocity vector</span>
-<a name="ln-953"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>  <span class="c">!! semimajor axis</span>
-<a name="ln-954"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">e</span>  <span class="c">!! eccentricity</span>
-<a name="ln-955"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">q</span>  <span class="c">!! periapsis</span>
-<a name="ln-956"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2aeq</span>
-<a name="ln-957"></a>
-<a name="ln-958"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_xv2aqt</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">q</span><span class="p">,</span> <span class="n">capm</span><span class="p">,</span> <span class="n">tperi</span><span class="p">)</span>
-<a name="ln-959"></a>         <span class="k">implicit none</span>
-<a name="ln-960"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! Gravitational constant</span>
-<a name="ln-961"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>     <span class="c">!! Position vector</span>
-<a name="ln-962"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">v</span>     <span class="c">!! Velocity vector</span>
-<a name="ln-963"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>     <span class="c">!! semimajor axis</span>
-<a name="ln-964"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">q</span>     <span class="c">!! periapsis</span>
-<a name="ln-965"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">capm</span>  <span class="c">!! mean anomaly</span>
-<a name="ln-966"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">tperi</span> <span class="c">!! time of pericenter passage</span>
-<a name="ln-967"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2aqt</span>
-<a name="ln-968"></a>
-<a name="ln-969"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_xv2el</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">e</span><span class="p">,</span> <span class="n">inc</span><span class="p">,</span> <span class="n">capom</span><span class="p">,</span> <span class="n">omega</span><span class="p">,</span> <span class="n">capm</span><span class="p">)</span>
-<a name="ln-970"></a>         <span class="k">implicit none</span>
-<a name="ln-971"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! Gravitational constant</span>
-<a name="ln-972"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>     <span class="c">!! Position vector</span>
-<a name="ln-973"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">v</span>     <span class="c">!! Velocity vector</span>
-<a name="ln-974"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>     <span class="c">!! semimajor axis</span>
-<a name="ln-975"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">e</span>     <span class="c">!! eccentricity</span>
-<a name="ln-976"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">inc</span>   <span class="c">!! inclination</span>
-<a name="ln-977"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">capom</span> <span class="c">!! longitude of ascending node</span>
-<a name="ln-978"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">omega</span> <span class="c">!! argument of periapsis</span>
-<a name="ln-979"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">capm</span>  <span class="c">!! mean anomaly</span>
-<a name="ln-980"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2el</span>
-<a name="ln-981"></a>
-<a name="ln-982"></a>      <span class="k">module subroutine </span><span class="n">orbel_xv2el_vec</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
-<a name="ln-983"></a>         <span class="k">implicit none</span>
-<a name="ln-984"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
-<a name="ln-985"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-986"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2el_vec</span>
+<a name="ln-821"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>               <span class="c">!! Open file unit number</span>
+<a name="ln-822"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">t</span>                <span class="c">!! Time of encounter</span>
+<a name="ln-823"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">id1</span><span class="p">,</span> <span class="n">id2</span>         <span class="c">!! ids of the two encountering bodies</span>
+<a name="ln-824"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">Gmass1</span><span class="p">,</span> <span class="n">Gmass2</span>   <span class="c">!! G*mass of the two encountering bodies</span>
+<a name="ln-825"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">radius1</span><span class="p">,</span> <span class="n">radius2</span> <span class="c">!! Radii of the two encountering bodies</span>
+<a name="ln-826"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xh1</span><span class="p">,</span> <span class="n">xh2</span>         <span class="c">!! Swiftestcentric position vectors of the two encountering bodies </span>
+<a name="ln-827"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">vh1</span><span class="p">,</span> <span class="n">vh2</span>         <span class="c">!! Swiftestcentric velocity vectors of the two encountering bodies </span>
+<a name="ln-828"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_encounter</span>
+<a name="ln-829"></a>
+<a name="ln-830"></a>      <span class="k">module subroutine </span><span class="n">io_write_frame_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-831"></a>         <span class="k">implicit none</span>
+<a name="ln-832"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
+<a name="ln-833"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-834"></a>      <span class="k">end subroutine </span><span class="n">io_write_frame_system</span>
+<a name="ln-835"></a>
+<a name="ln-836"></a>      <span class="k">module subroutine </span><span class="n">io_write_hdr_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-837"></a>         <span class="k">implicit none</span>
+<a name="ln-838"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-839"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Output file unit number</span>
+<a name="ln-840"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-841"></a>      <span class="k">end subroutine </span><span class="n">io_write_hdr_system</span>
+<a name="ln-842"></a>
+<a name="ln-843"></a>      <span class="k">module subroutine </span><span class="n">kick_getacch_int_pl</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-844"></a>         <span class="k">implicit none</span>
+<a name="ln-845"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-846"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_pl</span>
+<a name="ln-847"></a>
+<a name="ln-848"></a>      <span class="k">module subroutine </span><span class="n">kick_getacch_int_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">xhp</span><span class="p">,</span> <span class="n">npl</span><span class="p">)</span>
+<a name="ln-849"></a>         <span class="k">implicit none</span>
+<a name="ln-850"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle</span>
+<a name="ln-851"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">GMpl</span> <span class="c">!! Massive body masses</span>
+<a name="ln-852"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">xhp</span>  <span class="c">!! Massive body position vectors</span>
+<a name="ln-853"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>  <span class="c">!! Number of active massive bodies</span>
+<a name="ln-854"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_tp</span>
+<a name="ln-855"></a>
+<a name="ln-856"></a>      <span class="k">module subroutine </span><span class="n">kick_getacch_int_all_pl</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">k_plpl</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">Gmass</span><span class="p">,</span> <span class="n">radius</span><span class="p">,</span> <span class="n">acc</span><span class="p">)</span>
+<a name="ln-857"></a>         <span class="k">implicit none</span>
+<a name="ln-858"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>    <span class="c">!! Number of massive bodies</span>
+<a name="ln-859"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nplpl</span>  <span class="c">!! Number of massive body interactions to compute</span>
+<a name="ln-860"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">k_plpl</span> <span class="c">!! Array of interaction pair indices (flattened upper triangular matrix)</span>
+<a name="ln-861"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x</span>      <span class="c">!! Position vector array</span>
+<a name="ln-862"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">Gmass</span>  <span class="c">!! Array of massive body G*mass</span>
+<a name="ln-863"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">radius</span> <span class="c">!! Array of massive body radii</span>
+<a name="ln-864"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">acc</span>    <span class="c">!! Acceleration vector array </span>
+<a name="ln-865"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_all_pl</span>
+<a name="ln-866"></a>
+<a name="ln-867"></a>      <span class="k">module subroutine </span><span class="n">kick_getacch_int_all_tp</span><span class="p">(</span><span class="n">ntp</span><span class="p">,</span> <span class="n">npl</span><span class="p">,</span> <span class="n">xtp</span><span class="p">,</span> <span class="n">xpl</span><span class="p">,</span> <span class="n">GMpl</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">acc</span><span class="p">)</span>
+<a name="ln-868"></a>         <span class="k">implicit none</span>
+<a name="ln-869"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ntp</span>    <span class="c">!! Number of test particles</span>
+<a name="ln-870"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">npl</span>    <span class="c">!! Number of massive bodies</span>
+<a name="ln-871"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">xtp</span>    <span class="c">!! Test particle position vector array</span>
+<a name="ln-872"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">xpl</span>    <span class="c">!! Massive body particle position vector array</span>
+<a name="ln-873"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">GMpl</span>   <span class="c">!! Array of massive body G*mass</span>
+<a name="ln-874"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lmask</span>  <span class="c">!! Logical mask indicating which test particles should be computed</span>
+<a name="ln-875"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">acc</span>    <span class="c">!! Acceleration vector array </span>
+<a name="ln-876"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_all_tp</span>
+<a name="ln-877"></a>
+<a name="ln-878"></a>      <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_pl</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmi</span><span class="p">,</span> <span class="n">Gmj</span><span class="p">,</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span><span class="p">,</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span><span class="p">)</span>
+<a name="ln-879"></a>         <span class="c">!$omp declare simd(kick_getacch_int_one_pl)</span>
+<a name="ln-880"></a>         <span class="k">implicit none</span>
+<a name="ln-881"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>            <span class="c">!! Square of distance between the two bodies</span>
+<a name="ln-882"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>      <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
+<a name="ln-883"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmi</span>             <span class="c">!! G*mass of body i</span>
+<a name="ln-884"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmj</span>             <span class="c">!! G*mass of body j</span>
+<a name="ln-885"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axi</span><span class="p">,</span> <span class="n">ayi</span><span class="p">,</span> <span class="n">azi</span> <span class="c">!! Acceleration vector components of body i</span>
+<a name="ln-886"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">axj</span><span class="p">,</span> <span class="n">ayj</span><span class="p">,</span> <span class="n">azj</span> <span class="c">!! Acceleration vector components of body j</span>
+<a name="ln-887"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_one_pl</span>
+<a name="ln-888"></a>
+<a name="ln-889"></a>      <span class="k">module pure subroutine </span><span class="n">kick_getacch_int_one_tp</span><span class="p">(</span><span class="n">rji2</span><span class="p">,</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">Gmpl</span><span class="p">,</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span><span class="p">)</span>
+<a name="ln-890"></a>         <span class="c">!$omp declare simd(kick_getacch_int_one_tp)</span>
+<a name="ln-891"></a>         <span class="k">implicit none</span>
+<a name="ln-892"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rji2</span>         <span class="c">!! Square of distance between the test particle and massive body</span>
+<a name="ln-893"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span>   <span class="c">!! Distances between the two bodies in x, y, and z directions</span>
+<a name="ln-894"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmpl</span>         <span class="c">!! G*mass of massive body</span>
+<a name="ln-895"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ax</span><span class="p">,</span> <span class="n">ay</span><span class="p">,</span> <span class="n">az</span> <span class="c">!! Acceleration vector components of test particle</span>
+<a name="ln-896"></a>      <span class="k">end subroutine </span><span class="n">kick_getacch_int_one_tp</span>
+<a name="ln-897"></a>
+<a name="ln-898"></a>      <span class="k">module subroutine </span><span class="n">netcdf_close</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-899"></a>         <span class="k">implicit none</span>
+<a name="ln-900"></a><span class="k">         class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
+<a name="ln-901"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-902"></a>      <span class="k">end subroutine </span><span class="n">netcdf_close</span>
+<a name="ln-903"></a>
+<a name="ln-904"></a>      <span class="k">module subroutine </span><span class="n">netcdf_initialize_output</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-905"></a>         <span class="k">implicit none</span>
+<a name="ln-906"></a><span class="k">         class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
+<a name="ln-907"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-908"></a>      <span class="k">end subroutine </span><span class="n">netcdf_initialize_output</span>
+<a name="ln-909"></a>
+<a name="ln-910"></a>      <span class="k">module subroutine </span><span class="n">netcdf_open</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-911"></a>         <span class="k">implicit none</span>
+<a name="ln-912"></a><span class="k">         class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
+<a name="ln-913"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-914"></a>      <span class="k">end subroutine </span><span class="n">netcdf_open</span>
+<a name="ln-915"></a>
+<a name="ln-916"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_frame_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-917"></a>         <span class="k">implicit none</span>
+<a name="ln-918"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest base object</span>
+<a name="ln-919"></a>         <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
+<a name="ln-920"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-921"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_frame_base</span>
+<a name="ln-922"></a>
+<a name="ln-923"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_frame_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-924"></a>         <span class="k">implicit none</span>
+<a name="ln-925"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
+<a name="ln-926"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
+<a name="ln-927"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-928"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_frame_system</span>
+<a name="ln-929"></a>
+<a name="ln-930"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_hdr_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-931"></a>         <span class="k">implicit none</span>
+<a name="ln-932"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-933"></a>         <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>    <span class="c">!! Parameters used to for writing a NetCDF dataset to file</span>
+<a name="ln-934"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-935"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_hdr_system</span>
+<a name="ln-936"></a>
+<a name="ln-937"></a>      <span class="k">module subroutine </span><span class="n">netcdf_write_particle_info_base</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">iu</span><span class="p">)</span>
+<a name="ln-938"></a>         <span class="k">implicit none</span>
+<a name="ln-939"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_base</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest particle object</span>
+<a name="ln-940"></a>         <span class="k">class</span><span class="p">(</span><span class="n">netcdf_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">iu</span>     <span class="c">!! Parameters used to identify a particular NetCDF dataset</span>
+<a name="ln-941"></a>      <span class="k">end subroutine </span><span class="n">netcdf_write_particle_info_base</span>
+<a name="ln-942"></a>
+<a name="ln-943"></a>      <span class="k">module subroutine </span><span class="n">obl_acc_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
+<a name="ln-944"></a>         <span class="k">implicit none</span>
+<a name="ln-945"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest body object </span>
+<a name="ln-946"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-947"></a>      <span class="k">end subroutine </span><span class="n">obl_acc_body</span>
+<a name="ln-948"></a>
+<a name="ln-949"></a>      <span class="k">module subroutine </span><span class="n">obl_acc_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
+<a name="ln-950"></a>         <span class="k">implicit none</span>
+<a name="ln-951"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest massive body object</span>
+<a name="ln-952"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-953"></a>      <span class="k">end subroutine </span><span class="n">obl_acc_pl</span>
+<a name="ln-954"></a>
+<a name="ln-955"></a>      <span class="k">module subroutine </span><span class="n">obl_acc_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
+<a name="ln-956"></a>         <span class="k">implicit none</span>
+<a name="ln-957"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest test particle object</span>
+<a name="ln-958"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-959"></a>      <span class="k">end subroutine </span><span class="n">obl_acc_tp</span>
+<a name="ln-960"></a>
+<a name="ln-961"></a>      <span class="k">module subroutine </span><span class="n">obl_pot_system</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-962"></a>         <span class="k">implicit none</span>
+<a name="ln-963"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-964"></a>      <span class="k">end subroutine </span><span class="n">obl_pot_system</span>
+<a name="ln-965"></a>
+<a name="ln-966"></a>      <span class="k">module subroutine </span><span class="n">orbel_el2xv_vec</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-967"></a>         <span class="k">implicit none</span>
+<a name="ln-968"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
+<a name="ln-969"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-970"></a>      <span class="k">end subroutine </span><span class="n">orbel_el2xv_vec</span>
+<a name="ln-971"></a>
+<a name="ln-972"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_scget</span><span class="p">(</span><span class="n">angle</span><span class="p">,</span> <span class="n">sx</span><span class="p">,</span> <span class="n">cx</span><span class="p">)</span>
+<a name="ln-973"></a>         <span class="k">implicit none</span>
+<a name="ln-974"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">angle</span>
+<a name="ln-975"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">sx</span><span class="p">,</span> <span class="n">cx</span>
+<a name="ln-976"></a>      <span class="k">end subroutine </span><span class="n">orbel_scget</span>
+<a name="ln-977"></a>
+<a name="ln-978"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_xv2aeq</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">e</span><span class="p">,</span> <span class="n">q</span><span class="p">)</span>
+<a name="ln-979"></a>         <span class="k">implicit none</span>
+<a name="ln-980"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span> <span class="c">!! Gravitational constant</span>
+<a name="ln-981"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>  <span class="c">!! Position vector</span>
+<a name="ln-982"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">v</span>  <span class="c">!! Velocity vector</span>
+<a name="ln-983"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>  <span class="c">!! semimajor axis</span>
+<a name="ln-984"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">e</span>  <span class="c">!! eccentricity</span>
+<a name="ln-985"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">q</span>  <span class="c">!! periapsis</span>
+<a name="ln-986"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2aeq</span>
 <a name="ln-987"></a>
-<a name="ln-988"></a>      <span class="k">module subroutine </span><span class="n">setup_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-988"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_xv2aqt</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">q</span><span class="p">,</span> <span class="n">capm</span><span class="p">,</span> <span class="n">tperi</span><span class="p">)</span>
 <a name="ln-989"></a>         <span class="k">implicit none</span>
-<a name="ln-990"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
-<a name="ln-991"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
-<a name="ln-992"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-993"></a>      <span class="k">end subroutine </span><span class="n">setup_body</span>
-<a name="ln-994"></a>
-<a name="ln-995"></a>      <span class="k">module subroutine </span><span class="n">setup_construct_system</span><span class="p">(</span><span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-996"></a>         <span class="k">implicit none</span>
-<a name="ln-997"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest system object</span>
-<a name="ln-998"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-999"></a>      <span class="k">end subroutine </span><span class="n">setup_construct_system</span>
-<a name="ln-1000"></a>
-<a name="ln-1001"></a>      <span class="k">module subroutine </span><span class="n">setup_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
-<a name="ln-1002"></a>         <span class="k">implicit none</span>
-<a name="ln-1003"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest encounter structure</span>
-<a name="ln-1004"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>    <span class="c">!! Number of encounters to allocate space for</span>
-<a name="ln-1005"></a>      <span class="k">end subroutine </span><span class="n">setup_encounter</span>
-<a name="ln-1006"></a>
-<a name="ln-1007"></a>      <span class="k">module subroutine </span><span class="n">setup_initialize_particle_info_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-1008"></a>         <span class="k">implicit none</span>
-<a name="ln-1009"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-1010"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-1011"></a>      <span class="k">end subroutine </span><span class="n">setup_initialize_particle_info_system</span>
-<a name="ln-1012"></a>
-<a name="ln-1013"></a>      <span class="k">module subroutine </span><span class="n">setup_initialize_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-1014"></a>         <span class="k">implicit none</span>
-<a name="ln-1015"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
-<a name="ln-1016"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-1017"></a>      <span class="k">end subroutine </span><span class="n">setup_initialize_system</span>
-<a name="ln-1018"></a>
-<a name="ln-1019"></a>      <span class="k">module subroutine </span><span class="n">setup_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-1020"></a>         <span class="k">implicit none</span>
-<a name="ln-1021"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1022"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
-<a name="ln-1023"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-1024"></a>      <span class="k">end subroutine </span><span class="n">setup_pl</span>
-<a name="ln-1025"></a>
-<a name="ln-1026"></a>      <span class="k">module subroutine </span><span class="n">setup_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-1027"></a>         <span class="k">implicit none</span>
-<a name="ln-1028"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1029"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
-<a name="ln-1030"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parametersr</span>
-<a name="ln-1031"></a>      <span class="k">end subroutine </span><span class="n">setup_tp</span>
-<a name="ln-1032"></a>
-<a name="ln-1033"></a>      <span class="k">module subroutine </span><span class="n">tides_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
-<a name="ln-1034"></a>         <span class="k">implicit none</span>
-<a name="ln-1035"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1036"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-1037"></a>      <span class="k">end subroutine </span><span class="n">tides_kick_getacch_pl</span>
-<a name="ln-1038"></a>
-<a name="ln-1039"></a>      <span class="k">module subroutine </span><span class="n">tides_step_spin_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
-<a name="ln-1040"></a>         <span class="k">implicit none</span>
-<a name="ln-1041"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-1042"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-1043"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>     <span class="c">!! Simulation time</span>
-<a name="ln-1044"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Current stepsize</span>
-<a name="ln-1045"></a>      <span class="k">end subroutine </span><span class="n">tides_step_spin_system</span>
-<a name="ln-1046"></a>
-<a name="ln-1047"></a>      <span class="k">module subroutine </span><span class="n">user_kick_getacch_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-1048"></a>         <span class="k">implicit none</span>
-<a name="ln-1049"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest massive body particle data structure</span>
-<a name="ln-1050"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody_system_object</span>
-<a name="ln-1051"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-1052"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
-<a name="ln-1053"></a>         <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Optional argument that determines whether or not this is the beginning or end of the step</span>
-<a name="ln-1054"></a>      <span class="k">end subroutine </span><span class="n">user_kick_getacch_body</span>
-<a name="ln-1055"></a>   <span class="k">end interface</span>
-<a name="ln-1056"></a>
-<a name="ln-1057"></a><span class="k">   interface </span><span class="n">util_append</span>
-<a name="ln-1058"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_char_string</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1059"></a>         <span class="k">implicit none</span>
-<a name="ln-1060"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
-<a name="ln-1061"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
-<a name="ln-1062"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
-<a name="ln-1063"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1064"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_char_string</span>
-<a name="ln-1065"></a>
-<a name="ln-1066"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_DP</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1067"></a>         <span class="k">implicit none</span>
-<a name="ln-1068"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
-<a name="ln-1069"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
-<a name="ln-1070"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
-<a name="ln-1071"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1072"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_DP</span>
-<a name="ln-1073"></a>
-<a name="ln-1074"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_DPvec</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1075"></a>         <span class="k">implicit none</span>
-<a name="ln-1076"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
-<a name="ln-1077"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
-<a name="ln-1078"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
-<a name="ln-1079"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1080"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_DPvec</span>
-<a name="ln-1081"></a>
-<a name="ln-1082"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_I4B</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1083"></a>         <span class="k">implicit none</span>
-<a name="ln-1084"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
-<a name="ln-1085"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
-<a name="ln-1086"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
-<a name="ln-1087"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1088"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_I4B</span>
-<a name="ln-1089"></a>
-<a name="ln-1090"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_info</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1091"></a>         <span class="k">implicit none</span>
-<a name="ln-1092"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
-<a name="ln-1093"></a>         <span class="k">type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
-<a name="ln-1094"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
-<a name="ln-1095"></a>         <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1096"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_info</span>
-<a name="ln-1097"></a>
-<a name="ln-1098"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_logical</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1099"></a>         <span class="k">implicit none</span>
-<a name="ln-1100"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
-<a name="ln-1101"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
-<a name="ln-1102"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
-<a name="ln-1103"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1104"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_logical</span>
-<a name="ln-1105"></a>   <span class="k">end interface</span>
-<a name="ln-1106"></a>
-<a name="ln-1107"></a><span class="k">   interface</span>
-<a name="ln-1108"></a><span class="k">      module subroutine </span><span class="n">util_append_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1109"></a>         <span class="k">implicit none</span>
-<a name="ln-1110"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>          <span class="c">!! Swiftest body object</span>
-<a name="ln-1111"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>        <span class="c">!! Source object to append</span>
-<a name="ln-1112"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span>  <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1113"></a>      <span class="k">end subroutine </span><span class="n">util_append_body</span>
-<a name="ln-1114"></a>
-<a name="ln-1115"></a>      <span class="k">module subroutine </span><span class="n">util_append_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1116"></a>         <span class="k">implicit none</span>
-<a name="ln-1117"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest encounter list object</span>
-<a name="ln-1118"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
-<a name="ln-1119"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1120"></a>      <span class="k">end subroutine </span><span class="n">util_append_encounter</span>
-<a name="ln-1121"></a>
-<a name="ln-1122"></a>      <span class="k">module subroutine </span><span class="n">util_append_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1123"></a>         <span class="k">implicit none</span>
-<a name="ln-1124"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1125"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
-<a name="ln-1126"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1127"></a>      <span class="k">end subroutine </span><span class="n">util_append_pl</span>
-<a name="ln-1128"></a>   
-<a name="ln-1129"></a>      <span class="k">module subroutine </span><span class="n">util_append_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
-<a name="ln-1130"></a>         <span class="k">implicit none</span>
-<a name="ln-1131"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1132"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
-<a name="ln-1133"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
-<a name="ln-1134"></a>      <span class="k">end subroutine </span><span class="n">util_append_tp</span>
-<a name="ln-1135"></a>
-<a name="ln-1136"></a>      <span class="k">module subroutine </span><span class="n">util_coord_b2h_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
-<a name="ln-1137"></a>         <span class="k">implicit none</span>
-<a name="ln-1138"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1139"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1140"></a>      <span class="k">end subroutine </span><span class="n">util_coord_b2h_pl</span>
-<a name="ln-1141"></a>
-<a name="ln-1142"></a>      <span class="k">module subroutine </span><span class="n">util_coord_b2h_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
-<a name="ln-1143"></a>         <span class="k">implicit none</span>
-<a name="ln-1144"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1145"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1146"></a>      <span class="k">end subroutine </span><span class="n">util_coord_b2h_tp</span>
-<a name="ln-1147"></a>
-<a name="ln-1148"></a>      <span class="k">module subroutine </span><span class="n">util_coord_h2b_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
-<a name="ln-1149"></a>         <span class="k">implicit none</span>
-<a name="ln-1150"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1151"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1152"></a>      <span class="k">end subroutine </span><span class="n">util_coord_h2b_pl</span>
-<a name="ln-1153"></a>
-<a name="ln-1154"></a>      <span class="k">module subroutine </span><span class="n">util_coord_h2b_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
-<a name="ln-1155"></a>         <span class="k">implicit none</span>
-<a name="ln-1156"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1157"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1158"></a>      <span class="k">end subroutine </span><span class="n">util_coord_h2b_tp</span>
-<a name="ln-1159"></a>
-<a name="ln-1160"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vb2vh_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
-<a name="ln-1161"></a>         <span class="k">implicit none</span>
-<a name="ln-1162"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1163"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1164"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vb2vh_pl</span>
-<a name="ln-1165"></a>   
-<a name="ln-1166"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vb2vh_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">vbcb</span><span class="p">)</span>
+<a name="ln-990"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! Gravitational constant</span>
+<a name="ln-991"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>     <span class="c">!! Position vector</span>
+<a name="ln-992"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">v</span>     <span class="c">!! Velocity vector</span>
+<a name="ln-993"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>     <span class="c">!! semimajor axis</span>
+<a name="ln-994"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">q</span>     <span class="c">!! periapsis</span>
+<a name="ln-995"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">capm</span>  <span class="c">!! mean anomaly</span>
+<a name="ln-996"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">tperi</span> <span class="c">!! time of pericenter passage</span>
+<a name="ln-997"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2aqt</span>
+<a name="ln-998"></a>
+<a name="ln-999"></a>      <span class="k">module pure subroutine </span><span class="n">orbel_xv2el</span><span class="p">(</span><span class="n">mu</span><span class="p">,</span> <span class="n">x</span><span class="p">,</span> <span class="n">v</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">e</span><span class="p">,</span> <span class="n">inc</span><span class="p">,</span> <span class="n">capom</span><span class="p">,</span> <span class="n">omega</span><span class="p">,</span> <span class="n">capm</span><span class="p">)</span>
+<a name="ln-1000"></a>         <span class="k">implicit none</span>
+<a name="ln-1001"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mu</span>    <span class="c">!! Gravitational constant</span>
+<a name="ln-1002"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x</span>     <span class="c">!! Position vector</span>
+<a name="ln-1003"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">v</span>     <span class="c">!! Velocity vector</span>
+<a name="ln-1004"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>     <span class="c">!! semimajor axis</span>
+<a name="ln-1005"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">e</span>     <span class="c">!! eccentricity</span>
+<a name="ln-1006"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">inc</span>   <span class="c">!! inclination</span>
+<a name="ln-1007"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">capom</span> <span class="c">!! longitude of ascending node</span>
+<a name="ln-1008"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">omega</span> <span class="c">!! argument of periapsis</span>
+<a name="ln-1009"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">capm</span>  <span class="c">!! mean anomaly</span>
+<a name="ln-1010"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2el</span>
+<a name="ln-1011"></a>
+<a name="ln-1012"></a>      <span class="k">module subroutine </span><span class="n">orbel_xv2el_vec</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1013"></a>         <span class="k">implicit none</span>
+<a name="ln-1014"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
+<a name="ln-1015"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1016"></a>      <span class="k">end subroutine </span><span class="n">orbel_xv2el_vec</span>
+<a name="ln-1017"></a>
+<a name="ln-1018"></a>      <span class="k">module subroutine </span><span class="n">setup_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-1019"></a>         <span class="k">implicit none</span>
+<a name="ln-1020"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest body object</span>
+<a name="ln-1021"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
+<a name="ln-1022"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-1023"></a>      <span class="k">end subroutine </span><span class="n">setup_body</span>
+<a name="ln-1024"></a>
+<a name="ln-1025"></a>      <span class="k">module subroutine </span><span class="n">setup_construct_system</span><span class="p">(</span><span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-1026"></a>         <span class="k">implicit none</span>
+<a name="ln-1027"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span>  <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest system object</span>
+<a name="ln-1028"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-1029"></a>      <span class="k">end subroutine </span><span class="n">setup_construct_system</span>
+<a name="ln-1030"></a>
+<a name="ln-1031"></a>      <span class="k">module subroutine </span><span class="n">setup_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
+<a name="ln-1032"></a>         <span class="k">implicit none</span>
+<a name="ln-1033"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest encounter structure</span>
+<a name="ln-1034"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>    <span class="c">!! Number of encounters to allocate space for</span>
+<a name="ln-1035"></a>      <span class="k">end subroutine </span><span class="n">setup_encounter</span>
+<a name="ln-1036"></a>
+<a name="ln-1037"></a>      <span class="k">module subroutine </span><span class="n">setup_initialize_particle_info_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-1038"></a>         <span class="k">implicit none</span>
+<a name="ln-1039"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-1040"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-1041"></a>      <span class="k">end subroutine </span><span class="n">setup_initialize_particle_info_system</span>
+<a name="ln-1042"></a>
+<a name="ln-1043"></a>      <span class="k">module subroutine </span><span class="n">setup_initialize_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-1044"></a>         <span class="k">implicit none</span>
+<a name="ln-1045"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest system object</span>
+<a name="ln-1046"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-1047"></a>      <span class="k">end subroutine </span><span class="n">setup_initialize_system</span>
+<a name="ln-1048"></a>
+<a name="ln-1049"></a>      <span class="k">module subroutine </span><span class="n">setup_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-1050"></a>         <span class="k">implicit none</span>
+<a name="ln-1051"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1052"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
+<a name="ln-1053"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-1054"></a>      <span class="k">end subroutine </span><span class="n">setup_pl</span>
+<a name="ln-1055"></a>
+<a name="ln-1056"></a>      <span class="k">module subroutine </span><span class="n">setup_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">n</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-1057"></a>         <span class="k">implicit none</span>
+<a name="ln-1058"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1059"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>     <span class="c">!! Number of particles to allocate space for</span>
+<a name="ln-1060"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parametersr</span>
+<a name="ln-1061"></a>      <span class="k">end subroutine </span><span class="n">setup_tp</span>
+<a name="ln-1062"></a>
+<a name="ln-1063"></a>      <span class="k">module subroutine </span><span class="n">tides_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">)</span>
+<a name="ln-1064"></a>         <span class="k">implicit none</span>
+<a name="ln-1065"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1066"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-1067"></a>      <span class="k">end subroutine </span><span class="n">tides_kick_getacch_pl</span>
+<a name="ln-1068"></a>
+<a name="ln-1069"></a>      <span class="k">module subroutine </span><span class="n">tides_step_spin_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
+<a name="ln-1070"></a>         <span class="k">implicit none</span>
+<a name="ln-1071"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-1072"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-1073"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>     <span class="c">!! Simulation time</span>
+<a name="ln-1074"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Current stepsize</span>
+<a name="ln-1075"></a>      <span class="k">end subroutine </span><span class="n">tides_step_spin_system</span>
+<a name="ln-1076"></a>
+<a name="ln-1077"></a>      <span class="k">module subroutine </span><span class="n">user_kick_getacch_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-1078"></a>         <span class="k">implicit none</span>
+<a name="ln-1079"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest massive body particle data structure</span>
+<a name="ln-1080"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody_system_object</span>
+<a name="ln-1081"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-1082"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
+<a name="ln-1083"></a>         <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Optional argument that determines whether or not this is the beginning or end of the step</span>
+<a name="ln-1084"></a>      <span class="k">end subroutine </span><span class="n">user_kick_getacch_body</span>
+<a name="ln-1085"></a>   <span class="k">end interface</span>
+<a name="ln-1086"></a>
+<a name="ln-1087"></a><span class="k">   interface </span><span class="n">util_append</span>
+<a name="ln-1088"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_char_string</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1089"></a>         <span class="k">implicit none</span>
+<a name="ln-1090"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
+<a name="ln-1091"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
+<a name="ln-1092"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
+<a name="ln-1093"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1094"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_char_string</span>
+<a name="ln-1095"></a>
+<a name="ln-1096"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_DP</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1097"></a>         <span class="k">implicit none</span>
+<a name="ln-1098"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
+<a name="ln-1099"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
+<a name="ln-1100"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
+<a name="ln-1101"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1102"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_DP</span>
+<a name="ln-1103"></a>
+<a name="ln-1104"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_DPvec</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1105"></a>         <span class="k">implicit none</span>
+<a name="ln-1106"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
+<a name="ln-1107"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
+<a name="ln-1108"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
+<a name="ln-1109"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1110"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_DPvec</span>
+<a name="ln-1111"></a>
+<a name="ln-1112"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_I4B</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1113"></a>         <span class="k">implicit none</span>
+<a name="ln-1114"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
+<a name="ln-1115"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
+<a name="ln-1116"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
+<a name="ln-1117"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1118"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_I4B</span>
+<a name="ln-1119"></a>
+<a name="ln-1120"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_info</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1121"></a>         <span class="k">implicit none</span>
+<a name="ln-1122"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
+<a name="ln-1123"></a>         <span class="k">type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
+<a name="ln-1124"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
+<a name="ln-1125"></a>         <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1126"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_info</span>
+<a name="ln-1127"></a>
+<a name="ln-1128"></a>      <span class="k">module subroutine </span><span class="n">util_append_arr_logical</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1129"></a>         <span class="k">implicit none</span>
+<a name="ln-1130"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>          <span class="c">!! Destination array </span>
+<a name="ln-1131"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Array to append </span>
+<a name="ln-1132"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nold</span><span class="p">,</span> <span class="n">nsrc</span>   <span class="c">!! Extend of the old array and the source array, respectively</span>
+<a name="ln-1133"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1134"></a>      <span class="k">end subroutine </span><span class="n">util_append_arr_logical</span>
+<a name="ln-1135"></a>   <span class="k">end interface</span>
+<a name="ln-1136"></a>
+<a name="ln-1137"></a><span class="k">   interface</span>
+<a name="ln-1138"></a><span class="k">      module subroutine </span><span class="n">util_append_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1139"></a>         <span class="k">implicit none</span>
+<a name="ln-1140"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>          <span class="c">!! Swiftest body object</span>
+<a name="ln-1141"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>        <span class="c">!! Source object to append</span>
+<a name="ln-1142"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span>  <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1143"></a>      <span class="k">end subroutine </span><span class="n">util_append_body</span>
+<a name="ln-1144"></a>
+<a name="ln-1145"></a>      <span class="k">module subroutine </span><span class="n">util_append_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1146"></a>         <span class="k">implicit none</span>
+<a name="ln-1147"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest encounter list object</span>
+<a name="ln-1148"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
+<a name="ln-1149"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1150"></a>      <span class="k">end subroutine </span><span class="n">util_append_encounter</span>
+<a name="ln-1151"></a>
+<a name="ln-1152"></a>      <span class="k">module subroutine </span><span class="n">util_append_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1153"></a>         <span class="k">implicit none</span>
+<a name="ln-1154"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1155"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
+<a name="ln-1156"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1157"></a>      <span class="k">end subroutine </span><span class="n">util_append_pl</span>
+<a name="ln-1158"></a>   
+<a name="ln-1159"></a>      <span class="k">module subroutine </span><span class="n">util_append_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">,</span> <span class="n">lsource_mask</span><span class="p">)</span>
+<a name="ln-1160"></a>         <span class="k">implicit none</span>
+<a name="ln-1161"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1162"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>       <span class="c">!! Source object to append</span>
+<a name="ln-1163"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lsource_mask</span> <span class="c">!! Logical mask indicating which elements to append to</span>
+<a name="ln-1164"></a>      <span class="k">end subroutine </span><span class="n">util_append_tp</span>
+<a name="ln-1165"></a>
+<a name="ln-1166"></a>      <span class="k">module subroutine </span><span class="n">util_coord_b2h_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
 <a name="ln-1167"></a>         <span class="k">implicit none</span>
-<a name="ln-1168"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1169"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">vbcb</span> <span class="c">!! Barycentric velocity of the central body</span>
-<a name="ln-1170"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vb2vh_tp</span>
-<a name="ln-1171"></a>   
-<a name="ln-1172"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vh2vb_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1168"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1169"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1170"></a>      <span class="k">end subroutine </span><span class="n">util_coord_b2h_pl</span>
+<a name="ln-1171"></a>
+<a name="ln-1172"></a>      <span class="k">module subroutine </span><span class="n">util_coord_b2h_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
 <a name="ln-1173"></a>         <span class="k">implicit none</span>
-<a name="ln-1174"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1175"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1176"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vh2vb_pl</span>
-<a name="ln-1177"></a>   
-<a name="ln-1178"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vh2vb_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">vbcb</span><span class="p">)</span>
+<a name="ln-1174"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1175"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1176"></a>      <span class="k">end subroutine </span><span class="n">util_coord_b2h_tp</span>
+<a name="ln-1177"></a>
+<a name="ln-1178"></a>      <span class="k">module subroutine </span><span class="n">util_coord_h2b_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
 <a name="ln-1179"></a>         <span class="k">implicit none</span>
-<a name="ln-1180"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1181"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">vbcb</span> <span class="c">!! Barycentric velocity of the central body</span>
-<a name="ln-1182"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vh2vb_tp</span>
+<a name="ln-1180"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1181"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1182"></a>      <span class="k">end subroutine </span><span class="n">util_coord_h2b_pl</span>
 <a name="ln-1183"></a>
-<a name="ln-1184"></a>      <span class="k">module subroutine </span><span class="n">util_coord_xh2xb_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1184"></a>      <span class="k">module subroutine </span><span class="n">util_coord_h2b_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
 <a name="ln-1185"></a>         <span class="k">implicit none</span>
-<a name="ln-1186"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1187"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1188"></a>      <span class="k">end subroutine </span><span class="n">util_coord_xh2xb_pl</span>
+<a name="ln-1186"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1187"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1188"></a>      <span class="k">end subroutine </span><span class="n">util_coord_h2b_tp</span>
 <a name="ln-1189"></a>
-<a name="ln-1190"></a>      <span class="k">module subroutine </span><span class="n">util_coord_xh2xb_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1190"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vb2vh_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
 <a name="ln-1191"></a>         <span class="k">implicit none</span>
-<a name="ln-1192"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1193"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>      <span class="c">!! Swiftest central body object</span>
-<a name="ln-1194"></a>      <span class="k">end subroutine </span><span class="n">util_coord_xh2xb_tp</span>
-<a name="ln-1195"></a>
-<a name="ln-1196"></a>      <span class="k">module subroutine </span><span class="n">util_copy_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">)</span>
+<a name="ln-1192"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1193"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1194"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vb2vh_pl</span>
+<a name="ln-1195"></a>   
+<a name="ln-1196"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vb2vh_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">vbcb</span><span class="p">)</span>
 <a name="ln-1197"></a>         <span class="k">implicit none</span>
-<a name="ln-1198"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Encounter list </span>
-<a name="ln-1199"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span> <span class="c">!! Source object to copy into</span>
-<a name="ln-1200"></a>      <span class="k">end subroutine </span><span class="n">util_copy_encounter</span>
-<a name="ln-1201"></a>
-<a name="ln-1202"></a>      <span class="k">module subroutine </span><span class="n">util_copy_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">)</span>
+<a name="ln-1198"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1199"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">vbcb</span> <span class="c">!! Barycentric velocity of the central body</span>
+<a name="ln-1200"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vb2vh_tp</span>
+<a name="ln-1201"></a>   
+<a name="ln-1202"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vh2vb_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
 <a name="ln-1203"></a>         <span class="k">implicit none</span>
-<a name="ln-1204"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>
-<a name="ln-1205"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>
-<a name="ln-1206"></a>      <span class="k">end subroutine </span><span class="n">util_copy_particle_info</span>
-<a name="ln-1207"></a>
-<a name="ln-1208"></a>      <span class="k">module subroutine </span><span class="n">util_copy_particle_info_arr</span><span class="p">(</span><span class="n">source</span><span class="p">,</span> <span class="n">dest</span><span class="p">,</span> <span class="n">idx</span><span class="p">)</span>
+<a name="ln-1204"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1205"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1206"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vh2vb_pl</span>
+<a name="ln-1207"></a>   
+<a name="ln-1208"></a>      <span class="k">module subroutine </span><span class="n">util_coord_vh2vb_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">vbcb</span><span class="p">)</span>
 <a name="ln-1209"></a>         <span class="k">implicit none</span>
-<a name="ln-1210"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>             <span class="kd">::</span> <span class="n">source</span> <span class="c">!! Source object to copy into</span>
-<a name="ln-1211"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>          <span class="kd">::</span> <span class="n">dest</span>   <span class="c">!! Swiftest body object with particle metadata information object</span>
-<a name="ln-1212"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">idx</span>    <span class="c">!! Optional array of indices to draw the source object</span>
-<a name="ln-1213"></a>      <span class="k">end subroutine </span><span class="n">util_copy_particle_info_arr</span>
-<a name="ln-1214"></a>
-<a name="ln-1215"></a>      <span class="k">module subroutine </span><span class="n">util_exit</span><span class="p">(</span><span class="n">code</span><span class="p">)</span>
-<a name="ln-1216"></a>         <span class="k">implicit none</span>
-<a name="ln-1217"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">code</span> <span class="c">!! Failure exit code</span>
-<a name="ln-1218"></a>      <span class="k">end subroutine </span><span class="n">util_exit</span>
+<a name="ln-1210"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1211"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">vbcb</span> <span class="c">!! Barycentric velocity of the central body</span>
+<a name="ln-1212"></a>      <span class="k">end subroutine </span><span class="n">util_coord_vh2vb_tp</span>
+<a name="ln-1213"></a>
+<a name="ln-1214"></a>      <span class="k">module subroutine </span><span class="n">util_coord_xh2xb_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1215"></a>         <span class="k">implicit none</span>
+<a name="ln-1216"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1217"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1218"></a>      <span class="k">end subroutine </span><span class="n">util_coord_xh2xb_pl</span>
 <a name="ln-1219"></a>
-<a name="ln-1220"></a>      <span class="k">module subroutine </span><span class="n">util_fill_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1220"></a>      <span class="k">module subroutine </span><span class="n">util_coord_xh2xb_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
 <a name="ln-1221"></a>         <span class="k">implicit none</span>
-<a name="ln-1222"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Swiftest body object</span>
-<a name="ln-1223"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Swiftest body object to be inserted</span>
-<a name="ln-1224"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1225"></a>      <span class="k">end subroutine </span><span class="n">util_fill_body</span>
-<a name="ln-1226"></a>
-<a name="ln-1227"></a>      <span class="k">module subroutine </span><span class="n">util_fill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
-<a name="ln-1228"></a>         <span class="k">implicit none</span>
-<a name="ln-1229"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1230"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Swiftest body object to be inserted</span>
-<a name="ln-1231"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1232"></a>      <span class="k">end subroutine </span><span class="n">util_fill_pl</span>
-<a name="ln-1233"></a>
-<a name="ln-1234"></a>      <span class="k">module subroutine </span><span class="n">util_fill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
-<a name="ln-1235"></a>         <span class="k">implicit none</span>
-<a name="ln-1236"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1237"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Swiftest body object to be inserted</span>
-<a name="ln-1238"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1239"></a>      <span class="k">end subroutine </span><span class="n">util_fill_tp</span>
-<a name="ln-1240"></a>   <span class="k">end interface</span>
-<a name="ln-1241"></a>
-<a name="ln-1242"></a><span class="k">   interface </span><span class="n">util_fill</span>
-<a name="ln-1243"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_char_string</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
-<a name="ln-1244"></a>         <span class="k">implicit none</span>
-<a name="ln-1245"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
-<a name="ln-1246"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
-<a name="ln-1247"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1248"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_char_string</span>
+<a name="ln-1222"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1223"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>      <span class="c">!! Swiftest central body object</span>
+<a name="ln-1224"></a>      <span class="k">end subroutine </span><span class="n">util_coord_xh2xb_tp</span>
+<a name="ln-1225"></a>
+<a name="ln-1226"></a>      <span class="k">module subroutine </span><span class="n">util_copy_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">)</span>
+<a name="ln-1227"></a>         <span class="k">implicit none</span>
+<a name="ln-1228"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Encounter list </span>
+<a name="ln-1229"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span> <span class="c">!! Source object to copy into</span>
+<a name="ln-1230"></a>      <span class="k">end subroutine </span><span class="n">util_copy_encounter</span>
+<a name="ln-1231"></a>
+<a name="ln-1232"></a>      <span class="k">module subroutine </span><span class="n">util_copy_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">source</span><span class="p">)</span>
+<a name="ln-1233"></a>         <span class="k">implicit none</span>
+<a name="ln-1234"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>
+<a name="ln-1235"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">source</span>
+<a name="ln-1236"></a>      <span class="k">end subroutine </span><span class="n">util_copy_particle_info</span>
+<a name="ln-1237"></a>
+<a name="ln-1238"></a>      <span class="k">module subroutine </span><span class="n">util_copy_particle_info_arr</span><span class="p">(</span><span class="n">source</span><span class="p">,</span> <span class="n">dest</span><span class="p">,</span> <span class="n">idx</span><span class="p">)</span>
+<a name="ln-1239"></a>         <span class="k">implicit none</span>
+<a name="ln-1240"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>             <span class="kd">::</span> <span class="n">source</span> <span class="c">!! Source object to copy into</span>
+<a name="ln-1241"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>          <span class="kd">::</span> <span class="n">dest</span>   <span class="c">!! Swiftest body object with particle metadata information object</span>
+<a name="ln-1242"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">idx</span>    <span class="c">!! Optional array of indices to draw the source object</span>
+<a name="ln-1243"></a>      <span class="k">end subroutine </span><span class="n">util_copy_particle_info_arr</span>
+<a name="ln-1244"></a>
+<a name="ln-1245"></a>      <span class="k">module subroutine </span><span class="n">util_exit</span><span class="p">(</span><span class="n">code</span><span class="p">)</span>
+<a name="ln-1246"></a>         <span class="k">implicit none</span>
+<a name="ln-1247"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">code</span> <span class="c">!! Failure exit code</span>
+<a name="ln-1248"></a>      <span class="k">end subroutine </span><span class="n">util_exit</span>
 <a name="ln-1249"></a>
-<a name="ln-1250"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_DP</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1250"></a>      <span class="k">module subroutine </span><span class="n">util_fill_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
 <a name="ln-1251"></a>         <span class="k">implicit none</span>
-<a name="ln-1252"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
-<a name="ln-1253"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
-<a name="ln-1254"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1255"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_DP</span>
+<a name="ln-1252"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Swiftest body object</span>
+<a name="ln-1253"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Swiftest body object to be inserted</span>
+<a name="ln-1254"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1255"></a>      <span class="k">end subroutine </span><span class="n">util_fill_body</span>
 <a name="ln-1256"></a>
-<a name="ln-1257"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_DPvec</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1257"></a>      <span class="k">module subroutine </span><span class="n">util_fill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
 <a name="ln-1258"></a>         <span class="k">implicit none</span>
-<a name="ln-1259"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
-<a name="ln-1260"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
-<a name="ln-1261"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1262"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_DPvec</span>
+<a name="ln-1259"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1260"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Swiftest body object to be inserted</span>
+<a name="ln-1261"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1262"></a>      <span class="k">end subroutine </span><span class="n">util_fill_pl</span>
 <a name="ln-1263"></a>
-<a name="ln-1264"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_I4B</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1264"></a>      <span class="k">module subroutine </span><span class="n">util_fill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
 <a name="ln-1265"></a>         <span class="k">implicit none</span>
-<a name="ln-1266"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
-<a name="ln-1267"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
-<a name="ln-1268"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1269"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_I4B</span>
-<a name="ln-1270"></a>
-<a name="ln-1271"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_info</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
-<a name="ln-1272"></a>         <span class="k">implicit none</span>
-<a name="ln-1273"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
-<a name="ln-1274"></a>         <span class="k">type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
-<a name="ln-1275"></a>         <span class="kt">logical</span><span class="p">,</span>             <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1276"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_info</span>
-<a name="ln-1277"></a>
-<a name="ln-1278"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_logical</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
-<a name="ln-1279"></a>         <span class="k">implicit none</span>
-<a name="ln-1280"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
-<a name="ln-1281"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
-<a name="ln-1282"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
-<a name="ln-1283"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_logical</span>
-<a name="ln-1284"></a>   <span class="k">end interface</span>
-<a name="ln-1285"></a>
-<a name="ln-1286"></a><span class="k">   interface</span>
-<a name="ln-1287"></a><span class="k">      module subroutine </span><span class="n">util_rescale_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">mscale</span><span class="p">,</span> <span class="n">dscale</span><span class="p">,</span> <span class="n">tscale</span><span class="p">)</span>
+<a name="ln-1266"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1267"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Swiftest body object to be inserted</span>
+<a name="ln-1268"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1269"></a>      <span class="k">end subroutine </span><span class="n">util_fill_tp</span>
+<a name="ln-1270"></a>   <span class="k">end interface</span>
+<a name="ln-1271"></a>
+<a name="ln-1272"></a><span class="k">   interface </span><span class="n">util_fill</span>
+<a name="ln-1273"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_char_string</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1274"></a>         <span class="k">implicit none</span>
+<a name="ln-1275"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
+<a name="ln-1276"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
+<a name="ln-1277"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1278"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_char_string</span>
+<a name="ln-1279"></a>
+<a name="ln-1280"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_DP</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1281"></a>         <span class="k">implicit none</span>
+<a name="ln-1282"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
+<a name="ln-1283"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
+<a name="ln-1284"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1285"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_DP</span>
+<a name="ln-1286"></a>
+<a name="ln-1287"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_DPvec</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
 <a name="ln-1288"></a>         <span class="k">implicit none</span>
-<a name="ln-1289"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-1290"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters. Returns with new values of the scale vactors and GU</span>
-<a name="ln-1291"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">mscale</span><span class="p">,</span> <span class="n">dscale</span><span class="p">,</span> <span class="n">tscale</span> <span class="c">!! Scale factors for mass, distance, and time units, respectively. </span>
-<a name="ln-1292"></a>      <span class="k">end subroutine </span><span class="n">util_rescale_system</span>
+<a name="ln-1289"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
+<a name="ln-1290"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
+<a name="ln-1291"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1292"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_DPvec</span>
 <a name="ln-1293"></a>
-<a name="ln-1294"></a>      <span class="k">module function </span><span class="n">util_minimize_bfgs</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">maxloop</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">x1</span><span class="p">)</span>
-<a name="ln-1295"></a>         <span class="k">use </span><span class="n">lambda_function</span>
-<a name="ln-1296"></a>         <span class="k">implicit none</span>
-<a name="ln-1297"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
-<a name="ln-1298"></a>         <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-1299"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span>
-<a name="ln-1300"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">eps</span>
-<a name="ln-1301"></a>         <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-1302"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">maxloop</span>
-<a name="ln-1303"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">x1</span>
-<a name="ln-1304"></a>      <span class="k">end function </span><span class="n">util_minimize_bfgs</span>
-<a name="ln-1305"></a>
-<a name="ln-1306"></a>      <span class="k">module subroutine </span><span class="n">util_peri_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
-<a name="ln-1307"></a>         <span class="k">implicit none</span>
-<a name="ln-1308"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1309"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-1310"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-1311"></a>      <span class="k">end subroutine </span><span class="n">util_peri_tp</span>
-<a name="ln-1312"></a>   <span class="k">end interface</span>
-<a name="ln-1313"></a>
-<a name="ln-1314"></a>
-<a name="ln-1315"></a><span class="k">   interface </span><span class="n">util_resize</span>
-<a name="ln-1316"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_char_string</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1317"></a>         <span class="k">implicit none</span>
-<a name="ln-1318"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
-<a name="ln-1319"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
-<a name="ln-1320"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_char_string</span>
-<a name="ln-1321"></a>
-<a name="ln-1322"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_DP</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1323"></a>         <span class="k">implicit none</span>
-<a name="ln-1324"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
-<a name="ln-1325"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
-<a name="ln-1326"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_DP</span>
-<a name="ln-1327"></a>
-<a name="ln-1328"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_DPvec</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1329"></a>         <span class="k">implicit none</span>
-<a name="ln-1330"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
-<a name="ln-1331"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
-<a name="ln-1332"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_DPvec</span>
-<a name="ln-1333"></a>
-<a name="ln-1334"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_I4B</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1335"></a>         <span class="k">implicit none</span>
-<a name="ln-1336"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
-<a name="ln-1337"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
-<a name="ln-1338"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_I4B</span>
-<a name="ln-1339"></a>
-<a name="ln-1340"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_info</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1341"></a>         <span class="k">implicit none</span>
-<a name="ln-1342"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
-<a name="ln-1343"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
-<a name="ln-1344"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_info</span>
-<a name="ln-1345"></a>
-<a name="ln-1346"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_logical</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1294"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_I4B</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1295"></a>         <span class="k">implicit none</span>
+<a name="ln-1296"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
+<a name="ln-1297"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
+<a name="ln-1298"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1299"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_I4B</span>
+<a name="ln-1300"></a>
+<a name="ln-1301"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_info</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1302"></a>         <span class="k">implicit none</span>
+<a name="ln-1303"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
+<a name="ln-1304"></a>         <span class="k">type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
+<a name="ln-1305"></a>         <span class="kt">logical</span><span class="p">,</span>             <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1306"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_info</span>
+<a name="ln-1307"></a>
+<a name="ln-1308"></a>      <span class="k">module subroutine </span><span class="n">util_fill_arr_logical</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">inserts</span><span class="p">,</span> <span class="n">lfill_list</span><span class="p">)</span>
+<a name="ln-1309"></a>         <span class="k">implicit none</span>
+<a name="ln-1310"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>      <span class="c">!! Array of values to keep </span>
+<a name="ln-1311"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">inserts</span>    <span class="c">!! Array of values to insert into keep</span>
+<a name="ln-1312"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lfill_list</span> <span class="c">!! Logical array of bodies to merge into the keeps</span>
+<a name="ln-1313"></a>      <span class="k">end subroutine </span><span class="n">util_fill_arr_logical</span>
+<a name="ln-1314"></a>   <span class="k">end interface</span>
+<a name="ln-1315"></a>
+<a name="ln-1316"></a><span class="k">   interface</span>
+<a name="ln-1317"></a><span class="k">      module subroutine </span><span class="n">util_rescale_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">mscale</span><span class="p">,</span> <span class="n">dscale</span><span class="p">,</span> <span class="n">tscale</span><span class="p">)</span>
+<a name="ln-1318"></a>         <span class="k">implicit none</span>
+<a name="ln-1319"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-1320"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters. Returns with new values of the scale vactors and GU</span>
+<a name="ln-1321"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">mscale</span><span class="p">,</span> <span class="n">dscale</span><span class="p">,</span> <span class="n">tscale</span> <span class="c">!! Scale factors for mass, distance, and time units, respectively. </span>
+<a name="ln-1322"></a>      <span class="k">end subroutine </span><span class="n">util_rescale_system</span>
+<a name="ln-1323"></a>
+<a name="ln-1324"></a>      <span class="k">module function </span><span class="n">util_minimize_bfgs</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">maxloop</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">x1</span><span class="p">)</span>
+<a name="ln-1325"></a>         <span class="k">use </span><span class="n">lambda_function</span>
+<a name="ln-1326"></a>         <span class="k">implicit none</span>
+<a name="ln-1327"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
+<a name="ln-1328"></a>         <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-1329"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span>
+<a name="ln-1330"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">eps</span>
+<a name="ln-1331"></a>         <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-1332"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">maxloop</span>
+<a name="ln-1333"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">x1</span>
+<a name="ln-1334"></a>      <span class="k">end function </span><span class="n">util_minimize_bfgs</span>
+<a name="ln-1335"></a>
+<a name="ln-1336"></a>      <span class="k">module subroutine </span><span class="n">util_peri_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-1337"></a>         <span class="k">implicit none</span>
+<a name="ln-1338"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1339"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-1340"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-1341"></a>      <span class="k">end subroutine </span><span class="n">util_peri_tp</span>
+<a name="ln-1342"></a>   <span class="k">end interface</span>
+<a name="ln-1343"></a>
+<a name="ln-1344"></a>
+<a name="ln-1345"></a><span class="k">   interface </span><span class="n">util_resize</span>
+<a name="ln-1346"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_char_string</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
 <a name="ln-1347"></a>         <span class="k">implicit none</span>
-<a name="ln-1348"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
-<a name="ln-1349"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
-<a name="ln-1350"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_logical</span>
-<a name="ln-1351"></a>   <span class="k">end interface</span>
-<a name="ln-1352"></a>
-<a name="ln-1353"></a><span class="k">   interface</span>
-<a name="ln-1354"></a><span class="k">      module subroutine </span><span class="n">util_resize_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1355"></a>         <span class="k">implicit none</span>
-<a name="ln-1356"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
-<a name="ln-1357"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size neded</span>
-<a name="ln-1358"></a>      <span class="k">end subroutine </span><span class="n">util_resize_body</span>
-<a name="ln-1359"></a>
-<a name="ln-1360"></a>      <span class="k">module subroutine </span><span class="n">util_resize_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1361"></a>         <span class="k">implicit none</span>
-<a name="ln-1362"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest encounter list </span>
-<a name="ln-1363"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size of list needed</span>
-<a name="ln-1364"></a>      <span class="k">end subroutine </span><span class="n">util_resize_encounter</span>
-<a name="ln-1365"></a>
-<a name="ln-1366"></a>      <span class="k">module subroutine </span><span class="n">util_resize_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1367"></a>         <span class="k">implicit none</span>
-<a name="ln-1368"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1369"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size neded</span>
-<a name="ln-1370"></a>      <span class="k">end subroutine </span><span class="n">util_resize_pl</span>
-<a name="ln-1371"></a>
-<a name="ln-1372"></a>      <span class="k">module subroutine </span><span class="n">util_resize_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
-<a name="ln-1373"></a>         <span class="k">implicit none</span>
-<a name="ln-1374"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1375"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size neded</span>
-<a name="ln-1376"></a>      <span class="k">end subroutine </span><span class="n">util_resize_tp</span>
-<a name="ln-1377"></a>
-<a name="ln-1378"></a>      <span class="k">module subroutine </span><span class="n">util_get_energy_momentum_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-1379"></a>         <span class="k">implicit none</span>
-<a name="ln-1380"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>     <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-1381"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>    <span class="c">!! Current run configuration parameters</span>
-<a name="ln-1382"></a>      <span class="k">end subroutine </span><span class="n">util_get_energy_momentum_system</span>
-<a name="ln-1383"></a>
-<a name="ln-1384"></a>      <span class="k">module subroutine </span><span class="n">util_set_beg_end_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">xbeg</span><span class="p">,</span> <span class="n">xend</span><span class="p">,</span> <span class="n">vbeg</span><span class="p">)</span>
+<a name="ln-1348"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
+<a name="ln-1349"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
+<a name="ln-1350"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_char_string</span>
+<a name="ln-1351"></a>
+<a name="ln-1352"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_DP</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1353"></a>         <span class="k">implicit none</span>
+<a name="ln-1354"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
+<a name="ln-1355"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
+<a name="ln-1356"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_DP</span>
+<a name="ln-1357"></a>
+<a name="ln-1358"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_DPvec</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1359"></a>         <span class="k">implicit none</span>
+<a name="ln-1360"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
+<a name="ln-1361"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
+<a name="ln-1362"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_DPvec</span>
+<a name="ln-1363"></a>
+<a name="ln-1364"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_I4B</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1365"></a>         <span class="k">implicit none</span>
+<a name="ln-1366"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
+<a name="ln-1367"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
+<a name="ln-1368"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_I4B</span>
+<a name="ln-1369"></a>
+<a name="ln-1370"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_info</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1371"></a>         <span class="k">implicit none</span>
+<a name="ln-1372"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
+<a name="ln-1373"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
+<a name="ln-1374"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_info</span>
+<a name="ln-1375"></a>
+<a name="ln-1376"></a>      <span class="k">module subroutine </span><span class="n">util_resize_arr_logical</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1377"></a>         <span class="k">implicit none</span>
+<a name="ln-1378"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>  <span class="c">!! Array to resize</span>
+<a name="ln-1379"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size</span>
+<a name="ln-1380"></a>      <span class="k">end subroutine </span><span class="n">util_resize_arr_logical</span>
+<a name="ln-1381"></a>   <span class="k">end interface</span>
+<a name="ln-1382"></a>
+<a name="ln-1383"></a><span class="k">   interface</span>
+<a name="ln-1384"></a><span class="k">      module subroutine </span><span class="n">util_resize_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
 <a name="ln-1385"></a>         <span class="k">implicit none</span>
-<a name="ln-1386"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>          <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1387"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">xbeg</span> <span class="c">!! Position vectors at beginning of step</span>
-<a name="ln-1388"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">xend</span> <span class="c">!! Positions vectors at end of step</span>
-<a name="ln-1389"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">vbeg</span> <span class="c">!! vbeg is an unused variable to keep this method forward compatible with RMVS</span>
-<a name="ln-1390"></a>      <span class="k">end subroutine </span><span class="n">util_set_beg_end_pl</span>
-<a name="ln-1391"></a>
-<a name="ln-1392"></a>      <span class="k">module subroutine </span><span class="n">util_set_ir3h</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-1393"></a>         <span class="k">implicit none</span>
-<a name="ln-1394"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
-<a name="ln-1395"></a>      <span class="k">end subroutine </span><span class="n">util_set_ir3h</span>
-<a name="ln-1396"></a>
-<a name="ln-1397"></a>      <span class="k">module subroutine </span><span class="n">util_set_msys</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-1398"></a>         <span class="k">implicit none</span>
-<a name="ln-1399"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest system object</span>
-<a name="ln-1400"></a>      <span class="k">end subroutine </span><span class="n">util_set_msys</span>
+<a name="ln-1386"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
+<a name="ln-1387"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size neded</span>
+<a name="ln-1388"></a>      <span class="k">end subroutine </span><span class="n">util_resize_body</span>
+<a name="ln-1389"></a>
+<a name="ln-1390"></a>      <span class="k">module subroutine </span><span class="n">util_resize_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1391"></a>         <span class="k">implicit none</span>
+<a name="ln-1392"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest encounter list </span>
+<a name="ln-1393"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size of list needed</span>
+<a name="ln-1394"></a>      <span class="k">end subroutine </span><span class="n">util_resize_encounter</span>
+<a name="ln-1395"></a>
+<a name="ln-1396"></a>      <span class="k">module subroutine </span><span class="n">util_resize_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
+<a name="ln-1397"></a>         <span class="k">implicit none</span>
+<a name="ln-1398"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1399"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size neded</span>
+<a name="ln-1400"></a>      <span class="k">end subroutine </span><span class="n">util_resize_pl</span>
 <a name="ln-1401"></a>
-<a name="ln-1402"></a>      <span class="k">module subroutine </span><span class="n">util_set_mu_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1402"></a>      <span class="k">module subroutine </span><span class="n">util_resize_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">nnew</span><span class="p">)</span>
 <a name="ln-1403"></a>         <span class="k">implicit none</span>
-<a name="ln-1404"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1405"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1406"></a>      <span class="k">end subroutine </span><span class="n">util_set_mu_pl</span>
+<a name="ln-1404"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1405"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">nnew</span> <span class="c">!! New size neded</span>
+<a name="ln-1406"></a>      <span class="k">end subroutine </span><span class="n">util_resize_tp</span>
 <a name="ln-1407"></a>
-<a name="ln-1408"></a>      <span class="k">module subroutine </span><span class="n">util_set_mu_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1408"></a>      <span class="k">module subroutine </span><span class="n">util_get_energy_momentum_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-1409"></a>         <span class="k">implicit none</span>
-<a name="ln-1410"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1411"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1412"></a>      <span class="k">end subroutine </span><span class="n">util_set_mu_tp</span>
+<a name="ln-1410"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>     <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-1411"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>    <span class="c">!! Current run configuration parameters</span>
+<a name="ln-1412"></a>      <span class="k">end subroutine </span><span class="n">util_get_energy_momentum_system</span>
 <a name="ln-1413"></a>
-<a name="ln-1414"></a>      <span class="k">module subroutine </span><span class="n">util_set_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">name</span><span class="p">,</span> <span class="n">particle_type</span><span class="p">,</span> <span class="n">status</span><span class="p">,</span> <span class="n">origin_type</span><span class="p">,</span> <span class="n">origin_time</span><span class="p">,</span> <span class="n">origin_xh</span><span class="p">,</span> <span class="n">origin_vh</span><span class="p">,</span> <span class="n">discard_time</span><span class="p">,</span> <span class="n">discard_xh</span><span class="p">,</span> <span class="n">discard_vh</span><span class="p">,</span> <span class="n">discard_body_id</span><span class="p">)</span>
+<a name="ln-1414"></a>      <span class="k">module subroutine </span><span class="n">util_set_beg_end_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">xbeg</span><span class="p">,</span> <span class="n">xend</span><span class="p">,</span> <span class="n">vbeg</span><span class="p">)</span>
 <a name="ln-1415"></a>         <span class="k">implicit none</span>
-<a name="ln-1416"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>           <span class="kd">::</span> <span class="n">self</span>
-<a name="ln-1417"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">name</span>            <span class="c">!! Non-unique name</span>
-<a name="ln-1418"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">particle_type</span>   <span class="c">!! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle)</span>
-<a name="ln-1419"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">status</span>          <span class="c">!! Particle status description: Active, Merged, Fragmented, etc.</span>
-<a name="ln-1420"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_type</span>     <span class="c">!! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.)</span>
-<a name="ln-1421"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_time</span>     <span class="c">!! The time of the particle&#39;s formation</span>
-<a name="ln-1422"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_xh</span>       <span class="c">!! The heliocentric distance vector at the time of the particle&#39;s formation</span>
-<a name="ln-1423"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_vh</span>       <span class="c">!! The heliocentric velocity vector at the time of the particle&#39;s formation</span>
-<a name="ln-1424"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_time</span>    <span class="c">!! The time of the particle&#39;s discard</span>
-<a name="ln-1425"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_xh</span>      <span class="c">!! The heliocentric distance vector at the time of the particle&#39;s discard</span>
-<a name="ln-1426"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_vh</span>      <span class="c">!! The heliocentric velocity vector at the time of the particle&#39;s discard</span>
-<a name="ln-1427"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_body_id</span> <span class="c">!! The id of the other body involved in the discard (0 if no other body involved)</span>
-<a name="ln-1428"></a>      <span class="k">end subroutine </span><span class="n">util_set_particle_info</span>
-<a name="ln-1429"></a>
-<a name="ln-1430"></a>      <span class="k">module subroutine </span><span class="n">util_set_rhill</span><span class="p">(</span><span class="n">self</span><span class="p">,</span><span class="n">cb</span><span class="p">)</span>
-<a name="ln-1431"></a>         <span class="k">implicit none</span>
-<a name="ln-1432"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1433"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1434"></a>      <span class="k">end subroutine </span><span class="n">util_set_rhill</span>
-<a name="ln-1435"></a>
-<a name="ln-1436"></a>      <span class="k">module subroutine </span><span class="n">util_set_rhill_approximate</span><span class="p">(</span><span class="n">self</span><span class="p">,</span><span class="n">cb</span><span class="p">)</span>
-<a name="ln-1437"></a>         <span class="k">implicit none</span>
-<a name="ln-1438"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1439"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
-<a name="ln-1440"></a>      <span class="k">end subroutine </span><span class="n">util_set_rhill_approximate</span>
-<a name="ln-1441"></a>   <span class="k">end interface</span>
-<a name="ln-1442"></a>
-<a name="ln-1443"></a><span class="k">   interface </span><span class="n">util_solve_linear_system</span>
-<a name="ln-1444"></a>      <span class="k">module function </span><span class="n">util_solve_linear_system_d</span><span class="p">(</span><span class="n">A</span><span class="p">,</span><span class="n">b</span><span class="p">,</span><span class="n">n</span><span class="p">,</span><span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">x</span><span class="p">)</span>
+<a name="ln-1416"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>          <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1417"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">xbeg</span> <span class="c">!! Position vectors at beginning of step</span>
+<a name="ln-1418"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">xend</span> <span class="c">!! Positions vectors at end of step</span>
+<a name="ln-1419"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>   <span class="k">optional</span> <span class="kd">::</span> <span class="n">vbeg</span> <span class="c">!! vbeg is an unused variable to keep this method forward compatible with RMVS</span>
+<a name="ln-1420"></a>      <span class="k">end subroutine </span><span class="n">util_set_beg_end_pl</span>
+<a name="ln-1421"></a>
+<a name="ln-1422"></a>      <span class="k">module subroutine </span><span class="n">util_set_ir3h</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-1423"></a>         <span class="k">implicit none</span>
+<a name="ln-1424"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
+<a name="ln-1425"></a>      <span class="k">end subroutine </span><span class="n">util_set_ir3h</span>
+<a name="ln-1426"></a>
+<a name="ln-1427"></a>      <span class="k">module subroutine </span><span class="n">util_set_msys</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-1428"></a>         <span class="k">implicit none</span>
+<a name="ln-1429"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest system object</span>
+<a name="ln-1430"></a>      <span class="k">end subroutine </span><span class="n">util_set_msys</span>
+<a name="ln-1431"></a>
+<a name="ln-1432"></a>      <span class="k">module subroutine </span><span class="n">util_set_mu_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1433"></a>         <span class="k">implicit none</span>
+<a name="ln-1434"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1435"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1436"></a>      <span class="k">end subroutine </span><span class="n">util_set_mu_pl</span>
+<a name="ln-1437"></a>
+<a name="ln-1438"></a>      <span class="k">module subroutine </span><span class="n">util_set_mu_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">cb</span><span class="p">)</span>
+<a name="ln-1439"></a>         <span class="k">implicit none</span>
+<a name="ln-1440"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1441"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1442"></a>      <span class="k">end subroutine </span><span class="n">util_set_mu_tp</span>
+<a name="ln-1443"></a>
+<a name="ln-1444"></a>      <span class="k">module subroutine </span><span class="n">util_set_particle_info</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">name</span><span class="p">,</span> <span class="n">particle_type</span><span class="p">,</span> <span class="n">status</span><span class="p">,</span> <span class="n">origin_type</span><span class="p">,</span> <span class="n">origin_time</span><span class="p">,</span> <span class="n">origin_xh</span><span class="p">,</span> <span class="n">origin_vh</span><span class="p">,</span> <span class="n">discard_time</span><span class="p">,</span> <span class="n">discard_xh</span><span class="p">,</span> <span class="n">discard_vh</span><span class="p">,</span> <span class="n">discard_body_id</span><span class="p">)</span>
 <a name="ln-1445"></a>         <span class="k">implicit none</span>
-<a name="ln-1446"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>
-<a name="ln-1447"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">A</span>
-<a name="ln-1448"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">b</span>
-<a name="ln-1449"></a>         <span class="kt">logical</span><span class="p">,</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-1450"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">n</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">x</span>
-<a name="ln-1451"></a>      <span class="k">end function </span><span class="n">util_solve_linear_system_d</span>
-<a name="ln-1452"></a>
-<a name="ln-1453"></a>      <span class="k">module function </span><span class="n">util_solve_linear_system_q</span><span class="p">(</span><span class="n">A</span><span class="p">,</span><span class="n">b</span><span class="p">,</span><span class="n">n</span><span class="p">,</span><span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">x</span><span class="p">)</span>
-<a name="ln-1454"></a>         <span class="k">implicit none</span>
-<a name="ln-1455"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>
-<a name="ln-1456"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">QP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">A</span>
-<a name="ln-1457"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">QP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">b</span>
-<a name="ln-1458"></a>         <span class="kt">logical</span><span class="p">,</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-1459"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">QP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">n</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">x</span>
-<a name="ln-1460"></a>      <span class="k">end function </span><span class="n">util_solve_linear_system_q</span>
-<a name="ln-1461"></a>   <span class="k">end interface</span>
-<a name="ln-1462"></a>
-<a name="ln-1463"></a><span class="k">   interface</span>
-<a name="ln-1464"></a><span class="k">      module function </span><span class="n">util_solve_rkf45</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">y0in</span><span class="p">,</span> <span class="n">t1</span><span class="p">,</span> <span class="n">dt0</span><span class="p">,</span> <span class="n">tol</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">y1</span><span class="p">)</span>
-<a name="ln-1465"></a>         <span class="k">use </span><span class="n">lambda_function</span>
-<a name="ln-1466"></a>         <span class="k">implicit none</span>
-<a name="ln-1467"></a><span class="k">         class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>    <span class="c">!! lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set</span>
-<a name="ln-1468"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">y0in</span> <span class="c">!! Initial value at t=0</span>
-<a name="ln-1469"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t1</span>   <span class="c">!! Final time</span>
-<a name="ln-1470"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt0</span>  <span class="c">!! Initial step size guess</span>
-<a name="ln-1471"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">tol</span>  <span class="c">!! Tolerance on solution</span>
-<a name="ln-1472"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">y1</span>  <span class="c">!! Final result</span>
-<a name="ln-1473"></a>      <span class="k">end function </span><span class="n">util_solve_rkf45</span>
-<a name="ln-1474"></a>   <span class="k">end interface</span>
-<a name="ln-1475"></a>
-<a name="ln-1476"></a><span class="k">   interface </span><span class="n">util_sort</span>
-<a name="ln-1477"></a>      <span class="k">module subroutine </span><span class="n">util_sort_i4b</span><span class="p">(</span><span class="n">arr</span><span class="p">)</span>
-<a name="ln-1478"></a>         <span class="k">implicit none</span>
-<a name="ln-1479"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>
-<a name="ln-1480"></a>      <span class="k">end subroutine </span><span class="n">util_sort_i4b</span>
-<a name="ln-1481"></a>
-<a name="ln-1482"></a>      <span class="k">module subroutine </span><span class="n">util_sort_index_i4b</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span><span class="n">ind</span><span class="p">)</span>
-<a name="ln-1483"></a>         <span class="k">implicit none</span>
-<a name="ln-1484"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">arr</span>
-<a name="ln-1485"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ind</span>
-<a name="ln-1486"></a>      <span class="k">end subroutine </span><span class="n">util_sort_index_i4b</span>
-<a name="ln-1487"></a>
-<a name="ln-1488"></a>      <span class="k">module subroutine </span><span class="n">util_sort_sp</span><span class="p">(</span><span class="n">arr</span><span class="p">)</span>
-<a name="ln-1489"></a>         <span class="k">implicit none</span>
-<a name="ln-1490"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">SP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>
-<a name="ln-1491"></a>      <span class="k">end subroutine </span><span class="n">util_sort_sp</span>
+<a name="ln-1446"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>           <span class="kd">::</span> <span class="n">self</span>
+<a name="ln-1447"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">name</span>            <span class="c">!! Non-unique name</span>
+<a name="ln-1448"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">particle_type</span>   <span class="c">!! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle)</span>
+<a name="ln-1449"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">status</span>          <span class="c">!! Particle status description: Active, Merged, Fragmented, etc.</span>
+<a name="ln-1450"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=*</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_type</span>     <span class="c">!! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.)</span>
+<a name="ln-1451"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_time</span>     <span class="c">!! The time of the particle&#39;s formation</span>
+<a name="ln-1452"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_xh</span>       <span class="c">!! The heliocentric distance vector at the time of the particle&#39;s formation</span>
+<a name="ln-1453"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">origin_vh</span>       <span class="c">!! The heliocentric velocity vector at the time of the particle&#39;s formation</span>
+<a name="ln-1454"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_time</span>    <span class="c">!! The time of the particle&#39;s discard</span>
+<a name="ln-1455"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_xh</span>      <span class="c">!! The heliocentric distance vector at the time of the particle&#39;s discard</span>
+<a name="ln-1456"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>        <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_vh</span>      <span class="c">!! The heliocentric velocity vector at the time of the particle&#39;s discard</span>
+<a name="ln-1457"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">),</span>    <span class="k">optional</span> <span class="kd">::</span> <span class="n">discard_body_id</span> <span class="c">!! The id of the other body involved in the discard (0 if no other body involved)</span>
+<a name="ln-1458"></a>      <span class="k">end subroutine </span><span class="n">util_set_particle_info</span>
+<a name="ln-1459"></a>
+<a name="ln-1460"></a>      <span class="k">module subroutine </span><span class="n">util_set_rhill</span><span class="p">(</span><span class="n">self</span><span class="p">,</span><span class="n">cb</span><span class="p">)</span>
+<a name="ln-1461"></a>         <span class="k">implicit none</span>
+<a name="ln-1462"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1463"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1464"></a>      <span class="k">end subroutine </span><span class="n">util_set_rhill</span>
+<a name="ln-1465"></a>
+<a name="ln-1466"></a>      <span class="k">module subroutine </span><span class="n">util_set_rhill_approximate</span><span class="p">(</span><span class="n">self</span><span class="p">,</span><span class="n">cb</span><span class="p">)</span>
+<a name="ln-1467"></a>         <span class="k">implicit none</span>
+<a name="ln-1468"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1469"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_cb</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">cb</span>   <span class="c">!! Swiftest central body object</span>
+<a name="ln-1470"></a>      <span class="k">end subroutine </span><span class="n">util_set_rhill_approximate</span>
+<a name="ln-1471"></a>   <span class="k">end interface</span>
+<a name="ln-1472"></a>
+<a name="ln-1473"></a><span class="k">   interface </span><span class="n">util_solve_linear_system</span>
+<a name="ln-1474"></a>      <span class="k">module function </span><span class="n">util_solve_linear_system_d</span><span class="p">(</span><span class="n">A</span><span class="p">,</span><span class="n">b</span><span class="p">,</span><span class="n">n</span><span class="p">,</span><span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">x</span><span class="p">)</span>
+<a name="ln-1475"></a>         <span class="k">implicit none</span>
+<a name="ln-1476"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>
+<a name="ln-1477"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">A</span>
+<a name="ln-1478"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">b</span>
+<a name="ln-1479"></a>         <span class="kt">logical</span><span class="p">,</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-1480"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">n</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">x</span>
+<a name="ln-1481"></a>      <span class="k">end function </span><span class="n">util_solve_linear_system_d</span>
+<a name="ln-1482"></a>
+<a name="ln-1483"></a>      <span class="k">module function </span><span class="n">util_solve_linear_system_q</span><span class="p">(</span><span class="n">A</span><span class="p">,</span><span class="n">b</span><span class="p">,</span><span class="n">n</span><span class="p">,</span><span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">x</span><span class="p">)</span>
+<a name="ln-1484"></a>         <span class="k">implicit none</span>
+<a name="ln-1485"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>
+<a name="ln-1486"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">QP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">A</span>
+<a name="ln-1487"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">QP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">b</span>
+<a name="ln-1488"></a>         <span class="kt">logical</span><span class="p">,</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-1489"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">QP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">n</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">x</span>
+<a name="ln-1490"></a>      <span class="k">end function </span><span class="n">util_solve_linear_system_q</span>
+<a name="ln-1491"></a>   <span class="k">end interface</span>
 <a name="ln-1492"></a>
-<a name="ln-1493"></a>      <span class="k">module subroutine </span><span class="n">util_sort_index_sp</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span><span class="n">ind</span><span class="p">)</span>
-<a name="ln-1494"></a>         <span class="k">implicit none</span>
-<a name="ln-1495"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">SP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">arr</span>
-<a name="ln-1496"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ind</span>
-<a name="ln-1497"></a>      <span class="k">end subroutine </span><span class="n">util_sort_index_sp</span>
-<a name="ln-1498"></a>
-<a name="ln-1499"></a>      <span class="k">module subroutine </span><span class="n">util_sort_dp</span><span class="p">(</span><span class="n">arr</span><span class="p">)</span>
-<a name="ln-1500"></a>         <span class="k">implicit none</span>
-<a name="ln-1501"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>
-<a name="ln-1502"></a>      <span class="k">end subroutine </span><span class="n">util_sort_dp</span>
-<a name="ln-1503"></a>
-<a name="ln-1504"></a>      <span class="k">module subroutine </span><span class="n">util_sort_index_dp</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span><span class="n">ind</span><span class="p">)</span>
-<a name="ln-1505"></a>         <span class="k">implicit none</span>
-<a name="ln-1506"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">arr</span>
-<a name="ln-1507"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ind</span>
-<a name="ln-1508"></a>      <span class="k">end subroutine </span><span class="n">util_sort_index_dp</span>
-<a name="ln-1509"></a>   <span class="k">end interface </span><span class="n">util_sort</span>
-<a name="ln-1510"></a>
-<a name="ln-1511"></a>   <span class="k">interface </span><span class="n">util_sort_rearrange</span>
-<a name="ln-1512"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_char_string</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
+<a name="ln-1493"></a><span class="k">   interface</span>
+<a name="ln-1494"></a><span class="k">      module function </span><span class="n">util_solve_rkf45</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">y0in</span><span class="p">,</span> <span class="n">t1</span><span class="p">,</span> <span class="n">dt0</span><span class="p">,</span> <span class="n">tol</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">y1</span><span class="p">)</span>
+<a name="ln-1495"></a>         <span class="k">use </span><span class="n">lambda_function</span>
+<a name="ln-1496"></a>         <span class="k">implicit none</span>
+<a name="ln-1497"></a><span class="k">         class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>    <span class="c">!! lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set</span>
+<a name="ln-1498"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">y0in</span> <span class="c">!! Initial value at t=0</span>
+<a name="ln-1499"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t1</span>   <span class="c">!! Final time</span>
+<a name="ln-1500"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt0</span>  <span class="c">!! Initial step size guess</span>
+<a name="ln-1501"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">tol</span>  <span class="c">!! Tolerance on solution</span>
+<a name="ln-1502"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span>   <span class="kd">::</span> <span class="n">y1</span>  <span class="c">!! Final result</span>
+<a name="ln-1503"></a>      <span class="k">end function </span><span class="n">util_solve_rkf45</span>
+<a name="ln-1504"></a>   <span class="k">end interface</span>
+<a name="ln-1505"></a>
+<a name="ln-1506"></a><span class="k">   interface </span><span class="n">util_sort</span>
+<a name="ln-1507"></a>      <span class="k">module subroutine </span><span class="n">util_sort_i4b</span><span class="p">(</span><span class="n">arr</span><span class="p">)</span>
+<a name="ln-1508"></a>         <span class="k">implicit none</span>
+<a name="ln-1509"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>
+<a name="ln-1510"></a>      <span class="k">end subroutine </span><span class="n">util_sort_i4b</span>
+<a name="ln-1511"></a>
+<a name="ln-1512"></a>      <span class="k">module subroutine </span><span class="n">util_sort_index_i4b</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span><span class="n">ind</span><span class="p">)</span>
 <a name="ln-1513"></a>         <span class="k">implicit none</span>
-<a name="ln-1514"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
-<a name="ln-1515"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>          <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
-<a name="ln-1516"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
-<a name="ln-1517"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_char_string</span>
-<a name="ln-1518"></a>
-<a name="ln-1519"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_DP</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
-<a name="ln-1520"></a>         <span class="k">implicit none</span>
-<a name="ln-1521"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
-<a name="ln-1522"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
-<a name="ln-1523"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
-<a name="ln-1524"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_DP</span>
-<a name="ln-1525"></a>
-<a name="ln-1526"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_DPvec</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
-<a name="ln-1527"></a>         <span class="k">implicit none</span>
-<a name="ln-1528"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
-<a name="ln-1529"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
-<a name="ln-1530"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
-<a name="ln-1531"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_DPvec</span>
-<a name="ln-1532"></a>
-<a name="ln-1533"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_I4B</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
-<a name="ln-1534"></a>         <span class="k">implicit none</span>
-<a name="ln-1535"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
-<a name="ln-1536"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
-<a name="ln-1537"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
-<a name="ln-1538"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_I4B</span>
-<a name="ln-1539"></a>
-<a name="ln-1540"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_info</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
-<a name="ln-1541"></a>         <span class="k">implicit none</span>
-<a name="ln-1542"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
-<a name="ln-1543"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>        <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
-<a name="ln-1544"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
-<a name="ln-1545"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_info</span>
-<a name="ln-1546"></a>
-<a name="ln-1547"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_logical</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
-<a name="ln-1548"></a>         <span class="k">implicit none</span>
-<a name="ln-1549"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
-<a name="ln-1550"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
-<a name="ln-1551"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
-<a name="ln-1552"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_logical</span>
-<a name="ln-1553"></a>   <span class="k">end interface </span><span class="n">util_sort_rearrange</span>
-<a name="ln-1554"></a>
-<a name="ln-1555"></a>   <span class="k">interface</span>
-<a name="ln-1556"></a><span class="k">      module subroutine </span><span class="n">util_sort_rearrange_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-1514"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">arr</span>
+<a name="ln-1515"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ind</span>
+<a name="ln-1516"></a>      <span class="k">end subroutine </span><span class="n">util_sort_index_i4b</span>
+<a name="ln-1517"></a>
+<a name="ln-1518"></a>      <span class="k">module subroutine </span><span class="n">util_sort_sp</span><span class="p">(</span><span class="n">arr</span><span class="p">)</span>
+<a name="ln-1519"></a>         <span class="k">implicit none</span>
+<a name="ln-1520"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">SP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>
+<a name="ln-1521"></a>      <span class="k">end subroutine </span><span class="n">util_sort_sp</span>
+<a name="ln-1522"></a>
+<a name="ln-1523"></a>      <span class="k">module subroutine </span><span class="n">util_sort_index_sp</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span><span class="n">ind</span><span class="p">)</span>
+<a name="ln-1524"></a>         <span class="k">implicit none</span>
+<a name="ln-1525"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">SP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">arr</span>
+<a name="ln-1526"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ind</span>
+<a name="ln-1527"></a>      <span class="k">end subroutine </span><span class="n">util_sort_index_sp</span>
+<a name="ln-1528"></a>
+<a name="ln-1529"></a>      <span class="k">module subroutine </span><span class="n">util_sort_dp</span><span class="p">(</span><span class="n">arr</span><span class="p">)</span>
+<a name="ln-1530"></a>         <span class="k">implicit none</span>
+<a name="ln-1531"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span>
+<a name="ln-1532"></a>      <span class="k">end subroutine </span><span class="n">util_sort_dp</span>
+<a name="ln-1533"></a>
+<a name="ln-1534"></a>      <span class="k">module subroutine </span><span class="n">util_sort_index_dp</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span><span class="n">ind</span><span class="p">)</span>
+<a name="ln-1535"></a>         <span class="k">implicit none</span>
+<a name="ln-1536"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">arr</span>
+<a name="ln-1537"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">ind</span>
+<a name="ln-1538"></a>      <span class="k">end subroutine </span><span class="n">util_sort_index_dp</span>
+<a name="ln-1539"></a>   <span class="k">end interface </span><span class="n">util_sort</span>
+<a name="ln-1540"></a>
+<a name="ln-1541"></a>   <span class="k">interface </span><span class="n">util_sort_rearrange</span>
+<a name="ln-1542"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_char_string</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
+<a name="ln-1543"></a>         <span class="k">implicit none</span>
+<a name="ln-1544"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
+<a name="ln-1545"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>          <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
+<a name="ln-1546"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
+<a name="ln-1547"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_char_string</span>
+<a name="ln-1548"></a>
+<a name="ln-1549"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_DP</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
+<a name="ln-1550"></a>         <span class="k">implicit none</span>
+<a name="ln-1551"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
+<a name="ln-1552"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
+<a name="ln-1553"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
+<a name="ln-1554"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_DP</span>
+<a name="ln-1555"></a>
+<a name="ln-1556"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_DPvec</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
 <a name="ln-1557"></a>         <span class="k">implicit none</span>
-<a name="ln-1558"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
-<a name="ln-1559"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
-<a name="ln-1560"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_body</span>
-<a name="ln-1561"></a>
-<a name="ln-1562"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
-<a name="ln-1563"></a>         <span class="k">implicit none</span>
-<a name="ln-1564"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1565"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
-<a name="ln-1566"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_pl</span>
-<a name="ln-1567"></a>
-<a name="ln-1568"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
-<a name="ln-1569"></a>         <span class="k">implicit none</span>
-<a name="ln-1570"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1571"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
-<a name="ln-1572"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_tp</span>
-<a name="ln-1573"></a>
-<a name="ln-1574"></a>      <span class="k">module subroutine </span><span class="n">util_sort_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
-<a name="ln-1575"></a>         <span class="k">implicit none</span>
-<a name="ln-1576"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest body object</span>
-<a name="ln-1577"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>  <span class="c">!! Sorting attribute</span>
-<a name="ln-1578"></a>         <span class="kt">logical</span><span class="p">,</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
-<a name="ln-1579"></a>      <span class="k">end subroutine </span><span class="n">util_sort_body</span>
-<a name="ln-1580"></a>
-<a name="ln-1581"></a>      <span class="k">module subroutine </span><span class="n">util_sort_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
-<a name="ln-1582"></a>         <span class="k">implicit none</span>
-<a name="ln-1583"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest body object</span>
-<a name="ln-1584"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>  <span class="c">!! Sorting attribute</span>
-<a name="ln-1585"></a>         <span class="kt">logical</span><span class="p">,</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
-<a name="ln-1586"></a>      <span class="k">end subroutine </span><span class="n">util_sort_pl</span>
-<a name="ln-1587"></a>
-<a name="ln-1588"></a>      <span class="k">module subroutine </span><span class="n">util_sort_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
-<a name="ln-1589"></a>         <span class="k">implicit none</span>
-<a name="ln-1590"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest body object</span>
-<a name="ln-1591"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>  <span class="c">!! Sorting attribute</span>
-<a name="ln-1592"></a>         <span class="kt">logical</span><span class="p">,</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
-<a name="ln-1593"></a>      <span class="k">end subroutine </span><span class="n">util_sort_tp</span>
-<a name="ln-1594"></a>   <span class="k">end interface</span>
-<a name="ln-1595"></a>
-<a name="ln-1596"></a><span class="k">   interface </span><span class="n">util_spill</span>
-<a name="ln-1597"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_char_string</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1598"></a>         <span class="k">implicit none</span>
-<a name="ln-1599"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
-<a name="ln-1600"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
-<a name="ln-1601"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
-<a name="ln-1602"></a>         <span class="kt">logical</span><span class="p">,</span>                                          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1603"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_char_string</span>
-<a name="ln-1604"></a>
-<a name="ln-1605"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_DP</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1606"></a>         <span class="k">implicit none</span>
-<a name="ln-1607"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
-<a name="ln-1608"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
-<a name="ln-1609"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-1610"></a>         <span class="kt">logical</span><span class="p">,</span>                             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1611"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_DP</span>
-<a name="ln-1612"></a>
-<a name="ln-1613"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_DPvec</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1614"></a>         <span class="k">implicit none</span>
-<a name="ln-1615"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
-<a name="ln-1616"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array discards</span>
-<a name="ln-1617"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-1618"></a>         <span class="kt">logical</span><span class="p">,</span>                               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1619"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_DPvec</span>
-<a name="ln-1620"></a>
-<a name="ln-1621"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_I4B</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1622"></a>         <span class="k">implicit none</span>
-<a name="ln-1623"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
-<a name="ln-1624"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
-<a name="ln-1625"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
-<a name="ln-1626"></a>         <span class="kt">logical</span><span class="p">,</span>                                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1627"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_I4B</span>
-<a name="ln-1628"></a>
-<a name="ln-1629"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_I8B</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1630"></a>         <span class="k">implicit none</span>
-<a name="ln-1631"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
-<a name="ln-1632"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
-<a name="ln-1633"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
-<a name="ln-1634"></a>         <span class="kt">logical</span><span class="p">,</span>                                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1635"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_I8B</span>
-<a name="ln-1636"></a>
-<a name="ln-1637"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_info</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1638"></a>         <span class="k">implicit none</span>
-<a name="ln-1639"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
-<a name="ln-1640"></a>         <span class="k">type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
-<a name="ln-1641"></a>         <span class="kt">logical</span><span class="p">,</span>                       <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
-<a name="ln-1642"></a>         <span class="kt">logical</span><span class="p">,</span>                                                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1643"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_info</span>
-<a name="ln-1644"></a>
-<a name="ln-1645"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_logical</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1646"></a>         <span class="k">implicit none</span>
-<a name="ln-1647"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
-<a name="ln-1648"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
-<a name="ln-1649"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
-<a name="ln-1650"></a>         <span class="kt">logical</span><span class="p">,</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1651"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_logical</span>
-<a name="ln-1652"></a>   <span class="k">end interface</span>
-<a name="ln-1653"></a>
-<a name="ln-1654"></a><span class="k">   interface </span>
-<a name="ln-1655"></a><span class="k">      module subroutine </span><span class="n">util_spill_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1656"></a>         <span class="k">implicit none</span>
-<a name="ln-1657"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! Swiftest body object</span>
-<a name="ln-1658"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>    <span class="c">!! Discarded object </span>
-<a name="ln-1659"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span> <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-1660"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1661"></a>      <span class="k">end subroutine </span><span class="n">util_spill_body</span>
-<a name="ln-1662"></a>
-<a name="ln-1663"></a>      <span class="k">module subroutine </span><span class="n">util_spill_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1664"></a>         <span class="k">implicit none</span>
-<a name="ln-1665"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest encounter list </span>
-<a name="ln-1666"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Discarded object </span>
-<a name="ln-1667"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-1668"></a>         <span class="kt">logical</span><span class="p">,</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter body by removing the discard list</span>
-<a name="ln-1669"></a>      <span class="k">end subroutine </span><span class="n">util_spill_encounter</span>
-<a name="ln-1670"></a>
-<a name="ln-1671"></a>      <span class="k">module subroutine </span><span class="n">util_spill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1672"></a>         <span class="k">implicit none</span>
-<a name="ln-1673"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! Swiftest massive body object</span>
-<a name="ln-1674"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>    <span class="c">!! Discarded object </span>
-<a name="ln-1675"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span> <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-1676"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1677"></a>      <span class="k">end subroutine </span><span class="n">util_spill_pl</span>
-<a name="ln-1678"></a>
-<a name="ln-1679"></a>      <span class="k">module subroutine </span><span class="n">util_spill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
-<a name="ln-1680"></a>         <span class="k">implicit none</span>
-<a name="ln-1681"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! Swiftest test particle object</span>
-<a name="ln-1682"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>    <span class="c">!! Discarded object </span>
-<a name="ln-1683"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span> <span class="c">!! Logical array of bodies to spill into the discards</span>
-<a name="ln-1684"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
-<a name="ln-1685"></a>      <span class="k">end subroutine </span><span class="n">util_spill_tp</span>
-<a name="ln-1686"></a>
-<a name="ln-1687"></a>      <span class="k">module subroutine </span><span class="n">util_valid_id_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-1688"></a>         <span class="k">implicit none</span>
-<a name="ln-1689"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-1690"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-1691"></a>      <span class="k">end subroutine </span><span class="n">util_valid_id_system</span>
+<a name="ln-1558"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
+<a name="ln-1559"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
+<a name="ln-1560"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
+<a name="ln-1561"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_DPvec</span>
+<a name="ln-1562"></a>
+<a name="ln-1563"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_I4B</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
+<a name="ln-1564"></a>         <span class="k">implicit none</span>
+<a name="ln-1565"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
+<a name="ln-1566"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
+<a name="ln-1567"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
+<a name="ln-1568"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_I4B</span>
+<a name="ln-1569"></a>
+<a name="ln-1570"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_info</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
+<a name="ln-1571"></a>         <span class="k">implicit none</span>
+<a name="ln-1572"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
+<a name="ln-1573"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>        <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
+<a name="ln-1574"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
+<a name="ln-1575"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_info</span>
+<a name="ln-1576"></a>
+<a name="ln-1577"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_arr_logical</span><span class="p">(</span><span class="n">arr</span><span class="p">,</span> <span class="n">ind</span><span class="p">,</span> <span class="n">n</span><span class="p">)</span>
+<a name="ln-1578"></a>         <span class="k">implicit none</span>
+<a name="ln-1579"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">arr</span> <span class="c">!! Destination array </span>
+<a name="ln-1580"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span> <span class="c">!! Index to rearrange against</span>
+<a name="ln-1581"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">n</span>   <span class="c">!! Number of elements in arr and ind to rearrange</span>
+<a name="ln-1582"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_arr_logical</span>
+<a name="ln-1583"></a>   <span class="k">end interface </span><span class="n">util_sort_rearrange</span>
+<a name="ln-1584"></a>
+<a name="ln-1585"></a>   <span class="k">interface</span>
+<a name="ln-1586"></a><span class="k">      module subroutine </span><span class="n">util_sort_rearrange_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-1587"></a>         <span class="k">implicit none</span>
+<a name="ln-1588"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest body object</span>
+<a name="ln-1589"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
+<a name="ln-1590"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_body</span>
+<a name="ln-1591"></a>
+<a name="ln-1592"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-1593"></a>         <span class="k">implicit none</span>
+<a name="ln-1594"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1595"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
+<a name="ln-1596"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_pl</span>
+<a name="ln-1597"></a>
+<a name="ln-1598"></a>      <span class="k">module subroutine </span><span class="n">util_sort_rearrange_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">ind</span><span class="p">)</span>
+<a name="ln-1599"></a>         <span class="k">implicit none</span>
+<a name="ln-1600"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1601"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>         <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ind</span>  <span class="c">!! Index array used to restructure the body (should contain all 1:n index values in the desired order)</span>
+<a name="ln-1602"></a>      <span class="k">end subroutine </span><span class="n">util_sort_rearrange_tp</span>
+<a name="ln-1603"></a>
+<a name="ln-1604"></a>      <span class="k">module subroutine </span><span class="n">util_sort_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
+<a name="ln-1605"></a>         <span class="k">implicit none</span>
+<a name="ln-1606"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest body object</span>
+<a name="ln-1607"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>  <span class="c">!! Sorting attribute</span>
+<a name="ln-1608"></a>         <span class="kt">logical</span><span class="p">,</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
+<a name="ln-1609"></a>      <span class="k">end subroutine </span><span class="n">util_sort_body</span>
+<a name="ln-1610"></a>
+<a name="ln-1611"></a>      <span class="k">module subroutine </span><span class="n">util_sort_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
+<a name="ln-1612"></a>         <span class="k">implicit none</span>
+<a name="ln-1613"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest body object</span>
+<a name="ln-1614"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>  <span class="c">!! Sorting attribute</span>
+<a name="ln-1615"></a>         <span class="kt">logical</span><span class="p">,</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
+<a name="ln-1616"></a>      <span class="k">end subroutine </span><span class="n">util_sort_pl</span>
+<a name="ln-1617"></a>
+<a name="ln-1618"></a>      <span class="k">module subroutine </span><span class="n">util_sort_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">sortby</span><span class="p">,</span> <span class="n">ascending</span><span class="p">)</span>
+<a name="ln-1619"></a>         <span class="k">implicit none</span>
+<a name="ln-1620"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>    <span class="c">!! Swiftest body object</span>
+<a name="ln-1621"></a>         <span class="kt">character</span><span class="p">(</span><span class="o">*</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sortby</span>  <span class="c">!! Sorting attribute</span>
+<a name="ln-1622"></a>         <span class="kt">logical</span><span class="p">,</span>            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ascending</span> <span class="c">!! Logical flag indicating whether or not the sorting should be in ascending or descending order</span>
+<a name="ln-1623"></a>      <span class="k">end subroutine </span><span class="n">util_sort_tp</span>
+<a name="ln-1624"></a>   <span class="k">end interface</span>
+<a name="ln-1625"></a>
+<a name="ln-1626"></a><span class="k">   interface </span><span class="n">util_spill</span>
+<a name="ln-1627"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_char_string</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1628"></a>         <span class="k">implicit none</span>
+<a name="ln-1629"></a><span class="k">         </span><span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
+<a name="ln-1630"></a>         <span class="kt">character</span><span class="p">(</span><span class="nb">len</span><span class="o">=</span><span class="n">STRMAX</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
+<a name="ln-1631"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
+<a name="ln-1632"></a>         <span class="kt">logical</span><span class="p">,</span>                                          <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1633"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_char_string</span>
+<a name="ln-1634"></a>
+<a name="ln-1635"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_DP</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1636"></a>         <span class="k">implicit none</span>
+<a name="ln-1637"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
+<a name="ln-1638"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
+<a name="ln-1639"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-1640"></a>         <span class="kt">logical</span><span class="p">,</span>                             <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1641"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_DP</span>
+<a name="ln-1642"></a>
+<a name="ln-1643"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_DPvec</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1644"></a>         <span class="k">implicit none</span>
+<a name="ln-1645"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
+<a name="ln-1646"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array discards</span>
+<a name="ln-1647"></a>         <span class="kt">logical</span><span class="p">,</span>  <span class="k">dimension</span><span class="p">(:),</span>                <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-1648"></a>         <span class="kt">logical</span><span class="p">,</span>                               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1649"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_DPvec</span>
+<a name="ln-1650"></a>
+<a name="ln-1651"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_I4B</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1652"></a>         <span class="k">implicit none</span>
+<a name="ln-1653"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
+<a name="ln-1654"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
+<a name="ln-1655"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
+<a name="ln-1656"></a>         <span class="kt">logical</span><span class="p">,</span>                                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1657"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_I4B</span>
+<a name="ln-1658"></a>
+<a name="ln-1659"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_I8B</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1660"></a>         <span class="k">implicit none</span>
+<a name="ln-1661"></a><span class="k">         </span><span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
+<a name="ln-1662"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
+<a name="ln-1663"></a>         <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
+<a name="ln-1664"></a>         <span class="kt">logical</span><span class="p">,</span>                                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1665"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_I8B</span>
+<a name="ln-1666"></a>
+<a name="ln-1667"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_info</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1668"></a>         <span class="k">implicit none</span>
+<a name="ln-1669"></a><span class="k">         type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
+<a name="ln-1670"></a>         <span class="k">type</span><span class="p">(</span><span class="n">swiftest_particle_info</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
+<a name="ln-1671"></a>         <span class="kt">logical</span><span class="p">,</span>                       <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
+<a name="ln-1672"></a>         <span class="kt">logical</span><span class="p">,</span>                                                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1673"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_info</span>
+<a name="ln-1674"></a>
+<a name="ln-1675"></a>      <span class="k">module subroutine </span><span class="n">util_spill_arr_logical</span><span class="p">(</span><span class="n">keeps</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1676"></a>         <span class="k">implicit none</span>
+<a name="ln-1677"></a><span class="k">         </span><span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">keeps</span>        <span class="c">!! Array of values to keep </span>
+<a name="ln-1678"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span><span class="p">,</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Array of discards</span>
+<a name="ln-1679"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discardss</span>
+<a name="ln-1680"></a>         <span class="kt">logical</span><span class="p">,</span>                            <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1681"></a>      <span class="k">end subroutine </span><span class="n">util_spill_arr_logical</span>
+<a name="ln-1682"></a>   <span class="k">end interface</span>
+<a name="ln-1683"></a>
+<a name="ln-1684"></a><span class="k">   interface </span>
+<a name="ln-1685"></a><span class="k">      module subroutine </span><span class="n">util_spill_body</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1686"></a>         <span class="k">implicit none</span>
+<a name="ln-1687"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! Swiftest body object</span>
+<a name="ln-1688"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>    <span class="c">!! Discarded object </span>
+<a name="ln-1689"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span> <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-1690"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1691"></a>      <span class="k">end subroutine </span><span class="n">util_spill_body</span>
 <a name="ln-1692"></a>
-<a name="ln-1693"></a>      <span class="k">module subroutine </span><span class="n">util_version</span><span class="p">()</span>
+<a name="ln-1693"></a>      <span class="k">module subroutine </span><span class="n">util_spill_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
 <a name="ln-1694"></a>         <span class="k">implicit none</span>
-<a name="ln-1695"></a><span class="k">      end subroutine </span><span class="n">util_version</span>
-<a name="ln-1696"></a>   <span class="k">end interface</span>
-<a name="ln-1697"></a>
-<a name="ln-1698"></a><span class="k">end module </span><span class="n">swiftest_classes</span>
+<a name="ln-1695"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>         <span class="c">!! Swiftest encounter list </span>
+<a name="ln-1696"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>     <span class="c">!! Discarded object </span>
+<a name="ln-1697"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span>  <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-1698"></a>         <span class="kt">logical</span><span class="p">,</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter body by removing the discard list</span>
+<a name="ln-1699"></a>      <span class="k">end subroutine </span><span class="n">util_spill_encounter</span>
+<a name="ln-1700"></a>
+<a name="ln-1701"></a>      <span class="k">module subroutine </span><span class="n">util_spill_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1702"></a>         <span class="k">implicit none</span>
+<a name="ln-1703"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! Swiftest massive body object</span>
+<a name="ln-1704"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>    <span class="c">!! Discarded object </span>
+<a name="ln-1705"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span> <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-1706"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1707"></a>      <span class="k">end subroutine </span><span class="n">util_spill_pl</span>
+<a name="ln-1708"></a>
+<a name="ln-1709"></a>      <span class="k">module subroutine </span><span class="n">util_spill_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">discards</span><span class="p">,</span> <span class="n">lspill_list</span><span class="p">,</span> <span class="n">ldestructive</span><span class="p">)</span>
+<a name="ln-1710"></a>         <span class="k">implicit none</span>
+<a name="ln-1711"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>        <span class="c">!! Swiftest test particle object</span>
+<a name="ln-1712"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_body</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">discards</span>    <span class="c">!! Discarded object </span>
+<a name="ln-1713"></a>         <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lspill_list</span> <span class="c">!! Logical array of bodies to spill into the discards</span>
+<a name="ln-1714"></a>         <span class="kt">logical</span><span class="p">,</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">ldestructive</span> <span class="c">!! Logical flag indicating whether or not this operation should alter the keeps array or not</span>
+<a name="ln-1715"></a>      <span class="k">end subroutine </span><span class="n">util_spill_tp</span>
+<a name="ln-1716"></a>
+<a name="ln-1717"></a>      <span class="k">module subroutine </span><span class="n">util_valid_id_system</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-1718"></a>         <span class="k">implicit none</span>
+<a name="ln-1719"></a><span class="k">         class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-1720"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-1721"></a>      <span class="k">end subroutine </span><span class="n">util_valid_id_system</span>
+<a name="ln-1722"></a>
+<a name="ln-1723"></a>      <span class="k">module subroutine </span><span class="n">util_version</span><span class="p">()</span>
+<a name="ln-1724"></a>         <span class="k">implicit none</span>
+<a name="ln-1725"></a><span class="k">      end subroutine </span><span class="n">util_version</span>
+<a name="ln-1726"></a>   <span class="k">end interface</span>
+<a name="ln-1727"></a>
+<a name="ln-1728"></a><span class="k">end module </span><span class="n">swiftest_classes</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/swiftest_driver.f90.html b/docs/sourcefile/swiftest_driver.f90.html
index db826d915..d489e0f2d 100644
--- a/docs/sourcefile/swiftest_driver.f90.html
+++ b/docs/sourcefile/swiftest_driver.f90.html
@@ -226,292 +226,287 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~swiftest_driver.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileswiftest_driverf90EfferentGraph" width="641pt" height="265pt"
- viewBox="0.00 0.00 641.00 264.67" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 378.34)">
+<svg id="sourcefileswiftest_driverf90EfferentGraph" width="641pt" height="229pt"
+ viewBox="0.00 0.00 641.00 228.50" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 326.1)">
 <title>sourcefile~~swiftest_driver.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-378.34 922,-378.34 922,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-326.1 922,-326.1 922,4 -4,4"/>
 <!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~swiftest_driver.f90</title>
-<polygon fill="none" stroke="black" points="918,-144 820,-144 820,-120 918,-120 918,-144"/>
-<text text-anchor="middle" x="869" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_driver.f90</text>
+<polygon fill="none" stroke="black" points="918,-151.52 820,-151.52 820,-127.52 918,-127.52 918,-151.52"/>
+<text text-anchor="middle" x="869" y="-137.12" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_driver.f90</text>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-144 718,-144 718,-120 784,-120 784,-144"/>
-<text text-anchor="middle" x="751" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-151.52 718,-151.52 718,-127.52 784,-127.52 784,-151.52"/>
+<text text-anchor="middle" x="751" y="-137.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.81,-132C811.32,-132 802.54,-132 794.23,-132"/>
-<polygon fill="#000000" stroke="#000000" points="794.01,-128.5 784.01,-132 794.01,-135.5 794.01,-128.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.81,-139.52C811.32,-139.52 802.54,-139.52 794.23,-139.52"/>
+<polygon fill="#000000" stroke="#000000" points="794.01,-136.02 784.01,-139.52 794.01,-143.02 794.01,-136.02"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-220 143.5,-220 143.5,-196 250.5,-196 250.5,-220"/>
-<text text-anchor="middle" x="197" y="-205.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-289.52 298.5,-289.52 298.5,-265.52 403.5,-265.52 403.5,-289.52"/>
+<text text-anchor="middle" x="351" y="-275.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C583.38,-309.4 582.23,-243.47 537,-227 457.67,-198.11 432.24,-202.41 348,-208"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.94,-144.34C731.46,-175.37 691.38,-256.39 628.5,-288"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M741.8,-151.53C712.5,-192.83 608.47,-326 490.5,-317.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-317.52C469.86,-319.73 425.24,-305.22 392.05,-293.06"/>
+<polygon fill="#000000" stroke="#000000" points="393.19,-289.75 382.6,-289.55 390.75,-296.31 393.19,-289.75"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-320 300,-320 300,-296 394,-296 394,-320"/>
-<text text-anchor="middle" x="347" y="-305.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-289.52 142,-289.52 142,-265.52 260,-265.52 260,-289.52"/>
+<text text-anchor="middle" x="201" y="-275.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C607.09,-297.39 480.19,-303.39 404.55,-306.17"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-302.69 394.23,-306.54 404.35,-309.68 404.1,-302.69"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-317.52C428.25,-324.66 412.53,-321.54 352,-317.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-317.52C312.54,-315.04 271.43,-303.15 242.06,-292.97"/>
+<polygon fill="#000000" stroke="#000000" points="243.17,-289.65 232.57,-289.6 240.83,-296.25 243.17,-289.65"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-104 142,-104 142,-80 252,-80 252,-104"/>
-<text text-anchor="middle" x="197" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-191.52 576,-191.52 576,-167.52 679,-167.52 679,-191.52"/>
+<text text-anchor="middle" x="627.5" y="-177.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-132.22C668.53,-132.5 572.27,-132.86 490.5,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-132C450.97,-131.61 443.05,-119.98 406,-114 358.08,-106.26 303.49,-100.61 262.27,-96.97"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-93.46 252.09,-96.09 261.75,-100.44 262.35,-93.46"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-150.14C704.62,-154.46 689.18,-159.55 674.87,-164.26"/>
+<polygon fill="#000000" stroke="#000000" points="673.59,-160.99 665.19,-167.44 675.78,-167.64 673.59,-160.99"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-340 442,-340 442,-316 537,-316 537,-340"/>
-<text text-anchor="middle" x="489.5" y="-325.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-171.52 442.5,-171.52 442.5,-147.52 536.5,-147.52 536.5,-171.52"/>
+<text text-anchor="middle" x="489.5" y="-157.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C601.47,-300.11 572.03,-309.32 546.96,-315.84"/>
-<polygon fill="#000000" stroke="#000000" points="546.07,-312.45 537.23,-318.29 547.78,-319.24 546.07,-312.45"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C600.08,-139.52 571.09,-143.26 546.68,-147.51"/>
+<polygon fill="#000000" stroke="#000000" points="545.74,-144.12 536.52,-149.35 546.98,-151.01 545.74,-144.12"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node7" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
 <g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-144 0,-144 0,-120 106,-120 106,-144"/>
-<text text-anchor="middle" x="53" y="-129.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-249.52 0,-249.52 0,-225.52 106,-225.52 106,-249.52"/>
+<text text-anchor="middle" x="53" y="-235.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C583.49,-309.62 582.23,-332.53 537,-349 457.67,-377.89 431.81,-378.15 348,-368"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-317.52C257.37,-311.38 229.25,-330.23 142,-298.52 116.33,-289.19 91.13,-270.47 74.32,-256.22"/>
+<polygon fill="#000000" stroke="#000000" points="76.62,-253.58 66.78,-249.64 72.02,-258.85 76.62,-253.58"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-84 573,-84 573,-60 682,-60 682,-84"/>
-<text text-anchor="middle" x="627.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-131.52 304,-131.52 304,-107.52 398,-107.52 398,-131.52"/>
+<text text-anchor="middle" x="351" y="-117.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M725.41,-119.86C707.21,-110.87 682.21,-98.52 662.16,-88.62"/>
-<polygon fill="#000000" stroke="#000000" points="663.57,-85.41 653.05,-84.12 660.47,-91.69 663.57,-85.41"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C550.7,-139.52 463.45,-131.84 408.03,-126"/>
+<polygon fill="#000000" stroke="#000000" points="408.38,-122.52 398.07,-124.94 407.64,-129.48 408.38,-122.52"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node9" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-260 442.5,-260 442.5,-236 536.5,-236 536.5,-260"/>
-<text text-anchor="middle" x="489.5" y="-245.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.52 573,-72.52 573,-48.52 682,-48.52 682,-72.52"/>
+<text text-anchor="middle" x="627.5" y="-58.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-288C608.76,-296.58 559.97,-278.76 525.93,-264.22"/>
-<polygon fill="#000000" stroke="#000000" points="526.9,-260.82 516.33,-260.04 524.1,-267.24 526.9,-260.82"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.28,-127.35C711.07,-114.21 678.67,-93.15 655.66,-78.18"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-75.09 647.04,-72.58 653.52,-80.96 657.33,-75.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-222 576,-222 576,-198 679,-198 679,-222"/>
-<text text-anchor="middle" x="627.5" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-32.52 296,-32.52 296,-8.52 406,-8.52 406,-32.52"/>
+<text text-anchor="middle" x="351" y="-18.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.28,-144.02C711.18,-156.92 679.05,-177.55 656.06,-192.31"/>
-<polygon fill="#000000" stroke="#000000" points="653.96,-189.49 647.44,-197.84 657.75,-195.38 653.96,-189.49"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.75,-127.41C737.37,-105.57 716.5,-59.97 682,-39.52 600.36,8.85 486.49,2.66 416.1,-7.79"/>
+<polygon fill="#000000" stroke="#000000" points="415.38,-4.36 406.04,-9.36 416.46,-11.28 415.38,-4.36"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-180 294.5,-180 294.5,-156 399.5,-156 399.5,-180"/>
-<text text-anchor="middle" x="347" y="-165.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-91.52 442,-91.52 442,-67.52 537,-67.52 537,-91.52"/>
+<text text-anchor="middle" x="489.5" y="-77.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-132C453.18,-131.63 414.38,-142.47 386.52,-152.35"/>
-<polygon fill="#000000" stroke="#000000" points="384.96,-149.2 376.78,-155.93 387.38,-155.77 384.96,-149.2"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C605.03,-139.52 554.04,-114.19 520.95,-96.44"/>
+<polygon fill="#000000" stroke="#000000" points="522.59,-93.35 512.13,-91.67 519.26,-99.51 522.59,-93.35"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-139.52C693.28,-139.52 658.77,-139.52 628.5,-139.52"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-24 288,-24 288,0 406,0 406,-24"/>
-<text text-anchor="middle" x="347" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~swiftest_driver.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-209.52 147.5,-209.52 147.5,-185.52 254.5,-185.52 254.5,-209.52"/>
+<text text-anchor="middle" x="201" y="-195.12" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M743.78,-119.89C733.62,-101.48 711.58,-66.94 682,-51 598.73,-6.12 487.07,-2.43 416.31,-5.77"/>
-<polygon fill="#000000" stroke="#000000" points="415.98,-2.28 406.18,-6.3 416.35,-9.27 415.98,-2.28"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-139.52C601.27,-139.82 595.78,-147.66 573,-158.52 556.07,-166.59 554.92,-174.99 537,-180.52 445.58,-208.77 333.5,-207.76 264.95,-203.41"/>
+<polygon fill="#000000" stroke="#000000" points="264.96,-199.9 254.75,-202.72 264.49,-206.89 264.96,-199.9"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M173.5,-195.96C149.85,-183.3 112.46,-163.29 85.81,-149.02"/>
-<polygon fill="#000000" stroke="#000000" points="87.33,-145.87 76.87,-144.24 84.03,-152.04 87.33,-145.87"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.43,-265.45C289.91,-254.71 243.7,-240.29 202,-237.52"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.11,-295.98C306.12,-292 296.44,-287.23 288,-282 262.06,-265.92 235.43,-243.09 217.94,-227.05"/>
-<polygon fill="#000000" stroke="#000000" points="220.28,-224.45 210.58,-220.21 215.52,-229.58 220.28,-224.45"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M321.93,-265.39C313.4,-261.34 304.14,-256.57 296,-251.52 278.77,-240.84 277.37,-233.97 260,-223.52 254.22,-220.05 247.89,-216.75 241.6,-213.74"/>
+<polygon fill="#000000" stroke="#000000" points="243.05,-210.55 232.5,-209.56 240.12,-216.91 243.05,-210.55"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.86,-318.28C269.35,-322.68 229.35,-323.72 198,-308"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-265.52C140.96,-261.35 123.7,-256.62 107.75,-252.25"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-248.85 98.03,-249.59 106.75,-255.6 108.6,-248.85"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-104C138.79,-108.12 122.26,-112.77 106.93,-117.09"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-113.79 97.07,-119.87 107.64,-120.53 105.74,-113.79"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.52C459.72,-245.51 427.67,-254.88 401.86,-262.54"/>
+<polygon fill="#000000" stroke="#000000" points="400.52,-259.29 391.93,-265.49 402.51,-265.99 400.52,-259.29"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-321.34C429.74,-319.64 416.74,-317.79 404.34,-316.02"/>
-<polygon fill="#000000" stroke="#000000" points="404.5,-312.51 394.1,-314.56 403.51,-319.44 404.5,-312.51"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-172.08C566.33,-170.67 556.31,-169.2 546.63,-167.78"/>
+<polygon fill="#000000" stroke="#000000" points="547.09,-164.31 536.69,-166.32 546.08,-171.23 547.09,-164.31"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M466.56,-340.03C439.28,-353.62 391.05,-373.21 348,-368"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-368C275.54,-359.47 261.45,-339.81 198,-308"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-237.52C172.54,-235.7 142.1,-235.42 116.16,-235.71"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-232.21 106.09,-235.85 116.13,-239.21 116.04,-232.21"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-237.52C284.37,-233.17 267.63,-241.88 202,-237.52"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.66,-64.71C473.51,-52.07 265.96,-29.49 198,-52"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.52C430.04,-253.74 412.53,-241.54 352,-237.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-237.52C312.54,-235.04 271.43,-223.15 242.06,-212.97"/>
+<polygon fill="#000000" stroke="#000000" points="243.17,-209.65 232.57,-209.6 240.83,-216.25 243.17,-209.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M603.59,-191.52C577.1,-204.87 531.81,-226.06 490.5,-237.52"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-268C300,-269.68 251.41,-243.94 222.94,-225.64"/>
-<polygon fill="#000000" stroke="#000000" points="224.71,-222.61 214.44,-220.01 220.84,-228.45 224.71,-222.61"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.21,-257.08C414.92,-261.81 379.64,-266.85 348,-268"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-159.52C281.86,-159.3 264.26,-91.84 202,-119.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.38,-159.6C415.93,-159.62 382.1,-159.62 352,-159.52"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge19" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M460.07,-260.14C438.64,-269.29 409.06,-281.92 385.67,-291.91"/>
-<polygon fill="#000000" stroke="#000000" points="384.21,-288.73 376.39,-295.88 386.96,-295.17 384.21,-288.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-147.52C433.64,-143.45 417.92,-138.84 403.3,-134.56"/>
+<polygon fill="#000000" stroke="#000000" points="403.98,-131.11 393.4,-131.65 402.01,-137.83 403.98,-131.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-268C311.95,-269.24 228.46,-323.27 198,-308"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-308C128.84,-274.33 82.75,-192.67 63.75,-153.57"/>
-<polygon fill="#000000" stroke="#000000" points="66.84,-151.93 59.41,-144.38 60.52,-154.92 66.84,-151.93"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-159.52C311.87,-159.4 269.89,-171.39 240.42,-181.94"/>
+<polygon fill="#000000" stroke="#000000" points="239.09,-178.7 230.92,-185.44 241.52,-185.26 239.09,-178.7"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-170C424.52,-160.46 412.55,-203.72 348,-208"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-208C318.16,-209.85 287.31,-210.13 261.01,-209.84"/>
-<polygon fill="#000000" stroke="#000000" points="260.85,-206.34 250.8,-209.69 260.75,-213.33 260.85,-206.34"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.98,-110.17C273.71,-106.22 233.93,-105.33 202,-119.52"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.46,-222.18C588.74,-242.76 540.57,-284.55 512.39,-309.01"/>
-<polygon fill="#000000" stroke="#000000" points="509.93,-306.51 504.67,-315.71 514.52,-311.8 509.93,-306.51"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M324.31,-131.53C315.3,-135.83 305.15,-140.79 296,-145.52 274.31,-156.73 250.23,-170.07 231.87,-180.43"/>
+<polygon fill="#000000" stroke="#000000" points="230.07,-177.43 223.09,-185.41 233.52,-183.52 230.07,-177.43"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-170C450.85,-164.38 443.5,-153.51 406,-147 314.68,-131.14 290.55,-136.92 198,-132"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M595.49,-197.94C568.3,-188.08 527.45,-174.98 490.5,-170"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-132C169.96,-130.1 141.16,-129.77 116.35,-130.04"/>
-<polygon fill="#000000" stroke="#000000" points="116.28,-126.54 106.33,-130.18 116.38,-133.54 116.28,-126.54"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.55,-59.12C560.83,-58.87 548.5,-58.65 537,-58.52 494.78,-58.05 483.95,-53.69 442,-58.52 401.2,-63.22 392.24,-71.28 352,-79.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M350,-79.52C282.86,-91.17 264.26,-91.84 202,-119.52"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M583.47,-222.02C570.82,-225.56 556.83,-229.47 543.63,-233.16"/>
-<polygon fill="#000000" stroke="#000000" points="542.41,-229.86 533.72,-235.92 544.29,-236.6 542.41,-229.86"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-170C462.95,-166.19 434.51,-165.19 409.93,-165.33"/>
-<polygon fill="#000000" stroke="#000000" points="409.61,-161.83 399.65,-165.45 409.69,-168.83 409.61,-161.83"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-119.52C147.1,-143.04 97.32,-190.73 71.8,-217.73"/>
+<polygon fill="#000000" stroke="#000000" points="68.92,-215.68 64.68,-225.39 74.05,-220.45 68.92,-215.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.46,-32.77C310.03,-53.59 255.11,-95.92 202,-119.52"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-180C286.15,-184.17 268.65,-188.9 252.49,-193.27"/>
-<polygon fill="#000000" stroke="#000000" points="251.37,-189.95 242.63,-195.94 253.2,-196.71 251.37,-189.95"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.91,-74.92C415.31,-73.44 381.48,-73.48 352,-79.52"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M312.15,-155.96C282.49,-146.35 238.01,-134.13 198,-132"/>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M447.55,-91.52C433.64,-95.6 417.92,-100.21 403.3,-104.49"/>
+<polygon fill="#000000" stroke="#000000" points="402.01,-101.22 393.4,-107.39 403.98,-107.94 402.01,-101.22"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.92,-24.05C267.05,-31.37 230.21,-41.33 198,-52"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-52C171.85,-60 164.66,-59.43 142,-71 118.6,-82.95 94.21,-100.3 77.06,-113.45"/>
-<polygon fill="#000000" stroke="#000000" points="74.53,-110.98 68.79,-119.89 78.83,-116.5 74.53,-110.98"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_driver.f90~~EfferentGraph_edge28" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-209.52C140.96,-213.7 123.7,-218.43 107.75,-222.8"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-219.44 98.03,-225.46 108.6,-226.19 106.75,-219.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/swiftest_globals.f90.html b/docs/sourcefile/swiftest_globals.f90.html
index 14b7a3a4c..332ea052c 100644
--- a/docs/sourcefile/swiftest_globals.f90.html
+++ b/docs/sourcefile/swiftest_globals.f90.html
@@ -235,1634 +235,1627 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node1" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<polygon fill="none" stroke="black" points="106,-1578 0,-1578 0,-1554 106,-1554 106,-1578"/>
-<text text-anchor="middle" x="53" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_globals.f90</text>
+<polygon fill="none" stroke="black" points="106,-2001 0,-2001 0,-1977 106,-1977 106,-2001"/>
+<text text-anchor="middle" x="53" y="-1986.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_globals.f90</text>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250,-1538 143,-1538 143,-1514 250,-1514 250,-1538"/>
-<text text-anchor="middle" x="196.5" y="-1523.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="538,-1990 433,-1990 433,-1966 538,-1966 538,-1990"/>
+<text text-anchor="middle" x="485.5" y="-1975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.05,-1538C138.49,-1542.12 122.02,-1546.77 106.74,-1551.09"/>
-<polygon fill="#000000" stroke="#000000" points="105.58,-1547.78 96.91,-1553.87 107.49,-1554.52 105.58,-1547.78"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-1960C263.92,-1952.19 174.58,-1964.55 116.34,-1975.47"/>
+<polygon fill="#000000" stroke="#000000" points="115.36,-1972.1 106.2,-1977.42 116.68,-1978.97 115.36,-1972.1"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node11" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-1941 143.5,-1941 143.5,-1917 250.5,-1917 250.5,-1941"/>
+<text text-anchor="middle" x="197" y="-1926.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge127" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-1960C311.37,-1956.97 278.29,-1950.07 251.5,-1943.55"/>
+<polygon fill="#000000" stroke="#000000" points="252.1,-1940.1 241.56,-1941.08 250.42,-1946.89 252.1,-1940.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432.68,-1970.71C406.06,-1967.14 373.09,-1962.98 343.5,-1960"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="389,-1774 295,-1774 295,-1750 389,-1750 389,-1774"/>
-<text text-anchor="middle" x="342" y="-1759.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-2578 574,-2578 574,-2554 692,-2554 692,-2578"/>
+<text text-anchor="middle" x="633" y="-2563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.26,-1774.12C277.76,-1788.87 218.36,-1810.78 197.5,-1802"/>
-</g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.42,-1749.9C297.85,-1746.32 291.63,-1741.75 287,-1736 243.72,-1682.27 283.18,-1646.03 251,-1585 243.11,-1570.04 230.55,-1555.91 219.58,-1545.23"/>
-<polygon fill="#000000" stroke="#000000" points="221.65,-1542.37 211.96,-1538.1 216.87,-1547.49 221.65,-1542.37"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M616.02,-2553.96C572.83,-2521.55 449.83,-2430.17 343.5,-2360"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-1656 287,-1656 287,-1632 397,-1632 397,-1656"/>
-<text text-anchor="middle" x="342" y="-1641.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="684.5,-2088 581.5,-2088 581.5,-2064 684.5,-2064 684.5,-2088"/>
+<text text-anchor="middle" x="633" y="-2073.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M195.5,-1802C106.69,-1764.61 69.99,-1639.63 58.41,-1588.3"/>
-<polygon fill="#000000" stroke="#000000" points="61.78,-1587.3 56.26,-1578.26 54.93,-1588.77 61.78,-1587.3"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M308.74,-1656.12C301.13,-1659.87 293.38,-1664.49 287,-1670 233.33,-1716.3 262.83,-1829.51 197.5,-1802"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2076C459.25,-2076 453.79,-2085.66 433,-2100 414.63,-2112.67 415.95,-2123.22 397,-2135 375.57,-2148.32 367.73,-2146.96 343.5,-2154"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.11,-2063.98C592.12,-2060 582.44,-2055.23 574,-2050 549.14,-2034.59 523.65,-2012.79 506.64,-1997.23"/>
+<polygon fill="#000000" stroke="#000000" points="508.72,-1994.38 499.01,-1990.14 503.95,-1999.51 508.72,-1994.38"/>
+</g>
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="533,-1934 438,-1934 438,-1910 533,-1910 533,-1934"/>
-<text text-anchor="middle" x="485.5" y="-1919.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="532.5,-2166 438.5,-2166 438.5,-2142 532.5,-2142 532.5,-2166"/>
+<text text-anchor="middle" x="485.5" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.96,-1909.98C401.33,-1897.89 338.78,-1877.68 287,-1854 245.16,-1834.87 239.9,-1819.85 197.5,-1802"/>
-</g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.04,-1909.91C444.36,-1906.27 437.91,-1901.68 433,-1896 399.92,-1857.71 430.44,-1825.97 397,-1788 394.18,-1784.79 390.87,-1781.95 387.31,-1779.43"/>
-<polygon fill="#000000" stroke="#000000" points="388.99,-1776.36 378.64,-1774.12 385.34,-1782.33 388.99,-1776.36"/>
-</g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="251,-1618 142,-1618 142,-1594 251,-1594 251,-1618"/>
-<text text-anchor="middle" x="196.5" y="-1603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
-</a>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.84,-2088C591.87,-2098.69 563.23,-2114.66 538,-2128 532.25,-2131.04 526.1,-2134.21 520.12,-2137.26"/>
+<polygon fill="#000000" stroke="#000000" points="518.31,-2134.25 510.96,-2141.89 521.46,-2140.5 518.31,-2134.25"/>
 </g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge137" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2076C458.86,-2076 453.57,-2065.31 433,-2050 414.34,-2036.11 417.02,-2023.84 397,-2012 375.85,-1999.49 366,-2007.89 343.5,-1998"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M581.5,-2076C553.51,-2076 518.08,-2076 486.5,-2076"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.05,-1594C138.49,-1589.88 122.02,-1585.23 106.74,-1580.91"/>
-<polygon fill="#000000" stroke="#000000" points="107.49,-1577.48 96.91,-1578.13 105.58,-1584.22 107.49,-1577.48"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge4" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.18,-2147.58C410.22,-2145.27 374.18,-2145.09 343.5,-2154"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="532.5,-1854 438.5,-1854 438.5,-1830 532.5,-1830 532.5,-1854"/>
-<text text-anchor="middle" x="485.5" y="-1839.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="389.5,-2206 295.5,-2206 295.5,-2182 389.5,-2182 389.5,-2206"/>
+<text text-anchor="middle" x="342.5" y="-2191.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341,-1840C281.51,-1811.48 258.31,-1827.6 197.5,-1802"/>
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge110" class="edge">
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.2,-2166C427.69,-2170.12 411.28,-2174.77 396.06,-2179.09"/>
+<polygon fill="#000000" stroke="#000000" points="394.93,-2175.77 386.26,-2181.87 396.84,-2182.51 394.93,-2175.77"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge40" class="edge">
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge147" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M438.3,-1850.84C409.51,-1854.11 372.47,-1854.12 343,-1840"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341,-1840C317.32,-1828.65 302.97,-1836.85 287,-1816 223.82,-1733.51 295.78,-1678.76 251,-1585 243.81,-1569.94 231.5,-1555.96 220.51,-1545.4"/>
-<polygon fill="#000000" stroke="#000000" points="222.56,-1542.53 212.82,-1538.34 217.82,-1547.69 222.56,-1542.53"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M466.06,-1829.84C448.58,-1818.5 421.43,-1801.37 397,-1788 391.19,-1784.82 384.93,-1781.61 378.8,-1778.59"/>
-<polygon fill="#000000" stroke="#000000" points="379.9,-1775.23 369.37,-1774.02 376.85,-1781.53 379.9,-1775.23"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.28,-2141.95C425.77,-2112.85 321.16,-2039.11 288,-2012 262.74,-1991.35 235.42,-1965.62 217.59,-1948.33"/>
+<polygon fill="#000000" stroke="#000000" points="219.7,-1945.51 210.1,-1941.03 214.81,-1950.52 219.7,-1945.51"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="684.5,-1834 581.5,-1834 581.5,-1810 684.5,-1810 684.5,-1834"/>
-<text text-anchor="middle" x="633" y="-1819.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node6" class="node">
+<title>sourcefile~swiftest.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="810,-1494 744,-1494 744,-1470 810,-1470 810,-1494"/>
+<text text-anchor="middle" x="777" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341,-1802C282.89,-1775.72 256.33,-1826.62 197.5,-1802"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge5" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-2154C310.58,-2162.98 225.26,-2191.14 198,-2174"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2036C459.09,-2039.44 451.05,-2043.78 433,-2062 407.54,-2087.7 424.03,-2110.96 397,-2135 378.15,-2151.77 367.73,-2146.96 343.5,-2154"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341,-1802C317.37,-1792.58 303.51,-1802.36 287,-1783 228.96,-1714.95 290.56,-1665.22 251,-1585 243.62,-1570.03 231.3,-1556.06 220.35,-1545.48"/>
-<polygon fill="#000000" stroke="#000000" points="222.42,-1542.62 212.7,-1538.4 217.67,-1547.76 222.42,-1542.62"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M581.38,-1820.18C504.39,-1817.15 364.49,-1810.57 343,-1802"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.61,-1494.05C765.87,-1567.6 716.26,-1955.74 634,-2036"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-2036C614.69,-2052.89 551.16,-2018.29 514.02,-1995.61"/>
+<polygon fill="#000000" stroke="#000000" points="515.53,-1992.43 505.19,-1990.14 511.84,-1998.38 515.53,-1992.43"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M614.45,-1834.06C589.11,-1851.48 542.08,-1883.8 512.64,-1904.03"/>
-<polygon fill="#000000" stroke="#000000" points="510.37,-1901.35 504.11,-1909.89 514.34,-1907.12 510.37,-1901.35"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M775.84,-1494.08C774.63,-1573.13 764.62,-2024.63 692,-2383 679.88,-2442.8 655.44,-2510.65 642.49,-2544.46"/>
+<polygon fill="#000000" stroke="#000000" points="639.22,-2543.23 638.87,-2553.82 645.74,-2545.75 639.22,-2543.23"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge71" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M581.11,-1829C568.7,-1830.7 555.34,-1832.54 542.7,-1834.28"/>
-<polygon fill="#000000" stroke="#000000" points="542.17,-1830.82 532.74,-1835.64 543.12,-1837.75 542.17,-1830.82"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge30" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.98,-1494.03C767.16,-1534.64 744.56,-1670.44 728,-1783 719.29,-1842.23 727.84,-2002.04 692,-2050 689.68,-2053.1 686.91,-2055.84 683.86,-2058.26"/>
+<polygon fill="#000000" stroke="#000000" points="681.65,-2055.52 675.22,-2063.93 685.5,-2061.37 681.65,-2055.52"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="538,-1579 433,-1579 433,-1555 538,-1555 538,-1579"/>
-<text text-anchor="middle" x="485.5" y="-1564.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-2036C612.59,-2054.94 594.49,-2037.22 574,-2055 546.68,-2078.71 563.46,-2102.3 538,-2128 534.78,-2131.25 531.07,-2134.17 527.15,-2136.77"/>
+<polygon fill="#000000" stroke="#000000" points="525.17,-2133.87 518.33,-2141.96 528.72,-2139.9 525.17,-2133.87"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge113" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2114C461.85,-2123.07 453.64,-2119.99 433,-2133 414.12,-2144.9 415.27,-2155.18 397,-2168 392.18,-2171.38 386.85,-2174.55 381.48,-2177.42"/>
+<polygon fill="#000000" stroke="#000000" points="379.83,-2174.34 372.49,-2181.98 382.99,-2180.58 379.83,-2174.34"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-2036C612.59,-2054.94 598.37,-2043.08 574,-2055 531.87,-2075.61 530.04,-2096.55 486.5,-2114"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge87" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M624.98,-1809.7C601.84,-1769.14 527.74,-1639.27 498.51,-1588.05"/>
-<polygon fill="#000000" stroke="#000000" points="501.44,-1586.13 493.45,-1579.18 495.36,-1589.6 501.44,-1586.13"/>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node8" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-2126 288,-2126 288,-2102 397,-2102 397,-2126"/>
+<text text-anchor="middle" x="342.5" y="-2111.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+</a>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341,-1566C263.76,-1560.45 174.52,-1561.64 116.33,-1563.43"/>
-<polygon fill="#000000" stroke="#000000" points="116.07,-1559.93 106.19,-1563.76 116.3,-1566.93 116.07,-1559.93"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432.69,-1568.24C405.88,-1568.47 372.65,-1568.13 343,-1566"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341,-1566C304.77,-1563.39 265.1,-1551.61 236.68,-1541.5"/>
-<polygon fill="#000000" stroke="#000000" points="237.71,-1538.15 227.11,-1538.01 235.31,-1544.73 237.71,-1538.15"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge117" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2036C437.47,-2042.38 390.86,-2074.55 364.76,-2095.54"/>
+<polygon fill="#000000" stroke="#000000" points="362.52,-2092.85 357.03,-2101.91 366.97,-2098.25 362.52,-2092.85"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="692,-816 574,-816 574,-792 692,-792 692,-816"/>
-<text text-anchor="middle" x="633" y="-801.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node9" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-2030 142,-2030 142,-2006 252,-2006 252,-2030"/>
+<text text-anchor="middle" x="197" y="-2015.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M622.69,-816.28C556.17,-903.97 153.44,-1434.91 69.37,-1545.73"/>
-<polygon fill="#000000" stroke="#000000" points="66.51,-1543.71 63.26,-1553.8 72.09,-1547.94 66.51,-1543.71"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge118" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2036C408.56,-2046.3 320.48,-2037.73 262.25,-2029.24"/>
+<polygon fill="#000000" stroke="#000000" points="262.5,-2025.74 252.09,-2027.72 261.46,-2032.67 262.5,-2025.74"/>
 </g>
-<!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="810,-1431 744,-1431 744,-1407 810,-1407 810,-1431"/>
-<text text-anchor="middle" x="777" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node10" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="680.5,-2374 585.5,-2374 585.5,-2350 680.5,-2350 680.5,-2374"/>
+<text text-anchor="middle" x="633" y="-2359.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-1664C398.28,-1701.99 370.35,-1697.08 287,-1741 244.41,-1763.44 241.91,-1820.59 197.5,-1802"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge119" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M774.7,-1494.19C767.87,-1557.56 734.83,-1855.61 692,-2097 675.89,-2187.82 650.48,-2294.78 639.43,-2340.03"/>
+<polygon fill="#000000" stroke="#000000" points="635.99,-2339.37 637.01,-2349.92 642.79,-2341.04 635.99,-2339.37"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge16" class="edge">
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge157" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-1528C585.18,-1572.61 542.33,-1494.36 486.5,-1527"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M757.53,-1431.28C729.45,-1450.35 674.95,-1488.99 634,-1528"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-1664C437.67,-1684.1 390.44,-1720.91 364.12,-1743.25"/>
-<polygon fill="#000000" stroke="#000000" points="361.63,-1740.78 356.34,-1749.95 366.2,-1746.08 361.63,-1740.78"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-2036C585.72,-2081.16 550.58,-2027.31 486.5,-2036"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-1998C317.64,-1987.51 311.55,-1985.16 288,-1974 268.82,-1964.91 247.57,-1954.31 230.54,-1945.68"/>
+<polygon fill="#000000" stroke="#000000" points="232.05,-1942.53 221.55,-1941.12 228.88,-1948.77 232.05,-1942.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2036C452.34,-2040.36 373.21,-2011.06 343.5,-1998"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-1664C450.81,-1678.46 408.85,-1669.56 379.41,-1659.45"/>
-<polygon fill="#000000" stroke="#000000" points="380.53,-1656.13 369.93,-1656.01 378.14,-1662.71 380.53,-1656.13"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge6" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.23,-2196.94C265.37,-2196.68 226.85,-2192.14 198,-2174"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-1528C520.04,-1634.66 611.54,-1726.97 538,-1863 530.09,-1877.63 517.98,-1891.75 507.49,-1902.5"/>
-<polygon fill="#000000" stroke="#000000" points="504.87,-1900.18 500.23,-1909.7 509.8,-1905.15 504.87,-1900.18"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge158" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.14,-2181.85C314.99,-2170.82 298,-2153.49 288,-2135 257.84,-2079.25 280.32,-2053.71 252,-1997 243.16,-1979.3 229.19,-1961.87 217.67,-1949.09"/>
+<polygon fill="#000000" stroke="#000000" points="219.91,-1946.36 210.54,-1941.41 214.78,-1951.12 219.91,-1946.36"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-1664C445.04,-1680.94 438.49,-1634.11 397,-1623 352.67,-1611.13 301.01,-1606.98 261.37,-1605.75"/>
-<polygon fill="#000000" stroke="#000000" points="261.39,-1602.25 251.3,-1605.49 261.21,-1609.25 261.39,-1602.25"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-1528C567.91,-1589.06 567.5,-1628.31 486.5,-1664"/>
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge7" class="edge">
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-2174C130.41,-2132.76 83.54,-2049.82 64.05,-2010.55"/>
+<polygon fill="#000000" stroke="#000000" points="67.1,-2008.82 59.59,-2001.34 60.8,-2011.87 67.1,-2008.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M315.73,-2126.05C275.87,-2144.51 203.29,-2177.32 198,-2174"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge73" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-1528C586.05,-1571.77 516.86,-1757.1 494.07,-1820.57"/>
-<polygon fill="#000000" stroke="#000000" points="490.78,-1819.4 490.71,-1830 497.37,-1821.75 490.78,-1819.4"/>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge8" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.91,-2006.95C133.46,-2005.23 124.67,-2003.43 116.06,-2001.67"/>
+<polygon fill="#000000" stroke="#000000" points="116.56,-1998.2 106.06,-1999.63 115.16,-2005.06 116.56,-1998.2"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge83" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M771.75,-1431.06C751.83,-1487.61 667.55,-1726.8 641.62,-1800.37"/>
-<polygon fill="#000000" stroke="#000000" points="638.26,-1799.39 638.23,-1809.99 644.86,-1801.72 638.26,-1799.39"/>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge10" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2360C424.1,-2343.3 395.8,-2394.52 343.5,-2360"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.5,-2360C254.36,-2302.49 286.39,-2229.58 198,-2174"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge91" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M632,-1528C619.63,-1539.78 582.01,-1549.69 548.13,-1556.57"/>
-<polygon fill="#000000" stroke="#000000" points="547.36,-1553.16 538.23,-1558.52 548.72,-1560.03 547.36,-1553.16"/>
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge116" class="edge">
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.28,-2367.3C556.32,-2369.14 518.64,-2368.89 486.5,-2360"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-2360C460.16,-2353.27 451.95,-2352.69 433,-2336 393.91,-2301.56 365.77,-2245.96 352.35,-2215.56"/>
+<polygon fill="#000000" stroke="#000000" points="355.52,-2214.09 348.36,-2206.28 349.09,-2216.85 355.52,-2214.09"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge94" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M773.23,-1406.99C755.86,-1331.76 662.01,-925.31 639.06,-825.93"/>
-<polygon fill="#000000" stroke="#000000" points="642.45,-825.04 636.79,-816.09 635.63,-826.62 642.45,-825.04"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M167.26,-1941.14C145.61,-1950.29 115.71,-1962.92 92.07,-1972.91"/>
+<polygon fill="#000000" stroke="#000000" points="90.54,-1969.76 82.69,-1976.88 93.27,-1976.21 90.54,-1969.76"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1019,-2208 869,-2208 869,-2184 1019,-2184 1019,-2208"/>
-<text text-anchor="middle" x="944" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="997,-1914 891,-1914 891,-1890 997,-1890 997,-1914"/>
+<text text-anchor="middle" x="944" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge76" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M879.81,-2183.96C873.55,-2181.51 867.49,-2178.55 862,-2175 811.84,-2142.51 829.79,-2099.82 778,-2070"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M890.84,-1892.85C880.88,-1889.91 870.83,-1886.05 862,-1881 816.17,-1854.79 821.28,-1766.77 778,-1797"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge96" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M871.9,-2183.92C868.21,-2181.43 864.86,-2178.48 862,-2175 818,-2121.41 839.91,-1619.93 826,-1552 817.65,-1511.24 799.31,-1466.15 787.88,-1440.33"/>
-<polygon fill="#000000" stroke="#000000" points="791.03,-1438.8 783.73,-1431.12 784.65,-1441.68 791.03,-1438.8"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M890.91,-1897.42C880.13,-1894.21 869.73,-1889.09 862,-1881 835.39,-1853.13 793.27,-1583.98 781.28,-1504.19"/>
+<polygon fill="#000000" stroke="#000000" points="784.73,-1503.6 779.79,-1494.23 777.81,-1504.64 784.73,-1503.6"/>
 </g>
 <!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node13" class="node">
 <title>sourcefile~symba_step.f90</title>
 <g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="988,-2166 900,-2166 900,-2142 988,-2142 988,-2166"/>
-<text text-anchor="middle" x="944" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="988,-1872 900,-1872 900,-1848 988,-1848 988,-1872"/>
+<text text-anchor="middle" x="944" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge78" class="edge">
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge24" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M899.86,-2146.11C887.29,-2142.95 873.78,-2138.67 862,-2133 819.95,-2112.76 818.44,-2093.28 778,-2070"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M899.6,-1850.54C887.28,-1847.37 873.97,-1843.49 862,-1839 822.92,-1824.35 812.22,-1773.1 778,-1797"/>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge97" class="edge">
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge49" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M899.72,-2152.6C885.62,-2149.87 871.24,-2144.21 862,-2133 820.85,-2083.1 839.11,-1615.34 826,-1552 817.57,-1511.25 799.26,-1466.16 787.85,-1440.34"/>
-<polygon fill="#000000" stroke="#000000" points="791,-1438.81 783.71,-1431.13 784.62,-1441.68 791,-1438.81"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M899.9,-1857.51C886.16,-1854.64 871.95,-1849.18 862,-1839 814.47,-1790.38 787.78,-1574.41 780.24,-1504.16"/>
+<polygon fill="#000000" stroke="#000000" points="783.72,-1503.76 779.19,-1494.18 776.76,-1504.49 783.72,-1503.76"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983,-1494 905,-1494 905,-1470 983,-1470 983,-1494"/>
-<text text-anchor="middle" x="944" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-864 917,-864 917,-840 971,-840 971,-864"/>
+<text text-anchor="middle" x="944" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge85" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.83,-1488.68C890.92,-1491.93 875.35,-1496.57 862,-1503 819.95,-1523.24 824.31,-1560.27 778,-1566"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-1566C698.01,-1575.66 607.29,-1573.89 548.48,-1571.05"/>
-<polygon fill="#000000" stroke="#000000" points="548.41,-1567.54 538.25,-1570.53 548.06,-1574.54 548.41,-1567.54"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge41" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.94,-851.32C898.63,-852.38 875.14,-857.1 862,-873 782.56,-969.12 876.81,-1319.12 826,-1433 820.82,-1444.61 811.62,-1455.05 802.64,-1463.29"/>
+<polygon fill="#000000" stroke="#000000" points="800.22,-1460.76 794.93,-1469.93 804.79,-1466.06 800.22,-1460.76"/>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge98" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.99,-1473.89C891.25,-1470.51 875.74,-1466.15 862,-1461 843.67,-1454.13 824.05,-1444.46 808.39,-1436.13"/>
-<polygon fill="#000000" stroke="#000000" points="809.66,-1432.84 799.2,-1431.16 806.33,-1439 809.66,-1432.84"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge128" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.98,-850.99C899.64,-849.05 877.29,-843.96 862,-831 791.88,-771.56 869.74,-636.25 778,-642"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1000,-1410 888,-1410 888,-1386 1000,-1386 1000,-1410"/>
-<text text-anchor="middle" x="944" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-1830 901,-1830 901,-1806 987,-1806 987,-1830"/>
+<text text-anchor="middle" x="944" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge86" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.29,-1385.93C848.04,-1373.49 779.53,-1355.9 778,-1356"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.74,-1806.27C858.53,-1795.65 797.23,-1783.56 778,-1797"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge99" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M887.6,-1405.05C865.65,-1407.84 840.83,-1411 820.37,-1413.61"/>
-<polygon fill="#000000" stroke="#000000" points="819.88,-1410.14 810.4,-1414.88 820.76,-1417.09 819.88,-1410.14"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.91,-1815.51C886.92,-1812.68 872.31,-1807.24 862,-1797 819.67,-1754.96 790.1,-1568.56 780.97,-1504.06"/>
+<polygon fill="#000000" stroke="#000000" points="784.44,-1503.56 779.6,-1494.14 777.5,-1504.52 784.44,-1503.56"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="980.5,-1872 907.5,-1872 907.5,-1848 980.5,-1848 980.5,-1872"/>
-<text text-anchor="middle" x="944" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="977.5,-822 910.5,-822 910.5,-798 977.5,-798 977.5,-822"/>
+<text text-anchor="middle" x="944" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.26,-1853.88C892.76,-1850.61 876.14,-1845.8 862,-1839 819.95,-1818.76 824.63,-1774.05 778,-1776"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge42" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M910.14,-809.85C893.12,-811.64 873.54,-816.98 862,-831 776.86,-934.49 880.33,-1310.49 826,-1433 820.85,-1444.62 811.65,-1455.07 802.67,-1463.3"/>
+<polygon fill="#000000" stroke="#000000" points="800.25,-1460.77 794.95,-1469.94 804.81,-1466.08 800.25,-1460.77"/>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge100" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.22,-1859.44C891.1,-1857.25 873.22,-1851.77 862,-1839 819.57,-1790.72 841,-1614.5 826,-1552 816.29,-1511.54 798.39,-1466.35 787.41,-1440.43"/>
-<polygon fill="#000000" stroke="#000000" points="790.6,-1438.99 783.44,-1431.19 784.17,-1441.76 790.6,-1438.99"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge129" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M910.43,-807.48C894.51,-804.86 875.85,-799.59 862,-789 802.22,-743.3 853.1,-637.3 778,-642"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="999.5,-906 888.5,-906 888.5,-882 999.5,-882 999.5,-906"/>
-<text text-anchor="middle" x="944" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="995.5,-1788 892.5,-1788 892.5,-1764 995.5,-1764 995.5,-1788"/>
+<text text-anchor="middle" x="944" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M888.3,-886.99C878.78,-883.86 869.54,-879.39 862,-873 791.88,-813.56 848.54,-625.06 778,-684"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge28" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.48,-1770.77C857.38,-1769.74 811.14,-1773.85 778,-1797"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge101" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M888.45,-898.4C878.33,-901.68 868.82,-906.88 862,-915 796.81,-992.7 868.01,-1277.68 826,-1370 820.74,-1381.57 811.52,-1392.01 802.56,-1400.25"/>
-<polygon fill="#000000" stroke="#000000" points="800.14,-1397.72 794.85,-1406.9 804.71,-1403.01 800.14,-1397.72"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge45" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.28,-1771.14C881.18,-1767.97 870.3,-1762.93 862,-1755 789.71,-1685.88 779.19,-1556.21 777.98,-1504.31"/>
+<polygon fill="#000000" stroke="#000000" points="781.48,-1504.15 777.84,-1494.19 774.48,-1504.24 781.48,-1504.15"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-2460 905.5,-2460 905.5,-2436 982.5,-2436 982.5,-2460"/>
-<text text-anchor="middle" x="944" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982,-780 906,-780 906,-756 982,-756 982,-780"/>
+<text text-anchor="middle" x="944" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge70" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.36,-2442.88C891.07,-2439.78 875.09,-2434.84 862,-2427 841.76,-2414.88 844.86,-2402.17 826,-2388 806.93,-2373.67 798.84,-2375.59 778,-2364"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.99,-768.33C890.01,-770.53 872.59,-776.08 862,-789 816.58,-844.43 854.93,-1367.43 826,-1433 820.87,-1444.63 811.67,-1455.08 802.69,-1463.31"/>
+<polygon fill="#000000" stroke="#000000" points="800.27,-1460.78 794.97,-1469.95 804.83,-1466.09 800.27,-1460.78"/>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge102" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.48,-2447.68C889.6,-2445.46 872.4,-2439.89 862,-2427 800.88,-2351.28 844.73,-1647.48 826,-1552 817.99,-1511.17 799.54,-1466.1 787.99,-1440.31"/>
-<polygon fill="#000000" stroke="#000000" points="791.13,-1438.76 783.8,-1431.11 784.76,-1441.66 791.13,-1438.76"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge130" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.88,-763.53C891.34,-760.51 875.05,-755.45 862,-747 811.84,-714.51 837.65,-638.26 778,-642"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="997,-2124 891,-2124 891,-2100 997,-2100 997,-2124"/>
-<text text-anchor="middle" x="944" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="996.5,-738 891.5,-738 891.5,-714 996.5,-714 996.5,-738"/>
+<text text-anchor="middle" x="944" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge79" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M890.81,-2106.13C856.9,-2100.58 812.71,-2089.98 778,-2070"/>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge46" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M891.21,-729.36C880.02,-732.57 869.35,-738 862,-747 813.72,-806.12 856.69,-1363.11 826,-1433 820.89,-1444.64 811.7,-1455.09 802.71,-1463.32"/>
+<polygon fill="#000000" stroke="#000000" points="800.29,-1460.79 794.98,-1469.96 804.85,-1466.1 800.29,-1460.79"/>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge103" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M890.88,-2108.44C879.84,-2105.22 869.32,-2099.84 862,-2091 823.71,-2044.78 838.31,-1610.75 826,-1552 817.47,-1511.28 799.19,-1466.17 787.81,-1440.34"/>
-<polygon fill="#000000" stroke="#000000" points="790.97,-1438.83 783.69,-1431.13 784.58,-1441.69 790.97,-1438.83"/>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge131" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M891.37,-715.84C881.37,-712.98 871.16,-709.41 862,-705 819.95,-684.76 824.58,-639.08 778,-642"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1003,-864 885,-864 885,-840 1003,-840 1003,-864"/>
-<text text-anchor="middle" x="944" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-2754 905.5,-2754 905.5,-2730 982.5,-2730 982.5,-2754"/>
+<text text-anchor="middle" x="944" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.6,-842.93C876.51,-839.99 868.69,-836.12 862,-831 802.22,-785.3 835.75,-635.76 778,-684"/>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge47" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.47,-2741.69C889.58,-2739.48 872.38,-2733.9 862,-2721 829.3,-2680.38 831.12,-1834.9 826,-1783 815.65,-1677.98 792.3,-1553.93 782.48,-1504.22"/>
+<polygon fill="#000000" stroke="#000000" points="785.88,-1503.38 780.5,-1494.26 779.02,-1504.75 785.88,-1503.38"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge104" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.7,-857.67C875.99,-860.97 867.95,-865.86 862,-873 791.11,-958.07 871.53,-1269.06 826,-1370 820.77,-1381.59 811.56,-1392.03 802.6,-1400.27"/>
-<polygon fill="#000000" stroke="#000000" points="800.18,-1397.73 794.89,-1406.91 804.75,-1403.04 800.18,-1397.73"/>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge111" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.47,-2740.38C890.17,-2737.84 873.42,-2732.38 862,-2721 817.41,-2676.56 867.93,-2630.96 826,-2584 794.88,-2549.16 769.56,-2567.33 728,-2546 638.28,-2499.97 626.32,-2470.65 538,-2422 493.06,-2397.24 469.87,-2409.69 433,-2374 385.98,-2328.49 359.83,-2253.09 349.2,-2216"/>
+<polygon fill="#000000" stroke="#000000" points="352.53,-2214.91 346.5,-2206.2 345.78,-2216.77 352.53,-2214.91"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-1830 910,-1830 910,-1806 978,-1806 978,-1830"/>
-<text text-anchor="middle" x="944" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-696 901.5,-696 901.5,-672 986.5,-672 986.5,-696"/>
+<text text-anchor="middle" x="944" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.64,-1809.38C861.91,-1797.07 779.68,-1775.93 778,-1776"/>
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge48" class="edge">
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.33,-685.03C886.7,-687.62 871.54,-693.28 862,-705 810.87,-767.81 858.45,-1358.8 826,-1433 820.91,-1444.65 811.72,-1455.1 802.73,-1463.33"/>
+<polygon fill="#000000" stroke="#000000" points="800.31,-1460.8 795,-1469.96 804.87,-1466.11 800.31,-1460.8"/>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge105" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.79,-1817.65C893.1,-1815.66 873.94,-1810.3 862,-1797 825.24,-1756.05 839.41,-1605.37 826,-1552 815.86,-1511.65 798.11,-1466.42 787.26,-1440.47"/>
-<polygon fill="#000000" stroke="#000000" points="790.47,-1439.06 783.35,-1431.21 784.02,-1441.78 790.47,-1439.06"/>
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge132" class="edge">
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.45,-673.26C853.09,-660.78 779.58,-641.9 778,-642"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~operator_mag.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-1788 901.5,-1788 901.5,-1764 986.5,-1764 986.5,-1788"/>
-<text text-anchor="middle" x="944" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~operator_mag.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/operator_mag.f90.html" xlink:title="operator_mag.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="826,-2660 728,-2660 728,-2636 826,-2636 826,-2660"/>
+<text text-anchor="middle" x="777" y="-2645.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.28,-1775.04C867.9,-1774.5 819.93,-1774.25 778,-1776"/>
-</g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge106" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.25,-1774.16C886.96,-1771.42 872.06,-1765.88 862,-1755 799.79,-1687.73 849.64,-1640.53 826,-1552 815.27,-1511.8 797.7,-1466.53 787.06,-1440.52"/>
-<polygon fill="#000000" stroke="#000000" points="790.28,-1439.14 783.22,-1431.24 783.81,-1441.82 790.28,-1439.14"/>
+<!-- sourcefile~operator_mag.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~operator_mag.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M752.94,-2635.76C745,-2631.48 736.07,-2626.59 728,-2622 705.72,-2609.34 680.81,-2594.46 662.24,-2583.23"/>
+<polygon fill="#000000" stroke="#000000" points="664.03,-2580.23 653.67,-2578.04 660.4,-2586.21 664.03,-2580.23"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="977.5,-822 910.5,-822 910.5,-798 977.5,-798 977.5,-822"/>
-<text text-anchor="middle" x="944" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1015,-2670 873,-2670 873,-2646 1015,-2646 1015,-2670"/>
+<text text-anchor="middle" x="944" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M910.31,-806.4C894.72,-803.51 876.39,-798.32 862,-789 811.84,-756.51 823.86,-645.68 778,-684"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge50" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M872.91,-2646.68C868.81,-2644.03 865.1,-2640.84 862,-2637 832.15,-2600.06 830.75,-1830.25 826,-1783 815.45,-1678 792.21,-1553.94 782.45,-1504.22"/>
+<polygon fill="#000000" stroke="#000000" points="785.86,-1503.39 780.48,-1494.26 778.99,-1504.75 785.86,-1503.39"/>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge107" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M910.18,-809.88C893.17,-811.68 873.59,-817.02 862,-831 785.41,-923.44 875.05,-1260.43 826,-1370 820.81,-1381.6 811.6,-1392.05 802.63,-1400.28"/>
-<polygon fill="#000000" stroke="#000000" points="800.21,-1397.75 794.91,-1406.93 804.78,-1403.05 800.21,-1397.75"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge120" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M875.59,-2645.82C870.71,-2643.39 866.1,-2640.48 862,-2637 831.95,-2611.53 853.22,-2584.48 826,-2556 809.52,-2538.76 798.24,-2544.61 778,-2532"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-780 901.5,-780 901.5,-756 986.5,-756 986.5,-780"/>
-<text text-anchor="middle" x="944" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-654 910,-654 910,-630 978,-630 978,-654"/>
+<text text-anchor="middle" x="944" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.11,-760.43C888.19,-757.23 874.17,-752.86 862,-747 819.95,-726.76 813.81,-654.08 778,-684"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge104" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.66,-641.84C892.71,-643.65 873.35,-649.01 862,-663 808.02,-729.49 860.21,-1354.48 826,-1433 820.92,-1444.65 811.74,-1455.11 802.75,-1463.34"/>
+<polygon fill="#000000" stroke="#000000" points="800.32,-1460.8 795.01,-1469.97 804.88,-1466.12 800.32,-1460.8"/>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge108" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.41,-769.09C886.78,-771.69 871.61,-777.34 862,-789 779.71,-888.81 878.57,-1251.8 826,-1370 820.83,-1381.61 811.63,-1392.06 802.66,-1400.3"/>
-<polygon fill="#000000" stroke="#000000" points="800.24,-1397.76 794.94,-1406.94 804.8,-1403.07 800.24,-1397.76"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge161" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.78,-640.78C876.43,-639.85 823.6,-639.14 778,-642"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983,-2754 905,-2754 905,-2730 983,-2730 983,-2754"/>
-<text text-anchor="middle" x="944" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1026,-612 862,-612 862,-588 1026,-588 1026,-612"/>
+<text text-anchor="middle" x="944" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.83,-2735.32C890.92,-2732.07 875.35,-2727.43 862,-2721 819.95,-2700.76 821.49,-2674.92 778,-2658"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge51" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M871.84,-612.04C868.17,-614.54 864.83,-617.5 862,-621 805.16,-691.18 861.97,-1350.16 826,-1433 820.94,-1444.66 811.75,-1455.11 802.76,-1463.34"/>
+<polygon fill="#000000" stroke="#000000" points="800.34,-1460.81 795.02,-1469.97 804.89,-1466.13 800.34,-1460.81"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge109" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.58,-2741.61C888.93,-2739.32 872.15,-2733.71 862,-2721 821.45,-2670.23 838.18,-1615.82 826,-1552 818.2,-1511.13 799.69,-1466.07 788.07,-1440.29"/>
-<polygon fill="#000000" stroke="#000000" points="791.2,-1438.73 783.84,-1431.1 784.84,-1441.65 791.2,-1438.73"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge133" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.43,-612.08C848.71,-624.42 781.04,-641.81 778,-642"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="992,-1368 896,-1368 896,-1344 992,-1344 992,-1368"/>
-<text text-anchor="middle" x="944" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="995.5,-2796 892.5,-2796 892.5,-2772 995.5,-2772 995.5,-2796"/>
+<text text-anchor="middle" x="944" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge92" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M895.65,-1354.43C862.64,-1353.72 817.6,-1353.52 778,-1356"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.47,-2779.49C881.24,-2776.32 870.24,-2771.2 862,-2763 817.67,-2718.9 869.12,-2672.28 826,-2627 808.62,-2608.75 749.99,-2591.73 702.05,-2580.32"/>
+<polygon fill="#000000" stroke="#000000" points="702.84,-2576.91 692.31,-2578.05 701.25,-2583.73 702.84,-2576.91"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge110" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M895.79,-1366.46C884.57,-1369.43 872.75,-1372.97 862,-1377 843.67,-1383.87 824.05,-1393.54 808.39,-1401.87"/>
-<polygon fill="#000000" stroke="#000000" points="806.33,-1399 799.2,-1406.84 809.66,-1405.16 806.33,-1399"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge52" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.37,-2781.07C880.72,-2777.91 869.55,-2772.4 862,-2763 827.87,-2720.53 831.3,-1837.22 826,-1783 815.74,-1677.97 792.34,-1553.93 782.49,-1504.22"/>
+<polygon fill="#000000" stroke="#000000" points="785.9,-1503.38 780.5,-1494.26 779.03,-1504.75 785.9,-1503.38"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983.5,-2418 904.5,-2418 904.5,-2394 983.5,-2394 983.5,-2418"/>
-<text text-anchor="middle" x="944" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-570 910,-570 910,-546 978,-546 978,-570"/>
+<text text-anchor="middle" x="944" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.24,-2401.85C869.41,-2396.83 817.78,-2386.13 778,-2364"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge53" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.63,-557.82C892.68,-559.62 873.32,-564.99 862,-579 802.31,-652.87 863.74,-1345.85 826,-1433 820.95,-1444.66 811.77,-1455.12 802.78,-1463.35"/>
+<polygon fill="#000000" stroke="#000000" points="800.35,-1460.81 795.03,-1469.98 804.9,-1466.13 800.35,-1460.81"/>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge111" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.24,-2405.49C888.72,-2403.15 872.14,-2397.54 862,-2385 803.74,-2312.97 843.93,-1642.89 826,-1552 817.95,-1511.18 799.52,-1466.11 787.98,-1440.31"/>
-<polygon fill="#000000" stroke="#000000" points="791.12,-1438.76 783.79,-1431.11 784.75,-1441.66 791.12,-1438.76"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge134" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.66,-563.59C894.62,-566.87 876.92,-571.82 862,-579 819.95,-599.24 824.58,-639.08 778,-642"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="980.5,-2712 907.5,-2712 907.5,-2688 980.5,-2688 980.5,-2712"/>
-<text text-anchor="middle" x="944" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="995.5,-1494 892.5,-1494 892.5,-1470 995.5,-1470 995.5,-1494"/>
+<text text-anchor="middle" x="944" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.46,-2693.56C873.51,-2686.81 821.25,-2674.82 778,-2658"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.37,-1470.62C882.19,-1467.85 871.66,-1464.62 862,-1461 822.92,-1446.35 819.66,-1416.39 778,-1419"/>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge113" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.1,-2699.94C890.75,-2697.9 872.71,-2692.39 862,-2679 822.88,-2630.08 837.78,-1613.53 826,-1552 818.18,-1511.13 799.67,-1466.08 788.06,-1440.3"/>
-<polygon fill="#000000" stroke="#000000" points="791.19,-1438.73 783.84,-1431.1 784.83,-1441.65 791.19,-1438.73"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge54" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.15,-1482C869.2,-1482 842.4,-1482 820.54,-1482"/>
+<polygon fill="#000000" stroke="#000000" points="820.24,-1478.5 810.24,-1482 820.24,-1485.5 820.24,-1478.5"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="995.5,-2082 892.5,-2082 892.5,-2058 995.5,-2058 995.5,-2082"/>
-<text text-anchor="middle" x="944" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="979.5,-528 908.5,-528 908.5,-504 979.5,-504 979.5,-528"/>
+<text text-anchor="middle" x="944" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge74" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M895.32,-2082.01C860.49,-2088.06 813.38,-2090.37 778,-2070"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge55" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M908.39,-515.94C891.73,-517.88 873.03,-523.32 862,-537 799.46,-614.56 865.5,-1341.53 826,-1433 820.96,-1444.67 811.78,-1455.13 802.79,-1463.35"/>
+<polygon fill="#000000" stroke="#000000" points="800.36,-1460.82 795.04,-1469.98 804.91,-1466.14 800.36,-1460.82"/>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge112" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.18,-2066.77C880.68,-2063.6 869.63,-2058.15 862,-2049 826.56,-2006.47 837.51,-1606.16 826,-1552 817.35,-1511.3 799.11,-1466.19 787.78,-1440.35"/>
-<polygon fill="#000000" stroke="#000000" points="790.93,-1438.84 783.66,-1431.14 784.54,-1441.7 790.93,-1438.84"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge135" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M908.31,-519.98C893.17,-522.94 875.78,-528.07 862,-537 811.84,-569.49 837.65,-638.26 778,-642"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="991,-2040 897,-2040 897,-2016 991,-2016 991,-2040"/>
-<text text-anchor="middle" x="944" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983,-1452 905,-1452 905,-1428 983,-1428 983,-1452"/>
+<text text-anchor="middle" x="944" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge75" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.84,-2039.95C848.26,-2052.5 778.67,-2070.38 778,-2070"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.79,-1430.99C871.43,-1424.12 821.66,-1416.27 778,-1419"/>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge114" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.86,-2025.89C883.75,-2022.95 870.68,-2017.35 862,-2007 796.81,-1929.3 847.41,-1651.14 826,-1552 817.22,-1511.33 799.02,-1466.21 787.73,-1440.36"/>
-<polygon fill="#000000" stroke="#000000" points="790.89,-1438.86 783.63,-1431.14 784.5,-1441.7 790.89,-1438.86"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge57" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.73,-1449.74C879.43,-1456.18 846.26,-1464.63 820.2,-1471.26"/>
+<polygon fill="#000000" stroke="#000000" points="819.06,-1467.94 810.23,-1473.8 820.78,-1474.72 819.06,-1467.94"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="985,-1998 903,-1998 903,-1974 985,-1974 985,-1998"/>
-<text text-anchor="middle" x="944" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971.5,-486 916.5,-486 916.5,-462 971.5,-462 971.5,-486"/>
+<text text-anchor="middle" x="944" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge77" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.77,-1993.17C889.4,-1996.39 874.7,-2000.89 862,-2007 819.95,-2027.24 818.44,-2093.28 778,-2070"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge56" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.42,-473.25C898.11,-474.29 874.84,-479.04 862,-495 796.6,-576.25 867.26,-1337.21 826,-1433 820.97,-1444.67 811.79,-1455.13 802.8,-1463.36"/>
+<polygon fill="#000000" stroke="#000000" points="800.37,-1460.82 795.05,-1469.99 804.92,-1466.14 800.37,-1460.82"/>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge115" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.82,-1985C887.84,-1982.48 872.04,-1976.87 862,-1965 802.51,-1894.66 845.8,-1641.97 826,-1552 817.06,-1511.36 798.91,-1466.23 787.67,-1440.37"/>
-<polygon fill="#000000" stroke="#000000" points="790.84,-1438.88 783.6,-1431.15 784.44,-1441.71 790.84,-1438.88"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge136" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.26,-475.66C899.25,-477.9 877.58,-483.09 862,-495 802.22,-540.7 853.1,-637.3 778,-642"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-2376 910,-2376 910,-2352 978,-2352 978,-2376"/>
-<text text-anchor="middle" x="944" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1000,-1410 888,-1410 888,-1386 1000,-1386 1000,-1410"/>
+<text text-anchor="middle" x="944" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.97,-2372.92C874.88,-2380.45 818.93,-2386.77 778,-2364"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge11" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M887.79,-1406.82C855.82,-1411.48 814.75,-1416.7 778,-1419"/>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge116" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.65,-2364.17C892.7,-2362.36 873.35,-2356.99 862,-2343 806.59,-2274.66 843.13,-1638.3 826,-1552 817.9,-1511.19 799.48,-1466.11 787.96,-1440.31"/>
-<polygon fill="#000000" stroke="#000000" points="791.1,-1438.77 783.78,-1431.11 784.73,-1441.66 791.1,-1438.77"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge58" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M887.93,-1409.17C879.05,-1411.85 870.12,-1415.09 862,-1419 838.22,-1430.44 814.47,-1449.09 798.33,-1463.14"/>
+<polygon fill="#000000" stroke="#000000" points="795.76,-1460.74 790.62,-1470 800.41,-1465.96 795.76,-1460.74"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="981.5,-738 906.5,-738 906.5,-714 981.5,-714 981.5,-738"/>
-<text text-anchor="middle" x="944" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="974,-444 914,-444 914,-420 974,-420 974,-444"/>
+<text text-anchor="middle" x="944" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M906.15,-716.43C857.71,-703.87 778.63,-683.47 778,-684"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge59" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.65,-431.42C895.82,-432.78 874.19,-437.83 862,-453 793.75,-537.94 869.02,-1332.89 826,-1433 820.98,-1444.68 811.8,-1455.14 802.81,-1463.36"/>
+<polygon fill="#000000" stroke="#000000" points="800.38,-1460.83 795.06,-1469.99 804.93,-1466.15 800.38,-1460.83"/>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge118" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M906.42,-726.29C890.33,-728.44 872.69,-733.98 862,-747 818,-800.59 854.05,-1306.59 826,-1370 820.86,-1381.62 811.66,-1392.07 802.68,-1400.31"/>
-<polygon fill="#000000" stroke="#000000" points="800.26,-1397.77 794.96,-1406.94 804.82,-1403.08 800.26,-1397.77"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge138" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.92,-433.38C897.07,-435.56 876.41,-440.79 862,-453 791.88,-512.44 869.74,-636.25 778,-642"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-1746 905.5,-1746 905.5,-1722 982.5,-1722 982.5,-1746"/>
-<text text-anchor="middle" x="944" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-402 905.5,-402 905.5,-378 982.5,-378 982.5,-402"/>
+<text text-anchor="middle" x="944" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.28,-1743.81C857.58,-1756.18 781.24,-1775.86 778,-1776"/>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge60" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.45,-390.29C889.56,-392.51 872.36,-398.08 862,-411 790.89,-499.63 870.79,-1328.57 826,-1433 820.99,-1444.68 811.81,-1455.14 802.82,-1463.36"/>
+<polygon fill="#000000" stroke="#000000" points="800.39,-1460.83 795.06,-1469.99 804.94,-1466.15 800.39,-1460.83"/>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge117" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.27,-1732.58C889.93,-1730.08 873.21,-1724.59 862,-1713 811.03,-1660.29 846.49,-1622.4 826,-1552 814.37,-1512.05 797.1,-1466.7 786.76,-1440.61"/>
-<polygon fill="#000000" stroke="#000000" points="789.99,-1439.28 783.03,-1431.3 783.49,-1441.88 789.99,-1439.28"/>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge139" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.14,-392.28C890.14,-394.96 873.72,-400.35 862,-411 781.17,-484.49 887.03,-635.17 778,-642"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-696 905.5,-696 905.5,-672 982.5,-672 982.5,-696"/>
-<text text-anchor="middle" x="944" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-2418 910,-2418 910,-2394 978,-2394 978,-2418"/>
+<text text-anchor="middle" x="944" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907,-671.97C870.23,-662.15 813.61,-654.25 778,-684"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge61" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.73,-2406.1C892.81,-2404.27 873.44,-2398.91 862,-2385 819.43,-2333.25 833.29,-1849.61 826,-1783 814.53,-1678.1 791.8,-1553.98 782.32,-1504.24"/>
+<polygon fill="#000000" stroke="#000000" points="785.73,-1503.43 780.4,-1494.27 778.85,-1504.75 785.73,-1503.43"/>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge119" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.14,-684.44C889.39,-686.71 872.39,-692.29 862,-705 815.15,-762.28 855.81,-1302.27 826,-1370 820.88,-1381.63 811.69,-1392.08 802.7,-1400.32"/>
-<polygon fill="#000000" stroke="#000000" points="800.28,-1397.78 794.97,-1406.95 804.84,-1403.09 800.28,-1397.78"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge109" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.66,-2400.41C894.62,-2397.13 876.92,-2392.18 862,-2385 819.95,-2364.76 824.56,-2325.22 778,-2322"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="984,-2670 904,-2670 904,-2646 984,-2646 984,-2670"/>
-<text text-anchor="middle" x="944" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="999.5,-360 888.5,-360 888.5,-336 999.5,-336 999.5,-360"/>
+<text text-anchor="middle" x="944" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M903.86,-2665.77C869.47,-2670.81 818.71,-2673.84 778,-2658"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge62" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M888.17,-352.16C878.07,-355.46 868.63,-360.72 862,-369 788.04,-461.31 872.55,-1324.25 826,-1433 821,-1444.68 811.82,-1455.14 802.82,-1463.37"/>
+<polygon fill="#000000" stroke="#000000" points="800.4,-1460.84 795.07,-1469.99 804.95,-1466.16 800.4,-1460.84"/>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge120" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M903.76,-2657.47C888.35,-2655.11 871.99,-2649.47 862,-2637 824.31,-2589.92 837.38,-1611.23 826,-1552 818.15,-1511.14 799.65,-1466.08 788.05,-1440.3"/>
-<polygon fill="#000000" stroke="#000000" points="791.18,-1438.73 783.83,-1431.1 784.82,-1441.65 791.18,-1438.73"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge140" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M888.5,-354.02C878.74,-357.22 869.35,-361.97 862,-369 770.25,-456.73 904.7,-634.07 778,-642"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="976,-654 912,-654 912,-630 976,-630 976,-654"/>
-<text text-anchor="middle" x="944" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-2166 905.5,-2166 905.5,-2142 982.5,-2142 982.5,-2166"/>
+<text text-anchor="middle" x="944" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.65,-646.68C869.67,-653.49 798.13,-667.18 778,-684"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.49,-2151.38C871.94,-2149.67 821.5,-2148.61 778,-2154"/>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge121" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.72,-641.65C894.32,-643.26 873.84,-648.48 862,-663 812.3,-723.96 857.57,-1297.96 826,-1370 820.9,-1381.64 811.71,-1392.09 802.72,-1400.32"/>
-<polygon fill="#000000" stroke="#000000" points="800.3,-1397.79 794.99,-1406.96 804.86,-1403.1 800.3,-1397.79"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge63" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.43,-2153.32C889.73,-2151 872.7,-2145.45 862,-2133 811.05,-2073.7 836.16,-1860.53 826,-1783 812.26,-1678.12 790.71,-1553.52 781.93,-1503.93"/>
+<polygon fill="#000000" stroke="#000000" points="785.36,-1503.24 780.16,-1494.01 778.47,-1504.47 785.36,-1503.24"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1026,-612 862,-612 862,-588 1026,-588 1026,-612"/>
-<text text-anchor="middle" x="944" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-318 917,-318 917,-294 971,-294 971,-318"/>
+<text text-anchor="middle" x="944" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M880.35,-612.07C873.92,-614.52 867.67,-617.46 862,-621 841.14,-634.02 845.76,-648.37 826,-663 807.29,-676.86 795.87,-669.07 778,-684"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge65" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.79,-305.2C898.4,-306.19 874.89,-310.89 862,-327 785.18,-423 874.31,-1319.94 826,-1433 821.01,-1444.69 811.83,-1455.15 802.83,-1463.37"/>
+<polygon fill="#000000" stroke="#000000" points="800.41,-1460.84 795.08,-1470 804.95,-1466.16 800.41,-1460.84"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge122" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M871.86,-612.05C868.18,-614.55 864.84,-617.51 862,-621 809.44,-685.65 859.33,-1293.64 826,-1370 820.92,-1381.65 811.73,-1392.1 802.74,-1400.33"/>
-<polygon fill="#000000" stroke="#000000" points="800.32,-1397.8 795,-1406.97 804.87,-1403.11 800.32,-1397.8"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge141" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.69,-306.23C898.98,-307.8 876.33,-312.77 862,-327 759.19,-429.1 922.61,-632.94 778,-642"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-570 917,-570 917,-546 971,-546 971,-570"/>
-<text text-anchor="middle" x="944" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="976,-276 912,-276 912,-252 976,-252 976,-276"/>
+<text text-anchor="middle" x="944" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.93,-558.94C899.56,-560.85 877.21,-565.94 862,-579 831.19,-605.47 854.61,-634.17 826,-663 809.6,-679.53 795.87,-669.07 778,-684"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.61,-263.57C894.18,-265.14 873.7,-270.36 862,-285 782.33,-384.69 876.07,-1315.62 826,-1433 821.01,-1444.69 811.84,-1455.15 802.84,-1463.37"/>
+<polygon fill="#000000" stroke="#000000" points="800.41,-1460.84 795.08,-1470 804.96,-1466.17 800.41,-1460.84"/>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge123" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.85,-557.25C898.49,-558.27 874.99,-562.98 862,-579 806.59,-647.34 861.09,-1289.32 826,-1370 820.93,-1381.66 811.74,-1392.11 802.76,-1400.34"/>
-<polygon fill="#000000" stroke="#000000" points="800.33,-1397.81 795.02,-1406.97 804.89,-1403.12 800.33,-1397.81"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge142" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.85,-264.57C894.93,-266.54 874.9,-271.81 862,-285 748.05,-401.55 940.68,-631.81 778,-642"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-2334 905.5,-2334 905.5,-2310 982.5,-2310 982.5,-2334"/>
-<text text-anchor="middle" x="944" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="980.5,-2628 907.5,-2628 907.5,-2604 980.5,-2604 980.5,-2628"/>
+<text text-anchor="middle" x="944" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge69" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.35,-2331.75C856.87,-2344.28 778.71,-2364.4 778,-2364"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge67" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.17,-2615.89C890.84,-2613.82 872.79,-2608.32 862,-2595 805.16,-2524.82 835.13,-1872.85 826,-1783 815.34,-1678.01 792.16,-1553.94 782.44,-1504.23"/>
+<polygon fill="#000000" stroke="#000000" points="785.84,-1503.4 780.47,-1494.26 778.97,-1504.75 785.84,-1503.4"/>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge124" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.11,-2321.59C889.35,-2319.32 872.36,-2313.74 862,-2301 809.44,-2236.35 842.32,-1633.7 826,-1552 817.85,-1511.2 799.45,-1466.12 787.95,-1440.32"/>
-<polygon fill="#000000" stroke="#000000" points="791.09,-1438.77 783.77,-1431.12 784.71,-1441.67 791.09,-1438.77"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge122" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.39,-2611.31C892.59,-2608.24 875.71,-2603.21 862,-2595 841.76,-2582.88 844.86,-2570.17 826,-2556 806.93,-2541.67 798.24,-2544.61 778,-2532"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-528 901,-528 901,-504 987,-504 987,-528"/>
-<text text-anchor="middle" x="944" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982,-1746 906,-1746 906,-1722 982,-1722 982,-1746"/>
+<text text-anchor="middle" x="944" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.59,-518.67C886.74,-521.54 872.29,-526.96 862,-537 820.31,-577.67 864.33,-619.15 826,-663 810.67,-680.53 795.87,-669.07 778,-684"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.8,-1741.91C891.86,-1745.32 876.01,-1749.75 862,-1755 822.92,-1769.65 812.22,-1773.1 778,-1797"/>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge125" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.87,-517.07C886.36,-519.69 871.41,-525.37 862,-537 803.74,-609.03 862.85,-1285 826,-1370 820.94,-1381.66 811.76,-1392.12 802.77,-1400.34"/>
-<polygon fill="#000000" stroke="#000000" points="800.34,-1397.81 795.03,-1406.98 804.9,-1403.13 800.34,-1397.81"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.96,-1731.86C890.74,-1729.24 873.93,-1723.85 862,-1713 799.87,-1656.51 783.62,-1550.38 779.43,-1504.3"/>
+<polygon fill="#000000" stroke="#000000" points="782.91,-1503.88 778.62,-1494.19 775.93,-1504.43 782.91,-1503.88"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-486 910,-486 910,-462 978,-462 978,-486"/>
-<text text-anchor="middle" x="944" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_append.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-234 901,-234 901,-210 987,-210 987,-234"/>
+<text text-anchor="middle" x="944" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.73,-474.72C893.23,-476.83 874.26,-482.2 862,-495 809.17,-550.13 874.3,-603.85 826,-663 811.27,-681.04 795.87,-669.07 778,-684"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge69" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.79,-223.01C886.27,-225.62 871.34,-231.31 862,-243 779.47,-346.38 877.84,-1311.3 826,-1433 821.09,-1444.52 812.11,-1454.85 803.24,-1463.02"/>
+<polygon fill="#000000" stroke="#000000" points="800.87,-1460.44 795.57,-1469.62 805.43,-1465.75 800.87,-1460.44"/>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge126" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.63,-473.81C892.67,-475.62 873.31,-480.98 862,-495 800.88,-570.72 864.62,-1280.69 826,-1370 820.96,-1381.67 811.77,-1392.12 802.78,-1400.35"/>
-<polygon fill="#000000" stroke="#000000" points="800.36,-1397.82 795.04,-1406.98 804.91,-1403.14 800.36,-1397.82"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge143" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.6,-224.19C886.59,-226.99 872.03,-232.49 862,-243 736.85,-374.07 958.87,-630.67 778,-642"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="974,-444 914,-444 914,-420 974,-420 974,-444"/>
-<text text-anchor="middle" x="944" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983.5,-192 904.5,-192 904.5,-168 983.5,-168 983.5,-192"/>
+<text text-anchor="middle" x="944" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.93,-432.03C896.43,-433.66 875.08,-438.78 862,-453 797.91,-522.71 884.36,-588.43 826,-663 811.65,-681.34 795.87,-669.07 778,-684"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge70" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.16,-180.45C888.62,-182.77 872.05,-188.39 862,-201 776.62,-308.07 879.6,-1306.98 826,-1433 821.1,-1444.53 812.12,-1454.85 803.24,-1463.02"/>
+<polygon fill="#000000" stroke="#000000" points="800.87,-1460.44 795.57,-1469.62 805.44,-1465.75 800.87,-1460.44"/>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge127" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.67,-431.43C895.83,-432.8 874.21,-437.84 862,-453 798.03,-532.4 866.38,-1276.37 826,-1370 820.97,-1381.67 811.79,-1392.13 802.79,-1400.35"/>
-<polygon fill="#000000" stroke="#000000" points="800.37,-1397.82 795.05,-1406.98 804.92,-1403.14 800.37,-1397.82"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge144" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.26,-181.39C889.12,-183.92 872.82,-189.44 862,-201 725.61,-346.63 977.13,-629.53 778,-642"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="996.5,-402 891.5,-402 891.5,-378 996.5,-378 996.5,-402"/>
-<text text-anchor="middle" x="944" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983,-2586 905,-2586 905,-2562 983,-2562 983,-2586"/>
+<text text-anchor="middle" x="944" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M891.35,-393.96C880.29,-397.17 869.65,-402.44 862,-411 786.59,-495.34 894.48,-572.94 826,-663 811.91,-681.54 795.87,-669.07 778,-684"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge71" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.68,-2573.53C889.04,-2571.23 872.26,-2565.63 862,-2553 808.02,-2486.51 834.76,-1868.2 826,-1783 815.21,-1678.03 792.1,-1553.95 782.42,-1504.23"/>
+<polygon fill="#000000" stroke="#000000" points="785.82,-1503.4 780.46,-1494.26 778.95,-1504.75 785.82,-1503.4"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge128" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M891.11,-393.29C879.93,-396.5 869.28,-401.94 862,-411 795.17,-494.09 868.14,-1272.05 826,-1370 820.98,-1381.68 811.8,-1392.13 802.8,-1400.36"/>
-<polygon fill="#000000" stroke="#000000" points="800.38,-1397.83 795.05,-1406.99 804.93,-1403.15 800.38,-1397.83"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge125" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.72,-2570.9C869.51,-2566.58 817.01,-2556.31 778,-2532"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="972.5,-360 915.5,-360 915.5,-336 972.5,-336 972.5,-360"/>
-<text text-anchor="middle" x="944" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-150 917,-150 917,-126 971,-126 971,-150"/>
+<text text-anchor="middle" x="944" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M915.27,-347.69C897.39,-349.07 875.12,-354.03 862,-369 775.25,-468.01 904.63,-557.42 826,-663 812.09,-681.68 795.87,-669.07 778,-684"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge72" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.76,-137.19C898.37,-138.17 874.85,-142.87 862,-159 817.88,-214.38 853.68,-1367.83 826,-1433 821.1,-1444.53 812.13,-1454.86 803.25,-1463.02"/>
+<polygon fill="#000000" stroke="#000000" points="800.88,-1460.45 795.58,-1469.62 805.44,-1465.75 800.88,-1460.45"/>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge129" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M915.24,-347.31C897.11,-348.49 874.55,-353.37 862,-369 792.32,-455.78 869.91,-1267.73 826,-1370 820.99,-1381.68 811.81,-1392.14 802.81,-1400.36"/>
-<polygon fill="#000000" stroke="#000000" points="800.39,-1397.83 795.06,-1406.99 804.94,-1403.15 800.39,-1397.83"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge145" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.67,-137.82C898.72,-139.17 875.78,-144.04 862,-159 788.17,-239.11 886.73,-635.19 778,-642"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-318 910,-318 910,-294 978,-294 978,-318"/>
-<text text-anchor="middle" x="944" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-108 917,-108 917,-84 971,-84 971,-108"/>
+<text text-anchor="middle" x="944" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.99,-306.11C893.14,-308.01 873.77,-313.36 862,-327 763.88,-440.71 914.79,-541.87 826,-663 812.23,-681.78 795.87,-669.07 778,-684"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge73" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.76,-95.18C898.36,-96.16 874.85,-100.86 862,-117 816.45,-174.23 854.56,-1365.67 826,-1433 821.11,-1444.53 812.13,-1454.86 803.25,-1463.03"/>
+<polygon fill="#000000" stroke="#000000" points="800.88,-1460.45 795.58,-1469.62 805.45,-1465.76 800.88,-1460.45"/>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge131" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M910,-305.74C892.94,-307.49 873.36,-312.83 862,-327 789.46,-417.47 871.67,-1263.41 826,-1370 820.99,-1381.68 811.82,-1392.14 802.82,-1400.37"/>
-<polygon fill="#000000" stroke="#000000" points="800.4,-1397.84 795.07,-1406.99 804.94,-1403.16 800.4,-1397.84"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge146" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.99,-95.73C898.95,-97.01 875.78,-101.84 862,-117 782.52,-204.42 895.92,-634.61 778,-642"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-1704 905.5,-1704 905.5,-1680 982.5,-1680 982.5,-1704"/>
-<text text-anchor="middle" x="944" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="984,-2544 904,-2544 904,-2520 984,-2520 984,-2544"/>
+<text text-anchor="middle" x="944" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.23,-1698.58C891.23,-1701.84 875.48,-1706.51 862,-1713 819.95,-1733.24 824.63,-1774.05 778,-1776"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge74" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M903.86,-2531.39C888.46,-2529.01 872.09,-2523.39 862,-2511 810.87,-2448.19 834.39,-1863.55 826,-1783 815.07,-1678.04 792.04,-1553.96 782.4,-1504.23"/>
+<polygon fill="#000000" stroke="#000000" points="785.8,-1503.41 780.45,-1494.27 778.93,-1504.75 785.8,-1503.41"/>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge130" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.26,-1690.1C890.1,-1687.51 873.52,-1682.07 862,-1671 822.15,-1632.72 843.38,-1604.45 826,-1552 812.9,-1512.47 796.09,-1466.93 786.23,-1440.7"/>
-<polygon fill="#000000" stroke="#000000" points="789.39,-1439.15 782.58,-1431.03 782.84,-1441.62 789.39,-1439.15"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge126" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M903.81,-2542.96C868.22,-2550.53 815.68,-2555.48 778,-2532"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-1956 901,-1956 901,-1932 987,-1932 987,-1956"/>
-<text text-anchor="middle" x="944" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-2124 910,-2124 910,-2100 978,-2100 978,-2124"/>
+<text text-anchor="middle" x="944" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge80" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.93,-1949.57C887.72,-1952.67 873.58,-1957.5 862,-1965 811.84,-1997.49 829.79,-2099.82 778,-2070"/>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.67,-2120.6C862.43,-2132.76 781.32,-2153.59 778,-2154"/>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge132" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.78,-1942.58C886.44,-1939.89 871.62,-1934.27 862,-1923 808.2,-1860.02 844.2,-1632.81 826,-1552 816.86,-1511.41 798.78,-1466.26 787.61,-1440.39"/>
-<polygon fill="#000000" stroke="#000000" points="790.78,-1438.91 783.56,-1431.16 784.37,-1441.72 790.78,-1438.91"/>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge75" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.63,-2111.79C892.9,-2109.85 873.74,-2104.47 862,-2091 816.73,-2039.04 835.43,-1851.26 826,-1783 811.53,-1678.22 790.39,-1553.56 781.82,-1503.95"/>
+<polygon fill="#000000" stroke="#000000" points="785.26,-1503.27 780.1,-1494.02 778.36,-1504.47 785.26,-1503.27"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-2628 901,-2628 901,-2604 987,-2604 987,-2628"/>
-<text text-anchor="middle" x="944" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="985,-1704 903,-1704 903,-1680 985,-1680 985,-1704"/>
+<text text-anchor="middle" x="944" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.75,-2626.91C852.11,-2639.45 778.74,-2658.29 778,-2658"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.65,-1698.05C889.12,-1701.2 874.36,-1705.93 862,-1713 816.17,-1739.21 821.28,-1766.77 778,-1797"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge133" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.82,-2614.97C886.3,-2612.35 871.36,-2606.67 862,-2595 825.73,-2549.76 836.97,-1608.93 826,-1552 818.12,-1511.14 799.64,-1466.08 788.04,-1440.3"/>
-<polygon fill="#000000" stroke="#000000" points="791.17,-1438.74 783.83,-1431.1 784.81,-1441.65 791.17,-1438.74"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge76" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.6,-1688.75C888.46,-1685.86 873.3,-1680.58 862,-1671 809.92,-1626.86 788.87,-1544.04 781.48,-1504.33"/>
+<polygon fill="#000000" stroke="#000000" points="784.9,-1503.6 779.74,-1494.35 778.01,-1504.8 784.9,-1503.6"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="980,-276 908,-276 908,-252 980,-252 980,-276"/>
-<text text-anchor="middle" x="944" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="993,-1578 895,-1578 895,-1554 993,-1554 993,-1578"/>
+<text text-anchor="middle" x="944" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.87,-264.3C891.51,-266.38 873.22,-271.85 862,-285 807.25,-349.21 875.48,-594.65 826,-663 812.34,-681.86 795.87,-669.07 778,-684"/>
-</g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge134" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.93,-263.96C891.37,-265.93 872.9,-271.39 862,-285 786.61,-379.16 873.43,-1259.09 826,-1370 821,-1381.69 811.83,-1392.15 802.83,-1400.37"/>
-<polygon fill="#000000" stroke="#000000" points="800.4,-1397.84 795.07,-1407 804.95,-1403.16 800.4,-1397.84"/>
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge77" class="edge">
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M894.79,-1556.79C883.72,-1553.78 872.21,-1549.91 862,-1545 838.22,-1533.56 814.47,-1514.91 798.33,-1500.86"/>
+<polygon fill="#000000" stroke="#000000" points="800.41,-1498.04 790.62,-1494 795.76,-1503.26 800.41,-1498.04"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986,-1326 902,-1326 902,-1302 986,-1302 986,-1326"/>
-<text text-anchor="middle" x="944" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983.5,-2376 904.5,-2376 904.5,-2352 983.5,-2352 983.5,-2376"/>
+<text text-anchor="middle" x="944" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge84" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.97,-1324.64C854.14,-1337.02 781.16,-1355.8 778,-1356"/>
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge78" class="edge">
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.37,-2363.38C888.87,-2361.03 872.27,-2355.43 862,-2343 822.28,-2294.94 832.92,-1844.97 826,-1783 814.29,-1678.12 791.7,-1553.99 782.28,-1504.24"/>
+<polygon fill="#000000" stroke="#000000" points="785.69,-1503.44 780.38,-1494.27 778.82,-1504.75 785.69,-1503.44"/>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge135" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.82,-1320.24C888.52,-1323.39 874.11,-1328.08 862,-1335 858.1,-1337.23 820.63,-1375.3 797.07,-1399.41"/>
-<polygon fill="#000000" stroke="#000000" points="794.45,-1397.09 789.97,-1406.69 799.46,-1401.98 794.45,-1397.09"/>
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge112" class="edge">
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.46,-2354.01C856.71,-2341.66 781.22,-2322.22 778,-2322"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971.5,-234 916.5,-234 916.5,-210 971.5,-210 971.5,-234"/>
-<text text-anchor="middle" x="944" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1006,-1368 882,-1368 882,-1344 1006,-1344 1006,-1368"/>
+<text text-anchor="middle" x="944" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.26,-221.46C898.12,-222.64 875.12,-227.46 862,-243 801.56,-314.57 880.58,-586.87 826,-663 812.43,-681.93 795.87,-669.07 778,-684"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M889.78,-1368.09C880.42,-1370.7 870.84,-1373.69 862,-1377 822.92,-1391.65 819.66,-1416.39 778,-1419"/>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge136" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.39,-221.22C898.07,-222.26 874.79,-227 862,-243 783.76,-340.85 875.19,-1254.78 826,-1370 821.01,-1381.69 811.84,-1392.15 802.84,-1400.37"/>
-<polygon fill="#000000" stroke="#000000" points="800.41,-1397.84 795.08,-1407 804.96,-1403.16 800.41,-1397.84"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge79" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M881.91,-1366.47C874.83,-1369.21 868,-1372.66 862,-1377 838.03,-1394.35 844.45,-1409.87 826,-1433 817.73,-1443.37 807.57,-1453.99 798.73,-1462.68"/>
+<polygon fill="#000000" stroke="#000000" points="796.15,-1460.31 791.38,-1469.77 801.01,-1465.35 796.15,-1460.31"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="979.5,-192 908.5,-192 908.5,-168 979.5,-168 979.5,-192"/>
-<text text-anchor="middle" x="944" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-2502 910,-2502 910,-2478 978,-2478 978,-2502"/>
+<text text-anchor="middle" x="944" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M908.19,-180.17C891.69,-182.19 873.2,-187.64 862,-201 795.86,-279.93 885.67,-579.07 826,-663 812.51,-681.98 795.87,-669.07 778,-684"/>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge80" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.69,-2490.14C892.75,-2488.32 873.39,-2482.95 862,-2469 813.72,-2409.88 834.02,-1858.9 826,-1783 814.91,-1678.06 791.97,-1553.96 782.37,-1504.23"/>
+<polygon fill="#000000" stroke="#000000" points="785.78,-1503.41 780.43,-1494.27 778.91,-1504.75 785.78,-1503.41"/>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge137" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M908.33,-179.9C891.67,-181.82 872.97,-187.27 862,-201 780.9,-302.54 876.96,-1250.46 826,-1370 821.09,-1381.52 812.11,-1391.85 803.23,-1400.02"/>
-<polygon fill="#000000" stroke="#000000" points="800.86,-1397.44 795.57,-1406.61 805.43,-1402.75 800.86,-1397.44"/>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge123" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.79,-2498.61C861.81,-2511.03 778.71,-2532.44 778,-2532"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-150 917,-150 917,-126 971,-126 971,-150"/>
-<text text-anchor="middle" x="944" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-2292 905.5,-2292 905.5,-2268 982.5,-2268 982.5,-2292"/>
+<text text-anchor="middle" x="944" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.97,-137.35C898.68,-138.42 875.2,-143.15 862,-159 790.16,-245.3 890.77,-571.28 826,-663 812.57,-682.02 795.87,-669.07 778,-684"/>
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge81" class="edge">
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.27,-2279.45C889.54,-2277.16 872.53,-2271.59 862,-2259 827.98,-2218.31 832.18,-1835.68 826,-1783 813.7,-1678.19 791.44,-1554.02 782.2,-1504.25"/>
+<polygon fill="#000000" stroke="#000000" points="785.61,-1503.47 780.33,-1494.28 778.73,-1504.75 785.61,-1503.47"/>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge138" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.77,-137.19C898.38,-138.18 874.87,-142.87 862,-159 778.05,-264.23 878.72,-1246.14 826,-1370 821.09,-1381.53 812.12,-1391.85 803.24,-1400.02"/>
-<polygon fill="#000000" stroke="#000000" points="800.87,-1397.44 795.57,-1406.62 805.44,-1402.75 800.87,-1397.44"/>
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge114" class="edge">
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.21,-2289.77C857,-2302.22 779.62,-2322.11 778,-2322"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983.5,-1662 904.5,-1662 904.5,-1638 983.5,-1638 983.5,-1662"/>
-<text text-anchor="middle" x="944" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-66 910,-66 910,-42 978,-42 978,-66"/>
+<text text-anchor="middle" x="944" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-1776C640.88,-1781.64 481.95,-1772.45 399.33,-1766.48"/>
-<polygon fill="#000000" stroke="#000000" points="399.38,-1762.98 389.15,-1765.73 398.87,-1769.96 399.38,-1762.98"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.29,-1653.55C889.85,-1656.44 874.06,-1661.66 862,-1671 835.9,-1691.23 847.04,-1710.55 826,-1736 808.3,-1757.4 805.72,-1774.26 778,-1776"/>
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge82" class="edge">
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.96,-53.7C892.88,-55.45 873.3,-60.79 862,-75 815.03,-134.07 855.45,-1363.51 826,-1433 821.11,-1444.53 812.14,-1454.86 803.26,-1463.03"/>
+<polygon fill="#000000" stroke="#000000" points="800.89,-1460.45 795.59,-1469.62 805.45,-1465.76 800.89,-1460.45"/>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge139" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.48,-1647.38C889.73,-1644.63 873.67,-1639.27 862,-1629 854.49,-1622.38 805.63,-1493.02 786.07,-1440.69"/>
-<polygon fill="#000000" stroke="#000000" points="789.25,-1439.19 782.47,-1431.04 782.69,-1441.63 789.25,-1439.19"/>
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge148" class="edge">
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.8,-54.35C893.11,-56.34 873.94,-61.71 862,-75 776.86,-169.74 905.13,-634.04 778,-642"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-108 917,-108 917,-84 971,-84 971,-108"/>
-<text text-anchor="middle" x="944" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982.5,-2082 905.5,-2082 905.5,-2058 982.5,-2058 982.5,-2082"/>
+<text text-anchor="middle" x="944" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.94,-95.33C898.64,-96.39 875.15,-101.11 862,-117 784.46,-210.67 895.87,-563.48 826,-663 812.62,-682.06 795.87,-669.07 778,-684"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge39" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.36,-2075.12C891.07,-2078.22 875.09,-2083.16 862,-2091 841.76,-2103.12 844.86,-2115.83 826,-2130 806.93,-2144.33 801.67,-2151.07 778,-2154"/>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge140" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.77,-95.19C898.37,-96.17 874.86,-100.87 862,-117 775.19,-225.92 880.48,-1241.82 826,-1370 821.1,-1381.53 812.12,-1391.86 803.25,-1400.02"/>
-<polygon fill="#000000" stroke="#000000" points="800.88,-1397.44 795.58,-1406.62 805.44,-1402.75 800.88,-1397.44"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge83" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.2,-2069.09C889.65,-2066.71 872.8,-2061.17 862,-2049 822.41,-2004.38 834.7,-1842.01 826,-1783 810.58,-1678.36 789.98,-1553.62 781.69,-1503.97"/>
+<polygon fill="#000000" stroke="#000000" points="785.12,-1503.31 780.02,-1494.03 778.22,-1504.47 785.12,-1503.31"/>
 </g>
-<!-- sourcefile~discard.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~discard.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="976.5,-66 911.5,-66 911.5,-42 976.5,-42 976.5,-66"/>
-<text text-anchor="middle" x="944" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-2250 901,-2250 901,-2226 987,-2226 987,-2250"/>
+<text text-anchor="middle" x="944" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-684C700,-747.5 572,-1477.02 486.5,-1527"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.37,-53.74C894.07,-55.4 873.82,-60.65 862,-75 778.76,-176.04 900.97,-555.68 826,-663 812.66,-682.09 795.11,-668.21 778,-684"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M484.5,-1527C446.96,-1546.43 333.13,-1539.66 260.61,-1532.89"/>
-<polygon fill="#000000" stroke="#000000" points="260.51,-1529.37 250.23,-1531.9 259.85,-1536.34 260.51,-1529.37"/>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge84" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.69,-2236.65C886.34,-2233.97 871.55,-2228.33 862,-2217 830.83,-2179.99 831.81,-1831.04 826,-1783 813.32,-1678.24 791.27,-1554.04 782.14,-1504.26"/>
+<polygon fill="#000000" stroke="#000000" points="785.56,-1503.48 780.3,-1494.28 778.67,-1504.75 785.56,-1503.48"/>
 </g>
-<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge141" class="edge">
-<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.19,-53.59C893.83,-55.2 873.58,-60.45 862,-75 817.17,-131.3 854.12,-1303.75 826,-1370 821.11,-1381.53 812.13,-1391.86 803.25,-1400.02"/>
-<polygon fill="#000000" stroke="#000000" points="800.88,-1397.45 795.58,-1406.62 805.45,-1402.75 800.88,-1397.45"/>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge115" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.69,-2245.68C887.89,-2248.86 874.04,-2253.2 862,-2259 819.95,-2279.24 824.67,-2322 778,-2322"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-2322C620.81,-2322 446.71,-2245.29 375.97,-2210.64"/>
+<polygon fill="#000000" stroke="#000000" points="377.21,-2207.34 366.69,-2206.04 374.1,-2213.62 377.21,-2207.34"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~discard.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-2292 901.5,-2292 901.5,-2268 986.5,-2268 986.5,-2292"/>
-<text text-anchor="middle" x="944" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~discard.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="976.5,-24 911.5,-24 911.5,0 976.5,0 976.5,-24"/>
+<text text-anchor="middle" x="944" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge72" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.11,-2287.57C888.19,-2290.77 874.17,-2295.14 862,-2301 819.95,-2321.24 824.67,-2364 778,-2364"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-2364C531.49,-2364 709.14,-2042.63 538,-1868 534.84,-1864.77 531.19,-1861.88 527.33,-1859.3"/>
-<polygon fill="#000000" stroke="#000000" points="529.03,-1856.23 518.64,-1854.14 525.45,-1862.25 529.03,-1856.23"/>
+<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge85" class="edge">
+<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.18,-11.58C893.82,-13.19 873.57,-18.44 862,-33 813.6,-93.92 856.33,-1361.35 826,-1433 821.12,-1444.54 812.14,-1454.86 803.26,-1463.03"/>
+<polygon fill="#000000" stroke="#000000" points="800.89,-1460.45 795.59,-1469.63 805.46,-1465.76 800.89,-1460.45"/>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge142" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.34,-2278.97C886.71,-2276.37 871.55,-2270.71 862,-2259 812.3,-2198.04 841.52,-1629.11 826,-1552 817.79,-1511.21 799.41,-1466.13 787.93,-1440.32"/>
-<polygon fill="#000000" stroke="#000000" points="791.07,-1438.78 783.76,-1431.12 784.69,-1441.67 791.07,-1438.78"/>
+<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge149" class="edge">
+<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-642C200.09,-678.07 194.66,-1737.69 197.45,-1906.44"/>
+<polygon fill="#000000" stroke="#000000" points="193.96,-1906.71 197.65,-1916.64 200.96,-1906.58 193.96,-1906.71"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M911.37,-12.12C894.29,-13.94 874.26,-19.22 862,-33 771.19,-135.07 911.86,-614.69 778,-642"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="995.5,-1284 892.5,-1284 892.5,-1260 995.5,-1260 995.5,-1284"/>
-<text text-anchor="middle" x="944" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971.5,-1242 916.5,-1242 916.5,-1218 971.5,-1218 971.5,-1242"/>
+<text text-anchor="middle" x="944" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge89" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.22,-1281.92C881.96,-1284.82 871.42,-1288.46 862,-1293 819.95,-1313.24 824.58,-1353.08 778,-1356"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-1356C642.29,-1364.37 651.22,-1469.36 538,-1541 532.9,-1544.22 527.35,-1547.37 521.85,-1550.3"/>
-<polygon fill="#000000" stroke="#000000" points="520.01,-1547.31 512.71,-1554.99 523.21,-1553.54 520.01,-1547.31"/>
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge86" class="edge">
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.39,-1229.94C898.55,-1231.38 875.86,-1236.31 862,-1251 805.42,-1310.98 864.46,-1360.06 826,-1433 820.07,-1444.24 810.74,-1454.63 801.88,-1462.92"/>
+<polygon fill="#000000" stroke="#000000" points="799.47,-1460.38 794.31,-1469.63 804.11,-1465.62 799.47,-1460.38"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge143" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.19,-1277.95C881.36,-1281.1 870.6,-1285.85 862,-1293 832.95,-1317.15 847.52,-1338.95 826,-1370 818.55,-1380.75 808.66,-1391.29 799.79,-1399.83"/>
-<polygon fill="#000000" stroke="#000000" points="797.27,-1397.39 792.35,-1406.77 802.05,-1402.51 797.27,-1397.39"/>
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge150" class="edge">
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.17,-1230.26C898.22,-1228.92 875.5,-1224.02 862,-1209 776.86,-1114.26 905.13,-634.04 778,-642"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-1620 910,-1620 910,-1596 978,-1596 978,-1620"/>
-<text text-anchor="middle" x="944" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-1998 901.5,-1998 901.5,-1974 986.5,-1974 986.5,-1998"/>
+<text text-anchor="middle" x="944" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M910,-1615.5C895.19,-1619.13 877.58,-1623.83 862,-1629 758.13,-1663.48 743.44,-1722 634,-1722 634,-1722 634,-1722 484.5,-1722 393.14,-1722 356.02,-1724.86 287,-1665 257.55,-1639.45 272.36,-1617.62 251,-1585 241.61,-1570.66 228.78,-1556.38 218.03,-1545.46"/>
-<polygon fill="#000000" stroke="#000000" points="220.22,-1542.7 210.66,-1538.15 215.3,-1547.68 220.22,-1542.7"/>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge87" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.23,-1984.17C886.94,-1981.44 872.04,-1975.9 862,-1965 853.98,-1956.3 796.47,-1598 781.54,-1504.26"/>
+<polygon fill="#000000" stroke="#000000" points="784.96,-1503.5 779.93,-1494.18 778.05,-1504.6 784.96,-1503.5"/>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge144" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.78,-1605.74C893.89,-1603.18 875.44,-1597.88 862,-1587 814.91,-1548.89 791.93,-1477.61 782.86,-1441.38"/>
-<polygon fill="#000000" stroke="#000000" points="786.2,-1440.26 780.49,-1431.34 779.38,-1441.88 786.2,-1440.26"/>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge107" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.2,-1994.86C888.42,-1998.09 874.46,-2002.16 862,-2007 782.3,-2037.94 774.05,-2072.99 692,-2097 604.04,-2122.74 571.57,-2079.91 486.5,-2114"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971.5,-1242 916.5,-1242 916.5,-1218 971.5,-1218 971.5,-1242"/>
-<text text-anchor="middle" x="944" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="991.5,-1200 896.5,-1200 896.5,-1176 991.5,-1176 991.5,-1200"/>
+<text text-anchor="middle" x="944" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.22,-1230.21C898.3,-1228.85 875.58,-1223.94 862,-1209 782.52,-1121.58 868.67,-608.25 778,-684"/>
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge88" class="edge">
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.09,-1190.84C883.42,-1193.86 870.8,-1199.33 862,-1209 794.14,-1283.58 871.42,-1342.97 826,-1433 820.28,-1444.35 810.98,-1454.75 802.09,-1463.02"/>
+<polygon fill="#000000" stroke="#000000" points="799.67,-1460.49 794.48,-1469.72 804.3,-1465.74 799.67,-1460.49"/>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge145" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.45,-1230.42C898.87,-1232.09 876.46,-1237.11 862,-1251 822.15,-1289.28 854.14,-1322.45 826,-1370 819.43,-1381.1 809.83,-1391.57 800.94,-1399.97"/>
-<polygon fill="#000000" stroke="#000000" points="798.48,-1397.47 793.4,-1406.77 803.17,-1402.67 798.48,-1397.47"/>
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge151" class="edge">
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.09,-1185.16C883.42,-1182.14 870.8,-1176.67 862,-1167 782.52,-1079.58 895.92,-634.61 778,-642"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="995.5,-24 892.5,-24 892.5,0 995.5,0 995.5,-24"/>
-<text text-anchor="middle" x="944" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="992,-1326 896,-1326 896,-1302 992,-1302 992,-1326"/>
+<text text-anchor="middle" x="944" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge93" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.1,-15.17C880.6,-18.34 869.57,-23.8 862,-33 777.94,-135.09 901.64,-518.53 826,-627 798.79,-666.01 764.8,-639.86 728,-670 689.06,-701.89 659.01,-753.8 644.18,-782.76"/>
-<polygon fill="#000000" stroke="#000000" points="640.92,-781.46 639.59,-791.97 647.18,-784.59 640.92,-781.46"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M895.94,-1321.72C884.37,-1324.81 872.34,-1329.09 862,-1335 816.17,-1361.21 830.69,-1415.7 778,-1419"/>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge146" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M892.31,-14.88C880.66,-18.04 869.51,-23.56 862,-33 815.74,-91.15 855,-1301.59 826,-1370 821.11,-1381.53 812.14,-1391.86 803.26,-1400.03"/>
-<polygon fill="#000000" stroke="#000000" points="800.89,-1397.45 795.59,-1406.62 805.45,-1402.76 800.89,-1397.45"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge89" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M895.95,-1318.28C883.72,-1321.37 871.37,-1326.51 862,-1335 827.62,-1366.16 850.79,-1393.77 826,-1433 819.11,-1443.9 809.46,-1454.35 800.62,-1462.77"/>
+<polygon fill="#000000" stroke="#000000" points="798.16,-1460.28 793.15,-1469.62 802.89,-1465.44 798.16,-1460.28"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-1200 917,-1200 917,-1176 971,-1176 971,-1200"/>
-<text text-anchor="middle" x="944" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-1158 917,-1158 917,-1134 971,-1134 971,-1158"/>
+<text text-anchor="middle" x="944" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge90" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.88,-1145.63C898.79,-1146.86 875.6,-1151.68 862,-1167 782.81,-1256.23 878.41,-1325.83 826,-1433 820.42,-1444.42 811.14,-1454.83 802.23,-1463.1"/>
+<polygon fill="#000000" stroke="#000000" points="799.82,-1460.56 794.59,-1469.78 804.42,-1465.83 799.82,-1460.56"/>
+</g>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge152" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.67,-1146.18C898.72,-1144.83 875.78,-1139.96 862,-1125 788.17,-1044.89 886.73,-635.19 778,-642"/>
+</g>
+<!-- sourcefile~symba_encounter_check.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node64" class="node">
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1019,-1662 869,-1662 869,-1638 1019,-1638 1019,-1662"/>
+<text text-anchor="middle" x="944" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.67,-1188.18C898.72,-1186.83 875.78,-1181.96 862,-1167 788.17,-1086.89 861.61,-614.15 778,-684"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge27" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M878.25,-1662.08C872.49,-1664.52 866.97,-1667.46 862,-1671 807.15,-1710.01 833.18,-1758.46 778,-1797"/>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge147" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.89,-1188.02C899.04,-1189.47 876.14,-1194.38 862,-1209 811.03,-1261.71 860.99,-1305.57 826,-1370 819.85,-1381.33 810.31,-1391.84 801.35,-1400.2"/>
-<polygon fill="#000000" stroke="#000000" points="798.89,-1397.71 793.73,-1406.96 803.54,-1402.94 798.89,-1397.71"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge96" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M877.17,-1637.91C871.77,-1635.47 866.62,-1632.53 862,-1629 819.62,-1596.6 795.11,-1536.26 784.44,-1503.88"/>
+<polygon fill="#000000" stroke="#000000" points="787.68,-1502.54 781.34,-1494.05 781.01,-1504.64 787.68,-1502.54"/>
 </g>
 <!-- sourcefile~symba_drift.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node64" class="node">
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node65" class="node">
 <title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-1914 901,-1914 901,-1890 987,-1890 987,-1914"/>
-<text text-anchor="middle" x="944" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-1620 901,-1620 901,-1596 987,-1596 987,-1620"/>
+<text text-anchor="middle" x="944" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge82" class="edge">
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge29" class="edge">
 <title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.61,-1906.43C887.24,-1909.46 873.08,-1914.53 862,-1923 802.22,-1968.7 843.21,-2107.54 778,-2070"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-2070C689.27,-2020.07 651.06,-1894.87 638.75,-1844"/>
-<polygon fill="#000000" stroke="#000000" points="642.11,-1843.02 636.45,-1834.06 635.3,-1844.59 642.11,-1843.02"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-1797C678.87,-1864.85 771.45,-1962.11 692,-2050 688.96,-2053.36 685.41,-2056.31 681.58,-2058.9"/>
+<polygon fill="#000000" stroke="#000000" points="679.73,-2055.93 672.86,-2064 683.26,-2061.97 679.73,-2055.93"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.75,-1611.98C887.24,-1614.97 872.95,-1620.13 862,-1629 797.11,-1681.52 846.44,-1749.2 778,-1797"/>
 </g>
 <!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge148" class="edge">
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge97" class="edge">
 <title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.85,-1900.51C886.52,-1897.82 871.69,-1892.21 862,-1881 813.89,-1825.37 842.6,-1623.65 826,-1552 816.61,-1511.46 798.61,-1466.3 787.52,-1440.41"/>
-<polygon fill="#000000" stroke="#000000" points="790.7,-1438.95 783.51,-1431.17 784.28,-1441.74 790.7,-1438.95"/>
-</g>
-<!-- sourcefile~whm_coord.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-2502 901,-2502 901,-2478 987,-2478 987,-2502"/>
-<text text-anchor="middle" x="944" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.86,-2481.97C888.06,-2478.77 874.18,-2474.51 862,-2469 796.42,-2439.31 778.64,-2429.17 728,-2378 640.95,-2290.03 618.29,-2261.57 574,-2146 534.62,-2043.23 607.61,-1986.25 538,-1901 506.61,-1862.56 469.81,-1896.29 433,-1863 405.58,-1838.2 423.13,-1814.16 397,-1788 393.73,-1784.72 389.96,-1781.8 385.97,-1779.21"/>
-<polygon fill="#000000" stroke="#000000" points="387.39,-1775.99 376.98,-1774.04 383.91,-1782.06 387.39,-1775.99"/>
-</g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge149" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.85,-2488.95C886.33,-2486.33 871.39,-2480.65 862,-2469 798.03,-2389.6 845.54,-1652.08 826,-1552 818.03,-1511.16 799.57,-1466.1 788.01,-1440.3"/>
-<polygon fill="#000000" stroke="#000000" points="791.14,-1438.75 783.81,-1431.11 784.78,-1441.66 791.14,-1438.75"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.93,-1602.43C887.72,-1599.33 873.58,-1594.5 862,-1587 829.11,-1565.69 803.23,-1527.18 789.32,-1503.19"/>
+<polygon fill="#000000" stroke="#000000" points="792.21,-1501.19 784.26,-1494.18 786.1,-1504.61 792.21,-1501.19"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="991.5,-1158 896.5,-1158 896.5,-1134 991.5,-1134 991.5,-1158"/>
-<text text-anchor="middle" x="944" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="980.5,-2334 907.5,-2334 907.5,-2310 980.5,-2310 980.5,-2334"/>
+<text text-anchor="middle" x="944" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.27,-1143C883.6,-1139.97 870.94,-1134.54 862,-1125 793.8,-1052.19 854.56,-620.04 778,-684"/>
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge91" class="edge">
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.31,-2321.77C891.02,-2319.68 872.95,-2314.19 862,-2301 825.13,-2256.62 832.55,-1840.32 826,-1783 814.02,-1678.16 791.58,-1554.01 782.24,-1504.25"/>
+<polygon fill="#000000" stroke="#000000" points="785.65,-1503.45 780.36,-1494.27 778.78,-1504.75 785.65,-1503.45"/>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge150" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.19,-1148.93C883.52,-1151.96 870.88,-1157.4 862,-1167 799.79,-1234.27 867.93,-1288.53 826,-1370 820.18,-1381.3 810.87,-1391.7 801.99,-1399.98"/>
-<polygon fill="#000000" stroke="#000000" points="799.58,-1397.44 794.4,-1406.68 804.21,-1402.69 799.58,-1397.44"/>
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge108" class="edge">
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.22,-2323.42C873.77,-2324.41 822.44,-2325.07 778,-2322"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1015,-2586 873,-2586 873,-2562 1015,-2562 1015,-2586"/>
-<text text-anchor="middle" x="944" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="985.5,-1284 902.5,-1284 902.5,-1260 985.5,-1260 985.5,-1284"/>
+<text text-anchor="middle" x="944" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.92,-2586.1C877.04,-2588.59 869.2,-2591.53 862,-2595 819.95,-2615.24 821.49,-2674.92 778,-2658"/>
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-1419C530.77,-1434.36 492.99,-1853.87 487.42,-1955.83"/>
+<polygon fill="#000000" stroke="#000000" points="483.92,-1955.76 486.92,-1965.92 490.91,-1956.1 483.92,-1955.76"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.2,-1276.6C888.49,-1279.63 873.72,-1284.66 862,-1293 807.15,-1332.01 841.24,-1395.97 778,-1419"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge151" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M872.88,-2562.7C868.79,-2560.05 865.09,-2556.85 862,-2553 827.16,-2509.61 836.57,-1606.63 826,-1552 818.09,-1511.15 799.62,-1466.09 788.03,-1440.3"/>
-<polygon fill="#000000" stroke="#000000" points="791.17,-1438.74 783.82,-1431.1 784.8,-1441.65 791.17,-1438.74"/>
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge98" class="edge">
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.11,-1274.19C887.75,-1276.94 872.57,-1282.41 862,-1293 816.62,-1338.47 857.55,-1377.04 826,-1433 819.67,-1444.23 810.1,-1454.73 801.18,-1463.1"/>
+<polygon fill="#000000" stroke="#000000" points="798.72,-1460.61 793.59,-1469.88 803.38,-1465.83 798.72,-1460.61"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="974,-1116 914,-1116 914,-1092 974,-1092 974,-1116"/>
-<text text-anchor="middle" x="944" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-1116 901.5,-1116 901.5,-1092 986.5,-1092 986.5,-1116"/>
+<text text-anchor="middle" x="944" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.72,-1103.75C896.36,-1102.02 875.24,-1096.87 862,-1083 799.43,-1017.47 847.54,-625.91 778,-684"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge92" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.32,-1105.45C886.86,-1108.12 871.83,-1113.72 862,-1125 816.73,-1176.96 855.71,-1370.82 826,-1433 820.52,-1444.47 811.27,-1454.89 802.34,-1463.15"/>
+<polygon fill="#000000" stroke="#000000" points="799.92,-1460.61 794.68,-1469.82 804.52,-1465.89 799.92,-1460.61"/>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge152" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.81,-1103.93C896.27,-1105.52 874.91,-1110.62 862,-1125 788.48,-1206.9 874.91,-1271.41 826,-1370 820.35,-1381.39 811.07,-1391.8 802.17,-1400.06"/>
-<polygon fill="#000000" stroke="#000000" points="799.75,-1397.53 794.54,-1406.75 804.37,-1402.79 799.75,-1397.53"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge154" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.33,-1102.09C887.05,-1099.35 872.13,-1093.82 862,-1083 725.61,-937.37 977.13,-629.53 778,-642"/>
 </g>
-<!-- sourcefile~operator_mag.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~operator_mag.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/operator_mag.f90.html" xlink:title="operator_mag.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="826,-618 728,-618 728,-594 826,-594 826,-618"/>
-<text text-anchor="middle" x="777" y="-603.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="972.5,-1074 915.5,-1074 915.5,-1050 972.5,-1050 972.5,-1074"/>
+<text text-anchor="middle" x="944" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_mag.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge95" class="edge">
-<title>sourcefile~operator_mag.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.25,-618.1C740.41,-621.88 733.51,-626.52 728,-632 683.43,-676.4 654.21,-746.38 641.42,-781.83"/>
-<polygon fill="#000000" stroke="#000000" points="637.98,-781.06 637.97,-791.66 644.58,-783.38 637.98,-781.06"/>
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge93" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M915.17,-1061.61C897.26,-1062.95 874.97,-1067.9 862,-1083 811.05,-1142.3 859.22,-1362.22 826,-1433 820.6,-1444.51 811.36,-1454.94 802.42,-1463.19"/>
+<polygon fill="#000000" stroke="#000000" points="800,-1460.65 794.74,-1469.85 804.59,-1465.94 800,-1460.65"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge153" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M915.29,-1061.9C897.65,-1060.32 875.64,-1055.29 862,-1041 736.85,-909.93 958.87,-630.67 778,-642"/>
+</g>
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node70" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="985.5,-1578 902.5,-1578 902.5,-1554 985.5,-1554 985.5,-1578"/>
-<text text-anchor="middle" x="944" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="974,-1032 914,-1032 914,-1008 974,-1008 974,-1032"/>
+<text text-anchor="middle" x="944" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge88" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.48,-1563.23C868.98,-1561.61 820.22,-1560.77 778,-1566"/>
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge94" class="edge">
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.93,-1019.66C896.21,-1021.11 874.61,-1026.17 862,-1041 805.35,-1107.66 862.73,-1353.61 826,-1433 820.66,-1444.54 811.43,-1454.97 802.48,-1463.22"/>
+<polygon fill="#000000" stroke="#000000" points="800.06,-1460.68 794.79,-1469.87 804.65,-1465.97 800.06,-1460.68"/>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge153" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M902.2,-1561.4C888.49,-1558.37 873.72,-1553.34 862,-1545 824.41,-1518.26 798.89,-1468.99 786.55,-1440.63"/>
-<polygon fill="#000000" stroke="#000000" points="789.7,-1439.08 782.6,-1431.21 783.24,-1441.79 789.7,-1439.08"/>
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge155" class="edge">
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M913.83,-1019.64C896.52,-1017.87 875.41,-1012.71 862,-999 748.05,-882.45 940.68,-631.81 778,-642"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node71" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node71"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="991,-2544 897,-2544 897,-2520 991,-2520 991,-2544"/>
-<text text-anchor="middle" x="944" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node71"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="980,-990 908,-990 908,-966 980,-966 980,-990"/>
+<text text-anchor="middle" x="944" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.73,-2538.6C884.77,-2541.72 872.36,-2546.29 862,-2553 811.84,-2585.49 837.76,-2658 778,-2658"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-2658C635.9,-2658 633.09,-2543.03 574,-2416 495.54,-2247.34 487.09,-2016.27 486.45,-1944.31"/>
-<polygon fill="#000000" stroke="#000000" points="489.95,-1944.14 486.4,-1934.16 482.95,-1944.18 489.95,-1944.14"/>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge95" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.8,-978.24C891.42,-980.31 873.14,-985.78 862,-999 799.66,-1073.02 866.25,-1344.99 826,-1433 820.71,-1444.56 811.49,-1455 802.53,-1463.24"/>
+<polygon fill="#000000" stroke="#000000" points="800.12,-1460.7 794.84,-1469.89 804.69,-1466 800.12,-1460.7"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge155" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.6,-2530.11C883.47,-2527.18 870.47,-2521.53 862,-2511 795.17,-2427.91 846.34,-1656.67 826,-1552 818.06,-1511.16 799.59,-1466.09 788.02,-1440.3"/>
-<polygon fill="#000000" stroke="#000000" points="791.16,-1438.75 783.81,-1431.11 784.79,-1441.66 791.16,-1438.75"/>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge156" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M907.96,-976.74C892.02,-974.39 874.06,-968.98 862,-957 759.19,-854.9 922.61,-632.94 778,-642"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node72" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node72"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="993,-1452 895,-1452 895,-1428 993,-1428 993,-1452"/>
-<text text-anchor="middle" x="944" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node72"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-2040 901.5,-2040 901.5,-2016 986.5,-2016 986.5,-2040"/>
+<text text-anchor="middle" x="944" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge154" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M894.83,-1433.87C871.16,-1430.86 842.89,-1427.26 820.09,-1424.36"/>
-<polygon fill="#000000" stroke="#000000" points="820.4,-1420.87 810.04,-1423.08 819.52,-1427.81 820.4,-1420.87"/>
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge37" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-2154C695.42,-2163.98 601.25,-2161.36 542.74,-2158.07"/>
+<polygon fill="#000000" stroke="#000000" points="542.78,-2154.57 532.59,-2157.48 542.37,-2161.56 542.78,-2154.57"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.35,-2031.51C887.57,-2034.45 872.97,-2039.7 862,-2049 831.95,-2074.47 853.22,-2101.52 826,-2130 809.52,-2147.24 801.6,-2150.58 778,-2154"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge99" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.15,-2026.25C886.85,-2023.52 871.97,-2017.96 862,-2007 861.73,-2006.7 797.42,-1603.75 781.52,-1504.09"/>
+<polygon fill="#000000" stroke="#000000" points="784.98,-1503.52 779.95,-1494.2 778.07,-1504.62 784.98,-1503.52"/>
+</g>
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node73" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node73"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982,-1074 906,-1074 906,-1050 982,-1050 982,-1074"/>
-<text text-anchor="middle" x="944" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node73"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="987,-2460 901,-2460 901,-2436 987,-2436 987,-2460"/>
+<text text-anchor="middle" x="944" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.74,-1060.59C890.3,-1058.11 873.37,-1052.63 862,-1041 748.05,-924.45 903.09,-579.49 778,-684"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge100" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.95,-2446.87C886.45,-2444.23 871.48,-2438.57 862,-2427 816.58,-2371.57 833.65,-1854.26 826,-1783 814.73,-1678.08 791.89,-1553.97 782.35,-1504.24"/>
+<polygon fill="#000000" stroke="#000000" points="785.75,-1503.42 780.42,-1494.27 778.88,-1504.75 785.75,-1503.42"/>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge156" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.97,-1062.73C890.19,-1065.03 872.93,-1070.56 862,-1083 777.14,-1179.57 881.91,-1254.24 826,-1370 820.47,-1381.45 811.21,-1391.86 802.29,-1400.12"/>
-<polygon fill="#000000" stroke="#000000" points="799.87,-1397.59 794.64,-1406.8 804.47,-1402.86 799.87,-1397.59"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge121" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M900.69,-2455.68C887.89,-2458.86 874.04,-2463.2 862,-2469 819.95,-2489.24 817.61,-2556.68 778,-2532"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M776,-2532C714.28,-2493.54 666.26,-2419.14 645.38,-2382.88"/>
+<polygon fill="#000000" stroke="#000000" points="648.4,-2381.12 640.44,-2374.13 642.31,-2384.56 648.4,-2381.12"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node74" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node74"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983.5,-1032 904.5,-1032 904.5,-1008 983.5,-1008 983.5,-1032"/>
-<text text-anchor="middle" x="944" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node74"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="981.5,-948 906.5,-948 906.5,-924 981.5,-924 981.5,-948"/>
+<text text-anchor="middle" x="944" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.25,-1018.14C889.29,-1015.52 873.13,-1010.06 862,-999 759.19,-896.9 889.19,-591.1 778,-684"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge101" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M906.1,-936.43C890.15,-938.64 872.72,-944.18 862,-957 793.96,-1038.39 869.77,-1336.37 826,-1433 820.76,-1444.58 811.54,-1455.02 802.58,-1463.26"/>
+<polygon fill="#000000" stroke="#000000" points="800.16,-1460.72 794.87,-1469.91 804.73,-1466.03 800.16,-1460.72"/>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge157" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.21,-1020.91C888.88,-1023.34 872.45,-1028.91 862,-1041 813.89,-1096.63 857.46,-1303.52 826,-1370 820.56,-1381.49 811.32,-1391.92 802.38,-1400.17"/>
-<polygon fill="#000000" stroke="#000000" points="799.96,-1397.63 794.71,-1406.83 804.56,-1402.91 799.96,-1397.63"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge159" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M906.11,-934.21C890.73,-931.67 873.76,-926.24 862,-915 770.25,-827.27 904.7,-634.07 778,-642"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node75" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node75"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="982,-2250 906,-2250 906,-2226 982,-2226 982,-2250"/>
-<text text-anchor="middle" x="944" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node75"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="983.5,-2208 904.5,-2208 904.5,-2184 983.5,-2184 983.5,-2208"/>
+<text text-anchor="middle" x="944" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge81" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.99,-2234.69C891.13,-2231.85 874.58,-2226.62 862,-2217 802.22,-2171.3 843.21,-2107.54 778,-2070"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge38" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.38,-2185.99C856.12,-2173.5 779.6,-2153.8 778,-2154"/>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge158" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M905.98,-2237.67C890,-2235.48 872.58,-2229.93 862,-2217 815.15,-2159.72 840.72,-1624.52 826,-1552 817.72,-1511.22 799.37,-1466.14 787.9,-1440.33"/>
-<polygon fill="#000000" stroke="#000000" points="791.05,-1438.79 783.74,-1431.12 784.67,-1441.67 791.05,-1438.79"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge102" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M904.11,-2195.18C888.76,-2192.77 872.35,-2187.18 862,-2175 805.35,-2108.34 836.89,-1869.8 826,-1783 812.83,-1678.05 790.96,-1553.49 782.01,-1503.92"/>
+<polygon fill="#000000" stroke="#000000" points="785.44,-1503.22 780.21,-1494 778.55,-1504.47 785.44,-1503.22"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node76" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node76"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1006,-1536 882,-1536 882,-1512 1006,-1512 1006,-1536"/>
-<text text-anchor="middle" x="944" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node76"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="1003,-906 885,-906 885,-882 1003,-882 1003,-906"/>
+<text text-anchor="middle" x="944" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge90" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.42,-1536.01C848.7,-1548.29 781.03,-1565.63 778,-1566"/>
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge103" class="edge">
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.68,-899.65C875.97,-902.96 867.94,-907.85 862,-915 788.26,-1003.75 873.29,-1327.75 826,-1433 820.79,-1444.59 811.58,-1455.04 802.61,-1463.28"/>
+<polygon fill="#000000" stroke="#000000" points="800.19,-1460.74 794.9,-1469.92 804.76,-1466.04 800.19,-1460.74"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge159" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M881.89,-1511.95C874.96,-1509.48 868.18,-1506.53 862,-1503 833.59,-1486.75 808.12,-1458.37 792.87,-1439.14"/>
-<polygon fill="#000000" stroke="#000000" points="795.49,-1436.8 786.6,-1431.02 789.94,-1441.08 795.49,-1436.8"/>
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge160" class="edge">
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M884.6,-886.23C876.33,-883.13 868.45,-878.86 862,-873 781.17,-799.51 887.03,-635.17 778,-642"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node77" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node77"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="971,-990 917,-990 917,-966 971,-966 971,-990"/>
-<text text-anchor="middle" x="944" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node77"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="991,-1956 897,-1956 897,-1932 991,-1932 991,-1956"/>
+<text text-anchor="middle" x="944" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.85,-977.59C899.22,-975.95 876.6,-970.96 862,-957 770.25,-869.27 875.42,-602.61 778,-684"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.75,-1938.1C884.66,-1934.99 872.18,-1930.24 862,-1923 807.15,-1883.99 833.18,-1758.46 778,-1797"/>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge160" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M916.7,-977.48C898.53,-978.64 875.3,-983.43 862,-999 808.2,-1061.98 860.97,-1294.91 826,-1370 820.63,-1381.52 811.4,-1391.95 802.45,-1400.2"/>
-<polygon fill="#000000" stroke="#000000" points="800.03,-1397.67 794.77,-1406.86 804.62,-1402.96 800.03,-1397.67"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge64" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.69,-1941.1C883.88,-1938.09 871.04,-1932.65 862,-1923 847.31,-1907.32 795.58,-1591.29 781.54,-1504.11"/>
+<polygon fill="#000000" stroke="#000000" points="784.99,-1503.53 779.95,-1494.22 778.08,-1504.65 784.99,-1503.53"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node78" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node78"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="978,-2796 910,-2796 910,-2772 978,-2772 978,-2796"/>
-<text text-anchor="middle" x="944" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node78"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="991,-2712 897,-2712 897,-2688 991,-2688 991,-2712"/>
+<text text-anchor="middle" x="944" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.91,-2780.32C894.41,-2777.42 876.27,-2772.24 862,-2763 811.84,-2730.51 833.7,-2679.67 778,-2658"/>
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge105" class="edge">
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.62,-2698.09C883.49,-2695.16 870.48,-2689.52 862,-2679 830.73,-2640.22 830.93,-1832.57 826,-1783 815.55,-1677.99 792.26,-1553.93 782.47,-1504.22"/>
+<polygon fill="#000000" stroke="#000000" points="785.87,-1503.39 780.49,-1494.26 779,-1504.75 785.87,-1503.39"/>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge161" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M909.97,-2784.28C892.9,-2782.53 873.33,-2777.19 862,-2763 820.02,-2710.39 838.58,-1618.12 826,-1552 818.22,-1511.12 799.7,-1466.07 788.07,-1440.29"/>
-<polygon fill="#000000" stroke="#000000" points="791.2,-1438.72 783.85,-1431.1 784.84,-1441.65 791.2,-1438.72"/>
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge124" class="edge">
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M896.84,-2696.44C884.19,-2693.4 871.39,-2688.1 862,-2679 821.1,-2639.35 862.52,-2599.71 826,-2556 810.71,-2537.7 798.24,-2544.61 778,-2532"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_node79" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node79"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986.5,-948 901.5,-948 901.5,-924 986.5,-924 986.5,-948"/>
-<text text-anchor="middle" x="944" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~swiftest_globals.f90~~AfferentGraph_node79"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="986,-1536 902,-1536 902,-1512 986,-1512 986,-1536"/>
+<text text-anchor="middle" x="944" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.4,-933C887.46,-930.11 872.75,-924.77 862,-915 781.17,-841.51 861.84,-613.96 778,-684"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge19" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.91,-1518.39C888.48,-1515.28 873.95,-1510.46 862,-1503 817.21,-1475.05 830.69,-1415.7 778,-1419"/>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge162" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.14,-937.29C886.66,-939.94 871.66,-945.58 862,-957 802.51,-1027.34 864.49,-1286.3 826,-1370 820.69,-1381.55 811.46,-1391.98 802.51,-1400.23"/>
-<polygon fill="#000000" stroke="#000000" points="800.09,-1397.69 794.82,-1406.88 804.67,-1402.99 800.09,-1397.69"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_globals.f90~~AfferentGraph_edge106" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M901.79,-1513.51C876.87,-1507.17 845.19,-1499.1 820.11,-1492.72"/>
+<polygon fill="#000000" stroke="#000000" points="820.71,-1489.26 810.16,-1490.19 818.98,-1496.04 820.71,-1489.26"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/swiftest_operators.f90.html b/docs/sourcefile/swiftest_operators.f90.html
index 19e55d030..dc61bd515 100644
--- a/docs/sourcefile/swiftest_operators.f90.html
+++ b/docs/sourcefile/swiftest_operators.f90.html
@@ -324,420 +324,420 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge1" class="edge">
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge2" class="edge">
 <title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.35,-2780.13C306.99,-2776.95 295.96,-2771.67 288,-2763 100.27,-2558.46 65.14,-1599.96 60.58,-1441.28"/>
 <polygon fill="#000000" stroke="#000000" points="64.08,-1441.16 60.3,-1431.26 57.08,-1441.35 64.08,-1441.16"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node3" class="node">
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node4" class="node">
 <title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="236,-1431 170,-1431 170,-1407 236,-1407 236,-1431"/>
 <text text-anchor="middle" x="203" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge54" class="edge">
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge16" class="edge">
 <title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.49,-2780.97C306.84,-2777.82 295.64,-2772.33 288,-2763 241.76,-2706.51 256.54,-2179.86 252,-2107 235.68,-1845.1 212.12,-1527.39 205.68,-1441.37"/>
 <polygon fill="#000000" stroke="#000000" points="209.16,-1440.92 204.92,-1431.21 202.18,-1441.45 209.16,-1440.92"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.78,-1419C157.35,-1419 142.62,-1419 128.07,-1419"/>
-<polygon fill="#000000" stroke="#000000" points="128.05,-1415.5 118.05,-1419 128.05,-1422.5 128.05,-1415.5"/>
-</g>
 <!-- sourcefile~operator_mag.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node4" class="node">
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node3" class="node">
 <title>sourcefile~operator_mag.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/operator_mag.f90.html" xlink:title="operator_mag.f90">
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/operator_mag.f90.html" xlink:title="operator_mag.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-1389 154,-1389 154,-1365 252,-1365 252,-1389"/>
 <text text-anchor="middle" x="203" y="-1374.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_mag.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~operator_mag.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge3" class="edge">
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge1" class="edge">
 <title>sourcefile~operator_mag.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M161.31,-1389.04C145.41,-1393.74 127.03,-1399.18 110.31,-1404.12"/>
 <polygon fill="#000000" stroke="#000000" points="109.29,-1400.77 100.7,-1406.96 111.28,-1407.48 109.29,-1400.77"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge3" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.78,-1419C157.35,-1419 142.62,-1419 128.07,-1419"/>
+<polygon fill="#000000" stroke="#000000" points="128.05,-1415.5 118.05,-1419 128.05,-1422.5 128.05,-1415.5"/>
+</g>
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="445,-2754 295,-2754 295,-2730 445,-2730 445,-2754"/>
-<text text-anchor="middle" x="370" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="423,-2754 317,-2754 317,-2730 423,-2730 423,-2754"/>
+<text text-anchor="middle" x="370" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.9,-2729.91C294.21,-2727.42 290.86,-2724.48 288,-2721 244.61,-2668.2 256.38,-2175.2 252,-2107 235.19,-1845.13 211.98,-1527.4 205.65,-1441.37"/>
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M316.83,-2738.48C305.79,-2735.26 295.29,-2729.87 288,-2721 244.61,-2668.2 256.38,-2175.2 252,-2107 235.19,-1845.13 211.98,-1527.4 205.65,-1441.37"/>
 <polygon fill="#000000" stroke="#000000" points="209.13,-1440.93 204.9,-1431.21 202.15,-1441.44 209.13,-1440.93"/>
 </g>
-<!-- sourcefile~symba_step.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~symba_step.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="414,-2712 326,-2712 326,-2688 414,-2688 414,-2712"/>
-<text text-anchor="middle" x="370" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-2712 343,-2712 343,-2688 397,-2688 397,-2712"/>
+<text text-anchor="middle" x="370" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M325.72,-2698.59C311.63,-2695.86 297.25,-2690.2 288,-2679 247.47,-2629.89 256.22,-2170.54 252,-2107 234.63,-1845.16 211.82,-1527.41 205.62,-1441.38"/>
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.93,-2700.68C324.62,-2699.63 301.13,-2694.91 288,-2679 247.47,-2629.89 256.22,-2170.54 252,-2107 234.63,-1845.16 211.82,-1527.41 205.62,-1441.38"/>
 <polygon fill="#000000" stroke="#000000" points="209.09,-1440.94 204.88,-1431.21 202.11,-1441.44 209.09,-1440.94"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="426,-2670 314,-2670 314,-2646 426,-2646 426,-2670"/>
-<text text-anchor="middle" x="370" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-2670 336.5,-2670 336.5,-2646 403.5,-2646 403.5,-2670"/>
+<text text-anchor="middle" x="370" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.97,-2653.53C304.01,-2650.23 294.68,-2645.05 288,-2637 250.32,-2591.57 256.05,-2165.89 252,-2107 233.98,-1845.21 211.63,-1527.42 205.58,-1441.38"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge6" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.18,-2658.11C319.18,-2656.31 299.59,-2650.98 288,-2637 250.32,-2591.57 256.05,-2165.89 252,-2107 233.98,-1845.21 211.63,-1527.42 205.58,-1441.38"/>
 <polygon fill="#000000" stroke="#000000" points="209.05,-1440.95 204.86,-1431.22 202.07,-1441.44 209.05,-1440.95"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409,-2628 331,-2628 331,-2604 409,-2604 409,-2628"/>
-<text text-anchor="middle" x="370" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408,-2628 332,-2628 332,-2604 408,-2604 408,-2628"/>
+<text text-anchor="middle" x="370" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.83,-2615.41C315.21,-2613.09 298.41,-2607.5 288,-2595 285.6,-2592.11 216.9,-1604.7 205.57,-1441.67"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge7" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.66,-2615.53C315.82,-2613.28 298.6,-2607.73 288,-2595 285.6,-2592.11 216.9,-1604.7 205.57,-1441.67"/>
 <polygon fill="#000000" stroke="#000000" points="209.04,-1441.11 204.86,-1431.38 202.06,-1441.6 209.04,-1441.11"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406.5,-2586 333.5,-2586 333.5,-2562 406.5,-2562 406.5,-2586"/>
-<text text-anchor="middle" x="370" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-2586 327,-2586 327,-2562 413,-2562 413,-2586"/>
+<text text-anchor="middle" x="370" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.34,-2573.74C317.05,-2571.65 298.98,-2566.16 288,-2553 283.36,-2547.44 216.67,-1599.58 205.56,-1441.29"/>
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.64,-2572.69C312.28,-2570.02 297.5,-2564.38 288,-2553 283.36,-2547.44 216.67,-1599.58 205.56,-1441.29"/>
 <polygon fill="#000000" stroke="#000000" points="209.05,-1441.01 204.86,-1431.28 202.07,-1441.5 209.05,-1441.01"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="425.5,-2544 314.5,-2544 314.5,-2520 425.5,-2520 425.5,-2544"/>
-<text text-anchor="middle" x="370" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="421.5,-2544 318.5,-2544 318.5,-2520 421.5,-2520 421.5,-2544"/>
+<text text-anchor="middle" x="370" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.44,-2527.62C304.32,-2524.33 294.81,-2519.13 288,-2511 279.07,-2500.33 216.21,-1595.7 205.54,-1441.29"/>
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.21,-2528.74C306.7,-2525.57 295.65,-2520.13 288,-2511 279.07,-2500.33 216.21,-1595.7 205.54,-1441.29"/>
 <polygon fill="#000000" stroke="#000000" points="209.02,-1440.87 204.84,-1431.14 202.03,-1441.35 209.02,-1440.87"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-2502 331.5,-2502 331.5,-2478 408.5,-2478 408.5,-2502"/>
-<text text-anchor="middle" x="370" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="422.5,-2502 317.5,-2502 317.5,-2478 422.5,-2478 422.5,-2502"/>
+<text text-anchor="middle" x="370" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.3,-2489.43C315.58,-2487.14 298.56,-2481.57 288,-2469 279.41,-2458.77 216.52,-1592.46 205.61,-1441.35"/>
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.38,-2486.49C306.19,-2483.29 295.47,-2477.9 288,-2469 279.41,-2458.77 216.52,-1592.46 205.61,-1441.35"/>
 <polygon fill="#000000" stroke="#000000" points="209.08,-1440.75 204.87,-1431.03 202.09,-1441.25 209.08,-1440.75"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="423,-2460 317,-2460 317,-2436 423,-2436 423,-2460"/>
-<text text-anchor="middle" x="370" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-2460 331.5,-2460 331.5,-2436 408.5,-2436 408.5,-2460"/>
+<text text-anchor="middle" x="370" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M316.98,-2444.35C305.94,-2441.14 295.39,-2435.78 288,-2427 271.51,-2407.43 215.37,-1587.24 205.49,-1441.14"/>
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.31,-2447.41C315.6,-2445.12 298.58,-2439.55 288,-2427 271.51,-2407.43 215.37,-1587.24 205.49,-1441.14"/>
 <polygon fill="#000000" stroke="#000000" points="208.98,-1440.86 204.81,-1431.12 202,-1441.34 208.98,-1440.86"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="429,-2418 311,-2418 311,-2394 429,-2394 429,-2418"/>
-<text text-anchor="middle" x="370" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412.5,-2418 327.5,-2418 327.5,-2394 412.5,-2394 412.5,-2418"/>
+<text text-anchor="middle" x="370" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.79,-2400.26C302.07,-2396.96 294,-2392.1 288,-2385 272.21,-2366.32 215.84,-1585.09 205.6,-1441.54"/>
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.14,-2404.71C312.66,-2402.06 297.66,-2396.43 288,-2385 272.21,-2366.32 215.84,-1585.09 205.6,-1441.54"/>
 <polygon fill="#000000" stroke="#000000" points="209.07,-1441.03 204.87,-1431.31 202.09,-1441.53 209.07,-1441.03"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-2376 336,-2376 336,-2352 404,-2352 404,-2376"/>
-<text text-anchor="middle" x="370" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~symba_step.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="414,-2376 326,-2376 326,-2352 414,-2352 414,-2376"/>
+<text text-anchor="middle" x="370" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.9,-2363.96C319.03,-2362.09 299.66,-2356.73 288,-2343 257.8,-2307.43 213.44,-1579.12 205.31,-1441.37"/>
+<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M325.9,-2362.45C311.82,-2359.7 297.4,-2354.07 288,-2343 257.8,-2307.43 213.44,-1579.12 205.31,-1441.37"/>
 <polygon fill="#000000" stroke="#000000" points="208.79,-1440.96 204.71,-1431.18 201.8,-1441.37 208.79,-1440.96"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412.5,-2334 327.5,-2334 327.5,-2310 412.5,-2310 412.5,-2334"/>
-<text text-anchor="middle" x="370" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="441,-2334 299,-2334 299,-2310 441,-2310 441,-2334"/>
+<text text-anchor="middle" x="370" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.19,-2320.66C312.72,-2318.01 297.71,-2312.39 288,-2301 259.18,-2267.2 213.97,-1576.15 205.42,-1441.59"/>
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.77,-2310.26C294.77,-2307.7 291.11,-2304.65 288,-2301 259.18,-2267.2 213.97,-1576.15 205.42,-1441.59"/>
 <polygon fill="#000000" stroke="#000000" points="208.89,-1441.04 204.77,-1431.28 201.91,-1441.48 208.89,-1441.04"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403.5,-2292 336.5,-2292 336.5,-2268 403.5,-2268 403.5,-2292"/>
-<text text-anchor="middle" x="370" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-2292 336,-2292 336,-2268 404,-2268 404,-2292"/>
+<text text-anchor="middle" x="370" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.36,-2279.96C319.4,-2278.12 299.81,-2272.79 288,-2259 260.52,-2226.93 214.41,-1571.38 205.51,-1441.32"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.95,-2279.92C319.09,-2278.03 299.72,-2272.68 288,-2259 260.52,-2226.93 214.41,-1571.38 205.51,-1441.32"/>
 <polygon fill="#000000" stroke="#000000" points="208.98,-1440.75 204.81,-1431.01 202,-1441.22 208.98,-1440.75"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412.5,-2250 327.5,-2250 327.5,-2226 412.5,-2226 412.5,-2250"/>
-<text text-anchor="middle" x="370" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452,-2250 288,-2250 288,-2226 452,-2226 452,-2250"/>
+<text text-anchor="middle" x="370" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.25,-2236.61C312.78,-2233.95 297.76,-2228.34 288,-2217 235.88,-2156.48 209.73,-1563.95 204.85,-1441.19"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.45,-2225.99C294.57,-2223.49 291.03,-2220.52 288,-2217 235.88,-2156.48 209.73,-1563.95 204.85,-1441.19"/>
 <polygon fill="#000000" stroke="#000000" points="208.34,-1440.95 204.45,-1431.1 201.35,-1441.23 208.34,-1440.95"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409,-2208 331,-2208 331,-2184 409,-2184 409,-2208"/>
-<text text-anchor="middle" x="370" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-2208 336,-2208 336,-2184 404,-2184 404,-2208"/>
+<text text-anchor="middle" x="370" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.64,-2195.15C315.19,-2192.75 298.56,-2187.19 288,-2175 238.58,-2117.95 210.43,-1559.84 204.98,-1441.13"/>
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.6,-2195.82C318.86,-2193.88 299.7,-2188.51 288,-2175 238.58,-2117.95 210.43,-1559.84 204.98,-1441.13"/>
 <polygon fill="#000000" stroke="#000000" points="208.47,-1440.87 204.52,-1431.04 201.48,-1441.19 208.47,-1440.87"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="418,-2166 322,-2166 322,-2142 418,-2142 418,-2166"/>
-<text text-anchor="middle" x="370" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="421.5,-2166 318.5,-2166 318.5,-2142 421.5,-2142 421.5,-2166"/>
+<text text-anchor="middle" x="370" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M321.83,-2151.39C309.16,-2148.38 296.59,-2142.85 288,-2133 241.31,-2079.46 211.23,-1556.44 205.14,-1441.33"/>
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.46,-2150.53C306.95,-2147.36 295.83,-2141.98 288,-2133 241.31,-2079.46 211.23,-1556.44 205.14,-1441.33"/>
 <polygon fill="#000000" stroke="#000000" points="208.63,-1441.03 204.62,-1431.22 201.64,-1441.39 208.63,-1441.03"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409.5,-2124 330.5,-2124 330.5,-2100 409.5,-2100 409.5,-2124"/>
-<text text-anchor="middle" x="370" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405.5,-2124 334.5,-2124 334.5,-2100 405.5,-2100 405.5,-2124"/>
+<text text-anchor="middle" x="370" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.3,-2111.02C314.98,-2108.57 298.55,-2103.01 288,-2091 200.5,-1991.39 201.98,-1545.73 203.57,-1441.06"/>
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M334.45,-2111.61C318.02,-2109.53 299.5,-2104.1 288,-2091 200.5,-1991.39 201.98,-1545.73 203.57,-1441.06"/>
 <polygon fill="#000000" stroke="#000000" points="207.07,-1441.06 203.74,-1431.01 200.07,-1440.95 207.07,-1441.06"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="421.5,-2082 318.5,-2082 318.5,-2058 421.5,-2058 421.5,-2082"/>
-<text text-anchor="middle" x="370" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409,-2082 331,-2082 331,-2058 409,-2058 409,-2082"/>
+<text text-anchor="middle" x="370" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.13,-2066.33C306.78,-2063.15 295.8,-2057.81 288,-2049 205.93,-1956.34 203.19,-1542.22 203.77,-1441.25"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.77,-2069.04C315.34,-2066.62 298.69,-2061.07 288,-2049 205.93,-1956.34 203.19,-1542.22 203.77,-1441.25"/>
 <polygon fill="#000000" stroke="#000000" points="207.27,-1441.04 203.85,-1431.01 200.27,-1440.99 207.27,-1441.04"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406.5,-2040 333.5,-2040 333.5,-2016 406.5,-2016 406.5,-2040"/>
-<text text-anchor="middle" x="370" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-2040 342.5,-2040 342.5,-2016 397.5,-2016 397.5,-2040"/>
+<text text-anchor="middle" x="370" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.31,-2027.36C317.22,-2025.15 299.33,-2019.67 288,-2007 211.31,-1921.22 204.49,-1538.16 204.01,-1441.31"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.14,-2028.28C324.18,-2026.95 301.46,-2022.05 288,-2007 211.31,-1921.22 204.49,-1538.16 204.01,-1441.31"/>
 <polygon fill="#000000" stroke="#000000" points="207.51,-1441.17 203.97,-1431.18 200.51,-1441.19 207.51,-1441.17"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="417,-1998 323,-1998 323,-1974 417,-1974 417,-1998"/>
-<text text-anchor="middle" x="370" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="426,-1998 314,-1998 314,-1974 426,-1974 426,-1998"/>
+<text text-anchor="middle" x="370" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.9,-1983.4C309.94,-1980.42 296.96,-1974.92 288,-1965 216.7,-1886.11 205.89,-1534.21 204.28,-1441.47"/>
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.65,-1980.8C303.96,-1977.53 294.82,-1972.54 288,-1965 216.7,-1886.11 205.89,-1534.21 204.28,-1441.47"/>
 <polygon fill="#000000" stroke="#000000" points="207.78,-1441.2 204.12,-1431.25 200.78,-1441.31 207.78,-1441.2"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="411,-1956 329,-1956 329,-1932 411,-1932 411,-1956"/>
-<text text-anchor="middle" x="370" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="400,-1956 340,-1956 340,-1932 400,-1932 400,-1956"/>
+<text text-anchor="middle" x="370" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M328.87,-1942.52C314.07,-1939.91 298.4,-1934.36 288,-1923 222.02,-1850.9 207.39,-1529.54 204.59,-1441.41"/>
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M339.91,-1943.99C322.4,-1942.36 301.04,-1937.25 288,-1923 222.02,-1850.9 207.39,-1529.54 204.59,-1441.41"/>
 <polygon fill="#000000" stroke="#000000" points="208.09,-1441.1 204.29,-1431.21 201.09,-1441.31 208.09,-1441.1"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-1914 336,-1914 336,-1890 404,-1890 404,-1914"/>
-<text text-anchor="middle" x="370" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-1914 331.5,-1914 331.5,-1890 408.5,-1890 408.5,-1914"/>
+<text text-anchor="middle" x="370" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.97,-1901.49C319.33,-1899.45 300.16,-1894.09 288,-1881 227.27,-1815.61 208.98,-1524.16 204.95,-1441.14"/>
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.46,-1900.86C315.96,-1898.43 299.07,-1892.92 288,-1881 227.27,-1815.61 208.98,-1524.16 204.95,-1441.14"/>
 <polygon fill="#000000" stroke="#000000" points="208.45,-1440.88 204.49,-1431.05 201.45,-1441.2 208.45,-1440.88"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-1872 331.5,-1872 331.5,-1848 408.5,-1848 408.5,-1872"/>
-<text text-anchor="middle" x="370" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-1872 336,-1872 336,-1848 404,-1848 404,-1872"/>
+<text text-anchor="middle" x="370" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.14,-1858.7C315.78,-1856.22 299.08,-1850.72 288,-1839 232.62,-1780.41 210.79,-1519.75 205.41,-1441.37"/>
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.66,-1859.35C319.14,-1857.25 300.17,-1851.88 288,-1839 232.62,-1780.41 210.79,-1519.75 205.41,-1441.37"/>
 <polygon fill="#000000" stroke="#000000" points="208.89,-1440.92 204.73,-1431.17 201.9,-1441.38 208.89,-1440.92"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="407.5,-1830 332.5,-1830 332.5,-1806 407.5,-1806 407.5,-1830"/>
-<text text-anchor="middle" x="370" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="425.5,-1830 314.5,-1830 314.5,-1806 425.5,-1806 425.5,-1830"/>
+<text text-anchor="middle" x="370" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.09,-1816.72C316.52,-1814.28 299.4,-1808.81 288,-1797 237.91,-1745.13 212.78,-1514.75 205.96,-1441.47"/>
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M314.46,-1812.57C304.59,-1809.34 295.16,-1804.42 288,-1797 237.91,-1745.13 212.78,-1514.75 205.96,-1441.47"/>
 <polygon fill="#000000" stroke="#000000" points="209.41,-1440.75 205.02,-1431.11 202.43,-1441.38 209.41,-1440.75"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-1788 331.5,-1788 331.5,-1764 408.5,-1764 408.5,-1788"/>
-<text text-anchor="middle" x="370" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<text text-anchor="middle" x="370" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.41,-1774.44C316.09,-1771.92 299.35,-1766.45 288,-1755 243.09,-1709.7 214.92,-1508.66 206.59,-1441.17"/>
 <polygon fill="#000000" stroke="#000000" points="210.06,-1440.7 205.39,-1431.2 203.11,-1441.54 210.06,-1440.7"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="410,-1746 330,-1746 330,-1722 410,-1722 410,-1746"/>
-<text text-anchor="middle" x="370" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-1746 343,-1746 343,-1722 397,-1722 397,-1746"/>
+<text text-anchor="middle" x="370" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M329.93,-1731.97C315.1,-1729.3 299.13,-1723.86 288,-1713 210.67,-1637.55 203.21,-1496.25 203.39,-1441.49"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge29" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.76,-1733.69C325.09,-1732.08 302.45,-1727.1 288,-1713 210.67,-1637.55 203.21,-1496.25 203.39,-1441.49"/>
 <polygon fill="#000000" stroke="#000000" points="206.9,-1441.21 203.53,-1431.17 199.9,-1441.12 206.9,-1441.21"/>
 </g>
 <!-- sourcefile~util_set.f90 -->
@@ -750,54 +750,54 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge29" class="edge">
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge30" class="edge">
 <title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M337.9,-1690.92C321.21,-1688.78 301.38,-1683.5 288,-1671 220.78,-1608.21 207.31,-1490.28 204.65,-1441.26"/>
 <polygon fill="#000000" stroke="#000000" points="208.14,-1440.95 204.2,-1431.11 201.14,-1441.26 208.14,-1440.95"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452,-1662 288,-1662 288,-1638 452,-1638 452,-1662"/>
-<text text-anchor="middle" x="370" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406.5,-1662 333.5,-1662 333.5,-1638 406.5,-1638 406.5,-1662"/>
+<text text-anchor="middle" x="370" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.44,-1637.99C296.59,-1635.52 292.03,-1632.55 288,-1629 230.8,-1578.63 212.05,-1483.91 206.33,-1441.06"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.35,-1647.89C317.85,-1645.31 300.43,-1639.94 288,-1629 230.8,-1578.63 212.05,-1483.91 206.33,-1441.06"/>
 <polygon fill="#000000" stroke="#000000" points="209.8,-1440.61 205.11,-1431.11 202.85,-1441.46 209.8,-1440.61"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-1620 343,-1620 343,-1596 397,-1596 397,-1620"/>
-<text text-anchor="middle" x="370" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408,-1620 332,-1620 332,-1596 408,-1596 408,-1620"/>
+<text text-anchor="middle" x="370" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.79,-1606.72C325.58,-1604.65 303.47,-1599.52 288,-1587 240.91,-1548.89 217.93,-1477.61 208.86,-1441.38"/>
-<polygon fill="#000000" stroke="#000000" points="212.2,-1440.26 206.49,-1431.34 205.38,-1441.88 212.2,-1440.26"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.72,-1605.03C316.82,-1602.25 300.31,-1596.96 288,-1587 240.91,-1548.89 217.93,-1477.61 208.86,-1441.38"/>
+<polygon fill="#000000" stroke="#000000" points="212.2,-1440.26 206.49,-1431.34 205.38,-1441.88 212.2,-1440.26"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-1578 331.5,-1578 331.5,-1554 408.5,-1554 408.5,-1578"/>
-<text text-anchor="middle" x="370" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412,-1578 328,-1578 328,-1554 412,-1554 412,-1578"/>
+<text text-anchor="middle" x="370" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.5,-1562.1C316.9,-1559.16 300.67,-1554.01 288,-1545 250.41,-1518.26 224.89,-1468.99 212.55,-1440.63"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge70" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.78,-1561.31C314.19,-1558.26 299.6,-1553.25 288,-1545 250.41,-1518.26 224.89,-1468.99 212.55,-1440.63"/>
 <polygon fill="#000000" stroke="#000000" points="215.7,-1439.08 208.6,-1431.21 209.24,-1441.79 215.7,-1439.08"/>
 </g>
 <!-- sourcefile~util_append.f90 -->
@@ -815,544 +815,544 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.98,-1517.56C313.92,-1514.41 299.85,-1509.78 288,-1503 259.59,-1486.75 234.12,-1458.37 218.87,-1439.14"/>
 <polygon fill="#000000" stroke="#000000" points="221.49,-1436.8 212.6,-1431.02 215.94,-1441.08 221.49,-1436.8"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-1494 336,-1494 336,-1470 404,-1470 404,-1494"/>
-<text text-anchor="middle" x="370" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409.5,-1494 330.5,-1494 330.5,-1470 409.5,-1470 409.5,-1494"/>
+<text text-anchor="middle" x="370" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.8,-1475.06C320.95,-1471.53 303.37,-1466.76 288,-1461 269.67,-1454.13 250.05,-1444.46 234.39,-1436.13"/>
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.17,-1473.69C316.63,-1470.33 301.47,-1466.05 288,-1461 269.67,-1454.13 250.05,-1444.46 234.39,-1436.13"/>
 <polygon fill="#000000" stroke="#000000" points="235.66,-1432.84 225.2,-1431.16 232.33,-1439 235.66,-1432.84"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="400,-1452 340,-1452 340,-1428 400,-1428 400,-1452"/>
-<text text-anchor="middle" x="370" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409,-1452 331,-1452 331,-1428 409,-1428 409,-1452"/>
+<text text-anchor="middle" x="370" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M339.88,-1436.29C313.89,-1432.99 275.53,-1428.1 246.18,-1424.37"/>
-<polygon fill="#000000" stroke="#000000" points="246.57,-1420.89 236.21,-1423.1 245.69,-1427.83 246.57,-1420.89"/>
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.73,-1435.13C305.43,-1431.91 272.26,-1427.69 246.2,-1424.37"/>
+<polygon fill="#000000" stroke="#000000" points="246.59,-1420.89 236.23,-1423.1 245.71,-1427.84 246.59,-1420.89"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="422.5,-1410 317.5,-1410 317.5,-1386 422.5,-1386 422.5,-1410"/>
-<text text-anchor="middle" x="370" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-1410 343,-1410 343,-1386 397,-1386 397,-1410"/>
+<text text-anchor="middle" x="370" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.25,-1404.59C294.5,-1407.48 268.13,-1410.84 246.55,-1413.58"/>
-<polygon fill="#000000" stroke="#000000" points="245.86,-1410.14 236.38,-1414.88 246.75,-1417.09 245.86,-1410.14"/>
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.86,-1401.33C316.89,-1404.63 276.67,-1409.75 246.18,-1413.63"/>
+<polygon fill="#000000" stroke="#000000" points="245.73,-1410.16 236.25,-1414.9 246.61,-1417.1 245.73,-1410.16"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398.5,-1368 341.5,-1368 341.5,-1344 398.5,-1344 398.5,-1368"/>
-<text text-anchor="middle" x="370" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-1368 343,-1368 343,-1344 397,-1344 397,-1368"/>
+<text text-anchor="middle" x="370" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.39,-1361.19C325.44,-1364.67 305.19,-1369.92 288,-1377 270.87,-1384.06 268.51,-1389.61 252,-1398 248.86,-1399.59 245.58,-1401.19 242.27,-1402.74"/>
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.88,-1360.87C326.71,-1364.34 305.73,-1369.69 288,-1377 270.87,-1384.06 268.51,-1389.61 252,-1398 248.86,-1399.59 245.58,-1401.19 242.27,-1402.74"/>
 <polygon fill="#000000" stroke="#000000" points="240.59,-1399.66 232.93,-1406.99 243.49,-1406.03 240.59,-1399.66"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-1326 331.5,-1326 331.5,-1302 408.5,-1302 408.5,-1326"/>
-<text text-anchor="middle" x="370" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-1326 336,-1326 336,-1302 404,-1302 404,-1326"/>
+<text text-anchor="middle" x="370" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.17,-1317.47C316.53,-1320.34 300.35,-1325.56 288,-1335 262.38,-1354.58 275.99,-1376.45 252,-1398 249.84,-1399.94 247.48,-1401.72 244.99,-1403.35"/>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge39" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.64,-1316.65C319.89,-1319.31 301.62,-1324.59 288,-1335 262.38,-1354.58 275.99,-1376.45 252,-1398 249.84,-1399.94 247.48,-1401.72 244.99,-1403.35"/>
 <polygon fill="#000000" stroke="#000000" points="243.16,-1400.37 236.2,-1408.35 246.62,-1406.45 243.16,-1400.37"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-1284 336,-1284 336,-1260 404,-1260 404,-1284"/>
-<text text-anchor="middle" x="370" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="411,-1284 329,-1284 329,-1260 411,-1260 411,-1284"/>
+<text text-anchor="middle" x="370" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.94,-1273.4C319.7,-1275.71 300.9,-1281.06 288,-1293 251.81,-1326.52 285.42,-1361.71 252,-1398 249.98,-1400.2 247.69,-1402.17 245.23,-1403.95"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M328.97,-1274.56C314.53,-1277.34 299.08,-1282.73 288,-1293 251.81,-1326.52 285.42,-1361.71 252,-1398 249.98,-1400.2 247.69,-1402.17 245.23,-1403.95"/>
 <polygon fill="#000000" stroke="#000000" points="243.14,-1401.12 236.36,-1409.27 246.74,-1407.13 243.14,-1401.12"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-1242 327,-1242 327,-1218 413,-1218 413,-1242"/>
-<text text-anchor="middle" x="370" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="419,-1242 321,-1242 321,-1218 419,-1218 419,-1242"/>
+<text text-anchor="middle" x="370" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.79,-1232.37C312.79,-1235.19 298.2,-1240.66 288,-1251 240.76,-1298.88 295.3,-1346.52 252,-1398 250.02,-1400.35 247.73,-1402.44 245.25,-1404.31"/>
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge41" class="edge">
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.89,-1233.72C308.79,-1236.82 296.77,-1242.11 288,-1251 240.76,-1298.88 295.3,-1346.52 252,-1398 250.02,-1400.35 247.73,-1402.44 245.25,-1404.31"/>
 <polygon fill="#000000" stroke="#000000" points="242.93,-1401.62 236.21,-1409.82 246.57,-1407.6 242.93,-1401.62"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-1200 327,-1200 327,-1176 413,-1176 413,-1200"/>
-<text text-anchor="middle" x="370" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409.5,-1200 330.5,-1200 330.5,-1176 409.5,-1176 409.5,-1200"/>
+<text text-anchor="middle" x="370" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.91,-1190C312.75,-1192.76 298.03,-1198.29 288,-1209 229.55,-1271.41 305.32,-1331.15 252,-1398 250.09,-1400.4 247.84,-1402.53 245.39,-1404.43"/>
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge42" class="edge">
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.26,-1189.39C315.12,-1191.92 298.82,-1197.44 288,-1209 229.55,-1271.41 305.32,-1331.15 252,-1398 250.09,-1400.4 247.84,-1402.53 245.39,-1404.43"/>
 <polygon fill="#000000" stroke="#000000" points="243.07,-1401.74 236.42,-1409.98 246.76,-1407.69 243.07,-1401.74"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-1158 334,-1158 334,-1134 406,-1134 406,-1158"/>
-<text text-anchor="middle" x="370" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="432,-1158 308,-1158 308,-1134 432,-1134 432,-1158"/>
+<text text-anchor="middle" x="370" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.79,-1146.65C317.61,-1148.84 299.51,-1154.29 288,-1167 218.26,-1244.02 315.42,-1315.69 252,-1398 249.95,-1400.67 247.48,-1403 244.77,-1405.04"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.93,-1153.38C300.41,-1156.57 293.46,-1160.97 288,-1167 218.26,-1244.02 315.42,-1315.69 252,-1398 249.95,-1400.67 247.48,-1403 244.77,-1405.04"/>
 <polygon fill="#000000" stroke="#000000" points="242.79,-1402.15 236.06,-1410.33 246.42,-1408.14 242.79,-1402.15"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412,-1116 328,-1116 328,-1092 412,-1092 412,-1116"/>
-<text text-anchor="middle" x="370" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-1116 336,-1116 336,-1092 404,-1092 404,-1116"/>
+<text text-anchor="middle" x="370" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.83,-1105.45C313.25,-1108.09 298.01,-1113.68 288,-1125 206.92,-1216.68 325.55,-1300.18 252,-1398 249.98,-1400.69 247.54,-1403.04 244.84,-1405.09"/>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.71,-1104.28C319,-1106.24 299.84,-1111.61 288,-1125 206.92,-1216.68 325.55,-1300.18 252,-1398 249.98,-1400.69 247.54,-1403.04 244.84,-1405.09"/>
 <polygon fill="#000000" stroke="#000000" points="242.86,-1402.2 236.15,-1410.41 246.51,-1408.18 242.86,-1402.2"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-1074 342.5,-1074 342.5,-1050 397.5,-1050 397.5,-1074"/>
-<text text-anchor="middle" x="370" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-1074 331.5,-1074 331.5,-1050 408.5,-1050 408.5,-1074"/>
+<text text-anchor="middle" x="370" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.4,-1061.57C324.32,-1062.81 301.34,-1067.65 288,-1083 195.57,-1189.36 335.71,-1284.65 252,-1398 250,-1400.71 247.58,-1403.07 244.89,-1405.13"/>
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge45" class="edge">
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.49,-1062.74C315.81,-1065.07 298.77,-1070.61 288,-1083 195.57,-1189.36 335.71,-1284.65 252,-1398 250,-1400.71 247.58,-1403.07 244.89,-1405.13"/>
 <polygon fill="#000000" stroke="#000000" points="242.91,-1402.24 236.22,-1410.46 246.58,-1408.21 242.91,-1402.24"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405.5,-1032 334.5,-1032 334.5,-1008 405.5,-1008 405.5,-1032"/>
-<text text-anchor="middle" x="370" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-1032 336,-1032 336,-1008 404,-1008 404,-1032"/>
+<text text-anchor="middle" x="370" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M334.32,-1020.28C317.85,-1022.32 299.35,-1027.77 288,-1041 236.1,-1101.53 298.94,-1333.55 252,-1398 250.02,-1400.72 247.61,-1403.09 244.93,-1405.16"/>
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge46" class="edge">
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.95,-1020.08C319.1,-1021.97 299.73,-1027.32 288,-1041 236.1,-1101.53 298.94,-1333.55 252,-1398 250.02,-1400.72 247.61,-1403.09 244.93,-1405.16"/>
 <polygon fill="#000000" stroke="#000000" points="242.95,-1402.27 236.28,-1410.5 246.63,-1408.23 242.95,-1402.27"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-990 343,-990 343,-966 397,-966 397,-990"/>
-<text text-anchor="middle" x="370" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408.5,-990 331.5,-990 331.5,-966 408.5,-966 408.5,-990"/>
+<text text-anchor="middle" x="370" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.67,-977.45C324.48,-978.6 301.25,-983.38 288,-999 230.41,-1066.89 304.03,-1325.76 252,-1398 250.03,-1400.73 247.63,-1403.11 244.96,-1405.18"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge47" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.35,-978.62C315.65,-980.92 298.62,-986.48 288,-999 230.41,-1066.89 304.03,-1325.76 252,-1398 250.03,-1400.73 247.63,-1403.11 244.96,-1405.18"/>
 <polygon fill="#000000" stroke="#000000" points="242.98,-1402.29 236.32,-1410.53 246.67,-1408.25 242.98,-1402.29"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409.5,-948 330.5,-948 330.5,-924 409.5,-924 409.5,-948"/>
-<text text-anchor="middle" x="370" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-948 327,-948 327,-924 413,-924 413,-948"/>
+<text text-anchor="middle" x="370" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.47,-936.7C314.99,-939.07 298.38,-944.66 288,-957 224.71,-1032.25 309.12,-1317.97 252,-1398 250.04,-1400.74 247.65,-1403.13 244.99,-1405.2"/>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge48" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.68,-937.34C312.33,-940.02 297.54,-945.66 288,-957 224.71,-1032.25 309.12,-1317.97 252,-1398 250.04,-1400.74 247.65,-1403.13 244.99,-1405.2"/>
 <polygon fill="#000000" stroke="#000000" points="243.01,-1402.31 236.36,-1410.56 246.7,-1408.26 243.01,-1402.31"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~discard.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-906 343,-906 343,-882 397,-882 397,-906"/>
-<text text-anchor="middle" x="370" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~discard.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="402.5,-906 337.5,-906 337.5,-882 402.5,-882 402.5,-906"/>
+<text text-anchor="middle" x="370" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.98,-893.36C324.7,-894.44 301.22,-899.17 288,-915 219.01,-997.61 314.22,-1310.18 252,-1398 250.05,-1400.75 247.67,-1403.14 245.01,-1405.22"/>
+<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge49" class="edge">
+<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M337.44,-893.8C320.17,-895.48 299.92,-900.73 288,-915 219.01,-997.61 314.22,-1310.18 252,-1398 250.05,-1400.75 247.67,-1403.14 245.01,-1405.22"/>
 <polygon fill="#000000" stroke="#000000" points="243.03,-1402.33 236.39,-1410.58 246.73,-1408.27 243.03,-1402.33"/>
 </g>
-<!-- sourcefile~discard.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~discard.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="402.5,-864 337.5,-864 337.5,-840 402.5,-840 402.5,-864"/>
-<text text-anchor="middle" x="370" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-864 342.5,-864 342.5,-840 397.5,-840 397.5,-864"/>
+<text text-anchor="middle" x="370" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M337.41,-851.77C320.13,-853.44 299.88,-858.69 288,-873 213.31,-962.98 319.32,-1302.38 252,-1398 250.06,-1400.75 247.68,-1403.15 245.03,-1405.23"/>
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge50" class="edge">
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.18,-851.39C324,-852.54 300.99,-857.35 288,-873 213.31,-962.98 319.32,-1302.38 252,-1398 250.06,-1400.75 247.68,-1403.15 245.03,-1405.23"/>
 <polygon fill="#000000" stroke="#000000" points="243.05,-1402.34 236.41,-1410.6 246.75,-1408.28 243.05,-1402.34"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="412.5,-822 327.5,-822 327.5,-798 412.5,-798 412.5,-822"/>
-<text text-anchor="middle" x="370" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<text text-anchor="middle" x="370" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge51" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.42,-811.1C312.79,-813.7 297.62,-819.35 288,-831 207.61,-928.35 324.42,-1294.58 252,-1398 250.07,-1400.76 247.69,-1403.16 245.04,-1405.24"/>
 <polygon fill="#000000" stroke="#000000" points="243.07,-1402.35 236.43,-1410.61 246.77,-1408.29 243.07,-1402.35"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="421.5,-780 318.5,-780 318.5,-756 421.5,-756 421.5,-780"/>
-<text text-anchor="middle" x="370" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="417.5,-780 322.5,-780 322.5,-756 417.5,-756 417.5,-780"/>
+<text text-anchor="middle" x="370" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.09,-771.16C306.59,-774.34 295.57,-779.8 288,-789 201.91,-893.72 329.52,-1286.78 252,-1398 250.08,-1400.76 247.7,-1403.16 245.06,-1405.25"/>
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge52" class="edge">
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.31,-770.1C309.34,-773.06 296.49,-778.68 288,-789 201.91,-893.72 329.52,-1286.78 252,-1398 250.08,-1400.76 247.7,-1403.16 245.06,-1405.25"/>
 <polygon fill="#000000" stroke="#000000" points="243.08,-1402.36 236.45,-1410.62 246.79,-1408.3 243.08,-1402.36"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-738 336,-738 336,-714 404,-714 404,-738"/>
-<text text-anchor="middle" x="370" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="418,-738 322,-738 322,-714 418,-714 418,-738"/>
+<text text-anchor="middle" x="370" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.71,-725.88C318.77,-727.7 299.41,-733.06 288,-747 196.2,-859.1 334.62,-1278.98 252,-1398 250.08,-1400.76 247.71,-1403.17 245.07,-1405.26"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge53" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M321.87,-728.18C309.03,-731.16 296.38,-736.77 288,-747 196.2,-859.1 334.62,-1278.98 252,-1398 250.08,-1400.76 247.71,-1403.17 245.07,-1405.26"/>
 <polygon fill="#000000" stroke="#000000" points="243.09,-1402.37 236.47,-1410.63 246.8,-1408.3 243.09,-1402.37"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-696 342.5,-696 342.5,-672 397.5,-672 397.5,-696"/>
-<text text-anchor="middle" x="370" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-696 343,-696 343,-672 397,-672 397,-696"/>
+<text text-anchor="middle" x="370" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.49,-683.3C324.21,-684.37 300.95,-689.13 288,-705 190.5,-824.47 339.73,-1271.18 252,-1398 250.09,-1400.77 247.72,-1403.17 245.08,-1405.27"/>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge54" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.88,-683.28C324.54,-684.3 301.04,-689.02 288,-705 190.5,-824.47 339.73,-1271.18 252,-1398 250.09,-1400.77 247.72,-1403.17 245.08,-1405.27"/>
 <polygon fill="#000000" stroke="#000000" points="243.1,-1402.37 236.48,-1410.64 246.81,-1408.31 243.1,-1402.37"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-654 343,-654 343,-630 397,-630 397,-654"/>
-<text text-anchor="middle" x="370" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406.5,-654 333.5,-654 333.5,-630 406.5,-630 406.5,-654"/>
+<text text-anchor="middle" x="370" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.86,-641.27C324.52,-642.29 301.02,-647 288,-663 236.39,-726.42 298.41,-1330.69 252,-1398 249.98,-1400.93 247.45,-1403.46 244.62,-1405.64"/>
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.2,-642.14C316.87,-644.2 298.82,-649.7 288,-663 236.39,-726.42 298.41,-1330.69 252,-1398 249.98,-1400.93 247.45,-1403.46 244.62,-1405.64"/>
 <polygon fill="#000000" stroke="#000000" points="242.72,-1402.7 236,-1410.89 246.36,-1408.68 242.72,-1402.7"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-612 327,-612 327,-588 413,-588 413,-612"/>
-<text text-anchor="middle" x="370" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412.5,-612 327.5,-612 327.5,-588 412.5,-588 412.5,-612"/>
+<text text-anchor="middle" x="370" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.89,-601.09C312.38,-603.71 297.43,-609.38 288,-621 233.54,-688.11 300.97,-1326.78 252,-1398 249.98,-1400.94 247.45,-1403.47 244.62,-1405.65"/>
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.31,-601.01C312.67,-603.6 297.52,-609.27 288,-621 233.54,-688.11 300.97,-1326.78 252,-1398 249.98,-1400.94 247.45,-1403.47 244.62,-1405.65"/>
 <polygon fill="#000000" stroke="#000000" points="242.72,-1402.71 236.01,-1410.9 246.37,-1408.68 242.72,-1402.71"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-570 327,-570 327,-546 413,-546 413,-570"/>
-<text text-anchor="middle" x="370" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398.5,-570 341.5,-570 341.5,-546 398.5,-546 398.5,-570"/>
+<text text-anchor="middle" x="370" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.87,-559.07C312.37,-561.7 297.41,-567.37 288,-579 230.69,-649.8 303.52,-1322.88 252,-1398 249.98,-1400.94 247.46,-1403.47 244.63,-1405.65"/>
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M341.28,-557.34C323.17,-558.53 300.61,-563.42 288,-579 230.69,-649.8 303.52,-1322.88 252,-1398 249.98,-1400.94 247.46,-1403.47 244.63,-1405.65"/>
 <polygon fill="#000000" stroke="#000000" points="242.73,-1402.71 236.02,-1410.91 246.38,-1408.68 242.73,-1402.71"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="417.5,-528 322.5,-528 322.5,-504 417.5,-504 417.5,-528"/>
-<text text-anchor="middle" x="370" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="400,-528 340,-528 340,-504 400,-504 400,-528"/>
+<text text-anchor="middle" x="370" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.2,-518.01C309.22,-520.97 296.4,-526.6 288,-537 227.83,-611.49 306.07,-1318.98 252,-1398 249.99,-1400.94 247.47,-1403.47 244.64,-1405.66"/>
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M339.68,-515.44C321.85,-516.81 300.23,-521.86 288,-537 227.83,-611.49 306.07,-1318.98 252,-1398 249.99,-1400.94 247.47,-1403.47 244.64,-1405.66"/>
 <polygon fill="#000000" stroke="#000000" points="242.74,-1402.71 236.03,-1410.92 246.39,-1408.69 242.74,-1402.71"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="441,-486 299,-486 299,-462 441,-462 441,-486"/>
-<text text-anchor="middle" x="370" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-486 334,-486 334,-462 406,-462 406,-486"/>
+<text text-anchor="middle" x="370" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M298.9,-485.31C294.81,-487.96 291.1,-491.15 288,-495 224.98,-573.17 308.62,-1315.08 252,-1398 249.99,-1400.94 247.47,-1403.48 244.64,-1405.66"/>
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M333.97,-473.99C317.42,-475.97 298.94,-481.43 288,-495 224.98,-573.17 308.62,-1315.08 252,-1398 249.99,-1400.94 247.47,-1403.48 244.64,-1405.66"/>
 <polygon fill="#000000" stroke="#000000" points="242.75,-1402.72 236.04,-1410.92 246.4,-1408.69 242.75,-1402.72"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="400,-444 340,-444 340,-420 400,-420 400,-444"/>
-<text text-anchor="middle" x="370" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="445,-444 295,-444 295,-420 445,-420 445,-444"/>
+<text text-anchor="middle" x="370" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M339.66,-431.43C321.83,-432.79 300.2,-437.83 288,-453 222.13,-534.86 311.18,-1311.17 252,-1398 249.99,-1400.95 247.47,-1403.48 244.65,-1405.66"/>
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.82,-444.02C294.15,-446.52 290.82,-449.49 288,-453 222.13,-534.86 311.18,-1311.17 252,-1398 249.99,-1400.95 247.47,-1403.48 244.65,-1405.66"/>
 <polygon fill="#000000" stroke="#000000" points="242.75,-1402.72 236.05,-1410.93 246.4,-1408.69 242.75,-1402.72"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
+<!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="411.5,-402 328.5,-402 328.5,-378 411.5,-378 411.5,-402"/>
-<text text-anchor="middle" x="370" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-402 327,-402 327,-378 413,-378 413,-402"/>
+<text text-anchor="middle" x="370" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M328.09,-390.82C313.19,-393.33 297.64,-399 288,-411 219.27,-496.55 313.73,-1307.27 252,-1398 249.99,-1400.95 247.48,-1403.48 244.66,-1405.67"/>
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.83,-391.04C312.31,-393.66 297.37,-399.33 288,-411 219.27,-496.55 313.73,-1307.27 252,-1398 249.99,-1400.95 247.48,-1403.48 244.66,-1405.67"/>
 <polygon fill="#000000" stroke="#000000" points="242.76,-1402.73 236.05,-1410.93 246.41,-1408.7 242.76,-1402.73"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="419,-360 321,-360 321,-336 419,-336 419,-360"/>
-<text text-anchor="middle" x="370" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="411.5,-360 328.5,-360 328.5,-336 411.5,-336 411.5,-360"/>
+<text text-anchor="middle" x="370" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M320.89,-350.27C308.35,-353.3 296.09,-358.91 288,-369 216.42,-458.24 316.28,-1303.36 252,-1398 250,-1400.95 247.48,-1403.49 244.66,-1405.67"/>
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M328.09,-348.81C313.18,-351.32 297.64,-356.99 288,-369 216.42,-458.24 316.28,-1303.36 252,-1398 250,-1400.95 247.48,-1403.49 244.66,-1405.67"/>
 <polygon fill="#000000" stroke="#000000" points="242.76,-1402.73 236.06,-1410.93 246.42,-1408.7 242.76,-1402.73"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="417,-318 323,-318 323,-294 417,-294 417,-318"/>
-<text text-anchor="middle" x="370" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412.5,-318 327.5,-318 327.5,-294 412.5,-294 412.5,-318"/>
+<text text-anchor="middle" x="370" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M323,-307.78C309.73,-310.68 296.54,-316.34 288,-327 213.56,-419.93 318.84,-1299.46 252,-1398 250,-1400.95 247.49,-1403.49 244.66,-1405.67"/>
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.23,-306.95C312.58,-309.53 297.45,-315.21 288,-327 213.56,-419.93 318.84,-1299.46 252,-1398 250,-1400.95 247.49,-1403.49 244.66,-1405.67"/>
 <polygon fill="#000000" stroke="#000000" points="242.77,-1402.73 236.07,-1410.94 246.42,-1408.7 242.77,-1402.73"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408,-276 332,-276 332,-252 408,-252 408,-276"/>
-<text text-anchor="middle" x="370" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="413,-276 327,-276 327,-252 413,-252 413,-276"/>
+<text text-anchor="middle" x="370" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.85,-264.22C315.84,-266.39 298.44,-271.95 288,-285 210.71,-381.62 321.39,-1295.56 252,-1398 250,-1400.95 247.49,-1403.49 244.67,-1405.68"/>
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.8,-265.02C312.29,-267.63 297.35,-273.32 288,-285 210.71,-381.62 321.39,-1295.56 252,-1398 250,-1400.95 247.49,-1403.49 244.67,-1405.68"/>
 <polygon fill="#000000" stroke="#000000" points="242.77,-1402.73 236.07,-1410.94 246.43,-1408.7 242.77,-1402.73"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409.5,-234 330.5,-234 330.5,-210 409.5,-210 409.5,-234"/>
-<text text-anchor="middle" x="370" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="407.5,-234 332.5,-234 332.5,-210 407.5,-210 407.5,-234"/>
+<text text-anchor="middle" x="370" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.17,-222.45C314.63,-224.78 298.07,-230.4 288,-243 207.85,-343.31 323.94,-1291.65 252,-1398 250,-1400.95 247.49,-1403.49 244.67,-1405.68"/>
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.26,-222.16C316.14,-224.29 298.52,-229.83 288,-243 207.85,-343.31 323.94,-1291.65 252,-1398 250,-1400.95 247.49,-1403.49 244.67,-1405.68"/>
 <polygon fill="#000000" stroke="#000000" points="242.77,-1402.74 236.08,-1410.95 246.43,-1408.71 242.77,-1402.74"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="408,-192 332,-192 332,-168 408,-168 408,-192"/>
-<text text-anchor="middle" x="370" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="409.5,-192 330.5,-192 330.5,-168 409.5,-168 409.5,-192"/>
+<text text-anchor="middle" x="370" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M331.84,-180.21C315.83,-182.38 298.42,-187.94 288,-201 205,-305 326.5,-1287.75 252,-1398 250,-1400.95 247.49,-1403.49 244.68,-1405.68"/>
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-180.45C314.62,-182.77 298.06,-188.4 288,-201 205,-305 326.5,-1287.75 252,-1398 250,-1400.95 247.49,-1403.49 244.68,-1405.68"/>
 <polygon fill="#000000" stroke="#000000" points="242.78,-1402.74 236.08,-1410.95 246.44,-1408.71 242.78,-1402.74"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="432,-150 308,-150 308,-126 432,-126 432,-150"/>
-<text text-anchor="middle" x="370" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="429,-150 311,-150 311,-126 429,-126 429,-150"/>
+<text text-anchor="middle" x="370" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.62,-144.6C300.04,-147.89 293.16,-152.53 288,-159 202.14,-266.69 329.05,-1283.84 252,-1398 250.01,-1400.95 247.5,-1403.5 244.68,-1405.68"/>
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.84,-143.3C302.01,-146.63 293.89,-151.62 288,-159 202.14,-266.69 329.05,-1283.84 252,-1398 250.01,-1400.95 247.5,-1403.5 244.68,-1405.68"/>
 <polygon fill="#000000" stroke="#000000" points="242.78,-1402.74 236.08,-1410.95 246.44,-1408.71 242.78,-1402.74"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397,-108 343,-108 343,-84 397,-84 397,-108"/>
-<text text-anchor="middle" x="370" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="417,-108 323,-108 323,-84 417,-84 417,-108"/>
+<text text-anchor="middle" x="370" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M342.76,-95.18C324.37,-96.17 300.85,-100.86 288,-117 199.29,-228.38 331.6,-1279.94 252,-1398 250.01,-1400.96 247.5,-1403.5 244.68,-1405.69"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge28" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.96,-97.75C309.69,-100.65 296.51,-106.32 288,-117 199.29,-228.38 331.6,-1279.94 252,-1398 250.01,-1400.96 247.5,-1403.5 244.68,-1405.69"/>
 <polygon fill="#000000" stroke="#000000" points="242.78,-1402.74 236.09,-1410.95 246.44,-1408.71 242.78,-1402.74"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="404,-66 336,-66 336,-42 404,-42 404,-66"/>
-<text text-anchor="middle" x="370" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="417,-66 323,-66 323,-42 417,-42 417,-66"/>
+<text text-anchor="middle" x="370" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge69" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M335.96,-53.71C318.88,-55.45 299.31,-60.79 288,-75 196.43,-190.07 334.16,-1276.04 252,-1398 250.01,-1400.96 247.5,-1403.5 244.68,-1405.69"/>
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.96,-55.75C309.68,-58.65 296.5,-64.31 288,-75 196.43,-190.07 334.16,-1276.04 252,-1398 250.01,-1400.96 247.5,-1403.5 244.68,-1405.69"/>
 <polygon fill="#000000" stroke="#000000" points="242.79,-1402.75 236.09,-1410.96 246.45,-1408.71 242.79,-1402.75"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_node70" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412.5,-24 327.5,-24 327.5,0 412.5,0 412.5,-24"/>
-<text text-anchor="middle" x="370" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~swiftest_operators.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="410,-24 330,-24 330,0 410,0 410,-24"/>
+<text text-anchor="middle" x="370" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge70" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.19,-12.91C312.53,-15.49 297.4,-21.17 288,-33 193.58,-151.76 336.71,-1272.13 252,-1398 250.01,-1400.96 247.5,-1403.5 244.69,-1405.69"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~swiftest_operators.f90~~AfferentGraph_edge38" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M329.72,-12.5C314.3,-14.86 297.95,-20.49 288,-33 193.58,-151.76 336.71,-1272.13 252,-1398 250.01,-1400.96 247.5,-1403.5 244.69,-1405.69"/>
 <polygon fill="#000000" stroke="#000000" points="242.79,-1402.75 236.1,-1410.96 246.45,-1408.71 242.79,-1402.75"/>
 </g>
 </g>
diff --git a/docs/sourcefile/symba_classes.f90.html b/docs/sourcefile/symba_classes.f90.html
index 41fb411a0..93e99b195 100644
--- a/docs/sourcefile/symba_classes.f90.html
+++ b/docs/sourcefile/symba_classes.f90.html
@@ -134,7 +134,7 @@ <h1>symba_classes.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 3.5% of total for source files.">566 statements</a>
+    title=" 3.4% of total for source files.">565 statements</a>
      </li> 
      
      
@@ -226,161 +226,134 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_classes.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_classesf90EfferentGraph" width="641pt" height="196pt"
- viewBox="0.00 0.00 641.00 195.55" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph" class="graph" transform="scale(0.96 0.96) rotate(0) translate(4 199.78)">
+<svg id="sourcefilesymba_classesf90EfferentGraph" width="641pt" height="141pt"
+ viewBox="0.00 0.00 641.00 140.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_classes.f90~~EfferentGraph" class="graph" transform="scale(0.96 0.96) rotate(0) translate(4 142.45)">
 <title>sourcefile~~symba_classes.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-199.78 664,-199.78 664,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-142.45 663,-142.45 663,4 -4,4"/>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_classes.f90</title>
-<polygon fill="none" stroke="black" points="660,-77.03 557,-77.03 557,-53.03 660,-53.03 660,-77.03"/>
-<text text-anchor="middle" x="608.5" y="-62.63" font-family="Helvetica,sans-Serif" font-size="10.50">symba_classes.f90</text>
+<polygon fill="none" stroke="black" points="659,-58.45 556,-58.45 556,-34.45 659,-34.45 659,-58.45"/>
+<text text-anchor="middle" x="607.5" y="-44.05" font-family="Helvetica,sans-Serif" font-size="10.50">symba_classes.f90</text>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_node2" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-77.03 142,-77.03 142,-53.03 249,-53.03 249,-77.03"/>
-<text text-anchor="middle" x="195.5" y="-62.63" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="390,-138.45 285,-138.45 285,-114.45 390,-114.45 390,-138.45"/>
+<text text-anchor="middle" x="337.5" y="-124.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge1" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M593.15,-77.04C569.97,-95.56 522.07,-130.27 474.5,-143.03"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M472.5,-143.03C466.93,-144.52 324.78,-102.98 246.72,-79.92"/>
-<polygon fill="#000000" stroke="#000000" points="247.65,-76.55 237.07,-77.07 245.67,-83.26 247.65,-76.55"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M472,-86.45C442.07,-93.08 409.07,-102.94 383.37,-111.21"/>
+<polygon fill="#000000" stroke="#000000" points="381.97,-107.99 373.54,-114.41 384.14,-114.65 381.97,-107.99"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="521,-35.03 426,-35.03 426,-11.03 521,-11.03 521,-35.03"/>
-<text text-anchor="middle" x="473.5" y="-20.63" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="520,-58.45 426,-58.45 426,-34.45 520,-34.45 520,-58.45"/>
+<text text-anchor="middle" x="473" y="-44.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M569.39,-52.99C554.78,-48.38 537.92,-43.06 522.5,-38.19"/>
-<polygon fill="#000000" stroke="#000000" points="523.21,-34.74 512.62,-35.07 521.1,-41.42 523.21,-34.74"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.65,-46.45C547.35,-46.45 538.71,-46.45 530.28,-46.45"/>
+<polygon fill="#000000" stroke="#000000" points="530.16,-42.95 520.16,-46.45 530.16,-49.95 530.16,-42.95"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_node4" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
 <g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-77.03 0,-77.03 0,-53.03 106,-53.03 106,-77.03"/>
-<text text-anchor="middle" x="53" y="-62.63" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-98.45 0,-98.45 0,-74.45 106,-74.45 106,-98.45"/>
+<text text-anchor="middle" x="53" y="-84.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M472.5,-143.03C352.9,-175.57 315.76,-216.79 196.5,-183.03"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.5,-6.45C274.44,-1.9 257.65,5.04 196.5,-6.45"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M194.5,-6.45C148.15,-15.17 102.13,-46.9 75.96,-67.68"/>
+<polygon fill="#000000" stroke="#000000" points="73.42,-65.24 67.88,-74.26 77.84,-70.67 73.42,-65.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M561.84,-34.4C548.46,-31.12 533.7,-27.82 520,-25.45 440.08,-11.63 419.39,-12.39 338.5,-6.45"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="520.5,-77.03 426.5,-77.03 426.5,-53.03 520.5,-53.03 520.5,-77.03"/>
-<text text-anchor="middle" x="473.5" y="-62.63" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-98.45 142,-98.45 142,-74.45 249,-74.45 249,-98.45"/>
+<text text-anchor="middle" x="195.5" y="-84.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.84,-65.03C548.29,-65.03 539.37,-65.03 530.69,-65.03"/>
-<polygon fill="#000000" stroke="#000000" points="530.65,-61.53 520.65,-65.03 530.65,-68.53 530.65,-61.53"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="390,-155.03 285,-155.03 285,-131.03 390,-131.03 390,-155.03"/>
-<text text-anchor="middle" x="337.5" y="-140.63" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M571.73,-58.52C545.22,-67.34 507.67,-79 474,-86.45"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M472,-86.45C414.07,-99.27 397.67,-82.11 338.5,-86.45"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M472.5,-143.03C449.4,-149.22 423.25,-150.44 400.22,-149.68"/>
-<polygon fill="#000000" stroke="#000000" points="400.37,-146.19 390.22,-149.23 400.05,-153.18 400.37,-146.19"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.65,-123.33C245.32,-120.49 190.02,-115.49 142,-107.45 131.33,-105.67 120.02,-103.32 109.2,-100.84"/>
+<polygon fill="#000000" stroke="#000000" points="109.97,-97.43 99.43,-98.55 108.36,-104.24 109.97,-97.43"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-65.03C133.48,-65.03 124.83,-65.03 116.33,-65.03"/>
-<polygon fill="#000000" stroke="#000000" points="116.08,-61.53 106.08,-65.03 116.08,-68.53 116.08,-61.53"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.5,-114.45C280.09,-110.34 263.8,-105.68 248.69,-101.36"/>
+<polygon fill="#000000" stroke="#000000" points="249.54,-97.97 238.96,-98.58 247.61,-104.7 249.54,-97.97"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M194.5,-25.03C160.71,-29.68 123.65,-40.49 96.08,-49.69"/>
-<polygon fill="#000000" stroke="#000000" points="94.71,-46.46 86.37,-53 96.97,-53.09 94.71,-46.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M428.72,-11.01C416.3,-8.13 402.71,-5.47 390,-4.03 343.63,1.24 331.35,1.39 285,-4.03 244.85,-8.73 236.55,-19.52 196.5,-25.03"/>
-</g>
-<!-- sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="384.5,-37.03 290.5,-37.03 290.5,-13.03 384.5,-13.03 384.5,-37.03"/>
-<text text-anchor="middle" x="337.5" y="-22.63" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.63,-23.73C415.67,-23.88 405.05,-24.04 394.78,-24.19"/>
-<polygon fill="#000000" stroke="#000000" points="394.61,-20.69 384.66,-24.34 394.71,-27.69 394.61,-20.69"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.54,-34.38C418.01,-23.65 376.38,-9.23 338.5,-6.45"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.5,-65.03C311.25,-63.26 283.38,-62.93 259.2,-63.16"/>
-<polygon fill="#000000" stroke="#000000" points="259.03,-59.66 249.08,-63.29 259.13,-66.66 259.03,-59.66"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.54,-58.52C418.01,-69.26 376.38,-83.67 338.5,-86.45"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.5,-86.45C311.26,-88.31 283.39,-88.65 259.21,-88.41"/>
+<polygon fill="#000000" stroke="#000000" points="259.13,-84.91 249.09,-88.27 259.04,-91.91 259.13,-84.91"/>
+</g>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_classes.f90~~EfferentGraph_node6" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="384.5,-58.45 290.5,-58.45 290.5,-34.45 384.5,-34.45 384.5,-58.45"/>
+<text text-anchor="middle" x="337.5" y="-44.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.5,-65.03C271.95,-60.51 260.61,-16.2 196.5,-25.03"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M426.24,-66.62C400.4,-67.11 367.62,-67.07 338.5,-65.03"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge7" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432.3,-53.03C418.64,-48.95 403.21,-44.35 388.86,-40.06"/>
-<polygon fill="#000000" stroke="#000000" points="389.72,-36.67 379.14,-37.16 387.72,-43.37 389.72,-36.67"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M425.68,-46.45C415.74,-46.45 405.13,-46.45 394.86,-46.45"/>
+<polygon fill="#000000" stroke="#000000" points="394.74,-42.95 384.74,-46.45 394.74,-49.95 394.74,-42.95"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.71,-130.91C303.18,-126.64 293.62,-121.73 285,-117.03 264.8,-106.01 242.47,-92.88 225.29,-82.57"/>
-<polygon fill="#000000" stroke="#000000" points="226.7,-79.33 216.33,-77.17 223.08,-85.33 226.7,-79.33"/>
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-86.45C133.48,-86.45 124.83,-86.45 116.33,-86.45"/>
+<polygon fill="#000000" stroke="#000000" points="116.08,-82.95 106.08,-86.45 116.08,-89.95 116.08,-82.95"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M194.5,-183.03C138.99,-167.32 91.7,-114.77 68.78,-85.38"/>
-<polygon fill="#000000" stroke="#000000" points="71.56,-83.25 62.72,-77.41 65.99,-87.49 71.56,-83.25"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.93,-155.04C273.43,-168.86 217.42,-188.95 196.5,-183.03"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M306.26,-34.37C271.78,-21.2 217.49,-2.51 196.5,-6.45"/>
 </g>
 <!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge14" class="edge">
+<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.5,-37.03C280.09,-41.15 263.8,-45.8 248.69,-50.12"/>
-<polygon fill="#000000" stroke="#000000" points="247.61,-46.79 238.96,-52.9 249.54,-53.52 247.61,-46.79"/>
-</g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_classes.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.25,-21.87C262.87,-20.79 227.56,-20.75 196.5,-25.03"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.5,-58.45C280.09,-62.57 263.8,-67.23 248.69,-71.54"/>
+<polygon fill="#000000" stroke="#000000" points="247.61,-68.21 238.96,-74.32 249.54,-74.94 247.61,-68.21"/>
 </g>
 </g>
 </svg>
@@ -444,161 +417,161 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="103,-2019 0,-2019 0,-1995 103,-1995 103,-2019"/>
 <text text-anchor="middle" x="51.5" y="-2004.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_classes.f90</text>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374.5,-2796 271.5,-2796 271.5,-2772 374.5,-2772 374.5,-2796"/>
-<text text-anchor="middle" x="323" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376,-2796 270,-2796 270,-2772 376,-2772 376,-2796"/>
+<text text-anchor="middle" x="323" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.17,-2778.07C260.34,-2774.92 249.59,-2770.17 241,-2763 185.74,-2716.87 228.62,-2661.69 173,-2616"/>
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.91,-2777.7C259.5,-2774.55 249.25,-2769.89 241,-2763 185.74,-2716.87 228.62,-2661.69 173,-2616"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node7" class="node">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node9" class="node">
 <title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="205,-1431 139,-1431 139,-1407 205,-1407 205,-1431"/>
 <text text-anchor="middle" x="172" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.46,-2781C259.81,-2777.84 248.62,-2772.35 241,-2763 197.47,-2709.59 176.42,-1612.92 173.38,-1441.46"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge11" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.78,-2780.52C258.74,-2777.3 248.25,-2771.9 241,-2763 197.47,-2709.59 176.42,-1612.92 173.38,-1441.46"/>
 <polygon fill="#000000" stroke="#000000" points="176.88,-1441.26 173.21,-1431.33 169.88,-1441.39 176.88,-1441.26"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-2754 276,-2754 276,-2730 370,-2730 370,-2754"/>
-<text text-anchor="middle" x="323" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.69,-2736.19C263.6,-2733.08 251.13,-2728.31 241,-2721 195.91,-2688.47 215.96,-2651.29 173,-2616"/>
-</g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.69,-2740.03C262.57,-2737.1 249.54,-2731.47 241,-2721 198.85,-2669.37 176.69,-1610.13 173.42,-1441.53"/>
-<polygon fill="#000000" stroke="#000000" points="176.92,-1441.27 173.23,-1431.34 169.92,-1441.41 176.92,-1441.27"/>
-</g>
 <!-- sourcefile~symba_step.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node4" class="node">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node3" class="node">
 <title>sourcefile~symba_step.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367,-2712 279,-2712 279,-2688 367,-2688 367,-2712"/>
-<text text-anchor="middle" x="323" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367,-2754 279,-2754 279,-2730 367,-2730 367,-2754"/>
+<text text-anchor="middle" x="323" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge5" class="edge">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.88,-2692.98C266.19,-2689.83 252.6,-2685.34 241,-2679 204.85,-2659.23 204.83,-2642.15 173,-2616"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.63,-2736.91C265.64,-2733.84 251.96,-2728.9 241,-2721 195.91,-2688.47 215.96,-2651.29 173,-2616"/>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge12" class="edge">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge20" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.67,-2698.64C264.57,-2695.91 250.2,-2690.25 241,-2679 200.24,-2629.16 176.99,-1608.13 173.47,-1441.81"/>
-<polygon fill="#000000" stroke="#000000" points="176.96,-1441.26 173.25,-1431.34 169.96,-1441.41 176.96,-1441.26"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.66,-2740.65C264.56,-2737.92 250.19,-2732.25 241,-2721 198.85,-2669.37 176.69,-1610.13 173.42,-1441.53"/>
+<polygon fill="#000000" stroke="#000000" points="176.92,-1441.27 173.23,-1431.34 169.92,-1441.41 176.92,-1441.27"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-2670 248,-2670 248,-2646 398,-2646 398,-2670"/>
-<text text-anchor="middle" x="323" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<!-- sourcefile~symba_kick.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node4" class="node">
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-2712 280,-2712 280,-2688 366,-2688 366,-2712"/>
+<text text-anchor="middle" x="323" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M247.73,-2649.49C221.87,-2643.5 194.08,-2633.32 173,-2616"/>
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.72,-2693.19C266.78,-2690.03 252.85,-2685.48 241,-2679 204.85,-2659.23 204.83,-2642.15 173,-2616"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.89,-2645.92C247.21,-2643.43 243.85,-2640.48 241,-2637 201.59,-2588.91 177.26,-1603.88 173.51,-1441.55"/>
-<polygon fill="#000000" stroke="#000000" points="177,-1441.23 173.27,-1431.31 170,-1441.39 177,-1441.23"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.94,-2698.87C265.44,-2696.24 250.47,-2690.58 241,-2679 200.24,-2629.16 176.99,-1608.13 173.47,-1441.81"/>
+<polygon fill="#000000" stroke="#000000" points="176.96,-1441.26 173.25,-1431.34 169.96,-1441.41 176.96,-1441.26"/>
 </g>
 <!-- sourcefile~symba_util.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node6" class="node">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node5" class="node">
 <title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-2628 282,-2628 282,-2604 364,-2604 364,-2628"/>
-<text text-anchor="middle" x="323" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-2670 282,-2670 282,-2646 364,-2646 364,-2670"/>
+<text text-anchor="middle" x="323" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge4" class="edge">
 <title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.55,-2628.04C251.45,-2636.15 203.78,-2641.29 173,-2616"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.89,-2655.44C249.34,-2651.48 203.94,-2641.42 173,-2616"/>
 </g>
 <!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge30" class="edge">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge47" class="edge">
 <title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.65,-2615.15C266.63,-2612.65 250.86,-2607.01 241,-2595 202.94,-2548.65 177.53,-1599.49 173.55,-1441.27"/>
-<polygon fill="#000000" stroke="#000000" points="177.05,-1441.18 173.3,-1431.27 170.05,-1441.35 177.05,-1441.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.63,-2657.16C266.62,-2654.66 250.85,-2649.02 241,-2637 201.59,-2588.91 177.26,-1603.88 173.51,-1441.55"/>
+<polygon fill="#000000" stroke="#000000" points="177,-1441.23 173.27,-1431.31 170,-1441.39 177,-1441.23"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-1431.01C153.87,-1504.01 76.44,-1888.2 56.95,-1984.9"/>
-<polygon fill="#000000" stroke="#000000" points="53.51,-1984.27 54.97,-1994.76 60.37,-1985.65 53.51,-1984.27"/>
+<!-- sourcefile~symba_encounter_check.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node6" class="node">
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="398,-2628 248,-2628 248,-2604 398,-2604 398,-2628"/>
+<text text-anchor="middle" x="323" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+</a>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376,-2586 270,-2586 270,-2562 376,-2562 376,-2586"/>
-<text text-anchor="middle" x="323" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+</g>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge5" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.55,-2628.04C251.45,-2636.15 203.78,-2641.29 173,-2616"/>
+</g>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge67" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.9,-2603.92C247.21,-2601.43 243.86,-2598.48 241,-2595 202.94,-2548.65 177.53,-1599.49 173.55,-1441.27"/>
+<polygon fill="#000000" stroke="#000000" points="177.05,-1441.18 173.3,-1431.27 170.05,-1441.35 177.05,-1441.18"/>
+</g>
+<!-- sourcefile~symba_discard.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node7" class="node">
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374.5,-2586 271.5,-2586 271.5,-2562 374.5,-2562 374.5,-2586"/>
+<text text-anchor="middle" x="323" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.93,-2586.07C263.07,-2588.91 251.62,-2591.98 241,-2595 210.57,-2603.64 197.44,-2636.08 173,-2616"/>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M269.84,-2570.47C258.8,-2567.25 248.29,-2561.86 241,-2553 167.8,-2464.03 171.57,-1592.74 172.79,-1441.36"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.1,-2570.83C259.6,-2567.66 248.57,-2562.2 241,-2553 167.8,-2464.03 171.57,-1592.74 172.79,-1441.36"/>
 <polygon fill="#000000" stroke="#000000" points="176.29,-1441.05 172.88,-1431.02 169.29,-1440.99 176.29,-1441.05"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<!-- sourcefile~symba_drift.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_node8" class="node">
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-2544 280,-2544 280,-2520 366,-2520 366,-2544"/>
-<text text-anchor="middle" x="323" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<text text-anchor="middle" x="323" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.72,-2538.81C266.78,-2541.97 252.85,-2546.52 241,-2553 204.85,-2572.77 204.83,-2642.15 173,-2616"/>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.99,-2530.83C265.49,-2528.2 250.52,-2522.54 241,-2511 170.55,-2425.58 172.02,-1589.81 172.85,-1441.46"/>
 <polygon fill="#000000" stroke="#000000" points="176.35,-1441.31 172.91,-1431.29 169.35,-1441.27 176.35,-1441.31"/>
 </g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M168.58,-1431.01C153.87,-1504.01 76.44,-1888.2 56.95,-1984.9"/>
+<polygon fill="#000000" stroke="#000000" points="53.51,-1984.27 54.97,-1994.76 60.37,-1985.65 53.51,-1984.27"/>
+</g>
 <!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node10" class="node">
 <title>sourcefile~symba_io.f90</title>
@@ -609,606 +582,606 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge8" class="edge">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge9" class="edge">
 <title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.84,-2493.74C270.13,-2496.65 253.72,-2501.82 241,-2511 195.91,-2543.53 215.96,-2651.29 173,-2616"/>
 </g>
 <!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge73" class="edge">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge39" class="edge">
 <title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.62,-2489.57C268.77,-2487.32 251.55,-2481.76 241,-2469 173.28,-2387.1 172.49,-1586.54 172.9,-1441.48"/>
 <polygon fill="#000000" stroke="#000000" points="176.41,-1441.17 172.94,-1431.16 169.41,-1441.15 176.41,-1441.17"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-2460 280,-2460 280,-2436 366,-2436 366,-2460"/>
-<text text-anchor="middle" x="323" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-2460 276,-2460 276,-2436 370,-2436 370,-2460"/>
+<text text-anchor="middle" x="323" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge10" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M171,-2616C77.74,-2539.38 56.95,-2130.18 53.22,-2029.43"/>
 <polygon fill="#000000" stroke="#000000" points="56.71,-2029.06 52.86,-2019.19 49.71,-2029.3 56.71,-2029.06"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.59,-2451.79C266.07,-2454.77 251.82,-2459.97 241,-2469 185.74,-2515.13 228.62,-2661.69 173,-2616"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.81,-2452.68C263.45,-2455.77 250.81,-2460.81 241,-2469 185.74,-2515.13 228.62,-2661.69 173,-2616"/>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.6,-2446.73C265.24,-2444.06 250.46,-2438.41 241,-2427 175.94,-2348.53 172.97,-1581.46 172.97,-1441.02"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.79,-2445.95C262.67,-2443.02 249.62,-2437.4 241,-2427 175.94,-2348.53 172.97,-1581.46 172.97,-1441.02"/>
 <polygon fill="#000000" stroke="#000000" points="176.47,-1441.02 172.97,-1431.02 169.47,-1441.01 176.47,-1441.02"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-1284 284,-1284 284,-1260 362,-1260 362,-1284"/>
-<text text-anchor="middle" x="323" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-1284 296,-1284 296,-1260 350,-1260 350,-1284"/>
+<text text-anchor="middle" x="323" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.64,-1275.4C269.09,-1278.27 253.12,-1283.5 241,-1293 206.83,-1319.79 187.63,-1368.68 178.88,-1397.05"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.92,-1273.44C278.76,-1275.57 256.66,-1280.72 241,-1293 206.83,-1319.79 187.63,-1368.68 178.88,-1397.05"/>
 <polygon fill="#000000" stroke="#000000" points="175.47,-1396.24 176.03,-1406.82 182.19,-1398.2 175.47,-1396.24"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="379,-1242 267,-1242 267,-1218 379,-1218 379,-1242"/>
-<text text-anchor="middle" x="323" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356.5,-1242 289.5,-1242 289.5,-1218 356.5,-1218 356.5,-1242"/>
+<text text-anchor="middle" x="323" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.71,-1236.94C257.35,-1240.09 248.32,-1244.58 241,-1251 197.05,-1289.54 181.08,-1360.62 175.62,-1396.71"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.21,-1231.69C273.03,-1234.08 254.22,-1239.41 241,-1251 197.05,-1289.54 181.08,-1360.62 175.62,-1396.71"/>
 <polygon fill="#000000" stroke="#000000" points="172.14,-1396.33 174.25,-1406.72 179.08,-1397.29 172.14,-1396.33"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359.5,-1200 286.5,-1200 286.5,-1176 359.5,-1176 359.5,-1200"/>
-<text text-anchor="middle" x="323" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361,-1200 285,-1200 285,-1176 361,-1176 361,-1200"/>
+<text text-anchor="middle" x="323" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.42,-1189.67C270.74,-1192.14 253.16,-1197.54 241,-1209 186.98,-1259.9 175.78,-1353.99 173.52,-1396.78"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.77,-1189.94C269.52,-1192.52 252.74,-1197.94 241,-1209 186.98,-1259.9 175.78,-1353.99 173.52,-1396.78"/>
 <polygon fill="#000000" stroke="#000000" points="170.02,-1396.82 173.11,-1406.95 177.01,-1397.11 170.02,-1396.82"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378.5,-1158 267.5,-1158 267.5,-1134 378.5,-1134 378.5,-1158"/>
-<text text-anchor="middle" x="323" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="375.5,-1158 270.5,-1158 270.5,-1134 375.5,-1134 375.5,-1158"/>
+<text text-anchor="middle" x="323" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.3,-1151.82C257.56,-1155.03 248.23,-1159.84 241,-1167 176.77,-1230.6 171.35,-1348.07 172.09,-1396.86"/>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.23,-1150.9C259.44,-1154.09 248.95,-1159.13 241,-1167 176.77,-1230.6 171.35,-1348.07 172.09,-1396.86"/>
 <polygon fill="#000000" stroke="#000000" points="168.59,-1397.05 172.35,-1406.95 175.59,-1396.87 168.59,-1397.05"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-1116 284.5,-1116 284.5,-1092 361.5,-1092 361.5,-1116"/>
-<text text-anchor="middle" x="323" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<text text-anchor="middle" x="323" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.31,-1105.46C268.97,-1107.97 252.25,-1113.45 241,-1125 202.89,-1164.13 181.75,-1334.57 175.22,-1396.45"/>
 <polygon fill="#000000" stroke="#000000" points="171.71,-1396.38 174.17,-1406.69 178.67,-1397.09 171.71,-1396.38"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382,-1074 264,-1074 264,-1050 382,-1050 382,-1074"/>
-<text text-anchor="middle" x="323" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-1074 280.5,-1074 280.5,-1050 365.5,-1050 365.5,-1074"/>
+<text text-anchor="middle" x="323" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.62,-1068.64C255.14,-1071.86 247.19,-1076.46 241,-1083 197.66,-1128.74 179.49,-1328.7 174.51,-1396.45"/>
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.39,-1063.98C266.12,-1066.72 251.19,-1072.24 241,-1083 197.66,-1128.74 179.49,-1328.7 174.51,-1396.45"/>
 <polygon fill="#000000" stroke="#000000" points="170.99,-1396.61 173.77,-1406.83 177.97,-1397.1 170.99,-1396.61"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1032 289,-1032 289,-1008 357,-1008 357,-1032"/>
-<text text-anchor="middle" x="323" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-1032 252,-1032 252,-1008 394,-1008 394,-1032"/>
+<text text-anchor="middle" x="323" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.96,-1020.5C272.32,-1022.54 253.15,-1027.9 241,-1041 192.38,-1093.45 177.49,-1323.43 173.95,-1396.58"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.11,-1032.04C248.02,-1034.53 244.26,-1037.48 241,-1041 192.38,-1093.45 177.49,-1323.43 173.95,-1396.58"/>
 <polygon fill="#000000" stroke="#000000" points="170.44,-1396.77 173.47,-1406.92 177.43,-1397.09 170.44,-1396.77"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-990 280.5,-990 280.5,-966 365.5,-966 365.5,-990"/>
-<text text-anchor="middle" x="323" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-990 241,-990 241,-966 405,-966 405,-990"/>
+<text text-anchor="middle" x="323" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.16,-979.76C265.86,-982.49 250.98,-988.05 241,-999 187.07,-1058.2 175.71,-1318.44 173.5,-1396.68"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M251.67,-990.2C247.74,-992.66 244.13,-995.56 241,-999 187.07,-1058.2 175.71,-1318.44 173.5,-1396.68"/>
 <polygon fill="#000000" stroke="#000000" points="170,-1396.76 173.24,-1406.85 177,-1396.95 170,-1396.76"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="356.5,-948 289.5,-948 289.5,-924 356.5,-924 356.5,-948"/>
-<text text-anchor="middle" x="323" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374.5,-948 271.5,-948 271.5,-924 374.5,-924 374.5,-948"/>
+<text text-anchor="middle" x="323" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.2,-936.3C272.42,-938.25 253.03,-943.6 241,-957 181.71,-1023.04 174.1,-1314.03 173.13,-1396.9"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.22,-939.75C259.86,-942.93 248.86,-948.24 241,-957 181.71,-1023.04 174.1,-1314.03 173.13,-1396.9"/>
 <polygon fill="#000000" stroke="#000000" points="169.63,-1396.94 173.04,-1406.97 176.63,-1397.01 169.63,-1396.94"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-906 280.5,-906 280.5,-882 365.5,-882 365.5,-906"/>
-<text text-anchor="middle" x="323" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-906 289,-906 289,-882 357,-882 357,-906"/>
+<text text-anchor="middle" x="323" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.43,-895.54C265.98,-898.22 250.93,-903.81 241,-915 176.45,-987.77 172.64,-1308.65 172.83,-1396.62"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.73,-894.29C272.02,-896.26 252.86,-901.63 241,-915 176.45,-987.77 172.64,-1308.65 172.83,-1396.62"/>
 <polygon fill="#000000" stroke="#000000" points="169.33,-1396.83 172.88,-1406.81 176.33,-1396.8 169.33,-1396.83"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-864 284,-864 284,-840 362,-840 362,-864"/>
-<text text-anchor="middle" x="323" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374.5,-864 271.5,-864 271.5,-840 374.5,-840 374.5,-864"/>
+<text text-anchor="middle" x="323" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.72,-852.92C268.28,-855.32 251.64,-860.88 241,-873 171.12,-952.59 171.28,-1303.97 172.57,-1396.57"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.08,-855.63C259.72,-858.81 248.76,-864.16 241,-873 171.12,-952.59 171.28,-1303.97 172.57,-1396.57"/>
 <polygon fill="#000000" stroke="#000000" points="169.08,-1396.83 172.74,-1406.77 176.08,-1396.71 169.08,-1396.83"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371,-822 275,-822 275,-798 371,-798 371,-822"/>
-<text text-anchor="middle" x="323" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358.5,-822 287.5,-822 287.5,-798 358.5,-798 358.5,-822"/>
+<text text-anchor="middle" x="323" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.82,-812.6C262.14,-815.61 249.58,-821.14 241,-831 203.08,-874.57 179.32,-1295.11 174.09,-1396.9"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.4,-810.35C270.96,-812.41 252.44,-817.85 241,-831 203.08,-874.57 179.32,-1295.11 174.09,-1396.9"/>
 <polygon fill="#000000" stroke="#000000" points="170.59,-1396.8 173.58,-1406.97 177.58,-1397.16 170.59,-1396.8"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-780 283.5,-780 283.5,-756 362.5,-756 362.5,-780"/>
-<text text-anchor="middle" x="323" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-780 284,-780 284,-756 362,-756 362,-780"/>
+<text text-anchor="middle" x="323" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.2,-768.9C267.87,-771.33 251.44,-776.91 241,-789 200.42,-836 178.53,-1290.11 173.92,-1396.69"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge28" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.62,-768.83C268.17,-771.23 251.54,-776.8 241,-789 200.42,-836 178.53,-1290.11 173.92,-1396.69"/>
 <polygon fill="#000000" stroke="#000000" points="170.42,-1396.78 173.49,-1406.92 177.41,-1397.08 170.42,-1396.78"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359.5,-738 286.5,-738 286.5,-714 359.5,-714 359.5,-738"/>
-<text text-anchor="middle" x="323" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350.5,-738 295.5,-738 295.5,-714 350.5,-714 350.5,-738"/>
+<text text-anchor="middle" x="323" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.49,-726.39C270.24,-728.51 252.16,-733.99 241,-747 197.68,-797.5 177.73,-1286.63 173.75,-1396.96"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge27" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.34,-725.52C277.23,-726.73 254.24,-731.56 241,-747 197.68,-797.5 177.73,-1286.63 173.75,-1396.96"/>
 <polygon fill="#000000" stroke="#000000" points="170.26,-1396.84 173.4,-1406.96 177.25,-1397.09 170.26,-1396.84"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-696 289,-696 289,-672 357,-672 357,-696"/>
-<text text-anchor="middle" x="323" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="379,-696 267,-696 267,-672 379,-672 379,-696"/>
+<text text-anchor="middle" x="323" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.92,-684.06C272.06,-685.94 252.69,-691.29 241,-705 195.02,-758.93 177.04,-1281.65 173.62,-1396.68"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge29" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M266.72,-688.75C256.9,-692.04 247.69,-697.15 241,-705 195.02,-758.93 177.04,-1281.65 173.62,-1396.68"/>
 <polygon fill="#000000" stroke="#000000" points="170.12,-1396.69 173.33,-1406.79 177.12,-1396.89 170.12,-1396.69"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-654 284.5,-654 284.5,-630 361.5,-630 361.5,-654"/>
-<text text-anchor="middle" x="323" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353,-654 293,-654 293,-630 353,-630 353,-654"/>
+<text text-anchor="middle" x="323" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.35,-642.62C268.64,-644.92 251.62,-650.48 241,-663 192.28,-720.44 176.35,-1278.25 173.5,-1396.89"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge30" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.92,-641.65C275.19,-643.1 253.59,-648.15 241,-663 192.28,-720.44 176.35,-1278.25 173.5,-1396.89"/>
 <polygon fill="#000000" stroke="#000000" points="169.99,-1396.88 173.26,-1406.96 176.99,-1397.05 169.99,-1396.88"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="360.5,-612 285.5,-612 285.5,-588 360.5,-588 360.5,-612"/>
-<text text-anchor="middle" x="323" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-612 284.5,-612 284.5,-588 361.5,-588 361.5,-612"/>
+<text text-anchor="middle" x="323" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.16,-600.48C269.22,-602.7 251.78,-608.23 241,-621 189.58,-681.92 175.72,-1274.14 173.39,-1396.82"/>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.33,-600.59C268.61,-602.89 251.59,-608.46 241,-621 189.58,-681.92 175.72,-1274.14 173.39,-1396.82"/>
 <polygon fill="#000000" stroke="#000000" points="169.88,-1396.85 173.2,-1406.91 176.88,-1396.97 169.88,-1396.85"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-570 284.5,-570 284.5,-546 361.5,-546 361.5,-570"/>
-<text text-anchor="middle" x="323" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-570 289,-570 289,-546 357,-546 357,-570"/>
+<text text-anchor="middle" x="323" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.3,-558.57C268.58,-560.87 251.56,-566.43 241,-579 186.86,-643.42 175.11,-1270.43 173.29,-1396.85"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.85,-557.99C271.96,-559.85 252.59,-565.21 241,-579 186.86,-643.42 175.11,-1270.43 173.29,-1396.85"/>
 <polygon fill="#000000" stroke="#000000" points="169.79,-1396.85 173.15,-1406.9 176.78,-1396.95 169.79,-1396.85"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-528 283,-528 283,-504 363,-504 363,-528"/>
-<text text-anchor="middle" x="323" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378.5,-528 267.5,-528 267.5,-504 378.5,-504 378.5,-528"/>
+<text text-anchor="middle" x="323" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.6,-516.81C267.36,-519.25 251.17,-524.86 241,-537 184.18,-604.87 174.55,-1265.8 173.2,-1396.58"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.44,-520.39C257.32,-523.67 247.81,-528.87 241,-537 184.18,-604.87 174.55,-1265.8 173.2,-1396.58"/>
 <polygon fill="#000000" stroke="#000000" points="169.69,-1396.91 173.1,-1406.94 176.69,-1396.98 169.69,-1396.91"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="355,-486 291,-486 291,-462 355,-462 355,-486"/>
-<text text-anchor="middle" x="323" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-486 284.5,-486 284.5,-462 361.5,-462 361.5,-486"/>
+<text text-anchor="middle" x="323" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.84,-473.75C273.48,-475.39 253.01,-480.61 241,-495 181.49,-566.33 174.01,-1261.38 173.12,-1396.36"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.26,-474.54C268.53,-476.83 251.52,-482.39 241,-495 181.49,-566.33 174.01,-1261.38 173.12,-1396.36"/>
 <polygon fill="#000000" stroke="#000000" points="169.61,-1396.68 173.05,-1406.7 176.61,-1396.72 169.61,-1396.68"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-444 241,-444 241,-420 405,-420 405,-444"/>
-<text text-anchor="middle" x="323" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-444 296,-444 296,-420 350,-420 350,-444"/>
+<text text-anchor="middle" x="323" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M250.95,-444.13C247.25,-446.61 243.88,-449.54 241,-453 178.72,-527.89 173.47,-1258.75 173.04,-1396.63"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.96,-431.35C277.67,-432.41 254.19,-437.14 241,-453 178.72,-527.89 173.47,-1258.75 173.04,-1396.63"/>
 <polygon fill="#000000" stroke="#000000" points="169.54,-1396.81 173.01,-1406.82 176.54,-1396.83 169.54,-1396.81"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-402 296,-402 296,-378 350,-378 350,-402"/>
-<text text-anchor="middle" x="323" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="355,-402 291,-402 291,-378 355,-378 355,-402"/>
+<text text-anchor="middle" x="323" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.95,-389.34C277.65,-390.4 254.17,-395.12 241,-411 175.94,-489.47 172.97,-1256.54 172.97,-1396.98"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge37" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.81,-389.73C273.44,-391.35 252.96,-396.57 241,-411 175.94,-489.47 172.97,-1256.54 172.97,-1396.98"/>
 <polygon fill="#000000" stroke="#000000" points="169.47,-1396.99 172.97,-1406.98 176.47,-1396.98 169.47,-1396.99"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-360 284.5,-360 284.5,-336 361.5,-336 361.5,-360"/>
-<text text-anchor="middle" x="323" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359.5,-360 286.5,-360 286.5,-336 359.5,-336 359.5,-360"/>
+<text text-anchor="middle" x="323" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.21,-348.49C268.47,-350.77 251.46,-356.35 241,-369 173.28,-450.9 172.49,-1251.46 172.9,-1396.52"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge38" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.29,-348.21C269.99,-350.29 251.92,-355.79 241,-369 173.28,-450.9 172.49,-1251.46 172.9,-1396.52"/>
 <polygon fill="#000000" stroke="#000000" points="169.41,-1396.85 172.94,-1406.84 176.41,-1396.83 169.41,-1396.85"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-318 280,-318 280,-294 366,-294 366,-318"/>
-<text text-anchor="middle" x="323" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365,-318 281,-318 281,-294 365,-294 365,-318"/>
+<text text-anchor="middle" x="323" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.99,-307.17C265.49,-309.8 250.52,-315.46 241,-327 170.55,-412.42 172.02,-1248.19 172.85,-1396.54"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge77" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.83,-307.02C266.08,-309.58 250.71,-315.23 241,-327 170.55,-412.42 172.02,-1248.19 172.85,-1396.54"/>
 <polygon fill="#000000" stroke="#000000" points="169.35,-1396.73 172.91,-1406.71 176.35,-1396.69 169.35,-1396.73"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-276 289,-276 289,-252 357,-252 357,-276"/>
-<text text-anchor="middle" x="323" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_append.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-276 280,-276 280,-252 366,-252 366,-276"/>
+<text text-anchor="middle" x="323" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.73,-263.9C271.81,-265.73 252.45,-271.09 241,-285 167.8,-373.97 171.57,-1245.26 172.79,-1396.64"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.97,-265.16C265.48,-267.79 250.51,-273.45 241,-285 167.8,-373.97 171.57,-1245.26 172.79,-1396.64"/>
 <polygon fill="#000000" stroke="#000000" points="169.29,-1397.01 172.88,-1406.98 176.29,-1396.95 169.29,-1397.01"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353,-234 293,-234 293,-210 353,-210 353,-234"/>
-<text text-anchor="middle" x="323" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-234 283.5,-234 283.5,-210 362.5,-210 362.5,-234"/>
+<text text-anchor="middle" x="323" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.76,-221.51C274.97,-222.91 253.35,-227.95 241,-243 202.94,-289.35 177.53,-1238.51 173.55,-1396.73"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge41" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.33,-222.58C267.82,-224.93 251.23,-230.54 241,-243 202.94,-289.35 177.53,-1238.51 173.55,-1396.73"/>
 <polygon fill="#000000" stroke="#000000" points="170.05,-1396.65 173.3,-1406.73 177.05,-1396.82 170.05,-1396.65"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="375.5,-192 270.5,-192 270.5,-168 375.5,-168 375.5,-192"/>
-<text text-anchor="middle" x="323" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-192 284,-192 284,-168 362,-168 362,-192"/>
+<text text-anchor="middle" x="323" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.23,-183.38C259.04,-186.59 248.37,-192.01 241,-201 201.59,-249.09 177.26,-1234.12 173.51,-1396.45"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge42" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.73,-180.51C268.11,-182.82 251.31,-188.41 241,-201 201.59,-249.09 177.26,-1234.12 173.51,-1396.45"/>
 <polygon fill="#000000" stroke="#000000" points="170,-1396.61 173.27,-1406.69 177,-1396.77 170,-1396.61"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="351.5,-150 294.5,-150 294.5,-126 351.5,-126 351.5,-150"/>
-<text text-anchor="middle" x="323" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-150 296,-150 296,-126 350,-126 350,-150"/>
+<text text-anchor="middle" x="323" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.33,-137.38C276.24,-138.59 253.69,-143.48 241,-159 200.24,-208.84 176.99,-1229.87 173.47,-1396.19"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.89,-137.28C277.55,-138.32 254.06,-143.03 241,-159 200.24,-208.84 176.99,-1229.87 173.47,-1396.19"/>
 <polygon fill="#000000" stroke="#000000" points="169.96,-1396.59 173.25,-1406.66 176.96,-1396.74 169.96,-1396.59"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-108 284.5,-108 284.5,-84 361.5,-84 361.5,-108"/>
-<text text-anchor="middle" x="323" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-108 296,-108 296,-84 350,-84 350,-108"/>
+<text text-anchor="middle" x="323" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.13,-96.43C268.38,-98.7 251.38,-104.28 241,-117 198.85,-168.63 176.69,-1227.87 173.42,-1396.47"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.88,-95.28C277.54,-96.31 254.05,-101.02 241,-117 198.85,-168.63 176.69,-1227.87 173.42,-1396.47"/>
 <polygon fill="#000000" stroke="#000000" points="169.92,-1396.59 173.23,-1406.66 176.92,-1396.73 169.92,-1396.59"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-66 289,-66 289,-42 357,-42 357,-66"/>
-<text text-anchor="middle" x="323" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<text text-anchor="middle" x="323" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.68,-53.85C271.74,-55.67 252.38,-61.04 241,-75 197.47,-128.41 176.42,-1225.08 173.38,-1396.54"/>
 <polygon fill="#000000" stroke="#000000" points="169.88,-1396.61 173.21,-1406.67 176.88,-1396.74 169.88,-1396.61"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-24 280,-24 280,0 366,0 366,-24"/>
-<text text-anchor="middle" x="323" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-24 274,-24 274,0 372,0 372,-24"/>
+<text text-anchor="middle" x="323" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.91,-13.1C265.4,-15.73 250.44,-21.39 241,-33 196.08,-88.2 176.15,-1222.5 173.35,-1396.65"/>
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.98,-14.35C261.44,-17.38 249.16,-22.97 241,-33 196.08,-88.2 176.15,-1222.5 173.35,-1396.65"/>
 <polygon fill="#000000" stroke="#000000" points="169.85,-1396.65 173.19,-1406.71 176.85,-1396.76 169.85,-1396.65"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-2418 287,-2418 287,-2394 359,-2394 359,-2418"/>
-<text text-anchor="middle" x="323" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-2418 283.5,-2418 283.5,-2394 362.5,-2394 362.5,-2418"/>
+<text text-anchor="middle" x="323" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.73,-2405.81C270.33,-2403.76 252.05,-2398.29 241,-2385 178.72,-2310.11 173.47,-1579.25 173.04,-1441.37"/>
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.4,-2405.35C267.91,-2402.99 251.31,-2397.4 241,-2385 178.72,-2310.11 173.47,-1579.25 173.04,-1441.37"/>
 <polygon fill="#000000" stroke="#000000" points="176.54,-1441.17 173.01,-1431.18 169.54,-1441.19 176.54,-1441.17"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365,-2376 281,-2376 281,-2352 365,-2352 365,-2376"/>
-<text text-anchor="middle" x="323" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="385,-2376 261,-2376 261,-2352 385,-2352 385,-2376"/>
+<text text-anchor="middle" x="323" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.9,-2362.93C266.15,-2360.35 250.77,-2354.71 241,-2343 181.49,-2271.67 174.01,-1576.62 173.12,-1441.64"/>
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.87,-2357.19C253.26,-2353.93 246.3,-2349.36 241,-2343 181.49,-2271.67 174.01,-1576.62 173.12,-1441.64"/>
 <polygon fill="#000000" stroke="#000000" points="176.61,-1441.28 173.05,-1431.3 169.61,-1441.32 176.61,-1441.28"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350.5,-2334 295.5,-2334 295.5,-2310 350.5,-2310 350.5,-2334"/>
-<text text-anchor="middle" x="323" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-2334 289,-2334 289,-2310 357,-2310 357,-2334"/>
+<text text-anchor="middle" x="323" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.22,-2322.58C277.06,-2321.41 254.06,-2316.59 241,-2301 184.18,-2233.13 174.55,-1572.2 173.2,-1441.42"/>
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.83,-2322.02C271.93,-2320.17 252.56,-2314.81 241,-2301 184.18,-2233.13 174.55,-1572.2 173.2,-1441.42"/>
 <polygon fill="#000000" stroke="#000000" points="176.69,-1441.02 173.1,-1431.06 169.69,-1441.09 176.69,-1441.02"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358.5,-2292 287.5,-2292 287.5,-2268 358.5,-2268 358.5,-2292"/>
-<text text-anchor="middle" x="323" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-2292 284.5,-2292 284.5,-2268 361.5,-2268 361.5,-2292"/>
+<text text-anchor="middle" x="323" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.2,-2279.82C270.72,-2277.79 252.22,-2272.35 241,-2259 186.86,-2194.58 175.11,-1567.57 173.29,-1441.15"/>
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.3,-2279.43C268.58,-2277.13 251.56,-2271.57 241,-2259 186.86,-2194.58 175.11,-1567.57 173.29,-1441.15"/>
 <polygon fill="#000000" stroke="#000000" points="176.78,-1441.05 173.15,-1431.1 169.79,-1441.15 176.78,-1441.05"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-2250 296,-2250 296,-2226 350,-2226 350,-2250"/>
-<text text-anchor="middle" x="323" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-2250 289,-2250 289,-2226 357,-2226 357,-2250"/>
+<text text-anchor="middle" x="323" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.65,-2238.57C277.44,-2237.43 254.21,-2232.65 241,-2217 189.58,-2156.08 175.72,-1563.86 173.39,-1441.18"/>
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.87,-2237.99C271.99,-2236.12 252.62,-2230.77 241,-2217 189.58,-2156.08 175.72,-1563.86 173.39,-1441.18"/>
 <polygon fill="#000000" stroke="#000000" points="176.88,-1441.03 173.2,-1431.09 169.88,-1441.15 176.88,-1441.03"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-2208 283.5,-2208 283.5,-2184 362.5,-2184 362.5,-2208"/>
-<text text-anchor="middle" x="323" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-2208 284.5,-2208 284.5,-2184 361.5,-2184 361.5,-2208"/>
+<text text-anchor="middle" x="323" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.1,-2195.19C267.75,-2192.78 251.34,-2187.19 241,-2175 192.28,-2117.56 176.35,-1559.75 173.5,-1441.11"/>
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.35,-2195.38C268.64,-2193.08 251.62,-2187.52 241,-2175 192.28,-2117.56 176.35,-1559.75 173.5,-1441.11"/>
 <polygon fill="#000000" stroke="#000000" points="176.99,-1440.95 173.26,-1431.04 169.99,-1441.12 176.99,-1440.95"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-2166 296,-2166 296,-2142 350,-2142 350,-2166"/>
-<text text-anchor="middle" x="323" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-2166 280,-2166 280,-2142 366,-2142 366,-2166"/>
+<text text-anchor="middle" x="323" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.69,-2154.53C277.51,-2153.37 254.29,-2148.59 241,-2133 195.02,-2079.07 177.04,-1556.35 173.62,-1441.32"/>
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.77,-2152.59C265.43,-2149.9 250.61,-2144.28 241,-2133 195.02,-2079.07 177.04,-1556.35 173.62,-1441.32"/>
 <polygon fill="#000000" stroke="#000000" points="177.12,-1441.11 173.33,-1431.21 170.12,-1441.31 177.12,-1441.11"/>
 </g>
 <!-- sourcefile~discard.f90 -->
@@ -1226,154 +1199,154 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.18,-2112.04C273.04,-2110.28 253.01,-2105 241,-2091 197.68,-2040.5 177.73,-1551.37 173.75,-1441.04"/>
 <polygon fill="#000000" stroke="#000000" points="177.25,-1440.91 173.4,-1431.04 170.26,-1441.16 177.25,-1440.91"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-2082 280.5,-2082 280.5,-2058 365.5,-2058 365.5,-2082"/>
-<text text-anchor="middle" x="323" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350.5,-2082 295.5,-2082 295.5,-2058 350.5,-2058 350.5,-2082"/>
+<text text-anchor="middle" x="323" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.27,-2068.6C265.8,-2065.94 250.78,-2060.32 241,-2049 200.42,-2002 178.53,-1547.89 173.92,-1441.31"/>
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.37,-2070.45C277.27,-2069.23 254.29,-2064.39 241,-2049 200.42,-2002 178.53,-1547.89 173.92,-1441.31"/>
 <polygon fill="#000000" stroke="#000000" points="177.41,-1440.92 173.49,-1431.08 170.42,-1441.22 177.41,-1440.92"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374.5,-2040 271.5,-2040 271.5,-2016 374.5,-2016 374.5,-2040"/>
-<text text-anchor="middle" x="323" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-2040 280.5,-2040 280.5,-2016 365.5,-2016 365.5,-2040"/>
+<text text-anchor="middle" x="323" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.45,-2024.54C259.94,-2021.37 248.82,-2015.99 241,-2007 203.08,-1963.43 179.32,-1542.89 174.09,-1441.1"/>
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.31,-2026.56C265.85,-2023.89 250.82,-2018.29 241,-2007 203.08,-1963.43 179.32,-1542.89 174.09,-1441.1"/>
 <polygon fill="#000000" stroke="#000000" points="177.58,-1440.84 173.58,-1431.03 170.59,-1441.2 177.58,-1440.84"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1998 289,-1998 289,-1974 357,-1974 357,-1998"/>
-<text text-anchor="middle" x="323" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370.5,-1998 275.5,-1998 275.5,-1974 370.5,-1974 370.5,-1998"/>
+<text text-anchor="middle" x="323" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.67,-1985.76C271.95,-1983.8 252.79,-1978.43 241,-1965 171.12,-1885.41 171.28,-1534.03 172.57,-1441.43"/>
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.3,-1983.45C262.48,-1980.46 249.72,-1974.93 241,-1965 171.12,-1885.41 171.28,-1534.03 172.57,-1441.43"/>
 <polygon fill="#000000" stroke="#000000" points="176.08,-1441.29 172.74,-1431.23 169.08,-1441.17 176.08,-1441.29"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350.5,-1956 295.5,-1956 295.5,-1932 350.5,-1932 350.5,-1956"/>
-<text text-anchor="middle" x="323" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371,-1956 275,-1956 275,-1932 371,-1932 371,-1956"/>
+<text text-anchor="middle" x="323" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.49,-1944.34C277.46,-1943.07 254.5,-1938.21 241,-1923 176.45,-1850.23 172.64,-1529.35 172.83,-1441.38"/>
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.94,-1941.3C262.26,-1938.28 249.68,-1932.78 241,-1923 176.45,-1850.23 172.64,-1529.35 172.83,-1441.38"/>
 <polygon fill="#000000" stroke="#000000" points="176.33,-1441.2 172.88,-1431.19 169.33,-1441.17 176.33,-1441.2"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374.5,-1914 271.5,-1914 271.5,-1890 374.5,-1890 374.5,-1914"/>
-<text text-anchor="middle" x="323" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-1914 296,-1914 296,-1890 350,-1890 350,-1914"/>
+<text text-anchor="middle" x="323" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M271.22,-1898.25C259.86,-1895.07 248.86,-1889.76 241,-1881 181.71,-1814.96 174.1,-1523.97 173.13,-1441.1"/>
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.93,-1902.32C277.87,-1901.06 254.68,-1896.24 241,-1881 181.71,-1814.96 174.1,-1523.97 173.13,-1441.1"/>
 <polygon fill="#000000" stroke="#000000" points="176.63,-1440.99 173.04,-1431.03 169.63,-1441.06 176.63,-1440.99"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-1872 296,-1872 296,-1848 350,-1848 350,-1872"/>
-<text text-anchor="middle" x="323" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359.5,-1872 286.5,-1872 286.5,-1848 359.5,-1848 359.5,-1872"/>
+<text text-anchor="middle" x="323" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296,-1860.26C277.97,-1858.98 254.79,-1854.14 241,-1839 187.07,-1779.8 175.71,-1519.56 173.5,-1441.32"/>
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.42,-1859.26C270.35,-1857.03 252.45,-1851.57 241,-1839 187.07,-1779.8 175.71,-1519.56 173.5,-1441.32"/>
 <polygon fill="#000000" stroke="#000000" points="177,-1441.05 173.24,-1431.15 170,-1441.24 177,-1441.05"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-1830 280,-1830 280,-1806 366,-1806 366,-1830"/>
-<text text-anchor="middle" x="323" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-1830 280.5,-1830 280.5,-1806 365.5,-1806 365.5,-1830"/>
+<text text-anchor="middle" x="323" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.85,-1816.06C265.69,-1813.3 250.98,-1807.76 241,-1797 192.38,-1744.55 177.49,-1514.57 173.95,-1441.42"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge63" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.27,-1816.14C265.98,-1813.41 251.07,-1807.87 241,-1797 192.38,-1744.55 177.49,-1514.57 173.95,-1441.42"/>
 <polygon fill="#000000" stroke="#000000" points="177.43,-1440.91 173.47,-1431.08 170.44,-1441.23 177.43,-1440.91"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370.5,-1788 275.5,-1788 275.5,-1764 370.5,-1764 370.5,-1788"/>
-<text text-anchor="middle" x="323" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="351.5,-1788 294.5,-1788 294.5,-1764 351.5,-1764 351.5,-1788"/>
+<text text-anchor="middle" x="323" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.34,-1772.93C262.67,-1769.9 249.99,-1764.49 241,-1755 197.66,-1709.26 179.49,-1509.3 174.51,-1441.55"/>
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge64" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.25,-1775.94C276.6,-1774.37 254.59,-1769.34 241,-1755 197.66,-1709.26 179.49,-1509.3 174.51,-1441.55"/>
 <polygon fill="#000000" stroke="#000000" points="177.97,-1440.9 173.77,-1431.17 170.99,-1441.39 177.97,-1440.9"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-1746 252,-1746 252,-1722 394,-1722 394,-1746"/>
-<text text-anchor="middle" x="323" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353,-1746 293,-1746 293,-1722 353,-1722 353,-1746"/>
+<text text-anchor="middle" x="323" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M252.68,-1722C248.41,-1719.51 244.45,-1716.54 241,-1713 202.89,-1673.87 181.75,-1503.43 175.22,-1441.55"/>
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge65" class="edge">
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.82,-1733.66C275.5,-1731.89 254.38,-1726.74 241,-1713 202.89,-1673.87 181.75,-1503.43 175.22,-1441.55"/>
 <polygon fill="#000000" stroke="#000000" points="178.67,-1440.91 174.17,-1431.31 171.71,-1441.62 178.67,-1440.91"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="353,-1704 293,-1704 293,-1680 353,-1680 353,-1704"/>
-<text text-anchor="middle" x="323" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-1704 287,-1704 287,-1680 359,-1680 359,-1704"/>
+<text text-anchor="middle" x="323" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.99,-1691.49C275.74,-1689.65 254.63,-1684.49 241,-1671 176.77,-1607.4 171.35,-1489.93 172.09,-1441.14"/>
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.97,-1690.73C271.04,-1688.37 253.08,-1682.96 241,-1671 176.77,-1607.4 171.35,-1489.93 172.09,-1441.14"/>
 <polygon fill="#000000" stroke="#000000" points="175.59,-1441.13 172.35,-1431.05 168.59,-1440.95 175.59,-1441.13"/>
 </g>
 <!-- sourcefile~fraggle_util.f90 -->
@@ -1386,129 +1359,129 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge68" class="edge">
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge69" class="edge">
 <title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.46,-1647.46C267.13,-1644.66 251.89,-1639.26 241,-1629 186.98,-1578.1 175.78,-1484.01 173.52,-1441.22"/>
 <polygon fill="#000000" stroke="#000000" points="177.01,-1440.89 173.11,-1431.05 170.02,-1441.18 177.01,-1440.89"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-1620 274,-1620 274,-1596 372,-1596 372,-1620"/>
-<text text-anchor="middle" x="323" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-1620 280.5,-1620 280.5,-1596 365.5,-1596 365.5,-1620"/>
+<text text-anchor="middle" x="323" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge69" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.86,-1603.2C262.05,-1600.07 250.17,-1595.05 241,-1587 197.05,-1548.46 181.08,-1477.38 175.62,-1441.29"/>
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge70" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.17,-1604.69C266.38,-1601.77 251.81,-1596.48 241,-1587 197.05,-1548.46 181.08,-1477.38 175.62,-1441.29"/>
 <polygon fill="#000000" stroke="#000000" points="179.08,-1440.71 174.25,-1431.28 172.14,-1441.67 179.08,-1440.71"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-1578 276,-1578 276,-1554 370,-1554 370,-1578"/>
-<text text-anchor="middle" x="323" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-1578 280,-1578 280,-1554 366,-1554 366,-1578"/>
+<text text-anchor="middle" x="323" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge70" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.71,-1560.82C263.49,-1557.72 250.95,-1552.8 241,-1545 206.83,-1518.21 187.63,-1469.32 178.88,-1440.95"/>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge71" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M279.91,-1561.82C266.41,-1558.81 252.09,-1553.69 241,-1545 206.83,-1518.21 187.63,-1469.32 178.88,-1440.95"/>
 <polygon fill="#000000" stroke="#000000" points="182.19,-1439.8 176.03,-1431.18 175.47,-1441.76 182.19,-1439.8"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361,-1536 285,-1536 285,-1512 361,-1512 361,-1536"/>
-<text text-anchor="middle" x="323" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="360.5,-1536 285.5,-1536 285.5,-1512 360.5,-1512 360.5,-1536"/>
+<text text-anchor="middle" x="323" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge71" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.91,-1519.49C270.37,-1516.46 254.07,-1511.41 241,-1503 216.19,-1487.03 196.2,-1458.98 184.47,-1439.72"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge72" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.31,-1519.57C270.67,-1516.56 254.19,-1511.49 241,-1503 216.19,-1487.03 196.2,-1458.98 184.47,-1439.72"/>
 <polygon fill="#000000" stroke="#000000" points="187.47,-1437.92 179.39,-1431.06 181.43,-1441.46 187.47,-1437.92"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="362.5,-1494 283.5,-1494 283.5,-1470 362.5,-1470 362.5,-1494"/>
-<text text-anchor="middle" x="323" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<text text-anchor="middle" x="323" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge72" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge73" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M283.31,-1474.46C269.64,-1471.16 254.36,-1466.7 241,-1461 225.9,-1454.56 210.24,-1445.1 197.76,-1436.79"/>
 <polygon fill="#000000" stroke="#000000" points="199.51,-1433.75 189.28,-1431 195.57,-1439.53 199.51,-1433.75"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="385,-1452 261,-1452 261,-1428 385,-1428 385,-1452"/>
-<text text-anchor="middle" x="323" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382,-1452 264,-1452 264,-1428 382,-1428 382,-1452"/>
+<text text-anchor="middle" x="323" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge74" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.97,-1431.4C245.57,-1429.23 229.39,-1426.95 215.16,-1424.94"/>
-<polygon fill="#000000" stroke="#000000" points="215.57,-1421.47 205.18,-1423.54 214.59,-1428.4 215.57,-1421.47"/>
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.97,-1431.82C247.77,-1429.54 230.47,-1427.1 215.36,-1424.97"/>
+<polygon fill="#000000" stroke="#000000" points="215.68,-1421.48 205.29,-1423.55 214.7,-1428.41 215.68,-1421.48"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="350,-1410 296,-1410 296,-1386 350,-1386 350,-1410"/>
-<text text-anchor="middle" x="323" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1410 289,-1410 289,-1386 357,-1386 357,-1410"/>
+<text text-anchor="middle" x="323" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge75" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.7,-1401.71C273.43,-1404.85 241.08,-1409.4 215.19,-1413.05"/>
-<polygon fill="#000000" stroke="#000000" points="214.67,-1409.59 205.26,-1414.45 215.65,-1416.52 214.67,-1409.59"/>
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.93,-1402.66C267.2,-1405.72 238.57,-1409.76 215.2,-1413.05"/>
+<polygon fill="#000000" stroke="#000000" points="214.62,-1409.6 205.21,-1414.46 215.6,-1416.53 214.62,-1409.6"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1368 289,-1368 289,-1344 357,-1344 357,-1368"/>
-<text text-anchor="middle" x="323" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-1368 276,-1368 276,-1344 370,-1344 370,-1368"/>
+<text text-anchor="middle" x="323" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge76" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.94,-1362.21C273.96,-1365.62 256.23,-1370.5 241,-1377 225.9,-1383.44 210.24,-1392.9 197.76,-1401.21"/>
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.79,-1365.43C264.2,-1368.49 251.96,-1372.32 241,-1377 225.9,-1383.44 210.24,-1392.9 197.76,-1401.21"/>
 <polygon fill="#000000" stroke="#000000" points="195.57,-1398.47 189.28,-1407 199.51,-1404.25 195.57,-1398.47"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~symba_classes.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-1326 280.5,-1326 280.5,-1302 365.5,-1302 365.5,-1326"/>
-<text text-anchor="middle" x="323" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~symba_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1326 283,-1326 283,-1302 363,-1302 363,-1326"/>
+<text text-anchor="middle" x="323" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge77" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.37,-1319.51C267.05,-1322.61 252.73,-1327.45 241,-1335 216.19,-1350.97 196.2,-1379.02 184.47,-1398.28"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~symba_classes.f90~~AfferentGraph_edge45" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.86,-1318.95C268.85,-1322.02 253.46,-1326.98 241,-1335 216.19,-1350.97 196.2,-1379.02 184.47,-1398.28"/>
 <polygon fill="#000000" stroke="#000000" points="181.43,-1396.54 179.39,-1406.94 187.47,-1400.08 181.43,-1396.54"/>
 </g>
 </g>
@@ -1611,258 +1584,258 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-6"></a>   <span class="k">use </span><span class="n">swiftest_globals</span>
 <a name="ln-7"></a>   <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span><span class="p">,</span> <span class="n">swiftest_base</span><span class="p">,</span> <span class="n">swiftest_encounter</span><span class="p">,</span> <span class="n">swiftest_particle_info</span><span class="p">,</span> <span class="n">netcdf_parameters</span>
 <a name="ln-8"></a>   <span class="k">use </span><span class="n">helio_classes</span><span class="p">,</span>    <span class="n">only</span> <span class="p">:</span> <span class="n">helio_cb</span><span class="p">,</span> <span class="n">helio_pl</span><span class="p">,</span> <span class="n">helio_tp</span><span class="p">,</span> <span class="n">helio_nbody_system</span>
-<a name="ln-9"></a>   <span class="k">use </span><span class="n">rmvs_classes</span><span class="p">,</span>     <span class="n">only</span> <span class="p">:</span> <span class="n">rmvs_chk_ind</span>
-<a name="ln-10"></a>   <span class="k">use </span><span class="n">fraggle_classes</span><span class="p">,</span>  <span class="n">only</span> <span class="p">:</span> <span class="n">fraggle_colliders</span><span class="p">,</span> <span class="n">fraggle_fragments</span>
-<a name="ln-11"></a>   <span class="k">implicit none</span>
-<a name="ln-12"></a><span class="k">   public</span>
-<a name="ln-13"></a>
-<a name="ln-14"></a><span class="k">   </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">NENMAX</span>           <span class="o">=</span> <span class="mi">32767</span>
-<a name="ln-15"></a>   <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">NTENC</span>            <span class="o">=</span> <span class="mi">3</span>
-<a name="ln-16"></a>   <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">RHSCALE</span>          <span class="o">=</span> <span class="mf">6.5_DP</span>
-<a name="ln-17"></a>   <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">RSHELL</span>           <span class="o">=</span> <span class="mf">0.48075_DP</span>
-<a name="ln-18"></a>
-<a name="ln-19"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_parameters</span>
-<a name="ln-20"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                <span class="kd">::</span> <span class="n">GMTINY</span>         <span class="o">=</span> <span class="o">-</span><span class="mf">1.0_DP</span>          <span class="c">!! Smallest G*mass that is fully gravitating</span>
-<a name="ln-21"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                <span class="kd">::</span> <span class="n">min_GMfrag</span>     <span class="o">=</span> <span class="o">-</span><span class="mf">1.0_DP</span>           <span class="c">!! Smallest G*mass that can be produced in a fragmentation event</span>
-<a name="ln-22"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">seed</span>                             <span class="c">!! Random seeds</span>
-<a name="ln-23"></a>      <span class="kt">logical</span>                                 <span class="kd">::</span> <span class="n">lfragmentation</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>         <span class="c">!! Do fragmentation modeling instead of simple merger.</span>
-<a name="ln-24"></a>   <span class="k">contains</span>
-<a name="ln-25"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">reader</span> <span class="o">=&gt;</span> <span class="n">symba_io_param_reader</span>
-<a name="ln-26"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">writer</span> <span class="o">=&gt;</span> <span class="n">symba_io_param_writer</span>
-<a name="ln-27"></a>   <span class="k">end type </span><span class="n">symba_parameters</span>
-<a name="ln-28"></a>
-<a name="ln-29"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-30"></a>   <span class="c">!                                    symba_kinship class definitions and method interfaces</span>
-<a name="ln-31"></a>   <span class="c">!*******************************************************************************************************************************</span>
-<a name="ln-32"></a>   <span class="c">!&gt; Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step.</span>
-<a name="ln-33"></a>   <span class="k">type </span><span class="n">symba_kinship</span>
-<a name="ln-34"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                            <span class="kd">::</span> <span class="n">parent</span> <span class="c">!! Index of parent particle</span>
-<a name="ln-35"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                            <span class="kd">::</span> <span class="n">nchild</span> <span class="c">!! number of children in merger list</span>
-<a name="ln-36"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">child</span>  <span class="c">!! Index of children particles</span>
-<a name="ln-37"></a>   <span class="k">end type </span><span class="n">symba_kinship</span>
-<a name="ln-38"></a>
-<a name="ln-39"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-40"></a>   <span class="c">! symba_cb class definitions and method interfaces</span>
-<a name="ln-41"></a>   <span class="c">!*******************************************************************************************************************************</span>
-<a name="ln-42"></a>   <span class="c">!&gt; SyMBA central body particle class</span>
-<a name="ln-43"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_cb</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_cb</span>
-<a name="ln-44"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">GM0</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Initial G*mass of the central body</span>
-<a name="ln-45"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dGM</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Change in G*mass of the central body</span>
-<a name="ln-46"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">R0</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Initial radius of the central body</span>
-<a name="ln-47"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dR</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Change in the radius of the central body</span>
-<a name="ln-48"></a>   <span class="k">contains</span>
-<a name="ln-49"></a><span class="k">   end type </span><span class="n">symba_cb</span>
-<a name="ln-50"></a>
-<a name="ln-51"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-52"></a>   <span class="c">!                                    symba_pl class definitions and method interfaces</span>
-<a name="ln-53"></a>   <span class="c">!*******************************************************************************************************************************</span>
-<a name="ln-54"></a>   <span class="c">!&gt; SyMBA massive body class</span>
-<a name="ln-55"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_pl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_pl</span>
-<a name="ln-56"></a>      <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lcollision</span> <span class="c">!! flag indicating whether body has merged with another this time step</span>
-<a name="ln-57"></a>      <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencounter</span> <span class="c">!! flag indicating whether body is part of an encounter this time step</span>
-<a name="ln-58"></a>      <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lmtiny</span>     <span class="c">!! flag indicating whether this body is below the GMTINY cutoff value</span>
-<a name="ln-59"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                                         <span class="kd">::</span> <span class="n">nplm</span>       <span class="c">!! number of bodies above the GMTINY limit</span>
-<a name="ln-60"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span>                                         <span class="kd">::</span> <span class="n">nplplm</span>     <span class="c">!! Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix </span>
-<a name="ln-61"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">nplenc</span>     <span class="c">!! number of encounters with other planets this time step</span>
-<a name="ln-62"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">ntpenc</span>     <span class="c">!! number of encounters with test particles this time step</span>
-<a name="ln-63"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelg</span>     <span class="c">!! level at which this body should be moved</span>
-<a name="ln-64"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelm</span>     <span class="c">!! deepest encounter level achieved this time step</span>
-<a name="ln-65"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">isperi</span>     <span class="c">!! perihelion passage flag</span>
-<a name="ln-66"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">peri</span>       <span class="c">!! perihelion distance</span>
-<a name="ln-67"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">atp</span>        <span class="c">!! semimajor axis following perihelion passage</span>
-<a name="ln-68"></a>      <span class="k">type</span><span class="p">(</span><span class="n">symba_kinship</span><span class="p">),</span>       <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">kin</span>        <span class="c">!! Array of merger relationship structures that can account for multiple pairwise mergers in a single step</span>
-<a name="ln-69"></a>   <span class="k">contains</span>
-<a name="ln-70"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">make_colliders</span>  <span class="o">=&gt;</span> <span class="n">symba_collision_make_colliders_pl</span> <span class="c">!! When a single body is involved in more than one collision in a single step, it becomes part of a family</span>
-<a name="ln-71"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="nb">index</span>           <span class="o">=&gt;</span> <span class="n">symba_util_index_eucl_plpl</span>     <span class="c">!! Sets up the (i, j) -&gt; k indexing used for the single-loop blocking Euclidean distance matrix</span>
-<a name="ln-72"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">discard</span>         <span class="o">=&gt;</span> <span class="n">symba_discard_pl</span>               <span class="c">!! Process massive body discards</span>
-<a name="ln-73"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">drift</span>           <span class="o">=&gt;</span> <span class="n">symba_drift_pl</span>                 <span class="c">!! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level</span>
-<a name="ln-74"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">encounter_check</span> <span class="o">=&gt;</span> <span class="n">symba_encounter_check_pl</span>       <span class="c">!! Checks if massive bodies are going through close encounters with each other</span>
-<a name="ln-75"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">accel_int</span>       <span class="o">=&gt;</span> <span class="n">symba_kick_getacch_int_pl</span>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY</span>
-<a name="ln-76"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">accel</span>           <span class="o">=&gt;</span> <span class="n">symba_kick_getacch_pl</span>          <span class="c">!! Compute heliocentric accelerations of massive bodies</span>
-<a name="ln-77"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_pl</span>                 <span class="c">!! Constructor method - Allocates space for the input number of bodies</span>
-<a name="ln-78"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_pl</span>           <span class="c">!! Appends elements from one structure to another</span>
-<a name="ln-79"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">fill</span>            <span class="o">=&gt;</span> <span class="n">symba_util_fill_pl</span>             <span class="c">!! &quot;Fills&quot; bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic)</span>
-<a name="ln-80"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">get_peri</span>        <span class="o">=&gt;</span> <span class="n">symba_util_peri_pl</span>             <span class="c">!! Determine system pericenter passages for massive bodies</span>
-<a name="ln-81"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">rearray</span>         <span class="o">=&gt;</span> <span class="n">symba_util_rearray_pl</span>          <span class="c">!! Clean up the massive body structures to remove discarded bodies and add new bodies</span>
-<a name="ln-82"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">reset_kinship</span>   <span class="o">=&gt;</span> <span class="n">symba_util_reset_kinship</span>       <span class="c">!! Resets the kinship status of bodies</span>
-<a name="ln-83"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resize</span>          <span class="o">=&gt;</span> <span class="n">symba_util_resize_pl</span>           <span class="c">!! Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small.</span>
-<a name="ln-84"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">sort</span>            <span class="o">=&gt;</span> <span class="n">symba_util_sort_pl</span>             <span class="c">!! Sorts body arrays by a sortable componen</span>
-<a name="ln-85"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">rearrange</span>       <span class="o">=&gt;</span> <span class="n">symba_util_sort_rearrange_pl</span>   <span class="c">!! Rearranges the order of array elements of body based on an input index array. Used in sorting methods</span>
-<a name="ln-86"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">spill</span>           <span class="o">=&gt;</span> <span class="n">symba_util_spill_pl</span>            <span class="c">!! &quot;Spills&quot; bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)</span>
-<a name="ln-87"></a>   <span class="k">end type </span><span class="n">symba_pl</span>
-<a name="ln-88"></a>
-<a name="ln-89"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_merger</span>
-<a name="ln-90"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">ncomp</span>
-<a name="ln-91"></a>   <span class="k">contains</span>
-<a name="ln-92"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_merger</span>       <span class="c">!! Appends elements from one structure to another</span>
-<a name="ln-93"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resize</span>          <span class="o">=&gt;</span> <span class="n">symba_util_resize_merger</span>       <span class="c">!! Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small.</span>
-<a name="ln-94"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_merger</span>             <span class="c">!! Constructor method - Allocates space for the input number of bodies</span>
-<a name="ln-95"></a>   <span class="k">end type </span><span class="n">symba_merger</span>
-<a name="ln-96"></a>
-<a name="ln-97"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-98"></a>   <span class="c">!                                    symba_tp class definitions and method interfaces</span>
-<a name="ln-99"></a>   <span class="c">!*******************************************************************************************************************************</span>
-<a name="ln-100"></a>   <span class="c">!&gt; SyMBA test particle class</span>
-<a name="ln-101"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_tp</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_tp</span>
-<a name="ln-102"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">nplenc</span>  <span class="c">!! number of encounters with planets this time step</span>
-<a name="ln-103"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelg</span>  <span class="c">!! level at which this particle should be moved</span>
-<a name="ln-104"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelm</span>  <span class="c">!! deepest encounter level achieved this time step</span>
-<a name="ln-105"></a>   <span class="k">contains</span>
-<a name="ln-106"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">drift</span>           <span class="o">=&gt;</span> <span class="n">symba_drift_tp</span>               <span class="c">!! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level</span>
-<a name="ln-107"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">encounter_check</span> <span class="o">=&gt;</span> <span class="n">symba_encounter_check_tp</span>     <span class="c">!! Checks if any test particles are undergoing a close encounter with a massive body</span>
-<a name="ln-108"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">accel</span>           <span class="o">=&gt;</span> <span class="n">symba_kick_getacch_tp</span>        <span class="c">!! Compute heliocentric accelerations of test particles</span>
-<a name="ln-109"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_tp</span>               <span class="c">!! Constructor method - Allocates space for the input number of bodies</span>
-<a name="ln-110"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_tp</span>         <span class="c">!! Appends elements from one structure to another</span>
-<a name="ln-111"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">fill</span>            <span class="o">=&gt;</span> <span class="n">symba_util_fill_tp</span>           <span class="c">!! &quot;Fills&quot; bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic)</span>
-<a name="ln-112"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resize</span>          <span class="o">=&gt;</span> <span class="n">symba_util_resize_tp</span>         <span class="c">!! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small.</span>
-<a name="ln-113"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">sort</span>            <span class="o">=&gt;</span> <span class="n">symba_util_sort_tp</span>           <span class="c">!! Sorts body arrays by a sortable componen</span>
-<a name="ln-114"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">rearrange</span>       <span class="o">=&gt;</span> <span class="n">symba_util_sort_rearrange_tp</span> <span class="c">!! Rearranges the order of array elements of body based on an input index array. Used in sorting methods</span>
-<a name="ln-115"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">spill</span>           <span class="o">=&gt;</span> <span class="n">symba_util_spill_tp</span>          <span class="c">!! &quot;Spills&quot; bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)</span>
-<a name="ln-116"></a>   <span class="k">end type </span><span class="n">symba_tp</span>
-<a name="ln-117"></a>
-<a name="ln-118"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-119"></a>   <span class="c">!                                    symba_encounter class definitions and method interfaces</span>
-<a name="ln-120"></a>   <span class="c">!*******************************************************************************************************************************</span>
-<a name="ln-121"></a>   <span class="c">!&gt; SyMBA class for tracking close encounters in a step</span>
-<a name="ln-122"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_encounter</span>
-<a name="ln-123"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">level</span>  <span class="c">!! encounter recursion level</span>
-<a name="ln-124"></a>   <span class="k">contains</span>
-<a name="ln-125"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">collision_check</span> <span class="o">=&gt;</span> <span class="n">symba_collision_check_encounter</span> <span class="c">!! Checks if a test particle is going to collide with a massive body</span>
-<a name="ln-126"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">encounter_check</span> <span class="o">=&gt;</span> <span class="n">symba_encounter_check</span>           <span class="c">!! Checks if massive bodies are going through close encounters with each other</span>
-<a name="ln-127"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">kick</span>            <span class="o">=&gt;</span> <span class="n">symba_kick_encounter</span>            <span class="c">!! Kick barycentric velocities of active test particles within SyMBA recursion</span>
-<a name="ln-128"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_encounter</span>           <span class="c">!! A constructor that sets the number of encounters and allocates and initializes all arrays  </span>
-<a name="ln-129"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">copy</span>            <span class="o">=&gt;</span> <span class="n">symba_util_copy_encounter</span>       <span class="c">!! Copies elements from the source encounter list into self.</span>
-<a name="ln-130"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">spill</span>           <span class="o">=&gt;</span> <span class="n">symba_util_spill_encounter</span>      <span class="c">!! &quot;Spills&quot; bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)</span>
-<a name="ln-131"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_encounter</span>     <span class="c">!! Appends elements from one structure to another</span>
-<a name="ln-132"></a>   <span class="k">end type </span><span class="n">symba_encounter</span>
-<a name="ln-133"></a>
-<a name="ln-134"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-135"></a>   <span class="c">!                                    symba_pltpenc class definitions and method interfaces</span>
-<a name="ln-136"></a>   <span class="c">!*******************************************************************************************************************************</span>
-<a name="ln-137"></a>   <span class="c">!&gt; SyMBA class for tracking pl-tp close encounters in a step</span>
-<a name="ln-138"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_pltpenc</span>
-<a name="ln-139"></a>   <span class="k">contains</span>
-<a name="ln-140"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">resolve_collision</span> <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_pltpenc</span> <span class="c">!! Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c</span>
-<a name="ln-141"></a>   <span class="k">end type </span><span class="n">symba_pltpenc</span>
-<a name="ln-142"></a>
-<a name="ln-143"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-144"></a>   <span class="c">!                                    symba_plplenc class definitions and method interfaces</span>
-<a name="ln-145"></a>   <span class="c">!*******************************************************************************************************************************</span>
-<a name="ln-146"></a>   <span class="c">!&gt; SyMBA class for tracking pl-pl close encounters in a step</span>
-<a name="ln-147"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_plplenc</span>
-<a name="ln-148"></a>   <span class="k">contains</span>
-<a name="ln-149"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">extract_collisions</span>     <span class="o">=&gt;</span> <span class="n">symba_collision_encounter_extract_collisions</span> <span class="c">!! Processes the pl-pl encounter list remove only those encounters that led to a collision</span>
-<a name="ln-150"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resolve_fragmentations</span> <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_fragmentations</span>       <span class="c">!! Process list of collisions, determine the collisional regime, and then create fragments</span>
-<a name="ln-151"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resolve_mergers</span>        <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_mergers</span>              <span class="c">!! Process list of collisions and merge colliding bodies together</span>
-<a name="ln-152"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resolve_collision</span>      <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_plplenc</span>              <span class="c">!! Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c</span>
-<a name="ln-153"></a>   <span class="k">end type </span><span class="n">symba_plplenc</span>
-<a name="ln-154"></a>
-<a name="ln-155"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-156"></a>   <span class="c">!  symba_nbody_system class definitions and method interfaces</span>
-<a name="ln-157"></a>   <span class="c">!********************************************************************************************************************************</span>
-<a name="ln-158"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_nbody_system</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_nbody_system</span>
-<a name="ln-159"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_merger</span><span class="p">),</span>  <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">pl_adds</span>            <span class="c">!! List of added bodies in mergers or collisions</span>
-<a name="ln-160"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">pltpenc_list</span>       <span class="c">!! List of massive body-test particle encounters in a single step </span>
-<a name="ln-161"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">plplenc_list</span>       <span class="c">!! List of massive body-massive body encounters in a single step</span>
-<a name="ln-162"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">plplcollision_list</span> <span class="c">!! List of massive body-massive body collisions in a single step</span>
-<a name="ln-163"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                      <span class="kd">::</span> <span class="n">irec</span>               <span class="c">!! System recursion level</span>
-<a name="ln-164"></a>   <span class="k">contains</span>
-<a name="ln-165"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">write_discard</span>      <span class="o">=&gt;</span> <span class="n">symba_io_write_discard</span>             <span class="c">!! Write out information about discarded and merged planets and test particles in SyMBA</span>
-<a name="ln-166"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">initialize</span>         <span class="o">=&gt;</span> <span class="n">symba_setup_initialize_system</span>      <span class="c">!! Performs SyMBA-specific initilization steps</span>
-<a name="ln-167"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">step</span>               <span class="o">=&gt;</span> <span class="n">symba_step_system</span>                  <span class="c">!! Advance the SyMBA nbody system forward in time by one step</span>
-<a name="ln-168"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">interp</span>             <span class="o">=&gt;</span> <span class="n">symba_step_interp_system</span>           <span class="c">!! Perform an interpolation step on the SymBA nbody system </span>
-<a name="ln-169"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">set_recur_levels</span>   <span class="o">=&gt;</span> <span class="n">symba_step_set_recur_levels_system</span> <span class="c">!! Sets recursion levels of bodies and encounter lists to the current system level</span>
-<a name="ln-170"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">recursive_step</span>     <span class="o">=&gt;</span> <span class="n">symba_step_recur_system</span>            <span class="c">!! Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary</span>
-<a name="ln-171"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">reset</span>              <span class="o">=&gt;</span> <span class="n">symba_step_reset_system</span>            <span class="c">!! Resets pl, tp,and encounter structures at the start of a new step </span>
-<a name="ln-172"></a>   <span class="k">end type </span><span class="n">symba_nbody_system</span>
-<a name="ln-173"></a>
-<a name="ln-174"></a>   <span class="k">interface</span>
-<a name="ln-175"></a><span class="k">      module function </span><span class="n">symba_collision_check_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_collision</span><span class="p">)</span>
-<a name="ln-176"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
-<a name="ln-177"></a>         <span class="k">implicit none</span>
-<a name="ln-178"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>           <span class="c">!! SyMBA pl-tp encounter list object</span>
-<a name="ln-179"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>         <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-180"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>          <span class="c">!! Current run configuration parameters </span>
-<a name="ln-181"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>              <span class="c">!! current time</span>
-<a name="ln-182"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>             <span class="c">!! step size</span>
-<a name="ln-183"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>           <span class="c">!! Current recursion level</span>
-<a name="ln-184"></a>         <span class="kt">logical</span>                                   <span class="kd">::</span> <span class="n">lany_collision</span> <span class="c">!! Returns true if cany pair of encounters resulted in a collision n</span>
-<a name="ln-185"></a>      <span class="k">end function </span><span class="n">symba_collision_check_encounter</span>
-<a name="ln-186"></a>
-<a name="ln-187"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_encounter_extract_collisions</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-188"></a>         <span class="k">implicit none</span>
-<a name="ln-189"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
-<a name="ln-190"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-191"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
-<a name="ln-192"></a>      <span class="k">end subroutine</span>
-<a name="ln-193"></a>
-<a name="ln-194"></a><span class="k">      module subroutine </span><span class="n">symba_collision_make_colliders_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span><span class="n">idx</span><span class="p">)</span>
-<a name="ln-195"></a>         <span class="k">implicit none</span>
-<a name="ln-196"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! SyMBA massive body object</span>
-<a name="ln-197"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">idx</span> <span class="c">!! Array holding the indices of the two bodies involved in the collision</span>
-<a name="ln-198"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_make_colliders_pl</span>
-<a name="ln-199"></a>
-<a name="ln-200"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_fragmentations</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-201"></a>         <span class="k">implicit none</span>
-<a name="ln-202"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
-<a name="ln-203"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-204"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
-<a name="ln-205"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_fragmentations</span>
-<a name="ln-206"></a>   
-<a name="ln-207"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_mergers</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-208"></a>         <span class="k">implicit none</span>
-<a name="ln-209"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
-<a name="ln-210"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-211"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
-<a name="ln-212"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_mergers</span>
-<a name="ln-213"></a>
-<a name="ln-214"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_plplenc</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span>
-<a name="ln-215"></a>         <span class="k">implicit none</span>
-<a name="ln-216"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
-<a name="ln-217"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-218"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
-<a name="ln-219"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current simulation time</span>
-<a name="ln-220"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Current simulation step size</span>
-<a name="ln-221"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>   <span class="c">!! Current recursion level</span>
-<a name="ln-222"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_plplenc</span>
-<a name="ln-223"></a>   
-<a name="ln-224"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_pltpenc</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span>
-<a name="ln-225"></a>         <span class="k">implicit none</span>
-<a name="ln-226"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-tp encounter list</span>
-<a name="ln-227"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-228"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
-<a name="ln-229"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current simulation time</span>
-<a name="ln-230"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Current simulation step size</span>
-<a name="ln-231"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>   <span class="c">!! Current recursion level</span>
-<a name="ln-232"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_pltpenc</span>
-<a name="ln-233"></a>
-<a name="ln-234"></a>      <span class="k">module subroutine </span><span class="n">symba_discard_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-235"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
-<a name="ln-236"></a>         <span class="k">implicit none</span>
-<a name="ln-237"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA test particle object</span>
-<a name="ln-238"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-239"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-240"></a>      <span class="k">end subroutine </span><span class="n">symba_discard_pl</span>
-<a name="ln-241"></a>
-<a name="ln-242"></a>      <span class="k">module subroutine </span><span class="n">symba_drift_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
-<a name="ln-243"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
-<a name="ln-244"></a>         <span class="k">implicit none</span>
-<a name="ln-245"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Helio massive body object</span>
-<a name="ln-246"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-247"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-248"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Stepsize</span>
-<a name="ln-249"></a>      <span class="k">end subroutine </span><span class="n">symba_drift_pl</span>
-<a name="ln-250"></a>   
-<a name="ln-251"></a>      <span class="k">module subroutine </span><span class="n">symba_drift_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
-<a name="ln-252"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
-<a name="ln-253"></a>         <span class="k">implicit none</span>
-<a name="ln-254"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Helio massive body object</span>
-<a name="ln-255"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-256"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-257"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Stepsize</span>
-<a name="ln-258"></a>      <span class="k">end subroutine </span><span class="n">symba_drift_tp</span>
-<a name="ln-259"></a>
-<a name="ln-260"></a>      <span class="k">module pure elemental subroutine </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
+<a name="ln-9"></a>   <span class="k">use </span><span class="n">fraggle_classes</span><span class="p">,</span>  <span class="n">only</span> <span class="p">:</span> <span class="n">fraggle_colliders</span><span class="p">,</span> <span class="n">fraggle_fragments</span>
+<a name="ln-10"></a>   <span class="k">implicit none</span>
+<a name="ln-11"></a><span class="k">   public</span>
+<a name="ln-12"></a>
+<a name="ln-13"></a><span class="k">   </span><span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">NENMAX</span>           <span class="o">=</span> <span class="mi">32767</span>
+<a name="ln-14"></a>   <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">NTENC</span>            <span class="o">=</span> <span class="mi">3</span>
+<a name="ln-15"></a>   <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">RHSCALE</span>          <span class="o">=</span> <span class="mf">6.5_DP</span>
+<a name="ln-16"></a>   <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">private</span><span class="p">,</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">RSHELL</span>           <span class="o">=</span> <span class="mf">0.48075_DP</span>
+<a name="ln-17"></a>
+<a name="ln-18"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_parameters</span>
+<a name="ln-19"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                <span class="kd">::</span> <span class="n">GMTINY</span>         <span class="o">=</span> <span class="o">-</span><span class="mf">1.0_DP</span>          <span class="c">!! Smallest G*mass that is fully gravitating</span>
+<a name="ln-20"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                <span class="kd">::</span> <span class="n">min_GMfrag</span>     <span class="o">=</span> <span class="o">-</span><span class="mf">1.0_DP</span>           <span class="c">!! Smallest G*mass that can be produced in a fragmentation event</span>
+<a name="ln-21"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">seed</span>                             <span class="c">!! Random seeds</span>
+<a name="ln-22"></a>      <span class="kt">logical</span>                                 <span class="kd">::</span> <span class="n">lfragmentation</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>         <span class="c">!! Do fragmentation modeling instead of simple merger.</span>
+<a name="ln-23"></a>   <span class="k">contains</span>
+<a name="ln-24"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">reader</span> <span class="o">=&gt;</span> <span class="n">symba_io_param_reader</span>
+<a name="ln-25"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">writer</span> <span class="o">=&gt;</span> <span class="n">symba_io_param_writer</span>
+<a name="ln-26"></a>   <span class="k">end type </span><span class="n">symba_parameters</span>
+<a name="ln-27"></a>
+<a name="ln-28"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-29"></a>   <span class="c">!                                    symba_kinship class definitions and method interfaces</span>
+<a name="ln-30"></a>   <span class="c">!*******************************************************************************************************************************</span>
+<a name="ln-31"></a>   <span class="c">!&gt; Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step.</span>
+<a name="ln-32"></a>   <span class="k">type </span><span class="n">symba_kinship</span>
+<a name="ln-33"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                            <span class="kd">::</span> <span class="n">parent</span> <span class="c">!! Index of parent particle</span>
+<a name="ln-34"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                            <span class="kd">::</span> <span class="n">nchild</span> <span class="c">!! number of children in merger list</span>
+<a name="ln-35"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">child</span>  <span class="c">!! Index of children particles</span>
+<a name="ln-36"></a>   <span class="k">end type </span><span class="n">symba_kinship</span>
+<a name="ln-37"></a>
+<a name="ln-38"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-39"></a>   <span class="c">! symba_cb class definitions and method interfaces</span>
+<a name="ln-40"></a>   <span class="c">!*******************************************************************************************************************************</span>
+<a name="ln-41"></a>   <span class="c">!&gt; SyMBA central body particle class</span>
+<a name="ln-42"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_cb</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_cb</span>
+<a name="ln-43"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">GM0</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Initial G*mass of the central body</span>
+<a name="ln-44"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dGM</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Change in G*mass of the central body</span>
+<a name="ln-45"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">R0</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Initial radius of the central body</span>
+<a name="ln-46"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dR</span>  <span class="o">=</span> <span class="mf">0.0_DP</span> <span class="c">!! Change in the radius of the central body</span>
+<a name="ln-47"></a>   <span class="k">contains</span>
+<a name="ln-48"></a><span class="k">   end type </span><span class="n">symba_cb</span>
+<a name="ln-49"></a>
+<a name="ln-50"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-51"></a>   <span class="c">!                                    symba_pl class definitions and method interfaces</span>
+<a name="ln-52"></a>   <span class="c">!*******************************************************************************************************************************</span>
+<a name="ln-53"></a>   <span class="c">!&gt; SyMBA massive body class</span>
+<a name="ln-54"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_pl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_pl</span>
+<a name="ln-55"></a>      <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lcollision</span> <span class="c">!! flag indicating whether body has merged with another this time step</span>
+<a name="ln-56"></a>      <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencounter</span> <span class="c">!! flag indicating whether body is part of an encounter this time step</span>
+<a name="ln-57"></a>      <span class="kt">logical</span><span class="p">,</span>                   <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lmtiny</span>     <span class="c">!! flag indicating whether this body is below the GMTINY cutoff value</span>
+<a name="ln-58"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                                         <span class="kd">::</span> <span class="n">nplm</span>       <span class="c">!! number of bodies above the GMTINY limit</span>
+<a name="ln-59"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span>                                         <span class="kd">::</span> <span class="n">nplplm</span>     <span class="c">!! Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix </span>
+<a name="ln-60"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">nplenc</span>     <span class="c">!! number of encounters with other planets this time step</span>
+<a name="ln-61"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">ntpenc</span>     <span class="c">!! number of encounters with test particles this time step</span>
+<a name="ln-62"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelg</span>     <span class="c">!! level at which this body should be moved</span>
+<a name="ln-63"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelm</span>     <span class="c">!! deepest encounter level achieved this time step</span>
+<a name="ln-64"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">isperi</span>     <span class="c">!! perihelion passage flag</span>
+<a name="ln-65"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">peri</span>       <span class="c">!! perihelion distance</span>
+<a name="ln-66"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">atp</span>        <span class="c">!! semimajor axis following perihelion passage</span>
+<a name="ln-67"></a>      <span class="k">type</span><span class="p">(</span><span class="n">symba_kinship</span><span class="p">),</span>       <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">kin</span>        <span class="c">!! Array of merger relationship structures that can account for multiple pairwise mergers in a single step</span>
+<a name="ln-68"></a>   <span class="k">contains</span>
+<a name="ln-69"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">make_colliders</span>  <span class="o">=&gt;</span> <span class="n">symba_collision_make_colliders_pl</span> <span class="c">!! When a single body is involved in more than one collision in a single step, it becomes part of a family</span>
+<a name="ln-70"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="nb">index</span>           <span class="o">=&gt;</span> <span class="n">symba_util_index_eucl_plpl</span>     <span class="c">!! Sets up the (i, j) -&gt; k indexing used for the single-loop blocking Euclidean distance matrix</span>
+<a name="ln-71"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">discard</span>         <span class="o">=&gt;</span> <span class="n">symba_discard_pl</span>               <span class="c">!! Process massive body discards</span>
+<a name="ln-72"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">drift</span>           <span class="o">=&gt;</span> <span class="n">symba_drift_pl</span>                 <span class="c">!! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level</span>
+<a name="ln-73"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">encounter_check</span> <span class="o">=&gt;</span> <span class="n">symba_encounter_check_pl</span>       <span class="c">!! Checks if massive bodies are going through close encounters with each other</span>
+<a name="ln-74"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">accel_int</span>       <span class="o">=&gt;</span> <span class="n">symba_kick_getacch_int_pl</span>      <span class="c">!! Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY</span>
+<a name="ln-75"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">accel</span>           <span class="o">=&gt;</span> <span class="n">symba_kick_getacch_pl</span>          <span class="c">!! Compute heliocentric accelerations of massive bodies</span>
+<a name="ln-76"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_pl</span>                 <span class="c">!! Constructor method - Allocates space for the input number of bodies</span>
+<a name="ln-77"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_pl</span>           <span class="c">!! Appends elements from one structure to another</span>
+<a name="ln-78"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">fill</span>            <span class="o">=&gt;</span> <span class="n">symba_util_fill_pl</span>             <span class="c">!! &quot;Fills&quot; bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic)</span>
+<a name="ln-79"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">get_peri</span>        <span class="o">=&gt;</span> <span class="n">symba_util_peri_pl</span>             <span class="c">!! Determine system pericenter passages for massive bodies</span>
+<a name="ln-80"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">rearray</span>         <span class="o">=&gt;</span> <span class="n">symba_util_rearray_pl</span>          <span class="c">!! Clean up the massive body structures to remove discarded bodies and add new bodies</span>
+<a name="ln-81"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">reset_kinship</span>   <span class="o">=&gt;</span> <span class="n">symba_util_reset_kinship</span>       <span class="c">!! Resets the kinship status of bodies</span>
+<a name="ln-82"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resize</span>          <span class="o">=&gt;</span> <span class="n">symba_util_resize_pl</span>           <span class="c">!! Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small.</span>
+<a name="ln-83"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">sort</span>            <span class="o">=&gt;</span> <span class="n">symba_util_sort_pl</span>             <span class="c">!! Sorts body arrays by a sortable componen</span>
+<a name="ln-84"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">rearrange</span>       <span class="o">=&gt;</span> <span class="n">symba_util_sort_rearrange_pl</span>   <span class="c">!! Rearranges the order of array elements of body based on an input index array. Used in sorting methods</span>
+<a name="ln-85"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">spill</span>           <span class="o">=&gt;</span> <span class="n">symba_util_spill_pl</span>            <span class="c">!! &quot;Spills&quot; bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)</span>
+<a name="ln-86"></a>   <span class="k">end type </span><span class="n">symba_pl</span>
+<a name="ln-87"></a>
+<a name="ln-88"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_merger</span>
+<a name="ln-89"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">ncomp</span>
+<a name="ln-90"></a>   <span class="k">contains</span>
+<a name="ln-91"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_merger</span>       <span class="c">!! Appends elements from one structure to another</span>
+<a name="ln-92"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resize</span>          <span class="o">=&gt;</span> <span class="n">symba_util_resize_merger</span>       <span class="c">!! Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small.</span>
+<a name="ln-93"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_merger</span>             <span class="c">!! Constructor method - Allocates space for the input number of bodies</span>
+<a name="ln-94"></a>   <span class="k">end type </span><span class="n">symba_merger</span>
+<a name="ln-95"></a>
+<a name="ln-96"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-97"></a>   <span class="c">!                                    symba_tp class definitions and method interfaces</span>
+<a name="ln-98"></a>   <span class="c">!*******************************************************************************************************************************</span>
+<a name="ln-99"></a>   <span class="c">!&gt; SyMBA test particle class</span>
+<a name="ln-100"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_tp</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_tp</span>
+<a name="ln-101"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">nplenc</span>  <span class="c">!! number of encounters with planets this time step</span>
+<a name="ln-102"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelg</span>  <span class="c">!! level at which this particle should be moved</span>
+<a name="ln-103"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">levelm</span>  <span class="c">!! deepest encounter level achieved this time step</span>
+<a name="ln-104"></a>   <span class="k">contains</span>
+<a name="ln-105"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">drift</span>           <span class="o">=&gt;</span> <span class="n">symba_drift_tp</span>               <span class="c">!! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level</span>
+<a name="ln-106"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">encounter_check</span> <span class="o">=&gt;</span> <span class="n">symba_encounter_check_tp</span>     <span class="c">!! Checks if any test particles are undergoing a close encounter with a massive body</span>
+<a name="ln-107"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">accel</span>           <span class="o">=&gt;</span> <span class="n">symba_kick_getacch_tp</span>        <span class="c">!! Compute heliocentric accelerations of test particles</span>
+<a name="ln-108"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_tp</span>               <span class="c">!! Constructor method - Allocates space for the input number of bodies</span>
+<a name="ln-109"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_tp</span>         <span class="c">!! Appends elements from one structure to another</span>
+<a name="ln-110"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">fill</span>            <span class="o">=&gt;</span> <span class="n">symba_util_fill_tp</span>           <span class="c">!! &quot;Fills&quot; bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic)</span>
+<a name="ln-111"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resize</span>          <span class="o">=&gt;</span> <span class="n">symba_util_resize_tp</span>         <span class="c">!! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small.</span>
+<a name="ln-112"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">sort</span>            <span class="o">=&gt;</span> <span class="n">symba_util_sort_tp</span>           <span class="c">!! Sorts body arrays by a sortable componen</span>
+<a name="ln-113"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">rearrange</span>       <span class="o">=&gt;</span> <span class="n">symba_util_sort_rearrange_tp</span> <span class="c">!! Rearranges the order of array elements of body based on an input index array. Used in sorting methods</span>
+<a name="ln-114"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">spill</span>           <span class="o">=&gt;</span> <span class="n">symba_util_spill_tp</span>          <span class="c">!! &quot;Spills&quot; bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)</span>
+<a name="ln-115"></a>   <span class="k">end type </span><span class="n">symba_tp</span>
+<a name="ln-116"></a>
+<a name="ln-117"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-118"></a>   <span class="c">!                                    symba_encounter class definitions and method interfaces</span>
+<a name="ln-119"></a>   <span class="c">!*******************************************************************************************************************************</span>
+<a name="ln-120"></a>   <span class="c">!&gt; SyMBA class for tracking close encounters in a step</span>
+<a name="ln-121"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">swiftest_encounter</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_encounter</span>
+<a name="ln-122"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">level</span>  <span class="c">!! encounter recursion level</span>
+<a name="ln-123"></a>   <span class="k">contains</span>
+<a name="ln-124"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">collision_check</span> <span class="o">=&gt;</span> <span class="n">symba_collision_check_encounter</span> <span class="c">!! Checks if a test particle is going to collide with a massive body</span>
+<a name="ln-125"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">encounter_check</span> <span class="o">=&gt;</span> <span class="n">symba_encounter_check</span>           <span class="c">!! Checks if massive bodies are going through close encounters with each other</span>
+<a name="ln-126"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">kick</span>            <span class="o">=&gt;</span> <span class="n">symba_kick_encounter</span>            <span class="c">!! Kick barycentric velocities of active test particles within SyMBA recursion</span>
+<a name="ln-127"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">setup</span>           <span class="o">=&gt;</span> <span class="n">symba_setup_encounter</span>           <span class="c">!! A constructor that sets the number of encounters and allocates and initializes all arrays  </span>
+<a name="ln-128"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">copy</span>            <span class="o">=&gt;</span> <span class="n">symba_util_copy_encounter</span>       <span class="c">!! Copies elements from the source encounter list into self.</span>
+<a name="ln-129"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">spill</span>           <span class="o">=&gt;</span> <span class="n">symba_util_spill_encounter</span>      <span class="c">!! &quot;Spills&quot; bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)</span>
+<a name="ln-130"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">append</span>          <span class="o">=&gt;</span> <span class="n">symba_util_append_encounter</span>     <span class="c">!! Appends elements from one structure to another</span>
+<a name="ln-131"></a>   <span class="k">end type </span><span class="n">symba_encounter</span>
+<a name="ln-132"></a>
+<a name="ln-133"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-134"></a>   <span class="c">!                                    symba_pltpenc class definitions and method interfaces</span>
+<a name="ln-135"></a>   <span class="c">!*******************************************************************************************************************************</span>
+<a name="ln-136"></a>   <span class="c">!&gt; SyMBA class for tracking pl-tp close encounters in a step</span>
+<a name="ln-137"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_pltpenc</span>
+<a name="ln-138"></a>   <span class="k">contains</span>
+<a name="ln-139"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">resolve_collision</span> <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_pltpenc</span> <span class="c">!! Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c</span>
+<a name="ln-140"></a>   <span class="k">end type </span><span class="n">symba_pltpenc</span>
+<a name="ln-141"></a>
+<a name="ln-142"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-143"></a>   <span class="c">!                                    symba_plplenc class definitions and method interfaces</span>
+<a name="ln-144"></a>   <span class="c">!*******************************************************************************************************************************</span>
+<a name="ln-145"></a>   <span class="c">!&gt; SyMBA class for tracking pl-pl close encounters in a step</span>
+<a name="ln-146"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_plplenc</span>
+<a name="ln-147"></a>   <span class="k">contains</span>
+<a name="ln-148"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">extract_collisions</span>     <span class="o">=&gt;</span> <span class="n">symba_collision_encounter_extract_collisions</span> <span class="c">!! Processes the pl-pl encounter list remove only those encounters that led to a collision</span>
+<a name="ln-149"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resolve_fragmentations</span> <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_fragmentations</span>       <span class="c">!! Process list of collisions, determine the collisional regime, and then create fragments</span>
+<a name="ln-150"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resolve_mergers</span>        <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_mergers</span>              <span class="c">!! Process list of collisions and merge colliding bodies together</span>
+<a name="ln-151"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">resolve_collision</span>      <span class="o">=&gt;</span> <span class="n">symba_collision_resolve_plplenc</span>              <span class="c">!! Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c</span>
+<a name="ln-152"></a>   <span class="k">end type </span><span class="n">symba_plplenc</span>
+<a name="ln-153"></a>
+<a name="ln-154"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-155"></a>   <span class="c">!  symba_nbody_system class definitions and method interfaces</span>
+<a name="ln-156"></a>   <span class="c">!********************************************************************************************************************************</span>
+<a name="ln-157"></a>   <span class="k">type</span><span class="p">,</span> <span class="k">extends</span><span class="p">(</span><span class="n">helio_nbody_system</span><span class="p">)</span> <span class="kd">::</span> <span class="n">symba_nbody_system</span>
+<a name="ln-158"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_merger</span><span class="p">),</span>  <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">pl_adds</span>            <span class="c">!! List of added bodies in mergers or collisions</span>
+<a name="ln-159"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">pltpenc_list</span>       <span class="c">!! List of massive body-test particle encounters in a single step </span>
+<a name="ln-160"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">plplenc_list</span>       <span class="c">!! List of massive body-massive body encounters in a single step</span>
+<a name="ln-161"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">plplcollision_list</span> <span class="c">!! List of massive body-massive body collisions in a single step</span>
+<a name="ln-162"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                      <span class="kd">::</span> <span class="n">irec</span>               <span class="c">!! System recursion level</span>
+<a name="ln-163"></a>   <span class="k">contains</span>
+<a name="ln-164"></a><span class="k">      procedure</span> <span class="kd">::</span> <span class="n">write_discard</span>      <span class="o">=&gt;</span> <span class="n">symba_io_write_discard</span>             <span class="c">!! Write out information about discarded and merged planets and test particles in SyMBA</span>
+<a name="ln-165"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">initialize</span>         <span class="o">=&gt;</span> <span class="n">symba_setup_initialize_system</span>      <span class="c">!! Performs SyMBA-specific initilization steps</span>
+<a name="ln-166"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">step</span>               <span class="o">=&gt;</span> <span class="n">symba_step_system</span>                  <span class="c">!! Advance the SyMBA nbody system forward in time by one step</span>
+<a name="ln-167"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">interp</span>             <span class="o">=&gt;</span> <span class="n">symba_step_interp_system</span>           <span class="c">!! Perform an interpolation step on the SymBA nbody system </span>
+<a name="ln-168"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">set_recur_levels</span>   <span class="o">=&gt;</span> <span class="n">symba_step_set_recur_levels_system</span> <span class="c">!! Sets recursion levels of bodies and encounter lists to the current system level</span>
+<a name="ln-169"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">recursive_step</span>     <span class="o">=&gt;</span> <span class="n">symba_step_recur_system</span>            <span class="c">!! Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary</span>
+<a name="ln-170"></a>      <span class="k">procedure</span> <span class="kd">::</span> <span class="n">reset</span>              <span class="o">=&gt;</span> <span class="n">symba_step_reset_system</span>            <span class="c">!! Resets pl, tp,and encounter structures at the start of a new step </span>
+<a name="ln-171"></a>   <span class="k">end type </span><span class="n">symba_nbody_system</span>
+<a name="ln-172"></a>
+<a name="ln-173"></a>   <span class="k">interface</span>
+<a name="ln-174"></a><span class="k">      module function </span><span class="n">symba_collision_check_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_collision</span><span class="p">)</span>
+<a name="ln-175"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_parameters</span>
+<a name="ln-176"></a>         <span class="k">implicit none</span>
+<a name="ln-177"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>           <span class="c">!! SyMBA pl-tp encounter list object</span>
+<a name="ln-178"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>         <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-179"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>          <span class="c">!! Current run configuration parameters </span>
+<a name="ln-180"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>              <span class="c">!! current time</span>
+<a name="ln-181"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>             <span class="c">!! step size</span>
+<a name="ln-182"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>           <span class="c">!! Current recursion level</span>
+<a name="ln-183"></a>         <span class="kt">logical</span>                                   <span class="kd">::</span> <span class="n">lany_collision</span> <span class="c">!! Returns true if cany pair of encounters resulted in a collision n</span>
+<a name="ln-184"></a>      <span class="k">end function </span><span class="n">symba_collision_check_encounter</span>
+<a name="ln-185"></a>
+<a name="ln-186"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_encounter_extract_collisions</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-187"></a>         <span class="k">implicit none</span>
+<a name="ln-188"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
+<a name="ln-189"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-190"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters</span>
+<a name="ln-191"></a>      <span class="k">end subroutine</span>
+<a name="ln-192"></a>
+<a name="ln-193"></a><span class="k">      module subroutine </span><span class="n">symba_collision_make_colliders_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span><span class="n">idx</span><span class="p">)</span>
+<a name="ln-194"></a>         <span class="k">implicit none</span>
+<a name="ln-195"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span> <span class="c">!! SyMBA massive body object</span>
+<a name="ln-196"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">idx</span> <span class="c">!! Array holding the indices of the two bodies involved in the collision</span>
+<a name="ln-197"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_make_colliders_pl</span>
+<a name="ln-198"></a>
+<a name="ln-199"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_fragmentations</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-200"></a>         <span class="k">implicit none</span>
+<a name="ln-201"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
+<a name="ln-202"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-203"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
+<a name="ln-204"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_fragmentations</span>
+<a name="ln-205"></a>   
+<a name="ln-206"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_mergers</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-207"></a>         <span class="k">implicit none</span>
+<a name="ln-208"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
+<a name="ln-209"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-210"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
+<a name="ln-211"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_mergers</span>
+<a name="ln-212"></a>
+<a name="ln-213"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_plplenc</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span>
+<a name="ln-214"></a>         <span class="k">implicit none</span>
+<a name="ln-215"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_plplenc</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-pl encounter list</span>
+<a name="ln-216"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-217"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
+<a name="ln-218"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current simulation time</span>
+<a name="ln-219"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Current simulation step size</span>
+<a name="ln-220"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>   <span class="c">!! Current recursion level</span>
+<a name="ln-221"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_plplenc</span>
+<a name="ln-222"></a>   
+<a name="ln-223"></a>      <span class="k">module subroutine </span><span class="n">symba_collision_resolve_pltpenc</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span>
+<a name="ln-224"></a>         <span class="k">implicit none</span>
+<a name="ln-225"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">),</span>       <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-tp encounter list</span>
+<a name="ln-226"></a>         <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span>  <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-227"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters with SyMBA additions</span>
+<a name="ln-228"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current simulation time</span>
+<a name="ln-229"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Current simulation step size</span>
+<a name="ln-230"></a>         <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>   <span class="c">!! Current recursion level</span>
+<a name="ln-231"></a>      <span class="k">end subroutine </span><span class="n">symba_collision_resolve_pltpenc</span>
+<a name="ln-232"></a>
+<a name="ln-233"></a>      <span class="k">module subroutine </span><span class="n">symba_discard_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-234"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
+<a name="ln-235"></a>         <span class="k">implicit none</span>
+<a name="ln-236"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA test particle object</span>
+<a name="ln-237"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-238"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-239"></a>      <span class="k">end subroutine </span><span class="n">symba_discard_pl</span>
+<a name="ln-240"></a>
+<a name="ln-241"></a>      <span class="k">module subroutine </span><span class="n">symba_drift_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
+<a name="ln-242"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
+<a name="ln-243"></a>         <span class="k">implicit none</span>
+<a name="ln-244"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Helio massive body object</span>
+<a name="ln-245"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-246"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-247"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Stepsize</span>
+<a name="ln-248"></a>      <span class="k">end subroutine </span><span class="n">symba_drift_pl</span>
+<a name="ln-249"></a>   
+<a name="ln-250"></a>      <span class="k">module subroutine </span><span class="n">symba_drift_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
+<a name="ln-251"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_nbody_system</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
+<a name="ln-252"></a>         <span class="k">implicit none</span>
+<a name="ln-253"></a><span class="k">         class</span><span class="p">(</span><span class="n">symba_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! Helio massive body object</span>
+<a name="ln-254"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-255"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-256"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! Stepsize</span>
+<a name="ln-257"></a>      <span class="k">end subroutine </span><span class="n">symba_drift_tp</span>
+<a name="ln-258"></a>
+<a name="ln-259"></a>      <span class="k">module pure subroutine </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
+<a name="ln-260"></a>         <span class="c">!$omp declare simd(symba_encounter_check_one)</span>
 <a name="ln-261"></a>         <span class="k">implicit none</span>
 <a name="ln-262"></a><span class="k">         </span><span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span>
 <a name="ln-263"></a>         <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span>
diff --git a/docs/sourcefile/symba_collision.f90.html b/docs/sourcefile/symba_collision.f90.html
index 6573c0ef6..e8bd57050 100644
--- a/docs/sourcefile/symba_collision.f90.html
+++ b/docs/sourcefile/symba_collision.f90.html
@@ -134,7 +134,7 @@ <h1>symba_collision.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 4.7% of total for source files.">758 statements</a>
+    title=" 4.6% of total for source files.">758 statements</a>
      </li> 
      
      
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_collision.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_collisionf90EfferentGraph" width="641pt" height="254pt"
- viewBox="0.00 0.00 641.00 254.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_collisionf90EfferentGraph" width="641pt" height="247pt"
+ viewBox="0.00 0.00 641.00 246.52" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_collision.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 930,-366.74 930,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 930,-355.2 930,4 -4,4"/>
 <!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_collision.f90</title>
-<polygon fill="none" stroke="black" points="926,-189.48 820,-189.48 820,-165.48 926,-165.48 926,-189.48"/>
-<text text-anchor="middle" x="873" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision.f90</text>
+<polygon fill="none" stroke="black" points="926,-241.11 820,-241.11 820,-217.11 926,-217.11 926,-241.11"/>
+<text text-anchor="middle" x="873" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_collision.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.76,-181.77C781.58,-184.91 729.69,-189.17 689.59,-192.46"/>
-<polygon fill="#000000" stroke="#000000" points="689.08,-188.99 679.4,-193.3 689.65,-195.97 689.08,-188.99"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.96,-233.37C781.51,-236.53 729.05,-240.83 688.7,-244.13"/>
+<polygon fill="#000000" stroke="#000000" points="688.39,-240.65 678.71,-244.95 688.96,-247.62 688.39,-240.65"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.72,-168.77C811.19,-167.35 802.45,-165.89 794.21,-164.51"/>
-<polygon fill="#000000" stroke="#000000" points="794.52,-161.02 784.08,-162.83 793.37,-167.92 794.52,-161.02"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.72,-220.39C811.19,-218.97 802.45,-217.52 794.21,-216.14"/>
+<polygon fill="#000000" stroke="#000000" points="794.52,-212.65 784.08,-214.45 793.37,-219.55 794.52,-212.65"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_collision.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_collision.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/symba_discard.f90.html b/docs/sourcefile/symba_discard.f90.html
index 8653cf188..fea94e20c 100644
--- a/docs/sourcefile/symba_discard.f90.html
+++ b/docs/sourcefile/symba_discard.f90.html
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_discard.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_discardf90EfferentGraph" width="641pt" height="255pt"
- viewBox="0.00 0.00 641.00 255.26" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_discardf90EfferentGraph" width="641pt" height="247pt"
+ viewBox="0.00 0.00 641.00 247.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_discard.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 927,-366.74 927,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 927,-355.2 927,4 -4,4"/>
 <!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_discard.f90</title>
-<polygon fill="none" stroke="black" points="923,-189.48 820,-189.48 820,-165.48 923,-165.48 923,-189.48"/>
-<text text-anchor="middle" x="871.5" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_discard.f90</text>
+<polygon fill="none" stroke="black" points="923,-241.11 820,-241.11 820,-217.11 923,-217.11 923,-241.11"/>
+<text text-anchor="middle" x="871.5" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_discard.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.77,-181.67C781.69,-184.82 729.41,-189.14 689.13,-192.47"/>
-<polygon fill="#000000" stroke="#000000" points="688.84,-188.98 679.16,-193.29 689.42,-195.96 688.84,-188.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.96,-233.28C781.83,-236.42 729.35,-240.75 688.9,-244.09"/>
+<polygon fill="#000000" stroke="#000000" points="688.57,-240.6 678.89,-244.91 689.15,-247.58 688.57,-240.6"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-168.94C811.31,-167.49 802.48,-166 794.14,-164.59"/>
-<polygon fill="#000000" stroke="#000000" points="794.71,-161.14 784.26,-162.93 793.54,-168.04 794.71,-161.14"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-220.57C811.31,-219.12 802.48,-217.63 794.14,-216.22"/>
+<polygon fill="#000000" stroke="#000000" points="794.71,-212.77 784.26,-214.55 793.54,-219.67 794.71,-212.77"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_discard.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_discard.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/symba_drift.f90.html b/docs/sourcefile/symba_drift.f90.html
index 2f951d83f..3b2586de2 100644
--- a/docs/sourcefile/symba_drift.f90.html
+++ b/docs/sourcefile/symba_drift.f90.html
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_drift.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_driftf90EfferentGraph" width="641pt" height="260pt"
- viewBox="0.00 0.00 641.00 260.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_driftf90EfferentGraph" width="641pt" height="252pt"
+ viewBox="0.00 0.00 641.00 251.91" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_drift.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 910,-366.74 910,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 910,-355.2 910,4 -4,4"/>
 <!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_drift.f90</title>
-<polygon fill="none" stroke="black" points="906,-189.48 820,-189.48 820,-165.48 906,-165.48 906,-189.48"/>
-<text text-anchor="middle" x="863" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_drift.f90</text>
+<polygon fill="none" stroke="black" points="906,-241.11 820,-241.11 820,-217.11 906,-217.11 906,-241.11"/>
+<text text-anchor="middle" x="863" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_drift.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.99,-181.08C783.55,-184.2 730.37,-188.76 689.29,-192.27"/>
-<polygon fill="#000000" stroke="#000000" points="688.79,-188.8 679.12,-193.14 689.38,-195.78 688.79,-188.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-232.71C783.38,-235.83 730.08,-240.38 688.92,-243.9"/>
+<polygon fill="#000000" stroke="#000000" points="688.4,-240.43 678.73,-244.77 688.99,-247.41 688.4,-240.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-169.81C811.34,-168.27 802.48,-166.66 794.04,-165.12"/>
-<polygon fill="#000000" stroke="#000000" points="794.48,-161.65 784.02,-163.3 793.23,-168.53 794.48,-161.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-221.43C811.34,-219.9 802.48,-218.29 794.04,-216.75"/>
+<polygon fill="#000000" stroke="#000000" points="794.48,-213.28 784.02,-214.93 793.23,-220.16 794.48,-213.28"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_drift.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/symba_encounter_check.f90.html b/docs/sourcefile/symba_encounter_check.f90.html
index 312115a05..ebd097d9e 100644
--- a/docs/sourcefile/symba_encounter_check.f90.html
+++ b/docs/sourcefile/symba_encounter_check.f90.html
@@ -134,7 +134,7 @@ <h1>symba_encounter_check.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.3% of total for source files.">215 statements</a>
+    title=" 1.4% of total for source files.">232 statements</a>
      </li> 
      
      
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_encounter_check.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_encounter_checkf90EfferentGraph" width="641pt" height="243pt"
- viewBox="0.00 0.00 641.00 242.99" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_encounter_checkf90EfferentGraph" width="641pt" height="235pt"
+ viewBox="0.00 0.00 641.00 235.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph" class="graph" transform="scale(0.66 0.66) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_encounter_check.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 974,-366.74 974,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 974,-355.2 974,4 -4,4"/>
 <!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_encounter_check.f90</title>
-<polygon fill="none" stroke="black" points="970,-189.48 820,-189.48 820,-165.48 970,-165.48 970,-189.48"/>
-<text text-anchor="middle" x="895" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_encounter_check.f90</text>
+<polygon fill="none" stroke="black" points="970,-241.11 820,-241.11 820,-217.11 970,-217.11 970,-241.11"/>
+<text text-anchor="middle" x="895" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_encounter_check.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.69,-183.08C778.57,-186.18 728.1,-189.98 689.35,-192.9"/>
-<polygon fill="#000000" stroke="#000000" points="688.96,-189.42 679.25,-193.66 689.49,-196.4 688.96,-189.42"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-234.68C778.56,-237.79 727.69,-241.61 688.72,-244.54"/>
+<polygon fill="#000000" stroke="#000000" points="688.28,-241.07 678.57,-245.31 688.81,-248.05 688.28,-241.07"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.67,-167.01C810.99,-165.79 802.38,-164.58 794.36,-163.45"/>
-<polygon fill="#000000" stroke="#000000" points="794.58,-159.94 784.19,-162.01 793.6,-166.87 794.58,-159.94"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.67,-218.64C810.99,-217.42 802.38,-216.2 794.36,-215.07"/>
+<polygon fill="#000000" stroke="#000000" points="794.58,-211.57 784.19,-213.64 793.6,-218.5 794.58,-211.57"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_encounter_check.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_encounter_check.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
@@ -630,268 +628,287 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-18"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span>
 <a name="ln-19"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
 <a name="ln-20"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span>
-<a name="ln-21"></a>
-<a name="ln-22"></a>      <span class="c">!$omp parallel do default(private)&amp;</span>
-<a name="ln-23"></a>      <span class="c">!$omp shared(nplplm, k_plpl, x, v, rhill, dt, irec, lencounter, loc_lvdotr)</span>
-<a name="ln-24"></a>      <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">nplplm</span>
-<a name="ln-25"></a>         <span class="n">i</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
-<a name="ln-26"></a>         <span class="n">j</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
-<a name="ln-27"></a>         <span class="n">xr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-28"></a>         <span class="n">yr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-29"></a>         <span class="n">zr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-30"></a>         <span class="n">vxr</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-31"></a>         <span class="n">vyr</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-32"></a>         <span class="n">vzr</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
-<a name="ln-33"></a>         <span class="n">rhill1</span> <span class="o">=</span> <span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-34"></a>         <span class="n">rhill2</span> <span class="o">=</span> <span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
-<a name="ln-35"></a>         <span class="n">lencounter</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-36"></a>         <span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-37"></a>         <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">(</span><span class="n">k</span><span class="p">),</span> <span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-38"></a>      <span class="k">end do</span>
-<a name="ln-39"></a>      <span class="c">!$omp end parallel do</span>
-<a name="ln-40"></a>
-<a name="ln-41"></a>      <span class="k">return</span>
-<a name="ln-42"></a><span class="k">   end subroutine </span><span class="n">symba_encounter_check_all</span>
+<a name="ln-21"></a>      
+<a name="ln-22"></a>      <span class="c">!$omp parallel do simd default(private) schedule(static)&amp;</span>
+<a name="ln-23"></a>      <span class="c">!$omp shared(nplplm, k_plpl, x, v, rhill,  dt, irec, lencounter, loc_lvdotr) &amp;</span>
+<a name="ln-24"></a>      <span class="c">!$omp lastprivate(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2)</span>
+<a name="ln-25"></a>      <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">nplplm</span>
+<a name="ln-26"></a>         <span class="n">i</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-27"></a>         <span class="n">j</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-28"></a>         <span class="n">xr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
+<a name="ln-29"></a>         <span class="n">yr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
+<a name="ln-30"></a>         <span class="n">zr</span> <span class="o">=</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">x</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
+<a name="ln-31"></a>         <span class="n">vxr</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">v</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
+<a name="ln-32"></a>         <span class="n">vyr</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">v</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
+<a name="ln-33"></a>         <span class="n">vzr</span> <span class="o">=</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">v</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span>
+<a name="ln-34"></a>         <span class="n">rhill1</span> <span class="o">=</span> <span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-35"></a>         <span class="n">rhill2</span> <span class="o">=</span> <span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
+<a name="ln-36"></a>         <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">(</span><span class="n">k</span><span class="p">),</span> <span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-37"></a>      <span class="k">end do</span>
+<a name="ln-38"></a>      <span class="c">!$omp end parallel do simd</span>
+<a name="ln-39"></a>
+<a name="ln-40"></a>      <span class="k">return</span>
+<a name="ln-41"></a><span class="k">   end subroutine </span><span class="n">symba_encounter_check_all</span>
+<a name="ln-42"></a>
 <a name="ln-43"></a>
-<a name="ln-44"></a>
-<a name="ln-45"></a>   <span class="k">module function </span><span class="n">symba_encounter_check_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span>
-<a name="ln-46"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-47"></a>      <span class="c">!!</span>
-<a name="ln-48"></a>      <span class="c">!! Check for an encounter between massive bodies.</span>
-<a name="ln-49"></a>      <span class="c">!!</span>
-<a name="ln-50"></a>      <span class="k">implicit none</span>
-<a name="ln-51"></a>      <span class="c">! Arguments</span>
-<a name="ln-52"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">self</span>           <span class="c">!! SyMBA test particle object  </span>
-<a name="ln-53"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="nb">system</span>         <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-54"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">dt</span>             <span class="c">!! step size</span>
-<a name="ln-55"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">irec</span>           <span class="c">!! Current recursion level</span>
-<a name="ln-56"></a>      <span class="c">! Result</span>
-<a name="ln-57"></a>      <span class="kt">logical</span>                                   <span class="kd">::</span> <span class="n">lany_encounter</span> <span class="c">!! Returns true if there is at least one close encounter      </span>
-<a name="ln-58"></a>      <span class="c">! Internals</span>
-<a name="ln-59"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span><span class="p">,</span> <span class="n">nplplm</span>
-<a name="ln-60"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">nenc</span>
-<a name="ln-61"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span>
+<a name="ln-44"></a>   <span class="k">module function </span><span class="n">symba_encounter_check_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span>
+<a name="ln-45"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-46"></a>      <span class="c">!!</span>
+<a name="ln-47"></a>      <span class="c">!! Check for an encounter between massive bodies.</span>
+<a name="ln-48"></a>      <span class="c">!!</span>
+<a name="ln-49"></a>      <span class="k">implicit none</span>
+<a name="ln-50"></a>      <span class="c">! Arguments</span>
+<a name="ln-51"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">self</span>           <span class="c">!! SyMBA test particle object  </span>
+<a name="ln-52"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="nb">system</span>         <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-53"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">dt</span>             <span class="c">!! step size</span>
+<a name="ln-54"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">irec</span>           <span class="c">!! Current recursion level</span>
+<a name="ln-55"></a>      <span class="c">! Result</span>
+<a name="ln-56"></a>      <span class="kt">logical</span>                                   <span class="kd">::</span> <span class="n">lany_encounter</span> <span class="c">!! Returns true if there is at least one close encounter      </span>
+<a name="ln-57"></a>      <span class="c">! Internals</span>
+<a name="ln-58"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span><span class="p">,</span> <span class="n">nplplm</span><span class="p">,</span> <span class="n">kenc</span>
+<a name="ln-59"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">nenc</span><span class="p">,</span> <span class="n">npl</span>
+<a name="ln-60"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span><span class="p">,</span> <span class="n">lvdotr</span>
+<a name="ln-61"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">index1</span><span class="p">,</span> <span class="n">index2</span>
 <a name="ln-62"></a>  
 <a name="ln-63"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
 <a name="ln-64"></a>
 <a name="ln-65"></a><span class="k">      associate</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">)</span>
 <a name="ln-66"></a>         <span class="n">nplplm</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplplm</span>
-<a name="ln-67"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">lencounter</span><span class="p">(</span><span class="n">nplplm</span><span class="p">))</span>
-<a name="ln-68"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">nplplm</span><span class="p">))</span>
-<a name="ln-69"></a>  
-<a name="ln-70"></a>         <span class="k">call </span><span class="n">symba_encounter_check_all</span><span class="p">(</span><span class="n">nplplm</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">vh</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span><span class="p">)</span>
-<a name="ln-71"></a>
-<a name="ln-72"></a>         <span class="c">!$omp parallel workshare</span>
+<a name="ln-67"></a>         <span class="n">npl</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nbody</span>
+<a name="ln-68"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">lencounter</span><span class="p">(</span><span class="n">nplplm</span><span class="p">))</span>
+<a name="ln-69"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">nplplm</span><span class="p">))</span>
+<a name="ln-70"></a>  
+<a name="ln-71"></a>         <span class="k">call </span><span class="n">symba_encounter_check_all</span><span class="p">(</span><span class="n">nplplm</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">vh</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span><span class="p">)</span>
+<a name="ln-72"></a>
 <a name="ln-73"></a>         <span class="n">nenc</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lencounter</span><span class="p">(:))</span>
-<a name="ln-74"></a>         <span class="c">!$omp end parallel workshare</span>
-<a name="ln-75"></a>
-<a name="ln-76"></a>         <span class="n">lany_encounter</span> <span class="o">=</span> <span class="n">nenc</span> <span class="o">&gt;</span> <span class="mi">0</span>
-<a name="ln-77"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span> <span class="k">then </span>
-<a name="ln-78"></a><span class="k">            associate</span><span class="p">(</span><span class="n">plplenc_list</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">plplenc_list</span><span class="p">)</span>
-<a name="ln-79"></a>               <span class="k">call </span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">resize</span><span class="p">(</span><span class="n">nenc</span><span class="p">)</span>
-<a name="ln-80"></a>               <span class="n">plplenc_list</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="n">loc_lvdotr</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplm</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplm</span><span class="p">))</span>
-<a name="ln-81"></a>               <span class="n">plplenc_list</span><span class="p">%</span><span class="n">kidx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">([(</span><span class="n">k</span><span class="p">,</span> <span class="n">k</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">nplplm</span><span class="p">)],</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplm</span><span class="p">))</span>
-<a name="ln-82"></a>               <span class="k">deallocate</span><span class="p">(</span><span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span><span class="p">)</span>
-<a name="ln-83"></a>               <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">kidx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-84"></a>               <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">kidx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-85"></a>               <span class="n">plplenc_list</span><span class="p">%</span><span class="n">id1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-86"></a>               <span class="n">plplenc_list</span><span class="p">%</span><span class="n">id2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-87"></a>               <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span>
-<a name="ln-88"></a>                  <span class="n">i</span> <span class="o">=</span> <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-89"></a>                  <span class="n">j</span> <span class="o">=</span> <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-90"></a>                  <span class="n">plplenc_list</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">ACTIVE</span>
-<a name="ln-91"></a>                  <span class="n">plplenc_list</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-92"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-93"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-94"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-95"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-96"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-97"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-98"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-99"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-100"></a>               <span class="k">end do</span>
-<a name="ln-101"></a><span class="k">            end associate</span>
-<a name="ln-102"></a><span class="k">         end if</span>
-<a name="ln-103"></a><span class="k">      end associate</span>
-<a name="ln-104"></a><span class="k">      return</span>
-<a name="ln-105"></a><span class="k">   end function </span><span class="n">symba_encounter_check_pl</span>
-<a name="ln-106"></a>
-<a name="ln-107"></a>
-<a name="ln-108"></a>   <span class="k">module function </span><span class="n">symba_encounter_check</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span>
-<a name="ln-109"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-110"></a>      <span class="c">!!</span>
-<a name="ln-111"></a>      <span class="c">!! Check for an encounter between test particles and massive bodies in the pltpenc list.</span>
-<a name="ln-112"></a>      <span class="c">!! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types.</span>
-<a name="ln-113"></a>      <span class="c">!!</span>
-<a name="ln-114"></a>      <span class="c">!! Adapted from portions of David E. Kaufmann&#39;s Swifter routine: symba_step_recur.f90</span>
-<a name="ln-115"></a>      <span class="k">implicit none</span>
-<a name="ln-116"></a>      <span class="c">! Arguments</span>
-<a name="ln-117"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! SyMBA pl-pl encounter list object</span>
-<a name="ln-118"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>     <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-119"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>         <span class="c">!! step size</span>
-<a name="ln-120"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>       <span class="c">!! Current recursion level </span>
-<a name="ln-121"></a>      <span class="kt">logical</span>                                  <span class="kd">::</span> <span class="n">lany_encounter</span> <span class="c">!! Returns true if there is at least one close encounter  </span>
-<a name="ln-122"></a>      <span class="c">! Internals</span>
-<a name="ln-123"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span><span class="n">k</span>
-<a name="ln-124"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">vr</span>
-<a name="ln-125"></a>      <span class="kt">logical</span>                   <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">isplpl</span>
-<a name="ln-126"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">rlim2</span><span class="p">,</span> <span class="n">rji2</span>
-<a name="ln-127"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencmask</span>
-<a name="ln-128"></a>
-<a name="ln-129"></a>      <span class="n">lany_encounter</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-130"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-131"></a>
-<a name="ln-132"></a><span class="k">      select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-133"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_plplenc</span><span class="p">)</span>
-<a name="ln-134"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-135"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">)</span>
-<a name="ln-136"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-137"></a>      <span class="k">end select</span>
+<a name="ln-74"></a>
+<a name="ln-75"></a>         <span class="n">lany_encounter</span> <span class="o">=</span> <span class="n">nenc</span> <span class="o">&gt;</span> <span class="mi">0</span>
+<a name="ln-76"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span> <span class="k">then </span>
+<a name="ln-77"></a><span class="k">            associate</span><span class="p">(</span><span class="n">plplenc_list</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">plplenc_list</span><span class="p">)</span>
+<a name="ln-78"></a>               <span class="k">call </span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">resize</span><span class="p">(</span><span class="n">nenc</span><span class="p">)</span>
+<a name="ln-79"></a>               <span class="k">allocate</span><span class="p">(</span><span class="n">lvdotr</span><span class="p">(</span><span class="n">nenc</span><span class="p">))</span>					
+<a name="ln-80"></a>               <span class="k">allocate</span><span class="p">(</span><span class="n">index1</span><span class="p">(</span><span class="n">nenc</span><span class="p">))</span>					
+<a name="ln-81"></a>               <span class="k">allocate</span><span class="p">(</span><span class="n">index2</span><span class="p">(</span><span class="n">nenc</span><span class="p">))</span>					
+<a name="ln-82"></a>               <span class="n">lvdotr</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="n">loc_lvdotr</span><span class="p">(:),</span> <span class="n">lencounter</span><span class="p">(:))</span>					
+<a name="ln-83"></a>               <span class="n">index1</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplm</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(:))</span> 					
+<a name="ln-84"></a>               <span class="n">index2</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplm</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(:))</span> 					
+<a name="ln-85"></a>               <span class="k">deallocate</span><span class="p">(</span><span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span><span class="p">)</span>					
+<a name="ln-86"></a>               <span class="k">call </span><span class="nb">move_alloc</span><span class="p">(</span><span class="n">lvdotr</span><span class="p">,</span> <span class="n">plplenc_list</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">)</span>					
+<a name="ln-87"></a>               <span class="k">call </span><span class="nb">move_alloc</span><span class="p">(</span><span class="n">index1</span><span class="p">,</span> <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">)</span> 					
+<a name="ln-88"></a>               <span class="k">call </span><span class="nb">move_alloc</span><span class="p">(</span><span class="n">index2</span><span class="p">,</span> <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">)</span> 					
+<a name="ln-89"></a>               <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span>
+<a name="ln-90"></a>                  <span class="n">i</span> <span class="o">=</span> <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-91"></a>                  <span class="n">j</span> <span class="o">=</span> <span class="n">plplenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-92"></a>                  <span class="k">call </span><span class="n">util_index_eucl_ij_to_k</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">kenc</span><span class="p">)</span>
+<a name="ln-93"></a>                  <span class="n">plplenc_list</span><span class="p">%</span><span class="n">kidx</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">kenc</span>
+<a name="ln-94"></a>                  <span class="n">plplenc_list</span><span class="p">%</span><span class="n">id1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>					
+<a name="ln-95"></a>                  <span class="n">plplenc_list</span><span class="p">%</span><span class="n">id2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>					
+<a name="ln-96"></a>                  <span class="n">plplenc_list</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">ACTIVE</span>
+<a name="ln-97"></a>                  <span class="n">plplenc_list</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-98"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-99"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-100"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-101"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-102"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-103"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-104"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-105"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-106"></a>               <span class="k">end do</span>
+<a name="ln-107"></a><span class="k">            end associate</span>
+<a name="ln-108"></a><span class="k">         end if</span>
+<a name="ln-109"></a><span class="k">      end associate</span>
+<a name="ln-110"></a><span class="k">      return</span>
+<a name="ln-111"></a><span class="k">   end function </span><span class="n">symba_encounter_check_pl</span>
+<a name="ln-112"></a>
+<a name="ln-113"></a>
+<a name="ln-114"></a>   <span class="k">module function </span><span class="n">symba_encounter_check</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span>
+<a name="ln-115"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-116"></a>      <span class="c">!!</span>
+<a name="ln-117"></a>      <span class="c">!! Check for an encounter between test particles and massive bodies in the pltpenc list.</span>
+<a name="ln-118"></a>      <span class="c">!! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types.</span>
+<a name="ln-119"></a>      <span class="c">!!</span>
+<a name="ln-120"></a>      <span class="c">!! Adapted from portions of David E. Kaufmann&#39;s Swifter routine: symba_step_recur.f90</span>
+<a name="ln-121"></a>      <span class="k">implicit none</span>
+<a name="ln-122"></a>      <span class="c">! Arguments</span>
+<a name="ln-123"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! SyMBA pl-pl encounter list object</span>
+<a name="ln-124"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>     <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-125"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>         <span class="c">!! step size</span>
+<a name="ln-126"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>       <span class="c">!! Current recursion level </span>
+<a name="ln-127"></a>      <span class="kt">logical</span>                                  <span class="kd">::</span> <span class="n">lany_encounter</span> <span class="c">!! Returns true if there is at least one close encounter  </span>
+<a name="ln-128"></a>      <span class="c">! Internals</span>
+<a name="ln-129"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">,</span> <span class="n">lidx</span><span class="p">,</span> <span class="n">nenc_enc</span>
+<a name="ln-130"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">vr</span>
+<a name="ln-131"></a>      <span class="kt">logical</span>                   <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">isplpl</span>
+<a name="ln-132"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">rlim2</span><span class="p">,</span> <span class="n">rji2</span>
+<a name="ln-133"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencmask</span>
+<a name="ln-134"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">encidx</span>
+<a name="ln-135"></a>
+<a name="ln-136"></a>      <span class="n">lany_encounter</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-137"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
 <a name="ln-138"></a>
-<a name="ln-139"></a><span class="k">      select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
-<a name="ln-140"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span>
-<a name="ln-141"></a>         <span class="k">select type</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">tp</span><span class="p">)</span>
-<a name="ln-142"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">symba_tp</span><span class="p">)</span>
-<a name="ln-143"></a>            <span class="k">allocate</span><span class="p">(</span><span class="n">lencmask</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-144"></a>            <span class="n">lencmask</span><span class="p">(:)</span> <span class="o">=</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span> <span class="o">==</span> <span class="n">ACTIVE</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span> <span class="o">==</span> <span class="n">irec</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)</span>
-<a name="ln-145"></a>            <span class="k">if</span> <span class="p">(.</span><span class="nb">not</span><span class="p">.</span><span class="nb">any</span><span class="p">(</span><span class="n">lencmask</span><span class="p">(:)))</span> <span class="k">return</span>
-<a name="ln-146"></a><span class="k">            do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">,</span> <span class="n">lencmask</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-147"></a>               <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-148"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-149"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-150"></a><span class="k">                  </span><span class="n">xr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-151"></a>                  <span class="n">vr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-152"></a>                  <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-153"></a>               <span class="k">else</span>
-<a name="ln-154"></a><span class="k">                  </span><span class="n">xr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-155"></a>                  <span class="n">vr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-156"></a>                  <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-157"></a>               <span class="k">end if</span>
-<a name="ln-158"></a><span class="k">               if</span> <span class="p">(</span><span class="n">lencounter</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-159"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-160"></a><span class="k">                     </span><span class="n">rlim2</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">j</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-161"></a>                  <span class="k">else</span>
-<a name="ln-162"></a><span class="k">                     </span><span class="n">rlim2</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-163"></a>                  <span class="k">end if</span>
-<a name="ln-164"></a><span class="k">                  </span><span class="n">rji2</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">xr</span><span class="p">(:),</span> <span class="n">xr</span><span class="p">(:))</span><span class="c">! Check to see if these are physically overlapping bodies first, which we should ignore</span>
-<a name="ln-165"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">rji2</span> <span class="o">&gt;</span> <span class="n">rlim2</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-166"></a><span class="k">                     </span><span class="n">lany_encounter</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-167"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-168"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="nb">MAX</span><span class="p">(</span><span class="n">irec</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-169"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-170"></a><span class="k">                        </span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-171"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="nb">MAX</span><span class="p">(</span><span class="n">irec</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">))</span>
-<a name="ln-172"></a>                     <span class="k">else</span>
-<a name="ln-173"></a><span class="k">                        </span><span class="n">tp</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-174"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="nb">MAX</span><span class="p">(</span><span class="n">irec</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">))</span>
-<a name="ln-175"></a>                     <span class="k">end if</span>
-<a name="ln-176"></a><span class="k">                     </span><span class="n">self</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-177"></a>                  <span class="k">end if</span>
-<a name="ln-178"></a><span class="k">               end if   </span>
-<a name="ln-179"></a><span class="k">            end do</span>
-<a name="ln-180"></a><span class="k">         end select</span>
-<a name="ln-181"></a><span class="k">      end select</span>
-<a name="ln-182"></a>
-<a name="ln-183"></a><span class="k">      return</span>
-<a name="ln-184"></a><span class="k">   end function </span><span class="n">symba_encounter_check</span>
-<a name="ln-185"></a>
-<a name="ln-186"></a>
-<a name="ln-187"></a>   <span class="k">module function </span><span class="n">symba_encounter_check_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span>
-<a name="ln-188"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-189"></a>      <span class="c">!!</span>
-<a name="ln-190"></a>      <span class="c">!! Check for an encounter between test particles and massive bodies.</span>
-<a name="ln-191"></a>      <span class="c">!!</span>
-<a name="ln-192"></a>      <span class="k">implicit none</span>
-<a name="ln-193"></a>      <span class="c">! Arguments</span>
-<a name="ln-194"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! SyMBA test particle object  </span>
-<a name="ln-195"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>     <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-196"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>         <span class="c">!! step size</span>
-<a name="ln-197"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>           <span class="c">!! Current recursion level</span>
-<a name="ln-198"></a>      <span class="c">! Result</span>
-<a name="ln-199"></a>      <span class="kt">logical</span>                                   <span class="kd">::</span> <span class="n">lany_encounter</span> <span class="c">!! Returns true if there is at least one close encounter      </span>
-<a name="ln-200"></a>      <span class="c">! Internals</span>
-<a name="ln-201"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                  <span class="kd">::</span> <span class="n">r2crit</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">tmin</span><span class="p">,</span> <span class="n">r2min</span><span class="p">,</span> <span class="n">term2</span>
-<a name="ln-202"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">,</span><span class="n">nenc</span><span class="p">,</span> <span class="n">plind</span><span class="p">,</span> <span class="n">tpind</span>
-<a name="ln-203"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span>             <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">vr</span>
-<a name="ln-204"></a>      <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span>
-<a name="ln-205"></a>  
-<a name="ln-206"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-207"></a>
-<a name="ln-208"></a><span class="k">      associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">,</span> <span class="n">npl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
-<a name="ln-209"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">lencounter</span><span class="p">(</span><span class="n">ntp</span><span class="p">,</span> <span class="n">npl</span><span class="p">),</span> <span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">ntp</span><span class="p">,</span> <span class="n">npl</span><span class="p">))</span>
-<a name="ln-210"></a>         <span class="n">lencounter</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-211"></a>   
-<a name="ln-212"></a>         <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-213"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span>
-<a name="ln-214"></a>               <span class="n">xr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-215"></a>               <span class="n">vr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vh</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span>
-<a name="ln-216"></a>               <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">(</span><span class="n">i</span><span class="p">,</span><span class="n">j</span><span class="p">),</span> <span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">i</span><span class="p">,</span><span class="n">j</span><span class="p">))</span>
-<a name="ln-217"></a>            <span class="k">end do</span>
-<a name="ln-218"></a><span class="k">         end do</span>
-<a name="ln-219"></a>
-<a name="ln-220"></a><span class="k">         </span><span class="n">nenc</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lencounter</span><span class="p">(:,:))</span>
-<a name="ln-221"></a>         <span class="n">lany_encounter</span> <span class="o">=</span> <span class="n">nenc</span> <span class="o">&gt;</span> <span class="mi">0</span>
-<a name="ln-222"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span> <span class="k">then </span>
-<a name="ln-223"></a><span class="k">            associate</span><span class="p">(</span><span class="n">pltpenc_list</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pltpenc_list</span><span class="p">)</span>
-<a name="ln-224"></a>               <span class="k">call </span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">resize</span><span class="p">(</span><span class="n">nenc</span><span class="p">)</span>
-<a name="ln-225"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">ACTIVE</span>
-<a name="ln-226"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-227"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="n">loc_lvdotr</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
-<a name="ln-228"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="nb">spread</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span><span class="p">)],</span> <span class="nb">dim</span><span class="o">=</span><span class="mi">1</span><span class="p">,</span> <span class="n">ncopies</span><span class="o">=</span><span class="n">ntp</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-229"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="nb">spread</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span><span class="p">)],</span> <span class="nb">dim</span><span class="o">=</span><span class="mi">2</span><span class="p">,</span> <span class="n">ncopies</span><span class="o">=</span><span class="n">npl</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
-<a name="ln-230"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">id1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-231"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">id2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-232"></a>               <span class="k">select type</span><span class="p">(</span><span class="n">pl</span><span class="p">)</span>
-<a name="ln-233"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span>
-<a name="ln-234"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-235"></a>                  <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span>
-<a name="ln-236"></a>                     <span class="n">plind</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-237"></a>                     <span class="n">tpind</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-238"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-239"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-240"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-241"></a>                     <span class="n">tp</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-242"></a>                     <span class="n">tp</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-243"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">ntpenc</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ntpenc</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-244"></a>                     <span class="n">tp</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
-<a name="ln-245"></a>                  <span class="k">end do</span>
-<a name="ln-246"></a><span class="k">               end select</span>
-<a name="ln-247"></a><span class="k">            end associate</span>
-<a name="ln-248"></a><span class="k">         end if</span>
-<a name="ln-249"></a><span class="k">      end associate</span>
-<a name="ln-250"></a>
-<a name="ln-251"></a><span class="k">      return</span>
-<a name="ln-252"></a><span class="k">   end function </span><span class="n">symba_encounter_check_tp</span>
-<a name="ln-253"></a>
-<a name="ln-254"></a>
-<a name="ln-255"></a>   <span class="k">module pure elemental subroutine </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
-<a name="ln-256"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-257"></a>      <span class="c">!!</span>
-<a name="ln-258"></a>      <span class="c">!! Check for an encounter.</span>
-<a name="ln-259"></a>      <span class="c">!!</span>
-<a name="ln-260"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: symba_chk.f90</span>
-<a name="ln-261"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine symba5_chk.f</span>
-<a name="ln-262"></a>      <span class="k">implicit none</span>
-<a name="ln-263"></a>      <span class="c">! Arguments</span>
-<a name="ln-264"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span>
-<a name="ln-265"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span>
-<a name="ln-266"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">irec</span>
-<a name="ln-267"></a>      <span class="kt">logical</span><span class="p">,</span>      <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span>
-<a name="ln-268"></a>      <span class="c">! Internals</span>
-<a name="ln-269"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">rcrit</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">,</span> <span class="n">vdotr</span>
+<a name="ln-139"></a><span class="k">      select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-140"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_plplenc</span><span class="p">)</span>
+<a name="ln-141"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-142"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">)</span>
+<a name="ln-143"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-144"></a>      <span class="k">end select</span>
+<a name="ln-145"></a>
+<a name="ln-146"></a><span class="k">      select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
+<a name="ln-147"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span>
+<a name="ln-148"></a>         <span class="k">select type</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">tp</span><span class="p">)</span>
+<a name="ln-149"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">symba_tp</span><span class="p">)</span>
+<a name="ln-150"></a>            <span class="k">allocate</span><span class="p">(</span><span class="n">lencmask</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">))</span>
+<a name="ln-151"></a>            <span class="n">lencmask</span><span class="p">(:)</span> <span class="o">=</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span> <span class="o">==</span> <span class="n">ACTIVE</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span> <span class="o">==</span> <span class="n">irec</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)</span>
+<a name="ln-152"></a>            <span class="n">nenc_enc</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lencmask</span><span class="p">(:))</span>
+<a name="ln-153"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">nenc_enc</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-154"></a>
+<a name="ln-155"></a><span class="k">            allocate</span><span class="p">(</span><span class="n">encidx</span><span class="p">(</span><span class="n">nenc_enc</span><span class="p">))</span>
+<a name="ln-156"></a>            <span class="n">encidx</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">([(</span><span class="n">k</span><span class="p">,</span> <span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">)],</span> <span class="n">lencmask</span><span class="p">(:))</span>
+<a name="ln-157"></a>
+<a name="ln-158"></a>            <span class="k">do </span><span class="n">lidx</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc_enc</span>
+<a name="ln-159"></a>               <span class="n">k</span> <span class="o">=</span> <span class="n">encidx</span><span class="p">(</span><span class="n">lidx</span><span class="p">)</span>
+<a name="ln-160"></a>               <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-161"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-162"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-163"></a><span class="k">                  </span><span class="n">xr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-164"></a>                  <span class="n">vr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-165"></a>                  <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-166"></a>               <span class="k">else</span>
+<a name="ln-167"></a><span class="k">                  </span><span class="n">xr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-168"></a>                  <span class="n">vr</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-169"></a>                  <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">),</span> <span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">self</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-170"></a>               <span class="k">end if</span>
+<a name="ln-171"></a><span class="k">               if</span> <span class="p">(</span><span class="n">lencounter</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-172"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-173"></a><span class="k">                     </span><span class="n">rlim2</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">j</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-174"></a>                  <span class="k">else</span>
+<a name="ln-175"></a><span class="k">                     </span><span class="n">rlim2</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-176"></a>                  <span class="k">end if</span>
+<a name="ln-177"></a><span class="k">                  </span><span class="n">rji2</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">xr</span><span class="p">(:),</span> <span class="n">xr</span><span class="p">(:))</span><span class="c">! Check to see if these are physically overlapping bodies first, which we should ignore</span>
+<a name="ln-178"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">rji2</span> <span class="o">&gt;</span> <span class="n">rlim2</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-179"></a><span class="k">                     </span><span class="n">lany_encounter</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-180"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-181"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="nb">MAX</span><span class="p">(</span><span class="n">irec</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-182"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-183"></a><span class="k">                        </span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-184"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="nb">MAX</span><span class="p">(</span><span class="n">irec</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">))</span>
+<a name="ln-185"></a>                     <span class="k">else</span>
+<a name="ln-186"></a><span class="k">                        </span><span class="n">tp</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-187"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="nb">MAX</span><span class="p">(</span><span class="n">irec</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">j</span><span class="p">))</span>
+<a name="ln-188"></a>                     <span class="k">end if</span>
+<a name="ln-189"></a><span class="k">                     </span><span class="n">self</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-190"></a>                  <span class="k">end if</span>
+<a name="ln-191"></a><span class="k">               end if   </span>
+<a name="ln-192"></a><span class="k">            end do</span>
+<a name="ln-193"></a><span class="k">         end select</span>
+<a name="ln-194"></a><span class="k">      end select</span>
+<a name="ln-195"></a>
+<a name="ln-196"></a><span class="k">      return</span>
+<a name="ln-197"></a><span class="k">   end function </span><span class="n">symba_encounter_check</span>
+<a name="ln-198"></a>
+<a name="ln-199"></a>
+<a name="ln-200"></a>   <span class="k">module function </span><span class="n">symba_encounter_check_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span>
+<a name="ln-201"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-202"></a>      <span class="c">!!</span>
+<a name="ln-203"></a>      <span class="c">!! Check for an encounter between test particles and massive bodies.</span>
+<a name="ln-204"></a>      <span class="c">!!</span>
+<a name="ln-205"></a>      <span class="k">implicit none</span>
+<a name="ln-206"></a>      <span class="c">! Arguments</span>
+<a name="ln-207"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_tp</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>       <span class="c">!! SyMBA test particle object  </span>
+<a name="ln-208"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span>     <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-209"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>         <span class="c">!! step size</span>
+<a name="ln-210"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>           <span class="c">!! Current recursion level</span>
+<a name="ln-211"></a>      <span class="c">! Result</span>
+<a name="ln-212"></a>      <span class="kt">logical</span>                                   <span class="kd">::</span> <span class="n">lany_encounter</span> <span class="c">!! Returns true if there is at least one close encounter      </span>
+<a name="ln-213"></a>      <span class="c">! Internals</span>
+<a name="ln-214"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                                  <span class="kd">::</span> <span class="n">r2crit</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">tmin</span><span class="p">,</span> <span class="n">r2min</span><span class="p">,</span> <span class="n">term2</span>
+<a name="ln-215"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">,</span><span class="n">nenc</span><span class="p">,</span> <span class="n">plind</span><span class="p">,</span> <span class="n">tpind</span>
+<a name="ln-216"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span>             <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">vr</span>
+<a name="ln-217"></a>      <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">loc_lvdotr</span>
+<a name="ln-218"></a>  
+<a name="ln-219"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-220"></a>
+<a name="ln-221"></a><span class="k">      associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">,</span> <span class="n">npl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
+<a name="ln-222"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">lencounter</span><span class="p">(</span><span class="n">ntp</span><span class="p">,</span> <span class="n">npl</span><span class="p">),</span> <span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">ntp</span><span class="p">,</span> <span class="n">npl</span><span class="p">))</span>
+<a name="ln-223"></a>         <span class="n">lencounter</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-224"></a>   
+<a name="ln-225"></a>         <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span>
+<a name="ln-226"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span>
+<a name="ln-227"></a>               <span class="n">xr</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-228"></a>               <span class="n">xr</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-229"></a>               <span class="n">xr</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-230"></a>               <span class="n">vr</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-231"></a>               <span class="n">vr</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-232"></a>               <span class="n">vr</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">vh</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-233"></a>               <span class="k">call </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">xr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">1</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">2</span><span class="p">),</span> <span class="n">vr</span><span class="p">(</span><span class="mi">3</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">),</span> <span class="mf">0.0_DP</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">(</span><span class="n">i</span><span class="p">,</span><span class="n">j</span><span class="p">),</span> <span class="n">loc_lvdotr</span><span class="p">(</span><span class="n">i</span><span class="p">,</span><span class="n">j</span><span class="p">))</span>
+<a name="ln-234"></a>            <span class="k">end do</span>
+<a name="ln-235"></a><span class="k">         end do</span>
+<a name="ln-236"></a>
+<a name="ln-237"></a><span class="k">         </span><span class="n">nenc</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lencounter</span><span class="p">(:,:))</span>
+<a name="ln-238"></a>         <span class="n">lany_encounter</span> <span class="o">=</span> <span class="n">nenc</span> <span class="o">&gt;</span> <span class="mi">0</span>
+<a name="ln-239"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lany_encounter</span><span class="p">)</span> <span class="k">then </span>
+<a name="ln-240"></a><span class="k">            associate</span><span class="p">(</span><span class="n">pltpenc_list</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pltpenc_list</span><span class="p">)</span>
+<a name="ln-241"></a>               <span class="k">call </span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">resize</span><span class="p">(</span><span class="n">nenc</span><span class="p">)</span>
+<a name="ln-242"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">ACTIVE</span>
+<a name="ln-243"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">level</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-244"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">lvdotr</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="n">loc_lvdotr</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
+<a name="ln-245"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="nb">spread</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span><span class="p">)],</span> <span class="nb">dim</span><span class="o">=</span><span class="mi">1</span><span class="p">,</span> <span class="n">ncopies</span><span class="o">=</span><span class="n">ntp</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-246"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">(</span><span class="nb">spread</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ntp</span><span class="p">)],</span> <span class="nb">dim</span><span class="o">=</span><span class="mi">2</span><span class="p">,</span> <span class="n">ncopies</span><span class="o">=</span><span class="n">npl</span><span class="p">),</span> <span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
+<a name="ln-247"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">id1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
+<a name="ln-248"></a>               <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">id2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">id</span><span class="p">(</span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nenc</span><span class="p">))</span>
+<a name="ln-249"></a>               <span class="k">select type</span><span class="p">(</span><span class="n">pl</span><span class="p">)</span>
+<a name="ln-250"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span>
+<a name="ln-251"></a>                  <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-252"></a>                  <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span>
+<a name="ln-253"></a>                     <span class="n">plind</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-254"></a>                     <span class="n">tpind</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-255"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">lencounter</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-256"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-257"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-258"></a>                     <span class="n">tp</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-259"></a>                     <span class="n">tp</span><span class="p">%</span><span class="n">levelm</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-260"></a>                     <span class="n">pl</span><span class="p">%</span><span class="n">ntpenc</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ntpenc</span><span class="p">(</span><span class="n">plind</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-261"></a>                     <span class="n">tp</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">nplenc</span><span class="p">(</span><span class="n">tpind</span><span class="p">)</span> <span class="o">+</span> <span class="mi">1</span>
+<a name="ln-262"></a>                  <span class="k">end do</span>
+<a name="ln-263"></a><span class="k">               end select</span>
+<a name="ln-264"></a><span class="k">            end associate</span>
+<a name="ln-265"></a><span class="k">         end if</span>
+<a name="ln-266"></a><span class="k">      end associate</span>
+<a name="ln-267"></a>
+<a name="ln-268"></a><span class="k">      return</span>
+<a name="ln-269"></a><span class="k">   end function </span><span class="n">symba_encounter_check_tp</span>
 <a name="ln-270"></a>
-<a name="ln-271"></a>      <span class="n">rcrit</span> <span class="o">=</span> <span class="p">(</span><span class="n">rhill1</span> <span class="o">+</span> <span class="n">rhill2</span><span class="p">)</span><span class="o">*</span><span class="n">RHSCALE</span><span class="o">*</span><span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="p">(</span><span class="n">irec</span><span class="p">))</span>
-<a name="ln-272"></a>      <span class="n">r2crit</span> <span class="o">=</span> <span class="n">rcrit</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-273"></a>      <span class="n">r2</span> <span class="o">=</span> <span class="n">xr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">yr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">zr</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-274"></a>      <span class="n">v2</span> <span class="o">=</span> <span class="n">vxr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">vyr</span><span class="o">**</span><span class="mi">2</span> <span class="o">+</span> <span class="n">vzr</span><span class="o">**</span><span class="mi">2</span>
-<a name="ln-275"></a>      <span class="n">vdotr</span> <span class="o">=</span> <span class="n">xr</span> <span class="o">*</span> <span class="n">vxr</span> <span class="o">+</span> <span class="n">yr</span> <span class="o">*</span> <span class="n">vyr</span> <span class="o">+</span> <span class="n">zr</span> <span class="o">*</span> <span class="n">vzr</span>
-<a name="ln-276"></a>      <span class="n">lencounter</span> <span class="o">=</span> <span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">r2</span><span class="p">,</span> <span class="n">v2</span><span class="p">,</span> <span class="n">vdotr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">)</span>
-<a name="ln-277"></a>      <span class="n">lvdotr</span> <span class="o">=</span> <span class="p">(</span><span class="n">vdotr</span> <span class="o">&lt;</span> <span class="mf">0.0_DP</span><span class="p">)</span>
-<a name="ln-278"></a>
-<a name="ln-279"></a>      <span class="k">return</span>
-<a name="ln-280"></a><span class="k">   end subroutine </span><span class="n">symba_encounter_check_one</span>
-<a name="ln-281"></a>
-<a name="ln-282"></a><span class="k">end submodule </span><span class="n">s_symba_encounter_check</span>
+<a name="ln-271"></a>
+<a name="ln-272"></a>   <span class="k">module pure subroutine </span><span class="n">symba_encounter_check_one</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
+<a name="ln-273"></a>      <span class="c">!$omp declare simd(symba_encounter_check_one)</span>
+<a name="ln-274"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-275"></a>      <span class="c">!!</span>
+<a name="ln-276"></a>      <span class="c">!! Check for an encounter.</span>
+<a name="ln-277"></a>      <span class="c">!!</span>
+<a name="ln-278"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: symba_chk.f90</span>
+<a name="ln-279"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine symba5_chk.f</span>
+<a name="ln-280"></a>      <span class="k">implicit none</span>
+<a name="ln-281"></a>      <span class="c">! Arguments</span>
+<a name="ln-282"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span>
+<a name="ln-283"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">rhill1</span><span class="p">,</span> <span class="n">rhill2</span><span class="p">,</span> <span class="n">dt</span>
+<a name="ln-284"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">irec</span>
+<a name="ln-285"></a>      <span class="kt">logical</span><span class="p">,</span>      <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span>
+<a name="ln-286"></a>      <span class="c">! Internals</span>
+<a name="ln-287"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>     <span class="kd">::</span> <span class="n">r2crit</span><span class="p">,</span> <span class="n">rshell_irec</span>
+<a name="ln-288"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
+<a name="ln-289"></a>
+<a name="ln-290"></a>      <span class="n">rshell_irec</span> <span class="o">=</span> <span class="mf">1._DP</span>
+<a name="ln-291"></a>      <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">irec</span>
+<a name="ln-292"></a>         <span class="n">rshell_irec</span> <span class="o">=</span> <span class="n">rshell_irec</span> <span class="o">*</span> <span class="n">RSHELL</span>
+<a name="ln-293"></a>      <span class="k">end do</span>
+<a name="ln-294"></a><span class="k">      </span><span class="n">r2crit</span> <span class="o">=</span> <span class="p">(</span><span class="n">rhill1</span> <span class="o">+</span> <span class="n">rhill2</span><span class="p">)</span> <span class="o">*</span> <span class="n">RHSCALE</span> <span class="o">*</span> <span class="n">rshell_irec</span>
+<a name="ln-295"></a>      <span class="n">r2crit</span> <span class="o">=</span> <span class="n">r2crit</span><span class="o">**</span><span class="mi">2</span>
+<a name="ln-296"></a>      <span class="k">call </span><span class="n">rmvs_chk_ind</span><span class="p">(</span><span class="n">xr</span><span class="p">,</span> <span class="n">yr</span><span class="p">,</span> <span class="n">zr</span><span class="p">,</span> <span class="n">vxr</span><span class="p">,</span> <span class="n">vyr</span><span class="p">,</span> <span class="n">vzr</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">r2crit</span><span class="p">,</span> <span class="n">lencounter</span><span class="p">,</span> <span class="n">lvdotr</span><span class="p">)</span>
+<a name="ln-297"></a>
+<a name="ln-298"></a>      <span class="k">return</span>
+<a name="ln-299"></a><span class="k">   end subroutine </span><span class="n">symba_encounter_check_one</span>
+<a name="ln-300"></a>
+<a name="ln-301"></a><span class="k">end submodule </span><span class="n">s_symba_encounter_check</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/symba_io.f90.html b/docs/sourcefile/symba_io.f90.html
index aa90917f4..879d3ba44 100644
--- a/docs/sourcefile/symba_io.f90.html
+++ b/docs/sourcefile/symba_io.f90.html
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_io.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_iof90EfferentGraph" width="641pt" height="263pt"
- viewBox="0.00 0.00 641.00 262.88" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_io.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_iof90EfferentGraph" width="641pt" height="255pt"
+ viewBox="0.00 0.00 641.00 254.70" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_io.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_io.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 900,-366.74 900,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 900,-355.2 900,4 -4,4"/>
 <!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_io.f90</title>
-<polygon fill="none" stroke="black" points="896,-189.48 820,-189.48 820,-165.48 896,-165.48 896,-189.48"/>
-<text text-anchor="middle" x="858" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_io.f90</text>
+<polygon fill="none" stroke="black" points="896,-241.11 820,-241.11 820,-217.11 896,-217.11 896,-241.11"/>
+<text text-anchor="middle" x="858" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_io.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.78,-180.74C784.5,-183.83 730.87,-188.52 689.37,-192.15"/>
-<polygon fill="#000000" stroke="#000000" points="689.02,-188.67 679.36,-193.03 689.63,-195.64 689.02,-188.67"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.95,-232.34C784.52,-235.44 730.45,-240.16 688.72,-243.8"/>
+<polygon fill="#000000" stroke="#000000" points="688.33,-240.33 678.67,-244.68 688.94,-247.3 688.33,-240.33"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.98,-170.43C811.58,-168.83 802.59,-167.12 794,-165.48"/>
-<polygon fill="#000000" stroke="#000000" points="794.63,-162.04 784.15,-163.61 793.32,-168.91 794.63,-162.04"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.98,-222.06C811.58,-220.46 802.59,-218.75 794,-217.11"/>
+<polygon fill="#000000" stroke="#000000" points="794.63,-213.67 784.15,-215.23 793.32,-220.54 794.63,-213.67"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_io.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_io.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_io.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/symba_kick.f90.html b/docs/sourcefile/symba_kick.f90.html
index d36f3e460..3fe1602d1 100644
--- a/docs/sourcefile/symba_kick.f90.html
+++ b/docs/sourcefile/symba_kick.f90.html
@@ -134,7 +134,7 @@ <h1>symba_kick.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 1.2% of total for source files.">193 statements</a>
+    title=" 1.2% of total for source files.">195 statements</a>
      </li> 
      
      
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_kick.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_kickf90EfferentGraph" width="641pt" height="260pt"
- viewBox="0.00 0.00 641.00 260.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_kickf90EfferentGraph" width="641pt" height="252pt"
+ viewBox="0.00 0.00 641.00 251.91" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_kick.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 910,-366.74 910,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 910,-355.2 910,4 -4,4"/>
 <!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_kick.f90</title>
-<polygon fill="none" stroke="black" points="906,-189.48 820,-189.48 820,-165.48 906,-165.48 906,-189.48"/>
-<text text-anchor="middle" x="863" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_kick.f90</text>
+<polygon fill="none" stroke="black" points="906,-241.11 820,-241.11 820,-217.11 906,-217.11 906,-241.11"/>
+<text text-anchor="middle" x="863" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_kick.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.99,-181.08C783.55,-184.2 730.37,-188.76 689.29,-192.27"/>
-<polygon fill="#000000" stroke="#000000" points="688.79,-188.8 679.12,-193.14 689.38,-195.78 688.79,-188.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-232.71C783.38,-235.83 730.08,-240.38 688.92,-243.9"/>
+<polygon fill="#000000" stroke="#000000" points="688.4,-240.43 678.73,-244.77 688.99,-247.41 688.4,-240.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-169.81C811.34,-168.27 802.48,-166.66 794.04,-165.12"/>
-<polygon fill="#000000" stroke="#000000" points="794.48,-161.65 784.02,-163.3 793.23,-168.53 794.48,-161.65"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.79,-221.43C811.34,-219.9 802.48,-218.29 794.04,-216.75"/>
+<polygon fill="#000000" stroke="#000000" points="794.48,-213.28 784.02,-214.93 793.23,-220.16 794.48,-213.28"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_kick.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
@@ -658,211 +656,212 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-46"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">npl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">plplenc_list</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">plplenc_list</span><span class="p">,</span> <span class="n">radius</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">radius</span><span class="p">)</span>
 <a name="ln-47"></a>            <span class="c">! Apply kicks to all bodies (including those in the encounter list)</span>
 <a name="ln-48"></a>            <span class="k">call </span><span class="n">helio_kick_getacch_pl</span><span class="p">(</span><span class="n">pl</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-49"></a>
-<a name="ln-50"></a>            <span class="c">! Remove kicks from bodies involved currently in the encounter list, as these are dealt with separately.</span>
-<a name="ln-51"></a>            <span class="n">nplplenc</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">nenc</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
-<a name="ln-52"></a>            <span class="k">allocate</span><span class="p">(</span><span class="n">k_plpl_enc</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">nplplenc</span><span class="p">))</span>
-<a name="ln-53"></a>            <span class="n">k_plpl_enc</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(:,</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">kidx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplenc</span><span class="p">))</span>
-<a name="ln-54"></a>            <span class="n">ah_enc</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-55"></a>            <span class="k">call </span><span class="n">kick_getacch_int_all_pl</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplplenc</span><span class="p">,</span> <span class="n">k_plpl_enc</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">,</span> <span class="n">ah_enc</span><span class="p">)</span>
-<a name="ln-56"></a>            <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">-</span> <span class="n">ah_enc</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span>
-<a name="ln-57"></a>
-<a name="ln-58"></a>         <span class="k">end associate</span>
-<a name="ln-59"></a><span class="k">      end select</span>
-<a name="ln-60"></a>
-<a name="ln-61"></a><span class="k">      return</span>
-<a name="ln-62"></a><span class="k">   end subroutine </span><span class="n">symba_kick_getacch_pl</span>
-<a name="ln-63"></a>
+<a name="ln-49"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">nenc</span> <span class="o">&gt;</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span> 
+<a name="ln-50"></a>               <span class="c">! Remove kicks from bodies involved currently in the encounter list, as these are dealt with separately.</span>
+<a name="ln-51"></a>               <span class="n">nplplenc</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">nenc</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-52"></a>               <span class="k">allocate</span><span class="p">(</span><span class="n">k_plpl_enc</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">nplplenc</span><span class="p">))</span>
+<a name="ln-53"></a>               <span class="n">k_plpl_enc</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplenc</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(:,</span><span class="n">plplenc_list</span><span class="p">%</span><span class="n">kidx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nplplenc</span><span class="p">))</span>
+<a name="ln-54"></a>               <span class="n">ah_enc</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-55"></a>               <span class="k">call </span><span class="n">kick_getacch_int_all_pl</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplplenc</span><span class="p">,</span> <span class="n">k_plpl_enc</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">,</span> <span class="n">ah_enc</span><span class="p">)</span>
+<a name="ln-56"></a>               <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">-</span> <span class="n">ah_enc</span><span class="p">(:,</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span>
+<a name="ln-57"></a>            <span class="k">end if</span>
+<a name="ln-58"></a>
+<a name="ln-59"></a><span class="k">         end associate</span>
+<a name="ln-60"></a><span class="k">      end select</span>
+<a name="ln-61"></a>
+<a name="ln-62"></a><span class="k">      return</span>
+<a name="ln-63"></a><span class="k">   end subroutine </span><span class="n">symba_kick_getacch_pl</span>
 <a name="ln-64"></a>
-<a name="ln-65"></a>   <span class="k">module subroutine </span><span class="n">symba_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-66"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-67"></a>      <span class="c">!!</span>
-<a name="ln-68"></a>      <span class="c">!! Compute heliocentric accelerations of test particles</span>
-<a name="ln-69"></a>      <span class="c">!!</span>
-<a name="ln-70"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine symba_kick_getacch_tp.f90</span>
-<a name="ln-71"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine symba5_kick_getacch.f</span>
-<a name="ln-72"></a>      <span class="k">implicit none</span>
-<a name="ln-73"></a>      <span class="c">! Arguments</span>
-<a name="ln-74"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA test particle data structure</span>
-<a name="ln-75"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
-<a name="ln-76"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
-<a name="ln-77"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
-<a name="ln-78"></a>      <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Logical flag that determines whether or not this is the beginning or end of the step</span>
-<a name="ln-79"></a>      <span class="c">! Internals</span>
-<a name="ln-80"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span>
-<a name="ln-81"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">rjj</span><span class="p">,</span> <span class="n">fac</span><span class="p">,</span> <span class="n">rlim2</span>
-<a name="ln-82"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dx</span>
-<a name="ln-83"></a>
-<a name="ln-84"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-85"></a><span class="k">      select type</span><span class="p">(</span><span class="nb">system</span><span class="p">)</span>
-<a name="ln-86"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">)</span>
-<a name="ln-87"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">cb</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">cb</span><span class="p">,</span> <span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">,</span> <span class="n">pltpenc_list</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pltpenc_list</span><span class="p">,</span> <span class="n">npltpenc</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span>
-<a name="ln-88"></a>            <span class="k">call </span><span class="n">helio_kick_getacch_tp</span><span class="p">(</span><span class="n">tp</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
-<a name="ln-89"></a>            <span class="c">! Remove accelerations from encountering pairs</span>
-<a name="ln-90"></a>            <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npltpenc</span>
-<a name="ln-91"></a>               <span class="n">i</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-92"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-93"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">j</span><span class="p">))</span> <span class="k">THEN</span>
-<a name="ln-94"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">lbeg</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-95"></a><span class="k">                     </span><span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xbeg</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-96"></a>                  <span class="k">else</span>
-<a name="ln-97"></a><span class="k">                     </span><span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xend</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-98"></a>                  <span class="k">end if</span>
-<a name="ln-99"></a><span class="k">                  </span><span class="n">rjj</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">dx</span><span class="p">(:),</span> <span class="n">dx</span><span class="p">(:))</span>
-<a name="ln-100"></a>                  <span class="n">fac</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="n">rjj</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">rjj</span><span class="p">))</span>
-<a name="ln-101"></a>                  <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
-<a name="ln-102"></a>               <span class="k">end IF</span>
-<a name="ln-103"></a><span class="k">            end do</span>
-<a name="ln-104"></a><span class="k">         end associate</span>
-<a name="ln-105"></a><span class="k">      end select</span>
-<a name="ln-106"></a><span class="k">      return</span>
-<a name="ln-107"></a><span class="k">   end subroutine </span><span class="n">symba_kick_getacch_tp</span>
-<a name="ln-108"></a>
+<a name="ln-65"></a>
+<a name="ln-66"></a>   <span class="k">module subroutine </span><span class="n">symba_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-67"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-68"></a>      <span class="c">!!</span>
+<a name="ln-69"></a>      <span class="c">!! Compute heliocentric accelerations of test particles</span>
+<a name="ln-70"></a>      <span class="c">!!</span>
+<a name="ln-71"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine symba_kick_getacch_tp.f90</span>
+<a name="ln-72"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine symba5_kick_getacch.f</span>
+<a name="ln-73"></a>      <span class="k">implicit none</span>
+<a name="ln-74"></a>      <span class="c">! Arguments</span>
+<a name="ln-75"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA test particle data structure</span>
+<a name="ln-76"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! Swiftest nbody system object</span>
+<a name="ln-77"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span>  <span class="c">!! Current run configuration parameters </span>
+<a name="ln-78"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">t</span>      <span class="c">!! Current time</span>
+<a name="ln-79"></a>      <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Logical flag that determines whether or not this is the beginning or end of the step</span>
+<a name="ln-80"></a>      <span class="c">! Internals</span>
+<a name="ln-81"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span>
+<a name="ln-82"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">rjj</span><span class="p">,</span> <span class="n">fac</span><span class="p">,</span> <span class="n">rlim2</span>
+<a name="ln-83"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dx</span>
+<a name="ln-84"></a>
+<a name="ln-85"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-86"></a><span class="k">      select type</span><span class="p">(</span><span class="nb">system</span><span class="p">)</span>
+<a name="ln-87"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">)</span>
+<a name="ln-88"></a>         <span class="k">associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">cb</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">cb</span><span class="p">,</span> <span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">,</span> <span class="n">pltpenc_list</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pltpenc_list</span><span class="p">,</span> <span class="n">npltpenc</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pltpenc_list</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span>
+<a name="ln-89"></a>            <span class="k">call </span><span class="n">helio_kick_getacch_tp</span><span class="p">(</span><span class="n">tp</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">t</span><span class="p">,</span> <span class="n">lbeg</span><span class="p">)</span>
+<a name="ln-90"></a>            <span class="c">! Remove accelerations from encountering pairs</span>
+<a name="ln-91"></a>            <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npltpenc</span>
+<a name="ln-92"></a>               <span class="n">i</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-93"></a>               <span class="n">j</span> <span class="o">=</span> <span class="n">pltpenc_list</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-94"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">j</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-95"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">lbeg</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-96"></a><span class="k">                     </span><span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xbeg</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-97"></a>                  <span class="k">else</span>
+<a name="ln-98"></a><span class="k">                     </span><span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xend</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-99"></a>                  <span class="k">end if</span>
+<a name="ln-100"></a><span class="k">                  </span><span class="n">rjj</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">dx</span><span class="p">(:),</span> <span class="n">dx</span><span class="p">(:))</span>
+<a name="ln-101"></a>                  <span class="n">fac</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="n">rjj</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">rjj</span><span class="p">))</span>
+<a name="ln-102"></a>                  <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
+<a name="ln-103"></a>               <span class="k">end if</span>
+<a name="ln-104"></a><span class="k">            end do</span>
+<a name="ln-105"></a><span class="k">         end associate</span>
+<a name="ln-106"></a><span class="k">      end select</span>
+<a name="ln-107"></a><span class="k">      return</span>
+<a name="ln-108"></a><span class="k">   end subroutine </span><span class="n">symba_kick_getacch_tp</span>
 <a name="ln-109"></a>
-<a name="ln-110"></a>   <span class="k">module subroutine </span><span class="n">symba_kick_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">sgn</span><span class="p">)</span>
-<a name="ln-111"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-112"></a>      <span class="c">!!</span>
-<a name="ln-113"></a>      <span class="c">!! Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion.</span>
-<a name="ln-114"></a>      <span class="c">!! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types</span>
-<a name="ln-115"></a>      <span class="c">!!</span>
-<a name="ln-116"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: symba_kick.f90</span>
-<a name="ln-117"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine symba5_kick.f</span>
-<a name="ln-118"></a>      <span class="k">implicit none</span>
-<a name="ln-119"></a>      <span class="c">! Arguments</span>
-<a name="ln-120"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-tp encounter list object</span>
-<a name="ln-121"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
-<a name="ln-122"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! step size</span>
-<a name="ln-123"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>   <span class="c">!! Current recursion level</span>
-<a name="ln-124"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sgn</span>    <span class="c">!! sign to be applied to acceleration</span>
-<a name="ln-125"></a>      <span class="c">! Internals</span>
-<a name="ln-126"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">irm1</span><span class="p">,</span> <span class="n">irecl</span><span class="p">,</span> <span class="n">ngood</span>
-<a name="ln-127"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">k</span>
-<a name="ln-128"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">r</span><span class="p">,</span> <span class="n">rr</span><span class="p">,</span> <span class="n">ri</span><span class="p">,</span> <span class="n">ris</span><span class="p">,</span> <span class="n">rim1</span><span class="p">,</span> <span class="n">r2</span><span class="p">,</span> <span class="n">ir3</span><span class="p">,</span> <span class="n">fac</span><span class="p">,</span> <span class="n">faci</span><span class="p">,</span> <span class="n">facj</span>
-<a name="ln-129"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dx</span>
-<a name="ln-130"></a>      <span class="kt">logical</span>                   <span class="kd">::</span> <span class="n">isplpl</span>
-<a name="ln-131"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lgoodlevel</span>
-<a name="ln-132"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">good_idx</span>
-<a name="ln-133"></a>
-<a name="ln-134"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-135"></a>
+<a name="ln-110"></a>
+<a name="ln-111"></a>   <span class="k">module subroutine </span><span class="n">symba_kick_encounter</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="nb">system</span><span class="p">,</span> <span class="n">dt</span><span class="p">,</span> <span class="n">irec</span><span class="p">,</span> <span class="n">sgn</span><span class="p">)</span>
+<a name="ln-112"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-113"></a>      <span class="c">!!</span>
+<a name="ln-114"></a>      <span class="c">!! Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion.</span>
+<a name="ln-115"></a>      <span class="c">!! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types</span>
+<a name="ln-116"></a>      <span class="c">!!</span>
+<a name="ln-117"></a>      <span class="c">!! Adapted from David E. Kaufmann&#39;s Swifter routine: symba_kick.f90</span>
+<a name="ln-118"></a>      <span class="c">!! Adapted from Hal Levison&#39;s Swift routine symba5_kick.f</span>
+<a name="ln-119"></a>      <span class="k">implicit none</span>
+<a name="ln-120"></a>      <span class="c">! Arguments</span>
+<a name="ln-121"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_encounter</span><span class="p">),</span>    <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">self</span>   <span class="c">!! SyMBA pl-tp encounter list object</span>
+<a name="ln-122"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_nbody_system</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="nb">system</span> <span class="c">!! SyMBA nbody system object</span>
+<a name="ln-123"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                  <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>     <span class="c">!! step size</span>
+<a name="ln-124"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">irec</span>   <span class="c">!! Current recursion level</span>
+<a name="ln-125"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">sgn</span>    <span class="c">!! sign to be applied to acceleration</span>
+<a name="ln-126"></a>      <span class="c">! Internals</span>
+<a name="ln-127"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">irm1</span><span class="p">,</span> <span class="n">irecl</span><span class="p">,</span> <span class="n">ngood</span>
+<a name="ln-128"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span>              <span class="kd">::</span> <span class="n">k</span>
+<a name="ln-129"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                  <span class="kd">::</span> <span class="n">r</span><span class="p">,</span> <span class="n">rr</span><span class="p">,</span> <span class="n">ri</span><span class="p">,</span> <span class="n">ris</span><span class="p">,</span> <span class="n">rim1</span><span class="p">,</span> <span class="n">r2</span><span class="p">,</span> <span class="n">ir3</span><span class="p">,</span> <span class="n">fac</span><span class="p">,</span> <span class="n">faci</span><span class="p">,</span> <span class="n">facj</span>
+<a name="ln-130"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">dx</span>
+<a name="ln-131"></a>      <span class="kt">logical</span>                   <span class="kd">::</span> <span class="n">isplpl</span>
+<a name="ln-132"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lgoodlevel</span>
+<a name="ln-133"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">good_idx</span>
+<a name="ln-134"></a>
+<a name="ln-135"></a>      <span class="k">if</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nenc</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
 <a name="ln-136"></a>
-<a name="ln-137"></a><span class="k">      select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
-<a name="ln-138"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_plplenc</span><span class="p">)</span>
-<a name="ln-139"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-140"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">)</span>
-<a name="ln-141"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-142"></a>      <span class="k">end select</span>
-<a name="ln-143"></a><span class="k">      select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
-<a name="ln-144"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span>
-<a name="ln-145"></a>         <span class="k">select type</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">tp</span><span class="p">)</span>
-<a name="ln-146"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">symba_tp</span><span class="p">)</span>
-<a name="ln-147"></a>            <span class="k">associate</span><span class="p">(</span><span class="n">npl</span> <span class="o">=&gt;</span> <span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">tp</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">nenc</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span>
-<a name="ln-148"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">npl</span> <span class="o">&gt;</span> <span class="mi">0</span><span class="p">)</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">/=</span> <span class="n">INACTIVE</span>
-<a name="ln-149"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">ntp</span> <span class="o">&gt;</span> <span class="mi">0</span><span class="p">)</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">/=</span> <span class="n">INACTIVE</span>
-<a name="ln-150"></a>               <span class="k">allocate</span><span class="p">(</span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">nenc</span><span class="p">))</span>
-<a name="ln-151"></a>
-<a name="ln-152"></a>               <span class="n">irm1</span> <span class="o">=</span> <span class="n">irec</span> <span class="o">-</span> <span class="mi">1</span>
-<a name="ln-153"></a>
-<a name="ln-154"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">sgn</span> <span class="o">&lt;</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-155"></a><span class="k">                  </span><span class="n">irecl</span> <span class="o">=</span> <span class="n">irec</span> <span class="o">-</span> <span class="mi">1</span>
-<a name="ln-156"></a>               <span class="k">else</span>
-<a name="ln-157"></a><span class="k">                  </span><span class="n">irecl</span> <span class="o">=</span> <span class="n">irec</span>
-<a name="ln-158"></a>               <span class="k">end if</span>
-<a name="ln-159"></a>
-<a name="ln-160"></a><span class="k">               do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span>
-<a name="ln-161"></a>                  <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-162"></a>                  <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-163"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-164"></a><span class="k">                     </span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span>
-<a name="ln-165"></a>                  <span class="k">else</span>
-<a name="ln-166"></a><span class="k">                     </span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span>
-<a name="ln-167"></a>                  <span class="k">end if</span>
-<a name="ln-168"></a><span class="k">                  </span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">==</span> <span class="n">ACTIVE</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-169"></a>               <span class="k">end do</span>
-<a name="ln-170"></a><span class="k">               </span><span class="n">ngood</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lgoodlevel</span><span class="p">(:))</span>
-<a name="ln-171"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">ngood</span> <span class="o">&gt;</span> <span class="mi">0_I8B</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-172"></a><span class="k">                  allocate</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">ngood</span><span class="p">))</span>
-<a name="ln-173"></a>                  <span class="n">good_idx</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span><span class="p">)],</span> <span class="n">lgoodlevel</span><span class="p">(:))</span>
-<a name="ln-174"></a>
-<a name="ln-175"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-176"></a><span class="k">                     do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ngood</span><span class="p">)</span>
-<a name="ln-177"></a>                        <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-178"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-179"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-180"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-181"></a>                     <span class="k">end do</span>
-<a name="ln-182"></a><span class="k">                  else</span>
-<a name="ln-183"></a><span class="k">                     do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">k</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">:</span><span class="n">ngood</span><span class="p">)</span>
-<a name="ln-184"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-185"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-186"></a>                     <span class="k">end do</span>
-<a name="ln-187"></a><span class="k">                  end if</span>
-<a name="ln-188"></a>
-<a name="ln-189"></a><span class="k">                  do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ngood</span>
-<a name="ln-190"></a>                     <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-191"></a>                     <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-192"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-193"></a><span class="k">                        </span><span class="n">ri</span> <span class="o">=</span> <span class="p">((</span><span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>  <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RHSCALE</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="p">(</span><span class="mi">2</span><span class="o">*</span><span class="n">irecl</span><span class="p">))</span>
-<a name="ln-194"></a>                        <span class="n">rim1</span> <span class="o">=</span> <span class="n">ri</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
-<a name="ln-195"></a>                        <span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-196"></a>                     <span class="k">else</span>
-<a name="ln-197"></a><span class="k">                        </span><span class="n">ri</span> <span class="o">=</span> <span class="p">((</span><span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RHSCALE</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="p">(</span><span class="mi">2</span><span class="o">*</span><span class="n">irecl</span><span class="p">))</span>
-<a name="ln-198"></a>                        <span class="n">rim1</span> <span class="o">=</span> <span class="n">ri</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
-<a name="ln-199"></a>                        <span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-200"></a>                     <span class="k">end if</span>
-<a name="ln-201"></a><span class="k">                     </span><span class="n">r2</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">dx</span><span class="p">(:),</span> <span class="n">dx</span><span class="p">(:))</span>
-<a name="ln-202"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">r2</span> <span class="o">&lt;</span> <span class="n">rim1</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-203"></a><span class="k">                        </span><span class="n">fac</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-204"></a>                        <span class="n">lgoodlevel</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-205"></a>                        <span class="k">cycle</span>
-<a name="ln-206"></a><span class="k">                     end if</span>
-<a name="ln-207"></a><span class="k">                     if</span> <span class="p">(</span><span class="n">r2</span> <span class="o">&lt;</span> <span class="n">ri</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-208"></a><span class="k">                        </span><span class="n">ris</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">ri</span><span class="p">)</span>
-<a name="ln-209"></a>                        <span class="n">r</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">r2</span><span class="p">)</span>
-<a name="ln-210"></a>                        <span class="n">rr</span> <span class="o">=</span> <span class="p">(</span><span class="n">ris</span> <span class="o">-</span> <span class="n">r</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="n">ris</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">RSHELL</span><span class="p">))</span>
-<a name="ln-211"></a>                        <span class="n">fac</span> <span class="o">=</span> <span class="p">(</span><span class="n">r2</span><span class="o">**</span><span class="p">(</span><span class="o">-</span><span class="mf">1.5_DP</span><span class="p">))</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="mi">3</span> <span class="o">*</span> <span class="p">(</span><span class="n">rr</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="mi">2</span> <span class="o">*</span> <span class="p">(</span><span class="n">rr</span><span class="o">**</span><span class="mi">3</span><span class="p">))</span>
-<a name="ln-212"></a>                     <span class="k">else</span>
-<a name="ln-213"></a><span class="k">                        </span><span class="n">ir3</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">/</span> <span class="p">(</span><span class="n">r2</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">r2</span><span class="p">))</span>
-<a name="ln-214"></a>                        <span class="n">fac</span> <span class="o">=</span> <span class="n">ir3</span>
-<a name="ln-215"></a>                     <span class="k">end if</span>
-<a name="ln-216"></a><span class="k">                     </span><span class="n">faci</span> <span class="o">=</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-217"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-218"></a><span class="k">                        </span><span class="n">facj</span> <span class="o">=</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
-<a name="ln-219"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
-<a name="ln-220"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
-<a name="ln-221"></a>                     <span class="k">else</span>
-<a name="ln-222"></a><span class="k">                        </span><span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
-<a name="ln-223"></a>                     <span class="k">end if</span>
-<a name="ln-224"></a><span class="k">                  end do</span>
-<a name="ln-225"></a><span class="k">                  </span><span class="n">ngood</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lgoodlevel</span><span class="p">(:))</span>
-<a name="ln-226"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">ngood</span> <span class="o">==</span> <span class="mi">0_I8B</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-227"></a><span class="k">                  </span><span class="n">good_idx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ngood</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span><span class="p">)],</span> <span class="n">lgoodlevel</span><span class="p">(:))</span>
-<a name="ln-228"></a>
-<a name="ln-229"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-230"></a><span class="k">                     do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ngood</span>
-<a name="ln-231"></a>                        <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-232"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-233"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">sgn</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-234"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">sgn</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span>
-<a name="ln-235"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-236"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-237"></a>                     <span class="k">end do</span>
-<a name="ln-238"></a><span class="k">                  else</span>
-<a name="ln-239"></a><span class="k">                     do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ngood</span>
-<a name="ln-240"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-241"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">sgn</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span>
-<a name="ln-242"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-243"></a>                     <span class="k">end do</span>
-<a name="ln-244"></a><span class="k">                  end if</span>
-<a name="ln-245"></a><span class="k">               end if</span>
-<a name="ln-246"></a><span class="k">            end associate</span>
-<a name="ln-247"></a><span class="k">         end select</span>
-<a name="ln-248"></a><span class="k">      end select</span>
-<a name="ln-249"></a><span class="k">      </span>
-<a name="ln-250"></a><span class="k">      return</span>
-<a name="ln-251"></a><span class="k">   end subroutine </span><span class="n">symba_kick_encounter</span>
-<a name="ln-252"></a>
-<a name="ln-253"></a><span class="k">end submodule </span><span class="n">s_symba_kick</span>
+<a name="ln-137"></a>
+<a name="ln-138"></a><span class="k">      select type</span><span class="p">(</span><span class="n">self</span><span class="p">)</span>
+<a name="ln-139"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_plplenc</span><span class="p">)</span>
+<a name="ln-140"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-141"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pltpenc</span><span class="p">)</span>
+<a name="ln-142"></a>         <span class="n">isplpl</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-143"></a>      <span class="k">end select</span>
+<a name="ln-144"></a><span class="k">      select type</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">pl</span><span class="p">)</span>
+<a name="ln-145"></a>      <span class="k">class is</span> <span class="p">(</span><span class="n">symba_pl</span><span class="p">)</span>
+<a name="ln-146"></a>         <span class="k">select type</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="nb">system</span><span class="p">%</span><span class="n">tp</span><span class="p">)</span>
+<a name="ln-147"></a>         <span class="k">class is</span> <span class="p">(</span><span class="n">symba_tp</span><span class="p">)</span>
+<a name="ln-148"></a>            <span class="k">associate</span><span class="p">(</span><span class="n">npl</span> <span class="o">=&gt;</span> <span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">tp</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">nenc</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nenc</span><span class="p">)</span>
+<a name="ln-149"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">npl</span> <span class="o">&gt;</span> <span class="mi">0</span><span class="p">)</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">/=</span> <span class="n">INACTIVE</span>
+<a name="ln-150"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">ntp</span> <span class="o">&gt;</span> <span class="mi">0</span><span class="p">)</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">)</span> <span class="o">/=</span> <span class="n">INACTIVE</span>
+<a name="ln-151"></a>               <span class="k">allocate</span><span class="p">(</span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">nenc</span><span class="p">))</span>
+<a name="ln-152"></a>
+<a name="ln-153"></a>               <span class="n">irm1</span> <span class="o">=</span> <span class="n">irec</span> <span class="o">-</span> <span class="mi">1</span>
+<a name="ln-154"></a>
+<a name="ln-155"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">sgn</span> <span class="o">&lt;</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-156"></a><span class="k">                  </span><span class="n">irecl</span> <span class="o">=</span> <span class="n">irec</span> <span class="o">-</span> <span class="mi">1</span>
+<a name="ln-157"></a>               <span class="k">else</span>
+<a name="ln-158"></a><span class="k">                  </span><span class="n">irecl</span> <span class="o">=</span> <span class="n">irec</span>
+<a name="ln-159"></a>               <span class="k">end if</span>
+<a name="ln-160"></a>
+<a name="ln-161"></a><span class="k">               do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span>
+<a name="ln-162"></a>                  <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-163"></a>                  <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-164"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-165"></a><span class="k">                     </span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span>
+<a name="ln-166"></a>                  <span class="k">else</span>
+<a name="ln-167"></a><span class="k">                     </span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">tp</span><span class="p">%</span><span class="n">levelg</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">&gt;=</span> <span class="n">irm1</span><span class="p">)</span>
+<a name="ln-168"></a>                  <span class="k">end if</span>
+<a name="ln-169"></a><span class="k">                  </span><span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">==</span> <span class="n">ACTIVE</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="n">lgoodlevel</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-170"></a>               <span class="k">end do</span>
+<a name="ln-171"></a><span class="k">               </span><span class="n">ngood</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lgoodlevel</span><span class="p">(:))</span>
+<a name="ln-172"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">ngood</span> <span class="o">&gt;</span> <span class="mi">0_I8B</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-173"></a><span class="k">                  allocate</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">ngood</span><span class="p">))</span>
+<a name="ln-174"></a>                  <span class="n">good_idx</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span><span class="p">)],</span> <span class="n">lgoodlevel</span><span class="p">(:))</span>
+<a name="ln-175"></a>
+<a name="ln-176"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-177"></a><span class="k">                     do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ngood</span><span class="p">)</span>
+<a name="ln-178"></a>                        <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-179"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-180"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-181"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-182"></a>                     <span class="k">end do</span>
+<a name="ln-183"></a><span class="k">                  else</span>
+<a name="ln-184"></a><span class="k">                     do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">k</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">:</span><span class="n">ngood</span><span class="p">)</span>
+<a name="ln-185"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-186"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-187"></a>                     <span class="k">end do</span>
+<a name="ln-188"></a><span class="k">                  end if</span>
+<a name="ln-189"></a>
+<a name="ln-190"></a><span class="k">                  do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ngood</span>
+<a name="ln-191"></a>                     <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-192"></a>                     <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-193"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-194"></a><span class="k">                        </span><span class="n">ri</span> <span class="o">=</span> <span class="p">((</span><span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>  <span class="o">+</span> <span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">j</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RHSCALE</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="p">(</span><span class="mi">2</span><span class="o">*</span><span class="n">irecl</span><span class="p">))</span>
+<a name="ln-195"></a>                        <span class="n">rim1</span> <span class="o">=</span> <span class="n">ri</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
+<a name="ln-196"></a>                        <span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-197"></a>                     <span class="k">else</span>
+<a name="ln-198"></a><span class="k">                        </span><span class="n">ri</span> <span class="o">=</span> <span class="p">((</span><span class="n">pl</span><span class="p">%</span><span class="n">rhill</span><span class="p">(</span><span class="n">i</span><span class="p">))</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RHSCALE</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="p">(</span><span class="mi">2</span><span class="o">*</span><span class="n">irecl</span><span class="p">))</span>
+<a name="ln-199"></a>                        <span class="n">rim1</span> <span class="o">=</span> <span class="n">ri</span> <span class="o">*</span> <span class="p">(</span><span class="n">RSHELL</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span>
+<a name="ln-200"></a>                        <span class="n">dx</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-201"></a>                     <span class="k">end if</span>
+<a name="ln-202"></a><span class="k">                     </span><span class="n">r2</span> <span class="o">=</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">dx</span><span class="p">(:),</span> <span class="n">dx</span><span class="p">(:))</span>
+<a name="ln-203"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">r2</span> <span class="o">&lt;</span> <span class="n">rim1</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-204"></a><span class="k">                        </span><span class="n">fac</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-205"></a>                        <span class="n">lgoodlevel</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-206"></a>                        <span class="k">cycle</span>
+<a name="ln-207"></a><span class="k">                     end if</span>
+<a name="ln-208"></a><span class="k">                     if</span> <span class="p">(</span><span class="n">r2</span> <span class="o">&lt;</span> <span class="n">ri</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-209"></a><span class="k">                        </span><span class="n">ris</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">ri</span><span class="p">)</span>
+<a name="ln-210"></a>                        <span class="n">r</span> <span class="o">=</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">r2</span><span class="p">)</span>
+<a name="ln-211"></a>                        <span class="n">rr</span> <span class="o">=</span> <span class="p">(</span><span class="n">ris</span> <span class="o">-</span> <span class="n">r</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="n">ris</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">RSHELL</span><span class="p">))</span>
+<a name="ln-212"></a>                        <span class="n">fac</span> <span class="o">=</span> <span class="p">(</span><span class="n">r2</span><span class="o">**</span><span class="p">(</span><span class="o">-</span><span class="mf">1.5_DP</span><span class="p">))</span> <span class="o">*</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="mi">3</span> <span class="o">*</span> <span class="p">(</span><span class="n">rr</span><span class="o">**</span><span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="mi">2</span> <span class="o">*</span> <span class="p">(</span><span class="n">rr</span><span class="o">**</span><span class="mi">3</span><span class="p">))</span>
+<a name="ln-213"></a>                     <span class="k">else</span>
+<a name="ln-214"></a><span class="k">                        </span><span class="n">ir3</span> <span class="o">=</span> <span class="mf">1.0_DP</span> <span class="o">/</span> <span class="p">(</span><span class="n">r2</span> <span class="o">*</span> <span class="nb">sqrt</span><span class="p">(</span><span class="n">r2</span><span class="p">))</span>
+<a name="ln-215"></a>                        <span class="n">fac</span> <span class="o">=</span> <span class="n">ir3</span>
+<a name="ln-216"></a>                     <span class="k">end if</span>
+<a name="ln-217"></a><span class="k">                     </span><span class="n">faci</span> <span class="o">=</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-218"></a>                     <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-219"></a><span class="k">                        </span><span class="n">facj</span> <span class="o">=</span> <span class="n">fac</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
+<a name="ln-220"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">facj</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
+<a name="ln-221"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
+<a name="ln-222"></a>                     <span class="k">else</span>
+<a name="ln-223"></a><span class="k">                        </span><span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span> <span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">faci</span> <span class="o">*</span> <span class="n">dx</span><span class="p">(:)</span>
+<a name="ln-224"></a>                     <span class="k">end if</span>
+<a name="ln-225"></a><span class="k">                  end do</span>
+<a name="ln-226"></a><span class="k">                  </span><span class="n">ngood</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="n">lgoodlevel</span><span class="p">(:))</span>
+<a name="ln-227"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">ngood</span> <span class="o">==</span> <span class="mi">0_I8B</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-228"></a><span class="k">                  </span><span class="n">good_idx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">ngood</span><span class="p">)</span> <span class="o">=</span> <span class="nb">pack</span><span class="p">([(</span><span class="n">i</span><span class="p">,</span> <span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nenc</span><span class="p">)],</span> <span class="n">lgoodlevel</span><span class="p">(:))</span>
+<a name="ln-229"></a>
+<a name="ln-230"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">isplpl</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-231"></a><span class="k">                     do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ngood</span>
+<a name="ln-232"></a>                        <span class="n">i</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index1</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-233"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-234"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">+</span> <span class="n">sgn</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-235"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">sgn</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span>
+<a name="ln-236"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-237"></a>                        <span class="n">pl</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-238"></a>                     <span class="k">end do</span>
+<a name="ln-239"></a><span class="k">                  else</span>
+<a name="ln-240"></a><span class="k">                     do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">ngood</span>
+<a name="ln-241"></a>                        <span class="n">j</span> <span class="o">=</span> <span class="n">self</span><span class="p">%</span><span class="n">index2</span><span class="p">(</span><span class="n">good_idx</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
+<a name="ln-242"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">tp</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">sgn</span> <span class="o">*</span> <span class="n">dt</span> <span class="o">*</span> <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span>
+<a name="ln-243"></a>                        <span class="n">tp</span><span class="p">%</span><span class="n">ah</span><span class="p">(:,</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-244"></a>                     <span class="k">end do</span>
+<a name="ln-245"></a><span class="k">                  end if</span>
+<a name="ln-246"></a><span class="k">               end if</span>
+<a name="ln-247"></a><span class="k">            end associate</span>
+<a name="ln-248"></a><span class="k">         end select</span>
+<a name="ln-249"></a><span class="k">      end select</span>
+<a name="ln-250"></a><span class="k">      </span>
+<a name="ln-251"></a><span class="k">      return</span>
+<a name="ln-252"></a><span class="k">   end subroutine </span><span class="n">symba_kick_encounter</span>
+<a name="ln-253"></a>
+<a name="ln-254"></a><span class="k">end submodule </span><span class="n">s_symba_kick</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/symba_setup.f90.html b/docs/sourcefile/symba_setup.f90.html
index 204387440..8eb774231 100644
--- a/docs/sourcefile/symba_setup.f90.html
+++ b/docs/sourcefile/symba_setup.f90.html
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_setup.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_setupf90EfferentGraph" width="641pt" height="258pt"
- viewBox="0.00 0.00 641.00 257.75" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_setupf90EfferentGraph" width="641pt" height="250pt"
+ viewBox="0.00 0.00 641.00 249.72" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_setup.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 918,-366.74 918,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 918,-355.2 918,4 -4,4"/>
 <!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_setup.f90</title>
-<polygon fill="none" stroke="black" points="914,-189.48 820,-189.48 820,-165.48 914,-165.48 914,-189.48"/>
-<text text-anchor="middle" x="867" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_setup.f90</text>
+<polygon fill="none" stroke="black" points="914,-241.11 820,-241.11 820,-217.11 914,-217.11 914,-241.11"/>
+<text text-anchor="middle" x="867" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_setup.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.93,-181.36C782.74,-184.49 730.11,-188.92 689.45,-192.35"/>
-<polygon fill="#000000" stroke="#000000" points="689.05,-188.87 679.38,-193.2 689.64,-195.84 689.05,-188.87"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.83,-232.99C782.44,-236.13 729.48,-240.58 688.67,-244.01"/>
+<polygon fill="#000000" stroke="#000000" points="688.24,-240.53 678.57,-244.86 688.83,-247.51 688.24,-240.53"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.96,-169.4C811.44,-167.91 802.57,-166.35 794.17,-164.88"/>
-<polygon fill="#000000" stroke="#000000" points="794.66,-161.41 784.21,-163.13 793.45,-168.31 794.66,-161.41"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.96,-221.03C811.44,-219.54 802.57,-217.98 794.17,-216.51"/>
+<polygon fill="#000000" stroke="#000000" points="794.66,-213.04 784.21,-214.76 793.45,-219.93 794.66,-213.04"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_setup.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/symba_step.f90.html b/docs/sourcefile/symba_step.f90.html
index 21690373a..800e8ea61 100644
--- a/docs/sourcefile/symba_step.f90.html
+++ b/docs/sourcefile/symba_step.f90.html
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_step.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_stepf90EfferentGraph" width="641pt" height="259pt"
- viewBox="0.00 0.00 641.00 259.44" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_step.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_stepf90EfferentGraph" width="641pt" height="251pt"
+ viewBox="0.00 0.00 641.00 251.36" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_step.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_step.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 912,-366.74 912,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 912,-355.2 912,4 -4,4"/>
 <!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_step.f90</title>
-<polygon fill="none" stroke="black" points="908,-189.48 820,-189.48 820,-165.48 908,-165.48 908,-189.48"/>
-<text text-anchor="middle" x="864" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_step.f90</text>
+<polygon fill="none" stroke="black" points="908,-241.11 820,-241.11 820,-217.11 908,-217.11 908,-241.11"/>
+<text text-anchor="middle" x="864" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_step.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.99,-181.15C783.42,-184.27 730.49,-188.78 689.54,-192.27"/>
-<polygon fill="#000000" stroke="#000000" points="689.07,-188.8 679.4,-193.14 689.66,-195.78 689.07,-188.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-232.78C783.13,-235.91 729.85,-240.44 688.76,-243.94"/>
+<polygon fill="#000000" stroke="#000000" points="688.26,-240.47 678.59,-244.8 688.85,-247.44 688.26,-240.47"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.77,-169.69C811.37,-168.18 802.58,-166.59 794.22,-165.09"/>
-<polygon fill="#000000" stroke="#000000" points="794.75,-161.63 784.29,-163.3 793.51,-168.52 794.75,-161.63"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.77,-221.32C811.37,-219.81 802.58,-218.22 794.22,-216.72"/>
+<polygon fill="#000000" stroke="#000000" points="794.75,-213.25 784.29,-214.93 793.51,-220.14 794.75,-213.25"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_step.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_step.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/symba_util.f90.html b/docs/sourcefile/symba_util.f90.html
index 9b84d66ed..7a5b41c68 100644
--- a/docs/sourcefile/symba_util.f90.html
+++ b/docs/sourcefile/symba_util.f90.html
@@ -226,296 +226,294 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~symba_util.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilesymba_utilf90EfferentGraph" width="641pt" height="261pt"
- viewBox="0.00 0.00 641.00 261.15" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~symba_util.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 366.74)">
+<svg id="sourcefilesymba_utilf90EfferentGraph" width="641pt" height="253pt"
+ viewBox="0.00 0.00 641.00 253.02" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~symba_util.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 355.2)">
 <title>sourcefile~~symba_util.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-366.74 906,-366.74 906,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-355.2 906,-355.2 906,4 -4,4"/>
 <!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~symba_util.f90</title>
-<polygon fill="none" stroke="black" points="902,-189.48 820,-189.48 820,-165.48 902,-165.48 902,-189.48"/>
-<text text-anchor="middle" x="861" y="-175.08" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util.f90</text>
+<polygon fill="none" stroke="black" points="902,-241.11 820,-241.11 820,-217.11 902,-217.11 902,-241.11"/>
+<text text-anchor="middle" x="861" y="-226.71" font-family="Helvetica,sans-Serif" font-size="10.50">symba_util.f90</text>
 </g>
 <!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~symba_classes.f90</title>
 <g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-209.48 576,-209.48 576,-185.48 679,-185.48 679,-209.48"/>
-<text text-anchor="middle" x="627.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-261.11 575.5,-261.11 575.5,-237.11 678.5,-237.11 678.5,-261.11"/>
+<text text-anchor="middle" x="627" y="-246.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.94,-180.94C784.03,-184.04 730.81,-188.64 689.6,-192.2"/>
-<polygon fill="#000000" stroke="#000000" points="689.06,-188.74 679.39,-193.08 689.66,-195.71 689.06,-188.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.85,-232.57C783.67,-235.69 729.95,-240.32 688.56,-243.89"/>
+<polygon fill="#000000" stroke="#000000" points="688.25,-240.4 678.58,-244.75 688.85,-247.38 688.25,-240.4"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-169.48 718,-169.48 718,-145.48 784,-145.48 784,-169.48"/>
-<text text-anchor="middle" x="751" y="-155.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-221.11 718,-221.11 718,-197.11 784,-197.11 784,-221.11"/>
+<text text-anchor="middle" x="751" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.78,-170.03C811.43,-168.49 802.6,-166.85 794.17,-165.29"/>
-<polygon fill="#000000" stroke="#000000" points="794.63,-161.82 784.16,-163.44 793.35,-168.7 794.63,-161.82"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.78,-221.66C811.43,-220.11 802.6,-218.48 794.17,-216.92"/>
+<polygon fill="#000000" stroke="#000000" points="794.63,-213.44 784.16,-215.06 793.35,-220.33 794.63,-213.44"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-152.48 143.5,-152.48 143.5,-128.48 250.5,-128.48 250.5,-152.48"/>
-<text text-anchor="middle" x="197" y="-138.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-301.11 298,-301.11 298,-277.11 403,-277.11 403,-301.11"/>
+<text text-anchor="middle" x="350.5" y="-286.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C466.18,-237.65 461.86,-228.67 442,-218.48 398.12,-195.96 397.07,-164.54 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M601.08,-209.58C574.24,-221.24 530.37,-237.18 490.5,-237.48"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M612.59,-261.3C589.53,-281.19 539.94,-319.41 489.5,-329.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C468.91,-332.68 423.56,-317.52 390.32,-304.85"/>
+<polygon fill="#000000" stroke="#000000" points="391.46,-301.53 380.87,-301.19 388.93,-308.06 391.46,-301.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-209.48 442,-209.48 442,-185.48 537,-185.48 537,-209.48"/>
-<text text-anchor="middle" x="489.5" y="-195.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-221.11 441.5,-221.11 441.5,-197.11 535.5,-197.11 535.5,-221.11"/>
+<text text-anchor="middle" x="488.5" y="-206.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-197.48C566.54,-197.48 556.76,-197.48 547.27,-197.48"/>
-<polygon fill="#000000" stroke="#000000" points="547.14,-193.98 537.14,-197.48 547.14,-200.98 547.14,-193.98"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M585.05,-237.11C571.14,-233.03 555.42,-228.42 540.8,-224.14"/>
+<polygon fill="#000000" stroke="#000000" points="541.48,-220.69 530.9,-221.24 539.51,-227.41 541.48,-220.69"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_node8" class="node">
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_node10" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-94.48 0,-94.48 0,-70.48 106,-70.48 106,-94.48"/>
-<text text-anchor="middle" x="53" y="-80.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-222.11 0,-222.11 0,-198.11 106,-198.11 106,-222.11"/>
+<text text-anchor="middle" x="53" y="-207.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge5" class="edge">
 <title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.42,-209.64C594.45,-222.56 565.52,-242.35 537,-251.48 465.04,-274.51 265.27,-311.88 198,-277.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-329.11C362.89,-353.06 324.22,-363.21 202,-329.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-129.48 442.5,-129.48 442.5,-105.48 536.5,-105.48 536.5,-129.48"/>
-<text text-anchor="middle" x="489.5" y="-115.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-262.11 147.5,-262.11 147.5,-238.11 254.5,-238.11 254.5,-262.11"/>
+<text text-anchor="middle" x="201" y="-247.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M600.03,-185.44C591.3,-181.25 581.62,-176.37 573,-171.48 553.28,-160.29 531.87,-146.22 515.81,-135.25"/>
-<polygon fill="#000000" stroke="#000000" points="517.7,-132.3 507.48,-129.51 513.73,-138.07 517.7,-132.3"/>
-</g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-249.48 294.5,-249.48 294.5,-225.48 399.5,-225.48 399.5,-249.48"/>
-<text text-anchor="middle" x="347" y="-235.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-237.48C462.78,-237.67 434.42,-237.71 409.94,-237.68"/>
-<polygon fill="#000000" stroke="#000000" points="409.72,-234.18 399.71,-237.67 409.71,-241.18 409.72,-234.18"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.38,-247.38C549.63,-246.94 517.86,-247.07 489.5,-249.11"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge15" class="edge">
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-168.09C704.62,-172.42 689.18,-177.5 674.87,-182.21"/>
-<polygon fill="#000000" stroke="#000000" points="673.59,-178.95 665.19,-185.4 675.78,-185.6 673.59,-178.95"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-219.62C704.75,-223.94 689.21,-229.04 674.79,-233.77"/>
+<polygon fill="#000000" stroke="#000000" points="673.44,-230.53 665.02,-236.97 675.62,-237.18 673.44,-230.53"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C503.04,-148.58 471.13,-172.17 348,-159.48"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C600.62,-210.89 593.63,-214.71 572,-228.11 553.03,-239.86 556.04,-253.29 536,-263.11 498.03,-281.71 450.74,-288.1 413.54,-289.89"/>
+<polygon fill="#000000" stroke="#000000" points="413.19,-286.4 403.33,-290.28 413.46,-293.4 413.19,-286.4"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-131.48 300,-131.48 300,-107.48 394,-107.48 394,-131.48"/>
-<text text-anchor="middle" x="347" y="-117.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-153.11 142,-153.11 142,-129.11 260,-129.11 260,-153.11"/>
+<text text-anchor="middle" x="201" y="-138.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C448.85,-67.27 403.57,-86.46 375.38,-102.14"/>
-<polygon fill="#000000" stroke="#000000" points="373.41,-99.24 366.51,-107.28 376.92,-105.3 373.41,-99.24"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C450.66,-161.43 442.28,-155.18 405,-150.11 360.3,-144.02 309.61,-141.77 270.06,-141.04"/>
+<polygon fill="#000000" stroke="#000000" points="270.06,-137.54 260,-140.88 269.95,-144.54 270.06,-137.54"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 551.69,-180.45 489.5,-169.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.86,-208.07C693.24,-207.53 658.45,-207.3 628,-209.11"/>
 </g>
 <!-- sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node6" class="node">
 <title>sourcefile~walltime_classes.f90</title>
 <g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-54.48 142,-54.48 142,-30.48 252,-30.48 252,-54.48"/>
-<text text-anchor="middle" x="197" y="-40.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-143.11 572,-143.11 572,-119.11 682,-119.11 682,-143.11"/>
+<text text-anchor="middle" x="627" y="-128.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C578.48,-154.1 579.4,-119.27 537,-96.48 517.33,-85.91 512.12,-83.05 490.5,-77.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.98,-158.7C693.46,-159.34 658.8,-159.61 628.5,-157.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-77.48C412.12,-57.8 321.53,-49.12 262.06,-45.33"/>
-<polygon fill="#000000" stroke="#000000" points="262.26,-41.84 252.06,-44.72 261.83,-48.83 262.26,-41.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.2,-197.09C711.02,-184.19 678.76,-163.56 655.67,-148.8"/>
+<polygon fill="#000000" stroke="#000000" points="657.33,-145.7 647.02,-143.27 653.56,-151.6 657.33,-145.7"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C589.99,-154.85 550,-168.78 522.89,-180.91"/>
-<polygon fill="#000000" stroke="#000000" points="521.11,-177.88 513.52,-185.27 524.06,-184.23 521.11,-177.88"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C599.73,-210.95 570.55,-211.19 545.93,-210.88"/>
+<polygon fill="#000000" stroke="#000000" points="545.73,-207.37 535.68,-210.71 545.62,-214.37 545.73,-207.37"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_node8" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-183.11 303.5,-183.11 303.5,-159.11 397.5,-159.11 397.5,-183.11"/>
+<text text-anchor="middle" x="350.5" y="-168.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C399.24,-364.16 372.23,-368.76 288,-338.48 242.53,-322.14 240.91,-299.71 198,-277.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-169.11C461.71,-163.73 432.57,-163.42 407.9,-164.78"/>
+<polygon fill="#000000" stroke="#000000" points="407.37,-161.31 397.62,-165.46 407.83,-168.3 407.37,-161.31"/>
 </g>
 <!-- sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_node9" class="node">
 <title>sourcefile~lambda_function.f90</title>
 <g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-72.48 573,-72.48 573,-48.48 682,-48.48 682,-72.48"/>
-<text text-anchor="middle" x="627.5" y="-58.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-65.11 296,-65.11 296,-41.11 405,-41.11 405,-65.11"/>
+<text text-anchor="middle" x="350.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge13" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.61,-145.2C713.71,-128.5 676.15,-98.52 651.78,-79.07"/>
-<polygon fill="#000000" stroke="#000000" points="653.76,-76.17 643.76,-72.67 649.39,-81.64 653.76,-76.17"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C453.18,-15.58 415.77,-27.29 388.9,-37.4"/>
+<polygon fill="#000000" stroke="#000000" points="387.56,-34.16 379.5,-41.04 390.08,-40.69 387.56,-34.16"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-157.48C592.18,-155.01 554.77,-143.3 527.9,-133.19"/>
-<polygon fill="#000000" stroke="#000000" points="529.08,-129.89 518.5,-129.55 526.56,-136.42 529.08,-129.89"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C537.93,-359.84 421.52,-290.32 371.98,-255.49"/>
-<polygon fill="#000000" stroke="#000000" points="373.96,-252.6 363.8,-249.62 369.88,-258.29 373.96,-252.6"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.81,-169.67C731.01,-200.38 690.24,-280.98 628.5,-316.48"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-83.11C172.52,-96.51 165.73,-100.83 142,-120.11 115.14,-141.93 87.83,-171.2 70.91,-190.35"/>
+<polygon fill="#000000" stroke="#000000" points="68.27,-188.05 64.33,-197.88 73.54,-192.65 68.27,-188.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-13.11C402.19,-19.26 377.76,-7 296,-32.11 250.56,-46.06 244.72,-62.28 202,-83.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C570.9,12.27 549.91,-7.57 489.5,-13.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M747.27,-196.88C738.2,-159.74 705.18,-48.66 628,-13.11"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-329.48 288,-329.48 288,-305.48 406,-305.48 406,-329.48"/>
-<text text-anchor="middle" x="347" y="-315.08" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~symba_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-65.11 441,-65.11 441,-41.11 536,-41.11 536,-65.11"/>
+<text text-anchor="middle" x="488.5" y="-50.71" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge16" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-13.11C608.01,-4.82 558.97,-22.63 524.85,-37.08"/>
+<polygon fill="#000000" stroke="#000000" points="523.46,-33.87 515.66,-41.04 526.23,-40.29 523.46,-33.87"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge15" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-209.11C562.89,-212.85 552.56,-244.58 489.5,-249.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-249.11C411.01,-254.6 322.7,-253.82 264.79,-252.34"/>
+<polygon fill="#000000" stroke="#000000" points="264.79,-248.84 254.7,-252.07 264.6,-255.84 264.79,-248.84"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-357.48C469.45,-358.91 424.18,-344.81 390.13,-332.96"/>
-<polygon fill="#000000" stroke="#000000" points="391.01,-329.55 380.42,-329.53 388.68,-336.16 391.01,-329.55"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-316.48C571.77,-347.95 553.46,-352.77 490.5,-357.48"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-329.11C142.67,-313.11 93.05,-259.7 69.16,-230.16"/>
+<polygon fill="#000000" stroke="#000000" points="71.8,-227.86 62.86,-222.18 66.31,-232.19 71.8,-227.86"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.38,-301.18C283.01,-315.08 223.98,-335.24 202,-329.11"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.58,-128.46C145.16,-119.71 115.94,-107.78 92.64,-98.26"/>
-<polygon fill="#000000" stroke="#000000" points="93.97,-95.02 83.38,-94.48 91.32,-101.5 93.97,-95.02"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M304.04,-277.09C289.32,-273.2 272.83,-268.84 257.46,-264.77"/>
+<polygon fill="#000000" stroke="#000000" points="258.12,-261.33 247.56,-262.16 256.34,-268.1 258.12,-261.33"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.98,-126.01C287.54,-127.78 273.86,-129.72 260.67,-131.59"/>
-<polygon fill="#000000" stroke="#000000" points="260.12,-128.13 250.71,-133 261.11,-135.06 260.12,-128.13"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.57,-153.13C150.85,-164.34 115.26,-181.16 88.89,-193.62"/>
+<polygon fill="#000000" stroke="#000000" points="87.18,-190.56 79.63,-198 90.17,-196.89 87.18,-190.56"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.05,-107.44C283.42,-97.54 238.46,-84.77 198,-82.48"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M577.17,-119.07C522.48,-106.82 431.06,-90.04 351.5,-93.11"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-54.48C138.79,-58.6 122.26,-63.25 106.93,-67.57"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-64.27 97.07,-70.35 107.64,-71.01 105.74,-64.27"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-197.08C431.82,-193.55 417.83,-189.64 404.63,-185.95"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-182.5 394.72,-183.18 403.41,-189.25 405.29,-182.5"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M470.91,-185.37C454.5,-174.32 429.13,-157.88 406,-145.48 399.79,-142.15 393.07,-138.87 386.49,-135.81"/>
-<polygon fill="#000000" stroke="#000000" points="387.56,-132.46 377,-131.52 384.67,-138.83 387.56,-132.46"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.49,-208.51C415.12,-208.49 381.41,-209 351.5,-211.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C284.11,-215.72 267.43,-205.97 202,-210.11"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-277.48C122.95,-240.61 78.69,-146.43 61.83,-103.9"/>
-<polygon fill="#000000" stroke="#000000" points="65.07,-102.57 58.21,-94.49 58.53,-105.08 65.07,-102.57"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.7,-195.44C400.13,-195.13 338.34,-198.38 288,-216.48 242.53,-232.83 241.14,-299.25 198,-277.48"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-211.11C312.87,-213.69 272.65,-224.92 243.47,-234.67"/>
+<polygon fill="#000000" stroke="#000000" points="241.96,-231.48 233.64,-238.04 244.23,-238.11 241.96,-231.48"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M590.21,-48.47C508.19,-23.25 303.08,28.89 142,-21.48 115.62,-29.73 90.2,-48.97 73.52,-63.65"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-61.11 66.07,-70.43 75.83,-66.29 71.12,-61.11"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.44,-183.12C288.99,-193.59 243.24,-207.5 202,-210.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-210.11C172.53,-211.85 142.1,-212.11 116.16,-211.84"/>
+<polygon fill="#000000" stroke="#000000" points="116.13,-208.34 106.08,-211.7 116.03,-215.34 116.13,-208.34"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M467.12,-129.53C440.01,-143.47 391.56,-163.97 348,-159.48"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-159.48C318.02,-156.6 287.15,-152.74 260.87,-149.26"/>
-<polygon fill="#000000" stroke="#000000" points="261.04,-145.75 250.67,-147.89 260.12,-152.69 261.04,-145.75"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M322.02,-183.22C313.5,-187.31 304.2,-192.11 296,-197.11 278.93,-207.53 277.23,-213.96 260,-224.11 254.19,-227.53 247.84,-230.81 241.55,-233.8"/>
+<polygon fill="#000000" stroke="#000000" points="240.07,-230.63 232.44,-237.98 242.99,-236.99 240.07,-230.63"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.5,-118.14C430.24,-118.31 416.87,-118.5 404.14,-118.68"/>
-<polygon fill="#000000" stroke="#000000" points="404.06,-115.18 394.11,-118.82 404.16,-122.18 404.06,-115.18"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.87,-57.44C266.93,-61.37 231.24,-68.85 202,-83.11"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-82.48C169.93,-81.01 141.13,-80.75 116.32,-80.96"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-77.46 106.31,-81.07 116.34,-84.46 116.27,-77.46"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M442.48,-105.6C430.66,-102.9 417.91,-100.3 406,-98.48 314.35,-84.48 290.57,-87.71 198,-82.48"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M473.46,-65.29C449.74,-85.87 401.57,-127.66 373.39,-152.12"/>
+<polygon fill="#000000" stroke="#000000" points="370.93,-149.62 365.67,-158.81 375.52,-154.9 370.93,-149.62"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M327.55,-225.39C301.85,-208.55 255.08,-177.89 225.32,-158.39"/>
-<polygon fill="#000000" stroke="#000000" points="226.96,-155.28 216.68,-152.72 223.12,-161.13 226.96,-155.28"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M461.07,-65.12C434.14,-76.34 390.85,-91.59 351.5,-93.11"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-93.11C283.84,-95.64 261.06,-54.31 202,-83.11"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~symba_util.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.42,-249.59C281.73,-264.91 219.03,-288.09 198,-277.48"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~symba_util.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.79,-307.48C259.67,-301.23 226.04,-291.63 198,-277.48"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-238.11C140.96,-233.93 123.7,-229.2 107.75,-224.84"/>
+<polygon fill="#000000" stroke="#000000" points="108.6,-221.44 98.03,-222.17 106.75,-228.19 108.6,-221.44"/>
 </g>
 </g>
 </svg>
@@ -897,23 +895,23 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-285"></a>      <span class="k">class</span><span class="p">(</span><span class="n">symba_pl</span><span class="p">),</span>            <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! SyMBA massive body object</span>
 <a name="ln-286"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
 <a name="ln-287"></a>      <span class="c">! Internals</span>
-<a name="ln-288"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">counter</span><span class="p">,</span> <span class="n">npl</span><span class="p">,</span> <span class="n">nplm</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">nplplm</span>
-<a name="ln-289"></a>
-<a name="ln-290"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">)</span>
-<a name="ln-291"></a>         <span class="n">npl</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
-<a name="ln-292"></a>         <span class="n">nplm</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(.</span><span class="nb">not</span><span class="p">.</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmtiny</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
-<a name="ln-293"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">nplm</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">nplm</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span>
-<a name="ln-294"></a>
-<a name="ln-295"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">nplpl</span> <span class="o">=</span> <span class="p">(</span><span class="n">npl</span> <span class="o">*</span> <span class="p">(</span><span class="n">npl</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span><span class="p">)</span> <span class="c">! number of entries in a strict lower triangle, npl x npl, minus first column</span>
-<a name="ln-296"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">nplplm</span> <span class="o">=</span> <span class="n">nplm</span> <span class="o">*</span> <span class="n">npl</span> <span class="o">-</span> <span class="n">nplm</span> <span class="o">*</span> <span class="p">(</span><span class="n">nplm</span> <span class="o">+</span> <span class="mi">1</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span> <span class="c">! number of entries in a strict lower triangle, npl x npl, minus first column including only mutually interacting bodies</span>
-<a name="ln-297"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">allocated</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">))</span> <span class="k">deallocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">)</span> <span class="c">! Reset the index array if it&#39;s been set previously</span>
-<a name="ln-298"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplpl</span><span class="p">))</span>
-<a name="ln-299"></a>         <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-300"></a>            <span class="n">counter</span> <span class="o">=</span> <span class="p">(</span><span class="n">i</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">*</span> <span class="n">npl</span> <span class="o">-</span> <span class="n">i</span> <span class="o">*</span> <span class="p">(</span><span class="n">i</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2_I8B</span> <span class="o">+</span> <span class="mi">1_I8B</span>
-<a name="ln-301"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="n">i</span> <span class="o">+</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-302"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">i</span>
-<a name="ln-303"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
-<a name="ln-304"></a>               <span class="n">counter</span> <span class="o">=</span> <span class="n">counter</span> <span class="o">+</span> <span class="mi">1_I8B</span>
+<a name="ln-288"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">nplplm</span>
+<a name="ln-289"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">npl</span><span class="p">,</span> <span class="n">nplm</span><span class="p">,</span> <span class="n">ip</span><span class="p">,</span> <span class="n">jp</span>
+<a name="ln-290"></a>
+<a name="ln-291"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">pl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">)</span>
+<a name="ln-292"></a>         <span class="n">npl</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-293"></a>         <span class="n">nplm</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(.</span><span class="nb">not</span><span class="p">.</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmtiny</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
+<a name="ln-294"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">nplm</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">nplm</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span>
+<a name="ln-295"></a>
+<a name="ln-296"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">nplpl</span> <span class="o">=</span> <span class="p">(</span><span class="n">npl</span> <span class="o">*</span> <span class="p">(</span><span class="n">npl</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span><span class="p">)</span> <span class="c">! number of entries in a strict lower triangle, npl x npl, minus first column</span>
+<a name="ln-297"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">nplplm</span> <span class="o">=</span> <span class="n">nplm</span> <span class="o">*</span> <span class="n">npl</span> <span class="o">-</span> <span class="n">nplm</span> <span class="o">*</span> <span class="p">(</span><span class="n">nplm</span> <span class="o">+</span> <span class="mi">1</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span> <span class="c">! number of entries in a strict lower triangle, npl x npl, minus first column including only mutually interacting bodies</span>
+<a name="ln-298"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">allocated</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">))</span> <span class="k">deallocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">)</span> <span class="c">! Reset the index array if it&#39;s been set previously</span>
+<a name="ln-299"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplpl</span><span class="p">))</span>
+<a name="ln-300"></a>         <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span>
+<a name="ln-301"></a>            <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">j</span> <span class="o">=</span> <span class="n">i</span><span class="o">+</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span>
+<a name="ln-302"></a>               <span class="k">call </span><span class="n">util_index_eucl_ij_to_k</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-303"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">i</span>
+<a name="ln-304"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
 <a name="ln-305"></a>            <span class="k">end do</span>
 <a name="ln-306"></a><span class="k">         end do</span>
 <a name="ln-307"></a><span class="k">      end associate</span>
diff --git a/docs/sourcefile/tides_getacch_pl.f90.html b/docs/sourcefile/tides_getacch_pl.f90.html
index c042a9153..4a3eda4c1 100644
--- a/docs/sourcefile/tides_getacch_pl.f90.html
+++ b/docs/sourcefile/tides_getacch_pl.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~tides_getacch_pl.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefiletides_getacch_plf90EfferentGraph" width="641pt" height="284pt"
- viewBox="0.00 0.00 641.00 284.06" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 412.12)">
+<svg id="sourcefiletides_getacch_plf90EfferentGraph" width="641pt" height="234pt"
+ viewBox="0.00 0.00 641.00 234.31" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 339.24)">
 <title>sourcefile~~tides_getacch_pl.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 935,-412.12 935,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 935,-339.24 935,4 -4,4"/>
 <!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~tides_getacch_pl.f90</title>
-<polygon fill="none" stroke="black" points="931,-133.12 820,-133.12 820,-109.12 931,-109.12 931,-133.12"/>
-<text text-anchor="middle" x="875.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">tides_getacch_pl.f90</text>
+<polygon fill="none" stroke="black" points="931,-235.24 820,-235.24 820,-211.24 931,-211.24 931,-235.24"/>
+<text text-anchor="middle" x="875.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">tides_getacch_pl.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M852.17,-109.09C809.84,-87.43 714.42,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.71,-235.38C798.93,-252.91 708.16,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M859.23,-133.21C838.23,-149.83 800.24,-179.92 775.58,-199.45"/>
-<polygon fill="#000000" stroke="#000000" points="773.13,-196.92 767.46,-205.88 777.47,-202.41 773.13,-196.92"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M837.75,-211.24C823.89,-206.71 808.03,-201.53 793.75,-196.87"/>
+<polygon fill="#000000" stroke="#000000" points="794.75,-193.52 784.16,-193.74 792.58,-200.17 794.75,-193.52"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~tides_getacch_pl.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_getacch_pl.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/tides_spin_step.f90.html b/docs/sourcefile/tides_spin_step.f90.html
index dfc82b9ee..3dd3c5a7a 100644
--- a/docs/sourcefile/tides_spin_step.f90.html
+++ b/docs/sourcefile/tides_spin_step.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~tides_spin_step.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefiletides_spin_stepf90EfferentGraph" width="641pt" height="286pt"
- viewBox="0.00 0.00 641.00 285.89" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 412.12)">
+<svg id="sourcefiletides_spin_stepf90EfferentGraph" width="641pt" height="236pt"
+ viewBox="0.00 0.00 641.00 235.81" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 339.24)">
 <title>sourcefile~~tides_spin_step.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 929,-412.12 929,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 929,-339.24 929,4 -4,4"/>
 <!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~tides_spin_step.f90</title>
-<polygon fill="none" stroke="black" points="925,-133.12 820,-133.12 820,-109.12 925,-109.12 925,-133.12"/>
-<text text-anchor="middle" x="872.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">tides_spin_step.f90</text>
+<polygon fill="none" stroke="black" points="925,-235.24 820,-235.24 820,-211.24 925,-211.24 925,-235.24"/>
+<text text-anchor="middle" x="872.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">tides_spin_step.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M849.46,-109.09C807.67,-87.43 713.47,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M842.09,-235.38C796.88,-252.91 707.24,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.37,-133.4C835.8,-150.09 798.86,-180.08 774.9,-199.53"/>
-<polygon fill="#000000" stroke="#000000" points="772.57,-196.91 767.01,-205.93 776.98,-202.35 772.57,-196.91"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M835.65,-211.24C822.48,-206.83 807.46,-201.8 793.81,-197.23"/>
+<polygon fill="#000000" stroke="#000000" points="794.76,-193.86 784.17,-194.01 792.54,-200.5 794.76,-193.86"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~tides_spin_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~tides_spin_step.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/user_getacch.f90.html b/docs/sourcefile/user_getacch.f90.html
index 8c550bfb7..629c3e67f 100644
--- a/docs/sourcefile/user_getacch.f90.html
+++ b/docs/sourcefile/user_getacch.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~user_getacch.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileuser_getacchf90EfferentGraph" width="641pt" height="289pt"
- viewBox="0.00 0.00 641.00 288.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 412.12)">
+<svg id="sourcefileuser_getacchf90EfferentGraph" width="641pt" height="238pt"
+ viewBox="0.00 0.00 641.00 238.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph" class="graph" transform="scale(0.69 0.69) rotate(0) translate(4 339.24)">
 <title>sourcefile~~user_getacch.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 919,-412.12 919,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 919,-339.24 919,4 -4,4"/>
 <!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~user_getacch.f90</title>
-<polygon fill="none" stroke="black" points="915,-133.12 820,-133.12 820,-109.12 915,-109.12 915,-133.12"/>
-<text text-anchor="middle" x="867.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">user_getacch.f90</text>
+<polygon fill="none" stroke="black" points="915,-235.24 820,-235.24 820,-211.24 915,-211.24 915,-235.24"/>
+<text text-anchor="middle" x="867.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">user_getacch.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.95,-109.09C804.07,-87.43 711.88,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M837.72,-235.38C793.47,-252.91 705.71,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M852,-133.4C832.38,-150.02 797.21,-179.82 774.24,-199.27"/>
-<polygon fill="#000000" stroke="#000000" points="771.75,-196.8 766.38,-205.93 776.28,-202.14 771.75,-196.8"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M832.15,-211.24C820.19,-207.06 806.64,-202.33 794.13,-197.96"/>
+<polygon fill="#000000" stroke="#000000" points="794.96,-194.54 784.37,-194.55 792.65,-201.15 794.96,-194.54"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~user_getacch.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~user_getacch.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_append.f90.html b/docs/sourcefile/util_append.f90.html
index ca53fbc11..211250111 100644
--- a/docs/sourcefile/util_append.f90.html
+++ b/docs/sourcefile/util_append.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_append.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_appendf90EfferentGraph" width="641pt" height="292pt"
- viewBox="0.00 0.00 641.00 291.83" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_append.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_appendf90EfferentGraph" width="641pt" height="241pt"
+ viewBox="0.00 0.00 641.00 240.72" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_append.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_append.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 910,-412.12 910,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 910,-339.24 910,4 -4,4"/>
 <!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_append.f90</title>
-<polygon fill="none" stroke="black" points="906,-133.12 820,-133.12 820,-109.12 906,-109.12 906,-133.12"/>
-<text text-anchor="middle" x="863" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_append.f90</text>
+<polygon fill="none" stroke="black" points="906,-235.24 820,-235.24 820,-211.24 906,-211.24 906,-235.24"/>
+<text text-anchor="middle" x="863" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_append.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_append.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.88,-109.09C800.82,-87.43 710.46,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M833.78,-235.38C790.4,-252.91 704.33,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_append.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M848.07,-133.4C829.22,-150.02 795.43,-179.82 773.37,-199.27"/>
-<polygon fill="#000000" stroke="#000000" points="771,-196.69 765.82,-205.93 775.63,-201.94 771,-196.69"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829,-211.24C817.92,-207.21 805.42,-202.66 793.77,-198.43"/>
+<polygon fill="#000000" stroke="#000000" points="794.82,-195.08 784.22,-194.96 792.43,-201.66 794.82,-195.08"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_append.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_append.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_append.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_append.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_coord.f90.html b/docs/sourcefile/util_coord.f90.html
index 8d4ed3ae4..1730773d2 100644
--- a/docs/sourcefile/util_coord.f90.html
+++ b/docs/sourcefile/util_coord.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_coord.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_coordf90EfferentGraph" width="641pt" height="295pt"
- viewBox="0.00 0.00 641.00 294.73" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_coord.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_coordf90EfferentGraph" width="641pt" height="243pt"
+ viewBox="0.00 0.00 641.00 243.11" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_coord.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 901,-412.12 901,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 901,-339.24 901,4 -4,4"/>
 <!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_coord.f90</title>
-<polygon fill="none" stroke="black" points="897,-133.12 820,-133.12 820,-109.12 897,-109.12 897,-133.12"/>
-<text text-anchor="middle" x="858.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_coord.f90</text>
+<polygon fill="none" stroke="black" points="897,-235.24 820,-235.24 820,-211.24 897,-211.24 897,-235.24"/>
+<text text-anchor="middle" x="858.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_coord.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M836.82,-109.09C797.58,-87.43 709.03,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.85,-235.38C787.33,-252.91 702.95,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.14,-133.4C826.14,-149.95 793.94,-179.55 772.77,-199.02"/>
-<polygon fill="#000000" stroke="#000000" points="770.25,-196.59 765.25,-205.93 774.98,-201.74 770.25,-196.59"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.85,-211.24C815.72,-207.4 804.34,-203.08 793.61,-199.02"/>
+<polygon fill="#000000" stroke="#000000" points="794.59,-195.64 784,-195.37 792.11,-202.19 794.59,-195.64"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_coord.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_coord.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_coord.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_copy.f90.html b/docs/sourcefile/util_copy.f90.html
index 01e62e055..2fa420f3e 100644
--- a/docs/sourcefile/util_copy.f90.html
+++ b/docs/sourcefile/util_copy.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_copy.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_copyf90EfferentGraph" width="641pt" height="297pt"
- viewBox="0.00 0.00 641.00 296.70" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_copy.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_copyf90EfferentGraph" width="641pt" height="245pt"
+ viewBox="0.00 0.00 641.00 244.73" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_copy.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 895,-412.12 895,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 895,-339.24 895,4 -4,4"/>
 <!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_copy.f90</title>
-<polygon fill="none" stroke="black" points="891,-133.12 820,-133.12 820,-109.12 891,-109.12 891,-133.12"/>
-<text text-anchor="middle" x="855.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_copy.f90</text>
+<polygon fill="none" stroke="black" points="891,-235.24 820,-235.24 820,-211.24 891,-211.24 891,-235.24"/>
+<text text-anchor="middle" x="855.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_copy.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.11,-109.09C795.42,-87.43 708.09,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M827.22,-235.38C785.28,-252.91 702.04,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.52,-133.4C824.04,-149.95 792.75,-179.55 772.18,-199.02"/>
-<polygon fill="#000000" stroke="#000000" points="769.73,-196.52 764.88,-205.93 774.55,-201.6 769.73,-196.52"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M823.75,-211.24C813.9,-207.4 802.85,-203.08 792.43,-199.02"/>
+<polygon fill="#000000" stroke="#000000" points="793.67,-195.74 783.09,-195.37 791.13,-202.26 793.67,-195.74"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_copy.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_copy.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_copy.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_exit.f90.html b/docs/sourcefile/util_exit.f90.html
index 367afe841..aa9760e0a 100644
--- a/docs/sourcefile/util_exit.f90.html
+++ b/docs/sourcefile/util_exit.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_exit.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_exitf90EfferentGraph" width="641pt" height="298pt"
- viewBox="0.00 0.00 641.00 298.02" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_exit.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_exitf90EfferentGraph" width="641pt" height="246pt"
+ viewBox="0.00 0.00 641.00 245.83" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_exit.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 891,-412.12 891,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 891,-339.24 891,4 -4,4"/>
 <!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_exit.f90</title>
-<polygon fill="none" stroke="black" points="887,-133.12 820,-133.12 820,-109.12 887,-109.12 887,-133.12"/>
-<text text-anchor="middle" x="853.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_exit.f90</text>
+<polygon fill="none" stroke="black" points="887,-235.24 820,-235.24 820,-211.24 887,-211.24 887,-235.24"/>
+<text text-anchor="middle" x="853.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_exit.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M832.3,-109.09C793.98,-87.43 707.45,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.47,-235.38C783.92,-252.91 701.43,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M839.77,-133.4C822.71,-149.87 792.22,-179.29 772.06,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="769.39,-196.47 764.63,-205.93 774.25,-201.51 769.39,-196.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M822.35,-211.24C812.79,-207.43 802.08,-203.17 791.95,-199.14"/>
+<polygon fill="#000000" stroke="#000000" points="793.06,-195.81 782.48,-195.37 790.48,-202.32 793.06,-195.81"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_exit.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_exit.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_exit.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_fill.f90.html b/docs/sourcefile/util_fill.f90.html
index a96c46cab..71d1a1142 100644
--- a/docs/sourcefile/util_fill.f90.html
+++ b/docs/sourcefile/util_fill.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_fill.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_fillf90EfferentGraph" width="641pt" height="300pt"
- viewBox="0.00 0.00 641.00 300.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_fill.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_fillf90EfferentGraph" width="641pt" height="248pt"
+ viewBox="0.00 0.00 641.00 247.76" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_fill.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 884,-412.12 884,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 884,-339.24 884,4 -4,4"/>
 <!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_fill.f90</title>
-<polygon fill="none" stroke="black" points="880,-133.12 820,-133.12 820,-109.12 880,-109.12 880,-133.12"/>
-<text text-anchor="middle" x="850" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_fill.f90</text>
+<polygon fill="none" stroke="black" points="880,-235.24 820,-235.24 820,-211.24 880,-211.24 880,-235.24"/>
+<text text-anchor="middle" x="850" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_fill.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.14,-109.09C791.46,-87.43 706.35,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M822.42,-235.38C781.53,-252.91 700.36,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M836.71,-133.4C820.24,-149.87 790.82,-179.29 771.36,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="768.78,-196.39 764.19,-205.93 773.73,-201.34 768.78,-196.39"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.9,-211.24C810.77,-207.47 800.55,-203.26 790.87,-199.26"/>
+<polygon fill="#000000" stroke="#000000" points="792,-195.95 781.42,-195.37 789.33,-202.42 792,-195.95"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_fill.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_fill.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_fill.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_get_energy_momentum.f90.html b/docs/sourcefile/util_get_energy_momentum.f90.html
index 34518460f..d539265b7 100644
--- a/docs/sourcefile/util_get_energy_momentum.f90.html
+++ b/docs/sourcefile/util_get_energy_momentum.f90.html
@@ -134,7 +134,7 @@ <h1>util_get_energy_momentum.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.6% of total for source files.">100 statements</a>
+    title=" 0.7% of total for source files.">111 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_get_energy_momentum.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_get_energy_momentumf90EfferentGraph" width="641pt" height="269pt"
- viewBox="0.00 0.00 641.00 268.88" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph" class="graph" transform="scale(0.65 0.65) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_get_energy_momentumf90EfferentGraph" width="641pt" height="222pt"
+ viewBox="0.00 0.00 641.00 221.79" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph" class="graph" transform="scale(0.65 0.65) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_get_energy_momentum.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 988,-412.12 988,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 988,-339.24 988,4 -4,4"/>
 <!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_get_energy_momentum.f90</title>
-<polygon fill="none" stroke="black" points="984,-133.12 820,-133.12 820,-109.12 984,-109.12 984,-133.12"/>
-<text text-anchor="middle" x="902" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_get_energy_momentum.f90</text>
+<polygon fill="none" stroke="black" points="984,-235.24 820,-235.24 820,-211.24 984,-211.24 984,-235.24"/>
+<text text-anchor="middle" x="902" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_get_energy_momentum.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M876.12,-109.09C828.98,-87.43 722.89,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M867.89,-235.38C817.04,-252.91 716.32,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M882.43,-133.21C856.55,-150.05 809.47,-180.71 779.51,-200.21"/>
-<polygon fill="#000000" stroke="#000000" points="777.27,-197.49 770.8,-205.88 781.09,-203.35 777.27,-197.49"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M856.3,-211.24C836.59,-205.95 813.55,-199.76 794.14,-194.55"/>
+<polygon fill="#000000" stroke="#000000" points="794.93,-191.14 784.36,-191.93 793.11,-197.9 794.93,-191.14"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_get_energy_momentum.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -630,129 +622,149 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-16"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
 <a name="ln-17"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span><span class="p">,</span> <span class="n">nplpl</span>
 <a name="ln-18"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">oblpot</span><span class="p">,</span> <span class="n">kecb</span><span class="p">,</span> <span class="n">kespincb</span>
-<a name="ln-19"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span> <span class="kd">::</span> <span class="n">irh</span><span class="p">,</span> <span class="n">kepl</span><span class="p">,</span> <span class="n">kespinpl</span><span class="p">,</span> <span class="n">pecb</span>
+<a name="ln-19"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span> <span class="kd">::</span> <span class="n">irh</span><span class="p">,</span> <span class="n">kepl</span><span class="p">,</span> <span class="n">kespinpl</span>
 <a name="ln-20"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span> <span class="kd">::</span> <span class="n">Lplorbitx</span><span class="p">,</span> <span class="n">Lplorbity</span><span class="p">,</span> <span class="n">Lplorbitz</span>
 <a name="ln-21"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span> <span class="kd">::</span> <span class="n">Lplspinx</span><span class="p">,</span> <span class="n">Lplspiny</span><span class="p">,</span> <span class="n">Lplspinz</span>
 <a name="ln-22"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">NDIM</span><span class="p">)</span> <span class="kd">::</span> <span class="n">Lcborbit</span><span class="p">,</span> <span class="n">Lcbspin</span>
-<a name="ln-23"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">pepl</span> 
-<a name="ln-24"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">allocatable</span> <span class="kd">::</span> <span class="n">lstatpl</span>
-<a name="ln-25"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">hx</span><span class="p">,</span> <span class="n">hy</span><span class="p">,</span> <span class="n">hz</span>
-<a name="ln-26"></a>
-<a name="ln-27"></a>      <span class="k">associate</span><span class="p">(</span><span class="nb">system</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">pl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">,</span> <span class="n">npl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">cb</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">cb</span><span class="p">)</span>
-<a name="ln-28"></a>         <span class="n">nplpl</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplpl</span>
-<a name="ln-29"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-30"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-31"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Ltot</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-32"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-33"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">ke_spin</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-34"></a>
-<a name="ln-35"></a>         <span class="n">kepl</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-36"></a>         <span class="n">Lplorbitx</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-37"></a>         <span class="n">Lplorbity</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-38"></a>         <span class="n">Lplorbitz</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-39"></a>         <span class="n">Lplspinx</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-40"></a>         <span class="n">Lplspiny</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-41"></a>         <span class="n">Lplspinz</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-23"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">hx</span><span class="p">,</span> <span class="n">hy</span><span class="p">,</span> <span class="n">hz</span>
+<a name="ln-24"></a>
+<a name="ln-25"></a>      <span class="k">associate</span><span class="p">(</span><span class="nb">system</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">pl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">,</span> <span class="n">npl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="n">cb</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">cb</span><span class="p">)</span>
+<a name="ln-26"></a>         <span class="n">nplpl</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">nplpl</span>
+<a name="ln-27"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-28"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-29"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Ltot</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-30"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-31"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">ke_spin</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-32"></a>
+<a name="ln-33"></a>         <span class="n">kepl</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-34"></a>         <span class="n">Lplorbitx</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-35"></a>         <span class="n">Lplorbity</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-36"></a>         <span class="n">Lplorbitz</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-37"></a>         <span class="n">Lplspinx</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-38"></a>         <span class="n">Lplspiny</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-39"></a>         <span class="n">Lplspinz</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-40"></a>
+<a name="ln-41"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">/=</span> <span class="n">INACTIVE</span>
 <a name="ln-42"></a>
-<a name="ln-43"></a>         <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">status</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">/=</span> <span class="n">INACTIVE</span>
-<a name="ln-44"></a>
-<a name="ln-45"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">GMtot</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-46"></a>         <span class="n">kecb</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">cb</span><span class="p">%</span><span class="n">vb</span><span class="p">(:),</span> <span class="n">cb</span><span class="p">%</span><span class="n">vb</span><span class="p">(:))</span>
-<a name="ln-47"></a>         <span class="n">Lcborbit</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="p">(</span><span class="n">cb</span><span class="p">%</span><span class="n">xb</span><span class="p">(:)</span> <span class="p">.</span><span class="n">cross</span><span class="p">.</span> <span class="n">cb</span><span class="p">%</span><span class="n">vb</span><span class="p">(:))</span>
-<a name="ln-48"></a>
-<a name="ln-49"></a>         <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-50"></a>            <span class="n">hx</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-51"></a>            <span class="n">hy</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-52"></a>            <span class="n">hz</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-53"></a>
-<a name="ln-54"></a>            <span class="c">! Angular momentum from orbit </span>
-<a name="ln-55"></a>            <span class="n">Lplorbitx</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">hx</span>
-<a name="ln-56"></a>            <span class="n">Lplorbity</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">hy</span>
-<a name="ln-57"></a>            <span class="n">Lplorbitz</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">hz</span>
-<a name="ln-58"></a>
-<a name="ln-59"></a>            <span class="c">! Kinetic energy from orbit</span>
-<a name="ln-60"></a>            <span class="n">kepl</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">))</span> 
-<a name="ln-61"></a>         <span class="k">end do</span>
-<a name="ln-62"></a>
-<a name="ln-63"></a><span class="k">         if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-64"></a><span class="k">            </span><span class="n">kespincb</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">radius</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">cb</span><span class="p">%</span><span class="n">rot</span><span class="p">(:),</span> <span class="n">cb</span><span class="p">%</span><span class="n">rot</span><span class="p">(:))</span>
-<a name="ln-65"></a>
-<a name="ln-66"></a>            <span class="c">! For simplicity, we always assume that the rotation pole is the 3rd principal axis</span>
-<a name="ln-67"></a>            <span class="n">Lcbspin</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">radius</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">rot</span><span class="p">(:)</span>
-<a name="ln-68"></a>
-<a name="ln-69"></a>            <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-70"></a>               <span class="c">! Currently we assume that the rotation pole is the 3rd principal axis</span>
-<a name="ln-71"></a>               <span class="c">! Angular momentum from spin</span>
-<a name="ln-72"></a>               <span class="n">Lplspinx</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
-<a name="ln-73"></a>               <span class="n">Lplspiny</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>  
-<a name="ln-74"></a>               <span class="n">Lplspinz</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>  
-<a name="ln-75"></a>
-<a name="ln-76"></a>               <span class="c">! Kinetic energy from spin</span>
-<a name="ln-77"></a>               <span class="n">kespinpl</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(:,</span><span class="n">i</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(:,</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-78"></a>            <span class="k">end do</span>
-<a name="ln-79"></a><span class="k">         else</span>
-<a name="ln-80"></a><span class="k">            </span><span class="n">kespincb</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-81"></a>            <span class="n">kespinpl</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-82"></a>         <span class="k">end if</span>
-<a name="ln-83"></a>   
-<a name="ln-84"></a>         <span class="c">! Do the central body potential energy component first</span>
-<a name="ln-85"></a>         <span class="k">where</span><span class="p">(.</span><span class="nb">not</span><span class="p">.</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
-<a name="ln-86"></a>            <span class="n">pecb</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-87"></a>         <span class="k">end where</span>
-<a name="ln-88"></a>
-<a name="ln-89"></a><span class="k">         do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-90"></a>            <span class="n">pecb</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="o">-</span><span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">/</span> <span class="nb">norm2</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(:,</span><span class="n">i</span><span class="p">))</span> 
-<a name="ln-91"></a>         <span class="k">end do</span>
+<a name="ln-43"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">GMtot</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-44"></a>         <span class="n">kecb</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">cb</span><span class="p">%</span><span class="n">vb</span><span class="p">(:),</span> <span class="n">cb</span><span class="p">%</span><span class="n">vb</span><span class="p">(:))</span>
+<a name="ln-45"></a>         <span class="n">Lcborbit</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="p">(</span><span class="n">cb</span><span class="p">%</span><span class="n">xb</span><span class="p">(:)</span> <span class="p">.</span><span class="n">cross</span><span class="p">.</span> <span class="n">cb</span><span class="p">%</span><span class="n">vb</span><span class="p">(:))</span>
+<a name="ln-46"></a>
+<a name="ln-47"></a>         <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-48"></a>            <span class="n">hx</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-49"></a>            <span class="n">hy</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-50"></a>            <span class="n">hz</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-51"></a>
+<a name="ln-52"></a>            <span class="c">! Angular momentum from orbit </span>
+<a name="ln-53"></a>            <span class="n">Lplorbitx</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">hx</span>
+<a name="ln-54"></a>            <span class="n">Lplorbity</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">hy</span>
+<a name="ln-55"></a>            <span class="n">Lplorbitz</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">hz</span>
+<a name="ln-56"></a>
+<a name="ln-57"></a>            <span class="c">! Kinetic energy from orbit</span>
+<a name="ln-58"></a>            <span class="n">kepl</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">vb</span><span class="p">(:,</span><span class="n">i</span><span class="p">))</span> 
+<a name="ln-59"></a>         <span class="k">end do</span>
+<a name="ln-60"></a>
+<a name="ln-61"></a><span class="k">         if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-62"></a><span class="k">            </span><span class="n">kespincb</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">radius</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">cb</span><span class="p">%</span><span class="n">rot</span><span class="p">(:),</span> <span class="n">cb</span><span class="p">%</span><span class="n">rot</span><span class="p">(:))</span>
+<a name="ln-63"></a>
+<a name="ln-64"></a>            <span class="c">! For simplicity, we always assume that the rotation pole is the 3rd principal axis</span>
+<a name="ln-65"></a>            <span class="n">Lcbspin</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">cb</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">mass</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">radius</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">cb</span><span class="p">%</span><span class="n">rot</span><span class="p">(:)</span>
+<a name="ln-66"></a>
+<a name="ln-67"></a>            <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-68"></a>               <span class="c">! Currently we assume that the rotation pole is the 3rd principal axis</span>
+<a name="ln-69"></a>               <span class="c">! Angular momentum from spin</span>
+<a name="ln-70"></a>               <span class="n">Lplspinx</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-71"></a>               <span class="n">Lplspiny</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>  
+<a name="ln-72"></a>               <span class="n">Lplspinz</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span>  
+<a name="ln-73"></a>
+<a name="ln-74"></a>               <span class="c">! Kinetic energy from spin</span>
+<a name="ln-75"></a>               <span class="n">kespinpl</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">Ip</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">radius</span><span class="p">(</span><span class="n">i</span><span class="p">)</span><span class="o">**</span><span class="mi">2</span> <span class="o">*</span> <span class="nb">dot_product</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(:,</span><span class="n">i</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">rot</span><span class="p">(:,</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-76"></a>            <span class="k">end do</span>
+<a name="ln-77"></a><span class="k">         else</span>
+<a name="ln-78"></a><span class="k">            </span><span class="n">kespincb</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-79"></a>            <span class="n">kespinpl</span><span class="p">(:)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-80"></a>         <span class="k">end if</span>
+<a name="ln-81"></a><span class="k">   </span>
+<a name="ln-82"></a><span class="k">         call </span><span class="n">util_get_energy_potential</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">,</span> <span class="n">cb</span><span class="p">%</span><span class="n">Gmass</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">,</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">,</span> <span class="nb">system</span><span class="p">%</span><span class="n">pe</span><span class="p">)</span>
+<a name="ln-83"></a>
+<a name="ln-84"></a>         <span class="c">! Potential energy from the oblateness term</span>
+<a name="ln-85"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">loblatecb</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-86"></a><span class="k">            call </span><span class="nb">system</span><span class="p">%</span><span class="n">obl_pot</span><span class="p">()</span>
+<a name="ln-87"></a>            <span class="nb">system</span><span class="p">%</span><span class="n">pe</span> <span class="o">=</span> <span class="nb">system</span><span class="p">%</span><span class="n">pe</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">oblpot</span>
+<a name="ln-88"></a>         <span class="k">end if</span>
+<a name="ln-89"></a>
+<a name="ln-90"></a><span class="k">         </span><span class="nb">system</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="n">kecb</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">kepl</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)))</span>
+<a name="ln-91"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="nb">system</span><span class="p">%</span><span class="n">ke_spin</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="n">kespincb</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">kespinpl</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)))</span>
 <a name="ln-92"></a>   
-<a name="ln-93"></a>         <span class="c">! Do the potential energy between pairs of massive bodies</span>
-<a name="ln-94"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">lstatpl</span><span class="p">(</span><span class="n">nplpl</span><span class="p">))</span>
-<a name="ln-95"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">pepl</span><span class="p">(</span><span class="n">nplpl</span><span class="p">))</span>
-<a name="ln-96"></a>         <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">nplpl</span><span class="p">)</span>
-<a name="ln-97"></a>            <span class="n">i</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-98"></a>            <span class="n">j</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-99"></a>            <span class="n">lstatpl</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">j</span><span class="p">))</span>
-<a name="ln-100"></a>         <span class="k">end do</span>
-<a name="ln-101"></a>
-<a name="ln-102"></a><span class="k">         where</span><span class="p">(.</span><span class="nb">not</span><span class="p">.</span><span class="n">lstatpl</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nplpl</span><span class="p">))</span> 
-<a name="ln-103"></a>            <span class="n">pepl</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">nplpl</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
-<a name="ln-104"></a>         <span class="k">end where</span>
-<a name="ln-105"></a>
-<a name="ln-106"></a><span class="k">         do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">nplpl</span><span class="p">,</span> <span class="n">lstatpl</span><span class="p">(</span><span class="n">k</span><span class="p">))</span>
-<a name="ln-107"></a>            <span class="n">i</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-108"></a>            <span class="n">j</span> <span class="o">=</span> <span class="n">pl</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-109"></a>            <span class="n">pepl</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">pl</span><span class="p">%</span><span class="n">mass</span><span class="p">(</span><span class="n">j</span><span class="p">))</span> <span class="o">/</span> <span class="nb">norm2</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">pl</span><span class="p">%</span><span class="n">xb</span><span class="p">(:,</span> <span class="n">j</span><span class="p">))</span>
-<a name="ln-110"></a>         <span class="k">end do</span>
-<a name="ln-111"></a><span class="k">   </span>
-<a name="ln-112"></a><span class="k">         </span><span class="nb">system</span><span class="p">%</span><span class="n">pe</span> <span class="o">=</span> <span class="nb">sum</span><span class="p">(</span><span class="n">pepl</span><span class="p">(:),</span> <span class="n">lstatpl</span><span class="p">(:))</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">pecb</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
-<a name="ln-113"></a>         <span class="k">deallocate</span><span class="p">(</span><span class="n">lstatpl</span><span class="p">,</span> <span class="n">pepl</span><span class="p">)</span>
-<a name="ln-114"></a>
-<a name="ln-115"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="n">kecb</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">kepl</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)))</span>
-<a name="ln-116"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="nb">system</span><span class="p">%</span><span class="n">ke_spin</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="n">kespincb</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">kespinpl</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)))</span>
-<a name="ln-117"></a>   
-<a name="ln-118"></a>         <span class="c">! Potential energy from the oblateness term</span>
-<a name="ln-119"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">loblatecb</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-120"></a><span class="k">            call </span><span class="nb">system</span><span class="p">%</span><span class="n">obl_pot</span><span class="p">()</span>
-<a name="ln-121"></a>            <span class="nb">system</span><span class="p">%</span><span class="n">pe</span> <span class="o">=</span> <span class="nb">system</span><span class="p">%</span><span class="n">pe</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">oblpot</span>
-<a name="ln-122"></a>         <span class="k">end if</span>
-<a name="ln-123"></a><span class="k">   </span>
-<a name="ln-124"></a><span class="k">         </span><span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcborbit</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplorbitx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-125"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcborbit</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplorbity</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-126"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcborbit</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplorbitz</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-127"></a>  
-<a name="ln-128"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-129"></a><span class="k">            </span><span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcbspin</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplspinx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-130"></a>            <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcbspin</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplspiny</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-131"></a>            <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcbspin</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplspinz</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
-<a name="ln-132"></a>         <span class="k">end if</span>
-<a name="ln-133"></a>
-<a name="ln-134"></a><span class="k">         </span><span class="nb">system</span><span class="p">%</span><span class="n">te</span> <span class="o">=</span> <span class="nb">system</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">ke_spin</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">pe</span>
-<a name="ln-135"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Ltot</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(:)</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(:)</span>
-<a name="ln-136"></a>      <span class="k">end associate</span>
+<a name="ln-93"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcborbit</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplorbitx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-94"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcborbit</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplorbity</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-95"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcborbit</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplorbitz</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-96"></a>  
+<a name="ln-97"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">param</span><span class="p">%</span><span class="n">lrotation</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-98"></a><span class="k">            </span><span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcbspin</span><span class="p">(</span><span class="mi">1</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplspinx</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-99"></a>            <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcbspin</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplspiny</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-100"></a>            <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">=</span> <span class="n">Lcbspin</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">Lplspinz</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">pl</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span> 
+<a name="ln-101"></a>         <span class="k">end if</span>
+<a name="ln-102"></a>
+<a name="ln-103"></a><span class="k">         </span><span class="nb">system</span><span class="p">%</span><span class="n">te</span> <span class="o">=</span> <span class="nb">system</span><span class="p">%</span><span class="n">ke_orbit</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">ke_spin</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">pe</span>
+<a name="ln-104"></a>         <span class="nb">system</span><span class="p">%</span><span class="n">Ltot</span><span class="p">(:)</span> <span class="o">=</span> <span class="nb">system</span><span class="p">%</span><span class="n">Lorbit</span><span class="p">(:)</span> <span class="o">+</span> <span class="nb">system</span><span class="p">%</span><span class="n">Lspin</span><span class="p">(:)</span>
+<a name="ln-105"></a>      <span class="k">end associate</span>
+<a name="ln-106"></a>
+<a name="ln-107"></a><span class="k">      return</span>
+<a name="ln-108"></a><span class="k">   end subroutine </span><span class="n">util_get_energy_momentum_system</span>
+<a name="ln-109"></a>
+<a name="ln-110"></a>
+<a name="ln-111"></a>   <span class="k">subroutine </span><span class="n">util_get_energy_potential</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">,</span> <span class="n">k_plpl</span><span class="p">,</span> <span class="n">lmask</span><span class="p">,</span> <span class="n">GMcb</span><span class="p">,</span> <span class="n">Gmass</span><span class="p">,</span> <span class="n">mass</span><span class="p">,</span> <span class="n">xb</span><span class="p">,</span> <span class="n">pe</span><span class="p">)</span>
+<a name="ln-112"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-113"></a>      <span class="c">!!</span>
+<a name="ln-114"></a>      <span class="c">!! Compute total system potential energy</span>
+<a name="ln-115"></a>      <span class="k">implicit none</span>
+<a name="ln-116"></a>      <span class="c">! Arguments</span>
+<a name="ln-117"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">npl</span>
+<a name="ln-118"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span>                 <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">nplpl</span>
+<a name="ln-119"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">k_plpl</span>
+<a name="ln-120"></a>      <span class="kt">logical</span><span class="p">,</span>      <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">lmask</span>
+<a name="ln-121"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">GMcb</span>
+<a name="ln-122"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">Gmass</span>
+<a name="ln-123"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:),</span>   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">mass</span>
+<a name="ln-124"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>     <span class="k">dimension</span><span class="p">(:,:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">xb</span>
+<a name="ln-125"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                     <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">pe</span>
+<a name="ln-126"></a>      <span class="c">! Internals</span>
+<a name="ln-127"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
+<a name="ln-128"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span>
+<a name="ln-129"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">npl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">pecb</span>
+<a name="ln-130"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">nplpl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">pepl</span> 
+<a name="ln-131"></a>      <span class="kt">logical</span><span class="p">,</span> <span class="k">dimension</span><span class="p">(</span><span class="n">nplpl</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lstatpl</span>
+<a name="ln-132"></a>
+<a name="ln-133"></a>      <span class="c">! Do the central body potential energy component first</span>
+<a name="ln-134"></a>      <span class="k">where</span><span class="p">(.</span><span class="nb">not</span><span class="p">.</span> <span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
+<a name="ln-135"></a>         <span class="n">pecb</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-136"></a>      <span class="k">end where</span>
 <a name="ln-137"></a>
-<a name="ln-138"></a><span class="k">      return</span>
-<a name="ln-139"></a><span class="k">   end subroutine </span><span class="n">util_get_energy_momentum_system</span>
-<a name="ln-140"></a>
-<a name="ln-141"></a><span class="k">end submodule </span><span class="n">s_util_get_energy_momentum</span>
+<a name="ln-138"></a><span class="k">      do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-139"></a>         <span class="n">pecb</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="o">-</span><span class="n">GMcb</span> <span class="o">*</span> <span class="n">mass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">/</span> <span class="nb">norm2</span><span class="p">(</span><span class="n">xb</span><span class="p">(:,</span><span class="n">i</span><span class="p">))</span> 
+<a name="ln-140"></a>      <span class="k">end do</span>
+<a name="ln-141"></a>
+<a name="ln-142"></a>      <span class="c">!$omp parallel do default(private) schedule(static)&amp;</span>
+<a name="ln-143"></a>      <span class="c">!$omp shared(nplpl, k_plpl, xb, mass, Gmass, pepl, lstatpl, lmask)</span>
+<a name="ln-144"></a>      <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">nplpl</span>
+<a name="ln-145"></a>         <span class="n">i</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-146"></a>         <span class="n">j</span> <span class="o">=</span> <span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-147"></a>         <span class="n">lstatpl</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="n">lmask</span><span class="p">(</span><span class="n">j</span><span class="p">))</span>
+<a name="ln-148"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lstatpl</span><span class="p">(</span><span class="n">k</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-149"></a><span class="k">            </span><span class="n">pepl</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="o">-</span><span class="p">(</span><span class="n">Gmass</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">*</span> <span class="n">mass</span><span class="p">(</span><span class="n">j</span><span class="p">))</span> <span class="o">/</span> <span class="nb">norm2</span><span class="p">(</span><span class="n">xb</span><span class="p">(:,</span> <span class="n">i</span><span class="p">)</span> <span class="o">-</span> <span class="n">xb</span><span class="p">(:,</span> <span class="n">j</span><span class="p">))</span>
+<a name="ln-150"></a>         <span class="k">else</span>
+<a name="ln-151"></a><span class="k">            </span><span class="n">pepl</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="mf">0.0_DP</span>
+<a name="ln-152"></a>         <span class="k">end if</span>
+<a name="ln-153"></a><span class="k">      end do</span>
+<a name="ln-154"></a>      <span class="c">!$omp end parallel do </span>
+<a name="ln-155"></a>
+<a name="ln-156"></a>      <span class="n">pe</span> <span class="o">=</span> <span class="nb">sum</span><span class="p">(</span><span class="n">pepl</span><span class="p">(:),</span> <span class="n">lstatpl</span><span class="p">(:))</span> <span class="o">+</span> <span class="nb">sum</span><span class="p">(</span><span class="n">pecb</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">),</span> <span class="n">lmask</span><span class="p">(</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">))</span>
+<a name="ln-157"></a>
+<a name="ln-158"></a>      <span class="k">return</span>
+<a name="ln-159"></a><span class="k">   end subroutine </span><span class="n">util_get_energy_potential</span>
+<a name="ln-160"></a>
+<a name="ln-161"></a><span class="k">end submodule </span><span class="n">s_util_get_energy_momentum</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/util_index.f90.html b/docs/sourcefile/util_index.f90.html
index 1849a6303..c58e6f9ce 100644
--- a/docs/sourcefile/util_index.f90.html
+++ b/docs/sourcefile/util_index.f90.html
@@ -134,7 +134,7 @@ <h1>util_index.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 0.3% of total for source files.">48 statements</a>
+    title=" 0.5% of total for source files.">75 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_index.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_indexf90EfferentGraph" width="641pt" height="295pt"
- viewBox="0.00 0.00 641.00 295.06" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_index.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_indexf90EfferentGraph" width="641pt" height="243pt"
+ viewBox="0.00 0.00 641.00 243.38" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_index.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_index.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 900,-412.12 900,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 900,-339.24 900,4 -4,4"/>
 <!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_index.f90</title>
-<polygon fill="none" stroke="black" points="896,-133.12 820,-133.12 820,-109.12 896,-109.12 896,-133.12"/>
-<text text-anchor="middle" x="858" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_index.f90</text>
+<polygon fill="none" stroke="black" points="896,-235.24 820,-235.24 820,-211.24 896,-211.24 896,-235.24"/>
+<text text-anchor="middle" x="858" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_index.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_index.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M836.37,-109.09C797.22,-87.43 708.87,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M829.41,-235.38C786.99,-252.91 702.8,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_index.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M843.7,-133.4C825.79,-149.95 793.74,-179.55 772.67,-199.02"/>
-<polygon fill="#000000" stroke="#000000" points="770.16,-196.58 765.19,-205.93 774.91,-201.72 770.16,-196.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.5,-211.24C815.41,-207.4 804.09,-203.08 793.42,-199.02"/>
+<polygon fill="#000000" stroke="#000000" points="794.44,-195.66 783.84,-195.37 791.94,-202.2 794.44,-195.66"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_index.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_index.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_index.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_index.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -616,78 +608,136 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-2"></a>   <span class="k">use </span><span class="n">swiftest</span>
 <a name="ln-3"></a><span class="k">contains</span>
 <a name="ln-4"></a>
-<a name="ln-5"></a><span class="k">   module subroutine </span><span class="n">util_index_eucl_plpl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-6"></a>      <span class="c">!! author: Jacob R. Elliott and David A. Minton</span>
-<a name="ln-7"></a>      <span class="c">!!</span>
-<a name="ln-8"></a>      <span class="c">!! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions.</span>
-<a name="ln-9"></a>      <span class="c">!!</span>
-<a name="ln-10"></a>      <span class="c">!! Reference:</span>
-<a name="ln-11"></a>      <span class="c">!!</span>
-<a name="ln-12"></a>      <span class="c">!!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
-<a name="ln-13"></a>      <span class="c">!!       2019. hal-0204751</span>
-<a name="ln-14"></a>      <span class="k">implicit none</span>
-<a name="ln-15"></a>      <span class="c">! Arguments</span>
-<a name="ln-16"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest massive body object</span>
-<a name="ln-17"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-18"></a>      <span class="c">! Internals</span>
-<a name="ln-19"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">counter</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-20"></a>
-<a name="ln-21"></a>      <span class="n">npl</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
-<a name="ln-22"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">nplpl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nplpl</span><span class="p">)</span>
-<a name="ln-23"></a>         <span class="n">nplpl</span> <span class="o">=</span> <span class="p">(</span><span class="n">npl</span> <span class="o">*</span> <span class="p">(</span><span class="n">npl</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span><span class="p">)</span> <span class="c">! number of entries in a strict lower triangle, npl x npl, minus first column</span>
-<a name="ln-24"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">allocated</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">))</span> <span class="k">deallocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">)</span> <span class="c">! Reset the index array if it&#39;s been set previously</span>
-<a name="ln-25"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">))</span>
-<a name="ln-26"></a>         <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-27"></a>            <span class="n">counter</span> <span class="o">=</span> <span class="p">(</span><span class="n">i</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">*</span> <span class="n">npl</span> <span class="o">-</span> <span class="n">i</span> <span class="o">*</span> <span class="p">(</span><span class="n">i</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2_I8B</span> <span class="o">+</span> <span class="mi">1_I8B</span>
-<a name="ln-28"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="n">i</span> <span class="o">+</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-29"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">i</span>
-<a name="ln-30"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
-<a name="ln-31"></a>               <span class="n">counter</span> <span class="o">=</span> <span class="n">counter</span> <span class="o">+</span> <span class="mi">1_I8B</span>
-<a name="ln-32"></a>            <span class="k">end do</span>
-<a name="ln-33"></a><span class="k">         end do</span>
-<a name="ln-34"></a><span class="k">      end associate</span>
-<a name="ln-35"></a>
-<a name="ln-36"></a><span class="k">      return</span>
-<a name="ln-37"></a><span class="k">   end subroutine </span><span class="n">util_index_eucl_plpl</span>
-<a name="ln-38"></a>
-<a name="ln-39"></a>
-<a name="ln-40"></a>   <span class="k">module subroutine </span><span class="n">util_index_eucl_pltp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">pl</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
-<a name="ln-41"></a>      <span class="c">!! author: Jacob R. Elliott and David A. Minton</span>
-<a name="ln-42"></a>      <span class="c">!!</span>
-<a name="ln-43"></a>      <span class="c">!! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions</span>
-<a name="ln-44"></a>      <span class="c">!!</span>
-<a name="ln-45"></a>      <span class="c">!! Reference:</span>
-<a name="ln-46"></a>      <span class="c">!!</span>
-<a name="ln-47"></a>      <span class="c">!!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
-<a name="ln-48"></a>      <span class="c">!!       2019. hal-0204751</span>
-<a name="ln-49"></a>      <span class="k">implicit none</span>
-<a name="ln-50"></a>      <span class="c">! Arguments</span>
-<a name="ln-51"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest test particle object</span>
-<a name="ln-52"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">pl</span>    <span class="c">!! Swiftest massive body object</span>
-<a name="ln-53"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
-<a name="ln-54"></a>      <span class="c">! Internals</span>
-<a name="ln-55"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">counter</span><span class="p">,</span> <span class="n">npl</span><span class="p">,</span> <span class="n">ntp</span>
-<a name="ln-56"></a>
-<a name="ln-57"></a>      <span class="n">ntp</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
-<a name="ln-58"></a>      <span class="n">npl</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
-<a name="ln-59"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">npltp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">npltp</span><span class="p">)</span>
-<a name="ln-60"></a>         <span class="n">npltp</span> <span class="o">=</span> <span class="n">npl</span> <span class="o">*</span> <span class="n">ntp</span>
-<a name="ln-61"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">allocated</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">))</span> <span class="k">deallocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">)</span> <span class="c">! Reset the index array if it&#39;s been set previously</span>
-<a name="ln-62"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">npltp</span><span class="p">))</span>
-<a name="ln-63"></a>         <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">npl</span>
-<a name="ln-64"></a>            <span class="n">counter</span> <span class="o">=</span> <span class="p">(</span><span class="n">i</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">*</span> <span class="n">npl</span> <span class="o">+</span> <span class="mi">1_I8B</span>
-<a name="ln-65"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span>  <span class="n">ntp</span>
-<a name="ln-66"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">i</span>
-<a name="ln-67"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
-<a name="ln-68"></a>               <span class="n">counter</span> <span class="o">=</span> <span class="n">counter</span> <span class="o">+</span> <span class="mi">1_I8B</span>
-<a name="ln-69"></a>            <span class="k">end do</span>
-<a name="ln-70"></a><span class="k">         end do</span>
-<a name="ln-71"></a><span class="k">      end associate</span>
-<a name="ln-72"></a>
-<a name="ln-73"></a><span class="k">      return</span>
-<a name="ln-74"></a><span class="k">   end subroutine </span><span class="n">util_index_eucl_pltp</span>
-<a name="ln-75"></a>
-<a name="ln-76"></a><span class="k">end submodule </span><span class="n">s_util_index</span>
+<a name="ln-5"></a><span class="k">   module pure subroutine </span><span class="n">util_index_eucl_ij_to_k</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-6"></a>      <span class="c">!$omp declare simd(util_index_eucl_ij_to_k)</span>
+<a name="ln-7"></a>      <span class="c">!! author: Jacob R. Elliott and David A. Minton</span>
+<a name="ln-8"></a>      <span class="c">!!</span>
+<a name="ln-9"></a>      <span class="c">!! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions.</span>
+<a name="ln-10"></a>      <span class="c">!!</span>
+<a name="ln-11"></a>      <span class="c">!! Reference:</span>
+<a name="ln-12"></a>      <span class="c">!!</span>
+<a name="ln-13"></a>      <span class="c">!!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
+<a name="ln-14"></a>      <span class="c">!!       2019. hal-0204751</span>
+<a name="ln-15"></a>      <span class="k">implicit none</span>
+<a name="ln-16"></a>      <span class="c">! Arguments</span>
+<a name="ln-17"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span> <span class="c">!! Number of bodies</span>
+<a name="ln-18"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">i</span> <span class="c">!! Index of the ith body</span>
+<a name="ln-19"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">j</span> <span class="c">!! Index of the jth body</span>
+<a name="ln-20"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span> <span class="c">!! Index of the flattened matrix</span>
+<a name="ln-21"></a>      <span class="c">! Internals</span>
+<a name="ln-22"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i8</span><span class="p">,</span> <span class="n">j8</span><span class="p">,</span> <span class="n">n8</span>
+<a name="ln-23"></a>     
+<a name="ln-24"></a>      <span class="n">i8</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">i</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-25"></a>      <span class="n">j8</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-26"></a>      <span class="n">n8</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-27"></a>      <span class="n">k</span> <span class="o">=</span> <span class="p">(</span><span class="n">i8</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">*</span> <span class="n">n8</span> <span class="o">-</span> <span class="n">i8</span> <span class="o">*</span> <span class="p">(</span><span class="n">i8</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2_I8B</span> <span class="o">+</span> <span class="p">(</span><span class="n">j8</span> <span class="o">-</span> <span class="n">i8</span><span class="p">)</span>
+<a name="ln-28"></a>
+<a name="ln-29"></a>      <span class="k">return</span>
+<a name="ln-30"></a><span class="k">   end subroutine </span><span class="n">util_index_eucl_ij_to_k</span>
+<a name="ln-31"></a>
+<a name="ln-32"></a>
+<a name="ln-33"></a>   <span class="k">module pure subroutine </span><span class="n">util_index_eucl_k_to_ij</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="n">k</span><span class="p">,</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">)</span>
+<a name="ln-34"></a>      <span class="c">!! author: Jacob R. Elliott and David A. Minton</span>
+<a name="ln-35"></a>      <span class="c">!!</span>
+<a name="ln-36"></a>      <span class="c">!! Turns k index into i,j indices for use in the Euclidean distance matrix for pl-pl interactions.</span>
+<a name="ln-37"></a>      <span class="c">!!</span>
+<a name="ln-38"></a>      <span class="c">!! Reference:</span>
+<a name="ln-39"></a>      <span class="c">!!</span>
+<a name="ln-40"></a>      <span class="c">!!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
+<a name="ln-41"></a>      <span class="c">!!       2019. hal-0204751</span>
+<a name="ln-42"></a>      <span class="k">implicit none</span>
+<a name="ln-43"></a>      <span class="c">! Arguments</span>
+<a name="ln-44"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">n</span> <span class="c">!! Number of bodies</span>
+<a name="ln-45"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">k</span> <span class="c">!! Index of the flattened matrix</span>
+<a name="ln-46"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span> <span class="c">!! Index of the ith body</span>
+<a name="ln-47"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">j</span> <span class="c">!! Index of the jth body</span>
+<a name="ln-48"></a>      <span class="c">! Internals</span>
+<a name="ln-49"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">kp</span><span class="p">,</span> <span class="n">p</span><span class="p">,</span> <span class="n">i8</span><span class="p">,</span> <span class="n">j8</span><span class="p">,</span> <span class="n">n8</span>
+<a name="ln-50"></a>
+<a name="ln-51"></a>      <span class="n">n8</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">n</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-52"></a>    
+<a name="ln-53"></a>      <span class="n">kp</span> <span class="o">=</span> <span class="n">n8</span> <span class="o">*</span> <span class="p">(</span><span class="n">n8</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2_I8B</span> <span class="o">-</span> <span class="n">k</span>
+<a name="ln-54"></a>      <span class="n">p</span> <span class="o">=</span> <span class="nb">floor</span><span class="p">((</span><span class="nb">sqrt</span><span class="p">(</span><span class="mf">1._DP</span> <span class="o">+</span> <span class="mi">8_I8B</span> <span class="o">*</span> <span class="n">kp</span><span class="p">)</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2_I8B</span><span class="p">)</span>
+<a name="ln-55"></a>      <span class="n">i8</span> <span class="o">=</span> <span class="n">n8</span> <span class="o">-</span> <span class="mi">1_I8B</span> <span class="o">-</span> <span class="n">p</span>
+<a name="ln-56"></a>      <span class="n">j8</span> <span class="o">=</span> <span class="n">k</span> <span class="o">-</span> <span class="p">(</span><span class="n">n8</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">n8</span> <span class="o">-</span> <span class="mi">2_I8B</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2_I8B</span> <span class="o">+</span> <span class="n">p</span> <span class="o">*</span> <span class="p">(</span><span class="n">p</span> <span class="o">+</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2_I8B</span> <span class="o">+</span> <span class="mi">1_I8B</span>
+<a name="ln-57"></a>
+<a name="ln-58"></a>      <span class="n">i</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">i8</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span>
+<a name="ln-59"></a>      <span class="n">j</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">j8</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I4B</span><span class="p">)</span>
+<a name="ln-60"></a>
+<a name="ln-61"></a>      <span class="k">return</span>
+<a name="ln-62"></a><span class="k">   end subroutine </span><span class="n">util_index_eucl_k_to_ij</span>
+<a name="ln-63"></a>
+<a name="ln-64"></a>
+<a name="ln-65"></a>   <span class="k">module subroutine </span><span class="n">util_index_eucl_plpl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-66"></a>      <span class="c">!! author: Jacob R. Elliott and David A. Minton</span>
+<a name="ln-67"></a>      <span class="c">!!</span>
+<a name="ln-68"></a>      <span class="c">!! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions for a Swiftest massive body object</span>
+<a name="ln-69"></a>      <span class="c">!!</span>
+<a name="ln-70"></a>      <span class="c">!! Reference:</span>
+<a name="ln-71"></a>      <span class="c">!!</span>
+<a name="ln-72"></a>      <span class="c">!!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
+<a name="ln-73"></a>      <span class="c">!!       2019. hal-0204751</span>
+<a name="ln-74"></a>      <span class="k">implicit none</span>
+<a name="ln-75"></a>      <span class="c">! Arguments</span>
+<a name="ln-76"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest massive body object</span>
+<a name="ln-77"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-78"></a>      <span class="c">! Internals</span>
+<a name="ln-79"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">npl</span>
+<a name="ln-80"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">k</span>
+<a name="ln-81"></a>
+<a name="ln-82"></a>      <span class="n">npl</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-83"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">nplpl</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nplpl</span><span class="p">)</span>
+<a name="ln-84"></a>         <span class="n">nplpl</span> <span class="o">=</span> <span class="p">(</span><span class="n">npl</span> <span class="o">*</span> <span class="p">(</span><span class="n">npl</span> <span class="o">-</span> <span class="mi">1</span><span class="p">)</span> <span class="o">/</span> <span class="mi">2</span><span class="p">)</span> <span class="c">! number of entries in a strict lower triangle, npl x npl</span>
+<a name="ln-85"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">allocated</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">))</span> <span class="k">deallocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">)</span> <span class="c">! Reset the index array if it&#39;s been set previously</span>
+<a name="ln-86"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">nplpl</span><span class="p">))</span>
+<a name="ln-87"></a>         <span class="k">do </span><span class="n">concurrent</span> <span class="p">(</span><span class="n">i</span><span class="o">=</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">j</span><span class="o">=</span><span class="mi">1</span><span class="p">:</span><span class="n">npl</span><span class="p">,</span> <span class="n">j</span><span class="o">&gt;</span><span class="n">i</span><span class="p">)</span>
+<a name="ln-88"></a>            <span class="k">call </span><span class="n">util_index_eucl_ij_to_k</span><span class="p">(</span><span class="n">npl</span><span class="p">,</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span>
+<a name="ln-89"></a>            <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">i</span>
+<a name="ln-90"></a>            <span class="n">self</span><span class="p">%</span><span class="n">k_plpl</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
+<a name="ln-91"></a>         <span class="k">end do</span>
+<a name="ln-92"></a><span class="k">      end associate</span>
+<a name="ln-93"></a>
+<a name="ln-94"></a><span class="k">      return</span>
+<a name="ln-95"></a><span class="k">   end subroutine </span><span class="n">util_index_eucl_plpl</span>
+<a name="ln-96"></a>
+<a name="ln-97"></a>
+<a name="ln-98"></a>   <span class="k">module subroutine </span><span class="n">util_index_eucl_pltp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">pl</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-99"></a>      <span class="c">!! author: Jacob R. Elliott and David A. Minton</span>
+<a name="ln-100"></a>      <span class="c">!!</span>
+<a name="ln-101"></a>      <span class="c">!! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions</span>
+<a name="ln-102"></a>      <span class="c">!!</span>
+<a name="ln-103"></a>      <span class="c">!! Reference:</span>
+<a name="ln-104"></a>      <span class="c">!!</span>
+<a name="ln-105"></a>      <span class="c">!!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. </span>
+<a name="ln-106"></a>      <span class="c">!!       2019. hal-0204751</span>
+<a name="ln-107"></a>      <span class="k">implicit none</span>
+<a name="ln-108"></a>      <span class="c">! Arguments</span>
+<a name="ln-109"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_tp</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest test particle object</span>
+<a name="ln-110"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_pl</span><span class="p">),</span>         <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">pl</span>    <span class="c">!! Swiftest massive body object</span>
+<a name="ln-111"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters</span>
+<a name="ln-112"></a>      <span class="c">! Internals</span>
+<a name="ln-113"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I8B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span><span class="p">,</span> <span class="n">counter</span><span class="p">,</span> <span class="n">npl</span><span class="p">,</span> <span class="n">ntp</span>
+<a name="ln-114"></a>
+<a name="ln-115"></a>      <span class="n">ntp</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-116"></a>      <span class="n">npl</span> <span class="o">=</span> <span class="nb">int</span><span class="p">(</span><span class="n">pl</span><span class="p">%</span><span class="n">nbody</span><span class="p">,</span> <span class="nb">kind</span><span class="o">=</span><span class="n">I8B</span><span class="p">)</span>
+<a name="ln-117"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">npltp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">npltp</span><span class="p">)</span>
+<a name="ln-118"></a>         <span class="n">npltp</span> <span class="o">=</span> <span class="n">npl</span> <span class="o">*</span> <span class="n">ntp</span>
+<a name="ln-119"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">allocated</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">))</span> <span class="k">deallocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">)</span> <span class="c">! Reset the index array if it&#39;s been set previously</span>
+<a name="ln-120"></a>         <span class="k">allocate</span><span class="p">(</span><span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">npltp</span><span class="p">))</span>
+<a name="ln-121"></a>         <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span> <span class="n">npl</span>
+<a name="ln-122"></a>            <span class="n">counter</span> <span class="o">=</span> <span class="p">(</span><span class="n">i</span> <span class="o">-</span> <span class="mi">1_I8B</span><span class="p">)</span> <span class="o">*</span> <span class="n">npl</span> <span class="o">+</span> <span class="mi">1_I8B</span>
+<a name="ln-123"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1_I8B</span><span class="p">,</span>  <span class="n">ntp</span>
+<a name="ln-124"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">i</span>
+<a name="ln-125"></a>               <span class="n">self</span><span class="p">%</span><span class="n">k_pltp</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="n">counter</span><span class="p">)</span> <span class="o">=</span> <span class="n">j</span>
+<a name="ln-126"></a>               <span class="n">counter</span> <span class="o">=</span> <span class="n">counter</span> <span class="o">+</span> <span class="mi">1_I8B</span>
+<a name="ln-127"></a>            <span class="k">end do</span>
+<a name="ln-128"></a><span class="k">         end do</span>
+<a name="ln-129"></a><span class="k">      end associate</span>
+<a name="ln-130"></a>
+<a name="ln-131"></a><span class="k">      return</span>
+<a name="ln-132"></a><span class="k">   end subroutine </span><span class="n">util_index_eucl_pltp</span>
+<a name="ln-133"></a>
+<a name="ln-134"></a><span class="k">end submodule </span><span class="n">s_util_index</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/util_minimize_bfgs.f90.html b/docs/sourcefile/util_minimize_bfgs.f90.html
index e54f17461..2f1b69205 100644
--- a/docs/sourcefile/util_minimize_bfgs.f90.html
+++ b/docs/sourcefile/util_minimize_bfgs.f90.html
@@ -134,7 +134,7 @@ <h1>util_minimize_bfgs.f90
      <li><i class="fa fa-list-ol"></i>
        <a data-toggle="tooltip"
     data-placement="bottom" data-html="true"
-    title=" 2.5% of total for source files.">415 statements</a>
+    title=" 2.5% of total for source files.">409 statements</a>
      </li> 
      
      
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_minimize_bfgs.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_minimize_bfgsf90EfferentGraph" width="641pt" height="282pt"
- viewBox="0.00 0.00 641.00 281.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_minimize_bfgsf90EfferentGraph" width="641pt" height="233pt"
+ viewBox="0.00 0.00 641.00 232.57" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph" class="graph" transform="scale(0.68 0.68) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_minimize_bfgs.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 942,-412.12 942,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 942,-339.24 942,4 -4,4"/>
 <!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_minimize_bfgs.f90</title>
-<polygon fill="none" stroke="black" points="938,-133.12 820,-133.12 820,-109.12 938,-109.12 938,-133.12"/>
-<text text-anchor="middle" x="879" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_minimize_bfgs.f90</text>
+<polygon fill="none" stroke="black" points="938,-235.24 820,-235.24 820,-211.24 938,-211.24 938,-235.24"/>
+<text text-anchor="middle" x="879" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_minimize_bfgs.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M855.34,-109.09C812.36,-87.43 715.54,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M847.77,-235.38C801.32,-252.91 709.24,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M862.3,-133.21C840.6,-149.91 801.28,-180.18 775.92,-199.7"/>
-<polygon fill="#000000" stroke="#000000" points="773.69,-197 767.9,-205.88 777.96,-202.55 773.69,-197"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.2,-211.24C825.57,-206.59 808.77,-201.26 793.79,-196.5"/>
+<polygon fill="#000000" stroke="#000000" points="794.83,-193.16 784.24,-193.47 792.71,-199.83 794.83,-193.16"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_minimize_bfgs.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
@@ -674,174 +666,174 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-60"></a>      <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">maxloop</span> 
 <a name="ln-61"></a>         <span class="c">!check for convergence</span>
 <a name="ln-62"></a>         <span class="n">conv</span> <span class="o">=</span> <span class="nb">count</span><span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">grad1</span><span class="p">(:))</span> <span class="o">&gt;</span> <span class="n">eps</span><span class="p">)</span>
-<a name="ln-63"></a>         <span class="c">! write(*,*) &#39;loop: &#39;, i</span>
-<a name="ln-64"></a>         <span class="c">! write(*,*) &#39;conv: &#39;, conv</span>
-<a name="ln-65"></a>         <span class="c">! write(*,*) &#39;grad1 / eps&#39;</span>
-<a name="ln-66"></a>         <span class="c">! do j = 1, N</span>
-<a name="ln-67"></a>         <span class="c">!    write(*,*) j, abs(grad1(j)) / eps</span>
-<a name="ln-68"></a>         <span class="c">! end do</span>
-<a name="ln-69"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">conv</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-70"></a>            <span class="c">! write(*,*) &quot;BFGS converged on gradient after &quot;,i,&quot; iterations&quot; </span>
-<a name="ln-71"></a>            <span class="k">exit </span>
-<a name="ln-72"></a><span class="k">         end if</span>
-<a name="ln-73"></a><span class="k">         </span><span class="n">S</span><span class="p">(:)</span> <span class="o">=</span> <span class="o">-</span><span class="nb">matmul</span><span class="p">(</span><span class="n">H</span><span class="p">(:,:),</span> <span class="n">grad1</span><span class="p">(:))</span>
-<a name="ln-74"></a>         <span class="n">astar</span> <span class="o">=</span> <span class="n">minimize1D</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x1</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">graddelta</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-75"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-76"></a>            <span class="c">! write(*,*) &quot;Exiting BFGS with error in minimize1D step&quot;</span>
-<a name="ln-77"></a>            <span class="k">exit</span>
-<a name="ln-78"></a><span class="k">         end if</span>
-<a name="ln-79"></a>         <span class="c">! Get new x values </span>
-<a name="ln-80"></a>         <span class="n">P</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">astar</span> <span class="o">*</span> <span class="n">S</span><span class="p">(:)</span> 
-<a name="ln-81"></a>         <span class="n">x1</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(:)</span> <span class="o">+</span> <span class="n">P</span><span class="p">(:)</span>
-<a name="ln-82"></a>         <span class="c">! Calculate new gradient</span>
-<a name="ln-83"></a>         <span class="n">grad0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">grad1</span><span class="p">(:)</span>
-<a name="ln-84"></a>         <span class="n">grad1</span> <span class="o">=</span> <span class="n">gradf</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">x1</span><span class="p">,</span> <span class="n">graddelta</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-85"></a>         <span class="n">y</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">grad1</span><span class="p">(:)</span> <span class="o">-</span> <span class="n">grad0</span><span class="p">(:)</span>
-<a name="ln-86"></a>         <span class="n">Py</span> <span class="o">=</span> <span class="nb">sum</span><span class="p">(</span><span class="n">P</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(:))</span>
-<a name="ln-87"></a>         <span class="c">! set up factors for H matrix update </span>
-<a name="ln-88"></a>         <span class="n">yHy</span> <span class="o">=</span> <span class="mf">0._DP</span>
-<a name="ln-89"></a>         <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span> 
-<a name="ln-90"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
-<a name="ln-91"></a>               <span class="n">yHy</span> <span class="o">=</span> <span class="n">yHy</span> <span class="o">+</span> <span class="n">y</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">H</span><span class="p">(</span><span class="n">j</span><span class="p">,</span><span class="n">k</span><span class="p">)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-92"></a>            <span class="k">end do</span>
-<a name="ln-93"></a><span class="k">         end do</span>
-<a name="ln-94"></a>         <span class="c">! prevent divide by zero (convergence) </span>
-<a name="ln-95"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">Py</span><span class="p">)</span> <span class="o">&lt;</span> <span class="nb">tiny</span><span class="p">(</span><span class="n">Py</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-96"></a>            <span class="c">! write(*,*) &quot;BFGS Converged on tiny Py after &quot;,i,&quot; iterations&quot;</span>
-<a name="ln-97"></a>            <span class="k">exit</span>
-<a name="ln-98"></a><span class="k">         end if</span>
-<a name="ln-99"></a>         <span class="c">! set up update </span>
-<a name="ln-100"></a>         <span class="n">PyH</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0._DP</span>
-<a name="ln-101"></a>         <span class="n">HyP</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0._DP</span>
-<a name="ln-102"></a>         <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span> 
-<a name="ln-103"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
-<a name="ln-104"></a>               <span class="n">PP</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">P</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">P</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-105"></a>               <span class="k">do </span><span class="n">l</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
-<a name="ln-106"></a>                  <span class="n">PyH</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">PyH</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">+</span> <span class="n">P</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(</span><span class="n">l</span><span class="p">)</span> <span class="o">*</span> <span class="n">H</span><span class="p">(</span><span class="n">l</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
-<a name="ln-107"></a>                  <span class="n">HyP</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">HyP</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">+</span> <span class="n">P</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(</span><span class="n">l</span><span class="p">)</span> <span class="o">*</span> <span class="n">H</span><span class="p">(</span><span class="n">j</span><span class="p">,</span><span class="n">l</span><span class="p">)</span>
-<a name="ln-108"></a>               <span class="k">end do</span>
-<a name="ln-109"></a><span class="k">            end do</span>
-<a name="ln-110"></a><span class="k">         end do</span>
-<a name="ln-111"></a>         <span class="c">! update H matrix </span>
-<a name="ln-112"></a>         <span class="n">H</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="n">H</span><span class="p">(:,:)</span> <span class="o">+</span> <span class="p">((</span><span class="mf">1._DP</span> <span class="o">-</span> <span class="n">yHy</span> <span class="o">/</span> <span class="n">Py</span><span class="p">)</span> <span class="o">*</span> <span class="n">PP</span><span class="p">(:,:)</span> <span class="o">-</span> <span class="n">PyH</span><span class="p">(:,:)</span> <span class="o">-</span> <span class="n">HyP</span><span class="p">(:,:))</span> <span class="o">/</span> <span class="n">Py</span>
-<a name="ln-113"></a>         <span class="c">! Normalize to prevent it from blowing up if it takes many iterations to find a solution</span>
-<a name="ln-114"></a>         <span class="n">H</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="n">H</span><span class="p">(:,:)</span> <span class="o">/</span> <span class="nb">norm2</span><span class="p">(</span><span class="n">H</span><span class="p">(:,:))</span>
-<a name="ln-115"></a>         <span class="c">! Stop everything if there are any exceptions to allow the routine to fail gracefully</span>
-<a name="ln-116"></a>         <span class="k">call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
-<a name="ln-117"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">))</span> <span class="k">exit </span>
-<a name="ln-118"></a><span class="k">         if</span> <span class="p">(</span><span class="n">i</span> <span class="o">==</span> <span class="n">maxloop</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-119"></a><span class="k">            </span><span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-120"></a>            <span class="c">! write(*,*) &quot;BFGS ran out of loops!&quot;</span>
-<a name="ln-121"></a>         <span class="k">end if</span>
-<a name="ln-122"></a><span class="k">      end do</span>
-<a name="ln-123"></a><span class="k">      call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
-<a name="ln-124"></a>      <span class="n">lerr</span> <span class="o">=</span> <span class="n">lerr</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">)</span>  
-<a name="ln-125"></a>      <span class="c">! if (any(fpe_flag)) write(*,*) &#39;BFGS did not converge due to fpe&#39;</span>
-<a name="ln-126"></a>      <span class="c">! if (lerr) write(*,*) &quot;BFGS did not converge!&quot;</span>
-<a name="ln-127"></a>      <span class="k">call </span><span class="n">ieee_set_status</span><span class="p">(</span><span class="n">original_fpe_status</span><span class="p">)</span>
-<a name="ln-128"></a>
-<a name="ln-129"></a>      <span class="k">return </span>
-<a name="ln-130"></a>
-<a name="ln-131"></a><span class="k">      contains</span>
-<a name="ln-132"></a>
-<a name="ln-133"></a><span class="k">         function </span><span class="n">gradf</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">x1</span><span class="p">,</span> <span class="n">dx</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">grad</span><span class="p">)</span>
-<a name="ln-134"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
-<a name="ln-135"></a>            <span class="c">!! Purpose:  Estimates the gradient of a function using a central difference</span>
-<a name="ln-136"></a>            <span class="c">!! approximation</span>
-<a name="ln-137"></a>            <span class="c">!! Inputs:</span>
-<a name="ln-138"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
-<a name="ln-139"></a>            <span class="c">!!   N    :  number of variables N</span>
-<a name="ln-140"></a>            <span class="c">!!   x1   :  x value array</span>
-<a name="ln-141"></a>            <span class="c">!!   dx   :  step size to use when calculating derivatives</span>
-<a name="ln-142"></a>            <span class="c">!! Outputs: </span>
-<a name="ln-143"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
-<a name="ln-144"></a>            <span class="c">!! Returns</span>
-<a name="ln-145"></a>            <span class="c">!!   grad :  N sized array containing estimated gradient of f at x1</span>
-<a name="ln-146"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-147"></a>            <span class="k">implicit none</span>
-<a name="ln-148"></a>            <span class="c">! Arguments</span>
-<a name="ln-149"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
-<a name="ln-150"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-151"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x1</span>
-<a name="ln-152"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dx</span>
-<a name="ln-153"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-154"></a>            <span class="c">! Result</span>
-<a name="ln-155"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">N</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">grad</span>
-<a name="ln-156"></a>            <span class="c">! Internals</span>
-<a name="ln-157"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
-<a name="ln-158"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">N</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xp</span><span class="p">,</span> <span class="n">xm</span>
-<a name="ln-159"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">fm</span>
-<a name="ln-160"></a>            <span class="kt">logical</span> <span class="kd">::</span> <span class="n">lerrp</span><span class="p">,</span> <span class="n">lerrm</span>
-<a name="ln-161"></a>
-<a name="ln-162"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
-<a name="ln-163"></a>               <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
-<a name="ln-164"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">j</span> <span class="o">==</span> <span class="n">i</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-165"></a><span class="k">                     </span><span class="n">xp</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">dx</span>
-<a name="ln-166"></a>                     <span class="n">xm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">dx</span>
-<a name="ln-167"></a>                  <span class="k">else</span>
-<a name="ln-168"></a><span class="k">                     </span><span class="n">xp</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
-<a name="ln-169"></a>                     <span class="n">xm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
-<a name="ln-170"></a>                  <span class="k">end if</span>
-<a name="ln-171"></a><span class="k">               end do</span>
-<a name="ln-172"></a><span class="k">               select type</span> <span class="p">(</span><span class="n">f</span><span class="p">)</span>
-<a name="ln-173"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj_err</span><span class="p">)</span>
-<a name="ln-174"></a>                  <span class="n">fp</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xp</span><span class="p">)</span>
-<a name="ln-175"></a>                  <span class="n">lerrp</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">lerr</span>
-<a name="ln-176"></a>                  <span class="n">fm</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xm</span><span class="p">)</span>
-<a name="ln-177"></a>                  <span class="n">lerrm</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">lerr</span>
-<a name="ln-178"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="n">lerrp</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="n">lerrm</span>
-<a name="ln-179"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj</span><span class="p">)</span>
-<a name="ln-180"></a>                  <span class="n">fp</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xp</span><span class="p">)</span>
-<a name="ln-181"></a>                  <span class="n">fm</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xm</span><span class="p">)</span>
-<a name="ln-182"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-183"></a>               <span class="k">end select</span>
-<a name="ln-184"></a><span class="k">               </span><span class="n">grad</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">fp</span> <span class="o">-</span> <span class="n">fm</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">dx</span><span class="p">)</span>
-<a name="ln-185"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-186"></a><span class="k">            end do</span>
-<a name="ln-187"></a><span class="k">            return </span>
-<a name="ln-188"></a><span class="k">         end function </span><span class="n">gradf</span>
-<a name="ln-189"></a>
-<a name="ln-190"></a>
-<a name="ln-191"></a>         <span class="k">function </span><span class="n">minimize1D</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">astar</span><span class="p">)</span>
-<a name="ln-192"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
-<a name="ln-193"></a>            <span class="c">!! This program find the minimum of a function of N variables in a single direction</span>
-<a name="ln-194"></a>            <span class="c">!! S using in sequence:</span>
-<a name="ln-195"></a>            <span class="c">!!    1.  A Bracketing method</span>
-<a name="ln-196"></a>            <span class="c">!!    2.  The golden section method</span>
-<a name="ln-197"></a>            <span class="c">!!    3.  A quadratic polynomial fit</span>
-<a name="ln-198"></a>            <span class="c">!! Inputs</span>
-<a name="ln-199"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
-<a name="ln-200"></a>            <span class="c">!!   x0   :  Array of size N of initial x values</span>
-<a name="ln-201"></a>            <span class="c">!!   S    :  Array of size N that determines the direction of minimization</span>
-<a name="ln-202"></a>            <span class="c">!!   N    :  Number of variables of function f</span>
-<a name="ln-203"></a>            <span class="c">!!   eps  :  Accuracy of 1 - dimensional minimization at each step</span>
-<a name="ln-204"></a>            <span class="c">!! Output</span>
-<a name="ln-205"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
-<a name="ln-206"></a>            <span class="c">!! Returns</span>
-<a name="ln-207"></a>            <span class="c">!!   astar      :  Final minimum along direction S</span>
-<a name="ln-208"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-209"></a>            <span class="k">implicit none</span>
-<a name="ln-210"></a>            <span class="c">! Arguments</span>
-<a name="ln-211"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">N</span>
-<a name="ln-212"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-213"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
-<a name="ln-214"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">eps</span>
-<a name="ln-215"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-216"></a>            <span class="c">! Result</span>
-<a name="ln-217"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                            <span class="kd">::</span> <span class="n">astar</span>
-<a name="ln-218"></a>            <span class="c">! Internals</span>
-<a name="ln-219"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">num</span> <span class="o">=</span> <span class="mi">0</span>
-<a name="ln-220"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">step</span> <span class="o">=</span> <span class="mf">0.7_DP</span>     <span class="c">!! Bracketing method step size   </span>
-<a name="ln-221"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">gam</span> <span class="o">=</span> <span class="mf">1.2_DP</span>      <span class="c">!! Bracketing method expansion parameter   </span>
-<a name="ln-222"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">greduce</span> <span class="o">=</span> <span class="mf">0.2_DP</span>  <span class="c">!! Golden section method reduction factor   </span>
-<a name="ln-223"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">greduce2</span> <span class="o">=</span> <span class="mf">0.1_DP</span> <span class="c">! Secondary golden section method reduction factor   </span>
-<a name="ln-224"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span>                     <span class="c">!! High and low values for 1 - D minimization routines   </span>
-<a name="ln-225"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">a0</span> <span class="o">=</span> <span class="nb">epsilon</span><span class="p">(</span><span class="mf">1.0_DP</span><span class="p">)</span>       <span class="c">!! Initial guess of alpha   </span>
-<a name="ln-226"></a>         
-<a name="ln-227"></a>            <span class="n">alo</span> <span class="o">=</span> <span class="n">a0</span>
-<a name="ln-228"></a>            <span class="k">call </span><span class="n">bracket</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">gam</span><span class="p">,</span> <span class="n">step</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-63"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">conv</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">exit </span>
+<a name="ln-64"></a><span class="k">         </span><span class="n">S</span><span class="p">(:)</span> <span class="o">=</span> <span class="o">-</span><span class="nb">matmul</span><span class="p">(</span><span class="n">H</span><span class="p">(:,:),</span> <span class="n">grad1</span><span class="p">(:))</span>
+<a name="ln-65"></a>         <span class="n">astar</span> <span class="o">=</span> <span class="n">minimize1D</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x1</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">graddelta</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-66"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span>
+<a name="ln-67"></a>         <span class="c">! Get new x values </span>
+<a name="ln-68"></a>         <span class="n">P</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">astar</span> <span class="o">*</span> <span class="n">S</span><span class="p">(:)</span> 
+<a name="ln-69"></a>         <span class="n">x1</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(:)</span> <span class="o">+</span> <span class="n">P</span><span class="p">(:)</span>
+<a name="ln-70"></a>         <span class="c">! Calculate new gradient</span>
+<a name="ln-71"></a>         <span class="n">grad0</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">grad1</span><span class="p">(:)</span>
+<a name="ln-72"></a>         <span class="n">grad1</span> <span class="o">=</span> <span class="n">gradf</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">x1</span><span class="p">,</span> <span class="n">graddelta</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-73"></a>         <span class="n">y</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">grad1</span><span class="p">(:)</span> <span class="o">-</span> <span class="n">grad0</span><span class="p">(:)</span>
+<a name="ln-74"></a>         <span class="n">Py</span> <span class="o">=</span> <span class="nb">sum</span><span class="p">(</span><span class="n">P</span><span class="p">(:)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(:))</span>
+<a name="ln-75"></a>         <span class="c">! set up factors for H matrix update </span>
+<a name="ln-76"></a>         <span class="n">yHy</span> <span class="o">=</span> <span class="mf">0._DP</span>
+<a name="ln-77"></a>         <span class="c">!$omp do simd schedule(static)&amp;</span>
+<a name="ln-78"></a>         <span class="c">!$omp firstprivate(N, y, H) &amp;</span>
+<a name="ln-79"></a>         <span class="c">!$omp reduction(+:yHy)</span>
+<a name="ln-80"></a>         <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span> 
+<a name="ln-81"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
+<a name="ln-82"></a>               <span class="n">yHy</span> <span class="o">=</span> <span class="n">yHy</span> <span class="o">+</span> <span class="n">y</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">H</span><span class="p">(</span><span class="n">j</span><span class="p">,</span><span class="n">k</span><span class="p">)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-83"></a>            <span class="k">end do</span>
+<a name="ln-84"></a><span class="k">         end do</span>
+<a name="ln-85"></a>         <span class="c">!$omp end do simd</span>
+<a name="ln-86"></a>         <span class="c">! prevent divide by zero (convergence) </span>
+<a name="ln-87"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">Py</span><span class="p">)</span> <span class="o">&lt;</span> <span class="nb">tiny</span><span class="p">(</span><span class="n">Py</span><span class="p">))</span> <span class="k">exit</span>
+<a name="ln-88"></a>         <span class="c">! set up update </span>
+<a name="ln-89"></a>         <span class="n">PyH</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0._DP</span>
+<a name="ln-90"></a>         <span class="n">HyP</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="mf">0._DP</span>
+<a name="ln-91"></a>         <span class="c">!$omp parallel do default(private) schedule(static)&amp;</span>
+<a name="ln-92"></a>         <span class="c">!$omp shared(N, PP, P, y, H) &amp;</span>
+<a name="ln-93"></a>         <span class="c">!$omp reduction(+:PyH, HyP)</span>
+<a name="ln-94"></a>         <span class="k">do </span><span class="n">k</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span> 
+<a name="ln-95"></a>            <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
+<a name="ln-96"></a>               <span class="n">PP</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">P</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">P</span><span class="p">(</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-97"></a>               <span class="k">do </span><span class="n">l</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
+<a name="ln-98"></a>                  <span class="n">PyH</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">PyH</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">+</span> <span class="n">P</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(</span><span class="n">l</span><span class="p">)</span> <span class="o">*</span> <span class="n">H</span><span class="p">(</span><span class="n">l</span><span class="p">,</span><span class="n">k</span><span class="p">)</span>
+<a name="ln-99"></a>                  <span class="n">HyP</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">=</span> <span class="n">HyP</span><span class="p">(</span><span class="n">j</span><span class="p">,</span> <span class="n">k</span><span class="p">)</span> <span class="o">+</span> <span class="n">P</span><span class="p">(</span><span class="n">k</span><span class="p">)</span> <span class="o">*</span> <span class="n">y</span><span class="p">(</span><span class="n">l</span><span class="p">)</span> <span class="o">*</span> <span class="n">H</span><span class="p">(</span><span class="n">j</span><span class="p">,</span><span class="n">l</span><span class="p">)</span>
+<a name="ln-100"></a>               <span class="k">end do</span>
+<a name="ln-101"></a><span class="k">            end do</span>
+<a name="ln-102"></a><span class="k">         end do</span>
+<a name="ln-103"></a>         <span class="c">!$omp end parallel do </span>
+<a name="ln-104"></a>         <span class="c">! update H matrix </span>
+<a name="ln-105"></a>         <span class="n">H</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="n">H</span><span class="p">(:,:)</span> <span class="o">+</span> <span class="p">((</span><span class="mf">1._DP</span> <span class="o">-</span> <span class="n">yHy</span> <span class="o">/</span> <span class="n">Py</span><span class="p">)</span> <span class="o">*</span> <span class="n">PP</span><span class="p">(:,:)</span> <span class="o">-</span> <span class="n">PyH</span><span class="p">(:,:)</span> <span class="o">-</span> <span class="n">HyP</span><span class="p">(:,:))</span> <span class="o">/</span> <span class="n">Py</span>
+<a name="ln-106"></a>         <span class="c">! Normalize to prevent it from blowing up if it takes many iterations to find a solution</span>
+<a name="ln-107"></a>         <span class="n">H</span><span class="p">(:,:)</span> <span class="o">=</span> <span class="n">H</span><span class="p">(:,:)</span> <span class="o">/</span> <span class="nb">norm2</span><span class="p">(</span><span class="n">H</span><span class="p">(:,:))</span>
+<a name="ln-108"></a>         <span class="c">! Stop everything if there are any exceptions to allow the routine to fail gracefully</span>
+<a name="ln-109"></a>         <span class="k">call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
+<a name="ln-110"></a>         <span class="k">if</span> <span class="p">(</span><span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">))</span> <span class="k">exit </span>
+<a name="ln-111"></a><span class="k">         if</span> <span class="p">(</span><span class="n">i</span> <span class="o">==</span> <span class="n">maxloop</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-112"></a><span class="k">            </span><span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-113"></a>         <span class="k">end if</span>
+<a name="ln-114"></a><span class="k">      end do</span>
+<a name="ln-115"></a><span class="k">      call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
+<a name="ln-116"></a>      <span class="n">lerr</span> <span class="o">=</span> <span class="n">lerr</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">)</span>  
+<a name="ln-117"></a>      <span class="k">call </span><span class="n">ieee_set_status</span><span class="p">(</span><span class="n">original_fpe_status</span><span class="p">)</span>
+<a name="ln-118"></a>
+<a name="ln-119"></a>      <span class="k">return </span>
+<a name="ln-120"></a>
+<a name="ln-121"></a><span class="k">      contains</span>
+<a name="ln-122"></a>
+<a name="ln-123"></a><span class="k">         function </span><span class="n">gradf</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">x1</span><span class="p">,</span> <span class="n">dx</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">grad</span><span class="p">)</span>
+<a name="ln-124"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
+<a name="ln-125"></a>            <span class="c">!! Purpose:  Estimates the gradient of a function using a central difference</span>
+<a name="ln-126"></a>            <span class="c">!! approximation</span>
+<a name="ln-127"></a>            <span class="c">!! Inputs:</span>
+<a name="ln-128"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
+<a name="ln-129"></a>            <span class="c">!!   N    :  number of variables N</span>
+<a name="ln-130"></a>            <span class="c">!!   x1   :  x value array</span>
+<a name="ln-131"></a>            <span class="c">!!   dx   :  step size to use when calculating derivatives</span>
+<a name="ln-132"></a>            <span class="c">!! Outputs: </span>
+<a name="ln-133"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
+<a name="ln-134"></a>            <span class="c">!! Returns</span>
+<a name="ln-135"></a>            <span class="c">!!   grad :  N sized array containing estimated gradient of f at x1</span>
+<a name="ln-136"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-137"></a>            <span class="k">implicit none</span>
+<a name="ln-138"></a>            <span class="c">! Arguments</span>
+<a name="ln-139"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
+<a name="ln-140"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-141"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x1</span>
+<a name="ln-142"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dx</span>
+<a name="ln-143"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-144"></a>            <span class="c">! Result</span>
+<a name="ln-145"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">N</span><span class="p">)</span>                <span class="kd">::</span> <span class="n">grad</span>
+<a name="ln-146"></a>            <span class="c">! Internals</span>
+<a name="ln-147"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
+<a name="ln-148"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">N</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xp</span><span class="p">,</span> <span class="n">xm</span>
+<a name="ln-149"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">fp</span><span class="p">,</span> <span class="n">fm</span>
+<a name="ln-150"></a>            <span class="kt">logical</span> <span class="kd">::</span> <span class="n">lerrp</span><span class="p">,</span> <span class="n">lerrm</span>
+<a name="ln-151"></a>
+<a name="ln-152"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
+<a name="ln-153"></a>               <span class="k">do </span><span class="n">j</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">N</span>
+<a name="ln-154"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">j</span> <span class="o">==</span> <span class="n">i</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-155"></a><span class="k">                     </span><span class="n">xp</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">+</span> <span class="n">dx</span>
+<a name="ln-156"></a>                     <span class="n">xm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">-</span> <span class="n">dx</span>
+<a name="ln-157"></a>                  <span class="k">else</span>
+<a name="ln-158"></a><span class="k">                     </span><span class="n">xp</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
+<a name="ln-159"></a>                     <span class="n">xm</span><span class="p">(</span><span class="n">j</span><span class="p">)</span> <span class="o">=</span> <span class="n">x1</span><span class="p">(</span><span class="n">j</span><span class="p">)</span>
+<a name="ln-160"></a>                  <span class="k">end if</span>
+<a name="ln-161"></a><span class="k">               end do</span>
+<a name="ln-162"></a><span class="k">               select type</span> <span class="p">(</span><span class="n">f</span><span class="p">)</span>
+<a name="ln-163"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj_err</span><span class="p">)</span>
+<a name="ln-164"></a>                  <span class="n">fp</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xp</span><span class="p">)</span>
+<a name="ln-165"></a>                  <span class="n">lerrp</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">lerr</span>
+<a name="ln-166"></a>                  <span class="n">fm</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xm</span><span class="p">)</span>
+<a name="ln-167"></a>                  <span class="n">lerrm</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">lerr</span>
+<a name="ln-168"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="n">lerrp</span> <span class="p">.</span><span class="nb">or</span><span class="p">.</span> <span class="n">lerrm</span>
+<a name="ln-169"></a>               <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj</span><span class="p">)</span>
+<a name="ln-170"></a>                  <span class="n">fp</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xp</span><span class="p">)</span>
+<a name="ln-171"></a>                  <span class="n">fm</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xm</span><span class="p">)</span>
+<a name="ln-172"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-173"></a>               <span class="k">end select</span>
+<a name="ln-174"></a><span class="k">               </span><span class="n">grad</span><span class="p">(</span><span class="n">i</span><span class="p">)</span> <span class="o">=</span> <span class="p">(</span><span class="n">fp</span> <span class="o">-</span> <span class="n">fm</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">dx</span><span class="p">)</span>
+<a name="ln-175"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-176"></a><span class="k">            end do</span>
+<a name="ln-177"></a><span class="k">            return </span>
+<a name="ln-178"></a><span class="k">         end function </span><span class="n">gradf</span>
+<a name="ln-179"></a>
+<a name="ln-180"></a>
+<a name="ln-181"></a>         <span class="k">function </span><span class="n">minimize1D</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">astar</span><span class="p">)</span>
+<a name="ln-182"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
+<a name="ln-183"></a>            <span class="c">!! This program find the minimum of a function of N variables in a single direction</span>
+<a name="ln-184"></a>            <span class="c">!! S using in sequence:</span>
+<a name="ln-185"></a>            <span class="c">!!    1.  A Bracketing method</span>
+<a name="ln-186"></a>            <span class="c">!!    2.  The golden section method</span>
+<a name="ln-187"></a>            <span class="c">!!    3.  A quadratic polynomial fit</span>
+<a name="ln-188"></a>            <span class="c">!! Inputs</span>
+<a name="ln-189"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
+<a name="ln-190"></a>            <span class="c">!!   x0   :  Array of size N of initial x values</span>
+<a name="ln-191"></a>            <span class="c">!!   S    :  Array of size N that determines the direction of minimization</span>
+<a name="ln-192"></a>            <span class="c">!!   N    :  Number of variables of function f</span>
+<a name="ln-193"></a>            <span class="c">!!   eps  :  Accuracy of 1 - dimensional minimization at each step</span>
+<a name="ln-194"></a>            <span class="c">!! Output</span>
+<a name="ln-195"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
+<a name="ln-196"></a>            <span class="c">!! Returns</span>
+<a name="ln-197"></a>            <span class="c">!!   astar      :  Final minimum along direction S</span>
+<a name="ln-198"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-199"></a>            <span class="k">implicit none</span>
+<a name="ln-200"></a>            <span class="c">! Arguments</span>
+<a name="ln-201"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">N</span>
+<a name="ln-202"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-203"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
+<a name="ln-204"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>  <span class="kd">::</span> <span class="n">eps</span>
+<a name="ln-205"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-206"></a>            <span class="c">! Result</span>
+<a name="ln-207"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span>                            <span class="kd">::</span> <span class="n">astar</span>
+<a name="ln-208"></a>            <span class="c">! Internals</span>
+<a name="ln-209"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">num</span> <span class="o">=</span> <span class="mi">0</span>
+<a name="ln-210"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">step</span> <span class="o">=</span> <span class="mf">0.7_DP</span>     <span class="c">!! Bracketing method step size   </span>
+<a name="ln-211"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">gam</span> <span class="o">=</span> <span class="mf">1.2_DP</span>      <span class="c">!! Bracketing method expansion parameter   </span>
+<a name="ln-212"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">greduce</span> <span class="o">=</span> <span class="mf">0.2_DP</span>  <span class="c">!! Golden section method reduction factor   </span>
+<a name="ln-213"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">greduce2</span> <span class="o">=</span> <span class="mf">0.1_DP</span> <span class="c">! Secondary golden section method reduction factor   </span>
+<a name="ln-214"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span>                     <span class="c">!! High and low values for 1 - D minimization routines   </span>
+<a name="ln-215"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">a0</span> <span class="o">=</span> <span class="nb">epsilon</span><span class="p">(</span><span class="mf">1.0_DP</span><span class="p">)</span>       <span class="c">!! Initial guess of alpha   </span>
+<a name="ln-216"></a>         
+<a name="ln-217"></a>            <span class="n">alo</span> <span class="o">=</span> <span class="n">a0</span>
+<a name="ln-218"></a>            <span class="k">call </span><span class="n">bracket</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">gam</span><span class="p">,</span> <span class="n">step</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-219"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-220"></a>               <span class="c">!write(*,*) &quot;BFGS bracketing step failed!&quot;</span>
+<a name="ln-221"></a>               <span class="k">return </span>
+<a name="ln-222"></a><span class="k">            end if</span>
+<a name="ln-223"></a><span class="k">            if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">alo</span> <span class="o">-</span> <span class="n">ahi</span><span class="p">)</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-224"></a><span class="k">               </span><span class="n">astar</span> <span class="o">=</span> <span class="n">alo</span>
+<a name="ln-225"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-226"></a>               <span class="k">return </span>
+<a name="ln-227"></a><span class="k">            end if</span>
+<a name="ln-228"></a><span class="k">            call </span><span class="n">golden</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">greduce</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
 <a name="ln-229"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-230"></a>               <span class="c">!write(*,*) &quot;BFGS bracketing step failed!&quot;</span>
+<a name="ln-230"></a>               <span class="c">!write(*,*) &quot;BFGS golden section step failed!&quot;</span>
 <a name="ln-231"></a>               <span class="k">return </span>
 <a name="ln-232"></a><span class="k">            end if</span>
 <a name="ln-233"></a><span class="k">            if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">alo</span> <span class="o">-</span> <span class="n">ahi</span><span class="p">)</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="k">then</span>
@@ -849,362 +841,352 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-235"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
 <a name="ln-236"></a>               <span class="k">return </span>
 <a name="ln-237"></a><span class="k">            end if</span>
-<a name="ln-238"></a><span class="k">            call </span><span class="n">golden</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">greduce</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-238"></a><span class="k">            call </span><span class="n">quadfit</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
 <a name="ln-239"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-240"></a>               <span class="c">!write(*,*) &quot;BFGS golden section step failed!&quot;</span>
+<a name="ln-240"></a>               <span class="c">!write(*,*) &quot;BFGS quadfit failed!&quot;</span>
 <a name="ln-241"></a>               <span class="k">return </span>
 <a name="ln-242"></a><span class="k">            end if</span>
 <a name="ln-243"></a><span class="k">            if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">alo</span> <span class="o">-</span> <span class="n">ahi</span><span class="p">)</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="k">then</span>
 <a name="ln-244"></a><span class="k">               </span><span class="n">astar</span> <span class="o">=</span> <span class="n">alo</span>
 <a name="ln-245"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
 <a name="ln-246"></a>               <span class="k">return </span>
-<a name="ln-247"></a><span class="k">            end if</span>
-<a name="ln-248"></a><span class="k">            call </span><span class="n">quadfit</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-249"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-250"></a>               <span class="c">!write(*,*) &quot;BFGS quadfit failed!&quot;</span>
-<a name="ln-251"></a>               <span class="k">return </span>
-<a name="ln-252"></a><span class="k">            end if</span>
-<a name="ln-253"></a><span class="k">            if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">alo</span> <span class="o">-</span> <span class="n">ahi</span><span class="p">)</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-254"></a><span class="k">               </span><span class="n">astar</span> <span class="o">=</span> <span class="n">alo</span>
-<a name="ln-255"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-256"></a>               <span class="k">return </span>
-<a name="ln-257"></a><span class="k">            end if</span> 
-<a name="ln-258"></a>            <span class="c">! Quadratic fit method won&#39;t converge, so finish off with another golden section   </span>
-<a name="ln-259"></a>            <span class="k">call </span><span class="n">golden</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">greduce2</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-260"></a>            <span class="k">if</span> <span class="p">(.</span><span class="nb">not</span><span class="p">.</span> <span class="n">lerr</span><span class="p">)</span> <span class="n">astar</span> <span class="o">=</span> <span class="p">(</span><span class="n">alo</span> <span class="o">+</span> <span class="n">ahi</span><span class="p">)</span> <span class="o">/</span> <span class="mf">2.0_DP</span>
-<a name="ln-261"></a>            <span class="k">return </span>
-<a name="ln-262"></a><span class="k">         end function </span><span class="n">minimize1D</span>
+<a name="ln-247"></a><span class="k">            end if</span> 
+<a name="ln-248"></a>            <span class="c">! Quadratic fit method won&#39;t converge, so finish off with another golden section   </span>
+<a name="ln-249"></a>            <span class="k">call </span><span class="n">golden</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">greduce2</span><span class="p">,</span> <span class="n">alo</span><span class="p">,</span> <span class="n">ahi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-250"></a>            <span class="k">if</span> <span class="p">(.</span><span class="nb">not</span><span class="p">.</span> <span class="n">lerr</span><span class="p">)</span> <span class="n">astar</span> <span class="o">=</span> <span class="p">(</span><span class="n">alo</span> <span class="o">+</span> <span class="n">ahi</span><span class="p">)</span> <span class="o">/</span> <span class="mf">2.0_DP</span>
+<a name="ln-251"></a>            <span class="k">return </span>
+<a name="ln-252"></a><span class="k">         end function </span><span class="n">minimize1D</span>
+<a name="ln-253"></a>
+<a name="ln-254"></a>
+<a name="ln-255"></a>         <span class="k">function </span><span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">fnew</span><span class="p">)</span>
+<a name="ln-256"></a>            <span class="k">implicit none</span>
+<a name="ln-257"></a>            <span class="c">! Arguments</span>
+<a name="ln-258"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">N</span>
+<a name="ln-259"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-260"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
+<a name="ln-261"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>
+<a name="ln-262"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
 <a name="ln-263"></a>
-<a name="ln-264"></a>
-<a name="ln-265"></a>         <span class="k">function </span><span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> <span class="k">result</span><span class="p">(</span><span class="n">fnew</span><span class="p">)</span>
-<a name="ln-266"></a>            <span class="k">implicit none</span>
-<a name="ln-267"></a>            <span class="c">! Arguments</span>
-<a name="ln-268"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">N</span>
-<a name="ln-269"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-270"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
-<a name="ln-271"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a</span>
-<a name="ln-272"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-273"></a>
-<a name="ln-274"></a>            <span class="c">! Return</span>
-<a name="ln-275"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">fnew</span>
-<a name="ln-276"></a>            <span class="c">! Internals</span>
-<a name="ln-277"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">N</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xnew</span>
-<a name="ln-278"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
-<a name="ln-279"></a>            
-<a name="ln-280"></a>            <span class="n">xnew</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">+</span> <span class="n">a</span> <span class="o">*</span> <span class="n">S</span><span class="p">(:)</span>
-<a name="ln-281"></a>            <span class="n">fnew</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xnew</span><span class="p">(:))</span>
-<a name="ln-282"></a>            <span class="k">select type</span><span class="p">(</span><span class="n">f</span><span class="p">)</span>
-<a name="ln-283"></a>            <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj_err</span><span class="p">)</span>
-<a name="ln-284"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">lerr</span>
-<a name="ln-285"></a>            <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj</span><span class="p">)</span>
-<a name="ln-286"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-287"></a>            <span class="k">end select</span>
-<a name="ln-288"></a><span class="k">            return </span>
-<a name="ln-289"></a><span class="k">         end function </span><span class="n">n2one</span>
-<a name="ln-290"></a>
-<a name="ln-291"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-292"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-293"></a>
-<a name="ln-294"></a>         <span class="k">subroutine </span><span class="n">bracket</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">gam</span><span class="p">,</span> <span class="n">step</span><span class="p">,</span> <span class="n">lo</span><span class="p">,</span> <span class="n">hi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-295"></a>            <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
-<a name="ln-296"></a>            <span class="c">!! This subroutine brackets the minimum.  It recieves as input:</span>
-<a name="ln-297"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
-<a name="ln-298"></a>            <span class="c">!!   x0   :  Array of size N of initial x values</span>
-<a name="ln-299"></a>            <span class="c">!!   S    :  Array of size N that determines the direction of minimization</span>
-<a name="ln-300"></a>            <span class="c">!!   gam  :  expansion parameter</span>
-<a name="ln-301"></a>            <span class="c">!!   step :  step size</span>
-<a name="ln-302"></a>            <span class="c">!!   lo   :  initial guess of lo bracket value</span>
-<a name="ln-303"></a>            <span class="c">!! The outputs include</span>
-<a name="ln-304"></a>            <span class="c">!!   lo   :  lo bracket</span>
-<a name="ln-305"></a>            <span class="c">!!   hi   :  hi bracket</span>
-<a name="ln-306"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
-<a name="ln-307"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-308"></a>            <span class="k">implicit none</span>
-<a name="ln-309"></a>            <span class="c">! Arguments</span>
-<a name="ln-310"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
-<a name="ln-311"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-312"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
-<a name="ln-313"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">gam</span><span class="p">,</span> <span class="n">step</span>
-<a name="ln-314"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lo</span>
-<a name="ln-315"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">hi</span>
-<a name="ln-316"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-317"></a>            <span class="c">! Internals</span>
-<a name="ln-318"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a0</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">atmp</span><span class="p">,</span> <span class="n">da</span>
-<a name="ln-319"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f0</span><span class="p">,</span> <span class="n">f1</span><span class="p">,</span> <span class="n">f2</span>
-<a name="ln-320"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
-<a name="ln-321"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">MAXLOOP</span> <span class="o">=</span> <span class="mi">100</span> <span class="c">! maximum number of loops before method is determined to have failed   </span>
-<a name="ln-322"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">eps</span> <span class="o">=</span> <span class="nb">epsilon</span><span class="p">(</span><span class="n">lo</span><span class="p">)</span> <span class="c">! small number precision to test floating point equality   </span>
-<a name="ln-323"></a>
-<a name="ln-324"></a>            <span class="c">! set up initial bracket points   </span>
-<a name="ln-325"></a>            <span class="n">a0</span> <span class="o">=</span>  <span class="n">lo</span>
-<a name="ln-326"></a>            <span class="n">da</span> <span class="o">=</span> <span class="n">step</span>
-<a name="ln-327"></a>            <span class="n">a1</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">+</span> <span class="n">da</span>
-<a name="ln-328"></a>            <span class="n">a2</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">+</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">da</span>
-<a name="ln-329"></a>            <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-330"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-331"></a><span class="k">            </span><span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-332"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-333"></a><span class="k">            </span><span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-334"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-335"></a>            <span class="c">! loop over bracket method until either min is bracketed method fails   </span>
-<a name="ln-336"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">MAXLOOP</span> 
-<a name="ln-337"></a>               <span class="k">if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&gt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&lt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span>  <span class="c">! Minimum was found   </span>
-<a name="ln-338"></a>                  <span class="n">lo</span> <span class="o">=</span> <span class="n">a0</span>
-<a name="ln-339"></a>                  <span class="n">hi</span> <span class="o">=</span> <span class="n">a2</span>
-<a name="ln-340"></a>                  <span class="k">return </span>
-<a name="ln-341"></a><span class="k">               else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&gt;=</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&gt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Function appears to decrease   </span>
-<a name="ln-342"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
-<a name="ln-343"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
-<a name="ln-344"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-345"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">a2</span>
-<a name="ln-346"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">atmp</span>
-<a name="ln-347"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">f1</span>
-<a name="ln-348"></a>                  <span class="n">f1</span> <span class="o">=</span> <span class="n">f2</span>
-<a name="ln-349"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-350"></a>               <span class="k">else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&lt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&lt;=</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Function appears to increase   </span>
-<a name="ln-351"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
-<a name="ln-352"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
-<a name="ln-353"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-354"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">a0</span>
-<a name="ln-355"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">atmp</span>
-<a name="ln-356"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
-<a name="ln-357"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-358"></a>               <span class="k">else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&lt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&gt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! We are at a peak. Pick the direction that descends the fastest</span>
-<a name="ln-359"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
-<a name="ln-360"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">f2</span> <span class="o">&gt;</span> <span class="n">f0</span><span class="p">)</span> <span class="k">then</span> <span class="c">! LHS is lower than RHS</span>
-<a name="ln-361"></a>                     <span class="n">atmp</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
-<a name="ln-362"></a>                     <span class="n">a0</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-363"></a>                     <span class="n">a1</span> <span class="o">=</span> <span class="n">a2</span>
-<a name="ln-364"></a>                     <span class="n">a2</span> <span class="o">=</span> <span class="n">atmp</span>
-<a name="ln-365"></a>                     <span class="n">f0</span> <span class="o">=</span> <span class="n">f1</span>
-<a name="ln-366"></a>                     <span class="n">f1</span> <span class="o">=</span> <span class="n">f2</span>
-<a name="ln-367"></a>                     <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-368"></a>                  <span class="k">else</span> <span class="c">! RHS is lower than LHS</span>
-<a name="ln-369"></a>                     <span class="n">atmp</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
-<a name="ln-370"></a>                     <span class="n">a2</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-371"></a>                     <span class="n">a1</span> <span class="o">=</span> <span class="n">a0</span>
-<a name="ln-372"></a>                     <span class="n">a0</span> <span class="o">=</span> <span class="n">atmp</span>
-<a name="ln-373"></a>                     <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
-<a name="ln-374"></a>                     <span class="n">f1</span> <span class="o">=</span> <span class="n">f2</span>
-<a name="ln-375"></a>                     <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-376"></a>                  <span class="k">end if</span>
-<a name="ln-377"></a><span class="k">               else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&gt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">f2</span> <span class="o">-</span> <span class="n">f1</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="n">eps</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Decrasging but RHS equal   </span>
-<a name="ln-378"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
-<a name="ln-379"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
-<a name="ln-380"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">atmp</span>
-<a name="ln-381"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-382"></a>               <span class="k">else if</span> <span class="p">((</span><span class="nb">abs</span><span class="p">(</span><span class="n">f0</span> <span class="o">-</span> <span class="n">f1</span><span class="p">)</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&lt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Increasing but LHS equal   </span>
-<a name="ln-383"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
-<a name="ln-384"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
-<a name="ln-385"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">atmp</span>
-<a name="ln-386"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-387"></a>               <span class="k">else</span>  <span class="c">! all values equal. Expand in either direction and try again</span>
-<a name="ln-388"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
-<a name="ln-389"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
-<a name="ln-390"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-391"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span> <span class="c">! An error occurred while evaluating the function</span>
-<a name="ln-392"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-393"></a>               <span class="k">end if</span>
-<a name="ln-394"></a><span class="k">               if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span> <span class="c">! An error occurred while evaluating the function</span>
-<a name="ln-395"></a>            <span class="k">end do</span>
-<a name="ln-396"></a><span class="k">            </span><span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-397"></a>            <span class="k">return</span> <span class="c">! no minimum found   </span>
-<a name="ln-398"></a>         <span class="k">end subroutine </span><span class="n">bracket</span>
-<a name="ln-399"></a>
-<a name="ln-400"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-401"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-402"></a>
-<a name="ln-403"></a>         <span class="k">subroutine </span><span class="n">golden</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">lo</span><span class="p">,</span> <span class="n">hi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> 
-<a name="ln-404"></a>            <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
-<a name="ln-405"></a>            <span class="c">!! This function uses the golden section method to reduce the starting interval lo, hi by some amount sigma.  </span>
-<a name="ln-406"></a>            <span class="c">!! It recieves as input:</span>
-<a name="ln-407"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
-<a name="ln-408"></a>            <span class="c">!!   x0   :  Array of size N of initial x values</span>
-<a name="ln-409"></a>            <span class="c">!!   S    :  Array of size N that determines the direction of minimization</span>
-<a name="ln-410"></a>            <span class="c">!!   gam  :  expansion parameter</span>
-<a name="ln-411"></a>            <span class="c">!!   eps  :  reduction interval in range (0 &lt; sigma &lt; 1) such that:</span>
-<a name="ln-412"></a>            <span class="c">!!             hi(new) - lo(new) = eps * (hi(old) - lo(old))</span>
-<a name="ln-413"></a>            <span class="c">!!   lo   :  initial guess of lo bracket value</span>
-<a name="ln-414"></a>            <span class="c">!! The outputs include</span>
-<a name="ln-415"></a>            <span class="c">!!   lo   :  lo bracket</span>
-<a name="ln-416"></a>            <span class="c">!!   hi   :  hi bracket</span>
-<a name="ln-417"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
-<a name="ln-418"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-419"></a>            <span class="k">implicit none</span>
-<a name="ln-420"></a>            <span class="c">! Arguments</span>
-<a name="ln-421"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
-<a name="ln-422"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-423"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
-<a name="ln-424"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">eps</span>
-<a name="ln-425"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lo</span>
-<a name="ln-426"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">hi</span>
-<a name="ln-427"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-428"></a>            <span class="c">! Internals </span>
-<a name="ln-429"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">tau</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="nb">sqrt</span><span class="p">(</span><span class="mf">5.0_DP</span><span class="p">)</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span>  <span class="c">! Golden section constant   </span>
-<a name="ln-430"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">MAXLOOP</span> <span class="o">=</span> <span class="mi">40</span> <span class="c">! maximum number of loops before method is determined to have failed (unlikely, but could occur if no minimum exists between lo and hi)   </span>
-<a name="ln-431"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i0</span> <span class="c">! Initial interval value   </span>
-<a name="ln-432"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span>
-<a name="ln-433"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f1</span><span class="p">,</span> <span class="n">f2</span>
-<a name="ln-434"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
-<a name="ln-435"></a>
-<a name="ln-436"></a>            <span class="n">i0</span> <span class="o">=</span>  <span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span>
-<a name="ln-437"></a>            <span class="n">a1</span> <span class="o">=</span>  <span class="n">hi</span> <span class="o">-</span> <span class="n">tau</span> <span class="o">*</span> <span class="n">i0</span>
-<a name="ln-438"></a>            <span class="n">a2</span> <span class="o">=</span>  <span class="n">lo</span> <span class="o">+</span> <span class="n">tau</span> <span class="o">*</span> <span class="n">i0</span>
-<a name="ln-439"></a>            <span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-440"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-441"></a><span class="k">            </span><span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-442"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-443"></a><span class="k">            do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">MAXLOOP</span> 
-<a name="ln-444"></a>               <span class="k">if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">((</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span> <span class="o">/</span> <span class="n">i0</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="n">eps</span><span class="p">)</span> <span class="k">return</span> <span class="c">! interval reduced to input amount   </span>
-<a name="ln-445"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">f2</span> <span class="o">&gt;</span> <span class="n">f1</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-446"></a><span class="k">                  </span><span class="n">hi</span> <span class="o">=</span> <span class="n">a2</span>
-<a name="ln-447"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-448"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
-<a name="ln-449"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">hi</span> <span class="o">-</span> <span class="n">tau</span> <span class="o">*</span> <span class="p">(</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span>
-<a name="ln-450"></a>                  <span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-451"></a>               <span class="k">else </span>
-<a name="ln-452"></a><span class="k">                  </span><span class="n">lo</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-453"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">a2</span>
-<a name="ln-454"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
-<a name="ln-455"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">hi</span> <span class="o">-</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">tau</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span>
-<a name="ln-456"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-457"></a>               <span class="k">end if</span>
-<a name="ln-458"></a><span class="k">               if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span>
-<a name="ln-459"></a><span class="k">            end do</span>
-<a name="ln-460"></a><span class="k">            </span><span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-461"></a>            <span class="k">return</span> <span class="c">! search took too many iterations - no minimum found   </span>
-<a name="ln-462"></a>         <span class="k">end subroutine </span><span class="n">golden</span>
-<a name="ln-463"></a>
-<a name="ln-464"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-465"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-466"></a>
-<a name="ln-467"></a>         <span class="k">subroutine </span><span class="n">quadfit</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">lo</span><span class="p">,</span> <span class="n">hi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> 
-<a name="ln-468"></a>            <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
-<a name="ln-469"></a>            <span class="c">!! This function uses a quadratic polynomial fit to locate the minimum of a function</span>
-<a name="ln-470"></a>            <span class="c">!! to some accuracy eps.  It recieves as input:</span>
-<a name="ln-471"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
-<a name="ln-472"></a>            <span class="c">!!   lo    :  low bracket value</span>
-<a name="ln-473"></a>            <span class="c">!!   hi    :  high bracket value</span>
-<a name="ln-474"></a>            <span class="c">!!   eps   :  desired accuracy of final minimum location</span>
-<a name="ln-475"></a>            <span class="c">!! The outputs include</span>
-<a name="ln-476"></a>            <span class="c">!!   lo   :  final minimum location</span>
-<a name="ln-477"></a>            <span class="c">!!   hi   :  final minimum location</span>
-<a name="ln-478"></a>            <span class="c">!! Notes: Uses the ieee_exceptions intrinsic module to allow for graceful failure due to floating point exceptions, which won&#39;t terminate the run.</span>
-<a name="ln-479"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
-<a name="ln-480"></a>            <span class="k">implicit none</span>
-<a name="ln-481"></a>            <span class="c">! Arguments</span>
-<a name="ln-482"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
-<a name="ln-483"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
-<a name="ln-484"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
-<a name="ln-485"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">eps</span>
-<a name="ln-486"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lo</span>
-<a name="ln-487"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">hi</span>
-<a name="ln-488"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
-<a name="ln-489"></a>            <span class="c">! Internals </span>
-<a name="ln-490"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">MAXLOOP</span> <span class="o">=</span> <span class="mi">20</span> <span class="c">! maximum number of loops before method is determined to have failed.   </span>
-<a name="ln-491"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">a3</span><span class="p">,</span> <span class="n">astar</span>   <span class="c">! three points for the polynomial fit and polynomial minimum   </span>
-<a name="ln-492"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f1</span><span class="p">,</span> <span class="n">f2</span><span class="p">,</span> <span class="n">f3</span><span class="p">,</span> <span class="n">fstar</span>   <span class="c">! three function values for the polynomial and polynomial minimum   </span>
-<a name="ln-493"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="kd">::</span> <span class="n">row_1</span><span class="p">,</span> <span class="n">row_2</span><span class="p">,</span> <span class="n">row_3</span><span class="p">,</span> <span class="n">rhs</span><span class="p">,</span> <span class="n">soln</span>        <span class="c">! matrix for 3 equation solver (gaussian elimination)   </span>
-<a name="ln-494"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="mi">3</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lhs</span>
-<a name="ln-495"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">d1</span><span class="p">,</span> <span class="n">d2</span><span class="p">,</span> <span class="n">d3</span><span class="p">,</span> <span class="n">aold</span><span class="p">,</span> <span class="n">denom</span><span class="p">,</span> <span class="n">errval</span>
-<a name="ln-496"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
-<a name="ln-497"></a>
-<a name="ln-498"></a>            <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
-<a name="ln-499"></a>            <span class="c">! Get initial a1, a2, a3 values   </span>
-<a name="ln-500"></a>            <span class="n">a1</span> <span class="o">=</span>  <span class="n">lo</span>
-<a name="ln-501"></a>            <span class="n">a2</span> <span class="o">=</span>  <span class="n">lo</span> <span class="o">+</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span>
-<a name="ln-502"></a>            <span class="n">a3</span> <span class="o">=</span>  <span class="n">hi</span>
-<a name="ln-503"></a>            <span class="n">aold</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-504"></a>            <span class="n">astar</span> <span class="o">=</span> <span class="n">a2</span>
-<a name="ln-505"></a>            <span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-506"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-507"></a><span class="k">            </span><span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-508"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-509"></a><span class="k">            </span><span class="n">f3</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a3</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-510"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-511"></a><span class="k">            do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">MAXLOOP</span> 
-<a name="ln-512"></a>               <span class="c">! check to see if convergence is reached and exit   </span>
-<a name="ln-513"></a>               <span class="n">errval</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">((</span><span class="n">astar</span> <span class="o">-</span> <span class="n">aold</span><span class="p">)</span> <span class="o">/</span> <span class="n">astar</span><span class="p">)</span>
-<a name="ln-514"></a>               <span class="k">call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
-<a name="ln-515"></a>               <span class="k">if</span> <span class="p">(</span><span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-516"></a>                  <span class="c">!write(*,*) &#39;quadfit fpe&#39;</span>
-<a name="ln-517"></a>                  <span class="c">!write(*,*) &#39;aold : &#39;,aold</span>
-<a name="ln-518"></a>                  <span class="c">!write(*,*) &#39;astar: &#39;,astar</span>
-<a name="ln-519"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-520"></a>                  <span class="k">exit</span>
-<a name="ln-521"></a><span class="k">               end if</span>
-<a name="ln-522"></a><span class="k">               if</span> <span class="p">(</span><span class="n">errval</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-523"></a><span class="k">                  </span><span class="n">lo</span> <span class="o">=</span> <span class="n">astar</span>
-<a name="ln-524"></a>                  <span class="n">hi</span> <span class="o">=</span> <span class="n">astar</span>
-<a name="ln-525"></a>                  <span class="k">exit</span>
-<a name="ln-526"></a><span class="k">               end if</span>
-<a name="ln-527"></a>               <span class="c">! Set up system for gaussian elimination equation solver   </span>
-<a name="ln-528"></a>               <span class="n">row_1</span> <span class="o">=</span> <span class="p">[</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a1</span><span class="o">**</span><span class="mi">2</span><span class="p">]</span>
-<a name="ln-529"></a>               <span class="n">row_2</span> <span class="o">=</span> <span class="p">[</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">a2</span><span class="o">**</span><span class="mi">2</span><span class="p">]</span>
-<a name="ln-530"></a>               <span class="n">row_3</span> <span class="o">=</span> <span class="p">[</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">a3</span><span class="p">,</span> <span class="n">a3</span><span class="o">**</span><span class="mi">2</span><span class="p">]</span>
-<a name="ln-531"></a>               <span class="n">rhs</span> <span class="o">=</span> <span class="p">[</span><span class="n">f1</span><span class="p">,</span> <span class="n">f2</span><span class="p">,</span> <span class="n">f3</span><span class="p">]</span>
-<a name="ln-532"></a>               <span class="n">lhs</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="p">:)</span> <span class="o">=</span> <span class="n">row_1</span>
-<a name="ln-533"></a>               <span class="n">lhs</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="p">:)</span> <span class="o">=</span> <span class="n">row_2</span>
-<a name="ln-534"></a>               <span class="n">lhs</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="p">:)</span> <span class="o">=</span> <span class="n">row_3</span>
-<a name="ln-535"></a>               <span class="c">! Solve system of equations   </span>
-<a name="ln-536"></a>               <span class="n">soln</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">util_solve_linear_system</span><span class="p">(</span><span class="n">lhs</span><span class="p">,</span> <span class="n">rhs</span><span class="p">,</span> <span class="mi">3</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-537"></a>               <span class="k">call </span><span class="n">ieee_set_flag</span><span class="p">(</span><span class="n">ieee_all</span><span class="p">,</span> <span class="p">.</span><span class="n">false</span><span class="p">.)</span> <span class="c">! Set all flags back to quiet</span>
-<a name="ln-538"></a>               <span class="k">call </span><span class="n">ieee_set_halting_mode</span><span class="p">(</span><span class="n">ieee_divide_by_zero</span><span class="p">,</span> <span class="p">.</span><span class="n">false</span><span class="p">.)</span>
-<a name="ln-539"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-540"></a>                  <span class="c">!write(*,*) &#39;quadfit fpe:&#39;</span>
-<a name="ln-541"></a>                  <span class="c">!write(*,*) &#39;util_solve_linear_system failed&#39;</span>
-<a name="ln-542"></a>                  <span class="k">exit</span>
-<a name="ln-543"></a><span class="k">               end if</span>
-<a name="ln-544"></a><span class="k">               </span><span class="n">aold</span> <span class="o">=</span> <span class="n">astar</span>
-<a name="ln-545"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">soln</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">==</span> <span class="n">soln</span><span class="p">(</span><span class="mi">3</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Handles the case where they are both 0. 0/0 is an unhandled exception</span>
-<a name="ln-546"></a>                  <span class="n">astar</span> <span class="o">=</span> <span class="o">-</span><span class="mf">0.5_DP</span>
-<a name="ln-547"></a>               <span class="k">else</span>
-<a name="ln-548"></a><span class="k">                  </span><span class="n">astar</span> <span class="o">=</span>  <span class="o">-</span><span class="n">soln</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">soln</span><span class="p">(</span><span class="mi">3</span><span class="p">))</span>
-<a name="ln-549"></a>               <span class="k">end if</span>
-<a name="ln-550"></a><span class="k">               call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
-<a name="ln-551"></a>               <span class="k">if</span> <span class="p">(</span><span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">))</span> <span class="k">then</span>
-<a name="ln-552"></a>                  <span class="c">!write(*,*) &#39;quadfit fpe&#39;</span>
-<a name="ln-553"></a>                  <span class="c">!write(*,*) &#39;soln(2:3): &#39;,soln(2:3)</span>
-<a name="ln-554"></a>                  <span class="c">!write(*,*) &#39;a1, a2, a3&#39;</span>
-<a name="ln-555"></a>                  <span class="c">!write(*,*) a1, a2, a3</span>
-<a name="ln-556"></a>                  <span class="c">!write(*,*) &#39;f1, f2, f3&#39;</span>
-<a name="ln-557"></a>                  <span class="c">!write(*,*) f1, f2, f3</span>
-<a name="ln-558"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
-<a name="ln-559"></a>                  <span class="k">exit</span>
-<a name="ln-560"></a><span class="k">               end if</span>
-<a name="ln-561"></a><span class="k">               </span><span class="n">fstar</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">astar</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
-<a name="ln-562"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span>
-<a name="ln-563"></a>               <span class="c">! keep the three closest a values to astar and discard the fourth  </span>
-<a name="ln-564"></a>               <span class="n">d1</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">astar</span><span class="p">)</span>
-<a name="ln-565"></a>               <span class="n">d2</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">(</span><span class="n">a2</span> <span class="o">-</span> <span class="n">astar</span><span class="p">)</span>
-<a name="ln-566"></a>               <span class="n">d3</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">(</span><span class="n">a3</span> <span class="o">-</span> <span class="n">astar</span><span class="p">)</span>
-<a name="ln-567"></a>
-<a name="ln-568"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">d1</span> <span class="o">&gt;</span> <span class="n">d2</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-569"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">d1</span> <span class="o">&gt;</span> <span class="n">d3</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-570"></a><span class="k">                     </span><span class="n">f1</span> <span class="o">=</span> <span class="n">fstar</span>
-<a name="ln-571"></a>                     <span class="n">a1</span> <span class="o">=</span> <span class="n">astar</span>
-<a name="ln-572"></a>                  <span class="k">else if</span> <span class="p">(</span><span class="n">d3</span> <span class="o">&gt;</span> <span class="n">d2</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-573"></a><span class="k">                     </span><span class="n">f3</span> <span class="o">=</span> <span class="n">fstar</span>
-<a name="ln-574"></a>                     <span class="n">a3</span> <span class="o">=</span> <span class="n">astar</span>
-<a name="ln-575"></a>                  <span class="k">end if</span>
-<a name="ln-576"></a><span class="k">               else </span>
-<a name="ln-577"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">d2</span> <span class="o">&gt;</span> <span class="n">d3</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-578"></a><span class="k">                     </span><span class="n">f2</span> <span class="o">=</span> <span class="n">fstar</span>
-<a name="ln-579"></a>                     <span class="n">a2</span> <span class="o">=</span> <span class="n">astar</span>
-<a name="ln-580"></a>                  <span class="k">else if</span> <span class="p">(</span><span class="n">d3</span> <span class="o">&gt;</span> <span class="n">d1</span><span class="p">)</span> <span class="k">then</span>
-<a name="ln-581"></a><span class="k">                     </span><span class="n">f3</span> <span class="o">=</span> <span class="n">fstar</span>
-<a name="ln-582"></a>                     <span class="n">a3</span> <span class="o">=</span> <span class="n">astar</span>
-<a name="ln-583"></a>                  <span class="k">end if</span>
-<a name="ln-584"></a><span class="k">               end if</span>
-<a name="ln-585"></a><span class="k">            end do</span>
-<a name="ln-586"></a><span class="k">            if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-587"></a><span class="k">            </span><span class="n">lo</span> <span class="o">=</span> <span class="n">a1</span>
-<a name="ln-588"></a>            <span class="n">hi</span> <span class="o">=</span> <span class="n">a3</span>
-<a name="ln-589"></a>            <span class="k">return </span>
-<a name="ln-590"></a><span class="k">         end subroutine </span><span class="n">quadfit</span>
-<a name="ln-591"></a>
-<a name="ln-592"></a>   <span class="k">end function </span><span class="n">util_minimize_bfgs</span>
-<a name="ln-593"></a><span class="k">end submodule </span><span class="n">s_util_minimize_bfgs</span>
+<a name="ln-264"></a>            <span class="c">! Return</span>
+<a name="ln-265"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">fnew</span>
+<a name="ln-266"></a>            <span class="c">! Internals</span>
+<a name="ln-267"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="n">N</span><span class="p">)</span> <span class="kd">::</span> <span class="n">xnew</span>
+<a name="ln-268"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
+<a name="ln-269"></a>            
+<a name="ln-270"></a>            <span class="n">xnew</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">x0</span><span class="p">(:)</span> <span class="o">+</span> <span class="n">a</span> <span class="o">*</span> <span class="n">S</span><span class="p">(:)</span>
+<a name="ln-271"></a>            <span class="n">fnew</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">eval</span><span class="p">(</span><span class="n">xnew</span><span class="p">(:))</span>
+<a name="ln-272"></a>            <span class="k">select type</span><span class="p">(</span><span class="n">f</span><span class="p">)</span>
+<a name="ln-273"></a>            <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj_err</span><span class="p">)</span>
+<a name="ln-274"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="n">f</span><span class="p">%</span><span class="n">lerr</span>
+<a name="ln-275"></a>            <span class="k">class is</span> <span class="p">(</span><span class="n">lambda_obj</span><span class="p">)</span>
+<a name="ln-276"></a>               <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-277"></a>            <span class="k">end select</span>
+<a name="ln-278"></a><span class="k">            return </span>
+<a name="ln-279"></a><span class="k">         end function </span><span class="n">n2one</span>
+<a name="ln-280"></a>
+<a name="ln-281"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-282"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-283"></a>
+<a name="ln-284"></a>         <span class="k">subroutine </span><span class="n">bracket</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">gam</span><span class="p">,</span> <span class="n">step</span><span class="p">,</span> <span class="n">lo</span><span class="p">,</span> <span class="n">hi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-285"></a>            <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
+<a name="ln-286"></a>            <span class="c">!! This subroutine brackets the minimum.  It recieves as input:</span>
+<a name="ln-287"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
+<a name="ln-288"></a>            <span class="c">!!   x0   :  Array of size N of initial x values</span>
+<a name="ln-289"></a>            <span class="c">!!   S    :  Array of size N that determines the direction of minimization</span>
+<a name="ln-290"></a>            <span class="c">!!   gam  :  expansion parameter</span>
+<a name="ln-291"></a>            <span class="c">!!   step :  step size</span>
+<a name="ln-292"></a>            <span class="c">!!   lo   :  initial guess of lo bracket value</span>
+<a name="ln-293"></a>            <span class="c">!! The outputs include</span>
+<a name="ln-294"></a>            <span class="c">!!   lo   :  lo bracket</span>
+<a name="ln-295"></a>            <span class="c">!!   hi   :  hi bracket</span>
+<a name="ln-296"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
+<a name="ln-297"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-298"></a>            <span class="k">implicit none</span>
+<a name="ln-299"></a>            <span class="c">! Arguments</span>
+<a name="ln-300"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
+<a name="ln-301"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-302"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
+<a name="ln-303"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">gam</span><span class="p">,</span> <span class="n">step</span>
+<a name="ln-304"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lo</span>
+<a name="ln-305"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">hi</span>
+<a name="ln-306"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-307"></a>            <span class="c">! Internals</span>
+<a name="ln-308"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a0</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">atmp</span><span class="p">,</span> <span class="n">da</span>
+<a name="ln-309"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f0</span><span class="p">,</span> <span class="n">f1</span><span class="p">,</span> <span class="n">f2</span>
+<a name="ln-310"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
+<a name="ln-311"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">MAXLOOP</span> <span class="o">=</span> <span class="mi">100</span> <span class="c">! maximum number of loops before method is determined to have failed   </span>
+<a name="ln-312"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">eps</span> <span class="o">=</span> <span class="nb">epsilon</span><span class="p">(</span><span class="n">lo</span><span class="p">)</span> <span class="c">! small number precision to test floating point equality   </span>
+<a name="ln-313"></a>
+<a name="ln-314"></a>            <span class="c">! set up initial bracket points   </span>
+<a name="ln-315"></a>            <span class="n">a0</span> <span class="o">=</span>  <span class="n">lo</span>
+<a name="ln-316"></a>            <span class="n">da</span> <span class="o">=</span> <span class="n">step</span>
+<a name="ln-317"></a>            <span class="n">a1</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">+</span> <span class="n">da</span>
+<a name="ln-318"></a>            <span class="n">a2</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">+</span> <span class="mi">2</span> <span class="o">*</span> <span class="n">da</span>
+<a name="ln-319"></a>            <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-320"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-321"></a><span class="k">            </span><span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-322"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-323"></a><span class="k">            </span><span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-324"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-325"></a>            <span class="c">! loop over bracket method until either min is bracketed method fails   </span>
+<a name="ln-326"></a>            <span class="k">do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">MAXLOOP</span> 
+<a name="ln-327"></a>               <span class="k">if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&gt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&lt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span>  <span class="c">! Minimum was found   </span>
+<a name="ln-328"></a>                  <span class="n">lo</span> <span class="o">=</span> <span class="n">a0</span>
+<a name="ln-329"></a>                  <span class="n">hi</span> <span class="o">=</span> <span class="n">a2</span>
+<a name="ln-330"></a>                  <span class="k">return </span>
+<a name="ln-331"></a><span class="k">               else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&gt;=</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&gt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Function appears to decrease   </span>
+<a name="ln-332"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
+<a name="ln-333"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
+<a name="ln-334"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-335"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">a2</span>
+<a name="ln-336"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">atmp</span>
+<a name="ln-337"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">f1</span>
+<a name="ln-338"></a>                  <span class="n">f1</span> <span class="o">=</span> <span class="n">f2</span>
+<a name="ln-339"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-340"></a>               <span class="k">else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&lt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&lt;=</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Function appears to increase   </span>
+<a name="ln-341"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
+<a name="ln-342"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
+<a name="ln-343"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-344"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">a0</span>
+<a name="ln-345"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">atmp</span>
+<a name="ln-346"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
+<a name="ln-347"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-348"></a>               <span class="k">else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&lt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&gt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! We are at a peak. Pick the direction that descends the fastest</span>
+<a name="ln-349"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
+<a name="ln-350"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">f2</span> <span class="o">&gt;</span> <span class="n">f0</span><span class="p">)</span> <span class="k">then</span> <span class="c">! LHS is lower than RHS</span>
+<a name="ln-351"></a>                     <span class="n">atmp</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
+<a name="ln-352"></a>                     <span class="n">a0</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-353"></a>                     <span class="n">a1</span> <span class="o">=</span> <span class="n">a2</span>
+<a name="ln-354"></a>                     <span class="n">a2</span> <span class="o">=</span> <span class="n">atmp</span>
+<a name="ln-355"></a>                     <span class="n">f0</span> <span class="o">=</span> <span class="n">f1</span>
+<a name="ln-356"></a>                     <span class="n">f1</span> <span class="o">=</span> <span class="n">f2</span>
+<a name="ln-357"></a>                     <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-358"></a>                  <span class="k">else</span> <span class="c">! RHS is lower than LHS</span>
+<a name="ln-359"></a>                     <span class="n">atmp</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
+<a name="ln-360"></a>                     <span class="n">a2</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-361"></a>                     <span class="n">a1</span> <span class="o">=</span> <span class="n">a0</span>
+<a name="ln-362"></a>                     <span class="n">a0</span> <span class="o">=</span> <span class="n">atmp</span>
+<a name="ln-363"></a>                     <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
+<a name="ln-364"></a>                     <span class="n">f1</span> <span class="o">=</span> <span class="n">f2</span>
+<a name="ln-365"></a>                     <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-366"></a>                  <span class="k">end if</span>
+<a name="ln-367"></a><span class="k">               else if</span> <span class="p">((</span><span class="n">f0</span> <span class="o">&gt;</span> <span class="n">f1</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="nb">abs</span><span class="p">(</span><span class="n">f2</span> <span class="o">-</span> <span class="n">f1</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="n">eps</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Decrasging but RHS equal   </span>
+<a name="ln-368"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
+<a name="ln-369"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
+<a name="ln-370"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">atmp</span>
+<a name="ln-371"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-372"></a>               <span class="k">else if</span> <span class="p">((</span><span class="nb">abs</span><span class="p">(</span><span class="n">f0</span> <span class="o">-</span> <span class="n">f1</span><span class="p">)</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="p">.</span><span class="nb">and</span><span class="p">.</span> <span class="p">(</span><span class="n">f1</span> <span class="o">&lt;</span> <span class="n">f2</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Increasing but LHS equal   </span>
+<a name="ln-373"></a>                  <span class="n">da</span> <span class="o">=</span> <span class="n">da</span> <span class="o">*</span> <span class="n">gam</span>
+<a name="ln-374"></a>                  <span class="n">atmp</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
+<a name="ln-375"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">atmp</span>
+<a name="ln-376"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-377"></a>               <span class="k">else</span>  <span class="c">! all values equal. Expand in either direction and try again</span>
+<a name="ln-378"></a>                  <span class="n">a0</span> <span class="o">=</span> <span class="n">a0</span> <span class="o">-</span> <span class="n">da</span>
+<a name="ln-379"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">a2</span> <span class="o">+</span> <span class="n">da</span>
+<a name="ln-380"></a>                  <span class="n">f0</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a0</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-381"></a>                  <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span> <span class="c">! An error occurred while evaluating the function</span>
+<a name="ln-382"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-383"></a>               <span class="k">end if</span>
+<a name="ln-384"></a><span class="k">               if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span> <span class="c">! An error occurred while evaluating the function</span>
+<a name="ln-385"></a>            <span class="k">end do</span>
+<a name="ln-386"></a><span class="k">            </span><span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-387"></a>            <span class="k">return</span> <span class="c">! no minimum found   </span>
+<a name="ln-388"></a>         <span class="k">end subroutine </span><span class="n">bracket</span>
+<a name="ln-389"></a>
+<a name="ln-390"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-391"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-392"></a>
+<a name="ln-393"></a>         <span class="k">subroutine </span><span class="n">golden</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">lo</span><span class="p">,</span> <span class="n">hi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> 
+<a name="ln-394"></a>            <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
+<a name="ln-395"></a>            <span class="c">!! This function uses the golden section method to reduce the starting interval lo, hi by some amount sigma.  </span>
+<a name="ln-396"></a>            <span class="c">!! It recieves as input:</span>
+<a name="ln-397"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
+<a name="ln-398"></a>            <span class="c">!!   x0   :  Array of size N of initial x values</span>
+<a name="ln-399"></a>            <span class="c">!!   S    :  Array of size N that determines the direction of minimization</span>
+<a name="ln-400"></a>            <span class="c">!!   gam  :  expansion parameter</span>
+<a name="ln-401"></a>            <span class="c">!!   eps  :  reduction interval in range (0 &lt; sigma &lt; 1) such that:</span>
+<a name="ln-402"></a>            <span class="c">!!             hi(new) - lo(new) = eps * (hi(old) - lo(old))</span>
+<a name="ln-403"></a>            <span class="c">!!   lo   :  initial guess of lo bracket value</span>
+<a name="ln-404"></a>            <span class="c">!! The outputs include</span>
+<a name="ln-405"></a>            <span class="c">!!   lo   :  lo bracket</span>
+<a name="ln-406"></a>            <span class="c">!!   hi   :  hi bracket</span>
+<a name="ln-407"></a>            <span class="c">!!   lerr : .true. if an error occurred. Otherwise returns .false.</span>
+<a name="ln-408"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-409"></a>            <span class="k">implicit none</span>
+<a name="ln-410"></a>            <span class="c">! Arguments</span>
+<a name="ln-411"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
+<a name="ln-412"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-413"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
+<a name="ln-414"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">eps</span>
+<a name="ln-415"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lo</span>
+<a name="ln-416"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">hi</span>
+<a name="ln-417"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-418"></a>            <span class="c">! Internals </span>
+<a name="ln-419"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">tau</span> <span class="o">=</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="nb">sqrt</span><span class="p">(</span><span class="mf">5.0_DP</span><span class="p">)</span> <span class="o">-</span> <span class="mf">1.0_DP</span><span class="p">)</span>  <span class="c">! Golden section constant   </span>
+<a name="ln-420"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">MAXLOOP</span> <span class="o">=</span> <span class="mi">40</span> <span class="c">! maximum number of loops before method is determined to have failed (unlikely, but could occur if no minimum exists between lo and hi)   </span>
+<a name="ln-421"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i0</span> <span class="c">! Initial interval value   </span>
+<a name="ln-422"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span>
+<a name="ln-423"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f1</span><span class="p">,</span> <span class="n">f2</span>
+<a name="ln-424"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span><span class="p">,</span> <span class="n">j</span>
+<a name="ln-425"></a>
+<a name="ln-426"></a>            <span class="n">i0</span> <span class="o">=</span>  <span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span>
+<a name="ln-427"></a>            <span class="n">a1</span> <span class="o">=</span>  <span class="n">hi</span> <span class="o">-</span> <span class="n">tau</span> <span class="o">*</span> <span class="n">i0</span>
+<a name="ln-428"></a>            <span class="n">a2</span> <span class="o">=</span>  <span class="n">lo</span> <span class="o">+</span> <span class="n">tau</span> <span class="o">*</span> <span class="n">i0</span>
+<a name="ln-429"></a>            <span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-430"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-431"></a><span class="k">            </span><span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-432"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-433"></a><span class="k">            do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">MAXLOOP</span> 
+<a name="ln-434"></a>               <span class="k">if</span> <span class="p">(</span><span class="nb">abs</span><span class="p">((</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span> <span class="o">/</span> <span class="n">i0</span><span class="p">)</span> <span class="o">&lt;=</span> <span class="n">eps</span><span class="p">)</span> <span class="k">return</span> <span class="c">! interval reduced to input amount   </span>
+<a name="ln-435"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">f2</span> <span class="o">&gt;</span> <span class="n">f1</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-436"></a><span class="k">                  </span><span class="n">hi</span> <span class="o">=</span> <span class="n">a2</span>
+<a name="ln-437"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-438"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
+<a name="ln-439"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">hi</span> <span class="o">-</span> <span class="n">tau</span> <span class="o">*</span> <span class="p">(</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span>
+<a name="ln-440"></a>                  <span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-441"></a>               <span class="k">else </span>
+<a name="ln-442"></a><span class="k">                  </span><span class="n">lo</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-443"></a>                  <span class="n">a1</span> <span class="o">=</span> <span class="n">a2</span>
+<a name="ln-444"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">f1</span>
+<a name="ln-445"></a>                  <span class="n">a2</span> <span class="o">=</span> <span class="n">hi</span> <span class="o">-</span> <span class="p">(</span><span class="mf">1.0_DP</span> <span class="o">-</span> <span class="n">tau</span><span class="p">)</span> <span class="o">*</span> <span class="p">(</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span>
+<a name="ln-446"></a>                  <span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-447"></a>               <span class="k">end if</span>
+<a name="ln-448"></a><span class="k">               if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span>
+<a name="ln-449"></a><span class="k">            end do</span>
+<a name="ln-450"></a><span class="k">            </span><span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-451"></a>            <span class="k">return</span> <span class="c">! search took too many iterations - no minimum found   </span>
+<a name="ln-452"></a>         <span class="k">end subroutine </span><span class="n">golden</span>
+<a name="ln-453"></a>
+<a name="ln-454"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-455"></a>         <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-456"></a>
+<a name="ln-457"></a>         <span class="k">subroutine </span><span class="n">quadfit</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">eps</span><span class="p">,</span> <span class="n">lo</span><span class="p">,</span> <span class="n">hi</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span> 
+<a name="ln-458"></a>            <span class="c">! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - </span>
+<a name="ln-459"></a>            <span class="c">!! This function uses a quadratic polynomial fit to locate the minimum of a function</span>
+<a name="ln-460"></a>            <span class="c">!! to some accuracy eps.  It recieves as input:</span>
+<a name="ln-461"></a>            <span class="c">!!   f%eval(x) : lambda function object containing the objective function as the eval metho</span>
+<a name="ln-462"></a>            <span class="c">!!   lo    :  low bracket value</span>
+<a name="ln-463"></a>            <span class="c">!!   hi    :  high bracket value</span>
+<a name="ln-464"></a>            <span class="c">!!   eps   :  desired accuracy of final minimum location</span>
+<a name="ln-465"></a>            <span class="c">!! The outputs include</span>
+<a name="ln-466"></a>            <span class="c">!!   lo   :  final minimum location</span>
+<a name="ln-467"></a>            <span class="c">!!   hi   :  final minimum location</span>
+<a name="ln-468"></a>            <span class="c">!! Notes: Uses the ieee_exceptions intrinsic module to allow for graceful failure due to floating point exceptions, which won&#39;t terminate the run.</span>
+<a name="ln-469"></a>            <span class="c">!! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  -   </span>
+<a name="ln-470"></a>            <span class="k">implicit none</span>
+<a name="ln-471"></a>            <span class="c">! Arguments</span>
+<a name="ln-472"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span>           <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">N</span>
+<a name="ln-473"></a>            <span class="k">class</span><span class="p">(</span><span class="n">lambda_obj</span><span class="p">),</span>      <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f</span>
+<a name="ln-474"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(:),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span>
+<a name="ln-475"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">eps</span>
+<a name="ln-476"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lo</span>
+<a name="ln-477"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>               <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">hi</span>
+<a name="ln-478"></a>            <span class="kt">logical</span><span class="p">,</span>                <span class="k">intent</span><span class="p">(</span><span class="n">out</span><span class="p">)</span>   <span class="kd">::</span> <span class="n">lerr</span>
+<a name="ln-479"></a>            <span class="c">! Internals </span>
+<a name="ln-480"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">),</span> <span class="k">parameter</span> <span class="kd">::</span> <span class="n">MAXLOOP</span> <span class="o">=</span> <span class="mi">20</span> <span class="c">! maximum number of loops before method is determined to have failed.   </span>
+<a name="ln-481"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">a3</span><span class="p">,</span> <span class="n">astar</span>   <span class="c">! three points for the polynomial fit and polynomial minimum   </span>
+<a name="ln-482"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">f1</span><span class="p">,</span> <span class="n">f2</span><span class="p">,</span> <span class="n">f3</span><span class="p">,</span> <span class="n">fstar</span>   <span class="c">! three function values for the polynomial and polynomial minimum   </span>
+<a name="ln-483"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="mi">3</span><span class="p">)</span> <span class="kd">::</span> <span class="n">row_1</span><span class="p">,</span> <span class="n">row_2</span><span class="p">,</span> <span class="n">row_3</span><span class="p">,</span> <span class="n">rhs</span><span class="p">,</span> <span class="n">soln</span>        <span class="c">! matrix for 3 equation solver (gaussian elimination)   </span>
+<a name="ln-484"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span> <span class="k">dimension</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span><span class="mi">3</span><span class="p">)</span> <span class="kd">::</span> <span class="n">lhs</span>
+<a name="ln-485"></a>            <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">)</span> <span class="kd">::</span> <span class="n">d1</span><span class="p">,</span> <span class="n">d2</span><span class="p">,</span> <span class="n">d3</span><span class="p">,</span> <span class="n">aold</span><span class="p">,</span> <span class="n">denom</span><span class="p">,</span> <span class="n">errval</span>
+<a name="ln-486"></a>            <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span> <span class="kd">::</span> <span class="n">i</span>
+<a name="ln-487"></a>
+<a name="ln-488"></a>            <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">false</span><span class="p">.</span>
+<a name="ln-489"></a>            <span class="c">! Get initial a1, a2, a3 values   </span>
+<a name="ln-490"></a>            <span class="n">a1</span> <span class="o">=</span>  <span class="n">lo</span>
+<a name="ln-491"></a>            <span class="n">a2</span> <span class="o">=</span>  <span class="n">lo</span> <span class="o">+</span> <span class="mf">0.5_DP</span> <span class="o">*</span> <span class="p">(</span><span class="n">hi</span> <span class="o">-</span> <span class="n">lo</span><span class="p">)</span>
+<a name="ln-492"></a>            <span class="n">a3</span> <span class="o">=</span>  <span class="n">hi</span>
+<a name="ln-493"></a>            <span class="n">aold</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-494"></a>            <span class="n">astar</span> <span class="o">=</span> <span class="n">a2</span>
+<a name="ln-495"></a>            <span class="n">f1</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-496"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-497"></a><span class="k">            </span><span class="n">f2</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-498"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-499"></a><span class="k">            </span><span class="n">f3</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">a3</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-500"></a>            <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-501"></a><span class="k">            do </span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">,</span> <span class="n">MAXLOOP</span> 
+<a name="ln-502"></a>               <span class="c">! check to see if convergence is reached and exit   </span>
+<a name="ln-503"></a>               <span class="n">errval</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">((</span><span class="n">astar</span> <span class="o">-</span> <span class="n">aold</span><span class="p">)</span> <span class="o">/</span> <span class="n">astar</span><span class="p">)</span>
+<a name="ln-504"></a>               <span class="k">call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
+<a name="ln-505"></a>               <span class="k">if</span> <span class="p">(</span><span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-506"></a>                  <span class="c">!write(*,*) &#39;quadfit fpe&#39;</span>
+<a name="ln-507"></a>                  <span class="c">!write(*,*) &#39;aold : &#39;,aold</span>
+<a name="ln-508"></a>                  <span class="c">!write(*,*) &#39;astar: &#39;,astar</span>
+<a name="ln-509"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-510"></a>                  <span class="k">exit</span>
+<a name="ln-511"></a><span class="k">               end if</span>
+<a name="ln-512"></a><span class="k">               if</span> <span class="p">(</span><span class="n">errval</span> <span class="o">&lt;</span> <span class="n">eps</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-513"></a><span class="k">                  </span><span class="n">lo</span> <span class="o">=</span> <span class="n">astar</span>
+<a name="ln-514"></a>                  <span class="n">hi</span> <span class="o">=</span> <span class="n">astar</span>
+<a name="ln-515"></a>                  <span class="k">exit</span>
+<a name="ln-516"></a><span class="k">               end if</span>
+<a name="ln-517"></a>               <span class="c">! Set up system for gaussian elimination equation solver   </span>
+<a name="ln-518"></a>               <span class="n">row_1</span> <span class="o">=</span> <span class="p">[</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">a1</span><span class="p">,</span> <span class="n">a1</span><span class="o">**</span><span class="mi">2</span><span class="p">]</span>
+<a name="ln-519"></a>               <span class="n">row_2</span> <span class="o">=</span> <span class="p">[</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">a2</span><span class="p">,</span> <span class="n">a2</span><span class="o">**</span><span class="mi">2</span><span class="p">]</span>
+<a name="ln-520"></a>               <span class="n">row_3</span> <span class="o">=</span> <span class="p">[</span><span class="mf">1.0_DP</span><span class="p">,</span> <span class="n">a3</span><span class="p">,</span> <span class="n">a3</span><span class="o">**</span><span class="mi">2</span><span class="p">]</span>
+<a name="ln-521"></a>               <span class="n">rhs</span> <span class="o">=</span> <span class="p">[</span><span class="n">f1</span><span class="p">,</span> <span class="n">f2</span><span class="p">,</span> <span class="n">f3</span><span class="p">]</span>
+<a name="ln-522"></a>               <span class="n">lhs</span><span class="p">(</span><span class="mi">1</span><span class="p">,</span> <span class="p">:)</span> <span class="o">=</span> <span class="n">row_1</span>
+<a name="ln-523"></a>               <span class="n">lhs</span><span class="p">(</span><span class="mi">2</span><span class="p">,</span> <span class="p">:)</span> <span class="o">=</span> <span class="n">row_2</span>
+<a name="ln-524"></a>               <span class="n">lhs</span><span class="p">(</span><span class="mi">3</span><span class="p">,</span> <span class="p">:)</span> <span class="o">=</span> <span class="n">row_3</span>
+<a name="ln-525"></a>               <span class="c">! Solve system of equations   </span>
+<a name="ln-526"></a>               <span class="n">soln</span><span class="p">(:)</span> <span class="o">=</span> <span class="n">util_solve_linear_system</span><span class="p">(</span><span class="n">lhs</span><span class="p">,</span> <span class="n">rhs</span><span class="p">,</span> <span class="mi">3</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-527"></a>               <span class="k">call </span><span class="n">ieee_set_flag</span><span class="p">(</span><span class="n">ieee_all</span><span class="p">,</span> <span class="p">.</span><span class="n">false</span><span class="p">.)</span> <span class="c">! Set all flags back to quiet</span>
+<a name="ln-528"></a>               <span class="k">call </span><span class="n">ieee_set_halting_mode</span><span class="p">(</span><span class="n">ieee_divide_by_zero</span><span class="p">,</span> <span class="p">.</span><span class="n">false</span><span class="p">.)</span>
+<a name="ln-529"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-530"></a>                  <span class="c">!write(*,*) &#39;quadfit fpe:&#39;</span>
+<a name="ln-531"></a>                  <span class="c">!write(*,*) &#39;util_solve_linear_system failed&#39;</span>
+<a name="ln-532"></a>                  <span class="k">exit</span>
+<a name="ln-533"></a><span class="k">               end if</span>
+<a name="ln-534"></a><span class="k">               </span><span class="n">aold</span> <span class="o">=</span> <span class="n">astar</span>
+<a name="ln-535"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">soln</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">==</span> <span class="n">soln</span><span class="p">(</span><span class="mi">3</span><span class="p">))</span> <span class="k">then</span> <span class="c">! Handles the case where they are both 0. 0/0 is an unhandled exception</span>
+<a name="ln-536"></a>                  <span class="n">astar</span> <span class="o">=</span> <span class="o">-</span><span class="mf">0.5_DP</span>
+<a name="ln-537"></a>               <span class="k">else</span>
+<a name="ln-538"></a><span class="k">                  </span><span class="n">astar</span> <span class="o">=</span>  <span class="o">-</span><span class="n">soln</span><span class="p">(</span><span class="mi">2</span><span class="p">)</span> <span class="o">/</span> <span class="p">(</span><span class="mi">2</span> <span class="o">*</span> <span class="n">soln</span><span class="p">(</span><span class="mi">3</span><span class="p">))</span>
+<a name="ln-539"></a>               <span class="k">end if</span>
+<a name="ln-540"></a><span class="k">               call </span><span class="n">ieee_get_flag</span><span class="p">(</span><span class="n">ieee_usual</span><span class="p">,</span> <span class="n">fpe_flag</span><span class="p">)</span>
+<a name="ln-541"></a>               <span class="k">if</span> <span class="p">(</span><span class="nb">any</span><span class="p">(</span><span class="n">fpe_flag</span><span class="p">))</span> <span class="k">then</span>
+<a name="ln-542"></a>                  <span class="c">!write(*,*) &#39;quadfit fpe&#39;</span>
+<a name="ln-543"></a>                  <span class="c">!write(*,*) &#39;soln(2:3): &#39;,soln(2:3)</span>
+<a name="ln-544"></a>                  <span class="c">!write(*,*) &#39;a1, a2, a3&#39;</span>
+<a name="ln-545"></a>                  <span class="c">!write(*,*) a1, a2, a3</span>
+<a name="ln-546"></a>                  <span class="c">!write(*,*) &#39;f1, f2, f3&#39;</span>
+<a name="ln-547"></a>                  <span class="c">!write(*,*) f1, f2, f3</span>
+<a name="ln-548"></a>                  <span class="n">lerr</span> <span class="o">=</span> <span class="p">.</span><span class="n">true</span><span class="p">.</span>
+<a name="ln-549"></a>                  <span class="k">exit</span>
+<a name="ln-550"></a><span class="k">               end if</span>
+<a name="ln-551"></a><span class="k">               </span><span class="n">fstar</span> <span class="o">=</span> <span class="n">n2one</span><span class="p">(</span><span class="n">f</span><span class="p">,</span> <span class="n">x0</span><span class="p">,</span> <span class="n">S</span><span class="p">,</span> <span class="n">N</span><span class="p">,</span> <span class="n">astar</span><span class="p">,</span> <span class="n">lerr</span><span class="p">)</span>
+<a name="ln-552"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">exit</span>
+<a name="ln-553"></a>               <span class="c">! keep the three closest a values to astar and discard the fourth  </span>
+<a name="ln-554"></a>               <span class="n">d1</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">(</span><span class="n">a1</span> <span class="o">-</span> <span class="n">astar</span><span class="p">)</span>
+<a name="ln-555"></a>               <span class="n">d2</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">(</span><span class="n">a2</span> <span class="o">-</span> <span class="n">astar</span><span class="p">)</span>
+<a name="ln-556"></a>               <span class="n">d3</span> <span class="o">=</span> <span class="nb">abs</span><span class="p">(</span><span class="n">a3</span> <span class="o">-</span> <span class="n">astar</span><span class="p">)</span>
+<a name="ln-557"></a>
+<a name="ln-558"></a>               <span class="k">if</span> <span class="p">(</span><span class="n">d1</span> <span class="o">&gt;</span> <span class="n">d2</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-559"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">d1</span> <span class="o">&gt;</span> <span class="n">d3</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-560"></a><span class="k">                     </span><span class="n">f1</span> <span class="o">=</span> <span class="n">fstar</span>
+<a name="ln-561"></a>                     <span class="n">a1</span> <span class="o">=</span> <span class="n">astar</span>
+<a name="ln-562"></a>                  <span class="k">else if</span> <span class="p">(</span><span class="n">d3</span> <span class="o">&gt;</span> <span class="n">d2</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-563"></a><span class="k">                     </span><span class="n">f3</span> <span class="o">=</span> <span class="n">fstar</span>
+<a name="ln-564"></a>                     <span class="n">a3</span> <span class="o">=</span> <span class="n">astar</span>
+<a name="ln-565"></a>                  <span class="k">end if</span>
+<a name="ln-566"></a><span class="k">               else </span>
+<a name="ln-567"></a><span class="k">                  if</span> <span class="p">(</span><span class="n">d2</span> <span class="o">&gt;</span> <span class="n">d3</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-568"></a><span class="k">                     </span><span class="n">f2</span> <span class="o">=</span> <span class="n">fstar</span>
+<a name="ln-569"></a>                     <span class="n">a2</span> <span class="o">=</span> <span class="n">astar</span>
+<a name="ln-570"></a>                  <span class="k">else if</span> <span class="p">(</span><span class="n">d3</span> <span class="o">&gt;</span> <span class="n">d1</span><span class="p">)</span> <span class="k">then</span>
+<a name="ln-571"></a><span class="k">                     </span><span class="n">f3</span> <span class="o">=</span> <span class="n">fstar</span>
+<a name="ln-572"></a>                     <span class="n">a3</span> <span class="o">=</span> <span class="n">astar</span>
+<a name="ln-573"></a>                  <span class="k">end if</span>
+<a name="ln-574"></a><span class="k">               end if</span>
+<a name="ln-575"></a><span class="k">            end do</span>
+<a name="ln-576"></a><span class="k">            if</span> <span class="p">(</span><span class="n">lerr</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-577"></a><span class="k">            </span><span class="n">lo</span> <span class="o">=</span> <span class="n">a1</span>
+<a name="ln-578"></a>            <span class="n">hi</span> <span class="o">=</span> <span class="n">a3</span>
+<a name="ln-579"></a>            <span class="k">return </span>
+<a name="ln-580"></a><span class="k">         end subroutine </span><span class="n">quadfit</span>
+<a name="ln-581"></a>
+<a name="ln-582"></a>   <span class="k">end function </span><span class="n">util_minimize_bfgs</span>
+<a name="ln-583"></a><span class="k">end submodule </span><span class="n">s_util_minimize_bfgs</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/util_peri.f90.html b/docs/sourcefile/util_peri.f90.html
index be7dfcf17..267d4bf4a 100644
--- a/docs/sourcefile/util_peri.f90.html
+++ b/docs/sourcefile/util_peri.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_peri.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_perif90EfferentGraph" width="641pt" height="298pt"
- viewBox="0.00 0.00 641.00 297.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_peri.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_perif90EfferentGraph" width="641pt" height="246pt"
+ viewBox="0.00 0.00 641.00 245.55" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_peri.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 892,-412.12 892,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 892,-339.24 892,4 -4,4"/>
 <!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_peri.f90</title>
-<polygon fill="none" stroke="black" points="888,-133.12 820,-133.12 820,-109.12 888,-109.12 888,-133.12"/>
-<text text-anchor="middle" x="854" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_peri.f90</text>
+<polygon fill="none" stroke="black" points="888,-235.24 820,-235.24 820,-211.24 888,-211.24 888,-235.24"/>
+<text text-anchor="middle" x="854" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_peri.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M832.76,-109.09C794.34,-87.43 707.61,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.91,-235.38C784.26,-252.91 701.58,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.21,-133.4C823.06,-149.87 792.42,-179.29 772.16,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="769.48,-196.48 764.69,-205.93 774.32,-201.53 769.48,-196.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M822.7,-211.24C813.1,-207.43 802.33,-203.17 792.15,-199.14"/>
+<polygon fill="#000000" stroke="#000000" points="793.22,-195.8 782.63,-195.37 790.64,-202.31 793.22,-195.8"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_peri.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_peri.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_peri.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_rescale.f90.html b/docs/sourcefile/util_rescale.f90.html
index 1e2d8b83d..b348034a1 100644
--- a/docs/sourcefile/util_rescale.f90.html
+++ b/docs/sourcefile/util_rescale.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_rescale.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_rescalef90EfferentGraph" width="641pt" height="292pt"
- viewBox="0.00 0.00 641.00 292.15" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_rescalef90EfferentGraph" width="641pt" height="241pt"
+ viewBox="0.00 0.00 641.00 240.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_rescale.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 909,-412.12 909,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 909,-339.24 909,4 -4,4"/>
 <!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_rescale.f90</title>
-<polygon fill="none" stroke="black" points="905,-133.12 820,-133.12 820,-109.12 905,-109.12 905,-133.12"/>
-<text text-anchor="middle" x="862.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_rescale.f90</text>
+<polygon fill="none" stroke="black" points="905,-235.24 820,-235.24 820,-211.24 905,-211.24 905,-235.24"/>
+<text text-anchor="middle" x="862.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_rescale.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.43,-109.09C800.46,-87.43 710.3,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M833.34,-235.38C790.06,-252.91 704.18,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M847.63,-133.4C828.87,-150.02 795.24,-179.82 773.27,-199.27"/>
-<polygon fill="#000000" stroke="#000000" points="770.92,-196.68 765.76,-205.93 775.56,-201.92 770.92,-196.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M828.65,-211.24C817.62,-207.21 805.18,-202.66 793.58,-198.43"/>
+<polygon fill="#000000" stroke="#000000" points="794.67,-195.1 784.08,-194.96 792.27,-201.67 794.67,-195.1"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_rescale.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_rescale.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_resize.f90.html b/docs/sourcefile/util_resize.f90.html
index cfea8c661..3c68ddbcd 100644
--- a/docs/sourcefile/util_resize.f90.html
+++ b/docs/sourcefile/util_resize.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_resize.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_resizef90EfferentGraph" width="641pt" height="294pt"
- viewBox="0.00 0.00 641.00 294.08" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_resize.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_resizef90EfferentGraph" width="641pt" height="243pt"
+ viewBox="0.00 0.00 641.00 242.57" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_resize.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 903,-412.12 903,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 903,-339.24 903,4 -4,4"/>
 <!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_resize.f90</title>
-<polygon fill="none" stroke="black" points="899,-133.12 820,-133.12 820,-109.12 899,-109.12 899,-133.12"/>
-<text text-anchor="middle" x="859.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize.f90</text>
+<polygon fill="none" stroke="black" points="899,-235.24 820,-235.24 820,-211.24 899,-211.24 899,-235.24"/>
+<text text-anchor="middle" x="859.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_resize.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M837.72,-109.09C798.3,-87.43 709.35,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M830.72,-235.38C788.01,-252.91 703.26,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M845.01,-133.4C826.85,-149.95 794.34,-179.55 772.97,-199.02"/>
-<polygon fill="#000000" stroke="#000000" points="770.42,-196.61 765.38,-205.93 775.13,-201.79 770.42,-196.61"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M826.55,-211.24C816.22,-207.36 804.6,-203 793.68,-198.89"/>
+<polygon fill="#000000" stroke="#000000" points="794.89,-195.61 784.3,-195.37 792.43,-202.16 794.89,-195.61"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_resize.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_resize.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_resize.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_set.f90.html b/docs/sourcefile/util_set.f90.html
index 1a7e29e64..c9d8532e4 100644
--- a/docs/sourcefile/util_set.f90.html
+++ b/docs/sourcefile/util_set.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_set.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_setf90EfferentGraph" width="641pt" height="299pt"
- viewBox="0.00 0.00 641.00 299.03" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_set.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_setf90EfferentGraph" width="641pt" height="247pt"
+ viewBox="0.00 0.00 641.00 246.65" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_set.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_set.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 888,-412.12 888,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 888,-339.24 888,4 -4,4"/>
 <!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_set.f90</title>
-<polygon fill="none" stroke="black" points="884,-133.12 820,-133.12 820,-109.12 884,-109.12 884,-133.12"/>
-<text text-anchor="middle" x="852" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_set.f90</text>
+<polygon fill="none" stroke="black" points="884,-235.24 820,-235.24 820,-211.24 884,-211.24 884,-235.24"/>
+<text text-anchor="middle" x="852" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_set.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_set.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M830.95,-109.09C792.9,-87.43 706.98,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M824.16,-235.38C782.9,-252.91 700.97,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_set.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M838.46,-133.4C821.65,-149.87 791.62,-179.29 771.76,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="769.13,-196.43 764.44,-205.93 774.03,-201.43 769.13,-196.43"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M821.3,-211.24C811.89,-207.43 801.34,-203.17 791.36,-199.14"/>
+<polygon fill="#000000" stroke="#000000" points="792.61,-195.87 782.02,-195.37 789.99,-202.36 792.61,-195.87"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_set.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_set.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_set.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_set.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_solve.f90.html b/docs/sourcefile/util_solve.f90.html
index 5feb9bb35..5f25a55b4 100644
--- a/docs/sourcefile/util_solve.f90.html
+++ b/docs/sourcefile/util_solve.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_solve.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_solvef90EfferentGraph" width="641pt" height="295pt"
- viewBox="0.00 0.00 641.00 295.38" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_solve.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_solvef90EfferentGraph" width="641pt" height="244pt"
+ viewBox="0.00 0.00 641.00 243.65" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_solve.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 899,-412.12 899,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 899,-339.24 899,4 -4,4"/>
 <!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_solve.f90</title>
-<polygon fill="none" stroke="black" points="895,-133.12 820,-133.12 820,-109.12 895,-109.12 895,-133.12"/>
-<text text-anchor="middle" x="857.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_solve.f90</text>
+<polygon fill="none" stroke="black" points="895,-235.24 820,-235.24 820,-211.24 895,-211.24 895,-235.24"/>
+<text text-anchor="middle" x="857.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_solve.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M835.92,-109.09C796.86,-87.43 708.72,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M828.97,-235.38C786.65,-252.91 702.65,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M843.27,-133.4C825.44,-149.95 793.54,-179.55 772.58,-199.02"/>
-<polygon fill="#000000" stroke="#000000" points="770.08,-196.56 765.13,-205.93 774.84,-201.69 770.08,-196.56"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.15,-211.24C815.11,-207.4 803.85,-203.08 793.22,-199.02"/>
+<polygon fill="#000000" stroke="#000000" points="794.28,-195.67 783.69,-195.37 791.78,-202.21 794.28,-195.67"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_solve.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_solve.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_solve.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_sort.f90.html b/docs/sourcefile/util_sort.f90.html
index 693653c09..976af64a3 100644
--- a/docs/sourcefile/util_sort.f90.html
+++ b/docs/sourcefile/util_sort.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_sort.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_sortf90EfferentGraph" width="641pt" height="298pt"
- viewBox="0.00 0.00 641.00 297.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_sort.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_sortf90EfferentGraph" width="641pt" height="246pt"
+ viewBox="0.00 0.00 641.00 245.55" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_sort.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 892,-412.12 892,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 892,-339.24 892,4 -4,4"/>
 <!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_sort.f90</title>
-<polygon fill="none" stroke="black" points="888,-133.12 820,-133.12 820,-109.12 888,-109.12 888,-133.12"/>
-<text text-anchor="middle" x="854" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort.f90</text>
+<polygon fill="none" stroke="black" points="888,-235.24 820,-235.24 820,-211.24 888,-211.24 888,-235.24"/>
+<text text-anchor="middle" x="854" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_sort.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M832.76,-109.09C794.34,-87.43 707.61,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.91,-235.38C784.26,-252.91 701.58,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.21,-133.4C823.06,-149.87 792.42,-179.29 772.16,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="769.48,-196.48 764.69,-205.93 774.32,-201.53 769.48,-196.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M822.7,-211.24C813.1,-207.43 802.33,-203.17 792.15,-199.14"/>
+<polygon fill="#000000" stroke="#000000" points="793.22,-195.8 782.63,-195.37 790.64,-202.31 793.22,-195.8"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_sort.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_sort.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_sort.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_spill.f90.html b/docs/sourcefile/util_spill.f90.html
index f76af9c66..9b0e5dc4e 100644
--- a/docs/sourcefile/util_spill.f90.html
+++ b/docs/sourcefile/util_spill.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_spill.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_spillf90EfferentGraph" width="641pt" height="298pt"
- viewBox="0.00 0.00 641.00 297.69" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_spill.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_spillf90EfferentGraph" width="641pt" height="246pt"
+ viewBox="0.00 0.00 641.00 245.55" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_spill.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 892,-412.12 892,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 892,-339.24 892,4 -4,4"/>
 <!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_spill.f90</title>
-<polygon fill="none" stroke="black" points="888,-133.12 820,-133.12 820,-109.12 888,-109.12 888,-133.12"/>
-<text text-anchor="middle" x="854" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_spill.f90</text>
+<polygon fill="none" stroke="black" points="888,-235.24 820,-235.24 820,-211.24 888,-211.24 888,-235.24"/>
+<text text-anchor="middle" x="854" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_spill.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M832.76,-109.09C794.34,-87.43 707.61,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M825.91,-235.38C784.26,-252.91 701.58,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.21,-133.4C823.06,-149.87 792.42,-179.29 772.16,-198.76"/>
-<polygon fill="#000000" stroke="#000000" points="769.48,-196.48 764.69,-205.93 774.32,-201.53 769.48,-196.48"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M822.7,-211.24C813.1,-207.43 802.33,-203.17 792.15,-199.14"/>
+<polygon fill="#000000" stroke="#000000" points="793.22,-195.8 782.63,-195.37 790.64,-202.31 793.22,-195.8"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_spill.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_spill.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_spill.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_valid.f90.html b/docs/sourcefile/util_valid.f90.html
index 98696a6f8..519293adf 100644
--- a/docs/sourcefile/util_valid.f90.html
+++ b/docs/sourcefile/util_valid.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_valid.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_validf90EfferentGraph" width="641pt" height="296pt"
- viewBox="0.00 0.00 641.00 296.37" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_valid.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_validf90EfferentGraph" width="641pt" height="244pt"
+ viewBox="0.00 0.00 641.00 244.46" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_valid.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 896,-412.12 896,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 896,-339.24 896,4 -4,4"/>
 <!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_valid.f90</title>
-<polygon fill="none" stroke="black" points="892,-133.12 820,-133.12 820,-109.12 892,-109.12 892,-133.12"/>
-<text text-anchor="middle" x="856" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_valid.f90</text>
+<polygon fill="none" stroke="black" points="892,-235.24 820,-235.24 820,-211.24 892,-211.24 892,-235.24"/>
+<text text-anchor="middle" x="856" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_valid.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M834.56,-109.09C795.78,-87.43 708.24,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M827.66,-235.38C785.62,-252.91 702.19,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.95,-133.4C824.39,-149.95 792.95,-179.55 772.28,-199.02"/>
-<polygon fill="#000000" stroke="#000000" points="769.82,-196.53 764.94,-205.93 774.62,-201.62 769.82,-196.53"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M824.1,-211.24C814.21,-207.4 803.1,-203.08 792.63,-199.02"/>
+<polygon fill="#000000" stroke="#000000" points="793.83,-195.73 783.24,-195.37 791.29,-202.25 793.83,-195.73"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_valid.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_valid.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_valid.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/util_version.f90.html b/docs/sourcefile/util_version.f90.html
index a1d035034..1a2f70a5c 100644
--- a/docs/sourcefile/util_version.f90.html
+++ b/docs/sourcefile/util_version.f90.html
@@ -226,298 +226,290 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~util_version.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefileutil_versionf90EfferentGraph" width="641pt" height="292pt"
- viewBox="0.00 0.00 641.00 292.15" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~util_version.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 412.12)">
+<svg id="sourcefileutil_versionf90EfferentGraph" width="641pt" height="241pt"
+ viewBox="0.00 0.00 641.00 240.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~util_version.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 339.24)">
 <title>sourcefile~~util_version.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-412.12 909,-412.12 909,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-339.24 909,-339.24 909,4 -4,4"/>
 <!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~util_version.f90</title>
-<polygon fill="none" stroke="black" points="905,-133.12 820,-133.12 820,-109.12 905,-109.12 905,-133.12"/>
-<text text-anchor="middle" x="862.5" y="-118.72" font-family="Helvetica,sans-Serif" font-size="10.50">util_version.f90</text>
+<polygon fill="none" stroke="black" points="905,-235.24 820,-235.24 820,-211.24 905,-211.24 905,-235.24"/>
+<text text-anchor="middle" x="862.5" y="-220.84" font-family="Helvetica,sans-Serif" font-size="10.50">util_version.f90</text>
 </g>
 <!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~swiftest_classes.f90</title>
 <g id="a_sourcefile~~util_version.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-210.12 143.5,-210.12 143.5,-186.12 250.5,-186.12 250.5,-210.12"/>
-<text text-anchor="middle" x="197" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="254.5,-215.24 147.5,-215.24 147.5,-191.24 254.5,-191.24 254.5,-215.24"/>
+<text text-anchor="middle" x="201" y="-200.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge1" class="edge">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M840.43,-109.09C800.46,-87.43 710.3,-44.12 628.5,-44.12 628.5,-44.12 628.5,-44.12 488.5,-44.12 398.99,-44.12 364.84,-17.2 288,-63.12 244.55,-89.08 217.76,-145.11 205.64,-176.2"/>
-<polygon fill="#000000" stroke="#000000" points="202.31,-175.12 202.09,-185.71 208.87,-177.57 202.31,-175.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M833.34,-235.38C790.06,-252.91 704.18,-283.24 628,-283.24 628,-283.24 628,-283.24 487.5,-283.24 401.97,-283.24 376.71,-292.54 296,-264.24 269.02,-254.78 242.04,-236.08 223.95,-221.86"/>
+<polygon fill="#000000" stroke="#000000" points="225.81,-218.86 215.82,-215.31 221.41,-224.31 225.81,-218.86"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~util_version.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-230.12 718,-230.12 718,-206.12 784,-206.12 784,-230.12"/>
-<text text-anchor="middle" x="751" y="-215.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-195.24 718,-195.24 718,-171.24 784,-171.24 784,-195.24"/>
+<text text-anchor="middle" x="751" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge2" class="edge">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M847.63,-133.4C828.87,-150.02 795.24,-179.82 773.27,-199.27"/>
-<polygon fill="#000000" stroke="#000000" points="770.92,-196.68 765.76,-205.93 775.56,-201.92 770.92,-196.68"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M828.65,-211.24C817.62,-207.21 805.18,-202.66 793.58,-198.43"/>
+<polygon fill="#000000" stroke="#000000" points="794.67,-195.1 784.08,-194.96 792.27,-201.67 794.67,-195.1"/>
 </g>
 <!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_node7" class="node">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_node11" class="node">
 <title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-328.12 0,-328.12 0,-304.12 106,-304.12 106,-328.12"/>
-<text text-anchor="middle" x="53" y="-313.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-97.24 0,-97.24 0,-73.24 106,-73.24 106,-97.24"/>
+<text text-anchor="middle" x="53" y="-82.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M181.34,-210.3C156.57,-230.88 106.28,-272.67 76.85,-297.13"/>
-<polygon fill="#000000" stroke="#000000" points="74.25,-294.74 68.79,-303.82 78.72,-300.12 74.25,-294.74"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M184.93,-191.05C159.35,-170.39 107.31,-128.32 77.11,-103.92"/>
+<polygon fill="#000000" stroke="#000000" points="79.19,-101.1 69.21,-97.53 74.79,-106.54 79.19,-101.1"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge4" class="edge">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge12" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.77,-226.77C693.44,-232.54 659.11,-239.09 628.5,-239.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C601.12,-239.14 593.81,-233.66 573,-219.12 552.85,-205.03 558.79,-188.5 537,-177.12 462.16,-138.04 430.8,-141.63 348,-158.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.63,-194.63C668.88,-210.87 573.4,-239.19 489.5,-243.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C425.09,-251.87 414.5,-203.24 351.5,-203.24"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-368.12 142,-368.12 142,-344.12 252,-344.12 252,-368.12"/>
-<text text-anchor="middle" x="197" y="-353.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="403,-255.24 298,-255.24 298,-231.24 403,-231.24 403,-255.24"/>
+<text text-anchor="middle" x="350.5" y="-240.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge6" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C319.01,-350.56 288.65,-349.66 262.49,-350.49"/>
-<polygon fill="#000000" stroke="#000000" points="262.16,-347 252.31,-350.9 262.45,-353.99 262.16,-347"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge4" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C463.26,-244.41 436.56,-244.64 413.28,-244.49"/>
+<polygon fill="#000000" stroke="#000000" points="413.22,-240.99 403.19,-244.41 413.16,-247.99 413.22,-240.99"/>
 </g>
-<!-- sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~whm_classes.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-290.12 300,-290.12 300,-266.12 394,-266.12 394,-290.12"/>
-<text text-anchor="middle" x="347" y="-275.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="260,-57.24 142,-57.24 142,-33.24 260,-33.24 260,-57.24"/>
+<text text-anchor="middle" x="201" y="-42.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C585.54,-239.62 577.4,-254.37 537,-261.12 492.74,-268.5 442.08,-272.84 404.36,-275.29"/>
-<polygon fill="#000000" stroke="#000000" points="403.84,-271.81 394.08,-275.93 404.28,-278.8 403.84,-271.81"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C323.69,-49.16 295.26,-49.25 270.32,-48.66"/>
+<polygon fill="#000000" stroke="#000000" points="270.31,-45.16 260.22,-48.38 270.12,-52.16 270.31,-45.16"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C579.96,-108.57 581.58,-78.28 536,-62.24 458.39,-34.93 433.54,-41.12 351.5,-47.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.09,-171C706.58,-157.15 665.88,-134.98 628,-123.24"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-252.12 442,-252.12 442,-228.12 537,-228.12 537,-252.12"/>
-<text text-anchor="middle" x="489.5" y="-237.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="678.5,-195.24 575.5,-195.24 575.5,-171.24 678.5,-171.24 678.5,-195.24"/>
+<text text-anchor="middle" x="627" y="-180.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C600.47,-239.44 571.64,-239.67 547.24,-239.82"/>
-<polygon fill="#000000" stroke="#000000" points="547.06,-236.33 537.08,-239.89 547.1,-243.33 547.06,-236.33"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-356.12C279.26,-342.37 266.01,-311.94 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M744.69,-230.42C735.09,-251.37 712.89,-294.12 682,-319.12 610.69,-376.82 582.01,-402.51 490.5,-396.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C472.32,-397.38 363.9,-359.39 348,-356.12"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.95,-183.24C708.94,-183.24 698.85,-183.24 688.76,-183.24"/>
+<polygon fill="#000000" stroke="#000000" points="688.72,-179.74 678.72,-183.24 688.72,-186.74 688.72,-179.74"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-310.12 573,-310.12 573,-286.12 682,-286.12 682,-310.12"/>
-<text text-anchor="middle" x="627.5" y="-295.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-56.24 572,-56.24 572,-32.24 682,-32.24 682,-56.24"/>
+<text text-anchor="middle" x="627" y="-41.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M731.55,-230.27C711.27,-243.62 678.51,-265.19 655.38,-280.42"/>
-<polygon fill="#000000" stroke="#000000" points="653.16,-277.69 646.73,-286.11 657.01,-283.54 653.16,-277.69"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M739.17,-170.9C718.05,-146.83 671.17,-93.42 645.55,-64.23"/>
+<polygon fill="#000000" stroke="#000000" points="647.86,-61.55 638.63,-56.35 642.59,-66.17 647.86,-61.55"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-210.12 442.5,-210.12 442.5,-186.12 536.5,-186.12 536.5,-210.12"/>
-<text text-anchor="middle" x="489.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="535.5,-175.24 441.5,-175.24 441.5,-151.24 535.5,-151.24 535.5,-175.24"/>
+<text text-anchor="middle" x="488.5" y="-160.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge10" class="edge">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge8" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-239.12C608.12,-239.34 565.03,-225.4 532.24,-213.72"/>
-<polygon fill="#000000" stroke="#000000" points="533.02,-210.28 522.43,-210.18 530.65,-216.87 533.02,-210.28"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C607.52,-117.58 560.6,-133.8 526.93,-147.26"/>
+<polygon fill="#000000" stroke="#000000" points="525.33,-144.13 517.39,-151.14 527.97,-150.61 525.33,-144.13"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-210.12 576,-210.12 576,-186.12 679,-186.12 679,-210.12"/>
-<text text-anchor="middle" x="627.5" y="-195.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~whm_classes.f90</title>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="397.5,-137.24 303.5,-137.24 303.5,-113.24 397.5,-113.24 397.5,-137.24"/>
+<text text-anchor="middle" x="350.5" y="-122.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge11" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-212.81C708.99,-211.37 699.2,-209.76 689.41,-208.14"/>
-<polygon fill="#000000" stroke="#000000" points="689.68,-204.64 679.24,-206.47 688.54,-211.55 689.68,-204.64"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge9" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C553.28,-100.98 464.57,-107.25 408.05,-115.13"/>
+<polygon fill="#000000" stroke="#000000" points="407.27,-111.7 397.88,-116.61 408.28,-118.63 407.27,-111.7"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-96.12 294.5,-96.12 294.5,-72.12 399.5,-72.12 399.5,-96.12"/>
-<text text-anchor="middle" x="347" y="-81.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-335.24 296,-335.24 296,-311.24 405,-311.24 405,-335.24"/>
+<text text-anchor="middle" x="350.5" y="-320.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M730.92,-206C717.43,-197.59 698.83,-186.29 682,-177.12 618.99,-142.78 605.85,-126.33 537,-106.12 495.71,-93.99 447.51,-88.51 410.12,-86.05"/>
-<polygon fill="#000000" stroke="#000000" points="410.07,-82.54 399.88,-85.44 409.65,-89.53 410.07,-82.54"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge10" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-243.24C440.3,-245.51 394.96,-281.05 370.4,-303.98"/>
+<polygon fill="#000000" stroke="#000000" points="367.67,-301.75 362.9,-311.21 372.53,-306.79 367.67,-301.75"/>
 </g>
-<!-- sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-47.24C281.86,-50.07 269.53,-90.01 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-85.24C172.55,-83.3 142.11,-83 116.17,-83.31"/>
+<polygon fill="#000000" stroke="#000000" points="116.04,-79.81 106.09,-83.46 116.14,-86.81 116.04,-79.81"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-408.12 288,-408.12 288,-384.12 406,-384.12 406,-408.12"/>
-<text text-anchor="middle" x="347" y="-393.72" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~util_version.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536,-95.24 441,-95.24 441,-71.24 536,-71.24 536,-95.24"/>
+<text text-anchor="middle" x="488.5" y="-80.84" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-396.12C464.97,-394.47 439.17,-394.07 416.18,-394.21"/>
-<polygon fill="#000000" stroke="#000000" points="416.13,-390.71 406.17,-394.3 416.2,-397.71 416.13,-390.71"/>
-</g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-344.12C138.79,-340 122.26,-335.34 106.93,-331.03"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-327.59 97.07,-328.25 105.74,-334.33 107.64,-327.59"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626,-123.24C598.17,-114.72 567.03,-105.57 541.54,-98.17"/>
+<polygon fill="#000000" stroke="#000000" points="542.28,-94.74 531.7,-95.32 540.33,-101.46 542.28,-94.74"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-266.09C307.9,-261.9 297.39,-257.02 288,-252.12 266.4,-240.85 242.82,-226.62 225.21,-215.6"/>
-<polygon fill="#000000" stroke="#000000" points="226.91,-212.54 216.59,-210.16 223.18,-218.46 226.91,-212.54"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M305.25,-231.24C289.86,-227.06 272.41,-222.33 256.31,-217.96"/>
+<polygon fill="#000000" stroke="#000000" points="257.05,-214.54 246.48,-215.3 255.21,-221.29 257.05,-214.54"/>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge14" class="edge">
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M332.34,-255.53C303.99,-274.21 246.12,-305.34 202,-283.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M200,-283.24C125.39,-245.86 79.62,-150.2 62.13,-106.99"/>
+<polygon fill="#000000" stroke="#000000" points="65.29,-105.47 58.38,-97.44 58.78,-108.03 65.29,-105.47"/>
+</g>
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.66,-290.22C284.05,-300.37 238.78,-313.61 198,-316.12"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M156.2,-57.24C140.96,-61.41 123.7,-66.14 107.75,-70.51"/>
+<polygon fill="#000000" stroke="#000000" points="106.75,-67.16 98.03,-73.18 108.6,-73.91 106.75,-67.16"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge20" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C427.22,-207.71 411.94,-203.24 351.5,-203.24"/>
+</g>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.04,-252.14C430.85,-255.71 416.24,-259.66 402.48,-263.38"/>
-<polygon fill="#000000" stroke="#000000" points="401.39,-260.05 392.65,-266.04 403.22,-266.81 401.39,-260.05"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C453.18,-205.79 415.78,-217.48 388.9,-227.58"/>
+<polygon fill="#000000" stroke="#000000" points="387.57,-224.34 379.5,-231.2 390.09,-230.87 387.57,-224.34"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-318.12C280.75,-326.44 263.66,-312.08 198,-316.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M475.04,-252.3C451.41,-272.52 400.03,-311.48 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.17,-175.79C565.61,-174.39 555.56,-172.92 545.84,-171.49"/>
+<polygon fill="#000000" stroke="#000000" points="546.26,-168.02 535.86,-170.03 545.25,-174.94 546.26,-168.02"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.94,-300.21C516.73,-302.81 425.9,-308.18 348,-318.12"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M487.5,-203.24C424.91,-207.89 411.26,-184.41 351.5,-165.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.31,-192.42C549.68,-196.62 518.04,-201.12 489.5,-203.24"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M579.61,-32.16C491.81,-11.48 296.31,24.02 142,-24.24 115.62,-32.49 90.2,-51.73 73.52,-66.41"/>
+<polygon fill="#000000" stroke="#000000" points="71.12,-63.87 66.07,-73.19 75.83,-69.05 71.12,-63.87"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge20" class="edge">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge24" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C304.57,-246.51 257.59,-229.09 227.88,-214.66"/>
-<polygon fill="#000000" stroke="#000000" points="229.38,-211.5 218.88,-210.12 226.23,-217.75 229.38,-211.5"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.2,-210.13C424.05,-219.04 383.92,-230.84 348,-238.12"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.58,-175.24C435.78,-187.02 391.62,-203.24 351.5,-203.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-203.24C321.69,-203.24 290.94,-203.24 264.74,-203.24"/>
+<polygon fill="#000000" stroke="#000000" points="264.56,-199.74 254.56,-203.24 264.56,-206.74 264.56,-199.74"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge21" class="edge">
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge22" class="edge">
 <title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M457.74,-210.33C452.33,-212.94 446.88,-215.9 442,-219.12 423.88,-231.07 424.14,-240.19 406,-252.12 400.68,-255.62 394.8,-258.86 388.9,-261.79"/>
-<polygon fill="#000000" stroke="#000000" points="387.24,-258.7 379.67,-266.12 390.21,-265.04 387.24,-258.7"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M444.47,-151.21C431.82,-147.68 417.83,-143.77 404.63,-140.08"/>
+<polygon fill="#000000" stroke="#000000" points="405.29,-136.63 394.72,-137.31 403.41,-143.38 405.29,-136.63"/>
 </g>
 <!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-316.12C169.94,-317.72 141.14,-317.99 116.32,-317.77"/>
-<polygon fill="#000000" stroke="#000000" points="116.35,-314.27 106.31,-317.65 116.27,-321.27 116.35,-314.27"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-238.12C319.41,-243.5 312.44,-245.36 288,-257.12 244.9,-277.85 245.74,-313.18 198,-316.12"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C425.88,-103.88 411.44,-145.48 348,-158.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-158.12C312.49,-164.79 275.38,-174.83 246.7,-183.18"/>
-<polygon fill="#000000" stroke="#000000" points="245.53,-179.87 236.92,-186.05 247.5,-186.59 245.53,-179.87"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M349.5,-165.24C325.47,-157.53 318.63,-157.4 296,-146.24 251.34,-124.2 251.68,-88.75 202,-85.24"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.4,-171.13C414.55,-173.97 380.39,-174.51 351.5,-165.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M587.53,-210.15C572.45,-214.81 555.02,-220.19 539.14,-225.1"/>
-<polygon fill="#000000" stroke="#000000" points="538,-221.79 529.48,-228.08 540.07,-228.47 538,-221.79"/>
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~util_version.f90~~EfferentGraph_edge26" class="edge">
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M326.78,-137.25C301.95,-150.38 261.98,-171.52 233.99,-186.32"/>
+<polygon fill="#000000" stroke="#000000" points="232.2,-183.31 224.99,-191.08 235.47,-189.5 232.2,-183.31"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M617.73,-185.85C603.14,-166.27 571.97,-127.95 537,-106.12 489.39,-76.39 202.77,-3.87 198,-6.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-6.12C80.77,-52.61 59.04,-231.26 54.95,-294.1"/>
-<polygon fill="#000000" stroke="#000000" points="51.45,-293.93 54.38,-304.11 58.44,-294.33 51.45,-293.93"/>
-</g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-198.12C566.43,-198.12 556.52,-198.12 546.94,-198.12"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-194.62 536.69,-198.12 546.69,-201.62 546.69,-194.62"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M319.03,-113.19C289.62,-102.48 243.56,-88.07 202,-85.24"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M611.78,-186.06C588.03,-167.48 538.98,-132.69 490.5,-120.12"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-120.12C461.06,-113 430.59,-105.19 405.06,-98.66"/>
-<polygon fill="#000000" stroke="#000000" points="405.73,-95.22 395.17,-96.13 403.99,-102 405.73,-95.22"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.76,-314.06C266.94,-307.82 231.42,-297.97 202,-283.24"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M330.16,-96.32C304.12,-116.37 252.13,-156.42 221.7,-179.86"/>
-<polygon fill="#000000" stroke="#000000" points="219.51,-177.13 213.72,-186.01 223.78,-182.68 219.51,-177.13"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M448.53,-95.27C433.45,-99.93 416.02,-105.31 400.14,-110.22"/>
+<polygon fill="#000000" stroke="#000000" points="399,-106.91 390.48,-113.2 401.07,-113.59 399,-106.91"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~util_version.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M336.11,-71.83C312.53,-44.12 251.06,18.91 198,-6.12"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~util_version.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.57,-398.46C245.82,-398.28 188.95,-394.23 142,-377.12 116.33,-367.76 91.14,-349.05 74.33,-334.8"/>
-<polygon fill="#000000" stroke="#000000" points="76.62,-332.16 66.78,-328.23 72.02,-337.44 76.62,-332.16"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M440.95,-85.71C384.38,-88.21 286.07,-90.97 202,-85.24"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/walltime_classes.f90.html b/docs/sourcefile/walltime_classes.f90.html
index caaf42c2a..59993e14f 100644
--- a/docs/sourcefile/walltime_classes.f90.html
+++ b/docs/sourcefile/walltime_classes.f90.html
@@ -329,679 +329,679 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M145.95,-1398C137.94,-1398 129.08,-1398 120.12,-1398"/>
 <polygon fill="#000000" stroke="#000000" points="120.01,-1394.5 110.01,-1398 120.01,-1401.5 120.01,-1394.5"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-2796 255,-2796 255,-2772 405,-2772 405,-2796"/>
-<text text-anchor="middle" x="330" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="383,-2796 277,-2796 277,-2772 383,-2772 383,-2796"/>
+<text text-anchor="middle" x="330" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.87,-2771.94C254.19,-2769.45 250.84,-2766.49 248,-2763 203.76,-2708.68 183.27,-1592.64 180.36,-1420.27"/>
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.77,-2780.53C265.74,-2777.31 255.25,-2771.9 248,-2763 203.76,-2708.68 183.27,-1592.64 180.36,-1420.27"/>
 <polygon fill="#000000" stroke="#000000" points="183.86,-1420.05 180.19,-1410.11 176.86,-1420.16 183.86,-1420.05"/>
 </g>
-<!-- sourcefile~symba_step.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~symba_step.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374,-2754 286,-2754 286,-2730 374,-2730 374,-2754"/>
-<text text-anchor="middle" x="330" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-2754 303,-2754 303,-2730 357,-2730 357,-2754"/>
+<text text-anchor="middle" x="330" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.65,-2740.65C271.55,-2737.92 257.18,-2732.26 248,-2721 205.15,-2668.46 183.54,-1589.97 180.4,-1420.36"/>
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.88,-2742.73C284.53,-2741.7 261.04,-2736.99 248,-2721 205.15,-2668.46 183.54,-1589.97 180.4,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="183.9,-1420.07 180.21,-1410.13 176.9,-1420.2 183.9,-1420.07"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="386,-2712 274,-2712 274,-2688 386,-2688 386,-2712"/>
-<text text-anchor="middle" x="330" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363.5,-2712 296.5,-2712 296.5,-2688 363.5,-2688 363.5,-2712"/>
+<text text-anchor="middle" x="330" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.87,-2695.6C263.92,-2692.3 254.62,-2687.1 248,-2679 206.5,-2628.21 183.79,-1586.05 180.44,-1420.17"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge4" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296.1,-2700.18C279.07,-2698.4 259.49,-2693.06 248,-2679 206.5,-2628.21 183.79,-1586.05 180.44,-1420.17"/>
 <polygon fill="#000000" stroke="#000000" points="183.94,-1420.07 180.24,-1410.14 176.94,-1420.21 183.94,-1420.07"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369,-2670 291,-2670 291,-2646 369,-2646 369,-2670"/>
-<text text-anchor="middle" x="330" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-2670 292,-2670 292,-2646 368,-2646 368,-2670"/>
+<text text-anchor="middle" x="330" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.73,-2657.49C275.1,-2655.18 258.31,-2649.59 248,-2637 207.9,-2588.01 184.1,-1583.99 180.48,-1420.43"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge5" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.98,-2657.67C276,-2655.48 258.58,-2649.93 248,-2637 207.9,-2588.01 184.1,-1583.99 180.48,-1420.43"/>
 <polygon fill="#000000" stroke="#000000" points="183.98,-1420.05 180.26,-1410.13 176.98,-1420.21 183.98,-1420.05"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-2628 293.5,-2628 293.5,-2604 366.5,-2604 366.5,-2628"/>
-<text text-anchor="middle" x="330" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-2628 287,-2628 287,-2604 373,-2604 373,-2628"/>
+<text text-anchor="middle" x="330" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.24,-2615.83C276.93,-2613.75 258.87,-2608.25 248,-2595 209.25,-2547.75 184.37,-1579.7 180.52,-1420.17"/>
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.95,-2614.86C272.45,-2612.23 257.49,-2606.57 248,-2595 209.25,-2547.75 184.37,-1579.7 180.52,-1420.17"/>
 <polygon fill="#000000" stroke="#000000" points="184.02,-1420.01 180.28,-1410.1 177.02,-1420.18 184.02,-1420.01"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="385.5,-2586 274.5,-2586 274.5,-2562 385.5,-2562 385.5,-2586"/>
-<text text-anchor="middle" x="330" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-2586 278.5,-2586 278.5,-2562 381.5,-2562 381.5,-2586"/>
+<text text-anchor="middle" x="330" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.33,-2569.71C264.21,-2566.42 254.73,-2561.19 248,-2553 173.42,-2462.26 178.36,-1573.17 179.77,-1420.31"/>
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.09,-2570.84C266.59,-2567.66 255.56,-2562.2 248,-2553 173.42,-2462.26 178.36,-1573.17 179.77,-1420.31"/>
 <polygon fill="#000000" stroke="#000000" points="183.27,-1420.28 179.86,-1410.25 176.27,-1420.21 183.27,-1420.28"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-2544 291.5,-2544 291.5,-2520 368.5,-2520 368.5,-2544"/>
-<text text-anchor="middle" x="330" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382.5,-2544 277.5,-2544 277.5,-2520 382.5,-2520 382.5,-2544"/>
+<text text-anchor="middle" x="330" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.18,-2531.52C275.44,-2529.25 258.44,-2523.67 248,-2511 176.17,-2423.81 178.8,-1570.31 179.82,-1420.42"/>
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M277.26,-2528.59C266.07,-2525.38 255.39,-2519.97 248,-2511 176.17,-2423.81 178.8,-1570.31 179.82,-1420.42"/>
 <polygon fill="#000000" stroke="#000000" points="183.32,-1420.19 179.89,-1410.16 176.32,-1420.13 183.32,-1420.19"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="383,-2502 277,-2502 277,-2478 383,-2478 383,-2502"/>
-<text text-anchor="middle" x="330" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-2502 291.5,-2502 291.5,-2478 368.5,-2478 368.5,-2502"/>
+<text text-anchor="middle" x="330" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M276.86,-2486.46C265.82,-2483.24 255.31,-2477.85 248,-2469 178.91,-2385.34 179.25,-1567.17 179.87,-1420.47"/>
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.2,-2489.51C275.46,-2487.23 258.45,-2481.66 248,-2469 178.91,-2385.34 179.25,-1567.17 179.87,-1420.47"/>
 <polygon fill="#000000" stroke="#000000" points="183.38,-1420.07 179.92,-1410.05 176.38,-1420.03 183.38,-1420.07"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node11" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="389,-2460 271,-2460 271,-2436 389,-2436 389,-2460"/>
-<text text-anchor="middle" x="330" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-2460 287.5,-2460 287.5,-2436 372.5,-2436 372.5,-2460"/>
+<text text-anchor="middle" x="330" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.66,-2442.37C261.96,-2439.05 253.93,-2434.16 248,-2427 181.65,-2346.86 179.73,-1563.84 179.94,-1420.48"/>
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.43,-2446.89C272.81,-2444.29 257.64,-2438.64 248,-2427 181.65,-2346.86 179.73,-1563.84 179.94,-1420.48"/>
 <polygon fill="#000000" stroke="#000000" points="183.44,-1420.27 179.96,-1410.27 176.44,-1420.26 183.44,-1420.27"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
+<!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-2418 296,-2418 296,-2394 364,-2394 364,-2418"/>
-<text text-anchor="middle" x="330" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<title>sourcefile~symba_step.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374,-2418 286,-2418 286,-2394 374,-2394 374,-2418"/>
+<text text-anchor="middle" x="330" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.78,-2406.06C278.87,-2404.22 259.51,-2398.86 248,-2385 184.37,-2308.36 180.22,-1560.16 180,-1420.42"/>
+<title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M285.76,-2404.56C271.67,-2401.83 257.28,-2396.18 248,-2385 184.37,-2308.36 180.22,-1560.16 180,-1420.42"/>
 <polygon fill="#000000" stroke="#000000" points="183.5,-1420.1 179.99,-1410.1 176.5,-1420.11 183.5,-1420.1"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node13" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-2376 287.5,-2376 287.5,-2352 372.5,-2352 372.5,-2376"/>
-<text text-anchor="middle" x="330" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="401,-2376 259,-2376 259,-2352 401,-2352 401,-2376"/>
+<text text-anchor="middle" x="330" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.47,-2362.86C272.85,-2360.25 257.67,-2354.61 248,-2343 187.08,-2269.85 180.73,-1556.27 180.08,-1420.31"/>
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.68,-2352.34C254.69,-2349.77 251.07,-2346.68 248,-2343 187.08,-2269.85 180.73,-1556.27 180.08,-1420.31"/>
 <polygon fill="#000000" stroke="#000000" points="183.58,-1420.23 180.03,-1410.24 176.58,-1420.26 183.58,-1420.23"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363.5,-2334 296.5,-2334 296.5,-2310 363.5,-2310 363.5,-2334"/>
-<text text-anchor="middle" x="330" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-2334 296,-2334 296,-2310 364,-2310 364,-2334"/>
+<text text-anchor="middle" x="330" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M296.22,-2322.08C279.23,-2320.27 259.64,-2314.93 248,-2301 189.77,-2231.33 181.26,-1552.05 180.15,-1420.13"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.82,-2322.03C278.92,-2320.18 259.55,-2314.82 248,-2301 189.77,-2231.33 181.26,-1552.05 180.15,-1420.13"/>
 <polygon fill="#000000" stroke="#000000" points="183.65,-1419.99 180.07,-1410.02 176.65,-1420.05 183.65,-1419.99"/>
 </g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-2292 287.5,-2292 287.5,-2268 372.5,-2268 372.5,-2292"/>
-<text text-anchor="middle" x="330" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412,-2292 248,-2292 248,-2268 412,-2268 412,-2292"/>
+<text text-anchor="middle" x="330" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.09,-2278.75C272.61,-2276.1 257.62,-2270.46 248,-2259 192.52,-2192.86 181.83,-1548.92 180.24,-1420.29"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge13" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.98,-2267.85C254.28,-2265.37 250.89,-2262.45 248,-2259 192.52,-2192.86 181.83,-1548.92 180.24,-1420.29"/>
 <polygon fill="#000000" stroke="#000000" points="183.74,-1420.04 180.12,-1410.08 176.74,-1420.12 183.74,-1420.04"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369,-2250 291,-2250 291,-2226 369,-2226 369,-2250"/>
-<text text-anchor="middle" x="330" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-2250 278.5,-2250 278.5,-2226 381.5,-2226 381.5,-2250"/>
+<text text-anchor="middle" x="330" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.9,-2237.35C275.3,-2235.02 258.48,-2229.44 248,-2217 195.25,-2154.37 182.42,-1545.38 180.34,-1420.36"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.24,-2234.71C266.74,-2231.54 255.67,-2226.11 248,-2217 195.25,-2154.37 182.42,-1545.38 180.34,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="183.83,-1420.04 180.17,-1410.1 176.83,-1420.16 183.83,-1420.04"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378,-2208 282,-2208 282,-2184 378,-2184 378,-2208"/>
-<text text-anchor="middle" x="330" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-2208 296,-2208 296,-2184 364,-2184 364,-2208"/>
+<text text-anchor="middle" x="330" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.65,-2193.55C268.96,-2190.54 256.44,-2184.98 248,-2175 197.96,-2115.85 183.04,-1541.44 180.44,-1420.34"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.88,-2195.98C279,-2194.11 259.64,-2188.75 248,-2175 197.96,-2115.85 183.04,-1541.44 180.44,-1420.34"/>
 <polygon fill="#000000" stroke="#000000" points="183.94,-1420 180.23,-1410.07 176.94,-1420.14 183.94,-1420"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369.5,-2166 290.5,-2166 290.5,-2142 369.5,-2142 369.5,-2166"/>
-<text text-anchor="middle" x="330" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-2166 278.5,-2166 278.5,-2142 381.5,-2142 381.5,-2166"/>
+<text text-anchor="middle" x="330" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.11,-2153.18C274.76,-2150.76 258.35,-2145.17 248,-2133 200.7,-2077.38 183.72,-1538.24 180.57,-1420.6"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.3,-2150.66C266.8,-2147.49 255.72,-2142.08 248,-2133 200.7,-2077.38 183.72,-1538.24 180.57,-1420.6"/>
 <polygon fill="#000000" stroke="#000000" points="184.06,-1420.18 180.3,-1410.28 177.06,-1420.37 184.06,-1420.18"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-2124 278.5,-2124 278.5,-2100 381.5,-2100 381.5,-2124"/>
-<text text-anchor="middle" x="330" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-2124 294.5,-2124 294.5,-2100 365.5,-2100 365.5,-2124"/>
+<text text-anchor="middle" x="330" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.34,-2108.63C266.83,-2105.46 255.74,-2100.05 248,-2091 203.37,-2038.81 184.4,-1533.42 180.69,-1420.36"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.3,-2111.73C277.84,-2109.69 259.33,-2104.25 248,-2091 203.37,-2038.81 184.4,-1533.42 180.69,-1420.36"/>
 <polygon fill="#000000" stroke="#000000" points="184.18,-1420.02 180.37,-1410.14 177.19,-1420.24 184.18,-1420.02"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-2082 293.5,-2082 293.5,-2058 366.5,-2058 366.5,-2082"/>
-<text text-anchor="middle" x="330" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369,-2082 291,-2082 291,-2058 369,-2058 369,-2082"/>
+<text text-anchor="middle" x="330" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.1,-2069.54C276.96,-2067.38 259.09,-2061.88 248,-2049 206.08,-2000.28 185.14,-1529.22 180.84,-1420.37"/>
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.6,-2069.18C275.14,-2066.79 258.52,-2061.22 248,-2049 206.08,-2000.28 185.14,-1529.22 180.84,-1420.37"/>
 <polygon fill="#000000" stroke="#000000" points="184.33,-1420.06 180.45,-1410.21 177.34,-1420.33 184.33,-1420.06"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377,-2040 283,-2040 283,-2016 377,-2016 377,-2040"/>
-<text text-anchor="middle" x="330" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-2040 302.5,-2040 302.5,-2016 357.5,-2016 357.5,-2040"/>
+<text text-anchor="middle" x="330" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.64,-2025.62C269.68,-2022.65 256.75,-2017.1 248,-2007 208.75,-1961.72 185.92,-1524.48 181.01,-1420.23"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.38,-2028.44C284.3,-2027.21 261.32,-2022.37 248,-2007 208.75,-1961.72 185.92,-1524.48 181.01,-1420.23"/>
 <polygon fill="#000000" stroke="#000000" points="184.5,-1420.03 180.54,-1410.2 177.51,-1420.35 184.5,-1420.03"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371,-1998 289,-1998 289,-1974 371,-1974 371,-1998"/>
-<text text-anchor="middle" x="330" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="386,-1998 274,-1998 274,-1974 386,-1974 386,-1998"/>
+<text text-anchor="middle" x="330" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.6,-1984.76C273.76,-1982.19 258.13,-1976.59 248,-1965 211.45,-1923.17 186.78,-1520.03 181.2,-1420.25"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M273.87,-1981.12C264.04,-1977.84 254.79,-1972.77 248,-1965 211.45,-1923.17 186.78,-1520.03 181.2,-1420.25"/>
 <polygon fill="#000000" stroke="#000000" points="184.69,-1419.9 180.64,-1410.11 177.7,-1420.28 184.69,-1419.9"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~netcdf.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-1956 296,-1956 296,-1932 364,-1932 364,-1956"/>
-<text text-anchor="middle" x="330" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="360,-1956 300,-1956 300,-1932 360,-1932 360,-1956"/>
+<text text-anchor="middle" x="330" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.7,-1943.73C278.98,-1941.77 259.82,-1936.4 248,-1923 180.79,-1846.83 178.95,-1510.78 179.7,-1420.43"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.72,-1944.15C282.15,-1942.59 260.78,-1937.49 248,-1923 180.79,-1846.83 178.95,-1510.78 179.7,-1420.43"/>
 <polygon fill="#000000" stroke="#000000" points="183.2,-1420.26 179.8,-1410.23 176.2,-1420.19 183.2,-1420.26"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~util_coord.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<title>sourcefile~util_coord.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1914 291.5,-1914 291.5,-1890 368.5,-1890 368.5,-1914"/>
-<text text-anchor="middle" x="330" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<text text-anchor="middle" x="330" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.23,-1901.07C275.69,-1898.68 258.83,-1893.14 248,-1881 186.09,-1811.61 180.36,-1505.75 179.98,-1420.26"/>
 <polygon fill="#000000" stroke="#000000" points="183.48,-1420.12 179.96,-1410.12 176.48,-1420.13 183.48,-1420.12"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-1872 292.5,-1872 292.5,-1848 367.5,-1848 367.5,-1872"/>
-<text text-anchor="middle" x="330" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-1872 296,-1872 296,-1848 364,-1848 364,-1872"/>
+<text text-anchor="middle" x="330" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.13,-1859.12C276.38,-1856.79 259.11,-1851.29 248,-1839 191.44,-1776.43 181.9,-1501.22 180.31,-1420.39"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.83,-1859.62C279.15,-1857.62 259.98,-1852.25 248,-1839 191.44,-1776.43 181.9,-1501.22 180.31,-1420.39"/>
 <polygon fill="#000000" stroke="#000000" points="183.81,-1420.26 180.14,-1410.32 176.81,-1420.38 183.81,-1420.26"/>
 </g>
-<!-- sourcefile~util_coord.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1830 291.5,-1830 291.5,-1806 368.5,-1806 368.5,-1830"/>
-<text text-anchor="middle" x="330" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="385.5,-1830 274.5,-1830 274.5,-1806 385.5,-1806 385.5,-1830"/>
+<text text-anchor="middle" x="330" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.39,-1816.92C275.89,-1814.5 259.01,-1808.98 248,-1797 196.79,-1741.25 183.61,-1496.75 180.72,-1420.68"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M274.17,-1812.85C264.32,-1809.59 254.98,-1804.6 248,-1797 196.79,-1741.25 183.61,-1496.75 180.72,-1420.68"/>
 <polygon fill="#000000" stroke="#000000" points="184.21,-1420.21 180.36,-1410.34 177.21,-1420.46 184.21,-1420.21"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
+<!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-1788 290,-1788 290,-1764 370,-1764 370,-1788"/>
-<text text-anchor="middle" x="330" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
+<title>sourcefile~helio_drift.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1788 291.5,-1788 291.5,-1764 368.5,-1764 368.5,-1788"/>
+<text text-anchor="middle" x="330" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.84,-1774.54C274.82,-1771.98 258.73,-1766.45 248,-1755 202.04,-1705.93 185.47,-1491.11 181.22,-1420.55"/>
+<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.09,-1774.75C275.72,-1772.28 259.02,-1766.77 248,-1755 202.04,-1705.93 185.47,-1491.11 181.22,-1420.55"/>
 <polygon fill="#000000" stroke="#000000" points="184.69,-1419.94 180.62,-1410.16 177.7,-1420.34 184.69,-1419.94"/>
 </g>
-<!-- sourcefile~util_set.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-1746 298,-1746 298,-1722 362,-1722 362,-1746"/>
-<text text-anchor="middle" x="330" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1746 303,-1746 303,-1722 357,-1722 357,-1746"/>
+<text text-anchor="middle" x="330" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.76,-1733.52C280.81,-1731.58 260.78,-1726.31 248,-1713 207.25,-1670.54 187.55,-1485.15 181.83,-1420.41"/>
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.85,-1734.01C284.99,-1732.58 262.08,-1727.67 248,-1713 207.25,-1670.54 187.55,-1485.15 181.83,-1420.41"/>
 <polygon fill="#000000" stroke="#000000" points="185.29,-1419.77 180.95,-1410.11 178.31,-1420.37 185.29,-1419.77"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="412,-1704 248,-1704 248,-1680 412,-1680 412,-1704"/>
-<text text-anchor="middle" x="330" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="362,-1704 298,-1704 298,-1680 362,-1680 362,-1704"/>
+<text text-anchor="middle" x="330" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge28" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.75,-1679.93C255.46,-1677.46 251.48,-1674.51 248,-1671 212.4,-1635.06 189.89,-1478.53 182.59,-1420.1"/>
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.92,-1691.36C281.02,-1689.38 260.98,-1684.11 248,-1671 212.4,-1635.06 189.89,-1478.53 182.59,-1420.1"/>
 <polygon fill="#000000" stroke="#000000" points="186.06,-1419.59 181.37,-1410.09 179.11,-1420.44 186.06,-1419.59"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1662 303,-1662 303,-1638 357,-1638 357,-1662"/>
-<text text-anchor="middle" x="330" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-1662 293.5,-1662 293.5,-1638 366.5,-1638 366.5,-1662"/>
+<text text-anchor="middle" x="330" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.8,-1649.65C285.14,-1648.03 262.51,-1643.04 248,-1629 188.89,-1571.79 180.47,-1466.05 179.74,-1420.18"/>
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.28,-1648.48C277.57,-1646.04 260,-1640.62 248,-1629 188.89,-1571.79 180.47,-1466.05 179.74,-1420.18"/>
 <polygon fill="#000000" stroke="#000000" points="183.24,-1420.1 179.7,-1410.12 176.24,-1420.14 183.24,-1420.1"/>
 </g>
-<!-- sourcefile~helio_drift.f90 -->
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~helio_drift.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1620 291.5,-1620 291.5,-1596 368.5,-1596 368.5,-1620"/>
-<text text-anchor="middle" x="330" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-1620 292,-1620 292,-1596 368,-1596 368,-1620"/>
+<text text-anchor="middle" x="330" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.12,-1605.74C276.12,-1603.06 259.7,-1597.67 248,-1587 199.12,-1542.41 185.34,-1460.11 181.49,-1420.48"/>
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.94,-1605.88C276.72,-1603.26 259.91,-1597.87 248,-1587 199.12,-1542.41 185.34,-1460.11 181.49,-1420.48"/>
 <polygon fill="#000000" stroke="#000000" points="184.95,-1419.96 180.62,-1410.29 177.98,-1420.55 184.95,-1419.96"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node32" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-1578 287,-1578 287,-1554 373,-1554 373,-1578"/>
-<text text-anchor="middle" x="330" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-1578 288,-1578 288,-1554 372,-1554 372,-1578"/>
+<text text-anchor="middle" x="330" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.59,-1562.21C273.07,-1559.23 258.82,-1554.03 248,-1545 208.99,-1512.44 191.17,-1452.61 184.07,-1420.22"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.85,-1562.48C273.95,-1559.55 259.15,-1554.31 248,-1545 208.99,-1512.44 191.17,-1452.61 184.07,-1420.22"/>
 <polygon fill="#000000" stroke="#000000" points="187.41,-1419.1 181.98,-1410 180.55,-1420.5 187.41,-1419.1"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-1536 296,-1536 296,-1512 364,-1512 364,-1536"/>
-<text text-anchor="middle" x="330" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~util_append.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-1536 287,-1536 287,-1512 373,-1512 373,-1536"/>
+<text text-anchor="middle" x="330" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.88,-1521.01C280.2,-1518.27 261.9,-1513.03 248,-1503 218.56,-1481.77 198.58,-1443.51 188.25,-1419.5"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.88,-1519.21C273.53,-1516.15 259.31,-1511.16 248,-1503 218.56,-1481.77 198.58,-1443.51 188.25,-1419.5"/>
 <polygon fill="#000000" stroke="#000000" points="191.46,-1418.09 184.42,-1410.18 184.98,-1420.76 191.46,-1418.09"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="360,-1494 300,-1494 300,-1470 360,-1470 360,-1494"/>
-<text text-anchor="middle" x="330" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369.5,-1494 290.5,-1494 290.5,-1470 369.5,-1470 369.5,-1494"/>
+<text text-anchor="middle" x="330" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.97,-1478.05C283.93,-1475.01 264.06,-1469.78 248,-1461 227.93,-1450.03 209.19,-1431.82 196.49,-1417.8"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.44,-1476.06C276.5,-1472.89 261,-1468.11 248,-1461 227.93,-1450.03 209.19,-1431.82 196.49,-1417.8"/>
 <polygon fill="#000000" stroke="#000000" points="198.97,-1415.32 189.74,-1410.11 193.7,-1419.93 198.97,-1415.32"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node35" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="382.5,-1452 277.5,-1452 277.5,-1428 382.5,-1428 382.5,-1452"/>
-<text text-anchor="middle" x="330" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369,-1452 291,-1452 291,-1428 369,-1428 369,-1452"/>
+<text text-anchor="middle" x="330" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.93,-1427.93C270.07,-1425.09 258.62,-1422.02 248,-1419 239.45,-1416.57 230.34,-1413.85 221.65,-1411.19"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.99,-1430.53C277.39,-1427.04 261.98,-1422.97 248,-1419 239.45,-1416.57 230.34,-1413.85 221.65,-1411.19"/>
 <polygon fill="#000000" stroke="#000000" points="222.67,-1407.84 212.08,-1408.24 220.6,-1414.53 222.67,-1407.84"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358.5,-1410 301.5,-1410 301.5,-1386 358.5,-1386 358.5,-1410"/>
-<text text-anchor="middle" x="330" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1410 303,-1410 303,-1386 357,-1386 357,-1410"/>
+<text text-anchor="middle" x="330" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.32,-1398C279.13,-1398 247.62,-1398 222.28,-1398"/>
-<polygon fill="#000000" stroke="#000000" points="222.19,-1394.5 212.19,-1398 222.19,-1401.5 222.19,-1394.5"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.7,-1398C280.53,-1398 248.37,-1398 222.54,-1398"/>
+<polygon fill="#000000" stroke="#000000" points="222.26,-1394.5 212.26,-1398 222.26,-1401.5 222.26,-1394.5"/>
 </g>
-<!-- sourcefile~whm_kick.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~whm_kick.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1368 291.5,-1368 291.5,-1344 368.5,-1344 368.5,-1368"/>
-<text text-anchor="middle" x="330" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1368 303,-1368 303,-1344 357,-1344 357,-1368"/>
+<text text-anchor="middle" x="330" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
-</g>
-<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.4,-1365.37C277.7,-1368.88 262.11,-1372.99 248,-1377 239.45,-1379.43 230.34,-1382.15 221.65,-1384.81"/>
+</g>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.65,-1362.51C286.77,-1366.51 266.17,-1371.84 248,-1377 239.45,-1379.43 230.34,-1382.15 221.65,-1384.81"/>
 <polygon fill="#000000" stroke="#000000" points="220.6,-1381.47 212.08,-1387.76 222.67,-1388.16 220.6,-1381.47"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-1326 296,-1326 296,-1302 364,-1302 364,-1326"/>
-<text text-anchor="middle" x="330" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<text text-anchor="middle" x="330" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.69,-1318.8C280.49,-1321.93 262.66,-1326.98 248,-1335 227.93,-1345.97 209.19,-1364.18 196.49,-1378.2"/>
 <polygon fill="#000000" stroke="#000000" points="193.7,-1376.07 189.74,-1385.89 198.97,-1380.68 193.7,-1376.07"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-1284 287,-1284 287,-1260 373,-1260 373,-1284"/>
-<text text-anchor="middle" x="330" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371,-1284 289,-1284 289,-1260 371,-1260 371,-1284"/>
+<text text-anchor="middle" x="330" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.88,-1276.79C273.53,-1279.85 259.31,-1284.84 248,-1293 218.56,-1314.23 198.58,-1352.49 188.25,-1376.5"/>
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.96,-1276.33C275.02,-1279.34 259.9,-1284.42 248,-1293 218.56,-1314.23 198.58,-1352.49 188.25,-1376.5"/>
 <polygon fill="#000000" stroke="#000000" points="184.98,-1375.24 184.42,-1385.82 191.46,-1377.91 184.98,-1375.24"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-1242 287,-1242 287,-1218 373,-1218 373,-1242"/>
-<text text-anchor="middle" x="330" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="379,-1242 281,-1242 281,-1218 379,-1218 379,-1242"/>
+<text text-anchor="middle" x="330" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.59,-1233.79C273.07,-1236.77 258.82,-1241.97 248,-1251 208.99,-1283.56 191.17,-1343.39 184.07,-1375.78"/>
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.7,-1235.22C269.03,-1238.35 257.26,-1243.27 248,-1251 208.99,-1283.56 191.17,-1343.39 184.07,-1375.78"/>
 <polygon fill="#000000" stroke="#000000" points="180.55,-1375.5 181.98,-1386 187.41,-1376.9 180.55,-1375.5"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-1200 294,-1200 294,-1176 366,-1176 366,-1200"/>
-<text text-anchor="middle" x="330" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~whm_step.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369.5,-1200 290.5,-1200 290.5,-1176 369.5,-1176 369.5,-1200"/>
+<text text-anchor="middle" x="330" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.99,-1189.78C278.25,-1192.27 260.45,-1197.64 248,-1209 199.12,-1253.59 185.34,-1335.89 181.49,-1375.52"/>
+<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.29,-1190.41C275.52,-1193.14 259.48,-1198.52 248,-1209 199.12,-1253.59 185.34,-1335.89 181.49,-1375.52"/>
 <polygon fill="#000000" stroke="#000000" points="177.98,-1375.45 180.62,-1385.71 184.95,-1376.04 177.98,-1375.45"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372,-1158 288,-1158 288,-1134 372,-1134 372,-1158"/>
-<text text-anchor="middle" x="330" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="392,-1158 268,-1158 268,-1134 392,-1134 392,-1158"/>
+<text text-anchor="middle" x="330" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.89,-1148.47C273.67,-1151.27 258.65,-1156.69 248,-1167 188.89,-1224.21 180.47,-1329.95 179.74,-1375.82"/>
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.82,-1154.4C260.5,-1157.46 253.64,-1161.54 248,-1167 188.89,-1224.21 180.47,-1329.95 179.74,-1375.82"/>
 <polygon fill="#000000" stroke="#000000" points="176.24,-1375.86 179.7,-1385.88 183.24,-1375.9 176.24,-1375.86"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-1116 302.5,-1116 302.5,-1092 357.5,-1092 357.5,-1116"/>
-<text text-anchor="middle" x="330" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-1116 296,-1116 296,-1092 364,-1092 364,-1116"/>
+<text text-anchor="middle" x="330" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.23,-1104.19C284.54,-1105.77 262.11,-1110.76 248,-1125 212.4,-1160.94 189.89,-1317.47 182.59,-1375.9"/>
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.91,-1104.89C279.45,-1107.05 260.47,-1112.41 248,-1125 212.4,-1160.94 189.89,-1317.47 182.59,-1375.9"/>
 <polygon fill="#000000" stroke="#000000" points="179.11,-1375.56 181.37,-1385.91 186.06,-1376.41 179.11,-1375.56"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="365.5,-1074 294.5,-1074 294.5,-1050 365.5,-1050 365.5,-1074"/>
-<text text-anchor="middle" x="330" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~whm_kick.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-1074 291.5,-1074 291.5,-1050 368.5,-1050 368.5,-1074"/>
+<text text-anchor="middle" x="330" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.11,-1062.95C278.01,-1065.2 259.87,-1070.63 248,-1083 207.25,-1125.46 187.55,-1310.85 181.83,-1375.59"/>
+<title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.23,-1063.38C275.88,-1065.87 259.17,-1071.37 248,-1083 207.25,-1125.46 187.55,-1310.85 181.83,-1375.59"/>
 <polygon fill="#000000" stroke="#000000" points="178.31,-1375.63 180.95,-1385.89 185.29,-1376.23 178.31,-1375.63"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~util_peri.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-1032 303,-1032 303,-1008 357,-1008 357,-1032"/>
-<text text-anchor="middle" x="330" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-1032 296,-1032 296,-1008 364,-1008 364,-1032"/>
+<text text-anchor="middle" x="330" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.74,-1019.88C284.82,-1021.27 261.9,-1026.16 248,-1041 202.04,-1090.07 185.47,-1304.89 181.22,-1375.45"/>
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.61,-1020.61C279.08,-1022.69 260.12,-1028.06 248,-1041 202.04,-1090.07 185.47,-1304.89 181.22,-1375.45"/>
 <polygon fill="#000000" stroke="#000000" points="177.7,-1375.66 180.62,-1385.84 184.69,-1376.06 177.7,-1375.66"/>
 </g>
-<!-- sourcefile~whm_step.f90 -->
+<!-- sourcefile~helio_kick.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~whm_step.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369.5,-990 290.5,-990 290.5,-966 369.5,-966 369.5,-990"/>
-<text text-anchor="middle" x="330" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368.5,-990 291.5,-990 291.5,-966 368.5,-966 368.5,-990"/>
+<text text-anchor="middle" x="330" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.14,-979.29C274.99,-981.8 258.71,-987.34 248,-999 196.79,-1054.75 183.61,-1299.25 180.72,-1375.32"/>
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.39,-979.08C275.89,-981.5 259.01,-987.02 248,-999 196.79,-1054.75 183.61,-1299.25 180.72,-1375.32"/>
 <polygon fill="#000000" stroke="#000000" points="177.21,-1375.54 180.36,-1385.66 184.21,-1375.79 177.21,-1375.54"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-948 303,-948 303,-924 357,-924 357,-948"/>
-<text text-anchor="middle" x="330" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-948 287,-948 287,-924 373,-924 373,-948"/>
+<text text-anchor="middle" x="330" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.96,-935.71C284.91,-936.98 261.74,-941.81 248,-957 191.44,-1019.57 181.9,-1294.78 180.31,-1375.61"/>
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.7,-937.8C272.52,-940.55 257.84,-946.12 248,-957 191.44,-1019.57 181.9,-1294.78 180.31,-1375.61"/>
 <polygon fill="#000000" stroke="#000000" points="176.81,-1375.62 180.14,-1385.68 183.81,-1375.74 176.81,-1375.62"/>
 </g>
 <!-- sourcefile~discard.f90 -->
@@ -1019,319 +1019,319 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M297.38,-894.14C280.31,-895.96 260.28,-901.23 248,-915 186.09,-984.39 180.36,-1290.25 179.98,-1375.74"/>
 <polygon fill="#000000" stroke="#000000" points="176.48,-1375.87 179.96,-1385.88 183.48,-1375.88 176.48,-1375.87"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-864 287.5,-864 287.5,-840 372.5,-840 372.5,-864"/>
-<text text-anchor="middle" x="330" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-864 302.5,-864 302.5,-840 357.5,-840 357.5,-864"/>
+<text text-anchor="middle" x="330" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.39,-853.51C272.95,-856.19 257.9,-861.78 248,-873 180.79,-949.17 178.95,-1285.22 179.7,-1375.57"/>
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.47,-851.63C284.42,-852.9 261.46,-857.75 248,-873 180.79,-949.17 178.95,-1285.22 179.7,-1375.57"/>
 <polygon fill="#000000" stroke="#000000" points="176.2,-1375.81 179.8,-1385.77 183.2,-1375.74 176.2,-1375.81"/>
 </g>
-<!-- sourcefile~fraggle_regime.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-822 278.5,-822 278.5,-798 381.5,-798 381.5,-822"/>
-<text text-anchor="middle" x="330" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-822 287.5,-822 287.5,-798 372.5,-798 372.5,-822"/>
+<text text-anchor="middle" x="330" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.47,-813.49C266.97,-816.65 255.84,-822.03 248,-831 211.45,-872.83 186.78,-1275.97 181.2,-1375.75"/>
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.34,-811.46C272.88,-814.13 257.85,-819.73 248,-831 211.45,-872.83 186.78,-1275.97 181.2,-1375.75"/>
 <polygon fill="#000000" stroke="#000000" points="177.7,-1375.72 180.64,-1385.89 184.69,-1376.1 177.7,-1375.72"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-780 296,-780 296,-756 364,-756 364,-780"/>
-<text text-anchor="middle" x="330" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377.5,-780 282.5,-780 282.5,-756 377.5,-756 377.5,-780"/>
+<text text-anchor="middle" x="330" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge50" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.61,-768.18C278.86,-770.12 259.7,-775.5 248,-789 208.75,-834.28 185.92,-1271.52 181.01,-1375.77"/>
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.22,-770.48C269.4,-773.47 256.66,-779.01 248,-789 208.75,-834.28 185.92,-1271.52 181.01,-1375.77"/>
 <polygon fill="#000000" stroke="#000000" points="177.51,-1375.65 180.54,-1385.8 184.5,-1375.97 177.51,-1375.65"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node52" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357.5,-738 302.5,-738 302.5,-714 357.5,-714 357.5,-738"/>
-<text text-anchor="middle" x="330" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378,-738 282,-738 282,-714 378,-714 378,-738"/>
+<text text-anchor="middle" x="330" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.35,-725.53C284.25,-726.75 261.27,-731.58 248,-747 206.08,-795.72 185.14,-1266.78 180.84,-1375.63"/>
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M281.75,-728.54C269.07,-731.55 256.53,-737.09 248,-747 206.08,-795.72 185.14,-1266.78 180.84,-1375.63"/>
 <polygon fill="#000000" stroke="#000000" points="177.34,-1375.67 180.45,-1385.79 184.33,-1375.94 177.34,-1375.67"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="381.5,-696 278.5,-696 278.5,-672 381.5,-672 381.5,-696"/>
-<text text-anchor="middle" x="330" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-696 303,-696 303,-672 357,-672 357,-696"/>
+<text text-anchor="middle" x="330" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M278.34,-687.37C266.83,-690.54 255.74,-695.95 248,-705 203.37,-757.19 184.4,-1262.58 180.69,-1375.64"/>
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.71,-683.48C284.53,-684.64 261.31,-689.43 248,-705 203.37,-757.19 184.4,-1262.58 180.69,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="177.19,-1375.76 180.37,-1385.86 184.18,-1375.98 177.19,-1375.76"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-654 303,-654 303,-630 357,-630 357,-654"/>
-<text text-anchor="middle" x="330" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366.5,-654 293.5,-654 293.5,-630 366.5,-630 366.5,-654"/>
+<text text-anchor="middle" x="330" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.68,-641.46C284.49,-642.61 261.27,-647.4 248,-663 200.7,-718.62 183.72,-1257.76 180.57,-1375.4"/>
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.44,-642.34C277.18,-644.46 259.1,-649.94 248,-663 200.7,-718.62 183.72,-1257.76 180.57,-1375.4"/>
 <polygon fill="#000000" stroke="#000000" points="177.06,-1375.63 180.3,-1385.72 184.06,-1375.82 177.06,-1375.63"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-612 287,-612 287,-588 373,-588 373,-612"/>
-<text text-anchor="middle" x="330" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-612 287.5,-612 287.5,-588 372.5,-588 372.5,-612"/>
+<text text-anchor="middle" x="330" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.72,-601.37C272.37,-604.06 257.57,-609.69 248,-621 197.96,-680.15 183.04,-1254.56 180.44,-1375.66"/>
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.14,-601.3C272.66,-603.95 257.66,-609.58 248,-621 197.96,-680.15 183.04,-1254.56 180.44,-1375.66"/>
 <polygon fill="#000000" stroke="#000000" points="176.94,-1375.86 180.23,-1385.93 183.94,-1376 176.94,-1375.86"/>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-570 287,-570 287,-546 373,-546 373,-570"/>
-<text text-anchor="middle" x="330" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="358.5,-570 301.5,-570 301.5,-546 358.5,-546 358.5,-570"/>
+<text text-anchor="middle" x="330" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge55" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.69,-559.35C272.34,-562.03 257.55,-567.67 248,-579 195.25,-641.63 182.42,-1250.62 180.34,-1375.64"/>
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.47,-557.5C283.44,-558.76 260.91,-563.67 248,-579 195.25,-641.63 182.42,-1250.62 180.34,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="176.83,-1375.84 180.17,-1385.9 183.83,-1375.96 176.83,-1375.84"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377.5,-528 282.5,-528 282.5,-504 377.5,-504 377.5,-528"/>
-<text text-anchor="middle" x="330" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~util_fill.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="360,-528 300,-528 300,-504 360,-504 360,-528"/>
+<text text-anchor="middle" x="330" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.44,-518.21C269.47,-521.17 256.59,-526.76 248,-537 192.52,-603.14 181.83,-1247.08 180.24,-1375.71"/>
+<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.87,-515.6C282.12,-517.03 260.51,-522.09 248,-537 192.52,-603.14 181.83,-1247.08 180.24,-1375.71"/>
 <polygon fill="#000000" stroke="#000000" points="176.74,-1375.88 180.12,-1385.92 183.74,-1375.96 176.74,-1375.88"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~util_valid.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="401,-486 259,-486 259,-462 401,-462 401,-486"/>
-<text text-anchor="middle" x="330" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="366,-486 294,-486 294,-462 366,-462 366,-486"/>
+<text text-anchor="middle" x="330" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M258.69,-485.67C254.7,-488.24 251.07,-491.32 248,-495 189.77,-564.67 181.26,-1243.95 180.15,-1375.87"/>
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M293.76,-474.21C277.37,-476.26 259.09,-481.73 248,-495 189.77,-564.67 181.26,-1243.95 180.15,-1375.87"/>
 <polygon fill="#000000" stroke="#000000" points="176.65,-1375.95 180.07,-1385.98 183.65,-1376.01 176.65,-1375.95"/>
 </g>
-<!-- sourcefile~util_fill.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~util_fill.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="360,-444 300,-444 300,-420 360,-420 360,-444"/>
-<text text-anchor="middle" x="330" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="405,-444 255,-444 255,-420 405,-420 405,-444"/>
+<text text-anchor="middle" x="330" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.83,-431.57C282.07,-432.99 260.46,-438.04 248,-453 187.08,-526.15 180.73,-1239.73 180.08,-1375.69"/>
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M257.95,-444.13C254.25,-446.61 250.88,-449.54 248,-453 187.08,-526.15 180.73,-1239.73 180.08,-1375.69"/>
 <polygon fill="#000000" stroke="#000000" points="176.58,-1375.74 180.03,-1385.76 183.58,-1375.77 176.58,-1375.74"/>
 </g>
-<!-- sourcefile~fraggle_util.f90 -->
+<!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~fraggle_util.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-402 288.5,-402 288.5,-378 371.5,-378 371.5,-402"/>
-<text text-anchor="middle" x="330" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-402 287,-402 287,-378 373,-378 373,-402"/>
+<text text-anchor="middle" x="330" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.29,-390.98C273.42,-393.52 257.84,-399.15 248,-411 184.37,-487.64 180.22,-1235.84 180,-1375.58"/>
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.61,-391.28C272.25,-393.95 257.47,-399.6 248,-411 184.37,-487.64 180.22,-1235.84 180,-1375.58"/>
 <polygon fill="#000000" stroke="#000000" points="176.5,-1375.89 179.99,-1385.9 183.5,-1375.9 176.5,-1375.89"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node61" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="379,-360 281,-360 281,-336 379,-336 379,-360"/>
-<text text-anchor="middle" x="330" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~fraggle_util.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="371.5,-360 288.5,-360 288.5,-336 371.5,-336 371.5,-360"/>
+<text text-anchor="middle" x="330" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M280.67,-350.54C268.27,-353.59 256.15,-359.15 248,-369 181.65,-449.14 179.73,-1232.16 179.94,-1375.52"/>
+<title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M288.28,-348.96C273.4,-351.5 257.82,-357.14 248,-369 181.65,-449.14 179.73,-1232.16 179.94,-1375.52"/>
 <polygon fill="#000000" stroke="#000000" points="176.44,-1375.74 179.96,-1385.73 183.44,-1375.73 176.44,-1375.74"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377,-318 283,-318 283,-294 377,-294 377,-318"/>
-<text text-anchor="middle" x="330" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-318 287.5,-318 287.5,-294 372.5,-294 372.5,-318"/>
+<text text-anchor="middle" x="330" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge61" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.77,-308.03C269.64,-310.96 256.6,-316.58 248,-327 178.91,-410.66 179.25,-1228.83 179.87,-1375.53"/>
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.42,-307.1C272.79,-309.7 257.62,-315.35 248,-327 178.91,-410.66 179.25,-1228.83 179.87,-1375.53"/>
 <polygon fill="#000000" stroke="#000000" points="176.38,-1375.97 179.92,-1385.95 183.38,-1375.93 176.38,-1375.97"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-276 292,-276 292,-252 368,-252 368,-276"/>
-<text text-anchor="middle" x="330" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="373,-276 287,-276 287,-252 373,-252 373,-276"/>
+<text text-anchor="middle" x="330" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.6,-264.42C275.74,-266.65 258.53,-272.22 248,-285 176.17,-372.19 178.8,-1225.69 179.82,-1375.58"/>
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.98,-265.16C272.48,-267.8 257.51,-273.45 248,-285 176.17,-372.19 178.8,-1225.69 179.82,-1375.58"/>
 <polygon fill="#000000" stroke="#000000" points="176.32,-1375.87 179.89,-1385.84 183.32,-1375.81 176.32,-1375.87"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node64" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369.5,-234 290.5,-234 290.5,-210 369.5,-210 369.5,-234"/>
-<text text-anchor="middle" x="330" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="367.5,-234 292.5,-234 292.5,-210 367.5,-210 367.5,-234"/>
+<text text-anchor="middle" x="330" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.33,-222.59C274.83,-224.94 258.24,-230.54 248,-243 173.42,-333.74 178.36,-1222.83 179.77,-1375.69"/>
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M292.42,-222.29C276.33,-224.45 258.7,-229.98 248,-243 173.42,-333.74 178.36,-1222.83 179.77,-1375.69"/>
 <polygon fill="#000000" stroke="#000000" points="176.27,-1375.79 179.86,-1385.75 183.27,-1375.72 176.27,-1375.79"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="368,-192 292,-192 292,-168 368,-168 368,-192"/>
-<text text-anchor="middle" x="330" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="369.5,-192 290.5,-192 290.5,-168 369.5,-168 369.5,-192"/>
+<text text-anchor="middle" x="330" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M291.99,-180.34C276.02,-182.53 258.59,-188.08 248,-201 209.25,-248.25 184.37,-1216.3 180.52,-1375.83"/>
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M290.32,-180.58C274.81,-182.93 258.23,-188.53 248,-201 209.25,-248.25 184.37,-1216.3 180.52,-1375.83"/>
 <polygon fill="#000000" stroke="#000000" points="177.02,-1375.82 180.28,-1385.9 184.02,-1375.99 177.02,-1375.82"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="392,-150 268,-150 268,-126 392,-126 392,-150"/>
-<text text-anchor="middle" x="330" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="389,-150 271,-150 271,-126 389,-126 389,-150"/>
+<text text-anchor="middle" x="330" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M267.77,-144.72C260.17,-148 253.25,-152.59 248,-159 207.9,-207.99 184.1,-1212.01 180.48,-1375.57"/>
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M270.59,-143.58C261.9,-146.9 253.89,-151.81 248,-159 207.9,-207.99 184.1,-1212.01 180.48,-1375.57"/>
 <polygon fill="#000000" stroke="#000000" points="176.98,-1375.79 180.26,-1385.87 183.98,-1375.95 176.98,-1375.79"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="357,-108 303,-108 303,-84 357,-84 357,-108"/>
-<text text-anchor="middle" x="330" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377,-108 283,-108 283,-84 377,-84 377,-108"/>
+<text text-anchor="middle" x="330" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M302.88,-95.28C284.55,-96.31 261.05,-101.03 248,-117 206.5,-167.79 183.79,-1209.95 180.44,-1375.83"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.7,-97.97C269.58,-100.91 256.55,-106.54 248,-117 206.5,-167.79 183.79,-1209.95 180.44,-1375.83"/>
 <polygon fill="#000000" stroke="#000000" points="176.94,-1375.79 180.24,-1385.86 183.94,-1375.93 176.94,-1375.79"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-66 296,-66 296,-42 364,-42 364,-66"/>
-<text text-anchor="middle" x="330" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="377,-66 283,-66 283,-42 377,-42 377,-66"/>
+<text text-anchor="middle" x="330" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M295.68,-53.86C278.75,-55.68 259.39,-61.04 248,-75 205.15,-127.54 183.54,-1206.03 180.4,-1375.64"/>
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M282.69,-55.97C269.56,-58.9 256.54,-64.53 248,-75 205.15,-127.54 183.54,-1206.03 180.4,-1375.64"/>
 <polygon fill="#000000" stroke="#000000" points="176.9,-1375.8 180.21,-1385.87 183.9,-1375.93 176.9,-1375.8"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~walltime_classes.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-24 287.5,-24 287.5,0 372.5,0 372.5,-24"/>
-<text text-anchor="middle" x="330" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~walltime_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="370,-24 290,-24 290,0 370,0 370,-24"/>
+<text text-anchor="middle" x="330" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M287.33,-13.03C272.7,-15.62 257.54,-21.28 248,-33 203.76,-87.32 183.27,-1203.36 180.36,-1375.73"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~walltime_classes.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M289.86,-12.61C274.47,-14.99 258.09,-20.61 248,-33 203.76,-87.32 183.27,-1203.36 180.36,-1375.73"/>
 <polygon fill="#000000" stroke="#000000" points="176.86,-1375.84 180.19,-1385.89 183.86,-1375.95 176.86,-1375.84"/>
 </g>
 </g>
diff --git a/docs/sourcefile/whm_classes.f90.html b/docs/sourcefile/whm_classes.f90.html
index 66a08af87..67ee89230 100644
--- a/docs/sourcefile/whm_classes.f90.html
+++ b/docs/sourcefile/whm_classes.f90.html
@@ -234,44 +234,44 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<polygon fill="none" stroke="black" points="379,-24 285,-24 285,0 379,0 379,-24"/>
-<text text-anchor="middle" x="332" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_classes.f90</text>
+<polygon fill="none" stroke="black" points="379,-44 285,-44 285,-20 379,-20 379,-44"/>
+<text text-anchor="middle" x="332" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_classes.f90</text>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_classes.f90~~EfferentGraph_node2" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-44 142,-44 142,-20 249,-20 249,-44"/>
-<text text-anchor="middle" x="195.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-44 0,-44 0,-20 106,-20 106,-44"/>
+<text text-anchor="middle" x="53" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_classes.f90~~EfferentGraph_edge1" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.71,-18.88C276.52,-20.1 267.87,-21.39 259.31,-22.66"/>
-<polygon fill="#000000" stroke="#000000" points="258.72,-19.21 249.34,-24.14 259.75,-26.13 258.72,-19.21"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.6,-32.66C272.98,-32.8 260.53,-32.93 249,-33 201.45,-33.29 189.55,-33.27 142,-33 133.65,-32.95 124.86,-32.88 116.2,-32.79"/>
+<polygon fill="#000000" stroke="#000000" points="116.15,-29.29 106.12,-32.69 116.08,-36.29 116.15,-29.29"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-24 0,-24 0,0 106,0 106,-24"/>
-<text text-anchor="middle" x="53" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="249,-24 142,-24 142,0 249,0 249,-24"/>
+<text text-anchor="middle" x="195.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.6,-11.34C272.98,-11.2 260.53,-11.07 249,-11 201.45,-10.71 189.55,-10.73 142,-11 133.65,-11.05 124.86,-11.12 116.2,-11.21"/>
-<polygon fill="#000000" stroke="#000000" points="116.08,-7.71 106.12,-11.31 116.15,-14.71 116.08,-7.71"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M284.71,-25.12C276.52,-23.9 267.87,-22.61 259.31,-21.34"/>
+<polygon fill="#000000" stroke="#000000" points="259.75,-17.87 249.34,-19.86 258.72,-24.79 259.75,-17.87"/>
 </g>
 <!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_classes.f90~~EfferentGraph_edge3" class="edge">
 <title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-24.5C133.39,-23.3 124.64,-22.06 116.05,-20.83"/>
-<polygon fill="#000000" stroke="#000000" points="116.47,-17.36 106.08,-19.41 115.49,-24.29 116.47,-17.36"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M141.78,-19.5C133.39,-20.7 124.64,-21.94 116.05,-23.17"/>
+<polygon fill="#000000" stroke="#000000" points="115.49,-19.71 106.08,-24.59 116.47,-26.64 115.49,-19.71"/>
 </g>
 </g>
 </svg>
@@ -324,1255 +324,1248 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_classes.f90~~AfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_classesf90AfferentGraph" width="641pt" height="2667pt"
- viewBox="0.00 0.00 641.00 2666.71" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<svg id="sourcefilewhm_classesf90AfferentGraph" width="641pt" height="2671pt"
+ viewBox="0.00 0.00 641.00 2670.67" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph" class="graph" transform="scale(0.95 0.95) rotate(0) translate(4 2800)">
 <title>sourcefile~~whm_classes.f90~~AfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-2800 670,-2800 670,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-2800 669,-2800 669,4 -4,4"/>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node1" class="node">
 <title>sourcefile~whm_classes.f90</title>
-<polygon fill="none" stroke="black" points="94,-1431 0,-1431 0,-1407 94,-1407 94,-1431"/>
-<text text-anchor="middle" x="47" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_classes.f90</text>
+<polygon fill="none" stroke="black" points="94,-1348 0,-1348 0,-1324 94,-1324 94,-1348"/>
+<text text-anchor="middle" x="47" y="-1333.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_classes.f90</text>
 </g>
-<!-- sourcefile~whm_coord.f90 -->
+<!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~whm_coord.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="627,-2796 541,-2796 541,-2772 627,-2772 627,-2796"/>
-<text text-anchor="middle" x="584" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
+<title>sourcefile~whm_setup.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="625.5,-2796 540.5,-2796 540.5,-2772 625.5,-2772 625.5,-2796"/>
+<text text-anchor="middle" x="583" y="-2781.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.71,-2778.02C527.63,-2774.9 513.62,-2770.17 502,-2763 363.66,-2677.72 332.88,-2633.76 261,-2488 70.45,-2101.59 50.36,-1556.99 48.25,-1441.18"/>
-<polygon fill="#000000" stroke="#000000" points="51.75,-1441.01 48.09,-1431.06 44.75,-1441.11 51.75,-1441.01"/>
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.21,-2777.15C527.16,-2773.98 513.04,-2769.44 501,-2763 447.43,-2734.35 434.68,-2721.17 399,-2672 308.64,-2547.49 306.81,-2501.54 260,-2355 135.61,-1965.57 65.5,-1468.59 50.89,-1358.32"/>
+<polygon fill="#000000" stroke="#000000" points="54.31,-1357.54 49.54,-1348.09 47.37,-1358.46 54.31,-1357.54"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node11" class="node">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node8" class="node">
 <title>sourcefile~swiftest.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="466,-1431 400,-1431 400,-1407 466,-1407 466,-1431"/>
-<text text-anchor="middle" x="433" y="-1416.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="465,-1368 399,-1368 399,-1344 465,-1344 465,-1368"/>
+<text text-anchor="middle" x="432" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge80" class="edge">
-<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.92,-2782.89C526.41,-2780.26 511.45,-2774.6 502,-2763 480.21,-2736.27 440.74,-1614.79 434.77,-1441.41"/>
-<polygon fill="#000000" stroke="#000000" points="438.26,-1441.06 434.42,-1431.18 431.26,-1441.3 438.26,-1441.06"/>
+<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge65" class="edge">
+<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.32,-2782.98C525.69,-2780.39 510.53,-2774.72 501,-2763 478.18,-2734.93 439.43,-1556.18 433.71,-1378.36"/>
+<polygon fill="#000000" stroke="#000000" points="437.21,-1378.21 433.39,-1368.33 430.21,-1378.43 437.21,-1378.21"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="225,-1471 130,-1471 130,-1447 225,-1447 225,-1471"/>
-<text text-anchor="middle" x="177.5" y="-1456.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~whm_util.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="619.5,-234 546.5,-234 546.5,-210 619.5,-210 619.5,-234"/>
+<text text-anchor="middle" x="583" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M137.95,-1447C124.98,-1442.96 110.34,-1438.4 96.69,-1434.16"/>
-<polygon fill="#000000" stroke="#000000" points="97.56,-1430.76 86.97,-1431.13 95.48,-1437.45 97.56,-1430.76"/>
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.29,-216.7C531.64,-213.53 514.89,-208.6 501,-201 464.85,-181.23 463.33,-110.11 433,-138"/>
 </g>
-<!-- sourcefile~whm_drift.f90 -->
+<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge69" class="edge">
+<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.27,-222.19C529.96,-224.27 511.9,-229.77 501,-243 465.01,-286.69 438.02,-1179.65 433.63,-1333.52"/>
+<polygon fill="#000000" stroke="#000000" points="430.13,-1333.56 433.34,-1343.66 437.12,-1333.76 430.13,-1333.56"/>
+</g>
+<!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~whm_drift.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-234 545.5,-234 545.5,-210 622.5,-210 622.5,-234"/>
-<text text-anchor="middle" x="584" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
+<title>sourcefile~whm_gr.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="617,-192 549,-192 549,-168 617,-168 617,-192"/>
+<text text-anchor="middle" x="583" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.26,-216.25C531.11,-213.07 515.26,-208.25 502,-201 465.85,-181.23 475.1,-135.16 434,-138"/>
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.8,-171.76C534.11,-168.02 516.65,-163.44 501,-159 470.57,-150.36 456.28,-116.59 433,-138"/>
 </g>
-<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge48" class="edge">
-<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.16,-222.46C529.42,-224.73 512.42,-230.31 502,-243 463.94,-289.35 438.53,-1238.51 434.55,-1396.73"/>
-<polygon fill="#000000" stroke="#000000" points="431.05,-1396.65 434.3,-1406.73 438.05,-1396.82 431.05,-1396.65"/>
+<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge39" class="edge">
+<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.73,-179.89C531.8,-181.72 512.44,-187.08 501,-201 463.63,-246.46 437.69,-1176.87 433.57,-1333.66"/>
+<polygon fill="#000000" stroke="#000000" points="430.07,-1333.86 433.31,-1343.95 437.06,-1334.05 430.07,-1333.86"/>
 </g>
-<!-- sourcefile~whm_util.f90 -->
+<!-- sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~whm_util.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/whm_util.f90.html" xlink:title="whm_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="620.5,-192 547.5,-192 547.5,-168 620.5,-168 620.5,-192"/>
-<text text-anchor="middle" x="584" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_util.f90</text>
+<title>sourcefile~helio_classes.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="224,-1348 130,-1348 130,-1324 224,-1324 224,-1348"/>
+<text text-anchor="middle" x="177" y="-1333.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.42,-171.15C533.25,-167.53 516.81,-163.21 502,-159 471.57,-150.36 465.56,-135.82 434,-138"/>
-</g>
-<!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge31" class="edge">
-<title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.24,-180.17C530.92,-182.24 512.86,-187.74 502,-201 462.59,-249.09 438.26,-1234.12 434.51,-1396.45"/>
-<polygon fill="#000000" stroke="#000000" points="431,-1396.61 434.27,-1406.69 438,-1396.77 431,-1396.61"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M129.79,-1336C121.54,-1336 112.87,-1336 104.37,-1336"/>
+<polygon fill="#000000" stroke="#000000" points="104.14,-1332.5 94.14,-1336 104.14,-1339.5 104.14,-1332.5"/>
 </g>
-<!-- sourcefile~helio_classes.f90 -->
+<!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="224.5,-1391 130.5,-1391 130.5,-1367 224.5,-1367 224.5,-1391"/>
-<text text-anchor="middle" x="177.5" y="-1376.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<title>sourcefile~whm_drift.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/whm_drift.f90.html" xlink:title="whm_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621.5,-150 544.5,-150 544.5,-126 621.5,-126 621.5,-150"/>
+<text text-anchor="middle" x="583" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M137.95,-1391C124.98,-1395.04 110.34,-1399.6 96.69,-1403.84"/>
-<polygon fill="#000000" stroke="#000000" points="95.48,-1400.55 86.97,-1406.87 97.56,-1407.24 95.48,-1400.55"/>
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.76,-125.92C513.11,-116.86 463.18,-110.25 433,-138"/>
+</g>
+<!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge25" class="edge">
+<title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.16,-138.46C528.41,-140.73 511.41,-146.31 501,-159 462.25,-206.25 437.37,-1174.3 433.52,-1333.83"/>
+<polygon fill="#000000" stroke="#000000" points="430.02,-1333.82 433.28,-1343.9 437.02,-1333.99 430.02,-1333.82"/>
 </g>
 <!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node7" class="node">
 <title>sourcefile~whm_step.f90</title>
 <g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/whm_step.f90.html" xlink:title="whm_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="623.5,-150 544.5,-150 544.5,-126 623.5,-126 623.5,-150"/>
-<text text-anchor="middle" x="584" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-108 543.5,-108 543.5,-84 622.5,-84 622.5,-108"/>
+<text text-anchor="middle" x="583" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_step.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge6" class="edge">
 <title>sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.36,-136.54C514.25,-135.75 471.42,-135.41 434,-138"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.42,-97.44C510.27,-100.66 463.17,-110.26 433,-138"/>
 </g>
 <!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge70" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge56" class="edge">
 <title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.3,-138.57C528.79,-140.91 512.21,-146.52 502,-159 461.24,-208.84 437.99,-1229.87 434.47,-1396.19"/>
-<polygon fill="#000000" stroke="#000000" points="430.96,-1396.59 434.25,-1406.66 437.96,-1396.74 430.96,-1396.59"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.31,-96.57C527.8,-98.92 511.21,-104.52 501,-117 460.9,-165.99 437.1,-1170.01 433.48,-1333.57"/>
+<polygon fill="#000000" stroke="#000000" points="429.98,-1333.79 433.26,-1343.87 436.98,-1333.95 429.98,-1333.79"/>
 </g>
-<!-- sourcefile~whm_gr.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~whm_gr.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/whm_gr.f90.html" xlink:title="whm_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="618,-108 550,-108 550,-84 618,-84 618,-108"/>
-<text text-anchor="middle" x="584" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_gr.f90</text>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.5,-1301C252.16,-1290.57 224.01,-1248.64 178,-1286"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M412.72,-1343.85C390.26,-1329.81 350.46,-1307.79 312.5,-1301"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge14" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.5,-1301C275.46,-1294.73 236.11,-1307.75 209.47,-1319.65"/>
+<polygon fill="#000000" stroke="#000000" points="207.84,-1316.54 200.26,-1323.94 210.8,-1322.89 207.84,-1316.54"/>
+</g>
+<!-- sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node11" class="node">
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-1273 264,-1273 264,-1249 359,-1249 359,-1273"/>
+<text text-anchor="middle" x="311.5" y="-1258.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.8,-104.24C535.11,-107.98 517.65,-112.56 502,-117 471.57,-125.64 465.56,-135.82 434,-138"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge85" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M421.15,-1343.87C408.73,-1329.1 386.17,-1304.04 363,-1287 358.58,-1283.75 353.7,-1280.69 348.76,-1277.88"/>
+<polygon fill="#000000" stroke="#000000" points="350.37,-1274.77 339.91,-1273.12 347.06,-1280.94 350.37,-1274.77"/>
+</g>
+<!-- sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node31" class="node">
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="363,-1368 260,-1368 260,-1344 363,-1344 363,-1368"/>
+<text text-anchor="middle" x="311.5" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+</a>
 </g>
-<!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge36" class="edge">
-<title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.69,-95.86C532.75,-97.68 513.39,-103.05 502,-117 459.85,-168.63 437.69,-1227.87 434.42,-1396.47"/>
-<polygon fill="#000000" stroke="#000000" points="430.92,-1396.59 434.23,-1406.66 437.92,-1396.73 430.92,-1396.59"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge100" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M398.93,-1356C391.05,-1356 382.35,-1356 373.59,-1356"/>
+<polygon fill="#000000" stroke="#000000" points="373.33,-1352.5 363.33,-1356 373.33,-1359.5 373.33,-1352.5"/>
 </g>
 <!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node9" class="node">
 <title>sourcefile~whm_kick.f90</title>
 <g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/whm_kick.f90.html" xlink:title="whm_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-66 545.5,-66 545.5,-42 622.5,-42 622.5,-66"/>
-<text text-anchor="middle" x="584" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621.5,-66 544.5,-66 544.5,-42 621.5,-42 621.5,-66"/>
+<text text-anchor="middle" x="583" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_kick.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge8" class="edge">
 <title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.26,-59.75C531.11,-62.93 515.26,-67.75 502,-75 465.85,-94.77 475.1,-135.16 434,-138"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.26,-59.75C530.11,-62.93 514.26,-67.75 501,-75 464.85,-94.77 463.33,-110.11 433,-138"/>
 </g>
 <!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge61" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge59" class="edge">
 <title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.12,-54.43C529.37,-56.69 512.37,-62.28 502,-75 458.47,-128.41 437.42,-1225.08 434.38,-1396.54"/>
-<polygon fill="#000000" stroke="#000000" points="430.88,-1396.61 434.21,-1406.67 437.88,-1396.74 430.88,-1396.61"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.14,-54.44C528.39,-56.71 511.39,-62.29 501,-75 480.23,-100.42 440.02,-1166.11 433.81,-1333.87"/>
+<polygon fill="#000000" stroke="#000000" points="430.31,-1333.87 433.44,-1343.99 437.31,-1334.13 430.31,-1333.87"/>
 </g>
-<!-- sourcefile~whm_setup.f90 -->
+<!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~whm_setup.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/whm_setup.f90.html" xlink:title="whm_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626.5,-24 541.5,-24 541.5,0 626.5,0 626.5,-24"/>
-<text text-anchor="middle" x="584" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_setup.f90</text>
+<title>sourcefile~whm_coord.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/whm_coord.f90.html" xlink:title="whm_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626,-24 540,-24 540,0 626,0 626,-24"/>
+<text text-anchor="middle" x="583" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_coord.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432,-138C158.88,-156.9 63.09,-1228.08 49.69,-1396.75"/>
-<polygon fill="#000000" stroke="#000000" points="46.18,-1396.68 48.89,-1406.92 53.16,-1397.23 46.18,-1396.68"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.3,-16.7C527.83,-19.74 513.43,-24.76 502,-33 456.91,-65.53 485.09,-116.07 434,-138"/>
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431,-138C46.42,-491.65 583.6,-956.67 178,-1286"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.88,-16.79C526.53,-19.85 512.31,-24.84 501,-33 455.91,-65.53 473.69,-100.11 433,-138"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M176,-1286C154.95,-1302.66 127.69,-1314.33 103.73,-1322.18"/>
+<polygon fill="#000000" stroke="#000000" points="102.54,-1318.89 94.04,-1325.21 104.63,-1325.57 102.54,-1318.89"/>
 </g>
-<!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge37" class="edge">
-<title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.33,-13.02C526.69,-15.62 511.54,-21.28 502,-33 479.52,-60.63 440.52,-1220.65 434.73,-1396.71"/>
-<polygon fill="#000000" stroke="#000000" points="431.23,-1396.75 434.4,-1406.86 438.22,-1396.98 431.23,-1396.75"/>
+<!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge62" class="edge">
+<title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.92,-13.11C525.42,-15.74 510.46,-21.4 501,-33 479.56,-59.28 439.88,-1160.99 433.79,-1333.41"/>
+<polygon fill="#000000" stroke="#000000" points="430.29,-1333.48 433.43,-1343.6 437.28,-1333.73 430.29,-1333.48"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.5,-1419C240.09,-1419 157.8,-1419 104.44,-1419"/>
-<polygon fill="#000000" stroke="#000000" points="104.17,-1415.5 94.17,-1419 104.17,-1422.5 104.17,-1415.5"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.5,-1419C276.5,-1419 238.42,-1431.86 212.02,-1443"/>
-<polygon fill="#000000" stroke="#000000" points="210.61,-1439.79 202.84,-1447 213.41,-1446.21 210.61,-1439.79"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge26" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M311.5,-1419C276.5,-1419 238.42,-1406.14 212.02,-1395"/>
-<polygon fill="#000000" stroke="#000000" points="213.41,-1391.79 202.84,-1391 210.61,-1398.21 213.41,-1391.79"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M399.81,-1419C375.98,-1419 342.71,-1419 313.5,-1419"/>
-</g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node62" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="364,-1471 261,-1471 261,-1447 364,-1447 364,-1471"/>
-<text text-anchor="middle" x="312.5" y="-1456.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge103" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M399.93,-1429.82C387.36,-1434.07 372.7,-1439.02 359.06,-1443.62"/>
-<polygon fill="#000000" stroke="#000000" points="357.71,-1440.38 349.35,-1446.9 359.95,-1447.02 357.71,-1440.38"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M263.92,-1259.22C236.21,-1260.53 201.9,-1266.6 178,-1286"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90 -->
+<!-- sourcefile~symba_collision.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node12" class="node">
-<title>sourcefile~symba_encounter_check.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="659,-2292 509,-2292 509,-2268 659,-2268 659,-2292"/>
-<text text-anchor="middle" x="584" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
+<title>sourcefile~symba_collision.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node12"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="636,-2334 530,-2334 530,-2310 636,-2310 636,-2334"/>
+<text text-anchor="middle" x="583" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.99,-2267.84C508.28,-2265.37 504.9,-2262.45 502,-2259 447.86,-2194.58 436.11,-1567.57 434.29,-1441.15"/>
-<polygon fill="#000000" stroke="#000000" points="437.78,-1441.05 434.15,-1431.1 430.79,-1441.15 437.78,-1441.05"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge18" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M529.91,-2318.41C518.87,-2315.19 508.34,-2309.82 501,-2301 440.08,-2227.85 433.73,-1514.27 433.08,-1378.31"/>
+<polygon fill="#000000" stroke="#000000" points="436.58,-1378.23 433.03,-1368.24 429.58,-1378.26 436.58,-1378.23"/>
 </g>
-<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge96" class="edge">
-<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.53,-2292.08C513.19,-2300.61 464.54,-2306.38 434,-2280"/>
+<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge93" class="edge">
+<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M533.93,-2334.07C523.07,-2336.91 511.62,-2339.98 501,-2343 470.57,-2351.64 456.66,-2385 433,-2364"/>
 </g>
 <!-- sourcefile~symba_step.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node13" class="node">
 <title>sourcefile~symba_step.f90</title>
 <g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node13"><a xlink:href=".././sourcefile/symba_step.f90.html" xlink:title="symba_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="628,-2250 540,-2250 540,-2226 628,-2226 628,-2250"/>
-<text text-anchor="middle" x="584" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="627,-2292 539,-2292 539,-2268 627,-2268 627,-2292"/>
+<text text-anchor="middle" x="583" y="-2277.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_step.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge28" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge27" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.86,-2236.48C525.78,-2233.73 511.37,-2228.1 502,-2217 450.58,-2156.08 436.72,-1563.86 434.39,-1441.18"/>
-<polygon fill="#000000" stroke="#000000" points="437.88,-1441.03 434.2,-1431.09 430.88,-1441.15 437.88,-1441.03"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M538.8,-2278.53C524.71,-2275.79 510.32,-2270.15 501,-2259 442.77,-2189.33 434.26,-1510.05 433.15,-1378.13"/>
+<polygon fill="#000000" stroke="#000000" points="436.65,-1377.99 433.07,-1368.02 429.65,-1378.05 436.65,-1377.99"/>
 </g>
 <!-- sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge98" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge94" class="edge">
 <title>sourcefile~symba_step.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.6,-2248.86C527.41,-2252.02 514.16,-2255.55 502,-2259 471.57,-2267.64 457.94,-2300.68 434,-2280"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M538.88,-2287.02C526.19,-2290.17 512.6,-2294.66 501,-2301 464.85,-2320.77 463.81,-2391.35 433,-2364"/>
 </g>
-<!-- sourcefile~fraggle_io.f90 -->
+<!-- sourcefile~kick.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node14" class="node">
-<title>sourcefile~fraggle_io.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="623,-2040 545,-2040 545,-2016 623,-2016 623,-2040"/>
-<text text-anchor="middle" x="584" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
+<title>sourcefile~kick.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node14"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="610,-1200 556,-1200 556,-1176 610,-1176 610,-1200"/>
+<text text-anchor="middle" x="583" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.67,-2027.13C529.22,-2024.73 512.59,-2019.16 502,-2007 464.08,-1963.43 440.32,-1542.89 435.09,-1441.1"/>
-<polygon fill="#000000" stroke="#000000" points="438.58,-1440.84 434.58,-1431.03 431.59,-1441.2 438.58,-1440.84"/>
+<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge19" class="edge">
+<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.67,-1189.13C538.4,-1191.13 516.28,-1196.25 501,-1209 461.99,-1241.56 444.17,-1301.39 437.07,-1333.78"/>
+<polygon fill="#000000" stroke="#000000" points="433.55,-1333.5 434.98,-1344 440.41,-1334.9 433.55,-1333.5"/>
 </g>
-<!-- sourcefile~fraggle_generate.f90 -->
+<!-- sourcefile~util_exit.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node15" class="node">
-<title>sourcefile~fraggle_generate.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="640,-1998 528,-1998 528,-1974 640,-1974 640,-1998"/>
-<text text-anchor="middle" x="584" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
+<title>sourcefile~util_exit.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node15"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="616.5,-1158 549.5,-1158 549.5,-1134 616.5,-1134 616.5,-1158"/>
+<text text-anchor="middle" x="583" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge30" class="edge">
-<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M527.9,-1981.09C518.07,-1977.82 508.81,-1972.75 502,-1965 432.12,-1885.41 432.28,-1534.03 433.57,-1441.43"/>
-<polygon fill="#000000" stroke="#000000" points="437.08,-1441.29 433.74,-1431.23 430.08,-1441.17 437.08,-1441.29"/>
+<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge20" class="edge">
+<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.42,-1147.42C533.1,-1149.73 514.09,-1155.06 501,-1167 452.12,-1211.59 438.34,-1293.89 434.49,-1333.52"/>
+<polygon fill="#000000" stroke="#000000" points="430.98,-1333.45 433.62,-1343.71 437.95,-1334.04 430.98,-1333.45"/>
 </g>
-<!-- sourcefile~helio_kick.f90 -->
+<!-- sourcefile~util_index.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node16" class="node">
-<title>sourcefile~helio_kick.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-444 545.5,-444 545.5,-420 622.5,-420 622.5,-444"/>
-<text text-anchor="middle" x="584" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
+<title>sourcefile~util_index.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node16"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621,-1116 545,-1116 545,-1092 621,-1092 621,-1116"/>
+<text text-anchor="middle" x="583" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge23" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.12,-424.66C531.26,-421.33 515.63,-416.82 502,-411 469.33,-397.05 469.44,-366.55 434,-369"/>
-</g>
-<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge33" class="edge">
-<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.24,-432.52C529.51,-434.81 512.5,-440.38 502,-453 439.72,-527.89 434.47,-1258.75 434.04,-1396.63"/>
-<polygon fill="#000000" stroke="#000000" points="430.54,-1396.81 434.01,-1406.82 437.54,-1396.83 430.54,-1396.81"/>
+<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge21" class="edge">
+<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.63,-1105.79C529.35,-1108.35 512.59,-1113.79 501,-1125 441.89,-1182.21 433.47,-1287.95 432.74,-1333.82"/>
+<polygon fill="#000000" stroke="#000000" points="429.24,-1333.86 432.7,-1343.88 436.24,-1333.9 429.24,-1333.86"/>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90 -->
+<!-- sourcefile~symba_kick.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node17" class="node">
-<title>sourcefile~tides_getacch_pl.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="639.5,-1956 528.5,-1956 528.5,-1932 639.5,-1932 639.5,-1956"/>
-<text text-anchor="middle" x="584" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
+<title>sourcefile~symba_kick.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node17"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626,-2250 540,-2250 540,-2226 626,-2226 626,-2250"/>
+<text text-anchor="middle" x="583" y="-2235.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge32" class="edge">
-<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M528.37,-1939.18C518.38,-1935.91 508.94,-1930.82 502,-1923 437.45,-1850.23 433.64,-1529.35 433.83,-1441.38"/>
-<polygon fill="#000000" stroke="#000000" points="437.33,-1441.2 433.88,-1431.19 430.33,-1441.17 437.33,-1441.2"/>
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge22" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.67,-2236.67C525.32,-2233.99 510.52,-2228.35 501,-2217 445.52,-2150.86 434.83,-1506.92 433.24,-1378.29"/>
+<polygon fill="#000000" stroke="#000000" points="436.74,-1378.04 433.12,-1368.08 429.74,-1378.12 436.74,-1378.04"/>
 </g>
-<!-- sourcefile~symba_collision.f90 -->
+<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge95" class="edge">
+<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.88,-2242.79C526.53,-2245.85 512.31,-2250.84 501,-2259 455.91,-2291.53 474.58,-2400.91 433,-2364"/>
+</g>
+<!-- sourcefile~symba_discard.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node18" class="node">
-<title>sourcefile~symba_collision.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/symba_collision.f90.html" xlink:title="symba_collision.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="637,-2208 531,-2208 531,-2184 637,-2184 637,-2208"/>
-<text text-anchor="middle" x="584" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_collision.f90</text>
+<title>sourcefile~symba_discard.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node18"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="634.5,-2208 531.5,-2208 531.5,-2184 634.5,-2184 634.5,-2208"/>
+<text text-anchor="middle" x="583" y="-2193.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge34" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.61,-2192.19C519.71,-2188.97 509.33,-2183.64 502,-2175 453.28,-2117.56 437.35,-1559.75 434.5,-1441.11"/>
-<polygon fill="#000000" stroke="#000000" points="437.99,-1440.95 434.26,-1431.04 430.99,-1441.12 437.99,-1440.95"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge23" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531.24,-2192.71C519.74,-2189.54 508.67,-2184.11 501,-2175 448.25,-2112.37 435.42,-1503.38 433.34,-1378.36"/>
+<polygon fill="#000000" stroke="#000000" points="436.83,-1378.04 433.17,-1368.1 429.83,-1378.16 436.83,-1378.04"/>
 </g>
-<!-- sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge99" class="edge">
-<title>sourcefile~symba_collision.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.99,-2205.42C521.02,-2208.34 510.92,-2212.12 502,-2217 465.85,-2236.77 465.18,-2306.93 434,-2280"/>
+<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge98" class="edge">
+<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531.17,-2201.93C520.34,-2205.08 509.59,-2209.83 501,-2217 445.74,-2263.13 486.84,-2411.78 433,-2364"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431,-2364C354.42,-2296.03 319.21,-1520.39 313.38,-1378.29"/>
+<polygon fill="#000000" stroke="#000000" points="316.87,-1378.01 312.97,-1368.16 309.88,-1378.3 316.87,-1378.01"/>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90 -->
+<!-- sourcefile~tides_spin_step.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node19" class="node">
-<title>sourcefile~util_minimize_bfgs.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="643,-1914 525,-1914 525,-1890 643,-1890 643,-1914"/>
-<text text-anchor="middle" x="584" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
+<title>sourcefile~tides_spin_step.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node19"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="635.5,-1074 530.5,-1074 530.5,-1050 635.5,-1050 635.5,-1074"/>
+<text text-anchor="middle" x="583" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge35" class="edge">
-<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M524.73,-1895.8C516.13,-1892.54 508.11,-1887.81 502,-1881 442.71,-1814.96 435.1,-1523.97 434.13,-1441.1"/>
-<polygon fill="#000000" stroke="#000000" points="437.63,-1440.99 434.04,-1431.03 430.63,-1441.06 437.63,-1440.99"/>
+<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge24" class="edge">
+<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M530.12,-1066.79C519.34,-1069.99 508.87,-1075.05 501,-1083 465.4,-1118.94 442.89,-1275.47 435.59,-1333.9"/>
+<polygon fill="#000000" stroke="#000000" points="432.11,-1333.56 434.37,-1343.91 439.06,-1334.41 432.11,-1333.56"/>
 </g>
-<!-- sourcefile~util_exit.f90 -->
+<!-- sourcefile~util_rescale.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node20" class="node">
-<title>sourcefile~util_exit.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_exit.f90.html" xlink:title="util_exit.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="617.5,-1872 550.5,-1872 550.5,-1848 617.5,-1848 617.5,-1872"/>
-<text text-anchor="middle" x="584" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_exit.f90</text>
+<title>sourcefile~util_rescale.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node20"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="625.5,-1032 540.5,-1032 540.5,-1008 625.5,-1008 625.5,-1032"/>
+<text text-anchor="middle" x="583" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge38" class="edge">
-<title>sourcefile~util_exit.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M550.28,-1859.63C533.51,-1857.66 514.13,-1852.32 502,-1839 448.07,-1779.8 436.71,-1519.56 434.5,-1441.32"/>
-<polygon fill="#000000" stroke="#000000" points="438,-1441.05 434.24,-1431.15 431,-1441.24 438,-1441.05"/>
-</g>
-<!-- sourcefile~util_rescale.f90 -->
+<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge26" class="edge">
+<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.47,-1022.05C526.2,-1024.8 511.26,-1030.31 501,-1041 460.25,-1083.46 440.55,-1268.85 434.83,-1333.59"/>
+<polygon fill="#000000" stroke="#000000" points="431.31,-1333.63 433.95,-1343.89 438.29,-1334.23 431.31,-1333.63"/>
+</g>
+<!-- sourcefile~rmvs_encounter_check.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node21" class="node">
-<title>sourcefile~util_rescale.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/util_rescale.f90.html" xlink:title="util_rescale.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626.5,-1830 541.5,-1830 541.5,-1806 626.5,-1806 626.5,-1830"/>
-<text text-anchor="middle" x="584" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_rescale.f90</text>
+<title>sourcefile~rmvs_encounter_check.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node21"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="654,-360 512,-360 512,-336 654,-336 654,-360"/>
+<text text-anchor="middle" x="583" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge39" class="edge">
-<title>sourcefile~util_rescale.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.27,-1816.14C526.98,-1813.41 512.07,-1807.87 502,-1797 453.38,-1744.55 438.49,-1514.57 434.95,-1441.42"/>
-<polygon fill="#000000" stroke="#000000" points="438.43,-1440.91 434.47,-1431.08 431.44,-1441.23 438.43,-1440.91"/>
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge28" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M511.66,-359.65C507.68,-362.23 504.06,-365.31 501,-369 437.37,-445.64 433.22,-1193.84 433,-1333.58"/>
+<polygon fill="#000000" stroke="#000000" points="429.5,-1333.89 432.99,-1343.9 436.5,-1333.9 429.5,-1333.89"/>
 </g>
-<!-- sourcefile~rmvs_kick.f90 -->
+<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge86" class="edge">
+<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M526.36,-360.06C517.72,-362.61 509.02,-365.58 501,-369 468.33,-382.95 458.15,-385.92 433,-411"/>
+</g>
+<!-- sourcefile~util_sort.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node22" class="node">
-<title>sourcefile~rmvs_kick.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="623,-2586 545,-2586 545,-2562 623,-2562 623,-2586"/>
-<text text-anchor="middle" x="584" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
+<title>sourcefile~util_sort.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node22"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="617,-990 549,-990 549,-966 617,-966 617,-990"/>
+<text text-anchor="middle" x="583" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge19" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.99,-2583.47C531.39,-2586.96 515.98,-2591.03 502,-2595 471.57,-2603.64 462.7,-2629.29 434,-2616"/>
-</g>
-<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge40" class="edge">
-<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.76,-2573.47C529.13,-2571.15 512.34,-2565.56 502,-2553 465.32,-2508.43 438.85,-1596.78 434.6,-1441.42"/>
-<polygon fill="#000000" stroke="#000000" points="438.09,-1441.1 434.32,-1431.2 431.1,-1441.29 438.09,-1441.1"/>
+<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge82" class="edge">
+<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.61,-978.61C532.08,-980.69 513.12,-986.06 501,-999 455.04,-1048.07 438.47,-1262.89 434.22,-1333.45"/>
+<polygon fill="#000000" stroke="#000000" points="430.7,-1333.66 433.62,-1343.84 437.69,-1334.06 430.7,-1333.66"/>
 </g>
-<!-- sourcefile~fraggle_setup.f90 -->
+<!-- sourcefile~util_get_energy_momentum.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node23" class="node">
-<title>sourcefile~fraggle_setup.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="632,-1788 536,-1788 536,-1764 632,-1764 632,-1788"/>
-<text text-anchor="middle" x="584" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
+<title>sourcefile~util_get_energy_momentum.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node23"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="665,-948 501,-948 501,-924 665,-924 665,-948"/>
+<text text-anchor="middle" x="583" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge41" class="edge">
-<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M535.92,-1772.83C523.39,-1769.78 510.89,-1764.39 502,-1755 458.66,-1709.26 440.49,-1509.3 435.51,-1441.55"/>
-<polygon fill="#000000" stroke="#000000" points="438.97,-1440.9 434.77,-1431.17 431.99,-1441.39 438.97,-1440.9"/>
+<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge29" class="edge">
+<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.07,-948.01C508,-950.5 504.24,-953.47 501,-957 449.79,-1012.75 436.61,-1257.25 433.72,-1333.32"/>
+<polygon fill="#000000" stroke="#000000" points="430.21,-1333.54 433.36,-1343.66 437.21,-1333.79 430.21,-1333.54"/>
 </g>
-<!-- sourcefile~helio_step.f90 -->
+<!-- sourcefile~operator_cross.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node24" class="node">
-<title>sourcefile~helio_step.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="623.5,-402 544.5,-402 544.5,-378 623.5,-378 623.5,-402"/>
-<text text-anchor="middle" x="584" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
+<title>sourcefile~operator_cross.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node24"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="634.5,-906 531.5,-906 531.5,-882 634.5,-882 634.5,-906"/>
+<text text-anchor="middle" x="583" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.26,-380.04C514.28,-373.42 471.66,-366.39 434,-369"/>
-</g>
-<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge42" class="edge">
-<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.38,-390.63C528.89,-392.99 512.29,-398.59 502,-411 436.94,-489.47 433.97,-1256.54 433.97,-1396.98"/>
-<polygon fill="#000000" stroke="#000000" points="430.47,-1396.99 433.97,-1406.98 437.47,-1396.98 430.47,-1396.99"/>
+<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge30" class="edge">
+<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531.26,-897.79C519.9,-900.96 508.89,-906.27 501,-915 444.44,-977.57 434.9,-1252.78 433.31,-1333.61"/>
+<polygon fill="#000000" stroke="#000000" points="429.81,-1333.62 433.14,-1343.68 436.81,-1333.74 429.81,-1333.62"/>
 </g>
-<!-- sourcefile~rmvs_util.f90 -->
+<!-- sourcefile~util_spill.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node25" class="node">
-<title>sourcefile~rmvs_util.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="620.5,-2544 547.5,-2544 547.5,-2520 620.5,-2520 620.5,-2544"/>
-<text text-anchor="middle" x="584" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
+<title>sourcefile~util_spill.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node25"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="617,-864 549,-864 549,-840 617,-840 617,-864"/>
+<text text-anchor="middle" x="583" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge11" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.29,-2537.3C532.64,-2540.47 515.89,-2545.4 502,-2553 465.85,-2572.77 471.39,-2633.31 434,-2616"/>
-</g>
-<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge44" class="edge">
-<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.27,-2531.8C530.97,-2529.72 512.91,-2524.22 502,-2511 466.7,-2468.2 439.19,-1593.78 434.66,-1441.51"/>
-<polygon fill="#000000" stroke="#000000" points="438.14,-1441 434.35,-1431.11 431.15,-1441.21 438.14,-1441"/>
+<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge31" class="edge">
+<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.76,-852.32C532.06,-854.3 512.9,-859.67 501,-873 439.09,-942.39 433.36,-1248.25 432.98,-1333.74"/>
+<polygon fill="#000000" stroke="#000000" points="429.48,-1333.87 432.96,-1343.88 436.48,-1333.88 429.48,-1333.87"/>
 </g>
-<!-- sourcefile~symba_discard.f90 -->
+<!-- sourcefile~fraggle_regime.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node26" class="node">
-<title>sourcefile~symba_discard.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/symba_discard.f90.html" xlink:title="symba_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="635.5,-2166 532.5,-2166 532.5,-2142 635.5,-2142 635.5,-2166"/>
-<text text-anchor="middle" x="584" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_discard.f90</text>
+<title>sourcefile~fraggle_regime.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node26"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="634.5,-822 531.5,-822 531.5,-798 634.5,-798 634.5,-822"/>
+<text text-anchor="middle" x="583" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge43" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532.32,-2150.65C520.82,-2147.48 509.73,-2142.06 502,-2133 456.02,-2079.07 438.04,-1556.35 434.62,-1441.32"/>
-<polygon fill="#000000" stroke="#000000" points="438.12,-1441.11 434.33,-1431.21 431.12,-1441.31 438.12,-1441.11"/>
-</g>
-<!-- sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge94" class="edge">
-<title>sourcefile~symba_discard.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532.46,-2160.97C521.73,-2164.07 510.95,-2168.54 502,-2175 456.91,-2207.53 476.07,-2316.35 434,-2280"/>
+<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge32" class="edge">
+<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531.11,-813.65C519.75,-816.83 508.79,-822.18 501,-831 433.79,-907.17 431.95,-1243.22 432.7,-1333.57"/>
+<polygon fill="#000000" stroke="#000000" points="429.2,-1333.81 432.8,-1343.77 436.2,-1333.74 429.2,-1333.81"/>
 </g>
-<!-- sourcefile~symba_setup.f90 -->
+<!-- sourcefile~util_copy.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node27" class="node">
-<title>sourcefile~symba_setup.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="631,-2124 537,-2124 537,-2100 631,-2100 631,-2124"/>
-<text text-anchor="middle" x="584" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
+<title>sourcefile~util_copy.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node27"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="618.5,-780 547.5,-780 547.5,-756 618.5,-756 618.5,-780"/>
+<text text-anchor="middle" x="583" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge45" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M536.58,-2109.68C523.61,-2106.71 510.7,-2101.14 502,-2091 458.68,-2040.5 438.73,-1551.37 434.75,-1441.04"/>
-<polygon fill="#000000" stroke="#000000" points="438.25,-1440.91 434.4,-1431.04 431.26,-1441.16 438.25,-1440.91"/>
-</g>
-<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge95" class="edge">
-<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M536.81,-2116.68C524.45,-2119.77 511.81,-2124.81 502,-2133 446.74,-2179.13 488.47,-2327.06 434,-2280"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432,-2280C369.39,-2225.91 323.69,-1607.3 315,-1481.32"/>
-<polygon fill="#000000" stroke="#000000" points="318.49,-1481.02 314.32,-1471.28 311.51,-1481.5 318.49,-1481.02"/>
+<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge33" class="edge">
+<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.42,-768.37C530.99,-770.44 512.47,-775.87 501,-789 464.45,-830.83 439.78,-1233.97 434.2,-1333.75"/>
+<polygon fill="#000000" stroke="#000000" points="430.7,-1333.72 433.64,-1343.89 437.69,-1334.1 430.7,-1333.72"/>
 </g>
-<!-- sourcefile~symba_util.f90 -->
+<!-- sourcefile~orbel.f90~2 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node28" class="node">
-<title>sourcefile~symba_util.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="625,-2460 543,-2460 543,-2436 625,-2436 625,-2460"/>
-<text text-anchor="middle" x="584" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
+<title>sourcefile~orbel.f90~2</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node28"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="610.5,-738 555.5,-738 555.5,-714 610.5,-714 610.5,-738"/>
+<text text-anchor="middle" x="583" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge46" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M542.71,-2447.1C527.7,-2444.6 511.92,-2438.97 502,-2427 469.44,-2387.73 439.89,-1587 434.78,-1441.56"/>
-<polygon fill="#000000" stroke="#000000" points="438.26,-1441.08 434.42,-1431.21 431.27,-1441.33 438.26,-1441.08"/>
-</g>
-<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge97" class="edge">
-<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M542.68,-2444.65C528.54,-2441.76 513.38,-2436.5 502,-2427 446.74,-2380.87 488.47,-2327.06 434,-2280"/>
+<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge34" class="edge">
+<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.38,-725.56C537.3,-726.79 514.32,-731.63 501,-747 461.75,-792.28 438.92,-1229.52 434.01,-1333.77"/>
+<polygon fill="#000000" stroke="#000000" points="430.51,-1333.65 433.54,-1343.8 437.5,-1333.97 430.51,-1333.65"/>
 </g>
-<!-- sourcefile~helio_gr.f90 -->
+<!-- sourcefile~fraggle_io.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node29" class="node">
-<title>sourcefile~helio_gr.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="618,-360 550,-360 550,-336 618,-336 618,-360"/>
-<text text-anchor="middle" x="584" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
+<title>sourcefile~fraggle_io.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node29"><a xlink:href=".././sourcefile/fraggle_io.f90.html" xlink:title="fraggle_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622,-696 544,-696 544,-672 622,-672 622,-696"/>
+<text text-anchor="middle" x="583" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.71,-354.07C519.6,-359.23 474,-366.23 434,-369"/>
-</g>
-<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge47" class="edge">
-<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.76,-347.92C532.84,-349.76 513.48,-355.12 502,-369 434.28,-450.9 433.49,-1251.46 433.9,-1396.52"/>
-<polygon fill="#000000" stroke="#000000" points="430.41,-1396.85 433.94,-1406.84 437.41,-1396.83 430.41,-1396.85"/>
+<!-- sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge35" class="edge">
+<title>sourcefile~fraggle_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.6,-684.82C528.14,-687.21 511.52,-692.78 501,-705 459.08,-753.72 438.14,-1224.78 433.84,-1333.63"/>
+<polygon fill="#000000" stroke="#000000" points="430.34,-1333.67 433.45,-1343.79 437.33,-1333.94 430.34,-1333.67"/>
 </g>
-<!-- sourcefile~util_solve.f90 -->
+<!-- sourcefile~fraggle_generate.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node30" class="node">
-<title>sourcefile~util_solve.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621.5,-1746 546.5,-1746 546.5,-1722 621.5,-1722 621.5,-1746"/>
-<text text-anchor="middle" x="584" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
+<title>sourcefile~fraggle_generate.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node30"><a xlink:href=".././sourcefile/fraggle_generate.f90.html" xlink:title="fraggle_generate.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="639,-654 527,-654 527,-630 639,-630 639,-654"/>
+<text text-anchor="middle" x="583" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_generate.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge49" class="edge">
-<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.14,-1732.67C530.58,-1730.23 513.45,-1724.76 502,-1713 463.89,-1673.87 442.75,-1503.43 436.22,-1441.55"/>
-<polygon fill="#000000" stroke="#000000" points="439.67,-1440.91 435.17,-1431.31 432.71,-1441.62 439.67,-1440.91"/>
+<!-- sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge36" class="edge">
+<title>sourcefile~fraggle_generate.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M526.74,-646.77C516.92,-650.05 507.7,-655.16 501,-663 456.37,-715.19 437.4,-1220.58 433.69,-1333.64"/>
+<polygon fill="#000000" stroke="#000000" points="430.19,-1333.76 433.37,-1343.86 437.18,-1333.98 430.19,-1333.76"/>
 </g>
-<!-- sourcefile~rmvs_step.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node31" class="node">
-<title>sourcefile~rmvs_step.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node31"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="624,-2502 544,-2502 544,-2478 624,-2478 624,-2502"/>
-<text text-anchor="middle" x="584" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
-</a>
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge11" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M259.65,-1348.32C251.35,-1347.07 242.71,-1345.77 234.28,-1344.5"/>
+<polygon fill="#000000" stroke="#000000" points="234.57,-1341 224.16,-1342.97 233.52,-1347.92 234.57,-1341"/>
 </g>
+<!-- sourcefile~netcdf.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node32" class="node">
+<title>sourcefile~netcdf.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="613,-612 553,-612 553,-588 613,-588 613,-612"/>
+<text text-anchor="middle" x="583" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+</a>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge14" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432,-2616C190.52,-2616 178.76,-1642.17 178.46,-1481.36"/>
-<polygon fill="#000000" stroke="#000000" points="181.96,-1481.21 178.46,-1471.21 174.96,-1481.21 181.96,-1481.21"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.79,-2494.16C529.62,-2497.14 514.14,-2502.25 502,-2511 456.91,-2543.53 484.45,-2639.36 434,-2616"/>
 </g>
-<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge51" class="edge">
-<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.95,-2489.32C528.57,-2486.92 512.18,-2481.32 502,-2469 468.07,-2427.97 439.54,-1590.57 434.72,-1441.57"/>
-<polygon fill="#000000" stroke="#000000" points="438.21,-1441.24 434.39,-1431.36 431.21,-1441.46 438.21,-1441.24"/>
+<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge37" class="edge">
+<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M552.94,-599.66C535.21,-601.11 513.61,-606.17 501,-621 453.7,-676.62 436.72,-1215.76 433.57,-1333.4"/>
+<polygon fill="#000000" stroke="#000000" points="430.06,-1333.63 433.3,-1343.72 437.06,-1333.82 430.06,-1333.63"/>
 </g>
 <!-- sourcefile~util_coord.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node32" class="node">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node33" class="node">
 <title>sourcefile~util_coord.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node32"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-1704 545.5,-1704 545.5,-1680 622.5,-1680 622.5,-1704"/>
-<text text-anchor="middle" x="584" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_coord.f90.html" xlink:title="util_coord.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621.5,-570 544.5,-570 544.5,-546 621.5,-546 621.5,-570"/>
+<text text-anchor="middle" x="583" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_coord.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge50" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge38" class="edge">
 <title>sourcefile~util_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.09,-1690.27C529.91,-1687.7 513.36,-1682.24 502,-1671 437.77,-1607.4 432.35,-1489.93 433.09,-1441.14"/>
-<polygon fill="#000000" stroke="#000000" points="436.59,-1441.13 433.35,-1431.05 429.59,-1440.95 436.59,-1441.13"/>
-</g>
-<!-- sourcefile~util_set.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node33" class="node">
-<title>sourcefile~util_set.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node33"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="616,-1662 552,-1662 552,-1638 616,-1638 616,-1662"/>
-<text text-anchor="middle" x="584" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge52" class="edge">
-<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M551.86,-1648.96C535.15,-1646.84 515.32,-1641.55 502,-1629 447.98,-1578.1 436.78,-1484.01 434.52,-1441.22"/>
-<polygon fill="#000000" stroke="#000000" points="438.01,-1440.89 434.11,-1431.05 431.02,-1441.18 438.01,-1440.89"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.34,-558.61C528.63,-560.91 511.6,-566.47 501,-579 450.96,-638.15 436.04,-1212.56 433.44,-1333.66"/>
+<polygon fill="#000000" stroke="#000000" points="429.94,-1333.86 433.23,-1343.93 436.94,-1334 429.94,-1333.86"/>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90 -->
+<!-- sourcefile~tides_getacch_pl.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node34" class="node">
-<title>sourcefile~util_get_energy_momentum.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/util_get_energy_momentum.f90.html" xlink:title="util_get_energy_momentum.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="666,-1620 502,-1620 502,-1596 666,-1596 666,-1620"/>
-<text text-anchor="middle" x="584" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_get_energy_momentum.f90</text>
+<title>sourcefile~tides_getacch_pl.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node34"><a xlink:href=".././sourcefile/tides_getacch_pl.f90.html" xlink:title="tides_getacch_pl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="638.5,-2166 527.5,-2166 527.5,-2142 638.5,-2142 638.5,-2166"/>
+<text text-anchor="middle" x="583" y="-2151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_getacch_pl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge53" class="edge">
-<title>sourcefile~util_get_energy_momentum.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M515.46,-1595.97C510.61,-1593.5 506.04,-1590.54 502,-1587 458.05,-1548.46 442.08,-1477.38 436.62,-1441.29"/>
-<polygon fill="#000000" stroke="#000000" points="440.08,-1440.71 435.25,-1431.28 433.14,-1441.67 440.08,-1440.71"/>
+<!-- sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge40" class="edge">
+<title>sourcefile~tides_getacch_pl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M527.09,-2149.42C517.12,-2146.14 507.76,-2140.99 501,-2133 450.96,-2073.85 436.04,-1499.44 433.44,-1378.34"/>
+<polygon fill="#000000" stroke="#000000" points="436.94,-1378 433.23,-1368.07 429.94,-1378.14 436.94,-1378"/>
 </g>
 <!-- sourcefile~helio_drift.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node35" class="node">
 <title>sourcefile~helio_drift.f90</title>
 <g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node35"><a xlink:href=".././sourcefile/helio_drift.f90.html" xlink:title="helio_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-318 545.5,-318 545.5,-294 622.5,-294 622.5,-318"/>
-<text text-anchor="middle" x="584" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621.5,-2754 544.5,-2754 544.5,-2730 621.5,-2730 621.5,-2754"/>
+<text text-anchor="middle" x="583" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_drift.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge22" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge13" class="edge">
 <title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.12,-313.34C531.26,-316.67 515.63,-321.18 502,-327 469.33,-340.95 469.44,-366.55 434,-369"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.26,-2736.25C530.11,-2733.07 514.26,-2728.25 501,-2721 464.85,-2701.23 466.92,-2681.39 433,-2658"/>
 </g>
 <!-- sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge55" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge41" class="edge">
 <title>sourcefile~helio_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.19,-306.48C529.45,-308.76 512.45,-314.34 502,-327 431.55,-412.42 433.02,-1248.19 433.85,-1396.54"/>
-<polygon fill="#000000" stroke="#000000" points="430.35,-1396.73 433.91,-1406.71 437.35,-1396.69 430.35,-1396.73"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.12,-2741.58C528.36,-2739.31 511.37,-2733.73 501,-2721 478.87,-2693.83 439.65,-1553.71 433.75,-1378.5"/>
+<polygon fill="#000000" stroke="#000000" points="437.25,-1378.25 433.41,-1368.37 430.25,-1378.49 437.25,-1378.25"/>
 </g>
-<!-- sourcefile~obl.f90 -->
+<!-- sourcefile~gr.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node36" class="node">
-<title>sourcefile~obl.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611,-1578 557,-1578 557,-1554 611,-1554 611,-1578"/>
-<text text-anchor="middle" x="584" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
+<title>sourcefile~gr.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node36"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="610,-2124 556,-2124 556,-2100 610,-2100 610,-2124"/>
+<text text-anchor="middle" x="583" y="-2109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge54" class="edge">
-<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.92,-1564.56C539.76,-1562.43 517.66,-1557.28 502,-1545 467.83,-1518.21 448.63,-1469.32 439.88,-1440.95"/>
-<polygon fill="#000000" stroke="#000000" points="443.19,-1439.8 437.03,-1431.18 436.47,-1441.76 443.19,-1439.8"/>
+<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge43" class="edge">
+<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.68,-2112.54C537.49,-2111.39 514.27,-2106.6 501,-2091 453.7,-2035.38 436.72,-1496.24 433.57,-1378.6"/>
+<polygon fill="#000000" stroke="#000000" points="437.06,-1378.18 433.3,-1368.28 430.06,-1378.37 437.06,-1378.18"/>
 </g>
-<!-- sourcefile~util_append.f90 -->
+<!-- sourcefile~util_set.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node37" class="node">
-<title>sourcefile~util_append.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="627,-1536 541,-1536 541,-1512 627,-1512 627,-1536"/>
-<text text-anchor="middle" x="584" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
+<title>sourcefile~util_set.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node37"><a xlink:href=".././sourcefile/util_set.f90.html" xlink:title="util_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="615,-2082 551,-2082 551,-2058 615,-2058 615,-2082"/>
+<text text-anchor="middle" x="583" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge56" class="edge">
-<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.95,-1518.39C527.75,-1515.29 513.6,-1510.47 502,-1503 477.19,-1487.03 457.2,-1458.98 445.47,-1439.72"/>
-<polygon fill="#000000" stroke="#000000" points="448.47,-1437.92 440.39,-1431.06 442.43,-1441.46 448.47,-1437.92"/>
+<!-- sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge44" class="edge">
+<title>sourcefile~util_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M550.97,-2070.14C533.65,-2068.46 513.18,-2063.24 501,-2049 456.37,-1996.81 437.4,-1491.42 433.69,-1378.36"/>
+<polygon fill="#000000" stroke="#000000" points="437.18,-1378.02 433.37,-1368.14 430.19,-1378.24 437.18,-1378.02"/>
 </g>
-<!-- sourcefile~util_peri.f90 -->
+<!-- sourcefile~rmvs_util.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node38" class="node">
-<title>sourcefile~util_peri.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="618,-1494 550,-1494 550,-1470 618,-1470 618,-1494"/>
-<text text-anchor="middle" x="584" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
+<title>sourcefile~rmvs_util.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node38"><a xlink:href=".././sourcefile/rmvs_util.f90.html" xlink:title="rmvs_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="619.5,-276 546.5,-276 546.5,-252 619.5,-252 619.5,-276"/>
+<text text-anchor="middle" x="583" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge57" class="edge">
-<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.94,-1475.79C534.96,-1472.38 517.23,-1467.5 502,-1461 486.9,-1454.56 471.24,-1445.1 458.76,-1436.79"/>
-<polygon fill="#000000" stroke="#000000" points="460.51,-1433.75 450.28,-1431 456.57,-1439.53 460.51,-1433.75"/>
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge45" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.28,-264.2C529.98,-266.29 511.92,-271.78 501,-285 431.91,-368.66 432.25,-1186.83 432.87,-1333.53"/>
+<polygon fill="#000000" stroke="#000000" points="429.38,-1333.97 432.92,-1343.95 436.38,-1333.93 429.38,-1333.97"/>
 </g>
-<!-- sourcefile~netcdf.f90 -->
+<!-- sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge88" class="edge">
+<title>sourcefile~rmvs_util.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431,-411C370.26,-471.58 322.9,-1111.06 314.01,-1238.85"/>
+<polygon fill="#000000" stroke="#000000" points="310.5,-1238.78 313.31,-1248.99 317.49,-1239.26 310.5,-1238.78"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.1,-266.93C530.91,-269.69 513.81,-274.96 501,-285 450.92,-324.26 478.06,-366.06 433,-411"/>
+</g>
+<!-- sourcefile~symba_io.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node39" class="node">
-<title>sourcefile~netcdf.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/netcdf.f90.html" xlink:title="netcdf.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-1452 554,-1452 554,-1428 614,-1428 614,-1452"/>
-<text text-anchor="middle" x="584" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">netcdf.f90</text>
+<title>sourcefile~symba_io.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node39"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621,-2544 545,-2544 545,-2520 621,-2520 621,-2544"/>
+<text text-anchor="middle" x="583" y="-2529.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge58" class="edge">
-<title>sourcefile~netcdf.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.92,-1435.9C531.83,-1432.79 501.14,-1428.46 476.34,-1424.97"/>
-<polygon fill="#000000" stroke="#000000" points="476.5,-1421.46 466.11,-1423.53 475.52,-1428.39 476.5,-1421.46"/>
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge46" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.59,-2531.59C528.73,-2529.36 511.52,-2523.79 501,-2511 463.63,-2465.54 437.69,-1535.13 433.57,-1378.34"/>
+<polygon fill="#000000" stroke="#000000" points="437.06,-1377.95 433.31,-1368.05 430.07,-1378.14 437.06,-1377.95"/>
 </g>
-<!-- sourcefile~tides_spin_step.f90 -->
+<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge101" class="edge">
+<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.98,-2529.29C529.95,-2526.56 513.27,-2521.24 501,-2511 445.74,-2464.87 486.84,-2411.78 433,-2364"/>
+</g>
+<!-- sourcefile~fraggle_set.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node40" class="node">
-<title>sourcefile~tides_spin_step.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/tides_spin_step.f90.html" xlink:title="tides_spin_step.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="636.5,-1410 531.5,-1410 531.5,-1386 636.5,-1386 636.5,-1410"/>
-<text text-anchor="middle" x="584" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">tides_spin_step.f90</text>
+<title>sourcefile~fraggle_set.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node40"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="625,-2040 541,-2040 541,-2016 625,-2016 625,-2040"/>
+<text text-anchor="middle" x="583" y="-2025.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge59" class="edge">
-<title>sourcefile~tides_spin_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M531.31,-1405.29C513.35,-1407.82 493.43,-1410.62 476.32,-1413.04"/>
-<polygon fill="#000000" stroke="#000000" points="475.49,-1409.62 466.07,-1414.48 476.46,-1416.55 475.49,-1409.62"/>
+<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge84" class="edge">
+<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.67,-2026.69C526.07,-2024.06 510.86,-2018.45 501,-2007 459.08,-1958.28 438.14,-1487.22 433.84,-1378.37"/>
+<polygon fill="#000000" stroke="#000000" points="437.33,-1378.06 433.45,-1368.21 430.34,-1378.33 437.33,-1378.06"/>
 </g>
-<!-- sourcefile~setup.f90 -->
+<!-- sourcefile~util_append.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node41" class="node">
-<title>sourcefile~setup.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="612.5,-1368 555.5,-1368 555.5,-1344 612.5,-1344 612.5,-1368"/>
-<text text-anchor="middle" x="584" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
+<title>sourcefile~util_append.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node41"><a xlink:href=".././sourcefile/util_append.f90.html" xlink:title="util_append.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626,-1998 540,-1998 540,-1974 626,-1974 626,-1998"/>
+<text text-anchor="middle" x="583" y="-1983.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_append.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge60" class="edge">
-<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.33,-1361.02C539.35,-1364.45 519.1,-1369.7 502,-1377 486.9,-1383.44 471.24,-1392.9 458.76,-1401.21"/>
-<polygon fill="#000000" stroke="#000000" points="456.57,-1398.47 450.28,-1407 460.51,-1404.25 456.57,-1398.47"/>
+<!-- sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge47" class="edge">
+<title>sourcefile~util_append.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.87,-1984.5C525.54,-1981.81 510.71,-1976.2 501,-1965 461.75,-1919.72 438.92,-1482.48 434.01,-1378.23"/>
+<polygon fill="#000000" stroke="#000000" points="437.5,-1378.03 433.54,-1368.2 430.51,-1378.35 437.5,-1378.03"/>
 </g>
-<!-- sourcefile~util_sort.f90 -->
+<!-- sourcefile~util_resize.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node42" class="node">
-<title>sourcefile~util_sort.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/util_sort.f90.html" xlink:title="util_sort.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="618,-1326 550,-1326 550,-1302 618,-1302 618,-1326"/>
-<text text-anchor="middle" x="584" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_sort.f90</text>
+<title>sourcefile~util_resize.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node42"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-1956 543.5,-1956 543.5,-1932 622.5,-1932 622.5,-1956"/>
+<text text-anchor="middle" x="583" y="-1941.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge62" class="edge">
-<title>sourcefile~util_sort.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.93,-1317.71C534.44,-1320.62 516.29,-1325.8 502,-1335 477.19,-1350.97 457.2,-1379.02 445.47,-1398.28"/>
-<polygon fill="#000000" stroke="#000000" points="442.43,-1396.54 440.39,-1406.94 448.47,-1400.08 442.43,-1396.54"/>
+<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge48" class="edge">
+<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.27,-1943.04C527.95,-1940.6 511.52,-1935.03 501,-1923 464.45,-1881.17 439.78,-1478.03 434.2,-1378.25"/>
+<polygon fill="#000000" stroke="#000000" points="437.69,-1377.9 433.64,-1368.11 430.7,-1378.28 437.69,-1377.9"/>
 </g>
-<!-- sourcefile~symba_kick.f90 -->
+<!-- sourcefile~rmvs_kick.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node43" class="node">
-<title>sourcefile~symba_kick.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/symba_kick.f90.html" xlink:title="symba_kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="627,-2418 541,-2418 541,-2394 627,-2394 627,-2418"/>
-<text text-anchor="middle" x="584" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kick.f90</text>
+<title>sourcefile~rmvs_kick.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node43"><a xlink:href=".././sourcefile/rmvs_kick.f90.html" xlink:title="rmvs_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622,-528 544,-528 544,-504 622,-504 622,-528"/>
+<text text-anchor="middle" x="583" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge63" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.62,-2404.71C526.26,-2402.04 511.47,-2396.39 502,-2385 439.72,-2310.11 434.47,-1579.25 434.04,-1441.37"/>
-<polygon fill="#000000" stroke="#000000" points="437.54,-1441.17 434.01,-1431.18 430.54,-1441.19 437.54,-1441.17"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge49" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.9,-516.65C528.3,-518.98 511.48,-524.56 501,-537 448.25,-599.63 435.42,-1208.62 433.34,-1333.64"/>
+<polygon fill="#000000" stroke="#000000" points="429.83,-1333.84 433.17,-1343.9 436.83,-1333.96 429.83,-1333.84"/>
 </g>
-<!-- sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge100" class="edge">
-<title>sourcefile~symba_kick.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.88,-2401.21C527.53,-2398.15 513.31,-2393.16 502,-2385 456.91,-2352.47 476.07,-2316.35 434,-2280"/>
+<!-- sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge91" class="edge">
+<title>sourcefile~rmvs_kick.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.68,-511.23C529.45,-508.18 513.7,-503.18 501,-495 460.61,-469 467.01,-377.08 433,-411"/>
 </g>
-<!-- sourcefile~rmvs_setup.f90 -->
+<!-- sourcefile~io.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node44" class="node">
-<title>sourcefile~rmvs_setup.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="627,-2754 541,-2754 541,-2730 627,-2730 627,-2754"/>
-<text text-anchor="middle" x="584" y="-2739.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
+<title>sourcefile~io.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node44"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="610,-1914 556,-1914 556,-1890 610,-1890 610,-1914"/>
+<text text-anchor="middle" x="583" y="-1899.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.88,-2737.21C527.53,-2734.15 513.31,-2729.16 502,-2721 456.91,-2688.47 484.45,-2639.36 434,-2616"/>
-</g>
-<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge64" class="edge">
-<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.93,-2740.88C526.42,-2738.25 511.46,-2732.59 502,-2721 480.89,-2695.14 440.93,-1610.92 434.8,-1441.23"/>
-<polygon fill="#000000" stroke="#000000" points="438.29,-1441.07 434.44,-1431.21 431.3,-1441.33 438.29,-1441.07"/>
+<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge50" class="edge">
+<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.85,-1902.39C537.75,-1901.17 514.55,-1896.36 501,-1881 433.79,-1804.83 431.95,-1468.78 432.7,-1378.43"/>
+<polygon fill="#000000" stroke="#000000" points="436.2,-1378.26 432.8,-1368.23 429.2,-1378.19 436.2,-1378.26"/>
 </g>
-<!-- sourcefile~util_valid.f90 -->
+<!-- sourcefile~drift.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node45" class="node">
-<title>sourcefile~util_valid.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="620,-1284 548,-1284 548,-1260 620,-1260 620,-1284"/>
-<text text-anchor="middle" x="584" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+<title>sourcefile~drift.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node45"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="610,-1872 556,-1872 556,-1848 610,-1848 610,-1872"/>
+<text text-anchor="middle" x="583" y="-1857.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge65" class="edge">
-<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M547.91,-1274.79C532.52,-1277.5 515.03,-1282.78 502,-1293 467.83,-1319.79 448.63,-1368.68 439.88,-1397.05"/>
-<polygon fill="#000000" stroke="#000000" points="436.47,-1396.24 437.03,-1406.82 443.19,-1398.2 436.47,-1396.24"/>
+<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge51" class="edge">
+<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.9,-1860.35C537.82,-1859.1 514.64,-1854.28 501,-1839 439.09,-1769.61 433.36,-1463.75 432.98,-1378.26"/>
+<polygon fill="#000000" stroke="#000000" points="436.48,-1378.12 432.96,-1368.12 429.48,-1378.13 436.48,-1378.12"/>
 </g>
-<!-- sourcefile~fraggle_set.f90 -->
+<!-- sourcefile~helio_gr.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node46" class="node">
-<title>sourcefile~fraggle_set.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/fraggle_set.f90.html" xlink:title="fraggle_set.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626,-1242 542,-1242 542,-1218 626,-1218 626,-1242"/>
-<text text-anchor="middle" x="584" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_set.f90</text>
+<title>sourcefile~helio_gr.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node46"><a xlink:href=".././sourcefile/helio_gr.f90.html" xlink:title="helio_gr.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="617,-2712 549,-2712 549,-2688 617,-2688 617,-2712"/>
+<text text-anchor="middle" x="583" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_gr.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge66" class="edge">
-<title>sourcefile~fraggle_set.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.59,-1233.22C527.67,-1236.12 512.92,-1241.42 502,-1251 458.05,-1289.54 442.08,-1360.62 436.62,-1396.71"/>
-<polygon fill="#000000" stroke="#000000" points="433.14,-1396.33 435.25,-1406.72 440.08,-1397.29 433.14,-1396.33"/>
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge12" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.88,-2696.89C516.83,-2692.52 468.07,-2682.19 433,-2658"/>
 </g>
-<!-- sourcefile~orbel.f90 -->
+<!-- sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge53" class="edge">
+<title>sourcefile~helio_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.68,-2700.14C531.75,-2698.32 512.39,-2692.96 501,-2679 479.56,-2652.72 439.88,-1551.01 433.79,-1378.59"/>
+<polygon fill="#000000" stroke="#000000" points="437.28,-1378.27 433.43,-1368.4 430.29,-1378.52 437.28,-1378.27"/>
+</g>
+<!-- sourcefile~symba_util.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node47" class="node">
-<title>sourcefile~orbel.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611.5,-1200 556.5,-1200 556.5,-1176 611.5,-1176 611.5,-1200"/>
-<text text-anchor="middle" x="584" y="-1185.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~symba_util.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node47"><a xlink:href=".././sourcefile/symba_util.f90.html" xlink:title="symba_util.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="624,-2502 542,-2502 542,-2478 624,-2478 624,-2502"/>
+<text text-anchor="middle" x="583" y="-2487.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_util.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge67" class="edge">
-<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.15,-1188.55C538.66,-1190.3 516.49,-1195.35 502,-1209 447.98,-1259.9 436.78,-1353.99 434.52,-1396.78"/>
-<polygon fill="#000000" stroke="#000000" points="431.02,-1396.82 434.11,-1406.95 438.01,-1397.11 431.02,-1396.82"/>
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge54" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.67,-2489.13C526.66,-2486.63 510.88,-2481 501,-2469 429.17,-2381.81 431.8,-1528.31 432.82,-1378.42"/>
+<polygon fill="#000000" stroke="#000000" points="436.32,-1378.19 432.89,-1368.16 429.32,-1378.13 436.32,-1378.19"/>
 </g>
-<!-- sourcefile~util_copy.f90 -->
+<!-- sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge96" class="edge">
+<title>sourcefile~symba_util.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.96,-2485.67C528.02,-2482.66 512.9,-2477.58 501,-2469 455.91,-2436.47 474.58,-2400.91 433,-2364"/>
+</g>
+<!-- sourcefile~swiftest_driver.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node48" class="node">
-<title>sourcefile~util_copy.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/util_copy.f90.html" xlink:title="util_copy.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="619.5,-1158 548.5,-1158 548.5,-1134 619.5,-1134 619.5,-1158"/>
-<text text-anchor="middle" x="584" y="-1143.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_copy.f90</text>
+<title>sourcefile~swiftest_driver.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node48"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="632,-1830 534,-1830 534,-1806 632,-1806 632,-1830"/>
+<text text-anchor="middle" x="583" y="-1815.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge68" class="edge">
-<title>sourcefile~util_copy.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.38,-1147.21C532.34,-1149.53 514.18,-1154.94 502,-1167 437.77,-1230.6 432.35,-1348.07 433.09,-1396.86"/>
-<polygon fill="#000000" stroke="#000000" points="429.59,-1397.05 433.35,-1406.95 436.59,-1396.87 429.59,-1397.05"/>
+<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge55" class="edge">
+<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M533.79,-1814.89C521.55,-1811.8 509.48,-1806.38 501,-1797 444.44,-1734.43 434.9,-1459.22 433.31,-1378.39"/>
+<polygon fill="#000000" stroke="#000000" points="436.81,-1378.26 433.14,-1368.32 429.81,-1378.38 436.81,-1378.26"/>
 </g>
-<!-- sourcefile~kick.f90 -->
+<!-- sourcefile~fraggle_placeholder.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node49" class="node">
-<title>sourcefile~kick.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/kick.f90.html" xlink:title="kick.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611,-1116 557,-1116 557,-1092 611,-1092 611,-1116"/>
-<text text-anchor="middle" x="584" y="-1101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">kick.f90</text>
+<title>sourcefile~fraggle_placeholder.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node49"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="645,-1788 521,-1788 521,-1764 645,-1764 645,-1788"/>
+<text text-anchor="middle" x="583" y="-1773.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge69" class="edge">
-<title>sourcefile~kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.92,-1104.05C539.08,-1105.52 516.19,-1110.43 502,-1125 463.89,-1164.13 442.75,-1334.57 436.22,-1396.45"/>
-<polygon fill="#000000" stroke="#000000" points="432.71,-1396.38 435.17,-1406.69 439.67,-1397.09 432.71,-1396.38"/>
+<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge57" class="edge">
+<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M520.61,-1768.37C513.23,-1765.21 506.41,-1760.88 501,-1755 449.79,-1699.25 436.61,-1454.75 433.72,-1378.68"/>
+<polygon fill="#000000" stroke="#000000" points="437.21,-1378.21 433.36,-1368.34 430.21,-1378.46 437.21,-1378.21"/>
 </g>
-<!-- sourcefile~drift.f90 -->
+<!-- sourcefile~rmvs_io.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node50" class="node">
-<title>sourcefile~drift.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/drift.f90.html" xlink:title="drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611,-1074 557,-1074 557,-1050 611,-1050 611,-1074"/>
-<text text-anchor="middle" x="584" y="-1059.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">drift.f90</text>
+<title>sourcefile~rmvs_io.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node50"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="617,-486 549,-486 549,-462 617,-462 617,-486"/>
+<text text-anchor="middle" x="583" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge58" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.84,-473.98C531.94,-475.84 512.58,-481.2 501,-495 445.52,-561.14 434.83,-1205.08 433.24,-1333.71"/>
+<polygon fill="#000000" stroke="#000000" points="429.74,-1333.88 433.12,-1343.92 436.74,-1333.96 429.74,-1333.88"/>
+</g>
+<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge89" class="edge">
+<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.94,-467.79C533.96,-464.38 516.23,-459.5 501,-453 468.33,-439.05 458.15,-385.92 433,-411"/>
+</g>
+<!-- sourcefile~util_peri.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node51" class="node">
+<title>sourcefile~util_peri.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/util_peri.f90.html" xlink:title="util_peri.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="617,-1746 549,-1746 549,-1722 617,-1722 617,-1746"/>
+<text text-anchor="middle" x="583" y="-1731.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_peri.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge71" class="edge">
-<title>sourcefile~drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.79,-1061.93C538.9,-1063.34 515.99,-1068.24 502,-1083 458.66,-1128.74 440.49,-1328.7 435.51,-1396.45"/>
-<polygon fill="#000000" stroke="#000000" points="431.99,-1396.61 434.77,-1406.83 438.97,-1397.1 431.99,-1396.61"/>
+<!-- sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge60" class="edge">
+<title>sourcefile~util_peri.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M548.61,-1733.39C532.08,-1731.31 513.12,-1725.94 501,-1713 455.04,-1663.93 438.47,-1449.11 434.22,-1378.55"/>
+<polygon fill="#000000" stroke="#000000" points="437.69,-1377.94 433.62,-1368.16 430.7,-1378.34 437.69,-1377.94"/>
 </g>
-<!-- sourcefile~helio_setup.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node51" class="node">
-<title>sourcefile~helio_setup.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node51"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626.5,-276 541.5,-276 541.5,-252 626.5,-252 626.5,-276"/>
-<text text-anchor="middle" x="584" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
+<!-- sourcefile~helio_kick.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node52" class="node">
+<title>sourcefile~helio_kick.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/helio_kick.f90.html" xlink:title="helio_kick.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="621.5,-2670 544.5,-2670 544.5,-2646 621.5,-2646 621.5,-2670"/>
+<text text-anchor="middle" x="583" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_kick.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge25" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.37,-269.51C528.05,-272.61 513.73,-277.45 502,-285 461.61,-311 481.92,-365.68 434,-369"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M432,-369C221.73,-383.55 184.19,-1209.52 179.17,-1356.69"/>
-<polygon fill="#000000" stroke="#000000" points="175.67,-1356.68 178.84,-1366.79 182.67,-1356.91 175.67,-1356.68"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge17" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.23,-2669.05C511.83,-2676.14 465.37,-2680.32 433,-2658"/>
 </g>
-<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge73" class="edge">
-<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.4,-265.08C526.77,-267.68 511.6,-273.33 502,-285 428.8,-373.97 432.57,-1245.26 433.79,-1396.64"/>
-<polygon fill="#000000" stroke="#000000" points="430.29,-1397.01 433.88,-1406.98 437.29,-1396.95 430.29,-1397.01"/>
+<!-- sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge61" class="edge">
+<title>sourcefile~helio_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.14,-2657.56C528.39,-2655.29 511.39,-2649.71 501,-2637 459.5,-2586.21 436.79,-1544.05 433.44,-1378.17"/>
+<polygon fill="#000000" stroke="#000000" points="436.94,-1378.07 433.24,-1368.14 429.94,-1378.21 436.94,-1378.07"/>
 </g>
 <!-- sourcefile~discard.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node52" class="node">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node53" class="node">
 <title>sourcefile~discard.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node52"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="616.5,-1032 551.5,-1032 551.5,-1008 616.5,-1008 616.5,-1032"/>
-<text text-anchor="middle" x="584" y="-1017.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/discard.f90.html" xlink:title="discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="615.5,-1704 550.5,-1704 550.5,-1680 615.5,-1680 615.5,-1704"/>
+<text text-anchor="middle" x="583" y="-1689.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">discard.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge72" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge63" class="edge">
 <title>sourcefile~discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M551.18,-1020.36C534.26,-1022.28 514.44,-1027.58 502,-1041 453.38,-1093.45 438.49,-1323.43 434.95,-1396.58"/>
-<polygon fill="#000000" stroke="#000000" points="431.44,-1396.77 434.47,-1406.92 438.43,-1397.09 431.44,-1396.77"/>
-</g>
-<!-- sourcefile~fraggle_regime.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node53" class="node">
-<title>sourcefile~fraggle_regime.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node53"><a xlink:href=".././sourcefile/fraggle_regime.f90.html" xlink:title="fraggle_regime.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="635.5,-990 532.5,-990 532.5,-966 635.5,-966 635.5,-990"/>
-<text text-anchor="middle" x="584" y="-975.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_regime.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge74" class="edge">
-<title>sourcefile~fraggle_regime.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532.3,-981.83C520.94,-985 509.92,-990.3 502,-999 448.07,-1058.2 436.71,-1318.44 434.5,-1396.68"/>
-<polygon fill="#000000" stroke="#000000" points="431,-1396.76 434.24,-1406.85 438,-1396.95 431,-1396.76"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M550.36,-1691.47C533.49,-1689.5 513.67,-1684.21 501,-1671 460.25,-1628.54 440.55,-1443.15 434.83,-1378.41"/>
+<polygon fill="#000000" stroke="#000000" points="438.29,-1377.77 433.95,-1368.11 431.31,-1378.37 438.29,-1377.77"/>
 </g>
-<!-- sourcefile~util_spill.f90 -->
+<!-- sourcefile~orbel.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node54" class="node">
-<title>sourcefile~util_spill.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/util_spill.f90.html" xlink:title="util_spill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="618,-948 550,-948 550,-924 618,-924 618,-948"/>
-<text text-anchor="middle" x="584" y="-933.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_spill.f90</text>
+<title>sourcefile~orbel.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node54"><a xlink:href=".././sourcefile/orbel.f90.html" xlink:title="orbel.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="610.5,-1662 555.5,-1662 555.5,-1638 610.5,-1638 610.5,-1662"/>
+<text text-anchor="middle" x="583" y="-1647.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge75" class="edge">
-<title>sourcefile~util_spill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.79,-936.35C533.1,-938.34 513.94,-943.7 502,-957 442.71,-1023.04 435.1,-1314.03 434.13,-1396.9"/>
-<polygon fill="#000000" stroke="#000000" points="430.63,-1396.94 434.04,-1406.97 437.63,-1397.01 430.63,-1396.94"/>
+<!-- sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge64" class="edge">
+<title>sourcefile~orbel.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.23,-1649.81C537.54,-1648.23 515.11,-1643.24 501,-1629 465.4,-1593.06 442.89,-1436.53 435.59,-1378.1"/>
+<polygon fill="#000000" stroke="#000000" points="439.06,-1377.59 434.37,-1368.09 432.11,-1378.44 439.06,-1377.59"/>
 </g>
-<!-- sourcefile~orbel.f90~2 -->
+<!-- sourcefile~user_getacch.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node55" class="node">
-<title>sourcefile~orbel.f90~2</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/orbel.f90~2.html" xlink:title="orbel.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611.5,-906 556.5,-906 556.5,-882 611.5,-882 611.5,-906"/>
-<text text-anchor="middle" x="584" y="-891.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">orbel.f90</text>
+<title>sourcefile~user_getacch.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node55"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="630.5,-1620 535.5,-1620 535.5,-1596 630.5,-1596 630.5,-1620"/>
+<text text-anchor="middle" x="583" y="-1605.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge76" class="edge">
-<title>sourcefile~orbel.f90~2&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.49,-893.66C538.46,-894.93 515.5,-899.79 502,-915 437.45,-987.77 433.64,-1308.65 433.83,-1396.62"/>
-<polygon fill="#000000" stroke="#000000" points="430.33,-1396.83 433.88,-1406.81 437.33,-1396.8 430.33,-1396.83"/>
+<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge66" class="edge">
+<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M535.42,-1604.33C522.91,-1601.27 510.29,-1595.99 501,-1587 441.89,-1529.79 433.47,-1424.05 432.74,-1378.18"/>
+<polygon fill="#000000" stroke="#000000" points="436.24,-1378.1 432.7,-1368.12 429.24,-1378.14 436.24,-1378.1"/>
 </g>
-<!-- sourcefile~operator_cross.f90 -->
+<!-- sourcefile~fraggle_setup.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node56" class="node">
-<title>sourcefile~operator_cross.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/operator_cross.f90.html" xlink:title="operator_cross.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="635.5,-864 532.5,-864 532.5,-840 635.5,-840 635.5,-864"/>
-<text text-anchor="middle" x="584" y="-849.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">operator_cross.f90</text>
+<title>sourcefile~fraggle_setup.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node56"><a xlink:href=".././sourcefile/fraggle_setup.f90.html" xlink:title="fraggle_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="631,-1578 535,-1578 535,-1554 631,-1554 631,-1578"/>
+<text text-anchor="middle" x="583" y="-1563.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge77" class="edge">
-<title>sourcefile~operator_cross.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M532.08,-855.63C520.72,-858.81 509.76,-864.16 502,-873 432.12,-952.59 432.28,-1303.97 433.57,-1396.57"/>
-<polygon fill="#000000" stroke="#000000" points="430.08,-1396.83 433.74,-1406.77 437.08,-1396.71 430.08,-1396.83"/>
+<!-- sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge67" class="edge">
+<title>sourcefile~fraggle_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M534.91,-1561.76C522.68,-1558.67 510.34,-1553.52 501,-1545 452.12,-1500.41 438.34,-1418.11 434.49,-1378.48"/>
+<polygon fill="#000000" stroke="#000000" points="437.95,-1377.96 433.62,-1368.29 430.98,-1378.55 437.95,-1377.96"/>
 </g>
-<!-- sourcefile~io.f90 -->
+<!-- sourcefile~obl.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node57" class="node">
-<title>sourcefile~io.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/io.f90.html" xlink:title="io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611,-822 557,-822 557,-798 611,-798 611,-822"/>
-<text text-anchor="middle" x="584" y="-807.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">io.f90</text>
+<title>sourcefile~obl.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node57"><a xlink:href=".././sourcefile/obl.f90.html" xlink:title="obl.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="610,-1536 556,-1536 556,-1512 610,-1512 610,-1536"/>
+<text text-anchor="middle" x="583" y="-1521.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">obl.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge78" class="edge">
-<title>sourcefile~io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.79,-809.55C538.65,-810.75 515.45,-815.55 502,-831 464.08,-874.57 440.32,-1295.11 435.09,-1396.9"/>
-<polygon fill="#000000" stroke="#000000" points="431.59,-1396.8 434.58,-1406.97 438.58,-1397.16 431.59,-1396.8"/>
+<!-- sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge68" class="edge">
+<title>sourcefile~obl.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M555.67,-1522.87C538.4,-1520.87 516.28,-1515.75 501,-1503 461.99,-1470.44 444.17,-1410.61 437.07,-1378.22"/>
+<polygon fill="#000000" stroke="#000000" points="440.41,-1377.1 434.98,-1368 433.55,-1378.5 440.41,-1377.1"/>
 </g>
-<!-- sourcefile~symba_drift.f90 -->
+<!-- sourcefile~setup.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node58" class="node">
-<title>sourcefile~symba_drift.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="627,-2376 541,-2376 541,-2352 627,-2352 627,-2376"/>
-<text text-anchor="middle" x="584" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
+<title>sourcefile~setup.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node58"><a xlink:href=".././sourcefile/setup.f90.html" xlink:title="setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611.5,-1494 554.5,-1494 554.5,-1470 611.5,-1470 611.5,-1494"/>
+<text text-anchor="middle" x="583" y="-1479.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge79" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.64,-2362.7C526.28,-2360.02 511.49,-2354.38 502,-2343 442.49,-2271.67 435.01,-1576.62 434.12,-1441.64"/>
-<polygon fill="#000000" stroke="#000000" points="437.61,-1441.28 434.05,-1431.3 430.61,-1441.32 437.61,-1441.28"/>
-</g>
-<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge102" class="edge">
-<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.72,-2357.19C527.78,-2354.03 513.85,-2349.48 502,-2343 465.85,-2323.23 465.18,-2306.93 434,-2280"/>
+<!-- sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge71" class="edge">
+<title>sourcefile~setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M554.34,-1479.89C537.6,-1477.45 516.55,-1472.22 501,-1461 471.56,-1439.77 451.58,-1401.51 441.25,-1377.5"/>
+<polygon fill="#000000" stroke="#000000" points="444.46,-1376.09 437.42,-1368.18 437.98,-1378.76 444.46,-1376.09"/>
 </g>
-<!-- sourcefile~user_getacch.f90 -->
+<!-- sourcefile~util_version.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node59" class="node">
-<title>sourcefile~user_getacch.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/user_getacch.f90.html" xlink:title="user_getacch.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="631.5,-780 536.5,-780 536.5,-756 631.5,-756 631.5,-780"/>
-<text text-anchor="middle" x="584" y="-765.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">user_getacch.f90</text>
+<title>sourcefile~util_version.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node59"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="625.5,-1452 540.5,-1452 540.5,-1428 625.5,-1428 625.5,-1452"/>
+<text text-anchor="middle" x="583" y="-1437.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge81" class="edge">
-<title>sourcefile~user_getacch.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M536.2,-770.46C523.37,-773.45 510.64,-778.99 502,-789 461.42,-836 439.53,-1290.11 434.92,-1396.69"/>
-<polygon fill="#000000" stroke="#000000" points="431.42,-1396.78 434.49,-1406.92 438.41,-1397.08 431.42,-1396.78"/>
+<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge70" class="edge">
+<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.14,-1433.29C527.08,-1430.12 512.98,-1425.55 501,-1419 480.93,-1408.03 462.19,-1389.82 449.49,-1375.8"/>
+<polygon fill="#000000" stroke="#000000" points="451.97,-1373.32 442.74,-1368.11 446.7,-1377.93 451.97,-1373.32"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90 -->
+<!-- sourcefile~symba_encounter_check.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node60" class="node">
-<title>sourcefile~rmvs_encounter_check.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/rmvs_encounter_check.f90.html" xlink:title="rmvs_encounter_check.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="655,-2712 513,-2712 513,-2688 655,-2688 655,-2712"/>
-<text text-anchor="middle" x="584" y="-2697.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_encounter_check.f90</text>
+<title>sourcefile~symba_encounter_check.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node60"><a xlink:href=".././sourcefile/symba_encounter_check.f90.html" xlink:title="symba_encounter_check.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="658,-2460 508,-2460 508,-2436 658,-2436 658,-2460"/>
+<text text-anchor="middle" x="583" y="-2445.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter_check.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge13" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M522.44,-2687.86C515.35,-2685.41 508.37,-2682.49 502,-2679 465.85,-2659.23 471.39,-2633.31 434,-2616"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge74" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M510.92,-2435.9C507.23,-2433.41 503.87,-2430.47 501,-2427 431.91,-2343.34 432.25,-1525.17 432.87,-1378.47"/>
+<polygon fill="#000000" stroke="#000000" points="436.38,-1378.07 432.92,-1368.05 429.38,-1378.03 436.38,-1378.07"/>
 </g>
-<!-- sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge82" class="edge">
-<title>sourcefile~rmvs_encounter_check.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M512.96,-2688.64C508.85,-2686 505.13,-2682.82 502,-2679 481.58,-2654.03 441.16,-1607.95 434.84,-1441.28"/>
-<polygon fill="#000000" stroke="#000000" points="438.33,-1441.07 434.46,-1431.21 431.34,-1441.33 438.33,-1441.07"/>
+<!-- sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge97" class="edge">
+<title>sourcefile~symba_encounter_check.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M521.44,-2435.86C514.35,-2433.41 507.37,-2430.49 501,-2427 464.85,-2407.23 463.81,-2391.35 433,-2364"/>
 </g>
 <!-- sourcefile~util_fill.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node61" class="node">
 <title>sourcefile~util_fill.f90</title>
 <g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node61"><a xlink:href=".././sourcefile/util_fill.f90.html" xlink:title="util_fill.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="614,-738 554,-738 554,-714 614,-714 614,-738"/>
-<text text-anchor="middle" x="584" y="-723.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="613,-1410 553,-1410 553,-1386 613,-1386 613,-1410"/>
+<text text-anchor="middle" x="583" y="-1395.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_fill.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge83" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge72" class="edge">
 <title>sourcefile~util_fill.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M553.98,-725.7C536.27,-727.16 514.67,-732.22 502,-747 458.68,-797.5 438.73,-1286.63 434.75,-1396.96"/>
-<polygon fill="#000000" stroke="#000000" points="431.26,-1396.84 434.4,-1406.96 438.25,-1397.09 431.26,-1396.84"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M552.67,-1390.74C537.25,-1386.84 518.05,-1381.84 501,-1377 492.45,-1374.57 483.34,-1371.85 474.65,-1369.19"/>
+<polygon fill="#000000" stroke="#000000" points="475.67,-1365.84 465.08,-1366.24 473.6,-1372.53 475.67,-1365.84"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge15" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M260.84,-1459C252.49,-1459 243.78,-1459 235.3,-1459"/>
-<polygon fill="#000000" stroke="#000000" points="235.09,-1455.5 225.09,-1459 235.09,-1462.5 235.09,-1455.5"/>
+<!-- sourcefile~util_valid.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_node62" class="node">
+<title>sourcefile~util_valid.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node62"><a xlink:href=".././sourcefile/util_valid.f90.html" xlink:title="util_valid.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="619,-1368 547,-1368 547,-1344 619,-1344 619,-1368"/>
+<text text-anchor="middle" x="583" y="-1353.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_valid.f90</text>
+</a>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M286.82,-1446.94C278.52,-1442.71 269.27,-1437.82 261,-1433 241.53,-1421.66 220.27,-1407.7 204.21,-1396.82"/>
-<polygon fill="#000000" stroke="#000000" points="206.1,-1393.87 195.87,-1391.13 202.16,-1399.66 206.1,-1393.87"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90 -->
+<!-- sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge73" class="edge">
+<title>sourcefile~util_valid.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.69,-1356C525.29,-1356 497.87,-1356 475.32,-1356"/>
+<polygon fill="#000000" stroke="#000000" points="475.01,-1352.5 465.01,-1356 475.01,-1359.5 475.01,-1352.5"/>
+</g>
+<!-- sourcefile~symba_drift.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node63" class="node">
-<title>sourcefile~rmvs_discard.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="631,-2670 537,-2670 537,-2646 631,-2646 631,-2670"/>
-<text text-anchor="middle" x="584" y="-2655.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
+<title>sourcefile~symba_drift.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node63"><a xlink:href=".././sourcefile/symba_drift.f90.html" xlink:title="symba_drift.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626,-2418 540,-2418 540,-2394 626,-2394 626,-2418"/>
+<text text-anchor="middle" x="583" y="-2403.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_drift.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge16" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M536.67,-2648.94C506.56,-2642.09 466.93,-2631.24 434,-2616"/>
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge75" class="edge">
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.59,-2404.74C525.23,-2402.07 510.45,-2396.41 501,-2385 434.65,-2304.86 432.73,-1521.84 432.94,-1378.48"/>
+<polygon fill="#000000" stroke="#000000" points="436.44,-1378.27 432.96,-1368.27 429.44,-1378.26 436.44,-1378.27"/>
 </g>
-<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge86" class="edge">
-<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M536.72,-2656.01C523.59,-2653.08 510.56,-2647.45 502,-2637 482.28,-2612.93 441.43,-1605.76 434.89,-1441.53"/>
-<polygon fill="#000000" stroke="#000000" points="438.37,-1441.04 434.48,-1431.19 431.38,-1441.32 438.37,-1441.04"/>
+<!-- sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge99" class="edge">
+<title>sourcefile~symba_drift.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.7,-2403.87C506.99,-2400.11 462.45,-2390.14 433,-2364"/>
 </g>
 <!-- sourcefile~fraggle_util.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node64" class="node">
 <title>sourcefile~fraggle_util.f90</title>
 <g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node64"><a xlink:href=".././sourcefile/fraggle_util.f90.html" xlink:title="fraggle_util.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="625.5,-696 542.5,-696 542.5,-672 625.5,-672 625.5,-696"/>
-<text text-anchor="middle" x="584" y="-681.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="624.5,-1326 541.5,-1326 541.5,-1302 624.5,-1302 624.5,-1326"/>
+<text text-anchor="middle" x="583" y="-1311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_util.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge84" class="edge">
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge76" class="edge">
 <title>sourcefile~fraggle_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M542.45,-685.11C527.6,-687.67 511.99,-693.28 502,-705 456.02,-758.93 438.04,-1281.65 434.62,-1396.68"/>
-<polygon fill="#000000" stroke="#000000" points="431.12,-1396.69 434.33,-1406.79 438.12,-1396.89 431.12,-1396.69"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.11,-1324.21C528.24,-1327.53 514,-1331.31 501,-1335 492.45,-1337.43 483.34,-1340.15 474.65,-1342.81"/>
+<polygon fill="#000000" stroke="#000000" points="473.6,-1339.47 465.08,-1345.76 475.67,-1346.16 473.6,-1339.47"/>
 </g>
-<!-- sourcefile~swiftest_driver.f90 -->
+<!-- sourcefile~helio_setup.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node65" class="node">
-<title>sourcefile~swiftest_driver.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/swiftest_driver.f90.html" xlink:title="swiftest_driver.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="633,-654 535,-654 535,-630 633,-630 633,-654"/>
-<text text-anchor="middle" x="584" y="-639.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_driver.f90</text>
+<title>sourcefile~helio_setup.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node65"><a xlink:href=".././sourcefile/helio_setup.f90.html" xlink:title="helio_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="625.5,-2628 540.5,-2628 540.5,-2604 625.5,-2604 625.5,-2628"/>
+<text text-anchor="middle" x="583" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge85" class="edge">
-<title>sourcefile~swiftest_driver.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M534.82,-644.67C522.42,-647.72 510.27,-653.25 502,-663 453.28,-720.44 437.35,-1278.25 434.5,-1396.89"/>
-<polygon fill="#000000" stroke="#000000" points="430.99,-1396.88 434.26,-1406.96 437.99,-1397.05 430.99,-1396.88"/>
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge15" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.28,-2626.43C527.63,-2629.69 513.72,-2633.39 501,-2637 470.57,-2645.64 459.04,-2675.96 433,-2658"/>
 </g>
-<!-- sourcefile~util_index.f90 -->
+<!-- sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge77" class="edge">
+<title>sourcefile~helio_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M540.36,-2614.95C525.73,-2612.35 510.57,-2606.69 501,-2595 460.9,-2546.01 437.1,-1541.99 433.48,-1378.43"/>
+<polygon fill="#000000" stroke="#000000" points="436.98,-1378.05 433.26,-1368.13 429.98,-1378.21 436.98,-1378.05"/>
+</g>
+<!-- sourcefile~rmvs_setup.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node66" class="node">
-<title>sourcefile~util_index.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/util_index.f90.html" xlink:title="util_index.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622,-612 546,-612 546,-588 622,-588 622,-612"/>
-<text text-anchor="middle" x="584" y="-597.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_index.f90</text>
+<title>sourcefile~rmvs_setup.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node66"><a xlink:href=".././sourcefile/rmvs_setup.f90.html" xlink:title="rmvs_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626,-444 540,-444 540,-420 626,-420 626,-444"/>
+<text text-anchor="middle" x="583" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge78" class="edge">
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.65,-433.31C525.29,-435.99 510.5,-441.63 501,-453 442.77,-522.67 434.26,-1201.95 433.15,-1333.87"/>
+<polygon fill="#000000" stroke="#000000" points="429.65,-1333.95 433.07,-1343.98 436.65,-1334.01 429.65,-1333.95"/>
+</g>
+<!-- sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge87" class="edge">
-<title>sourcefile~util_index.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.74,-600.53C529.91,-602.8 512.68,-608.34 502,-621 450.58,-681.92 436.72,-1274.14 434.39,-1396.82"/>
-<polygon fill="#000000" stroke="#000000" points="430.88,-1396.85 434.2,-1406.91 437.88,-1396.97 430.88,-1396.85"/>
+<title>sourcefile~rmvs_setup.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M539.9,-422.64C498.53,-413.99 440.51,-403.51 433,-411"/>
 </g>
-<!-- sourcefile~util_resize.f90 -->
+<!-- sourcefile~util_solve.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node67" class="node">
-<title>sourcefile~util_resize.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/util_resize.f90.html" xlink:title="util_resize.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="623.5,-570 544.5,-570 544.5,-546 623.5,-546 623.5,-570"/>
-<text text-anchor="middle" x="584" y="-555.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_resize.f90</text>
+<title>sourcefile~util_solve.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node67"><a xlink:href=".././sourcefile/util_solve.f90.html" xlink:title="util_solve.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="620.5,-1284 545.5,-1284 545.5,-1260 620.5,-1260 620.5,-1284"/>
+<text text-anchor="middle" x="583" y="-1269.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_solve.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge88" class="edge">
-<title>sourcefile~util_resize.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M544.46,-558.7C528.98,-561.07 512.38,-566.66 502,-579 447.86,-643.42 436.11,-1270.43 434.29,-1396.85"/>
-<polygon fill="#000000" stroke="#000000" points="430.79,-1396.85 434.15,-1406.9 437.78,-1396.95 430.79,-1396.85"/>
+<!-- sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge79" class="edge">
+<title>sourcefile~util_solve.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.48,-1277.48C531.03,-1280.65 514.64,-1285.54 501,-1293 480.93,-1303.97 462.19,-1322.18 449.49,-1336.2"/>
+<polygon fill="#000000" stroke="#000000" points="446.7,-1334.07 442.74,-1343.89 451.97,-1338.68 446.7,-1334.07"/>
 </g>
-<!-- sourcefile~symba_io.f90 -->
+<!-- sourcefile~helio_step.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node68" class="node">
-<title>sourcefile~symba_io.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/symba_io.f90.html" xlink:title="symba_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622,-2334 546,-2334 546,-2310 622,-2310 622,-2334"/>
-<text text-anchor="middle" x="584" y="-2319.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_io.f90</text>
+<title>sourcefile~helio_step.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node68"><a xlink:href=".././sourcefile/helio_step.f90.html" xlink:title="helio_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="622.5,-2586 543.5,-2586 543.5,-2562 622.5,-2562 622.5,-2586"/>
+<text text-anchor="middle" x="583" y="-2571.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge89" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.7,-2321.51C529.86,-2319.25 512.63,-2313.7 502,-2301 445.18,-2233.13 435.55,-1572.2 434.2,-1441.42"/>
-<polygon fill="#000000" stroke="#000000" points="437.69,-1441.02 434.1,-1431.06 430.69,-1441.09 437.69,-1441.02"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge16" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.44,-2579.94C529.5,-2583.11 514,-2587.89 501,-2595 464.85,-2614.77 474.2,-2658 433,-2658"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431,-2658C292.95,-2658 194.18,-1531.53 179.81,-1358.26"/>
+<polygon fill="#000000" stroke="#000000" points="183.29,-1357.92 178.99,-1348.24 176.32,-1358.5 183.29,-1357.92"/>
 </g>
-<!-- sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge101" class="edge">
-<title>sourcefile~symba_io.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M545.8,-2320.2C512.88,-2316.76 465.32,-2307.06 434,-2280"/>
+<!-- sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge80" class="edge">
+<title>sourcefile~helio_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M543.32,-2573.42C527.81,-2571.07 511.23,-2565.47 501,-2553 462.25,-2505.75 437.37,-1537.7 433.52,-1378.17"/>
+<polygon fill="#000000" stroke="#000000" points="437.02,-1378.01 433.28,-1368.1 430.02,-1378.18 437.02,-1378.01"/>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90 -->
+<!-- sourcefile~util_minimize_bfgs.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node69" class="node">
-<title>sourcefile~fraggle_placeholder.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/fraggle_placeholder.f90.html" xlink:title="fraggle_placeholder.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="646,-528 522,-528 522,-504 646,-504 646,-528"/>
-<text text-anchor="middle" x="584" y="-513.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_placeholder.f90</text>
+<title>sourcefile~util_minimize_bfgs.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node69"><a xlink:href=".././sourcefile/util_minimize_bfgs.f90.html" xlink:title="util_minimize_bfgs.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="642,-1242 524,-1242 524,-1218 642,-1218 642,-1242"/>
+<text text-anchor="middle" x="583" y="-1227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_minimize_bfgs.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge90" class="edge">
-<title>sourcefile~fraggle_placeholder.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M521.89,-522.83C514.28,-526.09 507.32,-530.65 502,-537 445.18,-604.87 435.55,-1265.8 434.2,-1396.58"/>
-<polygon fill="#000000" stroke="#000000" points="430.69,-1396.91 434.1,-1406.94 437.69,-1396.98 430.69,-1396.91"/>
+<!-- sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge81" class="edge">
+<title>sourcefile~util_minimize_bfgs.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M523.85,-1239.41C515.73,-1242.3 507.83,-1246.07 501,-1251 471.56,-1272.23 451.58,-1310.49 441.25,-1334.5"/>
+<polygon fill="#000000" stroke="#000000" points="437.98,-1333.24 437.42,-1343.82 444.46,-1335.91 437.98,-1333.24"/>
 </g>
-<!-- sourcefile~gr.f90 -->
+<!-- sourcefile~symba_setup.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node70" class="node">
-<title>sourcefile~gr.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/gr.f90.html" xlink:title="gr.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="611,-486 557,-486 557,-462 611,-462 611,-486"/>
-<text text-anchor="middle" x="584" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">gr.f90</text>
+<title>sourcefile~symba_setup.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node70"><a xlink:href=".././sourcefile/symba_setup.f90.html" xlink:title="symba_setup.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="630,-2376 536,-2376 536,-2352 630,-2352 630,-2376"/>
+<text text-anchor="middle" x="583" y="-2361.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_setup.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge91" class="edge">
-<title>sourcefile~gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M556.98,-473.36C538.69,-474.43 515.22,-479.16 502,-495 442.49,-566.33 435.01,-1261.38 434.12,-1396.36"/>
-<polygon fill="#000000" stroke="#000000" points="430.61,-1396.68 434.05,-1406.7 437.61,-1396.72 430.61,-1396.68"/>
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge42" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M535.8,-2361.94C522.68,-2359.01 509.63,-2353.39 501,-2343 437.37,-2266.36 433.22,-1518.16 433,-1378.42"/>
+<polygon fill="#000000" stroke="#000000" points="436.5,-1378.1 432.99,-1368.1 429.5,-1378.11 436.5,-1378.1"/>
 </g>
-<!-- sourcefile~rmvs_io.f90 -->
+<!-- sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge102" class="edge">
+<title>sourcefile~symba_setup.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.33,-2376.01C512.85,-2384.81 463.47,-2391.05 433,-2364"/>
+</g>
+<!-- sourcefile~rmvs_discard.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node71" class="node">
-<title>sourcefile~rmvs_io.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node71"><a xlink:href=".././sourcefile/rmvs_io.f90.html" xlink:title="rmvs_io.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="618,-2628 550,-2628 550,-2604 618,-2604 618,-2628"/>
-<text text-anchor="middle" x="584" y="-2613.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_io.f90</text>
+<title>sourcefile~rmvs_discard.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node71"><a xlink:href=".././sourcefile/rmvs_discard.f90.html" xlink:title="rmvs_discard.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="630,-402 536,-402 536,-378 630,-378 630,-402"/>
+<text text-anchor="middle" x="583" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_discard.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.92,-2623.65C518.55,-2629.2 470.86,-2633.06 434,-2616"/>
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge83" class="edge">
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M535.82,-392.07C522.7,-395.01 509.65,-400.62 501,-411 440.08,-484.15 433.73,-1197.73 433.08,-1333.69"/>
+<polygon fill="#000000" stroke="#000000" points="429.58,-1333.74 433.03,-1343.76 436.58,-1333.77 429.58,-1333.74"/>
 </g>
-<!-- sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge92" class="edge">
-<title>sourcefile~rmvs_io.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M549.72,-2616.11C532.79,-2614.28 513.43,-2608.92 502,-2595 482.95,-2571.8 441.62,-1601.35 434.92,-1441.25"/>
-<polygon fill="#000000" stroke="#000000" points="438.42,-1441 434.5,-1431.15 431.42,-1441.29 438.42,-1441"/>
+<!-- sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge90" class="edge">
+<title>sourcefile~rmvs_discard.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M536,-383.24C502.84,-381.16 459.45,-384.62 433,-411"/>
 </g>
-<!-- sourcefile~util_version.f90 -->
+<!-- sourcefile~rmvs_step.f90 -->
 <g id="sourcefile~~whm_classes.f90~~AfferentGraph_node72" class="node">
-<title>sourcefile~util_version.f90</title>
-<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node72"><a xlink:href=".././sourcefile/util_version.f90.html" xlink:title="util_version.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="626.5,-2082 541.5,-2082 541.5,-2058 626.5,-2058 626.5,-2082"/>
-<text text-anchor="middle" x="584" y="-2067.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">util_version.f90</text>
+<title>sourcefile~rmvs_step.f90</title>
+<g id="a_sourcefile~~whm_classes.f90~~AfferentGraph_node72"><a xlink:href=".././sourcefile/rmvs_step.f90.html" xlink:title="rmvs_step.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="623,-318 543,-318 543,-294 623,-294 623,-318"/>
+<text text-anchor="middle" x="583" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_step.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90 -->
-<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge93" class="edge">
-<title>sourcefile~util_version.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M541.27,-2068.6C526.8,-2065.94 511.78,-2060.32 502,-2049 461.42,-2002 439.53,-1547.89 434.92,-1441.31"/>
-<polygon fill="#000000" stroke="#000000" points="438.41,-1440.92 434.49,-1431.08 431.42,-1441.22 438.41,-1440.92"/>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge52" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M542.96,-306.69C527.58,-309.08 511.19,-314.69 501,-327 434.65,-407.14 432.73,-1190.16 432.94,-1333.52"/>
+<polygon fill="#000000" stroke="#000000" points="429.44,-1333.74 432.96,-1343.73 436.44,-1333.73 429.44,-1333.74"/>
+</g>
+<!-- sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<g id="sourcefile~~whm_classes.f90~~AfferentGraph_edge92" class="edge">
+<title>sourcefile~rmvs_step.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M542.86,-310.95C528.85,-314.02 513.46,-318.98 501,-327 460.61,-353 467.01,-377.08 433,-411"/>
 </g>
 </g>
 </svg>
@@ -1827,14 +1820,14 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-159"></a>         <span class="kt">logical</span><span class="p">,</span>                      <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">lbeg</span>   <span class="c">!! Logical flag indicating whether this is the beginning of the half step or not. </span>
 <a name="ln-160"></a>      <span class="k">end subroutine </span><span class="n">whm_kick_vh_tp</span>
 <a name="ln-161"></a>
-<a name="ln-162"></a>      <span class="k">module subroutine </span><span class="n">whm_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-162"></a>      <span class="k">module pure subroutine </span><span class="n">whm_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-163"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_cb</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
 <a name="ln-164"></a>         <span class="k">implicit none</span>
 <a name="ln-165"></a><span class="k">         class</span><span class="p">(</span><span class="n">whm_pl</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! WHM massive body particle data structure</span>
 <a name="ln-166"></a>         <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
 <a name="ln-167"></a>      <span class="k">end subroutine </span><span class="n">whm_gr_kick_getacch_pl</span>
 <a name="ln-168"></a>
-<a name="ln-169"></a>      <span class="k">module subroutine </span><span class="n">whm_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-169"></a>      <span class="k">module pure subroutine </span><span class="n">whm_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-170"></a>         <span class="k">use </span><span class="n">swiftest_classes</span><span class="p">,</span> <span class="n">only</span> <span class="p">:</span> <span class="n">swiftest_cb</span><span class="p">,</span> <span class="n">swiftest_parameters</span>
 <a name="ln-171"></a>         <span class="k">implicit none</span>
 <a name="ln-172"></a><span class="k">         class</span><span class="p">(</span><span class="n">whm_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! WHM test particle data structure</span>
diff --git a/docs/sourcefile/whm_coord.f90.html b/docs/sourcefile/whm_coord.f90.html
index 422d36c7b..8439faae8 100644
--- a/docs/sourcefile/whm_coord.f90.html
+++ b/docs/sourcefile/whm_coord.f90.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_coord.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_coordf90EfferentGraph" width="641pt" height="271pt"
- viewBox="0.00 0.00 641.00 270.52" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 381.73)">
+<svg id="sourcefilewhm_coordf90EfferentGraph" width="641pt" height="263pt"
+ viewBox="0.00 0.00 641.00 262.79" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 370.71)">
 <title>sourcefile~~whm_coord.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-381.73 910,-381.73 910,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-370.71 910,-370.71 910,4 -4,4"/>
 <!-- sourcefile~whm_coord.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_coord.f90</title>
-<polygon fill="none" stroke="black" points="906,-296.73 820,-296.73 820,-272.73 906,-272.73 906,-296.73"/>
-<text text-anchor="middle" x="863" y="-282.33" font-family="Helvetica,sans-Serif" font-size="10.50">whm_coord.f90</text>
+<polygon fill="none" stroke="black" points="906,-294.58 820,-294.58 820,-270.58 906,-270.58 906,-294.58"/>
+<text text-anchor="middle" x="863" y="-280.18" font-family="Helvetica,sans-Serif" font-size="10.50">whm_coord.f90</text>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~whm_classes.f90</title>
 <g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-297.73 300,-297.73 300,-273.73 394,-273.73 394,-297.73"/>
-<text text-anchor="middle" x="347" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-334.58 300,-334.58 300,-310.58 394,-310.58 394,-334.58"/>
+<text text-anchor="middle" x="347" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.84,-291.44C744.02,-302.51 579.71,-321.92 442,-306.73 429.15,-305.31 415.48,-302.83 402.67,-300.07"/>
-<polygon fill="#000000" stroke="#000000" points="403.13,-296.58 392.61,-297.8 401.59,-303.41 403.13,-296.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M824.18,-294.59C750.72,-316.47 583.53,-359.19 442,-343.58 429.15,-342.16 415.48,-339.68 402.67,-336.91"/>
+<polygon fill="#000000" stroke="#000000" points="403.13,-333.43 392.61,-334.65 401.59,-340.26 403.13,-333.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-217.73 718,-217.73 718,-193.73 784,-193.73 784,-217.73"/>
-<text text-anchor="middle" x="751" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.58 718,-215.58 718,-191.58 784,-191.58 784,-215.58"/>
+<text text-anchor="middle" x="751" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~whm_coord.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.81,-272.39C826.73,-259.4 798.08,-238.82 777.39,-223.96"/>
-<polygon fill="#000000" stroke="#000000" points="779.23,-220.98 769.07,-217.99 775.15,-226.66 779.23,-220.98"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.81,-270.23C826.73,-257.25 798.08,-236.67 777.39,-221.81"/>
+<polygon fill="#000000" stroke="#000000" points="779.23,-218.82 769.07,-215.83 775.15,-224.51 779.23,-218.82"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-141.73 143.5,-141.73 143.5,-117.73 250.5,-117.73 250.5,-141.73"/>
-<text text-anchor="middle" x="197" y="-127.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-136.58 0,-136.58 0,-112.58 106,-112.58 106,-136.58"/>
+<text text-anchor="middle" x="53" y="-122.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.78,-273.62C302.79,-269.91 294.7,-265.3 288,-259.73 250.79,-228.81 222.16,-178.86 207.93,-150.73"/>
-<polygon fill="#000000" stroke="#000000" points="211.07,-149.18 203.51,-141.75 204.79,-152.27 211.07,-149.18"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.79,-332.98C269.26,-337.43 229.25,-338.49 198,-322.58"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-101.73 0,-101.73 0,-77.73 106,-77.73 106,-101.73"/>
-<text text-anchor="middle" x="53" y="-87.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-216.58 143.5,-216.58 143.5,-192.58 250.5,-192.58 250.5,-216.58"/>
+<text text-anchor="middle" x="197" y="-202.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.76,-297.3C268.84,-302.4 228.4,-303.74 198,-285.73"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.24,-310.45C304.67,-306.61 295.69,-301.94 288,-296.58 258.49,-276 230.5,-244.92 213.79,-224.68"/>
+<polygon fill="#000000" stroke="#000000" points="216.37,-222.3 207.35,-216.73 210.93,-226.71 216.37,-222.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C587.94,-275.49 576.78,-264.95 537,-264.73 494.78,-264.49 483.97,-260.1 442,-264.73 429.15,-266.15 415.48,-268.62 402.67,-271.39"/>
-<polygon fill="#000000" stroke="#000000" points="401.59,-268.05 392.61,-273.66 403.13,-274.88 401.59,-268.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C547.38,-305.72 523.36,-288.34 442,-301.58 429.63,-303.59 416.44,-306.22 403.98,-308.94"/>
+<polygon fill="#000000" stroke="#000000" points="403.17,-305.54 394.17,-311.13 404.69,-312.37 403.17,-305.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-176.58 294.5,-176.58 294.5,-152.58 399.5,-152.58 399.5,-176.58"/>
+<text text-anchor="middle" x="347" y="-162.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M732.07,-217.92C709.22,-232.66 667.92,-256.61 628.5,-265.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C574.23,-277.82 583.78,-210.99 537,-184.73 525.05,-178.02 355.51,-152.59 260.83,-138.79"/>
-<polygon fill="#000000" stroke="#000000" points="261.19,-135.3 250.79,-137.32 260.18,-142.23 261.19,-135.3"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C439.92,-86.84 392.75,-122.68 367.32,-145.61"/>
+<polygon fill="#000000" stroke="#000000" points="364.8,-143.18 359.86,-152.55 369.57,-148.31 364.8,-143.18"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-61.73 142,-61.73 142,-37.73 252,-37.73 252,-61.73"/>
-<text text-anchor="middle" x="197" y="-47.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-96.58 288,-96.58 288,-72.58 406,-72.58 406,-96.58"/>
+<text text-anchor="middle" x="347" y="-82.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.12,-193.55C695.17,-164.83 590.72,-94.73 490.5,-87.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C451.58,-79.44 443.32,-72.96 406,-66.73 358.23,-58.76 303.64,-54.47 262.37,-52.2"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-48.7 252.18,-51.67 261.98,-55.69 262.35,-48.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C464.94,-85.68 439.13,-85.94 416.14,-85.85"/>
+<polygon fill="#000000" stroke="#000000" points="416.15,-82.35 406.13,-85.79 416.11,-89.35 416.15,-82.35"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-297.73 442,-297.73 442,-273.73 537,-273.73 537,-297.73"/>
-<text text-anchor="middle" x="489.5" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-215.58 576,-215.58 576,-191.58 679,-191.58 679,-215.58"/>
+<text text-anchor="middle" x="627.5" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C600.89,-272.21 572,-276.82 547.46,-279.98"/>
-<polygon fill="#000000" stroke="#000000" points="546.72,-276.54 537.23,-281.24 547.58,-283.49 546.72,-276.54"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C583.93,-275.82 579.23,-295.27 537,-306.73 455.52,-328.83 432.27,-330.84 348,-325.73"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-203.58C708.99,-203.58 699.2,-203.58 689.41,-203.58"/>
+<polygon fill="#000000" stroke="#000000" points="689.24,-200.08 679.24,-203.58 689.24,-207.08 689.24,-200.08"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-40.73 573,-40.73 573,-16.73 682,-16.73 682,-40.73"/>
-<text text-anchor="middle" x="627.5" y="-26.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-77.58 142,-77.58 142,-53.58 252,-53.58 252,-77.58"/>
+<text text-anchor="middle" x="197" y="-63.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.6,-193.51C736.4,-169.04 713.36,-113.02 682,-73.73 674.09,-63.82 663.74,-54.51 654.24,-46.96"/>
-<polygon fill="#000000" stroke="#000000" points="656.27,-44.11 646.21,-40.8 652.02,-49.66 656.27,-44.11"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C450.71,-86.34 443.54,-68.28 406,-63.58 353.96,-57.06 340.44,-62.99 288,-63.58 279.69,-63.67 270.94,-63.81 262.31,-63.97"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-60.47 252.25,-64.18 262.32,-67.47 262.18,-60.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.37,-191.41C699.35,-159.73 592.86,-77.66 490.5,-84.58"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-217.73 442.5,-217.73 442.5,-193.73 536.5,-193.73 536.5,-217.73"/>
-<text text-anchor="middle" x="489.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-254.58 442.5,-254.58 442.5,-230.58 536.5,-230.58 536.5,-254.58"/>
+<text text-anchor="middle" x="489.5" y="-240.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C615.91,-268.41 559.8,-241.28 523.05,-222.61"/>
-<polygon fill="#000000" stroke="#000000" points="524.2,-219.27 513.7,-217.84 521.01,-225.51 524.2,-219.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C608.01,-287.98 561.28,-271.82 527.76,-258.44"/>
+<polygon fill="#000000" stroke="#000000" points="528.84,-255.11 518.26,-254.59 526.21,-261.59 528.84,-255.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-217.73 576,-217.73 576,-193.73 679,-193.73 679,-217.73"/>
-<text text-anchor="middle" x="627.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-37.58 573,-37.58 573,-13.58 682,-13.58 682,-37.58"/>
+<text text-anchor="middle" x="627.5" y="-23.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.62,-191.26C736.46,-166.6 713.48,-110.15 682,-70.58 674.11,-60.66 663.76,-51.35 654.26,-43.79"/>
+<polygon fill="#000000" stroke="#000000" points="656.29,-40.94 646.22,-37.64 652.03,-46.5 656.29,-40.94"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-205.73C708.99,-205.73 699.2,-205.73 689.41,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-202.23 679.24,-205.73 689.24,-209.23 689.24,-202.23"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.54,-296.89 582.23,-327.1 537,-343.58 457.67,-372.46 432.27,-367.69 348,-362.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-99.73 294.5,-99.73 294.5,-75.73 399.5,-75.73 399.5,-99.73"/>
-<text text-anchor="middle" x="347" y="-85.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C462.84,-85.94 434.49,-85.62 410.01,-85.87"/>
-<polygon fill="#000000" stroke="#000000" points="409.73,-82.37 399.77,-86.01 409.82,-89.37 409.73,-82.37"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-377.73 288,-377.73 288,-353.73 406,-353.73 406,-377.73"/>
-<text text-anchor="middle" x="347" y="-363.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_coord.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-334.58 442,-334.58 442,-310.58 537,-310.58 537,-334.58"/>
+<text text-anchor="middle" x="489.5" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C576.6,-278.9 584.26,-318.98 537,-339.73 499.16,-356.35 453.31,-362.94 416.25,-365.34"/>
-<polygon fill="#000000" stroke="#000000" points="415.83,-361.85 406.04,-365.91 416.22,-368.84 415.83,-361.85"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C598.24,-290.84 566.7,-300.12 541.11,-307.65"/>
+<polygon fill="#000000" stroke="#000000" points="539.86,-304.37 531.26,-310.55 541.84,-311.09 539.86,-304.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.46,-296.62 582.32,-237.81 537,-221.58 457.6,-193.13 432.11,-198.41 348,-204.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.72,-215.84C715.66,-234.4 672.46,-268.88 628.5,-282.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-117.73C138.79,-113.61 122.26,-108.96 106.93,-104.64"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-101.2 97.07,-101.86 105.74,-107.94 107.64,-101.2"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-152.57C289.52,-140.79 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-61.73C138.79,-65.85 122.26,-70.5 106.93,-74.82"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-71.52 97.07,-77.6 107.64,-78.26 105.74,-71.52"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-176.58C286.15,-180.75 268.65,-185.48 252.49,-189.85"/>
+<polygon fill="#000000" stroke="#000000" points="251.37,-186.53 242.63,-192.51 253.2,-193.28 251.37,-186.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-285.73C429.74,-285.73 416.74,-285.73 404.34,-285.73"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-282.23 394.1,-285.73 404.1,-289.23 404.1,-282.23"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-124.58C169.89,-124.58 141.08,-124.58 116.27,-124.58"/>
+<polygon fill="#000000" stroke="#000000" points="116.27,-121.08 106.27,-124.58 116.27,-128.08 116.27,-121.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-96.58C289.52,-108.36 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-297.8C437.19,-310.49 390.28,-328.29 348,-325.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-325.73C277.99,-321.6 256.62,-320.46 198,-285.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C462.92,-161.03 434.47,-160.42 409.89,-160.92"/>
+<polygon fill="#000000" stroke="#000000" points="409.52,-157.43 399.62,-161.2 409.71,-164.42 409.52,-157.43"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.96,-18.56C481.96,-3.48 292.33,18.28 142,-28.73 115.62,-36.98 90.2,-56.22 73.52,-70.9"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-68.36 66.07,-77.68 75.83,-73.54 71.12,-68.36"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-217.75C457.79,-221.94 449.4,-226.82 442,-231.73 425.11,-242.93 423.37,-249.29 406,-259.73 400.22,-263.21 393.89,-266.5 387.6,-269.51"/>
-<polygon fill="#000000" stroke="#000000" points="386.12,-266.34 378.5,-273.7 389.05,-272.7 386.12,-266.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.59,-215.6C571.27,-219.41 556.38,-223.68 542.45,-227.68"/>
+<polygon fill="#000000" stroke="#000000" points="541.16,-224.41 532.51,-230.53 543.09,-231.14 541.16,-224.41"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C284.83,-246.51 233.92,-184 211.01,-150.43"/>
-<polygon fill="#000000" stroke="#000000" points="213.75,-148.22 205.31,-141.81 207.91,-152.08 213.75,-148.22"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.2,-217.74C434.43,-229.33 389.08,-245.2 348,-245.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C451.02,-159.38 443.29,-149.98 406,-143.58 314.51,-127.86 290.83,-124.58 198,-124.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.93,-191.51C567.74,-181.85 527.18,-169.18 490.5,-164.58"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-204.58C318.17,-206.62 287.33,-206.92 261.03,-206.6"/>
+<polygon fill="#000000" stroke="#000000" points="260.86,-203.1 250.81,-206.45 260.76,-210.1 260.86,-203.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C424.19,-155.66 412.75,-199.83 348,-204.58"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-285.73C125.85,-244.17 80.46,-152.99 62.6,-111.3"/>
-<polygon fill="#000000" stroke="#000000" points="65.73,-109.72 58.65,-101.83 59.27,-112.41 65.73,-109.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C328.97,-245.95 212.66,-294.41 198,-285.73"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-77.66C145.38,-86.61 115.83,-98.89 92.36,-108.64"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-105.44 83.04,-112.51 93.62,-111.91 90.93,-105.44"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C318.15,-126.06 287.29,-126.17 261,-126.85"/>
-<polygon fill="#000000" stroke="#000000" points="260.68,-123.35 250.79,-127.14 260.88,-130.35 260.68,-123.35"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-254.6C457.79,-258.79 449.4,-263.67 442,-268.58 425.11,-279.78 423.37,-286.13 406,-296.58 400.22,-300.05 393.89,-303.35 387.6,-306.36"/>
+<polygon fill="#000000" stroke="#000000" points="386.12,-303.19 378.5,-310.54 389.05,-309.55 386.12,-303.19"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.84,-217.88C582.85,-231.41 545.5,-253.37 519.56,-268.63"/>
-<polygon fill="#000000" stroke="#000000" points="517.75,-265.64 510.9,-273.73 521.3,-271.67 517.75,-265.64"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-322.58C122.35,-285.07 78.4,-189.47 61.72,-146.31"/>
+<polygon fill="#000000" stroke="#000000" points="64.94,-144.9 58.15,-136.76 58.38,-147.36 64.94,-144.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C329.01,-283.83 213.18,-330.31 198,-322.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C278.21,-123.68 265.79,-93.78 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C429.36,-107.67 410.33,-131.46 348,-127.73"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.53,-254.58C431.56,-265.26 387.71,-279.64 348,-282.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C295.08,-286.34 244.29,-248.15 217.48,-223.85"/>
+<polygon fill="#000000" stroke="#000000" points="219.65,-221.09 209.95,-216.82 214.87,-226.2 219.65,-221.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-205.73C566.43,-205.73 556.52,-205.73 546.94,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-202.23 536.69,-205.73 546.69,-209.23 546.69,-202.23"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.74,-15.33C480.17,-0.3 286.71,19.48 142,-44.58 111.9,-57.9 85.17,-85.65 69.28,-104.69"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-102.53 62.96,-112.5 71.97,-106.93 66.53,-102.53"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.33,-193.64C585.82,-175.99 537.16,-143.55 490.5,-127.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C461.15,-118.45 430.33,-109.51 404.54,-102.45"/>
-<polygon fill="#000000" stroke="#000000" points="405.12,-98.98 394.55,-99.74 403.28,-105.74 405.12,-98.98"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-322.58C429.74,-322.58 416.74,-322.58 404.34,-322.58"/>
+<polygon fill="#000000" stroke="#000000" points="404.1,-319.08 394.1,-322.58 404.1,-326.08 404.1,-319.08"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.59,-99.76C287.02,-104.47 267.86,-109.9 250.44,-114.85"/>
-<polygon fill="#000000" stroke="#000000" points="249.08,-111.59 240.42,-117.69 250.99,-118.33 249.08,-111.59"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-334.65C437.19,-347.34 390.28,-365.14 348,-362.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-362.58C277.99,-358.45 258.72,-353.5 198,-322.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.24,-90.28C265.81,-91.22 229.94,-91.64 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-89.73C169.94,-88.17 141.14,-87.9 116.32,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-84.62 106.31,-88.24 116.35,-91.62 116.27,-84.62"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_coord.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-353.7C307.9,-349.51 297.39,-344.63 288,-339.73 246.64,-318.15 238.13,-309.51 198,-285.73"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-192.43C150.42,-178.9 111.43,-156.93 84.34,-141.67"/>
+<polygon fill="#000000" stroke="#000000" points="85.73,-138.44 75.3,-136.58 82.3,-144.54 85.73,-138.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/whm_drift.f90.html b/docs/sourcefile/whm_drift.f90.html
index 477ea10a1..0b5fe0f04 100644
--- a/docs/sourcefile/whm_drift.f90.html
+++ b/docs/sourcefile/whm_drift.f90.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_drift.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_driftf90EfferentGraph" width="641pt" height="273pt"
- viewBox="0.00 0.00 641.00 273.21" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 381.73)">
+<svg id="sourcefilewhm_driftf90EfferentGraph" width="641pt" height="265pt"
+ viewBox="0.00 0.00 641.00 265.41" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 370.71)">
 <title>sourcefile~~whm_drift.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-381.73 901,-381.73 901,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-370.71 901,-370.71 901,4 -4,4"/>
 <!-- sourcefile~whm_drift.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_drift.f90</title>
-<polygon fill="none" stroke="black" points="897,-296.73 820,-296.73 820,-272.73 897,-272.73 897,-296.73"/>
-<text text-anchor="middle" x="858.5" y="-282.33" font-family="Helvetica,sans-Serif" font-size="10.50">whm_drift.f90</text>
+<polygon fill="none" stroke="black" points="897,-294.58 820,-294.58 820,-270.58 897,-270.58 897,-294.58"/>
+<text text-anchor="middle" x="858.5" y="-280.18" font-family="Helvetica,sans-Serif" font-size="10.50">whm_drift.f90</text>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~whm_classes.f90</title>
 <g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-297.73 300,-297.73 300,-273.73 394,-273.73 394,-297.73"/>
-<text text-anchor="middle" x="347" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-334.58 300,-334.58 300,-310.58 394,-310.58 394,-334.58"/>
+<text text-anchor="middle" x="347" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.86,-290.81C746.79,-301.7 580.75,-322.04 442,-306.73 429.15,-305.31 415.48,-302.83 402.67,-300.07"/>
-<polygon fill="#000000" stroke="#000000" points="403.13,-296.58 392.61,-297.8 401.59,-303.41 403.13,-296.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.81,-294.64C747,-316.5 581.86,-359.01 442,-343.58 429.15,-342.16 415.48,-339.68 402.67,-336.91"/>
+<polygon fill="#000000" stroke="#000000" points="403.13,-333.43 392.61,-334.65 401.59,-340.26 403.13,-333.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-217.73 718,-217.73 718,-193.73 784,-193.73 784,-217.73"/>
-<text text-anchor="middle" x="751" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.58 718,-215.58 718,-191.58 784,-191.58 784,-215.58"/>
+<text text-anchor="middle" x="751" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~whm_drift.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.02,-272.39C823.75,-259.46 796.44,-239.01 776.62,-224.16"/>
-<polygon fill="#000000" stroke="#000000" points="778.47,-221.18 768.37,-217.99 774.28,-226.78 778.47,-221.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.02,-270.23C823.75,-257.3 796.44,-236.85 776.62,-222.01"/>
+<polygon fill="#000000" stroke="#000000" points="778.47,-219.03 768.37,-215.83 774.28,-224.63 778.47,-219.03"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-141.73 143.5,-141.73 143.5,-117.73 250.5,-117.73 250.5,-141.73"/>
-<text text-anchor="middle" x="197" y="-127.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-136.58 0,-136.58 0,-112.58 106,-112.58 106,-136.58"/>
+<text text-anchor="middle" x="53" y="-122.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.78,-273.62C302.79,-269.91 294.7,-265.3 288,-259.73 250.79,-228.81 222.16,-178.86 207.93,-150.73"/>
-<polygon fill="#000000" stroke="#000000" points="211.07,-149.18 203.51,-141.75 204.79,-152.27 211.07,-149.18"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.79,-332.98C269.26,-337.43 229.25,-338.49 198,-322.58"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-101.73 0,-101.73 0,-77.73 106,-77.73 106,-101.73"/>
-<text text-anchor="middle" x="53" y="-87.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-216.58 143.5,-216.58 143.5,-192.58 250.5,-192.58 250.5,-216.58"/>
+<text text-anchor="middle" x="197" y="-202.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.76,-297.3C268.84,-302.4 228.4,-303.74 198,-285.73"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.24,-310.45C304.67,-306.61 295.69,-301.94 288,-296.58 258.49,-276 230.5,-244.92 213.79,-224.68"/>
+<polygon fill="#000000" stroke="#000000" points="216.37,-222.3 207.35,-216.73 210.93,-226.71 216.37,-222.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C587.94,-275.49 576.78,-264.95 537,-264.73 494.78,-264.49 483.97,-260.1 442,-264.73 429.15,-266.15 415.48,-268.62 402.67,-271.39"/>
-<polygon fill="#000000" stroke="#000000" points="401.59,-268.05 392.61,-273.66 403.13,-274.88 401.59,-268.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C547.38,-305.72 523.36,-288.34 442,-301.58 429.63,-303.59 416.44,-306.22 403.98,-308.94"/>
+<polygon fill="#000000" stroke="#000000" points="403.17,-305.54 394.17,-311.13 404.69,-312.37 403.17,-305.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-176.58 294.5,-176.58 294.5,-152.58 399.5,-152.58 399.5,-176.58"/>
+<text text-anchor="middle" x="347" y="-162.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M732.07,-217.92C709.22,-232.66 667.92,-256.61 628.5,-265.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C574.23,-277.82 583.78,-210.99 537,-184.73 525.05,-178.02 355.51,-152.59 260.83,-138.79"/>
-<polygon fill="#000000" stroke="#000000" points="261.19,-135.3 250.79,-137.32 260.18,-142.23 261.19,-135.3"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C439.92,-86.84 392.75,-122.68 367.32,-145.61"/>
+<polygon fill="#000000" stroke="#000000" points="364.8,-143.18 359.86,-152.55 369.57,-148.31 364.8,-143.18"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-61.73 142,-61.73 142,-37.73 252,-37.73 252,-61.73"/>
-<text text-anchor="middle" x="197" y="-47.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-96.58 288,-96.58 288,-72.58 406,-72.58 406,-96.58"/>
+<text text-anchor="middle" x="347" y="-82.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.12,-193.55C695.17,-164.83 590.72,-94.73 490.5,-87.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C451.58,-79.44 443.32,-72.96 406,-66.73 358.23,-58.76 303.64,-54.47 262.37,-52.2"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-48.7 252.18,-51.67 261.98,-55.69 262.35,-48.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C464.94,-85.68 439.13,-85.94 416.14,-85.85"/>
+<polygon fill="#000000" stroke="#000000" points="416.15,-82.35 406.13,-85.79 416.11,-89.35 416.15,-82.35"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-297.73 442,-297.73 442,-273.73 537,-273.73 537,-297.73"/>
-<text text-anchor="middle" x="489.5" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-215.58 576,-215.58 576,-191.58 679,-191.58 679,-215.58"/>
+<text text-anchor="middle" x="627.5" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C600.89,-272.21 572,-276.82 547.46,-279.98"/>
-<polygon fill="#000000" stroke="#000000" points="546.72,-276.54 537.23,-281.24 547.58,-283.49 546.72,-276.54"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C583.93,-275.82 579.23,-295.27 537,-306.73 455.52,-328.83 432.27,-330.84 348,-325.73"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-203.58C708.99,-203.58 699.2,-203.58 689.41,-203.58"/>
+<polygon fill="#000000" stroke="#000000" points="689.24,-200.08 679.24,-203.58 689.24,-207.08 689.24,-200.08"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-40.73 573,-40.73 573,-16.73 682,-16.73 682,-40.73"/>
-<text text-anchor="middle" x="627.5" y="-26.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-77.58 142,-77.58 142,-53.58 252,-53.58 252,-77.58"/>
+<text text-anchor="middle" x="197" y="-63.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.6,-193.51C736.4,-169.04 713.36,-113.02 682,-73.73 674.09,-63.82 663.74,-54.51 654.24,-46.96"/>
-<polygon fill="#000000" stroke="#000000" points="656.27,-44.11 646.21,-40.8 652.02,-49.66 656.27,-44.11"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C450.71,-86.34 443.54,-68.28 406,-63.58 353.96,-57.06 340.44,-62.99 288,-63.58 279.69,-63.67 270.94,-63.81 262.31,-63.97"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-60.47 252.25,-64.18 262.32,-67.47 262.18,-60.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.37,-191.41C699.35,-159.73 592.86,-77.66 490.5,-84.58"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-217.73 442.5,-217.73 442.5,-193.73 536.5,-193.73 536.5,-217.73"/>
-<text text-anchor="middle" x="489.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-254.58 442.5,-254.58 442.5,-230.58 536.5,-230.58 536.5,-254.58"/>
+<text text-anchor="middle" x="489.5" y="-240.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C615.91,-268.41 559.8,-241.28 523.05,-222.61"/>
-<polygon fill="#000000" stroke="#000000" points="524.2,-219.27 513.7,-217.84 521.01,-225.51 524.2,-219.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C608.01,-287.98 561.28,-271.82 527.76,-258.44"/>
+<polygon fill="#000000" stroke="#000000" points="528.84,-255.11 518.26,-254.59 526.21,-261.59 528.84,-255.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-217.73 576,-217.73 576,-193.73 679,-193.73 679,-217.73"/>
-<text text-anchor="middle" x="627.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-37.58 573,-37.58 573,-13.58 682,-13.58 682,-37.58"/>
+<text text-anchor="middle" x="627.5" y="-23.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.62,-191.26C736.46,-166.6 713.48,-110.15 682,-70.58 674.11,-60.66 663.76,-51.35 654.26,-43.79"/>
+<polygon fill="#000000" stroke="#000000" points="656.29,-40.94 646.22,-37.64 652.03,-46.5 656.29,-40.94"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-205.73C708.99,-205.73 699.2,-205.73 689.41,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-202.23 679.24,-205.73 689.24,-209.23 689.24,-202.23"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.54,-296.89 582.23,-327.1 537,-343.58 457.67,-372.46 432.27,-367.69 348,-362.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-99.73 294.5,-99.73 294.5,-75.73 399.5,-75.73 399.5,-99.73"/>
-<text text-anchor="middle" x="347" y="-85.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C462.84,-85.94 434.49,-85.62 410.01,-85.87"/>
-<polygon fill="#000000" stroke="#000000" points="409.73,-82.37 399.77,-86.01 409.82,-89.37 409.73,-82.37"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-377.73 288,-377.73 288,-353.73 406,-353.73 406,-377.73"/>
-<text text-anchor="middle" x="347" y="-363.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_drift.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-334.58 442,-334.58 442,-310.58 537,-310.58 537,-334.58"/>
+<text text-anchor="middle" x="489.5" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C576.6,-278.9 584.26,-318.98 537,-339.73 499.16,-356.35 453.31,-362.94 416.25,-365.34"/>
-<polygon fill="#000000" stroke="#000000" points="415.83,-361.85 406.04,-365.91 416.22,-368.84 415.83,-361.85"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C598.24,-290.84 566.7,-300.12 541.11,-307.65"/>
+<polygon fill="#000000" stroke="#000000" points="539.86,-304.37 531.26,-310.55 541.84,-311.09 539.86,-304.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.46,-296.62 582.32,-237.81 537,-221.58 457.6,-193.13 432.11,-198.41 348,-204.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.72,-215.84C715.66,-234.4 672.46,-268.88 628.5,-282.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-117.73C138.79,-113.61 122.26,-108.96 106.93,-104.64"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-101.2 97.07,-101.86 105.74,-107.94 107.64,-101.2"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-152.57C289.52,-140.79 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-61.73C138.79,-65.85 122.26,-70.5 106.93,-74.82"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-71.52 97.07,-77.6 107.64,-78.26 105.74,-71.52"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-176.58C286.15,-180.75 268.65,-185.48 252.49,-189.85"/>
+<polygon fill="#000000" stroke="#000000" points="251.37,-186.53 242.63,-192.51 253.2,-193.28 251.37,-186.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-285.73C429.74,-285.73 416.74,-285.73 404.34,-285.73"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-282.23 394.1,-285.73 404.1,-289.23 404.1,-282.23"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-124.58C169.89,-124.58 141.08,-124.58 116.27,-124.58"/>
+<polygon fill="#000000" stroke="#000000" points="116.27,-121.08 106.27,-124.58 116.27,-128.08 116.27,-121.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-96.58C289.52,-108.36 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-297.8C437.19,-310.49 390.28,-328.29 348,-325.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-325.73C277.99,-321.6 256.62,-320.46 198,-285.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C462.92,-161.03 434.47,-160.42 409.89,-160.92"/>
+<polygon fill="#000000" stroke="#000000" points="409.52,-157.43 399.62,-161.2 409.71,-164.42 409.52,-157.43"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.96,-18.56C481.96,-3.48 292.33,18.28 142,-28.73 115.62,-36.98 90.2,-56.22 73.52,-70.9"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-68.36 66.07,-77.68 75.83,-73.54 71.12,-68.36"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-217.75C457.79,-221.94 449.4,-226.82 442,-231.73 425.11,-242.93 423.37,-249.29 406,-259.73 400.22,-263.21 393.89,-266.5 387.6,-269.51"/>
-<polygon fill="#000000" stroke="#000000" points="386.12,-266.34 378.5,-273.7 389.05,-272.7 386.12,-266.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.59,-215.6C571.27,-219.41 556.38,-223.68 542.45,-227.68"/>
+<polygon fill="#000000" stroke="#000000" points="541.16,-224.41 532.51,-230.53 543.09,-231.14 541.16,-224.41"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C284.83,-246.51 233.92,-184 211.01,-150.43"/>
-<polygon fill="#000000" stroke="#000000" points="213.75,-148.22 205.31,-141.81 207.91,-152.08 213.75,-148.22"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.2,-217.74C434.43,-229.33 389.08,-245.2 348,-245.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C451.02,-159.38 443.29,-149.98 406,-143.58 314.51,-127.86 290.83,-124.58 198,-124.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.93,-191.51C567.74,-181.85 527.18,-169.18 490.5,-164.58"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-204.58C318.17,-206.62 287.33,-206.92 261.03,-206.6"/>
+<polygon fill="#000000" stroke="#000000" points="260.86,-203.1 250.81,-206.45 260.76,-210.1 260.86,-203.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C424.19,-155.66 412.75,-199.83 348,-204.58"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-285.73C125.85,-244.17 80.46,-152.99 62.6,-111.3"/>
-<polygon fill="#000000" stroke="#000000" points="65.73,-109.72 58.65,-101.83 59.27,-112.41 65.73,-109.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C328.97,-245.95 212.66,-294.41 198,-285.73"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-77.66C145.38,-86.61 115.83,-98.89 92.36,-108.64"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-105.44 83.04,-112.51 93.62,-111.91 90.93,-105.44"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C318.15,-126.06 287.29,-126.17 261,-126.85"/>
-<polygon fill="#000000" stroke="#000000" points="260.68,-123.35 250.79,-127.14 260.88,-130.35 260.68,-123.35"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-254.6C457.79,-258.79 449.4,-263.67 442,-268.58 425.11,-279.78 423.37,-286.13 406,-296.58 400.22,-300.05 393.89,-303.35 387.6,-306.36"/>
+<polygon fill="#000000" stroke="#000000" points="386.12,-303.19 378.5,-310.54 389.05,-309.55 386.12,-303.19"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.84,-217.88C582.85,-231.41 545.5,-253.37 519.56,-268.63"/>
-<polygon fill="#000000" stroke="#000000" points="517.75,-265.64 510.9,-273.73 521.3,-271.67 517.75,-265.64"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-322.58C122.35,-285.07 78.4,-189.47 61.72,-146.31"/>
+<polygon fill="#000000" stroke="#000000" points="64.94,-144.9 58.15,-136.76 58.38,-147.36 64.94,-144.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C329.01,-283.83 213.18,-330.31 198,-322.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C278.21,-123.68 265.79,-93.78 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C429.36,-107.67 410.33,-131.46 348,-127.73"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.53,-254.58C431.56,-265.26 387.71,-279.64 348,-282.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C295.08,-286.34 244.29,-248.15 217.48,-223.85"/>
+<polygon fill="#000000" stroke="#000000" points="219.65,-221.09 209.95,-216.82 214.87,-226.2 219.65,-221.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-205.73C566.43,-205.73 556.52,-205.73 546.94,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-202.23 536.69,-205.73 546.69,-209.23 546.69,-202.23"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.74,-15.33C480.17,-0.3 286.71,19.48 142,-44.58 111.9,-57.9 85.17,-85.65 69.28,-104.69"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-102.53 62.96,-112.5 71.97,-106.93 66.53,-102.53"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.33,-193.64C585.82,-175.99 537.16,-143.55 490.5,-127.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C461.15,-118.45 430.33,-109.51 404.54,-102.45"/>
-<polygon fill="#000000" stroke="#000000" points="405.12,-98.98 394.55,-99.74 403.28,-105.74 405.12,-98.98"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-322.58C429.74,-322.58 416.74,-322.58 404.34,-322.58"/>
+<polygon fill="#000000" stroke="#000000" points="404.1,-319.08 394.1,-322.58 404.1,-326.08 404.1,-319.08"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.59,-99.76C287.02,-104.47 267.86,-109.9 250.44,-114.85"/>
-<polygon fill="#000000" stroke="#000000" points="249.08,-111.59 240.42,-117.69 250.99,-118.33 249.08,-111.59"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-334.65C437.19,-347.34 390.28,-365.14 348,-362.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-362.58C277.99,-358.45 258.72,-353.5 198,-322.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.24,-90.28C265.81,-91.22 229.94,-91.64 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-89.73C169.94,-88.17 141.14,-87.9 116.32,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-84.62 106.31,-88.24 116.35,-91.62 116.27,-84.62"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_drift.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-353.7C307.9,-349.51 297.39,-344.63 288,-339.73 246.64,-318.15 238.13,-309.51 198,-285.73"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-192.43C150.42,-178.9 111.43,-156.93 84.34,-141.67"/>
+<polygon fill="#000000" stroke="#000000" points="85.73,-138.44 75.3,-136.58 82.3,-144.54 85.73,-138.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/whm_gr.f90.html b/docs/sourcefile/whm_gr.f90.html
index b31d451a1..a8487426d 100644
--- a/docs/sourcefile/whm_gr.f90.html
+++ b/docs/sourcefile/whm_gr.f90.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_gr.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_grf90EfferentGraph" width="641pt" height="276pt"
- viewBox="0.00 0.00 641.00 275.95" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 381.73)">
+<svg id="sourcefilewhm_grf90EfferentGraph" width="641pt" height="268pt"
+ viewBox="0.00 0.00 641.00 268.07" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph" class="graph" transform="scale(0.72 0.72) rotate(0) translate(4 370.71)">
 <title>sourcefile~~whm_gr.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-381.73 892,-381.73 892,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-370.71 892,-370.71 892,4 -4,4"/>
 <!-- sourcefile~whm_gr.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_gr.f90</title>
-<polygon fill="none" stroke="black" points="888,-296.73 820,-296.73 820,-272.73 888,-272.73 888,-296.73"/>
-<text text-anchor="middle" x="854" y="-282.33" font-family="Helvetica,sans-Serif" font-size="10.50">whm_gr.f90</text>
+<polygon fill="none" stroke="black" points="888,-294.58 820,-294.58 820,-270.58 888,-270.58 888,-294.58"/>
+<text text-anchor="middle" x="854" y="-280.18" font-family="Helvetica,sans-Serif" font-size="10.50">whm_gr.f90</text>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~whm_classes.f90</title>
 <g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-297.73 300,-297.73 300,-273.73 394,-273.73 394,-297.73"/>
-<text text-anchor="middle" x="347" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-334.58 300,-334.58 300,-310.58 394,-310.58 394,-334.58"/>
+<text text-anchor="middle" x="347" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.87,-290.16C749.88,-300.82 581.92,-322.17 442,-306.73 429.15,-305.31 415.48,-302.83 402.67,-300.07"/>
-<polygon fill="#000000" stroke="#000000" points="403.13,-296.58 392.61,-297.8 401.59,-303.41 403.13,-296.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.81,-293.37C750.07,-314.75 583.07,-359.14 442,-343.58 429.15,-342.16 415.48,-339.68 402.67,-336.91"/>
+<polygon fill="#000000" stroke="#000000" points="403.13,-333.43 392.61,-334.65 401.59,-340.26 403.13,-333.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-217.73 718,-217.73 718,-193.73 784,-193.73 784,-217.73"/>
-<text text-anchor="middle" x="751" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.58 718,-215.58 718,-191.58 784,-191.58 784,-215.58"/>
+<text text-anchor="middle" x="751" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~whm_gr.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M837.22,-272.39C820.69,-259.46 794.54,-239.01 775.57,-224.16"/>
-<polygon fill="#000000" stroke="#000000" points="777.7,-221.39 767.67,-217.99 773.39,-226.9 777.7,-221.39"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M837.22,-270.23C820.69,-257.3 794.54,-236.85 775.57,-222.01"/>
+<polygon fill="#000000" stroke="#000000" points="777.7,-219.24 767.67,-215.83 773.39,-224.75 777.7,-219.24"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-141.73 143.5,-141.73 143.5,-117.73 250.5,-117.73 250.5,-141.73"/>
-<text text-anchor="middle" x="197" y="-127.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-136.58 0,-136.58 0,-112.58 106,-112.58 106,-136.58"/>
+<text text-anchor="middle" x="53" y="-122.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.78,-273.62C302.79,-269.91 294.7,-265.3 288,-259.73 250.79,-228.81 222.16,-178.86 207.93,-150.73"/>
-<polygon fill="#000000" stroke="#000000" points="211.07,-149.18 203.51,-141.75 204.79,-152.27 211.07,-149.18"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.79,-332.98C269.26,-337.43 229.25,-338.49 198,-322.58"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-101.73 0,-101.73 0,-77.73 106,-77.73 106,-101.73"/>
-<text text-anchor="middle" x="53" y="-87.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-216.58 143.5,-216.58 143.5,-192.58 250.5,-192.58 250.5,-216.58"/>
+<text text-anchor="middle" x="197" y="-202.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.76,-297.3C268.84,-302.4 228.4,-303.74 198,-285.73"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.24,-310.45C304.67,-306.61 295.69,-301.94 288,-296.58 258.49,-276 230.5,-244.92 213.79,-224.68"/>
+<polygon fill="#000000" stroke="#000000" points="216.37,-222.3 207.35,-216.73 210.93,-226.71 216.37,-222.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C587.94,-275.49 576.78,-264.95 537,-264.73 494.78,-264.49 483.97,-260.1 442,-264.73 429.15,-266.15 415.48,-268.62 402.67,-271.39"/>
-<polygon fill="#000000" stroke="#000000" points="401.59,-268.05 392.61,-273.66 403.13,-274.88 401.59,-268.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C547.38,-305.72 523.36,-288.34 442,-301.58 429.63,-303.59 416.44,-306.22 403.98,-308.94"/>
+<polygon fill="#000000" stroke="#000000" points="403.17,-305.54 394.17,-311.13 404.69,-312.37 403.17,-305.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-176.58 294.5,-176.58 294.5,-152.58 399.5,-152.58 399.5,-176.58"/>
+<text text-anchor="middle" x="347" y="-162.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M732.07,-217.92C709.22,-232.66 667.92,-256.61 628.5,-265.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C574.23,-277.82 583.78,-210.99 537,-184.73 525.05,-178.02 355.51,-152.59 260.83,-138.79"/>
-<polygon fill="#000000" stroke="#000000" points="261.19,-135.3 250.79,-137.32 260.18,-142.23 261.19,-135.3"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C439.92,-86.84 392.75,-122.68 367.32,-145.61"/>
+<polygon fill="#000000" stroke="#000000" points="364.8,-143.18 359.86,-152.55 369.57,-148.31 364.8,-143.18"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-61.73 142,-61.73 142,-37.73 252,-37.73 252,-61.73"/>
-<text text-anchor="middle" x="197" y="-47.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-96.58 288,-96.58 288,-72.58 406,-72.58 406,-96.58"/>
+<text text-anchor="middle" x="347" y="-82.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.12,-193.55C695.17,-164.83 590.72,-94.73 490.5,-87.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C451.58,-79.44 443.32,-72.96 406,-66.73 358.23,-58.76 303.64,-54.47 262.37,-52.2"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-48.7 252.18,-51.67 261.98,-55.69 262.35,-48.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C464.94,-85.68 439.13,-85.94 416.14,-85.85"/>
+<polygon fill="#000000" stroke="#000000" points="416.15,-82.35 406.13,-85.79 416.11,-89.35 416.15,-82.35"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-297.73 442,-297.73 442,-273.73 537,-273.73 537,-297.73"/>
-<text text-anchor="middle" x="489.5" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-215.58 576,-215.58 576,-191.58 679,-191.58 679,-215.58"/>
+<text text-anchor="middle" x="627.5" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C600.89,-272.21 572,-276.82 547.46,-279.98"/>
-<polygon fill="#000000" stroke="#000000" points="546.72,-276.54 537.23,-281.24 547.58,-283.49 546.72,-276.54"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C583.93,-275.82 579.23,-295.27 537,-306.73 455.52,-328.83 432.27,-330.84 348,-325.73"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-203.58C708.99,-203.58 699.2,-203.58 689.41,-203.58"/>
+<polygon fill="#000000" stroke="#000000" points="689.24,-200.08 679.24,-203.58 689.24,-207.08 689.24,-200.08"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-40.73 573,-40.73 573,-16.73 682,-16.73 682,-40.73"/>
-<text text-anchor="middle" x="627.5" y="-26.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-77.58 142,-77.58 142,-53.58 252,-53.58 252,-77.58"/>
+<text text-anchor="middle" x="197" y="-63.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.6,-193.51C736.4,-169.04 713.36,-113.02 682,-73.73 674.09,-63.82 663.74,-54.51 654.24,-46.96"/>
-<polygon fill="#000000" stroke="#000000" points="656.27,-44.11 646.21,-40.8 652.02,-49.66 656.27,-44.11"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C450.71,-86.34 443.54,-68.28 406,-63.58 353.96,-57.06 340.44,-62.99 288,-63.58 279.69,-63.67 270.94,-63.81 262.31,-63.97"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-60.47 252.25,-64.18 262.32,-67.47 262.18,-60.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.37,-191.41C699.35,-159.73 592.86,-77.66 490.5,-84.58"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-217.73 442.5,-217.73 442.5,-193.73 536.5,-193.73 536.5,-217.73"/>
-<text text-anchor="middle" x="489.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-254.58 442.5,-254.58 442.5,-230.58 536.5,-230.58 536.5,-254.58"/>
+<text text-anchor="middle" x="489.5" y="-240.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C615.91,-268.41 559.8,-241.28 523.05,-222.61"/>
-<polygon fill="#000000" stroke="#000000" points="524.2,-219.27 513.7,-217.84 521.01,-225.51 524.2,-219.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C608.01,-287.98 561.28,-271.82 527.76,-258.44"/>
+<polygon fill="#000000" stroke="#000000" points="528.84,-255.11 518.26,-254.59 526.21,-261.59 528.84,-255.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-217.73 576,-217.73 576,-193.73 679,-193.73 679,-217.73"/>
-<text text-anchor="middle" x="627.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-37.58 573,-37.58 573,-13.58 682,-13.58 682,-37.58"/>
+<text text-anchor="middle" x="627.5" y="-23.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.62,-191.26C736.46,-166.6 713.48,-110.15 682,-70.58 674.11,-60.66 663.76,-51.35 654.26,-43.79"/>
+<polygon fill="#000000" stroke="#000000" points="656.29,-40.94 646.22,-37.64 652.03,-46.5 656.29,-40.94"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-205.73C708.99,-205.73 699.2,-205.73 689.41,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-202.23 679.24,-205.73 689.24,-209.23 689.24,-202.23"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.54,-296.89 582.23,-327.1 537,-343.58 457.67,-372.46 432.27,-367.69 348,-362.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-99.73 294.5,-99.73 294.5,-75.73 399.5,-75.73 399.5,-99.73"/>
-<text text-anchor="middle" x="347" y="-85.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C462.84,-85.94 434.49,-85.62 410.01,-85.87"/>
-<polygon fill="#000000" stroke="#000000" points="409.73,-82.37 399.77,-86.01 409.82,-89.37 409.73,-82.37"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-377.73 288,-377.73 288,-353.73 406,-353.73 406,-377.73"/>
-<text text-anchor="middle" x="347" y="-363.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_gr.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-334.58 442,-334.58 442,-310.58 537,-310.58 537,-334.58"/>
+<text text-anchor="middle" x="489.5" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C576.6,-278.9 584.26,-318.98 537,-339.73 499.16,-356.35 453.31,-362.94 416.25,-365.34"/>
-<polygon fill="#000000" stroke="#000000" points="415.83,-361.85 406.04,-365.91 416.22,-368.84 415.83,-361.85"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C598.24,-290.84 566.7,-300.12 541.11,-307.65"/>
+<polygon fill="#000000" stroke="#000000" points="539.86,-304.37 531.26,-310.55 541.84,-311.09 539.86,-304.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.46,-296.62 582.32,-237.81 537,-221.58 457.6,-193.13 432.11,-198.41 348,-204.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.72,-215.84C715.66,-234.4 672.46,-268.88 628.5,-282.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-117.73C138.79,-113.61 122.26,-108.96 106.93,-104.64"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-101.2 97.07,-101.86 105.74,-107.94 107.64,-101.2"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-152.57C289.52,-140.79 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-61.73C138.79,-65.85 122.26,-70.5 106.93,-74.82"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-71.52 97.07,-77.6 107.64,-78.26 105.74,-71.52"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-176.58C286.15,-180.75 268.65,-185.48 252.49,-189.85"/>
+<polygon fill="#000000" stroke="#000000" points="251.37,-186.53 242.63,-192.51 253.2,-193.28 251.37,-186.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-285.73C429.74,-285.73 416.74,-285.73 404.34,-285.73"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-282.23 394.1,-285.73 404.1,-289.23 404.1,-282.23"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-124.58C169.89,-124.58 141.08,-124.58 116.27,-124.58"/>
+<polygon fill="#000000" stroke="#000000" points="116.27,-121.08 106.27,-124.58 116.27,-128.08 116.27,-121.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-96.58C289.52,-108.36 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-297.8C437.19,-310.49 390.28,-328.29 348,-325.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-325.73C277.99,-321.6 256.62,-320.46 198,-285.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C462.92,-161.03 434.47,-160.42 409.89,-160.92"/>
+<polygon fill="#000000" stroke="#000000" points="409.52,-157.43 399.62,-161.2 409.71,-164.42 409.52,-157.43"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.96,-18.56C481.96,-3.48 292.33,18.28 142,-28.73 115.62,-36.98 90.2,-56.22 73.52,-70.9"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-68.36 66.07,-77.68 75.83,-73.54 71.12,-68.36"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-217.75C457.79,-221.94 449.4,-226.82 442,-231.73 425.11,-242.93 423.37,-249.29 406,-259.73 400.22,-263.21 393.89,-266.5 387.6,-269.51"/>
-<polygon fill="#000000" stroke="#000000" points="386.12,-266.34 378.5,-273.7 389.05,-272.7 386.12,-266.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.59,-215.6C571.27,-219.41 556.38,-223.68 542.45,-227.68"/>
+<polygon fill="#000000" stroke="#000000" points="541.16,-224.41 532.51,-230.53 543.09,-231.14 541.16,-224.41"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C284.83,-246.51 233.92,-184 211.01,-150.43"/>
-<polygon fill="#000000" stroke="#000000" points="213.75,-148.22 205.31,-141.81 207.91,-152.08 213.75,-148.22"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.2,-217.74C434.43,-229.33 389.08,-245.2 348,-245.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C451.02,-159.38 443.29,-149.98 406,-143.58 314.51,-127.86 290.83,-124.58 198,-124.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.93,-191.51C567.74,-181.85 527.18,-169.18 490.5,-164.58"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-204.58C318.17,-206.62 287.33,-206.92 261.03,-206.6"/>
+<polygon fill="#000000" stroke="#000000" points="260.86,-203.1 250.81,-206.45 260.76,-210.1 260.86,-203.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C424.19,-155.66 412.75,-199.83 348,-204.58"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-285.73C125.85,-244.17 80.46,-152.99 62.6,-111.3"/>
-<polygon fill="#000000" stroke="#000000" points="65.73,-109.72 58.65,-101.83 59.27,-112.41 65.73,-109.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C328.97,-245.95 212.66,-294.41 198,-285.73"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-77.66C145.38,-86.61 115.83,-98.89 92.36,-108.64"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-105.44 83.04,-112.51 93.62,-111.91 90.93,-105.44"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C318.15,-126.06 287.29,-126.17 261,-126.85"/>
-<polygon fill="#000000" stroke="#000000" points="260.68,-123.35 250.79,-127.14 260.88,-130.35 260.68,-123.35"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-254.6C457.79,-258.79 449.4,-263.67 442,-268.58 425.11,-279.78 423.37,-286.13 406,-296.58 400.22,-300.05 393.89,-303.35 387.6,-306.36"/>
+<polygon fill="#000000" stroke="#000000" points="386.12,-303.19 378.5,-310.54 389.05,-309.55 386.12,-303.19"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.84,-217.88C582.85,-231.41 545.5,-253.37 519.56,-268.63"/>
-<polygon fill="#000000" stroke="#000000" points="517.75,-265.64 510.9,-273.73 521.3,-271.67 517.75,-265.64"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-322.58C122.35,-285.07 78.4,-189.47 61.72,-146.31"/>
+<polygon fill="#000000" stroke="#000000" points="64.94,-144.9 58.15,-136.76 58.38,-147.36 64.94,-144.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C329.01,-283.83 213.18,-330.31 198,-322.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C278.21,-123.68 265.79,-93.78 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C429.36,-107.67 410.33,-131.46 348,-127.73"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.53,-254.58C431.56,-265.26 387.71,-279.64 348,-282.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C295.08,-286.34 244.29,-248.15 217.48,-223.85"/>
+<polygon fill="#000000" stroke="#000000" points="219.65,-221.09 209.95,-216.82 214.87,-226.2 219.65,-221.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-205.73C566.43,-205.73 556.52,-205.73 546.94,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-202.23 536.69,-205.73 546.69,-209.23 546.69,-202.23"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.74,-15.33C480.17,-0.3 286.71,19.48 142,-44.58 111.9,-57.9 85.17,-85.65 69.28,-104.69"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-102.53 62.96,-112.5 71.97,-106.93 66.53,-102.53"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.33,-193.64C585.82,-175.99 537.16,-143.55 490.5,-127.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C461.15,-118.45 430.33,-109.51 404.54,-102.45"/>
-<polygon fill="#000000" stroke="#000000" points="405.12,-98.98 394.55,-99.74 403.28,-105.74 405.12,-98.98"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-322.58C429.74,-322.58 416.74,-322.58 404.34,-322.58"/>
+<polygon fill="#000000" stroke="#000000" points="404.1,-319.08 394.1,-322.58 404.1,-326.08 404.1,-319.08"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.59,-99.76C287.02,-104.47 267.86,-109.9 250.44,-114.85"/>
-<polygon fill="#000000" stroke="#000000" points="249.08,-111.59 240.42,-117.69 250.99,-118.33 249.08,-111.59"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-334.65C437.19,-347.34 390.28,-365.14 348,-362.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-362.58C277.99,-358.45 258.72,-353.5 198,-322.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.24,-90.28C265.81,-91.22 229.94,-91.64 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-89.73C169.94,-88.17 141.14,-87.9 116.32,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-84.62 106.31,-88.24 116.35,-91.62 116.27,-84.62"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_gr.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-353.7C307.9,-349.51 297.39,-344.63 288,-339.73 246.64,-318.15 238.13,-309.51 198,-285.73"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-192.43C150.42,-178.9 111.43,-156.93 84.34,-141.67"/>
+<polygon fill="#000000" stroke="#000000" points="85.73,-138.44 75.3,-136.58 82.3,-144.54 85.73,-138.44"/>
 </g>
 </g>
 </svg>
@@ -616,7 +609,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-2"></a>   <span class="k">use </span><span class="n">swiftest</span>
 <a name="ln-3"></a><span class="k">contains</span>
 <a name="ln-4"></a>
-<a name="ln-5"></a><span class="k">   module subroutine </span><span class="n">whm_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
+<a name="ln-5"></a><span class="k">   module pure subroutine </span><span class="n">whm_gr_kick_getacch_pl</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span> 
 <a name="ln-6"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-7"></a>      <span class="c">!!</span>
 <a name="ln-8"></a>      <span class="c">!! Compute relativisitic accelerations of massive bodies</span>
@@ -649,7 +642,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-35"></a><span class="k">   end subroutine </span><span class="n">whm_gr_kick_getacch_pl</span>
 <a name="ln-36"></a>
 <a name="ln-37"></a>
-<a name="ln-38"></a>   <span class="k">module subroutine </span><span class="n">whm_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
+<a name="ln-38"></a>   <span class="k">module pure subroutine </span><span class="n">whm_gr_kick_getacch_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">)</span>
 <a name="ln-39"></a>      <span class="c">!! author: David A. Minton</span>
 <a name="ln-40"></a>      <span class="c">!!</span>
 <a name="ln-41"></a>      <span class="c">!! Compute relativisitic accelerations of test particles</span>
@@ -700,32 +693,33 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
 <a name="ln-86"></a><span class="k">     return</span>
 <a name="ln-87"></a><span class="k">   end subroutine </span><span class="n">whm_gr_p4_pl</span>
 <a name="ln-88"></a>
-<a name="ln-89"></a>   <span class="k">module pure subroutine </span><span class="n">whm_gr_p4_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
-<a name="ln-90"></a>      <span class="c">!! author: David A. Minton</span>
-<a name="ln-91"></a>      <span class="c">!!</span>
-<a name="ln-92"></a>      <span class="c">!! Position kick to test particles due to p**4 term in the post-Newtonian correction</span>
-<a name="ln-93"></a>      <span class="c">!!    Based on Saha &amp; Tremaine (1994) Eq. 28</span>
-<a name="ln-94"></a>      <span class="c">!!</span>
-<a name="ln-95"></a>      <span class="c">!! Adapted from David A. Minton&#39;s Swifter routine routine gr_whm_p4.f90</span>
-<a name="ln-96"></a>      <span class="k">implicit none</span>
-<a name="ln-97"></a>      <span class="c">! Arguments</span>
-<a name="ln-98"></a>      <span class="k">class</span><span class="p">(</span><span class="n">whm_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest particle object</span>
-<a name="ln-99"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
-<a name="ln-100"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Step size</span>
-<a name="ln-101"></a>      <span class="c">! Internals</span>
-<a name="ln-102"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span>
-<a name="ln-103"></a>
-<a name="ln-104"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
-<a name="ln-105"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">ntp</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
-<a name="ln-106"></a><span class="k">         do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
-<a name="ln-107"></a>            <span class="k">call </span><span class="n">gr_p4_pos_kick</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">),</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">),</span> <span class="n">dt</span><span class="p">)</span>
-<a name="ln-108"></a>         <span class="k">end do</span>
-<a name="ln-109"></a><span class="k">      end associate</span>
-<a name="ln-110"></a><span class="k"> </span>
-<a name="ln-111"></a><span class="k">     return</span>
-<a name="ln-112"></a><span class="k">   end subroutine </span><span class="n">whm_gr_p4_tp</span>
-<a name="ln-113"></a>
-<a name="ln-114"></a><span class="k">end submodule </span><span class="n">s_whm_gr</span>
+<a name="ln-89"></a>
+<a name="ln-90"></a>   <span class="k">module pure subroutine </span><span class="n">whm_gr_p4_tp</span><span class="p">(</span><span class="n">self</span><span class="p">,</span> <span class="n">param</span><span class="p">,</span> <span class="n">dt</span><span class="p">)</span>
+<a name="ln-91"></a>      <span class="c">!! author: David A. Minton</span>
+<a name="ln-92"></a>      <span class="c">!!</span>
+<a name="ln-93"></a>      <span class="c">!! Position kick to test particles due to p**4 term in the post-Newtonian correction</span>
+<a name="ln-94"></a>      <span class="c">!!    Based on Saha &amp; Tremaine (1994) Eq. 28</span>
+<a name="ln-95"></a>      <span class="c">!!</span>
+<a name="ln-96"></a>      <span class="c">!! Adapted from David A. Minton&#39;s Swifter routine routine gr_whm_p4.f90</span>
+<a name="ln-97"></a>      <span class="k">implicit none</span>
+<a name="ln-98"></a>      <span class="c">! Arguments</span>
+<a name="ln-99"></a>      <span class="k">class</span><span class="p">(</span><span class="n">whm_tp</span><span class="p">),</span>              <span class="k">intent</span><span class="p">(</span><span class="n">inout</span><span class="p">)</span> <span class="kd">::</span> <span class="n">self</span>  <span class="c">!! Swiftest particle object</span>
+<a name="ln-100"></a>      <span class="k">class</span><span class="p">(</span><span class="n">swiftest_parameters</span><span class="p">),</span> <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">param</span> <span class="c">!! Current run configuration parameters </span>
+<a name="ln-101"></a>      <span class="kt">real</span><span class="p">(</span><span class="n">DP</span><span class="p">),</span>                   <span class="k">intent</span><span class="p">(</span><span class="n">in</span><span class="p">)</span>    <span class="kd">::</span> <span class="n">dt</span>    <span class="c">!! Step size</span>
+<a name="ln-102"></a>      <span class="c">! Internals</span>
+<a name="ln-103"></a>      <span class="kt">integer</span><span class="p">(</span><span class="n">I4B</span><span class="p">)</span>                              <span class="kd">::</span> <span class="n">i</span>
+<a name="ln-104"></a>
+<a name="ln-105"></a>      <span class="k">associate</span><span class="p">(</span><span class="n">tp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">,</span> <span class="n">ntp</span> <span class="o">=&gt;</span> <span class="n">self</span><span class="p">%</span><span class="n">nbody</span><span class="p">)</span>
+<a name="ln-106"></a>         <span class="k">if</span> <span class="p">(</span><span class="n">ntp</span> <span class="o">==</span> <span class="mi">0</span><span class="p">)</span> <span class="k">return</span>
+<a name="ln-107"></a><span class="k">         do </span><span class="n">concurrent</span><span class="p">(</span><span class="n">i</span> <span class="o">=</span> <span class="mi">1</span><span class="p">:</span><span class="n">ntp</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">lmask</span><span class="p">(</span><span class="n">i</span><span class="p">))</span>
+<a name="ln-108"></a>            <span class="k">call </span><span class="n">gr_p4_pos_kick</span><span class="p">(</span><span class="n">param</span><span class="p">,</span> <span class="n">tp</span><span class="p">%</span><span class="n">xh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">),</span> <span class="n">tp</span><span class="p">%</span><span class="n">vh</span><span class="p">(:,</span> <span class="n">i</span><span class="p">),</span> <span class="n">dt</span><span class="p">)</span>
+<a name="ln-109"></a>         <span class="k">end do</span>
+<a name="ln-110"></a><span class="k">      end associate</span>
+<a name="ln-111"></a><span class="k"> </span>
+<a name="ln-112"></a><span class="k">     return</span>
+<a name="ln-113"></a><span class="k">   end subroutine </span><span class="n">whm_gr_p4_tp</span>
+<a name="ln-114"></a>
+<a name="ln-115"></a><span class="k">end submodule </span><span class="n">s_whm_gr</span>
 </pre></div>
 
     </section>
diff --git a/docs/sourcefile/whm_kick.f90.html b/docs/sourcefile/whm_kick.f90.html
index d9b29a215..d6fcec387 100644
--- a/docs/sourcefile/whm_kick.f90.html
+++ b/docs/sourcefile/whm_kick.f90.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_kick.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_kickf90EfferentGraph" width="641pt" height="273pt"
- viewBox="0.00 0.00 641.00 273.21" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 381.73)">
+<svg id="sourcefilewhm_kickf90EfferentGraph" width="641pt" height="265pt"
+ viewBox="0.00 0.00 641.00 265.41" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 370.71)">
 <title>sourcefile~~whm_kick.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-381.73 901,-381.73 901,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-370.71 901,-370.71 901,4 -4,4"/>
 <!-- sourcefile~whm_kick.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_kick.f90</title>
-<polygon fill="none" stroke="black" points="897,-296.73 820,-296.73 820,-272.73 897,-272.73 897,-296.73"/>
-<text text-anchor="middle" x="858.5" y="-282.33" font-family="Helvetica,sans-Serif" font-size="10.50">whm_kick.f90</text>
+<polygon fill="none" stroke="black" points="897,-294.58 820,-294.58 820,-270.58 897,-270.58 897,-294.58"/>
+<text text-anchor="middle" x="858.5" y="-280.18" font-family="Helvetica,sans-Serif" font-size="10.50">whm_kick.f90</text>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~whm_classes.f90</title>
 <g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-297.73 300,-297.73 300,-273.73 394,-273.73 394,-297.73"/>
-<text text-anchor="middle" x="347" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-334.58 300,-334.58 300,-310.58 394,-310.58 394,-334.58"/>
+<text text-anchor="middle" x="347" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.86,-290.81C746.79,-301.7 580.75,-322.04 442,-306.73 429.15,-305.31 415.48,-302.83 402.67,-300.07"/>
-<polygon fill="#000000" stroke="#000000" points="403.13,-296.58 392.61,-297.8 401.59,-303.41 403.13,-296.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.81,-294.64C747,-316.5 581.86,-359.01 442,-343.58 429.15,-342.16 415.48,-339.68 402.67,-336.91"/>
+<polygon fill="#000000" stroke="#000000" points="403.13,-333.43 392.61,-334.65 401.59,-340.26 403.13,-333.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-217.73 718,-217.73 718,-193.73 784,-193.73 784,-217.73"/>
-<text text-anchor="middle" x="751" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.58 718,-215.58 718,-191.58 784,-191.58 784,-215.58"/>
+<text text-anchor="middle" x="751" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~whm_kick.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.02,-272.39C823.75,-259.46 796.44,-239.01 776.62,-224.16"/>
-<polygon fill="#000000" stroke="#000000" points="778.47,-221.18 768.37,-217.99 774.28,-226.78 778.47,-221.18"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.02,-270.23C823.75,-257.3 796.44,-236.85 776.62,-222.01"/>
+<polygon fill="#000000" stroke="#000000" points="778.47,-219.03 768.37,-215.83 774.28,-224.63 778.47,-219.03"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-141.73 143.5,-141.73 143.5,-117.73 250.5,-117.73 250.5,-141.73"/>
-<text text-anchor="middle" x="197" y="-127.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-136.58 0,-136.58 0,-112.58 106,-112.58 106,-136.58"/>
+<text text-anchor="middle" x="53" y="-122.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.78,-273.62C302.79,-269.91 294.7,-265.3 288,-259.73 250.79,-228.81 222.16,-178.86 207.93,-150.73"/>
-<polygon fill="#000000" stroke="#000000" points="211.07,-149.18 203.51,-141.75 204.79,-152.27 211.07,-149.18"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.79,-332.98C269.26,-337.43 229.25,-338.49 198,-322.58"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-101.73 0,-101.73 0,-77.73 106,-77.73 106,-101.73"/>
-<text text-anchor="middle" x="53" y="-87.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-216.58 143.5,-216.58 143.5,-192.58 250.5,-192.58 250.5,-216.58"/>
+<text text-anchor="middle" x="197" y="-202.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.76,-297.3C268.84,-302.4 228.4,-303.74 198,-285.73"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.24,-310.45C304.67,-306.61 295.69,-301.94 288,-296.58 258.49,-276 230.5,-244.92 213.79,-224.68"/>
+<polygon fill="#000000" stroke="#000000" points="216.37,-222.3 207.35,-216.73 210.93,-226.71 216.37,-222.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C587.94,-275.49 576.78,-264.95 537,-264.73 494.78,-264.49 483.97,-260.1 442,-264.73 429.15,-266.15 415.48,-268.62 402.67,-271.39"/>
-<polygon fill="#000000" stroke="#000000" points="401.59,-268.05 392.61,-273.66 403.13,-274.88 401.59,-268.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C547.38,-305.72 523.36,-288.34 442,-301.58 429.63,-303.59 416.44,-306.22 403.98,-308.94"/>
+<polygon fill="#000000" stroke="#000000" points="403.17,-305.54 394.17,-311.13 404.69,-312.37 403.17,-305.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-176.58 294.5,-176.58 294.5,-152.58 399.5,-152.58 399.5,-176.58"/>
+<text text-anchor="middle" x="347" y="-162.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M732.07,-217.92C709.22,-232.66 667.92,-256.61 628.5,-265.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C574.23,-277.82 583.78,-210.99 537,-184.73 525.05,-178.02 355.51,-152.59 260.83,-138.79"/>
-<polygon fill="#000000" stroke="#000000" points="261.19,-135.3 250.79,-137.32 260.18,-142.23 261.19,-135.3"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C439.92,-86.84 392.75,-122.68 367.32,-145.61"/>
+<polygon fill="#000000" stroke="#000000" points="364.8,-143.18 359.86,-152.55 369.57,-148.31 364.8,-143.18"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-61.73 142,-61.73 142,-37.73 252,-37.73 252,-61.73"/>
-<text text-anchor="middle" x="197" y="-47.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-96.58 288,-96.58 288,-72.58 406,-72.58 406,-96.58"/>
+<text text-anchor="middle" x="347" y="-82.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.12,-193.55C695.17,-164.83 590.72,-94.73 490.5,-87.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C451.58,-79.44 443.32,-72.96 406,-66.73 358.23,-58.76 303.64,-54.47 262.37,-52.2"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-48.7 252.18,-51.67 261.98,-55.69 262.35,-48.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C464.94,-85.68 439.13,-85.94 416.14,-85.85"/>
+<polygon fill="#000000" stroke="#000000" points="416.15,-82.35 406.13,-85.79 416.11,-89.35 416.15,-82.35"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-297.73 442,-297.73 442,-273.73 537,-273.73 537,-297.73"/>
-<text text-anchor="middle" x="489.5" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-215.58 576,-215.58 576,-191.58 679,-191.58 679,-215.58"/>
+<text text-anchor="middle" x="627.5" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C600.89,-272.21 572,-276.82 547.46,-279.98"/>
-<polygon fill="#000000" stroke="#000000" points="546.72,-276.54 537.23,-281.24 547.58,-283.49 546.72,-276.54"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C583.93,-275.82 579.23,-295.27 537,-306.73 455.52,-328.83 432.27,-330.84 348,-325.73"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-203.58C708.99,-203.58 699.2,-203.58 689.41,-203.58"/>
+<polygon fill="#000000" stroke="#000000" points="689.24,-200.08 679.24,-203.58 689.24,-207.08 689.24,-200.08"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-40.73 573,-40.73 573,-16.73 682,-16.73 682,-40.73"/>
-<text text-anchor="middle" x="627.5" y="-26.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-77.58 142,-77.58 142,-53.58 252,-53.58 252,-77.58"/>
+<text text-anchor="middle" x="197" y="-63.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.6,-193.51C736.4,-169.04 713.36,-113.02 682,-73.73 674.09,-63.82 663.74,-54.51 654.24,-46.96"/>
-<polygon fill="#000000" stroke="#000000" points="656.27,-44.11 646.21,-40.8 652.02,-49.66 656.27,-44.11"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C450.71,-86.34 443.54,-68.28 406,-63.58 353.96,-57.06 340.44,-62.99 288,-63.58 279.69,-63.67 270.94,-63.81 262.31,-63.97"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-60.47 252.25,-64.18 262.32,-67.47 262.18,-60.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.37,-191.41C699.35,-159.73 592.86,-77.66 490.5,-84.58"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-217.73 442.5,-217.73 442.5,-193.73 536.5,-193.73 536.5,-217.73"/>
-<text text-anchor="middle" x="489.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-254.58 442.5,-254.58 442.5,-230.58 536.5,-230.58 536.5,-254.58"/>
+<text text-anchor="middle" x="489.5" y="-240.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C615.91,-268.41 559.8,-241.28 523.05,-222.61"/>
-<polygon fill="#000000" stroke="#000000" points="524.2,-219.27 513.7,-217.84 521.01,-225.51 524.2,-219.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C608.01,-287.98 561.28,-271.82 527.76,-258.44"/>
+<polygon fill="#000000" stroke="#000000" points="528.84,-255.11 518.26,-254.59 526.21,-261.59 528.84,-255.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-217.73 576,-217.73 576,-193.73 679,-193.73 679,-217.73"/>
-<text text-anchor="middle" x="627.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-37.58 573,-37.58 573,-13.58 682,-13.58 682,-37.58"/>
+<text text-anchor="middle" x="627.5" y="-23.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.62,-191.26C736.46,-166.6 713.48,-110.15 682,-70.58 674.11,-60.66 663.76,-51.35 654.26,-43.79"/>
+<polygon fill="#000000" stroke="#000000" points="656.29,-40.94 646.22,-37.64 652.03,-46.5 656.29,-40.94"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-205.73C708.99,-205.73 699.2,-205.73 689.41,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-202.23 679.24,-205.73 689.24,-209.23 689.24,-202.23"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.54,-296.89 582.23,-327.1 537,-343.58 457.67,-372.46 432.27,-367.69 348,-362.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-99.73 294.5,-99.73 294.5,-75.73 399.5,-75.73 399.5,-99.73"/>
-<text text-anchor="middle" x="347" y="-85.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C462.84,-85.94 434.49,-85.62 410.01,-85.87"/>
-<polygon fill="#000000" stroke="#000000" points="409.73,-82.37 399.77,-86.01 409.82,-89.37 409.73,-82.37"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-377.73 288,-377.73 288,-353.73 406,-353.73 406,-377.73"/>
-<text text-anchor="middle" x="347" y="-363.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_kick.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-334.58 442,-334.58 442,-310.58 537,-310.58 537,-334.58"/>
+<text text-anchor="middle" x="489.5" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C576.6,-278.9 584.26,-318.98 537,-339.73 499.16,-356.35 453.31,-362.94 416.25,-365.34"/>
-<polygon fill="#000000" stroke="#000000" points="415.83,-361.85 406.04,-365.91 416.22,-368.84 415.83,-361.85"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C598.24,-290.84 566.7,-300.12 541.11,-307.65"/>
+<polygon fill="#000000" stroke="#000000" points="539.86,-304.37 531.26,-310.55 541.84,-311.09 539.86,-304.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.46,-296.62 582.32,-237.81 537,-221.58 457.6,-193.13 432.11,-198.41 348,-204.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.72,-215.84C715.66,-234.4 672.46,-268.88 628.5,-282.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-117.73C138.79,-113.61 122.26,-108.96 106.93,-104.64"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-101.2 97.07,-101.86 105.74,-107.94 107.64,-101.2"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-152.57C289.52,-140.79 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-61.73C138.79,-65.85 122.26,-70.5 106.93,-74.82"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-71.52 97.07,-77.6 107.64,-78.26 105.74,-71.52"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-176.58C286.15,-180.75 268.65,-185.48 252.49,-189.85"/>
+<polygon fill="#000000" stroke="#000000" points="251.37,-186.53 242.63,-192.51 253.2,-193.28 251.37,-186.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-285.73C429.74,-285.73 416.74,-285.73 404.34,-285.73"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-282.23 394.1,-285.73 404.1,-289.23 404.1,-282.23"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-124.58C169.89,-124.58 141.08,-124.58 116.27,-124.58"/>
+<polygon fill="#000000" stroke="#000000" points="116.27,-121.08 106.27,-124.58 116.27,-128.08 116.27,-121.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-96.58C289.52,-108.36 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-297.8C437.19,-310.49 390.28,-328.29 348,-325.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-325.73C277.99,-321.6 256.62,-320.46 198,-285.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C462.92,-161.03 434.47,-160.42 409.89,-160.92"/>
+<polygon fill="#000000" stroke="#000000" points="409.52,-157.43 399.62,-161.2 409.71,-164.42 409.52,-157.43"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.96,-18.56C481.96,-3.48 292.33,18.28 142,-28.73 115.62,-36.98 90.2,-56.22 73.52,-70.9"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-68.36 66.07,-77.68 75.83,-73.54 71.12,-68.36"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-217.75C457.79,-221.94 449.4,-226.82 442,-231.73 425.11,-242.93 423.37,-249.29 406,-259.73 400.22,-263.21 393.89,-266.5 387.6,-269.51"/>
-<polygon fill="#000000" stroke="#000000" points="386.12,-266.34 378.5,-273.7 389.05,-272.7 386.12,-266.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.59,-215.6C571.27,-219.41 556.38,-223.68 542.45,-227.68"/>
+<polygon fill="#000000" stroke="#000000" points="541.16,-224.41 532.51,-230.53 543.09,-231.14 541.16,-224.41"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C284.83,-246.51 233.92,-184 211.01,-150.43"/>
-<polygon fill="#000000" stroke="#000000" points="213.75,-148.22 205.31,-141.81 207.91,-152.08 213.75,-148.22"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.2,-217.74C434.43,-229.33 389.08,-245.2 348,-245.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C451.02,-159.38 443.29,-149.98 406,-143.58 314.51,-127.86 290.83,-124.58 198,-124.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.93,-191.51C567.74,-181.85 527.18,-169.18 490.5,-164.58"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-204.58C318.17,-206.62 287.33,-206.92 261.03,-206.6"/>
+<polygon fill="#000000" stroke="#000000" points="260.86,-203.1 250.81,-206.45 260.76,-210.1 260.86,-203.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C424.19,-155.66 412.75,-199.83 348,-204.58"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-285.73C125.85,-244.17 80.46,-152.99 62.6,-111.3"/>
-<polygon fill="#000000" stroke="#000000" points="65.73,-109.72 58.65,-101.83 59.27,-112.41 65.73,-109.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C328.97,-245.95 212.66,-294.41 198,-285.73"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-77.66C145.38,-86.61 115.83,-98.89 92.36,-108.64"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-105.44 83.04,-112.51 93.62,-111.91 90.93,-105.44"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C318.15,-126.06 287.29,-126.17 261,-126.85"/>
-<polygon fill="#000000" stroke="#000000" points="260.68,-123.35 250.79,-127.14 260.88,-130.35 260.68,-123.35"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-254.6C457.79,-258.79 449.4,-263.67 442,-268.58 425.11,-279.78 423.37,-286.13 406,-296.58 400.22,-300.05 393.89,-303.35 387.6,-306.36"/>
+<polygon fill="#000000" stroke="#000000" points="386.12,-303.19 378.5,-310.54 389.05,-309.55 386.12,-303.19"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.84,-217.88C582.85,-231.41 545.5,-253.37 519.56,-268.63"/>
-<polygon fill="#000000" stroke="#000000" points="517.75,-265.64 510.9,-273.73 521.3,-271.67 517.75,-265.64"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-322.58C122.35,-285.07 78.4,-189.47 61.72,-146.31"/>
+<polygon fill="#000000" stroke="#000000" points="64.94,-144.9 58.15,-136.76 58.38,-147.36 64.94,-144.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C329.01,-283.83 213.18,-330.31 198,-322.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C278.21,-123.68 265.79,-93.78 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C429.36,-107.67 410.33,-131.46 348,-127.73"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.53,-254.58C431.56,-265.26 387.71,-279.64 348,-282.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C295.08,-286.34 244.29,-248.15 217.48,-223.85"/>
+<polygon fill="#000000" stroke="#000000" points="219.65,-221.09 209.95,-216.82 214.87,-226.2 219.65,-221.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-205.73C566.43,-205.73 556.52,-205.73 546.94,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-202.23 536.69,-205.73 546.69,-209.23 546.69,-202.23"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.74,-15.33C480.17,-0.3 286.71,19.48 142,-44.58 111.9,-57.9 85.17,-85.65 69.28,-104.69"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-102.53 62.96,-112.5 71.97,-106.93 66.53,-102.53"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.33,-193.64C585.82,-175.99 537.16,-143.55 490.5,-127.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C461.15,-118.45 430.33,-109.51 404.54,-102.45"/>
-<polygon fill="#000000" stroke="#000000" points="405.12,-98.98 394.55,-99.74 403.28,-105.74 405.12,-98.98"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-322.58C429.74,-322.58 416.74,-322.58 404.34,-322.58"/>
+<polygon fill="#000000" stroke="#000000" points="404.1,-319.08 394.1,-322.58 404.1,-326.08 404.1,-319.08"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.59,-99.76C287.02,-104.47 267.86,-109.9 250.44,-114.85"/>
-<polygon fill="#000000" stroke="#000000" points="249.08,-111.59 240.42,-117.69 250.99,-118.33 249.08,-111.59"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-334.65C437.19,-347.34 390.28,-365.14 348,-362.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-362.58C277.99,-358.45 258.72,-353.5 198,-322.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.24,-90.28C265.81,-91.22 229.94,-91.64 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-89.73C169.94,-88.17 141.14,-87.9 116.32,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-84.62 106.31,-88.24 116.35,-91.62 116.27,-84.62"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_kick.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-353.7C307.9,-349.51 297.39,-344.63 288,-339.73 246.64,-318.15 238.13,-309.51 198,-285.73"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-192.43C150.42,-178.9 111.43,-156.93 84.34,-141.67"/>
+<polygon fill="#000000" stroke="#000000" points="85.73,-138.44 75.3,-136.58 82.3,-144.54 85.73,-138.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/whm_setup.f90.html b/docs/sourcefile/whm_setup.f90.html
index 798991087..4f7ebce59 100644
--- a/docs/sourcefile/whm_setup.f90.html
+++ b/docs/sourcefile/whm_setup.f90.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_setup.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_setupf90EfferentGraph" width="641pt" height="271pt"
- viewBox="0.00 0.00 641.00 270.81" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 381.73)">
+<svg id="sourcefilewhm_setupf90EfferentGraph" width="641pt" height="263pt"
+ viewBox="0.00 0.00 641.00 263.08" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph" class="graph" transform="scale(0.7 0.7) rotate(0) translate(4 370.71)">
 <title>sourcefile~~whm_setup.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-381.73 909,-381.73 909,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-370.71 909,-370.71 909,4 -4,4"/>
 <!-- sourcefile~whm_setup.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_setup.f90</title>
-<polygon fill="none" stroke="black" points="905,-296.73 820,-296.73 820,-272.73 905,-272.73 905,-296.73"/>
-<text text-anchor="middle" x="862.5" y="-282.33" font-family="Helvetica,sans-Serif" font-size="10.50">whm_setup.f90</text>
+<polygon fill="none" stroke="black" points="905,-294.58 820,-294.58 820,-270.58 905,-270.58 905,-294.58"/>
+<text text-anchor="middle" x="862.5" y="-280.18" font-family="Helvetica,sans-Serif" font-size="10.50">whm_setup.f90</text>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~whm_classes.f90</title>
 <g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-297.73 300,-297.73 300,-273.73 394,-273.73 394,-297.73"/>
-<text text-anchor="middle" x="347" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-334.58 300,-334.58 300,-310.58 394,-310.58 394,-334.58"/>
+<text text-anchor="middle" x="347" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.99,-291.35C744.53,-302.4 579.91,-321.95 442,-306.73 429.15,-305.31 415.48,-302.83 402.67,-300.07"/>
-<polygon fill="#000000" stroke="#000000" points="403.13,-296.58 392.61,-297.8 401.59,-303.41 403.13,-296.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M823.72,-294.59C750.35,-316.46 583.37,-359.17 442,-343.58 429.15,-342.16 415.48,-339.68 402.67,-336.91"/>
+<polygon fill="#000000" stroke="#000000" points="403.13,-333.43 392.61,-334.65 401.59,-340.26 403.13,-333.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-217.73 718,-217.73 718,-193.73 784,-193.73 784,-217.73"/>
-<text text-anchor="middle" x="751" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.58 718,-215.58 718,-191.58 784,-191.58 784,-215.58"/>
+<text text-anchor="middle" x="751" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~whm_setup.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.39,-272.39C826.39,-259.4 797.87,-238.82 777.28,-223.96"/>
-<polygon fill="#000000" stroke="#000000" points="779.15,-221 768.99,-217.99 775.05,-226.68 779.15,-221"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M844.39,-270.23C826.39,-257.25 797.87,-236.67 777.28,-221.81"/>
+<polygon fill="#000000" stroke="#000000" points="779.15,-218.85 768.99,-215.83 775.05,-224.52 779.15,-218.85"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-141.73 143.5,-141.73 143.5,-117.73 250.5,-117.73 250.5,-141.73"/>
-<text text-anchor="middle" x="197" y="-127.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-136.58 0,-136.58 0,-112.58 106,-112.58 106,-136.58"/>
+<text text-anchor="middle" x="53" y="-122.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.78,-273.62C302.79,-269.91 294.7,-265.3 288,-259.73 250.79,-228.81 222.16,-178.86 207.93,-150.73"/>
-<polygon fill="#000000" stroke="#000000" points="211.07,-149.18 203.51,-141.75 204.79,-152.27 211.07,-149.18"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.79,-332.98C269.26,-337.43 229.25,-338.49 198,-322.58"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-101.73 0,-101.73 0,-77.73 106,-77.73 106,-101.73"/>
-<text text-anchor="middle" x="53" y="-87.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-216.58 143.5,-216.58 143.5,-192.58 250.5,-192.58 250.5,-216.58"/>
+<text text-anchor="middle" x="197" y="-202.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.76,-297.3C268.84,-302.4 228.4,-303.74 198,-285.73"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.24,-310.45C304.67,-306.61 295.69,-301.94 288,-296.58 258.49,-276 230.5,-244.92 213.79,-224.68"/>
+<polygon fill="#000000" stroke="#000000" points="216.37,-222.3 207.35,-216.73 210.93,-226.71 216.37,-222.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C587.94,-275.49 576.78,-264.95 537,-264.73 494.78,-264.49 483.97,-260.1 442,-264.73 429.15,-266.15 415.48,-268.62 402.67,-271.39"/>
-<polygon fill="#000000" stroke="#000000" points="401.59,-268.05 392.61,-273.66 403.13,-274.88 401.59,-268.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C547.38,-305.72 523.36,-288.34 442,-301.58 429.63,-303.59 416.44,-306.22 403.98,-308.94"/>
+<polygon fill="#000000" stroke="#000000" points="403.17,-305.54 394.17,-311.13 404.69,-312.37 403.17,-305.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-176.58 294.5,-176.58 294.5,-152.58 399.5,-152.58 399.5,-176.58"/>
+<text text-anchor="middle" x="347" y="-162.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M732.07,-217.92C709.22,-232.66 667.92,-256.61 628.5,-265.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C574.23,-277.82 583.78,-210.99 537,-184.73 525.05,-178.02 355.51,-152.59 260.83,-138.79"/>
-<polygon fill="#000000" stroke="#000000" points="261.19,-135.3 250.79,-137.32 260.18,-142.23 261.19,-135.3"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C439.92,-86.84 392.75,-122.68 367.32,-145.61"/>
+<polygon fill="#000000" stroke="#000000" points="364.8,-143.18 359.86,-152.55 369.57,-148.31 364.8,-143.18"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-61.73 142,-61.73 142,-37.73 252,-37.73 252,-61.73"/>
-<text text-anchor="middle" x="197" y="-47.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-96.58 288,-96.58 288,-72.58 406,-72.58 406,-96.58"/>
+<text text-anchor="middle" x="347" y="-82.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.12,-193.55C695.17,-164.83 590.72,-94.73 490.5,-87.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C451.58,-79.44 443.32,-72.96 406,-66.73 358.23,-58.76 303.64,-54.47 262.37,-52.2"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-48.7 252.18,-51.67 261.98,-55.69 262.35,-48.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C464.94,-85.68 439.13,-85.94 416.14,-85.85"/>
+<polygon fill="#000000" stroke="#000000" points="416.15,-82.35 406.13,-85.79 416.11,-89.35 416.15,-82.35"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-297.73 442,-297.73 442,-273.73 537,-273.73 537,-297.73"/>
-<text text-anchor="middle" x="489.5" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-215.58 576,-215.58 576,-191.58 679,-191.58 679,-215.58"/>
+<text text-anchor="middle" x="627.5" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C600.89,-272.21 572,-276.82 547.46,-279.98"/>
-<polygon fill="#000000" stroke="#000000" points="546.72,-276.54 537.23,-281.24 547.58,-283.49 546.72,-276.54"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C583.93,-275.82 579.23,-295.27 537,-306.73 455.52,-328.83 432.27,-330.84 348,-325.73"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-203.58C708.99,-203.58 699.2,-203.58 689.41,-203.58"/>
+<polygon fill="#000000" stroke="#000000" points="689.24,-200.08 679.24,-203.58 689.24,-207.08 689.24,-200.08"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-40.73 573,-40.73 573,-16.73 682,-16.73 682,-40.73"/>
-<text text-anchor="middle" x="627.5" y="-26.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-77.58 142,-77.58 142,-53.58 252,-53.58 252,-77.58"/>
+<text text-anchor="middle" x="197" y="-63.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.6,-193.51C736.4,-169.04 713.36,-113.02 682,-73.73 674.09,-63.82 663.74,-54.51 654.24,-46.96"/>
-<polygon fill="#000000" stroke="#000000" points="656.27,-44.11 646.21,-40.8 652.02,-49.66 656.27,-44.11"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C450.71,-86.34 443.54,-68.28 406,-63.58 353.96,-57.06 340.44,-62.99 288,-63.58 279.69,-63.67 270.94,-63.81 262.31,-63.97"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-60.47 252.25,-64.18 262.32,-67.47 262.18,-60.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.37,-191.41C699.35,-159.73 592.86,-77.66 490.5,-84.58"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-217.73 442.5,-217.73 442.5,-193.73 536.5,-193.73 536.5,-217.73"/>
-<text text-anchor="middle" x="489.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-254.58 442.5,-254.58 442.5,-230.58 536.5,-230.58 536.5,-254.58"/>
+<text text-anchor="middle" x="489.5" y="-240.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C615.91,-268.41 559.8,-241.28 523.05,-222.61"/>
-<polygon fill="#000000" stroke="#000000" points="524.2,-219.27 513.7,-217.84 521.01,-225.51 524.2,-219.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C608.01,-287.98 561.28,-271.82 527.76,-258.44"/>
+<polygon fill="#000000" stroke="#000000" points="528.84,-255.11 518.26,-254.59 526.21,-261.59 528.84,-255.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-217.73 576,-217.73 576,-193.73 679,-193.73 679,-217.73"/>
-<text text-anchor="middle" x="627.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-37.58 573,-37.58 573,-13.58 682,-13.58 682,-37.58"/>
+<text text-anchor="middle" x="627.5" y="-23.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.62,-191.26C736.46,-166.6 713.48,-110.15 682,-70.58 674.11,-60.66 663.76,-51.35 654.26,-43.79"/>
+<polygon fill="#000000" stroke="#000000" points="656.29,-40.94 646.22,-37.64 652.03,-46.5 656.29,-40.94"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-205.73C708.99,-205.73 699.2,-205.73 689.41,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-202.23 679.24,-205.73 689.24,-209.23 689.24,-202.23"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.54,-296.89 582.23,-327.1 537,-343.58 457.67,-372.46 432.27,-367.69 348,-362.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-99.73 294.5,-99.73 294.5,-75.73 399.5,-75.73 399.5,-99.73"/>
-<text text-anchor="middle" x="347" y="-85.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C462.84,-85.94 434.49,-85.62 410.01,-85.87"/>
-<polygon fill="#000000" stroke="#000000" points="409.73,-82.37 399.77,-86.01 409.82,-89.37 409.73,-82.37"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-377.73 288,-377.73 288,-353.73 406,-353.73 406,-377.73"/>
-<text text-anchor="middle" x="347" y="-363.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_setup.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-334.58 442,-334.58 442,-310.58 537,-310.58 537,-334.58"/>
+<text text-anchor="middle" x="489.5" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C576.6,-278.9 584.26,-318.98 537,-339.73 499.16,-356.35 453.31,-362.94 416.25,-365.34"/>
-<polygon fill="#000000" stroke="#000000" points="415.83,-361.85 406.04,-365.91 416.22,-368.84 415.83,-361.85"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C598.24,-290.84 566.7,-300.12 541.11,-307.65"/>
+<polygon fill="#000000" stroke="#000000" points="539.86,-304.37 531.26,-310.55 541.84,-311.09 539.86,-304.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.46,-296.62 582.32,-237.81 537,-221.58 457.6,-193.13 432.11,-198.41 348,-204.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.72,-215.84C715.66,-234.4 672.46,-268.88 628.5,-282.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-117.73C138.79,-113.61 122.26,-108.96 106.93,-104.64"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-101.2 97.07,-101.86 105.74,-107.94 107.64,-101.2"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-152.57C289.52,-140.79 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-61.73C138.79,-65.85 122.26,-70.5 106.93,-74.82"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-71.52 97.07,-77.6 107.64,-78.26 105.74,-71.52"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-176.58C286.15,-180.75 268.65,-185.48 252.49,-189.85"/>
+<polygon fill="#000000" stroke="#000000" points="251.37,-186.53 242.63,-192.51 253.2,-193.28 251.37,-186.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-285.73C429.74,-285.73 416.74,-285.73 404.34,-285.73"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-282.23 394.1,-285.73 404.1,-289.23 404.1,-282.23"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-124.58C169.89,-124.58 141.08,-124.58 116.27,-124.58"/>
+<polygon fill="#000000" stroke="#000000" points="116.27,-121.08 106.27,-124.58 116.27,-128.08 116.27,-121.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-96.58C289.52,-108.36 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-297.8C437.19,-310.49 390.28,-328.29 348,-325.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-325.73C277.99,-321.6 256.62,-320.46 198,-285.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C462.92,-161.03 434.47,-160.42 409.89,-160.92"/>
+<polygon fill="#000000" stroke="#000000" points="409.52,-157.43 399.62,-161.2 409.71,-164.42 409.52,-157.43"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.96,-18.56C481.96,-3.48 292.33,18.28 142,-28.73 115.62,-36.98 90.2,-56.22 73.52,-70.9"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-68.36 66.07,-77.68 75.83,-73.54 71.12,-68.36"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-217.75C457.79,-221.94 449.4,-226.82 442,-231.73 425.11,-242.93 423.37,-249.29 406,-259.73 400.22,-263.21 393.89,-266.5 387.6,-269.51"/>
-<polygon fill="#000000" stroke="#000000" points="386.12,-266.34 378.5,-273.7 389.05,-272.7 386.12,-266.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.59,-215.6C571.27,-219.41 556.38,-223.68 542.45,-227.68"/>
+<polygon fill="#000000" stroke="#000000" points="541.16,-224.41 532.51,-230.53 543.09,-231.14 541.16,-224.41"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C284.83,-246.51 233.92,-184 211.01,-150.43"/>
-<polygon fill="#000000" stroke="#000000" points="213.75,-148.22 205.31,-141.81 207.91,-152.08 213.75,-148.22"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.2,-217.74C434.43,-229.33 389.08,-245.2 348,-245.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C451.02,-159.38 443.29,-149.98 406,-143.58 314.51,-127.86 290.83,-124.58 198,-124.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.93,-191.51C567.74,-181.85 527.18,-169.18 490.5,-164.58"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-204.58C318.17,-206.62 287.33,-206.92 261.03,-206.6"/>
+<polygon fill="#000000" stroke="#000000" points="260.86,-203.1 250.81,-206.45 260.76,-210.1 260.86,-203.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C424.19,-155.66 412.75,-199.83 348,-204.58"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-285.73C125.85,-244.17 80.46,-152.99 62.6,-111.3"/>
-<polygon fill="#000000" stroke="#000000" points="65.73,-109.72 58.65,-101.83 59.27,-112.41 65.73,-109.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C328.97,-245.95 212.66,-294.41 198,-285.73"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-77.66C145.38,-86.61 115.83,-98.89 92.36,-108.64"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-105.44 83.04,-112.51 93.62,-111.91 90.93,-105.44"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C318.15,-126.06 287.29,-126.17 261,-126.85"/>
-<polygon fill="#000000" stroke="#000000" points="260.68,-123.35 250.79,-127.14 260.88,-130.35 260.68,-123.35"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-254.6C457.79,-258.79 449.4,-263.67 442,-268.58 425.11,-279.78 423.37,-286.13 406,-296.58 400.22,-300.05 393.89,-303.35 387.6,-306.36"/>
+<polygon fill="#000000" stroke="#000000" points="386.12,-303.19 378.5,-310.54 389.05,-309.55 386.12,-303.19"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.84,-217.88C582.85,-231.41 545.5,-253.37 519.56,-268.63"/>
-<polygon fill="#000000" stroke="#000000" points="517.75,-265.64 510.9,-273.73 521.3,-271.67 517.75,-265.64"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-322.58C122.35,-285.07 78.4,-189.47 61.72,-146.31"/>
+<polygon fill="#000000" stroke="#000000" points="64.94,-144.9 58.15,-136.76 58.38,-147.36 64.94,-144.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C329.01,-283.83 213.18,-330.31 198,-322.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C278.21,-123.68 265.79,-93.78 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C429.36,-107.67 410.33,-131.46 348,-127.73"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.53,-254.58C431.56,-265.26 387.71,-279.64 348,-282.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C295.08,-286.34 244.29,-248.15 217.48,-223.85"/>
+<polygon fill="#000000" stroke="#000000" points="219.65,-221.09 209.95,-216.82 214.87,-226.2 219.65,-221.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-205.73C566.43,-205.73 556.52,-205.73 546.94,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-202.23 536.69,-205.73 546.69,-209.23 546.69,-202.23"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.74,-15.33C480.17,-0.3 286.71,19.48 142,-44.58 111.9,-57.9 85.17,-85.65 69.28,-104.69"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-102.53 62.96,-112.5 71.97,-106.93 66.53,-102.53"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.33,-193.64C585.82,-175.99 537.16,-143.55 490.5,-127.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C461.15,-118.45 430.33,-109.51 404.54,-102.45"/>
-<polygon fill="#000000" stroke="#000000" points="405.12,-98.98 394.55,-99.74 403.28,-105.74 405.12,-98.98"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-322.58C429.74,-322.58 416.74,-322.58 404.34,-322.58"/>
+<polygon fill="#000000" stroke="#000000" points="404.1,-319.08 394.1,-322.58 404.1,-326.08 404.1,-319.08"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.59,-99.76C287.02,-104.47 267.86,-109.9 250.44,-114.85"/>
-<polygon fill="#000000" stroke="#000000" points="249.08,-111.59 240.42,-117.69 250.99,-118.33 249.08,-111.59"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-334.65C437.19,-347.34 390.28,-365.14 348,-362.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-362.58C277.99,-358.45 258.72,-353.5 198,-322.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.24,-90.28C265.81,-91.22 229.94,-91.64 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-89.73C169.94,-88.17 141.14,-87.9 116.32,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-84.62 106.31,-88.24 116.35,-91.62 116.27,-84.62"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_setup.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-353.7C307.9,-349.51 297.39,-344.63 288,-339.73 246.64,-318.15 238.13,-309.51 198,-285.73"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-192.43C150.42,-178.9 111.43,-156.93 84.34,-141.67"/>
+<polygon fill="#000000" stroke="#000000" points="85.73,-138.44 75.3,-136.58 82.3,-144.54 85.73,-138.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/whm_step.f90.html b/docs/sourcefile/whm_step.f90.html
index a21c0e2f9..be1b91199 100644
--- a/docs/sourcefile/whm_step.f90.html
+++ b/docs/sourcefile/whm_step.f90.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_step.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_stepf90EfferentGraph" width="641pt" height="273pt"
- viewBox="0.00 0.00 641.00 272.60" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~whm_step.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 381.73)">
+<svg id="sourcefilewhm_stepf90EfferentGraph" width="641pt" height="265pt"
+ viewBox="0.00 0.00 641.00 264.82" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~whm_step.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 370.71)">
 <title>sourcefile~~whm_step.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-381.73 903,-381.73 903,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-370.71 903,-370.71 903,4 -4,4"/>
 <!-- sourcefile~whm_step.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_step.f90</title>
-<polygon fill="none" stroke="black" points="899,-296.73 820,-296.73 820,-272.73 899,-272.73 899,-296.73"/>
-<text text-anchor="middle" x="859.5" y="-282.33" font-family="Helvetica,sans-Serif" font-size="10.50">whm_step.f90</text>
+<polygon fill="none" stroke="black" points="899,-294.58 820,-294.58 820,-270.58 899,-270.58 899,-294.58"/>
+<text text-anchor="middle" x="859.5" y="-280.18" font-family="Helvetica,sans-Serif" font-size="10.50">whm_step.f90</text>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~whm_classes.f90</title>
 <g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-297.73 300,-297.73 300,-273.73 394,-273.73 394,-297.73"/>
-<text text-anchor="middle" x="347" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-334.58 300,-334.58 300,-310.58 394,-310.58 394,-334.58"/>
+<text text-anchor="middle" x="347" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~whm_step.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.91,-290.94C746.24,-301.87 580.55,-322.02 442,-306.73 429.15,-305.31 415.48,-302.83 402.67,-300.07"/>
-<polygon fill="#000000" stroke="#000000" points="403.13,-296.58 392.61,-297.8 401.59,-303.41 403.13,-296.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M820.71,-294.65C747.73,-316.52 582.19,-359.05 442,-343.58 429.15,-342.16 415.48,-339.68 402.67,-336.91"/>
+<polygon fill="#000000" stroke="#000000" points="403.13,-333.43 392.61,-334.65 401.59,-340.26 403.13,-333.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-217.73 718,-217.73 718,-193.73 784,-193.73 784,-217.73"/>
-<text text-anchor="middle" x="751" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.58 718,-215.58 718,-191.58 784,-191.58 784,-215.58"/>
+<text text-anchor="middle" x="751" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~whm_step.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.86,-272.39C824.35,-259.4 796.61,-238.82 776.58,-223.96"/>
-<polygon fill="#000000" stroke="#000000" points="778.64,-221.13 768.52,-217.99 774.47,-226.76 778.64,-221.13"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M841.86,-270.23C824.35,-257.25 796.61,-236.67 776.58,-221.81"/>
+<polygon fill="#000000" stroke="#000000" points="778.64,-218.98 768.52,-215.83 774.47,-224.6 778.64,-218.98"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-141.73 143.5,-141.73 143.5,-117.73 250.5,-117.73 250.5,-141.73"/>
-<text text-anchor="middle" x="197" y="-127.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-136.58 0,-136.58 0,-112.58 106,-112.58 106,-136.58"/>
+<text text-anchor="middle" x="53" y="-122.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.78,-273.62C302.79,-269.91 294.7,-265.3 288,-259.73 250.79,-228.81 222.16,-178.86 207.93,-150.73"/>
-<polygon fill="#000000" stroke="#000000" points="211.07,-149.18 203.51,-141.75 204.79,-152.27 211.07,-149.18"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.79,-332.98C269.26,-337.43 229.25,-338.49 198,-322.58"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-101.73 0,-101.73 0,-77.73 106,-77.73 106,-101.73"/>
-<text text-anchor="middle" x="53" y="-87.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-216.58 143.5,-216.58 143.5,-192.58 250.5,-192.58 250.5,-216.58"/>
+<text text-anchor="middle" x="197" y="-202.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.76,-297.3C268.84,-302.4 228.4,-303.74 198,-285.73"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.24,-310.45C304.67,-306.61 295.69,-301.94 288,-296.58 258.49,-276 230.5,-244.92 213.79,-224.68"/>
+<polygon fill="#000000" stroke="#000000" points="216.37,-222.3 207.35,-216.73 210.93,-226.71 216.37,-222.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C587.94,-275.49 576.78,-264.95 537,-264.73 494.78,-264.49 483.97,-260.1 442,-264.73 429.15,-266.15 415.48,-268.62 402.67,-271.39"/>
-<polygon fill="#000000" stroke="#000000" points="401.59,-268.05 392.61,-273.66 403.13,-274.88 401.59,-268.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C547.38,-305.72 523.36,-288.34 442,-301.58 429.63,-303.59 416.44,-306.22 403.98,-308.94"/>
+<polygon fill="#000000" stroke="#000000" points="403.17,-305.54 394.17,-311.13 404.69,-312.37 403.17,-305.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-176.58 294.5,-176.58 294.5,-152.58 399.5,-152.58 399.5,-176.58"/>
+<text text-anchor="middle" x="347" y="-162.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M732.07,-217.92C709.22,-232.66 667.92,-256.61 628.5,-265.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C574.23,-277.82 583.78,-210.99 537,-184.73 525.05,-178.02 355.51,-152.59 260.83,-138.79"/>
-<polygon fill="#000000" stroke="#000000" points="261.19,-135.3 250.79,-137.32 260.18,-142.23 261.19,-135.3"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C439.92,-86.84 392.75,-122.68 367.32,-145.61"/>
+<polygon fill="#000000" stroke="#000000" points="364.8,-143.18 359.86,-152.55 369.57,-148.31 364.8,-143.18"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-61.73 142,-61.73 142,-37.73 252,-37.73 252,-61.73"/>
-<text text-anchor="middle" x="197" y="-47.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-96.58 288,-96.58 288,-72.58 406,-72.58 406,-96.58"/>
+<text text-anchor="middle" x="347" y="-82.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.12,-193.55C695.17,-164.83 590.72,-94.73 490.5,-87.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C451.58,-79.44 443.32,-72.96 406,-66.73 358.23,-58.76 303.64,-54.47 262.37,-52.2"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-48.7 252.18,-51.67 261.98,-55.69 262.35,-48.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C464.94,-85.68 439.13,-85.94 416.14,-85.85"/>
+<polygon fill="#000000" stroke="#000000" points="416.15,-82.35 406.13,-85.79 416.11,-89.35 416.15,-82.35"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-297.73 442,-297.73 442,-273.73 537,-273.73 537,-297.73"/>
-<text text-anchor="middle" x="489.5" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-215.58 576,-215.58 576,-191.58 679,-191.58 679,-215.58"/>
+<text text-anchor="middle" x="627.5" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C600.89,-272.21 572,-276.82 547.46,-279.98"/>
-<polygon fill="#000000" stroke="#000000" points="546.72,-276.54 537.23,-281.24 547.58,-283.49 546.72,-276.54"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C583.93,-275.82 579.23,-295.27 537,-306.73 455.52,-328.83 432.27,-330.84 348,-325.73"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-203.58C708.99,-203.58 699.2,-203.58 689.41,-203.58"/>
+<polygon fill="#000000" stroke="#000000" points="689.24,-200.08 679.24,-203.58 689.24,-207.08 689.24,-200.08"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-40.73 573,-40.73 573,-16.73 682,-16.73 682,-40.73"/>
-<text text-anchor="middle" x="627.5" y="-26.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-77.58 142,-77.58 142,-53.58 252,-53.58 252,-77.58"/>
+<text text-anchor="middle" x="197" y="-63.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.6,-193.51C736.4,-169.04 713.36,-113.02 682,-73.73 674.09,-63.82 663.74,-54.51 654.24,-46.96"/>
-<polygon fill="#000000" stroke="#000000" points="656.27,-44.11 646.21,-40.8 652.02,-49.66 656.27,-44.11"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C450.71,-86.34 443.54,-68.28 406,-63.58 353.96,-57.06 340.44,-62.99 288,-63.58 279.69,-63.67 270.94,-63.81 262.31,-63.97"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-60.47 252.25,-64.18 262.32,-67.47 262.18,-60.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.37,-191.41C699.35,-159.73 592.86,-77.66 490.5,-84.58"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-217.73 442.5,-217.73 442.5,-193.73 536.5,-193.73 536.5,-217.73"/>
-<text text-anchor="middle" x="489.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-254.58 442.5,-254.58 442.5,-230.58 536.5,-230.58 536.5,-254.58"/>
+<text text-anchor="middle" x="489.5" y="-240.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C615.91,-268.41 559.8,-241.28 523.05,-222.61"/>
-<polygon fill="#000000" stroke="#000000" points="524.2,-219.27 513.7,-217.84 521.01,-225.51 524.2,-219.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C608.01,-287.98 561.28,-271.82 527.76,-258.44"/>
+<polygon fill="#000000" stroke="#000000" points="528.84,-255.11 518.26,-254.59 526.21,-261.59 528.84,-255.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-217.73 576,-217.73 576,-193.73 679,-193.73 679,-217.73"/>
-<text text-anchor="middle" x="627.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-37.58 573,-37.58 573,-13.58 682,-13.58 682,-37.58"/>
+<text text-anchor="middle" x="627.5" y="-23.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.62,-191.26C736.46,-166.6 713.48,-110.15 682,-70.58 674.11,-60.66 663.76,-51.35 654.26,-43.79"/>
+<polygon fill="#000000" stroke="#000000" points="656.29,-40.94 646.22,-37.64 652.03,-46.5 656.29,-40.94"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-205.73C708.99,-205.73 699.2,-205.73 689.41,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-202.23 679.24,-205.73 689.24,-209.23 689.24,-202.23"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.54,-296.89 582.23,-327.1 537,-343.58 457.67,-372.46 432.27,-367.69 348,-362.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-99.73 294.5,-99.73 294.5,-75.73 399.5,-75.73 399.5,-99.73"/>
-<text text-anchor="middle" x="347" y="-85.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C462.84,-85.94 434.49,-85.62 410.01,-85.87"/>
-<polygon fill="#000000" stroke="#000000" points="409.73,-82.37 399.77,-86.01 409.82,-89.37 409.73,-82.37"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-377.73 288,-377.73 288,-353.73 406,-353.73 406,-377.73"/>
-<text text-anchor="middle" x="347" y="-363.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_step.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-334.58 442,-334.58 442,-310.58 537,-310.58 537,-334.58"/>
+<text text-anchor="middle" x="489.5" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C576.6,-278.9 584.26,-318.98 537,-339.73 499.16,-356.35 453.31,-362.94 416.25,-365.34"/>
-<polygon fill="#000000" stroke="#000000" points="415.83,-361.85 406.04,-365.91 416.22,-368.84 415.83,-361.85"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C598.24,-290.84 566.7,-300.12 541.11,-307.65"/>
+<polygon fill="#000000" stroke="#000000" points="539.86,-304.37 531.26,-310.55 541.84,-311.09 539.86,-304.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.46,-296.62 582.32,-237.81 537,-221.58 457.6,-193.13 432.11,-198.41 348,-204.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.72,-215.84C715.66,-234.4 672.46,-268.88 628.5,-282.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-117.73C138.79,-113.61 122.26,-108.96 106.93,-104.64"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-101.2 97.07,-101.86 105.74,-107.94 107.64,-101.2"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-152.57C289.52,-140.79 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-61.73C138.79,-65.85 122.26,-70.5 106.93,-74.82"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-71.52 97.07,-77.6 107.64,-78.26 105.74,-71.52"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-176.58C286.15,-180.75 268.65,-185.48 252.49,-189.85"/>
+<polygon fill="#000000" stroke="#000000" points="251.37,-186.53 242.63,-192.51 253.2,-193.28 251.37,-186.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-285.73C429.74,-285.73 416.74,-285.73 404.34,-285.73"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-282.23 394.1,-285.73 404.1,-289.23 404.1,-282.23"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-124.58C169.89,-124.58 141.08,-124.58 116.27,-124.58"/>
+<polygon fill="#000000" stroke="#000000" points="116.27,-121.08 106.27,-124.58 116.27,-128.08 116.27,-121.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-96.58C289.52,-108.36 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-297.8C437.19,-310.49 390.28,-328.29 348,-325.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-325.73C277.99,-321.6 256.62,-320.46 198,-285.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C462.92,-161.03 434.47,-160.42 409.89,-160.92"/>
+<polygon fill="#000000" stroke="#000000" points="409.52,-157.43 399.62,-161.2 409.71,-164.42 409.52,-157.43"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.96,-18.56C481.96,-3.48 292.33,18.28 142,-28.73 115.62,-36.98 90.2,-56.22 73.52,-70.9"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-68.36 66.07,-77.68 75.83,-73.54 71.12,-68.36"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-217.75C457.79,-221.94 449.4,-226.82 442,-231.73 425.11,-242.93 423.37,-249.29 406,-259.73 400.22,-263.21 393.89,-266.5 387.6,-269.51"/>
-<polygon fill="#000000" stroke="#000000" points="386.12,-266.34 378.5,-273.7 389.05,-272.7 386.12,-266.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.59,-215.6C571.27,-219.41 556.38,-223.68 542.45,-227.68"/>
+<polygon fill="#000000" stroke="#000000" points="541.16,-224.41 532.51,-230.53 543.09,-231.14 541.16,-224.41"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C284.83,-246.51 233.92,-184 211.01,-150.43"/>
-<polygon fill="#000000" stroke="#000000" points="213.75,-148.22 205.31,-141.81 207.91,-152.08 213.75,-148.22"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.2,-217.74C434.43,-229.33 389.08,-245.2 348,-245.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C451.02,-159.38 443.29,-149.98 406,-143.58 314.51,-127.86 290.83,-124.58 198,-124.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.93,-191.51C567.74,-181.85 527.18,-169.18 490.5,-164.58"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-204.58C318.17,-206.62 287.33,-206.92 261.03,-206.6"/>
+<polygon fill="#000000" stroke="#000000" points="260.86,-203.1 250.81,-206.45 260.76,-210.1 260.86,-203.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C424.19,-155.66 412.75,-199.83 348,-204.58"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-285.73C125.85,-244.17 80.46,-152.99 62.6,-111.3"/>
-<polygon fill="#000000" stroke="#000000" points="65.73,-109.72 58.65,-101.83 59.27,-112.41 65.73,-109.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C328.97,-245.95 212.66,-294.41 198,-285.73"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-77.66C145.38,-86.61 115.83,-98.89 92.36,-108.64"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-105.44 83.04,-112.51 93.62,-111.91 90.93,-105.44"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C318.15,-126.06 287.29,-126.17 261,-126.85"/>
-<polygon fill="#000000" stroke="#000000" points="260.68,-123.35 250.79,-127.14 260.88,-130.35 260.68,-123.35"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-254.6C457.79,-258.79 449.4,-263.67 442,-268.58 425.11,-279.78 423.37,-286.13 406,-296.58 400.22,-300.05 393.89,-303.35 387.6,-306.36"/>
+<polygon fill="#000000" stroke="#000000" points="386.12,-303.19 378.5,-310.54 389.05,-309.55 386.12,-303.19"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.84,-217.88C582.85,-231.41 545.5,-253.37 519.56,-268.63"/>
-<polygon fill="#000000" stroke="#000000" points="517.75,-265.64 510.9,-273.73 521.3,-271.67 517.75,-265.64"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-322.58C122.35,-285.07 78.4,-189.47 61.72,-146.31"/>
+<polygon fill="#000000" stroke="#000000" points="64.94,-144.9 58.15,-136.76 58.38,-147.36 64.94,-144.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C329.01,-283.83 213.18,-330.31 198,-322.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C278.21,-123.68 265.79,-93.78 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C429.36,-107.67 410.33,-131.46 348,-127.73"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.53,-254.58C431.56,-265.26 387.71,-279.64 348,-282.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C295.08,-286.34 244.29,-248.15 217.48,-223.85"/>
+<polygon fill="#000000" stroke="#000000" points="219.65,-221.09 209.95,-216.82 214.87,-226.2 219.65,-221.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-205.73C566.43,-205.73 556.52,-205.73 546.94,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-202.23 536.69,-205.73 546.69,-209.23 546.69,-202.23"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.74,-15.33C480.17,-0.3 286.71,19.48 142,-44.58 111.9,-57.9 85.17,-85.65 69.28,-104.69"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-102.53 62.96,-112.5 71.97,-106.93 66.53,-102.53"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.33,-193.64C585.82,-175.99 537.16,-143.55 490.5,-127.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C461.15,-118.45 430.33,-109.51 404.54,-102.45"/>
-<polygon fill="#000000" stroke="#000000" points="405.12,-98.98 394.55,-99.74 403.28,-105.74 405.12,-98.98"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-322.58C429.74,-322.58 416.74,-322.58 404.34,-322.58"/>
+<polygon fill="#000000" stroke="#000000" points="404.1,-319.08 394.1,-322.58 404.1,-326.08 404.1,-319.08"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.59,-99.76C287.02,-104.47 267.86,-109.9 250.44,-114.85"/>
-<polygon fill="#000000" stroke="#000000" points="249.08,-111.59 240.42,-117.69 250.99,-118.33 249.08,-111.59"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-334.65C437.19,-347.34 390.28,-365.14 348,-362.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-362.58C277.99,-358.45 258.72,-353.5 198,-322.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_step.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.24,-90.28C265.81,-91.22 229.94,-91.64 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-89.73C169.94,-88.17 141.14,-87.9 116.32,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-84.62 106.31,-88.24 116.35,-91.62 116.27,-84.62"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_step.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-353.7C307.9,-349.51 297.39,-344.63 288,-339.73 246.64,-318.15 238.13,-309.51 198,-285.73"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-192.43C150.42,-178.9 111.43,-156.93 84.34,-141.67"/>
+<polygon fill="#000000" stroke="#000000" points="85.73,-138.44 75.3,-136.58 82.3,-144.54 85.73,-138.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/sourcefile/whm_util.f90.html b/docs/sourcefile/whm_util.f90.html
index 48aa926ec..9ecd7daf1 100644
--- a/docs/sourcefile/whm_util.f90.html
+++ b/docs/sourcefile/whm_util.f90.html
@@ -226,298 +226,291 @@ <h3 class="panel-title">This file depends on</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: sourcefile~~whm_util.f90~~EfferentGraph Pages: 1 -->
-<svg id="sourcefilewhm_utilf90EfferentGraph" width="641pt" height="274pt"
- viewBox="0.00 0.00 641.00 274.42" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="sourcefile~~whm_util.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 381.73)">
+<svg id="sourcefilewhm_utilf90EfferentGraph" width="641pt" height="267pt"
+ viewBox="0.00 0.00 641.00 266.58" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="sourcefile~~whm_util.f90~~EfferentGraph" class="graph" transform="scale(0.71 0.71) rotate(0) translate(4 370.71)">
 <title>sourcefile~~whm_util.f90~~EfferentGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-381.73 897,-381.73 897,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-370.71 897,-370.71 897,4 -4,4"/>
 <!-- sourcefile~whm_util.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_node1" class="node">
 <title>sourcefile~whm_util.f90</title>
-<polygon fill="none" stroke="black" points="893,-296.73 820,-296.73 820,-272.73 893,-272.73 893,-296.73"/>
-<text text-anchor="middle" x="856.5" y="-282.33" font-family="Helvetica,sans-Serif" font-size="10.50">whm_util.f90</text>
+<polygon fill="none" stroke="black" points="893,-294.58 820,-294.58 820,-270.58 893,-270.58 893,-294.58"/>
+<text text-anchor="middle" x="856.5" y="-280.18" font-family="Helvetica,sans-Serif" font-size="10.50">whm_util.f90</text>
 </g>
 <!-- sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_node2" class="node">
 <title>sourcefile~whm_classes.f90</title>
 <g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node2"><a xlink:href=".././sourcefile/whm_classes.f90.html" xlink:title="whm_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-297.73 300,-297.73 300,-273.73 394,-273.73 394,-297.73"/>
-<text text-anchor="middle" x="347" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="394,-334.58 300,-334.58 300,-310.58 394,-310.58 394,-334.58"/>
+<text text-anchor="middle" x="347" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge1" class="edge">
 <title>sourcefile~whm_util.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.99,-290.5C748.32,-301.29 581.34,-322.1 442,-306.73 429.15,-305.31 415.48,-302.83 402.67,-300.07"/>
-<polygon fill="#000000" stroke="#000000" points="403.13,-296.58 392.61,-297.8 401.59,-303.41 403.13,-296.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M819.94,-294.04C748.52,-315.69 582.47,-359.08 442,-343.58 429.15,-342.16 415.48,-339.68 402.67,-336.91"/>
+<polygon fill="#000000" stroke="#000000" points="403.13,-333.43 392.61,-334.65 401.59,-340.26 403.13,-333.43"/>
 </g>
 <!-- sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_node3" class="node">
 <title>sourcefile~swiftest.f90</title>
 <g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/swiftest.f90.html" xlink:title="swiftest.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-217.73 718,-217.73 718,-193.73 784,-193.73 784,-217.73"/>
-<text text-anchor="middle" x="751" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="784,-215.58 718,-215.58 718,-191.58 784,-191.58 784,-215.58"/>
+<text text-anchor="middle" x="751" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~whm_util.f90&#45;&gt;sourcefile~swiftest.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M839.33,-272.39C822.39,-259.46 795.6,-239.01 776.15,-224.16"/>
-<polygon fill="#000000" stroke="#000000" points="778.13,-221.27 768.06,-217.99 773.88,-226.84 778.13,-221.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M839.33,-270.23C822.39,-257.3 795.6,-236.85 776.15,-222.01"/>
+<polygon fill="#000000" stroke="#000000" points="778.13,-219.12 768.06,-215.83 773.88,-224.68 778.13,-219.12"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~swiftest_classes.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-141.73 143.5,-141.73 143.5,-117.73 250.5,-117.73 250.5,-141.73"/>
-<text text-anchor="middle" x="197" y="-127.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
+<!-- sourcefile~swiftest_globals.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_node10" class="node">
+<title>sourcefile~swiftest_globals.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-136.58 0,-136.58 0,-112.58 106,-112.58 106,-136.58"/>
+<text text-anchor="middle" x="53" y="-122.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge3" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M310.78,-273.62C302.79,-269.91 294.7,-265.3 288,-259.73 250.79,-228.81 222.16,-178.86 207.93,-150.73"/>
-<polygon fill="#000000" stroke="#000000" points="211.07,-149.18 203.51,-141.75 204.79,-152.27 211.07,-149.18"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.79,-332.98C269.26,-337.43 229.25,-338.49 198,-322.58"/>
 </g>
-<!-- sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_node7" class="node">
-<title>sourcefile~swiftest_globals.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/swiftest_globals.f90.html" xlink:title="swiftest_globals.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="106,-101.73 0,-101.73 0,-77.73 106,-77.73 106,-101.73"/>
-<text text-anchor="middle" x="53" y="-87.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_globals.f90</text>
+<!-- sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_node12" class="node">
+<title>sourcefile~swiftest_classes.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_classes.f90.html" xlink:title="swiftest_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="250.5,-216.58 143.5,-216.58 143.5,-192.58 250.5,-192.58 250.5,-216.58"/>
+<text text-anchor="middle" x="197" y="-202.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M299.76,-297.3C268.84,-302.4 228.4,-303.74 198,-285.73"/>
+<title>sourcefile~whm_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M313.24,-310.45C304.67,-306.61 295.69,-301.94 288,-296.58 258.49,-276 230.5,-244.92 213.79,-224.68"/>
+<polygon fill="#000000" stroke="#000000" points="216.37,-222.3 207.35,-216.73 210.93,-226.71 216.37,-222.3"/>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge6" class="edge">
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge10" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C587.94,-275.49 576.78,-264.95 537,-264.73 494.78,-264.49 483.97,-260.1 442,-264.73 429.15,-266.15 415.48,-268.62 402.67,-271.39"/>
-<polygon fill="#000000" stroke="#000000" points="401.59,-268.05 392.61,-273.66 403.13,-274.88 401.59,-268.05"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C547.38,-305.72 523.36,-288.34 442,-301.58 429.63,-303.59 416.44,-306.22 403.98,-308.94"/>
+<polygon fill="#000000" stroke="#000000" points="403.17,-305.54 394.17,-311.13 404.69,-312.37 403.17,-305.54"/>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~fraggle_classes.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_node4" class="node">
+<title>sourcefile~fraggle_classes.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-176.58 294.5,-176.58 294.5,-152.58 399.5,-152.58 399.5,-176.58"/>
+<text text-anchor="middle" x="347" y="-162.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge5" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M732.07,-217.92C709.22,-232.66 667.92,-256.61 628.5,-265.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C574.23,-277.82 583.78,-210.99 537,-184.73 525.05,-178.02 355.51,-152.59 260.83,-138.79"/>
-<polygon fill="#000000" stroke="#000000" points="261.19,-135.3 250.79,-137.32 260.18,-142.23 261.19,-135.3"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C439.92,-86.84 392.75,-122.68 367.32,-145.61"/>
+<polygon fill="#000000" stroke="#000000" points="364.8,-143.18 359.86,-152.55 369.57,-148.31 364.8,-143.18"/>
 </g>
-<!-- sourcefile~walltime_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_node5" class="node">
-<title>sourcefile~walltime_classes.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-61.73 142,-61.73 142,-37.73 252,-37.73 252,-61.73"/>
-<text text-anchor="middle" x="197" y="-47.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
+<title>sourcefile~swiftest_operators.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-96.58 288,-96.58 288,-72.58 406,-72.58 406,-96.58"/>
+<text text-anchor="middle" x="347" y="-82.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge7" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M734.12,-193.55C695.17,-164.83 590.72,-94.73 490.5,-87.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C451.58,-79.44 443.32,-72.96 406,-66.73 358.23,-58.76 303.64,-54.47 262.37,-52.2"/>
-<polygon fill="#000000" stroke="#000000" points="262.35,-48.7 252.18,-51.67 261.98,-55.69 262.35,-48.7"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge6" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C464.94,-85.68 439.13,-85.94 416.14,-85.85"/>
+<polygon fill="#000000" stroke="#000000" points="416.15,-82.35 406.13,-85.79 416.11,-89.35 416.15,-82.35"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~symba_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_node6" class="node">
-<title>sourcefile~rmvs_classes.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-297.73 442,-297.73 442,-273.73 537,-273.73 537,-297.73"/>
-<text text-anchor="middle" x="489.5" y="-283.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
+<title>sourcefile~symba_classes.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-215.58 576,-215.58 576,-191.58 679,-191.58 679,-215.58"/>
+<text text-anchor="middle" x="627.5" y="-201.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge8" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C600.89,-272.21 572,-276.82 547.46,-279.98"/>
-<polygon fill="#000000" stroke="#000000" points="546.72,-276.54 537.23,-281.24 547.58,-283.49 546.72,-276.54"/>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge9" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C583.93,-275.82 579.23,-295.27 537,-306.73 455.52,-328.83 432.27,-330.84 348,-325.73"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge7" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-203.58C708.99,-203.58 699.2,-203.58 689.41,-203.58"/>
+<polygon fill="#000000" stroke="#000000" points="689.24,-200.08 679.24,-203.58 689.24,-207.08 689.24,-200.08"/>
 </g>
-<!-- sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_node8" class="node">
-<title>sourcefile~lambda_function.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-40.73 573,-40.73 573,-16.73 682,-16.73 682,-40.73"/>
-<text text-anchor="middle" x="627.5" y="-26.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
+<!-- sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_node7" class="node">
+<title>sourcefile~walltime_classes.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node7"><a xlink:href=".././sourcefile/walltime_classes.f90.html" xlink:title="walltime_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="252,-77.58 142,-77.58 142,-53.58 252,-53.58 252,-77.58"/>
+<text text-anchor="middle" x="197" y="-63.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">walltime_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge10" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.6,-193.51C736.4,-169.04 713.36,-113.02 682,-73.73 674.09,-63.82 663.74,-54.51 654.24,-46.96"/>
-<polygon fill="#000000" stroke="#000000" points="656.27,-44.11 646.21,-40.8 652.02,-49.66 656.27,-44.11"/>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge8" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~walltime_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-84.58C450.71,-86.34 443.54,-68.28 406,-63.58 353.96,-57.06 340.44,-62.99 288,-63.58 279.69,-63.67 270.94,-63.81 262.31,-63.97"/>
+<polygon fill="#000000" stroke="#000000" points="262.18,-60.47 252.25,-64.18 262.32,-67.47 262.18,-60.47"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.37,-191.41C699.35,-159.73 592.86,-77.66 490.5,-84.58"/>
 </g>
 <!-- sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_node9" class="node">
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~helio_classes.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-217.73 442.5,-217.73 442.5,-193.73 536.5,-193.73 536.5,-217.73"/>
-<text text-anchor="middle" x="489.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/helio_classes.f90.html" xlink:title="helio_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="536.5,-254.58 442.5,-254.58 442.5,-230.58 536.5,-230.58 536.5,-254.58"/>
+<text text-anchor="middle" x="489.5" y="-240.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_classes.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge11" class="edge">
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge9" class="edge">
 <title>sourcefile~swiftest.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C615.91,-268.41 559.8,-241.28 523.05,-222.61"/>
-<polygon fill="#000000" stroke="#000000" points="524.2,-219.27 513.7,-217.84 521.01,-225.51 524.2,-219.27"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C608.01,-287.98 561.28,-271.82 527.76,-258.44"/>
+<polygon fill="#000000" stroke="#000000" points="528.84,-255.11 518.26,-254.59 526.21,-261.59 528.84,-255.11"/>
 </g>
-<!-- sourcefile~symba_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_node10" class="node">
-<title>sourcefile~symba_classes.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node10"><a xlink:href=".././sourcefile/symba_classes.f90.html" xlink:title="symba_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="679,-217.73 576,-217.73 576,-193.73 679,-193.73 679,-217.73"/>
-<text text-anchor="middle" x="627.5" y="-203.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_classes.f90</text>
+<!-- sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_node9" class="node">
+<title>sourcefile~lambda_function.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node9"><a xlink:href=".././sourcefile/lambda_function.f90.html" xlink:title="lambda_function.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="682,-37.58 573,-37.58 573,-13.58 682,-13.58 682,-37.58"/>
+<text text-anchor="middle" x="627.5" y="-23.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">lambda_function.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge11" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~lambda_function.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M745.62,-191.26C736.46,-166.6 713.48,-110.15 682,-70.58 674.11,-60.66 663.76,-51.35 654.26,-43.79"/>
+<polygon fill="#000000" stroke="#000000" points="656.29,-40.94 646.22,-37.64 652.03,-46.5 656.29,-40.94"/>
+</g>
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge12" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~symba_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M717.76,-205.73C708.99,-205.73 699.2,-205.73 689.41,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="689.24,-202.23 679.24,-205.73 689.24,-209.23 689.24,-202.23"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.54,-296.89 582.23,-327.1 537,-343.58 457.67,-372.46 432.27,-367.69 348,-362.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_node11" class="node">
-<title>sourcefile~fraggle_classes.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/fraggle_classes.f90.html" xlink:title="fraggle_classes.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="399.5,-99.73 294.5,-99.73 294.5,-75.73 399.5,-75.73 399.5,-99.73"/>
-<text text-anchor="middle" x="347" y="-85.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_classes.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge13" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-87.73C462.84,-85.94 434.49,-85.62 410.01,-85.87"/>
-<polygon fill="#000000" stroke="#000000" points="409.73,-82.37 399.77,-86.01 409.82,-89.37 409.73,-82.37"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_node12" class="node">
-<title>sourcefile~swiftest_operators.f90</title>
-<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node12"><a xlink:href=".././sourcefile/swiftest_operators.f90.html" xlink:title="swiftest_operators.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="406,-377.73 288,-377.73 288,-353.73 406,-353.73 406,-377.73"/>
-<text text-anchor="middle" x="347" y="-363.33" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_operators.f90</text>
+<title>sourcefile~rmvs_classes.f90</title>
+<g id="a_sourcefile~~whm_util.f90~~EfferentGraph_node11"><a xlink:href=".././sourcefile/rmvs_classes.f90.html" xlink:title="rmvs_classes.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537,-334.58 442,-334.58 442,-310.58 537,-310.58 537,-334.58"/>
+<text text-anchor="middle" x="489.5" y="-320.18" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_classes.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge14" class="edge">
-<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_operators.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-265.73C576.6,-278.9 584.26,-318.98 537,-339.73 499.16,-356.35 453.31,-362.94 416.25,-365.34"/>
-<polygon fill="#000000" stroke="#000000" points="415.83,-361.85 406.04,-365.91 416.22,-368.84 415.83,-361.85"/>
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C598.24,-290.84 566.7,-300.12 541.11,-307.65"/>
+<polygon fill="#000000" stroke="#000000" points="539.86,-304.37 531.26,-310.55 541.84,-311.09 539.86,-304.37"/>
 </g>
-<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge13" class="edge">
+<title>sourcefile~swiftest.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M626.5,-282.58C580.46,-296.62 582.32,-237.81 537,-221.58 457.6,-193.13 432.11,-198.41 348,-204.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M736.72,-215.84C715.66,-234.4 672.46,-268.88 628.5,-282.58"/>
+</g>
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge15" class="edge">
-<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-117.73C138.79,-113.61 122.26,-108.96 106.93,-104.64"/>
-<polygon fill="#000000" stroke="#000000" points="107.64,-101.2 97.07,-101.86 105.74,-107.94 107.64,-101.2"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-152.57C289.52,-140.79 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge16" class="edge">
-<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.4,-61.73C138.79,-65.85 122.26,-70.5 106.93,-74.82"/>
-<polygon fill="#000000" stroke="#000000" points="105.74,-71.52 97.07,-77.6 107.64,-78.26 105.74,-71.52"/>
+<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M301.6,-176.58C286.15,-180.75 268.65,-185.48 252.49,-189.85"/>
+<polygon fill="#000000" stroke="#000000" points="251.37,-186.53 242.63,-192.51 253.2,-193.28 251.37,-186.53"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
+<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge17" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-285.73C429.74,-285.73 416.74,-285.73 404.34,-285.73"/>
-<polygon fill="#000000" stroke="#000000" points="404.1,-282.23 394.1,-285.73 404.1,-289.23 404.1,-282.23"/>
+<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-124.58C169.89,-124.58 141.08,-124.58 116.27,-124.58"/>
+<polygon fill="#000000" stroke="#000000" points="116.27,-121.08 106.27,-124.58 116.27,-128.08 116.27,-121.08"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M318.77,-96.58C289.52,-108.36 241.38,-124.58 198,-124.58"/>
 </g>
-<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge18" class="edge">
-<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-297.8C437.19,-310.49 390.28,-328.29 348,-325.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-325.73C277.99,-321.6 256.62,-320.46 198,-285.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C462.92,-161.03 434.47,-160.42 409.89,-160.92"/>
+<polygon fill="#000000" stroke="#000000" points="409.52,-157.43 399.62,-161.2 409.71,-164.42 409.52,-157.43"/>
 </g>
-<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge19" class="edge">
-<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.96,-18.56C481.96,-3.48 292.33,18.28 142,-28.73 115.62,-36.98 90.2,-56.22 73.52,-70.9"/>
-<polygon fill="#000000" stroke="#000000" points="71.12,-68.36 66.07,-77.68 75.83,-73.54 71.12,-68.36"/>
-</g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge21" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-217.75C457.79,-221.94 449.4,-226.82 442,-231.73 425.11,-242.93 423.37,-249.29 406,-259.73 400.22,-263.21 393.89,-266.5 387.6,-269.51"/>
-<polygon fill="#000000" stroke="#000000" points="386.12,-266.34 378.5,-273.7 389.05,-272.7 386.12,-266.34"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M584.59,-215.6C571.27,-219.41 556.38,-223.68 542.45,-227.68"/>
+<polygon fill="#000000" stroke="#000000" points="541.16,-224.41 532.51,-230.53 543.09,-231.14 541.16,-224.41"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge20" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C284.83,-246.51 233.92,-184 211.01,-150.43"/>
-<polygon fill="#000000" stroke="#000000" points="213.75,-148.22 205.31,-141.81 207.91,-152.08 213.75,-148.22"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M462.2,-217.74C434.43,-229.33 389.08,-245.2 348,-245.73"/>
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C451.02,-159.38 443.29,-149.98 406,-143.58 314.51,-127.86 290.83,-124.58 198,-124.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M594.93,-191.51C567.74,-181.85 527.18,-169.18 490.5,-164.58"/>
 </g>
-<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge21" class="edge">
+<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-204.58C318.17,-206.62 287.33,-206.92 261.03,-206.6"/>
+<polygon fill="#000000" stroke="#000000" points="260.86,-203.1 250.81,-206.45 260.76,-210.1 260.86,-203.1"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-164.58C424.19,-155.66 412.75,-199.83 348,-204.58"/>
+</g>
+<!-- sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge22" class="edge">
-<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-285.73C125.85,-244.17 80.46,-152.99 62.6,-111.3"/>
-<polygon fill="#000000" stroke="#000000" points="65.73,-109.72 58.65,-101.83 59.27,-112.41 65.73,-109.72"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-245.73C328.97,-245.95 212.66,-294.41 198,-285.73"/>
+<title>sourcefile~walltime_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M166.92,-77.66C145.38,-86.61 115.83,-98.89 92.36,-108.64"/>
+<polygon fill="#000000" stroke="#000000" points="90.93,-105.44 83.04,-112.51 93.62,-111.91 90.93,-105.44"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge23" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C318.15,-126.06 287.29,-126.17 261,-126.85"/>
-<polygon fill="#000000" stroke="#000000" points="260.68,-123.35 250.79,-127.14 260.88,-130.35 260.68,-123.35"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M465.39,-254.6C457.79,-258.79 449.4,-263.67 442,-268.58 425.11,-279.78 423.37,-286.13 406,-296.58 400.22,-300.05 393.89,-303.35 387.6,-306.36"/>
+<polygon fill="#000000" stroke="#000000" points="386.12,-303.19 378.5,-310.54 389.05,-309.55 386.12,-303.19"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge24" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~rmvs_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M605.84,-217.88C582.85,-231.41 545.5,-253.37 519.56,-268.63"/>
-<polygon fill="#000000" stroke="#000000" points="517.75,-265.64 510.9,-273.73 521.3,-271.67 517.75,-265.64"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-322.58C122.35,-285.07 78.4,-189.47 61.72,-146.31"/>
+<polygon fill="#000000" stroke="#000000" points="64.94,-144.9 58.15,-136.76 58.38,-147.36 64.94,-144.9"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C329.01,-283.83 213.18,-330.31 198,-322.58"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge25" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-127.73C278.21,-123.68 265.79,-93.78 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C429.36,-107.67 410.33,-131.46 348,-127.73"/>
+<title>sourcefile~helio_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M459.53,-254.58C431.56,-265.26 387.71,-279.64 348,-282.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-282.58C295.08,-286.34 244.29,-248.15 217.48,-223.85"/>
+<polygon fill="#000000" stroke="#000000" points="219.65,-221.09 209.95,-216.82 214.87,-226.2 219.65,-221.09"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90 -->
+<!-- sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge26" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~helio_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M575.86,-205.73C566.43,-205.73 556.52,-205.73 546.94,-205.73"/>
-<polygon fill="#000000" stroke="#000000" points="546.69,-202.23 536.69,-205.73 546.69,-209.23 546.69,-202.23"/>
+<title>sourcefile~lambda_function.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M572.74,-15.33C480.17,-0.3 286.71,19.48 142,-44.58 111.9,-57.9 85.17,-85.65 69.28,-104.69"/>
+<polygon fill="#000000" stroke="#000000" points="66.53,-102.53 62.96,-112.5 71.97,-106.93 66.53,-102.53"/>
 </g>
-<!-- sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge27" class="edge">
-<title>sourcefile~symba_classes.f90&#45;&gt;sourcefile~fraggle_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M610.33,-193.64C585.82,-175.99 537.16,-143.55 490.5,-127.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M488.5,-127.73C461.15,-118.45 430.33,-109.51 404.54,-102.45"/>
-<polygon fill="#000000" stroke="#000000" points="405.12,-98.98 394.55,-99.74 403.28,-105.74 405.12,-98.98"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~whm_classes.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M441.72,-322.58C429.74,-322.58 416.74,-322.58 404.34,-322.58"/>
+<polygon fill="#000000" stroke="#000000" points="404.1,-319.08 394.1,-322.58 404.1,-326.08 404.1,-319.08"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90 -->
+<!-- sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge28" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_classes.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M303.59,-99.76C287.02,-104.47 267.86,-109.9 250.44,-114.85"/>
-<polygon fill="#000000" stroke="#000000" points="249.08,-111.59 240.42,-117.69 250.99,-118.33 249.08,-111.59"/>
+<title>sourcefile~rmvs_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M464.69,-334.65C437.19,-347.34 390.28,-365.14 348,-362.58"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M346,-362.58C277.99,-358.45 258.72,-353.5 198,-322.58"/>
 </g>
-<!-- sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
+<!-- sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
 <g id="sourcefile~~whm_util.f90~~EfferentGraph_edge29" class="edge">
-<title>sourcefile~fraggle_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M294.24,-90.28C265.81,-91.22 229.94,-91.64 198,-89.73"/>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M196,-89.73C169.94,-88.17 141.14,-87.9 116.32,-88.12"/>
-<polygon fill="#000000" stroke="#000000" points="116.27,-84.62 106.31,-88.24 116.35,-91.62 116.27,-84.62"/>
-</g>
-<!-- sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90 -->
-<g id="sourcefile~~whm_util.f90~~EfferentGraph_edge30" class="edge">
-<title>sourcefile~swiftest_operators.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M317.36,-353.7C307.9,-349.51 297.39,-344.63 288,-339.73 246.64,-318.15 238.13,-309.51 198,-285.73"/>
+<title>sourcefile~swiftest_classes.f90&#45;&gt;sourcefile~swiftest_globals.f90</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M174.43,-192.43C150.42,-178.9 111.43,-156.93 84.34,-141.67"/>
+<polygon fill="#000000" stroke="#000000" points="85.73,-138.44 75.3,-136.58 82.3,-144.54 85.73,-138.44"/>
 </g>
 </g>
 </svg>
diff --git a/docs/src/drift.f90 b/docs/src/drift.f90
index 79744c0f3..e929a95fa 100644
--- a/docs/src/drift.f90
+++ b/docs/src/drift.f90
@@ -43,7 +43,7 @@ module subroutine drift_body(self, system, param, dt)
    end subroutine drift_body
 
 
-   module pure subroutine drift_all(mu, x, v, n, param, dt, mask, iflag)
+   module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag)
       !! author: David A. Minton
       !!
       !! Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector.
@@ -55,9 +55,9 @@ module pure subroutine drift_all(mu, x, v, n, param, dt, mask, iflag)
       real(DP), dimension(:),     intent(in)    :: mu    !! Vector of gravitational constants
       real(DP), dimension(:,:),   intent(inout) :: x, v  !! Position and velocity vectors
       integer(I4B),               intent(in)    :: n     !! number of bodies
-      class(swiftest_parameters), intent(in)    :: param  !! Current run configuration parameters
+      class(swiftest_parameters), intent(in)    :: param !! Current run configuration parameters
       real(DP),                   intent(in)    :: dt    !! Stepsize
-      logical, dimension(:),      intent(in)    :: mask  !! Logical mask of size self%nbody that determines which bodies to drift.
+      logical, dimension(:),      intent(in)    :: lmask !! Logical mask of size self%nbody that determines which bodies to drift.
       integer(I4B), dimension(:), intent(out)   :: iflag !! Vector of error flags. 0 means no problem
       ! Internals
       integer(I4B)                              :: i   
@@ -68,18 +68,21 @@ module pure subroutine drift_all(mu, x, v, n, param, dt, mask, iflag)
 
       allocate(dtp(n))
       if (param%lgr) then
-         do concurrent(i = 1:n, mask(i))
+         do concurrent(i = 1:n, lmask(i))
             rmag = norm2(x(:, i))
             vmag2 = dot_product(v(:, i), v(:, i))
             energy = 0.5_DP * vmag2 - mu(i) / rmag
             dtp(i) = dt * (1.0_DP + 3 * param%inv_c2 * energy)
          end do
       else
-         where(mask(1:n)) dtp(1:n) = dt
+         where(lmask(1:n)) dtp(1:n) = dt
       end if 
-      do concurrent(i = 1:n, mask(i))
-         call drift_one(mu(i), x(1,i), x(2,i), x(3,i), v(1,i), v(2,i), v(3,i), dtp(i), iflag(i))
+      !$omp parallel do default(private) &
+      !$omp shared(n, lmask, mu, x, v, dtp, iflag)
+      do i = 1,n
+         if (lmask(i)) call drift_one(mu(i), x(1,i), x(2,i), x(3,i), v(1,i), v(2,i), v(3,i), dtp(i), iflag(i))
       end do
+      !$omp end parallel do
 
       return
    end subroutine drift_all
diff --git a/docs/src/fraggle_generate.f90 b/docs/src/fraggle_generate.f90
index 6f7ccb7a3..1c189c5ca 100644
--- a/docs/src/fraggle_generate.f90
+++ b/docs/src/fraggle_generate.f90
@@ -545,14 +545,18 @@ function radial_objective_function(v_r_mag_input) result(fval)
             integer(I4B)                          :: i
             real(DP), dimension(:,:), allocatable :: v_shift
             real(DP), dimension(frag%nbody)       :: kearr
-            real(DP)                              :: keo, ke_radial
+            real(DP)                              :: keo, ke_radial, rotmag2, vmag2
       
             associate(nfrag => frag%nbody)
                allocate(v_shift, mold=frag%vb)
                v_shift(:,:) = fraggle_util_vmag_to_vb(v_r_mag_input, frag%v_r_unit, frag%v_t_mag, frag%v_t_unit, frag%mass, frag%vbcom) 
-               do concurrent(i = 1:nfrag)
-                  kearr(i) = frag%mass(i) * (frag%Ip(3, i) * frag%radius(i)**2 * dot_product(frag%rot(:, i), frag%rot(:, i)) + dot_product(v_shift(:, i), v_shift(:, i)))
+               !$omp do simd 
+               do i = 1,nfrag
+                  rotmag2 = frag%rot(1,i)**2 + frag%rot(2,i)**2 + frag%rot(3,i)**2
+                  vmag2 = v_shift(1,i)**2 + v_shift(2,i)**2 + v_shift(3,i)**2
+                  kearr(i) = frag%mass(i) * (frag%Ip(3, i) * frag%radius(i)**2 * rotmag2 + vmag2) 
                end do
+               !$omp end do simd
                keo = 2 * frag%ke_budget - sum(kearr(:))
                ke_radial = frag%ke_budget - frag%ke_orbit - frag%ke_spin
                ! The following ensures that fval = 0 is a local minimum, which is what the BFGS method is searching for
diff --git a/docs/src/gr.f90 b/docs/src/gr.f90
index 0c0333907..71d50f448 100644
--- a/docs/src/gr.f90
+++ b/docs/src/gr.f90
@@ -43,7 +43,7 @@ module pure subroutine gr_kick_getaccb_ns_body(self, system, param)
    end subroutine gr_kick_getaccb_ns_body
 
 
-   module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) 
+   module pure subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) 
       !! author: David A. Minton
       !!
       !! Compute relativisitic accelerations of massive bodies
diff --git a/docs/src/helio_classes.f90 b/docs/src/helio_classes.f90
index 1c93bdf6b..3a7de3814 100644
--- a/docs/src/helio_classes.f90
+++ b/docs/src/helio_classes.f90
@@ -105,14 +105,14 @@ module subroutine helio_drift_linear_tp(self, cb, dt, lbeg)
          logical,                       intent(in)    :: lbeg !! Argument that determines whether or not this is the beginning or end of the step
       end subroutine helio_drift_linear_tp
 
-      module subroutine helio_gr_kick_getacch_pl(self, param) 
+      module pure subroutine helio_gr_kick_getacch_pl(self, param) 
          use swiftest_classes, only : swiftest_parameters
          implicit none
          class(helio_pl),            intent(inout) :: self   !! Helio massive body particle data structure
          class(swiftest_parameters), intent(in)    :: param !! Current run configuration parameters 
       end subroutine helio_gr_kick_getacch_pl
    
-      module subroutine helio_gr_kick_getacch_tp(self, param)
+      module pure subroutine helio_gr_kick_getacch_tp(self, param)
          use swiftest_classes, only : swiftest_parameters
          implicit none
          class(helio_tp),            intent(inout) :: self   !! Helio massive body particle data structure
diff --git a/docs/src/helio_gr.f90 b/docs/src/helio_gr.f90
index 4902c45b8..5d2936324 100644
--- a/docs/src/helio_gr.f90
+++ b/docs/src/helio_gr.f90
@@ -2,7 +2,7 @@
    use swiftest
 contains
 
-   module subroutine helio_gr_kick_getacch_pl(self, param) 
+   module pure subroutine helio_gr_kick_getacch_pl(self, param) 
       !! author: David A. Minton
       !!
       !! Compute relativisitic accelerations of massive bodies
@@ -30,7 +30,7 @@ module subroutine helio_gr_kick_getacch_pl(self, param)
    end subroutine helio_gr_kick_getacch_pl
 
 
-   module subroutine helio_gr_kick_getacch_tp(self, param)
+   module pure subroutine helio_gr_kick_getacch_tp(self, param)
       !! author: David A. Minton
       !!
       !! Compute relativisitic accelerations of test particles
diff --git a/docs/src/helio_kick.f90 b/docs/src/helio_kick.f90
index 8e7571a0b..b06abd581 100644
--- a/docs/src/helio_kick.f90
+++ b/docs/src/helio_kick.f90
@@ -107,7 +107,9 @@ module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg)
             call pl%set_beg_end(xend = pl%xh)
          end if
          do concurrent(i = 1:npl, pl%lmask(i)) 
-            pl%vb(:, i) = pl%vb(:, i) + pl%ah(:, i) * dt
+            pl%vb(1, i) = pl%vb(1, i) + pl%ah(1, i) * dt
+            pl%vb(2, i) = pl%vb(2, i) + pl%ah(2, i) * dt
+            pl%vb(3, i) = pl%vb(3, i) + pl%ah(3, i) * dt
          end do
       end associate
    
diff --git a/docs/src/io.f90 b/docs/src/io.f90
index eacaacf48..f04c07e4f 100644
--- a/docs/src/io.f90
+++ b/docs/src/io.f90
@@ -1202,13 +1202,13 @@ module function io_read_frame_body(self, iu, param) result(ierr)
                   else
                      read(iu, *, err = 667, iomsg = errmsg) name(i), val
                   end if
-                  call self%info(i)%set_value(name=name(i))
                   self%Gmass(i) = real(val, kind=DP)
                   self%mass(i) = real(val / param%GU, kind=DP)
                   read(iu, *, err = 667, iomsg = errmsg) self%radius(i)
                class is (swiftest_tp)
-                  read(iu, *, err = 667, iomsg = errmsg) self%id(i)
+                  read(iu, *, err = 667, iomsg = errmsg) name(i)
                end select
+               call self%info(i)%set_value(name=name(i))
 
                select case(param%in_form)
                case (XV)
diff --git a/docs/src/kick.f90 b/docs/src/kick.f90
index 5c57918e2..45da5cb31 100644
--- a/docs/src/kick.f90
+++ b/docs/src/kick.f90
@@ -11,7 +11,7 @@ module subroutine kick_getacch_int_pl(self)
       !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f90
       implicit none
       ! Arguments
-      class(swiftest_pl), intent(inout) :: self
+      class(swiftest_pl),       intent(inout) :: self !! Swiftest massive body object
 
       call kick_getacch_int_all_pl(self%nbody, self%nplpl, self%k_plpl, self%xh, self%Gmass, self%radius, self%ah)
 
@@ -19,7 +19,7 @@ module subroutine kick_getacch_int_pl(self)
    end subroutine kick_getacch_int_pl
 
 
-   module pure subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+   module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
       !! author: David A. Minton
       !!
       !! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies
@@ -28,32 +28,14 @@ module pure subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
       !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90
       implicit none
       ! Arguments
-      class(swiftest_tp),       intent(inout) :: self !! Swiftest test particle
+      class(swiftest_tp),       intent(inout) :: self !! Swiftest test particle object
       real(DP), dimension(:),   intent(in)    :: GMpl !! Massive body masses
       real(DP), dimension(:,:), intent(in)    :: xhp  !! Massive body position vectors
       integer(I4B),             intent(in)    :: npl  !! Number of active massive bodies
-      ! Internals
-      integer(I4B)              :: i, j
 
       if ((self%nbody == 0) .or. (npl == 0)) return
 
-      associate(tp => self, ntp => self%nbody)
-         do i = 1, ntp
-            if (tp%lmask(i)) then
-               do j = 1, npl
-                  block
-                     real(DP) :: rji2
-                     real(DP) :: xr, yr, zr
-                     xr = tp%xh(1, i) - xhp(1, j)
-                     yr = tp%xh(2, i) - xhp(1, j)
-                     zr = tp%xh(3, i) - xhp(1, j)
-                     rji2 = xr**2 + yr**2 + zr**2
-                     call kick_getacch_int_one_tp(rji2, xr, yr, zr, GMpl(i), tp%ah(1,i), tp%ah(2,i), tp%ah(3,i))
-                  end block
-               end do
-            end if
-         end do
-      end associate
+      call kick_getacch_int_all_tp(self%nbody, npl, self%xh, xhp, GMpl, self%lmask, self%ah)
       
       return
    end subroutine kick_getacch_int_tp
@@ -76,35 +58,81 @@ module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius,
       real(DP),     dimension(:,:), intent(inout) :: acc    !! Acceleration vector array 
       ! Internals
       integer(I8B)                      :: k
-      real(DP)                          :: rji2, rlim2
-      real(DP)                          :: xr, yr, zr
-      integer(I4B) :: i, j
       real(DP), dimension(NDIM,npl) :: ahi, ahj
+      integer(I4B) :: i, j
+      real(DP)     :: rji2, rlim2
+      real(DP)     :: xr, yr, zr
 
       ahi(:,:) = 0.0_DP
       ahj(:,:) = 0.0_DP
-      !$omp parallel do default(private)&
-      !$omp shared(nplpl, k_plpl, x, Gmass, radius)  &
+
+      !$omp parallel do default(private) schedule(static)&
+      !$omp shared(nplpl, k_plpl, x, Gmass, radius) &
+      !$omp lastprivate(rji2, rlim2, xr, yr, zr) &
       !$omp reduction(+:ahi) &
       !$omp reduction(-:ahj) 
       do k = 1_I8B, nplpl
-         i = k_plpl(1,k)
-         j = k_plpl(2,k)
-         xr = x(1, j) - x(1, i)
-         yr = x(2, j) - x(2, i)
-         zr = x(3, j) - x(3, i)
+         i = k_plpl(1, k)
+         j = k_plpl(2, k)
+         xr = x(1, j) - x(1, i) 
+         yr = x(2, j) - x(2, i) 
+         zr = x(3, j) - x(3, i) 
          rji2 = xr**2 + yr**2 + zr**2
          rlim2 = (radius(i) + radius(j))**2
          if (rji2 > rlim2) call kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmass(i), Gmass(j), ahi(1,i), ahi(2,i), ahi(3,i), ahj(1,j), ahj(2,j), ahj(3,j))
       end do
+      !$omp end parallel do 
+     
+      do concurrent(i = 1:npl)
+         acc(:,i) = acc(:,i) + ahi(:,i) + ahj(:,i)
+      end do
+
+      return
+   end subroutine kick_getacch_int_all_pl
+
+
+   module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc)
+      !! author: David A. Minton
+      !!
+      !! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies with parallelisim
+      !!
+      !! Adapted from Hal Levison's Swift routine getacch_ah3_tp.f
+      !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f99
+      implicit none
+      integer(I4B),                 intent(in)    :: ntp    !! Number of test particles
+      integer(I4B),                 intent(in)    :: npl    !! Number of massive bodies
+      real(DP),     dimension(:,:), intent(in)    :: xtp    !! Test particle position vector array
+      real(DP),     dimension(:,:), intent(in)    :: xpl    !! Massive body particle position vector array
+      real(DP),     dimension(:),   intent(in)    :: GMpl   !! Array of massive body G*mass
+      logical,      dimension(:),   intent(in)    :: lmask  !! Logical mask indicating which test particles should be computed
+      real(DP),     dimension(:,:), intent(inout) :: acc    !! Acceleration vector array 
+      ! Internals
+      real(DP)     :: rji2
+      real(DP)     :: xr, yr, zr
+      integer(I4B) :: i, j
+
+      !$omp parallel do default(private) schedule(static)&
+      !$omp shared(npl, ntp, lmask, xtp, xpl) &
+      !$omp reduction(-:acc)
+      do i = 1, ntp
+         if (lmask(i)) then
+            do j = 1, npl
+               xr = xtp(1, i) - xpl(1, j)
+               yr = xtp(2, i) - xpl(2, j)
+               zr = xtp(3, i) - xpl(3, j)
+               rji2 = xr**2 + yr**2 + zr**2
+               call kick_getacch_int_one_tp(rji2, xr, yr, zr, GMpl(j), acc(1,i), acc(2,i), acc(3,i))
+            end do
+         end if
+      end do
       !$omp end parallel do
       
-      acc(:,1:npl) = acc(:,1:npl) + ahi(:,1:npl) + ahj(:,1:npl)
       return
-   end subroutine kick_getacch_int_all_pl
+   end subroutine kick_getacch_int_all_tp
 
 
    module pure subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj)
+      !$omp declare simd(kick_getacch_int_one_pl)
       !! author: David A. Minton
       !!
       !! Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies
@@ -136,6 +164,7 @@ end subroutine kick_getacch_int_one_pl
 
 
    module pure subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, GMpl, ax, ay, az)
+      !$omp declare simd(kick_getacch_int_one_tp)
       !! author: David A. Minton
       !!
       !! Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair.
@@ -150,10 +179,11 @@ module pure subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, GMpl, ax, ay, a
       ! Internals
       real(DP) :: fac
 
-      fac = GMpl / (rji2 * sqrt(rji2))
+      fac = GMpl * sqrt(rji2**(-3))
       ax = ax - fac * xr
       ay = ay - fac * yr
       az = az - fac * zr
+
       return
    end subroutine kick_getacch_int_one_tp
 
diff --git a/docs/src/netcdf.f90 b/docs/src/netcdf.f90
index 80bcdcb5d..b26a1ba63 100644
--- a/docs/src/netcdf.f90
+++ b/docs/src/netcdf.f90
@@ -38,17 +38,22 @@ module subroutine netcdf_initialize_output(self, param)
       !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton
       !!
       !! Initialize a NetCDF file system and defines all variables.
+      use, intrinsic :: ieee_arithmetic
       implicit none
       ! Arguments
       class(netcdf_parameters),   intent(inout) :: self    !! Parameters used to identify a particular NetCDF dataset
       class(swiftest_parameters), intent(in)    :: param           !! Current run configuration parameters 
       ! Internals
       logical :: fileExists
-      integer(I4B) :: old_mode
+      integer(I4B) :: old_mode, nvar, varid, vartype
+      real(DP) :: dfill
+      real(SP) :: sfill
+
+      dfill = ieee_value(dfill, IEEE_QUIET_NAN)
+      sfill = ieee_value(sfill, IEEE_QUIET_NAN)
 
       !! Create the new output file, deleting any previously existing output file of the same name
       call check( nf90_create(param%outfile, NF90_NETCDF4, self%ncid) )
-      call check( nf90_set_fill(self%ncid, nf90_nofill, old_mode) )
 
       ! Define the NetCDF dimensions with particle name as the record dimension
       call check( nf90_def_dim(self%ncid, ID_DIMNAME, NF90_UNLIMITED, self%id_dimid) )     ! 'x' dimension
@@ -138,6 +143,22 @@ module subroutine netcdf_initialize_output(self, param)
       call check( nf90_def_var(self%ncid, DISCARD_VHZ_VARNAME, self%out_type, self%id_dimid,  self%discard_vhz_varid) )
       call check( nf90_def_var(self%ncid, DISCARD_BODY_ID_VARNAME, NF90_INT, self%id_dimid, self%discard_body_id_varid) )
 
+      ! Set fill mode to NaN for all variables
+      call check( nf90_inquire(self%ncid, nVariables=nvar) )
+      do varid = 1, nvar
+         call check( nf90_inquire_variable(self%ncid, varid, xtype=vartype) )
+         select case(vartype)
+         case(NF90_INT)
+            call check( nf90_def_var_fill(self%ncid, varid, 0, NF90_FILL_INT) )
+         case(NF90_FLOAT)
+            call check( nf90_def_var_fill(self%ncid, varid, 0, sfill) )
+         case(NF90_DOUBLE)
+            call check( nf90_def_var_fill(self%ncid, varid, 0, dfill) )
+         case(NF90_CHAR)
+            call check( nf90_def_var_fill(self%ncid, varid, 0, 0) )
+         end select
+      end do
+
       return
    end subroutine netcdf_initialize_output
 
@@ -150,11 +171,8 @@ module subroutine netcdf_open(self, param)
       ! Arguments
       class(netcdf_parameters),   intent(inout) :: self   !! Parameters used to identify a particular NetCDF dataset
       class(swiftest_parameters), intent(in)    :: param  !! Current run configuration parameters
-      ! Internals
-      integer(I4B) :: old_mode
 
       call check( nf90_open(param%outfile, nf90_write, self%ncid) )
-      call check( nf90_set_fill(self%ncid, nf90_nofill, old_mode) )
 
       call check( nf90_inq_varid(self%ncid, TIME_DIMNAME, self%time_varid))
       call check( nf90_inq_varid(self%ncid, ID_DIMNAME, self%id_varid))
@@ -249,7 +267,7 @@ module subroutine netcdf_write_frame_base(self, iu, param)
       class(netcdf_parameters),   intent(inout) :: iu     !! Parameters used to identify a particular NetCDF dataset
       class(swiftest_parameters), intent(in)    :: param  !! Current run configuration parameters
       ! Internals
-      integer(I4B)                              :: i, j, tslot, strlen, idslot
+      integer(I4B)                              :: i, j, tslot, strlen, idslot, old_mode
       integer(I4B), dimension(:), allocatable   :: ind
       character(len=:), allocatable             :: charstring
 
@@ -257,6 +275,7 @@ module subroutine netcdf_write_frame_base(self, iu, param)
 
       tslot = int(param%ioutput, kind=I4B) + 1
 
+      call check( nf90_set_fill(iu%ncid, nf90_nofill, old_mode) )
       select type(self)
          class is (swiftest_body)
          associate(n => self%nbody)
@@ -332,6 +351,7 @@ module subroutine netcdf_write_frame_base(self, iu, param)
          end if
 
       end select
+      call check( nf90_set_fill(iu%ncid, old_mode, old_mode) )
 
       return
    end subroutine netcdf_write_frame_base
@@ -346,13 +366,14 @@ module subroutine netcdf_write_particle_info_base(self, iu)
       class(swiftest_base),       intent(in)    :: self   !! Swiftest particle object
       class(netcdf_parameters),   intent(inout) :: iu     !! Parameters used to identify a particular NetCDF dataset
       ! Internals
-      integer(I4B)                              :: i, j, tslot, strlen, idslot
+      integer(I4B)                              :: i, j, tslot, strlen, idslot, old_mode
       integer(I4B), dimension(:), allocatable   :: ind
       character(len=:), allocatable             :: charstring
       character(len=NAMELEN)                    :: emptystr, lenstr
       character(len=:), allocatable :: fmtlabel
 
       ! This string of spaces of length NAMELEN is used to clear out any old data left behind inside the string variables
+      call check( nf90_set_fill(iu%ncid, nf90_nofill, old_mode) )
       write(lenstr, *) NAMELEN
       fmtlabel = "(A" // trim(adjustl(lenstr)) // ")"
       write(emptystr, fmtlabel) " "
@@ -448,6 +469,7 @@ module subroutine netcdf_write_particle_info_base(self, iu)
          call check( nf90_put_var(iu%ncid, iu%discard_vhz_varid, self%info%discard_vh(3), start=[idslot]) )
       end select
 
+      call check( nf90_set_fill(iu%ncid, old_mode, old_mode) )
       return
    end subroutine netcdf_write_particle_info_base
 
@@ -464,12 +486,11 @@ module subroutine netcdf_write_hdr_system(self, iu, param)
       class(netcdf_parameters),     intent(inout) :: iu    !! Parameters used to for writing a NetCDF dataset to file
       class(swiftest_parameters),   intent(in)    :: param !! Current run configuration parameters
       ! Internals
-      integer(I4B) :: tslot, old_mode
+      integer(I4B) :: tslot
 
       tslot = int(param%ioutput, kind=I4B) + 1
 
       call check( nf90_open(param%outfile, nf90_write, iu%ncid) )
-      call check( nf90_set_fill(iu%ncid, nf90_nofill, old_mode) )
 
       call check( nf90_put_var(iu%ncid, iu%time_varid, param%t, start=[tslot]) )
       call check( nf90_put_var(iu%ncid, iu%npl_varid, self%pl%nbody, start=[tslot]) )
diff --git a/docs/src/rmvs_classes.f90 b/docs/src/rmvs_classes.f90
index 0b837ec0a..b29cd02c4 100644
--- a/docs/src/rmvs_classes.f90
+++ b/docs/src/rmvs_classes.f90
@@ -103,11 +103,16 @@ module rmvs_classes
    end type rmvs_pl
 
    interface
-      module elemental function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag)
+      module pure subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr)
+         !$omp declare simd(rmvs_chk_ind)
          implicit none
-         real(DP), intent(in)       :: r2, v2, vdotr, dt, r2crit
-         logical                    :: lflag
-      end function rmvs_chk_ind
+         real(DP), intent(in)  :: xr, yr, zr    !! Relative distance vector components
+         real(DP), intent(in)  :: vxr, vyr, vzr !! Relative velocity vector components
+         real(DP), intent(in)  :: dt            !! Step size
+         real(DP), intent(in)  :: r2crit        !! Square of the critical encounter distance
+         logical,  intent(out) :: lencounter    !! Flag indicating that an encounter has occurred
+         logical,  intent(out) :: lvdotr        !! Logical flag indicating the direction of the v .dot. r vector
+      end subroutine rmvs_chk_ind
 
       module subroutine rmvs_discard_tp(self, system, param)
          use swiftest_classes, only : swiftest_nbody_system, swiftest_parameters
diff --git a/docs/src/rmvs_encounter_check.f90 b/docs/src/rmvs_encounter_check.f90
index 43e748b41..4c59f0a15 100644
--- a/docs/src/rmvs_encounter_check.f90
+++ b/docs/src/rmvs_encounter_check.f90
@@ -18,10 +18,12 @@ module function rmvs_encounter_check_tp(self, system, dt) result(lencounter)
       logical                                 :: lencounter  !! Returns true if there is at least one close encounter
       ! Internals
       integer(I4B)                            :: i, j
-      real(DP)                                :: r2, v2, vdotr
-      real(DP), dimension(NDIM)               :: xr, vr
+      real(DP)                                :: xr, yr, zr, vxr, vyr, vzr
       real(DP), dimension(system%pl%nbody)    :: r2crit
-      logical                                 :: lflag
+      logical                                 :: lflag, lvdotr
+
+      ! The minimization and linear solvers can sometimes lead to floating point exceptions. Rather than halting the code entirely if this occurs, we
+      ! can simply fail the attempt and try again. So we need to turn off any floating point exception halting modes temporarily 
 
       lencounter = .false.
       if (self%nbody == 0) return
@@ -31,24 +33,33 @@ module function rmvs_encounter_check_tp(self, system, dt) result(lencounter)
          associate(tp => self, ntp => self%nbody, npl => pl%nbody, rts => system%rts)
             r2crit(1:npl) = (rts * pl%rhill(1:npl))**2
             tp%plencP(1:ntp) = 0
+            !$omp parallel do default(private)&
+            !$omp shared(npl, ntp, tp, pl, dt, r2crit)
             do j = 1, npl
                do i = 1, ntp
                   if ((.not.tp%lmask(i)).or.(tp%plencP(i) /= 0)) cycle
-                  xr(:) = tp%xh(:, i) - pl%xbeg(:, j)
-                  vr(:) = tp%vh(:, i) - pl%vbeg(:, j)
-                  lflag = rmvs_chk_ind(xr(1), xr(2), xr(3), vr(1), vr(2), vr(3), dt, r2crit(j))
+                  xr = tp%xh(1, i) - pl%xbeg(1, j)
+                  yr = tp%xh(2, i) - pl%xbeg(2, j)
+                  zr = tp%xh(3, i) - pl%xbeg(3, j)
+                  vxr = tp%vh(1, i) - pl%vbeg(1, j)
+                  vyr = tp%vh(2, i) - pl%vbeg(2, j)
+                  vzr = tp%vh(3, i) - pl%vbeg(3, j)
+                  call rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit(j), lflag, lvdotr)
                   if (lflag) tp%plencP(i) = j
                end do
                pl%nenc(j) = count(tp%plencP(1:ntp) == j)
             end do
+            !$omp end parallel do
             lencounter = any(pl%nenc(1:npl) > 0)
          end associate
       end select
+
       return
    end function rmvs_encounter_check_tp
 
 
-   module elemental function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag)
+   module pure subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr)
+      !$omp declare simd(rmvs_chk_ind)
       !! author: David A. Minton
       !!
       !! Determine whether a test particle and planet are having or will have an encounter within the next time step
@@ -57,28 +68,33 @@ module elemental function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag)
       !! Adapted from Hal Levison's Swift routine rmvs_chk_ind.f
       implicit none
       ! Arguments
-      real(DP), intent(in)       :: r2, v2, vdotr, dt, r2crit
-      logical                    :: lflag
+      real(DP), intent(in)  :: xr, yr, zr    !! Relative distance vector components
+      real(DP), intent(in)  :: vxr, vyr, vzr !! Relative velocity vector components
+      real(DP), intent(in)  :: dt            !! Step size
+      real(DP), intent(in)  :: r2crit        !! Square of the critical encounter distance
+      logical,  intent(out) :: lencounter    !! Flag indicating that an encounter has occurred
+      logical,  intent(out) :: lvdotr        !! Logical flag indicating the direction of the v .dot. r vector
       ! Internals
-      real(DP) ::  tmin, r2min
+      real(DP) :: r2min, r2, v2, vdotr
+
+      r2 = xr**2 + yr**2 + zr**2
+      lencounter = (r2 < r2crit) 
+      if (lencounter) return 
+
+      vdotr = vxr * xr + vyr * yr + vzr * zr
+      lvdotr = (vdotr < 0.0_DP)
+      if (.not.lvdotr) return
+     
+      v2 = vxr**2 + vyr**2 + vzr**2
 
-      lflag = .false.
-      if (r2 < r2crit) then
-         lflag = .true.
+      if (-vdotr < v2 * dt) then
+         r2min = r2 - vdotr**2 / v2
       else
-         if (vdotr < 0.0_DP) then
-            tmin = -vdotr / v2
-            if (tmin < dt) then
-               r2min = r2 - vdotr**2 / v2
-            else
-               r2min = r2 + 2 * vdotr * dt + v2 * dt**2
-            end if
-            r2min = min(r2min, r2)
-            lflag = (r2min <= r2crit)
-         end if
+         r2min = r2 + 2 * vdotr * dt + v2 * dt**2
       end if
+      lencounter = (r2min <= r2crit)
 
       return
-   end function rmvs_chk_ind
+   end subroutine rmvs_chk_ind
 
 end submodule s_rmvs_chk
diff --git a/docs/src/rmvs_kick.f90 b/docs/src/rmvs_kick.f90
index 5d9514763..6a8c0786e 100644
--- a/docs/src/rmvs_kick.f90
+++ b/docs/src/rmvs_kick.f90
@@ -3,7 +3,6 @@
 contains  
 
    module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg)
-
       !! author: David A. Minton
       !!
       !! Compute the oblateness acceleration in the inner encounter region with planets 
diff --git a/docs/src/swiftest_classes.f90 b/docs/src/swiftest_classes.f90
index 82d684f1a..598cb4811 100644
--- a/docs/src/swiftest_classes.f90
+++ b/docs/src/swiftest_classes.f90
@@ -534,14 +534,14 @@ module subroutine discard_tp(self, system, param)
          class(swiftest_parameters),   intent(inout) :: param  !! Current run configuration parameters
       end subroutine discard_tp
 
-      module pure subroutine drift_all(mu, x, v, n, param, dt, mask, iflag)
+      module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag)
          implicit none
          real(DP), dimension(:),     intent(in)    :: mu    !! Vector of gravitational constants
          real(DP), dimension(:,:),   intent(inout) :: x, v  !! Position and velocity vectors
          integer(I4B),               intent(in)    :: n     !! number of bodies
          class(swiftest_parameters), intent(in)    :: param !! Current run configuration parameters
          real(DP),                   intent(in)    :: dt    !! Stepsize
-         logical, dimension(:),      intent(in)    :: mask  !! Logical mask of size self%nbody that determines which bodies to drift.
+         logical, dimension(:),      intent(in)    :: lmask !! Logical mask of size self%nbody that determines which bodies to drift.
          integer(I4B), dimension(:), intent(out)   :: iflag !! Vector of error flags. 0 means no problem
       end subroutine drift_all
 
@@ -561,6 +561,23 @@ module pure elemental subroutine drift_one(mu, px, py, pz, vx, vy, vz, dt, iflag
          integer(I4B), intent(out)      :: iflag !! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)
       end subroutine drift_one
 
+      module pure subroutine util_index_eucl_ij_to_k(n, i, j, k)
+         !$omp declare simd(util_index_eucl_ij_to_k)
+         implicit none
+         integer(I4B), intent(in)  :: n !! Number of bodies
+         integer(I4B), intent(in)  :: i !! Index of the ith body
+         integer(I4B), intent(in)  :: j !! Index of the jth body
+         integer(I8B), intent(out) :: k !! Index of the flattened matrix
+      end subroutine util_index_eucl_ij_to_k
+
+      module pure subroutine util_index_eucl_k_to_ij(n, k, i, j)
+         implicit none
+         integer(I4B), intent(in)  :: n !! Number of bodies
+         integer(I8B), intent(in)  :: k !! Index of the flattened matrix
+         integer(I4B), intent(out) :: i !! Index of the ith body
+         integer(I4B), intent(out) :: j !! Index of the jth body
+      end subroutine util_index_eucl_k_to_ij
+
       module subroutine util_index_eucl_plpl(self, param)
          implicit none
          class(swiftest_pl),         intent(inout) :: self  !! Swiftest massive body object
@@ -581,7 +598,7 @@ module pure subroutine gr_kick_getaccb_ns_body(self, system, param)
          class(swiftest_parameters),   intent(in)    :: param  !! Current run configuration parameters 
       end subroutine gr_kick_getaccb_ns_body
 
-      module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) 
+      module pure subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) 
          implicit none
          real(DP), dimension(:),     intent(in)  :: mu     !! Gravitational constant
          real(DP), dimension(:,:),   intent(in)  :: x      !! Position vectors
@@ -823,6 +840,19 @@ module subroutine io_write_hdr_system(self, iu, param)
          class(swiftest_parameters),   intent(in)    :: param !! Current run configuration parameters
       end subroutine io_write_hdr_system
 
+      module subroutine kick_getacch_int_pl(self)
+         implicit none
+         class(swiftest_pl), intent(inout) :: self !! Swiftest massive body object
+      end subroutine kick_getacch_int_pl
+
+      module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+         implicit none
+         class(swiftest_tp),       intent(inout) :: self !! Swiftest test particle
+         real(DP), dimension(:),   intent(in)    :: GMpl !! Massive body masses
+         real(DP), dimension(:,:), intent(in)    :: xhp  !! Massive body position vectors
+         integer(I4B),             intent(in)    :: npl  !! Number of active massive bodies
+      end subroutine kick_getacch_int_tp
+
       module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc)
          implicit none
          integer(I4B),                 intent(in)    :: npl    !! Number of massive bodies
@@ -834,7 +864,19 @@ module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius,
          real(DP),     dimension(:,:), intent(inout) :: acc    !! Acceleration vector array 
       end subroutine kick_getacch_int_all_pl
 
+      module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc)
+         implicit none
+         integer(I4B),                 intent(in)    :: ntp    !! Number of test particles
+         integer(I4B),                 intent(in)    :: npl    !! Number of massive bodies
+         real(DP),     dimension(:,:), intent(in)    :: xtp    !! Test particle position vector array
+         real(DP),     dimension(:,:), intent(in)    :: xpl    !! Massive body particle position vector array
+         real(DP),     dimension(:),   intent(in)    :: GMpl   !! Array of massive body G*mass
+         logical,      dimension(:),   intent(in)    :: lmask  !! Logical mask indicating which test particles should be computed
+         real(DP),     dimension(:,:), intent(inout) :: acc    !! Acceleration vector array 
+      end subroutine kick_getacch_int_all_tp
+
       module pure subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj)
+         !$omp declare simd(kick_getacch_int_one_pl)
          implicit none
          real(DP), intent(in)  :: rji2            !! Square of distance between the two bodies
          real(DP), intent(in)  :: xr, yr, zr      !! Distances between the two bodies in x, y, and z directions
@@ -845,6 +887,7 @@ module pure subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi,
       end subroutine kick_getacch_int_one_pl
 
       module pure subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, az)
+         !$omp declare simd(kick_getacch_int_one_tp)
          implicit none
          real(DP), intent(in)  :: rji2         !! Square of distance between the test particle and massive body
          real(DP), intent(in)  :: xr, yr, zr   !! Distances between the two bodies in x, y, and z directions
@@ -852,19 +895,6 @@ module pure subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, a
          real(DP), intent(inout) :: ax, ay, az !! Acceleration vector components of test particle
       end subroutine kick_getacch_int_one_tp
 
-      module subroutine kick_getacch_int_pl(self)
-         implicit none
-         class(swiftest_pl), intent(inout) :: self !! Swiftest massive body object
-      end subroutine kick_getacch_int_pl
-
-      module pure subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
-         implicit none
-         class(swiftest_tp),       intent(inout) :: self !! Swiftest test particle
-         real(DP), dimension(:),   intent(in)    :: GMpl !! Massive body masses
-         real(DP), dimension(:,:), intent(in)    :: xhp  !! Massive body position vectors
-         integer(I4B),             intent(in)    :: npl  !! Number of active massive bodies
-      end subroutine kick_getacch_int_tp
-
       module subroutine netcdf_close(self, param)
          implicit none
          class(netcdf_parameters),   intent(inout) :: self   !! Parameters used to identify a particular NetCDF dataset
diff --git a/docs/src/symba_classes.f90 b/docs/src/symba_classes.f90
index 21986b920..40267e298 100644
--- a/docs/src/symba_classes.f90
+++ b/docs/src/symba_classes.f90
@@ -6,7 +6,6 @@ module symba_classes
    use swiftest_globals
    use swiftest_classes, only : swiftest_parameters, swiftest_base, swiftest_encounter, swiftest_particle_info, netcdf_parameters
    use helio_classes,    only : helio_cb, helio_pl, helio_tp, helio_nbody_system
-   use rmvs_classes,     only : rmvs_chk_ind
    use fraggle_classes,  only : fraggle_colliders, fraggle_fragments
    implicit none
    public
@@ -257,7 +256,8 @@ module subroutine symba_drift_tp(self, system, param, dt)
          real(DP),                     intent(in)    :: dt     !! Stepsize
       end subroutine symba_drift_tp
 
-      module pure elemental subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+      module pure subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+         !$omp declare simd(symba_encounter_check_one)
          implicit none
          real(DP),     intent(in)  :: xr, yr, zr, vxr, vyr, vzr
          real(DP),     intent(in)  :: rhill1, rhill2, dt
diff --git a/docs/src/symba_encounter_check.f90 b/docs/src/symba_encounter_check.f90
index 3445bcfda..e20e51ea9 100644
--- a/docs/src/symba_encounter_check.f90
+++ b/docs/src/symba_encounter_check.f90
@@ -18,9 +18,10 @@ subroutine symba_encounter_check_all(nplplm, k_plpl, x, v, rhill,  dt, irec, len
       integer(I8B) :: k
       integer(I4B) :: i, j
       real(DP) :: xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2
-
-      !$omp parallel do default(private)&
-      !$omp shared(nplplm, k_plpl, x, v, rhill, dt, irec, lencounter, loc_lvdotr)
+      
+      !$omp parallel do simd default(private) schedule(static)&
+      !$omp shared(nplplm, k_plpl, x, v, rhill,  dt, irec, lencounter, loc_lvdotr) &
+      !$omp lastprivate(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2)
       do k = 1_I8B, nplplm
          i = k_plpl(1, k)
          j = k_plpl(2, k)
@@ -32,11 +33,9 @@ subroutine symba_encounter_check_all(nplplm, k_plpl, x, v, rhill,  dt, irec, len
          vzr = v(3, j) - v(3, i)
          rhill1 = rhill(i)
          rhill2 = rhill(j)
-         lencounter(k) = .false.
-         loc_lvdotr(k) = .false.
          call symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter(k), loc_lvdotr(k))
       end do
-      !$omp end parallel do
+      !$omp end parallel do simd
 
       return
    end subroutine symba_encounter_check_all
@@ -56,37 +55,44 @@ module function symba_encounter_check_pl(self, system, dt, irec) result(lany_enc
       ! Result
       logical                                   :: lany_encounter !! Returns true if there is at least one close encounter      
       ! Internals
-      integer(I8B) :: k, nplplm
-      integer(I4B) :: i, j, nenc
-      logical, dimension(:), allocatable :: lencounter, loc_lvdotr
+      integer(I8B) :: k, nplplm, kenc
+      integer(I4B) :: i, j, nenc, npl
+      logical, dimension(:), allocatable :: lencounter, loc_lvdotr, lvdotr
+      integer(I4B), dimension(:), allocatable :: index1, index2
   
       if (self%nbody == 0) return
 
       associate(pl => self)
          nplplm = pl%nplplm
+         npl = pl%nbody
          allocate(lencounter(nplplm))
          allocate(loc_lvdotr(nplplm))
   
          call symba_encounter_check_all(nplplm, pl%k_plpl, pl%xh, pl%vh, pl%rhill, dt, irec, lencounter, loc_lvdotr)
 
-         !$omp parallel workshare
          nenc = count(lencounter(:))
-         !$omp end parallel workshare
 
          lany_encounter = nenc > 0
          if (lany_encounter) then 
             associate(plplenc_list => system%plplenc_list)
                call plplenc_list%resize(nenc)
-               plplenc_list%lvdotr(1:nenc) = pack(loc_lvdotr(1:nplplm), lencounter(1:nplplm))
-               plplenc_list%kidx(1:nenc) = pack([(k, k = 1_I8B, nplplm)], lencounter(1:nplplm))
-               deallocate(lencounter, loc_lvdotr)
-               plplenc_list%index1(1:nenc) = pl%k_plpl(1,plplenc_list%kidx(1:nenc))
-               plplenc_list%index2(1:nenc) = pl%k_plpl(2,plplenc_list%kidx(1:nenc))
-               plplenc_list%id1(1:nenc) = pl%id(plplenc_list%index1(1:nenc))
-               plplenc_list%id2(1:nenc) = pl%id(plplenc_list%index2(1:nenc))
+               allocate(lvdotr(nenc))					
+               allocate(index1(nenc))					
+               allocate(index2(nenc))					
+               lvdotr(:) = pack(loc_lvdotr(:), lencounter(:))					
+               index1(:) = pack(pl%k_plpl(1,1:nplplm), lencounter(:)) 					
+               index2(:) = pack(pl%k_plpl(2,1:nplplm), lencounter(:)) 					
+               deallocate(lencounter, loc_lvdotr)					
+               call move_alloc(lvdotr, plplenc_list%lvdotr)					
+               call move_alloc(index1, plplenc_list%index1) 					
+               call move_alloc(index2, plplenc_list%index2) 					
                do k = 1, nenc
                   i = plplenc_list%index1(k)
                   j = plplenc_list%index2(k)
+                  call util_index_eucl_ij_to_k(npl, i, j, kenc)
+                  plplenc_list%kidx(k) = kenc
+                  plplenc_list%id1(k) = pl%id(plplenc_list%index1(k))					
+                  plplenc_list%id2(k) = pl%id(plplenc_list%index2(k))					
                   plplenc_list%status(k) = ACTIVE
                   plplenc_list%level(k) = irec
                   pl%lencounter(i) = .true.
@@ -120,11 +126,12 @@ module function symba_encounter_check(self, system, dt, irec) result(lany_encoun
       integer(I4B),              intent(in)    :: irec       !! Current recursion level 
       logical                                  :: lany_encounter !! Returns true if there is at least one close encounter  
       ! Internals
-      integer(I4B)              :: i, j,k
+      integer(I4B)              :: i, j, k, lidx, nenc_enc
       real(DP), dimension(NDIM) :: xr, vr
       logical                   :: lencounter, isplpl
       real(DP)                  :: rlim2, rji2
       logical, dimension(:), allocatable :: lencmask
+      integer(I4B), dimension(:), allocatable :: encidx
 
       lany_encounter = .false.
       if (self%nenc == 0) return
@@ -142,8 +149,14 @@ module function symba_encounter_check(self, system, dt, irec) result(lany_encoun
          class is (symba_tp)
             allocate(lencmask(self%nenc))
             lencmask(:) = (self%status(1:self%nenc) == ACTIVE) .and. (self%level(1:self%nenc) == irec - 1)
-            if (.not.any(lencmask(:))) return
-            do concurrent(k = 1:self%nenc, lencmask(k))
+            nenc_enc = count(lencmask(:))
+            if (nenc_enc == 0) return
+
+            allocate(encidx(nenc_enc))
+            encidx(:) = pack([(k, k = 1, self%nenc)], lencmask(:))
+
+            do lidx = 1, nenc_enc
+               k = encidx(lidx)
                i = self%index1(k)
                j = self%index2(k)
                if (isplpl) then
@@ -211,8 +224,12 @@ module function symba_encounter_check_tp(self, system, dt, irec) result(lany_enc
    
          do j = 1, npl
             do i = 1, ntp
-               xr(:) = tp%xh(:, i) - pl%xh(:, j)
-               vr(:) = tp%vh(:, i) - pl%vh(:, j)
+               xr(1) = tp%xh(1, i) - pl%xh(1, j)
+               xr(2) = tp%xh(2, i) - pl%xh(2, j)
+               xr(3) = tp%xh(3, i) - pl%xh(3, j)
+               vr(1) = tp%vh(1, i) - pl%vh(1, j)
+               vr(2) = tp%vh(2, i) - pl%vh(2, j)
+               vr(3) = tp%vh(3, i) - pl%vh(3, j)
                call symba_encounter_check_one(xr(1), xr(2), xr(3), vr(1), vr(2), vr(3), pl%rhill(j), 0.0_DP, dt, irec, lencounter(i,j), loc_lvdotr(i,j))
             end do
          end do
@@ -252,7 +269,8 @@ module function symba_encounter_check_tp(self, system, dt, irec) result(lany_enc
    end function symba_encounter_check_tp
 
 
-   module pure elemental subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+   module pure subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr)
+      !$omp declare simd(symba_encounter_check_one)
       !! author: David A. Minton
       !!
       !! Check for an encounter.
@@ -261,22 +279,23 @@ module pure elemental subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr,
       !! Adapted from Hal Levison's Swift routine symba5_chk.f
       implicit none
       ! Arguments
-      real(DP),     intent(in)  :: xr, yr, zr     !! Relative distance vector components
-      real(DP),     intent(in)  :: vxr, vyr, vzr  !! Relative velocity vector components
-      real(DP),     intent(in)  :: rhill1, rhill2 !! Hill spheres of the two bodies
-      real(DP),     intent(in)  :: dt             !! Step size
-      integer(I4B), intent(in)  :: irec           !! Current SyMBA recursion level
-      real(DP),     intent(in)  :: r2crit         !! Square of the critical encounter distance
-      logical,      intent(out) :: lencounter     !! Flag indicating that an encounter has occurred
-      logical,      intent(out) :: lvdotr         !! Logical flag indicating the direction of the v .dot. r vector
+      real(DP),     intent(in)  :: xr, yr, zr, vxr, vyr, vzr
+      real(DP),     intent(in)  :: rhill1, rhill2, dt
+      integer(I4B), intent(in)  :: irec
+      logical,      intent(out) :: lencounter, lvdotr
       ! Internals
-      real(DP)     :: r2crit
+      real(DP)     :: r2crit, rshell_irec
+      integer(I4B) :: i
 
-      r2crit = (rhill1 + rhill2)*RHSCALE*(RSHELL**(irec))
+      rshell_irec = 1._DP
+      do i = 1, irec
+         rshell_irec = rshell_irec * RSHELL
+      end do
+      r2crit = (rhill1 + rhill2) * RHSCALE * rshell_irec
       r2crit = r2crit**2
       call rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr)
 
       return
    end subroutine symba_encounter_check_one
 
-end submodule s_symba_encounter_check
\ No newline at end of file
+end submodule s_symba_encounter_check
diff --git a/docs/src/symba_kick.f90 b/docs/src/symba_kick.f90
index 2c074cb0d..325ef5a45 100644
--- a/docs/src/symba_kick.f90
+++ b/docs/src/symba_kick.f90
@@ -46,14 +46,15 @@ module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg)
          associate(pl => self, npl => self%nbody, plplenc_list => system%plplenc_list, radius => self%radius)
             ! Apply kicks to all bodies (including those in the encounter list)
             call helio_kick_getacch_pl(pl, system, param, t, lbeg)
-
-            ! Remove kicks from bodies involved currently in the encounter list, as these are dealt with separately.
-            nplplenc = int(plplenc_list%nenc, kind=I8B)
-            allocate(k_plpl_enc(2,nplplenc))
-            k_plpl_enc(:,1:nplplenc) = pl%k_plpl(:,plplenc_list%kidx(1:nplplenc))
-            ah_enc(:,:) = 0.0_DP
-            call kick_getacch_int_all_pl(npl, nplplenc, k_plpl_enc, pl%xh, pl%Gmass, pl%radius, ah_enc)
-            pl%ah(:,1:npl) = pl%ah(:,1:npl) - ah_enc(:,1:npl)
+            if (plplenc_list%nenc > 0) then 
+               ! Remove kicks from bodies involved currently in the encounter list, as these are dealt with separately.
+               nplplenc = int(plplenc_list%nenc, kind=I8B)
+               allocate(k_plpl_enc(2,nplplenc))
+               k_plpl_enc(:,1:nplplenc) = pl%k_plpl(:,plplenc_list%kidx(1:nplplenc))
+               ah_enc(:,:) = 0.0_DP
+               call kick_getacch_int_all_pl(npl, nplplenc, k_plpl_enc, pl%xh, pl%Gmass, pl%radius, ah_enc)
+               pl%ah(:,1:npl) = pl%ah(:,1:npl) - ah_enc(:,1:npl)
+            end if
 
          end associate
       end select
@@ -90,7 +91,7 @@ module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg)
             do k = 1, npltpenc
                i = pltpenc_list%index1(k)
                j = pltpenc_list%index2(k)
-               if (tp%lmask(j)) THEN
+               if (tp%lmask(j)) then
                   if (lbeg) then
                      dx(:) = tp%xh(:,j) - pl%xbeg(:,i)
                   else
@@ -99,7 +100,7 @@ module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg)
                   rjj = dot_product(dx(:), dx(:))
                   fac = pl%Gmass(i) / (rjj * sqrt(rjj))
                   tp%ah(:,j) = tp%ah(:,j) + fac * dx(:)
-               end IF
+               end if
             end do
          end associate
       end select
diff --git a/docs/src/symba_util.f90 b/docs/src/symba_util.f90
index 8b8e48f47..a59d1f0b8 100644
--- a/docs/src/symba_util.f90
+++ b/docs/src/symba_util.f90
@@ -285,7 +285,8 @@ module subroutine symba_util_index_eucl_plpl(self, param)
       class(symba_pl),            intent(inout) :: self  !! SyMBA massive body object
       class(swiftest_parameters), intent(in)    :: param !! Current run configuration parameters
       ! Internals
-      integer(I8B) :: i, j, counter, npl, nplm, nplpl, nplplm
+      integer(I8B) :: k, nplpl, nplplm
+      integer(I4B) :: i, j, npl, nplm, ip, jp
 
       associate(pl => self)
          npl = int(self%nbody, kind=I8B)
@@ -296,12 +297,11 @@ module subroutine symba_util_index_eucl_plpl(self, param)
          pl%nplplm = nplm * npl - nplm * (nplm + 1) / 2 ! number of entries in a strict lower triangle, npl x npl, minus first column including only mutually interacting bodies
          if (allocated(self%k_plpl)) deallocate(self%k_plpl) ! Reset the index array if it's been set previously
          allocate(self%k_plpl(2, pl%nplpl))
-         do i = 1, npl
-            counter = (i - 1_I8B) * npl - i * (i - 1_I8B) / 2_I8B + 1_I8B
-            do j = i + 1_I8B, npl
-               self%k_plpl(1, counter) = i
-               self%k_plpl(2, counter) = j
-               counter = counter + 1_I8B
+         do concurrent (i = 1:npl)
+            do concurrent (j = i+1:npl)
+               call util_index_eucl_ij_to_k(npl, i, j, k)
+               self%k_plpl(1, k) = i
+               self%k_plpl(2, k) = j
             end do
          end do
       end associate
diff --git a/docs/src/util_get_energy_momentum.f90 b/docs/src/util_get_energy_momentum.f90
index 803b7bac1..677de5646 100644
--- a/docs/src/util_get_energy_momentum.f90
+++ b/docs/src/util_get_energy_momentum.f90
@@ -16,12 +16,10 @@ module subroutine util_get_energy_momentum_system(self, param)
       integer(I4B) :: i, j
       integer(I8B) :: k, nplpl
       real(DP) :: oblpot, kecb, kespincb
-      real(DP), dimension(self%pl%nbody) :: irh, kepl, kespinpl, pecb
+      real(DP), dimension(self%pl%nbody) :: irh, kepl, kespinpl
       real(DP), dimension(self%pl%nbody) :: Lplorbitx, Lplorbity, Lplorbitz
       real(DP), dimension(self%pl%nbody) :: Lplspinx, Lplspiny, Lplspinz
       real(DP), dimension(NDIM) :: Lcborbit, Lcbspin
-      real(DP), dimension(:), allocatable :: pepl 
-      logical, dimension(:), allocatable :: lstatpl
       real(DP) :: hx, hy, hz
 
       associate(system => self, pl => self%pl, npl => self%pl%nbody, cb => self%cb)
@@ -81,45 +79,16 @@ module subroutine util_get_energy_momentum_system(self, param)
             kespinpl(:) = 0.0_DP
          end if
    
-         ! Do the central body potential energy component first
-         where(.not. pl%lmask(1:npl))
-            pecb(1:npl) = 0.0_DP
-         end where
+         call util_get_energy_potential(npl, nplpl, pl%k_plpl, pl%lmask, cb%Gmass, pl%Gmass, pl%mass, pl%xb, system%pe)
 
-         do concurrent(i = 1:npl, pl%lmask(i))
-            pecb(i) = -cb%Gmass * pl%mass(i) / norm2(pl%xb(:,i)) 
-         end do
-   
-         ! Do the potential energy between pairs of massive bodies
-         allocate(lstatpl(nplpl))
-         allocate(pepl(nplpl))
-         do concurrent (k = 1:nplpl)
-            i = pl%k_plpl(1,k)
-            j = pl%k_plpl(2,k)
-            lstatpl(k) = (pl%lmask(i) .and. pl%lmask(j))
-         end do
-
-         where(.not.lstatpl(1:nplpl)) 
-            pepl(1:nplpl) = 0.0_DP
-         end where
-
-         do concurrent (k = 1:nplpl, lstatpl(k))
-            i = pl%k_plpl(1,k)
-            j = pl%k_plpl(2,k)
-            pepl(k) = -(pl%Gmass(i) * pl%mass(j)) / norm2(pl%xb(:, i) - pl%xb(:, j))
-         end do
-   
-         system%pe = sum(pepl(:), lstatpl(:)) + sum(pecb(1:npl), pl%lmask(1:npl))
-         deallocate(lstatpl, pepl)
-
-         system%ke_orbit = 0.5_DP * (kecb + sum(kepl(1:npl), pl%lmask(1:npl)))
-         if (param%lrotation) system%ke_spin = 0.5_DP * (kespincb + sum(kespinpl(1:npl), pl%lmask(1:npl)))
-   
          ! Potential energy from the oblateness term
          if (param%loblatecb) then
             call system%obl_pot()
             system%pe = system%pe + system%oblpot
          end if
+
+         system%ke_orbit = 0.5_DP * (kecb + sum(kepl(1:npl), pl%lmask(1:npl)))
+         if (param%lrotation) system%ke_spin = 0.5_DP * (kespincb + sum(kespinpl(1:npl), pl%lmask(1:npl)))
    
          system%Lorbit(1) = Lcborbit(1) + sum(Lplorbitx(1:npl), pl%lmask(1:npl)) 
          system%Lorbit(2) = Lcborbit(2) + sum(Lplorbity(1:npl), pl%lmask(1:npl)) 
@@ -138,4 +107,55 @@ module subroutine util_get_energy_momentum_system(self, param)
       return
    end subroutine util_get_energy_momentum_system
 
+
+   subroutine util_get_energy_potential(npl, nplpl, k_plpl, lmask, GMcb, Gmass, mass, xb, pe)
+      !! author: David A. Minton
+      !!
+      !! Compute total system potential energy
+      implicit none
+      ! Arguments
+      integer(I4B),                 intent(in)  :: npl
+      integer(I8B),                 intent(in)  :: nplpl
+      integer(I4B), dimension(:,:), intent(in)  :: k_plpl
+      logical,      dimension(:),   intent(in)  :: lmask
+      real(DP),                     intent(in)  :: GMcb
+      real(DP),     dimension(:),   intent(in)  :: Gmass
+      real(DP),     dimension(:),   intent(in)  :: mass
+      real(DP),     dimension(:,:), intent(in)  :: xb
+      real(DP),                     intent(out) :: pe
+      ! Internals
+      integer(I4B) :: i, j
+      integer(I8B) :: k
+      real(DP), dimension(npl) :: pecb
+      real(DP), dimension(nplpl) :: pepl 
+      logical, dimension(nplpl) :: lstatpl
+
+      ! Do the central body potential energy component first
+      where(.not. lmask(1:npl))
+         pecb(1:npl) = 0.0_DP
+      end where
+
+      do concurrent(i = 1:npl, lmask(i))
+         pecb(i) = -GMcb * mass(i) / norm2(xb(:,i)) 
+      end do
+
+      !$omp parallel do default(private) schedule(static)&
+      !$omp shared(nplpl, k_plpl, xb, mass, Gmass, pepl, lstatpl, lmask)
+      do k = 1, nplpl
+         i = k_plpl(1,k)
+         j = k_plpl(2,k)
+         lstatpl(k) = (lmask(i) .and. lmask(j))
+         if (lstatpl(k)) then
+            pepl(k) = -(Gmass(i) * mass(j)) / norm2(xb(:, i) - xb(:, j))
+         else
+            pepl(k) = 0.0_DP
+         end if
+      end do
+      !$omp end parallel do 
+
+      pe = sum(pepl(:), lstatpl(:)) + sum(pecb(1:npl), lmask(1:npl))
+
+      return
+   end subroutine util_get_energy_potential
+
 end submodule s_util_get_energy_momentum
diff --git a/docs/src/util_index.f90 b/docs/src/util_index.f90
index 0e42ec7c7..1ee60e400 100644
--- a/docs/src/util_index.f90
+++ b/docs/src/util_index.f90
@@ -2,7 +2,8 @@
    use swiftest
 contains
 
-   module subroutine util_index_eucl_plpl(self, param)
+   module pure subroutine util_index_eucl_ij_to_k(n, i, j, k)
+      !$omp declare simd(util_index_eucl_ij_to_k)
       !! author: Jacob R. Elliott and David A. Minton
       !!
       !! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions.
@@ -13,23 +14,80 @@ module subroutine util_index_eucl_plpl(self, param)
       !!       2019. hal-0204751
       implicit none
       ! Arguments
+      integer(I4B), intent(in)  :: n !! Number of bodies
+      integer(I4B), intent(in)  :: i !! Index of the ith body
+      integer(I4B), intent(in)  :: j !! Index of the jth body
+      integer(I8B), intent(out) :: k !! Index of the flattened matrix
+      ! Internals
+      integer(I8B) :: i8, j8, n8
+     
+      i8 = int(i, kind=I8B)
+      j8 = int(j, kind=I8B)
+      n8 = int(n, kind=I8B)
+      k = (i8 - 1_I8B) * n8 - i8 * (i8 - 1_I8B) / 2_I8B + (j8 - i8)
+
+      return
+   end subroutine util_index_eucl_ij_to_k
+
+
+   module pure subroutine util_index_eucl_k_to_ij(n, k, i, j)
+      !! author: Jacob R. Elliott and David A. Minton
+      !!
+      !! Turns k index into i,j indices for use in the Euclidean distance matrix for pl-pl interactions.
+      !!
+      !! Reference:
+      !!
+      !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 
+      !!       2019. hal-0204751
+      implicit none
+      ! Arguments
+      integer(I4B), intent(in)  :: n !! Number of bodies
+      integer(I8B), intent(in)  :: k !! Index of the flattened matrix
+      integer(I4B), intent(out) :: i !! Index of the ith body
+      integer(I4B), intent(out) :: j !! Index of the jth body
+      ! Internals
+      integer(I8B) :: kp, p, i8, j8, n8
+
+      n8 = int(n, kind=I8B)
+    
+      kp = n8 * (n8 - 1_I8B) / 2_I8B - k
+      p = floor((sqrt(1._DP + 8_I8B * kp) - 1_I8B) / 2_I8B)
+      i8 = n8 - 1_I8B - p
+      j8 = k - (n8 - 1_I8B) * (n8 - 2_I8B) / 2_I8B + p * (p + 1_I8B) / 2_I8B + 1_I8B
+
+      i = int(i8, kind=I4B)
+      j = int(j8, kind=I4B)
+
+      return
+   end subroutine util_index_eucl_k_to_ij
+
+
+   module subroutine util_index_eucl_plpl(self, param)
+      !! author: Jacob R. Elliott and David A. Minton
+      !!
+      !! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions for a Swiftest massive body object
+      !!
+      !! Reference:
+      !!
+      !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 
+      !!       2019. hal-0204751
+      implicit none
+      ! Arguments
       class(swiftest_pl),         intent(inout) :: self  !! Swiftest massive body object
       class(swiftest_parameters), intent(in)    :: param !! Current run configuration parameters
       ! Internals
-      integer(I8B) :: i, j, counter, npl
+      integer(I4B) :: i, j, npl
+      integer(I8B) :: k
 
       npl = int(self%nbody, kind=I8B)
       associate(nplpl => self%nplpl)
-         nplpl = (npl * (npl - 1) / 2) ! number of entries in a strict lower triangle, npl x npl, minus first column
+         nplpl = (npl * (npl - 1) / 2) ! number of entries in a strict lower triangle, npl x npl
          if (allocated(self%k_plpl)) deallocate(self%k_plpl) ! Reset the index array if it's been set previously
          allocate(self%k_plpl(2, nplpl))
-         do i = 1_I8B, npl
-            counter = (i - 1_I8B) * npl - i * (i - 1_I8B) / 2_I8B + 1_I8B
-            do j = i + 1_I8B, npl
-               self%k_plpl(1, counter) = i
-               self%k_plpl(2, counter) = j
-               counter = counter + 1_I8B
-            end do
+         do concurrent (i=1:npl, j=1:npl, j>i)
+            call util_index_eucl_ij_to_k(npl, i, j, k)
+            self%k_plpl(1, k) = i
+            self%k_plpl(2, k) = j
          end do
       end associate
 
diff --git a/docs/src/util_minimize_bfgs.f90 b/docs/src/util_minimize_bfgs.f90
index 01b57d868..3278b6de4 100644
--- a/docs/src/util_minimize_bfgs.f90
+++ b/docs/src/util_minimize_bfgs.f90
@@ -60,22 +60,10 @@ module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1)
       do i = 1, maxloop 
          !check for convergence
          conv = count(abs(grad1(:)) > eps)
-         ! write(*,*) 'loop: ', i
-         ! write(*,*) 'conv: ', conv
-         ! write(*,*) 'grad1 / eps'
-         ! do j = 1, N
-         !    write(*,*) j, abs(grad1(j)) / eps
-         ! end do
-         if (conv == 0) then
-            ! write(*,*) "BFGS converged on gradient after ",i," iterations" 
-            exit 
-         end if
+         if (conv == 0) exit 
          S(:) = -matmul(H(:,:), grad1(:))
          astar = minimize1D(f, x1, S, N, graddelta, lerr)
-         if (lerr) then
-            ! write(*,*) "Exiting BFGS with error in minimize1D step"
-            exit
-         end if
+         if (lerr) exit
          ! Get new x values 
          P(:) = astar * S(:) 
          x1(:) = x1(:) + P(:)
@@ -86,19 +74,23 @@ module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1)
          Py = sum(P(:) * y(:))
          ! set up factors for H matrix update 
          yHy = 0._DP
+         !$omp do simd schedule(static)&
+         !$omp firstprivate(N, y, H) &
+         !$omp reduction(+:yHy)
          do k = 1, N 
             do j = 1, N
                yHy = yHy + y(j) * H(j,k) * y(k)
             end do
          end do
+         !$omp end do simd
          ! prevent divide by zero (convergence) 
-         if (abs(Py) < tiny(Py)) then
-            ! write(*,*) "BFGS Converged on tiny Py after ",i," iterations"
-            exit
-         end if
+         if (abs(Py) < tiny(Py)) exit
          ! set up update 
          PyH(:,:) = 0._DP
          HyP(:,:) = 0._DP
+         !$omp parallel do default(private) schedule(static)&
+         !$omp shared(N, PP, P, y, H) &
+         !$omp reduction(+:PyH, HyP)
          do k = 1, N 
             do j = 1, N
                PP(j, k) = P(j) * P(k)
@@ -108,6 +100,7 @@ module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1)
                end do
             end do
          end do
+         !$omp end parallel do 
          ! update H matrix 
          H(:,:) = H(:,:) + ((1._DP - yHy / Py) * PP(:,:) - PyH(:,:) - HyP(:,:)) / Py
          ! Normalize to prevent it from blowing up if it takes many iterations to find a solution
@@ -117,13 +110,10 @@ module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1)
          if (any(fpe_flag)) exit 
          if (i == maxloop) then
             lerr = .true.
-            ! write(*,*) "BFGS ran out of loops!"
          end if
       end do
       call ieee_get_flag(ieee_usual, fpe_flag)
       lerr = lerr .or. any(fpe_flag)  
-      ! if (any(fpe_flag)) write(*,*) 'BFGS did not converge due to fpe'
-      ! if (lerr) write(*,*) "BFGS did not converge!"
       call ieee_set_status(original_fpe_status)
 
       return 
diff --git a/docs/src/whm_classes.f90 b/docs/src/whm_classes.f90
index 9675f289d..bd17f98e0 100644
--- a/docs/src/whm_classes.f90
+++ b/docs/src/whm_classes.f90
@@ -159,14 +159,14 @@ module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg)
          logical,                      intent(in)    :: lbeg   !! Logical flag indicating whether this is the beginning of the half step or not. 
       end subroutine whm_kick_vh_tp
 
-      module subroutine whm_gr_kick_getacch_pl(self, param)
+      module pure subroutine whm_gr_kick_getacch_pl(self, param)
          use swiftest_classes, only : swiftest_cb, swiftest_parameters
          implicit none
          class(whm_pl),              intent(inout) :: self  !! WHM massive body particle data structure
          class(swiftest_parameters), intent(in)    :: param !! Current run configuration parameters 
       end subroutine whm_gr_kick_getacch_pl
 
-      module subroutine whm_gr_kick_getacch_tp(self, param)
+      module pure subroutine whm_gr_kick_getacch_tp(self, param)
          use swiftest_classes, only : swiftest_cb, swiftest_parameters
          implicit none
          class(whm_tp),              intent(inout) :: self  !! WHM test particle data structure
diff --git a/docs/src/whm_gr.f90 b/docs/src/whm_gr.f90
index bfba5c6a2..bbe6ca30b 100644
--- a/docs/src/whm_gr.f90
+++ b/docs/src/whm_gr.f90
@@ -2,7 +2,7 @@
    use swiftest
 contains
 
-   module subroutine whm_gr_kick_getacch_pl(self, param) 
+   module pure subroutine whm_gr_kick_getacch_pl(self, param) 
       !! author: David A. Minton
       !!
       !! Compute relativisitic accelerations of massive bodies
@@ -35,7 +35,7 @@ module subroutine whm_gr_kick_getacch_pl(self, param)
    end subroutine whm_gr_kick_getacch_pl
 
 
-   module subroutine whm_gr_kick_getacch_tp(self, param)
+   module pure subroutine whm_gr_kick_getacch_tp(self, param)
       !! author: David A. Minton
       !!
       !! Compute relativisitic accelerations of test particles
@@ -86,6 +86,7 @@ module pure subroutine whm_gr_p4_pl(self, param, dt)
      return
    end subroutine whm_gr_p4_pl
 
+
    module pure subroutine whm_gr_p4_tp(self, param, dt)
       !! author: David A. Minton
       !!
diff --git a/docs/tipuesearch/tipuesearch_content.js b/docs/tipuesearch/tipuesearch_content.js
index 9a7ed3ea2..6dd2b355d 100644
--- a/docs/tipuesearch/tipuesearch_content.js
+++ b/docs/tipuesearch/tipuesearch_content.js
@@ -1 +1 @@
-var tipuesearch = {"pages":[{"title":" swiftest ","text":"swiftest Developer Info David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott The Purdue University Minton Research Group","tags":"home","loc":"index.html"},{"title":"kick.f90 – swiftest","text":"This file depends on sourcefile~~kick.f90~~EfferentGraph sourcefile~kick.f90 kick.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~kick.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_kick Source Code kick.f90 Source Code submodule ( swiftest_classes ) s_kick use swiftest contains module subroutine kick_getacch_int_pl ( self ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of massive bodies !! !! Adapted from Hal Levison's Swift routine getacch_ah3.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f90 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self call kick_getacch_int_all_pl ( self % nbody , self % nplpl , self % k_plpl , self % xh , self % Gmass , self % radius , self % ah ) return end subroutine kick_getacch_int_pl module pure subroutine kick_getacch_int_tp ( self , GMpl , xhp , npl ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies !! !! Adapted from Hal Levison's Swift routine getacch_ah3_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle real ( DP ), dimension (:), intent ( in ) :: GMpl !! Massive body masses real ( DP ), dimension (:,:), intent ( in ) :: xhp !! Massive body position vectors integer ( I4B ), intent ( in ) :: npl !! Number of active massive bodies ! Internals integer ( I4B ) :: i , j if (( self % nbody == 0 ) . or . ( npl == 0 )) return associate ( tp => self , ntp => self % nbody ) do i = 1 , ntp if ( tp % lmask ( i )) then do j = 1 , npl block real ( DP ) :: rji2 real ( DP ) :: xr , yr , zr xr = tp % xh ( 1 , i ) - xhp ( 1 , j ) yr = tp % xh ( 2 , i ) - xhp ( 1 , j ) zr = tp % xh ( 3 , i ) - xhp ( 1 , j ) rji2 = xr ** 2 + yr ** 2 + zr ** 2 call kick_getacch_int_one_tp ( rji2 , xr , yr , zr , GMpl ( i ), tp % ah ( 1 , i ), tp % ah ( 2 , i ), tp % ah ( 3 , i )) end block end do end if end do end associate return end subroutine kick_getacch_int_tp module subroutine kick_getacch_int_all_pl ( npl , nplpl , k_plpl , x , Gmass , radius , acc ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization !! !! Adapted from Hal Levison's Swift routine getacch_ah3.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 implicit none integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies integer ( I8B ), intent ( in ) :: nplpl !! Number of massive body interactions to compute integer ( I4B ), dimension (:,:), intent ( in ) :: k_plpl !! Array of interaction pair indices (flattened upper triangular matrix) real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vector array real ( DP ), dimension (:), intent ( in ) :: Gmass !! Array of massive body G*mass real ( DP ), dimension (:), intent ( in ) :: radius !! Array of massive body radii real ( DP ), dimension (:,:), intent ( inout ) :: acc !! Acceleration vector array ! Internals integer ( I8B ) :: k real ( DP ) :: rji2 , rlim2 real ( DP ) :: xr , yr , zr integer ( I4B ) :: i , j real ( DP ), dimension ( NDIM , npl ) :: ahi , ahj ahi (:,:) = 0.0_DP ahj (:,:) = 0.0_DP !$omp parallel do default(private)& !$omp shared(nplpl, k_plpl, x, Gmass, radius)  & !$omp reduction(+:ahi) & !$omp reduction(-:ahj) do k = 1_I8B , nplpl i = k_plpl ( 1 , k ) j = k_plpl ( 2 , k ) xr = x ( 1 , j ) - x ( 1 , i ) yr = x ( 2 , j ) - x ( 2 , i ) zr = x ( 3 , j ) - x ( 3 , i ) rji2 = xr ** 2 + yr ** 2 + zr ** 2 rlim2 = ( radius ( i ) + radius ( j )) ** 2 if ( rji2 > rlim2 ) call kick_getacch_int_one_pl ( rji2 , xr , yr , zr , Gmass ( i ), Gmass ( j ), ahi ( 1 , i ), ahi ( 2 , i ), ahi ( 3 , i ), ahj ( 1 , j ), ahj ( 2 , j ), ahj ( 3 , j )) end do !$omp end parallel do acc (:, 1 : npl ) = acc (:, 1 : npl ) + ahi (:, 1 : npl ) + ahj (:, 1 : npl ) return end subroutine kick_getacch_int_all_pl module pure subroutine kick_getacch_int_one_pl ( rji2 , xr , yr , zr , Gmi , Gmj , axi , ayi , azi , axj , ayj , azj ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies !! !! Adapted from Hal Levison's Swift routine getacch_ah3.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the two bodies real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmi !! G*mass of body i real ( DP ), intent ( in ) :: Gmj !! G*mass of body j real ( DP ), intent ( inout ) :: axi , ayi , azi !! Acceleration vector components of body i real ( DP ), intent ( inout ) :: axj , ayj , azj !! Acceleration vector components of body j ! Internals real ( DP ) :: faci , facj , irij3 irij3 = 1.0_DP / ( rji2 * sqrt ( rji2 )) faci = Gmi * irij3 facj = Gmj * irij3 axi = axi + facj * xr ayi = ayi + facj * yr azi = azi + facj * zr axj = axj - faci * xr ayj = ayj - faci * yr azj = azj - faci * zr return end subroutine kick_getacch_int_one_pl module pure subroutine kick_getacch_int_one_tp ( rji2 , xr , yr , zr , GMpl , ax , ay , az ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair. !! !! Adapted from Hal Levison's Swift routine getacch_ah3_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the test particle and massive body real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmpl !! G*mass of massive body real ( DP ), intent ( inout ) :: ax , ay , az !! Acceleration vector components of test particle ! Internals real ( DP ) :: fac fac = GMpl / ( rji2 * sqrt ( rji2 )) ax = ax - fac * xr ay = ay - fac * yr az = az - fac * zr return end subroutine kick_getacch_int_one_tp end submodule s_kick","tags":"","loc":"sourcefile/kick.f90.html"},{"title":"tides_getacch_pl.f90 – swiftest","text":"This file depends on sourcefile~~tides_getacch_pl.f90~~EfferentGraph sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_tides_kick_getacch Source Code tides_getacch_pl.f90 Source Code submodule ( swiftest_classes ) s_tides_kick_getacch use swiftest contains module subroutine tides_kick_getacch_pl ( self , system ) !! author: Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton !! !! Calculated tidal torques from central body to any planet and from any planet to central body !! planet - planet interactions are considered negligable. !! This is a constant time lag model. !! !! Adapted from Mercury-T code from Bolmont et al. (2015) !! !! Reference: !!    Bolmont, E., Raymond, S.N., Leconte, J., Hersant, F., Correia, A.C.M., 2015. !!       Mercury-T : A new code to study tidally evolving multi-planet systems. !!       Applications to Kepler-62. A&A 583, A116. https://doi.org/10.1051/0004-6361/201525909 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals integer ( I4B ) :: i real ( DP ) :: rmag , vmag real ( DP ), dimension ( NDIM ) :: r_unit , v_unit , h_unit , theta_unit , theta_dot , F_T real ( DP ) :: Ftr , Ptopl , Ptocb , r5cbterm , r5plterm associate ( pl => self , npl => self % nbody , cb => system % cb ) pl % atide (:,:) = 0.0_DP cb % atide (:) = 0.0_DP do i = 1 , npl rmag = norm2 ( pl % xh (:, i )) vmag = norm2 ( pl % vh (:, i )) r_unit (:) = pl % xh (:, i ) / rmag v_unit (:) = pl % vh (:, i ) / vmag h_unit (:) = r_unit (:) . cross . v_unit (:) theta_unit (:) = h_unit (:) . cross . r_unit (:) theta_dot = dot_product ( pl % vh (:, i ), theta_unit (:)) ! First calculate the tangential component of the force vector (eq. 5 & 6 of Bolmont et al. 2015) ! The radial component is already computed in the obl_acc methods r5cbterm = pl % Gmass ( i ) ** 2 * cb % k2 * cb % radius ** 5 r5plterm = cb % Gmass ** 2 * pl % k2 ( i ) * pl % radius ( i ) ** 5 Ptopl = 3 * r5plterm * pl % tlag ( i ) / rmag ** 7 Ptocb = 3 * r5cbterm * cb % tlag / rmag ** 7 Ftr = - 3 / rmag ** 7 * ( r5cbterm + r5plterm ) - 3 * vmag / rmag * ( Ptocb + Ptopl ) F_T (:) = ( Ftr + ( Ptocb + Ptopl ) * dot_product ( v_unit , r_unit ) / rmag ) * r_unit (:) & + Ptopl * (( pl % rot (:, i ) - theta_dot (:)) . cross . r_unit (:)) & + Ptocb * (( cb % rot (:) - theta_dot (:)) . cross . r_unit (:)) cb % atide (:) = cb % atide (:) + F_T (:) / cb % Gmass pl % atide (:, i ) = F_T (:) / pl % Gmass ( i ) end do do i = 1 , npl pl % ah (:, i ) = pl % ah (:, i ) + pl % atide (:, i ) + cb % atide (:) end do end associate return end subroutine tides_kick_getacch_pl end submodule s_tides_kick_getacch","tags":"","loc":"sourcefile/tides_getacch_pl.f90.html"},{"title":"tides_spin_step.f90 – swiftest","text":"This file depends on sourcefile~~tides_spin_step.f90~~EfferentGraph sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_tides_step_spin Source Code tides_spin_step.f90 Source Code submodule ( swiftest_classes ) s_tides_step_spin use swiftest type , extends ( lambda_obj_tvar ) :: tides_derivs_func !! Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers procedure ( tidederiv ), pointer , nopass :: lambdaptr_tides_deriv real ( DP ), dimension (:,:), allocatable :: xbeg real ( DP ), dimension (:,:), allocatable :: xend real ( DP ) :: dt contains generic :: init => tides_derivs_init procedure :: evalt => tides_derivs_eval procedure , nopass :: tides_derivs_init end type interface lambda_obj module procedure tides_derivs_init end interface abstract interface function tidederiv ( x , t , dt , xbeg , xend ) result ( y ) ! Template for a 0 argument function import DP , swiftest_nbody_system real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t real ( DP ), intent ( in ) :: dt real ( DP ), dimension (:,:), intent ( in ) :: xbeg real ( DP ), dimension (:,:), intent ( in ) :: xend real ( DP ), dimension (:), allocatable :: y end function end interface contains module subroutine tides_step_spin_system ( self , param , t , dt ) !! author: Jennifer L.L. Pouplin and David A. Minton !! !! Integrates the spin equations for central and massive bodies of the system subjected to tides. implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ), dimension (:), allocatable :: rot0 , rot1 real ( DP ) :: subt real ( DP ), parameter :: tol = 1e-6_DP !! Just a guess at the moment real ( DP ) :: subdt associate ( pl => self % pl , npl => self % pl % nbody , cb => self % cb ) allocate ( rot0 ( NDIM * ( npl + 1 ))) rot0 = [ pack ( pl % rot (:, 1 : npl ),. true .), pack ( cb % rot (:),. true .)] ! Use this space call the ode_solver, passing tides_spin_derivs as the function: subdt = dt / 2 0._DP !rot1(:) = util_solve_rkf45(lambda_obj(tides_spin_derivs, subdt, pl%xbeg, pl%xend), rot0, dt, subdt tol) ! Recover with unpack !pl%rot(:,1:npl) = unpack(rot1... !cb%rot(:) = unpack(rot1... end associate return end subroutine tides_step_spin_system function tides_spin_derivs ( rot_pl_cb , t , dt , xbeg , xend ) result ( drot ) !! Need to add more arguments so we can pull in mass, radius, Ip, J2, etc... !! author: Jennifer L.L. Pouplin and David A. Minton !! !! function used to calculate the derivatives that are fed to the ODE solver implicit none ! Arguments real ( DP ), dimension (:,:), intent ( in ) :: rot_pl_cb !! Array of rotations. The last element is the central body, and all others are massive bodies real ( DP ), intent ( in ) :: t !! Current time, which is used to interpolate the massive body positions real ( DP ), intent ( in ) :: dt !! Total step size real ( DP ), dimension (:,:), intent ( in ) :: xbeg real ( DP ), dimension (:,:), intent ( in ) :: xend ! Internals real ( DP ), dimension (:,:), allocatable :: drot real ( DP ), dimension (:), allocatable :: flatrot real ( DP ), dimension ( NDIM ) :: N_Tcb , N_Rcb , N_Tpl , N_Rpl , xinterp real ( DP ) :: C_cb , C_pl , r_dot_rot_cb , r_dot_rot_pl , rmag integer ( I4B ) :: i , n n = size ( rot_pl_cb , 2 ) if ( allocated ( drot )) deallocate ( drot ) allocate ( drot , mold = rot_pl_cb ) drot (:,:) = 0.0_DP do i = 1 , n - 1 xinterp (:) = xbeg (:, i ) + t / dt * ( xend (:, i ) - xbeg (:, i )) ! Calculate Ncb and Npl as a function of xinterp !drot(:,i) = -Mcb / (Mcb + Mpl(i)) * (N_Tpl + N_Rpl) !drot(:,n) = drot(:,n) - Mcb / (Mcb + Mpl(i) * (N_Tcb + N_Rcb) ! end do return end function tides_spin_derivs function tides_derivs_eval ( self , x , t ) result ( y ) implicit none ! Arguments class ( tides_derivs_func ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t ! Result real ( DP ), dimension (:), allocatable :: y if ( associated ( self % lambdaptr_tides_deriv )) then y = self % lambdaptr_tides_deriv ( x , t , self % dt , self % xbeg , self % xend ) else error stop \"Lambda function was not initialized\" end if return end function tides_derivs_eval function tides_derivs_init ( lambda , dt , xbeg , xend ) result ( f ) implicit none ! Arguments procedure ( tidederiv ) :: lambda real ( DP ), intent ( in ) :: dt real ( DP ), dimension (:,:), intent ( in ) :: xbeg real ( DP ), dimension (:,:), intent ( in ) :: xend ! Result type ( tides_derivs_func ) :: f f % lambdaptr_tides_deriv => lambda f % dt = dt allocate ( f % xbeg , source = xbeg ) allocate ( f % xend , source = xend ) return end function tides_derivs_init end submodule s_tides_step_spin","tags":"","loc":"sourcefile/tides_spin_step.f90.html"},{"title":"obl.f90 – swiftest","text":"This file depends on sourcefile~~obl.f90~~EfferentGraph sourcefile~obl.f90 obl.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~obl.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_obl Source Code obl.f90 Source Code submodule ( swiftest_classes ) s_obl use swiftest contains module subroutine obl_acc_body ( self , system ) !! author: David A. Minton !! !! Compute the barycentric accelerations of bodies due to the oblateness of the central body !!      Returned values do not include monopole term or terms higher than J4 !! !! Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90 !! Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals integer ( I4B ) :: i real ( DP ) :: r2 , irh , rinv2 , t0 , t1 , t2 , t3 , fac1 , fac2 if ( self % nbody == 0 ) return associate ( n => self % nbody , cb => system % cb ) self % aobl (:,:) = 0.0_DP do concurrent ( i = 1 : n , self % lmask ( i )) r2 = dot_product ( self % xh (:, i ), self % xh (:, i )) irh = 1.0_DP / sqrt ( r2 ) rinv2 = irh ** 2 t0 = - cb % Gmass * rinv2 * rinv2 * irh t1 = 1.5_DP * cb % j2rp2 t2 = self % xh ( 3 , i ) * self % xh ( 3 , i ) * rinv2 t3 = 1.875_DP * cb % j4rp4 * rinv2 fac1 = t0 * ( t1 - t3 - ( 5 * t1 - ( 1 4.0_DP - 2 1.0_DP * t2 ) * t3 ) * t2 ) fac2 = 2 * t0 * ( t1 - ( 2.0_DP - ( 1 4.0_DP * t2 / 3.0_DP )) * t3 ) self % aobl (:, i ) = fac1 * self % xh (:, i ) self % aobl ( 3 , i ) = fac2 * self % xh ( 3 , i ) + self % aobl ( 3 , i ) end do end associate return end subroutine obl_acc_body module subroutine obl_acc_pl ( self , system ) !! author: David A. Minton !! !! Compute the barycentric accelerations of massive bodies due to the oblateness of the central body !! !! Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90 !! Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody , cb => system % cb ) call obl_acc_body ( pl , system ) do i = 1 , NDIM cb % aobl ( i ) = - sum ( pl % Gmass ( 1 : npl ) * pl % aobl ( i , 1 : npl ), pl % lmask ( 1 : npl )) / cb % Gmass end do do concurrent ( i = 1 : npl , pl % lmask ( i )) pl % ah (:, i ) = pl % ah (:, i ) + pl % aobl (:, i ) - cb % aobl (:) end do end associate return end subroutine obl_acc_pl module subroutine obl_acc_tp ( self , system ) !! author: David A. Minton !! !! Compute the barycentric accelerations of massive bodies due to the oblateness of the central body !! !! Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90 !! Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals real ( DP ), dimension ( NDIM ) :: aoblcb integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , cb => system % cb ) call obl_acc_body ( tp , system ) if ( system % lbeg ) then aoblcb = cb % aoblbeg else aoblcb = cb % aoblend end if do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = tp % ah (:, i ) + tp % aobl (:, i ) - aoblcb (:) end do end associate return end subroutine obl_acc_tp module subroutine obl_pot_system ( self ) !! author: David A. Minton !! !! Compute the contribution to the total gravitational potential due solely to the oblateness of the central body !!    Returned value does not include monopole term or terms higher than J4 !! !!    Reference: MacMillan, W. D. 1958. The Theory of the Potential, (Dover Publications), 363. !! !! Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 !! Adapted from Hal Levison's Swift routine obl_pot.f implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object ! Internals integer ( I4B ) :: i real ( DP ), dimension ( self % pl % nbody ) :: oblpot_arr associate ( system => self , pl => self % pl , npl => self % pl % nbody , cb => self % cb ) if (. not . any ( pl % lmask ( 1 : npl ))) return do concurrent ( i = 1 : npl , pl % lmask ( i )) oblpot_arr ( i ) = obl_pot_one ( npl , cb % Gmass , pl % Gmass ( i ), cb % j2rp2 , cb % j4rp4 , pl % xh ( 3 , i ), 1.0_DP / norm2 ( pl % xh (:, i ))) end do system % oblpot = sum ( oblpot_arr , pl % lmask ( 1 : npl )) end associate return end subroutine obl_pot_system elemental function obl_pot_one ( npl , GMcb , GMpl , j2rp2 , j4rp4 , zh , irh ) result ( oblpot ) !! author: David A. Minton !! !! Compute the contribution to the total gravitational potential due solely to the oblateness of the central body from a single massive body !!    Returned value does not include monopole term or terms higher than J4 !! !!    Reference: MacMillan, W. D. 1958. The Theory of the Potential, (Dover Publications), 363. !! !! Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 !! Adapted from Hal Levison's Swift routine obl_pot.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies real ( DP ), intent ( in ) :: GMcb !! G*mass of the central body real ( DP ), intent ( in ) :: GMpl !! G*mass of the massive body real ( DP ), intent ( in ) :: j2rp2 !! J_2 / R**2 of the central body real ( DP ), intent ( in ) :: j4rp4 !! J_2 / R**4 of the central body real ( DP ), intent ( in ) :: zh !! z-component of the heliocentric distance vector of the massive body real ( DP ), intent ( in ) :: irh !! Inverse of the heliocentric distance magnitude of the massive body ! Result real ( DP ) :: oblpot !! Gravitational potential ! Internals integer ( I4B ) :: i real ( DP ) :: rinv2 , t0 , t1 , t2 , t3 , p2 , p4 , mu rinv2 = irh ** 2 t0 = GMcb * GMpl * rinv2 * irh t1 = j2rp2 t2 = zh ** 2 * rinv2 t3 = j4rp4 * rinv2 p2 = 0.5_DP * ( 3 * t2 - 1.0_DP ) p4 = 0.125_DP * (( 35 * t2 - 3 0.0_DP ) * t2 + 3.0_DP ) oblpot = t0 * ( t1 * p2 + t3 * p4 ) return end function obl_pot_one end submodule s_obl","tags":"","loc":"sourcefile/obl.f90.html"},{"title":"orbel.f90 – swiftest","text":"This file depends on sourcefile~~orbel.f90~~EfferentGraph sourcefile~orbel.f90 orbel.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~orbel.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_orbel Source Code orbel.f90 Source Code submodule ( swiftest_classes ) s_orbel use swiftest contains module subroutine orbel_el2xv_vec ( self , cb ) !! author: David A. Minton !! !! A wrapper method that converts all of the orbital element vectors into cartesian position and velocity vectors for a Swiftest body object. !! This method deallocates all of the orbital elements after it is finished. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body objec ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return call self % set_mu ( cb ) do concurrent ( i = 1 : self % nbody ) call orbel_el2xv ( self % mu ( i ), self % a ( i ), self % e ( i ), self % inc ( i ), self % capom ( i ), & self % omega ( i ), self % capm ( i ), self % xh (:, i ), self % vh (:, i )) end do deallocate ( self % a , self % e , self % inc , self % capom , self % omega , self % capm ) return end subroutine orbel_el2xv_vec pure subroutine orbel_el2xv ( mu , a , ie , inc , capom , omega , capm , x , v ) !! author: David A. Minton !! !! Compute osculating orbital elements from relative C)rtesian position and velocity !!  All angular measures are returned in radians !!      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 !! !!      If eccentricity < sqrt(TINY), argument of pericenter is arbitrarily set to 0 !! !!      ALGORITHM:  See Fitzpatrick \"Principles of Cel. Mech.\" !! !! Adapted from Martin Duncan's el2xv.f !! DATE WRITTEN:  May 11, 1992. !! REVISIONS: May 26 - now use better Kepler solver for ellipses !!  and hyperbolae called EHYBRID.F and FHYBRID.F implicit none real ( DP ), intent ( in ) :: mu real ( DP ), intent ( in ) :: a , ie , inc , capom , omega , capm real ( DP ), dimension (:), intent ( out ) :: x , v integer ( I4B ) :: iorbit_type real ( DP ) :: e , cape , capf , zpara , em1 real ( DP ) :: sip , cip , so , co , si , ci real ( DP ) :: d11 , d12 , d13 , d21 , d22 , d23 real ( DP ) :: scap , ccap , shcap , chcap real ( DP ) :: sqe , sqgma , xfac1 , xfac2 , ri , vfac1 , vfac2 if ( ie < 0.0_DP ) then !write(*,*) ' ERROR in orbel_el2xv: e<0, setting e=0!!1' e = 0.0_DP iorbit_type = ELLIPSE else e = ie em1 = e - 1._DP if ( abs ( em1 ) < VSMALL ) then iorbit_type = PARABOLA else if ( e > 1.0_DP ) then iorbit_type = HYPERBOLA else iorbit_type = ELLIPSE end if endif call orbel_scget ( omega , sip , cip ) call orbel_scget ( capom , so , co ) call orbel_scget ( inc , si , ci ) d11 = cip * co - sip * so * ci d12 = cip * so + sip * co * ci d13 = sip * si d21 = - sip * co - cip * so * ci d22 = - sip * so + cip * co * ci d23 = cip * si !-- ! Get the other quantities depending on orbit type ! if ( iorbit_type == ELLIPSE ) then cape = orbel_ehybrid ( e , capm ) call orbel_scget ( cape , scap , ccap ) sqe = sqrt ( 1._DP - e ** 2 ) sqgma = sqrt ( mu * a ) xfac1 = a * ( ccap - e ) xfac2 = a * sqe * scap ri = 1._DP / ( a * ( 1._DP - e * ccap )) vfac1 = - ri * sqgma * scap vfac2 = ri * sqgma * sqe * ccap endif !-- if ( iorbit_type == HYPERBOLA ) then capf = orbel_fhybrid ( e , capm ) call orbel_schget ( capf , shcap , chcap ) sqe = sqrt ( e ** 2 - 1._DP ) sqgma = sqrt ( mu * a ) xfac1 = a * ( e - chcap ) xfac2 = a * sqe * shcap ri = 1._DP / ( a * ( e * chcap - 1._DP )) vfac1 = - ri * sqgma * shcap vfac2 = ri * sqgma * sqe * chcap endif !-- if ( iorbit_type == PARABOLA ) then zpara = orbel_zget ( capm ) sqgma = sqrt ( 2 * mu * a ) xfac1 = a * ( 1._DP - zpara * zpara ) xfac2 = 2 * a * zpara ri = 1._DP / ( a * ( 1._DP + zpara * zpara )) vfac1 = - ri * sqgma * zpara vfac2 = ri * sqgma endif !-- x ( 1 ) = d11 * xfac1 + d21 * xfac2 x ( 2 ) = d12 * xfac1 + d22 * xfac2 x ( 3 ) = d13 * xfac1 + d23 * xfac2 v ( 1 ) = d11 * vfac1 + d21 * vfac2 v ( 2 ) = d12 * vfac1 + d22 * vfac2 v ( 3 ) = d13 * vfac1 + d23 * vfac2 return end subroutine orbel_el2xv module pure subroutine orbel_scget ( angle , sx , cx ) !! author: David A. Minton !! !! Efficiently compute the sine and cosine of an input angle !!      Input angle must be in radians !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_scget.f90 !! Adapted from Hal Levison's Swift routine orbel_scget.f implicit none ! Arguments real ( DP ), intent ( in ) :: angle real ( DP ), intent ( out ) :: sx , cx ! Internals integer ( I4B ) :: nper real ( DP ) :: x nper = angle / TWOPI x = angle - nper * TWOPI if ( x < 0.0_DP ) x = x + TWOPI sx = sin ( x ) cx = sqrt ( 1.0_DP - sx ** 2 ) if (( x > PIBY2 ) . and . ( x < PI3BY2 )) cx = - cx return end subroutine orbel_scget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !********************************************************************** !                   ORBEL_SCHGET.F !********************************************************************** !     PURPOSE:  Given an angle, efficiently compute sinh and cosh. ! !        Input: !             angle ==> angle in radians (real scalar) ! !        Output: !             shx    ==>  sinh(angle)  (real scalar) !             chx    ==>  cosh(angle)  (real scalar) ! !     ALGORITHM: Obvious from the code !     REMARKS: Based on the routine SCGET for sine's and cosine's. !       We use the sqrt rather than cosh (it's faster) !       BE SURE THE ANGLE IS IN RADIANS AND IT CAN'T BE LARGER THAN 300 !       OR OVERFLOWS WILL OCCUR! !     AUTHOR:  M. Duncan. !     DATE WRITTEN:  May 6, 1992. !     REVISIONS: !********************************************************************** pure subroutine orbel_schget ( angle , shx , chx ) real ( DP ), intent ( in ) :: angle real ( DP ), intent ( out ) :: shx , chx shx = sinh ( angle ) chx = sqrt ( 1._DP + shx * shx ) return end subroutine orbel_schget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !        !                    ORBEL_FLON.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn. for hyperbola using hybrid approach. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                        capn ==> hyperbola mean anomaly. (real scalar) !             Returns: !                  orbel_flon ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Uses power series for N in terms of F and Newton,s method !     REMARKS: ONLY GOOD FOR LOW VALUES OF N (N < 0.636*e -0.6) !     AUTHOR: M. Duncan !     DATE WRITTEN: May 26, 1992. !     REVISIONS: !********************************************************************** real ( DP ) pure function orbel_flon ( e , icapn ) implicit none real ( DP ), intent ( in ) :: e , icapn integer ( I4B ) :: iflag , i real ( DP ) :: a , b , sq , biga , bigb , capn real ( DP ) :: x , x2 real ( DP ) :: f , fp , dx real ( DP ) :: diff real ( DP ) :: a0 , a1 real ( DP ) :: b1 integer ( I4B ), parameter :: IMAX = 10 real ( DP ), parameter :: a11 = 15 6._DP , a9 = 1716 0._DP , a7 = 123552 0._DP real ( DP ), parameter :: a5 = 5189184 0._DP , a3 = 103783680 0._DP real ( DP ), parameter :: b11 = 11 * a11 , b9 = 9 * a9 , b7 = 7 * a7 real ( DP ), parameter :: b5 = 5 * a5 , b3 = 3 * a3 real ( DP ), parameter :: THIRD = 1._DP / 3._DP ! Function to solve \"Kepler's eqn\" for F (here called ! x) for given e and CAPN. Only good for smallish CAPN iflag = 0 if ( icapn < 0._DP ) then iflag = 1 capn = - icapn else capn = icapn end if a1 = 622702080 0._DP * ( 1._DP - 1._DP / e ) a0 = - 622702080 0._DP * capn / e b1 = a1 !  set iflag nonzero if capn < 0., in which case solve for -capn !  and change the sign of the final answer for f. !  Begin with a reasonable guess based on solving the cubic for small F a = 6 * ( e - 1.d0 ) / e b = - 6 * capn / e sq = SQRT ( 0.25_DP * b ** 2 + a ** 3 / 2 7._DP ) biga = ( - 0.5_DP * b + sq ) ** ( 1.0_DP / 3.0_DP ) bigb = - ( + 0.5_DP * b + sq ) ** ( 1.0_DP / 3.0_DP ) x = biga + bigb ! write(6,*) 'cubic = ',x**3 +a*x +b orbel_flon = x ! If capn is VSMALL (or zero) no need to go further than cubic even for ! e =1. if ( capn < VSMALL ) go to 100 do i = 1 , IMAX x2 = x * x f = a0 + x * ( a1 + x2 * ( a3 + x2 * ( a5 + x2 * ( a7 + x2 * ( a9 + x2 * ( a11 + x2 )))))) fp = b1 + x2 * ( b3 + x2 * ( b5 + x2 * ( b7 + x2 * ( b9 + x2 * ( b11 + 13 * x2 ))))) dx = - f / fp !   write(6,*) 'i,dx,x,f : ' !   write(6,432) i,dx,x,f 432 format ( 1 x , i3 , 3 ( 2 x , 1 p1e22 . 15 )) orbel_flon = x + dx !   if we have converged here there's no point in going on if ( abs ( dx ) <= VSMALL ) go to 100 x = orbel_flon end do ! abnormal return here - we've gone thru the loop ! imax times without convergence if ( iflag == 1 ) then orbel_flon = - orbel_flon capn = - capn end if !write(*,*) 'flon : returning without complete convergence' diff = e * sinh ( orbel_flon ) - orbel_flon - capn !write(*,*) 'n, f, ecc*sinh(f) - f - n : ' !write(*,*) capn,orbel_flon,diff return !  normal return here, but check if capn was originally negative 100 if ( iflag == 1 ) then orbel_flon = - orbel_flon capn = - capn end if return end function orbel_flon !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_FGET.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn. for hyperbola using hybrid approach. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                        capn ==> hyperbola mean anomaly. (real scalar) !             Returns: !                  orbel_fget ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Based on pp. 70-72 of Fitzpatrick's book \"Principles of !           Cel. Mech. \".  Quartic convergence from Danby's book. !     REMARKS: !     AUTHOR: M. Duncan !     DATE WRITTEN: May 11, 1992. !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_fget ( e , capn ) implicit none real ( DP ), intent ( in ) :: e , capn integer :: i real ( DP ) :: tmp , x , shx , chx real ( DP ) :: esh , ech , f , fp , fpp , fppp , dx integer ( I4B ), parameter :: IMAX = 10 !---- !...  executable code ! function to solve \"kepler's eqn\" for f (here called ! x) for given e and capn. !  begin with a guess proposed by danby if ( capn < 0.d0 ) then tmp = - 2 * capn / e + 1.8_DP x = - log ( tmp ) else tmp = + 2 * capn / e + 1.8_DP x = log ( tmp ) end if orbel_fget = x do i = 1 , IMAX call orbel_schget ( x , shx , chx ) esh = e * shx ech = e * chx f = esh - x - capn !   write(6,*) 'i,x,f : ',i,x,f fp = ech - 1.d0 fpp = esh fppp = ech dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx ** 2 * fppp / 6._DP ) orbel_fget = x + dx !   if we have converged here there's no point in going on if ( abs ( dx ) <= VSMALL ) return x = orbel_fget end do !write(*,*) 'fget : returning without complete convergence' return end function orbel_fget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_ZGET.F !********************************************************************** !     PURPOSE:  Solves the equivalent of Kepler's eqn. for a parabola !          given Q (Fitz. notation.) ! !             Input: !                           q ==>  parabola mean anomaly. (real scalar) !             Returns: !                  orbel_zget ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: p. 70-72 of Fitzpatrick's book \"Princ. of Cel. Mech.\" !     REMARKS: For a parabola we can solve analytically. !     AUTHOR: M. Duncan !     DATE WRITTEN: May 11, 1992. !     REVISIONS: May 27 - corrected it for negative Q and use power !       series for small Q. !********************************************************************** real ( DP ) pure function orbel_zget ( iq ) implicit none real ( DP ), intent ( in ) :: iq integer ( I4B ) :: iflag real ( DP ) :: x , tmp , q iflag = 0 if ( iq < 0.0_DP ) then iflag = 1 q = - iq else q = iq end if if ( q < 1.e-3_DP ) then orbel_zget = q * ( 1._DP - ( q ** 2 / 3._DP ) * ( 1._DP - q ** 2 )) else x = 0.5_DP * ( 3 * q + sqrt ( 9 * q ** 2 + 4._DP )) tmp = x ** ( 1._DP / 3._DP ) orbel_zget = tmp - 1._DP / tmp end if if ( iflag == 1 ) then orbel_zget = - orbel_zget q = - q end if return end function orbel_zget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_ESOLMD.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !                orbel_esolmd ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Some sort of quartic convergence from Wisdom. !     REMARKS: ONLY GOOD FOR SMALL ECCENTRICITY SINCE IT ONLY !         ITERATES ONCE. (GOOD FOR PLANET CALCS.) !         ALSO DOES NOT PUT M OR E BETWEEN 0. AND 2*PI !     INCLUDES: needs SCGET.F !     AUTHOR: M. Duncan !     DATE WRITTEN: May 7, 1992. !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_esolmd ( e , m ) implicit none real ( DP ), intent ( in ) :: e real ( DP ), intent ( in ) :: m real ( DP ) :: x , sm , cm , sx , cx real ( DP ) :: es , ec , f , fp , fpp , fppp , dx !...    function to solve kepler's eqn for e (here called !...    x) for given e and m. returns value of x. call orbel_scget ( m , sm , cm ) x = m + e * sm * ( 1._DP + e * ( cm + e * ( 1._DP - 1.5_DP * sm ** 2 ))) call orbel_scget ( x , sx , cx ) es = e * sx ec = e * cx f = x - es - m fp = 1._DP - ec fpp = es fppp = ec dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx ** 2 * fppp / 6._DP ) orbel_esolmd = x + dx return end function orbel_esolmd !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_EHIE.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !              orbel_ehybrid ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Use Danby's quartic for 3 iterations. !                Eqn. is f(x) = x - e*sin(x+M). Note  that !          E = x + M. First guess is very good for e near 1. !          Need to first get M between 0. and PI and use !   symmetry to return right answer if M between PI and 2PI !     REMARKS: Modifies M so that both E and M are in range (0,TWOPI) !     AUTHOR: M. Duncan !     DATE WRITTEN: May 25,1992. !     REVISIONS: !********************************************************************** real ( DP ) pure function orbel_ehie ( e , im ) implicit none real ( DP ), intent ( in ) :: e , im integer ( I4B ) :: iflag , nper , niter real ( DP ) :: dx , x , sa , ca , esa , eca , f , fp , m integer ( I4B ), parameter :: NMAX = 3 ! in this section, bring m into the range (0,TWOPI) and if ! the result is greater than pi, solve for (TWOPI - m). iflag = 0 nper = im / TWOPI m = im - nper * TWOPI if ( m < 0._DP ) m = m + TWOPI if ( m > PI ) then m = TWOPI - m iflag = 1 end if ! make a first guess that works well for e near 1. x = ( 6 * m ) ** ( 1._DP / 3._DP ) - m niter = 0 ! iteration loop do niter = 1 , NMAX call orbel_scget ( x + m , sa , ca ) esa = e * sa eca = e * ca f = x - esa fp = 1._DP - eca dx = - f / fp dx = - f / ( fp + 0.5_DP * dx * esa ) dx = - f / ( fp + 0.5_DP * dx * ( esa + eca * dx / 3.0_DP )) x = x + dx end do orbel_ehie = m + x if ( iflag == 1 ) then orbel_ehie = TWOPI - orbel_ehie m = TWOPI - m end if return end function orbel_ehie !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                             ORBEL_EGET.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !                  orbel_eget ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Quartic convergence from Danby !     REMARKS: For results very near roundoff, give it M between !           0 and 2*pi. One can condition M before calling EGET !           by calling my double precision function MOD2PI(M). !           This is not done within the routine to speed it up !           and because it works fine even for large M. !     AUTHOR: M. Duncan !     DATE WRITTEN: May 7, 1992. !     REVISIONS: May 21, 1992.  Now have it go through EXACTLY two iterations !                with the premise that it will only be called if !          we have an ellipse with e between 0.15 and 0.8 !********************************************************************** real ( DP ) pure function orbel_eget ( e , m ) implicit none real ( DP ), intent ( in ) :: e , m real ( DP ) :: x , sm , cm , sx , cx real ( DP ) :: es , ec , f , fp , fpp , fppp , dx ! function to solve kepler's eqn for e (here called ! x) for given e and m. returns value of x. ! may 21 : for e < 0.18 use esolmd for speed and sufficient accuracy ! may 21 : for e > 0.8 use ehie - this one may not converge fast enough. call orbel_scget ( m , sm , cm ) !  begin with a guess accurate to order ecc**3 x = m + e * sm * ( 1._DP + e * ( cm + e * ( 1._DP - 1.5_DP * sm * sm ))) !  go through one iteration for improved estimate call orbel_scget ( x , sx , cx ) es = e * sx ec = e * cx f = x - es - m fp = 1._DP - ec fpp = es fppp = ec dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx * 2 * fppp / 6._DP ) orbel_eget = x + dx ! do another iteration. ! for m between 0 and 2*pi this seems to be enough to ! get near roundoff error for eccentricities between 0 and 0.8 x = orbel_eget call orbel_scget ( x , sx , cx ) es = e * sx ec = e * cx f = x - es - m fp = 1._DP - ec fpp = es fppp = ec dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx ** 2 * fppp / 6._DP ) orbel_eget = x + dx return end function orbel_eget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_EHYBRID.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !              orbel_ehybrid ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: For e < 0.18 uses fast routine ESOLMD !          For larger e but less than 0.8, uses EGET !          For e > 0.8 uses EHIE !     REMARKS: Only EHIE brings M and E into range (0,TWOPI) !     AUTHOR: M. Duncan !     DATE WRITTEN: May 25,1992. !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_ehybrid ( e , m ) implicit none real ( DP ), intent ( in ) :: e , m !real(DP) :: orbel_esolmd,orbel_eget,orbel_ehie if ( e < 0.18_DP ) then orbel_ehybrid = orbel_esolmd ( e , m ) else if ( e <= 0.8_DP ) then orbel_ehybrid = orbel_eget ( e , m ) else orbel_ehybrid = orbel_ehie ( e , m ) end if end if return end function orbel_ehybrid !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_FHYBRID.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn. for hyperbola using hybrid approach. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           n ==> hyperbola mean anomaly. (real scalar) !             Returns: !               orbel_fhybrid ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: For abs(N) < 0.636*ecc -0.6 , use FLON !          For larger N, uses FGET !     REMARKS: !     AUTHOR: M. Duncan !     DATE WRITTEN: May 26,1992. !     REVISIONS:: !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_fhybrid ( e , n ) implicit none real ( DP ), intent ( in ) :: e , n real ( DP ) :: abn abn = n if ( n < 0._DP ) abn = - abn if ( abn < 0.636_DP * e - 0.6_DP ) then orbel_fhybrid = orbel_flon ( e , n ) else orbel_fhybrid = orbel_fget ( e , n ) end if return end function orbel_fhybrid module pure subroutine orbel_xv2aeq ( mu , x , v , a , e , q ) !! author: David A. Minton !! !! Compute semimajor axis, eccentricity, and pericentric distance from relative Cartesian position and velocity !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aeq.f90 !! Adapted from Luke Dones' Swift routine orbel_xv2aeq.f implicit none !! Arguments real ( DP ), intent ( in ) :: mu real ( DP ), dimension (:), intent ( in ) :: x , v real ( DP ), intent ( out ) :: a , e , q integer ( I4B ) :: iorbit_type real ( DP ) :: r , v2 , h2 , energy , fac real ( DP ), dimension ( NDIM ) :: hvec a = 0.0_DP e = 0.0_DP q = 0.0_DP r = sqrt ( dot_product ( x (:), x (:))) v2 = dot_product ( v (:), v (:)) hvec (:) = x (:) . cross . v (:) h2 = dot_product ( hvec (:), hvec (:)) if ( h2 == 0.0_DP ) return energy = 0.5_DP * v2 - mu / r if ( abs ( energy * r / mu ) < sqrt ( VSMALL )) then iorbit_type = PARABOLA else a = - 0.5_DP * mu / energy if ( a < 0.0_DP ) then fac = - h2 / ( mu * a ) if ( fac > VSMALL ) then iorbit_type = HYPERBOLA else iorbit_type = PARABOLA end if else iorbit_type = ELLIPSE end if end if select case ( iorbit_type ) case ( ELLIPSE ) fac = 1.0_DP - h2 / ( mu * a ) if ( fac > VSMALL ) e = sqrt ( fac ) q = a * ( 1.0_DP - e ) case ( PARABOLA ) a = 0.5_DP * h2 / mu e = 1.0_DP q = a case ( HYPERBOLA ) e = sqrt ( 1.0_DP + fac ) q = a * ( 1.0_DP - e ) end select return end subroutine orbel_xv2aeq module pure subroutine orbel_xv2aqt ( mu , x , v , a , q , capm , tperi ) !! author: David A. Minton !! !! Compute semimajor axis, pericentric distance, mean anomaly, and time to nearest pericenter passage from !! relative Cartesian position and velocity !!      tperi > 0 means nearest pericenter passage is in the future !!      tperi < 0 means nearest pericenter passage is in the past !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aqt.f90 implicit none ! Arguments real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: q !! periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly real ( DP ), intent ( out ) :: tperi !! time of pericenter passage ! Internals integer ( I4B ) :: iorbit_type real ( DP ) :: r , v2 , h2 , rdotv , energy , fac , w , face , cape , e , tmpf , capf , mm real ( DP ), dimension ( NDIM ) :: hvec a = 0.0_DP q = 0.0_DP capm = 0.0_DP tperi = 0.0_DP r = sqrt ( dot_product ( x (:), x (:))) v2 = dot_product ( v (:), v (:)) hvec (:) = x (:) . cross . v (:) h2 = dot_product ( hvec (:), hvec (:)) if ( h2 == 0.0_DP ) return rdotv = dot_product ( x (:), v (:)) energy = 0.5_DP * v2 - mu / r if ( abs ( energy * r / mu ) < sqrt ( VSMALL )) then iorbit_type = PARABOLA else a = - 0.5_DP * mu / energy if ( a < 0.0_DP ) then fac = - h2 / ( mu * a ) if ( fac > VSMALL ) then iorbit_type = HYPERBOLA else iorbit_type = PARABOLA end if else iorbit_type = ELLIPSE end if end if select case ( iorbit_type ) case ( ELLIPSE ) fac = 1.0_DP - h2 / ( mu * a ) if ( fac > VSMALL ) then e = sqrt ( fac ) cape = 0.0_DP face = ( a - r ) / ( a * e ) if ( face < - 1.0_DP ) then cape = PI else if ( face < 1.0_DP ) then cape = acos ( face ) end if if ( rdotv < 0.0_DP ) cape = TWOPI - cape else e = 0.0_DP cape = 0.0_DP end if capm = cape - e * sin ( cape ) q = a * ( 1.0_DP - e ) mm = sqrt ( mu / a ** 3 ) if ( capm < PI ) then tperi = - 1.0_DP * capm / mm else tperi = - 1.0_DP * ( capm - TWOPI ) / mm end if case ( PARABOLA ) a = 0.5_DP * h2 / mu e = 1.0_DP w = 0.0_DP fac = 2 * a / r - 1.0_DP if ( fac < - 1.0_DP ) then w = PI else if ( fac < 1.0_DP ) then w = acos ( fac ) end if if ( rdotv < 0.0_DP ) w = TWOPI - w tmpf = tan ( 0.5_DP * w ) capm = tmpf * ( 1.0_DP + tmpf * tmpf / 3.0_DP ) q = a mm = sqrt ( 0.5_DP * mu / q ** 3 ) tperi = - 1.0_DP * capm / mm case ( HYPERBOLA ) e = sqrt ( 1.0_DP + fac ) tmpf = ( a - r ) / ( a * e ) if ( tmpf < 1.0_DP ) tmpf = 1.0_DP capf = log ( tmpf + sqrt ( tmpf * tmpf - 1.0_DP )) if ( rdotv < 0.0_DP ) capf = - capf capm = e * sinh ( capf ) - capf q = a * ( 1.0_DP - e ) mm = sqrt ( - mu / a ** 3 ) tperi = - 1.0_DP * capm / mm end select return end subroutine orbel_xv2aqt module subroutine orbel_xv2el_vec ( self , cb ) !! author: David A. Minton !! !! A wrapper method that converts all of the cartesian position and velocity vectors of a Swiftest body object to orbital elements. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! internals integer ( I4B ) :: i if ( self % nbody == 0 ) return call self % set_mu ( cb ) if ( allocated ( self % a )) deallocate ( self % a ); allocate ( self % a ( self % nbody )) if ( allocated ( self % e )) deallocate ( self % e ); allocate ( self % e ( self % nbody )) if ( allocated ( self % inc )) deallocate ( self % inc ); allocate ( self % inc ( self % nbody )) if ( allocated ( self % capom )) deallocate ( self % capom ); allocate ( self % capom ( self % nbody )) if ( allocated ( self % omega )) deallocate ( self % omega ); allocate ( self % omega ( self % nbody )) if ( allocated ( self % capm )) deallocate ( self % capm ); allocate ( self % capm ( self % nbody )) do concurrent ( i = 1 : self % nbody ) call orbel_xv2el ( self % mu ( i ), self % xh (:, i ), self % vh (:, i ), self % a ( i ), self % e ( i ), self % inc ( i ), & self % capom ( i ), self % omega ( i ), self % capm ( i )) end do end subroutine orbel_xv2el_vec module pure subroutine orbel_xv2el ( mu , x , v , a , e , inc , capom , omega , capm ) !! author: David A. Minton !! !! Compute osculating orbital elements from relative Cartesian position and velocity !!  All angular measures are returned in radians !!      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 !! !!      If eccentricity < sqrt(TINY), argument of pericenter is arbitrarily set to 0 !! !!      References: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 201 - 206. !!              Fitzpatrick, P. M. 1970. Principles of Celestial Mechanics, (Academic Press), 69 - 73. !!              Roy, A. E. 1982. Orbital Motion, (Adam Hilger, Ltd.), 75 - 95 !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_xv2el.f90 !! Adapted from Martin Duncan's Swift routine orbel_xv2el.f implicit none ! Arguments real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: e !! eccentricity real ( DP ), intent ( out ) :: inc !! inclination real ( DP ), intent ( out ) :: capom !! longitude of ascending node real ( DP ), intent ( out ) :: omega !! argument of periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly ! Internals integer ( I4B ) :: iorbit_type real ( DP ) :: r , v2 , h2 , h , rdotv , energy , fac , u , w , cw , sw , face , cape , tmpf , capf real ( DP ), dimension ( NDIM ) :: hvec a = 0.0_DP e = 0.0_DP inc = 0.0_DP capom = 0.0_DP omega = 0.0_DP capm = 0.0_DP r = . mag . x (:) v2 = dot_product ( v (:), v (:)) hvec = x (:) . cross . v (:) h2 = dot_product ( hvec (:), hvec (:)) h = . mag . hvec (:) if ( h2 <= 10 * tiny ( 0.0_DP )) return rdotv = dot_product ( x (:), v (:)) energy = 0.5_DP * v2 - mu / r fac = hvec ( 3 ) / h if ( fac < - 1.0_DP ) then inc = PI else if ( fac < 1.0_DP ) then inc = acos ( fac ) end if fac = sqrt ( hvec ( 1 ) ** 2 + hvec ( 2 ) ** 2 ) / h if ( fac ** 2 < VSMALL ) then u = atan2 ( x ( 2 ), x ( 1 )) if ( hvec ( 3 ) < 0.0_DP ) u = - u else capom = atan2 ( hvec ( 1 ), - hvec ( 2 )) u = atan2 ( x ( 3 ) / sin ( inc ), x ( 1 ) * cos ( capom ) + x ( 2 ) * sin ( capom )) end if if ( capom < 0.0_DP ) capom = capom + TWOPI if ( u < 0.0_DP ) u = u + TWOPI if ( abs ( energy * r / mu ) < sqrt ( VSMALL )) then iorbit_type = parabola else a = - 0.5_DP * mu / energy if ( a < 0.0_DP ) then fac = - h2 / ( mu * a ) if ( fac > VSMALL ) then iorbit_type = HYPERBOLA else iorbit_type = PARABOLA end if else iorbit_type = ELLIPSE end if end if select case ( iorbit_type ) case ( ELLIPSE ) fac = 1.0_DP - h2 / ( mu * a ) if ( fac > VSMALL ) then e = sqrt ( fac ) cape = 0.0_DP face = ( a - r ) / ( a * e ) if ( face < - 1.0_DP ) then cape = PI else if ( face < 1.0_DP ) then cape = acos ( face ) end if if ( rdotv < 0.0_DP ) cape = TWOPI - cape fac = 1.0_DP - e * cos ( cape ) cw = ( cos ( cape ) - e ) / fac sw = sqrt ( 1.0_DP - e ** 2 ) * sin ( cape ) / fac w = atan2 ( sw , cw ) if ( w < 0.0_DP ) w = w + TWOPI else cape = u w = u end if capm = cape - e * sin ( cape ) case ( PARABOLA ) a = 0.5_DP * h2 / mu e = 1.0_DP w = 0.0_DP fac = 2 * a / r - 1.0_DP if ( fac < - 1.0_DP ) then w = PI else if ( fac < 1.0_DP ) then w = acos ( fac ) end if if ( rdotv < 0.0_DP ) w = TWOPI - w tmpf = tan ( 0.5_DP * w ) capm = tmpf * ( 1.0_DP + tmpf * tmpf / 3.0_DP ) case ( HYPERBOLA ) e = sqrt ( 1.0_DP + fac ) tmpf = max (( a - r ) / ( a * e ), 1.0_DP ) capf = log ( tmpf + sqrt ( tmpf ** 2 - 1.0_DP )) if ( rdotv < 0.0_DP ) capf = - capf fac = e * cosh ( capf ) - 1.0_DP cw = ( e - cosh ( capf )) / fac sw = sqrt ( e * e - 1.0_DP ) * sinh ( capf ) / fac w = atan2 ( sw , cw ) if ( w < 0.0_DP ) w = w + TWOPI capm = e * sinh ( capf ) - capf end select omega = u - w if ( omega < 0.0_DP ) omega = omega + TWOPI return end subroutine orbel_xv2el end submodule s_orbel","tags":"","loc":"sourcefile/orbel.f90.html"},{"title":"whm_coord.f90 – swiftest","text":"This file depends on sourcefile~~whm_coord.f90~~EfferentGraph sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_coord Source Code whm_coord.f90 Source Code submodule ( whm_classes ) s_whm_coord use swiftest contains module subroutine whm_coord_h2j_pl ( self , cb ) !! author: David A. Minton !! !! Convert from heliocentric to Jacobi coordinates, massive bodies only !! !! Uses pre-computed eta rather than computing it each time !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2j.f90 !! !! Adapted from Hal Levison's Swift routine coord_h2j.f implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: sumx , sumv , cap , capv if ( self % nbody == 0 ) return associate ( npl => self % nbody , GMpl => self % Gmass , eta => self % eta , xh => self % xh , vh => self % vh , & xj => self % xj , vj => self % vj ) xj (:, 1 ) = xh (:, 1 ) vj (:, 1 ) = vh (:, 1 ) sumx (:) = 0.0_DP sumv (:) = 0.0_DP do i = 2 , npl sumx (:) = sumx (:) + GMpl ( i - 1 ) * xh (:, i - 1 ) sumv (:) = sumv (:) + GMpl ( i - 1 ) * vh (:, i - 1 ) cap (:) = sumx (:) / eta ( i - 1 ) capv (:) = sumv (:) / eta ( i - 1 ) xj (:, i ) = xh (:, i ) - cap (:) vj (:, i ) = vh (:, i ) - capv (:) end do end associate return end subroutine whm_coord_h2j_pl module subroutine whm_coord_j2h_pl ( self , cb ) !! author: David A. Minton !! !! Convert from Jacobi to heliocentric coordinates, massive bodies only. !! !! Uses pre-computed eta rather than computing it each time !! !! !! Adapted from David E. Kaufmann's Swifter routine coord_j2h.f90 !! !! Adapted from Hal Levison's Swift routine coord_j2h.f implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: sumx , sumv if ( self % nbody == 0 ) return associate ( npl => self % nbody , GMpl => self % Gmass , eta => self % eta , xh => self % xh , vh => self % vh , & xj => self % xj , vj => self % vj ) xh (:, 1 ) = xj (:, 1 ) vh (:, 1 ) = vj (:, 1 ) sumx (:) = 0.0_DP sumv (:) = 0.0_DP do i = 2 , npl sumx (:) = sumx (:) + GMpl ( i - 1 ) * xj (:, i - 1 ) / eta ( i - 1 ) sumv (:) = sumv (:) + GMpl ( i - 1 ) * vj (:, i - 1 ) / eta ( i - 1 ) xh (:, i ) = xj (:, i ) + sumx (:) vh (:, i ) = vj (:, i ) + sumv (:) end do end associate return end subroutine whm_coord_j2h_pl module subroutine whm_coord_vh2vj_pl ( self , cb ) !! author: David A. Minton !! !! Convert from heliocentric to Jadcobi coordinates, massive body velocities only !! !! Uses pre-computed eta rather than computing it each time !! !! Adapted from David E. Kaufmann's Swifter routine coord_vh2vj.f90 !! !! Adapted from Hal Levison's Swift routine coord_vh2vj.f implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: sumv , capv if ( self % nbody == 0 ) return associate ( npl => self % nbody , GMpl => self % Gmass , vh => self % vh , vj => self % vj , eta => self % eta ) vj (:, 1 ) = vh (:, 1 ) sumv (:) = 0.0_DP do i = 2 , npl sumv (:) = sumv (:) + GMpl ( i - 1 ) * vh (:, i - 1 ) capv (:) = sumv (:) / eta ( i - 1 ) vj (:, i ) = vh (:, i ) - capv (:) end do end associate return end subroutine whm_coord_vh2vj_pl end submodule s_whm_coord","tags":"","loc":"sourcefile/whm_coord.f90.html"},{"title":"whm_gr.f90 – swiftest","text":"This file depends on sourcefile~~whm_gr.f90~~EfferentGraph sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_gr Source Code whm_gr.f90 Source Code submodule ( whm_classes ) s_whm_gr use swiftest contains module subroutine whm_gr_kick_getacch_pl ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of massive bodies !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: suma real ( DP ), dimension (:, :), allocatable :: aj real ( DP ) :: beta , rjmag4 if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody , inv_c2 => param % inv_c2 ) call gr_kick_getacch ( pl % muj , pl % xj , pl % lmask , npl , param % inv_c2 , pl % agr ) suma (:) = 0.0_DP pl % ah (:, 1 ) = pl % ah (:, 1 ) + pl % agr (:, 1 ) do i = 2 , npl suma (:) = suma (:) + pl % Gmass ( i ) * pl % agr (:, i ) / pl % eta ( i ) pl % ah (:, i ) = pl % ah (:, i ) + pl % agr (:, i ) + suma (:) end do end associate return end subroutine whm_gr_kick_getacch_pl module subroutine whm_gr_kick_getacch_tp ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of test particles !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: rjmag4 , beta if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , inv_c2 => param % inv_c2 ) call gr_kick_getacch ( tp % mu , tp % xh , tp % lmask , ntp , param % inv_c2 , tp % agr ) tp % ah (:, 1 : ntp ) = tp % ah (:, 1 : ntp ) + tp % agr (:, 1 : ntp ) end associate return end subroutine whm_gr_kick_getacch_tp module pure subroutine whm_gr_p4_pl ( self , param , dt ) !! author: David A. Minton !! !! Position kick to massive bodies due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i associate ( pl => self , npl => self % nbody ) if ( npl == 0 ) return do concurrent ( i = 1 : npl , pl % lmask ( i )) call gr_p4_pos_kick ( param , pl % xj (:, i ), pl % vj (:, i ), dt ) end do end associate return end subroutine whm_gr_p4_pl module pure subroutine whm_gr_p4_tp ( self , param , dt ) !! author: David A. Minton !! !! Position kick to test particles due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i associate ( tp => self , ntp => self % nbody ) if ( ntp == 0 ) return do concurrent ( i = 1 : ntp , tp % lmask ( i )) call gr_p4_pos_kick ( param , tp % xh (:, i ), tp % vh (:, i ), dt ) end do end associate return end subroutine whm_gr_p4_tp end submodule s_whm_gr","tags":"","loc":"sourcefile/whm_gr.f90.html"},{"title":"whm_step.f90 – swiftest","text":"This file depends on sourcefile~~whm_step.f90~~EfferentGraph sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_step Source Code whm_step.f90 Source Code submodule ( whm_classes ) s_whm_step use swiftest contains module subroutine whm_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies and and active test particles ahead in heliocentric coordinates !! !! Adapted from Hal Levison's Swift routine step_kdk.f !! Adapted from David E. Kaufmann's Swifter routine whm_step.f90 implicit none ! Arguments class ( whm_nbody_system ), intent ( inout ) :: self !! WHM nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize associate ( system => self , cb => self % cb , pl => self % pl , tp => self % tp ) tp % lfirst = pl % lfirst call pl % step ( system , param , t , dt ) call tp % step ( system , param , t , dt ) if ( param % ltides ) call system % step_spin ( param , t , dt ) end associate return end subroutine whm_step_system module subroutine whm_step_pl ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step planets ahead using kick-drift-kick algorithm !! !! Adapted from Hal Levison's Swift routine step_kdk_pl.f !! Adapted from David E. Kaufmann's Swifter routine whm_step_pl.f90 !logical, save :: lfirst = .true. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ) :: dth if ( self % nbody == 0 ) return associate ( pl => self , cb => system % cb ) dth = 0.5_DP * dt call pl % kick ( system , param , t , dth , lbeg = . true .) call pl % vh2vj ( cb ) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % drift ( system , param , dt ) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % j2h ( cb ) call pl % kick ( system , param , t + dt , dth , lbeg = . false .) end associate return end subroutine whm_step_pl module subroutine whm_step_tp ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step active test particles ahead using kick-drift-kick algorithm !! !! Adapted from Hal Levison's Swift routine step_kdk_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_step_tp.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ) :: dth if ( self % nbody == 0 ) return select type ( system ) class is ( whm_nbody_system ) associate ( tp => self , cb => system % cb , pl => system % pl ) dth = 0.5_DP * dt call tp % kick ( system , param , t , dth , lbeg = . true .) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % drift ( system , param , dt ) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % kick ( system , param , t + dt , dth , lbeg = . false .) end associate end select return end subroutine whm_step_tp end submodule s_whm_step","tags":"","loc":"sourcefile/whm_step.f90.html"},{"title":"whm_drift.f90 – swiftest","text":"This file depends on sourcefile~~whm_drift.f90~~EfferentGraph sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules whm_drift Source Code whm_drift.f90 Source Code submodule ( whm_classes ) whm_drift use swiftest contains module subroutine whm_drift_pl ( self , system , param , dt ) !! author: David A. Minton !! !! Loop through planets and call Danby drift routine !! !! Adapted from Hal Levison's Swift routine drift.f !! Adapted from David E. Kaufmann's Swifter routine whm_drift.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals integer ( I4B ) :: i integer ( I4B ), dimension (:), allocatable :: iflag if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) allocate ( iflag ( npl )) iflag (:) = 0 call drift_all ( pl % muj , pl % xj , pl % vj , npl , param , dt , pl % lmask , iflag ) if ( any ( iflag ( 1 : npl ) /= 0 )) then where ( iflag ( 1 : npl ) /= 0 ) pl % status ( 1 : npl ) = DISCARDED_DRIFTERR pl % lmask ( 1 : npl ) = . false . end where do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!!!\" WRITE ( * , * ) pl % muj ( i ), dt WRITE ( * , * ) pl % xj (:, i ) WRITE ( * , * ) pl % vj (:, i ) WRITE ( * , * ) \" STOPPING \" end if end do call util_exit ( FAILURE ) end if end associate return end subroutine whm_drift_pl end submodule whm_drift","tags":"","loc":"sourcefile/whm_drift.f90.html"},{"title":"whm_kick.f90 – swiftest","text":"This file depends on sourcefile~~whm_kick.f90~~EfferentGraph sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_kick Source Code whm_kick.f90 Source Code submodule ( whm_classes ) s_whm_kick use swiftest contains module subroutine whm_kick_getacch_pl ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of planets !! !! Adapted from Hal Levison's Swift routine getacch.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: ah0 if ( self % nbody == 0 ) return associate ( cb => system % cb , pl => self , npl => self % nbody ) call pl % set_ir3 () ah0 (:) = whm_kick_getacch_ah0 ( pl % Gmass ( 2 : npl ), pl % xh (:, 2 : npl ), npl - 1 ) do i = 1 , npl pl % ah (:, i ) = pl % ah (:, i ) + ah0 (:) end do call whm_kick_getacch_ah1 ( cb , pl ) call whm_kick_getacch_ah2 ( cb , pl ) call pl % accel_int () if ( param % loblatecb ) then call pl % accel_obl ( system ) if ( lbeg ) then cb % aoblbeg = cb % aobl else cb % aoblend = cb % aobl end if if ( param % ltides ) then cb % atidebeg = cb % aobl call pl % accel_tides ( system ) cb % atideend = cb % atide end if end if if ( param % lgr ) call pl % accel_gr ( param ) if ( param % lextra_force ) call pl % accel_user ( system , param , t , lbeg ) end associate return end subroutine whm_kick_getacch_pl module subroutine whm_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of test particles !! !! Adapted from Hal Levison's Swift routine getacch_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_tp.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: ah0 associate ( tp => self , ntp => self % nbody , pl => system % pl , cb => system % cb , npl => system % pl % nbody ) if ( ntp == 0 . or . npl == 0 ) return system % lbeg = lbeg if ( lbeg ) then ah0 (:) = whm_kick_getacch_ah0 ( pl % Gmass ( 1 : npl ), pl % xbeg (:, 1 : npl ), npl ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = tp % ah (:, i ) + ah0 (:) end do call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xbeg (:, 1 : npl ), npl ) else ah0 (:) = whm_kick_getacch_ah0 ( pl % Gmass ( 1 : npl ), pl % xend (:, 1 : npl ), npl ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = tp % ah (:, i ) + ah0 (:) end do call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xend (:, 1 : npl ), npl ) end if if ( param % loblatecb ) call tp % accel_obl ( system ) if ( param % lextra_force ) call tp % accel_user ( system , param , t , lbeg ) if ( param % lgr ) call tp % accel_gr ( param ) end associate return end subroutine whm_kick_getacch_tp function whm_kick_getacch_ah0 ( mu , xhp , n ) result ( ah0 ) !! author: David A. Minton !! !! Compute zeroth term heliocentric accelerations of planets implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: mu real ( DP ), dimension (:,:), intent ( in ) :: xhp integer ( I4B ), intent ( in ) :: n ! Result real ( DP ), dimension ( NDIM ) :: ah0 ! Internals real ( DP ) :: fac , r2 , ir3h , irh integer ( I4B ) :: i ah0 (:) = 0.0_DP do i = 1 , n r2 = dot_product ( xhp (:, i ), xhp (:, i )) irh = 1.0_DP / sqrt ( r2 ) ir3h = irh / r2 fac = mu ( i ) * ir3h ah0 (:) = ah0 (:) - fac * xhp (:, i ) end do return end function whm_kick_getacch_ah0 pure subroutine whm_kick_getacch_ah1 ( cb , pl ) !! author: David A. Minton !! !! Compute first term heliocentric accelerations of planets !! !! Adapted from Hal Levison's Swift routine getacch_ah1.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah1.f90 implicit none ! Arguments class ( swiftest_cb ), intent ( in ) :: cb !! WHM central body object class ( whm_pl ), intent ( inout ) :: pl !! WHM massive body object ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: ah1h , ah1j associate ( npl => pl % nbody ) do concurrent ( i = 2 : npl , pl % lmask ( i )) ah1j (:) = pl % xj (:, i ) * pl % ir3j ( i ) ah1h (:) = pl % xh (:, i ) * pl % ir3h ( i ) pl % ah (:, i ) = pl % ah (:, i ) + cb % Gmass * ( ah1j (:) - ah1h (:)) end do end associate return end subroutine whm_kick_getacch_ah1 pure subroutine whm_kick_getacch_ah2 ( cb , pl ) !! author: David A. Minton !! !! Compute second term heliocentric accelerations of planets !! !! Adapted from Hal Levison's Swift routine getacch_ah2.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah2.f90 implicit none ! Arguments class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object class ( whm_pl ), intent ( inout ) :: pl !! WHM massive body object ! Internals integer ( I4B ) :: i real ( DP ) :: etaj , fac real ( DP ), dimension ( NDIM ) :: ah2 , ah2o associate ( npl => pl % nbody ) ah2 (:) = 0.0_DP ah2o (:) = 0.0_DP etaj = cb % Gmass do concurrent ( i = 2 : npl , pl % lmask ( i )) etaj = etaj + pl % Gmass ( i - 1 ) fac = pl % Gmass ( i ) * cb % Gmass * pl % ir3j ( i ) / etaj ah2 (:) = ah2o + fac * pl % xj (:, i ) pl % ah (:, i ) = pl % ah (:, i ) + ah2 (:) ah2o (:) = ah2 (:) end do end associate return end subroutine whm_kick_getacch_ah2 module subroutine whm_kick_vh_pl ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick heliocentric velocities of massive bodies !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f !! Adapted from David E. Kaufmann's Swifter routine whm_kickvh.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i associate ( pl => self , npl => self % nbody , cb => system % cb ) if ( npl == 0 ) return if ( lbeg ) then if ( pl % lfirst ) then call pl % h2j ( cb ) pl % ah (:, 1 : npl ) = 0.0_DP call pl % accel ( system , param , t , lbeg ) pl % lfirst = . false . end if call pl % set_beg_end ( xbeg = pl % xh ) else pl % ah (:, 1 : npl ) = 0.0_DP call pl % accel ( system , param , t , lbeg ) call pl % set_beg_end ( xend = pl % xh ) end if do concurrent ( i = 1 : npl , pl % lmask ( i )) pl % vh (:, i ) = pl % vh (:, i ) + pl % ah (:, i ) * dt end do end associate return end subroutine whm_kick_vh_pl module subroutine whm_kick_vh_tp ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick heliocentric velocities of test particles !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kickvh_tp.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) if ( tp % lfirst ) then do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = 0.0_DP end do call tp % accel ( system , param , t , lbeg = . true .) tp % lfirst = . false . end if if (. not . lbeg ) then do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = 0.0_DP end do call tp % accel ( system , param , t , lbeg ) end if do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % vh (:, i ) = tp % vh (:, i ) + tp % ah (:, i ) * dt end do end associate return end subroutine whm_kick_vh_tp end submodule s_whm_kick","tags":"","loc":"sourcefile/whm_kick.f90.html"},{"title":"whm_setup.f90 – swiftest","text":"This file depends on sourcefile~~whm_setup.f90~~EfferentGraph sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_setup Source Code whm_setup.f90 Source Code submodule ( whm_classes ) s_whm_setup use swiftest contains module subroutine whm_setup_pl ( self , n , param ) !! author: David A. Minton !! !! Allocate WHM planet structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class call setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % eta )) deallocate ( self % eta ) if ( allocated ( self % muj )) deallocate ( self % muj ) if ( allocated ( self % xj )) deallocate ( self % xj ) if ( allocated ( self % vj )) deallocate ( self % vj ) if ( allocated ( self % ir3j )) deallocate ( self % ir3j ) if ( n == 0 ) return allocate ( self % eta ( n )) allocate ( self % muj ( n )) allocate ( self % xj ( NDIM , n )) allocate ( self % vj ( NDIM , n )) allocate ( self % ir3j ( n )) self % eta (:) = 0.0_DP self % muj (:) = 0.0_DP self % xj (:,:) = 0.0_DP self % vj (:,:) = 0.0_DP self % ir3j (:) = 0.0_DP return end subroutine whm_setup_pl module subroutine whm_util_set_mu_eta_pl ( self , cb ) !! author: David A. Minton !! !! Sets the Jacobi mass value eta for all massive bodies implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM system object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i associate ( pl => self , npl => self % nbody ) if ( npl == 0 ) return call util_set_mu_pl ( pl , cb ) pl % eta ( 1 ) = cb % Gmass + pl % Gmass ( 1 ) pl % muj ( 1 ) = pl % eta ( 1 ) do i = 2 , npl pl % eta ( i ) = pl % eta ( i - 1 ) + pl % Gmass ( i ) pl % muj ( i ) = cb % Gmass * pl % eta ( i ) / pl % eta ( i - 1 ) end do end associate return end subroutine whm_util_set_mu_eta_pl module subroutine whm_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize a WHM nbody system from files !! implicit none ! Arguments class ( whm_nbody_system ), intent ( inout ) :: self !! WHM nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters call setup_initialize_system ( self , param ) ! First we need to make sure that the massive bodies are sorted by heliocentric distance before computing jacobies call util_set_ir3h ( self % pl ) call self % pl % sort ( \"ir3h\" , ascending = . false .) call self % pl % index ( param ) ! Make sure that the discard list gets allocated initially call self % tp_discards % setup ( 0 , param ) call self % pl % set_mu ( self % cb ) call self % tp % set_mu ( self % cb ) if ( param % lgr ) then call self % pl % v2pv ( param ) call self % tp % v2pv ( param ) end if return end subroutine whm_setup_initialize_system end submodule s_whm_setup","tags":"","loc":"sourcefile/whm_setup.f90.html"},{"title":"whm_util.f90 – swiftest","text":"This file depends on sourcefile~~whm_util.f90~~EfferentGraph sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_util Source Code whm_util.f90 Source Code submodule ( whm_classes ) s_whm_util use swiftest contains module subroutine whm_util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( whm_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % eta , source % eta , nold , nsrc , lsource_mask ) call util_append ( self % muj , source % muj , nold , nsrc , lsource_mask ) call util_append ( self % ir3j , source % ir3j , nold , nsrc , lsource_mask ) call util_append ( self % xj , source % xj , nold , nsrc , lsource_mask ) call util_append ( self % vj , source % vj , nold , nsrc , lsource_mask ) call util_append_pl ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class whm_pl or its descendents\" call util_exit ( FAILURE ) end select return end subroutine whm_util_append_pl module subroutine whm_util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new WHM test particle structure into an old one. !! This is the inverse of a fill operation. !! !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: inserts !! inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( inserts ) class is ( whm_pl ) call util_fill ( keeps % eta , inserts % eta , lfill_list ) call util_fill ( keeps % muj , inserts % muj , lfill_list ) call util_fill ( keeps % ir3j , inserts % ir3j , lfill_list ) call util_fill ( keeps % xj , inserts % xj , lfill_list ) call util_fill ( keeps % vj , inserts % vj , lfill_list ) call util_fill_pl ( keeps , inserts , lfill_list ) class default write ( * , * ) \"Invalid object passed to the fill method. Inserts must be of class whm_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine whm_util_fill_pl module subroutine whm_util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a massive body against the requested size and resizes it if it is too small. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % eta , nnew ) call util_resize ( self % xj , nnew ) call util_resize ( self % vj , nnew ) call util_resize ( self % muj , nnew ) call util_resize ( self % ir3j , nnew ) call util_resize_pl ( self , nnew ) return end subroutine whm_util_resize_pl module subroutine whm_util_set_ir3j ( self ) !! author: David A. Minton !! !! Sets the inverse Jacobi and heliocentric radii cubed (1/rj**3 and 1/rh**3) implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object ! Internals integer ( I4B ) :: i real ( DP ) :: r2 , ir if ( self % nbody > 0 ) then do i = 1 , self % nbody r2 = dot_product ( self % xh (:, i ), self % xh (:, i )) ir = 1.0_DP / sqrt ( r2 ) self % ir3h ( i ) = ir / r2 r2 = dot_product ( self % xj (:, i ), self % xj (:, i )) ir = 1.0_DP / sqrt ( r2 ) self % ir3j ( i ) = ir / r2 end do end if return end subroutine whm_util_set_ir3j module subroutine whm_util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a WHM massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"eta\" ) call util_sort ( direction * pl % eta ( 1 : npl ), ind ( 1 : npl )) case ( \"muj\" ) call util_sort ( direction * pl % muj ( 1 : npl ), ind ( 1 : npl )) case ( \"ir3j\" ) call util_sort ( direction * pl % ir3j ( 1 : npl ), ind ( 1 : npl )) case ( \"xj\" , \"vj\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default call util_sort_pl ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine whm_util_sort_pl module subroutine whm_util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange WHM massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % eta , ind , npl ) call util_sort_rearrange ( pl % xj , ind , npl ) call util_sort_rearrange ( pl % vj , ind , npl ) call util_sort_rearrange ( pl % muj , ind , npl ) call util_sort_rearrange ( pl % ir3j , ind , npl ) call util_sort_rearrange_pl ( pl , ind ) end associate return end subroutine whm_util_sort_rearrange_pl module subroutine whm_util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) WHM test particle structure from active list to discard list !! !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( discards ) class is ( whm_pl ) call util_spill ( keeps % eta , discards % eta , lspill_list , ldestructive ) call util_spill ( keeps % muj , discards % muj , lspill_list , ldestructive ) call util_spill ( keeps % ir3j , discards % ir3j , lspill_list , ldestructive ) call util_spill ( keeps % xj , discards % xj , lspill_list , ldestructive ) call util_spill ( keeps % vj , discards % vj , lspill_list , ldestructive ) call util_spill_pl ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class whm_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine whm_util_spill_pl end submodule s_whm_util","tags":"","loc":"sourcefile/whm_util.f90.html"},{"title":"operator_cross.f90 – swiftest","text":"This file depends on sourcefile~~operator_cross.f90~~EfferentGraph sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~operator_cross.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_operator_cross Source Code operator_cross.f90 Source Code submodule ( swiftest_operators ) s_operator_cross use swiftest !! author: David A. Minton !! !! Contains implementations for the .cross. operator for all defined integer and real types !! Single vector implementations: C(1:3)   = A(1:3)   .cross. B(1:3) !! Vector list implementations:   C(1:3, :) = A(1:3, :) .cross. B(1:3, :) contains module pure function operator_cross_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:), intent ( in ) :: A , B real ( SP ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_sp module pure function operator_cross_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:), intent ( in ) :: A , B real ( DP ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_dp module pure function operator_cross_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:), intent ( in ) :: A , B real ( QP ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_qp module pure function operator_cross_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:), intent ( in ) :: A , B integer ( I1B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i1b module pure function operator_cross_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:), intent ( in ) :: A , B integer ( I2B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i2b module pure function operator_cross_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:), intent ( in ) :: A , B integer ( I4B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i4b module pure function operator_cross_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:), intent ( in ) :: A , B integer ( I8B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i8b module pure function operator_cross_el_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A , B real ( SP ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_sp module pure function operator_cross_el_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A , B real ( DP ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_dp module pure function operator_cross_el_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A , B real ( QP ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_qp module pure function operator_cross_el_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:,:), intent ( in ) :: A , B integer ( I1B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i1b module pure function operator_cross_el_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:,:), intent ( in ) :: A , B integer ( I2B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i2b module pure function operator_cross_el_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:,:), intent ( in ) :: A , B integer ( I4B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i4b module pure function operator_cross_el_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:,:), intent ( in ) :: A , B integer ( I8B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i8b end submodule s_operator_cross","tags":"","loc":"sourcefile/operator_cross.f90.html"},{"title":"operator_mag.f90 – swiftest","text":"This file depends on sourcefile~~operator_mag.f90~~EfferentGraph sourcefile~operator_mag.f90 operator_mag.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~operator_mag.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_operator_mag Source Code operator_mag.f90 Source Code submodule ( swiftest_operators ) s_operator_mag !! author: David A. Minton !! !! Contains implementations for the .mag. operator for all defined real types !! Single vector implementations:  B   = .mag. A(1:3) !! Vector list implementations:   B(:) = .mag. A(1:3, :) contains module pure function operator_mag_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:), intent ( in ) :: A real ( SP ) :: B B = norm2 ( A (:)) return end function operator_mag_sp module pure function operator_mag_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:), intent ( in ) :: A real ( DP ) :: B B = norm2 ( A (:)) return end function operator_mag_dp module pure function operator_mag_el_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A real ( SP ), dimension (:), allocatable :: B integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( B )) deallocate ( B ) allocate ( B ( n )) do concurrent ( i = 1 : n ) B ( i ) = norm2 ( A (:, i )) end do return end function operator_mag_el_sp module pure function operator_mag_el_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), allocatable :: B integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( B )) deallocate ( B ) allocate ( B ( n )) do concurrent ( i = 1 : n ) B ( i ) = norm2 ( A (:, i )) end do return end function operator_mag_el_dp module pure function operator_mag_el_qp ( A ) result ( B ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), allocatable :: B integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( B )) deallocate ( B ) allocate ( B ( n )) do concurrent ( i = 1 : n ) B ( i ) = norm2 ( A (:, i )) end do return end function operator_mag_el_qp end submodule s_operator_mag","tags":"","loc":"sourcefile/operator_mag.f90.html"},{"title":"util_solve.f90 – swiftest","text":"This file depends on sourcefile~~util_solve.f90~~EfferentGraph sourcefile~util_solve.f90 util_solve.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_solve.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_solve Source Code util_solve.f90 Source Code submodule ( swiftest_classes ) s_util_solve use swiftest contains module function util_solve_linear_system_d ( A , b , n , lerr ) result ( x ) !! Author: David A. Minton !! !! Solves the linear equation of the form A*x = b for x. !!   A is an (n,n) arrays !!   x and b are (n) arrays !! Uses Gaussian elimination, so will have issues if system is ill-conditioned. !! Uses quad precision intermidiate values, so works best on small arrays. use , intrinsic :: ieee_exceptions implicit none ! Arguments integer ( I4B ), intent ( in ) :: n real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr ! Result real ( DP ), dimension ( n ) :: x ! Internals real ( QP ), dimension (:), allocatable :: qx type ( ieee_status_type ) :: original_fpe_status logical , dimension (:), allocatable :: fpe_flag call ieee_get_status ( original_fpe_status ) ! Save the original floating point exception status call ieee_set_flag ( ieee_all , . false .) ! Set all flags to quiet allocate ( fpe_flag ( size ( ieee_usual ))) qx = solve_wbs ( ge_wpp ( real ( A , kind = QP ), real ( b , kind = QP ))) call ieee_get_flag ( ieee_usual , fpe_flag ) lerr = any ( fpe_flag ) if ( lerr . or . ( any ( abs ( qx ) > huge ( x ))) . or . ( any ( abs ( qx ) < tiny ( x )))) then x = 0.0_DP else x = real ( qx , kind = DP ) end if call ieee_set_status ( original_fpe_status ) return end function util_solve_linear_system_d module function util_solve_linear_system_q ( A , b , n , lerr ) result ( x ) !! Author: David A. Minton !! !! Solves the linear equation of the form A*x = b for x. !!   A is an (n,n) arrays !!   x and b are (n) arrays !! Uses Gaussian elimination, so will have issues if system is ill-conditioned. !! Uses quad precision intermidiate values, so works best on small arrays. use , intrinsic :: ieee_exceptions implicit none ! Arguments integer ( I4B ), intent ( in ) :: n real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr ! Result real ( QP ), dimension ( n ) :: x ! Internals type ( ieee_status_type ) :: original_fpe_status logical , dimension (:), allocatable :: fpe_flag call ieee_get_status ( original_fpe_status ) ! Save the original floating point exception status call ieee_set_flag ( ieee_all , . false .) ! Set all flags to quiet allocate ( fpe_flag ( size ( ieee_usual ))) x = solve_wbs ( ge_wpp ( A , b )) call ieee_get_flag ( ieee_usual , fpe_flag ) lerr = any ( fpe_flag ) if ( lerr ) x = 0.0_DP call ieee_set_status ( original_fpe_status ) return end function util_solve_linear_system_q function solve_wbs ( u ) result ( x ) ! solve with backward substitution !! Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran use , intrinsic :: ieee_exceptions use swiftest implicit none ! Arguments real ( QP ), intent ( in ), dimension (:,:), allocatable :: u ! Result real ( QP ), dimension (:), allocatable :: x ! Internals integer ( I4B ) :: i , n n = size ( u , 1 ) if ( allocated ( x )) deallocate ( x ) if (. not . allocated ( x )) allocate ( x ( n )) if ( any ( abs ( u ) < tiny ( 1._DP )) . or . any ( abs ( u ) > huge ( 1._DP ))) then x (:) = 0._DP return end if call ieee_set_halting_mode ( ieee_divide_by_zero , . false .) do i = n , 1 , - 1 x ( i ) = ( u ( i , n + 1 ) - sum ( u ( i , i + 1 : n ) * x ( i + 1 : n ))) / u ( i , i ) end do return end function solve_wbs function ge_wpp ( A , b ) result ( u ) ! gaussian eliminate with partial pivoting !! Solve  Ax=b  using Gaussian elimination then backwards substitution. !!   A being an n by n matrix. !!   x and b are n by 1 vectors. !! Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran use , intrinsic :: ieee_exceptions use swiftest implicit none ! Arguments real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), intent ( in ) :: b ! Result real ( QP ), dimension (:,:), allocatable :: u ! Internals integer ( I4B ) :: i , j , n , p real ( QP ) :: upi n = size ( a , 1 ) allocate ( u ( n , ( n + 1 ))) u = reshape ([ A , b ], [ n , n + 1 ]) call ieee_set_halting_mode ( ieee_divide_by_zero , . false .) do j = 1 , n p = maxloc ( abs ( u ( j : n , j )), 1 ) + j - 1 ! maxloc returns indices between (1, n - j + 1) if ( p /= j ) u ([ p , j ], j ) = u ([ j , p ], j ) u ( j + 1 :, j ) = u ( j + 1 :, j ) / u ( j , j ) do i = j + 1 , n + 1 upi = u ( p , i ) if ( p /= j ) u ([ p , j ], i ) = u ([ j , p ], i ) u ( j + 1 : n , i ) = u ( j + 1 : n , i ) - upi * u ( j + 1 : n , j ) end do end do return end function ge_wpp module function util_solve_rkf45 ( f , y0in , t1 , dt0 , tol ) result ( y1 ) !! author: David A. Minton !! !! Implements the 4th order Runge-Kutta-Fehlberg ODE solver for initial value problems of the form f=dy/dt, y0 = y(t=0), solving for y1 = y(t=t1). Uses a 5th order adaptive step size control. !! Uses a lambda function object as defined in the lambda_function module implicit none ! Arguments class ( lambda_obj ), intent ( inout ) :: f !! lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real ( DP ), dimension (:), intent ( in ) :: y0in !! Initial value at t=0 real ( DP ), intent ( in ) :: t1 !! Final time real ( DP ), intent ( in ) :: dt0 !! Initial step size guess real ( DP ), intent ( in ) :: tol !! Tolerance on solution ! Result real ( DP ), dimension (:), allocatable :: y1 !! Final result ! Internals integer ( I4B ), parameter :: MAXREDUX = 1000 !! Maximum number of times step size can be reduced real ( DP ), parameter :: DTFAC = 0.95_DP !! Step size reduction safety factor (Value just under 1.0 to prevent adaptive step size control from discarding steps too aggressively) integer ( I4B ), parameter :: RKS = 6 !! Number of RK stages real ( DP ), dimension ( RKS , RKS - 1 ), parameter :: rkf45_btab = reshape ( & !! Butcher tableau for Runge-Kutta-Fehlberg method ( / 1. / 4. , 1. / 4. , 0. , 0. , 0. , 0. ,& 3. / 8. , 3. / 3 2. , 9. / 3 2. , 0. , 0. , 0. ,& 1 2. / 1 3. , 193 2. / 219 7. , - 720 0. / 219 7. , 729 6. / 219 7. , 0. , 0. ,& 1. , 43 9. / 21 6. , - 8. , 368 0. / 51 3. , - 84 5. / 410 4. , 0. ,& 1. / 2. , - 8. / 2 7. , 2. , - 354 4. / 256 5. , 185 9. / 410 4. , - 1 1. / 4 0. / ), shape ( rkf45_btab )) real ( DP ), dimension ( RKS ), parameter :: rkf4_coeff = ( / 2 5. / 21 6. , 0. , 140 8. / 256 5. , 219 7. / 410 4. , - 1. / 5. , 0. / ) real ( DP ), dimension ( RKS ), parameter :: rkf5_coeff = ( / 1 6. / 13 5. , 0. , 665 6. / 1282 5. , 2856 1. / 5643 0. , - 9. / 5 0. , 2. / 5 5. / ) real ( DP ), dimension (:, :), allocatable :: k !! Runge-Kutta coefficient vector real ( DP ), dimension (:), allocatable :: ynorm !! Normalized y value used for adaptive step size control real ( DP ), dimension (:), allocatable :: y0 !! Value of y at the beginning of each substep integer ( I4B ) :: Nvar !! Number of variables in problem integer ( I4B ) :: rkn !! Runge-Kutta loop index real ( DP ) :: t , x1 , dt , trem !! Current time, step size and total time remaining real ( DP ) :: s , yerr , yscale !!  Step size reduction factor, error in dependent variable, and error scale factor integer ( I4B ) :: i , n allocate ( y0 , source = y0in ) allocate ( y1 , mold = y0 ) allocate ( ynorm , mold = y0 ) Nvar = size ( y0 ) allocate ( k ( Nvar , RKS )) dt = dt0 trem = t1 t = 0._DP do yscale = norm2 ( y0 (:)) do i = 1 , MAXREDUX select type ( f ) class is ( lambda_obj_tvar ) do rkn = 1 , RKS y1 (:) = y0 (:) + matmul ( k (:, 1 : rkn - 1 ), rkf45_btab ( 2 : rkn , rkn - 1 )) if ( rkn == 1 ) then x1 = t else x1 = t + rkf45_btab ( 1 , rkn - 1 ) end if k (:, rkn ) = dt * f % evalt ( y1 (:), t ) end do class is ( lambda_obj ) do rkn = 1 , RKS y1 (:) = y0 (:) + matmul ( k (:, 1 : rkn - 1 ), rkf45_btab ( 2 : rkn , rkn - 1 )) k (:, rkn ) = dt * f % eval ( y1 (:)) end do end select ! Now determine if the step size needs adjusting ynorm (:) = matmul ( k (:,:), ( rkf5_coeff (:) - rkf4_coeff (:))) / yscale yerr = norm2 ( ynorm (:)) s = ( tol / ( 2 * yerr )) ** ( 0.25_DP ) dt = min ( s * DTFAC * dt , trem ) ! Alter step size either up or down, but never bigger than the remaining time if ( s >= 1.0_DP ) exit ! Good step! if ( i == MAXREDUX ) then write ( * , * ) \"Something has gone wrong in util_solve_rkf45!! Step size reduction has gone too far this time!\" call util_exit ( FAILURE ) end if end do ! Compute new value then step ahead in time y1 (:) = y0 (:) + matmul ( k (:, :), rkf4_coeff (:)) trem = trem - dt t = t + dt if ( trem <= 0._DP ) exit y0 (:) = y1 (:) end do return end function util_solve_rkf45 end submodule s_util_solve","tags":"","loc":"sourcefile/util_solve.f90.html"},{"title":"util_set.f90 – swiftest","text":"This file depends on sourcefile~~util_set.f90~~EfferentGraph sourcefile~util_set.f90 util_set.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_set.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_set Source Code util_set.f90 Source Code submodule ( swiftest_classes ) s_util_set !! author: David A. Minton !! This submodule contains a collection of setter method implementations use swiftest contains module subroutine util_set_beg_end_pl ( self , xbeg , xend , vbeg ) !! author: David A. Minton !! !! Sets one or more of the values of xbeg, xend, and vbeg implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object real ( DP ), dimension (:,:), intent ( in ), optional :: xbeg , xend , vbeg if ( present ( xbeg )) then if ( allocated ( self % xbeg )) deallocate ( self % xbeg ) allocate ( self % xbeg , source = xbeg ) end if if ( present ( xend )) then if ( allocated ( self % xend )) deallocate ( self % xend ) allocate ( self % xend , source = xend ) end if if ( present ( vbeg )) then if ( allocated ( self % vbeg )) deallocate ( self % vbeg ) allocate ( self % vbeg , source = vbeg ) end if return end subroutine util_set_beg_end_pl module subroutine util_set_ir3h ( self ) !! author: David A. Minton !! !! Sets the inverse heliocentric radius term (1/rh**3) for all bodies in a structure implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object ! Internals integer ( I4B ) :: i real ( DP ) :: r2 , irh if ( self % nbody > 0 ) then do i = 1 , self % nbody r2 = dot_product ( self % xh (:, i ), self % xh (:, i )) irh = 1.0_DP / sqrt ( r2 ) self % ir3h ( i ) = irh / r2 end do end if return end subroutine util_set_ir3h module subroutine util_set_msys ( self ) !! author: David A. Minton !! !! Sets the value of msys and the vector mass quantities based on the total mass of the system implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nobdy system object self % Gmtot = self % cb % Gmass + sum ( self % pl % Gmass ( 1 : self % pl % nbody ), self % pl % status ( 1 : self % pl % nbody ) /= INACTIVE ) return end subroutine util_set_msys module subroutine util_set_mu_pl ( self , cb ) !! author: David A. Minton !! !! Computes G * (M + m) for each massive body implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object if ( self % nbody > 0 ) self % mu ( 1 : self % nbody ) = cb % Gmass + self % Gmass ( 1 : self % nbody ) return end subroutine util_set_mu_pl module subroutine util_set_mu_tp ( self , cb ) !! author: David A. Minton !! !! Converts certain scalar values to arrays so that they can be used in elemental functions implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object if ( self % nbody == 0 ) return self % mu ( 1 : self % nbody ) = cb % Gmass return end subroutine util_set_mu_tp module subroutine util_set_particle_info ( self , name , particle_type , status , origin_type , origin_time , origin_xh , origin_vh , discard_time , discard_xh , discard_vh , discard_body_id ) !! author: David A. Minton !! !! Sets one or more values of the particle information metadata object implicit none ! Arguments class ( swiftest_particle_info ), intent ( inout ) :: self character ( len =* ), intent ( in ), optional :: name !! Non-unique name character ( len =* ), intent ( in ), optional :: particle_type !! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character ( len =* ), intent ( in ), optional :: status !! Particle status description: ACTIVE, MERGED, FRAGMENTED, etc. character ( len =* ), intent ( in ), optional :: origin_type !! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real ( DP ), intent ( in ), optional :: origin_time !! The time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_xh !! The heliocentric distance vector at the time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_vh !! The heliocentric velocity vector at the time of the particle's formation real ( DP ), intent ( in ), optional :: discard_time !! The time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_xh !! The heliocentric distance vector at the time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_vh !! The heliocentric velocity vector at the time of the particle's discard integer ( I4B ), intent ( in ), optional :: discard_body_id !! The id of the other body involved in the discard (0 if no other body involved) ! Internals character ( len = NAMELEN ) :: lenstr character ( len = :), allocatable :: fmtlabel write ( lenstr , * ) NAMELEN fmtlabel = \"(A\" // trim ( adjustl ( lenstr )) // \")\" if ( present ( name )) then write ( self % name , fmtlabel ) trim ( adjustl ( name )) end if if ( present ( particle_type )) then write ( self % particle_type , fmtlabel ) trim ( adjustl ( particle_type )) end if if ( present ( status )) then write ( self % status , fmtlabel ) trim ( adjustl ( status )) end if if ( present ( origin_type )) then write ( self % origin_type , fmtlabel ) trim ( adjustl ( origin_type )) end if if ( present ( origin_time )) then self % origin_time = origin_time end if if ( present ( origin_xh )) then self % origin_xh (:) = origin_xh (:) end if if ( present ( origin_vh )) then self % origin_vh (:) = origin_vh (:) end if if ( present ( discard_time )) then self % discard_time = discard_time end if if ( present ( discard_xh )) then self % discard_xh (:) = discard_xh (:) end if if ( present ( discard_vh )) then self % discard_vh (:) = discard_vh (:) end if if ( present ( discard_body_id )) then self % discard_body_id = discard_body_id end if return end subroutine util_set_particle_info module subroutine util_set_rhill ( self , cb ) !! author: David A. Minton !! !! Sets the value of the Hill's radius implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object if ( self % nbody == 0 ) return call self % xv2el ( cb ) self % rhill ( 1 : self % nbody ) = self % a ( 1 : self % nbody ) * ( self % Gmass ( 1 : self % nbody ) / cb % Gmass / 3 ) ** THIRD return end subroutine util_set_rhill module subroutine util_set_rhill_approximate ( self , cb ) !! author: David A. Minton !! !! Sets the approximate value of the Hill's radius using the heliocentric radius instead of computing the semimajor axis implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals real ( DP ), dimension (:), allocatable :: rh if ( self % nbody == 0 ) return rh ( 1 : self % nbody ) = . mag . self % xh (:, 1 : self % nbody ) self % rhill ( 1 : self % nbody ) = rh ( 1 : self % nbody ) * ( self % Gmass ( 1 : self % nbody ) / cb % Gmass / 3 ) ** THIRD return end subroutine util_set_rhill_approximate end submodule s_util_set","tags":"","loc":"sourcefile/util_set.f90.html"},{"title":"util_peri.f90 – swiftest","text":"This file depends on sourcefile~~util_peri.f90~~EfferentGraph sourcefile~util_peri.f90 util_peri.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_peri.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_peri Source Code util_peri.f90 Source Code submodule ( swiftest_classes ) s_util_peri use swiftest contains module subroutine util_peri_tp ( self , system , param ) !! author: David A. Minton !! !! Determine system pericenter passages for test particles !! Note:  If the coordinate system used is barycentric, then this routine assumes that the barycentric coordinates in the !!        test particle structures are up-to-date and are not recomputed !! !! Adapted from David E. Kaufmann's Swifter routine: util_peri.f90 !! Adapted from Hal Levison's Swift routine util_peri.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: e real ( DP ), dimension (:), allocatable :: vdotr associate ( tp => self , ntp => self % nbody ) allocate ( vdotr ( ntp )) if ( param % qmin_coord == \"HELIO\" ) then do i = 1 , ntp vdotr ( i ) = dot_product ( tp % xh (:, i ), tp % vh (:, i )) if ( tp % isperi ( i ) == - 1 ) then if ( vdotr ( i ) >= 0.0_DP ) then tp % isperi ( i ) = 0 call orbel_xv2aeq ( tp % mu ( i ), tp % xh (:, i ), tp % vh (:, i ), tp % atp ( i ), e , tp % peri ( i )) end if else if ( vdotr ( i ) > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end do else do i = 1 , ntp vdotr ( i ) = dot_product ( tp % xb (:, i ), tp % vb (:, i )) if ( tp % isperi ( i ) == - 1 ) then if ( vdotr ( i ) >= 0.0_DP ) then tp % isperi ( i ) = 0 call orbel_xv2aeq ( system % Gmtot , tp % xb (:, i ), tp % vb (:, i ), tp % atp ( i ), e , tp % peri ( i )) end if else if ( vdotr ( i ) > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end do end if end associate return end subroutine util_peri_tp end submodule s_util_peri","tags":"","loc":"sourcefile/util_peri.f90.html"},{"title":"util_coord.f90 – swiftest","text":"This file depends on sourcefile~~util_coord.f90~~EfferentGraph sourcefile~util_coord.f90 util_coord.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_coord.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_coord Source Code util_coord.f90 Source Code submodule ( swiftest_classes ) s_util_coord use swiftest contains module subroutine util_coord_h2b_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 !! Adapted from Hal Levison's Swift routine coord_h2b.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i real ( DP ) :: Gmtot real ( DP ), dimension ( NDIM ) :: xtmp , vtmp if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) Gmtot = cb % Gmass xtmp (:) = 0.0_DP vtmp (:) = 0.0_DP do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle Gmtot = Gmtot + pl % Gmass ( i ) xtmp (:) = xtmp (:) + pl % Gmass ( i ) * pl % xh (:, i ) vtmp (:) = vtmp (:) + pl % Gmass ( i ) * pl % vh (:, i ) end do cb % xb (:) = - xtmp (:) / Gmtot cb % vb (:) = - vtmp (:) / Gmtot do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle pl % xb (:, i ) = pl % xh (:, i ) + cb % xb (:) pl % vb (:, i ) = pl % vh (:, i ) + cb % vb (:) end do end associate return end subroutine util_coord_h2b_pl module subroutine util_coord_h2b_tp ( self , cb ) !! author: David A. Minton !! !! Convert test particles from heliocentric to barycentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 !! Adapted from Hal Levison's Swift routine coord_h2b_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % status ( i ) /= INACTIVE ) tp % xb (:, i ) = tp % xh (:, i ) + cb % xb (:) tp % vb (:, i ) = tp % vh (:, i ) + cb % vb (:) end do end associate return end subroutine util_coord_h2b_tp module subroutine util_coord_b2h_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_b2h.f90 !! Adapted from Hal Levison's Swift routine coord_b2h.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) do concurrent ( i = 1 : npl , pl % status ( i ) /= INACTIVE ) pl % xh (:, i ) = pl % xb (:, i ) - cb % xb (:) pl % vh (:, i ) = pl % vb (:, i ) - cb % vb (:) end do end associate return end subroutine util_coord_b2h_pl module subroutine util_coord_b2h_tp ( self , cb ) !! author: David A. Minton !! !! Convert test particles from barycentric to heliocentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_b2h_tp.f90 !! Adapted from Hal Levison's Swift routine coord_b2h_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % status ( i ) /= INACTIVE ) tp % xh (:, i ) = tp % xb (:, i ) - cb % xb (:) tp % vh (:, i ) = tp % vb (:, i ) - cb % vb (:) end do end associate return end subroutine util_coord_b2h_tp module subroutine util_coord_vb2vh_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from barycentric to heliocentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vb2vh.f90 !! Adapted from Hal Levison's Swift routine coord_vb2vh.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) do i = 1 , NDIM cb % vb ( i ) = - sum ( pl % Gmass ( 1 : npl ) * pl % vb ( i , 1 : npl )) / cb % Gmass pl % vh ( i , 1 : npl ) = pl % vb ( i , 1 : npl ) - cb % vb ( i ) end do end associate return end subroutine util_coord_vb2vh_pl module subroutine util_coord_vb2vh_tp ( self , vbcb ) !! author: David A. Minton !! !! Convert test particles from barycentric to heliocentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vb2vh_tp.f90 !! Adapted from Hal Levison's Swift routine coord_vb2h_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) where ( tp % lmask ( 1 : ntp )) tp % vh ( 1 , 1 : ntp ) = tp % vb ( 1 , 1 : ntp ) - vbcb ( 1 ) tp % vh ( 2 , 1 : ntp ) = tp % vb ( 2 , 1 : ntp ) - vbcb ( 2 ) tp % vh ( 3 , 1 : ntp ) = tp % vb ( 3 , 1 : ntp ) - vbcb ( 3 ) end where end associate return end subroutine util_coord_vb2vh_tp module subroutine util_coord_vh2vb_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from heliocentric to barycentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vh2vb.f90 !! Adapted from Hal Levison's Swift routine coord_vh2b.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i real ( DP ) :: Gmtot if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) Gmtot = cb % Gmass + sum ( pl % Gmass ( 1 : npl )) do i = 1 , NDIM cb % vb ( i ) = - sum ( pl % Gmass ( 1 : npl ) * pl % vh ( i , 1 : npl )) / Gmtot pl % vb ( i , 1 : npl ) = pl % vh ( i , 1 : npl ) + cb % vb ( i ) end do end associate return end subroutine util_coord_vh2vb_pl module subroutine util_coord_vh2vb_tp ( self , vbcb ) !! author: David A. Minton !! !! Convert test particles from heliocentric to barycentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vh2vb_tp.f90 !! Adapted from Hal Levison's Swift routine coord_vh2b_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) where ( tp % lmask ( 1 : ntp )) tp % vb ( 1 , 1 : ntp ) = tp % vh ( 1 , 1 : ntp ) + vbcb ( 1 ) tp % vb ( 2 , 1 : ntp ) = tp % vh ( 2 , 1 : ntp ) + vbcb ( 2 ) tp % vb ( 3 , 1 : ntp ) = tp % vh ( 3 , 1 : ntp ) + vbcb ( 3 ) end where end associate return end subroutine util_coord_vh2vb_tp module subroutine util_coord_xh2xb_pl ( self , cb ) !! author: David A. Minton !! !! Convert position vectors of massive bodies from heliocentric to barycentric coordinates (position only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 !! Adapted from Hal Levison's Swift routine coord_h2b.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i real ( DP ) :: Gmtot real ( DP ), dimension ( NDIM ) :: xtmp if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) Gmtot = cb % Gmass xtmp (:) = 0.0_DP do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle Gmtot = Gmtot + pl % Gmass ( i ) xtmp (:) = xtmp (:) + pl % Gmass ( i ) * pl % xh (:, i ) end do cb % xb (:) = - xtmp (:) / Gmtot do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle pl % xb (:, i ) = pl % xh (:, i ) + cb % xb (:) end do end associate return end subroutine util_coord_xh2xb_pl module subroutine util_coord_xh2xb_tp ( self , cb ) !! author: David A. Minton !! !! Convert test particles from heliocentric to barycentric coordinates (position only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 !! Adapted from Hal Levison's Swift routine coord_h2b_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % status ( i ) /= INACTIVE ) tp % xb (:, i ) = tp % xh (:, i ) + cb % xb (:) end do end associate return end subroutine util_coord_xh2xb_tp end submodule s_util_coord","tags":"","loc":"sourcefile/util_coord.f90.html"},{"title":"util_index.f90 – swiftest","text":"This file depends on sourcefile~~util_index.f90~~EfferentGraph sourcefile~util_index.f90 util_index.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_index.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_index Source Code util_index.f90 Source Code submodule ( swiftest_classes ) s_util_index use swiftest contains module subroutine util_index_eucl_plpl ( self , param ) !! author: Jacob R. Elliott and David A. Minton !! !! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions. !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I8B ) :: i , j , counter , npl npl = int ( self % nbody , kind = I8B ) associate ( nplpl => self % nplpl ) nplpl = ( npl * ( npl - 1 ) / 2 ) ! number of entries in a strict lower triangle, npl x npl, minus first column if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) ! Reset the index array if it's been set previously allocate ( self % k_plpl ( 2 , nplpl )) do i = 1_I8B , npl counter = ( i - 1_I8B ) * npl - i * ( i - 1_I8B ) / 2_I8B + 1_I8B do j = i + 1_I8B , npl self % k_plpl ( 1 , counter ) = i self % k_plpl ( 2 , counter ) = j counter = counter + 1_I8B end do end do end associate return end subroutine util_index_eucl_plpl module subroutine util_index_eucl_pltp ( self , pl , param ) !! author: Jacob R. Elliott and David A. Minton !! !! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I8B ) :: i , j , counter , npl , ntp ntp = int ( self % nbody , kind = I8B ) npl = int ( pl % nbody , kind = I8B ) associate ( npltp => self % npltp ) npltp = npl * ntp if ( allocated ( self % k_pltp )) deallocate ( self % k_pltp ) ! Reset the index array if it's been set previously allocate ( self % k_pltp ( 2 , npltp )) do i = 1_I8B , npl counter = ( i - 1_I8B ) * npl + 1_I8B do j = 1_I8B , ntp self % k_pltp ( 1 , counter ) = i self % k_pltp ( 2 , counter ) = j counter = counter + 1_I8B end do end do end associate return end subroutine util_index_eucl_pltp end submodule s_util_index","tags":"","loc":"sourcefile/util_index.f90.html"},{"title":"util_rescale.f90 – swiftest","text":"This file depends on sourcefile~~util_rescale.f90~~EfferentGraph sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_rescale.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_rescale Source Code util_rescale.f90 Source Code submodule ( swiftest_classes ) s_util_rescale use swiftest contains module subroutine util_rescale_system ( self , param , mscale , dscale , tscale ) !! author: David A. Minton !! !! Rescales an nbody system to a new set of units. Inputs are the multipliers on the mass (mscale), distance (dscale), and time units (tscale). !! Rescales all united quantities in the system, as well as the mass conversion factors, gravitational constant, and Einstein's constant in the parameter object. implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters. Returns with new values of the scale vactors and GU real ( DP ), intent ( in ) :: mscale , dscale , tscale !! Scale factors for mass, distance, and time units, respectively. ! Internals real ( DP ) :: vscale param % MU2KG = param % MU2KG * mscale param % DU2M = param % DU2M * dscale param % TU2S = param % TU2S * tscale ! Calculate the G for the system units param % GU = GC / ( param % DU2M ** 3 / ( param % MU2KG * param % TU2S ** 2 )) if ( param % lgr ) then ! Calculate the inverse speed of light in the system units param % inv_c2 = einsteinC * param % TU2S / param % DU2M param % inv_c2 = ( param % inv_c2 ) ** ( - 2 ) end if vscale = dscale / tscale associate ( cb => self % cb , pl => self % pl , npl => self % pl % nbody , tp => self % tp , ntp => self % tp % nbody ) cb % mass = cb % mass / mscale cb % Gmass = param % GU * cb % mass cb % radius = cb % radius / dscale cb % xb (:) = cb % xb (:) / dscale cb % vb (:) = cb % vb (:) / vscale cb % rot (:) = cb % rot (:) * tscale pl % mass ( 1 : npl ) = pl % mass ( 1 : npl ) / mscale pl % Gmass ( 1 : npl ) = param % GU * pl % mass ( 1 : npl ) pl % radius ( 1 : npl ) = pl % radius ( 1 : npl ) / dscale pl % xh (:, 1 : npl ) = pl % xh (:, 1 : npl ) / dscale pl % vh (:, 1 : npl ) = pl % vh (:, 1 : npl ) / vscale pl % xb (:, 1 : npl ) = pl % xb (:, 1 : npl ) / dscale pl % vb (:, 1 : npl ) = pl % vb (:, 1 : npl ) / vscale pl % rot (:, 1 : npl ) = pl % rot (:, 1 : npl ) * tscale end associate return end subroutine util_rescale_system end submodule s_util_rescale","tags":"","loc":"sourcefile/util_rescale.f90.html"},{"title":"util_version.f90 – swiftest","text":"This file depends on sourcefile~~util_version.f90~~EfferentGraph sourcefile~util_version.f90 util_version.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_version.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_version Source Code util_version.f90 Source Code submodule ( swiftest_classes ) s_util_version use swiftest contains module subroutine util_version () !! author: David A. Minton !! !! Print program version information to terminale !! !! Adapted from David E. Kaufmann's Swifter routine: util_version.f90 implicit none write ( * , 200 ) VERSION_NUMBER 200 format ( / , \"************* Swiftest: Version \" , f3 . 1 , \" *************\" , // , & \"Based off of Swifter:\" , // , & \"Authors:\" , // , & \"    The Purdue University Swiftest Development team \" , / , & \"    Lead by David A. Minton \" , / , & \"    Single loop blocking by Jacob R. Elliott\" , / , & \"    Fragmentation by Carlisle A. Wishard and\" , // , & \"    Jennifer L. L. Poutplin                 \" , // , & \"Please address comments and questions to:\" , // , & \"    David A. Minton\" , / , & \"    Department Earth, Atmospheric, & Planetary Sciences \" , / , & \"    Purdue University\" , / , & \"    550 Stadium Mall Drive\" , / , & \"    West Lafayette, Indiana 47907\" , / , & \"    765-250-8034 \" , / , & \"    daminton@purdue.edu\" , / , & \"Special thanks to Hal Levison and Martin Duncan for the original\" , / ,& \"SWIFTER and SWIFT codes that made this possible.\" , // , & \"************************************************\" , / ) 100 FORMAT ( / , \"************* SWIFTER: Version \" , F3 . 1 , \" *************\" , // , & \"Authors:\" , // , & \"    Martin Duncan: Queen's University\" , / , & \"    Hal Levison  : Southwest Research Institute\" , // , & \"Please address comments and questions to:\" , // , & \"    Hal Levison or David Kaufmann\" , / , & \"    Department of Space Studies\" , / , & \"    Southwest Research Institute\" , / , & \"    1050 Walnut Street, Suite 400\" , / , & \"    Boulder, Colorado  80302\" , / , & \"    303-546-0290 (HFL), 720-240-0119 (DEK)\" , / , & \"    303-546-9687 (fax)\" , / , & \"    hal@gort.boulder.swri.edu (HFL)\" , / , & \"    kaufmann@boulder.swri.edu (DEK)\" , // , & \"************************************************\" , / ) return end subroutine util_version end submodule s_util_version","tags":"","loc":"sourcefile/util_version.f90.html"},{"title":"util_sort.f90 – swiftest","text":"This file depends on sourcefile~~util_sort.f90~~EfferentGraph sourcefile~util_sort.f90 util_sort.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_sort.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_sort Source Code util_sort.f90 Source Code submodule ( swiftest_classes ) s_util_sort use swiftest contains module subroutine util_sort_body ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a Swiftest body structure in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( body => self , n => self % nbody ) allocate ( ind ( n )) select case ( sortby ) case ( \"id\" ) call util_sort ( direction * body % id ( 1 : n ), ind ( 1 : n )) case ( \"status\" ) call util_sort ( direction * body % status ( 1 : n ), ind ( 1 : n )) case ( \"ir3h\" ) call util_sort ( direction * body % ir3h ( 1 : n ), ind ( 1 : n )) case ( \"a\" ) call util_sort ( direction * body % a ( 1 : n ), ind ( 1 : n )) case ( \"e\" ) call util_sort ( direction * body % e ( 1 : n ), ind ( 1 : n )) case ( \"inc\" ) call util_sort ( direction * body % inc ( 1 : n ), ind ( 1 : n )) case ( \"capom\" ) call util_sort ( direction * body % capom ( 1 : n ), ind ( 1 : n )) case ( \"mu\" ) call util_sort ( direction * body % mu ( 1 : n ), ind ( 1 : n )) case ( \"lfirst\" , \"nbody\" , \"ldiscard\" , \"xh\" , \"vh\" , \"xb\" , \"vb\" , \"ah\" , \"aobl\" , \"atide\" , \"agr\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not found!' return end select call body % rearrange ( ind ) end associate return end subroutine util_sort_body module subroutine util_sort_dp ( arr ) !! author: David A. Minton !! !! Sort input double precision array in place into ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments real ( DP ), dimension (:), intent ( inout ) :: arr ! Internals real ( DP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) do i = 2 , n tmp = arr ( i ) do j = i - 1 , 1 , - 1 if ( arr ( j ) <= tmp ) exit arr ( j + 1 ) = arr ( j ) end do arr ( j + 1 ) = tmp end do return end subroutine util_sort_dp module subroutine util_sort_index_dp ( arr , ind ) !! author: David A. Minton !! !! Sort input double precision array by index in ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind ! Internals real ( DP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) ind = [( i , i = 1 , n )] do i = 2 , n tmp = arr ( ind ( i )) do j = i - 1 , 1 , - 1 if ( arr ( ind ( j )) <= tmp ) exit ind ( j + 1 ) = ind ( j ) end do ind ( j + 1 ) = i end do return end subroutine util_sort_index_dp module subroutine util_sort_i4b ( arr ) !! author: David A. Minton !! !! Sort input integer array in place into ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments integer ( I4B ), dimension (:), intent ( inout ) :: arr ! Internals integer ( I4B ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) do i = 2 , n tmp = arr ( i ) do j = i - 1 , 1 , - 1 if ( arr ( j ) <= tmp ) exit arr ( j + 1 ) = arr ( j ) end do arr ( j + 1 ) = tmp end do return end subroutine util_sort_i4b module subroutine util_sort_index_i4b ( arr , ind ) !! author: David A. Minton !! !! Sort input integer array by index in ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments integer ( I4B ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind ! Internals integer ( I4B ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) ind = [( i , i = 1 , n )] do i = 2 , n tmp = arr ( ind ( i )) do j = i - 1 , 1 , - 1 if ( arr ( ind ( j )) <= tmp ) exit ind ( j + 1 ) = ind ( j ) end do ind ( j + 1 ) = i end do return end subroutine util_sort_index_i4b module subroutine util_sort_sp ( arr ) !! author: David A. Minton !! !! Sort input single precision array in place into ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) ! implicit none ! Arguments real ( SP ), dimension (:), intent ( inout ) :: arr ! Internals real ( SP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) do i = 2 , n tmp = arr ( i ) do j = i - 1 , 1 , - 1 if ( arr ( j ) <= tmp ) exit arr ( j + 1 ) = arr ( j ) end do arr ( j + 1 ) = tmp end do return end subroutine util_sort_sp module subroutine util_sort_index_sp ( arr , ind ) !! author: David A. Minton !! !! Sort input single precision array by index in ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments real ( SP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind ! Internals real ( SP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) ind = [( i , i = 1 , n )] do i = 2 , n tmp = arr ( ind ( i )) do j = i - 1 , 1 , - 1 if ( arr ( ind ( j )) <= tmp ) exit ind ( j + 1 ) = ind ( j ) end do ind ( j + 1 ) = i end do return end subroutine util_sort_index_sp module subroutine util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a Swiftest massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"Gmass\" , \"mass\" ) call util_sort ( direction * pl % Gmass ( 1 : npl ), ind ( 1 : npl )) case ( \"rhill\" ) call util_sort ( direction * pl % rhill ( 1 : npl ), ind ( 1 : npl )) case ( \"radius\" ) call util_sort ( direction * pl % radius ( 1 : npl ), ind ( 1 : npl )) case ( \"density\" ) call util_sort ( direction * pl % density ( 1 : npl ), ind ( 1 : npl )) case ( \"k2\" ) call util_sort ( direction * pl % k2 ( 1 : npl ), ind ( 1 : npl )) case ( \"Q\" ) call util_sort ( direction * pl % Q ( 1 : npl ), ind ( 1 : npl )) case ( \"tlag\" ) call util_sort ( direction * pl % tlag ( 1 : npl ), ind ( 1 : npl )) case ( \"xbeg\" , \"xend\" , \"vbeg\" , \"Ip\" , \"rot\" , \"k_plpl\" , \"nplpl\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call util_sort_body ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine util_sort_pl module subroutine util_sort_tp ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a Swiftest test particle object  in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( tp => self , ntp => self % nbody ) allocate ( ind ( ntp )) select case ( sortby ) case ( \"peri\" ) call util_sort ( direction * tp % peri ( 1 : ntp ), ind ( 1 : ntp )) case ( \"atp\" ) call util_sort ( direction * tp % atp ( 1 : ntp ), ind ( 1 : ntp )) case ( \"isperi\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call util_sort_body ( tp , sortby , ascending ) return end select call tp % rearrange ( ind ) end associate return end subroutine util_sort_tp module subroutine util_sort_rearrange_body ( self , ind ) !! author: David A. Minton !! !! Rearrange Swiftest body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( n => self % nbody ) call util_sort_rearrange ( self % id , ind , n ) call util_sort_rearrange ( self % info , ind , n ) call util_sort_rearrange ( self % status , ind , n ) call util_sort_rearrange ( self % ldiscard , ind , n ) call util_sort_rearrange ( self % xh , ind , n ) call util_sort_rearrange ( self % vh , ind , n ) call util_sort_rearrange ( self % xb , ind , n ) call util_sort_rearrange ( self % vb , ind , n ) call util_sort_rearrange ( self % ah , ind , n ) call util_sort_rearrange ( self % ir3h , ind , n ) call util_sort_rearrange ( self % mu , ind , n ) call util_sort_rearrange ( self % lmask , ind , n ) call util_sort_rearrange ( self % a , ind , n ) call util_sort_rearrange ( self % e , ind , n ) call util_sort_rearrange ( self % inc , ind , n ) call util_sort_rearrange ( self % capom , ind , n ) call util_sort_rearrange ( self % omega , ind , n ) call util_sort_rearrange ( self % capm , ind , n ) call util_sort_rearrange ( self % aobl , ind , n ) call util_sort_rearrange ( self % atide , ind , n ) call util_sort_rearrange ( self % agr , ind , n ) end associate return end subroutine util_sort_rearrange_body module subroutine util_sort_rearrange_arr_char_string ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of character string in-place from an index list. implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals character ( len = STRMAX ), dimension (:), allocatable :: tmp !! Temporary copy of arry used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_char_string module subroutine util_sort_rearrange_arr_DP ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of DP type in-place from an index list. implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals real ( DP ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_DP module subroutine util_sort_rearrange_arr_DPvec ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of (NDIM,n) DP-type vectors in-place from an index list. implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals real ( DP ), dimension (:,:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp (:, 1 : n ) = arr (:, ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_DPvec module subroutine util_sort_rearrange_arr_I4B ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of integers in-place from an index list. implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals integer ( I4B ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_I4B module subroutine util_sort_rearrange_arr_logical ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of logicals in-place from an index list. implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals logical , dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_logical module subroutine util_sort_rearrange_arr_info ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of particle information type in-place from an index list. implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals type ( swiftest_particle_info ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation integer ( I4B ) :: i if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) call util_copy_particle_info_arr ( arr , tmp , ind ) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_info module subroutine util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange Swiftest massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % mass , ind , npl ) call util_sort_rearrange ( pl % Gmass , ind , npl ) call util_sort_rearrange ( pl % rhill , ind , npl ) call util_sort_rearrange ( pl % xbeg , ind , npl ) call util_sort_rearrange ( pl % vbeg , ind , npl ) call util_sort_rearrange ( pl % radius , ind , npl ) call util_sort_rearrange ( pl % density , ind , npl ) call util_sort_rearrange ( pl % Ip , ind , npl ) call util_sort_rearrange ( pl % rot , ind , npl ) call util_sort_rearrange ( pl % k2 , ind , npl ) call util_sort_rearrange ( pl % Q , ind , npl ) call util_sort_rearrange ( pl % tlag , ind , npl ) if ( allocated ( pl % k_plpl )) deallocate ( pl % k_plpl ) call util_sort_rearrange_body ( pl , ind ) end associate return end subroutine util_sort_rearrange_pl module subroutine util_sort_rearrange_tp ( self , ind ) !! author: David A. Minton !! !! Rearrange Swiftest massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( tp => self , ntp => self % nbody ) call util_sort_rearrange ( tp % isperi , ind , ntp ) call util_sort_rearrange ( tp % peri , ind , ntp ) call util_sort_rearrange ( tp % atp , ind , ntp ) call util_sort_rearrange_body ( tp , ind ) end associate return end subroutine util_sort_rearrange_tp end submodule s_util_sort","tags":"","loc":"sourcefile/util_sort.f90.html"},{"title":"util_spill.f90 – swiftest","text":"This file depends on sourcefile~~util_spill.f90~~EfferentGraph sourcefile~util_spill.f90 util_spill.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_spill.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_spill Source Code util_spill.f90 Source Code submodule ( swiftest_classes ) s_util_spill use swiftest contains module subroutine util_spill_arr_char_string ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type character strings !! This is the inverse of a spill operation implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist character ( len = STRMAX ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_char_string module subroutine util_spill_arr_DP ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type DP !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist real ( DP ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_DP module subroutine util_spill_arr_DPvec ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of DP vectors with shape (NDIM, n) !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: discards !! Array discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i , nspill , nkeep , nlist real ( DP ), dimension (:,:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( NDIM , nspill )) else if ( size ( discards , dim = 2 ) /= nspill ) then deallocate ( discards ) allocate ( discards ( NDIM , nspill )) end if do i = 1 , NDIM discards ( i ,:) = pack ( keeps ( i , 1 : nlist ), lspill_list ( 1 : nlist )) end do if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( NDIM , nkeep )) do i = 1 , NDIM tmp ( i , :) = pack ( keeps ( i , 1 : nlist ), . not . lspill_list ( 1 : nlist )) end do call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_DPvec module subroutine util_spill_arr_I4B ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type I4B !! This is the inverse of a spill operation implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist integer ( I4B ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_I4B module subroutine util_spill_arr_I8B ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type I4B !! This is the inverse of a spill operation implicit none ! Arguments integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist integer ( I8B ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_I8B module subroutine util_spill_arr_info ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of particle origin information types !! This is the inverse of a spill operation implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i , nspill , nkeep , nlist integer ( I4B ), dimension (:), allocatable :: idx type ( swiftest_particle_info ), dimension (:), allocatable :: tmp nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if allocate ( idx ( nspill )) idx (:) = pack ([( i , i = 1 , nlist )], lspill_list ) call util_copy_particle_info_arr ( keeps , discards , idx ) if ( ldestructive ) then if ( nkeep > 0 ) then deallocate ( idx ) allocate ( idx ( nkeep )) allocate ( tmp ( nkeep )) idx (:) = pack ([( i , i = 1 , nlist )], . not . lspill_list ) call util_copy_particle_info_arr ( keeps , tmp , idx ) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_info module subroutine util_spill_arr_logical ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of logicals !! This is the inverse of a spill operation implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or no ! Internals integer ( I4B ) :: nspill , nkeep , nlist logical , dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_logical module subroutine util_spill_body ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest generic particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! Internals integer ( I4B ) :: nbody_old ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Spill all the common components associate ( keeps => self ) call util_spill ( keeps % id , discards % id , lspill_list , ldestructive ) call util_spill ( keeps % info , discards % info , lspill_list , ldestructive ) call util_spill ( keeps % status , discards % status , lspill_list , ldestructive ) call util_spill ( keeps % lmask , discards % lmask , lspill_list , ldestructive ) call util_spill ( keeps % ldiscard , discards % ldiscard , lspill_list , ldestructive ) call util_spill ( keeps % mu , discards % mu , lspill_list , ldestructive ) call util_spill ( keeps % xh , discards % xh , lspill_list , ldestructive ) call util_spill ( keeps % vh , discards % vh , lspill_list , ldestructive ) call util_spill ( keeps % xb , discards % xb , lspill_list , ldestructive ) call util_spill ( keeps % vb , discards % vb , lspill_list , ldestructive ) call util_spill ( keeps % ah , discards % ah , lspill_list , ldestructive ) call util_spill ( keeps % aobl , discards % aobl , lspill_list , ldestructive ) call util_spill ( keeps % agr , discards % agr , lspill_list , ldestructive ) call util_spill ( keeps % atide , discards % atide , lspill_list , ldestructive ) call util_spill ( keeps % a , discards % a , lspill_list , ldestructive ) call util_spill ( keeps % e , discards % e , lspill_list , ldestructive ) call util_spill ( keeps % inc , discards % inc , lspill_list , ldestructive ) call util_spill ( keeps % capom , discards % capom , lspill_list , ldestructive ) call util_spill ( keeps % omega , discards % omega , lspill_list , ldestructive ) call util_spill ( keeps % capm , discards % capm , lspill_list , ldestructive ) nbody_old = keeps % nbody ! This is the base class, so will be the last to be called in the cascade. ! Therefore we need to set the nbody values for both the keeps and discareds discards % nbody = count ( lspill_list ( 1 : nbody_old )) if ( ldestructive ) keeps % nbody = nbody_old - discards % nbody end associate return end subroutine util_spill_body module subroutine util_spill_encounter ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest encounter structure from active list to discard list implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! Internals integer ( I4B ) :: nenc_old associate ( keeps => self ) call util_spill ( keeps % lvdotr , discards % lvdotr , lspill_list , ldestructive ) call util_spill ( keeps % status , discards % status , lspill_list , ldestructive ) call util_spill ( keeps % kidx , discards % kidx , lspill_list , ldestructive ) call util_spill ( keeps % index1 , discards % index1 , lspill_list , ldestructive ) call util_spill ( keeps % index2 , discards % index2 , lspill_list , ldestructive ) call util_spill ( keeps % id1 , discards % id1 , lspill_list , ldestructive ) call util_spill ( keeps % id2 , discards % id2 , lspill_list , ldestructive ) call util_spill ( keeps % x1 , discards % x1 , lspill_list , ldestructive ) call util_spill ( keeps % x2 , discards % x2 , lspill_list , ldestructive ) call util_spill ( keeps % v1 , discards % v1 , lspill_list , ldestructive ) call util_spill ( keeps % v2 , discards % v2 , lspill_list , ldestructive ) call util_spill ( keeps % t , discards % t , lspill_list , ldestructive ) nenc_old = keeps % nenc ! This is the base class, so will be the last to be called in the cascade. ! Therefore we need to set the nenc values for both the keeps and discareds discards % nenc = count ( lspill_list ( 1 : nenc_old )) if ( ldestructive ) keeps % nenc = nenc_old - discards % nenc end associate return end subroutine util_spill_encounter module subroutine util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest massive body structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list associate ( keeps => self ) select type ( discards ) ! The standard requires us to select the type of both arguments in order to access all the components class is ( swiftest_pl ) !> Spill components specific to the massive body class call util_spill ( keeps % mass , discards % mass , lspill_list , ldestructive ) call util_spill ( keeps % Gmass , discards % Gmass , lspill_list , ldestructive ) call util_spill ( keeps % rhill , discards % rhill , lspill_list , ldestructive ) call util_spill ( keeps % radius , discards % radius , lspill_list , ldestructive ) call util_spill ( keeps % density , discards % density , lspill_list , ldestructive ) call util_spill ( keeps % k2 , discards % k2 , lspill_list , ldestructive ) call util_spill ( keeps % Q , discards % Q , lspill_list , ldestructive ) call util_spill ( keeps % tlag , discards % tlag , lspill_list , ldestructive ) call util_spill ( keeps % xbeg , discards % xbeg , lspill_list , ldestructive ) call util_spill ( keeps % vbeg , discards % vbeg , lspill_list , ldestructive ) call util_spill ( keeps % Ip , discards % Ip , lspill_list , ldestructive ) call util_spill ( keeps % rot , discards % rot , lspill_list , ldestructive ) if ( ldestructive . and . allocated ( keeps % k_plpl )) deallocate ( keeps % k_plpl ) call util_spill_body ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) 'Error! spill method called for incompatible return type on swiftest_pl' end select end associate return end subroutine util_spill_pl module subroutine util_spill_tp ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest test particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardse logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list associate ( keeps => self , ntp => self % nbody ) select type ( discards ) class is ( swiftest_tp ) !> Spill components specific to the test particle class call util_spill ( keeps % isperi , discards % isperi , lspill_list , ldestructive ) call util_spill ( keeps % peri , discards % peri , lspill_list , ldestructive ) call util_spill ( keeps % atp , discards % atp , lspill_list , ldestructive ) call util_spill_body ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) 'Error! spill method called for incompatible return type on swiftest_tp' end select end associate return end subroutine util_spill_tp end submodule s_util_spill","tags":"","loc":"sourcefile/util_spill.f90.html"},{"title":"util_valid.f90 – swiftest","text":"This file depends on sourcefile~~util_valid.f90~~EfferentGraph sourcefile~util_valid.f90 util_valid.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_valid.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_valid Source Code util_valid.f90 Source Code submodule ( swiftest_classes ) s_util_valid use swiftest contains module subroutine util_valid_id_system ( self , param ) !! author: David A. Minton !! !! Validate massive body and test particle ids !! Subroutine causes program to exit with error if any ids are not unique !! !! Adapted from David E. Kaufmann's Swifter routine: util_valid.f90 implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i integer ( I4B ), dimension (:), allocatable :: idarr associate ( cb => self % cb , pl => self % pl , npl => self % pl % nbody , tp => self % tp , ntp => self % tp % nbody ) allocate ( idarr ( 1 + npl + ntp )) idarr ( 1 ) = cb % id do i = 1 , npl idarr ( 1 + i ) = pl % id ( i ) end do do i = 1 , ntp idarr ( 1 + npl + i ) = tp % id ( i ) end do call util_sort ( idarr ) do i = 1 , npl + ntp if ( idarr ( i ) == idarr ( i + 1 )) then write ( * , * ) \"Swiftest error:\" write ( * , * ) \"   more than one body/particle has id = \" , idarr ( i ) call util_exit ( FAILURE ) end if end do param % maxid = max ( param % maxid , maxval ( idarr )) end associate return end subroutine util_valid_id_system end submodule s_util_valid","tags":"","loc":"sourcefile/util_valid.f90.html"},{"title":"util_exit.f90 – swiftest","text":"This file depends on sourcefile~~util_exit.f90~~EfferentGraph sourcefile~util_exit.f90 util_exit.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_exit.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_exit Source Code util_exit.f90 Source Code submodule ( swiftest_classes ) s_util_exit use swiftest contains module subroutine util_exit ( code ) !! author: David A. Minton !! !! Print termination message and exit program !! !! Adapted from David E. Kaufmann's Swifter routine: util_exit.f90 !! Adapted from Hal Levison's Swift routine util_exit.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: code ! Internals character ( * ), parameter :: BAR = '(\"------------------------------------------------\")' select case ( code ) case ( SUCCESS ) write ( * , SUCCESS_MSG ) VERSION_NUMBER write ( * , BAR ) case ( USAGE ) write ( * , USAGE_MSG ) case ( HELP ) write ( * , HELP_MSG ) case default write ( * , FAIL_MSG ) VERSION_NUMBER write ( * , BAR ) error stop end select stop end subroutine util_exit end submodule s_util_exit","tags":"","loc":"sourcefile/util_exit.f90.html"},{"title":"util_fill.f90 – swiftest","text":"This file depends on sourcefile~~util_fill.f90~~EfferentGraph sourcefile~util_fill.f90 util_fill.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_fill.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_fill Source Code util_fill.f90 Source Code submodule ( swiftest_classes ) s_util_fill use swiftest contains module subroutine util_fill_arr_char_string ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of type character strings !! This is the inverse of a spill operation implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_char_string module subroutine util_fill_arr_DP ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of type DP !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_DP module subroutine util_fill_arr_DPvec ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of DP vectors with shape (NDIM, n) !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return do i = 1 , NDIM keeps ( i ,:) = unpack ( keeps ( i ,:), . not . lfill_list (:), keeps ( i ,:)) keeps ( i ,:) = unpack ( inserts ( i ,:), lfill_list (:), keeps ( i ,:)) end do return end subroutine util_fill_arr_DPvec module subroutine util_fill_arr_I4B ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of type I4B !! This is the inverse of a spill operation implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_I4B module subroutine util_fill_arr_info ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of particle origin information types !! This is the inverse of a spill operation implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ), dimension (:), allocatable :: insert_idx integer ( I4B ) :: i , nkeep , ninsert if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return nkeep = size ( keeps ) ninsert = count ( lfill_list ) allocate ( insert_idx ( ninsert )) insert_idx (:) = pack ([( i , i = 1 , nkeep )], lfill_list ) call util_copy_particle_info_arr ( inserts , keeps , insert_idx ) return end subroutine util_fill_arr_info module subroutine util_fill_arr_logical ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of logicals !! This is the inverse of a spill operation implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_logical module subroutine util_fill_body ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new Swiftest generic particle structure into an old one. !! This is the inverse of a spill operation. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! internals integer ( I4B ) :: i ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Fill all the common components associate ( keeps => self ) call util_fill ( keeps % id , inserts % id , lfill_list ) call util_fill ( keeps % info , inserts % info , lfill_list ) call util_fill ( keeps % status , inserts % status , lfill_list ) call util_fill ( keeps % ldiscard , inserts % ldiscard , lfill_list ) call util_fill ( keeps % lmask , inserts % lmask , lfill_list ) call util_fill ( keeps % mu , inserts % mu , lfill_list ) call util_fill ( keeps % xh , inserts % xh , lfill_list ) call util_fill ( keeps % vh , inserts % vh , lfill_list ) call util_fill ( keeps % xb , inserts % xb , lfill_list ) call util_fill ( keeps % vb , inserts % vb , lfill_list ) call util_fill ( keeps % ah , inserts % ah , lfill_list ) call util_fill ( keeps % aobl , inserts % aobl , lfill_list ) call util_fill ( keeps % agr , inserts % agr , lfill_list ) call util_fill ( keeps % atide , inserts % atide , lfill_list ) call util_fill ( keeps % a , inserts % a , lfill_list ) call util_fill ( keeps % e , inserts % e , lfill_list ) call util_fill ( keeps % inc , inserts % inc , lfill_list ) call util_fill ( keeps % capom , inserts % capom , lfill_list ) call util_fill ( keeps % omega , inserts % omega , lfill_list ) call util_fill ( keeps % capm , inserts % capm , lfill_list ) ! This is the base class, so will be the last to be called in the cascade. keeps % nbody = size ( keeps % id (:)) end associate return end subroutine util_fill_body module subroutine util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new Swiftest massive body structure into an old one. !! This is the inverse of a spill operation. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( inserts ) ! The standard requires us to select the type of both arguments in order to access all the components class is ( swiftest_pl ) !> Fill components specific to the massive body class call util_fill ( keeps % mass , inserts % mass , lfill_list ) call util_fill ( keeps % Gmass , inserts % Gmass , lfill_list ) call util_fill ( keeps % rhill , inserts % rhill , lfill_list ) call util_fill ( keeps % radius , inserts % radius , lfill_list ) call util_fill ( keeps % density , inserts % density , lfill_list ) call util_fill ( keeps % k2 , inserts % k2 , lfill_list ) call util_fill ( keeps % Q , inserts % Q , lfill_list ) call util_fill ( keeps % tlag , inserts % tlag , lfill_list ) call util_fill ( keeps % xbeg , inserts % xbeg , lfill_list ) call util_fill ( keeps % vbeg , inserts % vbeg , lfill_list ) call util_fill ( keeps % Ip , inserts % Ip , lfill_list ) call util_fill ( keeps % rot , inserts % rot , lfill_list ) if ( allocated ( keeps % k_plpl )) deallocate ( keeps % k_plpl ) call util_fill_body ( keeps , inserts , lfill_list ) class default write ( * , * ) 'Error! fill method called for incompatible return type on swiftest_pl' end select end associate return end subroutine util_fill_pl module subroutine util_fill_tp ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new Swiftest test particle structure into an old one. !! This is the inverse of a fill operation. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( swiftest_tp ) !> Spill components specific to the test particle class call util_fill ( keeps % isperi , inserts % isperi , lfill_list ) call util_fill ( keeps % peri , inserts % peri , lfill_list ) call util_fill ( keeps % atp , inserts % atp , lfill_list ) call util_fill_body ( keeps , inserts , lfill_list ) class default write ( * , * ) 'Error! fill method called for incompatible return type on swiftest_tp' end select end associate return end subroutine util_fill_tp end submodule s_util_fill","tags":"","loc":"sourcefile/util_fill.f90.html"},{"title":"util_resize.f90 – swiftest","text":"This file depends on sourcefile~~util_resize.f90~~EfferentGraph sourcefile~util_resize.f90 util_resize.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_resize.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_resize Source Code util_resize.f90 Source Code submodule ( swiftest_classes ) s_util_resize use swiftest contains module subroutine util_resize_arr_char_string ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of type character string. nnew = 0 will deallocate. implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals character ( len = STRMAX ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = \"\" else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = \"\" end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_char_string module subroutine util_resize_arr_DP ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of double precision type. Passing nnew = 0 will deallocate. implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals real ( DP ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size real ( DP ), parameter :: init_val = 0.0_DP if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = init_val else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = init_val end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_DP module subroutine util_resize_arr_DPvec ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of double precision vectors of size (NDIM, n). Passing nnew = 0 will deallocate. implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals real ( DP ), dimension (:,:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size real ( DP ), dimension ( NDIM ), parameter :: init_val = 0.0_DP integer ( I4B ) :: i if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr , dim = 2 ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( NDIM , nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp (:, 1 : nold ) = arr (:, 1 : nold ) do i = nold + 1 , nnew tmp (:, i ) = init_val (:) end do else tmp (:, 1 : nnew ) = arr (:, 1 : nnew ) end if else do i = 1 , nnew tmp (:, i ) = init_val (:) end do end if call move_alloc ( tmp , arr ) return return end subroutine util_resize_arr_DPvec module subroutine util_resize_arr_I4B ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of integer type. Passing nnew = 0 will deallocate. implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals integer ( I4B ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size integer ( I4B ), parameter :: init_val = - 1 if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = init_val else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = init_val end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_I4B module subroutine util_resize_arr_info ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals type ( swiftest_particle_info ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nnew > nold ) then call util_copy_particle_info_arr ( arr ( 1 : nold ), tmp ( 1 : nold )) else call util_copy_particle_info_arr ( arr ( 1 : nnew ), tmp ( 1 : nnew )) end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_info module subroutine util_resize_arr_logical ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of logical type. Passing nnew = 0 will deallocate. implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals logical , dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size logical , parameter :: init_val = . false . if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = init_val else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = init_val end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_logical module subroutine util_resize_body ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % info , nnew ) call util_resize ( self % id , nnew ) call util_resize ( self % status , nnew ) call util_resize ( self % ldiscard , nnew ) call util_resize ( self % lmask , nnew ) call util_resize ( self % mu , nnew ) call util_resize ( self % xh , nnew ) call util_resize ( self % vh , nnew ) call util_resize ( self % xb , nnew ) call util_resize ( self % vb , nnew ) call util_resize ( self % ah , nnew ) call util_resize ( self % aobl , nnew ) call util_resize ( self % atide , nnew ) call util_resize ( self % agr , nnew ) call util_resize ( self % ir3h , nnew ) call util_resize ( self % a , nnew ) call util_resize ( self % e , nnew ) call util_resize ( self % inc , nnew ) call util_resize ( self % capom , nnew ) call util_resize ( self % omega , nnew ) call util_resize ( self % capm , nnew ) self % nbody = count ( self % status ( 1 : nnew ) /= INACTIVE ) return end subroutine util_resize_body module subroutine util_resize_encounter ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. !! Note: The reason to extend it by a factor of 2 is for performance. When there are many enounters per step, resizing every time you want to add an !! encounter takes significant computational effort. Resizing by a factor of 2 is a tradeoff between performance (fewer resize calls) and memory managment !! Memory usage grows by a factor of 2 each time it fills up, but no more. implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list integer ( I4B ), intent ( in ) :: nnew !! New size of list needed ! Internals class ( swiftest_encounter ), allocatable :: enc_temp integer ( I4B ) :: nold logical :: lmalloc lmalloc = allocated ( self % status ) if ( lmalloc ) then nold = size ( self % status ) else nold = 0 end if if ( nnew > nold ) then if ( lmalloc ) allocate ( enc_temp , source = self ) call self % setup ( 2 * nnew ) if ( lmalloc ) then call self % copy ( enc_temp ) deallocate ( enc_temp ) end if else self % status ( nnew + 1 : nold ) = INACTIVE end if self % nenc = nnew return end subroutine util_resize_encounter module subroutine util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a Swiftest massive body against the requested size and resizes it if it is too small. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize_body ( self , nnew ) call util_resize ( self % mass , nnew ) call util_resize ( self % Gmass , nnew ) call util_resize ( self % rhill , nnew ) call util_resize ( self % radius , nnew ) call util_resize ( self % xbeg , nnew ) call util_resize ( self % xend , nnew ) call util_resize ( self % vbeg , nnew ) call util_resize ( self % density , nnew ) call util_resize ( self % Ip , nnew ) call util_resize ( self % rot , nnew ) call util_resize ( self % k2 , nnew ) call util_resize ( self % Q , nnew ) call util_resize ( self % tlag , nnew ) if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) return end subroutine util_resize_pl module subroutine util_resize_tp ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a Swiftest test particle against the requested size and resizes it if it is too small. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize_body ( self , nnew ) call util_resize ( self % isperi , nnew ) call util_resize ( self % peri , nnew ) call util_resize ( self % atp , nnew ) return end subroutine util_resize_tp end submodule s_util_resize","tags":"","loc":"sourcefile/util_resize.f90.html"},{"title":"util_copy.f90 – swiftest","text":"This file depends on sourcefile~~util_copy.f90~~EfferentGraph sourcefile~util_copy.f90 util_copy.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_copy.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_copy Source Code util_copy.f90 Source Code submodule ( swiftest_classes ) s_util_copy use swiftest contains module subroutine util_copy_encounter ( self , source ) !! author: David A. Minton !! !! Copies elements from the source encounter list into self. implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into associate ( n => source % nenc ) self % nenc = n self % lvdotr ( 1 : n ) = source % lvdotr ( 1 : n ) self % status ( 1 : n ) = source % status ( 1 : n ) self % kidx ( 1 : n ) = source % kidx ( 1 : n ) self % index1 ( 1 : n ) = source % index1 ( 1 : n ) self % index2 ( 1 : n ) = source % index2 ( 1 : n ) self % id1 ( 1 : n ) = source % id1 ( 1 : n ) self % id2 ( 1 : n ) = source % id2 ( 1 : n ) self % x1 (:, 1 : n ) = source % x1 (:, 1 : n ) self % x2 (:, 1 : n ) = source % x2 (:, 1 : n ) self % v1 (:, 1 : n ) = source % v1 (:, 1 : n ) self % v2 (:, 1 : n ) = source % v2 (:, 1 : n ) self % t ( 1 : n ) = source % t ( 1 : n ) end associate return end subroutine util_copy_encounter module subroutine util_copy_particle_info ( self , source ) !! author: David A. Minton !! !! Copies one set of information object components into another, component-by-component implicit none class ( swiftest_particle_info ), intent ( inout ) :: self class ( swiftest_particle_info ), intent ( in ) :: source call self % set_value (& name = source % name , & particle_type = source % particle_type , & status = source % status , & origin_type = source % origin_type , & origin_time = source % origin_time , & origin_xh = source % origin_xh (:), & origin_vh = source % origin_vh (:), & discard_time = source % discard_time , & discard_xh = source % discard_xh (:), & discard_vh = source % discard_vh (:), & discard_body_id = source % discard_body_id & ) return end subroutine util_copy_particle_info module subroutine util_copy_particle_info_arr ( source , dest , idx ) !! author: David A. Minton !! !! Copies contents from an array of one particle information objects to another. implicit none class ( swiftest_particle_info ), dimension (:), intent ( in ) :: source !! Source object to copy into class ( swiftest_particle_info ), dimension (:), intent ( inout ) :: dest !! Swiftest body object with particle metadata information object integer ( I4B ), dimension (:), intent ( in ), optional :: idx !! Optional array of indices to draw the source object ! Internals integer ( I4B ) :: i , j , n , nsource , ndest if ( size ( source ) == 0 ) return if ( present ( idx )) then n = size ( idx ) else n = size ( source ) end if nsource = size ( source ) ndest = size ( dest ) if (( n == 0 ) . or . ( n > ndest ) . or . ( n > nsource )) then write ( * , * ) 'Particle info copy operation failed. n, nsource, ndest: ' , n , nsource , ndest return end if do i = 1 , n if ( present ( idx )) then j = idx ( i ) else j = i end if call dest ( i )% copy ( source ( j )) end do return end subroutine util_copy_particle_info_arr end submodule s_util_copy","tags":"","loc":"sourcefile/util_copy.f90.html"},{"title":"util_minimize_bfgs.f90 – swiftest","text":"This file depends on sourcefile~~util_minimize_bfgs.f90~~EfferentGraph sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_minimize_bfgs Source Code util_minimize_bfgs.f90 Source Code submodule ( swiftest_classes ) s_util_minimize_bfgs use swiftest contains module function util_minimize_bfgs ( f , N , x0 , eps , maxloop , lerr ) result ( x1 ) !! author: David A. Minton !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This function implements the Broyden-Fletcher-Goldfarb-Shanno method to determine the minimum of a function of N variables. !! It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   N       : Number of variables of function f !!   x0      : Initial starting value of x !!   eps     : Accuracy of 1 - dimensional minimization at each step !!   maxloop : Maximum number of loops to attempt to find a solution !! The outputs include !!   lerr :  Returns .true. if it could not find the minimum !! Returns !!   x1   :  Final minimum (all 0 if none found) !!   0 = No miniumum found !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - use , intrinsic :: ieee_exceptions implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 real ( DP ), intent ( in ) :: eps integer ( I4B ), intent ( in ) :: maxloop logical , intent ( out ) :: lerr ! Result real ( DP ), dimension (:), allocatable :: x1 ! Internals integer ( I4B ) :: i , j , k , l , conv , num real ( DP ), parameter :: graddelta = 1e-4_DP !! Delta x for gradient calculations real ( DP ), dimension ( N ) :: S !! Direction vectors real ( DP ), dimension ( N , N ) :: H !! Approximated inverse Hessian matrix real ( DP ), dimension ( N ) :: grad1 !! gradient of f real ( DP ), dimension ( N ) :: grad0 !! old value of gradient real ( DP ) :: astar !! 1D minimized value real ( DP ), dimension ( N ) :: y , P real ( DP ), dimension ( N , N ) :: PP , PyH , HyP real ( DP ) :: yHy , Py type ( ieee_status_type ) :: original_fpe_status logical , dimension (:), allocatable :: fpe_flag call ieee_get_status ( original_fpe_status ) ! Save the original floating point exception status call ieee_set_flag ( ieee_all , . false .) ! Set all flags to quiet allocate ( fpe_flag ( size ( ieee_usual ))) lerr = . false . allocate ( x1 , source = x0 ) ! Initialize approximate Hessian with the identity matrix (i.e. begin with method of steepest descent) ! Get initial gradient and initialize arrays for updated values of gradient and x H (:,:) = reshape ([(( 0._DP , i = 1 , j - 1 ), 1._DP , ( 0._DP , i = j + 1 , N ), j = 1 , N )], [ N , N ]) grad0 = gradf ( f , N , x0 (:), graddelta , lerr ) if ( lerr ) then call ieee_set_status ( original_fpe_status ) return end if grad1 (:) = grad0 (:) do i = 1 , maxloop !check for convergence conv = count ( abs ( grad1 (:)) > eps ) ! write(*,*) 'loop: ', i ! write(*,*) 'conv: ', conv ! write(*,*) 'grad1 / eps' ! do j = 1, N !    write(*,*) j, abs(grad1(j)) / eps ! end do if ( conv == 0 ) then ! write(*,*) \"BFGS converged on gradient after \",i,\" iterations\" exit end if S (:) = - matmul ( H (:,:), grad1 (:)) astar = minimize1D ( f , x1 , S , N , graddelta , lerr ) if ( lerr ) then ! write(*,*) \"Exiting BFGS with error in minimize1D step\" exit end if ! Get new x values P (:) = astar * S (:) x1 (:) = x1 (:) + P (:) ! Calculate new gradient grad0 (:) = grad1 (:) grad1 = gradf ( f , N , x1 , graddelta , lerr ) y (:) = grad1 (:) - grad0 (:) Py = sum ( P (:) * y (:)) ! set up factors for H matrix update yHy = 0._DP do k = 1 , N do j = 1 , N yHy = yHy + y ( j ) * H ( j , k ) * y ( k ) end do end do ! prevent divide by zero (convergence) if ( abs ( Py ) < tiny ( Py )) then ! write(*,*) \"BFGS Converged on tiny Py after \",i,\" iterations\" exit end if ! set up update PyH (:,:) = 0._DP HyP (:,:) = 0._DP do k = 1 , N do j = 1 , N PP ( j , k ) = P ( j ) * P ( k ) do l = 1 , N PyH ( j , k ) = PyH ( j , k ) + P ( j ) * y ( l ) * H ( l , k ) HyP ( j , k ) = HyP ( j , k ) + P ( k ) * y ( l ) * H ( j , l ) end do end do end do ! update H matrix H (:,:) = H (:,:) + (( 1._DP - yHy / Py ) * PP (:,:) - PyH (:,:) - HyP (:,:)) / Py ! Normalize to prevent it from blowing up if it takes many iterations to find a solution H (:,:) = H (:,:) / norm2 ( H (:,:)) ! Stop everything if there are any exceptions to allow the routine to fail gracefully call ieee_get_flag ( ieee_usual , fpe_flag ) if ( any ( fpe_flag )) exit if ( i == maxloop ) then lerr = . true . ! write(*,*) \"BFGS ran out of loops!\" end if end do call ieee_get_flag ( ieee_usual , fpe_flag ) lerr = lerr . or . any ( fpe_flag ) ! if (any(fpe_flag)) write(*,*) 'BFGS did not converge due to fpe' ! if (lerr) write(*,*) \"BFGS did not converge!\" call ieee_set_status ( original_fpe_status ) return contains function gradf ( f , N , x1 , dx , lerr ) result ( grad ) !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! Purpose:  Estimates the gradient of a function using a central difference !! approximation !! Inputs: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   N    :  number of variables N !!   x1   :  x value array !!   dx   :  step size to use when calculating derivatives !! Outputs: !!   lerr : .true. if an error occurred. Otherwise returns .false. !! Returns !!   grad :  N sized array containing estimated gradient of f at x1 !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x1 real ( DP ), intent ( in ) :: dx logical , intent ( out ) :: lerr ! Result real ( DP ), dimension ( N ) :: grad ! Internals integer ( I4B ) :: i , j real ( DP ), dimension ( N ) :: xp , xm real ( DP ) :: fp , fm logical :: lerrp , lerrm do i = 1 , N do j = 1 , N if ( j == i ) then xp ( j ) = x1 ( j ) + dx xm ( j ) = x1 ( j ) - dx else xp ( j ) = x1 ( j ) xm ( j ) = x1 ( j ) end if end do select type ( f ) class is ( lambda_obj_err ) fp = f % eval ( xp ) lerrp = f % lerr fm = f % eval ( xm ) lerrm = f % lerr lerr = lerrp . or . lerrm class is ( lambda_obj ) fp = f % eval ( xp ) fm = f % eval ( xm ) lerr = . false . end select grad ( i ) = ( fp - fm ) / ( 2 * dx ) if ( lerr ) return end do return end function gradf function minimize1D ( f , x0 , S , N , eps , lerr ) result ( astar ) !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This program find the minimum of a function of N variables in a single direction !! S using in sequence: !!    1.  A Bracketing method !!    2.  The golden section method !!    3.  A quadratic polynomial fit !! Inputs !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   x0   :  Array of size N of initial x values !!   S    :  Array of size N that determines the direction of minimization !!   N    :  Number of variables of function f !!   eps  :  Accuracy of 1 - dimensional minimization at each step !! Output !!   lerr : .true. if an error occurred. Otherwise returns .false. !! Returns !!   astar      :  Final minimum along direction S !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: eps logical , intent ( out ) :: lerr ! Result real ( DP ) :: astar ! Internals integer ( I4B ) :: num = 0 real ( DP ), parameter :: step = 0.7_DP !! Bracketing method step size real ( DP ), parameter :: gam = 1.2_DP !! Bracketing method expansion parameter real ( DP ), parameter :: greduce = 0.2_DP !! Golden section method reduction factor real ( DP ), parameter :: greduce2 = 0.1_DP ! Secondary golden section method reduction factor real ( DP ) :: alo , ahi !! High and low values for 1 - D minimization routines real ( DP ), parameter :: a0 = epsilon ( 1.0_DP ) !! Initial guess of alpha alo = a0 call bracket ( f , x0 , S , N , gam , step , alo , ahi , lerr ) if ( lerr ) then !write(*,*) \"BFGS bracketing step failed!\" return end if if ( abs ( alo - ahi ) < eps ) then astar = alo lerr = . false . return end if call golden ( f , x0 , S , N , greduce , alo , ahi , lerr ) if ( lerr ) then !write(*,*) \"BFGS golden section step failed!\" return end if if ( abs ( alo - ahi ) < eps ) then astar = alo lerr = . false . return end if call quadfit ( f , x0 , S , N , eps , alo , ahi , lerr ) if ( lerr ) then !write(*,*) \"BFGS quadfit failed!\" return end if if ( abs ( alo - ahi ) < eps ) then astar = alo lerr = . false . return end if ! Quadratic fit method won't converge, so finish off with another golden section call golden ( f , x0 , S , N , greduce2 , alo , ahi , lerr ) if (. not . lerr ) astar = ( alo + ahi ) / 2.0_DP return end function minimize1D function n2one ( f , x0 , S , N , a , lerr ) result ( fnew ) implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: a logical , intent ( out ) :: lerr ! Return real ( DP ) :: fnew ! Internals real ( DP ), dimension ( N ) :: xnew integer ( I4B ) :: i xnew (:) = x0 (:) + a * S (:) fnew = f % eval ( xnew (:)) select type ( f ) class is ( lambda_obj_err ) lerr = f % lerr class is ( lambda_obj ) lerr = . false . end select return end function n2one ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - subroutine bracket ( f , x0 , S , N , gam , step , lo , hi , lerr ) ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This subroutine brackets the minimum.  It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   x0   :  Array of size N of initial x values !!   S    :  Array of size N that determines the direction of minimization !!   gam  :  expansion parameter !!   step :  step size !!   lo   :  initial guess of lo bracket value !! The outputs include !!   lo   :  lo bracket !!   hi   :  hi bracket !!   lerr : .true. if an error occurred. Otherwise returns .false. !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: gam , step real ( DP ), intent ( inout ) :: lo real ( DP ), intent ( out ) :: hi logical , intent ( out ) :: lerr ! Internals real ( DP ) :: a0 , a1 , a2 , atmp , da real ( DP ) :: f0 , f1 , f2 integer ( I4B ) :: i , j integer ( I4B ), parameter :: MAXLOOP = 100 ! maximum number of loops before method is determined to have failed real ( DP ), parameter :: eps = epsilon ( lo ) ! small number precision to test floating point equality ! set up initial bracket points a0 = lo da = step a1 = a0 + da a2 = a0 + 2 * da f0 = n2one ( f , x0 , S , N , a0 , lerr ) if ( lerr ) return f1 = n2one ( f , x0 , S , N , a1 , lerr ) if ( lerr ) return f2 = n2one ( f , x0 , S , N , a2 , lerr ) if ( lerr ) return ! loop over bracket method until either min is bracketed method fails do i = 1 , MAXLOOP if (( f0 > f1 ) . and . ( f1 < f2 )) then ! Minimum was found lo = a0 hi = a2 return else if (( f0 >= f1 ) . and . ( f1 > f2 )) then ! Function appears to decrease da = da * gam atmp = a2 + da a0 = a1 a1 = a2 a2 = atmp f0 = f1 f1 = f2 f2 = n2one ( f , x0 , S , N , a2 , lerr ) else if (( f0 < f1 ) . and . ( f1 <= f2 )) then ! Function appears to increase da = da * gam atmp = a0 - da a2 = a1 a1 = a0 a0 = atmp f2 = f1 f0 = n2one ( f , x0 , S , N , a0 , lerr ) else if (( f0 < f1 ) . and . ( f1 > f2 )) then ! We are at a peak. Pick the direction that descends the fastest da = da * gam if ( f2 > f0 ) then ! LHS is lower than RHS atmp = a2 + da a0 = a1 a1 = a2 a2 = atmp f0 = f1 f1 = f2 f2 = n2one ( f , x0 , S , N , a2 , lerr ) else ! RHS is lower than LHS atmp = a0 - da a2 = a1 a1 = a0 a0 = atmp f2 = f1 f1 = f2 f0 = n2one ( f , x0 , S , N , a0 , lerr ) end if else if (( f0 > f1 ) . and . ( abs ( f2 - f1 ) <= eps )) then ! Decrasging but RHS equal da = da * gam atmp = a2 + da a2 = atmp f2 = n2one ( f , x0 , S , N , a2 , lerr ) else if (( abs ( f0 - f1 ) < eps ) . and . ( f1 < f2 )) then ! Increasing but LHS equal da = da * gam atmp = a0 - da a0 = atmp f0 = n2one ( f , x0 , S , N , a0 , lerr ) else ! all values equal. Expand in either direction and try again a0 = a0 - da a2 = a2 + da f0 = n2one ( f , x0 , S , N , a0 , lerr ) if ( lerr ) exit ! An error occurred while evaluating the function f2 = n2one ( f , x0 , S , N , a2 , lerr ) end if if ( lerr ) exit ! An error occurred while evaluating the function end do lerr = . true . return ! no minimum found end subroutine bracket ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - subroutine golden ( f , x0 , S , N , eps , lo , hi , lerr ) ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This function uses the golden section method to reduce the starting interval lo, hi by some amount sigma. !! It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   x0   :  Array of size N of initial x values !!   S    :  Array of size N that determines the direction of minimization !!   gam  :  expansion parameter !!   eps  :  reduction interval in range (0 < sigma < 1) such that: !!             hi(new) - lo(new) = eps * (hi(old) - lo(old)) !!   lo   :  initial guess of lo bracket value !! The outputs include !!   lo   :  lo bracket !!   hi   :  hi bracket !!   lerr : .true. if an error occurred. Otherwise returns .false. !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: eps real ( DP ), intent ( inout ) :: lo real ( DP ), intent ( out ) :: hi logical , intent ( out ) :: lerr ! Internals real ( DP ), parameter :: tau = 0.5_DP * ( sqrt ( 5.0_DP ) - 1.0_DP ) ! Golden section constant integer ( I4B ), parameter :: MAXLOOP = 40 ! maximum number of loops before method is determined to have failed (unlikely, but could occur if no minimum exists between lo and hi) real ( DP ) :: i0 ! Initial interval value real ( DP ) :: a1 , a2 real ( DP ) :: f1 , f2 integer ( I4B ) :: i , j i0 = hi - lo a1 = hi - tau * i0 a2 = lo + tau * i0 f1 = n2one ( f , x0 , S , N , a1 , lerr ) if ( lerr ) return f2 = n2one ( f , x0 , S , N , a2 , lerr ) if ( lerr ) return do i = 1 , MAXLOOP if ( abs (( hi - lo ) / i0 ) <= eps ) return ! interval reduced to input amount if ( f2 > f1 ) then hi = a2 a2 = a1 f2 = f1 a1 = hi - tau * ( hi - lo ) f1 = n2one ( f , x0 , S , N , a1 , lerr ) else lo = a1 a1 = a2 f2 = f1 a2 = hi - ( 1.0_DP - tau ) * ( hi - lo ) f2 = n2one ( f , x0 , S , N , a2 , lerr ) end if if ( lerr ) exit end do lerr = . true . return ! search took too many iterations - no minimum found end subroutine golden ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - subroutine quadfit ( f , x0 , S , N , eps , lo , hi , lerr ) ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This function uses a quadratic polynomial fit to locate the minimum of a function !! to some accuracy eps.  It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   lo    :  low bracket value !!   hi    :  high bracket value !!   eps   :  desired accuracy of final minimum location !! The outputs include !!   lo   :  final minimum location !!   hi   :  final minimum location !! Notes: Uses the ieee_exceptions intrinsic module to allow for graceful failure due to floating point exceptions, which won't terminate the run. !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: eps real ( DP ), intent ( inout ) :: lo real ( DP ), intent ( out ) :: hi logical , intent ( out ) :: lerr ! Internals integer ( I4B ), parameter :: MAXLOOP = 20 ! maximum number of loops before method is determined to have failed. real ( DP ) :: a1 , a2 , a3 , astar ! three points for the polynomial fit and polynomial minimum real ( DP ) :: f1 , f2 , f3 , fstar ! three function values for the polynomial and polynomial minimum real ( DP ), dimension ( 3 ) :: row_1 , row_2 , row_3 , rhs , soln ! matrix for 3 equation solver (gaussian elimination) real ( DP ), dimension ( 3 , 3 ) :: lhs real ( DP ) :: d1 , d2 , d3 , aold , denom , errval integer ( I4B ) :: i lerr = . false . ! Get initial a1, a2, a3 values a1 = lo a2 = lo + 0.5_DP * ( hi - lo ) a3 = hi aold = a1 astar = a2 f1 = n2one ( f , x0 , S , N , a1 , lerr ) if ( lerr ) return f2 = n2one ( f , x0 , S , N , a2 , lerr ) if ( lerr ) return f3 = n2one ( f , x0 , S , N , a3 , lerr ) if ( lerr ) return do i = 1 , MAXLOOP ! check to see if convergence is reached and exit errval = abs (( astar - aold ) / astar ) call ieee_get_flag ( ieee_usual , fpe_flag ) if ( any ( fpe_flag )) then !write(*,*) 'quadfit fpe' !write(*,*) 'aold : ',aold !write(*,*) 'astar: ',astar lerr = . true . exit end if if ( errval < eps ) then lo = astar hi = astar exit end if ! Set up system for gaussian elimination equation solver row_1 = [ 1.0_DP , a1 , a1 ** 2 ] row_2 = [ 1.0_DP , a2 , a2 ** 2 ] row_3 = [ 1.0_DP , a3 , a3 ** 2 ] rhs = [ f1 , f2 , f3 ] lhs ( 1 , :) = row_1 lhs ( 2 , :) = row_2 lhs ( 3 , :) = row_3 ! Solve system of equations soln (:) = util_solve_linear_system ( lhs , rhs , 3 , lerr ) call ieee_set_flag ( ieee_all , . false .) ! Set all flags back to quiet call ieee_set_halting_mode ( ieee_divide_by_zero , . false .) if ( lerr ) then !write(*,*) 'quadfit fpe:' !write(*,*) 'util_solve_linear_system failed' exit end if aold = astar if ( soln ( 2 ) == soln ( 3 )) then ! Handles the case where they are both 0. 0/0 is an unhandled exception astar = - 0.5_DP else astar = - soln ( 2 ) / ( 2 * soln ( 3 )) end if call ieee_get_flag ( ieee_usual , fpe_flag ) if ( any ( fpe_flag )) then !write(*,*) 'quadfit fpe' !write(*,*) 'soln(2:3): ',soln(2:3) !write(*,*) 'a1, a2, a3' !write(*,*) a1, a2, a3 !write(*,*) 'f1, f2, f3' !write(*,*) f1, f2, f3 lerr = . true . exit end if fstar = n2one ( f , x0 , S , N , astar , lerr ) if ( lerr ) exit ! keep the three closest a values to astar and discard the fourth d1 = abs ( a1 - astar ) d2 = abs ( a2 - astar ) d3 = abs ( a3 - astar ) if ( d1 > d2 ) then if ( d1 > d3 ) then f1 = fstar a1 = astar else if ( d3 > d2 ) then f3 = fstar a3 = astar end if else if ( d2 > d3 ) then f2 = fstar a2 = astar else if ( d3 > d1 ) then f3 = fstar a3 = astar end if end if end do if ( lerr ) return lo = a1 hi = a3 return end subroutine quadfit end function util_minimize_bfgs end submodule s_util_minimize_bfgs","tags":"","loc":"sourcefile/util_minimize_bfgs.f90.html"},{"title":"util_append.f90 – swiftest","text":"This file depends on sourcefile~~util_append.f90~~EfferentGraph sourcefile~util_append.f90 util_append.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_append.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_append Source Code util_append.f90 Source Code submodule ( swiftest_classes ) s_util_append use swiftest contains module subroutine util_append_arr_char_string ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of character string type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_char_string module subroutine util_append_arr_DP ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of double precision type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_DP module subroutine util_append_arr_DPvec ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of double precision vector type of size (NDIM, n) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:,:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( NDIM , nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( 1 , nold + 1 : nold + nnew ) = pack ( source ( 1 , 1 : nsrc ), lsource_mask ( 1 : nsrc )) arr ( 2 , nold + 1 : nold + nnew ) = pack ( source ( 2 , 1 : nsrc ), lsource_mask ( 1 : nsrc )) arr ( 3 , nold + 1 : nold + nnew ) = pack ( source ( 3 , 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_DPvec module subroutine util_append_arr_I4B ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of integer(I4B) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_I4B module subroutine util_append_arr_info ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of particle information type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew , i integer ( I4B ), dimension (:), allocatable :: idx if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if allocate ( idx ( nnew )) idx = pack ([( i , i = 1 , nsrc )], lsource_mask ( 1 : nsrc )) call util_copy_particle_info_arr ( source ( 1 : nsrc ), arr ( nold + 1 : nold + nnew ), idx ) return end subroutine util_append_arr_info module subroutine util_append_arr_logical ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of logical type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array logical , dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_logical module subroutine util_append_body ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nold , nsrc , nnew nold = self % nbody nsrc = source % nbody nnew = count ( lsource_mask ( 1 : nsrc )) call util_append ( self % info , source % info , nold , nsrc , lsource_mask ) call util_append ( self % id , source % id , nold , nsrc , lsource_mask ) call util_append ( self % status , source % status , nold , nsrc , lsource_mask ) call util_append ( self % ldiscard , source % ldiscard , nold , nsrc , lsource_mask ) call util_append ( self % lmask , source % lmask , nold , nsrc , lsource_mask ) call util_append ( self % mu , source % mu , nold , nsrc , lsource_mask ) call util_append ( self % xh , source % xh , nold , nsrc , lsource_mask ) call util_append ( self % vh , source % vh , nold , nsrc , lsource_mask ) call util_append ( self % xb , source % xb , nold , nsrc , lsource_mask ) call util_append ( self % vb , source % vb , nold , nsrc , lsource_mask ) call util_append ( self % ah , source % ah , nold , nsrc , lsource_mask ) call util_append ( self % aobl , source % aobl , nold , nsrc , lsource_mask ) call util_append ( self % atide , source % atide , nold , nsrc , lsource_mask ) call util_append ( self % agr , source % agr , nold , nsrc , lsource_mask ) call util_append ( self % ir3h , source % ir3h , nold , nsrc , lsource_mask ) call util_append ( self % a , source % a , nold , nsrc , lsource_mask ) call util_append ( self % e , source % e , nold , nsrc , lsource_mask ) call util_append ( self % inc , source % inc , nold , nsrc , lsource_mask ) call util_append ( self % capom , source % capom , nold , nsrc , lsource_mask ) call util_append ( self % omega , source % omega , nold , nsrc , lsource_mask ) call util_append ( self % capm , source % capm , nold , nsrc , lsource_mask ) self % nbody = nold + nnew return end subroutine util_append_body module subroutine util_append_encounter ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nold , nsrc nold = self % nenc nsrc = source % nenc call util_append ( self % lvdotr , source % lvdotr , nold , nsrc , lsource_mask ) call util_append ( self % status , source % status , nold , nsrc , lsource_mask ) call util_append ( self % index1 , source % index1 , nold , nsrc , lsource_mask ) call util_append ( self % index2 , source % index2 , nold , nsrc , lsource_mask ) call util_append ( self % id1 , source % id1 , nold , nsrc , lsource_mask ) call util_append ( self % id2 , source % id2 , nold , nsrc , lsource_mask ) call util_append ( self % x1 , source % x1 , nold , nsrc , lsource_mask ) call util_append ( self % x2 , source % x2 , nold , nsrc , lsource_mask ) call util_append ( self % v1 , source % v1 , nold , nsrc , lsource_mask ) call util_append ( self % v2 , source % v2 , nold , nsrc , lsource_mask ) call util_append ( self % t , source % t , nold , nsrc , lsource_mask ) self % nenc = nold + count ( lsource_mask ( 1 : nsrc )) return end subroutine util_append_encounter module subroutine util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( swiftest_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % mass , source % mass , nold , nsrc , lsource_mask ) call util_append ( self % Gmass , source % Gmass , nold , nsrc , lsource_mask ) call util_append ( self % rhill , source % rhill , nold , nsrc , lsource_mask ) call util_append ( self % radius , source % radius , nold , nsrc , lsource_mask ) call util_append ( self % xbeg , source % xbeg , nold , nsrc , lsource_mask ) call util_append ( self % xend , source % xend , nold , nsrc , lsource_mask ) call util_append ( self % vbeg , source % vbeg , nold , nsrc , lsource_mask ) call util_append ( self % density , source % density , nold , nsrc , lsource_mask ) call util_append ( self % Ip , source % Ip , nold , nsrc , lsource_mask ) call util_append ( self % rot , source % rot , nold , nsrc , lsource_mask ) call util_append ( self % k2 , source % k2 , nold , nsrc , lsource_mask ) call util_append ( self % Q , source % Q , nold , nsrc , lsource_mask ) call util_append ( self % tlag , source % tlag , nold , nsrc , lsource_mask ) if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) call util_append_body ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class swiftest_pl or its descendents\" call util_exit ( FAILURE ) end select return end subroutine util_append_pl module subroutine util_append_tp ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( swiftest_tp ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % isperi , source % isperi , nold , nsrc , lsource_mask ) call util_append ( self % peri , source % peri , nold , nsrc , lsource_mask ) call util_append ( self % atp , source % atp , nold , nsrc , lsource_mask ) call util_append_body ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class swiftest_tp or its descendents\" call util_exit ( FAILURE ) end select return end subroutine util_append_tp end submodule s_util_append","tags":"","loc":"sourcefile/util_append.f90.html"},{"title":"util_get_energy_momentum.f90 – swiftest","text":"This file depends on sourcefile~~util_get_energy_momentum.f90~~EfferentGraph sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_get_energy_momentum Source Code util_get_energy_momentum.f90 Source Code submodule ( swiftest_classes ) s_util_get_energy_momentum use swiftest contains module subroutine util_get_energy_momentum_system ( self , param ) !! author: David A. Minton !! !! Compute total system angular momentum vector and kinetic, potential and total system energy !! !! Adapted from David E. Kaufmann Swifter routine symba_energy_eucl.f90 !! !! Adapted from Martin Duncan's Swift routine anal_energy.f implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j integer ( I8B ) :: k , nplpl real ( DP ) :: oblpot , kecb , kespincb real ( DP ), dimension ( self % pl % nbody ) :: irh , kepl , kespinpl , pecb real ( DP ), dimension ( self % pl % nbody ) :: Lplorbitx , Lplorbity , Lplorbitz real ( DP ), dimension ( self % pl % nbody ) :: Lplspinx , Lplspiny , Lplspinz real ( DP ), dimension ( NDIM ) :: Lcborbit , Lcbspin real ( DP ), dimension (:), allocatable :: pepl logical , dimension (:), allocatable :: lstatpl real ( DP ) :: hx , hy , hz associate ( system => self , pl => self % pl , npl => self % pl % nbody , cb => self % cb ) nplpl = pl % nplpl system % Lorbit (:) = 0.0_DP system % Lspin (:) = 0.0_DP system % Ltot (:) = 0.0_DP system % ke_orbit = 0.0_DP system % ke_spin = 0.0_DP kepl (:) = 0.0_DP Lplorbitx (:) = 0.0_DP Lplorbity (:) = 0.0_DP Lplorbitz (:) = 0.0_DP Lplspinx (:) = 0.0_DP Lplspiny (:) = 0.0_DP Lplspinz (:) = 0.0_DP pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE system % GMtot = cb % Gmass + sum ( pl % Gmass ( 1 : npl ), pl % lmask ( 1 : npl )) kecb = cb % mass * dot_product ( cb % vb (:), cb % vb (:)) Lcborbit (:) = cb % mass * ( cb % xb (:) . cross . cb % vb (:)) do concurrent ( i = 1 : npl , pl % lmask ( i )) hx = pl % xb ( 2 , i ) * pl % vb ( 3 , i ) - pl % xb ( 3 , i ) * pl % vb ( 2 , i ) hy = pl % xb ( 3 , i ) * pl % vb ( 1 , i ) - pl % xb ( 1 , i ) * pl % vb ( 3 , i ) hz = pl % xb ( 1 , i ) * pl % vb ( 2 , i ) - pl % xb ( 2 , i ) * pl % vb ( 1 , i ) ! Angular momentum from orbit Lplorbitx ( i ) = pl % mass ( i ) * hx Lplorbity ( i ) = pl % mass ( i ) * hy Lplorbitz ( i ) = pl % mass ( i ) * hz ! Kinetic energy from orbit kepl ( i ) = pl % mass ( i ) * dot_product ( pl % vb (:, i ), pl % vb (:, i )) end do if ( param % lrotation ) then kespincb = cb % mass * cb % Ip ( 3 ) * cb % radius ** 2 * dot_product ( cb % rot (:), cb % rot (:)) ! For simplicity, we always assume that the rotation pole is the 3rd principal axis Lcbspin (:) = cb % Ip ( 3 ) * cb % mass * cb % radius ** 2 * cb % rot (:) do concurrent ( i = 1 : npl , pl % lmask ( i )) ! Currently we assume that the rotation pole is the 3rd principal axis ! Angular momentum from spin Lplspinx ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * pl % rot ( 1 , i ) Lplspiny ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * pl % rot ( 2 , i ) Lplspinz ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * pl % rot ( 3 , i ) ! Kinetic energy from spin kespinpl ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * dot_product ( pl % rot (:, i ), pl % rot (:, i )) end do else kespincb = 0.0_DP kespinpl (:) = 0.0_DP end if ! Do the central body potential energy component first where (. not . pl % lmask ( 1 : npl )) pecb ( 1 : npl ) = 0.0_DP end where do concurrent ( i = 1 : npl , pl % lmask ( i )) pecb ( i ) = - cb % Gmass * pl % mass ( i ) / norm2 ( pl % xb (:, i )) end do ! Do the potential energy between pairs of massive bodies allocate ( lstatpl ( nplpl )) allocate ( pepl ( nplpl )) do concurrent ( k = 1 : nplpl ) i = pl % k_plpl ( 1 , k ) j = pl % k_plpl ( 2 , k ) lstatpl ( k ) = ( pl % lmask ( i ) . and . pl % lmask ( j )) end do where (. not . lstatpl ( 1 : nplpl )) pepl ( 1 : nplpl ) = 0.0_DP end where do concurrent ( k = 1 : nplpl , lstatpl ( k )) i = pl % k_plpl ( 1 , k ) j = pl % k_plpl ( 2 , k ) pepl ( k ) = - ( pl % Gmass ( i ) * pl % mass ( j )) / norm2 ( pl % xb (:, i ) - pl % xb (:, j )) end do system % pe = sum ( pepl (:), lstatpl (:)) + sum ( pecb ( 1 : npl ), pl % lmask ( 1 : npl )) deallocate ( lstatpl , pepl ) system % ke_orbit = 0.5_DP * ( kecb + sum ( kepl ( 1 : npl ), pl % lmask ( 1 : npl ))) if ( param % lrotation ) system % ke_spin = 0.5_DP * ( kespincb + sum ( kespinpl ( 1 : npl ), pl % lmask ( 1 : npl ))) ! Potential energy from the oblateness term if ( param % loblatecb ) then call system % obl_pot () system % pe = system % pe + system % oblpot end if system % Lorbit ( 1 ) = Lcborbit ( 1 ) + sum ( Lplorbitx ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lorbit ( 2 ) = Lcborbit ( 2 ) + sum ( Lplorbity ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lorbit ( 3 ) = Lcborbit ( 3 ) + sum ( Lplorbitz ( 1 : npl ), pl % lmask ( 1 : npl )) if ( param % lrotation ) then system % Lspin ( 1 ) = Lcbspin ( 1 ) + sum ( Lplspinx ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lspin ( 2 ) = Lcbspin ( 2 ) + sum ( Lplspiny ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lspin ( 3 ) = Lcbspin ( 3 ) + sum ( Lplspinz ( 1 : npl ), pl % lmask ( 1 : npl )) end if system % te = system % ke_orbit + system % ke_spin + system % pe system % Ltot (:) = system % Lorbit (:) + system % Lspin (:) end associate return end subroutine util_get_energy_momentum_system end submodule s_util_get_energy_momentum","tags":"","loc":"sourcefile/util_get_energy_momentum.f90.html"},{"title":"gr.f90 – swiftest","text":"This file depends on sourcefile~~gr.f90~~EfferentGraph sourcefile~gr.f90 gr.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~gr.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_gr Source Code gr.f90 Source Code submodule ( swiftest_classes ) s_gr use swiftest contains module pure subroutine gr_kick_getaccb_ns_body ( self , system , param ) !! author: David A. Minton !! !! Add relativistic correction acceleration for non-symplectic integrators. !! Based on Quinn et al. (1991) eq. 5 !! !! Reference: !!    Quinn, T.R., Tremaine, S., Duncan, M., 1991. A three million year integration of the earth’s orbit. !!       AJ 101, 2287–2305. https://doi.org/10.1086/115850 !! !! Adapted from David A. Minton's Swifter routine routine gr_kick_getaccb_ns.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals real ( DP ) :: rmag , rdotv , vmag2 integer ( I4B ) :: i associate ( n => self % nbody , cb => system % cb , inv_c2 => param % inv_c2 ) if ( n == 0 ) return do i = 1 , n rmag = norm2 ( self % xh (:, i )) vmag2 = dot_product ( self % vh (:, i ), self % vh (:, i )) rdotv = dot_product ( self % xh (:, i ), self % vh (:, i )) self % agr (:, i ) = self % mu * inv_c2 / rmag ** 3 * (( 4 * self % mu ( i ) / rmag - vmag2 ) * self % xh (:, i ) + 4 * rdotv * self % vh (:, i )) end do select type ( self ) class is ( swiftest_pl ) do i = 1 , NDIM cb % agr ( i ) = - sum ( self % Gmass ( 1 : n ) * self % agr ( 1 : n , i ) / cb % Gmass ) end do end select end associate return end subroutine gr_kick_getaccb_ns_body module subroutine gr_kick_getacch ( mu , x , lmask , n , inv_c2 , agr ) !! author: David A. Minton !! !! Compute relativisitic accelerations of massive bodies !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vectors logical , dimension (:), intent ( in ) :: lmask !! Logical mask indicating which bodies to compute integer ( I4B ), intent ( in ) :: n !! Total number of bodies real ( DP ), intent ( in ) :: inv_c2 !! Inverse speed of light squared: 1 / c**2 real ( DP ), dimension (:,:), intent ( out ) :: agr !! Accelerations ! Internals integer ( I4B ) :: i real ( DP ) :: beta , rjmag4 agr (:,:) = 0.0_DP do concurrent ( i = 1 : n , lmask ( i )) rjmag4 = ( dot_product ( x (:, i ), x (:, i ))) ** 2 beta = - mu ( i ) ** 2 * inv_c2 agr (:, i ) = 2 * beta * x (:, i ) / rjmag4 end do return end subroutine gr_kick_getacch module pure subroutine gr_p4_pos_kick ( param , x , v , dt ) !! author: David A. Minton !! !! Position kick due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Reference: !!    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. !!       AJ 108, 1962–1969. https://doi.org/10.1086/117210 !! !! Adapted from David A. Minton's Swifter routine gr_whm_p4.f90 implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), dimension (:), intent ( inout ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( in ) :: dt !! Step size ! Internals real ( DP ), dimension ( NDIM ) :: dr real ( DP ) :: vmag2 vmag2 = dot_product ( v (:), v (:)) dr (:) = - 2 * param % inv_c2 * vmag2 * v (:) x (:) = x (:) + dr (:) * dt return end subroutine gr_p4_pos_kick module pure subroutine gr_pseudovel2vel ( param , mu , xh , pv , vh ) !! author: David A. Minton !! !! Converts the relativistic pseudovelocity back into a veliocentric velocity !!    Based on Saha & Tremaine (1994) Eq. 32 !! !! Reference: !!    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. !!       AJ 108, 1962–1969. https://doi.org/10.1086/117210 !! !! Adapted from David A. Minton's Swifter routine gr_pseudovel2vel.f90 implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Heliocentric position vector real ( DP ), dimension (:), intent ( in ) :: pv !! Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real ( DP ), dimension (:), intent ( out ) :: vh !! Heliocentric velocity vector ! Internals real ( DP ) :: vmag2 , rmag , grterm associate ( inv_c2 => param % inv_c2 ) vmag2 = dot_product ( pv (:), pv (:)) rmag = norm2 ( xh (:)) grterm = 1.0_DP - inv_c2 * ( 0.5_DP * vmag2 + 3 * mu / rmag ) vh (:) = pv (:) * grterm end associate return end subroutine gr_pseudovel2vel module pure subroutine gr_pv2vh_body ( self , param ) !! author: David A. Minton !! !! Wrapper function that converts from pseudovelocity to heliocentric velocity for swiftest bodies implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension (:,:), allocatable :: vh !! Temporary holder of pseudovelocity for in-place conversion associate ( n => self % nbody ) if ( n == 0 ) return allocate ( vh , mold = self % vh ) do i = 1 , n call gr_pseudovel2vel ( param , self % mu ( i ), self % xh (:, i ), self % vh (:, i ), vh (:, i )) end do call move_alloc ( vh , self % vh ) end associate return end subroutine gr_pv2vh_body module pure subroutine gr_vel2pseudovel ( param , mu , xh , vh , pv ) !! author: David A. Minton !! !! Converts the heliocentric velocity into a pseudovelocity with relativistic corrections. !! Uses Newton-Raphson method with direct inversion of the Jacobian (yeah, it's slow, but !! this is only done once per run). !! !! Reference: !!    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. !!       AJ 108, 1962–1969. https://doi.org/10.1086/117210 !! !! Adapted from David A. Minton's Swifter routine gr_vel2pseudovel.f90 implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Heliocentric position vector real ( DP ), dimension (:), intent ( in ) :: vh !! Heliocentric velocity vector real ( DP ), dimension (:), intent ( out ) :: pv !! Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) ! Internals real ( DP ) :: v2 , G , pv2 , rterm , det real ( DP ), dimension ( NDIM , NDIM ) :: J , Jinv real ( DP ), dimension ( NDIM ) :: F integer ( I4B ) :: n , i , k integer ( I4B ), parameter :: MAXITER = 50 real ( DP ), parameter :: TOL = 1.0e-12_DP associate ( inv_c2 => param % inv_c2 ) pv ( 1 : NDIM ) = vh ( 1 : NDIM ) ! Initial guess rterm = 3 * mu / norm2 ( xh (:)) v2 = dot_product ( vh (:), vh (:)) do n = 1 , MAXITER pv2 = dot_product ( pv (:), pv (:)) G = 1.0_DP - inv_c2 * ( 0.5_DP * pv2 + rterm ) F (:) = pv (:) * G - vh (:) if ( abs ( sum ( F ) / v2 ) < TOL ) exit ! Root found ! Calculate the Jacobian do k = 1 , NDIM do i = 1 , NDIM if ( i == k ) then J ( i , k ) = G - inv_c2 * pv ( k ) else J ( i , k ) = - inv_c2 * pv ( k ) end if end do end do ! Inverse of the Jacobian det = J ( 1 , 1 ) * ( J ( 3 , 3 ) * J ( 2 , 2 ) - J ( 3 , 2 ) * J ( 2 , 3 )) det = det - J ( 2 , 1 ) * ( J ( 3 , 3 ) * J ( 1 , 2 ) - J ( 3 , 2 ) * J ( 1 , 3 )) det = det + J ( 3 , 1 ) * ( J ( 2 , 3 ) * J ( 1 , 2 ) - J ( 2 , 2 ) * J ( 1 , 3 )) Jinv ( 1 , 1 ) = J ( 3 , 3 ) * J ( 2 , 2 ) - J ( 3 , 2 ) * J ( 2 , 3 ) Jinv ( 1 , 2 ) = - ( J ( 3 , 3 ) * J ( 1 , 2 ) - J ( 3 , 2 ) * J ( 1 , 3 )) Jinv ( 1 , 3 ) = J ( 2 , 3 ) * J ( 1 , 2 ) - J ( 2 , 2 ) * J ( 1 , 3 ) Jinv ( 2 , 1 ) = - ( J ( 3 , 3 ) * J ( 2 , 1 ) - J ( 3 , 1 ) * J ( 2 , 3 )) Jinv ( 2 , 2 ) = J ( 3 , 3 ) * J ( 1 , 1 ) - J ( 3 , 1 ) * J ( 1 , 3 ) Jinv ( 2 , 3 ) = - ( J ( 2 , 3 ) * J ( 1 , 1 ) - J ( 2 , 1 ) * J ( 1 , 3 )) Jinv ( 3 , 1 ) = J ( 3 , 2 ) * J ( 2 , 1 ) - J ( 3 , 1 ) * J ( 2 , 2 ) Jinv ( 3 , 2 ) = - ( J ( 3 , 2 ) * J ( 1 , 1 ) - J ( 3 , 1 ) * J ( 1 , 2 )) Jinv ( 3 , 3 ) = J ( 2 , 2 ) * J ( 1 , 1 ) - J ( 2 , 1 ) * J ( 1 , 2 ) Jinv = Jinv * det do i = 1 , NDIM pv ( i ) = pv ( i ) - dot_product ( Jinv ( i ,:), F (:)) end do end do end associate return end subroutine gr_vel2pseudovel module pure subroutine gr_vh2pv_body ( self , param ) !! author: David A. Minton !! !! Wrapper function that converts from heliocentric velocity to pseudovelocity for Swiftest bodies implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension (:,:), allocatable :: pv !! Temporary holder of pseudovelocity for in-place conversion associate ( n => self % nbody ) if ( n == 0 ) return allocate ( pv , mold = self % vh ) do i = 1 , n call gr_vel2pseudovel ( param , self % mu ( i ), self % xh (:, i ), self % vh (:, i ), pv (:, i )) end do call move_alloc ( pv , self % vh ) end associate return end subroutine gr_vh2pv_body end submodule s_gr","tags":"","loc":"sourcefile/gr.f90.html"},{"title":"discard.f90 – swiftest","text":"This file depends on sourcefile~~discard.f90~~EfferentGraph sourcefile~discard.f90 discard.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~discard.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_discard Source Code discard.f90 Source Code submodule ( swiftest_classes ) s_discard use swiftest contains module subroutine discard_system ( self , param ) !! author: David A. Minton !! !! Calls the discard methods for each body class and then the write method if any discards were detected !! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals logical :: lany_discards , lpl_discards , ltp_discards , lpl_check , ltp_check lpl_check = allocated ( self % pl_discards ) ltp_check = allocated ( self % tp_discards ) associate ( system => self , tp => self % tp , pl => self % pl , tp_discards => self % tp_discards , pl_discards => self % pl_discards ) lpl_discards = . false . ltp_discards = . false . if ( lpl_check ) then call pl % discard ( system , param ) lpl_discards = ( pl_discards % nbody > 0 ) end if if ( ltp_check ) then call tp % discard ( system , param ) ltp_discards = ( tp_discards % nbody > 0 ) end if if ( lpl_discards . or . ltp_discards ) call system % write_discard ( param ) if ( lpl_discards . and . param % lenergy ) call self % conservation_report ( param , lterminal = . false .) if ( lpl_check ) call pl_discards % setup ( 0 , param ) if ( ltp_check ) call tp_discards % setup ( 0 , param ) end associate return end subroutine discard_system module subroutine discard_pl ( self , system , param ) !! author: David A. Minton !! !!  Placeholder method for discarding massive bodies. This method does nothing except to ensure that the discard flag is set to false. !!  This method is intended to be overridden by more advanced integrators. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameter if ( self % nbody == 0 ) return self % ldiscard ( 1 : self % nbody ) = . false . return end subroutine discard_pl module subroutine discard_tp ( self , system , param ) !! author: David A. Minton !! !! Check to see if particles should be discarded based on their positions relative to the massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine: discard.f90 !! Adapted from Hal Levison's Swift routine discard. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameter ! Internals logical , dimension (:), allocatable :: ldiscard integer ( I4B ) :: npl , ntp associate ( tp => self , cb => system % cb , pl => system % pl ) if (( ntp == 0 ) . or . ( npl == 0 )) return ntp = tp % nbody npl = pl % nbody if (( param % rmin >= 0.0_DP ) . or . ( param % rmax >= 0.0_DP ) . or . & ( param % rmaxu >= 0.0_DP ) . or . (( param % qmin >= 0.0_DP ) . and . ( param % qmin_coord == \"BARY\" ))) then call pl % h2b ( cb ) call tp % h2b ( cb ) end if if (( param % rmin >= 0.0_DP ) . or . ( param % rmax >= 0.0_DP ) . or . ( param % rmaxu >= 0.0_DP )) call discard_cb_tp ( tp , system , param ) if ( param % qmin >= 0.0_DP ) call discard_peri_tp ( tp , system , param ) if ( param % lclose ) call discard_pl_tp ( tp , system , param ) if ( any ( tp % ldiscard ( 1 : ntp ))) then allocate ( ldiscard , source = tp % ldiscard ) call tp % spill ( system % tp_discards , ldiscard ( 1 : ntp ), ldestructive = . true .) end if end associate return end subroutine discard_tp subroutine discard_cb_tp ( tp , system , param ) !! author: David A. Minton !! !!  Check to see if test particles should be discarded based on their positions relative to the Sun !!        or because they are unbound from the system !! !! Adapted from David E. Kaufmann's Swifter routine: discard_sun.f90 !! Adapted from Hal Levison's Swift routine discard_sun.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: tp !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: energy , vb2 , rb2 , rh2 , rmin2 , rmax2 , rmaxu2 character ( len = STRMAX ) :: idstr , timestr associate ( ntp => tp % nbody , cb => system % cb , Gmtot => system % Gmtot ) rmin2 = max ( param % rmin * param % rmin , cb % radius * cb % radius ) rmax2 = param % rmax ** 2 rmaxu2 = param % rmaxu ** 2 do i = 1 , ntp if ( tp % status ( i ) == ACTIVE ) then rh2 = dot_product ( tp % xh (:, i ), tp % xh (:, i )) if (( param % rmax >= 0.0_DP ) . and . ( rh2 > rmax2 )) then tp % status ( i ) = DISCARDED_RMAX write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too far from the central body at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_RMAX\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i )) else if (( param % rmin >= 0.0_DP ) . and . ( rh2 < rmin2 )) then tp % status ( i ) = DISCARDED_RMIN write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too close to the central body at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_RMIN\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = cb % id ) else if ( param % rmaxu >= 0.0_DP ) then rb2 = dot_product ( tp % xb (:, i ), tp % xb (:, i )) vb2 = dot_product ( tp % vb (:, i ), tp % vb (:, i )) energy = 0.5_DP * vb2 - Gmtot / sqrt ( rb2 ) if (( energy > 0.0_DP ) . and . ( rb2 > rmaxu2 )) then tp % status ( i ) = DISCARDED_RMAXU write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" is unbound and too far from barycenter at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_RMAXU\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i )) end if end if end if end do end associate return end subroutine discard_cb_tp subroutine discard_peri_tp ( tp , system , param ) !! author: David A. Minton !! !! Check to see if a test particle should be discarded because its perihelion distance becomes too small !! !! Adapted from David E. Kaufmann's Swifter routine: discard_peri.f90 !! Adapted from Hal Levison's Swift routine discard_peri.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: tp !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameterss ! Internals logical , save :: lfirst = . true . integer ( I4B ) :: i , j , ih real ( DP ) :: r2 real ( DP ), dimension ( NDIM ) :: dx character ( len = STRMAX ) :: idstr , timestr associate ( cb => system % cb , ntp => tp % nbody , pl => system % pl , npl => system % pl % nbody , t => param % t ) call tp % get_peri ( system , param ) do i = 1 , ntp if ( tp % status ( i ) == ACTIVE ) then if ( tp % isperi ( i ) == 0 ) then ih = 1 do j = 1 , npl dx (:) = tp % xh (:, i ) - pl % xh (:, j ) r2 = dot_product ( dx (:), dx (:)) if ( r2 <= ( pl % rhill ( j )) ** 2 ) ih = 0 end do if ( ih == 1 ) then if (( tp % atp ( i ) >= param % qmin_alo ) . and . & ( tp % atp ( i ) <= param % qmin_ahi ) . and . & ( tp % peri ( i ) <= param % qmin )) then tp % status ( i ) = DISCARDED_PERI write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" perihelion distance too small at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . call tp % info ( i )% set_value ( status = \"DISCARDED_PERI\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = pl % id ( j )) end if end if end if end if end do end associate return end subroutine discard_peri_tp subroutine discard_pl_tp ( tp , system , param ) !! author: David A. Minton !! !! Check to see if test particles should be discarded based on their positions relative to the massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine: discard_pl.f90 !! Adapted from Hal Levison's Swift routine discard_pl.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: tp !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j , isp real ( DP ) :: r2min , radius real ( DP ), dimension ( NDIM ) :: dx , dv character ( len = STRMAX ) :: idstri , idstrj , timestr associate ( ntp => tp % nbody , pl => system % pl , npl => system % pl % nbody , t => param % t , dt => param % dt ) do i = 1 , ntp if ( tp % status ( i ) == ACTIVE ) then do j = 1 , npl dx (:) = tp % xh (:, i ) - pl % xh (:, j ) dv (:) = tp % vh (:, i ) - pl % vh (:, j ) radius = pl % radius ( j ) call discard_pl_close ( dx (:), dv (:), dt , radius ** 2 , isp , r2min ) if ( isp /= 0 ) then tp % status ( i ) = DISCARDED_PLR tp % lmask ( i ) = . false . pl % ldiscard ( j ) = . true . write ( idstri , * ) tp % id ( i ) write ( idstrj , * ) pl % id ( j ) write ( timestr , * ) param % t write ( * , * ) \"Test particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstri )) // \")\" & // \"  too close to massive body \" // trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstrj )) & // \" at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . call tp % info ( i )% set_value ( status = \"DISCARDED_PLR\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = pl % id ( j )) exit end if end do end if end do end associate return end subroutine discard_pl_tp subroutine discard_pl_close ( dx , dv , dt , r2crit , iflag , r2min ) !! author: David A. Minton !! !!  Check to see if a test particle and massive body are having, or will have within the next time step, an encounter such !!          that the separation distance r is less than some critical radius rcrit (or r**2 < rcrit**2 = r2crit) !! !! Adapted from David E. Kaufmann's Swifter routine: discard_pl_close.f90 !! Adapted from Hal Levison's Swift routine discard_pl_close.f implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: dx , dv real ( DP ), intent ( in ) :: dt , r2crit integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( out ) :: r2min ! Internals real ( DP ) :: r2 , v2 , vdotr , tmin r2 = dot_product ( dx (:), dx (:)) if ( r2 <= r2crit ) then iflag = 1 else vdotr = dot_product ( dx (:), dv (:)) if ( vdotr > 0.0_DP ) then iflag = 0 else v2 = dot_product ( dv (:), dv (:)) tmin = - vdotr / v2 if ( tmin < dt ) then r2min = r2 - vdotr * vdotr / v2 else r2min = r2 + 2 * vdotr * dt + v2 * dt ** 2 end if r2min = min ( r2min , r2 ) if ( r2min <= r2crit ) then iflag = 1 else iflag = 0 end if end if end if return end subroutine discard_pl_close end submodule s_discard","tags":"","loc":"sourcefile/discard.f90.html"},{"title":"helio_step.f90 – swiftest","text":"This file depends on sourcefile~~helio_step.f90~~EfferentGraph sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_step Source Code helio_step.f90 Source Code submodule ( helio_classes ) s_helio_step use swiftest contains module subroutine helio_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies and and active test particles ahead in heliocentric coordinates. !! !! Currently there's no difference between this and the WHM system stepper, so this is just !! a wrapper function to keep the method calls consistent for inherited types. !! !! Adapted from Hal Levison's Swift routine step_kdk.f !! Adapted from David E. Kaufmann's Swifter routine helio_step.f90 implicit none ! Arguments class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize call whm_step_system ( self , param , t , dt ) return end subroutine helio_step_system module subroutine helio_step_pl ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies ahead Democratic Heliocentric method !! !! Adapted from David E. Kaufmann's Swifter helio_step_pl.f90 !! Adapted from Hal Levison's Swift routine helio_step_pl.f implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals real ( DP ) :: dth !! Half step size if ( self % nbody == 0 ) return associate ( pl => self ) select type ( cb => system % cb ) class is ( helio_cb ) dth = 0.5_DP * dt if ( pl % lfirst ) then call pl % vh2vb ( cb ) pl % lfirst = . false . end if call pl % lindrift ( cb , dth , lbeg = . true .) call pl % kick ( system , param , t , dth , lbeg = . true .) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % drift ( system , param , dt ) call pl % kick ( system , param , t + dt , dth , lbeg = . false .) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % lindrift ( cb , dth , lbeg = . false .) call pl % vb2vh ( cb ) end select end associate return end subroutine helio_step_pl module subroutine helio_step_tp ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step active test particles ahead using Democratic Heliocentric method !! !! Adapted from David E. Kaufmann's Swifter routine helio_step_tp.f90 !! Adapted from Hal Levison's Swift routine helio_step_tp.f implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals real ( DP ) :: dth !! Half step size if ( self % nbody == 0 ) return associate ( tp => self ) select type ( cb => system % cb ) class is ( helio_cb ) dth = 0.5_DP * dt if ( tp % lfirst ) then call tp % vh2vb ( vbcb = - cb % ptbeg ) tp % lfirst = . false . end if call tp % lindrift ( cb , dth , lbeg = . true .) call tp % kick ( system , param , t , dth , lbeg = . true .) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % drift ( system , param , dt ) call tp % kick ( system , param , t + dt , dth , lbeg = . false .) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % lindrift ( cb , dth , lbeg = . false .) call tp % vb2vh ( vbcb = - cb % ptend ) end select end associate return end subroutine helio_step_tp end submodule s_helio_step","tags":"","loc":"sourcefile/helio_step.f90.html"},{"title":"helio_setup.f90 – swiftest","text":"This file depends on sourcefile~~helio_setup.f90~~EfferentGraph sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_setup Source Code helio_setup.f90 Source Code submodule ( helio_classes ) s_helio_setup use swiftest contains module subroutine helio_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize a Helio nbody system from files, converting all heliocentric quantities to barycentric. !! implicit none ! Arguments class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters call whm_setup_initialize_system ( self , param ) call self % pl % h2b ( self % cb ) call self % tp % h2b ( self % cb ) call self % pl % sort ( \"mass\" , ascending = . false .) call self % pl % index ( param ) return end subroutine helio_setup_initialize_system end submodule s_helio_setup","tags":"","loc":"sourcefile/helio_setup.f90.html"},{"title":"helio_gr.f90 – swiftest","text":"This file depends on sourcefile~~helio_gr.f90~~EfferentGraph sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_gr Source Code helio_gr.f90 Source Code submodule ( helio_classes ) s_helio_gr use swiftest contains module subroutine helio_gr_kick_getacch_pl ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of massive bodies !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: suma real ( DP ), dimension (:, :), allocatable :: aj real ( DP ) :: beta , rjmag4 if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) call gr_kick_getacch ( pl % mu , pl % xh , pl % lmask , npl , param % inv_c2 , pl % agr ) pl % ah (:, 1 : npl ) = pl % ah (:, 1 : npl ) + pl % agr (:, 1 : npl ) end associate return end subroutine helio_gr_kick_getacch_pl module subroutine helio_gr_kick_getacch_tp ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of test particles !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_helio_kick_getacch.f90 implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: rjmag4 , beta if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) call gr_kick_getacch ( tp % mu , tp % xh , tp % lmask , ntp , param % inv_c2 , tp % agr ) tp % ah (:, 1 : ntp ) = tp % ah (:, 1 : ntp ) + tp % agr (:, 1 : ntp ) end associate return end subroutine helio_gr_kick_getacch_tp module pure subroutine helio_gr_p4_pl ( self , param , dt ) !! author: David A. Minton !! !! Position kick to massive bodies due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) do concurrent ( i = 1 : npl , pl % lmask ( i )) call gr_p4_pos_kick ( param , pl % xh (:, i ), pl % vb (:, i ), dt ) end do end associate return end subroutine helio_gr_p4_pl module pure subroutine helio_gr_p4_tp ( self , param , dt ) !! author: David A. Minton !! !! Position kick to test particles due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) call gr_p4_pos_kick ( param , tp % xh (:, i ), tp % vb (:, i ), dt ) end do end associate return end subroutine helio_gr_p4_tp end submodule s_helio_gr","tags":"","loc":"sourcefile/helio_gr.f90.html"},{"title":"helio_kick.f90 – swiftest","text":"This file depends on sourcefile~~helio_kick.f90~~EfferentGraph sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_kick Source Code helio_kick.f90 Source Code submodule ( helio_classes ) s_helio_kick use swiftest contains module subroutine helio_kick_getacch_pl ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch.f90 !! Adapted from Hal Levison's Swift routine helio_kick_getacch.f implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step if ( self % nbody == 0 ) return associate ( cb => system % cb , pl => self , npl => self % nbody ) call pl % accel_int () if ( param % loblatecb ) then call pl % accel_obl ( system ) if ( lbeg ) then cb % aoblbeg = cb % aobl else cb % aoblend = cb % aobl end if if ( param % ltides ) then call pl % accel_tides ( system ) if ( lbeg ) then cb % atidebeg = cb % atide else cb % atideend = cb % atide end if end if end if if ( param % lextra_force ) call pl % accel_user ( system , param , t , lbeg ) if ( param % lgr ) call pl % accel_gr ( param ) end associate return end subroutine helio_kick_getacch_pl module subroutine helio_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of test particles !! !! Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_tp.f90 !! Adapted from Hal Levison's Swift routine helio_kick_getacch_tp.f implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step if ( self % nbody == 0 ) return associate ( tp => self , cb => system % cb , pl => system % pl , npl => system % pl % nbody ) system % lbeg = lbeg if ( system % lbeg ) then call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xbeg (:, 1 : npl ), npl ) else call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xend (:, 1 : npl ), npl ) end if if ( param % loblatecb ) call tp % accel_obl ( system ) if ( param % lextra_force ) call tp % accel_user ( system , param , t , lbeg ) if ( param % lgr ) call tp % accel_gr ( param ) end associate return end subroutine helio_kick_getacch_tp module subroutine helio_kick_vb_pl ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick barycentric velocities of bodies !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f !! Adapted from David E. Kaufmann's Swifter routine helio_kick_vb.f90 implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) pl % ah (:, 1 : npl ) = 0.0_DP call pl % accel ( system , param , t , lbeg ) if ( lbeg ) then call pl % set_beg_end ( xbeg = pl % xh ) else call pl % set_beg_end ( xend = pl % xh ) end if do concurrent ( i = 1 : npl , pl % lmask ( i )) pl % vb (:, i ) = pl % vb (:, i ) + pl % ah (:, i ) * dt end do end associate return end subroutine helio_kick_vb_pl module subroutine helio_kick_vb_tp ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick barycentric velocities of bodies !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f !! Adapted from David E. Kaufmann's Swifter routine helio_kick_vb_tp.f90 implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) tp % ah (:, 1 : ntp ) = 0.0_DP call tp % accel ( system , param , t , lbeg ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % vb (:, i ) = tp % vb (:, i ) + tp % ah (:, i ) * dt end do end associate return end subroutine helio_kick_vb_tp end submodule s_helio_kick","tags":"","loc":"sourcefile/helio_kick.f90.html"},{"title":"helio_drift.f90 – swiftest","text":"This file depends on sourcefile~~helio_drift.f90~~EfferentGraph sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_drift Source Code helio_drift.f90 Source Code submodule ( helio_classes ) s_helio_drift use swiftest contains module subroutine helio_drift_body ( self , system , param , dt ) !! author: David A. Minton !! !! Loop through bodies and call Danby drift routine on democratic heliocentric coordinates !! !! Adapted from David E. Kaufmann's Swifter routine helio_drift.f90 !! Adapted from Hal Levison's Swift routine drift.f implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals integer ( I4B ) :: i !! Loop counter real ( DP ) :: rmag , vmag2 , energy integer ( I4B ), dimension (:), allocatable :: iflag !! Vectorized error code flag real ( DP ), dimension (:), allocatable :: dtp , mu if ( self % nbody == 0 ) return associate ( n => self % nbody ) allocate ( iflag ( n )) iflag (:) = 0 allocate ( mu ( n )) mu (:) = system % cb % Gmass call drift_all ( mu , self % xh , self % vb , self % nbody , param , dt , self % lmask , iflag ) if ( any ( iflag ( 1 : n ) /= 0 )) then where ( iflag ( 1 : n ) /= 0 ) self % status ( 1 : n ) = DISCARDED_DRIFTERR do i = 1 , n if ( iflag ( i ) /= 0 ) write ( * , * ) \" Body \" , self % id ( i ), \" lost due to error in Danby drift\" end do end if end associate return end subroutine helio_drift_body module subroutine helio_drift_pl ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a helio_pl structure implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize call helio_drift_body ( self , system , param , dt ) return end subroutine helio_drift_pl module subroutine helio_drift_tp ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a helio_pl structure implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize call helio_drift_body ( self , system , param , dt ) return end subroutine helio_drift_tp module subroutine helio_drift_linear_pl ( self , cb , dt , lbeg ) !! author: David A. Minton !! !! Perform linear drift of massive bodies due to barycentric momentum of Sun !! !! Adapted from David E. Kaufmann's Swifter routine helio_lindrift.f90 !! Adapted from Hal Levison's Swift routine helio_lindrift.f implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( helio_cb ), intent ( inout ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step ! Internals real ( DP ), dimension ( NDIM ) :: pt !! negative barycentric velocity of the central body integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) if ( npl == 0 ) return pt ( 1 ) = sum ( pl % Gmass ( 1 : npl ) * pl % vb ( 1 , 1 : npl ), self % lmask ( 1 : npl )) pt ( 2 ) = sum ( pl % Gmass ( 1 : npl ) * pl % vb ( 2 , 1 : npl ), self % lmask ( 1 : npl )) pt ( 3 ) = sum ( pl % Gmass ( 1 : npl ) * pl % vb ( 3 , 1 : npl ), self % lmask ( 1 : npl )) pt (:) = pt (:) / cb % Gmass do concurrent ( i = 1 : npl , self % lmask ( i )) pl % xh (:, i ) = pl % xh (:, i ) + pt (:) * dt end do if ( lbeg ) then cb % ptbeg = pt (:) else cb % ptend = pt (:) end if end associate return end subroutine helio_drift_linear_pl module subroutine helio_drift_linear_tp ( self , cb , dt , lbeg ) !! author: David A. Minton !! !! Perform linear drift of test particles due to barycentric momentum of Sun !! New vectorized version included !! !! Adapted from David E. Kaufmann's Swifter routine helio_lindrift_tp.f90 !! Adapted from Hal Levison's Swift routine helio_lindrift_tp.f implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio test particleb object class ( helio_cb ), intent ( in ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step ! Internals real ( DP ), dimension ( NDIM ) :: pt !! negative barycentric velocity of the central body if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) if ( ntp == 0 ) return if ( lbeg ) then pt (:) = cb % ptbeg else pt (:) = cb % ptend end if where ( self % lmask ( 1 : ntp )) tp % xh ( 1 , 1 : ntp ) = tp % xh ( 1 , 1 : ntp ) + pt ( 1 ) * dt tp % xh ( 2 , 1 : ntp ) = tp % xh ( 2 , 1 : ntp ) + pt ( 2 ) * dt tp % xh ( 3 , 1 : ntp ) = tp % xh ( 3 , 1 : ntp ) + pt ( 3 ) * dt end where end associate return end subroutine helio_drift_linear_tp end submodule s_helio_drift","tags":"","loc":"sourcefile/helio_drift.f90.html"},{"title":"io.f90 – swiftest","text":"This file depends on sourcefile~~io.f90~~EfferentGraph sourcefile~io.f90 io.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~io.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_io Source Code io.f90 Source Code submodule ( swiftest_classes ) s_io use swiftest contains module subroutine io_conservation_report ( self , param , lterminal ) !! author: The Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Reports the current state of energy, mass, and angular momentum conservation in a run implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Input colleciton of user-defined parameters logical , intent ( in ) :: lterminal !! Indicates whether to output information to the terminal screen ! Internals real ( DP ), dimension ( NDIM ) :: Ltot_now , Lorbit_now , Lspin_now real ( DP ) :: ke_orbit_now , ke_spin_now , pe_now , Eorbit_now real ( DP ) :: Eorbit_error , Etotal_error , Ecoll_error real ( DP ) :: GMtot_now real ( DP ) :: Lerror , Merror character ( len = STRMAX ) :: errmsg character ( len =* ), parameter :: EGYFMT = '(ES23.16,10(\",\",ES23.16,:))' ! Format code for all simulation output character ( len =* ), parameter :: EGYHEADER = '(\"t,Eorbit,Ecollisions,Lx,Ly,Lz,Mtot\")' integer ( I4B ), parameter :: EGYIU = 72 character ( len =* ), parameter :: EGYTERMFMT = '(\"  DL/L0 = \", ES12.5 & \"; DEcollisions/|E0| = \", ES12.5, & \"; D(Eorbit+Ecollisions)/|E0| = \", ES12.5, & \"; DM/M0 = \", ES12.5)' associate ( system => self , pl => self % pl , cb => self % cb , npl => self % pl % nbody ) if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE ) . and . ( param % energy_out /= \"\" )) then if ( param % lfirstenergy . and . ( param % out_stat /= \"OLD\" )) then open ( unit = EGYIU , file = param % energy_out , form = \"formatted\" , status = \"replace\" , action = \"write\" , err = 667 , iomsg = errmsg ) write ( EGYIU , EGYHEADER , err = 667 , iomsg = errmsg ) else open ( unit = EGYIU , file = param % energy_out , form = \"formatted\" , status = \"old\" , action = \"write\" , position = \"append\" , err = 667 , iomsg = errmsg ) end if end if call pl % vb2vh ( cb ) call pl % xh2xb ( cb ) call system % get_energy_and_momentum ( param ) ke_orbit_now = system % ke_orbit ke_spin_now = system % ke_spin pe_now = system % pe Lorbit_now (:) = system % Lorbit (:) Lspin_now (:) = system % Lspin (:) Eorbit_now = ke_orbit_now + ke_spin_now + pe_now Ltot_now (:) = system % Ltot (:) + param % Lescape (:) GMtot_now = system % GMtot + param % GMescape if ( param % lfirstenergy ) then param % Eorbit_orig = Eorbit_now param % GMtot_orig = GMtot_now param % Lorbit_orig (:) = Lorbit_now (:) param % Lspin_orig (:) = Lspin_now (:) param % Ltot_orig (:) = Ltot_now (:) param % lfirstenergy = . false . end if if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE ) . and . ( param % energy_out /= \"\" )) then write ( EGYIU , EGYFMT , err = 667 , iomsg = errmsg ) param % t , Eorbit_now , param % Ecollisions , Ltot_now , GMtot_now close ( EGYIU , err = 667 , iomsg = errmsg ) end if if (. not . param % lfirstenergy ) then Lerror = norm2 ( Ltot_now (:) - param % Ltot_orig (:)) / norm2 ( param % Ltot_orig (:)) Eorbit_error = ( Eorbit_now - param % Eorbit_orig ) / abs ( param % Eorbit_orig ) Ecoll_error = param % Ecollisions / abs ( param % Eorbit_orig ) Etotal_error = ( Eorbit_now - param % Ecollisions - param % Eorbit_orig - param % Euntracked ) / abs ( param % Eorbit_orig ) Merror = ( GMtot_now - param % GMtot_orig ) / param % GMtot_orig if ( lterminal ) write ( * , EGYTERMFMT ) Lerror , Ecoll_error , Etotal_error , Merror if ( abs ( Merror ) > 100 * epsilon ( Merror )) then write ( * , * ) \"Severe error! Mass not conserved! Halting!\" call pl % xv2el ( cb ) call param % nciu % open ( param ) call self % write_hdr ( param % nciu , param ) call cb % write_frame ( param % nciu , param ) call pl % write_frame ( param % nciu , param ) call param % nciu % close ( param ) call util_exit ( FAILURE ) end if end if end associate return 667 continue write ( * , * ) \"Error writing energy and momentum tracking file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_conservation_report module subroutine io_dump_param ( self , param_file_name ) !! author: David A. Minton !! !! Dump integration parameters to file !! !! Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90 !! Adapted from Martin Duncan's Swift routine io_dump_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: self !! Output collection of parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of output file character ( STRMAX ) :: errmsg !! Error message in UDIO procedure integer ( I4B ) :: ierr open ( unit = LUN , file = param_file_name , status = 'replace' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) !! todo: Currently this procedure does not work in user-defined derived-type input mode !!    due to compiler incompatabilities !write(LUN,'(DT)') param call self % writer ( LUN , iotype = \"none\" , v_list = [ 0 ], iostat = ierr , iomsg = errmsg ) if ( ierr == 0 ) then close ( LUN , err = 667 , iomsg = errmsg ) return end if 667 continue write ( * , * ) \"Error opening parameter dump file \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_param module subroutine io_dump_particle_info ( self , iu ) !! author: David A. Minton !! !! Reads in particle information object information from an open file unformatted file implicit none ! Arguments class ( swiftest_particle_info ), intent ( in ) :: self !! Particle metadata information object integer ( I4B ), intent ( in ) :: iu !! Open file unit number ! Internals character ( STRMAX ) :: errmsg write ( iu , err = 667 , iomsg = errmsg ) self % name write ( iu , err = 667 , iomsg = errmsg ) self % particle_type write ( iu , err = 667 , iomsg = errmsg ) self % origin_type write ( iu , err = 667 , iomsg = errmsg ) self % origin_time write ( iu , err = 667 , iomsg = errmsg ) self % origin_xh (:) write ( iu , err = 667 , iomsg = errmsg ) self % origin_vh (:) return 667 continue write ( * , * ) \"Error writing particle metadata information from file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_particle_info module subroutine io_dump_particle_info_base ( self , param , idx ) !! author: David A. Minton !! !! Dumps the particle information data to a file. !! Pass a list of array indices for test particles (tpidx) and/or massive bodies (plidx) to append implicit none ! Arguments class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object (can be cb, pl, or tp) class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ), dimension (:), optional , intent ( in ) :: idx !! Array of test particle indices to append to the particle file ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: LUN = 22 integer ( I4B ) :: i character ( STRMAX ) :: errmsg !if ((param%out_type == REAL4_TYPE) .or. (param%out_type == REAL8_TYPE)) then if ( lfirst ) then select case ( param % out_stat ) case ( 'APPEND' ) open ( unit = LUN , file = param % particle_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'UNKNOWN' , 'REPLACE' ) open ( unit = LUN , file = param % particle_out , status = param % out_stat , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . else open ( unit = LUN , file = param % particle_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) end if select type ( self ) class is ( swiftest_cb ) write ( LUN , err = 667 , iomsg = errmsg ) self % id call self % info % dump ( LUN ) class is ( swiftest_body ) if ( present ( idx )) then do i = 1 , size ( idx ) write ( LUN , err = 667 , iomsg = errmsg ) self % id ( idx ( i )) call self % info ( idx ( i ))% dump ( LUN ) end do else do i = 1 , self % nbody write ( LUN , err = 667 , iomsg = errmsg ) self % id ( i ) call self % info ( i )% dump ( LUN ) end do end if end select close ( unit = LUN , err = 667 , iomsg = errmsg ) !else if ((param%out_type == NETCDF_FLOAT_TYPE) .or. (param%out_type == NETCDF_DOUBLE_TYPE)) then if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call param % nciu % open ( param ) call self % write_particle_info ( param % nciu ) call param % nciu % close ( param ) end if return 667 continue write ( * , * ) \"Error reading central body file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_particle_info_base module subroutine io_dump_base ( self , param ) !! author: David A. Minton !! !! Dump massive body data to files !! !! Adapted from David E. Kaufmann's Swifter routine: io_dump_pl.f90 and io_dump_tp.f90 !! Adapted from Hal Levison's Swift routine io_dump_pl.f and io_dump_tp.f implicit none ! Arguments class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: ierr !! Error code integer ( I4B ), parameter :: LUN = 7 !! Unit number for dump file integer ( I4B ) :: iu = LUN character ( len = :), allocatable :: dump_file_name character ( STRMAX ) :: errmsg select type ( self ) class is ( swiftest_cb ) dump_file_name = trim ( adjustl ( param % incbfile )) class is ( swiftest_pl ) dump_file_name = trim ( adjustl ( param % inplfile )) class is ( swiftest_tp ) dump_file_name = trim ( adjustl ( param % intpfile )) end select open ( unit = iu , file = dump_file_name , form = \"UNFORMATTED\" , status = 'replace' , err = 667 , iomsg = errmsg ) select type ( self ) class is ( swiftest_body ) write ( iu , err = 667 , iomsg = errmsg ) self % nbody call io_write_frame_body ( self , iu , param ) class is ( swiftest_cb ) call io_write_frame_cb ( self , iu , param ) end select close ( iu , err = 667 , iomsg = errmsg ) return 667 continue write ( * , * ) \"Error dumping body data to file \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_base module subroutine io_dump_system ( self , param ) !! author: David A. Minton !! !! Dumps the state of the system to files in case the simulation is interrupted. !! As a safety mechanism, there are two dump files that are written in alternating order !! so that if a dump file gets corrupted during writing, the user can restart from the older one. implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals class ( swiftest_parameters ), allocatable :: dump_param !! Local parameters variable used to parameters change input file names !! to dump file-specific values without changing the user-defined values integer ( I4B ), save :: idx = 1 !! Index of current dump file. Output flips between 2 files for extra security !! in case the program halts during writing character ( len = :), allocatable :: param_file_name real ( DP ) :: tfrac character ( * ), parameter :: statusfmt = '(\"Time = \", ES12.5, \"; fraction done = \", F6.3, \"; Number of active pl, tp = \", I5, \", \", I5)' character ( * ), parameter :: symbastatfmt = '(\"Time = \", ES12.5, \"; fraction done = \", F6.3, \"; Number of active plm, pl, tp = \", I5, \", \", I5, \", \", I5)' logical , save :: lfirst = . true . if ( lfirst ) then lfirst = . false . if ( param % lenergy ) call self % conservation_report ( param , lterminal = . false .) else allocate ( dump_param , source = param ) param_file_name = trim ( adjustl ( DUMP_PARAM_FILE ( idx ))) dump_param % incbfile = trim ( adjustl ( DUMP_CB_FILE ( idx ))) dump_param % inplfile = trim ( adjustl ( DUMP_PL_FILE ( idx ))) dump_param % intpfile = trim ( adjustl ( DUMP_TP_FILE ( idx ))) dump_param % in_form = XV dump_param % out_stat = 'APPEND' dump_param % in_type = REAL8_TYPE dump_param % T0 = param % t call dump_param % dump ( param_file_name ) dump_param % out_form = XV call self % cb % dump ( dump_param ) call self % pl % dump ( dump_param ) call self % tp % dump ( dump_param ) idx = idx + 1 if ( idx > NDUMPFILES ) idx = 1 tfrac = ( param % t - param % t0 ) / ( param % tstop - param % t0 ) select type ( pl => self % pl ) class is ( symba_pl ) write ( * , symbastatfmt ) param % t , tfrac , pl % nplm , pl % nbody , self % tp % nbody class default write ( * , statusfmt ) param % t , tfrac , pl % nbody , self % tp % nbody end select end if return end subroutine io_dump_system module function io_get_args ( integrator , param_file_name ) result ( ierr ) !! author: David A. Minton !! !! Reads in the name of the parameter file from command line arguments. implicit none ! Arguments integer ( I4B ) :: integrator !! Symbolic code of the requested integrator character ( len = :), allocatable :: param_file_name !! Name of the input parameters file ! Result integer ( I4B ) :: ierr !! I/O error code ! Internals character ( len = STRMAX ) :: arg1 , arg2 integer :: narg , ierr_arg1 , ierr_arg2 character ( len =* ), parameter :: linefmt = '(A)' ierr = - 1 ! Default is to fail narg = command_argument_count () ! if ( narg == 2 ) then call get_command_argument ( 1 , arg1 , status = ierr_arg1 ) call get_command_argument ( 2 , arg2 , status = ierr_arg2 ) if (( ierr_arg1 == 0 ) . and . ( ierr_arg2 == 0 )) then ierr = 0 call io_toupper ( arg1 ) select case ( arg1 ) case ( 'BS' ) integrator = BS case ( 'HELIO' ) integrator = HELIO case ( 'RA15' ) integrator = RA15 case ( 'TU4' ) integrator = TU4 case ( 'WHM' ) integrator = WHM case ( 'RMVS' ) integrator = RMVS case ( 'SYMBA' ) integrator = SYMBA case ( 'RINGMOONS' ) integrator = RINGMOONS case default integrator = UNKNOWN_INTEGRATOR write ( * , * ) trim ( adjustl ( arg1 )) // ' is not a valid integrator.' ierr = - 1 end select param_file_name = trim ( adjustl ( arg2 )) end if else call get_command_argument ( 1 , arg1 , status = ierr_arg1 ) if ( ierr_arg1 == 0 ) then if ( arg1 == '-v' . or . arg1 == '--version' ) then call util_version () else if ( arg1 == '-h' . or . arg1 == '--help' ) then call util_exit ( HELP ) end if end if end if if ( ierr /= 0 ) call util_exit ( USAGE ) return end function io_get_args module function io_get_old_t_final_system ( self , param ) result ( old_t_final ) !! author: David A. Minton !! !! Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. !! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( in ) :: self class ( swiftest_parameters ), intent ( in ) :: param ! Result real ( DP ) :: old_t_final ! Internals class ( swiftest_nbody_system ), allocatable :: tmpsys class ( swiftest_parameters ), allocatable :: tmpparam integer ( I4B ), parameter :: LUN = 76 integer ( I4B ) :: ierr , iu = LUN character ( len = STRMAX ) :: errmsg old_t_final = 0.0_DP allocate ( tmpsys , source = self ) allocate ( tmpparam , source = param ) ierr = 0 open ( unit = iu , file = param % outfile , status = 'OLD' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) do ierr = tmpsys % read_frame ( iu , tmpparam ) if ( ierr /= 0 ) exit end do if ( is_iostat_end ( ierr )) then old_t_final = tmpparam % t return end if 667 continue write ( * , * ) \"Error reading binary output file. \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end function io_get_old_t_final_system module function io_get_token ( buffer , ifirst , ilast , ierr ) result ( token ) !! author: David A. Minton !! !! Retrieves a character token from an input string. Here a token is defined as any set of contiguous non-blank characters not !! beginning with or containing \"!\". If \"!\" is present, any remaining part of the buffer including the \"!\" is ignored !! !! Adapted from David E. Kaufmann's Swifter routine io_get_token.f90 implicit none ! Arguments character ( len =* ), intent ( in ) :: buffer !! Input string buffer integer ( I4B ), intent ( inout ) :: ifirst !! Index of the buffer at which to start the search for a token integer ( I4B ), intent ( out ) :: ilast !! Index of the buffer at the end of the returned token integer ( I4B ), intent ( out ) :: ierr !! Error code ! Result character ( len = :), allocatable :: token !! Returned token string ! Internals integer ( I4B ) :: i , ilength ilength = len ( buffer ) if ( ifirst > ilength ) then ilast = ifirst ierr = - 1 !! Bad input token = '' return end if do i = ifirst , ilength if ( buffer ( i : i ) /= ' ' ) exit end do if (( i > ilength ) . or . ( buffer ( i : i ) == '!' )) then ifirst = i ilast = i ierr = - 2 !! No valid token token = '' return end if ifirst = i do i = ifirst , ilength if (( buffer ( i : i ) == ' ' ) . or . ( buffer ( i : i ) == '!' )) exit end do ilast = i - 1 ierr = 0 token = buffer ( ifirst : ilast ) return end function io_get_token module subroutine io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read in parameters for the integration !! Currently this procedure does not work in user-defined derived-type input mode !!    e.g. read(unit,'(DT)') param !! as the newline characters are ignored in the input file when compiled in ifort. !! !! Adapted from David E. Kaufmann's Swifter routine io_init_param.f90 !! Adapted from Martin Duncan's Swift routine io_init_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( inout ) :: self !! Collection of parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! Internals logical :: t0_set = . false . !! Is the initial time set in the input file? logical :: tstop_set = . false . !! Is the final time set in the input file? logical :: dt_set = . false . !! Is the step size set in the input file? integer ( I4B ) :: ilength , ifirst , ilast , i !! Variables used to parse input file character ( STRMAX ) :: line !! Line of the input file character ( len = :), allocatable :: line_trim , param_name , param_value !! Strings used to parse the param file character ( * ), parameter :: linefmt = '(A)' !! Format code for simple text string ! Parse the file line by line, extracting tokens then matching them up with known parameters if possible associate ( param => self ) do read ( unit = unit , fmt = linefmt , end = 1 , err = 667 , iomsg = iomsg ) line line_trim = trim ( adjustl ( line )) ilength = len ( line_trim ) if (( ilength /= 0 )) then ifirst = 1 ! Read the pair of tokens. The first one is the parameter name, the second is the value. param_name = io_get_token ( line_trim , ifirst , ilast , iostat ) if ( param_name == '' ) cycle ! No parameter name (usually because this line is commented out) call io_toupper ( param_name ) ifirst = ilast + 1 param_value = io_get_token ( line_trim , ifirst , ilast , iostat ) select case ( param_name ) case ( \"T0\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % t0 t0_set = . true . case ( \"TSTOP\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % tstop tstop_set = . true . case ( \"DT\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % dt dt_set = . true . case ( \"CB_IN\" ) param % incbfile = param_value case ( \"PL_IN\" ) param % inplfile = param_value case ( \"TP_IN\" ) param % intpfile = param_value case ( \"IN_TYPE\" ) call io_toupper ( param_value ) param % in_type = param_value case ( \"IN_FORM\" ) call io_toupper ( param_value ) param % in_form = param_value case ( \"ISTEP_OUT\" ) read ( param_value , * ) param % istep_out case ( \"BIN_OUT\" ) param % outfile = param_value case ( \"OUT_TYPE\" ) call io_toupper ( param_value ) param % out_type = param_value case ( \"OUT_FORM\" ) call io_toupper ( param_value ) param % out_form = param_value case ( \"OUT_STAT\" ) call io_toupper ( param_value ) param % out_stat = param_value case ( \"ISTEP_DUMP\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % istep_dump case ( \"CHK_CLOSE\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lclose = . true . case ( \"CHK_RMIN\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % rmin case ( \"CHK_RMAX\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % rmax case ( \"CHK_EJECT\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % rmaxu case ( \"CHK_QMIN\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % qmin case ( \"CHK_QMIN_COORD\" ) call io_toupper ( param_value ) param % qmin_coord = param_value case ( \"CHK_QMIN_RANGE\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % qmin_alo ifirst = ilast + 1 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % qmin_ahi case ( \"ENC_OUT\" ) param % enc_out = param_value case ( \"DISCARD_OUT\" ) param % discard_out = param_value case ( \"ENERGY_OUT\" ) param % energy_out = param_value case ( \"EXTRA_FORCE\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lextra_force = . true . case ( \"BIG_DISCARD\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lbig_discard = . true . case ( \"RHILL_PRESENT\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lrhill_present = . true . case ( \"MU2KG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % MU2KG case ( \"TU2S\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % TU2S case ( \"DU2M\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % DU2M case ( \"ENERGY\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lenergy = . true . case ( \"GR\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lgr = . true . case ( \"ROTATION\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lrotation = . true . case ( \"TIDES\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % ltides = . true . case ( \"FIRSTKICK\" ) call io_toupper ( param_value ) if ( param_value == \"NO\" . or . param_value == 'F' ) param % lfirstkick = . false . case ( \"FIRSTENERGY\" ) call io_toupper ( param_value ) if ( param_value == \"NO\" . or . param_value == 'F' ) param % lfirstenergy = . false . case ( \"EORBIT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Eorbit_orig case ( \"GMTOT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % GMtot_orig case ( \"LTOT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Ltot_orig ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Ltot_orig ( i ) end do case ( \"LORBIT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lorbit_orig ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lorbit_orig ( i ) end do case ( \"LSPIN_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lspin_orig ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lspin_orig ( i ) end do case ( \"LESCAPE\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lescape ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lescape ( i ) end do case ( \"GMESCAPE\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % GMescape case ( \"ECOLLISIONS\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Ecollisions case ( \"EUNTRACKED\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Euntracked case ( \"MAXID\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % maxid case ( \"PARTICLE_OUT\" ) param % particle_out = param_value case ( \"NPLMAX\" , \"NTPMAX\" , \"GMTINY\" , \"MIN_GMFRAG\" , \"FRAGMENTATION\" , \"SEED\" , \"YARKOVSKY\" , \"YORP\" ) ! Ignore SyMBA-specific, not-yet-implemented, or obsolete input parameters case default write ( * , * ) \"Unknown parameter -> \" , param_name iostat = - 1 return end select end if end do 1 continue iostat = 0 !! Do basic sanity checks on the input values if ((. not . t0_set ) . or . (. not . tstop_set ) . or . (. not . dt_set )) then write ( iomsg , * ) 'Valid simulation time not set' iostat = - 1 return end if if ( param % dt <= 0.0_DP ) then write ( iomsg , * ) 'Invalid timestep: ' iostat = - 1 return end if if ( param % inplfile == \"\" ) then write ( iomsg , * ) 'No valid massive body file in input file' iostat = - 1 return end if if (( param % in_type /= REAL8_TYPE ) . and . ( param % in_type /= \"ASCII\" )) then write ( iomsg , * ) 'Invalid input file type:' , trim ( adjustl ( param % in_type )) iostat = - 1 return end if if (( param % istep_out <= 0 ) . and . ( param % istep_dump <= 0 )) then write ( iomsg , * ) 'Invalid istep' iostat = - 1 return end if if (( param % istep_out > 0 ) . and . ( param % outfile == \"\" )) then write ( iomsg , * ) 'Invalid outfile' iostat = - 1 return end if param % lrestart = ( param % out_stat == \"APPEND\" ) if ( param % outfile /= \"\" ) then if (( param % out_type /= REAL4_TYPE ) . and . ( param % out_type /= REAL8_TYPE ) . and . & ( param % out_type /= NETCDF_FLOAT_TYPE ) . and . ( param % out_type /= NETCDF_DOUBLE_TYPE )) then write ( iomsg , * ) 'Invalid out_type: ' , trim ( adjustl ( param % out_type )) iostat = - 1 return end if if (( param % out_form /= \"EL\" ) . and . ( param % out_form /= \"XV\" ) . and . ( param % out_form /= \"XVEL\" )) then write ( iomsg , * ) 'Invalid out_form: ' , trim ( adjustl ( param % out_form )) iostat = - 1 return end if if (( param % out_stat /= \"NEW\" ) . and . ( param % out_stat /= \"REPLACE\" ) . and . ( param % out_stat /= \"APPEND\" ) . and . ( param % out_stat /= \"UNKNOWN\" )) then write ( iomsg , * ) 'Invalid out_stat: ' , trim ( adjustl ( param % out_stat )) iostat = - 1 return end if end if if ( param % qmin > 0.0_DP ) then if (( param % qmin_coord /= \"HELIO\" ) . and . ( param % qmin_coord /= \"BARY\" )) then write ( iomsg , * ) 'Invalid qmin_coord: ' , trim ( adjustl ( param % qmin_coord )) iostat = - 1 return end if if (( param % qmin_alo <= 0.0_DP ) . or . ( param % qmin_ahi <= 0.0_DP )) then write ( iomsg , * ) 'Invalid qmin vals' iostat = - 1 return end if end if if ( param % ltides . and . . not . param % lrotation ) then write ( iomsg , * ) 'Tides require rotation to be turned on' iostat = - 1 return end if write ( * , * ) \"T0             = \" , param % t0 write ( * , * ) \"TSTOP          = \" , param % tstop write ( * , * ) \"DT             = \" , param % dt write ( * , * ) \"CB_IN          = \" , trim ( adjustl ( param % incbfile )) write ( * , * ) \"PL_IN          = \" , trim ( adjustl ( param % inplfile )) write ( * , * ) \"TP_IN          = \" , trim ( adjustl ( param % intpfile )) write ( * , * ) \"IN_TYPE        = \" , trim ( adjustl ( param % in_type )) write ( * , * ) \"ISTEP_OUT      = \" , param % istep_out write ( * , * ) \"BIN_OUT        = \" , trim ( adjustl ( param % outfile )) write ( * , * ) \"OUT_TYPE       = \" , trim ( adjustl ( param % out_type )) write ( * , * ) \"OUT_FORM       = \" , trim ( adjustl ( param % out_form )) write ( * , * ) \"IN_FORM        = \" , trim ( adjustl ( param % in_form )) write ( * , * ) \"OUT_STAT       = \" , trim ( adjustl ( param % out_stat )) write ( * , * ) \"ISTEP_DUMP     = \" , param % istep_dump write ( * , * ) \"CHK_CLOSE      = \" , param % lclose if ( param % rmin > 0.0 ) then write ( * , * ) \"CHK_RMIN       = \" , param % rmin else write ( * , * ) \"! CHK_RMIN value will be the central body radius\" end if if ( param % rmax > 0.0_DP ) write ( * , * ) \"CHK_RMAX       = \" , param % rmax if ( param % rmaxu > 0.0_DP ) write ( * , * ) \"CHK_EJECT      = \" , param % rmaxu if (( param % qmin > 0.0_DP ) . or . ( param % qmin_alo > 0.0_DP ) . or . ( param % qmin_ahi > 0.0_DP )) write ( * , * ) \"CHK_QMIN_COORD = \" , trim ( adjustl ( param % qmin_coord )) if ( param % qmin > 0.0_DP ) write ( * , * ) \"CHK_QMIN       = \" , param % qmin if (( param % qmin_alo > 0.0_DP ) . or . ( param % qmin_ahi > 0.0_DP )) write ( * , * ) \"CHK_QMIN_RANGE = \" , param % qmin_alo , param % qmin_ahi write ( * , * ) \"EXTRA_FORCE    = \" , param % lextra_force write ( * , * ) \"RHILL_PRESENT  = \" , param % lrhill_present write ( * , * ) \"ROTATION      = \" , param % lrotation write ( * , * ) \"TIDES         = \" , param % ltides write ( * , * ) \"ENERGY         = \" , param % lenergy if ( param % lenergy ) write ( * , * ) \"ENERGY_OUT     = \" , trim ( adjustl ( param % energy_out )) write ( * , * ) \"MU2KG          = \" , param % MU2KG write ( * , * ) \"TU2S           = \" , param % TU2S write ( * , * ) \"DU2M           = \" , param % DU2M if ( trim ( adjustl ( param % outfile )) == \"\" ) then param % outfile = BIN_OUTFILE end if if ( trim ( adjustl ( param % enc_out )) /= \"\" ) then write ( * , * ) \"ENC_OUT        = \" , trim ( adjustl ( param % enc_out )) else write ( * , * ) \"! ENC_OUT not set: Encounters will not be recorded to file\" end if if ( trim ( adjustl ( param % discard_out )) /= \"\" ) then write ( * , * ) \"DISCARD_OUT    = \" , trim ( adjustl ( param % discard_out )) write ( * , * ) \"BIG_DISCARD    = \" , param % lbig_discard else write ( * , * ) \"! DISCARD_OUT not set: Discards will not be recorded to file\" param % lbig_discard = . false . write ( * , * ) \"! BIG_DISCARD    = \" , param % lbig_discard end if if (( param % MU2KG < 0.0_DP ) . or . ( param % TU2S < 0.0_DP ) . or . ( param % DU2M < 0.0_DP )) then write ( iomsg , * ) 'Invalid unit conversion factor' iostat = - 1 return end if ! Calculate the G for the system units param % GU = GC / ( param % DU2M ** 3 / ( param % MU2KG * param % TU2S ** 2 )) if ( param % lgr ) then ! Calculate the inverse speed of light in the system units param % inv_c2 = einsteinC * param % TU2S / param % DU2M param % inv_c2 = ( param % inv_c2 ) ** ( - 2 ) end if associate ( integrator => v_list ( 1 )) if (( integrator == RMVS ) . or . ( integrator == SYMBA )) then if (. not . param % lclose ) then write ( iomsg , * ) 'This integrator requires CHK_CLOSE to be enabled.' iostat = - 1 return end if end if ! Determine if the GR flag is set correctly for this integrator select case ( integrator ) case ( WHM , RMVS , HELIO , SYMBA ) write ( * , * ) \"GR             = \" , param % lgr case default if ( param % lgr ) write ( iomsg , * ) 'GR is not yet implemented for this integrator. This parameter will be ignored.' param % lgr = . false . end select end associate iostat = 0 end associate 667 continue return end subroutine io_param_reader module subroutine io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) !! author: David A. Minton !! !! Dump integration parameters to file !! !! Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90 !! Adapted from Martin Duncan's Swift routine io_dump_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: self !! Collection of parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! Not used in this procedure integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! Internals character ( * ), parameter :: Ifmt = '(I0)' !! Format label for integer values character ( * ), parameter :: Rfmt = '(ES25.17)' !! Format label for real values character ( * ), parameter :: Lfmt = '(L1)' !! Format label for logical values character ( len = NAMELEN ) :: param_name character ( LEN = STRMAX ) :: param_value , v1 , v2 , v3 type character_array character ( 25 ) :: value end type character_array type ( character_array ), dimension (:), allocatable :: param_array integer ( I4B ) :: i associate ( param => self ) write ( param_name , * ) \"T0\" ; write ( param_value , Rfmt ) param % t0 ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TSTOP\" ; write ( param_value , Rfmt ) param % tstop ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"DT\" ; write ( param_value , Rfmt ) param % dt ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CB_IN\" ; write ( param_value , * ) trim ( adjustl ( param % incbfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"PL_IN\" ; write ( param_value , * ) trim ( adjustl ( param % inplfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TP_IN\" ; write ( param_value , * ) trim ( adjustl ( param % intpfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"IN_TYPE\" ; write ( param_value , * ) trim ( adjustl ( param % in_type )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"IN_FORM\" ; write ( param_value , * ) trim ( adjustl ( param % in_form )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % istep_dump > 0 ) write ( param_name , * ) \"ISTEP_DUMP\" ; write ( param_value , Ifmt ) param % istep_dump ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % istep_out > 0 ) then write ( param_name , * ) \"ISTEP_OUT\" ; write ( param_value , Ifmt ) param % istep_out ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"BIN_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % outfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"OUT_TYPE\" ; write ( param_value , * ) trim ( adjustl ( param % out_type )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"OUT_FORM\" ; write ( param_value , * ) trim ( adjustl ( param % out_form )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"OUT_STAT\" ; write ( param_value , * ) \"APPEND\" ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"PARTICLE_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % particle_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % enc_out /= \"\" ) then write ( param_name , * ) \"ENC_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % enc_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"CHK_RMIN\" ; write ( param_value , Rfmt ) param % rmin ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CHK_RMAX\" ; write ( param_value , Rfmt ) param % rmax ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CHK_EJECT\" ; write ( param_value , Rfmt ) param % rmaxu ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CHK_QMIN\" ; write ( param_value , Rfmt ) param % qmin ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % qmin >= 0.0_DP ) then write ( param_name , * ) \"CHK_QMIN_COORD\" ; write ( param_value , * ) trim ( adjustl ( param % qmin_coord )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) allocate ( param_array ( 2 )) write ( param_array ( 1 )% value , Rfmt ) param % qmin_alo write ( param_array ( 2 )% value , Rfmt ) param % qmin_ahi write ( param_name , * ) \"CHK_QMIN_RANGE\" ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ), adjustl ( param_array ( 1 )% value ), adjustl ( param_array ( 2 )% value ) end if write ( param_name , * ) \"MU2KG\" ; write ( param_value , Rfmt ) param % MU2KG ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TU2S\" ; write ( param_value , Rfmt ) param % TU2S ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"DU2M\" ; write ( param_value , Rfmt ) param % DU2M ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"RHILL_PRESENT\" ; write ( param_value , Lfmt ) param % lrhill_present ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"EXTRA_FORCE\" ; write ( param_value , Lfmt ) param % lextra_force ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % discard_out /= \"\" ) then write ( param_name , * ) \"DISCARD_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % discard_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if if ( param % discard_out /= \"\" ) then write ( param_name , * ) \"BIG_DISCARD\" ; write ( param_value , Lfmt ) param % lbig_discard ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"CHK_CLOSE\" ; write ( param_value , Lfmt ) param % lclose ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"ENERGY\" ; write ( param_value , Lfmt ) param % lenergy ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % lenergy . and . ( param % energy_out /= \"\" )) then write ( param_name , * ) \"ENERGY_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % energy_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"GR\" ; write ( param_value , Lfmt ) param % lgr ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"ROTATION\" ; write ( param_value , Lfmt ) param % lrotation ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TIDES\" ; write ( param_value , Lfmt ) param % ltides ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % lenergy ) then write ( param_name , * ) \"FIRSTENERGY\" ; write ( param_value , Lfmt ) param % lfirstenergy ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"EORBIT_ORIG\" ; write ( param_value , Rfmt ) param % Eorbit_orig ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"GMTOT_ORIG\" ; write ( param_value , Rfmt ) param % GMtot_orig ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"LTOT_ORIG\" ; write ( v1 , Rfmt ) param % Ltot_orig ( 1 ); write ( v2 , Rfmt ) param % Ltot_orig ( 2 ); write ( v3 , Rfmt ) param % Ltot_orig ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"LORBIT_ORIG\" ; write ( v1 , Rfmt ) param % Lorbit_orig ( 1 ); write ( v2 , Rfmt ) param % Lorbit_orig ( 2 ); write ( v3 , Rfmt ) param % Lorbit_orig ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"LSPIN_ORIG\" ; write ( v1 , Rfmt ) param % Lspin_orig ( 1 ); write ( v2 , Rfmt ) param % Lspin_orig ( 2 ); write ( v3 , Rfmt ) param % Lspin_orig ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"LESCAPE\" ; write ( v1 , Rfmt ) param % Lescape ( 1 ); write ( v2 , Rfmt ) param % Lescape ( 2 ); write ( v3 , Rfmt ) param % Lescape ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"GMESCAPE\" ; write ( param_value , Rfmt ) param % GMescape ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"ECOLLISIONS\" ; write ( param_value , Rfmt ) param % Ecollisions ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"EUNTRACKED\" ; write ( param_value , Rfmt ) param % Euntracked ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"FIRSTKICK\" ; write ( param_value , Lfmt ) param % lfirstkick ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"MAXID\" ; write ( param_value , Ifmt ) param % maxid ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) iostat = 0 iomsg = \"UDIO not implemented\" end associate 667 continue return end subroutine io_param_writer module subroutine io_read_in_body ( self , param ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read in either test particle or massive body data !! !! Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90 and swiftest_init_tp.f90 !! Adapted from Martin Duncan's Swift routine swiftest_init_pl.f and swiftest_init_tp.f implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of input file integer ( I4B ) :: iu = LUN integer ( I4B ) :: i , nbody logical :: is_ascii , is_pl character ( len = :), allocatable :: infile real ( DP ) :: t character ( STRMAX ) :: errmsg integer ( I4B ) :: ierr ! Select the appropriate polymorphic class (test particle or massive body) select type ( self ) class is ( swiftest_pl ) infile = param % inplfile is_pl = . true . class is ( swiftest_tp ) infile = param % intpfile is_pl = . false . end select is_ascii = ( param % in_type == 'ASCII' ) select case ( param % in_type ) case ( ASCII_TYPE ) open ( unit = iu , file = infile , status = 'old' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) read ( iu , * , err = 667 , iomsg = errmsg ) nbody case ( REAL4_TYPE , REAL8_TYPE ) open ( unit = iu , file = infile , status = 'old' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) read ( iu , err = 667 , iomsg = errmsg ) nbody case default write ( errmsg , * ) trim ( adjustl ( param % in_type )) // ' is an unrecognized file type' goto 667 end select call self % setup ( nbody , param ) ierr = 0 if ( nbody > 0 ) then ierr = self % read_frame ( iu , param ) self % status (:) = ACTIVE self % lmask (:) = . true . do i = 1 , nbody call self % info ( i )% set_value ( status = \"ACTIVE\" ) end do end if close ( iu , err = 667 , iomsg = errmsg ) if ( ierr == 0 ) return 667 continue write ( * , * ) 'Error reading in initial conditions file: ' , trim ( adjustl ( errmsg )) return end subroutine io_read_in_body module subroutine io_read_in_cb ( self , param ) !! author: David A. Minton !! !! Reads in central body data !! !! Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90 !! Adapted from Martin Duncan's Swift routine swiftest_init_pl.f implicit none ! Arguments class ( swiftest_cb ), intent ( inout ) :: self class ( swiftest_parameters ), intent ( inout ) :: param ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of input file integer ( I4B ) :: iu = LUN character ( len = STRMAX ) :: errmsg integer ( I4B ) :: ierr , idold character ( len = NAMELEN ) :: name if ( param % in_type == 'ASCII' ) then self % id = 0 param % maxid = 0 open ( unit = iu , file = param % incbfile , status = 'old' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) read ( iu , * , err = 667 , iomsg = errmsg ) name call self % info % set_value ( name = name ) read ( iu , * , err = 667 , iomsg = errmsg ) self % Gmass self % mass = real ( self % Gmass / param % GU , kind = DP ) read ( iu , * , err = 667 , iomsg = errmsg ) self % radius read ( iu , * , err = 667 , iomsg = errmsg ) self % j2rp2 read ( iu , * , err = 667 , iomsg = errmsg ) self % j4rp4 if ( param % lrotation ) then read ( iu , * , err = 667 , iomsg = errmsg ) self % Ip ( 1 ), self % Ip ( 2 ), self % Ip ( 3 ) read ( iu , * , err = 667 , iomsg = errmsg ) self % rot ( 1 ), self % rot ( 2 ), self % rot ( 3 ) end if ierr = 0 else open ( unit = iu , file = param % incbfile , status = 'old' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) ierr = self % read_frame ( iu , param ) end if close ( iu , err = 667 , iomsg = errmsg ) if ( ierr == 0 ) then if ( self % j2rp2 /= 0.0_DP ) param % loblatecb = . true . if ( param % rmin < 0.0 ) param % rmin = self % radius select type ( cb => self ) class is ( symba_cb ) cb % GM0 = cb % Gmass cb % dGM = 0.0_DP cb % R0 = cb % radius cb % L0 (:) = cb % Ip ( 3 ) * cb % mass * cb % radius ** 2 * cb % rot (:) end select end if return 667 continue write ( * , * ) \"Error reading central body file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_in_cb function io_read_encounter ( t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , & xh1 , xh2 , vh1 , vh2 , enc_out , out_type ) result ( ierr ) !! author: David A. Minton !! !! Read close encounter data from input binary files !!     Other than time t, there is no direct file input from this function !!     Function returns read error status (0 = OK, nonzero = ERROR) !! Adapted from David E. Kaufmann's Swifter routine: io_read_encounter.f90 implicit none ! Arguments integer ( I4B ), intent ( out ) :: id1 , id2 real ( DP ), intent ( out ) :: t , Gmass1 , Gmass2 , radius1 , radius2 real ( DP ), dimension (:), intent ( out ) :: xh1 , xh2 , vh1 , vh2 character ( * ), intent ( in ) :: enc_out , out_type ! Result integer ( I4B ) :: ierr ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: lun = 30 integer ( I4B ), save :: iu = lun if ( lfirst ) then open ( unit = iu , file = enc_out , status = 'OLD' , form = 'UNFORMATTED' , iostat = ierr ) if ( ierr /= 0 ) then write ( * , * ) \"Swiftest Error:\" write ( * , * ) \"   unable to open binary encounter file\" call util_exit ( FAILURE ) end if lfirst = . false . end if read ( iu , iostat = ierr ) t if ( ierr /= 0 ) then close ( unit = iu , iostat = ierr ) return end if read ( iu , iostat = ierr ) id1 , xh1 ( 1 ), xh1 ( 2 ), xh1 ( 3 ), vh1 ( 1 ), vh1 ( 2 ), vh1 ( 3 ), Gmass1 , radius1 if ( ierr /= 0 ) then close ( unit = iu , iostat = ierr ) return end if read ( iu , iostat = ierr ) id2 , xh2 ( 2 ), xh2 ( 2 ), xh2 ( 3 ), vh2 ( 2 ), vh2 ( 2 ), vh2 ( 3 ), Gmass2 , radius2 if ( ierr /= 0 ) then close ( unit = iu , iostat = ierr ) return end if return end function io_read_encounter module function io_read_frame_body ( self , iu , param ) result ( ierr ) !! author: David A. Minton !! !! Reads a frame of output of either test particle or massive body data from a binary output file !! !! Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90 !! Adapted from Hal Levison's Swift routine io_read_frame.F implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Result integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful ! Internals character ( len = STRMAX ) :: errmsg character ( len = NAMELEN ), dimension ( self % nbody ) :: name integer ( I4B ) :: i real ( QP ) :: val if ( self % nbody == 0 ) return if (( param % in_form /= EL ) . and . ( param % in_form /= XV )) then write ( errmsg , * ) trim ( adjustl ( param % in_form )) // \" is not a recognized format code for input files.\" goto 667 end if associate ( n => self % nbody ) if ( param % in_form == EL ) then if (. not . allocated ( self % a )) allocate ( self % a ( n )) if (. not . allocated ( self % e )) allocate ( self % e ( n )) if (. not . allocated ( self % inc )) allocate ( self % inc ( n )) if (. not . allocated ( self % capom )) allocate ( self % capom ( n )) if (. not . allocated ( self % omega )) allocate ( self % omega ( n )) if (. not . allocated ( self % capm )) allocate ( self % capm ( n )) end if select case ( param % in_type ) case ( REAL4_TYPE , REAL8_TYPE ) read ( iu , err = 667 , iomsg = errmsg ) self % id (:) read ( iu , err = 667 , iomsg = errmsg ) name (:) do i = 1 , n call self % info ( i )% set_value ( name = name ( i )) end do select case ( param % in_form ) case ( XV ) read ( iu , err = 667 , iomsg = errmsg ) self % xh ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) self % xh ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) self % xh ( 3 , :) read ( iu , err = 667 , iomsg = errmsg ) self % vh ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) self % vh ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) self % vh ( 3 , :) case ( EL ) read ( iu , err = 667 , iomsg = errmsg ) self % a (:) read ( iu , err = 667 , iomsg = errmsg ) self % e (:) read ( iu , err = 667 , iomsg = errmsg ) self % inc (:) read ( iu , err = 667 , iomsg = errmsg ) self % capom (:) read ( iu , err = 667 , iomsg = errmsg ) self % omega (:) read ( iu , err = 667 , iomsg = errmsg ) self % capm (:) end select select type ( pl => self ) class is ( swiftest_pl ) ! Additional output if the passed polymorphic object is a massive body read ( iu , err = 667 , iomsg = errmsg ) pl % Gmass (:) pl % mass (:) = pl % Gmass (:) / param % GU if ( param % lrhill_present ) read ( iu , err = 667 , iomsg = errmsg ) pl % rhill (:) read ( iu , err = 667 , iomsg = errmsg ) pl % radius (:) if ( param % lrotation ) then read ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 3 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 3 , :) end if if ( param % ltides ) then read ( iu , err = 667 , iomsg = errmsg ) pl % k2 (:) read ( iu , err = 667 , iomsg = errmsg ) pl % Q (:) end if end select param % maxid = max ( param % maxid , maxval ( self % id ( 1 : n ))) case ( ASCII_TYPE ) do i = 1 , n select type ( self ) class is ( swiftest_pl ) if ( param % lrhill_present ) then read ( iu , * , err = 667 , iomsg = errmsg ) name ( i ), val , self % rhill ( i ) else read ( iu , * , err = 667 , iomsg = errmsg ) name ( i ), val end if call self % info ( i )% set_value ( name = name ( i )) self % Gmass ( i ) = real ( val , kind = DP ) self % mass ( i ) = real ( val / param % GU , kind = DP ) read ( iu , * , err = 667 , iomsg = errmsg ) self % radius ( i ) class is ( swiftest_tp ) read ( iu , * , err = 667 , iomsg = errmsg ) self % id ( i ) end select select case ( param % in_form ) case ( XV ) read ( iu , * , err = 667 , iomsg = errmsg ) self % xh ( 1 , i ), self % xh ( 2 , i ), self % xh ( 3 , i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % vh ( 1 , i ), self % vh ( 2 , i ), self % vh ( 3 , i ) case ( EL ) read ( iu , * , err = 667 , iomsg = errmsg ) self % a ( i ), self % e ( i ), self % inc ( i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % capom ( i ), self % omega ( i ), self % capm ( i ) end select select type ( self ) class is ( swiftest_pl ) if ( param % lrotation ) then read ( iu , * , err = 667 , iomsg = errmsg ) self % Ip ( 1 , i ), self % Ip ( 2 , i ), self % Ip ( 3 , i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % rot ( 1 , i ), self % rot ( 2 , i ), self % rot ( 3 , i ) end if if ( param % ltides ) then read ( iu , * , err = 667 , iomsg = errmsg ) self % k2 ( i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % Q ( i ) end if end select param % maxid = param % maxid + 1 self % id ( i ) = param % maxid end do end select if ( param % in_form == EL ) then self % inc ( 1 : n ) = self % inc ( 1 : n ) * DEG2RAD self % capom ( 1 : n ) = self % capom ( 1 : n ) * DEG2RAD self % omega ( 1 : n ) = self % omega ( 1 : n ) * DEG2RAD self % capm ( 1 : n ) = self % capm ( 1 : n ) * DEG2RAD end if end associate ierr = 0 return 667 continue select type ( self ) class is ( swiftest_pl ) write ( * , * ) \"Error reading massive body file: \" // trim ( adjustl ( errmsg )) class is ( swiftest_tp ) write ( * , * ) \"Error reading test particle file: \" // trim ( adjustl ( errmsg )) class default write ( * , * ) \"Error reading body file: \" // trim ( adjustl ( errmsg )) end select call util_exit ( FAILURE ) end function io_read_frame_body module function io_read_frame_cb ( self , iu , param ) result ( ierr ) !! author: David A. Minton !! !! Reads a frame of output of central body data to the binary output file !! !! Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90 !! Adapted from Hal Levison's Swift routine io_read_frame.F implicit none ! Arguments class ( swiftest_cb ), intent ( inout ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Result integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful ! Internals character ( len = STRMAX ) :: errmsg character ( len = NAMELEN ) :: name read ( iu , err = 667 , iomsg = errmsg ) self % id read ( iu , err = 667 , iomsg = errmsg ) name call self % info % set_value ( name = name ) read ( iu , err = 667 , iomsg = errmsg ) self % Gmass self % mass = self % Gmass / param % GU read ( iu , err = 667 , iomsg = errmsg ) self % radius read ( iu , err = 667 , iomsg = errmsg ) self % j2rp2 read ( iu , err = 667 , iomsg = errmsg ) self % j4rp4 if ( param % lrotation ) then read ( iu , err = 667 , iomsg = errmsg ) self % Ip ( 1 ) read ( iu , err = 667 , iomsg = errmsg ) self % Ip ( 2 ) read ( iu , err = 667 , iomsg = errmsg ) self % Ip ( 3 ) read ( iu , err = 667 , iomsg = errmsg ) self % rot ( 1 ) read ( iu , err = 667 , iomsg = errmsg ) self % rot ( 2 ) read ( iu , err = 667 , iomsg = errmsg ) self % rot ( 3 ) end if if ( param % ltides ) then read ( iu , err = 667 , iomsg = errmsg ) self % k2 read ( iu , err = 667 , iomsg = errmsg ) self % Q end if ierr = 0 return 667 continue write ( * , * ) \"Error reading central body file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end function io_read_frame_cb module function io_read_frame_system ( self , iu , param ) result ( ierr ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read a frame (header plus records for each massive body and active test particle) from a output binary file implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Result integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful ! Internals character ( len = STRMAX ) :: errmsg integer ( I4B ) :: npl , ntp ierr = io_read_hdr ( iu , param % t , npl , ntp , param % out_form , param % out_type ) if ( is_iostat_end ( ierr )) return ! Reached the end of the frames call self % pl % setup ( npl , param ) call self % tp % setup ( ntp , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read frame header.\" goto 667 end if ierr = self % cb % read_frame ( iu , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read central body frame.\" goto 667 end if ierr = self % pl % read_frame ( iu , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read massive body frame.\" goto 667 end if ierr = self % tp % read_frame ( iu , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read test particle frame.\" goto 667 end if return 667 continue write ( * , * ) \"Error reading system frame: \" // trim ( adjustl ( errmsg )) end function io_read_frame_system function io_read_hdr ( iu , t , npl , ntp , out_form , out_type ) result ( ierr ) !! author: David A. Minton !! !! Read frame header from input binary files !!     Function returns read error status (0 = OK, nonzero = ERROR) !! Adapted from David E. Kaufmann's Swifter routine: io_read_hdr.f90 !! Adapted from Hal Levison's Swift routine io_read_hdr.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: iu integer ( I4B ), intent ( out ) :: npl , ntp character ( * ), intent ( out ) :: out_form real ( DP ), intent ( out ) :: t character ( * ), intent ( in ) :: out_type ! Result integer ( I4B ) :: ierr ! Internals real ( SP ) :: ttmp character ( len = STRMAX ) :: errmsg select case ( out_type ) case ( REAL4_TYPE ) read ( iu , iostat = ierr , err = 667 , iomsg = errmsg , end = 333 ) ttmp t = ttmp case ( REAL8_TYPE ) read ( iu , iostat = ierr , err = 667 , iomsg = errmsg , end = 333 ) t case default write ( errmsg , * ) trim ( adjustl ( out_type )) // ' is an unrecognized file type' ierr = - 1 end select read ( iu , iostat = ierr , err = 667 , iomsg = errmsg ) npl read ( iu , iostat = ierr , err = 667 , iomsg = errmsg ) ntp read ( iu , iostat = ierr , err = 667 , iomsg = errmsg ) out_form return 667 continue write ( * , * ) \"Error reading header: \" // trim ( adjustl ( errmsg )) 333 continue return return end function io_read_hdr module subroutine io_read_in_param ( self , param_file_name ) !! author: David A. Minton !! !! Read in parameters for the integration !! !! Adapted from David E. Kaufmann's Swifter routine io_init_param.f90 !! Adapted from Martin Duncan's Swift routine io_init_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( inout ) :: self !! Current run configuration parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of input file integer ( I4B ) :: ierr = 0 !! Input error code character ( STRMAX ) :: errmsg !! Error message in UDIO procedure ! Read in name of parameter file write ( * , * ) 'Parameter input file is ' , trim ( adjustl ( param_file_name )) write ( * , * ) ' ' 100 format ( A ) open ( unit = LUN , file = param_file_name , status = 'old' , iostat = ierr , err = 667 , iomsg = errmsg ) !! todo: Currently this procedure does not work in user-defined derived-type input mode !!    as the newline characters are ignored in the input file when compiled in ifort. !read(LUN,'(DT)', iostat= ierr, iomsg = errmsg) param call self % reader ( LUN , iotype = \"none\" , v_list = [ self % integrator ], iostat = ierr , iomsg = errmsg ) if ( ierr == 0 ) return 667 continue write ( * , * ) \"Error reading parameter file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_in_param module subroutine io_read_in_particle_info ( self , iu ) !! author: David A. Minton !! !! Reads in particle information object information from an open file unformatted file implicit none ! Arguments class ( swiftest_particle_info ), intent ( inout ) :: self !! Particle metadata information object integer ( I4B ), intent ( in ) :: iu !! Open file unit number ! Internals character ( STRMAX ) :: errmsg read ( iu , err = 667 , iomsg = errmsg ) self % name read ( iu , err = 667 , iomsg = errmsg ) self % particle_type read ( iu , err = 667 , iomsg = errmsg ) self % origin_type read ( iu , err = 667 , iomsg = errmsg ) self % origin_time read ( iu , err = 667 , iomsg = errmsg ) self % origin_xh (:) read ( iu , err = 667 , iomsg = errmsg ) self % origin_vh (:) return 667 continue write ( * , * ) \"Error reading particle metadata information from file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_in_particle_info module subroutine io_read_particle_info_system ( self , param ) !! author: David A. Minton !! !! Reads an old particle information file for a restartd run implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 22 integer ( I4B ) :: i , id , idx logical :: lmatch character ( STRMAX ) :: errmsg type ( swiftest_particle_info ), allocatable :: tmpinfo open ( unit = LUN , file = param % particle_out , status = 'OLD' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) allocate ( tmpinfo , mold = self % cb % info ) select type ( cb => self % cb ) class is ( swiftest_cb ) select type ( pl => self % pl ) class is ( swiftest_pl ) select type ( tp => self % tp ) class is ( swiftest_tp ) associate ( npl => pl % nbody , ntp => tp % nbody ) do lmatch = . false . read ( LUN , err = 667 , iomsg = errmsg , end = 333 ) id if ( id == cb % id ) then call cb % info % read_in ( LUN ) lmatch = . true . else if ( npl > 0 ) then idx = findloc ( pl % id ( 1 : npl ), id , dim = 1 ) if ( idx /= 0 ) then call pl % info ( idx )% read_in ( LUN ) lmatch = . true . end if end if if (. not . lmatch . and . ntp > 0 ) then idx = findloc ( tp % id ( 1 : ntp ), id , dim = 1 ) if ( idx /= 0 ) then call tp % info ( idx )% read_in ( LUN ) lmatch = . true . end if end if end if if (. not . lmatch ) then call tmpinfo % read_in ( LUN ) end if end do end associate close ( unit = LUN , err = 667 , iomsg = errmsg ) end select end select end select 333 continue return 667 continue write ( * , * ) \"Error reading particle information file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_particle_info_system module subroutine io_toupper ( string ) !! author: David A. Minton !! !! Convert string to uppercase !! !! Adapted from David E. Kaufmann's Swifter routine: util_toupper.f90 implicit none ! Arguments character ( * ), intent ( inout ) :: string !! String to make upper case ! Internals integer ( I4B ) :: i , length , idx length = len ( string ) do i = 1 , length idx = iachar ( string ( i : i )) if (( idx >= lowercase_begin ) . and . ( idx <= lowercase_end )) then idx = idx + uppercase_offset string ( i : i ) = achar ( idx ) end if end do return end subroutine io_toupper module subroutine io_write_discard ( self , param ) !! author: David A. Minton !! !! Write out information about discarded test particle !! !! Adapted from David E. Kaufmann's Swifter routine  io_discard_write.f90 !! Adapted from Hal Levison's Swift routine io_discard_write.f implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 40 integer ( I4B ) :: i logical , save :: lfirst = . true . real ( DP ), dimension (:,:), allocatable :: vh character ( * ), parameter :: HDRFMT = '(E23.16, 1X, I8, 1X, L1)' character ( * ), parameter :: NAMEFMT = '(A, 2(1X, I8))' character ( * ), parameter :: VECFMT = '(3(E23.16, 1X))' character ( * ), parameter :: NPLFMT = '(I8)' character ( * ), parameter :: PLNAMEFMT = '(I8, 2(1X, E23.16))' class ( swiftest_body ), allocatable :: pltemp character ( len = STRMAX ) :: errmsg , out_stat associate ( tp_discards => self % tp_discards , nsp => self % tp_discards % nbody , pl => self % pl , npl => self % pl % nbody ) ! Record the discarded body metadata information to file if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call param % nciu % open ( param ) call tp_discards % write_particle_info ( param % nciu ) call param % nciu % close ( param ) end if if ( param % discard_out == \"\" ) return if ( nsp == 0 ) return if ( lfirst ) then out_stat = param % out_stat else out_stat = 'APPEND' end if select case ( out_stat ) case ( 'APPEND' ) open ( unit = LUN , file = param % discard_out , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) open ( unit = LUN , file = param % discard_out , status = param % out_stat , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code for OUT_STAT: ' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . if ( param % lgr ) call tp_discards % pv2v ( param ) write ( LUN , HDRFMT ) param % t , nsp , param % lbig_discard do i = 1 , nsp write ( LUN , NAMEFMT , err = 667 , iomsg = errmsg ) SUB , tp_discards % id ( i ), tp_discards % status ( i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) tp_discards % xh ( 1 , i ), tp_discards % xh ( 2 , i ), tp_discards % xh ( 3 , i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) tp_discards % vh ( 1 , i ), tp_discards % vh ( 2 , i ), tp_discards % vh ( 3 , i ) end do if ( param % lbig_discard ) then if ( param % lgr ) then allocate ( pltemp , source = pl ) call pltemp % pv2v ( param ) allocate ( vh , source = pltemp % vh ) deallocate ( pltemp ) else allocate ( vh , source = pl % vh ) end if write ( LUN , NPLFMT ) npl do i = 1 , npl write ( LUN , PLNAMEFMT , err = 667 , iomsg = errmsg ) pl % id ( i ), pl % Gmass ( i ), pl % radius ( i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl % xh ( 1 , i ), pl % xh ( 2 , i ), pl % xh ( 3 , i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) vh ( 1 , i ), vh ( 2 , i ), vh ( 3 , i ) end do deallocate ( vh ) end if close ( LUN ) end associate return 667 continue write ( * , * ) \"Error writing discard file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_discard module subroutine io_write_encounter ( self , pl , encbody , param ) implicit none ! Arguments class ( swiftest_encounter ), intent ( in ) :: self !! Swiftest encounter list object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: encbody !! Encountering body - Swiftest generic body object (pl or tp) class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: LUN = 30 integer ( I4B ) :: k , ierr character ( len = STRMAX ) :: errmsg if ( param % enc_out == \"\" . or . self % nenc == 0 ) return open ( unit = LUN , file = param % enc_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , iostat = ierr , iomsg = errmsg ) if ( ierr /= 0 ) then if ( lfirst ) then open ( unit = LUN , file = param % enc_out , status = 'NEW' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) else goto 667 end if end if lfirst = . false . associate ( ind1 => self % index1 , ind2 => self % index2 ) select type ( encbody ) class is ( swiftest_pl ) do k = 1 , self % nenc call io_write_frame_encounter ( LUN , self % t ( k ), & pl % id ( ind1 ( k )), encbody % id ( ind2 ( k )), & pl % Gmass ( ind1 ( k )), encbody % Gmass ( ind2 ( k )), & pl % radius ( ind1 ( k )), encbody % radius ( ind2 ( k )), & self % x1 (:, k ), self % x2 (:, k ), & self % v1 (:, k ), self % v2 (:, k )) end do class is ( swiftest_tp ) do k = 1 , self % nenc call io_write_frame_encounter ( LUN , self % t ( k ), & pl % id ( ind1 ( k )), encbody % id ( ind2 ( k )), & pl % Gmass ( ind1 ( k )), 0.0_DP , & pl % radius ( ind1 ( k )), 0.0_DP , & self % x1 (:, k ), self % x2 (:, k ), & self % v1 (:, k ), self % v2 (:, k )) end do end select end associate close ( unit = LUN , err = 667 , iomsg = errmsg ) return 667 continue write ( * , * ) \"Error writing encounter file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_encounter module subroutine io_write_frame_body ( self , iu , param ) !! author: David A. Minton !! !! Write a frame of output of either test particle or massive body data to the binary output file !!    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method !! !! Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90 !! Adapted from Hal Levison's Swift routine io_write_frame.F implicit none ! Arguments class ( swiftest_body ), intent ( in ) :: self !! Swiftest particle object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals character ( len = STRMAX ) :: errmsg associate ( n => self % nbody ) if ( n == 0 ) return write ( iu , err = 667 , iomsg = errmsg ) self % id ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % info ( 1 : n )% name if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then write ( iu , err = 667 , iomsg = errmsg ) self % xh ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % xh ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % xh ( 3 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % vh ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % vh ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % vh ( 3 , 1 : n ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then write ( iu , err = 667 , iomsg = errmsg ) self % a ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % e ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % inc ( 1 : n ) * RAD2DEG write ( iu , err = 667 , iomsg = errmsg ) self % capom ( 1 : n ) * RAD2DEG write ( iu , err = 667 , iomsg = errmsg ) self % omega ( 1 : n ) * RAD2DEG write ( iu , err = 667 , iomsg = errmsg ) self % capm ( 1 : n ) * RAD2DEG end if select type ( pl => self ) class is ( swiftest_pl ) ! Additional output if the passed polymorphic object is a massive body write ( iu , err = 667 , iomsg = errmsg ) pl % Gmass ( 1 : n ) if ( param % lrhill_present ) write ( iu , err = 667 , iomsg = errmsg ) pl % rhill ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % radius ( 1 : n ) if ( param % lrotation ) then write ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 3 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 3 , 1 : n ) end if if ( param % ltides ) then write ( iu , err = 667 , iomsg = errmsg ) pl % k2 ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % Q ( 1 : n ) end if end select end associate return 667 continue write ( * , * ) \"Error writing body frame: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_frame_body module subroutine io_write_frame_cb ( self , iu , param ) !! author: David A. Minton !! !! Write a frame of output of central body data to the binary output file !! !! Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90 !! Adapted from Hal Levison's Swift routine io_write_frame.F implicit none ! Arguments class ( swiftest_cb ), intent ( in ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals character ( len = STRMAX ) :: errmsg associate ( cb => self ) write ( iu , err = 667 , iomsg = errmsg ) cb % id write ( iu , err = 667 , iomsg = errmsg ) cb % info % name write ( iu , err = 667 , iomsg = errmsg ) cb % Gmass write ( iu , err = 667 , iomsg = errmsg ) cb % radius write ( iu , err = 667 , iomsg = errmsg ) cb % j2rp2 write ( iu , err = 667 , iomsg = errmsg ) cb % j4rp4 if ( param % lrotation ) then write ( iu , err = 667 , iomsg = errmsg ) cb % Ip ( 1 ) write ( iu , err = 667 , iomsg = errmsg ) cb % Ip ( 2 ) write ( iu , err = 667 , iomsg = errmsg ) cb % Ip ( 3 ) write ( iu , err = 667 , iomsg = errmsg ) cb % rot ( 1 ) write ( iu , err = 667 , iomsg = errmsg ) cb % rot ( 2 ) write ( iu , err = 667 , iomsg = errmsg ) cb % rot ( 3 ) end if if ( param % ltides ) then write ( iu , err = 667 , iomsg = errmsg ) cb % k2 write ( iu , err = 667 , iomsg = errmsg ) cb % Q end if end associate return 667 continue write ( * , * ) \"Error writing central body frame: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_frame_cb module subroutine io_write_frame_encounter ( iu , t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 ) !! author: David A. Minton !! !! Write a single frame of close encounter data to output binary files !! !! Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90 !! Adapted from Hal Levison's Swift routine io_write_encounter.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: iu !! Open file unit number real ( DP ), intent ( in ) :: t !! Time of encounter integer ( I4B ), intent ( in ) :: id1 , id2 !! ids of the two encountering bodies real ( DP ), intent ( in ) :: Gmass1 , Gmass2 !! G*mass of the two encountering bodies real ( DP ), intent ( in ) :: radius1 , radius2 !! Radii of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 !! Heliocentric position vectors of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: vh1 , vh2 !! Heliocentric velocity vectors of the two encountering bodies ! Internals character ( len = STRMAX ) :: errmsg write ( iu , err = 667 , iomsg = errmsg ) t write ( iu , err = 667 , iomsg = errmsg ) id1 , xh1 ( 1 ), xh1 ( 2 ), xh1 ( 3 ), vh1 ( 1 ), vh1 ( 2 ), Gmass1 , radius1 write ( iu , err = 667 , iomsg = errmsg ) id2 , xh2 ( 1 ), xh2 ( 2 ), xh2 ( 3 ), vh2 ( 1 ), vh2 ( 2 ), Gmass2 , radius2 return 667 continue write ( * , * ) \"Error writing encounter file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine module subroutine io_write_frame_system ( self , param ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Write a frame (header plus records for each massive body and active test particle) to output binary file !! There is no direct file output from this subroutine !! !! Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90 !! Adapted from Hal Levison's Swift routine io_write_frame.F implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals logical , save :: lfirst = . true . !! Flag to determine if this is the first call of this method class ( swiftest_cb ), allocatable :: cb !! Temporary local version of pl structure used for non-destructive conversions class ( swiftest_pl ), allocatable :: pl !! Temporary local version of pl structure used for non-destructive conversions class ( swiftest_tp ), allocatable :: tp !! Temporary local version of pl structure used for non-destructive conversions character ( len = STRMAX ) :: errmsg integer ( I4B ) :: iu = BINUNIT !! Unit number for the output file to write frame to logical :: fileExists if (. not . lfirst . and . param % lenergy ) call self % conservation_report ( param , lterminal = . true .) allocate ( cb , source = self % cb ) allocate ( pl , source = self % pl ) allocate ( tp , source = self % tp ) iu = BINUNIT if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE )) then if ( lfirst ) then select case ( param % out_stat ) case ( 'APPEND' ) open ( unit = iu , file = param % outfile , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) open ( unit = iu , file = param % outfile , status = param % out_stat , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code for OUT_STAT: ' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . else open ( unit = iu , file = param % outfile , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) end if else if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then if ( lfirst ) then inquire ( file = param % outfile , exist = fileExists ) select case ( param % out_stat ) case ( 'APPEND' ) if (. not . fileExists ) then errmsg = param % outfile // \" not found! You must specify OUT_STAT = NEW, REPLACE, or UNKNOWN\" goto 667 end if case ( 'NEW' ) if ( fileExists ) then errmsg = param % outfile // \" Alread Exists! You must specify OUT_STAT = OLD, REPLACE, or UNKNOWN\" goto 667 end if case ( 'REPLACE' , 'UNKNOWN' ) if ( fileExists ) then open ( file = param % outfile , unit = iu , status = 'OLD' ) close ( unit = BINUNIT , status = \"delete\" ) end if end select select case ( param % out_stat ) case ( 'APPEND' ) call param % nciu % open ( param ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) call param % nciu % initialize ( param ) call param % nciu % close ( param ) call param % nciu % open ( param ) end select lfirst = . false . else call param % nciu % open ( param ) end if end if if ( param % lgr ) then call pl % pv2v ( param ) call tp % pv2v ( param ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then ! Do an orbital element conversion prior to writing out the frame, as we have access to the central body here call pl % xv2el ( cb ) call tp % xv2el ( cb ) end if ! Write out each data type frame if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE )) then call self % write_hdr ( iu , param ) call cb % write_frame ( iu , param ) call pl % write_frame ( iu , param ) call tp % write_frame ( iu , param ) close ( iu , err = 667 , iomsg = errmsg ) else if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call self % write_hdr ( param % nciu , param ) call cb % write_frame ( param % nciu , param ) call pl % write_frame ( param % nciu , param ) call tp % write_frame ( param % nciu , param ) call param % nciu % close ( param ) end if return 667 continue write ( * , * ) \"Error writing system frame: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_frame_system module subroutine io_write_hdr_system ( self , iu , param ) ! t, npl, ntp, out_form, out_type) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Write frame header to output binary file !! !! Adapted from David Adapted from David E. Kaufmann's Swifter routine io_write_hdr.f90 !! Adapted from Hal Levison's Swift routine io_write_hdr.F implicit none ! Arguments class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object integer ( I4B ), intent ( inout ) :: iu !! Output file unit number class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals character ( len = STRMAX ) :: errmsg select case ( param % out_type ) case ( REAL4_TYPE ) write ( iu , err = 667 , iomsg = errmsg ) real ( param % t , kind = SP ) case ( REAL8_TYPE ) write ( iu , err = 667 , iomsg = errmsg ) param % t end select write ( iu , err = 667 , iomsg = errmsg ) self % pl % nbody write ( iu , err = 667 , iomsg = errmsg ) self % tp % nbody write ( iu , err = 667 , iomsg = errmsg ) param % out_form return 667 continue write ( * , * ) \"Error writing header: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_hdr_system end submodule s_io","tags":"","loc":"sourcefile/io.f90.html"},{"title":"setup.f90 – swiftest","text":"This file depends on sourcefile~~setup.f90~~EfferentGraph sourcefile~setup.f90 setup.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~setup.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_setup Source Code setup.f90 Source Code submodule ( swiftest_classes ) s_setup use swiftest contains module subroutine setup_construct_system ( system , param ) !! author: David A. Minton !! !! Constructor for a Swiftest nbody system. Creates the nbody system object based on the user-input integrator !! implicit none ! Arguments class ( swiftest_nbody_system ), allocatable , intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Swiftest parameters select case ( param % integrator ) case ( BS ) write ( * , * ) 'Bulirsch-Stoer integrator not yet enabled' case ( HELIO ) allocate ( helio_nbody_system :: system ) select type ( system ) class is ( helio_nbody_system ) allocate ( helio_cb :: system % cb ) allocate ( helio_pl :: system % pl ) allocate ( helio_tp :: system % tp ) allocate ( helio_tp :: system % tp_discards ) end select case ( RA15 ) write ( * , * ) 'Radau integrator not yet enabled' case ( TU4 ) write ( * , * ) 'TU4 integrator not yet enabled' case ( WHM ) allocate ( whm_nbody_system :: system ) select type ( system ) class is ( whm_nbody_system ) allocate ( whm_cb :: system % cb ) allocate ( whm_pl :: system % pl ) allocate ( whm_tp :: system % tp ) allocate ( whm_tp :: system % tp_discards ) end select case ( RMVS ) allocate ( rmvs_nbody_system :: system ) select type ( system ) class is ( rmvs_nbody_system ) allocate ( rmvs_cb :: system % cb ) allocate ( rmvs_pl :: system % pl ) allocate ( rmvs_tp :: system % tp ) allocate ( rmvs_tp :: system % tp_discards ) end select case ( SYMBA ) allocate ( symba_nbody_system :: system ) select type ( system ) class is ( symba_nbody_system ) allocate ( symba_cb :: system % cb ) allocate ( symba_pl :: system % pl ) allocate ( symba_tp :: system % tp ) allocate ( symba_tp :: system % tp_discards ) allocate ( symba_merger :: system % pl_adds ) allocate ( symba_merger :: system % pl_discards ) allocate ( symba_pltpenc :: system % pltpenc_list ) allocate ( symba_plplenc :: system % plplenc_list ) allocate ( symba_plplenc :: system % plplcollision_list ) end select case ( RINGMOONS ) write ( * , * ) 'RINGMOONS-SyMBA integrator not yet enabled' case default write ( * , * ) 'Unkown integrator' , param % integrator call util_exit ( FAILURE ) end select return end subroutine setup_construct_system module subroutine setup_encounter ( self , n ) !! author: David A. Minton !! !! A constructor that sets the number of encounters and allocates and initializes all arrays !! implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for if ( n < 0 ) return if ( allocated ( self % lvdotr )) deallocate ( self % lvdotr ) if ( allocated ( self % status )) deallocate ( self % status ) if ( allocated ( self % kidx )) deallocate ( self % kidx ) if ( allocated ( self % index1 )) deallocate ( self % index1 ) if ( allocated ( self % index2 )) deallocate ( self % index2 ) if ( allocated ( self % id1 )) deallocate ( self % id1 ) if ( allocated ( self % id2 )) deallocate ( self % id2 ) if ( allocated ( self % x1 )) deallocate ( self % x1 ) if ( allocated ( self % x2 )) deallocate ( self % x2 ) if ( allocated ( self % v1 )) deallocate ( self % v1 ) if ( allocated ( self % v2 )) deallocate ( self % v2 ) if ( allocated ( self % t )) deallocate ( self % t ) self % nenc = n if ( n == 0 ) return allocate ( self % lvdotr ( n )) allocate ( self % status ( n )) allocate ( self % kidx ( n )) allocate ( self % index1 ( n )) allocate ( self % index2 ( n )) allocate ( self % id1 ( n )) allocate ( self % id2 ( n )) allocate ( self % x1 ( NDIM , n )) allocate ( self % x2 ( NDIM , n )) allocate ( self % v1 ( NDIM , n )) allocate ( self % v2 ( NDIM , n )) allocate ( self % t ( n )) self % lvdotr (:) = . false . self % status (:) = INACTIVE self % kidx (:) = 0_I8B self % index1 (:) = 0 self % index2 (:) = 0 self % id1 (:) = 0 self % id2 (:) = 0 self % x1 (:,:) = 0.0_DP self % x2 (:,:) = 0.0_DP self % v1 (:,:) = 0.0_DP self % v2 (:,:) = 0.0_DP self % t (:) = 0.0_DP return end subroutine setup_encounter module subroutine setup_initialize_particle_info_system ( self , param ) !! author: David A. Minton !! !! Setup up particle information metadata from initial conditions ! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i associate ( cb => self % cb , pl => self % pl , npl => self % pl % nbody , tp => self % tp , ntp => self % tp % nbody ) call cb % info % set_value ( particle_type = CB_TYPE_NAME , status = \"ACTIVE\" , origin_type = \"Initial conditions\" , origin_time = param % t0 , origin_xh = [ 0.0_DP , 0.0_DP , 0.0_DP ], origin_vh = [ 0.0_DP , 0.0_DP , 0.0_DP ]) do i = 1 , self % pl % nbody call pl % info ( i )% set_value ( particle_type = PL_TYPE_NAME , status = \"ACTIVE\" , origin_type = \"Initial conditions\" , origin_time = param % t0 , origin_xh = self % pl % xh (:, i ), origin_vh = self % pl % vh (:, i )) end do do i = 1 , self % tp % nbody call tp % info ( i )% set_value ( particle_type = TP_TYPE_NAME , status = \"ACTIVE\" , origin_type = \"Initial conditions\" , origin_time = param % t0 , origin_xh = self % tp % xh (:, i ), origin_vh = self % tp % vh (:, i )) end do end associate return end subroutine setup_initialize_particle_info_system module subroutine setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Wrapper method to initialize a basic Swiftest nbody system from files !! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters call self % cb % read_in ( param ) call self % pl % read_in ( param ) call self % tp % read_in ( param ) call self % validate_ids ( param ) call self % set_msys () call self % pl % set_mu ( self % cb ) call self % tp % set_mu ( self % cb ) if ( param % in_form == EL ) then call self % pl % el2xv ( self % cb ) call self % tp % el2xv ( self % cb ) end if call self % pl % index ( param ) if (. not . param % lrhill_present ) call self % pl % set_rhill ( self % cb ) self % pl % lfirst = param % lfirstkick self % tp % lfirst = param % lfirstkick if ( param % lrestart ) then call self % read_particle_info ( param ) else call self % init_particle_info ( param ) end if return end subroutine setup_initialize_system module subroutine setup_body ( self , n , param ) !! author: David A. Minton !! !! Constructor for base Swiftest particle class. Allocates space for all particles and !! initializes all components with a value. !! Note: Timing tests indicate that (NDIM, n) is more efficient than (NDIM, n) implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i if ( n < 0 ) return self % lfirst = . true . if ( allocated ( self % info )) deallocate ( self % info ) if ( allocated ( self % id )) deallocate ( self % id ) if ( allocated ( self % status )) deallocate ( self % status ) if ( allocated ( self % ldiscard )) deallocate ( self % ldiscard ) if ( allocated ( self % lmask )) deallocate ( self % lmask ) if ( allocated ( self % mu )) deallocate ( self % mu ) if ( allocated ( self % xh )) deallocate ( self % xh ) if ( allocated ( self % vh )) deallocate ( self % vh ) if ( allocated ( self % xb )) deallocate ( self % xb ) if ( allocated ( self % vb )) deallocate ( self % vb ) if ( allocated ( self % ah )) deallocate ( self % ah ) if ( allocated ( self % aobl )) deallocate ( self % aobl ) if ( allocated ( self % agr )) deallocate ( self % lmask ) if ( allocated ( self % atide )) deallocate ( self % lmask ) if ( allocated ( self % ir3h )) deallocate ( self % ir3h ) if ( allocated ( self % a )) deallocate ( self % a ) if ( allocated ( self % e )) deallocate ( self % e ) if ( allocated ( self % e )) deallocate ( self % e ) if ( allocated ( self % inc )) deallocate ( self % inc ) if ( allocated ( self % capom )) deallocate ( self % capom ) if ( allocated ( self % omega )) deallocate ( self % omega ) if ( allocated ( self % capm )) deallocate ( self % capm ) self % nbody = n if ( n == 0 ) return allocate ( self % info ( n )) allocate ( self % id ( n )) allocate ( self % status ( n )) allocate ( self % ldiscard ( n )) allocate ( self % lmask ( n )) allocate ( self % mu ( n )) allocate ( self % xh ( NDIM , n )) allocate ( self % vh ( NDIM , n )) allocate ( self % xb ( NDIM , n )) allocate ( self % vb ( NDIM , n )) allocate ( self % ah ( NDIM , n )) allocate ( self % ir3h ( n )) self % id (:) = 0 do i = 1 , n call self % info ( i )% set_value (& name = \"UNNAMED\" , & particle_type = \"UNKNOWN\" , & status = \"INACTIVE\" , & origin_type = \"UNKNOWN\" , & origin_time = - huge ( 1.0_DP ), & origin_xh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & origin_vh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & discard_time = - huge ( 1.0_DP ), & discard_xh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & discard_vh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & discard_body_id = - 1 & ) end do self % status (:) = INACTIVE self % lmask (:) = . false . self % ldiscard (:) = . false . self % xh (:,:) = 0.0_DP self % vh (:,:) = 0.0_DP self % xb (:,:) = 0.0_DP self % vb (:,:) = 0.0_DP self % ah (:,:) = 0.0_DP self % ir3h (:) = 0.0_DP self % mu (:) = 0.0_DP if ( param % loblatecb ) then allocate ( self % aobl ( NDIM , n )) self % aobl (:,:) = 0.0_DP end if if ( param % ltides ) then allocate ( self % atide ( NDIM , n )) self % atide (:,:) = 0.0_DP end if if ( param % lgr ) then allocate ( self % agr ( NDIM , n )) self % agr (:,:) = 0.0_DP end if return end subroutine setup_body module subroutine setup_pl ( self , n , param ) !! author: David A. Minton !! !! Constructor for base Swiftest massive body class. Allocates space for all particles and !! initializes all components with a value. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class !> The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure call setup_body ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % mass )) deallocate ( self % mass ) if ( allocated ( self % Gmass )) deallocate ( self % Gmass ) if ( allocated ( self % rhill )) deallocate ( self % rhill ) if ( allocated ( self % radius )) deallocate ( self % radius ) if ( allocated ( self % density )) deallocate ( self % density ) if ( allocated ( self % rot )) deallocate ( self % rot ) if ( allocated ( self % Ip )) deallocate ( self % Ip ) if ( allocated ( self % k2 )) deallocate ( self % k2 ) if ( allocated ( self % Q )) deallocate ( self % Q ) if ( allocated ( self % tlag )) deallocate ( self % tlag ) if ( n == 0 ) return allocate ( self % mass ( n )) allocate ( self % Gmass ( n )) allocate ( self % rhill ( n )) self % mass (:) = 0.0_DP self % Gmass (:) = 0.0_DP self % rhill (:) = 0.0_DP self % nplpl = 0 if ( param % lclose ) then allocate ( self % radius ( n )) allocate ( self % density ( n )) self % radius (:) = 0.0_DP self % density (:) = 1.0_DP end if if ( param % lrotation ) then allocate ( self % rot ( NDIM , n )) allocate ( self % Ip ( NDIM , n )) self % rot (:,:) = 0.0_DP self % Ip (:,:) = 0.0_DP end if if ( param % ltides ) then allocate ( self % k2 ( n )) allocate ( self % Q ( n )) allocate ( self % tlag ( n )) self % k2 (:) = 0.0_DP self % Q (:) = 0.0_DP self % tlag (:) = 0.0_DP end if return end subroutine setup_pl module subroutine setup_tp ( self , n , param ) !! author: David A. Minton !! !! Constructor for base Swiftest test particle particle class. Allocates space for !! all particles and initializes all components with a value. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class !> The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure call setup_body ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % isperi )) deallocate ( self % isperi ) if ( allocated ( self % peri )) deallocate ( self % peri ) if ( allocated ( self % atp )) deallocate ( self % atp ) if ( n == 0 ) return allocate ( self % isperi ( n )) allocate ( self % peri ( n )) allocate ( self % atp ( n )) self % isperi (:) = 0 self % peri (:) = 0.0_DP self % atp (:) = 0.0_DP return end subroutine setup_tp end submodule s_setup","tags":"","loc":"sourcefile/setup.f90.html"},{"title":"user_getacch.f90 – swiftest","text":"This file depends on sourcefile~~user_getacch.f90~~EfferentGraph sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~user_getacch.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_user_kick_getacch Source Code user_getacch.f90 Source Code submodule ( swiftest_classes ) s_user_kick_getacch use swiftest contains module subroutine user_kick_getacch_body ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Add user-supplied heliocentric accelerations to planets. !! !! Adapted from David E. Kaufmann's Swifter routine whm_user_kick_getacch.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody_system_object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters user parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the ste return end subroutine user_kick_getacch_body end submodule s_user_kick_getacch","tags":"","loc":"sourcefile/user_getacch.f90.html"},{"title":"drift.f90 – swiftest","text":"This file depends on sourcefile~~drift.f90~~EfferentGraph sourcefile~drift.f90 drift.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~drift.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules drift_implementation Source Code drift.f90 Source Code submodule ( swiftest_classes ) drift_implementation use swiftest !> Integration control parameters: real ( DP ), parameter :: E2MAX = 0.36_DP real ( DP ), parameter :: DM2MAX = 0.16_DP real ( DP ), parameter :: E2DM2MAX = 0.0016_DP real ( DP ), parameter :: DANBYB = 1.0E-13_DP integer ( I2B ), parameter :: NLAG1 = 50 integer ( I2B ), parameter :: NLAG2 = 40 contains module subroutine drift_body ( self , system , param , dt ) !! author: David A. Minton !! !! Loop bodies and call Danby drift routine on the heliocentric position and velocities. !! !! Adapted from Hal Levison's Swift routine drift_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals integer ( I4B ) :: i integer ( I4B ), dimension (:), allocatable :: iflag associate ( n => self % nbody ) allocate ( iflag ( n )) iflag (:) = 0 call drift_all ( self % mu , self % xh , self % vh , self % nbody , param , dt , self % lmask , iflag ) if ( any ( iflag ( 1 : n ) /= 0 )) then where ( iflag ( 1 : n ) /= 0 ) self % status ( 1 : n ) = DISCARDED_DRIFTERR do i = 1 , n if ( iflag ( i ) /= 0 ) write ( * , * ) \" Body \" , self % id ( i ), \" lost due to error in Danby drift\" end do end if end associate return end subroutine drift_body module pure subroutine drift_all ( mu , x , v , n , param , dt , mask , iflag ) !! author: David A. Minton !! !! Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector. !! !! Adapted from Hal Levison's Swift routine drift_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f9 implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: mu !! Vector of gravitational constants real ( DP ), dimension (:,:), intent ( inout ) :: x , v !! Position and velocity vectors integer ( I4B ), intent ( in ) :: n !! number of bodies class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize logical , dimension (:), intent ( in ) :: mask !! Logical mask of size self%nbody that determines which bodies to drift. integer ( I4B ), dimension (:), intent ( out ) :: iflag !! Vector of error flags. 0 means no problem ! Internals integer ( I4B ) :: i real ( DP ) :: energy , vmag2 , rmag !! Variables used in GR calculation real ( DP ), dimension (:), allocatable :: dtp if ( n == 0 ) return allocate ( dtp ( n )) if ( param % lgr ) then do concurrent ( i = 1 : n , mask ( i )) rmag = norm2 ( x (:, i )) vmag2 = dot_product ( v (:, i ), v (:, i )) energy = 0.5_DP * vmag2 - mu ( i ) / rmag dtp ( i ) = dt * ( 1.0_DP + 3 * param % inv_c2 * energy ) end do else where ( mask ( 1 : n )) dtp ( 1 : n ) = dt end if do concurrent ( i = 1 : n , mask ( i )) call drift_one ( mu ( i ), x ( 1 , i ), x ( 2 , i ), x ( 3 , i ), v ( 1 , i ), v ( 2 , i ), v ( 3 , i ), dtp ( i ), iflag ( i )) end do return end subroutine drift_all module pure elemental subroutine drift_one ( mu , px , py , pz , vx , vy , vz , dt , iflag ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient !! !! Adapted from David E. Kaufmann's Swifter routine routine drift_one.f90 !! Adapted from Hal Levison and Martin Duncan's Swift routine drift_one.f implicit none ! Arguments real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real ( DP ), intent ( inout ) :: px , py , pz , vx , vy , vz !! Position and velocity of body to drift real ( DP ), intent ( in ) :: dt !! Step size integer ( I4B ), intent ( out ) :: iflag !! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) ! Internals integer ( I4B ) :: i real ( DP ) :: dttmp real ( DP ), dimension ( NDIM ) :: x , v x = [ px , py , pz ] v = [ vx , vy , vz ] call drift_dan ( mu , x (:), v (:), dt , iflag ) if ( iflag /= 0 ) then dttmp = 0.1_DP * dt do i = 1 , 10 call drift_dan ( mu , x (:), v (:), dttmp , iflag ) if ( iflag /= 0 ) exit end do end if px = x ( 1 ); py = x ( 2 ); pz = x ( 3 ) vx = v ( 1 ); vy = v ( 2 ); vz = v ( 3 ) return end subroutine drift_one pure subroutine drift_dan ( mu , x0 , v0 , dt0 , iflag ) !! author: David A. Minton !! !! Perform Kepler drift, solving Kepler's equation in appropriate variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_dan.f90 !! Adapted from Hal Levison and Martin Duncan's Swift routine drift_dan.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: mu , dt0 real ( DP ), dimension (:), intent ( inout ) :: x0 , v0 real ( DP ) :: dt , f , g , fdot , gdot , c1 , c2 , c3 , u , alpha , fp , r0 real ( DP ) :: v0s , a , asq , en , dm , ec , es , esq , xkep , fchk , s , c real ( DP ), dimension ( NDIM ) :: x , v ! Executable code iflag = 0 dt = dt0 r0 = sqrt ( dot_product ( x0 (:), x0 (:))) v0s = dot_product ( v0 (:), v0 (:)) u = dot_product ( x0 (:), v0 (:)) alpha = 2 * mu / r0 - v0s if ( alpha > 0.0_DP ) then a = mu / alpha asq = a ** 2 en = sqrt ( mu / ( a * asq )) ec = 1.0_DP - r0 / a es = u / ( en * asq ) esq = ec ** 2 + es ** 2 dm = dt * en - int ( dt * en / TWOPI , kind = I4B ) * TWOPI dt = dm / en if (( esq < E2MAX ) . and . ( dm ** 2 < DM2MAX ) . and . ( esq * dm ** 2 < E2DM2MAX )) then call drift_kepmd ( dm , es , ec , xkep , s , c ) fchk = ( xkep - ec * s + es * ( 1.0_DP - c ) - dm ) ! DEK - original code compared fchk*fchk with DANBYB, but i think it should ! DEK - be compared with DANBYB*DANBYB, and i changed it accordingly - please ! DEK - check with hal and/or martin about this if ( fchk ** 2 > DANBYB ** 2 ) then iflag = 1 return end if fp = 1.0_DP - ec * c + es * s f = a / r0 * ( c - 1.0_DP ) + 1.0_DP g = dt + ( s - xkep ) / en fdot = - ( a / ( r0 * fp )) * en * s gdot = ( c - 1.0_DP ) / fp + 1.0_DP x (:) = x0 (:) * f + v0 (:) * g v (:) = x0 (:) * fdot + v0 (:) * gdot x0 (:) = x (:) v0 (:) = v (:) iflag = 0 return end if end if call drift_kepu ( dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) if ( iflag == 0 ) then f = 1.0_DP - mu / r0 * c2 g = dt - mu * c3 fdot = - mu / ( fp * r0 ) * c1 gdot = 1.0_DP - mu / fp * c2 x (:) = x0 (:) * f + v0 (:) * g v (:) = x0 (:) * fdot + v0 (:) * gdot x0 (:) = x (:) v0 (:) = v (:) end if return end subroutine drift_dan pure subroutine drift_kepmd ( dm , es , ec , x , s , c ) !! author: David A. Minton !! !! Solve Kepler's equation in difference form for an ellipse for small input dm and eccentricity !!    Original disclaimer: built for speed, does not check how well the original equation is solved !!    Can do that in calling routine by checking how close (x - ec*s + es*(1.0 - c) - dm) is to zero !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepmd.f90 !! Adapted from Martin Duncan's Swift routine drift_kepmd.f implicit none real ( DP ), intent ( in ) :: dm , es , ec real ( DP ), intent ( out ) :: x , s , c real ( DP ), parameter :: a0 = 3991680 0.0_DP , a1 = 665280 0.0_DP , a2 = 33264 0.0_DP , a3 = 792 0.0_DP , a4 = 11 0.0_DP real ( DP ) :: dx , fac1 , fac2 , q , y , f , fp , fpp , fppp ! executable code fac1 = 1.0_DP / ( 1.0_DP - ec ) q = fac1 * dm fac2 = es ** 2 * fac1 - ec / 3.0_DP x = q * ( 1.0_DP - 0.5_DP * fac1 * q * ( es - q * fac2 )) y = x ** 2 s = x * ( a0 - y * ( a1 - y * ( a2 - y * ( a3 - y * ( a4 - y ))))) / a0 c = sqrt ( 1.0_DP - s ** 2 ) f = x - ec * s + es * ( 1.0_DP - c ) - dm fp = 1.0_DP - ec * c + es * s fpp = ec * s + es * c fppp = ec * c - es * s dx = - f / fp dx = - f / ( fp + dx * fpp / 2.0_DP ) dx = - f / ( fp + dx * fpp / 2.0_DP + dx ** 2 * fppp / 6.0_DP ) x = x + dx y = x ** 2 s = x * ( a0 - y * ( a1 - y * ( a2 - y * ( a3 - y * ( a4 - y ))))) / a0 c = sqrt ( 1.0_DP - s ** 2 ) return end subroutine drift_kepmd pure subroutine drift_kepu ( dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) !! author: David A. Minton !! !! Solve Kepler's equation in universal variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu.f90 !! Adapted from Hal Levison's Swift routine drift_kepu.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( out ) :: fp , c1 , c2 , c3 real ( DP ) :: s , st , fo , fn ! executable code call drift_kepu_guess ( dt , r0 , mu , alpha , u , s ) st = s call drift_kepu_new ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) if ( iflag /= 0 ) then call drift_kepu_fchk ( dt , r0 , mu , alpha , u , st , fo ) call drift_kepu_fchk ( dt , r0 , mu , alpha , u , s , fn ) if ( abs ( fo ) < abs ( fn )) s = st call drift_kepu_lag ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) end if return end subroutine drift_kepu pure subroutine drift_kepu_fchk ( dt , r0 , mu , alpha , u , s , f ) !! author: David A. Minton !! !! Computes the value of f, the function whose root we are trying to find in universal variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_fchk.f90 !! Adapted from Martin Duncan's Swift routine drift_kepu_fchk.f implicit none real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u , s real ( DP ), intent ( out ) :: f real ( DP ) :: x , c0 , c1 , c2 , c3 x = s ** 2 * alpha call drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) c1 = c1 * s c2 = c2 * s ** 2 c3 = c3 * s ** 3 f = r0 * c1 + u * c2 + mu * c3 - dt return end subroutine drift_kepu_fchk pure subroutine drift_kepu_guess ( dt , r0 , mu , alpha , u , s ) !! author: David A. Minton !! !! Compute initial guess for solving Kepler's equation using universal variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_guess.f90 !! Adapted from Hal Levison and Martin Duncan's Swift routine drift_kepu_guess.f implicit none real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( out ) :: s integer ( I4B ) :: iflag real ( DP ), parameter :: thresh = 0.4_DP , danbyk = 0.85_DP real ( DP ) :: y , sy , cy , sigma , es , x , a , en , ec , e if ( alpha > 0.0_DP ) then if ( dt / r0 <= thresh ) then s = dt / r0 - ( dt ** 2 * u ) / ( 2 * r0 ** 3 ) else a = mu / alpha en = sqrt ( mu / a ** 3 ) ec = 1.0_DP - r0 / a es = u / ( en * a ** 2 ) e = sqrt ( ec ** 2 + es ** 2 ) y = en * dt - es call orbel_scget ( y , sy , cy ) sigma = sign ( 1.0_DP , es * cy + ec * sy ) x = y + sigma * danbyk * e s = x / sqrt ( alpha ) end if else call drift_kepu_p3solve ( dt , r0 , mu , alpha , u , s , iflag ) if ( iflag /= 0 ) s = dt / r0 end if return end subroutine drift_kepu_guess pure subroutine drift_kepu_lag ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) !! author: David A. Minton !! !! Solve Kepler's equation in universal variables using Laguerre's method !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_lag.f90 !! Adapted from Hal Levison's Swift routine drift_kepu_lag.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( inout ) :: s real ( DP ), intent ( out ) :: fp , c1 , c2 , c3 integer ( I4B ) :: nc , ncmax real ( DP ) :: ln , x , fpp , ds , c0 , f , fdt if ( alpha < 0.0_DP ) then ncmax = NLAG2 else ncmax = NLAG1 end if ln = 5.0_DP do nc = 0 , ncmax x = s * s * alpha call drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) c1 = c1 * s c2 = c2 * s ** 2 c3 = c3 * s ** 3 f = r0 * c1 + u * c2 + mu * c3 - dt fp = r0 * c0 + u * c1 + mu * c2 fpp = ( - r0 * alpha + mu ) * c1 + u * c0 ds = - ln * f / ( fp + sign ( 1.0_DP , fp ) * sqrt ( abs (( ln - 1.0_DP ) ** 2 * fp ** 2 - ( ln - 1.0_DP ) * ln * f * fpp ))) s = s + ds fdt = f / dt if ( fdt ** 2 < DANBYB ** 2 ) then iflag = 0 return end if end do iflag = 2 return end subroutine drift_kepu_lag pure subroutine drift_kepu_new ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) !! author: David A. Minton !! !! Solve Kepler's equation in universal variables using Newton's method !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_new.f90 !! Adapted from Hal Levison's Swift routine drift_kepu_new.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( inout ) :: s real ( DP ), intent ( out ) :: fp , c1 , c2 , c3 integer ( I4B ) :: nc real ( DP ) :: x , c0 , ds , f , fpp , fppp , fdt do nc = 0 , 6 x = s ** 2 * alpha call drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) c1 = c1 * s c2 = c2 * s ** 2 c3 = c3 * s ** 3 f = r0 * c1 + u * c2 + mu * c3 - dt fp = r0 * c0 + u * c1 + mu * c2 fpp = ( - r0 * alpha + mu ) * c1 + u * c0 fppp = ( - r0 * alpha + mu ) * c0 - u * alpha * c1 ds = - f / fp ds = - f / ( fp + ds * fpp / 2.0_DP ) ds = - f / ( fp + ds * fpp / 2.0_DP + ds ** 2 * fppp / 6.0_DP ) s = s + ds fdt = f / dt if ( fdt ** 2 < DANBYB ** 2 ) then iflag = 0 return end if end do iflag = 1 return end subroutine drift_kepu_new pure subroutine drift_kepu_p3solve ( dt , r0 , mu , alpha , u , s , iflag ) !! author: David A. Minton !! !! Computes real root of cubic involved in setting initial guess for solving Kepler's equation in universal variables !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_p3solve.f90 !! Adapted from Martin Duncan's Swift routine drift_kepu_p3solve.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( out ) :: s real ( DP ) :: denom , a0 , a1 , a2 , q , r , sq2 , sq , p1 , p2 denom = ( mu - alpha * r0 ) / 6.0_DP a2 = 0.5_DP * u / denom a1 = r0 / denom a0 = - dt / denom q = ( a1 - a2 ** 2 / 3.0_DP ) / 3.0_DP r = ( a1 * a2 - 3 * a0 ) / 6.0_DP - a2 ** 3 / 2 7.0_DP sq2 = q ** 3 + r ** 2 if ( sq2 >= 0.0_DP ) then sq = sqrt ( sq2 ) if (( r + sq ) <= 0.0_DP ) then p1 = - ( - ( r + sq )) ** ( 1.0_DP / 3.0_DP ) else p1 = ( r + sq ) ** ( 1.0_DP / 3.0_DP ) end if if (( r - sq ) <= 0.0_DP ) then p2 = - ( - ( r - sq )) ** ( 1.0_DP / 3.0_DP ) else p2 = ( r - sq ) ** ( 1.0_DP / 3.0_DP ) end if iflag = 0 s = p1 + p2 - a2 / 3.0_DP else iflag = 1 s = 0.0_DP end if return end subroutine drift_kepu_p3solve pure subroutine drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) !! author: David A. Minton !! !! Compute Stumpff functions needed for Kepler drift in universal variables !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_stumpff.f90 !! Adapted from Hal Levison's Swift routine drift_kepu_stumpff.f implicit none real ( DP ), intent ( inout ) :: x real ( DP ), intent ( out ) :: c0 , c1 , c2 , c3 integer ( I4B ) :: i , n real ( DP ) :: xm n = 0 xm = 0.1_DP do while ( abs ( x ) >= xm ) n = n + 1 x = x / 4.0_DP end do c2 = ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * & ( 1.0_DP - x / 18 2.0_DP ) / 13 2.0_DP ) / 9 0.0_DP ) / 5 6.0_DP ) / & 3 0.0_DP ) / 1 2.0_DP ) / 2.0_DP c3 = ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * & ( 1.0_DP - x / 21 0.0_DP ) / 15 6.0_DP ) / 11 0.0_DP ) / 7 2.0_DP ) / & 4 2.0_DP ) / 2 0.0_DP ) / 6.0_DP c1 = 1.0_DP - x * c3 c0 = 1.0_DP - x * c2 if ( n /= 0 ) then do i = n , 1 , - 1 c3 = ( c2 + c0 * c3 ) / 4.0_DP c2 = c1 ** 2 / 2.0_DP c1 = c0 * c1 c0 = 2 * c0 ** 2 - 1.0_DP x = x * 4 end do end if return end subroutine drift_kepu_stumpff end submodule drift_implementation","tags":"","loc":"sourcefile/drift.f90.html"},{"title":"symba_util.f90 – swiftest","text":"This file depends on sourcefile~~symba_util.f90~~EfferentGraph sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_util Source Code symba_util.f90 Source Code submodule ( symba_classes ) s_symba_util use swiftest contains module subroutine symba_util_append_arr_kin ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of kinship type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine symba_util_append_arr_kin module subroutine symba_util_append_encounter ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one encounter list (pl-pl or pl-tp) body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to associate ( nold => self % nenc , nsrc => source % nenc ) select type ( source ) class is ( symba_encounter ) call util_append ( self % level , source % level , nold , nsrc , lsource_mask ) end select call util_append_encounter ( self , source , lsource_mask ) end associate return end subroutine symba_util_append_encounter module subroutine symba_util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( symba_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % lcollision , source % lcollision , nold , nsrc , lsource_mask ) call util_append ( self % lencounter , source % lencounter , nold , nsrc , lsource_mask ) call util_append ( self % lmtiny , source % lmtiny , nold , nsrc , lsource_mask ) call util_append ( self % nplenc , source % nplenc , nold , nsrc , lsource_mask ) call util_append ( self % ntpenc , source % ntpenc , nold , nsrc , lsource_mask ) call util_append ( self % levelg , source % levelg , nold , nsrc , lsource_mask ) call util_append ( self % levelm , source % levelm , nold , nsrc , lsource_mask ) call util_append ( self % isperi , source % isperi , nold , nsrc , lsource_mask ) call util_append ( self % peri , source % peri , nold , nsrc , lsource_mask ) call util_append ( self % atp , source % atp , nold , nsrc , lsource_mask ) call util_append ( self % kin , source % kin , nold , nsrc , lsource_mask ) call util_append_pl ( self , source , lsource_mask ) ! Note: helio_pl does not have its own append method, so we skip back to the base class end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine symba_util_append_pl module subroutine symba_util_append_merger ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( symba_merger ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ), dimension (:), allocatable :: ncomp_tmp !! Temporary placeholder for ncomp incase we are appending a symba_pl object to a symba_merger integer ( I4B ) :: nold , nsrc , nnew nold = self % nbody nsrc = source % nbody nnew = count ( lsource_mask ) select type ( source ) class is ( symba_merger ) call util_append ( self % ncomp , source % ncomp , nold , nsrc , lsource_mask ) call symba_util_append_pl ( self , source , lsource_mask ) class is ( symba_pl ) allocate ( ncomp_tmp , mold = source % id ) ncomp_tmp (:) = 0 call util_append ( self % ncomp , ncomp_tmp , nold , nsrc , lsource_mask ) call symba_util_append_pl ( self , source , lsource_mask ) class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select ! Save the number of appended bodies self % ncomp ( nold + 1 : nold + nnew ) = nnew return end subroutine symba_util_append_merger module subroutine symba_util_append_tp ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from test particle object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( symba_tp ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % nplenc , source % nplenc , nold , nsrc , lsource_mask ) call util_append ( self % levelg , source % levelg , nold , nsrc , lsource_mask ) call util_append ( self % levelm , source % levelm , nold , nsrc , lsource_mask ) call util_append_tp ( self , source , lsource_mask ) ! Note: helio_tp does not have its own append method, so we skip back to the base class end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class symba_tp or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine symba_util_append_tp module subroutine symba_util_copy_encounter ( self , source ) !! author: David A. Minton !! !! Copies elements from the source encounter list into self. implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into select type ( source ) class is ( symba_encounter ) associate ( n => source % nenc ) self % level ( 1 : n ) = source % level ( 1 : n ) end associate end select call util_copy_encounter ( self , source ) return end subroutine symba_util_copy_encounter module subroutine symba_util_fill_arr_kin ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of particle kinship types !! This is the inverse of a spill operation implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine symba_util_fill_arr_kin module subroutine symba_util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new SyMBA test particle structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA masive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( symba_pl ) call util_fill ( keeps % lcollision , inserts % lcollision , lfill_list ) call util_fill ( keeps % lencounter , inserts % lencounter , lfill_list ) call util_fill ( keeps % lmtiny , inserts % lmtiny , lfill_list ) call util_fill ( keeps % nplenc , inserts % nplenc , lfill_list ) call util_fill ( keeps % ntpenc , inserts % ntpenc , lfill_list ) call util_fill ( keeps % levelg , inserts % levelg , lfill_list ) call util_fill ( keeps % levelm , inserts % levelm , lfill_list ) call util_fill ( keeps % isperi , inserts % isperi , lfill_list ) call util_fill ( keeps % peri , inserts % peri , lfill_list ) call util_fill ( keeps % atp , inserts % atp , lfill_list ) call util_fill ( keeps % kin , inserts % kin , lfill_list ) call util_fill_pl ( keeps , inserts , lfill_list ) ! Note: helio_pl does not have its own fill method, so we skip back to the base class class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_fill_pl module subroutine symba_util_fill_tp ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new SyMBA test particle structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( symba_tp ) call util_fill ( keeps % nplenc , inserts % nplenc , lfill_list ) call util_fill ( keeps % levelg , inserts % levelg , lfill_list ) call util_fill ( keeps % levelm , inserts % levelm , lfill_list ) call util_fill_tp ( keeps , inserts , lfill_list ) ! Note: helio_tp does not have its own fill method, so we skip back to the base class class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class symba_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_fill_tp module subroutine symba_util_index_eucl_plpl ( self , param ) !! author: Jacob R. Elliott and David A. Minton !! !! Turns i,j indices into k index for use in the Euclidean distance matrix. This also sets the lmtiny flag and computes the !! number of interactions that excludes semi-interacting bodies with each other (Gmass < GMTINY). !! This method will also sort the bodies in descending order by Mass !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I8B ) :: i , j , counter , npl , nplm , nplpl , nplplm associate ( pl => self ) npl = int ( self % nbody , kind = I8B ) nplm = count (. not . pl % lmtiny ( 1 : npl )) pl % nplm = int ( nplm , kind = I4B ) pl % nplpl = ( npl * ( npl - 1 ) / 2 ) ! number of entries in a strict lower triangle, npl x npl, minus first column pl % nplplm = nplm * npl - nplm * ( nplm + 1 ) / 2 ! number of entries in a strict lower triangle, npl x npl, minus first column including only mutually interacting bodies if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) ! Reset the index array if it's been set previously allocate ( self % k_plpl ( 2 , pl % nplpl )) do i = 1 , npl counter = ( i - 1_I8B ) * npl - i * ( i - 1_I8B ) / 2_I8B + 1_I8B do j = i + 1_I8B , npl self % k_plpl ( 1 , counter ) = i self % k_plpl ( 2 , counter ) = j counter = counter + 1_I8B end do end do end associate return end subroutine symba_util_index_eucl_plpl module subroutine symba_util_peri_pl ( self , system , param ) !! author: David A. Minton !! !! Determine system pericenter passages for planets in SyMBA !! !! Adapted from David E. Kaufmann's Swifter routine: symba_peri.f90 !! Adapted from Hal Levison's Swift routine util_mass_peri.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: vdotr , e associate ( pl => self , npl => self % nbody ) if ( pl % lfirst ) then if ( param % qmin_coord == \"HELIO\" ) then do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xh (:, i ), pl % vh (:, i )) if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end do else do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xb (:, i ), pl % vb (:, i )) if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end do end if else if ( param % qmin_coord == \"HELIO\" ) then do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xh (:, i ), pl % vh (:, i )) if ( pl % isperi ( i ) == - 1 ) then if ( vdotr >= 0.0_DP ) then pl % isperi ( i ) = 0 CALL orbel_xv2aeq ( pl % mu ( i ), pl % xh (:, i ), pl % vh (:, i ), pl % atp ( i ), e , pl % peri ( i )) end if else if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end if end do else do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xb (:, i ), pl % vb (:, i )) if ( pl % isperi ( i ) == - 1 ) then if ( vdotr >= 0.0_DP ) then pl % isperi ( i ) = 0 CALL orbel_xv2aeq ( system % Gmtot , pl % xb (:, i ), pl % vb (:, i ), pl % atp ( i ), e , pl % peri ( i )) end if else if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end if end do end if end if end associate return end subroutine symba_util_peri_pl module subroutine symba_util_rearray_pl ( self , system , param ) !! Author: the Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Clean up the massive body structures to remove discarded bodies and add new bodies implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( symba_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals class ( symba_pl ), allocatable :: tmp !! The discarded body list. integer ( I4B ) :: i , j , k , npl , nadd , nencmin , nenc_old , idnew1 , idnew2 , idold1 , idold2 logical , dimension (:), allocatable :: lmask , ldump_mask class ( symba_plplenc ), allocatable :: plplenc_old logical :: lencounter integer ( I4B ), dimension (:), allocatable :: levelg_orig_pl , levelm_orig_pl , levelg_orig_tp , levelm_orig_tp , nplenc_orig_pl , nplenc_orig_tp , ntpenc_orig_pl associate ( pl => self , pl_adds => system % pl_adds ) npl = pl % nbody nadd = pl_adds % nbody if ( npl == 0 ) return ! Deallocate any temporary variables if ( allocated ( pl % xbeg )) deallocate ( pl % xbeg ) if ( allocated ( pl % xend )) deallocate ( pl % xend ) ! Remove the discards and destroy the list, as the system already tracks pl_discards elsewhere allocate ( lmask ( npl )) lmask ( 1 : npl ) = pl % ldiscard ( 1 : npl ) allocate ( tmp , mold = self ) call pl % spill ( tmp , lspill_list = lmask , ldestructive = . true .) npl = pl % nbody call tmp % setup ( 0 , param ) deallocate ( tmp ) deallocate ( lmask ) ! Store the original plplenc list so we don't remove any of the original encounters nenc_old = system % plplenc_list % nenc if ( nenc_old > 0 ) then allocate ( plplenc_old , source = system % plplenc_list ) call plplenc_old % copy ( system % plplenc_list ) end if ! Add in any new bodies if ( nadd > 0 ) then ! Append the adds to the main pl object call pl % append ( pl_adds , lsource_mask = [(. true ., i = 1 , nadd )]) allocate ( ldump_mask ( npl + nadd )) ! This mask is used only to append the original Fortran binary particle.dat file with new bodies. This is ignored for NetCDF output ldump_mask ( 1 : npl ) = . false . ldump_mask ( npl + 1 : npl + nadd ) = pl % status ( npl + 1 : npl + nadd ) == NEW_PARTICLE npl = pl % nbody else allocate ( ldump_mask ( npl )) ldump_mask (:) = . false . end if ! Reset all of the status flags for this body pl % status ( 1 : npl ) = ACTIVE do i = 1 , npl call pl % info ( i )% set_value ( status = \"ACTIVE\" ) end do pl % ldiscard ( 1 : npl ) = . false . pl % lcollision ( 1 : npl ) = . false . pl % lmask ( 1 : npl ) = . true . select type ( param ) class is ( symba_parameters ) pl % lmtiny ( 1 : npl ) = pl % Gmass ( 1 : npl ) < param % GMTINY where ( pl % lmtiny ( 1 : npl )) pl % info ( 1 : npl )% particle_type = PL_TINY_TYPE_NAME elsewhere pl % info ( 1 : npl )% particle_type = PL_TYPE_NAME end where end select call pl % dump_particle_info ( param , idx = pack ([( i , i = 1 , npl )], ldump_mask )) deallocate ( ldump_mask ) ! Reindex the new list of bodies call pl % sort ( \"mass\" , ascending = . false .) call pl % index ( param ) ! Reset the kinship trackers call pl % reset_kinship ([( i , i = 1 , npl )]) ! Re-build the zero-level encounter list, being sure to save the original level information for all bodies allocate ( levelg_orig_pl , source = pl % levelg ) allocate ( levelm_orig_pl , source = pl % levelm ) allocate ( nplenc_orig_pl , source = pl % nplenc ) lencounter = pl % encounter_check ( system , param % dt , 0 ) if ( system % tp % nbody > 0 ) then select type ( tp => system % tp ) class is ( symba_tp ) allocate ( ntpenc_orig_pl , source = pl % ntpenc ) allocate ( levelg_orig_tp , source = tp % levelg ) allocate ( levelm_orig_tp , source = tp % levelm ) allocate ( nplenc_orig_tp , source = tp % nplenc ) lencounter = tp % encounter_check ( system , param % dt , 0 ) call move_alloc ( levelg_orig_tp , tp % levelg ) call move_alloc ( levelm_orig_tp , tp % levelm ) call move_alloc ( nplenc_orig_tp , tp % nplenc ) call move_alloc ( ntpenc_orig_pl , pl % ntpenc ) end select end if call move_alloc ( levelg_orig_pl , pl % levelg ) call move_alloc ( levelm_orig_pl , pl % levelm ) call move_alloc ( nplenc_orig_pl , pl % nplenc ) ! Re-index the encounter list as the index values may have changed if ( nenc_old > 0 ) then nencmin = min ( system % plplenc_list % nenc , plplenc_old % nenc ) do k = 1 , nencmin idnew1 = system % plplenc_list % id1 ( k ) idnew2 = system % plplenc_list % id2 ( k ) idold1 = plplenc_old % id1 ( k ) idold2 = plplenc_old % id2 ( k ) if (( idnew1 == idold1 ) . and . ( idnew2 == idold2 )) then ! This is an encounter we already know about, so save the old information system % plplenc_list % lvdotr ( k ) = plplenc_old % lvdotr ( k ) system % plplenc_list % status ( k ) = plplenc_old % status ( k ) system % plplenc_list % x1 (:, k ) = plplenc_old % x1 (:, k ) system % plplenc_list % x2 (:, k ) = plplenc_old % x2 (:, k ) system % plplenc_list % v1 (:, k ) = plplenc_old % v1 (:, k ) system % plplenc_list % v2 (:, k ) = plplenc_old % v2 (:, k ) system % plplenc_list % t ( k ) = plplenc_old % t ( k ) system % plplenc_list % level ( k ) = plplenc_old % level ( k ) else if ((( idnew1 == idold2 ) . and . ( idnew2 == idold1 ))) then ! This is an encounter we already know about, but with the order reversed, so save the old information system % plplenc_list % lvdotr ( k ) = plplenc_old % lvdotr ( k ) system % plplenc_list % status ( k ) = plplenc_old % status ( k ) system % plplenc_list % x1 (:, k ) = plplenc_old % x2 (:, k ) system % plplenc_list % x2 (:, k ) = plplenc_old % x1 (:, k ) system % plplenc_list % v1 (:, k ) = plplenc_old % v2 (:, k ) system % plplenc_list % v2 (:, k ) = plplenc_old % v1 (:, k ) system % plplenc_list % t ( k ) = plplenc_old % t ( k ) system % plplenc_list % level ( k ) = plplenc_old % level ( k ) end if end do end if end associate return end subroutine symba_util_rearray_pl module subroutine symba_util_reset_kinship ( self , idx ) !! author: David A. Minton !! !! Resets the kinship status of bodies. !! implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: idx !! Index array of bodies to reset ! Internals integer ( I4B ) :: i , j self % kin ( idx (:))% parent = idx (:) self % kin ( idx (:))% nchild = 0 do j = 1 , size ( idx (:)) i = idx ( j ) if ( allocated ( self % kin ( i )% child )) deallocate ( self % kin ( i )% child ) end do return end subroutine symba_util_reset_kinship module subroutine symba_util_resize_arr_kin ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals type ( symba_kinship ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if allocate ( tmp ( nnew )) if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if call move_alloc ( tmp , arr ) return end subroutine symba_util_resize_arr_kin module subroutine symba_util_resize_merger ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. implicit none ! Arguments class ( symba_merger ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % ncomp , nnew ) call symba_util_resize_pl ( self , nnew ) return end subroutine symba_util_resize_merger module subroutine symba_util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a SyMBA massive body object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % lcollision , nnew ) call util_resize ( self % lencounter , nnew ) call util_resize ( self % lmtiny , nnew ) call util_resize ( self % nplenc , nnew ) call util_resize ( self % ntpenc , nnew ) call util_resize ( self % levelg , nnew ) call util_resize ( self % levelm , nnew ) call util_resize ( self % isperi , nnew ) call util_resize ( self % peri , nnew ) call util_resize ( self % atp , nnew ) call util_resize ( self % kin , nnew ) call util_resize_pl ( self , nnew ) return end subroutine symba_util_resize_pl module subroutine symba_util_resize_tp ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a test particle object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % nplenc , nnew ) call util_resize ( self % levelg , nnew ) call util_resize ( self % levelm , nnew ) call util_resize_tp ( self , nnew ) return end subroutine symba_util_resize_tp module subroutine symba_util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a SyMBA massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"nplenc\" ) call util_sort ( direction * pl % nplenc ( 1 : npl ), ind ( 1 : npl )) case ( \"ntpenc\" ) call util_sort ( direction * pl % ntpenc ( 1 : npl ), ind ( 1 : npl )) case ( \"levelg\" ) call util_sort ( direction * pl % levelg ( 1 : npl ), ind ( 1 : npl )) case ( \"levelm\" ) call util_sort ( direction * pl % levelm ( 1 : npl ), ind ( 1 : npl )) case ( \"peri\" ) call util_sort ( direction * pl % peri ( 1 : npl ), ind ( 1 : npl )) case ( \"atp\" ) call util_sort ( direction * pl % atp ( 1 : npl ), ind ( 1 : npl )) case ( \"lcollision\" , \"lencounter\" , \"lmtiny\" , \"nplm\" , \"nplplm\" , \"kin\" , \"info\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call util_sort_pl ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine symba_util_sort_pl module subroutine symba_util_sort_tp ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a SyMBA test particle object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( tp => self , ntp => self % nbody ) allocate ( ind ( ntp )) select case ( sortby ) case ( \"nplenc\" ) call util_sort ( direction * tp % nplenc ( 1 : ntp ), ind ( 1 : ntp )) case ( \"levelg\" ) call util_sort ( direction * tp % levelg ( 1 : ntp ), ind ( 1 : ntp )) case ( \"levelm\" ) call util_sort ( direction * tp % levelm ( 1 : ntp ), ind ( 1 : ntp )) case default ! Look for components in the parent class call util_sort_tp ( tp , sortby , ascending ) return end select call tp % rearrange ( ind ) end associate return end subroutine symba_util_sort_tp module subroutine symba_util_sort_rearrange_arr_kin ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of particle kinship type in-place from an index list. implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals type ( symba_kinship ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation integer ( I4B ) :: i , j if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , source = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) do i = 1 , n do j = 1 , tmp ( i )% nchild tmp ( i )% child ( j ) = ind ( tmp ( i )% child ( j )) end do end do call move_alloc ( tmp , arr ) return end subroutine symba_util_sort_rearrange_arr_kin module subroutine symba_util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange SyMBA massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) ! Internals integer ( I4B ) :: i , j associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % lcollision , ind , npl ) call util_sort_rearrange ( pl % lencounter , ind , npl ) call util_sort_rearrange ( pl % lmtiny , ind , npl ) call util_sort_rearrange ( pl % nplenc , ind , npl ) call util_sort_rearrange ( pl % ntpenc , ind , npl ) call util_sort_rearrange ( pl % levelg , ind , npl ) call util_sort_rearrange ( pl % levelm , ind , npl ) call util_sort_rearrange ( pl % isperi , ind , npl ) call util_sort_rearrange ( pl % peri , ind , npl ) call util_sort_rearrange ( pl % atp , ind , npl ) call util_sort_rearrange ( pl % kin , ind , npl ) call util_sort_rearrange_pl ( pl , ind ) end associate return end subroutine symba_util_sort_rearrange_pl module subroutine symba_util_sort_rearrange_tp ( self , ind ) !! author: David A. Minton !! !! Rearrange SyMBA test particle object in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( tp => self , ntp => self % nbody ) call util_sort_rearrange ( tp % nplenc , ind , ntp ) call util_sort_rearrange ( tp % levelg , ind , ntp ) call util_sort_rearrange ( tp % levelm , ind , ntp ) call util_sort_rearrange_tp ( tp , ind ) end associate return end subroutine symba_util_sort_rearrange_tp module subroutine symba_util_spill_arr_kin ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of particle kinships !! This is the inverse of a spill operation implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then keeps (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) else deallocate ( keeps ) end if end if return end subroutine symba_util_spill_arr_kin module subroutine symba_util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) SyMBA massive body particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Spill all the common components associate ( keeps => self ) select type ( discards ) class is ( symba_pl ) call util_spill ( keeps % lcollision , discards % lcollision , lspill_list , ldestructive ) call util_spill ( keeps % lencounter , discards % lencounter , lspill_list , ldestructive ) call util_spill ( keeps % lmtiny , discards % lmtiny , lspill_list , ldestructive ) call util_spill ( keeps % nplenc , discards % nplenc , lspill_list , ldestructive ) call util_spill ( keeps % ntpenc , discards % ntpenc , lspill_list , ldestructive ) call util_spill ( keeps % levelg , discards % levelg , lspill_list , ldestructive ) call util_spill ( keeps % levelm , discards % levelm , lspill_list , ldestructive ) call util_spill ( keeps % isperi , discards % isperi , lspill_list , ldestructive ) call util_spill ( keeps % peri , discards % peri , lspill_list , ldestructive ) call util_spill ( keeps % atp , discards % atp , lspill_list , ldestructive ) call util_spill ( keeps % kin , discards % kin , lspill_list , ldestructive ) call util_spill_pl ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_spill_pl module subroutine symba_util_spill_encounter ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) SyMBA encounter structure from active list to discard list !! Note: Because the symba_plplenc currently does not contain any additional variable components, this method can recieve it as an input as well. implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list associate ( keeps => self ) select type ( discards ) class is ( symba_encounter ) call util_spill ( keeps % level , discards % level , lspill_list , ldestructive ) call util_spill_encounter ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class symba_encounter or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_spill_encounter module subroutine symba_util_spill_tp ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) SyMBA test particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Spill all the common components associate ( keeps => self ) select type ( discards ) class is ( symba_tp ) call util_spill ( keeps % nplenc , discards % nplenc , lspill_list , ldestructive ) call util_spill ( keeps % levelg , discards % levelg , lspill_list , ldestructive ) call util_spill ( keeps % levelm , discards % levelm , lspill_list , ldestructive ) call util_spill_tp ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class symba_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_spill_tp end submodule s_symba_util","tags":"","loc":"sourcefile/symba_util.f90.html"},{"title":"symba_collision.f90 – swiftest","text":"This file depends on sourcefile~~symba_collision.f90~~EfferentGraph sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_collision Source Code symba_collision.f90 Source Code submodule ( symba_classes ) s_symba_collision use swiftest contains module function symba_collision_casedisruption ( system , param , colliders , frag ) result ( status ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Create the fragments resulting from a non-catastrophic disruption collision !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object ! Result integer ( I4B ) :: status !! Status flag assigned to this outcome ! Internals integer ( I4B ) :: i , nfrag logical :: lfailure character ( len = STRMAX ) :: message select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION ) message = \"Disruption between\" case ( COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) message = \"Supercatastrophic disruption between\" end select call symba_collision_collider_message ( system % pl , colliders % idx , message ) call fraggle_io_log_one_message ( message ) ! Collisional fragments will be uniformly distributed around the pre-impact barycenter call frag % set_mass_dist ( colliders , param ) ! Generate the position and velocity distributions of the fragments call frag % generate_fragments ( colliders , system , param , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"No fragment solution found, so treat as a pure hit-and-run\" ) status = ACTIVE nfrag = 0 select type ( pl => system % pl ) class is ( symba_pl ) pl % status ( colliders % idx (:)) = status pl % ldiscard ( colliders % idx (:)) = . false . pl % lcollision ( colliders % idx (:)) = . false . end select else ! Populate the list of new bodies nfrag = frag % nbody write ( message , * ) nfrag call fraggle_io_log_one_message ( \"Generating \" // trim ( adjustl ( message )) // \" fragments\" ) select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION ) status = DISRUPTION case ( COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) status = SUPERCATASTROPHIC end select frag % id ( 1 : nfrag ) = [( i , i = param % maxid + 1 , param % maxid + nfrag )] param % maxid = frag % id ( nfrag ) call symba_collision_mergeaddsub ( system , param , colliders , frag , status ) end if return end function symba_collision_casedisruption module function symba_collision_casehitandrun ( system , param , colliders , frag ) result ( status ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Create the fragments resulting from a non-catastrophic hit-and-run collision !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object ! Result integer ( I4B ) :: status !! Status flag assigned to this outcom ! Internals integer ( I4B ) :: i , ibiggest , nfrag , jtarg , jproj logical :: lpure character ( len = STRMAX ) :: message character ( len = NAMELEN ) :: idstr message = \"Hit and run between\" call symba_collision_collider_message ( system % pl , colliders % idx , message ) call fraggle_io_log_one_message ( trim ( adjustl ( message ))) if ( colliders % mass ( 1 ) > colliders % mass ( 2 )) then jtarg = 1 jproj = 2 else jtarg = 2 jproj = 1 end if if ( frag % mass_dist ( 2 ) > 0.9_DP * colliders % mass ( jproj )) then ! Pure hit and run, so we'll just keep the two bodies untouched call fraggle_io_log_one_message ( \"Pure hit and run. No new fragments generated.\" ) nfrag = 0 lpure = . true . else ! Imperfect hit and run, so we'll keep the largest body and destroy the other lpure = . false . call frag % set_mass_dist ( colliders , param ) ! Generate the position and velocity distributions of the fragments call frag % generate_fragments ( colliders , system , param , lpure ) if ( lpure ) then call fraggle_io_log_one_message ( \"Should have been a pure hit and run instead\" ) nfrag = 0 else nfrag = frag % nbody write ( message , * ) nfrag call fraggle_io_log_one_message ( \"Generating \" // trim ( adjustl ( message )) // \" fragments\" ) end if end if if ( lpure ) then ! Reset these bodies back to being active so that nothing further is done to them status = HIT_AND_RUN_PURE select type ( pl => system % pl ) class is ( symba_pl ) pl % status ( colliders % idx (:)) = ACTIVE pl % ldiscard ( colliders % idx (:)) = . false . pl % lcollision ( colliders % idx (:)) = . false . end select else ibiggest = colliders % idx ( maxloc ( system % pl % Gmass ( colliders % idx (:)), dim = 1 )) frag % id ( 1 ) = system % pl % id ( ibiggest ) frag % id ( 2 : nfrag ) = [( i , i = param % maxid + 1 , param % maxid + nfrag - 1 )] param % maxid = frag % id ( nfrag ) status = HIT_AND_RUN_DISRUPT call symba_collision_mergeaddsub ( system , param , colliders , frag , status ) end if return end function symba_collision_casehitandrun module function symba_collision_casemerge ( system , param , colliders , frag ) result ( status ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Merge massive bodies. !! !! Adapted from David E. Kaufmann's Swifter routines symba_merge_pl.f90 and symba_discard_merge_pl.f90 !! !! Adapted from Hal Levison's Swift routines symba5_merge.f and discard_mass_merge.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object ! Result integer ( I4B ) :: status !! Status flag assigned to this outcome ! Internals integer ( I4B ) :: i , j , k , ibiggest real ( DP ), dimension ( 2 ) :: volume , density real ( DP ) :: pe real ( DP ), dimension ( NDIM ) :: L_spin_new character ( len = NAMELEN ) :: idstr character ( len = STRMAX ) :: message message = \"Merging\" call symba_collision_collider_message ( system % pl , colliders % idx , message ) call fraggle_io_log_one_message ( message ) select type ( pl => system % pl ) class is ( symba_pl ) call frag % set_mass_dist ( colliders , param ) ibiggest = colliders % idx ( maxloc ( pl % Gmass ( colliders % idx (:)), dim = 1 )) frag % id ( 1 ) = pl % id ( ibiggest ) frag % xb (:, 1 ) = frag % xbcom (:) frag % vb (:, 1 ) = frag % vbcom (:) if ( param % lrotation ) then ! Conserve angular momentum by putting pre-impact orbital momentum into spin of the new body L_spin_new (:) = colliders % L_orbit (:, 1 ) + colliders % L_orbit (:, 2 ) + colliders % L_spin (:, 1 ) + colliders % L_spin (:, 2 ) ! Assume prinicpal axis rotation on 3rd Ip axis frag % rot (:, 1 ) = L_spin_new (:) / ( frag % Ip ( 3 , 1 ) * frag % mass ( 1 ) * frag % radius ( 1 ) ** 2 ) else ! If spin is not enabled, we will consider the lost pre-collision angular momentum as \"escaped\" and add it to our bookkeeping variable param % Lescape (:) = param % Lescape (:) + colliders % L_orbit (:, 1 ) + colliders % L_orbit (:, 2 ) end if ! Keep track of the component of potential energy due to the pre-impact colliders%idx for book-keeping pe = 0.0_DP do j = 1 , colliders % ncoll do i = j + 1 , colliders % ncoll pe = pe - pl % Gmass ( i ) * pl % mass ( j ) / norm2 ( pl % xb (:, i ) - pl % xb (:, j )) end do end do param % Ecollisions = param % Ecollisions + pe param % Euntracked = param % Euntracked - pe ! Update any encounter lists that have the removed bodies in them so that they instead point to the new do k = 1 , system % plplenc_list % nenc do j = 1 , colliders % ncoll i = colliders % idx ( j ) if ( i == ibiggest ) cycle if ( system % plplenc_list % id1 ( k ) == pl % id ( i )) then system % plplenc_list % id1 ( k ) = pl % id ( ibiggest ) system % plplenc_list % index1 ( k ) = i end if if ( system % plplenc_list % id2 ( k ) == pl % id ( i )) then system % plplenc_list % id2 ( k ) = pl % id ( ibiggest ) system % plplenc_list % index2 ( k ) = i end if if ( system % plplenc_list % id1 ( k ) == system % plplenc_list % id2 ( k )) system % plplenc_list % status ( k ) = INACTIVE end do end do status = MERGED call symba_collision_mergeaddsub ( system , param , colliders , frag , status ) end select return end function symba_collision_casemerge subroutine symba_collision_collider_message ( pl , collidx , collider_message ) !! author: David A. Minton !! !! Prints a nicely formatted message about which bodies collided, including their names and ids. !! This subroutine appends the body names and ids to an input message. implicit none ! Arguments class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object integer ( I4B ), dimension (:), intent ( in ) :: collidx !! Index of collisional colliders%idx members character ( * ), intent ( inout ) :: collider_message !! The message to print to the screen. ! Internals integer ( I4B ) :: i , n character ( len = STRMAX ) :: idstr n = size ( collidx ) if ( n == 0 ) return do i = 1 , n if ( i > 1 ) collider_message = trim ( adjustl ( collider_message )) // \" and \" collider_message = \" \" // trim ( adjustl ( collider_message )) // \" \" // trim ( adjustl ( pl % info ( collidx ( i ))% name )) write ( idstr , '(I10)' ) pl % id ( collidx ( i )) collider_message = trim ( adjustl ( collider_message )) // \" (\" // trim ( adjustl ( idstr )) // \") \" end do return end subroutine symba_collision_collider_message module function symba_collision_check_encounter ( self , system , param , t , dt , irec ) result ( lany_collision ) !! author: David A. Minton !! !! Check for merger between massive bodies and test particles in SyMBA !! !! Adapted from David E. Kaufmann's Swifter routine symba_merge.f90 and symba_merge_tp.f90 !! !! Adapted from Hal Levison's Swift routine symba5_merge.f implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! current time real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Result logical :: lany_collision !! Returns true if cany pair of encounters resulted in a collision ! Internals logical , dimension (:), allocatable :: lcollision , lmask real ( DP ), dimension ( NDIM ) :: xr , vr integer ( I4B ) :: i , j , k , nenc real ( DP ) :: rlim , Gmtot logical :: isplpl character ( len = STRMAX ) :: timestr , idstri , idstrj , message lany_collision = . false . if ( self % nenc == 0 ) return select type ( self ) class is ( symba_plplenc ) isplpl = . true . class default isplpl = . false . end select select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) nenc = self % nenc nenc = self % nenc allocate ( lmask ( nenc )) lmask (:) = (( self % status ( 1 : nenc ) == ACTIVE ) . and . ( pl % levelg ( self % index1 ( 1 : nenc )) >= irec )) if ( isplpl ) then lmask (:) = lmask (:) . and . ( pl % levelg ( self % index2 ( 1 : nenc )) >= irec ) else lmask (:) = lmask (:) . and . ( tp % levelg ( self % index2 ( 1 : nenc )) >= irec ) end if if (. not . any ( lmask (:))) return allocate ( lcollision ( nenc )) lcollision (:) = . false . if ( isplpl ) then do concurrent ( k = 1 : nenc , lmask ( k )) i = self % index1 ( k ) j = self % index2 ( k ) xr (:) = pl % xh (:, i ) - pl % xh (:, j ) vr (:) = pl % vb (:, i ) - pl % vb (:, j ) rlim = pl % radius ( i ) + pl % radius ( j ) Gmtot = pl % Gmass ( i ) + pl % Gmass ( j ) lcollision ( k ) = symba_collision_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), Gmtot , rlim , dt , self % lvdotr ( k )) end do else do concurrent ( k = 1 : nenc , lmask ( k )) i = self % index1 ( k ) j = self % index2 ( k ) xr (:) = pl % xh (:, i ) - tp % xh (:, j ) vr (:) = pl % vb (:, i ) - tp % vb (:, j ) lcollision ( k ) = symba_collision_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % Gmass ( i ), pl % radius ( i ), dt , self % lvdotr ( k )) end do end if if ( any ( lcollision ( 1 : nenc ))) call pl % xh2xb ( system % cb ) ! Update the central body barycenteric position vector to get us out of DH and into bary do k = 1 , nenc i = self % index1 ( k ) j = self % index2 ( k ) if ( lcollision ( k )) self % status ( k ) = COLLISION self % t ( k ) = t self % x1 (:, k ) = pl % xh (:, i ) + system % cb % xb (:) self % v1 (:, k ) = pl % vb (:, i ) if ( isplpl ) then self % x2 (:, k ) = pl % xh (:, j ) + system % cb % xb (:) self % v2 (:, k ) = pl % vb (:, j ) if ( lcollision ( k )) then ! Check to see if either of these bodies has been involved with a collision before, and if so, make this a collisional colliders%idx if ( pl % lcollision ( i ) . or . pl % lcollision ( j )) call pl % make_colliders ([ i , j ]) ! Set the collision flag for these to bodies to true in case they become involved in another collision later in the step pl % lcollision ([ i , j ]) = . true . pl % status ([ i , j ]) = COLLISION call pl % info ( i )% set_value ( status = \"COLLISION\" , discard_time = t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i )) call pl % info ( j )% set_value ( status = \"COLLISION\" , discard_time = t , discard_xh = pl % xh (:, j ), discard_vh = pl % vh (:, j )) end if else self % x2 (:, k ) = tp % xh (:, j ) + system % cb % xb (:) self % v2 (:, k ) = tp % vb (:, j ) if ( lcollision ( k )) then tp % status ( j ) = DISCARDED_PLR tp % ldiscard ( j ) = . true . write ( idstri , * ) pl % id ( i ) write ( idstrj , * ) tp % id ( j ) write ( timestr , * ) t call tp % info ( j )% set_value ( status = \"DISCARDED_PLR\" , discard_time = t , discard_xh = tp % xh (:, j ), discard_vh = tp % vh (:, j )) write ( message , * ) \"Particle \" // trim ( adjustl ( tp % info ( j )% name )) // \" (\" // trim ( adjustl ( idstrj )) // \")\" & // \" collided with massive body \" // trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstri )) // \")\" & // \" at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( message ) end if end if end do end select end select lany_collision = any ( lcollision (:)) ! Extract the pl-pl encounter list and return the plplcollision_list if ( lany_collision ) then select type ( plplenc_list => self ) class is ( symba_plplenc ) call plplenc_list % extract_collisions ( system , param ) end select end if return end function symba_collision_check_encounter pure elemental function symba_collision_check_one ( xr , yr , zr , vxr , vyr , vzr , Gmtot , rlim , dt , lvdotr ) result ( lcollision ) !! author: David A. Minton !! !! Check for a merger between a single pair of particles !! !! Adapted from David E. Kaufmann's Swifter routines symba_merge_tp.f90 and symba_merge_pl.f90 !! !! Adapted from Hal Levison's Swift routine symba5_merge.f implicit none ! Arguments real ( DP ), intent ( in ) :: xr , yr , zr !! Relative position vector components real ( DP ), intent ( in ) :: vxr , vyr , vzr !! Relative velocity vector components real ( DP ), intent ( in ) :: Gmtot !! Sum of G*mass of colliding bodies real ( DP ), intent ( in ) :: rlim !! Collision limit - Typically the sum of the radii of colliding bodies real ( DP ), intent ( in ) :: dt !! Step size logical , intent ( in ) :: lvdotr !! Logical flag indicating that these two bodies are approaching in the current substep ! Result logical :: lcollision !! Logical flag indicating whether these two bodies will collide or not ! Internals real ( DP ) :: r2 , rlim2 , a , e , q , vdotr , tcr2 , dt2 r2 = xr ** 2 + yr ** 2 + zr ** 2 rlim2 = rlim ** 2 if ( r2 <= rlim2 ) then ! checks if bodies are actively colliding in this time step lcollision = . true . else ! if they are not actively colliding in  this time step, checks if they are going to collide next time step based on velocities and q lcollision = . false . vdotr = xr * vxr + yr * vyr + zr * vzr if ( lvdotr . and . ( vdotr > 0.0_DP )) then tcr2 = r2 / ( vxr ** 2 + vyr ** 2 + vzr ** 2 ) dt2 = dt ** 2 if ( tcr2 <= dt2 ) then call orbel_xv2aeq ( Gmtot , [ xr , yr , zr ], [ vxr , vyr , vzr ], a , e , q ) lcollision = ( q < rlim ) end if end if end if return end function symba_collision_check_one function symba_collision_consolidate_colliders ( pl , cb , param , idx_parent , colliders ) result ( lflag ) !! author: David A. Minton !! !! Loops through the pl-pl collision list and groups families together by index. Outputs the indices of all colliders%idx members, !! and pairs of quantities (x and v vectors, mass, radius, L_spin, and Ip) that can be used to resolve the collisional outcome. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA massive body object class ( symba_cb ), intent ( inout ) :: cb !! SyMBA central body object class ( symba_parameters ), intent ( in ) :: param !! Current run configuration parameters with SyMBA additions integer ( I4B ), dimension ( 2 ), intent ( inout ) :: idx_parent !! Index of the two bodies considered the \"parents\" of the collision class ( fraggle_colliders ), intent ( out ) :: colliders ! Result logical :: lflag !! Logical flag indicating whether a colliders%idx was successfully created or not ! Internals type collidx_array integer ( I4B ), dimension (:), allocatable :: id integer ( I4B ), dimension (:), allocatable :: idx end type collidx_array type ( collidx_array ), dimension ( 2 ) :: parent_child_index_array integer ( I4B ), dimension ( 2 ) :: nchild integer ( I4B ) :: i , j , ncolliders , idx_child real ( DP ), dimension ( 2 ) :: volume , density real ( DP ) :: mchild , mtot , volchild real ( DP ), dimension ( NDIM ) :: xc , vc , xcom , vcom , xchild , vchild , xcrossv real ( DP ), dimension ( NDIM , 2 ) :: mxc , vcc nchild (:) = pl % kin ( idx_parent (:))% nchild ! If all of these bodies share a parent, but this is still a unique collision, move the last child ! out of the parent's position and make it the secondary body if ( idx_parent ( 1 ) == idx_parent ( 2 )) then if ( nchild ( 1 ) == 0 ) then ! There is only one valid body recorded in this pair (this could happen due to restructuring of the kinship relationships, though it should be rare) lflag = . false . call pl % reset_kinship ([ idx_parent ( 1 )]) return end if idx_parent ( 2 ) = pl % kin ( idx_parent ( 1 ))% child ( nchild ( 1 )) nchild ( 1 ) = nchild ( 1 ) - 1 nchild ( 2 ) = 0 pl % kin ( idx_parent (:))% nchild = nchild (:) pl % kin ( idx_parent ( 2 ))% parent = idx_parent ( 1 ) end if colliders % mass (:) = pl % mass ( idx_parent (:)) ! Note: This is meant to mass, not G*mass, as the collisional regime determination uses mass values that will be converted to Si colliders % radius (:) = pl % radius ( idx_parent (:)) volume (:) = ( 4.0_DP / 3.0_DP ) * PI * colliders % radius (:) ** 3 ! Group together the ids and indexes of each collisional parent and its children do j = 1 , 2 allocate ( parent_child_index_array ( j )% idx ( nchild ( j ) + 1 )) allocate ( parent_child_index_array ( j )% id ( nchild ( j ) + 1 )) associate ( idx_arr => parent_child_index_array ( j )% idx , & id_arr => parent_child_index_array ( j )% id , & ncj => nchild ( j ), & pl => pl , & plkinj => pl % kin ( idx_parent ( j ))) idx_arr ( 1 ) = idx_parent ( j ) if ( ncj > 0 ) idx_arr ( 2 : ncj + 1 ) = plkinj % child ( 1 : ncj ) id_arr (:) = pl % id ( idx_arr (:)) end associate end do ! Consolidate the groups of collsional parents with any children they may have into a single \"colliders%idx\" index array ncolliders = 2 + sum ( nchild (:)) allocate ( colliders % idx ( ncolliders )) colliders % idx = [ parent_child_index_array ( 1 )% idx (:), parent_child_index_array ( 2 )% idx (:)] colliders % ncoll = count ( pl % lcollision ( colliders % idx (:))) colliders % idx = pack ( colliders % idx (:), pl % lcollision ( colliders % idx (:))) colliders % L_spin (:,:) = 0.0_DP colliders % Ip (:,:) = 0.0_DP ! Find the barycenter of each body along with its children, if it has any do j = 1 , 2 colliders % xb (:, j ) = pl % xh (:, idx_parent ( j )) + cb % xb (:) colliders % vb (:, j ) = pl % vb (:, idx_parent ( j )) ! Assume principal axis rotation about axis corresponding to highest moment of inertia (3rd Ip) if ( param % lrotation ) then colliders % Ip (:, j ) = colliders % mass ( j ) * pl % Ip (:, idx_parent ( j )) colliders % L_spin (:, j ) = colliders % Ip ( 3 , j ) * colliders % radius ( j ) ** 2 * pl % rot (:, idx_parent ( j )) end if if ( nchild ( j ) > 0 ) then do i = 1 , nchild ( j ) ! Loop over all children and take the mass weighted mean of the properties idx_child = parent_child_index_array ( j )% idx ( i + 1 ) if (. not . pl % lcollision ( idx_child )) cycle mchild = pl % mass ( idx_child ) xchild (:) = pl % xh (:, idx_child ) + cb % xb (:) vchild (:) = pl % vb (:, idx_child ) volchild = ( 4.0_DP / 3.0_DP ) * PI * pl % radius ( idx_child ) ** 3 volume ( j ) = volume ( j ) + volchild ! Get angular momentum of the child-parent pair and add that to the spin ! Add the child's spin if ( param % lrotation ) then xcom (:) = ( colliders % mass ( j ) * colliders % xb (:, j ) + mchild * xchild (:)) / ( colliders % mass ( j ) + mchild ) vcom (:) = ( colliders % mass ( j ) * colliders % vb (:, j ) + mchild * vchild (:)) / ( colliders % mass ( j ) + mchild ) xc (:) = colliders % xb (:, j ) - xcom (:) vc (:) = colliders % vb (:, j ) - vcom (:) xcrossv (:) = xc (:) . cross . vc (:) colliders % L_spin (:, j ) = colliders % L_spin (:, j ) + colliders % mass ( j ) * xcrossv (:) xc (:) = xchild (:) - xcom (:) vc (:) = vchild (:) - vcom (:) xcrossv (:) = xc (:) . cross . vc (:) colliders % L_spin (:, j ) = colliders % L_spin (:, j ) + mchild * xcrossv (:) colliders % L_spin (:, j ) = colliders % L_spin (:, j ) + mchild * pl % Ip ( 3 , idx_child ) * pl % radius ( idx_child ) ** 2 * pl % rot (:, idx_child ) colliders % Ip (:, j ) = colliders % Ip (:, j ) + mchild * pl % Ip (:, idx_child ) end if ! Merge the child and parent colliders % mass ( j ) = colliders % mass ( j ) + mchild colliders % xb (:, j ) = xcom (:) colliders % vb (:, j ) = vcom (:) end do end if density ( j ) = colliders % mass ( j ) / volume ( j ) colliders % radius ( j ) = ( 3 * volume ( j ) / ( 4 * PI )) ** ( 1.0_DP / 3.0_DP ) if ( param % lrotation ) colliders % Ip (:, j ) = colliders % Ip (:, j ) / colliders % mass ( j ) xcom (:) = ( colliders % mass ( 1 ) * colliders % xb (:, 1 ) + colliders % mass ( 2 ) * colliders % xb (:, 2 )) / sum ( colliders % mass (:)) vcom (:) = ( colliders % mass ( 1 ) * colliders % vb (:, 1 ) + colliders % mass ( 2 ) * colliders % vb (:, 2 )) / sum ( colliders % mass (:)) mxc (:, 1 ) = colliders % mass ( 1 ) * ( colliders % xb (:, 1 ) - xcom (:)) mxc (:, 2 ) = colliders % mass ( 2 ) * ( colliders % xb (:, 2 ) - xcom (:)) vcc (:, 1 ) = colliders % vb (:, 1 ) - vcom (:) vcc (:, 2 ) = colliders % vb (:, 2 ) - vcom (:) colliders % L_orbit (:,:) = mxc (:,:) . cross . vcc (:,:) end do lflag = . true . ! Destroy the kinship relationships for all members of this colliders%idx call pl % reset_kinship ( colliders % idx (:)) return end function symba_collision_consolidate_colliders module subroutine symba_collision_encounter_extract_collisions ( self , system , param ) !! author: David A. Minton !! !! Processes the pl-pl encounter list remove only those encounters that led to a collision !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , dimension (:), allocatable :: lplpl_collision logical , dimension (:), allocatable :: lplpl_unique_parent integer ( I4B ), dimension (:), pointer :: plparent integer ( I4B ), dimension (:), allocatable :: collision_idx , unique_parent_idx integer ( I4B ) :: i , index_coll , ncollisions , nunique_parent , nplplenc select type ( pl => system % pl ) class is ( symba_pl ) associate ( plplenc_list => self , idx1 => self % index1 , idx2 => self % index2 , plparent => pl % kin % parent ) nplplenc = plplenc_list % nenc allocate ( lplpl_collision ( nplplenc )) lplpl_collision (:) = plplenc_list % status ( 1 : nplplenc ) == COLLISION if (. not . any ( lplpl_collision )) return ! Collisions have been detected in this step. So we need to determine which of them are between unique bodies. ! Get the subset of pl-pl encounters that lead to a collision ncollisions = count ( lplpl_collision (:)) allocate ( collision_idx ( ncollisions )) collision_idx = pack ([( i , i = 1 , nplplenc )], lplpl_collision ) ! Get the subset of collisions that involve a unique pair of parents allocate ( lplpl_unique_parent ( ncollisions )) lplpl_unique_parent (:) = plparent ( idx1 ( collision_idx (:))) /= plparent ( idx2 ( collision_idx (:))) nunique_parent = count ( lplpl_unique_parent (:)) allocate ( unique_parent_idx ( nunique_parent )) unique_parent_idx = pack ( collision_idx (:), lplpl_unique_parent (:)) ! Scrub all pl-pl collisions involving unique pairs of parents, which will remove all duplicates and leave behind ! all pairs that have themselves as parents but are not part of the unique parent list. This can hapepn in rare cases ! due to restructuring of parent/child relationships when there are large numbers of multi-body collisions in a single ! step lplpl_unique_parent (:) = . true . do index_coll = 1 , ncollisions associate ( ip1 => plparent ( idx1 ( collision_idx ( index_coll ))), ip2 => plparent ( idx2 ( collision_idx ( index_coll )))) lplpl_unique_parent (:) = . not . ( any ( plparent ( idx1 ( unique_parent_idx (:))) == ip1 ) . or . & any ( plparent ( idx2 ( unique_parent_idx (:))) == ip1 ) . or . & any ( plparent ( idx1 ( unique_parent_idx (:))) == ip2 ) . or . & any ( plparent ( idx2 ( unique_parent_idx (:))) == ip2 ) ) end associate end do ! Reassemble collision index list to include only those containing the unique pairs of parents, plus all the non-unique pairs that don't ! contain a parent body on the unique parent list. ncollisions = nunique_parent + count ( lplpl_unique_parent ) collision_idx = [ unique_parent_idx (:), pack ( collision_idx (:), lplpl_unique_parent (:))] ! Create a mask that contains only the pl-pl encounters that did not result in a collision, and then discard them lplpl_collision (:) = . false . lplpl_collision ( collision_idx (:)) = . true . call plplenc_list % spill ( system % plplcollision_list , lplpl_collision , ldestructive = . true .) ! Extract any encounters that are not collisions from the list. end associate end select return end subroutine symba_collision_encounter_extract_collisions module subroutine symba_collision_make_colliders_pl ( self , idx ) !! author: Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton !! !! When a single body is involved in more than one collision in a single step, it becomes part of a colliders%idx. !! The largest body involved in a multi-body collision is the \"parent\" and all bodies that collide with it are its \"children,\" !! including those that collide with the children. !! !! Adapted from David E. Kaufmann's Swifter routine symba_merge_pl.f90 !! !! Adapted from Hal Levison's Swift routine symba5_merge.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension ( 2 ), intent ( in ) :: idx !! Array holding the indices of the two bodies involved in the collision ! Internals integer ( I4B ) :: i , j , index_parent , index_child , p1 , p2 integer ( I4B ) :: nchild_inherit , nchild_orig , nchild_new integer ( I4B ), dimension (:), allocatable :: temp associate ( pl => self ) p1 = pl % kin ( idx ( 1 ))% parent p2 = pl % kin ( idx ( 2 ))% parent if ( p1 == p2 ) return ! This is a collision between to children of a shared parent. We will ignore it. if ( pl % mass ( p1 ) > pl % mass ( p2 )) then index_parent = p1 index_child = p2 else index_parent = p2 index_child = p1 end if ! Expand the child array (or create it if necessary) and copy over the previous lists of children nchild_orig = pl % kin ( index_parent )% nchild nchild_inherit = pl % kin ( index_child )% nchild nchild_new = nchild_orig + nchild_inherit + 1 allocate ( temp ( nchild_new )) if ( nchild_orig > 0 ) temp ( 1 : nchild_orig ) = pl % kin ( index_parent )% child ( 1 : nchild_orig ) ! Find out if the child body has any children of its own. The new parent wil inherit these children if ( nchild_inherit > 0 ) then temp ( nchild_orig + 1 : nchild_orig + nchild_inherit ) = pl % kin ( index_child )% child ( 1 : nchild_inherit ) do i = 1 , nchild_inherit j = pl % kin ( index_child )% child ( i ) ! Set the childrens' parent to the new parent pl % kin ( j )% parent = index_parent end do end if call pl % reset_kinship ([ index_child ]) ! Add the new child to its parent pl % kin ( index_child )% parent = index_parent temp ( nchild_new ) = index_child ! Save the new child array to the parent pl % kin ( index_parent )% nchild = nchild_new call move_alloc ( from = temp , to = pl % kin ( index_parent )% child ) end associate return end subroutine symba_collision_make_colliders_pl subroutine symba_collision_mergeaddsub ( system , param , colliders , frag , status ) !! author:  David A. Minton !! !! Fills the pl_discards and pl_adds with removed and added bodies !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ), intent ( in ) :: status !! Status flag to assign to adds ! Internals integer ( I4B ) :: i , ibiggest , ismallest , iother , nstart , nend , ncolliders , nfrag logical , dimension ( system % pl % nbody ) :: lmask class ( symba_pl ), allocatable :: plnew , plsub character ( * ), parameter :: FRAGFMT = '(\"Newbody\",I0.7)' character ( len = NAMELEN ) :: newname character ( len = STRMAX ) :: message select type ( pl => system % pl ) class is ( symba_pl ) select type ( pl_discards => system % pl_discards ) class is ( symba_merger ) associate ( info => pl % info , pl_adds => system % pl_adds , cb => system % cb , npl => pl % nbody ) ! Add the colliders%idx bodies to the subtraction list ncolliders = colliders % ncoll nfrag = frag % nbody ! Setup new bodies allocate ( plnew , mold = pl ) call plnew % setup ( nfrag , param ) ibiggest = colliders % idx ( maxloc ( pl % Gmass ( colliders % idx (:)), dim = 1 )) ismallest = colliders % idx ( minloc ( pl % Gmass ( colliders % idx (:)), dim = 1 )) ! Copy over identification, information, and physical properties of the new bodies from the fragment list plnew % id ( 1 : nfrag ) = frag % id ( 1 : nfrag ) plnew % xb (:, 1 : nfrag ) = frag % xb (:, 1 : nfrag ) plnew % vb (:, 1 : nfrag ) = frag % vb (:, 1 : nfrag ) call pl % vb2vh ( cb ) call pl % xh2xb ( cb ) do i = 1 , nfrag plnew % xh (:, i ) = frag % xb (:, i ) - cb % xb (:) plnew % vh (:, i ) = frag % vb (:, i ) - cb % vb (:) end do plnew % mass ( 1 : nfrag ) = frag % mass ( 1 : nfrag ) plnew % Gmass ( 1 : nfrag ) = param % GU * frag % mass ( 1 : nfrag ) plnew % radius ( 1 : nfrag ) = frag % radius ( 1 : nfrag ) plnew % density ( 1 : nfrag ) = frag % mass ( 1 : nfrag ) / frag % radius ( 1 : nfrag ) call plnew % set_rhill ( cb ) select case ( status ) case ( DISRUPTION ) plnew % status ( 1 : nfrag ) = NEW_PARTICLE do i = 1 , nfrag write ( newname , FRAGFMT ) frag % id ( i ) call plnew % info ( i )% set_value ( origin_type = \"Disruption\" , origin_time = param % t , name = newname , origin_xh = plnew % xh (:, i ), origin_vh = plnew % vh (:, i )) end do do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) then iother = ismallest else iother = ibiggest end if call pl % info ( colliders % idx ( i ))% set_value ( status = \"Disruption\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do case ( SUPERCATASTROPHIC ) plnew % status ( 1 : nfrag ) = NEW_PARTICLE do i = 1 , nfrag write ( newname , FRAGFMT ) frag % id ( i ) call plnew % info ( i )% set_value ( origin_type = \"Supercatastrophic\" , origin_time = param % t , name = newname , origin_xh = plnew % xh (:, i ), origin_vh = plnew % vh (:, i )) end do do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) then iother = ismallest else iother = ibiggest end if call pl % info ( colliders % idx ( i ))% set_value ( status = \"Supercatastrophic\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do case ( HIT_AND_RUN_DISRUPT ) call plnew % info ( 1 )% copy ( pl % info ( ibiggest )) plnew % status ( 1 ) = OLD_PARTICLE do i = 2 , nfrag write ( newname , FRAGFMT ) frag % id ( i ) call plnew % info ( i )% set_value ( origin_type = \"Hit and run fragment\" , origin_time = param % t , name = newname , origin_xh = plnew % xh (:, i ), origin_vh = plnew % vh (:, i )) end do do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) cycle iother = ibiggest call pl % info ( colliders % idx ( i ))% set_value ( status = \"Hit and run fragmention\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do case ( MERGED ) call plnew % info ( 1 )% copy ( pl % info ( ibiggest )) plnew % status ( 1 ) = OLD_PARTICLE do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) cycle iother = ibiggest call pl % info ( colliders % idx ( i ))% set_value ( status = \"MERGED\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do end select if ( param % lrotation ) then plnew % Ip (:, 1 : nfrag ) = frag % Ip (:, 1 : nfrag ) plnew % rot (:, 1 : nfrag ) = frag % rot (:, 1 : nfrag ) end if if ( param % ltides ) then plnew % Q = pl % Q ( ibiggest ) plnew % k2 = pl % k2 ( ibiggest ) plnew % tlag = pl % tlag ( ibiggest ) end if !Copy over or set integration parameters for new bodies plnew % lcollision ( 1 : nfrag ) = . false . plnew % ldiscard ( 1 : nfrag ) = . false . plnew % levelg ( 1 : nfrag ) = pl % levelg ( ibiggest ) plnew % levelm ( 1 : nfrag ) = pl % levelm ( ibiggest ) ! Log the properties of the new bodies call fraggle_io_log_pl ( plnew , param ) ! Append the new merged body to the list nstart = pl_adds % nbody + 1 nend = pl_adds % nbody + nfrag call pl_adds % append ( plnew , lsource_mask = [(. true ., i = 1 , nfrag )]) ! Record how many bodies were added in this event pl_adds % ncomp ( nstart : nend ) = plnew % nbody ! Add the discarded bodies to the discard list pl % status ( colliders % idx (:)) = MERGED pl % ldiscard ( colliders % idx (:)) = . true . pl % lcollision ( colliders % idx (:)) = . true . lmask (:) = . false . lmask ( colliders % idx (:)) = . true . call plnew % setup ( 0 , param ) deallocate ( plnew ) allocate ( plsub , mold = pl ) call pl % spill ( plsub , lmask , ldestructive = . false .) nstart = pl_discards % nbody + 1 nend = pl_discards % nbody + ncolliders call pl_discards % append ( plsub , lsource_mask = [(. true ., i = 1 , ncolliders )]) ! Record how many bodies were subtracted in this event pl_discards % ncomp ( nstart : nend ) = ncolliders call plsub % setup ( 0 , param ) deallocate ( plsub ) end associate end select end select return end subroutine symba_collision_mergeaddsub module subroutine symba_collision_resolve_fragmentations ( self , system , param ) !! author: David A. Minton !! !! Process list of collisions, determine the collisional regime, and then create fragments. !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions ! Internals ! Internals integer ( I4B ), dimension ( 2 ) :: idx_parent !! Index of the two bodies considered the \"parents\" of the collision real ( DP ), dimension ( NDIM , 2 ) :: x , v , L_spin , Ip !! Output values that represent a 2-body equivalent of a possibly 2+ body collision real ( DP ), dimension ( 2 ) :: mass , radius !! Output values that represent a 2-body equivalent of a possibly 2+ body collision logical :: lgoodcollision integer ( I4B ) :: i type ( fraggle_colliders ) :: colliders !! Fraggle colliders object type ( fraggle_fragments ) :: frag !! Fraggle fragmentation system object associate ( plplcollision_list => self , ncollisions => self % nenc , idx1 => self % index1 , idx2 => self % index2 ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( cb => system % cb ) class is ( symba_cb ) do i = 1 , ncollisions idx_parent ( 1 ) = pl % kin ( idx1 ( i ))% parent idx_parent ( 2 ) = pl % kin ( idx2 ( i ))% parent lgoodcollision = symba_collision_consolidate_colliders ( pl , cb , param , idx_parent , colliders ) if ((. not . lgoodcollision ) . or . any ( pl % status ( idx_parent (:)) /= COLLISION )) cycle call colliders % regime ( frag , system , param ) select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION , COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) plplcollision_list % status ( i ) = symba_collision_casedisruption ( system , param , colliders , frag ) case ( COLLRESOLVE_REGIME_HIT_AND_RUN ) plplcollision_list % status ( i ) = symba_collision_casehitandrun ( system , param , colliders , frag ) case ( COLLRESOLVE_REGIME_MERGE , COLLRESOLVE_REGIME_GRAZE_AND_MERGE ) plplcollision_list % status ( i ) = symba_collision_casemerge ( system , param , colliders , frag ) case default write ( * , * ) \"Error in symba_collision, unrecognized collision regime\" call util_exit ( FAILURE ) end select end do end select end select end associate return end subroutine symba_collision_resolve_fragmentations module subroutine symba_collision_resolve_mergers ( self , system , param ) !! author: David A. Minton !! !! Process list of collisions and merge colliding bodies together. !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions ! Internals integer ( I4B ), dimension ( 2 ) :: idx_parent !! Index of the two bodies considered the \"parents\" of the collision real ( DP ), dimension ( NDIM , 2 ) :: x , v , L_spin , Ip !! Output values that represent a 2-body equivalent of a possibly 2+ body collision real ( DP ), dimension ( 2 ) :: mass , radius !! Output values that represent a 2-body equivalent of a possibly 2+ body collision logical :: lgoodcollision integer ( I4B ) :: i type ( fraggle_colliders ) :: colliders !! Fraggle colliders object type ( fraggle_fragments ) :: frag !! Fraggle fragmentation system object associate ( plplcollision_list => self , ncollisions => self % nenc , idx1 => self % index1 , idx2 => self % index2 ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( cb => system % cb ) class is ( symba_cb ) do i = 1 , ncollisions idx_parent ( 1 ) = pl % kin ( idx1 ( i ))% parent idx_parent ( 2 ) = pl % kin ( idx2 ( i ))% parent lgoodcollision = symba_collision_consolidate_colliders ( pl , cb , param , idx_parent , colliders ) if (. not . lgoodcollision ) cycle if ( any ( pl % status ( idx_parent (:)) /= COLLISION )) cycle ! One of these two bodies has already been resolved frag % regime = COLLRESOLVE_REGIME_MERGE frag % mtot = sum ( colliders % mass (:)) frag % xbcom (:) = ( colliders % mass ( 1 ) * colliders % xb (:, 1 ) + colliders % mass ( 2 ) * colliders % xb (:, 2 )) / frag % mtot frag % vbcom (:) = ( colliders % mass ( 1 ) * colliders % vb (:, 1 ) + colliders % mass ( 2 ) * colliders % vb (:, 2 )) / frag % mtot plplcollision_list % status ( i ) = symba_collision_casemerge ( system , param , colliders , frag ) end do end select end select end associate return end subroutine symba_collision_resolve_mergers module subroutine symba_collision_resolve_plplenc ( self , system , param , t , dt , irec ) !! author: David A. Minton !! !! Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the collision !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Internals real ( DP ) :: Eorbit_before , Eorbit_after logical :: lplpl_collision character ( len = STRMAX ) :: timestr class ( symba_parameters ), allocatable :: tmp_param associate ( plplenc_list => self , plplcollision_list => system % plplcollision_list ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( param ) class is ( symba_parameters ) if ( plplcollision_list % nenc == 0 ) return ! No collisions to resolve ! Make sure that the heliocentric and barycentric coordinates are consistent with each other call pl % vb2vh ( system % cb ) call pl % xh2xb ( system % cb ) ! Get the energy before the collision is resolved if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_before = system % te end if do write ( timestr , * ) t call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"Collision between massive bodies detected at time t = \" // trim ( adjustl ( timestr ))) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) allocate ( tmp_param , source = param ) tmp_param % t = t if ( param % lfragmentation ) then call plplcollision_list % resolve_fragmentations ( system , param ) else call plplcollision_list % resolve_mergers ( system , param ) end if ! Destroy the collision list now that the collisions are resolved call plplcollision_list % setup ( 0 ) if (( system % pl_adds % nbody == 0 ) . and . ( system % pl_discards % nbody == 0 )) exit ! Save the add/discard information to file call system % write_discard ( tmp_param ) ! Rearrange the arrays: Remove discarded bodies, add any new bodies, resort, and recompute all indices and encounter lists call pl % rearray ( system , tmp_param ) ! Destroy the add/discard list so that we don't append the same body multiple times if another collision is detected call system % pl_discards % setup ( 0 , param ) call system % pl_adds % setup ( 0 , param ) deallocate ( tmp_param ) ! Check whether or not any of the particles that were just added are themselves in a collision state. This will generate a new plplcollision_list lplpl_collision = plplenc_list % collision_check ( system , param , t , dt , irec ) if (. not . lplpl_collision ) exit end do if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_after = system % te param % Ecollisions = param % Ecollisions + ( Eorbit_after - Eorbit_before ) end if end select end select end associate return end subroutine symba_collision_resolve_plplenc module subroutine symba_collision_resolve_pltpenc ( self , system , param , t , dt , irec ) !! author: David A. Minton !! !! Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the collision !! implicit none ! Arguments class ( symba_pltpenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation tim real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level call system % tp % xh2xb ( system % cb ) call system % tp % discard ( system , param ) return end subroutine symba_collision_resolve_pltpenc end submodule s_symba_collision","tags":"","loc":"sourcefile/symba_collision.f90.html"},{"title":"symba_setup.f90 – swiftest","text":"This file depends on sourcefile~~symba_setup.f90~~EfferentGraph sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_setup Source Code symba_setup.f90 Source Code submodule ( symba_classes ) s_symba_setup use swiftest contains module subroutine symba_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize an SyMBA nbody system from files and sets up the planetocentric structures. !! This subroutine will also sort the massive bodies in descending order by mass !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j ! Call parent method associate ( system => self ) call helio_setup_initialize_system ( system , param ) call system % pltpenc_list % setup ( 0 ) call system % plplenc_list % setup ( 0 ) call system % plplcollision_list % setup ( 0 ) end associate return end subroutine symba_setup_initialize_system module subroutine symba_setup_merger ( self , n , param ) !! author: David A. Minton !! !! Allocate SyMBA test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90 implicit none ! Arguments class ( symba_merger ), intent ( inout ) :: self !! SyMBA merger list object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i !> Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl call symba_setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % ncomp )) deallocate ( self % ncomp ) if ( n == 0 ) return allocate ( self % ncomp ( n )) self % ncomp (:) = 0 return end subroutine symba_setup_merger module subroutine symba_setup_pl ( self , n , param ) !! author: David A. Minton !! !! Allocate SyMBA test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i !> Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl call setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % lcollision )) deallocate ( self % lcollision ) if ( allocated ( self % lencounter )) deallocate ( self % lencounter ) if ( allocated ( self % lmtiny )) deallocate ( self % lmtiny ) if ( allocated ( self % nplenc )) deallocate ( self % nplenc ) if ( allocated ( self % ntpenc )) deallocate ( self % ntpenc ) if ( allocated ( self % levelg )) deallocate ( self % levelg ) if ( allocated ( self % levelm )) deallocate ( self % levelm ) if ( allocated ( self % isperi )) deallocate ( self % isperi ) if ( allocated ( self % peri )) deallocate ( self % peri ) if ( allocated ( self % atp )) deallocate ( self % atp ) if ( allocated ( self % kin )) deallocate ( self % kin ) if ( n == 0 ) return allocate ( self % lcollision ( n )) allocate ( self % lencounter ( n )) allocate ( self % lmtiny ( n )) allocate ( self % nplenc ( n )) allocate ( self % ntpenc ( n )) allocate ( self % levelg ( n )) allocate ( self % levelm ( n )) allocate ( self % isperi ( n )) allocate ( self % peri ( n )) allocate ( self % atp ( n )) allocate ( self % kin ( n )) self % lcollision (:) = . false . self % lencounter (:) = . false . self % lmtiny (:) = . false . self % nplenc (:) = 0 self % ntpenc (:) = 0 self % levelg (:) = - 1 self % levelm (:) = - 1 self % isperi (:) = 0 self % peri (:) = 0.0_DP self % atp (:) = 0.0_DP call self % reset_kinship ([( i , i = 1 , n )]) return end subroutine symba_setup_pl module subroutine symba_setup_encounter ( self , n ) !! author: David A. Minton !! !! A constructor that sets the number of encounters and allocates and initializes all arrays !! implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for call setup_encounter ( self , n ) if ( n < 0 ) return if ( allocated ( self % level )) deallocate ( self % level ) if ( n == 0 ) return allocate ( self % level ( n )) self % level (:) = - 1 return end subroutine symba_setup_encounter module subroutine symba_setup_tp ( self , n , param ) !! author: David A. Minton !! !! Allocate WHM test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90 implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class. In this case, helio_tp does not have its own setup method so we use the base method for swiftest_tp call setup_tp ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % nplenc )) deallocate ( self % nplenc ) if ( allocated ( self % levelg )) deallocate ( self % levelg ) if ( allocated ( self % levelm )) deallocate ( self % levelm ) if ( allocated ( self % info )) deallocate ( self % info ) if ( n == 0 ) return allocate ( self % nplenc ( n )) allocate ( self % levelg ( n )) allocate ( self % levelm ( n )) allocate ( self % info ( n )) self % nplenc (:) = 0 self % levelg (:) = - 1 self % levelm (:) = - 1 return end subroutine symba_setup_tp end submodule s_symba_setup","tags":"","loc":"sourcefile/symba_setup.f90.html"},{"title":"symba_kick.f90 – swiftest","text":"This file depends on sourcefile~~symba_kick.f90~~EfferentGraph sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_kick Source Code symba_kick.f90 Source Code submodule ( symba_classes ) s_symba_kick use swiftest contains module subroutine symba_kick_getacch_int_pl ( self ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of massive bodies, with no mutual interactions between bodies below GMTINY !! !! Adapted from Hal Levison's Swift routine symba5_helio_getacch.f !! Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_int.f90 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self call kick_getacch_int_all_pl ( self % nbody , self % nplplm , self % k_plpl , self % xh , self % Gmass , self % radius , self % ah ) return end subroutine symba_kick_getacch_int_pl module subroutine symba_kick_getacch_pl ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch.f90 !! Adapted from Hal Levison's Swift routine symba5_kick_getacch.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i , j integer ( I8B ) :: k , nplplenc real ( DP ) :: rjj , rlim2 , xr , yr , zr real ( DP ), dimension ( NDIM , self % nbody ) :: ah_enc integer ( I4B ), dimension (:,:), allocatable :: k_plpl_enc if ( self % nbody == 0 ) return select type ( system ) class is ( symba_nbody_system ) associate ( pl => self , npl => self % nbody , plplenc_list => system % plplenc_list , radius => self % radius ) ! Apply kicks to all bodies (including those in the encounter list) call helio_kick_getacch_pl ( pl , system , param , t , lbeg ) ! Remove kicks from bodies involved currently in the encounter list, as these are dealt with separately. nplplenc = int ( plplenc_list % nenc , kind = I8B ) allocate ( k_plpl_enc ( 2 , nplplenc )) k_plpl_enc (:, 1 : nplplenc ) = pl % k_plpl (:, plplenc_list % kidx ( 1 : nplplenc )) ah_enc (:,:) = 0.0_DP call kick_getacch_int_all_pl ( npl , nplplenc , k_plpl_enc , pl % xh , pl % Gmass , pl % radius , ah_enc ) pl % ah (:, 1 : npl ) = pl % ah (:, 1 : npl ) - ah_enc (:, 1 : npl ) end associate end select return end subroutine symba_kick_getacch_pl module subroutine symba_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of test particles !! !! Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch_tp.f90 !! Adapted from Hal Levison's Swift routine symba5_kick_getacch.f implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i , j , k real ( DP ) :: rjj , fac , rlim2 real ( DP ), dimension ( NDIM ) :: dx if ( self % nbody == 0 ) return select type ( system ) class is ( symba_nbody_system ) associate ( tp => self , cb => system % cb , pl => system % pl , pltpenc_list => system % pltpenc_list , npltpenc => system % pltpenc_list % nenc ) call helio_kick_getacch_tp ( tp , system , param , t , lbeg ) ! Remove accelerations from encountering pairs do k = 1 , npltpenc i = pltpenc_list % index1 ( k ) j = pltpenc_list % index2 ( k ) if ( tp % lmask ( j )) THEN if ( lbeg ) then dx (:) = tp % xh (:, j ) - pl % xbeg (:, i ) else dx (:) = tp % xh (:, j ) - pl % xend (:, i ) end if rjj = dot_product ( dx (:), dx (:)) fac = pl % Gmass ( i ) / ( rjj * sqrt ( rjj )) tp % ah (:, j ) = tp % ah (:, j ) + fac * dx (:) end IF end do end associate end select return end subroutine symba_kick_getacch_tp module subroutine symba_kick_encounter ( self , system , dt , irec , sgn ) !! author: David A. Minton !! !! Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion. !! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types !! !! Adapted from David E. Kaufmann's Swifter routine: symba_kick.f90 !! Adapted from Hal Levison's Swift routine symba5_kick.f implicit none ! Arguments class ( symba_encounter ), intent ( in ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level integer ( I4B ), intent ( in ) :: sgn !! sign to be applied to acceleration ! Internals integer ( I4B ) :: i , j , irm1 , irecl , ngood integer ( I8B ) :: k real ( DP ) :: r , rr , ri , ris , rim1 , r2 , ir3 , fac , faci , facj real ( DP ), dimension ( NDIM ) :: dx logical :: isplpl logical , dimension (:), allocatable :: lgoodlevel integer ( I4B ), dimension (:), allocatable :: good_idx if ( self % nenc == 0 ) return select type ( self ) class is ( symba_plplenc ) isplpl = . true . class is ( symba_pltpenc ) isplpl = . false . end select select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) associate ( npl => pl % nbody , ntp => tp % nbody , nenc => self % nenc ) if ( npl > 0 ) pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE if ( ntp > 0 ) tp % lmask ( 1 : ntp ) = tp % status ( 1 : ntp ) /= INACTIVE allocate ( lgoodlevel ( nenc )) irm1 = irec - 1 if ( sgn < 0 ) then irecl = irec - 1 else irecl = irec end if do k = 1 , nenc i = self % index1 ( k ) j = self % index2 ( k ) if ( isplpl ) then lgoodlevel ( k ) = ( pl % levelg ( i ) >= irm1 ) . and . ( pl % levelg ( j ) >= irm1 ) else lgoodlevel ( k ) = ( pl % levelg ( i ) >= irm1 ) . and . ( tp % levelg ( j ) >= irm1 ) end if lgoodlevel ( k ) = ( self % status ( k ) == ACTIVE ) . and . lgoodlevel ( k ) end do ngood = count ( lgoodlevel (:)) if ( ngood > 0_I8B ) then allocate ( good_idx ( ngood )) good_idx (:) = pack ([( i , i = 1 , nenc )], lgoodlevel (:)) if ( isplpl ) then do concurrent ( k = 1 : ngood ) i = self % index1 ( good_idx ( k )) j = self % index2 ( good_idx ( k )) pl % ah (:, i ) = 0.0_DP pl % ah (:, j ) = 0.0_DP end do else do concurrent ( k = 1_I8B : ngood ) j = self % index2 ( good_idx ( k )) tp % ah (:, j ) = 0.0_DP end do end if do k = 1 , ngood i = self % index1 ( good_idx ( k )) j = self % index2 ( good_idx ( k )) if ( isplpl ) then ri = (( pl % rhill ( i ) + pl % rhill ( j )) ** 2 ) * ( RHSCALE ** 2 ) * ( RSHELL ** ( 2 * irecl )) rim1 = ri * ( RSHELL ** 2 ) dx (:) = pl % xh (:, j ) - pl % xh (:, i ) else ri = (( pl % rhill ( i )) ** 2 ) * ( RHSCALE ** 2 ) * ( RSHELL ** ( 2 * irecl )) rim1 = ri * ( RSHELL ** 2 ) dx (:) = tp % xh (:, j ) - pl % xh (:, i ) end if r2 = dot_product ( dx (:), dx (:)) if ( r2 < rim1 ) then fac = 0.0_DP lgoodlevel ( good_idx ( k )) = . false . cycle end if if ( r2 < ri ) then ris = sqrt ( ri ) r = sqrt ( r2 ) rr = ( ris - r ) / ( ris * ( 1.0_DP - RSHELL )) fac = ( r2 ** ( - 1.5_DP )) * ( 1.0_DP - 3 * ( rr ** 2 ) + 2 * ( rr ** 3 )) else ir3 = 1.0_DP / ( r2 * sqrt ( r2 )) fac = ir3 end if faci = fac * pl % Gmass ( i ) if ( isplpl ) then facj = fac * pl % Gmass ( j ) pl % ah (:, i ) = pl % ah (:, i ) + facj * dx (:) pl % ah (:, j ) = pl % ah (:, j ) - faci * dx (:) else tp % ah (:, j ) = tp % ah (:, j ) - faci * dx (:) end if end do ngood = count ( lgoodlevel (:)) if ( ngood == 0_I8B ) return good_idx ( 1 : ngood ) = pack ([( i , i = 1 , nenc )], lgoodlevel (:)) if ( isplpl ) then do k = 1 , ngood i = self % index1 ( good_idx ( k )) j = self % index2 ( good_idx ( k )) pl % vb (:, i ) = pl % vb (:, i ) + sgn * dt * pl % ah (:, i ) pl % vb (:, j ) = pl % vb (:, j ) + sgn * dt * pl % ah (:, j ) pl % ah (:, i ) = 0.0_DP pl % ah (:, j ) = 0.0_DP end do else do k = 1 , ngood j = self % index2 ( good_idx ( k )) tp % vb (:, j ) = tp % vb (:, j ) + sgn * dt * tp % ah (:, j ) tp % ah (:, j ) = 0.0_DP end do end if end if end associate end select end select return end subroutine symba_kick_encounter end submodule s_symba_kick","tags":"","loc":"sourcefile/symba_kick.f90.html"},{"title":"symba_encounter_check.f90 – swiftest","text":"This file depends on sourcefile~~symba_encounter_check.f90~~EfferentGraph sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_encounter_check Source Code symba_encounter_check.f90 Source Code submodule ( symba_classes ) s_symba_encounter_check use swiftest contains subroutine symba_encounter_check_all ( nplplm , k_plpl , x , v , rhill , dt , irec , lencounter , loc_lvdotr ) !! author: David A. Minton !! !! Check for encounters between massive bodies. Split off from the main subroutine for performance implicit none integer ( I8B ), intent ( in ) :: nplplm integer ( I4B ), dimension (:,:), intent ( in ) :: k_plpl real ( DP ), dimension (:,:), intent ( in ) :: x , v real ( DP ), dimension (:), intent ( in ) :: rhill real ( DP ), intent ( in ) :: dt integer ( I4B ), intent ( in ) :: irec logical , dimension (:), intent ( out ) :: lencounter , loc_lvdotr ! Internals integer ( I8B ) :: k integer ( I4B ) :: i , j real ( DP ) :: xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 !$omp parallel do default(private)& !$omp shared(nplplm, k_plpl, x, v, rhill, dt, irec, lencounter, loc_lvdotr) do k = 1_I8B , nplplm i = k_plpl ( 1 , k ) j = k_plpl ( 2 , k ) xr = x ( 1 , j ) - x ( 1 , i ) yr = x ( 2 , j ) - x ( 2 , i ) zr = x ( 3 , j ) - x ( 3 , i ) vxr = v ( 1 , j ) - v ( 1 , i ) vyr = v ( 2 , j ) - v ( 2 , i ) vzr = v ( 3 , j ) - v ( 3 , i ) rhill1 = rhill ( i ) rhill2 = rhill ( j ) lencounter ( k ) = . false . loc_lvdotr ( k ) = . false . call symba_encounter_check_one ( xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 , dt , irec , lencounter ( k ), loc_lvdotr ( k )) end do !$omp end parallel do return end subroutine symba_encounter_check_all module function symba_encounter_check_pl ( self , system , dt , irec ) result ( lany_encounter ) !! author: David A. Minton !! !! Check for an encounter between massive bodies. !! implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Result logical :: lany_encounter !! Returns true if there is at least one close encounter ! Internals integer ( I8B ) :: k , nplplm integer ( I4B ) :: i , j , nenc logical , dimension (:), allocatable :: lencounter , loc_lvdotr if ( self % nbody == 0 ) return associate ( pl => self ) nplplm = pl % nplplm allocate ( lencounter ( nplplm )) allocate ( loc_lvdotr ( nplplm )) call symba_encounter_check_all ( nplplm , pl % k_plpl , pl % xh , pl % vh , pl % rhill , dt , irec , lencounter , loc_lvdotr ) !$omp parallel workshare nenc = count ( lencounter (:)) !$omp end parallel workshare lany_encounter = nenc > 0 if ( lany_encounter ) then associate ( plplenc_list => system % plplenc_list ) call plplenc_list % resize ( nenc ) plplenc_list % lvdotr ( 1 : nenc ) = pack ( loc_lvdotr ( 1 : nplplm ), lencounter ( 1 : nplplm )) plplenc_list % kidx ( 1 : nenc ) = pack ([( k , k = 1_I8B , nplplm )], lencounter ( 1 : nplplm )) deallocate ( lencounter , loc_lvdotr ) plplenc_list % index1 ( 1 : nenc ) = pl % k_plpl ( 1 , plplenc_list % kidx ( 1 : nenc )) plplenc_list % index2 ( 1 : nenc ) = pl % k_plpl ( 2 , plplenc_list % kidx ( 1 : nenc )) plplenc_list % id1 ( 1 : nenc ) = pl % id ( plplenc_list % index1 ( 1 : nenc )) plplenc_list % id2 ( 1 : nenc ) = pl % id ( plplenc_list % index2 ( 1 : nenc )) do k = 1 , nenc i = plplenc_list % index1 ( k ) j = plplenc_list % index2 ( k ) plplenc_list % status ( k ) = ACTIVE plplenc_list % level ( k ) = irec pl % lencounter ( i ) = . true . pl % lencounter ( j ) = . true . pl % levelg ( i ) = irec pl % levelm ( i ) = irec pl % levelg ( j ) = irec pl % levelm ( j ) = irec pl % nplenc ( i ) = pl % nplenc ( i ) + 1 pl % nplenc ( j ) = pl % nplenc ( j ) + 1 end do end associate end if end associate return end function symba_encounter_check_pl module function symba_encounter_check ( self , system , dt , irec ) result ( lany_encounter ) !! author: David A. Minton !! !! Check for an encounter between test particles and massive bodies in the pltpenc list. !! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types. !! !! Adapted from portions of David E. Kaufmann's Swifter routine: symba_step_recur.f90 implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-pl encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter ! Internals integer ( I4B ) :: i , j , k real ( DP ), dimension ( NDIM ) :: xr , vr logical :: lencounter , isplpl real ( DP ) :: rlim2 , rji2 logical , dimension (:), allocatable :: lencmask lany_encounter = . false . if ( self % nenc == 0 ) return select type ( self ) class is ( symba_plplenc ) isplpl = . true . class is ( symba_pltpenc ) isplpl = . false . end select select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) allocate ( lencmask ( self % nenc )) lencmask (:) = ( self % status ( 1 : self % nenc ) == ACTIVE ) . and . ( self % level ( 1 : self % nenc ) == irec - 1 ) if (. not . any ( lencmask (:))) return do concurrent ( k = 1 : self % nenc , lencmask ( k )) i = self % index1 ( k ) j = self % index2 ( k ) if ( isplpl ) then xr (:) = pl % xh (:, j ) - pl % xh (:, i ) vr (:) = pl % vb (:, j ) - pl % vb (:, i ) call symba_encounter_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % rhill ( i ), pl % rhill ( j ), dt , irec , lencounter , self % lvdotr ( k )) else xr (:) = tp % xh (:, j ) - pl % xh (:, i ) vr (:) = tp % vb (:, j ) - pl % vb (:, i ) call symba_encounter_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % rhill ( i ), 0.0_DP , dt , irec , lencounter , self % lvdotr ( k )) end if if ( lencounter ) then if ( isplpl ) then rlim2 = ( pl % radius ( i ) + pl % radius ( j )) ** 2 else rlim2 = ( pl % radius ( i )) ** 2 end if rji2 = dot_product ( xr (:), xr (:)) ! Check to see if these are physically overlapping bodies first, which we should ignore if ( rji2 > rlim2 ) then lany_encounter = . true . pl % levelg ( i ) = irec pl % levelm ( i ) = MAX ( irec , pl % levelm ( i )) if ( isplpl ) then pl % levelg ( j ) = irec pl % levelm ( j ) = MAX ( irec , pl % levelm ( j )) else tp % levelg ( j ) = irec tp % levelm ( j ) = MAX ( irec , tp % levelm ( j )) end if self % level ( k ) = irec end if end if end do end select end select return end function symba_encounter_check module function symba_encounter_check_tp ( self , system , dt , irec ) result ( lany_encounter ) !! author: David A. Minton !! !! Check for an encounter between test particles and massive bodies. !! implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Result logical :: lany_encounter !! Returns true if there is at least one close encounter ! Internals real ( DP ) :: r2crit , vdotr , r2 , v2 , tmin , r2min , term2 integer ( I4B ) :: i , j , k , nenc , plind , tpind real ( DP ), dimension ( NDIM ) :: xr , vr logical , dimension (:,:), allocatable :: lencounter , loc_lvdotr if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , pl => system % pl , npl => system % pl % nbody ) allocate ( lencounter ( ntp , npl ), loc_lvdotr ( ntp , npl )) lencounter (:,:) = . false . do j = 1 , npl do i = 1 , ntp xr (:) = tp % xh (:, i ) - pl % xh (:, j ) vr (:) = tp % vh (:, i ) - pl % vh (:, j ) call symba_encounter_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % rhill ( j ), 0.0_DP , dt , irec , lencounter ( i , j ), loc_lvdotr ( i , j )) end do end do nenc = count ( lencounter (:,:)) lany_encounter = nenc > 0 if ( lany_encounter ) then associate ( pltpenc_list => system % pltpenc_list ) call pltpenc_list % resize ( nenc ) pltpenc_list % status ( 1 : nenc ) = ACTIVE pltpenc_list % level ( 1 : nenc ) = irec pltpenc_list % lvdotr ( 1 : nenc ) = pack ( loc_lvdotr ( 1 : ntp , 1 : npl ), lencounter ( 1 : ntp , 1 : npl )) pltpenc_list % index1 ( 1 : nenc ) = pack ( spread ([( i , i = 1 , npl )], dim = 1 , ncopies = ntp ), lencounter ( 1 : ntp , 1 : npl )) pltpenc_list % index2 ( 1 : nenc ) = pack ( spread ([( i , i = 1 , ntp )], dim = 2 , ncopies = npl ), lencounter ( 1 : ntp , 1 : npl )) pltpenc_list % id1 ( 1 : nenc ) = pl % id ( pltpenc_list % index1 ( 1 : nenc )) pltpenc_list % id2 ( 1 : nenc ) = tp % id ( pltpenc_list % index2 ( 1 : nenc )) select type ( pl ) class is ( symba_pl ) pl % lencounter ( 1 : npl ) = . false . do k = 1 , nenc plind = pltpenc_list % index1 ( k ) tpind = pltpenc_list % index2 ( k ) pl % lencounter ( plind ) = . true . pl % levelg ( plind ) = irec pl % levelm ( plind ) = irec tp % levelg ( tpind ) = irec tp % levelm ( tpind ) = irec pl % ntpenc ( plind ) = pl % ntpenc ( plind ) + 1 tp % nplenc ( tpind ) = tp % nplenc ( tpind ) + 1 end do end select end associate end if end associate return end function symba_encounter_check_tp module pure elemental subroutine symba_encounter_check_one ( xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 , dt , irec , lencounter , lvdotr ) !! author: David A. Minton !! !! Check for an encounter. !! !! Adapted from David E. Kaufmann's Swifter routine: symba_chk.f90 !! Adapted from Hal Levison's Swift routine symba5_chk.f implicit none ! Arguments real ( DP ), intent ( in ) :: xr , yr , zr , vxr , vyr , vzr real ( DP ), intent ( in ) :: rhill1 , rhill2 , dt integer ( I4B ), intent ( in ) :: irec logical , intent ( out ) :: lencounter , lvdotr ! Internals real ( DP ) :: r2 , v2 , rcrit , r2crit , vdotr rcrit = ( rhill1 + rhill2 ) * RHSCALE * ( RSHELL ** ( irec )) r2crit = rcrit ** 2 r2 = xr ** 2 + yr ** 2 + zr ** 2 v2 = vxr ** 2 + vyr ** 2 + vzr ** 2 vdotr = xr * vxr + yr * vyr + zr * vzr lencounter = rmvs_chk_ind ( r2 , v2 , vdotr , dt , r2crit ) lvdotr = ( vdotr < 0.0_DP ) return end subroutine symba_encounter_check_one end submodule s_symba_encounter_check","tags":"","loc":"sourcefile/symba_encounter_check.f90.html"},{"title":"symba_io.f90 – swiftest","text":"This file depends on sourcefile~~symba_io.f90~~EfferentGraph sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_io Source Code symba_io.f90 Source Code submodule ( symba_classes ) s_symba_io use swiftest contains module subroutine symba_io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read in parameters specific to the SyMBA integrator, then calls the base io_param_reader. !! !! Adapted from David E. Kaufmann's Swifter routine io_init_param.f90 !! Adapted from Martin Duncan's Swift routine io_init_param.f implicit none ! Arguments class ( symba_parameters ), intent ( inout ) :: self !! Collection of parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! internals integer ( I4B ) :: ilength , ifirst , ilast !! Variables used to parse input file character ( STRMAX ) :: line !! Line of the input file character ( len = :), allocatable :: line_trim , param_name , param_value !! Strings used to parse the param file integer ( I4B ) :: nseeds , nseeds_from_file , i logical :: seed_set = . false . !! Is the random seed set in the input file? character ( len =* ), parameter :: linefmt = '(A)' associate ( param => self ) call io_param_reader ( param , unit , iotype , v_list , iostat , iomsg ) call random_seed ( size = nseeds ) if ( allocated ( param % seed )) deallocate ( param % seed ) allocate ( param % seed ( nseeds )) rewind ( unit ) do read ( unit = unit , fmt = linefmt , iostat = iostat , end = 1 , err = 667 , iomsg = iomsg ) line line_trim = trim ( adjustl ( line )) ilength = len ( line_trim ) if (( ilength /= 0 )) then ifirst = 1 ! Read the pair of tokens. The first one is the parameter name, the second is the value. param_name = io_get_token ( line_trim , ifirst , ilast , iostat ) if ( param_name == '' ) cycle ! No parameter name (usually because this line is commented out) call io_toupper ( param_name ) ifirst = ilast + 1 param_value = io_get_token ( line_trim , ifirst , ilast , iostat ) select case ( param_name ) case ( \"FRAGMENTATION\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == \"T\" ) self % lfragmentation = . true . case ( \"GMTINY\" ) read ( param_value , * ) param % GMTINY case ( \"MIN_GMFRAG\" ) read ( param_value , * ) param % min_GMfrag case ( \"SEED\" ) read ( param_value , * ) nseeds_from_file ! Because the number of seeds can vary between compilers/systems, we need to make sure we can handle cases in which the input file has a different ! number of seeds than the current system. If the number of seeds in the file is smaller than required, we will use them as a source to fill in the missing elements. ! If the number of seeds in the file is larger than required, we will truncate the seed array. if ( nseeds_from_file > nseeds ) then nseeds = nseeds_from_file deallocate ( param % seed ) allocate ( param % seed ( nseeds )) do i = 1 , nseeds ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * ) param % seed ( i ) end do else ! Seed array in file is too small do i = 1 , nseeds_from_file ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * ) param % seed ( i ) end do param % seed ( nseeds_from_file + 1 : nseeds ) = [( param % seed ( 1 ) - param % seed ( nseeds_from_file ) + i , i = nseeds_from_file + 1 , nseeds )] end if seed_set = . true . end select end if end do 1 continue if ( self % GMTINY < 0.0_DP ) then write ( iomsg , * ) \"GMTINY invalid or not set: \" , self % GMTINY iostat = - 1 return else write ( * , * ) \"GMTINY          = \" , self % GMTINY end if write ( * , * ) \"FRAGMENTATION = \" , param % lfragmentation if ( param % lfragmentation ) then if ( seed_set ) then call random_seed ( put = param % seed ) else call random_seed ( get = param % seed ) end if write ( * , * ) \"SEED: N,VAL    = \" , size ( param % seed ), param % seed (:) if ( param % min_GMfrag < 0.0_DP ) param % min_GMfrag = param % GMTINY write ( * , * ) \"MIN_GMFRAG      = \" , self % min_GMfrag end if if (. not . self % lclose ) then write ( iomsg , * ) 'This integrator requires CHK_CLOSE to be enabled.' iostat = - 1 return end if ! All reporting of collision information in SyMBA (including mergers) is now recorded in the Fraggle logfile call fraggle_io_log_start ( param ) end associate iostat = 0 667 continue return end subroutine symba_io_param_reader module subroutine symba_io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) !! author: David A. Minton !! !! Dump integration parameters specific to SyMBA to file and then call the base io_param_writer method. !! !! Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90 !! Adapted from Martin Duncan's Swift routine io_dump_param.f implicit none ! Arguments class ( symba_parameters ), intent ( in ) :: self !! Collection of SyMBA parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! Not used in this procedure integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! Internals character ( * ), parameter :: Ifmt = '(I0)' !! Format label for integer values character ( * ), parameter :: Rfmt = '(ES25.17)' !! Format label for real values character ( * ), parameter :: Rarrfmt = '(3(ES25.17,1X))' !! Format label for real values character ( * ), parameter :: Lfmt = '(L1)' !! Format label for logical values character ( len = NAMELEN ) :: param_name character ( len = STRMAX ) :: param_value type character_array character ( 25 ) :: value end type character_array type ( character_array ), dimension (:), allocatable :: param_array integer ( I4B ) :: i , nstr associate ( param => self ) call io_param_writer ( param , unit , iotype , v_list , iostat , iomsg ) ! Special handling is required for writing the random number seed array as its size is not known until runtime ! For the \"SEED\" parameter line, the first value will be the size of the seed array and the rest will be the seed array elements write ( param_name , * ) \"GMTINY\" ; write ( param_value , Rfmt ) param % GMTINY ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"MIN_GMFRAG\" ; write ( param_value , Rfmt ) param % min_GMfrag ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"FRAGMENTATION\" ; write ( param_value , Lfmt ) param % lfragmentation ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % lfragmentation ) then write ( param_name , * ) \"SEED\" if ( allocated ( param_array )) deallocate ( param_array ) allocate ( param_array ( 0 : size ( param % seed ))) write ( param_array ( 0 )% value , Ifmt ) size ( param % seed ) do i = 1 , size ( param % seed ) write ( param_array ( i )% value , Ifmt ) param % seed ( i ) end do write ( unit , '(\" \",A32)' , advance = 'no' , err = 667 , iomsg = iomsg ) adjustl ( param_name ) do i = 0 , size ( param % seed ) nstr = len ( trim ( adjustl ( param_array ( i )% value ))) if ( i < size ( param % seed )) then write ( unit , '(A12)' , advance = 'no' , err = 667 , iomsg = iomsg ) trim ( adjustl ( param_array ( i )% value )) // \" \" else write ( unit , '(A12)' , err = 667 , iomsg = iomsg ) trim ( adjustl ( param_array ( i )% value )) end if end do end if iostat = 0 end associate return 667 continue write ( * , * ) \"Error writing parameter file for SyMBA: \" // trim ( adjustl ( iomsg )) end subroutine symba_io_param_writer module subroutine symba_io_write_discard ( self , param ) implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 40 integer ( I4B ) :: iadd , isub , j , nsub , nadd logical , save :: lfirst = . true . real ( DP ), dimension (:,:), allocatable :: vh character ( * ), parameter :: HDRFMT = '(E23.16, 1X, I8, 1X, L1)' character ( * ), parameter :: NAMEFMT = '(A, 2(1X, I8))' character ( * ), parameter :: VECFMT = '(3(E23.16, 1X))' character ( * ), parameter :: NPLFMT = '(I8)' character ( * ), parameter :: PLNAMEFMT = '(I8, 2(1X, E23.16))' class ( swiftest_body ), allocatable :: pltemp character ( STRMAX ) :: errmsg , out_stat associate ( pl => self % pl , npl => self % pl % nbody , pl_adds => self % pl_adds ) if ( self % tp_discards % nbody > 0 ) call io_write_discard ( self , param ) select type ( pl_discards => self % pl_discards ) class is ( symba_merger ) if ( pl_discards % nbody == 0 ) return ! Record the discarded body metadata information to file if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call param % nciu % open ( param ) call pl_discards % write_particle_info ( param % nciu ) call param % nciu % close ( param ) end if if ( param % discard_out == \"\" ) return if ( lfirst ) then out_stat = param % out_stat else out_stat = 'APPEND' end if select case ( out_stat ) case ( 'APPEND' ) open ( unit = LUN , file = param % discard_out , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) open ( unit = LUN , file = param % discard_out , status = param % out_stat , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code for OUT_STAT: ' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . if ( param % lgr ) then call pl_discards % pv2v ( param ) call pl_adds % pv2v ( param ) end if write ( LUN , HDRFMT , err = 667 , iomsg = errmsg ) param % t , pl_discards % nbody , param % lbig_discard iadd = 1 isub = 1 do while ( iadd <= pl_adds % nbody ) nadd = pl_adds % ncomp ( iadd ) nsub = pl_discards % ncomp ( isub ) do j = 1 , nadd if ( iadd <= pl_adds % nbody ) then write ( LUN , NAMEFMT , err = 667 , iomsg = errmsg ) ADD , pl_adds % id ( iadd ), pl_adds % status ( iadd ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_adds % xh ( 1 , iadd ), pl_adds % xh ( 2 , iadd ), pl_adds % xh ( 3 , iadd ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_adds % vh ( 1 , iadd ), pl_adds % vh ( 2 , iadd ), pl_adds % vh ( 3 , iadd ) else exit end if iadd = iadd + 1 end do do j = 1 , nsub if ( isub <= pl_discards % nbody ) then write ( LUN , NAMEFMT , err = 667 , iomsg = errmsg ) SUB , pl_discards % id ( isub ), pl_discards % status ( isub ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_discards % xh ( 1 , isub ), pl_discards % xh ( 2 , isub ), pl_discards % xh ( 3 , isub ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_discards % vh ( 1 , isub ), pl_discards % vh ( 2 , isub ), pl_discards % vh ( 3 , isub ) else exit end if isub = isub + 1 end do end do close ( LUN ) end select end associate return 667 continue write ( * , * ) \"Error writing discard file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine symba_io_write_discard end submodule s_symba_io","tags":"","loc":"sourcefile/symba_io.f90.html"},{"title":"symba_discard.f90 – swiftest","text":"This file depends on sourcefile~~symba_discard.f90~~EfferentGraph sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_discard Source Code symba_discard.f90 Source Code submodule ( symba_classes ) s_symba_discard use swiftest contains subroutine symba_discard_cb_pl ( pl , system , param ) !! author: David A. Minton !! !! Check to see if planets should be discarded based on their positions relative to the central body. !! If a body gets flagged here when it has also been previously flagged for a collision with another massive body, !! its collisional status will be revoked. Discards due to colliding with or escaping the central body take precedence !! over pl-pl collisions !! !! Adapted from David E. Kaufmann's Swifter routine: symba_discard_sun.f90 !! Adapted from Hal Levison's Swift routine discard_massive5.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j real ( DP ) :: energy , vb2 , rb2 , rh2 , rmin2 , rmax2 , rmaxu2 character ( len = STRMAX ) :: idstr , timestr , message associate ( npl => pl % nbody , cb => system % cb ) call system % set_msys () rmin2 = param % rmin ** 2 rmax2 = param % rmax ** 2 rmaxu2 = param % rmaxu ** 2 do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then rh2 = dot_product ( pl % xh (:, i ), pl % xh (:, i )) if (( param % rmax >= 0.0_DP ) . and . ( rh2 > rmax2 )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_RMAX write ( idstr , * ) pl % id ( i ) write ( timestr , * ) param % t write ( message , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too far from the central body at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( message ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"\" ) call pl % info ( i )% set_value ( status = \"DISCARDED_RMAX\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i )) else if (( param % rmin >= 0.0_DP ) . and . ( rh2 < rmin2 )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_RMIN write ( idstr , * ) pl % id ( i ) write ( timestr , * ) param % t write ( message , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too close to the central body at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( message ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"\" ) call pl % info ( i )% set_value ( status = \"DISCARDED_RMIN\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = cb % id ) else if ( param % rmaxu >= 0.0_DP ) then rb2 = dot_product ( pl % xb (:, i ), pl % xb (:, i )) vb2 = dot_product ( pl % vb (:, i ), pl % vb (:, i )) energy = 0.5_DP * vb2 - system % Gmtot / sqrt ( rb2 ) if (( energy > 0.0_DP ) . and . ( rb2 > rmaxu2 )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_RMAXU write ( idstr , * ) pl % id ( i ) write ( timestr , * ) param % t write ( message , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" is unbound and too far from barycenter at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( message ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"\" ) call pl % info ( i )% set_value ( status = \"DISCARDED_RMAXU\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i )) end if end if end if end do end associate return end subroutine symba_discard_cb_pl subroutine symba_discard_conserve_mtm ( pl , system , param , ipl , lescape_body ) !! author: David A. Minton !! !! Conserves system momentum when a body is lost from the system or collides with central body implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl class ( symba_nbody_system ), intent ( inout ) :: system class ( symba_parameters ), intent ( inout ) :: param integer ( I4B ), intent ( in ) :: ipl logical , intent ( in ) :: lescape_body ! Internals real ( DP ), dimension ( NDIM ) :: Lpl , Ltot , Lcb , xcom , vcom real ( DP ) :: pe , ke_orbit , ke_spin integer ( I4B ) :: i , oldstat select type ( cb => system % cb ) class is ( symba_cb ) ! Add the potential and kinetic energy of the lost body to the records pe = - cb % Gmass * pl % mass ( ipl ) / norm2 ( pl % xb (:, ipl ) - cb % xb (:)) ke_orbit = 0.5_DP * pl % mass ( ipl ) * dot_product ( pl % vb (:, ipl ), pl % vb (:, ipl )) if ( param % lrotation ) then ke_spin = 0.5_DP * pl % mass ( ipl ) * pl % radius ( ipl ) ** 2 * pl % Ip ( 3 , ipl ) * dot_product ( pl % rot (:, ipl ), pl % rot (:, ipl )) else ke_spin = 0.0_DP end if ! Add the pre-collision ke of the central body to the records ! Add planet mass to central body accumulator if ( lescape_body ) then param % GMescape = param % GMescape + pl % Gmass ( ipl ) do i = 1 , pl % nbody if ( i == ipl ) cycle pe = pe - pl % Gmass ( i ) * pl % mass ( ipl ) / norm2 ( pl % xb (:, ipl ) - pl % xb (:, i )) end do Ltot (:) = 0.0_DP do i = 1 , pl % nbody Lpl (:) = pL % mass ( i ) * ( pl % xb (:, i ) . cross . pl % vb (:, i )) Ltot (:) = Ltot (:) + Lpl (:) end do Ltot (:) = Ltot (:) + cb % mass * ( cb % xb (:) . cross . cb % vb (:)) call pl % b2h ( cb ) oldstat = pl % status ( ipl ) pl % status ( ipl ) = INACTIVE call pl % h2b ( cb ) pl % status ( ipl ) = oldstat do i = 1 , pl % nbody if ( i == ipl ) cycle Lpl (:) = pl % mass ( i ) * ( pl % xb (:, i ) . cross . pl % vb (:, i )) Ltot (:) = Ltot (:) - Lpl (:) end do Ltot (:) = Ltot (:) - cb % mass * ( cb % xb (:) . cross . cb % vb (:)) param % Lescape (:) = param % Lescape (:) + Ltot (:) if ( param % lrotation ) param % Lescape (:) = param % Lescape + pl % mass ( ipl ) * pl % radius ( ipl ) ** 2 * pl % Ip ( 3 , ipl ) * pl % rot (:, ipl ) else xcom (:) = ( pl % mass ( ipl ) * pl % xb (:, ipl ) + cb % mass * cb % xb (:)) / ( cb % mass + pl % mass ( ipl )) vcom (:) = ( pl % mass ( ipl ) * pl % vb (:, ipl ) + cb % mass * cb % vb (:)) / ( cb % mass + pl % mass ( ipl )) Lpl (:) = ( pl % xb (:, ipl ) - xcom (:)) . cross . ( pL % vb (:, ipl ) - vcom (:)) if ( param % lrotation ) Lpl (:) = pl % mass ( ipl ) * ( Lpl (:) + pl % radius ( ipl ) ** 2 * pl % Ip ( 3 , ipl ) * pl % rot (:, ipl )) Lcb (:) = cb % mass * (( cb % xb (:) - xcom (:)) . cross . ( cb % vb (:) - vcom (:))) ke_orbit = ke_orbit + 0.5_DP * cb % mass * dot_product ( cb % vb (:), cb % vb (:)) if ( param % lrotation ) ke_spin = ke_spin + 0.5_DP * cb % mass * cb % radius ** 2 * cb % Ip ( 3 ) * dot_product ( cb % rot (:), cb % rot (:)) ! Update mass of central body to be consistent with its total mass cb % dGM = cb % dGM + pl % Gmass ( ipl ) cb % dR = cb % dR + 1.0_DP / 3.0_DP * ( pl % radius ( ipl ) / cb % radius ) ** 3 - 2.0_DP / 9.0_DP * ( pl % radius ( ipl ) / cb % radius ) ** 6 cb % Gmass = cb % GM0 + cb % dGM cb % mass = cb % Gmass / param % GU cb % radius = cb % R0 + cb % dR param % rmin = cb % radius ! Add planet angular momentum to central body accumulator cb % dL (:) = Lpl (:) + Lcb (:) + cb % dL (:) ! Update rotation of central body to by consistent with its angular momentum if ( param % lrotation ) then cb % rot (:) = ( cb % L0 (:) + cb % dL (:)) / ( cb % Ip ( 3 ) * cb % mass * cb % radius ** 2 ) ke_spin = ke_spin - 0.5_DP * cb % mass * cb % radius ** 2 * cb % Ip ( 3 ) * dot_product ( cb % rot (:), cb % rot (:)) end if cb % xb (:) = xcom (:) cb % vb (:) = vcom (:) ke_orbit = ke_orbit - 0.5_DP * cb % mass * dot_product ( cb % vb (:), cb % vb (:)) end if call pl % b2h ( cb ) ! We must do this for proper book-keeping, since we can no longer track this body's contribution to energy directly if ( lescape_body ) then param % Ecollisions = param % Ecollisions + ke_orbit + ke_spin + pe param % Euntracked = param % Euntracked - ( ke_orbit + ke_spin + pe ) else param % Ecollisions = param % Ecollisions + pe param % Euntracked = param % Euntracked - pe end if end select return end subroutine symba_discard_conserve_mtm subroutine symba_discard_nonplpl ( pl , system , param ) !! author: David A. Minton !! !! Check to see if planets should be discarded based on their positions or because they are unbound !s !! !! Adapted from David E. Kaufmann's Swifter routine: symba_discard_pl.f90 !! Adapted from Hal Levison's Swift routine discard_massive5.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , dimension ( pl % nbody ) :: ldiscard integer ( I4B ) :: i , nstart , nend , nsub class ( symba_pl ), allocatable :: plsub ! First check for collisions with the central body associate ( npl => pl % nbody , cb => system % cb ) if ( npl == 0 ) return select type ( pl_discards => system % pl_discards ) class is ( symba_merger ) if (( param % rmin >= 0.0_DP ) . or . ( param % rmax >= 0.0_DP ) . or . ( param % rmaxu >= 0.0_DP )) then call symba_discard_cb_pl ( pl , system , param ) end if if ( param % qmin >= 0.0_DP ) call symba_discard_peri_pl ( pl , system , param ) if ( any ( pl % ldiscard ( 1 : npl ))) then ldiscard ( 1 : npl ) = pl % ldiscard ( 1 : npl ) allocate ( plsub , mold = pl ) call pl % spill ( plsub , ldiscard , ldestructive = . false .) nsub = plsub % nbody nstart = pl_discards % nbody + 1 nend = pl_discards % nbody + nsub call pl_discards % append ( plsub , lsource_mask = [(. true ., i = 1 , nsub )]) ! Record how many bodies were subtracted in this event pl_discards % ncomp ( nstart : nend ) = nsub end if end select end associate return end subroutine symba_discard_nonplpl subroutine symba_discard_nonplpl_conservation ( pl , system , param ) !! author: David A. Minton !! !! If there are any bodies that are removed due to either colliding with the central body or escaping the systme, !! we need to track the conserved quantities with the system bookkeeping terms. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , ndiscard , dstat logical :: lescape logical , dimension ( pl % nbody ) :: discard_l_pl integer ( I4B ), dimension (:), allocatable :: discard_index_list associate ( npl => pl % nbody ) discard_l_pl ( 1 : npl ) = pl % ldiscard ( 1 : npl ) . and . . not . pl % lcollision ( 1 : npl ) ! These are bodies that are discarded but not flagged as pl-pl collision ndiscard = count ( discard_l_pl (:)) allocate ( discard_index_list ( ndiscard )) discard_index_list (:) = pack ([( i , i = 1 , npl )], discard_l_pl ( 1 : npl )) do i = 1 , ndiscard dstat = pl % status ( discard_index_list ( i )) if (( dstat == DISCARDED_RMIN ) . or . ( dstat == DISCARDED_PERI )) then lescape = . false . else if (( dstat == DISCARDED_RMAX ) . or . ( dstat == DISCARDED_RMAXU )) then lescape = . true . else cycle end if ! Conserve all the quantities call symba_discard_conserve_mtm ( pl , system , param , discard_index_list ( i ), lescape ) end do end associate return end subroutine symba_discard_nonplpl_conservation subroutine symba_discard_peri_pl ( pl , system , param ) !! author: David A. Minton !! !! Check to see if a test particle should be discarded because its perihelion distance becomes too small !! !! Adapted from David E. Kaufmann's Swifter routine: symba_discard_peri_pl.f90 !! Adapted from Hal Levison's Swift routine discard_mass_peri.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , save :: lfirst = . true . logical :: lfirst_orig integer ( I4B ) :: i character ( len = STRMAX ) :: timestr , idstr lfirst_orig = pl % lfirst pl % lfirst = lfirst if ( lfirst ) then call pl % get_peri ( system , param ) lfirst = . false . else call pl % get_peri ( system , param ) do i = 1 , pl % nbody if ( pl % status ( i ) == ACTIVE ) then if (( pl % isperi ( i ) == 0 ) . and . ( pl % nplenc ( i ) == 0 )) then if (( pl % atp ( i ) >= param % qmin_alo ) . and . ( pl % atp ( i ) <= param % qmin_ahi ) . and . ( pl % peri ( i ) <= param % qmin )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_PERI write ( timestr , * ) param % t write ( idstr , * ) pl % id ( i ) write ( * , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \") perihelion distance too small at t = \" // trim ( adjustl ( timestr )) call pl % info ( i )% set_value ( status = \"DISCARDED_PERI\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = system % cb % id ) end if end if end if end do end if pl % lfirst = lfirst_orig return end subroutine symba_discard_peri_pl module subroutine symba_discard_pl ( self , system , param ) !! author: David A. Minton !! !! Call the various flavors of discards for massive bodies in SyMBA runs, including discards due to colliding with the central body or escaping the system implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals real ( DP ) :: Eorbit_before , Eorbit_after select type ( system ) class is ( symba_nbody_system ) select type ( param ) class is ( symba_parameters ) associate ( pl => self , plplenc_list => system % plplenc_list , plplcollision_list => system % plplcollision_list ) call pl % vb2vh ( system % cb ) call pl % xh2xb ( system % cb ) call plplenc_list % write ( pl , pl , param ) call symba_discard_nonplpl ( self , system , param ) if (. not . any ( pl % ldiscard (:))) return if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_before = system % te end if call symba_discard_nonplpl_conservation ( self , system , param ) ! Save the add/discard information to file call system % write_discard ( param ) call pl % rearray ( system , param ) if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_after = system % te param % Ecollisions = param % Ecollisions + ( Eorbit_after - Eorbit_before ) end if end associate end select end select return end subroutine symba_discard_pl end submodule s_symba_discard","tags":"","loc":"sourcefile/symba_discard.f90.html"},{"title":"symba_step.f90 – swiftest","text":"This file depends on sourcefile~~symba_step.f90~~EfferentGraph sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_step Source Code symba_step.f90 Source Code submodule ( symba_classes ) s_symba_step use swiftest contains module subroutine symba_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step planets and active test particles ahead in democratic heliocentric coordinates, descending the recursive !!   branch if necessary to handle possible close encounters !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step.f90 !! Adapted from Hal Levison's Swift routine symba5_step_pl.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals logical :: lencounter select type ( pl => self % pl ) class is ( symba_pl ) select type ( tp => self % tp ) class is ( symba_tp ) select type ( param ) class is ( symba_parameters ) call self % reset ( param ) lencounter = pl % encounter_check ( self , dt , 0 ) . or . tp % encounter_check ( self , dt , 0 ) if ( lencounter ) then call self % interp ( param , t , dt ) param % lfirstkick = . true . else self % irec = - 1 call helio_step_system ( self , param , t , dt ) end if end select end select end select return end subroutine symba_step_system module subroutine symba_step_interp_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step planets and active test particles ahead in democratic heliocentric coordinates, calling the recursive !!         subroutine to descend to the appropriate level to handle close encounters !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step_interp.f90 !! Adapted from Hal Levison's Swift routine symba5_step_interp.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ) :: dth !! Half step size dth = 0.5_DP * dt associate ( system => self ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) select type ( cb => system % cb ) class is ( symba_cb ) system % irec = - 1 call pl % vh2vb ( cb ) call pl % lindrift ( cb , dth , lbeg = . true .) call pl % kick ( system , param , t , dth , lbeg = . true .) call pl % drift ( system , param , dt ) call tp % vh2vb ( vbcb = - cb % ptbeg ) call tp % lindrift ( cb , dth , lbeg = . true .) call tp % kick ( system , param , t , dth , lbeg = . true .) call tp % drift ( system , param , dt ) call system % recursive_step ( param , t , 0 ) call pl % kick ( system , param , t , dth , lbeg = . false .) call pl % vb2vh ( cb ) call pl % lindrift ( cb , dth , lbeg = . false .) call tp % kick ( system , param , t , dth , lbeg = . false .) call tp % vb2vh ( vbcb = - cb % ptend ) call tp % lindrift ( cb , dth , lbeg = . false .) end select end select end select end associate return end subroutine symba_step_interp_system module subroutine symba_step_set_recur_levels_system ( self , ireci ) !! author: David A. Minton !! !! Resets pl, tp,and encounter structures at the start of a new step !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90 !! Adapted from Hal Levison's Swift routine symba5_step_recur.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object integer ( I4B ), intent ( in ) :: ireci !! Input recursion level ! Internals integer ( I4B ) :: k , irecp associate ( system => self , plplenc_list => self % plplenc_list , pltpenc_list => self % pltpenc_list , npl => self % pl % nbody , ntp => self % tp % nbody ) select type ( pl => self % pl ) class is ( symba_pl ) select type ( tp => self % tp ) class is ( symba_tp ) irecp = ireci + 1 if ( npl > 0 ) where ( pl % levelg ( 1 : npl ) == irecp ) pl % levelg ( 1 : npl ) = ireci if ( ntp > 0 ) where ( tp % levelg ( 1 : ntp ) == irecp ) tp % levelg ( 1 : ntp ) = ireci if ( plplenc_list % nenc > 0 ) where ( plplenc_list % level ( 1 : plplenc_list % nenc ) == irecp ) plplenc_list % level ( 1 : plplenc_list % nenc ) = ireci if ( pltpenc_list % nenc > 0 ) where ( pltpenc_list % level ( 1 : pltpenc_list % nenc ) == irecp ) pltpenc_list % level ( 1 : pltpenc_list % nenc ) = ireci system % irec = ireci end select end select end associate return end subroutine symba_step_set_recur_levels_system module recursive subroutine symba_step_recur_system ( self , param , t , ireci ) !! author: David A. Minton !! !! Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current !!         recursion level, if applicable, and descend to the next deeper level if necessarys !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90 !! Adapted from Hal Levison's Swift routine symba5_step_recur.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t integer ( I4B ), intent ( in ) :: ireci !! input recursion level ! Internals integer ( I4B ) :: i , j , irecp , nloops real ( DP ) :: dtl , dth real ( DP ), dimension ( NDIM ) :: xr , vr logical :: lencounter , lplpl_collision , lpltp_collision associate ( system => self , plplenc_list => self % plplenc_list , pltpenc_list => self % pltpenc_list ) select type ( pl => self % pl ) class is ( symba_pl ) select type ( tp => self % tp ) class is ( symba_tp ) system % irec = ireci dtl = param % dt / ( NTENC ** ireci ) dth = 0.5_DP * dtl IF ( dtl / param % dt < VSMALL ) THEN write ( * , * ) \"SWIFTEST Warning:\" write ( * , * ) \"   In symba_step_recur_system, local time step is too small\" write ( * , * ) \"   Roundoff error will be important!\" call util_exit ( FAILURE ) END IF irecp = ireci + 1 if ( ireci == 0 ) then nloops = 1 else nloops = NTENC end if do j = 1 , nloops lencounter = plplenc_list % encounter_check ( system , dtl , irecp ) . or . pltpenc_list % encounter_check ( system , dtl , irecp ) call plplenc_list % kick ( system , dth , irecp , 1 ) call pltpenc_list % kick ( system , dth , irecp , 1 ) if ( ireci /= 0 ) then call plplenc_list % kick ( system , dth , irecp , - 1 ) call pltpenc_list % kick ( system , dth , irecp , - 1 ) end if call pl % drift ( system , param , dtl ) call tp % drift ( system , param , dtl ) if ( lencounter ) call system % recursive_step ( param , t + dth , irecp ) system % irec = ireci call plplenc_list % kick ( system , dth , irecp , 1 ) call pltpenc_list % kick ( system , dth , irecp , 1 ) if ( ireci /= 0 ) then call plplenc_list % kick ( system , dth , irecp , - 1 ) call pltpenc_list % kick ( system , dth , irecp , - 1 ) end if if ( param % lclose ) then lplpl_collision = plplenc_list % collision_check ( system , param , t + dtl , dtl , ireci ) lpltp_collision = pltpenc_list % collision_check ( system , param , t + dtl , dtl , ireci ) if ( lplpl_collision ) call plplenc_list % resolve_collision ( system , param , t + dtl , dtl , ireci ) if ( lpltp_collision ) call pltpenc_list % resolve_collision ( system , param , t + dtl , dtl , ireci ) end if call self % set_recur_levels ( ireci ) end do end select end select end associate return end subroutine symba_step_recur_system module subroutine symba_step_reset_system ( self , param ) !! author: David A. Minton !! !! Resets pl, tp,and encounter structures at the start of a new step !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step.f90 !! Adapted from Hal Levison's Swift routine symba5_step.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( symba_parameters ), intent ( in ) :: param !! Current run configuration parameters with SyMBA additions ! Internals integer ( I4B ) :: i , nenc_old associate ( system => self ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) associate ( npl => pl % nbody , ntp => tp % nbody ) if ( npl > 0 ) then pl % lcollision ( 1 : npl ) = . false . call pl % reset_kinship ([( i , i = 1 , npl )]) pl % nplenc ( 1 : npl ) = 0 pl % ntpenc ( 1 : npl ) = 0 pl % levelg ( 1 : npl ) = - 1 pl % levelm ( 1 : npl ) = - 1 pl % lencounter ( 1 : npl ) = . false . pl % lcollision ( 1 : npl ) = . false . pl % ldiscard ( 1 : npl ) = . false . pl % lmask ( 1 : npl ) = . true . nenc_old = system % plplenc_list % nenc call system % plplenc_list % setup ( 0 ) call system % plplenc_list % setup ( nenc_old ) system % plplenc_list % nenc = 0 call system % plplcollision_list % setup ( 0 ) end if if ( ntp > 0 ) then tp % nplenc ( 1 : ntp ) = 0 tp % levelg ( 1 : ntp ) = - 1 tp % levelm ( 1 : ntp ) = - 1 tp % lmask ( 1 : ntp ) = . true . tp % ldiscard ( 1 : npl ) = . false . nenc_old = system % pltpenc_list % nenc call system % pltpenc_list % setup ( 0 ) call system % pltpenc_list % setup ( nenc_old ) system % pltpenc_list % nenc = 0 end if call system % pl_adds % setup ( 0 , param ) call system % pl_discards % setup ( 0 , param ) tp % lfirst = param % lfirstkick pl % lfirst = param % lfirstkick end associate end select end select end associate return end subroutine symba_step_reset_system end submodule s_symba_step","tags":"","loc":"sourcefile/symba_step.f90.html"},{"title":"symba_drift.f90 – swiftest","text":"This file depends on sourcefile~~symba_drift.f90~~EfferentGraph sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_drift Source Code symba_drift.f90 Source Code submodule ( symba_classes ) s_symba_drift use swiftest contains module subroutine symba_drift_pl ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a symba_pl structure implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) select type ( system ) class is ( symba_nbody_system ) pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE . and . pl % levelg ( 1 : npl ) == system % irec call helio_drift_body ( pl , system , param , dt ) pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE end select end associate return end subroutine symba_drift_pl module subroutine symba_drift_tp ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a symba_pl structure implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) select type ( system ) class is ( symba_nbody_system ) tp % lmask ( 1 : ntp ) = tp % status ( 1 : ntp ) /= INACTIVE . and . tp % levelg ( 1 : ntp ) == system % irec call helio_drift_body ( tp , system , param , dt ) tp % lmask ( 1 : ntp ) = tp % status ( 1 : ntp ) /= INACTIVE end select end associate return end subroutine symba_drift_tp end submodule s_symba_drift","tags":"","loc":"sourcefile/symba_drift.f90.html"},{"title":"orbel.f90 – swiftest","text":"This file depends on sourcefile~~orbel.f90~2~~EfferentGraph sourcefile~orbel.f90~2 orbel.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~orbel.f90~2->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules orbel Source Code orbel.f90 Source Code module orbel use swiftest private public :: xv2el contains pure elemental subroutine xv2el ( mu , px , py , pz , vx , vy , vz , a , e , inc , capom , omega , capm ) use swiftest_classes , only : orbel_xv2el implicit none ! Arguments real * 8 , intent ( in ) :: mu , px , py , pz , vx , vy , vz real * 8 , intent ( out ) :: a , e , inc , capom , omega , capm !$f2py intent(in) mu !$f2py intent(in) px !$f2py intent(in) py !$f2py intent(in) pz !$f2py intent(in) vx !$f2py intent(in) vy !$f2py intent(in) vz !$f2py intent(out) a !$f2py intent(out) e !$f2py intent(out) inc !$f2py intent(out) capom !$f2py intent(out) omega !$f2py intent(out) capm ! Internals real * 8 , dimension ( 3 ) :: x , v x = [ px , py , pz ] v = [ vx , vy , vz ] call orbel_xv2el ( mu , x (:), v (:), a , e , inc , capom , omega , capm ) return end subroutine xv2el end module orbel","tags":"","loc":"sourcefile/orbel.f90~2.html"},{"title":"netcdf.f90 – swiftest","text":"This file depends on sourcefile~~netcdf.f90~~EfferentGraph sourcefile~netcdf.f90 netcdf.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~netcdf.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_netcdf Source Code netcdf.f90 Source Code submodule ( swiftest_classes ) s_netcdf use swiftest use netcdf contains subroutine check ( status ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Checks the status of all NetCDF operations to catch errors implicit none ! Arguments integer , intent ( in ) :: status if ( status /= nf90_noerr ) then write ( * , * ) trim ( nf90_strerror ( status )) call util_exit ( FAILURE ) end if return end subroutine check module subroutine netcdf_close ( self , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Closes a NetCDF file implicit none ! Arguments class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters call check ( nf90_close ( self % ncid ) ) return end subroutine netcdf_close module subroutine netcdf_initialize_output ( self , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Initialize a NetCDF file system and defines all variables. implicit none ! Arguments class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical :: fileExists integer ( I4B ) :: old_mode !! Create the new output file, deleting any previously existing output file of the same name call check ( nf90_create ( param % outfile , NF90_NETCDF4 , self % ncid ) ) call check ( nf90_set_fill ( self % ncid , nf90_nofill , old_mode ) ) ! Define the NetCDF dimensions with particle name as the record dimension call check ( nf90_def_dim ( self % ncid , ID_DIMNAME , NF90_UNLIMITED , self % id_dimid ) ) ! 'x' dimension call check ( nf90_def_dim ( self % ncid , TIME_DIMNAME , NF90_UNLIMITED , self % time_dimid ) ) ! 'y' dimension call check ( nf90_def_dim ( self % ncid , STR_DIMNAME , NAMELEN , self % str_dimid ) ) ! Dimension for string variables (aka character arrays) select case ( param % out_type ) case ( NETCDF_FLOAT_TYPE ) self % out_type = NF90_FLOAT case ( NETCDF_DOUBLE_TYPE ) self % out_type = NF90_DOUBLE end select !! Define the variables call check ( nf90_def_var ( self % ncid , TIME_DIMNAME , self % out_type , self % time_dimid , self % time_varid ) ) call check ( nf90_def_var ( self % ncid , ID_DIMNAME , NF90_INT , self % id_dimid , self % id_varid ) ) call check ( nf90_def_var ( self % ncid , NPL_VARNAME , NF90_INT , self % time_dimid , self % npl_varid ) ) call check ( nf90_def_var ( self % ncid , NTP_VARNAME , NF90_INT , self % time_dimid , self % ntp_varid ) ) call check ( nf90_def_var ( self % ncid , NAME_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % name_varid ) ) call check ( nf90_def_var ( self % ncid , PTYPE_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % ptype_varid ) ) if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then call check ( nf90_def_var ( self % ncid , XHX_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % xhx_varid ) ) call check ( nf90_def_var ( self % ncid , XHY_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % xhy_varid ) ) call check ( nf90_def_var ( self % ncid , XHZ_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % xhz_varid ) ) call check ( nf90_def_var ( self % ncid , VHX_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % vhx_varid ) ) call check ( nf90_def_var ( self % ncid , VHY_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % vhy_varid ) ) call check ( nf90_def_var ( self % ncid , VHZ_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % vhz_varid ) ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then call check ( nf90_def_var ( self % ncid , A_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % a_varid ) ) call check ( nf90_def_var ( self % ncid , E_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % e_varid ) ) call check ( nf90_def_var ( self % ncid , INC_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % inc_varid ) ) call check ( nf90_def_var ( self % ncid , CAPOM_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % capom_varid ) ) call check ( nf90_def_var ( self % ncid , OMEGA_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % omega_varid ) ) call check ( nf90_def_var ( self % ncid , CAPM_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % capm_varid ) ) end if call check ( nf90_def_var ( self % ncid , GMASS_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Gmass_varid ) ) if ( param % lrhill_present ) call check ( nf90_def_var ( self % ncid , RHILL_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % rhill_varid ) ) if ( param % lclose ) call check ( nf90_def_var ( self % ncid , RADIUS_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % radius_varid ) ) if ( param % lrotation ) then call check ( nf90_def_var ( self % ncid , IP1_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Ip1_varid ) ) call check ( nf90_def_var ( self % ncid , IP2_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Ip2_varid ) ) call check ( nf90_def_var ( self % ncid , IP3_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Ip3_varid ) ) call check ( nf90_def_var ( self % ncid , ROTX_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % rotx_varid ) ) call check ( nf90_def_var ( self % ncid , ROTY_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % roty_varid ) ) call check ( nf90_def_var ( self % ncid , ROTZ_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % rotz_varid ) ) end if if ( param % ltides ) then call check ( nf90_def_var ( self % ncid , K2_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % k2_varid ) ) call check ( nf90_def_var ( self % ncid , Q_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Q_varid ) ) end if if ( param % lenergy ) then call check ( nf90_def_var ( self % ncid , KE_ORB_VARNAME , self % out_type , self % time_dimid , self % KE_orb_varid ) ) call check ( nf90_def_var ( self % ncid , KE_SPIN_VARNAME , self % out_type , self % time_dimid , self % KE_spin_varid ) ) call check ( nf90_def_var ( self % ncid , PE_VARNAME , self % out_type , self % time_dimid , self % PE_varid ) ) call check ( nf90_def_var ( self % ncid , L_ORBX_VARNAME , self % out_type , self % time_dimid , self % L_orbx_varid ) ) call check ( nf90_def_var ( self % ncid , L_ORBY_VARNAME , self % out_type , self % time_dimid , self % L_orby_varid ) ) call check ( nf90_def_var ( self % ncid , L_ORBZ_VARNAME , self % out_type , self % time_dimid , self % L_orbz_varid ) ) call check ( nf90_def_var ( self % ncid , L_SPINX_VARNAME , self % out_type , self % time_dimid , self % L_spinx_varid ) ) call check ( nf90_def_var ( self % ncid , L_SPINY_VARNAME , self % out_type , self % time_dimid , self % L_spiny_varid ) ) call check ( nf90_def_var ( self % ncid , L_SPINZ_VARNAME , self % out_type , self % time_dimid , self % L_spinz_varid ) ) call check ( nf90_def_var ( self % ncid , L_ESCAPEX_VARNAME , self % out_type , self % time_dimid , self % L_escapex_varid ) ) call check ( nf90_def_var ( self % ncid , L_ESCAPEY_VARNAME , self % out_type , self % time_dimid , self % L_escapey_varid ) ) call check ( nf90_def_var ( self % ncid , L_ESCAPEZ_VARNAME , self % out_type , self % time_dimid , self % L_escapez_varid ) ) call check ( nf90_def_var ( self % ncid , ECOLLISIONS_VARNAME , self % out_type , self % time_dimid , self % Ecollisions_varid ) ) call check ( nf90_def_var ( self % ncid , EUNTRACKED_VARNAME , self % out_type , self % time_dimid , self % Euntracked_varid ) ) call check ( nf90_def_var ( self % ncid , GMESCAPE_VARNAME , self % out_type , self % time_dimid , self % GMescape_varid ) ) end if call check ( nf90_def_var ( self % ncid , STATUS_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % status_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_TYPE_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % origin_type_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_TIME_VARNAME , self % out_type , self % id_dimid , self % origin_time_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_XHX_VARNAME , self % out_type , self % id_dimid , self % origin_xhx_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_XHY_VARNAME , self % out_type , self % id_dimid , self % origin_xhy_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_XHZ_VARNAME , self % out_type , self % id_dimid , self % origin_xhz_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_VHX_VARNAME , self % out_type , self % id_dimid , self % origin_vhx_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_VHY_VARNAME , self % out_type , self % id_dimid , self % origin_vhy_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_VHZ_VARNAME , self % out_type , self % id_dimid , self % origin_vhz_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_TIME_VARNAME , self % out_type , self % id_dimid , self % discard_time_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_XHX_VARNAME , self % out_type , self % id_dimid , self % discard_xhx_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_XHY_VARNAME , self % out_type , self % id_dimid , self % discard_xhy_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_XHZ_VARNAME , self % out_type , self % id_dimid , self % discard_xhz_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_VHX_VARNAME , self % out_type , self % id_dimid , self % discard_vhx_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_VHY_VARNAME , self % out_type , self % id_dimid , self % discard_vhy_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_VHZ_VARNAME , self % out_type , self % id_dimid , self % discard_vhz_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_BODY_ID_VARNAME , NF90_INT , self % id_dimid , self % discard_body_id_varid ) ) return end subroutine netcdf_initialize_output module subroutine netcdf_open ( self , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Opens a NetCDF file and does the variable inquiries to activate variable ids implicit none ! Arguments class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: old_mode call check ( nf90_open ( param % outfile , nf90_write , self % ncid ) ) call check ( nf90_set_fill ( self % ncid , nf90_nofill , old_mode ) ) call check ( nf90_inq_varid ( self % ncid , TIME_DIMNAME , self % time_varid )) call check ( nf90_inq_varid ( self % ncid , ID_DIMNAME , self % id_varid )) call check ( nf90_inq_varid ( self % ncid , NPL_VARNAME , self % npl_varid )) call check ( nf90_inq_varid ( self % ncid , NTP_VARNAME , self % ntp_varid )) call check ( nf90_inq_varid ( self % ncid , NAME_VARNAME , self % name_varid )) call check ( nf90_inq_varid ( self % ncid , PTYPE_VARNAME , self % ptype_varid )) if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then call check ( nf90_inq_varid ( self % ncid , XHX_VARNAME , self % xhx_varid )) call check ( nf90_inq_varid ( self % ncid , XHY_VARNAME , self % xhy_varid )) call check ( nf90_inq_varid ( self % ncid , XHZ_VARNAME , self % xhz_varid )) call check ( nf90_inq_varid ( self % ncid , VHX_VARNAME , self % vhx_varid )) call check ( nf90_inq_varid ( self % ncid , VHY_VARNAME , self % vhy_varid )) call check ( nf90_inq_varid ( self % ncid , VHZ_VARNAME , self % vhz_varid )) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then call check ( nf90_inq_varid ( self % ncid , A_VARNAME , self % a_varid )) call check ( nf90_inq_varid ( self % ncid , E_VARNAME , self % e_varid )) call check ( nf90_inq_varid ( self % ncid , INC_VARNAME , self % inc_varid )) call check ( nf90_inq_varid ( self % ncid , CAPOM_VARNAME , self % capom_varid )) call check ( nf90_inq_varid ( self % ncid , OMEGA_VARNAME , self % omega_varid )) call check ( nf90_inq_varid ( self % ncid , CAPM_VARNAME , self % capm_varid )) end if call check ( nf90_inq_varid ( self % ncid , GMASS_VARNAME , self % Gmass_varid )) if ( param % lclose ) call check ( nf90_inq_varid ( self % ncid , RADIUS_VARNAME , self % radius_varid )) if ( param % lrhill_present ) call check ( nf90_inq_varid ( self % ncid , RHILL_VARNAME , self % rhill_varid )) if ( param % lrotation ) then call check ( nf90_inq_varid ( self % ncid , IP1_VARNAME , self % Ip1_varid )) call check ( nf90_inq_varid ( self % ncid , IP2_VARNAME , self % Ip2_varid )) call check ( nf90_inq_varid ( self % ncid , IP3_VARNAME , self % Ip3_varid )) call check ( nf90_inq_varid ( self % ncid , ROTX_VARNAME , self % rotx_varid )) call check ( nf90_inq_varid ( self % ncid , ROTY_VARNAME , self % roty_varid )) call check ( nf90_inq_varid ( self % ncid , ROTZ_VARNAME , self % rotz_varid )) end if if ( param % ltides ) then call check ( nf90_inq_varid ( self % ncid , K2_VARNAME , self % k2_varid )) call check ( nf90_inq_varid ( self % ncid , Q_VARNAME , self % Q_varid )) end if if ( param % lenergy ) then call check ( nf90_inq_varid ( self % ncid , KE_ORB_VARNAME , self % KE_orb_varid ) ) call check ( nf90_inq_varid ( self % ncid , KE_SPIN_VARNAME , self % KE_spin_varid ) ) call check ( nf90_inq_varid ( self % ncid , PE_VARNAME , self % PE_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ORBX_VARNAME , self % L_orbx_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ORBY_VARNAME , self % L_orby_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ORBZ_VARNAME , self % L_orbz_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_SPINX_VARNAME , self % L_spinx_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_SPINY_VARNAME , self % L_spiny_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_SPINZ_VARNAME , self % L_spinz_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ESCAPEX_VARNAME , self % L_escapex_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ESCAPEY_VARNAME , self % L_escapey_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ESCAPEZ_VARNAME , self % L_escapez_varid ) ) call check ( nf90_inq_varid ( self % ncid , ECOLLISIONS_VARNAME , self % Ecollisions_varid ) ) call check ( nf90_inq_varid ( self % ncid , EUNTRACKED_VARNAME , self % Euntracked_varid ) ) call check ( nf90_inq_varid ( self % ncid , GMESCAPE_VARNAME , self % GMescape_varid ) ) end if call check ( nf90_inq_varid ( self % ncid , STATUS_VARNAME , self % status_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_TYPE_VARNAME , self % origin_type_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_TIME_VARNAME , self % origin_time_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_XHX_VARNAME , self % origin_xhx_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_XHY_VARNAME , self % origin_xhy_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_XHZ_VARNAME , self % origin_xhz_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_VHX_VARNAME , self % origin_vhx_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_VHY_VARNAME , self % origin_vhy_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_VHZ_VARNAME , self % origin_vhz_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_TIME_VARNAME , self % discard_time_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_XHX_VARNAME , self % discard_xhx_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_XHY_VARNAME , self % discard_xhy_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_XHZ_VARNAME , self % discard_xhz_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_VHX_VARNAME , self % discard_vhx_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_VHY_VARNAME , self % discard_vhy_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_VHZ_VARNAME , self % discard_vhz_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_BODY_ID_VARNAME , self % discard_body_id_varid )) return end subroutine netcdf_open module subroutine netcdf_write_frame_base ( self , iu , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Write a frame of output of either test particle or massive body data to the binary output file !!    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method implicit none ! Arguments class ( swiftest_base ), intent ( in ) :: self !! Swiftest particle object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j , tslot , strlen , idslot integer ( I4B ), dimension (:), allocatable :: ind character ( len = :), allocatable :: charstring call self % write_particle_info ( iu ) tslot = int ( param % ioutput , kind = I4B ) + 1 select type ( self ) class is ( swiftest_body ) associate ( n => self % nbody ) if ( n == 0 ) return allocate ( ind ( n )) call util_sort ( self % id ( 1 : n ), ind ) do i = 1 , n j = ind ( i ) idslot = self % id ( j ) + 1 if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then call check ( nf90_put_var ( iu % ncid , iu % xhx_varid , self % xh ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % xhy_varid , self % xh ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % xhz_varid , self % xh ( 3 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % vhx_varid , self % vh ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % vhy_varid , self % vh ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % vhz_varid , self % vh ( 3 , j ), start = [ idslot , tslot ]) ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then call check ( nf90_put_var ( iu % ncid , iu % a_varid , self % a ( j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % e_varid , self % e ( j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % inc_varid , self % inc ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % capom_varid , self % capom ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % omega_varid , self % omega ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % capm_varid , self % capm ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) end if select type ( self ) class is ( swiftest_pl ) ! Additional output if the passed polymorphic object is a massive body call check ( nf90_put_var ( iu % ncid , iu % Gmass_varid , self % Gmass ( j ), start = [ idslot , tslot ]) ) if ( param % lrhill_present ) then call check ( nf90_put_var ( iu % ncid , iu % rhill_varid , self % rhill ( j ), start = [ idslot , tslot ]) ) end if if ( param % lclose ) then call check ( nf90_put_var ( iu % ncid , iu % radius_varid , self % radius ( j ), start = [ idslot , tslot ]) ) end if if ( param % lrotation ) then call check ( nf90_put_var ( iu % ncid , iu % Ip1_varid , self % Ip ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip2_varid , self % Ip ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip3_varid , self % Ip ( 3 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotx_varid , self % rot ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % roty_varid , self % rot ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotz_varid , self % rot ( 3 , j ), start = [ idslot , tslot ]) ) end if if ( param % ltides ) then call check ( nf90_put_var ( iu % ncid , iu % k2_varid , self % k2 ( j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Q_varid , self % Q ( j ), start = [ idslot , tslot ]) ) end if end select end do end associate class is ( swiftest_cb ) idslot = self % id + 1 call check ( nf90_put_var ( iu % ncid , iu % id_varid , self % id , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Gmass_varid , self % Gmass , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % radius_varid , self % radius , start = [ idslot , tslot ]) ) if ( param % lrotation ) then call check ( nf90_put_var ( iu % ncid , iu % Ip1_varid , self % Ip ( 1 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip2_varid , self % Ip ( 2 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip3_varid , self % Ip ( 3 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotx_varid , self % rot ( 1 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % roty_varid , self % rot ( 2 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotz_varid , self % rot ( 3 ), start = [ idslot , tslot ]) ) end if if ( param % ltides ) then call check ( nf90_put_var ( iu % ncid , iu % k2_varid , self % k2 , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Q_varid , self % Q , start = [ idslot , tslot ]) ) end if end select return end subroutine netcdf_write_frame_base module subroutine netcdf_write_particle_info_base ( self , iu ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Write all current particle to file implicit none ! Arguments class ( swiftest_base ), intent ( in ) :: self !! Swiftest particle object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to identify a particular NetCDF dataset ! Internals integer ( I4B ) :: i , j , tslot , strlen , idslot integer ( I4B ), dimension (:), allocatable :: ind character ( len = :), allocatable :: charstring character ( len = NAMELEN ) :: emptystr , lenstr character ( len = :), allocatable :: fmtlabel ! This string of spaces of length NAMELEN is used to clear out any old data left behind inside the string variables write ( lenstr , * ) NAMELEN fmtlabel = \"(A\" // trim ( adjustl ( lenstr )) // \")\" write ( emptystr , fmtlabel ) \" \" select type ( self ) class is ( swiftest_body ) associate ( n => self % nbody ) if ( n == 0 ) return allocate ( ind ( n )) call util_sort ( self % id ( 1 : n ), ind ) do i = 1 , n j = ind ( i ) idslot = self % id ( j ) + 1 call check ( nf90_put_var ( iu % ncid , iu % id_varid , self % id ( j ), start = [ idslot ]) ) charstring = trim ( adjustl ( self % info ( j )% name )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info ( j )% particle_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info ( j )% status )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info ( j )% origin_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_time_varid , self % info ( j )% origin_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhx_varid , self % info ( j )% origin_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhy_varid , self % info ( j )% origin_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhz_varid , self % info ( j )% origin_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhx_varid , self % info ( j )% origin_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhy_varid , self % info ( j )% origin_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhz_varid , self % info ( j )% origin_vh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_time_varid , self % info ( j )% discard_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhx_varid , self % info ( j )% discard_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhy_varid , self % info ( j )% discard_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhz_varid , self % info ( j )% discard_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhx_varid , self % info ( j )% discard_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhy_varid , self % info ( j )% discard_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhz_varid , self % info ( j )% discard_vh ( 3 ), start = [ idslot ]) ) end do end associate class is ( swiftest_cb ) idslot = self % id + 1 call check ( nf90_put_var ( iu % ncid , iu % id_varid , self % id , start = [ idslot ]) ) charstring = trim ( adjustl ( self % info % name )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info % particle_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info % status )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info % origin_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_time_varid , self % info % origin_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhx_varid , self % info % origin_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhy_varid , self % info % origin_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhz_varid , self % info % origin_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhx_varid , self % info % origin_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhy_varid , self % info % origin_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhz_varid , self % info % origin_vh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_time_varid , self % info % discard_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhx_varid , self % info % discard_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhy_varid , self % info % discard_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhz_varid , self % info % discard_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhx_varid , self % info % discard_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhy_varid , self % info % discard_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhz_varid , self % info % discard_vh ( 3 ), start = [ idslot ]) ) end select return end subroutine netcdf_write_particle_info_base module subroutine netcdf_write_hdr_system ( self , iu , param ) !! author: David A. Minton !! !! Writes header information (variables that change with time, but not particle id). !! This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that !! previously were handled as separate output files. implicit none ! Arguments class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: tslot , old_mode tslot = int ( param % ioutput , kind = I4B ) + 1 call check ( nf90_open ( param % outfile , nf90_write , iu % ncid ) ) call check ( nf90_set_fill ( iu % ncid , nf90_nofill , old_mode ) ) call check ( nf90_put_var ( iu % ncid , iu % time_varid , param % t , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % npl_varid , self % pl % nbody , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % ntp_varid , self % tp % nbody , start = [ tslot ]) ) if ( param % lenergy ) then call check ( nf90_put_var ( iu % ncid , iu % KE_orb_varid , self % ke_orbit , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % KE_spin_varid , self % ke_spin , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % PE_varid , self % pe , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_orbx_varid , self % Lorbit ( 1 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_orby_varid , self % Lorbit ( 2 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_orbz_varid , self % Lorbit ( 3 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_spinx_varid , self % Lspin ( 1 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_spiny_varid , self % Lspin ( 2 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_spinz_varid , self % Lspin ( 3 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_escapex_varid , param % Lescape ( 1 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_escapey_varid , param % Lescape ( 2 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_escapez_varid , param % Lescape ( 3 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ecollisions_varid , param % Ecollisions , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Euntracked_varid , param % Euntracked , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % GMescape_varid , param % GMescape , start = [ tslot ]) ) end if return end subroutine netcdf_write_hdr_system end submodule s_netcdf","tags":"","loc":"sourcefile/netcdf.f90.html"},{"title":"swiftest_driver.f90 – swiftest","text":"This file depends on sourcefile~~swiftest_driver.f90~~EfferentGraph sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Programs swiftest_driver Source Code swiftest_driver.f90 Source Code program swiftest_driver !! author: David A. Minton !! !! Driver program for the Swiftest integrators. Unlike the earlier Swift and Swifter drivers, in Swiftest all integrators !!    are run from this single program. !! !! Adapted from Swifter by David E. Kaufmann's Swifter driver programs swifter_[bs,helio,ra15,rmvs,symba,tu4,whm].f90 !! Adapted from Hal Levison and Martin Duncan's Swift driver programs use swiftest implicit none class ( swiftest_nbody_system ), allocatable :: nbody_system !! Polymorphic object containing the nbody system to be integrated class ( swiftest_parameters ), allocatable :: param !! Run configuration parameters integer ( I4B ) :: integrator !! Integrator type code (see swiftest_globals for symbolic names) character ( len = :), allocatable :: param_file_name !! Name of the file containing user-defined parameters integer ( I4B ) :: ierr !! I/O error code integer ( I8B ) :: iloop !! Loop counter integer ( I8B ) :: idump !! Dump cadence counter integer ( I8B ) :: iout !! Output cadence counter integer ( I8B ) :: ioutput_t0 !! The output frame counter at time 0 integer ( I8B ) :: nloops !! Number of steps to take in the simulation real ( DP ) :: old_t_final = 0.0_DP !! Output time at which writing should start, in order to prevent duplicate lines being written for restarts type ( walltimer ) :: timer !! Object used for computing elapsed wall time ierr = io_get_args ( integrator , param_file_name ) if ( ierr /= 0 ) then write ( * , * ) 'Error reading in arguments from the command line' call util_exit ( FAILURE ) end if !> Read in the user-defined parameters file and the initial conditions of the system select case ( integrator ) case ( symba ) allocate ( symba_parameters :: param ) case default allocate ( swiftest_parameters :: param ) end select param % integrator = integrator call setup_construct_system ( nbody_system , param ) call param % read_in ( param_file_name ) associate ( t => param % t , & t0 => param % t0 , & dt => param % dt , & tstop => param % tstop , & istep_out => param % istep_out , & istep_dump => param % istep_dump , & ioutput => param % ioutput ) call nbody_system % initialize ( param ) t = t0 iloop = 0 iout = istep_out idump = istep_dump nloops = ceiling (( tstop - t0 ) / dt , kind = I8B ) ioutput_t0 = int ( t0 / dt / istep_out , kind = I8B ) ioutput = ioutput_t0 ! Prevent duplicate frames from being written if this is a restarted run if (( param % lrestart ) . and . (( param % out_type == REAL8_TYPE ) . or . param % out_type == REAL4_TYPE )) then old_t_final = nbody_system % get_old_t_final ( param ) else old_t_final = t0 if ( istep_out > 0 ) call nbody_system % write_frame ( param ) call nbody_system % dump ( param ) end if !> Define the maximum number of threads nthreads = 1 ! In the *serial* case !$ nthreads = omp_get_max_threads() ! In the *parallel* case !$ write(*,'(a)')   ' OpenMP parameters:' !$ write(*,'(a)')   ' ------------------' !$ write(*,'(a,i3,/)') ' Number of threads  = ', nthreads call timer % reset () write ( * , * ) \" *************** Main Loop *************** \" do iloop = 1 , nloops !> Step the system forward in time call nbody_system % step ( param , t , dt ) t = t0 + iloop * dt !> Evaluate any discards or collisional outcomes call nbody_system % discard ( param ) !> If the loop counter is at the output cadence value, append the data file with a single frame if ( istep_out > 0 ) then iout = iout - 1 if ( iout == 0 ) then ioutput = ioutput_t0 + iloop / istep_out call timer % finish ( nsubsteps = istep_out , message = \"Integration steps:\" ) if ( t > old_t_final ) call nbody_system % write_frame ( param ) call timer % finish ( nsubsteps = 1 , message = \"File I/O:         \" ) iout = istep_out end if end if !> If the loop counter is at the dump cadence value, dump the state of the system to a file in case it needs to be restarted if ( istep_dump > 0 ) then idump = idump - 1 if ( idump == 0 ) then call nbody_system % dump ( param ) idump = istep_dump end if end if end do end associate call util_exit ( SUCCESS ) stop end program swiftest_driver","tags":"","loc":"sourcefile/swiftest_driver.f90.html"},{"title":"rmvs_classes.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_classes.f90~~EfferentGraph sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~rmvs_classes.f90~~AfferentGraph sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules rmvs_classes Source Code rmvs_classes.f90 Source Code module rmvs_classes !! author: David A. Minton !! !! Definition of classes and methods specific to the Regularized Mixed Variable Symplectic (RMVS) integrator !! Partially adapted from David E. Kaufmann's Swifter module: module_rmvs.f90 use swiftest_globals use whm_classes , only : whm_cb , whm_pl , whm_tp , whm_nbody_system implicit none public integer ( I4B ), private , parameter :: NTENC = 10 integer ( I4B ), private , parameter :: NTPHENC = 3 integer ( I4B ), private , parameter :: NTPENC = NTENC * NTPHENC real ( DP ), private , parameter :: RHSCALE = 3.5_DP real ( DP ), private , parameter :: RHPSCALE = 1.0_DP real ( DP ), private , parameter :: FACQDT = 2.0_DP !******************************************************************************************************************************** !  rmvs_nbody_system class definitions and method interfaces !******************************************************************************************************************************** type , extends ( whm_nbody_system ) :: rmvs_nbody_system !> In the RMVS integrator, only test particles are discarded logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations real ( DP ) :: rts !! fraction of Hill's sphere radius to use as radius of encounter region real ( DP ), dimension (:,:), allocatable :: vbeg !! Planet velocities at beginning ot step contains !> Replace the abstract procedures with concrete ones procedure :: initialize => rmvs_setup_initialize_system !! Performs RMVS-specific initilization steps, including generating the close encounter planetocentric structures procedure :: step => rmvs_step_system !! Advance the RMVS nbody system forward in time by one step end type rmvs_nbody_system type , private :: rmvs_interp real ( DP ), dimension (:, :), allocatable :: x !! interpolated heliocentric planet position for outer encounter real ( DP ), dimension (:, :), allocatable :: v !! interpolated heliocentric planet velocity for outer encounter real ( DP ), dimension (:, :), allocatable :: aobl !! Encountering planet's oblateness acceleration value real ( DP ), dimension (:, :), allocatable :: atide !! Encountering planet's tidal acceleration value end type rmvs_interp !******************************************************************************************************************************** ! rmvs_cb class definitions and method interfaces !******************************************************************************************************************************* !> RMVS central body particle class type , extends ( whm_cb ) :: rmvs_cb type ( rmvs_interp ), dimension (:), allocatable :: outer !! interpolated heliocentric central body position for outer encounters type ( rmvs_interp ), dimension (:), allocatable :: inner !! interpolated heliocentric central body position for inner encounters logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations end type rmvs_cb !******************************************************************************************************************************** !  rmvs_tp class definitions and method interfaces !******************************************************************************************************************************* !! RMVS test particle class type , extends ( whm_tp ) :: rmvs_tp !! Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the !!    component list, such as rmvs_setup_tp and rmvs_util_spill_tp ! encounter steps) logical , dimension (:), allocatable :: lperi !! planetocentric pericenter passage flag (persistent for a full rmvs time step) over a full RMVS time step) integer ( I4B ), dimension (:), allocatable :: plperP !! index of planet associated with pericenter distance peri (persistent over a full RMVS time step) integer ( I4B ), dimension (:), allocatable :: plencP !! index of planet that test particle is encountering (not persistent for a full RMVS time step) ! The following are used to correctly set the oblateness values of the acceleration during an inner encounter with a planet type ( rmvs_cb ) :: cb_heliocentric !! Copy of original central body object passed to close encounter (used for oblateness acceleration during planetocentric encoountters) real ( DP ), dimension (:,:), allocatable :: xheliocentric !! original heliocentric position (used for oblateness calculation during close encounters) integer ( I4B ) :: index !!  inner substep number within current set integer ( I4B ) :: ipleP !!  index value of encountering planet logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations contains procedure :: discard => rmvs_discard_tp !! Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered procedure :: encounter_check => rmvs_encounter_check_tp !! Checks if any test particles are undergoing a close encounter with a massive body procedure :: accel => rmvs_kick_getacch_tp !! Calculates either the standard or modified version of the acceleration depending if the !!    if the test particle is undergoing a close encounter or not procedure :: setup => rmvs_setup_tp !! Constructor method - Allocates space for the input number of bodiess procedure :: append => rmvs_util_append_tp !! Appends elements from one structure to another procedure :: fill => rmvs_util_fill_tp !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => rmvs_util_resize_tp !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: sort => rmvs_util_sort_tp !! Sorts body arrays by a sortable componen procedure :: rearrange => rmvs_util_sort_rearrange_tp !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => rmvs_util_spill_tp !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type rmvs_tp !******************************************************************************************************************************** !                                    rmvs_pl class definitions and method interfaces !******************************************************************************************************************************* !> RMVS massive body particle class type , extends ( whm_pl ) :: rmvs_pl integer ( I4B ), dimension (:), allocatable :: nenc !! number of test particles encountering planet this full rmvs time step integer ( I4B ), dimension (:), allocatable :: tpenc1P !! index of first test particle encountering planet integer ( I4B ), dimension (:), allocatable :: plind !! Connects the planetocentric indices back to the heliocentric planet list type ( rmvs_interp ), dimension (:), allocatable :: outer !! interpolated heliocentric central body position for outer encounters type ( rmvs_interp ), dimension (:), allocatable :: inner !! interpolated heliocentric central body position for inner encounters class ( rmvs_nbody_system ), dimension (:), allocatable :: planetocentric !! Planetocentric version of the massive body objects (one for each massive body) logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations contains procedure :: setup => rmvs_setup_pl !! Constructor method - Allocates space for the input number of bodiess procedure :: append => rmvs_util_append_pl !! Appends elements from one structure to another procedure :: fill => rmvs_util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => rmvs_util_resize_pl !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: sort => rmvs_util_sort_pl !! Sorts body arrays by a sortable componen procedure :: rearrange => rmvs_util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => rmvs_util_spill_pl !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type rmvs_pl interface module elemental function rmvs_chk_ind ( r2 , v2 , vdotr , dt , r2crit ) result ( lflag ) implicit none real ( DP ), intent ( in ) :: r2 , v2 , vdotr , dt , r2crit logical :: lflag end function rmvs_chk_ind module subroutine rmvs_discard_tp ( self , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine rmvs_discard_tp module function rmvs_encounter_check_tp ( self , system , dt ) result ( lencounter ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object real ( DP ), intent ( in ) :: dt !! step size logical :: lencounter !! Returns true if there is at least one close encounter end function rmvs_encounter_check_tp module subroutine rmvs_io_write_encounter ( t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 , enc_out ) implicit none integer ( I4B ), intent ( in ) :: id1 , id2 real ( DP ), intent ( in ) :: t , Gmass1 , Gmass2 , radius1 , radius2 real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 , vh1 , vh2 character ( * ), intent ( in ) :: enc_out end subroutine rmvs_io_write_encounter module subroutine rmvs_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structuree class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine rmvs_kick_getacch_tp module subroutine rmvs_setup_pl ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine rmvs_setup_pl module subroutine rmvs_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine rmvs_setup_initialize_system module subroutine rmvs_setup_tp ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parametere end subroutine rmvs_setup_tp module subroutine rmvs_util_append_pl ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine rmvs_util_append_pl module subroutine rmvs_util_append_tp ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine rmvs_util_append_tp module subroutine rmvs_util_fill_pl ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine rmvs_util_fill_pl module subroutine rmvs_util_fill_tp ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: inserts !!  Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine rmvs_util_fill_tp module subroutine rmvs_util_resize_pl ( self , nnew ) implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine rmvs_util_resize_pl module subroutine rmvs_util_resize_tp ( self , nnew ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine rmvs_util_resize_tp module subroutine rmvs_util_sort_pl ( self , sortby , ascending ) implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine rmvs_util_sort_pl module subroutine rmvs_util_sort_tp ( self , sortby , ascending ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine rmvs_util_sort_tp module subroutine rmvs_util_sort_rearrange_pl ( self , ind ) implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine rmvs_util_sort_rearrange_pl module subroutine rmvs_util_sort_rearrange_tp ( self , ind ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine rmvs_util_sort_rearrange_tp module subroutine rmvs_util_spill_pl ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine rmvs_util_spill_pl module subroutine rmvs_util_spill_tp ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine rmvs_util_spill_tp module subroutine rmvs_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine rmvs_step_system end interface end module rmvs_classes","tags":"","loc":"sourcefile/rmvs_classes.f90.html"},{"title":"swiftest_globals.f90 – swiftest","text":"Files dependent on this one sourcefile~~swiftest_globals.f90~~AfferentGraph sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest_classes.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest_classes.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest_classes.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest_classes.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest_classes.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest_classes.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest_classes.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest_classes.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest_classes.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest_classes.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest_classes.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest_classes.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest_classes.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest_classes.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest_classes.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest_classes.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest_classes.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest_classes.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest_classes.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest_classes.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest_classes.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest_classes.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest_classes.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest_operators.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest_classes.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest_classes.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest_classes.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~operator_mag.f90 operator_mag.f90 sourcefile~operator_mag.f90->sourcefile~swiftest_operators.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest_classes.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest_classes.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest_classes.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest_classes.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest_globals Source Code swiftest_globals.f90 Source Code module swiftest_globals !! author: David A. Minton !! graph: false !! !! Basic parameters, definitions, and global type definitions used throughout the Swiftest project !! Adapted from David E. Kaufmann's Swifter routine: swiftest_globals.f90 and module_swifter.f90 use , intrinsic :: iso_fortran_env ! Use the intrinsic kind definitions implicit none public integer , parameter :: I8B = int64 !! Symbolic name for kind types of 8-byte integers integer , parameter :: I4B = int32 !! Symbolic name for kind types of 4-byte integers integer , parameter :: I2B = int16 !! Symbolic name for kind types of 2-byte integers integer , parameter :: I1B = int8 !! Symbolic name for kind types of 1-byte integers integer , parameter :: SP = real32 !! Symbolic name for kind types of single-precision reals integer , parameter :: DP = real64 !! Symbolic name for kind types of double-precision reals integer , parameter :: QP = real128 !! Symbolic name for kind types of quad-precision reals real ( DP ), parameter :: PIBY2 = 1.570796326794896619231321691639751442099_DP !! Definition of /(\\pi / 2 real ( DP ), parameter :: PI = 3.141592653589793238462643383279502884197_DP !! Definition of /(\\pi real ( DP ), parameter :: PI3BY2 = 4.712388980384689857693965074919254326296_DP !! Definition of /(3 \\pi / 2 real ( DP ), parameter :: TWOPI = 6.283185307179586476925286766559005768394_DP !! Definition of 2 \\pi real ( DP ), parameter :: THIRD = 0.333333333333333333333333333333333333333_DP !! Definition of 1 / 3 real ( DP ), parameter :: DEG2RAD = PI / 18 0.0_DP !! Definition of conversion factor from degrees to radians real ( DP ), parameter :: RAD2DEG = 18 0.0_DP / PI !! Definition of conversion factor from degrees to radians real ( DP ), parameter :: GC = 6.6743E-11_DP !! Universal gravitational constant in SI units real ( DP ), parameter :: einsteinC = 29979245 8.0_DP !! Speed of light in SI units integer ( I4B ), parameter :: LOWERCASE_BEGIN = iachar ( 'a' ) !! ASCII character set parameter for lower to upper conversion - start of lowercase integer ( I4B ), parameter :: LOWERCASE_END = iachar ( 'z' ) !! ASCII character set parameter for lower to upper conversion - end of lowercase integer ( I4B ), parameter :: UPPERCASE_OFFSET = iachar ( 'A' ) - iachar ( 'a' ) !! ASCII character set parameter for lower to upper conversion - offset between upper and lower real ( SP ), parameter :: VERSION_NUMBER = 0.1_SP !! swiftest version !> Symbolic name for integrator types integer ( I4B ), parameter :: UNKNOWN_INTEGRATOR = 1 integer ( I4B ), parameter :: BS = 2 integer ( I4B ), parameter :: HELIO = 3 integer ( I4B ), parameter :: RA15 = 4 integer ( I4B ), parameter :: TU4 = 5 integer ( I4B ), parameter :: WHM = 6 integer ( I4B ), parameter :: RMVS = 7 integer ( I4B ), parameter :: SYMBA = 8 integer ( I4B ), parameter :: RINGMOONS = 9 integer ( I4B ), parameter :: STRMAX = 512 !! Maximum size of character strings integer ( I4B ), parameter :: NAMELEN = 32 !! Maximum size of name strings character ( * ), parameter :: ASCII_TYPE = 'ASCII' !! Symbolic name for ASCII file type character ( * ), parameter :: REAL4_TYPE = 'REAL4' !! Symbolic name for binary file type REAL4 character ( * ), parameter :: REAL8_TYPE = 'REAL8' !! Symbolic name for binary file type REAL8 character ( * ), parameter :: NETCDF_FLOAT_TYPE = 'NETCDF_FLOAT' !! Symbolic name for binary file type REAL8 character ( * ), parameter :: NETCDF_DOUBLE_TYPE = 'NETCDF_DOUBLE' !! Symbolic name for binary file type REAL8 character ( * ), parameter :: EL = 'EL' !! Symbolic name for binary output file contents for orbital elements character ( * ), parameter :: XV = 'XV' !! Symbolic name for binary output file contents for cartesian position and velocity vectors character ( * ), parameter :: XVEL = 'XVEL' !! Symbolic name for binary output file contents for both cartesian position and velocity and orbital elements character ( * ), parameter :: CB_TYPE_NAME = \"Central Body\" character ( * ), parameter :: PL_TYPE_NAME = \"Massive Body\" character ( * ), parameter :: TP_TYPE_NAME = \"Test Particle\" character ( * ), parameter :: PL_TINY_TYPE_NAME = \"Semi-Interacting Massive Body\" ! OpenMP Parameters integer ( I4B ) :: nthreads = 1 !! Number of OpenMP threads integer ( I4B ), parameter :: NTHERSHOLD = 1000 !! Threshold value for OpenMP loop parallelization integer ( I4B ), parameter :: SUCCESS = 0 !! Symbolic name for function return/flag code for success integer ( I4B ), parameter :: FAILURE = - 1 !! Symbolic name for function return/flag code for failure integer ( I4B ), parameter :: USAGE = - 2 !! Symbolic name for function return/flag code for printing the usage message integer ( I4B ), parameter :: HELP = - 3 !! Symbolic name for function return/flag code for printing the usage message character ( * ), parameter :: SUCCESS_MSG = '(/, \"Normal termination of Swiftest (version \", f3.1, \")\")' character ( * ), parameter :: FAIL_MSG = '(/, \"Terminating Swiftest (version \", f3.1, \") due to error!!\")' character ( * ), parameter :: USAGE_MSG = '(\"Usage: swiftest [bs|helio|ra15|rmvs|symba|tu4|whm] <paramfile>\")' character ( * ), parameter :: HELP_MSG = USAGE_MSG integer ( I4B ), parameter :: ELLIPSE = - 1 !! Symbolic names for orbit types - ellipse integer ( I4B ), parameter :: PARABOLA = 0 !! Symbolic names for orbit types - parabola integer ( I4B ), parameter :: HYPERBOLA = 1 !! Symbolic names for orbit types - hyperbola !> Symbolic names for body/particle status codes: integer ( I4B ), parameter :: ACTIVE = 0 integer ( I4B ), parameter :: INACTIVE = 1 integer ( I4B ), parameter :: DISCARDED_RMAX = - 1 integer ( I4B ), parameter :: DISCARDED_RMIN = - 2 integer ( I4B ), parameter :: DISCARDED_RMAXU = - 3 integer ( I4B ), parameter :: DISCARDED_PERI = - 4 integer ( I4B ), parameter :: DISCARDED_PLR = - 5 integer ( I4B ), parameter :: DISCARDED_PLQ = - 6 integer ( I4B ), parameter :: DISCARDED_DRIFTERR = - 7 integer ( I4B ), parameter :: MERGED = - 8 integer ( I4B ), parameter :: DISRUPTION = - 9 integer ( I4B ), parameter :: SUPERCATASTROPHIC = - 10 integer ( I4B ), parameter :: GRAZE_AND_MERGE = - 11 integer ( I4B ), parameter :: HIT_AND_RUN_DISRUPT = - 12 integer ( I4B ), parameter :: HIT_AND_RUN_PURE = - 13 integer ( I4B ), parameter :: COLLISION = - 14 integer ( I4B ), parameter :: NEW_PARTICLE = - 15 integer ( I4B ), parameter :: OLD_PARTICLE = - 16 !>Symbolic names for collisional outcomes from collresolve_resolve: integer ( I4B ), parameter :: COLLRESOLVE_REGIME_MERGE = 1 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_DISRUPTION = 2 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_SUPERCATASTROPHIC = 3 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_GRAZE_AND_MERGE = 4 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_HIT_AND_RUN = 5 !> String labels for body/particle addition/subtraction in discard file character ( * ), parameter :: ADD = '+1' character ( * ), parameter :: SUB = '-1' !> Standard file names integer ( I4B ), parameter :: NDUMPFILES = 2 character ( * ), dimension ( 2 ), parameter :: DUMP_CB_FILE = [ 'dump_cb1.bin' , 'dump_cb2.bin' ] character ( * ), dimension ( 2 ), parameter :: DUMP_PL_FILE = [ 'dump_pl1.bin' , 'dump_pl2.bin' ] character ( * ), dimension ( 2 ), parameter :: DUMP_TP_FILE = [ 'dump_tp1.bin' , 'dump_tp2.bin' ] character ( * ), dimension ( 2 ), parameter :: DUMP_PARAM_FILE = [ 'dump_param1.in' , 'dump_param2.in' ] !> Default file names that can be changed by the user in the parameters file character ( * ), parameter :: CB_INFILE = 'cb.in' character ( * ), parameter :: PL_INFILE = 'pl.in' character ( * ), parameter :: TP_INFILE = 'tp.in' character ( * ), parameter :: BIN_OUTFILE = 'bin.dat' integer ( I4B ), parameter :: BINUNIT = 20 !! File unit number for the binary output file character ( * ), parameter :: PARTICLE_OUTFILE = 'particle.dat' integer ( I4B ), parameter :: PARTICLEUNIT = 44 !! File unit number for the binary particle info output file !> Miscellaneous constants: integer ( I4B ), parameter :: NDIM = 3 !! Number of dimensions in our reality integer ( I4B ), parameter :: NDIM2 = 2 * NDIM !! 2x the number of dimensions real ( DP ), parameter :: VSMALL = 2 * epsilon ( 1._DP ) !! Very small number used to prevent floating underflow !> NetCDF variable names and constants character ( * ), parameter :: NETCDF_OUTFILE = 'bin.nc' !! Default output file name character ( * ), parameter :: TIME_DIMNAME = \"time\" !! NetCDF name of the time dimension character ( * ), parameter :: ID_DIMNAME = \"id\" !! NetCDF name of the particle id dimension character ( * ), parameter :: STR_DIMNAME = \"str\" !! NetCDF name of the particle id dimension character ( * ), parameter :: PTYPE_VARNAME = \"particle_type\" !! NetCDF name of the particle type variable character ( * ), parameter :: NAME_VARNAME = \"name\" !! NetCDF name of the particle name variable character ( * ), parameter :: NPL_VARNAME = \"npl\" !! NetCDF name of the number of active massive bodies variable character ( * ), parameter :: NTP_VARNAME = \"ntp\" !! NetCDF name of the number of active test particles variable character ( * ), parameter :: A_VARNAME = \"a\" !! NetCDF name of the semimajor axis variable character ( * ), parameter :: E_VARNAME = \"e\" !! NetCDF name of the eccentricity variable character ( * ), parameter :: INC_VARNAME = \"inc\" !! NetCDF name of the inclination variable character ( * ), parameter :: CAPOM_VARNAME = \"capom\" !! NetCDF name of the long. asc. node variable character ( * ), parameter :: OMEGA_VARNAME = \"omega\" !! NetCDF name of the arg. periapsis variable character ( * ), parameter :: CAPM_VARNAME = \"capm\" !! NetCDF name of the mean anomaly variable character ( * ), parameter :: XHX_VARNAME = \"xhx\" !! NetCDF name of the heliocentric position x variable character ( * ), parameter :: XHY_VARNAME = \"xhy\" !! NetCDF name of the heliocentric position y variable character ( * ), parameter :: XHZ_VARNAME = \"xhz\" !! NetCDF name of the heliocentric position z variable character ( * ), parameter :: VHX_VARNAME = \"vhx\" !! NetCDF name of the heliocentric velocity x variable character ( * ), parameter :: VHY_VARNAME = \"vhy\" !! NetCDF name of the heliocentric velocity y variable character ( * ), parameter :: VHZ_VARNAME = \"vhz\" !! NetCDF name of the heliocentric velocity z variable character ( * ), parameter :: GMASS_VARNAME = \"Gmass\" !! NetCDF name of the mass variable character ( * ), parameter :: RHILL_VARNAME = \"rhill\" !! NetCDF name of the hill radius variable character ( * ), parameter :: RADIUS_VARNAME = \"radius\" !! NetCDF name of the radius variable character ( * ), parameter :: IP1_VARNAME = \"Ip1\" !! NetCDF name of the axis 1 principal moment of inertial variable character ( * ), parameter :: IP2_VARNAME = \"Ip2\" !! NetCDF name of the axis 2 principal moment of inertial variable character ( * ), parameter :: IP3_VARNAME = \"Ip3\" !! NetCDF name of the axis 3 principal moment of inertial variable character ( * ), parameter :: ROTX_VARNAME = \"rotx\" !! NetCDF name of the rotation x variable character ( * ), parameter :: ROTY_VARNAME = \"roty\" !! NetCDF name of the rotation y variable character ( * ), parameter :: ROTZ_VARNAME = \"rotz\" !! NetCDF name of the rotation z variable character ( * ), parameter :: K2_VARNAME = \"k2\" !! NetCDF name of the Love number variable character ( * ), parameter :: Q_VARNAME = \"Q\" !! NetCDF name of the energy dissipation variable character ( * ), parameter :: KE_ORB_VARNAME = \"KE_orb\" !! NetCDF name of the system orbital kinetic energy variable character ( * ), parameter :: KE_SPIN_VARNAME = \"KE_spin\" !! NetCDF name of the system spin kinetic energy variable character ( * ), parameter :: PE_VARNAME = \"PE\" !! NetCDF name of the system potential energy variable character ( * ), parameter :: L_ORBX_VARNAME = \"L_orbx\" !! NetCDF name of the orbital angular momentum x variable character ( * ), parameter :: L_ORBY_VARNAME = \"L_orby\" !! NetCDF name of the orbital angular momentum y variable character ( * ), parameter :: L_ORBZ_VARNAME = \"L_orbz\" !! NetCDF name of the orbital angular momentum z variable character ( * ), parameter :: L_SPINX_VARNAME = \"L_spinx\" !! NetCDF name of the spin angular momentum x variable character ( * ), parameter :: L_SPINY_VARNAME = \"L_spiny\" !! NetCDF name of the spin angular momentum y variable character ( * ), parameter :: L_SPINZ_VARNAME = \"L_spinz\" !! NetCDF name of the spin angular momentum z variable character ( * ), parameter :: L_ESCAPEX_VARNAME = \"L_escapex\" !! NetCDF name of the escaped angular momentum x variable character ( * ), parameter :: L_ESCAPEY_VARNAME = \"L_escapey\" !! NetCDF name of the escaped angular momentum y variable character ( * ), parameter :: L_ESCAPEZ_VARNAME = \"L_escapez\" !! NetCDF name of the escaped angular momentum z variable character ( * ), parameter :: ECOLLISIONS_VARNAME = \"Ecollisions\" !! NetCDF name of the escaped angular momentum y variable character ( * ), parameter :: EUNTRACKED_VARNAME = \"Euntracked\" !! NetCDF name of the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) character ( * ), parameter :: GMESCAPE_VARNAME = \"GMescape\" !! NetCDF name of the G*Mass of bodies that escape the system character ( * ), parameter :: STATUS_VARNAME = \"status\" !! NetCDF name of the current status of the body variable (includes discard type) character ( * ), parameter :: ORIGIN_TYPE_VARNAME = \"origin_type\" !! NetCDF name of the origin type variable (Initial Conditions, Disruption, etc.) character ( * ), parameter :: ORIGIN_TIME_VARNAME = \"origin_time\" !! NetCDF name of the time of origin variable character ( * ), parameter :: ORIGIN_XHX_VARNAME = \"origin_xhx\" !! NetCDF name of the heliocentric position of the body at the time of origin x variable character ( * ), parameter :: ORIGIN_XHY_VARNAME = \"origin_xhy\" !! NetCDF name of the heliocentric position of the body at the time of origin y variable character ( * ), parameter :: ORIGIN_XHZ_VARNAME = \"origin_xhz\" !! NetCDF name of the heliocentric position of the body at the time of origin z variable character ( * ), parameter :: ORIGIN_VHX_VARNAME = \"origin_vhx\" !! NetCDF name of the heliocentric velocity of the body at the time of origin x variable character ( * ), parameter :: ORIGIN_VHY_VARNAME = \"origin_vhy\" !! NetCDF name of the heliocentric velocity of the body at the time of origin y variable character ( * ), parameter :: ORIGIN_VHZ_VARNAME = \"origin_vhz\" !! NetCDF name of the heliocentric velocity of the body at the time of origin z variable character ( * ), parameter :: DISCARD_TIME_VARNAME = \"discard_time\" !! NetCDF name of the time of discard variable character ( * ), parameter :: DISCARD_XHX_VARNAME = \"discard_xhx\" !! NetCDF name of the heliocentric position of the body at the time of discard x variable character ( * ), parameter :: DISCARD_XHY_VARNAME = \"discard_xhy\" !! NetCDF name of the heliocentric position of the body at the time of discard y variable character ( * ), parameter :: DISCARD_XHZ_VARNAME = \"discard_xhz\" !! NetCDF name of the heliocentric position of the body at the time of discard z variable character ( * ), parameter :: DISCARD_VHX_VARNAME = \"discard_vhx\" !! NetCDF name of the heliocentric velocity of the body at the time of discard x variable character ( * ), parameter :: DISCARD_VHY_VARNAME = \"discard_vhy\" !! NetCDF name of the heliocentric velocity of the body at the time of discard y variable character ( * ), parameter :: DISCARD_VHZ_VARNAME = \"discard_vhz\" !! NetCDF name of the heliocentric velocity of the body at the time of discard z variable character ( * ), parameter :: DISCARD_BODY_ID_VARNAME = \"discard_body_id\" !! NetCDF name of the id of the other body involved in the discard end module swiftest_globals","tags":"","loc":"sourcefile/swiftest_globals.f90.html"},{"title":"walltime_classes.f90 – swiftest","text":"This file depends on sourcefile~~walltime_classes.f90~~EfferentGraph sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~walltime_classes.f90~~AfferentGraph sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules walltime_classes Source Code walltime_classes.f90 Source Code module walltime_classes !! author: David A. Minton !! !! Classes and methods used to compute elasped wall time use swiftest_globals implicit none public type :: walltimer integer ( I8B ) :: count_rate !! Rate at wich the clock ticks integer ( I8B ) :: count_max !! Maximum value of the clock ticker integer ( I8B ) :: count_start_main !! Value of the clock ticker at when the timer is first called integer ( I8B ) :: count_start_step !! Value of the clock ticker at the start of a timed step integer ( I8B ) :: count_finish_step !! Value of the clock ticker at the end of a timed step logical :: lmain_is_started = . false . !! Logical flag indicating whether or not the main timer has been reset or not contains procedure :: reset => walltime_reset !! Resets the clock ticker, settting main_start to the current ticker value procedure :: start => walltime_start !! Starts the timer, setting step_start to the current ticker value procedure :: finish => walltime_finish !! Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal end type interface module subroutine walltime_finish ( self , nsubsteps , message ) implicit none class ( walltimer ), intent ( inout ) :: self !! Walltimer object integer ( I4B ), intent ( in ) :: nsubsteps !! Number of substeps used to compute the time per step character ( len =* ), intent ( in ) :: message !! Message to prepend to the wall time terminal output end subroutine walltime_finish module subroutine walltime_reset ( self ) implicit none class ( walltimer ), intent ( inout ) :: self !! Walltimer object end subroutine walltime_reset module subroutine walltime_start ( self ) implicit none class ( walltimer ), intent ( inout ) :: self !! Walltimer object end subroutine walltime_start end interface contains module subroutine walltime_finish ( self , nsubsteps , message ) !! author: David A. Minton !! !! Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal use swiftest_globals implicit none ! Arguments class ( walltimer ), intent ( inout ) :: self !! Walltimer object integer ( I4B ), intent ( in ) :: nsubsteps !! Number of substeps used to compute the time per step character ( len =* ), intent ( in ) :: message !! Message to prepend to the wall time terminal output ! Internals character ( len =* ), parameter :: walltimefmt = '\" Wall time (s): \", es12.5, \"; Wall time/step in this interval (s):  \", es12.5' character ( len = STRMAX ) :: fmt integer ( I8B ) :: count_delta_step , count_delta_main real ( DP ) :: wall_main !! Value of total elapsed time at the end of a timed step real ( DP ) :: wall_step !! Value of elapsed time since the start of a timed step real ( DP ) :: wall_per_substep !! Value of time per substep if (. not . self % lmain_is_started ) then write ( * , * ) \"Wall timer error: The step finish time cannot be calculated because the timer is not started!\" return end if call system_clock ( self % count_finish_step ) count_delta_step = self % count_finish_step - self % count_start_step count_delta_main = self % count_finish_step - self % count_start_main wall_step = count_delta_step / ( self % count_rate * 1.0_DP ) wall_main = count_delta_main / ( self % count_rate * 1.0_DP ) wall_per_substep = wall_step / nsubsteps fmt = '(\"' // adjustl ( message ) // '\",' // walltimefmt // ')' write ( * , trim ( adjustl ( fmt ))) wall_main , wall_per_substep call self % start () return end subroutine walltime_finish module subroutine walltime_reset ( self ) !! author: David A. Minton !! !! Resets the clock ticker, settting main_start to the current ticker value use swiftest_globals implicit none ! Arguments class ( walltimer ), intent ( inout ) :: self call system_clock ( self % count_start_main , self % count_rate , self % count_max ) self % lmain_is_started = . true . call self % start () return end subroutine walltime_reset module subroutine walltime_start ( self ) !! author: David A. Minton !! !! Starts the timer, setting step_start to the current ticker value use swiftest_globals implicit none ! Arguments class ( walltimer ), intent ( inout ) :: self if (. not . self % lmain_is_started ) then write ( * , * ) \"Wall timer error: Cannot start the step time until reset is called at least once!\" return end if call system_clock ( self % count_start_step ) return end subroutine walltime_start end module walltime_classes","tags":"","loc":"sourcefile/walltime_classes.f90.html"},{"title":"swiftest_operators.f90 – swiftest","text":"This file depends on sourcefile~~swiftest_operators.f90~~EfferentGraph sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~swiftest_operators.f90~~AfferentGraph sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~operator_mag.f90 operator_mag.f90 sourcefile~operator_mag.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest_operators Source Code swiftest_operators.f90 Source Code module swiftest_operators !! author: David A. Minton !! !! Custom operators, including !!   A .cross. B = Cross product of A(1:3) and B(1:3) !! !! Each operator can also do element-wise computation on arrays of the form .mag. A(1:3, 1:n) use swiftest_globals implicit none public !******************************************************************************************************************************** ! Interfaces for .cross. operator !******************************************************************************************************************************** interface operator (. cross .) module pure function operator_cross_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:), intent ( in ) :: A , B real ( SP ), dimension ( 3 ) :: C end function operator_cross_sp module pure function operator_cross_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:), intent ( in ) :: A , B real ( DP ), dimension ( 3 ) :: C end function operator_cross_dp module pure function operator_cross_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:), intent ( in ) :: A , B real ( QP ), dimension ( 3 ) :: C end function operator_cross_qp module pure function operator_cross_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:), intent ( in ) :: A , B integer ( I1B ), dimension ( 3 ) :: C end function operator_cross_i1b module pure function operator_cross_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:), intent ( in ) :: A , B integer ( I2B ), dimension ( 3 ) :: C end function operator_cross_i2b module pure function operator_cross_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:), intent ( in ) :: A , B integer ( I4B ), dimension ( 3 ) :: C end function operator_cross_i4b module pure function operator_cross_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:), intent ( in ) :: A , B integer ( I8B ), dimension ( 3 ) :: C end function operator_cross_i8b module pure function operator_cross_el_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A , B real ( SP ), dimension (:,:), allocatable :: C end function operator_cross_el_sp module pure function operator_cross_el_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A , B real ( DP ), dimension (:,:), allocatable :: C end function operator_cross_el_dp module pure function operator_cross_el_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A , B real ( QP ), dimension (:,:), allocatable :: C end function operator_cross_el_qp module pure function operator_cross_el_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:,:), intent ( in ) :: A , B integer ( I1B ), dimension (:,:), allocatable :: C end function operator_cross_el_i1b module pure function operator_cross_el_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:,:), intent ( in ) :: A , B integer ( I2B ), dimension (:,:), allocatable :: C end function operator_cross_el_i2b module pure function operator_cross_el_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:,:), intent ( in ) :: A , B integer ( I4B ), dimension (:,:), allocatable :: C end function operator_cross_el_i4b module pure function operator_cross_el_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:,:), intent ( in ) :: A , B integer ( I8B ), dimension (:,:), allocatable :: C end function operator_cross_el_i8b end interface !******************************************************************************************************************************** ! Interfaces for .mag. operator !******************************************************************************************************************************** interface operator (. mag .) module pure function operator_mag_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:), intent ( in ) :: A real ( SP ) :: B end function operator_mag_sp module pure function operator_mag_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:), intent ( in ) :: A real ( DP ) :: B end function operator_mag_dp module pure function operator_mag_qp ( A ) result ( B ) implicit none real ( QP ), dimension (:), intent ( in ) :: A real ( QP ) :: B end function operator_mag_qp module pure function operator_mag_el_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A real ( SP ), dimension (:), allocatable :: B end function operator_mag_el_sp module pure function operator_mag_el_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), allocatable :: B end function operator_mag_el_dp module pure function operator_mag_el_qp ( A ) result ( B ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), allocatable :: B end function operator_mag_el_qp end interface end module swiftest_operators","tags":"","loc":"sourcefile/swiftest_operators.f90.html"},{"title":"helio_classes.f90 – swiftest","text":"This file depends on sourcefile~~helio_classes.f90~~EfferentGraph sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~helio_classes.f90~~AfferentGraph sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules helio_classes Source Code helio_classes.f90 Source Code module helio_classes !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of classes and methods specific to the Democratic Heliocentric Method !! Adapted from David E. Kaufmann's Swifter routine: module_helio.f90 use swiftest_globals use swiftest_classes , only : swiftest_cb , swiftest_pl , swiftest_tp , swiftest_nbody_system use whm_classes , only : whm_nbody_system implicit none public !******************************************************************************************************************************** !  helio_nbody_system class definitions and method interfaces !******************************************************************************************************************************** type , extends ( whm_nbody_system ) :: helio_nbody_system contains procedure :: step => helio_step_system !! Advance the Helio nbody system forward in time by one step procedure :: initialize => helio_setup_initialize_system !! Performs Helio-specific initilization steps, including converting to DH coordinates end type helio_nbody_system !******************************************************************************************************************************** ! helio_cb class definitions and method interfaces !******************************************************************************************************************************* !> Helio central body particle class type , extends ( swiftest_cb ) :: helio_cb real ( DP ), dimension ( NDIM ) :: ptbeg !! negative barycentric velocity of the central body at the beginning of time step real ( DP ), dimension ( NDIM ) :: ptend !! negative barycentric velocity of the central body at the end of time step contains end type helio_cb !******************************************************************************************************************************** !                                    helio_pl class definitions and method interfaces !******************************************************************************************************************************* !! Helio massive body particle class type , extends ( swiftest_pl ) :: helio_pl contains procedure :: drift => helio_drift_pl !! Method for Danby drift in Democratic Heliocentric coordinates procedure :: lindrift => helio_drift_linear_pl !! Method for linear drift of massive bodies due to barycentric momentum of Sun procedure :: accel_gr => helio_gr_kick_getacch_pl !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => helio_gr_p4_pl !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => helio_kick_getacch_pl !! Compute heliocentric accelerations of massive bodies procedure :: kick => helio_kick_vb_pl !! Kicks the barycentric velocities procedure :: step => helio_step_pl !! Steps the body forward one stepsize end type helio_pl !******************************************************************************************************************************** !                                    helio_tp class definitions and method interfaces !******************************************************************************************************************************* !! Helio test particle class type , extends ( swiftest_tp ) :: helio_tp contains procedure :: lindrift => helio_drift_linear_tp !! Method for linear drift of massive bodies due to barycentric momentum of Sun procedure :: drift => helio_drift_tp !! Method for Danby drift in Democratic Heliocentric coordinates procedure :: accel_gr => helio_gr_kick_getacch_tp !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => helio_gr_p4_tp !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => helio_kick_getacch_tp !! Compute heliocentric accelerations of massive bodies procedure :: kick => helio_kick_vb_tp !! Kicks the barycentric velocities procedure :: step => helio_step_tp !! Steps the body forward one stepsize end type helio_tp interface module subroutine helio_drift_body ( self , system , param , dt ) use swiftest_classes , only : swiftest_body , swiftest_nbody_system , swiftest_parameters implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_drift_body module subroutine helio_drift_pl ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_drift_pl module subroutine helio_drift_tp ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_drift_tp module subroutine helio_drift_linear_pl ( self , cb , dt , lbeg ) implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( helio_cb ), intent ( inout ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step end subroutine helio_drift_linear_pl module subroutine helio_drift_linear_tp ( self , cb , dt , lbeg ) implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( helio_cb ), intent ( in ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step end subroutine helio_drift_linear_tp module subroutine helio_gr_kick_getacch_pl ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine helio_gr_kick_getacch_pl module subroutine helio_gr_kick_getacch_tp ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine helio_gr_kick_getacch_tp module pure subroutine helio_gr_p4_pl ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine helio_gr_p4_pl module pure subroutine helio_gr_p4_tp ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine helio_gr_p4_tp module subroutine helio_kick_getacch_pl ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_parameters , swiftest_nbody_system implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine helio_kick_getacch_pl module subroutine helio_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine helio_kick_getacch_tp module subroutine helio_kick_vb_pl ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine helio_kick_vb_pl module subroutine helio_kick_vb_tp ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine helio_kick_vb_tp module subroutine helio_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine helio_setup_initialize_system module subroutine helio_step_pl ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_step_pl module subroutine helio_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine helio_step_system module subroutine helio_step_tp ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_cb , swiftest_parameters , swiftest_nbody_system implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsizee end subroutine helio_step_tp end interface end module helio_classes","tags":"","loc":"sourcefile/helio_classes.f90.html"},{"title":"whm_classes.f90 – swiftest","text":"This file depends on sourcefile~~whm_classes.f90~~EfferentGraph sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~whm_classes.f90~~AfferentGraph sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules whm_classes Source Code whm_classes.f90 Source Code module whm_classes !! author: David A. Minton !! !! Definition of classes and methods specific to the Democratic Heliocentric Method !! Partially adapted from David E. Kaufmann's Swifter module: module_whm.f90 use swiftest_globals use swiftest_classes , only : swiftest_cb , swiftest_pl , swiftest_tp , swiftest_nbody_system implicit none public !******************************************************************************************************************************** ! whm_cb class definitions and method interfaces !******************************************************************************************************************************* !> Swiftest central body particle class type , extends ( swiftest_cb ) :: whm_cb contains end type whm_cb !******************************************************************************************************************************** !                                    whm_pl class definitions and method interfaces !******************************************************************************************************************************* !> WHM massive body particle class type , extends ( swiftest_pl ) :: whm_pl real ( DP ), dimension (:), allocatable :: eta !! Jacobi mass real ( DP ), dimension (:,:), allocatable :: xj !! Jacobi position real ( DP ), dimension (:,:), allocatable :: vj !! Jacobi velocity real ( DP ), dimension (:), allocatable :: muj !! Jacobi mu: GMcb * eta(i) / eta(i - 1) real ( DP ), dimension (:), allocatable :: ir3j !! Third term of heliocentric acceleration !! Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the !!    component list, such as whm_setup_pl and whm_util_spill_pl contains procedure :: h2j => whm_coord_h2j_pl !! Convert position and velcoity vectors from heliocentric to Jacobi coordinates procedure :: j2h => whm_coord_j2h_pl !! Convert position and velcoity vectors from Jacobi to helliocentric coordinates procedure :: vh2vj => whm_coord_vh2vj_pl !! Convert velocity vectors from heliocentric to Jacobi coordinates procedure :: drift => whm_drift_pl !! Loop through massive bodies and call Danby drift routine to jacobi coordinates procedure :: accel_gr => whm_gr_kick_getacch_pl !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => whm_gr_p4_pl !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => whm_kick_getacch_pl !! Compute heliocentric accelerations of massive bodies procedure :: kick => whm_kick_vh_pl !! Kick heliocentric velocities of massive bodies procedure :: append => whm_util_append_pl !! Appends elements from one structure to another procedure :: fill => whm_util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => whm_util_resize_pl !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_ir3 => whm_util_set_ir3j !! Sets both the heliocentric and jacobi inverse radius terms (1/rj**3 and 1/rh**3) procedure :: set_mu => whm_util_set_mu_eta_pl !! Sets the Jacobi mass value for all massive bodies. procedure :: sort => whm_util_sort_pl !! Sort a WHM massive body object in-place. procedure :: rearrange => whm_util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => whm_util_spill_pl !!\"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure :: setup => whm_setup_pl !! Constructor method - Allocates space for the input number of bodiess procedure :: step => whm_step_pl !! Steps the body forward one stepsize end type whm_pl !******************************************************************************************************************************** !  whm_tp class definitions and method interfaces !******************************************************************************************************************************* !! WHM test particle class type , extends ( swiftest_tp ) :: whm_tp !! Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the !!    component list, such as whm_util_spill_tp contains procedure :: accel_gr => whm_gr_kick_getacch_tp !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => whm_gr_p4_tp !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => whm_kick_getacch_tp !! Compute heliocentric accelerations of test particles procedure :: kick => whm_kick_vh_tp !! Kick heliocentric velocities of test particles procedure :: step => whm_step_tp !! Steps the particle forward one stepsize end type whm_tp !******************************************************************************************************************************** !  whm_nbody_system class definitions and method interfaces !******************************************************************************************************************************** !> An abstract class for the WHM integrator nbody system type , extends ( swiftest_nbody_system ) :: whm_nbody_system contains !> Replace the abstract procedures with concrete ones procedure :: initialize => whm_setup_initialize_system ! Performs WHM-specific initilization steps, like calculating the Jacobi masses procedure :: step => whm_step_system !! Advance the WHM nbody system forward in time by one step end type whm_nbody_system interface module subroutine whm_coord_h2j_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree end subroutine whm_coord_h2j_pl module subroutine whm_coord_j2h_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree end subroutine whm_coord_j2h_pl module subroutine whm_coord_vh2vj_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree end subroutine whm_coord_vh2vj_pl module subroutine whm_drift_pl ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine whm_drift_pl module subroutine whm_util_index_eucl_plpl ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_util_index_eucl_plpl !> Get heliocentric accelration of massive bodies module subroutine whm_kick_getacch_pl ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine whm_kick_getacch_pl !> Get heliocentric accelration of the test particle module subroutine whm_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine whm_kick_getacch_tp module subroutine whm_kick_vh_pl ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine whm_kick_vh_pl module subroutine whm_kick_vh_tp ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine whm_kick_vh_tp module subroutine whm_gr_kick_getacch_pl ( self , param ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_gr_kick_getacch_pl module subroutine whm_gr_kick_getacch_tp ( self , param ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_gr_kick_getacch_tp module pure subroutine whm_gr_p4_pl ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine whm_gr_p4_pl module pure subroutine whm_gr_p4_tp ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine whm_gr_p4_tp !> Reads WHM massive body object in from file module subroutine whm_setup_pl ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body objectobject integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_setup_pl module subroutine whm_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_nbody_system ), intent ( inout ) :: self !! WHM nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine whm_setup_initialize_system module subroutine whm_step_pl ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine whm_step_pl module subroutine whm_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_nbody_system ), intent ( inout ) :: self !! WHM system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine whm_step_system module subroutine whm_step_tp ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine whm_step_tp module subroutine whm_util_append_pl ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine whm_util_append_pl module subroutine whm_util_spill_pl ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine whm_util_spill_pl module subroutine whm_util_fill_pl ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: inserts !! inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine whm_util_fill_pl module subroutine whm_util_resize_pl ( self , nnew ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine whm_util_resize_pl module subroutine whm_util_set_ir3j ( self ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object end subroutine whm_util_set_ir3j module subroutine whm_util_set_mu_eta_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine whm_util_set_mu_eta_pl module subroutine whm_util_sort_pl ( self , sortby , ascending ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine whm_util_sort_pl module subroutine whm_util_sort_rearrange_pl ( self , ind ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine whm_util_sort_rearrange_pl end interface end module whm_classes","tags":"","loc":"sourcefile/whm_classes.f90.html"},{"title":"fraggle_classes.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_classes.f90~~EfferentGraph sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~fraggle_classes.f90~~AfferentGraph sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules fraggle_classes Source Code fraggle_classes.f90 Source Code module fraggle_classes !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of classes and methods specific to Fraggel: The Fragment Generation Model use swiftest_globals use swiftest_classes , only : swiftest_parameters , swiftest_nbody_system , swiftest_cb , swiftest_pl implicit none public integer ( I4B ), parameter :: FRAGGLE_NMASS_DIST = 3 !! Number of mass bins returned by the regime calculation (largest fragment, second largest, and remainder) character ( len =* ), parameter :: FRAGGLE_LOG_OUT = \"fraggle.log\" !! Name of log file for Fraggle diagnostic information integer ( I4B ), parameter :: FRAGGLE_LOG_UNIT = 76 !! Unit number for Fraggle log file !******************************************************************************************************************************** !                                    fraggle_colliders class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the variables that describe the bodies involved in the collision type :: fraggle_colliders integer ( I4B ) :: ncoll !! Number of bodies involved in the collision integer ( I4B ), dimension (:), allocatable :: idx !! Index of bodies involved in the collision real ( DP ), dimension ( NDIM , 2 ) :: xb !! Two-body equivalent position vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: vb !! Two-body equivalent velocity vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: rot !! Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: L_spin !! Two-body equivalent spin angular momentum vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: L_orbit !! Two-body equivalent orbital angular momentum vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: Ip !! Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real ( DP ), dimension ( 2 ) :: mass !! Two-body equivalent mass of the collider bodies prior to the collision real ( DP ), dimension ( 2 ) :: radius !! Two-body equivalent radii of the collider bodies prior to the collision contains procedure :: regime => fraggle_regime_colliders !! Determine which fragmentation regime the set of colliders will be end type fraggle_colliders !******************************************************************************************************************************** !                                    fraggle_fragments class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the variables that describe a collection of fragments by Fraggle barycentric coordinates type , extends ( swiftest_pl ) :: fraggle_fragments real ( DP ) :: mtot !! Total mass of fragments real ( DP ) :: Qloss !! Energy lost during the collision real ( DP ), dimension ( FRAGGLE_NMASS_DIST ) :: mass_dist !! Distribution of fragment mass determined by the regime calculation (largest fragment, second largest, and remainder) integer ( I4B ) :: regime !! Collresolve regime code for this collision ! Values in a coordinate frame centered on the collider barycenter and collisional system unit vectors (these are used internally by the fragment generation subroutine) real ( DP ), dimension ( NDIM ) :: xbcom !! Center of mass position vector of the collider system in system barycentric coordinates real ( DP ), dimension ( NDIM ) :: vbcom !! Velocity vector of the center of mass of the collider system in system barycentric coordinates real ( DP ), dimension ( NDIM ) :: x_coll_unit !! x-direction unit vector of collisional system real ( DP ), dimension ( NDIM ) :: y_coll_unit !! y-direction unit vector of collisional system real ( DP ), dimension ( NDIM ) :: z_coll_unit !! z-direction unit vector of collisional system real ( DP ), dimension (:,:), allocatable :: x_coll !! Array of fragment position vectors in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_coll !! Array of fragment velocity vectors in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_r_unit !! Array of radial direction unit vectors of individual fragments in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_t_unit !! Array of tangential direction unit vectors of individual fragments in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_n_unit !! Array of normal direction unit vectors of individual fragments in the collisional coordinate frame real ( DP ), dimension (:), allocatable :: rmag !! Array of radial distance magnitudes of individual fragments in the collisional coordinate frame real ( DP ), dimension (:), allocatable :: rotmag !! Array of rotation magnitudes of individual fragments real ( DP ), dimension (:), allocatable :: v_r_mag !! Array of radial direction velocity magnitudes of individual fragments real ( DP ), dimension (:), allocatable :: v_t_mag !! Array of tangential direction velocity magnitudes of individual fragments ! Energy and momentum book-keeping variables that characterize the whole system of fragments real ( DP ) :: ke_orbit !! Current orbital kinetic energy of the system of fragments in the collisional frame real ( DP ) :: ke_spin !! Current spin kinetic energy of the system of fragments in the collisional frame real ( DP ), dimension ( NDIM ) :: L_orbit !! Current orbital angular momentum of the system of fragments in the collisional frame real ( DP ), dimension ( NDIM ) :: L_spin !! Current spin angular momentum of the system of fragments in the collisional frame real ( DP ) :: ke_budget !! Total kinetic energy budget for the system of fragmens in the collisional frame real ( DP ), dimension ( NDIM ) :: L_budget !! Total angular momentum budget for the system of fragmens in the collisional frame ! For the following variables, \"before\" refers to the *entire* n-body system in its pre-collisional state and \"after\" refers to the system in its post-collisional state real ( DP ), dimension ( NDIM ) :: Lorbit_before , Lorbit_after !! Before/after orbital angular momentum real ( DP ), dimension ( NDIM ) :: Lspin_before , Lspin_after !! Before/after spin angular momentum real ( DP ), dimension ( NDIM ) :: Ltot_before , Ltot_after !! Before/after total system angular momentum real ( DP ) :: ke_orbit_before , ke_orbit_after !! Before/after orbital kinetic energy real ( DP ) :: ke_spin_before , ke_spin_after !! Before/after spin kinetic energy real ( DP ) :: pe_before , pe_after !! Before/after potential energy real ( DP ) :: Etot_before , Etot_after !! Before/after total system energy ! Scale factors used to scale dimensioned quantities to a more \"natural\" system where important quantities (like kinetic energy, momentum) are of order ~1 real ( DP ) :: dscale !! Distance dimension scale factor real ( DP ) :: mscale !! Mass scale factor real ( DP ) :: tscale !! Time scale factor real ( DP ) :: vscale !! Velocity scale factor (a convenience unit that is derived from dscale and tscale) real ( DP ) :: Escale !! Energy scale factor (a convenience unit that is derived from dscale, tscale, and mscale) real ( DP ) :: Lscale !! Angular momentum scale factor (a convenience unit that is derived from dscale, tscale, and mscale) contains procedure :: generate_fragments => fraggle_generate_fragments !! Generates a system of fragments in barycentric coordinates that conserves energy and momentum. procedure :: accel => fraggle_placeholder_accel !! Placeholder subroutine to fulfill requirement for an accel method procedure :: kick => fraggle_placeholder_kick !! Placeholder subroutine to fulfill requirement for a kick method procedure :: step => fraggle_placeholder_step !! Placeholder subroutine to fulfill requirement for a step method procedure :: set_budgets => fraggle_set_budgets_fragments !! Sets the energy and momentum budgets of the fragments based on the collider value procedure :: set_coordinate_system => fraggle_set_coordinate_system !! Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. procedure :: set_mass_dist => fraggle_set_mass_dist_fragments !! Sets the distribution of mass among the fragments depending on the regime type procedure :: set_natural_scale => fraggle_set_natural_scale_factors !! Scales dimenional quantities to ~O(1) with respect to the collisional system. procedure :: set_original_scale => fraggle_set_original_scale_factors !! Restores dimenional quantities back to the original system units procedure :: setup => fraggle_setup_fragments !! Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. procedure :: reset => fraggle_setup_reset_fragments !! Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) procedure :: get_ang_mtm => fraggle_util_ang_mtm !! Calcualtes the current angular momentum of the fragments procedure :: get_energy_and_momentum => fraggle_util_get_energy_momentum !! Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) procedure :: restructure => fraggle_util_restructure !! Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints end type fraggle_fragments interface module subroutine fraggle_generate_fragments ( self , colliders , system , param , lfailure ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object containing the two-body equivalent values of the colliding bodies class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters logical , intent ( out ) :: lfailure !! Answers the question: Should this have been a merger instead? end subroutine fraggle_generate_fragments module subroutine fraggle_io_log_generate ( frag ) implicit none class ( fraggle_fragments ), intent ( in ) :: frag end subroutine fraggle_io_log_generate module subroutine fraggle_io_log_one_message ( message ) implicit none character ( len =* ), intent ( in ) :: message character ( STRMAX ) :: errmsg end subroutine fraggle_io_log_one_message module subroutine fraggle_io_log_pl ( pl , param ) implicit none class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object (only the new bodies generated in a collision) class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters end subroutine fraggle_io_log_pl module subroutine fraggle_io_log_regime ( colliders , frag ) implicit none class ( fraggle_colliders ), intent ( in ) :: colliders class ( fraggle_fragments ), intent ( in ) :: frag end subroutine fraggle_io_log_regime module subroutine fraggle_io_log_start ( param ) implicit none class ( swiftest_parameters ), intent ( in ) :: param end subroutine fraggle_io_log_start !> The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class module subroutine fraggle_placeholder_accel ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step end subroutine fraggle_placeholder_accel module subroutine fraggle_placeholder_kick ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system objec class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine fraggle_placeholder_kick module subroutine fraggle_placeholder_step ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Helio massive body particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsiz end subroutine fraggle_placeholder_step module subroutine fraggle_regime_colliders ( self , frag , system , param ) implicit none class ( fraggle_colliders ), intent ( inout ) :: self !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters end subroutine fraggle_regime_colliders module subroutine fraggle_set_budgets_fragments ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_budgets_fragments module subroutine fraggle_set_coordinate_system ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_coordinate_system module subroutine fraggle_set_mass_dist_fragments ( self , colliders , param ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters end subroutine fraggle_set_mass_dist_fragments module subroutine fraggle_set_natural_scale_factors ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_natural_scale_factors module subroutine fraggle_set_original_scale_factors ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_original_scale_factors module subroutine fraggle_setup_fragments ( self , n , param ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object integer ( I4B ), intent ( in ) :: n !! Number of fragments class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters end subroutine fraggle_setup_fragments module subroutine fraggle_setup_reset_fragments ( self ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self end subroutine fraggle_setup_reset_fragments module subroutine fraggle_util_add_fragments_to_system ( frag , colliders , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters end subroutine fraggle_util_add_fragments_to_system module subroutine fraggle_util_ang_mtm ( self ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object end subroutine fraggle_util_ang_mtm module subroutine fraggle_util_construct_temporary_system ( frag , system , param , tmpsys , tmpparam ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Original swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters class ( swiftest_nbody_system ), allocatable , intent ( out ) :: tmpsys !! Output temporary swiftest nbody system object class ( swiftest_parameters ), allocatable , intent ( out ) :: tmpparam !! Output temporary configuration run parameters end subroutine fraggle_util_construct_temporary_system module subroutine fraggle_util_get_energy_momentum ( self , colliders , system , param , lbefore ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters logical , intent ( in ) :: lbefore !! Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa end subroutine fraggle_util_get_energy_momentum module subroutine fraggle_util_restructure ( self , colliders , try , f_spin , r_max_start ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object integer ( I4B ), intent ( in ) :: try !! The current number of times Fraggle has tried to find a solution real ( DP ), intent ( inout ) :: f_spin !! Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real ( DP ), intent ( inout ) :: r_max_start !! The maximum radial distance that the position calculation starts with. This increases after a failed attempt end subroutine fraggle_util_restructure module subroutine fraggle_util_shift_vector_to_origin ( m_frag , vec_frag ) implicit none real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:,:), intent ( inout ) :: vec_frag !! Fragment positions or velocities in the center of mass frame end subroutine module function fraggle_util_vmag_to_vb ( v_r_mag , v_r_unit , v_t_mag , v_t_unit , m_frag , vcom ) result ( vb ) implicit none real ( DP ), dimension (:), intent ( in ) :: v_r_mag !! Unknown radial component of fragment velocity vector real ( DP ), dimension (:), intent ( in ) :: v_t_mag !! Tangential component of velocity vector set previously by angular momentum constraint real ( DP ), dimension (:,:), intent ( in ) :: v_r_unit , v_t_unit !! Radial and tangential unit vectors for each fragment real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:), intent ( in ) :: vcom !! Barycentric velocity of collisional system center of mass real ( DP ), dimension (:,:), allocatable :: vb end function fraggle_util_vmag_to_vb end interface end module fraggle_classes","tags":"","loc":"sourcefile/fraggle_classes.f90.html"},{"title":"symba_classes.f90 – swiftest","text":"This file depends on sourcefile~~symba_classes.f90~~EfferentGraph sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~symba_classes.f90~~AfferentGraph sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules symba_classes Source Code symba_classes.f90 Source Code module symba_classes !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of classes and methods specific to the SyMBA integrator !! Adapted from David E. Kaufmann's Swifter routine: module_symba.f90 use swiftest_globals use swiftest_classes , only : swiftest_parameters , swiftest_base , swiftest_encounter , swiftest_particle_info , netcdf_parameters use helio_classes , only : helio_cb , helio_pl , helio_tp , helio_nbody_system use rmvs_classes , only : rmvs_chk_ind use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none public integer ( I4B ), private , parameter :: NENMAX = 32767 integer ( I4B ), private , parameter :: NTENC = 3 real ( DP ), private , parameter :: RHSCALE = 6.5_DP real ( DP ), private , parameter :: RSHELL = 0.48075_DP type , extends ( swiftest_parameters ) :: symba_parameters real ( DP ) :: GMTINY = - 1.0_DP !! Smallest G*mass that is fully gravitating real ( DP ) :: min_GMfrag = - 1.0_DP !! Smallest G*mass that can be produced in a fragmentation event integer ( I4B ), dimension (:), allocatable :: seed !! Random seeds logical :: lfragmentation = . false . !! Do fragmentation modeling instead of simple merger. contains procedure :: reader => symba_io_param_reader procedure :: writer => symba_io_param_writer end type symba_parameters !******************************************************************************************************************************** !                                    symba_kinship class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step. type symba_kinship integer ( I4B ) :: parent !! Index of parent particle integer ( I4B ) :: nchild !! number of children in merger list integer ( I4B ), dimension (:), allocatable :: child !! Index of children particles end type symba_kinship !******************************************************************************************************************************** ! symba_cb class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA central body particle class type , extends ( helio_cb ) :: symba_cb real ( DP ) :: GM0 = 0.0_DP !! Initial G*mass of the central body real ( DP ) :: dGM = 0.0_DP !! Change in G*mass of the central body real ( DP ) :: R0 = 0.0_DP !! Initial radius of the central body real ( DP ) :: dR = 0.0_DP !! Change in the radius of the central body contains end type symba_cb !******************************************************************************************************************************** !                                    symba_pl class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA massive body class type , extends ( helio_pl ) :: symba_pl logical , dimension (:), allocatable :: lcollision !! flag indicating whether body has merged with another this time step logical , dimension (:), allocatable :: lencounter !! flag indicating whether body is part of an encounter this time step logical , dimension (:), allocatable :: lmtiny !! flag indicating whether this body is below the GMTINY cutoff value integer ( I4B ) :: nplm !! number of bodies above the GMTINY limit integer ( I8B ) :: nplplm !! Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer ( I4B ), dimension (:), allocatable :: nplenc !! number of encounters with other planets this time step integer ( I4B ), dimension (:), allocatable :: ntpenc !! number of encounters with test particles this time step integer ( I4B ), dimension (:), allocatable :: levelg !! level at which this body should be moved integer ( I4B ), dimension (:), allocatable :: levelm !! deepest encounter level achieved this time step integer ( I4B ), dimension (:), allocatable :: isperi !! perihelion passage flag real ( DP ), dimension (:), allocatable :: peri !! perihelion distance real ( DP ), dimension (:), allocatable :: atp !! semimajor axis following perihelion passage type ( symba_kinship ), dimension (:), allocatable :: kin !! Array of merger relationship structures that can account for multiple pairwise mergers in a single step contains procedure :: make_colliders => symba_collision_make_colliders_pl !! When a single body is involved in more than one collision in a single step, it becomes part of a family procedure :: index => symba_util_index_eucl_plpl !! Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure :: discard => symba_discard_pl !! Process massive body discards procedure :: drift => symba_drift_pl !! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure :: encounter_check => symba_encounter_check_pl !! Checks if massive bodies are going through close encounters with each other procedure :: accel_int => symba_kick_getacch_int_pl !! Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY procedure :: accel => symba_kick_getacch_pl !! Compute heliocentric accelerations of massive bodies procedure :: setup => symba_setup_pl !! Constructor method - Allocates space for the input number of bodies procedure :: append => symba_util_append_pl !! Appends elements from one structure to another procedure :: fill => symba_util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: get_peri => symba_util_peri_pl !! Determine system pericenter passages for massive bodies procedure :: rearray => symba_util_rearray_pl !! Clean up the massive body structures to remove discarded bodies and add new bodies procedure :: reset_kinship => symba_util_reset_kinship !! Resets the kinship status of bodies procedure :: resize => symba_util_resize_pl !! Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small. procedure :: sort => symba_util_sort_pl !! Sorts body arrays by a sortable componen procedure :: rearrange => symba_util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => symba_util_spill_pl !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type symba_pl type , extends ( symba_pl ) :: symba_merger integer ( I4B ), dimension (:), allocatable :: ncomp contains procedure :: append => symba_util_append_merger !! Appends elements from one structure to another procedure :: resize => symba_util_resize_merger !! Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. procedure :: setup => symba_setup_merger !! Constructor method - Allocates space for the input number of bodies end type symba_merger !******************************************************************************************************************************** !                                    symba_tp class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA test particle class type , extends ( helio_tp ) :: symba_tp integer ( I4B ), dimension (:), allocatable :: nplenc !! number of encounters with planets this time step integer ( I4B ), dimension (:), allocatable :: levelg !! level at which this particle should be moved integer ( I4B ), dimension (:), allocatable :: levelm !! deepest encounter level achieved this time step contains procedure :: drift => symba_drift_tp !! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure :: encounter_check => symba_encounter_check_tp !! Checks if any test particles are undergoing a close encounter with a massive body procedure :: accel => symba_kick_getacch_tp !! Compute heliocentric accelerations of test particles procedure :: setup => symba_setup_tp !! Constructor method - Allocates space for the input number of bodies procedure :: append => symba_util_append_tp !! Appends elements from one structure to another procedure :: fill => symba_util_fill_tp !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => symba_util_resize_tp !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: sort => symba_util_sort_tp !! Sorts body arrays by a sortable componen procedure :: rearrange => symba_util_sort_rearrange_tp !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => symba_util_spill_tp !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type symba_tp !******************************************************************************************************************************** !                                    symba_encounter class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA class for tracking close encounters in a step type , extends ( swiftest_encounter ) :: symba_encounter integer ( I4B ), dimension (:), allocatable :: level !! encounter recursion level contains procedure :: collision_check => symba_collision_check_encounter !! Checks if a test particle is going to collide with a massive body procedure :: encounter_check => symba_encounter_check !! Checks if massive bodies are going through close encounters with each other procedure :: kick => symba_kick_encounter !! Kick barycentric velocities of active test particles within SyMBA recursion procedure :: setup => symba_setup_encounter !! A constructor that sets the number of encounters and allocates and initializes all arrays procedure :: copy => symba_util_copy_encounter !! Copies elements from the source encounter list into self. procedure :: spill => symba_util_spill_encounter !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure :: append => symba_util_append_encounter !! Appends elements from one structure to another end type symba_encounter !******************************************************************************************************************************** !                                    symba_pltpenc class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA class for tracking pl-tp close encounters in a step type , extends ( symba_encounter ) :: symba_pltpenc contains procedure :: resolve_collision => symba_collision_resolve_pltpenc !! Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c end type symba_pltpenc !******************************************************************************************************************************** !                                    symba_plplenc class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA class for tracking pl-pl close encounters in a step type , extends ( symba_encounter ) :: symba_plplenc contains procedure :: extract_collisions => symba_collision_encounter_extract_collisions !! Processes the pl-pl encounter list remove only those encounters that led to a collision procedure :: resolve_fragmentations => symba_collision_resolve_fragmentations !! Process list of collisions, determine the collisional regime, and then create fragments procedure :: resolve_mergers => symba_collision_resolve_mergers !! Process list of collisions and merge colliding bodies together procedure :: resolve_collision => symba_collision_resolve_plplenc !! Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c end type symba_plplenc !******************************************************************************************************************************** !  symba_nbody_system class definitions and method interfaces !******************************************************************************************************************************** type , extends ( helio_nbody_system ) :: symba_nbody_system class ( symba_merger ), allocatable :: pl_adds !! List of added bodies in mergers or collisions class ( symba_pltpenc ), allocatable :: pltpenc_list !! List of massive body-test particle encounters in a single step class ( symba_plplenc ), allocatable :: plplenc_list !! List of massive body-massive body encounters in a single step class ( symba_plplenc ), allocatable :: plplcollision_list !! List of massive body-massive body collisions in a single step integer ( I4B ) :: irec !! System recursion level contains procedure :: write_discard => symba_io_write_discard !! Write out information about discarded and merged planets and test particles in SyMBA procedure :: initialize => symba_setup_initialize_system !! Performs SyMBA-specific initilization steps procedure :: step => symba_step_system !! Advance the SyMBA nbody system forward in time by one step procedure :: interp => symba_step_interp_system !! Perform an interpolation step on the SymBA nbody system procedure :: set_recur_levels => symba_step_set_recur_levels_system !! Sets recursion levels of bodies and encounter lists to the current system level procedure :: recursive_step => symba_step_recur_system !! Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary procedure :: reset => symba_step_reset_system !! Resets pl, tp,and encounter structures at the start of a new step end type symba_nbody_system interface module function symba_collision_check_encounter ( self , system , param , t , dt , irec ) result ( lany_collision ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! current time real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_collision !! Returns true if cany pair of encounters resulted in a collision n end function symba_collision_check_encounter module subroutine symba_collision_encounter_extract_collisions ( self , system , param ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine module subroutine symba_collision_make_colliders_pl ( self , idx ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension ( 2 ), intent ( in ) :: idx !! Array holding the indices of the two bodies involved in the collision end subroutine symba_collision_make_colliders_pl module subroutine symba_collision_resolve_fragmentations ( self , system , param ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_collision_resolve_fragmentations module subroutine symba_collision_resolve_mergers ( self , system , param ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_collision_resolve_mergers module subroutine symba_collision_resolve_plplenc ( self , system , param , t , dt , irec ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level end subroutine symba_collision_resolve_plplenc module subroutine symba_collision_resolve_pltpenc ( self , system , param , t , dt , irec ) implicit none class ( symba_pltpenc ), intent ( inout ) :: self !! SyMBA pl-tp encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level end subroutine symba_collision_resolve_pltpenc module subroutine symba_discard_pl ( self , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine symba_discard_pl module subroutine symba_drift_pl ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine symba_drift_pl module subroutine symba_drift_tp ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine symba_drift_tp module pure elemental subroutine symba_encounter_check_one ( xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 , dt , irec , lencounter , lvdotr ) implicit none real ( DP ), intent ( in ) :: xr , yr , zr , vxr , vyr , vzr real ( DP ), intent ( in ) :: rhill1 , rhill2 , dt integer ( I4B ), intent ( in ) :: irec logical , intent ( out ) :: lencounter , lvdotr end subroutine symba_encounter_check_one module function symba_encounter_check_pl ( self , system , dt , irec ) result ( lany_encounter ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter end function symba_encounter_check_pl module function symba_encounter_check ( self , system , dt , irec ) result ( lany_encounter ) implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-pl encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter end function symba_encounter_check module function symba_encounter_check_tp ( self , system , dt , irec ) result ( lany_encounter ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter end function symba_encounter_check_tp module function symba_collision_casedisruption ( system , param , colliders , frag ) result ( status ) use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ) :: status !! Status flag assigned to this outcome end function symba_collision_casedisruption module function symba_collision_casehitandrun ( system , param , colliders , frag ) result ( status ) use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ) :: status !! Status flag assigned to this outcome end function symba_collision_casehitandrun module function symba_collision_casemerge ( system , param , colliders , frag ) result ( status ) use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ) :: status !! Status flag assigned to this outcome end function symba_collision_casemerge module subroutine symba_util_index_eucl_plpl ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_util_index_eucl_plpl module subroutine symba_io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( symba_parameters ), intent ( inout ) :: self !! Current run configuration parameters with SyMBA additionss integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine symba_io_param_reader module subroutine symba_io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( symba_parameters ), intent ( in ) :: self !! Current run configuration parameters with SyMBA additions integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! Not used in this procedure integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine symba_io_param_writer module subroutine symba_io_write_discard ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine symba_io_write_discard module subroutine symba_kick_getacch_int_pl ( self ) implicit none class ( symba_pl ), intent ( inout ) :: self end subroutine symba_kick_getacch_int_pl module subroutine symba_kick_getacch_pl ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine symba_kick_getacch_pl module subroutine symba_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine symba_kick_getacch_tp module subroutine symba_kick_encounter ( self , system , dt , irec , sgn ) implicit none class ( symba_encounter ), intent ( in ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level integer ( I4B ), intent ( in ) :: sgn !! sign to be applied to acceleration end subroutine symba_kick_encounter module subroutine symba_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine symba_setup_initialize_system module subroutine symba_setup_merger ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_merger ), intent ( inout ) :: self !! SyMBA merger list object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_setup_merger module subroutine symba_setup_pl ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_setup_pl module subroutine symba_setup_encounter ( self , n ) implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for end subroutine symba_setup_encounter module subroutine symba_setup_tp ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter end subroutine symba_setup_tp module subroutine symba_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine symba_step_system module subroutine symba_step_interp_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine symba_step_interp_system module subroutine symba_step_set_recur_levels_system ( self , ireci ) implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system objec integer ( I4B ), intent ( in ) :: ireci !! Input recursion level end subroutine symba_step_set_recur_levels_system module recursive subroutine symba_step_recur_system ( self , param , t , ireci ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t integer ( I4B ), intent ( in ) :: ireci !! input recursion level end subroutine symba_step_recur_system module subroutine symba_step_reset_system ( self , param ) implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( symba_parameters ), intent ( in ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_step_reset_system end interface interface util_append module subroutine symba_util_append_arr_kin ( arr , source , nold , nsrc , lsource_mask ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_arr_kin end interface interface module subroutine symba_util_append_encounter ( self , source , lsource_mask ) implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_encounter module subroutine symba_util_append_merger ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( symba_merger ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_merger module subroutine symba_util_append_pl ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_pl module subroutine symba_util_append_tp ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_tp module subroutine symba_util_copy_encounter ( self , source ) use swiftest_classes , only : swiftest_encounter implicit none class ( symba_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into end subroutine symba_util_copy_encounter end interface interface util_fill module subroutine symba_util_fill_arr_kin ( keeps , inserts , lfill_list ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine symba_util_fill_arr_kin end interface interface module subroutine symba_util_fill_pl ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine symba_util_fill_pl module subroutine symba_util_fill_tp ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine symba_util_fill_tp module subroutine symba_util_peri_pl ( self , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_util_peri_pl module subroutine symba_util_rearray_pl ( self , system , param ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_util_rearray_pl module subroutine symba_util_reset_kinship ( self , idx ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: idx !! Index array of bodies to reset integer ( I4B ) :: i , j end subroutine symba_util_reset_kinship end interface interface util_resize module subroutine symba_util_resize_arr_kin ( arr , nnew ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine symba_util_resize_arr_kin end interface interface module subroutine symba_util_resize_merger ( self , nnew ) implicit none class ( symba_merger ), intent ( inout ) :: self !! SyMBA merger list object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine symba_util_resize_merger module subroutine symba_util_resize_pl ( self , nnew ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine symba_util_resize_pl module subroutine symba_util_resize_tp ( self , nnew ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine symba_util_resize_tp module subroutine symba_util_sort_pl ( self , sortby , ascending ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine symba_util_sort_pl module subroutine symba_util_sort_tp ( self , sortby , ascending ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine symba_util_sort_tp end interface interface util_sort_rearrange module subroutine symba_util_sort_rearrange_arr_kin ( arr , ind , n ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine symba_util_sort_rearrange_arr_kin end interface util_sort_rearrange interface module subroutine symba_util_sort_rearrange_pl ( self , ind ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine symba_util_sort_rearrange_pl module subroutine symba_util_sort_rearrange_tp ( self , ind ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine symba_util_sort_rearrange_tp end interface interface util_spill module subroutine symba_util_spill_arr_kin ( keeps , discards , lspill_list , ldestructive ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine symba_util_spill_arr_kin end interface interface module subroutine symba_util_spill_pl ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine symba_util_spill_pl module subroutine symba_util_spill_encounter ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_encounter implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list end subroutine symba_util_spill_encounter module subroutine symba_util_spill_tp ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine symba_util_spill_tp end interface end module symba_classes","tags":"","loc":"sourcefile/symba_classes.f90.html"},{"title":"swiftest.f90 – swiftest","text":"This file depends on sourcefile~~swiftest.f90~~EfferentGraph sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~swiftest.f90~~AfferentGraph sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest Source Code swiftest.f90 Source Code module swiftest !! author: David A. Minton !! graph: false !! !! This module serves to combine all of the Swiftest project modules under a single umbrella so that they can be accessed from individual submodule implementations with a simple \"use swiftest\" line. use swiftest_globals use swiftest_operators use swiftest_classes use whm_classes use rmvs_classes use helio_classes use symba_classes use fraggle_classes use lambda_function use walltime_classes !use advisor_annotate !$ use omp_lib implicit none public end module swiftest","tags":"","loc":"sourcefile/swiftest.f90.html"},{"title":"swiftest_classes.f90 – swiftest","text":"This file depends on sourcefile~~swiftest_classes.f90~~EfferentGraph sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~swiftest_classes.f90~~AfferentGraph sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest_classes.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest_classes.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest_classes.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest_classes.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest_classes.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest_classes.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest_classes.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest_classes.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest_classes.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest_classes.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest_classes.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest_classes.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest_classes.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest_classes.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest_classes.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest_classes.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest_classes.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest_classes.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest_classes.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest_classes.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest_classes.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest_classes.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest_classes.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest_classes.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest_classes.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest_classes.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest_classes.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest_classes.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest_classes.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest_classes Source Code swiftest_classes.f90 Source Code module swiftest_classes !! author: The Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of data and structures generic to all integrators. !! Adapted from David E. Kaufmann's Swifter routine: module_swifter.f90 use swiftest_globals implicit none public type :: netcdf_parameters integer ( I4B ) :: out_type !! NetCDF output type (will be assigned either NF90_DOUBLE or NF90_FLOAT, depending on the user parameter) integer ( I4B ) :: ncid !! NetCDF ID for the output file integer ( I4B ) :: dimids ( 3 ) !! Dimensions of the NetCDF file integer ( I4B ) :: time_dimid !! NetCDF ID for the time dimension integer ( I4B ) :: id_dimid !! NetCDF ID for the particle id dimension integer ( I4B ) :: str_dimid !! NetCDF ID for the character string dimension integer ( I4B ) :: time_varid !! NetCDF ID for the time variable integer ( I4B ) :: id_varid !! NetCDF ID for the particle name variable integer ( I4B ) :: name_varid !! NetCDF ID for the namevariable integer ( I4B ) :: ptype_varid !! NetCDF ID for the particle type variable integer ( I4B ) :: npl_varid !! NetCDF ID for the number of active massive bodies variable integer ( I4B ) :: ntp_varid !! NetCDF ID for the number of active test particles variable integer ( I4B ) :: a_varid !! NetCDF ID for the semimajor axis variable integer ( I4B ) :: e_varid !! NetCDF ID for the eccentricity variable integer ( I4B ) :: inc_varid !! NetCDF ID for the inclination variable integer ( I4B ) :: capom_varid !! NetCDF ID for the long. asc. node variable integer ( I4B ) :: omega_varid !! NetCDF ID for the arg. periapsis variable integer ( I4B ) :: capm_varid !! NetCDF ID for the mean anomaly variable integer ( I4B ) :: xhx_varid !! NetCDF ID for the heliocentric position x variable integer ( I4B ) :: xhy_varid !! NetCDF ID for the heliocentric position y variable integer ( I4B ) :: xhz_varid !! NetCDF ID for the heliocentric position z variable integer ( I4B ) :: vhx_varid !! NetCDF ID for the heliocentric velocity x variable integer ( I4B ) :: vhy_varid !! NetCDF ID for the heliocentric velocity y variable integer ( I4B ) :: vhz_varid !! NetCDF ID for the heliocentric velocity z variable integer ( I4B ) :: Gmass_varid !! NetCDF ID for the mass variable integer ( I4B ) :: rhill_varid !! NetCDF ID for the hill radius variable integer ( I4B ) :: radius_varid !! NetCDF ID for the radius variable integer ( I4B ) :: Ip1_varid !! NetCDF ID for the axis 1 principal moment of inertia variable integer ( I4B ) :: Ip2_varid !! NetCDF ID for the axis 2 principal moment of inertia variable integer ( I4B ) :: Ip3_varid !! NetCDF ID for the axis 3 principal moment of inertia variable integer ( I4B ) :: rotx_varid !! NetCDF ID for the rotation x variable integer ( I4B ) :: roty_varid !! NetCDF ID for the rotation y variable integer ( I4B ) :: rotz_varid !! NetCDF ID for the rotation z variable integer ( I4B ) :: k2_varid !! NetCDF ID for the Love number variable integer ( I4B ) :: Q_varid !! NetCDF ID for the energy dissipation variable integer ( I4B ) :: KE_orb_varid !! NetCDF ID for the system orbital kinetic energy variable integer ( I4B ) :: KE_spin_varid !! NetCDF ID for the system spin kinetic energy variable integer ( I4B ) :: PE_varid !! NetCDF ID for the system potential energy variable integer ( I4B ) :: L_orbx_varid !! NetCDF ID for the system orbital angular momentum x variable integer ( I4B ) :: L_orby_varid !! NetCDF ID for the system orbital angular momentum y variable integer ( I4B ) :: L_orbz_varid !! NetCDF ID for the system orbital angular momentum z variable integer ( I4B ) :: L_spinx_varid !! NetCDF ID for the system spin angular momentum x variable integer ( I4B ) :: L_spiny_varid !! NetCDF ID for the system spin angular momentum y variable integer ( I4B ) :: L_spinz_varid !! NetCDF ID for the system spin angular momentum z variable integer ( I4B ) :: L_escapex_varid !! NetCDF ID for the escaped angular momentum x variable integer ( I4B ) :: L_escapey_varid !! NetCDF ID for the escaped angular momentum x variable integer ( I4B ) :: L_escapez_varid !! NetCDF ID for the escaped angular momentum x variable integer ( I4B ) :: Ecollisions_varid !! NetCDF ID for the energy lost in collisions variable integer ( I4B ) :: Euntracked_varid !! NetCDF ID for the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) integer ( I4B ) :: GMescape_varid !! NetCDF ID for the G*Mass of bodies that escape the system integer ( I4B ) :: status_varid !! NetCDF ID for the status variable integer ( I4B ) :: origin_type_varid !! NetCDF ID for the origin type integer ( I4B ) :: origin_time_varid !! NetCDF ID for the origin time integer ( I4B ) :: origin_xhx_varid !! NetCDF ID for the origin xh x component integer ( I4B ) :: origin_xhy_varid !! NetCDF ID for the origin xh y component integer ( I4B ) :: origin_xhz_varid !! NetCDF ID for the origin xh z component integer ( I4B ) :: origin_vhx_varid !! NetCDF ID for the origin xh x component integer ( I4B ) :: origin_vhy_varid !! NetCDF ID for the origin xh y component integer ( I4B ) :: origin_vhz_varid !! NetCDF ID for the origin xh z component integer ( I4B ) :: discard_time_varid !! NetCDF ID for the time of discard variable integer ( I4B ) :: discard_xhx_varid !! NetCDF ID for the heliocentric position of the body at the time of discard x variable integer ( I4B ) :: discard_xhy_varid !! NetCDF ID for the heliocentric position of the body at the time of discard y variable integer ( I4B ) :: discard_xhz_varid !! NetCDF ID for the heliocentric position of the body at the time of discard z variable integer ( I4B ) :: discard_vhx_varid !! NetCDF ID for the heliocentric velocity of the body at the time of discard x variable integer ( I4B ) :: discard_vhy_varid !! NetCDF ID for the heliocentric velocity of the body at the time of discard y variable integer ( I4B ) :: discard_vhz_varid !! NetCDF ID for the heliocentric velocity of the body at the time of discard z variable integer ( I4B ) :: discard_body_id_varid !! NetCDF ID for the id of the other body involved in the discard contains procedure :: close => netcdf_close !! Closes an open NetCDF file procedure :: initialize => netcdf_initialize_output !! Initialize a set of parameters used to identify a NetCDF output object procedure :: open => netcdf_open !! Opens a NetCDF file end type netcdf_parameters !******************************************************************************************************************************** ! swiftest_parameters class definitions !******************************************************************************************************************************** !> User defined parameters that are read in from the parameters input file. !>    Each paramter is initialized to a default values. type :: swiftest_parameters integer ( I4B ) :: integrator = UNKNOWN_INTEGRATOR !! Symbolic name of the nbody integrator  used integer ( I4B ) :: maxid = - 1 !! The current maximum particle id number real ( DP ) :: t0 = - 1.0_DP !! Integration start time real ( DP ) :: t = - 1.0_DP !! Integration current time real ( DP ) :: tstop = - 1.0_DP !! Integration stop time real ( DP ) :: dt = - 1.0_DP !! Time step integer ( I8B ) :: ioutput = 0_I8B !! Output counter character ( STRMAX ) :: incbfile = CB_INFILE !! Name of input file for the central body character ( STRMAX ) :: inplfile = PL_INFILE !! Name of input file for massive bodies character ( STRMAX ) :: intpfile = TP_INFILE !! Name of input file for test particles character ( STRMAX ) :: in_type = ASCII_TYPE !! Data representation type of input data files character ( STRMAX ) :: in_form = XV !! Format of input data files (EL or XV) integer ( I4B ) :: istep_out = - 1 !! Number of time steps between binary outputs character ( STRMAX ) :: outfile = NETCDF_OUTFILE !! Name of output binary file character ( STRMAX ) :: out_type = NETCDF_DOUBLE_TYPE !! Binary format of output file character ( STRMAX ) :: out_form = XVEL !! Data to write to output file character ( STRMAX ) :: out_stat = 'NEW' !! Open status for output binary file character ( STRMAX ) :: particle_out = PARTICLE_OUTFILE !! Name of output particle information file integer ( I4B ) :: istep_dump = - 1 !! Number of time steps between dumps real ( DP ) :: rmin = - 1.0_DP !! Minimum heliocentric radius for test particle real ( DP ) :: rmax = - 1.0_DP !! Maximum heliocentric radius for test particle real ( DP ) :: rmaxu = - 1.0_DP !! Maximum unbound heliocentric radius for test particle real ( DP ) :: qmin = - 1.0_DP !! Minimum pericenter distance for test particle character ( STRMAX ) :: qmin_coord = 'HELIO' !! Coordinate frame to use for qmin real ( DP ) :: qmin_alo = - 1.0_DP !! Minimum semimajor axis for qmin real ( DP ) :: qmin_ahi = - 1.0_DP !! Maximum semimajor axis for qmin character ( STRMAX ) :: enc_out = \"\" !! Name of output file for encounters character ( STRMAX ) :: discard_out = \"\" !! Name of output file for discards real ( QP ) :: MU2KG = - 1.0_QP !! Converts mass units to grams real ( QP ) :: TU2S = - 1.0_QP !! Converts time units to seconds real ( QP ) :: DU2M = - 1.0_QP !! Converts distance unit to centimeters real ( DP ) :: GU = - 1.0_DP !! Universal gravitational constant in the system units real ( DP ) :: inv_c2 = - 1.0_DP !! Inverse speed of light squared in the system units character ( STRMAX ) :: energy_out = \"\" !! Name of output energy and momentum report file ! Logical flags to turn on or off various features of the code logical :: lrhill_present = . false . !! Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical :: lextra_force = . false . !! User defined force function turned on logical :: lbig_discard = . false . !! Save big bodies on every discard logical :: lclose = . false . !! Turn on close encounters logical :: lenergy = . false . !! Track the total energy of the system logical :: loblatecb = . false . !! Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical :: lrotation = . false . !! Include rotation states of big bodies logical :: ltides = . false . !! Include tidal dissipation ! Initial values to pass to the energy report subroutine (usually only used in the case of a restart, otherwise these will be updated with initial conditions values) real ( DP ) :: Eorbit_orig = 0.0_DP !! Initial orbital energy real ( DP ) :: GMtot_orig = 0.0_DP !! Initial system mass real ( DP ), dimension ( NDIM ) :: Ltot_orig = 0.0_DP !! Initial total angular momentum vector real ( DP ), dimension ( NDIM ) :: Lorbit_orig = 0.0_DP !! Initial orbital angular momentum real ( DP ), dimension ( NDIM ) :: Lspin_orig = 0.0_DP !! Initial spin angular momentum vector real ( DP ), dimension ( NDIM ) :: Lescape = 0.0_DP !! Angular momentum of bodies that escaped the system (used for bookeeping) real ( DP ) :: GMescape = 0.0_DP !! Mass of bodies that escaped the system (used for bookeeping) real ( DP ) :: Ecollisions = 0.0_DP !! Energy lost from system due to collisions real ( DP ) :: Euntracked = 0.0_DP !! Energy gained from system due to escaped bodies logical :: lfirstenergy = . true . !! This is the first time computing energe logical :: lfirstkick = . true . !! Initiate the first kick in a symplectic step logical :: lrestart = . false . !! Indicates whether or not this is a restarted run ! Future features not implemented or in development logical :: lgr = . false . !! Turn on GR logical :: lyarkovsky = . false . !! Turn on Yarkovsky effect logical :: lyorp = . false . !! Turn on YORP effect type ( netcdf_parameters ) :: nciu !! Object containing NetCDF parameters contains procedure :: reader => io_param_reader procedure :: writer => io_param_writer procedure :: dump => io_dump_param procedure :: read_in => io_read_in_param end type swiftest_parameters !******************************************************************************************************************************** !                                    swiftest_swiftest_particle_info class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the particle origin information object. This object is used to track time, location, and collisional regime !> of fragments produced in collisional events. type :: swiftest_particle_info character ( len = NAMELEN ) :: name !! Non-unique name character ( len = NAMELEN ) :: particle_type !! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character ( len = NAMELEN ) :: origin_type !! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real ( DP ) :: origin_time !! The time of the particle's formation real ( DP ), dimension ( NDIM ) :: origin_xh !! The heliocentric distance vector at the time of the particle's formation real ( DP ), dimension ( NDIM ) :: origin_vh !! The heliocentric velocity vector at the time of the particle's formation real ( DP ) :: discard_time !! The time of the particle's discard character ( len = NAMELEN ) :: status !! Particle status description: Active, Merged, Fragmented, etc. real ( DP ), dimension ( NDIM ) :: discard_xh !! The heliocentric distance vector at the time of the particle's discard real ( DP ), dimension ( NDIM ) :: discard_vh !! The heliocentric velocity vector at the time of the particle's discard integer ( I4B ) :: discard_body_id !! The id of the other body involved in the discard (0 if no other body involved) contains procedure :: dump => io_dump_particle_info !! Dumps contents of particle information to file procedure :: read_in => io_read_in_particle_info !! Read in a particle information object from an open file procedure :: copy => util_copy_particle_info !! Copies one set of information object components into another, component-by-component procedure :: set_value => util_set_particle_info !! Sets one or more values of the particle information metadata object end type swiftest_particle_info !******************************************************************************************************************************** ! swiftest_base class definitions and methods !******************************************************************************************************************************** type , abstract :: swiftest_base !! An abstract superclass for a generic Swiftest object contains !! The minimal methods that all systems must have procedure :: dump => io_dump_base !! Dump contents to file procedure :: dump_particle_info => io_dump_particle_info_base !! Dump contents of particle information metadata to file procedure :: write_frame_netcdf => netcdf_write_frame_base !! I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure :: write_particle_info_netcdf => netcdf_write_particle_info_base !! Writes out the particle information metadata to NetCDF file generic :: write_frame => write_frame_netcdf !! Set up generic procedure that will switch between NetCDF or Fortran binary depending on arguments generic :: write_particle_info => write_particle_info_netcdf end type swiftest_base !******************************************************************************************************************************** ! swiftest_cb class definitions and methods !******************************************************************************************************************************** !> A concrete lass for the central body in a Swiftest simulation type , abstract , extends ( swiftest_base ) :: swiftest_cb type ( swiftest_particle_info ) :: info !! Particle metadata information integer ( I4B ) :: id = 0 !! External identifier (unique) real ( DP ) :: mass = 0.0_DP !! Central body mass (units MU) real ( DP ) :: Gmass = 0.0_DP !! Central mass gravitational term G * mass (units GU * MU) real ( DP ) :: radius = 0.0_DP !! Central body radius (units DU) real ( DP ) :: density = 1.0_DP !! Central body mass density - calculated internally (units MU / DU**3) real ( DP ) :: j2rp2 = 0.0_DP !! J2*R&#94;2 term for central body real ( DP ) :: j4rp4 = 0.0_DP !! J4*R&#94;2 term for central body real ( DP ), dimension ( NDIM ) :: aobl = 0.0_DP !! Barycentric acceleration due to central body oblatenes real ( DP ), dimension ( NDIM ) :: atide = 0.0_DP !! Barycentric acceleration due to central body oblatenes real ( DP ), dimension ( NDIM ) :: aoblbeg = 0.0_DP !! Barycentric acceleration due to central body oblatenes at beginning of step real ( DP ), dimension ( NDIM ) :: aoblend = 0.0_DP !! Barycentric acceleration due to central body oblatenes at end of step real ( DP ), dimension ( NDIM ) :: atidebeg = 0.0_DP !! Barycentric acceleration due to central body oblatenes at beginning of step real ( DP ), dimension ( NDIM ) :: atideend = 0.0_DP !! Barycentric acceleration due to central body oblatenes at end of step real ( DP ), dimension ( NDIM ) :: xb = 0.0_DP !! Barycentric position (units DU) real ( DP ), dimension ( NDIM ) :: vb = 0.0_DP !! Barycentric velocity (units DU / TU) real ( DP ), dimension ( NDIM ) :: agr = 0.0_DP !! Acceleration due to post-Newtonian correction real ( DP ), dimension ( NDIM ) :: Ip = 0.0_DP !! Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real ( DP ), dimension ( NDIM ) :: rot = 0.0_DP !! Body rotation vector in inertial coordinate frame (units rad / TU) real ( DP ) :: k2 = 0.0_DP !! Tidal Love number real ( DP ) :: Q = 0.0_DP !! Tidal quality factor real ( DP ) :: tlag = 0.0_DP !! Tidal phase lag angle real ( DP ), dimension ( NDIM ) :: L0 = 0.0_DP !! Initial angular momentum of the central body real ( DP ), dimension ( NDIM ) :: dL = 0.0_DP !! Change in angular momentum of the central body contains procedure :: read_in => io_read_in_cb !! I/O routine for reading in central body data procedure :: read_frame => io_read_frame_cb !! I/O routine for reading out a single frame of time-series data for the central body procedure :: write_frame_bin => io_write_frame_cb !! I/O routine for writing out a single frame of time-series data for the central body generic :: write_frame => write_frame_bin !! Write a frame (either binary or NetCDF, using generic procedures) end type swiftest_cb !******************************************************************************************************************************** ! swiftest_body definitions and methods !******************************************************************************************************************************** !> An abstract class for a generic collection of Swiftest bodies type , abstract , extends ( swiftest_base ) :: swiftest_body !! Superclass that defines the generic elements of a Swiftest particle logical :: lfirst = . true . !! Run the current step as a first integer ( I4B ) :: nbody = 0 !! Number of bodies type ( swiftest_particle_info ), dimension (:), allocatable :: info !! Particle metadata information integer ( I4B ), dimension (:), allocatable :: id !! External identifier (unique) integer ( I4B ), dimension (:), allocatable :: status !! An integrator-specific status indicator logical , dimension (:), allocatable :: ldiscard !! Body should be discarded logical , dimension (:), allocatable :: lmask !! Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real ( DP ), dimension (:), allocatable :: mu !! G * (Mcb + [m]) real ( DP ), dimension (:,:), allocatable :: xh !! Swiftestcentric position real ( DP ), dimension (:,:), allocatable :: vh !! Swiftestcentric velocity real ( DP ), dimension (:,:), allocatable :: xb !! Barycentric position real ( DP ), dimension (:,:), allocatable :: vb !! Barycentric velocity real ( DP ), dimension (:,:), allocatable :: ah !! Total heliocentric acceleration real ( DP ), dimension (:,:), allocatable :: aobl !! Barycentric accelerations of bodies due to central body oblatenes real ( DP ), dimension (:,:), allocatable :: atide !! Tanngential component of acceleration of bodies due to tides real ( DP ), dimension (:,:), allocatable :: agr !! Acceleration due to post-Newtonian correction real ( DP ), dimension (:), allocatable :: ir3h !! Inverse heliocentric radius term (1/rh**3) real ( DP ), dimension (:), allocatable :: a !! Semimajor axis (pericentric distance for a parabolic orbit) real ( DP ), dimension (:), allocatable :: e !! Eccentricity real ( DP ), dimension (:), allocatable :: inc !! Inclination real ( DP ), dimension (:), allocatable :: capom !! Longitude of ascending node real ( DP ), dimension (:), allocatable :: omega !! Argument of pericenter real ( DP ), dimension (:), allocatable :: capm !! Mean anomaly !! Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the !!    component list, such as setup_body and util_spill contains procedure ( abstract_discard_body ), deferred :: discard procedure ( abstract_kick_body ), deferred :: kick procedure ( abstract_set_mu ), deferred :: set_mu procedure ( abstract_step_body ), deferred :: step procedure ( abstract_accel ), deferred :: accel ! These are concrete because the implementation is the same for all types of particles procedure :: drift => drift_body !! Loop through bodies and call Danby drift routine on heliocentric variables procedure :: v2pv => gr_vh2pv_body !! Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure :: pv2v => gr_pv2vh_body !! Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure :: read_in => io_read_in_body !! Read in body initial conditions from a file procedure :: read_frame => io_read_frame_body !! I/O routine for writing out a single frame of time-series data for the central body procedure :: write_frame_bin => io_write_frame_body !! I/O routine for writing out a single frame of time-series data for the central body procedure :: accel_obl => obl_acc_body !! Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure :: el2xv => orbel_el2xv_vec !! Convert orbital elements to position and velocity vectors procedure :: xv2el => orbel_xv2el_vec !! Convert position and velocity vectors to orbital  elements procedure :: setup => setup_body !! A constructor that sets the number of bodies and allocates all allocatable arrays procedure :: accel_user => user_kick_getacch_body !! Add user-supplied heliocentric accelerations to planets procedure :: append => util_append_body !! Appends elements from one structure to another procedure :: fill => util_fill_body !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => util_resize_body !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_ir3 => util_set_ir3h !! Sets the inverse heliocentric radius term (1/rh**3) procedure :: sort => util_sort_body !! Sorts body arrays by a sortable componen procedure :: rearrange => util_sort_rearrange_body !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => util_spill_body !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) generic :: write_frame => write_frame_bin !! Add the generic write frame for Fortran binary files end type swiftest_body !******************************************************************************************************************************** ! swiftest_pl definitions and methods !******************************************************************************************************************************** !> An abstract class for a generic collection of Swiftest massive bodies type , abstract , extends ( swiftest_body ) :: swiftest_pl !! Superclass that defines the generic elements of a Swiftest particle real ( DP ), dimension (:), allocatable :: mass !! Body mass (units MU) real ( DP ), dimension (:), allocatable :: Gmass !! Mass gravitational term G * mass (units GU * MU) real ( DP ), dimension (:), allocatable :: rhill !! Body mass (units MU) real ( DP ), dimension (:), allocatable :: radius !! Body radius (units DU) real ( DP ), dimension (:,:), allocatable :: xbeg !! Position at beginning of step real ( DP ), dimension (:,:), allocatable :: xend !! Position at end of step real ( DP ), dimension (:,:), allocatable :: vbeg !! Velocity at beginning of step real ( DP ), dimension (:), allocatable :: density !! Body mass density - calculated internally (units MU / DU**3) real ( DP ), dimension (:,:), allocatable :: Ip !! Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real ( DP ), dimension (:,:), allocatable :: rot !! Body rotation vector in inertial coordinate frame (units rad / TU) real ( DP ), dimension (:), allocatable :: k2 !! Tidal Love number real ( DP ), dimension (:), allocatable :: Q !! Tidal quality factor real ( DP ), dimension (:), allocatable :: tlag !! Tidal phase lag integer ( I4B ), dimension (:,:), allocatable :: k_plpl !! Index array used to convert flattened the body-body comparison upper triangular matrix integer ( I8B ) :: nplpl !! Number of body-body comparisons in the flattened upper triangular matrix !! Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the !!    component list, such as setup_pl and util_spill_pl contains ! Massive body-specific concrete methods ! These are concrete because they are the same implemenation for all integrators procedure :: discard => discard_pl !! Placeholder method for discarding massive bodies procedure :: index => util_index_eucl_plpl !! Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure :: accel_int => kick_getacch_int_pl !! Compute direct cross (third) term heliocentric accelerations of massive bodies procedure :: accel_obl => obl_acc_pl !! Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure :: setup => setup_pl !! A base constructor that sets the number of bodies and allocates and initializes all arrays procedure :: accel_tides => tides_kick_getacch_pl !! Compute the accelerations of bodies due to tidal interactions with the central body procedure :: append => util_append_pl !! Appends elements from one structure to another procedure :: h2b => util_coord_h2b_pl !! Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure :: b2h => util_coord_b2h_pl !! Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure :: vh2vb => util_coord_vh2vb_pl !! Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure :: vb2vh => util_coord_vb2vh_pl !! Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure :: xh2xb => util_coord_xh2xb_pl !! Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure :: fill => util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => util_resize_pl !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_beg_end => util_set_beg_end_pl !! Sets the beginning and ending positions and velocities of planets. procedure :: set_mu => util_set_mu_pl !! Method used to construct the vectorized form of the central body mass procedure :: set_rhill => util_set_rhill !! Calculates the Hill's radii for each body procedure :: sort => util_sort_pl !! Sorts body arrays by a sortable component procedure :: rearrange => util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => util_spill_pl !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type swiftest_pl !******************************************************************************************************************************** ! swiftest_tp definitions and methods !******************************************************************************************************************************** !> An abstract class for a generic collection of Swiftest test particles type , abstract , extends ( swiftest_body ) :: swiftest_tp !! Superclass that defines the generic elements of a Swiftest test particle integer ( I4B ), dimension (:), allocatable :: isperi !! Perihelion passage flag real ( DP ), dimension (:), allocatable :: peri !! Perihelion distance real ( DP ), dimension (:), allocatable :: atp !! Semimajor axis following perihelion passage integer ( I4B ), dimension (:,:), allocatable :: k_pltp !! Index array used to convert flattened the body-body comparison upper triangular matrix integer ( I8B ) :: npltp !! Number of pl-tp comparisons in the flattened upper triangular matrix !! Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the !!    component list, such as setup_tp and util_spill_tp contains ! Test particle-specific concrete methods ! These are concrete because they are the same implemenation for all integrators procedure :: discard => discard_tp !! Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure :: accel_int => kick_getacch_int_tp !! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure :: accel_obl => obl_acc_tp !! Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure :: setup => setup_tp !! A base constructor that sets the number of bodies and procedure :: append => util_append_tp !! Appends elements from one structure to another procedure :: h2b => util_coord_h2b_tp !! Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure :: b2h => util_coord_b2h_tp !! Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure :: vb2vh => util_coord_vb2vh_tp !! Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure :: vh2vb => util_coord_vh2vb_tp !! Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure :: xh2xb => util_coord_xh2xb_tp !! Convert test particles from heliocentric to barycentric coordinates (position only) procedure :: fill => util_fill_tp !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: get_peri => util_peri_tp !! Determine system pericenter passages for test particles procedure :: resize => util_resize_tp !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_mu => util_set_mu_tp !! Method used to construct the vectorized form of the central body mass procedure :: sort => util_sort_tp !! Sorts body arrays by a sortable component procedure :: rearrange => util_sort_rearrange_tp !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => util_spill_tp !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type swiftest_tp !******************************************************************************************************************************** ! swiftest_nbody_system class definitions and methods !******************************************************************************************************************************** !> An abstract class for a basic Swiftest nbody system type , abstract :: swiftest_nbody_system !!  This superclass contains a minimial system of a set of test particles (tp), massive bodies (pl), and a central body (cb) class ( swiftest_cb ), allocatable :: cb !! Central body data structure class ( swiftest_pl ), allocatable :: pl !! Massive body data structure class ( swiftest_tp ), allocatable :: tp !! Test particle data structure class ( swiftest_tp ), allocatable :: tp_discards !! Discarded test particle data structure class ( swiftest_pl ), allocatable :: pl_discards !! Discarded massive body particle data structure real ( DP ) :: GMtot = 0.0_DP !! Total system mass - used for barycentric coordinate conversion real ( DP ) :: ke_orbit = 0.0_DP !! System orbital kinetic energy real ( DP ) :: ke_spin = 0.0_DP !! System spin kinetic energy real ( DP ) :: pe = 0.0_DP !! System potential energy real ( DP ) :: te = 0.0_DP !! System total energy real ( DP ) :: oblpot = 0.0_DP !! System potential energy due to oblateness of the central body real ( DP ), dimension ( NDIM ) :: Lorbit = 0.0_DP !! System orbital angular momentum vector real ( DP ), dimension ( NDIM ) :: Lspin = 0.0_DP !! System spin angular momentum vector real ( DP ), dimension ( NDIM ) :: Ltot = 0.0_DP !! System angular momentum vector logical :: lbeg !! True if this is the beginning of a step. This is used so that test particle steps can be calculated !!    separately from massive bodies.  Massive body variables are saved at half steps, and passed to !!    the test particles contains !> Each integrator will have its own version of the step procedure ( abstract_step_system ), deferred :: step ! Concrete classes that are common to the basic integrator (only test particles considered for discard) procedure :: discard => discard_system !! Perform a discard step on the system procedure :: conservation_report => io_conservation_report !! Compute energy and momentum and print out the change with time procedure :: dump => io_dump_system !! Dump the state of the system to a file procedure :: get_old_t_final => io_get_old_t_final_system !! Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure :: read_frame => io_read_frame_system !! Read in a frame of input data from file procedure :: read_particle_info => io_read_particle_info_system !! Read in particle metadata from file procedure :: write_discard => io_write_discard !! Write out information about discarded test particles procedure :: write_frame => io_write_frame_system !! Append a frame of output data to file procedure :: write_hdr_bin => io_write_hdr_system !! Write a header for an output frame in Fortran binary format procedure :: write_hdr_netcdf => netcdf_write_hdr_system !! Write a header for an output frame in NetCDF format procedure :: obl_pot => obl_pot_system !! Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure :: initialize => setup_initialize_system !! Initialize the system from input files procedure :: init_particle_info => setup_initialize_particle_info_system !! Initialize the system from input files procedure :: step_spin => tides_step_spin_system !! Steps the spins of the massive & central bodies due to tides. procedure :: set_msys => util_set_msys !! Sets the value of msys from the masses of system bodies. procedure :: get_energy_and_momentum => util_get_energy_momentum_system !! Calculates the total system energy and momentum procedure :: rescale => util_rescale_system !! Rescales the system into a new set of units procedure :: validate_ids => util_valid_id_system !! Validate the numerical ids passed to the system and save the maximum value generic :: write_hdr => write_hdr_bin , write_hdr_netcdf !! Generic method call for writing headers end type swiftest_nbody_system type :: swiftest_encounter integer ( I4B ) :: nenc !! Total number of encounters logical , dimension (:), allocatable :: lvdotr !! relative vdotr flag integer ( I4B ), dimension (:), allocatable :: status !! status of the interaction integer ( I8B ), dimension (:), allocatable :: kidx !! index value of the encounter from the master k_plpl encounter list integer ( I4B ), dimension (:), allocatable :: index1 !! position of the first body in the encounter integer ( I4B ), dimension (:), allocatable :: index2 !! position of the second body in the encounter integer ( I4B ), dimension (:), allocatable :: id1 !! id of the first body in the encounter integer ( I4B ), dimension (:), allocatable :: id2 !! id of the second body in the encounter real ( DP ), dimension (:,:), allocatable :: x1 !! the position of body 1 in the encounter real ( DP ), dimension (:,:), allocatable :: x2 !! the position of body 2 in the encounter real ( DP ), dimension (:,:), allocatable :: v1 !! the velocity of body 1 in the encounter real ( DP ), dimension (:,:), allocatable :: v2 !! the velocity of body 2 in the encounter real ( DP ), dimension (:), allocatable :: t !! Time of encounter contains procedure :: setup => setup_encounter !! A constructor that sets the number of encounters and allocates and initializes all arrays procedure :: append => util_append_encounter !! Appends elements from one structure to another procedure :: copy => util_copy_encounter !! Copies elements from the source encounter list into self. procedure :: spill => util_spill_encounter !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure :: resize => util_resize_encounter !! Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure :: write => io_write_encounter !! Write close encounter data to output binary file end type swiftest_encounter abstract interface subroutine abstract_discard_body ( self , system , param ) import swiftest_body , swiftest_nbody_system , swiftest_parameters class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine abstract_discard_body subroutine abstract_accel ( self , system , param , t , lbeg ) import swiftest_body , swiftest_nbody_system , swiftest_parameters , DP class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step end subroutine abstract_accel subroutine abstract_kick_body ( self , system , param , t , dt , lbeg ) import swiftest_body , swiftest_nbody_system , swiftest_parameters , DP implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system objec class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine abstract_kick_body function abstract_read_frame ( self , iu , param ) result ( ierr ) import DP , I4B , swiftest_base , swiftest_parameters class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function abstract_read_frame subroutine abstract_set_mu ( self , cb ) import swiftest_body , swiftest_cb class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine abstract_set_mu subroutine abstract_step_body ( self , system , param , t , dt ) import DP , swiftest_body , swiftest_nbody_system , swiftest_parameters implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine abstract_step_body subroutine abstract_step_system ( self , param , t , dt ) import DP , swiftest_nbody_system , swiftest_parameters implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine abstract_step_system end interface interface module subroutine discard_pl ( self , system , param ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameter end subroutine discard_pl module subroutine discard_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine discard_system module subroutine discard_tp ( self , system , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine discard_tp module pure subroutine drift_all ( mu , x , v , n , param , dt , mask , iflag ) implicit none real ( DP ), dimension (:), intent ( in ) :: mu !! Vector of gravitational constants real ( DP ), dimension (:,:), intent ( inout ) :: x , v !! Position and velocity vectors integer ( I4B ), intent ( in ) :: n !! number of bodies class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize logical , dimension (:), intent ( in ) :: mask !! Logical mask of size self%nbody that determines which bodies to drift. integer ( I4B ), dimension (:), intent ( out ) :: iflag !! Vector of error flags. 0 means no problem end subroutine drift_all module subroutine drift_body ( self , system , param , dt ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine drift_body module pure elemental subroutine drift_one ( mu , px , py , pz , vx , vy , vz , dt , iflag ) implicit none real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real ( DP ), intent ( inout ) :: px , py , pz , vx , vy , vz !! Position and velocity of body to drift real ( DP ), intent ( in ) :: dt !! Step size integer ( I4B ), intent ( out ) :: iflag !! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) end subroutine drift_one module subroutine util_index_eucl_plpl ( self , param ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine module subroutine util_index_eucl_pltp ( self , pl , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine module pure subroutine gr_kick_getaccb_ns_body ( self , system , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine gr_kick_getaccb_ns_body module subroutine gr_kick_getacch ( mu , x , lmask , n , inv_c2 , agr ) implicit none real ( DP ), dimension (:), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vectors logical , dimension (:), intent ( in ) :: lmask !! Logical mask indicating which bodies to compute integer ( I4B ), intent ( in ) :: n !! Total number of bodies real ( DP ), intent ( in ) :: inv_c2 !! Inverse speed of light squared: 1 / c**2 real ( DP ), dimension (:,:), intent ( out ) :: agr !! Accelerations end subroutine gr_kick_getacch module pure subroutine gr_p4_pos_kick ( param , x , v , dt ) implicit none class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), dimension (:), intent ( inout ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( in ) :: dt !! Step size end subroutine gr_p4_pos_kick module pure subroutine gr_pseudovel2vel ( param , mu , xh , pv , vh ) implicit none class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Swiftestcentric position vector real ( DP ), dimension (:), intent ( in ) :: pv !! Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real ( DP ), dimension (:), intent ( out ) :: vh !! Swiftestcentric velocity vector end subroutine gr_pseudovel2vel module pure subroutine gr_pv2vh_body ( self , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine gr_pv2vh_body module pure subroutine gr_vel2pseudovel ( param , mu , xh , vh , pv ) implicit none class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Swiftestcentric position vector real ( DP ), dimension (:), intent ( in ) :: vh !! Swiftestcentric velocity vector real ( DP ), dimension (:), intent ( out ) :: pv !! Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) end subroutine gr_vel2pseudovel module pure subroutine gr_vh2pv_body ( self , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine gr_vh2pv_body module subroutine io_conservation_report ( self , param , lterminal ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Input colleciton of user-defined parameters logical , intent ( in ) :: lterminal !! Indicates whether to output information to the terminal screen end subroutine io_conservation_report module subroutine io_dump_param ( self , param_file_name ) implicit none class ( swiftest_parameters ), intent ( in ) :: self !! Output collection of parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) end subroutine io_dump_param module subroutine io_dump_particle_info_base ( self , param , idx ) implicit none class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object (can be cb, pl, or tp) class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ), dimension (:), optional , intent ( in ) :: idx !! Array of test particle indices to append to the particle file end subroutine io_dump_particle_info_base module subroutine io_dump_particle_info ( self , iu ) implicit none class ( swiftest_particle_info ), intent ( in ) :: self !! Swiftest particle info metadata object integer ( I4B ), intent ( in ) :: iu !! Open unformatted file unit number end subroutine io_dump_particle_info module subroutine io_dump_base ( self , param ) implicit none class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_dump_base module subroutine io_dump_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_dump_system module function io_get_args ( integrator , param_file_name ) result ( ierr ) implicit none integer ( I4B ) :: integrator !! Symbolic code of the requested integrator character ( len = :), allocatable :: param_file_name !! Name of the input parameters file integer ( I4B ) :: ierr !! I/O error code end function io_get_args module function io_get_old_t_final_system ( self , param ) result ( old_t_final ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self class ( swiftest_parameters ), intent ( in ) :: param real ( DP ) :: old_t_final end function io_get_old_t_final_system module function io_get_token ( buffer , ifirst , ilast , ierr ) result ( token ) implicit none character ( len =* ), intent ( in ) :: buffer !! Input string buffer integer ( I4B ), intent ( inout ) :: ifirst !! Index of the buffer at which to start the search for a token integer ( I4B ), intent ( out ) :: ilast !! Index of the buffer at the end of the returned token integer ( I4B ), intent ( out ) :: ierr !! Error code character ( len = :), allocatable :: token !! Returned token string end function io_get_token module subroutine io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( swiftest_parameters ), intent ( inout ) :: self !! Collection of parameters integer ( I4B ), intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer ( I4B ), intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer ( I4B ), intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine io_param_reader module subroutine io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( swiftest_parameters ), intent ( in ) :: self !! Collection of parameters integer ( I4B ), intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer ( I4B ), intent ( in ) :: v_list (:) !! Not used in this procedure integer ( I4B ), intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine io_param_writer module subroutine io_read_in_body ( self , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_read_in_body module subroutine io_read_in_cb ( self , param ) implicit none class ( swiftest_cb ), intent ( inout ) :: self !! Swiftest central body object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_read_in_cb module subroutine io_read_in_param ( self , param_file_name ) implicit none class ( swiftest_parameters ), intent ( inout ) :: self !! Current run configuration parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) end subroutine io_read_in_param module subroutine io_read_in_particle_info ( self , iu ) implicit none class ( swiftest_particle_info ), intent ( inout ) :: self !! Particle metadata information object integer ( I4B ), intent ( in ) :: iu !! Open file unit number end subroutine io_read_in_particle_info module function io_read_frame_body ( self , iu , param ) result ( ierr ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function io_read_frame_body module function io_read_frame_cb ( self , iu , param ) result ( ierr ) implicit none class ( swiftest_cb ), intent ( inout ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function io_read_frame_cb module function io_read_frame_system ( self , iu , param ) result ( ierr ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function io_read_frame_system module subroutine io_read_particle_info_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_read_particle_info_system module subroutine io_write_discard ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_write_discard module subroutine io_toupper ( string ) implicit none character ( * ), intent ( inout ) :: string !! String to make upper case end subroutine io_toupper module subroutine io_write_encounter ( self , pl , encbody , param ) implicit none class ( swiftest_encounter ), intent ( in ) :: self !! Swiftest encounter list object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: encbody !! Encountering body - Swiftest generic body object (pl or tp) class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_encounter module subroutine io_write_frame_body ( self , iu , param ) implicit none class ( swiftest_body ), intent ( in ) :: self !! Swiftest body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_frame_body module subroutine io_write_frame_cb ( self , iu , param ) implicit none class ( swiftest_cb ), intent ( in ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_frame_cb module subroutine io_write_frame_encounter ( iu , t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 ) implicit none integer ( I4B ), intent ( in ) :: iu !! Open file unit number real ( DP ), intent ( in ) :: t !! Time of encounter integer ( I4B ), intent ( in ) :: id1 , id2 !! ids of the two encountering bodies real ( DP ), intent ( in ) :: Gmass1 , Gmass2 !! G*mass of the two encountering bodies real ( DP ), intent ( in ) :: radius1 , radius2 !! Radii of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 !! Swiftestcentric position vectors of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: vh1 , vh2 !! Swiftestcentric velocity vectors of the two encountering bodies end subroutine io_write_frame_encounter module subroutine io_write_frame_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_write_frame_system module subroutine io_write_hdr_system ( self , iu , param ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object integer ( I4B ), intent ( inout ) :: iu !! Output file unit number class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_hdr_system module subroutine kick_getacch_int_all_pl ( npl , nplpl , k_plpl , x , Gmass , radius , acc ) implicit none integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies integer ( I8B ), intent ( in ) :: nplpl !! Number of massive body interactions to compute integer ( I4B ), dimension (:,:), intent ( in ) :: k_plpl !! Array of interaction pair indices (flattened upper triangular matrix) real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vector array real ( DP ), dimension (:), intent ( in ) :: Gmass !! Array of massive body G*mass real ( DP ), dimension (:), intent ( in ) :: radius !! Array of massive body radii real ( DP ), dimension (:,:), intent ( inout ) :: acc !! Acceleration vector array end subroutine kick_getacch_int_all_pl module pure subroutine kick_getacch_int_one_pl ( rji2 , xr , yr , zr , Gmi , Gmj , axi , ayi , azi , axj , ayj , azj ) implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the two bodies real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmi !! G*mass of body i real ( DP ), intent ( in ) :: Gmj !! G*mass of body j real ( DP ), intent ( inout ) :: axi , ayi , azi !! Acceleration vector components of body i real ( DP ), intent ( inout ) :: axj , ayj , azj !! Acceleration vector components of body j end subroutine kick_getacch_int_one_pl module pure subroutine kick_getacch_int_one_tp ( rji2 , xr , yr , zr , Gmpl , ax , ay , az ) implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the test particle and massive body real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmpl !! G*mass of massive body real ( DP ), intent ( inout ) :: ax , ay , az !! Acceleration vector components of test particle end subroutine kick_getacch_int_one_tp module subroutine kick_getacch_int_pl ( self ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object end subroutine kick_getacch_int_pl module pure subroutine kick_getacch_int_tp ( self , GMpl , xhp , npl ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle real ( DP ), dimension (:), intent ( in ) :: GMpl !! Massive body masses real ( DP ), dimension (:,:), intent ( in ) :: xhp !! Massive body position vectors integer ( I4B ), intent ( in ) :: npl !! Number of active massive bodies end subroutine kick_getacch_int_tp module subroutine netcdf_close ( self , param ) implicit none class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_close module subroutine netcdf_initialize_output ( self , param ) implicit none class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_initialize_output module subroutine netcdf_open ( self , param ) implicit none class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_open module subroutine netcdf_write_frame_base ( self , iu , param ) implicit none class ( swiftest_base ), intent ( in ) :: self !! Swiftest base object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_write_frame_base module subroutine netcdf_write_frame_system ( self , iu , param ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest system object integer ( I4B ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_write_frame_system module subroutine netcdf_write_hdr_system ( self , iu , param ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_write_hdr_system module subroutine netcdf_write_particle_info_base ( self , iu ) implicit none class ( swiftest_base ), intent ( in ) :: self !! Swiftest particle object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to identify a particular NetCDF dataset end subroutine netcdf_write_particle_info_base module subroutine obl_acc_body ( self , system ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine obl_acc_body module subroutine obl_acc_pl ( self , system ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine obl_acc_pl module subroutine obl_acc_tp ( self , system ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine obl_acc_tp module subroutine obl_pot_system ( self ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object end subroutine obl_pot_system module subroutine orbel_el2xv_vec ( self , cb ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine orbel_el2xv_vec module pure subroutine orbel_scget ( angle , sx , cx ) implicit none real ( DP ), intent ( in ) :: angle real ( DP ), intent ( out ) :: sx , cx end subroutine orbel_scget module pure subroutine orbel_xv2aeq ( mu , x , v , a , e , q ) implicit none real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: e !! eccentricity real ( DP ), intent ( out ) :: q !! periapsis end subroutine orbel_xv2aeq module pure subroutine orbel_xv2aqt ( mu , x , v , a , q , capm , tperi ) implicit none real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: q !! periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly real ( DP ), intent ( out ) :: tperi !! time of pericenter passage end subroutine orbel_xv2aqt module pure subroutine orbel_xv2el ( mu , x , v , a , e , inc , capom , omega , capm ) implicit none real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: e !! eccentricity real ( DP ), intent ( out ) :: inc !! inclination real ( DP ), intent ( out ) :: capom !! longitude of ascending node real ( DP ), intent ( out ) :: omega !! argument of periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly end subroutine orbel_xv2el module subroutine orbel_xv2el_vec ( self , cb ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine orbel_xv2el_vec module subroutine setup_body ( self , n , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine setup_body module subroutine setup_construct_system ( system , param ) implicit none class ( swiftest_nbody_system ), allocatable , intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine setup_construct_system module subroutine setup_encounter ( self , n ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for end subroutine setup_encounter module subroutine setup_initialize_particle_info_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine setup_initialize_particle_info_system module subroutine setup_initialize_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine setup_initialize_system module subroutine setup_pl ( self , n , param ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine setup_pl module subroutine setup_tp ( self , n , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parametersr end subroutine setup_tp module subroutine tides_kick_getacch_pl ( self , system ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine tides_kick_getacch_pl module subroutine tides_step_spin_system ( self , param , t , dt ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine tides_step_spin_system module subroutine user_kick_getacch_body ( self , system , param , t , lbeg ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody_system_object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step end subroutine user_kick_getacch_body end interface interface util_append module subroutine util_append_arr_char_string ( arr , source , nold , nsrc , lsource_mask ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_char_string module subroutine util_append_arr_DP ( arr , source , nold , nsrc , lsource_mask ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_DP module subroutine util_append_arr_DPvec ( arr , source , nold , nsrc , lsource_mask ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:,:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_DPvec module subroutine util_append_arr_I4B ( arr , source , nold , nsrc , lsource_mask ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_I4B module subroutine util_append_arr_info ( arr , source , nold , nsrc , lsource_mask ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_info module subroutine util_append_arr_logical ( arr , source , nold , nsrc , lsource_mask ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array logical , dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_logical end interface interface module subroutine util_append_body ( self , source , lsource_mask ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_body module subroutine util_append_encounter ( self , source , lsource_mask ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_encounter module subroutine util_append_pl ( self , source , lsource_mask ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_pl module subroutine util_append_tp ( self , source , lsource_mask ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_tp module subroutine util_coord_b2h_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_b2h_pl module subroutine util_coord_b2h_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object end subroutine util_coord_b2h_tp module subroutine util_coord_h2b_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_h2b_pl module subroutine util_coord_h2b_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object end subroutine util_coord_h2b_tp module subroutine util_coord_vb2vh_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_vb2vh_pl module subroutine util_coord_vb2vh_tp ( self , vbcb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body end subroutine util_coord_vb2vh_tp module subroutine util_coord_vh2vb_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_vh2vb_pl module subroutine util_coord_vh2vb_tp ( self , vbcb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body end subroutine util_coord_vh2vb_tp module subroutine util_coord_xh2xb_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_xh2xb_pl module subroutine util_coord_xh2xb_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object end subroutine util_coord_xh2xb_tp module subroutine util_copy_encounter ( self , source ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into end subroutine util_copy_encounter module subroutine util_copy_particle_info ( self , source ) implicit none class ( swiftest_particle_info ), intent ( inout ) :: self class ( swiftest_particle_info ), intent ( in ) :: source end subroutine util_copy_particle_info module subroutine util_copy_particle_info_arr ( source , dest , idx ) implicit none class ( swiftest_particle_info ), dimension (:), intent ( in ) :: source !! Source object to copy into class ( swiftest_particle_info ), dimension (:), intent ( inout ) :: dest !! Swiftest body object with particle metadata information object integer ( I4B ), dimension (:), intent ( in ), optional :: idx !! Optional array of indices to draw the source object end subroutine util_copy_particle_info_arr module subroutine util_exit ( code ) implicit none integer ( I4B ), intent ( in ) :: code !! Failure exit code end subroutine util_exit module subroutine util_fill_body ( self , inserts , lfill_list ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_body module subroutine util_fill_pl ( self , inserts , lfill_list ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_pl module subroutine util_fill_tp ( self , inserts , lfill_list ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_tp end interface interface util_fill module subroutine util_fill_arr_char_string ( keeps , inserts , lfill_list ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_char_string module subroutine util_fill_arr_DP ( keeps , inserts , lfill_list ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_DP module subroutine util_fill_arr_DPvec ( keeps , inserts , lfill_list ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_DPvec module subroutine util_fill_arr_I4B ( keeps , inserts , lfill_list ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_I4B module subroutine util_fill_arr_info ( keeps , inserts , lfill_list ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_info module subroutine util_fill_arr_logical ( keeps , inserts , lfill_list ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_logical end interface interface module subroutine util_rescale_system ( self , param , mscale , dscale , tscale ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters. Returns with new values of the scale vactors and GU real ( DP ), intent ( in ) :: mscale , dscale , tscale !! Scale factors for mass, distance, and time units, respectively. end subroutine util_rescale_system module function util_minimize_bfgs ( f , N , x0 , eps , maxloop , lerr ) result ( x1 ) use lambda_function implicit none integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 real ( DP ), intent ( in ) :: eps logical , intent ( out ) :: lerr integer ( I4B ), intent ( in ) :: maxloop real ( DP ), dimension (:), allocatable :: x1 end function util_minimize_bfgs module subroutine util_peri_tp ( self , system , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine util_peri_tp end interface interface util_resize module subroutine util_resize_arr_char_string ( arr , nnew ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_char_string module subroutine util_resize_arr_DP ( arr , nnew ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_DP module subroutine util_resize_arr_DPvec ( arr , nnew ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_DPvec module subroutine util_resize_arr_I4B ( arr , nnew ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_I4B module subroutine util_resize_arr_info ( arr , nnew ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_info module subroutine util_resize_arr_logical ( arr , nnew ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_logical end interface interface module subroutine util_resize_body ( self , nnew ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine util_resize_body module subroutine util_resize_encounter ( self , nnew ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list integer ( I4B ), intent ( in ) :: nnew !! New size of list needed end subroutine util_resize_encounter module subroutine util_resize_pl ( self , nnew ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine util_resize_pl module subroutine util_resize_tp ( self , nnew ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine util_resize_tp module subroutine util_get_energy_momentum_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine util_get_energy_momentum_system module subroutine util_set_beg_end_pl ( self , xbeg , xend , vbeg ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object real ( DP ), dimension (:,:), intent ( in ), optional :: xbeg !! Position vectors at beginning of step real ( DP ), dimension (:,:), intent ( in ), optional :: xend !! Positions vectors at end of step real ( DP ), dimension (:,:), intent ( in ), optional :: vbeg !! vbeg is an unused variable to keep this method forward compatible with RMVS end subroutine util_set_beg_end_pl module subroutine util_set_ir3h ( self ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object end subroutine util_set_ir3h module subroutine util_set_msys ( self ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object end subroutine util_set_msys module subroutine util_set_mu_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_mu_pl module subroutine util_set_mu_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_mu_tp module subroutine util_set_particle_info ( self , name , particle_type , status , origin_type , origin_time , origin_xh , origin_vh , discard_time , discard_xh , discard_vh , discard_body_id ) implicit none class ( swiftest_particle_info ), intent ( inout ) :: self character ( len =* ), intent ( in ), optional :: name !! Non-unique name character ( len =* ), intent ( in ), optional :: particle_type !! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character ( len =* ), intent ( in ), optional :: status !! Particle status description: Active, Merged, Fragmented, etc. character ( len =* ), intent ( in ), optional :: origin_type !! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real ( DP ), intent ( in ), optional :: origin_time !! The time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_xh !! The heliocentric distance vector at the time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_vh !! The heliocentric velocity vector at the time of the particle's formation real ( DP ), intent ( in ), optional :: discard_time !! The time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_xh !! The heliocentric distance vector at the time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_vh !! The heliocentric velocity vector at the time of the particle's discard integer ( I4B ), intent ( in ), optional :: discard_body_id !! The id of the other body involved in the discard (0 if no other body involved) end subroutine util_set_particle_info module subroutine util_set_rhill ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_rhill module subroutine util_set_rhill_approximate ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_rhill_approximate end interface interface util_solve_linear_system module function util_solve_linear_system_d ( A , b , n , lerr ) result ( x ) implicit none integer ( I4B ), intent ( in ) :: n real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr real ( DP ), dimension ( n ) :: x end function util_solve_linear_system_d module function util_solve_linear_system_q ( A , b , n , lerr ) result ( x ) implicit none integer ( I4B ), intent ( in ) :: n real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr real ( QP ), dimension ( n ) :: x end function util_solve_linear_system_q end interface interface module function util_solve_rkf45 ( f , y0in , t1 , dt0 , tol ) result ( y1 ) use lambda_function implicit none class ( lambda_obj ), intent ( inout ) :: f !! lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real ( DP ), dimension (:), intent ( in ) :: y0in !! Initial value at t=0 real ( DP ), intent ( in ) :: t1 !! Final time real ( DP ), intent ( in ) :: dt0 !! Initial step size guess real ( DP ), intent ( in ) :: tol !! Tolerance on solution real ( DP ), dimension (:), allocatable :: y1 !! Final result end function util_solve_rkf45 end interface interface util_sort module subroutine util_sort_i4b ( arr ) implicit none integer ( I4B ), dimension (:), intent ( inout ) :: arr end subroutine util_sort_i4b module subroutine util_sort_index_i4b ( arr , ind ) implicit none integer ( I4B ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind end subroutine util_sort_index_i4b module subroutine util_sort_sp ( arr ) implicit none real ( SP ), dimension (:), intent ( inout ) :: arr end subroutine util_sort_sp module subroutine util_sort_index_sp ( arr , ind ) implicit none real ( SP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind end subroutine util_sort_index_sp module subroutine util_sort_dp ( arr ) implicit none real ( DP ), dimension (:), intent ( inout ) :: arr end subroutine util_sort_dp module subroutine util_sort_index_dp ( arr , ind ) implicit none real ( DP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind end subroutine util_sort_index_dp end interface util_sort interface util_sort_rearrange module subroutine util_sort_rearrange_arr_char_string ( arr , ind , n ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_char_string module subroutine util_sort_rearrange_arr_DP ( arr , ind , n ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_DP module subroutine util_sort_rearrange_arr_DPvec ( arr , ind , n ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_DPvec module subroutine util_sort_rearrange_arr_I4B ( arr , ind , n ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_I4B module subroutine util_sort_rearrange_arr_info ( arr , ind , n ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_info module subroutine util_sort_rearrange_arr_logical ( arr , ind , n ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_logical end interface util_sort_rearrange interface module subroutine util_sort_rearrange_body ( self , ind ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine util_sort_rearrange_body module subroutine util_sort_rearrange_pl ( self , ind ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine util_sort_rearrange_pl module subroutine util_sort_rearrange_tp ( self , ind ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine util_sort_rearrange_tp module subroutine util_sort_body ( self , sortby , ascending ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine util_sort_body module subroutine util_sort_pl ( self , sortby , ascending ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine util_sort_pl module subroutine util_sort_tp ( self , sortby , ascending ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine util_sort_tp end interface interface util_spill module subroutine util_spill_arr_char_string ( keeps , discards , lspill_list , ldestructive ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_char_string module subroutine util_spill_arr_DP ( keeps , discards , lspill_list , ldestructive ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_DP module subroutine util_spill_arr_DPvec ( keeps , discards , lspill_list , ldestructive ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: discards !! Array discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_DPvec module subroutine util_spill_arr_I4B ( keeps , discards , lspill_list , ldestructive ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_I4B module subroutine util_spill_arr_I8B ( keeps , discards , lspill_list , ldestructive ) implicit none integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_I8B module subroutine util_spill_arr_info ( keeps , discards , lspill_list , ldestructive ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_info module subroutine util_spill_arr_logical ( keeps , discards , lspill_list , ldestructive ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_logical end interface interface module subroutine util_spill_body ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_body module subroutine util_spill_encounter ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list end subroutine util_spill_encounter module subroutine util_spill_pl ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_pl module subroutine util_spill_tp ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_tp module subroutine util_valid_id_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine util_valid_id_system module subroutine util_version () implicit none end subroutine util_version end interface end module swiftest_classes","tags":"","loc":"sourcefile/swiftest_classes.f90.html"},{"title":"lambda_function.f90 – swiftest","text":"This file depends on sourcefile~~lambda_function.f90~~EfferentGraph sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~lambda_function.f90~~AfferentGraph sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules lambda_function Source Code lambda_function.f90 Source Code module lambda_function !! author: David A. Minton !! !! Defines a class that can enable objects that behave like lambda functions. !! !! To use this class, define a type of either lambda_obj or lambda_obj_err, or extend the lambda_obj class as necessary, such that an interface that matches the function you wish to lambdafy. !! Once defined, the lambda object can evaluate itself by calling the type-bound procedure eval. e.g. f%eval(x) (or f%eval(x, lerr), f%eval(x, [argument list], etc)) !! !! ******************************************************************************************************************************************************************************************** !! Example - Defining a lambda function f(x,rval,ival) where rval and ival are a real and integer argument, respectively. This implementation uses an abstract interface, though this is not !! strictly necessary unless you want to bind more than one function with the same interface. !! ******************************************************************************************************************************************************************************************** !! !! module lambda_new !!    use swiftest ! This will bring in the lambda_function module !!    ! Define types in a module !! !!    type, extends(lambda_obj) :: lambda_obj_ri_args !!       procedure(abstract_lambda_ri_args), pointer, nopass :: lambdaptr_ri_args => null() !!       real(DP)                                            :: rval     !! Real parameter !!       integer(I4B)                                        :: ival     !! Integer paramete !!    contains !!       generic           :: init => lambda_ri_args_init !!       procedure         :: eval => lambda_ri_args_eval !!       procedure, nopass :: lambda_ri_args_init !!       final             :: lambda_ri_args_destroy !!    end type !!    interface lambda_obj !!       module procedure lambda_ri_args_init !!    end interface !! !!    abstract interface !!       function abstract_lambda_ri_args(x, rval, ival) result(y) !!          !Template for the lambda function !!          import DP, I4B !!          real(DP), dimension(:), intent(in) :: x        !! Dependent variable !!          real(DP),               intent(in) :: rval     !! Real parameter !!          integer(I4B),           intent(in) :: ival     !! Integer parameter !!          real(DP)                           :: y        !! Real result !!       end function !!    end interface !! !! contains !!    type(lambda_obj_ri_args) function lambda_ri_args_init(lambda, rval, ival) !!       !! Initializes the lambda function parameters (can be used as a structure constructor) !!       implicit none !!       procedure(abstract_lambda_ri_args)  :: lambda !! The lambda function that will be passed !!       real(DP),     intent(in)            :: rval     !! Real parameter !!       integer(I4B), intent(in)            :: ival     !! Integer parameter !! !!       ! Assign the procedure passed to this function to the procedure pointer !!       lambda_ri_args_init%lambdaptr_ri_args => lambda !! !!       ! Assign the argument values !!       lambda_ri_args_init%rval = rval !!       lambda_ri_args_init%ival = ival !!       return !!    end function lambda_ri_args_init !! !!    function lambda_ri_args_eval(self, x) result(y) !!       !! Defines the evaluation method, allowing the lambda function to be called with a single argument !!       implicit none !!       class(lambda_obj_ri_args),      intent(inout) :: self !!       real(DP), dimension(:),         intent(in) :: x !!       real(DP)                                   :: y !! !!      if (associated(self%lambdaptr_ri_args)) then !!         y = self%lambdaptr_ri_args(x, self%rval, self%ival) !!          self%lastval = y !!          if (allocated(self%lastarg)) deallocate(self%lastarg) !!          allocate(self%lastarg, source=x) !!       else !!          error stop \"Lambda function was not initialized\" !!       end if !!    end function lambda_ri_args_eval !! !!    subroutine lambda_ri_args_destroy(self) !!       !! Finalizer method. Use this as a template for cleaning up the object upon destruction, such as nullifying pointers !!       implicit none !!       type(lambda_obj_ri_args) :: self !!       if (associated(self%lambdaptr_ri_args)) nullify(self%lambdaptr_ri_args) !!    end subroutine lambda_ri_args_destroy !! !!    function example_function(x, rval, ival) result(y) !!       !This is the actual function you are going to use as the lambda function. Its interface must match the abstract interface previously defined !!       implicit none !!       ! Arguments !!       real(DP), dimension(:), intent(in) :: x !!       real(DP),               intent(in) :: rval !!       integer(I4B),           intent(in) :: ival !!       ! Result !!       real(DP)                           :: y !!       ! Internals !!       integer(I4B) :: i, n !!       n = size(x) !!       y = 42._DP * ival !!       do i = 1, n !!          y = y + x(i)**2 !!       end do !!       return !!    end function example_function !! end module lambda_new !! !! program usage !!    use swiftest !!    use lambda_new !!    implicit none !!    type(lambda_obj_ri_args) :: f !!    real(DP) :: sigma_par !!    integer(I4B) :: iwonky, i,j !!    real(DP), dimension(12) :: xarr !! !!    sigma_par = 3.14_DP !!    iwonky = 13 !! !!    f = lambda_obj(example_function, sigma_par, iwonky) !!    do i = 1, 10 !!       xarr(:) = [(j * 0.25_DP / i, j=1, 12)] !!       write(*,*) i,f%eval(xarr) !!    end do !! end program usage !! ******************************************************************************************************************************************************************************************** use swiftest_globals implicit none public type :: lambda_obj !! Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers procedure ( lambda0 ), pointer , nopass :: lambdaptr => null () real ( DP ) :: lastval real ( DP ), dimension (:), allocatable :: lastarg contains generic :: init => lambda_init_0 procedure :: eval => lambda_eval_0 procedure , nopass :: lambda_init_0 final :: lambda_destroy end type type , extends ( lambda_obj ) :: lambda_obj_err !! Extended class for an lambda function object. This object takes allows for the return of a logical error flag during evaluation of the function. procedure ( lambda0err ), pointer , nopass :: lambdaptr_err => null () logical :: lerr contains generic :: init => lambda_init_0_err procedure :: eval => lambda_eval_0_err procedure , nopass :: lambda_init_0_err end type type , extends ( lambda_obj ) :: lambda_obj_tvar !! Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers procedure ( lambda0tvar ), pointer , nopass :: lambdaptr_tvar => null () contains generic :: init => lambda_init_tvar procedure :: evalt => lambda_eval_tvar procedure , nopass :: lambda_init_tvar end type interface lambda_obj module procedure lambda_init_0 module procedure lambda_init_0_err module procedure lambda_init_tvar end interface abstract interface function lambda0 ( x ) result ( y ) ! Template for a 0 argument function import DP real ( DP ), dimension (:), intent ( in ) :: x real ( DP ) :: y end function function lambda0err ( x , lerr ) result ( y ) ! Template for a 0 argument function that returns an error value import DP real ( DP ), dimension (:), intent ( in ) :: x logical , intent ( out ) :: lerr real ( DP ) :: y end function function lambda0tvar ( x , t ) result ( y ) ! Template for a 0 argument function that returns an error value import DP real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t real ( DP ), dimension (:), allocatable :: y end function end interface contains type ( lambda_obj ) function lambda_init_0 ( lambda ) implicit none ! Arguments procedure ( lambda0 ) :: lambda lambda_init_0 % lambdaptr => lambda return end function lambda_init_0 type ( lambda_obj_err ) function lambda_init_0_err ( lambda , lerr ) implicit none ! Arguments procedure ( lambda0err ) :: lambda logical , intent ( in ) :: lerr lambda_init_0_err % lambdaptr_err => lambda lambda_init_0_err % lerr = lerr return end function lambda_init_0_err type ( lambda_obj_tvar ) function lambda_init_tvar ( lambda , t ) implicit none ! Arguments procedure ( lambda0tvar ) :: lambda real ( DP ), intent ( in ) :: t lambda_init_tvar % lambdaptr_tvar => lambda return end function lambda_init_tvar function lambda_eval_0 ( self , x ) result ( y ) implicit none ! Arguments class ( lambda_obj ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x ! Result real ( DP ) :: y if ( associated ( self % lambdaptr )) then y = self % lambdaptr ( x ) self % lastval = y if ( allocated ( self % lastarg )) deallocate ( self % lastarg ) allocate ( self % lastarg , source = x ) else error stop \"Lambda function was not initialized\" end if end function lambda_eval_0 function lambda_eval_0_err ( self , x ) result ( y ) implicit none ! Arguments class ( lambda_obj_err ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x ! Result real ( DP ) :: y if ( associated ( self % lambdaptr_err )) then y = self % lambdaptr_err ( x , self % lerr ) self % lastval = y if ( allocated ( self % lastarg )) deallocate ( self % lastarg ) allocate ( self % lastarg , source = x ) else error stop \"Lambda function was not initialized\" end if end function lambda_eval_0_err function lambda_eval_tvar ( self , x , t ) result ( y ) implicit none ! Arguments class ( lambda_obj_tvar ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t ! Result real ( DP ), dimension (:), allocatable :: y if ( associated ( self % lambdaptr_tvar )) then y = self % lambdaptr_tvar ( x , t ) else error stop \"Lambda function was not initialized\" end if end function lambda_eval_tvar subroutine lambda_destroy ( self ) implicit none type ( lambda_obj ) :: self if ( associated ( self % lambdaptr )) nullify ( self % lambdaptr ) end subroutine lambda_destroy end module lambda_function","tags":"","loc":"sourcefile/lambda_function.f90.html"},{"title":"fraggle_util.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_util.f90~~EfferentGraph sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_util Source Code fraggle_util.f90 Source Code submodule ( fraggle_classes ) s_fraggle_util use swiftest contains module subroutine fraggle_util_add_fragments_to_system ( frag , colliders , system , param ) !! Author: David A. Minton !! !! Adds fragments to the temporary system pl object implicit none ! Arguments class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters ! Internals integer ( I4B ) :: i , npl_before , npl_after logical , dimension (:), allocatable :: lexclude associate ( nfrag => frag % nbody , pl => system % pl , cb => system % cb ) npl_after = pl % nbody npl_before = npl_after - nfrag allocate ( lexclude ( npl_after )) pl % status ( npl_before + 1 : npl_after ) = ACTIVE pl % mass ( npl_before + 1 : npl_after ) = frag % mass ( 1 : nfrag ) pl % Gmass ( npl_before + 1 : npl_after ) = frag % mass ( 1 : nfrag ) * param % GU pl % radius ( npl_before + 1 : npl_after ) = frag % radius ( 1 : nfrag ) do concurrent ( i = 1 : nfrag ) pl % xb (:, npl_before + i ) = frag % xb (:, i ) pl % vb (:, npl_before + i ) = frag % vb (:, i ) pl % xh (:, npl_before + i ) = frag % xb (:, i ) - cb % xb (:) pl % vh (:, npl_before + i ) = frag % vb (:, i ) - cb % vb (:) end do if ( param % lrotation ) then pl % Ip (:, npl_before + 1 : npl_after ) = frag % Ip (:, 1 : nfrag ) pl % rot (:, npl_before + 1 : npl_after ) = frag % rot (:, 1 : nfrag ) end if ! This will remove the colliders from the system since we've replaced them with fragments lexclude ( 1 : npl_after ) = . false . lexclude ( colliders % idx ( 1 : colliders % ncoll )) = . true . where ( lexclude ( 1 : npl_after )) pl % status ( 1 : npl_after ) = INACTIVE elsewhere pl % status ( 1 : npl_after ) = ACTIVE endwhere end associate return end subroutine fraggle_util_add_fragments_to_system module subroutine fraggle_util_ang_mtm ( self ) !! Author: David A. Minton !! !! Calcualtes the current angular momentum of the fragments implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object ! Internals integer ( I4B ) :: i associate ( frag => self , nfrag => self % nbody ) frag % L_orbit (:) = 0.0_DP frag % L_spin (:) = 0.0_DP do i = 1 , nfrag frag % L_orbit (:) = frag % L_orbit (:) + frag % mass ( i ) * ( frag % x_coll (:, i ) . cross . frag % v_coll (:, i )) frag % L_spin (:) = frag % L_spin (:) + frag % mass ( i ) * frag % radius ( i ) ** 2 * frag % Ip (:, i ) * frag % rot (:, i ) end do end associate return end subroutine fraggle_util_ang_mtm module subroutine fraggle_util_construct_temporary_system ( frag , system , param , tmpsys , tmpparam ) !! Author: David A. Minton !! !! Constructs a temporary internal system consisting of active bodies and additional fragments. This internal temporary system is used to calculate system energy with and without fragments !! and optionally including fragments. implicit none ! Arguments class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Original swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters class ( swiftest_nbody_system ), allocatable , intent ( out ) :: tmpsys !! Output temporary swiftest nbody system object class ( swiftest_parameters ), allocatable , intent ( out ) :: tmpparam !! Output temporary configuration run parameters ! Internals logical , dimension (:), allocatable :: linclude integer ( I4B ) :: npl_tot associate ( nfrag => frag % nbody , pl => system % pl , npl => system % pl % nbody , cb => system % cb ) ! Set up a new system based on the original if ( allocated ( tmpparam )) deallocate ( tmpparam ) if ( allocated ( tmpsys )) deallocate ( tmpsys ) allocate ( tmpparam , source = param ) call setup_construct_system ( tmpsys , tmpparam ) ! No test particles necessary for energy/momentum calcs call tmpsys % tp % setup ( 0 , param ) ! Replace the empty central body object with a copy of the original deallocate ( tmpsys % cb ) allocate ( tmpsys % cb , source = cb ) ! Make space for the fragments npl_tot = npl + nfrag call tmpsys % pl % setup ( npl_tot , tmpparam ) allocate ( linclude ( npl_tot )) ! Fill up the temporary system with all of the original bodies, leaving the spaces for fragments empty until we add them in later linclude ( 1 : npl ) = . true . linclude ( npl + 1 : npl_tot ) = . false . call tmpsys % pl % fill ( pl , linclude ) ! Scale the temporary system to the natural units of the current Fraggle calculation call tmpsys % rescale ( tmpparam , frag % mscale , frag % dscale , frag % tscale ) end associate return end subroutine fraggle_util_construct_temporary_system module subroutine fraggle_util_get_energy_momentum ( self , colliders , system , param , lbefore ) !! Author: David A. Minton !! !! Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) !! This subrourtine works by building a temporary internal massive body object out of the non-excluded bodies and optionally with fragments appended. !! This will get passed to the energy calculation subroutine so that energy is computed exactly the same way is it is in the main program. !! This will temporarily expand the massive body object in a temporary system object called tmpsys to feed it into symba_energy implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters logical , intent ( in ) :: lbefore !! Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa ! Internals integer ( I4B ) :: i , nplm logical , dimension (:), allocatable :: lexclude logical :: lk_plpl logical , save :: ladd_frags class ( swiftest_nbody_system ), allocatable , save :: tmpsys class ( swiftest_parameters ), allocatable , save :: tmpparam integer ( I4B ) :: npl_before , npl_after associate ( frag => self , nfrag => self % nbody , pl => system % pl , cb => system % cb ) ! Because we're making a copy of the massive body object with the excludes/fragments appended, we need to deallocate the ! big k_plpl array and recreate it when we're done, otherwise we run the risk of blowing up the memory by ! allocating two of these ginormous arrays simulteouously. This is not particularly efficient, but as this ! subroutine should be called relatively infrequently, it shouldn't matter too much. npl_before = pl % nbody npl_after = npl_before + nfrag ! Build the exluded body logical mask allocate ( lexclude ( npl_after )) if ( lbefore ) then lexclude ( 1 : npl_before ) = . false . lexclude ( npl_before + 1 : npl_after ) = . true . call fraggle_util_construct_temporary_system ( frag , system , param , tmpsys , tmpparam ) else lexclude ( 1 : npl_after ) = . false . lexclude ( colliders % idx ( 1 : colliders % ncoll )) = . true . if (. not . allocated ( tmpsys )) then write ( * , * ) \"Error in fraggle_util_get_energy_momentum. This must be called with lbefore=.true. at least once before calling it with lbefore=.false.\" call util_exit ( FAILURE ) end if call fraggle_util_add_fragments_to_system ( frag , colliders , tmpsys , tmpparam ) end if call tmpsys % pl % index ( param ) call tmpsys % get_energy_and_momentum ( param ) ! Calculate the current fragment energy and momentum balances if ( lbefore ) then frag % Lorbit_before (:) = tmpsys % Lorbit (:) frag % Lspin_before (:) = tmpsys % Lspin (:) frag % Ltot_before (:) = tmpsys % Ltot (:) frag % ke_orbit_before = tmpsys % ke_orbit frag % ke_spin_before = tmpsys % ke_spin frag % pe_before = tmpsys % pe frag % Etot_before = tmpsys % te else frag % Lorbit_after (:) = tmpsys % Lorbit (:) frag % Lspin_after (:) = tmpsys % Lspin (:) frag % Ltot_after (:) = tmpsys % Ltot (:) frag % ke_orbit_after = tmpsys % ke_orbit frag % ke_spin_after = tmpsys % ke_spin frag % pe_after = tmpsys % pe frag % Etot_after = tmpsys % te end if end associate return end subroutine fraggle_util_get_energy_momentum module subroutine fraggle_util_restructure ( self , colliders , try , f_spin , r_max_start ) !! Author: David A. Minton !! !! Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object integer ( I4B ), intent ( in ) :: try !! The current number of times Fraggle has tried to find a solution real ( DP ), intent ( inout ) :: f_spin !! Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real ( DP ), intent ( inout ) :: r_max_start !! The maximum radial distance that the position calculation starts with. This increases after a failed attempt ! Internals integer ( I4B ) :: i real ( DP ), save :: ke_tot_deficit , r_max_start_old , ke_avg_deficit_old real ( DP ), dimension (:), allocatable :: m_frag_new , rad_frag_new real ( DP ), dimension (:,:), allocatable :: xb_frag_new , vb_frag_new , Ip_frag_new , rot_frag_new real ( DP ) :: delta_r , delta_r_max , ke_avg_deficit real ( DP ), parameter :: ke_avg_deficit_target = 0.0_DP ! Introduce a bit of noise in the radius determination so we don't just flip flop between similar failed positions associate ( frag => self ) call random_number ( delta_r_max ) delta_r_max = sum ( colliders % radius (:)) * ( 1.0_DP + 2e-1_DP * ( delta_r_max - 0.5_DP )) if ( try == 1 ) then ke_tot_deficit = - ( frag % ke_budget - frag % ke_orbit - frag % ke_spin ) ke_avg_deficit = ke_tot_deficit delta_r = delta_r_max else ! Linearly interpolate the last two failed solution ke deficits to find a new distance value to try ke_tot_deficit = ke_tot_deficit - ( frag % ke_budget - frag % ke_orbit - frag % ke_spin ) ke_avg_deficit = ke_tot_deficit / try delta_r = ( r_max_start - r_max_start_old ) * ( ke_avg_deficit_target - ke_avg_deficit_old ) / ( ke_avg_deficit - ke_avg_deficit_old ) if ( abs ( delta_r ) > delta_r_max ) delta_r = sign ( delta_r_max , delta_r ) end if r_max_start_old = r_max_start r_max_start = r_max_start + delta_r ! The larger lever arm can help if the problem is in the angular momentum step ke_avg_deficit_old = ke_avg_deficit if ( f_spin > epsilon ( 1.0_DP )) then ! Try reducing the fraction in spin f_spin = f_spin / 2 else f_spin = 0.0_DP end if end associate return end subroutine fraggle_util_restructure module subroutine fraggle_util_shift_vector_to_origin ( m_frag , vec_frag ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Adjusts the position or velocity of the fragments as needed to align them with the origin implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:,:), intent ( inout ) :: vec_frag !! Fragment positions or velocities in the center of mass frame ! Internals real ( DP ), dimension ( NDIM ) :: mvec_frag , COM_offset integer ( I4B ) :: i , nfrag real ( DP ) :: mtot mvec_frag (:) = 0.0_DP mtot = sum ( m_frag ) nfrag = size ( m_frag ) do i = 1 , nfrag mvec_frag = mvec_frag (:) + vec_frag (:, i ) * m_frag ( i ) end do COM_offset (:) = - mvec_frag (:) / mtot do i = 1 , nfrag vec_frag (:, i ) = vec_frag (:, i ) + COM_offset (:) end do return end subroutine fraggle_util_shift_vector_to_origin module function fraggle_util_vmag_to_vb ( v_r_mag , v_r_unit , v_t_mag , v_t_unit , m_frag , vcom ) result ( vb ) !! Author: David A. Minton !! !! Converts radial and tangential velocity magnitudes into barycentric velocity implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: v_r_mag !! Unknown radial component of fragment velocity vector real ( DP ), dimension (:), intent ( in ) :: v_t_mag !! Tangential component of velocity vector set previously by angular momentum constraint real ( DP ), dimension (:,:), intent ( in ) :: v_r_unit , v_t_unit !! Radial and tangential unit vectors for each fragment real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:), intent ( in ) :: vcom !! Barycentric velocity of collisional system center of mass ! Result real ( DP ), dimension (:,:), allocatable :: vb ! Internals integer ( I4B ) :: i , nfrag allocate ( vb , mold = v_r_unit ) ! Make sure the velocity magnitude stays positive nfrag = size ( m_frag ) do i = 1 , nfrag vb (:, i ) = abs ( v_r_mag ( i )) * v_r_unit (:, i ) end do ! In order to keep satisfying the kinetic energy constraint, we must shift the origin of the radial component of the velocities to the center of mass call fraggle_util_shift_vector_to_origin ( m_frag , vb ) do i = 1 , nfrag vb (:, i ) = vb (:, i ) + v_t_mag ( i ) * v_t_unit (:, i ) + vcom (:) end do return end function fraggle_util_vmag_to_vb end submodule s_fraggle_util","tags":"","loc":"sourcefile/fraggle_util.f90.html"},{"title":"fraggle_io.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_io.f90~~EfferentGraph sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_io Source Code fraggle_io.f90 Source Code submodule ( fraggle_classes ) s_fraggle_io use swiftest contains module subroutine fraggle_io_log_generate ( frag ) !! author: David A. Minton !! !! Writes a log of the results of the fragment generation implicit none ! Arguments class ( fraggle_fragments ), intent ( in ) :: frag ! Internals integer ( I4B ) :: i character ( STRMAX ) :: errmsg character ( len =* ), parameter :: fmtlabel = \"(A14,10(ES11.4,1X,:))\" open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"           Fraggle fragment generation results\" write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , \"(' dL_tot should be very small' )\" ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' dL_tot      |' , (. mag .( frag % Ltot_after (:) - frag % Ltot_before (:))) / (. mag . frag % Ltot_before (:)) write ( FRAGGLE_LOG_UNIT , \"(' dE_tot should be negative and equal to Qloss' )\" ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' dE_tot      |' , ( frag % Etot_after - frag % Etot_before ) / abs ( frag % Etot_before ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' Qloss       |' , - frag % Qloss / abs ( frag % Etot_before ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' dE - Qloss  |' , ( frag % Etot_after - frag % Etot_before + frag % Qloss ) / abs ( frag % Etot_before ) write ( FRAGGLE_LOG_UNIT , \"(' -------------------------------------------------------------------------------------')\" ) write ( FRAGGLE_LOG_UNIT , * ) \"Individual fragment values (collisional system natural units)\" write ( FRAGGLE_LOG_UNIT , * ) \"mass\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % mass ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"x_coll\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % x_coll (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"v_coll\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % v_coll (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"xb\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % xb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"vb\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % vb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"rot\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % rot (:, i ) end do close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle message to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_generate module subroutine fraggle_io_log_one_message ( message ) !! author: David A. Minton !! !! Writes a single message to the fraggle log file implicit none ! Arguments character ( len =* ), intent ( in ) :: message ! Internals character ( STRMAX ) :: errmsg open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) trim ( adjustl ( message )) close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle message to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_one_message module subroutine fraggle_io_log_pl ( pl , param ) !! author: David A. Minton !! !! Writes a single message to the fraggle log file implicit none ! Arguments class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object (only the new bodies generated in a collision) class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters ! Internals integer ( I4B ) :: i character ( STRMAX ) :: errmsg open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"           Fraggle fragment final body properties\" write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"id, name\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % id ( i ), pl % info ( i )% name end do write ( FRAGGLE_LOG_UNIT , * ) \"mass, Gmass\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % mass ( i ), pl % Gmass ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"radius\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % radius ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"xb\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % xb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"vb\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % vb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"xh\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % xh (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"vh\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % vh (:, i ) end do if ( param % lrotation ) then write ( FRAGGLE_LOG_UNIT , * ) \"rot\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % rot (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"Ip\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % Ip (:, i ) end do end if if ( param % ltides ) then write ( FRAGGLE_LOG_UNIT , * ) \"Q\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % Q ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"k2\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % k2 ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"tlag\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % tlag ( i ) end do end if close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle message to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_pl module subroutine fraggle_io_log_regime ( colliders , frag ) !! author: David A. Minton !! !! Writes a log of the results of the collisional regime determination implicit none ! Arguments class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment object ! Internals character ( STRMAX ) :: errmsg open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"           Fraggle collisional regime determination results\" write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"----------------------- Collider information -----------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"True number of colliders : \" , colliders % ncoll write ( FRAGGLE_LOG_UNIT , * ) \"Index list of true colliders  : \" , colliders % idx ( 1 : colliders % ncoll ) write ( FRAGGLE_LOG_UNIT , * ) \"-------------------- Two-body equialent values ---------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"mass1    : \" , colliders % mass ( 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"radius1  : \" , colliders % radius ( 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"xb1      : \" , colliders % xb (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"vb1      : \" , colliders % vb (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"rot1     : \" , colliders % rot (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"Ip1      : \" , colliders % Ip (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_spin1  : \" , colliders % L_spin (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_orbit1 : \" , colliders % L_orbit (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"mass2    : \" , colliders % mass ( 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"radius2  : \" , colliders % radius ( 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"xb2      : \" , colliders % xb (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"vb2      : \" , colliders % vb (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"rot2     : \" , colliders % rot (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"Ip2      : \" , colliders % Ip (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_spin2  : \" , colliders % L_spin (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_orbit2 : \" , colliders % L_orbit (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"------------------------------ Regime -----------------------------\" select case ( frag % regime ) case ( COLLRESOLVE_REGIME_MERGE ) write ( FRAGGLE_LOG_UNIT , * ) \"Merge\" case ( COLLRESOLVE_REGIME_DISRUPTION ) write ( FRAGGLE_LOG_UNIT , * ) \"Disruption\" case ( COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) write ( FRAGGLE_LOG_UNIT , * ) \"Supercatastrophic disruption\" case ( COLLRESOLVE_REGIME_GRAZE_AND_MERGE ) write ( FRAGGLE_LOG_UNIT , * ) \"Graze and merge\" case ( COLLRESOLVE_REGIME_HIT_AND_RUN ) write ( FRAGGLE_LOG_UNIT , * ) \"Hit and run\" end select write ( FRAGGLE_LOG_UNIT , * ) \"----------------------- Fragment information ----------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"Total mass of fragments      : \" , frag % mtot write ( FRAGGLE_LOG_UNIT , * ) \"Largest fragment mass        : \" , frag % mass_dist ( 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"Second-largest fragment mass : \" , frag % mass_dist ( 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"Remaining fragment mass      : \" , frag % mass_dist ( 3 ) write ( FRAGGLE_LOG_UNIT , * ) \"Center of mass position      : \" , frag % xbcom (:) write ( FRAGGLE_LOG_UNIT , * ) \"Center of mass velocity      : \" , frag % vbcom (:) write ( FRAGGLE_LOG_UNIT , * ) \"Energy loss                  : \" , frag % Qloss write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle regime information to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_regime module subroutine fraggle_io_log_start ( param ) !! author: David A. Minton !! !! Checks to see if the Fraggle log file needs to be replaced if this is a new run, or appended if this is a restarted run implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param ! Internals character ( STRMAX ) :: errmsg logical :: fileExists inquire ( file = FRAGGLE_LOG_OUT , exist = fileExists ) if (. not . param % lrestart . or . . not . fileExists ) then open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = \"REPLACE\" , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) \"Fraggle logfile\" end if close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_start end submodule s_fraggle_io","tags":"","loc":"sourcefile/fraggle_io.f90.html"},{"title":"fraggle_generate.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_generate.f90~~EfferentGraph sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_generate Source Code fraggle_generate.f90 Source Code submodule ( fraggle_classes ) s_fraggle_generate use swiftest integer ( I4B ), parameter :: NFRAG_MIN = 7 !! The minimum allowable number of fragments (set to 6 because that's how many unknowns are needed in the tangential velocity calculation) real ( DP ), parameter :: F_SPIN_FIRST = 0.05_DP !! The initial try value of the fraction of energy or momenum in spin (whichever has the lowest kinetic energy) real ( DP ), parameter :: FRAGGLE_LTOL = 10 * epsilon ( 1.0_DP ) real ( DP ), parameter :: FRAGGLE_ETOL = 1e-8_DP contains module subroutine fraggle_generate_fragments ( self , colliders , system , param , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Generates a system of fragments in barycentric coordinates that conserves energy and momentum. use , intrinsic :: ieee_exceptions implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle system object the outputs will be the fragmentation class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object containing the two-body equivalent values of the colliding bodies class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters logical , intent ( out ) :: lfailure !! Answers the question: Should this have been a merger instead? ! Internals integer ( I4B ) :: i integer ( I4B ) :: try real ( DP ) :: r_max_start , f_spin , dEtot , dLmag integer ( I4B ), parameter :: MAXTRY = 100 logical :: lk_plpl logical , dimension ( size ( IEEE_ALL )) :: fpe_halting_modes , fpe_quiet_modes logical , dimension ( size ( IEEE_USUAL )) :: fpe_flag character ( len = STRMAX ) :: message ! The minimization and linear solvers can sometimes lead to floating point exceptions. Rather than halting the code entirely if this occurs, we ! can simply fail the attempt and try again. So we need to turn off any floating point exception halting modes temporarily call ieee_get_halting_mode ( IEEE_ALL , fpe_halting_modes ) ! Save the current halting modes so we can turn them off temporarily fpe_quiet_modes (:) = . false . call ieee_set_halting_mode ( IEEE_ALL , fpe_quiet_modes ) associate ( frag => self , nfrag => self % nbody , pl => system % pl ) write ( message , * ) nfrag call fraggle_io_log_one_message ( \"Fraggle generating \" // trim ( adjustl ( message )) // \" fragments.\" ) if ( nfrag < NFRAG_MIN ) then write ( message , * ) \"Fraggle needs at least \" , NFRAG_MIN , \" fragments, but only \" , nfrag , \" were given.\" call fraggle_io_log_one_message ( message ) lfailure = . true . return end if f_spin = F_SPIN_FIRST lk_plpl = allocated ( pl % k_plpl ) if ( lk_plpl ) deallocate ( pl % k_plpl ) call frag % set_natural_scale ( colliders ) call frag % reset () ! Calculate the initial energy of the system without the collisional family call frag % get_energy_and_momentum ( colliders , system , param , lbefore = . true .) ! Start out the fragments close to the initial separation distance. This will be increased if there is any overlap or we fail to find a solution r_max_start = 1 * norm2 ( colliders % xb (:, 2 ) - colliders % xb (:, 1 )) lfailure = . false . try = 1 do while ( try < MAXTRY ) write ( message , * ) try call fraggle_io_log_one_message ( \"Fraggle try \" // trim ( adjustl ( message ))) if ( lfailure ) then call frag % restructure ( colliders , try , f_spin , r_max_start ) call frag % reset () try = try + 1 end if lfailure = . false . call ieee_set_flag ( ieee_all , . false .) ! Set all fpe flags to quiet call fraggle_generate_pos_vec ( frag , colliders , r_max_start ) call frag % set_coordinate_system ( colliders ) ! Initial velocity guess will be the barycentric velocity of the colliding system so that the budgets are based on the much smaller collisional-frame velocities do concurrent ( i = 1 : nfrag ) frag % vb (:, i ) = frag % vbcom (:) end do call frag % get_energy_and_momentum ( colliders , system , param , lbefore = . false .) call frag % set_budgets ( colliders ) call fraggle_generate_spins ( frag , colliders , f_spin , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle failed to find spins\" ) cycle end if call fraggle_generate_tan_vel ( frag , colliders , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle failed to find tangential velocities\" ) cycle end if call fraggle_generate_rad_vel ( frag , colliders , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle failed to find radial velocities\" ) cycle end if call frag % get_energy_and_momentum ( colliders , system , param , lbefore = . false .) dEtot = frag % Etot_after - frag % Etot_before dLmag = . mag . ( frag % Ltot_after (:) - frag % Ltot_before (:)) lfailure = (( abs ( dEtot + frag % Qloss ) > FRAGGLE_ETOL ) . or . ( dEtot > 0.0_DP )) if ( lfailure ) then write ( message , * ) dEtot , abs ( dEtot + frag % Qloss ) / FRAGGLE_ETOL call fraggle_io_log_one_message ( \"Fraggle failed due to high energy error: \" // trim ( adjustl ( message ))) cycle end if lfailure = (( abs ( dLmag ) / (. mag . frag % Ltot_before )) > FRAGGLE_LTOL ) if ( lfailure ) then write ( message , * ) dLmag / (. mag . frag % Ltot_before (:)) call fraggle_io_log_one_message ( \"Fraggle failed due to high angular momentum error: \" // trim ( adjustl ( message ))) cycle end if ! Check if any of the usual floating point exceptions happened, and fail the try if so call ieee_get_flag ( ieee_usual , fpe_flag ) lfailure = any ( fpe_flag ) if (. not . lfailure ) exit write ( message , * ) \"Fraggle failed due to a floating point exception: \" , fpe_flag call fraggle_io_log_one_message ( message ) end do write ( message , * ) try if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle fragment generation failed after \" // trim ( adjustl ( message )) // \" tries\" ) else call fraggle_io_log_one_message ( \"Fraggle fragment generation succeeded after \" // trim ( adjustl ( message )) // \" tries\" ) call fraggle_io_log_generate ( frag ) end if call frag % set_original_scale ( colliders ) ! Restore the big array if ( lk_plpl ) call pl % index ( param ) end associate call ieee_set_halting_mode ( IEEE_ALL , fpe_halting_modes ) ! Save the current halting modes so we can turn them off temporarily return end subroutine fraggle_generate_fragments subroutine fraggle_generate_pos_vec ( frag , colliders , r_max_start ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Initializes the orbits of the fragments around the center of mass. The fragments are initially placed on a plane defined by the !! pre-impact angular momentum. They are distributed on an ellipse surrounding the center of mass. !! The initial positions do not conserve energy or momentum, so these need to be adjusted later. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object real ( DP ), intent ( in ) :: r_max_start !! Initial guess for the starting maximum radial distance of fragments ! Internals real ( DP ) :: dis , rad , r_max logical , dimension (:), allocatable :: loverlap integer ( I4B ) :: i , j associate ( nfrag => frag % nbody ) allocate ( loverlap ( nfrag )) ! Place the fragments into a region that is big enough that we should usually not have overlapping bodies ! An overlapping bodies will collide in the next time step, so it's not a major problem if they do (it just slows the run down) r_max = r_max_start rad = sum ( colliders % radius (:)) ! We will treat the first two fragments of the list as special cases. They get initialized the maximum distances apart along the original impactor distance vector. ! This is done because in a regular disruption, the first body is the largest, the second the second largest, and the rest are smaller equal-mass fragments. call random_number ( frag % x_coll (:, 3 : nfrag )) loverlap (:) = . true . do while ( any ( loverlap ( 3 : nfrag ))) frag % x_coll (:, 1 ) = colliders % xb (:, 1 ) - frag % xbcom (:) frag % x_coll (:, 2 ) = colliders % xb (:, 2 ) - frag % xbcom (:) r_max = r_max + 0.1_DP * rad do i = 3 , nfrag if ( loverlap ( i )) then call random_number ( frag % x_coll (:, i )) frag % x_coll (:, i ) = 2 * ( frag % x_coll (:, i ) - 0.5_DP ) * r_max end if end do loverlap (:) = . false . do j = 1 , nfrag do i = j + 1 , nfrag dis = norm2 ( frag % x_coll (:, j ) - frag % x_coll (:, i )) loverlap ( i ) = loverlap ( i ) . or . ( dis <= ( frag % radius ( i ) + frag % radius ( j ))) end do end do end do call fraggle_util_shift_vector_to_origin ( frag % mass , frag % x_coll ) call frag % set_coordinate_system ( colliders ) do i = 1 , nfrag frag % xb (:, i ) = frag % x_coll (:, i ) + frag % xbcom (:) end do frag % xbcom (:) = 0.0_DP do i = 1 , nfrag frag % xbcom (:) = frag % xbcom (:) + frag % mass ( i ) * frag % xb (:, i ) end do frag % xbcom (:) = frag % xbcom (:) / frag % mtot end associate return end subroutine fraggle_generate_pos_vec subroutine fraggle_generate_spins ( frag , colliders , f_spin , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Calculates the spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. !! !! A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object real ( DP ), intent ( in ) :: f_spin !! Fraction of energy or momentum that goes into spin (whichever gives the lowest kinetic energy) logical , intent ( out ) :: lfailure !! Logical flag indicating whether this step fails or succeeds! ! Internals real ( DP ), dimension ( NDIM ) :: L_remainder , rot_L , rot_ke integer ( I4B ) :: i character ( len = STRMAX ) :: message associate ( nfrag => frag % nbody ) lfailure = . false . ! Start the first two bodies with the same rotation as the original two impactors, then distribute the remaining angular momentum among the rest L_remainder (:) = frag % L_budget (:) frag % rot (:,:) = 0.0_DP frag % ke_spin = 0.0_DP do i = 1 , nfrag ! Convert a fraction (f_spin) of either the remaining angular momentum or kinetic energy budget into spin, whichever gives the smaller rotation so as not to blow any budgets rot_ke (:) = sqrt ( 2 * f_spin * frag % ke_budget / ( nfrag * frag % mass ( i ) * frag % radius ( i ) ** 2 * frag % Ip ( 3 , i ))) * L_remainder (:) / norm2 ( L_remainder (:)) rot_L (:) = f_spin * L_remainder (:) / ( nfrag * frag % mass ( i ) * frag % radius ( i ) ** 2 * frag % Ip ( 3 , i )) if ( norm2 ( rot_ke ) < norm2 ( rot_L )) then frag % rot (:, i ) = rot_ke (:) else frag % rot (:, i ) = rot_L (:) end if frag % ke_spin = frag % ke_spin + frag % mass ( i ) * frag % Ip ( 3 , i ) * frag % radius ( i ) ** 2 * dot_product ( frag % rot (:, i ), frag % rot (:, i )) end do frag % ke_spin = 0.5_DP * frag % ke_spin lfailure = (( frag % ke_budget - frag % ke_spin - frag % ke_orbit ) < 0.0_DP ) if ( lfailure ) then call fraggle_io_log_one_message ( \" \" ) call fraggle_io_log_one_message ( \"Spin failure diagnostics\" ) write ( message , * ) frag % ke_budget call fraggle_io_log_one_message ( \"ke_budget     : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_spin call fraggle_io_log_one_message ( \"ke_spin       : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_orbit call fraggle_io_log_one_message ( \"ke_orbit      : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget - frag % ke_spin - frag % ke_orbit call fraggle_io_log_one_message ( \"ke_remainder  : \" // trim ( adjustl ( message ))) end if end associate return end subroutine fraggle_generate_spins subroutine fraggle_generate_tan_vel ( frag , colliders , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Adjusts the tangential velocities and spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. !! This procedure works in several stages, with a goal to solve the angular and linear momentum constraints on the fragments, while still leaving a positive balance of !! our fragment kinetic energy (frag%ke_budget) that we can put into the radial velocity distribution. !! !! The first thing we'll try to do is solve for the tangential velocities of the first 6 fragments, using angular and linear momentum as constraints and an initial !! tangential velocity distribution for the remaining bodies (if there are any) that distributes their angular momentum equally between them. !! If that doesn't work and we blow our kinetic energy budget, we will attempt to find a tangential velocity distribution that minimizes the kinetic energy while !! conserving momentum. !! !! A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object logical , intent ( out ) :: lfailure !! Logical flag indicating whether this step fails or succeeds ! Internals integer ( I4B ) :: i real ( DP ), parameter :: TOL_MIN = 1e-1_DP ! This doesn't have to be very accurate, as we really just want a tangential velocity distribution with less kinetic energy than our initial guess. real ( DP ), parameter :: TOL_INIT = 1e-14_DP real ( DP ), parameter :: VNOISE_MAG = 1e-3_DP !! Magnitude of the noise to apply to initial conditions to help minimizer find a solution in case of failure integer ( I4B ), parameter :: MAXLOOP = 10 real ( DP ) :: tol , ke_remainder real ( DP ), dimension (:), allocatable :: v_t_initial real ( DP ), dimension ( frag % nbody ) :: kefrag , vnoise type ( lambda_obj ) :: spinfunc type ( lambda_obj_err ) :: objective_function real ( DP ), dimension ( NDIM ) :: Li , L_remainder , L_frag_tot character ( len = STRMAX ) :: message associate ( nfrag => frag % nbody ) lfailure = . false . allocate ( v_t_initial , mold = frag % v_t_mag ) v_t_initial (:) = 0.0_DP frag % v_coll (:,:) = 0.0_DP ! Next we will solve for the tangential component of the velocities that both conserves linear momentum and uses the remaining angular momentum not used in spin. ! This will be done using a linear solver that solves for the tangential velocities of the first 6 fragments, constrained by the linear and angular momentum vectors, ! which is embedded in a non-linear minimizer that will adjust the tangential velocities of the remaining i>6 fragments to minimize kinetic energy for a given momentum solution ! The initial conditions fed to the minimizer for the fragments will be the remaining angular momentum distributed between the fragments. call frag % get_ang_mtm () L_remainder (:) = frag % L_budget (:) - frag % L_spin (:) do i = 1 , nfrag v_t_initial ( i ) = norm2 ( L_remainder (:)) / (( nfrag - i + 1 ) * frag % mass ( i ) * norm2 ( frag % x_coll (:, i ))) Li (:) = frag % mass ( i ) * ( frag % x_coll (:, i ) . cross . ( v_t_initial ( i ) * frag % v_t_unit (:, i ))) L_remainder (:) = L_remainder (:) - Li (:) end do ! Find the local kinetic energy minimum for the system that conserves linear and angular momentum objective_function = lambda_obj ( tangential_objective_function , lfailure ) tol = TOL_INIT do while ( tol < TOL_MIN ) frag % v_t_mag ( 7 : nfrag ) = util_minimize_bfgs ( objective_function , nfrag - 6 , v_t_initial ( 7 : nfrag ), tol , MAXLOOP , lfailure ) ! Now that the KE-minimized values of the i>6 fragments are found, calculate the momentum-conserving solution for tangential velociteis v_t_initial ( 7 : nfrag ) = frag % v_t_mag ( 7 : nfrag ) if (. not . lfailure ) exit tol = tol * 2_DP ! Keep increasing the tolerance until we converge on a solution call random_number ( vnoise ( 1 : nfrag )) ! Adding a bit of noise to the initial conditions helps it find a solution more often vnoise (:) = 1.0_DP + VNOISE_MAG * ( 2 * vnoise (:) - 1._DP ) v_t_initial (:) = v_t_initial (:) * vnoise (:) end do frag % v_t_mag ( 1 : nfrag ) = solve_fragment_tan_vel ( v_t_mag_input = v_t_initial ( 7 : nfrag ), lfailure = lfailure ) ! Perform one final shift of the radial velocity vectors to align with the center of mass of the collisional system (the origin) frag % vb (:, 1 : nfrag ) = fraggle_util_vmag_to_vb ( frag % v_r_mag ( 1 : nfrag ), frag % v_r_unit (:, 1 : nfrag ), frag % v_t_mag ( 1 : nfrag ), frag % v_t_unit (:, 1 : nfrag ), frag % mass ( 1 : nfrag ), frag % vbcom (:)) do concurrent ( i = 1 : nfrag ) frag % v_coll (:, i ) = frag % vb (:, i ) - frag % vbcom (:) end do ! Now do a kinetic energy budget check to make sure we are still within the budget. kefrag = 0.0_DP do concurrent ( i = 1 : nfrag ) kefrag ( i ) = frag % mass ( i ) * dot_product ( frag % vb (:, i ), frag % vb (:, i )) end do frag % ke_orbit = 0.5_DP * sum ( kefrag (:)) ! If we are over the energy budget, flag this as a failure so we can try again lfailure = (( frag % ke_budget - frag % ke_spin - frag % ke_orbit ) < 0.0_DP ) if ( lfailure ) then call fraggle_io_log_one_message ( \" \" ) call fraggle_io_log_one_message ( \"Tangential velocity failure diagnostics\" ) call frag % get_ang_mtm () L_frag_tot = frag % L_spin (:) + frag % L_orbit (:) write ( message , * ) . mag .( frag % L_budget (:) - L_frag_tot (:)) / (. mag . frag % Ltot_before (:)) call fraggle_io_log_one_message ( \"|L_remainder| : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget call fraggle_io_log_one_message ( \"ke_budget     : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_spin call fraggle_io_log_one_message ( \"ke_spin       : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_orbit call fraggle_io_log_one_message ( \"ke_tangential : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget - frag % ke_spin - frag % ke_orbit call fraggle_io_log_one_message ( \"ke_radial     : \" // trim ( adjustl ( message ))) end if end associate return contains function solve_fragment_tan_vel ( lfailure , v_t_mag_input ) result ( v_t_mag_output ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Adjusts the positions, velocities, and spins of a collection of fragments such that they conserve angular momentum implicit none ! Arguments logical , intent ( out ) :: lfailure !! Error flag real ( DP ), dimension (:), optional , intent ( in ) :: v_t_mag_input !! Unknown tangential velocities for fragments 7:nfrag ! Internals integer ( I4B ) :: i ! Result real ( DP ), dimension (:), allocatable :: v_t_mag_output real ( DP ), dimension ( 2 * NDIM , 2 * NDIM ) :: A ! LHS of linear equation used to solve for momentum constraint in Gauss elimination code real ( DP ), dimension ( 2 * NDIM ) :: b ! RHS of linear equation used to solve for momentum constraint in Gauss elimination code real ( DP ), dimension ( NDIM ) :: L_lin_others , L_orb_others , L , vtmp associate ( nfrag => frag % nbody ) lfailure = . false . ! We have 6 constraint equations (2 vector constraints in 3 dimensions each) ! The first 3 are that the linear momentum of the fragments is zero with respect to the collisional barycenter ! The second 3 are that the sum of the angular momentum of the fragments is conserved from the pre-impact state L_lin_others (:) = 0.0_DP L_orb_others (:) = 0.0_DP do i = 1 , nfrag if ( i <= 2 * NDIM ) then ! The tangential velocities of the first set of bodies will be the unknowns we will solve for to satisfy the constraints A ( 1 : 3 , i ) = frag % mass ( i ) * frag % v_t_unit (:, i ) A ( 4 : 6 , i ) = frag % mass ( i ) * frag % rmag ( i ) * ( frag % v_r_unit (:, i ) . cross . frag % v_t_unit (:, i )) else if ( present ( v_t_mag_input )) then vtmp (:) = v_t_mag_input ( i - 6 ) * frag % v_t_unit (:, i ) L_lin_others (:) = L_lin_others (:) + frag % mass ( i ) * vtmp (:) L (:) = frag % mass ( i ) * ( frag % x_coll (:, i ) . cross . vtmp (:)) L_orb_others (:) = L_orb_others (:) + L (:) end if end do b ( 1 : 3 ) = - L_lin_others (:) b ( 4 : 6 ) = frag % L_budget (:) - frag % L_spin (:) - L_orb_others (:) allocate ( v_t_mag_output ( nfrag )) v_t_mag_output ( 1 : 6 ) = util_solve_linear_system ( A , b , 6 , lfailure ) if ( present ( v_t_mag_input )) v_t_mag_output ( 7 : nfrag ) = v_t_mag_input (:) end associate return end function solve_fragment_tan_vel function tangential_objective_function ( v_t_mag_input , lfailure ) result ( fval ) !! Author: David A. Minton !! !! Objective function for evaluating how close our fragment velocities get to minimizing KE error from our required value implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: v_t_mag_input !! Unknown tangential component of velocity vector set previously by angular momentum constraint logical , intent ( out ) :: lfailure !! Error flag ! Result real ( DP ) :: fval ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM , frag % nbody ) :: v_shift real ( DP ), dimension ( frag % nbody ) :: v_t_new , kearr real ( DP ) :: keo associate ( nfrag => frag % nbody ) lfailure = . false . v_t_new (:) = solve_fragment_tan_vel ( v_t_mag_input = v_t_mag_input (:), lfailure = lfailure ) v_shift (:,:) = fraggle_util_vmag_to_vb ( frag % v_r_mag , frag % v_r_unit , v_t_new , frag % v_t_unit , frag % mass , frag % vbcom ) kearr = 0.0_DP do concurrent ( i = 1 : nfrag ) kearr ( i ) = frag % mass ( i ) * dot_product ( v_shift (:, i ), v_shift (:, i )) end do keo = 0.5_DP * sum ( kearr (:)) fval = keo lfailure = . false . end associate return end function tangential_objective_function end subroutine fraggle_generate_tan_vel subroutine fraggle_generate_rad_vel ( frag , colliders , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! !! Adjust the fragment velocities to set the fragment orbital kinetic energy. This will minimize the difference between the fragment kinetic energy and the energy budget implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object logical , intent ( out ) :: lfailure !! Logical flag indicating whether this step fails or succeeds! ! Internals real ( DP ), parameter :: TOL_MIN = FRAGGLE_ETOL ! This needs to be more accurate than the tangential step, as we are trying to minimize the total residual energy real ( DP ), parameter :: TOL_INIT = 1e-14_DP real ( DP ), parameter :: VNOISE_MAG = 1e-10_DP !! Magnitude of the noise to apply to initial conditions to help minimizer find a solution in case of failure integer ( I4B ), parameter :: MAXLOOP = 100 real ( DP ) :: ke_radial , tol integer ( I4B ) :: i , j real ( DP ), dimension (:), allocatable :: v_r_initial real ( DP ), dimension (:,:), allocatable :: v_r real ( DP ), dimension ( frag % nbody ) :: vnoise type ( lambda_obj ) :: objective_function character ( len = STRMAX ) :: message associate ( nfrag => frag % nbody ) ! Set the \"target\" ke for the radial component ke_radial = frag % ke_budget - frag % ke_spin - frag % ke_orbit allocate ( v_r_initial , source = frag % v_r_mag ) ! Initialize radial velocity magnitudes with a random value that related to equipartition of kinetic energy with some noise call random_number ( vnoise ( 1 : nfrag )) vnoise (:) = 1.0_DP + VNOISE_MAG * ( 2 * vnoise (:) - 1.0_DP ) v_r_initial ( 1 : nfrag ) = sqrt ( abs ( 2 * ke_radial ) / ( frag % mass ( 1 : nfrag ) * nfrag )) * vnoise ( 1 : nfrag ) ! Initialize the lambda function using a structure constructor that calls the init method ! Minimize the ke objective function using the BFGS optimizer objective_function = lambda_obj ( radial_objective_function ) tol = TOL_INIT do while ( tol < TOL_MIN ) frag % v_r_mag = util_minimize_bfgs ( objective_function , nfrag , v_r_initial , tol , MAXLOOP , lfailure ) if (. not . lfailure ) exit tol = tol * 2 ! Keep increasing the tolerance until we converge on a solution v_r_initial (:) = frag % v_r_mag (:) call random_number ( vnoise ( 1 : nfrag )) ! Adding a bit of noise to the initial conditions helps it find a solution more often vnoise (:) = 1.0_DP + VNOISE_MAG * ( 2 * vnoise (:) - 1._DP ) v_r_initial (:) = v_r_initial (:) * vnoise (:) end do ! Shift the radial velocity vectors to align with the center of mass of the collisional system (the origin) frag % ke_orbit = 0.0_DP frag % vb (:, 1 : nfrag ) = fraggle_util_vmag_to_vb ( frag % v_r_mag ( 1 : nfrag ), frag % v_r_unit (:, 1 : nfrag ), frag % v_t_mag ( 1 : nfrag ), frag % v_t_unit (:, 1 : nfrag ), frag % mass ( 1 : nfrag ), frag % vbcom (:)) do i = 1 , nfrag frag % v_coll (:, i ) = frag % vb (:, i ) - frag % vbcom (:) frag % ke_orbit = frag % ke_orbit + frag % mass ( i ) * dot_product ( frag % vb (:, i ), frag % vb (:, i )) end do frag % ke_orbit = 0.5_DP * frag % ke_orbit lfailure = abs (( frag % ke_budget - ( frag % ke_orbit + frag % ke_spin )) / frag % ke_budget ) > FRAGGLE_ETOL if ( lfailure ) then call fraggle_io_log_one_message ( \" \" ) call fraggle_io_log_one_message ( \"Radial velocity failure diagnostics\" ) write ( message , * ) frag % ke_budget call fraggle_io_log_one_message ( \"ke_budget     : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_spin call fraggle_io_log_one_message ( \"ke_spin       : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_orbit call fraggle_io_log_one_message ( \"ke_orbit : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget - ( frag % ke_orbit + frag % ke_spin ) call fraggle_io_log_one_message ( \"ke_remainder  : \" // trim ( adjustl ( message ))) end if end associate return contains function radial_objective_function ( v_r_mag_input ) result ( fval ) !! Author: David A. Minton !! !! Objective function for evaluating how close our fragment velocities get to minimizing KE error from our required value implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: v_r_mag_input !! Unknown radial component of fragment velocity vector ! Result real ( DP ) :: fval !! The objective function result, which is the square of the difference between the calculated fragment kinetic energy and our target !! Minimizing this brings us closer to our objective ! Internals integer ( I4B ) :: i real ( DP ), dimension (:,:), allocatable :: v_shift real ( DP ), dimension ( frag % nbody ) :: kearr real ( DP ) :: keo , ke_radial associate ( nfrag => frag % nbody ) allocate ( v_shift , mold = frag % vb ) v_shift (:,:) = fraggle_util_vmag_to_vb ( v_r_mag_input , frag % v_r_unit , frag % v_t_mag , frag % v_t_unit , frag % mass , frag % vbcom ) do concurrent ( i = 1 : nfrag ) kearr ( i ) = frag % mass ( i ) * ( frag % Ip ( 3 , i ) * frag % radius ( i ) ** 2 * dot_product ( frag % rot (:, i ), frag % rot (:, i )) + dot_product ( v_shift (:, i ), v_shift (:, i ))) end do keo = 2 * frag % ke_budget - sum ( kearr (:)) ke_radial = frag % ke_budget - frag % ke_orbit - frag % ke_spin ! The following ensures that fval = 0 is a local minimum, which is what the BFGS method is searching for fval = ( keo / ( 2 * ke_radial )) ** 2 end associate return end function radial_objective_function end subroutine fraggle_generate_rad_vel end submodule s_fraggle_generate","tags":"","loc":"sourcefile/fraggle_generate.f90.html"},{"title":"fraggle_regime.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_regime.f90~~EfferentGraph sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_regime Source Code fraggle_regime.f90 Source Code submodule ( fraggle_classes ) s_fraggle_regime use swiftest contains module subroutine fraggle_regime_colliders ( self , frag , system , param ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Determine which fragmentation regime the set of colliders will be. This subroutine is a wrapper for the non-polymorphic raggle_regime_collresolve subroutine. !! It converts to SI units prior to calling implicit none ! Arguments class ( fraggle_colliders ), intent ( inout ) :: self !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters ! Internals integer ( I4B ) :: jtarg , jproj , regime real ( DP ), dimension ( 2 ) :: radius_si , mass_si , density_si real ( DP ) :: min_mfrag_si , Mcb_si real ( DP ), dimension ( NDIM ) :: x1_si , v1_si , x2_si , v2_si real ( DP ) :: mlr , mslr , mtot , dentot , msys , msys_new , Qloss , impact_parameter logical :: fileExists associate ( colliders => self ) ! Convert all quantities to SI units and determine which of the pair is the projectile vs. target before sending them to the regime determination subroutine if ( colliders % mass ( 1 ) > colliders % mass ( 2 )) then jtarg = 1 jproj = 2 else jtarg = 2 jproj = 1 end if mass_si (:) = colliders % mass ([ jtarg , jproj ]) * param % MU2KG !! The two-body equivalent masses of the collider system radius_si (:) = colliders % radius ([ jtarg , jproj ]) * param % DU2M !! The two-body equivalent radii of the collider system density_si (:) = mass_si (:) / ( 4.0_DP / 3._DP * PI * radius_si (:) ** 3 ) !! The two-body equivalent density of the collider system x1_si (:) = colliders % xb (:, jtarg ) * param % DU2M !! The first body of the two-body equivalent position vector the collider system v1_si (:) = colliders % vb (:, jtarg ) * param % DU2M / param % TU2S !! The first body of the two-body equivalent velocity vector the collider system x2_si (:) = colliders % xb (:, jproj ) * param % DU2M !! The second body of the two-body equivalent position vector the collider system v2_si (:) = colliders % vb (:, jproj ) * param % DU2M / param % TU2S !! The second body of the two-body equivalent velocity vector the collider system Mcb_si = system % cb % mass * param % MU2KG !! The central body mass of the system select type ( param ) class is ( symba_parameters ) min_mfrag_si = ( param % min_GMfrag / param % GU ) * param % MU2KG !! The minimum fragment mass to generate. Collider systems that would otherwise generate less massive fragments than this value will be forced to merge instead class default min_mfrag_si = 0.0_DP end select mtot = sum ( mass_si (:)) dentot = sum ( mass_si (:) * density_si (:)) / mtot !! Use the positions and velocities of the parents from indside the step (at collision) to calculate the collisional regime call fraggle_regime_collresolve ( Mcb_si , mass_si ( jtarg ), mass_si ( jproj ), radius_si ( jtarg ), radius_si ( jproj ), x1_si (:), x2_si (:),& v1_si (:), v2_si (:), density_si ( jtarg ), density_si ( jproj ), min_mfrag_si , frag % regime , mlr , mslr , frag % Qloss ) frag % mass_dist ( 1 ) = min ( max ( mlr , 0.0_DP ), mtot ) frag % mass_dist ( 2 ) = min ( max ( mslr , 0.0_DP ), mtot ) frag % mass_dist ( 3 ) = min ( max ( mtot - mlr - mslr , 0.0_DP ), mtot ) ! Find the center of mass of the collisional system frag % mtot = sum ( colliders % mass (:)) frag % xbcom (:) = ( colliders % mass ( 1 ) * colliders % xb (:, 1 ) + colliders % mass ( 2 ) * colliders % xb (:, 2 )) / frag % mtot frag % vbcom (:) = ( colliders % mass ( 1 ) * colliders % vb (:, 1 ) + colliders % mass ( 2 ) * colliders % vb (:, 2 )) / frag % mtot ! Convert quantities back to the system units and save them into the fragment system frag % mass_dist (:) = ( frag % mass_dist (:) / param % MU2KG ) frag % Qloss = frag % Qloss * ( param % TU2S / param % DU2M ) ** 2 / param % MU2KG call fraggle_io_log_regime ( colliders , frag ) end associate return end subroutine fraggle_regime_colliders subroutine fraggle_regime_collresolve ( Mcb , m1 , m2 , rad1 , rad2 , xh1 , xh2 , vb1 , vb2 , den1 , den2 , min_mfrag , regime , Mlr , Mslr , Qloss ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Determine the collisional regime of two colliding bodies. !! Current version requires all values to be converted to SI units prior to calling the function !!       References: !!       Kokubo, E., Genda, H., 2010. Formation of Terrestrial Planets from Protoplanets Under a Realistic Accretion !!          Condition. ApJL 714, L21. https://doi.org/10.1088/2041-8205/714/1/L21 !!       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling !!          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79 !!       Mustill, A.J., Davies, M.B., Johansen, A., 2018. The dynamical evolution of transiting planetary systems including !!          a realistic collision prescription. Mon Not R Astron Soc 478, 2896–2908. https://doi.org/10.1093/mnras/sty1273 !!       Rufu, R., Aharonson, O., 2019. Impact Dynamics of Moons Within a Planetary Potential. J. Geophys. Res. Planets 124, !!          1008–1019. https://doi.org/10.1029/2018JE005798 !!       Stewart, S.T., Leinhardt, Z.M., 2012. Collisions between Gravity-dominated Bodies. II. The Diversity of Impact !!          Outcomes during the End Stage of Planet Formation. ApJ 751, 32. https://doi.org/10.1088/0004-637X/751/1/32 !! implicit none ! Arguments real ( DP ), intent ( in ) :: Mcb , m1 , m2 , rad1 , rad2 , den1 , den2 , min_mfrag real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 , vb1 , vb2 integer ( I4B ), intent ( out ) :: regime real ( DP ), intent ( out ) :: Mlr , Mslr real ( DP ), intent ( out ) :: Qloss !! The residual energy after the collision ! Constants integer ( I4B ), parameter :: N1 = 1 !number of objects with mass equal to the largest remnant from LS12 integer ( I4B ), parameter :: N2 = 2 !number of objects with mass larger than second largest remnant from LS12 real ( DP ), parameter :: DENSITY1 = 100 0.0_DP !standard density parameter from LS12 [kg/m3] real ( DP ), parameter :: MU_BAR = 0.37_DP !0.385#0.37#0.3333# 3.978 # 1/3 material parameter for hydrodynamic planet-size bodies (LS12) real ( DP ), parameter :: BETA = 2.85_DP !slope of sfd for remnants from LS12 2.85 real ( DP ), parameter :: ETA = - 1.50_DP !! LS12 eq. (44) real ( DP ), parameter :: C1 = 2.43_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: C2 = - 0.0408_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: C3 = 1.86_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: C4 = 1.08_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: CRUFU = 2.0_DP - 3 * MU_BAR ! central potential variable from Rufu and Aharonson (2019) real ( DP ), parameter :: SUPERCAT_QRATIO = 1.8_DP ! See Section 4.1 of LS12 ! Internals real ( DP ) :: a1 , alpha , aint , b , bcrit , c_star , egy , zeta , l , lint , mu , phi , theta real ( DP ) :: Qr , Qrd_pstar , Qr_erosion , Qr_supercat real ( DP ) :: Vhr , Verosion , Vescp , Vhill , Vimp , Vsupercat real ( DP ) :: Mint , Mtot , Mtmp real ( DP ) :: Rp , rhill real ( DP ) :: Mresidual real ( DP ) :: U_binding Vimp = norm2 ( vb2 (:) - vb1 (:)) b = calc_b ( xh2 , vb2 , xh1 , vb1 ) l = ( rad1 + rad2 ) * ( 1 - b ) egy = 0.5_DP * dot_product ( vb1 , vb1 ) - GC * Mcb / norm2 ( xh1 ) a1 = - GC * Mcb / 2.0_DP / egy Mtot = m1 + m2 mu = ( m1 * m2 ) / Mtot if ( l < 2 * rad2 ) then !calculate Mint phi = 2 * acos (( l - rad2 ) / rad2 ) aint = rad2 ** 2 * ( PI - ( phi - sin ( phi )) / 2.0_DP ) lint = 2 * sqrt ( rad2 ** 2 - ( rad2 - l / 2.0_DP ) ** 2 ) Mint = aint * lint ![kg] alpha = ( l ** 2 ) * ( 3 * rad2 - l ) / ( 4 * ( rad2 ** 3 )) else alpha = 1.0_DP Mint = m2 end if Rp = ( 3 * ( m1 / den1 + alpha * m2 / den2 ) / ( 4 * PI )) ** ( 1.0_DP / 3.0_DP ) ! (Mustill et al. 2018) c_star = calc_c_star ( Rp ) !calculate Vescp Vescp = sqrt ( 2 * GC * Mtot / Rp ) !Mustill et al. 2018 eq 6 !calculate rhill rhill = a1 * ( m1 / 3.0_DP / ( Mcb + m1 )) ** ( 1.0_DP / 3.0_DP ) !calculate Vhill if (( rad2 + rad1 ) < rhill ) then Vhill = sqrt ( 2 * GC * m1 * (( rhill ** 2 - rhill * ( rad1 + rad2 )) / & ( rhill ** 2 - 0.5_DP * ( rad1 + rad2 ) ** 2 )) / ( rad1 + rad2 )) else Vhill = Vescp end if !calculate Qr_pstar Qrd_pstar = calc_Qrd_pstar ( m1 , m2 , alpha , c_star ) * ( Vhill / Vescp ) ** CRUFU !Rufu and Aharaonson eq (3) !calculate Verosion Qr_erosion = 2 * ( 1.0_DP - m1 / Mtot ) * Qrd_pstar Verosion = ( 2 * Qr_erosion * Mtot / mu ) ** ( 1.0_DP / 2.0_DP ) Qr = mu * ( Vimp ** 2 ) / Mtot / 2.0_DP !calculate mass largest remnant Mlr Mlr = max (( 1.0_DP - Qr / Qrd_pstar / 2.0_DP ) * Mtot , min_mfrag ) ! [kg] # LS12 eq (5) !calculate Vsupercat Qr_supercat = SUPERCAT_QRATIO * Qrd_pstar ! See LS12 Section 4.1 Vsupercat = sqrt ( 2 * Qr_supercat * Mtot / mu ) !calculate Vhr zeta = ( m1 - m2 ) / Mtot theta = 1.0_DP - b Vhr = Vescp * ( C1 * zeta ** 2 * theta ** ( 2.5_DP ) + C2 * zeta ** 2 + C3 * theta ** ( 2.5_DP ) + C4 ) ! Kokubo & Genda (2010) eq. (3) bcrit = rad1 / ( rad1 + rad2 ) Qloss = 0.0_DP U_binding = ( 3.0_DP * Mtot ) / ( 5.0_DP * Rp ) ! LS12 eq. 27 if (( m1 < min_mfrag ). or .( m2 < min_mfrag )) then regime = COLLRESOLVE_REGIME_MERGE !perfect merging regime Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP call fraggle_io_log_one_message ( \"Fragments would have mass below the minimum. Converting this collision into a merger.\" ) else if ( Vimp < Vescp ) then regime = COLLRESOLVE_REGIME_MERGE !perfect merging regime Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else if ( Vimp < Verosion ) then if ( b < bcrit ) then regime = COLLRESOLVE_REGIME_MERGE !partial accretion regime\" Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else if (( b > bcrit ) . and . ( Vimp < Vhr )) then regime = COLLRESOLVE_REGIME_MERGE ! graze and merge Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else Mlr = m1 Mslr = max ( calc_Qrd_rev ( m2 , m1 , Mint , den1 , den2 , Vimp , c_star ), min_mfrag ) regime = COLLRESOLVE_REGIME_HIT_AND_RUN !hit and run Qloss = ( c_star + 1.0_DP ) * U_binding ! Qr end if else if ( Vimp > Verosion . and . Vimp < Vsupercat ) then if ( m2 < 0.001_DP * m1 ) then regime = COLLRESOLVE_REGIME_MERGE !cratering regime\" Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else Mslr = max ( Mtot * ( 3.0_DP - BETA ) * ( 1.0_DP - N1 * Mlr / Mtot ) / ( N2 * BETA ), min_mfrag ) ! LS12 eq (37) regime = COLLRESOLVE_REGIME_DISRUPTION !disruption Qloss = ( c_star + 1.0_DP ) * U_binding ! Qr - Qr_erosion end if else if ( Vimp > Vsupercat ) then Mlr = max ( Mtot * 0.1_DP * ( Qr / ( Qrd_pstar * SUPERCAT_QRATIO )) ** ( ETA ), min_mfrag ) !LS12 eq (44) Mslr = max ( Mtot * ( 3.0_DP - BETA ) * ( 1.0_DP - N1 * Mlr / Mtot ) / ( N2 * BETA ), min_mfrag ) !LS12 eq (37) regime = COLLRESOLVE_REGIME_SUPERCATASTROPHIC ! supercatastrophic Qloss = ( c_star + 1.0_DP ) * U_binding ! Qr - Qr_supercat else write ( * , * ) \"Error no regime found in symba_regime\" end if end if if ( Mslr > Mlr ) then ! The second-largest fragment is actually larger than the largest, so we will swap them Mtmp = Mlr Mlr = Mslr Mslr = Mtmp end if Mresidual = Mtot - Mlr - Mslr if ( Mresidual < 0.0_DP ) then ! prevents final masses from going negative Mlr = Mlr + Mresidual end if return ! Internal functions contains function calc_Qrd_pstar ( Mtarg , Mp , alpha , c_star ) result ( Qrd_pstar ) !! author: Jennifer L.L. Pouplin and Carlisle A. Wishard !! !! Calculates the corrected Q* for oblique impacts. See Eq. (15) of LS12. !!       Reference: !!       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling !!          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79 !! implicit none ! Arguments real ( DP ), intent ( in ) :: Mtarg , Mp , alpha , c_star ! Result real ( DP ) :: Qrd_pstar ! Internals real ( DP ) :: Qrd_star1 , mu_alpha , mu , Qrd_star ! calc mu, mu_alpha mu = ( Mtarg * Mp ) / ( Mtarg + Mp ) ! [kg] mu_alpha = ( Mtarg * alpha * Mp ) / ( Mtarg + alpha * Mp ) ! [kg] ! calc Qrd_star1 Qrd_star1 = ( c_star * 4 * PI * DENSITY1 * GC * Rp ** 2 ) / 5.0_DP ! calc Qrd_star Qrd_star = Qrd_star1 * ((( Mp / Mtarg + 1.0_DP ) ** 2 ) / ( 4 * Mp / Mtarg )) ** ( 2.0_DP / ( 3.0_DP * MU_BAR ) - 1.0_DP ) !(eq 23) ! calc Qrd_pstar, v_pstar Qrd_pstar = (( mu / mu_alpha ) ** ( 2.0_DP - 3.0_DP * MU_BAR / 2.0_DP )) * Qrd_star ! (eq 15) return end function calc_Qrd_pstar function calc_Qrd_rev ( Mp , Mtarg , Mint , den1 , den2 , Vimp , c_star ) result ( Mslr ) !! author: Jennifer L.L. Pouplin and Carlisle A. Wishard !! !! Calculates mass of second largest fragment. !! implicit none ! Arguments real ( DP ), intent ( in ) :: Mp , Mtarg , Mint , den1 , den2 , Vimp , c_star ! Result real ( DP ) :: Mslr ! Internals real ( DP ) :: mtot_rev , mu_rev , gamma_rev , Qrd_star1 , Qrd_star , mu_alpha_rev real ( DP ) :: Qrd_pstar , Rc1 , Qr_rev , Qrd_pstar_rev , Qr_supercat_rev ! calc Mslr, Rc1, mu, gammalr mtot_rev = Mint + Mp Rc1 = ( 3 * ( Mint / den1 + Mp / den2 ) / ( 4 * PI )) ** ( 1.0_DP / 3.0_DP ) ! [m] Mustill et al 2018 mu_rev = ( Mint * Mp ) / mtot_rev ! [kg] eq 49 LS12 mu_alpha_rev = ( Mtarg * alpha * Mp ) / ( Mtarg + alpha * Mp ) gamma_rev = Mint / Mp ! eq 50 LS12 !calc Qr_rev Qr_rev = mu_rev * ( Vimp ** 2 ) / ( 2 * mtot_rev ) ! calc Qrd_star1, v_star1 Qrd_star1 = ( c_star * 4 * PI * mtot_rev * GC ) / Rc1 / 5.0_DP ! calc Qrd_pstar_rev Qrd_star = Qrd_star1 * ((( gamma_rev + 1.0_DP ) ** 2 ) / ( 4 * gamma_rev )) ** ( 2.0_DP / ( 3.0_DP * MU_BAR ) - 1.0_DP ) !(eq 52) Qrd_pstar = Qrd_star * (( mu_rev / mu_alpha_rev ) ** ( 2.0_DP - 3.0_DP * MU_BAR / 2.0_DP )) Qrd_pstar_rev = Qrd_pstar * ( Vhill / Vescp ) ** CRUFU !Rufu and Aharaonson eq (3) !calc Qr_supercat_rev Qr_supercat_rev = 1.8_DP * Qrd_pstar_rev if ( Qr_rev > Qr_supercat_rev ) then Mslr = mtot_rev * ( 0.1_DP * (( Qr_rev / ( Qrd_pstar_rev * 1.8_DP )) ** ( - 1.5_DP ))) !eq (44) else if ( Qr_rev < Qrd_pstar_rev ) then Mslr = Mp else Mslr = ( 1.0_DP - Qr_rev / Qrd_pstar_rev / 2.0_DP ) * ( mtot_rev ) ! [kg] #(eq 5) end if if ( Mslr > Mp ) Mslr = Mp !check conservation of mass return end function calc_Qrd_rev function calc_b ( proj_pos , proj_vel , targ_pos , targ_vel ) result ( sintheta ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Calculates the impact factor b = sin(theta), where theta is the angle between the relative velocity !! and distance vectors of the target and projectile bodies. See Fig. 2 of Leinhardt and Stewart (2012) !! implicit none !! Arguments real ( DP ), dimension (:), intent ( in ) :: proj_pos , proj_vel , targ_pos , targ_vel !! Result real ( DP ) :: sintheta !! Internals real ( DP ), dimension ( NDIM ) :: imp_vel , distance , x_cross_v imp_vel (:) = proj_vel (:) - targ_vel (:) distance (:) = proj_pos (:) - targ_pos (:) x_cross_v (:) = distance (:) . cross . imp_vel (:) sintheta = norm2 ( x_cross_v (:)) / norm2 ( distance (:)) / norm2 ( imp_vel (:)) return end function calc_b function calc_c_star ( Rc1 ) result ( c_star ) !! author: David A. Minton !! !! Calculates c_star as a function of impact equivalent radius. It inteRpolates between 5 for ~1 km sized bodies to !! 1.8 for ~10000 km sized bodies. See LS12 Fig. 4 for details. !! implicit none !! Arguments real ( DP ), intent ( in ) :: Rc1 !! Result real ( DP ) :: c_star !! Internals real ( DP ), parameter :: loR = 1.0e3_DP ! Lower bound of inteRpolation size (m) real ( DP ), parameter :: hiR = 1.0e7_DP ! Upper bound of inteRpolation size (m) real ( DP ), parameter :: loval = 5.0_DP ! Value of C* at lower bound real ( DP ), parameter :: hival = 1.9_DP ! Value of C* at upper bound if ( Rc1 < loR ) then c_star = loval else if ( Rc1 < hiR ) then c_star = loval + ( hival - loval ) * log ( Rc1 / loR ) / log ( hiR / loR ) else c_star = hival end if return end function calc_c_star end subroutine fraggle_regime_collresolve end submodule s_fraggle_regime","tags":"","loc":"sourcefile/fraggle_regime.f90.html"},{"title":"fraggle_placeholder.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_placeholder.f90~~EfferentGraph sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_placeholder Source Code fraggle_placeholder.f90 Source Code submodule ( fraggle_classes ) s_fraggle_placeholder use swiftest contains !> The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class module subroutine fraggle_placeholder_accel ( self , system , param , t , lbeg ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step write ( * , * ) \"The type-bound procedure 'accel' is not defined for type fraggle_fragments\" return end subroutine fraggle_placeholder_accel module subroutine fraggle_placeholder_kick ( self , system , param , t , dt , lbeg ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system objec class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. write ( * , * ) \"The type-bound procedure 'kick' is not defined for type fraggle_fragments\" return end subroutine fraggle_placeholder_kick module subroutine fraggle_placeholder_step ( self , system , param , t , dt ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize write ( * , * ) \"The type-bound procedure 'step' is not defined for type fraggle_fragments\" return end subroutine fraggle_placeholder_step end submodule s_fraggle_placeholder","tags":"","loc":"sourcefile/fraggle_placeholder.f90.html"},{"title":"fraggle_setup.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_setup.f90~~EfferentGraph sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_setup Source Code fraggle_setup.f90 Source Code submodule ( fraggle_classes ) s_fraggle_setup use swiftest contains module subroutine fraggle_setup_reset_fragments ( self ) !! author: David A. Minton !! !! Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self self % xb (:,:) = 0.0_DP self % vb (:,:) = 0.0_DP self % rot (:,:) = 0.0_DP self % x_coll (:,:) = 0.0_DP self % v_coll (:,:) = 0.0_DP self % v_r_unit (:,:) = 0.0_DP self % v_t_unit (:,:) = 0.0_DP self % v_n_unit (:,:) = 0.0_DP self % rmag (:) = 0.0_DP self % rotmag (:) = 0.0_DP self % v_r_mag (:) = 0.0_DP self % v_t_mag (:) = 0.0_DP self % ke_orbit = 0.0_DP self % ke_spin = 0.0_DP self % L_orbit (:) = 0.0_DP self % L_spin (:) = 0.0_DP return end subroutine fraggle_setup_reset_fragments module subroutine fraggle_setup_fragments ( self , n , param ) !! author: David A. Minton !! !! Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self integer ( I4B ), intent ( in ) :: n class ( swiftest_parameters ), intent ( in ) :: param call setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % x_coll )) deallocate ( self % x_coll ) if ( allocated ( self % v_coll )) deallocate ( self % v_coll ) if ( allocated ( self % v_r_unit )) deallocate ( self % v_r_unit ) if ( allocated ( self % v_t_unit )) deallocate ( self % v_t_unit ) if ( allocated ( self % v_n_unit )) deallocate ( self % v_n_unit ) if ( allocated ( self % rmag )) deallocate ( self % rmag ) if ( allocated ( self % rotmag )) deallocate ( self % rotmag ) if ( allocated ( self % v_r_mag )) deallocate ( self % v_r_mag ) if ( allocated ( self % v_t_mag )) deallocate ( self % v_t_mag ) if ( n == 0 ) return allocate ( self % x_coll ( NDIM , n )) allocate ( self % v_coll ( NDIM , n )) allocate ( self % v_r_unit ( NDIM , n )) allocate ( self % v_t_unit ( NDIM , n )) allocate ( self % v_n_unit ( NDIM , n )) allocate ( self % rmag ( n )) allocate ( self % rotmag ( n )) allocate ( self % v_r_mag ( n )) allocate ( self % v_t_mag ( n )) call self % reset () return end subroutine fraggle_setup_fragments end submodule s_fraggle_setup","tags":"","loc":"sourcefile/fraggle_setup.f90.html"},{"title":"fraggle_set.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_set.f90~~EfferentGraph sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_set Source Code fraggle_set.f90 Source Code submodule ( fraggle_classes ) s_fraggle_set use swiftest contains module subroutine fraggle_set_budgets_fragments ( self , colliders ) !! author: David A. Minton !! !! Sets the energy and momentum budgets of the fragments based on the collider values and the before/after values of energy and momentum implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals real ( DP ) :: dEtot real ( DP ), dimension ( NDIM ) :: dL associate ( frag => self ) dEtot = frag % Etot_after - frag % Etot_before dL (:) = frag % Ltot_after (:) - frag % Ltot_before (:) frag % L_budget (:) = - dL (:) frag % ke_budget = - ( dEtot - 0.5_DP * frag % mtot * dot_product ( frag % vbcom (:), frag % vbcom (:))) - frag % Qloss end associate return end subroutine fraggle_set_budgets_fragments module subroutine fraggle_set_mass_dist_fragments ( self , colliders , param ) !! author: David A. Minton !! !! Sets the mass of fragments based on the mass distribution returned by the regime calculation. !! This subroutine must be run after the the setup rourtine has been run on the fragments implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters ! Internals integer ( I4B ) :: i , jproj , jtarg , nfrag , istart real ( DP ), dimension ( 2 ) :: volume real ( DP ), dimension ( NDIM ) :: Ip_avg real ( DP ) :: mfrag , mremaining , min_mfrag real ( DP ), parameter :: BETA = 2.85_DP integer ( I4B ), parameter :: NFRAGMAX = 100 !! Maximum number of fragments that can be generated integer ( I4B ), parameter :: NFRAGMIN = 7 !! Minimum number of fragments that can be generated (set by the fraggle_generate algorithm for constraining momentum and energy) integer ( I4B ), parameter :: NFRAG_SIZE_MULTIPLIER = 3 !! Log-space scale factor that scales the number of fragments by the collisional system mass integer ( I4B ), parameter :: iMlr = 1 integer ( I4B ), parameter :: iMslr = 2 integer ( I4B ), parameter :: iMrem = 3 associate ( frag => self ) ! Get mass weighted mean of Ip and density volume ( 1 : 2 ) = 4._DP / 3._DP * PI * colliders % radius ( 1 : 2 ) ** 3 Ip_avg (:) = ( colliders % mass ( 1 ) * colliders % Ip (:, 1 ) + colliders % mass ( 2 ) * colliders % Ip (:, 2 )) / frag % mtot if ( colliders % mass ( 1 ) > colliders % mass ( 2 )) then jtarg = 1 jproj = 2 else jtarg = 2 jproj = 1 end if select type ( param ) class is ( symba_parameters ) min_mfrag = ( param % min_GMfrag / param % GU ) ! The number of fragments we generate is bracked by the minimum required by fraggle_generate (7) and the ! maximum set by the NFRAG_SIZE_MULTIPLIER which limits the total number of fragments to prevent the nbody ! code from getting an overwhelmingly large number of fragments nfrag = ceiling ( NFRAG_SIZE_MULTIPLIER * log ( frag % mtot / min_mfrag )) nfrag = max ( min ( nfrag , NFRAGMAX ), NFRAGMIN ) class default min_mfrag = 0.0_DP nfrag = NFRAGMAX end select select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION , COLLRESOLVE_REGIME_SUPERCATASTROPHIC , COLLRESOLVE_REGIME_HIT_AND_RUN ) ! The first two bins of the mass_dist are the largest and second-largest fragments that came out of fraggle_regime. ! The remainder from the third bin will be distributed among nfrag-2 bodies. The following code will determine nfrag based on ! the limits bracketed above and the model size distribution of fragments. ! Check to see if our size distribution would give us a smaller number of fragments than the maximum number i = iMrem mremaining = frag % mass_dist ( iMrem ) do while ( i <= nfrag ) mfrag = ( 1 + i - iMslr ) ** ( - 3._DP / BETA ) * frag % mass_dist ( iMslr ) if ( mremaining - mfrag < 0.0_DP ) exit mremaining = mremaining - mfrag i = i + 1 end do if ( i < nfrag ) nfrag = max ( i , NFRAGMIN ) ! The sfd would actually give us fewer fragments than our maximum call frag % setup ( nfrag , param ) case ( COLLRESOLVE_REGIME_MERGE , COLLRESOLVE_REGIME_GRAZE_AND_MERGE ) call frag % setup ( 1 , param ) frag % mass ( 1 ) = frag % mass_dist ( 1 ) frag % radius ( 1 ) = colliders % radius ( jtarg ) frag % density ( 1 ) = frag % mass_dist ( 1 ) / volume ( jtarg ) frag % Ip (:, 1 ) = colliders % Ip (:, 1 ) return case default write ( * , * ) \"fraggle_set_mass_dist_fragments error: Unrecognized regime code\" , frag % regime end select ! Make the first two bins the same as the Mlr and Mslr values that came from fraggle_regime frag % mass ( 1 ) = frag % mass_dist ( iMlr ) frag % mass ( 2 ) = frag % mass_dist ( iMslr ) ! Distribute the remaining mass the 3:nfrag bodies following the model SFD given by slope BETA mremaining = frag % mass_dist ( iMrem ) do i = iMrem , nfrag mfrag = ( 1 + i - iMslr ) ** ( - 3._DP / BETA ) * frag % mass_dist ( iMslr ) frag % mass ( i ) = mfrag mremaining = mremaining - mfrag end do ! If there is any residual mass (either positive or negative) we will distribute remaining mass proportionally among the the fragments if ( mremaining < 0.0_DP ) then ! If the remainder is negative, this means that that the number of fragments required by the SFD is smaller than our lower limit set by fraggle_generate. istart = iMrem ! We will reduce the mass of the 3:nfrag bodies to prevent the second-largest fragment from going smaller else ! If the remainder is postiive, this means that the number of fragments required by the SFD is larger than our upper limit set by computational expediency. istart = iMslr ! We will increase the mass of the 2:nfrag bodies to compensate, which ensures that the second largest fragment remains the second largest end if mfrag = 1._DP + mremaining / sum ( frag % mass ( istart : nfrag )) frag % mass ( istart : nfrag ) = frag % mass ( istart : nfrag ) * mfrag ! There may still be some small residual due to round-off error. If so, simply add it to the last bin of the mass distribution. mremaining = frag % mtot - sum ( frag % mass ( 1 : nfrag )) frag % mass ( nfrag ) = frag % mass ( nfrag ) + mremaining ! Compute physical properties of the new fragments select case ( frag % regime ) case ( COLLRESOLVE_REGIME_HIT_AND_RUN ) ! The hit and run case always preserves the largest body intact, so there is no need to recompute the physical properties of the first fragment frag % radius ( 1 ) = colliders % radius ( jtarg ) frag % density ( 1 ) = frag % mass_dist ( iMlr ) / volume ( jtarg ) frag % Ip (:, 1 ) = colliders % Ip (:, 1 ) istart = 2 case default istart = 1 end select frag % density ( istart : nfrag ) = frag % mtot / sum ( volume (:)) frag % radius ( istart : nfrag ) = ( 3 * frag % mass ( istart : nfrag ) / ( 4 * PI * frag % density ( istart : nfrag ))) ** ( 1.0_DP / 3.0_DP ) do i = istart , nfrag frag % Ip (:, i ) = Ip_avg (:) end do end associate return end subroutine fraggle_set_mass_dist_fragments module subroutine fraggle_set_coordinate_system ( self , colliders ) !! author: David A. Minton !! !! Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: x_cross_v , delta_r , delta_v , Ltot real ( DP ) :: r_col_norm , v_col_norm real ( DP ), dimension ( NDIM , self % nbody ) :: L_sigma associate ( frag => self , nfrag => self % nbody ) delta_v (:) = colliders % vb (:, 2 ) - colliders % vb (:, 1 ) v_col_norm = . mag . delta_v (:) delta_r (:) = colliders % xb (:, 2 ) - colliders % xb (:, 1 ) r_col_norm = . mag . delta_r (:) ! We will initialize fragments on a plane defined by the pre-impact system, with the z-axis aligned with the angular momentum vector ! and the y-axis aligned with the pre-impact distance vector. Ltot = colliders % L_orbit (:, 1 ) + colliders % L_orbit (:, 2 ) + colliders % L_spin (:, 1 ) + colliders % L_spin (:, 2 ) frag % y_coll_unit (:) = delta_r (:) / r_col_norm frag % z_coll_unit (:) = Ltot (:) / (. mag . Ltot (:)) ! The cross product of the y- by z-axis will give us the x-axis frag % x_coll_unit (:) = frag % y_coll_unit (:) . cross . frag % z_coll_unit (:) if (. not . any ( frag % x_coll (:,:) > 0.0_DP )) return frag % rmag (:) = . mag . frag % x_coll (:,:) call random_number ( L_sigma (:,:)) ! Randomize the tangential velocity direction. This helps to ensure that the tangential velocity doesn't completely line up with the angular momentum vector, ! otherwise we can get an ill-conditioned system do concurrent ( i = 1 : nfrag , frag % rmag ( i ) > 0.0_DP ) frag % v_r_unit (:, i ) = frag % x_coll (:, i ) / frag % rmag ( i ) frag % v_n_unit (:, i ) = frag % z_coll_unit (:) + 2e-1_DP * ( L_sigma (:, i ) - 0.5_DP ) frag % v_n_unit (:, i ) = frag % v_n_unit (:, i ) / (. mag . frag % v_n_unit (:, i )) frag % v_t_unit (:, i ) = frag % v_n_unit (:, i ) . cross . frag % v_r_unit (:, i ) frag % v_t_unit (:, i ) = frag % v_t_unit (:, i ) / (. mag . frag % v_t_unit (:, i )) end do end associate return end subroutine fraggle_set_coordinate_system ! module subroutine symba_set_collresolve_colliders(self, cb, pl, idx) !    !! author: David A. Minton !    !! !    !! Calculate the two-body equivalent values given a set of input collider indices !    use swiftest_classes, only : swiftest_nbody_system !    implicit none !    ! Arguments !    class(fraggle_colliders),               intent(inout) :: self !! Fraggle collider object !    class(symba_cb),                     intent(in)    :: cb   !! Swiftest central body object system object !    class(symba_pl),                     intent(in)    :: pl   !! Swiftest central body object system object !    integer(I4B),             dimension(:), intent(in)    :: idx  !! Index array of bodies from the pl object to use to calculate a \"two-body equivalent\" collisional pair !    ! Internals !    real(DP), dimension(NDIM, 2)  :: mxc, vc !    real(DP), dimension(NDIM) :: vcom, xcom !    associate(colliders => self) !       ! Compute orbital angular momentum of pre-impact system !       xcom(:) = (colliders%mass(1) * colliders%xb(:, 1) + colliders%mass(2) * colliders%xb(:, 2)) / sum(colliders%mass(:)) !       vcom(:) = (colliders%mass(1) * colliders%vb(:, 1) + colliders%mass(2) * colliders%vb(:, 2)) / sum(colliders%mass(:)) !       mxc(:, 1) = colliders%mass(1) * (colliders%xb(:, 1) - xcom(:)) !       mxc(:, 2) = colliders%mass(2) * (colliders%xb(:, 2) - xcom(:)) !       vc(:, 1) = colliders%vb(:, 1) - vcom(:) !       vc(:, 2) = colliders%vb(:, 2) - vcom(:) !       colliders%L_orbit(:,:) = mxc(:,:) .cross. vc(:,:) !    end associate !    return ! end subroutine symbe_set_collresolve_colliders module subroutine fraggle_set_natural_scale_factors ( self , colliders ) !! author: David A. Minton !! !! Scales dimenional quantities to ~O(1) with respect to the collisional system. !! This scaling makes it easier for the non-linear minimization to converge on a solution implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals integer ( I4B ) :: i associate ( frag => self ) ! Set scale factors frag % Escale = 0.5_DP * ( colliders % mass ( 1 ) * dot_product ( colliders % vb (:, 1 ), colliders % vb (:, 1 )) + colliders % mass ( 2 ) * dot_product ( colliders % vb (:, 2 ), colliders % vb (:, 2 ))) frag % dscale = sum ( colliders % radius (:)) frag % mscale = frag % mtot frag % vscale = sqrt ( frag % Escale / frag % mscale ) frag % tscale = frag % dscale / frag % vscale frag % Lscale = frag % mscale * frag % dscale * frag % vscale ! Scale all dimensioned quantities of colliders and fragments frag % xbcom (:) = frag % xbcom (:) / frag % dscale frag % vbcom (:) = frag % vbcom (:) / frag % vscale colliders % xb (:,:) = colliders % xb (:,:) / frag % dscale colliders % vb (:,:) = colliders % vb (:,:) / frag % vscale colliders % mass (:) = colliders % mass (:) / frag % mscale colliders % radius (:) = colliders % radius (:) / frag % dscale colliders % L_spin (:,:) = colliders % L_spin (:,:) / frag % Lscale do i = 1 , 2 colliders % rot (:, i ) = colliders % L_spin (:, i ) / ( colliders % mass ( i ) * colliders % radius ( i ) ** 2 * colliders % Ip ( 3 , i )) end do frag % mtot = frag % mtot / frag % mscale frag % mass = frag % mass / frag % mscale frag % radius = frag % radius / frag % dscale frag % Qloss = frag % Qloss / frag % Escale end associate return end subroutine fraggle_set_natural_scale_factors module subroutine fraggle_set_original_scale_factors ( self , colliders ) !! author: David A. Minton !! !! Restores dimenional quantities back to the system units use , intrinsic :: ieee_exceptions implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals integer ( I4B ) :: i logical , dimension ( size ( IEEE_ALL )) :: fpe_halting_modes call ieee_get_halting_mode ( IEEE_ALL , fpe_halting_modes ) ! Save the current halting modes so we can turn them off temporarily call ieee_set_halting_mode ( IEEE_ALL ,. false .) associate ( frag => self ) ! Restore scale factors frag % xbcom (:) = frag % xbcom (:) * frag % dscale frag % vbcom (:) = frag % vbcom (:) * frag % vscale colliders % mass = colliders % mass * frag % mscale colliders % radius = colliders % radius * frag % dscale colliders % xb = colliders % xb * frag % dscale colliders % vb = colliders % vb * frag % vscale colliders % L_spin = colliders % L_spin * frag % Lscale do i = 1 , 2 colliders % rot (:, i ) = colliders % L_spin (:, i ) * ( colliders % mass ( i ) * colliders % radius ( i ) ** 2 * colliders % Ip ( 3 , i )) end do frag % Qloss = frag % Qloss * frag % Escale frag % mtot = frag % mtot * frag % mscale frag % mass = frag % mass * frag % mscale frag % radius = frag % radius * frag % dscale frag % rot = frag % rot / frag % tscale frag % x_coll = frag % x_coll * frag % dscale frag % v_coll = frag % v_coll * frag % vscale do i = 1 , frag % nbody frag % xb (:, i ) = frag % x_coll (:, i ) + frag % xbcom (:) frag % vb (:, i ) = frag % v_coll (:, i ) + frag % vbcom (:) end do frag % mscale = 1.0_DP frag % dscale = 1.0_DP frag % vscale = 1.0_DP frag % tscale = 1.0_DP frag % Lscale = 1.0_DP frag % Escale = 1.0_DP end associate call ieee_set_halting_mode ( IEEE_ALL , fpe_halting_modes ) return end subroutine fraggle_set_original_scale_factors end submodule s_fraggle_set","tags":"","loc":"sourcefile/fraggle_set.f90.html"},{"title":"rmvs_discard.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_discard.f90~~EfferentGraph sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_discard Source Code rmvs_discard.f90 Source Code submodule ( rmvs_classes ) s_rmvs_discard use swiftest contains module subroutine rmvs_discard_tp ( self , system , param ) !! author: David A. Minton !! !! Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered !! !! Adapted from Hal Levison's Swift routine discard_pl.f !! Adapted from Hal Levison's Swift routine rmvs_discard_pl.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i character ( len = STRMAX ) :: timestr , idstri , idstrj if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , pl => system % pl , t => param % t ) do i = 1 , ntp associate ( iplperP => tp % plperP ( i )) if (( tp % status ( i ) == ACTIVE ) . and . ( tp % lperi ( i ))) then if (( tp % peri ( i ) < pl % radius ( iplperP ))) then tp % status ( i ) = DISCARDED_PLQ write ( idstri , * ) tp % id ( i ) write ( idstrj , * ) pl % id ( iplperP ) write ( timestr , * ) t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstri )) & // \") q with respect to massive body \" // trim ( adjustl ( pl % info ( iplperP )% name )) // \" (\" // trim ( adjustl ( idstrj )) & // \") is too small at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_PLQ\" , discard_time = t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = pl % id ( iplperP )) end if end if end associate end do ! Call the base method that this overrides call discard_tp ( tp , system , param ) end associate end subroutine rmvs_discard_tp end submodule s_rmvs_discard","tags":"","loc":"sourcefile/rmvs_discard.f90.html"},{"title":"rmvs_util.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_util.f90~~EfferentGraph sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_util Source Code rmvs_util.f90 Source Code submodule ( rmvs_classes ) s_rmvs_util use swiftest contains module subroutine rmvs_util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( rmvs_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % nenc , source % nenc , nold , nsrc , lsource_mask ) call util_append ( self % tpenc1P , source % tpenc1P , nold , nsrc , lsource_mask ) call util_append ( self % plind , source % plind , nold , nsrc , lsource_mask ) ! The following are not implemented as RMVS doesn't make use of fill operations on pl type ! So they are here as a placeholder in case someone wants to extend the RMVS class for some reason !call util_append(self%outer, source%outer, nold, nsrc, lsource_mask) !call util_append(self%inner, source%inner, nold, nsrc, lsource_mask) !call util_append(self%planetocentric, source%planetocentric, nold, nsrc, lsource_mask) call whm_util_append_pl ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class rmvs_pl or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine rmvs_util_append_pl module subroutine rmvs_util_append_tp ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from test particle object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( rmvs_tp ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % lperi , source % lperi , nold , nsrc , lsource_mask ) call util_append ( self % plperP , source % plperP , nold , nsrc , lsource_mask ) call util_append ( self % plencP , source % plencP , nold , nsrc , lsource_mask ) call util_append_tp ( self , source , lsource_mask ) ! Note: whm_tp does not have its own append method, so we skip back to the base class end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class rmvs_tp or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine rmvs_util_append_tp module subroutine rmvs_util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new RMVS massive body structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( inserts ) class is ( rmvs_pl ) call util_fill ( keeps % nenc , inserts % nenc , lfill_list ) call util_fill ( keeps % tpenc1P , inserts % tpenc1P , lfill_list ) call util_fill ( keeps % plind , inserts % plind , lfill_list ) ! The following are not implemented as RMVS doesn't make use of fill operations on pl type ! So they are here as a placeholder in case someone wants to extend the RMVS class for some reason !call util_fill(keeps%outer, inserts%outer, lfill_list) !call util_fill(keeps%inner, inserts%inner, lfill_list) !call util_fill(keeps%planetocentric, inserts%planetocentric, lfill_list) call whm_util_fill_pl ( keeps , inserts , lfill_list ) class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class rmvs_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_fill_pl module subroutine rmvs_util_fill_tp ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new RMVS test particle structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( rmvs_tp ) call util_fill ( keeps % lperi , inserts % lperi , lfill_list ) call util_fill ( keeps % plperP , inserts % plperP , lfill_list ) call util_fill ( keeps % plencP , inserts % plencP , lfill_list ) call util_fill_tp ( keeps , inserts , lfill_list ) ! Note: whm_tp does not have its own fill method, so we skip back to the base class class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class rmvs_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_fill_tp module subroutine rmvs_util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a massive body object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % nenc , nnew ) call util_resize ( self % tpenc1P , nnew ) call util_resize ( self % plind , nnew ) ! The following are not implemented as RMVS doesn't make use of resize operations on pl type ! So they are here as a placeholder in case someone wants to extend the RMVS class for some reason !call util_resize(self%outer, nnew) !call util_resize(self%inner, nnew) !call util_resize(self%planetocentric, nnew) call whm_util_resize_pl ( self , nnew ) return end subroutine rmvs_util_resize_pl module subroutine rmvs_util_resize_tp ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a test particle object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % lperi , nnew ) call util_resize ( self % plperP , nnew ) call util_resize ( self % plencP , nnew ) call util_resize ( self % xheliocentric , nnew ) call util_resize_tp ( self , nnew ) return end subroutine rmvs_util_resize_tp module subroutine rmvs_util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a RMVS massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"nenc\" ) call util_sort ( direction * pl % nenc ( 1 : npl ), ind ( 1 : npl )) case ( \"tpenc1P\" ) call util_sort ( direction * pl % tpenc1P ( 1 : npl ), ind ( 1 : npl )) case ( \"plind\" ) call util_sort ( direction * pl % plind ( 1 : npl ), ind ( 1 : npl )) case ( \"outer\" , \"inner\" , \"planetocentric\" , \"lplanetocentric\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call whm_util_sort_pl ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine rmvs_util_sort_pl module subroutine rmvs_util_sort_tp ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a RMVS test particle object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( tp => self , ntp => self % nbody ) allocate ( ind ( ntp )) select case ( sortby ) case ( \"plperP\" ) call util_sort ( direction * tp % plperP ( 1 : ntp ), ind ( 1 : ntp )) case ( \"plencP\" ) call util_sort ( direction * tp % plencP ( 1 : ntp ), ind ( 1 : ntp )) case ( \"lperi\" , \"cb_heliocentric\" , \"xheliocentric\" , \"index\" , \"ipleP\" , \"lplanetocentric\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class (*NOTE whm_tp does not need its own sort method, so we go straight to the swiftest_tp method) call util_sort_tp ( tp , sortby , ascending ) return end select call tp % rearrange ( ind ) end associate return end subroutine rmvs_util_sort_tp module subroutine rmvs_util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange RMVS massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % nenc , ind , npl ) call util_sort_rearrange ( pl % tpenc1P , ind , npl ) call util_sort_rearrange ( pl % plind , ind , npl ) call util_sort_rearrange_pl ( pl , ind ) end associate return end subroutine rmvs_util_sort_rearrange_pl module subroutine rmvs_util_sort_rearrange_tp ( self , ind ) !! author: David A. Minton !! !! Rearrange RMVS test particle object in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) call util_sort_rearrange ( tp % lperi , ind , ntp ) call util_sort_rearrange ( tp % plperP , ind , ntp ) call util_sort_rearrange ( tp % plencP , ind , ntp ) call util_sort_rearrange ( tp % xheliocentric , ind , ntp ) call util_sort_rearrange_tp ( tp , ind ) end associate return end subroutine rmvs_util_sort_rearrange_tp module subroutine rmvs_util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) RMVS test particle structure from active list to discard list !! !! Adapted from David E. Kaufmann's Swifter routine discard_discard_spill.f90 implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( discards ) class is ( rmvs_pl ) call util_spill ( keeps % nenc , discards % nenc , lspill_list , ldestructive ) call util_spill ( keeps % tpenc1P , discards % tpenc1P , lspill_list , ldestructive ) call util_spill ( keeps % plind , discards % plind , lspill_list , ldestructive ) call whm_util_spill_pl ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class rmvs_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_spill_pl module subroutine rmvs_util_spill_tp ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) RMVS test particle structure from active list to discard list !! !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( discards ) class is ( rmvs_tp ) call util_spill ( keeps % lperi , discards % lperi , lspill_list , ldestructive ) call util_spill ( keeps % plperP , discards % plperP , lspill_list , ldestructive ) call util_spill ( keeps % plencP , discards % plencP , lspill_list , ldestructive ) call util_spill_tp ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class rmvs_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_spill_tp end submodule s_rmvs_util","tags":"","loc":"sourcefile/rmvs_util.f90.html"},{"title":"rmvs_kick.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_kick.f90~~EfferentGraph sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_kick Source Code rmvs_kick.f90 Source Code submodule ( rmvs_classes ) s_rmvs_kick use swiftest contains module subroutine rmvs_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute the oblateness acceleration in the inner encounter region with planets !! !! Performs a similar task as David E. Kaufmann's Swifter routine rmvs_kick_getacch_tp.f90, but !! uses object polymorphism, and so is not directly adapted. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structuree class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals class ( swiftest_parameters ), allocatable :: param_planetocen real ( DP ), dimension (:, :), allocatable :: xh_original real ( DP ) :: GMcb_original integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , ipleP => self % ipleP , inner_index => self % index ) select type ( system ) class is ( rmvs_nbody_system ) if ( system % lplanetocentric ) then ! This is a close encounter step, so any accelerations requiring heliocentric position values ! must be handeled outside the normal WHM method call select type ( pl => system % pl ) class is ( rmvs_pl ) select type ( cb => system % cb ) class is ( rmvs_cb ) associate ( xpc => pl % xh , xpct => self % xh , apct => self % ah , system_planetocen => system ) system_planetocen % lbeg = lbeg ! Save the original heliocentric position for later allocate ( xh_original , source = tp % xh ) ! Temporarily turn off the heliocentric-dependent acceleration terms during an inner encounter using a copy of the parameter list with all of the heliocentric-specific acceleration terms turned off allocate ( param_planetocen , source = param ) param_planetocen % loblatecb = . false . param_planetocen % lextra_force = . false . param_planetocen % lgr = . false . ! Compute the planetocentric values of acceleration call whm_kick_getacch_tp ( tp , system_planetocen , param_planetocen , t , lbeg ) ! Now compute any heliocentric values of acceleration if ( tp % lfirst ) then do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % xheliocentric (:, i ) = tp % xh (:, i ) + cb % inner ( inner_index - 1 )% x (:, 1 ) end do else do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % xheliocentric (:, i ) = tp % xh (:, i ) + cb % inner ( inner_index )% x (:, 1 ) end do end if ! Swap the planetocentric and heliocentric position vectors and central body masses do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % xh (:, i ) = tp % xheliocentric (:, i ) end do GMcb_original = cb % Gmass cb % Gmass = tp % cb_heliocentric % Gmass ! If the heliocentric-specifc acceleration terms are requested, compute those now if ( param % loblatecb ) call tp % accel_obl ( system_planetocen ) if ( param % lextra_force ) call tp % accel_user ( system_planetocen , param , t , lbeg ) if ( param % lgr ) call tp % accel_gr ( param ) ! Put everything back the way we found it call move_alloc ( xh_original , tp % xh ) cb % Gmass = GMcb_original end associate end select end select else ! Not a close encounter, so just proceded with the standard WHM method call whm_kick_getacch_tp ( tp , system , param , t , lbeg ) end if end select end associate return end subroutine rmvs_kick_getacch_tp end submodule s_rmvs_kick","tags":"","loc":"sourcefile/rmvs_kick.f90.html"},{"title":"rmvs_io.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_io.f90~~EfferentGraph sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_io Source Code rmvs_io.f90 Source Code submodule ( rmvs_classes ) s_rmvs_io use swiftest contains module subroutine rmvs_io_write_encounter ( t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , & xh1 , xh2 , vh1 , vh2 , enc_out ) !! author: David A. Minton !! !! Write close encounter data from RMVS to output binary files !!  There is no direct file output from this subroutine !! !! Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90 !! Adapted from Hal Levison's Swift routine io_write_encounter.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: id1 , id2 real ( DP ), intent ( in ) :: t , Gmass1 , Gmass2 , radius1 , radius2 real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 , vh1 , vh2 character ( * ), intent ( in ) :: enc_out ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: LUN = 30 integer ( I4B ) :: ierr if ( enc_out == \"\" ) return open ( unit = LUN , file = enc_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , iostat = ierr ) if (( ierr /= 0 ) . and . lfirst ) then open ( unit = LUN , file = enc_out , status = 'NEW' , form = 'UNFORMATTED' , iostat = ierr ) end if if ( ierr /= 0 ) then write ( * , * ) \"Swiftest Error:\" write ( * , * ) \"   Unable to open binary encounter file\" call util_exit ( FAILURE ) end if lfirst = . false . call io_write_frame_encounter ( LUN , t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 ) close ( unit = LUN , iostat = ierr ) if ( ierr /= 0 ) then write ( * , * ) \"Swiftest Error:\" write ( * , * ) \"   Unable to close binary encounter file\" call util_exit ( FAILURE ) end if return end subroutine rmvs_io_write_encounter end submodule s_rmvs_io","tags":"","loc":"sourcefile/rmvs_io.f90.html"},{"title":"rmvs_setup.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_setup.f90~~EfferentGraph sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_setup Source Code rmvs_setup.f90 Source Code submodule ( rmvs_classes ) s_rmvs_setup use swiftest contains module subroutine rmvs_setup_pl ( self , n , param ) !! author: David A. Minton !! !! Allocate RMVS test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine rmvs_setup.f90 implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i , j !> Call allocation method for parent class associate ( pl => self ) call whm_setup_pl ( pl , n , param ) if ( n < 0 ) return if ( allocated ( pl % outer )) deallocate ( pl % outer ) if ( allocated ( pl % inner )) deallocate ( pl % inner ) if ( allocated ( pl % nenc )) deallocate ( pl % nenc ) if ( n == 0 ) return allocate ( pl % outer ( 0 : NTENC )) allocate ( pl % inner ( 0 : NTPHENC )) if (. not . pl % lplanetocentric ) then allocate ( pl % nenc ( n )) pl % nenc (:) = 0 ! Set up inner and outer planet interpolation vector storage containers do i = 0 , NTENC allocate ( pl % outer ( i )% x ( NDIM , n )) allocate ( pl % outer ( i )% v ( NDIM , n )) pl % outer ( i )% x (:,:) = 0.0_DP pl % outer ( i )% v (:,:) = 0.0_DP end do do i = 0 , NTPHENC allocate ( pl % inner ( i )% x ( NDIM , n )) allocate ( pl % inner ( i )% v ( NDIM , n )) pl % inner ( i )% x (:,:) = 0.0_DP pl % inner ( i )% v (:,:) = 0.0_DP end do if ( param % loblatecb ) then do i = 0 , NTPHENC allocate ( pl % inner ( i )% aobl ( NDIM , n )) pl % inner ( i )% aobl (:,:) = 0.0_DP end do end if if ( param % ltides ) then do i = 0 , NTPHENC allocate ( pl % inner ( i )% atide ( NDIM , n )) pl % inner ( i )% atide (:,:) = 0.0_DP end do end if end if end associate return end subroutine rmvs_setup_pl module subroutine rmvs_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize an RMVS nbody system from files and sets up the planetocentric structures. !! !! We currently rearrange the pl order to keep it consistent with the way Swifter does it !! In Swifter, the central body occupies the first position in the pl list, and during !! encounters, the encountering planet is skipped in loops. In Swiftest, we instantiate an !! RMVS nbody system object attached to each pl to store planetocentric versions of the system !! to use during close encounters. implicit none ! Arguments class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j ! Call parent method call whm_setup_initialize_system ( self , param ) ! Set up the pl-tp planetocentric encounter structures for pl and cb. The planetocentric tp structures are ! generated as necessary during close encounter steps. select type ( pl => self % pl ) class is ( rmvs_pl ) select type ( cb => self % cb ) class is ( rmvs_cb ) select type ( tp => self % tp ) class is ( rmvs_tp ) tp % cb_heliocentric = cb pl % lplanetocentric = . false . tp % lplanetocentric = . false . cb % lplanetocentric = . false . associate ( npl => pl % nbody ) allocate ( pl % planetocentric ( npl )) pl % planetocentric (:)% lplanetocentric = . true . do i = 1 , npl allocate ( pl % planetocentric ( i )% cb , source = cb ) allocate ( rmvs_pl :: pl % planetocentric ( i )% pl ) select type ( cbenci => pl % planetocentric ( i )% cb ) class is ( rmvs_cb ) select type ( plenci => pl % planetocentric ( i )% pl ) class is ( rmvs_pl ) cbenci % lplanetocentric = . true . plenci % lplanetocentric = . true . call plenci % setup ( npl , param ) plenci % status (:) = ACTIVE plenci % lmask (:) = . true . ! plind stores the heliocentric index value of a planetocentric planet ! e.g. Consider an encounter with planet 3. ! Then the following will be the values of plind: ! pl%planetocentric(3)%pl%plind(1) = 0 (central body - never used) ! pl%planetocentric(3)%pl%plind(2) = 1 ! pl%planetocentric(3)%pl%plind(3) = 2 ! pl%planetocentric(3)%pl%plind(4) = 4 ! pl%planetocentric(3)%pl%plind(5) = 5 ! etc. allocate ( plenci % plind ( npl )) plenci % plind ( 1 : npl ) = [( j , j = 1 , npl )] plenci % plind ( 2 : npl ) = pack ( plenci % plind ( 1 : npl ), plenci % plind ( 1 : npl ) /= i ) plenci % plind ( 1 ) = 0 plenci % Gmass ( 1 ) = cb % Gmass plenci % Gmass ( 2 : npl ) = pl % Gmass ( plenci % plind ( 2 : npl )) cbenci % Gmass = pl % Gmass ( i ) end select end select end do end associate end select end select end select return end subroutine rmvs_setup_initialize_system module subroutine rmvs_setup_tp ( self , n , param ) !! author: David A. Minton !! !! Allocate WHM test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class. In this case, whm does not have its own setup method, so we use the base method for swiftest_tp call setup_tp ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % lperi )) deallocate ( self % lperi ) if ( allocated ( self % plperP )) deallocate ( self % plperP ) if ( allocated ( self % plencP )) deallocate ( self % plencP ) if ( n == 0 ) return allocate ( self % lperi ( n )) allocate ( self % plperP ( n )) allocate ( self % plencP ( n )) if ( self % lplanetocentric ) then if ( allocated ( self % xheliocentric )) deallocate ( self % xheliocentric ) allocate ( self % xheliocentric ( NDIM , n )) end if self % lperi (:) = . false . return end subroutine rmvs_setup_tp end submodule s_rmvs_setup","tags":"","loc":"sourcefile/rmvs_setup.f90.html"},{"title":"rmvs_step.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_step.f90~~EfferentGraph sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_step Source Code rmvs_step.f90 Source Code submodule ( rmvs_classes ) s_rmvs_step use swiftest contains module subroutine rmvs_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies and and active test particles ahead in heliocentric coordinates !! !! Adapted from Hal Levison's Swift routine rmvs3_step.f !! Adapted from David E. Kaufmann's Swifter routine rmvs_step.f90 implicit none ! Arguments class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsiz ! Internals logical :: lencounter , lfirstpl , lfirsttp real ( DP ) :: rts real ( DP ), dimension (:,:), allocatable :: xbeg , xend , vbeg integer ( I4B ) :: i if ( self % tp % nbody == 0 ) call whm_step_system ( self , param , t , dt ) select type ( cb => self % cb ) class is ( rmvs_cb ) select type ( pl => self % pl ) class is ( rmvs_pl ) select type ( tp => self % tp ) class is ( rmvs_tp ) associate ( system => self , ntp => tp % nbody , npl => pl % nbody ) allocate ( xbeg , source = pl % xh ) allocate ( vbeg , source = pl % vh ) call pl % set_beg_end ( xbeg = xbeg , vbeg = vbeg ) ! ****** Check for close encounters ***** ! system % rts = RHSCALE lencounter = tp % encounter_check ( system , dt ) if ( lencounter ) then lfirstpl = pl % lfirst pl % outer ( 0 )% x (:, 1 : npl ) = xbeg (:, 1 : npl ) pl % outer ( 0 )% v (:, 1 : npl ) = vbeg (:, 1 : npl ) call pl % step ( system , param , t , dt ) pl % outer ( NTENC )% x (:, 1 : npl ) = pl % xh (:, 1 : npl ) pl % outer ( NTENC )% v (:, 1 : npl ) = pl % vh (:, 1 : npl ) call rmvs_interp_out ( cb , pl , dt ) call rmvs_step_out ( cb , pl , tp , system , param , t , dt ) tp % lmask ( 1 : ntp ) = . not . tp % lmask ( 1 : ntp ) call pl % set_beg_end ( xbeg = xbeg , xend = xend ) tp % lfirst = . true . call tp % step ( system , param , t , dt ) tp % lmask ( 1 : ntp ) = . true . pl % lfirst = lfirstpl tp % lfirst = . true . if ( param % ltides ) call system % step_spin ( param , t , dt ) else call whm_step_system ( system , param , t , dt ) end if end associate end select end select end select return end subroutine rmvs_step_system subroutine rmvs_interp_out ( cb , pl , dt ) !! author: David A. Minton !! !! Interpolate planet positions between two Keplerian orbits in outer encounter region !! !! Adapted from David E. Kaufmann's Swifter routine rmvs_interp_out.f90 !! !! Adapted from Hal Levison's Swift routine rmvs3_interp.f implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i , outer_index real ( DP ) :: frac , dntenc real ( DP ), dimension (:,:), allocatable :: xtmp , vtmp real ( DP ), dimension (:), allocatable :: GMcb , dto integer ( I4B ), dimension (:), allocatable :: iflag dntenc = real ( NTENC , kind = DP ) associate ( npl => pl % nbody ) allocate ( xtmp , mold = pl % xh ) allocate ( vtmp , mold = pl % vh ) allocate ( GMcb ( npl )) allocate ( dto ( npl )) allocate ( iflag ( npl )) dto ( 1 : npl ) = dt / dntenc GMcb ( 1 : npl ) = cb % Gmass xtmp (:, 1 : npl ) = pl % outer ( 0 )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % outer ( 0 )% v (:, 1 : npl ) do outer_index = 1 , NTENC - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & dto ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), dto ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( FAILURE ) end if end do end if frac = 1.0_DP - outer_index / dntenc pl % outer ( outer_index )% x (:, 1 : npl ) = frac * xtmp (:, 1 : npl ) pl % outer ( outer_index )% v (:, 1 : npl ) = frac * vtmp (:, 1 : npl ) end do xtmp (:, 1 : npl ) = pl % outer ( NTENC )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % outer ( NTENC )% v (:, 1 : npl ) do outer_index = NTENC - 1 , 1 , - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & - dto ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), - dto ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( FAILURE ) end if end do end if frac = outer_index / dntenc pl % outer ( outer_index )% x (:, 1 : npl ) = pl % outer ( outer_index )% x (:, 1 : npl ) + frac * xtmp (:, 1 : npl ) pl % outer ( outer_index )% v (:, 1 : npl ) = pl % outer ( outer_index )% v (:, 1 : npl ) + frac * vtmp (:, 1 : npl ) end do end associate return end subroutine rmvs_interp_out subroutine rmvs_step_out ( cb , pl , tp , system , param , t , dt ) !! author: David A. Minton !! !! Step ACTIVE test particles ahead in the outer encounter region, setting up and calling the inner region !!    integration if necessar !! !! Adapted from Hal Levison's Swift routines rmvs3_step_out.f and rmvs3_step_out2.f !! Adapted from David E. Kaufmann's Swifter routines rmvs_step_out.f90 and rmvs_step_out2.f90 implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsiz ! Internals integer ( I4B ) :: outer_index , j , k real ( DP ) :: dto , outer_time , rts logical :: lencounter , lfirsttp associate ( npl => pl % nbody , ntp => tp % nbody ) dto = dt / NTENC where ( tp % plencP ( 1 : ntp ) == 0 ) tp % lmask ( 1 : ntp ) = . false . elsewhere tp % lperi ( 1 : ntp ) = . false . end where do outer_index = 1 , NTENC outer_time = t + ( outer_index - 1 ) * dto call pl % set_beg_end ( xbeg = pl % outer ( outer_index - 1 )% x (:, 1 : npl ), & vbeg = pl % outer ( outer_index - 1 )% v (:, 1 : npl ), & xend = pl % outer ( outer_index )% x (:, 1 : npl )) system % rts = RHPSCALE lencounter = tp % encounter_check ( system , dto ) if ( lencounter ) then ! Interpolate planets in inner encounter region call rmvs_interp_in ( cb , pl , system , param , dto , outer_index ) ! Step through the inner region call rmvs_step_in ( cb , pl , tp , param , outer_time , dto ) lfirsttp = tp % lfirst tp % lfirst = . true . call tp % step ( system , param , outer_time , dto ) tp % lfirst = lfirsttp else call tp % step ( system , param , outer_time , dto ) end if do j = 1 , npl if ( pl % nenc ( j ) == 0 ) cycle tp % lfirst = . true . where (( tp % plencP ( 1 : ntp ) == j ) . and . (. not . tp % lmask ( 1 : ntp ))) tp % lmask ( 1 : ntp ) = . true . end where end do end do end associate return end subroutine rmvs_step_out subroutine rmvs_interp_in ( cb , pl , system , param , dt , outer_index ) !! author: David A. Minton !! !! Interpolate planet positions between two Keplerian orbits in inner encounter regio !! !! Adapted from David E. Kaufmann's Swifter routine rmvs_interp_in.f90 !! !! Adapted from Hal Levison's Swift routine rmvs3_interp.f implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS cenral body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Swiftest parameters file real ( DP ), intent ( in ) :: dt !! Step size integer ( I4B ), intent ( in ) :: outer_index !! Outer substep number within current set ! Internals integer ( I4B ) :: i , inner_index real ( DP ) :: frac , dntphenc real ( DP ), dimension (:,:), allocatable :: xtmp , vtmp , xh_original , ah_original real ( DP ), dimension (:), allocatable :: GMcb , dti integer ( I4B ), dimension (:), allocatable :: iflag associate ( npl => system % pl % nbody ) dntphenc = real ( NTPHENC , kind = DP ) ! Set the endpoints of the inner region from the outer region values in the current outer step index pl % inner ( 0 )% x (:, 1 : npl ) = pl % outer ( outer_index - 1 )% x (:, 1 : npl ) pl % inner ( 0 )% v (:, 1 : npl ) = pl % outer ( outer_index - 1 )% v (:, 1 : npl ) pl % inner ( NTPHENC )% x (:, 1 : npl ) = pl % outer ( outer_index )% x (:, 1 : npl ) pl % inner ( NTPHENC )% v (:, 1 : npl ) = pl % outer ( outer_index )% v (:, 1 : npl ) allocate ( xtmp , mold = pl % xh ) allocate ( vtmp , mold = pl % vh ) allocate ( GMcb ( npl )) allocate ( dti ( npl )) allocate ( iflag ( npl )) dti ( 1 : npl ) = dt / dntphenc GMcb ( 1 : npl ) = cb % Gmass xtmp (:, 1 : npl ) = pl % inner ( 0 )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % inner ( 0 )% v (:, 1 : npl ) if (( param % loblatecb ) . or . ( param % ltides )) then allocate ( xh_original , source = pl % xh ) allocate ( ah_original , source = pl % ah ) pl % xh (:, 1 : npl ) = xtmp (:, 1 : npl ) ! Temporarily replace heliocentric position with inner substep values to calculate the oblateness terms end if if ( param % loblatecb ) then call pl % accel_obl ( system ) pl % inner ( 0 )% aobl (:, 1 : npl ) = pl % aobl (:, 1 : npl ) ! Save the oblateness acceleration on the planet for this substep end if if ( param % ltides ) then call pl % accel_tides ( system ) pl % inner ( 0 )% atide (:, 1 : npl ) = pl % atide (:, 1 : npl ) ! Save the oblateness acceleration on the planet for this substep end if do inner_index = 1 , NTPHENC - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & dti ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), dti ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( failure ) end if end do end if frac = 1.0_DP - inner_index / dntphenc pl % inner ( inner_index )% x (:, 1 : npl ) = frac * xtmp (:, 1 : npl ) pl % inner ( inner_index )% v (:, 1 : npl ) = frac * vtmp (:, 1 : npl ) end do xtmp (:, 1 : npl ) = pl % inner ( NTPHENC )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % inner ( NTPHENC )% v (:, 1 : npl ) do inner_index = NTPHENC - 1 , 1 , - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & - dti ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), - dti ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( failure ) end if end do end if frac = inner_index / dntphenc pl % inner ( inner_index )% x (:, 1 : npl ) = pl % inner ( inner_index )% x (:, 1 : npl ) + frac * xtmp (:, 1 : npl ) pl % inner ( inner_index )% v (:, 1 : npl ) = pl % inner ( inner_index )% v (:, 1 : npl ) + frac * vtmp (:, 1 : npl ) if ( param % loblatecb ) then pl % xh (:, 1 : npl ) = pl % inner ( inner_index )% x (:, 1 : npl ) call pl % accel_obl ( system ) pl % inner ( inner_index )% aobl (:, 1 : npl ) = pl % aobl (:, 1 : npl ) end if if ( param % ltides ) then call pl % accel_tides ( system ) pl % inner ( inner_index )% atide (:, 1 : npl ) = pl % atide (:, 1 : npl ) end if end do if ( param % loblatecb ) then ! Calculate the final value of oblateness accelerations at the final inner substep pl % xh (:, 1 : npl ) = pl % inner ( NTPHENC )% x (:, 1 : npl ) call pl % accel_obl ( system ) pl % inner ( NTPHENC )% aobl (:, 1 : npl ) = pl % aobl (:, 1 : npl ) end if if ( param % ltides ) then call pl % accel_tides ( system ) pl % inner ( NTPHENC )% atide (:, 1 : npl ) = pl % atide (:, 1 : npl ) end if ! Put the planet positions and accelerations back into place if ( allocated ( xh_original )) call move_alloc ( xh_original , pl % xh ) if ( allocated ( ah_original )) call move_alloc ( ah_original , pl % ah ) end associate return end subroutine rmvs_interp_in subroutine rmvs_step_in ( cb , pl , tp , param , outer_time , dto ) !! author: David A. Minton !! !! Step active test particles ahead in the inner encounter region !! !! Adapted from Hal Levison's Swift routine rmvs3_step_in.f !! Adapted from David E. Kaufmann's Swifter routine rmvs_step_in.f90 implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: outer_time !! Current time real ( DP ), intent ( in ) :: dto !! Outer step size ! Internals logical :: lfirsttp integer ( I4B ) :: i , j , ipleP real ( DP ) :: dti , inner_time associate ( npl => pl % nbody ) dti = dto / NTPHENC call rmvs_make_planetocentric ( param , cb , pl , tp ) do i = 1 , npl if ( pl % nenc ( i ) == 0 ) cycle select type ( planetocen_system => pl % planetocentric ( i )) class is ( rmvs_nbody_system ) select type ( cbenci => planetocen_system % cb ) class is ( rmvs_cb ) select type ( plenci => planetocen_system % pl ) class is ( rmvs_pl ) select type ( tpenci => planetocen_system % tp ) class is ( rmvs_tp ) associate ( inner_index => tpenci % index ) ! There are inner encounters with this planet...switch to planetocentric coordinates to proceed tpenci % lfirst = . true . inner_time = outer_time call rmvs_peri_tp ( tpenci , pl , inner_time , dti , . true ., 0 , i , param ) ! now step the encountering test particles fully through the inner encounter lfirsttp = . true . do inner_index = 1 , NTPHENC ! Integrate over the encounter region, using the \"substitute\" planetocentric systems at each level plenci % xh (:, 1 : npl ) = plenci % inner ( inner_index - 1 )% x (:, 1 : npl ) call plenci % set_beg_end ( xbeg = plenci % inner ( inner_index - 1 )% x , & xend = plenci % inner ( inner_index )% x ) if ( param % loblatecb ) then cbenci % aoblbeg = cbenci % inner ( inner_index - 1 )% aobl (:, 1 ) cbenci % aoblend = cbenci % inner ( inner_index )% aobl (:, 1 ) end if if ( param % ltides ) then cbenci % atidebeg = cbenci % inner ( inner_index - 1 )% atide (:, 1 ) cbenci % atideend = cbenci % inner ( inner_index )% atide (:, 1 ) end if call tpenci % step ( planetocen_system , param , inner_time , dti ) do j = 1 , pl % nenc ( i ) tpenci % xheliocentric (:, j ) = tpenci % xh (:, j ) + pl % inner ( inner_index )% x (:, i ) end do inner_time = outer_time + j * dti call rmvs_peri_tp ( tpenci , pl , inner_time , dti , . false ., inner_index , i , param ) end do tpenci % lmask (:) = . false . end associate end select end select end select end select end do call rmvs_end_planetocentric ( pl , tp ) end associate return end subroutine rmvs_step_in subroutine rmvs_make_planetocentric ( param , cb , pl , tp ) !! author: David A. Minton !! !! When encounters are detected, this method will call the interpolation methods for the planets and !! creates a Swiftest test particle structure for each planet's encountering test particles to simplify the !! planetocentric calculations. This subroutine is not based on an existing one from Swift and Swifter !! implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration paramete class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object ! Internals integer ( I4B ) :: i , j , inner_index , ipc2hc logical , dimension (:), allocatable :: encmask associate ( npl => pl % nbody , ntp => tp % nbody ) do i = 1 , npl if ( pl % nenc ( i ) == 0 ) cycle ! There are inner encounters with this planet if ( allocated ( encmask )) deallocate ( encmask ) allocate ( encmask ( ntp )) encmask ( 1 : ntp ) = tp % plencP ( 1 : ntp ) == i allocate ( rmvs_tp :: pl % planetocentric ( i )% tp ) ! Create encountering test particle structure select type ( cbenci => pl % planetocentric ( i )% cb ) class is ( rmvs_cb ) select type ( plenci => pl % planetocentric ( i )% pl ) class is ( rmvs_pl ) select type ( tpenci => pl % planetocentric ( i )% tp ) class is ( rmvs_tp ) tpenci % lplanetocentric = . true . associate ( nenci => pl % nenc ( i )) call tpenci % setup ( nenci , param ) tpenci % cb_heliocentric = cb tpenci % ipleP = i tpenci % lmask ( 1 : nenci ) = . true . tpenci % status ( 1 : nenci ) = ACTIVE ! Grab all the encountering test particles and convert them to a planetocentric frame tpenci % id ( 1 : nenci ) = pack ( tp % id ( 1 : ntp ), encmask ( 1 : ntp )) do j = 1 , NDIM tpenci % xheliocentric ( j , 1 : nenci ) = pack ( tp % xh ( j , 1 : ntp ), encmask (:)) tpenci % xh ( j , 1 : nenci ) = tpenci % xheliocentric ( j , 1 : nenci ) - pl % inner ( 0 )% x ( j , i ) tpenci % vh ( j , 1 : nenci ) = pack ( tp % vh ( j , 1 : ntp ), encmask ( 1 : ntp )) - pl % inner ( 0 )% v ( j , i ) end do tpenci % lperi ( 1 : nenci ) = pack ( tp % lperi ( 1 : ntp ), encmask ( 1 : ntp )) tpenci % plperP ( 1 : nenci ) = pack ( tp % plperP ( 1 : ntp ), encmask ( 1 : ntp )) ! Make sure that the test particles get the planetocentric value of mu allocate ( cbenci % inner ( 0 : NTPHENC )) do inner_index = 0 , NTPHENC allocate ( plenci % inner ( inner_index )% x , mold = pl % inner ( inner_index )% x ) allocate ( plenci % inner ( inner_index )% v , mold = pl % inner ( inner_index )% x ) allocate ( cbenci % inner ( inner_index )% x ( NDIM , 1 )) allocate ( cbenci % inner ( inner_index )% v ( NDIM , 1 )) cbenci % inner ( inner_index )% x (:, 1 ) = pl % inner ( inner_index )% x (:, i ) cbenci % inner ( inner_index )% v (:, 1 ) = pl % inner ( inner_index )% v (:, i ) plenci % inner ( inner_index )% x (:, 1 ) = - cbenci % inner ( inner_index )% x (:, 1 ) plenci % inner ( inner_index )% v (:, 1 ) = - cbenci % inner ( inner_index )% v (:, 1 ) if ( param % loblatecb ) then allocate ( plenci % inner ( inner_index )% aobl , mold = pl % inner ( inner_index )% aobl ) allocate ( cbenci % inner ( inner_index )% aobl ( NDIM , 1 )) cbenci % inner ( inner_index )% aobl (:, 1 ) = pl % inner ( inner_index )% aobl (:, i ) end if if ( param % ltides ) then allocate ( plenci % inner ( inner_index )% atide , mold = pl % inner ( inner_index )% atide ) allocate ( cbenci % inner ( inner_index )% atide ( NDIM , 1 )) cbenci % inner ( inner_index )% atide (:, 1 ) = pl % inner ( inner_index )% atide (:, i ) end if do j = 2 , npl ipc2hc = plenci % plind ( j ) plenci % inner ( inner_index )% x (:, j ) = pl % inner ( inner_index )% x (:, ipc2hc ) - cbenci % inner ( inner_index )% x (:, 1 ) plenci % inner ( inner_index )% v (:, j ) = pl % inner ( inner_index )% v (:, ipc2hc ) - cbenci % inner ( inner_index )% v (:, 1 ) end do end do call tpenci % set_mu ( cbenci ) end associate end select end select end select end do end associate return end subroutine rmvs_make_planetocentric subroutine rmvs_peri_tp ( tp , pl , t , dt , lfirst , inner_index , ipleP , param ) !! author: David A. Minton !! !! Determine planetocentric pericenter passages for test particles in close encounters with a planet !! !! Adapted from Hal Levison's Swift routine Adapted from Hal Levison's Swift routine util_peri.f !! Adapted from David E. Kaufmann's Swifter routine rmvs_peri.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object (planetocentric) class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object (heliocentric) real ( DP ), intent ( in ) :: t !! current time real ( DP ), intent ( in ) :: dt !! step size logical , intent ( in ) :: lfirst !! Logical flag indicating whether current invocation is the first integer ( I4B ), intent ( in ) :: inner_index !! Outer substep number within current set integer ( I4B ), intent ( in ) :: ipleP !!  index of RMVS planet being closely encountered class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , id1 , id2 real ( DP ) :: r2 , mu , rhill2 , vdotr , a , peri , capm , tperi , rpl real ( DP ), dimension ( NDIM ) :: xh1 , xh2 , vh1 , vh2 rhill2 = pl % rhill ( ipleP ) ** 2 mu = pl % Gmass ( ipleP ) associate ( nenc => tp % nbody , xpc => tp % xh , vpc => tp % vh ) if ( lfirst ) then do i = 1 , nenc if ( tp % lmask ( i )) then vdotr = dot_product ( xpc (:, i ), vpc (:, i )) if ( vdotr > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end do else do i = 1 , nenc if ( tp % lmask ( i )) then vdotr = dot_product ( xpc (:, i ), vpc (:, i )) if ( tp % isperi ( i ) == - 1 ) then if ( vdotr >= 0.0_DP ) then tp % isperi ( i ) = 0 call orbel_xv2aqt ( mu , xpc (:, i ), vpc (:, i ), a , peri , capm , tperi ) r2 = dot_product ( xpc (:, i ), xpc (:, i )) if (( abs ( tperi ) > FACQDT * dt ) . or . ( r2 > rhill2 )) peri = sqrt ( r2 ) if ( param % enc_out /= \"\" ) then id1 = pl % id ( ipleP ) rpl = pl % radius ( ipleP ) xh1 (:) = pl % inner ( inner_index )% x (:, ipleP ) vh1 (:) = pl % inner ( inner_index )% v (:, ipleP ) id2 = tp % id ( i ) xh2 (:) = xpc (:, i ) + xh1 (:) vh2 (:) = xpc (:, i ) + vh1 (:) call rmvs_io_write_encounter ( t , id1 , id2 , mu , 0.0_DP , rpl , 0.0_DP , xh1 (:), xh2 (:), vh1 (:), vh2 (:), param % enc_out ) end if if ( tp % lperi ( i )) then if ( peri < tp % peri ( i )) then tp % peri ( i ) = peri tp % plperP ( i ) = ipleP end if else tp % lperi ( i ) = . true . tp % peri ( i ) = peri tp % plperP ( i ) = ipleP end if end if else if ( vdotr > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end if end do end if end associate return end subroutine rmvs_peri_tp subroutine rmvs_end_planetocentric ( pl , tp ) !! author: David A. Minton !! !! Deallocates all of the encountering particle data structures for next time !! implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle objec ! Internals integer ( I4B ) :: i , j , inner_index integer ( I4B ), dimension (:), allocatable :: tpind logical , dimension (:), allocatable :: encmask associate ( npl => pl % nbody , ntp => tp % nbody ) do i = 1 , npl if ( pl % nenc ( i ) == 0 ) cycle select type ( cbenci => pl % planetocentric ( i )% cb ) class is ( rmvs_cb ) select type ( plenci => pl % planetocentric ( i )% pl ) class is ( rmvs_pl ) select type ( tpenci => pl % planetocentric ( i )% tp ) class is ( rmvs_tp ) associate ( nenci => pl % nenc ( i )) if ( allocated ( tpind )) deallocate ( tpind ) allocate ( tpind ( nenci )) ! Index array of encountering test particles if ( allocated ( encmask )) deallocate ( encmask ) allocate ( encmask ( ntp )) encmask ( 1 : ntp ) = tp % plencP ( 1 : ntp ) == i tpind ( 1 : nenci ) = pack ([( j , j = 1 , ntp )], encmask ( 1 : ntp )) ! Copy the results of the integration back over and shift back to heliocentric reference tp % status ( tpind ( 1 : nenci )) = tpenci % status ( 1 : nenci ) tp % lmask ( tpind ( 1 : nenci )) = tpenci % lmask ( 1 : nenci ) do j = 1 , NDIM tp % xh ( j , tpind ( 1 : nenci )) = tpenci % xh ( j , 1 : nenci ) + pl % inner ( NTPHENC )% x ( j , i ) tp % vh ( j , tpind ( 1 : nenci )) = tpenci % vh ( j , 1 : nenci ) + pl % inner ( NTPHENC )% v ( j , i ) end do tp % lperi ( tpind ( 1 : nenci )) = tpenci % lperi ( 1 : nenci ) tp % plperP ( tpind ( 1 : nenci )) = tpenci % plperP ( 1 : nenci ) deallocate ( pl % planetocentric ( i )% tp ) deallocate ( cbenci % inner ) do inner_index = 0 , NTPHENC deallocate ( plenci % inner ( inner_index )% x ) deallocate ( plenci % inner ( inner_index )% v ) if ( allocated ( plenci % inner ( inner_index )% aobl )) deallocate ( plenci % inner ( inner_index )% aobl ) if ( allocated ( plenci % inner ( inner_index )% atide )) deallocate ( plenci % inner ( inner_index )% atide ) end do end associate end select end select end select end do end associate return end subroutine rmvs_end_planetocentric end submodule s_rmvs_step","tags":"","loc":"sourcefile/rmvs_step.f90.html"},{"title":"rmvs_encounter_check.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_encounter_check.f90~~EfferentGraph sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_chk Source Code rmvs_encounter_check.f90 Source Code submodule ( rmvs_classes ) s_rmvs_chk use swiftest contains module function rmvs_encounter_check_tp ( self , system , dt ) result ( lencounter ) !! author: David A. Minton !! !! Determine whether a test particle and planet are having or will have an encounter within the next time step !! !! Adapted from David E. Kaufmann's Swifter routine: rmvs_chk.f90 !! Adapted from Hal Levison's Swift routine rmvs3_chk.f implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object real ( DP ), intent ( in ) :: dt !! step size ! Result logical :: lencounter !! Returns true if there is at least one close encounter ! Internals integer ( I4B ) :: i , j real ( DP ) :: r2 , v2 , vdotr real ( DP ), dimension ( NDIM ) :: xr , vr real ( DP ), dimension ( system % pl % nbody ) :: r2crit logical :: lflag lencounter = . false . if ( self % nbody == 0 ) return select type ( pl => system % pl ) class is ( rmvs_pl ) associate ( tp => self , ntp => self % nbody , npl => pl % nbody , rts => system % rts ) r2crit ( 1 : npl ) = ( rts * pl % rhill ( 1 : npl )) ** 2 tp % plencP ( 1 : ntp ) = 0 do j = 1 , npl do i = 1 , ntp if ((. not . tp % lmask ( i )). or .( tp % plencP ( i ) /= 0 )) cycle xr (:) = tp % xh (:, i ) - pl % xbeg (:, j ) vr (:) = tp % vh (:, i ) - pl % vbeg (:, j ) r2 = dot_product ( xr (:), xr (:)) v2 = dot_product ( vr (:), vr (:)) vdotr = dot_product ( vr (:), xr (:)) lflag = rmvs_chk_ind ( r2 , v2 , vdotr , dt , r2crit ( j )) if ( lflag ) tp % plencP ( i ) = j end do pl % nenc ( j ) = count ( tp % plencP ( 1 : ntp ) == j ) end do lencounter = any ( pl % nenc ( 1 : npl ) > 0 ) end associate end select return end function rmvs_encounter_check_tp module elemental function rmvs_chk_ind ( r2 , v2 , vdotr , dt , r2crit ) result ( lflag ) !! author: David A. Minton !! !! Determine whether a test particle and planet are having or will have an encounter within the next time step !! !! Adapted from David E. Kaufmann's Swifter routine: rmvs_chk_ind.f90 !! Adapted from Hal Levison's Swift routine rmvs_chk_ind.f implicit none ! Arguments real ( DP ), intent ( in ) :: r2 , v2 , vdotr , dt , r2crit logical :: lflag ! Internals real ( DP ) :: tmin , r2min lflag = . false . if ( r2 < r2crit ) then lflag = . true . else if ( vdotr < 0.0_DP ) then tmin = - vdotr / v2 if ( tmin < dt ) then r2min = r2 - vdotr ** 2 / v2 else r2min = r2 + 2 * vdotr * dt + v2 * dt ** 2 end if r2min = min ( r2min , r2 ) lflag = ( r2min <= r2crit ) end if end if return end function rmvs_chk_ind end submodule s_rmvs_chk","tags":"","loc":"sourcefile/rmvs_encounter_check.f90.html"},{"title":"tides_derivs_func – swiftest ","text":"type, extends(lambda_obj_tvar) :: tides_derivs_func Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Inherits type~~tides_derivs_func~~InheritsGraph type~tides_derivs_func tides_derivs_func lambda_obj_tvar lambda_obj_tvar type~tides_derivs_func->lambda_obj_tvar Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr_tides_deriv xbeg xend dt Type-Bound Procedures init evalt tides_derivs_init Components Type Visibility Attributes Name Initial procedure( tidederiv ), public, pointer, nopass :: lambdaptr_tides_deriv real(kind=DP), public, dimension(:,:), allocatable :: xbeg real(kind=DP), public, dimension(:,:), allocatable :: xend real(kind=DP), public :: dt Type-Bound Procedures generic, public :: init => tides_derivs_init function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) procedure, public :: evalt => tides_derivs_eval function tides_derivs_eval (self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( tides_derivs_func ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable procedure, public, nopass :: tides_derivs_init function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func )","tags":"","loc":"type/tides_derivs_func.html"},{"title":"rmvs_nbody_system – swiftest ","text":"type, public, extends( whm_nbody_system ) :: rmvs_nbody_system Inherits type~~rmvs_nbody_system~~InheritsGraph type~rmvs_nbody_system rmvs_nbody_system type~whm_nbody_system whm_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~rmvs_nbody_system~~InheritedByGraph type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg lplanetocentric rts vbeg Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr initialize step Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles logical, public :: lplanetocentric = .false. In the RMVS integrator, only test particles are discarded\n Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations real(kind=DP), public :: rts fraction of Hill's sphere radius to use as radius of encounter region real(kind=DP), public, dimension(:,:), allocatable :: vbeg Planet velocities at beginning ot step Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: initialize => rmvs_setup_initialize_system Replace the abstract procedures with concrete ones\n Performs RMVS-specific initilization steps, including generating the close encounter planetocentric structures interface public module subroutine rmvs_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters procedure, public :: step => rmvs_step_system Advance the RMVS nbody system forward in time by one step interface public module subroutine rmvs_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"type/rmvs_nbody_system.html"},{"title":"rmvs_interp – swiftest ","text":"type, private :: rmvs_interp Inherited by type~~rmvs_interp~~InheritedByGraph type~rmvs_interp rmvs_interp type~rmvs_cb rmvs_cb type~rmvs_cb->type~rmvs_interp outer, inner type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_interp outer, inner type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables x v aobl atide Components Type Visibility Attributes Name Initial real(kind=DP), public, dimension(:, :), allocatable :: x interpolated heliocentric planet position for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: v interpolated heliocentric planet velocity for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: aobl Encountering planet's oblateness acceleration value real(kind=DP), public, dimension(:, :), allocatable :: atide Encountering planet's tidal acceleration value","tags":"","loc":"type/rmvs_interp.html"},{"title":"rmvs_cb – swiftest ","text":"type, public, extends( whm_cb ) :: rmvs_cb RMVS central body particle class Inherits type~~rmvs_cb~~InheritsGraph type~rmvs_cb rmvs_cb type~rmvs_interp rmvs_interp type~rmvs_cb->type~rmvs_interp outer, inner type~whm_cb whm_cb type~rmvs_cb->type~whm_cb type~swiftest_cb swiftest_cb type~whm_cb->type~swiftest_cb type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~rmvs_cb~~InheritedByGraph type~rmvs_cb rmvs_cb type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL outer inner lplanetocentric Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/rmvs_cb.html"},{"title":"rmvs_tp – swiftest ","text":"type, public, extends( whm_tp ) :: rmvs_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as rmvs_setup_tp and rmvs_util_spill_tp Inherits type~~rmvs_tp~~InheritsGraph type~rmvs_tp rmvs_tp type~rmvs_cb rmvs_cb type~rmvs_tp->type~rmvs_cb cb_heliocentric type~whm_tp whm_tp type~rmvs_tp->type~whm_tp type~rmvs_interp rmvs_interp type~rmvs_cb->type~rmvs_interp outer, inner type~whm_cb whm_cb type~rmvs_cb->type~whm_cb type~swiftest_tp swiftest_tp type~whm_tp->type~swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_cb swiftest_cb type~whm_cb->type~swiftest_cb type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp lperi plperP plencP cb_heliocentric xheliocentric index ipleP lplanetocentric Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame accel_int accel_obl h2b b2h vb2vh vh2vb xh2xb get_peri set_mu accel_gr gr_pos_kick kick step discard encounter_check accel setup append fill resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp logical, public, dimension(:), allocatable :: lperi planetocentric pericenter passage flag (persistent for a full rmvs time step) over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plperP index of planet associated with pericenter distance peri (persistent over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plencP index of planet that test particle is encountering (not persistent for a full RMVS time step) type( rmvs_cb ), public :: cb_heliocentric Copy of original central body object passed to close encounter (used for oblateness acceleration during planetocentric encoountters) real(kind=DP), public, dimension(:,:), allocatable :: xheliocentric original heliocentric position (used for oblateness calculation during close encounters) integer(kind=I4B), public :: index inner substep number within current set integer(kind=I4B), public :: ipleP index value of encountering planet logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles interface public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => whm_step_tp Steps the particle forward one stepsize interface public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize procedure, public :: discard => rmvs_discard_tp Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered interface public module subroutine rmvs_discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters procedure, public :: encounter_check => rmvs_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body interface public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter procedure, public :: accel => rmvs_kick_getacch_tp Calculates either the standard or modified version of the acceleration depending if the\n    if the test particle is undergoing a close encounter or not interface public module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: setup => rmvs_setup_tp Constructor method - Allocates space for the input number of bodiess interface public module subroutine rmvs_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parametere procedure, public :: append => rmvs_util_append_tp Appends elements from one structure to another interface public module subroutine rmvs_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => rmvs_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => rmvs_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine rmvs_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => rmvs_util_sort_tp Sorts body arrays by a sortable componen interface public module subroutine rmvs_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => rmvs_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine rmvs_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => rmvs_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/rmvs_tp.html"},{"title":"rmvs_pl – swiftest ","text":"type, public, extends( whm_pl ) :: rmvs_pl RMVS massive body particle class Inherits type~~rmvs_pl~~InheritsGraph type~rmvs_pl rmvs_pl type~whm_pl whm_pl type~rmvs_pl->type~whm_pl type~rmvs_interp rmvs_interp type~rmvs_pl->type~rmvs_interp outer, inner type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~swiftest_pl swiftest_pl type~whm_pl->type~swiftest_pl type~whm_nbody_system whm_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_cb->type~swiftest_base type~swiftest_cb->type~swiftest_particle_info info type~swiftest_tp->type~swiftest_body Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl eta xj vj muj ir3j nenc tpenc1P plind outer inner planetocentric lplanetocentric Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user write_frame discard index accel_int accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_rhill h2j j2h vh2vj drift accel_gr gr_pos_kick accel kick set_ir3 set_mu step setup append fill resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl integer(kind=I4B), public, dimension(:), allocatable :: nenc number of test particles encountering planet this full rmvs time step integer(kind=I4B), public, dimension(:), allocatable :: tpenc1P index of first test particle encountering planet integer(kind=I4B), public, dimension(:), allocatable :: plind Connects the planetocentric indices back to the heliocentric planet list type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters class( rmvs_nbody_system ), public, dimension(:), allocatable :: planetocentric Planetocentric version of the massive body objects (one for each massive body) logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates interface public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates interface public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies interface public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) interface public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. interface public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: step => whm_step_pl Steps the body forward one stepsize interface public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: setup => rmvs_setup_pl Constructor method - Allocates space for the input number of bodiess interface public module subroutine rmvs_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: append => rmvs_util_append_pl Appends elements from one structure to another interface public module subroutine rmvs_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => rmvs_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => rmvs_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine rmvs_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => rmvs_util_sort_pl Sorts body arrays by a sortable componen interface public module subroutine rmvs_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => rmvs_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine rmvs_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => rmvs_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/rmvs_pl.html"},{"title":"walltimer – swiftest ","text":"type, public :: walltimer Contents Variables count_rate count_max count_start_main count_start_step count_finish_step lmain_is_started Type-Bound Procedures reset start finish Components Type Visibility Attributes Name Initial integer(kind=I8B), public :: count_rate Rate at wich the clock ticks integer(kind=I8B), public :: count_max Maximum value of the clock ticker integer(kind=I8B), public :: count_start_main Value of the clock ticker at when the timer is first called integer(kind=I8B), public :: count_start_step Value of the clock ticker at the start of a timed step integer(kind=I8B), public :: count_finish_step Value of the clock ticker at the end of a timed step logical, public :: lmain_is_started = .false. Logical flag indicating whether or not the main timer has been reset or not Type-Bound Procedures procedure, public :: reset => walltime_reset Resets the clock ticker, settting main_start to the current ticker value interface public subroutine walltime_reset(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object procedure, public :: start => walltime_start Starts the timer, setting step_start to the current ticker value interface public subroutine walltime_start(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object procedure, public :: finish => walltime_finish Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal interface public subroutine walltime_finish(self, nsubsteps, message) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output","tags":"","loc":"type/walltimer.html"},{"title":"helio_nbody_system – swiftest ","text":"type, public, extends( whm_nbody_system ) :: helio_nbody_system Inherits type~~helio_nbody_system~~InheritsGraph type~helio_nbody_system helio_nbody_system type~whm_nbody_system whm_nbody_system type~helio_nbody_system->type~whm_nbody_system type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_nbody_system~~InheritedByGraph type~helio_nbody_system helio_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr step initialize Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: step => helio_step_system Advance the Helio nbody system forward in time by one step interface public module subroutine helio_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: initialize => helio_setup_initialize_system Performs Helio-specific initilization steps, including converting to DH coordinates interface public module subroutine helio_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"type/helio_nbody_system.html"},{"title":"helio_cb – swiftest ","text":"type, public, extends( swiftest_cb ) :: helio_cb Helio central body particle class Inherits type~~helio_cb~~InheritsGraph type~helio_cb helio_cb type~swiftest_cb swiftest_cb type~helio_cb->type~swiftest_cb type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_cb~~InheritedByGraph type~helio_cb helio_cb type~symba_cb symba_cb type~symba_cb->type~helio_cb Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL ptbeg ptend Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/helio_cb.html"},{"title":"helio_pl – swiftest ","text":"type, public, extends( swiftest_pl ) :: helio_pl Inherits type~~helio_pl~~InheritsGraph type~helio_pl helio_pl type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_pl~~InheritedByGraph type~helio_pl helio_pl type~symba_pl symba_pl type~symba_pl->type~helio_pl type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard index accel_int accel_obl setup accel_tides append h2b b2h vh2vb vb2vh xh2xb fill resize set_beg_end set_mu set_rhill sort rearrange spill drift lindrift accel_gr gr_pos_kick accel kick step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays interface public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: append => util_append_pl Appends elements from one structure to another interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: drift => helio_drift_pl Method for Danby drift in Democratic Heliocentric coordinates interface public module subroutine helio_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => helio_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_pl Steps the body forward one stepsize interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"type/helio_pl.html"},{"title":"helio_tp – swiftest ","text":"type, public, extends( swiftest_tp ) :: helio_tp Inherits type~~helio_tp~~InheritsGraph type~helio_tp helio_tp type~swiftest_tp swiftest_tp type~helio_tp->type~swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_tp~~InheritedByGraph type~helio_tp helio_tp type~symba_tp symba_tp type~symba_tp->type~helio_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl setup append h2b b2h vb2vh vh2vb xh2xb fill get_peri resize set_mu sort rearrange spill lindrift drift accel_gr gr_pos_kick accel kick step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr procedure, public :: append => util_append_tp Appends elements from one structure to another interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => helio_drift_tp Method for Danby drift in Democratic Heliocentric coordinates interface public module subroutine helio_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => helio_kick_getacch_tp Compute heliocentric accelerations of massive bodies interface public module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities interface public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_tp Steps the body forward one stepsize interface public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee","tags":"","loc":"type/helio_tp.html"},{"title":"whm_cb – swiftest ","text":"type, public, extends( swiftest_cb ) :: whm_cb Swiftest central body particle class Inherits type~~whm_cb~~InheritsGraph type~whm_cb whm_cb type~swiftest_cb swiftest_cb type~whm_cb->type~swiftest_cb type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_cb~~InheritedByGraph type~whm_cb whm_cb type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/whm_cb.html"},{"title":"whm_pl – swiftest ","text":"type, public, extends( swiftest_pl ) :: whm_pl WHM massive body particle class Inherits type~~whm_pl~~InheritsGraph type~whm_pl whm_pl type~swiftest_pl swiftest_pl type~whm_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_pl~~InheritedByGraph type~whm_pl whm_pl type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl eta xj vj muj ir3j Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user write_frame discard index accel_int accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_rhill h2j j2h vh2vj drift accel_gr gr_pos_kick accel kick append fill resize set_ir3 set_mu sort rearrange spill setup step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates interface public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates interface public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies interface public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: append => whm_util_append_pl Appends elements from one structure to another interface public module subroutine whm_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => whm_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine whm_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => whm_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine whm_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) interface public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. interface public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => whm_util_sort_pl Sort a WHM massive body object in-place. interface public module subroutine whm_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => whm_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine whm_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => whm_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: setup => whm_setup_pl Constructor method - Allocates space for the input number of bodiess interface public module subroutine whm_setup_pl(self, n, param) Implementation → Reads WHM massive body object in from file Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body objectobject integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: step => whm_step_pl Steps the body forward one stepsize interface public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"type/whm_pl.html"},{"title":"whm_tp – swiftest ","text":"type, public, extends( swiftest_tp ) :: whm_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_util_spill_tp Inherits type~~whm_tp~~InheritsGraph type~whm_tp whm_tp type~swiftest_tp swiftest_tp type~whm_tp->type~swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_tp~~InheritedByGraph type~whm_tp whm_tp type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl setup append h2b b2h vb2vh vh2vb xh2xb fill get_peri resize set_mu sort rearrange spill accel_gr gr_pos_kick accel kick step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr procedure, public :: append => util_append_tp Appends elements from one structure to another interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => whm_kick_getacch_tp Compute heliocentric accelerations of test particles interface public module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of the test particle Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles interface public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => whm_step_tp Steps the particle forward one stepsize interface public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"type/whm_tp.html"},{"title":"whm_nbody_system – swiftest ","text":"type, public, extends( swiftest_nbody_system ) :: whm_nbody_system An abstract class for the WHM integrator nbody system Inherits type~~whm_nbody_system~~InheritsGraph type~whm_nbody_system whm_nbody_system type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_nbody_system~~InheritedByGraph type~whm_nbody_system whm_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr initialize step Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: initialize => whm_setup_initialize_system Replace the abstract procedures with concrete ones interface public module subroutine whm_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters procedure, public :: step => whm_step_system Advance the WHM nbody system forward in time by one step interface public module subroutine whm_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"type/whm_nbody_system.html"},{"title":"fraggle_colliders – swiftest ","text":"type, public :: fraggle_colliders Class definition for the variables that describe the bodies involved in the collision Contents Variables ncoll idx xb vb rot L_spin L_orbit Ip mass radius Type-Bound Procedures regime Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: ncoll Number of bodies involved in the collision integer(kind=I4B), public, dimension(:), allocatable :: idx Index of bodies involved in the collision real(kind=DP), public, dimension(NDIM,2) :: xb Two-body equivalent position vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: vb Two-body equivalent velocity vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: rot Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_spin Two-body equivalent spin angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_orbit Two-body equivalent orbital angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: Ip Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(2) :: mass Two-body equivalent mass of the collider bodies prior to the collision real(kind=DP), public, dimension(2) :: radius Two-body equivalent radii of the collider bodies prior to the collision Type-Bound Procedures procedure, public :: regime => fraggle_regime_colliders Determine which fragmentation regime the set of colliders will be interface public module subroutine fraggle_regime_colliders(self, frag, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"type/fraggle_colliders.html"},{"title":"fraggle_fragments – swiftest ","text":"type, public, extends( swiftest_pl ) :: fraggle_fragments Class definition for the variables that describe a collection of fragments by Fraggle barycentric coordinates Inherits type~~fraggle_fragments~~InheritsGraph type~fraggle_fragments fraggle_fragments type~swiftest_pl swiftest_pl type~fraggle_fragments->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl mtot Qloss mass_dist regime xbcom vbcom x_coll_unit y_coll_unit z_coll_unit x_coll v_coll v_r_unit v_t_unit v_n_unit rmag rotmag v_r_mag v_t_mag ke_orbit ke_spin L_orbit L_spin ke_budget L_budget Lorbit_before Lorbit_after Lspin_before Lspin_after Ltot_before Ltot_after ke_orbit_before ke_orbit_after ke_spin_before ke_spin_after pe_before pe_after Etot_before Etot_after dscale mscale tscale vscale Escale Lscale Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard index accel_int accel_obl accel_tides append h2b b2h vh2vb vb2vh xh2xb fill resize set_beg_end set_mu set_rhill sort rearrange spill generate_fragments accel kick step set_budgets set_coordinate_system set_mass_dist set_natural_scale set_original_scale setup reset get_ang_mtm get_energy_and_momentum restructure Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public :: mtot Total mass of fragments real(kind=DP), public :: Qloss Energy lost during the collision real(kind=DP), public, dimension(FRAGGLE_NMASS_DIST) :: mass_dist Distribution of fragment mass determined by the regime calculation (largest fragment, second largest, and remainder) integer(kind=I4B), public :: regime Collresolve regime code for this collision real(kind=DP), public, dimension(NDIM) :: xbcom Center of mass position vector of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: vbcom Velocity vector of the center of mass of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: x_coll_unit x-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: y_coll_unit y-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: z_coll_unit z-direction unit vector of collisional system real(kind=DP), public, dimension(:,:), allocatable :: x_coll Array of fragment position vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_coll Array of fragment velocity vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_r_unit Array of radial direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_t_unit Array of tangential direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_n_unit Array of normal direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rmag Array of radial distance magnitudes of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rotmag Array of rotation magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_r_mag Array of radial direction velocity magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_t_mag Array of tangential direction velocity magnitudes of individual fragments real(kind=DP), public :: ke_orbit Current orbital kinetic energy of the system of fragments in the collisional frame real(kind=DP), public :: ke_spin Current spin kinetic energy of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_orbit Current orbital angular momentum of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_spin Current spin angular momentum of the system of fragments in the collisional frame real(kind=DP), public :: ke_budget Total kinetic energy budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_budget Total angular momentum budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: Lorbit_before Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lorbit_after Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_before Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_after Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_before Before/after total system angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_after Before/after total system angular momentum real(kind=DP), public :: ke_orbit_before Before/after orbital kinetic energy real(kind=DP), public :: ke_orbit_after Before/after orbital kinetic energy real(kind=DP), public :: ke_spin_before Before/after spin kinetic energy real(kind=DP), public :: ke_spin_after Before/after spin kinetic energy real(kind=DP), public :: pe_before Before/after potential energy real(kind=DP), public :: pe_after Before/after potential energy real(kind=DP), public :: Etot_before Before/after total system energy real(kind=DP), public :: Etot_after Before/after total system energy real(kind=DP), public :: dscale Distance dimension scale factor real(kind=DP), public :: mscale Mass scale factor real(kind=DP), public :: tscale Time scale factor real(kind=DP), public :: vscale Velocity scale factor (a convenience unit that is derived from dscale and tscale) real(kind=DP), public :: Escale Energy scale factor (a convenience unit that is derived from dscale, tscale, and mscale) real(kind=DP), public :: Lscale Angular momentum scale factor (a convenience unit that is derived from dscale, tscale, and mscale) Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: append => util_append_pl Appends elements from one structure to another interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: generate_fragments => fraggle_generate_fragments Generates a system of fragments in barycentric coordinates that conserves energy and momentum. interface public module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead? procedure, public :: accel => fraggle_placeholder_accel Placeholder subroutine to fulfill requirement for an accel method interface public module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Implementation → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: kick => fraggle_placeholder_kick Placeholder subroutine to fulfill requirement for a kick method interface public module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => fraggle_placeholder_step Placeholder subroutine to fulfill requirement for a step method interface public module subroutine fraggle_placeholder_step(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsiz procedure, public :: set_budgets => fraggle_set_budgets_fragments Sets the energy and momentum budgets of the fragments based on the collider value interface public module subroutine fraggle_set_budgets_fragments(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: set_coordinate_system => fraggle_set_coordinate_system Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. interface public module subroutine fraggle_set_coordinate_system(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: set_mass_dist => fraggle_set_mass_dist_fragments Sets the distribution of mass among the fragments depending on the regime type interface public module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters procedure, public :: set_natural_scale => fraggle_set_natural_scale_factors Scales dimenional quantities to ~O(1) with respect to the collisional system. interface public module subroutine fraggle_set_natural_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: set_original_scale => fraggle_set_original_scale_factors Restores dimenional quantities back to the original system units interface public module subroutine fraggle_set_original_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: setup => fraggle_setup_fragments Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. interface public module subroutine fraggle_setup_fragments(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object integer(kind=I4B), intent(in) :: n Number of fragments class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters procedure, public :: reset => fraggle_setup_reset_fragments Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) interface public module subroutine fraggle_setup_reset_fragments(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self procedure, public :: get_ang_mtm => fraggle_util_ang_mtm Calcualtes the current angular momentum of the fragments interface public module subroutine fraggle_util_ang_mtm(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object procedure, public :: get_energy_and_momentum => fraggle_util_get_energy_momentum Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) interface public module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa procedure, public :: restructure => fraggle_util_restructure Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints interface public module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt","tags":"","loc":"type/fraggle_fragments.html"},{"title":"symba_parameters – swiftest ","text":"type, public, extends( swiftest_parameters ) :: symba_parameters Inherits type~~symba_parameters~~InheritsGraph type~symba_parameters symba_parameters type~swiftest_parameters swiftest_parameters type~symba_parameters->type~swiftest_parameters type~netcdf_parameters netcdf_parameters type~swiftest_parameters->type~netcdf_parameters nciu Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables integrator maxid t0 t tstop dt ioutput incbfile inplfile intpfile in_type in_form istep_out outfile out_type out_form out_stat particle_out istep_dump rmin rmax rmaxu qmin qmin_coord qmin_alo qmin_ahi enc_out discard_out MU2KG TU2S DU2M GU inv_c2 energy_out lrhill_present lextra_force lbig_discard lclose lenergy loblatecb lrotation ltides Eorbit_orig GMtot_orig Ltot_orig Lorbit_orig Lspin_orig Lescape GMescape Ecollisions Euntracked lfirstenergy lfirstkick lrestart lgr lyarkovsky lyorp nciu GMTINY min_GMfrag seed lfragmentation Type-Bound Procedures dump read_in reader writer Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters real(kind=DP), public :: GMTINY = -1.0_DP Smallest G*mass that is fully gravitating real(kind=DP), public :: min_GMfrag = -1.0_DP Smallest G*mass that can be produced in a fragmentation event integer(kind=I4B), public, dimension(:), allocatable :: seed Random seeds logical, public :: lfragmentation = .false. Do fragmentation modeling instead of simple merger. Type-Bound Procedures procedure, public :: dump => io_dump_param interface public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) procedure, public :: read_in => io_read_in_param interface public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) procedure, public :: reader => symba_io_param_reader interface public module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Current run configuration parameters with SyMBA additionss integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 procedure, public :: writer => symba_io_param_writer interface public module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Current run configuration parameters with SyMBA additions integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"type/symba_parameters.html"},{"title":"symba_kinship – swiftest ","text":"type, public :: symba_kinship Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step. Inherited by type~~symba_kinship~~InheritedByGraph type~symba_kinship symba_kinship type~symba_pl symba_pl type~symba_pl->type~symba_kinship kin type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables parent nchild child Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: parent Index of parent particle integer(kind=I4B), public :: nchild number of children in merger list integer(kind=I4B), public, dimension(:), allocatable :: child Index of children particles","tags":"","loc":"type/symba_kinship.html"},{"title":"symba_cb – swiftest ","text":"type, public, extends( helio_cb ) :: symba_cb SyMBA central body particle class Inherits type~~symba_cb~~InheritsGraph type~symba_cb symba_cb type~helio_cb helio_cb type~symba_cb->type~helio_cb type~swiftest_cb swiftest_cb type~helio_cb->type~swiftest_cb type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL ptbeg ptend GM0 dGM R0 dR Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step real(kind=DP), public :: GM0 = 0.0_DP Initial G*mass of the central body real(kind=DP), public :: dGM = 0.0_DP Change in G*mass of the central body real(kind=DP), public :: R0 = 0.0_DP Initial radius of the central body real(kind=DP), public :: dR = 0.0_DP Change in the radius of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/symba_cb.html"},{"title":"symba_pl – swiftest ","text":"type, public, extends( helio_pl ) :: symba_pl SyMBA massive body class Inherits type~~symba_pl~~InheritsGraph type~symba_pl symba_pl type~helio_pl helio_pl type~symba_pl->type~helio_pl type~symba_kinship symba_kinship type~symba_pl->type~symba_kinship kin type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_pl~~InheritedByGraph type~symba_pl symba_pl type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl lcollision lencounter lmtiny nplm nplplm nplenc ntpenc levelg levelm isperi peri atp kin Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_mu set_rhill lindrift accel_gr gr_pos_kick kick step make_colliders index discard drift encounter_check accel_int accel setup append fill get_peri rearray reset_kinship resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_pl Steps the body forward one stepsize interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family interface public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: discard => symba_discard_pl Process massive body discards interface public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level interface public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY interface public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: setup => symba_setup_pl Constructor method - Allocates space for the input number of bodies interface public module subroutine symba_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: append => symba_util_append_pl Appends elements from one structure to another interface public module subroutine symba_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies interface public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies interface public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies interface public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset procedure, public :: resize => symba_util_resize_pl Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small. interface public module subroutine symba_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen interface public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/symba_pl.html"},{"title":"symba_merger – swiftest ","text":"type, public, extends( symba_pl ) :: symba_merger Inherits type~~symba_merger~~InheritsGraph type~symba_merger symba_merger type~symba_pl symba_pl type~symba_merger->type~symba_pl type~helio_pl helio_pl type~symba_pl->type~helio_pl type~symba_kinship symba_kinship type~symba_pl->type~symba_kinship kin type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_merger~~InheritedByGraph type~symba_merger symba_merger type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl lcollision lencounter lmtiny nplm nplplm nplenc ntpenc levelg levelm isperi peri atp kin ncomp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_mu set_rhill lindrift accel_gr gr_pos_kick kick step make_colliders index discard drift encounter_check accel_int accel fill get_peri rearray reset_kinship sort rearrange spill append resize setup Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step integer(kind=I4B), public, dimension(:), allocatable :: ncomp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_pl Steps the body forward one stepsize interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family interface public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: discard => symba_discard_pl Process massive body discards interface public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level interface public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY interface public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies interface public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies interface public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies interface public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen interface public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: append => symba_util_append_merger Appends elements from one structure to another interface public module subroutine symba_util_append_merger(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: resize => symba_util_resize_merger Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. interface public module subroutine symba_util_resize_merger(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: setup => symba_setup_merger Constructor method - Allocates space for the input number of bodies interface public module subroutine symba_setup_merger(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"type/symba_merger.html"},{"title":"symba_tp – swiftest ","text":"type, public, extends( helio_tp ) :: symba_tp SyMBA test particle class Inherits type~~symba_tp~~InheritsGraph type~symba_tp symba_tp type~helio_tp helio_tp type~symba_tp->type~helio_tp type~swiftest_tp swiftest_tp type~helio_tp->type~swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp nplenc levelg levelm Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl h2b b2h vb2vh vh2vb xh2xb get_peri set_mu lindrift accel_gr gr_pos_kick kick step drift encounter_check accel setup append fill resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with planets this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this particle should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities interface public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_tp Steps the body forward one stepsize interface public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee procedure, public :: drift => symba_drift_tp Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level interface public module subroutine symba_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: encounter_check => symba_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body interface public module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: accel => symba_kick_getacch_tp Compute heliocentric accelerations of test particles interface public module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: setup => symba_setup_tp Constructor method - Allocates space for the input number of bodies interface public module subroutine symba_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter procedure, public :: append => symba_util_append_tp Appends elements from one structure to another interface public module subroutine symba_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => symba_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine symba_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => symba_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine symba_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => symba_util_sort_tp Sorts body arrays by a sortable componen interface public module subroutine symba_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => symba_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine symba_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => symba_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/symba_tp.html"},{"title":"symba_encounter – swiftest ","text":"type, public, extends( swiftest_encounter ) :: symba_encounter SyMBA class for tracking close encounters in a step Inherits type~~symba_encounter~~InheritsGraph type~symba_encounter symba_encounter type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_encounter~~InheritedByGraph type~symba_encounter symba_encounter type~symba_pltpenc symba_pltpenc type~symba_pltpenc->type~symba_encounter type~symba_plplenc symba_plplenc type~symba_plplenc->type~symba_encounter type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_pltpenc pltpenc_list type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t level Type-Bound Procedures resize write collision_check encounter_check kick setup copy spill append Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"type/symba_encounter.html"},{"title":"symba_pltpenc – swiftest ","text":"type, public, extends( symba_encounter ) :: symba_pltpenc SyMBA class for tracking pl-tp close encounters in a step Inherits type~~symba_pltpenc~~InheritsGraph type~symba_pltpenc symba_pltpenc type~symba_encounter symba_encounter type~symba_pltpenc->type~symba_encounter type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_pltpenc~~InheritedByGraph type~symba_pltpenc symba_pltpenc type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_pltpenc pltpenc_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t level Type-Bound Procedures resize write collision_check encounter_check kick setup copy spill append resolve_collision Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: resolve_collision => symba_collision_resolve_pltpenc Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c interface public module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-tp encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"type/symba_pltpenc.html"},{"title":"symba_plplenc – swiftest ","text":"type, public, extends( symba_encounter ) :: symba_plplenc SyMBA class for tracking pl-pl close encounters in a step Inherits type~~symba_plplenc~~InheritsGraph type~symba_plplenc symba_plplenc type~symba_encounter symba_encounter type~symba_plplenc->type~symba_encounter type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_plplenc~~InheritedByGraph type~symba_plplenc symba_plplenc type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t level Type-Bound Procedures resize write collision_check encounter_check kick setup copy spill append extract_collisions resolve_fragmentations resolve_mergers resolve_collision Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: extract_collisions => symba_collision_encounter_extract_collisions Processes the pl-pl encounter list remove only those encounters that led to a collision interface public module subroutine symba_collision_encounter_extract_collisions(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resolve_fragmentations => symba_collision_resolve_fragmentations Process list of collisions, determine the collisional regime, and then create fragments interface public module subroutine symba_collision_resolve_fragmentations(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: resolve_mergers => symba_collision_resolve_mergers Process list of collisions and merge colliding bodies together interface public module subroutine symba_collision_resolve_mergers(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: resolve_collision => symba_collision_resolve_plplenc Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c interface public module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"type/symba_plplenc.html"},{"title":"symba_nbody_system – swiftest ","text":"type, public, extends( helio_nbody_system ) :: symba_nbody_system Inherits type~~symba_nbody_system~~InheritsGraph type~symba_nbody_system symba_nbody_system type~helio_nbody_system helio_nbody_system type~symba_nbody_system->type~helio_nbody_system type~symba_pltpenc symba_pltpenc type~symba_nbody_system->type~symba_pltpenc pltpenc_list type~symba_merger symba_merger type~symba_nbody_system->type~symba_merger pl_adds type~symba_plplenc symba_plplenc type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list type~whm_nbody_system whm_nbody_system type~helio_nbody_system->type~whm_nbody_system type~symba_encounter symba_encounter type~symba_pltpenc->type~symba_encounter type~symba_pl symba_pl type~symba_merger->type~symba_pl type~symba_plplenc->type~symba_encounter type~helio_pl helio_pl type~symba_pl->type~helio_pl type~symba_kinship symba_kinship type~symba_pl->type~symba_kinship kin type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg pl_adds pltpenc_list plplenc_list plplcollision_list irec Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr write_discard initialize step interp set_recur_levels recursive_step reset Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles class( symba_merger ), public, allocatable :: pl_adds List of added bodies in mergers or collisions class( symba_pltpenc ), public, allocatable :: pltpenc_list List of massive body-test particle encounters in a single step class( symba_plplenc ), public, allocatable :: plplenc_list List of massive body-massive body encounters in a single step class( symba_plplenc ), public, allocatable :: plplcollision_list List of massive body-massive body collisions in a single step integer(kind=I4B), public :: irec System recursion level Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: write_discard => symba_io_write_discard Write out information about discarded and merged planets and test particles in SyMBA interface public module subroutine symba_io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: initialize => symba_setup_initialize_system Performs SyMBA-specific initilization steps interface public module subroutine symba_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step => symba_step_system Advance the SyMBA nbody system forward in time by one step interface public module subroutine symba_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: interp => symba_step_interp_system Perform an interpolation step on the SymBA nbody system interface public module subroutine symba_step_interp_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_recur_levels => symba_step_set_recur_levels_system Sets recursion levels of bodies and encounter lists to the current system level interface public module subroutine symba_step_set_recur_levels_system(self, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system objec integer(kind=I4B), intent(in) :: ireci Input recursion level procedure, public :: recursive_step => symba_step_recur_system Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary interface public recursive module subroutine symba_step_recur_system(self, param, t, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level procedure, public :: reset => symba_step_reset_system Resets pl, tp,and encounter structures at the start of a new step interface public module subroutine symba_step_reset_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"type/symba_nbody_system.html"},{"title":"netcdf_parameters – swiftest ","text":"type, public :: netcdf_parameters Inherited by type~~netcdf_parameters~~InheritedByGraph type~netcdf_parameters netcdf_parameters type~swiftest_parameters swiftest_parameters type~swiftest_parameters->type~netcdf_parameters nciu type~symba_parameters symba_parameters type~symba_parameters->type~swiftest_parameters Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables out_type ncid dimids time_dimid id_dimid str_dimid time_varid id_varid name_varid ptype_varid npl_varid ntp_varid a_varid e_varid inc_varid capom_varid omega_varid capm_varid xhx_varid xhy_varid xhz_varid vhx_varid vhy_varid vhz_varid Gmass_varid rhill_varid radius_varid Ip1_varid Ip2_varid Ip3_varid rotx_varid roty_varid rotz_varid k2_varid Q_varid KE_orb_varid KE_spin_varid PE_varid L_orbx_varid L_orby_varid L_orbz_varid L_spinx_varid L_spiny_varid L_spinz_varid L_escapex_varid L_escapey_varid L_escapez_varid Ecollisions_varid Euntracked_varid GMescape_varid status_varid origin_type_varid origin_time_varid origin_xhx_varid origin_xhy_varid origin_xhz_varid origin_vhx_varid origin_vhy_varid origin_vhz_varid discard_time_varid discard_xhx_varid discard_xhy_varid discard_xhz_varid discard_vhx_varid discard_vhy_varid discard_vhz_varid discard_body_id_varid Type-Bound Procedures close initialize open Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: out_type NetCDF output type (will be assigned either NF90_DOUBLE or NF90_FLOAT, depending on the user parameter) integer(kind=I4B), public :: ncid NetCDF ID for the output file integer(kind=I4B), public :: dimids (3) Dimensions of the NetCDF file integer(kind=I4B), public :: time_dimid NetCDF ID for the time dimension integer(kind=I4B), public :: id_dimid NetCDF ID for the particle id dimension integer(kind=I4B), public :: str_dimid NetCDF ID for the character string dimension integer(kind=I4B), public :: time_varid NetCDF ID for the time variable integer(kind=I4B), public :: id_varid NetCDF ID for the particle name variable integer(kind=I4B), public :: name_varid NetCDF ID for the namevariable integer(kind=I4B), public :: ptype_varid NetCDF ID for the particle type variable integer(kind=I4B), public :: npl_varid NetCDF ID for the number of active massive bodies variable integer(kind=I4B), public :: ntp_varid NetCDF ID for the number of active test particles variable integer(kind=I4B), public :: a_varid NetCDF ID for the semimajor axis variable integer(kind=I4B), public :: e_varid NetCDF ID for the eccentricity variable integer(kind=I4B), public :: inc_varid NetCDF ID for the inclination variable integer(kind=I4B), public :: capom_varid NetCDF ID for the long. asc. node variable integer(kind=I4B), public :: omega_varid NetCDF ID for the arg. periapsis variable integer(kind=I4B), public :: capm_varid NetCDF ID for the mean anomaly variable integer(kind=I4B), public :: xhx_varid NetCDF ID for the heliocentric position x variable integer(kind=I4B), public :: xhy_varid NetCDF ID for the heliocentric position y variable integer(kind=I4B), public :: xhz_varid NetCDF ID for the heliocentric position z variable integer(kind=I4B), public :: vhx_varid NetCDF ID for the heliocentric velocity x variable integer(kind=I4B), public :: vhy_varid NetCDF ID for the heliocentric velocity y variable integer(kind=I4B), public :: vhz_varid NetCDF ID for the heliocentric velocity z variable integer(kind=I4B), public :: Gmass_varid NetCDF ID for the mass variable integer(kind=I4B), public :: rhill_varid NetCDF ID for the hill radius variable integer(kind=I4B), public :: radius_varid NetCDF ID for the radius variable integer(kind=I4B), public :: Ip1_varid NetCDF ID for the axis 1 principal moment of inertia variable integer(kind=I4B), public :: Ip2_varid NetCDF ID for the axis 2 principal moment of inertia variable integer(kind=I4B), public :: Ip3_varid NetCDF ID for the axis 3 principal moment of inertia variable integer(kind=I4B), public :: rotx_varid NetCDF ID for the rotation x variable integer(kind=I4B), public :: roty_varid NetCDF ID for the rotation y variable integer(kind=I4B), public :: rotz_varid NetCDF ID for the rotation z variable integer(kind=I4B), public :: k2_varid NetCDF ID for the Love number variable integer(kind=I4B), public :: Q_varid NetCDF ID for the energy dissipation variable integer(kind=I4B), public :: KE_orb_varid NetCDF ID for the system orbital kinetic energy variable integer(kind=I4B), public :: KE_spin_varid NetCDF ID for the system spin kinetic energy variable integer(kind=I4B), public :: PE_varid NetCDF ID for the system potential energy variable integer(kind=I4B), public :: L_orbx_varid NetCDF ID for the system orbital angular momentum x variable integer(kind=I4B), public :: L_orby_varid NetCDF ID for the system orbital angular momentum y variable integer(kind=I4B), public :: L_orbz_varid NetCDF ID for the system orbital angular momentum z variable integer(kind=I4B), public :: L_spinx_varid NetCDF ID for the system spin angular momentum x variable integer(kind=I4B), public :: L_spiny_varid NetCDF ID for the system spin angular momentum y variable integer(kind=I4B), public :: L_spinz_varid NetCDF ID for the system spin angular momentum z variable integer(kind=I4B), public :: L_escapex_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapey_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapez_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: Ecollisions_varid NetCDF ID for the energy lost in collisions variable integer(kind=I4B), public :: Euntracked_varid NetCDF ID for the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) integer(kind=I4B), public :: GMescape_varid NetCDF ID for the G*Mass of bodies that escape the system integer(kind=I4B), public :: status_varid NetCDF ID for the status variable integer(kind=I4B), public :: origin_type_varid NetCDF ID for the origin type integer(kind=I4B), public :: origin_time_varid NetCDF ID for the origin time integer(kind=I4B), public :: origin_xhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_xhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_xhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: origin_vhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_vhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_vhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: discard_time_varid NetCDF ID for the time of discard variable integer(kind=I4B), public :: discard_xhx_varid NetCDF ID for the heliocentric position of the body at the time of discard x variable integer(kind=I4B), public :: discard_xhy_varid NetCDF ID for the heliocentric position of the body at the time of discard y variable integer(kind=I4B), public :: discard_xhz_varid NetCDF ID for the heliocentric position of the body at the time of discard z variable integer(kind=I4B), public :: discard_vhx_varid NetCDF ID for the heliocentric velocity of the body at the time of discard x variable integer(kind=I4B), public :: discard_vhy_varid NetCDF ID for the heliocentric velocity of the body at the time of discard y variable integer(kind=I4B), public :: discard_vhz_varid NetCDF ID for the heliocentric velocity of the body at the time of discard z variable integer(kind=I4B), public :: discard_body_id_varid NetCDF ID for the id of the other body involved in the discard Type-Bound Procedures procedure, public :: close => netcdf_close Closes an open NetCDF file interface public module subroutine netcdf_close(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: initialize => netcdf_initialize_output Initialize a set of parameters used to identify a NetCDF output object interface public module subroutine netcdf_initialize_output(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: open => netcdf_open Opens a NetCDF file interface public module subroutine netcdf_open(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"type/netcdf_parameters.html"},{"title":"swiftest_parameters – swiftest ","text":"type, public :: swiftest_parameters User defined parameters that are read in from the parameters input file. \n    Each paramter is initialized to a default values. Inherits type~~swiftest_parameters~~InheritsGraph type~swiftest_parameters swiftest_parameters type~netcdf_parameters netcdf_parameters type~swiftest_parameters->type~netcdf_parameters nciu Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_parameters~~InheritedByGraph type~swiftest_parameters swiftest_parameters type~symba_parameters symba_parameters type~symba_parameters->type~swiftest_parameters Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables integrator maxid t0 t tstop dt ioutput incbfile inplfile intpfile in_type in_form istep_out outfile out_type out_form out_stat particle_out istep_dump rmin rmax rmaxu qmin qmin_coord qmin_alo qmin_ahi enc_out discard_out MU2KG TU2S DU2M GU inv_c2 energy_out lrhill_present lextra_force lbig_discard lclose lenergy loblatecb lrotation ltides Eorbit_orig GMtot_orig Ltot_orig Lorbit_orig Lspin_orig Lescape GMescape Ecollisions Euntracked lfirstenergy lfirstkick lrestart lgr lyarkovsky lyorp nciu Type-Bound Procedures reader writer dump read_in Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters Type-Bound Procedures procedure, public :: reader => io_param_reader interface public module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) The first element passes the integrator code to the reader integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 procedure, public :: writer => io_param_writer interface public module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) Not used in this procedure integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 procedure, public :: dump => io_dump_param interface public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) procedure, public :: read_in => io_read_in_param interface public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in)","tags":"","loc":"type/swiftest_parameters.html"},{"title":"swiftest_particle_info – swiftest ","text":"type, public :: swiftest_particle_info Class definition for the particle origin information object. This object is used to track time, location, and collisional regime\n of fragments produced in collisional events. Inherited by type~~swiftest_particle_info~~InheritedByGraph type~swiftest_particle_info swiftest_particle_info type~swiftest_cb swiftest_cb type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body swiftest_body type~swiftest_body->type~swiftest_particle_info info type~helio_cb helio_cb type~helio_cb->type~swiftest_cb type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl->type~swiftest_body type~swiftest_tp->type~swiftest_body type~whm_cb whm_cb type~whm_cb->type~swiftest_cb type~symba_cb symba_cb type~symba_cb->type~helio_cb type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_tp symba_tp type~symba_tp->type~helio_tp type~symba_pl symba_pl type~symba_pl->type~helio_pl type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric type~rmvs_tp->type~whm_tp type~rmvs_nbody_system->type~whm_nbody_system type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables name particle_type origin_type origin_time origin_xh origin_vh discard_time status discard_xh discard_vh discard_body_id Type-Bound Procedures dump read_in copy set_value Components Type Visibility Attributes Name Initial character(len=NAMELEN), public :: name Non-unique name character(len=NAMELEN), public :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=NAMELEN), public :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), public :: origin_time The time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), public :: discard_time The time of the particle's discard character(len=NAMELEN), public :: status Particle status description: Active, Merged, Fragmented, etc. real(kind=DP), public, dimension(NDIM) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), public, dimension(NDIM) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), public :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) Type-Bound Procedures procedure, public :: dump => io_dump_particle_info Dumps contents of particle information to file interface public module subroutine io_dump_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Swiftest particle info metadata object integer(kind=I4B), intent(in) :: iu Open unformatted file unit number procedure, public :: read_in => io_read_in_particle_info Read in a particle information object from an open file interface public module subroutine io_read_in_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number procedure, public :: copy => util_copy_particle_info Copies one set of information object components into another, component-by-component interface public module subroutine util_copy_particle_info(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source procedure, public :: set_value => util_set_particle_info Sets one or more values of the particle information metadata object interface public module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: Active, Merged, Fragmented, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved)","tags":"","loc":"type/swiftest_particle_info.html"},{"title":"swiftest_base – swiftest ","text":"type, public, abstract :: swiftest_base An abstract superclass for a generic Swiftest object\n The minimal methods that all systems must have Inherited by type~~swiftest_base~~InheritedByGraph type~swiftest_base swiftest_base type~swiftest_cb swiftest_cb type~swiftest_cb->type~swiftest_base type~swiftest_body swiftest_body type~swiftest_body->type~swiftest_base type~helio_cb helio_cb type~helio_cb->type~swiftest_cb type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl->type~swiftest_body type~swiftest_tp->type~swiftest_body type~whm_cb whm_cb type~whm_cb->type~swiftest_cb type~symba_cb symba_cb type~symba_cb->type~helio_cb type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_tp symba_tp type~symba_tp->type~helio_tp type~symba_pl symba_pl type~symba_pl->type~helio_pl type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric type~rmvs_tp->type~whm_tp type~rmvs_nbody_system->type~whm_nbody_system type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_frame write_particle_info Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_frame => write_frame_netcdf Set up generic procedure that will switch between NetCDF or Fortran binary depending on arguments public interface netcdf_write_frame_base () Arguments None generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None","tags":"","loc":"type/swiftest_base.html"},{"title":"swiftest_cb – swiftest ","text":"type, public, abstract, extends( swiftest_base ) :: swiftest_cb A concrete lass for the central body in a Swiftest simulation Inherits type~~swiftest_cb~~InheritsGraph type~swiftest_cb swiftest_cb type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_cb~~InheritedByGraph type~swiftest_cb swiftest_cb type~helio_cb helio_cb type~helio_cb->type~swiftest_cb type~whm_cb whm_cb type~whm_cb->type~swiftest_cb type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_cb cb type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~symba_cb symba_cb type~symba_cb->type~helio_cb type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/swiftest_cb.html"},{"title":"swiftest_body – swiftest ","text":"type, public, abstract, extends( swiftest_base ) :: swiftest_body An abstract class for a generic collection of Swiftest bodies\n Superclass that defines the generic elements of a Swiftest particle Inherits type~~swiftest_body~~InheritsGraph type~swiftest_body swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_body~~InheritedByGraph type~swiftest_body swiftest_body type~swiftest_tp swiftest_tp type~swiftest_tp->type~swiftest_body type~swiftest_pl swiftest_pl type~swiftest_pl->type~swiftest_body type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~symba_pl symba_pl type~symba_pl->type~helio_pl type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp type~symba_tp symba_tp type~symba_tp->type~helio_tp type~symba_merger symba_merger type~symba_merger->type~symba_pl type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info discard kick set_mu step accel drift v2pv pv2v read_in read_frame write_frame_bin accel_obl el2xv xv2el setup accel_user append fill resize set_ir3 sort rearrange spill write_frame Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure( abstract_discard_body ), public, deferred :: discard subroutine abstract_discard_body(self, system, param) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure( abstract_kick_body ), public, deferred :: kick subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure( abstract_set_mu ), public, deferred :: set_mu subroutine abstract_set_mu(self, cb) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure( abstract_step_body ), public, deferred :: step subroutine abstract_step_body(self, system, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure( abstract_accel ), public, deferred :: accel subroutine abstract_accel(self, system, param, t, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_obl => obl_acc_body Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_body(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: setup => setup_body A constructor that sets the number of bodies and allocates all allocatable arrays interface public module subroutine setup_body(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: append => util_append_body Appends elements from one structure to another interface public module subroutine util_append_body(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => util_fill_body \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_body(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_body Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_body(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object procedure, public :: sort => util_sort_body Sorts body arrays by a sortable componen interface public module subroutine util_sort_body(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_body Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_body(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_body \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None","tags":"","loc":"type/swiftest_body.html"},{"title":"swiftest_pl – swiftest ","text":"type, public, abstract, extends( swiftest_body ) :: swiftest_pl An abstract class for a generic collection of Swiftest massive bodies\n Superclass that defines the generic elements of a Swiftest particle Inherits type~~swiftest_pl~~InheritsGraph type~swiftest_pl swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_pl~~InheritedByGraph type~swiftest_pl swiftest_pl type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~symba_pl symba_pl type~symba_pl->type~helio_pl type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~symba_merger symba_merger type~symba_merger->type~symba_pl type~rmvs_nbody_system->type~whm_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info kick step accel drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard index accel_int accel_obl setup accel_tides append h2b b2h vh2vb vb2vh xh2xb fill resize set_beg_end set_mu set_rhill sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure( abstract_kick_body ), public, deferred :: kick subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure( abstract_step_body ), public, deferred :: step subroutine abstract_step_body(self, system, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure( abstract_accel ), public, deferred :: accel subroutine abstract_accel(self, system, param, t, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays interface public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: append => util_append_pl Appends elements from one structure to another interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/swiftest_pl.html"},{"title":"swiftest_tp – swiftest ","text":"type, public, abstract, extends( swiftest_body ) :: swiftest_tp An abstract class for a generic collection of Swiftest test particles\n Superclass that defines the generic elements of a Swiftest test particle Inherits type~~swiftest_tp~~InheritsGraph type~swiftest_tp swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_tp~~InheritedByGraph type~swiftest_tp swiftest_tp type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~symba_tp symba_tp type~symba_tp->type~helio_tp type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info kick step accel drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl setup append h2b b2h vb2vh vh2vb xh2xb fill get_peri resize set_mu sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure( abstract_kick_body ), public, deferred :: kick subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure( abstract_step_body ), public, deferred :: step subroutine abstract_step_body(self, system, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure( abstract_accel ), public, deferred :: accel subroutine abstract_accel(self, system, param, t, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr procedure, public :: append => util_append_tp Appends elements from one structure to another interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/swiftest_tp.html"},{"title":"swiftest_nbody_system – swiftest ","text":"type, public, abstract :: swiftest_nbody_system An abstract class for a basic Swiftest nbody system \n  This superclass contains a minimial system of a set of test particles (tp), massive bodies (pl), and a central body (cb) Inherits type~~swiftest_nbody_system~~InheritsGraph type~swiftest_nbody_system swiftest_nbody_system type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base type~swiftest_body->type~swiftest_particle_info info Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_nbody_system~~InheritedByGraph type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg Type-Bound Procedures step discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot initialize init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure( abstract_step_system ), public, deferred :: step Each integrator will have its own version of the step subroutine abstract_step_system(self, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: initialize => setup_initialize_system Initialize the system from input files interface public module subroutine setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None","tags":"","loc":"type/swiftest_nbody_system.html"},{"title":"swiftest_encounter – swiftest ","text":"type, public :: swiftest_encounter Inherited by type~~swiftest_encounter~~InheritedByGraph type~swiftest_encounter swiftest_encounter type~symba_encounter symba_encounter type~symba_encounter->type~swiftest_encounter type~symba_pltpenc symba_pltpenc type~symba_pltpenc->type~symba_encounter type~symba_plplenc symba_plplenc type~symba_plplenc->type~symba_encounter type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_pltpenc pltpenc_list type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t Type-Bound Procedures setup append copy spill resize write Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter Type-Bound Procedures procedure, public :: setup => setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: append => util_append_encounter Appends elements from one structure to another interface public module subroutine util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: copy => util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"type/swiftest_encounter.html"},{"title":"lambda_obj – swiftest ","text":"type, public :: lambda_obj Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Inherited by type~~lambda_obj~~InheritedByGraph type~lambda_obj lambda_obj type~lambda_obj_err lambda_obj_err type~lambda_obj_err->type~lambda_obj type~lambda_obj_tvar lambda_obj_tvar type~lambda_obj_tvar->type~lambda_obj Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr lastval lastarg Constructor lambda_obj Finalization Procedures lambda_destroy Type-Bound Procedures init eval lambda_init_0 Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg Constructor public interface lambda_obj public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) Finalization Procedures final :: lambda_destroy public subroutine lambda_destroy (self) Arguments Type Intent Optional Attributes Name type( lambda_obj ) :: self Type-Bound Procedures generic, public :: init => lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) procedure, public :: eval => lambda_eval_0 public function lambda_eval_0 (self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) procedure, public, nopass :: lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj )","tags":"","loc":"type/lambda_obj.html"},{"title":"lambda_obj_err – swiftest ","text":"type, public, extends( lambda_obj ) :: lambda_obj_err Extended class for an lambda function object. This object takes allows for the return of a logical error flag during evaluation of the function. Inherits type~~lambda_obj_err~~InheritsGraph type~lambda_obj_err lambda_obj_err type~lambda_obj lambda_obj type~lambda_obj_err->type~lambda_obj Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr lastval lastarg lambdaptr_err lerr Type-Bound Procedures lambda_init_0 init eval lambda_init_0_err Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg procedure( lambda0err ), public, pointer, nopass :: lambdaptr_err => null() logical, public :: lerr Type-Bound Procedures procedure, public, nopass :: lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) generic, public :: init => lambda_init_0 , lambda_init_0_err public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) procedure, public :: eval => lambda_eval_0_err public function lambda_eval_0_err (self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_err ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) procedure, public, nopass :: lambda_init_0_err public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err )","tags":"","loc":"type/lambda_obj_err.html"},{"title":"lambda_obj_tvar – swiftest ","text":"type, public, extends( lambda_obj ) :: lambda_obj_tvar Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Inherits type~~lambda_obj_tvar~~InheritsGraph type~lambda_obj_tvar lambda_obj_tvar type~lambda_obj lambda_obj type~lambda_obj_tvar->type~lambda_obj Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr lastval lastarg lambdaptr_tvar Type-Bound Procedures eval lambda_init_0 init evalt lambda_init_tvar Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg procedure( lambda0tvar ), public, pointer, nopass :: lambdaptr_tvar => null() Type-Bound Procedures procedure, public :: eval => lambda_eval_0 public function lambda_eval_0 (self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) procedure, public, nopass :: lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) generic, public :: init => lambda_init_0 , lambda_init_tvar public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) procedure, public :: evalt => lambda_eval_tvar public function lambda_eval_tvar (self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_tvar ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable procedure, public, nopass :: lambda_init_tvar public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar )","tags":"","loc":"type/lambda_obj_tvar.html"},{"title":"tidederiv – swiftest","text":"abstract interface function tidederiv(x, t, dt, xbeg, xend) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:),allocatable","tags":"","loc":"interface/tidederiv.html"},{"title":"abstract_read_frame – swiftest","text":"abstract interface public function abstract_read_frame(self, iu, param) result(ierr) Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/abstract_read_frame.html"},{"title":"abstract_discard_body – swiftest","text":"abstract interface public subroutine abstract_discard_body(self, system, param) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/abstract_discard_body.html"},{"title":"abstract_accel – swiftest","text":"abstract interface public subroutine abstract_accel(self, system, param, t, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/abstract_accel.html"},{"title":"abstract_kick_body – swiftest","text":"abstract interface public subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/abstract_kick_body.html"},{"title":"abstract_set_mu – swiftest","text":"abstract interface public subroutine abstract_set_mu(self, cb) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/abstract_set_mu.html"},{"title":"abstract_step_body – swiftest","text":"abstract interface public subroutine abstract_step_body(self, system, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/abstract_step_body.html"},{"title":"abstract_step_system – swiftest","text":"abstract interface public subroutine abstract_step_system(self, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/abstract_step_system.html"},{"title":"lambda0 – swiftest","text":"abstract interface public function lambda0(x) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP)","tags":"","loc":"interface/lambda0.html"},{"title":"lambda0err – swiftest","text":"abstract interface public function lambda0err(x, lerr) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x logical, intent(out) :: lerr Return Value real(kind=DP)","tags":"","loc":"interface/lambda0err.html"},{"title":"lambda0tvar – swiftest","text":"abstract interface public function lambda0tvar(x, t) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:),allocatable","tags":"","loc":"interface/lambda0tvar.html"},{"title":"tides_spin_derivs – swiftest","text":"function tides_spin_derivs(rot_pl_cb, t, dt, xbeg, xend) result(drot) Need to add more arguments so we can pull in mass, radius, Ip, J2, etc...\n author: Jennifer L.L. Pouplin and David A. Minton function used to calculate the derivatives that are fed to the ODE solver Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: rot_pl_cb Array of rotations. The last element is the central body, and all others are massive bodies real(kind=DP), intent(in) :: t Current time, which is used to interpolate the massive body positions real(kind=DP), intent(in) :: dt Total step size real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/tides_spin_derivs.html"},{"title":"tides_derivs_eval – swiftest","text":"function tides_derivs_eval(self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( tides_derivs_func ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/tides_derivs_eval.html"},{"title":"tides_derivs_init – swiftest","text":"function tides_derivs_init(lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) Called by proc~~tides_derivs_init~~CalledByGraph proc~tides_derivs_init tides_derivs_init interface~lambda_obj lambda_obj interface~lambda_obj->proc~tides_derivs_init Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/tides_derivs_init.html"},{"title":"lambda_obj – swiftest","text":"private interface lambda_obj Calls interface~~lambda_obj~~CallsGraph interface~lambda_obj lambda_obj proc~tides_derivs_init tides_derivs_init interface~lambda_obj->proc~tides_derivs_init Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Module Procedures tides_derivs_init Module Procedures function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func )","tags":"","loc":"interface/lambda_obj.html"},{"title":"obl_pot_one – swiftest","text":"elemental function obl_pot_one(npl, GMcb, GMpl, j2rp2, j4rp4, zh, irh) result(oblpot) Compute the contribution to the total gravitational potential due solely to the oblateness of the central body from a single massive body\n    Returned value does not include monopole term or terms higher than J4 Reference : MacMillan , W . D . 1958 . The Theory of the Potential , ( Dover Publications ), 363 . Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 \n Adapted from Hal Levison's Swift routine obl_pot.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in) :: GMcb G*mass of the central body real(kind=DP), intent(in) :: GMpl G*mass of the massive body real(kind=DP), intent(in) :: j2rp2 J_2 / R**2 of the central body real(kind=DP), intent(in) :: j4rp4 J_2 / R**4 of the central body real(kind=DP), intent(in) :: zh z-component of the heliocentric distance vector of the massive body real(kind=DP), intent(in) :: irh Inverse of the heliocentric distance magnitude of the massive body Return Value real(kind=DP) Gravitational potential Called by proc~~obl_pot_one~~CalledByGraph proc~obl_pot_one obl_pot_one proc~obl_pot_system obl_pot_system proc~obl_pot_system->proc~obl_pot_one interface~obl_pot_system obl_pot_system interface~obl_pot_system->proc~obl_pot_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_pot_one.html"},{"title":"orbel_flon – swiftest","text":"pure function orbel_flon(e, icapn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: icapn Return Value real(kind=DP) Calls proc~~orbel_flon~~CallsGraph proc~orbel_flon orbel_flon 3 3 proc~orbel_flon->3 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_flon~~CalledByGraph proc~orbel_flon orbel_flon proc~orbel_fhybrid orbel_fhybrid proc~orbel_fhybrid->proc~orbel_flon proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_flon.html"},{"title":"orbel_fget – swiftest","text":"pure function orbel_fget(e, capn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: capn Return Value real(kind=DP) Calls proc~~orbel_fget~~CallsGraph proc~orbel_fget orbel_fget proc~orbel_schget orbel_schget proc~orbel_fget->proc~orbel_schget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_fget~~CalledByGraph proc~orbel_fget orbel_fget proc~orbel_fhybrid orbel_fhybrid proc~orbel_fhybrid->proc~orbel_fget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_fget.html"},{"title":"orbel_zget – swiftest","text":"pure function orbel_zget(iq) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: iq Return Value real(kind=DP) Called by proc~~orbel_zget~~CalledByGraph proc~orbel_zget orbel_zget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_zget proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_zget.html"},{"title":"orbel_esolmd – swiftest","text":"pure function orbel_esolmd(e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) Calls proc~~orbel_esolmd~~CallsGraph proc~orbel_esolmd orbel_esolmd interface~orbel_scget orbel_scget proc~orbel_esolmd->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_esolmd~~CalledByGraph proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid orbel_ehybrid proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_esolmd.html"},{"title":"orbel_ehie – swiftest","text":"pure function orbel_ehie(e, im) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: im Return Value real(kind=DP) Calls proc~~orbel_ehie~~CallsGraph proc~orbel_ehie orbel_ehie interface~orbel_scget orbel_scget proc~orbel_ehie->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_ehie~~CalledByGraph proc~orbel_ehie orbel_ehie proc~orbel_ehybrid orbel_ehybrid proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_ehie.html"},{"title":"orbel_eget – swiftest","text":"pure function orbel_eget(e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) Calls proc~~orbel_eget~~CallsGraph proc~orbel_eget orbel_eget interface~orbel_scget orbel_scget proc~orbel_eget->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_eget~~CalledByGraph proc~orbel_eget orbel_eget proc~orbel_ehybrid orbel_ehybrid proc~orbel_ehybrid->proc~orbel_eget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_eget.html"},{"title":"orbel_ehybrid – swiftest","text":"pure function orbel_ehybrid(e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) Calls proc~~orbel_ehybrid~~CallsGraph proc~orbel_ehybrid orbel_ehybrid proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget interface~orbel_scget orbel_scget proc~orbel_ehie->interface~orbel_scget proc~orbel_esolmd->interface~orbel_scget proc~orbel_eget->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_ehybrid~~CalledByGraph proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_ehybrid.html"},{"title":"orbel_fhybrid – swiftest","text":"pure function orbel_fhybrid(e, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: n Return Value real(kind=DP) Calls proc~~orbel_fhybrid~~CallsGraph proc~orbel_fhybrid orbel_fhybrid proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget 3 3 proc~orbel_flon->3 proc~orbel_schget orbel_schget proc~orbel_fget->proc~orbel_schget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_fhybrid~~CalledByGraph proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_fhybrid.html"},{"title":"orbel_el2xv – swiftest","text":"pure subroutine orbel_el2xv(mu, a, ie, inc, capom, omega, capm, x, v) Compute osculating orbital elements from relative C)rtesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 If eccentricity < sqrt ( TINY ), argument of pericenter is arbitrarily set to 0 ALGORITHM : See Fitzpatrick \"Principles of Cel. Mech.\" Adapted from Martin Duncan's el2xv.f\n DATE WRITTEN:  May 11, 1992.\n REVISIONS: May 26 - now use better Kepler solver for ellipses\n  and hyperbolae called EHYBRID.F and FHYBRID.F Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: a real(kind=DP), intent(in) :: ie real(kind=DP), intent(in) :: inc real(kind=DP), intent(in) :: capom real(kind=DP), intent(in) :: omega real(kind=DP), intent(in) :: capm real(kind=DP), intent(out), dimension(:) :: x real(kind=DP), intent(out), dimension(:) :: v Calls proc~~orbel_el2xv~~CallsGraph proc~orbel_el2xv orbel_el2xv interface~orbel_scget orbel_scget proc~orbel_el2xv->interface~orbel_scget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_zget orbel_zget proc~orbel_el2xv->proc~orbel_zget proc~orbel_schget orbel_schget proc~orbel_el2xv->proc~orbel_schget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget 3 3 proc~orbel_flon->3 proc~orbel_esolmd->interface~orbel_scget proc~orbel_eget->interface~orbel_scget proc~orbel_fget->proc~orbel_schget proc~orbel_ehie->interface~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_el2xv~~CalledByGraph proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_el2xv.html"},{"title":"orbel_schget – swiftest","text":"pure subroutine orbel_schget(angle, shx, chx) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: shx real(kind=DP), intent(out) :: chx Called by proc~~orbel_schget~~CalledByGraph proc~orbel_schget orbel_schget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_schget proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_fget orbel_fget proc~orbel_fget->proc~orbel_schget proc~orbel_fhybrid->proc~orbel_fget proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_schget.html"},{"title":"whm_kick_getacch_ah0 – swiftest","text":"function whm_kick_getacch_ah0(mu, xhp, n) result(ah0) Compute zeroth term heliocentric accelerations of planets Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu real(kind=DP), intent(in), dimension(:,:) :: xhp integer(kind=I4B), intent(in) :: n Return Value real(kind=DP),\n  dimension(NDIM) Called by proc~~whm_kick_getacch_ah0~~CalledByGraph proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah0 proc~whm_kick_getacch_tp whm_kick_getacch_tp proc~whm_kick_getacch_tp->proc~whm_kick_getacch_ah0 interface~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp->proc~whm_kick_getacch_tp interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_ah0.html"},{"title":"whm_kick_getacch_ah1 – swiftest","text":"pure subroutine whm_kick_getacch_ah1(cb, pl) Compute first term heliocentric accelerations of planets Adapted from Hal Levison's Swift routine getacch_ah1.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah1.f90 Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb WHM central body object class( whm_pl ), intent(inout) :: pl WHM massive body object Called by proc~~whm_kick_getacch_ah1~~CalledByGraph proc~whm_kick_getacch_ah1 whm_kick_getacch_ah1 proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah1 interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_ah1.html"},{"title":"whm_kick_getacch_ah2 – swiftest","text":"pure subroutine whm_kick_getacch_ah2(cb, pl) Compute second term heliocentric accelerations of planets Adapted from Hal Levison's Swift routine getacch_ah2.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah2.f90 Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb Swiftest central body object class( whm_pl ), intent(inout) :: pl WHM massive body object Called by proc~~whm_kick_getacch_ah2~~CalledByGraph proc~whm_kick_getacch_ah2 whm_kick_getacch_ah2 proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah2 interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_ah2.html"},{"title":"solve_wbs – swiftest","text":"function solve_wbs(u) result(x) Uses ieee_exceptions swiftest proc~~solve_wbs~~UsesGraph proc~solve_wbs solve_wbs module~swiftest swiftest proc~solve_wbs->module~swiftest ieee_exceptions ieee_exceptions proc~solve_wbs->ieee_exceptions module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:), allocatable :: u Return Value real(kind=QP),\n  dimension(:),allocatable Called by proc~~solve_wbs~~CalledByGraph proc~solve_wbs solve_wbs proc~util_solve_linear_system_q util_solve_linear_system_q proc~util_solve_linear_system_q->proc~solve_wbs proc~util_solve_linear_system_d util_solve_linear_system_d proc~util_solve_linear_system_d->proc~solve_wbs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/solve_wbs.html"},{"title":"ge_wpp – swiftest","text":"function ge_wpp(A, b) result(u) Uses ieee_exceptions swiftest proc~~ge_wpp~~UsesGraph proc~ge_wpp ge_wpp module~swiftest swiftest proc~ge_wpp->module~swiftest ieee_exceptions ieee_exceptions proc~ge_wpp->ieee_exceptions module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Solve  Ax=b  using Gaussian elimination then backwards substitution.\n   A being an n by n matrix.\n   x and b are n by 1 vectors. \n Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b Return Value real(kind=QP),\n  dimension(:,:),allocatable Called by proc~~ge_wpp~~CalledByGraph proc~ge_wpp ge_wpp proc~util_solve_linear_system_q util_solve_linear_system_q proc~util_solve_linear_system_q->proc~ge_wpp proc~util_solve_linear_system_d util_solve_linear_system_d proc~util_solve_linear_system_d->proc~ge_wpp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/ge_wpp.html"},{"title":"discard_cb_tp – swiftest","text":"subroutine discard_cb_tp(tp, system, param) Check to see if test particles should be discarded based on their positions relative to the Sun\n        or because they are unbound from the system Adapted from David E. Kaufmann's Swifter routine: discard_sun.f90\n Adapted from Hal Levison's Swift routine discard_sun.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Contents None","tags":"","loc":"proc/discard_cb_tp.html"},{"title":"discard_peri_tp – swiftest","text":"subroutine discard_peri_tp(tp, system, param) Check to see if a test particle should be discarded because its perihelion distance becomes too small Adapted from David E. Kaufmann's Swifter routine: discard_peri.f90\n Adapted from Hal Levison's Swift routine discard_peri.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameterss Contents None","tags":"","loc":"proc/discard_peri_tp.html"},{"title":"discard_pl_tp – swiftest","text":"subroutine discard_pl_tp(tp, system, param) Check to see if test particles should be discarded based on their positions relative to the massive bodies Adapted from David E. Kaufmann's Swifter routine: discard_pl.f90\n Adapted from Hal Levison's Swift routine discard_pl.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Contents None","tags":"","loc":"proc/discard_pl_tp.html"},{"title":"discard_pl_close – swiftest","text":"subroutine discard_pl_close(dx, dv, dt, r2crit, iflag, r2min) Check to see if a test particle and massive body are having, or will have within the next time step, an encounter such\n          that the separation distance r is less than some critical radius rcrit (or r 2 < rcrit 2 = r2crit) Adapted from David E. Kaufmann's Swifter routine: discard_pl_close.f90\n Adapted from Hal Levison's Swift routine discard_pl_close.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: dx real(kind=DP), intent(in), dimension(:) :: dv real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit integer(kind=I4B), intent(out) :: iflag real(kind=DP), intent(out) :: r2min Contents None","tags":"","loc":"proc/discard_pl_close.html"},{"title":"io_read_encounter – swiftest","text":"function io_read_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out, out_type) result(ierr) Read close encounter data from input binary files\n     Other than time t, there is no direct file input from this function\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_encounter.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: id1 integer(kind=I4B), intent(out) :: id2 real(kind=DP), intent(out) :: Gmass1 real(kind=DP), intent(out) :: Gmass2 real(kind=DP), intent(out) :: radius1 real(kind=DP), intent(out) :: radius2 real(kind=DP), intent(out), dimension(:) :: xh1 real(kind=DP), intent(out), dimension(:) :: xh2 real(kind=DP), intent(out), dimension(:) :: vh1 real(kind=DP), intent(out), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) Calls proc~~io_read_encounter~~CallsGraph proc~io_read_encounter io_read_encounter interface~util_exit util_exit proc~io_read_encounter->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_encounter.html"},{"title":"io_read_hdr – swiftest","text":"function io_read_hdr(iu, t, npl, ntp, out_form, out_type) result(ierr) Read frame header from input binary files\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_hdr.f90\n Adapted from Hal Levison's Swift routine io_read_hdr.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: npl integer(kind=I4B), intent(out) :: ntp character(len=*), intent(out) :: out_form character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) Called by proc~~io_read_hdr~~CalledByGraph proc~io_read_hdr io_read_hdr proc~io_read_frame_system io_read_frame_system proc~io_read_frame_system->proc~io_read_hdr interface~io_read_frame_system io_read_frame_system interface~io_read_frame_system->proc~io_read_frame_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_hdr.html"},{"title":"drift_dan – swiftest","text":"pure subroutine drift_dan(mu, x0, v0, dt0, iflag) Perform Kepler drift, solving Kepler's equation in appropriate variables Adapted from David E. Kaufmann's Swifter routine: drift_dan.f90\n Adapted from Hal Levison and Martin Duncan's Swift routine drift_dan.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(inout), dimension(:) :: x0 real(kind=DP), intent(inout), dimension(:) :: v0 real(kind=DP), intent(in) :: dt0 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_dan~~CallsGraph proc~drift_dan drift_dan proc~drift_kepu drift_kepu proc~drift_dan->proc~drift_kepu proc~drift_kepmd drift_kepmd proc~drift_dan->proc~drift_kepmd proc~drift_kepu_new drift_kepu_new proc~drift_kepu->proc~drift_kepu_new proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu->proc~drift_kepu_guess proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu->proc~drift_kepu_fchk proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu->proc~drift_kepu_lag proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_new->proc~drift_kepu_stumpff interface~orbel_scget orbel_scget proc~drift_kepu_guess->interface~orbel_scget proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~drift_kepu_fchk->proc~drift_kepu_stumpff proc~drift_kepu_lag->proc~drift_kepu_stumpff proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_dan.html"},{"title":"drift_kepmd – swiftest","text":"pure subroutine drift_kepmd(dm, es, ec, x, s, c) Solve Kepler's equation in difference form for an ellipse for small input dm and eccentricity\n    Original disclaimer: built for speed, does not check how well the original equation is solved\n    Can do that in calling routine by checking how close (x - ec s + es (1.0 - c) - dm) is to zero Adapted from David E. Kaufmann's Swifter routine: drift_kepmd.f90\n Adapted from Martin Duncan's Swift routine drift_kepmd.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dm real(kind=DP), intent(in) :: es real(kind=DP), intent(in) :: ec real(kind=DP), intent(out) :: x real(kind=DP), intent(out) :: s real(kind=DP), intent(out) :: c Called by proc~~drift_kepmd~~CalledByGraph proc~drift_kepmd drift_kepmd proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepmd Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepmd.html"},{"title":"drift_kepu – swiftest","text":"pure subroutine drift_kepu(dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Solve Kepler's equation in universal variables Adapted from David E. Kaufmann's Swifter routine: drift_kepu.f90\n Adapted from Hal Levison's Swift routine drift_kepu.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_kepu~~CallsGraph proc~drift_kepu drift_kepu proc~drift_kepu_new drift_kepu_new proc~drift_kepu->proc~drift_kepu_new proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu->proc~drift_kepu_guess proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu->proc~drift_kepu_fchk proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu->proc~drift_kepu_lag proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_new->proc~drift_kepu_stumpff interface~orbel_scget orbel_scget proc~drift_kepu_guess->interface~orbel_scget proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~drift_kepu_fchk->proc~drift_kepu_stumpff proc~drift_kepu_lag->proc~drift_kepu_stumpff proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu~~CalledByGraph proc~drift_kepu drift_kepu proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu.html"},{"title":"drift_kepu_fchk – swiftest","text":"pure subroutine drift_kepu_fchk(dt, r0, mu, alpha, u, s, f) Computes the value of f, the function whose root we are trying to find in universal variables Adapted from David E. Kaufmann's Swifter routine: drift_kepu_fchk.f90\n Adapted from Martin Duncan's Swift routine drift_kepu_fchk.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(in) :: s real(kind=DP), intent(out) :: f Calls proc~~drift_kepu_fchk~~CallsGraph proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_fchk->proc~drift_kepu_stumpff Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_fchk~~CalledByGraph proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_fchk proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_fchk.html"},{"title":"drift_kepu_guess – swiftest","text":"pure subroutine drift_kepu_guess(dt, r0, mu, alpha, u, s) Compute initial guess for solving Kepler's equation using universal variables Adapted from David E. Kaufmann's Swifter routine: drift_kepu_guess.f90\n Adapted from Hal Levison and Martin Duncan's Swift routine drift_kepu_guess.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s Calls proc~~drift_kepu_guess~~CallsGraph proc~drift_kepu_guess drift_kepu_guess interface~orbel_scget orbel_scget proc~drift_kepu_guess->interface~orbel_scget proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_guess~~CalledByGraph proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_guess.html"},{"title":"drift_kepu_lag – swiftest","text":"pure subroutine drift_kepu_lag(s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Solve Kepler's equation in universal variables using Laguerre's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_lag.f90\n Adapted from Hal Levison's Swift routine drift_kepu_lag.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_kepu_lag~~CallsGraph proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_lag->proc~drift_kepu_stumpff Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_lag~~CalledByGraph proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_lag proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_lag.html"},{"title":"drift_kepu_new – swiftest","text":"pure subroutine drift_kepu_new(s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Solve Kepler's equation in universal variables using Newton's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_new.f90\n Adapted from Hal Levison's Swift routine drift_kepu_new.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_kepu_new~~CallsGraph proc~drift_kepu_new drift_kepu_new proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_new->proc~drift_kepu_stumpff Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_new~~CalledByGraph proc~drift_kepu_new drift_kepu_new proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_new proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_new.html"},{"title":"drift_kepu_p3solve – swiftest","text":"pure subroutine drift_kepu_p3solve(dt, r0, mu, alpha, u, s, iflag) Computes real root of cubic involved in setting initial guess for solving Kepler's equation in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_p3solve.f90\n Adapted from Martin Duncan's Swift routine drift_kepu_p3solve.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s integer(kind=I4B), intent(out) :: iflag Called by proc~~drift_kepu_p3solve~~CalledByGraph proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_p3solve.html"},{"title":"drift_kepu_stumpff – swiftest","text":"pure subroutine drift_kepu_stumpff(x, c0, c1, c2, c3) Compute Stumpff functions needed for Kepler drift in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_stumpff.f90\n Adapted from Hal Levison's Swift routine drift_kepu_stumpff.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: x real(kind=DP), intent(out) :: c0 real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 Called by proc~~drift_kepu_stumpff~~CalledByGraph proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_new drift_kepu_new proc~drift_kepu_new->proc~drift_kepu_stumpff proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu_fchk->proc~drift_kepu_stumpff proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu_lag->proc~drift_kepu_stumpff proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_new proc~drift_kepu->proc~drift_kepu_fchk proc~drift_kepu->proc~drift_kepu_lag proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_stumpff.html"},{"title":"symba_collision_check_one – swiftest","text":"pure elemental function symba_collision_check_one(xr, yr, zr, vxr, vyr, vzr, Gmtot, rlim, dt, lvdotr) result(lcollision) Check for a merger between a single pair of particles Adapted from David E. Kaufmann's Swifter routines symba_merge_tp.f90 and symba_merge_pl.f90 Adapted from Hal Levison's Swift routine symba5_merge.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative position vector components real(kind=DP), intent(in) :: yr Relative position vector components real(kind=DP), intent(in) :: zr Relative position vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: Gmtot Sum of G*mass of colliding bodies real(kind=DP), intent(in) :: rlim Collision limit - Typically the sum of the radii of colliding bodies real(kind=DP), intent(in) :: dt Step size logical, intent(in) :: lvdotr Logical flag indicating that these two bodies are approaching in the current substep Return Value logical Logical flag indicating whether these two bodies will collide or not Calls proc~~symba_collision_check_one~~CallsGraph proc~symba_collision_check_one symba_collision_check_one orbel_xv2aeq orbel_xv2aeq proc~symba_collision_check_one->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_check_one~~CalledByGraph proc~symba_collision_check_one symba_collision_check_one proc~symba_collision_check_encounter symba_collision_check_encounter proc~symba_collision_check_encounter->proc~symba_collision_check_one interface~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter->proc~symba_collision_check_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_check_one.html"},{"title":"symba_collision_consolidate_colliders – swiftest","text":"function symba_collision_consolidate_colliders(pl, cb, param, idx_parent, colliders) result(lflag) Loops through the pl-pl collision list and groups families together by index. Outputs the indices of all colliders%idx members, \n and pairs of quantities (x and v vectors, mass, radius, L_spin, and Ip) that can be used to resolve the collisional outcome. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class( symba_cb ), intent(inout) :: cb SyMBA central body object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions integer(kind=I4B), intent(inout), dimension(2) :: idx_parent Index of the two bodies considered the \"parents\" of the collision class( fraggle_colliders ), intent(out) :: colliders Return Value logical Logical flag indicating whether a colliders%idx was successfully created or not Calls proc~~symba_collision_consolidate_colliders~~CallsGraph proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_consolidate_colliders~~CalledByGraph proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->proc~symba_collision_consolidate_colliders proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->proc~symba_collision_consolidate_colliders interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_consolidate_colliders.html"},{"title":"symba_collision_collider_message – swiftest","text":"subroutine symba_collision_collider_message(pl, collidx, collider_message) Prints a nicely formatted message about which bodies collided, including their names and ids.\n This subroutine appends the body names and ids to an input message. Arguments Type Intent Optional Attributes Name class(swiftest_pl), intent(in) :: pl Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: collidx Index of collisional colliders%idx members character(len=*), intent(inout) :: collider_message The message to print to the screen. Called by proc~~symba_collision_collider_message~~CalledByGraph proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_casemerge->proc~symba_collision_collider_message interface~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption interface~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun interface~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_collider_message.html"},{"title":"symba_collision_mergeaddsub – swiftest","text":"subroutine symba_collision_mergeaddsub(system, param, colliders, frag, status) Fills the pl_discards and pl_adds with removed and added bodies Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object integer(kind=I4B), intent(in) :: status Status flag to assign to adds Calls proc~~symba_collision_mergeaddsub~~CallsGraph proc~symba_collision_mergeaddsub symba_collision_mergeaddsub fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_mergeaddsub~~CalledByGraph proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub proc~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub proc~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub interface~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption interface~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun interface~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_mergeaddsub.html"},{"title":"symba_encounter_check_all – swiftest","text":"subroutine symba_encounter_check_all(nplplm, k_plpl, x, v, rhill, dt, irec, lencounter, loc_lvdotr) Check for encounters between massive bodies. Split off from the main subroutine for performance Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in) :: nplplm integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl real(kind=DP), intent(in), dimension(:,:) :: x real(kind=DP), intent(in), dimension(:,:) :: v real(kind=DP), intent(in), dimension(:) :: rhill real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out), dimension(:) :: lencounter logical, intent(out), dimension(:) :: loc_lvdotr Called by proc~~symba_encounter_check_all~~CalledByGraph proc~symba_encounter_check_all symba_encounter_check_all proc~symba_encounter_check_pl symba_encounter_check_pl proc~symba_encounter_check_pl->proc~symba_encounter_check_all interface~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl->proc~symba_encounter_check_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_all.html"},{"title":"symba_discard_cb_pl – swiftest","text":"subroutine symba_discard_cb_pl(pl, system, param) Check to see if planets should be discarded based on their positions relative to the central body.\n If a body gets flagged here when it has also been previously flagged for a collision with another massive body,\n its collisional status will be revoked. Discards due to colliding with or escaping the central body take precedence \n over pl-pl collisions Adapted from David E. Kaufmann's Swifter routine: symba_discard_sun.f90\n Adapted from Hal Levison's Swift routine discard_massive5.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_discard_cb_pl~~CallsGraph proc~symba_discard_cb_pl symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_discard_cb_pl~~CalledByGraph proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl proc~symba_discard_pl symba_discard_pl proc~symba_discard_pl->proc~symba_discard_nonplpl interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_cb_pl.html"},{"title":"symba_discard_conserve_mtm – swiftest","text":"subroutine symba_discard_conserve_mtm(pl, system, param, ipl, lescape_body) Conserves system momentum when a body is lost from the system or collides with central body Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl class( symba_nbody_system ), intent(inout) :: system class( symba_parameters ), intent(inout) :: param integer(kind=I4B), intent(in) :: ipl logical, intent(in) :: lescape_body Contents None","tags":"","loc":"proc/symba_discard_conserve_mtm.html"},{"title":"symba_discard_nonplpl – swiftest","text":"subroutine symba_discard_nonplpl(pl, system, param) Check to see if planets should be discarded based on their positions or because they are unbound Adapted from David E. Kaufmann's Swifter routine: symba_discard_pl.f90\n Adapted from Hal Levison's Swift routine discard_massive5.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_discard_nonplpl~~CallsGraph proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_discard_nonplpl~~CalledByGraph proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_pl symba_discard_pl proc~symba_discard_pl->proc~symba_discard_nonplpl interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_nonplpl.html"},{"title":"symba_discard_nonplpl_conservation – swiftest","text":"subroutine symba_discard_nonplpl_conservation(pl, system, param) If there are any bodies that are removed due to either colliding with the central body or escaping the systme,\n we need to track the conserved quantities with the system bookkeeping terms. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~symba_discard_nonplpl_conservation~~CalledByGraph proc~symba_discard_nonplpl_conservation symba_discard_nonplpl_conservation proc~symba_discard_pl symba_discard_pl proc~symba_discard_pl->proc~symba_discard_nonplpl_conservation interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_nonplpl_conservation.html"},{"title":"symba_discard_peri_pl – swiftest","text":"subroutine symba_discard_peri_pl(pl, system, param) Check to see if a test particle should be discarded because its perihelion distance becomes too small Adapted from David E. Kaufmann's Swifter routine: symba_discard_peri_pl.f90\n Adapted from Hal Levison's Swift routine discard_mass_peri.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Contents None","tags":"","loc":"proc/symba_discard_peri_pl.html"},{"title":"xv2el – swiftest","text":"public pure elemental subroutine xv2el(mu, px, py, pz, vx, vy, vz, a, e, inc, capom, omega, capm) Uses swiftest_classes proc~~xv2el~~UsesGraph proc~xv2el xv2el module~swiftest_classes swiftest_classes proc~xv2el->module~swiftest_classes module~swiftest_globals swiftest_globals module~swiftest_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Arguments Type Intent Optional Attributes Name real(kind=8), intent(in) :: mu real(kind=8), intent(in) :: px real(kind=8), intent(in) :: py real(kind=8), intent(in) :: pz real(kind=8), intent(in) :: vx real(kind=8), intent(in) :: vy real(kind=8), intent(in) :: vz real(kind=8), intent(out) :: a real(kind=8), intent(out) :: e real(kind=8), intent(out) :: inc real(kind=8), intent(out) :: capom real(kind=8), intent(out) :: omega real(kind=8), intent(out) :: capm Contents None","tags":"","loc":"proc/xv2el.html"},{"title":"check – swiftest","text":"subroutine check(status) Checks the status of all NetCDF operations to catch errors Arguments Type Intent Optional Attributes Name integer, intent(in) :: status Calls proc~~check~~CallsGraph proc~check check nf90_strerror nf90_strerror proc~check->nf90_strerror interface~util_exit util_exit proc~check->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/check.html"},{"title":"rmvs_chk_ind – swiftest","text":"interface Calls interface~~rmvs_chk_ind~~CallsGraph interface~rmvs_chk_ind rmvs_chk_ind proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~rmvs_chk_ind~~CalledByGraph interface~rmvs_chk_ind rmvs_chk_ind proc~rmvs_encounter_check_tp rmvs_encounter_check_tp proc~rmvs_encounter_check_tp->interface~rmvs_chk_ind proc~symba_encounter_check_one symba_encounter_check_one proc~symba_encounter_check_one->interface~rmvs_chk_ind interface~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one->proc~symba_encounter_check_one interface~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp->proc~rmvs_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public elemental module function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: r2 real(kind=DP), intent(in) :: v2 real(kind=DP), intent(in) :: vdotr real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit Return Value logical","tags":"","loc":"interface/rmvs_chk_ind.html"},{"title":"rmvs_encounter_check_tp – swiftest","text":"interface Calls interface~~rmvs_encounter_check_tp~~CallsGraph interface~rmvs_encounter_check_tp rmvs_encounter_check_tp proc~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp->proc~rmvs_encounter_check_tp interface~rmvs_chk_ind rmvs_chk_ind proc~rmvs_encounter_check_tp->interface~rmvs_chk_ind proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/rmvs_encounter_check_tp.html"},{"title":"rmvs_discard_tp – swiftest","text":"interface Calls interface~~rmvs_discard_tp~~CallsGraph interface~rmvs_discard_tp rmvs_discard_tp proc~rmvs_discard_tp rmvs_discard_tp interface~rmvs_discard_tp->proc~rmvs_discard_tp discard_tp discard_tp proc~rmvs_discard_tp->discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/rmvs_discard_tp.html"},{"title":"rmvs_io_write_encounter – swiftest","text":"interface Calls interface~~rmvs_io_write_encounter~~CallsGraph interface~rmvs_io_write_encounter rmvs_io_write_encounter proc~rmvs_io_write_encounter rmvs_io_write_encounter interface~rmvs_io_write_encounter->proc~rmvs_io_write_encounter util_exit util_exit proc~rmvs_io_write_encounter->util_exit io_write_frame_encounter io_write_frame_encounter proc~rmvs_io_write_encounter->io_write_frame_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_io_write_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out","tags":"","loc":"interface/rmvs_io_write_encounter.html"},{"title":"rmvs_kick_getacch_tp – swiftest","text":"interface Calls interface~~rmvs_kick_getacch_tp~~CallsGraph interface~rmvs_kick_getacch_tp rmvs_kick_getacch_tp proc~rmvs_kick_getacch_tp rmvs_kick_getacch_tp interface~rmvs_kick_getacch_tp->proc~rmvs_kick_getacch_tp whm_kick_getacch_tp whm_kick_getacch_tp proc~rmvs_kick_getacch_tp->whm_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/rmvs_kick_getacch_tp.html"},{"title":"rmvs_setup_pl – swiftest","text":"interface Calls interface~~rmvs_setup_pl~~CallsGraph interface~rmvs_setup_pl rmvs_setup_pl proc~rmvs_setup_pl rmvs_setup_pl interface~rmvs_setup_pl->proc~rmvs_setup_pl whm_setup_pl whm_setup_pl proc~rmvs_setup_pl->whm_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/rmvs_setup_pl.html"},{"title":"rmvs_setup_initialize_system – swiftest","text":"interface Calls interface~~rmvs_setup_initialize_system~~CallsGraph interface~rmvs_setup_initialize_system rmvs_setup_initialize_system proc~rmvs_setup_initialize_system rmvs_setup_initialize_system interface~rmvs_setup_initialize_system->proc~rmvs_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~rmvs_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/rmvs_setup_initialize_system.html"},{"title":"rmvs_setup_tp – swiftest","text":"interface Calls interface~~rmvs_setup_tp~~CallsGraph interface~rmvs_setup_tp rmvs_setup_tp proc~rmvs_setup_tp rmvs_setup_tp interface~rmvs_setup_tp->proc~rmvs_setup_tp setup_tp setup_tp proc~rmvs_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parametere","tags":"","loc":"interface/rmvs_setup_tp.html"},{"title":"rmvs_util_append_pl – swiftest","text":"interface Calls interface~~rmvs_util_append_pl~~CallsGraph interface~rmvs_util_append_pl rmvs_util_append_pl proc~rmvs_util_append_pl rmvs_util_append_pl interface~rmvs_util_append_pl->proc~rmvs_util_append_pl util_append util_append proc~rmvs_util_append_pl->util_append whm_util_append_pl whm_util_append_pl proc~rmvs_util_append_pl->whm_util_append_pl util_exit util_exit proc~rmvs_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/rmvs_util_append_pl.html"},{"title":"rmvs_util_append_tp – swiftest","text":"interface Calls interface~~rmvs_util_append_tp~~CallsGraph interface~rmvs_util_append_tp rmvs_util_append_tp proc~rmvs_util_append_tp rmvs_util_append_tp interface~rmvs_util_append_tp->proc~rmvs_util_append_tp util_append util_append proc~rmvs_util_append_tp->util_append util_append_tp util_append_tp proc~rmvs_util_append_tp->util_append_tp util_exit util_exit proc~rmvs_util_append_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/rmvs_util_append_tp.html"},{"title":"rmvs_util_fill_pl – swiftest","text":"interface Calls interface~~rmvs_util_fill_pl~~CallsGraph interface~rmvs_util_fill_pl rmvs_util_fill_pl proc~rmvs_util_fill_pl rmvs_util_fill_pl interface~rmvs_util_fill_pl->proc~rmvs_util_fill_pl whm_util_fill_pl whm_util_fill_pl proc~rmvs_util_fill_pl->whm_util_fill_pl util_fill util_fill proc~rmvs_util_fill_pl->util_fill util_exit util_exit proc~rmvs_util_fill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/rmvs_util_fill_pl.html"},{"title":"rmvs_util_fill_tp – swiftest","text":"interface Calls interface~~rmvs_util_fill_tp~~CallsGraph interface~rmvs_util_fill_tp rmvs_util_fill_tp proc~rmvs_util_fill_tp rmvs_util_fill_tp interface~rmvs_util_fill_tp->proc~rmvs_util_fill_tp util_fill util_fill proc~rmvs_util_fill_tp->util_fill util_fill_tp util_fill_tp proc~rmvs_util_fill_tp->util_fill_tp util_exit util_exit proc~rmvs_util_fill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/rmvs_util_fill_tp.html"},{"title":"rmvs_util_resize_pl – swiftest","text":"interface Calls interface~~rmvs_util_resize_pl~~CallsGraph interface~rmvs_util_resize_pl rmvs_util_resize_pl proc~rmvs_util_resize_pl rmvs_util_resize_pl interface~rmvs_util_resize_pl->proc~rmvs_util_resize_pl util_resize util_resize proc~rmvs_util_resize_pl->util_resize whm_util_resize_pl whm_util_resize_pl proc~rmvs_util_resize_pl->whm_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/rmvs_util_resize_pl.html"},{"title":"rmvs_util_resize_tp – swiftest","text":"interface Calls interface~~rmvs_util_resize_tp~~CallsGraph interface~rmvs_util_resize_tp rmvs_util_resize_tp proc~rmvs_util_resize_tp rmvs_util_resize_tp interface~rmvs_util_resize_tp->proc~rmvs_util_resize_tp util_resize util_resize proc~rmvs_util_resize_tp->util_resize util_resize_tp util_resize_tp proc~rmvs_util_resize_tp->util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/rmvs_util_resize_tp.html"},{"title":"rmvs_util_sort_pl – swiftest","text":"interface Calls interface~~rmvs_util_sort_pl~~CallsGraph interface~rmvs_util_sort_pl rmvs_util_sort_pl proc~rmvs_util_sort_pl rmvs_util_sort_pl interface~rmvs_util_sort_pl->proc~rmvs_util_sort_pl whm_util_sort_pl whm_util_sort_pl proc~rmvs_util_sort_pl->whm_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/rmvs_util_sort_pl.html"},{"title":"rmvs_util_sort_tp – swiftest","text":"interface Calls interface~~rmvs_util_sort_tp~~CallsGraph interface~rmvs_util_sort_tp rmvs_util_sort_tp proc~rmvs_util_sort_tp rmvs_util_sort_tp interface~rmvs_util_sort_tp->proc~rmvs_util_sort_tp util_sort_tp util_sort_tp proc~rmvs_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/rmvs_util_sort_tp.html"},{"title":"rmvs_util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~rmvs_util_sort_rearrange_pl~~CallsGraph interface~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl proc~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl interface~rmvs_util_sort_rearrange_pl->proc~rmvs_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/rmvs_util_sort_rearrange_pl.html"},{"title":"rmvs_util_sort_rearrange_tp – swiftest","text":"interface Calls interface~~rmvs_util_sort_rearrange_tp~~CallsGraph interface~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp proc~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp interface~rmvs_util_sort_rearrange_tp->proc~rmvs_util_sort_rearrange_tp util_sort_rearrange_tp util_sort_rearrange_tp proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange_tp util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/rmvs_util_sort_rearrange_tp.html"},{"title":"rmvs_util_spill_pl – swiftest","text":"interface Calls interface~~rmvs_util_spill_pl~~CallsGraph interface~rmvs_util_spill_pl rmvs_util_spill_pl proc~rmvs_util_spill_pl rmvs_util_spill_pl interface~rmvs_util_spill_pl->proc~rmvs_util_spill_pl util_spill util_spill proc~rmvs_util_spill_pl->util_spill whm_util_spill_pl whm_util_spill_pl proc~rmvs_util_spill_pl->whm_util_spill_pl util_exit util_exit proc~rmvs_util_spill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/rmvs_util_spill_pl.html"},{"title":"rmvs_util_spill_tp – swiftest","text":"interface Calls interface~~rmvs_util_spill_tp~~CallsGraph interface~rmvs_util_spill_tp rmvs_util_spill_tp proc~rmvs_util_spill_tp rmvs_util_spill_tp interface~rmvs_util_spill_tp->proc~rmvs_util_spill_tp util_spill util_spill proc~rmvs_util_spill_tp->util_spill util_spill_tp util_spill_tp proc~rmvs_util_spill_tp->util_spill_tp util_exit util_exit proc~rmvs_util_spill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/rmvs_util_spill_tp.html"},{"title":"rmvs_step_system – swiftest","text":"interface Calls interface~~rmvs_step_system~~CallsGraph interface~rmvs_step_system rmvs_step_system proc~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system proc~rmvs_step_out rmvs_step_out proc~rmvs_step_system->proc~rmvs_step_out proc~rmvs_interp_out rmvs_interp_out proc~rmvs_step_system->proc~rmvs_interp_out whm_step_system whm_step_system proc~rmvs_step_system->whm_step_system proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out->proc~rmvs_interp_in util_exit util_exit proc~rmvs_interp_out->util_exit proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_interp_in->util_exit xpc xpc proc~rmvs_peri_tp->xpc vpc vpc proc~rmvs_peri_tp->vpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/rmvs_step_system.html"},{"title":"walltime_finish – swiftest","text":"public subroutine walltime_finish(self, nsubsteps, message) Uses swiftest_globals proc~~walltime_finish~~UsesGraph proc~walltime_finish walltime_finish module~swiftest_globals swiftest_globals proc~walltime_finish->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output Contents None","tags":"","loc":"proc/walltime_finish.html"},{"title":"walltime_reset – swiftest","text":"public subroutine walltime_reset(self) Uses swiftest_globals proc~~walltime_reset~~UsesGraph proc~walltime_reset walltime_reset module~swiftest_globals swiftest_globals proc~walltime_reset->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Resets the clock ticker, settting main_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Contents None","tags":"","loc":"proc/walltime_reset.html"},{"title":"walltime_start – swiftest","text":"public subroutine walltime_start(self) Uses swiftest_globals proc~~walltime_start~~UsesGraph proc~walltime_start walltime_start module~swiftest_globals swiftest_globals proc~walltime_start->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Starts the timer, setting step_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Contents None","tags":"","loc":"proc/walltime_start.html"},{"title":"walltime_finish – swiftest","text":"interface public subroutine walltime_finish(self, nsubsteps, message) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output","tags":"","loc":"interface/walltime_finish.html"},{"title":"walltime_reset – swiftest","text":"interface public subroutine walltime_reset(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object","tags":"","loc":"interface/walltime_reset.html"},{"title":"walltime_start – swiftest","text":"interface public subroutine walltime_start(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object","tags":"","loc":"interface/walltime_start.html"},{"title":"operator(.cross.) – swiftest","text":"public interface operator(.cross.) Contents Functions operator_cross_sp operator_cross_dp operator_cross_qp operator_cross_i1b operator_cross_i2b operator_cross_i4b operator_cross_i8b operator_cross_el_sp operator_cross_el_dp operator_cross_el_qp operator_cross_el_i1b operator_cross_el_i2b operator_cross_el_i4b operator_cross_el_i8b Functions public pure function operator_cross_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) public pure function operator_cross_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) public pure function operator_cross_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) public pure function operator_cross_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) public pure function operator_cross_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) public pure function operator_cross_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) public pure function operator_cross_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) public pure function operator_cross_el_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:), allocatable public pure function operator_cross_el_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:), allocatable public pure function operator_cross_el_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:), allocatable public pure function operator_cross_el_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:), allocatable","tags":"","loc":"interface/operator(.cross.).html"},{"title":"operator(.mag.) – swiftest","text":"public interface operator(.mag.) Contents Functions operator_mag_sp operator_mag_dp operator_mag_qp operator_mag_el_sp operator_mag_el_dp operator_mag_el_qp Functions public pure function operator_mag_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) public pure function operator_mag_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) public pure function operator_mag_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A Return Value real(kind=QP) public pure function operator_mag_el_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:), allocatable public pure function operator_mag_el_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:), allocatable public pure function operator_mag_el_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:), allocatable","tags":"","loc":"interface/operator(.mag.).html"},{"title":"helio_drift_body – swiftest","text":"interface Calls interface~~helio_drift_body~~CallsGraph interface~helio_drift_body helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~helio_drift_body~~CalledByGraph interface~helio_drift_body helio_drift_body proc~helio_drift_pl helio_drift_pl proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_tp helio_drift_tp proc~helio_drift_tp->interface~helio_drift_body interface~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp interface~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_drift_body.html"},{"title":"helio_drift_pl – swiftest","text":"interface Calls interface~~helio_drift_pl~~CallsGraph interface~helio_drift_pl helio_drift_pl proc~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl interface~helio_drift_body helio_drift_body proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_drift_pl.html"},{"title":"helio_drift_tp – swiftest","text":"interface Calls interface~~helio_drift_tp~~CallsGraph interface~helio_drift_tp helio_drift_tp proc~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp interface~helio_drift_body helio_drift_body proc~helio_drift_tp->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_drift_tp.html"},{"title":"helio_drift_linear_pl – swiftest","text":"interface Calls interface~~helio_drift_linear_pl~~CallsGraph interface~helio_drift_linear_pl helio_drift_linear_pl proc~helio_drift_linear_pl helio_drift_linear_pl interface~helio_drift_linear_pl->proc~helio_drift_linear_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_drift_linear_pl.html"},{"title":"helio_drift_linear_tp – swiftest","text":"interface Calls interface~~helio_drift_linear_tp~~CallsGraph interface~helio_drift_linear_tp helio_drift_linear_tp proc~helio_drift_linear_tp helio_drift_linear_tp interface~helio_drift_linear_tp->proc~helio_drift_linear_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_drift_linear_tp.html"},{"title":"helio_gr_kick_getacch_pl – swiftest","text":"interface Calls interface~~helio_gr_kick_getacch_pl~~CallsGraph interface~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl proc~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl interface~helio_gr_kick_getacch_pl->proc~helio_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/helio_gr_kick_getacch_pl.html"},{"title":"helio_gr_kick_getacch_tp – swiftest","text":"interface Calls interface~~helio_gr_kick_getacch_tp~~CallsGraph interface~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp proc~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp interface~helio_gr_kick_getacch_tp->proc~helio_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/helio_gr_kick_getacch_tp.html"},{"title":"helio_gr_p4_pl – swiftest","text":"interface Calls interface~~helio_gr_p4_pl~~CallsGraph interface~helio_gr_p4_pl helio_gr_p4_pl proc~helio_gr_p4_pl helio_gr_p4_pl interface~helio_gr_p4_pl->proc~helio_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/helio_gr_p4_pl.html"},{"title":"helio_gr_p4_tp – swiftest","text":"interface Calls interface~~helio_gr_p4_tp~~CallsGraph interface~helio_gr_p4_tp helio_gr_p4_tp proc~helio_gr_p4_tp helio_gr_p4_tp interface~helio_gr_p4_tp->proc~helio_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/helio_gr_p4_tp.html"},{"title":"helio_kick_getacch_pl – swiftest","text":"interface Calls interface~~helio_kick_getacch_pl~~CallsGraph interface~helio_kick_getacch_pl helio_kick_getacch_pl proc~helio_kick_getacch_pl helio_kick_getacch_pl interface~helio_kick_getacch_pl->proc~helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_kick_getacch_pl.html"},{"title":"helio_kick_getacch_tp – swiftest","text":"interface Calls interface~~helio_kick_getacch_tp~~CallsGraph interface~helio_kick_getacch_tp helio_kick_getacch_tp proc~helio_kick_getacch_tp helio_kick_getacch_tp interface~helio_kick_getacch_tp->proc~helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_kick_getacch_tp.html"},{"title":"helio_kick_vb_pl – swiftest","text":"interface Calls interface~~helio_kick_vb_pl~~CallsGraph interface~helio_kick_vb_pl helio_kick_vb_pl proc~helio_kick_vb_pl helio_kick_vb_pl interface~helio_kick_vb_pl->proc~helio_kick_vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/helio_kick_vb_pl.html"},{"title":"helio_kick_vb_tp – swiftest","text":"interface Calls interface~~helio_kick_vb_tp~~CallsGraph interface~helio_kick_vb_tp helio_kick_vb_tp proc~helio_kick_vb_tp helio_kick_vb_tp interface~helio_kick_vb_tp->proc~helio_kick_vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/helio_kick_vb_tp.html"},{"title":"helio_setup_initialize_system – swiftest","text":"interface Calls interface~~helio_setup_initialize_system~~CallsGraph interface~helio_setup_initialize_system helio_setup_initialize_system proc~helio_setup_initialize_system helio_setup_initialize_system interface~helio_setup_initialize_system->proc~helio_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~helio_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/helio_setup_initialize_system.html"},{"title":"helio_step_pl – swiftest","text":"interface Calls interface~~helio_step_pl~~CallsGraph interface~helio_step_pl helio_step_pl proc~helio_step_pl helio_step_pl interface~helio_step_pl->proc~helio_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_step_pl.html"},{"title":"helio_step_system – swiftest","text":"interface Calls interface~~helio_step_system~~CallsGraph interface~helio_step_system helio_step_system proc~helio_step_system helio_step_system interface~helio_step_system->proc~helio_step_system whm_step_system whm_step_system proc~helio_step_system->whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/helio_step_system.html"},{"title":"helio_step_tp – swiftest","text":"interface Calls interface~~helio_step_tp~~CallsGraph interface~helio_step_tp helio_step_tp proc~helio_step_tp helio_step_tp interface~helio_step_tp->proc~helio_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee","tags":"","loc":"interface/helio_step_tp.html"},{"title":"whm_coord_h2j_pl – swiftest","text":"interface Calls interface~~whm_coord_h2j_pl~~CallsGraph interface~whm_coord_h2j_pl whm_coord_h2j_pl proc~whm_coord_h2j_pl whm_coord_h2j_pl interface~whm_coord_h2j_pl->proc~whm_coord_h2j_pl vj vj proc~whm_coord_h2j_pl->vj vh vh proc~whm_coord_h2j_pl->vh xj xj proc~whm_coord_h2j_pl->xj xh xh proc~whm_coord_h2j_pl->xh gmpl gmpl proc~whm_coord_h2j_pl->gmpl eta eta proc~whm_coord_h2j_pl->eta Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"interface/whm_coord_h2j_pl.html"},{"title":"whm_coord_j2h_pl – swiftest","text":"interface Calls interface~~whm_coord_j2h_pl~~CallsGraph interface~whm_coord_j2h_pl whm_coord_j2h_pl proc~whm_coord_j2h_pl whm_coord_j2h_pl interface~whm_coord_j2h_pl->proc~whm_coord_j2h_pl vj vj proc~whm_coord_j2h_pl->vj vh vh proc~whm_coord_j2h_pl->vh xj xj proc~whm_coord_j2h_pl->xj xh xh proc~whm_coord_j2h_pl->xh gmpl gmpl proc~whm_coord_j2h_pl->gmpl eta eta proc~whm_coord_j2h_pl->eta Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"interface/whm_coord_j2h_pl.html"},{"title":"whm_coord_vh2vj_pl – swiftest","text":"interface Calls interface~~whm_coord_vh2vj_pl~~CallsGraph interface~whm_coord_vh2vj_pl whm_coord_vh2vj_pl proc~whm_coord_vh2vj_pl whm_coord_vh2vj_pl interface~whm_coord_vh2vj_pl->proc~whm_coord_vh2vj_pl eta eta proc~whm_coord_vh2vj_pl->eta vj vj proc~whm_coord_vh2vj_pl->vj gmpl gmpl proc~whm_coord_vh2vj_pl->gmpl vh vh proc~whm_coord_vh2vj_pl->vh Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"interface/whm_coord_vh2vj_pl.html"},{"title":"whm_drift_pl – swiftest","text":"interface Calls interface~~whm_drift_pl~~CallsGraph interface~whm_drift_pl whm_drift_pl proc~whm_drift_pl whm_drift_pl interface~whm_drift_pl->proc~whm_drift_pl drift_all drift_all proc~whm_drift_pl->drift_all util_exit util_exit proc~whm_drift_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/whm_drift_pl.html"},{"title":"whm_util_index_eucl_plpl – swiftest","text":"interface public subroutine whm_util_index_eucl_plpl(self, param) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/whm_util_index_eucl_plpl.html"},{"title":"whm_kick_getacch_pl – swiftest","text":"interface Calls interface~~whm_kick_getacch_pl~~CallsGraph interface~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah0 proc~whm_kick_getacch_ah1 whm_kick_getacch_ah1 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah1 proc~whm_kick_getacch_ah2 whm_kick_getacch_ah2 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Description Get heliocentric accelration of massive bodies","tags":"","loc":"interface/whm_kick_getacch_pl.html"},{"title":"whm_kick_getacch_tp – swiftest","text":"interface Calls interface~~whm_kick_getacch_tp~~CallsGraph interface~whm_kick_getacch_tp whm_kick_getacch_tp proc~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp->proc~whm_kick_getacch_tp proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_tp->proc~whm_kick_getacch_ah0 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Description Get heliocentric accelration of the test particle","tags":"","loc":"interface/whm_kick_getacch_tp.html"},{"title":"whm_kick_vh_pl – swiftest","text":"interface Calls interface~~whm_kick_vh_pl~~CallsGraph interface~whm_kick_vh_pl whm_kick_vh_pl proc~whm_kick_vh_pl whm_kick_vh_pl interface~whm_kick_vh_pl->proc~whm_kick_vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/whm_kick_vh_pl.html"},{"title":"whm_kick_vh_tp – swiftest","text":"interface Calls interface~~whm_kick_vh_tp~~CallsGraph interface~whm_kick_vh_tp whm_kick_vh_tp proc~whm_kick_vh_tp whm_kick_vh_tp interface~whm_kick_vh_tp->proc~whm_kick_vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/whm_kick_vh_tp.html"},{"title":"whm_gr_kick_getacch_pl – swiftest","text":"interface Calls interface~~whm_gr_kick_getacch_pl~~CallsGraph interface~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl proc~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl interface~whm_gr_kick_getacch_pl->proc~whm_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/whm_gr_kick_getacch_pl.html"},{"title":"whm_gr_kick_getacch_tp – swiftest","text":"interface Calls interface~~whm_gr_kick_getacch_tp~~CallsGraph interface~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp proc~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp interface~whm_gr_kick_getacch_tp->proc~whm_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/whm_gr_kick_getacch_tp.html"},{"title":"whm_gr_p4_pl – swiftest","text":"interface Calls interface~~whm_gr_p4_pl~~CallsGraph interface~whm_gr_p4_pl whm_gr_p4_pl proc~whm_gr_p4_pl whm_gr_p4_pl interface~whm_gr_p4_pl->proc~whm_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/whm_gr_p4_pl.html"},{"title":"whm_gr_p4_tp – swiftest","text":"interface Calls interface~~whm_gr_p4_tp~~CallsGraph interface~whm_gr_p4_tp whm_gr_p4_tp proc~whm_gr_p4_tp whm_gr_p4_tp interface~whm_gr_p4_tp->proc~whm_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/whm_gr_p4_tp.html"},{"title":"whm_setup_pl – swiftest","text":"interface Calls interface~~whm_setup_pl~~CallsGraph interface~whm_setup_pl whm_setup_pl proc~whm_setup_pl whm_setup_pl interface~whm_setup_pl->proc~whm_setup_pl setup_pl setup_pl proc~whm_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body objectobject integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters Description Reads WHM massive body object in from file","tags":"","loc":"interface/whm_setup_pl.html"},{"title":"whm_setup_initialize_system – swiftest","text":"interface Calls interface~~whm_setup_initialize_system~~CallsGraph interface~whm_setup_initialize_system whm_setup_initialize_system proc~whm_setup_initialize_system whm_setup_initialize_system interface~whm_setup_initialize_system->proc~whm_setup_initialize_system util_set_ir3h util_set_ir3h proc~whm_setup_initialize_system->util_set_ir3h setup_initialize_system setup_initialize_system proc~whm_setup_initialize_system->setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/whm_setup_initialize_system.html"},{"title":"whm_step_pl – swiftest","text":"interface Calls interface~~whm_step_pl~~CallsGraph interface~whm_step_pl whm_step_pl proc~whm_step_pl whm_step_pl interface~whm_step_pl->proc~whm_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/whm_step_pl.html"},{"title":"whm_step_system – swiftest","text":"interface Calls interface~~whm_step_system~~CallsGraph interface~whm_step_system whm_step_system proc~whm_step_system whm_step_system interface~whm_step_system->proc~whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/whm_step_system.html"},{"title":"whm_step_tp – swiftest","text":"interface Calls interface~~whm_step_tp~~CallsGraph interface~whm_step_tp whm_step_tp proc~whm_step_tp whm_step_tp interface~whm_step_tp->proc~whm_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/whm_step_tp.html"},{"title":"whm_util_append_pl – swiftest","text":"interface Calls interface~~whm_util_append_pl~~CallsGraph interface~whm_util_append_pl whm_util_append_pl proc~whm_util_append_pl whm_util_append_pl interface~whm_util_append_pl->proc~whm_util_append_pl util_append util_append proc~whm_util_append_pl->util_append util_append_pl util_append_pl proc~whm_util_append_pl->util_append_pl util_exit util_exit proc~whm_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/whm_util_append_pl.html"},{"title":"whm_util_spill_pl – swiftest","text":"interface Calls interface~~whm_util_spill_pl~~CallsGraph interface~whm_util_spill_pl whm_util_spill_pl proc~whm_util_spill_pl whm_util_spill_pl interface~whm_util_spill_pl->proc~whm_util_spill_pl util_spill util_spill proc~whm_util_spill_pl->util_spill util_spill_pl util_spill_pl proc~whm_util_spill_pl->util_spill_pl util_exit util_exit proc~whm_util_spill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/whm_util_spill_pl.html"},{"title":"whm_util_fill_pl – swiftest","text":"interface Calls interface~~whm_util_fill_pl~~CallsGraph interface~whm_util_fill_pl whm_util_fill_pl proc~whm_util_fill_pl whm_util_fill_pl interface~whm_util_fill_pl->proc~whm_util_fill_pl util_fill_pl util_fill_pl proc~whm_util_fill_pl->util_fill_pl util_fill util_fill proc~whm_util_fill_pl->util_fill util_exit util_exit proc~whm_util_fill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/whm_util_fill_pl.html"},{"title":"whm_util_resize_pl – swiftest","text":"interface Calls interface~~whm_util_resize_pl~~CallsGraph interface~whm_util_resize_pl whm_util_resize_pl proc~whm_util_resize_pl whm_util_resize_pl interface~whm_util_resize_pl->proc~whm_util_resize_pl util_resize util_resize proc~whm_util_resize_pl->util_resize util_resize_pl util_resize_pl proc~whm_util_resize_pl->util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/whm_util_resize_pl.html"},{"title":"whm_util_set_ir3j – swiftest","text":"interface Calls interface~~whm_util_set_ir3j~~CallsGraph interface~whm_util_set_ir3j whm_util_set_ir3j proc~whm_util_set_ir3j whm_util_set_ir3j interface~whm_util_set_ir3j->proc~whm_util_set_ir3j Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object","tags":"","loc":"interface/whm_util_set_ir3j.html"},{"title":"whm_util_set_mu_eta_pl – swiftest","text":"interface Calls interface~~whm_util_set_mu_eta_pl~~CallsGraph interface~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl proc~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl interface~whm_util_set_mu_eta_pl->proc~whm_util_set_mu_eta_pl util_set_mu_pl util_set_mu_pl proc~whm_util_set_mu_eta_pl->util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/whm_util_set_mu_eta_pl.html"},{"title":"whm_util_sort_pl – swiftest","text":"interface Calls interface~~whm_util_sort_pl~~CallsGraph interface~whm_util_sort_pl whm_util_sort_pl proc~whm_util_sort_pl whm_util_sort_pl interface~whm_util_sort_pl->proc~whm_util_sort_pl util_sort_pl util_sort_pl proc~whm_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/whm_util_sort_pl.html"},{"title":"whm_util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~whm_util_sort_rearrange_pl~~CallsGraph interface~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl proc~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl interface~whm_util_sort_rearrange_pl->proc~whm_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~whm_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~whm_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/whm_util_sort_rearrange_pl.html"},{"title":"fraggle_util_vmag_to_vb – swiftest","text":"interface Calls interface~~fraggle_util_vmag_to_vb~~CallsGraph interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_vmag_to_vb~~CalledByGraph interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function fraggle_util_vmag_to_vb(v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:),allocatable","tags":"","loc":"interface/fraggle_util_vmag_to_vb.html"},{"title":"fraggle_generate_fragments – swiftest","text":"interface Calls interface~~fraggle_generate_fragments~~CallsGraph interface~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_generate_fragments->interface~fraggle_io_log_generate proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_tan_vel->util_minimize_bfgs interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb lambda_obj lambda_obj proc~fraggle_generate_tan_vel->lambda_obj interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_rad_vel->util_minimize_bfgs proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->lambda_obj proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead?","tags":"","loc":"interface/fraggle_generate_fragments.html"},{"title":"fraggle_io_log_generate – swiftest","text":"interface Calls interface~~fraggle_io_log_generate~~CallsGraph interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_io_log_generate~~CalledByGraph interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_generate interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_generate(frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag","tags":"","loc":"interface/fraggle_io_log_generate.html"},{"title":"fraggle_io_log_one_message – swiftest","text":"interface Calls interface~~fraggle_io_log_one_message~~CallsGraph interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_io_log_one_message~~CalledByGraph interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_regime_collresolve fraggle_regime_collresolve proc~fraggle_regime_collresolve->interface~fraggle_io_log_one_message interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_one_message(message) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message","tags":"","loc":"interface/fraggle_io_log_one_message.html"},{"title":"fraggle_io_log_pl – swiftest","text":"interface Calls interface~~fraggle_io_log_pl~~CallsGraph interface~fraggle_io_log_pl fraggle_io_log_pl proc~fraggle_io_log_pl fraggle_io_log_pl interface~fraggle_io_log_pl->proc~fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_pl(pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters","tags":"","loc":"interface/fraggle_io_log_pl.html"},{"title":"fraggle_io_log_regime – swiftest","text":"interface Calls interface~~fraggle_io_log_regime~~CallsGraph interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_io_log_regime~~CalledByGraph interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_regime_colliders fraggle_regime_colliders proc~fraggle_regime_colliders->interface~fraggle_io_log_regime interface~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_regime(colliders, frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders class( fraggle_fragments ), intent(in) :: frag","tags":"","loc":"interface/fraggle_io_log_regime.html"},{"title":"fraggle_io_log_start – swiftest","text":"interface Calls interface~~fraggle_io_log_start~~CallsGraph interface~fraggle_io_log_start fraggle_io_log_start proc~fraggle_io_log_start fraggle_io_log_start interface~fraggle_io_log_start->proc~fraggle_io_log_start Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_start(param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param","tags":"","loc":"interface/fraggle_io_log_start.html"},{"title":"fraggle_placeholder_accel – swiftest","text":"interface Calls interface~~fraggle_placeholder_accel~~CallsGraph interface~fraggle_placeholder_accel fraggle_placeholder_accel proc~fraggle_placeholder_accel fraggle_placeholder_accel interface~fraggle_placeholder_accel->proc~fraggle_placeholder_accel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step Description The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class","tags":"","loc":"interface/fraggle_placeholder_accel.html"},{"title":"fraggle_placeholder_kick – swiftest","text":"interface Calls interface~~fraggle_placeholder_kick~~CallsGraph interface~fraggle_placeholder_kick fraggle_placeholder_kick proc~fraggle_placeholder_kick fraggle_placeholder_kick interface~fraggle_placeholder_kick->proc~fraggle_placeholder_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/fraggle_placeholder_kick.html"},{"title":"fraggle_placeholder_step – swiftest","text":"interface Calls interface~~fraggle_placeholder_step~~CallsGraph interface~fraggle_placeholder_step fraggle_placeholder_step proc~fraggle_placeholder_step fraggle_placeholder_step interface~fraggle_placeholder_step->proc~fraggle_placeholder_step Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_placeholder_step(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsiz","tags":"","loc":"interface/fraggle_placeholder_step.html"},{"title":"fraggle_regime_colliders – swiftest","text":"interface Calls interface~~fraggle_regime_colliders~~CallsGraph interface~fraggle_regime_colliders fraggle_regime_colliders proc~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_regime_colliders->interface~fraggle_io_log_regime proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_regime_colliders(self, frag, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"interface/fraggle_regime_colliders.html"},{"title":"fraggle_set_budgets_fragments – swiftest","text":"interface Calls interface~~fraggle_set_budgets_fragments~~CallsGraph interface~fraggle_set_budgets_fragments fraggle_set_budgets_fragments proc~fraggle_set_budgets_fragments fraggle_set_budgets_fragments interface~fraggle_set_budgets_fragments->proc~fraggle_set_budgets_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_budgets_fragments(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_budgets_fragments.html"},{"title":"fraggle_set_coordinate_system – swiftest","text":"interface Calls interface~~fraggle_set_coordinate_system~~CallsGraph interface~fraggle_set_coordinate_system fraggle_set_coordinate_system proc~fraggle_set_coordinate_system fraggle_set_coordinate_system interface~fraggle_set_coordinate_system->proc~fraggle_set_coordinate_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_coordinate_system(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_coordinate_system.html"},{"title":"fraggle_set_mass_dist_fragments – swiftest","text":"interface Calls interface~~fraggle_set_mass_dist_fragments~~CallsGraph interface~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments proc~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments interface~fraggle_set_mass_dist_fragments->proc~fraggle_set_mass_dist_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"interface/fraggle_set_mass_dist_fragments.html"},{"title":"fraggle_set_natural_scale_factors – swiftest","text":"interface Calls interface~~fraggle_set_natural_scale_factors~~CallsGraph interface~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors proc~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors interface~fraggle_set_natural_scale_factors->proc~fraggle_set_natural_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_natural_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_natural_scale_factors.html"},{"title":"fraggle_set_original_scale_factors – swiftest","text":"interface Calls interface~~fraggle_set_original_scale_factors~~CallsGraph interface~fraggle_set_original_scale_factors fraggle_set_original_scale_factors proc~fraggle_set_original_scale_factors fraggle_set_original_scale_factors interface~fraggle_set_original_scale_factors->proc~fraggle_set_original_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_original_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_original_scale_factors.html"},{"title":"fraggle_setup_fragments – swiftest","text":"interface Calls interface~~fraggle_setup_fragments~~CallsGraph interface~fraggle_setup_fragments fraggle_setup_fragments proc~fraggle_setup_fragments fraggle_setup_fragments interface~fraggle_setup_fragments->proc~fraggle_setup_fragments setup_pl setup_pl proc~fraggle_setup_fragments->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_setup_fragments(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object integer(kind=I4B), intent(in) :: n Number of fragments class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters","tags":"","loc":"interface/fraggle_setup_fragments.html"},{"title":"fraggle_setup_reset_fragments – swiftest","text":"interface Calls interface~~fraggle_setup_reset_fragments~~CallsGraph interface~fraggle_setup_reset_fragments fraggle_setup_reset_fragments proc~fraggle_setup_reset_fragments fraggle_setup_reset_fragments interface~fraggle_setup_reset_fragments->proc~fraggle_setup_reset_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_setup_reset_fragments(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self","tags":"","loc":"interface/fraggle_setup_reset_fragments.html"},{"title":"fraggle_util_add_fragments_to_system – swiftest","text":"interface Calls interface~~fraggle_util_add_fragments_to_system~~CallsGraph interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_add_fragments_to_system~~CalledByGraph interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_add_fragments_to_system(frag, colliders, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters","tags":"","loc":"interface/fraggle_util_add_fragments_to_system.html"},{"title":"fraggle_util_ang_mtm – swiftest","text":"interface Calls interface~~fraggle_util_ang_mtm~~CallsGraph interface~fraggle_util_ang_mtm fraggle_util_ang_mtm proc~fraggle_util_ang_mtm fraggle_util_ang_mtm interface~fraggle_util_ang_mtm->proc~fraggle_util_ang_mtm Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_ang_mtm(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object","tags":"","loc":"interface/fraggle_util_ang_mtm.html"},{"title":"fraggle_util_construct_temporary_system – swiftest","text":"interface Calls interface~~fraggle_util_construct_temporary_system~~CallsGraph interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_construct_temporary_system~~CalledByGraph interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_construct_temporary_system(frag, system, param, tmpsys, tmpparam) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters","tags":"","loc":"interface/fraggle_util_construct_temporary_system.html"},{"title":"fraggle_util_get_energy_momentum – swiftest","text":"interface Calls interface~~fraggle_util_get_energy_momentum~~CallsGraph interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system util_exit util_exit proc~fraggle_util_get_energy_momentum->util_exit proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa","tags":"","loc":"interface/fraggle_util_get_energy_momentum.html"},{"title":"fraggle_util_restructure – swiftest","text":"interface Calls interface~~fraggle_util_restructure~~CallsGraph interface~fraggle_util_restructure fraggle_util_restructure proc~fraggle_util_restructure fraggle_util_restructure interface~fraggle_util_restructure->proc~fraggle_util_restructure Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt","tags":"","loc":"interface/fraggle_util_restructure.html"},{"title":"fraggle_util_shift_vector_to_origin – swiftest","text":"interface Calls interface~~fraggle_util_shift_vector_to_origin~~CallsGraph interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_shift_vector_to_origin(m_frag, vec_frag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame","tags":"","loc":"interface/fraggle_util_shift_vector_to_origin.html"},{"title":"symba_collision_check_encounter – swiftest","text":"interface Calls interface~~symba_collision_check_encounter~~CallsGraph interface~symba_collision_check_encounter symba_collision_check_encounter proc~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter->proc~symba_collision_check_encounter fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_check_encounter->fraggle_io_log_one_message proc~symba_collision_check_one symba_collision_check_one proc~symba_collision_check_encounter->proc~symba_collision_check_one orbel_xv2aeq orbel_xv2aeq proc~symba_collision_check_one->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n","tags":"","loc":"interface/symba_collision_check_encounter.html"},{"title":"symba_encounter_check_pl – swiftest","text":"interface Calls interface~~symba_encounter_check_pl~~CallsGraph interface~symba_encounter_check_pl symba_encounter_check_pl proc~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl->proc~symba_encounter_check_pl proc~symba_encounter_check_all symba_encounter_check_all proc~symba_encounter_check_pl->proc~symba_encounter_check_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/symba_encounter_check_pl.html"},{"title":"symba_encounter_check – swiftest","text":"interface Calls interface~~symba_encounter_check~~CallsGraph interface~symba_encounter_check symba_encounter_check proc~symba_encounter_check symba_encounter_check interface~symba_encounter_check->proc~symba_encounter_check Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/symba_encounter_check.html"},{"title":"symba_encounter_check_tp – swiftest","text":"interface Calls interface~~symba_encounter_check_tp~~CallsGraph interface~symba_encounter_check_tp symba_encounter_check_tp proc~symba_encounter_check_tp symba_encounter_check_tp interface~symba_encounter_check_tp->proc~symba_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/symba_encounter_check_tp.html"},{"title":"symba_collision_casedisruption – swiftest","text":"interface Calls interface~~symba_collision_casedisruption~~CallsGraph interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casedisruption->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_collision_casedisruption~~CalledByGraph interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_casedisruption(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome","tags":"","loc":"interface/symba_collision_casedisruption.html"},{"title":"symba_collision_casehitandrun – swiftest","text":"interface Calls interface~~symba_collision_casehitandrun~~CallsGraph interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casehitandrun->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_collision_casehitandrun~~CalledByGraph interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_casehitandrun(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome","tags":"","loc":"interface/symba_collision_casehitandrun.html"},{"title":"symba_collision_casemerge – swiftest","text":"interface Calls interface~~symba_collision_casemerge~~CallsGraph interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_collision_casemerge~~CalledByGraph interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_casemerge(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome","tags":"","loc":"interface/symba_collision_casemerge.html"},{"title":"symba_collision_encounter_extract_collisions – swiftest","text":"interface Calls interface~~symba_collision_encounter_extract_collisions~~CallsGraph interface~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions proc~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions interface~symba_collision_encounter_extract_collisions->proc~symba_collision_encounter_extract_collisions idx2 idx2 proc~symba_collision_encounter_extract_collisions->idx2 idx1 idx1 proc~symba_collision_encounter_extract_collisions->idx1 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_encounter_extract_collisions(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_collision_encounter_extract_collisions.html"},{"title":"symba_collision_make_colliders_pl – swiftest","text":"interface Calls interface~~symba_collision_make_colliders_pl~~CallsGraph interface~symba_collision_make_colliders_pl symba_collision_make_colliders_pl proc~symba_collision_make_colliders_pl symba_collision_make_colliders_pl interface~symba_collision_make_colliders_pl->proc~symba_collision_make_colliders_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision","tags":"","loc":"interface/symba_collision_make_colliders_pl.html"},{"title":"symba_collision_resolve_fragmentations – swiftest","text":"interface Calls interface~~symba_collision_resolve_fragmentations~~CallsGraph interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_fragmentations->proc~symba_collision_consolidate_colliders idx2 idx2 proc~symba_collision_resolve_fragmentations->idx2 idx1 idx1 proc~symba_collision_resolve_fragmentations->idx1 interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun util_exit util_exit proc~symba_collision_resolve_fragmentations->util_exit id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casehitandrun->fraggle_io_log_one_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub proc~symba_collision_casedisruption->fraggle_io_log_one_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_fragmentations(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_collision_resolve_fragmentations.html"},{"title":"symba_collision_resolve_mergers – swiftest","text":"interface Calls interface~~symba_collision_resolve_mergers~~CallsGraph interface~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_mergers->proc~symba_collision_consolidate_colliders idx2 idx2 proc~symba_collision_resolve_mergers->idx2 idx1 idx1 proc~symba_collision_resolve_mergers->idx1 interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_mergers(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_collision_resolve_mergers.html"},{"title":"symba_collision_resolve_plplenc – swiftest","text":"interface Calls interface~~symba_collision_resolve_plplenc~~CallsGraph interface~symba_collision_resolve_plplenc symba_collision_resolve_plplenc proc~symba_collision_resolve_plplenc symba_collision_resolve_plplenc interface~symba_collision_resolve_plplenc->proc~symba_collision_resolve_plplenc fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_resolve_plplenc->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"interface/symba_collision_resolve_plplenc.html"},{"title":"symba_collision_resolve_pltpenc – swiftest","text":"interface Calls interface~~symba_collision_resolve_pltpenc~~CallsGraph interface~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc proc~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc interface~symba_collision_resolve_pltpenc->proc~symba_collision_resolve_pltpenc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-tp encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"interface/symba_collision_resolve_pltpenc.html"},{"title":"symba_discard_pl – swiftest","text":"interface Calls interface~~symba_discard_pl~~CallsGraph interface~symba_discard_pl symba_discard_pl proc~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl proc~symba_discard_nonplpl_conservation symba_discard_nonplpl_conservation proc~symba_discard_pl->proc~symba_discard_nonplpl_conservation proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_pl->proc~symba_discard_nonplpl proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/symba_discard_pl.html"},{"title":"symba_drift_pl – swiftest","text":"interface Calls interface~~symba_drift_pl~~CallsGraph interface~symba_drift_pl symba_drift_pl proc~symba_drift_pl symba_drift_pl interface~symba_drift_pl->proc~symba_drift_pl helio_drift_body helio_drift_body proc~symba_drift_pl->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/symba_drift_pl.html"},{"title":"symba_drift_tp – swiftest","text":"interface Calls interface~~symba_drift_tp~~CallsGraph interface~symba_drift_tp symba_drift_tp proc~symba_drift_tp symba_drift_tp interface~symba_drift_tp->proc~symba_drift_tp helio_drift_body helio_drift_body proc~symba_drift_tp->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/symba_drift_tp.html"},{"title":"symba_encounter_check_one – swiftest","text":"interface Calls interface~~symba_encounter_check_one~~CallsGraph interface~symba_encounter_check_one symba_encounter_check_one proc~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one->proc~symba_encounter_check_one interface~rmvs_chk_ind rmvs_chk_ind proc~symba_encounter_check_one->interface~rmvs_chk_ind proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure elemental module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr","tags":"","loc":"interface/symba_encounter_check_one.html"},{"title":"symba_util_index_eucl_plpl – swiftest","text":"interface Calls interface~~symba_util_index_eucl_plpl~~CallsGraph interface~symba_util_index_eucl_plpl symba_util_index_eucl_plpl proc~symba_util_index_eucl_plpl symba_util_index_eucl_plpl interface~symba_util_index_eucl_plpl->proc~symba_util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_util_index_eucl_plpl.html"},{"title":"symba_io_param_reader – swiftest","text":"interface Calls interface~~symba_io_param_reader~~CallsGraph interface~symba_io_param_reader symba_io_param_reader proc~symba_io_param_reader symba_io_param_reader interface~symba_io_param_reader->proc~symba_io_param_reader fraggle_io_log_start fraggle_io_log_start proc~symba_io_param_reader->fraggle_io_log_start io_param_reader io_param_reader proc~symba_io_param_reader->io_param_reader io_toupper io_toupper proc~symba_io_param_reader->io_toupper io_get_token io_get_token proc~symba_io_param_reader->io_get_token Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Current run configuration parameters with SyMBA additionss integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/symba_io_param_reader.html"},{"title":"symba_io_param_writer – swiftest","text":"interface Calls interface~~symba_io_param_writer~~CallsGraph interface~symba_io_param_writer symba_io_param_writer proc~symba_io_param_writer symba_io_param_writer interface~symba_io_param_writer->proc~symba_io_param_writer io_param_writer io_param_writer proc~symba_io_param_writer->io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Current run configuration parameters with SyMBA additions integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/symba_io_param_writer.html"},{"title":"symba_io_write_discard – swiftest","text":"interface Calls interface~~symba_io_write_discard~~CallsGraph interface~symba_io_write_discard symba_io_write_discard proc~symba_io_write_discard symba_io_write_discard interface~symba_io_write_discard->proc~symba_io_write_discard util_exit util_exit proc~symba_io_write_discard->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/symba_io_write_discard.html"},{"title":"symba_kick_getacch_int_pl – swiftest","text":"interface Calls interface~~symba_kick_getacch_int_pl~~CallsGraph interface~symba_kick_getacch_int_pl symba_kick_getacch_int_pl proc~symba_kick_getacch_int_pl symba_kick_getacch_int_pl interface~symba_kick_getacch_int_pl->proc~symba_kick_getacch_int_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_int_pl->kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self","tags":"","loc":"interface/symba_kick_getacch_int_pl.html"},{"title":"symba_kick_getacch_pl – swiftest","text":"interface Calls interface~~symba_kick_getacch_pl~~CallsGraph interface~symba_kick_getacch_pl symba_kick_getacch_pl proc~symba_kick_getacch_pl symba_kick_getacch_pl interface~symba_kick_getacch_pl->proc~symba_kick_getacch_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_pl->kick_getacch_int_all_pl helio_kick_getacch_pl helio_kick_getacch_pl proc~symba_kick_getacch_pl->helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/symba_kick_getacch_pl.html"},{"title":"symba_kick_getacch_tp – swiftest","text":"interface Calls interface~~symba_kick_getacch_tp~~CallsGraph interface~symba_kick_getacch_tp symba_kick_getacch_tp proc~symba_kick_getacch_tp symba_kick_getacch_tp interface~symba_kick_getacch_tp->proc~symba_kick_getacch_tp helio_kick_getacch_tp helio_kick_getacch_tp proc~symba_kick_getacch_tp->helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/symba_kick_getacch_tp.html"},{"title":"symba_kick_encounter – swiftest","text":"interface Calls interface~~symba_kick_encounter~~CallsGraph interface~symba_kick_encounter symba_kick_encounter proc~symba_kick_encounter symba_kick_encounter interface~symba_kick_encounter->proc~symba_kick_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration","tags":"","loc":"interface/symba_kick_encounter.html"},{"title":"symba_setup_initialize_system – swiftest","text":"interface Calls interface~~symba_setup_initialize_system~~CallsGraph interface~symba_setup_initialize_system symba_setup_initialize_system proc~symba_setup_initialize_system symba_setup_initialize_system interface~symba_setup_initialize_system->proc~symba_setup_initialize_system helio_setup_initialize_system helio_setup_initialize_system proc~symba_setup_initialize_system->helio_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/symba_setup_initialize_system.html"},{"title":"symba_setup_merger – swiftest","text":"interface Calls interface~~symba_setup_merger~~CallsGraph interface~symba_setup_merger symba_setup_merger proc~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger interface~symba_setup_pl symba_setup_pl proc~symba_setup_merger->interface~symba_setup_pl proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_merger(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_setup_merger.html"},{"title":"symba_setup_pl – swiftest","text":"interface Calls interface~~symba_setup_pl~~CallsGraph interface~symba_setup_pl symba_setup_pl proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_setup_pl~~CalledByGraph interface~symba_setup_pl symba_setup_pl proc~symba_setup_merger symba_setup_merger proc~symba_setup_merger->interface~symba_setup_pl interface~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_setup_pl.html"},{"title":"symba_setup_encounter – swiftest","text":"interface Calls interface~~symba_setup_encounter~~CallsGraph interface~symba_setup_encounter symba_setup_encounter proc~symba_setup_encounter symba_setup_encounter interface~symba_setup_encounter->proc~symba_setup_encounter setup_encounter setup_encounter proc~symba_setup_encounter->setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for","tags":"","loc":"interface/symba_setup_encounter.html"},{"title":"symba_setup_tp – swiftest","text":"interface Calls interface~~symba_setup_tp~~CallsGraph interface~symba_setup_tp symba_setup_tp proc~symba_setup_tp symba_setup_tp interface~symba_setup_tp->proc~symba_setup_tp setup_tp setup_tp proc~symba_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter","tags":"","loc":"interface/symba_setup_tp.html"},{"title":"symba_step_system – swiftest","text":"interface Calls interface~~symba_step_system~~CallsGraph interface~symba_step_system symba_step_system proc~symba_step_system symba_step_system interface~symba_step_system->proc~symba_step_system helio_step_system helio_step_system proc~symba_step_system->helio_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/symba_step_system.html"},{"title":"symba_step_interp_system – swiftest","text":"interface Calls interface~~symba_step_interp_system~~CallsGraph interface~symba_step_interp_system symba_step_interp_system proc~symba_step_interp_system symba_step_interp_system interface~symba_step_interp_system->proc~symba_step_interp_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_interp_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/symba_step_interp_system.html"},{"title":"symba_step_set_recur_levels_system – swiftest","text":"interface Calls interface~~symba_step_set_recur_levels_system~~CallsGraph interface~symba_step_set_recur_levels_system symba_step_set_recur_levels_system proc~symba_step_set_recur_levels_system symba_step_set_recur_levels_system interface~symba_step_set_recur_levels_system->proc~symba_step_set_recur_levels_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_set_recur_levels_system(self, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system objec integer(kind=I4B), intent(in) :: ireci Input recursion level","tags":"","loc":"interface/symba_step_set_recur_levels_system.html"},{"title":"symba_step_recur_system – swiftest","text":"interface Calls interface~~symba_step_recur_system~~CallsGraph interface~symba_step_recur_system symba_step_recur_system proc~symba_step_recur_system symba_step_recur_system interface~symba_step_recur_system->proc~symba_step_recur_system util_exit util_exit proc~symba_step_recur_system->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public recursive module subroutine symba_step_recur_system(self, param, t, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level","tags":"","loc":"interface/symba_step_recur_system.html"},{"title":"symba_step_reset_system – swiftest","text":"interface Calls interface~~symba_step_reset_system~~CallsGraph interface~symba_step_reset_system symba_step_reset_system proc~symba_step_reset_system symba_step_reset_system interface~symba_step_reset_system->proc~symba_step_reset_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_reset_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_step_reset_system.html"},{"title":"util_append – swiftest","text":"public interface util_append Called by interface~~util_append~~CalledByGraph interface~util_append util_append proc~symba_util_append_encounter symba_util_append_encounter proc~symba_util_append_encounter->interface~util_append proc~symba_util_append_pl symba_util_append_pl proc~symba_util_append_pl->interface~util_append proc~symba_util_append_tp symba_util_append_tp proc~symba_util_append_tp->interface~util_append proc~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger->interface~util_append interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger->interface~symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl interface~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter->proc~symba_util_append_encounter interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger interface~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp->proc~symba_util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_append_arr_kin Subroutines public subroutine symba_util_append_arr_kin(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append.html"},{"title":"symba_util_append_encounter – swiftest","text":"interface Calls interface~~symba_util_append_encounter~~CallsGraph interface~symba_util_append_encounter symba_util_append_encounter proc~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter->proc~symba_util_append_encounter interface~util_append util_append proc~symba_util_append_encounter->interface~util_append util_append_encounter util_append_encounter proc~symba_util_append_encounter->util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_encounter.html"},{"title":"symba_util_append_merger – swiftest","text":"interface Calls interface~~symba_util_append_merger~~CallsGraph interface~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger interface~util_append util_append proc~symba_util_append_merger->interface~util_append interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger->interface~symba_util_append_pl util_exit util_exit proc~symba_util_append_merger->util_exit proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl proc~symba_util_append_pl->interface~util_append proc~symba_util_append_pl->util_exit util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_merger(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_merger.html"},{"title":"symba_util_append_pl – swiftest","text":"interface Calls interface~~symba_util_append_pl~~CallsGraph interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl interface~util_append util_append proc~symba_util_append_pl->interface~util_append util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl util_exit util_exit proc~symba_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_util_append_pl~~CalledByGraph interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger->interface~symba_util_append_pl interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_pl.html"},{"title":"symba_util_append_tp – swiftest","text":"interface Calls interface~~symba_util_append_tp~~CallsGraph interface~symba_util_append_tp symba_util_append_tp proc~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp->proc~symba_util_append_tp interface~util_append util_append proc~symba_util_append_tp->interface~util_append util_append_tp util_append_tp proc~symba_util_append_tp->util_append_tp util_exit util_exit proc~symba_util_append_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_tp.html"},{"title":"symba_util_copy_encounter – swiftest","text":"interface Calls interface~~symba_util_copy_encounter~~CallsGraph interface~symba_util_copy_encounter symba_util_copy_encounter proc~symba_util_copy_encounter symba_util_copy_encounter interface~symba_util_copy_encounter->proc~symba_util_copy_encounter util_copy_encounter util_copy_encounter proc~symba_util_copy_encounter->util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into","tags":"","loc":"interface/symba_util_copy_encounter.html"},{"title":"util_fill – swiftest","text":"public interface util_fill Called by interface~~util_fill~~CalledByGraph interface~util_fill util_fill proc~symba_util_fill_tp symba_util_fill_tp proc~symba_util_fill_tp->interface~util_fill proc~symba_util_fill_pl symba_util_fill_pl proc~symba_util_fill_pl->interface~util_fill interface~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp->proc~symba_util_fill_tp interface~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl->proc~symba_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_fill_arr_kin Subroutines public subroutine symba_util_fill_arr_kin(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill.html"},{"title":"symba_util_fill_pl – swiftest","text":"interface Calls interface~~symba_util_fill_pl~~CallsGraph interface~symba_util_fill_pl symba_util_fill_pl proc~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl->proc~symba_util_fill_pl interface~util_fill util_fill proc~symba_util_fill_pl->interface~util_fill util_fill_pl util_fill_pl proc~symba_util_fill_pl->util_fill_pl util_exit util_exit proc~symba_util_fill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/symba_util_fill_pl.html"},{"title":"symba_util_fill_tp – swiftest","text":"interface Calls interface~~symba_util_fill_tp~~CallsGraph interface~symba_util_fill_tp symba_util_fill_tp proc~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp->proc~symba_util_fill_tp interface~util_fill util_fill proc~symba_util_fill_tp->interface~util_fill util_fill_tp util_fill_tp proc~symba_util_fill_tp->util_fill_tp util_exit util_exit proc~symba_util_fill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/symba_util_fill_tp.html"},{"title":"symba_util_peri_pl – swiftest","text":"interface Calls interface~~symba_util_peri_pl~~CallsGraph interface~symba_util_peri_pl symba_util_peri_pl proc~symba_util_peri_pl symba_util_peri_pl interface~symba_util_peri_pl->proc~symba_util_peri_pl orbel_xv2aeq orbel_xv2aeq proc~symba_util_peri_pl->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_util_peri_pl.html"},{"title":"symba_util_rearray_pl – swiftest","text":"interface Calls interface~~symba_util_rearray_pl~~CallsGraph interface~symba_util_rearray_pl symba_util_rearray_pl proc~symba_util_rearray_pl symba_util_rearray_pl interface~symba_util_rearray_pl->proc~symba_util_rearray_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_util_rearray_pl.html"},{"title":"symba_util_reset_kinship – swiftest","text":"interface Calls interface~~symba_util_reset_kinship~~CallsGraph interface~symba_util_reset_kinship symba_util_reset_kinship proc~symba_util_reset_kinship symba_util_reset_kinship interface~symba_util_reset_kinship->proc~symba_util_reset_kinship Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset","tags":"","loc":"interface/symba_util_reset_kinship.html"},{"title":"util_resize – swiftest","text":"public interface util_resize Called by interface~~util_resize~~CalledByGraph interface~util_resize util_resize proc~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger->interface~util_resize interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger->interface~symba_util_resize_pl proc~symba_util_append_arr_kin symba_util_append_arr_kin proc~symba_util_append_arr_kin->interface~util_resize proc~symba_util_resize_tp symba_util_resize_tp proc~symba_util_resize_tp->interface~util_resize proc~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_pl->interface~util_resize interface~symba_util_resize_pl->proc~symba_util_resize_pl interface~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp->proc~symba_util_resize_tp interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_resize_arr_kin Subroutines public subroutine symba_util_resize_arr_kin(arr, nnew) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size","tags":"","loc":"interface/util_resize.html"},{"title":"symba_util_resize_merger – swiftest","text":"interface Calls interface~~symba_util_resize_merger~~CallsGraph interface~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~util_resize util_resize proc~symba_util_resize_merger->interface~util_resize proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl proc~symba_util_resize_pl->interface~util_resize util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_resize_merger(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/symba_util_resize_merger.html"},{"title":"symba_util_resize_pl – swiftest","text":"interface Calls interface~~symba_util_resize_pl~~CallsGraph interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl interface~util_resize util_resize proc~symba_util_resize_pl->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_util_resize_pl~~CalledByGraph interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/symba_util_resize_pl.html"},{"title":"symba_util_resize_tp – swiftest","text":"interface Calls interface~~symba_util_resize_tp~~CallsGraph interface~symba_util_resize_tp symba_util_resize_tp proc~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp->proc~symba_util_resize_tp interface~util_resize util_resize proc~symba_util_resize_tp->interface~util_resize util_resize_tp util_resize_tp proc~symba_util_resize_tp->util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/symba_util_resize_tp.html"},{"title":"symba_util_sort_pl – swiftest","text":"interface Calls interface~~symba_util_sort_pl~~CallsGraph interface~symba_util_sort_pl symba_util_sort_pl proc~symba_util_sort_pl symba_util_sort_pl interface~symba_util_sort_pl->proc~symba_util_sort_pl util_sort_pl util_sort_pl proc~symba_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/symba_util_sort_pl.html"},{"title":"symba_util_sort_tp – swiftest","text":"interface Calls interface~~symba_util_sort_tp~~CallsGraph interface~symba_util_sort_tp symba_util_sort_tp proc~symba_util_sort_tp symba_util_sort_tp interface~symba_util_sort_tp->proc~symba_util_sort_tp util_sort_tp util_sort_tp proc~symba_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/symba_util_sort_tp.html"},{"title":"util_sort_rearrange – swiftest","text":"public interface util_sort_rearrange Called by interface~~util_sort_rearrange~~CalledByGraph interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp->interface~util_sort_rearrange proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl->interface~util_sort_rearrange interface~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp->proc~symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl->proc~symba_util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_sort_rearrange_arr_kin Subroutines public subroutine symba_util_sort_rearrange_arr_kin(arr, ind, n) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange","tags":"","loc":"interface/util_sort_rearrange.html"},{"title":"symba_util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~symba_util_sort_rearrange_pl~~CallsGraph interface~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl->proc~symba_util_sort_rearrange_pl interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_pl->interface~util_sort_rearrange util_sort_rearrange_pl util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl->util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/symba_util_sort_rearrange_pl.html"},{"title":"symba_util_sort_rearrange_tp – swiftest","text":"interface Calls interface~~symba_util_sort_rearrange_tp~~CallsGraph interface~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp->proc~symba_util_sort_rearrange_tp interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_tp->interface~util_sort_rearrange util_sort_rearrange_tp util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp->util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/symba_util_sort_rearrange_tp.html"},{"title":"util_spill – swiftest","text":"public interface util_spill Called by interface~~util_spill~~CalledByGraph interface~util_spill util_spill proc~symba_util_spill_tp symba_util_spill_tp proc~symba_util_spill_tp->interface~util_spill proc~symba_util_spill_encounter symba_util_spill_encounter proc~symba_util_spill_encounter->interface~util_spill proc~symba_util_spill_pl symba_util_spill_pl proc~symba_util_spill_pl->interface~util_spill interface~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter->proc~symba_util_spill_encounter interface~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp->proc~symba_util_spill_tp interface~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl->proc~symba_util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_spill_arr_kin Subroutines public subroutine symba_util_spill_arr_kin(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill.html"},{"title":"symba_util_spill_pl – swiftest","text":"interface Calls interface~~symba_util_spill_pl~~CallsGraph interface~symba_util_spill_pl symba_util_spill_pl proc~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl->proc~symba_util_spill_pl interface~util_spill util_spill proc~symba_util_spill_pl->interface~util_spill util_spill_pl util_spill_pl proc~symba_util_spill_pl->util_spill_pl util_exit util_exit proc~symba_util_spill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/symba_util_spill_pl.html"},{"title":"symba_util_spill_encounter – swiftest","text":"interface Calls interface~~symba_util_spill_encounter~~CallsGraph interface~symba_util_spill_encounter symba_util_spill_encounter proc~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter->proc~symba_util_spill_encounter interface~util_spill util_spill proc~symba_util_spill_encounter->interface~util_spill util_spill_encounter util_spill_encounter proc~symba_util_spill_encounter->util_spill_encounter util_exit util_exit proc~symba_util_spill_encounter->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"interface/symba_util_spill_encounter.html"},{"title":"symba_util_spill_tp – swiftest","text":"interface Calls interface~~symba_util_spill_tp~~CallsGraph interface~symba_util_spill_tp symba_util_spill_tp proc~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp->proc~symba_util_spill_tp interface~util_spill util_spill proc~symba_util_spill_tp->interface~util_spill util_spill_tp util_spill_tp proc~symba_util_spill_tp->util_spill_tp util_exit util_exit proc~symba_util_spill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/symba_util_spill_tp.html"},{"title":"io_get_args – swiftest","text":"interface Calls interface~~io_get_args~~CallsGraph interface~io_get_args io_get_args proc~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_toupper io_toupper proc~io_get_args->interface~io_toupper interface~util_exit util_exit proc~io_get_args->interface~util_exit interface~util_version util_version proc~io_get_args->interface~util_version proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_version util_version interface~util_version->proc~util_version Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_get_args(integrator, param_file_name) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code","tags":"","loc":"interface/io_get_args.html"},{"title":"io_get_old_t_final_system – swiftest","text":"interface Calls interface~~io_get_old_t_final_system~~CallsGraph interface~io_get_old_t_final_system io_get_old_t_final_system proc~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system interface~util_exit util_exit proc~io_get_old_t_final_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP)","tags":"","loc":"interface/io_get_old_t_final_system.html"},{"title":"io_get_token – swiftest","text":"interface Calls interface~~io_get_token~~CallsGraph interface~io_get_token io_get_token proc~io_get_token io_get_token interface~io_get_token->proc~io_get_token Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_get_token~~CalledByGraph interface~io_get_token io_get_token proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_get_token interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_get_token(buffer, ifirst, ilast, ierr) result(token) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string","tags":"","loc":"interface/io_get_token.html"},{"title":"io_read_frame_body – swiftest","text":"interface Calls interface~~io_read_frame_body~~CallsGraph interface~io_read_frame_body io_read_frame_body proc~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body interface~util_exit util_exit proc~io_read_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/io_read_frame_body.html"},{"title":"io_read_frame_cb – swiftest","text":"interface Calls interface~~io_read_frame_cb~~CallsGraph interface~io_read_frame_cb io_read_frame_cb proc~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb interface~util_exit util_exit proc~io_read_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/io_read_frame_cb.html"},{"title":"io_read_frame_system – swiftest","text":"interface Calls interface~~io_read_frame_system~~CallsGraph interface~io_read_frame_system io_read_frame_system proc~io_read_frame_system io_read_frame_system interface~io_read_frame_system->proc~io_read_frame_system proc~io_read_hdr io_read_hdr proc~io_read_frame_system->proc~io_read_hdr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/io_read_frame_system.html"},{"title":"discard_pl – swiftest","text":"interface Calls interface~~discard_pl~~CallsGraph interface~discard_pl discard_pl proc~discard_pl discard_pl interface~discard_pl->proc~discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter","tags":"","loc":"interface/discard_pl.html"},{"title":"discard_system – swiftest","text":"interface Calls interface~~discard_system~~CallsGraph interface~discard_system discard_system proc~discard_system discard_system interface~discard_system->proc~discard_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/discard_system.html"},{"title":"discard_tp – swiftest","text":"interface Calls interface~~discard_tp~~CallsGraph interface~discard_tp discard_tp proc~discard_tp discard_tp interface~discard_tp->proc~discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/discard_tp.html"},{"title":"drift_all – swiftest","text":"interface Calls interface~~drift_all~~CallsGraph interface~drift_all drift_all proc~drift_all drift_all interface~drift_all->proc~drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~drift_all~~CalledByGraph interface~drift_all drift_all proc~drift_body drift_body proc~drift_body->interface~drift_all interface~drift_body drift_body interface~drift_body->proc~drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine drift_all(mu, x, v, n, param, dt, mask, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: mask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem","tags":"","loc":"interface/drift_all.html"},{"title":"drift_body – swiftest","text":"interface Calls interface~~drift_body~~CallsGraph interface~drift_body drift_body proc~drift_body drift_body interface~drift_body->proc~drift_body interface~drift_all drift_all proc~drift_body->interface~drift_all proc~drift_all drift_all interface~drift_all->proc~drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/drift_body.html"},{"title":"drift_one – swiftest","text":"interface Calls interface~~drift_one~~CallsGraph interface~drift_one drift_one proc~drift_one drift_one interface~drift_one->proc~drift_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure elemental module subroutine drift_one(mu, px, py, pz, vx, vy, vz, dt, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)","tags":"","loc":"interface/drift_one.html"},{"title":"util_index_eucl_plpl – swiftest","text":"interface Calls interface~~util_index_eucl_plpl~~CallsGraph interface~util_index_eucl_plpl util_index_eucl_plpl proc~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl->proc~util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_index_eucl_plpl.html"},{"title":"util_index_eucl_pltp – swiftest","text":"interface Calls interface~~util_index_eucl_pltp~~CallsGraph interface~util_index_eucl_pltp util_index_eucl_pltp proc~util_index_eucl_pltp util_index_eucl_pltp interface~util_index_eucl_pltp->proc~util_index_eucl_pltp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_index_eucl_pltp(self, pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_index_eucl_pltp.html"},{"title":"gr_kick_getaccb_ns_body – swiftest","text":"interface Calls interface~~gr_kick_getaccb_ns_body~~CallsGraph interface~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body proc~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body interface~gr_kick_getaccb_ns_body->proc~gr_kick_getaccb_ns_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_kick_getaccb_ns_body(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/gr_kick_getaccb_ns_body.html"},{"title":"gr_kick_getacch – swiftest","text":"interface Calls interface~~gr_kick_getacch~~CallsGraph interface~gr_kick_getacch gr_kick_getacch proc~gr_kick_getacch gr_kick_getacch interface~gr_kick_getacch->proc~gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations","tags":"","loc":"interface/gr_kick_getacch.html"},{"title":"gr_p4_pos_kick – swiftest","text":"interface Calls interface~~gr_p4_pos_kick~~CallsGraph interface~gr_p4_pos_kick gr_p4_pos_kick proc~gr_p4_pos_kick gr_p4_pos_kick interface~gr_p4_pos_kick->proc~gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_p4_pos_kick(param, x, v, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/gr_p4_pos_kick.html"},{"title":"gr_pseudovel2vel – swiftest","text":"interface Calls interface~~gr_pseudovel2vel~~CallsGraph interface~gr_pseudovel2vel gr_pseudovel2vel proc~gr_pseudovel2vel gr_pseudovel2vel interface~gr_pseudovel2vel->proc~gr_pseudovel2vel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_pseudovel2vel(param, mu, xh, pv, vh) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Swiftestcentric velocity vector","tags":"","loc":"interface/gr_pseudovel2vel.html"},{"title":"gr_pv2vh_body – swiftest","text":"interface Calls interface~~gr_pv2vh_body~~CallsGraph interface~gr_pv2vh_body gr_pv2vh_body proc~gr_pv2vh_body gr_pv2vh_body interface~gr_pv2vh_body->proc~gr_pv2vh_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/gr_pv2vh_body.html"},{"title":"gr_vel2pseudovel – swiftest","text":"interface Calls interface~~gr_vel2pseudovel~~CallsGraph interface~gr_vel2pseudovel gr_vel2pseudovel proc~gr_vel2pseudovel gr_vel2pseudovel interface~gr_vel2pseudovel->proc~gr_vel2pseudovel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_vel2pseudovel(param, mu, xh, vh, pv) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: vh Swiftestcentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32)","tags":"","loc":"interface/gr_vel2pseudovel.html"},{"title":"gr_vh2pv_body – swiftest","text":"interface Calls interface~~gr_vh2pv_body~~CallsGraph interface~gr_vh2pv_body gr_vh2pv_body proc~gr_vh2pv_body gr_vh2pv_body interface~gr_vh2pv_body->proc~gr_vh2pv_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/gr_vh2pv_body.html"},{"title":"io_conservation_report – swiftest","text":"interface Calls interface~~io_conservation_report~~CallsGraph interface~io_conservation_report io_conservation_report proc~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report interface~util_exit util_exit proc~io_conservation_report->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen","tags":"","loc":"interface/io_conservation_report.html"},{"title":"io_dump_param – swiftest","text":"interface Calls interface~~io_dump_param~~CallsGraph interface~io_dump_param io_dump_param proc~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param interface~util_exit util_exit proc~io_dump_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in)","tags":"","loc":"interface/io_dump_param.html"},{"title":"io_dump_particle_info_base – swiftest","text":"interface Calls interface~~io_dump_particle_info_base~~CallsGraph interface~io_dump_particle_info_base io_dump_particle_info_base proc~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base interface~util_exit util_exit proc~io_dump_particle_info_base->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file","tags":"","loc":"interface/io_dump_particle_info_base.html"},{"title":"io_dump_particle_info – swiftest","text":"interface Calls interface~~io_dump_particle_info~~CallsGraph interface~io_dump_particle_info io_dump_particle_info proc~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info interface~util_exit util_exit proc~io_dump_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Swiftest particle info metadata object integer(kind=I4B), intent(in) :: iu Open unformatted file unit number","tags":"","loc":"interface/io_dump_particle_info.html"},{"title":"io_dump_base – swiftest","text":"interface Calls interface~~io_dump_base~~CallsGraph interface~io_dump_base io_dump_base proc~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body interface~util_exit util_exit proc~io_dump_base->interface~util_exit proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~io_write_frame_cb->interface~util_exit proc~io_write_frame_body->interface~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_dump_base.html"},{"title":"io_dump_system – swiftest","text":"interface Calls interface~~io_dump_system~~CallsGraph interface~io_dump_system io_dump_system proc~io_dump_system io_dump_system interface~io_dump_system->proc~io_dump_system dump_cb_file dump_cb_file proc~io_dump_system->dump_cb_file dump_param_file dump_param_file proc~io_dump_system->dump_param_file dump_pl_file dump_pl_file proc~io_dump_system->dump_pl_file dump_tp_file dump_tp_file proc~io_dump_system->dump_tp_file Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_dump_system.html"},{"title":"io_param_reader – swiftest","text":"interface Calls interface~~io_param_reader~~CallsGraph interface~io_param_reader io_param_reader proc~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader interface~io_toupper io_toupper proc~io_param_reader->interface~io_toupper interface~io_get_token io_get_token proc~io_param_reader->interface~io_get_token proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper proc~io_get_token io_get_token interface~io_get_token->proc~io_get_token Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) The first element passes the integrator code to the reader integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/io_param_reader.html"},{"title":"io_param_writer – swiftest","text":"interface Calls interface~~io_param_writer~~CallsGraph interface~io_param_writer io_param_writer proc~io_param_writer io_param_writer interface~io_param_writer->proc~io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) Not used in this procedure integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/io_param_writer.html"},{"title":"io_read_in_body – swiftest","text":"interface Calls interface~~io_read_in_body~~CallsGraph interface~io_read_in_body io_read_in_body proc~io_read_in_body io_read_in_body interface~io_read_in_body->proc~io_read_in_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_read_in_body.html"},{"title":"io_read_in_cb – swiftest","text":"interface Calls interface~~io_read_in_cb~~CallsGraph interface~io_read_in_cb io_read_in_cb proc~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb interface~util_exit util_exit proc~io_read_in_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_read_in_cb.html"},{"title":"io_read_in_param – swiftest","text":"interface Calls interface~~io_read_in_param~~CallsGraph interface~io_read_in_param io_read_in_param proc~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param interface~util_exit util_exit proc~io_read_in_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in)","tags":"","loc":"interface/io_read_in_param.html"},{"title":"io_read_in_particle_info – swiftest","text":"interface Calls interface~~io_read_in_particle_info~~CallsGraph interface~io_read_in_particle_info io_read_in_particle_info proc~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info interface~util_exit util_exit proc~io_read_in_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number","tags":"","loc":"interface/io_read_in_particle_info.html"},{"title":"io_read_particle_info_system – swiftest","text":"interface Calls interface~~io_read_particle_info_system~~CallsGraph interface~io_read_particle_info_system io_read_particle_info_system proc~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system interface~util_exit util_exit proc~io_read_particle_info_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_read_particle_info_system.html"},{"title":"io_write_discard – swiftest","text":"interface Calls interface~~io_write_discard~~CallsGraph interface~io_write_discard io_write_discard proc~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard interface~util_exit util_exit proc~io_write_discard->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_discard.html"},{"title":"io_toupper – swiftest","text":"interface Calls interface~~io_toupper~~CallsGraph interface~io_toupper io_toupper proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_toupper~~CalledByGraph interface~io_toupper io_toupper proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_toupper proc~io_get_args io_get_args proc~io_get_args->interface~io_toupper interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_toupper(string) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case","tags":"","loc":"interface/io_toupper.html"},{"title":"io_write_encounter – swiftest","text":"interface Calls interface~~io_write_encounter~~CallsGraph interface~io_write_encounter io_write_encounter proc~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter ind1 ind1 proc~io_write_encounter->ind1 interface~util_exit util_exit proc~io_write_encounter->interface~util_exit ind2 ind2 proc~io_write_encounter->ind2 proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_encounter.html"},{"title":"io_write_frame_body – swiftest","text":"interface Calls interface~~io_write_frame_body~~CallsGraph interface~io_write_frame_body io_write_frame_body proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body interface~util_exit util_exit proc~io_write_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_write_frame_body~~CalledByGraph interface~io_write_frame_body io_write_frame_body proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_body interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_frame_body.html"},{"title":"io_write_frame_cb – swiftest","text":"interface Calls interface~~io_write_frame_cb~~CallsGraph interface~io_write_frame_cb io_write_frame_cb proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb interface~util_exit util_exit proc~io_write_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_write_frame_cb~~CalledByGraph interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_cb interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_frame_cb.html"},{"title":"io_write_frame_encounter – swiftest","text":"interface Calls interface~~io_write_frame_encounter~~CallsGraph interface~io_write_frame_encounter io_write_frame_encounter proc~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter interface~util_exit util_exit proc~io_write_frame_encounter->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Swiftestcentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Swiftestcentric velocity vectors of the two encountering bodies","tags":"","loc":"interface/io_write_frame_encounter.html"},{"title":"io_write_frame_system – swiftest","text":"interface Calls interface~~io_write_frame_system~~CallsGraph interface~io_write_frame_system io_write_frame_system proc~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system interface~util_exit util_exit proc~io_write_frame_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_frame_system.html"},{"title":"io_write_hdr_system – swiftest","text":"interface Calls interface~~io_write_hdr_system~~CallsGraph interface~io_write_hdr_system io_write_hdr_system proc~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system interface~util_exit util_exit proc~io_write_hdr_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_hdr_system.html"},{"title":"kick_getacch_int_all_pl – swiftest","text":"interface Calls interface~~kick_getacch_int_all_pl~~CallsGraph interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~kick_getacch_int_all_pl~~CalledByGraph interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_pl kick_getacch_int_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl interface~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array","tags":"","loc":"interface/kick_getacch_int_all_pl.html"},{"title":"kick_getacch_int_one_pl – swiftest","text":"interface Calls interface~~kick_getacch_int_one_pl~~CallsGraph interface~kick_getacch_int_one_pl kick_getacch_int_one_pl proc~kick_getacch_int_one_pl kick_getacch_int_one_pl interface~kick_getacch_int_one_pl->proc~kick_getacch_int_one_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j","tags":"","loc":"interface/kick_getacch_int_one_pl.html"},{"title":"kick_getacch_int_one_tp – swiftest","text":"interface Calls interface~~kick_getacch_int_one_tp~~CallsGraph interface~kick_getacch_int_one_tp kick_getacch_int_one_tp proc~kick_getacch_int_one_tp kick_getacch_int_one_tp interface~kick_getacch_int_one_tp->proc~kick_getacch_int_one_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, az) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle","tags":"","loc":"interface/kick_getacch_int_one_tp.html"},{"title":"kick_getacch_int_pl – swiftest","text":"interface Calls interface~~kick_getacch_int_pl~~CallsGraph interface~kick_getacch_int_pl kick_getacch_int_pl proc~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object","tags":"","loc":"interface/kick_getacch_int_pl.html"},{"title":"kick_getacch_int_tp – swiftest","text":"interface Calls interface~~kick_getacch_int_tp~~CallsGraph interface~kick_getacch_int_tp kick_getacch_int_tp proc~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp->proc~kick_getacch_int_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies","tags":"","loc":"interface/kick_getacch_int_tp.html"},{"title":"netcdf_close – swiftest","text":"interface Calls interface~~netcdf_close~~CallsGraph interface~netcdf_close netcdf_close proc~netcdf_close netcdf_close interface~netcdf_close->proc~netcdf_close nf90_close nf90_close proc~netcdf_close->nf90_close Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_close(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_close.html"},{"title":"netcdf_initialize_output – swiftest","text":"interface Calls interface~~netcdf_initialize_output~~CallsGraph interface~netcdf_initialize_output netcdf_initialize_output proc~netcdf_initialize_output netcdf_initialize_output interface~netcdf_initialize_output->proc~netcdf_initialize_output nf90_create nf90_create proc~netcdf_initialize_output->nf90_create nf90_def_dim nf90_def_dim proc~netcdf_initialize_output->nf90_def_dim nf90_set_fill nf90_set_fill proc~netcdf_initialize_output->nf90_set_fill nf90_def_var nf90_def_var proc~netcdf_initialize_output->nf90_def_var Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_initialize_output(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_initialize_output.html"},{"title":"netcdf_open – swiftest","text":"interface Calls interface~~netcdf_open~~CallsGraph interface~netcdf_open netcdf_open proc~netcdf_open netcdf_open interface~netcdf_open->proc~netcdf_open nf90_inq_varid nf90_inq_varid proc~netcdf_open->nf90_inq_varid nf90_set_fill nf90_set_fill proc~netcdf_open->nf90_set_fill nf90_open nf90_open proc~netcdf_open->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_open(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_open.html"},{"title":"netcdf_write_frame_base – swiftest","text":"interface Calls interface~~netcdf_write_frame_base~~CallsGraph interface~netcdf_write_frame_base netcdf_write_frame_base proc~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base->proc~netcdf_write_frame_base interface~util_sort util_sort proc~netcdf_write_frame_base->interface~util_sort nf90_put_var nf90_put_var proc~netcdf_write_frame_base->nf90_put_var Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_write_frame_base.html"},{"title":"netcdf_write_frame_system – swiftest","text":"interface public subroutine netcdf_write_frame_system(self, iu, param) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_write_frame_system.html"},{"title":"netcdf_write_hdr_system – swiftest","text":"interface Calls interface~~netcdf_write_hdr_system~~CallsGraph interface~netcdf_write_hdr_system netcdf_write_hdr_system proc~netcdf_write_hdr_system netcdf_write_hdr_system interface~netcdf_write_hdr_system->proc~netcdf_write_hdr_system nf90_set_fill nf90_set_fill proc~netcdf_write_hdr_system->nf90_set_fill nf90_put_var nf90_put_var proc~netcdf_write_hdr_system->nf90_put_var nf90_open nf90_open proc~netcdf_write_hdr_system->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_write_hdr_system.html"},{"title":"netcdf_write_particle_info_base – swiftest","text":"interface Calls interface~~netcdf_write_particle_info_base~~CallsGraph interface~netcdf_write_particle_info_base netcdf_write_particle_info_base proc~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base->proc~netcdf_write_particle_info_base interface~util_sort util_sort proc~netcdf_write_particle_info_base->interface~util_sort nf90_put_var nf90_put_var proc~netcdf_write_particle_info_base->nf90_put_var Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset","tags":"","loc":"interface/netcdf_write_particle_info_base.html"},{"title":"obl_acc_body – swiftest","text":"interface Calls interface~~obl_acc_body~~CallsGraph interface~obl_acc_body obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~obl_acc_body~~CalledByGraph interface~obl_acc_body obl_acc_body proc~obl_acc_tp obl_acc_tp proc~obl_acc_tp->interface~obl_acc_body proc~obl_acc_pl obl_acc_pl proc~obl_acc_pl->interface~obl_acc_body interface~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp interface~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_acc_body(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/obl_acc_body.html"},{"title":"obl_acc_pl – swiftest","text":"interface Calls interface~~obl_acc_pl~~CallsGraph interface~obl_acc_pl obl_acc_pl proc~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl interface~obl_acc_body obl_acc_body proc~obl_acc_pl->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/obl_acc_pl.html"},{"title":"obl_acc_tp – swiftest","text":"interface Calls interface~~obl_acc_tp~~CallsGraph interface~obl_acc_tp obl_acc_tp proc~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp interface~obl_acc_body obl_acc_body proc~obl_acc_tp->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/obl_acc_tp.html"},{"title":"obl_pot_system – swiftest","text":"interface Calls interface~~obl_pot_system~~CallsGraph interface~obl_pot_system obl_pot_system proc~obl_pot_system obl_pot_system interface~obl_pot_system->proc~obl_pot_system proc~obl_pot_one obl_pot_one proc~obl_pot_system->proc~obl_pot_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object","tags":"","loc":"interface/obl_pot_system.html"},{"title":"orbel_el2xv_vec – swiftest","text":"interface Calls interface~~orbel_el2xv_vec~~CallsGraph interface~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_scget orbel_scget proc~orbel_el2xv->interface~orbel_scget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_zget orbel_zget proc~orbel_el2xv->proc~orbel_zget proc~orbel_schget orbel_schget proc~orbel_el2xv->proc~orbel_schget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget 3 3 proc~orbel_flon->3 proc~orbel_esolmd->interface~orbel_scget proc~orbel_eget->interface~orbel_scget proc~orbel_fget->proc~orbel_schget proc~orbel_ehie->interface~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/orbel_el2xv_vec.html"},{"title":"orbel_scget – swiftest","text":"interface Calls interface~~orbel_scget~~CallsGraph interface~orbel_scget orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~orbel_scget~~CalledByGraph interface~orbel_scget orbel_scget proc~orbel_esolmd orbel_esolmd proc~orbel_esolmd->interface~orbel_scget proc~orbel_eget orbel_eget proc~orbel_eget->interface~orbel_scget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->interface~orbel_scget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu_guess->interface~orbel_scget proc~orbel_ehie orbel_ehie proc~orbel_ehie->interface~orbel_scget proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehybrid->proc~orbel_eget proc~orbel_ehybrid->proc~orbel_ehie proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_scget(angle, sx, cx) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx","tags":"","loc":"interface/orbel_scget.html"},{"title":"orbel_xv2aeq – swiftest","text":"interface Calls interface~~orbel_xv2aeq~~CallsGraph interface~orbel_xv2aeq orbel_xv2aeq proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~orbel_xv2aeq~~CalledByGraph interface~orbel_xv2aeq orbel_xv2aeq proc~util_peri_tp util_peri_tp proc~util_peri_tp->interface~orbel_xv2aeq interface~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_xv2aeq(mu, x, v, a, e, q) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: q periapsis","tags":"","loc":"interface/orbel_xv2aeq.html"},{"title":"orbel_xv2aqt – swiftest","text":"interface Calls interface~~orbel_xv2aqt~~CallsGraph interface~orbel_xv2aqt orbel_xv2aqt proc~orbel_xv2aqt orbel_xv2aqt interface~orbel_xv2aqt->proc~orbel_xv2aqt Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_xv2aqt(mu, x, v, a, q, capm, tperi) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage","tags":"","loc":"interface/orbel_xv2aqt.html"},{"title":"orbel_xv2el – swiftest","text":"interface Calls interface~~orbel_xv2el~~CallsGraph interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~orbel_xv2el~~CalledByGraph interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el_vec orbel_xv2el_vec proc~orbel_xv2el_vec->interface~orbel_xv2el interface~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_xv2el(mu, x, v, a, e, inc, capom, omega, capm) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly","tags":"","loc":"interface/orbel_xv2el.html"},{"title":"orbel_xv2el_vec – swiftest","text":"interface Calls interface~~orbel_xv2el_vec~~CallsGraph interface~orbel_xv2el_vec orbel_xv2el_vec proc~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el_vec->interface~orbel_xv2el proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/orbel_xv2el_vec.html"},{"title":"setup_body – swiftest","text":"interface Calls interface~~setup_body~~CallsGraph interface~setup_body setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~setup_body~~CalledByGraph interface~setup_body setup_body proc~setup_pl setup_pl proc~setup_pl->interface~setup_body proc~setup_tp setup_tp proc~setup_tp->interface~setup_body interface~setup_pl setup_pl interface~setup_pl->proc~setup_pl interface~setup_tp setup_tp interface~setup_tp->proc~setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_body(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/setup_body.html"},{"title":"setup_construct_system – swiftest","text":"interface Calls interface~~setup_construct_system~~CallsGraph interface~setup_construct_system setup_construct_system proc~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system interface~util_exit util_exit proc~setup_construct_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_construct_system(system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/setup_construct_system.html"},{"title":"setup_encounter – swiftest","text":"interface Calls interface~~setup_encounter~~CallsGraph interface~setup_encounter setup_encounter proc~setup_encounter setup_encounter interface~setup_encounter->proc~setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for","tags":"","loc":"interface/setup_encounter.html"},{"title":"setup_initialize_particle_info_system – swiftest","text":"interface Calls interface~~setup_initialize_particle_info_system~~CallsGraph interface~setup_initialize_particle_info_system setup_initialize_particle_info_system proc~setup_initialize_particle_info_system setup_initialize_particle_info_system interface~setup_initialize_particle_info_system->proc~setup_initialize_particle_info_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/setup_initialize_particle_info_system.html"},{"title":"setup_initialize_system – swiftest","text":"interface Calls interface~~setup_initialize_system~~CallsGraph interface~setup_initialize_system setup_initialize_system proc~setup_initialize_system setup_initialize_system interface~setup_initialize_system->proc~setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/setup_initialize_system.html"},{"title":"setup_pl – swiftest","text":"interface Calls interface~~setup_pl~~CallsGraph interface~setup_pl setup_pl proc~setup_pl setup_pl interface~setup_pl->proc~setup_pl interface~setup_body setup_body proc~setup_pl->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/setup_pl.html"},{"title":"setup_tp – swiftest","text":"interface Calls interface~~setup_tp~~CallsGraph interface~setup_tp setup_tp proc~setup_tp setup_tp interface~setup_tp->proc~setup_tp interface~setup_body setup_body proc~setup_tp->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr","tags":"","loc":"interface/setup_tp.html"},{"title":"tides_kick_getacch_pl – swiftest","text":"interface Calls interface~~tides_kick_getacch_pl~~CallsGraph interface~tides_kick_getacch_pl tides_kick_getacch_pl proc~tides_kick_getacch_pl tides_kick_getacch_pl interface~tides_kick_getacch_pl->proc~tides_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/tides_kick_getacch_pl.html"},{"title":"tides_step_spin_system – swiftest","text":"interface Calls interface~~tides_step_spin_system~~CallsGraph interface~tides_step_spin_system tides_step_spin_system proc~tides_step_spin_system tides_step_spin_system interface~tides_step_spin_system->proc~tides_step_spin_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/tides_step_spin_system.html"},{"title":"user_kick_getacch_body – swiftest","text":"interface Calls interface~~user_kick_getacch_body~~CallsGraph interface~user_kick_getacch_body user_kick_getacch_body proc~user_kick_getacch_body user_kick_getacch_body interface~user_kick_getacch_body->proc~user_kick_getacch_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/user_kick_getacch_body.html"},{"title":"util_append – swiftest","text":"public interface util_append Called by interface~~util_append~2~~CalledByGraph interface~util_append~2 util_append proc~util_append_encounter util_append_encounter proc~util_append_encounter->interface~util_append~2 proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_append~2 interface~util_append_body util_append_body proc~util_append_tp->interface~util_append_body proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_append~2 proc~util_append_pl->interface~util_append_body proc~util_append_body util_append_body proc~util_append_body->interface~util_append~2 interface~util_append_encounter util_append_encounter interface~util_append_encounter->proc~util_append_encounter interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~util_append_body->proc~util_append_body interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_append_arr_char_string util_append_arr_DP util_append_arr_DPvec util_append_arr_I4B util_append_arr_info util_append_arr_logical Subroutines public subroutine util_append_arr_char_string(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DP(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DPvec(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_I4B(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_info(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_logical(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append~2.html"},{"title":"util_append_body – swiftest","text":"interface Calls interface~~util_append_body~~CallsGraph interface~util_append_body util_append_body proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body interface~util_append~2 util_append proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_append_body~~CalledByGraph interface~util_append_body util_append_body proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_append_body proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_append_body interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_body(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_body.html"},{"title":"util_append_encounter – swiftest","text":"interface Calls interface~~util_append_encounter~~CallsGraph interface~util_append_encounter util_append_encounter proc~util_append_encounter util_append_encounter interface~util_append_encounter->proc~util_append_encounter interface~util_append~2 util_append proc~util_append_encounter->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_encounter.html"},{"title":"util_append_pl – swiftest","text":"interface Calls interface~~util_append_pl~~CallsGraph interface~util_append_pl util_append_pl proc~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~util_append_body util_append_body proc~util_append_pl->interface~util_append_body interface~util_append~2 util_append proc~util_append_pl->interface~util_append~2 interface~util_exit util_exit proc~util_append_pl->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_pl.html"},{"title":"util_append_tp – swiftest","text":"interface Calls interface~~util_append_tp~~CallsGraph interface~util_append_tp util_append_tp proc~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~util_append_body util_append_body proc~util_append_tp->interface~util_append_body interface~util_append~2 util_append proc~util_append_tp->interface~util_append~2 interface~util_exit util_exit proc~util_append_tp->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_tp.html"},{"title":"util_coord_b2h_pl – swiftest","text":"interface Calls interface~~util_coord_b2h_pl~~CallsGraph interface~util_coord_b2h_pl util_coord_b2h_pl proc~util_coord_b2h_pl util_coord_b2h_pl interface~util_coord_b2h_pl->proc~util_coord_b2h_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_b2h_pl.html"},{"title":"util_coord_b2h_tp – swiftest","text":"interface Calls interface~~util_coord_b2h_tp~~CallsGraph interface~util_coord_b2h_tp util_coord_b2h_tp proc~util_coord_b2h_tp util_coord_b2h_tp interface~util_coord_b2h_tp->proc~util_coord_b2h_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_b2h_tp.html"},{"title":"util_coord_h2b_pl – swiftest","text":"interface Calls interface~~util_coord_h2b_pl~~CallsGraph interface~util_coord_h2b_pl util_coord_h2b_pl proc~util_coord_h2b_pl util_coord_h2b_pl interface~util_coord_h2b_pl->proc~util_coord_h2b_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_h2b_pl.html"},{"title":"util_coord_h2b_tp – swiftest","text":"interface Calls interface~~util_coord_h2b_tp~~CallsGraph interface~util_coord_h2b_tp util_coord_h2b_tp proc~util_coord_h2b_tp util_coord_h2b_tp interface~util_coord_h2b_tp->proc~util_coord_h2b_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_h2b_tp.html"},{"title":"util_coord_vb2vh_pl – swiftest","text":"interface Calls interface~~util_coord_vb2vh_pl~~CallsGraph interface~util_coord_vb2vh_pl util_coord_vb2vh_pl proc~util_coord_vb2vh_pl util_coord_vb2vh_pl interface~util_coord_vb2vh_pl->proc~util_coord_vb2vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_vb2vh_pl.html"},{"title":"util_coord_vb2vh_tp – swiftest","text":"interface Calls interface~~util_coord_vb2vh_tp~~CallsGraph interface~util_coord_vb2vh_tp util_coord_vb2vh_tp proc~util_coord_vb2vh_tp util_coord_vb2vh_tp interface~util_coord_vb2vh_tp->proc~util_coord_vb2vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body","tags":"","loc":"interface/util_coord_vb2vh_tp.html"},{"title":"util_coord_vh2vb_pl – swiftest","text":"interface Calls interface~~util_coord_vh2vb_pl~~CallsGraph interface~util_coord_vh2vb_pl util_coord_vh2vb_pl proc~util_coord_vh2vb_pl util_coord_vh2vb_pl interface~util_coord_vh2vb_pl->proc~util_coord_vh2vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_vh2vb_pl.html"},{"title":"util_coord_vh2vb_tp – swiftest","text":"interface Calls interface~~util_coord_vh2vb_tp~~CallsGraph interface~util_coord_vh2vb_tp util_coord_vh2vb_tp proc~util_coord_vh2vb_tp util_coord_vh2vb_tp interface~util_coord_vh2vb_tp->proc~util_coord_vh2vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body","tags":"","loc":"interface/util_coord_vh2vb_tp.html"},{"title":"util_coord_xh2xb_pl – swiftest","text":"interface Calls interface~~util_coord_xh2xb_pl~~CallsGraph interface~util_coord_xh2xb_pl util_coord_xh2xb_pl proc~util_coord_xh2xb_pl util_coord_xh2xb_pl interface~util_coord_xh2xb_pl->proc~util_coord_xh2xb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_xh2xb_pl.html"},{"title":"util_coord_xh2xb_tp – swiftest","text":"interface Calls interface~~util_coord_xh2xb_tp~~CallsGraph interface~util_coord_xh2xb_tp util_coord_xh2xb_tp proc~util_coord_xh2xb_tp util_coord_xh2xb_tp interface~util_coord_xh2xb_tp->proc~util_coord_xh2xb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_xh2xb_tp.html"},{"title":"util_copy_encounter – swiftest","text":"interface Calls interface~~util_copy_encounter~~CallsGraph interface~util_copy_encounter util_copy_encounter proc~util_copy_encounter util_copy_encounter interface~util_copy_encounter->proc~util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into","tags":"","loc":"interface/util_copy_encounter.html"},{"title":"util_copy_particle_info – swiftest","text":"interface Calls interface~~util_copy_particle_info~~CallsGraph interface~util_copy_particle_info util_copy_particle_info proc~util_copy_particle_info util_copy_particle_info interface~util_copy_particle_info->proc~util_copy_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_copy_particle_info(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source","tags":"","loc":"interface/util_copy_particle_info.html"},{"title":"util_copy_particle_info_arr – swiftest","text":"interface Calls interface~~util_copy_particle_info_arr~~CallsGraph interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_copy_particle_info_arr~~CalledByGraph interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_fill_arr_info util_fill_arr_info proc~util_fill_arr_info->interface~util_copy_particle_info_arr proc~util_spill_arr_info util_spill_arr_info proc~util_spill_arr_info->interface~util_copy_particle_info_arr proc~util_sort_rearrange_arr_info util_sort_rearrange_arr_info proc~util_sort_rearrange_arr_info->interface~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_copy_particle_info_arr(source, dest, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object","tags":"","loc":"interface/util_copy_particle_info_arr.html"},{"title":"util_exit – swiftest","text":"interface Calls interface~~util_exit~~CallsGraph interface~util_exit util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_exit~~CalledByGraph interface~util_exit util_exit proc~io_write_hdr_system io_write_hdr_system proc~io_write_hdr_system->interface~util_exit proc~io_dump_base io_dump_base proc~io_dump_base->interface~util_exit interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb proc~io_get_args io_get_args proc~io_get_args->interface~util_exit proc~io_write_frame_system io_write_frame_system proc~io_write_frame_system->interface~util_exit proc~io_dump_particle_info_base io_dump_particle_info_base proc~io_dump_particle_info_base->interface~util_exit proc~io_write_frame_body io_write_frame_body proc~io_write_frame_body->interface~util_exit proc~io_write_encounter io_write_encounter proc~io_write_encounter->interface~util_exit proc~io_write_frame_encounter io_write_frame_encounter proc~io_write_frame_encounter->interface~util_exit proc~io_dump_particle_info io_dump_particle_info proc~io_dump_particle_info->interface~util_exit proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_exit proc~util_valid_id_system util_valid_id_system proc~util_valid_id_system->interface~util_exit proc~util_solve_rkf45 util_solve_rkf45 proc~util_solve_rkf45->interface~util_exit proc~io_read_particle_info_system io_read_particle_info_system proc~io_read_particle_info_system->interface~util_exit proc~io_read_in_cb io_read_in_cb proc~io_read_in_cb->interface~util_exit proc~io_read_frame_body io_read_frame_body proc~io_read_frame_body->interface~util_exit proc~io_read_in_particle_info io_read_in_particle_info proc~io_read_in_particle_info->interface~util_exit proc~io_write_discard io_write_discard proc~io_write_discard->interface~util_exit proc~io_read_encounter io_read_encounter proc~io_read_encounter->interface~util_exit proc~check check proc~check->interface~util_exit proc~io_conservation_report io_conservation_report proc~io_conservation_report->interface~util_exit proc~io_write_frame_cb io_write_frame_cb proc~io_write_frame_cb->interface~util_exit proc~setup_construct_system setup_construct_system proc~setup_construct_system->interface~util_exit proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_exit proc~io_read_frame_cb io_read_frame_cb proc~io_read_frame_cb->interface~util_exit proc~io_get_old_t_final_system io_get_old_t_final_system proc~io_get_old_t_final_system->interface~util_exit proc~io_dump_param io_dump_param proc~io_dump_param->interface~util_exit proc~io_read_in_param io_read_in_param proc~io_read_in_param->interface~util_exit interface~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system interface~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system interface~io_write_frame_body->proc~io_write_frame_body interface~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter interface~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system interface~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system interface~io_write_frame_cb->proc~io_write_frame_cb interface~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system interface~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard interface~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info interface~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 interface~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report interface~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base interface~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param interface~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info interface~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system interface~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_exit(code) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code Failure exit code","tags":"","loc":"interface/util_exit.html"},{"title":"util_fill_body – swiftest","text":"interface Calls interface~~util_fill_body~~CallsGraph interface~util_fill_body util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body interface~util_fill~2 util_fill proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_fill_body~~CalledByGraph interface~util_fill_body util_fill_body proc~util_fill_pl util_fill_pl proc~util_fill_pl->interface~util_fill_body proc~util_fill_tp util_fill_tp proc~util_fill_tp->interface~util_fill_body interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_fill_body(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill_body.html"},{"title":"util_fill_pl – swiftest","text":"interface Calls interface~~util_fill_pl~~CallsGraph interface~util_fill_pl util_fill_pl proc~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl interface~util_fill~2 util_fill proc~util_fill_pl->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_pl->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill_pl.html"},{"title":"util_fill_tp – swiftest","text":"interface Calls interface~~util_fill_tp~~CallsGraph interface~util_fill_tp util_fill_tp proc~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill~2 util_fill proc~util_fill_tp->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_tp->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill_tp.html"},{"title":"util_fill – swiftest","text":"public interface util_fill Called by interface~~util_fill~2~~CalledByGraph interface~util_fill~2 util_fill proc~util_fill_tp util_fill_tp proc~util_fill_tp->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_tp->interface~util_fill_body proc~util_fill_body util_fill_body proc~util_fill_body->interface~util_fill~2 proc~util_fill_pl util_fill_pl proc~util_fill_pl->interface~util_fill~2 proc~util_fill_pl->interface~util_fill_body interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl interface~util_fill_body->proc~util_fill_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_fill_arr_char_string util_fill_arr_DP util_fill_arr_DPvec util_fill_arr_I4B util_fill_arr_info util_fill_arr_logical Subroutines public subroutine util_fill_arr_char_string(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DP(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DPvec(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_I4B(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_info(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_logical(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill~2.html"},{"title":"util_minimize_bfgs – swiftest","text":"interface Calls interface~~util_minimize_bfgs~~CallsGraph interface~util_minimize_bfgs util_minimize_bfgs proc~util_minimize_bfgs util_minimize_bfgs interface~util_minimize_bfgs->proc~util_minimize_bfgs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:),allocatable","tags":"","loc":"interface/util_minimize_bfgs.html"},{"title":"util_rescale_system – swiftest","text":"interface Calls interface~~util_rescale_system~~CallsGraph interface~util_rescale_system util_rescale_system proc~util_rescale_system util_rescale_system interface~util_rescale_system->proc~util_rescale_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively.","tags":"","loc":"interface/util_rescale_system.html"},{"title":"util_peri_tp – swiftest","text":"interface Calls interface~~util_peri_tp~~CallsGraph interface~util_peri_tp util_peri_tp proc~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp interface~orbel_xv2aeq orbel_xv2aeq proc~util_peri_tp->interface~orbel_xv2aeq proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_peri_tp.html"},{"title":"util_resize – swiftest","text":"public interface util_resize Called by interface~~util_resize~2~~CalledByGraph interface~util_resize~2 util_resize proc~util_append_arr_char_string util_append_arr_char_string proc~util_append_arr_char_string->interface~util_resize~2 proc~util_resize_body util_resize_body proc~util_resize_body->interface~util_resize~2 proc~util_resize_pl util_resize_pl proc~util_resize_pl->interface~util_resize~2 interface~util_resize_body util_resize_body proc~util_resize_pl->interface~util_resize_body proc~util_append_arr_i4b util_append_arr_I4B proc~util_append_arr_i4b->interface~util_resize~2 proc~util_append_arr_dp util_append_arr_DP proc~util_append_arr_dp->interface~util_resize~2 proc~util_append_arr_dpvec util_append_arr_DPvec proc~util_append_arr_dpvec->interface~util_resize~2 proc~util_append_arr_logical util_append_arr_logical proc~util_append_arr_logical->interface~util_resize~2 proc~util_resize_tp util_resize_tp proc~util_resize_tp->interface~util_resize~2 proc~util_resize_tp->interface~util_resize_body proc~util_append_arr_info util_append_arr_info proc~util_append_arr_info->interface~util_resize~2 interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize_body->proc~util_resize_body interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_resize_arr_char_string util_resize_arr_DP util_resize_arr_DPvec util_resize_arr_I4B util_resize_arr_info util_resize_arr_logical Subroutines public subroutine util_resize_arr_char_string(arr, nnew) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DP(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DPvec(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_I4B(arr, nnew) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_info(arr, nnew) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_logical(arr, nnew) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size","tags":"","loc":"interface/util_resize~2.html"},{"title":"util_resize_body – swiftest","text":"interface Calls interface~~util_resize_body~~CallsGraph interface~util_resize_body util_resize_body proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body interface~util_resize~2 util_resize proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_resize_body~~CalledByGraph interface~util_resize_body util_resize_body proc~util_resize_pl util_resize_pl proc~util_resize_pl->interface~util_resize_body proc~util_resize_tp util_resize_tp proc~util_resize_tp->interface~util_resize_body interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_body(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/util_resize_body.html"},{"title":"util_resize_encounter – swiftest","text":"interface Calls interface~~util_resize_encounter~~CallsGraph interface~util_resize_encounter util_resize_encounter proc~util_resize_encounter util_resize_encounter interface~util_resize_encounter->proc~util_resize_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed","tags":"","loc":"interface/util_resize_encounter.html"},{"title":"util_resize_pl – swiftest","text":"interface Calls interface~~util_resize_pl~~CallsGraph interface~util_resize_pl util_resize_pl proc~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize_body util_resize_body proc~util_resize_pl->interface~util_resize_body interface~util_resize~2 util_resize proc~util_resize_pl->interface~util_resize~2 proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/util_resize_pl.html"},{"title":"util_resize_tp – swiftest","text":"interface Calls interface~~util_resize_tp~~CallsGraph interface~util_resize_tp util_resize_tp proc~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp interface~util_resize_body util_resize_body proc~util_resize_tp->interface~util_resize_body interface~util_resize~2 util_resize proc~util_resize_tp->interface~util_resize~2 proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/util_resize_tp.html"},{"title":"util_get_energy_momentum_system – swiftest","text":"interface Calls interface~~util_get_energy_momentum_system~~CallsGraph interface~util_get_energy_momentum_system util_get_energy_momentum_system proc~util_get_energy_momentum_system util_get_energy_momentum_system interface~util_get_energy_momentum_system->proc~util_get_energy_momentum_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_get_energy_momentum_system.html"},{"title":"util_set_beg_end_pl – swiftest","text":"interface Calls interface~~util_set_beg_end_pl~~CallsGraph interface~util_set_beg_end_pl util_set_beg_end_pl proc~util_set_beg_end_pl util_set_beg_end_pl interface~util_set_beg_end_pl->proc~util_set_beg_end_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS","tags":"","loc":"interface/util_set_beg_end_pl.html"},{"title":"util_set_ir3h – swiftest","text":"interface Calls interface~~util_set_ir3h~~CallsGraph interface~util_set_ir3h util_set_ir3h proc~util_set_ir3h util_set_ir3h interface~util_set_ir3h->proc~util_set_ir3h Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object","tags":"","loc":"interface/util_set_ir3h.html"},{"title":"util_set_msys – swiftest","text":"interface Calls interface~~util_set_msys~~CallsGraph interface~util_set_msys util_set_msys proc~util_set_msys util_set_msys interface~util_set_msys->proc~util_set_msys Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object","tags":"","loc":"interface/util_set_msys.html"},{"title":"util_set_mu_pl – swiftest","text":"interface Calls interface~~util_set_mu_pl~~CallsGraph interface~util_set_mu_pl util_set_mu_pl proc~util_set_mu_pl util_set_mu_pl interface~util_set_mu_pl->proc~util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_mu_pl.html"},{"title":"util_set_mu_tp – swiftest","text":"interface Calls interface~~util_set_mu_tp~~CallsGraph interface~util_set_mu_tp util_set_mu_tp proc~util_set_mu_tp util_set_mu_tp interface~util_set_mu_tp->proc~util_set_mu_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_mu_tp.html"},{"title":"util_set_particle_info – swiftest","text":"interface Calls interface~~util_set_particle_info~~CallsGraph interface~util_set_particle_info util_set_particle_info proc~util_set_particle_info util_set_particle_info interface~util_set_particle_info->proc~util_set_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: Active, Merged, Fragmented, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved)","tags":"","loc":"interface/util_set_particle_info.html"},{"title":"util_set_rhill – swiftest","text":"interface Calls interface~~util_set_rhill~~CallsGraph interface~util_set_rhill util_set_rhill proc~util_set_rhill util_set_rhill interface~util_set_rhill->proc~util_set_rhill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_rhill.html"},{"title":"util_set_rhill_approximate – swiftest","text":"interface Calls interface~~util_set_rhill_approximate~~CallsGraph interface~util_set_rhill_approximate util_set_rhill_approximate proc~util_set_rhill_approximate util_set_rhill_approximate interface~util_set_rhill_approximate->proc~util_set_rhill_approximate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_rhill_approximate(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_rhill_approximate.html"},{"title":"util_solve_linear_system – swiftest","text":"public interface util_solve_linear_system Contents Functions util_solve_linear_system_d util_solve_linear_system_q Functions public function util_solve_linear_system_d(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) public function util_solve_linear_system_q(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n)","tags":"","loc":"interface/util_solve_linear_system.html"},{"title":"util_solve_rkf45 – swiftest","text":"interface Calls interface~~util_solve_rkf45~~CallsGraph interface~util_solve_rkf45 util_solve_rkf45 proc~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 interface~util_exit util_exit proc~util_solve_rkf45->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function util_solve_rkf45(f, y0in, t1, dt0, tol) result(y1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:),allocatable Final result","tags":"","loc":"interface/util_solve_rkf45.html"},{"title":"util_sort – swiftest","text":"public interface util_sort Called by interface~~util_sort~~CalledByGraph interface~util_sort util_sort proc~util_valid_id_system util_valid_id_system proc~util_valid_id_system->interface~util_sort proc~netcdf_write_frame_base netcdf_write_frame_base proc~netcdf_write_frame_base->interface~util_sort proc~netcdf_write_particle_info_base netcdf_write_particle_info_base proc~netcdf_write_particle_info_base->interface~util_sort interface~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base->proc~netcdf_write_frame_base interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system interface~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base->proc~netcdf_write_particle_info_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_sort_i4b util_sort_index_i4b util_sort_sp util_sort_index_sp util_sort_dp util_sort_index_dp Subroutines public subroutine util_sort_i4b(arr) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr public subroutine util_sort_index_i4b(arr, ind) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_sp(arr) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_sp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_dp(arr) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_dp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind","tags":"","loc":"interface/util_sort.html"},{"title":"util_sort_rearrange – swiftest","text":"public interface util_sort_rearrange Called by interface~~util_sort_rearrange~2~~CalledByGraph interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 proc~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp->interface~util_sort_rearrange~2 interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body proc~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl->interface~util_sort_rearrange~2 proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp interface~util_sort_rearrange_body->proc~util_sort_rearrange_body interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_sort_rearrange_arr_char_string util_sort_rearrange_arr_DP util_sort_rearrange_arr_DPvec util_sort_rearrange_arr_I4B util_sort_rearrange_arr_info util_sort_rearrange_arr_logical Subroutines public subroutine util_sort_rearrange_arr_char_string(arr, ind, n) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DP(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DPvec(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_I4B(arr, ind, n) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_info(arr, ind, n) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_logical(arr, ind, n) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange","tags":"","loc":"interface/util_sort_rearrange~2.html"},{"title":"util_sort_rearrange_body – swiftest","text":"interface Calls interface~~util_sort_rearrange_body~~CallsGraph interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_sort_rearrange_body~~CalledByGraph interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body proc~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_rearrange_body(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/util_sort_rearrange_body.html"},{"title":"util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~util_sort_rearrange_pl~~CallsGraph interface~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_pl->interface~util_sort_rearrange~2 proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/util_sort_rearrange_pl.html"},{"title":"util_sort_rearrange_tp – swiftest","text":"interface Calls interface~~util_sort_rearrange_tp~~CallsGraph interface~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_tp->interface~util_sort_rearrange~2 proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/util_sort_rearrange_tp.html"},{"title":"util_sort_body – swiftest","text":"interface Calls interface~~util_sort_body~~CallsGraph interface~util_sort_body util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_sort_body~~CalledByGraph interface~util_sort_body util_sort_body proc~util_sort_tp util_sort_tp proc~util_sort_tp->interface~util_sort_body proc~util_sort_pl util_sort_pl proc~util_sort_pl->interface~util_sort_body interface~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl interface~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_body(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/util_sort_body.html"},{"title":"util_sort_pl – swiftest","text":"interface Calls interface~~util_sort_pl~~CallsGraph interface~util_sort_pl util_sort_pl proc~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl interface~util_sort_body util_sort_body proc~util_sort_pl->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/util_sort_pl.html"},{"title":"util_sort_tp – swiftest","text":"interface Calls interface~~util_sort_tp~~CallsGraph interface~util_sort_tp util_sort_tp proc~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp interface~util_sort_body util_sort_body proc~util_sort_tp->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/util_sort_tp.html"},{"title":"util_spill – swiftest","text":"public interface util_spill Called by interface~~util_spill~2~~CalledByGraph interface~util_spill~2 util_spill proc~util_spill_encounter util_spill_encounter proc~util_spill_encounter->interface~util_spill~2 proc~util_spill_tp util_spill_tp proc~util_spill_tp->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_tp->interface~util_spill_body proc~util_spill_pl util_spill_pl proc~util_spill_pl->interface~util_spill~2 proc~util_spill_pl->interface~util_spill_body proc~util_spill_body util_spill_body proc~util_spill_body->interface~util_spill~2 interface~util_spill_encounter util_spill_encounter interface~util_spill_encounter->proc~util_spill_encounter interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl interface~util_spill_body->proc~util_spill_body interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_spill_arr_char_string util_spill_arr_DP util_spill_arr_DPvec util_spill_arr_I4B util_spill_arr_I8B util_spill_arr_info util_spill_arr_logical Subroutines public subroutine util_spill_arr_char_string(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DP(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DPvec(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I4B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I8B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_info(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_logical(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill~2.html"},{"title":"util_spill_body – swiftest","text":"interface Calls interface~~util_spill_body~~CallsGraph interface~util_spill_body util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body interface~util_spill~2 util_spill proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_spill_body~~CalledByGraph interface~util_spill_body util_spill_body proc~util_spill_tp util_spill_tp proc~util_spill_tp->interface~util_spill_body proc~util_spill_pl util_spill_pl proc~util_spill_pl->interface~util_spill_body interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill_body.html"},{"title":"util_spill_encounter – swiftest","text":"interface Calls interface~~util_spill_encounter~~CallsGraph interface~util_spill_encounter util_spill_encounter proc~util_spill_encounter util_spill_encounter interface~util_spill_encounter->proc~util_spill_encounter interface~util_spill~2 util_spill proc~util_spill_encounter->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"interface/util_spill_encounter.html"},{"title":"util_spill_pl – swiftest","text":"interface Calls interface~~util_spill_pl~~CallsGraph interface~util_spill_pl util_spill_pl proc~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl interface~util_spill~2 util_spill proc~util_spill_pl->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_pl->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill_pl.html"},{"title":"util_spill_tp – swiftest","text":"interface Calls interface~~util_spill_tp~~CallsGraph interface~util_spill_tp util_spill_tp proc~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp interface~util_spill~2 util_spill proc~util_spill_tp->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_tp->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill_tp.html"},{"title":"util_valid_id_system – swiftest","text":"interface Calls interface~~util_valid_id_system~~CallsGraph interface~util_valid_id_system util_valid_id_system proc~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system interface~util_sort util_sort proc~util_valid_id_system->interface~util_sort interface~util_exit util_exit proc~util_valid_id_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/util_valid_id_system.html"},{"title":"util_version – swiftest","text":"interface Calls interface~~util_version~~CallsGraph interface~util_version util_version proc~util_version util_version interface~util_version->proc~util_version Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_version~~CalledByGraph interface~util_version util_version proc~io_get_args io_get_args proc~io_get_args->interface~util_version interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_version() Implementation → Arguments None","tags":"","loc":"interface/util_version.html"},{"title":"lambda_init_0 – swiftest","text":"public function lambda_init_0(lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) Called by proc~~lambda_init_0~~CalledByGraph proc~lambda_init_0 lambda_init_0 interface~lambda_obj~2 lambda_obj interface~lambda_obj~2->proc~lambda_init_0 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/lambda_init_0.html"},{"title":"lambda_init_0_err – swiftest","text":"public function lambda_init_0_err(lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) Called by proc~~lambda_init_0_err~~CalledByGraph proc~lambda_init_0_err lambda_init_0_err interface~lambda_obj~2 lambda_obj interface~lambda_obj~2->proc~lambda_init_0_err Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/lambda_init_0_err.html"},{"title":"lambda_init_tvar – swiftest","text":"public function lambda_init_tvar(lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) Called by proc~~lambda_init_tvar~~CalledByGraph proc~lambda_init_tvar lambda_init_tvar interface~lambda_obj~2 lambda_obj interface~lambda_obj~2->proc~lambda_init_tvar Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/lambda_init_tvar.html"},{"title":"lambda_eval_0 – swiftest","text":"public function lambda_eval_0(self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) Contents None","tags":"","loc":"proc/lambda_eval_0.html"},{"title":"lambda_eval_0_err – swiftest","text":"public function lambda_eval_0_err(self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_err ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) Contents None","tags":"","loc":"proc/lambda_eval_0_err.html"},{"title":"lambda_eval_tvar – swiftest","text":"public function lambda_eval_tvar(self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_tvar ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/lambda_eval_tvar.html"},{"title":"lambda_destroy – swiftest","text":"public subroutine lambda_destroy(self) Arguments Type Intent Optional Attributes Name type( lambda_obj ) :: self Contents None","tags":"","loc":"proc/lambda_destroy.html"},{"title":"lambda_obj – swiftest","text":"public interface lambda_obj Calls interface~~lambda_obj~2~~CallsGraph interface~lambda_obj~2 lambda_obj proc~lambda_init_0 lambda_init_0 interface~lambda_obj~2->proc~lambda_init_0 proc~lambda_init_tvar lambda_init_tvar interface~lambda_obj~2->proc~lambda_init_tvar proc~lambda_init_0_err lambda_init_0_err interface~lambda_obj~2->proc~lambda_init_0_err Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Module Procedures lambda_init_0 lambda_init_0_err lambda_init_tvar Module Procedures public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar )","tags":"","loc":"interface/lambda_obj~2.html"},{"title":"fraggle_generate_pos_vec – swiftest","text":"subroutine fraggle_generate_pos_vec(frag, colliders, r_max_start) Initializes the orbits of the fragments around the center of mass. The fragments are initially placed on a plane defined by the \n pre-impact angular momentum. They are distributed on an ellipse surrounding the center of mass.\n The initial positions do not conserve energy or momentum, so these need to be adjusted later. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: r_max_start Initial guess for the starting maximum radial distance of fragments Calls proc~~fraggle_generate_pos_vec~~CallsGraph proc~fraggle_generate_pos_vec fraggle_generate_pos_vec interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_pos_vec~~CalledByGraph proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_pos_vec.html"},{"title":"fraggle_generate_spins – swiftest","text":"subroutine fraggle_generate_spins(frag, colliders, f_spin, lfailure) Calculates the spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: f_spin Fraction of energy or momentum that goes into spin (whichever gives the lowest kinetic energy) logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! Calls proc~~fraggle_generate_spins~~CallsGraph proc~fraggle_generate_spins fraggle_generate_spins interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_spins~~CalledByGraph proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_spins interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_spins.html"},{"title":"fraggle_generate_tan_vel – swiftest","text":"subroutine fraggle_generate_tan_vel(frag, colliders, lfailure) Adjusts the tangential velocities and spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget.\n This procedure works in several stages, with a goal to solve the angular and linear momentum constraints on the fragments, while still leaving a positive balance of\n our fragment kinetic energy (frag%ke_budget) that we can put into the radial velocity distribution. The first thing we'll try to do is solve for the tangential velocities of the first 6 fragments, using angular and linear momentum as constraints and an initial\n tangential velocity distribution for the remaining bodies (if there are any) that distributes their angular momentum equally between them.\n If that doesn't work and we blow our kinetic energy budget, we will attempt to find a tangential velocity distribution that minimizes the kinetic energy while\n conserving momentum. A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds Calls proc~~fraggle_generate_tan_vel~~CallsGraph proc~fraggle_generate_tan_vel fraggle_generate_tan_vel util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_tan_vel->util_minimize_bfgs interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb lambda_obj lambda_obj proc~fraggle_generate_tan_vel->lambda_obj interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_tan_vel~~CalledByGraph proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_tan_vel.html"},{"title":"fraggle_generate_rad_vel – swiftest","text":"subroutine fraggle_generate_rad_vel(frag, colliders, lfailure) Adjust the fragment velocities to set the fragment orbital kinetic energy. This will minimize the difference between the fragment kinetic energy and the energy budget Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! Calls proc~~fraggle_generate_rad_vel~~CallsGraph proc~fraggle_generate_rad_vel fraggle_generate_rad_vel util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_rad_vel->util_minimize_bfgs interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb lambda_obj lambda_obj proc~fraggle_generate_rad_vel->lambda_obj interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_rad_vel~~CalledByGraph proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_rad_vel.html"},{"title":"fraggle_regime_collresolve – swiftest","text":"subroutine fraggle_regime_collresolve(Mcb, m1, m2, rad1, rad2, xh1, xh2, vb1, vb2, den1, den2, min_mfrag, regime, Mlr, Mslr, Qloss) Determine the collisional regime of two colliding bodies. \n Current version requires all values to be converted to SI units prior to calling the function\n       References:\n       Kokubo, E., Genda, H., 2010. Formation of Terrestrial Planets from Protoplanets Under a Realistic Accretion \n          Condition. ApJL 714, L21. https://doi.org/10.1088/2041-8205/714/1/L21\n       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling \n          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79\n       Mustill, A.J., Davies, M.B., Johansen, A., 2018. The dynamical evolution of transiting planetary systems including \n          a realistic collision prescription. Mon Not R Astron Soc 478, 2896–2908. https://doi.org/10.1093/mnras/sty1273\n       Rufu, R., Aharonson, O., 2019. Impact Dynamics of Moons Within a Planetary Potential. J. Geophys. Res. Planets 124, \n          1008–1019. https://doi.org/10.1029/2018JE005798\n       Stewart, S.T., Leinhardt, Z.M., 2012. Collisions between Gravity-dominated Bodies. II. The Diversity of Impact \n          Outcomes during the End Stage of Planet Formation. ApJ 751, 32. https://doi.org/10.1088/0004-637X/751/1/32 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: Mcb real(kind=DP), intent(in) :: m1 real(kind=DP), intent(in) :: m2 real(kind=DP), intent(in) :: rad1 real(kind=DP), intent(in) :: rad2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vb1 real(kind=DP), intent(in), dimension(:) :: vb2 real(kind=DP), intent(in) :: den1 real(kind=DP), intent(in) :: den2 real(kind=DP), intent(in) :: min_mfrag integer(kind=I4B), intent(out) :: regime real(kind=DP), intent(out) :: Mlr real(kind=DP), intent(out) :: Mslr real(kind=DP), intent(out) :: Qloss The residual energy after the collision Calls proc~~fraggle_regime_collresolve~~CallsGraph proc~fraggle_regime_collresolve fraggle_regime_collresolve interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_regime_collresolve->interface~fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_regime_collresolve.html"},{"title":"rmvs_interp_out – swiftest","text":"subroutine rmvs_interp_out(cb, pl, dt) Interpolate planet positions between two Keplerian orbits in outer encounter region Adapted from David E. Kaufmann's Swifter routine rmvs_interp_out.f90 Adapted from Hal Levison's Swift routine rmvs3_interp.f Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object real(kind=DP), intent(in) :: dt Step size Calls proc~~rmvs_interp_out~~CallsGraph proc~rmvs_interp_out rmvs_interp_out util_exit util_exit proc~rmvs_interp_out->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_interp_out~~CalledByGraph proc~rmvs_interp_out rmvs_interp_out proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_interp_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_interp_out.html"},{"title":"rmvs_step_out – swiftest","text":"subroutine rmvs_step_out(cb, pl, tp, system, param, t, dt) Step ACTIVE test particles ahead in the outer encounter region, setting up and calling the inner region\n    integration if necessar Adapted from Hal Levison's Swift routines rmvs3_step_out.f and rmvs3_step_out2.f\n Adapted from David E. Kaufmann's Swifter routines rmvs_step_out.f90 and rmvs_step_out2.f90 Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz Calls proc~~rmvs_step_out~~CallsGraph proc~rmvs_step_out rmvs_step_out proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out->proc~rmvs_interp_in proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric util_exit util_exit proc~rmvs_interp_in->util_exit xpc xpc proc~rmvs_peri_tp->xpc vpc vpc proc~rmvs_peri_tp->vpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_step_out~~CalledByGraph proc~rmvs_step_out rmvs_step_out proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_step_out.html"},{"title":"rmvs_interp_in – swiftest","text":"subroutine rmvs_interp_in(cb, pl, system, param, dt, outer_index) Interpolate planet positions between two Keplerian orbits in inner encounter regio Adapted from David E. Kaufmann's Swifter routine rmvs_interp_in.f90 Adapted from Hal Levison's Swift routine rmvs3_interp.f Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS cenral body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(in) :: param Swiftest parameters file real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(in) :: outer_index Outer substep number within current set Calls proc~~rmvs_interp_in~~CallsGraph proc~rmvs_interp_in rmvs_interp_in util_exit util_exit proc~rmvs_interp_in->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_interp_in~~CalledByGraph proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_interp_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_interp_in.html"},{"title":"rmvs_step_in – swiftest","text":"subroutine rmvs_step_in(cb, pl, tp, param, outer_time, dto) Step active test particles ahead in the inner encounter region Adapted from Hal Levison's Swift routine rmvs3_step_in.f\n Adapted from David E. Kaufmann's Swifter routine rmvs_step_in.f90 Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: outer_time Current time real(kind=DP), intent(in) :: dto Outer step size Calls proc~~rmvs_step_in~~CallsGraph proc~rmvs_step_in rmvs_step_in proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric xpc xpc proc~rmvs_peri_tp->xpc vpc vpc proc~rmvs_peri_tp->vpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_step_in~~CalledByGraph proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_step_in.html"},{"title":"rmvs_make_planetocentric – swiftest","text":"subroutine rmvs_make_planetocentric(param, cb, pl, tp) When encounters are detected, this method will call the interpolation methods for the planets and \n creates a Swiftest test particle structure for each planet's encountering test particles to simplify the \n planetocentric calculations. This subroutine is not based on an existing one from Swift and Swifter Arguments Type Intent Optional Attributes Name class(swiftest_parameters), intent(in) :: param Current run configuration paramete class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object Called by proc~~rmvs_make_planetocentric~~CalledByGraph proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in rmvs_step_in proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_make_planetocentric.html"},{"title":"rmvs_peri_tp – swiftest","text":"subroutine rmvs_peri_tp(tp, pl, t, dt, lfirst, inner_index, ipleP, param) Determine planetocentric pericenter passages for test particles in close encounters with a planet Adapted from Hal Levison's Swift routine Adapted from Hal Levison's Swift routine util_peri.f\n Adapted from David E. Kaufmann's Swifter routine rmvs_peri.f90 Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: tp RMVS test particle object (planetocentric) class( rmvs_pl ), intent(inout) :: pl RMVS massive body object (heliocentric) real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size logical, intent(in) :: lfirst Logical flag indicating whether current invocation is the first integer(kind=I4B), intent(in) :: inner_index Outer substep number within current set integer(kind=I4B), intent(in) :: ipleP index of RMVS planet being closely encountered class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~rmvs_peri_tp~~CallsGraph proc~rmvs_peri_tp rmvs_peri_tp xpc xpc proc~rmvs_peri_tp->xpc vpc vpc proc~rmvs_peri_tp->vpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_peri_tp~~CalledByGraph proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in rmvs_step_in proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_peri_tp.html"},{"title":"rmvs_end_planetocentric – swiftest","text":"subroutine rmvs_end_planetocentric(pl, tp) Deallocates all of the encountering particle data structures for next time Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle objec Called by proc~~rmvs_end_planetocentric~~CalledByGraph proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in rmvs_step_in proc~rmvs_step_in->proc~rmvs_end_planetocentric proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_end_planetocentric.html"},{"title":"kick_getacch_int_pl – swiftest","text":"module subroutine kick_getacch_int_pl(self) Interface → Compute direct cross (third) term heliocentric accelerations of massive bodies Adapted from Hal Levison's Swift routine getacch_ah3.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f90 Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Calls proc~~kick_getacch_int_pl~~CallsGraph proc~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~kick_getacch_int_pl~~CalledByGraph proc~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_pl.html"},{"title":"kick_getacch_int_tp – swiftest","text":"pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Interface → Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies Adapted from Hal Levison's Swift routine getacch_ah3_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies Called by proc~~kick_getacch_int_tp~~CalledByGraph proc~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp->proc~kick_getacch_int_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_tp.html"},{"title":"kick_getacch_int_all_pl – swiftest","text":"module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc) Interface → Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization Adapted from Hal Levison's Swift routine getacch_ah3.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array Called by proc~~kick_getacch_int_all_pl~~CalledByGraph proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl proc~kick_getacch_int_pl kick_getacch_int_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl interface~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_all_pl.html"},{"title":"kick_getacch_int_one_pl – swiftest","text":"pure module subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Interface → Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies Adapted from Hal Levison's Swift routine getacch_ah3.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j Called by proc~~kick_getacch_int_one_pl~~CalledByGraph proc~kick_getacch_int_one_pl kick_getacch_int_one_pl interface~kick_getacch_int_one_pl kick_getacch_int_one_pl interface~kick_getacch_int_one_pl->proc~kick_getacch_int_one_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_one_pl.html"},{"title":"kick_getacch_int_one_tp – swiftest","text":"pure module subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, az) Interface → Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair. Adapted from Hal Levison's Swift routine getacch_ah3_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle Called by proc~~kick_getacch_int_one_tp~~CalledByGraph proc~kick_getacch_int_one_tp kick_getacch_int_one_tp interface~kick_getacch_int_one_tp kick_getacch_int_one_tp interface~kick_getacch_int_one_tp->proc~kick_getacch_int_one_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_one_tp.html"},{"title":"tides_kick_getacch_pl – swiftest","text":"module subroutine tides_kick_getacch_pl(self, system) Interface → Calculated tidal torques from central body to any planet and from any planet to central body\n planet - planet interactions are considered negligable.\n This is a constant time lag model. Adapted from Mercury-T code from Bolmont et al. (2015) Reference:\n    Bolmont, E., Raymond, S.N., Leconte, J., Hersant, F., Correia, A.C.M., 2015. \n       Mercury-T : A new code to study tidally evolving multi-planet systems. \n       Applications to Kepler-62. A&A 583, A116. https://doi.org/10.1051/0004-6361/201525909 Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Called by proc~~tides_kick_getacch_pl~~CalledByGraph proc~tides_kick_getacch_pl tides_kick_getacch_pl interface~tides_kick_getacch_pl tides_kick_getacch_pl interface~tides_kick_getacch_pl->proc~tides_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/tides_kick_getacch_pl.html"},{"title":"tides_step_spin_system – swiftest","text":"module subroutine tides_step_spin_system(self, param, t, dt) Interface → Integrates the spin equations for central and massive bodies of the system subjected to tides. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~tides_step_spin_system~~CalledByGraph proc~tides_step_spin_system tides_step_spin_system interface~tides_step_spin_system tides_step_spin_system interface~tides_step_spin_system->proc~tides_step_spin_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/tides_step_spin_system.html"},{"title":"obl_acc_body – swiftest","text":"module subroutine obl_acc_body(self, system) Interface → Compute the barycentric accelerations of bodies due to the oblateness of the central body\n      Returned values do not include monopole term or terms higher than J4 Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90\n Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Called by proc~~obl_acc_body~~CalledByGraph proc~obl_acc_body obl_acc_body interface~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body proc~obl_acc_tp obl_acc_tp proc~obl_acc_tp->interface~obl_acc_body proc~obl_acc_pl obl_acc_pl proc~obl_acc_pl->interface~obl_acc_body interface~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp interface~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_acc_body.html"},{"title":"obl_acc_pl – swiftest","text":"module subroutine obl_acc_pl(self, system) Interface → Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90\n Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Calls proc~~obl_acc_pl~~CallsGraph proc~obl_acc_pl obl_acc_pl interface~obl_acc_body obl_acc_body proc~obl_acc_pl->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~obl_acc_pl~~CalledByGraph proc~obl_acc_pl obl_acc_pl interface~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_acc_pl.html"},{"title":"obl_acc_tp – swiftest","text":"module subroutine obl_acc_tp(self, system) Interface → Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90\n Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Calls proc~~obl_acc_tp~~CallsGraph proc~obl_acc_tp obl_acc_tp interface~obl_acc_body obl_acc_body proc~obl_acc_tp->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~obl_acc_tp~~CalledByGraph proc~obl_acc_tp obl_acc_tp interface~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_acc_tp.html"},{"title":"obl_pot_system – swiftest","text":"module subroutine obl_pot_system(self) Interface → Compute the contribution to the total gravitational potential due solely to the oblateness of the central body\n    Returned value does not include monopole term or terms higher than J4 Reference : MacMillan , W . D . 1958 . The Theory of the Potential , ( Dover Publications ), 363 . Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 \n Adapted from Hal Levison's Swift routine obl_pot.f Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object Calls proc~~obl_pot_system~~CallsGraph proc~obl_pot_system obl_pot_system proc~obl_pot_one obl_pot_one proc~obl_pot_system->proc~obl_pot_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~obl_pot_system~~CalledByGraph proc~obl_pot_system obl_pot_system interface~obl_pot_system obl_pot_system interface~obl_pot_system->proc~obl_pot_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_pot_system.html"},{"title":"orbel_el2xv_vec – swiftest","text":"module subroutine orbel_el2xv_vec(self, cb) Interface → A wrapper method that converts all of the orbital element vectors into cartesian position and velocity vectors for a Swiftest body object.\n This method deallocates all of the orbital elements after it is finished. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body objec Calls proc~~orbel_el2xv_vec~~CallsGraph proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_scget orbel_scget proc~orbel_el2xv->interface~orbel_scget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_zget orbel_zget proc~orbel_el2xv->proc~orbel_zget proc~orbel_schget orbel_schget proc~orbel_el2xv->proc~orbel_schget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget 3 3 proc~orbel_flon->3 proc~orbel_esolmd->interface~orbel_scget proc~orbel_eget->interface~orbel_scget proc~orbel_fget->proc~orbel_schget proc~orbel_ehie->interface~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_el2xv_vec~~CalledByGraph proc~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_el2xv_vec.html"},{"title":"orbel_scget – swiftest","text":"pure module subroutine orbel_scget(angle, sx, cx) Interface → Efficiently compute the sine and cosine of an input angle\n      Input angle must be in radians Adapted from David E. Kaufmann's Swifter routine: orbel_scget.f90\n Adapted from Hal Levison's Swift routine orbel_scget.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx Called by proc~~orbel_scget~~CalledByGraph proc~orbel_scget orbel_scget interface~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget proc~orbel_esolmd orbel_esolmd proc~orbel_esolmd->interface~orbel_scget proc~orbel_eget orbel_eget proc~orbel_eget->interface~orbel_scget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->interface~orbel_scget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu_guess->interface~orbel_scget proc~orbel_ehie orbel_ehie proc~orbel_ehie->interface~orbel_scget proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehybrid->proc~orbel_eget proc~orbel_ehybrid->proc~orbel_ehie proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_scget.html"},{"title":"orbel_xv2aeq – swiftest","text":"pure module subroutine orbel_xv2aeq(mu, x, v, a, e, q) Interface → Compute semimajor axis, eccentricity, and pericentric distance from relative Cartesian position and velocity Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aeq.f90\n Adapted from Luke Dones' Swift routine orbel_xv2aeq.f\n Arguments Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in), dimension(:) :: v real(kind=DP), intent(out) :: a real(kind=DP), intent(out) :: e real(kind=DP), intent(out) :: q Called by proc~~orbel_xv2aeq~~CalledByGraph proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq proc~util_peri_tp util_peri_tp proc~util_peri_tp->interface~orbel_xv2aeq interface~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2aeq.html"},{"title":"orbel_xv2aqt – swiftest","text":"pure module subroutine orbel_xv2aqt(mu, x, v, a, q, capm, tperi) Interface → Compute semimajor axis, pericentric distance, mean anomaly, and time to nearest pericenter passage from\n relative Cartesian position and velocity\n      tperi > 0 means nearest pericenter passage is in the future\n      tperi < 0 means nearest pericenter passage is in the past Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aqt.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage Called by proc~~orbel_xv2aqt~~CalledByGraph proc~orbel_xv2aqt orbel_xv2aqt interface~orbel_xv2aqt orbel_xv2aqt interface~orbel_xv2aqt->proc~orbel_xv2aqt Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2aqt.html"},{"title":"orbel_xv2el_vec – swiftest","text":"module subroutine orbel_xv2el_vec(self, cb) Interface → A wrapper method that converts all of the cartesian position and velocity vectors of a Swiftest body object to orbital elements. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Calls proc~~orbel_xv2el_vec~~CallsGraph proc~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el_vec->interface~orbel_xv2el proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_xv2el_vec~~CalledByGraph proc~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2el_vec.html"},{"title":"orbel_xv2el – swiftest","text":"pure module subroutine orbel_xv2el(mu, x, v, a, e, inc, capom, omega, capm) Interface → Compute osculating orbital elements from relative Cartesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 If eccentricity < sqrt ( TINY ), argument of pericenter is arbitrarily set to 0 References : Danby , J . M . A . 1988 . Fundamentals of Celestial Mechanics , ( Willmann - Bell , Inc .), 201 - 206 . Fitzpatrick , P . M . 1970 . Principles of Celestial Mechanics , ( Academic Press ), 69 - 73 . Roy , A . E . 1982 . Orbital Motion , ( Adam Hilger , Ltd .), 75 - 95 Adapted from David E. Kaufmann's Swifter routine: orbel_xv2el.f90\n Adapted from Martin Duncan's Swift routine orbel_xv2el.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly Called by proc~~orbel_xv2el~~CalledByGraph proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el proc~orbel_xv2el_vec orbel_xv2el_vec proc~orbel_xv2el_vec->interface~orbel_xv2el interface~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2el.html"},{"title":"whm_coord_h2j_pl – swiftest","text":"module subroutine whm_coord_h2j_pl(self, cb) Interface → Convert from heliocentric to Jacobi coordinates, massive bodies only Uses pre-computed eta rather than computing it each time Adapted from David E. Kaufmann's Swifter routine coord_h2j.f90 Adapted from Hal Levison's Swift routine coord_h2j.f Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree Calls proc~~whm_coord_h2j_pl~~CallsGraph proc~whm_coord_h2j_pl whm_coord_h2j_pl vj vj proc~whm_coord_h2j_pl->vj vh vh proc~whm_coord_h2j_pl->vh xj xj proc~whm_coord_h2j_pl->xj xh xh proc~whm_coord_h2j_pl->xh gmpl gmpl proc~whm_coord_h2j_pl->gmpl eta eta proc~whm_coord_h2j_pl->eta Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_coord_h2j_pl~~CalledByGraph proc~whm_coord_h2j_pl whm_coord_h2j_pl interface~whm_coord_h2j_pl whm_coord_h2j_pl interface~whm_coord_h2j_pl->proc~whm_coord_h2j_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_coord_h2j_pl.html"},{"title":"whm_coord_j2h_pl – swiftest","text":"module subroutine whm_coord_j2h_pl(self, cb) Interface → Convert from Jacobi to heliocentric coordinates, massive bodies only. Uses pre-computed eta rather than computing it each time Adapted from David E. Kaufmann's Swifter routine coord_j2h.f90 Adapted from Hal Levison's Swift routine coord_j2h.f Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree Calls proc~~whm_coord_j2h_pl~~CallsGraph proc~whm_coord_j2h_pl whm_coord_j2h_pl vj vj proc~whm_coord_j2h_pl->vj vh vh proc~whm_coord_j2h_pl->vh xj xj proc~whm_coord_j2h_pl->xj xh xh proc~whm_coord_j2h_pl->xh gmpl gmpl proc~whm_coord_j2h_pl->gmpl eta eta proc~whm_coord_j2h_pl->eta Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_coord_j2h_pl~~CalledByGraph proc~whm_coord_j2h_pl whm_coord_j2h_pl interface~whm_coord_j2h_pl whm_coord_j2h_pl interface~whm_coord_j2h_pl->proc~whm_coord_j2h_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_coord_j2h_pl.html"},{"title":"whm_coord_vh2vj_pl – swiftest","text":"module subroutine whm_coord_vh2vj_pl(self, cb) Interface → Convert from heliocentric to Jadcobi coordinates, massive body velocities only Uses pre-computed eta rather than computing it each time Adapted from David E. Kaufmann's Swifter routine coord_vh2vj.f90 Adapted from Hal Levison's Swift routine coord_vh2vj.f Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree Calls proc~~whm_coord_vh2vj_pl~~CallsGraph proc~whm_coord_vh2vj_pl whm_coord_vh2vj_pl eta eta proc~whm_coord_vh2vj_pl->eta vj vj proc~whm_coord_vh2vj_pl->vj gmpl gmpl proc~whm_coord_vh2vj_pl->gmpl vh vh proc~whm_coord_vh2vj_pl->vh Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_coord_vh2vj_pl~~CalledByGraph proc~whm_coord_vh2vj_pl whm_coord_vh2vj_pl interface~whm_coord_vh2vj_pl whm_coord_vh2vj_pl interface~whm_coord_vh2vj_pl->proc~whm_coord_vh2vj_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_coord_vh2vj_pl.html"},{"title":"whm_gr_kick_getacch_pl – swiftest","text":"module subroutine whm_gr_kick_getacch_pl(self, param) Interface → Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~whm_gr_kick_getacch_pl~~CallsGraph proc~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_kick_getacch_pl~~CalledByGraph proc~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl interface~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl interface~whm_gr_kick_getacch_pl->proc~whm_gr_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_kick_getacch_pl.html"},{"title":"whm_gr_kick_getacch_tp – swiftest","text":"module subroutine whm_gr_kick_getacch_tp(self, param) Interface → Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~whm_gr_kick_getacch_tp~~CallsGraph proc~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_kick_getacch_tp~~CalledByGraph proc~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp interface~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp interface~whm_gr_kick_getacch_tp->proc~whm_gr_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_kick_getacch_tp.html"},{"title":"whm_gr_p4_pl – swiftest","text":"pure module subroutine whm_gr_p4_pl(self, param, dt) Interface → Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~whm_gr_p4_pl~~CallsGraph proc~whm_gr_p4_pl whm_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_p4_pl~~CalledByGraph proc~whm_gr_p4_pl whm_gr_p4_pl interface~whm_gr_p4_pl whm_gr_p4_pl interface~whm_gr_p4_pl->proc~whm_gr_p4_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_p4_pl.html"},{"title":"whm_gr_p4_tp – swiftest","text":"pure module subroutine whm_gr_p4_tp(self, param, dt) Interface → Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~whm_gr_p4_tp~~CallsGraph proc~whm_gr_p4_tp whm_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_p4_tp~~CalledByGraph proc~whm_gr_p4_tp whm_gr_p4_tp interface~whm_gr_p4_tp whm_gr_p4_tp interface~whm_gr_p4_tp->proc~whm_gr_p4_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_p4_tp.html"},{"title":"whm_step_system – swiftest","text":"module subroutine whm_step_system(self, param, t, dt) Interface → Step massive bodies and and active test particles ahead in heliocentric coordinates Adapted from Hal Levison's Swift routine step_kdk.f\n Adapted from David E. Kaufmann's Swifter routine whm_step.f90 Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~whm_step_system~~CalledByGraph proc~whm_step_system whm_step_system interface~whm_step_system whm_step_system interface~whm_step_system->proc~whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_step_system.html"},{"title":"whm_step_pl – swiftest","text":"module subroutine whm_step_pl(self, system, param, t, dt) Interface → Step planets ahead using kick-drift-kick algorithm Adapted from Hal Levison's Swift routine step_kdk_pl.f\n Adapted from David E. Kaufmann's Swifter routine whm_step_pl.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~whm_step_pl~~CalledByGraph proc~whm_step_pl whm_step_pl interface~whm_step_pl whm_step_pl interface~whm_step_pl->proc~whm_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_step_pl.html"},{"title":"whm_step_tp – swiftest","text":"module subroutine whm_step_tp(self, system, param, t, dt) Interface → Step active test particles ahead using kick-drift-kick algorithm Adapted from Hal Levison's Swift routine step_kdk_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_step_tp.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~whm_step_tp~~CalledByGraph proc~whm_step_tp whm_step_tp interface~whm_step_tp whm_step_tp interface~whm_step_tp->proc~whm_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_step_tp.html"},{"title":"whm_drift_pl – swiftest","text":"module subroutine whm_drift_pl(self, system, param, dt) Interface → Loop through planets and call Danby drift routine Adapted from Hal Levison's Swift routine drift.f\n Adapted from David E. Kaufmann's Swifter routine whm_drift.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~whm_drift_pl~~CallsGraph proc~whm_drift_pl whm_drift_pl drift_all drift_all proc~whm_drift_pl->drift_all util_exit util_exit proc~whm_drift_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_drift_pl~~CalledByGraph proc~whm_drift_pl whm_drift_pl interface~whm_drift_pl whm_drift_pl interface~whm_drift_pl->proc~whm_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_drift_pl.html"},{"title":"whm_kick_getacch_pl – swiftest","text":"module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of planets Adapted from Hal Levison's Swift routine getacch.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~whm_kick_getacch_pl~~CallsGraph proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah0 proc~whm_kick_getacch_ah1 whm_kick_getacch_ah1 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah1 proc~whm_kick_getacch_ah2 whm_kick_getacch_ah2 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_kick_getacch_pl~~CalledByGraph proc~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_pl.html"},{"title":"whm_kick_getacch_tp – swiftest","text":"module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of test particles Adapted from Hal Levison's Swift routine getacch_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_tp.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~whm_kick_getacch_tp~~CallsGraph proc~whm_kick_getacch_tp whm_kick_getacch_tp proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_tp->proc~whm_kick_getacch_ah0 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_kick_getacch_tp~~CalledByGraph proc~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp->proc~whm_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_tp.html"},{"title":"whm_kick_vh_pl – swiftest","text":"module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Interface → Kick heliocentric velocities of massive bodies Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f \n Adapted from David E. Kaufmann's Swifter routine whm_kickvh.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~whm_kick_vh_pl~~CalledByGraph proc~whm_kick_vh_pl whm_kick_vh_pl interface~whm_kick_vh_pl whm_kick_vh_pl interface~whm_kick_vh_pl->proc~whm_kick_vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_vh_pl.html"},{"title":"whm_kick_vh_tp – swiftest","text":"module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Interface → Kick heliocentric velocities of test particles Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kickvh_tp.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~whm_kick_vh_tp~~CalledByGraph proc~whm_kick_vh_tp whm_kick_vh_tp interface~whm_kick_vh_tp whm_kick_vh_tp interface~whm_kick_vh_tp->proc~whm_kick_vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_vh_tp.html"},{"title":"whm_setup_pl – swiftest","text":"module subroutine whm_setup_pl(self, n, param) Interface → Allocate WHM planet structure Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90\n Call allocation method for parent class Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter Calls proc~~whm_setup_pl~~CallsGraph proc~whm_setup_pl whm_setup_pl setup_pl setup_pl proc~whm_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_setup_pl~~CalledByGraph proc~whm_setup_pl whm_setup_pl interface~whm_setup_pl whm_setup_pl interface~whm_setup_pl->proc~whm_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_setup_pl.html"},{"title":"whm_util_set_mu_eta_pl – swiftest","text":"module subroutine whm_util_set_mu_eta_pl(self, cb) Interface → Sets the Jacobi mass value eta for all massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM system object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Calls proc~~whm_util_set_mu_eta_pl~~CallsGraph proc~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl util_set_mu_pl util_set_mu_pl proc~whm_util_set_mu_eta_pl->util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_set_mu_eta_pl~~CalledByGraph proc~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl interface~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl interface~whm_util_set_mu_eta_pl->proc~whm_util_set_mu_eta_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_set_mu_eta_pl.html"},{"title":"whm_setup_initialize_system – swiftest","text":"module subroutine whm_setup_initialize_system(self, param) Interface → Initialize a WHM nbody system from files Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~whm_setup_initialize_system~~CallsGraph proc~whm_setup_initialize_system whm_setup_initialize_system util_set_ir3h util_set_ir3h proc~whm_setup_initialize_system->util_set_ir3h setup_initialize_system setup_initialize_system proc~whm_setup_initialize_system->setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_setup_initialize_system~~CalledByGraph proc~whm_setup_initialize_system whm_setup_initialize_system interface~whm_setup_initialize_system whm_setup_initialize_system interface~whm_setup_initialize_system->proc~whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_setup_initialize_system.html"},{"title":"whm_util_append_pl – swiftest","text":"module subroutine whm_util_append_pl(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~whm_util_append_pl~~CallsGraph proc~whm_util_append_pl whm_util_append_pl util_append util_append proc~whm_util_append_pl->util_append util_append_pl util_append_pl proc~whm_util_append_pl->util_append_pl util_exit util_exit proc~whm_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_append_pl~~CalledByGraph proc~whm_util_append_pl whm_util_append_pl interface~whm_util_append_pl whm_util_append_pl interface~whm_util_append_pl->proc~whm_util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_append_pl.html"},{"title":"whm_util_fill_pl – swiftest","text":"module subroutine whm_util_fill_pl(self, inserts, lfill_list) Interface → Insert new WHM test particle structure into an old one. \n This is the inverse of a fill operation. Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~whm_util_fill_pl~~CallsGraph proc~whm_util_fill_pl whm_util_fill_pl util_fill_pl util_fill_pl proc~whm_util_fill_pl->util_fill_pl util_fill util_fill proc~whm_util_fill_pl->util_fill util_exit util_exit proc~whm_util_fill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_fill_pl~~CalledByGraph proc~whm_util_fill_pl whm_util_fill_pl interface~whm_util_fill_pl whm_util_fill_pl interface~whm_util_fill_pl->proc~whm_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_fill_pl.html"},{"title":"whm_util_resize_pl – swiftest","text":"module subroutine whm_util_resize_pl(self, nnew) Interface → Checks the current size of a massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~whm_util_resize_pl~~CallsGraph proc~whm_util_resize_pl whm_util_resize_pl util_resize util_resize proc~whm_util_resize_pl->util_resize util_resize_pl util_resize_pl proc~whm_util_resize_pl->util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_resize_pl~~CalledByGraph proc~whm_util_resize_pl whm_util_resize_pl interface~whm_util_resize_pl whm_util_resize_pl interface~whm_util_resize_pl->proc~whm_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_resize_pl.html"},{"title":"whm_util_set_ir3j – swiftest","text":"module subroutine whm_util_set_ir3j(self) Interface → Sets the inverse Jacobi and heliocentric radii cubed (1/rj 3 and 1/rh 3) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object Called by proc~~whm_util_set_ir3j~~CalledByGraph proc~whm_util_set_ir3j whm_util_set_ir3j interface~whm_util_set_ir3j whm_util_set_ir3j interface~whm_util_set_ir3j->proc~whm_util_set_ir3j Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_set_ir3j.html"},{"title":"whm_util_sort_pl – swiftest","text":"module subroutine whm_util_sort_pl(self, sortby, ascending) Interface → Sort a WHM massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~whm_util_sort_pl~~CallsGraph proc~whm_util_sort_pl whm_util_sort_pl util_sort_pl util_sort_pl proc~whm_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_sort_pl~~CalledByGraph proc~whm_util_sort_pl whm_util_sort_pl interface~whm_util_sort_pl whm_util_sort_pl interface~whm_util_sort_pl->proc~whm_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_sort_pl.html"},{"title":"whm_util_sort_rearrange_pl – swiftest","text":"module subroutine whm_util_sort_rearrange_pl(self, ind) Interface → Rearrange WHM massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~whm_util_sort_rearrange_pl~~CallsGraph proc~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~whm_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~whm_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_sort_rearrange_pl~~CalledByGraph proc~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl interface~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl interface~whm_util_sort_rearrange_pl->proc~whm_util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_sort_rearrange_pl.html"},{"title":"whm_util_spill_pl – swiftest","text":"module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) WHM test particle structure from active list to discard list Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~whm_util_spill_pl~~CallsGraph proc~whm_util_spill_pl whm_util_spill_pl util_spill util_spill proc~whm_util_spill_pl->util_spill util_spill_pl util_spill_pl proc~whm_util_spill_pl->util_spill_pl util_exit util_exit proc~whm_util_spill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_spill_pl~~CalledByGraph proc~whm_util_spill_pl whm_util_spill_pl interface~whm_util_spill_pl whm_util_spill_pl interface~whm_util_spill_pl->proc~whm_util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_spill_pl.html"},{"title":"operator_cross_sp – swiftest","text":"pure function operator_cross_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_sp.html"},{"title":"operator_cross_dp – swiftest","text":"pure function operator_cross_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_dp.html"},{"title":"operator_cross_qp – swiftest","text":"pure function operator_cross_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_qp.html"},{"title":"operator_cross_i1b – swiftest","text":"pure function operator_cross_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i1b.html"},{"title":"operator_cross_i2b – swiftest","text":"pure function operator_cross_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i2b.html"},{"title":"operator_cross_i4b – swiftest","text":"pure function operator_cross_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i4b.html"},{"title":"operator_cross_i8b – swiftest","text":"pure function operator_cross_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i8b.html"},{"title":"operator_cross_el_sp – swiftest","text":"pure function operator_cross_el_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_sp.html"},{"title":"operator_cross_el_dp – swiftest","text":"pure function operator_cross_el_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_dp.html"},{"title":"operator_cross_el_qp – swiftest","text":"pure function operator_cross_el_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_qp.html"},{"title":"operator_cross_el_i1b – swiftest","text":"pure function operator_cross_el_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i1b.html"},{"title":"operator_cross_el_i2b – swiftest","text":"pure function operator_cross_el_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i2b.html"},{"title":"operator_cross_el_i4b – swiftest","text":"pure function operator_cross_el_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i4b.html"},{"title":"operator_cross_el_i8b – swiftest","text":"pure function operator_cross_el_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i8b.html"},{"title":"operator_mag_sp – swiftest","text":"pure function operator_mag_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) Contents None","tags":"","loc":"proc/operator_mag_sp.html"},{"title":"operator_mag_dp – swiftest","text":"pure function operator_mag_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) Contents None","tags":"","loc":"proc/operator_mag_dp.html"},{"title":"operator_mag_el_sp – swiftest","text":"pure function operator_mag_el_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/operator_mag_el_sp.html"},{"title":"operator_mag_el_dp – swiftest","text":"pure function operator_mag_el_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/operator_mag_el_dp.html"},{"title":"operator_mag_el_qp – swiftest","text":"pure function operator_mag_el_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/operator_mag_el_qp.html"},{"title":"util_solve_linear_system_d – swiftest","text":"function util_solve_linear_system_d(A, b, n, lerr) result(x) Uses ieee_exceptions proc~~util_solve_linear_system_d~~UsesGraph proc~util_solve_linear_system_d util_solve_linear_system_d ieee_exceptions ieee_exceptions proc~util_solve_linear_system_d->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) Calls proc~~util_solve_linear_system_d~~CallsGraph proc~util_solve_linear_system_d util_solve_linear_system_d proc~solve_wbs solve_wbs proc~util_solve_linear_system_d->proc~solve_wbs proc~ge_wpp ge_wpp proc~util_solve_linear_system_d->proc~ge_wpp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_solve_linear_system_d.html"},{"title":"util_solve_linear_system_q – swiftest","text":"function util_solve_linear_system_q(A, b, n, lerr) result(x) Uses ieee_exceptions proc~~util_solve_linear_system_q~~UsesGraph proc~util_solve_linear_system_q util_solve_linear_system_q ieee_exceptions ieee_exceptions proc~util_solve_linear_system_q->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n) Calls proc~~util_solve_linear_system_q~~CallsGraph proc~util_solve_linear_system_q util_solve_linear_system_q proc~solve_wbs solve_wbs proc~util_solve_linear_system_q->proc~solve_wbs proc~ge_wpp ge_wpp proc~util_solve_linear_system_q->proc~ge_wpp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_solve_linear_system_q.html"},{"title":"util_solve_rkf45 – swiftest","text":"module function util_solve_rkf45(f, y0in, t1, dt0, tol) result(y1) Interface → Implements the 4th order Runge-Kutta-Fehlberg ODE solver for initial value problems of the form f=dy/dt, y0 = y(t=0), solving for y1 = y(t=t1). Uses a 5th order adaptive step size control.\n Uses a lambda function object as defined in the lambda_function module Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:),allocatable Final result Calls proc~~util_solve_rkf45~~CallsGraph proc~util_solve_rkf45 util_solve_rkf45 interface~util_exit util_exit proc~util_solve_rkf45->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_solve_rkf45~~CalledByGraph proc~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_solve_rkf45.html"},{"title":"util_set_beg_end_pl – swiftest","text":"module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Interface → Sets one or more of the values of xbeg, xend, and vbeg Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg real(kind=DP), intent(in), optional dimension(:,:) :: xend real(kind=DP), intent(in), optional dimension(:,:) :: vbeg Called by proc~~util_set_beg_end_pl~~CalledByGraph proc~util_set_beg_end_pl util_set_beg_end_pl interface~util_set_beg_end_pl util_set_beg_end_pl interface~util_set_beg_end_pl->proc~util_set_beg_end_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_beg_end_pl.html"},{"title":"util_set_ir3h – swiftest","text":"module subroutine util_set_ir3h(self) Interface → Sets the inverse heliocentric radius term (1/rh**3) for all bodies in a structure Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object Called by proc~~util_set_ir3h~~CalledByGraph proc~util_set_ir3h util_set_ir3h interface~util_set_ir3h util_set_ir3h interface~util_set_ir3h->proc~util_set_ir3h Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_ir3h.html"},{"title":"util_set_msys – swiftest","text":"module subroutine util_set_msys(self) Interface → Sets the value of msys and the vector mass quantities based on the total mass of the system Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nobdy system object Called by proc~~util_set_msys~~CalledByGraph proc~util_set_msys util_set_msys interface~util_set_msys util_set_msys interface~util_set_msys->proc~util_set_msys Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_msys.html"},{"title":"util_set_mu_pl – swiftest","text":"module subroutine util_set_mu_pl(self, cb) Interface → Computes G * (M + m) for each massive body Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_mu_pl~~CalledByGraph proc~util_set_mu_pl util_set_mu_pl interface~util_set_mu_pl util_set_mu_pl interface~util_set_mu_pl->proc~util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_mu_pl.html"},{"title":"util_set_mu_tp – swiftest","text":"module subroutine util_set_mu_tp(self, cb) Interface → Converts certain scalar values to arrays so that they can be used in elemental functions Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_mu_tp~~CalledByGraph proc~util_set_mu_tp util_set_mu_tp interface~util_set_mu_tp util_set_mu_tp interface~util_set_mu_tp->proc~util_set_mu_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_mu_tp.html"},{"title":"util_set_particle_info – swiftest","text":"module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Interface → Sets one or more values of the particle information metadata object Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: ACTIVE, MERGED, FRAGMENTED, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) Called by proc~~util_set_particle_info~~CalledByGraph proc~util_set_particle_info util_set_particle_info interface~util_set_particle_info util_set_particle_info interface~util_set_particle_info->proc~util_set_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_particle_info.html"},{"title":"util_set_rhill – swiftest","text":"module subroutine util_set_rhill(self, cb) Interface → Sets the value of the Hill's radius Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_rhill~~CalledByGraph proc~util_set_rhill util_set_rhill interface~util_set_rhill util_set_rhill interface~util_set_rhill->proc~util_set_rhill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_rhill.html"},{"title":"util_set_rhill_approximate – swiftest","text":"module subroutine util_set_rhill_approximate(self, cb) Interface → Sets the approximate value of the Hill's radius using the heliocentric radius instead of computing the semimajor axis Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_rhill_approximate~~CalledByGraph proc~util_set_rhill_approximate util_set_rhill_approximate interface~util_set_rhill_approximate util_set_rhill_approximate interface~util_set_rhill_approximate->proc~util_set_rhill_approximate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_rhill_approximate.html"},{"title":"util_peri_tp – swiftest","text":"module subroutine util_peri_tp(self, system, param) Interface → Determine system pericenter passages for test particles\n Note:  If the coordinate system used is barycentric, then this routine assumes that the barycentric coordinates in the\n        test particle structures are up-to-date and are not recomputed Adapted from David E. Kaufmann's Swifter routine: util_peri.f90\n Adapted from Hal Levison's Swift routine util_peri.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~util_peri_tp~~CallsGraph proc~util_peri_tp util_peri_tp interface~orbel_xv2aeq orbel_xv2aeq proc~util_peri_tp->interface~orbel_xv2aeq proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_peri_tp~~CalledByGraph proc~util_peri_tp util_peri_tp interface~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_peri_tp.html"},{"title":"util_coord_h2b_pl – swiftest","text":"module subroutine util_coord_h2b_pl(self, cb) Interface → Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 \n Adapted from Hal Levison's Swift routine coord_h2b.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_h2b_pl~~CalledByGraph proc~util_coord_h2b_pl util_coord_h2b_pl interface~util_coord_h2b_pl util_coord_h2b_pl interface~util_coord_h2b_pl->proc~util_coord_h2b_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_h2b_pl.html"},{"title":"util_coord_h2b_tp – swiftest","text":"module subroutine util_coord_h2b_tp(self, cb) Interface → Convert test particles from heliocentric to barycentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 \n Adapted from Hal Levison's Swift routine coord_h2b_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object Called by proc~~util_coord_h2b_tp~~CalledByGraph proc~util_coord_h2b_tp util_coord_h2b_tp interface~util_coord_h2b_tp util_coord_h2b_tp interface~util_coord_h2b_tp->proc~util_coord_h2b_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_h2b_tp.html"},{"title":"util_coord_b2h_pl – swiftest","text":"module subroutine util_coord_b2h_pl(self, cb) Interface → Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_b2h.f90 \n Adapted from Hal Levison's Swift routine coord_b2h.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_b2h_pl~~CalledByGraph proc~util_coord_b2h_pl util_coord_b2h_pl interface~util_coord_b2h_pl util_coord_b2h_pl interface~util_coord_b2h_pl->proc~util_coord_b2h_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_b2h_pl.html"},{"title":"util_coord_b2h_tp – swiftest","text":"module subroutine util_coord_b2h_tp(self, cb) Interface → Convert test particles from barycentric to heliocentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_b2h_tp.f90 \n Adapted from Hal Levison's Swift routine coord_b2h_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(in) :: cb Swiftest central body object Called by proc~~util_coord_b2h_tp~~CalledByGraph proc~util_coord_b2h_tp util_coord_b2h_tp interface~util_coord_b2h_tp util_coord_b2h_tp interface~util_coord_b2h_tp->proc~util_coord_b2h_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_b2h_tp.html"},{"title":"util_coord_vb2vh_pl – swiftest","text":"module subroutine util_coord_vb2vh_pl(self, cb) Interface → Convert massive bodies from barycentric to heliocentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vb2vh.f90 \n Adapted from Hal Levison's Swift routine coord_vb2vh.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_vb2vh_pl~~CalledByGraph proc~util_coord_vb2vh_pl util_coord_vb2vh_pl interface~util_coord_vb2vh_pl util_coord_vb2vh_pl interface~util_coord_vb2vh_pl->proc~util_coord_vb2vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vb2vh_pl.html"},{"title":"util_coord_vb2vh_tp – swiftest","text":"module subroutine util_coord_vb2vh_tp(self, vbcb) Interface → Convert test particles from barycentric to heliocentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vb2vh_tp.f90 \n Adapted from Hal Levison's Swift routine coord_vb2h_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body Called by proc~~util_coord_vb2vh_tp~~CalledByGraph proc~util_coord_vb2vh_tp util_coord_vb2vh_tp interface~util_coord_vb2vh_tp util_coord_vb2vh_tp interface~util_coord_vb2vh_tp->proc~util_coord_vb2vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vb2vh_tp.html"},{"title":"util_coord_vh2vb_pl – swiftest","text":"module subroutine util_coord_vh2vb_pl(self, cb) Interface → Convert massive bodies from heliocentric to barycentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vh2vb.f90 \n Adapted from Hal Levison's Swift routine coord_vh2b.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_vh2vb_pl~~CalledByGraph proc~util_coord_vh2vb_pl util_coord_vh2vb_pl interface~util_coord_vh2vb_pl util_coord_vh2vb_pl interface~util_coord_vh2vb_pl->proc~util_coord_vh2vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vh2vb_pl.html"},{"title":"util_coord_vh2vb_tp – swiftest","text":"module subroutine util_coord_vh2vb_tp(self, vbcb) Interface → Convert test particles from heliocentric to barycentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vh2vb_tp.f90\n Adapted from Hal Levison's Swift routine coord_vh2b_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body Called by proc~~util_coord_vh2vb_tp~~CalledByGraph proc~util_coord_vh2vb_tp util_coord_vh2vb_tp interface~util_coord_vh2vb_tp util_coord_vh2vb_tp interface~util_coord_vh2vb_tp->proc~util_coord_vh2vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vh2vb_tp.html"},{"title":"util_coord_xh2xb_pl – swiftest","text":"module subroutine util_coord_xh2xb_pl(self, cb) Interface → Convert position vectors of massive bodies from heliocentric to barycentric coordinates (position only) Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 \n Adapted from Hal Levison's Swift routine coord_h2b.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_xh2xb_pl~~CalledByGraph proc~util_coord_xh2xb_pl util_coord_xh2xb_pl interface~util_coord_xh2xb_pl util_coord_xh2xb_pl interface~util_coord_xh2xb_pl->proc~util_coord_xh2xb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_xh2xb_pl.html"},{"title":"util_coord_xh2xb_tp – swiftest","text":"module subroutine util_coord_xh2xb_tp(self, cb) Interface → Convert test particles from heliocentric to barycentric coordinates (position only) Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 \n Adapted from Hal Levison's Swift routine coord_h2b_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object Called by proc~~util_coord_xh2xb_tp~~CalledByGraph proc~util_coord_xh2xb_tp util_coord_xh2xb_tp interface~util_coord_xh2xb_tp util_coord_xh2xb_tp interface~util_coord_xh2xb_tp->proc~util_coord_xh2xb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_xh2xb_tp.html"},{"title":"util_index_eucl_plpl – swiftest","text":"module subroutine util_index_eucl_plpl(self, param) Interface → Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions. Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~util_index_eucl_plpl~~CalledByGraph proc~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl->proc~util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_index_eucl_plpl.html"},{"title":"util_index_eucl_pltp – swiftest","text":"module subroutine util_index_eucl_pltp(self, pl, param) Interface → Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~util_index_eucl_pltp~~CalledByGraph proc~util_index_eucl_pltp util_index_eucl_pltp interface~util_index_eucl_pltp util_index_eucl_pltp interface~util_index_eucl_pltp->proc~util_index_eucl_pltp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_index_eucl_pltp.html"},{"title":"util_rescale_system – swiftest","text":"module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Interface → Rescales an nbody system to a new set of units. Inputs are the multipliers on the mass (mscale), distance (dscale), and time units (tscale). \n Rescales all united quantities in the system, as well as the mass conversion factors, gravitational constant, and Einstein's constant in the parameter object. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. Called by proc~~util_rescale_system~~CalledByGraph proc~util_rescale_system util_rescale_system interface~util_rescale_system util_rescale_system interface~util_rescale_system->proc~util_rescale_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_rescale_system.html"},{"title":"util_version – swiftest","text":"module subroutine util_version() Interface → Print program version information to terminale Adapted from David E. Kaufmann's Swifter routine: util_version.f90 Arguments None Called by proc~~util_version~~CalledByGraph proc~util_version util_version interface~util_version util_version interface~util_version->proc~util_version proc~io_get_args io_get_args proc~io_get_args->interface~util_version interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_version.html"},{"title":"util_sort_body – swiftest","text":"module subroutine util_sort_body(self, sortby, ascending) Interface → Sort a Swiftest body structure in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Called by proc~~util_sort_body~~CalledByGraph proc~util_sort_body util_sort_body interface~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body proc~util_sort_tp util_sort_tp proc~util_sort_tp->interface~util_sort_body proc~util_sort_pl util_sort_pl proc~util_sort_pl->interface~util_sort_body interface~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl interface~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_body.html"},{"title":"util_sort_dp – swiftest","text":"subroutine util_sort_dp(arr) Sort input double precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr Contents None","tags":"","loc":"proc/util_sort_dp.html"},{"title":"util_sort_index_dp – swiftest","text":"subroutine util_sort_index_dp(arr, ind) Sort input double precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind Contents None","tags":"","loc":"proc/util_sort_index_dp.html"},{"title":"util_sort_i4b – swiftest","text":"subroutine util_sort_i4b(arr) Sort input integer array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr Contents None","tags":"","loc":"proc/util_sort_i4b.html"},{"title":"util_sort_index_i4b – swiftest","text":"subroutine util_sort_index_i4b(arr, ind) Sort input integer array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind Contents None","tags":"","loc":"proc/util_sort_index_i4b.html"},{"title":"util_sort_sp – swiftest","text":"subroutine util_sort_sp(arr) Sort input single precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr Contents None","tags":"","loc":"proc/util_sort_sp.html"},{"title":"util_sort_index_sp – swiftest","text":"subroutine util_sort_index_sp(arr, ind) Sort input single precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind Contents None","tags":"","loc":"proc/util_sort_index_sp.html"},{"title":"util_sort_pl – swiftest","text":"module subroutine util_sort_pl(self, sortby, ascending) Interface → Sort a Swiftest massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~util_sort_pl~~CallsGraph proc~util_sort_pl util_sort_pl interface~util_sort_body util_sort_body proc~util_sort_pl->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_pl~~CalledByGraph proc~util_sort_pl util_sort_pl interface~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_pl.html"},{"title":"util_sort_tp – swiftest","text":"module subroutine util_sort_tp(self, sortby, ascending) Interface → Sort a Swiftest test particle object  in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~util_sort_tp~~CallsGraph proc~util_sort_tp util_sort_tp interface~util_sort_body util_sort_body proc~util_sort_tp->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_tp~~CalledByGraph proc~util_sort_tp util_sort_tp interface~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_tp.html"},{"title":"util_sort_rearrange_body – swiftest","text":"module subroutine util_sort_rearrange_body(self, ind) Interface → Rearrange Swiftest body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~util_sort_rearrange_body~~CallsGraph proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_rearrange_body~~CalledByGraph proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body proc~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_body.html"},{"title":"util_sort_rearrange_arr_char_string – swiftest","text":"subroutine util_sort_rearrange_arr_char_string(arr, ind, n) Rearrange a single array of character string in-place from an index list. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_char_string.html"},{"title":"util_sort_rearrange_arr_DP – swiftest","text":"subroutine util_sort_rearrange_arr_DP(arr, ind, n) Rearrange a single array of DP type in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_dp.html"},{"title":"util_sort_rearrange_arr_DPvec – swiftest","text":"subroutine util_sort_rearrange_arr_DPvec(arr, ind, n) Rearrange a single array of (NDIM,n) DP-type vectors in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_dpvec.html"},{"title":"util_sort_rearrange_arr_I4B – swiftest","text":"subroutine util_sort_rearrange_arr_I4B(arr, ind, n) Rearrange a single array of integers in-place from an index list. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_i4b.html"},{"title":"util_sort_rearrange_arr_logical – swiftest","text":"subroutine util_sort_rearrange_arr_logical(arr, ind, n) Rearrange a single array of logicals in-place from an index list. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_logical.html"},{"title":"util_sort_rearrange_arr_info – swiftest","text":"subroutine util_sort_rearrange_arr_info(arr, ind, n) Rearrange a single array of particle information type in-place from an index list. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Calls proc~~util_sort_rearrange_arr_info~~CallsGraph proc~util_sort_rearrange_arr_info util_sort_rearrange_arr_info interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_sort_rearrange_arr_info->interface~util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_info.html"},{"title":"util_sort_rearrange_pl – swiftest","text":"module subroutine util_sort_rearrange_pl(self, ind) Interface → Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~util_sort_rearrange_pl~~CallsGraph proc~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_pl->interface~util_sort_rearrange~2 proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_rearrange_pl~~CalledByGraph proc~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_pl.html"},{"title":"util_sort_rearrange_tp – swiftest","text":"module subroutine util_sort_rearrange_tp(self, ind) Interface → Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~util_sort_rearrange_tp~~CallsGraph proc~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_tp->interface~util_sort_rearrange~2 proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_rearrange_tp~~CalledByGraph proc~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_tp.html"},{"title":"util_spill_arr_char_string – swiftest","text":"subroutine util_spill_arr_char_string(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_char_string.html"},{"title":"util_spill_arr_DP – swiftest","text":"subroutine util_spill_arr_DP(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_dp.html"},{"title":"util_spill_arr_DPvec – swiftest","text":"subroutine util_spill_arr_DPvec(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_dpvec.html"},{"title":"util_spill_arr_I4B – swiftest","text":"subroutine util_spill_arr_I4B(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_i4b.html"},{"title":"util_spill_arr_I8B – swiftest","text":"subroutine util_spill_arr_I8B(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_i8b.html"},{"title":"util_spill_arr_info – swiftest","text":"subroutine util_spill_arr_info(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~util_spill_arr_info~~CallsGraph proc~util_spill_arr_info util_spill_arr_info interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_spill_arr_info->interface~util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_arr_info.html"},{"title":"util_spill_arr_logical – swiftest","text":"subroutine util_spill_arr_logical(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or no Contents None","tags":"","loc":"proc/util_spill_arr_logical.html"},{"title":"util_spill_body – swiftest","text":"module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest generic particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_body~~CallsGraph proc~util_spill_body util_spill_body interface~util_spill~2 util_spill proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_body~~CalledByGraph proc~util_spill_body util_spill_body interface~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_tp util_spill_tp proc~util_spill_tp->interface~util_spill_body proc~util_spill_pl util_spill_pl proc~util_spill_pl->interface~util_spill_body interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_body.html"},{"title":"util_spill_encounter – swiftest","text":"module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest encounter structure from active list to discard list Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_encounter~~CallsGraph proc~util_spill_encounter util_spill_encounter interface~util_spill~2 util_spill proc~util_spill_encounter->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_encounter~~CalledByGraph proc~util_spill_encounter util_spill_encounter interface~util_spill_encounter util_spill_encounter interface~util_spill_encounter->proc~util_spill_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_encounter.html"},{"title":"util_spill_pl – swiftest","text":"module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest massive body structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_pl~~CallsGraph proc~util_spill_pl util_spill_pl interface~util_spill~2 util_spill proc~util_spill_pl->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_pl->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_pl~~CalledByGraph proc~util_spill_pl util_spill_pl interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_pl.html"},{"title":"util_spill_tp – swiftest","text":"module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardse logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_tp~~CallsGraph proc~util_spill_tp util_spill_tp interface~util_spill~2 util_spill proc~util_spill_tp->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_tp->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_tp~~CalledByGraph proc~util_spill_tp util_spill_tp interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_tp.html"},{"title":"util_valid_id_system – swiftest","text":"module subroutine util_valid_id_system(self, param) Interface → Validate massive body and test particle ids\n Subroutine causes program to exit with error if any ids are not unique Adapted from David E. Kaufmann's Swifter routine: util_valid.f90 Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~util_valid_id_system~~CallsGraph proc~util_valid_id_system util_valid_id_system interface~util_sort util_sort proc~util_valid_id_system->interface~util_sort interface~util_exit util_exit proc~util_valid_id_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_valid_id_system~~CalledByGraph proc~util_valid_id_system util_valid_id_system interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_valid_id_system.html"},{"title":"util_exit – swiftest","text":"module subroutine util_exit(code) Interface → Print termination message and exit program Adapted from David E. Kaufmann's Swifter routine: util_exit.f90\n Adapted from Hal Levison's Swift routine util_exit.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code Called by proc~~util_exit~~CalledByGraph proc~util_exit util_exit interface~util_exit util_exit interface~util_exit->proc~util_exit proc~io_write_hdr_system io_write_hdr_system proc~io_write_hdr_system->interface~util_exit proc~io_dump_base io_dump_base proc~io_dump_base->interface~util_exit interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb proc~io_get_args io_get_args proc~io_get_args->interface~util_exit proc~io_write_frame_system io_write_frame_system proc~io_write_frame_system->interface~util_exit proc~io_dump_particle_info_base io_dump_particle_info_base proc~io_dump_particle_info_base->interface~util_exit proc~io_write_frame_body io_write_frame_body proc~io_write_frame_body->interface~util_exit proc~io_write_encounter io_write_encounter proc~io_write_encounter->interface~util_exit proc~io_write_frame_encounter io_write_frame_encounter proc~io_write_frame_encounter->interface~util_exit proc~io_dump_particle_info io_dump_particle_info proc~io_dump_particle_info->interface~util_exit proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_exit proc~util_valid_id_system util_valid_id_system proc~util_valid_id_system->interface~util_exit proc~util_solve_rkf45 util_solve_rkf45 proc~util_solve_rkf45->interface~util_exit proc~io_read_particle_info_system io_read_particle_info_system proc~io_read_particle_info_system->interface~util_exit proc~io_read_in_cb io_read_in_cb proc~io_read_in_cb->interface~util_exit proc~io_read_frame_body io_read_frame_body proc~io_read_frame_body->interface~util_exit proc~io_read_in_particle_info io_read_in_particle_info proc~io_read_in_particle_info->interface~util_exit proc~io_write_discard io_write_discard proc~io_write_discard->interface~util_exit proc~io_read_encounter io_read_encounter proc~io_read_encounter->interface~util_exit proc~check check proc~check->interface~util_exit proc~io_conservation_report io_conservation_report proc~io_conservation_report->interface~util_exit proc~io_write_frame_cb io_write_frame_cb proc~io_write_frame_cb->interface~util_exit proc~setup_construct_system setup_construct_system proc~setup_construct_system->interface~util_exit proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_exit proc~io_read_frame_cb io_read_frame_cb proc~io_read_frame_cb->interface~util_exit proc~io_get_old_t_final_system io_get_old_t_final_system proc~io_get_old_t_final_system->interface~util_exit proc~io_dump_param io_dump_param proc~io_dump_param->interface~util_exit proc~io_read_in_param io_read_in_param proc~io_read_in_param->interface~util_exit interface~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system interface~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system interface~io_write_frame_body->proc~io_write_frame_body interface~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter interface~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system interface~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system interface~io_write_frame_cb->proc~io_write_frame_cb interface~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system interface~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard interface~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info interface~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 interface~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report interface~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base interface~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param interface~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info interface~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system interface~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_exit.html"},{"title":"util_fill_arr_char_string – swiftest","text":"subroutine util_fill_arr_char_string(keeps, inserts, lfill_list) Performs a fill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_char_string.html"},{"title":"util_fill_arr_DP – swiftest","text":"subroutine util_fill_arr_DP(keeps, inserts, lfill_list) Performs a fill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_dp.html"},{"title":"util_fill_arr_DPvec – swiftest","text":"subroutine util_fill_arr_DPvec(keeps, inserts, lfill_list) Performs a fill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_dpvec.html"},{"title":"util_fill_arr_I4B – swiftest","text":"subroutine util_fill_arr_I4B(keeps, inserts, lfill_list) Performs a fill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_i4b.html"},{"title":"util_fill_arr_info – swiftest","text":"subroutine util_fill_arr_info(keeps, inserts, lfill_list) Performs a fill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_arr_info~~CallsGraph proc~util_fill_arr_info util_fill_arr_info interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_fill_arr_info->interface~util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_arr_info.html"},{"title":"util_fill_arr_logical – swiftest","text":"subroutine util_fill_arr_logical(keeps, inserts, lfill_list) Performs a fill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_logical.html"},{"title":"util_fill_body – swiftest","text":"module subroutine util_fill_body(self, inserts, lfill_list) Interface → Insert new Swiftest generic particle structure into an old one. \n This is the inverse of a spill operation.\n Fill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_body~~CallsGraph proc~util_fill_body util_fill_body interface~util_fill~2 util_fill proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_fill_body~~CalledByGraph proc~util_fill_body util_fill_body interface~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_pl util_fill_pl proc~util_fill_pl->interface~util_fill_body proc~util_fill_tp util_fill_tp proc~util_fill_tp->interface~util_fill_body interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_body.html"},{"title":"util_fill_pl – swiftest","text":"module subroutine util_fill_pl(self, inserts, lfill_list) Interface → Insert new Swiftest massive body structure into an old one. \n This is the inverse of a spill operation.\n Fill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_pl~~CallsGraph proc~util_fill_pl util_fill_pl interface~util_fill~2 util_fill proc~util_fill_pl->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_pl->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_fill_pl~~CalledByGraph proc~util_fill_pl util_fill_pl interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_pl.html"},{"title":"util_fill_tp – swiftest","text":"module subroutine util_fill_tp(self, inserts, lfill_list) Interface → Insert new Swiftest test particle structure into an old one. \n This is the inverse of a fill operation.\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_tp~~CallsGraph proc~util_fill_tp util_fill_tp interface~util_fill~2 util_fill proc~util_fill_tp->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_tp->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_fill_tp~~CalledByGraph proc~util_fill_tp util_fill_tp interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_tp.html"},{"title":"util_resize_arr_char_string – swiftest","text":"subroutine util_resize_arr_char_string(arr, nnew) Resizes an array component of type character string. nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_char_string.html"},{"title":"util_resize_arr_DP – swiftest","text":"subroutine util_resize_arr_DP(arr, nnew) Resizes an array component of double precision type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_dp.html"},{"title":"util_resize_arr_DPvec – swiftest","text":"subroutine util_resize_arr_DPvec(arr, nnew) Resizes an array component of double precision vectors of size (NDIM, n). Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_dpvec.html"},{"title":"util_resize_arr_I4B – swiftest","text":"subroutine util_resize_arr_I4B(arr, nnew) Resizes an array component of integer type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_i4b.html"},{"title":"util_resize_arr_info – swiftest","text":"subroutine util_resize_arr_info(arr, nnew) Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_info.html"},{"title":"util_resize_arr_logical – swiftest","text":"subroutine util_resize_arr_logical(arr, nnew) Resizes an array component of logical type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_logical.html"},{"title":"util_resize_body – swiftest","text":"module subroutine util_resize_body(self, nnew) Interface → Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~util_resize_body~~CallsGraph proc~util_resize_body util_resize_body interface~util_resize~2 util_resize proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_resize_body~~CalledByGraph proc~util_resize_body util_resize_body interface~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_pl util_resize_pl proc~util_resize_pl->interface~util_resize_body proc~util_resize_tp util_resize_tp proc~util_resize_tp->interface~util_resize_body interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_body.html"},{"title":"util_resize_encounter – swiftest","text":"module subroutine util_resize_encounter(self, nnew) Interface → Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small.\n Note: The reason to extend it by a factor of 2 is for performance. When there are many enounters per step, resizing every time you want to add an \n encounter takes significant computational effort. Resizing by a factor of 2 is a tradeoff between performance (fewer resize calls) and memory managment\n Memory usage grows by a factor of 2 each time it fills up, but no more. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed Called by proc~~util_resize_encounter~~CalledByGraph proc~util_resize_encounter util_resize_encounter interface~util_resize_encounter util_resize_encounter interface~util_resize_encounter->proc~util_resize_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_encounter.html"},{"title":"util_resize_pl – swiftest","text":"module subroutine util_resize_pl(self, nnew) Interface → Checks the current size of a Swiftest massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~util_resize_pl~~CallsGraph proc~util_resize_pl util_resize_pl interface~util_resize_body util_resize_body proc~util_resize_pl->interface~util_resize_body interface~util_resize~2 util_resize proc~util_resize_pl->interface~util_resize~2 proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_resize_pl~~CalledByGraph proc~util_resize_pl util_resize_pl interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_pl.html"},{"title":"util_resize_tp – swiftest","text":"module subroutine util_resize_tp(self, nnew) Interface → Checks the current size of a Swiftest test particle against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~util_resize_tp~~CallsGraph proc~util_resize_tp util_resize_tp interface~util_resize_body util_resize_body proc~util_resize_tp->interface~util_resize_body interface~util_resize~2 util_resize proc~util_resize_tp->interface~util_resize~2 proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_resize_tp~~CalledByGraph proc~util_resize_tp util_resize_tp interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_tp.html"},{"title":"util_copy_encounter – swiftest","text":"module subroutine util_copy_encounter(self, source) Interface → Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into Called by proc~~util_copy_encounter~~CalledByGraph proc~util_copy_encounter util_copy_encounter interface~util_copy_encounter util_copy_encounter interface~util_copy_encounter->proc~util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_copy_encounter.html"},{"title":"util_copy_particle_info – swiftest","text":"module subroutine util_copy_particle_info(self, source) Interface → Copies one set of information object components into another, component-by-component Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source Called by proc~~util_copy_particle_info~~CalledByGraph proc~util_copy_particle_info util_copy_particle_info interface~util_copy_particle_info util_copy_particle_info interface~util_copy_particle_info->proc~util_copy_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_copy_particle_info.html"},{"title":"util_copy_particle_info_arr – swiftest","text":"module subroutine util_copy_particle_info_arr(source, dest, idx) Interface → Copies contents from an array of one particle information objects to another. Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object Called by proc~~util_copy_particle_info_arr~~CalledByGraph proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr proc~util_fill_arr_info util_fill_arr_info proc~util_fill_arr_info->interface~util_copy_particle_info_arr proc~util_spill_arr_info util_spill_arr_info proc~util_spill_arr_info->interface~util_copy_particle_info_arr proc~util_sort_rearrange_arr_info util_sort_rearrange_arr_info proc~util_sort_rearrange_arr_info->interface~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_copy_particle_info_arr.html"},{"title":"util_minimize_bfgs – swiftest","text":"module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1) Interface → Uses ieee_exceptions proc~~util_minimize_bfgs~~UsesGraph proc~util_minimize_bfgs util_minimize_bfgs ieee_exceptions ieee_exceptions proc~util_minimize_bfgs->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. This function implements the Broyden-Fletcher-Goldfarb-Shanno method to determine the minimum of a function of N variables. It recieves as input:\n   f%eval(x) : lambda function object containing the objective function as the eval metho\n   N       : Number of variables of function f\n   x0      : Initial starting value of x\n   eps     : Accuracy of 1 - dimensional minimization at each step\n   maxloop : Maximum number of loops to attempt to find a solution\n The outputs include\n   lerr :  Returns .true. if it could not find the minimum\n Returns\n   x1   :  Final minimum (all 0 if none found)\n   0 = No miniumum found Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:),allocatable Called by proc~~util_minimize_bfgs~~CalledByGraph proc~util_minimize_bfgs util_minimize_bfgs interface~util_minimize_bfgs util_minimize_bfgs interface~util_minimize_bfgs->proc~util_minimize_bfgs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_minimize_bfgs.html"},{"title":"util_append_arr_char_string – swiftest","text":"subroutine util_append_arr_char_string(arr, source, nold, nsrc, lsource_mask) Append a single array of character string type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_char_string~~CallsGraph proc~util_append_arr_char_string util_append_arr_char_string interface~util_resize~2 util_resize proc~util_append_arr_char_string->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_char_string.html"},{"title":"util_append_arr_DP – swiftest","text":"subroutine util_append_arr_DP(arr, source, nold, nsrc, lsource_mask) Append a single array of double precision type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_dp~~CallsGraph proc~util_append_arr_dp util_append_arr_DP interface~util_resize~2 util_resize proc~util_append_arr_dp->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_dp.html"},{"title":"util_append_arr_DPvec – swiftest","text":"subroutine util_append_arr_DPvec(arr, source, nold, nsrc, lsource_mask) Append a single array of double precision vector type of size (NDIM, n) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_dpvec~~CallsGraph proc~util_append_arr_dpvec util_append_arr_DPvec interface~util_resize~2 util_resize proc~util_append_arr_dpvec->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_dpvec.html"},{"title":"util_append_arr_I4B – swiftest","text":"subroutine util_append_arr_I4B(arr, source, nold, nsrc, lsource_mask) Append a single array of integer(I4B) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_i4b~~CallsGraph proc~util_append_arr_i4b util_append_arr_I4B interface~util_resize~2 util_resize proc~util_append_arr_i4b->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_i4b.html"},{"title":"util_append_arr_info – swiftest","text":"subroutine util_append_arr_info(arr, source, nold, nsrc, lsource_mask) Append a single array of particle information type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_info~~CallsGraph proc~util_append_arr_info util_append_arr_info interface~util_resize~2 util_resize proc~util_append_arr_info->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_info.html"},{"title":"util_append_arr_logical – swiftest","text":"subroutine util_append_arr_logical(arr, source, nold, nsrc, lsource_mask) Append a single array of logical type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_logical~~CallsGraph proc~util_append_arr_logical util_append_arr_logical interface~util_resize~2 util_resize proc~util_append_arr_logical->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_logical.html"},{"title":"util_append_body – swiftest","text":"module subroutine util_append_body(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_body~~CallsGraph proc~util_append_body util_append_body interface~util_append~2 util_append proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_body~~CalledByGraph proc~util_append_body util_append_body interface~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_append_body proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_append_body interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_body.html"},{"title":"util_append_encounter – swiftest","text":"module subroutine util_append_encounter(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_encounter~~CallsGraph proc~util_append_encounter util_append_encounter interface~util_append~2 util_append proc~util_append_encounter->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_encounter~~CalledByGraph proc~util_append_encounter util_append_encounter interface~util_append_encounter util_append_encounter interface~util_append_encounter->proc~util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_encounter.html"},{"title":"util_append_pl – swiftest","text":"module subroutine util_append_pl(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_pl~~CallsGraph proc~util_append_pl util_append_pl interface~util_append_body util_append_body proc~util_append_pl->interface~util_append_body interface~util_append~2 util_append proc~util_append_pl->interface~util_append~2 interface~util_exit util_exit proc~util_append_pl->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_pl~~CalledByGraph proc~util_append_pl util_append_pl interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_pl.html"},{"title":"util_append_tp – swiftest","text":"module subroutine util_append_tp(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_tp~~CallsGraph proc~util_append_tp util_append_tp interface~util_append_body util_append_body proc~util_append_tp->interface~util_append_body interface~util_append~2 util_append proc~util_append_tp->interface~util_append~2 interface~util_exit util_exit proc~util_append_tp->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_tp~~CalledByGraph proc~util_append_tp util_append_tp interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_tp.html"},{"title":"util_get_energy_momentum_system – swiftest","text":"module subroutine util_get_energy_momentum_system(self, param) Interface → Compute total system angular momentum vector and kinetic, potential and total system energy Adapted from David E. Kaufmann Swifter routine symba_energy_eucl.f90 Adapted from Martin Duncan's Swift routine anal_energy.f Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~util_get_energy_momentum_system~~CalledByGraph proc~util_get_energy_momentum_system util_get_energy_momentum_system interface~util_get_energy_momentum_system util_get_energy_momentum_system interface~util_get_energy_momentum_system->proc~util_get_energy_momentum_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_get_energy_momentum_system.html"},{"title":"gr_kick_getaccb_ns_body – swiftest","text":"pure module subroutine gr_kick_getaccb_ns_body(self, system, param) Interface → Add relativistic correction acceleration for non-symplectic integrators.\n Based on Quinn et al. (1991) eq. 5 Reference: Quinn, T.R., Tremaine, S., Duncan, M., 1991. A three million year integration of the earth’s orbit. \n       AJ 101, 2287–2305. https://doi.org/10.1086/115850 Adapted from David A. Minton's Swifter routine routine gr_kick_getaccb_ns.f90 Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~gr_kick_getaccb_ns_body~~CalledByGraph proc~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body interface~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body interface~gr_kick_getaccb_ns_body->proc~gr_kick_getaccb_ns_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_kick_getaccb_ns_body.html"},{"title":"gr_kick_getacch – swiftest","text":"module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) Interface → Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations Called by proc~~gr_kick_getacch~~CalledByGraph proc~gr_kick_getacch gr_kick_getacch interface~gr_kick_getacch gr_kick_getacch interface~gr_kick_getacch->proc~gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_kick_getacch.html"},{"title":"gr_p4_pos_kick – swiftest","text":"pure module subroutine gr_p4_pos_kick(param, x, v, dt) Interface → Position kick due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Reference:\n    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. \n       AJ 108, 1962–1969. https://doi.org/10.1086/117210 Adapted from David A. Minton's Swifter routine gr_whm_p4.f90 Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size Called by proc~~gr_p4_pos_kick~~CalledByGraph proc~gr_p4_pos_kick gr_p4_pos_kick interface~gr_p4_pos_kick gr_p4_pos_kick interface~gr_p4_pos_kick->proc~gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_p4_pos_kick.html"},{"title":"gr_pseudovel2vel – swiftest","text":"pure module subroutine gr_pseudovel2vel(param, mu, xh, pv, vh) Interface → Converts the relativistic pseudovelocity back into a veliocentric velocity\n    Based on Saha & Tremaine (1994) Eq. 32 Reference:\n    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. \n       AJ 108, 1962–1969. https://doi.org/10.1086/117210 Adapted from David A. Minton's Swifter routine gr_pseudovel2vel.f90 Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Heliocentric velocity vector Called by proc~~gr_pseudovel2vel~~CalledByGraph proc~gr_pseudovel2vel gr_pseudovel2vel interface~gr_pseudovel2vel gr_pseudovel2vel interface~gr_pseudovel2vel->proc~gr_pseudovel2vel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_pseudovel2vel.html"},{"title":"gr_pv2vh_body – swiftest","text":"pure module subroutine gr_pv2vh_body(self, param) Interface → Wrapper function that converts from pseudovelocity to heliocentric velocity for swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~gr_pv2vh_body~~CalledByGraph proc~gr_pv2vh_body gr_pv2vh_body interface~gr_pv2vh_body gr_pv2vh_body interface~gr_pv2vh_body->proc~gr_pv2vh_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_pv2vh_body.html"},{"title":"gr_vel2pseudovel – swiftest","text":"pure module subroutine gr_vel2pseudovel(param, mu, xh, vh, pv) Interface → Converts the heliocentric velocity into a pseudovelocity with relativistic corrections. \n Uses Newton-Raphson method with direct inversion of the Jacobian (yeah, it's slow, but \n this is only done once per run). Reference:\n    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. \n       AJ 108, 1962–1969. https://doi.org/10.1086/117210 Adapted from David A. Minton's Swifter routine gr_vel2pseudovel.f90 Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: vh Heliocentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) Called by proc~~gr_vel2pseudovel~~CalledByGraph proc~gr_vel2pseudovel gr_vel2pseudovel interface~gr_vel2pseudovel gr_vel2pseudovel interface~gr_vel2pseudovel->proc~gr_vel2pseudovel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_vel2pseudovel.html"},{"title":"gr_vh2pv_body – swiftest","text":"pure module subroutine gr_vh2pv_body(self, param) Interface → Wrapper function that converts from heliocentric velocity to pseudovelocity for Swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~gr_vh2pv_body~~CalledByGraph proc~gr_vh2pv_body gr_vh2pv_body interface~gr_vh2pv_body gr_vh2pv_body interface~gr_vh2pv_body->proc~gr_vh2pv_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_vh2pv_body.html"},{"title":"discard_system – swiftest","text":"module subroutine discard_system(self, param) Interface → Calls the discard methods for each body class and then the write method if any discards were detected Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~discard_system~~CalledByGraph proc~discard_system discard_system interface~discard_system discard_system interface~discard_system->proc~discard_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/discard_system.html"},{"title":"discard_pl – swiftest","text":"module subroutine discard_pl(self, system, param) Interface → Placeholder method for discarding massive bodies. This method does nothing except to ensure that the discard flag is set to false. \n  This method is intended to be overridden by more advanced integrators. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter Called by proc~~discard_pl~~CalledByGraph proc~discard_pl discard_pl interface~discard_pl discard_pl interface~discard_pl->proc~discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/discard_pl.html"},{"title":"discard_tp – swiftest","text":"module subroutine discard_tp(self, system, param) Interface → Check to see if particles should be discarded based on their positions relative to the massive bodies Adapted from David E. Kaufmann's Swifter routine: discard.f90\n Adapted from Hal Levison's Swift routine discard. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter Called by proc~~discard_tp~~CalledByGraph proc~discard_tp discard_tp interface~discard_tp discard_tp interface~discard_tp->proc~discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/discard_tp.html"},{"title":"helio_step_system – swiftest","text":"module subroutine helio_step_system(self, param, t, dt) Interface → Step massive bodies and and active test particles ahead in heliocentric coordinates. Currently there's no difference between this and the WHM system stepper, so this is just\n a wrapper function to keep the method calls consistent for inherited types. Adapted from Hal Levison's Swift routine step_kdk.f\n Adapted from David E. Kaufmann's Swifter routine helio_step.f90 Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Calls proc~~helio_step_system~~CallsGraph proc~helio_step_system helio_step_system whm_step_system whm_step_system proc~helio_step_system->whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_step_system~~CalledByGraph proc~helio_step_system helio_step_system interface~helio_step_system helio_step_system interface~helio_step_system->proc~helio_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_step_system.html"},{"title":"helio_step_pl – swiftest","text":"module subroutine helio_step_pl(self, system, param, t, dt) Interface → Step massive bodies ahead Democratic Heliocentric method Adapted from David E. Kaufmann's Swifter helio_step_pl.f90\n Adapted from Hal Levison's Swift routine helio_step_pl.f Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize Called by proc~~helio_step_pl~~CalledByGraph proc~helio_step_pl helio_step_pl interface~helio_step_pl helio_step_pl interface~helio_step_pl->proc~helio_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_step_pl.html"},{"title":"helio_step_tp – swiftest","text":"module subroutine helio_step_tp(self, system, param, t, dt) Interface → Step active test particles ahead using Democratic Heliocentric method Adapted from David E. Kaufmann's Swifter routine helio_step_tp.f90\n Adapted from Hal Levison's Swift routine helio_step_tp.f Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize Called by proc~~helio_step_tp~~CalledByGraph proc~helio_step_tp helio_step_tp interface~helio_step_tp helio_step_tp interface~helio_step_tp->proc~helio_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_step_tp.html"},{"title":"helio_setup_initialize_system – swiftest","text":"module subroutine helio_setup_initialize_system(self, param) Interface → Initialize a Helio nbody system from files, converting all heliocentric quantities to barycentric. Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~helio_setup_initialize_system~~CallsGraph proc~helio_setup_initialize_system helio_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~helio_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_setup_initialize_system~~CalledByGraph proc~helio_setup_initialize_system helio_setup_initialize_system interface~helio_setup_initialize_system helio_setup_initialize_system interface~helio_setup_initialize_system->proc~helio_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_setup_initialize_system.html"},{"title":"helio_gr_kick_getacch_pl – swiftest","text":"module subroutine helio_gr_kick_getacch_pl(self, param) Interface → Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~helio_gr_kick_getacch_pl~~CallsGraph proc~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_kick_getacch_pl~~CalledByGraph proc~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl interface~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl interface~helio_gr_kick_getacch_pl->proc~helio_gr_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_kick_getacch_pl.html"},{"title":"helio_gr_kick_getacch_tp – swiftest","text":"module subroutine helio_gr_kick_getacch_tp(self, param) Interface → Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_helio_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~helio_gr_kick_getacch_tp~~CallsGraph proc~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_kick_getacch_tp~~CalledByGraph proc~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp interface~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp interface~helio_gr_kick_getacch_tp->proc~helio_gr_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_kick_getacch_tp.html"},{"title":"helio_gr_p4_pl – swiftest","text":"pure module subroutine helio_gr_p4_pl(self, param, dt) Interface → Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~helio_gr_p4_pl~~CallsGraph proc~helio_gr_p4_pl helio_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_p4_pl~~CalledByGraph proc~helio_gr_p4_pl helio_gr_p4_pl interface~helio_gr_p4_pl helio_gr_p4_pl interface~helio_gr_p4_pl->proc~helio_gr_p4_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_p4_pl.html"},{"title":"helio_gr_p4_tp – swiftest","text":"pure module subroutine helio_gr_p4_tp(self, param, dt) Interface → Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~helio_gr_p4_tp~~CallsGraph proc~helio_gr_p4_tp helio_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_p4_tp~~CalledByGraph proc~helio_gr_p4_tp helio_gr_p4_tp interface~helio_gr_p4_tp helio_gr_p4_tp interface~helio_gr_p4_tp->proc~helio_gr_p4_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_p4_tp.html"},{"title":"helio_kick_getacch_pl – swiftest","text":"module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of massive bodies Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch.f90\n Adapted from Hal Levison's Swift routine helio_kick_getacch.f Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Called by proc~~helio_kick_getacch_pl~~CalledByGraph proc~helio_kick_getacch_pl helio_kick_getacch_pl interface~helio_kick_getacch_pl helio_kick_getacch_pl interface~helio_kick_getacch_pl->proc~helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_getacch_pl.html"},{"title":"helio_kick_getacch_tp – swiftest","text":"module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of test particles Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_tp.f90\n Adapted from Hal Levison's Swift routine helio_kick_getacch_tp.f Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Called by proc~~helio_kick_getacch_tp~~CalledByGraph proc~helio_kick_getacch_tp helio_kick_getacch_tp interface~helio_kick_getacch_tp helio_kick_getacch_tp interface~helio_kick_getacch_tp->proc~helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_getacch_tp.html"},{"title":"helio_kick_vb_pl – swiftest","text":"module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Interface → Kick barycentric velocities of bodies Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f \n Adapted from David E. Kaufmann's Swifter routine helio_kick_vb.f90 Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~helio_kick_vb_pl~~CalledByGraph proc~helio_kick_vb_pl helio_kick_vb_pl interface~helio_kick_vb_pl helio_kick_vb_pl interface~helio_kick_vb_pl->proc~helio_kick_vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_vb_pl.html"},{"title":"helio_kick_vb_tp – swiftest","text":"module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Interface → Kick barycentric velocities of bodies Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f\n Adapted from David E. Kaufmann's Swifter routine helio_kick_vb_tp.f90 Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~helio_kick_vb_tp~~CalledByGraph proc~helio_kick_vb_tp helio_kick_vb_tp interface~helio_kick_vb_tp helio_kick_vb_tp interface~helio_kick_vb_tp->proc~helio_kick_vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_vb_tp.html"},{"title":"helio_drift_body – swiftest","text":"module subroutine helio_drift_body(self, system, param, dt) Interface → Loop through bodies and call Danby drift routine on democratic heliocentric coordinates Adapted from David E. Kaufmann's Swifter routine helio_drift.f90\n Adapted from Hal Levison's Swift routine drift.f Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~helio_drift_body~~CallsGraph proc~helio_drift_body helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_drift_body~~CalledByGraph proc~helio_drift_body helio_drift_body interface~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body proc~helio_drift_pl helio_drift_pl proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_tp helio_drift_tp proc~helio_drift_tp->interface~helio_drift_body interface~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp interface~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_body.html"},{"title":"helio_drift_pl – swiftest","text":"module subroutine helio_drift_pl(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~helio_drift_pl~~CallsGraph proc~helio_drift_pl helio_drift_pl interface~helio_drift_body helio_drift_body proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_drift_pl~~CalledByGraph proc~helio_drift_pl helio_drift_pl interface~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_pl.html"},{"title":"helio_drift_tp – swiftest","text":"module subroutine helio_drift_tp(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~helio_drift_tp~~CallsGraph proc~helio_drift_tp helio_drift_tp interface~helio_drift_body helio_drift_body proc~helio_drift_tp->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_drift_tp~~CalledByGraph proc~helio_drift_tp helio_drift_tp interface~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_tp.html"},{"title":"helio_drift_linear_pl – swiftest","text":"module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Interface → Perform linear drift of massive bodies due to barycentric momentum of Sun Adapted from David E. Kaufmann's Swifter routine helio_lindrift.f90\n Adapted from Hal Levison's Swift routine helio_lindrift.f Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step Called by proc~~helio_drift_linear_pl~~CalledByGraph proc~helio_drift_linear_pl helio_drift_linear_pl interface~helio_drift_linear_pl helio_drift_linear_pl interface~helio_drift_linear_pl->proc~helio_drift_linear_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_linear_pl.html"},{"title":"helio_drift_linear_tp – swiftest","text":"module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Interface → Perform linear drift of test particles due to barycentric momentum of Sun\n New vectorized version included Adapted from David E. Kaufmann's Swifter routine helio_lindrift_tp.f90\n Adapted from Hal Levison's Swift routine helio_lindrift_tp.f Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particleb object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step Called by proc~~helio_drift_linear_tp~~CalledByGraph proc~helio_drift_linear_tp helio_drift_linear_tp interface~helio_drift_linear_tp helio_drift_linear_tp interface~helio_drift_linear_tp->proc~helio_drift_linear_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_linear_tp.html"},{"title":"io_get_args – swiftest","text":"module function io_get_args(integrator, param_file_name) result(ierr) Interface → Reads in the name of the parameter file from command line arguments. Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code Calls proc~~io_get_args~~CallsGraph proc~io_get_args io_get_args interface~io_toupper io_toupper proc~io_get_args->interface~io_toupper interface~util_exit util_exit proc~io_get_args->interface~util_exit interface~util_version util_version proc~io_get_args->interface~util_version proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_version util_version interface~util_version->proc~util_version Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_get_args~~CalledByGraph proc~io_get_args io_get_args interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_get_args.html"},{"title":"io_get_old_t_final_system – swiftest","text":"module function io_get_old_t_final_system(self, param) result(old_t_final) Interface → Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) Calls proc~~io_get_old_t_final_system~~CallsGraph proc~io_get_old_t_final_system io_get_old_t_final_system interface~util_exit util_exit proc~io_get_old_t_final_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_get_old_t_final_system~~CalledByGraph proc~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_get_old_t_final_system.html"},{"title":"io_get_token – swiftest","text":"module function io_get_token(buffer, ifirst, ilast, ierr) result(token) Interface → Retrieves a character token from an input string. Here a token is defined as any set of contiguous non-blank characters not \n beginning with or containing \"!\". If \"!\" is present, any remaining part of the buffer including the \"!\" is ignored Adapted from David E. Kaufmann's Swifter routine io_get_token.f90\n Bad input\n No valid token Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string Called by proc~~io_get_token~~CalledByGraph proc~io_get_token io_get_token interface~io_get_token io_get_token interface~io_get_token->proc~io_get_token proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_get_token interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_get_token.html"},{"title":"io_read_frame_body – swiftest","text":"module function io_read_frame_body(self, iu, param) result(ierr) Interface → Reads a frame of output of either test particle or massive body data from a binary output file Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90\n Adapted from Hal Levison's Swift routine io_read_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Calls proc~~io_read_frame_body~~CallsGraph proc~io_read_frame_body io_read_frame_body interface~util_exit util_exit proc~io_read_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_frame_body~~CalledByGraph proc~io_read_frame_body io_read_frame_body interface~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_frame_body.html"},{"title":"io_read_frame_cb – swiftest","text":"module function io_read_frame_cb(self, iu, param) result(ierr) Interface → Reads a frame of output of central body data to the binary output file Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90\n Adapted from Hal Levison's Swift routine io_read_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Calls proc~~io_read_frame_cb~~CallsGraph proc~io_read_frame_cb io_read_frame_cb interface~util_exit util_exit proc~io_read_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_frame_cb~~CalledByGraph proc~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_frame_cb.html"},{"title":"io_read_frame_system – swiftest","text":"module function io_read_frame_system(self, iu, param) result(ierr) Interface → Read a frame (header plus records for each massive body and active test particle) from a output binary file Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Calls proc~~io_read_frame_system~~CallsGraph proc~io_read_frame_system io_read_frame_system proc~io_read_hdr io_read_hdr proc~io_read_frame_system->proc~io_read_hdr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_frame_system~~CalledByGraph proc~io_read_frame_system io_read_frame_system interface~io_read_frame_system io_read_frame_system interface~io_read_frame_system->proc~io_read_frame_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_frame_system.html"},{"title":"io_conservation_report – swiftest","text":"module subroutine io_conservation_report(self, param, lterminal) Interface → Reports the current state of energy, mass, and angular momentum conservation in a run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen Calls proc~~io_conservation_report~~CallsGraph proc~io_conservation_report io_conservation_report interface~util_exit util_exit proc~io_conservation_report->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_conservation_report~~CalledByGraph proc~io_conservation_report io_conservation_report interface~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_conservation_report.html"},{"title":"io_dump_param – swiftest","text":"module subroutine io_dump_param(self, param_file_name) Interface → Dump integration parameters to file Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90\n Adapted from Martin Duncan's Swift routine io_dump_param.f\n todo: Currently this procedure does not work in user-defined derived-type input mode \n    due to compiler incompatabilities Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) Calls proc~~io_dump_param~~CallsGraph proc~io_dump_param io_dump_param interface~util_exit util_exit proc~io_dump_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_param~~CalledByGraph proc~io_dump_param io_dump_param interface~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_param.html"},{"title":"io_dump_particle_info – swiftest","text":"module subroutine io_dump_particle_info(self, iu) Interface → Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number Calls proc~~io_dump_particle_info~~CallsGraph proc~io_dump_particle_info io_dump_particle_info interface~util_exit util_exit proc~io_dump_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_particle_info~~CalledByGraph proc~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_particle_info.html"},{"title":"io_dump_particle_info_base – swiftest","text":"module subroutine io_dump_particle_info_base(self, param, idx) Interface → Dumps the particle information data to a file. \n Pass a list of array indices for test particles (tpidx) and/or massive bodies (plidx) to append Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file Calls proc~~io_dump_particle_info_base~~CallsGraph proc~io_dump_particle_info_base io_dump_particle_info_base interface~util_exit util_exit proc~io_dump_particle_info_base->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_particle_info_base~~CalledByGraph proc~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_particle_info_base.html"},{"title":"io_dump_base – swiftest","text":"module subroutine io_dump_base(self, param) Interface → Dump massive body data to files Adapted from David E. Kaufmann's Swifter routine: io_dump_pl.f90 and io_dump_tp.f90\n Adapted from Hal Levison's Swift routine io_dump_pl.f and io_dump_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_dump_base~~CallsGraph proc~io_dump_base io_dump_base interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body interface~util_exit util_exit proc~io_dump_base->interface~util_exit proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~io_write_frame_cb->interface~util_exit proc~io_write_frame_body->interface~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_base~~CalledByGraph proc~io_dump_base io_dump_base interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_base.html"},{"title":"io_dump_system – swiftest","text":"module subroutine io_dump_system(self, param) Interface → Dumps the state of the system to files in case the simulation is interrupted.\n As a safety mechanism, there are two dump files that are written in alternating order\n so that if a dump file gets corrupted during writing, the user can restart from the older one. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_dump_system~~CallsGraph proc~io_dump_system io_dump_system dump_cb_file dump_cb_file proc~io_dump_system->dump_cb_file dump_param_file dump_param_file proc~io_dump_system->dump_param_file dump_pl_file dump_pl_file proc~io_dump_system->dump_pl_file dump_tp_file dump_tp_file proc~io_dump_system->dump_tp_file Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_system~~CalledByGraph proc~io_dump_system io_dump_system interface~io_dump_system io_dump_system interface~io_dump_system->proc~io_dump_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_system.html"},{"title":"io_param_reader – swiftest","text":"module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Interface → Read in parameters for the integration\n Currently this procedure does not work in user-defined derived-type input mode \n    e.g. read(unit,'(DT)') param \n as the newline characters are ignored in the input file when compiled in ifort. Adapted from David E. Kaufmann's Swifter routine io_init_param.f90\n Adapted from Martin Duncan's Swift routine io_init_param.f\n Do basic sanity checks on the input values Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Calls proc~~io_param_reader~~CallsGraph proc~io_param_reader io_param_reader interface~io_toupper io_toupper proc~io_param_reader->interface~io_toupper interface~io_get_token io_get_token proc~io_param_reader->interface~io_get_token proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper proc~io_get_token io_get_token interface~io_get_token->proc~io_get_token Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_param_reader~~CalledByGraph proc~io_param_reader io_param_reader interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_param_reader.html"},{"title":"io_param_writer – swiftest","text":"module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Interface → Dump integration parameters to file Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90\n Adapted from Martin Duncan's Swift routine io_dump_param.f Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Called by proc~~io_param_writer~~CalledByGraph proc~io_param_writer io_param_writer interface~io_param_writer io_param_writer interface~io_param_writer->proc~io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_param_writer.html"},{"title":"io_read_in_body – swiftest","text":"module subroutine io_read_in_body(self, param) Interface → Read in either test particle or massive body data Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90 and swiftest_init_tp.f90\n Adapted from Martin Duncan's Swift routine swiftest_init_pl.f and swiftest_init_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~io_read_in_body~~CalledByGraph proc~io_read_in_body io_read_in_body interface~io_read_in_body io_read_in_body interface~io_read_in_body->proc~io_read_in_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_body.html"},{"title":"io_read_in_cb – swiftest","text":"module subroutine io_read_in_cb(self, param) Interface → Reads in central body data Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90\n Adapted from Martin Duncan's Swift routine swiftest_init_pl.f Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self class( swiftest_parameters ), intent(inout) :: param Calls proc~~io_read_in_cb~~CallsGraph proc~io_read_in_cb io_read_in_cb interface~util_exit util_exit proc~io_read_in_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_in_cb~~CalledByGraph proc~io_read_in_cb io_read_in_cb interface~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_cb.html"},{"title":"io_read_in_param – swiftest","text":"module subroutine io_read_in_param(self, param_file_name) Interface → Read in parameters for the integration Adapted from David E. Kaufmann's Swifter routine io_init_param.f90\n Adapted from Martin Duncan's Swift routine io_init_param.f\n todo: Currently this procedure does not work in user-defined derived-type input mode \n    as the newline characters are ignored in the input file when compiled in ifort. Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) Calls proc~~io_read_in_param~~CallsGraph proc~io_read_in_param io_read_in_param interface~util_exit util_exit proc~io_read_in_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_in_param~~CalledByGraph proc~io_read_in_param io_read_in_param interface~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_param.html"},{"title":"io_read_in_particle_info – swiftest","text":"module subroutine io_read_in_particle_info(self, iu) Interface → Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number Calls proc~~io_read_in_particle_info~~CallsGraph proc~io_read_in_particle_info io_read_in_particle_info interface~util_exit util_exit proc~io_read_in_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_in_particle_info~~CalledByGraph proc~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_particle_info.html"},{"title":"io_read_particle_info_system – swiftest","text":"module subroutine io_read_particle_info_system(self, param) Interface → Reads an old particle information file for a restartd run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_read_particle_info_system~~CallsGraph proc~io_read_particle_info_system io_read_particle_info_system interface~util_exit util_exit proc~io_read_particle_info_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_particle_info_system~~CalledByGraph proc~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_particle_info_system.html"},{"title":"io_toupper – swiftest","text":"module subroutine io_toupper(string) Interface → Convert string to uppercase Adapted from David E. Kaufmann's Swifter routine: util_toupper.f90 Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case Called by proc~~io_toupper~~CalledByGraph proc~io_toupper io_toupper interface~io_toupper io_toupper interface~io_toupper->proc~io_toupper proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_toupper proc~io_get_args io_get_args proc~io_get_args->interface~io_toupper interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_toupper.html"},{"title":"io_write_discard – swiftest","text":"module subroutine io_write_discard(self, param) Interface → Write out information about discarded test particle Adapted from David E. Kaufmann's Swifter routine  io_discard_write.f90\n Adapted from Hal Levison's Swift routine io_discard_write.f Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_write_discard~~CallsGraph proc~io_write_discard io_write_discard interface~util_exit util_exit proc~io_write_discard->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_discard~~CalledByGraph proc~io_write_discard io_write_discard interface~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_discard.html"},{"title":"io_write_encounter – swiftest","text":"module subroutine io_write_encounter(self, pl, encbody, param) Interface → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_encounter~~CallsGraph proc~io_write_encounter io_write_encounter ind1 ind1 proc~io_write_encounter->ind1 interface~util_exit util_exit proc~io_write_encounter->interface~util_exit ind2 ind2 proc~io_write_encounter->ind2 proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_encounter~~CalledByGraph proc~io_write_encounter io_write_encounter interface~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_encounter.html"},{"title":"io_write_frame_body – swiftest","text":"module subroutine io_write_frame_body(self, iu, param) Interface → Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90\n Adapted from Hal Levison's Swift routine io_write_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_frame_body~~CallsGraph proc~io_write_frame_body io_write_frame_body interface~util_exit util_exit proc~io_write_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_body~~CalledByGraph proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_body interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_body.html"},{"title":"io_write_frame_cb – swiftest","text":"module subroutine io_write_frame_cb(self, iu, param) Interface → Write a frame of output of central body data to the binary output file Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90\n Adapted from Hal Levison's Swift routine io_write_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_frame_cb~~CallsGraph proc~io_write_frame_cb io_write_frame_cb interface~util_exit util_exit proc~io_write_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_cb~~CalledByGraph proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_cb interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_cb.html"},{"title":"io_write_frame_encounter – swiftest","text":"module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Interface → Write a single frame of close encounter data to output binary files Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90\n Adapted from Hal Levison's Swift routine io_write_encounter.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Heliocentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Heliocentric velocity vectors of the two encountering bodies Calls proc~~io_write_frame_encounter~~CallsGraph proc~io_write_frame_encounter io_write_frame_encounter interface~util_exit util_exit proc~io_write_frame_encounter->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_encounter~~CalledByGraph proc~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_encounter.html"},{"title":"io_write_frame_system – swiftest","text":"module subroutine io_write_frame_system(self, param) Interface → Write a frame (header plus records for each massive body and active test particle) to output binary file\n There is no direct file output from this subroutine Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90\n Adapted from Hal Levison's Swift routine io_write_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_write_frame_system~~CallsGraph proc~io_write_frame_system io_write_frame_system interface~util_exit util_exit proc~io_write_frame_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_system~~CalledByGraph proc~io_write_frame_system io_write_frame_system interface~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_system.html"},{"title":"io_write_hdr_system – swiftest","text":"module subroutine io_write_hdr_system(self, iu, param) Interface → Write frame header to output binary file Adapted from David Adapted from David E. Kaufmann's Swifter routine io_write_hdr.f90\n Adapted from Hal Levison's Swift routine io_write_hdr.F Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_hdr_system~~CallsGraph proc~io_write_hdr_system io_write_hdr_system interface~util_exit util_exit proc~io_write_hdr_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_hdr_system~~CalledByGraph proc~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_hdr_system.html"},{"title":"setup_construct_system – swiftest","text":"module subroutine setup_construct_system(system, param) Interface → Constructor for a Swiftest nbody system. Creates the nbody system object based on the user-input integrator Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Swiftest parameters Calls proc~~setup_construct_system~~CallsGraph proc~setup_construct_system setup_construct_system interface~util_exit util_exit proc~setup_construct_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~setup_construct_system~~CalledByGraph proc~setup_construct_system setup_construct_system interface~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_construct_system.html"},{"title":"setup_encounter – swiftest","text":"module subroutine setup_encounter(self, n) Interface → A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for Called by proc~~setup_encounter~~CalledByGraph proc~setup_encounter setup_encounter interface~setup_encounter setup_encounter interface~setup_encounter->proc~setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_encounter.html"},{"title":"setup_initialize_particle_info_system – swiftest","text":"module subroutine setup_initialize_particle_info_system(self, param) Interface → Setup up particle information metadata from initial conditions Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~setup_initialize_particle_info_system~~CalledByGraph proc~setup_initialize_particle_info_system setup_initialize_particle_info_system interface~setup_initialize_particle_info_system setup_initialize_particle_info_system interface~setup_initialize_particle_info_system->proc~setup_initialize_particle_info_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_initialize_particle_info_system.html"},{"title":"setup_initialize_system – swiftest","text":"module subroutine setup_initialize_system(self, param) Interface → Wrapper method to initialize a basic Swiftest nbody system from files Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~setup_initialize_system~~CalledByGraph proc~setup_initialize_system setup_initialize_system interface~setup_initialize_system setup_initialize_system interface~setup_initialize_system->proc~setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_initialize_system.html"},{"title":"setup_body – swiftest","text":"module subroutine setup_body(self, n, param) Interface → Constructor for base Swiftest particle class. Allocates space for all particles and\n initializes all components with a value.\n Note: Timing tests indicate that (NDIM, n) is more efficient than (NDIM, n) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Called by proc~~setup_body~~CalledByGraph proc~setup_body setup_body interface~setup_body setup_body interface~setup_body->proc~setup_body proc~setup_pl setup_pl proc~setup_pl->interface~setup_body proc~setup_tp setup_tp proc~setup_tp->interface~setup_body interface~setup_pl setup_pl interface~setup_pl->proc~setup_pl interface~setup_tp setup_tp interface~setup_tp->proc~setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_body.html"},{"title":"setup_pl – swiftest","text":"module subroutine setup_pl(self, n, param) Interface → Constructor for base Swiftest massive body class. Allocates space for all particles and\n initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~setup_pl~~CallsGraph proc~setup_pl setup_pl interface~setup_body setup_body proc~setup_pl->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~setup_pl~~CalledByGraph proc~setup_pl setup_pl interface~setup_pl setup_pl interface~setup_pl->proc~setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_pl.html"},{"title":"setup_tp – swiftest","text":"module subroutine setup_tp(self, n, param) Interface → Constructor for base Swiftest test particle particle class. Allocates space for \n all particles and initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~setup_tp~~CallsGraph proc~setup_tp setup_tp interface~setup_body setup_body proc~setup_tp->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~setup_tp~~CalledByGraph proc~setup_tp setup_tp interface~setup_tp setup_tp interface~setup_tp->proc~setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_tp.html"},{"title":"user_kick_getacch_body – swiftest","text":"module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Interface → Add user-supplied heliocentric accelerations to planets. Adapted from David E. Kaufmann's Swifter routine whm_user_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters user parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the ste Called by proc~~user_kick_getacch_body~~CalledByGraph proc~user_kick_getacch_body user_kick_getacch_body interface~user_kick_getacch_body user_kick_getacch_body interface~user_kick_getacch_body->proc~user_kick_getacch_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/user_kick_getacch_body.html"},{"title":"drift_body – swiftest","text":"module subroutine drift_body(self, system, param, dt) Interface → Loop bodies and call Danby drift routine on the heliocentric position and velocities. Adapted from Hal Levison's Swift routine drift_tp.f \n Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f90 Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~drift_body~~CallsGraph proc~drift_body drift_body interface~drift_all drift_all proc~drift_body->interface~drift_all proc~drift_all drift_all interface~drift_all->proc~drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_body~~CalledByGraph proc~drift_body drift_body interface~drift_body drift_body interface~drift_body->proc~drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_body.html"},{"title":"drift_all – swiftest","text":"pure module subroutine drift_all(mu, x, v, n, param, dt, mask, iflag) Interface → Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector. Adapted from Hal Levison's Swift routine drift_tp.f \n Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f9 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: mask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem Called by proc~~drift_all~~CalledByGraph proc~drift_all drift_all interface~drift_all drift_all interface~drift_all->proc~drift_all proc~drift_body drift_body proc~drift_body->interface~drift_all interface~drift_body drift_body interface~drift_body->proc~drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_all.html"},{"title":"drift_one – swiftest","text":"pure elemental module subroutine drift_one(mu, px, py, pz, vx, vy, vz, dt, iflag) Interface → Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient Adapted from David E. Kaufmann's Swifter routine routine drift_one.f90\n Adapted from Hal Levison and Martin Duncan's Swift routine drift_one.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) Called by proc~~drift_one~~CalledByGraph proc~drift_one drift_one interface~drift_one drift_one interface~drift_one->proc~drift_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_one.html"},{"title":"symba_util_append_arr_kin – swiftest","text":"subroutine symba_util_append_arr_kin(arr, source, nold, nsrc, lsource_mask) Append a single array of kinship type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_arr_kin~~CallsGraph proc~symba_util_append_arr_kin symba_util_append_arr_kin interface~util_resize util_resize proc~symba_util_append_arr_kin->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_arr_kin.html"},{"title":"symba_util_append_encounter – swiftest","text":"module subroutine symba_util_append_encounter(self, source, lsource_mask) Interface → Append components from one encounter list (pl-pl or pl-tp) body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_encounter~~CallsGraph proc~symba_util_append_encounter symba_util_append_encounter interface~util_append util_append proc~symba_util_append_encounter->interface~util_append util_append_encounter util_append_encounter proc~symba_util_append_encounter->util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_encounter~~CalledByGraph proc~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter->proc~symba_util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_encounter.html"},{"title":"symba_util_append_pl – swiftest","text":"module subroutine symba_util_append_pl(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_pl~~CallsGraph proc~symba_util_append_pl symba_util_append_pl interface~util_append util_append proc~symba_util_append_pl->interface~util_append util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl util_exit util_exit proc~symba_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_pl~~CalledByGraph proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl proc~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger->interface~symba_util_append_pl interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_pl.html"},{"title":"symba_util_append_merger – swiftest","text":"module subroutine symba_util_append_merger(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_merger~~CallsGraph proc~symba_util_append_merger symba_util_append_merger interface~util_append util_append proc~symba_util_append_merger->interface~util_append interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger->interface~symba_util_append_pl util_exit util_exit proc~symba_util_append_merger->util_exit proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl proc~symba_util_append_pl->interface~util_append proc~symba_util_append_pl->util_exit util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_merger~~CalledByGraph proc~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_merger.html"},{"title":"symba_util_append_tp – swiftest","text":"module subroutine symba_util_append_tp(self, source, lsource_mask) Interface → Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_tp~~CallsGraph proc~symba_util_append_tp symba_util_append_tp interface~util_append util_append proc~symba_util_append_tp->interface~util_append util_append_tp util_append_tp proc~symba_util_append_tp->util_append_tp util_exit util_exit proc~symba_util_append_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_tp~~CalledByGraph proc~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp->proc~symba_util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_tp.html"},{"title":"symba_util_copy_encounter – swiftest","text":"module subroutine symba_util_copy_encounter(self, source) Interface → Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into Calls proc~~symba_util_copy_encounter~~CallsGraph proc~symba_util_copy_encounter symba_util_copy_encounter util_copy_encounter util_copy_encounter proc~symba_util_copy_encounter->util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_copy_encounter~~CalledByGraph proc~symba_util_copy_encounter symba_util_copy_encounter interface~symba_util_copy_encounter symba_util_copy_encounter interface~symba_util_copy_encounter->proc~symba_util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_copy_encounter.html"},{"title":"symba_util_fill_arr_kin – swiftest","text":"subroutine symba_util_fill_arr_kin(keeps, inserts, lfill_list) Performs a fill operation on a single array of particle kinship types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/symba_util_fill_arr_kin.html"},{"title":"symba_util_fill_pl – swiftest","text":"module subroutine symba_util_fill_pl(self, inserts, lfill_list) Interface → Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA masive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~symba_util_fill_pl~~CallsGraph proc~symba_util_fill_pl symba_util_fill_pl interface~util_fill util_fill proc~symba_util_fill_pl->interface~util_fill util_fill_pl util_fill_pl proc~symba_util_fill_pl->util_fill_pl util_exit util_exit proc~symba_util_fill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_fill_pl~~CalledByGraph proc~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl->proc~symba_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_fill_pl.html"},{"title":"symba_util_fill_tp – swiftest","text":"module subroutine symba_util_fill_tp(self, inserts, lfill_list) Interface → Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~symba_util_fill_tp~~CallsGraph proc~symba_util_fill_tp symba_util_fill_tp interface~util_fill util_fill proc~symba_util_fill_tp->interface~util_fill util_fill_tp util_fill_tp proc~symba_util_fill_tp->util_fill_tp util_exit util_exit proc~symba_util_fill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_fill_tp~~CalledByGraph proc~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp->proc~symba_util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_fill_tp.html"},{"title":"symba_util_index_eucl_plpl – swiftest","text":"module subroutine symba_util_index_eucl_plpl(self, param) Interface → Turns i,j indices into k index for use in the Euclidean distance matrix. This also sets the lmtiny flag and computes the\n number of interactions that excludes semi-interacting bodies with each other (Gmass < GMTINY).\n This method will also sort the bodies in descending order by Mass Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~symba_util_index_eucl_plpl~~CalledByGraph proc~symba_util_index_eucl_plpl symba_util_index_eucl_plpl interface~symba_util_index_eucl_plpl symba_util_index_eucl_plpl interface~symba_util_index_eucl_plpl->proc~symba_util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_index_eucl_plpl.html"},{"title":"symba_util_peri_pl – swiftest","text":"module subroutine symba_util_peri_pl(self, system, param) Interface → Determine system pericenter passages for planets in SyMBA Adapted from David E. Kaufmann's Swifter routine: symba_peri.f90\n Adapted from Hal Levison's Swift routine util_mass_peri.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_util_peri_pl~~CallsGraph proc~symba_util_peri_pl symba_util_peri_pl orbel_xv2aeq orbel_xv2aeq proc~symba_util_peri_pl->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_peri_pl~~CalledByGraph proc~symba_util_peri_pl symba_util_peri_pl interface~symba_util_peri_pl symba_util_peri_pl interface~symba_util_peri_pl->proc~symba_util_peri_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_peri_pl.html"},{"title":"symba_util_rearray_pl – swiftest","text":"module subroutine symba_util_rearray_pl(self, system, param) Interface → Clean up the massive body structures to remove discarded bodies and add new bodies Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system Swiftest nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~symba_util_rearray_pl~~CalledByGraph proc~symba_util_rearray_pl symba_util_rearray_pl interface~symba_util_rearray_pl symba_util_rearray_pl interface~symba_util_rearray_pl->proc~symba_util_rearray_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_rearray_pl.html"},{"title":"symba_util_reset_kinship – swiftest","text":"module subroutine symba_util_reset_kinship(self, idx) Interface → Resets the kinship status of bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset Called by proc~~symba_util_reset_kinship~~CalledByGraph proc~symba_util_reset_kinship symba_util_reset_kinship interface~symba_util_reset_kinship symba_util_reset_kinship interface~symba_util_reset_kinship->proc~symba_util_reset_kinship Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_reset_kinship.html"},{"title":"symba_util_resize_arr_kin – swiftest","text":"subroutine symba_util_resize_arr_kin(arr, nnew) Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/symba_util_resize_arr_kin.html"},{"title":"symba_util_resize_merger – swiftest","text":"module subroutine symba_util_resize_merger(self, nnew) Interface → Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~symba_util_resize_merger~~CallsGraph proc~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~util_resize util_resize proc~symba_util_resize_merger->interface~util_resize proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl proc~symba_util_resize_pl->interface~util_resize util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_resize_merger~~CalledByGraph proc~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_resize_merger.html"},{"title":"symba_util_resize_pl – swiftest","text":"module subroutine symba_util_resize_pl(self, nnew) Interface → Checks the current size of a SyMBA massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~symba_util_resize_pl~~CallsGraph proc~symba_util_resize_pl symba_util_resize_pl util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl interface~util_resize util_resize proc~symba_util_resize_pl->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_resize_pl~~CalledByGraph proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl proc~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_resize_pl.html"},{"title":"symba_util_resize_tp – swiftest","text":"module subroutine symba_util_resize_tp(self, nnew) Interface → Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~symba_util_resize_tp~~CallsGraph proc~symba_util_resize_tp symba_util_resize_tp interface~util_resize util_resize proc~symba_util_resize_tp->interface~util_resize util_resize_tp util_resize_tp proc~symba_util_resize_tp->util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_resize_tp~~CalledByGraph proc~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp->proc~symba_util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_resize_tp.html"},{"title":"symba_util_sort_pl – swiftest","text":"module subroutine symba_util_sort_pl(self, sortby, ascending) Interface → Sort a SyMBA massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~symba_util_sort_pl~~CallsGraph proc~symba_util_sort_pl symba_util_sort_pl util_sort_pl util_sort_pl proc~symba_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_pl~~CalledByGraph proc~symba_util_sort_pl symba_util_sort_pl interface~symba_util_sort_pl symba_util_sort_pl interface~symba_util_sort_pl->proc~symba_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_pl.html"},{"title":"symba_util_sort_tp – swiftest","text":"module subroutine symba_util_sort_tp(self, sortby, ascending) Interface → Sort a SyMBA test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~symba_util_sort_tp~~CallsGraph proc~symba_util_sort_tp symba_util_sort_tp util_sort_tp util_sort_tp proc~symba_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_tp~~CalledByGraph proc~symba_util_sort_tp symba_util_sort_tp interface~symba_util_sort_tp symba_util_sort_tp interface~symba_util_sort_tp->proc~symba_util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_tp.html"},{"title":"symba_util_sort_rearrange_arr_kin – swiftest","text":"subroutine symba_util_sort_rearrange_arr_kin(arr, ind, n) Rearrange a single array of particle kinship type in-place from an index list. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/symba_util_sort_rearrange_arr_kin.html"},{"title":"symba_util_sort_rearrange_pl – swiftest","text":"module subroutine symba_util_sort_rearrange_pl(self, ind) Interface → Rearrange SyMBA massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~symba_util_sort_rearrange_pl~~CallsGraph proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_pl->interface~util_sort_rearrange util_sort_rearrange_pl util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl->util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_rearrange_pl~~CalledByGraph proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl->proc~symba_util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_rearrange_pl.html"},{"title":"symba_util_sort_rearrange_tp – swiftest","text":"module subroutine symba_util_sort_rearrange_tp(self, ind) Interface → Rearrange SyMBA test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~symba_util_sort_rearrange_tp~~CallsGraph proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_tp->interface~util_sort_rearrange util_sort_rearrange_tp util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp->util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_rearrange_tp~~CalledByGraph proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp->proc~symba_util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_rearrange_tp.html"},{"title":"symba_util_spill_arr_kin – swiftest","text":"subroutine symba_util_spill_arr_kin(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of particle kinships\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/symba_util_spill_arr_kin.html"},{"title":"symba_util_spill_pl – swiftest","text":"module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) SyMBA massive body particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~symba_util_spill_pl~~CallsGraph proc~symba_util_spill_pl symba_util_spill_pl interface~util_spill util_spill proc~symba_util_spill_pl->interface~util_spill util_spill_pl util_spill_pl proc~symba_util_spill_pl->util_spill_pl util_exit util_exit proc~symba_util_spill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_spill_pl~~CalledByGraph proc~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl->proc~symba_util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_spill_pl.html"},{"title":"symba_util_spill_encounter – swiftest","text":"module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) SyMBA encounter structure from active list to discard list\n Note: Because the symba_plplenc currently does not contain any additional variable components, this method can recieve it as an input as well. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~symba_util_spill_encounter~~CallsGraph proc~symba_util_spill_encounter symba_util_spill_encounter interface~util_spill util_spill proc~symba_util_spill_encounter->interface~util_spill util_spill_encounter util_spill_encounter proc~symba_util_spill_encounter->util_spill_encounter util_exit util_exit proc~symba_util_spill_encounter->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_spill_encounter~~CalledByGraph proc~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter->proc~symba_util_spill_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_spill_encounter.html"},{"title":"symba_util_spill_tp – swiftest","text":"module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) SyMBA test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~symba_util_spill_tp~~CallsGraph proc~symba_util_spill_tp symba_util_spill_tp interface~util_spill util_spill proc~symba_util_spill_tp->interface~util_spill util_spill_tp util_spill_tp proc~symba_util_spill_tp->util_spill_tp util_exit util_exit proc~symba_util_spill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_spill_tp~~CalledByGraph proc~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp->proc~symba_util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_spill_tp.html"},{"title":"symba_collision_casedisruption – swiftest","text":"module function symba_collision_casedisruption(system, param, colliders, frag) result(status) Interface → Create the fragments resulting from a non-catastrophic disruption collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome Calls proc~~symba_collision_casedisruption~~CallsGraph proc~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casedisruption->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_casedisruption~~CalledByGraph proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_casedisruption.html"},{"title":"symba_collision_casehitandrun – swiftest","text":"module function symba_collision_casehitandrun(system, param, colliders, frag) result(status) Interface → Create the fragments resulting from a non-catastrophic hit-and-run collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcom Calls proc~~symba_collision_casehitandrun~~CallsGraph proc~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casehitandrun->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_casehitandrun~~CalledByGraph proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_casehitandrun.html"},{"title":"symba_collision_casemerge – swiftest","text":"module function symba_collision_casemerge(system, param, colliders, frag) result(status) Interface → Merge massive bodies. Adapted from David E. Kaufmann's Swifter routines symba_merge_pl.f90 and symba_discard_merge_pl.f90 Adapted from Hal Levison's Swift routines symba5_merge.f and discard_mass_merge.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome Calls proc~~symba_collision_casemerge~~CallsGraph proc~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_casemerge~~CalledByGraph proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_casemerge.html"},{"title":"symba_collision_check_encounter – swiftest","text":"module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Interface → Check for merger between massive bodies and test particles in SyMBA Adapted from David E. Kaufmann's Swifter routine symba_merge.f90 and symba_merge_tp.f90 Adapted from Hal Levison's Swift routine symba5_merge.f Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision Calls proc~~symba_collision_check_encounter~~CallsGraph proc~symba_collision_check_encounter symba_collision_check_encounter fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_check_encounter->fraggle_io_log_one_message proc~symba_collision_check_one symba_collision_check_one proc~symba_collision_check_encounter->proc~symba_collision_check_one orbel_xv2aeq orbel_xv2aeq proc~symba_collision_check_one->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_check_encounter~~CalledByGraph proc~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter->proc~symba_collision_check_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_check_encounter.html"},{"title":"symba_collision_encounter_extract_collisions – swiftest","text":"module subroutine symba_collision_encounter_extract_collisions(self, system, param) Interface → Processes the pl-pl encounter list remove only those encounters that led to a collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_collision_encounter_extract_collisions~~CallsGraph proc~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions idx2 idx2 proc~symba_collision_encounter_extract_collisions->idx2 idx1 idx1 proc~symba_collision_encounter_extract_collisions->idx1 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_encounter_extract_collisions~~CalledByGraph proc~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions interface~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions interface~symba_collision_encounter_extract_collisions->proc~symba_collision_encounter_extract_collisions Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_encounter_extract_collisions.html"},{"title":"symba_collision_make_colliders_pl – swiftest","text":"module subroutine symba_collision_make_colliders_pl(self, idx) Interface → When a single body is involved in more than one collision in a single step, it becomes part of a colliders%idx.\n The largest body involved in a multi-body collision is the \"parent\" and all bodies that collide with it are its \"children,\"\n including those that collide with the children. Adapted from David E. Kaufmann's Swifter routine symba_merge_pl.f90 Adapted from Hal Levison's Swift routine symba5_merge.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision Called by proc~~symba_collision_make_colliders_pl~~CalledByGraph proc~symba_collision_make_colliders_pl symba_collision_make_colliders_pl interface~symba_collision_make_colliders_pl symba_collision_make_colliders_pl interface~symba_collision_make_colliders_pl->proc~symba_collision_make_colliders_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_make_colliders_pl.html"},{"title":"symba_collision_resolve_fragmentations – swiftest","text":"module subroutine symba_collision_resolve_fragmentations(self, system, param) Interface → Process list of collisions, determine the collisional regime, and then create fragments. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions Calls proc~~symba_collision_resolve_fragmentations~~CallsGraph proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_fragmentations->proc~symba_collision_consolidate_colliders idx2 idx2 proc~symba_collision_resolve_fragmentations->idx2 idx1 idx1 proc~symba_collision_resolve_fragmentations->idx1 interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun util_exit util_exit proc~symba_collision_resolve_fragmentations->util_exit id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casehitandrun->fraggle_io_log_one_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub proc~symba_collision_casedisruption->fraggle_io_log_one_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_resolve_fragmentations~~CalledByGraph proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_fragmentations.html"},{"title":"symba_collision_resolve_mergers – swiftest","text":"module subroutine symba_collision_resolve_mergers(self, system, param) Interface → Process list of collisions and merge colliding bodies together. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions Calls proc~~symba_collision_resolve_mergers~~CallsGraph proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_mergers->proc~symba_collision_consolidate_colliders idx2 idx2 proc~symba_collision_resolve_mergers->idx2 idx1 idx1 proc~symba_collision_resolve_mergers->idx1 interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_resolve_mergers~~CalledByGraph proc~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_mergers.html"},{"title":"symba_collision_resolve_plplenc – swiftest","text":"module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Interface → Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level Calls proc~~symba_collision_resolve_plplenc~~CallsGraph proc~symba_collision_resolve_plplenc symba_collision_resolve_plplenc fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_resolve_plplenc->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_resolve_plplenc~~CalledByGraph proc~symba_collision_resolve_plplenc symba_collision_resolve_plplenc interface~symba_collision_resolve_plplenc symba_collision_resolve_plplenc interface~symba_collision_resolve_plplenc->proc~symba_collision_resolve_plplenc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_plplenc.html"},{"title":"symba_collision_resolve_pltpenc – swiftest","text":"module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Interface → Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation tim real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level Called by proc~~symba_collision_resolve_pltpenc~~CalledByGraph proc~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc interface~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc interface~symba_collision_resolve_pltpenc->proc~symba_collision_resolve_pltpenc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_pltpenc.html"},{"title":"symba_setup_initialize_system – swiftest","text":"module subroutine symba_setup_initialize_system(self, param) Interface → Initialize an SyMBA nbody system from files and sets up the planetocentric structures.\n This subroutine will also sort the massive bodies in descending order by mass Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~symba_setup_initialize_system~~CallsGraph proc~symba_setup_initialize_system symba_setup_initialize_system helio_setup_initialize_system helio_setup_initialize_system proc~symba_setup_initialize_system->helio_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_initialize_system~~CalledByGraph proc~symba_setup_initialize_system symba_setup_initialize_system interface~symba_setup_initialize_system symba_setup_initialize_system interface~symba_setup_initialize_system->proc~symba_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_initialize_system.html"},{"title":"symba_setup_merger – swiftest","text":"module subroutine symba_setup_merger(self, n, param) Interface → Allocate SyMBA test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90\n Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~symba_setup_merger~~CallsGraph proc~symba_setup_merger symba_setup_merger interface~symba_setup_pl symba_setup_pl proc~symba_setup_merger->interface~symba_setup_pl proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_merger~~CalledByGraph proc~symba_setup_merger symba_setup_merger interface~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_merger.html"},{"title":"symba_setup_pl – swiftest","text":"module subroutine symba_setup_pl(self, n, param) Interface → Allocate SyMBA test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90\n Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~symba_setup_pl~~CallsGraph proc~symba_setup_pl symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_pl~~CalledByGraph proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl proc~symba_setup_merger symba_setup_merger proc~symba_setup_merger->interface~symba_setup_pl interface~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_pl.html"},{"title":"symba_setup_encounter – swiftest","text":"module subroutine symba_setup_encounter(self, n) Interface → A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for Calls proc~~symba_setup_encounter~~CallsGraph proc~symba_setup_encounter symba_setup_encounter setup_encounter setup_encounter proc~symba_setup_encounter->setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_encounter~~CalledByGraph proc~symba_setup_encounter symba_setup_encounter interface~symba_setup_encounter symba_setup_encounter interface~symba_setup_encounter->proc~symba_setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_encounter.html"},{"title":"symba_setup_tp – swiftest","text":"module subroutine symba_setup_tp(self, n, param) Interface → Allocate WHM test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90\n Call allocation method for parent class. In this case, helio_tp does not have its own setup method so we use the base method for swiftest_tp Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~symba_setup_tp~~CallsGraph proc~symba_setup_tp symba_setup_tp setup_tp setup_tp proc~symba_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_tp~~CalledByGraph proc~symba_setup_tp symba_setup_tp interface~symba_setup_tp symba_setup_tp interface~symba_setup_tp->proc~symba_setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_tp.html"},{"title":"symba_kick_getacch_int_pl – swiftest","text":"module subroutine symba_kick_getacch_int_pl(self) Interface → Compute direct cross (third) term heliocentric accelerations of massive bodies, with no mutual interactions between bodies below GMTINY Adapted from Hal Levison's Swift routine symba5_helio_getacch.f\n Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_int.f90 Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Calls proc~~symba_kick_getacch_int_pl~~CallsGraph proc~symba_kick_getacch_int_pl symba_kick_getacch_int_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_int_pl->kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_kick_getacch_int_pl~~CalledByGraph proc~symba_kick_getacch_int_pl symba_kick_getacch_int_pl interface~symba_kick_getacch_int_pl symba_kick_getacch_int_pl interface~symba_kick_getacch_int_pl->proc~symba_kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_getacch_int_pl.html"},{"title":"symba_kick_getacch_pl – swiftest","text":"module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of massive bodies Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch.f90\n Adapted from Hal Levison's Swift routine symba5_kick_getacch.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~symba_kick_getacch_pl~~CallsGraph proc~symba_kick_getacch_pl symba_kick_getacch_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_pl->kick_getacch_int_all_pl helio_kick_getacch_pl helio_kick_getacch_pl proc~symba_kick_getacch_pl->helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_kick_getacch_pl~~CalledByGraph proc~symba_kick_getacch_pl symba_kick_getacch_pl interface~symba_kick_getacch_pl symba_kick_getacch_pl interface~symba_kick_getacch_pl->proc~symba_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_getacch_pl.html"},{"title":"symba_kick_getacch_tp – swiftest","text":"module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of test particles Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch_tp.f90\n Adapted from Hal Levison's Swift routine symba5_kick_getacch.f Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~symba_kick_getacch_tp~~CallsGraph proc~symba_kick_getacch_tp symba_kick_getacch_tp helio_kick_getacch_tp helio_kick_getacch_tp proc~symba_kick_getacch_tp->helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_kick_getacch_tp~~CalledByGraph proc~symba_kick_getacch_tp symba_kick_getacch_tp interface~symba_kick_getacch_tp symba_kick_getacch_tp interface~symba_kick_getacch_tp->proc~symba_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_getacch_tp.html"},{"title":"symba_kick_encounter – swiftest","text":"module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Interface → Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types Adapted from David E. Kaufmann's Swifter routine: symba_kick.f90\n Adapted from Hal Levison's Swift routine symba5_kick.f Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration Called by proc~~symba_kick_encounter~~CalledByGraph proc~symba_kick_encounter symba_kick_encounter interface~symba_kick_encounter symba_kick_encounter interface~symba_kick_encounter->proc~symba_kick_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_encounter.html"},{"title":"symba_encounter_check_pl – swiftest","text":"module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Interface → Check for an encounter between massive bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Calls proc~~symba_encounter_check_pl~~CallsGraph proc~symba_encounter_check_pl symba_encounter_check_pl proc~symba_encounter_check_all symba_encounter_check_all proc~symba_encounter_check_pl->proc~symba_encounter_check_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_encounter_check_pl~~CalledByGraph proc~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl->proc~symba_encounter_check_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_pl.html"},{"title":"symba_encounter_check – swiftest","text":"module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Interface → Check for an encounter between test particles and massive bodies in the pltpenc list.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types. Adapted from portions of David E. Kaufmann's Swifter routine: symba_step_recur.f90 Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Called by proc~~symba_encounter_check~~CalledByGraph proc~symba_encounter_check symba_encounter_check interface~symba_encounter_check symba_encounter_check interface~symba_encounter_check->proc~symba_encounter_check Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check.html"},{"title":"symba_encounter_check_tp – swiftest","text":"module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Interface → Check for an encounter between test particles and massive bodies. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Called by proc~~symba_encounter_check_tp~~CalledByGraph proc~symba_encounter_check_tp symba_encounter_check_tp interface~symba_encounter_check_tp symba_encounter_check_tp interface~symba_encounter_check_tp->proc~symba_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_tp.html"},{"title":"symba_encounter_check_one – swiftest","text":"pure elemental module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Interface → Check for an encounter. Adapted from David E. Kaufmann's Swifter routine: symba_chk.f90\n Adapted from Hal Levison's Swift routine symba5_chk.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr Calls proc~~symba_encounter_check_one~~CallsGraph proc~symba_encounter_check_one symba_encounter_check_one interface~rmvs_chk_ind rmvs_chk_ind proc~symba_encounter_check_one->interface~rmvs_chk_ind proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_encounter_check_one~~CalledByGraph proc~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one->proc~symba_encounter_check_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_one.html"},{"title":"symba_io_param_reader – swiftest","text":"module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Interface → Read in parameters specific to the SyMBA integrator, then calls the base io_param_reader. Adapted from David E. Kaufmann's Swifter routine io_init_param.f90\n Adapted from Martin Duncan's Swift routine io_init_param.f Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Calls proc~~symba_io_param_reader~~CallsGraph proc~symba_io_param_reader symba_io_param_reader fraggle_io_log_start fraggle_io_log_start proc~symba_io_param_reader->fraggle_io_log_start io_param_reader io_param_reader proc~symba_io_param_reader->io_param_reader io_toupper io_toupper proc~symba_io_param_reader->io_toupper io_get_token io_get_token proc~symba_io_param_reader->io_get_token Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_io_param_reader~~CalledByGraph proc~symba_io_param_reader symba_io_param_reader interface~symba_io_param_reader symba_io_param_reader interface~symba_io_param_reader->proc~symba_io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_io_param_reader.html"},{"title":"symba_io_param_writer – swiftest","text":"module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Interface → Dump integration parameters specific to SyMBA to file and then call the base io_param_writer method. Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90\n Adapted from Martin Duncan's Swift routine io_dump_param.f Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Collection of SyMBA parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Calls proc~~symba_io_param_writer~~CallsGraph proc~symba_io_param_writer symba_io_param_writer io_param_writer io_param_writer proc~symba_io_param_writer->io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_io_param_writer~~CalledByGraph proc~symba_io_param_writer symba_io_param_writer interface~symba_io_param_writer symba_io_param_writer interface~symba_io_param_writer->proc~symba_io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_io_param_writer.html"},{"title":"symba_io_write_discard – swiftest","text":"module subroutine symba_io_write_discard(self, param) Interface → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~symba_io_write_discard~~CallsGraph proc~symba_io_write_discard symba_io_write_discard util_exit util_exit proc~symba_io_write_discard->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_io_write_discard~~CalledByGraph proc~symba_io_write_discard symba_io_write_discard interface~symba_io_write_discard symba_io_write_discard interface~symba_io_write_discard->proc~symba_io_write_discard Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_io_write_discard.html"},{"title":"symba_discard_pl – swiftest","text":"module subroutine symba_discard_pl(self, system, param) Interface → Call the various flavors of discards for massive bodies in SyMBA runs, including discards due to colliding with the central body or escaping the system Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~symba_discard_pl~~CallsGraph proc~symba_discard_pl symba_discard_pl proc~symba_discard_nonplpl_conservation symba_discard_nonplpl_conservation proc~symba_discard_pl->proc~symba_discard_nonplpl_conservation proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_pl->proc~symba_discard_nonplpl proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_discard_pl~~CalledByGraph proc~symba_discard_pl symba_discard_pl interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_pl.html"},{"title":"symba_step_system – swiftest","text":"module subroutine symba_step_system(self, param, t, dt) Interface → Step planets and active test particles ahead in democratic heliocentric coordinates, descending the recursive\n   branch if necessary to handle possible close encounters Adapted from David E. Kaufmann's Swifter routine: symba_step.f90\n Adapted from Hal Levison's Swift routine symba5_step_pl.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Calls proc~~symba_step_system~~CallsGraph proc~symba_step_system symba_step_system helio_step_system helio_step_system proc~symba_step_system->helio_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_step_system~~CalledByGraph proc~symba_step_system symba_step_system interface~symba_step_system symba_step_system interface~symba_step_system->proc~symba_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_system.html"},{"title":"symba_step_interp_system – swiftest","text":"module subroutine symba_step_interp_system(self, param, t, dt) Interface → Step planets and active test particles ahead in democratic heliocentric coordinates, calling the recursive\n         subroutine to descend to the appropriate level to handle close encounters Adapted from David E. Kaufmann's Swifter routine: symba_step_interp.f90\n Adapted from Hal Levison's Swift routine symba5_step_interp.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~symba_step_interp_system~~CalledByGraph proc~symba_step_interp_system symba_step_interp_system interface~symba_step_interp_system symba_step_interp_system interface~symba_step_interp_system->proc~symba_step_interp_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_interp_system.html"},{"title":"symba_step_set_recur_levels_system – swiftest","text":"module subroutine symba_step_set_recur_levels_system(self, ireci) Interface → Resets pl, tp,and encounter structures at the start of a new step Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90\n Adapted from Hal Levison's Swift routine symba5_step_recur.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object integer(kind=I4B), intent(in) :: ireci Input recursion level Called by proc~~symba_step_set_recur_levels_system~~CalledByGraph proc~symba_step_set_recur_levels_system symba_step_set_recur_levels_system interface~symba_step_set_recur_levels_system symba_step_set_recur_levels_system interface~symba_step_set_recur_levels_system->proc~symba_step_set_recur_levels_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_set_recur_levels_system.html"},{"title":"symba_step_recur_system – swiftest","text":"recursive module subroutine symba_step_recur_system(self, param, t, ireci) Interface → Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current\n         recursion level, if applicable, and descend to the next deeper level if necessarys Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90\n Adapted from Hal Levison's Swift routine symba5_step_recur.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level Calls proc~~symba_step_recur_system~~CallsGraph proc~symba_step_recur_system symba_step_recur_system util_exit util_exit proc~symba_step_recur_system->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_step_recur_system~~CalledByGraph proc~symba_step_recur_system symba_step_recur_system interface~symba_step_recur_system symba_step_recur_system interface~symba_step_recur_system->proc~symba_step_recur_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_recur_system.html"},{"title":"symba_step_reset_system – swiftest","text":"module subroutine symba_step_reset_system(self, param) Interface → Resets pl, tp,and encounter structures at the start of a new step Adapted from David E. Kaufmann's Swifter routine: symba_step.f90\n Adapted from Hal Levison's Swift routine symba5_step.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions Called by proc~~symba_step_reset_system~~CalledByGraph proc~symba_step_reset_system symba_step_reset_system interface~symba_step_reset_system symba_step_reset_system interface~symba_step_reset_system->proc~symba_step_reset_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_reset_system.html"},{"title":"symba_drift_pl – swiftest","text":"module subroutine symba_drift_pl(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~symba_drift_pl~~CallsGraph proc~symba_drift_pl symba_drift_pl helio_drift_body helio_drift_body proc~symba_drift_pl->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_drift_pl~~CalledByGraph proc~symba_drift_pl symba_drift_pl interface~symba_drift_pl symba_drift_pl interface~symba_drift_pl->proc~symba_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_drift_pl.html"},{"title":"symba_drift_tp – swiftest","text":"module subroutine symba_drift_tp(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~symba_drift_tp~~CallsGraph proc~symba_drift_tp symba_drift_tp helio_drift_body helio_drift_body proc~symba_drift_tp->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_drift_tp~~CalledByGraph proc~symba_drift_tp symba_drift_tp interface~symba_drift_tp symba_drift_tp interface~symba_drift_tp->proc~symba_drift_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_drift_tp.html"},{"title":"netcdf_close – swiftest","text":"module subroutine netcdf_close(self, param) Interface → Closes a NetCDF file Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_close~~CallsGraph proc~netcdf_close netcdf_close nf90_close nf90_close proc~netcdf_close->nf90_close Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_close~~CalledByGraph proc~netcdf_close netcdf_close interface~netcdf_close netcdf_close interface~netcdf_close->proc~netcdf_close Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_close.html"},{"title":"netcdf_initialize_output – swiftest","text":"module subroutine netcdf_initialize_output(self, param) Interface → Initialize a NetCDF file system and defines all variables.\n Define the variables Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_initialize_output~~CallsGraph proc~netcdf_initialize_output netcdf_initialize_output nf90_create nf90_create proc~netcdf_initialize_output->nf90_create nf90_def_dim nf90_def_dim proc~netcdf_initialize_output->nf90_def_dim nf90_set_fill nf90_set_fill proc~netcdf_initialize_output->nf90_set_fill nf90_def_var nf90_def_var proc~netcdf_initialize_output->nf90_def_var Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_initialize_output~~CalledByGraph proc~netcdf_initialize_output netcdf_initialize_output interface~netcdf_initialize_output netcdf_initialize_output interface~netcdf_initialize_output->proc~netcdf_initialize_output Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_initialize_output.html"},{"title":"netcdf_open – swiftest","text":"module subroutine netcdf_open(self, param) Interface → Opens a NetCDF file and does the variable inquiries to activate variable ids Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_open~~CallsGraph proc~netcdf_open netcdf_open nf90_inq_varid nf90_inq_varid proc~netcdf_open->nf90_inq_varid nf90_set_fill nf90_set_fill proc~netcdf_open->nf90_set_fill nf90_open nf90_open proc~netcdf_open->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_open~~CalledByGraph proc~netcdf_open netcdf_open interface~netcdf_open netcdf_open interface~netcdf_open->proc~netcdf_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_open.html"},{"title":"netcdf_write_frame_base – swiftest","text":"module subroutine netcdf_write_frame_base(self, iu, param) Interface → Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_write_frame_base~~CallsGraph proc~netcdf_write_frame_base netcdf_write_frame_base interface~util_sort util_sort proc~netcdf_write_frame_base->interface~util_sort nf90_put_var nf90_put_var proc~netcdf_write_frame_base->nf90_put_var Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_write_frame_base~~CalledByGraph proc~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base->proc~netcdf_write_frame_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_write_frame_base.html"},{"title":"netcdf_write_particle_info_base – swiftest","text":"module subroutine netcdf_write_particle_info_base(self, iu) Interface → Write all current particle to file Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset Calls proc~~netcdf_write_particle_info_base~~CallsGraph proc~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~util_sort util_sort proc~netcdf_write_particle_info_base->interface~util_sort nf90_put_var nf90_put_var proc~netcdf_write_particle_info_base->nf90_put_var Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_write_particle_info_base~~CalledByGraph proc~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base->proc~netcdf_write_particle_info_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_write_particle_info_base.html"},{"title":"netcdf_write_hdr_system – swiftest","text":"module subroutine netcdf_write_hdr_system(self, iu, param) Interface → Writes header information (variables that change with time, but not particle id). \n This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that \n previously were handled as separate output files. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_write_hdr_system~~CallsGraph proc~netcdf_write_hdr_system netcdf_write_hdr_system nf90_set_fill nf90_set_fill proc~netcdf_write_hdr_system->nf90_set_fill nf90_put_var nf90_put_var proc~netcdf_write_hdr_system->nf90_put_var nf90_open nf90_open proc~netcdf_write_hdr_system->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_write_hdr_system~~CalledByGraph proc~netcdf_write_hdr_system netcdf_write_hdr_system interface~netcdf_write_hdr_system netcdf_write_hdr_system interface~netcdf_write_hdr_system->proc~netcdf_write_hdr_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_write_hdr_system.html"},{"title":"fraggle_util_vmag_to_vb – swiftest","text":"module function fraggle_util_vmag_to_vb(v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Interface → Converts radial and tangential velocity magnitudes into barycentric velocity Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:),allocatable Calls proc~~fraggle_util_vmag_to_vb~~CallsGraph proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_util_vmag_to_vb~~CalledByGraph proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_vmag_to_vb.html"},{"title":"fraggle_util_add_fragments_to_system – swiftest","text":"module subroutine fraggle_util_add_fragments_to_system(frag, colliders, system, param) Interface → Adds fragments to the temporary system pl object Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters Called by proc~~fraggle_util_add_fragments_to_system~~CalledByGraph proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_add_fragments_to_system.html"},{"title":"fraggle_util_ang_mtm – swiftest","text":"module subroutine fraggle_util_ang_mtm(self) Interface → Calcualtes the current angular momentum of the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object Called by proc~~fraggle_util_ang_mtm~~CalledByGraph proc~fraggle_util_ang_mtm fraggle_util_ang_mtm interface~fraggle_util_ang_mtm fraggle_util_ang_mtm interface~fraggle_util_ang_mtm->proc~fraggle_util_ang_mtm Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_ang_mtm.html"},{"title":"fraggle_util_construct_temporary_system – swiftest","text":"module subroutine fraggle_util_construct_temporary_system(frag, system, param, tmpsys, tmpparam) Interface → Constructs a temporary internal system consisting of active bodies and additional fragments. This internal temporary system is used to calculate system energy with and without fragments\n and optionally including fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters Calls proc~~fraggle_util_construct_temporary_system~~CallsGraph proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_util_construct_temporary_system~~CalledByGraph proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_construct_temporary_system.html"},{"title":"fraggle_util_get_energy_momentum – swiftest","text":"module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Interface → Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.)\n This subrourtine works by building a temporary internal massive body object out of the non-excluded bodies and optionally with fragments appended. \n This will get passed to the energy calculation subroutine so that energy is computed exactly the same way is it is in the main program. \n This will temporarily expand the massive body object in a temporary system object called tmpsys to feed it into symba_energy Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa Calls proc~~fraggle_util_get_energy_momentum~~CallsGraph proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system util_exit util_exit proc~fraggle_util_get_energy_momentum->util_exit proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_util_get_energy_momentum~~CalledByGraph proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_get_energy_momentum.html"},{"title":"fraggle_util_restructure – swiftest","text":"module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Interface → Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt Called by proc~~fraggle_util_restructure~~CalledByGraph proc~fraggle_util_restructure fraggle_util_restructure interface~fraggle_util_restructure fraggle_util_restructure interface~fraggle_util_restructure->proc~fraggle_util_restructure Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_restructure.html"},{"title":"fraggle_util_shift_vector_to_origin – swiftest","text":"module subroutine fraggle_util_shift_vector_to_origin(m_frag, vec_frag) Interface → Adjusts the position or velocity of the fragments as needed to align them with the origin Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame Called by proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_shift_vector_to_origin.html"},{"title":"fraggle_io_log_generate – swiftest","text":"module subroutine fraggle_io_log_generate(frag) Interface → Writes a log of the results of the fragment generation Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Called by proc~~fraggle_io_log_generate~~CalledByGraph proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_generate interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_generate.html"},{"title":"fraggle_io_log_one_message – swiftest","text":"module subroutine fraggle_io_log_one_message(message) Interface → Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message Called by proc~~fraggle_io_log_one_message~~CalledByGraph proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_regime_collresolve fraggle_regime_collresolve proc~fraggle_regime_collresolve->interface~fraggle_io_log_one_message interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_one_message.html"},{"title":"fraggle_io_log_pl – swiftest","text":"module subroutine fraggle_io_log_pl(pl, param) Interface → Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters Called by proc~~fraggle_io_log_pl~~CalledByGraph proc~fraggle_io_log_pl fraggle_io_log_pl interface~fraggle_io_log_pl fraggle_io_log_pl interface~fraggle_io_log_pl->proc~fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_pl.html"},{"title":"fraggle_io_log_regime – swiftest","text":"module subroutine fraggle_io_log_regime(colliders, frag) Interface → Writes a log of the results of the collisional regime determination Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( fraggle_fragments ), intent(in) :: frag Fraggle fragment object Called by proc~~fraggle_io_log_regime~~CalledByGraph proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime proc~fraggle_regime_colliders fraggle_regime_colliders proc~fraggle_regime_colliders->interface~fraggle_io_log_regime interface~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_regime.html"},{"title":"fraggle_io_log_start – swiftest","text":"module subroutine fraggle_io_log_start(param) Interface → Checks to see if the Fraggle log file needs to be replaced if this is a new run, or appended if this is a restarted run Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Called by proc~~fraggle_io_log_start~~CalledByGraph proc~fraggle_io_log_start fraggle_io_log_start interface~fraggle_io_log_start fraggle_io_log_start interface~fraggle_io_log_start->proc~fraggle_io_log_start Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_start.html"},{"title":"fraggle_generate_fragments – swiftest","text":"module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Interface → Uses ieee_exceptions proc~~fraggle_generate_fragments~~UsesGraph proc~fraggle_generate_fragments fraggle_generate_fragments ieee_exceptions ieee_exceptions proc~fraggle_generate_fragments->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Generates a system of fragments in barycentric coordinates that conserves energy and momentum. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle system object the outputs will be the fragmentation class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead? Calls proc~~fraggle_generate_fragments~~CallsGraph proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_generate_fragments->interface~fraggle_io_log_generate proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_tan_vel->util_minimize_bfgs interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb lambda_obj lambda_obj proc~fraggle_generate_tan_vel->lambda_obj interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_rad_vel->util_minimize_bfgs proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->lambda_obj proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_fragments~~CalledByGraph proc~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_fragments.html"},{"title":"fraggle_regime_colliders – swiftest","text":"module subroutine fraggle_regime_colliders(self, frag, system, param) Interface → Determine which fragmentation regime the set of colliders will be. This subroutine is a wrapper for the non-polymorphic raggle_regime_collresolve subroutine.\n It converts to SI units prior to calling\n The two-body equivalent masses of the collider system\n The two-body equivalent radii of the collider system\n The two-body equivalent density of the collider system\n The first body of the two-body equivalent position vector the collider system\n The first body of the two-body equivalent velocity vector the collider system\n The second body of the two-body equivalent position vector the collider system\n The second body of the two-body equivalent velocity vector the collider system\n The central body mass of the system\n The minimum fragment mass to generate. Collider systems that would otherwise generate less massive fragments than this value will be forced to merge instead\n Use the positions and velocities of the parents from indside the step (at collision) to calculate the collisional regime Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters Calls proc~~fraggle_regime_colliders~~CallsGraph proc~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_regime_colliders->interface~fraggle_io_log_regime proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_regime_colliders~~CalledByGraph proc~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_regime_colliders.html"},{"title":"fraggle_placeholder_accel – swiftest","text":"module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Interface → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step Called by proc~~fraggle_placeholder_accel~~CalledByGraph proc~fraggle_placeholder_accel fraggle_placeholder_accel interface~fraggle_placeholder_accel fraggle_placeholder_accel interface~fraggle_placeholder_accel->proc~fraggle_placeholder_accel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_placeholder_accel.html"},{"title":"fraggle_placeholder_kick – swiftest","text":"module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~fraggle_placeholder_kick~~CalledByGraph proc~fraggle_placeholder_kick fraggle_placeholder_kick interface~fraggle_placeholder_kick fraggle_placeholder_kick interface~fraggle_placeholder_kick->proc~fraggle_placeholder_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_placeholder_kick.html"},{"title":"fraggle_placeholder_step – swiftest","text":"module subroutine fraggle_placeholder_step(self, system, param, t, dt) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~fraggle_placeholder_step~~CalledByGraph proc~fraggle_placeholder_step fraggle_placeholder_step interface~fraggle_placeholder_step fraggle_placeholder_step interface~fraggle_placeholder_step->proc~fraggle_placeholder_step Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_placeholder_step.html"},{"title":"fraggle_setup_reset_fragments – swiftest","text":"module subroutine fraggle_setup_reset_fragments(self) Interface → Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Called by proc~~fraggle_setup_reset_fragments~~CalledByGraph proc~fraggle_setup_reset_fragments fraggle_setup_reset_fragments interface~fraggle_setup_reset_fragments fraggle_setup_reset_fragments interface~fraggle_setup_reset_fragments->proc~fraggle_setup_reset_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_setup_reset_fragments.html"},{"title":"fraggle_setup_fragments – swiftest","text":"module subroutine fraggle_setup_fragments(self, n, param) Interface → Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self integer(kind=I4B), intent(in) :: n class( swiftest_parameters ), intent(in) :: param Calls proc~~fraggle_setup_fragments~~CallsGraph proc~fraggle_setup_fragments fraggle_setup_fragments setup_pl setup_pl proc~fraggle_setup_fragments->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_setup_fragments~~CalledByGraph proc~fraggle_setup_fragments fraggle_setup_fragments interface~fraggle_setup_fragments fraggle_setup_fragments interface~fraggle_setup_fragments->proc~fraggle_setup_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_setup_fragments.html"},{"title":"fraggle_set_budgets_fragments – swiftest","text":"module subroutine fraggle_set_budgets_fragments(self, colliders) Interface → Sets the energy and momentum budgets of the fragments based on the collider values and the before/after values of energy and momentum Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_budgets_fragments~~CalledByGraph proc~fraggle_set_budgets_fragments fraggle_set_budgets_fragments interface~fraggle_set_budgets_fragments fraggle_set_budgets_fragments interface~fraggle_set_budgets_fragments->proc~fraggle_set_budgets_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_budgets_fragments.html"},{"title":"fraggle_set_mass_dist_fragments – swiftest","text":"module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Interface → Sets the mass of fragments based on the mass distribution returned by the regime calculation.\n This subroutine must be run after the the setup rourtine has been run on the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters Called by proc~~fraggle_set_mass_dist_fragments~~CalledByGraph proc~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments interface~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments interface~fraggle_set_mass_dist_fragments->proc~fraggle_set_mass_dist_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_mass_dist_fragments.html"},{"title":"fraggle_set_coordinate_system – swiftest","text":"module subroutine fraggle_set_coordinate_system(self, colliders) Interface → Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_coordinate_system~~CalledByGraph proc~fraggle_set_coordinate_system fraggle_set_coordinate_system interface~fraggle_set_coordinate_system fraggle_set_coordinate_system interface~fraggle_set_coordinate_system->proc~fraggle_set_coordinate_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_coordinate_system.html"},{"title":"fraggle_set_natural_scale_factors – swiftest","text":"module subroutine fraggle_set_natural_scale_factors(self, colliders) Interface → Scales dimenional quantities to ~O(1) with respect to the collisional system. \n This scaling makes it easier for the non-linear minimization to converge on a solution Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_natural_scale_factors~~CalledByGraph proc~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors interface~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors interface~fraggle_set_natural_scale_factors->proc~fraggle_set_natural_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_natural_scale_factors.html"},{"title":"fraggle_set_original_scale_factors – swiftest","text":"module subroutine fraggle_set_original_scale_factors(self, colliders) Interface → Uses ieee_exceptions proc~~fraggle_set_original_scale_factors~~UsesGraph proc~fraggle_set_original_scale_factors fraggle_set_original_scale_factors ieee_exceptions ieee_exceptions proc~fraggle_set_original_scale_factors->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Restores dimenional quantities back to the system units Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_original_scale_factors~~CalledByGraph proc~fraggle_set_original_scale_factors fraggle_set_original_scale_factors interface~fraggle_set_original_scale_factors fraggle_set_original_scale_factors interface~fraggle_set_original_scale_factors->proc~fraggle_set_original_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_original_scale_factors.html"},{"title":"rmvs_discard_tp – swiftest","text":"module subroutine rmvs_discard_tp(self, system, param) Interface → Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered Adapted from Hal Levison's Swift routine discard_pl.f\n Adapted from Hal Levison's Swift routine rmvs_discard_pl.f90 Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~rmvs_discard_tp~~CallsGraph proc~rmvs_discard_tp rmvs_discard_tp discard_tp discard_tp proc~rmvs_discard_tp->discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_discard_tp~~CalledByGraph proc~rmvs_discard_tp rmvs_discard_tp interface~rmvs_discard_tp rmvs_discard_tp interface~rmvs_discard_tp->proc~rmvs_discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_discard_tp.html"},{"title":"rmvs_util_append_pl – swiftest","text":"module subroutine rmvs_util_append_pl(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~rmvs_util_append_pl~~CallsGraph proc~rmvs_util_append_pl rmvs_util_append_pl util_append util_append proc~rmvs_util_append_pl->util_append whm_util_append_pl whm_util_append_pl proc~rmvs_util_append_pl->whm_util_append_pl util_exit util_exit proc~rmvs_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_append_pl~~CalledByGraph proc~rmvs_util_append_pl rmvs_util_append_pl interface~rmvs_util_append_pl rmvs_util_append_pl interface~rmvs_util_append_pl->proc~rmvs_util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_append_pl.html"},{"title":"rmvs_util_append_tp – swiftest","text":"module subroutine rmvs_util_append_tp(self, source, lsource_mask) Interface → Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~rmvs_util_append_tp~~CallsGraph proc~rmvs_util_append_tp rmvs_util_append_tp util_append util_append proc~rmvs_util_append_tp->util_append util_append_tp util_append_tp proc~rmvs_util_append_tp->util_append_tp util_exit util_exit proc~rmvs_util_append_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_append_tp~~CalledByGraph proc~rmvs_util_append_tp rmvs_util_append_tp interface~rmvs_util_append_tp rmvs_util_append_tp interface~rmvs_util_append_tp->proc~rmvs_util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_append_tp.html"},{"title":"rmvs_util_fill_pl – swiftest","text":"module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Interface → Insert new RMVS massive body structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~rmvs_util_fill_pl~~CallsGraph proc~rmvs_util_fill_pl rmvs_util_fill_pl whm_util_fill_pl whm_util_fill_pl proc~rmvs_util_fill_pl->whm_util_fill_pl util_fill util_fill proc~rmvs_util_fill_pl->util_fill util_exit util_exit proc~rmvs_util_fill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_fill_pl~~CalledByGraph proc~rmvs_util_fill_pl rmvs_util_fill_pl interface~rmvs_util_fill_pl rmvs_util_fill_pl interface~rmvs_util_fill_pl->proc~rmvs_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_fill_pl.html"},{"title":"rmvs_util_fill_tp – swiftest","text":"module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Interface → Insert new RMVS test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~rmvs_util_fill_tp~~CallsGraph proc~rmvs_util_fill_tp rmvs_util_fill_tp util_fill util_fill proc~rmvs_util_fill_tp->util_fill util_fill_tp util_fill_tp proc~rmvs_util_fill_tp->util_fill_tp util_exit util_exit proc~rmvs_util_fill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_fill_tp~~CalledByGraph proc~rmvs_util_fill_tp rmvs_util_fill_tp interface~rmvs_util_fill_tp rmvs_util_fill_tp interface~rmvs_util_fill_tp->proc~rmvs_util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_fill_tp.html"},{"title":"rmvs_util_resize_pl – swiftest","text":"module subroutine rmvs_util_resize_pl(self, nnew) Interface → Checks the current size of a massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~rmvs_util_resize_pl~~CallsGraph proc~rmvs_util_resize_pl rmvs_util_resize_pl util_resize util_resize proc~rmvs_util_resize_pl->util_resize whm_util_resize_pl whm_util_resize_pl proc~rmvs_util_resize_pl->whm_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_resize_pl~~CalledByGraph proc~rmvs_util_resize_pl rmvs_util_resize_pl interface~rmvs_util_resize_pl rmvs_util_resize_pl interface~rmvs_util_resize_pl->proc~rmvs_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_resize_pl.html"},{"title":"rmvs_util_resize_tp – swiftest","text":"module subroutine rmvs_util_resize_tp(self, nnew) Interface → Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~rmvs_util_resize_tp~~CallsGraph proc~rmvs_util_resize_tp rmvs_util_resize_tp util_resize util_resize proc~rmvs_util_resize_tp->util_resize util_resize_tp util_resize_tp proc~rmvs_util_resize_tp->util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_resize_tp~~CalledByGraph proc~rmvs_util_resize_tp rmvs_util_resize_tp interface~rmvs_util_resize_tp rmvs_util_resize_tp interface~rmvs_util_resize_tp->proc~rmvs_util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_resize_tp.html"},{"title":"rmvs_util_sort_pl – swiftest","text":"module subroutine rmvs_util_sort_pl(self, sortby, ascending) Interface → Sort a RMVS massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~rmvs_util_sort_pl~~CallsGraph proc~rmvs_util_sort_pl rmvs_util_sort_pl whm_util_sort_pl whm_util_sort_pl proc~rmvs_util_sort_pl->whm_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_pl~~CalledByGraph proc~rmvs_util_sort_pl rmvs_util_sort_pl interface~rmvs_util_sort_pl rmvs_util_sort_pl interface~rmvs_util_sort_pl->proc~rmvs_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_pl.html"},{"title":"rmvs_util_sort_tp – swiftest","text":"module subroutine rmvs_util_sort_tp(self, sortby, ascending) Interface → Sort a RMVS test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~rmvs_util_sort_tp~~CallsGraph proc~rmvs_util_sort_tp rmvs_util_sort_tp util_sort_tp util_sort_tp proc~rmvs_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_tp~~CalledByGraph proc~rmvs_util_sort_tp rmvs_util_sort_tp interface~rmvs_util_sort_tp rmvs_util_sort_tp interface~rmvs_util_sort_tp->proc~rmvs_util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_tp.html"},{"title":"rmvs_util_sort_rearrange_pl – swiftest","text":"module subroutine rmvs_util_sort_rearrange_pl(self, ind) Interface → Rearrange RMVS massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~rmvs_util_sort_rearrange_pl~~CallsGraph proc~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_rearrange_pl~~CalledByGraph proc~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl interface~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl interface~rmvs_util_sort_rearrange_pl->proc~rmvs_util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_rearrange_pl.html"},{"title":"rmvs_util_sort_rearrange_tp – swiftest","text":"module subroutine rmvs_util_sort_rearrange_tp(self, ind) Interface → Rearrange RMVS test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~rmvs_util_sort_rearrange_tp~~CallsGraph proc~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp util_sort_rearrange_tp util_sort_rearrange_tp proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange_tp util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_rearrange_tp~~CalledByGraph proc~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp interface~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp interface~rmvs_util_sort_rearrange_tp->proc~rmvs_util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_rearrange_tp.html"},{"title":"rmvs_util_spill_pl – swiftest","text":"module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) RMVS test particle structure from active list to discard list Adapted from David E. Kaufmann's Swifter routine discard_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~rmvs_util_spill_pl~~CallsGraph proc~rmvs_util_spill_pl rmvs_util_spill_pl util_spill util_spill proc~rmvs_util_spill_pl->util_spill whm_util_spill_pl whm_util_spill_pl proc~rmvs_util_spill_pl->whm_util_spill_pl util_exit util_exit proc~rmvs_util_spill_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_spill_pl~~CalledByGraph proc~rmvs_util_spill_pl rmvs_util_spill_pl interface~rmvs_util_spill_pl rmvs_util_spill_pl interface~rmvs_util_spill_pl->proc~rmvs_util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_spill_pl.html"},{"title":"rmvs_util_spill_tp – swiftest","text":"module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) RMVS test particle structure from active list to discard list Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~rmvs_util_spill_tp~~CallsGraph proc~rmvs_util_spill_tp rmvs_util_spill_tp util_spill util_spill proc~rmvs_util_spill_tp->util_spill util_spill_tp util_spill_tp proc~rmvs_util_spill_tp->util_spill_tp util_exit util_exit proc~rmvs_util_spill_tp->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_spill_tp~~CalledByGraph proc~rmvs_util_spill_tp rmvs_util_spill_tp interface~rmvs_util_spill_tp rmvs_util_spill_tp interface~rmvs_util_spill_tp->proc~rmvs_util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_spill_tp.html"},{"title":"rmvs_kick_getacch_tp – swiftest","text":"module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute the oblateness acceleration in the inner encounter region with planets Performs a similar task as David E. Kaufmann's Swifter routine rmvs_kick_getacch_tp.f90, but \n uses object polymorphism, and so is not directly adapted. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~rmvs_kick_getacch_tp~~CallsGraph proc~rmvs_kick_getacch_tp rmvs_kick_getacch_tp whm_kick_getacch_tp whm_kick_getacch_tp proc~rmvs_kick_getacch_tp->whm_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_kick_getacch_tp~~CalledByGraph proc~rmvs_kick_getacch_tp rmvs_kick_getacch_tp interface~rmvs_kick_getacch_tp rmvs_kick_getacch_tp interface~rmvs_kick_getacch_tp->proc~rmvs_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_kick_getacch_tp.html"},{"title":"rmvs_io_write_encounter – swiftest","text":"module subroutine rmvs_io_write_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Interface → Write close encounter data from RMVS to output binary files\n  There is no direct file output from this subroutine Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90\n Adapted from Hal Levison's Swift routine io_write_encounter.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out Calls proc~~rmvs_io_write_encounter~~CallsGraph proc~rmvs_io_write_encounter rmvs_io_write_encounter util_exit util_exit proc~rmvs_io_write_encounter->util_exit io_write_frame_encounter io_write_frame_encounter proc~rmvs_io_write_encounter->io_write_frame_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_io_write_encounter~~CalledByGraph proc~rmvs_io_write_encounter rmvs_io_write_encounter interface~rmvs_io_write_encounter rmvs_io_write_encounter interface~rmvs_io_write_encounter->proc~rmvs_io_write_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_io_write_encounter.html"},{"title":"rmvs_setup_pl – swiftest","text":"module subroutine rmvs_setup_pl(self, n, param) Interface → Allocate RMVS test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine rmvs_setup.f90\n Call allocation method for parent class Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter Calls proc~~rmvs_setup_pl~~CallsGraph proc~rmvs_setup_pl rmvs_setup_pl whm_setup_pl whm_setup_pl proc~rmvs_setup_pl->whm_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_setup_pl~~CalledByGraph proc~rmvs_setup_pl rmvs_setup_pl interface~rmvs_setup_pl rmvs_setup_pl interface~rmvs_setup_pl->proc~rmvs_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_setup_pl.html"},{"title":"rmvs_setup_initialize_system – swiftest","text":"module subroutine rmvs_setup_initialize_system(self, param) Interface → Initialize an RMVS nbody system from files and sets up the planetocentric structures. We currently rearrange the pl order to keep it consistent with the way Swifter does it \n In Swifter, the central body occupies the first position in the pl list, and during\n encounters, the encountering planet is skipped in loops. In Swiftest, we instantiate an\n RMVS nbody system object attached to each pl to store planetocentric versions of the system\n to use during close encounters. Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~rmvs_setup_initialize_system~~CallsGraph proc~rmvs_setup_initialize_system rmvs_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~rmvs_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_setup_initialize_system~~CalledByGraph proc~rmvs_setup_initialize_system rmvs_setup_initialize_system interface~rmvs_setup_initialize_system rmvs_setup_initialize_system interface~rmvs_setup_initialize_system->proc~rmvs_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_setup_initialize_system.html"},{"title":"rmvs_setup_tp – swiftest","text":"module subroutine rmvs_setup_tp(self, n, param) Interface → Allocate WHM test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90\n Call allocation method for parent class. In this case, whm does not have its own setup method, so we use the base method for swiftest_tp Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter Calls proc~~rmvs_setup_tp~~CallsGraph proc~rmvs_setup_tp rmvs_setup_tp setup_tp setup_tp proc~rmvs_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_setup_tp~~CalledByGraph proc~rmvs_setup_tp rmvs_setup_tp interface~rmvs_setup_tp rmvs_setup_tp interface~rmvs_setup_tp->proc~rmvs_setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_setup_tp.html"},{"title":"rmvs_step_system – swiftest","text":"module subroutine rmvs_step_system(self, param, t, dt) Interface → Step massive bodies and and active test particles ahead in heliocentric coordinates Adapted from Hal Levison's Swift routine rmvs3_step.f\n Adapted from David E. Kaufmann's Swifter routine rmvs_step.f90 Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz Calls proc~~rmvs_step_system~~CallsGraph proc~rmvs_step_system rmvs_step_system proc~rmvs_step_out rmvs_step_out proc~rmvs_step_system->proc~rmvs_step_out proc~rmvs_interp_out rmvs_interp_out proc~rmvs_step_system->proc~rmvs_interp_out whm_step_system whm_step_system proc~rmvs_step_system->whm_step_system proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out->proc~rmvs_interp_in util_exit util_exit proc~rmvs_interp_out->util_exit proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_interp_in->util_exit xpc xpc proc~rmvs_peri_tp->xpc vpc vpc proc~rmvs_peri_tp->vpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_step_system~~CalledByGraph proc~rmvs_step_system rmvs_step_system interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_step_system.html"},{"title":"rmvs_encounter_check_tp – swiftest","text":"module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Interface → Determine whether a test particle and planet are having or will have an encounter within the next time step Adapted from David E. Kaufmann's Swifter routine: rmvs_chk.f90\n Adapted from Hal Levison's Swift routine rmvs3_chk.f Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter Calls proc~~rmvs_encounter_check_tp~~CallsGraph proc~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_chk_ind rmvs_chk_ind proc~rmvs_encounter_check_tp->interface~rmvs_chk_ind proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_encounter_check_tp~~CalledByGraph proc~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp->proc~rmvs_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_encounter_check_tp.html"},{"title":"rmvs_chk_ind – swiftest","text":"elemental module function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag) Interface → Determine whether a test particle and planet are having or will have an encounter within the next time step Adapted from David E. Kaufmann's Swifter routine: rmvs_chk_ind.f90\n Adapted from Hal Levison's Swift routine rmvs_chk_ind.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: r2 real(kind=DP), intent(in) :: v2 real(kind=DP), intent(in) :: vdotr real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit Return Value logical Called by proc~~rmvs_chk_ind~~CalledByGraph proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind proc~rmvs_encounter_check_tp rmvs_encounter_check_tp proc~rmvs_encounter_check_tp->interface~rmvs_chk_ind proc~symba_encounter_check_one symba_encounter_check_one proc~symba_encounter_check_one->interface~rmvs_chk_ind interface~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one->proc~symba_encounter_check_one interface~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp->proc~rmvs_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_chk_ind.html"},{"title":"orbel – swiftest","text":"Uses swiftest module~~orbel~~UsesGraph module~orbel orbel module~swiftest swiftest module~orbel->module~swiftest module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines xv2el Subroutines public pure elemental subroutine xv2el (mu, px, py, pz, vx, vy, vz, a, e, inc, capom, omega, capm) Arguments Type Intent Optional Attributes Name real(kind=8), intent(in) :: mu real(kind=8), intent(in) :: px real(kind=8), intent(in) :: py real(kind=8), intent(in) :: pz real(kind=8), intent(in) :: vx real(kind=8), intent(in) :: vy real(kind=8), intent(in) :: vz real(kind=8), intent(out) :: a real(kind=8), intent(out) :: e real(kind=8), intent(out) :: inc real(kind=8), intent(out) :: capom real(kind=8), intent(out) :: omega real(kind=8), intent(out) :: capm","tags":"","loc":"module/orbel.html"},{"title":"rmvs_classes – swiftest","text":"Definition of classes and methods specific to the Regularized Mixed Variable Symplectic (RMVS) integrator\n Partially adapted from David E. Kaufmann's Swifter module: module_rmvs.f90 rmvs_cb class definitions and method interfaces rmvs_tp class definitions and method interfaces RMVS test particle class rmvs_pl class definitions and method interfaces Uses swiftest_globals whm_classes module~~rmvs_classes~~UsesGraph module~rmvs_classes rmvs_classes module~swiftest_globals swiftest_globals module~rmvs_classes->module~swiftest_globals module~whm_classes whm_classes module~rmvs_classes->module~whm_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~whm_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~whm_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_rmvs_chk s_rmvs_discard s_rmvs_io s_rmvs_kick s_rmvs_setup s_rmvs_step s_rmvs_util module~~rmvs_classes~~UsedByGraph module~rmvs_classes rmvs_classes module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~rmvs_classes module~swiftest swiftest module~s_rmvs_setup->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~rmvs_classes module~s_rmvs_step->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~rmvs_classes module~s_rmvs_chk->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~rmvs_classes module~s_rmvs_util->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~rmvs_classes module~s_rmvs_discard->module~swiftest module~swiftest->module~rmvs_classes module~symba_classes symba_classes module~swiftest->module~symba_classes module~symba_classes->module~rmvs_classes module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~rmvs_classes module~s_rmvs_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~rmvs_classes module~s_rmvs_kick->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_kick->module~symba_classes module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_symba_drift->module~symba_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_util->module~symba_classes module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_collision->module~symba_classes module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_symba_encounter_check->module~symba_classes module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_step->module~symba_classes module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_discard->module~symba_classes module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_symba_setup->module~symba_classes proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_symba_io->module~symba_classes module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables NTENC NTPHENC NTPENC RHSCALE RHPSCALE FACQDT Interfaces rmvs_chk_ind rmvs_encounter_check_tp rmvs_discard_tp rmvs_io_write_encounter rmvs_kick_getacch_tp rmvs_setup_pl rmvs_setup_initialize_system rmvs_setup_tp rmvs_util_append_pl rmvs_util_append_tp rmvs_util_fill_pl rmvs_util_fill_tp rmvs_util_resize_pl rmvs_util_resize_tp rmvs_util_sort_pl rmvs_util_sort_tp rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_tp rmvs_util_spill_pl rmvs_util_spill_tp rmvs_step_system Derived Types rmvs_nbody_system rmvs_interp rmvs_cb rmvs_tp rmvs_pl Variables Type Visibility Attributes Name Initial integer(kind=I4B), private, parameter :: NTENC = 10 integer(kind=I4B), private, parameter :: NTPHENC = 3 integer(kind=I4B), private, parameter :: NTPENC = NTENC*NTPHENC real(kind=DP), private, parameter :: RHSCALE = 3.5_DP real(kind=DP), private, parameter :: RHPSCALE = 1.0_DP real(kind=DP), private, parameter :: FACQDT = 2.0_DP rmvs_nbody_system class definitions and method interfaces Interfaces interface public elemental module function rmvs_chk_ind(r2, v2, vdotr, dt, r2crit) result(lflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: r2 real(kind=DP), intent(in) :: v2 real(kind=DP), intent(in) :: vdotr real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit Return Value logical interface public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter interface public module subroutine rmvs_discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine rmvs_io_write_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out interface public module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine rmvs_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine rmvs_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine rmvs_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parametere interface public module subroutine rmvs_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine rmvs_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine rmvs_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine rmvs_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine rmvs_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine rmvs_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine rmvs_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine rmvs_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine rmvs_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Derived Types type, public, extends( whm_nbody_system ) :: rmvs_nbody_system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles logical, public :: lplanetocentric = .false. In the RMVS integrator, only test particles are discarded\n Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations real(kind=DP), public :: rts fraction of Hill's sphere radius to use as radius of encounter region real(kind=DP), public, dimension(:,:), allocatable :: vbeg Planet velocities at beginning ot step Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: initialize => rmvs_setup_initialize_system Replace the abstract procedures with concrete ones\n Performs RMVS-specific initilization steps, including generating the close encounter planetocentric structures procedure, public :: step => rmvs_step_system Advance the RMVS nbody system forward in time by one step type, private :: rmvs_interp Components Type Visibility Attributes Name Initial real(kind=DP), public, dimension(:, :), allocatable :: x interpolated heliocentric planet position for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: v interpolated heliocentric planet velocity for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: aobl Encountering planet's oblateness acceleration value real(kind=DP), public, dimension(:, :), allocatable :: atide Encountering planet's tidal acceleration value type, public, extends( whm_cb ) :: rmvs_cb RMVS central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( whm_tp ) :: rmvs_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as rmvs_setup_tp and rmvs_util_spill_tp Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp logical, public, dimension(:), allocatable :: lperi planetocentric pericenter passage flag (persistent for a full rmvs time step) over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plperP index of planet associated with pericenter distance peri (persistent over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plencP index of planet that test particle is encountering (not persistent for a full RMVS time step) type( rmvs_cb ), public :: cb_heliocentric Copy of original central body object passed to close encounter (used for oblateness acceleration during planetocentric encoountters) real(kind=DP), public, dimension(:,:), allocatable :: xheliocentric original heliocentric position (used for oblateness calculation during close encounters) integer(kind=I4B), public :: index inner substep number within current set integer(kind=I4B), public :: ipleP index value of encountering planet logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles procedure, public :: step => whm_step_tp Steps the particle forward one stepsize procedure, public :: discard => rmvs_discard_tp Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered procedure, public :: encounter_check => rmvs_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body procedure, public :: accel => rmvs_kick_getacch_tp Calculates either the standard or modified version of the acceleration depending if the\n    if the test particle is undergoing a close encounter or not procedure, public :: setup => rmvs_setup_tp Constructor method - Allocates space for the input number of bodiess procedure, public :: append => rmvs_util_append_tp Appends elements from one structure to another procedure, public :: fill => rmvs_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => rmvs_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: sort => rmvs_util_sort_tp Sorts body arrays by a sortable componen procedure, public :: rearrange => rmvs_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => rmvs_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, extends( whm_pl ) :: rmvs_pl RMVS massive body particle class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl integer(kind=I4B), public, dimension(:), allocatable :: nenc number of test particles encountering planet this full rmvs time step integer(kind=I4B), public, dimension(:), allocatable :: tpenc1P index of first test particle encountering planet integer(kind=I4B), public, dimension(:), allocatable :: plind Connects the planetocentric indices back to the heliocentric planet list type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters class( rmvs_nbody_system ), public, dimension(:), allocatable :: planetocentric Planetocentric version of the massive body objects (one for each massive body) logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. procedure, public :: step => whm_step_pl Steps the body forward one stepsize procedure, public :: setup => rmvs_setup_pl Constructor method - Allocates space for the input number of bodiess procedure, public :: append => rmvs_util_append_pl Appends elements from one structure to another procedure, public :: fill => rmvs_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => rmvs_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: sort => rmvs_util_sort_pl Sorts body arrays by a sortable componen procedure, public :: rearrange => rmvs_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => rmvs_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)","tags":"","loc":"module/rmvs_classes.html"},{"title":"swiftest_globals – swiftest","text":"Basic parameters, definitions, and global type definitions used throughout the Swiftest project\n Adapted from David E. Kaufmann's Swifter routine: swiftest_globals.f90 and module_swifter.f90 Uses iso_fortran_env Contents Variables I8B I4B I2B I1B SP DP QP PIBY2 PI PI3BY2 TWOPI THIRD DEG2RAD RAD2DEG GC einsteinC LOWERCASE_BEGIN LOWERCASE_END UPPERCASE_OFFSET VERSION_NUMBER UNKNOWN_INTEGRATOR BS HELIO RA15 TU4 WHM RMVS SYMBA RINGMOONS STRMAX NAMELEN ASCII_TYPE REAL4_TYPE REAL8_TYPE NETCDF_FLOAT_TYPE NETCDF_DOUBLE_TYPE EL XV XVEL CB_TYPE_NAME PL_TYPE_NAME TP_TYPE_NAME PL_TINY_TYPE_NAME nthreads NTHERSHOLD SUCCESS FAILURE USAGE HELP SUCCESS_MSG FAIL_MSG USAGE_MSG HELP_MSG ELLIPSE PARABOLA HYPERBOLA ACTIVE INACTIVE DISCARDED_RMAX DISCARDED_RMIN DISCARDED_RMAXU DISCARDED_PERI DISCARDED_PLR DISCARDED_PLQ DISCARDED_DRIFTERR MERGED DISRUPTION SUPERCATASTROPHIC GRAZE_AND_MERGE HIT_AND_RUN_DISRUPT HIT_AND_RUN_PURE COLLISION NEW_PARTICLE OLD_PARTICLE COLLRESOLVE_REGIME_MERGE COLLRESOLVE_REGIME_DISRUPTION COLLRESOLVE_REGIME_SUPERCATASTROPHIC COLLRESOLVE_REGIME_GRAZE_AND_MERGE COLLRESOLVE_REGIME_HIT_AND_RUN ADD SUB NDUMPFILES DUMP_CB_FILE DUMP_PL_FILE DUMP_TP_FILE DUMP_PARAM_FILE CB_INFILE PL_INFILE TP_INFILE BIN_OUTFILE BINUNIT PARTICLE_OUTFILE PARTICLEUNIT NDIM NDIM2 VSMALL NETCDF_OUTFILE TIME_DIMNAME ID_DIMNAME STR_DIMNAME PTYPE_VARNAME NAME_VARNAME NPL_VARNAME NTP_VARNAME A_VARNAME E_VARNAME INC_VARNAME CAPOM_VARNAME OMEGA_VARNAME CAPM_VARNAME XHX_VARNAME XHY_VARNAME XHZ_VARNAME VHX_VARNAME VHY_VARNAME VHZ_VARNAME GMASS_VARNAME RHILL_VARNAME RADIUS_VARNAME IP1_VARNAME IP2_VARNAME IP3_VARNAME ROTX_VARNAME ROTY_VARNAME ROTZ_VARNAME K2_VARNAME Q_VARNAME KE_ORB_VARNAME KE_SPIN_VARNAME PE_VARNAME L_ORBX_VARNAME L_ORBY_VARNAME L_ORBZ_VARNAME L_SPINX_VARNAME L_SPINY_VARNAME L_SPINZ_VARNAME L_ESCAPEX_VARNAME L_ESCAPEY_VARNAME L_ESCAPEZ_VARNAME ECOLLISIONS_VARNAME EUNTRACKED_VARNAME GMESCAPE_VARNAME STATUS_VARNAME ORIGIN_TYPE_VARNAME ORIGIN_TIME_VARNAME ORIGIN_XHX_VARNAME ORIGIN_XHY_VARNAME ORIGIN_XHZ_VARNAME ORIGIN_VHX_VARNAME ORIGIN_VHY_VARNAME ORIGIN_VHZ_VARNAME DISCARD_TIME_VARNAME DISCARD_XHX_VARNAME DISCARD_XHY_VARNAME DISCARD_XHZ_VARNAME DISCARD_VHX_VARNAME DISCARD_VHY_VARNAME DISCARD_VHZ_VARNAME DISCARD_BODY_ID_VARNAME Variables Type Visibility Attributes Name Initial integer, public, parameter :: I8B = int64 Symbolic name for kind types of 8-byte integers integer, public, parameter :: I4B = int32 Symbolic name for kind types of 4-byte integers integer, public, parameter :: I2B = int16 Symbolic name for kind types of 2-byte integers integer, public, parameter :: I1B = int8 Symbolic name for kind types of 1-byte integers integer, public, parameter :: SP = real32 Symbolic name for kind types of single-precision reals integer, public, parameter :: DP = real64 Symbolic name for kind types of double-precision reals integer, public, parameter :: QP = real128 Symbolic name for kind types of quad-precision reals real(kind=DP), public, parameter :: PIBY2 = 1.570796326794896619231321691639751442099_DP Definition of /(\\pi / 2) real(kind=DP), public, parameter :: PI = 3.141592653589793238462643383279502884197_DP Definition of /(\\pi) real(kind=DP), public, parameter :: PI3BY2 = 4.712388980384689857693965074919254326296_DP Definition of /(3 \\pi / 2) real(kind=DP), public, parameter :: TWOPI = 6.283185307179586476925286766559005768394_DP Definition of 2 \\pi real(kind=DP), public, parameter :: THIRD = 0.333333333333333333333333333333333333333_DP Definition of 1 / 3 real(kind=DP), public, parameter :: DEG2RAD = PI/180.0_DP Definition of conversion factor from degrees to radians real(kind=DP), public, parameter :: RAD2DEG = 180.0_DP/PI Definition of conversion factor from degrees to radians real(kind=DP), public, parameter :: GC = 6.6743E-11_DP Universal gravitational constant in SI units real(kind=DP), public, parameter :: einsteinC = 299792458.0_DP Speed of light in SI units integer(kind=I4B), public, parameter :: LOWERCASE_BEGIN = iachar('a') ASCII character set parameter for lower to upper conversion - start of lowercase integer(kind=I4B), public, parameter :: LOWERCASE_END = iachar('z') ASCII character set parameter for lower to upper conversion - end of lowercase integer(kind=I4B), public, parameter :: UPPERCASE_OFFSET = iachar('A')-iachar('a') ASCII character set parameter for lower to upper conversion - offset between upper and lower real(kind=SP), public, parameter :: VERSION_NUMBER = 0.1_SP swiftest version integer(kind=I4B), public, parameter :: UNKNOWN_INTEGRATOR = 1 Symbolic name for integrator types integer(kind=I4B), public, parameter :: BS = 2 integer(kind=I4B), public, parameter :: HELIO = 3 integer(kind=I4B), public, parameter :: RA15 = 4 integer(kind=I4B), public, parameter :: TU4 = 5 integer(kind=I4B), public, parameter :: WHM = 6 integer(kind=I4B), public, parameter :: RMVS = 7 integer(kind=I4B), public, parameter :: SYMBA = 8 integer(kind=I4B), public, parameter :: RINGMOONS = 9 integer(kind=I4B), public, parameter :: STRMAX = 512 Maximum size of character strings integer(kind=I4B), public, parameter :: NAMELEN = 32 Maximum size of name strings character(len=*), public, parameter :: ASCII_TYPE = 'ASCII' Symbolic name for ASCII file type character(len=*), public, parameter :: REAL4_TYPE = 'REAL4' Symbolic name for binary file type REAL4 character(len=*), public, parameter :: REAL8_TYPE = 'REAL8' Symbolic name for binary file type REAL8 character(len=*), public, parameter :: NETCDF_FLOAT_TYPE = 'NETCDF_FLOAT' Symbolic name for binary file type REAL8 character(len=*), public, parameter :: NETCDF_DOUBLE_TYPE = 'NETCDF_DOUBLE' Symbolic name for binary file type REAL8 character(len=*), public, parameter :: EL = 'EL' Symbolic name for binary output file contents for orbital elements character(len=*), public, parameter :: XV = 'XV' Symbolic name for binary output file contents for cartesian position and velocity vectors character(len=*), public, parameter :: XVEL = 'XVEL' Symbolic name for binary output file contents for both cartesian position and velocity and orbital elements character(len=*), public, parameter :: CB_TYPE_NAME = \"Central Body\" character(len=*), public, parameter :: PL_TYPE_NAME = \"Massive Body\" character(len=*), public, parameter :: TP_TYPE_NAME = \"Test Particle\" character(len=*), public, parameter :: PL_TINY_TYPE_NAME = \"Semi-Interacting Massive Body\" integer(kind=I4B), public :: nthreads = 1 Number of OpenMP threads integer(kind=I4B), public, parameter :: NTHERSHOLD = 1000 Threshold value for OpenMP loop parallelization integer(kind=I4B), public, parameter :: SUCCESS = 0 Symbolic name for function return/flag code for success integer(kind=I4B), public, parameter :: FAILURE = -1 Symbolic name for function return/flag code for failure integer(kind=I4B), public, parameter :: USAGE = -2 Symbolic name for function return/flag code for printing the usage message integer(kind=I4B), public, parameter :: HELP = -3 Symbolic name for function return/flag code for printing the usage message character(len=*), public, parameter :: SUCCESS_MSG = '(/, \"Normal termination of Swiftest (version \", f3.1, \")\")' character(len=*), public, parameter :: FAIL_MSG = '(/, \"Terminating Swiftest (version \", f3.1, \") due to error!!\")' character(len=*), public, parameter :: USAGE_MSG = '(\"Usage: swiftest [bs|helio|ra15|rmvs|symba|tu4|whm] \")' character(len=*), public, parameter :: HELP_MSG = USAGE_MSG integer(kind=I4B), public, parameter :: ELLIPSE = -1 Symbolic names for orbit types - ellipse integer(kind=I4B), public, parameter :: PARABOLA = 0 Symbolic names for orbit types - parabola integer(kind=I4B), public, parameter :: HYPERBOLA = 1 Symbolic names for orbit types - hyperbola integer(kind=I4B), public, parameter :: ACTIVE = 0 Symbolic names for body/particle status codes: integer(kind=I4B), public, parameter :: INACTIVE = 1 integer(kind=I4B), public, parameter :: DISCARDED_RMAX = -1 integer(kind=I4B), public, parameter :: DISCARDED_RMIN = -2 integer(kind=I4B), public, parameter :: DISCARDED_RMAXU = -3 integer(kind=I4B), public, parameter :: DISCARDED_PERI = -4 integer(kind=I4B), public, parameter :: DISCARDED_PLR = -5 integer(kind=I4B), public, parameter :: DISCARDED_PLQ = -6 integer(kind=I4B), public, parameter :: DISCARDED_DRIFTERR = -7 integer(kind=I4B), public, parameter :: MERGED = -8 integer(kind=I4B), public, parameter :: DISRUPTION = -9 integer(kind=I4B), public, parameter :: SUPERCATASTROPHIC = -10 integer(kind=I4B), public, parameter :: GRAZE_AND_MERGE = -11 integer(kind=I4B), public, parameter :: HIT_AND_RUN_DISRUPT = -12 integer(kind=I4B), public, parameter :: HIT_AND_RUN_PURE = -13 integer(kind=I4B), public, parameter :: COLLISION = -14 integer(kind=I4B), public, parameter :: NEW_PARTICLE = -15 integer(kind=I4B), public, parameter :: OLD_PARTICLE = -16 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_MERGE = 1 Symbolic names for collisional outcomes from collresolve_resolve: integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_DISRUPTION = 2 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_SUPERCATASTROPHIC = 3 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_GRAZE_AND_MERGE = 4 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_HIT_AND_RUN = 5 character(len=*), public, parameter :: ADD = '+1' String labels for body/particle addition/subtraction in discard file character(len=*), public, parameter :: SUB = '-1' integer(kind=I4B), public, parameter :: NDUMPFILES = 2 Standard file names character(len=*), public, parameter, dimension(2) :: DUMP_CB_FILE = ['dump_cb1.bin', 'dump_cb2.bin'] character(len=*), public, parameter, dimension(2) :: DUMP_PL_FILE = ['dump_pl1.bin', 'dump_pl2.bin'] character(len=*), public, parameter, dimension(2) :: DUMP_TP_FILE = ['dump_tp1.bin', 'dump_tp2.bin'] character(len=*), public, parameter, dimension(2) :: DUMP_PARAM_FILE = ['dump_param1.in', 'dump_param2.in'] character(len=*), public, parameter :: CB_INFILE = 'cb.in' Default file names that can be changed by the user in the parameters file character(len=*), public, parameter :: PL_INFILE = 'pl.in' character(len=*), public, parameter :: TP_INFILE = 'tp.in' character(len=*), public, parameter :: BIN_OUTFILE = 'bin.dat' integer(kind=I4B), public, parameter :: BINUNIT = 20 File unit number for the binary output file character(len=*), public, parameter :: PARTICLE_OUTFILE = 'particle.dat' integer(kind=I4B), public, parameter :: PARTICLEUNIT = 44 File unit number for the binary particle info output file integer(kind=I4B), public, parameter :: NDIM = 3 Miscellaneous constants:\n Number of dimensions in our reality integer(kind=I4B), public, parameter :: NDIM2 = 2*NDIM 2x the number of dimensions real(kind=DP), public, parameter :: VSMALL = 2*epsilon(1._DP) Very small number used to prevent floating underflow character(len=*), public, parameter :: NETCDF_OUTFILE = 'bin.nc' NetCDF variable names and constants\n Default output file name character(len=*), public, parameter :: TIME_DIMNAME = \"time\" NetCDF name of the time dimension character(len=*), public, parameter :: ID_DIMNAME = \"id\" NetCDF name of the particle id dimension character(len=*), public, parameter :: STR_DIMNAME = \"str\" NetCDF name of the particle id dimension character(len=*), public, parameter :: PTYPE_VARNAME = \"particle_type\" NetCDF name of the particle type variable character(len=*), public, parameter :: NAME_VARNAME = \"name\" NetCDF name of the particle name variable character(len=*), public, parameter :: NPL_VARNAME = \"npl\" NetCDF name of the number of active massive bodies variable character(len=*), public, parameter :: NTP_VARNAME = \"ntp\" NetCDF name of the number of active test particles variable character(len=*), public, parameter :: A_VARNAME = \"a\" NetCDF name of the semimajor axis variable character(len=*), public, parameter :: E_VARNAME = \"e\" NetCDF name of the eccentricity variable character(len=*), public, parameter :: INC_VARNAME = \"inc\" NetCDF name of the inclination variable character(len=*), public, parameter :: CAPOM_VARNAME = \"capom\" NetCDF name of the long. asc. node variable character(len=*), public, parameter :: OMEGA_VARNAME = \"omega\" NetCDF name of the arg. periapsis variable character(len=*), public, parameter :: CAPM_VARNAME = \"capm\" NetCDF name of the mean anomaly variable character(len=*), public, parameter :: XHX_VARNAME = \"xhx\" NetCDF name of the heliocentric position x variable character(len=*), public, parameter :: XHY_VARNAME = \"xhy\" NetCDF name of the heliocentric position y variable character(len=*), public, parameter :: XHZ_VARNAME = \"xhz\" NetCDF name of the heliocentric position z variable character(len=*), public, parameter :: VHX_VARNAME = \"vhx\" NetCDF name of the heliocentric velocity x variable character(len=*), public, parameter :: VHY_VARNAME = \"vhy\" NetCDF name of the heliocentric velocity y variable character(len=*), public, parameter :: VHZ_VARNAME = \"vhz\" NetCDF name of the heliocentric velocity z variable character(len=*), public, parameter :: GMASS_VARNAME = \"Gmass\" NetCDF name of the mass variable character(len=*), public, parameter :: RHILL_VARNAME = \"rhill\" NetCDF name of the hill radius variable character(len=*), public, parameter :: RADIUS_VARNAME = \"radius\" NetCDF name of the radius variable character(len=*), public, parameter :: IP1_VARNAME = \"Ip1\" NetCDF name of the axis 1 principal moment of inertial variable character(len=*), public, parameter :: IP2_VARNAME = \"Ip2\" NetCDF name of the axis 2 principal moment of inertial variable character(len=*), public, parameter :: IP3_VARNAME = \"Ip3\" NetCDF name of the axis 3 principal moment of inertial variable character(len=*), public, parameter :: ROTX_VARNAME = \"rotx\" NetCDF name of the rotation x variable character(len=*), public, parameter :: ROTY_VARNAME = \"roty\" NetCDF name of the rotation y variable character(len=*), public, parameter :: ROTZ_VARNAME = \"rotz\" NetCDF name of the rotation z variable character(len=*), public, parameter :: K2_VARNAME = \"k2\" NetCDF name of the Love number variable character(len=*), public, parameter :: Q_VARNAME = \"Q\" NetCDF name of the energy dissipation variable character(len=*), public, parameter :: KE_ORB_VARNAME = \"KE_orb\" NetCDF name of the system orbital kinetic energy variable character(len=*), public, parameter :: KE_SPIN_VARNAME = \"KE_spin\" NetCDF name of the system spin kinetic energy variable character(len=*), public, parameter :: PE_VARNAME = \"PE\" NetCDF name of the system potential energy variable character(len=*), public, parameter :: L_ORBX_VARNAME = \"L_orbx\" NetCDF name of the orbital angular momentum x variable character(len=*), public, parameter :: L_ORBY_VARNAME = \"L_orby\" NetCDF name of the orbital angular momentum y variable character(len=*), public, parameter :: L_ORBZ_VARNAME = \"L_orbz\" NetCDF name of the orbital angular momentum z variable character(len=*), public, parameter :: L_SPINX_VARNAME = \"L_spinx\" NetCDF name of the spin angular momentum x variable character(len=*), public, parameter :: L_SPINY_VARNAME = \"L_spiny\" NetCDF name of the spin angular momentum y variable character(len=*), public, parameter :: L_SPINZ_VARNAME = \"L_spinz\" NetCDF name of the spin angular momentum z variable character(len=*), public, parameter :: L_ESCAPEX_VARNAME = \"L_escapex\" NetCDF name of the escaped angular momentum x variable character(len=*), public, parameter :: L_ESCAPEY_VARNAME = \"L_escapey\" NetCDF name of the escaped angular momentum y variable character(len=*), public, parameter :: L_ESCAPEZ_VARNAME = \"L_escapez\" NetCDF name of the escaped angular momentum z variable character(len=*), public, parameter :: ECOLLISIONS_VARNAME = \"Ecollisions\" NetCDF name of the escaped angular momentum y variable character(len=*), public, parameter :: EUNTRACKED_VARNAME = \"Euntracked\" NetCDF name of the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) character(len=*), public, parameter :: GMESCAPE_VARNAME = \"GMescape\" NetCDF name of the G*Mass of bodies that escape the system character(len=*), public, parameter :: STATUS_VARNAME = \"status\" NetCDF name of the current status of the body variable (includes discard type) character(len=*), public, parameter :: ORIGIN_TYPE_VARNAME = \"origin_type\" NetCDF name of the origin type variable (Initial Conditions, Disruption, etc.) character(len=*), public, parameter :: ORIGIN_TIME_VARNAME = \"origin_time\" NetCDF name of the time of origin variable character(len=*), public, parameter :: ORIGIN_XHX_VARNAME = \"origin_xhx\" NetCDF name of the heliocentric position of the body at the time of origin x variable character(len=*), public, parameter :: ORIGIN_XHY_VARNAME = \"origin_xhy\" NetCDF name of the heliocentric position of the body at the time of origin y variable character(len=*), public, parameter :: ORIGIN_XHZ_VARNAME = \"origin_xhz\" NetCDF name of the heliocentric position of the body at the time of origin z variable character(len=*), public, parameter :: ORIGIN_VHX_VARNAME = \"origin_vhx\" NetCDF name of the heliocentric velocity of the body at the time of origin x variable character(len=*), public, parameter :: ORIGIN_VHY_VARNAME = \"origin_vhy\" NetCDF name of the heliocentric velocity of the body at the time of origin y variable character(len=*), public, parameter :: ORIGIN_VHZ_VARNAME = \"origin_vhz\" NetCDF name of the heliocentric velocity of the body at the time of origin z variable character(len=*), public, parameter :: DISCARD_TIME_VARNAME = \"discard_time\" NetCDF name of the time of discard variable character(len=*), public, parameter :: DISCARD_XHX_VARNAME = \"discard_xhx\" NetCDF name of the heliocentric position of the body at the time of discard x variable character(len=*), public, parameter :: DISCARD_XHY_VARNAME = \"discard_xhy\" NetCDF name of the heliocentric position of the body at the time of discard y variable character(len=*), public, parameter :: DISCARD_XHZ_VARNAME = \"discard_xhz\" NetCDF name of the heliocentric position of the body at the time of discard z variable character(len=*), public, parameter :: DISCARD_VHX_VARNAME = \"discard_vhx\" NetCDF name of the heliocentric velocity of the body at the time of discard x variable character(len=*), public, parameter :: DISCARD_VHY_VARNAME = \"discard_vhy\" NetCDF name of the heliocentric velocity of the body at the time of discard y variable character(len=*), public, parameter :: DISCARD_VHZ_VARNAME = \"discard_vhz\" NetCDF name of the heliocentric velocity of the body at the time of discard z variable character(len=*), public, parameter :: DISCARD_BODY_ID_VARNAME = \"discard_body_id\" NetCDF name of the id of the other body involved in the discard","tags":"","loc":"module/swiftest_globals.html"},{"title":"walltime_classes – swiftest","text":"Classes and methods used to compute elasped wall time Uses swiftest_globals module~~walltime_classes~~UsesGraph module~walltime_classes walltime_classes module~swiftest_globals swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by module~~walltime_classes~~UsedByGraph module~walltime_classes walltime_classes module~swiftest swiftest module~swiftest->module~walltime_classes module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces walltime_finish walltime_reset walltime_start Derived Types walltimer Subroutines walltime_finish walltime_reset walltime_start Interfaces interface public subroutine walltime_finish(self, nsubsteps, message) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output interface public subroutine walltime_reset(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object interface public subroutine walltime_start(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object Derived Types type, public :: walltimer Components Type Visibility Attributes Name Initial integer(kind=I8B), public :: count_rate Rate at wich the clock ticks integer(kind=I8B), public :: count_max Maximum value of the clock ticker integer(kind=I8B), public :: count_start_main Value of the clock ticker at when the timer is first called integer(kind=I8B), public :: count_start_step Value of the clock ticker at the start of a timed step integer(kind=I8B), public :: count_finish_step Value of the clock ticker at the end of a timed step logical, public :: lmain_is_started = .false. Logical flag indicating whether or not the main timer has been reset or not Type-Bound Procedures procedure, public :: reset => walltime_reset Resets the clock ticker, settting main_start to the current ticker value procedure, public :: start => walltime_start Starts the timer, setting step_start to the current ticker value procedure, public :: finish => walltime_finish Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal Subroutines public subroutine walltime_finish (self, nsubsteps, message) Author David A. Minton Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output public subroutine walltime_reset (self) Author David A. Minton Resets the clock ticker, settting main_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self public subroutine walltime_start (self) Author David A. Minton Starts the timer, setting step_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self","tags":"","loc":"module/walltime_classes.html"},{"title":"swiftest_operators – swiftest","text":"Custom operators, including\n   A .cross. B = Cross product of A(1:3) and B(1:3) Each operator can also do element-wise computation on arrays of the form .mag. A(1:3, 1:n) Interfaces for .cross. operator Interfaces for .mag. operator Uses swiftest_globals module~~swiftest_operators~~UsesGraph module~swiftest_operators swiftest_operators module~swiftest_globals swiftest_globals module~swiftest_operators->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_operator_mag s_operator_cross module~~swiftest_operators~~UsedByGraph module~swiftest_operators swiftest_operators module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest_operators module~swiftest swiftest module~s_operator_cross->module~swiftest module~swiftest->module~swiftest_operators module~s_operator_mag s_operator_mag module~s_operator_mag->module~swiftest_operators module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces operator(.cross.) operator(.mag.) Interfaces public interface operator(.cross.) public pure function operator_cross_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) public pure function operator_cross_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) public pure function operator_cross_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) public pure function operator_cross_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) public pure function operator_cross_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) public pure function operator_cross_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) public pure function operator_cross_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) public pure function operator_cross_el_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:), allocatable public pure function operator_cross_el_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:), allocatable public pure function operator_cross_el_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:), allocatable public pure function operator_cross_el_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:), allocatable public interface operator(.mag.) public pure function operator_mag_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) public pure function operator_mag_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) public pure function operator_mag_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A Return Value real(kind=QP) public pure function operator_mag_el_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:), allocatable public pure function operator_mag_el_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:), allocatable public pure function operator_mag_el_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:), allocatable","tags":"","loc":"module/swiftest_operators.html"},{"title":"helio_classes – swiftest","text":"Definition of classes and methods specific to the Democratic Heliocentric Method\n Adapted from David E. Kaufmann's Swifter routine: module_helio.f90 helio_nbody_system class definitions and method interfaces helio_cb class definitions and method interfaces helio_pl class definitions and method interfaces Helio massive body particle class helio_tp class definitions and method interfaces Helio test particle class Uses swiftest_globals swiftest_classes whm_classes module~~helio_classes~~UsesGraph module~helio_classes helio_classes module~swiftest_globals swiftest_globals module~helio_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~helio_classes->module~swiftest_classes module~whm_classes whm_classes module~helio_classes->module~whm_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_helio_drift s_helio_gr s_helio_kick s_helio_setup s_helio_step module~~helio_classes~~UsedByGraph module~helio_classes helio_classes module~s_helio_setup s_helio_setup module~s_helio_setup->module~helio_classes module~swiftest swiftest module~s_helio_setup->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~helio_classes module~s_helio_step->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~helio_classes module~s_helio_kick->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~helio_classes module~s_helio_gr->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~helio_classes module~s_helio_drift->module~swiftest module~swiftest->module~helio_classes module~symba_classes symba_classes module~swiftest->module~symba_classes module~symba_classes->module~helio_classes module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_kick->module~symba_classes module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_symba_drift->module~symba_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_collision->module~symba_classes module~orbel orbel module~orbel->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_util->module~symba_classes module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_symba_encounter_check->module~symba_classes module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_step->module~symba_classes module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_discard->module~symba_classes module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_symba_setup->module~symba_classes proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_symba_io->module~symba_classes module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces helio_drift_body helio_drift_pl helio_drift_tp helio_drift_linear_pl helio_drift_linear_tp helio_gr_kick_getacch_pl helio_gr_kick_getacch_tp helio_gr_p4_pl helio_gr_p4_tp helio_kick_getacch_pl helio_kick_getacch_tp helio_kick_vb_pl helio_kick_vb_tp helio_setup_initialize_system helio_step_pl helio_step_system helio_step_tp Derived Types helio_nbody_system helio_cb helio_pl helio_tp Interfaces interface public module subroutine helio_drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step interface public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step interface public module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine helio_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee Derived Types type, public, extends( whm_nbody_system ) :: helio_nbody_system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: step => helio_step_system Advance the Helio nbody system forward in time by one step procedure, public :: initialize => helio_setup_initialize_system Performs Helio-specific initilization steps, including converting to DH coordinates type, public, extends( swiftest_cb ) :: helio_cb Helio central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( swiftest_pl ) :: helio_pl Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: append => util_append_pl Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: drift => helio_drift_pl Method for Danby drift in Democratic Heliocentric coordinates procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => helio_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities procedure, public :: step => helio_step_pl Steps the body forward one stepsize type, public, extends( swiftest_tp ) :: helio_tp Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and procedure, public :: append => util_append_tp Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: drift => helio_drift_tp Method for Danby drift in Democratic Heliocentric coordinates procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => helio_kick_getacch_tp Compute heliocentric accelerations of massive bodies procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities procedure, public :: step => helio_step_tp Steps the body forward one stepsize","tags":"","loc":"module/helio_classes.html"},{"title":"whm_classes – swiftest","text":"Definition of classes and methods specific to the Democratic Heliocentric Method\n Partially adapted from David E. Kaufmann's Swifter module: module_whm.f90 whm_cb class definitions and method interfaces whm_pl class definitions and method interfaces whm_tp class definitions and method interfaces WHM test particle class whm_nbody_system class definitions and method interfaces Uses swiftest_globals swiftest_classes module~~whm_classes~~UsesGraph module~whm_classes whm_classes module~swiftest_globals swiftest_globals module~whm_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_whm_coord s_whm_gr s_whm_kick s_whm_setup s_whm_step s_whm_util whm_drift module~~whm_classes~~UsedByGraph module~whm_classes whm_classes module~rmvs_classes rmvs_classes module~rmvs_classes->module~whm_classes module~s_whm_util s_whm_util module~s_whm_util->module~whm_classes module~swiftest swiftest module~s_whm_util->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~whm_classes module~s_whm_gr->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~whm_classes module~s_whm_setup->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~whm_classes module~s_whm_coord->module~swiftest module~helio_classes helio_classes module~helio_classes->module~whm_classes module~s_whm_step s_whm_step module~s_whm_step->module~whm_classes module~s_whm_step->module~swiftest module~whm_drift whm_drift module~whm_drift->module~whm_classes module~whm_drift->module~swiftest module~swiftest->module~whm_classes module~swiftest->module~rmvs_classes module~swiftest->module~helio_classes module~symba_classes symba_classes module~swiftest->module~symba_classes module~s_whm_kick s_whm_kick module~s_whm_kick->module~whm_classes module~s_whm_kick->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_kick->module~symba_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_symba_drift->module~symba_classes module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~helio_classes module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~rmvs_classes module~s_rmvs_step->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~rmvs_classes module~s_rmvs_chk->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~helio_classes module~s_helio_step->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_util->module~symba_classes module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_collision->module~symba_classes module~s_helio_kick s_helio_kick module~s_helio_kick->module~helio_classes module~s_helio_kick->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_symba_encounter_check->module~symba_classes module~s_helio_gr s_helio_gr module~s_helio_gr->module~helio_classes module~s_helio_gr->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_step->module~symba_classes module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_discard->module~symba_classes module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~rmvs_classes module~s_rmvs_discard->module~swiftest module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~rmvs_classes module~s_rmvs_util->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~rmvs_classes module~s_rmvs_io->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~rmvs_classes module~s_rmvs_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~rmvs_classes module~s_rmvs_setup->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_symba_setup->module~symba_classes proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~helio_classes module~s_helio_drift->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_symba_io->module~symba_classes module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces whm_coord_h2j_pl whm_coord_j2h_pl whm_coord_vh2vj_pl whm_drift_pl whm_util_index_eucl_plpl whm_kick_getacch_pl whm_kick_getacch_tp whm_kick_vh_pl whm_kick_vh_tp whm_gr_kick_getacch_pl whm_gr_kick_getacch_tp whm_gr_p4_pl whm_gr_p4_tp whm_setup_pl whm_setup_initialize_system whm_step_pl whm_step_system whm_step_tp whm_util_append_pl whm_util_spill_pl whm_util_fill_pl whm_util_resize_pl whm_util_set_ir3j whm_util_set_mu_eta_pl whm_util_sort_pl whm_util_sort_rearrange_pl Derived Types whm_cb whm_pl whm_tp whm_nbody_system Interfaces interface public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree interface public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree interface public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree interface public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public subroutine whm_util_index_eucl_plpl(self, param) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of the test particle Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public module subroutine whm_setup_pl(self, n, param) Implementation → Reads WHM massive body object in from file Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body objectobject integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine whm_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine whm_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine whm_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine whm_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine whm_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object interface public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine whm_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine whm_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Derived Types type, public, extends( swiftest_cb ) :: whm_cb Swiftest central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( swiftest_pl ) :: whm_pl WHM massive body particle class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies procedure, public :: append => whm_util_append_pl Appends elements from one structure to another procedure, public :: fill => whm_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => whm_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. procedure, public :: sort => whm_util_sort_pl Sort a WHM massive body object in-place. procedure, public :: rearrange => whm_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => whm_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: setup => whm_setup_pl Constructor method - Allocates space for the input number of bodiess procedure, public :: step => whm_step_pl Steps the body forward one stepsize type, public, extends( swiftest_tp ) :: whm_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_util_spill_tp Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and procedure, public :: append => util_append_tp Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => whm_kick_getacch_tp Compute heliocentric accelerations of test particles procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles procedure, public :: step => whm_step_tp Steps the particle forward one stepsize type, public, extends( swiftest_nbody_system ) :: whm_nbody_system An abstract class for the WHM integrator nbody system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: initialize => whm_setup_initialize_system Replace the abstract procedures with concrete ones procedure, public :: step => whm_step_system Advance the WHM nbody system forward in time by one step","tags":"","loc":"module/whm_classes.html"},{"title":"fraggle_classes – swiftest","text":"Definition of classes and methods specific to Fraggel: The Fragment Generation Model fraggle_fragments class definitions and method interfaces Uses swiftest_globals swiftest_classes module~~fraggle_classes~~UsesGraph module~fraggle_classes fraggle_classes module~swiftest_globals swiftest_globals module~fraggle_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~fraggle_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_fraggle_generate s_fraggle_io s_fraggle_placeholder s_fraggle_regime s_fraggle_set s_fraggle_setup s_fraggle_util module~~fraggle_classes~~UsedByGraph module~fraggle_classes fraggle_classes module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~fraggle_classes module~swiftest swiftest module~s_fraggle_placeholder->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~fraggle_classes module~s_fraggle_generate->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~fraggle_classes module~s_fraggle_regime->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~fraggle_classes module~s_fraggle_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~fraggle_classes module~s_fraggle_set->module~swiftest module~swiftest->module~fraggle_classes module~symba_classes symba_classes module~swiftest->module~symba_classes module~symba_classes->module~fraggle_classes module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~fraggle_classes module~s_fraggle_io->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~fraggle_classes module~s_fraggle_util->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_kick->module~symba_classes module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_symba_drift->module~symba_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_util->module~symba_classes module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_collision->module~symba_classes module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_symba_encounter_check->module~symba_classes module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_step->module~symba_classes module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_discard->module~symba_classes module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_symba_setup->module~symba_classes proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_symba_io->module~symba_classes module~s_setup s_setup module~s_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables FRAGGLE_NMASS_DIST FRAGGLE_LOG_OUT FRAGGLE_LOG_UNIT Interfaces fraggle_util_vmag_to_vb fraggle_generate_fragments fraggle_io_log_generate fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_regime fraggle_io_log_start fraggle_placeholder_accel fraggle_placeholder_kick fraggle_placeholder_step fraggle_regime_colliders fraggle_set_budgets_fragments fraggle_set_coordinate_system fraggle_set_mass_dist_fragments fraggle_set_natural_scale_factors fraggle_set_original_scale_factors fraggle_setup_fragments fraggle_setup_reset_fragments fraggle_util_add_fragments_to_system fraggle_util_ang_mtm fraggle_util_construct_temporary_system fraggle_util_get_energy_momentum fraggle_util_restructure fraggle_util_shift_vector_to_origin Derived Types fraggle_colliders fraggle_fragments Variables Type Visibility Attributes Name Initial integer(kind=I4B), public, parameter :: FRAGGLE_NMASS_DIST = 3 Number of mass bins returned by the regime calculation (largest fragment, second largest, and remainder) character(len=*), public, parameter :: FRAGGLE_LOG_OUT = \"fraggle.log\" Name of log file for Fraggle diagnostic information integer(kind=I4B), public, parameter :: FRAGGLE_LOG_UNIT = 76 Unit number for Fraggle log file fraggle_colliders class definitions and method interfaces Interfaces interface public module function fraggle_util_vmag_to_vb(v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:), allocatable interface public module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead? interface public module subroutine fraggle_io_log_generate(frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag interface public module subroutine fraggle_io_log_one_message(message) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message interface public module subroutine fraggle_io_log_pl(pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters interface public module subroutine fraggle_io_log_regime(colliders, frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders class( fraggle_fragments ), intent(in) :: frag interface public module subroutine fraggle_io_log_start(param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param interface public module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Implementation → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step interface public module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine fraggle_placeholder_step(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsiz interface public module subroutine fraggle_regime_colliders(self, frag, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters interface public module subroutine fraggle_set_budgets_fragments(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_set_coordinate_system(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters interface public module subroutine fraggle_set_natural_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_set_original_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_setup_fragments(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object integer(kind=I4B), intent(in) :: n Number of fragments class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters interface public module subroutine fraggle_setup_reset_fragments(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self interface public module subroutine fraggle_util_add_fragments_to_system(frag, colliders, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters interface public module subroutine fraggle_util_ang_mtm(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object interface public module subroutine fraggle_util_construct_temporary_system(frag, system, param, tmpsys, tmpparam) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters interface public module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa interface public module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt interface public module subroutine fraggle_util_shift_vector_to_origin(m_frag, vec_frag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame Derived Types type, public :: fraggle_colliders Class definition for the variables that describe the bodies involved in the collision Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: ncoll Number of bodies involved in the collision integer(kind=I4B), public, dimension(:), allocatable :: idx Index of bodies involved in the collision real(kind=DP), public, dimension(NDIM,2) :: xb Two-body equivalent position vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: vb Two-body equivalent velocity vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: rot Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_spin Two-body equivalent spin angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_orbit Two-body equivalent orbital angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: Ip Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(2) :: mass Two-body equivalent mass of the collider bodies prior to the collision real(kind=DP), public, dimension(2) :: radius Two-body equivalent radii of the collider bodies prior to the collision Type-Bound Procedures procedure, public :: regime => fraggle_regime_colliders Determine which fragmentation regime the set of colliders will be type, public, extends( swiftest_pl ) :: fraggle_fragments Class definition for the variables that describe a collection of fragments by Fraggle barycentric coordinates Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public :: mtot Total mass of fragments real(kind=DP), public :: Qloss Energy lost during the collision real(kind=DP), public, dimension(FRAGGLE_NMASS_DIST) :: mass_dist Distribution of fragment mass determined by the regime calculation (largest fragment, second largest, and remainder) integer(kind=I4B), public :: regime Collresolve regime code for this collision real(kind=DP), public, dimension(NDIM) :: xbcom Center of mass position vector of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: vbcom Velocity vector of the center of mass of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: x_coll_unit x-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: y_coll_unit y-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: z_coll_unit z-direction unit vector of collisional system real(kind=DP), public, dimension(:,:), allocatable :: x_coll Array of fragment position vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_coll Array of fragment velocity vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_r_unit Array of radial direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_t_unit Array of tangential direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_n_unit Array of normal direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rmag Array of radial distance magnitudes of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rotmag Array of rotation magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_r_mag Array of radial direction velocity magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_t_mag Array of tangential direction velocity magnitudes of individual fragments real(kind=DP), public :: ke_orbit Current orbital kinetic energy of the system of fragments in the collisional frame real(kind=DP), public :: ke_spin Current spin kinetic energy of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_orbit Current orbital angular momentum of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_spin Current spin angular momentum of the system of fragments in the collisional frame real(kind=DP), public :: ke_budget Total kinetic energy budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_budget Total angular momentum budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: Lorbit_before Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lorbit_after Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_before Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_after Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_before Before/after total system angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_after Before/after total system angular momentum real(kind=DP), public :: ke_orbit_before Before/after orbital kinetic energy real(kind=DP), public :: ke_orbit_after Before/after orbital kinetic energy real(kind=DP), public :: ke_spin_before Before/after spin kinetic energy real(kind=DP), public :: ke_spin_after Before/after spin kinetic energy real(kind=DP), public :: pe_before Before/after potential energy real(kind=DP), public :: pe_after Before/after potential energy real(kind=DP), public :: Etot_before Before/after total system energy real(kind=DP), public :: Etot_after Before/after total system energy real(kind=DP), public :: dscale Distance dimension scale factor real(kind=DP), public :: mscale Mass scale factor real(kind=DP), public :: tscale Time scale factor real(kind=DP), public :: vscale Velocity scale factor (a convenience unit that is derived from dscale and tscale) real(kind=DP), public :: Escale Energy scale factor (a convenience unit that is derived from dscale, tscale, and mscale) real(kind=DP), public :: Lscale Angular momentum scale factor (a convenience unit that is derived from dscale, tscale, and mscale) Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: append => util_append_pl Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: generate_fragments => fraggle_generate_fragments Generates a system of fragments in barycentric coordinates that conserves energy and momentum. procedure, public :: accel => fraggle_placeholder_accel Placeholder subroutine to fulfill requirement for an accel method procedure, public :: kick => fraggle_placeholder_kick Placeholder subroutine to fulfill requirement for a kick method procedure, public :: step => fraggle_placeholder_step Placeholder subroutine to fulfill requirement for a step method procedure, public :: set_budgets => fraggle_set_budgets_fragments Sets the energy and momentum budgets of the fragments based on the collider value procedure, public :: set_coordinate_system => fraggle_set_coordinate_system Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. procedure, public :: set_mass_dist => fraggle_set_mass_dist_fragments Sets the distribution of mass among the fragments depending on the regime type procedure, public :: set_natural_scale => fraggle_set_natural_scale_factors Scales dimenional quantities to ~O(1) with respect to the collisional system. procedure, public :: set_original_scale => fraggle_set_original_scale_factors Restores dimenional quantities back to the original system units procedure, public :: setup => fraggle_setup_fragments Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. procedure, public :: reset => fraggle_setup_reset_fragments Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) procedure, public :: get_ang_mtm => fraggle_util_ang_mtm Calcualtes the current angular momentum of the fragments procedure, public :: get_energy_and_momentum => fraggle_util_get_energy_momentum Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) procedure, public :: restructure => fraggle_util_restructure Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints","tags":"","loc":"module/fraggle_classes.html"},{"title":"symba_classes – swiftest","text":"Definition of classes and methods specific to the SyMBA integrator\n Adapted from David E. Kaufmann's Swifter routine: module_symba.f90 symba_kinship class definitions and method interfaces symba_cb class definitions and method interfaces symba_pl class definitions and method interfaces symba_tp class definitions and method interfaces symba_encounter class definitions and method interfaces symba_pltpenc class definitions and method interfaces symba_plplenc class definitions and method interfaces symba_nbody_system class definitions and method interfaces Uses swiftest_globals swiftest_classes helio_classes rmvs_classes fraggle_classes module~~symba_classes~~UsesGraph module~symba_classes symba_classes module~rmvs_classes rmvs_classes module~symba_classes->module~rmvs_classes module~fraggle_classes fraggle_classes module~symba_classes->module~fraggle_classes module~helio_classes helio_classes module~symba_classes->module~helio_classes module~swiftest_globals swiftest_globals module~symba_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~symba_classes->module~swiftest_classes module~rmvs_classes->module~swiftest_globals module~whm_classes whm_classes module~rmvs_classes->module~whm_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_symba_collision s_symba_discard s_symba_drift s_symba_encounter_check s_symba_io s_symba_kick s_symba_setup s_symba_step s_symba_util module~~symba_classes~~UsedByGraph module~symba_classes symba_classes module~s_symba_kick s_symba_kick module~s_symba_kick->module~symba_classes module~swiftest swiftest module~s_symba_kick->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~symba_classes module~s_symba_drift->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~symba_classes module~s_symba_io->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~symba_classes module~s_symba_encounter_check->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~symba_classes module~s_symba_collision->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~symba_classes module~s_symba_util->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~symba_classes module~s_symba_setup->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~symba_classes module~s_symba_step->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~symba_classes module~s_symba_discard->module~swiftest module~swiftest->module~symba_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables NENMAX NTENC RHSCALE RSHELL Interfaces symba_collision_check_encounter symba_encounter_check_pl symba_encounter_check symba_encounter_check_tp symba_collision_casedisruption symba_collision_casehitandrun symba_collision_casemerge symba_collision_encounter_extract_collisions symba_collision_make_colliders_pl symba_collision_resolve_fragmentations symba_collision_resolve_mergers symba_collision_resolve_plplenc symba_collision_resolve_pltpenc symba_discard_pl symba_drift_pl symba_drift_tp symba_encounter_check_one symba_util_index_eucl_plpl symba_io_param_reader symba_io_param_writer symba_io_write_discard symba_kick_getacch_int_pl symba_kick_getacch_pl symba_kick_getacch_tp symba_kick_encounter symba_setup_initialize_system symba_setup_merger symba_setup_pl symba_setup_encounter symba_setup_tp symba_step_system symba_step_interp_system symba_step_set_recur_levels_system symba_step_recur_system symba_step_reset_system util_append symba_util_append_encounter symba_util_append_merger symba_util_append_pl symba_util_append_tp symba_util_copy_encounter util_fill symba_util_fill_pl symba_util_fill_tp symba_util_peri_pl symba_util_rearray_pl symba_util_reset_kinship util_resize symba_util_resize_merger symba_util_resize_pl symba_util_resize_tp symba_util_sort_pl symba_util_sort_tp util_sort_rearrange symba_util_sort_rearrange_pl symba_util_sort_rearrange_tp util_spill symba_util_spill_pl symba_util_spill_encounter symba_util_spill_tp Derived Types symba_parameters symba_kinship symba_cb symba_pl symba_merger symba_tp symba_encounter symba_pltpenc symba_plplenc symba_nbody_system Variables Type Visibility Attributes Name Initial integer(kind=I4B), private, parameter :: NENMAX = 32767 integer(kind=I4B), private, parameter :: NTENC = 3 real(kind=DP), private, parameter :: RHSCALE = 6.5_DP real(kind=DP), private, parameter :: RSHELL = 0.48075_DP Interfaces interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n interface public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter interface public module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter interface public module function symba_collision_casedisruption(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome interface public module function symba_collision_casehitandrun(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome interface public module function symba_collision_casemerge(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome interface public module subroutine symba_collision_encounter_extract_collisions(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision interface public module subroutine symba_collision_resolve_fragmentations(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions interface public module subroutine symba_collision_resolve_mergers(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions interface public module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level interface public module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-tp encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level interface public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine symba_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public pure elemental module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr interface public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Current run configuration parameters with SyMBA additionss integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Current run configuration parameters with SyMBA additions integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine symba_io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self interface public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration interface public module subroutine symba_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine symba_setup_merger(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for interface public module subroutine symba_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter interface public module subroutine symba_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine symba_step_interp_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine symba_step_set_recur_levels_system(self, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system objec integer(kind=I4B), intent(in) :: ireci Input recursion level interface public recursive module subroutine symba_step_recur_system(self, param, t, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level interface public module subroutine symba_step_reset_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions public interface util_append public subroutine symba_util_append_arr_kin(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_merger(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into public interface util_fill public subroutine symba_util_fill_arr_kin(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine symba_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions interface public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset public interface util_resize public subroutine symba_util_resize_arr_kin(arr, nnew) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size interface public module subroutine symba_util_resize_merger(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine symba_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine symba_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine symba_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order public interface util_sort_rearrange public subroutine symba_util_sort_rearrange_arr_kin(arr, ind, n) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange interface public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine symba_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) public interface util_spill public subroutine symba_util_spill_arr_kin(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list interface public module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Derived Types type, public, extends( swiftest_parameters ) :: symba_parameters Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters real(kind=DP), public :: GMTINY = -1.0_DP Smallest G*mass that is fully gravitating real(kind=DP), public :: min_GMfrag = -1.0_DP Smallest G*mass that can be produced in a fragmentation event integer(kind=I4B), public, dimension(:), allocatable :: seed Random seeds logical, public :: lfragmentation = .false. Do fragmentation modeling instead of simple merger. Type-Bound Procedures procedure, public :: dump => io_dump_param procedure, public :: read_in => io_read_in_param procedure, public :: reader => symba_io_param_reader procedure, public :: writer => symba_io_param_writer type, public :: symba_kinship Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step. Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: parent Index of parent particle integer(kind=I4B), public :: nchild number of children in merger list integer(kind=I4B), public, dimension(:), allocatable :: child Index of children particles type, public, extends( helio_cb ) :: symba_cb SyMBA central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step real(kind=DP), public :: GM0 = 0.0_DP Initial G*mass of the central body real(kind=DP), public :: dGM = 0.0_DP Change in G*mass of the central body real(kind=DP), public :: R0 = 0.0_DP Initial radius of the central body real(kind=DP), public :: dR = 0.0_DP Change in the radius of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( helio_pl ) :: symba_pl SyMBA massive body class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities procedure, public :: step => helio_step_pl Steps the body forward one stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: discard => symba_discard_pl Process massive body discards procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: setup => symba_setup_pl Constructor method - Allocates space for the input number of bodies procedure, public :: append => symba_util_append_pl Appends elements from one structure to another procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies procedure, public :: resize => symba_util_resize_pl Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small. procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, extends( symba_pl ) :: symba_merger Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step integer(kind=I4B), public, dimension(:), allocatable :: ncomp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities procedure, public :: step => helio_step_pl Steps the body forward one stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: discard => symba_discard_pl Process massive body discards procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_merger Appends elements from one structure to another procedure, public :: resize => symba_util_resize_merger Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. procedure, public :: setup => symba_setup_merger Constructor method - Allocates space for the input number of bodies type, public, extends( helio_tp ) :: symba_tp SyMBA test particle class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with planets this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this particle should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities procedure, public :: step => helio_step_tp Steps the body forward one stepsize procedure, public :: drift => symba_drift_tp Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure, public :: encounter_check => symba_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body procedure, public :: accel => symba_kick_getacch_tp Compute heliocentric accelerations of test particles procedure, public :: setup => symba_setup_tp Constructor method - Allocates space for the input number of bodies procedure, public :: append => symba_util_append_tp Appends elements from one structure to another procedure, public :: fill => symba_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => symba_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: sort => symba_util_sort_tp Sorts body arrays by a sortable componen procedure, public :: rearrange => symba_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => symba_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, extends( swiftest_encounter ) :: symba_encounter SyMBA class for tracking close encounters in a step Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another type, public, extends( symba_encounter ) :: symba_pltpenc SyMBA class for tracking pl-tp close encounters in a step Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another procedure, public :: resolve_collision => symba_collision_resolve_pltpenc Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c type, public, extends( symba_encounter ) :: symba_plplenc SyMBA class for tracking pl-pl close encounters in a step Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another procedure, public :: extract_collisions => symba_collision_encounter_extract_collisions Processes the pl-pl encounter list remove only those encounters that led to a collision procedure, public :: resolve_fragmentations => symba_collision_resolve_fragmentations Process list of collisions, determine the collisional regime, and then create fragments procedure, public :: resolve_mergers => symba_collision_resolve_mergers Process list of collisions and merge colliding bodies together procedure, public :: resolve_collision => symba_collision_resolve_plplenc Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c type, public, extends( helio_nbody_system ) :: symba_nbody_system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles class( symba_merger ), public, allocatable :: pl_adds List of added bodies in mergers or collisions class( symba_pltpenc ), public, allocatable :: pltpenc_list List of massive body-test particle encounters in a single step class( symba_plplenc ), public, allocatable :: plplenc_list List of massive body-massive body encounters in a single step class( symba_plplenc ), public, allocatable :: plplcollision_list List of massive body-massive body collisions in a single step integer(kind=I4B), public :: irec System recursion level Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: write_discard => symba_io_write_discard Write out information about discarded and merged planets and test particles in SyMBA procedure, public :: initialize => symba_setup_initialize_system Performs SyMBA-specific initilization steps procedure, public :: step => symba_step_system Advance the SyMBA nbody system forward in time by one step procedure, public :: interp => symba_step_interp_system Perform an interpolation step on the SymBA nbody system procedure, public :: set_recur_levels => symba_step_set_recur_levels_system Sets recursion levels of bodies and encounter lists to the current system level procedure, public :: recursive_step => symba_step_recur_system Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary procedure, public :: reset => symba_step_reset_system Resets pl, tp,and encounter structures at the start of a new step","tags":"","loc":"module/symba_classes.html"},{"title":"swiftest – swiftest","text":"This module serves to combine all of the Swiftest project modules under a single umbrella so that they can be accessed from individual submodule implementations with a simple \"use swiftest\" line. Uses swiftest_globals swiftest_operators swiftest_classes whm_classes rmvs_classes helio_classes symba_classes fraggle_classes lambda_function walltime_classes Contents None","tags":"","loc":"module/swiftest.html"},{"title":"swiftest_classes – swiftest","text":"Definition of data and structures generic to all integrators.\n Adapted from David E. Kaufmann's Swifter routine: module_swifter.f90 swiftest_parameters class definitions swiftest_swiftest_particle_info class definitions and method interfaces swiftest_base class definitions and methods swiftest_cb class definitions and methods swiftest_body definitions and methods swiftest_pl definitions and methods swiftest_tp definitions and methods swiftest_nbody_system class definitions and methods Uses swiftest_globals module~~swiftest_classes~~UsesGraph module~swiftest_classes swiftest_classes module~swiftest_globals swiftest_globals module~swiftest_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: drift_implementation s_discard s_gr s_io s_kick s_netcdf s_obl s_orbel s_setup s_tides_kick_getacch s_tides_step_spin s_user_kick_getacch s_util_append s_util_coord s_util_copy s_util_exit s_util_fill s_util_get_energy_momentum s_util_index s_util_minimize_bfgs s_util_peri s_util_rescale s_util_resize s_util_set s_util_solve s_util_sort s_util_spill s_util_valid s_util_version module~~swiftest_classes~~UsedByGraph module~swiftest_classes swiftest_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest_classes module~swiftest swiftest module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest_classes module~s_netcdf->module~swiftest module~fraggle_classes fraggle_classes module~fraggle_classes->module~swiftest_classes module~s_util_solve s_util_solve module~s_util_solve->module~swiftest_classes module~s_util_solve->module~swiftest module~s_io s_io module~s_io->module~swiftest_classes module~s_io->module~swiftest module~helio_classes helio_classes module~helio_classes->module~swiftest_classes module~whm_classes whm_classes module~helio_classes->module~whm_classes module~symba_classes symba_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~rmvs_classes rmvs_classes module~symba_classes->module~rmvs_classes module~s_util_append s_util_append module~s_util_append->module~swiftest_classes module~s_util_append->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest_classes module~s_util_fill->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest_classes module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest_classes module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest_classes module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest_classes module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest_classes module~drift_implementation->module~swiftest module~whm_classes->module~swiftest_classes module~s_gr s_gr module~s_gr->module~swiftest_classes module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest_classes module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest_classes module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest_classes module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest_classes module~s_kick->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest_classes module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest_classes module~s_util_valid->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest_classes module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest_classes module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest_classes module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest_classes module~s_util_minimize_bfgs->module~swiftest module~swiftest->module~swiftest_classes module~swiftest->module~fraggle_classes module~swiftest->module~helio_classes module~swiftest->module~symba_classes module~swiftest->module~whm_classes module~swiftest->module~rmvs_classes module~s_util_spill s_util_spill module~s_util_spill->module~swiftest_classes module~s_util_spill->module~swiftest proc~xv2el xv2el proc~xv2el->module~swiftest_classes module~s_util_copy s_util_copy module~s_util_copy->module~swiftest_classes module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest_classes module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest_classes module~s_tides_kick_getacch->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest_classes module~s_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest_classes module~s_util_sort->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest_classes module~s_util_version->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~symba_classes module~s_symba_kick->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~symba_classes module~s_symba_drift->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~whm_classes module~s_whm_util->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~helio_classes module~s_helio_setup->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~whm_classes module~s_whm_setup->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_rmvs_step->module~rmvs_classes module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~symba_classes module~s_symba_encounter_check->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~helio_classes module~s_helio_step->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~symba_classes module~s_symba_collision->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~symba_classes module~s_symba_util->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_rmvs_chk->module~rmvs_classes module~s_helio_kick s_helio_kick module~s_helio_kick->module~helio_classes module~s_helio_kick->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~symba_classes module~s_symba_step->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~helio_classes module~s_helio_gr->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~symba_classes module~s_symba_discard->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~whm_classes module~s_whm_step->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_rmvs_discard->module~rmvs_classes module~whm_drift whm_drift module~whm_drift->module~whm_classes module~whm_drift->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_rmvs_util->module~rmvs_classes module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~fraggle_classes module~s_fraggle_io->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_rmvs_io->module~rmvs_classes module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_rmvs_kick->module~rmvs_classes module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~fraggle_classes module~s_fraggle_placeholder->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_rmvs_setup->module~rmvs_classes module~s_whm_gr s_whm_gr module~s_whm_gr->module~whm_classes module~s_whm_gr->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~fraggle_classes module~s_fraggle_generate->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~symba_classes module~s_symba_setup->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~fraggle_classes module~s_fraggle_setup->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~whm_classes module~s_whm_coord->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~helio_classes module~s_helio_drift->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~whm_classes module~s_whm_kick->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~symba_classes module~s_symba_io->module~swiftest module~rmvs_classes->module~whm_classes module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~fraggle_classes module~s_fraggle_regime->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~fraggle_classes module~s_fraggle_set->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~fraggle_classes module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces io_get_args io_get_old_t_final_system io_get_token io_read_frame_body io_read_frame_cb io_read_frame_system discard_pl discard_system discard_tp drift_all drift_body drift_one util_index_eucl_plpl util_index_eucl_pltp gr_kick_getaccb_ns_body gr_kick_getacch gr_p4_pos_kick gr_pseudovel2vel gr_pv2vh_body gr_vel2pseudovel gr_vh2pv_body io_conservation_report io_dump_param io_dump_particle_info_base io_dump_particle_info io_dump_base io_dump_system io_param_reader io_param_writer io_read_in_body io_read_in_cb io_read_in_param io_read_in_particle_info io_read_particle_info_system io_write_discard io_toupper io_write_encounter io_write_frame_body io_write_frame_cb io_write_frame_encounter io_write_frame_system io_write_hdr_system kick_getacch_int_all_pl kick_getacch_int_one_pl kick_getacch_int_one_tp kick_getacch_int_pl kick_getacch_int_tp netcdf_close netcdf_initialize_output netcdf_open netcdf_write_frame_base netcdf_write_frame_system netcdf_write_hdr_system netcdf_write_particle_info_base obl_acc_body obl_acc_pl obl_acc_tp obl_pot_system orbel_el2xv_vec orbel_scget orbel_xv2aeq orbel_xv2aqt orbel_xv2el orbel_xv2el_vec setup_body setup_construct_system setup_encounter setup_initialize_particle_info_system setup_initialize_system setup_pl setup_tp tides_kick_getacch_pl tides_step_spin_system user_kick_getacch_body util_append util_append_body util_append_encounter util_append_pl util_append_tp util_coord_b2h_pl util_coord_b2h_tp util_coord_h2b_pl util_coord_h2b_tp util_coord_vb2vh_pl util_coord_vb2vh_tp util_coord_vh2vb_pl util_coord_vh2vb_tp util_coord_xh2xb_pl util_coord_xh2xb_tp util_copy_encounter util_copy_particle_info util_copy_particle_info_arr util_exit util_fill_body util_fill_pl util_fill_tp util_fill util_minimize_bfgs util_rescale_system util_peri_tp util_resize util_resize_body util_resize_encounter util_resize_pl util_resize_tp util_get_energy_momentum_system util_set_beg_end_pl util_set_ir3h util_set_msys util_set_mu_pl util_set_mu_tp util_set_particle_info util_set_rhill util_set_rhill_approximate util_solve_linear_system util_solve_rkf45 util_sort util_sort_rearrange util_sort_rearrange_body util_sort_rearrange_pl util_sort_rearrange_tp util_sort_body util_sort_pl util_sort_tp util_spill util_spill_body util_spill_encounter util_spill_pl util_spill_tp util_valid_id_system util_version Abstract Interfaces abstract_read_frame abstract_discard_body abstract_accel abstract_kick_body abstract_set_mu abstract_step_body abstract_step_system Derived Types netcdf_parameters swiftest_parameters swiftest_particle_info swiftest_base swiftest_cb swiftest_body swiftest_pl swiftest_tp swiftest_nbody_system swiftest_encounter Interfaces interface public module function io_get_args(integrator, param_file_name) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) interface public module function io_get_token(buffer, ifirst, ilast, ierr) result(token) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public pure module subroutine drift_all(mu, x, v, n, param, dt, mask, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: mask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public pure elemental module subroutine drift_one(mu, px, py, pz, vx, vy, vz, dt, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine util_index_eucl_pltp(self, pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public pure module subroutine gr_kick_getaccb_ns_body(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations interface public pure module subroutine gr_p4_pos_kick(param, x, v, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size interface public pure module subroutine gr_pseudovel2vel(param, mu, xh, pv, vh) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Swiftestcentric velocity vector interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public pure module subroutine gr_vel2pseudovel(param, mu, xh, vh, pv) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: vh Swiftestcentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen interface public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file interface public module subroutine io_dump_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Swiftest particle info metadata object integer(kind=I4B), intent(in) :: iu Open unformatted file unit number interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) The first element passes the integrator code to the reader integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) Not used in this procedure integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) interface public module subroutine io_read_in_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_toupper(string) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Swiftestcentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Swiftestcentric velocity vectors of the two encountering bodies interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array interface public pure module subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j interface public pure module subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, az) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object interface public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies interface public module subroutine netcdf_close(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_initialize_output(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_open(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public subroutine netcdf_write_frame_system(self, iu, param) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset interface public module subroutine obl_acc_body(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public pure module subroutine orbel_scget(angle, sx, cx) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx interface public pure module subroutine orbel_xv2aeq(mu, x, v, a, e, q) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: q periapsis interface public pure module subroutine orbel_xv2aqt(mu, x, v, a, q, capm, tperi) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage interface public pure module subroutine orbel_xv2el(mu, x, v, a, e, inc, capom, omega, capm) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine setup_body(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine setup_construct_system(system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step public interface util_append public subroutine util_append_arr_char_string(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DP(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DPvec(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_I4B(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_info(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_logical(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_body(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object interface public module subroutine util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into interface public module subroutine util_copy_particle_info(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source interface public module subroutine util_copy_particle_info_arr(source, dest, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object interface public module subroutine util_exit(code) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code Failure exit code interface public module subroutine util_fill_body(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public interface util_fill public subroutine util_fill_arr_char_string(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DP(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DPvec(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_I4B(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_info(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_logical(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:), allocatable interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters public interface util_resize public subroutine util_resize_arr_char_string(arr, nnew) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DP(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DPvec(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_I4B(arr, nnew) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_info(arr, nnew) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_logical(arr, nnew) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size interface public module subroutine util_resize_body(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: Active, Merged, Fragmented, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_set_rhill_approximate(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object public interface util_solve_linear_system public function util_solve_linear_system_d(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) public function util_solve_linear_system_q(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n) interface public module function util_solve_rkf45(f, y0in, t1, dt0, tol) result(y1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:), allocatable Final result public interface util_sort public subroutine util_sort_i4b(arr) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr public subroutine util_sort_index_i4b(arr, ind) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_sp(arr) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_sp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_dp(arr) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_dp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public interface util_sort_rearrange public subroutine util_sort_rearrange_arr_char_string(arr, ind, n) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DP(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DPvec(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_I4B(arr, ind, n) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_info(arr, ind, n) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_logical(arr, ind, n) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange interface public module subroutine util_sort_rearrange_body(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine util_sort_body(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order public interface util_spill public subroutine util_spill_arr_char_string(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DP(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DPvec(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I4B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I8B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_info(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_logical(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine util_version() Implementation → Arguments None Abstract Interfaces abstract interface public function abstract_read_frame(self, iu, param) result(ierr) Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful abstract interface public subroutine abstract_discard_body(self, system, param) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters abstract interface public subroutine abstract_accel(self, system, param, t, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step abstract interface public subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. abstract interface public subroutine abstract_set_mu(self, cb) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object abstract interface public subroutine abstract_step_body(self, system, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize abstract interface public subroutine abstract_step_system(self, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Derived Types type, public :: netcdf_parameters Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: out_type NetCDF output type (will be assigned either NF90_DOUBLE or NF90_FLOAT, depending on the user parameter) integer(kind=I4B), public :: ncid NetCDF ID for the output file integer(kind=I4B), public :: dimids (3) Dimensions of the NetCDF file integer(kind=I4B), public :: time_dimid NetCDF ID for the time dimension integer(kind=I4B), public :: id_dimid NetCDF ID for the particle id dimension integer(kind=I4B), public :: str_dimid NetCDF ID for the character string dimension integer(kind=I4B), public :: time_varid NetCDF ID for the time variable integer(kind=I4B), public :: id_varid NetCDF ID for the particle name variable integer(kind=I4B), public :: name_varid NetCDF ID for the namevariable integer(kind=I4B), public :: ptype_varid NetCDF ID for the particle type variable integer(kind=I4B), public :: npl_varid NetCDF ID for the number of active massive bodies variable integer(kind=I4B), public :: ntp_varid NetCDF ID for the number of active test particles variable integer(kind=I4B), public :: a_varid NetCDF ID for the semimajor axis variable integer(kind=I4B), public :: e_varid NetCDF ID for the eccentricity variable integer(kind=I4B), public :: inc_varid NetCDF ID for the inclination variable integer(kind=I4B), public :: capom_varid NetCDF ID for the long. asc. node variable integer(kind=I4B), public :: omega_varid NetCDF ID for the arg. periapsis variable integer(kind=I4B), public :: capm_varid NetCDF ID for the mean anomaly variable integer(kind=I4B), public :: xhx_varid NetCDF ID for the heliocentric position x variable integer(kind=I4B), public :: xhy_varid NetCDF ID for the heliocentric position y variable integer(kind=I4B), public :: xhz_varid NetCDF ID for the heliocentric position z variable integer(kind=I4B), public :: vhx_varid NetCDF ID for the heliocentric velocity x variable integer(kind=I4B), public :: vhy_varid NetCDF ID for the heliocentric velocity y variable integer(kind=I4B), public :: vhz_varid NetCDF ID for the heliocentric velocity z variable integer(kind=I4B), public :: Gmass_varid NetCDF ID for the mass variable integer(kind=I4B), public :: rhill_varid NetCDF ID for the hill radius variable integer(kind=I4B), public :: radius_varid NetCDF ID for the radius variable integer(kind=I4B), public :: Ip1_varid NetCDF ID for the axis 1 principal moment of inertia variable integer(kind=I4B), public :: Ip2_varid NetCDF ID for the axis 2 principal moment of inertia variable integer(kind=I4B), public :: Ip3_varid NetCDF ID for the axis 3 principal moment of inertia variable integer(kind=I4B), public :: rotx_varid NetCDF ID for the rotation x variable integer(kind=I4B), public :: roty_varid NetCDF ID for the rotation y variable integer(kind=I4B), public :: rotz_varid NetCDF ID for the rotation z variable integer(kind=I4B), public :: k2_varid NetCDF ID for the Love number variable integer(kind=I4B), public :: Q_varid NetCDF ID for the energy dissipation variable integer(kind=I4B), public :: KE_orb_varid NetCDF ID for the system orbital kinetic energy variable integer(kind=I4B), public :: KE_spin_varid NetCDF ID for the system spin kinetic energy variable integer(kind=I4B), public :: PE_varid NetCDF ID for the system potential energy variable integer(kind=I4B), public :: L_orbx_varid NetCDF ID for the system orbital angular momentum x variable integer(kind=I4B), public :: L_orby_varid NetCDF ID for the system orbital angular momentum y variable integer(kind=I4B), public :: L_orbz_varid NetCDF ID for the system orbital angular momentum z variable integer(kind=I4B), public :: L_spinx_varid NetCDF ID for the system spin angular momentum x variable integer(kind=I4B), public :: L_spiny_varid NetCDF ID for the system spin angular momentum y variable integer(kind=I4B), public :: L_spinz_varid NetCDF ID for the system spin angular momentum z variable integer(kind=I4B), public :: L_escapex_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapey_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapez_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: Ecollisions_varid NetCDF ID for the energy lost in collisions variable integer(kind=I4B), public :: Euntracked_varid NetCDF ID for the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) integer(kind=I4B), public :: GMescape_varid NetCDF ID for the G*Mass of bodies that escape the system integer(kind=I4B), public :: status_varid NetCDF ID for the status variable integer(kind=I4B), public :: origin_type_varid NetCDF ID for the origin type integer(kind=I4B), public :: origin_time_varid NetCDF ID for the origin time integer(kind=I4B), public :: origin_xhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_xhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_xhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: origin_vhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_vhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_vhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: discard_time_varid NetCDF ID for the time of discard variable integer(kind=I4B), public :: discard_xhx_varid NetCDF ID for the heliocentric position of the body at the time of discard x variable integer(kind=I4B), public :: discard_xhy_varid NetCDF ID for the heliocentric position of the body at the time of discard y variable integer(kind=I4B), public :: discard_xhz_varid NetCDF ID for the heliocentric position of the body at the time of discard z variable integer(kind=I4B), public :: discard_vhx_varid NetCDF ID for the heliocentric velocity of the body at the time of discard x variable integer(kind=I4B), public :: discard_vhy_varid NetCDF ID for the heliocentric velocity of the body at the time of discard y variable integer(kind=I4B), public :: discard_vhz_varid NetCDF ID for the heliocentric velocity of the body at the time of discard z variable integer(kind=I4B), public :: discard_body_id_varid NetCDF ID for the id of the other body involved in the discard Type-Bound Procedures procedure, public :: close => netcdf_close Closes an open NetCDF file procedure, public :: initialize => netcdf_initialize_output Initialize a set of parameters used to identify a NetCDF output object procedure, public :: open => netcdf_open Opens a NetCDF file type, public :: swiftest_parameters User defined parameters that are read in from the parameters input file. \n    Each paramter is initialized to a default values. Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters Type-Bound Procedures procedure, public :: reader => io_param_reader procedure, public :: writer => io_param_writer procedure, public :: dump => io_dump_param procedure, public :: read_in => io_read_in_param type, public :: swiftest_particle_info Class definition for the particle origin information object. This object is used to track time, location, and collisional regime\n of fragments produced in collisional events. Components Type Visibility Attributes Name Initial character(len=NAMELEN), public :: name Non-unique name character(len=NAMELEN), public :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=NAMELEN), public :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), public :: origin_time The time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), public :: discard_time The time of the particle's discard character(len=NAMELEN), public :: status Particle status description: Active, Merged, Fragmented, etc. real(kind=DP), public, dimension(NDIM) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), public, dimension(NDIM) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), public :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) Type-Bound Procedures procedure, public :: dump => io_dump_particle_info Dumps contents of particle information to file procedure, public :: read_in => io_read_in_particle_info Read in a particle information object from an open file procedure, public :: copy => util_copy_particle_info Copies one set of information object components into another, component-by-component procedure, public :: set_value => util_set_particle_info Sets one or more values of the particle information metadata object type, public, abstract :: swiftest_base An abstract superclass for a generic Swiftest object\n The minimal methods that all systems must have Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_frame => write_frame_netcdf Set up generic procedure that will switch between NetCDF or Fortran binary depending on arguments generic, public :: write_particle_info => write_particle_info_netcdf type, public, abstract, extends( swiftest_base ) :: swiftest_cb A concrete lass for the central body in a Swiftest simulation Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, abstract, extends( swiftest_base ) :: swiftest_body An abstract class for a generic collection of Swiftest bodies\n Superclass that defines the generic elements of a Swiftest particle Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure(abstract_discard_body), public :: discard procedure(abstract_kick_body), public :: kick procedure(abstract_set_mu), public :: set_mu procedure(abstract_step_body), public :: step procedure(abstract_accel), public :: accel procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: accel_obl => obl_acc_body Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: setup => setup_body A constructor that sets the number of bodies and allocates all allocatable arrays procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: append => util_append_body Appends elements from one structure to another procedure, public :: fill => util_fill_body \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_body Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) procedure, public :: sort => util_sort_body Sorts body arrays by a sortable componen procedure, public :: rearrange => util_sort_rearrange_body Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_body \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files type, public, abstract, extends( swiftest_body ) :: swiftest_pl An abstract class for a generic collection of Swiftest massive bodies\n Superclass that defines the generic elements of a Swiftest particle Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure(abstract_kick_body), public :: kick procedure(abstract_step_body), public :: step procedure(abstract_accel), public :: accel procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: append => util_append_pl Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, abstract, extends( swiftest_body ) :: swiftest_tp An abstract class for a generic collection of Swiftest test particles\n Superclass that defines the generic elements of a Swiftest test particle Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure(abstract_kick_body), public :: kick procedure(abstract_step_body), public :: step procedure(abstract_accel), public :: accel procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and procedure, public :: append => util_append_tp Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, abstract :: swiftest_nbody_system An abstract class for a basic Swiftest nbody system \n  This superclass contains a minimial system of a set of test particles (tp), massive bodies (pl), and a central body (cb) Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure(abstract_step_system), public :: step Each integrator will have its own version of the step procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: initialize => setup_initialize_system Initialize the system from input files procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers type, public :: swiftest_encounter Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter Type-Bound Procedures procedure, public :: setup => setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: append => util_append_encounter Appends elements from one structure to another procedure, public :: copy => util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file","tags":"","loc":"module/swiftest_classes.html"},{"title":"lambda_function – swiftest","text":"Defines a class that can enable objects that behave like lambda functions. To use this class, define a type of either lambda_obj or lambda_obj_err, or extend the lambda_obj class as necessary, such that an interface that matches the function you wish to lambdafy.\n Once defined, the lambda object can evaluate itself by calling the type-bound procedure eval. e.g. f%eval(x) (or f%eval(x, lerr), f%eval(x, [argument list], etc)) Example - Defining a lambda function f(x,rval,ival) where rval and ival are a real and integer argument, respectively. This implementation uses an abstract interface, though this is not\n strictly necessary unless you want to bind more than one function with the same interface. module lambda_new \n    use swiftest ! This will bring in the lambda_function module\n    ! Define types in a module type , extends ( lambda_obj ) :: lambda_obj_ri_args procedure ( abstract_lambda_ri_args ), pointer , nopass :: lambdaptr_ri_args => null () real ( DP ) :: rval !! Real parameter integer ( I4B ) :: ival !! Integer paramete contains generic :: init => lambda_ri_args_init procedure :: eval => lambda_ri_args_eval procedure , nopass :: lambda_ri_args_init final :: lambda_ri_args_destroy end type interface lambda_obj module procedure lambda_ri_args_init end interface abstract interface function abstract_lambda_ri_args ( x , rval , ival ) result ( y ) ! Template for the lambda function import DP , I4B real ( DP ), dimension (:), intent ( in ) :: x !! Dependent variable real ( DP ), intent ( in ) :: rval !! Real parameter integer ( I4B ), intent ( in ) :: ival !! Integer parameter real ( DP ) :: y !! Real result end function end interface contains\n    type(lambda_obj_ri_args) function lambda_ri_args_init(lambda, rval, ival)\n       !! Initializes the lambda function parameters (can be used as a structure constructor)\n       implicit none\n       procedure(abstract_lambda_ri_args)  :: lambda !! The lambda function that will be passed\n       real(DP),     intent(in)            :: rval     !! Real parameter\n       integer(I4B), intent(in)            :: ival     !! Integer parameter ! Assign the procedure passed to this function to the procedure pointer lambda_ri_args_init % lambdaptr_ri_args => lambda ! Assign the argument values lambda_ri_args_init % rval = rval lambda_ri_args_init % ival = ival return end function lambda_ri_args_init function lambda_ri_args_eval ( self , x ) result ( y ) !! Defines the evaluation method , allowing the lambda function to be called with a single argument implicit none class ( lambda_obj_ri_args ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x real ( DP ) :: y if ( associated ( self % lambdaptr_ri_args )) then y = self % lambdaptr_ri_args ( x , self % rval , self % ival ) self % lastval = y if ( allocated ( self % lastarg )) deallocate ( self % lastarg ) allocate ( self % lastarg , source = x ) else error stop \"Lambda function was not initialized\" end if end function lambda_ri_args_eval subroutine lambda_ri_args_destroy ( self ) !! Finalizer method . Use this as a template for cleaning up the object upon destruction , such as nullifying pointers implicit none type ( lambda_obj_ri_args ) :: self if ( associated ( self % lambdaptr_ri_args )) nullify ( self % lambdaptr_ri_args ) end subroutine lambda_ri_args_destroy function example_function ( x , rval , ival ) result ( y ) ! This is the actual function you are going to use as the lambda function . Its interface must match the abstract interface previously defined implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: rval integer ( I4B ), intent ( in ) :: ival ! Result real ( DP ) :: y ! Internals integer ( I4B ) :: i , n n = size ( x ) y = 42 . _DP * ival do i = 1 , n y = y + x ( i ) ** 2 end do return end function example_function end module lambda_new program usage\n    use swiftest\n    use lambda_new\n    implicit none\n    type(lambda_obj_ri_args) :: f\n    real(DP) :: sigma_par\n    integer(I4B) :: iwonky, i,j\n    real(DP), dimension(12) :: xarr sigma_par = 3 . 14 _DP iwonky = 13 f = lambda_obj ( example_function , sigma_par , iwonky ) do i = 1 , 10 xarr (:) = [( j * 0 . 25 _DP / i , j = 1 , 12 )] write ( * , * ) i , f % eval ( xarr ) end do end program usage Uses swiftest_globals module~~lambda_function~~UsesGraph module~lambda_function lambda_function module~swiftest_globals swiftest_globals module~lambda_function->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by module~~lambda_function~~UsedByGraph module~lambda_function lambda_function module~swiftest swiftest module~swiftest->module~lambda_function module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces lambda_obj Abstract Interfaces lambda0 lambda0err lambda0tvar Derived Types lambda_obj lambda_obj_err lambda_obj_tvar Functions lambda_init_0 lambda_init_0_err lambda_init_tvar lambda_eval_0 lambda_eval_0_err lambda_eval_tvar Subroutines lambda_destroy Interfaces public interface lambda_obj public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) Abstract Interfaces abstract interface public function lambda0(x) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) abstract interface public function lambda0err(x, lerr) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x logical, intent(out) :: lerr Return Value real(kind=DP) abstract interface public function lambda0tvar(x, t) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable Derived Types type, public :: lambda_obj Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg Constructor public  function lambda_init_0 (lambda) public  function lambda_init_0_err (lambda, lerr) public  function lambda_init_tvar (lambda, t) Finalizations Procedures final :: lambda_destroy","tags":"","loc":"module/lambda_function.html"},{"title":"s_kick – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_kick~~UsesGraph module~s_kick s_kick module~swiftest swiftest module~s_kick->module~swiftest module~swiftest_classes swiftest_classes module~s_kick->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines kick_getacch_int_pl kick_getacch_int_tp kick_getacch_int_all_pl kick_getacch_int_one_pl kick_getacch_int_one_tp Module Subroutines module subroutine kick_getacch_int_pl (self) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self pure module subroutine kick_getacch_int_tp (self, GMpl, xhp, npl) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies module subroutine kick_getacch_int_all_pl (npl, nplpl, k_plpl, x, Gmass, radius, acc) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array pure module subroutine kick_getacch_int_one_pl (rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j pure module subroutine kick_getacch_int_one_tp (rji2, xr, yr, zr, Gmpl, ax, ay, az) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle","tags":"","loc":"module/s_kick.html"},{"title":"s_tides_kick_getacch – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_tides_kick_getacch~~UsesGraph module~s_tides_kick_getacch s_tides_kick_getacch module~swiftest swiftest module~s_tides_kick_getacch->module~swiftest module~swiftest_classes swiftest_classes module~s_tides_kick_getacch->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines tides_kick_getacch_pl Module Subroutines module subroutine tides_kick_getacch_pl (self, system) Interface → Author Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton Calculated tidal torques from central body to any planet and from any planet to central body\n planet - planet interactions are considered negligable.\n This is a constant time lag model. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"module/s_tides_kick_getacch.html"},{"title":"s_tides_step_spin – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_tides_step_spin~~UsesGraph module~s_tides_step_spin s_tides_step_spin module~swiftest swiftest module~s_tides_step_spin->module~swiftest module~swiftest_classes swiftest_classes module~s_tides_step_spin->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces lambda_obj Abstract Interfaces tidederiv Derived Types tides_derivs_func Functions tides_spin_derivs tides_derivs_eval tides_derivs_init Module Subroutines tides_step_spin_system Interfaces interface lambda_obj function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) Abstract Interfaces abstract interface function tidederiv(x, t, dt, xbeg, xend) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:), allocatable Derived Types type, extends(lambda_obj_tvar) :: tides_derivs_func Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Components Type Visibility Attributes Name Initial procedure( tidederiv ), public, pointer, nopass :: lambdaptr_tides_deriv real(kind=DP), public, dimension(:,:), allocatable :: xbeg real(kind=DP), public, dimension(:,:), allocatable :: xend real(kind=DP), public :: dt Type-Bound Procedures generic, public :: init => tides_derivs_init procedure, public :: evalt => tides_derivs_eval procedure, public, nopass :: tides_derivs_init Functions function tides_spin_derivs (rot_pl_cb, t, dt, xbeg, xend) result(drot) Need to add more arguments so we can pull in mass, radius, Ip, J2, etc...\n author: Jennifer L.L. Pouplin and David A. Minton Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: rot_pl_cb Array of rotations. The last element is the central body, and all others are massive bodies real(kind=DP), intent(in) :: t Current time, which is used to interpolate the massive body positions real(kind=DP), intent(in) :: dt Total step size real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:,:), allocatable function tides_derivs_eval (self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( tides_derivs_func ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) Module Subroutines module subroutine tides_step_spin_system (self, param, t, dt) Interface → Author Jennifer L.L. Pouplin and David A. Minton Integrates the spin equations for central and massive bodies of the system subjected to tides. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"module/s_tides_step_spin.html"},{"title":"s_obl – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_obl~~UsesGraph module~s_obl s_obl module~swiftest swiftest module~s_obl->module~swiftest module~swiftest_classes swiftest_classes module~s_obl->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions obl_pot_one Module Subroutines obl_acc_body obl_acc_pl obl_acc_tp obl_pot_system Functions elemental function obl_pot_one (npl, GMcb, GMpl, j2rp2, j4rp4, zh, irh) result(oblpot) Author David A. Minton Compute the contribution to the total gravitational potential due solely to the oblateness of the central body from a single massive body\n    Returned value does not include monopole term or terms higher than J4 Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in) :: GMcb G*mass of the central body real(kind=DP), intent(in) :: GMpl G*mass of the massive body real(kind=DP), intent(in) :: j2rp2 J_2 / R**2 of the central body real(kind=DP), intent(in) :: j4rp4 J_2 / R**4 of the central body real(kind=DP), intent(in) :: zh z-component of the heliocentric distance vector of the massive body real(kind=DP), intent(in) :: irh Inverse of the heliocentric distance magnitude of the massive body Return Value real(kind=DP) Gravitational potential Module Subroutines module subroutine obl_acc_body (self, system) Interface → Author David A. Minton Compute the barycentric accelerations of bodies due to the oblateness of the central body\n      Returned values do not include monopole term or terms higher than J4 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object module subroutine obl_acc_pl (self, system) Interface → Author David A. Minton Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object module subroutine obl_acc_tp (self, system) Interface → Author David A. Minton Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object module subroutine obl_pot_system (self) Interface → Author David A. Minton Compute the contribution to the total gravitational potential due solely to the oblateness of the central body\n    Returned value does not include monopole term or terms higher than J4 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object","tags":"","loc":"module/s_obl.html"},{"title":"s_orbel – swiftest","text":"Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_SCHGET.F PURPOSE : Given an angle , efficiently compute sinh and cosh . Input : angle ==> angle in radians ( real scalar ) Output : shx ==> sinh ( angle ) ( real scalar ) chx ==> cosh ( angle ) ( real scalar ) ALGORITHM : Obvious from the code REMARKS : Based on the routine SCGET for sine 's and cosine' s . We use the sqrt rather than cosh ( it 's faster) BE SURE THE ANGLE IS IN RADIANS AND IT CAN' T BE LARGER THAN 300 OR OVERFLOWS WILL OCCUR ! AUTHOR : M . Duncan . DATE WRITTEN : May 6 , 1992 . REVISIONS : Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 !                    ORBEL_FLON.F PURPOSE : Solves Kepler ' s eqn . for hyperbola using hybrid approach . Input : e ==> eccentricity anomaly . ( real scalar ) capn ==> hyperbola mean anomaly . ( real scalar ) Returns : orbel_flon ==> eccentric anomaly . ( real scalar ) ALGORITHM : Uses power series for N in terms of F and Newton , s method REMARKS : ONLY GOOD FOR LOW VALUES OF N ( N < 0 . 636 * e - 0 . 6 ) AUTHOR : M . Duncan DATE WRITTEN : May 26 , 1992 . REVISIONS : Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_FGET.F PURPOSE : Solves Kepler 's eqn. for hyperbola using hybrid approach. Input: e ==> eccentricity anomaly. (real scalar) capn ==> hyperbola mean anomaly. (real scalar) Returns: orbel_fget ==>  eccentric anomaly. (real scalar) ALGORITHM: Based on pp. 70-72 of Fitzpatrick' s book \"Principles of Cel. Mech. \" . Quartic convergence from Danby ' s book . REMARKS : AUTHOR : M . Duncan DATE WRITTEN : May 11 , 1992 . REVISIONS : 2 / 26 / 93 hfl Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_ZGET.F PURPOSE : Solves the equivalent of Kepler 's eqn. for a parabola given Q (Fitz. notation.) Input: q ==>  parabola mean anomaly. (real scalar) Returns: orbel_zget ==>  eccentric anomaly. (real scalar) ALGORITHM: p. 70-72 of Fitzpatrick' s book \"Princ. of Cel. Mech.\" REMARKS : For a parabola we can solve analytically . AUTHOR : M . Duncan DATE WRITTEN : May 11 , 1992 . REVISIONS : May 27 - corrected it for negative Q and use power series for small Q . Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_ESOLMD.F PURPOSE : Solves Kepler ' s eqn . e is ecc . m is mean anomaly . Input : e ==> eccentricity anomaly . ( real scalar ) m ==> mean anomaly . ( real scalar ) Returns : orbel_esolmd ==> eccentric anomaly . ( real scalar ) ALGORITHM : Some sort of quartic convergence from Wisdom . REMARKS : ONLY GOOD FOR SMALL ECCENTRICITY SINCE IT ONLY ITERATES ONCE . ( GOOD FOR PLANET CALCS .) ALSO DOES NOT PUT M OR E BETWEEN 0 . AND 2 * PI INCLUDES : needs SCGET . F AUTHOR : M . Duncan DATE WRITTEN : May 7 , 1992 . REVISIONS : 2 / 26 / 93 hfl Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_EHIE.F PURPOSE : Solves Kepler 's eqn.   e is ecc.   m is mean anomaly. Input: e ==> eccentricity anomaly. (real scalar) m ==> mean anomaly. (real scalar) Returns: orbel_ehybrid ==>  eccentric anomaly. (real scalar) ALGORITHM: Use Danby' s quartic for 3 iterations . Eqn . is f ( x ) = x - e * sin ( x + M ). Note that E = x + M . First guess is very good for e near 1 . Need to first get M between 0 . and PI and use symmetry to return right answer if M between PI and 2PI\n     REMARKS: Modifies M so that both E and M are in range (0,TWOPI)\n     AUTHOR: M. Duncan\n     DATE WRITTEN: May 25,1992.\n     REVISIONS: Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_EGET.F PURPOSE : Solves Kepler ' s eqn . e is ecc . m is mean anomaly . Input : e ==> eccentricity anomaly . ( real scalar ) m ==> mean anomaly . ( real scalar ) Returns : orbel_eget ==> eccentric anomaly . ( real scalar ) ALGORITHM : Quartic convergence from Danby REMARKS : For results very near roundoff , give it M between 0 and 2 * pi . One can condition M before calling EGET by calling my double precision function MOD2PI ( M ). This is not done within the routine to speed it up and because it works fine even for large M . AUTHOR : M . Duncan DATE WRITTEN : May 7 , 1992. REVISIONS : May 21 , 1992. Now have it go through EXACTLY two iterations with the premise that it will only be called if we have an ellipse with e between 0.15 and 0.8 Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_EHYBRID.F PURPOSE : Solves Kepler ' s eqn . e is ecc . m is mean anomaly . Input : e ==> eccentricity anomaly . ( real scalar ) m ==> mean anomaly . ( real scalar ) Returns : orbel_ehybrid ==> eccentric anomaly . ( real scalar ) ALGORITHM : For e < 0 . 18 uses fast routine ESOLMD For larger e but less than 0 . 8 , uses EGET For e > 0 . 8 uses EHIE REMARKS : Only EHIE brings M and E into range ( 0 , TWOPI ) AUTHOR : M . Duncan DATE WRITTEN : May 25 , 1992 . REVISIONS : 2 / 26 / 93 hfl Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_FHYBRID.F PURPOSE : Solves Kepler ' s eqn . for hyperbola using hybrid approach . Input : e ==> eccentricity anomaly . ( real scalar ) n ==> hyperbola mean anomaly . ( real scalar ) Returns : orbel_fhybrid ==> eccentric anomaly . ( real scalar ) ALGORITHM : For abs ( N ) < 0 . 636 * ecc - 0 . 6 , use FLON For larger N , uses FGET REMARKS : AUTHOR : M . Duncan DATE WRITTEN : May 26 , 1992 . REVISIONS :: REVISIONS : 2 / 26 / 93 hfl Uses swiftest Ancestors: swiftest_classes module~~s_orbel~~UsesGraph module~s_orbel s_orbel module~swiftest swiftest module~s_orbel->module~swiftest module~swiftest_classes swiftest_classes module~s_orbel->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions orbel_flon orbel_fget orbel_zget orbel_esolmd orbel_ehie orbel_eget orbel_ehybrid orbel_fhybrid Subroutines orbel_el2xv orbel_schget Module Subroutines orbel_el2xv_vec orbel_scget orbel_xv2aeq orbel_xv2aqt orbel_xv2el_vec orbel_xv2el Functions pure function orbel_flon (e, icapn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: icapn Return Value real(kind=DP) pure function orbel_fget (e, capn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: capn Return Value real(kind=DP) pure function orbel_zget (iq) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: iq Return Value real(kind=DP) pure function orbel_esolmd (e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) pure function orbel_ehie (e, im) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: im Return Value real(kind=DP) pure function orbel_eget (e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) pure function orbel_ehybrid (e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) pure function orbel_fhybrid (e, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: n Return Value real(kind=DP) Subroutines pure subroutine orbel_el2xv (mu, a, ie, inc, capom, omega, capm, x, v) Author David A. Minton Compute osculating orbital elements from relative C)rtesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: a real(kind=DP), intent(in) :: ie real(kind=DP), intent(in) :: inc real(kind=DP), intent(in) :: capom real(kind=DP), intent(in) :: omega real(kind=DP), intent(in) :: capm real(kind=DP), intent(out), dimension(:) :: x real(kind=DP), intent(out), dimension(:) :: v pure subroutine orbel_schget (angle, shx, chx) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: shx real(kind=DP), intent(out) :: chx Module Subroutines module subroutine orbel_el2xv_vec (self, cb) Interface → Author David A. Minton A wrapper method that converts all of the orbital element vectors into cartesian position and velocity vectors for a Swiftest body object.\n This method deallocates all of the orbital elements after it is finished. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body objec pure module subroutine orbel_scget (angle, sx, cx) Interface → Author David A. Minton Efficiently compute the sine and cosine of an input angle\n      Input angle must be in radians Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx pure module subroutine orbel_xv2aeq (mu, x, v, a, e, q) Interface → Author David A. Minton Compute semimajor axis, eccentricity, and pericentric distance from relative Cartesian position and velocity Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in), dimension(:) :: v real(kind=DP), intent(out) :: a real(kind=DP), intent(out) :: e real(kind=DP), intent(out) :: q pure module subroutine orbel_xv2aqt (mu, x, v, a, q, capm, tperi) Interface → Author David A. Minton Compute semimajor axis, pericentric distance, mean anomaly, and time to nearest pericenter passage from\n relative Cartesian position and velocity\n      tperi > 0 means nearest pericenter passage is in the future\n      tperi < 0 means nearest pericenter passage is in the past Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage module subroutine orbel_xv2el_vec (self, cb) Interface → Author David A. Minton A wrapper method that converts all of the cartesian position and velocity vectors of a Swiftest body object to orbital elements. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object pure module subroutine orbel_xv2el (mu, x, v, a, e, inc, capom, omega, capm) Interface → Author David A. Minton Compute osculating orbital elements from relative Cartesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly","tags":"","loc":"module/s_orbel.html"},{"title":"s_whm_coord – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_coord~~UsesGraph module~s_whm_coord s_whm_coord module~swiftest swiftest module~s_whm_coord->module~swiftest module~whm_classes whm_classes module~s_whm_coord->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_coord_h2j_pl whm_coord_j2h_pl whm_coord_vh2vj_pl Module Subroutines module subroutine whm_coord_h2j_pl (self, cb) Interface → Author David A. Minton Convert from heliocentric to Jacobi coordinates, massive bodies only Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree module subroutine whm_coord_j2h_pl (self, cb) Interface → Author David A. Minton Convert from Jacobi to heliocentric coordinates, massive bodies only. Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree module subroutine whm_coord_vh2vj_pl (self, cb) Interface → Author David A. Minton Convert from heliocentric to Jadcobi coordinates, massive body velocities only Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"module/s_whm_coord.html"},{"title":"s_whm_gr – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_gr~~UsesGraph module~s_whm_gr s_whm_gr module~swiftest swiftest module~s_whm_gr->module~swiftest module~whm_classes whm_classes module~s_whm_gr->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_gr_kick_getacch_pl whm_gr_kick_getacch_tp whm_gr_p4_pl whm_gr_p4_tp Module Subroutines module subroutine whm_gr_kick_getacch_pl (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters module subroutine whm_gr_kick_getacch_tp (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters pure module subroutine whm_gr_p4_pl (self, param, dt) Interface → Author David A. Minton Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size pure module subroutine whm_gr_p4_tp (self, param, dt) Interface → Author David A. Minton Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"module/s_whm_gr.html"},{"title":"s_whm_step – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_step~~UsesGraph module~s_whm_step s_whm_step module~swiftest swiftest module~s_whm_step->module~swiftest module~whm_classes whm_classes module~s_whm_step->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_step_system whm_step_pl whm_step_tp Module Subroutines module subroutine whm_step_system (self, param, t, dt) Interface → Author David A. Minton Step massive bodies and and active test particles ahead in heliocentric coordinates Read more… Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine whm_step_pl (self, system, param, t, dt) Interface → Author David A. Minton Step planets ahead using kick-drift-kick algorithm Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine whm_step_tp (self, system, param, t, dt) Interface → Author David A. Minton Step active test particles ahead using kick-drift-kick algorithm Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"module/s_whm_step.html"},{"title":"whm_drift – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~whm_drift~~UsesGraph module~whm_drift whm_drift module~swiftest swiftest module~whm_drift->module~swiftest module~whm_classes whm_classes module~whm_drift->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_drift_pl Module Subroutines module subroutine whm_drift_pl (self, system, param, dt) Interface → Author David A. Minton Loop through planets and call Danby drift routine Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"module/whm_drift.html"},{"title":"s_whm_kick – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_kick~~UsesGraph module~s_whm_kick s_whm_kick module~swiftest swiftest module~s_whm_kick->module~swiftest module~whm_classes whm_classes module~s_whm_kick->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions whm_kick_getacch_ah0 Subroutines whm_kick_getacch_ah1 whm_kick_getacch_ah2 Module Subroutines whm_kick_getacch_pl whm_kick_getacch_tp whm_kick_vh_pl whm_kick_vh_tp Functions function whm_kick_getacch_ah0 (mu, xhp, n) result(ah0) Author David A. Minton Compute zeroth term heliocentric accelerations of planets Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu real(kind=DP), intent(in), dimension(:,:) :: xhp integer(kind=I4B), intent(in) :: n Return Value real(kind=DP),\n  dimension(NDIM) Subroutines pure subroutine whm_kick_getacch_ah1 (cb, pl) Author David A. Minton Compute first term heliocentric accelerations of planets Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb WHM central body object class( whm_pl ), intent(inout) :: pl WHM massive body object pure subroutine whm_kick_getacch_ah2 (cb, pl) Author David A. Minton Compute second term heliocentric accelerations of planets Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb Swiftest central body object class( whm_pl ), intent(inout) :: pl WHM massive body object Module Subroutines module subroutine whm_kick_getacch_pl (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of planets Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine whm_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of test particles Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine whm_kick_vh_pl (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick heliocentric velocities of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. module subroutine whm_kick_vh_tp (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick heliocentric velocities of test particles Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"module/s_whm_kick.html"},{"title":"s_whm_setup – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_setup~~UsesGraph module~s_whm_setup s_whm_setup module~swiftest swiftest module~s_whm_setup->module~swiftest module~whm_classes whm_classes module~s_whm_setup->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_setup_pl whm_util_set_mu_eta_pl whm_setup_initialize_system Module Subroutines module subroutine whm_setup_pl (self, n, param) Interface → Author David A. Minton Allocate WHM planet structure Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter module subroutine whm_util_set_mu_eta_pl (self, cb) Interface → Author David A. Minton Sets the Jacobi mass value eta for all massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM system object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine whm_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize a WHM nbody system from files Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_whm_setup.html"},{"title":"s_whm_util – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_util~~UsesGraph module~s_whm_util s_whm_util module~swiftest swiftest module~s_whm_util->module~swiftest module~whm_classes whm_classes module~s_whm_util->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_util_append_pl whm_util_fill_pl whm_util_resize_pl whm_util_set_ir3j whm_util_sort_pl whm_util_sort_rearrange_pl whm_util_spill_pl Module Subroutines module subroutine whm_util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine whm_util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new WHM test particle structure into an old one. \n This is the inverse of a fill operation. Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine whm_util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine whm_util_set_ir3j (self) Interface → Author David A. Minton Sets the inverse Jacobi and heliocentric radii cubed (1/rj 3 and 1/rh 3) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object module subroutine whm_util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a WHM massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine whm_util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange WHM massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine whm_util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) WHM test particle structure from active list to discard list Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"module/s_whm_util.html"},{"title":"s_operator_cross – swiftest","text":"Contains implementations for the .cross. operator for all defined integer and real types\n Single vector implementations: C(1:3)   = A(1:3)   .cross. B(1:3) \n Vector list implementations:   C(1:3, :) = A(1:3, :) .cross. B(1:3, :) Uses swiftest Ancestors: swiftest_operators module~~s_operator_cross~~UsesGraph module~s_operator_cross s_operator_cross module~swiftest_operators swiftest_operators module~s_operator_cross->module~swiftest_operators module~swiftest swiftest module~s_operator_cross->module~swiftest module~swiftest_globals swiftest_globals module~swiftest_operators->module~swiftest_globals module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions operator_cross_sp operator_cross_dp operator_cross_qp operator_cross_i1b operator_cross_i2b operator_cross_i4b operator_cross_i8b operator_cross_el_sp operator_cross_el_dp operator_cross_el_qp operator_cross_el_i1b operator_cross_el_i2b operator_cross_el_i4b operator_cross_el_i8b Module Functions pure function operator_cross_sp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) pure function operator_cross_dp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) pure function operator_cross_qp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) pure function operator_cross_i1b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) pure function operator_cross_i2b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) pure function operator_cross_i4b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) pure function operator_cross_i8b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) pure function operator_cross_el_sp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:), allocatable pure function operator_cross_el_dp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:), allocatable pure function operator_cross_el_qp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:), allocatable pure function operator_cross_el_i1b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:), allocatable pure function operator_cross_el_i2b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:), allocatable pure function operator_cross_el_i4b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:), allocatable pure function operator_cross_el_i8b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:), allocatable","tags":"","loc":"module/s_operator_cross.html"},{"title":"s_operator_mag – swiftest","text":"Contains implementations for the .mag. operator for all defined real types\n Single vector implementations:  B   = .mag. A(1:3)\n Vector list implementations:   B(:) = .mag. A(1:3, :) Uses Ancestors: swiftest_operators module~~s_operator_mag~~UsesGraph module~s_operator_mag s_operator_mag module~swiftest_operators swiftest_operators module~s_operator_mag->module~swiftest_operators module~swiftest_globals swiftest_globals module~swiftest_operators->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions operator_mag_sp operator_mag_dp operator_mag_el_sp operator_mag_el_dp operator_mag_el_qp Module Functions pure function operator_mag_sp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) pure function operator_mag_dp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) pure function operator_mag_el_sp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:), allocatable pure function operator_mag_el_dp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:), allocatable pure function operator_mag_el_qp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:), allocatable","tags":"","loc":"module/s_operator_mag.html"},{"title":"s_util_solve – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_solve~~UsesGraph module~s_util_solve s_util_solve module~swiftest swiftest module~s_util_solve->module~swiftest module~swiftest_classes swiftest_classes module~s_util_solve->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions solve_wbs ge_wpp Module Functions util_solve_linear_system_d util_solve_linear_system_q util_solve_rkf45 Functions function solve_wbs (u) result(x) Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:), allocatable :: u Return Value real(kind=QP),\n  dimension(:), allocatable function ge_wpp (A, b) result(u) Solve  Ax=b  using Gaussian elimination then backwards substitution.\n   A being an n by n matrix.\n   x and b are n by 1 vectors. \n Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b Return Value real(kind=QP),\n  dimension(:,:), allocatable Module Functions function util_solve_linear_system_d (A, b, n, lerr) result(x) Author David A. Minton Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) function util_solve_linear_system_q (A, b, n, lerr) result(x) Author David A. Minton Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n) module function util_solve_rkf45 (f, y0in, t1, dt0, tol) result(y1) Interface → Author David A. Minton Implements the 4th order Runge-Kutta-Fehlberg ODE solver for initial value problems of the form f=dy/dt, y0 = y(t=0), solving for y1 = y(t=t1). Uses a 5th order adaptive step size control.\n Uses a lambda function object as defined in the lambda_function module Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:), allocatable Final result","tags":"","loc":"module/s_util_solve.html"},{"title":"s_util_set – swiftest","text":"This submodule contains a collection of setter method implementations Uses swiftest Ancestors: swiftest_classes module~~s_util_set~~UsesGraph module~s_util_set s_util_set module~swiftest swiftest module~s_util_set->module~swiftest module~swiftest_classes swiftest_classes module~s_util_set->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_set_beg_end_pl util_set_ir3h util_set_msys util_set_mu_pl util_set_mu_tp util_set_particle_info util_set_rhill util_set_rhill_approximate Module Subroutines module subroutine util_set_beg_end_pl (self, xbeg, xend, vbeg) Interface → Author David A. Minton Sets one or more of the values of xbeg, xend, and vbeg Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg real(kind=DP), intent(in), optional dimension(:,:) :: xend real(kind=DP), intent(in), optional dimension(:,:) :: vbeg module subroutine util_set_ir3h (self) Interface → Author David A. Minton Sets the inverse heliocentric radius term (1/rh**3) for all bodies in a structure Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object module subroutine util_set_msys (self) Interface → Author David A. Minton Sets the value of msys and the vector mass quantities based on the total mass of the system Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nobdy system object module subroutine util_set_mu_pl (self, cb) Interface → Author David A. Minton Computes G * (M + m) for each massive body Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_set_mu_tp (self, cb) Interface → Author David A. Minton Converts certain scalar values to arrays so that they can be used in elemental functions Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_set_particle_info (self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Interface → Author David A. Minton Sets one or more values of the particle information metadata object Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: ACTIVE, MERGED, FRAGMENTED, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) module subroutine util_set_rhill (self, cb) Interface → Author David A. Minton Sets the value of the Hill's radius Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_set_rhill_approximate (self, cb) Interface → Author David A. Minton Sets the approximate value of the Hill's radius using the heliocentric radius instead of computing the semimajor axis Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"module/s_util_set.html"},{"title":"s_util_peri – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_peri~~UsesGraph module~s_util_peri s_util_peri module~swiftest swiftest module~s_util_peri->module~swiftest module~swiftest_classes swiftest_classes module~s_util_peri->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_peri_tp Module Subroutines module subroutine util_peri_tp (self, system, param) Interface → Author David A. Minton Determine system pericenter passages for test particles\n Note:  If the coordinate system used is barycentric, then this routine assumes that the barycentric coordinates in the\n        test particle structures are up-to-date and are not recomputed Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_util_peri.html"},{"title":"s_util_coord – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_coord~~UsesGraph module~s_util_coord s_util_coord module~swiftest swiftest module~s_util_coord->module~swiftest module~swiftest_classes swiftest_classes module~s_util_coord->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_coord_h2b_pl util_coord_h2b_tp util_coord_b2h_pl util_coord_b2h_tp util_coord_vb2vh_pl util_coord_vb2vh_tp util_coord_vh2vb_pl util_coord_vh2vb_tp util_coord_xh2xb_pl util_coord_xh2xb_tp Module Subroutines module subroutine util_coord_h2b_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_h2b_tp (self, cb) Interface → Author David A. Minton Convert test particles from heliocentric to barycentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object module subroutine util_coord_b2h_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_b2h_tp (self, cb) Interface → Author David A. Minton Convert test particles from barycentric to heliocentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(in) :: cb Swiftest central body object module subroutine util_coord_vb2vh_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from barycentric to heliocentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_vb2vh_tp (self, vbcb) Interface → Author David A. Minton Convert test particles from barycentric to heliocentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body module subroutine util_coord_vh2vb_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from heliocentric to barycentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_vh2vb_tp (self, vbcb) Interface → Author David A. Minton Convert test particles from heliocentric to barycentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body module subroutine util_coord_xh2xb_pl (self, cb) Interface → Author David A. Minton Convert position vectors of massive bodies from heliocentric to barycentric coordinates (position only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_xh2xb_tp (self, cb) Interface → Author David A. Minton Convert test particles from heliocentric to barycentric coordinates (position only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"module/s_util_coord.html"},{"title":"s_util_index – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_index~~UsesGraph module~s_util_index s_util_index module~swiftest swiftest module~s_util_index->module~swiftest module~swiftest_classes swiftest_classes module~s_util_index->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_index_eucl_plpl util_index_eucl_pltp Module Subroutines module subroutine util_index_eucl_plpl (self, param) Interface → Author Jacob R. Elliott and David A. Minton Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine util_index_eucl_pltp (self, pl, param) Interface → Author Jacob R. Elliott and David A. Minton Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_util_index.html"},{"title":"s_util_rescale – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_rescale~~UsesGraph module~s_util_rescale s_util_rescale module~swiftest swiftest module~s_util_rescale->module~swiftest module~swiftest_classes swiftest_classes module~s_util_rescale->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_rescale_system Module Subroutines module subroutine util_rescale_system (self, param, mscale, dscale, tscale) Interface → Author David A. Minton Rescales an nbody system to a new set of units. Inputs are the multipliers on the mass (mscale), distance (dscale), and time units (tscale). \n Rescales all united quantities in the system, as well as the mass conversion factors, gravitational constant, and Einstein's constant in the parameter object. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively.","tags":"","loc":"module/s_util_rescale.html"},{"title":"s_util_version – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_version~~UsesGraph module~s_util_version s_util_version module~swiftest swiftest module~s_util_version->module~swiftest module~swiftest_classes swiftest_classes module~s_util_version->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_version Module Subroutines module subroutine util_version () Interface → Author David A. Minton Print program version information to terminale Read more… Arguments None","tags":"","loc":"module/s_util_version.html"},{"title":"s_util_sort – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_sort~~UsesGraph module~s_util_sort s_util_sort module~swiftest swiftest module~s_util_sort->module~swiftest module~swiftest_classes swiftest_classes module~s_util_sort->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_sort_body util_sort_dp util_sort_index_dp util_sort_i4b util_sort_index_i4b util_sort_sp util_sort_index_sp util_sort_pl util_sort_tp util_sort_rearrange_body util_sort_rearrange_arr_char_string util_sort_rearrange_arr_DP util_sort_rearrange_arr_DPvec util_sort_rearrange_arr_I4B util_sort_rearrange_arr_logical util_sort_rearrange_arr_info util_sort_rearrange_pl util_sort_rearrange_tp Module Subroutines module subroutine util_sort_body (self, sortby, ascending) Interface → Author David A. Minton Sort a Swiftest body structure in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order subroutine util_sort_dp (arr) Author David A. Minton Sort input double precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr subroutine util_sort_index_dp (arr, ind) Author David A. Minton Sort input double precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind subroutine util_sort_i4b (arr) Author David A. Minton Sort input integer array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr subroutine util_sort_index_i4b (arr, ind) Author David A. Minton Sort input integer array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind subroutine util_sort_sp (arr) Author David A. Minton Sort input single precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr subroutine util_sort_index_sp (arr, ind) Author David A. Minton Sort input single precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind module subroutine util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a Swiftest massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine util_sort_tp (self, sortby, ascending) Interface → Author David A. Minton Sort a Swiftest test particle object  in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine util_sort_rearrange_body (self, ind) Interface → Author David A. Minton Rearrange Swiftest body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) subroutine util_sort_rearrange_arr_char_string (arr, ind, n) Author David A. Minton Rearrange a single array of character string in-place from an index list. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_DP (arr, ind, n) Author David A. Minton Rearrange a single array of DP type in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_DPvec (arr, ind, n) Author David A. Minton Rearrange a single array of (NDIM,n) DP-type vectors in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_I4B (arr, ind, n) Author David A. Minton Rearrange a single array of integers in-place from an index list. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_logical (arr, ind, n) Author David A. Minton Rearrange a single array of logicals in-place from an index list. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_info (arr, ind, n) Author David A. Minton Rearrange a single array of particle information type in-place from an index list. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange module subroutine util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine util_sort_rearrange_tp (self, ind) Interface → Author David A. Minton Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"module/s_util_sort.html"},{"title":"s_util_spill – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_spill~~UsesGraph module~s_util_spill s_util_spill module~swiftest swiftest module~s_util_spill->module~swiftest module~swiftest_classes swiftest_classes module~s_util_spill->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_spill_arr_char_string util_spill_arr_DP util_spill_arr_DPvec util_spill_arr_I4B util_spill_arr_I8B util_spill_arr_info util_spill_arr_logical util_spill_body util_spill_encounter util_spill_pl util_spill_tp Module Subroutines subroutine util_spill_arr_char_string (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_DP (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_DPvec (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_I4B (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_I8B (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_info (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_logical (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or no module subroutine util_spill_body (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest generic particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine util_spill_encounter (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest encounter structure from active list to discard list Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest massive body structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine util_spill_tp (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardse logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"module/s_util_spill.html"},{"title":"s_util_valid – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_valid~~UsesGraph module~s_util_valid s_util_valid module~swiftest swiftest module~s_util_valid->module~swiftest module~swiftest_classes swiftest_classes module~s_util_valid->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_valid_id_system Module Subroutines module subroutine util_valid_id_system (self, param) Interface → Author David A. Minton Validate massive body and test particle ids\n Subroutine causes program to exit with error if any ids are not unique Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_util_valid.html"},{"title":"s_util_exit – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_exit~~UsesGraph module~s_util_exit s_util_exit module~swiftest swiftest module~s_util_exit->module~swiftest module~swiftest_classes swiftest_classes module~s_util_exit->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_exit Module Subroutines module subroutine util_exit (code) Interface → Author David A. Minton Print termination message and exit program Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code","tags":"","loc":"module/s_util_exit.html"},{"title":"s_util_fill – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_fill~~UsesGraph module~s_util_fill s_util_fill module~swiftest swiftest module~s_util_fill->module~swiftest module~swiftest_classes swiftest_classes module~s_util_fill->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_fill_arr_char_string util_fill_arr_DP util_fill_arr_DPvec util_fill_arr_I4B util_fill_arr_info util_fill_arr_logical util_fill_body util_fill_pl util_fill_tp Module Subroutines subroutine util_fill_arr_char_string (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_DP (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_DPvec (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_I4B (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_info (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_logical (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine util_fill_body (self, inserts, lfill_list) Interface → Author David A. Minton Insert new Swiftest generic particle structure into an old one. \n This is the inverse of a spill operation.\n Fill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new Swiftest massive body structure into an old one. \n This is the inverse of a spill operation.\n Fill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine util_fill_tp (self, inserts, lfill_list) Interface → Author David A. Minton Insert new Swiftest test particle structure into an old one. \n This is the inverse of a fill operation.\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"module/s_util_fill.html"},{"title":"s_util_resize – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_resize~~UsesGraph module~s_util_resize s_util_resize module~swiftest swiftest module~s_util_resize->module~swiftest module~swiftest_classes swiftest_classes module~s_util_resize->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_resize_arr_char_string util_resize_arr_DP util_resize_arr_DPvec util_resize_arr_I4B util_resize_arr_info util_resize_arr_logical util_resize_body util_resize_encounter util_resize_pl util_resize_tp Module Subroutines subroutine util_resize_arr_char_string (arr, nnew) Author David A. Minton Resizes an array component of type character string. nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_DP (arr, nnew) Author David A. Minton Resizes an array component of double precision type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_DPvec (arr, nnew) Author David A. Minton Resizes an array component of double precision vectors of size (NDIM, n). Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_I4B (arr, nnew) Author David A. Minton Resizes an array component of integer type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_info (arr, nnew) Author David A. Minton Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_logical (arr, nnew) Author David A. Minton Resizes an array component of logical type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size module subroutine util_resize_body (self, nnew) Interface → Author David A. Minton Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine util_resize_encounter (self, nnew) Interface → Author David A. Minton Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small.\n Note: The reason to extend it by a factor of 2 is for performance. When there are many enounters per step, resizing every time you want to add an \n encounter takes significant computational effort. Resizing by a factor of 2 is a tradeoff between performance (fewer resize calls) and memory managment\n Memory usage grows by a factor of 2 each time it fills up, but no more. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed module subroutine util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a Swiftest massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine util_resize_tp (self, nnew) Interface → Author David A. Minton Checks the current size of a Swiftest test particle against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"module/s_util_resize.html"},{"title":"s_util_copy – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_copy~~UsesGraph module~s_util_copy s_util_copy module~swiftest swiftest module~s_util_copy->module~swiftest module~swiftest_classes swiftest_classes module~s_util_copy->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_copy_encounter util_copy_particle_info util_copy_particle_info_arr Module Subroutines module subroutine util_copy_encounter (self, source) Interface → Author David A. Minton Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into module subroutine util_copy_particle_info (self, source) Interface → Author David A. Minton Copies one set of information object components into another, component-by-component Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source module subroutine util_copy_particle_info_arr (source, dest, idx) Interface → Author David A. Minton Copies contents from an array of one particle information objects to another. Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object","tags":"","loc":"module/s_util_copy.html"},{"title":"s_util_minimize_bfgs – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_minimize_bfgs~~UsesGraph module~s_util_minimize_bfgs s_util_minimize_bfgs module~swiftest swiftest module~s_util_minimize_bfgs->module~swiftest module~swiftest_classes swiftest_classes module~s_util_minimize_bfgs->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions util_minimize_bfgs Module Functions module function util_minimize_bfgs (f, N, x0, eps, maxloop, lerr) result(x1) Interface → Author David A. Minton This function implements the Broyden-Fletcher-Goldfarb-Shanno method to determine the minimum of a function of N variables. It recieves as input:\n   f%eval(x) : lambda function object containing the objective function as the eval metho\n   N       : Number of variables of function f\n   x0      : Initial starting value of x\n   eps     : Accuracy of 1 - dimensional minimization at each step\n   maxloop : Maximum number of loops to attempt to find a solution\n The outputs include\n   lerr :  Returns .true. if it could not find the minimum\n Returns\n   x1   :  Final minimum (all 0 if none found)\n   0 = No miniumum found Read more… Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:), allocatable","tags":"","loc":"module/s_util_minimize_bfgs.html"},{"title":"s_util_append – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_append~~UsesGraph module~s_util_append s_util_append module~swiftest swiftest module~s_util_append->module~swiftest module~swiftest_classes swiftest_classes module~s_util_append->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_append_arr_char_string util_append_arr_DP util_append_arr_DPvec util_append_arr_I4B util_append_arr_info util_append_arr_logical util_append_body util_append_encounter util_append_pl util_append_tp Module Subroutines subroutine util_append_arr_char_string (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of character string type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_DP (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of double precision type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_DPvec (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of double precision vector type of size (NDIM, n) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_I4B (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of integer(I4B) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_info (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of particle information type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_logical (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of logical type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_body (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_encounter (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_tp (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"module/s_util_append.html"},{"title":"s_util_get_energy_momentum – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_get_energy_momentum~~UsesGraph module~s_util_get_energy_momentum s_util_get_energy_momentum module~swiftest swiftest module~s_util_get_energy_momentum->module~swiftest module~swiftest_classes swiftest_classes module~s_util_get_energy_momentum->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_get_energy_momentum_system Module Subroutines module subroutine util_get_energy_momentum_system (self, param) Interface → Author David A. Minton Compute total system angular momentum vector and kinetic, potential and total system energy Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_util_get_energy_momentum.html"},{"title":"s_gr – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_gr~~UsesGraph module~s_gr s_gr module~swiftest swiftest module~s_gr->module~swiftest module~swiftest_classes swiftest_classes module~s_gr->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines gr_kick_getaccb_ns_body gr_kick_getacch gr_p4_pos_kick gr_pseudovel2vel gr_pv2vh_body gr_vel2pseudovel gr_vh2pv_body Module Subroutines pure module subroutine gr_kick_getaccb_ns_body (self, system, param) Interface → Author David A. Minton Add relativistic correction acceleration for non-symplectic integrators.\n Based on Quinn et al. (1991) eq. 5 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine gr_kick_getacch (mu, x, lmask, n, inv_c2, agr) Interface → Author David A. Minton Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations pure module subroutine gr_p4_pos_kick (param, x, v, dt) Interface → Author David A. Minton Position kick due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size pure module subroutine gr_pseudovel2vel (param, mu, xh, pv, vh) Interface → Author David A. Minton Converts the relativistic pseudovelocity back into a veliocentric velocity\n    Based on Saha & Tremaine (1994) Eq. 32 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Heliocentric velocity vector pure module subroutine gr_pv2vh_body (self, param) Interface → Author David A. Minton Wrapper function that converts from pseudovelocity to heliocentric velocity for swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters pure module subroutine gr_vel2pseudovel (param, mu, xh, vh, pv) Interface → Author David A. Minton Converts the heliocentric velocity into a pseudovelocity with relativistic corrections. \n Uses Newton-Raphson method with direct inversion of the Jacobian (yeah, it's slow, but \n this is only done once per run). Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: vh Heliocentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) pure module subroutine gr_vh2pv_body (self, param) Interface → Author David A. Minton Wrapper function that converts from heliocentric velocity to pseudovelocity for Swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_gr.html"},{"title":"s_discard – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_discard~~UsesGraph module~s_discard s_discard module~swiftest swiftest module~s_discard->module~swiftest module~swiftest_classes swiftest_classes module~s_discard->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines discard_cb_tp discard_peri_tp discard_pl_tp discard_pl_close Module Subroutines discard_system discard_pl discard_tp Subroutines subroutine discard_cb_tp (tp, system, param) Author David A. Minton Check to see if test particles should be discarded based on their positions relative to the Sun\n        or because they are unbound from the system Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine discard_peri_tp (tp, system, param) Author David A. Minton Check to see if a test particle should be discarded because its perihelion distance becomes too small Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameterss subroutine discard_pl_tp (tp, system, param) Author David A. Minton Check to see if test particles should be discarded based on their positions relative to the massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine discard_pl_close (dx, dv, dt, r2crit, iflag, r2min) Author David A. Minton Check to see if a test particle and massive body are having, or will have within the next time step, an encounter such\n          that the separation distance r is less than some critical radius rcrit (or r 2 < rcrit 2 = r2crit) Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: dx real(kind=DP), intent(in), dimension(:) :: dv real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit integer(kind=I4B), intent(out) :: iflag real(kind=DP), intent(out) :: r2min Module Subroutines module subroutine discard_system (self, param) Interface → Author David A. Minton Calls the discard methods for each body class and then the write method if any discards were detected Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine discard_pl (self, system, param) Interface → Author David A. Minton Placeholder method for discarding massive bodies. This method does nothing except to ensure that the discard flag is set to false. \n  This method is intended to be overridden by more advanced integrators. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter module subroutine discard_tp (self, system, param) Interface → Author David A. Minton Check to see if particles should be discarded based on their positions relative to the massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter","tags":"","loc":"module/s_discard.html"},{"title":"s_helio_step – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_step~~UsesGraph module~s_helio_step s_helio_step module~helio_classes helio_classes module~s_helio_step->module~helio_classes module~swiftest swiftest module~s_helio_step->module~swiftest module~whm_classes whm_classes module~helio_classes->module~whm_classes module~swiftest_globals swiftest_globals module~helio_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~helio_classes->module~swiftest_classes module~swiftest->module~helio_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~swiftest->module~whm_classes module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~helio_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_step_system helio_step_pl helio_step_tp Module Subroutines module subroutine helio_step_system (self, param, t, dt) Interface → Author David A. Minton Step massive bodies and and active test particles ahead in heliocentric coordinates. Read more… Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine helio_step_pl (self, system, param, t, dt) Interface → Author David A. Minton Step massive bodies ahead Democratic Heliocentric method Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_step_tp (self, system, param, t, dt) Interface → Author David A. Minton Step active test particles ahead using Democratic Heliocentric method Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"module/s_helio_step.html"},{"title":"s_helio_setup – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_setup~~UsesGraph module~s_helio_setup s_helio_setup module~helio_classes helio_classes module~s_helio_setup->module~helio_classes module~swiftest swiftest module~s_helio_setup->module~swiftest module~whm_classes whm_classes module~helio_classes->module~whm_classes module~swiftest_globals swiftest_globals module~helio_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~helio_classes->module~swiftest_classes module~swiftest->module~helio_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~swiftest->module~whm_classes module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~helio_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_setup_initialize_system Module Subroutines module subroutine helio_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize a Helio nbody system from files, converting all heliocentric quantities to barycentric. Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_helio_setup.html"},{"title":"s_helio_gr – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_gr~~UsesGraph module~s_helio_gr s_helio_gr module~helio_classes helio_classes module~s_helio_gr->module~helio_classes module~swiftest swiftest module~s_helio_gr->module~swiftest module~whm_classes whm_classes module~helio_classes->module~whm_classes module~swiftest_globals swiftest_globals module~helio_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~helio_classes->module~swiftest_classes module~swiftest->module~helio_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~swiftest->module~whm_classes module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~helio_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_gr_kick_getacch_pl helio_gr_kick_getacch_tp helio_gr_p4_pl helio_gr_p4_tp Module Subroutines module subroutine helio_gr_kick_getacch_pl (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters module subroutine helio_gr_kick_getacch_tp (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters pure module subroutine helio_gr_p4_pl (self, param, dt) Interface → Author David A. Minton Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size pure module subroutine helio_gr_p4_tp (self, param, dt) Interface → Author David A. Minton Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"module/s_helio_gr.html"},{"title":"s_helio_kick – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_kick~~UsesGraph module~s_helio_kick s_helio_kick module~helio_classes helio_classes module~s_helio_kick->module~helio_classes module~swiftest swiftest module~s_helio_kick->module~swiftest module~whm_classes whm_classes module~helio_classes->module~whm_classes module~swiftest_globals swiftest_globals module~helio_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~helio_classes->module~swiftest_classes module~swiftest->module~helio_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~swiftest->module~whm_classes module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~helio_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_kick_getacch_pl helio_kick_getacch_tp helio_kick_vb_pl helio_kick_vb_tp Module Subroutines module subroutine helio_kick_getacch_pl (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine helio_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of test particles Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine helio_kick_vb_pl (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick barycentric velocities of bodies Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. module subroutine helio_kick_vb_tp (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick barycentric velocities of bodies Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"module/s_helio_kick.html"},{"title":"s_helio_drift – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_drift~~UsesGraph module~s_helio_drift s_helio_drift module~helio_classes helio_classes module~s_helio_drift->module~helio_classes module~swiftest swiftest module~s_helio_drift->module~swiftest module~whm_classes whm_classes module~helio_classes->module~whm_classes module~swiftest_globals swiftest_globals module~helio_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~helio_classes->module~swiftest_classes module~swiftest->module~helio_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~swiftest->module~whm_classes module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~helio_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_drift_body helio_drift_pl helio_drift_tp helio_drift_linear_pl helio_drift_linear_tp Module Subroutines module subroutine helio_drift_body (self, system, param, dt) Interface → Author David A. Minton Loop through bodies and call Danby drift routine on democratic heliocentric coordinates Read more… Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_drift_pl (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_drift_tp (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_drift_linear_pl (self, cb, dt, lbeg) Interface → Author David A. Minton Perform linear drift of massive bodies due to barycentric momentum of Sun Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step module subroutine helio_drift_linear_tp (self, cb, dt, lbeg) Interface → Author David A. Minton Perform linear drift of test particles due to barycentric momentum of Sun\n New vectorized version included Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particleb object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"module/s_helio_drift.html"},{"title":"s_io – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_io~~UsesGraph module~s_io s_io module~swiftest swiftest module~s_io->module~swiftest module~swiftest_classes swiftest_classes module~s_io->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions io_read_encounter io_read_hdr Module Functions io_get_args io_get_old_t_final_system io_get_token io_read_frame_body io_read_frame_cb io_read_frame_system Module Subroutines io_conservation_report io_dump_param io_dump_particle_info io_dump_particle_info_base io_dump_base io_dump_system io_param_reader io_param_writer io_read_in_body io_read_in_cb io_read_in_param io_read_in_particle_info io_read_particle_info_system io_toupper io_write_discard io_write_encounter io_write_frame_body io_write_frame_cb io_write_frame_encounter io_write_frame_system io_write_hdr_system Functions function io_read_encounter (t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out, out_type) result(ierr) Author David A. Minton Read close encounter data from input binary files\n     Other than time t, there is no direct file input from this function\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_encounter.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: id1 integer(kind=I4B), intent(out) :: id2 real(kind=DP), intent(out) :: Gmass1 real(kind=DP), intent(out) :: Gmass2 real(kind=DP), intent(out) :: radius1 real(kind=DP), intent(out) :: radius2 real(kind=DP), intent(out), dimension(:) :: xh1 real(kind=DP), intent(out), dimension(:) :: xh2 real(kind=DP), intent(out), dimension(:) :: vh1 real(kind=DP), intent(out), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) function io_read_hdr (iu, t, npl, ntp, out_form, out_type) result(ierr) Author David A. Minton Read frame header from input binary files\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_hdr.f90\n Adapted from Hal Levison's Swift routine io_read_hdr.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: npl integer(kind=I4B), intent(out) :: ntp character(len=*), intent(out) :: out_form character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) Module Functions module function io_get_args (integrator, param_file_name) result(ierr) Interface → Author David A. Minton Reads in the name of the parameter file from command line arguments. Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code module function io_get_old_t_final_system (self, param) result(old_t_final) Interface → Author David A. Minton Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) module function io_get_token (buffer, ifirst, ilast, ierr) result(token) Interface → Author David A. Minton Retrieves a character token from an input string. Here a token is defined as any set of contiguous non-blank characters not \n beginning with or containing \"!\". If \"!\" is present, any remaining part of the buffer including the \"!\" is ignored Read more… Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string module function io_read_frame_body (self, iu, param) result(ierr) Interface → Author David A. Minton Reads a frame of output of either test particle or massive body data from a binary output file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful module function io_read_frame_cb (self, iu, param) result(ierr) Interface → Author David A. Minton Reads a frame of output of central body data to the binary output file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful module function io_read_frame_system (self, iu, param) result(ierr) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read a frame (header plus records for each massive body and active test particle) from a output binary file Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Module Subroutines module subroutine io_conservation_report (self, param, lterminal) Interface → Author The Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Reports the current state of energy, mass, and angular momentum conservation in a run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen module subroutine io_dump_param (self, param_file_name) Interface → Author David A. Minton Dump integration parameters to file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) module subroutine io_dump_particle_info (self, iu) Interface → Author David A. Minton Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number module subroutine io_dump_particle_info_base (self, param, idx) Interface → Author David A. Minton Dumps the particle information data to a file. \n Pass a list of array indices for test particles (tpidx) and/or massive bodies (plidx) to append Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file module subroutine io_dump_base (self, param) Interface → Author David A. Minton Dump massive body data to files Read more… Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_dump_system (self, param) Interface → Author David A. Minton Dumps the state of the system to files in case the simulation is interrupted.\n As a safety mechanism, there are two dump files that are written in alternating order\n so that if a dump file gets corrupted during writing, the user can restart from the older one. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_param_reader (self, unit, iotype, v_list, iostat, iomsg) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read in parameters for the integration\n Currently this procedure does not work in user-defined derived-type input mode \n    e.g. read(unit,'(DT)') param \n as the newline characters are ignored in the input file when compiled in ifort. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine io_param_writer (self, unit, iotype, v_list, iostat, iomsg) Interface → Author David A. Minton Dump integration parameters to file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine io_read_in_body (self, param) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read in either test particle or massive body data Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_read_in_cb (self, param) Interface → Author David A. Minton Reads in central body data Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self class( swiftest_parameters ), intent(inout) :: param module subroutine io_read_in_param (self, param_file_name) Interface → Author David A. Minton Read in parameters for the integration Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) module subroutine io_read_in_particle_info (self, iu) Interface → Author David A. Minton Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number module subroutine io_read_particle_info_system (self, param) Interface → Author David A. Minton Reads an old particle information file for a restartd run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_toupper (string) Interface → Author David A. Minton Convert string to uppercase Read more… Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case module subroutine io_write_discard (self, param) Interface → Author David A. Minton Write out information about discarded test particle Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_write_encounter (self, pl, encbody, param) Interface → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine io_write_frame_body (self, iu, param) Interface → Author David A. Minton Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine io_write_frame_cb (self, iu, param) Interface → Author David A. Minton Write a frame of output of central body data to the binary output file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine io_write_frame_encounter (iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Interface → Author David A. Minton Write a single frame of close encounter data to output binary files Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Heliocentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Heliocentric velocity vectors of the two encountering bodies module subroutine io_write_frame_system (self, param) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Write a frame (header plus records for each massive body and active test particle) to output binary file\n There is no direct file output from this subroutine Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_write_hdr_system (self, iu, param) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Write frame header to output binary file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_io.html"},{"title":"s_setup – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_setup~~UsesGraph module~s_setup s_setup module~swiftest swiftest module~s_setup->module~swiftest module~swiftest_classes swiftest_classes module~s_setup->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines setup_construct_system setup_encounter setup_initialize_particle_info_system setup_initialize_system setup_body setup_pl setup_tp Module Subroutines module subroutine setup_construct_system (system, param) Interface → Author David A. Minton Constructor for a Swiftest nbody system. Creates the nbody system object based on the user-input integrator Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Swiftest parameters module subroutine setup_encounter (self, n) Interface → Author David A. Minton A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for module subroutine setup_initialize_particle_info_system (self, param) Interface → Author David A. Minton Setup up particle information metadata from initial conditions Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine setup_initialize_system (self, param) Interface → Author David A. Minton Wrapper method to initialize a basic Swiftest nbody system from files Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine setup_body (self, n, param) Interface → Author David A. Minton Constructor for base Swiftest particle class. Allocates space for all particles and\n initializes all components with a value.\n Note: Timing tests indicate that (NDIM, n) is more efficient than (NDIM, n) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine setup_pl (self, n, param) Interface → Author David A. Minton Constructor for base Swiftest massive body class. Allocates space for all particles and\n initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine setup_tp (self, n, param) Interface → Author David A. Minton Constructor for base Swiftest test particle particle class. Allocates space for \n all particles and initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter","tags":"","loc":"module/s_setup.html"},{"title":"s_user_kick_getacch – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_user_kick_getacch~~UsesGraph module~s_user_kick_getacch s_user_kick_getacch module~swiftest swiftest module~s_user_kick_getacch->module~swiftest module~swiftest_classes swiftest_classes module~s_user_kick_getacch->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines user_kick_getacch_body Module Subroutines module subroutine user_kick_getacch_body (self, system, param, t, lbeg) Interface → Author David A. Minton Add user-supplied heliocentric accelerations to planets. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters user parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the ste","tags":"","loc":"module/s_user_kick_getacch.html"},{"title":"drift_implementation – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~drift_implementation~~UsesGraph module~drift_implementation drift_implementation module~swiftest swiftest module~drift_implementation->module~swiftest module~swiftest_classes swiftest_classes module~drift_implementation->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables E2MAX DM2MAX E2DM2MAX DANBYB NLAG1 NLAG2 Subroutines drift_dan drift_kepmd drift_kepu drift_kepu_fchk drift_kepu_guess drift_kepu_lag drift_kepu_new drift_kepu_p3solve drift_kepu_stumpff Module Subroutines drift_body drift_all drift_one Variables Type Visibility Attributes Name Initial real(kind=DP), private, parameter :: E2MAX = 0.36_DP Integration control parameters: real(kind=DP), private, parameter :: DM2MAX = 0.16_DP real(kind=DP), private, parameter :: E2DM2MAX = 0.0016_DP real(kind=DP), private, parameter :: DANBYB = 1.0E-13_DP integer(kind=I2B), private, parameter :: NLAG1 = 50 integer(kind=I2B), private, parameter :: NLAG2 = 40 Subroutines pure subroutine drift_dan (mu, x0, v0, dt0, iflag) Author David A. Minton Perform Kepler drift, solving Kepler's equation in appropriate variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(inout), dimension(:) :: x0 real(kind=DP), intent(inout), dimension(:) :: v0 real(kind=DP), intent(in) :: dt0 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepmd (dm, es, ec, x, s, c) Author David A. Minton Solve Kepler's equation in difference form for an ellipse for small input dm and eccentricity\n    Original disclaimer: built for speed, does not check how well the original equation is solved\n    Can do that in calling routine by checking how close (x - ec s + es (1.0 - c) - dm) is to zero Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dm real(kind=DP), intent(in) :: es real(kind=DP), intent(in) :: ec real(kind=DP), intent(out) :: x real(kind=DP), intent(out) :: s real(kind=DP), intent(out) :: c pure subroutine drift_kepu (dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Author David A. Minton Solve Kepler's equation in universal variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_fchk (dt, r0, mu, alpha, u, s, f) Author David A. Minton Computes the value of f, the function whose root we are trying to find in universal variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(in) :: s real(kind=DP), intent(out) :: f pure subroutine drift_kepu_guess (dt, r0, mu, alpha, u, s) Author David A. Minton Compute initial guess for solving Kepler's equation using universal variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s pure subroutine drift_kepu_lag (s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Author David A. Minton Solve Kepler's equation in universal variables using Laguerre's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_new (s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Author David A. Minton Solve Kepler's equation in universal variables using Newton's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_p3solve (dt, r0, mu, alpha, u, s, iflag) Author David A. Minton Computes real root of cubic involved in setting initial guess for solving Kepler's equation in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_stumpff (x, c0, c1, c2, c3) Author David A. Minton Compute Stumpff functions needed for Kepler drift in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: x real(kind=DP), intent(out) :: c0 real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 Module Subroutines module subroutine drift_body (self, system, param, dt) Interface → Author David A. Minton Loop bodies and call Danby drift routine on the heliocentric position and velocities. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize pure module subroutine drift_all (mu, x, v, n, param, dt, mask, iflag) Interface → Author David A. Minton Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: mask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem pure elemental module subroutine drift_one (mu, px, py, pz, vx, vy, vz, dt, iflag) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)","tags":"","loc":"module/drift_implementation.html"},{"title":"s_symba_util – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_util~~UsesGraph module~s_symba_util s_symba_util module~swiftest swiftest module~s_symba_util->module~swiftest module~symba_classes symba_classes module~s_symba_util->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_util_append_arr_kin symba_util_append_encounter symba_util_append_pl symba_util_append_merger symba_util_append_tp symba_util_copy_encounter symba_util_fill_arr_kin symba_util_fill_pl symba_util_fill_tp symba_util_index_eucl_plpl symba_util_peri_pl symba_util_rearray_pl symba_util_reset_kinship symba_util_resize_arr_kin symba_util_resize_merger symba_util_resize_pl symba_util_resize_tp symba_util_sort_pl symba_util_sort_tp symba_util_sort_rearrange_arr_kin symba_util_sort_rearrange_pl symba_util_sort_rearrange_tp symba_util_spill_arr_kin symba_util_spill_pl symba_util_spill_encounter symba_util_spill_tp Module Subroutines subroutine symba_util_append_arr_kin (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of kinship type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_encounter (self, source, lsource_mask) Interface → Author David A. Minton Append components from one encounter list (pl-pl or pl-tp) body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_merger (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_tp (self, source, lsource_mask) Interface → Author David A. Minton Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_copy_encounter (self, source) Interface → Author David A. Minton Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into subroutine symba_util_fill_arr_kin (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of particle kinship types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine symba_util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA masive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine symba_util_fill_tp (self, inserts, lfill_list) Interface → Author David A. Minton Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine symba_util_index_eucl_plpl (self, param) Interface → Author Jacob R. Elliott and David A. Minton Turns i,j indices into k index for use in the Euclidean distance matrix. This also sets the lmtiny flag and computes the\n number of interactions that excludes semi-interacting bodies with each other (Gmass < GMTINY).\n This method will also sort the bodies in descending order by Mass Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine symba_util_peri_pl (self, system, param) Interface → Author David A. Minton Determine system pericenter passages for planets in SyMBA Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine symba_util_rearray_pl (self, system, param) Interface → Author the Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Clean up the massive body structures to remove discarded bodies and add new bodies Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system Swiftest nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters module subroutine symba_util_reset_kinship (self, idx) Interface → Author David A. Minton Resets the kinship status of bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset subroutine symba_util_resize_arr_kin (arr, nnew) Author David A. Minton Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size module subroutine symba_util_resize_merger (self, nnew) Interface → Author David A. Minton Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine symba_util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a SyMBA massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine symba_util_resize_tp (self, nnew) Interface → Author David A. Minton Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine symba_util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a SyMBA massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine symba_util_sort_tp (self, sortby, ascending) Interface → Author David A. Minton Sort a SyMBA test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order subroutine symba_util_sort_rearrange_arr_kin (arr, ind, n) Author David A. Minton Rearrange a single array of particle kinship type in-place from an index list. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange module subroutine symba_util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange SyMBA massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine symba_util_sort_rearrange_tp (self, ind) Interface → Author David A. Minton Rearrange SyMBA test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) subroutine symba_util_spill_arr_kin (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of particle kinships\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not module subroutine symba_util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) SyMBA massive body particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine symba_util_spill_encounter (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) SyMBA encounter structure from active list to discard list\n Note: Because the symba_plplenc currently does not contain any additional variable components, this method can recieve it as an input as well. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine symba_util_spill_tp (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) SyMBA test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"module/s_symba_util.html"},{"title":"s_symba_collision – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_collision~~UsesGraph module~s_symba_collision s_symba_collision module~swiftest swiftest module~s_symba_collision->module~swiftest module~symba_classes symba_classes module~s_symba_collision->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions symba_collision_check_one symba_collision_consolidate_colliders Subroutines symba_collision_collider_message symba_collision_mergeaddsub Module Functions symba_collision_casedisruption symba_collision_casehitandrun symba_collision_casemerge symba_collision_check_encounter Module Subroutines symba_collision_encounter_extract_collisions symba_collision_make_colliders_pl symba_collision_resolve_fragmentations symba_collision_resolve_mergers symba_collision_resolve_plplenc symba_collision_resolve_pltpenc Functions pure elemental function symba_collision_check_one (xr, yr, zr, vxr, vyr, vzr, Gmtot, rlim, dt, lvdotr) result(lcollision) Author David A. Minton Check for a merger between a single pair of particles Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative position vector components real(kind=DP), intent(in) :: yr Relative position vector components real(kind=DP), intent(in) :: zr Relative position vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: Gmtot Sum of G*mass of colliding bodies real(kind=DP), intent(in) :: rlim Collision limit - Typically the sum of the radii of colliding bodies real(kind=DP), intent(in) :: dt Step size logical, intent(in) :: lvdotr Logical flag indicating that these two bodies are approaching in the current substep Return Value logical Logical flag indicating whether these two bodies will collide or not function symba_collision_consolidate_colliders (pl, cb, param, idx_parent, colliders) result(lflag) Author David A. Minton Loops through the pl-pl collision list and groups families together by index. Outputs the indices of all colliders%idx members, \n and pairs of quantities (x and v vectors, mass, radius, L_spin, and Ip) that can be used to resolve the collisional outcome. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class( symba_cb ), intent(inout) :: cb SyMBA central body object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions integer(kind=I4B), intent(inout), dimension(2) :: idx_parent Index of the two bodies considered the \"parents\" of the collision class( fraggle_colliders ), intent(out) :: colliders Return Value logical Logical flag indicating whether a colliders%idx was successfully created or not Subroutines subroutine symba_collision_collider_message (pl, collidx, collider_message) Author David A. Minton Prints a nicely formatted message about which bodies collided, including their names and ids.\n This subroutine appends the body names and ids to an input message. Arguments Type Intent Optional Attributes Name class(swiftest_pl), intent(in) :: pl Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: collidx Index of collisional colliders%idx members character(len=*), intent(inout) :: collider_message The message to print to the screen. subroutine symba_collision_mergeaddsub (system, param, colliders, frag, status) Author David A. Minton Fills the pl_discards and pl_adds with removed and added bodies Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object integer(kind=I4B), intent(in) :: status Status flag to assign to adds Module Functions module function symba_collision_casedisruption (system, param, colliders, frag) result(status) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Create the fragments resulting from a non-catastrophic disruption collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome module function symba_collision_casehitandrun (system, param, colliders, frag) result(status) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Create the fragments resulting from a non-catastrophic hit-and-run collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcom module function symba_collision_casemerge (system, param, colliders, frag) result(status) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Merge massive bodies. Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome module function symba_collision_check_encounter (self, system, param, t, dt, irec) result(lany_collision) Interface → Author David A. Minton Check for merger between massive bodies and test particles in SyMBA Read more… Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision Module Subroutines module subroutine symba_collision_encounter_extract_collisions (self, system, param) Interface → Author David A. Minton Processes the pl-pl encounter list remove only those encounters that led to a collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine symba_collision_make_colliders_pl (self, idx) Interface → Author Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton When a single body is involved in more than one collision in a single step, it becomes part of a colliders%idx.\n The largest body involved in a multi-body collision is the \"parent\" and all bodies that collide with it are its \"children,\"\n including those that collide with the children. Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision module subroutine symba_collision_resolve_fragmentations (self, system, param) Interface → Author David A. Minton Process list of collisions, determine the collisional regime, and then create fragments. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions module subroutine symba_collision_resolve_mergers (self, system, param) Interface → Author David A. Minton Process list of collisions and merge colliding bodies together. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions module subroutine symba_collision_resolve_plplenc (self, system, param, t, dt, irec) Interface → Author David A. Minton Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level module subroutine symba_collision_resolve_pltpenc (self, system, param, t, dt, irec) Interface → Author David A. Minton Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation tim real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"module/s_symba_collision.html"},{"title":"s_symba_setup – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_setup~~UsesGraph module~s_symba_setup s_symba_setup module~swiftest swiftest module~s_symba_setup->module~swiftest module~symba_classes symba_classes module~s_symba_setup->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_setup_initialize_system symba_setup_merger symba_setup_pl symba_setup_encounter symba_setup_tp Module Subroutines module subroutine symba_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize an SyMBA nbody system from files and sets up the planetocentric structures.\n This subroutine will also sort the massive bodies in descending order by mass Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine symba_setup_merger (self, n, param) Interface → Author David A. Minton Allocate SyMBA test particle structure Read more… Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine symba_setup_pl (self, n, param) Interface → Author David A. Minton Allocate SyMBA test particle structure Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine symba_setup_encounter (self, n) Interface → Author David A. Minton A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for module subroutine symba_setup_tp (self, n, param) Interface → Author David A. Minton Allocate WHM test particle structure Read more… Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter","tags":"","loc":"module/s_symba_setup.html"},{"title":"s_symba_kick – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_kick~~UsesGraph module~s_symba_kick s_symba_kick module~swiftest swiftest module~s_symba_kick->module~swiftest module~symba_classes symba_classes module~s_symba_kick->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_kick_getacch_int_pl symba_kick_getacch_pl symba_kick_getacch_tp symba_kick_encounter Module Subroutines module subroutine symba_kick_getacch_int_pl (self) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of massive bodies, with no mutual interactions between bodies below GMTINY Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self module subroutine symba_kick_getacch_pl (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine symba_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of test particles Read more… Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine symba_kick_encounter (self, system, dt, irec, sgn) Interface → Author David A. Minton Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types Read more… Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration","tags":"","loc":"module/s_symba_kick.html"},{"title":"s_symba_encounter_check – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_encounter_check~~UsesGraph module~s_symba_encounter_check s_symba_encounter_check module~swiftest swiftest module~s_symba_encounter_check->module~swiftest module~symba_classes symba_classes module~s_symba_encounter_check->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines symba_encounter_check_all Module Functions symba_encounter_check_pl symba_encounter_check symba_encounter_check_tp Module Subroutines symba_encounter_check_one Subroutines subroutine symba_encounter_check_all (nplplm, k_plpl, x, v, rhill, dt, irec, lencounter, loc_lvdotr) Author David A. Minton Check for encounters between massive bodies. Split off from the main subroutine for performance Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in) :: nplplm integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl real(kind=DP), intent(in), dimension(:,:) :: x real(kind=DP), intent(in), dimension(:,:) :: v real(kind=DP), intent(in), dimension(:) :: rhill real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out), dimension(:) :: lencounter logical, intent(out), dimension(:) :: loc_lvdotr Module Functions module function symba_encounter_check_pl (self, system, dt, irec) result(lany_encounter) Interface → Author David A. Minton Check for an encounter between massive bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter module function symba_encounter_check (self, system, dt, irec) result(lany_encounter) Interface → Author David A. Minton Check for an encounter between test particles and massive bodies in the pltpenc list.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types. Read more… Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter module function symba_encounter_check_tp (self, system, dt, irec) result(lany_encounter) Interface → Author David A. Minton Check for an encounter between test particles and massive bodies. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Module Subroutines pure elemental module subroutine symba_encounter_check_one (xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Interface → Author David A. Minton Check for an encounter. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr","tags":"","loc":"module/s_symba_encounter_check.html"},{"title":"s_symba_io – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_io~~UsesGraph module~s_symba_io s_symba_io module~swiftest swiftest module~s_symba_io->module~swiftest module~symba_classes symba_classes module~s_symba_io->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_io_param_reader symba_io_param_writer symba_io_write_discard Module Subroutines module subroutine symba_io_param_reader (self, unit, iotype, v_list, iostat, iomsg) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read in parameters specific to the SyMBA integrator, then calls the base io_param_reader. Read more… Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine symba_io_param_writer (self, unit, iotype, v_list, iostat, iomsg) Interface → Author David A. Minton Dump integration parameters specific to SyMBA to file and then call the base io_param_writer method. Read more… Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Collection of SyMBA parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine symba_io_write_discard (self, param) Interface → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_symba_io.html"},{"title":"s_symba_discard – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_discard~~UsesGraph module~s_symba_discard s_symba_discard module~swiftest swiftest module~s_symba_discard->module~swiftest module~symba_classes symba_classes module~s_symba_discard->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines symba_discard_cb_pl symba_discard_conserve_mtm symba_discard_nonplpl symba_discard_nonplpl_conservation symba_discard_peri_pl Module Subroutines symba_discard_pl Subroutines subroutine symba_discard_cb_pl (pl, system, param) Author David A. Minton Check to see if planets should be discarded based on their positions relative to the central body.\n If a body gets flagged here when it has also been previously flagged for a collision with another massive body,\n its collisional status will be revoked. Discards due to colliding with or escaping the central body take precedence \n over pl-pl collisions Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine symba_discard_conserve_mtm (pl, system, param, ipl, lescape_body) Author David A. Minton Conserves system momentum when a body is lost from the system or collides with central body Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl class( symba_nbody_system ), intent(inout) :: system class( symba_parameters ), intent(inout) :: param integer(kind=I4B), intent(in) :: ipl logical, intent(in) :: lescape_body subroutine symba_discard_nonplpl (pl, system, param) Author David A. Minton Check to see if planets should be discarded based on their positions or because they are unbound Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine symba_discard_nonplpl_conservation (pl, system, param) Author David A. Minton If there are any bodies that are removed due to either colliding with the central body or escaping the systme,\n we need to track the conserved quantities with the system bookkeeping terms. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters subroutine symba_discard_peri_pl (pl, system, param) Author David A. Minton Check to see if a test particle should be discarded because its perihelion distance becomes too small Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Module Subroutines module subroutine symba_discard_pl (self, system, param) Interface → Author David A. Minton Call the various flavors of discards for massive bodies in SyMBA runs, including discards due to colliding with the central body or escaping the system Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_symba_discard.html"},{"title":"s_symba_step – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_step~~UsesGraph module~s_symba_step s_symba_step module~swiftest swiftest module~s_symba_step->module~swiftest module~symba_classes symba_classes module~s_symba_step->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_step_system symba_step_interp_system symba_step_set_recur_levels_system symba_step_recur_system symba_step_reset_system Module Subroutines module subroutine symba_step_system (self, param, t, dt) Interface → Author David A. Minton Step planets and active test particles ahead in democratic heliocentric coordinates, descending the recursive\n   branch if necessary to handle possible close encounters Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine symba_step_interp_system (self, param, t, dt) Interface → Author David A. Minton Step planets and active test particles ahead in democratic heliocentric coordinates, calling the recursive\n         subroutine to descend to the appropriate level to handle close encounters Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine symba_step_set_recur_levels_system (self, ireci) Interface → Author David A. Minton Resets pl, tp,and encounter structures at the start of a new step Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object integer(kind=I4B), intent(in) :: ireci Input recursion level recursive module subroutine symba_step_recur_system (self, param, t, ireci) Interface → Author David A. Minton Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current\n         recursion level, if applicable, and descend to the next deeper level if necessarys Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level module subroutine symba_step_reset_system (self, param) Interface → Author David A. Minton Resets pl, tp,and encounter structures at the start of a new step Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"module/s_symba_step.html"},{"title":"s_symba_drift – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_drift~~UsesGraph module~s_symba_drift s_symba_drift module~swiftest swiftest module~s_symba_drift->module~swiftest module~symba_classes symba_classes module~s_symba_drift->module~symba_classes module~swiftest->module~symba_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_drift_pl symba_drift_tp Module Subroutines module subroutine symba_drift_pl (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine symba_drift_tp (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"module/s_symba_drift.html"},{"title":"s_netcdf – swiftest","text":"Uses swiftest netcdf Ancestors: swiftest_classes module~~s_netcdf~~UsesGraph module~s_netcdf s_netcdf module~swiftest swiftest module~s_netcdf->module~swiftest netcdf netcdf module~s_netcdf->netcdf module~swiftest_classes swiftest_classes module~s_netcdf->module~swiftest_classes module~swiftest->module~swiftest_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~swiftest_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines check Module Subroutines netcdf_close netcdf_initialize_output netcdf_open netcdf_write_frame_base netcdf_write_particle_info_base netcdf_write_hdr_system Subroutines subroutine check (status) Author Carlisle A. Wishard, Dana Singh, and David A. Minton Checks the status of all NetCDF operations to catch errors Arguments Type Intent Optional Attributes Name integer, intent(in) :: status Module Subroutines module subroutine netcdf_close (self, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Closes a NetCDF file Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_initialize_output (self, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Initialize a NetCDF file system and defines all variables.\n Define the variables Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_open (self, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Opens a NetCDF file and does the variable inquiries to activate variable ids Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_write_frame_base (self, iu, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_write_particle_info_base (self, iu) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Write all current particle to file Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset module subroutine netcdf_write_hdr_system (self, iu, param) Interface → Author David A. Minton Writes header information (variables that change with time, but not particle id). \n This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that \n previously were handled as separate output files. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_netcdf.html"},{"title":"s_fraggle_util – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_util~~UsesGraph module~s_fraggle_util s_fraggle_util module~swiftest swiftest module~s_fraggle_util->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_util->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~fraggle_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions fraggle_util_vmag_to_vb Module Subroutines fraggle_util_add_fragments_to_system fraggle_util_ang_mtm fraggle_util_construct_temporary_system fraggle_util_get_energy_momentum fraggle_util_restructure fraggle_util_shift_vector_to_origin Module Functions module function fraggle_util_vmag_to_vb (v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Interface → Author David A. Minton Converts radial and tangential velocity magnitudes into barycentric velocity Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:), allocatable Module Subroutines module subroutine fraggle_util_add_fragments_to_system (frag, colliders, system, param) Interface → Author David A. Minton Adds fragments to the temporary system pl object Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters module subroutine fraggle_util_ang_mtm (self) Interface → Author David A. Minton Calcualtes the current angular momentum of the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object module subroutine fraggle_util_construct_temporary_system (frag, system, param, tmpsys, tmpparam) Interface → Author David A. Minton Constructs a temporary internal system consisting of active bodies and additional fragments. This internal temporary system is used to calculate system energy with and without fragments\n and optionally including fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters module subroutine fraggle_util_get_energy_momentum (self, colliders, system, param, lbefore) Interface → Author David A. Minton Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.)\n This subrourtine works by building a temporary internal massive body object out of the non-excluded bodies and optionally with fragments appended. \n This will get passed to the energy calculation subroutine so that energy is computed exactly the same way is it is in the main program. \n This will temporarily expand the massive body object in a temporary system object called tmpsys to feed it into symba_energy Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa module subroutine fraggle_util_restructure (self, colliders, try, f_spin, r_max_start) Interface → Author David A. Minton Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt module subroutine fraggle_util_shift_vector_to_origin (m_frag, vec_frag) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Adjusts the position or velocity of the fragments as needed to align them with the origin Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame","tags":"","loc":"module/s_fraggle_util.html"},{"title":"s_fraggle_io – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_io~~UsesGraph module~s_fraggle_io s_fraggle_io module~swiftest swiftest module~s_fraggle_io->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_io->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~fraggle_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_io_log_generate fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_regime fraggle_io_log_start Module Subroutines module subroutine fraggle_io_log_generate (frag) Interface → Author David A. Minton Writes a log of the results of the fragment generation Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag module subroutine fraggle_io_log_one_message (message) Interface → Author David A. Minton Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message module subroutine fraggle_io_log_pl (pl, param) Interface → Author David A. Minton Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters module subroutine fraggle_io_log_regime (colliders, frag) Interface → Author David A. Minton Writes a log of the results of the collisional regime determination Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( fraggle_fragments ), intent(in) :: frag Fraggle fragment object module subroutine fraggle_io_log_start (param) Interface → Author David A. Minton Checks to see if the Fraggle log file needs to be replaced if this is a new run, or appended if this is a restarted run Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param","tags":"","loc":"module/s_fraggle_io.html"},{"title":"s_fraggle_generate – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_generate~~UsesGraph module~s_fraggle_generate s_fraggle_generate module~swiftest swiftest module~s_fraggle_generate->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_generate->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~fraggle_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables NFRAG_MIN F_SPIN_FIRST FRAGGLE_LTOL FRAGGLE_ETOL Subroutines fraggle_generate_pos_vec fraggle_generate_spins fraggle_generate_tan_vel fraggle_generate_rad_vel Module Subroutines fraggle_generate_fragments Variables Type Visibility Attributes Name Initial integer(kind=I4B), private, parameter :: NFRAG_MIN = 7 The minimum allowable number of fragments (set to 6 because that's how many unknowns are needed in the tangential velocity calculation) real(kind=DP), private, parameter :: F_SPIN_FIRST = 0.05_DP The initial try value of the fraction of energy or momenum in spin (whichever has the lowest kinetic energy) real(kind=DP), private, parameter :: FRAGGLE_LTOL = 10*epsilon(1.0_DP) real(kind=DP), private, parameter :: FRAGGLE_ETOL = 1e-8_DP Subroutines subroutine fraggle_generate_pos_vec (frag, colliders, r_max_start) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Initializes the orbits of the fragments around the center of mass. The fragments are initially placed on a plane defined by the \n pre-impact angular momentum. They are distributed on an ellipse surrounding the center of mass.\n The initial positions do not conserve energy or momentum, so these need to be adjusted later. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: r_max_start Initial guess for the starting maximum radial distance of fragments subroutine fraggle_generate_spins (frag, colliders, f_spin, lfailure) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Calculates the spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. Read more… Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: f_spin Fraction of energy or momentum that goes into spin (whichever gives the lowest kinetic energy) logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! subroutine fraggle_generate_tan_vel (frag, colliders, lfailure) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Adjusts the tangential velocities and spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget.\n This procedure works in several stages, with a goal to solve the angular and linear momentum constraints on the fragments, while still leaving a positive balance of\n our fragment kinetic energy (frag%ke_budget) that we can put into the radial velocity distribution. Read more… Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds subroutine fraggle_generate_rad_vel (frag, colliders, lfailure) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Adjust the fragment velocities to set the fragment orbital kinetic energy. This will minimize the difference between the fragment kinetic energy and the energy budget Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! Module Subroutines module subroutine fraggle_generate_fragments (self, colliders, system, param, lfailure) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Generates a system of fragments in barycentric coordinates that conserves energy and momentum. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle system object the outputs will be the fragmentation class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead?","tags":"","loc":"module/s_fraggle_generate.html"},{"title":"s_fraggle_regime – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_regime~~UsesGraph module~s_fraggle_regime s_fraggle_regime module~swiftest swiftest module~s_fraggle_regime->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_regime->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~fraggle_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines fraggle_regime_collresolve Module Subroutines fraggle_regime_colliders Subroutines subroutine fraggle_regime_collresolve (Mcb, m1, m2, rad1, rad2, xh1, xh2, vb1, vb2, den1, den2, min_mfrag, regime, Mlr, Mslr, Qloss) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Determine the collisional regime of two colliding bodies. \n Current version requires all values to be converted to SI units prior to calling the function\n       References:\n       Kokubo, E., Genda, H., 2010. Formation of Terrestrial Planets from Protoplanets Under a Realistic Accretion \n          Condition. ApJL 714, L21. https://doi.org/10.1088/2041-8205/714/1/L21\n       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling \n          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79\n       Mustill, A.J., Davies, M.B., Johansen, A., 2018. The dynamical evolution of transiting planetary systems including \n          a realistic collision prescription. Mon Not R Astron Soc 478, 2896–2908. https://doi.org/10.1093/mnras/sty1273\n       Rufu, R., Aharonson, O., 2019. Impact Dynamics of Moons Within a Planetary Potential. J. Geophys. Res. Planets 124, \n          1008–1019. https://doi.org/10.1029/2018JE005798\n       Stewart, S.T., Leinhardt, Z.M., 2012. Collisions between Gravity-dominated Bodies. II. The Diversity of Impact \n          Outcomes during the End Stage of Planet Formation. ApJ 751, 32. https://doi.org/10.1088/0004-637X/751/1/32 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: Mcb real(kind=DP), intent(in) :: m1 real(kind=DP), intent(in) :: m2 real(kind=DP), intent(in) :: rad1 real(kind=DP), intent(in) :: rad2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vb1 real(kind=DP), intent(in), dimension(:) :: vb2 real(kind=DP), intent(in) :: den1 real(kind=DP), intent(in) :: den2 real(kind=DP), intent(in) :: min_mfrag integer(kind=I4B), intent(out) :: regime real(kind=DP), intent(out) :: Mlr real(kind=DP), intent(out) :: Mslr real(kind=DP), intent(out) :: Qloss The residual energy after the collision Module Subroutines module subroutine fraggle_regime_colliders (self, frag, system, param) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Determine which fragmentation regime the set of colliders will be. This subroutine is a wrapper for the non-polymorphic raggle_regime_collresolve subroutine.\n It converts to SI units prior to calling\n The two-body equivalent masses of the collider system\n The two-body equivalent radii of the collider system\n The two-body equivalent density of the collider system\n The first body of the two-body equivalent position vector the collider system\n The first body of the two-body equivalent velocity vector the collider system\n The second body of the two-body equivalent position vector the collider system\n The second body of the two-body equivalent velocity vector the collider system\n The central body mass of the system\n The minimum fragment mass to generate. Collider systems that would otherwise generate less massive fragments than this value will be forced to merge instead\n Use the positions and velocities of the parents from indside the step (at collision) to calculate the collisional regime Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"module/s_fraggle_regime.html"},{"title":"s_fraggle_placeholder – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_placeholder~~UsesGraph module~s_fraggle_placeholder s_fraggle_placeholder module~swiftest swiftest module~s_fraggle_placeholder->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_placeholder->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~fraggle_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_placeholder_accel fraggle_placeholder_kick fraggle_placeholder_step Module Subroutines module subroutine fraggle_placeholder_accel (self, system, param, t, lbeg) Interface → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step module subroutine fraggle_placeholder_kick (self, system, param, t, dt, lbeg) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. module subroutine fraggle_placeholder_step (self, system, param, t, dt) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"module/s_fraggle_placeholder.html"},{"title":"s_fraggle_setup – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_setup~~UsesGraph module~s_fraggle_setup s_fraggle_setup module~swiftest swiftest module~s_fraggle_setup->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_setup->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~fraggle_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_setup_reset_fragments fraggle_setup_fragments Module Subroutines module subroutine fraggle_setup_reset_fragments (self) Interface → Author David A. Minton Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self module subroutine fraggle_setup_fragments (self, n, param) Interface → Author David A. Minton Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self integer(kind=I4B), intent(in) :: n class( swiftest_parameters ), intent(in) :: param","tags":"","loc":"module/s_fraggle_setup.html"},{"title":"s_fraggle_set – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_set~~UsesGraph module~s_fraggle_set s_fraggle_set module~swiftest swiftest module~s_fraggle_set->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_set->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~fraggle_classes module~symba_classes->module~rmvs_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_set_budgets_fragments fraggle_set_mass_dist_fragments fraggle_set_coordinate_system fraggle_set_natural_scale_factors fraggle_set_original_scale_factors Module Subroutines module subroutine fraggle_set_budgets_fragments (self, colliders) Interface → Author David A. Minton Sets the energy and momentum budgets of the fragments based on the collider values and the before/after values of energy and momentum Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object module subroutine fraggle_set_mass_dist_fragments (self, colliders, param) Interface → Author David A. Minton Sets the mass of fragments based on the mass distribution returned by the regime calculation.\n This subroutine must be run after the the setup rourtine has been run on the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters module subroutine fraggle_set_coordinate_system (self, colliders) Interface → Author David A. Minton Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object module subroutine fraggle_set_natural_scale_factors (self, colliders) Interface → Author David A. Minton Scales dimenional quantities to ~O(1) with respect to the collisional system. \n This scaling makes it easier for the non-linear minimization to converge on a solution Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object module subroutine fraggle_set_original_scale_factors (self, colliders) Interface → Author David A. Minton Restores dimenional quantities back to the system units Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"module/s_fraggle_set.html"},{"title":"s_rmvs_discard – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_discard~~UsesGraph module~s_rmvs_discard s_rmvs_discard module~swiftest swiftest module~s_rmvs_discard->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_discard->module~rmvs_classes module~swiftest->module~rmvs_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_discard_tp Module Subroutines module subroutine rmvs_discard_tp (self, system, param) Interface → Author David A. Minton Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_rmvs_discard.html"},{"title":"s_rmvs_util – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_util~~UsesGraph module~s_rmvs_util s_rmvs_util module~swiftest swiftest module~s_rmvs_util->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_util->module~rmvs_classes module~swiftest->module~rmvs_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_util_append_pl rmvs_util_append_tp rmvs_util_fill_pl rmvs_util_fill_tp rmvs_util_resize_pl rmvs_util_resize_tp rmvs_util_sort_pl rmvs_util_sort_tp rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_tp rmvs_util_spill_pl rmvs_util_spill_tp Module Subroutines module subroutine rmvs_util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine rmvs_util_append_tp (self, source, lsource_mask) Interface → Author David A. Minton Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine rmvs_util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new RMVS massive body structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine rmvs_util_fill_tp (self, inserts, lfill_list) Interface → Author David A. Minton Insert new RMVS test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine rmvs_util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine rmvs_util_resize_tp (self, nnew) Interface → Author David A. Minton Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine rmvs_util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a RMVS massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine rmvs_util_sort_tp (self, sortby, ascending) Interface → Author David A. Minton Sort a RMVS test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine rmvs_util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange RMVS massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine rmvs_util_sort_rearrange_tp (self, ind) Interface → Author David A. Minton Rearrange RMVS test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine rmvs_util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) RMVS test particle structure from active list to discard list Read more… Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not module subroutine rmvs_util_spill_tp (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) RMVS test particle structure from active list to discard list Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"module/s_rmvs_util.html"},{"title":"s_rmvs_kick – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_kick~~UsesGraph module~s_rmvs_kick s_rmvs_kick module~swiftest swiftest module~s_rmvs_kick->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_kick->module~rmvs_classes module~swiftest->module~rmvs_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_kick_getacch_tp Module Subroutines module subroutine rmvs_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute the oblateness acceleration in the inner encounter region with planets Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"module/s_rmvs_kick.html"},{"title":"s_rmvs_io – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_io~~UsesGraph module~s_rmvs_io s_rmvs_io module~swiftest swiftest module~s_rmvs_io->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_io->module~rmvs_classes module~swiftest->module~rmvs_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_io_write_encounter Module Subroutines module subroutine rmvs_io_write_encounter (t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Interface → Author David A. Minton Write close encounter data from RMVS to output binary files\n  There is no direct file output from this subroutine Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out","tags":"","loc":"module/s_rmvs_io.html"},{"title":"s_rmvs_setup – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_setup~~UsesGraph module~s_rmvs_setup s_rmvs_setup module~swiftest swiftest module~s_rmvs_setup->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_setup->module~rmvs_classes module~swiftest->module~rmvs_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_setup_pl rmvs_setup_initialize_system rmvs_setup_tp Module Subroutines module subroutine rmvs_setup_pl (self, n, param) Interface → Author David A. Minton Allocate RMVS test particle structure Read more… Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter module subroutine rmvs_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize an RMVS nbody system from files and sets up the planetocentric structures. Read more… Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters module subroutine rmvs_setup_tp (self, n, param) Interface → Author David A. Minton Allocate WHM test particle structure Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter","tags":"","loc":"module/s_rmvs_setup.html"},{"title":"s_rmvs_step – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_step~~UsesGraph module~s_rmvs_step s_rmvs_step module~swiftest swiftest module~s_rmvs_step->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_step->module~rmvs_classes module~swiftest->module~rmvs_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines rmvs_interp_out rmvs_step_out rmvs_interp_in rmvs_step_in rmvs_make_planetocentric rmvs_peri_tp rmvs_end_planetocentric Module Subroutines rmvs_step_system Subroutines subroutine rmvs_interp_out (cb, pl, dt) Author David A. Minton Interpolate planet positions between two Keplerian orbits in outer encounter region Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object real(kind=DP), intent(in) :: dt Step size subroutine rmvs_step_out (cb, pl, tp, system, param, t, dt) Author David A. Minton Step ACTIVE test particles ahead in the outer encounter region, setting up and calling the inner region\n    integration if necessar Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz subroutine rmvs_interp_in (cb, pl, system, param, dt, outer_index) Author David A. Minton Interpolate planet positions between two Keplerian orbits in inner encounter regio Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS cenral body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(in) :: param Swiftest parameters file real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(in) :: outer_index Outer substep number within current set subroutine rmvs_step_in (cb, pl, tp, param, outer_time, dto) Author David A. Minton Step active test particles ahead in the inner encounter region Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: outer_time Current time real(kind=DP), intent(in) :: dto Outer step size subroutine rmvs_make_planetocentric (param, cb, pl, tp) Author David A. Minton When encounters are detected, this method will call the interpolation methods for the planets and \n creates a Swiftest test particle structure for each planet's encountering test particles to simplify the \n planetocentric calculations. This subroutine is not based on an existing one from Swift and Swifter Arguments Type Intent Optional Attributes Name class(swiftest_parameters), intent(in) :: param Current run configuration paramete class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object subroutine rmvs_peri_tp (tp, pl, t, dt, lfirst, inner_index, ipleP, param) Author David A. Minton Determine planetocentric pericenter passages for test particles in close encounters with a planet Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: tp RMVS test particle object (planetocentric) class( rmvs_pl ), intent(inout) :: pl RMVS massive body object (heliocentric) real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size logical, intent(in) :: lfirst Logical flag indicating whether current invocation is the first integer(kind=I4B), intent(in) :: inner_index Outer substep number within current set integer(kind=I4B), intent(in) :: ipleP index of RMVS planet being closely encountered class(swiftest_parameters), intent(in) :: param Current run configuration parameters subroutine rmvs_end_planetocentric (pl, tp) Author David A. Minton Deallocates all of the encountering particle data structures for next time Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle objec Module Subroutines module subroutine rmvs_step_system (self, param, t, dt) Interface → Author David A. Minton Step massive bodies and and active test particles ahead in heliocentric coordinates Read more… Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz","tags":"","loc":"module/s_rmvs_step.html"},{"title":"s_rmvs_chk – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_chk~~UsesGraph module~s_rmvs_chk s_rmvs_chk module~swiftest swiftest module~s_rmvs_chk->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_chk->module~rmvs_classes module~swiftest->module~rmvs_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions rmvs_encounter_check_tp rmvs_chk_ind Module Functions module function rmvs_encounter_check_tp (self, system, dt) result(lencounter) Interface → Author David A. Minton Determine whether a test particle and planet are having or will have an encounter within the next time step Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter elemental module function rmvs_chk_ind (r2, v2, vdotr, dt, r2crit) result(lflag) Interface → Author David A. Minton Determine whether a test particle and planet are having or will have an encounter within the next time step Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: r2 real(kind=DP), intent(in) :: v2 real(kind=DP), intent(in) :: vdotr real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit Return Value logical","tags":"","loc":"module/s_rmvs_chk.html"},{"title":"swiftest_driver – swiftest","text":"Uses swiftest program~~swiftest_driver~~UsesGraph program~swiftest_driver swiftest_driver module~swiftest swiftest program~swiftest_driver->module~swiftest module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes symba_classes module~swiftest->module~symba_classes module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_operators->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~symba_classes->module~rmvs_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_globals module~symba_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~walltime_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Driver program for the Swiftest integrators. Unlike the earlier Swift and Swifter drivers, in Swiftest all integrators \n    are run from this single program. Adapted from Swifter by David E. Kaufmann's Swifter driver programs swifter_[bs,helio,ra15,rmvs,symba,tu4,whm].f90\n Adapted from Hal Levison and Martin Duncan's Swift driver programs\n Read in the user-defined parameters file and the initial conditions of the system\n Define the maximum number of threads Step the system forward in time Evaluate any discards or collisional outcomes If the loop counter is at the output cadence value, append the data file with a single frame\n If the loop counter is at the dump cadence value, dump the state of the system to a file in case it needs to be restarted Calls program~~swiftest_driver~~CallsGraph program~swiftest_driver swiftest_driver setup_construct_system setup_construct_system program~swiftest_driver->setup_construct_system io_get_args io_get_args program~swiftest_driver->io_get_args util_exit util_exit program~swiftest_driver->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Variables nbody_system param integrator param_file_name ierr iloop idump iout ioutput_t0 nloops old_t_final timer Variables Type Attributes Name Initial class(swiftest_nbody_system), allocatable :: nbody_system Polymorphic object containing the nbody system to be integrated class(swiftest_parameters), allocatable :: param Run configuration parameters integer(kind=I4B) :: integrator Integrator type code (see swiftest_globals for symbolic names) character(len=:), allocatable :: param_file_name Name of the file containing user-defined parameters integer(kind=I4B) :: ierr I/O error code integer(kind=I8B) :: iloop Loop counter integer(kind=I8B) :: idump Dump cadence counter integer(kind=I8B) :: iout Output cadence counter integer(kind=I8B) :: ioutput_t0 The output frame counter at time 0 integer(kind=I8B) :: nloops Number of steps to take in the simulation real(kind=DP) :: old_t_final = 0.0_DP Output time at which writing should start, in order to prevent duplicate lines being written for restarts type(walltimer) :: timer Object used for computing elapsed wall time","tags":"","loc":"program/swiftest_driver.html"}]}
\ No newline at end of file
+var tipuesearch = {"pages":[{"title":" swiftest ","text":"swiftest Developer Info David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott The Purdue University Minton Research Group","tags":"home","loc":"index.html"},{"title":"kick.f90 – swiftest","text":"This file depends on sourcefile~~kick.f90~~EfferentGraph sourcefile~kick.f90 kick.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~kick.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_kick Source Code kick.f90 Source Code submodule ( swiftest_classes ) s_kick use swiftest contains module subroutine kick_getacch_int_pl ( self ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of massive bodies !! !! Adapted from Hal Levison's Swift routine getacch_ah3.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f90 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object call kick_getacch_int_all_pl ( self % nbody , self % nplpl , self % k_plpl , self % xh , self % Gmass , self % radius , self % ah ) return end subroutine kick_getacch_int_pl module subroutine kick_getacch_int_tp ( self , GMpl , xhp , npl ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies !! !! Adapted from Hal Levison's Swift routine getacch_ah3_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: GMpl !! Massive body masses real ( DP ), dimension (:,:), intent ( in ) :: xhp !! Massive body position vectors integer ( I4B ), intent ( in ) :: npl !! Number of active massive bodies if (( self % nbody == 0 ) . or . ( npl == 0 )) return call kick_getacch_int_all_tp ( self % nbody , npl , self % xh , xhp , GMpl , self % lmask , self % ah ) return end subroutine kick_getacch_int_tp module subroutine kick_getacch_int_all_pl ( npl , nplpl , k_plpl , x , Gmass , radius , acc ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization !! !! Adapted from Hal Levison's Swift routine getacch_ah3.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 implicit none integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies integer ( I8B ), intent ( in ) :: nplpl !! Number of massive body interactions to compute integer ( I4B ), dimension (:,:), intent ( in ) :: k_plpl !! Array of interaction pair indices (flattened upper triangular matrix) real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vector array real ( DP ), dimension (:), intent ( in ) :: Gmass !! Array of massive body G*mass real ( DP ), dimension (:), intent ( in ) :: radius !! Array of massive body radii real ( DP ), dimension (:,:), intent ( inout ) :: acc !! Acceleration vector array ! Internals integer ( I8B ) :: k real ( DP ), dimension ( NDIM , npl ) :: ahi , ahj integer ( I4B ) :: i , j real ( DP ) :: rji2 , rlim2 real ( DP ) :: xr , yr , zr ahi (:,:) = 0.0_DP ahj (:,:) = 0.0_DP !$omp parallel do default(private) schedule(static)& !$omp shared(nplpl, k_plpl, x, Gmass, radius) & !$omp lastprivate(rji2, rlim2, xr, yr, zr) & !$omp reduction(+:ahi) & !$omp reduction(-:ahj) do k = 1_I8B , nplpl i = k_plpl ( 1 , k ) j = k_plpl ( 2 , k ) xr = x ( 1 , j ) - x ( 1 , i ) yr = x ( 2 , j ) - x ( 2 , i ) zr = x ( 3 , j ) - x ( 3 , i ) rji2 = xr ** 2 + yr ** 2 + zr ** 2 rlim2 = ( radius ( i ) + radius ( j )) ** 2 if ( rji2 > rlim2 ) call kick_getacch_int_one_pl ( rji2 , xr , yr , zr , Gmass ( i ), Gmass ( j ), ahi ( 1 , i ), ahi ( 2 , i ), ahi ( 3 , i ), ahj ( 1 , j ), ahj ( 2 , j ), ahj ( 3 , j )) end do !$omp end parallel do do concurrent ( i = 1 : npl ) acc (:, i ) = acc (:, i ) + ahi (:, i ) + ahj (:, i ) end do return end subroutine kick_getacch_int_all_pl module subroutine kick_getacch_int_all_tp ( ntp , npl , xtp , xpl , GMpl , lmask , acc ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies with parallelisim !! !! Adapted from Hal Levison's Swift routine getacch_ah3_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f99 implicit none integer ( I4B ), intent ( in ) :: ntp !! Number of test particles integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies real ( DP ), dimension (:,:), intent ( in ) :: xtp !! Test particle position vector array real ( DP ), dimension (:,:), intent ( in ) :: xpl !! Massive body particle position vector array real ( DP ), dimension (:), intent ( in ) :: GMpl !! Array of massive body G*mass logical , dimension (:), intent ( in ) :: lmask !! Logical mask indicating which test particles should be computed real ( DP ), dimension (:,:), intent ( inout ) :: acc !! Acceleration vector array ! Internals real ( DP ) :: rji2 real ( DP ) :: xr , yr , zr integer ( I4B ) :: i , j !$omp parallel do default(private) schedule(static)& !$omp shared(npl, ntp, lmask, xtp, xpl) & !$omp reduction(-:acc) do i = 1 , ntp if ( lmask ( i )) then do j = 1 , npl xr = xtp ( 1 , i ) - xpl ( 1 , j ) yr = xtp ( 2 , i ) - xpl ( 2 , j ) zr = xtp ( 3 , i ) - xpl ( 3 , j ) rji2 = xr ** 2 + yr ** 2 + zr ** 2 call kick_getacch_int_one_tp ( rji2 , xr , yr , zr , GMpl ( j ), acc ( 1 , i ), acc ( 2 , i ), acc ( 3 , i )) end do end if end do !$omp end parallel do return end subroutine kick_getacch_int_all_tp module pure subroutine kick_getacch_int_one_pl ( rji2 , xr , yr , zr , Gmi , Gmj , axi , ayi , azi , axj , ayj , azj ) !$omp declare simd(kick_getacch_int_one_pl) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies !! !! Adapted from Hal Levison's Swift routine getacch_ah3.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the two bodies real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmi !! G*mass of body i real ( DP ), intent ( in ) :: Gmj !! G*mass of body j real ( DP ), intent ( inout ) :: axi , ayi , azi !! Acceleration vector components of body i real ( DP ), intent ( inout ) :: axj , ayj , azj !! Acceleration vector components of body j ! Internals real ( DP ) :: faci , facj , irij3 irij3 = 1.0_DP / ( rji2 * sqrt ( rji2 )) faci = Gmi * irij3 facj = Gmj * irij3 axi = axi + facj * xr ayi = ayi + facj * yr azi = azi + facj * zr axj = axj - faci * xr ayj = ayj - faci * yr azj = azj - faci * zr return end subroutine kick_getacch_int_one_pl module pure subroutine kick_getacch_int_one_tp ( rji2 , xr , yr , zr , GMpl , ax , ay , az ) !$omp declare simd(kick_getacch_int_one_tp) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair. !! !! Adapted from Hal Levison's Swift routine getacch_ah3_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the test particle and massive body real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmpl !! G*mass of massive body real ( DP ), intent ( inout ) :: ax , ay , az !! Acceleration vector components of test particle ! Internals real ( DP ) :: fac fac = GMpl * sqrt ( rji2 ** ( - 3 )) ax = ax - fac * xr ay = ay - fac * yr az = az - fac * zr return end subroutine kick_getacch_int_one_tp end submodule s_kick","tags":"","loc":"sourcefile/kick.f90.html"},{"title":"tides_getacch_pl.f90 – swiftest","text":"This file depends on sourcefile~~tides_getacch_pl.f90~~EfferentGraph sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_tides_kick_getacch Source Code tides_getacch_pl.f90 Source Code submodule ( swiftest_classes ) s_tides_kick_getacch use swiftest contains module subroutine tides_kick_getacch_pl ( self , system ) !! author: Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton !! !! Calculated tidal torques from central body to any planet and from any planet to central body !! planet - planet interactions are considered negligable. !! This is a constant time lag model. !! !! Adapted from Mercury-T code from Bolmont et al. (2015) !! !! Reference: !!    Bolmont, E., Raymond, S.N., Leconte, J., Hersant, F., Correia, A.C.M., 2015. !!       Mercury-T : A new code to study tidally evolving multi-planet systems. !!       Applications to Kepler-62. A&A 583, A116. https://doi.org/10.1051/0004-6361/201525909 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals integer ( I4B ) :: i real ( DP ) :: rmag , vmag real ( DP ), dimension ( NDIM ) :: r_unit , v_unit , h_unit , theta_unit , theta_dot , F_T real ( DP ) :: Ftr , Ptopl , Ptocb , r5cbterm , r5plterm associate ( pl => self , npl => self % nbody , cb => system % cb ) pl % atide (:,:) = 0.0_DP cb % atide (:) = 0.0_DP do i = 1 , npl rmag = norm2 ( pl % xh (:, i )) vmag = norm2 ( pl % vh (:, i )) r_unit (:) = pl % xh (:, i ) / rmag v_unit (:) = pl % vh (:, i ) / vmag h_unit (:) = r_unit (:) . cross . v_unit (:) theta_unit (:) = h_unit (:) . cross . r_unit (:) theta_dot = dot_product ( pl % vh (:, i ), theta_unit (:)) ! First calculate the tangential component of the force vector (eq. 5 & 6 of Bolmont et al. 2015) ! The radial component is already computed in the obl_acc methods r5cbterm = pl % Gmass ( i ) ** 2 * cb % k2 * cb % radius ** 5 r5plterm = cb % Gmass ** 2 * pl % k2 ( i ) * pl % radius ( i ) ** 5 Ptopl = 3 * r5plterm * pl % tlag ( i ) / rmag ** 7 Ptocb = 3 * r5cbterm * cb % tlag / rmag ** 7 Ftr = - 3 / rmag ** 7 * ( r5cbterm + r5plterm ) - 3 * vmag / rmag * ( Ptocb + Ptopl ) F_T (:) = ( Ftr + ( Ptocb + Ptopl ) * dot_product ( v_unit , r_unit ) / rmag ) * r_unit (:) & + Ptopl * (( pl % rot (:, i ) - theta_dot (:)) . cross . r_unit (:)) & + Ptocb * (( cb % rot (:) - theta_dot (:)) . cross . r_unit (:)) cb % atide (:) = cb % atide (:) + F_T (:) / cb % Gmass pl % atide (:, i ) = F_T (:) / pl % Gmass ( i ) end do do i = 1 , npl pl % ah (:, i ) = pl % ah (:, i ) + pl % atide (:, i ) + cb % atide (:) end do end associate return end subroutine tides_kick_getacch_pl end submodule s_tides_kick_getacch","tags":"","loc":"sourcefile/tides_getacch_pl.f90.html"},{"title":"tides_spin_step.f90 – swiftest","text":"This file depends on sourcefile~~tides_spin_step.f90~~EfferentGraph sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_tides_step_spin Source Code tides_spin_step.f90 Source Code submodule ( swiftest_classes ) s_tides_step_spin use swiftest type , extends ( lambda_obj_tvar ) :: tides_derivs_func !! Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers procedure ( tidederiv ), pointer , nopass :: lambdaptr_tides_deriv real ( DP ), dimension (:,:), allocatable :: xbeg real ( DP ), dimension (:,:), allocatable :: xend real ( DP ) :: dt contains generic :: init => tides_derivs_init procedure :: evalt => tides_derivs_eval procedure , nopass :: tides_derivs_init end type interface lambda_obj module procedure tides_derivs_init end interface abstract interface function tidederiv ( x , t , dt , xbeg , xend ) result ( y ) ! Template for a 0 argument function import DP , swiftest_nbody_system real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t real ( DP ), intent ( in ) :: dt real ( DP ), dimension (:,:), intent ( in ) :: xbeg real ( DP ), dimension (:,:), intent ( in ) :: xend real ( DP ), dimension (:), allocatable :: y end function end interface contains module subroutine tides_step_spin_system ( self , param , t , dt ) !! author: Jennifer L.L. Pouplin and David A. Minton !! !! Integrates the spin equations for central and massive bodies of the system subjected to tides. implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ), dimension (:), allocatable :: rot0 , rot1 real ( DP ) :: subt real ( DP ), parameter :: tol = 1e-6_DP !! Just a guess at the moment real ( DP ) :: subdt associate ( pl => self % pl , npl => self % pl % nbody , cb => self % cb ) allocate ( rot0 ( NDIM * ( npl + 1 ))) rot0 = [ pack ( pl % rot (:, 1 : npl ),. true .), pack ( cb % rot (:),. true .)] ! Use this space call the ode_solver, passing tides_spin_derivs as the function: subdt = dt / 2 0._DP !rot1(:) = util_solve_rkf45(lambda_obj(tides_spin_derivs, subdt, pl%xbeg, pl%xend), rot0, dt, subdt tol) ! Recover with unpack !pl%rot(:,1:npl) = unpack(rot1... !cb%rot(:) = unpack(rot1... end associate return end subroutine tides_step_spin_system function tides_spin_derivs ( rot_pl_cb , t , dt , xbeg , xend ) result ( drot ) !! Need to add more arguments so we can pull in mass, radius, Ip, J2, etc... !! author: Jennifer L.L. Pouplin and David A. Minton !! !! function used to calculate the derivatives that are fed to the ODE solver implicit none ! Arguments real ( DP ), dimension (:,:), intent ( in ) :: rot_pl_cb !! Array of rotations. The last element is the central body, and all others are massive bodies real ( DP ), intent ( in ) :: t !! Current time, which is used to interpolate the massive body positions real ( DP ), intent ( in ) :: dt !! Total step size real ( DP ), dimension (:,:), intent ( in ) :: xbeg real ( DP ), dimension (:,:), intent ( in ) :: xend ! Internals real ( DP ), dimension (:,:), allocatable :: drot real ( DP ), dimension (:), allocatable :: flatrot real ( DP ), dimension ( NDIM ) :: N_Tcb , N_Rcb , N_Tpl , N_Rpl , xinterp real ( DP ) :: C_cb , C_pl , r_dot_rot_cb , r_dot_rot_pl , rmag integer ( I4B ) :: i , n n = size ( rot_pl_cb , 2 ) if ( allocated ( drot )) deallocate ( drot ) allocate ( drot , mold = rot_pl_cb ) drot (:,:) = 0.0_DP do i = 1 , n - 1 xinterp (:) = xbeg (:, i ) + t / dt * ( xend (:, i ) - xbeg (:, i )) ! Calculate Ncb and Npl as a function of xinterp !drot(:,i) = -Mcb / (Mcb + Mpl(i)) * (N_Tpl + N_Rpl) !drot(:,n) = drot(:,n) - Mcb / (Mcb + Mpl(i) * (N_Tcb + N_Rcb) ! end do return end function tides_spin_derivs function tides_derivs_eval ( self , x , t ) result ( y ) implicit none ! Arguments class ( tides_derivs_func ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t ! Result real ( DP ), dimension (:), allocatable :: y if ( associated ( self % lambdaptr_tides_deriv )) then y = self % lambdaptr_tides_deriv ( x , t , self % dt , self % xbeg , self % xend ) else error stop \"Lambda function was not initialized\" end if return end function tides_derivs_eval function tides_derivs_init ( lambda , dt , xbeg , xend ) result ( f ) implicit none ! Arguments procedure ( tidederiv ) :: lambda real ( DP ), intent ( in ) :: dt real ( DP ), dimension (:,:), intent ( in ) :: xbeg real ( DP ), dimension (:,:), intent ( in ) :: xend ! Result type ( tides_derivs_func ) :: f f % lambdaptr_tides_deriv => lambda f % dt = dt allocate ( f % xbeg , source = xbeg ) allocate ( f % xend , source = xend ) return end function tides_derivs_init end submodule s_tides_step_spin","tags":"","loc":"sourcefile/tides_spin_step.f90.html"},{"title":"obl.f90 – swiftest","text":"This file depends on sourcefile~~obl.f90~~EfferentGraph sourcefile~obl.f90 obl.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~obl.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_obl Source Code obl.f90 Source Code submodule ( swiftest_classes ) s_obl use swiftest contains module subroutine obl_acc_body ( self , system ) !! author: David A. Minton !! !! Compute the barycentric accelerations of bodies due to the oblateness of the central body !!      Returned values do not include monopole term or terms higher than J4 !! !! Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90 !! Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals integer ( I4B ) :: i real ( DP ) :: r2 , irh , rinv2 , t0 , t1 , t2 , t3 , fac1 , fac2 if ( self % nbody == 0 ) return associate ( n => self % nbody , cb => system % cb ) self % aobl (:,:) = 0.0_DP do concurrent ( i = 1 : n , self % lmask ( i )) r2 = dot_product ( self % xh (:, i ), self % xh (:, i )) irh = 1.0_DP / sqrt ( r2 ) rinv2 = irh ** 2 t0 = - cb % Gmass * rinv2 * rinv2 * irh t1 = 1.5_DP * cb % j2rp2 t2 = self % xh ( 3 , i ) * self % xh ( 3 , i ) * rinv2 t3 = 1.875_DP * cb % j4rp4 * rinv2 fac1 = t0 * ( t1 - t3 - ( 5 * t1 - ( 1 4.0_DP - 2 1.0_DP * t2 ) * t3 ) * t2 ) fac2 = 2 * t0 * ( t1 - ( 2.0_DP - ( 1 4.0_DP * t2 / 3.0_DP )) * t3 ) self % aobl (:, i ) = fac1 * self % xh (:, i ) self % aobl ( 3 , i ) = fac2 * self % xh ( 3 , i ) + self % aobl ( 3 , i ) end do end associate return end subroutine obl_acc_body module subroutine obl_acc_pl ( self , system ) !! author: David A. Minton !! !! Compute the barycentric accelerations of massive bodies due to the oblateness of the central body !! !! Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90 !! Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody , cb => system % cb ) call obl_acc_body ( pl , system ) do i = 1 , NDIM cb % aobl ( i ) = - sum ( pl % Gmass ( 1 : npl ) * pl % aobl ( i , 1 : npl ), pl % lmask ( 1 : npl )) / cb % Gmass end do do concurrent ( i = 1 : npl , pl % lmask ( i )) pl % ah (:, i ) = pl % ah (:, i ) + pl % aobl (:, i ) - cb % aobl (:) end do end associate return end subroutine obl_acc_pl module subroutine obl_acc_tp ( self , system ) !! author: David A. Minton !! !! Compute the barycentric accelerations of massive bodies due to the oblateness of the central body !! !! Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90 !! Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object ! Internals real ( DP ), dimension ( NDIM ) :: aoblcb integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , cb => system % cb ) call obl_acc_body ( tp , system ) if ( system % lbeg ) then aoblcb = cb % aoblbeg else aoblcb = cb % aoblend end if do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = tp % ah (:, i ) + tp % aobl (:, i ) - aoblcb (:) end do end associate return end subroutine obl_acc_tp module subroutine obl_pot_system ( self ) !! author: David A. Minton !! !! Compute the contribution to the total gravitational potential due solely to the oblateness of the central body !!    Returned value does not include monopole term or terms higher than J4 !! !!    Reference: MacMillan, W. D. 1958. The Theory of the Potential, (Dover Publications), 363. !! !! Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 !! Adapted from Hal Levison's Swift routine obl_pot.f implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object ! Internals integer ( I4B ) :: i real ( DP ), dimension ( self % pl % nbody ) :: oblpot_arr associate ( system => self , pl => self % pl , npl => self % pl % nbody , cb => self % cb ) if (. not . any ( pl % lmask ( 1 : npl ))) return do concurrent ( i = 1 : npl , pl % lmask ( i )) oblpot_arr ( i ) = obl_pot_one ( npl , cb % Gmass , pl % Gmass ( i ), cb % j2rp2 , cb % j4rp4 , pl % xh ( 3 , i ), 1.0_DP / norm2 ( pl % xh (:, i ))) end do system % oblpot = sum ( oblpot_arr , pl % lmask ( 1 : npl )) end associate return end subroutine obl_pot_system elemental function obl_pot_one ( npl , GMcb , GMpl , j2rp2 , j4rp4 , zh , irh ) result ( oblpot ) !! author: David A. Minton !! !! Compute the contribution to the total gravitational potential due solely to the oblateness of the central body from a single massive body !!    Returned value does not include monopole term or terms higher than J4 !! !!    Reference: MacMillan, W. D. 1958. The Theory of the Potential, (Dover Publications), 363. !! !! Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 !! Adapted from Hal Levison's Swift routine obl_pot.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies real ( DP ), intent ( in ) :: GMcb !! G*mass of the central body real ( DP ), intent ( in ) :: GMpl !! G*mass of the massive body real ( DP ), intent ( in ) :: j2rp2 !! J_2 / R**2 of the central body real ( DP ), intent ( in ) :: j4rp4 !! J_2 / R**4 of the central body real ( DP ), intent ( in ) :: zh !! z-component of the heliocentric distance vector of the massive body real ( DP ), intent ( in ) :: irh !! Inverse of the heliocentric distance magnitude of the massive body ! Result real ( DP ) :: oblpot !! Gravitational potential ! Internals integer ( I4B ) :: i real ( DP ) :: rinv2 , t0 , t1 , t2 , t3 , p2 , p4 , mu rinv2 = irh ** 2 t0 = GMcb * GMpl * rinv2 * irh t1 = j2rp2 t2 = zh ** 2 * rinv2 t3 = j4rp4 * rinv2 p2 = 0.5_DP * ( 3 * t2 - 1.0_DP ) p4 = 0.125_DP * (( 35 * t2 - 3 0.0_DP ) * t2 + 3.0_DP ) oblpot = t0 * ( t1 * p2 + t3 * p4 ) return end function obl_pot_one end submodule s_obl","tags":"","loc":"sourcefile/obl.f90.html"},{"title":"orbel.f90 – swiftest","text":"This file depends on sourcefile~~orbel.f90~~EfferentGraph sourcefile~orbel.f90 orbel.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~orbel.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_orbel Source Code orbel.f90 Source Code submodule ( swiftest_classes ) s_orbel use swiftest contains module subroutine orbel_el2xv_vec ( self , cb ) !! author: David A. Minton !! !! A wrapper method that converts all of the orbital element vectors into cartesian position and velocity vectors for a Swiftest body object. !! This method deallocates all of the orbital elements after it is finished. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body objec ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return call self % set_mu ( cb ) do concurrent ( i = 1 : self % nbody ) call orbel_el2xv ( self % mu ( i ), self % a ( i ), self % e ( i ), self % inc ( i ), self % capom ( i ), & self % omega ( i ), self % capm ( i ), self % xh (:, i ), self % vh (:, i )) end do deallocate ( self % a , self % e , self % inc , self % capom , self % omega , self % capm ) return end subroutine orbel_el2xv_vec pure subroutine orbel_el2xv ( mu , a , ie , inc , capom , omega , capm , x , v ) !! author: David A. Minton !! !! Compute osculating orbital elements from relative C)rtesian position and velocity !!  All angular measures are returned in radians !!      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 !! !!      If eccentricity < sqrt(TINY), argument of pericenter is arbitrarily set to 0 !! !!      ALGORITHM:  See Fitzpatrick \"Principles of Cel. Mech.\" !! !! Adapted from Martin Duncan's el2xv.f !! DATE WRITTEN:  May 11, 1992. !! REVISIONS: May 26 - now use better Kepler solver for ellipses !!  and hyperbolae called EHYBRID.F and FHYBRID.F implicit none real ( DP ), intent ( in ) :: mu real ( DP ), intent ( in ) :: a , ie , inc , capom , omega , capm real ( DP ), dimension (:), intent ( out ) :: x , v integer ( I4B ) :: iorbit_type real ( DP ) :: e , cape , capf , zpara , em1 real ( DP ) :: sip , cip , so , co , si , ci real ( DP ) :: d11 , d12 , d13 , d21 , d22 , d23 real ( DP ) :: scap , ccap , shcap , chcap real ( DP ) :: sqe , sqgma , xfac1 , xfac2 , ri , vfac1 , vfac2 if ( ie < 0.0_DP ) then !write(*,*) ' ERROR in orbel_el2xv: e<0, setting e=0!!1' e = 0.0_DP iorbit_type = ELLIPSE else e = ie em1 = e - 1._DP if ( abs ( em1 ) < VSMALL ) then iorbit_type = PARABOLA else if ( e > 1.0_DP ) then iorbit_type = HYPERBOLA else iorbit_type = ELLIPSE end if endif call orbel_scget ( omega , sip , cip ) call orbel_scget ( capom , so , co ) call orbel_scget ( inc , si , ci ) d11 = cip * co - sip * so * ci d12 = cip * so + sip * co * ci d13 = sip * si d21 = - sip * co - cip * so * ci d22 = - sip * so + cip * co * ci d23 = cip * si !-- ! Get the other quantities depending on orbit type ! if ( iorbit_type == ELLIPSE ) then cape = orbel_ehybrid ( e , capm ) call orbel_scget ( cape , scap , ccap ) sqe = sqrt ( 1._DP - e ** 2 ) sqgma = sqrt ( mu * a ) xfac1 = a * ( ccap - e ) xfac2 = a * sqe * scap ri = 1._DP / ( a * ( 1._DP - e * ccap )) vfac1 = - ri * sqgma * scap vfac2 = ri * sqgma * sqe * ccap endif !-- if ( iorbit_type == HYPERBOLA ) then capf = orbel_fhybrid ( e , capm ) call orbel_schget ( capf , shcap , chcap ) sqe = sqrt ( e ** 2 - 1._DP ) sqgma = sqrt ( mu * a ) xfac1 = a * ( e - chcap ) xfac2 = a * sqe * shcap ri = 1._DP / ( a * ( e * chcap - 1._DP )) vfac1 = - ri * sqgma * shcap vfac2 = ri * sqgma * sqe * chcap endif !-- if ( iorbit_type == PARABOLA ) then zpara = orbel_zget ( capm ) sqgma = sqrt ( 2 * mu * a ) xfac1 = a * ( 1._DP - zpara * zpara ) xfac2 = 2 * a * zpara ri = 1._DP / ( a * ( 1._DP + zpara * zpara )) vfac1 = - ri * sqgma * zpara vfac2 = ri * sqgma endif !-- x ( 1 ) = d11 * xfac1 + d21 * xfac2 x ( 2 ) = d12 * xfac1 + d22 * xfac2 x ( 3 ) = d13 * xfac1 + d23 * xfac2 v ( 1 ) = d11 * vfac1 + d21 * vfac2 v ( 2 ) = d12 * vfac1 + d22 * vfac2 v ( 3 ) = d13 * vfac1 + d23 * vfac2 return end subroutine orbel_el2xv module pure subroutine orbel_scget ( angle , sx , cx ) !! author: David A. Minton !! !! Efficiently compute the sine and cosine of an input angle !!      Input angle must be in radians !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_scget.f90 !! Adapted from Hal Levison's Swift routine orbel_scget.f implicit none ! Arguments real ( DP ), intent ( in ) :: angle real ( DP ), intent ( out ) :: sx , cx ! Internals integer ( I4B ) :: nper real ( DP ) :: x nper = angle / TWOPI x = angle - nper * TWOPI if ( x < 0.0_DP ) x = x + TWOPI sx = sin ( x ) cx = sqrt ( 1.0_DP - sx ** 2 ) if (( x > PIBY2 ) . and . ( x < PI3BY2 )) cx = - cx return end subroutine orbel_scget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !********************************************************************** !                   ORBEL_SCHGET.F !********************************************************************** !     PURPOSE:  Given an angle, efficiently compute sinh and cosh. ! !        Input: !             angle ==> angle in radians (real scalar) ! !        Output: !             shx    ==>  sinh(angle)  (real scalar) !             chx    ==>  cosh(angle)  (real scalar) ! !     ALGORITHM: Obvious from the code !     REMARKS: Based on the routine SCGET for sine's and cosine's. !       We use the sqrt rather than cosh (it's faster) !       BE SURE THE ANGLE IS IN RADIANS AND IT CAN'T BE LARGER THAN 300 !       OR OVERFLOWS WILL OCCUR! !     AUTHOR:  M. Duncan. !     DATE WRITTEN:  May 6, 1992. !     REVISIONS: !********************************************************************** pure subroutine orbel_schget ( angle , shx , chx ) real ( DP ), intent ( in ) :: angle real ( DP ), intent ( out ) :: shx , chx shx = sinh ( angle ) chx = sqrt ( 1._DP + shx * shx ) return end subroutine orbel_schget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !        !                    ORBEL_FLON.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn. for hyperbola using hybrid approach. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                        capn ==> hyperbola mean anomaly. (real scalar) !             Returns: !                  orbel_flon ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Uses power series for N in terms of F and Newton,s method !     REMARKS: ONLY GOOD FOR LOW VALUES OF N (N < 0.636*e -0.6) !     AUTHOR: M. Duncan !     DATE WRITTEN: May 26, 1992. !     REVISIONS: !********************************************************************** real ( DP ) pure function orbel_flon ( e , icapn ) implicit none real ( DP ), intent ( in ) :: e , icapn integer ( I4B ) :: iflag , i real ( DP ) :: a , b , sq , biga , bigb , capn real ( DP ) :: x , x2 real ( DP ) :: f , fp , dx real ( DP ) :: diff real ( DP ) :: a0 , a1 real ( DP ) :: b1 integer ( I4B ), parameter :: IMAX = 10 real ( DP ), parameter :: a11 = 15 6._DP , a9 = 1716 0._DP , a7 = 123552 0._DP real ( DP ), parameter :: a5 = 5189184 0._DP , a3 = 103783680 0._DP real ( DP ), parameter :: b11 = 11 * a11 , b9 = 9 * a9 , b7 = 7 * a7 real ( DP ), parameter :: b5 = 5 * a5 , b3 = 3 * a3 real ( DP ), parameter :: THIRD = 1._DP / 3._DP ! Function to solve \"Kepler's eqn\" for F (here called ! x) for given e and CAPN. Only good for smallish CAPN iflag = 0 if ( icapn < 0._DP ) then iflag = 1 capn = - icapn else capn = icapn end if a1 = 622702080 0._DP * ( 1._DP - 1._DP / e ) a0 = - 622702080 0._DP * capn / e b1 = a1 !  set iflag nonzero if capn < 0., in which case solve for -capn !  and change the sign of the final answer for f. !  Begin with a reasonable guess based on solving the cubic for small F a = 6 * ( e - 1.d0 ) / e b = - 6 * capn / e sq = SQRT ( 0.25_DP * b ** 2 + a ** 3 / 2 7._DP ) biga = ( - 0.5_DP * b + sq ) ** ( 1.0_DP / 3.0_DP ) bigb = - ( + 0.5_DP * b + sq ) ** ( 1.0_DP / 3.0_DP ) x = biga + bigb ! write(6,*) 'cubic = ',x**3 +a*x +b orbel_flon = x ! If capn is VSMALL (or zero) no need to go further than cubic even for ! e =1. if ( capn < VSMALL ) go to 100 do i = 1 , IMAX x2 = x * x f = a0 + x * ( a1 + x2 * ( a3 + x2 * ( a5 + x2 * ( a7 + x2 * ( a9 + x2 * ( a11 + x2 )))))) fp = b1 + x2 * ( b3 + x2 * ( b5 + x2 * ( b7 + x2 * ( b9 + x2 * ( b11 + 13 * x2 ))))) dx = - f / fp !   write(6,*) 'i,dx,x,f : ' !   write(6,432) i,dx,x,f 432 format ( 1 x , i3 , 3 ( 2 x , 1 p1e22 . 15 )) orbel_flon = x + dx !   if we have converged here there's no point in going on if ( abs ( dx ) <= VSMALL ) go to 100 x = orbel_flon end do ! abnormal return here - we've gone thru the loop ! imax times without convergence if ( iflag == 1 ) then orbel_flon = - orbel_flon capn = - capn end if !write(*,*) 'flon : returning without complete convergence' diff = e * sinh ( orbel_flon ) - orbel_flon - capn !write(*,*) 'n, f, ecc*sinh(f) - f - n : ' !write(*,*) capn,orbel_flon,diff return !  normal return here, but check if capn was originally negative 100 if ( iflag == 1 ) then orbel_flon = - orbel_flon capn = - capn end if return end function orbel_flon !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_FGET.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn. for hyperbola using hybrid approach. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                        capn ==> hyperbola mean anomaly. (real scalar) !             Returns: !                  orbel_fget ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Based on pp. 70-72 of Fitzpatrick's book \"Principles of !           Cel. Mech. \".  Quartic convergence from Danby's book. !     REMARKS: !     AUTHOR: M. Duncan !     DATE WRITTEN: May 11, 1992. !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_fget ( e , capn ) implicit none real ( DP ), intent ( in ) :: e , capn integer :: i real ( DP ) :: tmp , x , shx , chx real ( DP ) :: esh , ech , f , fp , fpp , fppp , dx integer ( I4B ), parameter :: IMAX = 10 !---- !...  executable code ! function to solve \"kepler's eqn\" for f (here called ! x) for given e and capn. !  begin with a guess proposed by danby if ( capn < 0.d0 ) then tmp = - 2 * capn / e + 1.8_DP x = - log ( tmp ) else tmp = + 2 * capn / e + 1.8_DP x = log ( tmp ) end if orbel_fget = x do i = 1 , IMAX call orbel_schget ( x , shx , chx ) esh = e * shx ech = e * chx f = esh - x - capn !   write(6,*) 'i,x,f : ',i,x,f fp = ech - 1.d0 fpp = esh fppp = ech dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx ** 2 * fppp / 6._DP ) orbel_fget = x + dx !   if we have converged here there's no point in going on if ( abs ( dx ) <= VSMALL ) return x = orbel_fget end do !write(*,*) 'fget : returning without complete convergence' return end function orbel_fget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_ZGET.F !********************************************************************** !     PURPOSE:  Solves the equivalent of Kepler's eqn. for a parabola !          given Q (Fitz. notation.) ! !             Input: !                           q ==>  parabola mean anomaly. (real scalar) !             Returns: !                  orbel_zget ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: p. 70-72 of Fitzpatrick's book \"Princ. of Cel. Mech.\" !     REMARKS: For a parabola we can solve analytically. !     AUTHOR: M. Duncan !     DATE WRITTEN: May 11, 1992. !     REVISIONS: May 27 - corrected it for negative Q and use power !       series for small Q. !********************************************************************** real ( DP ) pure function orbel_zget ( iq ) implicit none real ( DP ), intent ( in ) :: iq integer ( I4B ) :: iflag real ( DP ) :: x , tmp , q iflag = 0 if ( iq < 0.0_DP ) then iflag = 1 q = - iq else q = iq end if if ( q < 1.e-3_DP ) then orbel_zget = q * ( 1._DP - ( q ** 2 / 3._DP ) * ( 1._DP - q ** 2 )) else x = 0.5_DP * ( 3 * q + sqrt ( 9 * q ** 2 + 4._DP )) tmp = x ** ( 1._DP / 3._DP ) orbel_zget = tmp - 1._DP / tmp end if if ( iflag == 1 ) then orbel_zget = - orbel_zget q = - q end if return end function orbel_zget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_ESOLMD.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !                orbel_esolmd ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Some sort of quartic convergence from Wisdom. !     REMARKS: ONLY GOOD FOR SMALL ECCENTRICITY SINCE IT ONLY !         ITERATES ONCE. (GOOD FOR PLANET CALCS.) !         ALSO DOES NOT PUT M OR E BETWEEN 0. AND 2*PI !     INCLUDES: needs SCGET.F !     AUTHOR: M. Duncan !     DATE WRITTEN: May 7, 1992. !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_esolmd ( e , m ) implicit none real ( DP ), intent ( in ) :: e real ( DP ), intent ( in ) :: m real ( DP ) :: x , sm , cm , sx , cx real ( DP ) :: es , ec , f , fp , fpp , fppp , dx !...    function to solve kepler's eqn for e (here called !...    x) for given e and m. returns value of x. call orbel_scget ( m , sm , cm ) x = m + e * sm * ( 1._DP + e * ( cm + e * ( 1._DP - 1.5_DP * sm ** 2 ))) call orbel_scget ( x , sx , cx ) es = e * sx ec = e * cx f = x - es - m fp = 1._DP - ec fpp = es fppp = ec dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx ** 2 * fppp / 6._DP ) orbel_esolmd = x + dx return end function orbel_esolmd !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_EHIE.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !              orbel_ehybrid ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Use Danby's quartic for 3 iterations. !                Eqn. is f(x) = x - e*sin(x+M). Note  that !          E = x + M. First guess is very good for e near 1. !          Need to first get M between 0. and PI and use !   symmetry to return right answer if M between PI and 2PI !     REMARKS: Modifies M so that both E and M are in range (0,TWOPI) !     AUTHOR: M. Duncan !     DATE WRITTEN: May 25,1992. !     REVISIONS: !********************************************************************** real ( DP ) pure function orbel_ehie ( e , im ) implicit none real ( DP ), intent ( in ) :: e , im integer ( I4B ) :: iflag , nper , niter real ( DP ) :: dx , x , sa , ca , esa , eca , f , fp , m integer ( I4B ), parameter :: NMAX = 3 ! in this section, bring m into the range (0,TWOPI) and if ! the result is greater than pi, solve for (TWOPI - m). iflag = 0 nper = im / TWOPI m = im - nper * TWOPI if ( m < 0._DP ) m = m + TWOPI if ( m > PI ) then m = TWOPI - m iflag = 1 end if ! make a first guess that works well for e near 1. x = ( 6 * m ) ** ( 1._DP / 3._DP ) - m niter = 0 ! iteration loop do niter = 1 , NMAX call orbel_scget ( x + m , sa , ca ) esa = e * sa eca = e * ca f = x - esa fp = 1._DP - eca dx = - f / fp dx = - f / ( fp + 0.5_DP * dx * esa ) dx = - f / ( fp + 0.5_DP * dx * ( esa + eca * dx / 3.0_DP )) x = x + dx end do orbel_ehie = m + x if ( iflag == 1 ) then orbel_ehie = TWOPI - orbel_ehie m = TWOPI - m end if return end function orbel_ehie !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                             ORBEL_EGET.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !                  orbel_eget ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: Quartic convergence from Danby !     REMARKS: For results very near roundoff, give it M between !           0 and 2*pi. One can condition M before calling EGET !           by calling my double precision function MOD2PI(M). !           This is not done within the routine to speed it up !           and because it works fine even for large M. !     AUTHOR: M. Duncan !     DATE WRITTEN: May 7, 1992. !     REVISIONS: May 21, 1992.  Now have it go through EXACTLY two iterations !                with the premise that it will only be called if !          we have an ellipse with e between 0.15 and 0.8 !********************************************************************** real ( DP ) pure function orbel_eget ( e , m ) implicit none real ( DP ), intent ( in ) :: e , m real ( DP ) :: x , sm , cm , sx , cx real ( DP ) :: es , ec , f , fp , fpp , fppp , dx ! function to solve kepler's eqn for e (here called ! x) for given e and m. returns value of x. ! may 21 : for e < 0.18 use esolmd for speed and sufficient accuracy ! may 21 : for e > 0.8 use ehie - this one may not converge fast enough. call orbel_scget ( m , sm , cm ) !  begin with a guess accurate to order ecc**3 x = m + e * sm * ( 1._DP + e * ( cm + e * ( 1._DP - 1.5_DP * sm * sm ))) !  go through one iteration for improved estimate call orbel_scget ( x , sx , cx ) es = e * sx ec = e * cx f = x - es - m fp = 1._DP - ec fpp = es fppp = ec dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx * 2 * fppp / 6._DP ) orbel_eget = x + dx ! do another iteration. ! for m between 0 and 2*pi this seems to be enough to ! get near roundoff error for eccentricities between 0 and 0.8 x = orbel_eget call orbel_scget ( x , sx , cx ) es = e * sx ec = e * cx f = x - es - m fp = 1._DP - ec fpp = es fppp = ec dx = - f / fp dx = - f / ( fp + dx * fpp / 2._DP ) dx = - f / ( fp + dx * fpp / 2._DP + dx ** 2 * fppp / 6._DP ) orbel_eget = x + dx return end function orbel_eget !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_EHYBRID.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn.   e is ecc.   m is mean anomaly. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           m ==> mean anomaly. (real scalar) !             Returns: !              orbel_ehybrid ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: For e < 0.18 uses fast routine ESOLMD !          For larger e but less than 0.8, uses EGET !          For e > 0.8 uses EHIE !     REMARKS: Only EHIE brings M and E into range (0,TWOPI) !     AUTHOR: M. Duncan !     DATE WRITTEN: May 25,1992. !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_ehybrid ( e , m ) implicit none real ( DP ), intent ( in ) :: e , m !real(DP) :: orbel_esolmd,orbel_eget,orbel_ehie if ( e < 0.18_DP ) then orbel_ehybrid = orbel_esolmd ( e , m ) else if ( e <= 0.8_DP ) then orbel_ehybrid = orbel_eget ( e , m ) else orbel_ehybrid = orbel_ehie ( e , m ) end if end if return end function orbel_ehybrid !********************************************************************** ! Code converted to Modern Fortran by David A. Minton ! Date: 2020-06-29 !                    ORBEL_FHYBRID.F !********************************************************************** !     PURPOSE:  Solves Kepler's eqn. for hyperbola using hybrid approach. ! !             Input: !                           e ==> eccentricity anomaly. (real scalar) !                           n ==> hyperbola mean anomaly. (real scalar) !             Returns: !               orbel_fhybrid ==>  eccentric anomaly. (real scalar) ! !     ALGORITHM: For abs(N) < 0.636*ecc -0.6 , use FLON !          For larger N, uses FGET !     REMARKS: !     AUTHOR: M. Duncan !     DATE WRITTEN: May 26,1992. !     REVISIONS:: !     REVISIONS: 2/26/93 hfl !********************************************************************** real ( DP ) pure function orbel_fhybrid ( e , n ) implicit none real ( DP ), intent ( in ) :: e , n real ( DP ) :: abn abn = n if ( n < 0._DP ) abn = - abn if ( abn < 0.636_DP * e - 0.6_DP ) then orbel_fhybrid = orbel_flon ( e , n ) else orbel_fhybrid = orbel_fget ( e , n ) end if return end function orbel_fhybrid module pure subroutine orbel_xv2aeq ( mu , x , v , a , e , q ) !! author: David A. Minton !! !! Compute semimajor axis, eccentricity, and pericentric distance from relative Cartesian position and velocity !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aeq.f90 !! Adapted from Luke Dones' Swift routine orbel_xv2aeq.f implicit none !! Arguments real ( DP ), intent ( in ) :: mu real ( DP ), dimension (:), intent ( in ) :: x , v real ( DP ), intent ( out ) :: a , e , q integer ( I4B ) :: iorbit_type real ( DP ) :: r , v2 , h2 , energy , fac real ( DP ), dimension ( NDIM ) :: hvec a = 0.0_DP e = 0.0_DP q = 0.0_DP r = sqrt ( dot_product ( x (:), x (:))) v2 = dot_product ( v (:), v (:)) hvec (:) = x (:) . cross . v (:) h2 = dot_product ( hvec (:), hvec (:)) if ( h2 == 0.0_DP ) return energy = 0.5_DP * v2 - mu / r if ( abs ( energy * r / mu ) < sqrt ( VSMALL )) then iorbit_type = PARABOLA else a = - 0.5_DP * mu / energy if ( a < 0.0_DP ) then fac = - h2 / ( mu * a ) if ( fac > VSMALL ) then iorbit_type = HYPERBOLA else iorbit_type = PARABOLA end if else iorbit_type = ELLIPSE end if end if select case ( iorbit_type ) case ( ELLIPSE ) fac = 1.0_DP - h2 / ( mu * a ) if ( fac > VSMALL ) e = sqrt ( fac ) q = a * ( 1.0_DP - e ) case ( PARABOLA ) a = 0.5_DP * h2 / mu e = 1.0_DP q = a case ( HYPERBOLA ) e = sqrt ( 1.0_DP + fac ) q = a * ( 1.0_DP - e ) end select return end subroutine orbel_xv2aeq module pure subroutine orbel_xv2aqt ( mu , x , v , a , q , capm , tperi ) !! author: David A. Minton !! !! Compute semimajor axis, pericentric distance, mean anomaly, and time to nearest pericenter passage from !! relative Cartesian position and velocity !!      tperi > 0 means nearest pericenter passage is in the future !!      tperi < 0 means nearest pericenter passage is in the past !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aqt.f90 implicit none ! Arguments real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: q !! periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly real ( DP ), intent ( out ) :: tperi !! time of pericenter passage ! Internals integer ( I4B ) :: iorbit_type real ( DP ) :: r , v2 , h2 , rdotv , energy , fac , w , face , cape , e , tmpf , capf , mm real ( DP ), dimension ( NDIM ) :: hvec a = 0.0_DP q = 0.0_DP capm = 0.0_DP tperi = 0.0_DP r = sqrt ( dot_product ( x (:), x (:))) v2 = dot_product ( v (:), v (:)) hvec (:) = x (:) . cross . v (:) h2 = dot_product ( hvec (:), hvec (:)) if ( h2 == 0.0_DP ) return rdotv = dot_product ( x (:), v (:)) energy = 0.5_DP * v2 - mu / r if ( abs ( energy * r / mu ) < sqrt ( VSMALL )) then iorbit_type = PARABOLA else a = - 0.5_DP * mu / energy if ( a < 0.0_DP ) then fac = - h2 / ( mu * a ) if ( fac > VSMALL ) then iorbit_type = HYPERBOLA else iorbit_type = PARABOLA end if else iorbit_type = ELLIPSE end if end if select case ( iorbit_type ) case ( ELLIPSE ) fac = 1.0_DP - h2 / ( mu * a ) if ( fac > VSMALL ) then e = sqrt ( fac ) cape = 0.0_DP face = ( a - r ) / ( a * e ) if ( face < - 1.0_DP ) then cape = PI else if ( face < 1.0_DP ) then cape = acos ( face ) end if if ( rdotv < 0.0_DP ) cape = TWOPI - cape else e = 0.0_DP cape = 0.0_DP end if capm = cape - e * sin ( cape ) q = a * ( 1.0_DP - e ) mm = sqrt ( mu / a ** 3 ) if ( capm < PI ) then tperi = - 1.0_DP * capm / mm else tperi = - 1.0_DP * ( capm - TWOPI ) / mm end if case ( PARABOLA ) a = 0.5_DP * h2 / mu e = 1.0_DP w = 0.0_DP fac = 2 * a / r - 1.0_DP if ( fac < - 1.0_DP ) then w = PI else if ( fac < 1.0_DP ) then w = acos ( fac ) end if if ( rdotv < 0.0_DP ) w = TWOPI - w tmpf = tan ( 0.5_DP * w ) capm = tmpf * ( 1.0_DP + tmpf * tmpf / 3.0_DP ) q = a mm = sqrt ( 0.5_DP * mu / q ** 3 ) tperi = - 1.0_DP * capm / mm case ( HYPERBOLA ) e = sqrt ( 1.0_DP + fac ) tmpf = ( a - r ) / ( a * e ) if ( tmpf < 1.0_DP ) tmpf = 1.0_DP capf = log ( tmpf + sqrt ( tmpf * tmpf - 1.0_DP )) if ( rdotv < 0.0_DP ) capf = - capf capm = e * sinh ( capf ) - capf q = a * ( 1.0_DP - e ) mm = sqrt ( - mu / a ** 3 ) tperi = - 1.0_DP * capm / mm end select return end subroutine orbel_xv2aqt module subroutine orbel_xv2el_vec ( self , cb ) !! author: David A. Minton !! !! A wrapper method that converts all of the cartesian position and velocity vectors of a Swiftest body object to orbital elements. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! internals integer ( I4B ) :: i if ( self % nbody == 0 ) return call self % set_mu ( cb ) if ( allocated ( self % a )) deallocate ( self % a ); allocate ( self % a ( self % nbody )) if ( allocated ( self % e )) deallocate ( self % e ); allocate ( self % e ( self % nbody )) if ( allocated ( self % inc )) deallocate ( self % inc ); allocate ( self % inc ( self % nbody )) if ( allocated ( self % capom )) deallocate ( self % capom ); allocate ( self % capom ( self % nbody )) if ( allocated ( self % omega )) deallocate ( self % omega ); allocate ( self % omega ( self % nbody )) if ( allocated ( self % capm )) deallocate ( self % capm ); allocate ( self % capm ( self % nbody )) do concurrent ( i = 1 : self % nbody ) call orbel_xv2el ( self % mu ( i ), self % xh (:, i ), self % vh (:, i ), self % a ( i ), self % e ( i ), self % inc ( i ), & self % capom ( i ), self % omega ( i ), self % capm ( i )) end do end subroutine orbel_xv2el_vec module pure subroutine orbel_xv2el ( mu , x , v , a , e , inc , capom , omega , capm ) !! author: David A. Minton !! !! Compute osculating orbital elements from relative Cartesian position and velocity !!  All angular measures are returned in radians !!      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 !! !!      If eccentricity < sqrt(TINY), argument of pericenter is arbitrarily set to 0 !! !!      References: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 201 - 206. !!              Fitzpatrick, P. M. 1970. Principles of Celestial Mechanics, (Academic Press), 69 - 73. !!              Roy, A. E. 1982. Orbital Motion, (Adam Hilger, Ltd.), 75 - 95 !! !! Adapted from David E. Kaufmann's Swifter routine: orbel_xv2el.f90 !! Adapted from Martin Duncan's Swift routine orbel_xv2el.f implicit none ! Arguments real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: e !! eccentricity real ( DP ), intent ( out ) :: inc !! inclination real ( DP ), intent ( out ) :: capom !! longitude of ascending node real ( DP ), intent ( out ) :: omega !! argument of periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly ! Internals integer ( I4B ) :: iorbit_type real ( DP ) :: r , v2 , h2 , h , rdotv , energy , fac , u , w , cw , sw , face , cape , tmpf , capf real ( DP ), dimension ( NDIM ) :: hvec a = 0.0_DP e = 0.0_DP inc = 0.0_DP capom = 0.0_DP omega = 0.0_DP capm = 0.0_DP r = . mag . x (:) v2 = dot_product ( v (:), v (:)) hvec = x (:) . cross . v (:) h2 = dot_product ( hvec (:), hvec (:)) h = . mag . hvec (:) if ( h2 <= 10 * tiny ( 0.0_DP )) return rdotv = dot_product ( x (:), v (:)) energy = 0.5_DP * v2 - mu / r fac = hvec ( 3 ) / h if ( fac < - 1.0_DP ) then inc = PI else if ( fac < 1.0_DP ) then inc = acos ( fac ) end if fac = sqrt ( hvec ( 1 ) ** 2 + hvec ( 2 ) ** 2 ) / h if ( fac ** 2 < VSMALL ) then u = atan2 ( x ( 2 ), x ( 1 )) if ( hvec ( 3 ) < 0.0_DP ) u = - u else capom = atan2 ( hvec ( 1 ), - hvec ( 2 )) u = atan2 ( x ( 3 ) / sin ( inc ), x ( 1 ) * cos ( capom ) + x ( 2 ) * sin ( capom )) end if if ( capom < 0.0_DP ) capom = capom + TWOPI if ( u < 0.0_DP ) u = u + TWOPI if ( abs ( energy * r / mu ) < sqrt ( VSMALL )) then iorbit_type = parabola else a = - 0.5_DP * mu / energy if ( a < 0.0_DP ) then fac = - h2 / ( mu * a ) if ( fac > VSMALL ) then iorbit_type = HYPERBOLA else iorbit_type = PARABOLA end if else iorbit_type = ELLIPSE end if end if select case ( iorbit_type ) case ( ELLIPSE ) fac = 1.0_DP - h2 / ( mu * a ) if ( fac > VSMALL ) then e = sqrt ( fac ) cape = 0.0_DP face = ( a - r ) / ( a * e ) if ( face < - 1.0_DP ) then cape = PI else if ( face < 1.0_DP ) then cape = acos ( face ) end if if ( rdotv < 0.0_DP ) cape = TWOPI - cape fac = 1.0_DP - e * cos ( cape ) cw = ( cos ( cape ) - e ) / fac sw = sqrt ( 1.0_DP - e ** 2 ) * sin ( cape ) / fac w = atan2 ( sw , cw ) if ( w < 0.0_DP ) w = w + TWOPI else cape = u w = u end if capm = cape - e * sin ( cape ) case ( PARABOLA ) a = 0.5_DP * h2 / mu e = 1.0_DP w = 0.0_DP fac = 2 * a / r - 1.0_DP if ( fac < - 1.0_DP ) then w = PI else if ( fac < 1.0_DP ) then w = acos ( fac ) end if if ( rdotv < 0.0_DP ) w = TWOPI - w tmpf = tan ( 0.5_DP * w ) capm = tmpf * ( 1.0_DP + tmpf * tmpf / 3.0_DP ) case ( HYPERBOLA ) e = sqrt ( 1.0_DP + fac ) tmpf = max (( a - r ) / ( a * e ), 1.0_DP ) capf = log ( tmpf + sqrt ( tmpf ** 2 - 1.0_DP )) if ( rdotv < 0.0_DP ) capf = - capf fac = e * cosh ( capf ) - 1.0_DP cw = ( e - cosh ( capf )) / fac sw = sqrt ( e * e - 1.0_DP ) * sinh ( capf ) / fac w = atan2 ( sw , cw ) if ( w < 0.0_DP ) w = w + TWOPI capm = e * sinh ( capf ) - capf end select omega = u - w if ( omega < 0.0_DP ) omega = omega + TWOPI return end subroutine orbel_xv2el end submodule s_orbel","tags":"","loc":"sourcefile/orbel.f90.html"},{"title":"whm_coord.f90 – swiftest","text":"This file depends on sourcefile~~whm_coord.f90~~EfferentGraph sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_coord Source Code whm_coord.f90 Source Code submodule ( whm_classes ) s_whm_coord use swiftest contains module subroutine whm_coord_h2j_pl ( self , cb ) !! author: David A. Minton !! !! Convert from heliocentric to Jacobi coordinates, massive bodies only !! !! Uses pre-computed eta rather than computing it each time !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2j.f90 !! !! Adapted from Hal Levison's Swift routine coord_h2j.f implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: sumx , sumv , cap , capv if ( self % nbody == 0 ) return associate ( npl => self % nbody , GMpl => self % Gmass , eta => self % eta , xh => self % xh , vh => self % vh , & xj => self % xj , vj => self % vj ) xj (:, 1 ) = xh (:, 1 ) vj (:, 1 ) = vh (:, 1 ) sumx (:) = 0.0_DP sumv (:) = 0.0_DP do i = 2 , npl sumx (:) = sumx (:) + GMpl ( i - 1 ) * xh (:, i - 1 ) sumv (:) = sumv (:) + GMpl ( i - 1 ) * vh (:, i - 1 ) cap (:) = sumx (:) / eta ( i - 1 ) capv (:) = sumv (:) / eta ( i - 1 ) xj (:, i ) = xh (:, i ) - cap (:) vj (:, i ) = vh (:, i ) - capv (:) end do end associate return end subroutine whm_coord_h2j_pl module subroutine whm_coord_j2h_pl ( self , cb ) !! author: David A. Minton !! !! Convert from Jacobi to heliocentric coordinates, massive bodies only. !! !! Uses pre-computed eta rather than computing it each time !! !! !! Adapted from David E. Kaufmann's Swifter routine coord_j2h.f90 !! !! Adapted from Hal Levison's Swift routine coord_j2h.f implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: sumx , sumv if ( self % nbody == 0 ) return associate ( npl => self % nbody , GMpl => self % Gmass , eta => self % eta , xh => self % xh , vh => self % vh , & xj => self % xj , vj => self % vj ) xh (:, 1 ) = xj (:, 1 ) vh (:, 1 ) = vj (:, 1 ) sumx (:) = 0.0_DP sumv (:) = 0.0_DP do i = 2 , npl sumx (:) = sumx (:) + GMpl ( i - 1 ) * xj (:, i - 1 ) / eta ( i - 1 ) sumv (:) = sumv (:) + GMpl ( i - 1 ) * vj (:, i - 1 ) / eta ( i - 1 ) xh (:, i ) = xj (:, i ) + sumx (:) vh (:, i ) = vj (:, i ) + sumv (:) end do end associate return end subroutine whm_coord_j2h_pl module subroutine whm_coord_vh2vj_pl ( self , cb ) !! author: David A. Minton !! !! Convert from heliocentric to Jadcobi coordinates, massive body velocities only !! !! Uses pre-computed eta rather than computing it each time !! !! Adapted from David E. Kaufmann's Swifter routine coord_vh2vj.f90 !! !! Adapted from Hal Levison's Swift routine coord_vh2vj.f implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: sumv , capv if ( self % nbody == 0 ) return associate ( npl => self % nbody , GMpl => self % Gmass , vh => self % vh , vj => self % vj , eta => self % eta ) vj (:, 1 ) = vh (:, 1 ) sumv (:) = 0.0_DP do i = 2 , npl sumv (:) = sumv (:) + GMpl ( i - 1 ) * vh (:, i - 1 ) capv (:) = sumv (:) / eta ( i - 1 ) vj (:, i ) = vh (:, i ) - capv (:) end do end associate return end subroutine whm_coord_vh2vj_pl end submodule s_whm_coord","tags":"","loc":"sourcefile/whm_coord.f90.html"},{"title":"whm_gr.f90 – swiftest","text":"This file depends on sourcefile~~whm_gr.f90~~EfferentGraph sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_gr Source Code whm_gr.f90 Source Code submodule ( whm_classes ) s_whm_gr use swiftest contains module pure subroutine whm_gr_kick_getacch_pl ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of massive bodies !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: suma real ( DP ), dimension (:, :), allocatable :: aj real ( DP ) :: beta , rjmag4 if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody , inv_c2 => param % inv_c2 ) call gr_kick_getacch ( pl % muj , pl % xj , pl % lmask , npl , param % inv_c2 , pl % agr ) suma (:) = 0.0_DP pl % ah (:, 1 ) = pl % ah (:, 1 ) + pl % agr (:, 1 ) do i = 2 , npl suma (:) = suma (:) + pl % Gmass ( i ) * pl % agr (:, i ) / pl % eta ( i ) pl % ah (:, i ) = pl % ah (:, i ) + pl % agr (:, i ) + suma (:) end do end associate return end subroutine whm_gr_kick_getacch_pl module pure subroutine whm_gr_kick_getacch_tp ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of test particles !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: rjmag4 , beta if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , inv_c2 => param % inv_c2 ) call gr_kick_getacch ( tp % mu , tp % xh , tp % lmask , ntp , param % inv_c2 , tp % agr ) tp % ah (:, 1 : ntp ) = tp % ah (:, 1 : ntp ) + tp % agr (:, 1 : ntp ) end associate return end subroutine whm_gr_kick_getacch_tp module pure subroutine whm_gr_p4_pl ( self , param , dt ) !! author: David A. Minton !! !! Position kick to massive bodies due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i associate ( pl => self , npl => self % nbody ) if ( npl == 0 ) return do concurrent ( i = 1 : npl , pl % lmask ( i )) call gr_p4_pos_kick ( param , pl % xj (:, i ), pl % vj (:, i ), dt ) end do end associate return end subroutine whm_gr_p4_pl module pure subroutine whm_gr_p4_tp ( self , param , dt ) !! author: David A. Minton !! !! Position kick to test particles due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i associate ( tp => self , ntp => self % nbody ) if ( ntp == 0 ) return do concurrent ( i = 1 : ntp , tp % lmask ( i )) call gr_p4_pos_kick ( param , tp % xh (:, i ), tp % vh (:, i ), dt ) end do end associate return end subroutine whm_gr_p4_tp end submodule s_whm_gr","tags":"","loc":"sourcefile/whm_gr.f90.html"},{"title":"whm_step.f90 – swiftest","text":"This file depends on sourcefile~~whm_step.f90~~EfferentGraph sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_step Source Code whm_step.f90 Source Code submodule ( whm_classes ) s_whm_step use swiftest contains module subroutine whm_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies and and active test particles ahead in heliocentric coordinates !! !! Adapted from Hal Levison's Swift routine step_kdk.f !! Adapted from David E. Kaufmann's Swifter routine whm_step.f90 implicit none ! Arguments class ( whm_nbody_system ), intent ( inout ) :: self !! WHM nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize associate ( system => self , cb => self % cb , pl => self % pl , tp => self % tp ) tp % lfirst = pl % lfirst call pl % step ( system , param , t , dt ) call tp % step ( system , param , t , dt ) if ( param % ltides ) call system % step_spin ( param , t , dt ) end associate return end subroutine whm_step_system module subroutine whm_step_pl ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step planets ahead using kick-drift-kick algorithm !! !! Adapted from Hal Levison's Swift routine step_kdk_pl.f !! Adapted from David E. Kaufmann's Swifter routine whm_step_pl.f90 !logical, save :: lfirst = .true. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ) :: dth if ( self % nbody == 0 ) return associate ( pl => self , cb => system % cb ) dth = 0.5_DP * dt call pl % kick ( system , param , t , dth , lbeg = . true .) call pl % vh2vj ( cb ) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % drift ( system , param , dt ) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % j2h ( cb ) call pl % kick ( system , param , t + dt , dth , lbeg = . false .) end associate return end subroutine whm_step_pl module subroutine whm_step_tp ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step active test particles ahead using kick-drift-kick algorithm !! !! Adapted from Hal Levison's Swift routine step_kdk_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_step_tp.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ) :: dth if ( self % nbody == 0 ) return select type ( system ) class is ( whm_nbody_system ) associate ( tp => self , cb => system % cb , pl => system % pl ) dth = 0.5_DP * dt call tp % kick ( system , param , t , dth , lbeg = . true .) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % drift ( system , param , dt ) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % kick ( system , param , t + dt , dth , lbeg = . false .) end associate end select return end subroutine whm_step_tp end submodule s_whm_step","tags":"","loc":"sourcefile/whm_step.f90.html"},{"title":"whm_drift.f90 – swiftest","text":"This file depends on sourcefile~~whm_drift.f90~~EfferentGraph sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules whm_drift Source Code whm_drift.f90 Source Code submodule ( whm_classes ) whm_drift use swiftest contains module subroutine whm_drift_pl ( self , system , param , dt ) !! author: David A. Minton !! !! Loop through planets and call Danby drift routine !! !! Adapted from Hal Levison's Swift routine drift.f !! Adapted from David E. Kaufmann's Swifter routine whm_drift.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals integer ( I4B ) :: i integer ( I4B ), dimension (:), allocatable :: iflag if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) allocate ( iflag ( npl )) iflag (:) = 0 call drift_all ( pl % muj , pl % xj , pl % vj , npl , param , dt , pl % lmask , iflag ) if ( any ( iflag ( 1 : npl ) /= 0 )) then where ( iflag ( 1 : npl ) /= 0 ) pl % status ( 1 : npl ) = DISCARDED_DRIFTERR pl % lmask ( 1 : npl ) = . false . end where do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!!!\" WRITE ( * , * ) pl % muj ( i ), dt WRITE ( * , * ) pl % xj (:, i ) WRITE ( * , * ) pl % vj (:, i ) WRITE ( * , * ) \" STOPPING \" end if end do call util_exit ( FAILURE ) end if end associate return end subroutine whm_drift_pl end submodule whm_drift","tags":"","loc":"sourcefile/whm_drift.f90.html"},{"title":"whm_kick.f90 – swiftest","text":"This file depends on sourcefile~~whm_kick.f90~~EfferentGraph sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_kick Source Code whm_kick.f90 Source Code submodule ( whm_classes ) s_whm_kick use swiftest contains module subroutine whm_kick_getacch_pl ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of planets !! !! Adapted from Hal Levison's Swift routine getacch.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: ah0 if ( self % nbody == 0 ) return associate ( cb => system % cb , pl => self , npl => self % nbody ) call pl % set_ir3 () ah0 (:) = whm_kick_getacch_ah0 ( pl % Gmass ( 2 : npl ), pl % xh (:, 2 : npl ), npl - 1 ) do i = 1 , npl pl % ah (:, i ) = pl % ah (:, i ) + ah0 (:) end do call whm_kick_getacch_ah1 ( cb , pl ) call whm_kick_getacch_ah2 ( cb , pl ) call pl % accel_int () if ( param % loblatecb ) then call pl % accel_obl ( system ) if ( lbeg ) then cb % aoblbeg = cb % aobl else cb % aoblend = cb % aobl end if if ( param % ltides ) then cb % atidebeg = cb % aobl call pl % accel_tides ( system ) cb % atideend = cb % atide end if end if if ( param % lgr ) call pl % accel_gr ( param ) if ( param % lextra_force ) call pl % accel_user ( system , param , t , lbeg ) end associate return end subroutine whm_kick_getacch_pl module subroutine whm_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of test particles !! !! Adapted from Hal Levison's Swift routine getacch_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_tp.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: ah0 associate ( tp => self , ntp => self % nbody , pl => system % pl , cb => system % cb , npl => system % pl % nbody ) if ( ntp == 0 . or . npl == 0 ) return system % lbeg = lbeg if ( lbeg ) then ah0 (:) = whm_kick_getacch_ah0 ( pl % Gmass ( 1 : npl ), pl % xbeg (:, 1 : npl ), npl ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = tp % ah (:, i ) + ah0 (:) end do call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xbeg (:, 1 : npl ), npl ) else ah0 (:) = whm_kick_getacch_ah0 ( pl % Gmass ( 1 : npl ), pl % xend (:, 1 : npl ), npl ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = tp % ah (:, i ) + ah0 (:) end do call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xend (:, 1 : npl ), npl ) end if if ( param % loblatecb ) call tp % accel_obl ( system ) if ( param % lextra_force ) call tp % accel_user ( system , param , t , lbeg ) if ( param % lgr ) call tp % accel_gr ( param ) end associate return end subroutine whm_kick_getacch_tp function whm_kick_getacch_ah0 ( mu , xhp , n ) result ( ah0 ) !! author: David A. Minton !! !! Compute zeroth term heliocentric accelerations of planets implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: mu real ( DP ), dimension (:,:), intent ( in ) :: xhp integer ( I4B ), intent ( in ) :: n ! Result real ( DP ), dimension ( NDIM ) :: ah0 ! Internals real ( DP ) :: fac , r2 , ir3h , irh integer ( I4B ) :: i ah0 (:) = 0.0_DP do i = 1 , n r2 = dot_product ( xhp (:, i ), xhp (:, i )) irh = 1.0_DP / sqrt ( r2 ) ir3h = irh / r2 fac = mu ( i ) * ir3h ah0 (:) = ah0 (:) - fac * xhp (:, i ) end do return end function whm_kick_getacch_ah0 pure subroutine whm_kick_getacch_ah1 ( cb , pl ) !! author: David A. Minton !! !! Compute first term heliocentric accelerations of planets !! !! Adapted from Hal Levison's Swift routine getacch_ah1.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah1.f90 implicit none ! Arguments class ( swiftest_cb ), intent ( in ) :: cb !! WHM central body object class ( whm_pl ), intent ( inout ) :: pl !! WHM massive body object ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: ah1h , ah1j associate ( npl => pl % nbody ) do concurrent ( i = 2 : npl , pl % lmask ( i )) ah1j (:) = pl % xj (:, i ) * pl % ir3j ( i ) ah1h (:) = pl % xh (:, i ) * pl % ir3h ( i ) pl % ah (:, i ) = pl % ah (:, i ) + cb % Gmass * ( ah1j (:) - ah1h (:)) end do end associate return end subroutine whm_kick_getacch_ah1 pure subroutine whm_kick_getacch_ah2 ( cb , pl ) !! author: David A. Minton !! !! Compute second term heliocentric accelerations of planets !! !! Adapted from Hal Levison's Swift routine getacch_ah2.f !! Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah2.f90 implicit none ! Arguments class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object class ( whm_pl ), intent ( inout ) :: pl !! WHM massive body object ! Internals integer ( I4B ) :: i real ( DP ) :: etaj , fac real ( DP ), dimension ( NDIM ) :: ah2 , ah2o associate ( npl => pl % nbody ) ah2 (:) = 0.0_DP ah2o (:) = 0.0_DP etaj = cb % Gmass do concurrent ( i = 2 : npl , pl % lmask ( i )) etaj = etaj + pl % Gmass ( i - 1 ) fac = pl % Gmass ( i ) * cb % Gmass * pl % ir3j ( i ) / etaj ah2 (:) = ah2o + fac * pl % xj (:, i ) pl % ah (:, i ) = pl % ah (:, i ) + ah2 (:) ah2o (:) = ah2 (:) end do end associate return end subroutine whm_kick_getacch_ah2 module subroutine whm_kick_vh_pl ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick heliocentric velocities of massive bodies !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f !! Adapted from David E. Kaufmann's Swifter routine whm_kickvh.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i associate ( pl => self , npl => self % nbody , cb => system % cb ) if ( npl == 0 ) return if ( lbeg ) then if ( pl % lfirst ) then call pl % h2j ( cb ) pl % ah (:, 1 : npl ) = 0.0_DP call pl % accel ( system , param , t , lbeg ) pl % lfirst = . false . end if call pl % set_beg_end ( xbeg = pl % xh ) else pl % ah (:, 1 : npl ) = 0.0_DP call pl % accel ( system , param , t , lbeg ) call pl % set_beg_end ( xend = pl % xh ) end if do concurrent ( i = 1 : npl , pl % lmask ( i )) pl % vh (:, i ) = pl % vh (:, i ) + pl % ah (:, i ) * dt end do end associate return end subroutine whm_kick_vh_pl module subroutine whm_kick_vh_tp ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick heliocentric velocities of test particles !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_kickvh_tp.f90 implicit none ! Arguments class ( whm_tp ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) if ( tp % lfirst ) then do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = 0.0_DP end do call tp % accel ( system , param , t , lbeg = . true .) tp % lfirst = . false . end if if (. not . lbeg ) then do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % ah (:, i ) = 0.0_DP end do call tp % accel ( system , param , t , lbeg ) end if do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % vh (:, i ) = tp % vh (:, i ) + tp % ah (:, i ) * dt end do end associate return end subroutine whm_kick_vh_tp end submodule s_whm_kick","tags":"","loc":"sourcefile/whm_kick.f90.html"},{"title":"whm_setup.f90 – swiftest","text":"This file depends on sourcefile~~whm_setup.f90~~EfferentGraph sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_setup Source Code whm_setup.f90 Source Code submodule ( whm_classes ) s_whm_setup use swiftest contains module subroutine whm_setup_pl ( self , n , param ) !! author: David A. Minton !! !! Allocate WHM planet structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class call setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % eta )) deallocate ( self % eta ) if ( allocated ( self % muj )) deallocate ( self % muj ) if ( allocated ( self % xj )) deallocate ( self % xj ) if ( allocated ( self % vj )) deallocate ( self % vj ) if ( allocated ( self % ir3j )) deallocate ( self % ir3j ) if ( n == 0 ) return allocate ( self % eta ( n )) allocate ( self % muj ( n )) allocate ( self % xj ( NDIM , n )) allocate ( self % vj ( NDIM , n )) allocate ( self % ir3j ( n )) self % eta (:) = 0.0_DP self % muj (:) = 0.0_DP self % xj (:,:) = 0.0_DP self % vj (:,:) = 0.0_DP self % ir3j (:) = 0.0_DP return end subroutine whm_setup_pl module subroutine whm_util_set_mu_eta_pl ( self , cb ) !! author: David A. Minton !! !! Sets the Jacobi mass value eta for all massive bodies implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM system object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i associate ( pl => self , npl => self % nbody ) if ( npl == 0 ) return call util_set_mu_pl ( pl , cb ) pl % eta ( 1 ) = cb % Gmass + pl % Gmass ( 1 ) pl % muj ( 1 ) = pl % eta ( 1 ) do i = 2 , npl pl % eta ( i ) = pl % eta ( i - 1 ) + pl % Gmass ( i ) pl % muj ( i ) = cb % Gmass * pl % eta ( i ) / pl % eta ( i - 1 ) end do end associate return end subroutine whm_util_set_mu_eta_pl module subroutine whm_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize a WHM nbody system from files !! implicit none ! Arguments class ( whm_nbody_system ), intent ( inout ) :: self !! WHM nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters call setup_initialize_system ( self , param ) ! First we need to make sure that the massive bodies are sorted by heliocentric distance before computing jacobies call util_set_ir3h ( self % pl ) call self % pl % sort ( \"ir3h\" , ascending = . false .) call self % pl % index ( param ) ! Make sure that the discard list gets allocated initially call self % tp_discards % setup ( 0 , param ) call self % pl % set_mu ( self % cb ) call self % tp % set_mu ( self % cb ) if ( param % lgr ) then call self % pl % v2pv ( param ) call self % tp % v2pv ( param ) end if return end subroutine whm_setup_initialize_system end submodule s_whm_setup","tags":"","loc":"sourcefile/whm_setup.f90.html"},{"title":"whm_util.f90 – swiftest","text":"This file depends on sourcefile~~whm_util.f90~~EfferentGraph sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_whm_util Source Code whm_util.f90 Source Code submodule ( whm_classes ) s_whm_util use swiftest contains module subroutine whm_util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( whm_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % eta , source % eta , nold , nsrc , lsource_mask ) call util_append ( self % muj , source % muj , nold , nsrc , lsource_mask ) call util_append ( self % ir3j , source % ir3j , nold , nsrc , lsource_mask ) call util_append ( self % xj , source % xj , nold , nsrc , lsource_mask ) call util_append ( self % vj , source % vj , nold , nsrc , lsource_mask ) call util_append_pl ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class whm_pl or its descendents\" call util_exit ( FAILURE ) end select return end subroutine whm_util_append_pl module subroutine whm_util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new WHM test particle structure into an old one. !! This is the inverse of a fill operation. !! !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: inserts !! inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( inserts ) class is ( whm_pl ) call util_fill ( keeps % eta , inserts % eta , lfill_list ) call util_fill ( keeps % muj , inserts % muj , lfill_list ) call util_fill ( keeps % ir3j , inserts % ir3j , lfill_list ) call util_fill ( keeps % xj , inserts % xj , lfill_list ) call util_fill ( keeps % vj , inserts % vj , lfill_list ) call util_fill_pl ( keeps , inserts , lfill_list ) class default write ( * , * ) \"Invalid object passed to the fill method. Inserts must be of class whm_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine whm_util_fill_pl module subroutine whm_util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a massive body against the requested size and resizes it if it is too small. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % eta , nnew ) call util_resize ( self % xj , nnew ) call util_resize ( self % vj , nnew ) call util_resize ( self % muj , nnew ) call util_resize ( self % ir3j , nnew ) call util_resize_pl ( self , nnew ) return end subroutine whm_util_resize_pl module subroutine whm_util_set_ir3j ( self ) !! author: David A. Minton !! !! Sets the inverse Jacobi and heliocentric radii cubed (1/rj**3 and 1/rh**3) implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object ! Internals integer ( I4B ) :: i real ( DP ) :: r2 , ir if ( self % nbody > 0 ) then do i = 1 , self % nbody r2 = dot_product ( self % xh (:, i ), self % xh (:, i )) ir = 1.0_DP / sqrt ( r2 ) self % ir3h ( i ) = ir / r2 r2 = dot_product ( self % xj (:, i ), self % xj (:, i )) ir = 1.0_DP / sqrt ( r2 ) self % ir3j ( i ) = ir / r2 end do end if return end subroutine whm_util_set_ir3j module subroutine whm_util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a WHM massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"eta\" ) call util_sort ( direction * pl % eta ( 1 : npl ), ind ( 1 : npl )) case ( \"muj\" ) call util_sort ( direction * pl % muj ( 1 : npl ), ind ( 1 : npl )) case ( \"ir3j\" ) call util_sort ( direction * pl % ir3j ( 1 : npl ), ind ( 1 : npl )) case ( \"xj\" , \"vj\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default call util_sort_pl ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine whm_util_sort_pl module subroutine whm_util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange WHM massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % eta , ind , npl ) call util_sort_rearrange ( pl % xj , ind , npl ) call util_sort_rearrange ( pl % vj , ind , npl ) call util_sort_rearrange ( pl % muj , ind , npl ) call util_sort_rearrange ( pl % ir3j , ind , npl ) call util_sort_rearrange_pl ( pl , ind ) end associate return end subroutine whm_util_sort_rearrange_pl module subroutine whm_util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) WHM test particle structure from active list to discard list !! !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( discards ) class is ( whm_pl ) call util_spill ( keeps % eta , discards % eta , lspill_list , ldestructive ) call util_spill ( keeps % muj , discards % muj , lspill_list , ldestructive ) call util_spill ( keeps % ir3j , discards % ir3j , lspill_list , ldestructive ) call util_spill ( keeps % xj , discards % xj , lspill_list , ldestructive ) call util_spill ( keeps % vj , discards % vj , lspill_list , ldestructive ) call util_spill_pl ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class whm_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine whm_util_spill_pl end submodule s_whm_util","tags":"","loc":"sourcefile/whm_util.f90.html"},{"title":"operator_cross.f90 – swiftest","text":"This file depends on sourcefile~~operator_cross.f90~~EfferentGraph sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~operator_cross.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_operator_cross Source Code operator_cross.f90 Source Code submodule ( swiftest_operators ) s_operator_cross use swiftest !! author: David A. Minton !! !! Contains implementations for the .cross. operator for all defined integer and real types !! Single vector implementations: C(1:3)   = A(1:3)   .cross. B(1:3) !! Vector list implementations:   C(1:3, :) = A(1:3, :) .cross. B(1:3, :) contains module pure function operator_cross_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:), intent ( in ) :: A , B real ( SP ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_sp module pure function operator_cross_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:), intent ( in ) :: A , B real ( DP ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_dp module pure function operator_cross_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:), intent ( in ) :: A , B real ( QP ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_qp module pure function operator_cross_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:), intent ( in ) :: A , B integer ( I1B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i1b module pure function operator_cross_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:), intent ( in ) :: A , B integer ( I2B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i2b module pure function operator_cross_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:), intent ( in ) :: A , B integer ( I4B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i4b module pure function operator_cross_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:), intent ( in ) :: A , B integer ( I8B ), dimension ( 3 ) :: C C ( 1 ) = A ( 2 ) * B ( 3 ) - A ( 3 ) * B ( 2 ) C ( 2 ) = A ( 3 ) * B ( 1 ) - A ( 1 ) * B ( 3 ) C ( 3 ) = A ( 1 ) * B ( 2 ) - A ( 2 ) * B ( 1 ) return end function operator_cross_i8b module pure function operator_cross_el_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A , B real ( SP ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_sp module pure function operator_cross_el_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A , B real ( DP ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_dp module pure function operator_cross_el_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A , B real ( QP ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_qp module pure function operator_cross_el_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:,:), intent ( in ) :: A , B integer ( I1B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i1b module pure function operator_cross_el_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:,:), intent ( in ) :: A , B integer ( I2B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i2b module pure function operator_cross_el_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:,:), intent ( in ) :: A , B integer ( I4B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i4b module pure function operator_cross_el_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:,:), intent ( in ) :: A , B integer ( I8B ), dimension (:,:), allocatable :: C integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( C )) deallocate ( C ) allocate ( C , mold = A ) do concurrent ( i = 1 : n ) C ( 1 , i ) = A ( 2 , i ) * B ( 3 , i ) - A ( 3 , i ) * B ( 2 , i ) C ( 2 , i ) = A ( 3 , i ) * B ( 1 , i ) - A ( 1 , i ) * B ( 3 , i ) C ( 3 , i ) = A ( 1 , i ) * B ( 2 , i ) - A ( 2 , i ) * B ( 1 , i ) end do return end function operator_cross_el_i8b end submodule s_operator_cross","tags":"","loc":"sourcefile/operator_cross.f90.html"},{"title":"operator_mag.f90 – swiftest","text":"This file depends on sourcefile~~operator_mag.f90~~EfferentGraph sourcefile~operator_mag.f90 operator_mag.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~operator_mag.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_operator_mag Source Code operator_mag.f90 Source Code submodule ( swiftest_operators ) s_operator_mag !! author: David A. Minton !! !! Contains implementations for the .mag. operator for all defined real types !! Single vector implementations:  B   = .mag. A(1:3) !! Vector list implementations:   B(:) = .mag. A(1:3, :) contains module pure function operator_mag_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:), intent ( in ) :: A real ( SP ) :: B B = norm2 ( A (:)) return end function operator_mag_sp module pure function operator_mag_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:), intent ( in ) :: A real ( DP ) :: B B = norm2 ( A (:)) return end function operator_mag_dp module pure function operator_mag_el_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A real ( SP ), dimension (:), allocatable :: B integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( B )) deallocate ( B ) allocate ( B ( n )) do concurrent ( i = 1 : n ) B ( i ) = norm2 ( A (:, i )) end do return end function operator_mag_el_sp module pure function operator_mag_el_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), allocatable :: B integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( B )) deallocate ( B ) allocate ( B ( n )) do concurrent ( i = 1 : n ) B ( i ) = norm2 ( A (:, i )) end do return end function operator_mag_el_dp module pure function operator_mag_el_qp ( A ) result ( B ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), allocatable :: B integer ( I4B ) :: i , n n = size ( A , 2 ) if ( allocated ( B )) deallocate ( B ) allocate ( B ( n )) do concurrent ( i = 1 : n ) B ( i ) = norm2 ( A (:, i )) end do return end function operator_mag_el_qp end submodule s_operator_mag","tags":"","loc":"sourcefile/operator_mag.f90.html"},{"title":"util_solve.f90 – swiftest","text":"This file depends on sourcefile~~util_solve.f90~~EfferentGraph sourcefile~util_solve.f90 util_solve.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_solve.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_solve Source Code util_solve.f90 Source Code submodule ( swiftest_classes ) s_util_solve use swiftest contains module function util_solve_linear_system_d ( A , b , n , lerr ) result ( x ) !! Author: David A. Minton !! !! Solves the linear equation of the form A*x = b for x. !!   A is an (n,n) arrays !!   x and b are (n) arrays !! Uses Gaussian elimination, so will have issues if system is ill-conditioned. !! Uses quad precision intermidiate values, so works best on small arrays. use , intrinsic :: ieee_exceptions implicit none ! Arguments integer ( I4B ), intent ( in ) :: n real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr ! Result real ( DP ), dimension ( n ) :: x ! Internals real ( QP ), dimension (:), allocatable :: qx type ( ieee_status_type ) :: original_fpe_status logical , dimension (:), allocatable :: fpe_flag call ieee_get_status ( original_fpe_status ) ! Save the original floating point exception status call ieee_set_flag ( ieee_all , . false .) ! Set all flags to quiet allocate ( fpe_flag ( size ( ieee_usual ))) qx = solve_wbs ( ge_wpp ( real ( A , kind = QP ), real ( b , kind = QP ))) call ieee_get_flag ( ieee_usual , fpe_flag ) lerr = any ( fpe_flag ) if ( lerr . or . ( any ( abs ( qx ) > huge ( x ))) . or . ( any ( abs ( qx ) < tiny ( x )))) then x = 0.0_DP else x = real ( qx , kind = DP ) end if call ieee_set_status ( original_fpe_status ) return end function util_solve_linear_system_d module function util_solve_linear_system_q ( A , b , n , lerr ) result ( x ) !! Author: David A. Minton !! !! Solves the linear equation of the form A*x = b for x. !!   A is an (n,n) arrays !!   x and b are (n) arrays !! Uses Gaussian elimination, so will have issues if system is ill-conditioned. !! Uses quad precision intermidiate values, so works best on small arrays. use , intrinsic :: ieee_exceptions implicit none ! Arguments integer ( I4B ), intent ( in ) :: n real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr ! Result real ( QP ), dimension ( n ) :: x ! Internals type ( ieee_status_type ) :: original_fpe_status logical , dimension (:), allocatable :: fpe_flag call ieee_get_status ( original_fpe_status ) ! Save the original floating point exception status call ieee_set_flag ( ieee_all , . false .) ! Set all flags to quiet allocate ( fpe_flag ( size ( ieee_usual ))) x = solve_wbs ( ge_wpp ( A , b )) call ieee_get_flag ( ieee_usual , fpe_flag ) lerr = any ( fpe_flag ) if ( lerr ) x = 0.0_DP call ieee_set_status ( original_fpe_status ) return end function util_solve_linear_system_q function solve_wbs ( u ) result ( x ) ! solve with backward substitution !! Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran use , intrinsic :: ieee_exceptions use swiftest implicit none ! Arguments real ( QP ), intent ( in ), dimension (:,:), allocatable :: u ! Result real ( QP ), dimension (:), allocatable :: x ! Internals integer ( I4B ) :: i , n n = size ( u , 1 ) if ( allocated ( x )) deallocate ( x ) if (. not . allocated ( x )) allocate ( x ( n )) if ( any ( abs ( u ) < tiny ( 1._DP )) . or . any ( abs ( u ) > huge ( 1._DP ))) then x (:) = 0._DP return end if call ieee_set_halting_mode ( ieee_divide_by_zero , . false .) do i = n , 1 , - 1 x ( i ) = ( u ( i , n + 1 ) - sum ( u ( i , i + 1 : n ) * x ( i + 1 : n ))) / u ( i , i ) end do return end function solve_wbs function ge_wpp ( A , b ) result ( u ) ! gaussian eliminate with partial pivoting !! Solve  Ax=b  using Gaussian elimination then backwards substitution. !!   A being an n by n matrix. !!   x and b are n by 1 vectors. !! Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran use , intrinsic :: ieee_exceptions use swiftest implicit none ! Arguments real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), intent ( in ) :: b ! Result real ( QP ), dimension (:,:), allocatable :: u ! Internals integer ( I4B ) :: i , j , n , p real ( QP ) :: upi n = size ( a , 1 ) allocate ( u ( n , ( n + 1 ))) u = reshape ([ A , b ], [ n , n + 1 ]) call ieee_set_halting_mode ( ieee_divide_by_zero , . false .) do j = 1 , n p = maxloc ( abs ( u ( j : n , j )), 1 ) + j - 1 ! maxloc returns indices between (1, n - j + 1) if ( p /= j ) u ([ p , j ], j ) = u ([ j , p ], j ) u ( j + 1 :, j ) = u ( j + 1 :, j ) / u ( j , j ) do i = j + 1 , n + 1 upi = u ( p , i ) if ( p /= j ) u ([ p , j ], i ) = u ([ j , p ], i ) u ( j + 1 : n , i ) = u ( j + 1 : n , i ) - upi * u ( j + 1 : n , j ) end do end do return end function ge_wpp module function util_solve_rkf45 ( f , y0in , t1 , dt0 , tol ) result ( y1 ) !! author: David A. Minton !! !! Implements the 4th order Runge-Kutta-Fehlberg ODE solver for initial value problems of the form f=dy/dt, y0 = y(t=0), solving for y1 = y(t=t1). Uses a 5th order adaptive step size control. !! Uses a lambda function object as defined in the lambda_function module implicit none ! Arguments class ( lambda_obj ), intent ( inout ) :: f !! lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real ( DP ), dimension (:), intent ( in ) :: y0in !! Initial value at t=0 real ( DP ), intent ( in ) :: t1 !! Final time real ( DP ), intent ( in ) :: dt0 !! Initial step size guess real ( DP ), intent ( in ) :: tol !! Tolerance on solution ! Result real ( DP ), dimension (:), allocatable :: y1 !! Final result ! Internals integer ( I4B ), parameter :: MAXREDUX = 1000 !! Maximum number of times step size can be reduced real ( DP ), parameter :: DTFAC = 0.95_DP !! Step size reduction safety factor (Value just under 1.0 to prevent adaptive step size control from discarding steps too aggressively) integer ( I4B ), parameter :: RKS = 6 !! Number of RK stages real ( DP ), dimension ( RKS , RKS - 1 ), parameter :: rkf45_btab = reshape ( & !! Butcher tableau for Runge-Kutta-Fehlberg method ( / 1. / 4. , 1. / 4. , 0. , 0. , 0. , 0. ,& 3. / 8. , 3. / 3 2. , 9. / 3 2. , 0. , 0. , 0. ,& 1 2. / 1 3. , 193 2. / 219 7. , - 720 0. / 219 7. , 729 6. / 219 7. , 0. , 0. ,& 1. , 43 9. / 21 6. , - 8. , 368 0. / 51 3. , - 84 5. / 410 4. , 0. ,& 1. / 2. , - 8. / 2 7. , 2. , - 354 4. / 256 5. , 185 9. / 410 4. , - 1 1. / 4 0. / ), shape ( rkf45_btab )) real ( DP ), dimension ( RKS ), parameter :: rkf4_coeff = ( / 2 5. / 21 6. , 0. , 140 8. / 256 5. , 219 7. / 410 4. , - 1. / 5. , 0. / ) real ( DP ), dimension ( RKS ), parameter :: rkf5_coeff = ( / 1 6. / 13 5. , 0. , 665 6. / 1282 5. , 2856 1. / 5643 0. , - 9. / 5 0. , 2. / 5 5. / ) real ( DP ), dimension (:, :), allocatable :: k !! Runge-Kutta coefficient vector real ( DP ), dimension (:), allocatable :: ynorm !! Normalized y value used for adaptive step size control real ( DP ), dimension (:), allocatable :: y0 !! Value of y at the beginning of each substep integer ( I4B ) :: Nvar !! Number of variables in problem integer ( I4B ) :: rkn !! Runge-Kutta loop index real ( DP ) :: t , x1 , dt , trem !! Current time, step size and total time remaining real ( DP ) :: s , yerr , yscale !!  Step size reduction factor, error in dependent variable, and error scale factor integer ( I4B ) :: i , n allocate ( y0 , source = y0in ) allocate ( y1 , mold = y0 ) allocate ( ynorm , mold = y0 ) Nvar = size ( y0 ) allocate ( k ( Nvar , RKS )) dt = dt0 trem = t1 t = 0._DP do yscale = norm2 ( y0 (:)) do i = 1 , MAXREDUX select type ( f ) class is ( lambda_obj_tvar ) do rkn = 1 , RKS y1 (:) = y0 (:) + matmul ( k (:, 1 : rkn - 1 ), rkf45_btab ( 2 : rkn , rkn - 1 )) if ( rkn == 1 ) then x1 = t else x1 = t + rkf45_btab ( 1 , rkn - 1 ) end if k (:, rkn ) = dt * f % evalt ( y1 (:), t ) end do class is ( lambda_obj ) do rkn = 1 , RKS y1 (:) = y0 (:) + matmul ( k (:, 1 : rkn - 1 ), rkf45_btab ( 2 : rkn , rkn - 1 )) k (:, rkn ) = dt * f % eval ( y1 (:)) end do end select ! Now determine if the step size needs adjusting ynorm (:) = matmul ( k (:,:), ( rkf5_coeff (:) - rkf4_coeff (:))) / yscale yerr = norm2 ( ynorm (:)) s = ( tol / ( 2 * yerr )) ** ( 0.25_DP ) dt = min ( s * DTFAC * dt , trem ) ! Alter step size either up or down, but never bigger than the remaining time if ( s >= 1.0_DP ) exit ! Good step! if ( i == MAXREDUX ) then write ( * , * ) \"Something has gone wrong in util_solve_rkf45!! Step size reduction has gone too far this time!\" call util_exit ( FAILURE ) end if end do ! Compute new value then step ahead in time y1 (:) = y0 (:) + matmul ( k (:, :), rkf4_coeff (:)) trem = trem - dt t = t + dt if ( trem <= 0._DP ) exit y0 (:) = y1 (:) end do return end function util_solve_rkf45 end submodule s_util_solve","tags":"","loc":"sourcefile/util_solve.f90.html"},{"title":"util_set.f90 – swiftest","text":"This file depends on sourcefile~~util_set.f90~~EfferentGraph sourcefile~util_set.f90 util_set.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_set.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_set Source Code util_set.f90 Source Code submodule ( swiftest_classes ) s_util_set !! author: David A. Minton !! This submodule contains a collection of setter method implementations use swiftest contains module subroutine util_set_beg_end_pl ( self , xbeg , xend , vbeg ) !! author: David A. Minton !! !! Sets one or more of the values of xbeg, xend, and vbeg implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object real ( DP ), dimension (:,:), intent ( in ), optional :: xbeg , xend , vbeg if ( present ( xbeg )) then if ( allocated ( self % xbeg )) deallocate ( self % xbeg ) allocate ( self % xbeg , source = xbeg ) end if if ( present ( xend )) then if ( allocated ( self % xend )) deallocate ( self % xend ) allocate ( self % xend , source = xend ) end if if ( present ( vbeg )) then if ( allocated ( self % vbeg )) deallocate ( self % vbeg ) allocate ( self % vbeg , source = vbeg ) end if return end subroutine util_set_beg_end_pl module subroutine util_set_ir3h ( self ) !! author: David A. Minton !! !! Sets the inverse heliocentric radius term (1/rh**3) for all bodies in a structure implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object ! Internals integer ( I4B ) :: i real ( DP ) :: r2 , irh if ( self % nbody > 0 ) then do i = 1 , self % nbody r2 = dot_product ( self % xh (:, i ), self % xh (:, i )) irh = 1.0_DP / sqrt ( r2 ) self % ir3h ( i ) = irh / r2 end do end if return end subroutine util_set_ir3h module subroutine util_set_msys ( self ) !! author: David A. Minton !! !! Sets the value of msys and the vector mass quantities based on the total mass of the system implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nobdy system object self % Gmtot = self % cb % Gmass + sum ( self % pl % Gmass ( 1 : self % pl % nbody ), self % pl % status ( 1 : self % pl % nbody ) /= INACTIVE ) return end subroutine util_set_msys module subroutine util_set_mu_pl ( self , cb ) !! author: David A. Minton !! !! Computes G * (M + m) for each massive body implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object if ( self % nbody > 0 ) self % mu ( 1 : self % nbody ) = cb % Gmass + self % Gmass ( 1 : self % nbody ) return end subroutine util_set_mu_pl module subroutine util_set_mu_tp ( self , cb ) !! author: David A. Minton !! !! Converts certain scalar values to arrays so that they can be used in elemental functions implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object if ( self % nbody == 0 ) return self % mu ( 1 : self % nbody ) = cb % Gmass return end subroutine util_set_mu_tp module subroutine util_set_particle_info ( self , name , particle_type , status , origin_type , origin_time , origin_xh , origin_vh , discard_time , discard_xh , discard_vh , discard_body_id ) !! author: David A. Minton !! !! Sets one or more values of the particle information metadata object implicit none ! Arguments class ( swiftest_particle_info ), intent ( inout ) :: self character ( len =* ), intent ( in ), optional :: name !! Non-unique name character ( len =* ), intent ( in ), optional :: particle_type !! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character ( len =* ), intent ( in ), optional :: status !! Particle status description: ACTIVE, MERGED, FRAGMENTED, etc. character ( len =* ), intent ( in ), optional :: origin_type !! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real ( DP ), intent ( in ), optional :: origin_time !! The time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_xh !! The heliocentric distance vector at the time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_vh !! The heliocentric velocity vector at the time of the particle's formation real ( DP ), intent ( in ), optional :: discard_time !! The time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_xh !! The heliocentric distance vector at the time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_vh !! The heliocentric velocity vector at the time of the particle's discard integer ( I4B ), intent ( in ), optional :: discard_body_id !! The id of the other body involved in the discard (0 if no other body involved) ! Internals character ( len = NAMELEN ) :: lenstr character ( len = :), allocatable :: fmtlabel write ( lenstr , * ) NAMELEN fmtlabel = \"(A\" // trim ( adjustl ( lenstr )) // \")\" if ( present ( name )) then write ( self % name , fmtlabel ) trim ( adjustl ( name )) end if if ( present ( particle_type )) then write ( self % particle_type , fmtlabel ) trim ( adjustl ( particle_type )) end if if ( present ( status )) then write ( self % status , fmtlabel ) trim ( adjustl ( status )) end if if ( present ( origin_type )) then write ( self % origin_type , fmtlabel ) trim ( adjustl ( origin_type )) end if if ( present ( origin_time )) then self % origin_time = origin_time end if if ( present ( origin_xh )) then self % origin_xh (:) = origin_xh (:) end if if ( present ( origin_vh )) then self % origin_vh (:) = origin_vh (:) end if if ( present ( discard_time )) then self % discard_time = discard_time end if if ( present ( discard_xh )) then self % discard_xh (:) = discard_xh (:) end if if ( present ( discard_vh )) then self % discard_vh (:) = discard_vh (:) end if if ( present ( discard_body_id )) then self % discard_body_id = discard_body_id end if return end subroutine util_set_particle_info module subroutine util_set_rhill ( self , cb ) !! author: David A. Minton !! !! Sets the value of the Hill's radius implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object if ( self % nbody == 0 ) return call self % xv2el ( cb ) self % rhill ( 1 : self % nbody ) = self % a ( 1 : self % nbody ) * ( self % Gmass ( 1 : self % nbody ) / cb % Gmass / 3 ) ** THIRD return end subroutine util_set_rhill module subroutine util_set_rhill_approximate ( self , cb ) !! author: David A. Minton !! !! Sets the approximate value of the Hill's radius using the heliocentric radius instead of computing the semimajor axis implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals real ( DP ), dimension (:), allocatable :: rh if ( self % nbody == 0 ) return rh ( 1 : self % nbody ) = . mag . self % xh (:, 1 : self % nbody ) self % rhill ( 1 : self % nbody ) = rh ( 1 : self % nbody ) * ( self % Gmass ( 1 : self % nbody ) / cb % Gmass / 3 ) ** THIRD return end subroutine util_set_rhill_approximate end submodule s_util_set","tags":"","loc":"sourcefile/util_set.f90.html"},{"title":"util_peri.f90 – swiftest","text":"This file depends on sourcefile~~util_peri.f90~~EfferentGraph sourcefile~util_peri.f90 util_peri.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_peri.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_peri Source Code util_peri.f90 Source Code submodule ( swiftest_classes ) s_util_peri use swiftest contains module subroutine util_peri_tp ( self , system , param ) !! author: David A. Minton !! !! Determine system pericenter passages for test particles !! Note:  If the coordinate system used is barycentric, then this routine assumes that the barycentric coordinates in the !!        test particle structures are up-to-date and are not recomputed !! !! Adapted from David E. Kaufmann's Swifter routine: util_peri.f90 !! Adapted from Hal Levison's Swift routine util_peri.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: e real ( DP ), dimension (:), allocatable :: vdotr associate ( tp => self , ntp => self % nbody ) allocate ( vdotr ( ntp )) if ( param % qmin_coord == \"HELIO\" ) then do i = 1 , ntp vdotr ( i ) = dot_product ( tp % xh (:, i ), tp % vh (:, i )) if ( tp % isperi ( i ) == - 1 ) then if ( vdotr ( i ) >= 0.0_DP ) then tp % isperi ( i ) = 0 call orbel_xv2aeq ( tp % mu ( i ), tp % xh (:, i ), tp % vh (:, i ), tp % atp ( i ), e , tp % peri ( i )) end if else if ( vdotr ( i ) > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end do else do i = 1 , ntp vdotr ( i ) = dot_product ( tp % xb (:, i ), tp % vb (:, i )) if ( tp % isperi ( i ) == - 1 ) then if ( vdotr ( i ) >= 0.0_DP ) then tp % isperi ( i ) = 0 call orbel_xv2aeq ( system % Gmtot , tp % xb (:, i ), tp % vb (:, i ), tp % atp ( i ), e , tp % peri ( i )) end if else if ( vdotr ( i ) > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end do end if end associate return end subroutine util_peri_tp end submodule s_util_peri","tags":"","loc":"sourcefile/util_peri.f90.html"},{"title":"util_coord.f90 – swiftest","text":"This file depends on sourcefile~~util_coord.f90~~EfferentGraph sourcefile~util_coord.f90 util_coord.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_coord.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_coord Source Code util_coord.f90 Source Code submodule ( swiftest_classes ) s_util_coord use swiftest contains module subroutine util_coord_h2b_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 !! Adapted from Hal Levison's Swift routine coord_h2b.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i real ( DP ) :: Gmtot real ( DP ), dimension ( NDIM ) :: xtmp , vtmp if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) Gmtot = cb % Gmass xtmp (:) = 0.0_DP vtmp (:) = 0.0_DP do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle Gmtot = Gmtot + pl % Gmass ( i ) xtmp (:) = xtmp (:) + pl % Gmass ( i ) * pl % xh (:, i ) vtmp (:) = vtmp (:) + pl % Gmass ( i ) * pl % vh (:, i ) end do cb % xb (:) = - xtmp (:) / Gmtot cb % vb (:) = - vtmp (:) / Gmtot do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle pl % xb (:, i ) = pl % xh (:, i ) + cb % xb (:) pl % vb (:, i ) = pl % vh (:, i ) + cb % vb (:) end do end associate return end subroutine util_coord_h2b_pl module subroutine util_coord_h2b_tp ( self , cb ) !! author: David A. Minton !! !! Convert test particles from heliocentric to barycentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 !! Adapted from Hal Levison's Swift routine coord_h2b_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % status ( i ) /= INACTIVE ) tp % xb (:, i ) = tp % xh (:, i ) + cb % xb (:) tp % vb (:, i ) = tp % vh (:, i ) + cb % vb (:) end do end associate return end subroutine util_coord_h2b_tp module subroutine util_coord_b2h_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_b2h.f90 !! Adapted from Hal Levison's Swift routine coord_b2h.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) do concurrent ( i = 1 : npl , pl % status ( i ) /= INACTIVE ) pl % xh (:, i ) = pl % xb (:, i ) - cb % xb (:) pl % vh (:, i ) = pl % vb (:, i ) - cb % vb (:) end do end associate return end subroutine util_coord_b2h_pl module subroutine util_coord_b2h_tp ( self , cb ) !! author: David A. Minton !! !! Convert test particles from barycentric to heliocentric coordinates (position and velocity) !! !! Adapted from David E. Kaufmann's Swifter routine coord_b2h_tp.f90 !! Adapted from Hal Levison's Swift routine coord_b2h_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % status ( i ) /= INACTIVE ) tp % xh (:, i ) = tp % xb (:, i ) - cb % xb (:) tp % vh (:, i ) = tp % vb (:, i ) - cb % vb (:) end do end associate return end subroutine util_coord_b2h_tp module subroutine util_coord_vb2vh_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from barycentric to heliocentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vb2vh.f90 !! Adapted from Hal Levison's Swift routine coord_vb2vh.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) do i = 1 , NDIM cb % vb ( i ) = - sum ( pl % Gmass ( 1 : npl ) * pl % vb ( i , 1 : npl )) / cb % Gmass pl % vh ( i , 1 : npl ) = pl % vb ( i , 1 : npl ) - cb % vb ( i ) end do end associate return end subroutine util_coord_vb2vh_pl module subroutine util_coord_vb2vh_tp ( self , vbcb ) !! author: David A. Minton !! !! Convert test particles from barycentric to heliocentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vb2vh_tp.f90 !! Adapted from Hal Levison's Swift routine coord_vb2h_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) where ( tp % lmask ( 1 : ntp )) tp % vh ( 1 , 1 : ntp ) = tp % vb ( 1 , 1 : ntp ) - vbcb ( 1 ) tp % vh ( 2 , 1 : ntp ) = tp % vb ( 2 , 1 : ntp ) - vbcb ( 2 ) tp % vh ( 3 , 1 : ntp ) = tp % vb ( 3 , 1 : ntp ) - vbcb ( 3 ) end where end associate return end subroutine util_coord_vb2vh_tp module subroutine util_coord_vh2vb_pl ( self , cb ) !! author: David A. Minton !! !! Convert massive bodies from heliocentric to barycentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vh2vb.f90 !! Adapted from Hal Levison's Swift routine coord_vh2b.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i real ( DP ) :: Gmtot if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) Gmtot = cb % Gmass + sum ( pl % Gmass ( 1 : npl )) do i = 1 , NDIM cb % vb ( i ) = - sum ( pl % Gmass ( 1 : npl ) * pl % vh ( i , 1 : npl )) / Gmtot pl % vb ( i , 1 : npl ) = pl % vh ( i , 1 : npl ) + cb % vb ( i ) end do end associate return end subroutine util_coord_vh2vb_pl module subroutine util_coord_vh2vb_tp ( self , vbcb ) !! author: David A. Minton !! !! Convert test particles from heliocentric to barycentric coordinates (velocity only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_vh2vb_tp.f90 !! Adapted from Hal Levison's Swift routine coord_vh2b_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) where ( tp % lmask ( 1 : ntp )) tp % vb ( 1 , 1 : ntp ) = tp % vh ( 1 , 1 : ntp ) + vbcb ( 1 ) tp % vb ( 2 , 1 : ntp ) = tp % vh ( 2 , 1 : ntp ) + vbcb ( 2 ) tp % vb ( 3 , 1 : ntp ) = tp % vh ( 3 , 1 : ntp ) + vbcb ( 3 ) end where end associate return end subroutine util_coord_vh2vb_tp module subroutine util_coord_xh2xb_pl ( self , cb ) !! author: David A. Minton !! !! Convert position vectors of massive bodies from heliocentric to barycentric coordinates (position only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 !! Adapted from Hal Levison's Swift routine coord_h2b.f implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i real ( DP ) :: Gmtot real ( DP ), dimension ( NDIM ) :: xtmp if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) Gmtot = cb % Gmass xtmp (:) = 0.0_DP do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle Gmtot = Gmtot + pl % Gmass ( i ) xtmp (:) = xtmp (:) + pl % Gmass ( i ) * pl % xh (:, i ) end do cb % xb (:) = - xtmp (:) / Gmtot do i = 1 , npl if ( pl % status ( i ) == INACTIVE ) cycle pl % xb (:, i ) = pl % xh (:, i ) + cb % xb (:) end do end associate return end subroutine util_coord_xh2xb_pl module subroutine util_coord_xh2xb_tp ( self , cb ) !! author: David A. Minton !! !! Convert test particles from heliocentric to barycentric coordinates (position only) !! !! Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 !! Adapted from Hal Levison's Swift routine coord_h2b_tp.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % status ( i ) /= INACTIVE ) tp % xb (:, i ) = tp % xh (:, i ) + cb % xb (:) end do end associate return end subroutine util_coord_xh2xb_tp end submodule s_util_coord","tags":"","loc":"sourcefile/util_coord.f90.html"},{"title":"util_index.f90 – swiftest","text":"This file depends on sourcefile~~util_index.f90~~EfferentGraph sourcefile~util_index.f90 util_index.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_index.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_index Source Code util_index.f90 Source Code submodule ( swiftest_classes ) s_util_index use swiftest contains module pure subroutine util_index_eucl_ij_to_k ( n , i , j , k ) !$omp declare simd(util_index_eucl_ij_to_k) !! author: Jacob R. Elliott and David A. Minton !! !! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions. !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments integer ( I4B ), intent ( in ) :: n !! Number of bodies integer ( I4B ), intent ( in ) :: i !! Index of the ith body integer ( I4B ), intent ( in ) :: j !! Index of the jth body integer ( I8B ), intent ( out ) :: k !! Index of the flattened matrix ! Internals integer ( I8B ) :: i8 , j8 , n8 i8 = int ( i , kind = I8B ) j8 = int ( j , kind = I8B ) n8 = int ( n , kind = I8B ) k = ( i8 - 1_I8B ) * n8 - i8 * ( i8 - 1_I8B ) / 2_I8B + ( j8 - i8 ) return end subroutine util_index_eucl_ij_to_k module pure subroutine util_index_eucl_k_to_ij ( n , k , i , j ) !! author: Jacob R. Elliott and David A. Minton !! !! Turns k index into i,j indices for use in the Euclidean distance matrix for pl-pl interactions. !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments integer ( I4B ), intent ( in ) :: n !! Number of bodies integer ( I8B ), intent ( in ) :: k !! Index of the flattened matrix integer ( I4B ), intent ( out ) :: i !! Index of the ith body integer ( I4B ), intent ( out ) :: j !! Index of the jth body ! Internals integer ( I8B ) :: kp , p , i8 , j8 , n8 n8 = int ( n , kind = I8B ) kp = n8 * ( n8 - 1_I8B ) / 2_I8B - k p = floor (( sqrt ( 1._DP + 8_I8B * kp ) - 1_I8B ) / 2_I8B ) i8 = n8 - 1_I8B - p j8 = k - ( n8 - 1_I8B ) * ( n8 - 2_I8B ) / 2_I8B + p * ( p + 1_I8B ) / 2_I8B + 1_I8B i = int ( i8 , kind = I4B ) j = int ( j8 , kind = I4B ) return end subroutine util_index_eucl_k_to_ij module subroutine util_index_eucl_plpl ( self , param ) !! author: Jacob R. Elliott and David A. Minton !! !! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions for a Swiftest massive body object !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j , npl integer ( I8B ) :: k npl = int ( self % nbody , kind = I8B ) associate ( nplpl => self % nplpl ) nplpl = ( npl * ( npl - 1 ) / 2 ) ! number of entries in a strict lower triangle, npl x npl if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) ! Reset the index array if it's been set previously allocate ( self % k_plpl ( 2 , nplpl )) do concurrent ( i = 1 : npl , j = 1 : npl , j > i ) call util_index_eucl_ij_to_k ( npl , i , j , k ) self % k_plpl ( 1 , k ) = i self % k_plpl ( 2 , k ) = j end do end associate return end subroutine util_index_eucl_plpl module subroutine util_index_eucl_pltp ( self , pl , param ) !! author: Jacob R. Elliott and David A. Minton !! !! Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I8B ) :: i , j , counter , npl , ntp ntp = int ( self % nbody , kind = I8B ) npl = int ( pl % nbody , kind = I8B ) associate ( npltp => self % npltp ) npltp = npl * ntp if ( allocated ( self % k_pltp )) deallocate ( self % k_pltp ) ! Reset the index array if it's been set previously allocate ( self % k_pltp ( 2 , npltp )) do i = 1_I8B , npl counter = ( i - 1_I8B ) * npl + 1_I8B do j = 1_I8B , ntp self % k_pltp ( 1 , counter ) = i self % k_pltp ( 2 , counter ) = j counter = counter + 1_I8B end do end do end associate return end subroutine util_index_eucl_pltp end submodule s_util_index","tags":"","loc":"sourcefile/util_index.f90.html"},{"title":"util_rescale.f90 – swiftest","text":"This file depends on sourcefile~~util_rescale.f90~~EfferentGraph sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_rescale.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_rescale Source Code util_rescale.f90 Source Code submodule ( swiftest_classes ) s_util_rescale use swiftest contains module subroutine util_rescale_system ( self , param , mscale , dscale , tscale ) !! author: David A. Minton !! !! Rescales an nbody system to a new set of units. Inputs are the multipliers on the mass (mscale), distance (dscale), and time units (tscale). !! Rescales all united quantities in the system, as well as the mass conversion factors, gravitational constant, and Einstein's constant in the parameter object. implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters. Returns with new values of the scale vactors and GU real ( DP ), intent ( in ) :: mscale , dscale , tscale !! Scale factors for mass, distance, and time units, respectively. ! Internals real ( DP ) :: vscale param % MU2KG = param % MU2KG * mscale param % DU2M = param % DU2M * dscale param % TU2S = param % TU2S * tscale ! Calculate the G for the system units param % GU = GC / ( param % DU2M ** 3 / ( param % MU2KG * param % TU2S ** 2 )) if ( param % lgr ) then ! Calculate the inverse speed of light in the system units param % inv_c2 = einsteinC * param % TU2S / param % DU2M param % inv_c2 = ( param % inv_c2 ) ** ( - 2 ) end if vscale = dscale / tscale associate ( cb => self % cb , pl => self % pl , npl => self % pl % nbody , tp => self % tp , ntp => self % tp % nbody ) cb % mass = cb % mass / mscale cb % Gmass = param % GU * cb % mass cb % radius = cb % radius / dscale cb % xb (:) = cb % xb (:) / dscale cb % vb (:) = cb % vb (:) / vscale cb % rot (:) = cb % rot (:) * tscale pl % mass ( 1 : npl ) = pl % mass ( 1 : npl ) / mscale pl % Gmass ( 1 : npl ) = param % GU * pl % mass ( 1 : npl ) pl % radius ( 1 : npl ) = pl % radius ( 1 : npl ) / dscale pl % xh (:, 1 : npl ) = pl % xh (:, 1 : npl ) / dscale pl % vh (:, 1 : npl ) = pl % vh (:, 1 : npl ) / vscale pl % xb (:, 1 : npl ) = pl % xb (:, 1 : npl ) / dscale pl % vb (:, 1 : npl ) = pl % vb (:, 1 : npl ) / vscale pl % rot (:, 1 : npl ) = pl % rot (:, 1 : npl ) * tscale end associate return end subroutine util_rescale_system end submodule s_util_rescale","tags":"","loc":"sourcefile/util_rescale.f90.html"},{"title":"util_version.f90 – swiftest","text":"This file depends on sourcefile~~util_version.f90~~EfferentGraph sourcefile~util_version.f90 util_version.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_version.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_version Source Code util_version.f90 Source Code submodule ( swiftest_classes ) s_util_version use swiftest contains module subroutine util_version () !! author: David A. Minton !! !! Print program version information to terminale !! !! Adapted from David E. Kaufmann's Swifter routine: util_version.f90 implicit none write ( * , 200 ) VERSION_NUMBER 200 format ( / , \"************* Swiftest: Version \" , f3 . 1 , \" *************\" , // , & \"Based off of Swifter:\" , // , & \"Authors:\" , // , & \"    The Purdue University Swiftest Development team \" , / , & \"    Lead by David A. Minton \" , / , & \"    Single loop blocking by Jacob R. Elliott\" , / , & \"    Fragmentation by Carlisle A. Wishard and\" , // , & \"    Jennifer L. L. Poutplin                 \" , // , & \"Please address comments and questions to:\" , // , & \"    David A. Minton\" , / , & \"    Department Earth, Atmospheric, & Planetary Sciences \" , / , & \"    Purdue University\" , / , & \"    550 Stadium Mall Drive\" , / , & \"    West Lafayette, Indiana 47907\" , / , & \"    765-250-8034 \" , / , & \"    daminton@purdue.edu\" , / , & \"Special thanks to Hal Levison and Martin Duncan for the original\" , / ,& \"SWIFTER and SWIFT codes that made this possible.\" , // , & \"************************************************\" , / ) 100 FORMAT ( / , \"************* SWIFTER: Version \" , F3 . 1 , \" *************\" , // , & \"Authors:\" , // , & \"    Martin Duncan: Queen's University\" , / , & \"    Hal Levison  : Southwest Research Institute\" , // , & \"Please address comments and questions to:\" , // , & \"    Hal Levison or David Kaufmann\" , / , & \"    Department of Space Studies\" , / , & \"    Southwest Research Institute\" , / , & \"    1050 Walnut Street, Suite 400\" , / , & \"    Boulder, Colorado  80302\" , / , & \"    303-546-0290 (HFL), 720-240-0119 (DEK)\" , / , & \"    303-546-9687 (fax)\" , / , & \"    hal@gort.boulder.swri.edu (HFL)\" , / , & \"    kaufmann@boulder.swri.edu (DEK)\" , // , & \"************************************************\" , / ) return end subroutine util_version end submodule s_util_version","tags":"","loc":"sourcefile/util_version.f90.html"},{"title":"util_sort.f90 – swiftest","text":"This file depends on sourcefile~~util_sort.f90~~EfferentGraph sourcefile~util_sort.f90 util_sort.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_sort.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_sort Source Code util_sort.f90 Source Code submodule ( swiftest_classes ) s_util_sort use swiftest contains module subroutine util_sort_body ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a Swiftest body structure in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( body => self , n => self % nbody ) allocate ( ind ( n )) select case ( sortby ) case ( \"id\" ) call util_sort ( direction * body % id ( 1 : n ), ind ( 1 : n )) case ( \"status\" ) call util_sort ( direction * body % status ( 1 : n ), ind ( 1 : n )) case ( \"ir3h\" ) call util_sort ( direction * body % ir3h ( 1 : n ), ind ( 1 : n )) case ( \"a\" ) call util_sort ( direction * body % a ( 1 : n ), ind ( 1 : n )) case ( \"e\" ) call util_sort ( direction * body % e ( 1 : n ), ind ( 1 : n )) case ( \"inc\" ) call util_sort ( direction * body % inc ( 1 : n ), ind ( 1 : n )) case ( \"capom\" ) call util_sort ( direction * body % capom ( 1 : n ), ind ( 1 : n )) case ( \"mu\" ) call util_sort ( direction * body % mu ( 1 : n ), ind ( 1 : n )) case ( \"lfirst\" , \"nbody\" , \"ldiscard\" , \"xh\" , \"vh\" , \"xb\" , \"vb\" , \"ah\" , \"aobl\" , \"atide\" , \"agr\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not found!' return end select call body % rearrange ( ind ) end associate return end subroutine util_sort_body module subroutine util_sort_dp ( arr ) !! author: David A. Minton !! !! Sort input double precision array in place into ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments real ( DP ), dimension (:), intent ( inout ) :: arr ! Internals real ( DP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) do i = 2 , n tmp = arr ( i ) do j = i - 1 , 1 , - 1 if ( arr ( j ) <= tmp ) exit arr ( j + 1 ) = arr ( j ) end do arr ( j + 1 ) = tmp end do return end subroutine util_sort_dp module subroutine util_sort_index_dp ( arr , ind ) !! author: David A. Minton !! !! Sort input double precision array by index in ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind ! Internals real ( DP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) ind = [( i , i = 1 , n )] do i = 2 , n tmp = arr ( ind ( i )) do j = i - 1 , 1 , - 1 if ( arr ( ind ( j )) <= tmp ) exit ind ( j + 1 ) = ind ( j ) end do ind ( j + 1 ) = i end do return end subroutine util_sort_index_dp module subroutine util_sort_i4b ( arr ) !! author: David A. Minton !! !! Sort input integer array in place into ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments integer ( I4B ), dimension (:), intent ( inout ) :: arr ! Internals integer ( I4B ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) do i = 2 , n tmp = arr ( i ) do j = i - 1 , 1 , - 1 if ( arr ( j ) <= tmp ) exit arr ( j + 1 ) = arr ( j ) end do arr ( j + 1 ) = tmp end do return end subroutine util_sort_i4b module subroutine util_sort_index_i4b ( arr , ind ) !! author: David A. Minton !! !! Sort input integer array by index in ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments integer ( I4B ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind ! Internals integer ( I4B ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) ind = [( i , i = 1 , n )] do i = 2 , n tmp = arr ( ind ( i )) do j = i - 1 , 1 , - 1 if ( arr ( ind ( j )) <= tmp ) exit ind ( j + 1 ) = ind ( j ) end do ind ( j + 1 ) = i end do return end subroutine util_sort_index_i4b module subroutine util_sort_sp ( arr ) !! author: David A. Minton !! !! Sort input single precision array in place into ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) ! implicit none ! Arguments real ( SP ), dimension (:), intent ( inout ) :: arr ! Internals real ( SP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) do i = 2 , n tmp = arr ( i ) do j = i - 1 , 1 , - 1 if ( arr ( j ) <= tmp ) exit arr ( j + 1 ) = arr ( j ) end do arr ( j + 1 ) = tmp end do return end subroutine util_sort_sp module subroutine util_sort_index_sp ( arr , ind ) !! author: David A. Minton !! !! Sort input single precision array by index in ascending numerical order using insertion sort. !! This algorithm works well for partially sorted arrays (which is usually the case here) !! implicit none ! Arguments real ( SP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind ! Internals real ( SP ) :: tmp integer ( I4B ) :: n , i , j n = size ( arr ) ind = [( i , i = 1 , n )] do i = 2 , n tmp = arr ( ind ( i )) do j = i - 1 , 1 , - 1 if ( arr ( ind ( j )) <= tmp ) exit ind ( j + 1 ) = ind ( j ) end do ind ( j + 1 ) = i end do return end subroutine util_sort_index_sp module subroutine util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a Swiftest massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"Gmass\" , \"mass\" ) call util_sort ( direction * pl % Gmass ( 1 : npl ), ind ( 1 : npl )) case ( \"rhill\" ) call util_sort ( direction * pl % rhill ( 1 : npl ), ind ( 1 : npl )) case ( \"radius\" ) call util_sort ( direction * pl % radius ( 1 : npl ), ind ( 1 : npl )) case ( \"density\" ) call util_sort ( direction * pl % density ( 1 : npl ), ind ( 1 : npl )) case ( \"k2\" ) call util_sort ( direction * pl % k2 ( 1 : npl ), ind ( 1 : npl )) case ( \"Q\" ) call util_sort ( direction * pl % Q ( 1 : npl ), ind ( 1 : npl )) case ( \"tlag\" ) call util_sort ( direction * pl % tlag ( 1 : npl ), ind ( 1 : npl )) case ( \"xbeg\" , \"xend\" , \"vbeg\" , \"Ip\" , \"rot\" , \"k_plpl\" , \"nplpl\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call util_sort_body ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine util_sort_pl module subroutine util_sort_tp ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a Swiftest test particle object  in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( tp => self , ntp => self % nbody ) allocate ( ind ( ntp )) select case ( sortby ) case ( \"peri\" ) call util_sort ( direction * tp % peri ( 1 : ntp ), ind ( 1 : ntp )) case ( \"atp\" ) call util_sort ( direction * tp % atp ( 1 : ntp ), ind ( 1 : ntp )) case ( \"isperi\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call util_sort_body ( tp , sortby , ascending ) return end select call tp % rearrange ( ind ) end associate return end subroutine util_sort_tp module subroutine util_sort_rearrange_body ( self , ind ) !! author: David A. Minton !! !! Rearrange Swiftest body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( n => self % nbody ) call util_sort_rearrange ( self % id , ind , n ) call util_sort_rearrange ( self % info , ind , n ) call util_sort_rearrange ( self % status , ind , n ) call util_sort_rearrange ( self % ldiscard , ind , n ) call util_sort_rearrange ( self % xh , ind , n ) call util_sort_rearrange ( self % vh , ind , n ) call util_sort_rearrange ( self % xb , ind , n ) call util_sort_rearrange ( self % vb , ind , n ) call util_sort_rearrange ( self % ah , ind , n ) call util_sort_rearrange ( self % ir3h , ind , n ) call util_sort_rearrange ( self % mu , ind , n ) call util_sort_rearrange ( self % lmask , ind , n ) call util_sort_rearrange ( self % a , ind , n ) call util_sort_rearrange ( self % e , ind , n ) call util_sort_rearrange ( self % inc , ind , n ) call util_sort_rearrange ( self % capom , ind , n ) call util_sort_rearrange ( self % omega , ind , n ) call util_sort_rearrange ( self % capm , ind , n ) call util_sort_rearrange ( self % aobl , ind , n ) call util_sort_rearrange ( self % atide , ind , n ) call util_sort_rearrange ( self % agr , ind , n ) end associate return end subroutine util_sort_rearrange_body module subroutine util_sort_rearrange_arr_char_string ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of character string in-place from an index list. implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals character ( len = STRMAX ), dimension (:), allocatable :: tmp !! Temporary copy of arry used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_char_string module subroutine util_sort_rearrange_arr_DP ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of DP type in-place from an index list. implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals real ( DP ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_DP module subroutine util_sort_rearrange_arr_DPvec ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of (NDIM,n) DP-type vectors in-place from an index list. implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals real ( DP ), dimension (:,:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp (:, 1 : n ) = arr (:, ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_DPvec module subroutine util_sort_rearrange_arr_I4B ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of integers in-place from an index list. implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals integer ( I4B ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_I4B module subroutine util_sort_rearrange_arr_logical ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of logicals in-place from an index list. implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals logical , dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_logical module subroutine util_sort_rearrange_arr_info ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of particle information type in-place from an index list. implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals type ( swiftest_particle_info ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation integer ( I4B ) :: i if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , mold = arr ) call util_copy_particle_info_arr ( arr , tmp , ind ) call move_alloc ( tmp , arr ) return end subroutine util_sort_rearrange_arr_info module subroutine util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange Swiftest massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % mass , ind , npl ) call util_sort_rearrange ( pl % Gmass , ind , npl ) call util_sort_rearrange ( pl % rhill , ind , npl ) call util_sort_rearrange ( pl % xbeg , ind , npl ) call util_sort_rearrange ( pl % vbeg , ind , npl ) call util_sort_rearrange ( pl % radius , ind , npl ) call util_sort_rearrange ( pl % density , ind , npl ) call util_sort_rearrange ( pl % Ip , ind , npl ) call util_sort_rearrange ( pl % rot , ind , npl ) call util_sort_rearrange ( pl % k2 , ind , npl ) call util_sort_rearrange ( pl % Q , ind , npl ) call util_sort_rearrange ( pl % tlag , ind , npl ) if ( allocated ( pl % k_plpl )) deallocate ( pl % k_plpl ) call util_sort_rearrange_body ( pl , ind ) end associate return end subroutine util_sort_rearrange_pl module subroutine util_sort_rearrange_tp ( self , ind ) !! author: David A. Minton !! !! Rearrange Swiftest massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( tp => self , ntp => self % nbody ) call util_sort_rearrange ( tp % isperi , ind , ntp ) call util_sort_rearrange ( tp % peri , ind , ntp ) call util_sort_rearrange ( tp % atp , ind , ntp ) call util_sort_rearrange_body ( tp , ind ) end associate return end subroutine util_sort_rearrange_tp end submodule s_util_sort","tags":"","loc":"sourcefile/util_sort.f90.html"},{"title":"util_spill.f90 – swiftest","text":"This file depends on sourcefile~~util_spill.f90~~EfferentGraph sourcefile~util_spill.f90 util_spill.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_spill.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_spill Source Code util_spill.f90 Source Code submodule ( swiftest_classes ) s_util_spill use swiftest contains module subroutine util_spill_arr_char_string ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type character strings !! This is the inverse of a spill operation implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist character ( len = STRMAX ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_char_string module subroutine util_spill_arr_DP ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type DP !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist real ( DP ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_DP module subroutine util_spill_arr_DPvec ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of DP vectors with shape (NDIM, n) !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: discards !! Array discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i , nspill , nkeep , nlist real ( DP ), dimension (:,:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( NDIM , nspill )) else if ( size ( discards , dim = 2 ) /= nspill ) then deallocate ( discards ) allocate ( discards ( NDIM , nspill )) end if do i = 1 , NDIM discards ( i ,:) = pack ( keeps ( i , 1 : nlist ), lspill_list ( 1 : nlist )) end do if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( NDIM , nkeep )) do i = 1 , NDIM tmp ( i , :) = pack ( keeps ( i , 1 : nlist ), . not . lspill_list ( 1 : nlist )) end do call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_DPvec module subroutine util_spill_arr_I4B ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type I4B !! This is the inverse of a spill operation implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist integer ( I4B ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_I4B module subroutine util_spill_arr_I8B ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of type I4B !! This is the inverse of a spill operation implicit none ! Arguments integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist integer ( I8B ), dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_I8B module subroutine util_spill_arr_info ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of particle origin information types !! This is the inverse of a spill operation implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i , nspill , nkeep , nlist integer ( I4B ), dimension (:), allocatable :: idx type ( swiftest_particle_info ), dimension (:), allocatable :: tmp nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if allocate ( idx ( nspill )) idx (:) = pack ([( i , i = 1 , nlist )], lspill_list ) call util_copy_particle_info_arr ( keeps , discards , idx ) if ( ldestructive ) then if ( nkeep > 0 ) then deallocate ( idx ) allocate ( idx ( nkeep )) allocate ( tmp ( nkeep )) idx (:) = pack ([( i , i = 1 , nlist )], . not . lspill_list ) call util_copy_particle_info_arr ( keeps , tmp , idx ) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_info module subroutine util_spill_arr_logical ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of logicals !! This is the inverse of a spill operation implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or no ! Internals integer ( I4B ) :: nspill , nkeep , nlist logical , dimension (:), allocatable :: tmp !! Array of values to keep nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then allocate ( tmp ( nkeep )) tmp (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) call move_alloc ( tmp , keeps ) else deallocate ( keeps ) end if end if return end subroutine util_spill_arr_logical module subroutine util_spill_body ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest generic particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! Internals integer ( I4B ) :: nbody_old ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Spill all the common components associate ( keeps => self ) call util_spill ( keeps % id , discards % id , lspill_list , ldestructive ) call util_spill ( keeps % info , discards % info , lspill_list , ldestructive ) call util_spill ( keeps % status , discards % status , lspill_list , ldestructive ) call util_spill ( keeps % lmask , discards % lmask , lspill_list , ldestructive ) call util_spill ( keeps % ldiscard , discards % ldiscard , lspill_list , ldestructive ) call util_spill ( keeps % mu , discards % mu , lspill_list , ldestructive ) call util_spill ( keeps % xh , discards % xh , lspill_list , ldestructive ) call util_spill ( keeps % vh , discards % vh , lspill_list , ldestructive ) call util_spill ( keeps % xb , discards % xb , lspill_list , ldestructive ) call util_spill ( keeps % vb , discards % vb , lspill_list , ldestructive ) call util_spill ( keeps % ah , discards % ah , lspill_list , ldestructive ) call util_spill ( keeps % aobl , discards % aobl , lspill_list , ldestructive ) call util_spill ( keeps % agr , discards % agr , lspill_list , ldestructive ) call util_spill ( keeps % atide , discards % atide , lspill_list , ldestructive ) call util_spill ( keeps % a , discards % a , lspill_list , ldestructive ) call util_spill ( keeps % e , discards % e , lspill_list , ldestructive ) call util_spill ( keeps % inc , discards % inc , lspill_list , ldestructive ) call util_spill ( keeps % capom , discards % capom , lspill_list , ldestructive ) call util_spill ( keeps % omega , discards % omega , lspill_list , ldestructive ) call util_spill ( keeps % capm , discards % capm , lspill_list , ldestructive ) nbody_old = keeps % nbody ! This is the base class, so will be the last to be called in the cascade. ! Therefore we need to set the nbody values for both the keeps and discareds discards % nbody = count ( lspill_list ( 1 : nbody_old )) if ( ldestructive ) keeps % nbody = nbody_old - discards % nbody end associate return end subroutine util_spill_body module subroutine util_spill_encounter ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest encounter structure from active list to discard list implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! Internals integer ( I4B ) :: nenc_old associate ( keeps => self ) call util_spill ( keeps % lvdotr , discards % lvdotr , lspill_list , ldestructive ) call util_spill ( keeps % status , discards % status , lspill_list , ldestructive ) call util_spill ( keeps % kidx , discards % kidx , lspill_list , ldestructive ) call util_spill ( keeps % index1 , discards % index1 , lspill_list , ldestructive ) call util_spill ( keeps % index2 , discards % index2 , lspill_list , ldestructive ) call util_spill ( keeps % id1 , discards % id1 , lspill_list , ldestructive ) call util_spill ( keeps % id2 , discards % id2 , lspill_list , ldestructive ) call util_spill ( keeps % x1 , discards % x1 , lspill_list , ldestructive ) call util_spill ( keeps % x2 , discards % x2 , lspill_list , ldestructive ) call util_spill ( keeps % v1 , discards % v1 , lspill_list , ldestructive ) call util_spill ( keeps % v2 , discards % v2 , lspill_list , ldestructive ) call util_spill ( keeps % t , discards % t , lspill_list , ldestructive ) nenc_old = keeps % nenc ! This is the base class, so will be the last to be called in the cascade. ! Therefore we need to set the nenc values for both the keeps and discareds discards % nenc = count ( lspill_list ( 1 : nenc_old )) if ( ldestructive ) keeps % nenc = nenc_old - discards % nenc end associate return end subroutine util_spill_encounter module subroutine util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest massive body structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list associate ( keeps => self ) select type ( discards ) ! The standard requires us to select the type of both arguments in order to access all the components class is ( swiftest_pl ) !> Spill components specific to the massive body class call util_spill ( keeps % mass , discards % mass , lspill_list , ldestructive ) call util_spill ( keeps % Gmass , discards % Gmass , lspill_list , ldestructive ) call util_spill ( keeps % rhill , discards % rhill , lspill_list , ldestructive ) call util_spill ( keeps % radius , discards % radius , lspill_list , ldestructive ) call util_spill ( keeps % density , discards % density , lspill_list , ldestructive ) call util_spill ( keeps % k2 , discards % k2 , lspill_list , ldestructive ) call util_spill ( keeps % Q , discards % Q , lspill_list , ldestructive ) call util_spill ( keeps % tlag , discards % tlag , lspill_list , ldestructive ) call util_spill ( keeps % xbeg , discards % xbeg , lspill_list , ldestructive ) call util_spill ( keeps % vbeg , discards % vbeg , lspill_list , ldestructive ) call util_spill ( keeps % Ip , discards % Ip , lspill_list , ldestructive ) call util_spill ( keeps % rot , discards % rot , lspill_list , ldestructive ) if ( ldestructive . and . allocated ( keeps % k_plpl )) deallocate ( keeps % k_plpl ) call util_spill_body ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) 'Error! spill method called for incompatible return type on swiftest_pl' end select end associate return end subroutine util_spill_pl module subroutine util_spill_tp ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) Swiftest test particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardse logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list associate ( keeps => self , ntp => self % nbody ) select type ( discards ) class is ( swiftest_tp ) !> Spill components specific to the test particle class call util_spill ( keeps % isperi , discards % isperi , lspill_list , ldestructive ) call util_spill ( keeps % peri , discards % peri , lspill_list , ldestructive ) call util_spill ( keeps % atp , discards % atp , lspill_list , ldestructive ) call util_spill_body ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) 'Error! spill method called for incompatible return type on swiftest_tp' end select end associate return end subroutine util_spill_tp end submodule s_util_spill","tags":"","loc":"sourcefile/util_spill.f90.html"},{"title":"util_valid.f90 – swiftest","text":"This file depends on sourcefile~~util_valid.f90~~EfferentGraph sourcefile~util_valid.f90 util_valid.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_valid.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_valid Source Code util_valid.f90 Source Code submodule ( swiftest_classes ) s_util_valid use swiftest contains module subroutine util_valid_id_system ( self , param ) !! author: David A. Minton !! !! Validate massive body and test particle ids !! Subroutine causes program to exit with error if any ids are not unique !! !! Adapted from David E. Kaufmann's Swifter routine: util_valid.f90 implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i integer ( I4B ), dimension (:), allocatable :: idarr associate ( cb => self % cb , pl => self % pl , npl => self % pl % nbody , tp => self % tp , ntp => self % tp % nbody ) allocate ( idarr ( 1 + npl + ntp )) idarr ( 1 ) = cb % id do i = 1 , npl idarr ( 1 + i ) = pl % id ( i ) end do do i = 1 , ntp idarr ( 1 + npl + i ) = tp % id ( i ) end do call util_sort ( idarr ) do i = 1 , npl + ntp if ( idarr ( i ) == idarr ( i + 1 )) then write ( * , * ) \"Swiftest error:\" write ( * , * ) \"   more than one body/particle has id = \" , idarr ( i ) call util_exit ( FAILURE ) end if end do param % maxid = max ( param % maxid , maxval ( idarr )) end associate return end subroutine util_valid_id_system end submodule s_util_valid","tags":"","loc":"sourcefile/util_valid.f90.html"},{"title":"util_exit.f90 – swiftest","text":"This file depends on sourcefile~~util_exit.f90~~EfferentGraph sourcefile~util_exit.f90 util_exit.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_exit.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_exit Source Code util_exit.f90 Source Code submodule ( swiftest_classes ) s_util_exit use swiftest contains module subroutine util_exit ( code ) !! author: David A. Minton !! !! Print termination message and exit program !! !! Adapted from David E. Kaufmann's Swifter routine: util_exit.f90 !! Adapted from Hal Levison's Swift routine util_exit.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: code ! Internals character ( * ), parameter :: BAR = '(\"------------------------------------------------\")' select case ( code ) case ( SUCCESS ) write ( * , SUCCESS_MSG ) VERSION_NUMBER write ( * , BAR ) case ( USAGE ) write ( * , USAGE_MSG ) case ( HELP ) write ( * , HELP_MSG ) case default write ( * , FAIL_MSG ) VERSION_NUMBER write ( * , BAR ) error stop end select stop end subroutine util_exit end submodule s_util_exit","tags":"","loc":"sourcefile/util_exit.f90.html"},{"title":"util_fill.f90 – swiftest","text":"This file depends on sourcefile~~util_fill.f90~~EfferentGraph sourcefile~util_fill.f90 util_fill.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_fill.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_fill Source Code util_fill.f90 Source Code submodule ( swiftest_classes ) s_util_fill use swiftest contains module subroutine util_fill_arr_char_string ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of type character strings !! This is the inverse of a spill operation implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_char_string module subroutine util_fill_arr_DP ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of type DP !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_DP module subroutine util_fill_arr_DPvec ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of DP vectors with shape (NDIM, n) !! This is the inverse of a spill operation implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return do i = 1 , NDIM keeps ( i ,:) = unpack ( keeps ( i ,:), . not . lfill_list (:), keeps ( i ,:)) keeps ( i ,:) = unpack ( inserts ( i ,:), lfill_list (:), keeps ( i ,:)) end do return end subroutine util_fill_arr_DPvec module subroutine util_fill_arr_I4B ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of type I4B !! This is the inverse of a spill operation implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_I4B module subroutine util_fill_arr_info ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of particle origin information types !! This is the inverse of a spill operation implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ), dimension (:), allocatable :: insert_idx integer ( I4B ) :: i , nkeep , ninsert if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return nkeep = size ( keeps ) ninsert = count ( lfill_list ) allocate ( insert_idx ( ninsert )) insert_idx (:) = pack ([( i , i = 1 , nkeep )], lfill_list ) call util_copy_particle_info_arr ( inserts , keeps , insert_idx ) return end subroutine util_fill_arr_info module subroutine util_fill_arr_logical ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of logicals !! This is the inverse of a spill operation implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine util_fill_arr_logical module subroutine util_fill_body ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new Swiftest generic particle structure into an old one. !! This is the inverse of a spill operation. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! internals integer ( I4B ) :: i ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Fill all the common components associate ( keeps => self ) call util_fill ( keeps % id , inserts % id , lfill_list ) call util_fill ( keeps % info , inserts % info , lfill_list ) call util_fill ( keeps % status , inserts % status , lfill_list ) call util_fill ( keeps % ldiscard , inserts % ldiscard , lfill_list ) call util_fill ( keeps % lmask , inserts % lmask , lfill_list ) call util_fill ( keeps % mu , inserts % mu , lfill_list ) call util_fill ( keeps % xh , inserts % xh , lfill_list ) call util_fill ( keeps % vh , inserts % vh , lfill_list ) call util_fill ( keeps % xb , inserts % xb , lfill_list ) call util_fill ( keeps % vb , inserts % vb , lfill_list ) call util_fill ( keeps % ah , inserts % ah , lfill_list ) call util_fill ( keeps % aobl , inserts % aobl , lfill_list ) call util_fill ( keeps % agr , inserts % agr , lfill_list ) call util_fill ( keeps % atide , inserts % atide , lfill_list ) call util_fill ( keeps % a , inserts % a , lfill_list ) call util_fill ( keeps % e , inserts % e , lfill_list ) call util_fill ( keeps % inc , inserts % inc , lfill_list ) call util_fill ( keeps % capom , inserts % capom , lfill_list ) call util_fill ( keeps % omega , inserts % omega , lfill_list ) call util_fill ( keeps % capm , inserts % capm , lfill_list ) ! This is the base class, so will be the last to be called in the cascade. keeps % nbody = size ( keeps % id (:)) end associate return end subroutine util_fill_body module subroutine util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new Swiftest massive body structure into an old one. !! This is the inverse of a spill operation. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( inserts ) ! The standard requires us to select the type of both arguments in order to access all the components class is ( swiftest_pl ) !> Fill components specific to the massive body class call util_fill ( keeps % mass , inserts % mass , lfill_list ) call util_fill ( keeps % Gmass , inserts % Gmass , lfill_list ) call util_fill ( keeps % rhill , inserts % rhill , lfill_list ) call util_fill ( keeps % radius , inserts % radius , lfill_list ) call util_fill ( keeps % density , inserts % density , lfill_list ) call util_fill ( keeps % k2 , inserts % k2 , lfill_list ) call util_fill ( keeps % Q , inserts % Q , lfill_list ) call util_fill ( keeps % tlag , inserts % tlag , lfill_list ) call util_fill ( keeps % xbeg , inserts % xbeg , lfill_list ) call util_fill ( keeps % vbeg , inserts % vbeg , lfill_list ) call util_fill ( keeps % Ip , inserts % Ip , lfill_list ) call util_fill ( keeps % rot , inserts % rot , lfill_list ) if ( allocated ( keeps % k_plpl )) deallocate ( keeps % k_plpl ) call util_fill_body ( keeps , inserts , lfill_list ) class default write ( * , * ) 'Error! fill method called for incompatible return type on swiftest_pl' end select end associate return end subroutine util_fill_pl module subroutine util_fill_tp ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new Swiftest test particle structure into an old one. !! This is the inverse of a fill operation. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( swiftest_tp ) !> Spill components specific to the test particle class call util_fill ( keeps % isperi , inserts % isperi , lfill_list ) call util_fill ( keeps % peri , inserts % peri , lfill_list ) call util_fill ( keeps % atp , inserts % atp , lfill_list ) call util_fill_body ( keeps , inserts , lfill_list ) class default write ( * , * ) 'Error! fill method called for incompatible return type on swiftest_tp' end select end associate return end subroutine util_fill_tp end submodule s_util_fill","tags":"","loc":"sourcefile/util_fill.f90.html"},{"title":"util_resize.f90 – swiftest","text":"This file depends on sourcefile~~util_resize.f90~~EfferentGraph sourcefile~util_resize.f90 util_resize.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_resize.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_resize Source Code util_resize.f90 Source Code submodule ( swiftest_classes ) s_util_resize use swiftest contains module subroutine util_resize_arr_char_string ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of type character string. nnew = 0 will deallocate. implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals character ( len = STRMAX ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = \"\" else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = \"\" end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_char_string module subroutine util_resize_arr_DP ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of double precision type. Passing nnew = 0 will deallocate. implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals real ( DP ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size real ( DP ), parameter :: init_val = 0.0_DP if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = init_val else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = init_val end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_DP module subroutine util_resize_arr_DPvec ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of double precision vectors of size (NDIM, n). Passing nnew = 0 will deallocate. implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals real ( DP ), dimension (:,:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size real ( DP ), dimension ( NDIM ), parameter :: init_val = 0.0_DP integer ( I4B ) :: i if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr , dim = 2 ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( NDIM , nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp (:, 1 : nold ) = arr (:, 1 : nold ) do i = nold + 1 , nnew tmp (:, i ) = init_val (:) end do else tmp (:, 1 : nnew ) = arr (:, 1 : nnew ) end if else do i = 1 , nnew tmp (:, i ) = init_val (:) end do end if call move_alloc ( tmp , arr ) return return end subroutine util_resize_arr_DPvec module subroutine util_resize_arr_I4B ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of integer type. Passing nnew = 0 will deallocate. implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals integer ( I4B ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size integer ( I4B ), parameter :: init_val = - 1 if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = init_val else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = init_val end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_I4B module subroutine util_resize_arr_info ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals type ( swiftest_particle_info ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nnew > nold ) then call util_copy_particle_info_arr ( arr ( 1 : nold ), tmp ( 1 : nold )) else call util_copy_particle_info_arr ( arr ( 1 : nnew ), tmp ( 1 : nnew )) end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_info module subroutine util_resize_arr_logical ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of logical type. Passing nnew = 0 will deallocate. implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals logical , dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size logical , parameter :: init_val = . false . if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if if ( nnew == nold ) return allocate ( tmp ( nnew )) if ( nold > 0 ) then if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) tmp ( nold + 1 : nnew ) = init_val else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if else tmp ( 1 : nnew ) = init_val end if call move_alloc ( tmp , arr ) return end subroutine util_resize_arr_logical module subroutine util_resize_body ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % info , nnew ) call util_resize ( self % id , nnew ) call util_resize ( self % status , nnew ) call util_resize ( self % ldiscard , nnew ) call util_resize ( self % lmask , nnew ) call util_resize ( self % mu , nnew ) call util_resize ( self % xh , nnew ) call util_resize ( self % vh , nnew ) call util_resize ( self % xb , nnew ) call util_resize ( self % vb , nnew ) call util_resize ( self % ah , nnew ) call util_resize ( self % aobl , nnew ) call util_resize ( self % atide , nnew ) call util_resize ( self % agr , nnew ) call util_resize ( self % ir3h , nnew ) call util_resize ( self % a , nnew ) call util_resize ( self % e , nnew ) call util_resize ( self % inc , nnew ) call util_resize ( self % capom , nnew ) call util_resize ( self % omega , nnew ) call util_resize ( self % capm , nnew ) self % nbody = count ( self % status ( 1 : nnew ) /= INACTIVE ) return end subroutine util_resize_body module subroutine util_resize_encounter ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. !! Note: The reason to extend it by a factor of 2 is for performance. When there are many enounters per step, resizing every time you want to add an !! encounter takes significant computational effort. Resizing by a factor of 2 is a tradeoff between performance (fewer resize calls) and memory managment !! Memory usage grows by a factor of 2 each time it fills up, but no more. implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list integer ( I4B ), intent ( in ) :: nnew !! New size of list needed ! Internals class ( swiftest_encounter ), allocatable :: enc_temp integer ( I4B ) :: nold logical :: lmalloc lmalloc = allocated ( self % status ) if ( lmalloc ) then nold = size ( self % status ) else nold = 0 end if if ( nnew > nold ) then if ( lmalloc ) allocate ( enc_temp , source = self ) call self % setup ( 2 * nnew ) if ( lmalloc ) then call self % copy ( enc_temp ) deallocate ( enc_temp ) end if else self % status ( nnew + 1 : nold ) = INACTIVE end if self % nenc = nnew return end subroutine util_resize_encounter module subroutine util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a Swiftest massive body against the requested size and resizes it if it is too small. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize_body ( self , nnew ) call util_resize ( self % mass , nnew ) call util_resize ( self % Gmass , nnew ) call util_resize ( self % rhill , nnew ) call util_resize ( self % radius , nnew ) call util_resize ( self % xbeg , nnew ) call util_resize ( self % xend , nnew ) call util_resize ( self % vbeg , nnew ) call util_resize ( self % density , nnew ) call util_resize ( self % Ip , nnew ) call util_resize ( self % rot , nnew ) call util_resize ( self % k2 , nnew ) call util_resize ( self % Q , nnew ) call util_resize ( self % tlag , nnew ) if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) return end subroutine util_resize_pl module subroutine util_resize_tp ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a Swiftest test particle against the requested size and resizes it if it is too small. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize_body ( self , nnew ) call util_resize ( self % isperi , nnew ) call util_resize ( self % peri , nnew ) call util_resize ( self % atp , nnew ) return end subroutine util_resize_tp end submodule s_util_resize","tags":"","loc":"sourcefile/util_resize.f90.html"},{"title":"util_copy.f90 – swiftest","text":"This file depends on sourcefile~~util_copy.f90~~EfferentGraph sourcefile~util_copy.f90 util_copy.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_copy.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_copy Source Code util_copy.f90 Source Code submodule ( swiftest_classes ) s_util_copy use swiftest contains module subroutine util_copy_encounter ( self , source ) !! author: David A. Minton !! !! Copies elements from the source encounter list into self. implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into associate ( n => source % nenc ) self % nenc = n self % lvdotr ( 1 : n ) = source % lvdotr ( 1 : n ) self % status ( 1 : n ) = source % status ( 1 : n ) self % kidx ( 1 : n ) = source % kidx ( 1 : n ) self % index1 ( 1 : n ) = source % index1 ( 1 : n ) self % index2 ( 1 : n ) = source % index2 ( 1 : n ) self % id1 ( 1 : n ) = source % id1 ( 1 : n ) self % id2 ( 1 : n ) = source % id2 ( 1 : n ) self % x1 (:, 1 : n ) = source % x1 (:, 1 : n ) self % x2 (:, 1 : n ) = source % x2 (:, 1 : n ) self % v1 (:, 1 : n ) = source % v1 (:, 1 : n ) self % v2 (:, 1 : n ) = source % v2 (:, 1 : n ) self % t ( 1 : n ) = source % t ( 1 : n ) end associate return end subroutine util_copy_encounter module subroutine util_copy_particle_info ( self , source ) !! author: David A. Minton !! !! Copies one set of information object components into another, component-by-component implicit none class ( swiftest_particle_info ), intent ( inout ) :: self class ( swiftest_particle_info ), intent ( in ) :: source call self % set_value (& name = source % name , & particle_type = source % particle_type , & status = source % status , & origin_type = source % origin_type , & origin_time = source % origin_time , & origin_xh = source % origin_xh (:), & origin_vh = source % origin_vh (:), & discard_time = source % discard_time , & discard_xh = source % discard_xh (:), & discard_vh = source % discard_vh (:), & discard_body_id = source % discard_body_id & ) return end subroutine util_copy_particle_info module subroutine util_copy_particle_info_arr ( source , dest , idx ) !! author: David A. Minton !! !! Copies contents from an array of one particle information objects to another. implicit none class ( swiftest_particle_info ), dimension (:), intent ( in ) :: source !! Source object to copy into class ( swiftest_particle_info ), dimension (:), intent ( inout ) :: dest !! Swiftest body object with particle metadata information object integer ( I4B ), dimension (:), intent ( in ), optional :: idx !! Optional array of indices to draw the source object ! Internals integer ( I4B ) :: i , j , n , nsource , ndest if ( size ( source ) == 0 ) return if ( present ( idx )) then n = size ( idx ) else n = size ( source ) end if nsource = size ( source ) ndest = size ( dest ) if (( n == 0 ) . or . ( n > ndest ) . or . ( n > nsource )) then write ( * , * ) 'Particle info copy operation failed. n, nsource, ndest: ' , n , nsource , ndest return end if do i = 1 , n if ( present ( idx )) then j = idx ( i ) else j = i end if call dest ( i )% copy ( source ( j )) end do return end subroutine util_copy_particle_info_arr end submodule s_util_copy","tags":"","loc":"sourcefile/util_copy.f90.html"},{"title":"util_minimize_bfgs.f90 – swiftest","text":"This file depends on sourcefile~~util_minimize_bfgs.f90~~EfferentGraph sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_minimize_bfgs Source Code util_minimize_bfgs.f90 Source Code submodule ( swiftest_classes ) s_util_minimize_bfgs use swiftest contains module function util_minimize_bfgs ( f , N , x0 , eps , maxloop , lerr ) result ( x1 ) !! author: David A. Minton !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This function implements the Broyden-Fletcher-Goldfarb-Shanno method to determine the minimum of a function of N variables. !! It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   N       : Number of variables of function f !!   x0      : Initial starting value of x !!   eps     : Accuracy of 1 - dimensional minimization at each step !!   maxloop : Maximum number of loops to attempt to find a solution !! The outputs include !!   lerr :  Returns .true. if it could not find the minimum !! Returns !!   x1   :  Final minimum (all 0 if none found) !!   0 = No miniumum found !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - use , intrinsic :: ieee_exceptions implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 real ( DP ), intent ( in ) :: eps integer ( I4B ), intent ( in ) :: maxloop logical , intent ( out ) :: lerr ! Result real ( DP ), dimension (:), allocatable :: x1 ! Internals integer ( I4B ) :: i , j , k , l , conv , num real ( DP ), parameter :: graddelta = 1e-4_DP !! Delta x for gradient calculations real ( DP ), dimension ( N ) :: S !! Direction vectors real ( DP ), dimension ( N , N ) :: H !! Approximated inverse Hessian matrix real ( DP ), dimension ( N ) :: grad1 !! gradient of f real ( DP ), dimension ( N ) :: grad0 !! old value of gradient real ( DP ) :: astar !! 1D minimized value real ( DP ), dimension ( N ) :: y , P real ( DP ), dimension ( N , N ) :: PP , PyH , HyP real ( DP ) :: yHy , Py type ( ieee_status_type ) :: original_fpe_status logical , dimension (:), allocatable :: fpe_flag call ieee_get_status ( original_fpe_status ) ! Save the original floating point exception status call ieee_set_flag ( ieee_all , . false .) ! Set all flags to quiet allocate ( fpe_flag ( size ( ieee_usual ))) lerr = . false . allocate ( x1 , source = x0 ) ! Initialize approximate Hessian with the identity matrix (i.e. begin with method of steepest descent) ! Get initial gradient and initialize arrays for updated values of gradient and x H (:,:) = reshape ([(( 0._DP , i = 1 , j - 1 ), 1._DP , ( 0._DP , i = j + 1 , N ), j = 1 , N )], [ N , N ]) grad0 = gradf ( f , N , x0 (:), graddelta , lerr ) if ( lerr ) then call ieee_set_status ( original_fpe_status ) return end if grad1 (:) = grad0 (:) do i = 1 , maxloop !check for convergence conv = count ( abs ( grad1 (:)) > eps ) if ( conv == 0 ) exit S (:) = - matmul ( H (:,:), grad1 (:)) astar = minimize1D ( f , x1 , S , N , graddelta , lerr ) if ( lerr ) exit ! Get new x values P (:) = astar * S (:) x1 (:) = x1 (:) + P (:) ! Calculate new gradient grad0 (:) = grad1 (:) grad1 = gradf ( f , N , x1 , graddelta , lerr ) y (:) = grad1 (:) - grad0 (:) Py = sum ( P (:) * y (:)) ! set up factors for H matrix update yHy = 0._DP !$omp do simd schedule(static)& !$omp firstprivate(N, y, H) & !$omp reduction(+:yHy) do k = 1 , N do j = 1 , N yHy = yHy + y ( j ) * H ( j , k ) * y ( k ) end do end do !$omp end do simd ! prevent divide by zero (convergence) if ( abs ( Py ) < tiny ( Py )) exit ! set up update PyH (:,:) = 0._DP HyP (:,:) = 0._DP !$omp parallel do default(private) schedule(static)& !$omp shared(N, PP, P, y, H) & !$omp reduction(+:PyH, HyP) do k = 1 , N do j = 1 , N PP ( j , k ) = P ( j ) * P ( k ) do l = 1 , N PyH ( j , k ) = PyH ( j , k ) + P ( j ) * y ( l ) * H ( l , k ) HyP ( j , k ) = HyP ( j , k ) + P ( k ) * y ( l ) * H ( j , l ) end do end do end do !$omp end parallel do ! update H matrix H (:,:) = H (:,:) + (( 1._DP - yHy / Py ) * PP (:,:) - PyH (:,:) - HyP (:,:)) / Py ! Normalize to prevent it from blowing up if it takes many iterations to find a solution H (:,:) = H (:,:) / norm2 ( H (:,:)) ! Stop everything if there are any exceptions to allow the routine to fail gracefully call ieee_get_flag ( ieee_usual , fpe_flag ) if ( any ( fpe_flag )) exit if ( i == maxloop ) then lerr = . true . end if end do call ieee_get_flag ( ieee_usual , fpe_flag ) lerr = lerr . or . any ( fpe_flag ) call ieee_set_status ( original_fpe_status ) return contains function gradf ( f , N , x1 , dx , lerr ) result ( grad ) !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! Purpose:  Estimates the gradient of a function using a central difference !! approximation !! Inputs: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   N    :  number of variables N !!   x1   :  x value array !!   dx   :  step size to use when calculating derivatives !! Outputs: !!   lerr : .true. if an error occurred. Otherwise returns .false. !! Returns !!   grad :  N sized array containing estimated gradient of f at x1 !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x1 real ( DP ), intent ( in ) :: dx logical , intent ( out ) :: lerr ! Result real ( DP ), dimension ( N ) :: grad ! Internals integer ( I4B ) :: i , j real ( DP ), dimension ( N ) :: xp , xm real ( DP ) :: fp , fm logical :: lerrp , lerrm do i = 1 , N do j = 1 , N if ( j == i ) then xp ( j ) = x1 ( j ) + dx xm ( j ) = x1 ( j ) - dx else xp ( j ) = x1 ( j ) xm ( j ) = x1 ( j ) end if end do select type ( f ) class is ( lambda_obj_err ) fp = f % eval ( xp ) lerrp = f % lerr fm = f % eval ( xm ) lerrm = f % lerr lerr = lerrp . or . lerrm class is ( lambda_obj ) fp = f % eval ( xp ) fm = f % eval ( xm ) lerr = . false . end select grad ( i ) = ( fp - fm ) / ( 2 * dx ) if ( lerr ) return end do return end function gradf function minimize1D ( f , x0 , S , N , eps , lerr ) result ( astar ) !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This program find the minimum of a function of N variables in a single direction !! S using in sequence: !!    1.  A Bracketing method !!    2.  The golden section method !!    3.  A quadratic polynomial fit !! Inputs !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   x0   :  Array of size N of initial x values !!   S    :  Array of size N that determines the direction of minimization !!   N    :  Number of variables of function f !!   eps  :  Accuracy of 1 - dimensional minimization at each step !! Output !!   lerr : .true. if an error occurred. Otherwise returns .false. !! Returns !!   astar      :  Final minimum along direction S !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: eps logical , intent ( out ) :: lerr ! Result real ( DP ) :: astar ! Internals integer ( I4B ) :: num = 0 real ( DP ), parameter :: step = 0.7_DP !! Bracketing method step size real ( DP ), parameter :: gam = 1.2_DP !! Bracketing method expansion parameter real ( DP ), parameter :: greduce = 0.2_DP !! Golden section method reduction factor real ( DP ), parameter :: greduce2 = 0.1_DP ! Secondary golden section method reduction factor real ( DP ) :: alo , ahi !! High and low values for 1 - D minimization routines real ( DP ), parameter :: a0 = epsilon ( 1.0_DP ) !! Initial guess of alpha alo = a0 call bracket ( f , x0 , S , N , gam , step , alo , ahi , lerr ) if ( lerr ) then !write(*,*) \"BFGS bracketing step failed!\" return end if if ( abs ( alo - ahi ) < eps ) then astar = alo lerr = . false . return end if call golden ( f , x0 , S , N , greduce , alo , ahi , lerr ) if ( lerr ) then !write(*,*) \"BFGS golden section step failed!\" return end if if ( abs ( alo - ahi ) < eps ) then astar = alo lerr = . false . return end if call quadfit ( f , x0 , S , N , eps , alo , ahi , lerr ) if ( lerr ) then !write(*,*) \"BFGS quadfit failed!\" return end if if ( abs ( alo - ahi ) < eps ) then astar = alo lerr = . false . return end if ! Quadratic fit method won't converge, so finish off with another golden section call golden ( f , x0 , S , N , greduce2 , alo , ahi , lerr ) if (. not . lerr ) astar = ( alo + ahi ) / 2.0_DP return end function minimize1D function n2one ( f , x0 , S , N , a , lerr ) result ( fnew ) implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: a logical , intent ( out ) :: lerr ! Return real ( DP ) :: fnew ! Internals real ( DP ), dimension ( N ) :: xnew integer ( I4B ) :: i xnew (:) = x0 (:) + a * S (:) fnew = f % eval ( xnew (:)) select type ( f ) class is ( lambda_obj_err ) lerr = f % lerr class is ( lambda_obj ) lerr = . false . end select return end function n2one ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - subroutine bracket ( f , x0 , S , N , gam , step , lo , hi , lerr ) ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This subroutine brackets the minimum.  It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   x0   :  Array of size N of initial x values !!   S    :  Array of size N that determines the direction of minimization !!   gam  :  expansion parameter !!   step :  step size !!   lo   :  initial guess of lo bracket value !! The outputs include !!   lo   :  lo bracket !!   hi   :  hi bracket !!   lerr : .true. if an error occurred. Otherwise returns .false. !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: gam , step real ( DP ), intent ( inout ) :: lo real ( DP ), intent ( out ) :: hi logical , intent ( out ) :: lerr ! Internals real ( DP ) :: a0 , a1 , a2 , atmp , da real ( DP ) :: f0 , f1 , f2 integer ( I4B ) :: i , j integer ( I4B ), parameter :: MAXLOOP = 100 ! maximum number of loops before method is determined to have failed real ( DP ), parameter :: eps = epsilon ( lo ) ! small number precision to test floating point equality ! set up initial bracket points a0 = lo da = step a1 = a0 + da a2 = a0 + 2 * da f0 = n2one ( f , x0 , S , N , a0 , lerr ) if ( lerr ) return f1 = n2one ( f , x0 , S , N , a1 , lerr ) if ( lerr ) return f2 = n2one ( f , x0 , S , N , a2 , lerr ) if ( lerr ) return ! loop over bracket method until either min is bracketed method fails do i = 1 , MAXLOOP if (( f0 > f1 ) . and . ( f1 < f2 )) then ! Minimum was found lo = a0 hi = a2 return else if (( f0 >= f1 ) . and . ( f1 > f2 )) then ! Function appears to decrease da = da * gam atmp = a2 + da a0 = a1 a1 = a2 a2 = atmp f0 = f1 f1 = f2 f2 = n2one ( f , x0 , S , N , a2 , lerr ) else if (( f0 < f1 ) . and . ( f1 <= f2 )) then ! Function appears to increase da = da * gam atmp = a0 - da a2 = a1 a1 = a0 a0 = atmp f2 = f1 f0 = n2one ( f , x0 , S , N , a0 , lerr ) else if (( f0 < f1 ) . and . ( f1 > f2 )) then ! We are at a peak. Pick the direction that descends the fastest da = da * gam if ( f2 > f0 ) then ! LHS is lower than RHS atmp = a2 + da a0 = a1 a1 = a2 a2 = atmp f0 = f1 f1 = f2 f2 = n2one ( f , x0 , S , N , a2 , lerr ) else ! RHS is lower than LHS atmp = a0 - da a2 = a1 a1 = a0 a0 = atmp f2 = f1 f1 = f2 f0 = n2one ( f , x0 , S , N , a0 , lerr ) end if else if (( f0 > f1 ) . and . ( abs ( f2 - f1 ) <= eps )) then ! Decrasging but RHS equal da = da * gam atmp = a2 + da a2 = atmp f2 = n2one ( f , x0 , S , N , a2 , lerr ) else if (( abs ( f0 - f1 ) < eps ) . and . ( f1 < f2 )) then ! Increasing but LHS equal da = da * gam atmp = a0 - da a0 = atmp f0 = n2one ( f , x0 , S , N , a0 , lerr ) else ! all values equal. Expand in either direction and try again a0 = a0 - da a2 = a2 + da f0 = n2one ( f , x0 , S , N , a0 , lerr ) if ( lerr ) exit ! An error occurred while evaluating the function f2 = n2one ( f , x0 , S , N , a2 , lerr ) end if if ( lerr ) exit ! An error occurred while evaluating the function end do lerr = . true . return ! no minimum found end subroutine bracket ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - subroutine golden ( f , x0 , S , N , eps , lo , hi , lerr ) ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This function uses the golden section method to reduce the starting interval lo, hi by some amount sigma. !! It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   x0   :  Array of size N of initial x values !!   S    :  Array of size N that determines the direction of minimization !!   gam  :  expansion parameter !!   eps  :  reduction interval in range (0 < sigma < 1) such that: !!             hi(new) - lo(new) = eps * (hi(old) - lo(old)) !!   lo   :  initial guess of lo bracket value !! The outputs include !!   lo   :  lo bracket !!   hi   :  hi bracket !!   lerr : .true. if an error occurred. Otherwise returns .false. !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: eps real ( DP ), intent ( inout ) :: lo real ( DP ), intent ( out ) :: hi logical , intent ( out ) :: lerr ! Internals real ( DP ), parameter :: tau = 0.5_DP * ( sqrt ( 5.0_DP ) - 1.0_DP ) ! Golden section constant integer ( I4B ), parameter :: MAXLOOP = 40 ! maximum number of loops before method is determined to have failed (unlikely, but could occur if no minimum exists between lo and hi) real ( DP ) :: i0 ! Initial interval value real ( DP ) :: a1 , a2 real ( DP ) :: f1 , f2 integer ( I4B ) :: i , j i0 = hi - lo a1 = hi - tau * i0 a2 = lo + tau * i0 f1 = n2one ( f , x0 , S , N , a1 , lerr ) if ( lerr ) return f2 = n2one ( f , x0 , S , N , a2 , lerr ) if ( lerr ) return do i = 1 , MAXLOOP if ( abs (( hi - lo ) / i0 ) <= eps ) return ! interval reduced to input amount if ( f2 > f1 ) then hi = a2 a2 = a1 f2 = f1 a1 = hi - tau * ( hi - lo ) f1 = n2one ( f , x0 , S , N , a1 , lerr ) else lo = a1 a1 = a2 f2 = f1 a2 = hi - ( 1.0_DP - tau ) * ( hi - lo ) f2 = n2one ( f , x0 , S , N , a2 , lerr ) end if if ( lerr ) exit end do lerr = . true . return ! search took too many iterations - no minimum found end subroutine golden ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - subroutine quadfit ( f , x0 , S , N , eps , lo , hi , lerr ) ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - !! This function uses a quadratic polynomial fit to locate the minimum of a function !! to some accuracy eps.  It recieves as input: !!   f%eval(x) : lambda function object containing the objective function as the eval metho !!   lo    :  low bracket value !!   hi    :  high bracket value !!   eps   :  desired accuracy of final minimum location !! The outputs include !!   lo   :  final minimum location !!   hi   :  final minimum location !! Notes: Uses the ieee_exceptions intrinsic module to allow for graceful failure due to floating point exceptions, which won't terminate the run. !! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -  - implicit none ! Arguments integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 , S real ( DP ), intent ( in ) :: eps real ( DP ), intent ( inout ) :: lo real ( DP ), intent ( out ) :: hi logical , intent ( out ) :: lerr ! Internals integer ( I4B ), parameter :: MAXLOOP = 20 ! maximum number of loops before method is determined to have failed. real ( DP ) :: a1 , a2 , a3 , astar ! three points for the polynomial fit and polynomial minimum real ( DP ) :: f1 , f2 , f3 , fstar ! three function values for the polynomial and polynomial minimum real ( DP ), dimension ( 3 ) :: row_1 , row_2 , row_3 , rhs , soln ! matrix for 3 equation solver (gaussian elimination) real ( DP ), dimension ( 3 , 3 ) :: lhs real ( DP ) :: d1 , d2 , d3 , aold , denom , errval integer ( I4B ) :: i lerr = . false . ! Get initial a1, a2, a3 values a1 = lo a2 = lo + 0.5_DP * ( hi - lo ) a3 = hi aold = a1 astar = a2 f1 = n2one ( f , x0 , S , N , a1 , lerr ) if ( lerr ) return f2 = n2one ( f , x0 , S , N , a2 , lerr ) if ( lerr ) return f3 = n2one ( f , x0 , S , N , a3 , lerr ) if ( lerr ) return do i = 1 , MAXLOOP ! check to see if convergence is reached and exit errval = abs (( astar - aold ) / astar ) call ieee_get_flag ( ieee_usual , fpe_flag ) if ( any ( fpe_flag )) then !write(*,*) 'quadfit fpe' !write(*,*) 'aold : ',aold !write(*,*) 'astar: ',astar lerr = . true . exit end if if ( errval < eps ) then lo = astar hi = astar exit end if ! Set up system for gaussian elimination equation solver row_1 = [ 1.0_DP , a1 , a1 ** 2 ] row_2 = [ 1.0_DP , a2 , a2 ** 2 ] row_3 = [ 1.0_DP , a3 , a3 ** 2 ] rhs = [ f1 , f2 , f3 ] lhs ( 1 , :) = row_1 lhs ( 2 , :) = row_2 lhs ( 3 , :) = row_3 ! Solve system of equations soln (:) = util_solve_linear_system ( lhs , rhs , 3 , lerr ) call ieee_set_flag ( ieee_all , . false .) ! Set all flags back to quiet call ieee_set_halting_mode ( ieee_divide_by_zero , . false .) if ( lerr ) then !write(*,*) 'quadfit fpe:' !write(*,*) 'util_solve_linear_system failed' exit end if aold = astar if ( soln ( 2 ) == soln ( 3 )) then ! Handles the case where they are both 0. 0/0 is an unhandled exception astar = - 0.5_DP else astar = - soln ( 2 ) / ( 2 * soln ( 3 )) end if call ieee_get_flag ( ieee_usual , fpe_flag ) if ( any ( fpe_flag )) then !write(*,*) 'quadfit fpe' !write(*,*) 'soln(2:3): ',soln(2:3) !write(*,*) 'a1, a2, a3' !write(*,*) a1, a2, a3 !write(*,*) 'f1, f2, f3' !write(*,*) f1, f2, f3 lerr = . true . exit end if fstar = n2one ( f , x0 , S , N , astar , lerr ) if ( lerr ) exit ! keep the three closest a values to astar and discard the fourth d1 = abs ( a1 - astar ) d2 = abs ( a2 - astar ) d3 = abs ( a3 - astar ) if ( d1 > d2 ) then if ( d1 > d3 ) then f1 = fstar a1 = astar else if ( d3 > d2 ) then f3 = fstar a3 = astar end if else if ( d2 > d3 ) then f2 = fstar a2 = astar else if ( d3 > d1 ) then f3 = fstar a3 = astar end if end if end do if ( lerr ) return lo = a1 hi = a3 return end subroutine quadfit end function util_minimize_bfgs end submodule s_util_minimize_bfgs","tags":"","loc":"sourcefile/util_minimize_bfgs.f90.html"},{"title":"util_append.f90 – swiftest","text":"This file depends on sourcefile~~util_append.f90~~EfferentGraph sourcefile~util_append.f90 util_append.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_append.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_append Source Code util_append.f90 Source Code submodule ( swiftest_classes ) s_util_append use swiftest contains module subroutine util_append_arr_char_string ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of character string type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_char_string module subroutine util_append_arr_DP ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of double precision type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_DP module subroutine util_append_arr_DPvec ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of double precision vector type of size (NDIM, n) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:,:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( NDIM , nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( 1 , nold + 1 : nold + nnew ) = pack ( source ( 1 , 1 : nsrc ), lsource_mask ( 1 : nsrc )) arr ( 2 , nold + 1 : nold + nnew ) = pack ( source ( 2 , 1 : nsrc ), lsource_mask ( 1 : nsrc )) arr ( 3 , nold + 1 : nold + nnew ) = pack ( source ( 3 , 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_DPvec module subroutine util_append_arr_I4B ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of integer(I4B) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_I4B module subroutine util_append_arr_info ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of particle information type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew , i integer ( I4B ), dimension (:), allocatable :: idx if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if allocate ( idx ( nnew )) idx = pack ([( i , i = 1 , nsrc )], lsource_mask ( 1 : nsrc )) call util_copy_particle_info_arr ( source ( 1 : nsrc ), arr ( nold + 1 : nold + nnew ), idx ) return end subroutine util_append_arr_info module subroutine util_append_arr_logical ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of logical type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array logical , dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine util_append_arr_logical module subroutine util_append_body ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nold , nsrc , nnew nold = self % nbody nsrc = source % nbody nnew = count ( lsource_mask ( 1 : nsrc )) call util_append ( self % info , source % info , nold , nsrc , lsource_mask ) call util_append ( self % id , source % id , nold , nsrc , lsource_mask ) call util_append ( self % status , source % status , nold , nsrc , lsource_mask ) call util_append ( self % ldiscard , source % ldiscard , nold , nsrc , lsource_mask ) call util_append ( self % lmask , source % lmask , nold , nsrc , lsource_mask ) call util_append ( self % mu , source % mu , nold , nsrc , lsource_mask ) call util_append ( self % xh , source % xh , nold , nsrc , lsource_mask ) call util_append ( self % vh , source % vh , nold , nsrc , lsource_mask ) call util_append ( self % xb , source % xb , nold , nsrc , lsource_mask ) call util_append ( self % vb , source % vb , nold , nsrc , lsource_mask ) call util_append ( self % ah , source % ah , nold , nsrc , lsource_mask ) call util_append ( self % aobl , source % aobl , nold , nsrc , lsource_mask ) call util_append ( self % atide , source % atide , nold , nsrc , lsource_mask ) call util_append ( self % agr , source % agr , nold , nsrc , lsource_mask ) call util_append ( self % ir3h , source % ir3h , nold , nsrc , lsource_mask ) call util_append ( self % a , source % a , nold , nsrc , lsource_mask ) call util_append ( self % e , source % e , nold , nsrc , lsource_mask ) call util_append ( self % inc , source % inc , nold , nsrc , lsource_mask ) call util_append ( self % capom , source % capom , nold , nsrc , lsource_mask ) call util_append ( self % omega , source % omega , nold , nsrc , lsource_mask ) call util_append ( self % capm , source % capm , nold , nsrc , lsource_mask ) self % nbody = nold + nnew return end subroutine util_append_body module subroutine util_append_encounter ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nold , nsrc nold = self % nenc nsrc = source % nenc call util_append ( self % lvdotr , source % lvdotr , nold , nsrc , lsource_mask ) call util_append ( self % status , source % status , nold , nsrc , lsource_mask ) call util_append ( self % index1 , source % index1 , nold , nsrc , lsource_mask ) call util_append ( self % index2 , source % index2 , nold , nsrc , lsource_mask ) call util_append ( self % id1 , source % id1 , nold , nsrc , lsource_mask ) call util_append ( self % id2 , source % id2 , nold , nsrc , lsource_mask ) call util_append ( self % x1 , source % x1 , nold , nsrc , lsource_mask ) call util_append ( self % x2 , source % x2 , nold , nsrc , lsource_mask ) call util_append ( self % v1 , source % v1 , nold , nsrc , lsource_mask ) call util_append ( self % v2 , source % v2 , nold , nsrc , lsource_mask ) call util_append ( self % t , source % t , nold , nsrc , lsource_mask ) self % nenc = nold + count ( lsource_mask ( 1 : nsrc )) return end subroutine util_append_encounter module subroutine util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( swiftest_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % mass , source % mass , nold , nsrc , lsource_mask ) call util_append ( self % Gmass , source % Gmass , nold , nsrc , lsource_mask ) call util_append ( self % rhill , source % rhill , nold , nsrc , lsource_mask ) call util_append ( self % radius , source % radius , nold , nsrc , lsource_mask ) call util_append ( self % xbeg , source % xbeg , nold , nsrc , lsource_mask ) call util_append ( self % xend , source % xend , nold , nsrc , lsource_mask ) call util_append ( self % vbeg , source % vbeg , nold , nsrc , lsource_mask ) call util_append ( self % density , source % density , nold , nsrc , lsource_mask ) call util_append ( self % Ip , source % Ip , nold , nsrc , lsource_mask ) call util_append ( self % rot , source % rot , nold , nsrc , lsource_mask ) call util_append ( self % k2 , source % k2 , nold , nsrc , lsource_mask ) call util_append ( self % Q , source % Q , nold , nsrc , lsource_mask ) call util_append ( self % tlag , source % tlag , nold , nsrc , lsource_mask ) if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) call util_append_body ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class swiftest_pl or its descendents\" call util_exit ( FAILURE ) end select return end subroutine util_append_pl module subroutine util_append_tp ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one Swiftest body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( swiftest_tp ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % isperi , source % isperi , nold , nsrc , lsource_mask ) call util_append ( self % peri , source % peri , nold , nsrc , lsource_mask ) call util_append ( self % atp , source % atp , nold , nsrc , lsource_mask ) call util_append_body ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class swiftest_tp or its descendents\" call util_exit ( FAILURE ) end select return end subroutine util_append_tp end submodule s_util_append","tags":"","loc":"sourcefile/util_append.f90.html"},{"title":"util_get_energy_momentum.f90 – swiftest","text":"This file depends on sourcefile~~util_get_energy_momentum.f90~~EfferentGraph sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_util_get_energy_momentum Source Code util_get_energy_momentum.f90 Source Code submodule ( swiftest_classes ) s_util_get_energy_momentum use swiftest contains module subroutine util_get_energy_momentum_system ( self , param ) !! author: David A. Minton !! !! Compute total system angular momentum vector and kinetic, potential and total system energy !! !! Adapted from David E. Kaufmann Swifter routine symba_energy_eucl.f90 !! !! Adapted from Martin Duncan's Swift routine anal_energy.f implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j integer ( I8B ) :: k , nplpl real ( DP ) :: oblpot , kecb , kespincb real ( DP ), dimension ( self % pl % nbody ) :: irh , kepl , kespinpl real ( DP ), dimension ( self % pl % nbody ) :: Lplorbitx , Lplorbity , Lplorbitz real ( DP ), dimension ( self % pl % nbody ) :: Lplspinx , Lplspiny , Lplspinz real ( DP ), dimension ( NDIM ) :: Lcborbit , Lcbspin real ( DP ) :: hx , hy , hz associate ( system => self , pl => self % pl , npl => self % pl % nbody , cb => self % cb ) nplpl = pl % nplpl system % Lorbit (:) = 0.0_DP system % Lspin (:) = 0.0_DP system % Ltot (:) = 0.0_DP system % ke_orbit = 0.0_DP system % ke_spin = 0.0_DP kepl (:) = 0.0_DP Lplorbitx (:) = 0.0_DP Lplorbity (:) = 0.0_DP Lplorbitz (:) = 0.0_DP Lplspinx (:) = 0.0_DP Lplspiny (:) = 0.0_DP Lplspinz (:) = 0.0_DP pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE system % GMtot = cb % Gmass + sum ( pl % Gmass ( 1 : npl ), pl % lmask ( 1 : npl )) kecb = cb % mass * dot_product ( cb % vb (:), cb % vb (:)) Lcborbit (:) = cb % mass * ( cb % xb (:) . cross . cb % vb (:)) do concurrent ( i = 1 : npl , pl % lmask ( i )) hx = pl % xb ( 2 , i ) * pl % vb ( 3 , i ) - pl % xb ( 3 , i ) * pl % vb ( 2 , i ) hy = pl % xb ( 3 , i ) * pl % vb ( 1 , i ) - pl % xb ( 1 , i ) * pl % vb ( 3 , i ) hz = pl % xb ( 1 , i ) * pl % vb ( 2 , i ) - pl % xb ( 2 , i ) * pl % vb ( 1 , i ) ! Angular momentum from orbit Lplorbitx ( i ) = pl % mass ( i ) * hx Lplorbity ( i ) = pl % mass ( i ) * hy Lplorbitz ( i ) = pl % mass ( i ) * hz ! Kinetic energy from orbit kepl ( i ) = pl % mass ( i ) * dot_product ( pl % vb (:, i ), pl % vb (:, i )) end do if ( param % lrotation ) then kespincb = cb % mass * cb % Ip ( 3 ) * cb % radius ** 2 * dot_product ( cb % rot (:), cb % rot (:)) ! For simplicity, we always assume that the rotation pole is the 3rd principal axis Lcbspin (:) = cb % Ip ( 3 ) * cb % mass * cb % radius ** 2 * cb % rot (:) do concurrent ( i = 1 : npl , pl % lmask ( i )) ! Currently we assume that the rotation pole is the 3rd principal axis ! Angular momentum from spin Lplspinx ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * pl % rot ( 1 , i ) Lplspiny ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * pl % rot ( 2 , i ) Lplspinz ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * pl % rot ( 3 , i ) ! Kinetic energy from spin kespinpl ( i ) = pl % mass ( i ) * pl % Ip ( 3 , i ) * pl % radius ( i ) ** 2 * dot_product ( pl % rot (:, i ), pl % rot (:, i )) end do else kespincb = 0.0_DP kespinpl (:) = 0.0_DP end if call util_get_energy_potential ( npl , nplpl , pl % k_plpl , pl % lmask , cb % Gmass , pl % Gmass , pl % mass , pl % xb , system % pe ) ! Potential energy from the oblateness term if ( param % loblatecb ) then call system % obl_pot () system % pe = system % pe + system % oblpot end if system % ke_orbit = 0.5_DP * ( kecb + sum ( kepl ( 1 : npl ), pl % lmask ( 1 : npl ))) if ( param % lrotation ) system % ke_spin = 0.5_DP * ( kespincb + sum ( kespinpl ( 1 : npl ), pl % lmask ( 1 : npl ))) system % Lorbit ( 1 ) = Lcborbit ( 1 ) + sum ( Lplorbitx ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lorbit ( 2 ) = Lcborbit ( 2 ) + sum ( Lplorbity ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lorbit ( 3 ) = Lcborbit ( 3 ) + sum ( Lplorbitz ( 1 : npl ), pl % lmask ( 1 : npl )) if ( param % lrotation ) then system % Lspin ( 1 ) = Lcbspin ( 1 ) + sum ( Lplspinx ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lspin ( 2 ) = Lcbspin ( 2 ) + sum ( Lplspiny ( 1 : npl ), pl % lmask ( 1 : npl )) system % Lspin ( 3 ) = Lcbspin ( 3 ) + sum ( Lplspinz ( 1 : npl ), pl % lmask ( 1 : npl )) end if system % te = system % ke_orbit + system % ke_spin + system % pe system % Ltot (:) = system % Lorbit (:) + system % Lspin (:) end associate return end subroutine util_get_energy_momentum_system subroutine util_get_energy_potential ( npl , nplpl , k_plpl , lmask , GMcb , Gmass , mass , xb , pe ) !! author: David A. Minton !! !! Compute total system potential energy implicit none ! Arguments integer ( I4B ), intent ( in ) :: npl integer ( I8B ), intent ( in ) :: nplpl integer ( I4B ), dimension (:,:), intent ( in ) :: k_plpl logical , dimension (:), intent ( in ) :: lmask real ( DP ), intent ( in ) :: GMcb real ( DP ), dimension (:), intent ( in ) :: Gmass real ( DP ), dimension (:), intent ( in ) :: mass real ( DP ), dimension (:,:), intent ( in ) :: xb real ( DP ), intent ( out ) :: pe ! Internals integer ( I4B ) :: i , j integer ( I8B ) :: k real ( DP ), dimension ( npl ) :: pecb real ( DP ), dimension ( nplpl ) :: pepl logical , dimension ( nplpl ) :: lstatpl ! Do the central body potential energy component first where (. not . lmask ( 1 : npl )) pecb ( 1 : npl ) = 0.0_DP end where do concurrent ( i = 1 : npl , lmask ( i )) pecb ( i ) = - GMcb * mass ( i ) / norm2 ( xb (:, i )) end do !$omp parallel do default(private) schedule(static)& !$omp shared(nplpl, k_plpl, xb, mass, Gmass, pepl, lstatpl, lmask) do k = 1 , nplpl i = k_plpl ( 1 , k ) j = k_plpl ( 2 , k ) lstatpl ( k ) = ( lmask ( i ) . and . lmask ( j )) if ( lstatpl ( k )) then pepl ( k ) = - ( Gmass ( i ) * mass ( j )) / norm2 ( xb (:, i ) - xb (:, j )) else pepl ( k ) = 0.0_DP end if end do !$omp end parallel do pe = sum ( pepl (:), lstatpl (:)) + sum ( pecb ( 1 : npl ), lmask ( 1 : npl )) return end subroutine util_get_energy_potential end submodule s_util_get_energy_momentum","tags":"","loc":"sourcefile/util_get_energy_momentum.f90.html"},{"title":"gr.f90 – swiftest","text":"This file depends on sourcefile~~gr.f90~~EfferentGraph sourcefile~gr.f90 gr.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~gr.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_gr Source Code gr.f90 Source Code submodule ( swiftest_classes ) s_gr use swiftest contains module pure subroutine gr_kick_getaccb_ns_body ( self , system , param ) !! author: David A. Minton !! !! Add relativistic correction acceleration for non-symplectic integrators. !! Based on Quinn et al. (1991) eq. 5 !! !! Reference: !!    Quinn, T.R., Tremaine, S., Duncan, M., 1991. A three million year integration of the earth’s orbit. !!       AJ 101, 2287–2305. https://doi.org/10.1086/115850 !! !! Adapted from David A. Minton's Swifter routine routine gr_kick_getaccb_ns.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals real ( DP ) :: rmag , rdotv , vmag2 integer ( I4B ) :: i associate ( n => self % nbody , cb => system % cb , inv_c2 => param % inv_c2 ) if ( n == 0 ) return do i = 1 , n rmag = norm2 ( self % xh (:, i )) vmag2 = dot_product ( self % vh (:, i ), self % vh (:, i )) rdotv = dot_product ( self % xh (:, i ), self % vh (:, i )) self % agr (:, i ) = self % mu * inv_c2 / rmag ** 3 * (( 4 * self % mu ( i ) / rmag - vmag2 ) * self % xh (:, i ) + 4 * rdotv * self % vh (:, i )) end do select type ( self ) class is ( swiftest_pl ) do i = 1 , NDIM cb % agr ( i ) = - sum ( self % Gmass ( 1 : n ) * self % agr ( 1 : n , i ) / cb % Gmass ) end do end select end associate return end subroutine gr_kick_getaccb_ns_body module pure subroutine gr_kick_getacch ( mu , x , lmask , n , inv_c2 , agr ) !! author: David A. Minton !! !! Compute relativisitic accelerations of massive bodies !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vectors logical , dimension (:), intent ( in ) :: lmask !! Logical mask indicating which bodies to compute integer ( I4B ), intent ( in ) :: n !! Total number of bodies real ( DP ), intent ( in ) :: inv_c2 !! Inverse speed of light squared: 1 / c**2 real ( DP ), dimension (:,:), intent ( out ) :: agr !! Accelerations ! Internals integer ( I4B ) :: i real ( DP ) :: beta , rjmag4 agr (:,:) = 0.0_DP do concurrent ( i = 1 : n , lmask ( i )) rjmag4 = ( dot_product ( x (:, i ), x (:, i ))) ** 2 beta = - mu ( i ) ** 2 * inv_c2 agr (:, i ) = 2 * beta * x (:, i ) / rjmag4 end do return end subroutine gr_kick_getacch module pure subroutine gr_p4_pos_kick ( param , x , v , dt ) !! author: David A. Minton !! !! Position kick due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Reference: !!    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. !!       AJ 108, 1962–1969. https://doi.org/10.1086/117210 !! !! Adapted from David A. Minton's Swifter routine gr_whm_p4.f90 implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), dimension (:), intent ( inout ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( in ) :: dt !! Step size ! Internals real ( DP ), dimension ( NDIM ) :: dr real ( DP ) :: vmag2 vmag2 = dot_product ( v (:), v (:)) dr (:) = - 2 * param % inv_c2 * vmag2 * v (:) x (:) = x (:) + dr (:) * dt return end subroutine gr_p4_pos_kick module pure subroutine gr_pseudovel2vel ( param , mu , xh , pv , vh ) !! author: David A. Minton !! !! Converts the relativistic pseudovelocity back into a veliocentric velocity !!    Based on Saha & Tremaine (1994) Eq. 32 !! !! Reference: !!    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. !!       AJ 108, 1962–1969. https://doi.org/10.1086/117210 !! !! Adapted from David A. Minton's Swifter routine gr_pseudovel2vel.f90 implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Heliocentric position vector real ( DP ), dimension (:), intent ( in ) :: pv !! Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real ( DP ), dimension (:), intent ( out ) :: vh !! Heliocentric velocity vector ! Internals real ( DP ) :: vmag2 , rmag , grterm associate ( inv_c2 => param % inv_c2 ) vmag2 = dot_product ( pv (:), pv (:)) rmag = norm2 ( xh (:)) grterm = 1.0_DP - inv_c2 * ( 0.5_DP * vmag2 + 3 * mu / rmag ) vh (:) = pv (:) * grterm end associate return end subroutine gr_pseudovel2vel module pure subroutine gr_pv2vh_body ( self , param ) !! author: David A. Minton !! !! Wrapper function that converts from pseudovelocity to heliocentric velocity for swiftest bodies implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension (:,:), allocatable :: vh !! Temporary holder of pseudovelocity for in-place conversion associate ( n => self % nbody ) if ( n == 0 ) return allocate ( vh , mold = self % vh ) do i = 1 , n call gr_pseudovel2vel ( param , self % mu ( i ), self % xh (:, i ), self % vh (:, i ), vh (:, i )) end do call move_alloc ( vh , self % vh ) end associate return end subroutine gr_pv2vh_body module pure subroutine gr_vel2pseudovel ( param , mu , xh , vh , pv ) !! author: David A. Minton !! !! Converts the heliocentric velocity into a pseudovelocity with relativistic corrections. !! Uses Newton-Raphson method with direct inversion of the Jacobian (yeah, it's slow, but !! this is only done once per run). !! !! Reference: !!    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. !!       AJ 108, 1962–1969. https://doi.org/10.1086/117210 !! !! Adapted from David A. Minton's Swifter routine gr_vel2pseudovel.f90 implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Heliocentric position vector real ( DP ), dimension (:), intent ( in ) :: vh !! Heliocentric velocity vector real ( DP ), dimension (:), intent ( out ) :: pv !! Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) ! Internals real ( DP ) :: v2 , G , pv2 , rterm , det real ( DP ), dimension ( NDIM , NDIM ) :: J , Jinv real ( DP ), dimension ( NDIM ) :: F integer ( I4B ) :: n , i , k integer ( I4B ), parameter :: MAXITER = 50 real ( DP ), parameter :: TOL = 1.0e-12_DP associate ( inv_c2 => param % inv_c2 ) pv ( 1 : NDIM ) = vh ( 1 : NDIM ) ! Initial guess rterm = 3 * mu / norm2 ( xh (:)) v2 = dot_product ( vh (:), vh (:)) do n = 1 , MAXITER pv2 = dot_product ( pv (:), pv (:)) G = 1.0_DP - inv_c2 * ( 0.5_DP * pv2 + rterm ) F (:) = pv (:) * G - vh (:) if ( abs ( sum ( F ) / v2 ) < TOL ) exit ! Root found ! Calculate the Jacobian do k = 1 , NDIM do i = 1 , NDIM if ( i == k ) then J ( i , k ) = G - inv_c2 * pv ( k ) else J ( i , k ) = - inv_c2 * pv ( k ) end if end do end do ! Inverse of the Jacobian det = J ( 1 , 1 ) * ( J ( 3 , 3 ) * J ( 2 , 2 ) - J ( 3 , 2 ) * J ( 2 , 3 )) det = det - J ( 2 , 1 ) * ( J ( 3 , 3 ) * J ( 1 , 2 ) - J ( 3 , 2 ) * J ( 1 , 3 )) det = det + J ( 3 , 1 ) * ( J ( 2 , 3 ) * J ( 1 , 2 ) - J ( 2 , 2 ) * J ( 1 , 3 )) Jinv ( 1 , 1 ) = J ( 3 , 3 ) * J ( 2 , 2 ) - J ( 3 , 2 ) * J ( 2 , 3 ) Jinv ( 1 , 2 ) = - ( J ( 3 , 3 ) * J ( 1 , 2 ) - J ( 3 , 2 ) * J ( 1 , 3 )) Jinv ( 1 , 3 ) = J ( 2 , 3 ) * J ( 1 , 2 ) - J ( 2 , 2 ) * J ( 1 , 3 ) Jinv ( 2 , 1 ) = - ( J ( 3 , 3 ) * J ( 2 , 1 ) - J ( 3 , 1 ) * J ( 2 , 3 )) Jinv ( 2 , 2 ) = J ( 3 , 3 ) * J ( 1 , 1 ) - J ( 3 , 1 ) * J ( 1 , 3 ) Jinv ( 2 , 3 ) = - ( J ( 2 , 3 ) * J ( 1 , 1 ) - J ( 2 , 1 ) * J ( 1 , 3 )) Jinv ( 3 , 1 ) = J ( 3 , 2 ) * J ( 2 , 1 ) - J ( 3 , 1 ) * J ( 2 , 2 ) Jinv ( 3 , 2 ) = - ( J ( 3 , 2 ) * J ( 1 , 1 ) - J ( 3 , 1 ) * J ( 1 , 2 )) Jinv ( 3 , 3 ) = J ( 2 , 2 ) * J ( 1 , 1 ) - J ( 2 , 1 ) * J ( 1 , 2 ) Jinv = Jinv * det do i = 1 , NDIM pv ( i ) = pv ( i ) - dot_product ( Jinv ( i ,:), F (:)) end do end do end associate return end subroutine gr_vel2pseudovel module pure subroutine gr_vh2pv_body ( self , param ) !! author: David A. Minton !! !! Wrapper function that converts from heliocentric velocity to pseudovelocity for Swiftest bodies implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension (:,:), allocatable :: pv !! Temporary holder of pseudovelocity for in-place conversion associate ( n => self % nbody ) if ( n == 0 ) return allocate ( pv , mold = self % vh ) do i = 1 , n call gr_vel2pseudovel ( param , self % mu ( i ), self % xh (:, i ), self % vh (:, i ), pv (:, i )) end do call move_alloc ( pv , self % vh ) end associate return end subroutine gr_vh2pv_body end submodule s_gr","tags":"","loc":"sourcefile/gr.f90.html"},{"title":"discard.f90 – swiftest","text":"This file depends on sourcefile~~discard.f90~~EfferentGraph sourcefile~discard.f90 discard.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~discard.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_discard Source Code discard.f90 Source Code submodule ( swiftest_classes ) s_discard use swiftest contains module subroutine discard_system ( self , param ) !! author: David A. Minton !! !! Calls the discard methods for each body class and then the write method if any discards were detected !! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals logical :: lany_discards , lpl_discards , ltp_discards , lpl_check , ltp_check lpl_check = allocated ( self % pl_discards ) ltp_check = allocated ( self % tp_discards ) associate ( system => self , tp => self % tp , pl => self % pl , tp_discards => self % tp_discards , pl_discards => self % pl_discards ) lpl_discards = . false . ltp_discards = . false . if ( lpl_check ) then call pl % discard ( system , param ) lpl_discards = ( pl_discards % nbody > 0 ) end if if ( ltp_check ) then call tp % discard ( system , param ) ltp_discards = ( tp_discards % nbody > 0 ) end if if ( lpl_discards . or . ltp_discards ) call system % write_discard ( param ) if ( lpl_discards . and . param % lenergy ) call self % conservation_report ( param , lterminal = . false .) if ( lpl_check ) call pl_discards % setup ( 0 , param ) if ( ltp_check ) call tp_discards % setup ( 0 , param ) end associate return end subroutine discard_system module subroutine discard_pl ( self , system , param ) !! author: David A. Minton !! !!  Placeholder method for discarding massive bodies. This method does nothing except to ensure that the discard flag is set to false. !!  This method is intended to be overridden by more advanced integrators. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameter if ( self % nbody == 0 ) return self % ldiscard ( 1 : self % nbody ) = . false . return end subroutine discard_pl module subroutine discard_tp ( self , system , param ) !! author: David A. Minton !! !! Check to see if particles should be discarded based on their positions relative to the massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine: discard.f90 !! Adapted from Hal Levison's Swift routine discard. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameter ! Internals logical , dimension (:), allocatable :: ldiscard integer ( I4B ) :: npl , ntp associate ( tp => self , cb => system % cb , pl => system % pl ) if (( ntp == 0 ) . or . ( npl == 0 )) return ntp = tp % nbody npl = pl % nbody if (( param % rmin >= 0.0_DP ) . or . ( param % rmax >= 0.0_DP ) . or . & ( param % rmaxu >= 0.0_DP ) . or . (( param % qmin >= 0.0_DP ) . and . ( param % qmin_coord == \"BARY\" ))) then call pl % h2b ( cb ) call tp % h2b ( cb ) end if if (( param % rmin >= 0.0_DP ) . or . ( param % rmax >= 0.0_DP ) . or . ( param % rmaxu >= 0.0_DP )) call discard_cb_tp ( tp , system , param ) if ( param % qmin >= 0.0_DP ) call discard_peri_tp ( tp , system , param ) if ( param % lclose ) call discard_pl_tp ( tp , system , param ) if ( any ( tp % ldiscard ( 1 : ntp ))) then allocate ( ldiscard , source = tp % ldiscard ) call tp % spill ( system % tp_discards , ldiscard ( 1 : ntp ), ldestructive = . true .) end if end associate return end subroutine discard_tp subroutine discard_cb_tp ( tp , system , param ) !! author: David A. Minton !! !!  Check to see if test particles should be discarded based on their positions relative to the Sun !!        or because they are unbound from the system !! !! Adapted from David E. Kaufmann's Swifter routine: discard_sun.f90 !! Adapted from Hal Levison's Swift routine discard_sun.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: tp !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: energy , vb2 , rb2 , rh2 , rmin2 , rmax2 , rmaxu2 character ( len = STRMAX ) :: idstr , timestr associate ( ntp => tp % nbody , cb => system % cb , Gmtot => system % Gmtot ) rmin2 = max ( param % rmin * param % rmin , cb % radius * cb % radius ) rmax2 = param % rmax ** 2 rmaxu2 = param % rmaxu ** 2 do i = 1 , ntp if ( tp % status ( i ) == ACTIVE ) then rh2 = dot_product ( tp % xh (:, i ), tp % xh (:, i )) if (( param % rmax >= 0.0_DP ) . and . ( rh2 > rmax2 )) then tp % status ( i ) = DISCARDED_RMAX write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too far from the central body at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_RMAX\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i )) else if (( param % rmin >= 0.0_DP ) . and . ( rh2 < rmin2 )) then tp % status ( i ) = DISCARDED_RMIN write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too close to the central body at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_RMIN\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = cb % id ) else if ( param % rmaxu >= 0.0_DP ) then rb2 = dot_product ( tp % xb (:, i ), tp % xb (:, i )) vb2 = dot_product ( tp % vb (:, i ), tp % vb (:, i )) energy = 0.5_DP * vb2 - Gmtot / sqrt ( rb2 ) if (( energy > 0.0_DP ) . and . ( rb2 > rmaxu2 )) then tp % status ( i ) = DISCARDED_RMAXU write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" is unbound and too far from barycenter at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_RMAXU\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i )) end if end if end if end do end associate return end subroutine discard_cb_tp subroutine discard_peri_tp ( tp , system , param ) !! author: David A. Minton !! !! Check to see if a test particle should be discarded because its perihelion distance becomes too small !! !! Adapted from David E. Kaufmann's Swifter routine: discard_peri.f90 !! Adapted from Hal Levison's Swift routine discard_peri.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: tp !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameterss ! Internals logical , save :: lfirst = . true . integer ( I4B ) :: i , j , ih real ( DP ) :: r2 real ( DP ), dimension ( NDIM ) :: dx character ( len = STRMAX ) :: idstr , timestr associate ( cb => system % cb , ntp => tp % nbody , pl => system % pl , npl => system % pl % nbody , t => param % t ) call tp % get_peri ( system , param ) do i = 1 , ntp if ( tp % status ( i ) == ACTIVE ) then if ( tp % isperi ( i ) == 0 ) then ih = 1 do j = 1 , npl dx (:) = tp % xh (:, i ) - pl % xh (:, j ) r2 = dot_product ( dx (:), dx (:)) if ( r2 <= ( pl % rhill ( j )) ** 2 ) ih = 0 end do if ( ih == 1 ) then if (( tp % atp ( i ) >= param % qmin_alo ) . and . & ( tp % atp ( i ) <= param % qmin_ahi ) . and . & ( tp % peri ( i ) <= param % qmin )) then tp % status ( i ) = DISCARDED_PERI write ( idstr , * ) tp % id ( i ) write ( timestr , * ) param % t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" perihelion distance too small at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . call tp % info ( i )% set_value ( status = \"DISCARDED_PERI\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = pl % id ( j )) end if end if end if end if end do end associate return end subroutine discard_peri_tp subroutine discard_pl_tp ( tp , system , param ) !! author: David A. Minton !! !! Check to see if test particles should be discarded based on their positions relative to the massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine: discard_pl.f90 !! Adapted from Hal Levison's Swift routine discard_pl.f implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: tp !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j , isp real ( DP ) :: r2min , radius real ( DP ), dimension ( NDIM ) :: dx , dv character ( len = STRMAX ) :: idstri , idstrj , timestr associate ( ntp => tp % nbody , pl => system % pl , npl => system % pl % nbody , t => param % t , dt => param % dt ) do i = 1 , ntp if ( tp % status ( i ) == ACTIVE ) then do j = 1 , npl dx (:) = tp % xh (:, i ) - pl % xh (:, j ) dv (:) = tp % vh (:, i ) - pl % vh (:, j ) radius = pl % radius ( j ) call discard_pl_close ( dx (:), dv (:), dt , radius ** 2 , isp , r2min ) if ( isp /= 0 ) then tp % status ( i ) = DISCARDED_PLR tp % lmask ( i ) = . false . pl % ldiscard ( j ) = . true . write ( idstri , * ) tp % id ( i ) write ( idstrj , * ) pl % id ( j ) write ( timestr , * ) param % t write ( * , * ) \"Test particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstri )) // \")\" & // \"  too close to massive body \" // trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstrj )) & // \" at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . call tp % info ( i )% set_value ( status = \"DISCARDED_PLR\" , discard_time = param % t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = pl % id ( j )) exit end if end do end if end do end associate return end subroutine discard_pl_tp subroutine discard_pl_close ( dx , dv , dt , r2crit , iflag , r2min ) !! author: David A. Minton !! !!  Check to see if a test particle and massive body are having, or will have within the next time step, an encounter such !!          that the separation distance r is less than some critical radius rcrit (or r**2 < rcrit**2 = r2crit) !! !! Adapted from David E. Kaufmann's Swifter routine: discard_pl_close.f90 !! Adapted from Hal Levison's Swift routine discard_pl_close.f implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: dx , dv real ( DP ), intent ( in ) :: dt , r2crit integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( out ) :: r2min ! Internals real ( DP ) :: r2 , v2 , vdotr , tmin r2 = dot_product ( dx (:), dx (:)) if ( r2 <= r2crit ) then iflag = 1 else vdotr = dot_product ( dx (:), dv (:)) if ( vdotr > 0.0_DP ) then iflag = 0 else v2 = dot_product ( dv (:), dv (:)) tmin = - vdotr / v2 if ( tmin < dt ) then r2min = r2 - vdotr * vdotr / v2 else r2min = r2 + 2 * vdotr * dt + v2 * dt ** 2 end if r2min = min ( r2min , r2 ) if ( r2min <= r2crit ) then iflag = 1 else iflag = 0 end if end if end if return end subroutine discard_pl_close end submodule s_discard","tags":"","loc":"sourcefile/discard.f90.html"},{"title":"helio_step.f90 – swiftest","text":"This file depends on sourcefile~~helio_step.f90~~EfferentGraph sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_step Source Code helio_step.f90 Source Code submodule ( helio_classes ) s_helio_step use swiftest contains module subroutine helio_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies and and active test particles ahead in heliocentric coordinates. !! !! Currently there's no difference between this and the WHM system stepper, so this is just !! a wrapper function to keep the method calls consistent for inherited types. !! !! Adapted from Hal Levison's Swift routine step_kdk.f !! Adapted from David E. Kaufmann's Swifter routine helio_step.f90 implicit none ! Arguments class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize call whm_step_system ( self , param , t , dt ) return end subroutine helio_step_system module subroutine helio_step_pl ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies ahead Democratic Heliocentric method !! !! Adapted from David E. Kaufmann's Swifter helio_step_pl.f90 !! Adapted from Hal Levison's Swift routine helio_step_pl.f implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals real ( DP ) :: dth !! Half step size if ( self % nbody == 0 ) return associate ( pl => self ) select type ( cb => system % cb ) class is ( helio_cb ) dth = 0.5_DP * dt if ( pl % lfirst ) then call pl % vh2vb ( cb ) pl % lfirst = . false . end if call pl % lindrift ( cb , dth , lbeg = . true .) call pl % kick ( system , param , t , dth , lbeg = . true .) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % drift ( system , param , dt ) call pl % kick ( system , param , t + dt , dth , lbeg = . false .) if ( param % lgr ) call pl % gr_pos_kick ( param , dth ) call pl % lindrift ( cb , dth , lbeg = . false .) call pl % vb2vh ( cb ) end select end associate return end subroutine helio_step_pl module subroutine helio_step_tp ( self , system , param , t , dt ) !! author: David A. Minton !! !! Step active test particles ahead using Democratic Heliocentric method !! !! Adapted from David E. Kaufmann's Swifter routine helio_step_tp.f90 !! Adapted from Hal Levison's Swift routine helio_step_tp.f implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals real ( DP ) :: dth !! Half step size if ( self % nbody == 0 ) return associate ( tp => self ) select type ( cb => system % cb ) class is ( helio_cb ) dth = 0.5_DP * dt if ( tp % lfirst ) then call tp % vh2vb ( vbcb = - cb % ptbeg ) tp % lfirst = . false . end if call tp % lindrift ( cb , dth , lbeg = . true .) call tp % kick ( system , param , t , dth , lbeg = . true .) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % drift ( system , param , dt ) call tp % kick ( system , param , t + dt , dth , lbeg = . false .) if ( param % lgr ) call tp % gr_pos_kick ( param , dth ) call tp % lindrift ( cb , dth , lbeg = . false .) call tp % vb2vh ( vbcb = - cb % ptend ) end select end associate return end subroutine helio_step_tp end submodule s_helio_step","tags":"","loc":"sourcefile/helio_step.f90.html"},{"title":"helio_setup.f90 – swiftest","text":"This file depends on sourcefile~~helio_setup.f90~~EfferentGraph sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_setup Source Code helio_setup.f90 Source Code submodule ( helio_classes ) s_helio_setup use swiftest contains module subroutine helio_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize a Helio nbody system from files, converting all heliocentric quantities to barycentric. !! implicit none ! Arguments class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters call whm_setup_initialize_system ( self , param ) call self % pl % h2b ( self % cb ) call self % tp % h2b ( self % cb ) call self % pl % sort ( \"mass\" , ascending = . false .) call self % pl % index ( param ) return end subroutine helio_setup_initialize_system end submodule s_helio_setup","tags":"","loc":"sourcefile/helio_setup.f90.html"},{"title":"helio_gr.f90 – swiftest","text":"This file depends on sourcefile~~helio_gr.f90~~EfferentGraph sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_gr Source Code helio_gr.f90 Source Code submodule ( helio_classes ) s_helio_gr use swiftest contains module pure subroutine helio_gr_kick_getacch_pl ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of massive bodies !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: suma real ( DP ), dimension (:, :), allocatable :: aj real ( DP ) :: beta , rjmag4 if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) call gr_kick_getacch ( pl % mu , pl % xh , pl % lmask , npl , param % inv_c2 , pl % agr ) pl % ah (:, 1 : npl ) = pl % ah (:, 1 : npl ) + pl % agr (:, 1 : npl ) end associate return end subroutine helio_gr_kick_getacch_pl module pure subroutine helio_gr_kick_getacch_tp ( self , param ) !! author: David A. Minton !! !! Compute relativisitic accelerations of test particles !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_helio_kick_getacch.f90 implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: rjmag4 , beta if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) call gr_kick_getacch ( tp % mu , tp % xh , tp % lmask , ntp , param % inv_c2 , tp % agr ) tp % ah (:, 1 : ntp ) = tp % ah (:, 1 : ntp ) + tp % agr (:, 1 : ntp ) end associate return end subroutine helio_gr_kick_getacch_tp module pure subroutine helio_gr_p4_pl ( self , param , dt ) !! author: David A. Minton !! !! Position kick to massive bodies due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) do concurrent ( i = 1 : npl , pl % lmask ( i )) call gr_p4_pos_kick ( param , pl % xh (:, i ), pl % vb (:, i ), dt ) end do end associate return end subroutine helio_gr_p4_pl module pure subroutine helio_gr_p4_tp ( self , param , dt ) !! author: David A. Minton !! !! Position kick to test particles due to p**4 term in the post-Newtonian correction !!    Based on Saha & Tremaine (1994) Eq. 28 !! !! Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) call gr_p4_pos_kick ( param , tp % xh (:, i ), tp % vb (:, i ), dt ) end do end associate return end subroutine helio_gr_p4_tp end submodule s_helio_gr","tags":"","loc":"sourcefile/helio_gr.f90.html"},{"title":"helio_kick.f90 – swiftest","text":"This file depends on sourcefile~~helio_kick.f90~~EfferentGraph sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_kick Source Code helio_kick.f90 Source Code submodule ( helio_classes ) s_helio_kick use swiftest contains module subroutine helio_kick_getacch_pl ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch.f90 !! Adapted from Hal Levison's Swift routine helio_kick_getacch.f implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step if ( self % nbody == 0 ) return associate ( cb => system % cb , pl => self , npl => self % nbody ) call pl % accel_int () if ( param % loblatecb ) then call pl % accel_obl ( system ) if ( lbeg ) then cb % aoblbeg = cb % aobl else cb % aoblend = cb % aobl end if if ( param % ltides ) then call pl % accel_tides ( system ) if ( lbeg ) then cb % atidebeg = cb % atide else cb % atideend = cb % atide end if end if end if if ( param % lextra_force ) call pl % accel_user ( system , param , t , lbeg ) if ( param % lgr ) call pl % accel_gr ( param ) end associate return end subroutine helio_kick_getacch_pl module subroutine helio_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of test particles !! !! Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_tp.f90 !! Adapted from Hal Levison's Swift routine helio_kick_getacch_tp.f implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step if ( self % nbody == 0 ) return associate ( tp => self , cb => system % cb , pl => system % pl , npl => system % pl % nbody ) system % lbeg = lbeg if ( system % lbeg ) then call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xbeg (:, 1 : npl ), npl ) else call tp % accel_int ( pl % Gmass ( 1 : npl ), pl % xend (:, 1 : npl ), npl ) end if if ( param % loblatecb ) call tp % accel_obl ( system ) if ( param % lextra_force ) call tp % accel_user ( system , param , t , lbeg ) if ( param % lgr ) call tp % accel_gr ( param ) end associate return end subroutine helio_kick_getacch_tp module subroutine helio_kick_vb_pl ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick barycentric velocities of bodies !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f !! Adapted from David E. Kaufmann's Swifter routine helio_kick_vb.f90 implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) pl % ah (:, 1 : npl ) = 0.0_DP call pl % accel ( system , param , t , lbeg ) if ( lbeg ) then call pl % set_beg_end ( xbeg = pl % xh ) else call pl % set_beg_end ( xend = pl % xh ) end if do concurrent ( i = 1 : npl , pl % lmask ( i )) pl % vb ( 1 , i ) = pl % vb ( 1 , i ) + pl % ah ( 1 , i ) * dt pl % vb ( 2 , i ) = pl % vb ( 2 , i ) + pl % ah ( 2 , i ) * dt pl % vb ( 3 , i ) = pl % vb ( 3 , i ) + pl % ah ( 3 , i ) * dt end do end associate return end subroutine helio_kick_vb_pl module subroutine helio_kick_vb_tp ( self , system , param , t , dt , lbeg ) !! author: David A. Minton !! !! Kick barycentric velocities of bodies !! !! Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f !! Adapted from David E. Kaufmann's Swifter routine helio_kick_vb_tp.f90 implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. ! Internals integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) tp % ah (:, 1 : ntp ) = 0.0_DP call tp % accel ( system , param , t , lbeg ) do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % vb (:, i ) = tp % vb (:, i ) + tp % ah (:, i ) * dt end do end associate return end subroutine helio_kick_vb_tp end submodule s_helio_kick","tags":"","loc":"sourcefile/helio_kick.f90.html"},{"title":"helio_drift.f90 – swiftest","text":"This file depends on sourcefile~~helio_drift.f90~~EfferentGraph sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_helio_drift Source Code helio_drift.f90 Source Code submodule ( helio_classes ) s_helio_drift use swiftest contains module subroutine helio_drift_body ( self , system , param , dt ) !! author: David A. Minton !! !! Loop through bodies and call Danby drift routine on democratic heliocentric coordinates !! !! Adapted from David E. Kaufmann's Swifter routine helio_drift.f90 !! Adapted from Hal Levison's Swift routine drift.f implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals integer ( I4B ) :: i !! Loop counter real ( DP ) :: rmag , vmag2 , energy integer ( I4B ), dimension (:), allocatable :: iflag !! Vectorized error code flag real ( DP ), dimension (:), allocatable :: dtp , mu if ( self % nbody == 0 ) return associate ( n => self % nbody ) allocate ( iflag ( n )) iflag (:) = 0 allocate ( mu ( n )) mu (:) = system % cb % Gmass call drift_all ( mu , self % xh , self % vb , self % nbody , param , dt , self % lmask , iflag ) if ( any ( iflag ( 1 : n ) /= 0 )) then where ( iflag ( 1 : n ) /= 0 ) self % status ( 1 : n ) = DISCARDED_DRIFTERR do i = 1 , n if ( iflag ( i ) /= 0 ) write ( * , * ) \" Body \" , self % id ( i ), \" lost due to error in Danby drift\" end do end if end associate return end subroutine helio_drift_body module subroutine helio_drift_pl ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a helio_pl structure implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize call helio_drift_body ( self , system , param , dt ) return end subroutine helio_drift_pl module subroutine helio_drift_tp ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a helio_pl structure implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize call helio_drift_body ( self , system , param , dt ) return end subroutine helio_drift_tp module subroutine helio_drift_linear_pl ( self , cb , dt , lbeg ) !! author: David A. Minton !! !! Perform linear drift of massive bodies due to barycentric momentum of Sun !! !! Adapted from David E. Kaufmann's Swifter routine helio_lindrift.f90 !! Adapted from Hal Levison's Swift routine helio_lindrift.f implicit none ! Arguments class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( helio_cb ), intent ( inout ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step ! Internals real ( DP ), dimension ( NDIM ) :: pt !! negative barycentric velocity of the central body integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) if ( npl == 0 ) return pt ( 1 ) = sum ( pl % Gmass ( 1 : npl ) * pl % vb ( 1 , 1 : npl ), self % lmask ( 1 : npl )) pt ( 2 ) = sum ( pl % Gmass ( 1 : npl ) * pl % vb ( 2 , 1 : npl ), self % lmask ( 1 : npl )) pt ( 3 ) = sum ( pl % Gmass ( 1 : npl ) * pl % vb ( 3 , 1 : npl ), self % lmask ( 1 : npl )) pt (:) = pt (:) / cb % Gmass do concurrent ( i = 1 : npl , self % lmask ( i )) pl % xh (:, i ) = pl % xh (:, i ) + pt (:) * dt end do if ( lbeg ) then cb % ptbeg = pt (:) else cb % ptend = pt (:) end if end associate return end subroutine helio_drift_linear_pl module subroutine helio_drift_linear_tp ( self , cb , dt , lbeg ) !! author: David A. Minton !! !! Perform linear drift of test particles due to barycentric momentum of Sun !! New vectorized version included !! !! Adapted from David E. Kaufmann's Swifter routine helio_lindrift_tp.f90 !! Adapted from Hal Levison's Swift routine helio_lindrift_tp.f implicit none ! Arguments class ( helio_tp ), intent ( inout ) :: self !! Helio test particleb object class ( helio_cb ), intent ( in ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step ! Internals real ( DP ), dimension ( NDIM ) :: pt !! negative barycentric velocity of the central body if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) if ( ntp == 0 ) return if ( lbeg ) then pt (:) = cb % ptbeg else pt (:) = cb % ptend end if where ( self % lmask ( 1 : ntp )) tp % xh ( 1 , 1 : ntp ) = tp % xh ( 1 , 1 : ntp ) + pt ( 1 ) * dt tp % xh ( 2 , 1 : ntp ) = tp % xh ( 2 , 1 : ntp ) + pt ( 2 ) * dt tp % xh ( 3 , 1 : ntp ) = tp % xh ( 3 , 1 : ntp ) + pt ( 3 ) * dt end where end associate return end subroutine helio_drift_linear_tp end submodule s_helio_drift","tags":"","loc":"sourcefile/helio_drift.f90.html"},{"title":"io.f90 – swiftest","text":"This file depends on sourcefile~~io.f90~~EfferentGraph sourcefile~io.f90 io.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~io.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_io Source Code io.f90 Source Code submodule ( swiftest_classes ) s_io use swiftest contains module subroutine io_conservation_report ( self , param , lterminal ) !! author: The Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Reports the current state of energy, mass, and angular momentum conservation in a run implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Input colleciton of user-defined parameters logical , intent ( in ) :: lterminal !! Indicates whether to output information to the terminal screen ! Internals real ( DP ), dimension ( NDIM ) :: Ltot_now , Lorbit_now , Lspin_now real ( DP ) :: ke_orbit_now , ke_spin_now , pe_now , Eorbit_now real ( DP ) :: Eorbit_error , Etotal_error , Ecoll_error real ( DP ) :: GMtot_now real ( DP ) :: Lerror , Merror character ( len = STRMAX ) :: errmsg character ( len =* ), parameter :: EGYFMT = '(ES23.16,10(\",\",ES23.16,:))' ! Format code for all simulation output character ( len =* ), parameter :: EGYHEADER = '(\"t,Eorbit,Ecollisions,Lx,Ly,Lz,Mtot\")' integer ( I4B ), parameter :: EGYIU = 72 character ( len =* ), parameter :: EGYTERMFMT = '(\"  DL/L0 = \", ES12.5 & \"; DEcollisions/|E0| = \", ES12.5, & \"; D(Eorbit+Ecollisions)/|E0| = \", ES12.5, & \"; DM/M0 = \", ES12.5)' associate ( system => self , pl => self % pl , cb => self % cb , npl => self % pl % nbody ) if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE ) . and . ( param % energy_out /= \"\" )) then if ( param % lfirstenergy . and . ( param % out_stat /= \"OLD\" )) then open ( unit = EGYIU , file = param % energy_out , form = \"formatted\" , status = \"replace\" , action = \"write\" , err = 667 , iomsg = errmsg ) write ( EGYIU , EGYHEADER , err = 667 , iomsg = errmsg ) else open ( unit = EGYIU , file = param % energy_out , form = \"formatted\" , status = \"old\" , action = \"write\" , position = \"append\" , err = 667 , iomsg = errmsg ) end if end if call pl % vb2vh ( cb ) call pl % xh2xb ( cb ) call system % get_energy_and_momentum ( param ) ke_orbit_now = system % ke_orbit ke_spin_now = system % ke_spin pe_now = system % pe Lorbit_now (:) = system % Lorbit (:) Lspin_now (:) = system % Lspin (:) Eorbit_now = ke_orbit_now + ke_spin_now + pe_now Ltot_now (:) = system % Ltot (:) + param % Lescape (:) GMtot_now = system % GMtot + param % GMescape if ( param % lfirstenergy ) then param % Eorbit_orig = Eorbit_now param % GMtot_orig = GMtot_now param % Lorbit_orig (:) = Lorbit_now (:) param % Lspin_orig (:) = Lspin_now (:) param % Ltot_orig (:) = Ltot_now (:) param % lfirstenergy = . false . end if if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE ) . and . ( param % energy_out /= \"\" )) then write ( EGYIU , EGYFMT , err = 667 , iomsg = errmsg ) param % t , Eorbit_now , param % Ecollisions , Ltot_now , GMtot_now close ( EGYIU , err = 667 , iomsg = errmsg ) end if if (. not . param % lfirstenergy ) then Lerror = norm2 ( Ltot_now (:) - param % Ltot_orig (:)) / norm2 ( param % Ltot_orig (:)) Eorbit_error = ( Eorbit_now - param % Eorbit_orig ) / abs ( param % Eorbit_orig ) Ecoll_error = param % Ecollisions / abs ( param % Eorbit_orig ) Etotal_error = ( Eorbit_now - param % Ecollisions - param % Eorbit_orig - param % Euntracked ) / abs ( param % Eorbit_orig ) Merror = ( GMtot_now - param % GMtot_orig ) / param % GMtot_orig if ( lterminal ) write ( * , EGYTERMFMT ) Lerror , Ecoll_error , Etotal_error , Merror if ( abs ( Merror ) > 100 * epsilon ( Merror )) then write ( * , * ) \"Severe error! Mass not conserved! Halting!\" call pl % xv2el ( cb ) call param % nciu % open ( param ) call self % write_hdr ( param % nciu , param ) call cb % write_frame ( param % nciu , param ) call pl % write_frame ( param % nciu , param ) call param % nciu % close ( param ) call util_exit ( FAILURE ) end if end if end associate return 667 continue write ( * , * ) \"Error writing energy and momentum tracking file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_conservation_report module subroutine io_dump_param ( self , param_file_name ) !! author: David A. Minton !! !! Dump integration parameters to file !! !! Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90 !! Adapted from Martin Duncan's Swift routine io_dump_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: self !! Output collection of parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of output file character ( STRMAX ) :: errmsg !! Error message in UDIO procedure integer ( I4B ) :: ierr open ( unit = LUN , file = param_file_name , status = 'replace' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) !! todo: Currently this procedure does not work in user-defined derived-type input mode !!    due to compiler incompatabilities !write(LUN,'(DT)') param call self % writer ( LUN , iotype = \"none\" , v_list = [ 0 ], iostat = ierr , iomsg = errmsg ) if ( ierr == 0 ) then close ( LUN , err = 667 , iomsg = errmsg ) return end if 667 continue write ( * , * ) \"Error opening parameter dump file \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_param module subroutine io_dump_particle_info ( self , iu ) !! author: David A. Minton !! !! Reads in particle information object information from an open file unformatted file implicit none ! Arguments class ( swiftest_particle_info ), intent ( in ) :: self !! Particle metadata information object integer ( I4B ), intent ( in ) :: iu !! Open file unit number ! Internals character ( STRMAX ) :: errmsg write ( iu , err = 667 , iomsg = errmsg ) self % name write ( iu , err = 667 , iomsg = errmsg ) self % particle_type write ( iu , err = 667 , iomsg = errmsg ) self % origin_type write ( iu , err = 667 , iomsg = errmsg ) self % origin_time write ( iu , err = 667 , iomsg = errmsg ) self % origin_xh (:) write ( iu , err = 667 , iomsg = errmsg ) self % origin_vh (:) return 667 continue write ( * , * ) \"Error writing particle metadata information from file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_particle_info module subroutine io_dump_particle_info_base ( self , param , idx ) !! author: David A. Minton !! !! Dumps the particle information data to a file. !! Pass a list of array indices for test particles (tpidx) and/or massive bodies (plidx) to append implicit none ! Arguments class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object (can be cb, pl, or tp) class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ), dimension (:), optional , intent ( in ) :: idx !! Array of test particle indices to append to the particle file ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: LUN = 22 integer ( I4B ) :: i character ( STRMAX ) :: errmsg !if ((param%out_type == REAL4_TYPE) .or. (param%out_type == REAL8_TYPE)) then if ( lfirst ) then select case ( param % out_stat ) case ( 'APPEND' ) open ( unit = LUN , file = param % particle_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'UNKNOWN' , 'REPLACE' ) open ( unit = LUN , file = param % particle_out , status = param % out_stat , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . else open ( unit = LUN , file = param % particle_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) end if select type ( self ) class is ( swiftest_cb ) write ( LUN , err = 667 , iomsg = errmsg ) self % id call self % info % dump ( LUN ) class is ( swiftest_body ) if ( present ( idx )) then do i = 1 , size ( idx ) write ( LUN , err = 667 , iomsg = errmsg ) self % id ( idx ( i )) call self % info ( idx ( i ))% dump ( LUN ) end do else do i = 1 , self % nbody write ( LUN , err = 667 , iomsg = errmsg ) self % id ( i ) call self % info ( i )% dump ( LUN ) end do end if end select close ( unit = LUN , err = 667 , iomsg = errmsg ) !else if ((param%out_type == NETCDF_FLOAT_TYPE) .or. (param%out_type == NETCDF_DOUBLE_TYPE)) then if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call param % nciu % open ( param ) call self % write_particle_info ( param % nciu ) call param % nciu % close ( param ) end if return 667 continue write ( * , * ) \"Error reading central body file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_particle_info_base module subroutine io_dump_base ( self , param ) !! author: David A. Minton !! !! Dump massive body data to files !! !! Adapted from David E. Kaufmann's Swifter routine: io_dump_pl.f90 and io_dump_tp.f90 !! Adapted from Hal Levison's Swift routine io_dump_pl.f and io_dump_tp.f implicit none ! Arguments class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: ierr !! Error code integer ( I4B ), parameter :: LUN = 7 !! Unit number for dump file integer ( I4B ) :: iu = LUN character ( len = :), allocatable :: dump_file_name character ( STRMAX ) :: errmsg select type ( self ) class is ( swiftest_cb ) dump_file_name = trim ( adjustl ( param % incbfile )) class is ( swiftest_pl ) dump_file_name = trim ( adjustl ( param % inplfile )) class is ( swiftest_tp ) dump_file_name = trim ( adjustl ( param % intpfile )) end select open ( unit = iu , file = dump_file_name , form = \"UNFORMATTED\" , status = 'replace' , err = 667 , iomsg = errmsg ) select type ( self ) class is ( swiftest_body ) write ( iu , err = 667 , iomsg = errmsg ) self % nbody call io_write_frame_body ( self , iu , param ) class is ( swiftest_cb ) call io_write_frame_cb ( self , iu , param ) end select close ( iu , err = 667 , iomsg = errmsg ) return 667 continue write ( * , * ) \"Error dumping body data to file \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_dump_base module subroutine io_dump_system ( self , param ) !! author: David A. Minton !! !! Dumps the state of the system to files in case the simulation is interrupted. !! As a safety mechanism, there are two dump files that are written in alternating order !! so that if a dump file gets corrupted during writing, the user can restart from the older one. implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals class ( swiftest_parameters ), allocatable :: dump_param !! Local parameters variable used to parameters change input file names !! to dump file-specific values without changing the user-defined values integer ( I4B ), save :: idx = 1 !! Index of current dump file. Output flips between 2 files for extra security !! in case the program halts during writing character ( len = :), allocatable :: param_file_name real ( DP ) :: tfrac character ( * ), parameter :: statusfmt = '(\"Time = \", ES12.5, \"; fraction done = \", F6.3, \"; Number of active pl, tp = \", I5, \", \", I5)' character ( * ), parameter :: symbastatfmt = '(\"Time = \", ES12.5, \"; fraction done = \", F6.3, \"; Number of active plm, pl, tp = \", I5, \", \", I5, \", \", I5)' logical , save :: lfirst = . true . if ( lfirst ) then lfirst = . false . if ( param % lenergy ) call self % conservation_report ( param , lterminal = . false .) else allocate ( dump_param , source = param ) param_file_name = trim ( adjustl ( DUMP_PARAM_FILE ( idx ))) dump_param % incbfile = trim ( adjustl ( DUMP_CB_FILE ( idx ))) dump_param % inplfile = trim ( adjustl ( DUMP_PL_FILE ( idx ))) dump_param % intpfile = trim ( adjustl ( DUMP_TP_FILE ( idx ))) dump_param % in_form = XV dump_param % out_stat = 'APPEND' dump_param % in_type = REAL8_TYPE dump_param % T0 = param % t call dump_param % dump ( param_file_name ) dump_param % out_form = XV call self % cb % dump ( dump_param ) call self % pl % dump ( dump_param ) call self % tp % dump ( dump_param ) idx = idx + 1 if ( idx > NDUMPFILES ) idx = 1 tfrac = ( param % t - param % t0 ) / ( param % tstop - param % t0 ) select type ( pl => self % pl ) class is ( symba_pl ) write ( * , symbastatfmt ) param % t , tfrac , pl % nplm , pl % nbody , self % tp % nbody class default write ( * , statusfmt ) param % t , tfrac , pl % nbody , self % tp % nbody end select end if return end subroutine io_dump_system module function io_get_args ( integrator , param_file_name ) result ( ierr ) !! author: David A. Minton !! !! Reads in the name of the parameter file from command line arguments. implicit none ! Arguments integer ( I4B ) :: integrator !! Symbolic code of the requested integrator character ( len = :), allocatable :: param_file_name !! Name of the input parameters file ! Result integer ( I4B ) :: ierr !! I/O error code ! Internals character ( len = STRMAX ) :: arg1 , arg2 integer :: narg , ierr_arg1 , ierr_arg2 character ( len =* ), parameter :: linefmt = '(A)' ierr = - 1 ! Default is to fail narg = command_argument_count () ! if ( narg == 2 ) then call get_command_argument ( 1 , arg1 , status = ierr_arg1 ) call get_command_argument ( 2 , arg2 , status = ierr_arg2 ) if (( ierr_arg1 == 0 ) . and . ( ierr_arg2 == 0 )) then ierr = 0 call io_toupper ( arg1 ) select case ( arg1 ) case ( 'BS' ) integrator = BS case ( 'HELIO' ) integrator = HELIO case ( 'RA15' ) integrator = RA15 case ( 'TU4' ) integrator = TU4 case ( 'WHM' ) integrator = WHM case ( 'RMVS' ) integrator = RMVS case ( 'SYMBA' ) integrator = SYMBA case ( 'RINGMOONS' ) integrator = RINGMOONS case default integrator = UNKNOWN_INTEGRATOR write ( * , * ) trim ( adjustl ( arg1 )) // ' is not a valid integrator.' ierr = - 1 end select param_file_name = trim ( adjustl ( arg2 )) end if else call get_command_argument ( 1 , arg1 , status = ierr_arg1 ) if ( ierr_arg1 == 0 ) then if ( arg1 == '-v' . or . arg1 == '--version' ) then call util_version () else if ( arg1 == '-h' . or . arg1 == '--help' ) then call util_exit ( HELP ) end if end if end if if ( ierr /= 0 ) call util_exit ( USAGE ) return end function io_get_args module function io_get_old_t_final_system ( self , param ) result ( old_t_final ) !! author: David A. Minton !! !! Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. !! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( in ) :: self class ( swiftest_parameters ), intent ( in ) :: param ! Result real ( DP ) :: old_t_final ! Internals class ( swiftest_nbody_system ), allocatable :: tmpsys class ( swiftest_parameters ), allocatable :: tmpparam integer ( I4B ), parameter :: LUN = 76 integer ( I4B ) :: ierr , iu = LUN character ( len = STRMAX ) :: errmsg old_t_final = 0.0_DP allocate ( tmpsys , source = self ) allocate ( tmpparam , source = param ) ierr = 0 open ( unit = iu , file = param % outfile , status = 'OLD' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) do ierr = tmpsys % read_frame ( iu , tmpparam ) if ( ierr /= 0 ) exit end do if ( is_iostat_end ( ierr )) then old_t_final = tmpparam % t return end if 667 continue write ( * , * ) \"Error reading binary output file. \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end function io_get_old_t_final_system module function io_get_token ( buffer , ifirst , ilast , ierr ) result ( token ) !! author: David A. Minton !! !! Retrieves a character token from an input string. Here a token is defined as any set of contiguous non-blank characters not !! beginning with or containing \"!\". If \"!\" is present, any remaining part of the buffer including the \"!\" is ignored !! !! Adapted from David E. Kaufmann's Swifter routine io_get_token.f90 implicit none ! Arguments character ( len =* ), intent ( in ) :: buffer !! Input string buffer integer ( I4B ), intent ( inout ) :: ifirst !! Index of the buffer at which to start the search for a token integer ( I4B ), intent ( out ) :: ilast !! Index of the buffer at the end of the returned token integer ( I4B ), intent ( out ) :: ierr !! Error code ! Result character ( len = :), allocatable :: token !! Returned token string ! Internals integer ( I4B ) :: i , ilength ilength = len ( buffer ) if ( ifirst > ilength ) then ilast = ifirst ierr = - 1 !! Bad input token = '' return end if do i = ifirst , ilength if ( buffer ( i : i ) /= ' ' ) exit end do if (( i > ilength ) . or . ( buffer ( i : i ) == '!' )) then ifirst = i ilast = i ierr = - 2 !! No valid token token = '' return end if ifirst = i do i = ifirst , ilength if (( buffer ( i : i ) == ' ' ) . or . ( buffer ( i : i ) == '!' )) exit end do ilast = i - 1 ierr = 0 token = buffer ( ifirst : ilast ) return end function io_get_token module subroutine io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read in parameters for the integration !! Currently this procedure does not work in user-defined derived-type input mode !!    e.g. read(unit,'(DT)') param !! as the newline characters are ignored in the input file when compiled in ifort. !! !! Adapted from David E. Kaufmann's Swifter routine io_init_param.f90 !! Adapted from Martin Duncan's Swift routine io_init_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( inout ) :: self !! Collection of parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! Internals logical :: t0_set = . false . !! Is the initial time set in the input file? logical :: tstop_set = . false . !! Is the final time set in the input file? logical :: dt_set = . false . !! Is the step size set in the input file? integer ( I4B ) :: ilength , ifirst , ilast , i !! Variables used to parse input file character ( STRMAX ) :: line !! Line of the input file character ( len = :), allocatable :: line_trim , param_name , param_value !! Strings used to parse the param file character ( * ), parameter :: linefmt = '(A)' !! Format code for simple text string ! Parse the file line by line, extracting tokens then matching them up with known parameters if possible associate ( param => self ) do read ( unit = unit , fmt = linefmt , end = 1 , err = 667 , iomsg = iomsg ) line line_trim = trim ( adjustl ( line )) ilength = len ( line_trim ) if (( ilength /= 0 )) then ifirst = 1 ! Read the pair of tokens. The first one is the parameter name, the second is the value. param_name = io_get_token ( line_trim , ifirst , ilast , iostat ) if ( param_name == '' ) cycle ! No parameter name (usually because this line is commented out) call io_toupper ( param_name ) ifirst = ilast + 1 param_value = io_get_token ( line_trim , ifirst , ilast , iostat ) select case ( param_name ) case ( \"T0\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % t0 t0_set = . true . case ( \"TSTOP\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % tstop tstop_set = . true . case ( \"DT\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % dt dt_set = . true . case ( \"CB_IN\" ) param % incbfile = param_value case ( \"PL_IN\" ) param % inplfile = param_value case ( \"TP_IN\" ) param % intpfile = param_value case ( \"IN_TYPE\" ) call io_toupper ( param_value ) param % in_type = param_value case ( \"IN_FORM\" ) call io_toupper ( param_value ) param % in_form = param_value case ( \"ISTEP_OUT\" ) read ( param_value , * ) param % istep_out case ( \"BIN_OUT\" ) param % outfile = param_value case ( \"OUT_TYPE\" ) call io_toupper ( param_value ) param % out_type = param_value case ( \"OUT_FORM\" ) call io_toupper ( param_value ) param % out_form = param_value case ( \"OUT_STAT\" ) call io_toupper ( param_value ) param % out_stat = param_value case ( \"ISTEP_DUMP\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % istep_dump case ( \"CHK_CLOSE\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lclose = . true . case ( \"CHK_RMIN\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % rmin case ( \"CHK_RMAX\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % rmax case ( \"CHK_EJECT\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % rmaxu case ( \"CHK_QMIN\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % qmin case ( \"CHK_QMIN_COORD\" ) call io_toupper ( param_value ) param % qmin_coord = param_value case ( \"CHK_QMIN_RANGE\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % qmin_alo ifirst = ilast + 1 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % qmin_ahi case ( \"ENC_OUT\" ) param % enc_out = param_value case ( \"DISCARD_OUT\" ) param % discard_out = param_value case ( \"ENERGY_OUT\" ) param % energy_out = param_value case ( \"EXTRA_FORCE\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lextra_force = . true . case ( \"BIG_DISCARD\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lbig_discard = . true . case ( \"RHILL_PRESENT\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lrhill_present = . true . case ( \"MU2KG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % MU2KG case ( \"TU2S\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % TU2S case ( \"DU2M\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % DU2M case ( \"ENERGY\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lenergy = . true . case ( \"GR\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lgr = . true . case ( \"ROTATION\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % lrotation = . true . case ( \"TIDES\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == 'T' ) param % ltides = . true . case ( \"FIRSTKICK\" ) call io_toupper ( param_value ) if ( param_value == \"NO\" . or . param_value == 'F' ) param % lfirstkick = . false . case ( \"FIRSTENERGY\" ) call io_toupper ( param_value ) if ( param_value == \"NO\" . or . param_value == 'F' ) param % lfirstenergy = . false . case ( \"EORBIT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Eorbit_orig case ( \"GMTOT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % GMtot_orig case ( \"LTOT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Ltot_orig ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Ltot_orig ( i ) end do case ( \"LORBIT_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lorbit_orig ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lorbit_orig ( i ) end do case ( \"LSPIN_ORIG\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lspin_orig ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lspin_orig ( i ) end do case ( \"LESCAPE\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lescape ( 1 ) do i = 2 , NDIM ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Lescape ( i ) end do case ( \"GMESCAPE\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % GMescape case ( \"ECOLLISIONS\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Ecollisions case ( \"EUNTRACKED\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % Euntracked case ( \"MAXID\" ) read ( param_value , * , err = 667 , iomsg = iomsg ) param % maxid case ( \"PARTICLE_OUT\" ) param % particle_out = param_value case ( \"NPLMAX\" , \"NTPMAX\" , \"GMTINY\" , \"MIN_GMFRAG\" , \"FRAGMENTATION\" , \"SEED\" , \"YARKOVSKY\" , \"YORP\" ) ! Ignore SyMBA-specific, not-yet-implemented, or obsolete input parameters case default write ( * , * ) \"Unknown parameter -> \" , param_name iostat = - 1 return end select end if end do 1 continue iostat = 0 !! Do basic sanity checks on the input values if ((. not . t0_set ) . or . (. not . tstop_set ) . or . (. not . dt_set )) then write ( iomsg , * ) 'Valid simulation time not set' iostat = - 1 return end if if ( param % dt <= 0.0_DP ) then write ( iomsg , * ) 'Invalid timestep: ' iostat = - 1 return end if if ( param % inplfile == \"\" ) then write ( iomsg , * ) 'No valid massive body file in input file' iostat = - 1 return end if if (( param % in_type /= REAL8_TYPE ) . and . ( param % in_type /= \"ASCII\" )) then write ( iomsg , * ) 'Invalid input file type:' , trim ( adjustl ( param % in_type )) iostat = - 1 return end if if (( param % istep_out <= 0 ) . and . ( param % istep_dump <= 0 )) then write ( iomsg , * ) 'Invalid istep' iostat = - 1 return end if if (( param % istep_out > 0 ) . and . ( param % outfile == \"\" )) then write ( iomsg , * ) 'Invalid outfile' iostat = - 1 return end if param % lrestart = ( param % out_stat == \"APPEND\" ) if ( param % outfile /= \"\" ) then if (( param % out_type /= REAL4_TYPE ) . and . ( param % out_type /= REAL8_TYPE ) . and . & ( param % out_type /= NETCDF_FLOAT_TYPE ) . and . ( param % out_type /= NETCDF_DOUBLE_TYPE )) then write ( iomsg , * ) 'Invalid out_type: ' , trim ( adjustl ( param % out_type )) iostat = - 1 return end if if (( param % out_form /= \"EL\" ) . and . ( param % out_form /= \"XV\" ) . and . ( param % out_form /= \"XVEL\" )) then write ( iomsg , * ) 'Invalid out_form: ' , trim ( adjustl ( param % out_form )) iostat = - 1 return end if if (( param % out_stat /= \"NEW\" ) . and . ( param % out_stat /= \"REPLACE\" ) . and . ( param % out_stat /= \"APPEND\" ) . and . ( param % out_stat /= \"UNKNOWN\" )) then write ( iomsg , * ) 'Invalid out_stat: ' , trim ( adjustl ( param % out_stat )) iostat = - 1 return end if end if if ( param % qmin > 0.0_DP ) then if (( param % qmin_coord /= \"HELIO\" ) . and . ( param % qmin_coord /= \"BARY\" )) then write ( iomsg , * ) 'Invalid qmin_coord: ' , trim ( adjustl ( param % qmin_coord )) iostat = - 1 return end if if (( param % qmin_alo <= 0.0_DP ) . or . ( param % qmin_ahi <= 0.0_DP )) then write ( iomsg , * ) 'Invalid qmin vals' iostat = - 1 return end if end if if ( param % ltides . and . . not . param % lrotation ) then write ( iomsg , * ) 'Tides require rotation to be turned on' iostat = - 1 return end if write ( * , * ) \"T0             = \" , param % t0 write ( * , * ) \"TSTOP          = \" , param % tstop write ( * , * ) \"DT             = \" , param % dt write ( * , * ) \"CB_IN          = \" , trim ( adjustl ( param % incbfile )) write ( * , * ) \"PL_IN          = \" , trim ( adjustl ( param % inplfile )) write ( * , * ) \"TP_IN          = \" , trim ( adjustl ( param % intpfile )) write ( * , * ) \"IN_TYPE        = \" , trim ( adjustl ( param % in_type )) write ( * , * ) \"ISTEP_OUT      = \" , param % istep_out write ( * , * ) \"BIN_OUT        = \" , trim ( adjustl ( param % outfile )) write ( * , * ) \"OUT_TYPE       = \" , trim ( adjustl ( param % out_type )) write ( * , * ) \"OUT_FORM       = \" , trim ( adjustl ( param % out_form )) write ( * , * ) \"IN_FORM        = \" , trim ( adjustl ( param % in_form )) write ( * , * ) \"OUT_STAT       = \" , trim ( adjustl ( param % out_stat )) write ( * , * ) \"ISTEP_DUMP     = \" , param % istep_dump write ( * , * ) \"CHK_CLOSE      = \" , param % lclose if ( param % rmin > 0.0 ) then write ( * , * ) \"CHK_RMIN       = \" , param % rmin else write ( * , * ) \"! CHK_RMIN value will be the central body radius\" end if if ( param % rmax > 0.0_DP ) write ( * , * ) \"CHK_RMAX       = \" , param % rmax if ( param % rmaxu > 0.0_DP ) write ( * , * ) \"CHK_EJECT      = \" , param % rmaxu if (( param % qmin > 0.0_DP ) . or . ( param % qmin_alo > 0.0_DP ) . or . ( param % qmin_ahi > 0.0_DP )) write ( * , * ) \"CHK_QMIN_COORD = \" , trim ( adjustl ( param % qmin_coord )) if ( param % qmin > 0.0_DP ) write ( * , * ) \"CHK_QMIN       = \" , param % qmin if (( param % qmin_alo > 0.0_DP ) . or . ( param % qmin_ahi > 0.0_DP )) write ( * , * ) \"CHK_QMIN_RANGE = \" , param % qmin_alo , param % qmin_ahi write ( * , * ) \"EXTRA_FORCE    = \" , param % lextra_force write ( * , * ) \"RHILL_PRESENT  = \" , param % lrhill_present write ( * , * ) \"ROTATION      = \" , param % lrotation write ( * , * ) \"TIDES         = \" , param % ltides write ( * , * ) \"ENERGY         = \" , param % lenergy if ( param % lenergy ) write ( * , * ) \"ENERGY_OUT     = \" , trim ( adjustl ( param % energy_out )) write ( * , * ) \"MU2KG          = \" , param % MU2KG write ( * , * ) \"TU2S           = \" , param % TU2S write ( * , * ) \"DU2M           = \" , param % DU2M if ( trim ( adjustl ( param % outfile )) == \"\" ) then param % outfile = BIN_OUTFILE end if if ( trim ( adjustl ( param % enc_out )) /= \"\" ) then write ( * , * ) \"ENC_OUT        = \" , trim ( adjustl ( param % enc_out )) else write ( * , * ) \"! ENC_OUT not set: Encounters will not be recorded to file\" end if if ( trim ( adjustl ( param % discard_out )) /= \"\" ) then write ( * , * ) \"DISCARD_OUT    = \" , trim ( adjustl ( param % discard_out )) write ( * , * ) \"BIG_DISCARD    = \" , param % lbig_discard else write ( * , * ) \"! DISCARD_OUT not set: Discards will not be recorded to file\" param % lbig_discard = . false . write ( * , * ) \"! BIG_DISCARD    = \" , param % lbig_discard end if if (( param % MU2KG < 0.0_DP ) . or . ( param % TU2S < 0.0_DP ) . or . ( param % DU2M < 0.0_DP )) then write ( iomsg , * ) 'Invalid unit conversion factor' iostat = - 1 return end if ! Calculate the G for the system units param % GU = GC / ( param % DU2M ** 3 / ( param % MU2KG * param % TU2S ** 2 )) if ( param % lgr ) then ! Calculate the inverse speed of light in the system units param % inv_c2 = einsteinC * param % TU2S / param % DU2M param % inv_c2 = ( param % inv_c2 ) ** ( - 2 ) end if associate ( integrator => v_list ( 1 )) if (( integrator == RMVS ) . or . ( integrator == SYMBA )) then if (. not . param % lclose ) then write ( iomsg , * ) 'This integrator requires CHK_CLOSE to be enabled.' iostat = - 1 return end if end if ! Determine if the GR flag is set correctly for this integrator select case ( integrator ) case ( WHM , RMVS , HELIO , SYMBA ) write ( * , * ) \"GR             = \" , param % lgr case default if ( param % lgr ) write ( iomsg , * ) 'GR is not yet implemented for this integrator. This parameter will be ignored.' param % lgr = . false . end select end associate iostat = 0 end associate 667 continue return end subroutine io_param_reader module subroutine io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) !! author: David A. Minton !! !! Dump integration parameters to file !! !! Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90 !! Adapted from Martin Duncan's Swift routine io_dump_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: self !! Collection of parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! Not used in this procedure integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! Internals character ( * ), parameter :: Ifmt = '(I0)' !! Format label for integer values character ( * ), parameter :: Rfmt = '(ES25.17)' !! Format label for real values character ( * ), parameter :: Lfmt = '(L1)' !! Format label for logical values character ( len = NAMELEN ) :: param_name character ( LEN = STRMAX ) :: param_value , v1 , v2 , v3 type character_array character ( 25 ) :: value end type character_array type ( character_array ), dimension (:), allocatable :: param_array integer ( I4B ) :: i associate ( param => self ) write ( param_name , * ) \"T0\" ; write ( param_value , Rfmt ) param % t0 ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TSTOP\" ; write ( param_value , Rfmt ) param % tstop ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"DT\" ; write ( param_value , Rfmt ) param % dt ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CB_IN\" ; write ( param_value , * ) trim ( adjustl ( param % incbfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"PL_IN\" ; write ( param_value , * ) trim ( adjustl ( param % inplfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TP_IN\" ; write ( param_value , * ) trim ( adjustl ( param % intpfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"IN_TYPE\" ; write ( param_value , * ) trim ( adjustl ( param % in_type )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"IN_FORM\" ; write ( param_value , * ) trim ( adjustl ( param % in_form )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % istep_dump > 0 ) write ( param_name , * ) \"ISTEP_DUMP\" ; write ( param_value , Ifmt ) param % istep_dump ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % istep_out > 0 ) then write ( param_name , * ) \"ISTEP_OUT\" ; write ( param_value , Ifmt ) param % istep_out ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"BIN_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % outfile )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"OUT_TYPE\" ; write ( param_value , * ) trim ( adjustl ( param % out_type )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"OUT_FORM\" ; write ( param_value , * ) trim ( adjustl ( param % out_form )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"OUT_STAT\" ; write ( param_value , * ) \"APPEND\" ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"PARTICLE_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % particle_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % enc_out /= \"\" ) then write ( param_name , * ) \"ENC_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % enc_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"CHK_RMIN\" ; write ( param_value , Rfmt ) param % rmin ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CHK_RMAX\" ; write ( param_value , Rfmt ) param % rmax ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CHK_EJECT\" ; write ( param_value , Rfmt ) param % rmaxu ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"CHK_QMIN\" ; write ( param_value , Rfmt ) param % qmin ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % qmin >= 0.0_DP ) then write ( param_name , * ) \"CHK_QMIN_COORD\" ; write ( param_value , * ) trim ( adjustl ( param % qmin_coord )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) allocate ( param_array ( 2 )) write ( param_array ( 1 )% value , Rfmt ) param % qmin_alo write ( param_array ( 2 )% value , Rfmt ) param % qmin_ahi write ( param_name , * ) \"CHK_QMIN_RANGE\" ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ), adjustl ( param_array ( 1 )% value ), adjustl ( param_array ( 2 )% value ) end if write ( param_name , * ) \"MU2KG\" ; write ( param_value , Rfmt ) param % MU2KG ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TU2S\" ; write ( param_value , Rfmt ) param % TU2S ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"DU2M\" ; write ( param_value , Rfmt ) param % DU2M ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"RHILL_PRESENT\" ; write ( param_value , Lfmt ) param % lrhill_present ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"EXTRA_FORCE\" ; write ( param_value , Lfmt ) param % lextra_force ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % discard_out /= \"\" ) then write ( param_name , * ) \"DISCARD_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % discard_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if if ( param % discard_out /= \"\" ) then write ( param_name , * ) \"BIG_DISCARD\" ; write ( param_value , Lfmt ) param % lbig_discard ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"CHK_CLOSE\" ; write ( param_value , Lfmt ) param % lclose ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"ENERGY\" ; write ( param_value , Lfmt ) param % lenergy ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % lenergy . and . ( param % energy_out /= \"\" )) then write ( param_name , * ) \"ENERGY_OUT\" ; write ( param_value , * ) trim ( adjustl ( param % energy_out )); write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"GR\" ; write ( param_value , Lfmt ) param % lgr ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"ROTATION\" ; write ( param_value , Lfmt ) param % lrotation ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"TIDES\" ; write ( param_value , Lfmt ) param % ltides ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % lenergy ) then write ( param_name , * ) \"FIRSTENERGY\" ; write ( param_value , Lfmt ) param % lfirstenergy ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"EORBIT_ORIG\" ; write ( param_value , Rfmt ) param % Eorbit_orig ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"GMTOT_ORIG\" ; write ( param_value , Rfmt ) param % GMtot_orig ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"LTOT_ORIG\" ; write ( v1 , Rfmt ) param % Ltot_orig ( 1 ); write ( v2 , Rfmt ) param % Ltot_orig ( 2 ); write ( v3 , Rfmt ) param % Ltot_orig ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"LORBIT_ORIG\" ; write ( v1 , Rfmt ) param % Lorbit_orig ( 1 ); write ( v2 , Rfmt ) param % Lorbit_orig ( 2 ); write ( v3 , Rfmt ) param % Lorbit_orig ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"LSPIN_ORIG\" ; write ( v1 , Rfmt ) param % Lspin_orig ( 1 ); write ( v2 , Rfmt ) param % Lspin_orig ( 2 ); write ( v3 , Rfmt ) param % Lspin_orig ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"LESCAPE\" ; write ( v1 , Rfmt ) param % Lescape ( 1 ); write ( v2 , Rfmt ) param % Lescape ( 2 ); write ( v3 , Rfmt ) param % Lescape ( 3 ) write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( v1 )) // \" \" // trim ( adjustl ( v2 )) // \" \" // trim ( adjustl ( v3 )) write ( param_name , * ) \"GMESCAPE\" ; write ( param_value , Rfmt ) param % GMescape ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"ECOLLISIONS\" ; write ( param_value , Rfmt ) param % Ecollisions ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"EUNTRACKED\" ; write ( param_value , Rfmt ) param % Euntracked ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) end if write ( param_name , * ) \"FIRSTKICK\" ; write ( param_value , Lfmt ) param % lfirstkick ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"MAXID\" ; write ( param_value , Ifmt ) param % maxid ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) iostat = 0 iomsg = \"UDIO not implemented\" end associate 667 continue return end subroutine io_param_writer module subroutine io_read_in_body ( self , param ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read in either test particle or massive body data !! !! Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90 and swiftest_init_tp.f90 !! Adapted from Martin Duncan's Swift routine swiftest_init_pl.f and swiftest_init_tp.f implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of input file integer ( I4B ) :: iu = LUN integer ( I4B ) :: i , nbody logical :: is_ascii , is_pl character ( len = :), allocatable :: infile real ( DP ) :: t character ( STRMAX ) :: errmsg integer ( I4B ) :: ierr ! Select the appropriate polymorphic class (test particle or massive body) select type ( self ) class is ( swiftest_pl ) infile = param % inplfile is_pl = . true . class is ( swiftest_tp ) infile = param % intpfile is_pl = . false . end select is_ascii = ( param % in_type == 'ASCII' ) select case ( param % in_type ) case ( ASCII_TYPE ) open ( unit = iu , file = infile , status = 'old' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) read ( iu , * , err = 667 , iomsg = errmsg ) nbody case ( REAL4_TYPE , REAL8_TYPE ) open ( unit = iu , file = infile , status = 'old' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) read ( iu , err = 667 , iomsg = errmsg ) nbody case default write ( errmsg , * ) trim ( adjustl ( param % in_type )) // ' is an unrecognized file type' goto 667 end select call self % setup ( nbody , param ) ierr = 0 if ( nbody > 0 ) then ierr = self % read_frame ( iu , param ) self % status (:) = ACTIVE self % lmask (:) = . true . do i = 1 , nbody call self % info ( i )% set_value ( status = \"ACTIVE\" ) end do end if close ( iu , err = 667 , iomsg = errmsg ) if ( ierr == 0 ) return 667 continue write ( * , * ) 'Error reading in initial conditions file: ' , trim ( adjustl ( errmsg )) return end subroutine io_read_in_body module subroutine io_read_in_cb ( self , param ) !! author: David A. Minton !! !! Reads in central body data !! !! Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90 !! Adapted from Martin Duncan's Swift routine swiftest_init_pl.f implicit none ! Arguments class ( swiftest_cb ), intent ( inout ) :: self class ( swiftest_parameters ), intent ( inout ) :: param ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of input file integer ( I4B ) :: iu = LUN character ( len = STRMAX ) :: errmsg integer ( I4B ) :: ierr , idold character ( len = NAMELEN ) :: name if ( param % in_type == 'ASCII' ) then self % id = 0 param % maxid = 0 open ( unit = iu , file = param % incbfile , status = 'old' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) read ( iu , * , err = 667 , iomsg = errmsg ) name call self % info % set_value ( name = name ) read ( iu , * , err = 667 , iomsg = errmsg ) self % Gmass self % mass = real ( self % Gmass / param % GU , kind = DP ) read ( iu , * , err = 667 , iomsg = errmsg ) self % radius read ( iu , * , err = 667 , iomsg = errmsg ) self % j2rp2 read ( iu , * , err = 667 , iomsg = errmsg ) self % j4rp4 if ( param % lrotation ) then read ( iu , * , err = 667 , iomsg = errmsg ) self % Ip ( 1 ), self % Ip ( 2 ), self % Ip ( 3 ) read ( iu , * , err = 667 , iomsg = errmsg ) self % rot ( 1 ), self % rot ( 2 ), self % rot ( 3 ) end if ierr = 0 else open ( unit = iu , file = param % incbfile , status = 'old' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) ierr = self % read_frame ( iu , param ) end if close ( iu , err = 667 , iomsg = errmsg ) if ( ierr == 0 ) then if ( self % j2rp2 /= 0.0_DP ) param % loblatecb = . true . if ( param % rmin < 0.0 ) param % rmin = self % radius select type ( cb => self ) class is ( symba_cb ) cb % GM0 = cb % Gmass cb % dGM = 0.0_DP cb % R0 = cb % radius cb % L0 (:) = cb % Ip ( 3 ) * cb % mass * cb % radius ** 2 * cb % rot (:) end select end if return 667 continue write ( * , * ) \"Error reading central body file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_in_cb function io_read_encounter ( t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , & xh1 , xh2 , vh1 , vh2 , enc_out , out_type ) result ( ierr ) !! author: David A. Minton !! !! Read close encounter data from input binary files !!     Other than time t, there is no direct file input from this function !!     Function returns read error status (0 = OK, nonzero = ERROR) !! Adapted from David E. Kaufmann's Swifter routine: io_read_encounter.f90 implicit none ! Arguments integer ( I4B ), intent ( out ) :: id1 , id2 real ( DP ), intent ( out ) :: t , Gmass1 , Gmass2 , radius1 , radius2 real ( DP ), dimension (:), intent ( out ) :: xh1 , xh2 , vh1 , vh2 character ( * ), intent ( in ) :: enc_out , out_type ! Result integer ( I4B ) :: ierr ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: lun = 30 integer ( I4B ), save :: iu = lun if ( lfirst ) then open ( unit = iu , file = enc_out , status = 'OLD' , form = 'UNFORMATTED' , iostat = ierr ) if ( ierr /= 0 ) then write ( * , * ) \"Swiftest Error:\" write ( * , * ) \"   unable to open binary encounter file\" call util_exit ( FAILURE ) end if lfirst = . false . end if read ( iu , iostat = ierr ) t if ( ierr /= 0 ) then close ( unit = iu , iostat = ierr ) return end if read ( iu , iostat = ierr ) id1 , xh1 ( 1 ), xh1 ( 2 ), xh1 ( 3 ), vh1 ( 1 ), vh1 ( 2 ), vh1 ( 3 ), Gmass1 , radius1 if ( ierr /= 0 ) then close ( unit = iu , iostat = ierr ) return end if read ( iu , iostat = ierr ) id2 , xh2 ( 2 ), xh2 ( 2 ), xh2 ( 3 ), vh2 ( 2 ), vh2 ( 2 ), vh2 ( 3 ), Gmass2 , radius2 if ( ierr /= 0 ) then close ( unit = iu , iostat = ierr ) return end if return end function io_read_encounter module function io_read_frame_body ( self , iu , param ) result ( ierr ) !! author: David A. Minton !! !! Reads a frame of output of either test particle or massive body data from a binary output file !! !! Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90 !! Adapted from Hal Levison's Swift routine io_read_frame.F implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Result integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful ! Internals character ( len = STRMAX ) :: errmsg character ( len = NAMELEN ), dimension ( self % nbody ) :: name integer ( I4B ) :: i real ( QP ) :: val if ( self % nbody == 0 ) return if (( param % in_form /= EL ) . and . ( param % in_form /= XV )) then write ( errmsg , * ) trim ( adjustl ( param % in_form )) // \" is not a recognized format code for input files.\" goto 667 end if associate ( n => self % nbody ) if ( param % in_form == EL ) then if (. not . allocated ( self % a )) allocate ( self % a ( n )) if (. not . allocated ( self % e )) allocate ( self % e ( n )) if (. not . allocated ( self % inc )) allocate ( self % inc ( n )) if (. not . allocated ( self % capom )) allocate ( self % capom ( n )) if (. not . allocated ( self % omega )) allocate ( self % omega ( n )) if (. not . allocated ( self % capm )) allocate ( self % capm ( n )) end if select case ( param % in_type ) case ( REAL4_TYPE , REAL8_TYPE ) read ( iu , err = 667 , iomsg = errmsg ) self % id (:) read ( iu , err = 667 , iomsg = errmsg ) name (:) do i = 1 , n call self % info ( i )% set_value ( name = name ( i )) end do select case ( param % in_form ) case ( XV ) read ( iu , err = 667 , iomsg = errmsg ) self % xh ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) self % xh ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) self % xh ( 3 , :) read ( iu , err = 667 , iomsg = errmsg ) self % vh ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) self % vh ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) self % vh ( 3 , :) case ( EL ) read ( iu , err = 667 , iomsg = errmsg ) self % a (:) read ( iu , err = 667 , iomsg = errmsg ) self % e (:) read ( iu , err = 667 , iomsg = errmsg ) self % inc (:) read ( iu , err = 667 , iomsg = errmsg ) self % capom (:) read ( iu , err = 667 , iomsg = errmsg ) self % omega (:) read ( iu , err = 667 , iomsg = errmsg ) self % capm (:) end select select type ( pl => self ) class is ( swiftest_pl ) ! Additional output if the passed polymorphic object is a massive body read ( iu , err = 667 , iomsg = errmsg ) pl % Gmass (:) pl % mass (:) = pl % Gmass (:) / param % GU if ( param % lrhill_present ) read ( iu , err = 667 , iomsg = errmsg ) pl % rhill (:) read ( iu , err = 667 , iomsg = errmsg ) pl % radius (:) if ( param % lrotation ) then read ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 3 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 1 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 2 , :) read ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 3 , :) end if if ( param % ltides ) then read ( iu , err = 667 , iomsg = errmsg ) pl % k2 (:) read ( iu , err = 667 , iomsg = errmsg ) pl % Q (:) end if end select param % maxid = max ( param % maxid , maxval ( self % id ( 1 : n ))) case ( ASCII_TYPE ) do i = 1 , n select type ( self ) class is ( swiftest_pl ) if ( param % lrhill_present ) then read ( iu , * , err = 667 , iomsg = errmsg ) name ( i ), val , self % rhill ( i ) else read ( iu , * , err = 667 , iomsg = errmsg ) name ( i ), val end if self % Gmass ( i ) = real ( val , kind = DP ) self % mass ( i ) = real ( val / param % GU , kind = DP ) read ( iu , * , err = 667 , iomsg = errmsg ) self % radius ( i ) class is ( swiftest_tp ) read ( iu , * , err = 667 , iomsg = errmsg ) name ( i ) end select call self % info ( i )% set_value ( name = name ( i )) select case ( param % in_form ) case ( XV ) read ( iu , * , err = 667 , iomsg = errmsg ) self % xh ( 1 , i ), self % xh ( 2 , i ), self % xh ( 3 , i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % vh ( 1 , i ), self % vh ( 2 , i ), self % vh ( 3 , i ) case ( EL ) read ( iu , * , err = 667 , iomsg = errmsg ) self % a ( i ), self % e ( i ), self % inc ( i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % capom ( i ), self % omega ( i ), self % capm ( i ) end select select type ( self ) class is ( swiftest_pl ) if ( param % lrotation ) then read ( iu , * , err = 667 , iomsg = errmsg ) self % Ip ( 1 , i ), self % Ip ( 2 , i ), self % Ip ( 3 , i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % rot ( 1 , i ), self % rot ( 2 , i ), self % rot ( 3 , i ) end if if ( param % ltides ) then read ( iu , * , err = 667 , iomsg = errmsg ) self % k2 ( i ) read ( iu , * , err = 667 , iomsg = errmsg ) self % Q ( i ) end if end select param % maxid = param % maxid + 1 self % id ( i ) = param % maxid end do end select if ( param % in_form == EL ) then self % inc ( 1 : n ) = self % inc ( 1 : n ) * DEG2RAD self % capom ( 1 : n ) = self % capom ( 1 : n ) * DEG2RAD self % omega ( 1 : n ) = self % omega ( 1 : n ) * DEG2RAD self % capm ( 1 : n ) = self % capm ( 1 : n ) * DEG2RAD end if end associate ierr = 0 return 667 continue select type ( self ) class is ( swiftest_pl ) write ( * , * ) \"Error reading massive body file: \" // trim ( adjustl ( errmsg )) class is ( swiftest_tp ) write ( * , * ) \"Error reading test particle file: \" // trim ( adjustl ( errmsg )) class default write ( * , * ) \"Error reading body file: \" // trim ( adjustl ( errmsg )) end select call util_exit ( FAILURE ) end function io_read_frame_body module function io_read_frame_cb ( self , iu , param ) result ( ierr ) !! author: David A. Minton !! !! Reads a frame of output of central body data to the binary output file !! !! Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90 !! Adapted from Hal Levison's Swift routine io_read_frame.F implicit none ! Arguments class ( swiftest_cb ), intent ( inout ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Result integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful ! Internals character ( len = STRMAX ) :: errmsg character ( len = NAMELEN ) :: name read ( iu , err = 667 , iomsg = errmsg ) self % id read ( iu , err = 667 , iomsg = errmsg ) name call self % info % set_value ( name = name ) read ( iu , err = 667 , iomsg = errmsg ) self % Gmass self % mass = self % Gmass / param % GU read ( iu , err = 667 , iomsg = errmsg ) self % radius read ( iu , err = 667 , iomsg = errmsg ) self % j2rp2 read ( iu , err = 667 , iomsg = errmsg ) self % j4rp4 if ( param % lrotation ) then read ( iu , err = 667 , iomsg = errmsg ) self % Ip ( 1 ) read ( iu , err = 667 , iomsg = errmsg ) self % Ip ( 2 ) read ( iu , err = 667 , iomsg = errmsg ) self % Ip ( 3 ) read ( iu , err = 667 , iomsg = errmsg ) self % rot ( 1 ) read ( iu , err = 667 , iomsg = errmsg ) self % rot ( 2 ) read ( iu , err = 667 , iomsg = errmsg ) self % rot ( 3 ) end if if ( param % ltides ) then read ( iu , err = 667 , iomsg = errmsg ) self % k2 read ( iu , err = 667 , iomsg = errmsg ) self % Q end if ierr = 0 return 667 continue write ( * , * ) \"Error reading central body file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end function io_read_frame_cb module function io_read_frame_system ( self , iu , param ) result ( ierr ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read a frame (header plus records for each massive body and active test particle) from a output binary file implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Result integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful ! Internals character ( len = STRMAX ) :: errmsg integer ( I4B ) :: npl , ntp ierr = io_read_hdr ( iu , param % t , npl , ntp , param % out_form , param % out_type ) if ( is_iostat_end ( ierr )) return ! Reached the end of the frames call self % pl % setup ( npl , param ) call self % tp % setup ( ntp , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read frame header.\" goto 667 end if ierr = self % cb % read_frame ( iu , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read central body frame.\" goto 667 end if ierr = self % pl % read_frame ( iu , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read massive body frame.\" goto 667 end if ierr = self % tp % read_frame ( iu , param ) if ( ierr /= 0 ) then write ( errmsg , * ) \"Cannot read test particle frame.\" goto 667 end if return 667 continue write ( * , * ) \"Error reading system frame: \" // trim ( adjustl ( errmsg )) end function io_read_frame_system function io_read_hdr ( iu , t , npl , ntp , out_form , out_type ) result ( ierr ) !! author: David A. Minton !! !! Read frame header from input binary files !!     Function returns read error status (0 = OK, nonzero = ERROR) !! Adapted from David E. Kaufmann's Swifter routine: io_read_hdr.f90 !! Adapted from Hal Levison's Swift routine io_read_hdr.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: iu integer ( I4B ), intent ( out ) :: npl , ntp character ( * ), intent ( out ) :: out_form real ( DP ), intent ( out ) :: t character ( * ), intent ( in ) :: out_type ! Result integer ( I4B ) :: ierr ! Internals real ( SP ) :: ttmp character ( len = STRMAX ) :: errmsg select case ( out_type ) case ( REAL4_TYPE ) read ( iu , iostat = ierr , err = 667 , iomsg = errmsg , end = 333 ) ttmp t = ttmp case ( REAL8_TYPE ) read ( iu , iostat = ierr , err = 667 , iomsg = errmsg , end = 333 ) t case default write ( errmsg , * ) trim ( adjustl ( out_type )) // ' is an unrecognized file type' ierr = - 1 end select read ( iu , iostat = ierr , err = 667 , iomsg = errmsg ) npl read ( iu , iostat = ierr , err = 667 , iomsg = errmsg ) ntp read ( iu , iostat = ierr , err = 667 , iomsg = errmsg ) out_form return 667 continue write ( * , * ) \"Error reading header: \" // trim ( adjustl ( errmsg )) 333 continue return return end function io_read_hdr module subroutine io_read_in_param ( self , param_file_name ) !! author: David A. Minton !! !! Read in parameters for the integration !! !! Adapted from David E. Kaufmann's Swifter routine io_init_param.f90 !! Adapted from Martin Duncan's Swift routine io_init_param.f implicit none ! Arguments class ( swiftest_parameters ), intent ( inout ) :: self !! Current run configuration parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) ! Internals integer ( I4B ), parameter :: LUN = 7 !! Unit number of input file integer ( I4B ) :: ierr = 0 !! Input error code character ( STRMAX ) :: errmsg !! Error message in UDIO procedure ! Read in name of parameter file write ( * , * ) 'Parameter input file is ' , trim ( adjustl ( param_file_name )) write ( * , * ) ' ' 100 format ( A ) open ( unit = LUN , file = param_file_name , status = 'old' , iostat = ierr , err = 667 , iomsg = errmsg ) !! todo: Currently this procedure does not work in user-defined derived-type input mode !!    as the newline characters are ignored in the input file when compiled in ifort. !read(LUN,'(DT)', iostat= ierr, iomsg = errmsg) param call self % reader ( LUN , iotype = \"none\" , v_list = [ self % integrator ], iostat = ierr , iomsg = errmsg ) if ( ierr == 0 ) return 667 continue write ( * , * ) \"Error reading parameter file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_in_param module subroutine io_read_in_particle_info ( self , iu ) !! author: David A. Minton !! !! Reads in particle information object information from an open file unformatted file implicit none ! Arguments class ( swiftest_particle_info ), intent ( inout ) :: self !! Particle metadata information object integer ( I4B ), intent ( in ) :: iu !! Open file unit number ! Internals character ( STRMAX ) :: errmsg read ( iu , err = 667 , iomsg = errmsg ) self % name read ( iu , err = 667 , iomsg = errmsg ) self % particle_type read ( iu , err = 667 , iomsg = errmsg ) self % origin_type read ( iu , err = 667 , iomsg = errmsg ) self % origin_time read ( iu , err = 667 , iomsg = errmsg ) self % origin_xh (:) read ( iu , err = 667 , iomsg = errmsg ) self % origin_vh (:) return 667 continue write ( * , * ) \"Error reading particle metadata information from file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_in_particle_info module subroutine io_read_particle_info_system ( self , param ) !! author: David A. Minton !! !! Reads an old particle information file for a restartd run implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 22 integer ( I4B ) :: i , id , idx logical :: lmatch character ( STRMAX ) :: errmsg type ( swiftest_particle_info ), allocatable :: tmpinfo open ( unit = LUN , file = param % particle_out , status = 'OLD' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) allocate ( tmpinfo , mold = self % cb % info ) select type ( cb => self % cb ) class is ( swiftest_cb ) select type ( pl => self % pl ) class is ( swiftest_pl ) select type ( tp => self % tp ) class is ( swiftest_tp ) associate ( npl => pl % nbody , ntp => tp % nbody ) do lmatch = . false . read ( LUN , err = 667 , iomsg = errmsg , end = 333 ) id if ( id == cb % id ) then call cb % info % read_in ( LUN ) lmatch = . true . else if ( npl > 0 ) then idx = findloc ( pl % id ( 1 : npl ), id , dim = 1 ) if ( idx /= 0 ) then call pl % info ( idx )% read_in ( LUN ) lmatch = . true . end if end if if (. not . lmatch . and . ntp > 0 ) then idx = findloc ( tp % id ( 1 : ntp ), id , dim = 1 ) if ( idx /= 0 ) then call tp % info ( idx )% read_in ( LUN ) lmatch = . true . end if end if end if if (. not . lmatch ) then call tmpinfo % read_in ( LUN ) end if end do end associate close ( unit = LUN , err = 667 , iomsg = errmsg ) end select end select end select 333 continue return 667 continue write ( * , * ) \"Error reading particle information file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_read_particle_info_system module subroutine io_toupper ( string ) !! author: David A. Minton !! !! Convert string to uppercase !! !! Adapted from David E. Kaufmann's Swifter routine: util_toupper.f90 implicit none ! Arguments character ( * ), intent ( inout ) :: string !! String to make upper case ! Internals integer ( I4B ) :: i , length , idx length = len ( string ) do i = 1 , length idx = iachar ( string ( i : i )) if (( idx >= lowercase_begin ) . and . ( idx <= lowercase_end )) then idx = idx + uppercase_offset string ( i : i ) = achar ( idx ) end if end do return end subroutine io_toupper module subroutine io_write_discard ( self , param ) !! author: David A. Minton !! !! Write out information about discarded test particle !! !! Adapted from David E. Kaufmann's Swifter routine  io_discard_write.f90 !! Adapted from Hal Levison's Swift routine io_discard_write.f implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 40 integer ( I4B ) :: i logical , save :: lfirst = . true . real ( DP ), dimension (:,:), allocatable :: vh character ( * ), parameter :: HDRFMT = '(E23.16, 1X, I8, 1X, L1)' character ( * ), parameter :: NAMEFMT = '(A, 2(1X, I8))' character ( * ), parameter :: VECFMT = '(3(E23.16, 1X))' character ( * ), parameter :: NPLFMT = '(I8)' character ( * ), parameter :: PLNAMEFMT = '(I8, 2(1X, E23.16))' class ( swiftest_body ), allocatable :: pltemp character ( len = STRMAX ) :: errmsg , out_stat associate ( tp_discards => self % tp_discards , nsp => self % tp_discards % nbody , pl => self % pl , npl => self % pl % nbody ) ! Record the discarded body metadata information to file if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call param % nciu % open ( param ) call tp_discards % write_particle_info ( param % nciu ) call param % nciu % close ( param ) end if if ( param % discard_out == \"\" ) return if ( nsp == 0 ) return if ( lfirst ) then out_stat = param % out_stat else out_stat = 'APPEND' end if select case ( out_stat ) case ( 'APPEND' ) open ( unit = LUN , file = param % discard_out , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) open ( unit = LUN , file = param % discard_out , status = param % out_stat , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code for OUT_STAT: ' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . if ( param % lgr ) call tp_discards % pv2v ( param ) write ( LUN , HDRFMT ) param % t , nsp , param % lbig_discard do i = 1 , nsp write ( LUN , NAMEFMT , err = 667 , iomsg = errmsg ) SUB , tp_discards % id ( i ), tp_discards % status ( i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) tp_discards % xh ( 1 , i ), tp_discards % xh ( 2 , i ), tp_discards % xh ( 3 , i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) tp_discards % vh ( 1 , i ), tp_discards % vh ( 2 , i ), tp_discards % vh ( 3 , i ) end do if ( param % lbig_discard ) then if ( param % lgr ) then allocate ( pltemp , source = pl ) call pltemp % pv2v ( param ) allocate ( vh , source = pltemp % vh ) deallocate ( pltemp ) else allocate ( vh , source = pl % vh ) end if write ( LUN , NPLFMT ) npl do i = 1 , npl write ( LUN , PLNAMEFMT , err = 667 , iomsg = errmsg ) pl % id ( i ), pl % Gmass ( i ), pl % radius ( i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl % xh ( 1 , i ), pl % xh ( 2 , i ), pl % xh ( 3 , i ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) vh ( 1 , i ), vh ( 2 , i ), vh ( 3 , i ) end do deallocate ( vh ) end if close ( LUN ) end associate return 667 continue write ( * , * ) \"Error writing discard file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_discard module subroutine io_write_encounter ( self , pl , encbody , param ) implicit none ! Arguments class ( swiftest_encounter ), intent ( in ) :: self !! Swiftest encounter list object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: encbody !! Encountering body - Swiftest generic body object (pl or tp) class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: LUN = 30 integer ( I4B ) :: k , ierr character ( len = STRMAX ) :: errmsg if ( param % enc_out == \"\" . or . self % nenc == 0 ) return open ( unit = LUN , file = param % enc_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , iostat = ierr , iomsg = errmsg ) if ( ierr /= 0 ) then if ( lfirst ) then open ( unit = LUN , file = param % enc_out , status = 'NEW' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) else goto 667 end if end if lfirst = . false . associate ( ind1 => self % index1 , ind2 => self % index2 ) select type ( encbody ) class is ( swiftest_pl ) do k = 1 , self % nenc call io_write_frame_encounter ( LUN , self % t ( k ), & pl % id ( ind1 ( k )), encbody % id ( ind2 ( k )), & pl % Gmass ( ind1 ( k )), encbody % Gmass ( ind2 ( k )), & pl % radius ( ind1 ( k )), encbody % radius ( ind2 ( k )), & self % x1 (:, k ), self % x2 (:, k ), & self % v1 (:, k ), self % v2 (:, k )) end do class is ( swiftest_tp ) do k = 1 , self % nenc call io_write_frame_encounter ( LUN , self % t ( k ), & pl % id ( ind1 ( k )), encbody % id ( ind2 ( k )), & pl % Gmass ( ind1 ( k )), 0.0_DP , & pl % radius ( ind1 ( k )), 0.0_DP , & self % x1 (:, k ), self % x2 (:, k ), & self % v1 (:, k ), self % v2 (:, k )) end do end select end associate close ( unit = LUN , err = 667 , iomsg = errmsg ) return 667 continue write ( * , * ) \"Error writing encounter file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_encounter module subroutine io_write_frame_body ( self , iu , param ) !! author: David A. Minton !! !! Write a frame of output of either test particle or massive body data to the binary output file !!    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method !! !! Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90 !! Adapted from Hal Levison's Swift routine io_write_frame.F implicit none ! Arguments class ( swiftest_body ), intent ( in ) :: self !! Swiftest particle object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals character ( len = STRMAX ) :: errmsg associate ( n => self % nbody ) if ( n == 0 ) return write ( iu , err = 667 , iomsg = errmsg ) self % id ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % info ( 1 : n )% name if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then write ( iu , err = 667 , iomsg = errmsg ) self % xh ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % xh ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % xh ( 3 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % vh ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % vh ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % vh ( 3 , 1 : n ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then write ( iu , err = 667 , iomsg = errmsg ) self % a ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % e ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) self % inc ( 1 : n ) * RAD2DEG write ( iu , err = 667 , iomsg = errmsg ) self % capom ( 1 : n ) * RAD2DEG write ( iu , err = 667 , iomsg = errmsg ) self % omega ( 1 : n ) * RAD2DEG write ( iu , err = 667 , iomsg = errmsg ) self % capm ( 1 : n ) * RAD2DEG end if select type ( pl => self ) class is ( swiftest_pl ) ! Additional output if the passed polymorphic object is a massive body write ( iu , err = 667 , iomsg = errmsg ) pl % Gmass ( 1 : n ) if ( param % lrhill_present ) write ( iu , err = 667 , iomsg = errmsg ) pl % rhill ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % radius ( 1 : n ) if ( param % lrotation ) then write ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % Ip ( 3 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 1 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 2 , 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % rot ( 3 , 1 : n ) end if if ( param % ltides ) then write ( iu , err = 667 , iomsg = errmsg ) pl % k2 ( 1 : n ) write ( iu , err = 667 , iomsg = errmsg ) pl % Q ( 1 : n ) end if end select end associate return 667 continue write ( * , * ) \"Error writing body frame: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_frame_body module subroutine io_write_frame_cb ( self , iu , param ) !! author: David A. Minton !! !! Write a frame of output of central body data to the binary output file !! !! Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90 !! Adapted from Hal Levison's Swift routine io_write_frame.F implicit none ! Arguments class ( swiftest_cb ), intent ( in ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals character ( len = STRMAX ) :: errmsg associate ( cb => self ) write ( iu , err = 667 , iomsg = errmsg ) cb % id write ( iu , err = 667 , iomsg = errmsg ) cb % info % name write ( iu , err = 667 , iomsg = errmsg ) cb % Gmass write ( iu , err = 667 , iomsg = errmsg ) cb % radius write ( iu , err = 667 , iomsg = errmsg ) cb % j2rp2 write ( iu , err = 667 , iomsg = errmsg ) cb % j4rp4 if ( param % lrotation ) then write ( iu , err = 667 , iomsg = errmsg ) cb % Ip ( 1 ) write ( iu , err = 667 , iomsg = errmsg ) cb % Ip ( 2 ) write ( iu , err = 667 , iomsg = errmsg ) cb % Ip ( 3 ) write ( iu , err = 667 , iomsg = errmsg ) cb % rot ( 1 ) write ( iu , err = 667 , iomsg = errmsg ) cb % rot ( 2 ) write ( iu , err = 667 , iomsg = errmsg ) cb % rot ( 3 ) end if if ( param % ltides ) then write ( iu , err = 667 , iomsg = errmsg ) cb % k2 write ( iu , err = 667 , iomsg = errmsg ) cb % Q end if end associate return 667 continue write ( * , * ) \"Error writing central body frame: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_frame_cb module subroutine io_write_frame_encounter ( iu , t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 ) !! author: David A. Minton !! !! Write a single frame of close encounter data to output binary files !! !! Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90 !! Adapted from Hal Levison's Swift routine io_write_encounter.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: iu !! Open file unit number real ( DP ), intent ( in ) :: t !! Time of encounter integer ( I4B ), intent ( in ) :: id1 , id2 !! ids of the two encountering bodies real ( DP ), intent ( in ) :: Gmass1 , Gmass2 !! G*mass of the two encountering bodies real ( DP ), intent ( in ) :: radius1 , radius2 !! Radii of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 !! Heliocentric position vectors of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: vh1 , vh2 !! Heliocentric velocity vectors of the two encountering bodies ! Internals character ( len = STRMAX ) :: errmsg write ( iu , err = 667 , iomsg = errmsg ) t write ( iu , err = 667 , iomsg = errmsg ) id1 , xh1 ( 1 ), xh1 ( 2 ), xh1 ( 3 ), vh1 ( 1 ), vh1 ( 2 ), Gmass1 , radius1 write ( iu , err = 667 , iomsg = errmsg ) id2 , xh2 ( 1 ), xh2 ( 2 ), xh2 ( 3 ), vh2 ( 1 ), vh2 ( 2 ), Gmass2 , radius2 return 667 continue write ( * , * ) \"Error writing encounter file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine module subroutine io_write_frame_system ( self , param ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Write a frame (header plus records for each massive body and active test particle) to output binary file !! There is no direct file output from this subroutine !! !! Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90 !! Adapted from Hal Levison's Swift routine io_write_frame.F implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals logical , save :: lfirst = . true . !! Flag to determine if this is the first call of this method class ( swiftest_cb ), allocatable :: cb !! Temporary local version of pl structure used for non-destructive conversions class ( swiftest_pl ), allocatable :: pl !! Temporary local version of pl structure used for non-destructive conversions class ( swiftest_tp ), allocatable :: tp !! Temporary local version of pl structure used for non-destructive conversions character ( len = STRMAX ) :: errmsg integer ( I4B ) :: iu = BINUNIT !! Unit number for the output file to write frame to logical :: fileExists if (. not . lfirst . and . param % lenergy ) call self % conservation_report ( param , lterminal = . true .) allocate ( cb , source = self % cb ) allocate ( pl , source = self % pl ) allocate ( tp , source = self % tp ) iu = BINUNIT if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE )) then if ( lfirst ) then select case ( param % out_stat ) case ( 'APPEND' ) open ( unit = iu , file = param % outfile , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) open ( unit = iu , file = param % outfile , status = param % out_stat , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code for OUT_STAT: ' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . else open ( unit = iu , file = param % outfile , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , err = 667 , iomsg = errmsg ) end if else if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then if ( lfirst ) then inquire ( file = param % outfile , exist = fileExists ) select case ( param % out_stat ) case ( 'APPEND' ) if (. not . fileExists ) then errmsg = param % outfile // \" not found! You must specify OUT_STAT = NEW, REPLACE, or UNKNOWN\" goto 667 end if case ( 'NEW' ) if ( fileExists ) then errmsg = param % outfile // \" Alread Exists! You must specify OUT_STAT = OLD, REPLACE, or UNKNOWN\" goto 667 end if case ( 'REPLACE' , 'UNKNOWN' ) if ( fileExists ) then open ( file = param % outfile , unit = iu , status = 'OLD' ) close ( unit = BINUNIT , status = \"delete\" ) end if end select select case ( param % out_stat ) case ( 'APPEND' ) call param % nciu % open ( param ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) call param % nciu % initialize ( param ) call param % nciu % close ( param ) call param % nciu % open ( param ) end select lfirst = . false . else call param % nciu % open ( param ) end if end if if ( param % lgr ) then call pl % pv2v ( param ) call tp % pv2v ( param ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then ! Do an orbital element conversion prior to writing out the frame, as we have access to the central body here call pl % xv2el ( cb ) call tp % xv2el ( cb ) end if ! Write out each data type frame if (( param % out_type == REAL4_TYPE ) . or . ( param % out_type == REAL8_TYPE )) then call self % write_hdr ( iu , param ) call cb % write_frame ( iu , param ) call pl % write_frame ( iu , param ) call tp % write_frame ( iu , param ) close ( iu , err = 667 , iomsg = errmsg ) else if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call self % write_hdr ( param % nciu , param ) call cb % write_frame ( param % nciu , param ) call pl % write_frame ( param % nciu , param ) call tp % write_frame ( param % nciu , param ) call param % nciu % close ( param ) end if return 667 continue write ( * , * ) \"Error writing system frame: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_frame_system module subroutine io_write_hdr_system ( self , iu , param ) ! t, npl, ntp, out_form, out_type) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Write frame header to output binary file !! !! Adapted from David Adapted from David E. Kaufmann's Swifter routine io_write_hdr.f90 !! Adapted from Hal Levison's Swift routine io_write_hdr.F implicit none ! Arguments class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object integer ( I4B ), intent ( inout ) :: iu !! Output file unit number class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals character ( len = STRMAX ) :: errmsg select case ( param % out_type ) case ( REAL4_TYPE ) write ( iu , err = 667 , iomsg = errmsg ) real ( param % t , kind = SP ) case ( REAL8_TYPE ) write ( iu , err = 667 , iomsg = errmsg ) param % t end select write ( iu , err = 667 , iomsg = errmsg ) self % pl % nbody write ( iu , err = 667 , iomsg = errmsg ) self % tp % nbody write ( iu , err = 667 , iomsg = errmsg ) param % out_form return 667 continue write ( * , * ) \"Error writing header: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine io_write_hdr_system end submodule s_io","tags":"","loc":"sourcefile/io.f90.html"},{"title":"setup.f90 – swiftest","text":"This file depends on sourcefile~~setup.f90~~EfferentGraph sourcefile~setup.f90 setup.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~setup.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_setup Source Code setup.f90 Source Code submodule ( swiftest_classes ) s_setup use swiftest contains module subroutine setup_construct_system ( system , param ) !! author: David A. Minton !! !! Constructor for a Swiftest nbody system. Creates the nbody system object based on the user-input integrator !! implicit none ! Arguments class ( swiftest_nbody_system ), allocatable , intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Swiftest parameters select case ( param % integrator ) case ( BS ) write ( * , * ) 'Bulirsch-Stoer integrator not yet enabled' case ( HELIO ) allocate ( helio_nbody_system :: system ) select type ( system ) class is ( helio_nbody_system ) allocate ( helio_cb :: system % cb ) allocate ( helio_pl :: system % pl ) allocate ( helio_tp :: system % tp ) allocate ( helio_tp :: system % tp_discards ) end select case ( RA15 ) write ( * , * ) 'Radau integrator not yet enabled' case ( TU4 ) write ( * , * ) 'TU4 integrator not yet enabled' case ( WHM ) allocate ( whm_nbody_system :: system ) select type ( system ) class is ( whm_nbody_system ) allocate ( whm_cb :: system % cb ) allocate ( whm_pl :: system % pl ) allocate ( whm_tp :: system % tp ) allocate ( whm_tp :: system % tp_discards ) end select case ( RMVS ) allocate ( rmvs_nbody_system :: system ) select type ( system ) class is ( rmvs_nbody_system ) allocate ( rmvs_cb :: system % cb ) allocate ( rmvs_pl :: system % pl ) allocate ( rmvs_tp :: system % tp ) allocate ( rmvs_tp :: system % tp_discards ) end select case ( SYMBA ) allocate ( symba_nbody_system :: system ) select type ( system ) class is ( symba_nbody_system ) allocate ( symba_cb :: system % cb ) allocate ( symba_pl :: system % pl ) allocate ( symba_tp :: system % tp ) allocate ( symba_tp :: system % tp_discards ) allocate ( symba_merger :: system % pl_adds ) allocate ( symba_merger :: system % pl_discards ) allocate ( symba_pltpenc :: system % pltpenc_list ) allocate ( symba_plplenc :: system % plplenc_list ) allocate ( symba_plplenc :: system % plplcollision_list ) end select case ( RINGMOONS ) write ( * , * ) 'RINGMOONS-SyMBA integrator not yet enabled' case default write ( * , * ) 'Unkown integrator' , param % integrator call util_exit ( FAILURE ) end select return end subroutine setup_construct_system module subroutine setup_encounter ( self , n ) !! author: David A. Minton !! !! A constructor that sets the number of encounters and allocates and initializes all arrays !! implicit none ! Arguments class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for if ( n < 0 ) return if ( allocated ( self % lvdotr )) deallocate ( self % lvdotr ) if ( allocated ( self % status )) deallocate ( self % status ) if ( allocated ( self % kidx )) deallocate ( self % kidx ) if ( allocated ( self % index1 )) deallocate ( self % index1 ) if ( allocated ( self % index2 )) deallocate ( self % index2 ) if ( allocated ( self % id1 )) deallocate ( self % id1 ) if ( allocated ( self % id2 )) deallocate ( self % id2 ) if ( allocated ( self % x1 )) deallocate ( self % x1 ) if ( allocated ( self % x2 )) deallocate ( self % x2 ) if ( allocated ( self % v1 )) deallocate ( self % v1 ) if ( allocated ( self % v2 )) deallocate ( self % v2 ) if ( allocated ( self % t )) deallocate ( self % t ) self % nenc = n if ( n == 0 ) return allocate ( self % lvdotr ( n )) allocate ( self % status ( n )) allocate ( self % kidx ( n )) allocate ( self % index1 ( n )) allocate ( self % index2 ( n )) allocate ( self % id1 ( n )) allocate ( self % id2 ( n )) allocate ( self % x1 ( NDIM , n )) allocate ( self % x2 ( NDIM , n )) allocate ( self % v1 ( NDIM , n )) allocate ( self % v2 ( NDIM , n )) allocate ( self % t ( n )) self % lvdotr (:) = . false . self % status (:) = INACTIVE self % kidx (:) = 0_I8B self % index1 (:) = 0 self % index2 (:) = 0 self % id1 (:) = 0 self % id2 (:) = 0 self % x1 (:,:) = 0.0_DP self % x2 (:,:) = 0.0_DP self % v1 (:,:) = 0.0_DP self % v2 (:,:) = 0.0_DP self % t (:) = 0.0_DP return end subroutine setup_encounter module subroutine setup_initialize_particle_info_system ( self , param ) !! author: David A. Minton !! !! Setup up particle information metadata from initial conditions ! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i associate ( cb => self % cb , pl => self % pl , npl => self % pl % nbody , tp => self % tp , ntp => self % tp % nbody ) call cb % info % set_value ( particle_type = CB_TYPE_NAME , status = \"ACTIVE\" , origin_type = \"Initial conditions\" , origin_time = param % t0 , origin_xh = [ 0.0_DP , 0.0_DP , 0.0_DP ], origin_vh = [ 0.0_DP , 0.0_DP , 0.0_DP ]) do i = 1 , self % pl % nbody call pl % info ( i )% set_value ( particle_type = PL_TYPE_NAME , status = \"ACTIVE\" , origin_type = \"Initial conditions\" , origin_time = param % t0 , origin_xh = self % pl % xh (:, i ), origin_vh = self % pl % vh (:, i )) end do do i = 1 , self % tp % nbody call tp % info ( i )% set_value ( particle_type = TP_TYPE_NAME , status = \"ACTIVE\" , origin_type = \"Initial conditions\" , origin_time = param % t0 , origin_xh = self % tp % xh (:, i ), origin_vh = self % tp % vh (:, i )) end do end associate return end subroutine setup_initialize_particle_info_system module subroutine setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Wrapper method to initialize a basic Swiftest nbody system from files !! implicit none ! Arguments class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters call self % cb % read_in ( param ) call self % pl % read_in ( param ) call self % tp % read_in ( param ) call self % validate_ids ( param ) call self % set_msys () call self % pl % set_mu ( self % cb ) call self % tp % set_mu ( self % cb ) if ( param % in_form == EL ) then call self % pl % el2xv ( self % cb ) call self % tp % el2xv ( self % cb ) end if call self % pl % index ( param ) if (. not . param % lrhill_present ) call self % pl % set_rhill ( self % cb ) self % pl % lfirst = param % lfirstkick self % tp % lfirst = param % lfirstkick if ( param % lrestart ) then call self % read_particle_info ( param ) else call self % init_particle_info ( param ) end if return end subroutine setup_initialize_system module subroutine setup_body ( self , n , param ) !! author: David A. Minton !! !! Constructor for base Swiftest particle class. Allocates space for all particles and !! initializes all components with a value. !! Note: Timing tests indicate that (NDIM, n) is more efficient than (NDIM, n) implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i if ( n < 0 ) return self % lfirst = . true . if ( allocated ( self % info )) deallocate ( self % info ) if ( allocated ( self % id )) deallocate ( self % id ) if ( allocated ( self % status )) deallocate ( self % status ) if ( allocated ( self % ldiscard )) deallocate ( self % ldiscard ) if ( allocated ( self % lmask )) deallocate ( self % lmask ) if ( allocated ( self % mu )) deallocate ( self % mu ) if ( allocated ( self % xh )) deallocate ( self % xh ) if ( allocated ( self % vh )) deallocate ( self % vh ) if ( allocated ( self % xb )) deallocate ( self % xb ) if ( allocated ( self % vb )) deallocate ( self % vb ) if ( allocated ( self % ah )) deallocate ( self % ah ) if ( allocated ( self % aobl )) deallocate ( self % aobl ) if ( allocated ( self % agr )) deallocate ( self % lmask ) if ( allocated ( self % atide )) deallocate ( self % lmask ) if ( allocated ( self % ir3h )) deallocate ( self % ir3h ) if ( allocated ( self % a )) deallocate ( self % a ) if ( allocated ( self % e )) deallocate ( self % e ) if ( allocated ( self % e )) deallocate ( self % e ) if ( allocated ( self % inc )) deallocate ( self % inc ) if ( allocated ( self % capom )) deallocate ( self % capom ) if ( allocated ( self % omega )) deallocate ( self % omega ) if ( allocated ( self % capm )) deallocate ( self % capm ) self % nbody = n if ( n == 0 ) return allocate ( self % info ( n )) allocate ( self % id ( n )) allocate ( self % status ( n )) allocate ( self % ldiscard ( n )) allocate ( self % lmask ( n )) allocate ( self % mu ( n )) allocate ( self % xh ( NDIM , n )) allocate ( self % vh ( NDIM , n )) allocate ( self % xb ( NDIM , n )) allocate ( self % vb ( NDIM , n )) allocate ( self % ah ( NDIM , n )) allocate ( self % ir3h ( n )) self % id (:) = 0 do i = 1 , n call self % info ( i )% set_value (& name = \"UNNAMED\" , & particle_type = \"UNKNOWN\" , & status = \"INACTIVE\" , & origin_type = \"UNKNOWN\" , & origin_time = - huge ( 1.0_DP ), & origin_xh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & origin_vh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & discard_time = - huge ( 1.0_DP ), & discard_xh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & discard_vh = [ 0.0_DP , 0.0_DP , 0.0_DP ], & discard_body_id = - 1 & ) end do self % status (:) = INACTIVE self % lmask (:) = . false . self % ldiscard (:) = . false . self % xh (:,:) = 0.0_DP self % vh (:,:) = 0.0_DP self % xb (:,:) = 0.0_DP self % vb (:,:) = 0.0_DP self % ah (:,:) = 0.0_DP self % ir3h (:) = 0.0_DP self % mu (:) = 0.0_DP if ( param % loblatecb ) then allocate ( self % aobl ( NDIM , n )) self % aobl (:,:) = 0.0_DP end if if ( param % ltides ) then allocate ( self % atide ( NDIM , n )) self % atide (:,:) = 0.0_DP end if if ( param % lgr ) then allocate ( self % agr ( NDIM , n )) self % agr (:,:) = 0.0_DP end if return end subroutine setup_body module subroutine setup_pl ( self , n , param ) !! author: David A. Minton !! !! Constructor for base Swiftest massive body class. Allocates space for all particles and !! initializes all components with a value. implicit none ! Arguments class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class !> The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure call setup_body ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % mass )) deallocate ( self % mass ) if ( allocated ( self % Gmass )) deallocate ( self % Gmass ) if ( allocated ( self % rhill )) deallocate ( self % rhill ) if ( allocated ( self % radius )) deallocate ( self % radius ) if ( allocated ( self % density )) deallocate ( self % density ) if ( allocated ( self % rot )) deallocate ( self % rot ) if ( allocated ( self % Ip )) deallocate ( self % Ip ) if ( allocated ( self % k2 )) deallocate ( self % k2 ) if ( allocated ( self % Q )) deallocate ( self % Q ) if ( allocated ( self % tlag )) deallocate ( self % tlag ) if ( n == 0 ) return allocate ( self % mass ( n )) allocate ( self % Gmass ( n )) allocate ( self % rhill ( n )) self % mass (:) = 0.0_DP self % Gmass (:) = 0.0_DP self % rhill (:) = 0.0_DP self % nplpl = 0 if ( param % lclose ) then allocate ( self % radius ( n )) allocate ( self % density ( n )) self % radius (:) = 0.0_DP self % density (:) = 1.0_DP end if if ( param % lrotation ) then allocate ( self % rot ( NDIM , n )) allocate ( self % Ip ( NDIM , n )) self % rot (:,:) = 0.0_DP self % Ip (:,:) = 0.0_DP end if if ( param % ltides ) then allocate ( self % k2 ( n )) allocate ( self % Q ( n )) allocate ( self % tlag ( n )) self % k2 (:) = 0.0_DP self % Q (:) = 0.0_DP self % tlag (:) = 0.0_DP end if return end subroutine setup_pl module subroutine setup_tp ( self , n , param ) !! author: David A. Minton !! !! Constructor for base Swiftest test particle particle class. Allocates space for !! all particles and initializes all components with a value. implicit none ! Arguments class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class !> The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure call setup_body ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % isperi )) deallocate ( self % isperi ) if ( allocated ( self % peri )) deallocate ( self % peri ) if ( allocated ( self % atp )) deallocate ( self % atp ) if ( n == 0 ) return allocate ( self % isperi ( n )) allocate ( self % peri ( n )) allocate ( self % atp ( n )) self % isperi (:) = 0 self % peri (:) = 0.0_DP self % atp (:) = 0.0_DP return end subroutine setup_tp end submodule s_setup","tags":"","loc":"sourcefile/setup.f90.html"},{"title":"user_getacch.f90 – swiftest","text":"This file depends on sourcefile~~user_getacch.f90~~EfferentGraph sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~user_getacch.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_user_kick_getacch Source Code user_getacch.f90 Source Code submodule ( swiftest_classes ) s_user_kick_getacch use swiftest contains module subroutine user_kick_getacch_body ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Add user-supplied heliocentric accelerations to planets. !! !! Adapted from David E. Kaufmann's Swifter routine whm_user_kick_getacch.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody_system_object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters user parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the ste return end subroutine user_kick_getacch_body end submodule s_user_kick_getacch","tags":"","loc":"sourcefile/user_getacch.f90.html"},{"title":"drift.f90 – swiftest","text":"This file depends on sourcefile~~drift.f90~~EfferentGraph sourcefile~drift.f90 drift.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~drift.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules drift_implementation Source Code drift.f90 Source Code submodule ( swiftest_classes ) drift_implementation use swiftest !> Integration control parameters: real ( DP ), parameter :: E2MAX = 0.36_DP real ( DP ), parameter :: DM2MAX = 0.16_DP real ( DP ), parameter :: E2DM2MAX = 0.0016_DP real ( DP ), parameter :: DANBYB = 1.0E-13_DP integer ( I2B ), parameter :: NLAG1 = 50 integer ( I2B ), parameter :: NLAG2 = 40 contains module subroutine drift_body ( self , system , param , dt ) !! author: David A. Minton !! !! Loop bodies and call Danby drift routine on the heliocentric position and velocities. !! !! Adapted from Hal Levison's Swift routine drift_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f90 implicit none ! Arguments class ( swiftest_body ), intent ( inout ) :: self !! Swiftest test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize ! Internals integer ( I4B ) :: i integer ( I4B ), dimension (:), allocatable :: iflag associate ( n => self % nbody ) allocate ( iflag ( n )) iflag (:) = 0 call drift_all ( self % mu , self % xh , self % vh , self % nbody , param , dt , self % lmask , iflag ) if ( any ( iflag ( 1 : n ) /= 0 )) then where ( iflag ( 1 : n ) /= 0 ) self % status ( 1 : n ) = DISCARDED_DRIFTERR do i = 1 , n if ( iflag ( i ) /= 0 ) write ( * , * ) \" Body \" , self % id ( i ), \" lost due to error in Danby drift\" end do end if end associate return end subroutine drift_body module subroutine drift_all ( mu , x , v , n , param , dt , lmask , iflag ) !! author: David A. Minton !! !! Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector. !! !! Adapted from Hal Levison's Swift routine drift_tp.f !! Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f9 implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: mu !! Vector of gravitational constants real ( DP ), dimension (:,:), intent ( inout ) :: x , v !! Position and velocity vectors integer ( I4B ), intent ( in ) :: n !! number of bodies class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize logical , dimension (:), intent ( in ) :: lmask !! Logical mask of size self%nbody that determines which bodies to drift. integer ( I4B ), dimension (:), intent ( out ) :: iflag !! Vector of error flags. 0 means no problem ! Internals integer ( I4B ) :: i real ( DP ) :: energy , vmag2 , rmag !! Variables used in GR calculation real ( DP ), dimension (:), allocatable :: dtp if ( n == 0 ) return allocate ( dtp ( n )) if ( param % lgr ) then do concurrent ( i = 1 : n , lmask ( i )) rmag = norm2 ( x (:, i )) vmag2 = dot_product ( v (:, i ), v (:, i )) energy = 0.5_DP * vmag2 - mu ( i ) / rmag dtp ( i ) = dt * ( 1.0_DP + 3 * param % inv_c2 * energy ) end do else where ( lmask ( 1 : n )) dtp ( 1 : n ) = dt end if !$omp parallel do default(private) & !$omp shared(n, lmask, mu, x, v, dtp, iflag) do i = 1 , n if ( lmask ( i )) call drift_one ( mu ( i ), x ( 1 , i ), x ( 2 , i ), x ( 3 , i ), v ( 1 , i ), v ( 2 , i ), v ( 3 , i ), dtp ( i ), iflag ( i )) end do !$omp end parallel do return end subroutine drift_all module pure elemental subroutine drift_one ( mu , px , py , pz , vx , vy , vz , dt , iflag ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient !! !! Adapted from David E. Kaufmann's Swifter routine routine drift_one.f90 !! Adapted from Hal Levison and Martin Duncan's Swift routine drift_one.f implicit none ! Arguments real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real ( DP ), intent ( inout ) :: px , py , pz , vx , vy , vz !! Position and velocity of body to drift real ( DP ), intent ( in ) :: dt !! Step size integer ( I4B ), intent ( out ) :: iflag !! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) ! Internals integer ( I4B ) :: i real ( DP ) :: dttmp real ( DP ), dimension ( NDIM ) :: x , v x = [ px , py , pz ] v = [ vx , vy , vz ] call drift_dan ( mu , x (:), v (:), dt , iflag ) if ( iflag /= 0 ) then dttmp = 0.1_DP * dt do i = 1 , 10 call drift_dan ( mu , x (:), v (:), dttmp , iflag ) if ( iflag /= 0 ) exit end do end if px = x ( 1 ); py = x ( 2 ); pz = x ( 3 ) vx = v ( 1 ); vy = v ( 2 ); vz = v ( 3 ) return end subroutine drift_one pure subroutine drift_dan ( mu , x0 , v0 , dt0 , iflag ) !! author: David A. Minton !! !! Perform Kepler drift, solving Kepler's equation in appropriate variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_dan.f90 !! Adapted from Hal Levison and Martin Duncan's Swift routine drift_dan.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: mu , dt0 real ( DP ), dimension (:), intent ( inout ) :: x0 , v0 real ( DP ) :: dt , f , g , fdot , gdot , c1 , c2 , c3 , u , alpha , fp , r0 real ( DP ) :: v0s , a , asq , en , dm , ec , es , esq , xkep , fchk , s , c real ( DP ), dimension ( NDIM ) :: x , v ! Executable code iflag = 0 dt = dt0 r0 = sqrt ( dot_product ( x0 (:), x0 (:))) v0s = dot_product ( v0 (:), v0 (:)) u = dot_product ( x0 (:), v0 (:)) alpha = 2 * mu / r0 - v0s if ( alpha > 0.0_DP ) then a = mu / alpha asq = a ** 2 en = sqrt ( mu / ( a * asq )) ec = 1.0_DP - r0 / a es = u / ( en * asq ) esq = ec ** 2 + es ** 2 dm = dt * en - int ( dt * en / TWOPI , kind = I4B ) * TWOPI dt = dm / en if (( esq < E2MAX ) . and . ( dm ** 2 < DM2MAX ) . and . ( esq * dm ** 2 < E2DM2MAX )) then call drift_kepmd ( dm , es , ec , xkep , s , c ) fchk = ( xkep - ec * s + es * ( 1.0_DP - c ) - dm ) ! DEK - original code compared fchk*fchk with DANBYB, but i think it should ! DEK - be compared with DANBYB*DANBYB, and i changed it accordingly - please ! DEK - check with hal and/or martin about this if ( fchk ** 2 > DANBYB ** 2 ) then iflag = 1 return end if fp = 1.0_DP - ec * c + es * s f = a / r0 * ( c - 1.0_DP ) + 1.0_DP g = dt + ( s - xkep ) / en fdot = - ( a / ( r0 * fp )) * en * s gdot = ( c - 1.0_DP ) / fp + 1.0_DP x (:) = x0 (:) * f + v0 (:) * g v (:) = x0 (:) * fdot + v0 (:) * gdot x0 (:) = x (:) v0 (:) = v (:) iflag = 0 return end if end if call drift_kepu ( dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) if ( iflag == 0 ) then f = 1.0_DP - mu / r0 * c2 g = dt - mu * c3 fdot = - mu / ( fp * r0 ) * c1 gdot = 1.0_DP - mu / fp * c2 x (:) = x0 (:) * f + v0 (:) * g v (:) = x0 (:) * fdot + v0 (:) * gdot x0 (:) = x (:) v0 (:) = v (:) end if return end subroutine drift_dan pure subroutine drift_kepmd ( dm , es , ec , x , s , c ) !! author: David A. Minton !! !! Solve Kepler's equation in difference form for an ellipse for small input dm and eccentricity !!    Original disclaimer: built for speed, does not check how well the original equation is solved !!    Can do that in calling routine by checking how close (x - ec*s + es*(1.0 - c) - dm) is to zero !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepmd.f90 !! Adapted from Martin Duncan's Swift routine drift_kepmd.f implicit none real ( DP ), intent ( in ) :: dm , es , ec real ( DP ), intent ( out ) :: x , s , c real ( DP ), parameter :: a0 = 3991680 0.0_DP , a1 = 665280 0.0_DP , a2 = 33264 0.0_DP , a3 = 792 0.0_DP , a4 = 11 0.0_DP real ( DP ) :: dx , fac1 , fac2 , q , y , f , fp , fpp , fppp ! executable code fac1 = 1.0_DP / ( 1.0_DP - ec ) q = fac1 * dm fac2 = es ** 2 * fac1 - ec / 3.0_DP x = q * ( 1.0_DP - 0.5_DP * fac1 * q * ( es - q * fac2 )) y = x ** 2 s = x * ( a0 - y * ( a1 - y * ( a2 - y * ( a3 - y * ( a4 - y ))))) / a0 c = sqrt ( 1.0_DP - s ** 2 ) f = x - ec * s + es * ( 1.0_DP - c ) - dm fp = 1.0_DP - ec * c + es * s fpp = ec * s + es * c fppp = ec * c - es * s dx = - f / fp dx = - f / ( fp + dx * fpp / 2.0_DP ) dx = - f / ( fp + dx * fpp / 2.0_DP + dx ** 2 * fppp / 6.0_DP ) x = x + dx y = x ** 2 s = x * ( a0 - y * ( a1 - y * ( a2 - y * ( a3 - y * ( a4 - y ))))) / a0 c = sqrt ( 1.0_DP - s ** 2 ) return end subroutine drift_kepmd pure subroutine drift_kepu ( dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) !! author: David A. Minton !! !! Solve Kepler's equation in universal variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu.f90 !! Adapted from Hal Levison's Swift routine drift_kepu.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( out ) :: fp , c1 , c2 , c3 real ( DP ) :: s , st , fo , fn ! executable code call drift_kepu_guess ( dt , r0 , mu , alpha , u , s ) st = s call drift_kepu_new ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) if ( iflag /= 0 ) then call drift_kepu_fchk ( dt , r0 , mu , alpha , u , st , fo ) call drift_kepu_fchk ( dt , r0 , mu , alpha , u , s , fn ) if ( abs ( fo ) < abs ( fn )) s = st call drift_kepu_lag ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) end if return end subroutine drift_kepu pure subroutine drift_kepu_fchk ( dt , r0 , mu , alpha , u , s , f ) !! author: David A. Minton !! !! Computes the value of f, the function whose root we are trying to find in universal variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_fchk.f90 !! Adapted from Martin Duncan's Swift routine drift_kepu_fchk.f implicit none real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u , s real ( DP ), intent ( out ) :: f real ( DP ) :: x , c0 , c1 , c2 , c3 x = s ** 2 * alpha call drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) c1 = c1 * s c2 = c2 * s ** 2 c3 = c3 * s ** 3 f = r0 * c1 + u * c2 + mu * c3 - dt return end subroutine drift_kepu_fchk pure subroutine drift_kepu_guess ( dt , r0 , mu , alpha , u , s ) !! author: David A. Minton !! !! Compute initial guess for solving Kepler's equation using universal variables !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_guess.f90 !! Adapted from Hal Levison and Martin Duncan's Swift routine drift_kepu_guess.f implicit none real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( out ) :: s integer ( I4B ) :: iflag real ( DP ), parameter :: thresh = 0.4_DP , danbyk = 0.85_DP real ( DP ) :: y , sy , cy , sigma , es , x , a , en , ec , e if ( alpha > 0.0_DP ) then if ( dt / r0 <= thresh ) then s = dt / r0 - ( dt ** 2 * u ) / ( 2 * r0 ** 3 ) else a = mu / alpha en = sqrt ( mu / a ** 3 ) ec = 1.0_DP - r0 / a es = u / ( en * a ** 2 ) e = sqrt ( ec ** 2 + es ** 2 ) y = en * dt - es call orbel_scget ( y , sy , cy ) sigma = sign ( 1.0_DP , es * cy + ec * sy ) x = y + sigma * danbyk * e s = x / sqrt ( alpha ) end if else call drift_kepu_p3solve ( dt , r0 , mu , alpha , u , s , iflag ) if ( iflag /= 0 ) s = dt / r0 end if return end subroutine drift_kepu_guess pure subroutine drift_kepu_lag ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) !! author: David A. Minton !! !! Solve Kepler's equation in universal variables using Laguerre's method !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_lag.f90 !! Adapted from Hal Levison's Swift routine drift_kepu_lag.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( inout ) :: s real ( DP ), intent ( out ) :: fp , c1 , c2 , c3 integer ( I4B ) :: nc , ncmax real ( DP ) :: ln , x , fpp , ds , c0 , f , fdt if ( alpha < 0.0_DP ) then ncmax = NLAG2 else ncmax = NLAG1 end if ln = 5.0_DP do nc = 0 , ncmax x = s * s * alpha call drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) c1 = c1 * s c2 = c2 * s ** 2 c3 = c3 * s ** 3 f = r0 * c1 + u * c2 + mu * c3 - dt fp = r0 * c0 + u * c1 + mu * c2 fpp = ( - r0 * alpha + mu ) * c1 + u * c0 ds = - ln * f / ( fp + sign ( 1.0_DP , fp ) * sqrt ( abs (( ln - 1.0_DP ) ** 2 * fp ** 2 - ( ln - 1.0_DP ) * ln * f * fpp ))) s = s + ds fdt = f / dt if ( fdt ** 2 < DANBYB ** 2 ) then iflag = 0 return end if end do iflag = 2 return end subroutine drift_kepu_lag pure subroutine drift_kepu_new ( s , dt , r0 , mu , alpha , u , fp , c1 , c2 , c3 , iflag ) !! author: David A. Minton !! !! Solve Kepler's equation in universal variables using Newton's method !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_new.f90 !! Adapted from Hal Levison's Swift routine drift_kepu_new.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( inout ) :: s real ( DP ), intent ( out ) :: fp , c1 , c2 , c3 integer ( I4B ) :: nc real ( DP ) :: x , c0 , ds , f , fpp , fppp , fdt do nc = 0 , 6 x = s ** 2 * alpha call drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) c1 = c1 * s c2 = c2 * s ** 2 c3 = c3 * s ** 3 f = r0 * c1 + u * c2 + mu * c3 - dt fp = r0 * c0 + u * c1 + mu * c2 fpp = ( - r0 * alpha + mu ) * c1 + u * c0 fppp = ( - r0 * alpha + mu ) * c0 - u * alpha * c1 ds = - f / fp ds = - f / ( fp + ds * fpp / 2.0_DP ) ds = - f / ( fp + ds * fpp / 2.0_DP + ds ** 2 * fppp / 6.0_DP ) s = s + ds fdt = f / dt if ( fdt ** 2 < DANBYB ** 2 ) then iflag = 0 return end if end do iflag = 1 return end subroutine drift_kepu_new pure subroutine drift_kepu_p3solve ( dt , r0 , mu , alpha , u , s , iflag ) !! author: David A. Minton !! !! Computes real root of cubic involved in setting initial guess for solving Kepler's equation in universal variables !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_p3solve.f90 !! Adapted from Martin Duncan's Swift routine drift_kepu_p3solve.f implicit none integer ( I4B ), intent ( out ) :: iflag real ( DP ), intent ( in ) :: dt , r0 , mu , alpha , u real ( DP ), intent ( out ) :: s real ( DP ) :: denom , a0 , a1 , a2 , q , r , sq2 , sq , p1 , p2 denom = ( mu - alpha * r0 ) / 6.0_DP a2 = 0.5_DP * u / denom a1 = r0 / denom a0 = - dt / denom q = ( a1 - a2 ** 2 / 3.0_DP ) / 3.0_DP r = ( a1 * a2 - 3 * a0 ) / 6.0_DP - a2 ** 3 / 2 7.0_DP sq2 = q ** 3 + r ** 2 if ( sq2 >= 0.0_DP ) then sq = sqrt ( sq2 ) if (( r + sq ) <= 0.0_DP ) then p1 = - ( - ( r + sq )) ** ( 1.0_DP / 3.0_DP ) else p1 = ( r + sq ) ** ( 1.0_DP / 3.0_DP ) end if if (( r - sq ) <= 0.0_DP ) then p2 = - ( - ( r - sq )) ** ( 1.0_DP / 3.0_DP ) else p2 = ( r - sq ) ** ( 1.0_DP / 3.0_DP ) end if iflag = 0 s = p1 + p2 - a2 / 3.0_DP else iflag = 1 s = 0.0_DP end if return end subroutine drift_kepu_p3solve pure subroutine drift_kepu_stumpff ( x , c0 , c1 , c2 , c3 ) !! author: David A. Minton !! !! Compute Stumpff functions needed for Kepler drift in universal variables !!      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172. !! !! Adapted from David E. Kaufmann's Swifter routine: drift_kepu_stumpff.f90 !! Adapted from Hal Levison's Swift routine drift_kepu_stumpff.f implicit none real ( DP ), intent ( inout ) :: x real ( DP ), intent ( out ) :: c0 , c1 , c2 , c3 integer ( I4B ) :: i , n real ( DP ) :: xm n = 0 xm = 0.1_DP do while ( abs ( x ) >= xm ) n = n + 1 x = x / 4.0_DP end do c2 = ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * & ( 1.0_DP - x / 18 2.0_DP ) / 13 2.0_DP ) / 9 0.0_DP ) / 5 6.0_DP ) / & 3 0.0_DP ) / 1 2.0_DP ) / 2.0_DP c3 = ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * ( 1.0_DP - x * & ( 1.0_DP - x / 21 0.0_DP ) / 15 6.0_DP ) / 11 0.0_DP ) / 7 2.0_DP ) / & 4 2.0_DP ) / 2 0.0_DP ) / 6.0_DP c1 = 1.0_DP - x * c3 c0 = 1.0_DP - x * c2 if ( n /= 0 ) then do i = n , 1 , - 1 c3 = ( c2 + c0 * c3 ) / 4.0_DP c2 = c1 ** 2 / 2.0_DP c1 = c0 * c1 c0 = 2 * c0 ** 2 - 1.0_DP x = x * 4 end do end if return end subroutine drift_kepu_stumpff end submodule drift_implementation","tags":"","loc":"sourcefile/drift.f90.html"},{"title":"symba_util.f90 – swiftest","text":"This file depends on sourcefile~~symba_util.f90~~EfferentGraph sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_util Source Code symba_util.f90 Source Code submodule ( symba_classes ) s_symba_util use swiftest contains module subroutine symba_util_append_arr_kin ( arr , source , nold , nsrc , lsource_mask ) !! author: David A. Minton !! !! Append a single array of kinship type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ) :: nnew if (. not . allocated ( source )) return nnew = count ( lsource_mask ( 1 : nsrc )) if (. not . allocated ( arr )) then allocate ( arr ( nold + nnew )) else call util_resize ( arr , nold + nnew ) end if arr ( nold + 1 : nold + nnew ) = pack ( source ( 1 : nsrc ), lsource_mask ( 1 : nsrc )) return end subroutine symba_util_append_arr_kin module subroutine symba_util_append_encounter ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one encounter list (pl-pl or pl-tp) body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to associate ( nold => self % nenc , nsrc => source % nenc ) select type ( source ) class is ( symba_encounter ) call util_append ( self % level , source % level , nold , nsrc , lsource_mask ) end select call util_append_encounter ( self , source , lsource_mask ) end associate return end subroutine symba_util_append_encounter module subroutine symba_util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( symba_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % lcollision , source % lcollision , nold , nsrc , lsource_mask ) call util_append ( self % lencounter , source % lencounter , nold , nsrc , lsource_mask ) call util_append ( self % lmtiny , source % lmtiny , nold , nsrc , lsource_mask ) call util_append ( self % nplenc , source % nplenc , nold , nsrc , lsource_mask ) call util_append ( self % ntpenc , source % ntpenc , nold , nsrc , lsource_mask ) call util_append ( self % levelg , source % levelg , nold , nsrc , lsource_mask ) call util_append ( self % levelm , source % levelm , nold , nsrc , lsource_mask ) call util_append ( self % isperi , source % isperi , nold , nsrc , lsource_mask ) call util_append ( self % peri , source % peri , nold , nsrc , lsource_mask ) call util_append ( self % atp , source % atp , nold , nsrc , lsource_mask ) call util_append ( self % kin , source % kin , nold , nsrc , lsource_mask ) call util_append_pl ( self , source , lsource_mask ) ! Note: helio_pl does not have its own append method, so we skip back to the base class end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine symba_util_append_pl module subroutine symba_util_append_merger ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none ! Arguments class ( symba_merger ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to ! Internals integer ( I4B ), dimension (:), allocatable :: ncomp_tmp !! Temporary placeholder for ncomp incase we are appending a symba_pl object to a symba_merger integer ( I4B ) :: nold , nsrc , nnew nold = self % nbody nsrc = source % nbody nnew = count ( lsource_mask ) select type ( source ) class is ( symba_merger ) call util_append ( self % ncomp , source % ncomp , nold , nsrc , lsource_mask ) call symba_util_append_pl ( self , source , lsource_mask ) class is ( symba_pl ) allocate ( ncomp_tmp , mold = source % id ) ncomp_tmp (:) = 0 call util_append ( self % ncomp , ncomp_tmp , nold , nsrc , lsource_mask ) call symba_util_append_pl ( self , source , lsource_mask ) class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select ! Save the number of appended bodies self % ncomp ( nold + 1 : nold + nnew ) = nnew return end subroutine symba_util_append_merger module subroutine symba_util_append_tp ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from test particle object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( symba_tp ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % nplenc , source % nplenc , nold , nsrc , lsource_mask ) call util_append ( self % levelg , source % levelg , nold , nsrc , lsource_mask ) call util_append ( self % levelm , source % levelm , nold , nsrc , lsource_mask ) call util_append_tp ( self , source , lsource_mask ) ! Note: helio_tp does not have its own append method, so we skip back to the base class end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class symba_tp or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine symba_util_append_tp module subroutine symba_util_copy_encounter ( self , source ) !! author: David A. Minton !! !! Copies elements from the source encounter list into self. implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into select type ( source ) class is ( symba_encounter ) associate ( n => source % nenc ) self % level ( 1 : n ) = source % level ( 1 : n ) end associate end select call util_copy_encounter ( self , source ) return end subroutine symba_util_copy_encounter module subroutine symba_util_fill_arr_kin ( keeps , inserts , lfill_list ) !! author: David A. Minton !! !! Performs a fill operation on a single array of particle kinship types !! This is the inverse of a spill operation implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps if (. not . allocated ( keeps ) . or . . not . allocated ( inserts )) return keeps (:) = unpack ( keeps (:), . not . lfill_list (:), keeps (:)) keeps (:) = unpack ( inserts (:), lfill_list (:), keeps (:)) return end subroutine symba_util_fill_arr_kin module subroutine symba_util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new SyMBA test particle structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA masive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( symba_pl ) call util_fill ( keeps % lcollision , inserts % lcollision , lfill_list ) call util_fill ( keeps % lencounter , inserts % lencounter , lfill_list ) call util_fill ( keeps % lmtiny , inserts % lmtiny , lfill_list ) call util_fill ( keeps % nplenc , inserts % nplenc , lfill_list ) call util_fill ( keeps % ntpenc , inserts % ntpenc , lfill_list ) call util_fill ( keeps % levelg , inserts % levelg , lfill_list ) call util_fill ( keeps % levelm , inserts % levelm , lfill_list ) call util_fill ( keeps % isperi , inserts % isperi , lfill_list ) call util_fill ( keeps % peri , inserts % peri , lfill_list ) call util_fill ( keeps % atp , inserts % atp , lfill_list ) call util_fill ( keeps % kin , inserts % kin , lfill_list ) call util_fill_pl ( keeps , inserts , lfill_list ) ! Note: helio_pl does not have its own fill method, so we skip back to the base class class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_fill_pl module subroutine symba_util_fill_tp ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new SyMBA test particle structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( symba_tp ) call util_fill ( keeps % nplenc , inserts % nplenc , lfill_list ) call util_fill ( keeps % levelg , inserts % levelg , lfill_list ) call util_fill ( keeps % levelm , inserts % levelm , lfill_list ) call util_fill_tp ( keeps , inserts , lfill_list ) ! Note: helio_tp does not have its own fill method, so we skip back to the base class class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class symba_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_fill_tp module subroutine symba_util_index_eucl_plpl ( self , param ) !! author: Jacob R. Elliott and David A. Minton !! !! Turns i,j indices into k index for use in the Euclidean distance matrix. This also sets the lmtiny flag and computes the !! number of interactions that excludes semi-interacting bodies with each other (Gmass < GMTINY). !! This method will also sort the bodies in descending order by Mass !! !! Reference: !! !!    Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. !!       2019. hal-0204751 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I8B ) :: k , nplpl , nplplm integer ( I4B ) :: i , j , npl , nplm , ip , jp associate ( pl => self ) npl = int ( self % nbody , kind = I8B ) nplm = count (. not . pl % lmtiny ( 1 : npl )) pl % nplm = int ( nplm , kind = I4B ) pl % nplpl = ( npl * ( npl - 1 ) / 2 ) ! number of entries in a strict lower triangle, npl x npl, minus first column pl % nplplm = nplm * npl - nplm * ( nplm + 1 ) / 2 ! number of entries in a strict lower triangle, npl x npl, minus first column including only mutually interacting bodies if ( allocated ( self % k_plpl )) deallocate ( self % k_plpl ) ! Reset the index array if it's been set previously allocate ( self % k_plpl ( 2 , pl % nplpl )) do concurrent ( i = 1 : npl ) do concurrent ( j = i + 1 : npl ) call util_index_eucl_ij_to_k ( npl , i , j , k ) self % k_plpl ( 1 , k ) = i self % k_plpl ( 2 , k ) = j end do end do end associate return end subroutine symba_util_index_eucl_plpl module subroutine symba_util_peri_pl ( self , system , param ) !! author: David A. Minton !! !! Determine system pericenter passages for planets in SyMBA !! !! Adapted from David E. Kaufmann's Swifter routine: symba_peri.f90 !! Adapted from Hal Levison's Swift routine util_mass_peri.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i real ( DP ) :: vdotr , e associate ( pl => self , npl => self % nbody ) if ( pl % lfirst ) then if ( param % qmin_coord == \"HELIO\" ) then do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xh (:, i ), pl % vh (:, i )) if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end do else do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xb (:, i ), pl % vb (:, i )) if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end do end if else if ( param % qmin_coord == \"HELIO\" ) then do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xh (:, i ), pl % vh (:, i )) if ( pl % isperi ( i ) == - 1 ) then if ( vdotr >= 0.0_DP ) then pl % isperi ( i ) = 0 CALL orbel_xv2aeq ( pl % mu ( i ), pl % xh (:, i ), pl % vh (:, i ), pl % atp ( i ), e , pl % peri ( i )) end if else if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end if end do else do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then vdotr = dot_product ( pl % xb (:, i ), pl % vb (:, i )) if ( pl % isperi ( i ) == - 1 ) then if ( vdotr >= 0.0_DP ) then pl % isperi ( i ) = 0 CALL orbel_xv2aeq ( system % Gmtot , pl % xb (:, i ), pl % vb (:, i ), pl % atp ( i ), e , pl % peri ( i )) end if else if ( vdotr > 0.0_DP ) then pl % isperi ( i ) = 1 else pl % isperi ( i ) = - 1 end if end if end if end do end if end if end associate return end subroutine symba_util_peri_pl module subroutine symba_util_rearray_pl ( self , system , param ) !! Author: the Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Clean up the massive body structures to remove discarded bodies and add new bodies implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( symba_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals class ( symba_pl ), allocatable :: tmp !! The discarded body list. integer ( I4B ) :: i , j , k , npl , nadd , nencmin , nenc_old , idnew1 , idnew2 , idold1 , idold2 logical , dimension (:), allocatable :: lmask , ldump_mask class ( symba_plplenc ), allocatable :: plplenc_old logical :: lencounter integer ( I4B ), dimension (:), allocatable :: levelg_orig_pl , levelm_orig_pl , levelg_orig_tp , levelm_orig_tp , nplenc_orig_pl , nplenc_orig_tp , ntpenc_orig_pl associate ( pl => self , pl_adds => system % pl_adds ) npl = pl % nbody nadd = pl_adds % nbody if ( npl == 0 ) return ! Deallocate any temporary variables if ( allocated ( pl % xbeg )) deallocate ( pl % xbeg ) if ( allocated ( pl % xend )) deallocate ( pl % xend ) ! Remove the discards and destroy the list, as the system already tracks pl_discards elsewhere allocate ( lmask ( npl )) lmask ( 1 : npl ) = pl % ldiscard ( 1 : npl ) allocate ( tmp , mold = self ) call pl % spill ( tmp , lspill_list = lmask , ldestructive = . true .) npl = pl % nbody call tmp % setup ( 0 , param ) deallocate ( tmp ) deallocate ( lmask ) ! Store the original plplenc list so we don't remove any of the original encounters nenc_old = system % plplenc_list % nenc if ( nenc_old > 0 ) then allocate ( plplenc_old , source = system % plplenc_list ) call plplenc_old % copy ( system % plplenc_list ) end if ! Add in any new bodies if ( nadd > 0 ) then ! Append the adds to the main pl object call pl % append ( pl_adds , lsource_mask = [(. true ., i = 1 , nadd )]) allocate ( ldump_mask ( npl + nadd )) ! This mask is used only to append the original Fortran binary particle.dat file with new bodies. This is ignored for NetCDF output ldump_mask ( 1 : npl ) = . false . ldump_mask ( npl + 1 : npl + nadd ) = pl % status ( npl + 1 : npl + nadd ) == NEW_PARTICLE npl = pl % nbody else allocate ( ldump_mask ( npl )) ldump_mask (:) = . false . end if ! Reset all of the status flags for this body pl % status ( 1 : npl ) = ACTIVE do i = 1 , npl call pl % info ( i )% set_value ( status = \"ACTIVE\" ) end do pl % ldiscard ( 1 : npl ) = . false . pl % lcollision ( 1 : npl ) = . false . pl % lmask ( 1 : npl ) = . true . select type ( param ) class is ( symba_parameters ) pl % lmtiny ( 1 : npl ) = pl % Gmass ( 1 : npl ) < param % GMTINY where ( pl % lmtiny ( 1 : npl )) pl % info ( 1 : npl )% particle_type = PL_TINY_TYPE_NAME elsewhere pl % info ( 1 : npl )% particle_type = PL_TYPE_NAME end where end select call pl % dump_particle_info ( param , idx = pack ([( i , i = 1 , npl )], ldump_mask )) deallocate ( ldump_mask ) ! Reindex the new list of bodies call pl % sort ( \"mass\" , ascending = . false .) call pl % index ( param ) ! Reset the kinship trackers call pl % reset_kinship ([( i , i = 1 , npl )]) ! Re-build the zero-level encounter list, being sure to save the original level information for all bodies allocate ( levelg_orig_pl , source = pl % levelg ) allocate ( levelm_orig_pl , source = pl % levelm ) allocate ( nplenc_orig_pl , source = pl % nplenc ) lencounter = pl % encounter_check ( system , param % dt , 0 ) if ( system % tp % nbody > 0 ) then select type ( tp => system % tp ) class is ( symba_tp ) allocate ( ntpenc_orig_pl , source = pl % ntpenc ) allocate ( levelg_orig_tp , source = tp % levelg ) allocate ( levelm_orig_tp , source = tp % levelm ) allocate ( nplenc_orig_tp , source = tp % nplenc ) lencounter = tp % encounter_check ( system , param % dt , 0 ) call move_alloc ( levelg_orig_tp , tp % levelg ) call move_alloc ( levelm_orig_tp , tp % levelm ) call move_alloc ( nplenc_orig_tp , tp % nplenc ) call move_alloc ( ntpenc_orig_pl , pl % ntpenc ) end select end if call move_alloc ( levelg_orig_pl , pl % levelg ) call move_alloc ( levelm_orig_pl , pl % levelm ) call move_alloc ( nplenc_orig_pl , pl % nplenc ) ! Re-index the encounter list as the index values may have changed if ( nenc_old > 0 ) then nencmin = min ( system % plplenc_list % nenc , plplenc_old % nenc ) do k = 1 , nencmin idnew1 = system % plplenc_list % id1 ( k ) idnew2 = system % plplenc_list % id2 ( k ) idold1 = plplenc_old % id1 ( k ) idold2 = plplenc_old % id2 ( k ) if (( idnew1 == idold1 ) . and . ( idnew2 == idold2 )) then ! This is an encounter we already know about, so save the old information system % plplenc_list % lvdotr ( k ) = plplenc_old % lvdotr ( k ) system % plplenc_list % status ( k ) = plplenc_old % status ( k ) system % plplenc_list % x1 (:, k ) = plplenc_old % x1 (:, k ) system % plplenc_list % x2 (:, k ) = plplenc_old % x2 (:, k ) system % plplenc_list % v1 (:, k ) = plplenc_old % v1 (:, k ) system % plplenc_list % v2 (:, k ) = plplenc_old % v2 (:, k ) system % plplenc_list % t ( k ) = plplenc_old % t ( k ) system % plplenc_list % level ( k ) = plplenc_old % level ( k ) else if ((( idnew1 == idold2 ) . and . ( idnew2 == idold1 ))) then ! This is an encounter we already know about, but with the order reversed, so save the old information system % plplenc_list % lvdotr ( k ) = plplenc_old % lvdotr ( k ) system % plplenc_list % status ( k ) = plplenc_old % status ( k ) system % plplenc_list % x1 (:, k ) = plplenc_old % x2 (:, k ) system % plplenc_list % x2 (:, k ) = plplenc_old % x1 (:, k ) system % plplenc_list % v1 (:, k ) = plplenc_old % v2 (:, k ) system % plplenc_list % v2 (:, k ) = plplenc_old % v1 (:, k ) system % plplenc_list % t ( k ) = plplenc_old % t ( k ) system % plplenc_list % level ( k ) = plplenc_old % level ( k ) end if end do end if end associate return end subroutine symba_util_rearray_pl module subroutine symba_util_reset_kinship ( self , idx ) !! author: David A. Minton !! !! Resets the kinship status of bodies. !! implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: idx !! Index array of bodies to reset ! Internals integer ( I4B ) :: i , j self % kin ( idx (:))% parent = idx (:) self % kin ( idx (:))% nchild = 0 do j = 1 , size ( idx (:)) i = idx ( j ) if ( allocated ( self % kin ( i )% child )) deallocate ( self % kin ( i )% child ) end do return end subroutine symba_util_reset_kinship module subroutine symba_util_resize_arr_kin ( arr , nnew ) !! author: David A. Minton !! !! Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size ! Internals type ( symba_kinship ), dimension (:), allocatable :: tmp !! Temporary storage array in case the input array is already allocated integer ( I4B ) :: nold !! Old size if ( nnew < 0 ) return if ( nnew == 0 ) then if ( allocated ( arr )) deallocate ( arr ) return end if if ( allocated ( arr )) then nold = size ( arr ) else nold = 0 end if allocate ( tmp ( nnew )) if ( nnew > nold ) then tmp ( 1 : nold ) = arr ( 1 : nold ) else tmp ( 1 : nnew ) = arr ( 1 : nnew ) end if call move_alloc ( tmp , arr ) return end subroutine symba_util_resize_arr_kin module subroutine symba_util_resize_merger ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. implicit none ! Arguments class ( symba_merger ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % ncomp , nnew ) call symba_util_resize_pl ( self , nnew ) return end subroutine symba_util_resize_merger module subroutine symba_util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a SyMBA massive body object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % lcollision , nnew ) call util_resize ( self % lencounter , nnew ) call util_resize ( self % lmtiny , nnew ) call util_resize ( self % nplenc , nnew ) call util_resize ( self % ntpenc , nnew ) call util_resize ( self % levelg , nnew ) call util_resize ( self % levelm , nnew ) call util_resize ( self % isperi , nnew ) call util_resize ( self % peri , nnew ) call util_resize ( self % atp , nnew ) call util_resize ( self % kin , nnew ) call util_resize_pl ( self , nnew ) return end subroutine symba_util_resize_pl module subroutine symba_util_resize_tp ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a test particle object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % nplenc , nnew ) call util_resize ( self % levelg , nnew ) call util_resize ( self % levelm , nnew ) call util_resize_tp ( self , nnew ) return end subroutine symba_util_resize_tp module subroutine symba_util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a SyMBA massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"nplenc\" ) call util_sort ( direction * pl % nplenc ( 1 : npl ), ind ( 1 : npl )) case ( \"ntpenc\" ) call util_sort ( direction * pl % ntpenc ( 1 : npl ), ind ( 1 : npl )) case ( \"levelg\" ) call util_sort ( direction * pl % levelg ( 1 : npl ), ind ( 1 : npl )) case ( \"levelm\" ) call util_sort ( direction * pl % levelm ( 1 : npl ), ind ( 1 : npl )) case ( \"peri\" ) call util_sort ( direction * pl % peri ( 1 : npl ), ind ( 1 : npl )) case ( \"atp\" ) call util_sort ( direction * pl % atp ( 1 : npl ), ind ( 1 : npl )) case ( \"lcollision\" , \"lencounter\" , \"lmtiny\" , \"nplm\" , \"nplplm\" , \"kin\" , \"info\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call util_sort_pl ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine symba_util_sort_pl module subroutine symba_util_sort_tp ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a SyMBA test particle object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( tp => self , ntp => self % nbody ) allocate ( ind ( ntp )) select case ( sortby ) case ( \"nplenc\" ) call util_sort ( direction * tp % nplenc ( 1 : ntp ), ind ( 1 : ntp )) case ( \"levelg\" ) call util_sort ( direction * tp % levelg ( 1 : ntp ), ind ( 1 : ntp )) case ( \"levelm\" ) call util_sort ( direction * tp % levelm ( 1 : ntp ), ind ( 1 : ntp )) case default ! Look for components in the parent class call util_sort_tp ( tp , sortby , ascending ) return end select call tp % rearrange ( ind ) end associate return end subroutine symba_util_sort_tp module subroutine symba_util_sort_rearrange_arr_kin ( arr , ind , n ) !! author: David A. Minton !! !! Rearrange a single array of particle kinship type in-place from an index list. implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange ! Internals type ( symba_kinship ), dimension (:), allocatable :: tmp !! Temporary copy of array used during rearrange operation integer ( I4B ) :: i , j if (. not . allocated ( arr ) . or . n <= 0 ) return allocate ( tmp , source = arr ) tmp ( 1 : n ) = arr ( ind ( 1 : n )) do i = 1 , n do j = 1 , tmp ( i )% nchild tmp ( i )% child ( j ) = ind ( tmp ( i )% child ( j )) end do end do call move_alloc ( tmp , arr ) return end subroutine symba_util_sort_rearrange_arr_kin module subroutine symba_util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange SyMBA massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) ! Internals integer ( I4B ) :: i , j associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % lcollision , ind , npl ) call util_sort_rearrange ( pl % lencounter , ind , npl ) call util_sort_rearrange ( pl % lmtiny , ind , npl ) call util_sort_rearrange ( pl % nplenc , ind , npl ) call util_sort_rearrange ( pl % ntpenc , ind , npl ) call util_sort_rearrange ( pl % levelg , ind , npl ) call util_sort_rearrange ( pl % levelm , ind , npl ) call util_sort_rearrange ( pl % isperi , ind , npl ) call util_sort_rearrange ( pl % peri , ind , npl ) call util_sort_rearrange ( pl % atp , ind , npl ) call util_sort_rearrange ( pl % kin , ind , npl ) call util_sort_rearrange_pl ( pl , ind ) end associate return end subroutine symba_util_sort_rearrange_pl module subroutine symba_util_sort_rearrange_tp ( self , ind ) !! author: David A. Minton !! !! Rearrange SyMBA test particle object in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) associate ( tp => self , ntp => self % nbody ) call util_sort_rearrange ( tp % nplenc , ind , ntp ) call util_sort_rearrange ( tp % levelg , ind , ntp ) call util_sort_rearrange ( tp % levelm , ind , ntp ) call util_sort_rearrange_tp ( tp , ind ) end associate return end subroutine symba_util_sort_rearrange_tp module subroutine symba_util_spill_arr_kin ( keeps , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Performs a spill operation on a single array of particle kinships !! This is the inverse of a spill operation implicit none ! Arguments type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: nspill , nkeep , nlist nkeep = count (. not . lspill_list (:)) nspill = count ( lspill_list (:)) nlist = size ( lspill_list (:)) if (. not . allocated ( keeps ) . or . nspill == 0 ) return if (. not . allocated ( discards )) then allocate ( discards ( nspill )) else if ( size ( discards ) /= nspill ) then deallocate ( discards ) allocate ( discards ( nspill )) end if discards (:) = pack ( keeps ( 1 : nlist ), lspill_list ( 1 : nlist )) if ( ldestructive ) then if ( nkeep > 0 ) then keeps (:) = pack ( keeps ( 1 : nlist ), . not . lspill_list ( 1 : nlist )) else deallocate ( keeps ) end if end if return end subroutine symba_util_spill_arr_kin module subroutine symba_util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) SyMBA massive body particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Spill all the common components associate ( keeps => self ) select type ( discards ) class is ( symba_pl ) call util_spill ( keeps % lcollision , discards % lcollision , lspill_list , ldestructive ) call util_spill ( keeps % lencounter , discards % lencounter , lspill_list , ldestructive ) call util_spill ( keeps % lmtiny , discards % lmtiny , lspill_list , ldestructive ) call util_spill ( keeps % nplenc , discards % nplenc , lspill_list , ldestructive ) call util_spill ( keeps % ntpenc , discards % ntpenc , lspill_list , ldestructive ) call util_spill ( keeps % levelg , discards % levelg , lspill_list , ldestructive ) call util_spill ( keeps % levelm , discards % levelm , lspill_list , ldestructive ) call util_spill ( keeps % isperi , discards % isperi , lspill_list , ldestructive ) call util_spill ( keeps % peri , discards % peri , lspill_list , ldestructive ) call util_spill ( keeps % atp , discards % atp , lspill_list , ldestructive ) call util_spill ( keeps % kin , discards % kin , lspill_list , ldestructive ) call util_spill_pl ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class symba_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_spill_pl module subroutine symba_util_spill_encounter ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) SyMBA encounter structure from active list to discard list !! Note: Because the symba_plplenc currently does not contain any additional variable components, this method can recieve it as an input as well. implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list associate ( keeps => self ) select type ( discards ) class is ( symba_encounter ) call util_spill ( keeps % level , discards % level , lspill_list , ldestructive ) call util_spill_encounter ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class symba_encounter or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_spill_encounter module subroutine symba_util_spill_tp ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) SyMBA test particle structure from active list to discard list !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list ! For each component, pack the discarded bodies into the discard object and do the inverse with the keeps !> Spill all the common components associate ( keeps => self ) select type ( discards ) class is ( symba_tp ) call util_spill ( keeps % nplenc , discards % nplenc , lspill_list , ldestructive ) call util_spill ( keeps % levelg , discards % levelg , lspill_list , ldestructive ) call util_spill ( keeps % levelm , discards % levelm , lspill_list , ldestructive ) call util_spill_tp ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class symba_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine symba_util_spill_tp end submodule s_symba_util","tags":"","loc":"sourcefile/symba_util.f90.html"},{"title":"symba_collision.f90 – swiftest","text":"This file depends on sourcefile~~symba_collision.f90~~EfferentGraph sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_collision Source Code symba_collision.f90 Source Code submodule ( symba_classes ) s_symba_collision use swiftest contains module function symba_collision_casedisruption ( system , param , colliders , frag ) result ( status ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Create the fragments resulting from a non-catastrophic disruption collision !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object ! Result integer ( I4B ) :: status !! Status flag assigned to this outcome ! Internals integer ( I4B ) :: i , nfrag logical :: lfailure character ( len = STRMAX ) :: message select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION ) message = \"Disruption between\" case ( COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) message = \"Supercatastrophic disruption between\" end select call symba_collision_collider_message ( system % pl , colliders % idx , message ) call fraggle_io_log_one_message ( message ) ! Collisional fragments will be uniformly distributed around the pre-impact barycenter call frag % set_mass_dist ( colliders , param ) ! Generate the position and velocity distributions of the fragments call frag % generate_fragments ( colliders , system , param , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"No fragment solution found, so treat as a pure hit-and-run\" ) status = ACTIVE nfrag = 0 select type ( pl => system % pl ) class is ( symba_pl ) pl % status ( colliders % idx (:)) = status pl % ldiscard ( colliders % idx (:)) = . false . pl % lcollision ( colliders % idx (:)) = . false . end select else ! Populate the list of new bodies nfrag = frag % nbody write ( message , * ) nfrag call fraggle_io_log_one_message ( \"Generating \" // trim ( adjustl ( message )) // \" fragments\" ) select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION ) status = DISRUPTION case ( COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) status = SUPERCATASTROPHIC end select frag % id ( 1 : nfrag ) = [( i , i = param % maxid + 1 , param % maxid + nfrag )] param % maxid = frag % id ( nfrag ) call symba_collision_mergeaddsub ( system , param , colliders , frag , status ) end if return end function symba_collision_casedisruption module function symba_collision_casehitandrun ( system , param , colliders , frag ) result ( status ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Create the fragments resulting from a non-catastrophic hit-and-run collision !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object ! Result integer ( I4B ) :: status !! Status flag assigned to this outcom ! Internals integer ( I4B ) :: i , ibiggest , nfrag , jtarg , jproj logical :: lpure character ( len = STRMAX ) :: message character ( len = NAMELEN ) :: idstr message = \"Hit and run between\" call symba_collision_collider_message ( system % pl , colliders % idx , message ) call fraggle_io_log_one_message ( trim ( adjustl ( message ))) if ( colliders % mass ( 1 ) > colliders % mass ( 2 )) then jtarg = 1 jproj = 2 else jtarg = 2 jproj = 1 end if if ( frag % mass_dist ( 2 ) > 0.9_DP * colliders % mass ( jproj )) then ! Pure hit and run, so we'll just keep the two bodies untouched call fraggle_io_log_one_message ( \"Pure hit and run. No new fragments generated.\" ) nfrag = 0 lpure = . true . else ! Imperfect hit and run, so we'll keep the largest body and destroy the other lpure = . false . call frag % set_mass_dist ( colliders , param ) ! Generate the position and velocity distributions of the fragments call frag % generate_fragments ( colliders , system , param , lpure ) if ( lpure ) then call fraggle_io_log_one_message ( \"Should have been a pure hit and run instead\" ) nfrag = 0 else nfrag = frag % nbody write ( message , * ) nfrag call fraggle_io_log_one_message ( \"Generating \" // trim ( adjustl ( message )) // \" fragments\" ) end if end if if ( lpure ) then ! Reset these bodies back to being active so that nothing further is done to them status = HIT_AND_RUN_PURE select type ( pl => system % pl ) class is ( symba_pl ) pl % status ( colliders % idx (:)) = ACTIVE pl % ldiscard ( colliders % idx (:)) = . false . pl % lcollision ( colliders % idx (:)) = . false . end select else ibiggest = colliders % idx ( maxloc ( system % pl % Gmass ( colliders % idx (:)), dim = 1 )) frag % id ( 1 ) = system % pl % id ( ibiggest ) frag % id ( 2 : nfrag ) = [( i , i = param % maxid + 1 , param % maxid + nfrag - 1 )] param % maxid = frag % id ( nfrag ) status = HIT_AND_RUN_DISRUPT call symba_collision_mergeaddsub ( system , param , colliders , frag , status ) end if return end function symba_collision_casehitandrun module function symba_collision_casemerge ( system , param , colliders , frag ) result ( status ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Merge massive bodies. !! !! Adapted from David E. Kaufmann's Swifter routines symba_merge_pl.f90 and symba_discard_merge_pl.f90 !! !! Adapted from Hal Levison's Swift routines symba5_merge.f and discard_mass_merge.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object ! Result integer ( I4B ) :: status !! Status flag assigned to this outcome ! Internals integer ( I4B ) :: i , j , k , ibiggest real ( DP ), dimension ( 2 ) :: volume , density real ( DP ) :: pe real ( DP ), dimension ( NDIM ) :: L_spin_new character ( len = NAMELEN ) :: idstr character ( len = STRMAX ) :: message message = \"Merging\" call symba_collision_collider_message ( system % pl , colliders % idx , message ) call fraggle_io_log_one_message ( message ) select type ( pl => system % pl ) class is ( symba_pl ) call frag % set_mass_dist ( colliders , param ) ibiggest = colliders % idx ( maxloc ( pl % Gmass ( colliders % idx (:)), dim = 1 )) frag % id ( 1 ) = pl % id ( ibiggest ) frag % xb (:, 1 ) = frag % xbcom (:) frag % vb (:, 1 ) = frag % vbcom (:) if ( param % lrotation ) then ! Conserve angular momentum by putting pre-impact orbital momentum into spin of the new body L_spin_new (:) = colliders % L_orbit (:, 1 ) + colliders % L_orbit (:, 2 ) + colliders % L_spin (:, 1 ) + colliders % L_spin (:, 2 ) ! Assume prinicpal axis rotation on 3rd Ip axis frag % rot (:, 1 ) = L_spin_new (:) / ( frag % Ip ( 3 , 1 ) * frag % mass ( 1 ) * frag % radius ( 1 ) ** 2 ) else ! If spin is not enabled, we will consider the lost pre-collision angular momentum as \"escaped\" and add it to our bookkeeping variable param % Lescape (:) = param % Lescape (:) + colliders % L_orbit (:, 1 ) + colliders % L_orbit (:, 2 ) end if ! Keep track of the component of potential energy due to the pre-impact colliders%idx for book-keeping pe = 0.0_DP do j = 1 , colliders % ncoll do i = j + 1 , colliders % ncoll pe = pe - pl % Gmass ( i ) * pl % mass ( j ) / norm2 ( pl % xb (:, i ) - pl % xb (:, j )) end do end do param % Ecollisions = param % Ecollisions + pe param % Euntracked = param % Euntracked - pe ! Update any encounter lists that have the removed bodies in them so that they instead point to the new do k = 1 , system % plplenc_list % nenc do j = 1 , colliders % ncoll i = colliders % idx ( j ) if ( i == ibiggest ) cycle if ( system % plplenc_list % id1 ( k ) == pl % id ( i )) then system % plplenc_list % id1 ( k ) = pl % id ( ibiggest ) system % plplenc_list % index1 ( k ) = i end if if ( system % plplenc_list % id2 ( k ) == pl % id ( i )) then system % plplenc_list % id2 ( k ) = pl % id ( ibiggest ) system % plplenc_list % index2 ( k ) = i end if if ( system % plplenc_list % id1 ( k ) == system % plplenc_list % id2 ( k )) system % plplenc_list % status ( k ) = INACTIVE end do end do status = MERGED call symba_collision_mergeaddsub ( system , param , colliders , frag , status ) end select return end function symba_collision_casemerge subroutine symba_collision_collider_message ( pl , collidx , collider_message ) !! author: David A. Minton !! !! Prints a nicely formatted message about which bodies collided, including their names and ids. !! This subroutine appends the body names and ids to an input message. implicit none ! Arguments class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object integer ( I4B ), dimension (:), intent ( in ) :: collidx !! Index of collisional colliders%idx members character ( * ), intent ( inout ) :: collider_message !! The message to print to the screen. ! Internals integer ( I4B ) :: i , n character ( len = STRMAX ) :: idstr n = size ( collidx ) if ( n == 0 ) return do i = 1 , n if ( i > 1 ) collider_message = trim ( adjustl ( collider_message )) // \" and \" collider_message = \" \" // trim ( adjustl ( collider_message )) // \" \" // trim ( adjustl ( pl % info ( collidx ( i ))% name )) write ( idstr , '(I10)' ) pl % id ( collidx ( i )) collider_message = trim ( adjustl ( collider_message )) // \" (\" // trim ( adjustl ( idstr )) // \") \" end do return end subroutine symba_collision_collider_message module function symba_collision_check_encounter ( self , system , param , t , dt , irec ) result ( lany_collision ) !! author: David A. Minton !! !! Check for merger between massive bodies and test particles in SyMBA !! !! Adapted from David E. Kaufmann's Swifter routine symba_merge.f90 and symba_merge_tp.f90 !! !! Adapted from Hal Levison's Swift routine symba5_merge.f implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! current time real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Result logical :: lany_collision !! Returns true if cany pair of encounters resulted in a collision ! Internals logical , dimension (:), allocatable :: lcollision , lmask real ( DP ), dimension ( NDIM ) :: xr , vr integer ( I4B ) :: i , j , k , nenc real ( DP ) :: rlim , Gmtot logical :: isplpl character ( len = STRMAX ) :: timestr , idstri , idstrj , message lany_collision = . false . if ( self % nenc == 0 ) return select type ( self ) class is ( symba_plplenc ) isplpl = . true . class default isplpl = . false . end select select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) nenc = self % nenc nenc = self % nenc allocate ( lmask ( nenc )) lmask (:) = (( self % status ( 1 : nenc ) == ACTIVE ) . and . ( pl % levelg ( self % index1 ( 1 : nenc )) >= irec )) if ( isplpl ) then lmask (:) = lmask (:) . and . ( pl % levelg ( self % index2 ( 1 : nenc )) >= irec ) else lmask (:) = lmask (:) . and . ( tp % levelg ( self % index2 ( 1 : nenc )) >= irec ) end if if (. not . any ( lmask (:))) return allocate ( lcollision ( nenc )) lcollision (:) = . false . if ( isplpl ) then do concurrent ( k = 1 : nenc , lmask ( k )) i = self % index1 ( k ) j = self % index2 ( k ) xr (:) = pl % xh (:, i ) - pl % xh (:, j ) vr (:) = pl % vb (:, i ) - pl % vb (:, j ) rlim = pl % radius ( i ) + pl % radius ( j ) Gmtot = pl % Gmass ( i ) + pl % Gmass ( j ) lcollision ( k ) = symba_collision_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), Gmtot , rlim , dt , self % lvdotr ( k )) end do else do concurrent ( k = 1 : nenc , lmask ( k )) i = self % index1 ( k ) j = self % index2 ( k ) xr (:) = pl % xh (:, i ) - tp % xh (:, j ) vr (:) = pl % vb (:, i ) - tp % vb (:, j ) lcollision ( k ) = symba_collision_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % Gmass ( i ), pl % radius ( i ), dt , self % lvdotr ( k )) end do end if if ( any ( lcollision ( 1 : nenc ))) call pl % xh2xb ( system % cb ) ! Update the central body barycenteric position vector to get us out of DH and into bary do k = 1 , nenc i = self % index1 ( k ) j = self % index2 ( k ) if ( lcollision ( k )) self % status ( k ) = COLLISION self % t ( k ) = t self % x1 (:, k ) = pl % xh (:, i ) + system % cb % xb (:) self % v1 (:, k ) = pl % vb (:, i ) if ( isplpl ) then self % x2 (:, k ) = pl % xh (:, j ) + system % cb % xb (:) self % v2 (:, k ) = pl % vb (:, j ) if ( lcollision ( k )) then ! Check to see if either of these bodies has been involved with a collision before, and if so, make this a collisional colliders%idx if ( pl % lcollision ( i ) . or . pl % lcollision ( j )) call pl % make_colliders ([ i , j ]) ! Set the collision flag for these to bodies to true in case they become involved in another collision later in the step pl % lcollision ([ i , j ]) = . true . pl % status ([ i , j ]) = COLLISION call pl % info ( i )% set_value ( status = \"COLLISION\" , discard_time = t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i )) call pl % info ( j )% set_value ( status = \"COLLISION\" , discard_time = t , discard_xh = pl % xh (:, j ), discard_vh = pl % vh (:, j )) end if else self % x2 (:, k ) = tp % xh (:, j ) + system % cb % xb (:) self % v2 (:, k ) = tp % vb (:, j ) if ( lcollision ( k )) then tp % status ( j ) = DISCARDED_PLR tp % ldiscard ( j ) = . true . write ( idstri , * ) pl % id ( i ) write ( idstrj , * ) tp % id ( j ) write ( timestr , * ) t call tp % info ( j )% set_value ( status = \"DISCARDED_PLR\" , discard_time = t , discard_xh = tp % xh (:, j ), discard_vh = tp % vh (:, j )) write ( message , * ) \"Particle \" // trim ( adjustl ( tp % info ( j )% name )) // \" (\" // trim ( adjustl ( idstrj )) // \")\" & // \" collided with massive body \" // trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstri )) // \")\" & // \" at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( message ) end if end if end do end select end select lany_collision = any ( lcollision (:)) ! Extract the pl-pl encounter list and return the plplcollision_list if ( lany_collision ) then select type ( plplenc_list => self ) class is ( symba_plplenc ) call plplenc_list % extract_collisions ( system , param ) end select end if return end function symba_collision_check_encounter pure elemental function symba_collision_check_one ( xr , yr , zr , vxr , vyr , vzr , Gmtot , rlim , dt , lvdotr ) result ( lcollision ) !! author: David A. Minton !! !! Check for a merger between a single pair of particles !! !! Adapted from David E. Kaufmann's Swifter routines symba_merge_tp.f90 and symba_merge_pl.f90 !! !! Adapted from Hal Levison's Swift routine symba5_merge.f implicit none ! Arguments real ( DP ), intent ( in ) :: xr , yr , zr !! Relative position vector components real ( DP ), intent ( in ) :: vxr , vyr , vzr !! Relative velocity vector components real ( DP ), intent ( in ) :: Gmtot !! Sum of G*mass of colliding bodies real ( DP ), intent ( in ) :: rlim !! Collision limit - Typically the sum of the radii of colliding bodies real ( DP ), intent ( in ) :: dt !! Step size logical , intent ( in ) :: lvdotr !! Logical flag indicating that these two bodies are approaching in the current substep ! Result logical :: lcollision !! Logical flag indicating whether these two bodies will collide or not ! Internals real ( DP ) :: r2 , rlim2 , a , e , q , vdotr , tcr2 , dt2 r2 = xr ** 2 + yr ** 2 + zr ** 2 rlim2 = rlim ** 2 if ( r2 <= rlim2 ) then ! checks if bodies are actively colliding in this time step lcollision = . true . else ! if they are not actively colliding in  this time step, checks if they are going to collide next time step based on velocities and q lcollision = . false . vdotr = xr * vxr + yr * vyr + zr * vzr if ( lvdotr . and . ( vdotr > 0.0_DP )) then tcr2 = r2 / ( vxr ** 2 + vyr ** 2 + vzr ** 2 ) dt2 = dt ** 2 if ( tcr2 <= dt2 ) then call orbel_xv2aeq ( Gmtot , [ xr , yr , zr ], [ vxr , vyr , vzr ], a , e , q ) lcollision = ( q < rlim ) end if end if end if return end function symba_collision_check_one function symba_collision_consolidate_colliders ( pl , cb , param , idx_parent , colliders ) result ( lflag ) !! author: David A. Minton !! !! Loops through the pl-pl collision list and groups families together by index. Outputs the indices of all colliders%idx members, !! and pairs of quantities (x and v vectors, mass, radius, L_spin, and Ip) that can be used to resolve the collisional outcome. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA massive body object class ( symba_cb ), intent ( inout ) :: cb !! SyMBA central body object class ( symba_parameters ), intent ( in ) :: param !! Current run configuration parameters with SyMBA additions integer ( I4B ), dimension ( 2 ), intent ( inout ) :: idx_parent !! Index of the two bodies considered the \"parents\" of the collision class ( fraggle_colliders ), intent ( out ) :: colliders ! Result logical :: lflag !! Logical flag indicating whether a colliders%idx was successfully created or not ! Internals type collidx_array integer ( I4B ), dimension (:), allocatable :: id integer ( I4B ), dimension (:), allocatable :: idx end type collidx_array type ( collidx_array ), dimension ( 2 ) :: parent_child_index_array integer ( I4B ), dimension ( 2 ) :: nchild integer ( I4B ) :: i , j , ncolliders , idx_child real ( DP ), dimension ( 2 ) :: volume , density real ( DP ) :: mchild , mtot , volchild real ( DP ), dimension ( NDIM ) :: xc , vc , xcom , vcom , xchild , vchild , xcrossv real ( DP ), dimension ( NDIM , 2 ) :: mxc , vcc nchild (:) = pl % kin ( idx_parent (:))% nchild ! If all of these bodies share a parent, but this is still a unique collision, move the last child ! out of the parent's position and make it the secondary body if ( idx_parent ( 1 ) == idx_parent ( 2 )) then if ( nchild ( 1 ) == 0 ) then ! There is only one valid body recorded in this pair (this could happen due to restructuring of the kinship relationships, though it should be rare) lflag = . false . call pl % reset_kinship ([ idx_parent ( 1 )]) return end if idx_parent ( 2 ) = pl % kin ( idx_parent ( 1 ))% child ( nchild ( 1 )) nchild ( 1 ) = nchild ( 1 ) - 1 nchild ( 2 ) = 0 pl % kin ( idx_parent (:))% nchild = nchild (:) pl % kin ( idx_parent ( 2 ))% parent = idx_parent ( 1 ) end if colliders % mass (:) = pl % mass ( idx_parent (:)) ! Note: This is meant to mass, not G*mass, as the collisional regime determination uses mass values that will be converted to Si colliders % radius (:) = pl % radius ( idx_parent (:)) volume (:) = ( 4.0_DP / 3.0_DP ) * PI * colliders % radius (:) ** 3 ! Group together the ids and indexes of each collisional parent and its children do j = 1 , 2 allocate ( parent_child_index_array ( j )% idx ( nchild ( j ) + 1 )) allocate ( parent_child_index_array ( j )% id ( nchild ( j ) + 1 )) associate ( idx_arr => parent_child_index_array ( j )% idx , & id_arr => parent_child_index_array ( j )% id , & ncj => nchild ( j ), & pl => pl , & plkinj => pl % kin ( idx_parent ( j ))) idx_arr ( 1 ) = idx_parent ( j ) if ( ncj > 0 ) idx_arr ( 2 : ncj + 1 ) = plkinj % child ( 1 : ncj ) id_arr (:) = pl % id ( idx_arr (:)) end associate end do ! Consolidate the groups of collsional parents with any children they may have into a single \"colliders%idx\" index array ncolliders = 2 + sum ( nchild (:)) allocate ( colliders % idx ( ncolliders )) colliders % idx = [ parent_child_index_array ( 1 )% idx (:), parent_child_index_array ( 2 )% idx (:)] colliders % ncoll = count ( pl % lcollision ( colliders % idx (:))) colliders % idx = pack ( colliders % idx (:), pl % lcollision ( colliders % idx (:))) colliders % L_spin (:,:) = 0.0_DP colliders % Ip (:,:) = 0.0_DP ! Find the barycenter of each body along with its children, if it has any do j = 1 , 2 colliders % xb (:, j ) = pl % xh (:, idx_parent ( j )) + cb % xb (:) colliders % vb (:, j ) = pl % vb (:, idx_parent ( j )) ! Assume principal axis rotation about axis corresponding to highest moment of inertia (3rd Ip) if ( param % lrotation ) then colliders % Ip (:, j ) = colliders % mass ( j ) * pl % Ip (:, idx_parent ( j )) colliders % L_spin (:, j ) = colliders % Ip ( 3 , j ) * colliders % radius ( j ) ** 2 * pl % rot (:, idx_parent ( j )) end if if ( nchild ( j ) > 0 ) then do i = 1 , nchild ( j ) ! Loop over all children and take the mass weighted mean of the properties idx_child = parent_child_index_array ( j )% idx ( i + 1 ) if (. not . pl % lcollision ( idx_child )) cycle mchild = pl % mass ( idx_child ) xchild (:) = pl % xh (:, idx_child ) + cb % xb (:) vchild (:) = pl % vb (:, idx_child ) volchild = ( 4.0_DP / 3.0_DP ) * PI * pl % radius ( idx_child ) ** 3 volume ( j ) = volume ( j ) + volchild ! Get angular momentum of the child-parent pair and add that to the spin ! Add the child's spin if ( param % lrotation ) then xcom (:) = ( colliders % mass ( j ) * colliders % xb (:, j ) + mchild * xchild (:)) / ( colliders % mass ( j ) + mchild ) vcom (:) = ( colliders % mass ( j ) * colliders % vb (:, j ) + mchild * vchild (:)) / ( colliders % mass ( j ) + mchild ) xc (:) = colliders % xb (:, j ) - xcom (:) vc (:) = colliders % vb (:, j ) - vcom (:) xcrossv (:) = xc (:) . cross . vc (:) colliders % L_spin (:, j ) = colliders % L_spin (:, j ) + colliders % mass ( j ) * xcrossv (:) xc (:) = xchild (:) - xcom (:) vc (:) = vchild (:) - vcom (:) xcrossv (:) = xc (:) . cross . vc (:) colliders % L_spin (:, j ) = colliders % L_spin (:, j ) + mchild * xcrossv (:) colliders % L_spin (:, j ) = colliders % L_spin (:, j ) + mchild * pl % Ip ( 3 , idx_child ) * pl % radius ( idx_child ) ** 2 * pl % rot (:, idx_child ) colliders % Ip (:, j ) = colliders % Ip (:, j ) + mchild * pl % Ip (:, idx_child ) end if ! Merge the child and parent colliders % mass ( j ) = colliders % mass ( j ) + mchild colliders % xb (:, j ) = xcom (:) colliders % vb (:, j ) = vcom (:) end do end if density ( j ) = colliders % mass ( j ) / volume ( j ) colliders % radius ( j ) = ( 3 * volume ( j ) / ( 4 * PI )) ** ( 1.0_DP / 3.0_DP ) if ( param % lrotation ) colliders % Ip (:, j ) = colliders % Ip (:, j ) / colliders % mass ( j ) xcom (:) = ( colliders % mass ( 1 ) * colliders % xb (:, 1 ) + colliders % mass ( 2 ) * colliders % xb (:, 2 )) / sum ( colliders % mass (:)) vcom (:) = ( colliders % mass ( 1 ) * colliders % vb (:, 1 ) + colliders % mass ( 2 ) * colliders % vb (:, 2 )) / sum ( colliders % mass (:)) mxc (:, 1 ) = colliders % mass ( 1 ) * ( colliders % xb (:, 1 ) - xcom (:)) mxc (:, 2 ) = colliders % mass ( 2 ) * ( colliders % xb (:, 2 ) - xcom (:)) vcc (:, 1 ) = colliders % vb (:, 1 ) - vcom (:) vcc (:, 2 ) = colliders % vb (:, 2 ) - vcom (:) colliders % L_orbit (:,:) = mxc (:,:) . cross . vcc (:,:) end do lflag = . true . ! Destroy the kinship relationships for all members of this colliders%idx call pl % reset_kinship ( colliders % idx (:)) return end function symba_collision_consolidate_colliders module subroutine symba_collision_encounter_extract_collisions ( self , system , param ) !! author: David A. Minton !! !! Processes the pl-pl encounter list remove only those encounters that led to a collision !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , dimension (:), allocatable :: lplpl_collision logical , dimension (:), allocatable :: lplpl_unique_parent integer ( I4B ), dimension (:), pointer :: plparent integer ( I4B ), dimension (:), allocatable :: collision_idx , unique_parent_idx integer ( I4B ) :: i , index_coll , ncollisions , nunique_parent , nplplenc select type ( pl => system % pl ) class is ( symba_pl ) associate ( plplenc_list => self , idx1 => self % index1 , idx2 => self % index2 , plparent => pl % kin % parent ) nplplenc = plplenc_list % nenc allocate ( lplpl_collision ( nplplenc )) lplpl_collision (:) = plplenc_list % status ( 1 : nplplenc ) == COLLISION if (. not . any ( lplpl_collision )) return ! Collisions have been detected in this step. So we need to determine which of them are between unique bodies. ! Get the subset of pl-pl encounters that lead to a collision ncollisions = count ( lplpl_collision (:)) allocate ( collision_idx ( ncollisions )) collision_idx = pack ([( i , i = 1 , nplplenc )], lplpl_collision ) ! Get the subset of collisions that involve a unique pair of parents allocate ( lplpl_unique_parent ( ncollisions )) lplpl_unique_parent (:) = plparent ( idx1 ( collision_idx (:))) /= plparent ( idx2 ( collision_idx (:))) nunique_parent = count ( lplpl_unique_parent (:)) allocate ( unique_parent_idx ( nunique_parent )) unique_parent_idx = pack ( collision_idx (:), lplpl_unique_parent (:)) ! Scrub all pl-pl collisions involving unique pairs of parents, which will remove all duplicates and leave behind ! all pairs that have themselves as parents but are not part of the unique parent list. This can hapepn in rare cases ! due to restructuring of parent/child relationships when there are large numbers of multi-body collisions in a single ! step lplpl_unique_parent (:) = . true . do index_coll = 1 , ncollisions associate ( ip1 => plparent ( idx1 ( collision_idx ( index_coll ))), ip2 => plparent ( idx2 ( collision_idx ( index_coll )))) lplpl_unique_parent (:) = . not . ( any ( plparent ( idx1 ( unique_parent_idx (:))) == ip1 ) . or . & any ( plparent ( idx2 ( unique_parent_idx (:))) == ip1 ) . or . & any ( plparent ( idx1 ( unique_parent_idx (:))) == ip2 ) . or . & any ( plparent ( idx2 ( unique_parent_idx (:))) == ip2 ) ) end associate end do ! Reassemble collision index list to include only those containing the unique pairs of parents, plus all the non-unique pairs that don't ! contain a parent body on the unique parent list. ncollisions = nunique_parent + count ( lplpl_unique_parent ) collision_idx = [ unique_parent_idx (:), pack ( collision_idx (:), lplpl_unique_parent (:))] ! Create a mask that contains only the pl-pl encounters that did not result in a collision, and then discard them lplpl_collision (:) = . false . lplpl_collision ( collision_idx (:)) = . true . call plplenc_list % spill ( system % plplcollision_list , lplpl_collision , ldestructive = . true .) ! Extract any encounters that are not collisions from the list. end associate end select return end subroutine symba_collision_encounter_extract_collisions module subroutine symba_collision_make_colliders_pl ( self , idx ) !! author: Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton !! !! When a single body is involved in more than one collision in a single step, it becomes part of a colliders%idx. !! The largest body involved in a multi-body collision is the \"parent\" and all bodies that collide with it are its \"children,\" !! including those that collide with the children. !! !! Adapted from David E. Kaufmann's Swifter routine symba_merge_pl.f90 !! !! Adapted from Hal Levison's Swift routine symba5_merge.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension ( 2 ), intent ( in ) :: idx !! Array holding the indices of the two bodies involved in the collision ! Internals integer ( I4B ) :: i , j , index_parent , index_child , p1 , p2 integer ( I4B ) :: nchild_inherit , nchild_orig , nchild_new integer ( I4B ), dimension (:), allocatable :: temp associate ( pl => self ) p1 = pl % kin ( idx ( 1 ))% parent p2 = pl % kin ( idx ( 2 ))% parent if ( p1 == p2 ) return ! This is a collision between to children of a shared parent. We will ignore it. if ( pl % mass ( p1 ) > pl % mass ( p2 )) then index_parent = p1 index_child = p2 else index_parent = p2 index_child = p1 end if ! Expand the child array (or create it if necessary) and copy over the previous lists of children nchild_orig = pl % kin ( index_parent )% nchild nchild_inherit = pl % kin ( index_child )% nchild nchild_new = nchild_orig + nchild_inherit + 1 allocate ( temp ( nchild_new )) if ( nchild_orig > 0 ) temp ( 1 : nchild_orig ) = pl % kin ( index_parent )% child ( 1 : nchild_orig ) ! Find out if the child body has any children of its own. The new parent wil inherit these children if ( nchild_inherit > 0 ) then temp ( nchild_orig + 1 : nchild_orig + nchild_inherit ) = pl % kin ( index_child )% child ( 1 : nchild_inherit ) do i = 1 , nchild_inherit j = pl % kin ( index_child )% child ( i ) ! Set the childrens' parent to the new parent pl % kin ( j )% parent = index_parent end do end if call pl % reset_kinship ([ index_child ]) ! Add the new child to its parent pl % kin ( index_child )% parent = index_parent temp ( nchild_new ) = index_child ! Save the new child array to the parent pl % kin ( index_parent )% nchild = nchild_new call move_alloc ( from = temp , to = pl % kin ( index_parent )% child ) end associate return end subroutine symba_collision_make_colliders_pl subroutine symba_collision_mergeaddsub ( system , param , colliders , frag , status ) !! author:  David A. Minton !! !! Fills the pl_discards and pl_adds with removed and added bodies !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ), intent ( in ) :: status !! Status flag to assign to adds ! Internals integer ( I4B ) :: i , ibiggest , ismallest , iother , nstart , nend , ncolliders , nfrag logical , dimension ( system % pl % nbody ) :: lmask class ( symba_pl ), allocatable :: plnew , plsub character ( * ), parameter :: FRAGFMT = '(\"Newbody\",I0.7)' character ( len = NAMELEN ) :: newname character ( len = STRMAX ) :: message select type ( pl => system % pl ) class is ( symba_pl ) select type ( pl_discards => system % pl_discards ) class is ( symba_merger ) associate ( info => pl % info , pl_adds => system % pl_adds , cb => system % cb , npl => pl % nbody ) ! Add the colliders%idx bodies to the subtraction list ncolliders = colliders % ncoll nfrag = frag % nbody ! Setup new bodies allocate ( plnew , mold = pl ) call plnew % setup ( nfrag , param ) ibiggest = colliders % idx ( maxloc ( pl % Gmass ( colliders % idx (:)), dim = 1 )) ismallest = colliders % idx ( minloc ( pl % Gmass ( colliders % idx (:)), dim = 1 )) ! Copy over identification, information, and physical properties of the new bodies from the fragment list plnew % id ( 1 : nfrag ) = frag % id ( 1 : nfrag ) plnew % xb (:, 1 : nfrag ) = frag % xb (:, 1 : nfrag ) plnew % vb (:, 1 : nfrag ) = frag % vb (:, 1 : nfrag ) call pl % vb2vh ( cb ) call pl % xh2xb ( cb ) do i = 1 , nfrag plnew % xh (:, i ) = frag % xb (:, i ) - cb % xb (:) plnew % vh (:, i ) = frag % vb (:, i ) - cb % vb (:) end do plnew % mass ( 1 : nfrag ) = frag % mass ( 1 : nfrag ) plnew % Gmass ( 1 : nfrag ) = param % GU * frag % mass ( 1 : nfrag ) plnew % radius ( 1 : nfrag ) = frag % radius ( 1 : nfrag ) plnew % density ( 1 : nfrag ) = frag % mass ( 1 : nfrag ) / frag % radius ( 1 : nfrag ) call plnew % set_rhill ( cb ) select case ( status ) case ( DISRUPTION ) plnew % status ( 1 : nfrag ) = NEW_PARTICLE do i = 1 , nfrag write ( newname , FRAGFMT ) frag % id ( i ) call plnew % info ( i )% set_value ( origin_type = \"Disruption\" , origin_time = param % t , name = newname , origin_xh = plnew % xh (:, i ), origin_vh = plnew % vh (:, i )) end do do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) then iother = ismallest else iother = ibiggest end if call pl % info ( colliders % idx ( i ))% set_value ( status = \"Disruption\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do case ( SUPERCATASTROPHIC ) plnew % status ( 1 : nfrag ) = NEW_PARTICLE do i = 1 , nfrag write ( newname , FRAGFMT ) frag % id ( i ) call plnew % info ( i )% set_value ( origin_type = \"Supercatastrophic\" , origin_time = param % t , name = newname , origin_xh = plnew % xh (:, i ), origin_vh = plnew % vh (:, i )) end do do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) then iother = ismallest else iother = ibiggest end if call pl % info ( colliders % idx ( i ))% set_value ( status = \"Supercatastrophic\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do case ( HIT_AND_RUN_DISRUPT ) call plnew % info ( 1 )% copy ( pl % info ( ibiggest )) plnew % status ( 1 ) = OLD_PARTICLE do i = 2 , nfrag write ( newname , FRAGFMT ) frag % id ( i ) call plnew % info ( i )% set_value ( origin_type = \"Hit and run fragment\" , origin_time = param % t , name = newname , origin_xh = plnew % xh (:, i ), origin_vh = plnew % vh (:, i )) end do do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) cycle iother = ibiggest call pl % info ( colliders % idx ( i ))% set_value ( status = \"Hit and run fragmention\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do case ( MERGED ) call plnew % info ( 1 )% copy ( pl % info ( ibiggest )) plnew % status ( 1 ) = OLD_PARTICLE do i = 1 , ncolliders if ( colliders % idx ( i ) == ibiggest ) cycle iother = ibiggest call pl % info ( colliders % idx ( i ))% set_value ( status = \"MERGED\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = iother ) end do end select if ( param % lrotation ) then plnew % Ip (:, 1 : nfrag ) = frag % Ip (:, 1 : nfrag ) plnew % rot (:, 1 : nfrag ) = frag % rot (:, 1 : nfrag ) end if if ( param % ltides ) then plnew % Q = pl % Q ( ibiggest ) plnew % k2 = pl % k2 ( ibiggest ) plnew % tlag = pl % tlag ( ibiggest ) end if !Copy over or set integration parameters for new bodies plnew % lcollision ( 1 : nfrag ) = . false . plnew % ldiscard ( 1 : nfrag ) = . false . plnew % levelg ( 1 : nfrag ) = pl % levelg ( ibiggest ) plnew % levelm ( 1 : nfrag ) = pl % levelm ( ibiggest ) ! Log the properties of the new bodies call fraggle_io_log_pl ( plnew , param ) ! Append the new merged body to the list nstart = pl_adds % nbody + 1 nend = pl_adds % nbody + nfrag call pl_adds % append ( plnew , lsource_mask = [(. true ., i = 1 , nfrag )]) ! Record how many bodies were added in this event pl_adds % ncomp ( nstart : nend ) = plnew % nbody ! Add the discarded bodies to the discard list pl % status ( colliders % idx (:)) = MERGED pl % ldiscard ( colliders % idx (:)) = . true . pl % lcollision ( colliders % idx (:)) = . true . lmask (:) = . false . lmask ( colliders % idx (:)) = . true . call plnew % setup ( 0 , param ) deallocate ( plnew ) allocate ( plsub , mold = pl ) call pl % spill ( plsub , lmask , ldestructive = . false .) nstart = pl_discards % nbody + 1 nend = pl_discards % nbody + ncolliders call pl_discards % append ( plsub , lsource_mask = [(. true ., i = 1 , ncolliders )]) ! Record how many bodies were subtracted in this event pl_discards % ncomp ( nstart : nend ) = ncolliders call plsub % setup ( 0 , param ) deallocate ( plsub ) end associate end select end select return end subroutine symba_collision_mergeaddsub module subroutine symba_collision_resolve_fragmentations ( self , system , param ) !! author: David A. Minton !! !! Process list of collisions, determine the collisional regime, and then create fragments. !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions ! Internals ! Internals integer ( I4B ), dimension ( 2 ) :: idx_parent !! Index of the two bodies considered the \"parents\" of the collision real ( DP ), dimension ( NDIM , 2 ) :: x , v , L_spin , Ip !! Output values that represent a 2-body equivalent of a possibly 2+ body collision real ( DP ), dimension ( 2 ) :: mass , radius !! Output values that represent a 2-body equivalent of a possibly 2+ body collision logical :: lgoodcollision integer ( I4B ) :: i type ( fraggle_colliders ) :: colliders !! Fraggle colliders object type ( fraggle_fragments ) :: frag !! Fraggle fragmentation system object associate ( plplcollision_list => self , ncollisions => self % nenc , idx1 => self % index1 , idx2 => self % index2 ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( cb => system % cb ) class is ( symba_cb ) do i = 1 , ncollisions idx_parent ( 1 ) = pl % kin ( idx1 ( i ))% parent idx_parent ( 2 ) = pl % kin ( idx2 ( i ))% parent lgoodcollision = symba_collision_consolidate_colliders ( pl , cb , param , idx_parent , colliders ) if ((. not . lgoodcollision ) . or . any ( pl % status ( idx_parent (:)) /= COLLISION )) cycle call colliders % regime ( frag , system , param ) select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION , COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) plplcollision_list % status ( i ) = symba_collision_casedisruption ( system , param , colliders , frag ) case ( COLLRESOLVE_REGIME_HIT_AND_RUN ) plplcollision_list % status ( i ) = symba_collision_casehitandrun ( system , param , colliders , frag ) case ( COLLRESOLVE_REGIME_MERGE , COLLRESOLVE_REGIME_GRAZE_AND_MERGE ) plplcollision_list % status ( i ) = symba_collision_casemerge ( system , param , colliders , frag ) case default write ( * , * ) \"Error in symba_collision, unrecognized collision regime\" call util_exit ( FAILURE ) end select end do end select end select end associate return end subroutine symba_collision_resolve_fragmentations module subroutine symba_collision_resolve_mergers ( self , system , param ) !! author: David A. Minton !! !! Process list of collisions and merge colliding bodies together. !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions ! Internals integer ( I4B ), dimension ( 2 ) :: idx_parent !! Index of the two bodies considered the \"parents\" of the collision real ( DP ), dimension ( NDIM , 2 ) :: x , v , L_spin , Ip !! Output values that represent a 2-body equivalent of a possibly 2+ body collision real ( DP ), dimension ( 2 ) :: mass , radius !! Output values that represent a 2-body equivalent of a possibly 2+ body collision logical :: lgoodcollision integer ( I4B ) :: i type ( fraggle_colliders ) :: colliders !! Fraggle colliders object type ( fraggle_fragments ) :: frag !! Fraggle fragmentation system object associate ( plplcollision_list => self , ncollisions => self % nenc , idx1 => self % index1 , idx2 => self % index2 ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( cb => system % cb ) class is ( symba_cb ) do i = 1 , ncollisions idx_parent ( 1 ) = pl % kin ( idx1 ( i ))% parent idx_parent ( 2 ) = pl % kin ( idx2 ( i ))% parent lgoodcollision = symba_collision_consolidate_colliders ( pl , cb , param , idx_parent , colliders ) if (. not . lgoodcollision ) cycle if ( any ( pl % status ( idx_parent (:)) /= COLLISION )) cycle ! One of these two bodies has already been resolved frag % regime = COLLRESOLVE_REGIME_MERGE frag % mtot = sum ( colliders % mass (:)) frag % xbcom (:) = ( colliders % mass ( 1 ) * colliders % xb (:, 1 ) + colliders % mass ( 2 ) * colliders % xb (:, 2 )) / frag % mtot frag % vbcom (:) = ( colliders % mass ( 1 ) * colliders % vb (:, 1 ) + colliders % mass ( 2 ) * colliders % vb (:, 2 )) / frag % mtot plplcollision_list % status ( i ) = symba_collision_casemerge ( system , param , colliders , frag ) end do end select end select end associate return end subroutine symba_collision_resolve_mergers module subroutine symba_collision_resolve_plplenc ( self , system , param , t , dt , irec ) !! author: David A. Minton !! !! Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the collision !! implicit none ! Arguments class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Internals real ( DP ) :: Eorbit_before , Eorbit_after logical :: lplpl_collision character ( len = STRMAX ) :: timestr class ( symba_parameters ), allocatable :: tmp_param associate ( plplenc_list => self , plplcollision_list => system % plplcollision_list ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( param ) class is ( symba_parameters ) if ( plplcollision_list % nenc == 0 ) return ! No collisions to resolve ! Make sure that the heliocentric and barycentric coordinates are consistent with each other call pl % vb2vh ( system % cb ) call pl % xh2xb ( system % cb ) ! Get the energy before the collision is resolved if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_before = system % te end if do write ( timestr , * ) t call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"Collision between massive bodies detected at time t = \" // trim ( adjustl ( timestr ))) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) allocate ( tmp_param , source = param ) tmp_param % t = t if ( param % lfragmentation ) then call plplcollision_list % resolve_fragmentations ( system , param ) else call plplcollision_list % resolve_mergers ( system , param ) end if ! Destroy the collision list now that the collisions are resolved call plplcollision_list % setup ( 0 ) if (( system % pl_adds % nbody == 0 ) . and . ( system % pl_discards % nbody == 0 )) exit ! Save the add/discard information to file call system % write_discard ( tmp_param ) ! Rearrange the arrays: Remove discarded bodies, add any new bodies, resort, and recompute all indices and encounter lists call pl % rearray ( system , tmp_param ) ! Destroy the add/discard list so that we don't append the same body multiple times if another collision is detected call system % pl_discards % setup ( 0 , param ) call system % pl_adds % setup ( 0 , param ) deallocate ( tmp_param ) ! Check whether or not any of the particles that were just added are themselves in a collision state. This will generate a new plplcollision_list lplpl_collision = plplenc_list % collision_check ( system , param , t , dt , irec ) if (. not . lplpl_collision ) exit end do if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_after = system % te param % Ecollisions = param % Ecollisions + ( Eorbit_after - Eorbit_before ) end if end select end select end associate return end subroutine symba_collision_resolve_plplenc module subroutine symba_collision_resolve_pltpenc ( self , system , param , t , dt , irec ) !! author: David A. Minton !! !! Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the collision !! implicit none ! Arguments class ( symba_pltpenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation tim real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level call system % tp % xh2xb ( system % cb ) call system % tp % discard ( system , param ) return end subroutine symba_collision_resolve_pltpenc end submodule s_symba_collision","tags":"","loc":"sourcefile/symba_collision.f90.html"},{"title":"symba_setup.f90 – swiftest","text":"This file depends on sourcefile~~symba_setup.f90~~EfferentGraph sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_setup Source Code symba_setup.f90 Source Code submodule ( symba_classes ) s_symba_setup use swiftest contains module subroutine symba_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize an SyMBA nbody system from files and sets up the planetocentric structures. !! This subroutine will also sort the massive bodies in descending order by mass !! implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j ! Call parent method associate ( system => self ) call helio_setup_initialize_system ( system , param ) call system % pltpenc_list % setup ( 0 ) call system % plplenc_list % setup ( 0 ) call system % plplcollision_list % setup ( 0 ) end associate return end subroutine symba_setup_initialize_system module subroutine symba_setup_merger ( self , n , param ) !! author: David A. Minton !! !! Allocate SyMBA test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90 implicit none ! Arguments class ( symba_merger ), intent ( inout ) :: self !! SyMBA merger list object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i !> Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl call symba_setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % ncomp )) deallocate ( self % ncomp ) if ( n == 0 ) return allocate ( self % ncomp ( n )) self % ncomp (:) = 0 return end subroutine symba_setup_merger module subroutine symba_setup_pl ( self , n , param ) !! author: David A. Minton !! !! Allocate SyMBA test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i !> Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl call setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % lcollision )) deallocate ( self % lcollision ) if ( allocated ( self % lencounter )) deallocate ( self % lencounter ) if ( allocated ( self % lmtiny )) deallocate ( self % lmtiny ) if ( allocated ( self % nplenc )) deallocate ( self % nplenc ) if ( allocated ( self % ntpenc )) deallocate ( self % ntpenc ) if ( allocated ( self % levelg )) deallocate ( self % levelg ) if ( allocated ( self % levelm )) deallocate ( self % levelm ) if ( allocated ( self % isperi )) deallocate ( self % isperi ) if ( allocated ( self % peri )) deallocate ( self % peri ) if ( allocated ( self % atp )) deallocate ( self % atp ) if ( allocated ( self % kin )) deallocate ( self % kin ) if ( n == 0 ) return allocate ( self % lcollision ( n )) allocate ( self % lencounter ( n )) allocate ( self % lmtiny ( n )) allocate ( self % nplenc ( n )) allocate ( self % ntpenc ( n )) allocate ( self % levelg ( n )) allocate ( self % levelm ( n )) allocate ( self % isperi ( n )) allocate ( self % peri ( n )) allocate ( self % atp ( n )) allocate ( self % kin ( n )) self % lcollision (:) = . false . self % lencounter (:) = . false . self % lmtiny (:) = . false . self % nplenc (:) = 0 self % ntpenc (:) = 0 self % levelg (:) = - 1 self % levelm (:) = - 1 self % isperi (:) = 0 self % peri (:) = 0.0_DP self % atp (:) = 0.0_DP call self % reset_kinship ([( i , i = 1 , n )]) return end subroutine symba_setup_pl module subroutine symba_setup_encounter ( self , n ) !! author: David A. Minton !! !! A constructor that sets the number of encounters and allocates and initializes all arrays !! implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for call setup_encounter ( self , n ) if ( n < 0 ) return if ( allocated ( self % level )) deallocate ( self % level ) if ( n == 0 ) return allocate ( self % level ( n )) self % level (:) = - 1 return end subroutine symba_setup_encounter module subroutine symba_setup_tp ( self , n , param ) !! author: David A. Minton !! !! Allocate WHM test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90 implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class. In this case, helio_tp does not have its own setup method so we use the base method for swiftest_tp call setup_tp ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % nplenc )) deallocate ( self % nplenc ) if ( allocated ( self % levelg )) deallocate ( self % levelg ) if ( allocated ( self % levelm )) deallocate ( self % levelm ) if ( allocated ( self % info )) deallocate ( self % info ) if ( n == 0 ) return allocate ( self % nplenc ( n )) allocate ( self % levelg ( n )) allocate ( self % levelm ( n )) allocate ( self % info ( n )) self % nplenc (:) = 0 self % levelg (:) = - 1 self % levelm (:) = - 1 return end subroutine symba_setup_tp end submodule s_symba_setup","tags":"","loc":"sourcefile/symba_setup.f90.html"},{"title":"symba_kick.f90 – swiftest","text":"This file depends on sourcefile~~symba_kick.f90~~EfferentGraph sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_kick Source Code symba_kick.f90 Source Code submodule ( symba_classes ) s_symba_kick use swiftest contains module subroutine symba_kick_getacch_int_pl ( self ) !! author: David A. Minton !! !! Compute direct cross (third) term heliocentric accelerations of massive bodies, with no mutual interactions between bodies below GMTINY !! !! Adapted from Hal Levison's Swift routine symba5_helio_getacch.f !! Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_int.f90 implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self call kick_getacch_int_all_pl ( self % nbody , self % nplplm , self % k_plpl , self % xh , self % Gmass , self % radius , self % ah ) return end subroutine symba_kick_getacch_int_pl module subroutine symba_kick_getacch_pl ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of massive bodies !! !! Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch.f90 !! Adapted from Hal Levison's Swift routine symba5_kick_getacch.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i , j integer ( I8B ) :: k , nplplenc real ( DP ) :: rjj , rlim2 , xr , yr , zr real ( DP ), dimension ( NDIM , self % nbody ) :: ah_enc integer ( I4B ), dimension (:,:), allocatable :: k_plpl_enc if ( self % nbody == 0 ) return select type ( system ) class is ( symba_nbody_system ) associate ( pl => self , npl => self % nbody , plplenc_list => system % plplenc_list , radius => self % radius ) ! Apply kicks to all bodies (including those in the encounter list) call helio_kick_getacch_pl ( pl , system , param , t , lbeg ) if ( plplenc_list % nenc > 0 ) then ! Remove kicks from bodies involved currently in the encounter list, as these are dealt with separately. nplplenc = int ( plplenc_list % nenc , kind = I8B ) allocate ( k_plpl_enc ( 2 , nplplenc )) k_plpl_enc (:, 1 : nplplenc ) = pl % k_plpl (:, plplenc_list % kidx ( 1 : nplplenc )) ah_enc (:,:) = 0.0_DP call kick_getacch_int_all_pl ( npl , nplplenc , k_plpl_enc , pl % xh , pl % Gmass , pl % radius , ah_enc ) pl % ah (:, 1 : npl ) = pl % ah (:, 1 : npl ) - ah_enc (:, 1 : npl ) end if end associate end select return end subroutine symba_kick_getacch_pl module subroutine symba_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute heliocentric accelerations of test particles !! !! Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch_tp.f90 !! Adapted from Hal Levison's Swift routine symba5_kick_getacch.f implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals integer ( I4B ) :: i , j , k real ( DP ) :: rjj , fac , rlim2 real ( DP ), dimension ( NDIM ) :: dx if ( self % nbody == 0 ) return select type ( system ) class is ( symba_nbody_system ) associate ( tp => self , cb => system % cb , pl => system % pl , pltpenc_list => system % pltpenc_list , npltpenc => system % pltpenc_list % nenc ) call helio_kick_getacch_tp ( tp , system , param , t , lbeg ) ! Remove accelerations from encountering pairs do k = 1 , npltpenc i = pltpenc_list % index1 ( k ) j = pltpenc_list % index2 ( k ) if ( tp % lmask ( j )) then if ( lbeg ) then dx (:) = tp % xh (:, j ) - pl % xbeg (:, i ) else dx (:) = tp % xh (:, j ) - pl % xend (:, i ) end if rjj = dot_product ( dx (:), dx (:)) fac = pl % Gmass ( i ) / ( rjj * sqrt ( rjj )) tp % ah (:, j ) = tp % ah (:, j ) + fac * dx (:) end if end do end associate end select return end subroutine symba_kick_getacch_tp module subroutine symba_kick_encounter ( self , system , dt , irec , sgn ) !! author: David A. Minton !! !! Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion. !! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types !! !! Adapted from David E. Kaufmann's Swifter routine: symba_kick.f90 !! Adapted from Hal Levison's Swift routine symba5_kick.f implicit none ! Arguments class ( symba_encounter ), intent ( in ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level integer ( I4B ), intent ( in ) :: sgn !! sign to be applied to acceleration ! Internals integer ( I4B ) :: i , j , irm1 , irecl , ngood integer ( I8B ) :: k real ( DP ) :: r , rr , ri , ris , rim1 , r2 , ir3 , fac , faci , facj real ( DP ), dimension ( NDIM ) :: dx logical :: isplpl logical , dimension (:), allocatable :: lgoodlevel integer ( I4B ), dimension (:), allocatable :: good_idx if ( self % nenc == 0 ) return select type ( self ) class is ( symba_plplenc ) isplpl = . true . class is ( symba_pltpenc ) isplpl = . false . end select select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) associate ( npl => pl % nbody , ntp => tp % nbody , nenc => self % nenc ) if ( npl > 0 ) pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE if ( ntp > 0 ) tp % lmask ( 1 : ntp ) = tp % status ( 1 : ntp ) /= INACTIVE allocate ( lgoodlevel ( nenc )) irm1 = irec - 1 if ( sgn < 0 ) then irecl = irec - 1 else irecl = irec end if do k = 1 , nenc i = self % index1 ( k ) j = self % index2 ( k ) if ( isplpl ) then lgoodlevel ( k ) = ( pl % levelg ( i ) >= irm1 ) . and . ( pl % levelg ( j ) >= irm1 ) else lgoodlevel ( k ) = ( pl % levelg ( i ) >= irm1 ) . and . ( tp % levelg ( j ) >= irm1 ) end if lgoodlevel ( k ) = ( self % status ( k ) == ACTIVE ) . and . lgoodlevel ( k ) end do ngood = count ( lgoodlevel (:)) if ( ngood > 0_I8B ) then allocate ( good_idx ( ngood )) good_idx (:) = pack ([( i , i = 1 , nenc )], lgoodlevel (:)) if ( isplpl ) then do concurrent ( k = 1 : ngood ) i = self % index1 ( good_idx ( k )) j = self % index2 ( good_idx ( k )) pl % ah (:, i ) = 0.0_DP pl % ah (:, j ) = 0.0_DP end do else do concurrent ( k = 1_I8B : ngood ) j = self % index2 ( good_idx ( k )) tp % ah (:, j ) = 0.0_DP end do end if do k = 1 , ngood i = self % index1 ( good_idx ( k )) j = self % index2 ( good_idx ( k )) if ( isplpl ) then ri = (( pl % rhill ( i ) + pl % rhill ( j )) ** 2 ) * ( RHSCALE ** 2 ) * ( RSHELL ** ( 2 * irecl )) rim1 = ri * ( RSHELL ** 2 ) dx (:) = pl % xh (:, j ) - pl % xh (:, i ) else ri = (( pl % rhill ( i )) ** 2 ) * ( RHSCALE ** 2 ) * ( RSHELL ** ( 2 * irecl )) rim1 = ri * ( RSHELL ** 2 ) dx (:) = tp % xh (:, j ) - pl % xh (:, i ) end if r2 = dot_product ( dx (:), dx (:)) if ( r2 < rim1 ) then fac = 0.0_DP lgoodlevel ( good_idx ( k )) = . false . cycle end if if ( r2 < ri ) then ris = sqrt ( ri ) r = sqrt ( r2 ) rr = ( ris - r ) / ( ris * ( 1.0_DP - RSHELL )) fac = ( r2 ** ( - 1.5_DP )) * ( 1.0_DP - 3 * ( rr ** 2 ) + 2 * ( rr ** 3 )) else ir3 = 1.0_DP / ( r2 * sqrt ( r2 )) fac = ir3 end if faci = fac * pl % Gmass ( i ) if ( isplpl ) then facj = fac * pl % Gmass ( j ) pl % ah (:, i ) = pl % ah (:, i ) + facj * dx (:) pl % ah (:, j ) = pl % ah (:, j ) - faci * dx (:) else tp % ah (:, j ) = tp % ah (:, j ) - faci * dx (:) end if end do ngood = count ( lgoodlevel (:)) if ( ngood == 0_I8B ) return good_idx ( 1 : ngood ) = pack ([( i , i = 1 , nenc )], lgoodlevel (:)) if ( isplpl ) then do k = 1 , ngood i = self % index1 ( good_idx ( k )) j = self % index2 ( good_idx ( k )) pl % vb (:, i ) = pl % vb (:, i ) + sgn * dt * pl % ah (:, i ) pl % vb (:, j ) = pl % vb (:, j ) + sgn * dt * pl % ah (:, j ) pl % ah (:, i ) = 0.0_DP pl % ah (:, j ) = 0.0_DP end do else do k = 1 , ngood j = self % index2 ( good_idx ( k )) tp % vb (:, j ) = tp % vb (:, j ) + sgn * dt * tp % ah (:, j ) tp % ah (:, j ) = 0.0_DP end do end if end if end associate end select end select return end subroutine symba_kick_encounter end submodule s_symba_kick","tags":"","loc":"sourcefile/symba_kick.f90.html"},{"title":"symba_encounter_check.f90 – swiftest","text":"This file depends on sourcefile~~symba_encounter_check.f90~~EfferentGraph sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_encounter_check Source Code symba_encounter_check.f90 Source Code submodule ( symba_classes ) s_symba_encounter_check use swiftest contains subroutine symba_encounter_check_all ( nplplm , k_plpl , x , v , rhill , dt , irec , lencounter , loc_lvdotr ) !! author: David A. Minton !! !! Check for encounters between massive bodies. Split off from the main subroutine for performance implicit none integer ( I8B ), intent ( in ) :: nplplm integer ( I4B ), dimension (:,:), intent ( in ) :: k_plpl real ( DP ), dimension (:,:), intent ( in ) :: x , v real ( DP ), dimension (:), intent ( in ) :: rhill real ( DP ), intent ( in ) :: dt integer ( I4B ), intent ( in ) :: irec logical , dimension (:), intent ( out ) :: lencounter , loc_lvdotr ! Internals integer ( I8B ) :: k integer ( I4B ) :: i , j real ( DP ) :: xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 !$omp parallel do simd default(private) schedule(static)& !$omp shared(nplplm, k_plpl, x, v, rhill,  dt, irec, lencounter, loc_lvdotr) & !$omp lastprivate(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2) do k = 1_I8B , nplplm i = k_plpl ( 1 , k ) j = k_plpl ( 2 , k ) xr = x ( 1 , j ) - x ( 1 , i ) yr = x ( 2 , j ) - x ( 2 , i ) zr = x ( 3 , j ) - x ( 3 , i ) vxr = v ( 1 , j ) - v ( 1 , i ) vyr = v ( 2 , j ) - v ( 2 , i ) vzr = v ( 3 , j ) - v ( 3 , i ) rhill1 = rhill ( i ) rhill2 = rhill ( j ) call symba_encounter_check_one ( xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 , dt , irec , lencounter ( k ), loc_lvdotr ( k )) end do !$omp end parallel do simd return end subroutine symba_encounter_check_all module function symba_encounter_check_pl ( self , system , dt , irec ) result ( lany_encounter ) !! author: David A. Minton !! !! Check for an encounter between massive bodies. !! implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Result logical :: lany_encounter !! Returns true if there is at least one close encounter ! Internals integer ( I8B ) :: k , nplplm , kenc integer ( I4B ) :: i , j , nenc , npl logical , dimension (:), allocatable :: lencounter , loc_lvdotr , lvdotr integer ( I4B ), dimension (:), allocatable :: index1 , index2 if ( self % nbody == 0 ) return associate ( pl => self ) nplplm = pl % nplplm npl = pl % nbody allocate ( lencounter ( nplplm )) allocate ( loc_lvdotr ( nplplm )) call symba_encounter_check_all ( nplplm , pl % k_plpl , pl % xh , pl % vh , pl % rhill , dt , irec , lencounter , loc_lvdotr ) nenc = count ( lencounter (:)) lany_encounter = nenc > 0 if ( lany_encounter ) then associate ( plplenc_list => system % plplenc_list ) call plplenc_list % resize ( nenc ) allocate ( lvdotr ( nenc )) allocate ( index1 ( nenc )) allocate ( index2 ( nenc )) lvdotr (:) = pack ( loc_lvdotr (:), lencounter (:)) index1 (:) = pack ( pl % k_plpl ( 1 , 1 : nplplm ), lencounter (:)) index2 (:) = pack ( pl % k_plpl ( 2 , 1 : nplplm ), lencounter (:)) deallocate ( lencounter , loc_lvdotr ) call move_alloc ( lvdotr , plplenc_list % lvdotr ) call move_alloc ( index1 , plplenc_list % index1 ) call move_alloc ( index2 , plplenc_list % index2 ) do k = 1 , nenc i = plplenc_list % index1 ( k ) j = plplenc_list % index2 ( k ) call util_index_eucl_ij_to_k ( npl , i , j , kenc ) plplenc_list % kidx ( k ) = kenc plplenc_list % id1 ( k ) = pl % id ( plplenc_list % index1 ( k )) plplenc_list % id2 ( k ) = pl % id ( plplenc_list % index2 ( k )) plplenc_list % status ( k ) = ACTIVE plplenc_list % level ( k ) = irec pl % lencounter ( i ) = . true . pl % lencounter ( j ) = . true . pl % levelg ( i ) = irec pl % levelm ( i ) = irec pl % levelg ( j ) = irec pl % levelm ( j ) = irec pl % nplenc ( i ) = pl % nplenc ( i ) + 1 pl % nplenc ( j ) = pl % nplenc ( j ) + 1 end do end associate end if end associate return end function symba_encounter_check_pl module function symba_encounter_check ( self , system , dt , irec ) result ( lany_encounter ) !! author: David A. Minton !! !! Check for an encounter between test particles and massive bodies in the pltpenc list. !! Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types. !! !! Adapted from portions of David E. Kaufmann's Swifter routine: symba_step_recur.f90 implicit none ! Arguments class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-pl encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter ! Internals integer ( I4B ) :: i , j , k , lidx , nenc_enc real ( DP ), dimension ( NDIM ) :: xr , vr logical :: lencounter , isplpl real ( DP ) :: rlim2 , rji2 logical , dimension (:), allocatable :: lencmask integer ( I4B ), dimension (:), allocatable :: encidx lany_encounter = . false . if ( self % nenc == 0 ) return select type ( self ) class is ( symba_plplenc ) isplpl = . true . class is ( symba_pltpenc ) isplpl = . false . end select select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) allocate ( lencmask ( self % nenc )) lencmask (:) = ( self % status ( 1 : self % nenc ) == ACTIVE ) . and . ( self % level ( 1 : self % nenc ) == irec - 1 ) nenc_enc = count ( lencmask (:)) if ( nenc_enc == 0 ) return allocate ( encidx ( nenc_enc )) encidx (:) = pack ([( k , k = 1 , self % nenc )], lencmask (:)) do lidx = 1 , nenc_enc k = encidx ( lidx ) i = self % index1 ( k ) j = self % index2 ( k ) if ( isplpl ) then xr (:) = pl % xh (:, j ) - pl % xh (:, i ) vr (:) = pl % vb (:, j ) - pl % vb (:, i ) call symba_encounter_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % rhill ( i ), pl % rhill ( j ), dt , irec , lencounter , self % lvdotr ( k )) else xr (:) = tp % xh (:, j ) - pl % xh (:, i ) vr (:) = tp % vb (:, j ) - pl % vb (:, i ) call symba_encounter_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % rhill ( i ), 0.0_DP , dt , irec , lencounter , self % lvdotr ( k )) end if if ( lencounter ) then if ( isplpl ) then rlim2 = ( pl % radius ( i ) + pl % radius ( j )) ** 2 else rlim2 = ( pl % radius ( i )) ** 2 end if rji2 = dot_product ( xr (:), xr (:)) ! Check to see if these are physically overlapping bodies first, which we should ignore if ( rji2 > rlim2 ) then lany_encounter = . true . pl % levelg ( i ) = irec pl % levelm ( i ) = MAX ( irec , pl % levelm ( i )) if ( isplpl ) then pl % levelg ( j ) = irec pl % levelm ( j ) = MAX ( irec , pl % levelm ( j )) else tp % levelg ( j ) = irec tp % levelm ( j ) = MAX ( irec , tp % levelm ( j )) end if self % level ( k ) = irec end if end if end do end select end select return end function symba_encounter_check module function symba_encounter_check_tp ( self , system , dt , irec ) result ( lany_encounter ) !! author: David A. Minton !! !! Check for an encounter between test particles and massive bodies. !! implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level ! Result logical :: lany_encounter !! Returns true if there is at least one close encounter ! Internals real ( DP ) :: r2crit , vdotr , r2 , v2 , tmin , r2min , term2 integer ( I4B ) :: i , j , k , nenc , plind , tpind real ( DP ), dimension ( NDIM ) :: xr , vr logical , dimension (:,:), allocatable :: lencounter , loc_lvdotr if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , pl => system % pl , npl => system % pl % nbody ) allocate ( lencounter ( ntp , npl ), loc_lvdotr ( ntp , npl )) lencounter (:,:) = . false . do j = 1 , npl do i = 1 , ntp xr ( 1 ) = tp % xh ( 1 , i ) - pl % xh ( 1 , j ) xr ( 2 ) = tp % xh ( 2 , i ) - pl % xh ( 2 , j ) xr ( 3 ) = tp % xh ( 3 , i ) - pl % xh ( 3 , j ) vr ( 1 ) = tp % vh ( 1 , i ) - pl % vh ( 1 , j ) vr ( 2 ) = tp % vh ( 2 , i ) - pl % vh ( 2 , j ) vr ( 3 ) = tp % vh ( 3 , i ) - pl % vh ( 3 , j ) call symba_encounter_check_one ( xr ( 1 ), xr ( 2 ), xr ( 3 ), vr ( 1 ), vr ( 2 ), vr ( 3 ), pl % rhill ( j ), 0.0_DP , dt , irec , lencounter ( i , j ), loc_lvdotr ( i , j )) end do end do nenc = count ( lencounter (:,:)) lany_encounter = nenc > 0 if ( lany_encounter ) then associate ( pltpenc_list => system % pltpenc_list ) call pltpenc_list % resize ( nenc ) pltpenc_list % status ( 1 : nenc ) = ACTIVE pltpenc_list % level ( 1 : nenc ) = irec pltpenc_list % lvdotr ( 1 : nenc ) = pack ( loc_lvdotr ( 1 : ntp , 1 : npl ), lencounter ( 1 : ntp , 1 : npl )) pltpenc_list % index1 ( 1 : nenc ) = pack ( spread ([( i , i = 1 , npl )], dim = 1 , ncopies = ntp ), lencounter ( 1 : ntp , 1 : npl )) pltpenc_list % index2 ( 1 : nenc ) = pack ( spread ([( i , i = 1 , ntp )], dim = 2 , ncopies = npl ), lencounter ( 1 : ntp , 1 : npl )) pltpenc_list % id1 ( 1 : nenc ) = pl % id ( pltpenc_list % index1 ( 1 : nenc )) pltpenc_list % id2 ( 1 : nenc ) = tp % id ( pltpenc_list % index2 ( 1 : nenc )) select type ( pl ) class is ( symba_pl ) pl % lencounter ( 1 : npl ) = . false . do k = 1 , nenc plind = pltpenc_list % index1 ( k ) tpind = pltpenc_list % index2 ( k ) pl % lencounter ( plind ) = . true . pl % levelg ( plind ) = irec pl % levelm ( plind ) = irec tp % levelg ( tpind ) = irec tp % levelm ( tpind ) = irec pl % ntpenc ( plind ) = pl % ntpenc ( plind ) + 1 tp % nplenc ( tpind ) = tp % nplenc ( tpind ) + 1 end do end select end associate end if end associate return end function symba_encounter_check_tp module pure subroutine symba_encounter_check_one ( xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 , dt , irec , lencounter , lvdotr ) !$omp declare simd(symba_encounter_check_one) !! author: David A. Minton !! !! Check for an encounter. !! !! Adapted from David E. Kaufmann's Swifter routine: symba_chk.f90 !! Adapted from Hal Levison's Swift routine symba5_chk.f implicit none ! Arguments real ( DP ), intent ( in ) :: xr , yr , zr , vxr , vyr , vzr real ( DP ), intent ( in ) :: rhill1 , rhill2 , dt integer ( I4B ), intent ( in ) :: irec logical , intent ( out ) :: lencounter , lvdotr ! Internals real ( DP ) :: r2crit , rshell_irec integer ( I4B ) :: i rshell_irec = 1._DP do i = 1 , irec rshell_irec = rshell_irec * RSHELL end do r2crit = ( rhill1 + rhill2 ) * RHSCALE * rshell_irec r2crit = r2crit ** 2 call rmvs_chk_ind ( xr , yr , zr , vxr , vyr , vzr , dt , r2crit , lencounter , lvdotr ) return end subroutine symba_encounter_check_one end submodule s_symba_encounter_check","tags":"","loc":"sourcefile/symba_encounter_check.f90.html"},{"title":"symba_io.f90 – swiftest","text":"This file depends on sourcefile~~symba_io.f90~~EfferentGraph sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_io Source Code symba_io.f90 Source Code submodule ( symba_classes ) s_symba_io use swiftest contains module subroutine symba_io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Read in parameters specific to the SyMBA integrator, then calls the base io_param_reader. !! !! Adapted from David E. Kaufmann's Swifter routine io_init_param.f90 !! Adapted from Martin Duncan's Swift routine io_init_param.f implicit none ! Arguments class ( symba_parameters ), intent ( inout ) :: self !! Collection of parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! internals integer ( I4B ) :: ilength , ifirst , ilast !! Variables used to parse input file character ( STRMAX ) :: line !! Line of the input file character ( len = :), allocatable :: line_trim , param_name , param_value !! Strings used to parse the param file integer ( I4B ) :: nseeds , nseeds_from_file , i logical :: seed_set = . false . !! Is the random seed set in the input file? character ( len =* ), parameter :: linefmt = '(A)' associate ( param => self ) call io_param_reader ( param , unit , iotype , v_list , iostat , iomsg ) call random_seed ( size = nseeds ) if ( allocated ( param % seed )) deallocate ( param % seed ) allocate ( param % seed ( nseeds )) rewind ( unit ) do read ( unit = unit , fmt = linefmt , iostat = iostat , end = 1 , err = 667 , iomsg = iomsg ) line line_trim = trim ( adjustl ( line )) ilength = len ( line_trim ) if (( ilength /= 0 )) then ifirst = 1 ! Read the pair of tokens. The first one is the parameter name, the second is the value. param_name = io_get_token ( line_trim , ifirst , ilast , iostat ) if ( param_name == '' ) cycle ! No parameter name (usually because this line is commented out) call io_toupper ( param_name ) ifirst = ilast + 1 param_value = io_get_token ( line_trim , ifirst , ilast , iostat ) select case ( param_name ) case ( \"FRAGMENTATION\" ) call io_toupper ( param_value ) if ( param_value == \"YES\" . or . param_value == \"T\" ) self % lfragmentation = . true . case ( \"GMTINY\" ) read ( param_value , * ) param % GMTINY case ( \"MIN_GMFRAG\" ) read ( param_value , * ) param % min_GMfrag case ( \"SEED\" ) read ( param_value , * ) nseeds_from_file ! Because the number of seeds can vary between compilers/systems, we need to make sure we can handle cases in which the input file has a different ! number of seeds than the current system. If the number of seeds in the file is smaller than required, we will use them as a source to fill in the missing elements. ! If the number of seeds in the file is larger than required, we will truncate the seed array. if ( nseeds_from_file > nseeds ) then nseeds = nseeds_from_file deallocate ( param % seed ) allocate ( param % seed ( nseeds )) do i = 1 , nseeds ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * ) param % seed ( i ) end do else ! Seed array in file is too small do i = 1 , nseeds_from_file ifirst = ilast + 2 param_value = io_get_token ( line , ifirst , ilast , iostat ) read ( param_value , * ) param % seed ( i ) end do param % seed ( nseeds_from_file + 1 : nseeds ) = [( param % seed ( 1 ) - param % seed ( nseeds_from_file ) + i , i = nseeds_from_file + 1 , nseeds )] end if seed_set = . true . end select end if end do 1 continue if ( self % GMTINY < 0.0_DP ) then write ( iomsg , * ) \"GMTINY invalid or not set: \" , self % GMTINY iostat = - 1 return else write ( * , * ) \"GMTINY          = \" , self % GMTINY end if write ( * , * ) \"FRAGMENTATION = \" , param % lfragmentation if ( param % lfragmentation ) then if ( seed_set ) then call random_seed ( put = param % seed ) else call random_seed ( get = param % seed ) end if write ( * , * ) \"SEED: N,VAL    = \" , size ( param % seed ), param % seed (:) if ( param % min_GMfrag < 0.0_DP ) param % min_GMfrag = param % GMTINY write ( * , * ) \"MIN_GMFRAG      = \" , self % min_GMfrag end if if (. not . self % lclose ) then write ( iomsg , * ) 'This integrator requires CHK_CLOSE to be enabled.' iostat = - 1 return end if ! All reporting of collision information in SyMBA (including mergers) is now recorded in the Fraggle logfile call fraggle_io_log_start ( param ) end associate iostat = 0 667 continue return end subroutine symba_io_param_reader module subroutine symba_io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) !! author: David A. Minton !! !! Dump integration parameters specific to SyMBA to file and then call the base io_param_writer method. !! !! Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90 !! Adapted from Martin Duncan's Swift routine io_dump_param.f implicit none ! Arguments class ( symba_parameters ), intent ( in ) :: self !! Collection of SyMBA parameters integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! Not used in this procedure integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 ! Internals character ( * ), parameter :: Ifmt = '(I0)' !! Format label for integer values character ( * ), parameter :: Rfmt = '(ES25.17)' !! Format label for real values character ( * ), parameter :: Rarrfmt = '(3(ES25.17,1X))' !! Format label for real values character ( * ), parameter :: Lfmt = '(L1)' !! Format label for logical values character ( len = NAMELEN ) :: param_name character ( len = STRMAX ) :: param_value type character_array character ( 25 ) :: value end type character_array type ( character_array ), dimension (:), allocatable :: param_array integer ( I4B ) :: i , nstr associate ( param => self ) call io_param_writer ( param , unit , iotype , v_list , iostat , iomsg ) ! Special handling is required for writing the random number seed array as its size is not known until runtime ! For the \"SEED\" parameter line, the first value will be the size of the seed array and the rest will be the seed array elements write ( param_name , * ) \"GMTINY\" ; write ( param_value , Rfmt ) param % GMTINY ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"MIN_GMFRAG\" ; write ( param_value , Rfmt ) param % min_GMfrag ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) write ( param_name , * ) \"FRAGMENTATION\" ; write ( param_value , Lfmt ) param % lfragmentation ; write ( unit , * , err = 667 , iomsg = iomsg ) adjustl ( param_name ) // trim ( adjustl ( param_value )) if ( param % lfragmentation ) then write ( param_name , * ) \"SEED\" if ( allocated ( param_array )) deallocate ( param_array ) allocate ( param_array ( 0 : size ( param % seed ))) write ( param_array ( 0 )% value , Ifmt ) size ( param % seed ) do i = 1 , size ( param % seed ) write ( param_array ( i )% value , Ifmt ) param % seed ( i ) end do write ( unit , '(\" \",A32)' , advance = 'no' , err = 667 , iomsg = iomsg ) adjustl ( param_name ) do i = 0 , size ( param % seed ) nstr = len ( trim ( adjustl ( param_array ( i )% value ))) if ( i < size ( param % seed )) then write ( unit , '(A12)' , advance = 'no' , err = 667 , iomsg = iomsg ) trim ( adjustl ( param_array ( i )% value )) // \" \" else write ( unit , '(A12)' , err = 667 , iomsg = iomsg ) trim ( adjustl ( param_array ( i )% value )) end if end do end if iostat = 0 end associate return 667 continue write ( * , * ) \"Error writing parameter file for SyMBA: \" // trim ( adjustl ( iomsg )) end subroutine symba_io_param_writer module subroutine symba_io_write_discard ( self , param ) implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ), parameter :: LUN = 40 integer ( I4B ) :: iadd , isub , j , nsub , nadd logical , save :: lfirst = . true . real ( DP ), dimension (:,:), allocatable :: vh character ( * ), parameter :: HDRFMT = '(E23.16, 1X, I8, 1X, L1)' character ( * ), parameter :: NAMEFMT = '(A, 2(1X, I8))' character ( * ), parameter :: VECFMT = '(3(E23.16, 1X))' character ( * ), parameter :: NPLFMT = '(I8)' character ( * ), parameter :: PLNAMEFMT = '(I8, 2(1X, E23.16))' class ( swiftest_body ), allocatable :: pltemp character ( STRMAX ) :: errmsg , out_stat associate ( pl => self % pl , npl => self % pl % nbody , pl_adds => self % pl_adds ) if ( self % tp_discards % nbody > 0 ) call io_write_discard ( self , param ) select type ( pl_discards => self % pl_discards ) class is ( symba_merger ) if ( pl_discards % nbody == 0 ) return ! Record the discarded body metadata information to file if (( param % out_type == NETCDF_FLOAT_TYPE ) . or . ( param % out_type == NETCDF_DOUBLE_TYPE )) then call param % nciu % open ( param ) call pl_discards % write_particle_info ( param % nciu ) call param % nciu % close ( param ) end if if ( param % discard_out == \"\" ) return if ( lfirst ) then out_stat = param % out_stat else out_stat = 'APPEND' end if select case ( out_stat ) case ( 'APPEND' ) open ( unit = LUN , file = param % discard_out , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case ( 'NEW' , 'REPLACE' , 'UNKNOWN' ) open ( unit = LUN , file = param % discard_out , status = param % out_stat , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) case default write ( * , * ) 'Invalid status code for OUT_STAT: ' , trim ( adjustl ( param % out_stat )) call util_exit ( FAILURE ) end select lfirst = . false . if ( param % lgr ) then call pl_discards % pv2v ( param ) call pl_adds % pv2v ( param ) end if write ( LUN , HDRFMT , err = 667 , iomsg = errmsg ) param % t , pl_discards % nbody , param % lbig_discard iadd = 1 isub = 1 do while ( iadd <= pl_adds % nbody ) nadd = pl_adds % ncomp ( iadd ) nsub = pl_discards % ncomp ( isub ) do j = 1 , nadd if ( iadd <= pl_adds % nbody ) then write ( LUN , NAMEFMT , err = 667 , iomsg = errmsg ) ADD , pl_adds % id ( iadd ), pl_adds % status ( iadd ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_adds % xh ( 1 , iadd ), pl_adds % xh ( 2 , iadd ), pl_adds % xh ( 3 , iadd ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_adds % vh ( 1 , iadd ), pl_adds % vh ( 2 , iadd ), pl_adds % vh ( 3 , iadd ) else exit end if iadd = iadd + 1 end do do j = 1 , nsub if ( isub <= pl_discards % nbody ) then write ( LUN , NAMEFMT , err = 667 , iomsg = errmsg ) SUB , pl_discards % id ( isub ), pl_discards % status ( isub ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_discards % xh ( 1 , isub ), pl_discards % xh ( 2 , isub ), pl_discards % xh ( 3 , isub ) write ( LUN , VECFMT , err = 667 , iomsg = errmsg ) pl_discards % vh ( 1 , isub ), pl_discards % vh ( 2 , isub ), pl_discards % vh ( 3 , isub ) else exit end if isub = isub + 1 end do end do close ( LUN ) end select end associate return 667 continue write ( * , * ) \"Error writing discard file: \" // trim ( adjustl ( errmsg )) call util_exit ( FAILURE ) end subroutine symba_io_write_discard end submodule s_symba_io","tags":"","loc":"sourcefile/symba_io.f90.html"},{"title":"symba_discard.f90 – swiftest","text":"This file depends on sourcefile~~symba_discard.f90~~EfferentGraph sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_discard Source Code symba_discard.f90 Source Code submodule ( symba_classes ) s_symba_discard use swiftest contains subroutine symba_discard_cb_pl ( pl , system , param ) !! author: David A. Minton !! !! Check to see if planets should be discarded based on their positions relative to the central body. !! If a body gets flagged here when it has also been previously flagged for a collision with another massive body, !! its collisional status will be revoked. Discards due to colliding with or escaping the central body take precedence !! over pl-pl collisions !! !! Adapted from David E. Kaufmann's Swifter routine: symba_discard_sun.f90 !! Adapted from Hal Levison's Swift routine discard_massive5.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j real ( DP ) :: energy , vb2 , rb2 , rh2 , rmin2 , rmax2 , rmaxu2 character ( len = STRMAX ) :: idstr , timestr , message associate ( npl => pl % nbody , cb => system % cb ) call system % set_msys () rmin2 = param % rmin ** 2 rmax2 = param % rmax ** 2 rmaxu2 = param % rmaxu ** 2 do i = 1 , npl if ( pl % status ( i ) == ACTIVE ) then rh2 = dot_product ( pl % xh (:, i ), pl % xh (:, i )) if (( param % rmax >= 0.0_DP ) . and . ( rh2 > rmax2 )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_RMAX write ( idstr , * ) pl % id ( i ) write ( timestr , * ) param % t write ( message , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too far from the central body at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( message ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"\" ) call pl % info ( i )% set_value ( status = \"DISCARDED_RMAX\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i )) else if (( param % rmin >= 0.0_DP ) . and . ( rh2 < rmin2 )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_RMIN write ( idstr , * ) pl % id ( i ) write ( timestr , * ) param % t write ( message , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" too close to the central body at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( message ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"\" ) call pl % info ( i )% set_value ( status = \"DISCARDED_RMIN\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = cb % id ) else if ( param % rmaxu >= 0.0_DP ) then rb2 = dot_product ( pl % xb (:, i ), pl % xb (:, i )) vb2 = dot_product ( pl % vb (:, i ), pl % vb (:, i )) energy = 0.5_DP * vb2 - system % Gmtot / sqrt ( rb2 ) if (( energy > 0.0_DP ) . and . ( rb2 > rmaxu2 )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_RMAXU write ( idstr , * ) pl % id ( i ) write ( timestr , * ) param % t write ( message , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \")\" // \" is unbound and too far from barycenter at t = \" // trim ( adjustl ( timestr )) call fraggle_io_log_one_message ( \"\" ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( message ) call fraggle_io_log_one_message ( \"***********************************************************************************************************************\" ) call fraggle_io_log_one_message ( \"\" ) call pl % info ( i )% set_value ( status = \"DISCARDED_RMAXU\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i )) end if end if end if end do end associate return end subroutine symba_discard_cb_pl subroutine symba_discard_conserve_mtm ( pl , system , param , ipl , lescape_body ) !! author: David A. Minton !! !! Conserves system momentum when a body is lost from the system or collides with central body implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl class ( symba_nbody_system ), intent ( inout ) :: system class ( symba_parameters ), intent ( inout ) :: param integer ( I4B ), intent ( in ) :: ipl logical , intent ( in ) :: lescape_body ! Internals real ( DP ), dimension ( NDIM ) :: Lpl , Ltot , Lcb , xcom , vcom real ( DP ) :: pe , ke_orbit , ke_spin integer ( I4B ) :: i , oldstat select type ( cb => system % cb ) class is ( symba_cb ) ! Add the potential and kinetic energy of the lost body to the records pe = - cb % Gmass * pl % mass ( ipl ) / norm2 ( pl % xb (:, ipl ) - cb % xb (:)) ke_orbit = 0.5_DP * pl % mass ( ipl ) * dot_product ( pl % vb (:, ipl ), pl % vb (:, ipl )) if ( param % lrotation ) then ke_spin = 0.5_DP * pl % mass ( ipl ) * pl % radius ( ipl ) ** 2 * pl % Ip ( 3 , ipl ) * dot_product ( pl % rot (:, ipl ), pl % rot (:, ipl )) else ke_spin = 0.0_DP end if ! Add the pre-collision ke of the central body to the records ! Add planet mass to central body accumulator if ( lescape_body ) then param % GMescape = param % GMescape + pl % Gmass ( ipl ) do i = 1 , pl % nbody if ( i == ipl ) cycle pe = pe - pl % Gmass ( i ) * pl % mass ( ipl ) / norm2 ( pl % xb (:, ipl ) - pl % xb (:, i )) end do Ltot (:) = 0.0_DP do i = 1 , pl % nbody Lpl (:) = pL % mass ( i ) * ( pl % xb (:, i ) . cross . pl % vb (:, i )) Ltot (:) = Ltot (:) + Lpl (:) end do Ltot (:) = Ltot (:) + cb % mass * ( cb % xb (:) . cross . cb % vb (:)) call pl % b2h ( cb ) oldstat = pl % status ( ipl ) pl % status ( ipl ) = INACTIVE call pl % h2b ( cb ) pl % status ( ipl ) = oldstat do i = 1 , pl % nbody if ( i == ipl ) cycle Lpl (:) = pl % mass ( i ) * ( pl % xb (:, i ) . cross . pl % vb (:, i )) Ltot (:) = Ltot (:) - Lpl (:) end do Ltot (:) = Ltot (:) - cb % mass * ( cb % xb (:) . cross . cb % vb (:)) param % Lescape (:) = param % Lescape (:) + Ltot (:) if ( param % lrotation ) param % Lescape (:) = param % Lescape + pl % mass ( ipl ) * pl % radius ( ipl ) ** 2 * pl % Ip ( 3 , ipl ) * pl % rot (:, ipl ) else xcom (:) = ( pl % mass ( ipl ) * pl % xb (:, ipl ) + cb % mass * cb % xb (:)) / ( cb % mass + pl % mass ( ipl )) vcom (:) = ( pl % mass ( ipl ) * pl % vb (:, ipl ) + cb % mass * cb % vb (:)) / ( cb % mass + pl % mass ( ipl )) Lpl (:) = ( pl % xb (:, ipl ) - xcom (:)) . cross . ( pL % vb (:, ipl ) - vcom (:)) if ( param % lrotation ) Lpl (:) = pl % mass ( ipl ) * ( Lpl (:) + pl % radius ( ipl ) ** 2 * pl % Ip ( 3 , ipl ) * pl % rot (:, ipl )) Lcb (:) = cb % mass * (( cb % xb (:) - xcom (:)) . cross . ( cb % vb (:) - vcom (:))) ke_orbit = ke_orbit + 0.5_DP * cb % mass * dot_product ( cb % vb (:), cb % vb (:)) if ( param % lrotation ) ke_spin = ke_spin + 0.5_DP * cb % mass * cb % radius ** 2 * cb % Ip ( 3 ) * dot_product ( cb % rot (:), cb % rot (:)) ! Update mass of central body to be consistent with its total mass cb % dGM = cb % dGM + pl % Gmass ( ipl ) cb % dR = cb % dR + 1.0_DP / 3.0_DP * ( pl % radius ( ipl ) / cb % radius ) ** 3 - 2.0_DP / 9.0_DP * ( pl % radius ( ipl ) / cb % radius ) ** 6 cb % Gmass = cb % GM0 + cb % dGM cb % mass = cb % Gmass / param % GU cb % radius = cb % R0 + cb % dR param % rmin = cb % radius ! Add planet angular momentum to central body accumulator cb % dL (:) = Lpl (:) + Lcb (:) + cb % dL (:) ! Update rotation of central body to by consistent with its angular momentum if ( param % lrotation ) then cb % rot (:) = ( cb % L0 (:) + cb % dL (:)) / ( cb % Ip ( 3 ) * cb % mass * cb % radius ** 2 ) ke_spin = ke_spin - 0.5_DP * cb % mass * cb % radius ** 2 * cb % Ip ( 3 ) * dot_product ( cb % rot (:), cb % rot (:)) end if cb % xb (:) = xcom (:) cb % vb (:) = vcom (:) ke_orbit = ke_orbit - 0.5_DP * cb % mass * dot_product ( cb % vb (:), cb % vb (:)) end if call pl % b2h ( cb ) ! We must do this for proper book-keeping, since we can no longer track this body's contribution to energy directly if ( lescape_body ) then param % Ecollisions = param % Ecollisions + ke_orbit + ke_spin + pe param % Euntracked = param % Euntracked - ( ke_orbit + ke_spin + pe ) else param % Ecollisions = param % Ecollisions + pe param % Euntracked = param % Euntracked - pe end if end select return end subroutine symba_discard_conserve_mtm subroutine symba_discard_nonplpl ( pl , system , param ) !! author: David A. Minton !! !! Check to see if planets should be discarded based on their positions or because they are unbound !s !! !! Adapted from David E. Kaufmann's Swifter routine: symba_discard_pl.f90 !! Adapted from Hal Levison's Swift routine discard_massive5.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , dimension ( pl % nbody ) :: ldiscard integer ( I4B ) :: i , nstart , nend , nsub class ( symba_pl ), allocatable :: plsub ! First check for collisions with the central body associate ( npl => pl % nbody , cb => system % cb ) if ( npl == 0 ) return select type ( pl_discards => system % pl_discards ) class is ( symba_merger ) if (( param % rmin >= 0.0_DP ) . or . ( param % rmax >= 0.0_DP ) . or . ( param % rmaxu >= 0.0_DP )) then call symba_discard_cb_pl ( pl , system , param ) end if if ( param % qmin >= 0.0_DP ) call symba_discard_peri_pl ( pl , system , param ) if ( any ( pl % ldiscard ( 1 : npl ))) then ldiscard ( 1 : npl ) = pl % ldiscard ( 1 : npl ) allocate ( plsub , mold = pl ) call pl % spill ( plsub , ldiscard , ldestructive = . false .) nsub = plsub % nbody nstart = pl_discards % nbody + 1 nend = pl_discards % nbody + nsub call pl_discards % append ( plsub , lsource_mask = [(. true ., i = 1 , nsub )]) ! Record how many bodies were subtracted in this event pl_discards % ncomp ( nstart : nend ) = nsub end if end select end associate return end subroutine symba_discard_nonplpl subroutine symba_discard_nonplpl_conservation ( pl , system , param ) !! author: David A. Minton !! !! If there are any bodies that are removed due to either colliding with the central body or escaping the systme, !! we need to track the conserved quantities with the system bookkeeping terms. implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , ndiscard , dstat logical :: lescape logical , dimension ( pl % nbody ) :: discard_l_pl integer ( I4B ), dimension (:), allocatable :: discard_index_list associate ( npl => pl % nbody ) discard_l_pl ( 1 : npl ) = pl % ldiscard ( 1 : npl ) . and . . not . pl % lcollision ( 1 : npl ) ! These are bodies that are discarded but not flagged as pl-pl collision ndiscard = count ( discard_l_pl (:)) allocate ( discard_index_list ( ndiscard )) discard_index_list (:) = pack ([( i , i = 1 , npl )], discard_l_pl ( 1 : npl )) do i = 1 , ndiscard dstat = pl % status ( discard_index_list ( i )) if (( dstat == DISCARDED_RMIN ) . or . ( dstat == DISCARDED_PERI )) then lescape = . false . else if (( dstat == DISCARDED_RMAX ) . or . ( dstat == DISCARDED_RMAXU )) then lescape = . true . else cycle end if ! Conserve all the quantities call symba_discard_conserve_mtm ( pl , system , param , discard_index_list ( i ), lescape ) end do end associate return end subroutine symba_discard_nonplpl_conservation subroutine symba_discard_peri_pl ( pl , system , param ) !! author: David A. Minton !! !! Check to see if a test particle should be discarded because its perihelion distance becomes too small !! !! Adapted from David E. Kaufmann's Swifter routine: symba_discard_peri_pl.f90 !! Adapted from Hal Levison's Swift routine discard_mass_peri.f implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: pl !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical , save :: lfirst = . true . logical :: lfirst_orig integer ( I4B ) :: i character ( len = STRMAX ) :: timestr , idstr lfirst_orig = pl % lfirst pl % lfirst = lfirst if ( lfirst ) then call pl % get_peri ( system , param ) lfirst = . false . else call pl % get_peri ( system , param ) do i = 1 , pl % nbody if ( pl % status ( i ) == ACTIVE ) then if (( pl % isperi ( i ) == 0 ) . and . ( pl % nplenc ( i ) == 0 )) then if (( pl % atp ( i ) >= param % qmin_alo ) . and . ( pl % atp ( i ) <= param % qmin_ahi ) . and . ( pl % peri ( i ) <= param % qmin )) then pl % ldiscard ( i ) = . true . pl % lcollision ( i ) = . false . pl % status ( i ) = DISCARDED_PERI write ( timestr , * ) param % t write ( idstr , * ) pl % id ( i ) write ( * , * ) trim ( adjustl ( pl % info ( i )% name )) // \" (\" // trim ( adjustl ( idstr )) // \") perihelion distance too small at t = \" // trim ( adjustl ( timestr )) call pl % info ( i )% set_value ( status = \"DISCARDED_PERI\" , discard_time = param % t , discard_xh = pl % xh (:, i ), discard_vh = pl % vh (:, i ), discard_body_id = system % cb % id ) end if end if end if end do end if pl % lfirst = lfirst_orig return end subroutine symba_discard_peri_pl module subroutine symba_discard_pl ( self , system , param ) !! author: David A. Minton !! !! Call the various flavors of discards for massive bodies in SyMBA runs, including discards due to colliding with the central body or escaping the system implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals real ( DP ) :: Eorbit_before , Eorbit_after select type ( system ) class is ( symba_nbody_system ) select type ( param ) class is ( symba_parameters ) associate ( pl => self , plplenc_list => system % plplenc_list , plplcollision_list => system % plplcollision_list ) call pl % vb2vh ( system % cb ) call pl % xh2xb ( system % cb ) call plplenc_list % write ( pl , pl , param ) call symba_discard_nonplpl ( self , system , param ) if (. not . any ( pl % ldiscard (:))) return if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_before = system % te end if call symba_discard_nonplpl_conservation ( self , system , param ) ! Save the add/discard information to file call system % write_discard ( param ) call pl % rearray ( system , param ) if ( param % lenergy ) then call system % get_energy_and_momentum ( param ) Eorbit_after = system % te param % Ecollisions = param % Ecollisions + ( Eorbit_after - Eorbit_before ) end if end associate end select end select return end subroutine symba_discard_pl end submodule s_symba_discard","tags":"","loc":"sourcefile/symba_discard.f90.html"},{"title":"symba_step.f90 – swiftest","text":"This file depends on sourcefile~~symba_step.f90~~EfferentGraph sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_step Source Code symba_step.f90 Source Code submodule ( symba_classes ) s_symba_step use swiftest contains module subroutine symba_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step planets and active test particles ahead in democratic heliocentric coordinates, descending the recursive !!   branch if necessary to handle possible close encounters !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step.f90 !! Adapted from Hal Levison's Swift routine symba5_step_pl.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals logical :: lencounter select type ( pl => self % pl ) class is ( symba_pl ) select type ( tp => self % tp ) class is ( symba_tp ) select type ( param ) class is ( symba_parameters ) call self % reset ( param ) lencounter = pl % encounter_check ( self , dt , 0 ) . or . tp % encounter_check ( self , dt , 0 ) if ( lencounter ) then call self % interp ( param , t , dt ) param % lfirstkick = . true . else self % irec = - 1 call helio_step_system ( self , param , t , dt ) end if end select end select end select return end subroutine symba_step_system module subroutine symba_step_interp_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step planets and active test particles ahead in democratic heliocentric coordinates, calling the recursive !!         subroutine to descend to the appropriate level to handle close encounters !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step_interp.f90 !! Adapted from Hal Levison's Swift routine symba5_step_interp.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize ! Internals real ( DP ) :: dth !! Half step size dth = 0.5_DP * dt associate ( system => self ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) select type ( cb => system % cb ) class is ( symba_cb ) system % irec = - 1 call pl % vh2vb ( cb ) call pl % lindrift ( cb , dth , lbeg = . true .) call pl % kick ( system , param , t , dth , lbeg = . true .) call pl % drift ( system , param , dt ) call tp % vh2vb ( vbcb = - cb % ptbeg ) call tp % lindrift ( cb , dth , lbeg = . true .) call tp % kick ( system , param , t , dth , lbeg = . true .) call tp % drift ( system , param , dt ) call system % recursive_step ( param , t , 0 ) call pl % kick ( system , param , t , dth , lbeg = . false .) call pl % vb2vh ( cb ) call pl % lindrift ( cb , dth , lbeg = . false .) call tp % kick ( system , param , t , dth , lbeg = . false .) call tp % vb2vh ( vbcb = - cb % ptend ) call tp % lindrift ( cb , dth , lbeg = . false .) end select end select end select end associate return end subroutine symba_step_interp_system module subroutine symba_step_set_recur_levels_system ( self , ireci ) !! author: David A. Minton !! !! Resets pl, tp,and encounter structures at the start of a new step !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90 !! Adapted from Hal Levison's Swift routine symba5_step_recur.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object integer ( I4B ), intent ( in ) :: ireci !! Input recursion level ! Internals integer ( I4B ) :: k , irecp associate ( system => self , plplenc_list => self % plplenc_list , pltpenc_list => self % pltpenc_list , npl => self % pl % nbody , ntp => self % tp % nbody ) select type ( pl => self % pl ) class is ( symba_pl ) select type ( tp => self % tp ) class is ( symba_tp ) irecp = ireci + 1 if ( npl > 0 ) where ( pl % levelg ( 1 : npl ) == irecp ) pl % levelg ( 1 : npl ) = ireci if ( ntp > 0 ) where ( tp % levelg ( 1 : ntp ) == irecp ) tp % levelg ( 1 : ntp ) = ireci if ( plplenc_list % nenc > 0 ) where ( plplenc_list % level ( 1 : plplenc_list % nenc ) == irecp ) plplenc_list % level ( 1 : plplenc_list % nenc ) = ireci if ( pltpenc_list % nenc > 0 ) where ( pltpenc_list % level ( 1 : pltpenc_list % nenc ) == irecp ) pltpenc_list % level ( 1 : pltpenc_list % nenc ) = ireci system % irec = ireci end select end select end associate return end subroutine symba_step_set_recur_levels_system module recursive subroutine symba_step_recur_system ( self , param , t , ireci ) !! author: David A. Minton !! !! Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current !!         recursion level, if applicable, and descend to the next deeper level if necessarys !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90 !! Adapted from Hal Levison's Swift routine symba5_step_recur.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t integer ( I4B ), intent ( in ) :: ireci !! input recursion level ! Internals integer ( I4B ) :: i , j , irecp , nloops real ( DP ) :: dtl , dth real ( DP ), dimension ( NDIM ) :: xr , vr logical :: lencounter , lplpl_collision , lpltp_collision associate ( system => self , plplenc_list => self % plplenc_list , pltpenc_list => self % pltpenc_list ) select type ( pl => self % pl ) class is ( symba_pl ) select type ( tp => self % tp ) class is ( symba_tp ) system % irec = ireci dtl = param % dt / ( NTENC ** ireci ) dth = 0.5_DP * dtl IF ( dtl / param % dt < VSMALL ) THEN write ( * , * ) \"SWIFTEST Warning:\" write ( * , * ) \"   In symba_step_recur_system, local time step is too small\" write ( * , * ) \"   Roundoff error will be important!\" call util_exit ( FAILURE ) END IF irecp = ireci + 1 if ( ireci == 0 ) then nloops = 1 else nloops = NTENC end if do j = 1 , nloops lencounter = plplenc_list % encounter_check ( system , dtl , irecp ) . or . pltpenc_list % encounter_check ( system , dtl , irecp ) call plplenc_list % kick ( system , dth , irecp , 1 ) call pltpenc_list % kick ( system , dth , irecp , 1 ) if ( ireci /= 0 ) then call plplenc_list % kick ( system , dth , irecp , - 1 ) call pltpenc_list % kick ( system , dth , irecp , - 1 ) end if call pl % drift ( system , param , dtl ) call tp % drift ( system , param , dtl ) if ( lencounter ) call system % recursive_step ( param , t + dth , irecp ) system % irec = ireci call plplenc_list % kick ( system , dth , irecp , 1 ) call pltpenc_list % kick ( system , dth , irecp , 1 ) if ( ireci /= 0 ) then call plplenc_list % kick ( system , dth , irecp , - 1 ) call pltpenc_list % kick ( system , dth , irecp , - 1 ) end if if ( param % lclose ) then lplpl_collision = plplenc_list % collision_check ( system , param , t + dtl , dtl , ireci ) lpltp_collision = pltpenc_list % collision_check ( system , param , t + dtl , dtl , ireci ) if ( lplpl_collision ) call plplenc_list % resolve_collision ( system , param , t + dtl , dtl , ireci ) if ( lpltp_collision ) call pltpenc_list % resolve_collision ( system , param , t + dtl , dtl , ireci ) end if call self % set_recur_levels ( ireci ) end do end select end select end associate return end subroutine symba_step_recur_system module subroutine symba_step_reset_system ( self , param ) !! author: David A. Minton !! !! Resets pl, tp,and encounter structures at the start of a new step !! !! Adapted from David E. Kaufmann's Swifter routine: symba_step.f90 !! Adapted from Hal Levison's Swift routine symba5_step.f implicit none ! Arguments class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( symba_parameters ), intent ( in ) :: param !! Current run configuration parameters with SyMBA additions ! Internals integer ( I4B ) :: i , nenc_old associate ( system => self ) select type ( pl => system % pl ) class is ( symba_pl ) select type ( tp => system % tp ) class is ( symba_tp ) associate ( npl => pl % nbody , ntp => tp % nbody ) if ( npl > 0 ) then pl % lcollision ( 1 : npl ) = . false . call pl % reset_kinship ([( i , i = 1 , npl )]) pl % nplenc ( 1 : npl ) = 0 pl % ntpenc ( 1 : npl ) = 0 pl % levelg ( 1 : npl ) = - 1 pl % levelm ( 1 : npl ) = - 1 pl % lencounter ( 1 : npl ) = . false . pl % lcollision ( 1 : npl ) = . false . pl % ldiscard ( 1 : npl ) = . false . pl % lmask ( 1 : npl ) = . true . nenc_old = system % plplenc_list % nenc call system % plplenc_list % setup ( 0 ) call system % plplenc_list % setup ( nenc_old ) system % plplenc_list % nenc = 0 call system % plplcollision_list % setup ( 0 ) end if if ( ntp > 0 ) then tp % nplenc ( 1 : ntp ) = 0 tp % levelg ( 1 : ntp ) = - 1 tp % levelm ( 1 : ntp ) = - 1 tp % lmask ( 1 : ntp ) = . true . tp % ldiscard ( 1 : npl ) = . false . nenc_old = system % pltpenc_list % nenc call system % pltpenc_list % setup ( 0 ) call system % pltpenc_list % setup ( nenc_old ) system % pltpenc_list % nenc = 0 end if call system % pl_adds % setup ( 0 , param ) call system % pl_discards % setup ( 0 , param ) tp % lfirst = param % lfirstkick pl % lfirst = param % lfirstkick end associate end select end select end associate return end subroutine symba_step_reset_system end submodule s_symba_step","tags":"","loc":"sourcefile/symba_step.f90.html"},{"title":"symba_drift.f90 – swiftest","text":"This file depends on sourcefile~~symba_drift.f90~~EfferentGraph sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_symba_drift Source Code symba_drift.f90 Source Code submodule ( symba_classes ) s_symba_drift use swiftest contains module subroutine symba_drift_pl ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a symba_pl structure implicit none ! Arguments class ( symba_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) select type ( system ) class is ( symba_nbody_system ) pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE . and . pl % levelg ( 1 : npl ) == system % irec call helio_drift_body ( pl , system , param , dt ) pl % lmask ( 1 : npl ) = pl % status ( 1 : npl ) /= INACTIVE end select end associate return end subroutine symba_drift_pl module subroutine symba_drift_tp ( self , system , param , dt ) !! author: David A. Minton !! !! Wrapper function used to call the body drift routine from a symba_pl structure implicit none ! Arguments class ( symba_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) select type ( system ) class is ( symba_nbody_system ) tp % lmask ( 1 : ntp ) = tp % status ( 1 : ntp ) /= INACTIVE . and . tp % levelg ( 1 : ntp ) == system % irec call helio_drift_body ( tp , system , param , dt ) tp % lmask ( 1 : ntp ) = tp % status ( 1 : ntp ) /= INACTIVE end select end associate return end subroutine symba_drift_tp end submodule s_symba_drift","tags":"","loc":"sourcefile/symba_drift.f90.html"},{"title":"orbel.f90 – swiftest","text":"This file depends on sourcefile~~orbel.f90~2~~EfferentGraph sourcefile~orbel.f90~2 orbel.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~orbel.f90~2->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules orbel Source Code orbel.f90 Source Code module orbel use swiftest private public :: xv2el contains pure elemental subroutine xv2el ( mu , px , py , pz , vx , vy , vz , a , e , inc , capom , omega , capm ) use swiftest_classes , only : orbel_xv2el implicit none ! Arguments real * 8 , intent ( in ) :: mu , px , py , pz , vx , vy , vz real * 8 , intent ( out ) :: a , e , inc , capom , omega , capm !$f2py intent(in) mu !$f2py intent(in) px !$f2py intent(in) py !$f2py intent(in) pz !$f2py intent(in) vx !$f2py intent(in) vy !$f2py intent(in) vz !$f2py intent(out) a !$f2py intent(out) e !$f2py intent(out) inc !$f2py intent(out) capom !$f2py intent(out) omega !$f2py intent(out) capm ! Internals real * 8 , dimension ( 3 ) :: x , v x = [ px , py , pz ] v = [ vx , vy , vz ] call orbel_xv2el ( mu , x (:), v (:), a , e , inc , capom , omega , capm ) return end subroutine xv2el end module orbel","tags":"","loc":"sourcefile/orbel.f90~2.html"},{"title":"netcdf.f90 – swiftest","text":"This file depends on sourcefile~~netcdf.f90~~EfferentGraph sourcefile~netcdf.f90 netcdf.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~netcdf.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_netcdf Source Code netcdf.f90 Source Code submodule ( swiftest_classes ) s_netcdf use swiftest use netcdf contains subroutine check ( status ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Checks the status of all NetCDF operations to catch errors implicit none ! Arguments integer , intent ( in ) :: status if ( status /= nf90_noerr ) then write ( * , * ) trim ( nf90_strerror ( status )) call util_exit ( FAILURE ) end if return end subroutine check module subroutine netcdf_close ( self , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Closes a NetCDF file implicit none ! Arguments class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters call check ( nf90_close ( self % ncid ) ) return end subroutine netcdf_close module subroutine netcdf_initialize_output ( self , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Initialize a NetCDF file system and defines all variables. use , intrinsic :: ieee_arithmetic implicit none ! Arguments class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals logical :: fileExists integer ( I4B ) :: old_mode , nvar , varid , vartype real ( DP ) :: dfill real ( SP ) :: sfill dfill = ieee_value ( dfill , IEEE_QUIET_NAN ) sfill = ieee_value ( sfill , IEEE_QUIET_NAN ) !! Create the new output file, deleting any previously existing output file of the same name call check ( nf90_create ( param % outfile , NF90_NETCDF4 , self % ncid ) ) ! Define the NetCDF dimensions with particle name as the record dimension call check ( nf90_def_dim ( self % ncid , ID_DIMNAME , NF90_UNLIMITED , self % id_dimid ) ) ! 'x' dimension call check ( nf90_def_dim ( self % ncid , TIME_DIMNAME , NF90_UNLIMITED , self % time_dimid ) ) ! 'y' dimension call check ( nf90_def_dim ( self % ncid , STR_DIMNAME , NAMELEN , self % str_dimid ) ) ! Dimension for string variables (aka character arrays) select case ( param % out_type ) case ( NETCDF_FLOAT_TYPE ) self % out_type = NF90_FLOAT case ( NETCDF_DOUBLE_TYPE ) self % out_type = NF90_DOUBLE end select !! Define the variables call check ( nf90_def_var ( self % ncid , TIME_DIMNAME , self % out_type , self % time_dimid , self % time_varid ) ) call check ( nf90_def_var ( self % ncid , ID_DIMNAME , NF90_INT , self % id_dimid , self % id_varid ) ) call check ( nf90_def_var ( self % ncid , NPL_VARNAME , NF90_INT , self % time_dimid , self % npl_varid ) ) call check ( nf90_def_var ( self % ncid , NTP_VARNAME , NF90_INT , self % time_dimid , self % ntp_varid ) ) call check ( nf90_def_var ( self % ncid , NAME_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % name_varid ) ) call check ( nf90_def_var ( self % ncid , PTYPE_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % ptype_varid ) ) if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then call check ( nf90_def_var ( self % ncid , XHX_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % xhx_varid ) ) call check ( nf90_def_var ( self % ncid , XHY_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % xhy_varid ) ) call check ( nf90_def_var ( self % ncid , XHZ_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % xhz_varid ) ) call check ( nf90_def_var ( self % ncid , VHX_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % vhx_varid ) ) call check ( nf90_def_var ( self % ncid , VHY_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % vhy_varid ) ) call check ( nf90_def_var ( self % ncid , VHZ_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % vhz_varid ) ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then call check ( nf90_def_var ( self % ncid , A_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % a_varid ) ) call check ( nf90_def_var ( self % ncid , E_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % e_varid ) ) call check ( nf90_def_var ( self % ncid , INC_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % inc_varid ) ) call check ( nf90_def_var ( self % ncid , CAPOM_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % capom_varid ) ) call check ( nf90_def_var ( self % ncid , OMEGA_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % omega_varid ) ) call check ( nf90_def_var ( self % ncid , CAPM_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % capm_varid ) ) end if call check ( nf90_def_var ( self % ncid , GMASS_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Gmass_varid ) ) if ( param % lrhill_present ) call check ( nf90_def_var ( self % ncid , RHILL_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % rhill_varid ) ) if ( param % lclose ) call check ( nf90_def_var ( self % ncid , RADIUS_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % radius_varid ) ) if ( param % lrotation ) then call check ( nf90_def_var ( self % ncid , IP1_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Ip1_varid ) ) call check ( nf90_def_var ( self % ncid , IP2_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Ip2_varid ) ) call check ( nf90_def_var ( self % ncid , IP3_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Ip3_varid ) ) call check ( nf90_def_var ( self % ncid , ROTX_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % rotx_varid ) ) call check ( nf90_def_var ( self % ncid , ROTY_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % roty_varid ) ) call check ( nf90_def_var ( self % ncid , ROTZ_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % rotz_varid ) ) end if if ( param % ltides ) then call check ( nf90_def_var ( self % ncid , K2_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % k2_varid ) ) call check ( nf90_def_var ( self % ncid , Q_VARNAME , self % out_type , [ self % id_dimid , self % time_dimid ], self % Q_varid ) ) end if if ( param % lenergy ) then call check ( nf90_def_var ( self % ncid , KE_ORB_VARNAME , self % out_type , self % time_dimid , self % KE_orb_varid ) ) call check ( nf90_def_var ( self % ncid , KE_SPIN_VARNAME , self % out_type , self % time_dimid , self % KE_spin_varid ) ) call check ( nf90_def_var ( self % ncid , PE_VARNAME , self % out_type , self % time_dimid , self % PE_varid ) ) call check ( nf90_def_var ( self % ncid , L_ORBX_VARNAME , self % out_type , self % time_dimid , self % L_orbx_varid ) ) call check ( nf90_def_var ( self % ncid , L_ORBY_VARNAME , self % out_type , self % time_dimid , self % L_orby_varid ) ) call check ( nf90_def_var ( self % ncid , L_ORBZ_VARNAME , self % out_type , self % time_dimid , self % L_orbz_varid ) ) call check ( nf90_def_var ( self % ncid , L_SPINX_VARNAME , self % out_type , self % time_dimid , self % L_spinx_varid ) ) call check ( nf90_def_var ( self % ncid , L_SPINY_VARNAME , self % out_type , self % time_dimid , self % L_spiny_varid ) ) call check ( nf90_def_var ( self % ncid , L_SPINZ_VARNAME , self % out_type , self % time_dimid , self % L_spinz_varid ) ) call check ( nf90_def_var ( self % ncid , L_ESCAPEX_VARNAME , self % out_type , self % time_dimid , self % L_escapex_varid ) ) call check ( nf90_def_var ( self % ncid , L_ESCAPEY_VARNAME , self % out_type , self % time_dimid , self % L_escapey_varid ) ) call check ( nf90_def_var ( self % ncid , L_ESCAPEZ_VARNAME , self % out_type , self % time_dimid , self % L_escapez_varid ) ) call check ( nf90_def_var ( self % ncid , ECOLLISIONS_VARNAME , self % out_type , self % time_dimid , self % Ecollisions_varid ) ) call check ( nf90_def_var ( self % ncid , EUNTRACKED_VARNAME , self % out_type , self % time_dimid , self % Euntracked_varid ) ) call check ( nf90_def_var ( self % ncid , GMESCAPE_VARNAME , self % out_type , self % time_dimid , self % GMescape_varid ) ) end if call check ( nf90_def_var ( self % ncid , STATUS_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % status_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_TYPE_VARNAME , NF90_CHAR , [ self % str_dimid , self % id_dimid ], self % origin_type_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_TIME_VARNAME , self % out_type , self % id_dimid , self % origin_time_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_XHX_VARNAME , self % out_type , self % id_dimid , self % origin_xhx_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_XHY_VARNAME , self % out_type , self % id_dimid , self % origin_xhy_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_XHZ_VARNAME , self % out_type , self % id_dimid , self % origin_xhz_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_VHX_VARNAME , self % out_type , self % id_dimid , self % origin_vhx_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_VHY_VARNAME , self % out_type , self % id_dimid , self % origin_vhy_varid ) ) call check ( nf90_def_var ( self % ncid , ORIGIN_VHZ_VARNAME , self % out_type , self % id_dimid , self % origin_vhz_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_TIME_VARNAME , self % out_type , self % id_dimid , self % discard_time_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_XHX_VARNAME , self % out_type , self % id_dimid , self % discard_xhx_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_XHY_VARNAME , self % out_type , self % id_dimid , self % discard_xhy_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_XHZ_VARNAME , self % out_type , self % id_dimid , self % discard_xhz_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_VHX_VARNAME , self % out_type , self % id_dimid , self % discard_vhx_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_VHY_VARNAME , self % out_type , self % id_dimid , self % discard_vhy_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_VHZ_VARNAME , self % out_type , self % id_dimid , self % discard_vhz_varid ) ) call check ( nf90_def_var ( self % ncid , DISCARD_BODY_ID_VARNAME , NF90_INT , self % id_dimid , self % discard_body_id_varid ) ) ! Set fill mode to NaN for all variables call check ( nf90_inquire ( self % ncid , nVariables = nvar ) ) do varid = 1 , nvar call check ( nf90_inquire_variable ( self % ncid , varid , xtype = vartype ) ) select case ( vartype ) case ( NF90_INT ) call check ( nf90_def_var_fill ( self % ncid , varid , 0 , NF90_FILL_INT ) ) case ( NF90_FLOAT ) call check ( nf90_def_var_fill ( self % ncid , varid , 0 , sfill ) ) case ( NF90_DOUBLE ) call check ( nf90_def_var_fill ( self % ncid , varid , 0 , dfill ) ) case ( NF90_CHAR ) call check ( nf90_def_var_fill ( self % ncid , varid , 0 , 0 ) ) end select end do return end subroutine netcdf_initialize_output module subroutine netcdf_open ( self , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Opens a NetCDF file and does the variable inquiries to activate variable ids implicit none ! Arguments class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters call check ( nf90_open ( param % outfile , nf90_write , self % ncid ) ) call check ( nf90_inq_varid ( self % ncid , TIME_DIMNAME , self % time_varid )) call check ( nf90_inq_varid ( self % ncid , ID_DIMNAME , self % id_varid )) call check ( nf90_inq_varid ( self % ncid , NPL_VARNAME , self % npl_varid )) call check ( nf90_inq_varid ( self % ncid , NTP_VARNAME , self % ntp_varid )) call check ( nf90_inq_varid ( self % ncid , NAME_VARNAME , self % name_varid )) call check ( nf90_inq_varid ( self % ncid , PTYPE_VARNAME , self % ptype_varid )) if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then call check ( nf90_inq_varid ( self % ncid , XHX_VARNAME , self % xhx_varid )) call check ( nf90_inq_varid ( self % ncid , XHY_VARNAME , self % xhy_varid )) call check ( nf90_inq_varid ( self % ncid , XHZ_VARNAME , self % xhz_varid )) call check ( nf90_inq_varid ( self % ncid , VHX_VARNAME , self % vhx_varid )) call check ( nf90_inq_varid ( self % ncid , VHY_VARNAME , self % vhy_varid )) call check ( nf90_inq_varid ( self % ncid , VHZ_VARNAME , self % vhz_varid )) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then call check ( nf90_inq_varid ( self % ncid , A_VARNAME , self % a_varid )) call check ( nf90_inq_varid ( self % ncid , E_VARNAME , self % e_varid )) call check ( nf90_inq_varid ( self % ncid , INC_VARNAME , self % inc_varid )) call check ( nf90_inq_varid ( self % ncid , CAPOM_VARNAME , self % capom_varid )) call check ( nf90_inq_varid ( self % ncid , OMEGA_VARNAME , self % omega_varid )) call check ( nf90_inq_varid ( self % ncid , CAPM_VARNAME , self % capm_varid )) end if call check ( nf90_inq_varid ( self % ncid , GMASS_VARNAME , self % Gmass_varid )) if ( param % lclose ) call check ( nf90_inq_varid ( self % ncid , RADIUS_VARNAME , self % radius_varid )) if ( param % lrhill_present ) call check ( nf90_inq_varid ( self % ncid , RHILL_VARNAME , self % rhill_varid )) if ( param % lrotation ) then call check ( nf90_inq_varid ( self % ncid , IP1_VARNAME , self % Ip1_varid )) call check ( nf90_inq_varid ( self % ncid , IP2_VARNAME , self % Ip2_varid )) call check ( nf90_inq_varid ( self % ncid , IP3_VARNAME , self % Ip3_varid )) call check ( nf90_inq_varid ( self % ncid , ROTX_VARNAME , self % rotx_varid )) call check ( nf90_inq_varid ( self % ncid , ROTY_VARNAME , self % roty_varid )) call check ( nf90_inq_varid ( self % ncid , ROTZ_VARNAME , self % rotz_varid )) end if if ( param % ltides ) then call check ( nf90_inq_varid ( self % ncid , K2_VARNAME , self % k2_varid )) call check ( nf90_inq_varid ( self % ncid , Q_VARNAME , self % Q_varid )) end if if ( param % lenergy ) then call check ( nf90_inq_varid ( self % ncid , KE_ORB_VARNAME , self % KE_orb_varid ) ) call check ( nf90_inq_varid ( self % ncid , KE_SPIN_VARNAME , self % KE_spin_varid ) ) call check ( nf90_inq_varid ( self % ncid , PE_VARNAME , self % PE_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ORBX_VARNAME , self % L_orbx_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ORBY_VARNAME , self % L_orby_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ORBZ_VARNAME , self % L_orbz_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_SPINX_VARNAME , self % L_spinx_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_SPINY_VARNAME , self % L_spiny_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_SPINZ_VARNAME , self % L_spinz_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ESCAPEX_VARNAME , self % L_escapex_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ESCAPEY_VARNAME , self % L_escapey_varid ) ) call check ( nf90_inq_varid ( self % ncid , L_ESCAPEZ_VARNAME , self % L_escapez_varid ) ) call check ( nf90_inq_varid ( self % ncid , ECOLLISIONS_VARNAME , self % Ecollisions_varid ) ) call check ( nf90_inq_varid ( self % ncid , EUNTRACKED_VARNAME , self % Euntracked_varid ) ) call check ( nf90_inq_varid ( self % ncid , GMESCAPE_VARNAME , self % GMescape_varid ) ) end if call check ( nf90_inq_varid ( self % ncid , STATUS_VARNAME , self % status_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_TYPE_VARNAME , self % origin_type_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_TIME_VARNAME , self % origin_time_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_XHX_VARNAME , self % origin_xhx_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_XHY_VARNAME , self % origin_xhy_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_XHZ_VARNAME , self % origin_xhz_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_VHX_VARNAME , self % origin_vhx_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_VHY_VARNAME , self % origin_vhy_varid )) call check ( nf90_inq_varid ( self % ncid , ORIGIN_VHZ_VARNAME , self % origin_vhz_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_TIME_VARNAME , self % discard_time_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_XHX_VARNAME , self % discard_xhx_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_XHY_VARNAME , self % discard_xhy_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_XHZ_VARNAME , self % discard_xhz_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_VHX_VARNAME , self % discard_vhx_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_VHY_VARNAME , self % discard_vhy_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_VHZ_VARNAME , self % discard_vhz_varid )) call check ( nf90_inq_varid ( self % ncid , DISCARD_BODY_ID_VARNAME , self % discard_body_id_varid )) return end subroutine netcdf_open module subroutine netcdf_write_frame_base ( self , iu , param ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Write a frame of output of either test particle or massive body data to the binary output file !!    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method implicit none ! Arguments class ( swiftest_base ), intent ( in ) :: self !! Swiftest particle object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j , tslot , strlen , idslot , old_mode integer ( I4B ), dimension (:), allocatable :: ind character ( len = :), allocatable :: charstring call self % write_particle_info ( iu ) tslot = int ( param % ioutput , kind = I4B ) + 1 call check ( nf90_set_fill ( iu % ncid , nf90_nofill , old_mode ) ) select type ( self ) class is ( swiftest_body ) associate ( n => self % nbody ) if ( n == 0 ) return allocate ( ind ( n )) call util_sort ( self % id ( 1 : n ), ind ) do i = 1 , n j = ind ( i ) idslot = self % id ( j ) + 1 if (( param % out_form == XV ) . or . ( param % out_form == XVEL )) then call check ( nf90_put_var ( iu % ncid , iu % xhx_varid , self % xh ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % xhy_varid , self % xh ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % xhz_varid , self % xh ( 3 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % vhx_varid , self % vh ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % vhy_varid , self % vh ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % vhz_varid , self % vh ( 3 , j ), start = [ idslot , tslot ]) ) end if if (( param % out_form == EL ) . or . ( param % out_form == XVEL )) then call check ( nf90_put_var ( iu % ncid , iu % a_varid , self % a ( j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % e_varid , self % e ( j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % inc_varid , self % inc ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % capom_varid , self % capom ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % omega_varid , self % omega ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % capm_varid , self % capm ( j ) * RAD2DEG , start = [ idslot , tslot ]) ) end if select type ( self ) class is ( swiftest_pl ) ! Additional output if the passed polymorphic object is a massive body call check ( nf90_put_var ( iu % ncid , iu % Gmass_varid , self % Gmass ( j ), start = [ idslot , tslot ]) ) if ( param % lrhill_present ) then call check ( nf90_put_var ( iu % ncid , iu % rhill_varid , self % rhill ( j ), start = [ idslot , tslot ]) ) end if if ( param % lclose ) then call check ( nf90_put_var ( iu % ncid , iu % radius_varid , self % radius ( j ), start = [ idslot , tslot ]) ) end if if ( param % lrotation ) then call check ( nf90_put_var ( iu % ncid , iu % Ip1_varid , self % Ip ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip2_varid , self % Ip ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip3_varid , self % Ip ( 3 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotx_varid , self % rot ( 1 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % roty_varid , self % rot ( 2 , j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotz_varid , self % rot ( 3 , j ), start = [ idslot , tslot ]) ) end if if ( param % ltides ) then call check ( nf90_put_var ( iu % ncid , iu % k2_varid , self % k2 ( j ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Q_varid , self % Q ( j ), start = [ idslot , tslot ]) ) end if end select end do end associate class is ( swiftest_cb ) idslot = self % id + 1 call check ( nf90_put_var ( iu % ncid , iu % id_varid , self % id , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Gmass_varid , self % Gmass , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % radius_varid , self % radius , start = [ idslot , tslot ]) ) if ( param % lrotation ) then call check ( nf90_put_var ( iu % ncid , iu % Ip1_varid , self % Ip ( 1 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip2_varid , self % Ip ( 2 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ip3_varid , self % Ip ( 3 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotx_varid , self % rot ( 1 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % roty_varid , self % rot ( 2 ), start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % rotz_varid , self % rot ( 3 ), start = [ idslot , tslot ]) ) end if if ( param % ltides ) then call check ( nf90_put_var ( iu % ncid , iu % k2_varid , self % k2 , start = [ idslot , tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Q_varid , self % Q , start = [ idslot , tslot ]) ) end if end select call check ( nf90_set_fill ( iu % ncid , old_mode , old_mode ) ) return end subroutine netcdf_write_frame_base module subroutine netcdf_write_particle_info_base ( self , iu ) !! author: Carlisle A. Wishard, Dana Singh, and David A. Minton !! !! Write all current particle to file implicit none ! Arguments class ( swiftest_base ), intent ( in ) :: self !! Swiftest particle object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to identify a particular NetCDF dataset ! Internals integer ( I4B ) :: i , j , tslot , strlen , idslot , old_mode integer ( I4B ), dimension (:), allocatable :: ind character ( len = :), allocatable :: charstring character ( len = NAMELEN ) :: emptystr , lenstr character ( len = :), allocatable :: fmtlabel ! This string of spaces of length NAMELEN is used to clear out any old data left behind inside the string variables call check ( nf90_set_fill ( iu % ncid , nf90_nofill , old_mode ) ) write ( lenstr , * ) NAMELEN fmtlabel = \"(A\" // trim ( adjustl ( lenstr )) // \")\" write ( emptystr , fmtlabel ) \" \" select type ( self ) class is ( swiftest_body ) associate ( n => self % nbody ) if ( n == 0 ) return allocate ( ind ( n )) call util_sort ( self % id ( 1 : n ), ind ) do i = 1 , n j = ind ( i ) idslot = self % id ( j ) + 1 call check ( nf90_put_var ( iu % ncid , iu % id_varid , self % id ( j ), start = [ idslot ]) ) charstring = trim ( adjustl ( self % info ( j )% name )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info ( j )% particle_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info ( j )% status )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info ( j )% origin_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_time_varid , self % info ( j )% origin_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhx_varid , self % info ( j )% origin_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhy_varid , self % info ( j )% origin_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhz_varid , self % info ( j )% origin_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhx_varid , self % info ( j )% origin_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhy_varid , self % info ( j )% origin_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhz_varid , self % info ( j )% origin_vh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_time_varid , self % info ( j )% discard_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhx_varid , self % info ( j )% discard_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhy_varid , self % info ( j )% discard_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhz_varid , self % info ( j )% discard_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhx_varid , self % info ( j )% discard_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhy_varid , self % info ( j )% discard_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhz_varid , self % info ( j )% discard_vh ( 3 ), start = [ idslot ]) ) end do end associate class is ( swiftest_cb ) idslot = self % id + 1 call check ( nf90_put_var ( iu % ncid , iu % id_varid , self % id , start = [ idslot ]) ) charstring = trim ( adjustl ( self % info % name )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % name_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info % particle_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % ptype_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info % status )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % status_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) charstring = trim ( adjustl ( self % info % origin_type )) strlen = len ( charstring ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , emptystr , start = [ 1 , idslot ], count = [ NAMELEN , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_type_varid , charstring , start = [ 1 , idslot ], count = [ strlen , 1 ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_time_varid , self % info % origin_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhx_varid , self % info % origin_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhy_varid , self % info % origin_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_xhz_varid , self % info % origin_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhx_varid , self % info % origin_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhy_varid , self % info % origin_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % origin_vhz_varid , self % info % origin_vh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_time_varid , self % info % discard_time , start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhx_varid , self % info % discard_xh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhy_varid , self % info % discard_xh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_xhz_varid , self % info % discard_xh ( 3 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhx_varid , self % info % discard_vh ( 1 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhy_varid , self % info % discard_vh ( 2 ), start = [ idslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % discard_vhz_varid , self % info % discard_vh ( 3 ), start = [ idslot ]) ) end select call check ( nf90_set_fill ( iu % ncid , old_mode , old_mode ) ) return end subroutine netcdf_write_particle_info_base module subroutine netcdf_write_hdr_system ( self , iu , param ) !! author: David A. Minton !! !! Writes header information (variables that change with time, but not particle id). !! This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that !! previously were handled as separate output files. implicit none ! Arguments class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: tslot tslot = int ( param % ioutput , kind = I4B ) + 1 call check ( nf90_open ( param % outfile , nf90_write , iu % ncid ) ) call check ( nf90_put_var ( iu % ncid , iu % time_varid , param % t , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % npl_varid , self % pl % nbody , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % ntp_varid , self % tp % nbody , start = [ tslot ]) ) if ( param % lenergy ) then call check ( nf90_put_var ( iu % ncid , iu % KE_orb_varid , self % ke_orbit , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % KE_spin_varid , self % ke_spin , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % PE_varid , self % pe , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_orbx_varid , self % Lorbit ( 1 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_orby_varid , self % Lorbit ( 2 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_orbz_varid , self % Lorbit ( 3 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_spinx_varid , self % Lspin ( 1 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_spiny_varid , self % Lspin ( 2 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_spinz_varid , self % Lspin ( 3 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_escapex_varid , param % Lescape ( 1 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_escapey_varid , param % Lescape ( 2 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % L_escapez_varid , param % Lescape ( 3 ), start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Ecollisions_varid , param % Ecollisions , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % Euntracked_varid , param % Euntracked , start = [ tslot ]) ) call check ( nf90_put_var ( iu % ncid , iu % GMescape_varid , param % GMescape , start = [ tslot ]) ) end if return end subroutine netcdf_write_hdr_system end submodule s_netcdf","tags":"","loc":"sourcefile/netcdf.f90.html"},{"title":"swiftest_driver.f90 – swiftest","text":"This file depends on sourcefile~~swiftest_driver.f90~~EfferentGraph sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Programs swiftest_driver Source Code swiftest_driver.f90 Source Code program swiftest_driver !! author: David A. Minton !! !! Driver program for the Swiftest integrators. Unlike the earlier Swift and Swifter drivers, in Swiftest all integrators !!    are run from this single program. !! !! Adapted from Swifter by David E. Kaufmann's Swifter driver programs swifter_[bs,helio,ra15,rmvs,symba,tu4,whm].f90 !! Adapted from Hal Levison and Martin Duncan's Swift driver programs use swiftest implicit none class ( swiftest_nbody_system ), allocatable :: nbody_system !! Polymorphic object containing the nbody system to be integrated class ( swiftest_parameters ), allocatable :: param !! Run configuration parameters integer ( I4B ) :: integrator !! Integrator type code (see swiftest_globals for symbolic names) character ( len = :), allocatable :: param_file_name !! Name of the file containing user-defined parameters integer ( I4B ) :: ierr !! I/O error code integer ( I8B ) :: iloop !! Loop counter integer ( I8B ) :: idump !! Dump cadence counter integer ( I8B ) :: iout !! Output cadence counter integer ( I8B ) :: ioutput_t0 !! The output frame counter at time 0 integer ( I8B ) :: nloops !! Number of steps to take in the simulation real ( DP ) :: old_t_final = 0.0_DP !! Output time at which writing should start, in order to prevent duplicate lines being written for restarts type ( walltimer ) :: timer !! Object used for computing elapsed wall time ierr = io_get_args ( integrator , param_file_name ) if ( ierr /= 0 ) then write ( * , * ) 'Error reading in arguments from the command line' call util_exit ( FAILURE ) end if !> Read in the user-defined parameters file and the initial conditions of the system select case ( integrator ) case ( symba ) allocate ( symba_parameters :: param ) case default allocate ( swiftest_parameters :: param ) end select param % integrator = integrator call setup_construct_system ( nbody_system , param ) call param % read_in ( param_file_name ) associate ( t => param % t , & t0 => param % t0 , & dt => param % dt , & tstop => param % tstop , & istep_out => param % istep_out , & istep_dump => param % istep_dump , & ioutput => param % ioutput ) call nbody_system % initialize ( param ) t = t0 iloop = 0 iout = istep_out idump = istep_dump nloops = ceiling (( tstop - t0 ) / dt , kind = I8B ) ioutput_t0 = int ( t0 / dt / istep_out , kind = I8B ) ioutput = ioutput_t0 ! Prevent duplicate frames from being written if this is a restarted run if (( param % lrestart ) . and . (( param % out_type == REAL8_TYPE ) . or . param % out_type == REAL4_TYPE )) then old_t_final = nbody_system % get_old_t_final ( param ) else old_t_final = t0 if ( istep_out > 0 ) call nbody_system % write_frame ( param ) call nbody_system % dump ( param ) end if !> Define the maximum number of threads nthreads = 1 ! In the *serial* case !$ nthreads = omp_get_max_threads() ! In the *parallel* case !$ write(*,'(a)')   ' OpenMP parameters:' !$ write(*,'(a)')   ' ------------------' !$ write(*,'(a,i3,/)') ' Number of threads  = ', nthreads call timer % reset () write ( * , * ) \" *************** Main Loop *************** \" do iloop = 1 , nloops !> Step the system forward in time call nbody_system % step ( param , t , dt ) t = t0 + iloop * dt !> Evaluate any discards or collisional outcomes call nbody_system % discard ( param ) !> If the loop counter is at the output cadence value, append the data file with a single frame if ( istep_out > 0 ) then iout = iout - 1 if ( iout == 0 ) then ioutput = ioutput_t0 + iloop / istep_out call timer % finish ( nsubsteps = istep_out , message = \"Integration steps:\" ) if ( t > old_t_final ) call nbody_system % write_frame ( param ) call timer % finish ( nsubsteps = 1 , message = \"File I/O:         \" ) iout = istep_out end if end if !> If the loop counter is at the dump cadence value, dump the state of the system to a file in case it needs to be restarted if ( istep_dump > 0 ) then idump = idump - 1 if ( idump == 0 ) then call nbody_system % dump ( param ) idump = istep_dump end if end if end do end associate call util_exit ( SUCCESS ) stop end program swiftest_driver","tags":"","loc":"sourcefile/swiftest_driver.f90.html"},{"title":"rmvs_classes.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_classes.f90~~EfferentGraph sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~rmvs_classes.f90~~AfferentGraph sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules rmvs_classes Source Code rmvs_classes.f90 Source Code module rmvs_classes !! author: David A. Minton !! !! Definition of classes and methods specific to the Regularized Mixed Variable Symplectic (RMVS) integrator !! Partially adapted from David E. Kaufmann's Swifter module: module_rmvs.f90 use swiftest_globals use whm_classes , only : whm_cb , whm_pl , whm_tp , whm_nbody_system implicit none public integer ( I4B ), private , parameter :: NTENC = 10 integer ( I4B ), private , parameter :: NTPHENC = 3 integer ( I4B ), private , parameter :: NTPENC = NTENC * NTPHENC real ( DP ), private , parameter :: RHSCALE = 3.5_DP real ( DP ), private , parameter :: RHPSCALE = 1.0_DP real ( DP ), private , parameter :: FACQDT = 2.0_DP !******************************************************************************************************************************** !  rmvs_nbody_system class definitions and method interfaces !******************************************************************************************************************************** type , extends ( whm_nbody_system ) :: rmvs_nbody_system !> In the RMVS integrator, only test particles are discarded logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations real ( DP ) :: rts !! fraction of Hill's sphere radius to use as radius of encounter region real ( DP ), dimension (:,:), allocatable :: vbeg !! Planet velocities at beginning ot step contains !> Replace the abstract procedures with concrete ones procedure :: initialize => rmvs_setup_initialize_system !! Performs RMVS-specific initilization steps, including generating the close encounter planetocentric structures procedure :: step => rmvs_step_system !! Advance the RMVS nbody system forward in time by one step end type rmvs_nbody_system type , private :: rmvs_interp real ( DP ), dimension (:, :), allocatable :: x !! interpolated heliocentric planet position for outer encounter real ( DP ), dimension (:, :), allocatable :: v !! interpolated heliocentric planet velocity for outer encounter real ( DP ), dimension (:, :), allocatable :: aobl !! Encountering planet's oblateness acceleration value real ( DP ), dimension (:, :), allocatable :: atide !! Encountering planet's tidal acceleration value end type rmvs_interp !******************************************************************************************************************************** ! rmvs_cb class definitions and method interfaces !******************************************************************************************************************************* !> RMVS central body particle class type , extends ( whm_cb ) :: rmvs_cb type ( rmvs_interp ), dimension (:), allocatable :: outer !! interpolated heliocentric central body position for outer encounters type ( rmvs_interp ), dimension (:), allocatable :: inner !! interpolated heliocentric central body position for inner encounters logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations end type rmvs_cb !******************************************************************************************************************************** !  rmvs_tp class definitions and method interfaces !******************************************************************************************************************************* !! RMVS test particle class type , extends ( whm_tp ) :: rmvs_tp !! Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the !!    component list, such as rmvs_setup_tp and rmvs_util_spill_tp ! encounter steps) logical , dimension (:), allocatable :: lperi !! planetocentric pericenter passage flag (persistent for a full rmvs time step) over a full RMVS time step) integer ( I4B ), dimension (:), allocatable :: plperP !! index of planet associated with pericenter distance peri (persistent over a full RMVS time step) integer ( I4B ), dimension (:), allocatable :: plencP !! index of planet that test particle is encountering (not persistent for a full RMVS time step) ! The following are used to correctly set the oblateness values of the acceleration during an inner encounter with a planet type ( rmvs_cb ) :: cb_heliocentric !! Copy of original central body object passed to close encounter (used for oblateness acceleration during planetocentric encoountters) real ( DP ), dimension (:,:), allocatable :: xheliocentric !! original heliocentric position (used for oblateness calculation during close encounters) integer ( I4B ) :: index !!  inner substep number within current set integer ( I4B ) :: ipleP !!  index value of encountering planet logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations contains procedure :: discard => rmvs_discard_tp !! Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered procedure :: encounter_check => rmvs_encounter_check_tp !! Checks if any test particles are undergoing a close encounter with a massive body procedure :: accel => rmvs_kick_getacch_tp !! Calculates either the standard or modified version of the acceleration depending if the !!    if the test particle is undergoing a close encounter or not procedure :: setup => rmvs_setup_tp !! Constructor method - Allocates space for the input number of bodiess procedure :: append => rmvs_util_append_tp !! Appends elements from one structure to another procedure :: fill => rmvs_util_fill_tp !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => rmvs_util_resize_tp !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: sort => rmvs_util_sort_tp !! Sorts body arrays by a sortable componen procedure :: rearrange => rmvs_util_sort_rearrange_tp !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => rmvs_util_spill_tp !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type rmvs_tp !******************************************************************************************************************************** !                                    rmvs_pl class definitions and method interfaces !******************************************************************************************************************************* !> RMVS massive body particle class type , extends ( whm_pl ) :: rmvs_pl integer ( I4B ), dimension (:), allocatable :: nenc !! number of test particles encountering planet this full rmvs time step integer ( I4B ), dimension (:), allocatable :: tpenc1P !! index of first test particle encountering planet integer ( I4B ), dimension (:), allocatable :: plind !! Connects the planetocentric indices back to the heliocentric planet list type ( rmvs_interp ), dimension (:), allocatable :: outer !! interpolated heliocentric central body position for outer encounters type ( rmvs_interp ), dimension (:), allocatable :: inner !! interpolated heliocentric central body position for inner encounters class ( rmvs_nbody_system ), dimension (:), allocatable :: planetocentric !! Planetocentric version of the massive body objects (one for each massive body) logical :: lplanetocentric = . false . !! Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations contains procedure :: setup => rmvs_setup_pl !! Constructor method - Allocates space for the input number of bodiess procedure :: append => rmvs_util_append_pl !! Appends elements from one structure to another procedure :: fill => rmvs_util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => rmvs_util_resize_pl !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: sort => rmvs_util_sort_pl !! Sorts body arrays by a sortable componen procedure :: rearrange => rmvs_util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => rmvs_util_spill_pl !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type rmvs_pl interface module pure subroutine rmvs_chk_ind ( xr , yr , zr , vxr , vyr , vzr , dt , r2crit , lencounter , lvdotr ) !$omp declare simd(rmvs_chk_ind) implicit none real ( DP ), intent ( in ) :: xr , yr , zr !! Relative distance vector components real ( DP ), intent ( in ) :: vxr , vyr , vzr !! Relative velocity vector components real ( DP ), intent ( in ) :: dt !! Step size real ( DP ), intent ( in ) :: r2crit !! Square of the critical encounter distance logical , intent ( out ) :: lencounter !! Flag indicating that an encounter has occurred logical , intent ( out ) :: lvdotr !! Logical flag indicating the direction of the v .dot. r vector end subroutine rmvs_chk_ind module subroutine rmvs_discard_tp ( self , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine rmvs_discard_tp module function rmvs_encounter_check_tp ( self , system , dt ) result ( lencounter ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object real ( DP ), intent ( in ) :: dt !! step size logical :: lencounter !! Returns true if there is at least one close encounter end function rmvs_encounter_check_tp module subroutine rmvs_io_write_encounter ( t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 , enc_out ) implicit none integer ( I4B ), intent ( in ) :: id1 , id2 real ( DP ), intent ( in ) :: t , Gmass1 , Gmass2 , radius1 , radius2 real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 , vh1 , vh2 character ( * ), intent ( in ) :: enc_out end subroutine rmvs_io_write_encounter module subroutine rmvs_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structuree class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine rmvs_kick_getacch_tp module subroutine rmvs_setup_pl ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine rmvs_setup_pl module subroutine rmvs_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine rmvs_setup_initialize_system module subroutine rmvs_setup_tp ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parametere end subroutine rmvs_setup_tp module subroutine rmvs_util_append_pl ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine rmvs_util_append_pl module subroutine rmvs_util_append_tp ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine rmvs_util_append_tp module subroutine rmvs_util_fill_pl ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine rmvs_util_fill_pl module subroutine rmvs_util_fill_tp ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: inserts !!  Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine rmvs_util_fill_tp module subroutine rmvs_util_resize_pl ( self , nnew ) implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine rmvs_util_resize_pl module subroutine rmvs_util_resize_tp ( self , nnew ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine rmvs_util_resize_tp module subroutine rmvs_util_sort_pl ( self , sortby , ascending ) implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine rmvs_util_sort_pl module subroutine rmvs_util_sort_tp ( self , sortby , ascending ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine rmvs_util_sort_tp module subroutine rmvs_util_sort_rearrange_pl ( self , ind ) implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine rmvs_util_sort_rearrange_pl module subroutine rmvs_util_sort_rearrange_tp ( self , ind ) implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine rmvs_util_sort_rearrange_tp module subroutine rmvs_util_spill_pl ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine rmvs_util_spill_pl module subroutine rmvs_util_spill_tp ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine rmvs_util_spill_tp module subroutine rmvs_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine rmvs_step_system end interface end module rmvs_classes","tags":"","loc":"sourcefile/rmvs_classes.f90.html"},{"title":"swiftest_globals.f90 – swiftest","text":"Files dependent on this one sourcefile~~swiftest_globals.f90~~AfferentGraph sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~kick.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90->sourcefile~swiftest_classes.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90->sourcefile~swiftest_classes.f90 sourcefile~operator_mag.f90 operator_mag.f90 sourcefile~operator_mag.f90->sourcefile~swiftest_operators.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90->sourcefile~swiftest_classes.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest_classes.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest_operators.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~orbel.f90~2->sourcefile~swiftest_classes.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90->sourcefile~swiftest_classes.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~gr.f90->sourcefile~swiftest_classes.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90->sourcefile~swiftest_classes.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~io.f90->sourcefile~swiftest_classes.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~drift.f90->sourcefile~swiftest_classes.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~discard.f90->sourcefile~swiftest_classes.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~obl.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90->sourcefile~swiftest_classes.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~setup.f90->sourcefile~swiftest_classes.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90->sourcefile~swiftest_classes.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest_globals Source Code swiftest_globals.f90 Source Code module swiftest_globals !! author: David A. Minton !! graph: false !! !! Basic parameters, definitions, and global type definitions used throughout the Swiftest project !! Adapted from David E. Kaufmann's Swifter routine: swiftest_globals.f90 and module_swifter.f90 use , intrinsic :: iso_fortran_env ! Use the intrinsic kind definitions implicit none public integer , parameter :: I8B = int64 !! Symbolic name for kind types of 8-byte integers integer , parameter :: I4B = int32 !! Symbolic name for kind types of 4-byte integers integer , parameter :: I2B = int16 !! Symbolic name for kind types of 2-byte integers integer , parameter :: I1B = int8 !! Symbolic name for kind types of 1-byte integers integer , parameter :: SP = real32 !! Symbolic name for kind types of single-precision reals integer , parameter :: DP = real64 !! Symbolic name for kind types of double-precision reals integer , parameter :: QP = real128 !! Symbolic name for kind types of quad-precision reals real ( DP ), parameter :: PIBY2 = 1.570796326794896619231321691639751442099_DP !! Definition of /(\\pi / 2 real ( DP ), parameter :: PI = 3.141592653589793238462643383279502884197_DP !! Definition of /(\\pi real ( DP ), parameter :: PI3BY2 = 4.712388980384689857693965074919254326296_DP !! Definition of /(3 \\pi / 2 real ( DP ), parameter :: TWOPI = 6.283185307179586476925286766559005768394_DP !! Definition of 2 \\pi real ( DP ), parameter :: THIRD = 0.333333333333333333333333333333333333333_DP !! Definition of 1 / 3 real ( DP ), parameter :: DEG2RAD = PI / 18 0.0_DP !! Definition of conversion factor from degrees to radians real ( DP ), parameter :: RAD2DEG = 18 0.0_DP / PI !! Definition of conversion factor from degrees to radians real ( DP ), parameter :: GC = 6.6743E-11_DP !! Universal gravitational constant in SI units real ( DP ), parameter :: einsteinC = 29979245 8.0_DP !! Speed of light in SI units integer ( I4B ), parameter :: LOWERCASE_BEGIN = iachar ( 'a' ) !! ASCII character set parameter for lower to upper conversion - start of lowercase integer ( I4B ), parameter :: LOWERCASE_END = iachar ( 'z' ) !! ASCII character set parameter for lower to upper conversion - end of lowercase integer ( I4B ), parameter :: UPPERCASE_OFFSET = iachar ( 'A' ) - iachar ( 'a' ) !! ASCII character set parameter for lower to upper conversion - offset between upper and lower real ( SP ), parameter :: VERSION_NUMBER = 0.1_SP !! swiftest version !> Symbolic name for integrator types integer ( I4B ), parameter :: UNKNOWN_INTEGRATOR = 1 integer ( I4B ), parameter :: BS = 2 integer ( I4B ), parameter :: HELIO = 3 integer ( I4B ), parameter :: RA15 = 4 integer ( I4B ), parameter :: TU4 = 5 integer ( I4B ), parameter :: WHM = 6 integer ( I4B ), parameter :: RMVS = 7 integer ( I4B ), parameter :: SYMBA = 8 integer ( I4B ), parameter :: RINGMOONS = 9 integer ( I4B ), parameter :: STRMAX = 512 !! Maximum size of character strings integer ( I4B ), parameter :: NAMELEN = 32 !! Maximum size of name strings character ( * ), parameter :: ASCII_TYPE = 'ASCII' !! Symbolic name for ASCII file type character ( * ), parameter :: REAL4_TYPE = 'REAL4' !! Symbolic name for binary file type REAL4 character ( * ), parameter :: REAL8_TYPE = 'REAL8' !! Symbolic name for binary file type REAL8 character ( * ), parameter :: NETCDF_FLOAT_TYPE = 'NETCDF_FLOAT' !! Symbolic name for binary file type REAL8 character ( * ), parameter :: NETCDF_DOUBLE_TYPE = 'NETCDF_DOUBLE' !! Symbolic name for binary file type REAL8 character ( * ), parameter :: EL = 'EL' !! Symbolic name for binary output file contents for orbital elements character ( * ), parameter :: XV = 'XV' !! Symbolic name for binary output file contents for cartesian position and velocity vectors character ( * ), parameter :: XVEL = 'XVEL' !! Symbolic name for binary output file contents for both cartesian position and velocity and orbital elements character ( * ), parameter :: CB_TYPE_NAME = \"Central Body\" character ( * ), parameter :: PL_TYPE_NAME = \"Massive Body\" character ( * ), parameter :: TP_TYPE_NAME = \"Test Particle\" character ( * ), parameter :: PL_TINY_TYPE_NAME = \"Semi-Interacting Massive Body\" ! OpenMP Parameters integer ( I4B ) :: nthreads = 1 !! Number of OpenMP threads integer ( I4B ), parameter :: NTHERSHOLD = 1000 !! Threshold value for OpenMP loop parallelization integer ( I4B ), parameter :: SUCCESS = 0 !! Symbolic name for function return/flag code for success integer ( I4B ), parameter :: FAILURE = - 1 !! Symbolic name for function return/flag code for failure integer ( I4B ), parameter :: USAGE = - 2 !! Symbolic name for function return/flag code for printing the usage message integer ( I4B ), parameter :: HELP = - 3 !! Symbolic name for function return/flag code for printing the usage message character ( * ), parameter :: SUCCESS_MSG = '(/, \"Normal termination of Swiftest (version \", f3.1, \")\")' character ( * ), parameter :: FAIL_MSG = '(/, \"Terminating Swiftest (version \", f3.1, \") due to error!!\")' character ( * ), parameter :: USAGE_MSG = '(\"Usage: swiftest [bs|helio|ra15|rmvs|symba|tu4|whm] <paramfile>\")' character ( * ), parameter :: HELP_MSG = USAGE_MSG integer ( I4B ), parameter :: ELLIPSE = - 1 !! Symbolic names for orbit types - ellipse integer ( I4B ), parameter :: PARABOLA = 0 !! Symbolic names for orbit types - parabola integer ( I4B ), parameter :: HYPERBOLA = 1 !! Symbolic names for orbit types - hyperbola !> Symbolic names for body/particle status codes: integer ( I4B ), parameter :: ACTIVE = 0 integer ( I4B ), parameter :: INACTIVE = 1 integer ( I4B ), parameter :: DISCARDED_RMAX = - 1 integer ( I4B ), parameter :: DISCARDED_RMIN = - 2 integer ( I4B ), parameter :: DISCARDED_RMAXU = - 3 integer ( I4B ), parameter :: DISCARDED_PERI = - 4 integer ( I4B ), parameter :: DISCARDED_PLR = - 5 integer ( I4B ), parameter :: DISCARDED_PLQ = - 6 integer ( I4B ), parameter :: DISCARDED_DRIFTERR = - 7 integer ( I4B ), parameter :: MERGED = - 8 integer ( I4B ), parameter :: DISRUPTION = - 9 integer ( I4B ), parameter :: SUPERCATASTROPHIC = - 10 integer ( I4B ), parameter :: GRAZE_AND_MERGE = - 11 integer ( I4B ), parameter :: HIT_AND_RUN_DISRUPT = - 12 integer ( I4B ), parameter :: HIT_AND_RUN_PURE = - 13 integer ( I4B ), parameter :: COLLISION = - 14 integer ( I4B ), parameter :: NEW_PARTICLE = - 15 integer ( I4B ), parameter :: OLD_PARTICLE = - 16 !>Symbolic names for collisional outcomes from collresolve_resolve: integer ( I4B ), parameter :: COLLRESOLVE_REGIME_MERGE = 1 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_DISRUPTION = 2 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_SUPERCATASTROPHIC = 3 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_GRAZE_AND_MERGE = 4 integer ( I4B ), parameter :: COLLRESOLVE_REGIME_HIT_AND_RUN = 5 !> String labels for body/particle addition/subtraction in discard file character ( * ), parameter :: ADD = '+1' character ( * ), parameter :: SUB = '-1' !> Standard file names integer ( I4B ), parameter :: NDUMPFILES = 2 character ( * ), dimension ( 2 ), parameter :: DUMP_CB_FILE = [ 'dump_cb1.bin' , 'dump_cb2.bin' ] character ( * ), dimension ( 2 ), parameter :: DUMP_PL_FILE = [ 'dump_pl1.bin' , 'dump_pl2.bin' ] character ( * ), dimension ( 2 ), parameter :: DUMP_TP_FILE = [ 'dump_tp1.bin' , 'dump_tp2.bin' ] character ( * ), dimension ( 2 ), parameter :: DUMP_PARAM_FILE = [ 'dump_param1.in' , 'dump_param2.in' ] !> Default file names that can be changed by the user in the parameters file character ( * ), parameter :: CB_INFILE = 'cb.in' character ( * ), parameter :: PL_INFILE = 'pl.in' character ( * ), parameter :: TP_INFILE = 'tp.in' character ( * ), parameter :: BIN_OUTFILE = 'bin.dat' integer ( I4B ), parameter :: BINUNIT = 20 !! File unit number for the binary output file character ( * ), parameter :: PARTICLE_OUTFILE = 'particle.dat' integer ( I4B ), parameter :: PARTICLEUNIT = 44 !! File unit number for the binary particle info output file !> Miscellaneous constants: integer ( I4B ), parameter :: NDIM = 3 !! Number of dimensions in our reality integer ( I4B ), parameter :: NDIM2 = 2 * NDIM !! 2x the number of dimensions real ( DP ), parameter :: VSMALL = 2 * epsilon ( 1._DP ) !! Very small number used to prevent floating underflow !> NetCDF variable names and constants character ( * ), parameter :: NETCDF_OUTFILE = 'bin.nc' !! Default output file name character ( * ), parameter :: TIME_DIMNAME = \"time\" !! NetCDF name of the time dimension character ( * ), parameter :: ID_DIMNAME = \"id\" !! NetCDF name of the particle id dimension character ( * ), parameter :: STR_DIMNAME = \"str\" !! NetCDF name of the particle id dimension character ( * ), parameter :: PTYPE_VARNAME = \"particle_type\" !! NetCDF name of the particle type variable character ( * ), parameter :: NAME_VARNAME = \"name\" !! NetCDF name of the particle name variable character ( * ), parameter :: NPL_VARNAME = \"npl\" !! NetCDF name of the number of active massive bodies variable character ( * ), parameter :: NTP_VARNAME = \"ntp\" !! NetCDF name of the number of active test particles variable character ( * ), parameter :: A_VARNAME = \"a\" !! NetCDF name of the semimajor axis variable character ( * ), parameter :: E_VARNAME = \"e\" !! NetCDF name of the eccentricity variable character ( * ), parameter :: INC_VARNAME = \"inc\" !! NetCDF name of the inclination variable character ( * ), parameter :: CAPOM_VARNAME = \"capom\" !! NetCDF name of the long. asc. node variable character ( * ), parameter :: OMEGA_VARNAME = \"omega\" !! NetCDF name of the arg. periapsis variable character ( * ), parameter :: CAPM_VARNAME = \"capm\" !! NetCDF name of the mean anomaly variable character ( * ), parameter :: XHX_VARNAME = \"xhx\" !! NetCDF name of the heliocentric position x variable character ( * ), parameter :: XHY_VARNAME = \"xhy\" !! NetCDF name of the heliocentric position y variable character ( * ), parameter :: XHZ_VARNAME = \"xhz\" !! NetCDF name of the heliocentric position z variable character ( * ), parameter :: VHX_VARNAME = \"vhx\" !! NetCDF name of the heliocentric velocity x variable character ( * ), parameter :: VHY_VARNAME = \"vhy\" !! NetCDF name of the heliocentric velocity y variable character ( * ), parameter :: VHZ_VARNAME = \"vhz\" !! NetCDF name of the heliocentric velocity z variable character ( * ), parameter :: GMASS_VARNAME = \"Gmass\" !! NetCDF name of the mass variable character ( * ), parameter :: RHILL_VARNAME = \"rhill\" !! NetCDF name of the hill radius variable character ( * ), parameter :: RADIUS_VARNAME = \"radius\" !! NetCDF name of the radius variable character ( * ), parameter :: IP1_VARNAME = \"Ip1\" !! NetCDF name of the axis 1 principal moment of inertial variable character ( * ), parameter :: IP2_VARNAME = \"Ip2\" !! NetCDF name of the axis 2 principal moment of inertial variable character ( * ), parameter :: IP3_VARNAME = \"Ip3\" !! NetCDF name of the axis 3 principal moment of inertial variable character ( * ), parameter :: ROTX_VARNAME = \"rotx\" !! NetCDF name of the rotation x variable character ( * ), parameter :: ROTY_VARNAME = \"roty\" !! NetCDF name of the rotation y variable character ( * ), parameter :: ROTZ_VARNAME = \"rotz\" !! NetCDF name of the rotation z variable character ( * ), parameter :: K2_VARNAME = \"k2\" !! NetCDF name of the Love number variable character ( * ), parameter :: Q_VARNAME = \"Q\" !! NetCDF name of the energy dissipation variable character ( * ), parameter :: KE_ORB_VARNAME = \"KE_orb\" !! NetCDF name of the system orbital kinetic energy variable character ( * ), parameter :: KE_SPIN_VARNAME = \"KE_spin\" !! NetCDF name of the system spin kinetic energy variable character ( * ), parameter :: PE_VARNAME = \"PE\" !! NetCDF name of the system potential energy variable character ( * ), parameter :: L_ORBX_VARNAME = \"L_orbx\" !! NetCDF name of the orbital angular momentum x variable character ( * ), parameter :: L_ORBY_VARNAME = \"L_orby\" !! NetCDF name of the orbital angular momentum y variable character ( * ), parameter :: L_ORBZ_VARNAME = \"L_orbz\" !! NetCDF name of the orbital angular momentum z variable character ( * ), parameter :: L_SPINX_VARNAME = \"L_spinx\" !! NetCDF name of the spin angular momentum x variable character ( * ), parameter :: L_SPINY_VARNAME = \"L_spiny\" !! NetCDF name of the spin angular momentum y variable character ( * ), parameter :: L_SPINZ_VARNAME = \"L_spinz\" !! NetCDF name of the spin angular momentum z variable character ( * ), parameter :: L_ESCAPEX_VARNAME = \"L_escapex\" !! NetCDF name of the escaped angular momentum x variable character ( * ), parameter :: L_ESCAPEY_VARNAME = \"L_escapey\" !! NetCDF name of the escaped angular momentum y variable character ( * ), parameter :: L_ESCAPEZ_VARNAME = \"L_escapez\" !! NetCDF name of the escaped angular momentum z variable character ( * ), parameter :: ECOLLISIONS_VARNAME = \"Ecollisions\" !! NetCDF name of the escaped angular momentum y variable character ( * ), parameter :: EUNTRACKED_VARNAME = \"Euntracked\" !! NetCDF name of the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) character ( * ), parameter :: GMESCAPE_VARNAME = \"GMescape\" !! NetCDF name of the G*Mass of bodies that escape the system character ( * ), parameter :: STATUS_VARNAME = \"status\" !! NetCDF name of the current status of the body variable (includes discard type) character ( * ), parameter :: ORIGIN_TYPE_VARNAME = \"origin_type\" !! NetCDF name of the origin type variable (Initial Conditions, Disruption, etc.) character ( * ), parameter :: ORIGIN_TIME_VARNAME = \"origin_time\" !! NetCDF name of the time of origin variable character ( * ), parameter :: ORIGIN_XHX_VARNAME = \"origin_xhx\" !! NetCDF name of the heliocentric position of the body at the time of origin x variable character ( * ), parameter :: ORIGIN_XHY_VARNAME = \"origin_xhy\" !! NetCDF name of the heliocentric position of the body at the time of origin y variable character ( * ), parameter :: ORIGIN_XHZ_VARNAME = \"origin_xhz\" !! NetCDF name of the heliocentric position of the body at the time of origin z variable character ( * ), parameter :: ORIGIN_VHX_VARNAME = \"origin_vhx\" !! NetCDF name of the heliocentric velocity of the body at the time of origin x variable character ( * ), parameter :: ORIGIN_VHY_VARNAME = \"origin_vhy\" !! NetCDF name of the heliocentric velocity of the body at the time of origin y variable character ( * ), parameter :: ORIGIN_VHZ_VARNAME = \"origin_vhz\" !! NetCDF name of the heliocentric velocity of the body at the time of origin z variable character ( * ), parameter :: DISCARD_TIME_VARNAME = \"discard_time\" !! NetCDF name of the time of discard variable character ( * ), parameter :: DISCARD_XHX_VARNAME = \"discard_xhx\" !! NetCDF name of the heliocentric position of the body at the time of discard x variable character ( * ), parameter :: DISCARD_XHY_VARNAME = \"discard_xhy\" !! NetCDF name of the heliocentric position of the body at the time of discard y variable character ( * ), parameter :: DISCARD_XHZ_VARNAME = \"discard_xhz\" !! NetCDF name of the heliocentric position of the body at the time of discard z variable character ( * ), parameter :: DISCARD_VHX_VARNAME = \"discard_vhx\" !! NetCDF name of the heliocentric velocity of the body at the time of discard x variable character ( * ), parameter :: DISCARD_VHY_VARNAME = \"discard_vhy\" !! NetCDF name of the heliocentric velocity of the body at the time of discard y variable character ( * ), parameter :: DISCARD_VHZ_VARNAME = \"discard_vhz\" !! NetCDF name of the heliocentric velocity of the body at the time of discard z variable character ( * ), parameter :: DISCARD_BODY_ID_VARNAME = \"discard_body_id\" !! NetCDF name of the id of the other body involved in the discard end module swiftest_globals","tags":"","loc":"sourcefile/swiftest_globals.f90.html"},{"title":"walltime_classes.f90 – swiftest","text":"This file depends on sourcefile~~walltime_classes.f90~~EfferentGraph sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~walltime_classes.f90~~AfferentGraph sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules walltime_classes Source Code walltime_classes.f90 Source Code module walltime_classes !! author: David A. Minton !! !! Classes and methods used to compute elasped wall time use swiftest_globals implicit none public type :: walltimer integer ( I8B ) :: count_rate !! Rate at wich the clock ticks integer ( I8B ) :: count_max !! Maximum value of the clock ticker integer ( I8B ) :: count_start_main !! Value of the clock ticker at when the timer is first called integer ( I8B ) :: count_start_step !! Value of the clock ticker at the start of a timed step integer ( I8B ) :: count_finish_step !! Value of the clock ticker at the end of a timed step logical :: lmain_is_started = . false . !! Logical flag indicating whether or not the main timer has been reset or not contains procedure :: reset => walltime_reset !! Resets the clock ticker, settting main_start to the current ticker value procedure :: start => walltime_start !! Starts the timer, setting step_start to the current ticker value procedure :: finish => walltime_finish !! Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal end type interface module subroutine walltime_finish ( self , nsubsteps , message ) implicit none class ( walltimer ), intent ( inout ) :: self !! Walltimer object integer ( I4B ), intent ( in ) :: nsubsteps !! Number of substeps used to compute the time per step character ( len =* ), intent ( in ) :: message !! Message to prepend to the wall time terminal output end subroutine walltime_finish module subroutine walltime_reset ( self ) implicit none class ( walltimer ), intent ( inout ) :: self !! Walltimer object end subroutine walltime_reset module subroutine walltime_start ( self ) implicit none class ( walltimer ), intent ( inout ) :: self !! Walltimer object end subroutine walltime_start end interface contains module subroutine walltime_finish ( self , nsubsteps , message ) !! author: David A. Minton !! !! Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal use swiftest_globals implicit none ! Arguments class ( walltimer ), intent ( inout ) :: self !! Walltimer object integer ( I4B ), intent ( in ) :: nsubsteps !! Number of substeps used to compute the time per step character ( len =* ), intent ( in ) :: message !! Message to prepend to the wall time terminal output ! Internals character ( len =* ), parameter :: walltimefmt = '\" Wall time (s): \", es12.5, \"; Wall time/step in this interval (s):  \", es12.5' character ( len = STRMAX ) :: fmt integer ( I8B ) :: count_delta_step , count_delta_main real ( DP ) :: wall_main !! Value of total elapsed time at the end of a timed step real ( DP ) :: wall_step !! Value of elapsed time since the start of a timed step real ( DP ) :: wall_per_substep !! Value of time per substep if (. not . self % lmain_is_started ) then write ( * , * ) \"Wall timer error: The step finish time cannot be calculated because the timer is not started!\" return end if call system_clock ( self % count_finish_step ) count_delta_step = self % count_finish_step - self % count_start_step count_delta_main = self % count_finish_step - self % count_start_main wall_step = count_delta_step / ( self % count_rate * 1.0_DP ) wall_main = count_delta_main / ( self % count_rate * 1.0_DP ) wall_per_substep = wall_step / nsubsteps fmt = '(\"' // adjustl ( message ) // '\",' // walltimefmt // ')' write ( * , trim ( adjustl ( fmt ))) wall_main , wall_per_substep call self % start () return end subroutine walltime_finish module subroutine walltime_reset ( self ) !! author: David A. Minton !! !! Resets the clock ticker, settting main_start to the current ticker value use swiftest_globals implicit none ! Arguments class ( walltimer ), intent ( inout ) :: self call system_clock ( self % count_start_main , self % count_rate , self % count_max ) self % lmain_is_started = . true . call self % start () return end subroutine walltime_reset module subroutine walltime_start ( self ) !! author: David A. Minton !! !! Starts the timer, setting step_start to the current ticker value use swiftest_globals implicit none ! Arguments class ( walltimer ), intent ( inout ) :: self if (. not . self % lmain_is_started ) then write ( * , * ) \"Wall timer error: Cannot start the step time until reset is called at least once!\" return end if call system_clock ( self % count_start_step ) return end subroutine walltime_start end module walltime_classes","tags":"","loc":"sourcefile/walltime_classes.f90.html"},{"title":"swiftest_operators.f90 – swiftest","text":"This file depends on sourcefile~~swiftest_operators.f90~~EfferentGraph sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~swiftest_operators.f90~~AfferentGraph sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~operator_mag.f90 operator_mag.f90 sourcefile~operator_mag.f90->sourcefile~swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest_operators Source Code swiftest_operators.f90 Source Code module swiftest_operators !! author: David A. Minton !! !! Custom operators, including !!   A .cross. B = Cross product of A(1:3) and B(1:3) !! !! Each operator can also do element-wise computation on arrays of the form .mag. A(1:3, 1:n) use swiftest_globals implicit none public !******************************************************************************************************************************** ! Interfaces for .cross. operator !******************************************************************************************************************************** interface operator (. cross .) module pure function operator_cross_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:), intent ( in ) :: A , B real ( SP ), dimension ( 3 ) :: C end function operator_cross_sp module pure function operator_cross_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:), intent ( in ) :: A , B real ( DP ), dimension ( 3 ) :: C end function operator_cross_dp module pure function operator_cross_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:), intent ( in ) :: A , B real ( QP ), dimension ( 3 ) :: C end function operator_cross_qp module pure function operator_cross_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:), intent ( in ) :: A , B integer ( I1B ), dimension ( 3 ) :: C end function operator_cross_i1b module pure function operator_cross_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:), intent ( in ) :: A , B integer ( I2B ), dimension ( 3 ) :: C end function operator_cross_i2b module pure function operator_cross_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:), intent ( in ) :: A , B integer ( I4B ), dimension ( 3 ) :: C end function operator_cross_i4b module pure function operator_cross_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:), intent ( in ) :: A , B integer ( I8B ), dimension ( 3 ) :: C end function operator_cross_i8b module pure function operator_cross_el_sp ( A , B ) result ( C ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A , B real ( SP ), dimension (:,:), allocatable :: C end function operator_cross_el_sp module pure function operator_cross_el_dp ( A , B ) result ( C ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A , B real ( DP ), dimension (:,:), allocatable :: C end function operator_cross_el_dp module pure function operator_cross_el_qp ( A , B ) result ( C ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A , B real ( QP ), dimension (:,:), allocatable :: C end function operator_cross_el_qp module pure function operator_cross_el_i1b ( A , B ) result ( C ) implicit none integer ( I1B ), dimension (:,:), intent ( in ) :: A , B integer ( I1B ), dimension (:,:), allocatable :: C end function operator_cross_el_i1b module pure function operator_cross_el_i2b ( A , B ) result ( C ) implicit none integer ( I2B ), dimension (:,:), intent ( in ) :: A , B integer ( I2B ), dimension (:,:), allocatable :: C end function operator_cross_el_i2b module pure function operator_cross_el_i4b ( A , B ) result ( C ) implicit none integer ( I4B ), dimension (:,:), intent ( in ) :: A , B integer ( I4B ), dimension (:,:), allocatable :: C end function operator_cross_el_i4b module pure function operator_cross_el_i8b ( A , B ) result ( C ) implicit none integer ( I8B ), dimension (:,:), intent ( in ) :: A , B integer ( I8B ), dimension (:,:), allocatable :: C end function operator_cross_el_i8b end interface !******************************************************************************************************************************** ! Interfaces for .mag. operator !******************************************************************************************************************************** interface operator (. mag .) module pure function operator_mag_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:), intent ( in ) :: A real ( SP ) :: B end function operator_mag_sp module pure function operator_mag_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:), intent ( in ) :: A real ( DP ) :: B end function operator_mag_dp module pure function operator_mag_qp ( A ) result ( B ) implicit none real ( QP ), dimension (:), intent ( in ) :: A real ( QP ) :: B end function operator_mag_qp module pure function operator_mag_el_sp ( A ) result ( B ) implicit none real ( SP ), dimension (:,:), intent ( in ) :: A real ( SP ), dimension (:), allocatable :: B end function operator_mag_el_sp module pure function operator_mag_el_dp ( A ) result ( B ) implicit none real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), allocatable :: B end function operator_mag_el_dp module pure function operator_mag_el_qp ( A ) result ( B ) implicit none real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), allocatable :: B end function operator_mag_el_qp end interface end module swiftest_operators","tags":"","loc":"sourcefile/swiftest_operators.f90.html"},{"title":"helio_classes.f90 – swiftest","text":"This file depends on sourcefile~~helio_classes.f90~~EfferentGraph sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~helio_classes.f90~~AfferentGraph sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules helio_classes Source Code helio_classes.f90 Source Code module helio_classes !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of classes and methods specific to the Democratic Heliocentric Method !! Adapted from David E. Kaufmann's Swifter routine: module_helio.f90 use swiftest_globals use swiftest_classes , only : swiftest_cb , swiftest_pl , swiftest_tp , swiftest_nbody_system use whm_classes , only : whm_nbody_system implicit none public !******************************************************************************************************************************** !  helio_nbody_system class definitions and method interfaces !******************************************************************************************************************************** type , extends ( whm_nbody_system ) :: helio_nbody_system contains procedure :: step => helio_step_system !! Advance the Helio nbody system forward in time by one step procedure :: initialize => helio_setup_initialize_system !! Performs Helio-specific initilization steps, including converting to DH coordinates end type helio_nbody_system !******************************************************************************************************************************** ! helio_cb class definitions and method interfaces !******************************************************************************************************************************* !> Helio central body particle class type , extends ( swiftest_cb ) :: helio_cb real ( DP ), dimension ( NDIM ) :: ptbeg !! negative barycentric velocity of the central body at the beginning of time step real ( DP ), dimension ( NDIM ) :: ptend !! negative barycentric velocity of the central body at the end of time step contains end type helio_cb !******************************************************************************************************************************** !                                    helio_pl class definitions and method interfaces !******************************************************************************************************************************* !! Helio massive body particle class type , extends ( swiftest_pl ) :: helio_pl contains procedure :: drift => helio_drift_pl !! Method for Danby drift in Democratic Heliocentric coordinates procedure :: lindrift => helio_drift_linear_pl !! Method for linear drift of massive bodies due to barycentric momentum of Sun procedure :: accel_gr => helio_gr_kick_getacch_pl !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => helio_gr_p4_pl !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => helio_kick_getacch_pl !! Compute heliocentric accelerations of massive bodies procedure :: kick => helio_kick_vb_pl !! Kicks the barycentric velocities procedure :: step => helio_step_pl !! Steps the body forward one stepsize end type helio_pl !******************************************************************************************************************************** !                                    helio_tp class definitions and method interfaces !******************************************************************************************************************************* !! Helio test particle class type , extends ( swiftest_tp ) :: helio_tp contains procedure :: lindrift => helio_drift_linear_tp !! Method for linear drift of massive bodies due to barycentric momentum of Sun procedure :: drift => helio_drift_tp !! Method for Danby drift in Democratic Heliocentric coordinates procedure :: accel_gr => helio_gr_kick_getacch_tp !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => helio_gr_p4_tp !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => helio_kick_getacch_tp !! Compute heliocentric accelerations of massive bodies procedure :: kick => helio_kick_vb_tp !! Kicks the barycentric velocities procedure :: step => helio_step_tp !! Steps the body forward one stepsize end type helio_tp interface module subroutine helio_drift_body ( self , system , param , dt ) use swiftest_classes , only : swiftest_body , swiftest_nbody_system , swiftest_parameters implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_drift_body module subroutine helio_drift_pl ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_drift_pl module subroutine helio_drift_tp ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_drift_tp module subroutine helio_drift_linear_pl ( self , cb , dt , lbeg ) implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( helio_cb ), intent ( inout ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step end subroutine helio_drift_linear_pl module subroutine helio_drift_linear_tp ( self , cb , dt , lbeg ) implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( helio_cb ), intent ( in ) :: cb !! Helio central body real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Argument that determines whether or not this is the beginning or end of the step end subroutine helio_drift_linear_tp module pure subroutine helio_gr_kick_getacch_pl ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine helio_gr_kick_getacch_pl module pure subroutine helio_gr_kick_getacch_tp ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine helio_gr_kick_getacch_tp module pure subroutine helio_gr_p4_pl ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine helio_gr_p4_pl module pure subroutine helio_gr_p4_tp ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine helio_gr_p4_tp module subroutine helio_kick_getacch_pl ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_parameters , swiftest_nbody_system implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine helio_kick_getacch_pl module subroutine helio_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine helio_kick_getacch_tp module subroutine helio_kick_vb_pl ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine helio_kick_vb_pl module subroutine helio_kick_vb_tp ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine helio_kick_vb_tp module subroutine helio_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine helio_setup_initialize_system module subroutine helio_step_pl ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( helio_pl ), intent ( inout ) :: self !! Helio massive body particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine helio_step_pl module subroutine helio_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( helio_nbody_system ), intent ( inout ) :: self !! Helio nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine helio_step_system module subroutine helio_step_tp ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_cb , swiftest_parameters , swiftest_nbody_system implicit none class ( helio_tp ), intent ( inout ) :: self !! Helio test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsizee end subroutine helio_step_tp end interface end module helio_classes","tags":"","loc":"sourcefile/helio_classes.f90.html"},{"title":"whm_classes.f90 – swiftest","text":"This file depends on sourcefile~~whm_classes.f90~~EfferentGraph sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~whm_classes.f90~~AfferentGraph sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules whm_classes Source Code whm_classes.f90 Source Code module whm_classes !! author: David A. Minton !! !! Definition of classes and methods specific to the Democratic Heliocentric Method !! Partially adapted from David E. Kaufmann's Swifter module: module_whm.f90 use swiftest_globals use swiftest_classes , only : swiftest_cb , swiftest_pl , swiftest_tp , swiftest_nbody_system implicit none public !******************************************************************************************************************************** ! whm_cb class definitions and method interfaces !******************************************************************************************************************************* !> Swiftest central body particle class type , extends ( swiftest_cb ) :: whm_cb contains end type whm_cb !******************************************************************************************************************************** !                                    whm_pl class definitions and method interfaces !******************************************************************************************************************************* !> WHM massive body particle class type , extends ( swiftest_pl ) :: whm_pl real ( DP ), dimension (:), allocatable :: eta !! Jacobi mass real ( DP ), dimension (:,:), allocatable :: xj !! Jacobi position real ( DP ), dimension (:,:), allocatable :: vj !! Jacobi velocity real ( DP ), dimension (:), allocatable :: muj !! Jacobi mu: GMcb * eta(i) / eta(i - 1) real ( DP ), dimension (:), allocatable :: ir3j !! Third term of heliocentric acceleration !! Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the !!    component list, such as whm_setup_pl and whm_util_spill_pl contains procedure :: h2j => whm_coord_h2j_pl !! Convert position and velcoity vectors from heliocentric to Jacobi coordinates procedure :: j2h => whm_coord_j2h_pl !! Convert position and velcoity vectors from Jacobi to helliocentric coordinates procedure :: vh2vj => whm_coord_vh2vj_pl !! Convert velocity vectors from heliocentric to Jacobi coordinates procedure :: drift => whm_drift_pl !! Loop through massive bodies and call Danby drift routine to jacobi coordinates procedure :: accel_gr => whm_gr_kick_getacch_pl !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => whm_gr_p4_pl !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => whm_kick_getacch_pl !! Compute heliocentric accelerations of massive bodies procedure :: kick => whm_kick_vh_pl !! Kick heliocentric velocities of massive bodies procedure :: append => whm_util_append_pl !! Appends elements from one structure to another procedure :: fill => whm_util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => whm_util_resize_pl !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_ir3 => whm_util_set_ir3j !! Sets both the heliocentric and jacobi inverse radius terms (1/rj**3 and 1/rh**3) procedure :: set_mu => whm_util_set_mu_eta_pl !! Sets the Jacobi mass value for all massive bodies. procedure :: sort => whm_util_sort_pl !! Sort a WHM massive body object in-place. procedure :: rearrange => whm_util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => whm_util_spill_pl !!\"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure :: setup => whm_setup_pl !! Constructor method - Allocates space for the input number of bodiess procedure :: step => whm_step_pl !! Steps the body forward one stepsize end type whm_pl !******************************************************************************************************************************** !  whm_tp class definitions and method interfaces !******************************************************************************************************************************* !! WHM test particle class type , extends ( swiftest_tp ) :: whm_tp !! Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the !!    component list, such as whm_util_spill_tp contains procedure :: accel_gr => whm_gr_kick_getacch_tp !! Acceleration term arising from the post-Newtonian correction procedure :: gr_pos_kick => whm_gr_p4_tp !! Position kick due to p**4 term in the post-Newtonian correction procedure :: accel => whm_kick_getacch_tp !! Compute heliocentric accelerations of test particles procedure :: kick => whm_kick_vh_tp !! Kick heliocentric velocities of test particles procedure :: step => whm_step_tp !! Steps the particle forward one stepsize end type whm_tp !******************************************************************************************************************************** !  whm_nbody_system class definitions and method interfaces !******************************************************************************************************************************** !> An abstract class for the WHM integrator nbody system type , extends ( swiftest_nbody_system ) :: whm_nbody_system contains !> Replace the abstract procedures with concrete ones procedure :: initialize => whm_setup_initialize_system ! Performs WHM-specific initilization steps, like calculating the Jacobi masses procedure :: step => whm_step_system !! Advance the WHM nbody system forward in time by one step end type whm_nbody_system interface module subroutine whm_coord_h2j_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree end subroutine whm_coord_h2j_pl module subroutine whm_coord_j2h_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree end subroutine whm_coord_j2h_pl module subroutine whm_coord_vh2vj_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body particle data structuree end subroutine whm_coord_vh2vj_pl module subroutine whm_drift_pl ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine whm_drift_pl module subroutine whm_util_index_eucl_plpl ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_util_index_eucl_plpl !> Get heliocentric accelration of massive bodies module subroutine whm_kick_getacch_pl ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine whm_kick_getacch_pl !> Get heliocentric accelration of the test particle module subroutine whm_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! WHM nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine whm_kick_getacch_tp module subroutine whm_kick_vh_pl ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine whm_kick_vh_pl module subroutine whm_kick_vh_tp ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine whm_kick_vh_tp module pure subroutine whm_gr_kick_getacch_pl ( self , param ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_gr_kick_getacch_pl module pure subroutine whm_gr_kick_getacch_tp ( self , param ) use swiftest_classes , only : swiftest_cb , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_gr_kick_getacch_tp module pure subroutine whm_gr_p4_pl ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine whm_gr_p4_pl module pure subroutine whm_gr_p4_tp ( self , param , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Step size end subroutine whm_gr_p4_tp !> Reads WHM massive body object in from file module subroutine whm_setup_pl ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body objectobject integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine whm_setup_pl module subroutine whm_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_nbody_system ), intent ( inout ) :: self !! WHM nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine whm_setup_initialize_system module subroutine whm_step_pl ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine whm_step_pl module subroutine whm_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( whm_nbody_system ), intent ( inout ) :: self !! WHM system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine whm_step_system module subroutine whm_step_tp ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( whm_tp ), intent ( inout ) :: self !! WHM test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine whm_step_tp module subroutine whm_util_append_pl ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine whm_util_append_pl module subroutine whm_util_spill_pl ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine whm_util_spill_pl module subroutine whm_util_fill_pl ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_body ), intent ( in ) :: inserts !! inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine whm_util_fill_pl module subroutine whm_util_resize_pl ( self , nnew ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine whm_util_resize_pl module subroutine whm_util_set_ir3j ( self ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object end subroutine whm_util_set_ir3j module subroutine whm_util_set_mu_eta_pl ( self , cb ) use swiftest_classes , only : swiftest_cb implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine whm_util_set_mu_eta_pl module subroutine whm_util_sort_pl ( self , sortby , ascending ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine whm_util_sort_pl module subroutine whm_util_sort_rearrange_pl ( self , ind ) implicit none class ( whm_pl ), intent ( inout ) :: self !! WHM massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine whm_util_sort_rearrange_pl end interface end module whm_classes","tags":"","loc":"sourcefile/whm_classes.f90.html"},{"title":"fraggle_classes.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_classes.f90~~EfferentGraph sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~fraggle_classes.f90~~AfferentGraph sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules fraggle_classes Source Code fraggle_classes.f90 Source Code module fraggle_classes !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of classes and methods specific to Fraggel: The Fragment Generation Model use swiftest_globals use swiftest_classes , only : swiftest_parameters , swiftest_nbody_system , swiftest_cb , swiftest_pl implicit none public integer ( I4B ), parameter :: FRAGGLE_NMASS_DIST = 3 !! Number of mass bins returned by the regime calculation (largest fragment, second largest, and remainder) character ( len =* ), parameter :: FRAGGLE_LOG_OUT = \"fraggle.log\" !! Name of log file for Fraggle diagnostic information integer ( I4B ), parameter :: FRAGGLE_LOG_UNIT = 76 !! Unit number for Fraggle log file !******************************************************************************************************************************** !                                    fraggle_colliders class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the variables that describe the bodies involved in the collision type :: fraggle_colliders integer ( I4B ) :: ncoll !! Number of bodies involved in the collision integer ( I4B ), dimension (:), allocatable :: idx !! Index of bodies involved in the collision real ( DP ), dimension ( NDIM , 2 ) :: xb !! Two-body equivalent position vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: vb !! Two-body equivalent velocity vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: rot !! Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: L_spin !! Two-body equivalent spin angular momentum vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: L_orbit !! Two-body equivalent orbital angular momentum vectors of the collider bodies prior to collision real ( DP ), dimension ( NDIM , 2 ) :: Ip !! Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real ( DP ), dimension ( 2 ) :: mass !! Two-body equivalent mass of the collider bodies prior to the collision real ( DP ), dimension ( 2 ) :: radius !! Two-body equivalent radii of the collider bodies prior to the collision contains procedure :: regime => fraggle_regime_colliders !! Determine which fragmentation regime the set of colliders will be end type fraggle_colliders !******************************************************************************************************************************** !                                    fraggle_fragments class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the variables that describe a collection of fragments by Fraggle barycentric coordinates type , extends ( swiftest_pl ) :: fraggle_fragments real ( DP ) :: mtot !! Total mass of fragments real ( DP ) :: Qloss !! Energy lost during the collision real ( DP ), dimension ( FRAGGLE_NMASS_DIST ) :: mass_dist !! Distribution of fragment mass determined by the regime calculation (largest fragment, second largest, and remainder) integer ( I4B ) :: regime !! Collresolve regime code for this collision ! Values in a coordinate frame centered on the collider barycenter and collisional system unit vectors (these are used internally by the fragment generation subroutine) real ( DP ), dimension ( NDIM ) :: xbcom !! Center of mass position vector of the collider system in system barycentric coordinates real ( DP ), dimension ( NDIM ) :: vbcom !! Velocity vector of the center of mass of the collider system in system barycentric coordinates real ( DP ), dimension ( NDIM ) :: x_coll_unit !! x-direction unit vector of collisional system real ( DP ), dimension ( NDIM ) :: y_coll_unit !! y-direction unit vector of collisional system real ( DP ), dimension ( NDIM ) :: z_coll_unit !! z-direction unit vector of collisional system real ( DP ), dimension (:,:), allocatable :: x_coll !! Array of fragment position vectors in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_coll !! Array of fragment velocity vectors in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_r_unit !! Array of radial direction unit vectors of individual fragments in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_t_unit !! Array of tangential direction unit vectors of individual fragments in the collisional coordinate frame real ( DP ), dimension (:,:), allocatable :: v_n_unit !! Array of normal direction unit vectors of individual fragments in the collisional coordinate frame real ( DP ), dimension (:), allocatable :: rmag !! Array of radial distance magnitudes of individual fragments in the collisional coordinate frame real ( DP ), dimension (:), allocatable :: rotmag !! Array of rotation magnitudes of individual fragments real ( DP ), dimension (:), allocatable :: v_r_mag !! Array of radial direction velocity magnitudes of individual fragments real ( DP ), dimension (:), allocatable :: v_t_mag !! Array of tangential direction velocity magnitudes of individual fragments ! Energy and momentum book-keeping variables that characterize the whole system of fragments real ( DP ) :: ke_orbit !! Current orbital kinetic energy of the system of fragments in the collisional frame real ( DP ) :: ke_spin !! Current spin kinetic energy of the system of fragments in the collisional frame real ( DP ), dimension ( NDIM ) :: L_orbit !! Current orbital angular momentum of the system of fragments in the collisional frame real ( DP ), dimension ( NDIM ) :: L_spin !! Current spin angular momentum of the system of fragments in the collisional frame real ( DP ) :: ke_budget !! Total kinetic energy budget for the system of fragmens in the collisional frame real ( DP ), dimension ( NDIM ) :: L_budget !! Total angular momentum budget for the system of fragmens in the collisional frame ! For the following variables, \"before\" refers to the *entire* n-body system in its pre-collisional state and \"after\" refers to the system in its post-collisional state real ( DP ), dimension ( NDIM ) :: Lorbit_before , Lorbit_after !! Before/after orbital angular momentum real ( DP ), dimension ( NDIM ) :: Lspin_before , Lspin_after !! Before/after spin angular momentum real ( DP ), dimension ( NDIM ) :: Ltot_before , Ltot_after !! Before/after total system angular momentum real ( DP ) :: ke_orbit_before , ke_orbit_after !! Before/after orbital kinetic energy real ( DP ) :: ke_spin_before , ke_spin_after !! Before/after spin kinetic energy real ( DP ) :: pe_before , pe_after !! Before/after potential energy real ( DP ) :: Etot_before , Etot_after !! Before/after total system energy ! Scale factors used to scale dimensioned quantities to a more \"natural\" system where important quantities (like kinetic energy, momentum) are of order ~1 real ( DP ) :: dscale !! Distance dimension scale factor real ( DP ) :: mscale !! Mass scale factor real ( DP ) :: tscale !! Time scale factor real ( DP ) :: vscale !! Velocity scale factor (a convenience unit that is derived from dscale and tscale) real ( DP ) :: Escale !! Energy scale factor (a convenience unit that is derived from dscale, tscale, and mscale) real ( DP ) :: Lscale !! Angular momentum scale factor (a convenience unit that is derived from dscale, tscale, and mscale) contains procedure :: generate_fragments => fraggle_generate_fragments !! Generates a system of fragments in barycentric coordinates that conserves energy and momentum. procedure :: accel => fraggle_placeholder_accel !! Placeholder subroutine to fulfill requirement for an accel method procedure :: kick => fraggle_placeholder_kick !! Placeholder subroutine to fulfill requirement for a kick method procedure :: step => fraggle_placeholder_step !! Placeholder subroutine to fulfill requirement for a step method procedure :: set_budgets => fraggle_set_budgets_fragments !! Sets the energy and momentum budgets of the fragments based on the collider value procedure :: set_coordinate_system => fraggle_set_coordinate_system !! Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. procedure :: set_mass_dist => fraggle_set_mass_dist_fragments !! Sets the distribution of mass among the fragments depending on the regime type procedure :: set_natural_scale => fraggle_set_natural_scale_factors !! Scales dimenional quantities to ~O(1) with respect to the collisional system. procedure :: set_original_scale => fraggle_set_original_scale_factors !! Restores dimenional quantities back to the original system units procedure :: setup => fraggle_setup_fragments !! Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. procedure :: reset => fraggle_setup_reset_fragments !! Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) procedure :: get_ang_mtm => fraggle_util_ang_mtm !! Calcualtes the current angular momentum of the fragments procedure :: get_energy_and_momentum => fraggle_util_get_energy_momentum !! Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) procedure :: restructure => fraggle_util_restructure !! Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints end type fraggle_fragments interface module subroutine fraggle_generate_fragments ( self , colliders , system , param , lfailure ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object containing the two-body equivalent values of the colliding bodies class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters logical , intent ( out ) :: lfailure !! Answers the question: Should this have been a merger instead? end subroutine fraggle_generate_fragments module subroutine fraggle_io_log_generate ( frag ) implicit none class ( fraggle_fragments ), intent ( in ) :: frag end subroutine fraggle_io_log_generate module subroutine fraggle_io_log_one_message ( message ) implicit none character ( len =* ), intent ( in ) :: message character ( STRMAX ) :: errmsg end subroutine fraggle_io_log_one_message module subroutine fraggle_io_log_pl ( pl , param ) implicit none class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object (only the new bodies generated in a collision) class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters end subroutine fraggle_io_log_pl module subroutine fraggle_io_log_regime ( colliders , frag ) implicit none class ( fraggle_colliders ), intent ( in ) :: colliders class ( fraggle_fragments ), intent ( in ) :: frag end subroutine fraggle_io_log_regime module subroutine fraggle_io_log_start ( param ) implicit none class ( swiftest_parameters ), intent ( in ) :: param end subroutine fraggle_io_log_start !> The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class module subroutine fraggle_placeholder_accel ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step end subroutine fraggle_placeholder_accel module subroutine fraggle_placeholder_kick ( self , system , param , t , dt , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system objec class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine fraggle_placeholder_kick module subroutine fraggle_placeholder_step ( self , system , param , t , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Helio massive body particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nboody system class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Stepsiz end subroutine fraggle_placeholder_step module subroutine fraggle_regime_colliders ( self , frag , system , param ) implicit none class ( fraggle_colliders ), intent ( inout ) :: self !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters end subroutine fraggle_regime_colliders module subroutine fraggle_set_budgets_fragments ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_budgets_fragments module subroutine fraggle_set_coordinate_system ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_coordinate_system module subroutine fraggle_set_mass_dist_fragments ( self , colliders , param ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters end subroutine fraggle_set_mass_dist_fragments module subroutine fraggle_set_natural_scale_factors ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_natural_scale_factors module subroutine fraggle_set_original_scale_factors ( self , colliders ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object end subroutine fraggle_set_original_scale_factors module subroutine fraggle_setup_fragments ( self , n , param ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object integer ( I4B ), intent ( in ) :: n !! Number of fragments class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters end subroutine fraggle_setup_fragments module subroutine fraggle_setup_reset_fragments ( self ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self end subroutine fraggle_setup_reset_fragments module subroutine fraggle_util_add_fragments_to_system ( frag , colliders , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters end subroutine fraggle_util_add_fragments_to_system module subroutine fraggle_util_ang_mtm ( self ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object end subroutine fraggle_util_ang_mtm module subroutine fraggle_util_construct_temporary_system ( frag , system , param , tmpsys , tmpparam ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Original swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters class ( swiftest_nbody_system ), allocatable , intent ( out ) :: tmpsys !! Output temporary swiftest nbody system object class ( swiftest_parameters ), allocatable , intent ( out ) :: tmpparam !! Output temporary configuration run parameters end subroutine fraggle_util_construct_temporary_system module subroutine fraggle_util_get_energy_momentum ( self , colliders , system , param , lbefore ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters logical , intent ( in ) :: lbefore !! Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa end subroutine fraggle_util_get_energy_momentum module subroutine fraggle_util_restructure ( self , colliders , try , f_spin , r_max_start ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object integer ( I4B ), intent ( in ) :: try !! The current number of times Fraggle has tried to find a solution real ( DP ), intent ( inout ) :: f_spin !! Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real ( DP ), intent ( inout ) :: r_max_start !! The maximum radial distance that the position calculation starts with. This increases after a failed attempt end subroutine fraggle_util_restructure module subroutine fraggle_util_shift_vector_to_origin ( m_frag , vec_frag ) implicit none real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:,:), intent ( inout ) :: vec_frag !! Fragment positions or velocities in the center of mass frame end subroutine module function fraggle_util_vmag_to_vb ( v_r_mag , v_r_unit , v_t_mag , v_t_unit , m_frag , vcom ) result ( vb ) implicit none real ( DP ), dimension (:), intent ( in ) :: v_r_mag !! Unknown radial component of fragment velocity vector real ( DP ), dimension (:), intent ( in ) :: v_t_mag !! Tangential component of velocity vector set previously by angular momentum constraint real ( DP ), dimension (:,:), intent ( in ) :: v_r_unit , v_t_unit !! Radial and tangential unit vectors for each fragment real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:), intent ( in ) :: vcom !! Barycentric velocity of collisional system center of mass real ( DP ), dimension (:,:), allocatable :: vb end function fraggle_util_vmag_to_vb end interface end module fraggle_classes","tags":"","loc":"sourcefile/fraggle_classes.f90.html"},{"title":"symba_classes.f90 – swiftest","text":"This file depends on sourcefile~~symba_classes.f90~~EfferentGraph sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~symba_classes.f90~~AfferentGraph sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules symba_classes Source Code symba_classes.f90 Source Code module symba_classes !! author: The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of classes and methods specific to the SyMBA integrator !! Adapted from David E. Kaufmann's Swifter routine: module_symba.f90 use swiftest_globals use swiftest_classes , only : swiftest_parameters , swiftest_base , swiftest_encounter , swiftest_particle_info , netcdf_parameters use helio_classes , only : helio_cb , helio_pl , helio_tp , helio_nbody_system use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none public integer ( I4B ), private , parameter :: NENMAX = 32767 integer ( I4B ), private , parameter :: NTENC = 3 real ( DP ), private , parameter :: RHSCALE = 6.5_DP real ( DP ), private , parameter :: RSHELL = 0.48075_DP type , extends ( swiftest_parameters ) :: symba_parameters real ( DP ) :: GMTINY = - 1.0_DP !! Smallest G*mass that is fully gravitating real ( DP ) :: min_GMfrag = - 1.0_DP !! Smallest G*mass that can be produced in a fragmentation event integer ( I4B ), dimension (:), allocatable :: seed !! Random seeds logical :: lfragmentation = . false . !! Do fragmentation modeling instead of simple merger. contains procedure :: reader => symba_io_param_reader procedure :: writer => symba_io_param_writer end type symba_parameters !******************************************************************************************************************************** !                                    symba_kinship class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step. type symba_kinship integer ( I4B ) :: parent !! Index of parent particle integer ( I4B ) :: nchild !! number of children in merger list integer ( I4B ), dimension (:), allocatable :: child !! Index of children particles end type symba_kinship !******************************************************************************************************************************** ! symba_cb class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA central body particle class type , extends ( helio_cb ) :: symba_cb real ( DP ) :: GM0 = 0.0_DP !! Initial G*mass of the central body real ( DP ) :: dGM = 0.0_DP !! Change in G*mass of the central body real ( DP ) :: R0 = 0.0_DP !! Initial radius of the central body real ( DP ) :: dR = 0.0_DP !! Change in the radius of the central body contains end type symba_cb !******************************************************************************************************************************** !                                    symba_pl class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA massive body class type , extends ( helio_pl ) :: symba_pl logical , dimension (:), allocatable :: lcollision !! flag indicating whether body has merged with another this time step logical , dimension (:), allocatable :: lencounter !! flag indicating whether body is part of an encounter this time step logical , dimension (:), allocatable :: lmtiny !! flag indicating whether this body is below the GMTINY cutoff value integer ( I4B ) :: nplm !! number of bodies above the GMTINY limit integer ( I8B ) :: nplplm !! Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer ( I4B ), dimension (:), allocatable :: nplenc !! number of encounters with other planets this time step integer ( I4B ), dimension (:), allocatable :: ntpenc !! number of encounters with test particles this time step integer ( I4B ), dimension (:), allocatable :: levelg !! level at which this body should be moved integer ( I4B ), dimension (:), allocatable :: levelm !! deepest encounter level achieved this time step integer ( I4B ), dimension (:), allocatable :: isperi !! perihelion passage flag real ( DP ), dimension (:), allocatable :: peri !! perihelion distance real ( DP ), dimension (:), allocatable :: atp !! semimajor axis following perihelion passage type ( symba_kinship ), dimension (:), allocatable :: kin !! Array of merger relationship structures that can account for multiple pairwise mergers in a single step contains procedure :: make_colliders => symba_collision_make_colliders_pl !! When a single body is involved in more than one collision in a single step, it becomes part of a family procedure :: index => symba_util_index_eucl_plpl !! Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure :: discard => symba_discard_pl !! Process massive body discards procedure :: drift => symba_drift_pl !! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure :: encounter_check => symba_encounter_check_pl !! Checks if massive bodies are going through close encounters with each other procedure :: accel_int => symba_kick_getacch_int_pl !! Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY procedure :: accel => symba_kick_getacch_pl !! Compute heliocentric accelerations of massive bodies procedure :: setup => symba_setup_pl !! Constructor method - Allocates space for the input number of bodies procedure :: append => symba_util_append_pl !! Appends elements from one structure to another procedure :: fill => symba_util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: get_peri => symba_util_peri_pl !! Determine system pericenter passages for massive bodies procedure :: rearray => symba_util_rearray_pl !! Clean up the massive body structures to remove discarded bodies and add new bodies procedure :: reset_kinship => symba_util_reset_kinship !! Resets the kinship status of bodies procedure :: resize => symba_util_resize_pl !! Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small. procedure :: sort => symba_util_sort_pl !! Sorts body arrays by a sortable componen procedure :: rearrange => symba_util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => symba_util_spill_pl !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type symba_pl type , extends ( symba_pl ) :: symba_merger integer ( I4B ), dimension (:), allocatable :: ncomp contains procedure :: append => symba_util_append_merger !! Appends elements from one structure to another procedure :: resize => symba_util_resize_merger !! Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. procedure :: setup => symba_setup_merger !! Constructor method - Allocates space for the input number of bodies end type symba_merger !******************************************************************************************************************************** !                                    symba_tp class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA test particle class type , extends ( helio_tp ) :: symba_tp integer ( I4B ), dimension (:), allocatable :: nplenc !! number of encounters with planets this time step integer ( I4B ), dimension (:), allocatable :: levelg !! level at which this particle should be moved integer ( I4B ), dimension (:), allocatable :: levelm !! deepest encounter level achieved this time step contains procedure :: drift => symba_drift_tp !! Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure :: encounter_check => symba_encounter_check_tp !! Checks if any test particles are undergoing a close encounter with a massive body procedure :: accel => symba_kick_getacch_tp !! Compute heliocentric accelerations of test particles procedure :: setup => symba_setup_tp !! Constructor method - Allocates space for the input number of bodies procedure :: append => symba_util_append_tp !! Appends elements from one structure to another procedure :: fill => symba_util_fill_tp !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => symba_util_resize_tp !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: sort => symba_util_sort_tp !! Sorts body arrays by a sortable componen procedure :: rearrange => symba_util_sort_rearrange_tp !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => symba_util_spill_tp !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type symba_tp !******************************************************************************************************************************** !                                    symba_encounter class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA class for tracking close encounters in a step type , extends ( swiftest_encounter ) :: symba_encounter integer ( I4B ), dimension (:), allocatable :: level !! encounter recursion level contains procedure :: collision_check => symba_collision_check_encounter !! Checks if a test particle is going to collide with a massive body procedure :: encounter_check => symba_encounter_check !! Checks if massive bodies are going through close encounters with each other procedure :: kick => symba_kick_encounter !! Kick barycentric velocities of active test particles within SyMBA recursion procedure :: setup => symba_setup_encounter !! A constructor that sets the number of encounters and allocates and initializes all arrays procedure :: copy => symba_util_copy_encounter !! Copies elements from the source encounter list into self. procedure :: spill => symba_util_spill_encounter !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure :: append => symba_util_append_encounter !! Appends elements from one structure to another end type symba_encounter !******************************************************************************************************************************** !                                    symba_pltpenc class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA class for tracking pl-tp close encounters in a step type , extends ( symba_encounter ) :: symba_pltpenc contains procedure :: resolve_collision => symba_collision_resolve_pltpenc !! Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c end type symba_pltpenc !******************************************************************************************************************************** !                                    symba_plplenc class definitions and method interfaces !******************************************************************************************************************************* !> SyMBA class for tracking pl-pl close encounters in a step type , extends ( symba_encounter ) :: symba_plplenc contains procedure :: extract_collisions => symba_collision_encounter_extract_collisions !! Processes the pl-pl encounter list remove only those encounters that led to a collision procedure :: resolve_fragmentations => symba_collision_resolve_fragmentations !! Process list of collisions, determine the collisional regime, and then create fragments procedure :: resolve_mergers => symba_collision_resolve_mergers !! Process list of collisions and merge colliding bodies together procedure :: resolve_collision => symba_collision_resolve_plplenc !! Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c end type symba_plplenc !******************************************************************************************************************************** !  symba_nbody_system class definitions and method interfaces !******************************************************************************************************************************** type , extends ( helio_nbody_system ) :: symba_nbody_system class ( symba_merger ), allocatable :: pl_adds !! List of added bodies in mergers or collisions class ( symba_pltpenc ), allocatable :: pltpenc_list !! List of massive body-test particle encounters in a single step class ( symba_plplenc ), allocatable :: plplenc_list !! List of massive body-massive body encounters in a single step class ( symba_plplenc ), allocatable :: plplcollision_list !! List of massive body-massive body collisions in a single step integer ( I4B ) :: irec !! System recursion level contains procedure :: write_discard => symba_io_write_discard !! Write out information about discarded and merged planets and test particles in SyMBA procedure :: initialize => symba_setup_initialize_system !! Performs SyMBA-specific initilization steps procedure :: step => symba_step_system !! Advance the SyMBA nbody system forward in time by one step procedure :: interp => symba_step_interp_system !! Perform an interpolation step on the SymBA nbody system procedure :: set_recur_levels => symba_step_set_recur_levels_system !! Sets recursion levels of bodies and encounter lists to the current system level procedure :: recursive_step => symba_step_recur_system !! Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary procedure :: reset => symba_step_reset_system !! Resets pl, tp,and encounter structures at the start of a new step end type symba_nbody_system interface module function symba_collision_check_encounter ( self , system , param , t , dt , irec ) result ( lany_collision ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! current time real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_collision !! Returns true if cany pair of encounters resulted in a collision n end function symba_collision_check_encounter module subroutine symba_collision_encounter_extract_collisions ( self , system , param ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine module subroutine symba_collision_make_colliders_pl ( self , idx ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension ( 2 ), intent ( in ) :: idx !! Array holding the indices of the two bodies involved in the collision end subroutine symba_collision_make_colliders_pl module subroutine symba_collision_resolve_fragmentations ( self , system , param ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_collision_resolve_fragmentations module subroutine symba_collision_resolve_mergers ( self , system , param ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_collision_resolve_mergers module subroutine symba_collision_resolve_plplenc ( self , system , param , t , dt , irec ) implicit none class ( symba_plplenc ), intent ( inout ) :: self !! SyMBA pl-pl encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level end subroutine symba_collision_resolve_plplenc module subroutine symba_collision_resolve_pltpenc ( self , system , param , t , dt , irec ) implicit none class ( symba_pltpenc ), intent ( inout ) :: self !! SyMBA pl-tp encounter list class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current simulation step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level end subroutine symba_collision_resolve_pltpenc module subroutine symba_discard_pl ( self , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine symba_discard_pl module subroutine symba_drift_pl ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine symba_drift_pl module subroutine symba_drift_tp ( self , system , param , dt ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_tp ), intent ( inout ) :: self !! Helio massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine symba_drift_tp module pure subroutine symba_encounter_check_one ( xr , yr , zr , vxr , vyr , vzr , rhill1 , rhill2 , dt , irec , lencounter , lvdotr ) !$omp declare simd(symba_encounter_check_one) implicit none real ( DP ), intent ( in ) :: xr , yr , zr , vxr , vyr , vzr real ( DP ), intent ( in ) :: rhill1 , rhill2 , dt integer ( I4B ), intent ( in ) :: irec logical , intent ( out ) :: lencounter , lvdotr end subroutine symba_encounter_check_one module function symba_encounter_check_pl ( self , system , dt , irec ) result ( lany_encounter ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter end function symba_encounter_check_pl module function symba_encounter_check ( self , system , dt , irec ) result ( lany_encounter ) implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-pl encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter end function symba_encounter_check module function symba_encounter_check_tp ( self , system , dt , irec ) result ( lany_encounter ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level logical :: lany_encounter !! Returns true if there is at least one close encounter end function symba_encounter_check_tp module function symba_collision_casedisruption ( system , param , colliders , frag ) result ( status ) use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ) :: status !! Status flag assigned to this outcome end function symba_collision_casedisruption module function symba_collision_casehitandrun ( system , param , colliders , frag ) result ( status ) use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ) :: status !! Status flag assigned to this outcome end function symba_collision_casehitandrun module function symba_collision_casemerge ( system , param , colliders , frag ) result ( status ) use fraggle_classes , only : fraggle_colliders , fraggle_fragments implicit none class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragmentation system object integer ( I4B ) :: status !! Status flag assigned to this outcome end function symba_collision_casemerge module subroutine symba_util_index_eucl_plpl ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_util_index_eucl_plpl module subroutine symba_io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( symba_parameters ), intent ( inout ) :: self !! Current run configuration parameters with SyMBA additionss integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine symba_io_param_reader module subroutine symba_io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( symba_parameters ), intent ( in ) :: self !! Current run configuration parameters with SyMBA additions integer , intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer , intent ( in ) :: v_list (:) !! Not used in this procedure integer , intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine symba_io_param_writer module subroutine symba_io_write_discard ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine symba_io_write_discard module subroutine symba_kick_getacch_int_pl ( self ) implicit none class ( symba_pl ), intent ( inout ) :: self end subroutine symba_kick_getacch_int_pl module subroutine symba_kick_getacch_pl ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine symba_kick_getacch_pl module subroutine symba_kick_getacch_tp ( self , system , param , t , lbeg ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step end subroutine symba_kick_getacch_tp module subroutine symba_kick_encounter ( self , system , dt , irec , sgn ) implicit none class ( symba_encounter ), intent ( in ) :: self !! SyMBA pl-tp encounter list object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object real ( DP ), intent ( in ) :: dt !! step size integer ( I4B ), intent ( in ) :: irec !! Current recursion level integer ( I4B ), intent ( in ) :: sgn !! sign to be applied to acceleration end subroutine symba_kick_encounter module subroutine symba_setup_initialize_system ( self , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine symba_setup_initialize_system module subroutine symba_setup_merger ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_merger ), intent ( inout ) :: self !! SyMBA merger list object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_setup_merger module subroutine symba_setup_pl ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_setup_pl module subroutine symba_setup_encounter ( self , n ) implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for end subroutine symba_setup_encounter module subroutine symba_setup_tp ( self , n , param ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter end subroutine symba_setup_tp module subroutine symba_step_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine symba_step_system module subroutine symba_step_interp_system ( self , param , t , dt ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine symba_step_interp_system module subroutine symba_step_set_recur_levels_system ( self , ireci ) implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system objec integer ( I4B ), intent ( in ) :: ireci !! Input recursion level end subroutine symba_step_set_recur_levels_system module recursive subroutine symba_step_recur_system ( self , param , t , ireci ) use swiftest_classes , only : swiftest_parameters implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t integer ( I4B ), intent ( in ) :: ireci !! input recursion level end subroutine symba_step_recur_system module subroutine symba_step_reset_system ( self , param ) implicit none class ( symba_nbody_system ), intent ( inout ) :: self !! SyMBA nbody system object class ( symba_parameters ), intent ( in ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_step_reset_system end interface interface util_append module subroutine symba_util_append_arr_kin ( arr , source , nold , nsrc , lsource_mask ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_arr_kin end interface interface module subroutine symba_util_append_encounter ( self , source , lsource_mask ) implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_encounter module subroutine symba_util_append_merger ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( symba_merger ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_merger module subroutine symba_util_append_pl ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_pl module subroutine symba_util_append_tp ( self , source , lsource_mask ) use swiftest_classes , only : swiftest_body implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine symba_util_append_tp module subroutine symba_util_copy_encounter ( self , source ) use swiftest_classes , only : swiftest_encounter implicit none class ( symba_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into end subroutine symba_util_copy_encounter end interface interface util_fill module subroutine symba_util_fill_arr_kin ( keeps , inserts , lfill_list ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine symba_util_fill_arr_kin end interface interface module subroutine symba_util_fill_pl ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine symba_util_fill_pl module subroutine symba_util_fill_tp ( self , inserts , lfill_list ) use swiftest_classes , only : swiftest_body implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine symba_util_fill_tp module subroutine symba_util_peri_pl ( self , system , param ) use swiftest_classes , only : swiftest_nbody_system , swiftest_parameters implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine symba_util_peri_pl module subroutine symba_util_rearray_pl ( self , system , param ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( symba_nbody_system ), intent ( inout ) :: system !! SyMBA nbody system object class ( symba_parameters ), intent ( inout ) :: param !! Current run configuration parameters with SyMBA additions end subroutine symba_util_rearray_pl module subroutine symba_util_reset_kinship ( self , idx ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: idx !! Index array of bodies to reset integer ( I4B ) :: i , j end subroutine symba_util_reset_kinship end interface interface util_resize module subroutine symba_util_resize_arr_kin ( arr , nnew ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine symba_util_resize_arr_kin end interface interface module subroutine symba_util_resize_merger ( self , nnew ) implicit none class ( symba_merger ), intent ( inout ) :: self !! SyMBA merger list object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine symba_util_resize_merger module subroutine symba_util_resize_pl ( self , nnew ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine symba_util_resize_pl module subroutine symba_util_resize_tp ( self , nnew ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine symba_util_resize_tp module subroutine symba_util_sort_pl ( self , sortby , ascending ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine symba_util_sort_pl module subroutine symba_util_sort_tp ( self , sortby , ascending ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine symba_util_sort_tp end interface interface util_sort_rearrange module subroutine symba_util_sort_rearrange_arr_kin ( arr , ind , n ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine symba_util_sort_rearrange_arr_kin end interface util_sort_rearrange interface module subroutine symba_util_sort_rearrange_pl ( self , ind ) implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine symba_util_sort_rearrange_pl module subroutine symba_util_sort_rearrange_tp ( self , ind ) implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine symba_util_sort_rearrange_tp end interface interface util_spill module subroutine symba_util_spill_arr_kin ( keeps , discards , lspill_list , ldestructive ) implicit none type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( symba_kinship ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine symba_util_spill_arr_kin end interface interface module subroutine symba_util_spill_pl ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( symba_pl ), intent ( inout ) :: self !! SyMBA massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine symba_util_spill_pl module subroutine symba_util_spill_encounter ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_encounter implicit none class ( symba_encounter ), intent ( inout ) :: self !! SyMBA pl-tp encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list end subroutine symba_util_spill_encounter module subroutine symba_util_spill_tp ( self , discards , lspill_list , ldestructive ) use swiftest_classes , only : swiftest_body implicit none class ( symba_tp ), intent ( inout ) :: self !! SyMBA test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine symba_util_spill_tp end interface end module symba_classes","tags":"","loc":"sourcefile/symba_classes.f90.html"},{"title":"swiftest.f90 – swiftest","text":"This file depends on sourcefile~~swiftest.f90~~EfferentGraph sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~swiftest.f90~~AfferentGraph sourcefile~swiftest.f90 swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest Source Code swiftest.f90 Source Code module swiftest !! author: David A. Minton !! graph: false !! !! This module serves to combine all of the Swiftest project modules under a single umbrella so that they can be accessed from individual submodule implementations with a simple \"use swiftest\" line. use swiftest_globals use swiftest_operators use swiftest_classes use whm_classes use rmvs_classes use helio_classes use symba_classes use fraggle_classes use lambda_function use walltime_classes !use advisor_annotate !$ use omp_lib implicit none public end module swiftest","tags":"","loc":"sourcefile/swiftest.f90.html"},{"title":"swiftest_classes.f90 – swiftest","text":"This file depends on sourcefile~~swiftest_classes.f90~~EfferentGraph sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~swiftest_classes.f90~~AfferentGraph sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest_classes.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest_classes.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest_classes.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest_classes.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest_classes.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest_classes.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest_classes.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest_classes.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest_classes.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest_classes.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest_classes.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest_classes.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest_classes.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest_classes.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest_classes.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest_classes.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest_classes.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest_classes.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest_classes.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest_classes.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest_classes.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest_classes.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest_classes.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest_classes.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest_classes.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest_classes.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest_classes.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest_classes.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest_classes.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~symba_classes.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~symba_classes.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~symba_classes.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~symba_classes.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90->sourcefile~whm_classes.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~helio_classes.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~symba_classes.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~helio_classes.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~symba_classes.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90->sourcefile~whm_classes.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~helio_classes.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~symba_classes.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~symba_classes.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90->sourcefile~whm_classes.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~helio_classes.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~helio_classes.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~symba_classes.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules swiftest_classes Source Code swiftest_classes.f90 Source Code module swiftest_classes !! author: The Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott !! !! Definition of data and structures generic to all integrators. !! Adapted from David E. Kaufmann's Swifter routine: module_swifter.f90 use swiftest_globals implicit none public type :: netcdf_parameters integer ( I4B ) :: out_type !! NetCDF output type (will be assigned either NF90_DOUBLE or NF90_FLOAT, depending on the user parameter) integer ( I4B ) :: ncid !! NetCDF ID for the output file integer ( I4B ) :: dimids ( 3 ) !! Dimensions of the NetCDF file integer ( I4B ) :: time_dimid !! NetCDF ID for the time dimension integer ( I4B ) :: id_dimid !! NetCDF ID for the particle id dimension integer ( I4B ) :: str_dimid !! NetCDF ID for the character string dimension integer ( I4B ) :: time_varid !! NetCDF ID for the time variable integer ( I4B ) :: id_varid !! NetCDF ID for the particle name variable integer ( I4B ) :: name_varid !! NetCDF ID for the namevariable integer ( I4B ) :: ptype_varid !! NetCDF ID for the particle type variable integer ( I4B ) :: npl_varid !! NetCDF ID for the number of active massive bodies variable integer ( I4B ) :: ntp_varid !! NetCDF ID for the number of active test particles variable integer ( I4B ) :: a_varid !! NetCDF ID for the semimajor axis variable integer ( I4B ) :: e_varid !! NetCDF ID for the eccentricity variable integer ( I4B ) :: inc_varid !! NetCDF ID for the inclination variable integer ( I4B ) :: capom_varid !! NetCDF ID for the long. asc. node variable integer ( I4B ) :: omega_varid !! NetCDF ID for the arg. periapsis variable integer ( I4B ) :: capm_varid !! NetCDF ID for the mean anomaly variable integer ( I4B ) :: xhx_varid !! NetCDF ID for the heliocentric position x variable integer ( I4B ) :: xhy_varid !! NetCDF ID for the heliocentric position y variable integer ( I4B ) :: xhz_varid !! NetCDF ID for the heliocentric position z variable integer ( I4B ) :: vhx_varid !! NetCDF ID for the heliocentric velocity x variable integer ( I4B ) :: vhy_varid !! NetCDF ID for the heliocentric velocity y variable integer ( I4B ) :: vhz_varid !! NetCDF ID for the heliocentric velocity z variable integer ( I4B ) :: Gmass_varid !! NetCDF ID for the mass variable integer ( I4B ) :: rhill_varid !! NetCDF ID for the hill radius variable integer ( I4B ) :: radius_varid !! NetCDF ID for the radius variable integer ( I4B ) :: Ip1_varid !! NetCDF ID for the axis 1 principal moment of inertia variable integer ( I4B ) :: Ip2_varid !! NetCDF ID for the axis 2 principal moment of inertia variable integer ( I4B ) :: Ip3_varid !! NetCDF ID for the axis 3 principal moment of inertia variable integer ( I4B ) :: rotx_varid !! NetCDF ID for the rotation x variable integer ( I4B ) :: roty_varid !! NetCDF ID for the rotation y variable integer ( I4B ) :: rotz_varid !! NetCDF ID for the rotation z variable integer ( I4B ) :: k2_varid !! NetCDF ID for the Love number variable integer ( I4B ) :: Q_varid !! NetCDF ID for the energy dissipation variable integer ( I4B ) :: KE_orb_varid !! NetCDF ID for the system orbital kinetic energy variable integer ( I4B ) :: KE_spin_varid !! NetCDF ID for the system spin kinetic energy variable integer ( I4B ) :: PE_varid !! NetCDF ID for the system potential energy variable integer ( I4B ) :: L_orbx_varid !! NetCDF ID for the system orbital angular momentum x variable integer ( I4B ) :: L_orby_varid !! NetCDF ID for the system orbital angular momentum y variable integer ( I4B ) :: L_orbz_varid !! NetCDF ID for the system orbital angular momentum z variable integer ( I4B ) :: L_spinx_varid !! NetCDF ID for the system spin angular momentum x variable integer ( I4B ) :: L_spiny_varid !! NetCDF ID for the system spin angular momentum y variable integer ( I4B ) :: L_spinz_varid !! NetCDF ID for the system spin angular momentum z variable integer ( I4B ) :: L_escapex_varid !! NetCDF ID for the escaped angular momentum x variable integer ( I4B ) :: L_escapey_varid !! NetCDF ID for the escaped angular momentum x variable integer ( I4B ) :: L_escapez_varid !! NetCDF ID for the escaped angular momentum x variable integer ( I4B ) :: Ecollisions_varid !! NetCDF ID for the energy lost in collisions variable integer ( I4B ) :: Euntracked_varid !! NetCDF ID for the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) integer ( I4B ) :: GMescape_varid !! NetCDF ID for the G*Mass of bodies that escape the system integer ( I4B ) :: status_varid !! NetCDF ID for the status variable integer ( I4B ) :: origin_type_varid !! NetCDF ID for the origin type integer ( I4B ) :: origin_time_varid !! NetCDF ID for the origin time integer ( I4B ) :: origin_xhx_varid !! NetCDF ID for the origin xh x component integer ( I4B ) :: origin_xhy_varid !! NetCDF ID for the origin xh y component integer ( I4B ) :: origin_xhz_varid !! NetCDF ID for the origin xh z component integer ( I4B ) :: origin_vhx_varid !! NetCDF ID for the origin xh x component integer ( I4B ) :: origin_vhy_varid !! NetCDF ID for the origin xh y component integer ( I4B ) :: origin_vhz_varid !! NetCDF ID for the origin xh z component integer ( I4B ) :: discard_time_varid !! NetCDF ID for the time of discard variable integer ( I4B ) :: discard_xhx_varid !! NetCDF ID for the heliocentric position of the body at the time of discard x variable integer ( I4B ) :: discard_xhy_varid !! NetCDF ID for the heliocentric position of the body at the time of discard y variable integer ( I4B ) :: discard_xhz_varid !! NetCDF ID for the heliocentric position of the body at the time of discard z variable integer ( I4B ) :: discard_vhx_varid !! NetCDF ID for the heliocentric velocity of the body at the time of discard x variable integer ( I4B ) :: discard_vhy_varid !! NetCDF ID for the heliocentric velocity of the body at the time of discard y variable integer ( I4B ) :: discard_vhz_varid !! NetCDF ID for the heliocentric velocity of the body at the time of discard z variable integer ( I4B ) :: discard_body_id_varid !! NetCDF ID for the id of the other body involved in the discard contains procedure :: close => netcdf_close !! Closes an open NetCDF file procedure :: initialize => netcdf_initialize_output !! Initialize a set of parameters used to identify a NetCDF output object procedure :: open => netcdf_open !! Opens a NetCDF file end type netcdf_parameters !******************************************************************************************************************************** ! swiftest_parameters class definitions !******************************************************************************************************************************** !> User defined parameters that are read in from the parameters input file. !>    Each paramter is initialized to a default values. type :: swiftest_parameters integer ( I4B ) :: integrator = UNKNOWN_INTEGRATOR !! Symbolic name of the nbody integrator  used integer ( I4B ) :: maxid = - 1 !! The current maximum particle id number real ( DP ) :: t0 = - 1.0_DP !! Integration start time real ( DP ) :: t = - 1.0_DP !! Integration current time real ( DP ) :: tstop = - 1.0_DP !! Integration stop time real ( DP ) :: dt = - 1.0_DP !! Time step integer ( I8B ) :: ioutput = 0_I8B !! Output counter character ( STRMAX ) :: incbfile = CB_INFILE !! Name of input file for the central body character ( STRMAX ) :: inplfile = PL_INFILE !! Name of input file for massive bodies character ( STRMAX ) :: intpfile = TP_INFILE !! Name of input file for test particles character ( STRMAX ) :: in_type = ASCII_TYPE !! Data representation type of input data files character ( STRMAX ) :: in_form = XV !! Format of input data files (EL or XV) integer ( I4B ) :: istep_out = - 1 !! Number of time steps between binary outputs character ( STRMAX ) :: outfile = NETCDF_OUTFILE !! Name of output binary file character ( STRMAX ) :: out_type = NETCDF_DOUBLE_TYPE !! Binary format of output file character ( STRMAX ) :: out_form = XVEL !! Data to write to output file character ( STRMAX ) :: out_stat = 'NEW' !! Open status for output binary file character ( STRMAX ) :: particle_out = PARTICLE_OUTFILE !! Name of output particle information file integer ( I4B ) :: istep_dump = - 1 !! Number of time steps between dumps real ( DP ) :: rmin = - 1.0_DP !! Minimum heliocentric radius for test particle real ( DP ) :: rmax = - 1.0_DP !! Maximum heliocentric radius for test particle real ( DP ) :: rmaxu = - 1.0_DP !! Maximum unbound heliocentric radius for test particle real ( DP ) :: qmin = - 1.0_DP !! Minimum pericenter distance for test particle character ( STRMAX ) :: qmin_coord = 'HELIO' !! Coordinate frame to use for qmin real ( DP ) :: qmin_alo = - 1.0_DP !! Minimum semimajor axis for qmin real ( DP ) :: qmin_ahi = - 1.0_DP !! Maximum semimajor axis for qmin character ( STRMAX ) :: enc_out = \"\" !! Name of output file for encounters character ( STRMAX ) :: discard_out = \"\" !! Name of output file for discards real ( QP ) :: MU2KG = - 1.0_QP !! Converts mass units to grams real ( QP ) :: TU2S = - 1.0_QP !! Converts time units to seconds real ( QP ) :: DU2M = - 1.0_QP !! Converts distance unit to centimeters real ( DP ) :: GU = - 1.0_DP !! Universal gravitational constant in the system units real ( DP ) :: inv_c2 = - 1.0_DP !! Inverse speed of light squared in the system units character ( STRMAX ) :: energy_out = \"\" !! Name of output energy and momentum report file ! Logical flags to turn on or off various features of the code logical :: lrhill_present = . false . !! Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical :: lextra_force = . false . !! User defined force function turned on logical :: lbig_discard = . false . !! Save big bodies on every discard logical :: lclose = . false . !! Turn on close encounters logical :: lenergy = . false . !! Track the total energy of the system logical :: loblatecb = . false . !! Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical :: lrotation = . false . !! Include rotation states of big bodies logical :: ltides = . false . !! Include tidal dissipation ! Initial values to pass to the energy report subroutine (usually only used in the case of a restart, otherwise these will be updated with initial conditions values) real ( DP ) :: Eorbit_orig = 0.0_DP !! Initial orbital energy real ( DP ) :: GMtot_orig = 0.0_DP !! Initial system mass real ( DP ), dimension ( NDIM ) :: Ltot_orig = 0.0_DP !! Initial total angular momentum vector real ( DP ), dimension ( NDIM ) :: Lorbit_orig = 0.0_DP !! Initial orbital angular momentum real ( DP ), dimension ( NDIM ) :: Lspin_orig = 0.0_DP !! Initial spin angular momentum vector real ( DP ), dimension ( NDIM ) :: Lescape = 0.0_DP !! Angular momentum of bodies that escaped the system (used for bookeeping) real ( DP ) :: GMescape = 0.0_DP !! Mass of bodies that escaped the system (used for bookeeping) real ( DP ) :: Ecollisions = 0.0_DP !! Energy lost from system due to collisions real ( DP ) :: Euntracked = 0.0_DP !! Energy gained from system due to escaped bodies logical :: lfirstenergy = . true . !! This is the first time computing energe logical :: lfirstkick = . true . !! Initiate the first kick in a symplectic step logical :: lrestart = . false . !! Indicates whether or not this is a restarted run ! Future features not implemented or in development logical :: lgr = . false . !! Turn on GR logical :: lyarkovsky = . false . !! Turn on Yarkovsky effect logical :: lyorp = . false . !! Turn on YORP effect type ( netcdf_parameters ) :: nciu !! Object containing NetCDF parameters contains procedure :: reader => io_param_reader procedure :: writer => io_param_writer procedure :: dump => io_dump_param procedure :: read_in => io_read_in_param end type swiftest_parameters !******************************************************************************************************************************** !                                    swiftest_swiftest_particle_info class definitions and method interfaces !******************************************************************************************************************************* !> Class definition for the particle origin information object. This object is used to track time, location, and collisional regime !> of fragments produced in collisional events. type :: swiftest_particle_info character ( len = NAMELEN ) :: name !! Non-unique name character ( len = NAMELEN ) :: particle_type !! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character ( len = NAMELEN ) :: origin_type !! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real ( DP ) :: origin_time !! The time of the particle's formation real ( DP ), dimension ( NDIM ) :: origin_xh !! The heliocentric distance vector at the time of the particle's formation real ( DP ), dimension ( NDIM ) :: origin_vh !! The heliocentric velocity vector at the time of the particle's formation real ( DP ) :: discard_time !! The time of the particle's discard character ( len = NAMELEN ) :: status !! Particle status description: Active, Merged, Fragmented, etc. real ( DP ), dimension ( NDIM ) :: discard_xh !! The heliocentric distance vector at the time of the particle's discard real ( DP ), dimension ( NDIM ) :: discard_vh !! The heliocentric velocity vector at the time of the particle's discard integer ( I4B ) :: discard_body_id !! The id of the other body involved in the discard (0 if no other body involved) contains procedure :: dump => io_dump_particle_info !! Dumps contents of particle information to file procedure :: read_in => io_read_in_particle_info !! Read in a particle information object from an open file procedure :: copy => util_copy_particle_info !! Copies one set of information object components into another, component-by-component procedure :: set_value => util_set_particle_info !! Sets one or more values of the particle information metadata object end type swiftest_particle_info !******************************************************************************************************************************** ! swiftest_base class definitions and methods !******************************************************************************************************************************** type , abstract :: swiftest_base !! An abstract superclass for a generic Swiftest object contains !! The minimal methods that all systems must have procedure :: dump => io_dump_base !! Dump contents to file procedure :: dump_particle_info => io_dump_particle_info_base !! Dump contents of particle information metadata to file procedure :: write_frame_netcdf => netcdf_write_frame_base !! I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure :: write_particle_info_netcdf => netcdf_write_particle_info_base !! Writes out the particle information metadata to NetCDF file generic :: write_frame => write_frame_netcdf !! Set up generic procedure that will switch between NetCDF or Fortran binary depending on arguments generic :: write_particle_info => write_particle_info_netcdf end type swiftest_base !******************************************************************************************************************************** ! swiftest_cb class definitions and methods !******************************************************************************************************************************** !> A concrete lass for the central body in a Swiftest simulation type , abstract , extends ( swiftest_base ) :: swiftest_cb type ( swiftest_particle_info ) :: info !! Particle metadata information integer ( I4B ) :: id = 0 !! External identifier (unique) real ( DP ) :: mass = 0.0_DP !! Central body mass (units MU) real ( DP ) :: Gmass = 0.0_DP !! Central mass gravitational term G * mass (units GU * MU) real ( DP ) :: radius = 0.0_DP !! Central body radius (units DU) real ( DP ) :: density = 1.0_DP !! Central body mass density - calculated internally (units MU / DU**3) real ( DP ) :: j2rp2 = 0.0_DP !! J2*R&#94;2 term for central body real ( DP ) :: j4rp4 = 0.0_DP !! J4*R&#94;2 term for central body real ( DP ), dimension ( NDIM ) :: aobl = 0.0_DP !! Barycentric acceleration due to central body oblatenes real ( DP ), dimension ( NDIM ) :: atide = 0.0_DP !! Barycentric acceleration due to central body oblatenes real ( DP ), dimension ( NDIM ) :: aoblbeg = 0.0_DP !! Barycentric acceleration due to central body oblatenes at beginning of step real ( DP ), dimension ( NDIM ) :: aoblend = 0.0_DP !! Barycentric acceleration due to central body oblatenes at end of step real ( DP ), dimension ( NDIM ) :: atidebeg = 0.0_DP !! Barycentric acceleration due to central body oblatenes at beginning of step real ( DP ), dimension ( NDIM ) :: atideend = 0.0_DP !! Barycentric acceleration due to central body oblatenes at end of step real ( DP ), dimension ( NDIM ) :: xb = 0.0_DP !! Barycentric position (units DU) real ( DP ), dimension ( NDIM ) :: vb = 0.0_DP !! Barycentric velocity (units DU / TU) real ( DP ), dimension ( NDIM ) :: agr = 0.0_DP !! Acceleration due to post-Newtonian correction real ( DP ), dimension ( NDIM ) :: Ip = 0.0_DP !! Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real ( DP ), dimension ( NDIM ) :: rot = 0.0_DP !! Body rotation vector in inertial coordinate frame (units rad / TU) real ( DP ) :: k2 = 0.0_DP !! Tidal Love number real ( DP ) :: Q = 0.0_DP !! Tidal quality factor real ( DP ) :: tlag = 0.0_DP !! Tidal phase lag angle real ( DP ), dimension ( NDIM ) :: L0 = 0.0_DP !! Initial angular momentum of the central body real ( DP ), dimension ( NDIM ) :: dL = 0.0_DP !! Change in angular momentum of the central body contains procedure :: read_in => io_read_in_cb !! I/O routine for reading in central body data procedure :: read_frame => io_read_frame_cb !! I/O routine for reading out a single frame of time-series data for the central body procedure :: write_frame_bin => io_write_frame_cb !! I/O routine for writing out a single frame of time-series data for the central body generic :: write_frame => write_frame_bin !! Write a frame (either binary or NetCDF, using generic procedures) end type swiftest_cb !******************************************************************************************************************************** ! swiftest_body definitions and methods !******************************************************************************************************************************** !> An abstract class for a generic collection of Swiftest bodies type , abstract , extends ( swiftest_base ) :: swiftest_body !! Superclass that defines the generic elements of a Swiftest particle logical :: lfirst = . true . !! Run the current step as a first integer ( I4B ) :: nbody = 0 !! Number of bodies type ( swiftest_particle_info ), dimension (:), allocatable :: info !! Particle metadata information integer ( I4B ), dimension (:), allocatable :: id !! External identifier (unique) integer ( I4B ), dimension (:), allocatable :: status !! An integrator-specific status indicator logical , dimension (:), allocatable :: ldiscard !! Body should be discarded logical , dimension (:), allocatable :: lmask !! Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real ( DP ), dimension (:), allocatable :: mu !! G * (Mcb + [m]) real ( DP ), dimension (:,:), allocatable :: xh !! Swiftestcentric position real ( DP ), dimension (:,:), allocatable :: vh !! Swiftestcentric velocity real ( DP ), dimension (:,:), allocatable :: xb !! Barycentric position real ( DP ), dimension (:,:), allocatable :: vb !! Barycentric velocity real ( DP ), dimension (:,:), allocatable :: ah !! Total heliocentric acceleration real ( DP ), dimension (:,:), allocatable :: aobl !! Barycentric accelerations of bodies due to central body oblatenes real ( DP ), dimension (:,:), allocatable :: atide !! Tanngential component of acceleration of bodies due to tides real ( DP ), dimension (:,:), allocatable :: agr !! Acceleration due to post-Newtonian correction real ( DP ), dimension (:), allocatable :: ir3h !! Inverse heliocentric radius term (1/rh**3) real ( DP ), dimension (:), allocatable :: a !! Semimajor axis (pericentric distance for a parabolic orbit) real ( DP ), dimension (:), allocatable :: e !! Eccentricity real ( DP ), dimension (:), allocatable :: inc !! Inclination real ( DP ), dimension (:), allocatable :: capom !! Longitude of ascending node real ( DP ), dimension (:), allocatable :: omega !! Argument of pericenter real ( DP ), dimension (:), allocatable :: capm !! Mean anomaly !! Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the !!    component list, such as setup_body and util_spill contains procedure ( abstract_discard_body ), deferred :: discard procedure ( abstract_kick_body ), deferred :: kick procedure ( abstract_set_mu ), deferred :: set_mu procedure ( abstract_step_body ), deferred :: step procedure ( abstract_accel ), deferred :: accel ! These are concrete because the implementation is the same for all types of particles procedure :: drift => drift_body !! Loop through bodies and call Danby drift routine on heliocentric variables procedure :: v2pv => gr_vh2pv_body !! Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure :: pv2v => gr_pv2vh_body !! Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure :: read_in => io_read_in_body !! Read in body initial conditions from a file procedure :: read_frame => io_read_frame_body !! I/O routine for writing out a single frame of time-series data for the central body procedure :: write_frame_bin => io_write_frame_body !! I/O routine for writing out a single frame of time-series data for the central body procedure :: accel_obl => obl_acc_body !! Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure :: el2xv => orbel_el2xv_vec !! Convert orbital elements to position and velocity vectors procedure :: xv2el => orbel_xv2el_vec !! Convert position and velocity vectors to orbital  elements procedure :: setup => setup_body !! A constructor that sets the number of bodies and allocates all allocatable arrays procedure :: accel_user => user_kick_getacch_body !! Add user-supplied heliocentric accelerations to planets procedure :: append => util_append_body !! Appends elements from one structure to another procedure :: fill => util_fill_body !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => util_resize_body !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_ir3 => util_set_ir3h !! Sets the inverse heliocentric radius term (1/rh**3) procedure :: sort => util_sort_body !! Sorts body arrays by a sortable componen procedure :: rearrange => util_sort_rearrange_body !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => util_spill_body !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) generic :: write_frame => write_frame_bin !! Add the generic write frame for Fortran binary files end type swiftest_body !******************************************************************************************************************************** ! swiftest_pl definitions and methods !******************************************************************************************************************************** !> An abstract class for a generic collection of Swiftest massive bodies type , abstract , extends ( swiftest_body ) :: swiftest_pl !! Superclass that defines the generic elements of a Swiftest particle real ( DP ), dimension (:), allocatable :: mass !! Body mass (units MU) real ( DP ), dimension (:), allocatable :: Gmass !! Mass gravitational term G * mass (units GU * MU) real ( DP ), dimension (:), allocatable :: rhill !! Body mass (units MU) real ( DP ), dimension (:), allocatable :: radius !! Body radius (units DU) real ( DP ), dimension (:,:), allocatable :: xbeg !! Position at beginning of step real ( DP ), dimension (:,:), allocatable :: xend !! Position at end of step real ( DP ), dimension (:,:), allocatable :: vbeg !! Velocity at beginning of step real ( DP ), dimension (:), allocatable :: density !! Body mass density - calculated internally (units MU / DU**3) real ( DP ), dimension (:,:), allocatable :: Ip !! Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real ( DP ), dimension (:,:), allocatable :: rot !! Body rotation vector in inertial coordinate frame (units rad / TU) real ( DP ), dimension (:), allocatable :: k2 !! Tidal Love number real ( DP ), dimension (:), allocatable :: Q !! Tidal quality factor real ( DP ), dimension (:), allocatable :: tlag !! Tidal phase lag integer ( I4B ), dimension (:,:), allocatable :: k_plpl !! Index array used to convert flattened the body-body comparison upper triangular matrix integer ( I8B ) :: nplpl !! Number of body-body comparisons in the flattened upper triangular matrix !! Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the !!    component list, such as setup_pl and util_spill_pl contains ! Massive body-specific concrete methods ! These are concrete because they are the same implemenation for all integrators procedure :: discard => discard_pl !! Placeholder method for discarding massive bodies procedure :: index => util_index_eucl_plpl !! Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure :: accel_int => kick_getacch_int_pl !! Compute direct cross (third) term heliocentric accelerations of massive bodies procedure :: accel_obl => obl_acc_pl !! Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure :: setup => setup_pl !! A base constructor that sets the number of bodies and allocates and initializes all arrays procedure :: accel_tides => tides_kick_getacch_pl !! Compute the accelerations of bodies due to tidal interactions with the central body procedure :: append => util_append_pl !! Appends elements from one structure to another procedure :: h2b => util_coord_h2b_pl !! Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure :: b2h => util_coord_b2h_pl !! Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure :: vh2vb => util_coord_vh2vb_pl !! Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure :: vb2vh => util_coord_vb2vh_pl !! Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure :: xh2xb => util_coord_xh2xb_pl !! Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure :: fill => util_fill_pl !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: resize => util_resize_pl !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_beg_end => util_set_beg_end_pl !! Sets the beginning and ending positions and velocities of planets. procedure :: set_mu => util_set_mu_pl !! Method used to construct the vectorized form of the central body mass procedure :: set_rhill => util_set_rhill !! Calculates the Hill's radii for each body procedure :: sort => util_sort_pl !! Sorts body arrays by a sortable component procedure :: rearrange => util_sort_rearrange_pl !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => util_spill_pl !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type swiftest_pl !******************************************************************************************************************************** ! swiftest_tp definitions and methods !******************************************************************************************************************************** !> An abstract class for a generic collection of Swiftest test particles type , abstract , extends ( swiftest_body ) :: swiftest_tp !! Superclass that defines the generic elements of a Swiftest test particle integer ( I4B ), dimension (:), allocatable :: isperi !! Perihelion passage flag real ( DP ), dimension (:), allocatable :: peri !! Perihelion distance real ( DP ), dimension (:), allocatable :: atp !! Semimajor axis following perihelion passage integer ( I4B ), dimension (:,:), allocatable :: k_pltp !! Index array used to convert flattened the body-body comparison upper triangular matrix integer ( I8B ) :: npltp !! Number of pl-tp comparisons in the flattened upper triangular matrix !! Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the !!    component list, such as setup_tp and util_spill_tp contains ! Test particle-specific concrete methods ! These are concrete because they are the same implemenation for all integrators procedure :: discard => discard_tp !! Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure :: accel_int => kick_getacch_int_tp !! Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure :: accel_obl => obl_acc_tp !! Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure :: setup => setup_tp !! A base constructor that sets the number of bodies and procedure :: append => util_append_tp !! Appends elements from one structure to another procedure :: h2b => util_coord_h2b_tp !! Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure :: b2h => util_coord_b2h_tp !! Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure :: vb2vh => util_coord_vb2vh_tp !! Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure :: vh2vb => util_coord_vh2vb_tp !! Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure :: xh2xb => util_coord_xh2xb_tp !! Convert test particles from heliocentric to barycentric coordinates (position only) procedure :: fill => util_fill_tp !! \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure :: get_peri => util_peri_tp !! Determine system pericenter passages for test particles procedure :: resize => util_resize_tp !! Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure :: set_mu => util_set_mu_tp !! Method used to construct the vectorized form of the central body mass procedure :: sort => util_sort_tp !! Sorts body arrays by a sortable component procedure :: rearrange => util_sort_rearrange_tp !! Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure :: spill => util_spill_tp !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) end type swiftest_tp !******************************************************************************************************************************** ! swiftest_nbody_system class definitions and methods !******************************************************************************************************************************** !> An abstract class for a basic Swiftest nbody system type , abstract :: swiftest_nbody_system !!  This superclass contains a minimial system of a set of test particles (tp), massive bodies (pl), and a central body (cb) class ( swiftest_cb ), allocatable :: cb !! Central body data structure class ( swiftest_pl ), allocatable :: pl !! Massive body data structure class ( swiftest_tp ), allocatable :: tp !! Test particle data structure class ( swiftest_tp ), allocatable :: tp_discards !! Discarded test particle data structure class ( swiftest_pl ), allocatable :: pl_discards !! Discarded massive body particle data structure real ( DP ) :: GMtot = 0.0_DP !! Total system mass - used for barycentric coordinate conversion real ( DP ) :: ke_orbit = 0.0_DP !! System orbital kinetic energy real ( DP ) :: ke_spin = 0.0_DP !! System spin kinetic energy real ( DP ) :: pe = 0.0_DP !! System potential energy real ( DP ) :: te = 0.0_DP !! System total energy real ( DP ) :: oblpot = 0.0_DP !! System potential energy due to oblateness of the central body real ( DP ), dimension ( NDIM ) :: Lorbit = 0.0_DP !! System orbital angular momentum vector real ( DP ), dimension ( NDIM ) :: Lspin = 0.0_DP !! System spin angular momentum vector real ( DP ), dimension ( NDIM ) :: Ltot = 0.0_DP !! System angular momentum vector logical :: lbeg !! True if this is the beginning of a step. This is used so that test particle steps can be calculated !!    separately from massive bodies.  Massive body variables are saved at half steps, and passed to !!    the test particles contains !> Each integrator will have its own version of the step procedure ( abstract_step_system ), deferred :: step ! Concrete classes that are common to the basic integrator (only test particles considered for discard) procedure :: discard => discard_system !! Perform a discard step on the system procedure :: conservation_report => io_conservation_report !! Compute energy and momentum and print out the change with time procedure :: dump => io_dump_system !! Dump the state of the system to a file procedure :: get_old_t_final => io_get_old_t_final_system !! Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure :: read_frame => io_read_frame_system !! Read in a frame of input data from file procedure :: read_particle_info => io_read_particle_info_system !! Read in particle metadata from file procedure :: write_discard => io_write_discard !! Write out information about discarded test particles procedure :: write_frame => io_write_frame_system !! Append a frame of output data to file procedure :: write_hdr_bin => io_write_hdr_system !! Write a header for an output frame in Fortran binary format procedure :: write_hdr_netcdf => netcdf_write_hdr_system !! Write a header for an output frame in NetCDF format procedure :: obl_pot => obl_pot_system !! Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure :: initialize => setup_initialize_system !! Initialize the system from input files procedure :: init_particle_info => setup_initialize_particle_info_system !! Initialize the system from input files procedure :: step_spin => tides_step_spin_system !! Steps the spins of the massive & central bodies due to tides. procedure :: set_msys => util_set_msys !! Sets the value of msys from the masses of system bodies. procedure :: get_energy_and_momentum => util_get_energy_momentum_system !! Calculates the total system energy and momentum procedure :: rescale => util_rescale_system !! Rescales the system into a new set of units procedure :: validate_ids => util_valid_id_system !! Validate the numerical ids passed to the system and save the maximum value generic :: write_hdr => write_hdr_bin , write_hdr_netcdf !! Generic method call for writing headers end type swiftest_nbody_system type :: swiftest_encounter integer ( I4B ) :: nenc !! Total number of encounters logical , dimension (:), allocatable :: lvdotr !! relative vdotr flag integer ( I4B ), dimension (:), allocatable :: status !! status of the interaction integer ( I8B ), dimension (:), allocatable :: kidx !! index value of the encounter from the master k_plpl encounter list integer ( I4B ), dimension (:), allocatable :: index1 !! position of the first body in the encounter integer ( I4B ), dimension (:), allocatable :: index2 !! position of the second body in the encounter integer ( I4B ), dimension (:), allocatable :: id1 !! id of the first body in the encounter integer ( I4B ), dimension (:), allocatable :: id2 !! id of the second body in the encounter real ( DP ), dimension (:,:), allocatable :: x1 !! the position of body 1 in the encounter real ( DP ), dimension (:,:), allocatable :: x2 !! the position of body 2 in the encounter real ( DP ), dimension (:,:), allocatable :: v1 !! the velocity of body 1 in the encounter real ( DP ), dimension (:,:), allocatable :: v2 !! the velocity of body 2 in the encounter real ( DP ), dimension (:), allocatable :: t !! Time of encounter contains procedure :: setup => setup_encounter !! A constructor that sets the number of encounters and allocates and initializes all arrays procedure :: append => util_append_encounter !! Appends elements from one structure to another procedure :: copy => util_copy_encounter !! Copies elements from the source encounter list into self. procedure :: spill => util_spill_encounter !! \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure :: resize => util_resize_encounter !! Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure :: write => io_write_encounter !! Write close encounter data to output binary file end type swiftest_encounter abstract interface subroutine abstract_discard_body ( self , system , param ) import swiftest_body , swiftest_nbody_system , swiftest_parameters class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine abstract_discard_body subroutine abstract_accel ( self , system , param , t , lbeg ) import swiftest_body , swiftest_nbody_system , swiftest_parameters , DP class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step end subroutine abstract_accel subroutine abstract_kick_body ( self , system , param , t , dt , lbeg ) import swiftest_body , swiftest_nbody_system , swiftest_parameters , DP implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system objec class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. end subroutine abstract_kick_body function abstract_read_frame ( self , iu , param ) result ( ierr ) import DP , I4B , swiftest_base , swiftest_parameters class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function abstract_read_frame subroutine abstract_set_mu ( self , cb ) import swiftest_body , swiftest_cb class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine abstract_set_mu subroutine abstract_step_body ( self , system , param , t , dt ) import DP , swiftest_body , swiftest_nbody_system , swiftest_parameters implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine abstract_step_body subroutine abstract_step_system ( self , param , t , dt ) import DP , swiftest_nbody_system , swiftest_parameters implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine abstract_step_system end interface interface module subroutine discard_pl ( self , system , param ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameter end subroutine discard_pl module subroutine discard_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine discard_system module subroutine discard_tp ( self , system , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine discard_tp module subroutine drift_all ( mu , x , v , n , param , dt , lmask , iflag ) implicit none real ( DP ), dimension (:), intent ( in ) :: mu !! Vector of gravitational constants real ( DP ), dimension (:,:), intent ( inout ) :: x , v !! Position and velocity vectors integer ( I4B ), intent ( in ) :: n !! number of bodies class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize logical , dimension (:), intent ( in ) :: lmask !! Logical mask of size self%nbody that determines which bodies to drift. integer ( I4B ), dimension (:), intent ( out ) :: iflag !! Vector of error flags. 0 means no problem end subroutine drift_all module subroutine drift_body ( self , system , param , dt ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: dt !! Stepsize end subroutine drift_body module pure elemental subroutine drift_one ( mu , px , py , pz , vx , vy , vz , dt , iflag ) implicit none real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real ( DP ), intent ( inout ) :: px , py , pz , vx , vy , vz !! Position and velocity of body to drift real ( DP ), intent ( in ) :: dt !! Step size integer ( I4B ), intent ( out ) :: iflag !! iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) end subroutine drift_one module pure subroutine util_index_eucl_ij_to_k ( n , i , j , k ) !$omp declare simd(util_index_eucl_ij_to_k) implicit none integer ( I4B ), intent ( in ) :: n !! Number of bodies integer ( I4B ), intent ( in ) :: i !! Index of the ith body integer ( I4B ), intent ( in ) :: j !! Index of the jth body integer ( I8B ), intent ( out ) :: k !! Index of the flattened matrix end subroutine util_index_eucl_ij_to_k module pure subroutine util_index_eucl_k_to_ij ( n , k , i , j ) implicit none integer ( I4B ), intent ( in ) :: n !! Number of bodies integer ( I8B ), intent ( in ) :: k !! Index of the flattened matrix integer ( I4B ), intent ( out ) :: i !! Index of the ith body integer ( I4B ), intent ( out ) :: j !! Index of the jth body end subroutine util_index_eucl_k_to_ij module subroutine util_index_eucl_plpl ( self , param ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine module subroutine util_index_eucl_pltp ( self , pl , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine module pure subroutine gr_kick_getaccb_ns_body ( self , system , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest generic body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine gr_kick_getaccb_ns_body module pure subroutine gr_kick_getacch ( mu , x , lmask , n , inv_c2 , agr ) implicit none real ( DP ), dimension (:), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vectors logical , dimension (:), intent ( in ) :: lmask !! Logical mask indicating which bodies to compute integer ( I4B ), intent ( in ) :: n !! Total number of bodies real ( DP ), intent ( in ) :: inv_c2 !! Inverse speed of light squared: 1 / c**2 real ( DP ), dimension (:,:), intent ( out ) :: agr !! Accelerations end subroutine gr_kick_getacch module pure subroutine gr_p4_pos_kick ( param , x , v , dt ) implicit none class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), dimension (:), intent ( inout ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( in ) :: dt !! Step size end subroutine gr_p4_pos_kick module pure subroutine gr_pseudovel2vel ( param , mu , xh , pv , vh ) implicit none class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Swiftestcentric position vector real ( DP ), dimension (:), intent ( in ) :: pv !! Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real ( DP ), dimension (:), intent ( out ) :: vh !! Swiftestcentric velocity vector end subroutine gr_pseudovel2vel module pure subroutine gr_pv2vh_body ( self , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine gr_pv2vh_body module pure subroutine gr_vel2pseudovel ( param , mu , xh , vh , pv ) implicit none class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: mu !! G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real ( DP ), dimension (:), intent ( in ) :: xh !! Swiftestcentric position vector real ( DP ), dimension (:), intent ( in ) :: vh !! Swiftestcentric velocity vector real ( DP ), dimension (:), intent ( out ) :: pv !! Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) end subroutine gr_vel2pseudovel module pure subroutine gr_vh2pv_body ( self , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest particle object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine gr_vh2pv_body module subroutine io_conservation_report ( self , param , lterminal ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Input colleciton of user-defined parameters logical , intent ( in ) :: lterminal !! Indicates whether to output information to the terminal screen end subroutine io_conservation_report module subroutine io_dump_param ( self , param_file_name ) implicit none class ( swiftest_parameters ), intent ( in ) :: self !! Output collection of parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) end subroutine io_dump_param module subroutine io_dump_particle_info_base ( self , param , idx ) implicit none class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object (can be cb, pl, or tp) class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ), dimension (:), optional , intent ( in ) :: idx !! Array of test particle indices to append to the particle file end subroutine io_dump_particle_info_base module subroutine io_dump_particle_info ( self , iu ) implicit none class ( swiftest_particle_info ), intent ( in ) :: self !! Swiftest particle info metadata object integer ( I4B ), intent ( in ) :: iu !! Open unformatted file unit number end subroutine io_dump_particle_info module subroutine io_dump_base ( self , param ) implicit none class ( swiftest_base ), intent ( inout ) :: self !! Swiftest base object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_dump_base module subroutine io_dump_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_dump_system module function io_get_args ( integrator , param_file_name ) result ( ierr ) implicit none integer ( I4B ) :: integrator !! Symbolic code of the requested integrator character ( len = :), allocatable :: param_file_name !! Name of the input parameters file integer ( I4B ) :: ierr !! I/O error code end function io_get_args module function io_get_old_t_final_system ( self , param ) result ( old_t_final ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self class ( swiftest_parameters ), intent ( in ) :: param real ( DP ) :: old_t_final end function io_get_old_t_final_system module function io_get_token ( buffer , ifirst , ilast , ierr ) result ( token ) implicit none character ( len =* ), intent ( in ) :: buffer !! Input string buffer integer ( I4B ), intent ( inout ) :: ifirst !! Index of the buffer at which to start the search for a token integer ( I4B ), intent ( out ) :: ilast !! Index of the buffer at the end of the returned token integer ( I4B ), intent ( out ) :: ierr !! Error code character ( len = :), allocatable :: token !! Returned token string end function io_get_token module subroutine io_param_reader ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( swiftest_parameters ), intent ( inout ) :: self !! Collection of parameters integer ( I4B ), intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer ( I4B ), intent ( in ) :: v_list (:) !! The first element passes the integrator code to the reader integer ( I4B ), intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine io_param_reader module subroutine io_param_writer ( self , unit , iotype , v_list , iostat , iomsg ) implicit none class ( swiftest_parameters ), intent ( in ) :: self !! Collection of parameters integer ( I4B ), intent ( in ) :: unit !! File unit number character ( len =* ), intent ( in ) :: iotype !! Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. !!    If you do not include a char-literal-constant, the iotype argument contains only DT. integer ( I4B ), intent ( in ) :: v_list (:) !! Not used in this procedure integer ( I4B ), intent ( out ) :: iostat !! IO status code character ( len =* ), intent ( inout ) :: iomsg !! Message to pass if iostat /= 0 end subroutine io_param_writer module subroutine io_read_in_body ( self , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_read_in_body module subroutine io_read_in_cb ( self , param ) implicit none class ( swiftest_cb ), intent ( inout ) :: self !! Swiftest central body object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_read_in_cb module subroutine io_read_in_param ( self , param_file_name ) implicit none class ( swiftest_parameters ), intent ( inout ) :: self !! Current run configuration parameters character ( len =* ), intent ( in ) :: param_file_name !! Parameter input file name (i.e. param.in) end subroutine io_read_in_param module subroutine io_read_in_particle_info ( self , iu ) implicit none class ( swiftest_particle_info ), intent ( inout ) :: self !! Particle metadata information object integer ( I4B ), intent ( in ) :: iu !! Open file unit number end subroutine io_read_in_particle_info module function io_read_frame_body ( self , iu , param ) result ( ierr ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function io_read_frame_body module function io_read_frame_cb ( self , iu , param ) result ( ierr ) implicit none class ( swiftest_cb ), intent ( inout ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function io_read_frame_cb module function io_read_frame_system ( self , iu , param ) result ( ierr ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters integer ( I4B ) :: ierr !! Error code: returns 0 if the read is successful end function io_read_frame_system module subroutine io_read_particle_info_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_read_particle_info_system module subroutine io_write_discard ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_write_discard module subroutine io_toupper ( string ) implicit none character ( * ), intent ( inout ) :: string !! String to make upper case end subroutine io_toupper module subroutine io_write_encounter ( self , pl , encbody , param ) implicit none class ( swiftest_encounter ), intent ( in ) :: self !! Swiftest encounter list object class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: encbody !! Encountering body - Swiftest generic body object (pl or tp) class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_encounter module subroutine io_write_frame_body ( self , iu , param ) implicit none class ( swiftest_body ), intent ( in ) :: self !! Swiftest body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_frame_body module subroutine io_write_frame_cb ( self , iu , param ) implicit none class ( swiftest_cb ), intent ( in ) :: self !! Swiftest central body object integer ( I4B ), intent ( inout ) :: iu !! Unit number for the output file to write frame to class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_frame_cb module subroutine io_write_frame_encounter ( iu , t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 ) implicit none integer ( I4B ), intent ( in ) :: iu !! Open file unit number real ( DP ), intent ( in ) :: t !! Time of encounter integer ( I4B ), intent ( in ) :: id1 , id2 !! ids of the two encountering bodies real ( DP ), intent ( in ) :: Gmass1 , Gmass2 !! G*mass of the two encountering bodies real ( DP ), intent ( in ) :: radius1 , radius2 !! Radii of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 !! Swiftestcentric position vectors of the two encountering bodies real ( DP ), dimension (:), intent ( in ) :: vh1 , vh2 !! Swiftestcentric velocity vectors of the two encountering bodies end subroutine io_write_frame_encounter module subroutine io_write_frame_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine io_write_frame_system module subroutine io_write_hdr_system ( self , iu , param ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object integer ( I4B ), intent ( inout ) :: iu !! Output file unit number class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine io_write_hdr_system module subroutine kick_getacch_int_pl ( self ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object end subroutine kick_getacch_int_pl module subroutine kick_getacch_int_tp ( self , GMpl , xhp , npl ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle real ( DP ), dimension (:), intent ( in ) :: GMpl !! Massive body masses real ( DP ), dimension (:,:), intent ( in ) :: xhp !! Massive body position vectors integer ( I4B ), intent ( in ) :: npl !! Number of active massive bodies end subroutine kick_getacch_int_tp module subroutine kick_getacch_int_all_pl ( npl , nplpl , k_plpl , x , Gmass , radius , acc ) implicit none integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies integer ( I8B ), intent ( in ) :: nplpl !! Number of massive body interactions to compute integer ( I4B ), dimension (:,:), intent ( in ) :: k_plpl !! Array of interaction pair indices (flattened upper triangular matrix) real ( DP ), dimension (:,:), intent ( in ) :: x !! Position vector array real ( DP ), dimension (:), intent ( in ) :: Gmass !! Array of massive body G*mass real ( DP ), dimension (:), intent ( in ) :: radius !! Array of massive body radii real ( DP ), dimension (:,:), intent ( inout ) :: acc !! Acceleration vector array end subroutine kick_getacch_int_all_pl module subroutine kick_getacch_int_all_tp ( ntp , npl , xtp , xpl , GMpl , lmask , acc ) implicit none integer ( I4B ), intent ( in ) :: ntp !! Number of test particles integer ( I4B ), intent ( in ) :: npl !! Number of massive bodies real ( DP ), dimension (:,:), intent ( in ) :: xtp !! Test particle position vector array real ( DP ), dimension (:,:), intent ( in ) :: xpl !! Massive body particle position vector array real ( DP ), dimension (:), intent ( in ) :: GMpl !! Array of massive body G*mass logical , dimension (:), intent ( in ) :: lmask !! Logical mask indicating which test particles should be computed real ( DP ), dimension (:,:), intent ( inout ) :: acc !! Acceleration vector array end subroutine kick_getacch_int_all_tp module pure subroutine kick_getacch_int_one_pl ( rji2 , xr , yr , zr , Gmi , Gmj , axi , ayi , azi , axj , ayj , azj ) !$omp declare simd(kick_getacch_int_one_pl) implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the two bodies real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmi !! G*mass of body i real ( DP ), intent ( in ) :: Gmj !! G*mass of body j real ( DP ), intent ( inout ) :: axi , ayi , azi !! Acceleration vector components of body i real ( DP ), intent ( inout ) :: axj , ayj , azj !! Acceleration vector components of body j end subroutine kick_getacch_int_one_pl module pure subroutine kick_getacch_int_one_tp ( rji2 , xr , yr , zr , Gmpl , ax , ay , az ) !$omp declare simd(kick_getacch_int_one_tp) implicit none real ( DP ), intent ( in ) :: rji2 !! Square of distance between the test particle and massive body real ( DP ), intent ( in ) :: xr , yr , zr !! Distances between the two bodies in x, y, and z directions real ( DP ), intent ( in ) :: Gmpl !! G*mass of massive body real ( DP ), intent ( inout ) :: ax , ay , az !! Acceleration vector components of test particle end subroutine kick_getacch_int_one_tp module subroutine netcdf_close ( self , param ) implicit none class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_close module subroutine netcdf_initialize_output ( self , param ) implicit none class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_initialize_output module subroutine netcdf_open ( self , param ) implicit none class ( netcdf_parameters ), intent ( inout ) :: self !! Parameters used to identify a particular NetCDF dataset class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_open module subroutine netcdf_write_frame_base ( self , iu , param ) implicit none class ( swiftest_base ), intent ( in ) :: self !! Swiftest base object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_write_frame_base module subroutine netcdf_write_frame_system ( self , iu , param ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest system object integer ( I4B ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_write_frame_system module subroutine netcdf_write_hdr_system ( self , iu , param ) implicit none class ( swiftest_nbody_system ), intent ( in ) :: self !! Swiftest nbody system object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to for writing a NetCDF dataset to file class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine netcdf_write_hdr_system module subroutine netcdf_write_particle_info_base ( self , iu ) implicit none class ( swiftest_base ), intent ( in ) :: self !! Swiftest particle object class ( netcdf_parameters ), intent ( inout ) :: iu !! Parameters used to identify a particular NetCDF dataset end subroutine netcdf_write_particle_info_base module subroutine obl_acc_body ( self , system ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine obl_acc_body module subroutine obl_acc_pl ( self , system ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine obl_acc_pl module subroutine obl_acc_tp ( self , system ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine obl_acc_tp module subroutine obl_pot_system ( self ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object end subroutine obl_pot_system module subroutine orbel_el2xv_vec ( self , cb ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine orbel_el2xv_vec module pure subroutine orbel_scget ( angle , sx , cx ) implicit none real ( DP ), intent ( in ) :: angle real ( DP ), intent ( out ) :: sx , cx end subroutine orbel_scget module pure subroutine orbel_xv2aeq ( mu , x , v , a , e , q ) implicit none real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: e !! eccentricity real ( DP ), intent ( out ) :: q !! periapsis end subroutine orbel_xv2aeq module pure subroutine orbel_xv2aqt ( mu , x , v , a , q , capm , tperi ) implicit none real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: q !! periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly real ( DP ), intent ( out ) :: tperi !! time of pericenter passage end subroutine orbel_xv2aqt module pure subroutine orbel_xv2el ( mu , x , v , a , e , inc , capom , omega , capm ) implicit none real ( DP ), intent ( in ) :: mu !! Gravitational constant real ( DP ), dimension (:), intent ( in ) :: x !! Position vector real ( DP ), dimension (:), intent ( in ) :: v !! Velocity vector real ( DP ), intent ( out ) :: a !! semimajor axis real ( DP ), intent ( out ) :: e !! eccentricity real ( DP ), intent ( out ) :: inc !! inclination real ( DP ), intent ( out ) :: capom !! longitude of ascending node real ( DP ), intent ( out ) :: omega !! argument of periapsis real ( DP ), intent ( out ) :: capm !! mean anomaly end subroutine orbel_xv2el module subroutine orbel_xv2el_vec ( self , cb ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine orbel_xv2el_vec module subroutine setup_body ( self , n , param ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine setup_body module subroutine setup_construct_system ( system , param ) implicit none class ( swiftest_nbody_system ), allocatable , intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine setup_construct_system module subroutine setup_encounter ( self , n ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter structure integer ( I4B ), intent ( in ) :: n !! Number of encounters to allocate space for end subroutine setup_encounter module subroutine setup_initialize_particle_info_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine setup_initialize_particle_info_system module subroutine setup_initialize_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine setup_initialize_system module subroutine setup_pl ( self , n , param ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine setup_pl module subroutine setup_tp ( self , n , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parametersr end subroutine setup_tp module subroutine tides_kick_getacch_pl ( self , system ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object end subroutine tides_kick_getacch_pl module subroutine tides_step_spin_system ( self , param , t , dt ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize end subroutine tides_step_spin_system module subroutine user_kick_getacch_body ( self , system , param , t , lbeg ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest massive body particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody_system_object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step end subroutine user_kick_getacch_body end interface interface util_append module subroutine util_append_arr_char_string ( arr , source , nold , nsrc , lsource_mask ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_char_string module subroutine util_append_arr_DP ( arr , source , nold , nsrc , lsource_mask ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_DP module subroutine util_append_arr_DPvec ( arr , source , nold , nsrc , lsource_mask ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array real ( DP ), dimension (:,:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_DPvec module subroutine util_append_arr_I4B ( arr , source , nold , nsrc , lsource_mask ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_I4B module subroutine util_append_arr_info ( arr , source , nold , nsrc , lsource_mask ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_info module subroutine util_append_arr_logical ( arr , source , nold , nsrc , lsource_mask ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array logical , dimension (:), allocatable , intent ( in ) :: source !! Array to append integer ( I4B ), intent ( in ) :: nold , nsrc !! Extend of the old array and the source array, respectively logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_arr_logical end interface interface module subroutine util_append_body ( self , source , lsource_mask ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_body module subroutine util_append_encounter ( self , source , lsource_mask ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list object class ( swiftest_encounter ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_encounter module subroutine util_append_pl ( self , source , lsource_mask ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_pl module subroutine util_append_tp ( self , source , lsource_mask ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to end subroutine util_append_tp module subroutine util_coord_b2h_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_b2h_pl module subroutine util_coord_b2h_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object end subroutine util_coord_b2h_tp module subroutine util_coord_h2b_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_h2b_pl module subroutine util_coord_h2b_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object end subroutine util_coord_h2b_tp module subroutine util_coord_vb2vh_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_vb2vh_pl module subroutine util_coord_vb2vh_tp ( self , vbcb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body end subroutine util_coord_vb2vh_tp module subroutine util_coord_vh2vb_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_vh2vb_pl module subroutine util_coord_vh2vb_tp ( self , vbcb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object real ( DP ), dimension (:), intent ( in ) :: vbcb !! Barycentric velocity of the central body end subroutine util_coord_vh2vb_tp module subroutine util_coord_xh2xb_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_coord_xh2xb_pl module subroutine util_coord_xh2xb_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( in ) :: cb !! Swiftest central body object end subroutine util_coord_xh2xb_tp module subroutine util_copy_encounter ( self , source ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Encounter list class ( swiftest_encounter ), intent ( in ) :: source !! Source object to copy into end subroutine util_copy_encounter module subroutine util_copy_particle_info ( self , source ) implicit none class ( swiftest_particle_info ), intent ( inout ) :: self class ( swiftest_particle_info ), intent ( in ) :: source end subroutine util_copy_particle_info module subroutine util_copy_particle_info_arr ( source , dest , idx ) implicit none class ( swiftest_particle_info ), dimension (:), intent ( in ) :: source !! Source object to copy into class ( swiftest_particle_info ), dimension (:), intent ( inout ) :: dest !! Swiftest body object with particle metadata information object integer ( I4B ), dimension (:), intent ( in ), optional :: idx !! Optional array of indices to draw the source object end subroutine util_copy_particle_info_arr module subroutine util_exit ( code ) implicit none integer ( I4B ), intent ( in ) :: code !! Failure exit code end subroutine util_exit module subroutine util_fill_body ( self , inserts , lfill_list ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_body module subroutine util_fill_pl ( self , inserts , lfill_list ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_pl module subroutine util_fill_tp ( self , inserts , lfill_list ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Swiftest body object to be inserted logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_tp end interface interface util_fill module subroutine util_fill_arr_char_string ( keeps , inserts , lfill_list ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_char_string module subroutine util_fill_arr_DP ( keeps , inserts , lfill_list ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_DP module subroutine util_fill_arr_DPvec ( keeps , inserts , lfill_list ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_DPvec module subroutine util_fill_arr_I4B ( keeps , inserts , lfill_list ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_I4B module subroutine util_fill_arr_info ( keeps , inserts , lfill_list ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_info module subroutine util_fill_arr_logical ( keeps , inserts , lfill_list ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( in ) :: inserts !! Array of values to insert into keep logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps end subroutine util_fill_arr_logical end interface interface module subroutine util_rescale_system ( self , param , mscale , dscale , tscale ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters. Returns with new values of the scale vactors and GU real ( DP ), intent ( in ) :: mscale , dscale , tscale !! Scale factors for mass, distance, and time units, respectively. end subroutine util_rescale_system module function util_minimize_bfgs ( f , N , x0 , eps , maxloop , lerr ) result ( x1 ) use lambda_function implicit none integer ( I4B ), intent ( in ) :: N class ( lambda_obj ), intent ( inout ) :: f real ( DP ), dimension (:), intent ( in ) :: x0 real ( DP ), intent ( in ) :: eps logical , intent ( out ) :: lerr integer ( I4B ), intent ( in ) :: maxloop real ( DP ), dimension (:), allocatable :: x1 end function util_minimize_bfgs module subroutine util_peri_tp ( self , system , param ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine util_peri_tp end interface interface util_resize module subroutine util_resize_arr_char_string ( arr , nnew ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_char_string module subroutine util_resize_arr_DP ( arr , nnew ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_DP module subroutine util_resize_arr_DPvec ( arr , nnew ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_DPvec module subroutine util_resize_arr_I4B ( arr , nnew ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_I4B module subroutine util_resize_arr_info ( arr , nnew ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_info module subroutine util_resize_arr_logical ( arr , nnew ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: arr !! Array to resize integer ( I4B ), intent ( in ) :: nnew !! New size end subroutine util_resize_arr_logical end interface interface module subroutine util_resize_body ( self , nnew ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine util_resize_body module subroutine util_resize_encounter ( self , nnew ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list integer ( I4B ), intent ( in ) :: nnew !! New size of list needed end subroutine util_resize_encounter module subroutine util_resize_pl ( self , nnew ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine util_resize_pl module subroutine util_resize_tp ( self , nnew ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded end subroutine util_resize_tp module subroutine util_get_energy_momentum_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters end subroutine util_get_energy_momentum_system module subroutine util_set_beg_end_pl ( self , xbeg , xend , vbeg ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object real ( DP ), dimension (:,:), intent ( in ), optional :: xbeg !! Position vectors at beginning of step real ( DP ), dimension (:,:), intent ( in ), optional :: xend !! Positions vectors at end of step real ( DP ), dimension (:,:), intent ( in ), optional :: vbeg !! vbeg is an unused variable to keep this method forward compatible with RMVS end subroutine util_set_beg_end_pl module subroutine util_set_ir3h ( self ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object end subroutine util_set_ir3h module subroutine util_set_msys ( self ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest system object end subroutine util_set_msys module subroutine util_set_mu_pl ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_mu_pl module subroutine util_set_mu_tp ( self , cb ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_mu_tp module subroutine util_set_particle_info ( self , name , particle_type , status , origin_type , origin_time , origin_xh , origin_vh , discard_time , discard_xh , discard_vh , discard_body_id ) implicit none class ( swiftest_particle_info ), intent ( inout ) :: self character ( len =* ), intent ( in ), optional :: name !! Non-unique name character ( len =* ), intent ( in ), optional :: particle_type !! String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character ( len =* ), intent ( in ), optional :: status !! Particle status description: Active, Merged, Fragmented, etc. character ( len =* ), intent ( in ), optional :: origin_type !! String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real ( DP ), intent ( in ), optional :: origin_time !! The time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_xh !! The heliocentric distance vector at the time of the particle's formation real ( DP ), dimension (:), intent ( in ), optional :: origin_vh !! The heliocentric velocity vector at the time of the particle's formation real ( DP ), intent ( in ), optional :: discard_time !! The time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_xh !! The heliocentric distance vector at the time of the particle's discard real ( DP ), dimension (:), intent ( in ), optional :: discard_vh !! The heliocentric velocity vector at the time of the particle's discard integer ( I4B ), intent ( in ), optional :: discard_body_id !! The id of the other body involved in the discard (0 if no other body involved) end subroutine util_set_particle_info module subroutine util_set_rhill ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_rhill module subroutine util_set_rhill_approximate ( self , cb ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_cb ), intent ( inout ) :: cb !! Swiftest central body object end subroutine util_set_rhill_approximate end interface interface util_solve_linear_system module function util_solve_linear_system_d ( A , b , n , lerr ) result ( x ) implicit none integer ( I4B ), intent ( in ) :: n real ( DP ), dimension (:,:), intent ( in ) :: A real ( DP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr real ( DP ), dimension ( n ) :: x end function util_solve_linear_system_d module function util_solve_linear_system_q ( A , b , n , lerr ) result ( x ) implicit none integer ( I4B ), intent ( in ) :: n real ( QP ), dimension (:,:), intent ( in ) :: A real ( QP ), dimension (:), intent ( in ) :: b logical , intent ( out ) :: lerr real ( QP ), dimension ( n ) :: x end function util_solve_linear_system_q end interface interface module function util_solve_rkf45 ( f , y0in , t1 , dt0 , tol ) result ( y1 ) use lambda_function implicit none class ( lambda_obj ), intent ( inout ) :: f !! lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real ( DP ), dimension (:), intent ( in ) :: y0in !! Initial value at t=0 real ( DP ), intent ( in ) :: t1 !! Final time real ( DP ), intent ( in ) :: dt0 !! Initial step size guess real ( DP ), intent ( in ) :: tol !! Tolerance on solution real ( DP ), dimension (:), allocatable :: y1 !! Final result end function util_solve_rkf45 end interface interface util_sort module subroutine util_sort_i4b ( arr ) implicit none integer ( I4B ), dimension (:), intent ( inout ) :: arr end subroutine util_sort_i4b module subroutine util_sort_index_i4b ( arr , ind ) implicit none integer ( I4B ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind end subroutine util_sort_index_i4b module subroutine util_sort_sp ( arr ) implicit none real ( SP ), dimension (:), intent ( inout ) :: arr end subroutine util_sort_sp module subroutine util_sort_index_sp ( arr , ind ) implicit none real ( SP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind end subroutine util_sort_index_sp module subroutine util_sort_dp ( arr ) implicit none real ( DP ), dimension (:), intent ( inout ) :: arr end subroutine util_sort_dp module subroutine util_sort_index_dp ( arr , ind ) implicit none real ( DP ), dimension (:), intent ( in ) :: arr integer ( I4B ), dimension (:), intent ( out ) :: ind end subroutine util_sort_index_dp end interface util_sort interface util_sort_rearrange module subroutine util_sort_rearrange_arr_char_string ( arr , ind , n ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_char_string module subroutine util_sort_rearrange_arr_DP ( arr , ind , n ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_DP module subroutine util_sort_rearrange_arr_DPvec ( arr , ind , n ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_DPvec module subroutine util_sort_rearrange_arr_I4B ( arr , ind , n ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_I4B module subroutine util_sort_rearrange_arr_info ( arr , ind , n ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_info module subroutine util_sort_rearrange_arr_logical ( arr , ind , n ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: arr !! Destination array integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index to rearrange against integer ( I4B ), intent ( in ) :: n !! Number of elements in arr and ind to rearrange end subroutine util_sort_rearrange_arr_logical end interface util_sort_rearrange interface module subroutine util_sort_rearrange_body ( self , ind ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine util_sort_rearrange_body module subroutine util_sort_rearrange_pl ( self , ind ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine util_sort_rearrange_pl module subroutine util_sort_rearrange_tp ( self , ind ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) end subroutine util_sort_rearrange_tp module subroutine util_sort_body ( self , sortby , ascending ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine util_sort_body module subroutine util_sort_pl ( self , sortby , ascending ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine util_sort_pl module subroutine util_sort_tp ( self , sortby , ascending ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order end subroutine util_sort_tp end interface interface util_spill module subroutine util_spill_arr_char_string ( keeps , discards , lspill_list , ldestructive ) implicit none character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep character ( len = STRMAX ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_char_string module subroutine util_spill_arr_DP ( keeps , discards , lspill_list , ldestructive ) implicit none real ( DP ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_DP module subroutine util_spill_arr_DPvec ( keeps , discards , lspill_list , ldestructive ) implicit none real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: keeps !! Array of values to keep real ( DP ), dimension (:,:), allocatable , intent ( inout ) :: discards !! Array discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_DPvec module subroutine util_spill_arr_I4B ( keeps , discards , lspill_list , ldestructive ) implicit none integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I4B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_I4B module subroutine util_spill_arr_I8B ( keeps , discards , lspill_list , ldestructive ) implicit none integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep integer ( I8B ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_I8B module subroutine util_spill_arr_info ( keeps , discards , lspill_list , ldestructive ) implicit none type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep type ( swiftest_particle_info ), dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_info module subroutine util_spill_arr_logical ( keeps , discards , lspill_list , ldestructive ) implicit none logical , dimension (:), allocatable , intent ( inout ) :: keeps !! Array of values to keep logical , dimension (:), allocatable , intent ( inout ) :: discards !! Array of discards logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discardss logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_arr_logical end interface interface module subroutine util_spill_body ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_body ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_body module subroutine util_spill_encounter ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_encounter ), intent ( inout ) :: self !! Swiftest encounter list class ( swiftest_encounter ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter body by removing the discard list end subroutine util_spill_encounter module subroutine util_spill_pl ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_pl ), intent ( inout ) :: self !! Swiftest massive body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_pl module subroutine util_spill_tp ( self , discards , lspill_list , ldestructive ) implicit none class ( swiftest_tp ), intent ( inout ) :: self !! Swiftest test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not end subroutine util_spill_tp module subroutine util_valid_id_system ( self , param ) implicit none class ( swiftest_nbody_system ), intent ( inout ) :: self !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters end subroutine util_valid_id_system module subroutine util_version () implicit none end subroutine util_version end interface end module swiftest_classes","tags":"","loc":"sourcefile/swiftest_classes.f90.html"},{"title":"lambda_function.f90 – swiftest","text":"This file depends on sourcefile~~lambda_function.f90~~EfferentGraph sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Files dependent on this one sourcefile~~lambda_function.f90~~AfferentGraph sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~symba_collision.f90 symba_collision.f90 sourcefile~symba_collision.f90->sourcefile~swiftest.f90 sourcefile~kick.f90 kick.f90 sourcefile~kick.f90->sourcefile~swiftest.f90 sourcefile~util_exit.f90 util_exit.f90 sourcefile~util_exit.f90->sourcefile~swiftest.f90 sourcefile~util_index.f90 util_index.f90 sourcefile~util_index.f90->sourcefile~swiftest.f90 sourcefile~symba_kick.f90 symba_kick.f90 sourcefile~symba_kick.f90->sourcefile~swiftest.f90 sourcefile~symba_discard.f90 symba_discard.f90 sourcefile~symba_discard.f90->sourcefile~swiftest.f90 sourcefile~tides_spin_step.f90 tides_spin_step.f90 sourcefile~tides_spin_step.f90->sourcefile~swiftest.f90 sourcefile~whm_drift.f90 whm_drift.f90 sourcefile~whm_drift.f90->sourcefile~swiftest.f90 sourcefile~util_rescale.f90 util_rescale.f90 sourcefile~util_rescale.f90->sourcefile~swiftest.f90 sourcefile~symba_step.f90 symba_step.f90 sourcefile~symba_step.f90->sourcefile~swiftest.f90 sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~util_sort.f90 util_sort.f90 sourcefile~util_sort.f90->sourcefile~swiftest.f90 sourcefile~util_get_energy_momentum.f90 util_get_energy_momentum.f90 sourcefile~util_get_energy_momentum.f90->sourcefile~swiftest.f90 sourcefile~operator_cross.f90 operator_cross.f90 sourcefile~operator_cross.f90->sourcefile~swiftest.f90 sourcefile~util_spill.f90 util_spill.f90 sourcefile~util_spill.f90->sourcefile~swiftest.f90 sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~util_copy.f90 util_copy.f90 sourcefile~util_copy.f90->sourcefile~swiftest.f90 sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90~2 orbel.f90 sourcefile~orbel.f90~2->sourcefile~swiftest.f90 sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~netcdf.f90 netcdf.f90 sourcefile~netcdf.f90->sourcefile~swiftest.f90 sourcefile~util_coord.f90 util_coord.f90 sourcefile~util_coord.f90->sourcefile~swiftest.f90 sourcefile~whm_gr.f90 whm_gr.f90 sourcefile~whm_gr.f90->sourcefile~swiftest.f90 sourcefile~tides_getacch_pl.f90 tides_getacch_pl.f90 sourcefile~tides_getacch_pl.f90->sourcefile~swiftest.f90 sourcefile~helio_drift.f90 helio_drift.f90 sourcefile~helio_drift.f90->sourcefile~swiftest.f90 sourcefile~gr.f90 gr.f90 sourcefile~gr.f90->sourcefile~swiftest.f90 sourcefile~util_set.f90 util_set.f90 sourcefile~util_set.f90->sourcefile~swiftest.f90 sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~symba_io.f90 symba_io.f90 sourcefile~symba_io.f90->sourcefile~swiftest.f90 sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~util_append.f90 util_append.f90 sourcefile~util_append.f90->sourcefile~swiftest.f90 sourcefile~util_resize.f90 util_resize.f90 sourcefile~util_resize.f90->sourcefile~swiftest.f90 sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~io.f90 io.f90 sourcefile~io.f90->sourcefile~swiftest.f90 sourcefile~drift.f90 drift.f90 sourcefile~drift.f90->sourcefile~swiftest.f90 sourcefile~helio_gr.f90 helio_gr.f90 sourcefile~helio_gr.f90->sourcefile~swiftest.f90 sourcefile~symba_util.f90 symba_util.f90 sourcefile~symba_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_driver.f90 swiftest_driver.f90 sourcefile~swiftest_driver.f90->sourcefile~swiftest.f90 sourcefile~whm_step.f90 whm_step.f90 sourcefile~whm_step.f90->sourcefile~swiftest.f90 sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_kick.f90 whm_kick.f90 sourcefile~whm_kick.f90->sourcefile~swiftest.f90 sourcefile~util_peri.f90 util_peri.f90 sourcefile~util_peri.f90->sourcefile~swiftest.f90 sourcefile~helio_kick.f90 helio_kick.f90 sourcefile~helio_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_coord.f90 whm_coord.f90 sourcefile~whm_coord.f90->sourcefile~swiftest.f90 sourcefile~discard.f90 discard.f90 sourcefile~discard.f90->sourcefile~swiftest.f90 sourcefile~orbel.f90 orbel.f90 sourcefile~orbel.f90->sourcefile~swiftest.f90 sourcefile~whm_setup.f90 whm_setup.f90 sourcefile~whm_setup.f90->sourcefile~swiftest.f90 sourcefile~user_getacch.f90 user_getacch.f90 sourcefile~user_getacch.f90->sourcefile~swiftest.f90 sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~obl.f90 obl.f90 sourcefile~obl.f90->sourcefile~swiftest.f90 sourcefile~whm_util.f90 whm_util.f90 sourcefile~whm_util.f90->sourcefile~swiftest.f90 sourcefile~util_version.f90 util_version.f90 sourcefile~util_version.f90->sourcefile~swiftest.f90 sourcefile~setup.f90 setup.f90 sourcefile~setup.f90->sourcefile~swiftest.f90 sourcefile~util_fill.f90 util_fill.f90 sourcefile~util_fill.f90->sourcefile~swiftest.f90 sourcefile~util_valid.f90 util_valid.f90 sourcefile~util_valid.f90->sourcefile~swiftest.f90 sourcefile~symba_encounter_check.f90 symba_encounter_check.f90 sourcefile~symba_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~symba_drift.f90 symba_drift.f90 sourcefile~symba_drift.f90->sourcefile~swiftest.f90 sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~helio_setup.f90 helio_setup.f90 sourcefile~helio_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~util_solve.f90 util_solve.f90 sourcefile~util_solve.f90->sourcefile~swiftest.f90 sourcefile~helio_step.f90 helio_step.f90 sourcefile~helio_step.f90->sourcefile~swiftest.f90 sourcefile~util_minimize_bfgs.f90 util_minimize_bfgs.f90 sourcefile~util_minimize_bfgs.f90->sourcefile~swiftest.f90 sourcefile~symba_setup.f90 symba_setup.f90 sourcefile~symba_setup.f90->sourcefile~swiftest.f90 sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Modules lambda_function Source Code lambda_function.f90 Source Code module lambda_function !! author: David A. Minton !! !! Defines a class that can enable objects that behave like lambda functions. !! !! To use this class, define a type of either lambda_obj or lambda_obj_err, or extend the lambda_obj class as necessary, such that an interface that matches the function you wish to lambdafy. !! Once defined, the lambda object can evaluate itself by calling the type-bound procedure eval. e.g. f%eval(x) (or f%eval(x, lerr), f%eval(x, [argument list], etc)) !! !! ******************************************************************************************************************************************************************************************** !! Example - Defining a lambda function f(x,rval,ival) where rval and ival are a real and integer argument, respectively. This implementation uses an abstract interface, though this is not !! strictly necessary unless you want to bind more than one function with the same interface. !! ******************************************************************************************************************************************************************************************** !! !! module lambda_new !!    use swiftest ! This will bring in the lambda_function module !!    ! Define types in a module !! !!    type, extends(lambda_obj) :: lambda_obj_ri_args !!       procedure(abstract_lambda_ri_args), pointer, nopass :: lambdaptr_ri_args => null() !!       real(DP)                                            :: rval     !! Real parameter !!       integer(I4B)                                        :: ival     !! Integer paramete !!    contains !!       generic           :: init => lambda_ri_args_init !!       procedure         :: eval => lambda_ri_args_eval !!       procedure, nopass :: lambda_ri_args_init !!       final             :: lambda_ri_args_destroy !!    end type !!    interface lambda_obj !!       module procedure lambda_ri_args_init !!    end interface !! !!    abstract interface !!       function abstract_lambda_ri_args(x, rval, ival) result(y) !!          !Template for the lambda function !!          import DP, I4B !!          real(DP), dimension(:), intent(in) :: x        !! Dependent variable !!          real(DP),               intent(in) :: rval     !! Real parameter !!          integer(I4B),           intent(in) :: ival     !! Integer parameter !!          real(DP)                           :: y        !! Real result !!       end function !!    end interface !! !! contains !!    type(lambda_obj_ri_args) function lambda_ri_args_init(lambda, rval, ival) !!       !! Initializes the lambda function parameters (can be used as a structure constructor) !!       implicit none !!       procedure(abstract_lambda_ri_args)  :: lambda !! The lambda function that will be passed !!       real(DP),     intent(in)            :: rval     !! Real parameter !!       integer(I4B), intent(in)            :: ival     !! Integer parameter !! !!       ! Assign the procedure passed to this function to the procedure pointer !!       lambda_ri_args_init%lambdaptr_ri_args => lambda !! !!       ! Assign the argument values !!       lambda_ri_args_init%rval = rval !!       lambda_ri_args_init%ival = ival !!       return !!    end function lambda_ri_args_init !! !!    function lambda_ri_args_eval(self, x) result(y) !!       !! Defines the evaluation method, allowing the lambda function to be called with a single argument !!       implicit none !!       class(lambda_obj_ri_args),      intent(inout) :: self !!       real(DP), dimension(:),         intent(in) :: x !!       real(DP)                                   :: y !! !!      if (associated(self%lambdaptr_ri_args)) then !!         y = self%lambdaptr_ri_args(x, self%rval, self%ival) !!          self%lastval = y !!          if (allocated(self%lastarg)) deallocate(self%lastarg) !!          allocate(self%lastarg, source=x) !!       else !!          error stop \"Lambda function was not initialized\" !!       end if !!    end function lambda_ri_args_eval !! !!    subroutine lambda_ri_args_destroy(self) !!       !! Finalizer method. Use this as a template for cleaning up the object upon destruction, such as nullifying pointers !!       implicit none !!       type(lambda_obj_ri_args) :: self !!       if (associated(self%lambdaptr_ri_args)) nullify(self%lambdaptr_ri_args) !!    end subroutine lambda_ri_args_destroy !! !!    function example_function(x, rval, ival) result(y) !!       !This is the actual function you are going to use as the lambda function. Its interface must match the abstract interface previously defined !!       implicit none !!       ! Arguments !!       real(DP), dimension(:), intent(in) :: x !!       real(DP),               intent(in) :: rval !!       integer(I4B),           intent(in) :: ival !!       ! Result !!       real(DP)                           :: y !!       ! Internals !!       integer(I4B) :: i, n !!       n = size(x) !!       y = 42._DP * ival !!       do i = 1, n !!          y = y + x(i)**2 !!       end do !!       return !!    end function example_function !! end module lambda_new !! !! program usage !!    use swiftest !!    use lambda_new !!    implicit none !!    type(lambda_obj_ri_args) :: f !!    real(DP) :: sigma_par !!    integer(I4B) :: iwonky, i,j !!    real(DP), dimension(12) :: xarr !! !!    sigma_par = 3.14_DP !!    iwonky = 13 !! !!    f = lambda_obj(example_function, sigma_par, iwonky) !!    do i = 1, 10 !!       xarr(:) = [(j * 0.25_DP / i, j=1, 12)] !!       write(*,*) i,f%eval(xarr) !!    end do !! end program usage !! ******************************************************************************************************************************************************************************************** use swiftest_globals implicit none public type :: lambda_obj !! Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers procedure ( lambda0 ), pointer , nopass :: lambdaptr => null () real ( DP ) :: lastval real ( DP ), dimension (:), allocatable :: lastarg contains generic :: init => lambda_init_0 procedure :: eval => lambda_eval_0 procedure , nopass :: lambda_init_0 final :: lambda_destroy end type type , extends ( lambda_obj ) :: lambda_obj_err !! Extended class for an lambda function object. This object takes allows for the return of a logical error flag during evaluation of the function. procedure ( lambda0err ), pointer , nopass :: lambdaptr_err => null () logical :: lerr contains generic :: init => lambda_init_0_err procedure :: eval => lambda_eval_0_err procedure , nopass :: lambda_init_0_err end type type , extends ( lambda_obj ) :: lambda_obj_tvar !! Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers procedure ( lambda0tvar ), pointer , nopass :: lambdaptr_tvar => null () contains generic :: init => lambda_init_tvar procedure :: evalt => lambda_eval_tvar procedure , nopass :: lambda_init_tvar end type interface lambda_obj module procedure lambda_init_0 module procedure lambda_init_0_err module procedure lambda_init_tvar end interface abstract interface function lambda0 ( x ) result ( y ) ! Template for a 0 argument function import DP real ( DP ), dimension (:), intent ( in ) :: x real ( DP ) :: y end function function lambda0err ( x , lerr ) result ( y ) ! Template for a 0 argument function that returns an error value import DP real ( DP ), dimension (:), intent ( in ) :: x logical , intent ( out ) :: lerr real ( DP ) :: y end function function lambda0tvar ( x , t ) result ( y ) ! Template for a 0 argument function that returns an error value import DP real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t real ( DP ), dimension (:), allocatable :: y end function end interface contains type ( lambda_obj ) function lambda_init_0 ( lambda ) implicit none ! Arguments procedure ( lambda0 ) :: lambda lambda_init_0 % lambdaptr => lambda return end function lambda_init_0 type ( lambda_obj_err ) function lambda_init_0_err ( lambda , lerr ) implicit none ! Arguments procedure ( lambda0err ) :: lambda logical , intent ( in ) :: lerr lambda_init_0_err % lambdaptr_err => lambda lambda_init_0_err % lerr = lerr return end function lambda_init_0_err type ( lambda_obj_tvar ) function lambda_init_tvar ( lambda , t ) implicit none ! Arguments procedure ( lambda0tvar ) :: lambda real ( DP ), intent ( in ) :: t lambda_init_tvar % lambdaptr_tvar => lambda return end function lambda_init_tvar function lambda_eval_0 ( self , x ) result ( y ) implicit none ! Arguments class ( lambda_obj ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x ! Result real ( DP ) :: y if ( associated ( self % lambdaptr )) then y = self % lambdaptr ( x ) self % lastval = y if ( allocated ( self % lastarg )) deallocate ( self % lastarg ) allocate ( self % lastarg , source = x ) else error stop \"Lambda function was not initialized\" end if end function lambda_eval_0 function lambda_eval_0_err ( self , x ) result ( y ) implicit none ! Arguments class ( lambda_obj_err ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x ! Result real ( DP ) :: y if ( associated ( self % lambdaptr_err )) then y = self % lambdaptr_err ( x , self % lerr ) self % lastval = y if ( allocated ( self % lastarg )) deallocate ( self % lastarg ) allocate ( self % lastarg , source = x ) else error stop \"Lambda function was not initialized\" end if end function lambda_eval_0_err function lambda_eval_tvar ( self , x , t ) result ( y ) implicit none ! Arguments class ( lambda_obj_tvar ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: t ! Result real ( DP ), dimension (:), allocatable :: y if ( associated ( self % lambdaptr_tvar )) then y = self % lambdaptr_tvar ( x , t ) else error stop \"Lambda function was not initialized\" end if end function lambda_eval_tvar subroutine lambda_destroy ( self ) implicit none type ( lambda_obj ) :: self if ( associated ( self % lambdaptr )) nullify ( self % lambdaptr ) end subroutine lambda_destroy end module lambda_function","tags":"","loc":"sourcefile/lambda_function.f90.html"},{"title":"fraggle_util.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_util.f90~~EfferentGraph sourcefile~fraggle_util.f90 fraggle_util.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_util.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_util.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_util Source Code fraggle_util.f90 Source Code submodule ( fraggle_classes ) s_fraggle_util use swiftest contains module subroutine fraggle_util_add_fragments_to_system ( frag , colliders , system , param ) !! Author: David A. Minton !! !! Adds fragments to the temporary system pl object implicit none ! Arguments class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters ! Internals integer ( I4B ) :: i , npl_before , npl_after logical , dimension (:), allocatable :: lexclude associate ( nfrag => frag % nbody , pl => system % pl , cb => system % cb ) npl_after = pl % nbody npl_before = npl_after - nfrag allocate ( lexclude ( npl_after )) pl % status ( npl_before + 1 : npl_after ) = ACTIVE pl % mass ( npl_before + 1 : npl_after ) = frag % mass ( 1 : nfrag ) pl % Gmass ( npl_before + 1 : npl_after ) = frag % mass ( 1 : nfrag ) * param % GU pl % radius ( npl_before + 1 : npl_after ) = frag % radius ( 1 : nfrag ) do concurrent ( i = 1 : nfrag ) pl % xb (:, npl_before + i ) = frag % xb (:, i ) pl % vb (:, npl_before + i ) = frag % vb (:, i ) pl % xh (:, npl_before + i ) = frag % xb (:, i ) - cb % xb (:) pl % vh (:, npl_before + i ) = frag % vb (:, i ) - cb % vb (:) end do if ( param % lrotation ) then pl % Ip (:, npl_before + 1 : npl_after ) = frag % Ip (:, 1 : nfrag ) pl % rot (:, npl_before + 1 : npl_after ) = frag % rot (:, 1 : nfrag ) end if ! This will remove the colliders from the system since we've replaced them with fragments lexclude ( 1 : npl_after ) = . false . lexclude ( colliders % idx ( 1 : colliders % ncoll )) = . true . where ( lexclude ( 1 : npl_after )) pl % status ( 1 : npl_after ) = INACTIVE elsewhere pl % status ( 1 : npl_after ) = ACTIVE endwhere end associate return end subroutine fraggle_util_add_fragments_to_system module subroutine fraggle_util_ang_mtm ( self ) !! Author: David A. Minton !! !! Calcualtes the current angular momentum of the fragments implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object ! Internals integer ( I4B ) :: i associate ( frag => self , nfrag => self % nbody ) frag % L_orbit (:) = 0.0_DP frag % L_spin (:) = 0.0_DP do i = 1 , nfrag frag % L_orbit (:) = frag % L_orbit (:) + frag % mass ( i ) * ( frag % x_coll (:, i ) . cross . frag % v_coll (:, i )) frag % L_spin (:) = frag % L_spin (:) + frag % mass ( i ) * frag % radius ( i ) ** 2 * frag % Ip (:, i ) * frag % rot (:, i ) end do end associate return end subroutine fraggle_util_ang_mtm module subroutine fraggle_util_construct_temporary_system ( frag , system , param , tmpsys , tmpparam ) !! Author: David A. Minton !! !! Constructs a temporary internal system consisting of active bodies and additional fragments. This internal temporary system is used to calculate system energy with and without fragments !! and optionally including fragments. implicit none ! Arguments class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Original swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters class ( swiftest_nbody_system ), allocatable , intent ( out ) :: tmpsys !! Output temporary swiftest nbody system object class ( swiftest_parameters ), allocatable , intent ( out ) :: tmpparam !! Output temporary configuration run parameters ! Internals logical , dimension (:), allocatable :: linclude integer ( I4B ) :: npl_tot associate ( nfrag => frag % nbody , pl => system % pl , npl => system % pl % nbody , cb => system % cb ) ! Set up a new system based on the original if ( allocated ( tmpparam )) deallocate ( tmpparam ) if ( allocated ( tmpsys )) deallocate ( tmpsys ) allocate ( tmpparam , source = param ) call setup_construct_system ( tmpsys , tmpparam ) ! No test particles necessary for energy/momentum calcs call tmpsys % tp % setup ( 0 , param ) ! Replace the empty central body object with a copy of the original deallocate ( tmpsys % cb ) allocate ( tmpsys % cb , source = cb ) ! Make space for the fragments npl_tot = npl + nfrag call tmpsys % pl % setup ( npl_tot , tmpparam ) allocate ( linclude ( npl_tot )) ! Fill up the temporary system with all of the original bodies, leaving the spaces for fragments empty until we add them in later linclude ( 1 : npl ) = . true . linclude ( npl + 1 : npl_tot ) = . false . call tmpsys % pl % fill ( pl , linclude ) ! Scale the temporary system to the natural units of the current Fraggle calculation call tmpsys % rescale ( tmpparam , frag % mscale , frag % dscale , frag % tscale ) end associate return end subroutine fraggle_util_construct_temporary_system module subroutine fraggle_util_get_energy_momentum ( self , colliders , system , param , lbefore ) !! Author: David A. Minton !! !! Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) !! This subrourtine works by building a temporary internal massive body object out of the non-excluded bodies and optionally with fragments appended. !! This will get passed to the energy calculation subroutine so that energy is computed exactly the same way is it is in the main program. !! This will temporarily expand the massive body object in a temporary system object called tmpsys to feed it into symba_energy implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters logical , intent ( in ) :: lbefore !! Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa ! Internals integer ( I4B ) :: i , nplm logical , dimension (:), allocatable :: lexclude logical :: lk_plpl logical , save :: ladd_frags class ( swiftest_nbody_system ), allocatable , save :: tmpsys class ( swiftest_parameters ), allocatable , save :: tmpparam integer ( I4B ) :: npl_before , npl_after associate ( frag => self , nfrag => self % nbody , pl => system % pl , cb => system % cb ) ! Because we're making a copy of the massive body object with the excludes/fragments appended, we need to deallocate the ! big k_plpl array and recreate it when we're done, otherwise we run the risk of blowing up the memory by ! allocating two of these ginormous arrays simulteouously. This is not particularly efficient, but as this ! subroutine should be called relatively infrequently, it shouldn't matter too much. npl_before = pl % nbody npl_after = npl_before + nfrag ! Build the exluded body logical mask allocate ( lexclude ( npl_after )) if ( lbefore ) then lexclude ( 1 : npl_before ) = . false . lexclude ( npl_before + 1 : npl_after ) = . true . call fraggle_util_construct_temporary_system ( frag , system , param , tmpsys , tmpparam ) else lexclude ( 1 : npl_after ) = . false . lexclude ( colliders % idx ( 1 : colliders % ncoll )) = . true . if (. not . allocated ( tmpsys )) then write ( * , * ) \"Error in fraggle_util_get_energy_momentum. This must be called with lbefore=.true. at least once before calling it with lbefore=.false.\" call util_exit ( FAILURE ) end if call fraggle_util_add_fragments_to_system ( frag , colliders , tmpsys , tmpparam ) end if call tmpsys % pl % index ( param ) call tmpsys % get_energy_and_momentum ( param ) ! Calculate the current fragment energy and momentum balances if ( lbefore ) then frag % Lorbit_before (:) = tmpsys % Lorbit (:) frag % Lspin_before (:) = tmpsys % Lspin (:) frag % Ltot_before (:) = tmpsys % Ltot (:) frag % ke_orbit_before = tmpsys % ke_orbit frag % ke_spin_before = tmpsys % ke_spin frag % pe_before = tmpsys % pe frag % Etot_before = tmpsys % te else frag % Lorbit_after (:) = tmpsys % Lorbit (:) frag % Lspin_after (:) = tmpsys % Lspin (:) frag % Ltot_after (:) = tmpsys % Ltot (:) frag % ke_orbit_after = tmpsys % ke_orbit frag % ke_spin_after = tmpsys % ke_spin frag % pe_after = tmpsys % pe frag % Etot_after = tmpsys % te end if end associate return end subroutine fraggle_util_get_energy_momentum module subroutine fraggle_util_restructure ( self , colliders , try , f_spin , r_max_start ) !! Author: David A. Minton !! !! Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object integer ( I4B ), intent ( in ) :: try !! The current number of times Fraggle has tried to find a solution real ( DP ), intent ( inout ) :: f_spin !! Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real ( DP ), intent ( inout ) :: r_max_start !! The maximum radial distance that the position calculation starts with. This increases after a failed attempt ! Internals integer ( I4B ) :: i real ( DP ), save :: ke_tot_deficit , r_max_start_old , ke_avg_deficit_old real ( DP ), dimension (:), allocatable :: m_frag_new , rad_frag_new real ( DP ), dimension (:,:), allocatable :: xb_frag_new , vb_frag_new , Ip_frag_new , rot_frag_new real ( DP ) :: delta_r , delta_r_max , ke_avg_deficit real ( DP ), parameter :: ke_avg_deficit_target = 0.0_DP ! Introduce a bit of noise in the radius determination so we don't just flip flop between similar failed positions associate ( frag => self ) call random_number ( delta_r_max ) delta_r_max = sum ( colliders % radius (:)) * ( 1.0_DP + 2e-1_DP * ( delta_r_max - 0.5_DP )) if ( try == 1 ) then ke_tot_deficit = - ( frag % ke_budget - frag % ke_orbit - frag % ke_spin ) ke_avg_deficit = ke_tot_deficit delta_r = delta_r_max else ! Linearly interpolate the last two failed solution ke deficits to find a new distance value to try ke_tot_deficit = ke_tot_deficit - ( frag % ke_budget - frag % ke_orbit - frag % ke_spin ) ke_avg_deficit = ke_tot_deficit / try delta_r = ( r_max_start - r_max_start_old ) * ( ke_avg_deficit_target - ke_avg_deficit_old ) / ( ke_avg_deficit - ke_avg_deficit_old ) if ( abs ( delta_r ) > delta_r_max ) delta_r = sign ( delta_r_max , delta_r ) end if r_max_start_old = r_max_start r_max_start = r_max_start + delta_r ! The larger lever arm can help if the problem is in the angular momentum step ke_avg_deficit_old = ke_avg_deficit if ( f_spin > epsilon ( 1.0_DP )) then ! Try reducing the fraction in spin f_spin = f_spin / 2 else f_spin = 0.0_DP end if end associate return end subroutine fraggle_util_restructure module subroutine fraggle_util_shift_vector_to_origin ( m_frag , vec_frag ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Adjusts the position or velocity of the fragments as needed to align them with the origin implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:,:), intent ( inout ) :: vec_frag !! Fragment positions or velocities in the center of mass frame ! Internals real ( DP ), dimension ( NDIM ) :: mvec_frag , COM_offset integer ( I4B ) :: i , nfrag real ( DP ) :: mtot mvec_frag (:) = 0.0_DP mtot = sum ( m_frag ) nfrag = size ( m_frag ) do i = 1 , nfrag mvec_frag = mvec_frag (:) + vec_frag (:, i ) * m_frag ( i ) end do COM_offset (:) = - mvec_frag (:) / mtot do i = 1 , nfrag vec_frag (:, i ) = vec_frag (:, i ) + COM_offset (:) end do return end subroutine fraggle_util_shift_vector_to_origin module function fraggle_util_vmag_to_vb ( v_r_mag , v_r_unit , v_t_mag , v_t_unit , m_frag , vcom ) result ( vb ) !! Author: David A. Minton !! !! Converts radial and tangential velocity magnitudes into barycentric velocity implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: v_r_mag !! Unknown radial component of fragment velocity vector real ( DP ), dimension (:), intent ( in ) :: v_t_mag !! Tangential component of velocity vector set previously by angular momentum constraint real ( DP ), dimension (:,:), intent ( in ) :: v_r_unit , v_t_unit !! Radial and tangential unit vectors for each fragment real ( DP ), dimension (:), intent ( in ) :: m_frag !! Fragment masses real ( DP ), dimension (:), intent ( in ) :: vcom !! Barycentric velocity of collisional system center of mass ! Result real ( DP ), dimension (:,:), allocatable :: vb ! Internals integer ( I4B ) :: i , nfrag allocate ( vb , mold = v_r_unit ) ! Make sure the velocity magnitude stays positive nfrag = size ( m_frag ) do i = 1 , nfrag vb (:, i ) = abs ( v_r_mag ( i )) * v_r_unit (:, i ) end do ! In order to keep satisfying the kinetic energy constraint, we must shift the origin of the radial component of the velocities to the center of mass call fraggle_util_shift_vector_to_origin ( m_frag , vb ) do i = 1 , nfrag vb (:, i ) = vb (:, i ) + v_t_mag ( i ) * v_t_unit (:, i ) + vcom (:) end do return end function fraggle_util_vmag_to_vb end submodule s_fraggle_util","tags":"","loc":"sourcefile/fraggle_util.f90.html"},{"title":"fraggle_io.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_io.f90~~EfferentGraph sourcefile~fraggle_io.f90 fraggle_io.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_io.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_io.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_io Source Code fraggle_io.f90 Source Code submodule ( fraggle_classes ) s_fraggle_io use swiftest contains module subroutine fraggle_io_log_generate ( frag ) !! author: David A. Minton !! !! Writes a log of the results of the fragment generation implicit none ! Arguments class ( fraggle_fragments ), intent ( in ) :: frag ! Internals integer ( I4B ) :: i character ( STRMAX ) :: errmsg character ( len =* ), parameter :: fmtlabel = \"(A14,10(ES11.4,1X,:))\" open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"           Fraggle fragment generation results\" write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , \"(' dL_tot should be very small' )\" ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' dL_tot      |' , (. mag .( frag % Ltot_after (:) - frag % Ltot_before (:))) / (. mag . frag % Ltot_before (:)) write ( FRAGGLE_LOG_UNIT , \"(' dE_tot should be negative and equal to Qloss' )\" ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' dE_tot      |' , ( frag % Etot_after - frag % Etot_before ) / abs ( frag % Etot_before ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' Qloss       |' , - frag % Qloss / abs ( frag % Etot_before ) write ( FRAGGLE_LOG_UNIT , fmtlabel ) ' dE - Qloss  |' , ( frag % Etot_after - frag % Etot_before + frag % Qloss ) / abs ( frag % Etot_before ) write ( FRAGGLE_LOG_UNIT , \"(' -------------------------------------------------------------------------------------')\" ) write ( FRAGGLE_LOG_UNIT , * ) \"Individual fragment values (collisional system natural units)\" write ( FRAGGLE_LOG_UNIT , * ) \"mass\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % mass ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"x_coll\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % x_coll (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"v_coll\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % v_coll (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"xb\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % xb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"vb\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % vb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"rot\" do i = 1 , frag % nbody write ( FRAGGLE_LOG_UNIT , * ) i , frag % rot (:, i ) end do close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle message to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_generate module subroutine fraggle_io_log_one_message ( message ) !! author: David A. Minton !! !! Writes a single message to the fraggle log file implicit none ! Arguments character ( len =* ), intent ( in ) :: message ! Internals character ( STRMAX ) :: errmsg open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) trim ( adjustl ( message )) close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle message to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_one_message module subroutine fraggle_io_log_pl ( pl , param ) !! author: David A. Minton !! !! Writes a single message to the fraggle log file implicit none ! Arguments class ( swiftest_pl ), intent ( in ) :: pl !! Swiftest massive body object (only the new bodies generated in a collision) class ( swiftest_parameters ), intent ( in ) :: param !! Current swiftest run configuration parameters ! Internals integer ( I4B ) :: i character ( STRMAX ) :: errmsg open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"           Fraggle fragment final body properties\" write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"id, name\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % id ( i ), pl % info ( i )% name end do write ( FRAGGLE_LOG_UNIT , * ) \"mass, Gmass\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % mass ( i ), pl % Gmass ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"radius\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % radius ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"xb\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % xb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"vb\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % vb (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"xh\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % xh (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"vh\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % vh (:, i ) end do if ( param % lrotation ) then write ( FRAGGLE_LOG_UNIT , * ) \"rot\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % rot (:, i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"Ip\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % Ip (:, i ) end do end if if ( param % ltides ) then write ( FRAGGLE_LOG_UNIT , * ) \"Q\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % Q ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"k2\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % k2 ( i ) end do write ( FRAGGLE_LOG_UNIT , * ) \"tlag\" do i = 1 , pl % nbody write ( FRAGGLE_LOG_UNIT , * ) i , pl % tlag ( i ) end do end if close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle message to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_pl module subroutine fraggle_io_log_regime ( colliders , frag ) !! author: David A. Minton !! !! Writes a log of the results of the collisional regime determination implicit none ! Arguments class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object class ( fraggle_fragments ), intent ( in ) :: frag !! Fraggle fragment object ! Internals character ( STRMAX ) :: errmsg open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = 'OLD' , position = 'APPEND' , form = 'FORMATTED' , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"           Fraggle collisional regime determination results\" write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"----------------------- Collider information -----------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"True number of colliders : \" , colliders % ncoll write ( FRAGGLE_LOG_UNIT , * ) \"Index list of true colliders  : \" , colliders % idx ( 1 : colliders % ncoll ) write ( FRAGGLE_LOG_UNIT , * ) \"-------------------- Two-body equialent values ---------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"mass1    : \" , colliders % mass ( 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"radius1  : \" , colliders % radius ( 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"xb1      : \" , colliders % xb (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"vb1      : \" , colliders % vb (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"rot1     : \" , colliders % rot (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"Ip1      : \" , colliders % Ip (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_spin1  : \" , colliders % L_spin (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_orbit1 : \" , colliders % L_orbit (:, 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"mass2    : \" , colliders % mass ( 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"radius2  : \" , colliders % radius ( 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"xb2      : \" , colliders % xb (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"vb2      : \" , colliders % vb (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"rot2     : \" , colliders % rot (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"Ip2      : \" , colliders % Ip (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_spin2  : \" , colliders % L_spin (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"L_orbit2 : \" , colliders % L_orbit (:, 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"------------------------------ Regime -----------------------------\" select case ( frag % regime ) case ( COLLRESOLVE_REGIME_MERGE ) write ( FRAGGLE_LOG_UNIT , * ) \"Merge\" case ( COLLRESOLVE_REGIME_DISRUPTION ) write ( FRAGGLE_LOG_UNIT , * ) \"Disruption\" case ( COLLRESOLVE_REGIME_SUPERCATASTROPHIC ) write ( FRAGGLE_LOG_UNIT , * ) \"Supercatastrophic disruption\" case ( COLLRESOLVE_REGIME_GRAZE_AND_MERGE ) write ( FRAGGLE_LOG_UNIT , * ) \"Graze and merge\" case ( COLLRESOLVE_REGIME_HIT_AND_RUN ) write ( FRAGGLE_LOG_UNIT , * ) \"Hit and run\" end select write ( FRAGGLE_LOG_UNIT , * ) \"----------------------- Fragment information ----------------------\" write ( FRAGGLE_LOG_UNIT , * ) \"Total mass of fragments      : \" , frag % mtot write ( FRAGGLE_LOG_UNIT , * ) \"Largest fragment mass        : \" , frag % mass_dist ( 1 ) write ( FRAGGLE_LOG_UNIT , * ) \"Second-largest fragment mass : \" , frag % mass_dist ( 2 ) write ( FRAGGLE_LOG_UNIT , * ) \"Remaining fragment mass      : \" , frag % mass_dist ( 3 ) write ( FRAGGLE_LOG_UNIT , * ) \"Center of mass position      : \" , frag % xbcom (:) write ( FRAGGLE_LOG_UNIT , * ) \"Center of mass velocity      : \" , frag % vbcom (:) write ( FRAGGLE_LOG_UNIT , * ) \"Energy loss                  : \" , frag % Qloss write ( FRAGGLE_LOG_UNIT , * ) \"--------------------------------------------------------------------\" close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle regime information to log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_regime module subroutine fraggle_io_log_start ( param ) !! author: David A. Minton !! !! Checks to see if the Fraggle log file needs to be replaced if this is a new run, or appended if this is a restarted run implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param ! Internals character ( STRMAX ) :: errmsg logical :: fileExists inquire ( file = FRAGGLE_LOG_OUT , exist = fileExists ) if (. not . param % lrestart . or . . not . fileExists ) then open ( unit = FRAGGLE_LOG_UNIT , file = FRAGGLE_LOG_OUT , status = \"REPLACE\" , err = 667 , iomsg = errmsg ) write ( FRAGGLE_LOG_UNIT , * , err = 667 , iomsg = errmsg ) \"Fraggle logfile\" end if close ( FRAGGLE_LOG_UNIT ) return 667 continue write ( * , * ) \"Error writing Fraggle log file: \" // trim ( adjustl ( errmsg )) end subroutine fraggle_io_log_start end submodule s_fraggle_io","tags":"","loc":"sourcefile/fraggle_io.f90.html"},{"title":"fraggle_generate.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_generate.f90~~EfferentGraph sourcefile~fraggle_generate.f90 fraggle_generate.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_generate.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_generate.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_generate Source Code fraggle_generate.f90 Source Code submodule ( fraggle_classes ) s_fraggle_generate use swiftest integer ( I4B ), parameter :: NFRAG_MIN = 7 !! The minimum allowable number of fragments (set to 6 because that's how many unknowns are needed in the tangential velocity calculation) real ( DP ), parameter :: F_SPIN_FIRST = 0.05_DP !! The initial try value of the fraction of energy or momenum in spin (whichever has the lowest kinetic energy) real ( DP ), parameter :: FRAGGLE_LTOL = 10 * epsilon ( 1.0_DP ) real ( DP ), parameter :: FRAGGLE_ETOL = 1e-8_DP contains module subroutine fraggle_generate_fragments ( self , colliders , system , param , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Generates a system of fragments in barycentric coordinates that conserves energy and momentum. use , intrinsic :: ieee_exceptions implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle system object the outputs will be the fragmentation class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle colliders object containing the two-body equivalent values of the colliding bodies class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters logical , intent ( out ) :: lfailure !! Answers the question: Should this have been a merger instead? ! Internals integer ( I4B ) :: i integer ( I4B ) :: try real ( DP ) :: r_max_start , f_spin , dEtot , dLmag integer ( I4B ), parameter :: MAXTRY = 100 logical :: lk_plpl logical , dimension ( size ( IEEE_ALL )) :: fpe_halting_modes , fpe_quiet_modes logical , dimension ( size ( IEEE_USUAL )) :: fpe_flag character ( len = STRMAX ) :: message ! The minimization and linear solvers can sometimes lead to floating point exceptions. Rather than halting the code entirely if this occurs, we ! can simply fail the attempt and try again. So we need to turn off any floating point exception halting modes temporarily call ieee_get_halting_mode ( IEEE_ALL , fpe_halting_modes ) ! Save the current halting modes so we can turn them off temporarily fpe_quiet_modes (:) = . false . call ieee_set_halting_mode ( IEEE_ALL , fpe_quiet_modes ) associate ( frag => self , nfrag => self % nbody , pl => system % pl ) write ( message , * ) nfrag call fraggle_io_log_one_message ( \"Fraggle generating \" // trim ( adjustl ( message )) // \" fragments.\" ) if ( nfrag < NFRAG_MIN ) then write ( message , * ) \"Fraggle needs at least \" , NFRAG_MIN , \" fragments, but only \" , nfrag , \" were given.\" call fraggle_io_log_one_message ( message ) lfailure = . true . return end if f_spin = F_SPIN_FIRST lk_plpl = allocated ( pl % k_plpl ) if ( lk_plpl ) deallocate ( pl % k_plpl ) call frag % set_natural_scale ( colliders ) call frag % reset () ! Calculate the initial energy of the system without the collisional family call frag % get_energy_and_momentum ( colliders , system , param , lbefore = . true .) ! Start out the fragments close to the initial separation distance. This will be increased if there is any overlap or we fail to find a solution r_max_start = 1 * norm2 ( colliders % xb (:, 2 ) - colliders % xb (:, 1 )) lfailure = . false . try = 1 do while ( try < MAXTRY ) write ( message , * ) try call fraggle_io_log_one_message ( \"Fraggle try \" // trim ( adjustl ( message ))) if ( lfailure ) then call frag % restructure ( colliders , try , f_spin , r_max_start ) call frag % reset () try = try + 1 end if lfailure = . false . call ieee_set_flag ( ieee_all , . false .) ! Set all fpe flags to quiet call fraggle_generate_pos_vec ( frag , colliders , r_max_start ) call frag % set_coordinate_system ( colliders ) ! Initial velocity guess will be the barycentric velocity of the colliding system so that the budgets are based on the much smaller collisional-frame velocities do concurrent ( i = 1 : nfrag ) frag % vb (:, i ) = frag % vbcom (:) end do call frag % get_energy_and_momentum ( colliders , system , param , lbefore = . false .) call frag % set_budgets ( colliders ) call fraggle_generate_spins ( frag , colliders , f_spin , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle failed to find spins\" ) cycle end if call fraggle_generate_tan_vel ( frag , colliders , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle failed to find tangential velocities\" ) cycle end if call fraggle_generate_rad_vel ( frag , colliders , lfailure ) if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle failed to find radial velocities\" ) cycle end if call frag % get_energy_and_momentum ( colliders , system , param , lbefore = . false .) dEtot = frag % Etot_after - frag % Etot_before dLmag = . mag . ( frag % Ltot_after (:) - frag % Ltot_before (:)) lfailure = (( abs ( dEtot + frag % Qloss ) > FRAGGLE_ETOL ) . or . ( dEtot > 0.0_DP )) if ( lfailure ) then write ( message , * ) dEtot , abs ( dEtot + frag % Qloss ) / FRAGGLE_ETOL call fraggle_io_log_one_message ( \"Fraggle failed due to high energy error: \" // trim ( adjustl ( message ))) cycle end if lfailure = (( abs ( dLmag ) / (. mag . frag % Ltot_before )) > FRAGGLE_LTOL ) if ( lfailure ) then write ( message , * ) dLmag / (. mag . frag % Ltot_before (:)) call fraggle_io_log_one_message ( \"Fraggle failed due to high angular momentum error: \" // trim ( adjustl ( message ))) cycle end if ! Check if any of the usual floating point exceptions happened, and fail the try if so call ieee_get_flag ( ieee_usual , fpe_flag ) lfailure = any ( fpe_flag ) if (. not . lfailure ) exit write ( message , * ) \"Fraggle failed due to a floating point exception: \" , fpe_flag call fraggle_io_log_one_message ( message ) end do write ( message , * ) try if ( lfailure ) then call fraggle_io_log_one_message ( \"Fraggle fragment generation failed after \" // trim ( adjustl ( message )) // \" tries\" ) else call fraggle_io_log_one_message ( \"Fraggle fragment generation succeeded after \" // trim ( adjustl ( message )) // \" tries\" ) call fraggle_io_log_generate ( frag ) end if call frag % set_original_scale ( colliders ) ! Restore the big array if ( lk_plpl ) call pl % index ( param ) end associate call ieee_set_halting_mode ( IEEE_ALL , fpe_halting_modes ) ! Save the current halting modes so we can turn them off temporarily return end subroutine fraggle_generate_fragments subroutine fraggle_generate_pos_vec ( frag , colliders , r_max_start ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Initializes the orbits of the fragments around the center of mass. The fragments are initially placed on a plane defined by the !! pre-impact angular momentum. They are distributed on an ellipse surrounding the center of mass. !! The initial positions do not conserve energy or momentum, so these need to be adjusted later. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object real ( DP ), intent ( in ) :: r_max_start !! Initial guess for the starting maximum radial distance of fragments ! Internals real ( DP ) :: dis , rad , r_max logical , dimension (:), allocatable :: loverlap integer ( I4B ) :: i , j associate ( nfrag => frag % nbody ) allocate ( loverlap ( nfrag )) ! Place the fragments into a region that is big enough that we should usually not have overlapping bodies ! An overlapping bodies will collide in the next time step, so it's not a major problem if they do (it just slows the run down) r_max = r_max_start rad = sum ( colliders % radius (:)) ! We will treat the first two fragments of the list as special cases. They get initialized the maximum distances apart along the original impactor distance vector. ! This is done because in a regular disruption, the first body is the largest, the second the second largest, and the rest are smaller equal-mass fragments. call random_number ( frag % x_coll (:, 3 : nfrag )) loverlap (:) = . true . do while ( any ( loverlap ( 3 : nfrag ))) frag % x_coll (:, 1 ) = colliders % xb (:, 1 ) - frag % xbcom (:) frag % x_coll (:, 2 ) = colliders % xb (:, 2 ) - frag % xbcom (:) r_max = r_max + 0.1_DP * rad do i = 3 , nfrag if ( loverlap ( i )) then call random_number ( frag % x_coll (:, i )) frag % x_coll (:, i ) = 2 * ( frag % x_coll (:, i ) - 0.5_DP ) * r_max end if end do loverlap (:) = . false . do j = 1 , nfrag do i = j + 1 , nfrag dis = norm2 ( frag % x_coll (:, j ) - frag % x_coll (:, i )) loverlap ( i ) = loverlap ( i ) . or . ( dis <= ( frag % radius ( i ) + frag % radius ( j ))) end do end do end do call fraggle_util_shift_vector_to_origin ( frag % mass , frag % x_coll ) call frag % set_coordinate_system ( colliders ) do i = 1 , nfrag frag % xb (:, i ) = frag % x_coll (:, i ) + frag % xbcom (:) end do frag % xbcom (:) = 0.0_DP do i = 1 , nfrag frag % xbcom (:) = frag % xbcom (:) + frag % mass ( i ) * frag % xb (:, i ) end do frag % xbcom (:) = frag % xbcom (:) / frag % mtot end associate return end subroutine fraggle_generate_pos_vec subroutine fraggle_generate_spins ( frag , colliders , f_spin , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Calculates the spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. !! !! A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object real ( DP ), intent ( in ) :: f_spin !! Fraction of energy or momentum that goes into spin (whichever gives the lowest kinetic energy) logical , intent ( out ) :: lfailure !! Logical flag indicating whether this step fails or succeeds! ! Internals real ( DP ), dimension ( NDIM ) :: L_remainder , rot_L , rot_ke integer ( I4B ) :: i character ( len = STRMAX ) :: message associate ( nfrag => frag % nbody ) lfailure = . false . ! Start the first two bodies with the same rotation as the original two impactors, then distribute the remaining angular momentum among the rest L_remainder (:) = frag % L_budget (:) frag % rot (:,:) = 0.0_DP frag % ke_spin = 0.0_DP do i = 1 , nfrag ! Convert a fraction (f_spin) of either the remaining angular momentum or kinetic energy budget into spin, whichever gives the smaller rotation so as not to blow any budgets rot_ke (:) = sqrt ( 2 * f_spin * frag % ke_budget / ( nfrag * frag % mass ( i ) * frag % radius ( i ) ** 2 * frag % Ip ( 3 , i ))) * L_remainder (:) / norm2 ( L_remainder (:)) rot_L (:) = f_spin * L_remainder (:) / ( nfrag * frag % mass ( i ) * frag % radius ( i ) ** 2 * frag % Ip ( 3 , i )) if ( norm2 ( rot_ke ) < norm2 ( rot_L )) then frag % rot (:, i ) = rot_ke (:) else frag % rot (:, i ) = rot_L (:) end if frag % ke_spin = frag % ke_spin + frag % mass ( i ) * frag % Ip ( 3 , i ) * frag % radius ( i ) ** 2 * dot_product ( frag % rot (:, i ), frag % rot (:, i )) end do frag % ke_spin = 0.5_DP * frag % ke_spin lfailure = (( frag % ke_budget - frag % ke_spin - frag % ke_orbit ) < 0.0_DP ) if ( lfailure ) then call fraggle_io_log_one_message ( \" \" ) call fraggle_io_log_one_message ( \"Spin failure diagnostics\" ) write ( message , * ) frag % ke_budget call fraggle_io_log_one_message ( \"ke_budget     : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_spin call fraggle_io_log_one_message ( \"ke_spin       : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_orbit call fraggle_io_log_one_message ( \"ke_orbit      : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget - frag % ke_spin - frag % ke_orbit call fraggle_io_log_one_message ( \"ke_remainder  : \" // trim ( adjustl ( message ))) end if end associate return end subroutine fraggle_generate_spins subroutine fraggle_generate_tan_vel ( frag , colliders , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Adjusts the tangential velocities and spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. !! This procedure works in several stages, with a goal to solve the angular and linear momentum constraints on the fragments, while still leaving a positive balance of !! our fragment kinetic energy (frag%ke_budget) that we can put into the radial velocity distribution. !! !! The first thing we'll try to do is solve for the tangential velocities of the first 6 fragments, using angular and linear momentum as constraints and an initial !! tangential velocity distribution for the remaining bodies (if there are any) that distributes their angular momentum equally between them. !! If that doesn't work and we blow our kinetic energy budget, we will attempt to find a tangential velocity distribution that minimizes the kinetic energy while !! conserving momentum. !! !! A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object logical , intent ( out ) :: lfailure !! Logical flag indicating whether this step fails or succeeds ! Internals integer ( I4B ) :: i real ( DP ), parameter :: TOL_MIN = 1e-1_DP ! This doesn't have to be very accurate, as we really just want a tangential velocity distribution with less kinetic energy than our initial guess. real ( DP ), parameter :: TOL_INIT = 1e-14_DP real ( DP ), parameter :: VNOISE_MAG = 1e-3_DP !! Magnitude of the noise to apply to initial conditions to help minimizer find a solution in case of failure integer ( I4B ), parameter :: MAXLOOP = 10 real ( DP ) :: tol , ke_remainder real ( DP ), dimension (:), allocatable :: v_t_initial real ( DP ), dimension ( frag % nbody ) :: kefrag , vnoise type ( lambda_obj ) :: spinfunc type ( lambda_obj_err ) :: objective_function real ( DP ), dimension ( NDIM ) :: Li , L_remainder , L_frag_tot character ( len = STRMAX ) :: message associate ( nfrag => frag % nbody ) lfailure = . false . allocate ( v_t_initial , mold = frag % v_t_mag ) v_t_initial (:) = 0.0_DP frag % v_coll (:,:) = 0.0_DP ! Next we will solve for the tangential component of the velocities that both conserves linear momentum and uses the remaining angular momentum not used in spin. ! This will be done using a linear solver that solves for the tangential velocities of the first 6 fragments, constrained by the linear and angular momentum vectors, ! which is embedded in a non-linear minimizer that will adjust the tangential velocities of the remaining i>6 fragments to minimize kinetic energy for a given momentum solution ! The initial conditions fed to the minimizer for the fragments will be the remaining angular momentum distributed between the fragments. call frag % get_ang_mtm () L_remainder (:) = frag % L_budget (:) - frag % L_spin (:) do i = 1 , nfrag v_t_initial ( i ) = norm2 ( L_remainder (:)) / (( nfrag - i + 1 ) * frag % mass ( i ) * norm2 ( frag % x_coll (:, i ))) Li (:) = frag % mass ( i ) * ( frag % x_coll (:, i ) . cross . ( v_t_initial ( i ) * frag % v_t_unit (:, i ))) L_remainder (:) = L_remainder (:) - Li (:) end do ! Find the local kinetic energy minimum for the system that conserves linear and angular momentum objective_function = lambda_obj ( tangential_objective_function , lfailure ) tol = TOL_INIT do while ( tol < TOL_MIN ) frag % v_t_mag ( 7 : nfrag ) = util_minimize_bfgs ( objective_function , nfrag - 6 , v_t_initial ( 7 : nfrag ), tol , MAXLOOP , lfailure ) ! Now that the KE-minimized values of the i>6 fragments are found, calculate the momentum-conserving solution for tangential velociteis v_t_initial ( 7 : nfrag ) = frag % v_t_mag ( 7 : nfrag ) if (. not . lfailure ) exit tol = tol * 2_DP ! Keep increasing the tolerance until we converge on a solution call random_number ( vnoise ( 1 : nfrag )) ! Adding a bit of noise to the initial conditions helps it find a solution more often vnoise (:) = 1.0_DP + VNOISE_MAG * ( 2 * vnoise (:) - 1._DP ) v_t_initial (:) = v_t_initial (:) * vnoise (:) end do frag % v_t_mag ( 1 : nfrag ) = solve_fragment_tan_vel ( v_t_mag_input = v_t_initial ( 7 : nfrag ), lfailure = lfailure ) ! Perform one final shift of the radial velocity vectors to align with the center of mass of the collisional system (the origin) frag % vb (:, 1 : nfrag ) = fraggle_util_vmag_to_vb ( frag % v_r_mag ( 1 : nfrag ), frag % v_r_unit (:, 1 : nfrag ), frag % v_t_mag ( 1 : nfrag ), frag % v_t_unit (:, 1 : nfrag ), frag % mass ( 1 : nfrag ), frag % vbcom (:)) do concurrent ( i = 1 : nfrag ) frag % v_coll (:, i ) = frag % vb (:, i ) - frag % vbcom (:) end do ! Now do a kinetic energy budget check to make sure we are still within the budget. kefrag = 0.0_DP do concurrent ( i = 1 : nfrag ) kefrag ( i ) = frag % mass ( i ) * dot_product ( frag % vb (:, i ), frag % vb (:, i )) end do frag % ke_orbit = 0.5_DP * sum ( kefrag (:)) ! If we are over the energy budget, flag this as a failure so we can try again lfailure = (( frag % ke_budget - frag % ke_spin - frag % ke_orbit ) < 0.0_DP ) if ( lfailure ) then call fraggle_io_log_one_message ( \" \" ) call fraggle_io_log_one_message ( \"Tangential velocity failure diagnostics\" ) call frag % get_ang_mtm () L_frag_tot = frag % L_spin (:) + frag % L_orbit (:) write ( message , * ) . mag .( frag % L_budget (:) - L_frag_tot (:)) / (. mag . frag % Ltot_before (:)) call fraggle_io_log_one_message ( \"|L_remainder| : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget call fraggle_io_log_one_message ( \"ke_budget     : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_spin call fraggle_io_log_one_message ( \"ke_spin       : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_orbit call fraggle_io_log_one_message ( \"ke_tangential : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget - frag % ke_spin - frag % ke_orbit call fraggle_io_log_one_message ( \"ke_radial     : \" // trim ( adjustl ( message ))) end if end associate return contains function solve_fragment_tan_vel ( lfailure , v_t_mag_input ) result ( v_t_mag_output ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Adjusts the positions, velocities, and spins of a collection of fragments such that they conserve angular momentum implicit none ! Arguments logical , intent ( out ) :: lfailure !! Error flag real ( DP ), dimension (:), optional , intent ( in ) :: v_t_mag_input !! Unknown tangential velocities for fragments 7:nfrag ! Internals integer ( I4B ) :: i ! Result real ( DP ), dimension (:), allocatable :: v_t_mag_output real ( DP ), dimension ( 2 * NDIM , 2 * NDIM ) :: A ! LHS of linear equation used to solve for momentum constraint in Gauss elimination code real ( DP ), dimension ( 2 * NDIM ) :: b ! RHS of linear equation used to solve for momentum constraint in Gauss elimination code real ( DP ), dimension ( NDIM ) :: L_lin_others , L_orb_others , L , vtmp associate ( nfrag => frag % nbody ) lfailure = . false . ! We have 6 constraint equations (2 vector constraints in 3 dimensions each) ! The first 3 are that the linear momentum of the fragments is zero with respect to the collisional barycenter ! The second 3 are that the sum of the angular momentum of the fragments is conserved from the pre-impact state L_lin_others (:) = 0.0_DP L_orb_others (:) = 0.0_DP do i = 1 , nfrag if ( i <= 2 * NDIM ) then ! The tangential velocities of the first set of bodies will be the unknowns we will solve for to satisfy the constraints A ( 1 : 3 , i ) = frag % mass ( i ) * frag % v_t_unit (:, i ) A ( 4 : 6 , i ) = frag % mass ( i ) * frag % rmag ( i ) * ( frag % v_r_unit (:, i ) . cross . frag % v_t_unit (:, i )) else if ( present ( v_t_mag_input )) then vtmp (:) = v_t_mag_input ( i - 6 ) * frag % v_t_unit (:, i ) L_lin_others (:) = L_lin_others (:) + frag % mass ( i ) * vtmp (:) L (:) = frag % mass ( i ) * ( frag % x_coll (:, i ) . cross . vtmp (:)) L_orb_others (:) = L_orb_others (:) + L (:) end if end do b ( 1 : 3 ) = - L_lin_others (:) b ( 4 : 6 ) = frag % L_budget (:) - frag % L_spin (:) - L_orb_others (:) allocate ( v_t_mag_output ( nfrag )) v_t_mag_output ( 1 : 6 ) = util_solve_linear_system ( A , b , 6 , lfailure ) if ( present ( v_t_mag_input )) v_t_mag_output ( 7 : nfrag ) = v_t_mag_input (:) end associate return end function solve_fragment_tan_vel function tangential_objective_function ( v_t_mag_input , lfailure ) result ( fval ) !! Author: David A. Minton !! !! Objective function for evaluating how close our fragment velocities get to minimizing KE error from our required value implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: v_t_mag_input !! Unknown tangential component of velocity vector set previously by angular momentum constraint logical , intent ( out ) :: lfailure !! Error flag ! Result real ( DP ) :: fval ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM , frag % nbody ) :: v_shift real ( DP ), dimension ( frag % nbody ) :: v_t_new , kearr real ( DP ) :: keo associate ( nfrag => frag % nbody ) lfailure = . false . v_t_new (:) = solve_fragment_tan_vel ( v_t_mag_input = v_t_mag_input (:), lfailure = lfailure ) v_shift (:,:) = fraggle_util_vmag_to_vb ( frag % v_r_mag , frag % v_r_unit , v_t_new , frag % v_t_unit , frag % mass , frag % vbcom ) kearr = 0.0_DP do concurrent ( i = 1 : nfrag ) kearr ( i ) = frag % mass ( i ) * dot_product ( v_shift (:, i ), v_shift (:, i )) end do keo = 0.5_DP * sum ( kearr (:)) fval = keo lfailure = . false . end associate return end function tangential_objective_function end subroutine fraggle_generate_tan_vel subroutine fraggle_generate_rad_vel ( frag , colliders , lfailure ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! !! Adjust the fragment velocities to set the fragment orbital kinetic energy. This will minimize the difference between the fragment kinetic energy and the energy budget implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( fraggle_colliders ), intent ( in ) :: colliders !! Fraggle collider system object logical , intent ( out ) :: lfailure !! Logical flag indicating whether this step fails or succeeds! ! Internals real ( DP ), parameter :: TOL_MIN = FRAGGLE_ETOL ! This needs to be more accurate than the tangential step, as we are trying to minimize the total residual energy real ( DP ), parameter :: TOL_INIT = 1e-14_DP real ( DP ), parameter :: VNOISE_MAG = 1e-10_DP !! Magnitude of the noise to apply to initial conditions to help minimizer find a solution in case of failure integer ( I4B ), parameter :: MAXLOOP = 100 real ( DP ) :: ke_radial , tol integer ( I4B ) :: i , j real ( DP ), dimension (:), allocatable :: v_r_initial real ( DP ), dimension (:,:), allocatable :: v_r real ( DP ), dimension ( frag % nbody ) :: vnoise type ( lambda_obj ) :: objective_function character ( len = STRMAX ) :: message associate ( nfrag => frag % nbody ) ! Set the \"target\" ke for the radial component ke_radial = frag % ke_budget - frag % ke_spin - frag % ke_orbit allocate ( v_r_initial , source = frag % v_r_mag ) ! Initialize radial velocity magnitudes with a random value that related to equipartition of kinetic energy with some noise call random_number ( vnoise ( 1 : nfrag )) vnoise (:) = 1.0_DP + VNOISE_MAG * ( 2 * vnoise (:) - 1.0_DP ) v_r_initial ( 1 : nfrag ) = sqrt ( abs ( 2 * ke_radial ) / ( frag % mass ( 1 : nfrag ) * nfrag )) * vnoise ( 1 : nfrag ) ! Initialize the lambda function using a structure constructor that calls the init method ! Minimize the ke objective function using the BFGS optimizer objective_function = lambda_obj ( radial_objective_function ) tol = TOL_INIT do while ( tol < TOL_MIN ) frag % v_r_mag = util_minimize_bfgs ( objective_function , nfrag , v_r_initial , tol , MAXLOOP , lfailure ) if (. not . lfailure ) exit tol = tol * 2 ! Keep increasing the tolerance until we converge on a solution v_r_initial (:) = frag % v_r_mag (:) call random_number ( vnoise ( 1 : nfrag )) ! Adding a bit of noise to the initial conditions helps it find a solution more often vnoise (:) = 1.0_DP + VNOISE_MAG * ( 2 * vnoise (:) - 1._DP ) v_r_initial (:) = v_r_initial (:) * vnoise (:) end do ! Shift the radial velocity vectors to align with the center of mass of the collisional system (the origin) frag % ke_orbit = 0.0_DP frag % vb (:, 1 : nfrag ) = fraggle_util_vmag_to_vb ( frag % v_r_mag ( 1 : nfrag ), frag % v_r_unit (:, 1 : nfrag ), frag % v_t_mag ( 1 : nfrag ), frag % v_t_unit (:, 1 : nfrag ), frag % mass ( 1 : nfrag ), frag % vbcom (:)) do i = 1 , nfrag frag % v_coll (:, i ) = frag % vb (:, i ) - frag % vbcom (:) frag % ke_orbit = frag % ke_orbit + frag % mass ( i ) * dot_product ( frag % vb (:, i ), frag % vb (:, i )) end do frag % ke_orbit = 0.5_DP * frag % ke_orbit lfailure = abs (( frag % ke_budget - ( frag % ke_orbit + frag % ke_spin )) / frag % ke_budget ) > FRAGGLE_ETOL if ( lfailure ) then call fraggle_io_log_one_message ( \" \" ) call fraggle_io_log_one_message ( \"Radial velocity failure diagnostics\" ) write ( message , * ) frag % ke_budget call fraggle_io_log_one_message ( \"ke_budget     : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_spin call fraggle_io_log_one_message ( \"ke_spin       : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_orbit call fraggle_io_log_one_message ( \"ke_orbit : \" // trim ( adjustl ( message ))) write ( message , * ) frag % ke_budget - ( frag % ke_orbit + frag % ke_spin ) call fraggle_io_log_one_message ( \"ke_remainder  : \" // trim ( adjustl ( message ))) end if end associate return contains function radial_objective_function ( v_r_mag_input ) result ( fval ) !! Author: David A. Minton !! !! Objective function for evaluating how close our fragment velocities get to minimizing KE error from our required value implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: v_r_mag_input !! Unknown radial component of fragment velocity vector ! Result real ( DP ) :: fval !! The objective function result, which is the square of the difference between the calculated fragment kinetic energy and our target !! Minimizing this brings us closer to our objective ! Internals integer ( I4B ) :: i real ( DP ), dimension (:,:), allocatable :: v_shift real ( DP ), dimension ( frag % nbody ) :: kearr real ( DP ) :: keo , ke_radial , rotmag2 , vmag2 associate ( nfrag => frag % nbody ) allocate ( v_shift , mold = frag % vb ) v_shift (:,:) = fraggle_util_vmag_to_vb ( v_r_mag_input , frag % v_r_unit , frag % v_t_mag , frag % v_t_unit , frag % mass , frag % vbcom ) !$omp do simd do i = 1 , nfrag rotmag2 = frag % rot ( 1 , i ) ** 2 + frag % rot ( 2 , i ) ** 2 + frag % rot ( 3 , i ) ** 2 vmag2 = v_shift ( 1 , i ) ** 2 + v_shift ( 2 , i ) ** 2 + v_shift ( 3 , i ) ** 2 kearr ( i ) = frag % mass ( i ) * ( frag % Ip ( 3 , i ) * frag % radius ( i ) ** 2 * rotmag2 + vmag2 ) end do !$omp end do simd keo = 2 * frag % ke_budget - sum ( kearr (:)) ke_radial = frag % ke_budget - frag % ke_orbit - frag % ke_spin ! The following ensures that fval = 0 is a local minimum, which is what the BFGS method is searching for fval = ( keo / ( 2 * ke_radial )) ** 2 end associate return end function radial_objective_function end subroutine fraggle_generate_rad_vel end submodule s_fraggle_generate","tags":"","loc":"sourcefile/fraggle_generate.f90.html"},{"title":"fraggle_regime.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_regime.f90~~EfferentGraph sourcefile~fraggle_regime.f90 fraggle_regime.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_regime.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_regime.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_regime Source Code fraggle_regime.f90 Source Code submodule ( fraggle_classes ) s_fraggle_regime use swiftest contains module subroutine fraggle_regime_colliders ( self , frag , system , param ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Determine which fragmentation regime the set of colliders will be. This subroutine is a wrapper for the non-polymorphic raggle_regime_collresolve subroutine. !! It converts to SI units prior to calling implicit none ! Arguments class ( fraggle_colliders ), intent ( inout ) :: self !! Fraggle colliders object class ( fraggle_fragments ), intent ( inout ) :: frag !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( in ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters ! Internals integer ( I4B ) :: jtarg , jproj , regime real ( DP ), dimension ( 2 ) :: radius_si , mass_si , density_si real ( DP ) :: min_mfrag_si , Mcb_si real ( DP ), dimension ( NDIM ) :: x1_si , v1_si , x2_si , v2_si real ( DP ) :: mlr , mslr , mtot , dentot , msys , msys_new , Qloss , impact_parameter logical :: fileExists associate ( colliders => self ) ! Convert all quantities to SI units and determine which of the pair is the projectile vs. target before sending them to the regime determination subroutine if ( colliders % mass ( 1 ) > colliders % mass ( 2 )) then jtarg = 1 jproj = 2 else jtarg = 2 jproj = 1 end if mass_si (:) = colliders % mass ([ jtarg , jproj ]) * param % MU2KG !! The two-body equivalent masses of the collider system radius_si (:) = colliders % radius ([ jtarg , jproj ]) * param % DU2M !! The two-body equivalent radii of the collider system density_si (:) = mass_si (:) / ( 4.0_DP / 3._DP * PI * radius_si (:) ** 3 ) !! The two-body equivalent density of the collider system x1_si (:) = colliders % xb (:, jtarg ) * param % DU2M !! The first body of the two-body equivalent position vector the collider system v1_si (:) = colliders % vb (:, jtarg ) * param % DU2M / param % TU2S !! The first body of the two-body equivalent velocity vector the collider system x2_si (:) = colliders % xb (:, jproj ) * param % DU2M !! The second body of the two-body equivalent position vector the collider system v2_si (:) = colliders % vb (:, jproj ) * param % DU2M / param % TU2S !! The second body of the two-body equivalent velocity vector the collider system Mcb_si = system % cb % mass * param % MU2KG !! The central body mass of the system select type ( param ) class is ( symba_parameters ) min_mfrag_si = ( param % min_GMfrag / param % GU ) * param % MU2KG !! The minimum fragment mass to generate. Collider systems that would otherwise generate less massive fragments than this value will be forced to merge instead class default min_mfrag_si = 0.0_DP end select mtot = sum ( mass_si (:)) dentot = sum ( mass_si (:) * density_si (:)) / mtot !! Use the positions and velocities of the parents from indside the step (at collision) to calculate the collisional regime call fraggle_regime_collresolve ( Mcb_si , mass_si ( jtarg ), mass_si ( jproj ), radius_si ( jtarg ), radius_si ( jproj ), x1_si (:), x2_si (:),& v1_si (:), v2_si (:), density_si ( jtarg ), density_si ( jproj ), min_mfrag_si , frag % regime , mlr , mslr , frag % Qloss ) frag % mass_dist ( 1 ) = min ( max ( mlr , 0.0_DP ), mtot ) frag % mass_dist ( 2 ) = min ( max ( mslr , 0.0_DP ), mtot ) frag % mass_dist ( 3 ) = min ( max ( mtot - mlr - mslr , 0.0_DP ), mtot ) ! Find the center of mass of the collisional system frag % mtot = sum ( colliders % mass (:)) frag % xbcom (:) = ( colliders % mass ( 1 ) * colliders % xb (:, 1 ) + colliders % mass ( 2 ) * colliders % xb (:, 2 )) / frag % mtot frag % vbcom (:) = ( colliders % mass ( 1 ) * colliders % vb (:, 1 ) + colliders % mass ( 2 ) * colliders % vb (:, 2 )) / frag % mtot ! Convert quantities back to the system units and save them into the fragment system frag % mass_dist (:) = ( frag % mass_dist (:) / param % MU2KG ) frag % Qloss = frag % Qloss * ( param % TU2S / param % DU2M ) ** 2 / param % MU2KG call fraggle_io_log_regime ( colliders , frag ) end associate return end subroutine fraggle_regime_colliders subroutine fraggle_regime_collresolve ( Mcb , m1 , m2 , rad1 , rad2 , xh1 , xh2 , vb1 , vb2 , den1 , den2 , min_mfrag , regime , Mlr , Mslr , Qloss ) !! Author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Determine the collisional regime of two colliding bodies. !! Current version requires all values to be converted to SI units prior to calling the function !!       References: !!       Kokubo, E., Genda, H., 2010. Formation of Terrestrial Planets from Protoplanets Under a Realistic Accretion !!          Condition. ApJL 714, L21. https://doi.org/10.1088/2041-8205/714/1/L21 !!       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling !!          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79 !!       Mustill, A.J., Davies, M.B., Johansen, A., 2018. The dynamical evolution of transiting planetary systems including !!          a realistic collision prescription. Mon Not R Astron Soc 478, 2896–2908. https://doi.org/10.1093/mnras/sty1273 !!       Rufu, R., Aharonson, O., 2019. Impact Dynamics of Moons Within a Planetary Potential. J. Geophys. Res. Planets 124, !!          1008–1019. https://doi.org/10.1029/2018JE005798 !!       Stewart, S.T., Leinhardt, Z.M., 2012. Collisions between Gravity-dominated Bodies. II. The Diversity of Impact !!          Outcomes during the End Stage of Planet Formation. ApJ 751, 32. https://doi.org/10.1088/0004-637X/751/1/32 !! implicit none ! Arguments real ( DP ), intent ( in ) :: Mcb , m1 , m2 , rad1 , rad2 , den1 , den2 , min_mfrag real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 , vb1 , vb2 integer ( I4B ), intent ( out ) :: regime real ( DP ), intent ( out ) :: Mlr , Mslr real ( DP ), intent ( out ) :: Qloss !! The residual energy after the collision ! Constants integer ( I4B ), parameter :: N1 = 1 !number of objects with mass equal to the largest remnant from LS12 integer ( I4B ), parameter :: N2 = 2 !number of objects with mass larger than second largest remnant from LS12 real ( DP ), parameter :: DENSITY1 = 100 0.0_DP !standard density parameter from LS12 [kg/m3] real ( DP ), parameter :: MU_BAR = 0.37_DP !0.385#0.37#0.3333# 3.978 # 1/3 material parameter for hydrodynamic planet-size bodies (LS12) real ( DP ), parameter :: BETA = 2.85_DP !slope of sfd for remnants from LS12 2.85 real ( DP ), parameter :: ETA = - 1.50_DP !! LS12 eq. (44) real ( DP ), parameter :: C1 = 2.43_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: C2 = - 0.0408_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: C3 = 1.86_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: C4 = 1.08_DP !! Kokubo & Genda (2010) eq. (3) real ( DP ), parameter :: CRUFU = 2.0_DP - 3 * MU_BAR ! central potential variable from Rufu and Aharonson (2019) real ( DP ), parameter :: SUPERCAT_QRATIO = 1.8_DP ! See Section 4.1 of LS12 ! Internals real ( DP ) :: a1 , alpha , aint , b , bcrit , c_star , egy , zeta , l , lint , mu , phi , theta real ( DP ) :: Qr , Qrd_pstar , Qr_erosion , Qr_supercat real ( DP ) :: Vhr , Verosion , Vescp , Vhill , Vimp , Vsupercat real ( DP ) :: Mint , Mtot , Mtmp real ( DP ) :: Rp , rhill real ( DP ) :: Mresidual real ( DP ) :: U_binding Vimp = norm2 ( vb2 (:) - vb1 (:)) b = calc_b ( xh2 , vb2 , xh1 , vb1 ) l = ( rad1 + rad2 ) * ( 1 - b ) egy = 0.5_DP * dot_product ( vb1 , vb1 ) - GC * Mcb / norm2 ( xh1 ) a1 = - GC * Mcb / 2.0_DP / egy Mtot = m1 + m2 mu = ( m1 * m2 ) / Mtot if ( l < 2 * rad2 ) then !calculate Mint phi = 2 * acos (( l - rad2 ) / rad2 ) aint = rad2 ** 2 * ( PI - ( phi - sin ( phi )) / 2.0_DP ) lint = 2 * sqrt ( rad2 ** 2 - ( rad2 - l / 2.0_DP ) ** 2 ) Mint = aint * lint ![kg] alpha = ( l ** 2 ) * ( 3 * rad2 - l ) / ( 4 * ( rad2 ** 3 )) else alpha = 1.0_DP Mint = m2 end if Rp = ( 3 * ( m1 / den1 + alpha * m2 / den2 ) / ( 4 * PI )) ** ( 1.0_DP / 3.0_DP ) ! (Mustill et al. 2018) c_star = calc_c_star ( Rp ) !calculate Vescp Vescp = sqrt ( 2 * GC * Mtot / Rp ) !Mustill et al. 2018 eq 6 !calculate rhill rhill = a1 * ( m1 / 3.0_DP / ( Mcb + m1 )) ** ( 1.0_DP / 3.0_DP ) !calculate Vhill if (( rad2 + rad1 ) < rhill ) then Vhill = sqrt ( 2 * GC * m1 * (( rhill ** 2 - rhill * ( rad1 + rad2 )) / & ( rhill ** 2 - 0.5_DP * ( rad1 + rad2 ) ** 2 )) / ( rad1 + rad2 )) else Vhill = Vescp end if !calculate Qr_pstar Qrd_pstar = calc_Qrd_pstar ( m1 , m2 , alpha , c_star ) * ( Vhill / Vescp ) ** CRUFU !Rufu and Aharaonson eq (3) !calculate Verosion Qr_erosion = 2 * ( 1.0_DP - m1 / Mtot ) * Qrd_pstar Verosion = ( 2 * Qr_erosion * Mtot / mu ) ** ( 1.0_DP / 2.0_DP ) Qr = mu * ( Vimp ** 2 ) / Mtot / 2.0_DP !calculate mass largest remnant Mlr Mlr = max (( 1.0_DP - Qr / Qrd_pstar / 2.0_DP ) * Mtot , min_mfrag ) ! [kg] # LS12 eq (5) !calculate Vsupercat Qr_supercat = SUPERCAT_QRATIO * Qrd_pstar ! See LS12 Section 4.1 Vsupercat = sqrt ( 2 * Qr_supercat * Mtot / mu ) !calculate Vhr zeta = ( m1 - m2 ) / Mtot theta = 1.0_DP - b Vhr = Vescp * ( C1 * zeta ** 2 * theta ** ( 2.5_DP ) + C2 * zeta ** 2 + C3 * theta ** ( 2.5_DP ) + C4 ) ! Kokubo & Genda (2010) eq. (3) bcrit = rad1 / ( rad1 + rad2 ) Qloss = 0.0_DP U_binding = ( 3.0_DP * Mtot ) / ( 5.0_DP * Rp ) ! LS12 eq. 27 if (( m1 < min_mfrag ). or .( m2 < min_mfrag )) then regime = COLLRESOLVE_REGIME_MERGE !perfect merging regime Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP call fraggle_io_log_one_message ( \"Fragments would have mass below the minimum. Converting this collision into a merger.\" ) else if ( Vimp < Vescp ) then regime = COLLRESOLVE_REGIME_MERGE !perfect merging regime Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else if ( Vimp < Verosion ) then if ( b < bcrit ) then regime = COLLRESOLVE_REGIME_MERGE !partial accretion regime\" Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else if (( b > bcrit ) . and . ( Vimp < Vhr )) then regime = COLLRESOLVE_REGIME_MERGE ! graze and merge Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else Mlr = m1 Mslr = max ( calc_Qrd_rev ( m2 , m1 , Mint , den1 , den2 , Vimp , c_star ), min_mfrag ) regime = COLLRESOLVE_REGIME_HIT_AND_RUN !hit and run Qloss = ( c_star + 1.0_DP ) * U_binding ! Qr end if else if ( Vimp > Verosion . and . Vimp < Vsupercat ) then if ( m2 < 0.001_DP * m1 ) then regime = COLLRESOLVE_REGIME_MERGE !cratering regime\" Mlr = Mtot Mslr = 0.0_DP Qloss = 0.0_DP else Mslr = max ( Mtot * ( 3.0_DP - BETA ) * ( 1.0_DP - N1 * Mlr / Mtot ) / ( N2 * BETA ), min_mfrag ) ! LS12 eq (37) regime = COLLRESOLVE_REGIME_DISRUPTION !disruption Qloss = ( c_star + 1.0_DP ) * U_binding ! Qr - Qr_erosion end if else if ( Vimp > Vsupercat ) then Mlr = max ( Mtot * 0.1_DP * ( Qr / ( Qrd_pstar * SUPERCAT_QRATIO )) ** ( ETA ), min_mfrag ) !LS12 eq (44) Mslr = max ( Mtot * ( 3.0_DP - BETA ) * ( 1.0_DP - N1 * Mlr / Mtot ) / ( N2 * BETA ), min_mfrag ) !LS12 eq (37) regime = COLLRESOLVE_REGIME_SUPERCATASTROPHIC ! supercatastrophic Qloss = ( c_star + 1.0_DP ) * U_binding ! Qr - Qr_supercat else write ( * , * ) \"Error no regime found in symba_regime\" end if end if if ( Mslr > Mlr ) then ! The second-largest fragment is actually larger than the largest, so we will swap them Mtmp = Mlr Mlr = Mslr Mslr = Mtmp end if Mresidual = Mtot - Mlr - Mslr if ( Mresidual < 0.0_DP ) then ! prevents final masses from going negative Mlr = Mlr + Mresidual end if return ! Internal functions contains function calc_Qrd_pstar ( Mtarg , Mp , alpha , c_star ) result ( Qrd_pstar ) !! author: Jennifer L.L. Pouplin and Carlisle A. Wishard !! !! Calculates the corrected Q* for oblique impacts. See Eq. (15) of LS12. !!       Reference: !!       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling !!          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79 !! implicit none ! Arguments real ( DP ), intent ( in ) :: Mtarg , Mp , alpha , c_star ! Result real ( DP ) :: Qrd_pstar ! Internals real ( DP ) :: Qrd_star1 , mu_alpha , mu , Qrd_star ! calc mu, mu_alpha mu = ( Mtarg * Mp ) / ( Mtarg + Mp ) ! [kg] mu_alpha = ( Mtarg * alpha * Mp ) / ( Mtarg + alpha * Mp ) ! [kg] ! calc Qrd_star1 Qrd_star1 = ( c_star * 4 * PI * DENSITY1 * GC * Rp ** 2 ) / 5.0_DP ! calc Qrd_star Qrd_star = Qrd_star1 * ((( Mp / Mtarg + 1.0_DP ) ** 2 ) / ( 4 * Mp / Mtarg )) ** ( 2.0_DP / ( 3.0_DP * MU_BAR ) - 1.0_DP ) !(eq 23) ! calc Qrd_pstar, v_pstar Qrd_pstar = (( mu / mu_alpha ) ** ( 2.0_DP - 3.0_DP * MU_BAR / 2.0_DP )) * Qrd_star ! (eq 15) return end function calc_Qrd_pstar function calc_Qrd_rev ( Mp , Mtarg , Mint , den1 , den2 , Vimp , c_star ) result ( Mslr ) !! author: Jennifer L.L. Pouplin and Carlisle A. Wishard !! !! Calculates mass of second largest fragment. !! implicit none ! Arguments real ( DP ), intent ( in ) :: Mp , Mtarg , Mint , den1 , den2 , Vimp , c_star ! Result real ( DP ) :: Mslr ! Internals real ( DP ) :: mtot_rev , mu_rev , gamma_rev , Qrd_star1 , Qrd_star , mu_alpha_rev real ( DP ) :: Qrd_pstar , Rc1 , Qr_rev , Qrd_pstar_rev , Qr_supercat_rev ! calc Mslr, Rc1, mu, gammalr mtot_rev = Mint + Mp Rc1 = ( 3 * ( Mint / den1 + Mp / den2 ) / ( 4 * PI )) ** ( 1.0_DP / 3.0_DP ) ! [m] Mustill et al 2018 mu_rev = ( Mint * Mp ) / mtot_rev ! [kg] eq 49 LS12 mu_alpha_rev = ( Mtarg * alpha * Mp ) / ( Mtarg + alpha * Mp ) gamma_rev = Mint / Mp ! eq 50 LS12 !calc Qr_rev Qr_rev = mu_rev * ( Vimp ** 2 ) / ( 2 * mtot_rev ) ! calc Qrd_star1, v_star1 Qrd_star1 = ( c_star * 4 * PI * mtot_rev * GC ) / Rc1 / 5.0_DP ! calc Qrd_pstar_rev Qrd_star = Qrd_star1 * ((( gamma_rev + 1.0_DP ) ** 2 ) / ( 4 * gamma_rev )) ** ( 2.0_DP / ( 3.0_DP * MU_BAR ) - 1.0_DP ) !(eq 52) Qrd_pstar = Qrd_star * (( mu_rev / mu_alpha_rev ) ** ( 2.0_DP - 3.0_DP * MU_BAR / 2.0_DP )) Qrd_pstar_rev = Qrd_pstar * ( Vhill / Vescp ) ** CRUFU !Rufu and Aharaonson eq (3) !calc Qr_supercat_rev Qr_supercat_rev = 1.8_DP * Qrd_pstar_rev if ( Qr_rev > Qr_supercat_rev ) then Mslr = mtot_rev * ( 0.1_DP * (( Qr_rev / ( Qrd_pstar_rev * 1.8_DP )) ** ( - 1.5_DP ))) !eq (44) else if ( Qr_rev < Qrd_pstar_rev ) then Mslr = Mp else Mslr = ( 1.0_DP - Qr_rev / Qrd_pstar_rev / 2.0_DP ) * ( mtot_rev ) ! [kg] #(eq 5) end if if ( Mslr > Mp ) Mslr = Mp !check conservation of mass return end function calc_Qrd_rev function calc_b ( proj_pos , proj_vel , targ_pos , targ_vel ) result ( sintheta ) !! author: Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton !! !! Calculates the impact factor b = sin(theta), where theta is the angle between the relative velocity !! and distance vectors of the target and projectile bodies. See Fig. 2 of Leinhardt and Stewart (2012) !! implicit none !! Arguments real ( DP ), dimension (:), intent ( in ) :: proj_pos , proj_vel , targ_pos , targ_vel !! Result real ( DP ) :: sintheta !! Internals real ( DP ), dimension ( NDIM ) :: imp_vel , distance , x_cross_v imp_vel (:) = proj_vel (:) - targ_vel (:) distance (:) = proj_pos (:) - targ_pos (:) x_cross_v (:) = distance (:) . cross . imp_vel (:) sintheta = norm2 ( x_cross_v (:)) / norm2 ( distance (:)) / norm2 ( imp_vel (:)) return end function calc_b function calc_c_star ( Rc1 ) result ( c_star ) !! author: David A. Minton !! !! Calculates c_star as a function of impact equivalent radius. It inteRpolates between 5 for ~1 km sized bodies to !! 1.8 for ~10000 km sized bodies. See LS12 Fig. 4 for details. !! implicit none !! Arguments real ( DP ), intent ( in ) :: Rc1 !! Result real ( DP ) :: c_star !! Internals real ( DP ), parameter :: loR = 1.0e3_DP ! Lower bound of inteRpolation size (m) real ( DP ), parameter :: hiR = 1.0e7_DP ! Upper bound of inteRpolation size (m) real ( DP ), parameter :: loval = 5.0_DP ! Value of C* at lower bound real ( DP ), parameter :: hival = 1.9_DP ! Value of C* at upper bound if ( Rc1 < loR ) then c_star = loval else if ( Rc1 < hiR ) then c_star = loval + ( hival - loval ) * log ( Rc1 / loR ) / log ( hiR / loR ) else c_star = hival end if return end function calc_c_star end subroutine fraggle_regime_collresolve end submodule s_fraggle_regime","tags":"","loc":"sourcefile/fraggle_regime.f90.html"},{"title":"fraggle_placeholder.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_placeholder.f90~~EfferentGraph sourcefile~fraggle_placeholder.f90 fraggle_placeholder.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_placeholder.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_placeholder.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_placeholder Source Code fraggle_placeholder.f90 Source Code submodule ( fraggle_classes ) s_fraggle_placeholder use swiftest contains !> The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class module subroutine fraggle_placeholder_accel ( self , system , param , t , lbeg ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time logical , intent ( in ) :: lbeg !! Optional argument that determines whether or not this is the beginning or end of the step write ( * , * ) \"The type-bound procedure 'accel' is not defined for type fraggle_fragments\" return end subroutine fraggle_placeholder_accel module subroutine fraggle_placeholder_kick ( self , system , param , t , dt , lbeg ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system objec class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time real ( DP ), intent ( in ) :: dt !! Stepsize logical , intent ( in ) :: lbeg !! Logical flag indicating whether this is the beginning of the half step or not. write ( * , * ) \"The type-bound procedure 'kick' is not defined for type fraggle_fragments\" return end subroutine fraggle_placeholder_kick module subroutine fraggle_placeholder_step ( self , system , param , t , dt ) implicit none class ( fraggle_fragments ), intent ( inout ) :: self !! Swiftest body object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Simulation time real ( DP ), intent ( in ) :: dt !! Current stepsize write ( * , * ) \"The type-bound procedure 'step' is not defined for type fraggle_fragments\" return end subroutine fraggle_placeholder_step end submodule s_fraggle_placeholder","tags":"","loc":"sourcefile/fraggle_placeholder.f90.html"},{"title":"fraggle_setup.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_setup.f90~~EfferentGraph sourcefile~fraggle_setup.f90 fraggle_setup.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_setup.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_setup.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_setup Source Code fraggle_setup.f90 Source Code submodule ( fraggle_classes ) s_fraggle_setup use swiftest contains module subroutine fraggle_setup_reset_fragments ( self ) !! author: David A. Minton !! !! Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self self % xb (:,:) = 0.0_DP self % vb (:,:) = 0.0_DP self % rot (:,:) = 0.0_DP self % x_coll (:,:) = 0.0_DP self % v_coll (:,:) = 0.0_DP self % v_r_unit (:,:) = 0.0_DP self % v_t_unit (:,:) = 0.0_DP self % v_n_unit (:,:) = 0.0_DP self % rmag (:) = 0.0_DP self % rotmag (:) = 0.0_DP self % v_r_mag (:) = 0.0_DP self % v_t_mag (:) = 0.0_DP self % ke_orbit = 0.0_DP self % ke_spin = 0.0_DP self % L_orbit (:) = 0.0_DP self % L_spin (:) = 0.0_DP return end subroutine fraggle_setup_reset_fragments module subroutine fraggle_setup_fragments ( self , n , param ) !! author: David A. Minton !! !! Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self integer ( I4B ), intent ( in ) :: n class ( swiftest_parameters ), intent ( in ) :: param call setup_pl ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % x_coll )) deallocate ( self % x_coll ) if ( allocated ( self % v_coll )) deallocate ( self % v_coll ) if ( allocated ( self % v_r_unit )) deallocate ( self % v_r_unit ) if ( allocated ( self % v_t_unit )) deallocate ( self % v_t_unit ) if ( allocated ( self % v_n_unit )) deallocate ( self % v_n_unit ) if ( allocated ( self % rmag )) deallocate ( self % rmag ) if ( allocated ( self % rotmag )) deallocate ( self % rotmag ) if ( allocated ( self % v_r_mag )) deallocate ( self % v_r_mag ) if ( allocated ( self % v_t_mag )) deallocate ( self % v_t_mag ) if ( n == 0 ) return allocate ( self % x_coll ( NDIM , n )) allocate ( self % v_coll ( NDIM , n )) allocate ( self % v_r_unit ( NDIM , n )) allocate ( self % v_t_unit ( NDIM , n )) allocate ( self % v_n_unit ( NDIM , n )) allocate ( self % rmag ( n )) allocate ( self % rotmag ( n )) allocate ( self % v_r_mag ( n )) allocate ( self % v_t_mag ( n )) call self % reset () return end subroutine fraggle_setup_fragments end submodule s_fraggle_setup","tags":"","loc":"sourcefile/fraggle_setup.f90.html"},{"title":"fraggle_set.f90 – swiftest","text":"This file depends on sourcefile~~fraggle_set.f90~~EfferentGraph sourcefile~fraggle_set.f90 fraggle_set.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~fraggle_set.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~fraggle_set.f90->sourcefile~swiftest.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_fraggle_set Source Code fraggle_set.f90 Source Code submodule ( fraggle_classes ) s_fraggle_set use swiftest contains module subroutine fraggle_set_budgets_fragments ( self , colliders ) !! author: David A. Minton !! !! Sets the energy and momentum budgets of the fragments based on the collider values and the before/after values of energy and momentum implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals real ( DP ) :: dEtot real ( DP ), dimension ( NDIM ) :: dL associate ( frag => self ) dEtot = frag % Etot_after - frag % Etot_before dL (:) = frag % Ltot_after (:) - frag % Ltot_before (:) frag % L_budget (:) = - dL (:) frag % ke_budget = - ( dEtot - 0.5_DP * frag % mtot * dot_product ( frag % vbcom (:), frag % vbcom (:))) - frag % Qloss end associate return end subroutine fraggle_set_budgets_fragments module subroutine fraggle_set_mass_dist_fragments ( self , colliders , param ) !! author: David A. Minton !! !! Sets the mass of fragments based on the mass distribution returned by the regime calculation. !! This subroutine must be run after the the setup rourtine has been run on the fragments implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object class ( swiftest_parameters ), intent ( in ) :: param !! Current Swiftest run configuration parameters ! Internals integer ( I4B ) :: i , jproj , jtarg , nfrag , istart real ( DP ), dimension ( 2 ) :: volume real ( DP ), dimension ( NDIM ) :: Ip_avg real ( DP ) :: mfrag , mremaining , min_mfrag real ( DP ), parameter :: BETA = 2.85_DP integer ( I4B ), parameter :: NFRAGMAX = 100 !! Maximum number of fragments that can be generated integer ( I4B ), parameter :: NFRAGMIN = 7 !! Minimum number of fragments that can be generated (set by the fraggle_generate algorithm for constraining momentum and energy) integer ( I4B ), parameter :: NFRAG_SIZE_MULTIPLIER = 3 !! Log-space scale factor that scales the number of fragments by the collisional system mass integer ( I4B ), parameter :: iMlr = 1 integer ( I4B ), parameter :: iMslr = 2 integer ( I4B ), parameter :: iMrem = 3 associate ( frag => self ) ! Get mass weighted mean of Ip and density volume ( 1 : 2 ) = 4._DP / 3._DP * PI * colliders % radius ( 1 : 2 ) ** 3 Ip_avg (:) = ( colliders % mass ( 1 ) * colliders % Ip (:, 1 ) + colliders % mass ( 2 ) * colliders % Ip (:, 2 )) / frag % mtot if ( colliders % mass ( 1 ) > colliders % mass ( 2 )) then jtarg = 1 jproj = 2 else jtarg = 2 jproj = 1 end if select type ( param ) class is ( symba_parameters ) min_mfrag = ( param % min_GMfrag / param % GU ) ! The number of fragments we generate is bracked by the minimum required by fraggle_generate (7) and the ! maximum set by the NFRAG_SIZE_MULTIPLIER which limits the total number of fragments to prevent the nbody ! code from getting an overwhelmingly large number of fragments nfrag = ceiling ( NFRAG_SIZE_MULTIPLIER * log ( frag % mtot / min_mfrag )) nfrag = max ( min ( nfrag , NFRAGMAX ), NFRAGMIN ) class default min_mfrag = 0.0_DP nfrag = NFRAGMAX end select select case ( frag % regime ) case ( COLLRESOLVE_REGIME_DISRUPTION , COLLRESOLVE_REGIME_SUPERCATASTROPHIC , COLLRESOLVE_REGIME_HIT_AND_RUN ) ! The first two bins of the mass_dist are the largest and second-largest fragments that came out of fraggle_regime. ! The remainder from the third bin will be distributed among nfrag-2 bodies. The following code will determine nfrag based on ! the limits bracketed above and the model size distribution of fragments. ! Check to see if our size distribution would give us a smaller number of fragments than the maximum number i = iMrem mremaining = frag % mass_dist ( iMrem ) do while ( i <= nfrag ) mfrag = ( 1 + i - iMslr ) ** ( - 3._DP / BETA ) * frag % mass_dist ( iMslr ) if ( mremaining - mfrag < 0.0_DP ) exit mremaining = mremaining - mfrag i = i + 1 end do if ( i < nfrag ) nfrag = max ( i , NFRAGMIN ) ! The sfd would actually give us fewer fragments than our maximum call frag % setup ( nfrag , param ) case ( COLLRESOLVE_REGIME_MERGE , COLLRESOLVE_REGIME_GRAZE_AND_MERGE ) call frag % setup ( 1 , param ) frag % mass ( 1 ) = frag % mass_dist ( 1 ) frag % radius ( 1 ) = colliders % radius ( jtarg ) frag % density ( 1 ) = frag % mass_dist ( 1 ) / volume ( jtarg ) frag % Ip (:, 1 ) = colliders % Ip (:, 1 ) return case default write ( * , * ) \"fraggle_set_mass_dist_fragments error: Unrecognized regime code\" , frag % regime end select ! Make the first two bins the same as the Mlr and Mslr values that came from fraggle_regime frag % mass ( 1 ) = frag % mass_dist ( iMlr ) frag % mass ( 2 ) = frag % mass_dist ( iMslr ) ! Distribute the remaining mass the 3:nfrag bodies following the model SFD given by slope BETA mremaining = frag % mass_dist ( iMrem ) do i = iMrem , nfrag mfrag = ( 1 + i - iMslr ) ** ( - 3._DP / BETA ) * frag % mass_dist ( iMslr ) frag % mass ( i ) = mfrag mremaining = mremaining - mfrag end do ! If there is any residual mass (either positive or negative) we will distribute remaining mass proportionally among the the fragments if ( mremaining < 0.0_DP ) then ! If the remainder is negative, this means that that the number of fragments required by the SFD is smaller than our lower limit set by fraggle_generate. istart = iMrem ! We will reduce the mass of the 3:nfrag bodies to prevent the second-largest fragment from going smaller else ! If the remainder is postiive, this means that the number of fragments required by the SFD is larger than our upper limit set by computational expediency. istart = iMslr ! We will increase the mass of the 2:nfrag bodies to compensate, which ensures that the second largest fragment remains the second largest end if mfrag = 1._DP + mremaining / sum ( frag % mass ( istart : nfrag )) frag % mass ( istart : nfrag ) = frag % mass ( istart : nfrag ) * mfrag ! There may still be some small residual due to round-off error. If so, simply add it to the last bin of the mass distribution. mremaining = frag % mtot - sum ( frag % mass ( 1 : nfrag )) frag % mass ( nfrag ) = frag % mass ( nfrag ) + mremaining ! Compute physical properties of the new fragments select case ( frag % regime ) case ( COLLRESOLVE_REGIME_HIT_AND_RUN ) ! The hit and run case always preserves the largest body intact, so there is no need to recompute the physical properties of the first fragment frag % radius ( 1 ) = colliders % radius ( jtarg ) frag % density ( 1 ) = frag % mass_dist ( iMlr ) / volume ( jtarg ) frag % Ip (:, 1 ) = colliders % Ip (:, 1 ) istart = 2 case default istart = 1 end select frag % density ( istart : nfrag ) = frag % mtot / sum ( volume (:)) frag % radius ( istart : nfrag ) = ( 3 * frag % mass ( istart : nfrag ) / ( 4 * PI * frag % density ( istart : nfrag ))) ** ( 1.0_DP / 3.0_DP ) do i = istart , nfrag frag % Ip (:, i ) = Ip_avg (:) end do end associate return end subroutine fraggle_set_mass_dist_fragments module subroutine fraggle_set_coordinate_system ( self , colliders ) !! author: David A. Minton !! !! Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals integer ( I4B ) :: i real ( DP ), dimension ( NDIM ) :: x_cross_v , delta_r , delta_v , Ltot real ( DP ) :: r_col_norm , v_col_norm real ( DP ), dimension ( NDIM , self % nbody ) :: L_sigma associate ( frag => self , nfrag => self % nbody ) delta_v (:) = colliders % vb (:, 2 ) - colliders % vb (:, 1 ) v_col_norm = . mag . delta_v (:) delta_r (:) = colliders % xb (:, 2 ) - colliders % xb (:, 1 ) r_col_norm = . mag . delta_r (:) ! We will initialize fragments on a plane defined by the pre-impact system, with the z-axis aligned with the angular momentum vector ! and the y-axis aligned with the pre-impact distance vector. Ltot = colliders % L_orbit (:, 1 ) + colliders % L_orbit (:, 2 ) + colliders % L_spin (:, 1 ) + colliders % L_spin (:, 2 ) frag % y_coll_unit (:) = delta_r (:) / r_col_norm frag % z_coll_unit (:) = Ltot (:) / (. mag . Ltot (:)) ! The cross product of the y- by z-axis will give us the x-axis frag % x_coll_unit (:) = frag % y_coll_unit (:) . cross . frag % z_coll_unit (:) if (. not . any ( frag % x_coll (:,:) > 0.0_DP )) return frag % rmag (:) = . mag . frag % x_coll (:,:) call random_number ( L_sigma (:,:)) ! Randomize the tangential velocity direction. This helps to ensure that the tangential velocity doesn't completely line up with the angular momentum vector, ! otherwise we can get an ill-conditioned system do concurrent ( i = 1 : nfrag , frag % rmag ( i ) > 0.0_DP ) frag % v_r_unit (:, i ) = frag % x_coll (:, i ) / frag % rmag ( i ) frag % v_n_unit (:, i ) = frag % z_coll_unit (:) + 2e-1_DP * ( L_sigma (:, i ) - 0.5_DP ) frag % v_n_unit (:, i ) = frag % v_n_unit (:, i ) / (. mag . frag % v_n_unit (:, i )) frag % v_t_unit (:, i ) = frag % v_n_unit (:, i ) . cross . frag % v_r_unit (:, i ) frag % v_t_unit (:, i ) = frag % v_t_unit (:, i ) / (. mag . frag % v_t_unit (:, i )) end do end associate return end subroutine fraggle_set_coordinate_system ! module subroutine symba_set_collresolve_colliders(self, cb, pl, idx) !    !! author: David A. Minton !    !! !    !! Calculate the two-body equivalent values given a set of input collider indices !    use swiftest_classes, only : swiftest_nbody_system !    implicit none !    ! Arguments !    class(fraggle_colliders),               intent(inout) :: self !! Fraggle collider object !    class(symba_cb),                     intent(in)    :: cb   !! Swiftest central body object system object !    class(symba_pl),                     intent(in)    :: pl   !! Swiftest central body object system object !    integer(I4B),             dimension(:), intent(in)    :: idx  !! Index array of bodies from the pl object to use to calculate a \"two-body equivalent\" collisional pair !    ! Internals !    real(DP), dimension(NDIM, 2)  :: mxc, vc !    real(DP), dimension(NDIM) :: vcom, xcom !    associate(colliders => self) !       ! Compute orbital angular momentum of pre-impact system !       xcom(:) = (colliders%mass(1) * colliders%xb(:, 1) + colliders%mass(2) * colliders%xb(:, 2)) / sum(colliders%mass(:)) !       vcom(:) = (colliders%mass(1) * colliders%vb(:, 1) + colliders%mass(2) * colliders%vb(:, 2)) / sum(colliders%mass(:)) !       mxc(:, 1) = colliders%mass(1) * (colliders%xb(:, 1) - xcom(:)) !       mxc(:, 2) = colliders%mass(2) * (colliders%xb(:, 2) - xcom(:)) !       vc(:, 1) = colliders%vb(:, 1) - vcom(:) !       vc(:, 2) = colliders%vb(:, 2) - vcom(:) !       colliders%L_orbit(:,:) = mxc(:,:) .cross. vc(:,:) !    end associate !    return ! end subroutine symbe_set_collresolve_colliders module subroutine fraggle_set_natural_scale_factors ( self , colliders ) !! author: David A. Minton !! !! Scales dimenional quantities to ~O(1) with respect to the collisional system. !! This scaling makes it easier for the non-linear minimization to converge on a solution implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals integer ( I4B ) :: i associate ( frag => self ) ! Set scale factors frag % Escale = 0.5_DP * ( colliders % mass ( 1 ) * dot_product ( colliders % vb (:, 1 ), colliders % vb (:, 1 )) + colliders % mass ( 2 ) * dot_product ( colliders % vb (:, 2 ), colliders % vb (:, 2 ))) frag % dscale = sum ( colliders % radius (:)) frag % mscale = frag % mtot frag % vscale = sqrt ( frag % Escale / frag % mscale ) frag % tscale = frag % dscale / frag % vscale frag % Lscale = frag % mscale * frag % dscale * frag % vscale ! Scale all dimensioned quantities of colliders and fragments frag % xbcom (:) = frag % xbcom (:) / frag % dscale frag % vbcom (:) = frag % vbcom (:) / frag % vscale colliders % xb (:,:) = colliders % xb (:,:) / frag % dscale colliders % vb (:,:) = colliders % vb (:,:) / frag % vscale colliders % mass (:) = colliders % mass (:) / frag % mscale colliders % radius (:) = colliders % radius (:) / frag % dscale colliders % L_spin (:,:) = colliders % L_spin (:,:) / frag % Lscale do i = 1 , 2 colliders % rot (:, i ) = colliders % L_spin (:, i ) / ( colliders % mass ( i ) * colliders % radius ( i ) ** 2 * colliders % Ip ( 3 , i )) end do frag % mtot = frag % mtot / frag % mscale frag % mass = frag % mass / frag % mscale frag % radius = frag % radius / frag % dscale frag % Qloss = frag % Qloss / frag % Escale end associate return end subroutine fraggle_set_natural_scale_factors module subroutine fraggle_set_original_scale_factors ( self , colliders ) !! author: David A. Minton !! !! Restores dimenional quantities back to the system units use , intrinsic :: ieee_exceptions implicit none ! Arguments class ( fraggle_fragments ), intent ( inout ) :: self !! Fraggle fragment system object class ( fraggle_colliders ), intent ( inout ) :: colliders !! Fraggle collider system object ! Internals integer ( I4B ) :: i logical , dimension ( size ( IEEE_ALL )) :: fpe_halting_modes call ieee_get_halting_mode ( IEEE_ALL , fpe_halting_modes ) ! Save the current halting modes so we can turn them off temporarily call ieee_set_halting_mode ( IEEE_ALL ,. false .) associate ( frag => self ) ! Restore scale factors frag % xbcom (:) = frag % xbcom (:) * frag % dscale frag % vbcom (:) = frag % vbcom (:) * frag % vscale colliders % mass = colliders % mass * frag % mscale colliders % radius = colliders % radius * frag % dscale colliders % xb = colliders % xb * frag % dscale colliders % vb = colliders % vb * frag % vscale colliders % L_spin = colliders % L_spin * frag % Lscale do i = 1 , 2 colliders % rot (:, i ) = colliders % L_spin (:, i ) * ( colliders % mass ( i ) * colliders % radius ( i ) ** 2 * colliders % Ip ( 3 , i )) end do frag % Qloss = frag % Qloss * frag % Escale frag % mtot = frag % mtot * frag % mscale frag % mass = frag % mass * frag % mscale frag % radius = frag % radius * frag % dscale frag % rot = frag % rot / frag % tscale frag % x_coll = frag % x_coll * frag % dscale frag % v_coll = frag % v_coll * frag % vscale do i = 1 , frag % nbody frag % xb (:, i ) = frag % x_coll (:, i ) + frag % xbcom (:) frag % vb (:, i ) = frag % v_coll (:, i ) + frag % vbcom (:) end do frag % mscale = 1.0_DP frag % dscale = 1.0_DP frag % vscale = 1.0_DP frag % tscale = 1.0_DP frag % Lscale = 1.0_DP frag % Escale = 1.0_DP end associate call ieee_set_halting_mode ( IEEE_ALL , fpe_halting_modes ) return end subroutine fraggle_set_original_scale_factors end submodule s_fraggle_set","tags":"","loc":"sourcefile/fraggle_set.f90.html"},{"title":"rmvs_discard.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_discard.f90~~EfferentGraph sourcefile~rmvs_discard.f90 rmvs_discard.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_discard.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_discard.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_discard Source Code rmvs_discard.f90 Source Code submodule ( rmvs_classes ) s_rmvs_discard use swiftest contains module subroutine rmvs_discard_tp ( self , system , param ) !! author: David A. Minton !! !! Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered !! !! Adapted from Hal Levison's Swift routine discard_pl.f !! Adapted from Hal Levison's Swift routine rmvs_discard_pl.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i character ( len = STRMAX ) :: timestr , idstri , idstrj if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , pl => system % pl , t => param % t ) do i = 1 , ntp associate ( iplperP => tp % plperP ( i )) if (( tp % status ( i ) == ACTIVE ) . and . ( tp % lperi ( i ))) then if (( tp % peri ( i ) < pl % radius ( iplperP ))) then tp % status ( i ) = DISCARDED_PLQ write ( idstri , * ) tp % id ( i ) write ( idstrj , * ) pl % id ( iplperP ) write ( timestr , * ) t write ( * , * ) \"Particle \" // trim ( adjustl ( tp % info ( i )% name )) // \" (\" // trim ( adjustl ( idstri )) & // \") q with respect to massive body \" // trim ( adjustl ( pl % info ( iplperP )% name )) // \" (\" // trim ( adjustl ( idstrj )) & // \") is too small at t = \" // trim ( adjustl ( timestr )) tp % ldiscard ( i ) = . true . tp % lmask ( i ) = . false . call tp % info ( i )% set_value ( status = \"DISCARDED_PLQ\" , discard_time = t , discard_xh = tp % xh (:, i ), discard_vh = tp % vh (:, i ), discard_body_id = pl % id ( iplperP )) end if end if end associate end do ! Call the base method that this overrides call discard_tp ( tp , system , param ) end associate end subroutine rmvs_discard_tp end submodule s_rmvs_discard","tags":"","loc":"sourcefile/rmvs_discard.f90.html"},{"title":"rmvs_util.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_util.f90~~EfferentGraph sourcefile~rmvs_util.f90 rmvs_util.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_util.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_util.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_util Source Code rmvs_util.f90 Source Code submodule ( rmvs_classes ) s_rmvs_util use swiftest contains module subroutine rmvs_util_append_pl ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from one massive body object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( rmvs_pl ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % nenc , source % nenc , nold , nsrc , lsource_mask ) call util_append ( self % tpenc1P , source % tpenc1P , nold , nsrc , lsource_mask ) call util_append ( self % plind , source % plind , nold , nsrc , lsource_mask ) ! The following are not implemented as RMVS doesn't make use of fill operations on pl type ! So they are here as a placeholder in case someone wants to extend the RMVS class for some reason !call util_append(self%outer, source%outer, nold, nsrc, lsource_mask) !call util_append(self%inner, source%inner, nold, nsrc, lsource_mask) !call util_append(self%planetocentric, source%planetocentric, nold, nsrc, lsource_mask) call whm_util_append_pl ( self , source , lsource_mask ) end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class rmvs_pl or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine rmvs_util_append_pl module subroutine rmvs_util_append_tp ( self , source , lsource_mask ) !! author: David A. Minton !! !! Append components from test particle object to another. !! This method will automatically resize the destination body if it is too small implicit none !! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( in ) :: source !! Source object to append logical , dimension (:), intent ( in ) :: lsource_mask !! Logical mask indicating which elements to append to select type ( source ) class is ( rmvs_tp ) associate ( nold => self % nbody , nsrc => source % nbody ) call util_append ( self % lperi , source % lperi , nold , nsrc , lsource_mask ) call util_append ( self % plperP , source % plperP , nold , nsrc , lsource_mask ) call util_append ( self % plencP , source % plencP , nold , nsrc , lsource_mask ) call util_append_tp ( self , source , lsource_mask ) ! Note: whm_tp does not have its own append method, so we skip back to the base class end associate class default write ( * , * ) \"Invalid object passed to the append method. Source must be of class rmvs_tp or its descendents!\" call util_exit ( FAILURE ) end select return end subroutine rmvs_util_append_tp module subroutine rmvs_util_fill_pl ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new RMVS massive body structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( inserts ) class is ( rmvs_pl ) call util_fill ( keeps % nenc , inserts % nenc , lfill_list ) call util_fill ( keeps % tpenc1P , inserts % tpenc1P , lfill_list ) call util_fill ( keeps % plind , inserts % plind , lfill_list ) ! The following are not implemented as RMVS doesn't make use of fill operations on pl type ! So they are here as a placeholder in case someone wants to extend the RMVS class for some reason !call util_fill(keeps%outer, inserts%outer, lfill_list) !call util_fill(keeps%inner, inserts%inner, lfill_list) !call util_fill(keeps%planetocentric, inserts%planetocentric, lfill_list) call whm_util_fill_pl ( keeps , inserts , lfill_list ) class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class rmvs_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_fill_pl module subroutine rmvs_util_fill_tp ( self , inserts , lfill_list ) !! author: David A. Minton !! !! Insert new RMVS test particle structure into an old one. !! This is the inverse of a fill operation. !! implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( in ) :: inserts !! Inserted object logical , dimension (:), intent ( in ) :: lfill_list !! Logical array of bodies to merge into the keeps associate ( keeps => self ) select type ( inserts ) class is ( rmvs_tp ) call util_fill ( keeps % lperi , inserts % lperi , lfill_list ) call util_fill ( keeps % plperP , inserts % plperP , lfill_list ) call util_fill ( keeps % plencP , inserts % plencP , lfill_list ) call util_fill_tp ( keeps , inserts , lfill_list ) ! Note: whm_tp does not have its own fill method, so we skip back to the base class class default write ( * , * ) \"Invalid object passed to the fill method. Source must be of class rmvs_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_fill_tp module subroutine rmvs_util_resize_pl ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a massive body object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % nenc , nnew ) call util_resize ( self % tpenc1P , nnew ) call util_resize ( self % plind , nnew ) ! The following are not implemented as RMVS doesn't make use of resize operations on pl type ! So they are here as a placeholder in case someone wants to extend the RMVS class for some reason !call util_resize(self%outer, nnew) !call util_resize(self%inner, nnew) !call util_resize(self%planetocentric, nnew) call whm_util_resize_pl ( self , nnew ) return end subroutine rmvs_util_resize_pl module subroutine rmvs_util_resize_tp ( self , nnew ) !! author: David A. Minton !! !! Checks the current size of a test particle object against the requested size and resizes it if it is too small. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: nnew !! New size neded call util_resize ( self % lperi , nnew ) call util_resize ( self % plperP , nnew ) call util_resize ( self % plencP , nnew ) call util_resize ( self % xheliocentric , nnew ) call util_resize_tp ( self , nnew ) return end subroutine rmvs_util_resize_tp module subroutine rmvs_util_sort_pl ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a RMVS massive body object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( pl => self , npl => self % nbody ) allocate ( ind ( npl )) select case ( sortby ) case ( \"nenc\" ) call util_sort ( direction * pl % nenc ( 1 : npl ), ind ( 1 : npl )) case ( \"tpenc1P\" ) call util_sort ( direction * pl % tpenc1P ( 1 : npl ), ind ( 1 : npl )) case ( \"plind\" ) call util_sort ( direction * pl % plind ( 1 : npl ), ind ( 1 : npl )) case ( \"outer\" , \"inner\" , \"planetocentric\" , \"lplanetocentric\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class call whm_util_sort_pl ( pl , sortby , ascending ) return end select call pl % rearrange ( ind ) end associate return end subroutine rmvs_util_sort_pl module subroutine rmvs_util_sort_tp ( self , sortby , ascending ) !! author: David A. Minton !! !! Sort a RMVS test particle object in-place. !! sortby is a string indicating which array component to sort. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object character ( * ), intent ( in ) :: sortby !! Sorting attribute logical , intent ( in ) :: ascending !! Logical flag indicating whether or not the sorting should be in ascending or descending order ! Internals integer ( I4B ), dimension (:), allocatable :: ind integer ( I4B ) :: direction if ( self % nbody == 0 ) return if ( ascending ) then direction = 1 else direction = - 1 end if associate ( tp => self , ntp => self % nbody ) allocate ( ind ( ntp )) select case ( sortby ) case ( \"plperP\" ) call util_sort ( direction * tp % plperP ( 1 : ntp ), ind ( 1 : ntp )) case ( \"plencP\" ) call util_sort ( direction * tp % plencP ( 1 : ntp ), ind ( 1 : ntp )) case ( \"lperi\" , \"cb_heliocentric\" , \"xheliocentric\" , \"index\" , \"ipleP\" , \"lplanetocentric\" ) write ( * , * ) 'Cannot sort by ' // trim ( adjustl ( sortby )) // '. Component not sortable!' case default ! Look for components in the parent class (*NOTE whm_tp does not need its own sort method, so we go straight to the swiftest_tp method) call util_sort_tp ( tp , sortby , ascending ) return end select call tp % rearrange ( ind ) end associate return end subroutine rmvs_util_sort_tp module subroutine rmvs_util_sort_rearrange_pl ( self , ind ) !! author: David A. Minton !! !! Rearrange RMVS massive body structure in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) if ( self % nbody == 0 ) return associate ( pl => self , npl => self % nbody ) call util_sort_rearrange ( pl % nenc , ind , npl ) call util_sort_rearrange ( pl % tpenc1P , ind , npl ) call util_sort_rearrange ( pl % plind , ind , npl ) call util_sort_rearrange_pl ( pl , ind ) end associate return end subroutine rmvs_util_sort_rearrange_pl module subroutine rmvs_util_sort_rearrange_tp ( self , ind ) !! author: David A. Minton !! !! Rearrange RMVS test particle object in-place from an index list. !! This is a helper utility used to make polymorphic sorting work on Swiftest structures. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), dimension (:), intent ( in ) :: ind !! Index array used to restructure the body (should contain all 1:n index values in the desired order) if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody ) call util_sort_rearrange ( tp % lperi , ind , ntp ) call util_sort_rearrange ( tp % plperP , ind , ntp ) call util_sort_rearrange ( tp % plencP , ind , ntp ) call util_sort_rearrange ( tp % xheliocentric , ind , ntp ) call util_sort_rearrange_tp ( tp , ind ) end associate return end subroutine rmvs_util_sort_rearrange_tp module subroutine rmvs_util_spill_pl ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) RMVS test particle structure from active list to discard list !! !! Adapted from David E. Kaufmann's Swifter routine discard_discard_spill.f90 implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS massive body body object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( discards ) class is ( rmvs_pl ) call util_spill ( keeps % nenc , discards % nenc , lspill_list , ldestructive ) call util_spill ( keeps % tpenc1P , discards % tpenc1P , lspill_list , ldestructive ) call util_spill ( keeps % plind , discards % plind , lspill_list , ldestructive ) call whm_util_spill_pl ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class rmvs_pl or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_spill_pl module subroutine rmvs_util_spill_tp ( self , discards , lspill_list , ldestructive ) !! author: David A. Minton !! !! Move spilled (discarded) RMVS test particle structure from active list to discard list !! !! Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( swiftest_body ), intent ( inout ) :: discards !! Discarded object logical , dimension (:), intent ( in ) :: lspill_list !! Logical array of bodies to spill into the discards logical , intent ( in ) :: ldestructive !! Logical flag indicating whether or not this operation should alter the keeps array or not ! Internals integer ( I4B ) :: i associate ( keeps => self ) select type ( discards ) class is ( rmvs_tp ) call util_spill ( keeps % lperi , discards % lperi , lspill_list , ldestructive ) call util_spill ( keeps % plperP , discards % plperP , lspill_list , ldestructive ) call util_spill ( keeps % plencP , discards % plencP , lspill_list , ldestructive ) call util_spill_tp ( keeps , discards , lspill_list , ldestructive ) class default write ( * , * ) \"Invalid object passed to the spill method. Source must be of class rmvs_tp or its descendents!\" call util_exit ( FAILURE ) end select end associate return end subroutine rmvs_util_spill_tp end submodule s_rmvs_util","tags":"","loc":"sourcefile/rmvs_util.f90.html"},{"title":"rmvs_kick.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_kick.f90~~EfferentGraph sourcefile~rmvs_kick.f90 rmvs_kick.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_kick.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_kick.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_kick Source Code rmvs_kick.f90 Source Code submodule ( rmvs_classes ) s_rmvs_kick use swiftest contains module subroutine rmvs_kick_getacch_tp ( self , system , param , t , lbeg ) !! author: David A. Minton !! !! Compute the oblateness acceleration in the inner encounter region with planets !! !! Performs a similar task as David E. Kaufmann's Swifter routine rmvs_kick_getacch_tp.f90, but !! uses object polymorphism, and so is not directly adapted. implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle data structure class ( swiftest_nbody_system ), intent ( inout ) :: system !! Swiftest central body particle data structuree class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current time logical , intent ( in ) :: lbeg !! Logical flag that determines whether or not this is the beginning or end of the step ! Internals class ( swiftest_parameters ), allocatable :: param_planetocen real ( DP ), dimension (:, :), allocatable :: xh_original real ( DP ) :: GMcb_original integer ( I4B ) :: i if ( self % nbody == 0 ) return associate ( tp => self , ntp => self % nbody , ipleP => self % ipleP , inner_index => self % index ) select type ( system ) class is ( rmvs_nbody_system ) if ( system % lplanetocentric ) then ! This is a close encounter step, so any accelerations requiring heliocentric position values ! must be handeled outside the normal WHM method call select type ( pl => system % pl ) class is ( rmvs_pl ) select type ( cb => system % cb ) class is ( rmvs_cb ) associate ( xpc => pl % xh , xpct => self % xh , apct => self % ah , system_planetocen => system ) system_planetocen % lbeg = lbeg ! Save the original heliocentric position for later allocate ( xh_original , source = tp % xh ) ! Temporarily turn off the heliocentric-dependent acceleration terms during an inner encounter using a copy of the parameter list with all of the heliocentric-specific acceleration terms turned off allocate ( param_planetocen , source = param ) param_planetocen % loblatecb = . false . param_planetocen % lextra_force = . false . param_planetocen % lgr = . false . ! Compute the planetocentric values of acceleration call whm_kick_getacch_tp ( tp , system_planetocen , param_planetocen , t , lbeg ) ! Now compute any heliocentric values of acceleration if ( tp % lfirst ) then do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % xheliocentric (:, i ) = tp % xh (:, i ) + cb % inner ( inner_index - 1 )% x (:, 1 ) end do else do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % xheliocentric (:, i ) = tp % xh (:, i ) + cb % inner ( inner_index )% x (:, 1 ) end do end if ! Swap the planetocentric and heliocentric position vectors and central body masses do concurrent ( i = 1 : ntp , tp % lmask ( i )) tp % xh (:, i ) = tp % xheliocentric (:, i ) end do GMcb_original = cb % Gmass cb % Gmass = tp % cb_heliocentric % Gmass ! If the heliocentric-specifc acceleration terms are requested, compute those now if ( param % loblatecb ) call tp % accel_obl ( system_planetocen ) if ( param % lextra_force ) call tp % accel_user ( system_planetocen , param , t , lbeg ) if ( param % lgr ) call tp % accel_gr ( param ) ! Put everything back the way we found it call move_alloc ( xh_original , tp % xh ) cb % Gmass = GMcb_original end associate end select end select else ! Not a close encounter, so just proceded with the standard WHM method call whm_kick_getacch_tp ( tp , system , param , t , lbeg ) end if end select end associate return end subroutine rmvs_kick_getacch_tp end submodule s_rmvs_kick","tags":"","loc":"sourcefile/rmvs_kick.f90.html"},{"title":"rmvs_io.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_io.f90~~EfferentGraph sourcefile~rmvs_io.f90 rmvs_io.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_io.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_io.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_io Source Code rmvs_io.f90 Source Code submodule ( rmvs_classes ) s_rmvs_io use swiftest contains module subroutine rmvs_io_write_encounter ( t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , & xh1 , xh2 , vh1 , vh2 , enc_out ) !! author: David A. Minton !! !! Write close encounter data from RMVS to output binary files !!  There is no direct file output from this subroutine !! !! Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90 !! Adapted from Hal Levison's Swift routine io_write_encounter.f implicit none ! Arguments integer ( I4B ), intent ( in ) :: id1 , id2 real ( DP ), intent ( in ) :: t , Gmass1 , Gmass2 , radius1 , radius2 real ( DP ), dimension (:), intent ( in ) :: xh1 , xh2 , vh1 , vh2 character ( * ), intent ( in ) :: enc_out ! Internals logical , save :: lfirst = . true . integer ( I4B ), parameter :: LUN = 30 integer ( I4B ) :: ierr if ( enc_out == \"\" ) return open ( unit = LUN , file = enc_out , status = 'OLD' , position = 'APPEND' , form = 'UNFORMATTED' , iostat = ierr ) if (( ierr /= 0 ) . and . lfirst ) then open ( unit = LUN , file = enc_out , status = 'NEW' , form = 'UNFORMATTED' , iostat = ierr ) end if if ( ierr /= 0 ) then write ( * , * ) \"Swiftest Error:\" write ( * , * ) \"   Unable to open binary encounter file\" call util_exit ( FAILURE ) end if lfirst = . false . call io_write_frame_encounter ( LUN , t , id1 , id2 , Gmass1 , Gmass2 , radius1 , radius2 , xh1 , xh2 , vh1 , vh2 ) close ( unit = LUN , iostat = ierr ) if ( ierr /= 0 ) then write ( * , * ) \"Swiftest Error:\" write ( * , * ) \"   Unable to close binary encounter file\" call util_exit ( FAILURE ) end if return end subroutine rmvs_io_write_encounter end submodule s_rmvs_io","tags":"","loc":"sourcefile/rmvs_io.f90.html"},{"title":"rmvs_setup.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_setup.f90~~EfferentGraph sourcefile~rmvs_setup.f90 rmvs_setup.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_setup.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_setup.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_setup Source Code rmvs_setup.f90 Source Code submodule ( rmvs_classes ) s_rmvs_setup use swiftest contains module subroutine rmvs_setup_pl ( self , n , param ) !! author: David A. Minton !! !! Allocate RMVS test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine rmvs_setup.f90 implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter ! Internals integer ( I4B ) :: i , j !> Call allocation method for parent class associate ( pl => self ) call whm_setup_pl ( pl , n , param ) if ( n < 0 ) return if ( allocated ( pl % outer )) deallocate ( pl % outer ) if ( allocated ( pl % inner )) deallocate ( pl % inner ) if ( allocated ( pl % nenc )) deallocate ( pl % nenc ) if ( n == 0 ) return allocate ( pl % outer ( 0 : NTENC )) allocate ( pl % inner ( 0 : NTPHENC )) if (. not . pl % lplanetocentric ) then allocate ( pl % nenc ( n )) pl % nenc (:) = 0 ! Set up inner and outer planet interpolation vector storage containers do i = 0 , NTENC allocate ( pl % outer ( i )% x ( NDIM , n )) allocate ( pl % outer ( i )% v ( NDIM , n )) pl % outer ( i )% x (:,:) = 0.0_DP pl % outer ( i )% v (:,:) = 0.0_DP end do do i = 0 , NTPHENC allocate ( pl % inner ( i )% x ( NDIM , n )) allocate ( pl % inner ( i )% v ( NDIM , n )) pl % inner ( i )% x (:,:) = 0.0_DP pl % inner ( i )% v (:,:) = 0.0_DP end do if ( param % loblatecb ) then do i = 0 , NTPHENC allocate ( pl % inner ( i )% aobl ( NDIM , n )) pl % inner ( i )% aobl (:,:) = 0.0_DP end do end if if ( param % ltides ) then do i = 0 , NTPHENC allocate ( pl % inner ( i )% atide ( NDIM , n )) pl % inner ( i )% atide (:,:) = 0.0_DP end do end if end if end associate return end subroutine rmvs_setup_pl module subroutine rmvs_setup_initialize_system ( self , param ) !! author: David A. Minton !! !! Initialize an RMVS nbody system from files and sets up the planetocentric structures. !! !! We currently rearrange the pl order to keep it consistent with the way Swifter does it !! In Swifter, the central body occupies the first position in the pl list, and during !! encounters, the encountering planet is skipped in loops. In Swiftest, we instantiate an !! RMVS nbody system object attached to each pl to store planetocentric versions of the system !! to use during close encounters. implicit none ! Arguments class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , j ! Call parent method call whm_setup_initialize_system ( self , param ) ! Set up the pl-tp planetocentric encounter structures for pl and cb. The planetocentric tp structures are ! generated as necessary during close encounter steps. select type ( pl => self % pl ) class is ( rmvs_pl ) select type ( cb => self % cb ) class is ( rmvs_cb ) select type ( tp => self % tp ) class is ( rmvs_tp ) tp % cb_heliocentric = cb pl % lplanetocentric = . false . tp % lplanetocentric = . false . cb % lplanetocentric = . false . associate ( npl => pl % nbody ) allocate ( pl % planetocentric ( npl )) pl % planetocentric (:)% lplanetocentric = . true . do i = 1 , npl allocate ( pl % planetocentric ( i )% cb , source = cb ) allocate ( rmvs_pl :: pl % planetocentric ( i )% pl ) select type ( cbenci => pl % planetocentric ( i )% cb ) class is ( rmvs_cb ) select type ( plenci => pl % planetocentric ( i )% pl ) class is ( rmvs_pl ) cbenci % lplanetocentric = . true . plenci % lplanetocentric = . true . call plenci % setup ( npl , param ) plenci % status (:) = ACTIVE plenci % lmask (:) = . true . ! plind stores the heliocentric index value of a planetocentric planet ! e.g. Consider an encounter with planet 3. ! Then the following will be the values of plind: ! pl%planetocentric(3)%pl%plind(1) = 0 (central body - never used) ! pl%planetocentric(3)%pl%plind(2) = 1 ! pl%planetocentric(3)%pl%plind(3) = 2 ! pl%planetocentric(3)%pl%plind(4) = 4 ! pl%planetocentric(3)%pl%plind(5) = 5 ! etc. allocate ( plenci % plind ( npl )) plenci % plind ( 1 : npl ) = [( j , j = 1 , npl )] plenci % plind ( 2 : npl ) = pack ( plenci % plind ( 1 : npl ), plenci % plind ( 1 : npl ) /= i ) plenci % plind ( 1 ) = 0 plenci % Gmass ( 1 ) = cb % Gmass plenci % Gmass ( 2 : npl ) = pl % Gmass ( plenci % plind ( 2 : npl )) cbenci % Gmass = pl % Gmass ( i ) end select end select end do end associate end select end select end select return end subroutine rmvs_setup_initialize_system module subroutine rmvs_setup_tp ( self , n , param ) !! author: David A. Minton !! !! Allocate WHM test particle structure !! !! Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object integer ( I4B ), intent ( in ) :: n !! Number of particles to allocate space for class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameter !> Call allocation method for parent class. In this case, whm does not have its own setup method, so we use the base method for swiftest_tp call setup_tp ( self , n , param ) if ( n < 0 ) return if ( allocated ( self % lperi )) deallocate ( self % lperi ) if ( allocated ( self % plperP )) deallocate ( self % plperP ) if ( allocated ( self % plencP )) deallocate ( self % plencP ) if ( n == 0 ) return allocate ( self % lperi ( n )) allocate ( self % plperP ( n )) allocate ( self % plencP ( n )) if ( self % lplanetocentric ) then if ( allocated ( self % xheliocentric )) deallocate ( self % xheliocentric ) allocate ( self % xheliocentric ( NDIM , n )) end if self % lperi (:) = . false . return end subroutine rmvs_setup_tp end submodule s_rmvs_setup","tags":"","loc":"sourcefile/rmvs_setup.f90.html"},{"title":"rmvs_step.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_step.f90~~EfferentGraph sourcefile~rmvs_step.f90 rmvs_step.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_step.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_step.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_step Source Code rmvs_step.f90 Source Code submodule ( rmvs_classes ) s_rmvs_step use swiftest contains module subroutine rmvs_step_system ( self , param , t , dt ) !! author: David A. Minton !! !! Step massive bodies and and active test particles ahead in heliocentric coordinates !! !! Adapted from Hal Levison's Swift routine rmvs3_step.f !! Adapted from David E. Kaufmann's Swifter routine rmvs_step.f90 implicit none ! Arguments class ( rmvs_nbody_system ), intent ( inout ) :: self !! RMVS nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsiz ! Internals logical :: lencounter , lfirstpl , lfirsttp real ( DP ) :: rts real ( DP ), dimension (:,:), allocatable :: xbeg , xend , vbeg integer ( I4B ) :: i if ( self % tp % nbody == 0 ) call whm_step_system ( self , param , t , dt ) select type ( cb => self % cb ) class is ( rmvs_cb ) select type ( pl => self % pl ) class is ( rmvs_pl ) select type ( tp => self % tp ) class is ( rmvs_tp ) associate ( system => self , ntp => tp % nbody , npl => pl % nbody ) allocate ( xbeg , source = pl % xh ) allocate ( vbeg , source = pl % vh ) call pl % set_beg_end ( xbeg = xbeg , vbeg = vbeg ) ! ****** Check for close encounters ***** ! system % rts = RHSCALE lencounter = tp % encounter_check ( system , dt ) if ( lencounter ) then lfirstpl = pl % lfirst pl % outer ( 0 )% x (:, 1 : npl ) = xbeg (:, 1 : npl ) pl % outer ( 0 )% v (:, 1 : npl ) = vbeg (:, 1 : npl ) call pl % step ( system , param , t , dt ) pl % outer ( NTENC )% x (:, 1 : npl ) = pl % xh (:, 1 : npl ) pl % outer ( NTENC )% v (:, 1 : npl ) = pl % vh (:, 1 : npl ) call rmvs_interp_out ( cb , pl , dt ) call rmvs_step_out ( cb , pl , tp , system , param , t , dt ) tp % lmask ( 1 : ntp ) = . not . tp % lmask ( 1 : ntp ) call pl % set_beg_end ( xbeg = xbeg , xend = xend ) tp % lfirst = . true . call tp % step ( system , param , t , dt ) tp % lmask ( 1 : ntp ) = . true . pl % lfirst = lfirstpl tp % lfirst = . true . if ( param % ltides ) call system % step_spin ( param , t , dt ) else call whm_step_system ( system , param , t , dt ) end if end associate end select end select end select return end subroutine rmvs_step_system subroutine rmvs_interp_out ( cb , pl , dt ) !! author: David A. Minton !! !! Interpolate planet positions between two Keplerian orbits in outer encounter region !! !! Adapted from David E. Kaufmann's Swifter routine rmvs_interp_out.f90 !! !! Adapted from Hal Levison's Swift routine rmvs3_interp.f implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object real ( DP ), intent ( in ) :: dt !! Step size ! Internals integer ( I4B ) :: i , outer_index real ( DP ) :: frac , dntenc real ( DP ), dimension (:,:), allocatable :: xtmp , vtmp real ( DP ), dimension (:), allocatable :: GMcb , dto integer ( I4B ), dimension (:), allocatable :: iflag dntenc = real ( NTENC , kind = DP ) associate ( npl => pl % nbody ) allocate ( xtmp , mold = pl % xh ) allocate ( vtmp , mold = pl % vh ) allocate ( GMcb ( npl )) allocate ( dto ( npl )) allocate ( iflag ( npl )) dto ( 1 : npl ) = dt / dntenc GMcb ( 1 : npl ) = cb % Gmass xtmp (:, 1 : npl ) = pl % outer ( 0 )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % outer ( 0 )% v (:, 1 : npl ) do outer_index = 1 , NTENC - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & dto ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), dto ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( FAILURE ) end if end do end if frac = 1.0_DP - outer_index / dntenc pl % outer ( outer_index )% x (:, 1 : npl ) = frac * xtmp (:, 1 : npl ) pl % outer ( outer_index )% v (:, 1 : npl ) = frac * vtmp (:, 1 : npl ) end do xtmp (:, 1 : npl ) = pl % outer ( NTENC )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % outer ( NTENC )% v (:, 1 : npl ) do outer_index = NTENC - 1 , 1 , - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & - dto ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), - dto ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( FAILURE ) end if end do end if frac = outer_index / dntenc pl % outer ( outer_index )% x (:, 1 : npl ) = pl % outer ( outer_index )% x (:, 1 : npl ) + frac * xtmp (:, 1 : npl ) pl % outer ( outer_index )% v (:, 1 : npl ) = pl % outer ( outer_index )% v (:, 1 : npl ) + frac * vtmp (:, 1 : npl ) end do end associate return end subroutine rmvs_interp_out subroutine rmvs_step_out ( cb , pl , tp , system , param , t , dt ) !! author: David A. Minton !! !! Step ACTIVE test particles ahead in the outer encounter region, setting up and calling the inner region !!    integration if necessar !! !! Adapted from Hal Levison's Swift routines rmvs3_step_out.f and rmvs3_step_out2.f !! Adapted from David E. Kaufmann's Swifter routines rmvs_step_out.f90 and rmvs_step_out2.f90 implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: t !! Current simulation time real ( DP ), intent ( in ) :: dt !! Current stepsiz ! Internals integer ( I4B ) :: outer_index , j , k real ( DP ) :: dto , outer_time , rts logical :: lencounter , lfirsttp associate ( npl => pl % nbody , ntp => tp % nbody ) dto = dt / NTENC where ( tp % plencP ( 1 : ntp ) == 0 ) tp % lmask ( 1 : ntp ) = . false . elsewhere tp % lperi ( 1 : ntp ) = . false . end where do outer_index = 1 , NTENC outer_time = t + ( outer_index - 1 ) * dto call pl % set_beg_end ( xbeg = pl % outer ( outer_index - 1 )% x (:, 1 : npl ), & vbeg = pl % outer ( outer_index - 1 )% v (:, 1 : npl ), & xend = pl % outer ( outer_index )% x (:, 1 : npl )) system % rts = RHPSCALE lencounter = tp % encounter_check ( system , dto ) if ( lencounter ) then ! Interpolate planets in inner encounter region call rmvs_interp_in ( cb , pl , system , param , dto , outer_index ) ! Step through the inner region call rmvs_step_in ( cb , pl , tp , param , outer_time , dto ) lfirsttp = tp % lfirst tp % lfirst = . true . call tp % step ( system , param , outer_time , dto ) tp % lfirst = lfirsttp else call tp % step ( system , param , outer_time , dto ) end if do j = 1 , npl if ( pl % nenc ( j ) == 0 ) cycle tp % lfirst = . true . where (( tp % plencP ( 1 : ntp ) == j ) . and . (. not . tp % lmask ( 1 : ntp ))) tp % lmask ( 1 : ntp ) = . true . end where end do end do end associate return end subroutine rmvs_step_out subroutine rmvs_interp_in ( cb , pl , system , param , dt , outer_index ) !! author: David A. Minton !! !! Interpolate planet positions between two Keplerian orbits in inner encounter regio !! !! Adapted from David E. Kaufmann's Swifter routine rmvs_interp_in.f90 !! !! Adapted from Hal Levison's Swift routine rmvs3_interp.f implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS cenral body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object class ( swiftest_parameters ), intent ( in ) :: param !! Swiftest parameters file real ( DP ), intent ( in ) :: dt !! Step size integer ( I4B ), intent ( in ) :: outer_index !! Outer substep number within current set ! Internals integer ( I4B ) :: i , inner_index real ( DP ) :: frac , dntphenc real ( DP ), dimension (:,:), allocatable :: xtmp , vtmp , xh_original , ah_original real ( DP ), dimension (:), allocatable :: GMcb , dti integer ( I4B ), dimension (:), allocatable :: iflag associate ( npl => system % pl % nbody ) dntphenc = real ( NTPHENC , kind = DP ) ! Set the endpoints of the inner region from the outer region values in the current outer step index pl % inner ( 0 )% x (:, 1 : npl ) = pl % outer ( outer_index - 1 )% x (:, 1 : npl ) pl % inner ( 0 )% v (:, 1 : npl ) = pl % outer ( outer_index - 1 )% v (:, 1 : npl ) pl % inner ( NTPHENC )% x (:, 1 : npl ) = pl % outer ( outer_index )% x (:, 1 : npl ) pl % inner ( NTPHENC )% v (:, 1 : npl ) = pl % outer ( outer_index )% v (:, 1 : npl ) allocate ( xtmp , mold = pl % xh ) allocate ( vtmp , mold = pl % vh ) allocate ( GMcb ( npl )) allocate ( dti ( npl )) allocate ( iflag ( npl )) dti ( 1 : npl ) = dt / dntphenc GMcb ( 1 : npl ) = cb % Gmass xtmp (:, 1 : npl ) = pl % inner ( 0 )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % inner ( 0 )% v (:, 1 : npl ) if (( param % loblatecb ) . or . ( param % ltides )) then allocate ( xh_original , source = pl % xh ) allocate ( ah_original , source = pl % ah ) pl % xh (:, 1 : npl ) = xtmp (:, 1 : npl ) ! Temporarily replace heliocentric position with inner substep values to calculate the oblateness terms end if if ( param % loblatecb ) then call pl % accel_obl ( system ) pl % inner ( 0 )% aobl (:, 1 : npl ) = pl % aobl (:, 1 : npl ) ! Save the oblateness acceleration on the planet for this substep end if if ( param % ltides ) then call pl % accel_tides ( system ) pl % inner ( 0 )% atide (:, 1 : npl ) = pl % atide (:, 1 : npl ) ! Save the oblateness acceleration on the planet for this substep end if do inner_index = 1 , NTPHENC - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & dti ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), dti ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( failure ) end if end do end if frac = 1.0_DP - inner_index / dntphenc pl % inner ( inner_index )% x (:, 1 : npl ) = frac * xtmp (:, 1 : npl ) pl % inner ( inner_index )% v (:, 1 : npl ) = frac * vtmp (:, 1 : npl ) end do xtmp (:, 1 : npl ) = pl % inner ( NTPHENC )% x (:, 1 : npl ) vtmp (:, 1 : npl ) = pl % inner ( NTPHENC )% v (:, 1 : npl ) do inner_index = NTPHENC - 1 , 1 , - 1 call drift_one ( GMcb ( 1 : npl ), xtmp ( 1 , 1 : npl ), xtmp ( 2 , 1 : npl ), xtmp ( 3 , 1 : npl ), & vtmp ( 1 , 1 : npl ), vtmp ( 2 , 1 : npl ), vtmp ( 3 , 1 : npl ), & - dti ( 1 : npl ), iflag ( 1 : npl )) if ( any ( iflag ( 1 : npl ) /= 0 )) then do i = 1 , npl if ( iflag ( i ) /= 0 ) then write ( * , * ) \" Planet \" , pl % id ( i ), \" is lost!!!!!!!!!!\" write ( * , * ) GMcb ( i ), - dti ( i ) write ( * , * ) xtmp (:, i ) write ( * , * ) vtmp (:, i ) write ( * , * ) \" STOPPING \" call util_exit ( failure ) end if end do end if frac = inner_index / dntphenc pl % inner ( inner_index )% x (:, 1 : npl ) = pl % inner ( inner_index )% x (:, 1 : npl ) + frac * xtmp (:, 1 : npl ) pl % inner ( inner_index )% v (:, 1 : npl ) = pl % inner ( inner_index )% v (:, 1 : npl ) + frac * vtmp (:, 1 : npl ) if ( param % loblatecb ) then pl % xh (:, 1 : npl ) = pl % inner ( inner_index )% x (:, 1 : npl ) call pl % accel_obl ( system ) pl % inner ( inner_index )% aobl (:, 1 : npl ) = pl % aobl (:, 1 : npl ) end if if ( param % ltides ) then call pl % accel_tides ( system ) pl % inner ( inner_index )% atide (:, 1 : npl ) = pl % atide (:, 1 : npl ) end if end do if ( param % loblatecb ) then ! Calculate the final value of oblateness accelerations at the final inner substep pl % xh (:, 1 : npl ) = pl % inner ( NTPHENC )% x (:, 1 : npl ) call pl % accel_obl ( system ) pl % inner ( NTPHENC )% aobl (:, 1 : npl ) = pl % aobl (:, 1 : npl ) end if if ( param % ltides ) then call pl % accel_tides ( system ) pl % inner ( NTPHENC )% atide (:, 1 : npl ) = pl % atide (:, 1 : npl ) end if ! Put the planet positions and accelerations back into place if ( allocated ( xh_original )) call move_alloc ( xh_original , pl % xh ) if ( allocated ( ah_original )) call move_alloc ( ah_original , pl % ah ) end associate return end subroutine rmvs_interp_in subroutine rmvs_step_in ( cb , pl , tp , param , outer_time , dto ) !! author: David A. Minton !! !! Step active test particles ahead in the inner encounter region !! !! Adapted from Hal Levison's Swift routine rmvs3_step_in.f !! Adapted from David E. Kaufmann's Swifter routine rmvs_step_in.f90 implicit none ! Arguments class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object class ( swiftest_parameters ), intent ( inout ) :: param !! Current run configuration parameters real ( DP ), intent ( in ) :: outer_time !! Current time real ( DP ), intent ( in ) :: dto !! Outer step size ! Internals logical :: lfirsttp integer ( I4B ) :: i , j , ipleP real ( DP ) :: dti , inner_time associate ( npl => pl % nbody ) dti = dto / NTPHENC call rmvs_make_planetocentric ( param , cb , pl , tp ) do i = 1 , npl if ( pl % nenc ( i ) == 0 ) cycle select type ( planetocen_system => pl % planetocentric ( i )) class is ( rmvs_nbody_system ) select type ( cbenci => planetocen_system % cb ) class is ( rmvs_cb ) select type ( plenci => planetocen_system % pl ) class is ( rmvs_pl ) select type ( tpenci => planetocen_system % tp ) class is ( rmvs_tp ) associate ( inner_index => tpenci % index ) ! There are inner encounters with this planet...switch to planetocentric coordinates to proceed tpenci % lfirst = . true . inner_time = outer_time call rmvs_peri_tp ( tpenci , pl , inner_time , dti , . true ., 0 , i , param ) ! now step the encountering test particles fully through the inner encounter lfirsttp = . true . do inner_index = 1 , NTPHENC ! Integrate over the encounter region, using the \"substitute\" planetocentric systems at each level plenci % xh (:, 1 : npl ) = plenci % inner ( inner_index - 1 )% x (:, 1 : npl ) call plenci % set_beg_end ( xbeg = plenci % inner ( inner_index - 1 )% x , & xend = plenci % inner ( inner_index )% x ) if ( param % loblatecb ) then cbenci % aoblbeg = cbenci % inner ( inner_index - 1 )% aobl (:, 1 ) cbenci % aoblend = cbenci % inner ( inner_index )% aobl (:, 1 ) end if if ( param % ltides ) then cbenci % atidebeg = cbenci % inner ( inner_index - 1 )% atide (:, 1 ) cbenci % atideend = cbenci % inner ( inner_index )% atide (:, 1 ) end if call tpenci % step ( planetocen_system , param , inner_time , dti ) do j = 1 , pl % nenc ( i ) tpenci % xheliocentric (:, j ) = tpenci % xh (:, j ) + pl % inner ( inner_index )% x (:, i ) end do inner_time = outer_time + j * dti call rmvs_peri_tp ( tpenci , pl , inner_time , dti , . false ., inner_index , i , param ) end do tpenci % lmask (:) = . false . end associate end select end select end select end select end do call rmvs_end_planetocentric ( pl , tp ) end associate return end subroutine rmvs_step_in subroutine rmvs_make_planetocentric ( param , cb , pl , tp ) !! author: David A. Minton !! !! When encounters are detected, this method will call the interpolation methods for the planets and !! creates a Swiftest test particle structure for each planet's encountering test particles to simplify the !! planetocentric calculations. This subroutine is not based on an existing one from Swift and Swifter !! implicit none ! Arguments class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration paramete class ( rmvs_cb ), intent ( inout ) :: cb !! RMVS central body object class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object ! Internals integer ( I4B ) :: i , j , inner_index , ipc2hc logical , dimension (:), allocatable :: encmask associate ( npl => pl % nbody , ntp => tp % nbody ) do i = 1 , npl if ( pl % nenc ( i ) == 0 ) cycle ! There are inner encounters with this planet if ( allocated ( encmask )) deallocate ( encmask ) allocate ( encmask ( ntp )) encmask ( 1 : ntp ) = tp % plencP ( 1 : ntp ) == i allocate ( rmvs_tp :: pl % planetocentric ( i )% tp ) ! Create encountering test particle structure select type ( cbenci => pl % planetocentric ( i )% cb ) class is ( rmvs_cb ) select type ( plenci => pl % planetocentric ( i )% pl ) class is ( rmvs_pl ) select type ( tpenci => pl % planetocentric ( i )% tp ) class is ( rmvs_tp ) tpenci % lplanetocentric = . true . associate ( nenci => pl % nenc ( i )) call tpenci % setup ( nenci , param ) tpenci % cb_heliocentric = cb tpenci % ipleP = i tpenci % lmask ( 1 : nenci ) = . true . tpenci % status ( 1 : nenci ) = ACTIVE ! Grab all the encountering test particles and convert them to a planetocentric frame tpenci % id ( 1 : nenci ) = pack ( tp % id ( 1 : ntp ), encmask ( 1 : ntp )) do j = 1 , NDIM tpenci % xheliocentric ( j , 1 : nenci ) = pack ( tp % xh ( j , 1 : ntp ), encmask (:)) tpenci % xh ( j , 1 : nenci ) = tpenci % xheliocentric ( j , 1 : nenci ) - pl % inner ( 0 )% x ( j , i ) tpenci % vh ( j , 1 : nenci ) = pack ( tp % vh ( j , 1 : ntp ), encmask ( 1 : ntp )) - pl % inner ( 0 )% v ( j , i ) end do tpenci % lperi ( 1 : nenci ) = pack ( tp % lperi ( 1 : ntp ), encmask ( 1 : ntp )) tpenci % plperP ( 1 : nenci ) = pack ( tp % plperP ( 1 : ntp ), encmask ( 1 : ntp )) ! Make sure that the test particles get the planetocentric value of mu allocate ( cbenci % inner ( 0 : NTPHENC )) do inner_index = 0 , NTPHENC allocate ( plenci % inner ( inner_index )% x , mold = pl % inner ( inner_index )% x ) allocate ( plenci % inner ( inner_index )% v , mold = pl % inner ( inner_index )% x ) allocate ( cbenci % inner ( inner_index )% x ( NDIM , 1 )) allocate ( cbenci % inner ( inner_index )% v ( NDIM , 1 )) cbenci % inner ( inner_index )% x (:, 1 ) = pl % inner ( inner_index )% x (:, i ) cbenci % inner ( inner_index )% v (:, 1 ) = pl % inner ( inner_index )% v (:, i ) plenci % inner ( inner_index )% x (:, 1 ) = - cbenci % inner ( inner_index )% x (:, 1 ) plenci % inner ( inner_index )% v (:, 1 ) = - cbenci % inner ( inner_index )% v (:, 1 ) if ( param % loblatecb ) then allocate ( plenci % inner ( inner_index )% aobl , mold = pl % inner ( inner_index )% aobl ) allocate ( cbenci % inner ( inner_index )% aobl ( NDIM , 1 )) cbenci % inner ( inner_index )% aobl (:, 1 ) = pl % inner ( inner_index )% aobl (:, i ) end if if ( param % ltides ) then allocate ( plenci % inner ( inner_index )% atide , mold = pl % inner ( inner_index )% atide ) allocate ( cbenci % inner ( inner_index )% atide ( NDIM , 1 )) cbenci % inner ( inner_index )% atide (:, 1 ) = pl % inner ( inner_index )% atide (:, i ) end if do j = 2 , npl ipc2hc = plenci % plind ( j ) plenci % inner ( inner_index )% x (:, j ) = pl % inner ( inner_index )% x (:, ipc2hc ) - cbenci % inner ( inner_index )% x (:, 1 ) plenci % inner ( inner_index )% v (:, j ) = pl % inner ( inner_index )% v (:, ipc2hc ) - cbenci % inner ( inner_index )% v (:, 1 ) end do end do call tpenci % set_mu ( cbenci ) end associate end select end select end select end do end associate return end subroutine rmvs_make_planetocentric subroutine rmvs_peri_tp ( tp , pl , t , dt , lfirst , inner_index , ipleP , param ) !! author: David A. Minton !! !! Determine planetocentric pericenter passages for test particles in close encounters with a planet !! !! Adapted from Hal Levison's Swift routine Adapted from Hal Levison's Swift routine util_peri.f !! Adapted from David E. Kaufmann's Swifter routine rmvs_peri.f90 implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle object (planetocentric) class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object (heliocentric) real ( DP ), intent ( in ) :: t !! current time real ( DP ), intent ( in ) :: dt !! step size logical , intent ( in ) :: lfirst !! Logical flag indicating whether current invocation is the first integer ( I4B ), intent ( in ) :: inner_index !! Outer substep number within current set integer ( I4B ), intent ( in ) :: ipleP !!  index of RMVS planet being closely encountered class ( swiftest_parameters ), intent ( in ) :: param !! Current run configuration parameters ! Internals integer ( I4B ) :: i , id1 , id2 real ( DP ) :: r2 , mu , rhill2 , vdotr , a , peri , capm , tperi , rpl real ( DP ), dimension ( NDIM ) :: xh1 , xh2 , vh1 , vh2 rhill2 = pl % rhill ( ipleP ) ** 2 mu = pl % Gmass ( ipleP ) associate ( nenc => tp % nbody , xpc => tp % xh , vpc => tp % vh ) if ( lfirst ) then do i = 1 , nenc if ( tp % lmask ( i )) then vdotr = dot_product ( xpc (:, i ), vpc (:, i )) if ( vdotr > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end do else do i = 1 , nenc if ( tp % lmask ( i )) then vdotr = dot_product ( xpc (:, i ), vpc (:, i )) if ( tp % isperi ( i ) == - 1 ) then if ( vdotr >= 0.0_DP ) then tp % isperi ( i ) = 0 call orbel_xv2aqt ( mu , xpc (:, i ), vpc (:, i ), a , peri , capm , tperi ) r2 = dot_product ( xpc (:, i ), xpc (:, i )) if (( abs ( tperi ) > FACQDT * dt ) . or . ( r2 > rhill2 )) peri = sqrt ( r2 ) if ( param % enc_out /= \"\" ) then id1 = pl % id ( ipleP ) rpl = pl % radius ( ipleP ) xh1 (:) = pl % inner ( inner_index )% x (:, ipleP ) vh1 (:) = pl % inner ( inner_index )% v (:, ipleP ) id2 = tp % id ( i ) xh2 (:) = xpc (:, i ) + xh1 (:) vh2 (:) = xpc (:, i ) + vh1 (:) call rmvs_io_write_encounter ( t , id1 , id2 , mu , 0.0_DP , rpl , 0.0_DP , xh1 (:), xh2 (:), vh1 (:), vh2 (:), param % enc_out ) end if if ( tp % lperi ( i )) then if ( peri < tp % peri ( i )) then tp % peri ( i ) = peri tp % plperP ( i ) = ipleP end if else tp % lperi ( i ) = . true . tp % peri ( i ) = peri tp % plperP ( i ) = ipleP end if end if else if ( vdotr > 0.0_DP ) then tp % isperi ( i ) = 1 else tp % isperi ( i ) = - 1 end if end if end if end do end if end associate return end subroutine rmvs_peri_tp subroutine rmvs_end_planetocentric ( pl , tp ) !! author: David A. Minton !! !! Deallocates all of the encountering particle data structures for next time !! implicit none ! Arguments class ( rmvs_pl ), intent ( inout ) :: pl !! RMVS massive body object class ( rmvs_tp ), intent ( inout ) :: tp !! RMVS test particle objec ! Internals integer ( I4B ) :: i , j , inner_index integer ( I4B ), dimension (:), allocatable :: tpind logical , dimension (:), allocatable :: encmask associate ( npl => pl % nbody , ntp => tp % nbody ) do i = 1 , npl if ( pl % nenc ( i ) == 0 ) cycle select type ( cbenci => pl % planetocentric ( i )% cb ) class is ( rmvs_cb ) select type ( plenci => pl % planetocentric ( i )% pl ) class is ( rmvs_pl ) select type ( tpenci => pl % planetocentric ( i )% tp ) class is ( rmvs_tp ) associate ( nenci => pl % nenc ( i )) if ( allocated ( tpind )) deallocate ( tpind ) allocate ( tpind ( nenci )) ! Index array of encountering test particles if ( allocated ( encmask )) deallocate ( encmask ) allocate ( encmask ( ntp )) encmask ( 1 : ntp ) = tp % plencP ( 1 : ntp ) == i tpind ( 1 : nenci ) = pack ([( j , j = 1 , ntp )], encmask ( 1 : ntp )) ! Copy the results of the integration back over and shift back to heliocentric reference tp % status ( tpind ( 1 : nenci )) = tpenci % status ( 1 : nenci ) tp % lmask ( tpind ( 1 : nenci )) = tpenci % lmask ( 1 : nenci ) do j = 1 , NDIM tp % xh ( j , tpind ( 1 : nenci )) = tpenci % xh ( j , 1 : nenci ) + pl % inner ( NTPHENC )% x ( j , i ) tp % vh ( j , tpind ( 1 : nenci )) = tpenci % vh ( j , 1 : nenci ) + pl % inner ( NTPHENC )% v ( j , i ) end do tp % lperi ( tpind ( 1 : nenci )) = tpenci % lperi ( 1 : nenci ) tp % plperP ( tpind ( 1 : nenci )) = tpenci % plperP ( 1 : nenci ) deallocate ( pl % planetocentric ( i )% tp ) deallocate ( cbenci % inner ) do inner_index = 0 , NTPHENC deallocate ( plenci % inner ( inner_index )% x ) deallocate ( plenci % inner ( inner_index )% v ) if ( allocated ( plenci % inner ( inner_index )% aobl )) deallocate ( plenci % inner ( inner_index )% aobl ) if ( allocated ( plenci % inner ( inner_index )% atide )) deallocate ( plenci % inner ( inner_index )% atide ) end do end associate end select end select end select end do end associate return end subroutine rmvs_end_planetocentric end submodule s_rmvs_step","tags":"","loc":"sourcefile/rmvs_step.f90.html"},{"title":"rmvs_encounter_check.f90 – swiftest","text":"This file depends on sourcefile~~rmvs_encounter_check.f90~~EfferentGraph sourcefile~rmvs_encounter_check.f90 rmvs_encounter_check.f90 sourcefile~rmvs_classes.f90 rmvs_classes.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~rmvs_classes.f90 sourcefile~swiftest.f90 swiftest.f90 sourcefile~rmvs_encounter_check.f90->sourcefile~swiftest.f90 sourcefile~whm_classes.f90 whm_classes.f90 sourcefile~rmvs_classes.f90->sourcefile~whm_classes.f90 sourcefile~swiftest_globals.f90 swiftest_globals.f90 sourcefile~rmvs_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest.f90->sourcefile~rmvs_classes.f90 sourcefile~fraggle_classes.f90 fraggle_classes.f90 sourcefile~swiftest.f90->sourcefile~fraggle_classes.f90 sourcefile~swiftest_operators.f90 swiftest_operators.f90 sourcefile~swiftest.f90->sourcefile~swiftest_operators.f90 sourcefile~symba_classes.f90 symba_classes.f90 sourcefile~swiftest.f90->sourcefile~symba_classes.f90 sourcefile~walltime_classes.f90 walltime_classes.f90 sourcefile~swiftest.f90->sourcefile~walltime_classes.f90 sourcefile~helio_classes.f90 helio_classes.f90 sourcefile~swiftest.f90->sourcefile~helio_classes.f90 sourcefile~swiftest.f90->sourcefile~whm_classes.f90 sourcefile~lambda_function.f90 lambda_function.f90 sourcefile~swiftest.f90->sourcefile~lambda_function.f90 sourcefile~swiftest.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90 swiftest_classes.f90 sourcefile~swiftest.f90->sourcefile~swiftest_classes.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~fraggle_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~swiftest_operators.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~fraggle_classes.f90 sourcefile~symba_classes.f90->sourcefile~helio_classes.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~symba_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~walltime_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~whm_classes.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~helio_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_globals.f90 sourcefile~whm_classes.f90->sourcefile~swiftest_classes.f90 sourcefile~lambda_function.f90->sourcefile~swiftest_globals.f90 sourcefile~swiftest_classes.f90->sourcefile~swiftest_globals.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Contents Submodules s_rmvs_chk Source Code rmvs_encounter_check.f90 Source Code submodule ( rmvs_classes ) s_rmvs_chk use swiftest contains module function rmvs_encounter_check_tp ( self , system , dt ) result ( lencounter ) !! author: David A. Minton !! !! Determine whether a test particle and planet are having or will have an encounter within the next time step !! !! Adapted from David E. Kaufmann's Swifter routine: rmvs_chk.f90 !! Adapted from Hal Levison's Swift routine rmvs3_chk.f implicit none ! Arguments class ( rmvs_tp ), intent ( inout ) :: self !! RMVS test particle object class ( rmvs_nbody_system ), intent ( inout ) :: system !! RMVS nbody system object real ( DP ), intent ( in ) :: dt !! step size ! Result logical :: lencounter !! Returns true if there is at least one close encounter ! Internals integer ( I4B ) :: i , j real ( DP ) :: xr , yr , zr , vxr , vyr , vzr real ( DP ), dimension ( system % pl % nbody ) :: r2crit logical :: lflag , lvdotr ! The minimization and linear solvers can sometimes lead to floating point exceptions. Rather than halting the code entirely if this occurs, we ! can simply fail the attempt and try again. So we need to turn off any floating point exception halting modes temporarily lencounter = . false . if ( self % nbody == 0 ) return select type ( pl => system % pl ) class is ( rmvs_pl ) associate ( tp => self , ntp => self % nbody , npl => pl % nbody , rts => system % rts ) r2crit ( 1 : npl ) = ( rts * pl % rhill ( 1 : npl )) ** 2 tp % plencP ( 1 : ntp ) = 0 !$omp parallel do default(private)& !$omp shared(npl, ntp, tp, pl, dt, r2crit) do j = 1 , npl do i = 1 , ntp if ((. not . tp % lmask ( i )). or .( tp % plencP ( i ) /= 0 )) cycle xr = tp % xh ( 1 , i ) - pl % xbeg ( 1 , j ) yr = tp % xh ( 2 , i ) - pl % xbeg ( 2 , j ) zr = tp % xh ( 3 , i ) - pl % xbeg ( 3 , j ) vxr = tp % vh ( 1 , i ) - pl % vbeg ( 1 , j ) vyr = tp % vh ( 2 , i ) - pl % vbeg ( 2 , j ) vzr = tp % vh ( 3 , i ) - pl % vbeg ( 3 , j ) call rmvs_chk_ind ( xr , yr , zr , vxr , vyr , vzr , dt , r2crit ( j ), lflag , lvdotr ) if ( lflag ) tp % plencP ( i ) = j end do pl % nenc ( j ) = count ( tp % plencP ( 1 : ntp ) == j ) end do !$omp end parallel do lencounter = any ( pl % nenc ( 1 : npl ) > 0 ) end associate end select return end function rmvs_encounter_check_tp module pure subroutine rmvs_chk_ind ( xr , yr , zr , vxr , vyr , vzr , dt , r2crit , lencounter , lvdotr ) !$omp declare simd(rmvs_chk_ind) !! author: David A. Minton !! !! Determine whether a test particle and planet are having or will have an encounter within the next time step !! !! Adapted from David E. Kaufmann's Swifter routine: rmvs_chk_ind.f90 !! Adapted from Hal Levison's Swift routine rmvs_chk_ind.f implicit none ! Arguments real ( DP ), intent ( in ) :: xr , yr , zr !! Relative distance vector components real ( DP ), intent ( in ) :: vxr , vyr , vzr !! Relative velocity vector components real ( DP ), intent ( in ) :: dt !! Step size real ( DP ), intent ( in ) :: r2crit !! Square of the critical encounter distance logical , intent ( out ) :: lencounter !! Flag indicating that an encounter has occurred logical , intent ( out ) :: lvdotr !! Logical flag indicating the direction of the v .dot. r vector ! Internals real ( DP ) :: r2min , r2 , v2 , vdotr r2 = xr ** 2 + yr ** 2 + zr ** 2 lencounter = ( r2 < r2crit ) if ( lencounter ) return vdotr = vxr * xr + vyr * yr + vzr * zr lvdotr = ( vdotr < 0.0_DP ) if (. not . lvdotr ) return v2 = vxr ** 2 + vyr ** 2 + vzr ** 2 if ( - vdotr < v2 * dt ) then r2min = r2 - vdotr ** 2 / v2 else r2min = r2 + 2 * vdotr * dt + v2 * dt ** 2 end if lencounter = ( r2min <= r2crit ) return end subroutine rmvs_chk_ind end submodule s_rmvs_chk","tags":"","loc":"sourcefile/rmvs_encounter_check.f90.html"},{"title":"tides_derivs_func – swiftest ","text":"type, extends(lambda_obj_tvar) :: tides_derivs_func Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Inherits type~~tides_derivs_func~~InheritsGraph type~tides_derivs_func tides_derivs_func lambda_obj_tvar lambda_obj_tvar type~tides_derivs_func->lambda_obj_tvar Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr_tides_deriv xbeg xend dt Type-Bound Procedures init evalt tides_derivs_init Components Type Visibility Attributes Name Initial procedure( tidederiv ), public, pointer, nopass :: lambdaptr_tides_deriv real(kind=DP), public, dimension(:,:), allocatable :: xbeg real(kind=DP), public, dimension(:,:), allocatable :: xend real(kind=DP), public :: dt Type-Bound Procedures generic, public :: init => tides_derivs_init function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) procedure, public :: evalt => tides_derivs_eval function tides_derivs_eval (self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( tides_derivs_func ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable procedure, public, nopass :: tides_derivs_init function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func )","tags":"","loc":"type/tides_derivs_func.html"},{"title":"rmvs_nbody_system – swiftest ","text":"type, public, extends( whm_nbody_system ) :: rmvs_nbody_system Inherits type~~rmvs_nbody_system~~InheritsGraph type~rmvs_nbody_system rmvs_nbody_system type~whm_nbody_system whm_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_body->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~rmvs_nbody_system~~InheritedByGraph type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg lplanetocentric rts vbeg Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr initialize step Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles logical, public :: lplanetocentric = .false. In the RMVS integrator, only test particles are discarded\n Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations real(kind=DP), public :: rts fraction of Hill's sphere radius to use as radius of encounter region real(kind=DP), public, dimension(:,:), allocatable :: vbeg Planet velocities at beginning ot step Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: initialize => rmvs_setup_initialize_system Replace the abstract procedures with concrete ones\n Performs RMVS-specific initilization steps, including generating the close encounter planetocentric structures interface public module subroutine rmvs_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters procedure, public :: step => rmvs_step_system Advance the RMVS nbody system forward in time by one step interface public module subroutine rmvs_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"type/rmvs_nbody_system.html"},{"title":"rmvs_interp – swiftest ","text":"type, private :: rmvs_interp Inherited by type~~rmvs_interp~~InheritedByGraph type~rmvs_interp rmvs_interp type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_interp outer, inner type~rmvs_cb rmvs_cb type~rmvs_cb->type~rmvs_interp outer, inner type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables x v aobl atide Components Type Visibility Attributes Name Initial real(kind=DP), public, dimension(:, :), allocatable :: x interpolated heliocentric planet position for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: v interpolated heliocentric planet velocity for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: aobl Encountering planet's oblateness acceleration value real(kind=DP), public, dimension(:, :), allocatable :: atide Encountering planet's tidal acceleration value","tags":"","loc":"type/rmvs_interp.html"},{"title":"rmvs_cb – swiftest ","text":"type, public, extends( whm_cb ) :: rmvs_cb RMVS central body particle class Inherits type~~rmvs_cb~~InheritsGraph type~rmvs_cb rmvs_cb type~rmvs_interp rmvs_interp type~rmvs_cb->type~rmvs_interp outer, inner type~whm_cb whm_cb type~rmvs_cb->type~whm_cb type~swiftest_cb swiftest_cb type~whm_cb->type~swiftest_cb type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~rmvs_cb~~InheritedByGraph type~rmvs_cb rmvs_cb type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL outer inner lplanetocentric Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/rmvs_cb.html"},{"title":"rmvs_tp – swiftest ","text":"type, public, extends( whm_tp ) :: rmvs_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as rmvs_setup_tp and rmvs_util_spill_tp Inherits type~~rmvs_tp~~InheritsGraph type~rmvs_tp rmvs_tp type~whm_tp whm_tp type~rmvs_tp->type~whm_tp type~rmvs_cb rmvs_cb type~rmvs_tp->type~rmvs_cb cb_heliocentric type~swiftest_tp swiftest_tp type~whm_tp->type~swiftest_tp type~rmvs_interp rmvs_interp type~rmvs_cb->type~rmvs_interp outer, inner type~whm_cb whm_cb type~rmvs_cb->type~whm_cb type~swiftest_cb swiftest_cb type~whm_cb->type~swiftest_cb type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_body->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp lperi plperP plencP cb_heliocentric xheliocentric index ipleP lplanetocentric Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame accel_int accel_obl h2b b2h vb2vh vh2vb xh2xb get_peri set_mu accel_gr gr_pos_kick kick step discard encounter_check accel setup append fill resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp logical, public, dimension(:), allocatable :: lperi planetocentric pericenter passage flag (persistent for a full rmvs time step) over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plperP index of planet associated with pericenter distance peri (persistent over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plencP index of planet that test particle is encountering (not persistent for a full RMVS time step) type( rmvs_cb ), public :: cb_heliocentric Copy of original central body object passed to close encounter (used for oblateness acceleration during planetocentric encoountters) real(kind=DP), public, dimension(:,:), allocatable :: xheliocentric original heliocentric position (used for oblateness calculation during close encounters) integer(kind=I4B), public :: index inner substep number within current set integer(kind=I4B), public :: ipleP index value of encountering planet logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public pure module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles interface public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => whm_step_tp Steps the particle forward one stepsize interface public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize procedure, public :: discard => rmvs_discard_tp Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered interface public module subroutine rmvs_discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters procedure, public :: encounter_check => rmvs_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body interface public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter procedure, public :: accel => rmvs_kick_getacch_tp Calculates either the standard or modified version of the acceleration depending if the\n    if the test particle is undergoing a close encounter or not interface public module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: setup => rmvs_setup_tp Constructor method - Allocates space for the input number of bodiess interface public module subroutine rmvs_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parametere procedure, public :: append => rmvs_util_append_tp Appends elements from one structure to another interface public module subroutine rmvs_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => rmvs_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => rmvs_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine rmvs_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => rmvs_util_sort_tp Sorts body arrays by a sortable componen interface public module subroutine rmvs_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => rmvs_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine rmvs_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => rmvs_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/rmvs_tp.html"},{"title":"rmvs_pl – swiftest ","text":"type, public, extends( whm_pl ) :: rmvs_pl RMVS massive body particle class Inherits type~~rmvs_pl~~InheritsGraph type~rmvs_pl rmvs_pl type~whm_pl whm_pl type~rmvs_pl->type~whm_pl type~rmvs_interp rmvs_interp type~rmvs_pl->type~rmvs_interp outer, inner type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~swiftest_pl swiftest_pl type~whm_pl->type~swiftest_pl type~whm_nbody_system whm_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_cb->type~swiftest_particle_info info type~swiftest_cb->type~swiftest_base type~swiftest_tp->type~swiftest_body Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl eta xj vj muj ir3j nenc tpenc1P plind outer inner planetocentric lplanetocentric Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user write_frame discard index accel_int accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_rhill h2j j2h vh2vj drift accel_gr gr_pos_kick accel kick set_ir3 set_mu step setup append fill resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl integer(kind=I4B), public, dimension(:), allocatable :: nenc number of test particles encountering planet this full rmvs time step integer(kind=I4B), public, dimension(:), allocatable :: tpenc1P index of first test particle encountering planet integer(kind=I4B), public, dimension(:), allocatable :: plind Connects the planetocentric indices back to the heliocentric planet list type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters class( rmvs_nbody_system ), public, dimension(:), allocatable :: planetocentric Planetocentric version of the massive body objects (one for each massive body) logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates interface public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates interface public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public pure module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies interface public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) interface public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. interface public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: step => whm_step_pl Steps the body forward one stepsize interface public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: setup => rmvs_setup_pl Constructor method - Allocates space for the input number of bodiess interface public module subroutine rmvs_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: append => rmvs_util_append_pl Appends elements from one structure to another interface public module subroutine rmvs_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => rmvs_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => rmvs_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine rmvs_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => rmvs_util_sort_pl Sorts body arrays by a sortable componen interface public module subroutine rmvs_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => rmvs_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine rmvs_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => rmvs_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/rmvs_pl.html"},{"title":"walltimer – swiftest ","text":"type, public :: walltimer Contents Variables count_rate count_max count_start_main count_start_step count_finish_step lmain_is_started Type-Bound Procedures reset start finish Components Type Visibility Attributes Name Initial integer(kind=I8B), public :: count_rate Rate at wich the clock ticks integer(kind=I8B), public :: count_max Maximum value of the clock ticker integer(kind=I8B), public :: count_start_main Value of the clock ticker at when the timer is first called integer(kind=I8B), public :: count_start_step Value of the clock ticker at the start of a timed step integer(kind=I8B), public :: count_finish_step Value of the clock ticker at the end of a timed step logical, public :: lmain_is_started = .false. Logical flag indicating whether or not the main timer has been reset or not Type-Bound Procedures procedure, public :: reset => walltime_reset Resets the clock ticker, settting main_start to the current ticker value interface public subroutine walltime_reset(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object procedure, public :: start => walltime_start Starts the timer, setting step_start to the current ticker value interface public subroutine walltime_start(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object procedure, public :: finish => walltime_finish Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal interface public subroutine walltime_finish(self, nsubsteps, message) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output","tags":"","loc":"type/walltimer.html"},{"title":"helio_nbody_system – swiftest ","text":"type, public, extends( whm_nbody_system ) :: helio_nbody_system Inherits type~~helio_nbody_system~~InheritsGraph type~helio_nbody_system helio_nbody_system type~whm_nbody_system whm_nbody_system type~helio_nbody_system->type~whm_nbody_system type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_body->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_nbody_system~~InheritedByGraph type~helio_nbody_system helio_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr step initialize Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: step => helio_step_system Advance the Helio nbody system forward in time by one step interface public module subroutine helio_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: initialize => helio_setup_initialize_system Performs Helio-specific initilization steps, including converting to DH coordinates interface public module subroutine helio_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"type/helio_nbody_system.html"},{"title":"helio_cb – swiftest ","text":"type, public, extends( swiftest_cb ) :: helio_cb Helio central body particle class Inherits type~~helio_cb~~InheritsGraph type~helio_cb helio_cb type~swiftest_cb swiftest_cb type~helio_cb->type~swiftest_cb type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_cb~~InheritedByGraph type~helio_cb helio_cb type~symba_cb symba_cb type~symba_cb->type~helio_cb Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL ptbeg ptend Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/helio_cb.html"},{"title":"helio_pl – swiftest ","text":"type, public, extends( swiftest_pl ) :: helio_pl Inherits type~~helio_pl~~InheritsGraph type~helio_pl helio_pl type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_pl~~InheritedByGraph type~helio_pl helio_pl type~symba_pl symba_pl type~symba_pl->type~helio_pl type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard index accel_int accel_obl setup accel_tides append h2b b2h vh2vb vb2vh xh2xb fill resize set_beg_end set_mu set_rhill sort rearrange spill drift lindrift accel_gr gr_pos_kick accel kick step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays interface public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: append => util_append_pl Appends elements from one structure to another interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: drift => helio_drift_pl Method for Danby drift in Democratic Heliocentric coordinates interface public module subroutine helio_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public pure module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => helio_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_pl Steps the body forward one stepsize interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"type/helio_pl.html"},{"title":"helio_tp – swiftest ","text":"type, public, extends( swiftest_tp ) :: helio_tp Inherits type~~helio_tp~~InheritsGraph type~helio_tp helio_tp type~swiftest_tp swiftest_tp type~helio_tp->type~swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~helio_tp~~InheritedByGraph type~helio_tp helio_tp type~symba_tp symba_tp type~symba_tp->type~helio_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl setup append h2b b2h vb2vh vh2vb xh2xb fill get_peri resize set_mu sort rearrange spill lindrift drift accel_gr gr_pos_kick accel kick step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr procedure, public :: append => util_append_tp Appends elements from one structure to another interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => helio_drift_tp Method for Danby drift in Democratic Heliocentric coordinates interface public module subroutine helio_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public pure module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => helio_kick_getacch_tp Compute heliocentric accelerations of massive bodies interface public module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities interface public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_tp Steps the body forward one stepsize interface public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee","tags":"","loc":"type/helio_tp.html"},{"title":"whm_cb – swiftest ","text":"type, public, extends( swiftest_cb ) :: whm_cb Swiftest central body particle class Inherits type~~whm_cb~~InheritsGraph type~whm_cb whm_cb type~swiftest_cb swiftest_cb type~whm_cb->type~swiftest_cb type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_cb~~InheritedByGraph type~whm_cb whm_cb type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/whm_cb.html"},{"title":"whm_pl – swiftest ","text":"type, public, extends( swiftest_pl ) :: whm_pl WHM massive body particle class Inherits type~~whm_pl~~InheritsGraph type~whm_pl whm_pl type~swiftest_pl swiftest_pl type~whm_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_pl~~InheritedByGraph type~whm_pl whm_pl type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl eta xj vj muj ir3j Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user write_frame discard index accel_int accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_rhill h2j j2h vh2vj drift accel_gr gr_pos_kick accel kick append fill resize set_ir3 set_mu sort rearrange spill setup step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates interface public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates interface public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates interface public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public pure module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies interface public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: append => whm_util_append_pl Appends elements from one structure to another interface public module subroutine whm_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => whm_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine whm_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => whm_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine whm_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) interface public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. interface public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => whm_util_sort_pl Sort a WHM massive body object in-place. interface public module subroutine whm_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => whm_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine whm_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => whm_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: setup => whm_setup_pl Constructor method - Allocates space for the input number of bodiess interface public module subroutine whm_setup_pl(self, n, param) Implementation → Reads WHM massive body object in from file Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body objectobject integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: step => whm_step_pl Steps the body forward one stepsize interface public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"type/whm_pl.html"},{"title":"whm_tp – swiftest ","text":"type, public, extends( swiftest_tp ) :: whm_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_util_spill_tp Inherits type~~whm_tp~~InheritsGraph type~whm_tp whm_tp type~swiftest_tp swiftest_tp type~whm_tp->type~swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_tp~~InheritedByGraph type~whm_tp whm_tp type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl setup append h2b b2h vb2vh vh2vb xh2xb fill get_peri resize set_mu sort rearrange spill accel_gr gr_pos_kick accel kick step Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr procedure, public :: append => util_append_tp Appends elements from one structure to another interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public pure module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: accel => whm_kick_getacch_tp Compute heliocentric accelerations of test particles interface public module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of the test particle Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles interface public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => whm_step_tp Steps the particle forward one stepsize interface public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"type/whm_tp.html"},{"title":"whm_nbody_system – swiftest ","text":"type, public, extends( swiftest_nbody_system ) :: whm_nbody_system An abstract class for the WHM integrator nbody system Inherits type~~whm_nbody_system~~InheritsGraph type~whm_nbody_system whm_nbody_system type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_body->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~whm_nbody_system~~InheritedByGraph type~whm_nbody_system whm_nbody_system type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr initialize step Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: initialize => whm_setup_initialize_system Replace the abstract procedures with concrete ones interface public module subroutine whm_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters procedure, public :: step => whm_step_system Advance the WHM nbody system forward in time by one step interface public module subroutine whm_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"type/whm_nbody_system.html"},{"title":"fraggle_colliders – swiftest ","text":"type, public :: fraggle_colliders Class definition for the variables that describe the bodies involved in the collision Contents Variables ncoll idx xb vb rot L_spin L_orbit Ip mass radius Type-Bound Procedures regime Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: ncoll Number of bodies involved in the collision integer(kind=I4B), public, dimension(:), allocatable :: idx Index of bodies involved in the collision real(kind=DP), public, dimension(NDIM,2) :: xb Two-body equivalent position vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: vb Two-body equivalent velocity vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: rot Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_spin Two-body equivalent spin angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_orbit Two-body equivalent orbital angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: Ip Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(2) :: mass Two-body equivalent mass of the collider bodies prior to the collision real(kind=DP), public, dimension(2) :: radius Two-body equivalent radii of the collider bodies prior to the collision Type-Bound Procedures procedure, public :: regime => fraggle_regime_colliders Determine which fragmentation regime the set of colliders will be interface public module subroutine fraggle_regime_colliders(self, frag, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"type/fraggle_colliders.html"},{"title":"fraggle_fragments – swiftest ","text":"type, public, extends( swiftest_pl ) :: fraggle_fragments Class definition for the variables that describe a collection of fragments by Fraggle barycentric coordinates Inherits type~~fraggle_fragments~~InheritsGraph type~fraggle_fragments fraggle_fragments type~swiftest_pl swiftest_pl type~fraggle_fragments->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl mtot Qloss mass_dist regime xbcom vbcom x_coll_unit y_coll_unit z_coll_unit x_coll v_coll v_r_unit v_t_unit v_n_unit rmag rotmag v_r_mag v_t_mag ke_orbit ke_spin L_orbit L_spin ke_budget L_budget Lorbit_before Lorbit_after Lspin_before Lspin_after Ltot_before Ltot_after ke_orbit_before ke_orbit_after ke_spin_before ke_spin_after pe_before pe_after Etot_before Etot_after dscale mscale tscale vscale Escale Lscale Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard index accel_int accel_obl accel_tides append h2b b2h vh2vb vb2vh xh2xb fill resize set_beg_end set_mu set_rhill sort rearrange spill generate_fragments accel kick step set_budgets set_coordinate_system set_mass_dist set_natural_scale set_original_scale setup reset get_ang_mtm get_energy_and_momentum restructure Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public :: mtot Total mass of fragments real(kind=DP), public :: Qloss Energy lost during the collision real(kind=DP), public, dimension(FRAGGLE_NMASS_DIST) :: mass_dist Distribution of fragment mass determined by the regime calculation (largest fragment, second largest, and remainder) integer(kind=I4B), public :: regime Collresolve regime code for this collision real(kind=DP), public, dimension(NDIM) :: xbcom Center of mass position vector of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: vbcom Velocity vector of the center of mass of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: x_coll_unit x-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: y_coll_unit y-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: z_coll_unit z-direction unit vector of collisional system real(kind=DP), public, dimension(:,:), allocatable :: x_coll Array of fragment position vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_coll Array of fragment velocity vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_r_unit Array of radial direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_t_unit Array of tangential direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_n_unit Array of normal direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rmag Array of radial distance magnitudes of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rotmag Array of rotation magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_r_mag Array of radial direction velocity magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_t_mag Array of tangential direction velocity magnitudes of individual fragments real(kind=DP), public :: ke_orbit Current orbital kinetic energy of the system of fragments in the collisional frame real(kind=DP), public :: ke_spin Current spin kinetic energy of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_orbit Current orbital angular momentum of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_spin Current spin angular momentum of the system of fragments in the collisional frame real(kind=DP), public :: ke_budget Total kinetic energy budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_budget Total angular momentum budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: Lorbit_before Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lorbit_after Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_before Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_after Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_before Before/after total system angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_after Before/after total system angular momentum real(kind=DP), public :: ke_orbit_before Before/after orbital kinetic energy real(kind=DP), public :: ke_orbit_after Before/after orbital kinetic energy real(kind=DP), public :: ke_spin_before Before/after spin kinetic energy real(kind=DP), public :: ke_spin_after Before/after spin kinetic energy real(kind=DP), public :: pe_before Before/after potential energy real(kind=DP), public :: pe_after Before/after potential energy real(kind=DP), public :: Etot_before Before/after total system energy real(kind=DP), public :: Etot_after Before/after total system energy real(kind=DP), public :: dscale Distance dimension scale factor real(kind=DP), public :: mscale Mass scale factor real(kind=DP), public :: tscale Time scale factor real(kind=DP), public :: vscale Velocity scale factor (a convenience unit that is derived from dscale and tscale) real(kind=DP), public :: Escale Energy scale factor (a convenience unit that is derived from dscale, tscale, and mscale) real(kind=DP), public :: Lscale Angular momentum scale factor (a convenience unit that is derived from dscale, tscale, and mscale) Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: append => util_append_pl Appends elements from one structure to another interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: generate_fragments => fraggle_generate_fragments Generates a system of fragments in barycentric coordinates that conserves energy and momentum. interface public module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead? procedure, public :: accel => fraggle_placeholder_accel Placeholder subroutine to fulfill requirement for an accel method interface public module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Implementation → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: kick => fraggle_placeholder_kick Placeholder subroutine to fulfill requirement for a kick method interface public module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => fraggle_placeholder_step Placeholder subroutine to fulfill requirement for a step method interface public module subroutine fraggle_placeholder_step(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsiz procedure, public :: set_budgets => fraggle_set_budgets_fragments Sets the energy and momentum budgets of the fragments based on the collider value interface public module subroutine fraggle_set_budgets_fragments(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: set_coordinate_system => fraggle_set_coordinate_system Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. interface public module subroutine fraggle_set_coordinate_system(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: set_mass_dist => fraggle_set_mass_dist_fragments Sets the distribution of mass among the fragments depending on the regime type interface public module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters procedure, public :: set_natural_scale => fraggle_set_natural_scale_factors Scales dimenional quantities to ~O(1) with respect to the collisional system. interface public module subroutine fraggle_set_natural_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: set_original_scale => fraggle_set_original_scale_factors Restores dimenional quantities back to the original system units interface public module subroutine fraggle_set_original_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object procedure, public :: setup => fraggle_setup_fragments Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. interface public module subroutine fraggle_setup_fragments(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object integer(kind=I4B), intent(in) :: n Number of fragments class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters procedure, public :: reset => fraggle_setup_reset_fragments Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) interface public module subroutine fraggle_setup_reset_fragments(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self procedure, public :: get_ang_mtm => fraggle_util_ang_mtm Calcualtes the current angular momentum of the fragments interface public module subroutine fraggle_util_ang_mtm(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object procedure, public :: get_energy_and_momentum => fraggle_util_get_energy_momentum Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) interface public module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa procedure, public :: restructure => fraggle_util_restructure Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints interface public module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt","tags":"","loc":"type/fraggle_fragments.html"},{"title":"symba_parameters – swiftest ","text":"type, public, extends( swiftest_parameters ) :: symba_parameters Inherits type~~symba_parameters~~InheritsGraph type~symba_parameters symba_parameters type~swiftest_parameters swiftest_parameters type~symba_parameters->type~swiftest_parameters type~netcdf_parameters netcdf_parameters type~swiftest_parameters->type~netcdf_parameters nciu Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables integrator maxid t0 t tstop dt ioutput incbfile inplfile intpfile in_type in_form istep_out outfile out_type out_form out_stat particle_out istep_dump rmin rmax rmaxu qmin qmin_coord qmin_alo qmin_ahi enc_out discard_out MU2KG TU2S DU2M GU inv_c2 energy_out lrhill_present lextra_force lbig_discard lclose lenergy loblatecb lrotation ltides Eorbit_orig GMtot_orig Ltot_orig Lorbit_orig Lspin_orig Lescape GMescape Ecollisions Euntracked lfirstenergy lfirstkick lrestart lgr lyarkovsky lyorp nciu GMTINY min_GMfrag seed lfragmentation Type-Bound Procedures dump read_in reader writer Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters real(kind=DP), public :: GMTINY = -1.0_DP Smallest G*mass that is fully gravitating real(kind=DP), public :: min_GMfrag = -1.0_DP Smallest G*mass that can be produced in a fragmentation event integer(kind=I4B), public, dimension(:), allocatable :: seed Random seeds logical, public :: lfragmentation = .false. Do fragmentation modeling instead of simple merger. Type-Bound Procedures procedure, public :: dump => io_dump_param interface public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) procedure, public :: read_in => io_read_in_param interface public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) procedure, public :: reader => symba_io_param_reader interface public module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Current run configuration parameters with SyMBA additionss integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 procedure, public :: writer => symba_io_param_writer interface public module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Current run configuration parameters with SyMBA additions integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"type/symba_parameters.html"},{"title":"symba_kinship – swiftest ","text":"type, public :: symba_kinship Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step. Inherited by type~~symba_kinship~~InheritedByGraph type~symba_kinship symba_kinship type~symba_pl symba_pl type~symba_pl->type~symba_kinship kin type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables parent nchild child Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: parent Index of parent particle integer(kind=I4B), public :: nchild number of children in merger list integer(kind=I4B), public, dimension(:), allocatable :: child Index of children particles","tags":"","loc":"type/symba_kinship.html"},{"title":"symba_cb – swiftest ","text":"type, public, extends( helio_cb ) :: symba_cb SyMBA central body particle class Inherits type~~symba_cb~~InheritsGraph type~symba_cb symba_cb type~helio_cb helio_cb type~symba_cb->type~helio_cb type~swiftest_cb swiftest_cb type~helio_cb->type~swiftest_cb type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL ptbeg ptend GM0 dGM R0 dR Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step real(kind=DP), public :: GM0 = 0.0_DP Initial G*mass of the central body real(kind=DP), public :: dGM = 0.0_DP Change in G*mass of the central body real(kind=DP), public :: R0 = 0.0_DP Initial radius of the central body real(kind=DP), public :: dR = 0.0_DP Change in the radius of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/symba_cb.html"},{"title":"symba_pl – swiftest ","text":"type, public, extends( helio_pl ) :: symba_pl SyMBA massive body class Inherits type~~symba_pl~~InheritsGraph type~symba_pl symba_pl type~symba_kinship symba_kinship type~symba_pl->type~symba_kinship kin type~helio_pl helio_pl type~symba_pl->type~helio_pl type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_pl~~InheritedByGraph type~symba_pl symba_pl type~symba_merger symba_merger type~symba_merger->type~symba_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl lcollision lencounter lmtiny nplm nplplm nplenc ntpenc levelg levelm isperi peri atp kin Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_mu set_rhill lindrift accel_gr gr_pos_kick kick step make_colliders index discard drift encounter_check accel_int accel setup append fill get_peri rearray reset_kinship resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public pure module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_pl Steps the body forward one stepsize interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family interface public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: discard => symba_discard_pl Process massive body discards interface public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level interface public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY interface public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: setup => symba_setup_pl Constructor method - Allocates space for the input number of bodies interface public module subroutine symba_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: append => symba_util_append_pl Appends elements from one structure to another interface public module subroutine symba_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies interface public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies interface public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies interface public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset procedure, public :: resize => symba_util_resize_pl Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small. interface public module subroutine symba_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen interface public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/symba_pl.html"},{"title":"symba_merger – swiftest ","text":"type, public, extends( symba_pl ) :: symba_merger Inherits type~~symba_merger~~InheritsGraph type~symba_merger symba_merger type~symba_pl symba_pl type~symba_merger->type~symba_pl type~symba_kinship symba_kinship type~symba_pl->type~symba_kinship kin type~helio_pl helio_pl type~symba_pl->type~helio_pl type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_merger~~InheritedByGraph type~symba_merger symba_merger type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl lcollision lencounter lmtiny nplm nplplm nplenc ntpenc levelg levelm isperi peri atp kin ncomp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame accel_obl accel_tides h2b b2h vh2vb vb2vh xh2xb set_beg_end set_mu set_rhill lindrift accel_gr gr_pos_kick kick step make_colliders index discard drift encounter_check accel_int accel fill get_peri rearray reset_kinship sort rearrange spill append resize setup Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step integer(kind=I4B), public, dimension(:), allocatable :: ncomp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction interface public pure module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_pl Steps the body forward one stepsize interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family interface public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: discard => symba_discard_pl Process massive body discards interface public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level interface public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY interface public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies interface public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies interface public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies interface public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies interface public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen interface public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not procedure, public :: append => symba_util_append_merger Appends elements from one structure to another interface public module subroutine symba_util_append_merger(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: resize => symba_util_resize_merger Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. interface public module subroutine symba_util_resize_merger(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: setup => symba_setup_merger Constructor method - Allocates space for the input number of bodies interface public module subroutine symba_setup_merger(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"type/symba_merger.html"},{"title":"symba_tp – swiftest ","text":"type, public, extends( helio_tp ) :: symba_tp SyMBA test particle class Inherits type~~symba_tp~~InheritsGraph type~symba_tp symba_tp type~helio_tp helio_tp type~symba_tp->type~helio_tp type~swiftest_tp swiftest_tp type~helio_tp->type~swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp nplenc levelg levelm Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl h2b b2h vb2vh vh2vb xh2xb get_peri set_mu lindrift accel_gr gr_pos_kick kick step drift encounter_check accel setup append fill resize sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with planets this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this particle should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun interface public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction interface public pure module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction interface public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities interface public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure, public :: step => helio_step_tp Steps the body forward one stepsize interface public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee procedure, public :: drift => symba_drift_tp Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level interface public module subroutine symba_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: encounter_check => symba_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body interface public module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: accel => symba_kick_getacch_tp Compute heliocentric accelerations of test particles interface public module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step procedure, public :: setup => symba_setup_tp Constructor method - Allocates space for the input number of bodies interface public module subroutine symba_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter procedure, public :: append => symba_util_append_tp Appends elements from one structure to another interface public module subroutine symba_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => symba_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine symba_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => symba_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine symba_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: sort => symba_util_sort_tp Sorts body arrays by a sortable componen interface public module subroutine symba_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => symba_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine symba_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => symba_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/symba_tp.html"},{"title":"symba_encounter – swiftest ","text":"type, public, extends( swiftest_encounter ) :: symba_encounter SyMBA class for tracking close encounters in a step Inherits type~~symba_encounter~~InheritsGraph type~symba_encounter symba_encounter type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_encounter~~InheritedByGraph type~symba_encounter symba_encounter type~symba_pltpenc symba_pltpenc type~symba_pltpenc->type~symba_encounter type~symba_plplenc symba_plplenc type~symba_plplenc->type~symba_encounter type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_pltpenc pltpenc_list type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t level Type-Bound Procedures resize write collision_check encounter_check kick setup copy spill append Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"type/symba_encounter.html"},{"title":"symba_pltpenc – swiftest ","text":"type, public, extends( symba_encounter ) :: symba_pltpenc SyMBA class for tracking pl-tp close encounters in a step Inherits type~~symba_pltpenc~~InheritsGraph type~symba_pltpenc symba_pltpenc type~symba_encounter symba_encounter type~symba_pltpenc->type~symba_encounter type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_pltpenc~~InheritedByGraph type~symba_pltpenc symba_pltpenc type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_pltpenc pltpenc_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t level Type-Bound Procedures resize write collision_check encounter_check kick setup copy spill append resolve_collision Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: resolve_collision => symba_collision_resolve_pltpenc Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c interface public module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-tp encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"type/symba_pltpenc.html"},{"title":"symba_plplenc – swiftest ","text":"type, public, extends( symba_encounter ) :: symba_plplenc SyMBA class for tracking pl-pl close encounters in a step Inherits type~~symba_plplenc~~InheritsGraph type~symba_plplenc symba_plplenc type~symba_encounter symba_encounter type~symba_plplenc->type~symba_encounter type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~symba_plplenc~~InheritedByGraph type~symba_plplenc symba_plplenc type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t level Type-Bound Procedures resize write collision_check encounter_check kick setup copy spill append extract_collisions resolve_fragmentations resolve_mergers resolve_collision Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: extract_collisions => symba_collision_encounter_extract_collisions Processes the pl-pl encounter list remove only those encounters that led to a collision interface public module subroutine symba_collision_encounter_extract_collisions(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resolve_fragmentations => symba_collision_resolve_fragmentations Process list of collisions, determine the collisional regime, and then create fragments interface public module subroutine symba_collision_resolve_fragmentations(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: resolve_mergers => symba_collision_resolve_mergers Process list of collisions and merge colliding bodies together interface public module subroutine symba_collision_resolve_mergers(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions procedure, public :: resolve_collision => symba_collision_resolve_plplenc Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c interface public module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"type/symba_plplenc.html"},{"title":"symba_nbody_system – swiftest ","text":"type, public, extends( helio_nbody_system ) :: symba_nbody_system Inherits type~~symba_nbody_system~~InheritsGraph type~symba_nbody_system symba_nbody_system type~symba_pltpenc symba_pltpenc type~symba_nbody_system->type~symba_pltpenc pltpenc_list type~symba_plplenc symba_plplenc type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list type~symba_merger symba_merger type~symba_nbody_system->type~symba_merger pl_adds type~helio_nbody_system helio_nbody_system type~symba_nbody_system->type~helio_nbody_system type~symba_encounter symba_encounter type~symba_pltpenc->type~symba_encounter type~symba_plplenc->type~symba_encounter type~symba_pl symba_pl type~symba_merger->type~symba_pl type~whm_nbody_system whm_nbody_system type~helio_nbody_system->type~whm_nbody_system type~swiftest_encounter swiftest_encounter type~symba_encounter->type~swiftest_encounter type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~symba_kinship symba_kinship type~symba_pl->type~symba_kinship kin type~helio_pl helio_pl type~symba_pl->type~helio_pl type~swiftest_pl swiftest_pl type~helio_pl->type~swiftest_pl type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_body->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg pl_adds pltpenc_list plplenc_list plplcollision_list irec Type-Bound Procedures discard conservation_report dump get_old_t_final read_frame read_particle_info write_frame write_hdr_bin write_hdr_netcdf obl_pot init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr write_discard initialize step interp set_recur_levels recursive_step reset Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles class( symba_merger ), public, allocatable :: pl_adds List of added bodies in mergers or collisions class( symba_pltpenc ), public, allocatable :: pltpenc_list List of massive body-test particle encounters in a single step class( symba_plplenc ), public, allocatable :: plplenc_list List of massive body-massive body encounters in a single step class( symba_plplenc ), public, allocatable :: plplcollision_list List of massive body-massive body collisions in a single step integer(kind=I4B), public :: irec System recursion level Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None procedure, public :: write_discard => symba_io_write_discard Write out information about discarded and merged planets and test particles in SyMBA interface public module subroutine symba_io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: initialize => symba_setup_initialize_system Performs SyMBA-specific initilization steps interface public module subroutine symba_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step => symba_step_system Advance the SyMBA nbody system forward in time by one step interface public module subroutine symba_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: interp => symba_step_interp_system Perform an interpolation step on the SymBA nbody system interface public module subroutine symba_step_interp_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_recur_levels => symba_step_set_recur_levels_system Sets recursion levels of bodies and encounter lists to the current system level interface public module subroutine symba_step_set_recur_levels_system(self, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system objec integer(kind=I4B), intent(in) :: ireci Input recursion level procedure, public :: recursive_step => symba_step_recur_system Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary interface public recursive module subroutine symba_step_recur_system(self, param, t, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level procedure, public :: reset => symba_step_reset_system Resets pl, tp,and encounter structures at the start of a new step interface public module subroutine symba_step_reset_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"type/symba_nbody_system.html"},{"title":"netcdf_parameters – swiftest ","text":"type, public :: netcdf_parameters Inherited by type~~netcdf_parameters~~InheritedByGraph type~netcdf_parameters netcdf_parameters type~swiftest_parameters swiftest_parameters type~swiftest_parameters->type~netcdf_parameters nciu type~symba_parameters symba_parameters type~symba_parameters->type~swiftest_parameters Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables out_type ncid dimids time_dimid id_dimid str_dimid time_varid id_varid name_varid ptype_varid npl_varid ntp_varid a_varid e_varid inc_varid capom_varid omega_varid capm_varid xhx_varid xhy_varid xhz_varid vhx_varid vhy_varid vhz_varid Gmass_varid rhill_varid radius_varid Ip1_varid Ip2_varid Ip3_varid rotx_varid roty_varid rotz_varid k2_varid Q_varid KE_orb_varid KE_spin_varid PE_varid L_orbx_varid L_orby_varid L_orbz_varid L_spinx_varid L_spiny_varid L_spinz_varid L_escapex_varid L_escapey_varid L_escapez_varid Ecollisions_varid Euntracked_varid GMescape_varid status_varid origin_type_varid origin_time_varid origin_xhx_varid origin_xhy_varid origin_xhz_varid origin_vhx_varid origin_vhy_varid origin_vhz_varid discard_time_varid discard_xhx_varid discard_xhy_varid discard_xhz_varid discard_vhx_varid discard_vhy_varid discard_vhz_varid discard_body_id_varid Type-Bound Procedures close initialize open Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: out_type NetCDF output type (will be assigned either NF90_DOUBLE or NF90_FLOAT, depending on the user parameter) integer(kind=I4B), public :: ncid NetCDF ID for the output file integer(kind=I4B), public :: dimids (3) Dimensions of the NetCDF file integer(kind=I4B), public :: time_dimid NetCDF ID for the time dimension integer(kind=I4B), public :: id_dimid NetCDF ID for the particle id dimension integer(kind=I4B), public :: str_dimid NetCDF ID for the character string dimension integer(kind=I4B), public :: time_varid NetCDF ID for the time variable integer(kind=I4B), public :: id_varid NetCDF ID for the particle name variable integer(kind=I4B), public :: name_varid NetCDF ID for the namevariable integer(kind=I4B), public :: ptype_varid NetCDF ID for the particle type variable integer(kind=I4B), public :: npl_varid NetCDF ID for the number of active massive bodies variable integer(kind=I4B), public :: ntp_varid NetCDF ID for the number of active test particles variable integer(kind=I4B), public :: a_varid NetCDF ID for the semimajor axis variable integer(kind=I4B), public :: e_varid NetCDF ID for the eccentricity variable integer(kind=I4B), public :: inc_varid NetCDF ID for the inclination variable integer(kind=I4B), public :: capom_varid NetCDF ID for the long. asc. node variable integer(kind=I4B), public :: omega_varid NetCDF ID for the arg. periapsis variable integer(kind=I4B), public :: capm_varid NetCDF ID for the mean anomaly variable integer(kind=I4B), public :: xhx_varid NetCDF ID for the heliocentric position x variable integer(kind=I4B), public :: xhy_varid NetCDF ID for the heliocentric position y variable integer(kind=I4B), public :: xhz_varid NetCDF ID for the heliocentric position z variable integer(kind=I4B), public :: vhx_varid NetCDF ID for the heliocentric velocity x variable integer(kind=I4B), public :: vhy_varid NetCDF ID for the heliocentric velocity y variable integer(kind=I4B), public :: vhz_varid NetCDF ID for the heliocentric velocity z variable integer(kind=I4B), public :: Gmass_varid NetCDF ID for the mass variable integer(kind=I4B), public :: rhill_varid NetCDF ID for the hill radius variable integer(kind=I4B), public :: radius_varid NetCDF ID for the radius variable integer(kind=I4B), public :: Ip1_varid NetCDF ID for the axis 1 principal moment of inertia variable integer(kind=I4B), public :: Ip2_varid NetCDF ID for the axis 2 principal moment of inertia variable integer(kind=I4B), public :: Ip3_varid NetCDF ID for the axis 3 principal moment of inertia variable integer(kind=I4B), public :: rotx_varid NetCDF ID for the rotation x variable integer(kind=I4B), public :: roty_varid NetCDF ID for the rotation y variable integer(kind=I4B), public :: rotz_varid NetCDF ID for the rotation z variable integer(kind=I4B), public :: k2_varid NetCDF ID for the Love number variable integer(kind=I4B), public :: Q_varid NetCDF ID for the energy dissipation variable integer(kind=I4B), public :: KE_orb_varid NetCDF ID for the system orbital kinetic energy variable integer(kind=I4B), public :: KE_spin_varid NetCDF ID for the system spin kinetic energy variable integer(kind=I4B), public :: PE_varid NetCDF ID for the system potential energy variable integer(kind=I4B), public :: L_orbx_varid NetCDF ID for the system orbital angular momentum x variable integer(kind=I4B), public :: L_orby_varid NetCDF ID for the system orbital angular momentum y variable integer(kind=I4B), public :: L_orbz_varid NetCDF ID for the system orbital angular momentum z variable integer(kind=I4B), public :: L_spinx_varid NetCDF ID for the system spin angular momentum x variable integer(kind=I4B), public :: L_spiny_varid NetCDF ID for the system spin angular momentum y variable integer(kind=I4B), public :: L_spinz_varid NetCDF ID for the system spin angular momentum z variable integer(kind=I4B), public :: L_escapex_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapey_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapez_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: Ecollisions_varid NetCDF ID for the energy lost in collisions variable integer(kind=I4B), public :: Euntracked_varid NetCDF ID for the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) integer(kind=I4B), public :: GMescape_varid NetCDF ID for the G*Mass of bodies that escape the system integer(kind=I4B), public :: status_varid NetCDF ID for the status variable integer(kind=I4B), public :: origin_type_varid NetCDF ID for the origin type integer(kind=I4B), public :: origin_time_varid NetCDF ID for the origin time integer(kind=I4B), public :: origin_xhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_xhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_xhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: origin_vhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_vhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_vhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: discard_time_varid NetCDF ID for the time of discard variable integer(kind=I4B), public :: discard_xhx_varid NetCDF ID for the heliocentric position of the body at the time of discard x variable integer(kind=I4B), public :: discard_xhy_varid NetCDF ID for the heliocentric position of the body at the time of discard y variable integer(kind=I4B), public :: discard_xhz_varid NetCDF ID for the heliocentric position of the body at the time of discard z variable integer(kind=I4B), public :: discard_vhx_varid NetCDF ID for the heliocentric velocity of the body at the time of discard x variable integer(kind=I4B), public :: discard_vhy_varid NetCDF ID for the heliocentric velocity of the body at the time of discard y variable integer(kind=I4B), public :: discard_vhz_varid NetCDF ID for the heliocentric velocity of the body at the time of discard z variable integer(kind=I4B), public :: discard_body_id_varid NetCDF ID for the id of the other body involved in the discard Type-Bound Procedures procedure, public :: close => netcdf_close Closes an open NetCDF file interface public module subroutine netcdf_close(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: initialize => netcdf_initialize_output Initialize a set of parameters used to identify a NetCDF output object interface public module subroutine netcdf_initialize_output(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: open => netcdf_open Opens a NetCDF file interface public module subroutine netcdf_open(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"type/netcdf_parameters.html"},{"title":"swiftest_parameters – swiftest ","text":"type, public :: swiftest_parameters User defined parameters that are read in from the parameters input file. \n    Each paramter is initialized to a default values. Inherits type~~swiftest_parameters~~InheritsGraph type~swiftest_parameters swiftest_parameters type~netcdf_parameters netcdf_parameters type~swiftest_parameters->type~netcdf_parameters nciu Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_parameters~~InheritedByGraph type~swiftest_parameters swiftest_parameters type~symba_parameters symba_parameters type~symba_parameters->type~swiftest_parameters Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables integrator maxid t0 t tstop dt ioutput incbfile inplfile intpfile in_type in_form istep_out outfile out_type out_form out_stat particle_out istep_dump rmin rmax rmaxu qmin qmin_coord qmin_alo qmin_ahi enc_out discard_out MU2KG TU2S DU2M GU inv_c2 energy_out lrhill_present lextra_force lbig_discard lclose lenergy loblatecb lrotation ltides Eorbit_orig GMtot_orig Ltot_orig Lorbit_orig Lspin_orig Lescape GMescape Ecollisions Euntracked lfirstenergy lfirstkick lrestart lgr lyarkovsky lyorp nciu Type-Bound Procedures reader writer dump read_in Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters Type-Bound Procedures procedure, public :: reader => io_param_reader interface public module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) The first element passes the integrator code to the reader integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 procedure, public :: writer => io_param_writer interface public module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) Not used in this procedure integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 procedure, public :: dump => io_dump_param interface public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) procedure, public :: read_in => io_read_in_param interface public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in)","tags":"","loc":"type/swiftest_parameters.html"},{"title":"swiftest_particle_info – swiftest ","text":"type, public :: swiftest_particle_info Class definition for the particle origin information object. This object is used to track time, location, and collisional regime\n of fragments produced in collisional events. Inherited by type~~swiftest_particle_info~~InheritedByGraph type~swiftest_particle_info swiftest_particle_info type~swiftest_cb swiftest_cb type~swiftest_cb->type~swiftest_particle_info info type~swiftest_body swiftest_body type~swiftest_body->type~swiftest_particle_info info type~swiftest_tp swiftest_tp type~swiftest_tp->type~swiftest_body type~helio_cb helio_cb type~helio_cb->type~swiftest_cb type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~whm_cb whm_cb type~whm_cb->type~swiftest_cb type~swiftest_pl->type~swiftest_body type~symba_cb symba_cb type~symba_cb->type~helio_cb type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~symba_tp symba_tp type~symba_tp->type~helio_tp type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_pl symba_pl type~symba_pl->type~helio_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~symba_merger symba_merger type~symba_nbody_system->type~symba_merger pl_adds type~symba_merger->type~symba_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables name particle_type origin_type origin_time origin_xh origin_vh discard_time status discard_xh discard_vh discard_body_id Type-Bound Procedures dump read_in copy set_value Components Type Visibility Attributes Name Initial character(len=NAMELEN), public :: name Non-unique name character(len=NAMELEN), public :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=NAMELEN), public :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), public :: origin_time The time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), public :: discard_time The time of the particle's discard character(len=NAMELEN), public :: status Particle status description: Active, Merged, Fragmented, etc. real(kind=DP), public, dimension(NDIM) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), public, dimension(NDIM) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), public :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) Type-Bound Procedures procedure, public :: dump => io_dump_particle_info Dumps contents of particle information to file interface public module subroutine io_dump_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Swiftest particle info metadata object integer(kind=I4B), intent(in) :: iu Open unformatted file unit number procedure, public :: read_in => io_read_in_particle_info Read in a particle information object from an open file interface public module subroutine io_read_in_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number procedure, public :: copy => util_copy_particle_info Copies one set of information object components into another, component-by-component interface public module subroutine util_copy_particle_info(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source procedure, public :: set_value => util_set_particle_info Sets one or more values of the particle information metadata object interface public module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: Active, Merged, Fragmented, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved)","tags":"","loc":"type/swiftest_particle_info.html"},{"title":"swiftest_base – swiftest ","text":"type, public, abstract :: swiftest_base An abstract superclass for a generic Swiftest object\n The minimal methods that all systems must have Inherited by type~~swiftest_base~~InheritedByGraph type~swiftest_base swiftest_base type~swiftest_cb swiftest_cb type~swiftest_cb->type~swiftest_base type~swiftest_body swiftest_body type~swiftest_body->type~swiftest_base type~swiftest_tp swiftest_tp type~swiftest_tp->type~swiftest_body type~helio_cb helio_cb type~helio_cb->type~swiftest_cb type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~whm_cb whm_cb type~whm_cb->type~swiftest_cb type~swiftest_pl->type~swiftest_body type~symba_cb symba_cb type~symba_cb->type~helio_cb type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~symba_tp symba_tp type~symba_tp->type~helio_tp type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_pl symba_pl type~symba_pl->type~helio_pl type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system type~symba_merger symba_merger type~symba_nbody_system->type~symba_merger pl_adds type~symba_merger->type~symba_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_frame write_particle_info Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_frame => write_frame_netcdf Set up generic procedure that will switch between NetCDF or Fortran binary depending on arguments public interface netcdf_write_frame_base () Arguments None generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None","tags":"","loc":"type/swiftest_base.html"},{"title":"swiftest_cb – swiftest ","text":"type, public, abstract, extends( swiftest_base ) :: swiftest_cb A concrete lass for the central body in a Swiftest simulation Inherits type~~swiftest_cb~~InheritsGraph type~swiftest_cb swiftest_cb type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_cb~~InheritedByGraph type~swiftest_cb swiftest_cb type~whm_cb whm_cb type~whm_cb->type~swiftest_cb type~helio_cb helio_cb type~helio_cb->type~swiftest_cb type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_cb cb type~symba_cb symba_cb type~symba_cb->type~helio_cb type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~rmvs_cb rmvs_cb type~rmvs_cb->type~whm_cb type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~rmvs_tp rmvs_tp type~rmvs_tp->type~rmvs_cb cb_heliocentric type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables info id mass Gmass radius density j2rp2 j4rp4 aobl atide aoblbeg aoblend atidebeg atideend xb vb agr Ip rot k2 Q tlag L0 dL Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info read_in read_frame write_frame_bin write_frame Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters generic, public :: write_frame => write_frame_netcdf , write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_cb () Arguments None","tags":"","loc":"type/swiftest_cb.html"},{"title":"swiftest_body – swiftest ","text":"type, public, abstract, extends( swiftest_base ) :: swiftest_body An abstract class for a generic collection of Swiftest bodies\n Superclass that defines the generic elements of a Swiftest particle Inherits type~~swiftest_body~~InheritsGraph type~swiftest_body swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_body~~InheritedByGraph type~swiftest_body swiftest_body type~swiftest_pl swiftest_pl type~swiftest_pl->type~swiftest_body type~swiftest_tp swiftest_tp type~swiftest_tp->type~swiftest_body type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~symba_tp symba_tp type~symba_tp->type~helio_tp type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_pl symba_pl type~symba_pl->type~helio_pl type~rmvs_nbody_system->type~whm_nbody_system type~symba_merger symba_merger type~symba_merger->type~symba_pl type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info discard kick set_mu step accel drift v2pv pv2v read_in read_frame write_frame_bin accel_obl el2xv xv2el setup accel_user append fill resize set_ir3 sort rearrange spill write_frame Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure( abstract_discard_body ), public, deferred :: discard subroutine abstract_discard_body(self, system, param) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure( abstract_kick_body ), public, deferred :: kick subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure( abstract_set_mu ), public, deferred :: set_mu subroutine abstract_set_mu(self, cb) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure( abstract_step_body ), public, deferred :: step subroutine abstract_step_body(self, system, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure( abstract_accel ), public, deferred :: accel subroutine abstract_accel(self, system, param, t, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_obl => obl_acc_body Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_body(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: setup => setup_body A constructor that sets the number of bodies and allocates all allocatable arrays interface public module subroutine setup_body(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: append => util_append_body Appends elements from one structure to another interface public module subroutine util_append_body(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: fill => util_fill_body \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_body(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_body Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_body(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object procedure, public :: sort => util_sort_body Sorts body arrays by a sortable componen interface public module subroutine util_sort_body(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_body Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_body(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_body \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None","tags":"","loc":"type/swiftest_body.html"},{"title":"swiftest_pl – swiftest ","text":"type, public, abstract, extends( swiftest_body ) :: swiftest_pl An abstract class for a generic collection of Swiftest massive bodies\n Superclass that defines the generic elements of a Swiftest particle Inherits type~~swiftest_pl~~InheritsGraph type~swiftest_pl swiftest_pl type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_pl~~InheritedByGraph type~swiftest_pl swiftest_pl type~whm_pl whm_pl type~whm_pl->type~swiftest_pl type~fraggle_fragments fraggle_fragments type~fraggle_fragments->type~swiftest_pl type~helio_pl helio_pl type~helio_pl->type~swiftest_pl type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~whm_pl type~rmvs_nbody_system rmvs_nbody_system type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_pl symba_pl type~symba_pl->type~helio_pl type~rmvs_nbody_system->type~whm_nbody_system type~symba_merger symba_merger type~symba_merger->type~symba_pl type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_merger pl_adds type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm mass Gmass rhill radius xbeg xend vbeg density Ip rot k2 Q tlag k_plpl nplpl Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info kick step accel drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard index accel_int accel_obl setup accel_tides append h2b b2h vh2vb vb2vh xh2xb fill resize set_beg_end set_mu set_rhill sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure( abstract_kick_body ), public, deferred :: kick subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure( abstract_step_body ), public, deferred :: step subroutine abstract_step_body(self, system, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure( abstract_accel ), public, deferred :: accel subroutine abstract_accel(self, system, param, t, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays interface public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: append => util_append_pl Appends elements from one structure to another interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/swiftest_pl.html"},{"title":"swiftest_tp – swiftest ","text":"type, public, abstract, extends( swiftest_body ) :: swiftest_tp An abstract class for a generic collection of Swiftest test particles\n Superclass that defines the generic elements of a Swiftest test particle Inherits type~~swiftest_tp~~InheritsGraph type~swiftest_tp swiftest_tp type~swiftest_body swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_particle_info swiftest_particle_info type~swiftest_body->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_tp~~InheritedByGraph type~swiftest_tp swiftest_tp type~whm_tp whm_tp type~whm_tp->type~swiftest_tp type~helio_tp helio_tp type~helio_tp->type~swiftest_tp type~swiftest_nbody_system swiftest_nbody_system type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~symba_tp symba_tp type~symba_tp->type~helio_tp type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~rmvs_tp rmvs_tp type~rmvs_tp->type~whm_tp type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lfirst nbody info id status ldiscard lmask mu xh vh xb vb ah aobl atide agr ir3h a e inc capom omega capm isperi peri atp k_pltp npltp Type-Bound Procedures dump dump_particle_info write_frame_netcdf write_particle_info_netcdf write_particle_info kick step accel drift v2pv pv2v read_in read_frame write_frame_bin el2xv xv2el accel_user set_ir3 write_frame discard accel_int accel_obl setup append h2b b2h vb2vh vh2vb xh2xb fill get_peri resize set_mu sort rearrange spill Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset generic, public :: write_particle_info => write_particle_info_netcdf public interface netcdf_write_particle_info_base () Arguments None procedure( abstract_kick_body ), public, deferred :: kick subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. procedure( abstract_step_body ), public, deferred :: step subroutine abstract_step_body(self, system, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure( abstract_accel ), public, deferred :: accel subroutine abstract_accel(self, system, param, t, lbeg) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object generic, public :: write_frame => write_frame_netcdf , write_frame_bin Add the generic write frame for Fortran binary files public interface netcdf_write_frame_base () Arguments None public interface io_write_frame_body () Arguments None procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies interface public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr procedure, public :: append => util_append_tp Appends elements from one structure to another interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"type/swiftest_tp.html"},{"title":"swiftest_nbody_system – swiftest ","text":"type, public, abstract :: swiftest_nbody_system An abstract class for a basic Swiftest nbody system \n  This superclass contains a minimial system of a set of test particles (tp), massive bodies (pl), and a central body (cb) Inherits type~~swiftest_nbody_system~~InheritsGraph type~swiftest_nbody_system swiftest_nbody_system type~swiftest_cb swiftest_cb type~swiftest_nbody_system->type~swiftest_cb cb type~swiftest_pl swiftest_pl type~swiftest_nbody_system->type~swiftest_pl pl, pl_discards type~swiftest_tp swiftest_tp type~swiftest_nbody_system->type~swiftest_tp tp, tp_discards type~swiftest_particle_info swiftest_particle_info type~swiftest_cb->type~swiftest_particle_info info type~swiftest_base swiftest_base type~swiftest_cb->type~swiftest_base type~swiftest_body swiftest_body type~swiftest_pl->type~swiftest_body type~swiftest_tp->type~swiftest_body type~swiftest_body->type~swiftest_particle_info info type~swiftest_body->type~swiftest_base Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Inherited by type~~swiftest_nbody_system~~InheritedByGraph type~swiftest_nbody_system swiftest_nbody_system type~whm_nbody_system whm_nbody_system type~whm_nbody_system->type~swiftest_nbody_system type~rmvs_nbody_system rmvs_nbody_system type~rmvs_nbody_system->type~whm_nbody_system type~helio_nbody_system helio_nbody_system type~helio_nbody_system->type~whm_nbody_system type~rmvs_pl rmvs_pl type~rmvs_pl->type~rmvs_nbody_system planetocentric type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~helio_nbody_system Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables cb pl tp tp_discards pl_discards GMtot ke_orbit ke_spin pe te oblpot Lorbit Lspin Ltot lbeg Type-Bound Procedures step discard conservation_report dump get_old_t_final read_frame read_particle_info write_discard write_frame write_hdr_bin write_hdr_netcdf obl_pot initialize init_particle_info step_spin set_msys get_energy_and_momentum rescale validate_ids write_hdr Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure( abstract_step_system ), public, deferred :: step Each integrator will have its own version of the step subroutine abstract_step_system(self, param, t, dt) Prototype Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: discard => discard_system Perform a discard step on the system interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen procedure, public :: dump => io_dump_system Dump the state of the system to a file interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_discard => io_write_discard Write out information about discarded test particles interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object procedure, public :: initialize => setup_initialize_system Initialize the system from input files interface public module subroutine setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters generic, public :: write_hdr => write_hdr_bin , write_hdr_netcdf Generic method call for writing headers public interface io_write_hdr_system () Arguments None public interface netcdf_write_hdr_system () Arguments None","tags":"","loc":"type/swiftest_nbody_system.html"},{"title":"swiftest_encounter – swiftest ","text":"type, public :: swiftest_encounter Inherited by type~~swiftest_encounter~~InheritedByGraph type~swiftest_encounter swiftest_encounter type~symba_encounter symba_encounter type~symba_encounter->type~swiftest_encounter type~symba_pltpenc symba_pltpenc type~symba_pltpenc->type~symba_encounter type~symba_plplenc symba_plplenc type~symba_plplenc->type~symba_encounter type~symba_nbody_system symba_nbody_system type~symba_nbody_system->type~symba_pltpenc pltpenc_list type~symba_nbody_system->type~symba_plplenc plplenc_list, plplcollision_list Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables nenc lvdotr status kidx index1 index2 id1 id2 x1 x2 v1 v2 t Type-Bound Procedures setup append copy spill resize write Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter Type-Bound Procedures procedure, public :: setup => setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays interface public module subroutine setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for procedure, public :: append => util_append_encounter Appends elements from one structure to another interface public module subroutine util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to procedure, public :: copy => util_copy_encounter Copies elements from the source encounter list into self. interface public module subroutine util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into procedure, public :: spill => util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) interface public module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed procedure, public :: write => io_write_encounter Write close encounter data to output binary file interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"type/swiftest_encounter.html"},{"title":"lambda_obj – swiftest ","text":"type, public :: lambda_obj Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Inherited by type~~lambda_obj~~InheritedByGraph type~lambda_obj lambda_obj type~lambda_obj_err lambda_obj_err type~lambda_obj_err->type~lambda_obj type~lambda_obj_tvar lambda_obj_tvar type~lambda_obj_tvar->type~lambda_obj Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr lastval lastarg Constructor lambda_obj Finalization Procedures lambda_destroy Type-Bound Procedures init eval lambda_init_0 Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg Constructor public interface lambda_obj public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) Finalization Procedures final :: lambda_destroy public subroutine lambda_destroy (self) Arguments Type Intent Optional Attributes Name type( lambda_obj ) :: self Type-Bound Procedures generic, public :: init => lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) procedure, public :: eval => lambda_eval_0 public function lambda_eval_0 (self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) procedure, public, nopass :: lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj )","tags":"","loc":"type/lambda_obj.html"},{"title":"lambda_obj_err – swiftest ","text":"type, public, extends( lambda_obj ) :: lambda_obj_err Extended class for an lambda function object. This object takes allows for the return of a logical error flag during evaluation of the function. Inherits type~~lambda_obj_err~~InheritsGraph type~lambda_obj_err lambda_obj_err type~lambda_obj lambda_obj type~lambda_obj_err->type~lambda_obj Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr lastval lastarg lambdaptr_err lerr Type-Bound Procedures lambda_init_0 init eval lambda_init_0_err Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg procedure( lambda0err ), public, pointer, nopass :: lambdaptr_err => null() logical, public :: lerr Type-Bound Procedures procedure, public, nopass :: lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) generic, public :: init => lambda_init_0 , lambda_init_0_err public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) procedure, public :: eval => lambda_eval_0_err public function lambda_eval_0_err (self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_err ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) procedure, public, nopass :: lambda_init_0_err public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err )","tags":"","loc":"type/lambda_obj_err.html"},{"title":"lambda_obj_tvar – swiftest ","text":"type, public, extends( lambda_obj ) :: lambda_obj_tvar Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Inherits type~~lambda_obj_tvar~~InheritsGraph type~lambda_obj_tvar lambda_obj_tvar type~lambda_obj lambda_obj type~lambda_obj_tvar->type~lambda_obj Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Contents Variables lambdaptr lastval lastarg lambdaptr_tvar Type-Bound Procedures eval lambda_init_0 init evalt lambda_init_tvar Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg procedure( lambda0tvar ), public, pointer, nopass :: lambdaptr_tvar => null() Type-Bound Procedures procedure, public :: eval => lambda_eval_0 public function lambda_eval_0 (self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) procedure, public, nopass :: lambda_init_0 public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) generic, public :: init => lambda_init_0 , lambda_init_tvar public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) procedure, public :: evalt => lambda_eval_tvar public function lambda_eval_tvar (self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_tvar ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable procedure, public, nopass :: lambda_init_tvar public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar )","tags":"","loc":"type/lambda_obj_tvar.html"},{"title":"tidederiv – swiftest","text":"abstract interface function tidederiv(x, t, dt, xbeg, xend) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:),allocatable","tags":"","loc":"interface/tidederiv.html"},{"title":"abstract_read_frame – swiftest","text":"abstract interface public function abstract_read_frame(self, iu, param) result(ierr) Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/abstract_read_frame.html"},{"title":"abstract_discard_body – swiftest","text":"abstract interface public subroutine abstract_discard_body(self, system, param) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/abstract_discard_body.html"},{"title":"abstract_accel – swiftest","text":"abstract interface public subroutine abstract_accel(self, system, param, t, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/abstract_accel.html"},{"title":"abstract_kick_body – swiftest","text":"abstract interface public subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/abstract_kick_body.html"},{"title":"abstract_set_mu – swiftest","text":"abstract interface public subroutine abstract_set_mu(self, cb) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/abstract_set_mu.html"},{"title":"abstract_step_body – swiftest","text":"abstract interface public subroutine abstract_step_body(self, system, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/abstract_step_body.html"},{"title":"abstract_step_system – swiftest","text":"abstract interface public subroutine abstract_step_system(self, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/abstract_step_system.html"},{"title":"lambda0 – swiftest","text":"abstract interface public function lambda0(x) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP)","tags":"","loc":"interface/lambda0.html"},{"title":"lambda0err – swiftest","text":"abstract interface public function lambda0err(x, lerr) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x logical, intent(out) :: lerr Return Value real(kind=DP)","tags":"","loc":"interface/lambda0err.html"},{"title":"lambda0tvar – swiftest","text":"abstract interface public function lambda0tvar(x, t) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:),allocatable","tags":"","loc":"interface/lambda0tvar.html"},{"title":"tides_spin_derivs – swiftest","text":"function tides_spin_derivs(rot_pl_cb, t, dt, xbeg, xend) result(drot) Need to add more arguments so we can pull in mass, radius, Ip, J2, etc...\n author: Jennifer L.L. Pouplin and David A. Minton function used to calculate the derivatives that are fed to the ODE solver Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: rot_pl_cb Array of rotations. The last element is the central body, and all others are massive bodies real(kind=DP), intent(in) :: t Current time, which is used to interpolate the massive body positions real(kind=DP), intent(in) :: dt Total step size real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/tides_spin_derivs.html"},{"title":"tides_derivs_eval – swiftest","text":"function tides_derivs_eval(self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( tides_derivs_func ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/tides_derivs_eval.html"},{"title":"tides_derivs_init – swiftest","text":"function tides_derivs_init(lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) Called by proc~~tides_derivs_init~~CalledByGraph proc~tides_derivs_init tides_derivs_init interface~lambda_obj lambda_obj interface~lambda_obj->proc~tides_derivs_init Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/tides_derivs_init.html"},{"title":"lambda_obj – swiftest","text":"private interface lambda_obj Calls interface~~lambda_obj~~CallsGraph interface~lambda_obj lambda_obj proc~tides_derivs_init tides_derivs_init interface~lambda_obj->proc~tides_derivs_init Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Module Procedures tides_derivs_init Module Procedures function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func )","tags":"","loc":"interface/lambda_obj.html"},{"title":"obl_pot_one – swiftest","text":"elemental function obl_pot_one(npl, GMcb, GMpl, j2rp2, j4rp4, zh, irh) result(oblpot) Compute the contribution to the total gravitational potential due solely to the oblateness of the central body from a single massive body\n    Returned value does not include monopole term or terms higher than J4 Reference : MacMillan , W . D . 1958 . The Theory of the Potential , ( Dover Publications ), 363 . Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 \n Adapted from Hal Levison's Swift routine obl_pot.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in) :: GMcb G*mass of the central body real(kind=DP), intent(in) :: GMpl G*mass of the massive body real(kind=DP), intent(in) :: j2rp2 J_2 / R**2 of the central body real(kind=DP), intent(in) :: j4rp4 J_2 / R**4 of the central body real(kind=DP), intent(in) :: zh z-component of the heliocentric distance vector of the massive body real(kind=DP), intent(in) :: irh Inverse of the heliocentric distance magnitude of the massive body Return Value real(kind=DP) Gravitational potential Called by proc~~obl_pot_one~~CalledByGraph proc~obl_pot_one obl_pot_one proc~obl_pot_system obl_pot_system proc~obl_pot_system->proc~obl_pot_one interface~obl_pot_system obl_pot_system interface~obl_pot_system->proc~obl_pot_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_pot_one.html"},{"title":"orbel_flon – swiftest","text":"pure function orbel_flon(e, icapn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: icapn Return Value real(kind=DP) Calls proc~~orbel_flon~~CallsGraph proc~orbel_flon orbel_flon 3 3 proc~orbel_flon->3 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_flon~~CalledByGraph proc~orbel_flon orbel_flon proc~orbel_fhybrid orbel_fhybrid proc~orbel_fhybrid->proc~orbel_flon proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_flon.html"},{"title":"orbel_fget – swiftest","text":"pure function orbel_fget(e, capn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: capn Return Value real(kind=DP) Calls proc~~orbel_fget~~CallsGraph proc~orbel_fget orbel_fget proc~orbel_schget orbel_schget proc~orbel_fget->proc~orbel_schget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_fget~~CalledByGraph proc~orbel_fget orbel_fget proc~orbel_fhybrid orbel_fhybrid proc~orbel_fhybrid->proc~orbel_fget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_fget.html"},{"title":"orbel_zget – swiftest","text":"pure function orbel_zget(iq) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: iq Return Value real(kind=DP) Called by proc~~orbel_zget~~CalledByGraph proc~orbel_zget orbel_zget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_zget proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_zget.html"},{"title":"orbel_esolmd – swiftest","text":"pure function orbel_esolmd(e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) Calls proc~~orbel_esolmd~~CallsGraph proc~orbel_esolmd orbel_esolmd interface~orbel_scget orbel_scget proc~orbel_esolmd->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_esolmd~~CalledByGraph proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid orbel_ehybrid proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_esolmd.html"},{"title":"orbel_ehie – swiftest","text":"pure function orbel_ehie(e, im) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: im Return Value real(kind=DP) Calls proc~~orbel_ehie~~CallsGraph proc~orbel_ehie orbel_ehie interface~orbel_scget orbel_scget proc~orbel_ehie->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_ehie~~CalledByGraph proc~orbel_ehie orbel_ehie proc~orbel_ehybrid orbel_ehybrid proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_ehie.html"},{"title":"orbel_eget – swiftest","text":"pure function orbel_eget(e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) Calls proc~~orbel_eget~~CallsGraph proc~orbel_eget orbel_eget interface~orbel_scget orbel_scget proc~orbel_eget->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_eget~~CalledByGraph proc~orbel_eget orbel_eget proc~orbel_ehybrid orbel_ehybrid proc~orbel_ehybrid->proc~orbel_eget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_eget.html"},{"title":"orbel_ehybrid – swiftest","text":"pure function orbel_ehybrid(e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) Calls proc~~orbel_ehybrid~~CallsGraph proc~orbel_ehybrid orbel_ehybrid proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget interface~orbel_scget orbel_scget proc~orbel_esolmd->interface~orbel_scget proc~orbel_ehie->interface~orbel_scget proc~orbel_eget->interface~orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_ehybrid~~CalledByGraph proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_ehybrid.html"},{"title":"orbel_fhybrid – swiftest","text":"pure function orbel_fhybrid(e, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: n Return Value real(kind=DP) Calls proc~~orbel_fhybrid~~CallsGraph proc~orbel_fhybrid orbel_fhybrid proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_schget orbel_schget proc~orbel_fget->proc~orbel_schget 3 3 proc~orbel_flon->3 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_fhybrid~~CalledByGraph proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_fhybrid.html"},{"title":"orbel_el2xv – swiftest","text":"pure subroutine orbel_el2xv(mu, a, ie, inc, capom, omega, capm, x, v) Compute osculating orbital elements from relative C)rtesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 If eccentricity < sqrt ( TINY ), argument of pericenter is arbitrarily set to 0 ALGORITHM : See Fitzpatrick \"Principles of Cel. Mech.\" Adapted from Martin Duncan's el2xv.f\n DATE WRITTEN:  May 11, 1992.\n REVISIONS: May 26 - now use better Kepler solver for ellipses\n  and hyperbolae called EHYBRID.F and FHYBRID.F Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: a real(kind=DP), intent(in) :: ie real(kind=DP), intent(in) :: inc real(kind=DP), intent(in) :: capom real(kind=DP), intent(in) :: omega real(kind=DP), intent(in) :: capm real(kind=DP), intent(out), dimension(:) :: x real(kind=DP), intent(out), dimension(:) :: v Calls proc~~orbel_el2xv~~CallsGraph proc~orbel_el2xv orbel_el2xv proc~orbel_zget orbel_zget proc~orbel_el2xv->proc~orbel_zget proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_schget orbel_schget proc~orbel_el2xv->proc~orbel_schget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid interface~orbel_scget orbel_scget proc~orbel_el2xv->interface~orbel_scget proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget 3 3 proc~orbel_flon->3 proc~orbel_eget->interface~orbel_scget proc~orbel_esolmd->interface~orbel_scget proc~orbel_fget->proc~orbel_schget proc~orbel_ehie->interface~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_el2xv~~CalledByGraph proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_el2xv.html"},{"title":"orbel_schget – swiftest","text":"pure subroutine orbel_schget(angle, shx, chx) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: shx real(kind=DP), intent(out) :: chx Called by proc~~orbel_schget~~CalledByGraph proc~orbel_schget orbel_schget proc~orbel_fget orbel_fget proc~orbel_fget->proc~orbel_schget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->proc~orbel_schget proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv proc~orbel_fhybrid->proc~orbel_fget interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_schget.html"},{"title":"whm_kick_getacch_ah0 – swiftest","text":"function whm_kick_getacch_ah0(mu, xhp, n) result(ah0) Compute zeroth term heliocentric accelerations of planets Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu real(kind=DP), intent(in), dimension(:,:) :: xhp integer(kind=I4B), intent(in) :: n Return Value real(kind=DP),\n  dimension(NDIM) Called by proc~~whm_kick_getacch_ah0~~CalledByGraph proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_tp whm_kick_getacch_tp proc~whm_kick_getacch_tp->proc~whm_kick_getacch_ah0 proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah0 interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl interface~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp->proc~whm_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_ah0.html"},{"title":"whm_kick_getacch_ah1 – swiftest","text":"pure subroutine whm_kick_getacch_ah1(cb, pl) Compute first term heliocentric accelerations of planets Adapted from Hal Levison's Swift routine getacch_ah1.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah1.f90 Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb WHM central body object class( whm_pl ), intent(inout) :: pl WHM massive body object Called by proc~~whm_kick_getacch_ah1~~CalledByGraph proc~whm_kick_getacch_ah1 whm_kick_getacch_ah1 proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah1 interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_ah1.html"},{"title":"whm_kick_getacch_ah2 – swiftest","text":"pure subroutine whm_kick_getacch_ah2(cb, pl) Compute second term heliocentric accelerations of planets Adapted from Hal Levison's Swift routine getacch_ah2.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah2.f90 Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb Swiftest central body object class( whm_pl ), intent(inout) :: pl WHM massive body object Called by proc~~whm_kick_getacch_ah2~~CalledByGraph proc~whm_kick_getacch_ah2 whm_kick_getacch_ah2 proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah2 interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_ah2.html"},{"title":"solve_wbs – swiftest","text":"function solve_wbs(u) result(x) Uses ieee_exceptions swiftest proc~~solve_wbs~~UsesGraph proc~solve_wbs solve_wbs module~swiftest swiftest proc~solve_wbs->module~swiftest ieee_exceptions ieee_exceptions proc~solve_wbs->ieee_exceptions module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:), allocatable :: u Return Value real(kind=QP),\n  dimension(:),allocatable Called by proc~~solve_wbs~~CalledByGraph proc~solve_wbs solve_wbs proc~util_solve_linear_system_q util_solve_linear_system_q proc~util_solve_linear_system_q->proc~solve_wbs proc~util_solve_linear_system_d util_solve_linear_system_d proc~util_solve_linear_system_d->proc~solve_wbs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/solve_wbs.html"},{"title":"ge_wpp – swiftest","text":"function ge_wpp(A, b) result(u) Uses ieee_exceptions swiftest proc~~ge_wpp~~UsesGraph proc~ge_wpp ge_wpp module~swiftest swiftest proc~ge_wpp->module~swiftest ieee_exceptions ieee_exceptions proc~ge_wpp->ieee_exceptions module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Solve  Ax=b  using Gaussian elimination then backwards substitution.\n   A being an n by n matrix.\n   x and b are n by 1 vectors. \n Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b Return Value real(kind=QP),\n  dimension(:,:),allocatable Called by proc~~ge_wpp~~CalledByGraph proc~ge_wpp ge_wpp proc~util_solve_linear_system_q util_solve_linear_system_q proc~util_solve_linear_system_q->proc~ge_wpp proc~util_solve_linear_system_d util_solve_linear_system_d proc~util_solve_linear_system_d->proc~ge_wpp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/ge_wpp.html"},{"title":"util_get_energy_potential – swiftest","text":"subroutine util_get_energy_potential(npl, nplpl, k_plpl, lmask, GMcb, Gmass, mass, xb, pe) Compute total system potential energy Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl integer(kind=I8B), intent(in) :: nplpl integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl logical, intent(in), dimension(:) :: lmask real(kind=DP), intent(in) :: GMcb real(kind=DP), intent(in), dimension(:) :: Gmass real(kind=DP), intent(in), dimension(:) :: mass real(kind=DP), intent(in), dimension(:,:) :: xb real(kind=DP), intent(out) :: pe Called by proc~~util_get_energy_potential~~CalledByGraph proc~util_get_energy_potential util_get_energy_potential proc~util_get_energy_momentum_system util_get_energy_momentum_system proc~util_get_energy_momentum_system->proc~util_get_energy_potential interface~util_get_energy_momentum_system util_get_energy_momentum_system interface~util_get_energy_momentum_system->proc~util_get_energy_momentum_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_get_energy_potential.html"},{"title":"discard_cb_tp – swiftest","text":"subroutine discard_cb_tp(tp, system, param) Check to see if test particles should be discarded based on their positions relative to the Sun\n        or because they are unbound from the system Adapted from David E. Kaufmann's Swifter routine: discard_sun.f90\n Adapted from Hal Levison's Swift routine discard_sun.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Contents None","tags":"","loc":"proc/discard_cb_tp.html"},{"title":"discard_peri_tp – swiftest","text":"subroutine discard_peri_tp(tp, system, param) Check to see if a test particle should be discarded because its perihelion distance becomes too small Adapted from David E. Kaufmann's Swifter routine: discard_peri.f90\n Adapted from Hal Levison's Swift routine discard_peri.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameterss Contents None","tags":"","loc":"proc/discard_peri_tp.html"},{"title":"discard_pl_tp – swiftest","text":"subroutine discard_pl_tp(tp, system, param) Check to see if test particles should be discarded based on their positions relative to the massive bodies Adapted from David E. Kaufmann's Swifter routine: discard_pl.f90\n Adapted from Hal Levison's Swift routine discard_pl.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Contents None","tags":"","loc":"proc/discard_pl_tp.html"},{"title":"discard_pl_close – swiftest","text":"subroutine discard_pl_close(dx, dv, dt, r2crit, iflag, r2min) Check to see if a test particle and massive body are having, or will have within the next time step, an encounter such\n          that the separation distance r is less than some critical radius rcrit (or r 2 < rcrit 2 = r2crit) Adapted from David E. Kaufmann's Swifter routine: discard_pl_close.f90\n Adapted from Hal Levison's Swift routine discard_pl_close.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: dx real(kind=DP), intent(in), dimension(:) :: dv real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit integer(kind=I4B), intent(out) :: iflag real(kind=DP), intent(out) :: r2min Contents None","tags":"","loc":"proc/discard_pl_close.html"},{"title":"io_read_encounter – swiftest","text":"function io_read_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out, out_type) result(ierr) Read close encounter data from input binary files\n     Other than time t, there is no direct file input from this function\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_encounter.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: id1 integer(kind=I4B), intent(out) :: id2 real(kind=DP), intent(out) :: Gmass1 real(kind=DP), intent(out) :: Gmass2 real(kind=DP), intent(out) :: radius1 real(kind=DP), intent(out) :: radius2 real(kind=DP), intent(out), dimension(:) :: xh1 real(kind=DP), intent(out), dimension(:) :: xh2 real(kind=DP), intent(out), dimension(:) :: vh1 real(kind=DP), intent(out), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) Calls proc~~io_read_encounter~~CallsGraph proc~io_read_encounter io_read_encounter interface~util_exit util_exit proc~io_read_encounter->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_encounter.html"},{"title":"io_read_hdr – swiftest","text":"function io_read_hdr(iu, t, npl, ntp, out_form, out_type) result(ierr) Read frame header from input binary files\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_hdr.f90\n Adapted from Hal Levison's Swift routine io_read_hdr.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: npl integer(kind=I4B), intent(out) :: ntp character(len=*), intent(out) :: out_form character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) Called by proc~~io_read_hdr~~CalledByGraph proc~io_read_hdr io_read_hdr proc~io_read_frame_system io_read_frame_system proc~io_read_frame_system->proc~io_read_hdr interface~io_read_frame_system io_read_frame_system interface~io_read_frame_system->proc~io_read_frame_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_hdr.html"},{"title":"drift_dan – swiftest","text":"pure subroutine drift_dan(mu, x0, v0, dt0, iflag) Perform Kepler drift, solving Kepler's equation in appropriate variables Adapted from David E. Kaufmann's Swifter routine: drift_dan.f90\n Adapted from Hal Levison and Martin Duncan's Swift routine drift_dan.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(inout), dimension(:) :: x0 real(kind=DP), intent(inout), dimension(:) :: v0 real(kind=DP), intent(in) :: dt0 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_dan~~CallsGraph proc~drift_dan drift_dan proc~drift_kepmd drift_kepmd proc~drift_dan->proc~drift_kepmd proc~drift_kepu drift_kepu proc~drift_dan->proc~drift_kepu proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu->proc~drift_kepu_fchk proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu->proc~drift_kepu_lag proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu->proc~drift_kepu_guess proc~drift_kepu_new drift_kepu_new proc~drift_kepu->proc~drift_kepu_new proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_fchk->proc~drift_kepu_stumpff proc~drift_kepu_lag->proc~drift_kepu_stumpff interface~orbel_scget orbel_scget proc~drift_kepu_guess->interface~orbel_scget proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~drift_kepu_new->proc~drift_kepu_stumpff proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_dan.html"},{"title":"drift_kepmd – swiftest","text":"pure subroutine drift_kepmd(dm, es, ec, x, s, c) Solve Kepler's equation in difference form for an ellipse for small input dm and eccentricity\n    Original disclaimer: built for speed, does not check how well the original equation is solved\n    Can do that in calling routine by checking how close (x - ec s + es (1.0 - c) - dm) is to zero Adapted from David E. Kaufmann's Swifter routine: drift_kepmd.f90\n Adapted from Martin Duncan's Swift routine drift_kepmd.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dm real(kind=DP), intent(in) :: es real(kind=DP), intent(in) :: ec real(kind=DP), intent(out) :: x real(kind=DP), intent(out) :: s real(kind=DP), intent(out) :: c Called by proc~~drift_kepmd~~CalledByGraph proc~drift_kepmd drift_kepmd proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepmd Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepmd.html"},{"title":"drift_kepu – swiftest","text":"pure subroutine drift_kepu(dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Solve Kepler's equation in universal variables Adapted from David E. Kaufmann's Swifter routine: drift_kepu.f90\n Adapted from Hal Levison's Swift routine drift_kepu.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_kepu~~CallsGraph proc~drift_kepu drift_kepu proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu->proc~drift_kepu_fchk proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu->proc~drift_kepu_lag proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu->proc~drift_kepu_guess proc~drift_kepu_new drift_kepu_new proc~drift_kepu->proc~drift_kepu_new proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_fchk->proc~drift_kepu_stumpff proc~drift_kepu_lag->proc~drift_kepu_stumpff interface~orbel_scget orbel_scget proc~drift_kepu_guess->interface~orbel_scget proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~drift_kepu_new->proc~drift_kepu_stumpff proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu~~CalledByGraph proc~drift_kepu drift_kepu proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu.html"},{"title":"drift_kepu_fchk – swiftest","text":"pure subroutine drift_kepu_fchk(dt, r0, mu, alpha, u, s, f) Computes the value of f, the function whose root we are trying to find in universal variables Adapted from David E. Kaufmann's Swifter routine: drift_kepu_fchk.f90\n Adapted from Martin Duncan's Swift routine drift_kepu_fchk.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(in) :: s real(kind=DP), intent(out) :: f Calls proc~~drift_kepu_fchk~~CallsGraph proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_fchk->proc~drift_kepu_stumpff Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_fchk~~CalledByGraph proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_fchk proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_fchk.html"},{"title":"drift_kepu_guess – swiftest","text":"pure subroutine drift_kepu_guess(dt, r0, mu, alpha, u, s) Compute initial guess for solving Kepler's equation using universal variables Adapted from David E. Kaufmann's Swifter routine: drift_kepu_guess.f90\n Adapted from Hal Levison and Martin Duncan's Swift routine drift_kepu_guess.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s Calls proc~~drift_kepu_guess~~CallsGraph proc~drift_kepu_guess drift_kepu_guess interface~orbel_scget orbel_scget proc~drift_kepu_guess->interface~orbel_scget proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_guess~~CalledByGraph proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_guess.html"},{"title":"drift_kepu_lag – swiftest","text":"pure subroutine drift_kepu_lag(s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Solve Kepler's equation in universal variables using Laguerre's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_lag.f90\n Adapted from Hal Levison's Swift routine drift_kepu_lag.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_kepu_lag~~CallsGraph proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_lag->proc~drift_kepu_stumpff Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_lag~~CalledByGraph proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_lag proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_lag.html"},{"title":"drift_kepu_new – swiftest","text":"pure subroutine drift_kepu_new(s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Solve Kepler's equation in universal variables using Newton's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_new.f90\n Adapted from Hal Levison's Swift routine drift_kepu_new.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag Calls proc~~drift_kepu_new~~CallsGraph proc~drift_kepu_new drift_kepu_new proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_new->proc~drift_kepu_stumpff Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_kepu_new~~CalledByGraph proc~drift_kepu_new drift_kepu_new proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_new proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_new.html"},{"title":"drift_kepu_p3solve – swiftest","text":"pure subroutine drift_kepu_p3solve(dt, r0, mu, alpha, u, s, iflag) Computes real root of cubic involved in setting initial guess for solving Kepler's equation in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_p3solve.f90\n Adapted from Martin Duncan's Swift routine drift_kepu_p3solve.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s integer(kind=I4B), intent(out) :: iflag Called by proc~~drift_kepu_p3solve~~CalledByGraph proc~drift_kepu_p3solve drift_kepu_p3solve proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu_guess->proc~drift_kepu_p3solve proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_p3solve.html"},{"title":"drift_kepu_stumpff – swiftest","text":"pure subroutine drift_kepu_stumpff(x, c0, c1, c2, c3) Compute Stumpff functions needed for Kepler drift in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172. Adapted from David E. Kaufmann's Swifter routine: drift_kepu_stumpff.f90\n Adapted from Hal Levison's Swift routine drift_kepu_stumpff.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: x real(kind=DP), intent(out) :: c0 real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 Called by proc~~drift_kepu_stumpff~~CalledByGraph proc~drift_kepu_stumpff drift_kepu_stumpff proc~drift_kepu_fchk drift_kepu_fchk proc~drift_kepu_fchk->proc~drift_kepu_stumpff proc~drift_kepu_lag drift_kepu_lag proc~drift_kepu_lag->proc~drift_kepu_stumpff proc~drift_kepu_new drift_kepu_new proc~drift_kepu_new->proc~drift_kepu_stumpff proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_fchk proc~drift_kepu->proc~drift_kepu_lag proc~drift_kepu->proc~drift_kepu_new proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_kepu_stumpff.html"},{"title":"symba_collision_check_one – swiftest","text":"pure elemental function symba_collision_check_one(xr, yr, zr, vxr, vyr, vzr, Gmtot, rlim, dt, lvdotr) result(lcollision) Check for a merger between a single pair of particles Adapted from David E. Kaufmann's Swifter routines symba_merge_tp.f90 and symba_merge_pl.f90 Adapted from Hal Levison's Swift routine symba5_merge.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative position vector components real(kind=DP), intent(in) :: yr Relative position vector components real(kind=DP), intent(in) :: zr Relative position vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: Gmtot Sum of G*mass of colliding bodies real(kind=DP), intent(in) :: rlim Collision limit - Typically the sum of the radii of colliding bodies real(kind=DP), intent(in) :: dt Step size logical, intent(in) :: lvdotr Logical flag indicating that these two bodies are approaching in the current substep Return Value logical Logical flag indicating whether these two bodies will collide or not Calls proc~~symba_collision_check_one~~CallsGraph proc~symba_collision_check_one symba_collision_check_one orbel_xv2aeq orbel_xv2aeq proc~symba_collision_check_one->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_check_one~~CalledByGraph proc~symba_collision_check_one symba_collision_check_one proc~symba_collision_check_encounter symba_collision_check_encounter proc~symba_collision_check_encounter->proc~symba_collision_check_one interface~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter->proc~symba_collision_check_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_check_one.html"},{"title":"symba_collision_consolidate_colliders – swiftest","text":"function symba_collision_consolidate_colliders(pl, cb, param, idx_parent, colliders) result(lflag) Loops through the pl-pl collision list and groups families together by index. Outputs the indices of all colliders%idx members, \n and pairs of quantities (x and v vectors, mass, radius, L_spin, and Ip) that can be used to resolve the collisional outcome. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class( symba_cb ), intent(inout) :: cb SyMBA central body object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions integer(kind=I4B), intent(inout), dimension(2) :: idx_parent Index of the two bodies considered the \"parents\" of the collision class( fraggle_colliders ), intent(out) :: colliders Return Value logical Logical flag indicating whether a colliders%idx was successfully created or not Calls proc~~symba_collision_consolidate_colliders~~CallsGraph proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_consolidate_colliders~~CalledByGraph proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->proc~symba_collision_consolidate_colliders proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->proc~symba_collision_consolidate_colliders interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_consolidate_colliders.html"},{"title":"symba_collision_collider_message – swiftest","text":"subroutine symba_collision_collider_message(pl, collidx, collider_message) Prints a nicely formatted message about which bodies collided, including their names and ids.\n This subroutine appends the body names and ids to an input message. Arguments Type Intent Optional Attributes Name class(swiftest_pl), intent(in) :: pl Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: collidx Index of collisional colliders%idx members character(len=*), intent(inout) :: collider_message The message to print to the screen. Called by proc~~symba_collision_collider_message~~CalledByGraph proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_casehitandrun->proc~symba_collision_collider_message interface~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun interface~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption interface~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_collider_message.html"},{"title":"symba_collision_mergeaddsub – swiftest","text":"subroutine symba_collision_mergeaddsub(system, param, colliders, frag, status) Fills the pl_discards and pl_adds with removed and added bodies Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object integer(kind=I4B), intent(in) :: status Status flag to assign to adds Calls proc~~symba_collision_mergeaddsub~~CallsGraph proc~symba_collision_mergeaddsub symba_collision_mergeaddsub fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_mergeaddsub~~CalledByGraph proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub proc~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub proc~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub interface~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun interface~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption interface~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_mergeaddsub.html"},{"title":"symba_encounter_check_all – swiftest","text":"subroutine symba_encounter_check_all(nplplm, k_plpl, x, v, rhill, dt, irec, lencounter, loc_lvdotr) Check for encounters between massive bodies. Split off from the main subroutine for performance Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in) :: nplplm integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl real(kind=DP), intent(in), dimension(:,:) :: x real(kind=DP), intent(in), dimension(:,:) :: v real(kind=DP), intent(in), dimension(:) :: rhill real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out), dimension(:) :: lencounter logical, intent(out), dimension(:) :: loc_lvdotr Called by proc~~symba_encounter_check_all~~CalledByGraph proc~symba_encounter_check_all symba_encounter_check_all proc~symba_encounter_check_pl symba_encounter_check_pl proc~symba_encounter_check_pl->proc~symba_encounter_check_all interface~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl->proc~symba_encounter_check_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_all.html"},{"title":"symba_discard_cb_pl – swiftest","text":"subroutine symba_discard_cb_pl(pl, system, param) Check to see if planets should be discarded based on their positions relative to the central body.\n If a body gets flagged here when it has also been previously flagged for a collision with another massive body,\n its collisional status will be revoked. Discards due to colliding with or escaping the central body take precedence \n over pl-pl collisions Adapted from David E. Kaufmann's Swifter routine: symba_discard_sun.f90\n Adapted from Hal Levison's Swift routine discard_massive5.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_discard_cb_pl~~CallsGraph proc~symba_discard_cb_pl symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_discard_cb_pl~~CalledByGraph proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl proc~symba_discard_pl symba_discard_pl proc~symba_discard_pl->proc~symba_discard_nonplpl interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_cb_pl.html"},{"title":"symba_discard_conserve_mtm – swiftest","text":"subroutine symba_discard_conserve_mtm(pl, system, param, ipl, lescape_body) Conserves system momentum when a body is lost from the system or collides with central body Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl class( symba_nbody_system ), intent(inout) :: system class( symba_parameters ), intent(inout) :: param integer(kind=I4B), intent(in) :: ipl logical, intent(in) :: lescape_body Contents None","tags":"","loc":"proc/symba_discard_conserve_mtm.html"},{"title":"symba_discard_nonplpl – swiftest","text":"subroutine symba_discard_nonplpl(pl, system, param) Check to see if planets should be discarded based on their positions or because they are unbound Adapted from David E. Kaufmann's Swifter routine: symba_discard_pl.f90\n Adapted from Hal Levison's Swift routine discard_massive5.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_discard_nonplpl~~CallsGraph proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_discard_nonplpl~~CalledByGraph proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_pl symba_discard_pl proc~symba_discard_pl->proc~symba_discard_nonplpl interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_nonplpl.html"},{"title":"symba_discard_nonplpl_conservation – swiftest","text":"subroutine symba_discard_nonplpl_conservation(pl, system, param) If there are any bodies that are removed due to either colliding with the central body or escaping the systme,\n we need to track the conserved quantities with the system bookkeeping terms. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~symba_discard_nonplpl_conservation~~CalledByGraph proc~symba_discard_nonplpl_conservation symba_discard_nonplpl_conservation proc~symba_discard_pl symba_discard_pl proc~symba_discard_pl->proc~symba_discard_nonplpl_conservation interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_nonplpl_conservation.html"},{"title":"symba_discard_peri_pl – swiftest","text":"subroutine symba_discard_peri_pl(pl, system, param) Check to see if a test particle should be discarded because its perihelion distance becomes too small Adapted from David E. Kaufmann's Swifter routine: symba_discard_peri_pl.f90\n Adapted from Hal Levison's Swift routine discard_mass_peri.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Contents None","tags":"","loc":"proc/symba_discard_peri_pl.html"},{"title":"xv2el – swiftest","text":"public pure elemental subroutine xv2el(mu, px, py, pz, vx, vy, vz, a, e, inc, capom, omega, capm) Uses swiftest_classes proc~~xv2el~~UsesGraph proc~xv2el xv2el module~swiftest_classes swiftest_classes proc~xv2el->module~swiftest_classes module~swiftest_globals swiftest_globals module~swiftest_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Arguments Type Intent Optional Attributes Name real(kind=8), intent(in) :: mu real(kind=8), intent(in) :: px real(kind=8), intent(in) :: py real(kind=8), intent(in) :: pz real(kind=8), intent(in) :: vx real(kind=8), intent(in) :: vy real(kind=8), intent(in) :: vz real(kind=8), intent(out) :: a real(kind=8), intent(out) :: e real(kind=8), intent(out) :: inc real(kind=8), intent(out) :: capom real(kind=8), intent(out) :: omega real(kind=8), intent(out) :: capm Contents None","tags":"","loc":"proc/xv2el.html"},{"title":"check – swiftest","text":"subroutine check(status) Checks the status of all NetCDF operations to catch errors Arguments Type Intent Optional Attributes Name integer, intent(in) :: status Calls proc~~check~~CallsGraph proc~check check interface~util_exit util_exit proc~check->interface~util_exit nf90_strerror nf90_strerror proc~check->nf90_strerror proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/check.html"},{"title":"rmvs_encounter_check_tp – swiftest","text":"interface Calls interface~~rmvs_encounter_check_tp~~CallsGraph interface~rmvs_encounter_check_tp rmvs_encounter_check_tp proc~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp->proc~rmvs_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/rmvs_encounter_check_tp.html"},{"title":"rmvs_chk_ind – swiftest","text":"interface Calls interface~~rmvs_chk_ind~~CallsGraph interface~rmvs_chk_ind rmvs_chk_ind proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative distance vector components real(kind=DP), intent(in) :: yr Relative distance vector components real(kind=DP), intent(in) :: zr Relative distance vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: dt Step size real(kind=DP), intent(in) :: r2crit Square of the critical encounter distance logical, intent(out) :: lencounter Flag indicating that an encounter has occurred logical, intent(out) :: lvdotr Logical flag indicating the direction of the v .dot. r vector","tags":"","loc":"interface/rmvs_chk_ind.html"},{"title":"rmvs_discard_tp – swiftest","text":"interface Calls interface~~rmvs_discard_tp~~CallsGraph interface~rmvs_discard_tp rmvs_discard_tp proc~rmvs_discard_tp rmvs_discard_tp interface~rmvs_discard_tp->proc~rmvs_discard_tp discard_tp discard_tp proc~rmvs_discard_tp->discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/rmvs_discard_tp.html"},{"title":"rmvs_io_write_encounter – swiftest","text":"interface Calls interface~~rmvs_io_write_encounter~~CallsGraph interface~rmvs_io_write_encounter rmvs_io_write_encounter proc~rmvs_io_write_encounter rmvs_io_write_encounter interface~rmvs_io_write_encounter->proc~rmvs_io_write_encounter util_exit util_exit proc~rmvs_io_write_encounter->util_exit io_write_frame_encounter io_write_frame_encounter proc~rmvs_io_write_encounter->io_write_frame_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_io_write_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out","tags":"","loc":"interface/rmvs_io_write_encounter.html"},{"title":"rmvs_kick_getacch_tp – swiftest","text":"interface Calls interface~~rmvs_kick_getacch_tp~~CallsGraph interface~rmvs_kick_getacch_tp rmvs_kick_getacch_tp proc~rmvs_kick_getacch_tp rmvs_kick_getacch_tp interface~rmvs_kick_getacch_tp->proc~rmvs_kick_getacch_tp whm_kick_getacch_tp whm_kick_getacch_tp proc~rmvs_kick_getacch_tp->whm_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/rmvs_kick_getacch_tp.html"},{"title":"rmvs_setup_pl – swiftest","text":"interface Calls interface~~rmvs_setup_pl~~CallsGraph interface~rmvs_setup_pl rmvs_setup_pl proc~rmvs_setup_pl rmvs_setup_pl interface~rmvs_setup_pl->proc~rmvs_setup_pl whm_setup_pl whm_setup_pl proc~rmvs_setup_pl->whm_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/rmvs_setup_pl.html"},{"title":"rmvs_setup_initialize_system – swiftest","text":"interface Calls interface~~rmvs_setup_initialize_system~~CallsGraph interface~rmvs_setup_initialize_system rmvs_setup_initialize_system proc~rmvs_setup_initialize_system rmvs_setup_initialize_system interface~rmvs_setup_initialize_system->proc~rmvs_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~rmvs_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/rmvs_setup_initialize_system.html"},{"title":"rmvs_setup_tp – swiftest","text":"interface Calls interface~~rmvs_setup_tp~~CallsGraph interface~rmvs_setup_tp rmvs_setup_tp proc~rmvs_setup_tp rmvs_setup_tp interface~rmvs_setup_tp->proc~rmvs_setup_tp setup_tp setup_tp proc~rmvs_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parametere","tags":"","loc":"interface/rmvs_setup_tp.html"},{"title":"rmvs_util_append_pl – swiftest","text":"interface Calls interface~~rmvs_util_append_pl~~CallsGraph interface~rmvs_util_append_pl rmvs_util_append_pl proc~rmvs_util_append_pl rmvs_util_append_pl interface~rmvs_util_append_pl->proc~rmvs_util_append_pl util_exit util_exit proc~rmvs_util_append_pl->util_exit util_append util_append proc~rmvs_util_append_pl->util_append whm_util_append_pl whm_util_append_pl proc~rmvs_util_append_pl->whm_util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/rmvs_util_append_pl.html"},{"title":"rmvs_util_append_tp – swiftest","text":"interface Calls interface~~rmvs_util_append_tp~~CallsGraph interface~rmvs_util_append_tp rmvs_util_append_tp proc~rmvs_util_append_tp rmvs_util_append_tp interface~rmvs_util_append_tp->proc~rmvs_util_append_tp util_exit util_exit proc~rmvs_util_append_tp->util_exit util_append_tp util_append_tp proc~rmvs_util_append_tp->util_append_tp util_append util_append proc~rmvs_util_append_tp->util_append Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/rmvs_util_append_tp.html"},{"title":"rmvs_util_fill_pl – swiftest","text":"interface Calls interface~~rmvs_util_fill_pl~~CallsGraph interface~rmvs_util_fill_pl rmvs_util_fill_pl proc~rmvs_util_fill_pl rmvs_util_fill_pl interface~rmvs_util_fill_pl->proc~rmvs_util_fill_pl util_exit util_exit proc~rmvs_util_fill_pl->util_exit util_fill util_fill proc~rmvs_util_fill_pl->util_fill whm_util_fill_pl whm_util_fill_pl proc~rmvs_util_fill_pl->whm_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/rmvs_util_fill_pl.html"},{"title":"rmvs_util_fill_tp – swiftest","text":"interface Calls interface~~rmvs_util_fill_tp~~CallsGraph interface~rmvs_util_fill_tp rmvs_util_fill_tp proc~rmvs_util_fill_tp rmvs_util_fill_tp interface~rmvs_util_fill_tp->proc~rmvs_util_fill_tp util_exit util_exit proc~rmvs_util_fill_tp->util_exit util_fill_tp util_fill_tp proc~rmvs_util_fill_tp->util_fill_tp util_fill util_fill proc~rmvs_util_fill_tp->util_fill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/rmvs_util_fill_tp.html"},{"title":"rmvs_util_resize_pl – swiftest","text":"interface Calls interface~~rmvs_util_resize_pl~~CallsGraph interface~rmvs_util_resize_pl rmvs_util_resize_pl proc~rmvs_util_resize_pl rmvs_util_resize_pl interface~rmvs_util_resize_pl->proc~rmvs_util_resize_pl util_resize util_resize proc~rmvs_util_resize_pl->util_resize whm_util_resize_pl whm_util_resize_pl proc~rmvs_util_resize_pl->whm_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/rmvs_util_resize_pl.html"},{"title":"rmvs_util_resize_tp – swiftest","text":"interface Calls interface~~rmvs_util_resize_tp~~CallsGraph interface~rmvs_util_resize_tp rmvs_util_resize_tp proc~rmvs_util_resize_tp rmvs_util_resize_tp interface~rmvs_util_resize_tp->proc~rmvs_util_resize_tp util_resize_tp util_resize_tp proc~rmvs_util_resize_tp->util_resize_tp util_resize util_resize proc~rmvs_util_resize_tp->util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/rmvs_util_resize_tp.html"},{"title":"rmvs_util_sort_pl – swiftest","text":"interface Calls interface~~rmvs_util_sort_pl~~CallsGraph interface~rmvs_util_sort_pl rmvs_util_sort_pl proc~rmvs_util_sort_pl rmvs_util_sort_pl interface~rmvs_util_sort_pl->proc~rmvs_util_sort_pl whm_util_sort_pl whm_util_sort_pl proc~rmvs_util_sort_pl->whm_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/rmvs_util_sort_pl.html"},{"title":"rmvs_util_sort_tp – swiftest","text":"interface Calls interface~~rmvs_util_sort_tp~~CallsGraph interface~rmvs_util_sort_tp rmvs_util_sort_tp proc~rmvs_util_sort_tp rmvs_util_sort_tp interface~rmvs_util_sort_tp->proc~rmvs_util_sort_tp util_sort_tp util_sort_tp proc~rmvs_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/rmvs_util_sort_tp.html"},{"title":"rmvs_util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~rmvs_util_sort_rearrange_pl~~CallsGraph interface~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl proc~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl interface~rmvs_util_sort_rearrange_pl->proc~rmvs_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/rmvs_util_sort_rearrange_pl.html"},{"title":"rmvs_util_sort_rearrange_tp – swiftest","text":"interface Calls interface~~rmvs_util_sort_rearrange_tp~~CallsGraph interface~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp proc~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp interface~rmvs_util_sort_rearrange_tp->proc~rmvs_util_sort_rearrange_tp util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange util_sort_rearrange_tp util_sort_rearrange_tp proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/rmvs_util_sort_rearrange_tp.html"},{"title":"rmvs_util_spill_pl – swiftest","text":"interface Calls interface~~rmvs_util_spill_pl~~CallsGraph interface~rmvs_util_spill_pl rmvs_util_spill_pl proc~rmvs_util_spill_pl rmvs_util_spill_pl interface~rmvs_util_spill_pl->proc~rmvs_util_spill_pl util_exit util_exit proc~rmvs_util_spill_pl->util_exit whm_util_spill_pl whm_util_spill_pl proc~rmvs_util_spill_pl->whm_util_spill_pl util_spill util_spill proc~rmvs_util_spill_pl->util_spill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/rmvs_util_spill_pl.html"},{"title":"rmvs_util_spill_tp – swiftest","text":"interface Calls interface~~rmvs_util_spill_tp~~CallsGraph interface~rmvs_util_spill_tp rmvs_util_spill_tp proc~rmvs_util_spill_tp rmvs_util_spill_tp interface~rmvs_util_spill_tp->proc~rmvs_util_spill_tp util_exit util_exit proc~rmvs_util_spill_tp->util_exit util_spill util_spill proc~rmvs_util_spill_tp->util_spill util_spill_tp util_spill_tp proc~rmvs_util_spill_tp->util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/rmvs_util_spill_tp.html"},{"title":"rmvs_step_system – swiftest","text":"interface Calls interface~~rmvs_step_system~~CallsGraph interface~rmvs_step_system rmvs_step_system proc~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system proc~rmvs_step_out rmvs_step_out proc~rmvs_step_system->proc~rmvs_step_out whm_step_system whm_step_system proc~rmvs_step_system->whm_step_system proc~rmvs_interp_out rmvs_interp_out proc~rmvs_step_system->proc~rmvs_interp_out proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out->proc~rmvs_interp_in proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out->proc~rmvs_step_in util_exit util_exit proc~rmvs_interp_out->util_exit proc~rmvs_interp_in->util_exit proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric vpc vpc proc~rmvs_peri_tp->vpc xpc xpc proc~rmvs_peri_tp->xpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine rmvs_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/rmvs_step_system.html"},{"title":"walltime_finish – swiftest","text":"public subroutine walltime_finish(self, nsubsteps, message) Uses swiftest_globals proc~~walltime_finish~~UsesGraph proc~walltime_finish walltime_finish module~swiftest_globals swiftest_globals proc~walltime_finish->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output Contents None","tags":"","loc":"proc/walltime_finish.html"},{"title":"walltime_reset – swiftest","text":"public subroutine walltime_reset(self) Uses swiftest_globals proc~~walltime_reset~~UsesGraph proc~walltime_reset walltime_reset module~swiftest_globals swiftest_globals proc~walltime_reset->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Resets the clock ticker, settting main_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Contents None","tags":"","loc":"proc/walltime_reset.html"},{"title":"walltime_start – swiftest","text":"public subroutine walltime_start(self) Uses swiftest_globals proc~~walltime_start~~UsesGraph proc~walltime_start walltime_start module~swiftest_globals swiftest_globals proc~walltime_start->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Starts the timer, setting step_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Contents None","tags":"","loc":"proc/walltime_start.html"},{"title":"walltime_finish – swiftest","text":"interface public subroutine walltime_finish(self, nsubsteps, message) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output","tags":"","loc":"interface/walltime_finish.html"},{"title":"walltime_reset – swiftest","text":"interface public subroutine walltime_reset(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object","tags":"","loc":"interface/walltime_reset.html"},{"title":"walltime_start – swiftest","text":"interface public subroutine walltime_start(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object","tags":"","loc":"interface/walltime_start.html"},{"title":"operator(.cross.) – swiftest","text":"public interface operator(.cross.) Contents Functions operator_cross_sp operator_cross_dp operator_cross_qp operator_cross_i1b operator_cross_i2b operator_cross_i4b operator_cross_i8b operator_cross_el_sp operator_cross_el_dp operator_cross_el_qp operator_cross_el_i1b operator_cross_el_i2b operator_cross_el_i4b operator_cross_el_i8b Functions public pure function operator_cross_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) public pure function operator_cross_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) public pure function operator_cross_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) public pure function operator_cross_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) public pure function operator_cross_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) public pure function operator_cross_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) public pure function operator_cross_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) public pure function operator_cross_el_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:), allocatable public pure function operator_cross_el_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:), allocatable public pure function operator_cross_el_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:), allocatable public pure function operator_cross_el_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:), allocatable","tags":"","loc":"interface/operator(.cross.).html"},{"title":"operator(.mag.) – swiftest","text":"public interface operator(.mag.) Contents Functions operator_mag_sp operator_mag_dp operator_mag_qp operator_mag_el_sp operator_mag_el_dp operator_mag_el_qp Functions public pure function operator_mag_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) public pure function operator_mag_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) public pure function operator_mag_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A Return Value real(kind=QP) public pure function operator_mag_el_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:), allocatable public pure function operator_mag_el_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:), allocatable public pure function operator_mag_el_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:), allocatable","tags":"","loc":"interface/operator(.mag.).html"},{"title":"helio_drift_body – swiftest","text":"interface Calls interface~~helio_drift_body~~CallsGraph interface~helio_drift_body helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~helio_drift_body~~CalledByGraph interface~helio_drift_body helio_drift_body proc~helio_drift_pl helio_drift_pl proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_tp helio_drift_tp proc~helio_drift_tp->interface~helio_drift_body interface~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl interface~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_drift_body.html"},{"title":"helio_drift_pl – swiftest","text":"interface Calls interface~~helio_drift_pl~~CallsGraph interface~helio_drift_pl helio_drift_pl proc~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl interface~helio_drift_body helio_drift_body proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_drift_pl.html"},{"title":"helio_drift_tp – swiftest","text":"interface Calls interface~~helio_drift_tp~~CallsGraph interface~helio_drift_tp helio_drift_tp proc~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp interface~helio_drift_body helio_drift_body proc~helio_drift_tp->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_drift_tp.html"},{"title":"helio_drift_linear_pl – swiftest","text":"interface Calls interface~~helio_drift_linear_pl~~CallsGraph interface~helio_drift_linear_pl helio_drift_linear_pl proc~helio_drift_linear_pl helio_drift_linear_pl interface~helio_drift_linear_pl->proc~helio_drift_linear_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_drift_linear_pl.html"},{"title":"helio_drift_linear_tp – swiftest","text":"interface Calls interface~~helio_drift_linear_tp~~CallsGraph interface~helio_drift_linear_tp helio_drift_linear_tp proc~helio_drift_linear_tp helio_drift_linear_tp interface~helio_drift_linear_tp->proc~helio_drift_linear_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_drift_linear_tp.html"},{"title":"helio_gr_kick_getacch_pl – swiftest","text":"interface Calls interface~~helio_gr_kick_getacch_pl~~CallsGraph interface~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl proc~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl interface~helio_gr_kick_getacch_pl->proc~helio_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/helio_gr_kick_getacch_pl.html"},{"title":"helio_gr_kick_getacch_tp – swiftest","text":"interface Calls interface~~helio_gr_kick_getacch_tp~~CallsGraph interface~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp proc~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp interface~helio_gr_kick_getacch_tp->proc~helio_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/helio_gr_kick_getacch_tp.html"},{"title":"helio_gr_p4_pl – swiftest","text":"interface Calls interface~~helio_gr_p4_pl~~CallsGraph interface~helio_gr_p4_pl helio_gr_p4_pl proc~helio_gr_p4_pl helio_gr_p4_pl interface~helio_gr_p4_pl->proc~helio_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/helio_gr_p4_pl.html"},{"title":"helio_gr_p4_tp – swiftest","text":"interface Calls interface~~helio_gr_p4_tp~~CallsGraph interface~helio_gr_p4_tp helio_gr_p4_tp proc~helio_gr_p4_tp helio_gr_p4_tp interface~helio_gr_p4_tp->proc~helio_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/helio_gr_p4_tp.html"},{"title":"helio_kick_getacch_pl – swiftest","text":"interface Calls interface~~helio_kick_getacch_pl~~CallsGraph interface~helio_kick_getacch_pl helio_kick_getacch_pl proc~helio_kick_getacch_pl helio_kick_getacch_pl interface~helio_kick_getacch_pl->proc~helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_kick_getacch_pl.html"},{"title":"helio_kick_getacch_tp – swiftest","text":"interface Calls interface~~helio_kick_getacch_tp~~CallsGraph interface~helio_kick_getacch_tp helio_kick_getacch_tp proc~helio_kick_getacch_tp helio_kick_getacch_tp interface~helio_kick_getacch_tp->proc~helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/helio_kick_getacch_tp.html"},{"title":"helio_kick_vb_pl – swiftest","text":"interface Calls interface~~helio_kick_vb_pl~~CallsGraph interface~helio_kick_vb_pl helio_kick_vb_pl proc~helio_kick_vb_pl helio_kick_vb_pl interface~helio_kick_vb_pl->proc~helio_kick_vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/helio_kick_vb_pl.html"},{"title":"helio_kick_vb_tp – swiftest","text":"interface Calls interface~~helio_kick_vb_tp~~CallsGraph interface~helio_kick_vb_tp helio_kick_vb_tp proc~helio_kick_vb_tp helio_kick_vb_tp interface~helio_kick_vb_tp->proc~helio_kick_vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/helio_kick_vb_tp.html"},{"title":"helio_setup_initialize_system – swiftest","text":"interface Calls interface~~helio_setup_initialize_system~~CallsGraph interface~helio_setup_initialize_system helio_setup_initialize_system proc~helio_setup_initialize_system helio_setup_initialize_system interface~helio_setup_initialize_system->proc~helio_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~helio_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/helio_setup_initialize_system.html"},{"title":"helio_step_pl – swiftest","text":"interface Calls interface~~helio_step_pl~~CallsGraph interface~helio_step_pl helio_step_pl proc~helio_step_pl helio_step_pl interface~helio_step_pl->proc~helio_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/helio_step_pl.html"},{"title":"helio_step_system – swiftest","text":"interface Calls interface~~helio_step_system~~CallsGraph interface~helio_step_system helio_step_system proc~helio_step_system helio_step_system interface~helio_step_system->proc~helio_step_system whm_step_system whm_step_system proc~helio_step_system->whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/helio_step_system.html"},{"title":"helio_step_tp – swiftest","text":"interface Calls interface~~helio_step_tp~~CallsGraph interface~helio_step_tp helio_step_tp proc~helio_step_tp helio_step_tp interface~helio_step_tp->proc~helio_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee","tags":"","loc":"interface/helio_step_tp.html"},{"title":"whm_coord_h2j_pl – swiftest","text":"interface Calls interface~~whm_coord_h2j_pl~~CallsGraph interface~whm_coord_h2j_pl whm_coord_h2j_pl proc~whm_coord_h2j_pl whm_coord_h2j_pl interface~whm_coord_h2j_pl->proc~whm_coord_h2j_pl vh vh proc~whm_coord_h2j_pl->vh xj xj proc~whm_coord_h2j_pl->xj eta eta proc~whm_coord_h2j_pl->eta xh xh proc~whm_coord_h2j_pl->xh vj vj proc~whm_coord_h2j_pl->vj gmpl gmpl proc~whm_coord_h2j_pl->gmpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"interface/whm_coord_h2j_pl.html"},{"title":"whm_coord_j2h_pl – swiftest","text":"interface Calls interface~~whm_coord_j2h_pl~~CallsGraph interface~whm_coord_j2h_pl whm_coord_j2h_pl proc~whm_coord_j2h_pl whm_coord_j2h_pl interface~whm_coord_j2h_pl->proc~whm_coord_j2h_pl vh vh proc~whm_coord_j2h_pl->vh xj xj proc~whm_coord_j2h_pl->xj eta eta proc~whm_coord_j2h_pl->eta xh xh proc~whm_coord_j2h_pl->xh vj vj proc~whm_coord_j2h_pl->vj gmpl gmpl proc~whm_coord_j2h_pl->gmpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"interface/whm_coord_j2h_pl.html"},{"title":"whm_coord_vh2vj_pl – swiftest","text":"interface Calls interface~~whm_coord_vh2vj_pl~~CallsGraph interface~whm_coord_vh2vj_pl whm_coord_vh2vj_pl proc~whm_coord_vh2vj_pl whm_coord_vh2vj_pl interface~whm_coord_vh2vj_pl->proc~whm_coord_vh2vj_pl vj vj proc~whm_coord_vh2vj_pl->vj vh vh proc~whm_coord_vh2vj_pl->vh gmpl gmpl proc~whm_coord_vh2vj_pl->gmpl eta eta proc~whm_coord_vh2vj_pl->eta Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"interface/whm_coord_vh2vj_pl.html"},{"title":"whm_drift_pl – swiftest","text":"interface Calls interface~~whm_drift_pl~~CallsGraph interface~whm_drift_pl whm_drift_pl proc~whm_drift_pl whm_drift_pl interface~whm_drift_pl->proc~whm_drift_pl util_exit util_exit proc~whm_drift_pl->util_exit drift_all drift_all proc~whm_drift_pl->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/whm_drift_pl.html"},{"title":"whm_util_index_eucl_plpl – swiftest","text":"interface public subroutine whm_util_index_eucl_plpl(self, param) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/whm_util_index_eucl_plpl.html"},{"title":"whm_kick_getacch_pl – swiftest","text":"interface Calls interface~~whm_kick_getacch_pl~~CallsGraph interface~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah0 proc~whm_kick_getacch_ah1 whm_kick_getacch_ah1 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah1 proc~whm_kick_getacch_ah2 whm_kick_getacch_ah2 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Description Get heliocentric accelration of massive bodies","tags":"","loc":"interface/whm_kick_getacch_pl.html"},{"title":"whm_kick_getacch_tp – swiftest","text":"interface Calls interface~~whm_kick_getacch_tp~~CallsGraph interface~whm_kick_getacch_tp whm_kick_getacch_tp proc~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp->proc~whm_kick_getacch_tp proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_tp->proc~whm_kick_getacch_ah0 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Description Get heliocentric accelration of the test particle","tags":"","loc":"interface/whm_kick_getacch_tp.html"},{"title":"whm_kick_vh_pl – swiftest","text":"interface Calls interface~~whm_kick_vh_pl~~CallsGraph interface~whm_kick_vh_pl whm_kick_vh_pl proc~whm_kick_vh_pl whm_kick_vh_pl interface~whm_kick_vh_pl->proc~whm_kick_vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/whm_kick_vh_pl.html"},{"title":"whm_kick_vh_tp – swiftest","text":"interface Calls interface~~whm_kick_vh_tp~~CallsGraph interface~whm_kick_vh_tp whm_kick_vh_tp proc~whm_kick_vh_tp whm_kick_vh_tp interface~whm_kick_vh_tp->proc~whm_kick_vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/whm_kick_vh_tp.html"},{"title":"whm_gr_kick_getacch_pl – swiftest","text":"interface Calls interface~~whm_gr_kick_getacch_pl~~CallsGraph interface~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl proc~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl interface~whm_gr_kick_getacch_pl->proc~whm_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/whm_gr_kick_getacch_pl.html"},{"title":"whm_gr_kick_getacch_tp – swiftest","text":"interface Calls interface~~whm_gr_kick_getacch_tp~~CallsGraph interface~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp proc~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp interface~whm_gr_kick_getacch_tp->proc~whm_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/whm_gr_kick_getacch_tp.html"},{"title":"whm_gr_p4_pl – swiftest","text":"interface Calls interface~~whm_gr_p4_pl~~CallsGraph interface~whm_gr_p4_pl whm_gr_p4_pl proc~whm_gr_p4_pl whm_gr_p4_pl interface~whm_gr_p4_pl->proc~whm_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/whm_gr_p4_pl.html"},{"title":"whm_gr_p4_tp – swiftest","text":"interface Calls interface~~whm_gr_p4_tp~~CallsGraph interface~whm_gr_p4_tp whm_gr_p4_tp proc~whm_gr_p4_tp whm_gr_p4_tp interface~whm_gr_p4_tp->proc~whm_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/whm_gr_p4_tp.html"},{"title":"whm_setup_pl – swiftest","text":"interface Calls interface~~whm_setup_pl~~CallsGraph interface~whm_setup_pl whm_setup_pl proc~whm_setup_pl whm_setup_pl interface~whm_setup_pl->proc~whm_setup_pl setup_pl setup_pl proc~whm_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body objectobject integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters Description Reads WHM massive body object in from file","tags":"","loc":"interface/whm_setup_pl.html"},{"title":"whm_setup_initialize_system – swiftest","text":"interface Calls interface~~whm_setup_initialize_system~~CallsGraph interface~whm_setup_initialize_system whm_setup_initialize_system proc~whm_setup_initialize_system whm_setup_initialize_system interface~whm_setup_initialize_system->proc~whm_setup_initialize_system util_set_ir3h util_set_ir3h proc~whm_setup_initialize_system->util_set_ir3h setup_initialize_system setup_initialize_system proc~whm_setup_initialize_system->setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/whm_setup_initialize_system.html"},{"title":"whm_step_pl – swiftest","text":"interface Calls interface~~whm_step_pl~~CallsGraph interface~whm_step_pl whm_step_pl proc~whm_step_pl whm_step_pl interface~whm_step_pl->proc~whm_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/whm_step_pl.html"},{"title":"whm_step_system – swiftest","text":"interface Calls interface~~whm_step_system~~CallsGraph interface~whm_step_system whm_step_system proc~whm_step_system whm_step_system interface~whm_step_system->proc~whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/whm_step_system.html"},{"title":"whm_step_tp – swiftest","text":"interface Calls interface~~whm_step_tp~~CallsGraph interface~whm_step_tp whm_step_tp proc~whm_step_tp whm_step_tp interface~whm_step_tp->proc~whm_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/whm_step_tp.html"},{"title":"whm_util_append_pl – swiftest","text":"interface Calls interface~~whm_util_append_pl~~CallsGraph interface~whm_util_append_pl whm_util_append_pl proc~whm_util_append_pl whm_util_append_pl interface~whm_util_append_pl->proc~whm_util_append_pl util_exit util_exit proc~whm_util_append_pl->util_exit util_append_pl util_append_pl proc~whm_util_append_pl->util_append_pl util_append util_append proc~whm_util_append_pl->util_append Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/whm_util_append_pl.html"},{"title":"whm_util_spill_pl – swiftest","text":"interface Calls interface~~whm_util_spill_pl~~CallsGraph interface~whm_util_spill_pl whm_util_spill_pl proc~whm_util_spill_pl whm_util_spill_pl interface~whm_util_spill_pl->proc~whm_util_spill_pl util_exit util_exit proc~whm_util_spill_pl->util_exit util_spill util_spill proc~whm_util_spill_pl->util_spill util_spill_pl util_spill_pl proc~whm_util_spill_pl->util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/whm_util_spill_pl.html"},{"title":"whm_util_fill_pl – swiftest","text":"interface Calls interface~~whm_util_fill_pl~~CallsGraph interface~whm_util_fill_pl whm_util_fill_pl proc~whm_util_fill_pl whm_util_fill_pl interface~whm_util_fill_pl->proc~whm_util_fill_pl util_exit util_exit proc~whm_util_fill_pl->util_exit util_fill util_fill proc~whm_util_fill_pl->util_fill util_fill_pl util_fill_pl proc~whm_util_fill_pl->util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/whm_util_fill_pl.html"},{"title":"whm_util_resize_pl – swiftest","text":"interface Calls interface~~whm_util_resize_pl~~CallsGraph interface~whm_util_resize_pl whm_util_resize_pl proc~whm_util_resize_pl whm_util_resize_pl interface~whm_util_resize_pl->proc~whm_util_resize_pl util_resize_pl util_resize_pl proc~whm_util_resize_pl->util_resize_pl util_resize util_resize proc~whm_util_resize_pl->util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/whm_util_resize_pl.html"},{"title":"whm_util_set_ir3j – swiftest","text":"interface Calls interface~~whm_util_set_ir3j~~CallsGraph interface~whm_util_set_ir3j whm_util_set_ir3j proc~whm_util_set_ir3j whm_util_set_ir3j interface~whm_util_set_ir3j->proc~whm_util_set_ir3j Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object","tags":"","loc":"interface/whm_util_set_ir3j.html"},{"title":"whm_util_set_mu_eta_pl – swiftest","text":"interface Calls interface~~whm_util_set_mu_eta_pl~~CallsGraph interface~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl proc~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl interface~whm_util_set_mu_eta_pl->proc~whm_util_set_mu_eta_pl util_set_mu_pl util_set_mu_pl proc~whm_util_set_mu_eta_pl->util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/whm_util_set_mu_eta_pl.html"},{"title":"whm_util_sort_pl – swiftest","text":"interface Calls interface~~whm_util_sort_pl~~CallsGraph interface~whm_util_sort_pl whm_util_sort_pl proc~whm_util_sort_pl whm_util_sort_pl interface~whm_util_sort_pl->proc~whm_util_sort_pl util_sort_pl util_sort_pl proc~whm_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/whm_util_sort_pl.html"},{"title":"whm_util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~whm_util_sort_rearrange_pl~~CallsGraph interface~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl proc~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl interface~whm_util_sort_rearrange_pl->proc~whm_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~whm_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~whm_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine whm_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/whm_util_sort_rearrange_pl.html"},{"title":"fraggle_util_vmag_to_vb – swiftest","text":"interface Calls interface~~fraggle_util_vmag_to_vb~~CallsGraph interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_vmag_to_vb~~CalledByGraph interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function fraggle_util_vmag_to_vb(v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:),allocatable","tags":"","loc":"interface/fraggle_util_vmag_to_vb.html"},{"title":"fraggle_generate_fragments – swiftest","text":"interface Calls interface~~fraggle_generate_fragments~~CallsGraph interface~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_generate_fragments->interface~fraggle_io_log_generate proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message lambda_obj lambda_obj proc~fraggle_generate_rad_vel->lambda_obj util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_rad_vel->util_minimize_bfgs interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_tan_vel->lambda_obj proc~fraggle_generate_tan_vel->util_minimize_bfgs proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead?","tags":"","loc":"interface/fraggle_generate_fragments.html"},{"title":"fraggle_io_log_generate – swiftest","text":"interface Calls interface~~fraggle_io_log_generate~~CallsGraph interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_io_log_generate~~CalledByGraph interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_generate interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_generate(frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag","tags":"","loc":"interface/fraggle_io_log_generate.html"},{"title":"fraggle_io_log_one_message – swiftest","text":"interface Calls interface~~fraggle_io_log_one_message~~CallsGraph interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_io_log_one_message~~CalledByGraph interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message proc~fraggle_regime_collresolve fraggle_regime_collresolve proc~fraggle_regime_collresolve->interface~fraggle_io_log_one_message proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_spins->interface~fraggle_io_log_one_message interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_one_message(message) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message","tags":"","loc":"interface/fraggle_io_log_one_message.html"},{"title":"fraggle_io_log_pl – swiftest","text":"interface Calls interface~~fraggle_io_log_pl~~CallsGraph interface~fraggle_io_log_pl fraggle_io_log_pl proc~fraggle_io_log_pl fraggle_io_log_pl interface~fraggle_io_log_pl->proc~fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_pl(pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters","tags":"","loc":"interface/fraggle_io_log_pl.html"},{"title":"fraggle_io_log_regime – swiftest","text":"interface Calls interface~~fraggle_io_log_regime~~CallsGraph interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_io_log_regime~~CalledByGraph interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_regime_colliders fraggle_regime_colliders proc~fraggle_regime_colliders->interface~fraggle_io_log_regime interface~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_regime(colliders, frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders class( fraggle_fragments ), intent(in) :: frag","tags":"","loc":"interface/fraggle_io_log_regime.html"},{"title":"fraggle_io_log_start – swiftest","text":"interface Calls interface~~fraggle_io_log_start~~CallsGraph interface~fraggle_io_log_start fraggle_io_log_start proc~fraggle_io_log_start fraggle_io_log_start interface~fraggle_io_log_start->proc~fraggle_io_log_start Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_io_log_start(param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param","tags":"","loc":"interface/fraggle_io_log_start.html"},{"title":"fraggle_placeholder_accel – swiftest","text":"interface Calls interface~~fraggle_placeholder_accel~~CallsGraph interface~fraggle_placeholder_accel fraggle_placeholder_accel proc~fraggle_placeholder_accel fraggle_placeholder_accel interface~fraggle_placeholder_accel->proc~fraggle_placeholder_accel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step Description The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class","tags":"","loc":"interface/fraggle_placeholder_accel.html"},{"title":"fraggle_placeholder_kick – swiftest","text":"interface Calls interface~~fraggle_placeholder_kick~~CallsGraph interface~fraggle_placeholder_kick fraggle_placeholder_kick proc~fraggle_placeholder_kick fraggle_placeholder_kick interface~fraggle_placeholder_kick->proc~fraggle_placeholder_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"interface/fraggle_placeholder_kick.html"},{"title":"fraggle_placeholder_step – swiftest","text":"interface Calls interface~~fraggle_placeholder_step~~CallsGraph interface~fraggle_placeholder_step fraggle_placeholder_step proc~fraggle_placeholder_step fraggle_placeholder_step interface~fraggle_placeholder_step->proc~fraggle_placeholder_step Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_placeholder_step(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsiz","tags":"","loc":"interface/fraggle_placeholder_step.html"},{"title":"fraggle_regime_colliders – swiftest","text":"interface Calls interface~~fraggle_regime_colliders~~CallsGraph interface~fraggle_regime_colliders fraggle_regime_colliders proc~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_regime_colliders->interface~fraggle_io_log_regime proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_regime_colliders(self, frag, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"interface/fraggle_regime_colliders.html"},{"title":"fraggle_set_budgets_fragments – swiftest","text":"interface Calls interface~~fraggle_set_budgets_fragments~~CallsGraph interface~fraggle_set_budgets_fragments fraggle_set_budgets_fragments proc~fraggle_set_budgets_fragments fraggle_set_budgets_fragments interface~fraggle_set_budgets_fragments->proc~fraggle_set_budgets_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_budgets_fragments(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_budgets_fragments.html"},{"title":"fraggle_set_coordinate_system – swiftest","text":"interface Calls interface~~fraggle_set_coordinate_system~~CallsGraph interface~fraggle_set_coordinate_system fraggle_set_coordinate_system proc~fraggle_set_coordinate_system fraggle_set_coordinate_system interface~fraggle_set_coordinate_system->proc~fraggle_set_coordinate_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_coordinate_system(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_coordinate_system.html"},{"title":"fraggle_set_mass_dist_fragments – swiftest","text":"interface Calls interface~~fraggle_set_mass_dist_fragments~~CallsGraph interface~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments proc~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments interface~fraggle_set_mass_dist_fragments->proc~fraggle_set_mass_dist_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"interface/fraggle_set_mass_dist_fragments.html"},{"title":"fraggle_set_natural_scale_factors – swiftest","text":"interface Calls interface~~fraggle_set_natural_scale_factors~~CallsGraph interface~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors proc~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors interface~fraggle_set_natural_scale_factors->proc~fraggle_set_natural_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_natural_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_natural_scale_factors.html"},{"title":"fraggle_set_original_scale_factors – swiftest","text":"interface Calls interface~~fraggle_set_original_scale_factors~~CallsGraph interface~fraggle_set_original_scale_factors fraggle_set_original_scale_factors proc~fraggle_set_original_scale_factors fraggle_set_original_scale_factors interface~fraggle_set_original_scale_factors->proc~fraggle_set_original_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_set_original_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"interface/fraggle_set_original_scale_factors.html"},{"title":"fraggle_setup_fragments – swiftest","text":"interface Calls interface~~fraggle_setup_fragments~~CallsGraph interface~fraggle_setup_fragments fraggle_setup_fragments proc~fraggle_setup_fragments fraggle_setup_fragments interface~fraggle_setup_fragments->proc~fraggle_setup_fragments setup_pl setup_pl proc~fraggle_setup_fragments->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_setup_fragments(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object integer(kind=I4B), intent(in) :: n Number of fragments class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters","tags":"","loc":"interface/fraggle_setup_fragments.html"},{"title":"fraggle_setup_reset_fragments – swiftest","text":"interface Calls interface~~fraggle_setup_reset_fragments~~CallsGraph interface~fraggle_setup_reset_fragments fraggle_setup_reset_fragments proc~fraggle_setup_reset_fragments fraggle_setup_reset_fragments interface~fraggle_setup_reset_fragments->proc~fraggle_setup_reset_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_setup_reset_fragments(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self","tags":"","loc":"interface/fraggle_setup_reset_fragments.html"},{"title":"fraggle_util_add_fragments_to_system – swiftest","text":"interface Calls interface~~fraggle_util_add_fragments_to_system~~CallsGraph interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_add_fragments_to_system~~CalledByGraph interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_add_fragments_to_system(frag, colliders, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters","tags":"","loc":"interface/fraggle_util_add_fragments_to_system.html"},{"title":"fraggle_util_ang_mtm – swiftest","text":"interface Calls interface~~fraggle_util_ang_mtm~~CallsGraph interface~fraggle_util_ang_mtm fraggle_util_ang_mtm proc~fraggle_util_ang_mtm fraggle_util_ang_mtm interface~fraggle_util_ang_mtm->proc~fraggle_util_ang_mtm Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_ang_mtm(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object","tags":"","loc":"interface/fraggle_util_ang_mtm.html"},{"title":"fraggle_util_construct_temporary_system – swiftest","text":"interface Calls interface~~fraggle_util_construct_temporary_system~~CallsGraph interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_construct_temporary_system~~CalledByGraph interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_construct_temporary_system(frag, system, param, tmpsys, tmpparam) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters","tags":"","loc":"interface/fraggle_util_construct_temporary_system.html"},{"title":"fraggle_util_get_energy_momentum – swiftest","text":"interface Calls interface~~fraggle_util_get_energy_momentum~~CallsGraph interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum util_exit util_exit proc~fraggle_util_get_energy_momentum->util_exit interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa","tags":"","loc":"interface/fraggle_util_get_energy_momentum.html"},{"title":"fraggle_util_restructure – swiftest","text":"interface Calls interface~~fraggle_util_restructure~~CallsGraph interface~fraggle_util_restructure fraggle_util_restructure proc~fraggle_util_restructure fraggle_util_restructure interface~fraggle_util_restructure->proc~fraggle_util_restructure Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt","tags":"","loc":"interface/fraggle_util_restructure.html"},{"title":"fraggle_util_shift_vector_to_origin – swiftest","text":"interface Calls interface~~fraggle_util_shift_vector_to_origin~~CallsGraph interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~fraggle_util_shift_vector_to_origin~~CalledByGraph interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine fraggle_util_shift_vector_to_origin(m_frag, vec_frag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame","tags":"","loc":"interface/fraggle_util_shift_vector_to_origin.html"},{"title":"symba_collision_check_encounter – swiftest","text":"interface Calls interface~~symba_collision_check_encounter~~CallsGraph interface~symba_collision_check_encounter symba_collision_check_encounter proc~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter->proc~symba_collision_check_encounter proc~symba_collision_check_one symba_collision_check_one proc~symba_collision_check_encounter->proc~symba_collision_check_one fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_check_encounter->fraggle_io_log_one_message orbel_xv2aeq orbel_xv2aeq proc~symba_collision_check_one->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n","tags":"","loc":"interface/symba_collision_check_encounter.html"},{"title":"symba_encounter_check_pl – swiftest","text":"interface Calls interface~~symba_encounter_check_pl~~CallsGraph interface~symba_encounter_check_pl symba_encounter_check_pl proc~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl->proc~symba_encounter_check_pl util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~symba_encounter_check_pl->util_index_eucl_ij_to_k proc~symba_encounter_check_all symba_encounter_check_all proc~symba_encounter_check_pl->proc~symba_encounter_check_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/symba_encounter_check_pl.html"},{"title":"symba_encounter_check – swiftest","text":"interface Calls interface~~symba_encounter_check~~CallsGraph interface~symba_encounter_check symba_encounter_check proc~symba_encounter_check symba_encounter_check interface~symba_encounter_check->proc~symba_encounter_check Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/symba_encounter_check.html"},{"title":"symba_encounter_check_tp – swiftest","text":"interface Calls interface~~symba_encounter_check_tp~~CallsGraph interface~symba_encounter_check_tp symba_encounter_check_tp proc~symba_encounter_check_tp symba_encounter_check_tp interface~symba_encounter_check_tp->proc~symba_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter","tags":"","loc":"interface/symba_encounter_check_tp.html"},{"title":"symba_collision_casedisruption – swiftest","text":"interface Calls interface~~symba_collision_casedisruption~~CallsGraph interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casedisruption->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_collision_casedisruption~~CalledByGraph interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_casedisruption(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome","tags":"","loc":"interface/symba_collision_casedisruption.html"},{"title":"symba_collision_casehitandrun – swiftest","text":"interface Calls interface~~symba_collision_casehitandrun~~CallsGraph interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casehitandrun->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_collision_casehitandrun~~CalledByGraph interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_casehitandrun(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome","tags":"","loc":"interface/symba_collision_casehitandrun.html"},{"title":"symba_collision_casemerge – swiftest","text":"interface Calls interface~~symba_collision_casemerge~~CallsGraph interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_collision_casemerge~~CalledByGraph interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function symba_collision_casemerge(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome","tags":"","loc":"interface/symba_collision_casemerge.html"},{"title":"symba_collision_encounter_extract_collisions – swiftest","text":"interface Calls interface~~symba_collision_encounter_extract_collisions~~CallsGraph interface~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions proc~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions interface~symba_collision_encounter_extract_collisions->proc~symba_collision_encounter_extract_collisions idx2 idx2 proc~symba_collision_encounter_extract_collisions->idx2 idx1 idx1 proc~symba_collision_encounter_extract_collisions->idx1 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_encounter_extract_collisions(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_collision_encounter_extract_collisions.html"},{"title":"symba_collision_make_colliders_pl – swiftest","text":"interface Calls interface~~symba_collision_make_colliders_pl~~CallsGraph interface~symba_collision_make_colliders_pl symba_collision_make_colliders_pl proc~symba_collision_make_colliders_pl symba_collision_make_colliders_pl interface~symba_collision_make_colliders_pl->proc~symba_collision_make_colliders_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision","tags":"","loc":"interface/symba_collision_make_colliders_pl.html"},{"title":"symba_collision_resolve_fragmentations – swiftest","text":"interface Calls interface~~symba_collision_resolve_fragmentations~~CallsGraph interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations idx2 idx2 proc~symba_collision_resolve_fragmentations->idx2 util_exit util_exit proc~symba_collision_resolve_fragmentations->util_exit idx1 idx1 proc~symba_collision_resolve_fragmentations->idx1 proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_fragmentations->proc~symba_collision_consolidate_colliders interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casedisruption->fraggle_io_log_one_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub proc~symba_collision_casehitandrun->fraggle_io_log_one_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_fragmentations(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_collision_resolve_fragmentations.html"},{"title":"symba_collision_resolve_mergers – swiftest","text":"interface Calls interface~~symba_collision_resolve_mergers~~CallsGraph interface~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers idx2 idx2 proc~symba_collision_resolve_mergers->idx2 proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_mergers->proc~symba_collision_consolidate_colliders idx1 idx1 proc~symba_collision_resolve_mergers->idx1 interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_mergers(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_collision_resolve_mergers.html"},{"title":"symba_collision_resolve_plplenc – swiftest","text":"interface Calls interface~~symba_collision_resolve_plplenc~~CallsGraph interface~symba_collision_resolve_plplenc symba_collision_resolve_plplenc proc~symba_collision_resolve_plplenc symba_collision_resolve_plplenc interface~symba_collision_resolve_plplenc->proc~symba_collision_resolve_plplenc fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_resolve_plplenc->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"interface/symba_collision_resolve_plplenc.html"},{"title":"symba_collision_resolve_pltpenc – swiftest","text":"interface Calls interface~~symba_collision_resolve_pltpenc~~CallsGraph interface~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc proc~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc interface~symba_collision_resolve_pltpenc->proc~symba_collision_resolve_pltpenc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-tp encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"interface/symba_collision_resolve_pltpenc.html"},{"title":"symba_discard_pl – swiftest","text":"interface Calls interface~~symba_discard_pl~~CallsGraph interface~symba_discard_pl symba_discard_pl proc~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_pl->proc~symba_discard_nonplpl proc~symba_discard_nonplpl_conservation symba_discard_nonplpl_conservation proc~symba_discard_pl->proc~symba_discard_nonplpl_conservation proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/symba_discard_pl.html"},{"title":"symba_drift_pl – swiftest","text":"interface Calls interface~~symba_drift_pl~~CallsGraph interface~symba_drift_pl symba_drift_pl proc~symba_drift_pl symba_drift_pl interface~symba_drift_pl->proc~symba_drift_pl helio_drift_body helio_drift_body proc~symba_drift_pl->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/symba_drift_pl.html"},{"title":"symba_drift_tp – swiftest","text":"interface Calls interface~~symba_drift_tp~~CallsGraph interface~symba_drift_tp symba_drift_tp proc~symba_drift_tp symba_drift_tp interface~symba_drift_tp->proc~symba_drift_tp helio_drift_body helio_drift_body proc~symba_drift_tp->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/symba_drift_tp.html"},{"title":"symba_encounter_check_one – swiftest","text":"interface Calls interface~~symba_encounter_check_one~~CallsGraph interface~symba_encounter_check_one symba_encounter_check_one proc~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one->proc~symba_encounter_check_one rmvs_chk_ind rmvs_chk_ind proc~symba_encounter_check_one->rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr","tags":"","loc":"interface/symba_encounter_check_one.html"},{"title":"symba_util_index_eucl_plpl – swiftest","text":"interface Calls interface~~symba_util_index_eucl_plpl~~CallsGraph interface~symba_util_index_eucl_plpl symba_util_index_eucl_plpl proc~symba_util_index_eucl_plpl symba_util_index_eucl_plpl interface~symba_util_index_eucl_plpl->proc~symba_util_index_eucl_plpl util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~symba_util_index_eucl_plpl->util_index_eucl_ij_to_k Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_util_index_eucl_plpl.html"},{"title":"symba_io_param_reader – swiftest","text":"interface Calls interface~~symba_io_param_reader~~CallsGraph interface~symba_io_param_reader symba_io_param_reader proc~symba_io_param_reader symba_io_param_reader interface~symba_io_param_reader->proc~symba_io_param_reader io_get_token io_get_token proc~symba_io_param_reader->io_get_token io_toupper io_toupper proc~symba_io_param_reader->io_toupper io_param_reader io_param_reader proc~symba_io_param_reader->io_param_reader fraggle_io_log_start fraggle_io_log_start proc~symba_io_param_reader->fraggle_io_log_start Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Current run configuration parameters with SyMBA additionss integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/symba_io_param_reader.html"},{"title":"symba_io_param_writer – swiftest","text":"interface Calls interface~~symba_io_param_writer~~CallsGraph interface~symba_io_param_writer symba_io_param_writer proc~symba_io_param_writer symba_io_param_writer interface~symba_io_param_writer->proc~symba_io_param_writer io_param_writer io_param_writer proc~symba_io_param_writer->io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Current run configuration parameters with SyMBA additions integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/symba_io_param_writer.html"},{"title":"symba_io_write_discard – swiftest","text":"interface Calls interface~~symba_io_write_discard~~CallsGraph interface~symba_io_write_discard symba_io_write_discard proc~symba_io_write_discard symba_io_write_discard interface~symba_io_write_discard->proc~symba_io_write_discard util_exit util_exit proc~symba_io_write_discard->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/symba_io_write_discard.html"},{"title":"symba_kick_getacch_int_pl – swiftest","text":"interface Calls interface~~symba_kick_getacch_int_pl~~CallsGraph interface~symba_kick_getacch_int_pl symba_kick_getacch_int_pl proc~symba_kick_getacch_int_pl symba_kick_getacch_int_pl interface~symba_kick_getacch_int_pl->proc~symba_kick_getacch_int_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_int_pl->kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self","tags":"","loc":"interface/symba_kick_getacch_int_pl.html"},{"title":"symba_kick_getacch_pl – swiftest","text":"interface Calls interface~~symba_kick_getacch_pl~~CallsGraph interface~symba_kick_getacch_pl symba_kick_getacch_pl proc~symba_kick_getacch_pl symba_kick_getacch_pl interface~symba_kick_getacch_pl->proc~symba_kick_getacch_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_pl->kick_getacch_int_all_pl helio_kick_getacch_pl helio_kick_getacch_pl proc~symba_kick_getacch_pl->helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/symba_kick_getacch_pl.html"},{"title":"symba_kick_getacch_tp – swiftest","text":"interface Calls interface~~symba_kick_getacch_tp~~CallsGraph interface~symba_kick_getacch_tp symba_kick_getacch_tp proc~symba_kick_getacch_tp symba_kick_getacch_tp interface~symba_kick_getacch_tp->proc~symba_kick_getacch_tp helio_kick_getacch_tp helio_kick_getacch_tp proc~symba_kick_getacch_tp->helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/symba_kick_getacch_tp.html"},{"title":"symba_kick_encounter – swiftest","text":"interface Calls interface~~symba_kick_encounter~~CallsGraph interface~symba_kick_encounter symba_kick_encounter proc~symba_kick_encounter symba_kick_encounter interface~symba_kick_encounter->proc~symba_kick_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration","tags":"","loc":"interface/symba_kick_encounter.html"},{"title":"symba_setup_initialize_system – swiftest","text":"interface Calls interface~~symba_setup_initialize_system~~CallsGraph interface~symba_setup_initialize_system symba_setup_initialize_system proc~symba_setup_initialize_system symba_setup_initialize_system interface~symba_setup_initialize_system->proc~symba_setup_initialize_system helio_setup_initialize_system helio_setup_initialize_system proc~symba_setup_initialize_system->helio_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/symba_setup_initialize_system.html"},{"title":"symba_setup_merger – swiftest","text":"interface Calls interface~~symba_setup_merger~~CallsGraph interface~symba_setup_merger symba_setup_merger proc~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger interface~symba_setup_pl symba_setup_pl proc~symba_setup_merger->interface~symba_setup_pl proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_merger(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_setup_merger.html"},{"title":"symba_setup_pl – swiftest","text":"interface Calls interface~~symba_setup_pl~~CallsGraph interface~symba_setup_pl symba_setup_pl proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_setup_pl~~CalledByGraph interface~symba_setup_pl symba_setup_pl proc~symba_setup_merger symba_setup_merger proc~symba_setup_merger->interface~symba_setup_pl interface~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_setup_pl.html"},{"title":"symba_setup_encounter – swiftest","text":"interface Calls interface~~symba_setup_encounter~~CallsGraph interface~symba_setup_encounter symba_setup_encounter proc~symba_setup_encounter symba_setup_encounter interface~symba_setup_encounter->proc~symba_setup_encounter setup_encounter setup_encounter proc~symba_setup_encounter->setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for","tags":"","loc":"interface/symba_setup_encounter.html"},{"title":"symba_setup_tp – swiftest","text":"interface Calls interface~~symba_setup_tp~~CallsGraph interface~symba_setup_tp symba_setup_tp proc~symba_setup_tp symba_setup_tp interface~symba_setup_tp->proc~symba_setup_tp setup_tp setup_tp proc~symba_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter","tags":"","loc":"interface/symba_setup_tp.html"},{"title":"symba_step_system – swiftest","text":"interface Calls interface~~symba_step_system~~CallsGraph interface~symba_step_system symba_step_system proc~symba_step_system symba_step_system interface~symba_step_system->proc~symba_step_system helio_step_system helio_step_system proc~symba_step_system->helio_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/symba_step_system.html"},{"title":"symba_step_interp_system – swiftest","text":"interface Calls interface~~symba_step_interp_system~~CallsGraph interface~symba_step_interp_system symba_step_interp_system proc~symba_step_interp_system symba_step_interp_system interface~symba_step_interp_system->proc~symba_step_interp_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_interp_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/symba_step_interp_system.html"},{"title":"symba_step_set_recur_levels_system – swiftest","text":"interface Calls interface~~symba_step_set_recur_levels_system~~CallsGraph interface~symba_step_set_recur_levels_system symba_step_set_recur_levels_system proc~symba_step_set_recur_levels_system symba_step_set_recur_levels_system interface~symba_step_set_recur_levels_system->proc~symba_step_set_recur_levels_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_set_recur_levels_system(self, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system objec integer(kind=I4B), intent(in) :: ireci Input recursion level","tags":"","loc":"interface/symba_step_set_recur_levels_system.html"},{"title":"symba_step_recur_system – swiftest","text":"interface Calls interface~~symba_step_recur_system~~CallsGraph interface~symba_step_recur_system symba_step_recur_system proc~symba_step_recur_system symba_step_recur_system interface~symba_step_recur_system->proc~symba_step_recur_system util_exit util_exit proc~symba_step_recur_system->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public recursive module subroutine symba_step_recur_system(self, param, t, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level","tags":"","loc":"interface/symba_step_recur_system.html"},{"title":"symba_step_reset_system – swiftest","text":"interface Calls interface~~symba_step_reset_system~~CallsGraph interface~symba_step_reset_system symba_step_reset_system proc~symba_step_reset_system symba_step_reset_system interface~symba_step_reset_system->proc~symba_step_reset_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_step_reset_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_step_reset_system.html"},{"title":"util_append – swiftest","text":"public interface util_append Called by interface~~util_append~~CalledByGraph interface~util_append util_append proc~symba_util_append_encounter symba_util_append_encounter proc~symba_util_append_encounter->interface~util_append proc~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger->interface~util_append interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger->interface~symba_util_append_pl proc~symba_util_append_tp symba_util_append_tp proc~symba_util_append_tp->interface~util_append proc~symba_util_append_pl symba_util_append_pl proc~symba_util_append_pl->interface~util_append interface~symba_util_append_pl->proc~symba_util_append_pl interface~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter->proc~symba_util_append_encounter interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger interface~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp->proc~symba_util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_append_arr_kin Subroutines public subroutine symba_util_append_arr_kin(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append.html"},{"title":"symba_util_append_encounter – swiftest","text":"interface Calls interface~~symba_util_append_encounter~~CallsGraph interface~symba_util_append_encounter symba_util_append_encounter proc~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter->proc~symba_util_append_encounter interface~util_append util_append proc~symba_util_append_encounter->interface~util_append util_append_encounter util_append_encounter proc~symba_util_append_encounter->util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_encounter.html"},{"title":"symba_util_append_merger – swiftest","text":"interface Calls interface~~symba_util_append_merger~~CallsGraph interface~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger interface~util_append util_append proc~symba_util_append_merger->interface~util_append util_exit util_exit proc~symba_util_append_merger->util_exit interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger->interface~symba_util_append_pl proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl proc~symba_util_append_pl->interface~util_append proc~symba_util_append_pl->util_exit util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_merger(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_merger.html"},{"title":"symba_util_append_pl – swiftest","text":"interface Calls interface~~symba_util_append_pl~~CallsGraph interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl interface~util_append util_append proc~symba_util_append_pl->interface~util_append util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl util_exit util_exit proc~symba_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_util_append_pl~~CalledByGraph interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger->interface~symba_util_append_pl interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_pl.html"},{"title":"symba_util_append_tp – swiftest","text":"interface Calls interface~~symba_util_append_tp~~CallsGraph interface~symba_util_append_tp symba_util_append_tp proc~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp->proc~symba_util_append_tp interface~util_append util_append proc~symba_util_append_tp->interface~util_append util_exit util_exit proc~symba_util_append_tp->util_exit util_append_tp util_append_tp proc~symba_util_append_tp->util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/symba_util_append_tp.html"},{"title":"symba_util_copy_encounter – swiftest","text":"interface Calls interface~~symba_util_copy_encounter~~CallsGraph interface~symba_util_copy_encounter symba_util_copy_encounter proc~symba_util_copy_encounter symba_util_copy_encounter interface~symba_util_copy_encounter->proc~symba_util_copy_encounter util_copy_encounter util_copy_encounter proc~symba_util_copy_encounter->util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into","tags":"","loc":"interface/symba_util_copy_encounter.html"},{"title":"util_fill – swiftest","text":"public interface util_fill Called by interface~~util_fill~~CalledByGraph interface~util_fill util_fill proc~symba_util_fill_tp symba_util_fill_tp proc~symba_util_fill_tp->interface~util_fill proc~symba_util_fill_pl symba_util_fill_pl proc~symba_util_fill_pl->interface~util_fill interface~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl->proc~symba_util_fill_pl interface~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp->proc~symba_util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_fill_arr_kin Subroutines public subroutine symba_util_fill_arr_kin(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill.html"},{"title":"symba_util_fill_pl – swiftest","text":"interface Calls interface~~symba_util_fill_pl~~CallsGraph interface~symba_util_fill_pl symba_util_fill_pl proc~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl->proc~symba_util_fill_pl util_exit util_exit proc~symba_util_fill_pl->util_exit interface~util_fill util_fill proc~symba_util_fill_pl->interface~util_fill util_fill_pl util_fill_pl proc~symba_util_fill_pl->util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/symba_util_fill_pl.html"},{"title":"symba_util_fill_tp – swiftest","text":"interface Calls interface~~symba_util_fill_tp~~CallsGraph interface~symba_util_fill_tp symba_util_fill_tp proc~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp->proc~symba_util_fill_tp util_exit util_exit proc~symba_util_fill_tp->util_exit interface~util_fill util_fill proc~symba_util_fill_tp->interface~util_fill util_fill_tp util_fill_tp proc~symba_util_fill_tp->util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/symba_util_fill_tp.html"},{"title":"symba_util_peri_pl – swiftest","text":"interface Calls interface~~symba_util_peri_pl~~CallsGraph interface~symba_util_peri_pl symba_util_peri_pl proc~symba_util_peri_pl symba_util_peri_pl interface~symba_util_peri_pl->proc~symba_util_peri_pl orbel_xv2aeq orbel_xv2aeq proc~symba_util_peri_pl->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/symba_util_peri_pl.html"},{"title":"symba_util_rearray_pl – swiftest","text":"interface Calls interface~~symba_util_rearray_pl~~CallsGraph interface~symba_util_rearray_pl symba_util_rearray_pl proc~symba_util_rearray_pl symba_util_rearray_pl interface~symba_util_rearray_pl->proc~symba_util_rearray_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"interface/symba_util_rearray_pl.html"},{"title":"symba_util_reset_kinship – swiftest","text":"interface Calls interface~~symba_util_reset_kinship~~CallsGraph interface~symba_util_reset_kinship symba_util_reset_kinship proc~symba_util_reset_kinship symba_util_reset_kinship interface~symba_util_reset_kinship->proc~symba_util_reset_kinship Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset","tags":"","loc":"interface/symba_util_reset_kinship.html"},{"title":"util_resize – swiftest","text":"public interface util_resize Called by interface~~util_resize~~CalledByGraph interface~util_resize util_resize proc~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger->interface~util_resize interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger->interface~symba_util_resize_pl proc~symba_util_append_arr_kin symba_util_append_arr_kin proc~symba_util_append_arr_kin->interface~util_resize proc~symba_util_resize_tp symba_util_resize_tp proc~symba_util_resize_tp->interface~util_resize proc~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_pl->interface~util_resize interface~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp->proc~symba_util_resize_tp interface~symba_util_resize_pl->proc~symba_util_resize_pl interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_resize_arr_kin Subroutines public subroutine symba_util_resize_arr_kin(arr, nnew) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size","tags":"","loc":"interface/util_resize.html"},{"title":"symba_util_resize_merger – swiftest","text":"interface Calls interface~~symba_util_resize_merger~~CallsGraph interface~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~util_resize util_resize proc~symba_util_resize_merger->interface~util_resize proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl proc~symba_util_resize_pl->interface~util_resize util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_resize_merger(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/symba_util_resize_merger.html"},{"title":"symba_util_resize_pl – swiftest","text":"interface Calls interface~~symba_util_resize_pl~~CallsGraph interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl interface~util_resize util_resize proc~symba_util_resize_pl->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~symba_util_resize_pl~~CalledByGraph interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/symba_util_resize_pl.html"},{"title":"symba_util_resize_tp – swiftest","text":"interface Calls interface~~symba_util_resize_tp~~CallsGraph interface~symba_util_resize_tp symba_util_resize_tp proc~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp->proc~symba_util_resize_tp util_resize_tp util_resize_tp proc~symba_util_resize_tp->util_resize_tp interface~util_resize util_resize proc~symba_util_resize_tp->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/symba_util_resize_tp.html"},{"title":"symba_util_sort_pl – swiftest","text":"interface Calls interface~~symba_util_sort_pl~~CallsGraph interface~symba_util_sort_pl symba_util_sort_pl proc~symba_util_sort_pl symba_util_sort_pl interface~symba_util_sort_pl->proc~symba_util_sort_pl util_sort_pl util_sort_pl proc~symba_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/symba_util_sort_pl.html"},{"title":"symba_util_sort_tp – swiftest","text":"interface Calls interface~~symba_util_sort_tp~~CallsGraph interface~symba_util_sort_tp symba_util_sort_tp proc~symba_util_sort_tp symba_util_sort_tp interface~symba_util_sort_tp->proc~symba_util_sort_tp util_sort_tp util_sort_tp proc~symba_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/symba_util_sort_tp.html"},{"title":"util_sort_rearrange – swiftest","text":"public interface util_sort_rearrange Called by interface~~util_sort_rearrange~~CalledByGraph interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp->interface~util_sort_rearrange proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl->interface~util_sort_rearrange interface~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl->proc~symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp->proc~symba_util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_sort_rearrange_arr_kin Subroutines public subroutine symba_util_sort_rearrange_arr_kin(arr, ind, n) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange","tags":"","loc":"interface/util_sort_rearrange.html"},{"title":"symba_util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~symba_util_sort_rearrange_pl~~CallsGraph interface~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl->proc~symba_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl->util_sort_rearrange_pl interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_pl->interface~util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/symba_util_sort_rearrange_pl.html"},{"title":"symba_util_sort_rearrange_tp – swiftest","text":"interface Calls interface~~symba_util_sort_rearrange_tp~~CallsGraph interface~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp->proc~symba_util_sort_rearrange_tp util_sort_rearrange_tp util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp->util_sort_rearrange_tp interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_tp->interface~util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/symba_util_sort_rearrange_tp.html"},{"title":"util_spill – swiftest","text":"public interface util_spill Called by interface~~util_spill~~CalledByGraph interface~util_spill util_spill proc~symba_util_spill_tp symba_util_spill_tp proc~symba_util_spill_tp->interface~util_spill proc~symba_util_spill_encounter symba_util_spill_encounter proc~symba_util_spill_encounter->interface~util_spill proc~symba_util_spill_pl symba_util_spill_pl proc~symba_util_spill_pl->interface~util_spill interface~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl->proc~symba_util_spill_pl interface~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter->proc~symba_util_spill_encounter interface~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp->proc~symba_util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines symba_util_spill_arr_kin Subroutines public subroutine symba_util_spill_arr_kin(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill.html"},{"title":"symba_util_spill_pl – swiftest","text":"interface Calls interface~~symba_util_spill_pl~~CallsGraph interface~symba_util_spill_pl symba_util_spill_pl proc~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl->proc~symba_util_spill_pl util_exit util_exit proc~symba_util_spill_pl->util_exit interface~util_spill util_spill proc~symba_util_spill_pl->interface~util_spill util_spill_pl util_spill_pl proc~symba_util_spill_pl->util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/symba_util_spill_pl.html"},{"title":"symba_util_spill_encounter – swiftest","text":"interface Calls interface~~symba_util_spill_encounter~~CallsGraph interface~symba_util_spill_encounter symba_util_spill_encounter proc~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter->proc~symba_util_spill_encounter util_exit util_exit proc~symba_util_spill_encounter->util_exit interface~util_spill util_spill proc~symba_util_spill_encounter->interface~util_spill util_spill_encounter util_spill_encounter proc~symba_util_spill_encounter->util_spill_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"interface/symba_util_spill_encounter.html"},{"title":"symba_util_spill_tp – swiftest","text":"interface Calls interface~~symba_util_spill_tp~~CallsGraph interface~symba_util_spill_tp symba_util_spill_tp proc~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp->proc~symba_util_spill_tp util_exit util_exit proc~symba_util_spill_tp->util_exit interface~util_spill util_spill proc~symba_util_spill_tp->interface~util_spill util_spill_tp util_spill_tp proc~symba_util_spill_tp->util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/symba_util_spill_tp.html"},{"title":"io_get_args – swiftest","text":"interface Calls interface~~io_get_args~~CallsGraph interface~io_get_args io_get_args proc~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~util_version util_version proc~io_get_args->interface~util_version interface~util_exit util_exit proc~io_get_args->interface~util_exit interface~io_toupper io_toupper proc~io_get_args->interface~io_toupper proc~util_version util_version interface~util_version->proc~util_version proc~util_exit util_exit interface~util_exit->proc~util_exit proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_get_args(integrator, param_file_name) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code","tags":"","loc":"interface/io_get_args.html"},{"title":"io_get_old_t_final_system – swiftest","text":"interface Calls interface~~io_get_old_t_final_system~~CallsGraph interface~io_get_old_t_final_system io_get_old_t_final_system proc~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system interface~util_exit util_exit proc~io_get_old_t_final_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP)","tags":"","loc":"interface/io_get_old_t_final_system.html"},{"title":"io_get_token – swiftest","text":"interface Calls interface~~io_get_token~~CallsGraph interface~io_get_token io_get_token proc~io_get_token io_get_token interface~io_get_token->proc~io_get_token Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_get_token~~CalledByGraph interface~io_get_token io_get_token proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_get_token interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_get_token(buffer, ifirst, ilast, ierr) result(token) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string","tags":"","loc":"interface/io_get_token.html"},{"title":"io_read_frame_body – swiftest","text":"interface Calls interface~~io_read_frame_body~~CallsGraph interface~io_read_frame_body io_read_frame_body proc~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body interface~util_exit util_exit proc~io_read_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/io_read_frame_body.html"},{"title":"io_read_frame_cb – swiftest","text":"interface Calls interface~~io_read_frame_cb~~CallsGraph interface~io_read_frame_cb io_read_frame_cb proc~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb interface~util_exit util_exit proc~io_read_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/io_read_frame_cb.html"},{"title":"io_read_frame_system – swiftest","text":"interface Calls interface~~io_read_frame_system~~CallsGraph interface~io_read_frame_system io_read_frame_system proc~io_read_frame_system io_read_frame_system interface~io_read_frame_system->proc~io_read_frame_system proc~io_read_hdr io_read_hdr proc~io_read_frame_system->proc~io_read_hdr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful","tags":"","loc":"interface/io_read_frame_system.html"},{"title":"discard_pl – swiftest","text":"interface Calls interface~~discard_pl~~CallsGraph interface~discard_pl discard_pl proc~discard_pl discard_pl interface~discard_pl->proc~discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter","tags":"","loc":"interface/discard_pl.html"},{"title":"discard_system – swiftest","text":"interface Calls interface~~discard_system~~CallsGraph interface~discard_system discard_system proc~discard_system discard_system interface~discard_system->proc~discard_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/discard_system.html"},{"title":"discard_tp – swiftest","text":"interface Calls interface~~discard_tp~~CallsGraph interface~discard_tp discard_tp proc~discard_tp discard_tp interface~discard_tp->proc~discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/discard_tp.html"},{"title":"drift_all – swiftest","text":"interface Calls interface~~drift_all~~CallsGraph interface~drift_all drift_all proc~drift_all drift_all interface~drift_all->proc~drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~drift_all~~CalledByGraph interface~drift_all drift_all proc~drift_body drift_body proc~drift_body->interface~drift_all interface~drift_body drift_body interface~drift_body->proc~drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: lmask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem","tags":"","loc":"interface/drift_all.html"},{"title":"drift_body – swiftest","text":"interface Calls interface~~drift_body~~CallsGraph interface~drift_body drift_body proc~drift_body drift_body interface~drift_body->proc~drift_body interface~drift_all drift_all proc~drift_body->interface~drift_all proc~drift_all drift_all interface~drift_all->proc~drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"interface/drift_body.html"},{"title":"drift_one – swiftest","text":"interface Calls interface~~drift_one~~CallsGraph interface~drift_one drift_one proc~drift_one drift_one interface~drift_one->proc~drift_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure elemental module subroutine drift_one(mu, px, py, pz, vx, vy, vz, dt, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)","tags":"","loc":"interface/drift_one.html"},{"title":"util_index_eucl_ij_to_k – swiftest","text":"interface Calls interface~~util_index_eucl_ij_to_k~~CallsGraph interface~util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~util_index_eucl_ij_to_k util_index_eucl_ij_to_k interface~util_index_eucl_ij_to_k->proc~util_index_eucl_ij_to_k Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_index_eucl_ij_to_k~~CalledByGraph interface~util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~util_index_eucl_plpl util_index_eucl_plpl proc~util_index_eucl_plpl->interface~util_index_eucl_ij_to_k interface~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl->proc~util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine util_index_eucl_ij_to_k(n, i, j, k) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I4B), intent(in) :: i Index of the ith body integer(kind=I4B), intent(in) :: j Index of the jth body integer(kind=I8B), intent(out) :: k Index of the flattened matrix","tags":"","loc":"interface/util_index_eucl_ij_to_k.html"},{"title":"util_index_eucl_k_to_ij – swiftest","text":"interface Calls interface~~util_index_eucl_k_to_ij~~CallsGraph interface~util_index_eucl_k_to_ij util_index_eucl_k_to_ij proc~util_index_eucl_k_to_ij util_index_eucl_k_to_ij interface~util_index_eucl_k_to_ij->proc~util_index_eucl_k_to_ij Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine util_index_eucl_k_to_ij(n, k, i, j) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I8B), intent(in) :: k Index of the flattened matrix integer(kind=I4B), intent(out) :: i Index of the ith body integer(kind=I4B), intent(out) :: j Index of the jth body","tags":"","loc":"interface/util_index_eucl_k_to_ij.html"},{"title":"util_index_eucl_plpl – swiftest","text":"interface Calls interface~~util_index_eucl_plpl~~CallsGraph interface~util_index_eucl_plpl util_index_eucl_plpl proc~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl->proc~util_index_eucl_plpl interface~util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~util_index_eucl_plpl->interface~util_index_eucl_ij_to_k proc~util_index_eucl_ij_to_k util_index_eucl_ij_to_k interface~util_index_eucl_ij_to_k->proc~util_index_eucl_ij_to_k Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_index_eucl_plpl.html"},{"title":"util_index_eucl_pltp – swiftest","text":"interface Calls interface~~util_index_eucl_pltp~~CallsGraph interface~util_index_eucl_pltp util_index_eucl_pltp proc~util_index_eucl_pltp util_index_eucl_pltp interface~util_index_eucl_pltp->proc~util_index_eucl_pltp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_index_eucl_pltp(self, pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_index_eucl_pltp.html"},{"title":"gr_kick_getaccb_ns_body – swiftest","text":"interface Calls interface~~gr_kick_getaccb_ns_body~~CallsGraph interface~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body proc~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body interface~gr_kick_getaccb_ns_body->proc~gr_kick_getaccb_ns_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_kick_getaccb_ns_body(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/gr_kick_getaccb_ns_body.html"},{"title":"gr_kick_getacch – swiftest","text":"interface Calls interface~~gr_kick_getacch~~CallsGraph interface~gr_kick_getacch gr_kick_getacch proc~gr_kick_getacch gr_kick_getacch interface~gr_kick_getacch->proc~gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations","tags":"","loc":"interface/gr_kick_getacch.html"},{"title":"gr_p4_pos_kick – swiftest","text":"interface Calls interface~~gr_p4_pos_kick~~CallsGraph interface~gr_p4_pos_kick gr_p4_pos_kick proc~gr_p4_pos_kick gr_p4_pos_kick interface~gr_p4_pos_kick->proc~gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_p4_pos_kick(param, x, v, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"interface/gr_p4_pos_kick.html"},{"title":"gr_pseudovel2vel – swiftest","text":"interface Calls interface~~gr_pseudovel2vel~~CallsGraph interface~gr_pseudovel2vel gr_pseudovel2vel proc~gr_pseudovel2vel gr_pseudovel2vel interface~gr_pseudovel2vel->proc~gr_pseudovel2vel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_pseudovel2vel(param, mu, xh, pv, vh) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Swiftestcentric velocity vector","tags":"","loc":"interface/gr_pseudovel2vel.html"},{"title":"gr_pv2vh_body – swiftest","text":"interface Calls interface~~gr_pv2vh_body~~CallsGraph interface~gr_pv2vh_body gr_pv2vh_body proc~gr_pv2vh_body gr_pv2vh_body interface~gr_pv2vh_body->proc~gr_pv2vh_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/gr_pv2vh_body.html"},{"title":"gr_vel2pseudovel – swiftest","text":"interface Calls interface~~gr_vel2pseudovel~~CallsGraph interface~gr_vel2pseudovel gr_vel2pseudovel proc~gr_vel2pseudovel gr_vel2pseudovel interface~gr_vel2pseudovel->proc~gr_vel2pseudovel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_vel2pseudovel(param, mu, xh, vh, pv) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: vh Swiftestcentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32)","tags":"","loc":"interface/gr_vel2pseudovel.html"},{"title":"gr_vh2pv_body – swiftest","text":"interface Calls interface~~gr_vh2pv_body~~CallsGraph interface~gr_vh2pv_body gr_vh2pv_body proc~gr_vh2pv_body gr_vh2pv_body interface~gr_vh2pv_body->proc~gr_vh2pv_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/gr_vh2pv_body.html"},{"title":"io_conservation_report – swiftest","text":"interface Calls interface~~io_conservation_report~~CallsGraph interface~io_conservation_report io_conservation_report proc~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report interface~util_exit util_exit proc~io_conservation_report->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen","tags":"","loc":"interface/io_conservation_report.html"},{"title":"io_dump_param – swiftest","text":"interface Calls interface~~io_dump_param~~CallsGraph interface~io_dump_param io_dump_param proc~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param interface~util_exit util_exit proc~io_dump_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in)","tags":"","loc":"interface/io_dump_param.html"},{"title":"io_dump_particle_info_base – swiftest","text":"interface Calls interface~~io_dump_particle_info_base~~CallsGraph interface~io_dump_particle_info_base io_dump_particle_info_base proc~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base interface~util_exit util_exit proc~io_dump_particle_info_base->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file","tags":"","loc":"interface/io_dump_particle_info_base.html"},{"title":"io_dump_particle_info – swiftest","text":"interface Calls interface~~io_dump_particle_info~~CallsGraph interface~io_dump_particle_info io_dump_particle_info proc~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info interface~util_exit util_exit proc~io_dump_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Swiftest particle info metadata object integer(kind=I4B), intent(in) :: iu Open unformatted file unit number","tags":"","loc":"interface/io_dump_particle_info.html"},{"title":"io_dump_base – swiftest","text":"interface Calls interface~~io_dump_base~~CallsGraph interface~io_dump_base io_dump_base proc~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base interface~util_exit util_exit proc~io_dump_base->interface~util_exit interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body proc~io_write_frame_body->interface~util_exit proc~io_write_frame_cb->interface~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_dump_base.html"},{"title":"io_dump_system – swiftest","text":"interface Calls interface~~io_dump_system~~CallsGraph interface~io_dump_system io_dump_system proc~io_dump_system io_dump_system interface~io_dump_system->proc~io_dump_system dump_tp_file dump_tp_file proc~io_dump_system->dump_tp_file dump_param_file dump_param_file proc~io_dump_system->dump_param_file dump_pl_file dump_pl_file proc~io_dump_system->dump_pl_file dump_cb_file dump_cb_file proc~io_dump_system->dump_cb_file Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_dump_system.html"},{"title":"io_param_reader – swiftest","text":"interface Calls interface~~io_param_reader~~CallsGraph interface~io_param_reader io_param_reader proc~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader interface~io_get_token io_get_token proc~io_param_reader->interface~io_get_token interface~io_toupper io_toupper proc~io_param_reader->interface~io_toupper proc~io_get_token io_get_token interface~io_get_token->proc~io_get_token proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) The first element passes the integrator code to the reader integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/io_param_reader.html"},{"title":"io_param_writer – swiftest","text":"interface Calls interface~~io_param_writer~~CallsGraph interface~io_param_writer io_param_writer proc~io_param_writer io_param_writer interface~io_param_writer->proc~io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) Not used in this procedure integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0","tags":"","loc":"interface/io_param_writer.html"},{"title":"io_read_in_body – swiftest","text":"interface Calls interface~~io_read_in_body~~CallsGraph interface~io_read_in_body io_read_in_body proc~io_read_in_body io_read_in_body interface~io_read_in_body->proc~io_read_in_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_read_in_body.html"},{"title":"io_read_in_cb – swiftest","text":"interface Calls interface~~io_read_in_cb~~CallsGraph interface~io_read_in_cb io_read_in_cb proc~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb interface~util_exit util_exit proc~io_read_in_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_read_in_cb.html"},{"title":"io_read_in_param – swiftest","text":"interface Calls interface~~io_read_in_param~~CallsGraph interface~io_read_in_param io_read_in_param proc~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param interface~util_exit util_exit proc~io_read_in_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in)","tags":"","loc":"interface/io_read_in_param.html"},{"title":"io_read_in_particle_info – swiftest","text":"interface Calls interface~~io_read_in_particle_info~~CallsGraph interface~io_read_in_particle_info io_read_in_particle_info proc~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info interface~util_exit util_exit proc~io_read_in_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_in_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number","tags":"","loc":"interface/io_read_in_particle_info.html"},{"title":"io_read_particle_info_system – swiftest","text":"interface Calls interface~~io_read_particle_info_system~~CallsGraph interface~io_read_particle_info_system io_read_particle_info_system proc~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system interface~util_exit util_exit proc~io_read_particle_info_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_read_particle_info_system.html"},{"title":"io_write_discard – swiftest","text":"interface Calls interface~~io_write_discard~~CallsGraph interface~io_write_discard io_write_discard proc~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard interface~util_exit util_exit proc~io_write_discard->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_discard.html"},{"title":"io_toupper – swiftest","text":"interface Calls interface~~io_toupper~~CallsGraph interface~io_toupper io_toupper proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_toupper~~CalledByGraph interface~io_toupper io_toupper proc~io_get_args io_get_args proc~io_get_args->interface~io_toupper proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_toupper interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_toupper(string) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case","tags":"","loc":"interface/io_toupper.html"},{"title":"io_write_encounter – swiftest","text":"interface Calls interface~~io_write_encounter~~CallsGraph interface~io_write_encounter io_write_encounter proc~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter ind1 ind1 proc~io_write_encounter->ind1 interface~util_exit util_exit proc~io_write_encounter->interface~util_exit ind2 ind2 proc~io_write_encounter->ind2 proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_encounter.html"},{"title":"io_write_frame_body – swiftest","text":"interface Calls interface~~io_write_frame_body~~CallsGraph interface~io_write_frame_body io_write_frame_body proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body interface~util_exit util_exit proc~io_write_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_write_frame_body~~CalledByGraph interface~io_write_frame_body io_write_frame_body proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_body interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_frame_body.html"},{"title":"io_write_frame_cb – swiftest","text":"interface Calls interface~~io_write_frame_cb~~CallsGraph interface~io_write_frame_cb io_write_frame_cb proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb interface~util_exit util_exit proc~io_write_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~io_write_frame_cb~~CalledByGraph interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_cb interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_frame_cb.html"},{"title":"io_write_frame_encounter – swiftest","text":"interface Calls interface~~io_write_frame_encounter~~CallsGraph interface~io_write_frame_encounter io_write_frame_encounter proc~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter interface~util_exit util_exit proc~io_write_frame_encounter->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Swiftestcentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Swiftestcentric velocity vectors of the two encountering bodies","tags":"","loc":"interface/io_write_frame_encounter.html"},{"title":"io_write_frame_system – swiftest","text":"interface Calls interface~~io_write_frame_system~~CallsGraph interface~io_write_frame_system io_write_frame_system proc~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system interface~util_exit util_exit proc~io_write_frame_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_frame_system.html"},{"title":"io_write_hdr_system – swiftest","text":"interface Calls interface~~io_write_hdr_system~~CallsGraph interface~io_write_hdr_system io_write_hdr_system proc~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system interface~util_exit util_exit proc~io_write_hdr_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/io_write_hdr_system.html"},{"title":"kick_getacch_int_pl – swiftest","text":"interface Calls interface~~kick_getacch_int_pl~~CallsGraph interface~kick_getacch_int_pl kick_getacch_int_pl proc~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object","tags":"","loc":"interface/kick_getacch_int_pl.html"},{"title":"kick_getacch_int_tp – swiftest","text":"interface Calls interface~~kick_getacch_int_tp~~CallsGraph interface~kick_getacch_int_tp kick_getacch_int_tp proc~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp->proc~kick_getacch_int_tp interface~kick_getacch_int_all_tp kick_getacch_int_all_tp proc~kick_getacch_int_tp->interface~kick_getacch_int_all_tp proc~kick_getacch_int_all_tp kick_getacch_int_all_tp interface~kick_getacch_int_all_tp->proc~kick_getacch_int_all_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies","tags":"","loc":"interface/kick_getacch_int_tp.html"},{"title":"kick_getacch_int_all_pl – swiftest","text":"interface Calls interface~~kick_getacch_int_all_pl~~CallsGraph interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~kick_getacch_int_all_pl~~CalledByGraph interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_pl kick_getacch_int_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl interface~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array","tags":"","loc":"interface/kick_getacch_int_all_pl.html"},{"title":"kick_getacch_int_all_tp – swiftest","text":"interface Calls interface~~kick_getacch_int_all_tp~~CallsGraph interface~kick_getacch_int_all_tp kick_getacch_int_all_tp proc~kick_getacch_int_all_tp kick_getacch_int_all_tp interface~kick_getacch_int_all_tp->proc~kick_getacch_int_all_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~kick_getacch_int_all_tp~~CalledByGraph interface~kick_getacch_int_all_tp kick_getacch_int_all_tp proc~kick_getacch_int_tp kick_getacch_int_tp proc~kick_getacch_int_tp->interface~kick_getacch_int_all_tp interface~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp->proc~kick_getacch_int_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: ntp Number of test particles integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in), dimension(:,:) :: xtp Test particle position vector array real(kind=DP), intent(in), dimension(:,:) :: xpl Massive body particle position vector array real(kind=DP), intent(in), dimension(:) :: GMpl Array of massive body G*mass logical, intent(in), dimension(:) :: lmask Logical mask indicating which test particles should be computed real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array","tags":"","loc":"interface/kick_getacch_int_all_tp.html"},{"title":"kick_getacch_int_one_pl – swiftest","text":"interface Calls interface~~kick_getacch_int_one_pl~~CallsGraph interface~kick_getacch_int_one_pl kick_getacch_int_one_pl proc~kick_getacch_int_one_pl kick_getacch_int_one_pl interface~kick_getacch_int_one_pl->proc~kick_getacch_int_one_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j","tags":"","loc":"interface/kick_getacch_int_one_pl.html"},{"title":"kick_getacch_int_one_tp – swiftest","text":"interface Calls interface~~kick_getacch_int_one_tp~~CallsGraph interface~kick_getacch_int_one_tp kick_getacch_int_one_tp proc~kick_getacch_int_one_tp kick_getacch_int_one_tp interface~kick_getacch_int_one_tp->proc~kick_getacch_int_one_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, az) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle","tags":"","loc":"interface/kick_getacch_int_one_tp.html"},{"title":"netcdf_close – swiftest","text":"interface Calls interface~~netcdf_close~~CallsGraph interface~netcdf_close netcdf_close proc~netcdf_close netcdf_close interface~netcdf_close->proc~netcdf_close nf90_close nf90_close proc~netcdf_close->nf90_close Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_close(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_close.html"},{"title":"netcdf_initialize_output – swiftest","text":"interface Calls interface~~netcdf_initialize_output~~CallsGraph interface~netcdf_initialize_output netcdf_initialize_output proc~netcdf_initialize_output netcdf_initialize_output interface~netcdf_initialize_output->proc~netcdf_initialize_output nf90_def_var nf90_def_var proc~netcdf_initialize_output->nf90_def_var nf90_def_dim nf90_def_dim proc~netcdf_initialize_output->nf90_def_dim nf90_create nf90_create proc~netcdf_initialize_output->nf90_create nf90_def_var_fill nf90_def_var_fill proc~netcdf_initialize_output->nf90_def_var_fill nf90_inquire nf90_inquire proc~netcdf_initialize_output->nf90_inquire nf90_inquire_variable nf90_inquire_variable proc~netcdf_initialize_output->nf90_inquire_variable Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_initialize_output(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_initialize_output.html"},{"title":"netcdf_open – swiftest","text":"interface Calls interface~~netcdf_open~~CallsGraph interface~netcdf_open netcdf_open proc~netcdf_open netcdf_open interface~netcdf_open->proc~netcdf_open nf90_inq_varid nf90_inq_varid proc~netcdf_open->nf90_inq_varid nf90_open nf90_open proc~netcdf_open->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_open(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_open.html"},{"title":"netcdf_write_frame_base – swiftest","text":"interface Calls interface~~netcdf_write_frame_base~~CallsGraph interface~netcdf_write_frame_base netcdf_write_frame_base proc~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base->proc~netcdf_write_frame_base nf90_set_fill nf90_set_fill proc~netcdf_write_frame_base->nf90_set_fill nf90_put_var nf90_put_var proc~netcdf_write_frame_base->nf90_put_var interface~util_sort util_sort proc~netcdf_write_frame_base->interface~util_sort Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_write_frame_base.html"},{"title":"netcdf_write_frame_system – swiftest","text":"interface public subroutine netcdf_write_frame_system(self, iu, param) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_write_frame_system.html"},{"title":"netcdf_write_hdr_system – swiftest","text":"interface Calls interface~~netcdf_write_hdr_system~~CallsGraph interface~netcdf_write_hdr_system netcdf_write_hdr_system proc~netcdf_write_hdr_system netcdf_write_hdr_system interface~netcdf_write_hdr_system->proc~netcdf_write_hdr_system nf90_put_var nf90_put_var proc~netcdf_write_hdr_system->nf90_put_var nf90_open nf90_open proc~netcdf_write_hdr_system->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/netcdf_write_hdr_system.html"},{"title":"netcdf_write_particle_info_base – swiftest","text":"interface Calls interface~~netcdf_write_particle_info_base~~CallsGraph interface~netcdf_write_particle_info_base netcdf_write_particle_info_base proc~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base->proc~netcdf_write_particle_info_base nf90_set_fill nf90_set_fill proc~netcdf_write_particle_info_base->nf90_set_fill nf90_put_var nf90_put_var proc~netcdf_write_particle_info_base->nf90_put_var interface~util_sort util_sort proc~netcdf_write_particle_info_base->interface~util_sort Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset","tags":"","loc":"interface/netcdf_write_particle_info_base.html"},{"title":"obl_acc_body – swiftest","text":"interface Calls interface~~obl_acc_body~~CallsGraph interface~obl_acc_body obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~obl_acc_body~~CalledByGraph interface~obl_acc_body obl_acc_body proc~obl_acc_pl obl_acc_pl proc~obl_acc_pl->interface~obl_acc_body proc~obl_acc_tp obl_acc_tp proc~obl_acc_tp->interface~obl_acc_body interface~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp interface~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_acc_body(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/obl_acc_body.html"},{"title":"obl_acc_pl – swiftest","text":"interface Calls interface~~obl_acc_pl~~CallsGraph interface~obl_acc_pl obl_acc_pl proc~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl interface~obl_acc_body obl_acc_body proc~obl_acc_pl->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/obl_acc_pl.html"},{"title":"obl_acc_tp – swiftest","text":"interface Calls interface~~obl_acc_tp~~CallsGraph interface~obl_acc_tp obl_acc_tp proc~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp interface~obl_acc_body obl_acc_body proc~obl_acc_tp->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/obl_acc_tp.html"},{"title":"obl_pot_system – swiftest","text":"interface Calls interface~~obl_pot_system~~CallsGraph interface~obl_pot_system obl_pot_system proc~obl_pot_system obl_pot_system interface~obl_pot_system->proc~obl_pot_system proc~obl_pot_one obl_pot_one proc~obl_pot_system->proc~obl_pot_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object","tags":"","loc":"interface/obl_pot_system.html"},{"title":"orbel_el2xv_vec – swiftest","text":"interface Calls interface~~orbel_el2xv_vec~~CallsGraph interface~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv_vec->proc~orbel_el2xv proc~orbel_zget orbel_zget proc~orbel_el2xv->proc~orbel_zget proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_schget orbel_schget proc~orbel_el2xv->proc~orbel_schget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid interface~orbel_scget orbel_scget proc~orbel_el2xv->interface~orbel_scget proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget 3 3 proc~orbel_flon->3 proc~orbel_eget->interface~orbel_scget proc~orbel_esolmd->interface~orbel_scget proc~orbel_fget->proc~orbel_schget proc~orbel_ehie->interface~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/orbel_el2xv_vec.html"},{"title":"orbel_scget – swiftest","text":"interface Calls interface~~orbel_scget~~CallsGraph interface~orbel_scget orbel_scget proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~orbel_scget~~CalledByGraph interface~orbel_scget orbel_scget proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu_guess->interface~orbel_scget proc~orbel_eget orbel_eget proc~orbel_eget->interface~orbel_scget proc~orbel_esolmd orbel_esolmd proc~orbel_esolmd->interface~orbel_scget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->interface~orbel_scget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_ehie orbel_ehie proc~orbel_ehie->interface~orbel_scget proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~orbel_ehybrid->proc~orbel_eget proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_scget(angle, sx, cx) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx","tags":"","loc":"interface/orbel_scget.html"},{"title":"orbel_xv2aeq – swiftest","text":"interface Calls interface~~orbel_xv2aeq~~CallsGraph interface~orbel_xv2aeq orbel_xv2aeq proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~orbel_xv2aeq~~CalledByGraph interface~orbel_xv2aeq orbel_xv2aeq proc~util_peri_tp util_peri_tp proc~util_peri_tp->interface~orbel_xv2aeq interface~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_xv2aeq(mu, x, v, a, e, q) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: q periapsis","tags":"","loc":"interface/orbel_xv2aeq.html"},{"title":"orbel_xv2aqt – swiftest","text":"interface Calls interface~~orbel_xv2aqt~~CallsGraph interface~orbel_xv2aqt orbel_xv2aqt proc~orbel_xv2aqt orbel_xv2aqt interface~orbel_xv2aqt->proc~orbel_xv2aqt Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_xv2aqt(mu, x, v, a, q, capm, tperi) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage","tags":"","loc":"interface/orbel_xv2aqt.html"},{"title":"orbel_xv2el – swiftest","text":"interface Calls interface~~orbel_xv2el~~CallsGraph interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~orbel_xv2el~~CalledByGraph interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el_vec orbel_xv2el_vec proc~orbel_xv2el_vec->interface~orbel_xv2el interface~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public pure module subroutine orbel_xv2el(mu, x, v, a, e, inc, capom, omega, capm) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly","tags":"","loc":"interface/orbel_xv2el.html"},{"title":"orbel_xv2el_vec – swiftest","text":"interface Calls interface~~orbel_xv2el_vec~~CallsGraph interface~orbel_xv2el_vec orbel_xv2el_vec proc~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el_vec->interface~orbel_xv2el proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/orbel_xv2el_vec.html"},{"title":"setup_body – swiftest","text":"interface Calls interface~~setup_body~~CallsGraph interface~setup_body setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~setup_body~~CalledByGraph interface~setup_body setup_body proc~setup_pl setup_pl proc~setup_pl->interface~setup_body proc~setup_tp setup_tp proc~setup_tp->interface~setup_body interface~setup_tp setup_tp interface~setup_tp->proc~setup_tp interface~setup_pl setup_pl interface~setup_pl->proc~setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_body(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/setup_body.html"},{"title":"setup_construct_system – swiftest","text":"interface Calls interface~~setup_construct_system~~CallsGraph interface~setup_construct_system setup_construct_system proc~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system interface~util_exit util_exit proc~setup_construct_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_construct_system(system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/setup_construct_system.html"},{"title":"setup_encounter – swiftest","text":"interface Calls interface~~setup_encounter~~CallsGraph interface~setup_encounter setup_encounter proc~setup_encounter setup_encounter interface~setup_encounter->proc~setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for","tags":"","loc":"interface/setup_encounter.html"},{"title":"setup_initialize_particle_info_system – swiftest","text":"interface Calls interface~~setup_initialize_particle_info_system~~CallsGraph interface~setup_initialize_particle_info_system setup_initialize_particle_info_system proc~setup_initialize_particle_info_system setup_initialize_particle_info_system interface~setup_initialize_particle_info_system->proc~setup_initialize_particle_info_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/setup_initialize_particle_info_system.html"},{"title":"setup_initialize_system – swiftest","text":"interface Calls interface~~setup_initialize_system~~CallsGraph interface~setup_initialize_system setup_initialize_system proc~setup_initialize_system setup_initialize_system interface~setup_initialize_system->proc~setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/setup_initialize_system.html"},{"title":"setup_pl – swiftest","text":"interface Calls interface~~setup_pl~~CallsGraph interface~setup_pl setup_pl proc~setup_pl setup_pl interface~setup_pl->proc~setup_pl interface~setup_body setup_body proc~setup_pl->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/setup_pl.html"},{"title":"setup_tp – swiftest","text":"interface Calls interface~~setup_tp~~CallsGraph interface~setup_tp setup_tp proc~setup_tp setup_tp interface~setup_tp->proc~setup_tp interface~setup_body setup_body proc~setup_tp->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr","tags":"","loc":"interface/setup_tp.html"},{"title":"tides_kick_getacch_pl – swiftest","text":"interface Calls interface~~tides_kick_getacch_pl~~CallsGraph interface~tides_kick_getacch_pl tides_kick_getacch_pl proc~tides_kick_getacch_pl tides_kick_getacch_pl interface~tides_kick_getacch_pl->proc~tides_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"interface/tides_kick_getacch_pl.html"},{"title":"tides_step_spin_system – swiftest","text":"interface Calls interface~~tides_step_spin_system~~CallsGraph interface~tides_step_spin_system tides_step_spin_system proc~tides_step_spin_system tides_step_spin_system interface~tides_step_spin_system->proc~tides_step_spin_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"interface/tides_step_spin_system.html"},{"title":"user_kick_getacch_body – swiftest","text":"interface Calls interface~~user_kick_getacch_body~~CallsGraph interface~user_kick_getacch_body user_kick_getacch_body proc~user_kick_getacch_body user_kick_getacch_body interface~user_kick_getacch_body->proc~user_kick_getacch_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"interface/user_kick_getacch_body.html"},{"title":"util_append – swiftest","text":"public interface util_append Called by interface~~util_append~2~~CalledByGraph interface~util_append~2 util_append proc~util_append_body util_append_body proc~util_append_body->interface~util_append~2 proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_append~2 interface~util_append_body util_append_body proc~util_append_pl->interface~util_append_body proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_append~2 proc~util_append_tp->interface~util_append_body proc~util_append_encounter util_append_encounter proc~util_append_encounter->interface~util_append~2 interface~util_append_body->proc~util_append_body interface~util_append_encounter util_append_encounter interface~util_append_encounter->proc~util_append_encounter interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_append_arr_char_string util_append_arr_DP util_append_arr_DPvec util_append_arr_I4B util_append_arr_info util_append_arr_logical Subroutines public subroutine util_append_arr_char_string(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DP(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DPvec(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_I4B(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_info(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_logical(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append~2.html"},{"title":"util_append_body – swiftest","text":"interface Calls interface~~util_append_body~~CallsGraph interface~util_append_body util_append_body proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body interface~util_append~2 util_append proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_append_body~~CalledByGraph interface~util_append_body util_append_body proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_append_body proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_append_body interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_body(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_body.html"},{"title":"util_append_encounter – swiftest","text":"interface Calls interface~~util_append_encounter~~CallsGraph interface~util_append_encounter util_append_encounter proc~util_append_encounter util_append_encounter interface~util_append_encounter->proc~util_append_encounter interface~util_append~2 util_append proc~util_append_encounter->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_encounter.html"},{"title":"util_append_pl – swiftest","text":"interface Calls interface~~util_append_pl~~CallsGraph interface~util_append_pl util_append_pl proc~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~util_append_body util_append_body proc~util_append_pl->interface~util_append_body interface~util_append~2 util_append proc~util_append_pl->interface~util_append~2 interface~util_exit util_exit proc~util_append_pl->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_pl.html"},{"title":"util_append_tp – swiftest","text":"interface Calls interface~~util_append_tp~~CallsGraph interface~util_append_tp util_append_tp proc~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~util_append_body util_append_body proc~util_append_tp->interface~util_append_body interface~util_append~2 util_append proc~util_append_tp->interface~util_append~2 interface~util_exit util_exit proc~util_append_tp->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"interface/util_append_tp.html"},{"title":"util_coord_b2h_pl – swiftest","text":"interface Calls interface~~util_coord_b2h_pl~~CallsGraph interface~util_coord_b2h_pl util_coord_b2h_pl proc~util_coord_b2h_pl util_coord_b2h_pl interface~util_coord_b2h_pl->proc~util_coord_b2h_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_b2h_pl.html"},{"title":"util_coord_b2h_tp – swiftest","text":"interface Calls interface~~util_coord_b2h_tp~~CallsGraph interface~util_coord_b2h_tp util_coord_b2h_tp proc~util_coord_b2h_tp util_coord_b2h_tp interface~util_coord_b2h_tp->proc~util_coord_b2h_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_b2h_tp.html"},{"title":"util_coord_h2b_pl – swiftest","text":"interface Calls interface~~util_coord_h2b_pl~~CallsGraph interface~util_coord_h2b_pl util_coord_h2b_pl proc~util_coord_h2b_pl util_coord_h2b_pl interface~util_coord_h2b_pl->proc~util_coord_h2b_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_h2b_pl.html"},{"title":"util_coord_h2b_tp – swiftest","text":"interface Calls interface~~util_coord_h2b_tp~~CallsGraph interface~util_coord_h2b_tp util_coord_h2b_tp proc~util_coord_h2b_tp util_coord_h2b_tp interface~util_coord_h2b_tp->proc~util_coord_h2b_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_h2b_tp.html"},{"title":"util_coord_vb2vh_pl – swiftest","text":"interface Calls interface~~util_coord_vb2vh_pl~~CallsGraph interface~util_coord_vb2vh_pl util_coord_vb2vh_pl proc~util_coord_vb2vh_pl util_coord_vb2vh_pl interface~util_coord_vb2vh_pl->proc~util_coord_vb2vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_vb2vh_pl.html"},{"title":"util_coord_vb2vh_tp – swiftest","text":"interface Calls interface~~util_coord_vb2vh_tp~~CallsGraph interface~util_coord_vb2vh_tp util_coord_vb2vh_tp proc~util_coord_vb2vh_tp util_coord_vb2vh_tp interface~util_coord_vb2vh_tp->proc~util_coord_vb2vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body","tags":"","loc":"interface/util_coord_vb2vh_tp.html"},{"title":"util_coord_vh2vb_pl – swiftest","text":"interface Calls interface~~util_coord_vh2vb_pl~~CallsGraph interface~util_coord_vh2vb_pl util_coord_vh2vb_pl proc~util_coord_vh2vb_pl util_coord_vh2vb_pl interface~util_coord_vh2vb_pl->proc~util_coord_vh2vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_vh2vb_pl.html"},{"title":"util_coord_vh2vb_tp – swiftest","text":"interface Calls interface~~util_coord_vh2vb_tp~~CallsGraph interface~util_coord_vh2vb_tp util_coord_vh2vb_tp proc~util_coord_vh2vb_tp util_coord_vh2vb_tp interface~util_coord_vh2vb_tp->proc~util_coord_vh2vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body","tags":"","loc":"interface/util_coord_vh2vb_tp.html"},{"title":"util_coord_xh2xb_pl – swiftest","text":"interface Calls interface~~util_coord_xh2xb_pl~~CallsGraph interface~util_coord_xh2xb_pl util_coord_xh2xb_pl proc~util_coord_xh2xb_pl util_coord_xh2xb_pl interface~util_coord_xh2xb_pl->proc~util_coord_xh2xb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_xh2xb_pl.html"},{"title":"util_coord_xh2xb_tp – swiftest","text":"interface Calls interface~~util_coord_xh2xb_tp~~CallsGraph interface~util_coord_xh2xb_tp util_coord_xh2xb_tp proc~util_coord_xh2xb_tp util_coord_xh2xb_tp interface~util_coord_xh2xb_tp->proc~util_coord_xh2xb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"interface/util_coord_xh2xb_tp.html"},{"title":"util_copy_encounter – swiftest","text":"interface Calls interface~~util_copy_encounter~~CallsGraph interface~util_copy_encounter util_copy_encounter proc~util_copy_encounter util_copy_encounter interface~util_copy_encounter->proc~util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into","tags":"","loc":"interface/util_copy_encounter.html"},{"title":"util_copy_particle_info – swiftest","text":"interface Calls interface~~util_copy_particle_info~~CallsGraph interface~util_copy_particle_info util_copy_particle_info proc~util_copy_particle_info util_copy_particle_info interface~util_copy_particle_info->proc~util_copy_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_copy_particle_info(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source","tags":"","loc":"interface/util_copy_particle_info.html"},{"title":"util_copy_particle_info_arr – swiftest","text":"interface Calls interface~~util_copy_particle_info_arr~~CallsGraph interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_copy_particle_info_arr~~CalledByGraph interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_sort_rearrange_arr_info util_sort_rearrange_arr_info proc~util_sort_rearrange_arr_info->interface~util_copy_particle_info_arr proc~util_fill_arr_info util_fill_arr_info proc~util_fill_arr_info->interface~util_copy_particle_info_arr proc~util_spill_arr_info util_spill_arr_info proc~util_spill_arr_info->interface~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_copy_particle_info_arr(source, dest, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object","tags":"","loc":"interface/util_copy_particle_info_arr.html"},{"title":"util_exit – swiftest","text":"interface Calls interface~~util_exit~~CallsGraph interface~util_exit util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_exit~~CalledByGraph interface~util_exit util_exit proc~io_write_encounter io_write_encounter proc~io_write_encounter->interface~util_exit proc~io_read_in_cb io_read_in_cb proc~io_read_in_cb->interface~util_exit proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_exit proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_exit proc~io_read_encounter io_read_encounter proc~io_read_encounter->interface~util_exit proc~setup_construct_system setup_construct_system proc~setup_construct_system->interface~util_exit proc~io_read_particle_info_system io_read_particle_info_system proc~io_read_particle_info_system->interface~util_exit proc~check check proc~check->interface~util_exit proc~io_write_discard io_write_discard proc~io_write_discard->interface~util_exit proc~io_dump_particle_info_base io_dump_particle_info_base proc~io_dump_particle_info_base->interface~util_exit proc~io_dump_particle_info io_dump_particle_info proc~io_dump_particle_info->interface~util_exit proc~io_dump_param io_dump_param proc~io_dump_param->interface~util_exit proc~io_write_frame_encounter io_write_frame_encounter proc~io_write_frame_encounter->interface~util_exit proc~io_conservation_report io_conservation_report proc~io_conservation_report->interface~util_exit proc~io_read_frame_cb io_read_frame_cb proc~io_read_frame_cb->interface~util_exit proc~io_read_in_particle_info io_read_in_particle_info proc~io_read_in_particle_info->interface~util_exit proc~io_get_old_t_final_system io_get_old_t_final_system proc~io_get_old_t_final_system->interface~util_exit proc~io_dump_base io_dump_base proc~io_dump_base->interface~util_exit interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb proc~io_write_hdr_system io_write_hdr_system proc~io_write_hdr_system->interface~util_exit proc~io_read_in_param io_read_in_param proc~io_read_in_param->interface~util_exit proc~util_solve_rkf45 util_solve_rkf45 proc~util_solve_rkf45->interface~util_exit proc~io_read_frame_body io_read_frame_body proc~io_read_frame_body->interface~util_exit proc~io_write_frame_body io_write_frame_body proc~io_write_frame_body->interface~util_exit proc~util_valid_id_system util_valid_id_system proc~util_valid_id_system->interface~util_exit proc~io_write_frame_cb io_write_frame_cb proc~io_write_frame_cb->interface~util_exit proc~io_write_frame_system io_write_frame_system proc~io_write_frame_system->interface~util_exit proc~io_get_args io_get_args proc~io_get_args->interface~util_exit interface~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report interface~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 interface~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base interface~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system interface~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system interface~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb interface~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb interface~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter interface~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter interface~io_write_frame_body->proc~io_write_frame_body interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system interface~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system interface~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info interface~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system interface~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param interface~io_write_frame_cb->proc~io_write_frame_cb interface~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system interface~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_exit(code) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code Failure exit code","tags":"","loc":"interface/util_exit.html"},{"title":"util_fill_body – swiftest","text":"interface Calls interface~~util_fill_body~~CallsGraph interface~util_fill_body util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body interface~util_fill~2 util_fill proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_fill_body~~CalledByGraph interface~util_fill_body util_fill_body proc~util_fill_tp util_fill_tp proc~util_fill_tp->interface~util_fill_body proc~util_fill_pl util_fill_pl proc~util_fill_pl->interface~util_fill_body interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_fill_body(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill_body.html"},{"title":"util_fill_pl – swiftest","text":"interface Calls interface~~util_fill_pl~~CallsGraph interface~util_fill_pl util_fill_pl proc~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl interface~util_fill~2 util_fill proc~util_fill_pl->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_pl->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill_pl.html"},{"title":"util_fill_tp – swiftest","text":"interface Calls interface~~util_fill_tp~~CallsGraph interface~util_fill_tp util_fill_tp proc~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill~2 util_fill proc~util_fill_tp->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_tp->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill_tp.html"},{"title":"util_fill – swiftest","text":"public interface util_fill Called by interface~~util_fill~2~~CalledByGraph interface~util_fill~2 util_fill proc~util_fill_tp util_fill_tp proc~util_fill_tp->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_tp->interface~util_fill_body proc~util_fill_body util_fill_body proc~util_fill_body->interface~util_fill~2 proc~util_fill_pl util_fill_pl proc~util_fill_pl->interface~util_fill~2 proc~util_fill_pl->interface~util_fill_body interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill_body->proc~util_fill_body interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_fill_arr_char_string util_fill_arr_DP util_fill_arr_DPvec util_fill_arr_I4B util_fill_arr_info util_fill_arr_logical Subroutines public subroutine util_fill_arr_char_string(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DP(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DPvec(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_I4B(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_info(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_logical(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"interface/util_fill~2.html"},{"title":"util_minimize_bfgs – swiftest","text":"interface Calls interface~~util_minimize_bfgs~~CallsGraph interface~util_minimize_bfgs util_minimize_bfgs proc~util_minimize_bfgs util_minimize_bfgs interface~util_minimize_bfgs->proc~util_minimize_bfgs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:),allocatable","tags":"","loc":"interface/util_minimize_bfgs.html"},{"title":"util_rescale_system – swiftest","text":"interface Calls interface~~util_rescale_system~~CallsGraph interface~util_rescale_system util_rescale_system proc~util_rescale_system util_rescale_system interface~util_rescale_system->proc~util_rescale_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively.","tags":"","loc":"interface/util_rescale_system.html"},{"title":"util_peri_tp – swiftest","text":"interface Calls interface~~util_peri_tp~~CallsGraph interface~util_peri_tp util_peri_tp proc~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp interface~orbel_xv2aeq orbel_xv2aeq proc~util_peri_tp->interface~orbel_xv2aeq proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_peri_tp.html"},{"title":"util_resize – swiftest","text":"public interface util_resize Called by interface~~util_resize~2~~CalledByGraph interface~util_resize~2 util_resize proc~util_resize_tp util_resize_tp proc~util_resize_tp->interface~util_resize~2 interface~util_resize_body util_resize_body proc~util_resize_tp->interface~util_resize_body proc~util_append_arr_info util_append_arr_info proc~util_append_arr_info->interface~util_resize~2 proc~util_append_arr_dpvec util_append_arr_DPvec proc~util_append_arr_dpvec->interface~util_resize~2 proc~util_append_arr_char_string util_append_arr_char_string proc~util_append_arr_char_string->interface~util_resize~2 proc~util_resize_body util_resize_body proc~util_resize_body->interface~util_resize~2 proc~util_append_arr_i4b util_append_arr_I4B proc~util_append_arr_i4b->interface~util_resize~2 proc~util_resize_pl util_resize_pl proc~util_resize_pl->interface~util_resize~2 proc~util_resize_pl->interface~util_resize_body proc~util_append_arr_logical util_append_arr_logical proc~util_append_arr_logical->interface~util_resize~2 proc~util_append_arr_dp util_append_arr_DP proc~util_append_arr_dp->interface~util_resize~2 interface~util_resize_body->proc~util_resize_body interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_resize_arr_char_string util_resize_arr_DP util_resize_arr_DPvec util_resize_arr_I4B util_resize_arr_info util_resize_arr_logical Subroutines public subroutine util_resize_arr_char_string(arr, nnew) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DP(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DPvec(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_I4B(arr, nnew) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_info(arr, nnew) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_logical(arr, nnew) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size","tags":"","loc":"interface/util_resize~2.html"},{"title":"util_resize_body – swiftest","text":"interface Calls interface~~util_resize_body~~CallsGraph interface~util_resize_body util_resize_body proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body interface~util_resize~2 util_resize proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_resize_body~~CalledByGraph interface~util_resize_body util_resize_body proc~util_resize_tp util_resize_tp proc~util_resize_tp->interface~util_resize_body proc~util_resize_pl util_resize_pl proc~util_resize_pl->interface~util_resize_body interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_body(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/util_resize_body.html"},{"title":"util_resize_encounter – swiftest","text":"interface Calls interface~~util_resize_encounter~~CallsGraph interface~util_resize_encounter util_resize_encounter proc~util_resize_encounter util_resize_encounter interface~util_resize_encounter->proc~util_resize_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed","tags":"","loc":"interface/util_resize_encounter.html"},{"title":"util_resize_pl – swiftest","text":"interface Calls interface~~util_resize_pl~~CallsGraph interface~util_resize_pl util_resize_pl proc~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize~2 util_resize proc~util_resize_pl->interface~util_resize~2 interface~util_resize_body util_resize_body proc~util_resize_pl->interface~util_resize_body proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/util_resize_pl.html"},{"title":"util_resize_tp – swiftest","text":"interface Calls interface~~util_resize_tp~~CallsGraph interface~util_resize_tp util_resize_tp proc~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp interface~util_resize~2 util_resize proc~util_resize_tp->interface~util_resize~2 interface~util_resize_body util_resize_body proc~util_resize_tp->interface~util_resize_body proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"interface/util_resize_tp.html"},{"title":"util_get_energy_momentum_system – swiftest","text":"interface Calls interface~~util_get_energy_momentum_system~~CallsGraph interface~util_get_energy_momentum_system util_get_energy_momentum_system proc~util_get_energy_momentum_system util_get_energy_momentum_system interface~util_get_energy_momentum_system->proc~util_get_energy_momentum_system proc~util_get_energy_potential util_get_energy_potential proc~util_get_energy_momentum_system->proc~util_get_energy_potential Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"interface/util_get_energy_momentum_system.html"},{"title":"util_set_beg_end_pl – swiftest","text":"interface Calls interface~~util_set_beg_end_pl~~CallsGraph interface~util_set_beg_end_pl util_set_beg_end_pl proc~util_set_beg_end_pl util_set_beg_end_pl interface~util_set_beg_end_pl->proc~util_set_beg_end_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS","tags":"","loc":"interface/util_set_beg_end_pl.html"},{"title":"util_set_ir3h – swiftest","text":"interface Calls interface~~util_set_ir3h~~CallsGraph interface~util_set_ir3h util_set_ir3h proc~util_set_ir3h util_set_ir3h interface~util_set_ir3h->proc~util_set_ir3h Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object","tags":"","loc":"interface/util_set_ir3h.html"},{"title":"util_set_msys – swiftest","text":"interface Calls interface~~util_set_msys~~CallsGraph interface~util_set_msys util_set_msys proc~util_set_msys util_set_msys interface~util_set_msys->proc~util_set_msys Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object","tags":"","loc":"interface/util_set_msys.html"},{"title":"util_set_mu_pl – swiftest","text":"interface Calls interface~~util_set_mu_pl~~CallsGraph interface~util_set_mu_pl util_set_mu_pl proc~util_set_mu_pl util_set_mu_pl interface~util_set_mu_pl->proc~util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_mu_pl.html"},{"title":"util_set_mu_tp – swiftest","text":"interface Calls interface~~util_set_mu_tp~~CallsGraph interface~util_set_mu_tp util_set_mu_tp proc~util_set_mu_tp util_set_mu_tp interface~util_set_mu_tp->proc~util_set_mu_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_mu_tp.html"},{"title":"util_set_particle_info – swiftest","text":"interface Calls interface~~util_set_particle_info~~CallsGraph interface~util_set_particle_info util_set_particle_info proc~util_set_particle_info util_set_particle_info interface~util_set_particle_info->proc~util_set_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: Active, Merged, Fragmented, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved)","tags":"","loc":"interface/util_set_particle_info.html"},{"title":"util_set_rhill – swiftest","text":"interface Calls interface~~util_set_rhill~~CallsGraph interface~util_set_rhill util_set_rhill proc~util_set_rhill util_set_rhill interface~util_set_rhill->proc~util_set_rhill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_rhill.html"},{"title":"util_set_rhill_approximate – swiftest","text":"interface Calls interface~~util_set_rhill_approximate~~CallsGraph interface~util_set_rhill_approximate util_set_rhill_approximate proc~util_set_rhill_approximate util_set_rhill_approximate interface~util_set_rhill_approximate->proc~util_set_rhill_approximate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_set_rhill_approximate(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"interface/util_set_rhill_approximate.html"},{"title":"util_solve_linear_system – swiftest","text":"public interface util_solve_linear_system Contents Functions util_solve_linear_system_d util_solve_linear_system_q Functions public function util_solve_linear_system_d(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) public function util_solve_linear_system_q(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n)","tags":"","loc":"interface/util_solve_linear_system.html"},{"title":"util_solve_rkf45 – swiftest","text":"interface Calls interface~~util_solve_rkf45~~CallsGraph interface~util_solve_rkf45 util_solve_rkf45 proc~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 interface~util_exit util_exit proc~util_solve_rkf45->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module function util_solve_rkf45(f, y0in, t1, dt0, tol) result(y1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:),allocatable Final result","tags":"","loc":"interface/util_solve_rkf45.html"},{"title":"util_sort – swiftest","text":"public interface util_sort Called by interface~~util_sort~~CalledByGraph interface~util_sort util_sort proc~netcdf_write_frame_base netcdf_write_frame_base proc~netcdf_write_frame_base->interface~util_sort proc~util_valid_id_system util_valid_id_system proc~util_valid_id_system->interface~util_sort proc~netcdf_write_particle_info_base netcdf_write_particle_info_base proc~netcdf_write_particle_info_base->interface~util_sort interface~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base->proc~netcdf_write_frame_base interface~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base->proc~netcdf_write_particle_info_base interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_sort_i4b util_sort_index_i4b util_sort_sp util_sort_index_sp util_sort_dp util_sort_index_dp Subroutines public subroutine util_sort_i4b(arr) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr public subroutine util_sort_index_i4b(arr, ind) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_sp(arr) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_sp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_dp(arr) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_dp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind","tags":"","loc":"interface/util_sort.html"},{"title":"util_sort_rearrange – swiftest","text":"public interface util_sort_rearrange Called by interface~~util_sort_rearrange~2~~CalledByGraph interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 proc~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl->interface~util_sort_rearrange~2 interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body proc~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp->interface~util_sort_rearrange~2 proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp interface~util_sort_rearrange_body->proc~util_sort_rearrange_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_sort_rearrange_arr_char_string util_sort_rearrange_arr_DP util_sort_rearrange_arr_DPvec util_sort_rearrange_arr_I4B util_sort_rearrange_arr_info util_sort_rearrange_arr_logical Subroutines public subroutine util_sort_rearrange_arr_char_string(arr, ind, n) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DP(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DPvec(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_I4B(arr, ind, n) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_info(arr, ind, n) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_logical(arr, ind, n) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange","tags":"","loc":"interface/util_sort_rearrange~2.html"},{"title":"util_sort_rearrange_body – swiftest","text":"interface Calls interface~~util_sort_rearrange_body~~CallsGraph interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_sort_rearrange_body~~CalledByGraph interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body proc~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_rearrange_body(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/util_sort_rearrange_body.html"},{"title":"util_sort_rearrange_pl – swiftest","text":"interface Calls interface~~util_sort_rearrange_pl~~CallsGraph interface~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_pl->interface~util_sort_rearrange~2 interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/util_sort_rearrange_pl.html"},{"title":"util_sort_rearrange_tp – swiftest","text":"interface Calls interface~~util_sort_rearrange_tp~~CallsGraph interface~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_tp->interface~util_sort_rearrange~2 interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"interface/util_sort_rearrange_tp.html"},{"title":"util_sort_body – swiftest","text":"interface Calls interface~~util_sort_body~~CallsGraph interface~util_sort_body util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_sort_body~~CalledByGraph interface~util_sort_body util_sort_body proc~util_sort_pl util_sort_pl proc~util_sort_pl->interface~util_sort_body proc~util_sort_tp util_sort_tp proc~util_sort_tp->interface~util_sort_body interface~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp interface~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_body(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/util_sort_body.html"},{"title":"util_sort_pl – swiftest","text":"interface Calls interface~~util_sort_pl~~CallsGraph interface~util_sort_pl util_sort_pl proc~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl interface~util_sort_body util_sort_body proc~util_sort_pl->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/util_sort_pl.html"},{"title":"util_sort_tp – swiftest","text":"interface Calls interface~~util_sort_tp~~CallsGraph interface~util_sort_tp util_sort_tp proc~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp interface~util_sort_body util_sort_body proc~util_sort_tp->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order","tags":"","loc":"interface/util_sort_tp.html"},{"title":"util_spill – swiftest","text":"public interface util_spill Called by interface~~util_spill~2~~CalledByGraph interface~util_spill~2 util_spill proc~util_spill_encounter util_spill_encounter proc~util_spill_encounter->interface~util_spill~2 proc~util_spill_body util_spill_body proc~util_spill_body->interface~util_spill~2 proc~util_spill_pl util_spill_pl proc~util_spill_pl->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_pl->interface~util_spill_body proc~util_spill_tp util_spill_tp proc~util_spill_tp->interface~util_spill~2 proc~util_spill_tp->interface~util_spill_body interface~util_spill_body->proc~util_spill_body interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl interface~util_spill_encounter util_spill_encounter interface~util_spill_encounter->proc~util_spill_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Subroutines util_spill_arr_char_string util_spill_arr_DP util_spill_arr_DPvec util_spill_arr_I4B util_spill_arr_I8B util_spill_arr_info util_spill_arr_logical Subroutines public subroutine util_spill_arr_char_string(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DP(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DPvec(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I4B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I8B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_info(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_logical(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill~2.html"},{"title":"util_spill_body – swiftest","text":"interface Calls interface~~util_spill_body~~CallsGraph interface~util_spill_body util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body interface~util_spill~2 util_spill proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_spill_body~~CalledByGraph interface~util_spill_body util_spill_body proc~util_spill_pl util_spill_pl proc~util_spill_pl->interface~util_spill_body proc~util_spill_tp util_spill_tp proc~util_spill_tp->interface~util_spill_body interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill_body.html"},{"title":"util_spill_encounter – swiftest","text":"interface Calls interface~~util_spill_encounter~~CallsGraph interface~util_spill_encounter util_spill_encounter proc~util_spill_encounter util_spill_encounter interface~util_spill_encounter->proc~util_spill_encounter interface~util_spill~2 util_spill proc~util_spill_encounter->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"interface/util_spill_encounter.html"},{"title":"util_spill_pl – swiftest","text":"interface Calls interface~~util_spill_pl~~CallsGraph interface~util_spill_pl util_spill_pl proc~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl interface~util_spill~2 util_spill proc~util_spill_pl->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_pl->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill_pl.html"},{"title":"util_spill_tp – swiftest","text":"interface Calls interface~~util_spill_tp~~CallsGraph interface~util_spill_tp util_spill_tp proc~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp interface~util_spill~2 util_spill proc~util_spill_tp->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_tp->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"interface/util_spill_tp.html"},{"title":"util_valid_id_system – swiftest","text":"interface Calls interface~~util_valid_id_system~~CallsGraph interface~util_valid_id_system util_valid_id_system proc~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system interface~util_exit util_exit proc~util_valid_id_system->interface~util_exit interface~util_sort util_sort proc~util_valid_id_system->interface~util_sort proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"interface/util_valid_id_system.html"},{"title":"util_version – swiftest","text":"interface Calls interface~~util_version~~CallsGraph interface~util_version util_version proc~util_version util_version interface~util_version->proc~util_version Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by interface~~util_version~~CalledByGraph interface~util_version util_version proc~io_get_args io_get_args proc~io_get_args->interface~util_version interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. public module subroutine util_version() Implementation → Arguments None","tags":"","loc":"interface/util_version.html"},{"title":"lambda_init_0 – swiftest","text":"public function lambda_init_0(lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) Called by proc~~lambda_init_0~~CalledByGraph proc~lambda_init_0 lambda_init_0 interface~lambda_obj~2 lambda_obj interface~lambda_obj~2->proc~lambda_init_0 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/lambda_init_0.html"},{"title":"lambda_init_0_err – swiftest","text":"public function lambda_init_0_err(lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) Called by proc~~lambda_init_0_err~~CalledByGraph proc~lambda_init_0_err lambda_init_0_err interface~lambda_obj~2 lambda_obj interface~lambda_obj~2->proc~lambda_init_0_err Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/lambda_init_0_err.html"},{"title":"lambda_init_tvar – swiftest","text":"public function lambda_init_tvar(lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) Called by proc~~lambda_init_tvar~~CalledByGraph proc~lambda_init_tvar lambda_init_tvar interface~lambda_obj~2 lambda_obj interface~lambda_obj~2->proc~lambda_init_tvar Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/lambda_init_tvar.html"},{"title":"lambda_eval_0 – swiftest","text":"public function lambda_eval_0(self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) Contents None","tags":"","loc":"proc/lambda_eval_0.html"},{"title":"lambda_eval_0_err – swiftest","text":"public function lambda_eval_0_err(self, x) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_err ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) Contents None","tags":"","loc":"proc/lambda_eval_0_err.html"},{"title":"lambda_eval_tvar – swiftest","text":"public function lambda_eval_tvar(self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( lambda_obj_tvar ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/lambda_eval_tvar.html"},{"title":"lambda_destroy – swiftest","text":"public subroutine lambda_destroy(self) Arguments Type Intent Optional Attributes Name type( lambda_obj ) :: self Contents None","tags":"","loc":"proc/lambda_destroy.html"},{"title":"lambda_obj – swiftest","text":"public interface lambda_obj Calls interface~~lambda_obj~2~~CallsGraph interface~lambda_obj~2 lambda_obj proc~lambda_init_0_err lambda_init_0_err interface~lambda_obj~2->proc~lambda_init_0_err proc~lambda_init_tvar lambda_init_tvar interface~lambda_obj~2->proc~lambda_init_tvar proc~lambda_init_0 lambda_init_0 interface~lambda_obj~2->proc~lambda_init_0 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Module Procedures lambda_init_0 lambda_init_0_err lambda_init_tvar Module Procedures public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar )","tags":"","loc":"interface/lambda_obj~2.html"},{"title":"fraggle_generate_pos_vec – swiftest","text":"subroutine fraggle_generate_pos_vec(frag, colliders, r_max_start) Initializes the orbits of the fragments around the center of mass. The fragments are initially placed on a plane defined by the \n pre-impact angular momentum. They are distributed on an ellipse surrounding the center of mass.\n The initial positions do not conserve energy or momentum, so these need to be adjusted later. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: r_max_start Initial guess for the starting maximum radial distance of fragments Calls proc~~fraggle_generate_pos_vec~~CallsGraph proc~fraggle_generate_pos_vec fraggle_generate_pos_vec interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_pos_vec~~CalledByGraph proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_pos_vec.html"},{"title":"fraggle_generate_spins – swiftest","text":"subroutine fraggle_generate_spins(frag, colliders, f_spin, lfailure) Calculates the spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: f_spin Fraction of energy or momentum that goes into spin (whichever gives the lowest kinetic energy) logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! Calls proc~~fraggle_generate_spins~~CallsGraph proc~fraggle_generate_spins fraggle_generate_spins interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_spins~~CalledByGraph proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_spins interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_spins.html"},{"title":"fraggle_generate_tan_vel – swiftest","text":"subroutine fraggle_generate_tan_vel(frag, colliders, lfailure) Adjusts the tangential velocities and spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget.\n This procedure works in several stages, with a goal to solve the angular and linear momentum constraints on the fragments, while still leaving a positive balance of\n our fragment kinetic energy (frag%ke_budget) that we can put into the radial velocity distribution. The first thing we'll try to do is solve for the tangential velocities of the first 6 fragments, using angular and linear momentum as constraints and an initial\n tangential velocity distribution for the remaining bodies (if there are any) that distributes their angular momentum equally between them.\n If that doesn't work and we blow our kinetic energy budget, we will attempt to find a tangential velocity distribution that minimizes the kinetic energy while\n conserving momentum. A failure will trigger a restructuring of the fragments so we will try new values of the radial position distribution. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds Calls proc~~fraggle_generate_tan_vel~~CallsGraph proc~fraggle_generate_tan_vel fraggle_generate_tan_vel interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb lambda_obj lambda_obj proc~fraggle_generate_tan_vel->lambda_obj interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_tan_vel->util_minimize_bfgs proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_tan_vel~~CalledByGraph proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_tan_vel.html"},{"title":"fraggle_generate_rad_vel – swiftest","text":"subroutine fraggle_generate_rad_vel(frag, colliders, lfailure) Adjust the fragment velocities to set the fragment orbital kinetic energy. This will minimize the difference between the fragment kinetic energy and the energy budget Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! Calls proc~~fraggle_generate_rad_vel~~CallsGraph proc~fraggle_generate_rad_vel fraggle_generate_rad_vel interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb lambda_obj lambda_obj proc~fraggle_generate_rad_vel->lambda_obj interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_rad_vel->util_minimize_bfgs proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_rad_vel~~CalledByGraph proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_rad_vel.html"},{"title":"fraggle_regime_collresolve – swiftest","text":"subroutine fraggle_regime_collresolve(Mcb, m1, m2, rad1, rad2, xh1, xh2, vb1, vb2, den1, den2, min_mfrag, regime, Mlr, Mslr, Qloss) Determine the collisional regime of two colliding bodies. \n Current version requires all values to be converted to SI units prior to calling the function\n       References:\n       Kokubo, E., Genda, H., 2010. Formation of Terrestrial Planets from Protoplanets Under a Realistic Accretion \n          Condition. ApJL 714, L21. https://doi.org/10.1088/2041-8205/714/1/L21\n       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling \n          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79\n       Mustill, A.J., Davies, M.B., Johansen, A., 2018. The dynamical evolution of transiting planetary systems including \n          a realistic collision prescription. Mon Not R Astron Soc 478, 2896–2908. https://doi.org/10.1093/mnras/sty1273\n       Rufu, R., Aharonson, O., 2019. Impact Dynamics of Moons Within a Planetary Potential. J. Geophys. Res. Planets 124, \n          1008–1019. https://doi.org/10.1029/2018JE005798\n       Stewart, S.T., Leinhardt, Z.M., 2012. Collisions between Gravity-dominated Bodies. II. The Diversity of Impact \n          Outcomes during the End Stage of Planet Formation. ApJ 751, 32. https://doi.org/10.1088/0004-637X/751/1/32 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: Mcb real(kind=DP), intent(in) :: m1 real(kind=DP), intent(in) :: m2 real(kind=DP), intent(in) :: rad1 real(kind=DP), intent(in) :: rad2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vb1 real(kind=DP), intent(in), dimension(:) :: vb2 real(kind=DP), intent(in) :: den1 real(kind=DP), intent(in) :: den2 real(kind=DP), intent(in) :: min_mfrag integer(kind=I4B), intent(out) :: regime real(kind=DP), intent(out) :: Mlr real(kind=DP), intent(out) :: Mslr real(kind=DP), intent(out) :: Qloss The residual energy after the collision Calls proc~~fraggle_regime_collresolve~~CallsGraph proc~fraggle_regime_collresolve fraggle_regime_collresolve interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_regime_collresolve->interface~fraggle_io_log_one_message proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_regime_collresolve.html"},{"title":"rmvs_interp_out – swiftest","text":"subroutine rmvs_interp_out(cb, pl, dt) Interpolate planet positions between two Keplerian orbits in outer encounter region Adapted from David E. Kaufmann's Swifter routine rmvs_interp_out.f90 Adapted from Hal Levison's Swift routine rmvs3_interp.f Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object real(kind=DP), intent(in) :: dt Step size Calls proc~~rmvs_interp_out~~CallsGraph proc~rmvs_interp_out rmvs_interp_out util_exit util_exit proc~rmvs_interp_out->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_interp_out~~CalledByGraph proc~rmvs_interp_out rmvs_interp_out proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_interp_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_interp_out.html"},{"title":"rmvs_step_out – swiftest","text":"subroutine rmvs_step_out(cb, pl, tp, system, param, t, dt) Step ACTIVE test particles ahead in the outer encounter region, setting up and calling the inner region\n    integration if necessar Adapted from Hal Levison's Swift routines rmvs3_step_out.f and rmvs3_step_out2.f\n Adapted from David E. Kaufmann's Swifter routines rmvs_step_out.f90 and rmvs_step_out2.f90 Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz Calls proc~~rmvs_step_out~~CallsGraph proc~rmvs_step_out rmvs_step_out proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out->proc~rmvs_interp_in proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out->proc~rmvs_step_in util_exit util_exit proc~rmvs_interp_in->util_exit proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric vpc vpc proc~rmvs_peri_tp->vpc xpc xpc proc~rmvs_peri_tp->xpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_step_out~~CalledByGraph proc~rmvs_step_out rmvs_step_out proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_step_out.html"},{"title":"rmvs_interp_in – swiftest","text":"subroutine rmvs_interp_in(cb, pl, system, param, dt, outer_index) Interpolate planet positions between two Keplerian orbits in inner encounter regio Adapted from David E. Kaufmann's Swifter routine rmvs_interp_in.f90 Adapted from Hal Levison's Swift routine rmvs3_interp.f Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS cenral body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(in) :: param Swiftest parameters file real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(in) :: outer_index Outer substep number within current set Calls proc~~rmvs_interp_in~~CallsGraph proc~rmvs_interp_in rmvs_interp_in util_exit util_exit proc~rmvs_interp_in->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_interp_in~~CalledByGraph proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_interp_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_interp_in.html"},{"title":"rmvs_step_in – swiftest","text":"subroutine rmvs_step_in(cb, pl, tp, param, outer_time, dto) Step active test particles ahead in the inner encounter region Adapted from Hal Levison's Swift routine rmvs3_step_in.f\n Adapted from David E. Kaufmann's Swifter routine rmvs_step_in.f90 Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: outer_time Current time real(kind=DP), intent(in) :: dto Outer step size Calls proc~~rmvs_step_in~~CallsGraph proc~rmvs_step_in rmvs_step_in proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric vpc vpc proc~rmvs_peri_tp->vpc xpc xpc proc~rmvs_peri_tp->xpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_step_in~~CalledByGraph proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_step_in.html"},{"title":"rmvs_make_planetocentric – swiftest","text":"subroutine rmvs_make_planetocentric(param, cb, pl, tp) When encounters are detected, this method will call the interpolation methods for the planets and \n creates a Swiftest test particle structure for each planet's encountering test particles to simplify the \n planetocentric calculations. This subroutine is not based on an existing one from Swift and Swifter Arguments Type Intent Optional Attributes Name class(swiftest_parameters), intent(in) :: param Current run configuration paramete class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object Called by proc~~rmvs_make_planetocentric~~CalledByGraph proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in rmvs_step_in proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_make_planetocentric.html"},{"title":"rmvs_peri_tp – swiftest","text":"subroutine rmvs_peri_tp(tp, pl, t, dt, lfirst, inner_index, ipleP, param) Determine planetocentric pericenter passages for test particles in close encounters with a planet Adapted from Hal Levison's Swift routine Adapted from Hal Levison's Swift routine util_peri.f\n Adapted from David E. Kaufmann's Swifter routine rmvs_peri.f90 Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: tp RMVS test particle object (planetocentric) class( rmvs_pl ), intent(inout) :: pl RMVS massive body object (heliocentric) real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size logical, intent(in) :: lfirst Logical flag indicating whether current invocation is the first integer(kind=I4B), intent(in) :: inner_index Outer substep number within current set integer(kind=I4B), intent(in) :: ipleP index of RMVS planet being closely encountered class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~rmvs_peri_tp~~CallsGraph proc~rmvs_peri_tp rmvs_peri_tp vpc vpc proc~rmvs_peri_tp->vpc xpc xpc proc~rmvs_peri_tp->xpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_peri_tp~~CalledByGraph proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in rmvs_step_in proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_peri_tp.html"},{"title":"rmvs_end_planetocentric – swiftest","text":"subroutine rmvs_end_planetocentric(pl, tp) Deallocates all of the encountering particle data structures for next time Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle objec Called by proc~~rmvs_end_planetocentric~~CalledByGraph proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in rmvs_step_in proc~rmvs_step_in->proc~rmvs_end_planetocentric proc~rmvs_step_out rmvs_step_out proc~rmvs_step_out->proc~rmvs_step_in proc~rmvs_step_system rmvs_step_system proc~rmvs_step_system->proc~rmvs_step_out interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_end_planetocentric.html"},{"title":"kick_getacch_int_pl – swiftest","text":"module subroutine kick_getacch_int_pl(self) Interface → Compute direct cross (third) term heliocentric accelerations of massive bodies Adapted from Hal Levison's Swift routine getacch_ah3.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f90 Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object Calls proc~~kick_getacch_int_pl~~CallsGraph proc~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_all_pl kick_getacch_int_all_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~kick_getacch_int_pl~~CalledByGraph proc~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_pl.html"},{"title":"kick_getacch_int_tp – swiftest","text":"module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Interface → Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies Adapted from Hal Levison's Swift routine getacch_ah3_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies Calls proc~~kick_getacch_int_tp~~CallsGraph proc~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_all_tp kick_getacch_int_all_tp proc~kick_getacch_int_tp->interface~kick_getacch_int_all_tp proc~kick_getacch_int_all_tp kick_getacch_int_all_tp interface~kick_getacch_int_all_tp->proc~kick_getacch_int_all_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~kick_getacch_int_tp~~CalledByGraph proc~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp->proc~kick_getacch_int_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_tp.html"},{"title":"kick_getacch_int_all_pl – swiftest","text":"module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc) Interface → Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization Adapted from Hal Levison's Swift routine getacch_ah3.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array Called by proc~~kick_getacch_int_all_pl~~CalledByGraph proc~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl kick_getacch_int_all_pl interface~kick_getacch_int_all_pl->proc~kick_getacch_int_all_pl proc~kick_getacch_int_pl kick_getacch_int_pl proc~kick_getacch_int_pl->interface~kick_getacch_int_all_pl interface~kick_getacch_int_pl kick_getacch_int_pl interface~kick_getacch_int_pl->proc~kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_all_pl.html"},{"title":"kick_getacch_int_all_tp – swiftest","text":"module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc) Interface → Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies with parallelisim Adapted from Hal Levison's Swift routine getacch_ah3_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f99 Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: ntp Number of test particles integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in), dimension(:,:) :: xtp Test particle position vector array real(kind=DP), intent(in), dimension(:,:) :: xpl Massive body particle position vector array real(kind=DP), intent(in), dimension(:) :: GMpl Array of massive body G*mass logical, intent(in), dimension(:) :: lmask Logical mask indicating which test particles should be computed real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array Called by proc~~kick_getacch_int_all_tp~~CalledByGraph proc~kick_getacch_int_all_tp kick_getacch_int_all_tp interface~kick_getacch_int_all_tp kick_getacch_int_all_tp interface~kick_getacch_int_all_tp->proc~kick_getacch_int_all_tp proc~kick_getacch_int_tp kick_getacch_int_tp proc~kick_getacch_int_tp->interface~kick_getacch_int_all_tp interface~kick_getacch_int_tp kick_getacch_int_tp interface~kick_getacch_int_tp->proc~kick_getacch_int_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_all_tp.html"},{"title":"kick_getacch_int_one_pl – swiftest","text":"pure module subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Interface → Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies Adapted from Hal Levison's Swift routine getacch_ah3.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int.f9 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j Called by proc~~kick_getacch_int_one_pl~~CalledByGraph proc~kick_getacch_int_one_pl kick_getacch_int_one_pl interface~kick_getacch_int_one_pl kick_getacch_int_one_pl interface~kick_getacch_int_one_pl->proc~kick_getacch_int_one_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_one_pl.html"},{"title":"kick_getacch_int_one_tp – swiftest","text":"pure module subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, az) Interface → Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair. Adapted from Hal Levison's Swift routine getacch_ah3_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_ah3.f90 and helio_kick_getacch_int_tp.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle Called by proc~~kick_getacch_int_one_tp~~CalledByGraph proc~kick_getacch_int_one_tp kick_getacch_int_one_tp interface~kick_getacch_int_one_tp kick_getacch_int_one_tp interface~kick_getacch_int_one_tp->proc~kick_getacch_int_one_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/kick_getacch_int_one_tp.html"},{"title":"tides_kick_getacch_pl – swiftest","text":"module subroutine tides_kick_getacch_pl(self, system) Interface → Calculated tidal torques from central body to any planet and from any planet to central body\n planet - planet interactions are considered negligable.\n This is a constant time lag model. Adapted from Mercury-T code from Bolmont et al. (2015) Reference:\n    Bolmont, E., Raymond, S.N., Leconte, J., Hersant, F., Correia, A.C.M., 2015. \n       Mercury-T : A new code to study tidally evolving multi-planet systems. \n       Applications to Kepler-62. A&A 583, A116. https://doi.org/10.1051/0004-6361/201525909 Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Called by proc~~tides_kick_getacch_pl~~CalledByGraph proc~tides_kick_getacch_pl tides_kick_getacch_pl interface~tides_kick_getacch_pl tides_kick_getacch_pl interface~tides_kick_getacch_pl->proc~tides_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/tides_kick_getacch_pl.html"},{"title":"tides_step_spin_system – swiftest","text":"module subroutine tides_step_spin_system(self, param, t, dt) Interface → Integrates the spin equations for central and massive bodies of the system subjected to tides. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~tides_step_spin_system~~CalledByGraph proc~tides_step_spin_system tides_step_spin_system interface~tides_step_spin_system tides_step_spin_system interface~tides_step_spin_system->proc~tides_step_spin_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/tides_step_spin_system.html"},{"title":"obl_acc_body – swiftest","text":"module subroutine obl_acc_body(self, system) Interface → Compute the barycentric accelerations of bodies due to the oblateness of the central body\n      Returned values do not include monopole term or terms higher than J4 Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90\n Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Called by proc~~obl_acc_body~~CalledByGraph proc~obl_acc_body obl_acc_body interface~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body proc~obl_acc_pl obl_acc_pl proc~obl_acc_pl->interface~obl_acc_body proc~obl_acc_tp obl_acc_tp proc~obl_acc_tp->interface~obl_acc_body interface~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp interface~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_acc_body.html"},{"title":"obl_acc_pl – swiftest","text":"module subroutine obl_acc_pl(self, system) Interface → Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90\n Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Calls proc~~obl_acc_pl~~CallsGraph proc~obl_acc_pl obl_acc_pl interface~obl_acc_body obl_acc_body proc~obl_acc_pl->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~obl_acc_pl~~CalledByGraph proc~obl_acc_pl obl_acc_pl interface~obl_acc_pl obl_acc_pl interface~obl_acc_pl->proc~obl_acc_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_acc_pl.html"},{"title":"obl_acc_tp – swiftest","text":"module subroutine obl_acc_tp(self, system) Interface → Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Adapted from David E. Kaufmann's Swifter routine: obl_acc.f90 and obl_acc_tp.f90\n Adapted from Hal Levison's Swift routine obl_acc.f and obl_acc_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object Calls proc~~obl_acc_tp~~CallsGraph proc~obl_acc_tp obl_acc_tp interface~obl_acc_body obl_acc_body proc~obl_acc_tp->interface~obl_acc_body proc~obl_acc_body obl_acc_body interface~obl_acc_body->proc~obl_acc_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~obl_acc_tp~~CalledByGraph proc~obl_acc_tp obl_acc_tp interface~obl_acc_tp obl_acc_tp interface~obl_acc_tp->proc~obl_acc_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_acc_tp.html"},{"title":"obl_pot_system – swiftest","text":"module subroutine obl_pot_system(self) Interface → Compute the contribution to the total gravitational potential due solely to the oblateness of the central body\n    Returned value does not include monopole term or terms higher than J4 Reference : MacMillan , W . D . 1958 . The Theory of the Potential , ( Dover Publications ), 363 . Adapted from David E. Kaufmann's Swifter routine: obl_pot.f90 \n Adapted from Hal Levison's Swift routine obl_pot.f Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object Calls proc~~obl_pot_system~~CallsGraph proc~obl_pot_system obl_pot_system proc~obl_pot_one obl_pot_one proc~obl_pot_system->proc~obl_pot_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~obl_pot_system~~CalledByGraph proc~obl_pot_system obl_pot_system interface~obl_pot_system obl_pot_system interface~obl_pot_system->proc~obl_pot_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/obl_pot_system.html"},{"title":"orbel_el2xv_vec – swiftest","text":"module subroutine orbel_el2xv_vec(self, cb) Interface → A wrapper method that converts all of the orbital element vectors into cartesian position and velocity vectors for a Swiftest body object.\n This method deallocates all of the orbital elements after it is finished. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body objec Calls proc~~orbel_el2xv_vec~~CallsGraph proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv_vec->proc~orbel_el2xv proc~orbel_zget orbel_zget proc~orbel_el2xv->proc~orbel_zget proc~orbel_fhybrid orbel_fhybrid proc~orbel_el2xv->proc~orbel_fhybrid proc~orbel_schget orbel_schget proc~orbel_el2xv->proc~orbel_schget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid interface~orbel_scget orbel_scget proc~orbel_el2xv->interface~orbel_scget proc~orbel_flon orbel_flon proc~orbel_fhybrid->proc~orbel_flon proc~orbel_fget orbel_fget proc~orbel_fhybrid->proc~orbel_fget proc~orbel_eget orbel_eget proc~orbel_ehybrid->proc~orbel_eget proc~orbel_esolmd orbel_esolmd proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehie orbel_ehie proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget 3 3 proc~orbel_flon->3 proc~orbel_eget->interface~orbel_scget proc~orbel_esolmd->interface~orbel_scget proc~orbel_fget->proc~orbel_schget proc~orbel_ehie->interface~orbel_scget Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_el2xv_vec~~CalledByGraph proc~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_el2xv_vec.html"},{"title":"orbel_scget – swiftest","text":"pure module subroutine orbel_scget(angle, sx, cx) Interface → Efficiently compute the sine and cosine of an input angle\n      Input angle must be in radians Adapted from David E. Kaufmann's Swifter routine: orbel_scget.f90\n Adapted from Hal Levison's Swift routine orbel_scget.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx Called by proc~~orbel_scget~~CalledByGraph proc~orbel_scget orbel_scget interface~orbel_scget orbel_scget interface~orbel_scget->proc~orbel_scget proc~drift_kepu_guess drift_kepu_guess proc~drift_kepu_guess->interface~orbel_scget proc~orbel_eget orbel_eget proc~orbel_eget->interface~orbel_scget proc~orbel_esolmd orbel_esolmd proc~orbel_esolmd->interface~orbel_scget proc~orbel_el2xv orbel_el2xv proc~orbel_el2xv->interface~orbel_scget proc~orbel_ehybrid orbel_ehybrid proc~orbel_el2xv->proc~orbel_ehybrid proc~orbel_ehie orbel_ehie proc~orbel_ehie->interface~orbel_scget proc~drift_kepu drift_kepu proc~drift_kepu->proc~drift_kepu_guess proc~orbel_ehybrid->proc~orbel_eget proc~orbel_ehybrid->proc~orbel_esolmd proc~orbel_ehybrid->proc~orbel_ehie proc~orbel_el2xv_vec orbel_el2xv_vec proc~orbel_el2xv_vec->proc~orbel_el2xv interface~orbel_el2xv_vec orbel_el2xv_vec interface~orbel_el2xv_vec->proc~orbel_el2xv_vec proc~drift_dan drift_dan proc~drift_dan->proc~drift_kepu Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_scget.html"},{"title":"orbel_xv2aeq – swiftest","text":"pure module subroutine orbel_xv2aeq(mu, x, v, a, e, q) Interface → Compute semimajor axis, eccentricity, and pericentric distance from relative Cartesian position and velocity Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aeq.f90\n Adapted from Luke Dones' Swift routine orbel_xv2aeq.f\n Arguments Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in), dimension(:) :: v real(kind=DP), intent(out) :: a real(kind=DP), intent(out) :: e real(kind=DP), intent(out) :: q Called by proc~~orbel_xv2aeq~~CalledByGraph proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq proc~util_peri_tp util_peri_tp proc~util_peri_tp->interface~orbel_xv2aeq interface~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2aeq.html"},{"title":"orbel_xv2aqt – swiftest","text":"pure module subroutine orbel_xv2aqt(mu, x, v, a, q, capm, tperi) Interface → Compute semimajor axis, pericentric distance, mean anomaly, and time to nearest pericenter passage from\n relative Cartesian position and velocity\n      tperi > 0 means nearest pericenter passage is in the future\n      tperi < 0 means nearest pericenter passage is in the past Adapted from David E. Kaufmann's Swifter routine: orbel_xv2aqt.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage Called by proc~~orbel_xv2aqt~~CalledByGraph proc~orbel_xv2aqt orbel_xv2aqt interface~orbel_xv2aqt orbel_xv2aqt interface~orbel_xv2aqt->proc~orbel_xv2aqt Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2aqt.html"},{"title":"orbel_xv2el_vec – swiftest","text":"module subroutine orbel_xv2el_vec(self, cb) Interface → A wrapper method that converts all of the cartesian position and velocity vectors of a Swiftest body object to orbital elements. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Calls proc~~orbel_xv2el_vec~~CallsGraph proc~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el orbel_xv2el proc~orbel_xv2el_vec->interface~orbel_xv2el proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~orbel_xv2el_vec~~CalledByGraph proc~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2el_vec.html"},{"title":"orbel_xv2el – swiftest","text":"pure module subroutine orbel_xv2el(mu, x, v, a, e, inc, capom, omega, capm) Interface → Compute osculating orbital elements from relative Cartesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 If eccentricity < sqrt ( TINY ), argument of pericenter is arbitrarily set to 0 References : Danby , J . M . A . 1988 . Fundamentals of Celestial Mechanics , ( Willmann - Bell , Inc .), 201 - 206 . Fitzpatrick , P . M . 1970 . Principles of Celestial Mechanics , ( Academic Press ), 69 - 73 . Roy , A . E . 1982 . Orbital Motion , ( Adam Hilger , Ltd .), 75 - 95 Adapted from David E. Kaufmann's Swifter routine: orbel_xv2el.f90\n Adapted from Martin Duncan's Swift routine orbel_xv2el.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly Called by proc~~orbel_xv2el~~CalledByGraph proc~orbel_xv2el orbel_xv2el interface~orbel_xv2el orbel_xv2el interface~orbel_xv2el->proc~orbel_xv2el proc~orbel_xv2el_vec orbel_xv2el_vec proc~orbel_xv2el_vec->interface~orbel_xv2el interface~orbel_xv2el_vec orbel_xv2el_vec interface~orbel_xv2el_vec->proc~orbel_xv2el_vec Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/orbel_xv2el.html"},{"title":"whm_coord_h2j_pl – swiftest","text":"module subroutine whm_coord_h2j_pl(self, cb) Interface → Convert from heliocentric to Jacobi coordinates, massive bodies only Uses pre-computed eta rather than computing it each time Adapted from David E. Kaufmann's Swifter routine coord_h2j.f90 Adapted from Hal Levison's Swift routine coord_h2j.f Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree Calls proc~~whm_coord_h2j_pl~~CallsGraph proc~whm_coord_h2j_pl whm_coord_h2j_pl vh vh proc~whm_coord_h2j_pl->vh xj xj proc~whm_coord_h2j_pl->xj eta eta proc~whm_coord_h2j_pl->eta xh xh proc~whm_coord_h2j_pl->xh vj vj proc~whm_coord_h2j_pl->vj gmpl gmpl proc~whm_coord_h2j_pl->gmpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_coord_h2j_pl~~CalledByGraph proc~whm_coord_h2j_pl whm_coord_h2j_pl interface~whm_coord_h2j_pl whm_coord_h2j_pl interface~whm_coord_h2j_pl->proc~whm_coord_h2j_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_coord_h2j_pl.html"},{"title":"whm_coord_j2h_pl – swiftest","text":"module subroutine whm_coord_j2h_pl(self, cb) Interface → Convert from Jacobi to heliocentric coordinates, massive bodies only. Uses pre-computed eta rather than computing it each time Adapted from David E. Kaufmann's Swifter routine coord_j2h.f90 Adapted from Hal Levison's Swift routine coord_j2h.f Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree Calls proc~~whm_coord_j2h_pl~~CallsGraph proc~whm_coord_j2h_pl whm_coord_j2h_pl vh vh proc~whm_coord_j2h_pl->vh xj xj proc~whm_coord_j2h_pl->xj eta eta proc~whm_coord_j2h_pl->eta xh xh proc~whm_coord_j2h_pl->xh vj vj proc~whm_coord_j2h_pl->vj gmpl gmpl proc~whm_coord_j2h_pl->gmpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_coord_j2h_pl~~CalledByGraph proc~whm_coord_j2h_pl whm_coord_j2h_pl interface~whm_coord_j2h_pl whm_coord_j2h_pl interface~whm_coord_j2h_pl->proc~whm_coord_j2h_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_coord_j2h_pl.html"},{"title":"whm_coord_vh2vj_pl – swiftest","text":"module subroutine whm_coord_vh2vj_pl(self, cb) Interface → Convert from heliocentric to Jadcobi coordinates, massive body velocities only Uses pre-computed eta rather than computing it each time Adapted from David E. Kaufmann's Swifter routine coord_vh2vj.f90 Adapted from Hal Levison's Swift routine coord_vh2vj.f Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree Calls proc~~whm_coord_vh2vj_pl~~CallsGraph proc~whm_coord_vh2vj_pl whm_coord_vh2vj_pl vj vj proc~whm_coord_vh2vj_pl->vj vh vh proc~whm_coord_vh2vj_pl->vh gmpl gmpl proc~whm_coord_vh2vj_pl->gmpl eta eta proc~whm_coord_vh2vj_pl->eta Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_coord_vh2vj_pl~~CalledByGraph proc~whm_coord_vh2vj_pl whm_coord_vh2vj_pl interface~whm_coord_vh2vj_pl whm_coord_vh2vj_pl interface~whm_coord_vh2vj_pl->proc~whm_coord_vh2vj_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_coord_vh2vj_pl.html"},{"title":"whm_gr_kick_getacch_pl – swiftest","text":"pure module subroutine whm_gr_kick_getacch_pl(self, param) Interface → Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~whm_gr_kick_getacch_pl~~CallsGraph proc~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_kick_getacch_pl~~CalledByGraph proc~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl interface~whm_gr_kick_getacch_pl whm_gr_kick_getacch_pl interface~whm_gr_kick_getacch_pl->proc~whm_gr_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_kick_getacch_pl.html"},{"title":"whm_gr_kick_getacch_tp – swiftest","text":"pure module subroutine whm_gr_kick_getacch_tp(self, param) Interface → Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~whm_gr_kick_getacch_tp~~CallsGraph proc~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~whm_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_kick_getacch_tp~~CalledByGraph proc~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp interface~whm_gr_kick_getacch_tp whm_gr_kick_getacch_tp interface~whm_gr_kick_getacch_tp->proc~whm_gr_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_kick_getacch_tp.html"},{"title":"whm_gr_p4_pl – swiftest","text":"pure module subroutine whm_gr_p4_pl(self, param, dt) Interface → Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~whm_gr_p4_pl~~CallsGraph proc~whm_gr_p4_pl whm_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_p4_pl~~CalledByGraph proc~whm_gr_p4_pl whm_gr_p4_pl interface~whm_gr_p4_pl whm_gr_p4_pl interface~whm_gr_p4_pl->proc~whm_gr_p4_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_p4_pl.html"},{"title":"whm_gr_p4_tp – swiftest","text":"pure module subroutine whm_gr_p4_tp(self, param, dt) Interface → Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_p4.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~whm_gr_p4_tp~~CallsGraph proc~whm_gr_p4_tp whm_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~whm_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_gr_p4_tp~~CalledByGraph proc~whm_gr_p4_tp whm_gr_p4_tp interface~whm_gr_p4_tp whm_gr_p4_tp interface~whm_gr_p4_tp->proc~whm_gr_p4_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_gr_p4_tp.html"},{"title":"whm_step_system – swiftest","text":"module subroutine whm_step_system(self, param, t, dt) Interface → Step massive bodies and and active test particles ahead in heliocentric coordinates Adapted from Hal Levison's Swift routine step_kdk.f\n Adapted from David E. Kaufmann's Swifter routine whm_step.f90 Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~whm_step_system~~CalledByGraph proc~whm_step_system whm_step_system interface~whm_step_system whm_step_system interface~whm_step_system->proc~whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_step_system.html"},{"title":"whm_step_pl – swiftest","text":"module subroutine whm_step_pl(self, system, param, t, dt) Interface → Step planets ahead using kick-drift-kick algorithm Adapted from Hal Levison's Swift routine step_kdk_pl.f\n Adapted from David E. Kaufmann's Swifter routine whm_step_pl.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~whm_step_pl~~CalledByGraph proc~whm_step_pl whm_step_pl interface~whm_step_pl whm_step_pl interface~whm_step_pl->proc~whm_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_step_pl.html"},{"title":"whm_step_tp – swiftest","text":"module subroutine whm_step_tp(self, system, param, t, dt) Interface → Step active test particles ahead using kick-drift-kick algorithm Adapted from Hal Levison's Swift routine step_kdk_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_step_tp.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~whm_step_tp~~CalledByGraph proc~whm_step_tp whm_step_tp interface~whm_step_tp whm_step_tp interface~whm_step_tp->proc~whm_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_step_tp.html"},{"title":"whm_drift_pl – swiftest","text":"module subroutine whm_drift_pl(self, system, param, dt) Interface → Loop through planets and call Danby drift routine Adapted from Hal Levison's Swift routine drift.f\n Adapted from David E. Kaufmann's Swifter routine whm_drift.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~whm_drift_pl~~CallsGraph proc~whm_drift_pl whm_drift_pl util_exit util_exit proc~whm_drift_pl->util_exit drift_all drift_all proc~whm_drift_pl->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_drift_pl~~CalledByGraph proc~whm_drift_pl whm_drift_pl interface~whm_drift_pl whm_drift_pl interface~whm_drift_pl->proc~whm_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_drift_pl.html"},{"title":"whm_kick_getacch_pl – swiftest","text":"module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of planets Adapted from Hal Levison's Swift routine getacch.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~whm_kick_getacch_pl~~CallsGraph proc~whm_kick_getacch_pl whm_kick_getacch_pl proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah0 proc~whm_kick_getacch_ah1 whm_kick_getacch_ah1 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah1 proc~whm_kick_getacch_ah2 whm_kick_getacch_ah2 proc~whm_kick_getacch_pl->proc~whm_kick_getacch_ah2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_kick_getacch_pl~~CalledByGraph proc~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl whm_kick_getacch_pl interface~whm_kick_getacch_pl->proc~whm_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_pl.html"},{"title":"whm_kick_getacch_tp – swiftest","text":"module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of test particles Adapted from Hal Levison's Swift routine getacch_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kick_getacch_tp.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~whm_kick_getacch_tp~~CallsGraph proc~whm_kick_getacch_tp whm_kick_getacch_tp proc~whm_kick_getacch_ah0 whm_kick_getacch_ah0 proc~whm_kick_getacch_tp->proc~whm_kick_getacch_ah0 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_kick_getacch_tp~~CalledByGraph proc~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp whm_kick_getacch_tp interface~whm_kick_getacch_tp->proc~whm_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_getacch_tp.html"},{"title":"whm_kick_vh_pl – swiftest","text":"module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Interface → Kick heliocentric velocities of massive bodies Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f \n Adapted from David E. Kaufmann's Swifter routine whm_kickvh.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~whm_kick_vh_pl~~CalledByGraph proc~whm_kick_vh_pl whm_kick_vh_pl interface~whm_kick_vh_pl whm_kick_vh_pl interface~whm_kick_vh_pl->proc~whm_kick_vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_vh_pl.html"},{"title":"whm_kick_vh_tp – swiftest","text":"module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Interface → Kick heliocentric velocities of test particles Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f\n Adapted from David E. Kaufmann's Swifter routine whm_kickvh_tp.f90 Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~whm_kick_vh_tp~~CalledByGraph proc~whm_kick_vh_tp whm_kick_vh_tp interface~whm_kick_vh_tp whm_kick_vh_tp interface~whm_kick_vh_tp->proc~whm_kick_vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_kick_vh_tp.html"},{"title":"whm_setup_pl – swiftest","text":"module subroutine whm_setup_pl(self, n, param) Interface → Allocate WHM planet structure Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90\n Call allocation method for parent class Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter Calls proc~~whm_setup_pl~~CallsGraph proc~whm_setup_pl whm_setup_pl setup_pl setup_pl proc~whm_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_setup_pl~~CalledByGraph proc~whm_setup_pl whm_setup_pl interface~whm_setup_pl whm_setup_pl interface~whm_setup_pl->proc~whm_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_setup_pl.html"},{"title":"whm_util_set_mu_eta_pl – swiftest","text":"module subroutine whm_util_set_mu_eta_pl(self, cb) Interface → Sets the Jacobi mass value eta for all massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM system object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Calls proc~~whm_util_set_mu_eta_pl~~CallsGraph proc~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl util_set_mu_pl util_set_mu_pl proc~whm_util_set_mu_eta_pl->util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_set_mu_eta_pl~~CalledByGraph proc~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl interface~whm_util_set_mu_eta_pl whm_util_set_mu_eta_pl interface~whm_util_set_mu_eta_pl->proc~whm_util_set_mu_eta_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_set_mu_eta_pl.html"},{"title":"whm_setup_initialize_system – swiftest","text":"module subroutine whm_setup_initialize_system(self, param) Interface → Initialize a WHM nbody system from files Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~whm_setup_initialize_system~~CallsGraph proc~whm_setup_initialize_system whm_setup_initialize_system util_set_ir3h util_set_ir3h proc~whm_setup_initialize_system->util_set_ir3h setup_initialize_system setup_initialize_system proc~whm_setup_initialize_system->setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_setup_initialize_system~~CalledByGraph proc~whm_setup_initialize_system whm_setup_initialize_system interface~whm_setup_initialize_system whm_setup_initialize_system interface~whm_setup_initialize_system->proc~whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_setup_initialize_system.html"},{"title":"whm_util_append_pl – swiftest","text":"module subroutine whm_util_append_pl(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~whm_util_append_pl~~CallsGraph proc~whm_util_append_pl whm_util_append_pl util_exit util_exit proc~whm_util_append_pl->util_exit util_append_pl util_append_pl proc~whm_util_append_pl->util_append_pl util_append util_append proc~whm_util_append_pl->util_append Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_append_pl~~CalledByGraph proc~whm_util_append_pl whm_util_append_pl interface~whm_util_append_pl whm_util_append_pl interface~whm_util_append_pl->proc~whm_util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_append_pl.html"},{"title":"whm_util_fill_pl – swiftest","text":"module subroutine whm_util_fill_pl(self, inserts, lfill_list) Interface → Insert new WHM test particle structure into an old one. \n This is the inverse of a fill operation. Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~whm_util_fill_pl~~CallsGraph proc~whm_util_fill_pl whm_util_fill_pl util_exit util_exit proc~whm_util_fill_pl->util_exit util_fill util_fill proc~whm_util_fill_pl->util_fill util_fill_pl util_fill_pl proc~whm_util_fill_pl->util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_fill_pl~~CalledByGraph proc~whm_util_fill_pl whm_util_fill_pl interface~whm_util_fill_pl whm_util_fill_pl interface~whm_util_fill_pl->proc~whm_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_fill_pl.html"},{"title":"whm_util_resize_pl – swiftest","text":"module subroutine whm_util_resize_pl(self, nnew) Interface → Checks the current size of a massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~whm_util_resize_pl~~CallsGraph proc~whm_util_resize_pl whm_util_resize_pl util_resize_pl util_resize_pl proc~whm_util_resize_pl->util_resize_pl util_resize util_resize proc~whm_util_resize_pl->util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_resize_pl~~CalledByGraph proc~whm_util_resize_pl whm_util_resize_pl interface~whm_util_resize_pl whm_util_resize_pl interface~whm_util_resize_pl->proc~whm_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_resize_pl.html"},{"title":"whm_util_set_ir3j – swiftest","text":"module subroutine whm_util_set_ir3j(self) Interface → Sets the inverse Jacobi and heliocentric radii cubed (1/rj 3 and 1/rh 3) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object Called by proc~~whm_util_set_ir3j~~CalledByGraph proc~whm_util_set_ir3j whm_util_set_ir3j interface~whm_util_set_ir3j whm_util_set_ir3j interface~whm_util_set_ir3j->proc~whm_util_set_ir3j Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_set_ir3j.html"},{"title":"whm_util_sort_pl – swiftest","text":"module subroutine whm_util_sort_pl(self, sortby, ascending) Interface → Sort a WHM massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~whm_util_sort_pl~~CallsGraph proc~whm_util_sort_pl whm_util_sort_pl util_sort_pl util_sort_pl proc~whm_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_sort_pl~~CalledByGraph proc~whm_util_sort_pl whm_util_sort_pl interface~whm_util_sort_pl whm_util_sort_pl interface~whm_util_sort_pl->proc~whm_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_sort_pl.html"},{"title":"whm_util_sort_rearrange_pl – swiftest","text":"module subroutine whm_util_sort_rearrange_pl(self, ind) Interface → Rearrange WHM massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~whm_util_sort_rearrange_pl~~CallsGraph proc~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~whm_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~whm_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_sort_rearrange_pl~~CalledByGraph proc~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl interface~whm_util_sort_rearrange_pl whm_util_sort_rearrange_pl interface~whm_util_sort_rearrange_pl->proc~whm_util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_sort_rearrange_pl.html"},{"title":"whm_util_spill_pl – swiftest","text":"module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) WHM test particle structure from active list to discard list Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~whm_util_spill_pl~~CallsGraph proc~whm_util_spill_pl whm_util_spill_pl util_exit util_exit proc~whm_util_spill_pl->util_exit util_spill util_spill proc~whm_util_spill_pl->util_spill util_spill_pl util_spill_pl proc~whm_util_spill_pl->util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~whm_util_spill_pl~~CalledByGraph proc~whm_util_spill_pl whm_util_spill_pl interface~whm_util_spill_pl whm_util_spill_pl interface~whm_util_spill_pl->proc~whm_util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/whm_util_spill_pl.html"},{"title":"operator_cross_sp – swiftest","text":"pure function operator_cross_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_sp.html"},{"title":"operator_cross_dp – swiftest","text":"pure function operator_cross_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_dp.html"},{"title":"operator_cross_qp – swiftest","text":"pure function operator_cross_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_qp.html"},{"title":"operator_cross_i1b – swiftest","text":"pure function operator_cross_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i1b.html"},{"title":"operator_cross_i2b – swiftest","text":"pure function operator_cross_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i2b.html"},{"title":"operator_cross_i4b – swiftest","text":"pure function operator_cross_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i4b.html"},{"title":"operator_cross_i8b – swiftest","text":"pure function operator_cross_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) Contents None","tags":"","loc":"proc/operator_cross_i8b.html"},{"title":"operator_cross_el_sp – swiftest","text":"pure function operator_cross_el_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_sp.html"},{"title":"operator_cross_el_dp – swiftest","text":"pure function operator_cross_el_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_dp.html"},{"title":"operator_cross_el_qp – swiftest","text":"pure function operator_cross_el_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_qp.html"},{"title":"operator_cross_el_i1b – swiftest","text":"pure function operator_cross_el_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i1b.html"},{"title":"operator_cross_el_i2b – swiftest","text":"pure function operator_cross_el_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i2b.html"},{"title":"operator_cross_el_i4b – swiftest","text":"pure function operator_cross_el_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i4b.html"},{"title":"operator_cross_el_i8b – swiftest","text":"pure function operator_cross_el_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:),allocatable Contents None","tags":"","loc":"proc/operator_cross_el_i8b.html"},{"title":"operator_mag_sp – swiftest","text":"pure function operator_mag_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) Contents None","tags":"","loc":"proc/operator_mag_sp.html"},{"title":"operator_mag_dp – swiftest","text":"pure function operator_mag_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) Contents None","tags":"","loc":"proc/operator_mag_dp.html"},{"title":"operator_mag_el_sp – swiftest","text":"pure function operator_mag_el_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/operator_mag_el_sp.html"},{"title":"operator_mag_el_dp – swiftest","text":"pure function operator_mag_el_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/operator_mag_el_dp.html"},{"title":"operator_mag_el_qp – swiftest","text":"pure function operator_mag_el_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:),allocatable Contents None","tags":"","loc":"proc/operator_mag_el_qp.html"},{"title":"util_solve_linear_system_d – swiftest","text":"function util_solve_linear_system_d(A, b, n, lerr) result(x) Uses ieee_exceptions proc~~util_solve_linear_system_d~~UsesGraph proc~util_solve_linear_system_d util_solve_linear_system_d ieee_exceptions ieee_exceptions proc~util_solve_linear_system_d->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) Calls proc~~util_solve_linear_system_d~~CallsGraph proc~util_solve_linear_system_d util_solve_linear_system_d proc~ge_wpp ge_wpp proc~util_solve_linear_system_d->proc~ge_wpp proc~solve_wbs solve_wbs proc~util_solve_linear_system_d->proc~solve_wbs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_solve_linear_system_d.html"},{"title":"util_solve_linear_system_q – swiftest","text":"function util_solve_linear_system_q(A, b, n, lerr) result(x) Uses ieee_exceptions proc~~util_solve_linear_system_q~~UsesGraph proc~util_solve_linear_system_q util_solve_linear_system_q ieee_exceptions ieee_exceptions proc~util_solve_linear_system_q->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n) Calls proc~~util_solve_linear_system_q~~CallsGraph proc~util_solve_linear_system_q util_solve_linear_system_q proc~ge_wpp ge_wpp proc~util_solve_linear_system_q->proc~ge_wpp proc~solve_wbs solve_wbs proc~util_solve_linear_system_q->proc~solve_wbs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_solve_linear_system_q.html"},{"title":"util_solve_rkf45 – swiftest","text":"module function util_solve_rkf45(f, y0in, t1, dt0, tol) result(y1) Interface → Implements the 4th order Runge-Kutta-Fehlberg ODE solver for initial value problems of the form f=dy/dt, y0 = y(t=0), solving for y1 = y(t=t1). Uses a 5th order adaptive step size control.\n Uses a lambda function object as defined in the lambda_function module Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:),allocatable Final result Calls proc~~util_solve_rkf45~~CallsGraph proc~util_solve_rkf45 util_solve_rkf45 interface~util_exit util_exit proc~util_solve_rkf45->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_solve_rkf45~~CalledByGraph proc~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_solve_rkf45.html"},{"title":"util_set_beg_end_pl – swiftest","text":"module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Interface → Sets one or more of the values of xbeg, xend, and vbeg Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg real(kind=DP), intent(in), optional dimension(:,:) :: xend real(kind=DP), intent(in), optional dimension(:,:) :: vbeg Called by proc~~util_set_beg_end_pl~~CalledByGraph proc~util_set_beg_end_pl util_set_beg_end_pl interface~util_set_beg_end_pl util_set_beg_end_pl interface~util_set_beg_end_pl->proc~util_set_beg_end_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_beg_end_pl.html"},{"title":"util_set_ir3h – swiftest","text":"module subroutine util_set_ir3h(self) Interface → Sets the inverse heliocentric radius term (1/rh**3) for all bodies in a structure Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object Called by proc~~util_set_ir3h~~CalledByGraph proc~util_set_ir3h util_set_ir3h interface~util_set_ir3h util_set_ir3h interface~util_set_ir3h->proc~util_set_ir3h Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_ir3h.html"},{"title":"util_set_msys – swiftest","text":"module subroutine util_set_msys(self) Interface → Sets the value of msys and the vector mass quantities based on the total mass of the system Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nobdy system object Called by proc~~util_set_msys~~CalledByGraph proc~util_set_msys util_set_msys interface~util_set_msys util_set_msys interface~util_set_msys->proc~util_set_msys Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_msys.html"},{"title":"util_set_mu_pl – swiftest","text":"module subroutine util_set_mu_pl(self, cb) Interface → Computes G * (M + m) for each massive body Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_mu_pl~~CalledByGraph proc~util_set_mu_pl util_set_mu_pl interface~util_set_mu_pl util_set_mu_pl interface~util_set_mu_pl->proc~util_set_mu_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_mu_pl.html"},{"title":"util_set_mu_tp – swiftest","text":"module subroutine util_set_mu_tp(self, cb) Interface → Converts certain scalar values to arrays so that they can be used in elemental functions Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_mu_tp~~CalledByGraph proc~util_set_mu_tp util_set_mu_tp interface~util_set_mu_tp util_set_mu_tp interface~util_set_mu_tp->proc~util_set_mu_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_mu_tp.html"},{"title":"util_set_particle_info – swiftest","text":"module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Interface → Sets one or more values of the particle information metadata object Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: ACTIVE, MERGED, FRAGMENTED, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) Called by proc~~util_set_particle_info~~CalledByGraph proc~util_set_particle_info util_set_particle_info interface~util_set_particle_info util_set_particle_info interface~util_set_particle_info->proc~util_set_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_particle_info.html"},{"title":"util_set_rhill – swiftest","text":"module subroutine util_set_rhill(self, cb) Interface → Sets the value of the Hill's radius Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_rhill~~CalledByGraph proc~util_set_rhill util_set_rhill interface~util_set_rhill util_set_rhill interface~util_set_rhill->proc~util_set_rhill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_rhill.html"},{"title":"util_set_rhill_approximate – swiftest","text":"module subroutine util_set_rhill_approximate(self, cb) Interface → Sets the approximate value of the Hill's radius using the heliocentric radius instead of computing the semimajor axis Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_set_rhill_approximate~~CalledByGraph proc~util_set_rhill_approximate util_set_rhill_approximate interface~util_set_rhill_approximate util_set_rhill_approximate interface~util_set_rhill_approximate->proc~util_set_rhill_approximate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_set_rhill_approximate.html"},{"title":"util_peri_tp – swiftest","text":"module subroutine util_peri_tp(self, system, param) Interface → Determine system pericenter passages for test particles\n Note:  If the coordinate system used is barycentric, then this routine assumes that the barycentric coordinates in the\n        test particle structures are up-to-date and are not recomputed Adapted from David E. Kaufmann's Swifter routine: util_peri.f90\n Adapted from Hal Levison's Swift routine util_peri.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~util_peri_tp~~CallsGraph proc~util_peri_tp util_peri_tp interface~orbel_xv2aeq orbel_xv2aeq proc~util_peri_tp->interface~orbel_xv2aeq proc~orbel_xv2aeq orbel_xv2aeq interface~orbel_xv2aeq->proc~orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_peri_tp~~CalledByGraph proc~util_peri_tp util_peri_tp interface~util_peri_tp util_peri_tp interface~util_peri_tp->proc~util_peri_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_peri_tp.html"},{"title":"util_coord_h2b_pl – swiftest","text":"module subroutine util_coord_h2b_pl(self, cb) Interface → Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 \n Adapted from Hal Levison's Swift routine coord_h2b.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_h2b_pl~~CalledByGraph proc~util_coord_h2b_pl util_coord_h2b_pl interface~util_coord_h2b_pl util_coord_h2b_pl interface~util_coord_h2b_pl->proc~util_coord_h2b_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_h2b_pl.html"},{"title":"util_coord_h2b_tp – swiftest","text":"module subroutine util_coord_h2b_tp(self, cb) Interface → Convert test particles from heliocentric to barycentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 \n Adapted from Hal Levison's Swift routine coord_h2b_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object Called by proc~~util_coord_h2b_tp~~CalledByGraph proc~util_coord_h2b_tp util_coord_h2b_tp interface~util_coord_h2b_tp util_coord_h2b_tp interface~util_coord_h2b_tp->proc~util_coord_h2b_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_h2b_tp.html"},{"title":"util_coord_b2h_pl – swiftest","text":"module subroutine util_coord_b2h_pl(self, cb) Interface → Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_b2h.f90 \n Adapted from Hal Levison's Swift routine coord_b2h.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_b2h_pl~~CalledByGraph proc~util_coord_b2h_pl util_coord_b2h_pl interface~util_coord_b2h_pl util_coord_b2h_pl interface~util_coord_b2h_pl->proc~util_coord_b2h_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_b2h_pl.html"},{"title":"util_coord_b2h_tp – swiftest","text":"module subroutine util_coord_b2h_tp(self, cb) Interface → Convert test particles from barycentric to heliocentric coordinates (position and velocity) Adapted from David E. Kaufmann's Swifter routine coord_b2h_tp.f90 \n Adapted from Hal Levison's Swift routine coord_b2h_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(in) :: cb Swiftest central body object Called by proc~~util_coord_b2h_tp~~CalledByGraph proc~util_coord_b2h_tp util_coord_b2h_tp interface~util_coord_b2h_tp util_coord_b2h_tp interface~util_coord_b2h_tp->proc~util_coord_b2h_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_b2h_tp.html"},{"title":"util_coord_vb2vh_pl – swiftest","text":"module subroutine util_coord_vb2vh_pl(self, cb) Interface → Convert massive bodies from barycentric to heliocentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vb2vh.f90 \n Adapted from Hal Levison's Swift routine coord_vb2vh.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_vb2vh_pl~~CalledByGraph proc~util_coord_vb2vh_pl util_coord_vb2vh_pl interface~util_coord_vb2vh_pl util_coord_vb2vh_pl interface~util_coord_vb2vh_pl->proc~util_coord_vb2vh_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vb2vh_pl.html"},{"title":"util_coord_vb2vh_tp – swiftest","text":"module subroutine util_coord_vb2vh_tp(self, vbcb) Interface → Convert test particles from barycentric to heliocentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vb2vh_tp.f90 \n Adapted from Hal Levison's Swift routine coord_vb2h_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body Called by proc~~util_coord_vb2vh_tp~~CalledByGraph proc~util_coord_vb2vh_tp util_coord_vb2vh_tp interface~util_coord_vb2vh_tp util_coord_vb2vh_tp interface~util_coord_vb2vh_tp->proc~util_coord_vb2vh_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vb2vh_tp.html"},{"title":"util_coord_vh2vb_pl – swiftest","text":"module subroutine util_coord_vh2vb_pl(self, cb) Interface → Convert massive bodies from heliocentric to barycentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vh2vb.f90 \n Adapted from Hal Levison's Swift routine coord_vh2b.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_vh2vb_pl~~CalledByGraph proc~util_coord_vh2vb_pl util_coord_vh2vb_pl interface~util_coord_vh2vb_pl util_coord_vh2vb_pl interface~util_coord_vh2vb_pl->proc~util_coord_vh2vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vh2vb_pl.html"},{"title":"util_coord_vh2vb_tp – swiftest","text":"module subroutine util_coord_vh2vb_tp(self, vbcb) Interface → Convert test particles from heliocentric to barycentric coordinates (velocity only) Adapted from David E. Kaufmann's Swifter routine coord_vh2vb_tp.f90\n Adapted from Hal Levison's Swift routine coord_vh2b_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body Called by proc~~util_coord_vh2vb_tp~~CalledByGraph proc~util_coord_vh2vb_tp util_coord_vh2vb_tp interface~util_coord_vh2vb_tp util_coord_vh2vb_tp interface~util_coord_vh2vb_tp->proc~util_coord_vh2vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_vh2vb_tp.html"},{"title":"util_coord_xh2xb_pl – swiftest","text":"module subroutine util_coord_xh2xb_pl(self, cb) Interface → Convert position vectors of massive bodies from heliocentric to barycentric coordinates (position only) Adapted from David E. Kaufmann's Swifter routine coord_h2b.f90 \n Adapted from Hal Levison's Swift routine coord_h2b.f Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object Called by proc~~util_coord_xh2xb_pl~~CalledByGraph proc~util_coord_xh2xb_pl util_coord_xh2xb_pl interface~util_coord_xh2xb_pl util_coord_xh2xb_pl interface~util_coord_xh2xb_pl->proc~util_coord_xh2xb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_xh2xb_pl.html"},{"title":"util_coord_xh2xb_tp – swiftest","text":"module subroutine util_coord_xh2xb_tp(self, cb) Interface → Convert test particles from heliocentric to barycentric coordinates (position only) Adapted from David E. Kaufmann's Swifter routine coord_h2b_tp.f90 \n Adapted from Hal Levison's Swift routine coord_h2b_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object Called by proc~~util_coord_xh2xb_tp~~CalledByGraph proc~util_coord_xh2xb_tp util_coord_xh2xb_tp interface~util_coord_xh2xb_tp util_coord_xh2xb_tp interface~util_coord_xh2xb_tp->proc~util_coord_xh2xb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_coord_xh2xb_tp.html"},{"title":"util_index_eucl_ij_to_k – swiftest","text":"pure module subroutine util_index_eucl_ij_to_k(n, i, j, k) Interface → Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions. Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I4B), intent(in) :: i Index of the ith body integer(kind=I4B), intent(in) :: j Index of the jth body integer(kind=I8B), intent(out) :: k Index of the flattened matrix Called by proc~~util_index_eucl_ij_to_k~~CalledByGraph proc~util_index_eucl_ij_to_k util_index_eucl_ij_to_k interface~util_index_eucl_ij_to_k util_index_eucl_ij_to_k interface~util_index_eucl_ij_to_k->proc~util_index_eucl_ij_to_k proc~util_index_eucl_plpl util_index_eucl_plpl proc~util_index_eucl_plpl->interface~util_index_eucl_ij_to_k interface~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl->proc~util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_index_eucl_ij_to_k.html"},{"title":"util_index_eucl_k_to_ij – swiftest","text":"pure module subroutine util_index_eucl_k_to_ij(n, k, i, j) Interface → Turns k index into i,j indices for use in the Euclidean distance matrix for pl-pl interactions. Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I8B), intent(in) :: k Index of the flattened matrix integer(kind=I4B), intent(out) :: i Index of the ith body integer(kind=I4B), intent(out) :: j Index of the jth body Called by proc~~util_index_eucl_k_to_ij~~CalledByGraph proc~util_index_eucl_k_to_ij util_index_eucl_k_to_ij interface~util_index_eucl_k_to_ij util_index_eucl_k_to_ij interface~util_index_eucl_k_to_ij->proc~util_index_eucl_k_to_ij Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_index_eucl_k_to_ij.html"},{"title":"util_index_eucl_plpl – swiftest","text":"module subroutine util_index_eucl_plpl(self, param) Interface → Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions for a Swiftest massive body object Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~util_index_eucl_plpl~~CallsGraph proc~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~util_index_eucl_plpl->interface~util_index_eucl_ij_to_k proc~util_index_eucl_ij_to_k util_index_eucl_ij_to_k interface~util_index_eucl_ij_to_k->proc~util_index_eucl_ij_to_k Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_index_eucl_plpl~~CalledByGraph proc~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl util_index_eucl_plpl interface~util_index_eucl_plpl->proc~util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_index_eucl_plpl.html"},{"title":"util_index_eucl_pltp – swiftest","text":"module subroutine util_index_eucl_pltp(self, pl, param) Interface → Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~util_index_eucl_pltp~~CalledByGraph proc~util_index_eucl_pltp util_index_eucl_pltp interface~util_index_eucl_pltp util_index_eucl_pltp interface~util_index_eucl_pltp->proc~util_index_eucl_pltp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_index_eucl_pltp.html"},{"title":"util_rescale_system – swiftest","text":"module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Interface → Rescales an nbody system to a new set of units. Inputs are the multipliers on the mass (mscale), distance (dscale), and time units (tscale). \n Rescales all united quantities in the system, as well as the mass conversion factors, gravitational constant, and Einstein's constant in the parameter object. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. Called by proc~~util_rescale_system~~CalledByGraph proc~util_rescale_system util_rescale_system interface~util_rescale_system util_rescale_system interface~util_rescale_system->proc~util_rescale_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_rescale_system.html"},{"title":"util_version – swiftest","text":"module subroutine util_version() Interface → Print program version information to terminale Adapted from David E. Kaufmann's Swifter routine: util_version.f90 Arguments None Called by proc~~util_version~~CalledByGraph proc~util_version util_version interface~util_version util_version interface~util_version->proc~util_version proc~io_get_args io_get_args proc~io_get_args->interface~util_version interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_version.html"},{"title":"util_sort_body – swiftest","text":"module subroutine util_sort_body(self, sortby, ascending) Interface → Sort a Swiftest body structure in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Called by proc~~util_sort_body~~CalledByGraph proc~util_sort_body util_sort_body interface~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body proc~util_sort_pl util_sort_pl proc~util_sort_pl->interface~util_sort_body proc~util_sort_tp util_sort_tp proc~util_sort_tp->interface~util_sort_body interface~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp interface~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_body.html"},{"title":"util_sort_dp – swiftest","text":"subroutine util_sort_dp(arr) Sort input double precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr Contents None","tags":"","loc":"proc/util_sort_dp.html"},{"title":"util_sort_index_dp – swiftest","text":"subroutine util_sort_index_dp(arr, ind) Sort input double precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind Contents None","tags":"","loc":"proc/util_sort_index_dp.html"},{"title":"util_sort_i4b – swiftest","text":"subroutine util_sort_i4b(arr) Sort input integer array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr Contents None","tags":"","loc":"proc/util_sort_i4b.html"},{"title":"util_sort_index_i4b – swiftest","text":"subroutine util_sort_index_i4b(arr, ind) Sort input integer array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind Contents None","tags":"","loc":"proc/util_sort_index_i4b.html"},{"title":"util_sort_sp – swiftest","text":"subroutine util_sort_sp(arr) Sort input single precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr Contents None","tags":"","loc":"proc/util_sort_sp.html"},{"title":"util_sort_index_sp – swiftest","text":"subroutine util_sort_index_sp(arr, ind) Sort input single precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind Contents None","tags":"","loc":"proc/util_sort_index_sp.html"},{"title":"util_sort_pl – swiftest","text":"module subroutine util_sort_pl(self, sortby, ascending) Interface → Sort a Swiftest massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~util_sort_pl~~CallsGraph proc~util_sort_pl util_sort_pl interface~util_sort_body util_sort_body proc~util_sort_pl->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_pl~~CalledByGraph proc~util_sort_pl util_sort_pl interface~util_sort_pl util_sort_pl interface~util_sort_pl->proc~util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_pl.html"},{"title":"util_sort_tp – swiftest","text":"module subroutine util_sort_tp(self, sortby, ascending) Interface → Sort a Swiftest test particle object  in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~util_sort_tp~~CallsGraph proc~util_sort_tp util_sort_tp interface~util_sort_body util_sort_body proc~util_sort_tp->interface~util_sort_body proc~util_sort_body util_sort_body interface~util_sort_body->proc~util_sort_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_tp~~CalledByGraph proc~util_sort_tp util_sort_tp interface~util_sort_tp util_sort_tp interface~util_sort_tp->proc~util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_tp.html"},{"title":"util_sort_rearrange_body – swiftest","text":"module subroutine util_sort_rearrange_body(self, ind) Interface → Rearrange Swiftest body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~util_sort_rearrange_body~~CallsGraph proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_rearrange_body~~CalledByGraph proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_tp util_sort_rearrange_tp proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body proc~util_sort_rearrange_pl util_sort_rearrange_pl proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_body.html"},{"title":"util_sort_rearrange_arr_char_string – swiftest","text":"subroutine util_sort_rearrange_arr_char_string(arr, ind, n) Rearrange a single array of character string in-place from an index list. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_char_string.html"},{"title":"util_sort_rearrange_arr_DP – swiftest","text":"subroutine util_sort_rearrange_arr_DP(arr, ind, n) Rearrange a single array of DP type in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_dp.html"},{"title":"util_sort_rearrange_arr_DPvec – swiftest","text":"subroutine util_sort_rearrange_arr_DPvec(arr, ind, n) Rearrange a single array of (NDIM,n) DP-type vectors in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_dpvec.html"},{"title":"util_sort_rearrange_arr_I4B – swiftest","text":"subroutine util_sort_rearrange_arr_I4B(arr, ind, n) Rearrange a single array of integers in-place from an index list. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_i4b.html"},{"title":"util_sort_rearrange_arr_logical – swiftest","text":"subroutine util_sort_rearrange_arr_logical(arr, ind, n) Rearrange a single array of logicals in-place from an index list. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_logical.html"},{"title":"util_sort_rearrange_arr_info – swiftest","text":"subroutine util_sort_rearrange_arr_info(arr, ind, n) Rearrange a single array of particle information type in-place from an index list. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Calls proc~~util_sort_rearrange_arr_info~~CallsGraph proc~util_sort_rearrange_arr_info util_sort_rearrange_arr_info interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_sort_rearrange_arr_info->interface~util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_arr_info.html"},{"title":"util_sort_rearrange_pl – swiftest","text":"module subroutine util_sort_rearrange_pl(self, ind) Interface → Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~util_sort_rearrange_pl~~CallsGraph proc~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_pl->interface~util_sort_rearrange~2 interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_pl->interface~util_sort_rearrange_body proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_rearrange_pl~~CalledByGraph proc~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl util_sort_rearrange_pl interface~util_sort_rearrange_pl->proc~util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_pl.html"},{"title":"util_sort_rearrange_tp – swiftest","text":"module subroutine util_sort_rearrange_tp(self, ind) Interface → Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~util_sort_rearrange_tp~~CallsGraph proc~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange~2 util_sort_rearrange proc~util_sort_rearrange_tp->interface~util_sort_rearrange~2 interface~util_sort_rearrange_body util_sort_rearrange_body proc~util_sort_rearrange_tp->interface~util_sort_rearrange_body proc~util_sort_rearrange_body util_sort_rearrange_body interface~util_sort_rearrange_body->proc~util_sort_rearrange_body proc~util_sort_rearrange_body->interface~util_sort_rearrange~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_sort_rearrange_tp~~CalledByGraph proc~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp util_sort_rearrange_tp interface~util_sort_rearrange_tp->proc~util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_sort_rearrange_tp.html"},{"title":"util_spill_arr_char_string – swiftest","text":"subroutine util_spill_arr_char_string(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_char_string.html"},{"title":"util_spill_arr_DP – swiftest","text":"subroutine util_spill_arr_DP(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_dp.html"},{"title":"util_spill_arr_DPvec – swiftest","text":"subroutine util_spill_arr_DPvec(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_dpvec.html"},{"title":"util_spill_arr_I4B – swiftest","text":"subroutine util_spill_arr_I4B(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_i4b.html"},{"title":"util_spill_arr_I8B – swiftest","text":"subroutine util_spill_arr_I8B(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/util_spill_arr_i8b.html"},{"title":"util_spill_arr_info – swiftest","text":"subroutine util_spill_arr_info(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~util_spill_arr_info~~CallsGraph proc~util_spill_arr_info util_spill_arr_info interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_spill_arr_info->interface~util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_arr_info.html"},{"title":"util_spill_arr_logical – swiftest","text":"subroutine util_spill_arr_logical(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or no Contents None","tags":"","loc":"proc/util_spill_arr_logical.html"},{"title":"util_spill_body – swiftest","text":"module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest generic particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_body~~CallsGraph proc~util_spill_body util_spill_body interface~util_spill~2 util_spill proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_body~~CalledByGraph proc~util_spill_body util_spill_body interface~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_pl util_spill_pl proc~util_spill_pl->interface~util_spill_body proc~util_spill_tp util_spill_tp proc~util_spill_tp->interface~util_spill_body interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_body.html"},{"title":"util_spill_encounter – swiftest","text":"module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest encounter structure from active list to discard list Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_encounter~~CallsGraph proc~util_spill_encounter util_spill_encounter interface~util_spill~2 util_spill proc~util_spill_encounter->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_encounter~~CalledByGraph proc~util_spill_encounter util_spill_encounter interface~util_spill_encounter util_spill_encounter interface~util_spill_encounter->proc~util_spill_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_encounter.html"},{"title":"util_spill_pl – swiftest","text":"module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest massive body structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_pl~~CallsGraph proc~util_spill_pl util_spill_pl interface~util_spill~2 util_spill proc~util_spill_pl->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_pl->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_pl~~CalledByGraph proc~util_spill_pl util_spill_pl interface~util_spill_pl util_spill_pl interface~util_spill_pl->proc~util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_pl.html"},{"title":"util_spill_tp – swiftest","text":"module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) Swiftest test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardse logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~util_spill_tp~~CallsGraph proc~util_spill_tp util_spill_tp interface~util_spill~2 util_spill proc~util_spill_tp->interface~util_spill~2 interface~util_spill_body util_spill_body proc~util_spill_tp->interface~util_spill_body proc~util_spill_body util_spill_body interface~util_spill_body->proc~util_spill_body proc~util_spill_body->interface~util_spill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_spill_tp~~CalledByGraph proc~util_spill_tp util_spill_tp interface~util_spill_tp util_spill_tp interface~util_spill_tp->proc~util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_spill_tp.html"},{"title":"util_valid_id_system – swiftest","text":"module subroutine util_valid_id_system(self, param) Interface → Validate massive body and test particle ids\n Subroutine causes program to exit with error if any ids are not unique Adapted from David E. Kaufmann's Swifter routine: util_valid.f90 Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~util_valid_id_system~~CallsGraph proc~util_valid_id_system util_valid_id_system interface~util_exit util_exit proc~util_valid_id_system->interface~util_exit interface~util_sort util_sort proc~util_valid_id_system->interface~util_sort proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_valid_id_system~~CalledByGraph proc~util_valid_id_system util_valid_id_system interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_valid_id_system.html"},{"title":"util_exit – swiftest","text":"module subroutine util_exit(code) Interface → Print termination message and exit program Adapted from David E. Kaufmann's Swifter routine: util_exit.f90\n Adapted from Hal Levison's Swift routine util_exit.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code Called by proc~~util_exit~~CalledByGraph proc~util_exit util_exit interface~util_exit util_exit interface~util_exit->proc~util_exit proc~io_write_encounter io_write_encounter proc~io_write_encounter->interface~util_exit proc~io_read_in_cb io_read_in_cb proc~io_read_in_cb->interface~util_exit proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_exit proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_exit proc~io_read_encounter io_read_encounter proc~io_read_encounter->interface~util_exit proc~setup_construct_system setup_construct_system proc~setup_construct_system->interface~util_exit proc~io_read_particle_info_system io_read_particle_info_system proc~io_read_particle_info_system->interface~util_exit proc~check check proc~check->interface~util_exit proc~io_write_discard io_write_discard proc~io_write_discard->interface~util_exit proc~io_dump_particle_info_base io_dump_particle_info_base proc~io_dump_particle_info_base->interface~util_exit proc~io_dump_particle_info io_dump_particle_info proc~io_dump_particle_info->interface~util_exit proc~io_dump_param io_dump_param proc~io_dump_param->interface~util_exit proc~io_write_frame_encounter io_write_frame_encounter proc~io_write_frame_encounter->interface~util_exit proc~io_conservation_report io_conservation_report proc~io_conservation_report->interface~util_exit proc~io_read_frame_cb io_read_frame_cb proc~io_read_frame_cb->interface~util_exit proc~io_read_in_particle_info io_read_in_particle_info proc~io_read_in_particle_info->interface~util_exit proc~io_get_old_t_final_system io_get_old_t_final_system proc~io_get_old_t_final_system->interface~util_exit proc~io_dump_base io_dump_base proc~io_dump_base->interface~util_exit interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb proc~io_write_hdr_system io_write_hdr_system proc~io_write_hdr_system->interface~util_exit proc~io_read_in_param io_read_in_param proc~io_read_in_param->interface~util_exit proc~util_solve_rkf45 util_solve_rkf45 proc~util_solve_rkf45->interface~util_exit proc~io_read_frame_body io_read_frame_body proc~io_read_frame_body->interface~util_exit proc~io_write_frame_body io_write_frame_body proc~io_write_frame_body->interface~util_exit proc~util_valid_id_system util_valid_id_system proc~util_valid_id_system->interface~util_exit proc~io_write_frame_cb io_write_frame_cb proc~io_write_frame_cb->interface~util_exit proc~io_write_frame_system io_write_frame_system proc~io_write_frame_system->interface~util_exit proc~io_get_args io_get_args proc~io_get_args->interface~util_exit interface~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report interface~util_solve_rkf45 util_solve_rkf45 interface~util_solve_rkf45->proc~util_solve_rkf45 interface~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base interface~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system interface~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system interface~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb interface~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb interface~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter interface~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter interface~io_write_frame_body->proc~io_write_frame_body interface~util_valid_id_system util_valid_id_system interface~util_valid_id_system->proc~util_valid_id_system interface~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system interface~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl interface~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info interface~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system interface~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param interface~io_write_frame_cb->proc~io_write_frame_cb interface~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system interface~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_exit.html"},{"title":"util_fill_arr_char_string – swiftest","text":"subroutine util_fill_arr_char_string(keeps, inserts, lfill_list) Performs a fill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_char_string.html"},{"title":"util_fill_arr_DP – swiftest","text":"subroutine util_fill_arr_DP(keeps, inserts, lfill_list) Performs a fill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_dp.html"},{"title":"util_fill_arr_DPvec – swiftest","text":"subroutine util_fill_arr_DPvec(keeps, inserts, lfill_list) Performs a fill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_dpvec.html"},{"title":"util_fill_arr_I4B – swiftest","text":"subroutine util_fill_arr_I4B(keeps, inserts, lfill_list) Performs a fill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_i4b.html"},{"title":"util_fill_arr_info – swiftest","text":"subroutine util_fill_arr_info(keeps, inserts, lfill_list) Performs a fill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_arr_info~~CallsGraph proc~util_fill_arr_info util_fill_arr_info interface~util_copy_particle_info_arr util_copy_particle_info_arr proc~util_fill_arr_info->interface~util_copy_particle_info_arr proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_arr_info.html"},{"title":"util_fill_arr_logical – swiftest","text":"subroutine util_fill_arr_logical(keeps, inserts, lfill_list) Performs a fill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/util_fill_arr_logical.html"},{"title":"util_fill_body – swiftest","text":"module subroutine util_fill_body(self, inserts, lfill_list) Interface → Insert new Swiftest generic particle structure into an old one. \n This is the inverse of a spill operation.\n Fill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_body~~CallsGraph proc~util_fill_body util_fill_body interface~util_fill~2 util_fill proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_fill_body~~CalledByGraph proc~util_fill_body util_fill_body interface~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_tp util_fill_tp proc~util_fill_tp->interface~util_fill_body proc~util_fill_pl util_fill_pl proc~util_fill_pl->interface~util_fill_body interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_body.html"},{"title":"util_fill_pl – swiftest","text":"module subroutine util_fill_pl(self, inserts, lfill_list) Interface → Insert new Swiftest massive body structure into an old one. \n This is the inverse of a spill operation.\n Fill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_pl~~CallsGraph proc~util_fill_pl util_fill_pl interface~util_fill~2 util_fill proc~util_fill_pl->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_pl->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_fill_pl~~CalledByGraph proc~util_fill_pl util_fill_pl interface~util_fill_pl util_fill_pl interface~util_fill_pl->proc~util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_pl.html"},{"title":"util_fill_tp – swiftest","text":"module subroutine util_fill_tp(self, inserts, lfill_list) Interface → Insert new Swiftest test particle structure into an old one. \n This is the inverse of a fill operation.\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~util_fill_tp~~CallsGraph proc~util_fill_tp util_fill_tp interface~util_fill~2 util_fill proc~util_fill_tp->interface~util_fill~2 interface~util_fill_body util_fill_body proc~util_fill_tp->interface~util_fill_body proc~util_fill_body util_fill_body interface~util_fill_body->proc~util_fill_body proc~util_fill_body->interface~util_fill~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_fill_tp~~CalledByGraph proc~util_fill_tp util_fill_tp interface~util_fill_tp util_fill_tp interface~util_fill_tp->proc~util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_fill_tp.html"},{"title":"util_resize_arr_char_string – swiftest","text":"subroutine util_resize_arr_char_string(arr, nnew) Resizes an array component of type character string. nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_char_string.html"},{"title":"util_resize_arr_DP – swiftest","text":"subroutine util_resize_arr_DP(arr, nnew) Resizes an array component of double precision type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_dp.html"},{"title":"util_resize_arr_DPvec – swiftest","text":"subroutine util_resize_arr_DPvec(arr, nnew) Resizes an array component of double precision vectors of size (NDIM, n). Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_dpvec.html"},{"title":"util_resize_arr_I4B – swiftest","text":"subroutine util_resize_arr_I4B(arr, nnew) Resizes an array component of integer type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_i4b.html"},{"title":"util_resize_arr_info – swiftest","text":"subroutine util_resize_arr_info(arr, nnew) Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_info.html"},{"title":"util_resize_arr_logical – swiftest","text":"subroutine util_resize_arr_logical(arr, nnew) Resizes an array component of logical type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/util_resize_arr_logical.html"},{"title":"util_resize_body – swiftest","text":"module subroutine util_resize_body(self, nnew) Interface → Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~util_resize_body~~CallsGraph proc~util_resize_body util_resize_body interface~util_resize~2 util_resize proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_resize_body~~CalledByGraph proc~util_resize_body util_resize_body interface~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_tp util_resize_tp proc~util_resize_tp->interface~util_resize_body proc~util_resize_pl util_resize_pl proc~util_resize_pl->interface~util_resize_body interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_body.html"},{"title":"util_resize_encounter – swiftest","text":"module subroutine util_resize_encounter(self, nnew) Interface → Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small.\n Note: The reason to extend it by a factor of 2 is for performance. When there are many enounters per step, resizing every time you want to add an \n encounter takes significant computational effort. Resizing by a factor of 2 is a tradeoff between performance (fewer resize calls) and memory managment\n Memory usage grows by a factor of 2 each time it fills up, but no more. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed Called by proc~~util_resize_encounter~~CalledByGraph proc~util_resize_encounter util_resize_encounter interface~util_resize_encounter util_resize_encounter interface~util_resize_encounter->proc~util_resize_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_encounter.html"},{"title":"util_resize_pl – swiftest","text":"module subroutine util_resize_pl(self, nnew) Interface → Checks the current size of a Swiftest massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~util_resize_pl~~CallsGraph proc~util_resize_pl util_resize_pl interface~util_resize~2 util_resize proc~util_resize_pl->interface~util_resize~2 interface~util_resize_body util_resize_body proc~util_resize_pl->interface~util_resize_body proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_resize_pl~~CalledByGraph proc~util_resize_pl util_resize_pl interface~util_resize_pl util_resize_pl interface~util_resize_pl->proc~util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_pl.html"},{"title":"util_resize_tp – swiftest","text":"module subroutine util_resize_tp(self, nnew) Interface → Checks the current size of a Swiftest test particle against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~util_resize_tp~~CallsGraph proc~util_resize_tp util_resize_tp interface~util_resize~2 util_resize proc~util_resize_tp->interface~util_resize~2 interface~util_resize_body util_resize_body proc~util_resize_tp->interface~util_resize_body proc~util_resize_body util_resize_body interface~util_resize_body->proc~util_resize_body proc~util_resize_body->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_resize_tp~~CalledByGraph proc~util_resize_tp util_resize_tp interface~util_resize_tp util_resize_tp interface~util_resize_tp->proc~util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_resize_tp.html"},{"title":"util_copy_encounter – swiftest","text":"module subroutine util_copy_encounter(self, source) Interface → Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into Called by proc~~util_copy_encounter~~CalledByGraph proc~util_copy_encounter util_copy_encounter interface~util_copy_encounter util_copy_encounter interface~util_copy_encounter->proc~util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_copy_encounter.html"},{"title":"util_copy_particle_info – swiftest","text":"module subroutine util_copy_particle_info(self, source) Interface → Copies one set of information object components into another, component-by-component Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source Called by proc~~util_copy_particle_info~~CalledByGraph proc~util_copy_particle_info util_copy_particle_info interface~util_copy_particle_info util_copy_particle_info interface~util_copy_particle_info->proc~util_copy_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_copy_particle_info.html"},{"title":"util_copy_particle_info_arr – swiftest","text":"module subroutine util_copy_particle_info_arr(source, dest, idx) Interface → Copies contents from an array of one particle information objects to another. Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object Called by proc~~util_copy_particle_info_arr~~CalledByGraph proc~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr util_copy_particle_info_arr interface~util_copy_particle_info_arr->proc~util_copy_particle_info_arr proc~util_sort_rearrange_arr_info util_sort_rearrange_arr_info proc~util_sort_rearrange_arr_info->interface~util_copy_particle_info_arr proc~util_fill_arr_info util_fill_arr_info proc~util_fill_arr_info->interface~util_copy_particle_info_arr proc~util_spill_arr_info util_spill_arr_info proc~util_spill_arr_info->interface~util_copy_particle_info_arr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_copy_particle_info_arr.html"},{"title":"util_minimize_bfgs – swiftest","text":"module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1) Interface → Uses ieee_exceptions proc~~util_minimize_bfgs~~UsesGraph proc~util_minimize_bfgs util_minimize_bfgs ieee_exceptions ieee_exceptions proc~util_minimize_bfgs->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. This function implements the Broyden-Fletcher-Goldfarb-Shanno method to determine the minimum of a function of N variables. It recieves as input:\n   f%eval(x) : lambda function object containing the objective function as the eval metho\n   N       : Number of variables of function f\n   x0      : Initial starting value of x\n   eps     : Accuracy of 1 - dimensional minimization at each step\n   maxloop : Maximum number of loops to attempt to find a solution\n The outputs include\n   lerr :  Returns .true. if it could not find the minimum\n Returns\n   x1   :  Final minimum (all 0 if none found)\n   0 = No miniumum found Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:),allocatable Called by proc~~util_minimize_bfgs~~CalledByGraph proc~util_minimize_bfgs util_minimize_bfgs interface~util_minimize_bfgs util_minimize_bfgs interface~util_minimize_bfgs->proc~util_minimize_bfgs Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_minimize_bfgs.html"},{"title":"util_append_arr_char_string – swiftest","text":"subroutine util_append_arr_char_string(arr, source, nold, nsrc, lsource_mask) Append a single array of character string type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_char_string~~CallsGraph proc~util_append_arr_char_string util_append_arr_char_string interface~util_resize~2 util_resize proc~util_append_arr_char_string->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_char_string.html"},{"title":"util_append_arr_DP – swiftest","text":"subroutine util_append_arr_DP(arr, source, nold, nsrc, lsource_mask) Append a single array of double precision type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_dp~~CallsGraph proc~util_append_arr_dp util_append_arr_DP interface~util_resize~2 util_resize proc~util_append_arr_dp->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_dp.html"},{"title":"util_append_arr_DPvec – swiftest","text":"subroutine util_append_arr_DPvec(arr, source, nold, nsrc, lsource_mask) Append a single array of double precision vector type of size (NDIM, n) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_dpvec~~CallsGraph proc~util_append_arr_dpvec util_append_arr_DPvec interface~util_resize~2 util_resize proc~util_append_arr_dpvec->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_dpvec.html"},{"title":"util_append_arr_I4B – swiftest","text":"subroutine util_append_arr_I4B(arr, source, nold, nsrc, lsource_mask) Append a single array of integer(I4B) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_i4b~~CallsGraph proc~util_append_arr_i4b util_append_arr_I4B interface~util_resize~2 util_resize proc~util_append_arr_i4b->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_i4b.html"},{"title":"util_append_arr_info – swiftest","text":"subroutine util_append_arr_info(arr, source, nold, nsrc, lsource_mask) Append a single array of particle information type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_info~~CallsGraph proc~util_append_arr_info util_append_arr_info interface~util_resize~2 util_resize proc~util_append_arr_info->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_info.html"},{"title":"util_append_arr_logical – swiftest","text":"subroutine util_append_arr_logical(arr, source, nold, nsrc, lsource_mask) Append a single array of logical type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_arr_logical~~CallsGraph proc~util_append_arr_logical util_append_arr_logical interface~util_resize~2 util_resize proc~util_append_arr_logical->interface~util_resize~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_arr_logical.html"},{"title":"util_append_body – swiftest","text":"module subroutine util_append_body(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_body~~CallsGraph proc~util_append_body util_append_body interface~util_append~2 util_append proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_body~~CalledByGraph proc~util_append_body util_append_body interface~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_append_pl util_append_pl proc~util_append_pl->interface~util_append_body proc~util_append_tp util_append_tp proc~util_append_tp->interface~util_append_body interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_body.html"},{"title":"util_append_encounter – swiftest","text":"module subroutine util_append_encounter(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_encounter~~CallsGraph proc~util_append_encounter util_append_encounter interface~util_append~2 util_append proc~util_append_encounter->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_encounter~~CalledByGraph proc~util_append_encounter util_append_encounter interface~util_append_encounter util_append_encounter interface~util_append_encounter->proc~util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_encounter.html"},{"title":"util_append_pl – swiftest","text":"module subroutine util_append_pl(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_pl~~CallsGraph proc~util_append_pl util_append_pl interface~util_append_body util_append_body proc~util_append_pl->interface~util_append_body interface~util_append~2 util_append proc~util_append_pl->interface~util_append~2 interface~util_exit util_exit proc~util_append_pl->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_pl~~CalledByGraph proc~util_append_pl util_append_pl interface~util_append_pl util_append_pl interface~util_append_pl->proc~util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_pl.html"},{"title":"util_append_tp – swiftest","text":"module subroutine util_append_tp(self, source, lsource_mask) Interface → Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~util_append_tp~~CallsGraph proc~util_append_tp util_append_tp interface~util_append_body util_append_body proc~util_append_tp->interface~util_append_body interface~util_append~2 util_append proc~util_append_tp->interface~util_append~2 interface~util_exit util_exit proc~util_append_tp->interface~util_exit proc~util_append_body util_append_body interface~util_append_body->proc~util_append_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~util_append_body->interface~util_append~2 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_append_tp~~CalledByGraph proc~util_append_tp util_append_tp interface~util_append_tp util_append_tp interface~util_append_tp->proc~util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_append_tp.html"},{"title":"util_get_energy_momentum_system – swiftest","text":"module subroutine util_get_energy_momentum_system(self, param) Interface → Compute total system angular momentum vector and kinetic, potential and total system energy Adapted from David E. Kaufmann Swifter routine symba_energy_eucl.f90 Adapted from Martin Duncan's Swift routine anal_energy.f Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~util_get_energy_momentum_system~~CallsGraph proc~util_get_energy_momentum_system util_get_energy_momentum_system proc~util_get_energy_potential util_get_energy_potential proc~util_get_energy_momentum_system->proc~util_get_energy_potential Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~util_get_energy_momentum_system~~CalledByGraph proc~util_get_energy_momentum_system util_get_energy_momentum_system interface~util_get_energy_momentum_system util_get_energy_momentum_system interface~util_get_energy_momentum_system->proc~util_get_energy_momentum_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/util_get_energy_momentum_system.html"},{"title":"gr_kick_getaccb_ns_body – swiftest","text":"pure module subroutine gr_kick_getaccb_ns_body(self, system, param) Interface → Add relativistic correction acceleration for non-symplectic integrators.\n Based on Quinn et al. (1991) eq. 5 Reference: Quinn, T.R., Tremaine, S., Duncan, M., 1991. A three million year integration of the earth’s orbit. \n       AJ 101, 2287–2305. https://doi.org/10.1086/115850 Adapted from David A. Minton's Swifter routine routine gr_kick_getaccb_ns.f90 Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~gr_kick_getaccb_ns_body~~CalledByGraph proc~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body interface~gr_kick_getaccb_ns_body gr_kick_getaccb_ns_body interface~gr_kick_getaccb_ns_body->proc~gr_kick_getaccb_ns_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_kick_getaccb_ns_body.html"},{"title":"gr_kick_getacch – swiftest","text":"pure module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) Interface → Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations Called by proc~~gr_kick_getacch~~CalledByGraph proc~gr_kick_getacch gr_kick_getacch interface~gr_kick_getacch gr_kick_getacch interface~gr_kick_getacch->proc~gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_kick_getacch.html"},{"title":"gr_p4_pos_kick – swiftest","text":"pure module subroutine gr_p4_pos_kick(param, x, v, dt) Interface → Position kick due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Reference:\n    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. \n       AJ 108, 1962–1969. https://doi.org/10.1086/117210 Adapted from David A. Minton's Swifter routine gr_whm_p4.f90 Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size Called by proc~~gr_p4_pos_kick~~CalledByGraph proc~gr_p4_pos_kick gr_p4_pos_kick interface~gr_p4_pos_kick gr_p4_pos_kick interface~gr_p4_pos_kick->proc~gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_p4_pos_kick.html"},{"title":"gr_pseudovel2vel – swiftest","text":"pure module subroutine gr_pseudovel2vel(param, mu, xh, pv, vh) Interface → Converts the relativistic pseudovelocity back into a veliocentric velocity\n    Based on Saha & Tremaine (1994) Eq. 32 Reference:\n    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. \n       AJ 108, 1962–1969. https://doi.org/10.1086/117210 Adapted from David A. Minton's Swifter routine gr_pseudovel2vel.f90 Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Heliocentric velocity vector Called by proc~~gr_pseudovel2vel~~CalledByGraph proc~gr_pseudovel2vel gr_pseudovel2vel interface~gr_pseudovel2vel gr_pseudovel2vel interface~gr_pseudovel2vel->proc~gr_pseudovel2vel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_pseudovel2vel.html"},{"title":"gr_pv2vh_body – swiftest","text":"pure module subroutine gr_pv2vh_body(self, param) Interface → Wrapper function that converts from pseudovelocity to heliocentric velocity for swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~gr_pv2vh_body~~CalledByGraph proc~gr_pv2vh_body gr_pv2vh_body interface~gr_pv2vh_body gr_pv2vh_body interface~gr_pv2vh_body->proc~gr_pv2vh_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_pv2vh_body.html"},{"title":"gr_vel2pseudovel – swiftest","text":"pure module subroutine gr_vel2pseudovel(param, mu, xh, vh, pv) Interface → Converts the heliocentric velocity into a pseudovelocity with relativistic corrections. \n Uses Newton-Raphson method with direct inversion of the Jacobian (yeah, it's slow, but \n this is only done once per run). Reference:\n    Saha, P., Tremaine, S., 1994. Long-term planetary integration with individual time steps. \n       AJ 108, 1962–1969. https://doi.org/10.1086/117210 Adapted from David A. Minton's Swifter routine gr_vel2pseudovel.f90 Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: vh Heliocentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) Called by proc~~gr_vel2pseudovel~~CalledByGraph proc~gr_vel2pseudovel gr_vel2pseudovel interface~gr_vel2pseudovel gr_vel2pseudovel interface~gr_vel2pseudovel->proc~gr_vel2pseudovel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_vel2pseudovel.html"},{"title":"gr_vh2pv_body – swiftest","text":"pure module subroutine gr_vh2pv_body(self, param) Interface → Wrapper function that converts from heliocentric velocity to pseudovelocity for Swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Called by proc~~gr_vh2pv_body~~CalledByGraph proc~gr_vh2pv_body gr_vh2pv_body interface~gr_vh2pv_body gr_vh2pv_body interface~gr_vh2pv_body->proc~gr_vh2pv_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/gr_vh2pv_body.html"},{"title":"discard_system – swiftest","text":"module subroutine discard_system(self, param) Interface → Calls the discard methods for each body class and then the write method if any discards were detected Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~discard_system~~CalledByGraph proc~discard_system discard_system interface~discard_system discard_system interface~discard_system->proc~discard_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/discard_system.html"},{"title":"discard_pl – swiftest","text":"module subroutine discard_pl(self, system, param) Interface → Placeholder method for discarding massive bodies. This method does nothing except to ensure that the discard flag is set to false. \n  This method is intended to be overridden by more advanced integrators. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter Called by proc~~discard_pl~~CalledByGraph proc~discard_pl discard_pl interface~discard_pl discard_pl interface~discard_pl->proc~discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/discard_pl.html"},{"title":"discard_tp – swiftest","text":"module subroutine discard_tp(self, system, param) Interface → Check to see if particles should be discarded based on their positions relative to the massive bodies Adapted from David E. Kaufmann's Swifter routine: discard.f90\n Adapted from Hal Levison's Swift routine discard. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter Called by proc~~discard_tp~~CalledByGraph proc~discard_tp discard_tp interface~discard_tp discard_tp interface~discard_tp->proc~discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/discard_tp.html"},{"title":"helio_step_system – swiftest","text":"module subroutine helio_step_system(self, param, t, dt) Interface → Step massive bodies and and active test particles ahead in heliocentric coordinates. Currently there's no difference between this and the WHM system stepper, so this is just\n a wrapper function to keep the method calls consistent for inherited types. Adapted from Hal Levison's Swift routine step_kdk.f\n Adapted from David E. Kaufmann's Swifter routine helio_step.f90 Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Calls proc~~helio_step_system~~CallsGraph proc~helio_step_system helio_step_system whm_step_system whm_step_system proc~helio_step_system->whm_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_step_system~~CalledByGraph proc~helio_step_system helio_step_system interface~helio_step_system helio_step_system interface~helio_step_system->proc~helio_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_step_system.html"},{"title":"helio_step_pl – swiftest","text":"module subroutine helio_step_pl(self, system, param, t, dt) Interface → Step massive bodies ahead Democratic Heliocentric method Adapted from David E. Kaufmann's Swifter helio_step_pl.f90\n Adapted from Hal Levison's Swift routine helio_step_pl.f Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize Called by proc~~helio_step_pl~~CalledByGraph proc~helio_step_pl helio_step_pl interface~helio_step_pl helio_step_pl interface~helio_step_pl->proc~helio_step_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_step_pl.html"},{"title":"helio_step_tp – swiftest","text":"module subroutine helio_step_tp(self, system, param, t, dt) Interface → Step active test particles ahead using Democratic Heliocentric method Adapted from David E. Kaufmann's Swifter routine helio_step_tp.f90\n Adapted from Hal Levison's Swift routine helio_step_tp.f Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize Called by proc~~helio_step_tp~~CalledByGraph proc~helio_step_tp helio_step_tp interface~helio_step_tp helio_step_tp interface~helio_step_tp->proc~helio_step_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_step_tp.html"},{"title":"helio_setup_initialize_system – swiftest","text":"module subroutine helio_setup_initialize_system(self, param) Interface → Initialize a Helio nbody system from files, converting all heliocentric quantities to barycentric. Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~helio_setup_initialize_system~~CallsGraph proc~helio_setup_initialize_system helio_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~helio_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_setup_initialize_system~~CalledByGraph proc~helio_setup_initialize_system helio_setup_initialize_system interface~helio_setup_initialize_system helio_setup_initialize_system interface~helio_setup_initialize_system->proc~helio_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_setup_initialize_system.html"},{"title":"helio_gr_kick_getacch_pl – swiftest","text":"pure module subroutine helio_gr_kick_getacch_pl(self, param) Interface → Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_whm_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~helio_gr_kick_getacch_pl~~CallsGraph proc~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_pl->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_kick_getacch_pl~~CalledByGraph proc~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl interface~helio_gr_kick_getacch_pl helio_gr_kick_getacch_pl interface~helio_gr_kick_getacch_pl->proc~helio_gr_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_kick_getacch_pl.html"},{"title":"helio_gr_kick_getacch_tp – swiftest","text":"pure module subroutine helio_gr_kick_getacch_tp(self, param) Interface → Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_helio_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters Calls proc~~helio_gr_kick_getacch_tp~~CallsGraph proc~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp gr_kick_getacch gr_kick_getacch proc~helio_gr_kick_getacch_tp->gr_kick_getacch Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_kick_getacch_tp~~CalledByGraph proc~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp interface~helio_gr_kick_getacch_tp helio_gr_kick_getacch_tp interface~helio_gr_kick_getacch_tp->proc~helio_gr_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_kick_getacch_tp.html"},{"title":"helio_gr_p4_pl – swiftest","text":"pure module subroutine helio_gr_p4_pl(self, param, dt) Interface → Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~helio_gr_p4_pl~~CallsGraph proc~helio_gr_p4_pl helio_gr_p4_pl gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_pl->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_p4_pl~~CalledByGraph proc~helio_gr_p4_pl helio_gr_p4_pl interface~helio_gr_p4_pl helio_gr_p4_pl interface~helio_gr_p4_pl->proc~helio_gr_p4_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_p4_pl.html"},{"title":"helio_gr_p4_tp – swiftest","text":"pure module subroutine helio_gr_p4_tp(self, param, dt) Interface → Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Adapted from David A. Minton's Swifter routine routine gr_helio_p4.f90 Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size Calls proc~~helio_gr_p4_tp~~CallsGraph proc~helio_gr_p4_tp helio_gr_p4_tp gr_p4_pos_kick gr_p4_pos_kick proc~helio_gr_p4_tp->gr_p4_pos_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_gr_p4_tp~~CalledByGraph proc~helio_gr_p4_tp helio_gr_p4_tp interface~helio_gr_p4_tp helio_gr_p4_tp interface~helio_gr_p4_tp->proc~helio_gr_p4_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_gr_p4_tp.html"},{"title":"helio_kick_getacch_pl – swiftest","text":"module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of massive bodies Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch.f90\n Adapted from Hal Levison's Swift routine helio_kick_getacch.f Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Called by proc~~helio_kick_getacch_pl~~CalledByGraph proc~helio_kick_getacch_pl helio_kick_getacch_pl interface~helio_kick_getacch_pl helio_kick_getacch_pl interface~helio_kick_getacch_pl->proc~helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_getacch_pl.html"},{"title":"helio_kick_getacch_tp – swiftest","text":"module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of test particles Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_tp.f90\n Adapted from Hal Levison's Swift routine helio_kick_getacch_tp.f Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Called by proc~~helio_kick_getacch_tp~~CalledByGraph proc~helio_kick_getacch_tp helio_kick_getacch_tp interface~helio_kick_getacch_tp helio_kick_getacch_tp interface~helio_kick_getacch_tp->proc~helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_getacch_tp.html"},{"title":"helio_kick_vb_pl – swiftest","text":"module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Interface → Kick barycentric velocities of bodies Adapted from Martin Duncan and Hal Levison's Swift routine kickvh.f \n Adapted from David E. Kaufmann's Swifter routine helio_kick_vb.f90 Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~helio_kick_vb_pl~~CalledByGraph proc~helio_kick_vb_pl helio_kick_vb_pl interface~helio_kick_vb_pl helio_kick_vb_pl interface~helio_kick_vb_pl->proc~helio_kick_vb_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_vb_pl.html"},{"title":"helio_kick_vb_tp – swiftest","text":"module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Interface → Kick barycentric velocities of bodies Adapted from Martin Duncan and Hal Levison's Swift routine kickvh_tp.f\n Adapted from David E. Kaufmann's Swifter routine helio_kick_vb_tp.f90 Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~helio_kick_vb_tp~~CalledByGraph proc~helio_kick_vb_tp helio_kick_vb_tp interface~helio_kick_vb_tp helio_kick_vb_tp interface~helio_kick_vb_tp->proc~helio_kick_vb_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_kick_vb_tp.html"},{"title":"helio_drift_body – swiftest","text":"module subroutine helio_drift_body(self, system, param, dt) Interface → Loop through bodies and call Danby drift routine on democratic heliocentric coordinates Adapted from David E. Kaufmann's Swifter routine helio_drift.f90\n Adapted from Hal Levison's Swift routine drift.f Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~helio_drift_body~~CallsGraph proc~helio_drift_body helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_drift_body~~CalledByGraph proc~helio_drift_body helio_drift_body interface~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body proc~helio_drift_pl helio_drift_pl proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_tp helio_drift_tp proc~helio_drift_tp->interface~helio_drift_body interface~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl interface~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_body.html"},{"title":"helio_drift_pl – swiftest","text":"module subroutine helio_drift_pl(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~helio_drift_pl~~CallsGraph proc~helio_drift_pl helio_drift_pl interface~helio_drift_body helio_drift_body proc~helio_drift_pl->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_drift_pl~~CalledByGraph proc~helio_drift_pl helio_drift_pl interface~helio_drift_pl helio_drift_pl interface~helio_drift_pl->proc~helio_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_pl.html"},{"title":"helio_drift_tp – swiftest","text":"module subroutine helio_drift_tp(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~helio_drift_tp~~CallsGraph proc~helio_drift_tp helio_drift_tp interface~helio_drift_body helio_drift_body proc~helio_drift_tp->interface~helio_drift_body proc~helio_drift_body helio_drift_body interface~helio_drift_body->proc~helio_drift_body drift_all drift_all proc~helio_drift_body->drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~helio_drift_tp~~CalledByGraph proc~helio_drift_tp helio_drift_tp interface~helio_drift_tp helio_drift_tp interface~helio_drift_tp->proc~helio_drift_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_tp.html"},{"title":"helio_drift_linear_pl – swiftest","text":"module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Interface → Perform linear drift of massive bodies due to barycentric momentum of Sun Adapted from David E. Kaufmann's Swifter routine helio_lindrift.f90\n Adapted from Hal Levison's Swift routine helio_lindrift.f Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step Called by proc~~helio_drift_linear_pl~~CalledByGraph proc~helio_drift_linear_pl helio_drift_linear_pl interface~helio_drift_linear_pl helio_drift_linear_pl interface~helio_drift_linear_pl->proc~helio_drift_linear_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_linear_pl.html"},{"title":"helio_drift_linear_tp – swiftest","text":"module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Interface → Perform linear drift of test particles due to barycentric momentum of Sun\n New vectorized version included Adapted from David E. Kaufmann's Swifter routine helio_lindrift_tp.f90\n Adapted from Hal Levison's Swift routine helio_lindrift_tp.f Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particleb object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step Called by proc~~helio_drift_linear_tp~~CalledByGraph proc~helio_drift_linear_tp helio_drift_linear_tp interface~helio_drift_linear_tp helio_drift_linear_tp interface~helio_drift_linear_tp->proc~helio_drift_linear_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/helio_drift_linear_tp.html"},{"title":"io_get_args – swiftest","text":"module function io_get_args(integrator, param_file_name) result(ierr) Interface → Reads in the name of the parameter file from command line arguments. Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code Calls proc~~io_get_args~~CallsGraph proc~io_get_args io_get_args interface~util_version util_version proc~io_get_args->interface~util_version interface~util_exit util_exit proc~io_get_args->interface~util_exit interface~io_toupper io_toupper proc~io_get_args->interface~io_toupper proc~util_version util_version interface~util_version->proc~util_version proc~util_exit util_exit interface~util_exit->proc~util_exit proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_get_args~~CalledByGraph proc~io_get_args io_get_args interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_get_args.html"},{"title":"io_get_old_t_final_system – swiftest","text":"module function io_get_old_t_final_system(self, param) result(old_t_final) Interface → Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) Calls proc~~io_get_old_t_final_system~~CallsGraph proc~io_get_old_t_final_system io_get_old_t_final_system interface~util_exit util_exit proc~io_get_old_t_final_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_get_old_t_final_system~~CalledByGraph proc~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system io_get_old_t_final_system interface~io_get_old_t_final_system->proc~io_get_old_t_final_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_get_old_t_final_system.html"},{"title":"io_get_token – swiftest","text":"module function io_get_token(buffer, ifirst, ilast, ierr) result(token) Interface → Retrieves a character token from an input string. Here a token is defined as any set of contiguous non-blank characters not \n beginning with or containing \"!\". If \"!\" is present, any remaining part of the buffer including the \"!\" is ignored Adapted from David E. Kaufmann's Swifter routine io_get_token.f90\n Bad input\n No valid token Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string Called by proc~~io_get_token~~CalledByGraph proc~io_get_token io_get_token interface~io_get_token io_get_token interface~io_get_token->proc~io_get_token proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_get_token interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_get_token.html"},{"title":"io_read_frame_body – swiftest","text":"module function io_read_frame_body(self, iu, param) result(ierr) Interface → Reads a frame of output of either test particle or massive body data from a binary output file Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90\n Adapted from Hal Levison's Swift routine io_read_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Calls proc~~io_read_frame_body~~CallsGraph proc~io_read_frame_body io_read_frame_body interface~util_exit util_exit proc~io_read_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_frame_body~~CalledByGraph proc~io_read_frame_body io_read_frame_body interface~io_read_frame_body io_read_frame_body interface~io_read_frame_body->proc~io_read_frame_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_frame_body.html"},{"title":"io_read_frame_cb – swiftest","text":"module function io_read_frame_cb(self, iu, param) result(ierr) Interface → Reads a frame of output of central body data to the binary output file Adapted from David E. Kaufmann's Swifter routine  io_read_frame.f90\n Adapted from Hal Levison's Swift routine io_read_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Calls proc~~io_read_frame_cb~~CallsGraph proc~io_read_frame_cb io_read_frame_cb interface~util_exit util_exit proc~io_read_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_frame_cb~~CalledByGraph proc~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb io_read_frame_cb interface~io_read_frame_cb->proc~io_read_frame_cb Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_frame_cb.html"},{"title":"io_read_frame_system – swiftest","text":"module function io_read_frame_system(self, iu, param) result(ierr) Interface → Read a frame (header plus records for each massive body and active test particle) from a output binary file Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Calls proc~~io_read_frame_system~~CallsGraph proc~io_read_frame_system io_read_frame_system proc~io_read_hdr io_read_hdr proc~io_read_frame_system->proc~io_read_hdr Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_frame_system~~CalledByGraph proc~io_read_frame_system io_read_frame_system interface~io_read_frame_system io_read_frame_system interface~io_read_frame_system->proc~io_read_frame_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_frame_system.html"},{"title":"io_conservation_report – swiftest","text":"module subroutine io_conservation_report(self, param, lterminal) Interface → Reports the current state of energy, mass, and angular momentum conservation in a run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen Calls proc~~io_conservation_report~~CallsGraph proc~io_conservation_report io_conservation_report interface~util_exit util_exit proc~io_conservation_report->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_conservation_report~~CalledByGraph proc~io_conservation_report io_conservation_report interface~io_conservation_report io_conservation_report interface~io_conservation_report->proc~io_conservation_report Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_conservation_report.html"},{"title":"io_dump_param – swiftest","text":"module subroutine io_dump_param(self, param_file_name) Interface → Dump integration parameters to file Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90\n Adapted from Martin Duncan's Swift routine io_dump_param.f\n todo: Currently this procedure does not work in user-defined derived-type input mode \n    due to compiler incompatabilities Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) Calls proc~~io_dump_param~~CallsGraph proc~io_dump_param io_dump_param interface~util_exit util_exit proc~io_dump_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_param~~CalledByGraph proc~io_dump_param io_dump_param interface~io_dump_param io_dump_param interface~io_dump_param->proc~io_dump_param Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_param.html"},{"title":"io_dump_particle_info – swiftest","text":"module subroutine io_dump_particle_info(self, iu) Interface → Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number Calls proc~~io_dump_particle_info~~CallsGraph proc~io_dump_particle_info io_dump_particle_info interface~util_exit util_exit proc~io_dump_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_particle_info~~CalledByGraph proc~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info io_dump_particle_info interface~io_dump_particle_info->proc~io_dump_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_particle_info.html"},{"title":"io_dump_particle_info_base – swiftest","text":"module subroutine io_dump_particle_info_base(self, param, idx) Interface → Dumps the particle information data to a file. \n Pass a list of array indices for test particles (tpidx) and/or massive bodies (plidx) to append Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file Calls proc~~io_dump_particle_info_base~~CallsGraph proc~io_dump_particle_info_base io_dump_particle_info_base interface~util_exit util_exit proc~io_dump_particle_info_base->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_particle_info_base~~CalledByGraph proc~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base io_dump_particle_info_base interface~io_dump_particle_info_base->proc~io_dump_particle_info_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_particle_info_base.html"},{"title":"io_dump_base – swiftest","text":"module subroutine io_dump_base(self, param) Interface → Dump massive body data to files Adapted from David E. Kaufmann's Swifter routine: io_dump_pl.f90 and io_dump_tp.f90\n Adapted from Hal Levison's Swift routine io_dump_pl.f and io_dump_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_dump_base~~CallsGraph proc~io_dump_base io_dump_base interface~util_exit util_exit proc~io_dump_base->interface~util_exit interface~io_write_frame_cb io_write_frame_cb proc~io_dump_base->interface~io_write_frame_cb interface~io_write_frame_body io_write_frame_body proc~io_dump_base->interface~io_write_frame_body proc~util_exit util_exit interface~util_exit->proc~util_exit proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body proc~io_write_frame_body->interface~util_exit proc~io_write_frame_cb->interface~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_base~~CalledByGraph proc~io_dump_base io_dump_base interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_base.html"},{"title":"io_dump_system – swiftest","text":"module subroutine io_dump_system(self, param) Interface → Dumps the state of the system to files in case the simulation is interrupted.\n As a safety mechanism, there are two dump files that are written in alternating order\n so that if a dump file gets corrupted during writing, the user can restart from the older one. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_dump_system~~CallsGraph proc~io_dump_system io_dump_system dump_tp_file dump_tp_file proc~io_dump_system->dump_tp_file dump_param_file dump_param_file proc~io_dump_system->dump_param_file dump_pl_file dump_pl_file proc~io_dump_system->dump_pl_file dump_cb_file dump_cb_file proc~io_dump_system->dump_cb_file Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_dump_system~~CalledByGraph proc~io_dump_system io_dump_system interface~io_dump_system io_dump_system interface~io_dump_system->proc~io_dump_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_dump_system.html"},{"title":"io_param_reader – swiftest","text":"module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Interface → Read in parameters for the integration\n Currently this procedure does not work in user-defined derived-type input mode \n    e.g. read(unit,'(DT)') param \n as the newline characters are ignored in the input file when compiled in ifort. Adapted from David E. Kaufmann's Swifter routine io_init_param.f90\n Adapted from Martin Duncan's Swift routine io_init_param.f\n Do basic sanity checks on the input values Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Calls proc~~io_param_reader~~CallsGraph proc~io_param_reader io_param_reader interface~io_get_token io_get_token proc~io_param_reader->interface~io_get_token interface~io_toupper io_toupper proc~io_param_reader->interface~io_toupper proc~io_get_token io_get_token interface~io_get_token->proc~io_get_token proc~io_toupper io_toupper interface~io_toupper->proc~io_toupper Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_param_reader~~CalledByGraph proc~io_param_reader io_param_reader interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_param_reader.html"},{"title":"io_param_writer – swiftest","text":"module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Interface → Dump integration parameters to file Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90\n Adapted from Martin Duncan's Swift routine io_dump_param.f Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Called by proc~~io_param_writer~~CalledByGraph proc~io_param_writer io_param_writer interface~io_param_writer io_param_writer interface~io_param_writer->proc~io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_param_writer.html"},{"title":"io_read_in_body – swiftest","text":"module subroutine io_read_in_body(self, param) Interface → Read in either test particle or massive body data Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90 and swiftest_init_tp.f90\n Adapted from Martin Duncan's Swift routine swiftest_init_pl.f and swiftest_init_tp.f Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~io_read_in_body~~CalledByGraph proc~io_read_in_body io_read_in_body interface~io_read_in_body io_read_in_body interface~io_read_in_body->proc~io_read_in_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_body.html"},{"title":"io_read_in_cb – swiftest","text":"module subroutine io_read_in_cb(self, param) Interface → Reads in central body data Adapted from David E. Kaufmann's Swifter routine swiftest_init_pl.f90\n Adapted from Martin Duncan's Swift routine swiftest_init_pl.f Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self class( swiftest_parameters ), intent(inout) :: param Calls proc~~io_read_in_cb~~CallsGraph proc~io_read_in_cb io_read_in_cb interface~util_exit util_exit proc~io_read_in_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_in_cb~~CalledByGraph proc~io_read_in_cb io_read_in_cb interface~io_read_in_cb io_read_in_cb interface~io_read_in_cb->proc~io_read_in_cb Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_cb.html"},{"title":"io_read_in_param – swiftest","text":"module subroutine io_read_in_param(self, param_file_name) Interface → Read in parameters for the integration Adapted from David E. Kaufmann's Swifter routine io_init_param.f90\n Adapted from Martin Duncan's Swift routine io_init_param.f\n todo: Currently this procedure does not work in user-defined derived-type input mode \n    as the newline characters are ignored in the input file when compiled in ifort. Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) Calls proc~~io_read_in_param~~CallsGraph proc~io_read_in_param io_read_in_param interface~util_exit util_exit proc~io_read_in_param->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_in_param~~CalledByGraph proc~io_read_in_param io_read_in_param interface~io_read_in_param io_read_in_param interface~io_read_in_param->proc~io_read_in_param Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_param.html"},{"title":"io_read_in_particle_info – swiftest","text":"module subroutine io_read_in_particle_info(self, iu) Interface → Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number Calls proc~~io_read_in_particle_info~~CallsGraph proc~io_read_in_particle_info io_read_in_particle_info interface~util_exit util_exit proc~io_read_in_particle_info->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_in_particle_info~~CalledByGraph proc~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info io_read_in_particle_info interface~io_read_in_particle_info->proc~io_read_in_particle_info Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_in_particle_info.html"},{"title":"io_read_particle_info_system – swiftest","text":"module subroutine io_read_particle_info_system(self, param) Interface → Reads an old particle information file for a restartd run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_read_particle_info_system~~CallsGraph proc~io_read_particle_info_system io_read_particle_info_system interface~util_exit util_exit proc~io_read_particle_info_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_read_particle_info_system~~CalledByGraph proc~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system io_read_particle_info_system interface~io_read_particle_info_system->proc~io_read_particle_info_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_read_particle_info_system.html"},{"title":"io_toupper – swiftest","text":"module subroutine io_toupper(string) Interface → Convert string to uppercase Adapted from David E. Kaufmann's Swifter routine: util_toupper.f90 Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case Called by proc~~io_toupper~~CalledByGraph proc~io_toupper io_toupper interface~io_toupper io_toupper interface~io_toupper->proc~io_toupper proc~io_get_args io_get_args proc~io_get_args->interface~io_toupper proc~io_param_reader io_param_reader proc~io_param_reader->interface~io_toupper interface~io_get_args io_get_args interface~io_get_args->proc~io_get_args interface~io_param_reader io_param_reader interface~io_param_reader->proc~io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_toupper.html"},{"title":"io_write_discard – swiftest","text":"module subroutine io_write_discard(self, param) Interface → Write out information about discarded test particle Adapted from David E. Kaufmann's Swifter routine  io_discard_write.f90\n Adapted from Hal Levison's Swift routine io_discard_write.f Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_write_discard~~CallsGraph proc~io_write_discard io_write_discard interface~util_exit util_exit proc~io_write_discard->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_discard~~CalledByGraph proc~io_write_discard io_write_discard interface~io_write_discard io_write_discard interface~io_write_discard->proc~io_write_discard Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_discard.html"},{"title":"io_write_encounter – swiftest","text":"module subroutine io_write_encounter(self, pl, encbody, param) Interface → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_encounter~~CallsGraph proc~io_write_encounter io_write_encounter ind1 ind1 proc~io_write_encounter->ind1 interface~util_exit util_exit proc~io_write_encounter->interface~util_exit ind2 ind2 proc~io_write_encounter->ind2 proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_encounter~~CalledByGraph proc~io_write_encounter io_write_encounter interface~io_write_encounter io_write_encounter interface~io_write_encounter->proc~io_write_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_encounter.html"},{"title":"io_write_frame_body – swiftest","text":"module subroutine io_write_frame_body(self, iu, param) Interface → Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90\n Adapted from Hal Levison's Swift routine io_write_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_frame_body~~CallsGraph proc~io_write_frame_body io_write_frame_body interface~util_exit util_exit proc~io_write_frame_body->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_body~~CalledByGraph proc~io_write_frame_body io_write_frame_body interface~io_write_frame_body io_write_frame_body interface~io_write_frame_body->proc~io_write_frame_body proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_body interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_body.html"},{"title":"io_write_frame_cb – swiftest","text":"module subroutine io_write_frame_cb(self, iu, param) Interface → Write a frame of output of central body data to the binary output file Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90\n Adapted from Hal Levison's Swift routine io_write_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_frame_cb~~CallsGraph proc~io_write_frame_cb io_write_frame_cb interface~util_exit util_exit proc~io_write_frame_cb->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_cb~~CalledByGraph proc~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb io_write_frame_cb interface~io_write_frame_cb->proc~io_write_frame_cb proc~io_dump_base io_dump_base proc~io_dump_base->interface~io_write_frame_cb interface~io_dump_base io_dump_base interface~io_dump_base->proc~io_dump_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_cb.html"},{"title":"io_write_frame_encounter – swiftest","text":"module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Interface → Write a single frame of close encounter data to output binary files Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90\n Adapted from Hal Levison's Swift routine io_write_encounter.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Heliocentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Heliocentric velocity vectors of the two encountering bodies Calls proc~~io_write_frame_encounter~~CallsGraph proc~io_write_frame_encounter io_write_frame_encounter interface~util_exit util_exit proc~io_write_frame_encounter->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_encounter~~CalledByGraph proc~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter io_write_frame_encounter interface~io_write_frame_encounter->proc~io_write_frame_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_encounter.html"},{"title":"io_write_frame_system – swiftest","text":"module subroutine io_write_frame_system(self, param) Interface → Write a frame (header plus records for each massive body and active test particle) to output binary file\n There is no direct file output from this subroutine Adapted from David E. Kaufmann's Swifter routine  io_write_frame.f90\n Adapted from Hal Levison's Swift routine io_write_frame.F Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~io_write_frame_system~~CallsGraph proc~io_write_frame_system io_write_frame_system interface~util_exit util_exit proc~io_write_frame_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_frame_system~~CalledByGraph proc~io_write_frame_system io_write_frame_system interface~io_write_frame_system io_write_frame_system interface~io_write_frame_system->proc~io_write_frame_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_frame_system.html"},{"title":"io_write_hdr_system – swiftest","text":"module subroutine io_write_hdr_system(self, iu, param) Interface → Write frame header to output binary file Adapted from David Adapted from David E. Kaufmann's Swifter routine io_write_hdr.f90\n Adapted from Hal Levison's Swift routine io_write_hdr.F Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~io_write_hdr_system~~CallsGraph proc~io_write_hdr_system io_write_hdr_system interface~util_exit util_exit proc~io_write_hdr_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~io_write_hdr_system~~CalledByGraph proc~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system io_write_hdr_system interface~io_write_hdr_system->proc~io_write_hdr_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/io_write_hdr_system.html"},{"title":"setup_construct_system – swiftest","text":"module subroutine setup_construct_system(system, param) Interface → Constructor for a Swiftest nbody system. Creates the nbody system object based on the user-input integrator Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Swiftest parameters Calls proc~~setup_construct_system~~CallsGraph proc~setup_construct_system setup_construct_system interface~util_exit util_exit proc~setup_construct_system->interface~util_exit proc~util_exit util_exit interface~util_exit->proc~util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~setup_construct_system~~CalledByGraph proc~setup_construct_system setup_construct_system interface~setup_construct_system setup_construct_system interface~setup_construct_system->proc~setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_construct_system.html"},{"title":"setup_encounter – swiftest","text":"module subroutine setup_encounter(self, n) Interface → A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for Called by proc~~setup_encounter~~CalledByGraph proc~setup_encounter setup_encounter interface~setup_encounter setup_encounter interface~setup_encounter->proc~setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_encounter.html"},{"title":"setup_initialize_particle_info_system – swiftest","text":"module subroutine setup_initialize_particle_info_system(self, param) Interface → Setup up particle information metadata from initial conditions Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~setup_initialize_particle_info_system~~CalledByGraph proc~setup_initialize_particle_info_system setup_initialize_particle_info_system interface~setup_initialize_particle_info_system setup_initialize_particle_info_system interface~setup_initialize_particle_info_system->proc~setup_initialize_particle_info_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_initialize_particle_info_system.html"},{"title":"setup_initialize_system – swiftest","text":"module subroutine setup_initialize_system(self, param) Interface → Wrapper method to initialize a basic Swiftest nbody system from files Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~setup_initialize_system~~CalledByGraph proc~setup_initialize_system setup_initialize_system interface~setup_initialize_system setup_initialize_system interface~setup_initialize_system->proc~setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_initialize_system.html"},{"title":"setup_body – swiftest","text":"module subroutine setup_body(self, n, param) Interface → Constructor for base Swiftest particle class. Allocates space for all particles and\n initializes all components with a value.\n Note: Timing tests indicate that (NDIM, n) is more efficient than (NDIM, n) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Called by proc~~setup_body~~CalledByGraph proc~setup_body setup_body interface~setup_body setup_body interface~setup_body->proc~setup_body proc~setup_pl setup_pl proc~setup_pl->interface~setup_body proc~setup_tp setup_tp proc~setup_tp->interface~setup_body interface~setup_tp setup_tp interface~setup_tp->proc~setup_tp interface~setup_pl setup_pl interface~setup_pl->proc~setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_body.html"},{"title":"setup_pl – swiftest","text":"module subroutine setup_pl(self, n, param) Interface → Constructor for base Swiftest massive body class. Allocates space for all particles and\n initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~setup_pl~~CallsGraph proc~setup_pl setup_pl interface~setup_body setup_body proc~setup_pl->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~setup_pl~~CalledByGraph proc~setup_pl setup_pl interface~setup_pl setup_pl interface~setup_pl->proc~setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_pl.html"},{"title":"setup_tp – swiftest","text":"module subroutine setup_tp(self, n, param) Interface → Constructor for base Swiftest test particle particle class. Allocates space for \n all particles and initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~setup_tp~~CallsGraph proc~setup_tp setup_tp interface~setup_body setup_body proc~setup_tp->interface~setup_body proc~setup_body setup_body interface~setup_body->proc~setup_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~setup_tp~~CalledByGraph proc~setup_tp setup_tp interface~setup_tp setup_tp interface~setup_tp->proc~setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/setup_tp.html"},{"title":"user_kick_getacch_body – swiftest","text":"module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Interface → Add user-supplied heliocentric accelerations to planets. Adapted from David E. Kaufmann's Swifter routine whm_user_kick_getacch.f90 Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters user parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the ste Called by proc~~user_kick_getacch_body~~CalledByGraph proc~user_kick_getacch_body user_kick_getacch_body interface~user_kick_getacch_body user_kick_getacch_body interface~user_kick_getacch_body->proc~user_kick_getacch_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/user_kick_getacch_body.html"},{"title":"drift_body – swiftest","text":"module subroutine drift_body(self, system, param, dt) Interface → Loop bodies and call Danby drift routine on the heliocentric position and velocities. Adapted from Hal Levison's Swift routine drift_tp.f \n Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f90 Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~drift_body~~CallsGraph proc~drift_body drift_body interface~drift_all drift_all proc~drift_body->interface~drift_all proc~drift_all drift_all interface~drift_all->proc~drift_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~drift_body~~CalledByGraph proc~drift_body drift_body interface~drift_body drift_body interface~drift_body->proc~drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_body.html"},{"title":"drift_all – swiftest","text":"module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag) Interface → Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector. Adapted from Hal Levison's Swift routine drift_tp.f \n Adapted from David E. Kaufmann's Swifter routine whm_drift_tp.f9 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: lmask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem Called by proc~~drift_all~~CalledByGraph proc~drift_all drift_all interface~drift_all drift_all interface~drift_all->proc~drift_all proc~drift_body drift_body proc~drift_body->interface~drift_all interface~drift_body drift_body interface~drift_body->proc~drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_all.html"},{"title":"drift_one – swiftest","text":"pure elemental module subroutine drift_one(mu, px, py, pz, vx, vy, vz, dt, iflag) Interface → Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient Adapted from David E. Kaufmann's Swifter routine routine drift_one.f90\n Adapted from Hal Levison and Martin Duncan's Swift routine drift_one.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) Called by proc~~drift_one~~CalledByGraph proc~drift_one drift_one interface~drift_one drift_one interface~drift_one->proc~drift_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/drift_one.html"},{"title":"symba_util_append_arr_kin – swiftest","text":"subroutine symba_util_append_arr_kin(arr, source, nold, nsrc, lsource_mask) Append a single array of kinship type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_arr_kin~~CallsGraph proc~symba_util_append_arr_kin symba_util_append_arr_kin interface~util_resize util_resize proc~symba_util_append_arr_kin->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_arr_kin.html"},{"title":"symba_util_append_encounter – swiftest","text":"module subroutine symba_util_append_encounter(self, source, lsource_mask) Interface → Append components from one encounter list (pl-pl or pl-tp) body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_encounter~~CallsGraph proc~symba_util_append_encounter symba_util_append_encounter interface~util_append util_append proc~symba_util_append_encounter->interface~util_append util_append_encounter util_append_encounter proc~symba_util_append_encounter->util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_encounter~~CalledByGraph proc~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter symba_util_append_encounter interface~symba_util_append_encounter->proc~symba_util_append_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_encounter.html"},{"title":"symba_util_append_pl – swiftest","text":"module subroutine symba_util_append_pl(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_pl~~CallsGraph proc~symba_util_append_pl symba_util_append_pl interface~util_append util_append proc~symba_util_append_pl->interface~util_append util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl util_exit util_exit proc~symba_util_append_pl->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_pl~~CalledByGraph proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl proc~symba_util_append_merger symba_util_append_merger proc~symba_util_append_merger->interface~symba_util_append_pl interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_pl.html"},{"title":"symba_util_append_merger – swiftest","text":"module subroutine symba_util_append_merger(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_merger~~CallsGraph proc~symba_util_append_merger symba_util_append_merger interface~util_append util_append proc~symba_util_append_merger->interface~util_append util_exit util_exit proc~symba_util_append_merger->util_exit interface~symba_util_append_pl symba_util_append_pl proc~symba_util_append_merger->interface~symba_util_append_pl proc~symba_util_append_pl symba_util_append_pl interface~symba_util_append_pl->proc~symba_util_append_pl proc~symba_util_append_pl->interface~util_append proc~symba_util_append_pl->util_exit util_append_pl util_append_pl proc~symba_util_append_pl->util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_merger~~CalledByGraph proc~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger symba_util_append_merger interface~symba_util_append_merger->proc~symba_util_append_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_merger.html"},{"title":"symba_util_append_tp – swiftest","text":"module subroutine symba_util_append_tp(self, source, lsource_mask) Interface → Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~symba_util_append_tp~~CallsGraph proc~symba_util_append_tp symba_util_append_tp interface~util_append util_append proc~symba_util_append_tp->interface~util_append util_exit util_exit proc~symba_util_append_tp->util_exit util_append_tp util_append_tp proc~symba_util_append_tp->util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_append_tp~~CalledByGraph proc~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp symba_util_append_tp interface~symba_util_append_tp->proc~symba_util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_append_tp.html"},{"title":"symba_util_copy_encounter – swiftest","text":"module subroutine symba_util_copy_encounter(self, source) Interface → Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into Calls proc~~symba_util_copy_encounter~~CallsGraph proc~symba_util_copy_encounter symba_util_copy_encounter util_copy_encounter util_copy_encounter proc~symba_util_copy_encounter->util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_copy_encounter~~CalledByGraph proc~symba_util_copy_encounter symba_util_copy_encounter interface~symba_util_copy_encounter symba_util_copy_encounter interface~symba_util_copy_encounter->proc~symba_util_copy_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_copy_encounter.html"},{"title":"symba_util_fill_arr_kin – swiftest","text":"subroutine symba_util_fill_arr_kin(keeps, inserts, lfill_list) Performs a fill operation on a single array of particle kinship types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Contents None","tags":"","loc":"proc/symba_util_fill_arr_kin.html"},{"title":"symba_util_fill_pl – swiftest","text":"module subroutine symba_util_fill_pl(self, inserts, lfill_list) Interface → Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA masive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~symba_util_fill_pl~~CallsGraph proc~symba_util_fill_pl symba_util_fill_pl util_exit util_exit proc~symba_util_fill_pl->util_exit interface~util_fill util_fill proc~symba_util_fill_pl->interface~util_fill util_fill_pl util_fill_pl proc~symba_util_fill_pl->util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_fill_pl~~CalledByGraph proc~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl symba_util_fill_pl interface~symba_util_fill_pl->proc~symba_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_fill_pl.html"},{"title":"symba_util_fill_tp – swiftest","text":"module subroutine symba_util_fill_tp(self, inserts, lfill_list) Interface → Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~symba_util_fill_tp~~CallsGraph proc~symba_util_fill_tp symba_util_fill_tp util_exit util_exit proc~symba_util_fill_tp->util_exit interface~util_fill util_fill proc~symba_util_fill_tp->interface~util_fill util_fill_tp util_fill_tp proc~symba_util_fill_tp->util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_fill_tp~~CalledByGraph proc~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp symba_util_fill_tp interface~symba_util_fill_tp->proc~symba_util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_fill_tp.html"},{"title":"symba_util_index_eucl_plpl – swiftest","text":"module subroutine symba_util_index_eucl_plpl(self, param) Interface → Turns i,j indices into k index for use in the Euclidean distance matrix. This also sets the lmtiny flag and computes the\n number of interactions that excludes semi-interacting bodies with each other (Gmass < GMTINY).\n This method will also sort the bodies in descending order by Mass Reference: Mélodie Angeletti, Jean-Marie Bonny, Jonas Koko. Parallel Euclidean distance matrix computation on big datasets *. 2019. hal-0204751 Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_util_index_eucl_plpl~~CallsGraph proc~symba_util_index_eucl_plpl symba_util_index_eucl_plpl util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~symba_util_index_eucl_plpl->util_index_eucl_ij_to_k Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_index_eucl_plpl~~CalledByGraph proc~symba_util_index_eucl_plpl symba_util_index_eucl_plpl interface~symba_util_index_eucl_plpl symba_util_index_eucl_plpl interface~symba_util_index_eucl_plpl->proc~symba_util_index_eucl_plpl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_index_eucl_plpl.html"},{"title":"symba_util_peri_pl – swiftest","text":"module subroutine symba_util_peri_pl(self, system, param) Interface → Determine system pericenter passages for planets in SyMBA Adapted from David E. Kaufmann's Swifter routine: symba_peri.f90\n Adapted from Hal Levison's Swift routine util_mass_peri.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_util_peri_pl~~CallsGraph proc~symba_util_peri_pl symba_util_peri_pl orbel_xv2aeq orbel_xv2aeq proc~symba_util_peri_pl->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_peri_pl~~CalledByGraph proc~symba_util_peri_pl symba_util_peri_pl interface~symba_util_peri_pl symba_util_peri_pl interface~symba_util_peri_pl->proc~symba_util_peri_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_peri_pl.html"},{"title":"symba_util_rearray_pl – swiftest","text":"module subroutine symba_util_rearray_pl(self, system, param) Interface → Clean up the massive body structures to remove discarded bodies and add new bodies Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system Swiftest nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters Called by proc~~symba_util_rearray_pl~~CalledByGraph proc~symba_util_rearray_pl symba_util_rearray_pl interface~symba_util_rearray_pl symba_util_rearray_pl interface~symba_util_rearray_pl->proc~symba_util_rearray_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_rearray_pl.html"},{"title":"symba_util_reset_kinship – swiftest","text":"module subroutine symba_util_reset_kinship(self, idx) Interface → Resets the kinship status of bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset Called by proc~~symba_util_reset_kinship~~CalledByGraph proc~symba_util_reset_kinship symba_util_reset_kinship interface~symba_util_reset_kinship symba_util_reset_kinship interface~symba_util_reset_kinship->proc~symba_util_reset_kinship Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_reset_kinship.html"},{"title":"symba_util_resize_arr_kin – swiftest","text":"subroutine symba_util_resize_arr_kin(arr, nnew) Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size Contents None","tags":"","loc":"proc/symba_util_resize_arr_kin.html"},{"title":"symba_util_resize_merger – swiftest","text":"module subroutine symba_util_resize_merger(self, nnew) Interface → Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~symba_util_resize_merger~~CallsGraph proc~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_pl symba_util_resize_pl proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~util_resize util_resize proc~symba_util_resize_merger->interface~util_resize proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl proc~symba_util_resize_pl->interface~util_resize util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_resize_merger~~CalledByGraph proc~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_resize_merger.html"},{"title":"symba_util_resize_pl – swiftest","text":"module subroutine symba_util_resize_pl(self, nnew) Interface → Checks the current size of a SyMBA massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~symba_util_resize_pl~~CallsGraph proc~symba_util_resize_pl symba_util_resize_pl util_resize_pl util_resize_pl proc~symba_util_resize_pl->util_resize_pl interface~util_resize util_resize proc~symba_util_resize_pl->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_resize_pl~~CalledByGraph proc~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl symba_util_resize_pl interface~symba_util_resize_pl->proc~symba_util_resize_pl proc~symba_util_resize_merger symba_util_resize_merger proc~symba_util_resize_merger->interface~symba_util_resize_pl interface~symba_util_resize_merger symba_util_resize_merger interface~symba_util_resize_merger->proc~symba_util_resize_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_resize_pl.html"},{"title":"symba_util_resize_tp – swiftest","text":"module subroutine symba_util_resize_tp(self, nnew) Interface → Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~symba_util_resize_tp~~CallsGraph proc~symba_util_resize_tp symba_util_resize_tp util_resize_tp util_resize_tp proc~symba_util_resize_tp->util_resize_tp interface~util_resize util_resize proc~symba_util_resize_tp->interface~util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_resize_tp~~CalledByGraph proc~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp symba_util_resize_tp interface~symba_util_resize_tp->proc~symba_util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_resize_tp.html"},{"title":"symba_util_sort_pl – swiftest","text":"module subroutine symba_util_sort_pl(self, sortby, ascending) Interface → Sort a SyMBA massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~symba_util_sort_pl~~CallsGraph proc~symba_util_sort_pl symba_util_sort_pl util_sort_pl util_sort_pl proc~symba_util_sort_pl->util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_pl~~CalledByGraph proc~symba_util_sort_pl symba_util_sort_pl interface~symba_util_sort_pl symba_util_sort_pl interface~symba_util_sort_pl->proc~symba_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_pl.html"},{"title":"symba_util_sort_tp – swiftest","text":"module subroutine symba_util_sort_tp(self, sortby, ascending) Interface → Sort a SyMBA test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~symba_util_sort_tp~~CallsGraph proc~symba_util_sort_tp symba_util_sort_tp util_sort_tp util_sort_tp proc~symba_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_tp~~CalledByGraph proc~symba_util_sort_tp symba_util_sort_tp interface~symba_util_sort_tp symba_util_sort_tp interface~symba_util_sort_tp->proc~symba_util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_tp.html"},{"title":"symba_util_sort_rearrange_arr_kin – swiftest","text":"subroutine symba_util_sort_rearrange_arr_kin(arr, ind, n) Rearrange a single array of particle kinship type in-place from an index list. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange Contents None","tags":"","loc":"proc/symba_util_sort_rearrange_arr_kin.html"},{"title":"symba_util_sort_rearrange_pl – swiftest","text":"module subroutine symba_util_sort_rearrange_pl(self, ind) Interface → Rearrange SyMBA massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~symba_util_sort_rearrange_pl~~CallsGraph proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~symba_util_sort_rearrange_pl->util_sort_rearrange_pl interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_pl->interface~util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_rearrange_pl~~CalledByGraph proc~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl symba_util_sort_rearrange_pl interface~symba_util_sort_rearrange_pl->proc~symba_util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_rearrange_pl.html"},{"title":"symba_util_sort_rearrange_tp – swiftest","text":"module subroutine symba_util_sort_rearrange_tp(self, ind) Interface → Rearrange SyMBA test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~symba_util_sort_rearrange_tp~~CallsGraph proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp util_sort_rearrange_tp util_sort_rearrange_tp proc~symba_util_sort_rearrange_tp->util_sort_rearrange_tp interface~util_sort_rearrange util_sort_rearrange proc~symba_util_sort_rearrange_tp->interface~util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_sort_rearrange_tp~~CalledByGraph proc~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp symba_util_sort_rearrange_tp interface~symba_util_sort_rearrange_tp->proc~symba_util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_sort_rearrange_tp.html"},{"title":"symba_util_spill_arr_kin – swiftest","text":"subroutine symba_util_spill_arr_kin(keeps, discards, lspill_list, ldestructive) Performs a spill operation on a single array of particle kinships\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Contents None","tags":"","loc":"proc/symba_util_spill_arr_kin.html"},{"title":"symba_util_spill_pl – swiftest","text":"module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) SyMBA massive body particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~symba_util_spill_pl~~CallsGraph proc~symba_util_spill_pl symba_util_spill_pl util_exit util_exit proc~symba_util_spill_pl->util_exit interface~util_spill util_spill proc~symba_util_spill_pl->interface~util_spill util_spill_pl util_spill_pl proc~symba_util_spill_pl->util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_spill_pl~~CalledByGraph proc~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl symba_util_spill_pl interface~symba_util_spill_pl->proc~symba_util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_spill_pl.html"},{"title":"symba_util_spill_encounter – swiftest","text":"module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) SyMBA encounter structure from active list to discard list\n Note: Because the symba_plplenc currently does not contain any additional variable components, this method can recieve it as an input as well. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~symba_util_spill_encounter~~CallsGraph proc~symba_util_spill_encounter symba_util_spill_encounter util_exit util_exit proc~symba_util_spill_encounter->util_exit interface~util_spill util_spill proc~symba_util_spill_encounter->interface~util_spill util_spill_encounter util_spill_encounter proc~symba_util_spill_encounter->util_spill_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_spill_encounter~~CalledByGraph proc~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter symba_util_spill_encounter interface~symba_util_spill_encounter->proc~symba_util_spill_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_spill_encounter.html"},{"title":"symba_util_spill_tp – swiftest","text":"module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) SyMBA test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list Calls proc~~symba_util_spill_tp~~CallsGraph proc~symba_util_spill_tp symba_util_spill_tp util_exit util_exit proc~symba_util_spill_tp->util_exit interface~util_spill util_spill proc~symba_util_spill_tp->interface~util_spill util_spill_tp util_spill_tp proc~symba_util_spill_tp->util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_util_spill_tp~~CalledByGraph proc~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp symba_util_spill_tp interface~symba_util_spill_tp->proc~symba_util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_util_spill_tp.html"},{"title":"symba_collision_casedisruption – swiftest","text":"module function symba_collision_casedisruption(system, param, colliders, frag) result(status) Interface → Create the fragments resulting from a non-catastrophic disruption collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome Calls proc~~symba_collision_casedisruption~~CallsGraph proc~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casedisruption->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_casedisruption~~CalledByGraph proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_casedisruption.html"},{"title":"symba_collision_casehitandrun – swiftest","text":"module function symba_collision_casehitandrun(system, param, colliders, frag) result(status) Interface → Create the fragments resulting from a non-catastrophic hit-and-run collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcom Calls proc~~symba_collision_casehitandrun~~CallsGraph proc~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casehitandrun->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_casehitandrun~~CalledByGraph proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_casehitandrun.html"},{"title":"symba_collision_casemerge – swiftest","text":"module function symba_collision_casemerge(system, param, colliders, frag) result(status) Interface → Merge massive bodies. Adapted from David E. Kaufmann's Swifter routines symba_merge_pl.f90 and symba_discard_merge_pl.f90 Adapted from Hal Levison's Swift routines symba5_merge.f and discard_mass_merge.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome Calls proc~~symba_collision_casemerge~~CallsGraph proc~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_casemerge~~CalledByGraph proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_resolve_mergers symba_collision_resolve_mergers proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_casemerge.html"},{"title":"symba_collision_check_encounter – swiftest","text":"module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Interface → Check for merger between massive bodies and test particles in SyMBA Adapted from David E. Kaufmann's Swifter routine symba_merge.f90 and symba_merge_tp.f90 Adapted from Hal Levison's Swift routine symba5_merge.f Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision Calls proc~~symba_collision_check_encounter~~CallsGraph proc~symba_collision_check_encounter symba_collision_check_encounter proc~symba_collision_check_one symba_collision_check_one proc~symba_collision_check_encounter->proc~symba_collision_check_one fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_check_encounter->fraggle_io_log_one_message orbel_xv2aeq orbel_xv2aeq proc~symba_collision_check_one->orbel_xv2aeq Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_check_encounter~~CalledByGraph proc~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter symba_collision_check_encounter interface~symba_collision_check_encounter->proc~symba_collision_check_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_check_encounter.html"},{"title":"symba_collision_encounter_extract_collisions – swiftest","text":"module subroutine symba_collision_encounter_extract_collisions(self, system, param) Interface → Processes the pl-pl encounter list remove only those encounters that led to a collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~symba_collision_encounter_extract_collisions~~CallsGraph proc~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions idx2 idx2 proc~symba_collision_encounter_extract_collisions->idx2 idx1 idx1 proc~symba_collision_encounter_extract_collisions->idx1 Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_encounter_extract_collisions~~CalledByGraph proc~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions interface~symba_collision_encounter_extract_collisions symba_collision_encounter_extract_collisions interface~symba_collision_encounter_extract_collisions->proc~symba_collision_encounter_extract_collisions Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_encounter_extract_collisions.html"},{"title":"symba_collision_make_colliders_pl – swiftest","text":"module subroutine symba_collision_make_colliders_pl(self, idx) Interface → When a single body is involved in more than one collision in a single step, it becomes part of a colliders%idx.\n The largest body involved in a multi-body collision is the \"parent\" and all bodies that collide with it are its \"children,\"\n including those that collide with the children. Adapted from David E. Kaufmann's Swifter routine symba_merge_pl.f90 Adapted from Hal Levison's Swift routine symba5_merge.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision Called by proc~~symba_collision_make_colliders_pl~~CalledByGraph proc~symba_collision_make_colliders_pl symba_collision_make_colliders_pl interface~symba_collision_make_colliders_pl symba_collision_make_colliders_pl interface~symba_collision_make_colliders_pl->proc~symba_collision_make_colliders_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_make_colliders_pl.html"},{"title":"symba_collision_resolve_fragmentations – swiftest","text":"module subroutine symba_collision_resolve_fragmentations(self, system, param) Interface → Process list of collisions, determine the collisional regime, and then create fragments. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions Calls proc~~symba_collision_resolve_fragmentations~~CallsGraph proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations idx2 idx2 proc~symba_collision_resolve_fragmentations->idx2 util_exit util_exit proc~symba_collision_resolve_fragmentations->util_exit idx1 idx1 proc~symba_collision_resolve_fragmentations->idx1 proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_fragmentations->proc~symba_collision_consolidate_colliders interface~symba_collision_casedisruption symba_collision_casedisruption proc~symba_collision_resolve_fragmentations->interface~symba_collision_casedisruption interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_fragmentations->interface~symba_collision_casemerge interface~symba_collision_casehitandrun symba_collision_casehitandrun proc~symba_collision_resolve_fragmentations->interface~symba_collision_casehitandrun idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr proc~symba_collision_casedisruption symba_collision_casedisruption interface~symba_collision_casedisruption->proc~symba_collision_casedisruption proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_casehitandrun symba_collision_casehitandrun interface~symba_collision_casehitandrun->proc~symba_collision_casehitandrun proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casedisruption->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casedisruption->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casedisruption->fraggle_io_log_one_message proc~symba_collision_casehitandrun->proc~symba_collision_collider_message proc~symba_collision_casehitandrun->proc~symba_collision_mergeaddsub proc~symba_collision_casehitandrun->fraggle_io_log_one_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_resolve_fragmentations~~CalledByGraph proc~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations symba_collision_resolve_fragmentations interface~symba_collision_resolve_fragmentations->proc~symba_collision_resolve_fragmentations Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_fragmentations.html"},{"title":"symba_collision_resolve_mergers – swiftest","text":"module subroutine symba_collision_resolve_mergers(self, system, param) Interface → Process list of collisions and merge colliding bodies together. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions Calls proc~~symba_collision_resolve_mergers~~CallsGraph proc~symba_collision_resolve_mergers symba_collision_resolve_mergers idx2 idx2 proc~symba_collision_resolve_mergers->idx2 proc~symba_collision_consolidate_colliders symba_collision_consolidate_colliders proc~symba_collision_resolve_mergers->proc~symba_collision_consolidate_colliders idx1 idx1 proc~symba_collision_resolve_mergers->idx1 interface~symba_collision_casemerge symba_collision_casemerge proc~symba_collision_resolve_mergers->interface~symba_collision_casemerge idx_arr idx_arr proc~symba_collision_consolidate_colliders->idx_arr id_arr id_arr proc~symba_collision_consolidate_colliders->id_arr proc~symba_collision_casemerge symba_collision_casemerge interface~symba_collision_casemerge->proc~symba_collision_casemerge proc~symba_collision_collider_message symba_collision_collider_message proc~symba_collision_casemerge->proc~symba_collision_collider_message proc~symba_collision_mergeaddsub symba_collision_mergeaddsub proc~symba_collision_casemerge->proc~symba_collision_mergeaddsub fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_casemerge->fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_pl proc~symba_collision_mergeaddsub->fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_resolve_mergers~~CalledByGraph proc~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers symba_collision_resolve_mergers interface~symba_collision_resolve_mergers->proc~symba_collision_resolve_mergers Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_mergers.html"},{"title":"symba_collision_resolve_plplenc – swiftest","text":"module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Interface → Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level Calls proc~~symba_collision_resolve_plplenc~~CallsGraph proc~symba_collision_resolve_plplenc symba_collision_resolve_plplenc fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_collision_resolve_plplenc->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_collision_resolve_plplenc~~CalledByGraph proc~symba_collision_resolve_plplenc symba_collision_resolve_plplenc interface~symba_collision_resolve_plplenc symba_collision_resolve_plplenc interface~symba_collision_resolve_plplenc->proc~symba_collision_resolve_plplenc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_plplenc.html"},{"title":"symba_collision_resolve_pltpenc – swiftest","text":"module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Interface → Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation tim real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level Called by proc~~symba_collision_resolve_pltpenc~~CalledByGraph proc~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc interface~symba_collision_resolve_pltpenc symba_collision_resolve_pltpenc interface~symba_collision_resolve_pltpenc->proc~symba_collision_resolve_pltpenc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_collision_resolve_pltpenc.html"},{"title":"symba_setup_initialize_system – swiftest","text":"module subroutine symba_setup_initialize_system(self, param) Interface → Initialize an SyMBA nbody system from files and sets up the planetocentric structures.\n This subroutine will also sort the massive bodies in descending order by mass Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~symba_setup_initialize_system~~CallsGraph proc~symba_setup_initialize_system symba_setup_initialize_system helio_setup_initialize_system helio_setup_initialize_system proc~symba_setup_initialize_system->helio_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_initialize_system~~CalledByGraph proc~symba_setup_initialize_system symba_setup_initialize_system interface~symba_setup_initialize_system symba_setup_initialize_system interface~symba_setup_initialize_system->proc~symba_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_initialize_system.html"},{"title":"symba_setup_merger – swiftest","text":"module subroutine symba_setup_merger(self, n, param) Interface → Allocate SyMBA test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90\n Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~symba_setup_merger~~CallsGraph proc~symba_setup_merger symba_setup_merger interface~symba_setup_pl symba_setup_pl proc~symba_setup_merger->interface~symba_setup_pl proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_merger~~CalledByGraph proc~symba_setup_merger symba_setup_merger interface~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_merger.html"},{"title":"symba_setup_pl – swiftest","text":"module subroutine symba_setup_pl(self, n, param) Interface → Allocate SyMBA test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine symba_setup.f90\n Call allocation method for parent class. In this case, helio_pl does not have its own setup method so we use the base method for swiftest_pl Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~symba_setup_pl~~CallsGraph proc~symba_setup_pl symba_setup_pl setup_pl setup_pl proc~symba_setup_pl->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_pl~~CalledByGraph proc~symba_setup_pl symba_setup_pl interface~symba_setup_pl symba_setup_pl interface~symba_setup_pl->proc~symba_setup_pl proc~symba_setup_merger symba_setup_merger proc~symba_setup_merger->interface~symba_setup_pl interface~symba_setup_merger symba_setup_merger interface~symba_setup_merger->proc~symba_setup_merger Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_pl.html"},{"title":"symba_setup_encounter – swiftest","text":"module subroutine symba_setup_encounter(self, n) Interface → A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for Calls proc~~symba_setup_encounter~~CallsGraph proc~symba_setup_encounter symba_setup_encounter setup_encounter setup_encounter proc~symba_setup_encounter->setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_encounter~~CalledByGraph proc~symba_setup_encounter symba_setup_encounter interface~symba_setup_encounter symba_setup_encounter interface~symba_setup_encounter->proc~symba_setup_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_encounter.html"},{"title":"symba_setup_tp – swiftest","text":"module subroutine symba_setup_tp(self, n, param) Interface → Allocate WHM test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90\n Call allocation method for parent class. In this case, helio_tp does not have its own setup method so we use the base method for swiftest_tp Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter Calls proc~~symba_setup_tp~~CallsGraph proc~symba_setup_tp symba_setup_tp setup_tp setup_tp proc~symba_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_setup_tp~~CalledByGraph proc~symba_setup_tp symba_setup_tp interface~symba_setup_tp symba_setup_tp interface~symba_setup_tp->proc~symba_setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_setup_tp.html"},{"title":"symba_kick_getacch_int_pl – swiftest","text":"module subroutine symba_kick_getacch_int_pl(self) Interface → Compute direct cross (third) term heliocentric accelerations of massive bodies, with no mutual interactions between bodies below GMTINY Adapted from Hal Levison's Swift routine symba5_helio_getacch.f\n Adapted from David E. Kaufmann's Swifter routine helio_kick_getacch_int.f90 Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Calls proc~~symba_kick_getacch_int_pl~~CallsGraph proc~symba_kick_getacch_int_pl symba_kick_getacch_int_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_int_pl->kick_getacch_int_all_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_kick_getacch_int_pl~~CalledByGraph proc~symba_kick_getacch_int_pl symba_kick_getacch_int_pl interface~symba_kick_getacch_int_pl symba_kick_getacch_int_pl interface~symba_kick_getacch_int_pl->proc~symba_kick_getacch_int_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_getacch_int_pl.html"},{"title":"symba_kick_getacch_pl – swiftest","text":"module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of massive bodies Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch.f90\n Adapted from Hal Levison's Swift routine symba5_kick_getacch.f Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~symba_kick_getacch_pl~~CallsGraph proc~symba_kick_getacch_pl symba_kick_getacch_pl kick_getacch_int_all_pl kick_getacch_int_all_pl proc~symba_kick_getacch_pl->kick_getacch_int_all_pl helio_kick_getacch_pl helio_kick_getacch_pl proc~symba_kick_getacch_pl->helio_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_kick_getacch_pl~~CalledByGraph proc~symba_kick_getacch_pl symba_kick_getacch_pl interface~symba_kick_getacch_pl symba_kick_getacch_pl interface~symba_kick_getacch_pl->proc~symba_kick_getacch_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_getacch_pl.html"},{"title":"symba_kick_getacch_tp – swiftest","text":"module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute heliocentric accelerations of test particles Adapted from David E. Kaufmann's Swifter routine symba_kick_getacch_tp.f90\n Adapted from Hal Levison's Swift routine symba5_kick_getacch.f Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~symba_kick_getacch_tp~~CallsGraph proc~symba_kick_getacch_tp symba_kick_getacch_tp helio_kick_getacch_tp helio_kick_getacch_tp proc~symba_kick_getacch_tp->helio_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_kick_getacch_tp~~CalledByGraph proc~symba_kick_getacch_tp symba_kick_getacch_tp interface~symba_kick_getacch_tp symba_kick_getacch_tp interface~symba_kick_getacch_tp->proc~symba_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_getacch_tp.html"},{"title":"symba_kick_encounter – swiftest","text":"module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Interface → Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types Adapted from David E. Kaufmann's Swifter routine: symba_kick.f90\n Adapted from Hal Levison's Swift routine symba5_kick.f Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration Called by proc~~symba_kick_encounter~~CalledByGraph proc~symba_kick_encounter symba_kick_encounter interface~symba_kick_encounter symba_kick_encounter interface~symba_kick_encounter->proc~symba_kick_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_kick_encounter.html"},{"title":"symba_encounter_check_pl – swiftest","text":"module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Interface → Check for an encounter between massive bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Calls proc~~symba_encounter_check_pl~~CallsGraph proc~symba_encounter_check_pl symba_encounter_check_pl util_index_eucl_ij_to_k util_index_eucl_ij_to_k proc~symba_encounter_check_pl->util_index_eucl_ij_to_k proc~symba_encounter_check_all symba_encounter_check_all proc~symba_encounter_check_pl->proc~symba_encounter_check_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_encounter_check_pl~~CalledByGraph proc~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl symba_encounter_check_pl interface~symba_encounter_check_pl->proc~symba_encounter_check_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_pl.html"},{"title":"symba_encounter_check – swiftest","text":"module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Interface → Check for an encounter between test particles and massive bodies in the pltpenc list.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types. Adapted from portions of David E. Kaufmann's Swifter routine: symba_step_recur.f90 Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Called by proc~~symba_encounter_check~~CalledByGraph proc~symba_encounter_check symba_encounter_check interface~symba_encounter_check symba_encounter_check interface~symba_encounter_check->proc~symba_encounter_check Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check.html"},{"title":"symba_encounter_check_tp – swiftest","text":"module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Interface → Check for an encounter between test particles and massive bodies. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Called by proc~~symba_encounter_check_tp~~CalledByGraph proc~symba_encounter_check_tp symba_encounter_check_tp interface~symba_encounter_check_tp symba_encounter_check_tp interface~symba_encounter_check_tp->proc~symba_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_tp.html"},{"title":"symba_encounter_check_one – swiftest","text":"pure module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Interface → Check for an encounter. Adapted from David E. Kaufmann's Swifter routine: symba_chk.f90\n Adapted from Hal Levison's Swift routine symba5_chk.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr Calls proc~~symba_encounter_check_one~~CallsGraph proc~symba_encounter_check_one symba_encounter_check_one rmvs_chk_ind rmvs_chk_ind proc~symba_encounter_check_one->rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_encounter_check_one~~CalledByGraph proc~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one symba_encounter_check_one interface~symba_encounter_check_one->proc~symba_encounter_check_one Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_encounter_check_one.html"},{"title":"symba_io_param_reader – swiftest","text":"module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Interface → Read in parameters specific to the SyMBA integrator, then calls the base io_param_reader. Adapted from David E. Kaufmann's Swifter routine io_init_param.f90\n Adapted from Martin Duncan's Swift routine io_init_param.f Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Calls proc~~symba_io_param_reader~~CallsGraph proc~symba_io_param_reader symba_io_param_reader io_get_token io_get_token proc~symba_io_param_reader->io_get_token io_toupper io_toupper proc~symba_io_param_reader->io_toupper io_param_reader io_param_reader proc~symba_io_param_reader->io_param_reader fraggle_io_log_start fraggle_io_log_start proc~symba_io_param_reader->fraggle_io_log_start Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_io_param_reader~~CalledByGraph proc~symba_io_param_reader symba_io_param_reader interface~symba_io_param_reader symba_io_param_reader interface~symba_io_param_reader->proc~symba_io_param_reader Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_io_param_reader.html"},{"title":"symba_io_param_writer – swiftest","text":"module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Interface → Dump integration parameters specific to SyMBA to file and then call the base io_param_writer method. Adapted from David E. Kaufmann's Swifter routine io_dump_param.f90\n Adapted from Martin Duncan's Swift routine io_dump_param.f Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Collection of SyMBA parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 Calls proc~~symba_io_param_writer~~CallsGraph proc~symba_io_param_writer symba_io_param_writer io_param_writer io_param_writer proc~symba_io_param_writer->io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_io_param_writer~~CalledByGraph proc~symba_io_param_writer symba_io_param_writer interface~symba_io_param_writer symba_io_param_writer interface~symba_io_param_writer->proc~symba_io_param_writer Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_io_param_writer.html"},{"title":"symba_io_write_discard – swiftest","text":"module subroutine symba_io_write_discard(self, param) Interface → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~symba_io_write_discard~~CallsGraph proc~symba_io_write_discard symba_io_write_discard util_exit util_exit proc~symba_io_write_discard->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_io_write_discard~~CalledByGraph proc~symba_io_write_discard symba_io_write_discard interface~symba_io_write_discard symba_io_write_discard interface~symba_io_write_discard->proc~symba_io_write_discard Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_io_write_discard.html"},{"title":"symba_discard_pl – swiftest","text":"module subroutine symba_discard_pl(self, system, param) Interface → Call the various flavors of discards for massive bodies in SyMBA runs, including discards due to colliding with the central body or escaping the system Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Calls proc~~symba_discard_pl~~CallsGraph proc~symba_discard_pl symba_discard_pl proc~symba_discard_nonplpl symba_discard_nonplpl proc~symba_discard_pl->proc~symba_discard_nonplpl proc~symba_discard_nonplpl_conservation symba_discard_nonplpl_conservation proc~symba_discard_pl->proc~symba_discard_nonplpl_conservation proc~symba_discard_cb_pl symba_discard_cb_pl proc~symba_discard_nonplpl->proc~symba_discard_cb_pl fraggle_io_log_one_message fraggle_io_log_one_message proc~symba_discard_cb_pl->fraggle_io_log_one_message Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_discard_pl~~CalledByGraph proc~symba_discard_pl symba_discard_pl interface~symba_discard_pl symba_discard_pl interface~symba_discard_pl->proc~symba_discard_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_discard_pl.html"},{"title":"symba_step_system – swiftest","text":"module subroutine symba_step_system(self, param, t, dt) Interface → Step planets and active test particles ahead in democratic heliocentric coordinates, descending the recursive\n   branch if necessary to handle possible close encounters Adapted from David E. Kaufmann's Swifter routine: symba_step.f90\n Adapted from Hal Levison's Swift routine symba5_step_pl.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Calls proc~~symba_step_system~~CallsGraph proc~symba_step_system symba_step_system helio_step_system helio_step_system proc~symba_step_system->helio_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_step_system~~CalledByGraph proc~symba_step_system symba_step_system interface~symba_step_system symba_step_system interface~symba_step_system->proc~symba_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_system.html"},{"title":"symba_step_interp_system – swiftest","text":"module subroutine symba_step_interp_system(self, param, t, dt) Interface → Step planets and active test particles ahead in democratic heliocentric coordinates, calling the recursive\n         subroutine to descend to the appropriate level to handle close encounters Adapted from David E. Kaufmann's Swifter routine: symba_step_interp.f90\n Adapted from Hal Levison's Swift routine symba5_step_interp.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~symba_step_interp_system~~CalledByGraph proc~symba_step_interp_system symba_step_interp_system interface~symba_step_interp_system symba_step_interp_system interface~symba_step_interp_system->proc~symba_step_interp_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_interp_system.html"},{"title":"symba_step_set_recur_levels_system – swiftest","text":"module subroutine symba_step_set_recur_levels_system(self, ireci) Interface → Resets pl, tp,and encounter structures at the start of a new step Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90\n Adapted from Hal Levison's Swift routine symba5_step_recur.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object integer(kind=I4B), intent(in) :: ireci Input recursion level Called by proc~~symba_step_set_recur_levels_system~~CalledByGraph proc~symba_step_set_recur_levels_system symba_step_set_recur_levels_system interface~symba_step_set_recur_levels_system symba_step_set_recur_levels_system interface~symba_step_set_recur_levels_system->proc~symba_step_set_recur_levels_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_set_recur_levels_system.html"},{"title":"symba_step_recur_system – swiftest","text":"recursive module subroutine symba_step_recur_system(self, param, t, ireci) Interface → Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current\n         recursion level, if applicable, and descend to the next deeper level if necessarys Adapted from David E. Kaufmann's Swifter routine: symba_step_recur.f90\n Adapted from Hal Levison's Swift routine symba5_step_recur.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level Calls proc~~symba_step_recur_system~~CallsGraph proc~symba_step_recur_system symba_step_recur_system util_exit util_exit proc~symba_step_recur_system->util_exit Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_step_recur_system~~CalledByGraph proc~symba_step_recur_system symba_step_recur_system interface~symba_step_recur_system symba_step_recur_system interface~symba_step_recur_system->proc~symba_step_recur_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_recur_system.html"},{"title":"symba_step_reset_system – swiftest","text":"module subroutine symba_step_reset_system(self, param) Interface → Resets pl, tp,and encounter structures at the start of a new step Adapted from David E. Kaufmann's Swifter routine: symba_step.f90\n Adapted from Hal Levison's Swift routine symba5_step.f Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions Called by proc~~symba_step_reset_system~~CalledByGraph proc~symba_step_reset_system symba_step_reset_system interface~symba_step_reset_system symba_step_reset_system interface~symba_step_reset_system->proc~symba_step_reset_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_step_reset_system.html"},{"title":"symba_drift_pl – swiftest","text":"module subroutine symba_drift_pl(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~symba_drift_pl~~CallsGraph proc~symba_drift_pl symba_drift_pl helio_drift_body helio_drift_body proc~symba_drift_pl->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_drift_pl~~CalledByGraph proc~symba_drift_pl symba_drift_pl interface~symba_drift_pl symba_drift_pl interface~symba_drift_pl->proc~symba_drift_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_drift_pl.html"},{"title":"symba_drift_tp – swiftest","text":"module subroutine symba_drift_tp(self, system, param, dt) Interface → Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize Calls proc~~symba_drift_tp~~CallsGraph proc~symba_drift_tp symba_drift_tp helio_drift_body helio_drift_body proc~symba_drift_tp->helio_drift_body Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~symba_drift_tp~~CalledByGraph proc~symba_drift_tp symba_drift_tp interface~symba_drift_tp symba_drift_tp interface~symba_drift_tp->proc~symba_drift_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/symba_drift_tp.html"},{"title":"netcdf_close – swiftest","text":"module subroutine netcdf_close(self, param) Interface → Closes a NetCDF file Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_close~~CallsGraph proc~netcdf_close netcdf_close nf90_close nf90_close proc~netcdf_close->nf90_close Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_close~~CalledByGraph proc~netcdf_close netcdf_close interface~netcdf_close netcdf_close interface~netcdf_close->proc~netcdf_close Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_close.html"},{"title":"netcdf_initialize_output – swiftest","text":"module subroutine netcdf_initialize_output(self, param) Interface → Uses ieee_arithmetic proc~~netcdf_initialize_output~~UsesGraph proc~netcdf_initialize_output netcdf_initialize_output ieee_arithmetic ieee_arithmetic proc~netcdf_initialize_output->ieee_arithmetic Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Initialize a NetCDF file system and defines all variables.\n Create the new output file, deleting any previously existing output file of the same name\n Define the variables Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_initialize_output~~CallsGraph proc~netcdf_initialize_output netcdf_initialize_output nf90_def_var nf90_def_var proc~netcdf_initialize_output->nf90_def_var nf90_def_dim nf90_def_dim proc~netcdf_initialize_output->nf90_def_dim nf90_create nf90_create proc~netcdf_initialize_output->nf90_create nf90_def_var_fill nf90_def_var_fill proc~netcdf_initialize_output->nf90_def_var_fill nf90_inquire nf90_inquire proc~netcdf_initialize_output->nf90_inquire nf90_inquire_variable nf90_inquire_variable proc~netcdf_initialize_output->nf90_inquire_variable Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_initialize_output~~CalledByGraph proc~netcdf_initialize_output netcdf_initialize_output interface~netcdf_initialize_output netcdf_initialize_output interface~netcdf_initialize_output->proc~netcdf_initialize_output Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_initialize_output.html"},{"title":"netcdf_open – swiftest","text":"module subroutine netcdf_open(self, param) Interface → Opens a NetCDF file and does the variable inquiries to activate variable ids Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_open~~CallsGraph proc~netcdf_open netcdf_open nf90_inq_varid nf90_inq_varid proc~netcdf_open->nf90_inq_varid nf90_open nf90_open proc~netcdf_open->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_open~~CalledByGraph proc~netcdf_open netcdf_open interface~netcdf_open netcdf_open interface~netcdf_open->proc~netcdf_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_open.html"},{"title":"netcdf_write_frame_base – swiftest","text":"module subroutine netcdf_write_frame_base(self, iu, param) Interface → Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_write_frame_base~~CallsGraph proc~netcdf_write_frame_base netcdf_write_frame_base nf90_set_fill nf90_set_fill proc~netcdf_write_frame_base->nf90_set_fill nf90_put_var nf90_put_var proc~netcdf_write_frame_base->nf90_put_var interface~util_sort util_sort proc~netcdf_write_frame_base->interface~util_sort Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_write_frame_base~~CalledByGraph proc~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base netcdf_write_frame_base interface~netcdf_write_frame_base->proc~netcdf_write_frame_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_write_frame_base.html"},{"title":"netcdf_write_particle_info_base – swiftest","text":"module subroutine netcdf_write_particle_info_base(self, iu) Interface → Write all current particle to file Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset Calls proc~~netcdf_write_particle_info_base~~CallsGraph proc~netcdf_write_particle_info_base netcdf_write_particle_info_base nf90_set_fill nf90_set_fill proc~netcdf_write_particle_info_base->nf90_set_fill nf90_put_var nf90_put_var proc~netcdf_write_particle_info_base->nf90_put_var interface~util_sort util_sort proc~netcdf_write_particle_info_base->interface~util_sort Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_write_particle_info_base~~CalledByGraph proc~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base netcdf_write_particle_info_base interface~netcdf_write_particle_info_base->proc~netcdf_write_particle_info_base Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_write_particle_info_base.html"},{"title":"netcdf_write_hdr_system – swiftest","text":"module subroutine netcdf_write_hdr_system(self, iu, param) Interface → Writes header information (variables that change with time, but not particle id). \n This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that \n previously were handled as separate output files. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Calls proc~~netcdf_write_hdr_system~~CallsGraph proc~netcdf_write_hdr_system netcdf_write_hdr_system nf90_put_var nf90_put_var proc~netcdf_write_hdr_system->nf90_put_var nf90_open nf90_open proc~netcdf_write_hdr_system->nf90_open Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~netcdf_write_hdr_system~~CalledByGraph proc~netcdf_write_hdr_system netcdf_write_hdr_system interface~netcdf_write_hdr_system netcdf_write_hdr_system interface~netcdf_write_hdr_system->proc~netcdf_write_hdr_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/netcdf_write_hdr_system.html"},{"title":"fraggle_util_vmag_to_vb – swiftest","text":"module function fraggle_util_vmag_to_vb(v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Interface → Converts radial and tangential velocity magnitudes into barycentric velocity Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:),allocatable Calls proc~~fraggle_util_vmag_to_vb~~CallsGraph proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_util_vmag_to_vb~~CalledByGraph proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_vmag_to_vb.html"},{"title":"fraggle_util_add_fragments_to_system – swiftest","text":"module subroutine fraggle_util_add_fragments_to_system(frag, colliders, system, param) Interface → Adds fragments to the temporary system pl object Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters Called by proc~~fraggle_util_add_fragments_to_system~~CalledByGraph proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_add_fragments_to_system.html"},{"title":"fraggle_util_ang_mtm – swiftest","text":"module subroutine fraggle_util_ang_mtm(self) Interface → Calcualtes the current angular momentum of the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object Called by proc~~fraggle_util_ang_mtm~~CalledByGraph proc~fraggle_util_ang_mtm fraggle_util_ang_mtm interface~fraggle_util_ang_mtm fraggle_util_ang_mtm interface~fraggle_util_ang_mtm->proc~fraggle_util_ang_mtm Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_ang_mtm.html"},{"title":"fraggle_util_construct_temporary_system – swiftest","text":"module subroutine fraggle_util_construct_temporary_system(frag, system, param, tmpsys, tmpparam) Interface → Constructs a temporary internal system consisting of active bodies and additional fragments. This internal temporary system is used to calculate system energy with and without fragments\n and optionally including fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters Calls proc~~fraggle_util_construct_temporary_system~~CallsGraph proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_util_construct_temporary_system~~CalledByGraph proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_construct_temporary_system.html"},{"title":"fraggle_util_get_energy_momentum – swiftest","text":"module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Interface → Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.)\n This subrourtine works by building a temporary internal massive body object out of the non-excluded bodies and optionally with fragments appended. \n This will get passed to the energy calculation subroutine so that energy is computed exactly the same way is it is in the main program. \n This will temporarily expand the massive body object in a temporary system object called tmpsys to feed it into symba_energy Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa Calls proc~~fraggle_util_get_energy_momentum~~CallsGraph proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum util_exit util_exit proc~fraggle_util_get_energy_momentum->util_exit interface~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_add_fragments_to_system interface~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system proc~fraggle_util_get_energy_momentum->interface~fraggle_util_construct_temporary_system proc~fraggle_util_add_fragments_to_system fraggle_util_add_fragments_to_system interface~fraggle_util_add_fragments_to_system->proc~fraggle_util_add_fragments_to_system proc~fraggle_util_construct_temporary_system fraggle_util_construct_temporary_system interface~fraggle_util_construct_temporary_system->proc~fraggle_util_construct_temporary_system setup_construct_system setup_construct_system proc~fraggle_util_construct_temporary_system->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_util_get_energy_momentum~~CalledByGraph proc~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum fraggle_util_get_energy_momentum interface~fraggle_util_get_energy_momentum->proc~fraggle_util_get_energy_momentum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_get_energy_momentum.html"},{"title":"fraggle_util_restructure – swiftest","text":"module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Interface → Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt Called by proc~~fraggle_util_restructure~~CalledByGraph proc~fraggle_util_restructure fraggle_util_restructure interface~fraggle_util_restructure fraggle_util_restructure interface~fraggle_util_restructure->proc~fraggle_util_restructure Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_restructure.html"},{"title":"fraggle_util_shift_vector_to_origin – swiftest","text":"module subroutine fraggle_util_shift_vector_to_origin(m_frag, vec_frag) Interface → Adjusts the position or velocity of the fragments as needed to align them with the origin Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame Called by proc~~fraggle_util_shift_vector_to_origin~~CalledByGraph proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_util_shift_vector_to_origin.html"},{"title":"fraggle_io_log_generate – swiftest","text":"module subroutine fraggle_io_log_generate(frag) Interface → Writes a log of the results of the fragment generation Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Called by proc~~fraggle_io_log_generate~~CalledByGraph proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_generate interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_generate.html"},{"title":"fraggle_io_log_one_message – swiftest","text":"module subroutine fraggle_io_log_one_message(message) Interface → Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message Called by proc~~fraggle_io_log_one_message~~CalledByGraph proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message proc~fraggle_generate_fragments fraggle_generate_fragments proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message proc~fraggle_regime_collresolve fraggle_regime_collresolve proc~fraggle_regime_collresolve->interface~fraggle_io_log_one_message proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_spins->interface~fraggle_io_log_one_message interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_one_message.html"},{"title":"fraggle_io_log_pl – swiftest","text":"module subroutine fraggle_io_log_pl(pl, param) Interface → Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters Called by proc~~fraggle_io_log_pl~~CalledByGraph proc~fraggle_io_log_pl fraggle_io_log_pl interface~fraggle_io_log_pl fraggle_io_log_pl interface~fraggle_io_log_pl->proc~fraggle_io_log_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_pl.html"},{"title":"fraggle_io_log_regime – swiftest","text":"module subroutine fraggle_io_log_regime(colliders, frag) Interface → Writes a log of the results of the collisional regime determination Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( fraggle_fragments ), intent(in) :: frag Fraggle fragment object Called by proc~~fraggle_io_log_regime~~CalledByGraph proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime proc~fraggle_regime_colliders fraggle_regime_colliders proc~fraggle_regime_colliders->interface~fraggle_io_log_regime interface~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_regime.html"},{"title":"fraggle_io_log_start – swiftest","text":"module subroutine fraggle_io_log_start(param) Interface → Checks to see if the Fraggle log file needs to be replaced if this is a new run, or appended if this is a restarted run Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Called by proc~~fraggle_io_log_start~~CalledByGraph proc~fraggle_io_log_start fraggle_io_log_start interface~fraggle_io_log_start fraggle_io_log_start interface~fraggle_io_log_start->proc~fraggle_io_log_start Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_io_log_start.html"},{"title":"fraggle_generate_fragments – swiftest","text":"module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Interface → Uses ieee_exceptions proc~~fraggle_generate_fragments~~UsesGraph proc~fraggle_generate_fragments fraggle_generate_fragments ieee_exceptions ieee_exceptions proc~fraggle_generate_fragments->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Generates a system of fragments in barycentric coordinates that conserves energy and momentum. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle system object the outputs will be the fragmentation class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead? Calls proc~~fraggle_generate_fragments~~CallsGraph proc~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_io_log_generate fraggle_io_log_generate proc~fraggle_generate_fragments->interface~fraggle_io_log_generate proc~fraggle_generate_pos_vec fraggle_generate_pos_vec proc~fraggle_generate_fragments->proc~fraggle_generate_pos_vec proc~fraggle_generate_rad_vel fraggle_generate_rad_vel proc~fraggle_generate_fragments->proc~fraggle_generate_rad_vel interface~fraggle_io_log_one_message fraggle_io_log_one_message proc~fraggle_generate_fragments->interface~fraggle_io_log_one_message proc~fraggle_generate_tan_vel fraggle_generate_tan_vel proc~fraggle_generate_fragments->proc~fraggle_generate_tan_vel proc~fraggle_generate_spins fraggle_generate_spins proc~fraggle_generate_fragments->proc~fraggle_generate_spins proc~fraggle_io_log_generate fraggle_io_log_generate interface~fraggle_io_log_generate->proc~fraggle_io_log_generate interface~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin proc~fraggle_generate_pos_vec->interface~fraggle_util_shift_vector_to_origin proc~fraggle_generate_rad_vel->interface~fraggle_io_log_one_message lambda_obj lambda_obj proc~fraggle_generate_rad_vel->lambda_obj util_minimize_bfgs util_minimize_bfgs proc~fraggle_generate_rad_vel->util_minimize_bfgs interface~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb proc~fraggle_generate_rad_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_io_log_one_message fraggle_io_log_one_message interface~fraggle_io_log_one_message->proc~fraggle_io_log_one_message proc~fraggle_generate_tan_vel->interface~fraggle_io_log_one_message proc~fraggle_generate_tan_vel->lambda_obj proc~fraggle_generate_tan_vel->util_minimize_bfgs proc~fraggle_generate_tan_vel->interface~fraggle_util_vmag_to_vb proc~fraggle_generate_spins->interface~fraggle_io_log_one_message proc~fraggle_util_vmag_to_vb fraggle_util_vmag_to_vb interface~fraggle_util_vmag_to_vb->proc~fraggle_util_vmag_to_vb proc~fraggle_util_shift_vector_to_origin fraggle_util_shift_vector_to_origin interface~fraggle_util_shift_vector_to_origin->proc~fraggle_util_shift_vector_to_origin proc~fraggle_util_vmag_to_vb->interface~fraggle_util_shift_vector_to_origin Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_generate_fragments~~CalledByGraph proc~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments fraggle_generate_fragments interface~fraggle_generate_fragments->proc~fraggle_generate_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_generate_fragments.html"},{"title":"fraggle_regime_colliders – swiftest","text":"module subroutine fraggle_regime_colliders(self, frag, system, param) Interface → Determine which fragmentation regime the set of colliders will be. This subroutine is a wrapper for the non-polymorphic raggle_regime_collresolve subroutine.\n It converts to SI units prior to calling\n The two-body equivalent masses of the collider system\n The two-body equivalent radii of the collider system\n The two-body equivalent density of the collider system\n The first body of the two-body equivalent position vector the collider system\n The first body of the two-body equivalent velocity vector the collider system\n The second body of the two-body equivalent position vector the collider system\n The second body of the two-body equivalent velocity vector the collider system\n The central body mass of the system\n The minimum fragment mass to generate. Collider systems that would otherwise generate less massive fragments than this value will be forced to merge instead\n Use the positions and velocities of the parents from indside the step (at collision) to calculate the collisional regime Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters Calls proc~~fraggle_regime_colliders~~CallsGraph proc~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_io_log_regime fraggle_io_log_regime proc~fraggle_regime_colliders->interface~fraggle_io_log_regime proc~fraggle_io_log_regime fraggle_io_log_regime interface~fraggle_io_log_regime->proc~fraggle_io_log_regime Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_regime_colliders~~CalledByGraph proc~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders fraggle_regime_colliders interface~fraggle_regime_colliders->proc~fraggle_regime_colliders Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_regime_colliders.html"},{"title":"fraggle_placeholder_accel – swiftest","text":"module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Interface → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step Called by proc~~fraggle_placeholder_accel~~CalledByGraph proc~fraggle_placeholder_accel fraggle_placeholder_accel interface~fraggle_placeholder_accel fraggle_placeholder_accel interface~fraggle_placeholder_accel->proc~fraggle_placeholder_accel Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_placeholder_accel.html"},{"title":"fraggle_placeholder_kick – swiftest","text":"module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. Called by proc~~fraggle_placeholder_kick~~CalledByGraph proc~fraggle_placeholder_kick fraggle_placeholder_kick interface~fraggle_placeholder_kick fraggle_placeholder_kick interface~fraggle_placeholder_kick->proc~fraggle_placeholder_kick Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_placeholder_kick.html"},{"title":"fraggle_placeholder_step – swiftest","text":"module subroutine fraggle_placeholder_step(self, system, param, t, dt) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Called by proc~~fraggle_placeholder_step~~CalledByGraph proc~fraggle_placeholder_step fraggle_placeholder_step interface~fraggle_placeholder_step fraggle_placeholder_step interface~fraggle_placeholder_step->proc~fraggle_placeholder_step Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_placeholder_step.html"},{"title":"fraggle_setup_reset_fragments – swiftest","text":"module subroutine fraggle_setup_reset_fragments(self) Interface → Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Called by proc~~fraggle_setup_reset_fragments~~CalledByGraph proc~fraggle_setup_reset_fragments fraggle_setup_reset_fragments interface~fraggle_setup_reset_fragments fraggle_setup_reset_fragments interface~fraggle_setup_reset_fragments->proc~fraggle_setup_reset_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_setup_reset_fragments.html"},{"title":"fraggle_setup_fragments – swiftest","text":"module subroutine fraggle_setup_fragments(self, n, param) Interface → Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self integer(kind=I4B), intent(in) :: n class( swiftest_parameters ), intent(in) :: param Calls proc~~fraggle_setup_fragments~~CallsGraph proc~fraggle_setup_fragments fraggle_setup_fragments setup_pl setup_pl proc~fraggle_setup_fragments->setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~fraggle_setup_fragments~~CalledByGraph proc~fraggle_setup_fragments fraggle_setup_fragments interface~fraggle_setup_fragments fraggle_setup_fragments interface~fraggle_setup_fragments->proc~fraggle_setup_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_setup_fragments.html"},{"title":"fraggle_set_budgets_fragments – swiftest","text":"module subroutine fraggle_set_budgets_fragments(self, colliders) Interface → Sets the energy and momentum budgets of the fragments based on the collider values and the before/after values of energy and momentum Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_budgets_fragments~~CalledByGraph proc~fraggle_set_budgets_fragments fraggle_set_budgets_fragments interface~fraggle_set_budgets_fragments fraggle_set_budgets_fragments interface~fraggle_set_budgets_fragments->proc~fraggle_set_budgets_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_budgets_fragments.html"},{"title":"fraggle_set_mass_dist_fragments – swiftest","text":"module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Interface → Sets the mass of fragments based on the mass distribution returned by the regime calculation.\n This subroutine must be run after the the setup rourtine has been run on the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters Called by proc~~fraggle_set_mass_dist_fragments~~CalledByGraph proc~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments interface~fraggle_set_mass_dist_fragments fraggle_set_mass_dist_fragments interface~fraggle_set_mass_dist_fragments->proc~fraggle_set_mass_dist_fragments Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_mass_dist_fragments.html"},{"title":"fraggle_set_coordinate_system – swiftest","text":"module subroutine fraggle_set_coordinate_system(self, colliders) Interface → Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_coordinate_system~~CalledByGraph proc~fraggle_set_coordinate_system fraggle_set_coordinate_system interface~fraggle_set_coordinate_system fraggle_set_coordinate_system interface~fraggle_set_coordinate_system->proc~fraggle_set_coordinate_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_coordinate_system.html"},{"title":"fraggle_set_natural_scale_factors – swiftest","text":"module subroutine fraggle_set_natural_scale_factors(self, colliders) Interface → Scales dimenional quantities to ~O(1) with respect to the collisional system. \n This scaling makes it easier for the non-linear minimization to converge on a solution Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_natural_scale_factors~~CalledByGraph proc~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors interface~fraggle_set_natural_scale_factors fraggle_set_natural_scale_factors interface~fraggle_set_natural_scale_factors->proc~fraggle_set_natural_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_natural_scale_factors.html"},{"title":"fraggle_set_original_scale_factors – swiftest","text":"module subroutine fraggle_set_original_scale_factors(self, colliders) Interface → Uses ieee_exceptions proc~~fraggle_set_original_scale_factors~~UsesGraph proc~fraggle_set_original_scale_factors fraggle_set_original_scale_factors ieee_exceptions ieee_exceptions proc~fraggle_set_original_scale_factors->ieee_exceptions Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Restores dimenional quantities back to the system units Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object Called by proc~~fraggle_set_original_scale_factors~~CalledByGraph proc~fraggle_set_original_scale_factors fraggle_set_original_scale_factors interface~fraggle_set_original_scale_factors fraggle_set_original_scale_factors interface~fraggle_set_original_scale_factors->proc~fraggle_set_original_scale_factors Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/fraggle_set_original_scale_factors.html"},{"title":"rmvs_discard_tp – swiftest","text":"module subroutine rmvs_discard_tp(self, system, param) Interface → Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered Adapted from Hal Levison's Swift routine discard_pl.f\n Adapted from Hal Levison's Swift routine rmvs_discard_pl.f90 Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~rmvs_discard_tp~~CallsGraph proc~rmvs_discard_tp rmvs_discard_tp discard_tp discard_tp proc~rmvs_discard_tp->discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_discard_tp~~CalledByGraph proc~rmvs_discard_tp rmvs_discard_tp interface~rmvs_discard_tp rmvs_discard_tp interface~rmvs_discard_tp->proc~rmvs_discard_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_discard_tp.html"},{"title":"rmvs_util_append_pl – swiftest","text":"module subroutine rmvs_util_append_pl(self, source, lsource_mask) Interface → Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~rmvs_util_append_pl~~CallsGraph proc~rmvs_util_append_pl rmvs_util_append_pl util_exit util_exit proc~rmvs_util_append_pl->util_exit util_append util_append proc~rmvs_util_append_pl->util_append whm_util_append_pl whm_util_append_pl proc~rmvs_util_append_pl->whm_util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_append_pl~~CalledByGraph proc~rmvs_util_append_pl rmvs_util_append_pl interface~rmvs_util_append_pl rmvs_util_append_pl interface~rmvs_util_append_pl->proc~rmvs_util_append_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_append_pl.html"},{"title":"rmvs_util_append_tp – swiftest","text":"module subroutine rmvs_util_append_tp(self, source, lsource_mask) Interface → Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to Calls proc~~rmvs_util_append_tp~~CallsGraph proc~rmvs_util_append_tp rmvs_util_append_tp util_exit util_exit proc~rmvs_util_append_tp->util_exit util_append_tp util_append_tp proc~rmvs_util_append_tp->util_append_tp util_append util_append proc~rmvs_util_append_tp->util_append Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_append_tp~~CalledByGraph proc~rmvs_util_append_tp rmvs_util_append_tp interface~rmvs_util_append_tp rmvs_util_append_tp interface~rmvs_util_append_tp->proc~rmvs_util_append_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_append_tp.html"},{"title":"rmvs_util_fill_pl – swiftest","text":"module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Interface → Insert new RMVS massive body structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~rmvs_util_fill_pl~~CallsGraph proc~rmvs_util_fill_pl rmvs_util_fill_pl util_exit util_exit proc~rmvs_util_fill_pl->util_exit util_fill util_fill proc~rmvs_util_fill_pl->util_fill whm_util_fill_pl whm_util_fill_pl proc~rmvs_util_fill_pl->whm_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_fill_pl~~CalledByGraph proc~rmvs_util_fill_pl rmvs_util_fill_pl interface~rmvs_util_fill_pl rmvs_util_fill_pl interface~rmvs_util_fill_pl->proc~rmvs_util_fill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_fill_pl.html"},{"title":"rmvs_util_fill_tp – swiftest","text":"module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Interface → Insert new RMVS test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps Calls proc~~rmvs_util_fill_tp~~CallsGraph proc~rmvs_util_fill_tp rmvs_util_fill_tp util_exit util_exit proc~rmvs_util_fill_tp->util_exit util_fill_tp util_fill_tp proc~rmvs_util_fill_tp->util_fill_tp util_fill util_fill proc~rmvs_util_fill_tp->util_fill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_fill_tp~~CalledByGraph proc~rmvs_util_fill_tp rmvs_util_fill_tp interface~rmvs_util_fill_tp rmvs_util_fill_tp interface~rmvs_util_fill_tp->proc~rmvs_util_fill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_fill_tp.html"},{"title":"rmvs_util_resize_pl – swiftest","text":"module subroutine rmvs_util_resize_pl(self, nnew) Interface → Checks the current size of a massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~rmvs_util_resize_pl~~CallsGraph proc~rmvs_util_resize_pl rmvs_util_resize_pl util_resize util_resize proc~rmvs_util_resize_pl->util_resize whm_util_resize_pl whm_util_resize_pl proc~rmvs_util_resize_pl->whm_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_resize_pl~~CalledByGraph proc~rmvs_util_resize_pl rmvs_util_resize_pl interface~rmvs_util_resize_pl rmvs_util_resize_pl interface~rmvs_util_resize_pl->proc~rmvs_util_resize_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_resize_pl.html"},{"title":"rmvs_util_resize_tp – swiftest","text":"module subroutine rmvs_util_resize_tp(self, nnew) Interface → Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded Calls proc~~rmvs_util_resize_tp~~CallsGraph proc~rmvs_util_resize_tp rmvs_util_resize_tp util_resize_tp util_resize_tp proc~rmvs_util_resize_tp->util_resize_tp util_resize util_resize proc~rmvs_util_resize_tp->util_resize Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_resize_tp~~CalledByGraph proc~rmvs_util_resize_tp rmvs_util_resize_tp interface~rmvs_util_resize_tp rmvs_util_resize_tp interface~rmvs_util_resize_tp->proc~rmvs_util_resize_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_resize_tp.html"},{"title":"rmvs_util_sort_pl – swiftest","text":"module subroutine rmvs_util_sort_pl(self, sortby, ascending) Interface → Sort a RMVS massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~rmvs_util_sort_pl~~CallsGraph proc~rmvs_util_sort_pl rmvs_util_sort_pl whm_util_sort_pl whm_util_sort_pl proc~rmvs_util_sort_pl->whm_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_pl~~CalledByGraph proc~rmvs_util_sort_pl rmvs_util_sort_pl interface~rmvs_util_sort_pl rmvs_util_sort_pl interface~rmvs_util_sort_pl->proc~rmvs_util_sort_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_pl.html"},{"title":"rmvs_util_sort_tp – swiftest","text":"module subroutine rmvs_util_sort_tp(self, sortby, ascending) Interface → Sort a RMVS test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order Calls proc~~rmvs_util_sort_tp~~CallsGraph proc~rmvs_util_sort_tp rmvs_util_sort_tp util_sort_tp util_sort_tp proc~rmvs_util_sort_tp->util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_tp~~CalledByGraph proc~rmvs_util_sort_tp rmvs_util_sort_tp interface~rmvs_util_sort_tp rmvs_util_sort_tp interface~rmvs_util_sort_tp->proc~rmvs_util_sort_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_tp.html"},{"title":"rmvs_util_sort_rearrange_pl – swiftest","text":"module subroutine rmvs_util_sort_rearrange_pl(self, ind) Interface → Rearrange RMVS massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~rmvs_util_sort_rearrange_pl~~CallsGraph proc~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl util_sort_rearrange_pl util_sort_rearrange_pl proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange_pl util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_pl->util_sort_rearrange Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_rearrange_pl~~CalledByGraph proc~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl interface~rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_pl interface~rmvs_util_sort_rearrange_pl->proc~rmvs_util_sort_rearrange_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_rearrange_pl.html"},{"title":"rmvs_util_sort_rearrange_tp – swiftest","text":"module subroutine rmvs_util_sort_rearrange_tp(self, ind) Interface → Rearrange RMVS test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Calls proc~~rmvs_util_sort_rearrange_tp~~CallsGraph proc~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp util_sort_rearrange util_sort_rearrange proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange util_sort_rearrange_tp util_sort_rearrange_tp proc~rmvs_util_sort_rearrange_tp->util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_sort_rearrange_tp~~CalledByGraph proc~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp interface~rmvs_util_sort_rearrange_tp rmvs_util_sort_rearrange_tp interface~rmvs_util_sort_rearrange_tp->proc~rmvs_util_sort_rearrange_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_sort_rearrange_tp.html"},{"title":"rmvs_util_spill_pl – swiftest","text":"module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) RMVS test particle structure from active list to discard list Adapted from David E. Kaufmann's Swifter routine discard_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~rmvs_util_spill_pl~~CallsGraph proc~rmvs_util_spill_pl rmvs_util_spill_pl util_exit util_exit proc~rmvs_util_spill_pl->util_exit whm_util_spill_pl whm_util_spill_pl proc~rmvs_util_spill_pl->whm_util_spill_pl util_spill util_spill proc~rmvs_util_spill_pl->util_spill Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_spill_pl~~CalledByGraph proc~rmvs_util_spill_pl rmvs_util_spill_pl interface~rmvs_util_spill_pl rmvs_util_spill_pl interface~rmvs_util_spill_pl->proc~rmvs_util_spill_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_spill_pl.html"},{"title":"rmvs_util_spill_tp – swiftest","text":"module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Interface → Move spilled (discarded) RMVS test particle structure from active list to discard list Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90 Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Calls proc~~rmvs_util_spill_tp~~CallsGraph proc~rmvs_util_spill_tp rmvs_util_spill_tp util_exit util_exit proc~rmvs_util_spill_tp->util_exit util_spill util_spill proc~rmvs_util_spill_tp->util_spill util_spill_tp util_spill_tp proc~rmvs_util_spill_tp->util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_util_spill_tp~~CalledByGraph proc~rmvs_util_spill_tp rmvs_util_spill_tp interface~rmvs_util_spill_tp rmvs_util_spill_tp interface~rmvs_util_spill_tp->proc~rmvs_util_spill_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_util_spill_tp.html"},{"title":"rmvs_kick_getacch_tp – swiftest","text":"module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Interface → Compute the oblateness acceleration in the inner encounter region with planets Performs a similar task as David E. Kaufmann's Swifter routine rmvs_kick_getacch_tp.f90, but \n uses object polymorphism, and so is not directly adapted. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step Calls proc~~rmvs_kick_getacch_tp~~CallsGraph proc~rmvs_kick_getacch_tp rmvs_kick_getacch_tp whm_kick_getacch_tp whm_kick_getacch_tp proc~rmvs_kick_getacch_tp->whm_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_kick_getacch_tp~~CalledByGraph proc~rmvs_kick_getacch_tp rmvs_kick_getacch_tp interface~rmvs_kick_getacch_tp rmvs_kick_getacch_tp interface~rmvs_kick_getacch_tp->proc~rmvs_kick_getacch_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_kick_getacch_tp.html"},{"title":"rmvs_io_write_encounter – swiftest","text":"module subroutine rmvs_io_write_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Interface → Write close encounter data from RMVS to output binary files\n  There is no direct file output from this subroutine Adapted from David E. Kaufmann's Swifter routine: io_write_encounter.f90\n Adapted from Hal Levison's Swift routine io_write_encounter.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out Calls proc~~rmvs_io_write_encounter~~CallsGraph proc~rmvs_io_write_encounter rmvs_io_write_encounter util_exit util_exit proc~rmvs_io_write_encounter->util_exit io_write_frame_encounter io_write_frame_encounter proc~rmvs_io_write_encounter->io_write_frame_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_io_write_encounter~~CalledByGraph proc~rmvs_io_write_encounter rmvs_io_write_encounter interface~rmvs_io_write_encounter rmvs_io_write_encounter interface~rmvs_io_write_encounter->proc~rmvs_io_write_encounter Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_io_write_encounter.html"},{"title":"rmvs_setup_pl – swiftest","text":"module subroutine rmvs_setup_pl(self, n, param) Interface → Allocate RMVS test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine rmvs_setup.f90\n Call allocation method for parent class Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter Calls proc~~rmvs_setup_pl~~CallsGraph proc~rmvs_setup_pl rmvs_setup_pl whm_setup_pl whm_setup_pl proc~rmvs_setup_pl->whm_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_setup_pl~~CalledByGraph proc~rmvs_setup_pl rmvs_setup_pl interface~rmvs_setup_pl rmvs_setup_pl interface~rmvs_setup_pl->proc~rmvs_setup_pl Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_setup_pl.html"},{"title":"rmvs_setup_initialize_system – swiftest","text":"module subroutine rmvs_setup_initialize_system(self, param) Interface → Initialize an RMVS nbody system from files and sets up the planetocentric structures. We currently rearrange the pl order to keep it consistent with the way Swifter does it \n In Swifter, the central body occupies the first position in the pl list, and during\n encounters, the encountering planet is skipped in loops. In Swiftest, we instantiate an\n RMVS nbody system object attached to each pl to store planetocentric versions of the system\n to use during close encounters. Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters Calls proc~~rmvs_setup_initialize_system~~CallsGraph proc~rmvs_setup_initialize_system rmvs_setup_initialize_system whm_setup_initialize_system whm_setup_initialize_system proc~rmvs_setup_initialize_system->whm_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_setup_initialize_system~~CalledByGraph proc~rmvs_setup_initialize_system rmvs_setup_initialize_system interface~rmvs_setup_initialize_system rmvs_setup_initialize_system interface~rmvs_setup_initialize_system->proc~rmvs_setup_initialize_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_setup_initialize_system.html"},{"title":"rmvs_setup_tp – swiftest","text":"module subroutine rmvs_setup_tp(self, n, param) Interface → Allocate WHM test particle structure Equivalent in functionality to David E. Kaufmann's Swifter routine whm_setup.f90\n Call allocation method for parent class. In this case, whm does not have its own setup method, so we use the base method for swiftest_tp Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter Calls proc~~rmvs_setup_tp~~CallsGraph proc~rmvs_setup_tp rmvs_setup_tp setup_tp setup_tp proc~rmvs_setup_tp->setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_setup_tp~~CalledByGraph proc~rmvs_setup_tp rmvs_setup_tp interface~rmvs_setup_tp rmvs_setup_tp interface~rmvs_setup_tp->proc~rmvs_setup_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_setup_tp.html"},{"title":"rmvs_step_system – swiftest","text":"module subroutine rmvs_step_system(self, param, t, dt) Interface → Step massive bodies and and active test particles ahead in heliocentric coordinates Adapted from Hal Levison's Swift routine rmvs3_step.f\n Adapted from David E. Kaufmann's Swifter routine rmvs_step.f90 Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz Calls proc~~rmvs_step_system~~CallsGraph proc~rmvs_step_system rmvs_step_system proc~rmvs_step_out rmvs_step_out proc~rmvs_step_system->proc~rmvs_step_out whm_step_system whm_step_system proc~rmvs_step_system->whm_step_system proc~rmvs_interp_out rmvs_interp_out proc~rmvs_step_system->proc~rmvs_interp_out proc~rmvs_interp_in rmvs_interp_in proc~rmvs_step_out->proc~rmvs_interp_in proc~rmvs_step_in rmvs_step_in proc~rmvs_step_out->proc~rmvs_step_in util_exit util_exit proc~rmvs_interp_out->util_exit proc~rmvs_interp_in->util_exit proc~rmvs_make_planetocentric rmvs_make_planetocentric proc~rmvs_step_in->proc~rmvs_make_planetocentric proc~rmvs_peri_tp rmvs_peri_tp proc~rmvs_step_in->proc~rmvs_peri_tp proc~rmvs_end_planetocentric rmvs_end_planetocentric proc~rmvs_step_in->proc~rmvs_end_planetocentric vpc vpc proc~rmvs_peri_tp->vpc xpc xpc proc~rmvs_peri_tp->xpc Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Called by proc~~rmvs_step_system~~CalledByGraph proc~rmvs_step_system rmvs_step_system interface~rmvs_step_system rmvs_step_system interface~rmvs_step_system->proc~rmvs_step_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_step_system.html"},{"title":"rmvs_encounter_check_tp – swiftest","text":"module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Interface → Determine whether a test particle and planet are having or will have an encounter within the next time step Adapted from David E. Kaufmann's Swifter routine: rmvs_chk.f90\n Adapted from Hal Levison's Swift routine rmvs3_chk.f Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter Called by proc~~rmvs_encounter_check_tp~~CalledByGraph proc~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp rmvs_encounter_check_tp interface~rmvs_encounter_check_tp->proc~rmvs_encounter_check_tp Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_encounter_check_tp.html"},{"title":"rmvs_chk_ind – swiftest","text":"pure module subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr) Interface → Determine whether a test particle and planet are having or will have an encounter within the next time step Adapted from David E. Kaufmann's Swifter routine: rmvs_chk_ind.f90\n Adapted from Hal Levison's Swift routine rmvs_chk_ind.f Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative distance vector components real(kind=DP), intent(in) :: yr Relative distance vector components real(kind=DP), intent(in) :: zr Relative distance vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: dt Step size real(kind=DP), intent(in) :: r2crit Square of the critical encounter distance logical, intent(out) :: lencounter Flag indicating that an encounter has occurred logical, intent(out) :: lvdotr Logical flag indicating the direction of the v .dot. r vector Called by proc~~rmvs_chk_ind~~CalledByGraph proc~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind rmvs_chk_ind interface~rmvs_chk_ind->proc~rmvs_chk_ind Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents None","tags":"","loc":"proc/rmvs_chk_ind.html"},{"title":"orbel – swiftest","text":"Uses swiftest module~~orbel~~UsesGraph module~orbel orbel module~swiftest swiftest module~orbel->module~swiftest module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines xv2el Subroutines public pure elemental subroutine xv2el (mu, px, py, pz, vx, vy, vz, a, e, inc, capom, omega, capm) Arguments Type Intent Optional Attributes Name real(kind=8), intent(in) :: mu real(kind=8), intent(in) :: px real(kind=8), intent(in) :: py real(kind=8), intent(in) :: pz real(kind=8), intent(in) :: vx real(kind=8), intent(in) :: vy real(kind=8), intent(in) :: vz real(kind=8), intent(out) :: a real(kind=8), intent(out) :: e real(kind=8), intent(out) :: inc real(kind=8), intent(out) :: capom real(kind=8), intent(out) :: omega real(kind=8), intent(out) :: capm","tags":"","loc":"module/orbel.html"},{"title":"rmvs_classes – swiftest","text":"Definition of classes and methods specific to the Regularized Mixed Variable Symplectic (RMVS) integrator\n Partially adapted from David E. Kaufmann's Swifter module: module_rmvs.f90 rmvs_cb class definitions and method interfaces rmvs_tp class definitions and method interfaces RMVS test particle class rmvs_pl class definitions and method interfaces Uses swiftest_globals whm_classes module~~rmvs_classes~~UsesGraph module~rmvs_classes rmvs_classes module~swiftest_globals swiftest_globals module~rmvs_classes->module~swiftest_globals module~whm_classes whm_classes module~rmvs_classes->module~whm_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~whm_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~whm_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_rmvs_chk s_rmvs_discard s_rmvs_io s_rmvs_kick s_rmvs_setup s_rmvs_step s_rmvs_util module~~rmvs_classes~~UsedByGraph module~rmvs_classes rmvs_classes module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~rmvs_classes module~swiftest swiftest module~s_rmvs_io->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~rmvs_classes module~s_rmvs_chk->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~rmvs_classes module~s_rmvs_discard->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~rmvs_classes module~s_rmvs_step->module~swiftest module~swiftest->module~rmvs_classes module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~rmvs_classes module~s_rmvs_setup->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~rmvs_classes module~s_rmvs_kick->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~rmvs_classes module~s_rmvs_util->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables NTENC NTPHENC NTPENC RHSCALE RHPSCALE FACQDT Interfaces rmvs_encounter_check_tp rmvs_chk_ind rmvs_discard_tp rmvs_io_write_encounter rmvs_kick_getacch_tp rmvs_setup_pl rmvs_setup_initialize_system rmvs_setup_tp rmvs_util_append_pl rmvs_util_append_tp rmvs_util_fill_pl rmvs_util_fill_tp rmvs_util_resize_pl rmvs_util_resize_tp rmvs_util_sort_pl rmvs_util_sort_tp rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_tp rmvs_util_spill_pl rmvs_util_spill_tp rmvs_step_system Derived Types rmvs_nbody_system rmvs_interp rmvs_cb rmvs_tp rmvs_pl Variables Type Visibility Attributes Name Initial integer(kind=I4B), private, parameter :: NTENC = 10 integer(kind=I4B), private, parameter :: NTPHENC = 3 integer(kind=I4B), private, parameter :: NTPENC = NTENC*NTPHENC real(kind=DP), private, parameter :: RHSCALE = 3.5_DP real(kind=DP), private, parameter :: RHPSCALE = 1.0_DP real(kind=DP), private, parameter :: FACQDT = 2.0_DP rmvs_nbody_system class definitions and method interfaces Interfaces interface public module function rmvs_encounter_check_tp(self, system, dt) result(lencounter) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter interface public pure module subroutine rmvs_chk_ind(xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative distance vector components real(kind=DP), intent(in) :: yr Relative distance vector components real(kind=DP), intent(in) :: zr Relative distance vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: dt Step size real(kind=DP), intent(in) :: r2crit Square of the critical encounter distance logical, intent(out) :: lencounter Flag indicating that an encounter has occurred logical, intent(out) :: lvdotr Logical flag indicating the direction of the v .dot. r vector interface public module subroutine rmvs_discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine rmvs_io_write_encounter(t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out interface public module subroutine rmvs_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine rmvs_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine rmvs_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine rmvs_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parametere interface public module subroutine rmvs_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine rmvs_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine rmvs_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine rmvs_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine rmvs_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine rmvs_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine rmvs_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine rmvs_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine rmvs_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine rmvs_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine rmvs_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine rmvs_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine rmvs_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Derived Types type, public, extends( whm_nbody_system ) :: rmvs_nbody_system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles logical, public :: lplanetocentric = .false. In the RMVS integrator, only test particles are discarded\n Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations real(kind=DP), public :: rts fraction of Hill's sphere radius to use as radius of encounter region real(kind=DP), public, dimension(:,:), allocatable :: vbeg Planet velocities at beginning ot step Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: initialize => rmvs_setup_initialize_system Replace the abstract procedures with concrete ones\n Performs RMVS-specific initilization steps, including generating the close encounter planetocentric structures procedure, public :: step => rmvs_step_system Advance the RMVS nbody system forward in time by one step type, private :: rmvs_interp Components Type Visibility Attributes Name Initial real(kind=DP), public, dimension(:, :), allocatable :: x interpolated heliocentric planet position for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: v interpolated heliocentric planet velocity for outer encounter real(kind=DP), public, dimension(:, :), allocatable :: aobl Encountering planet's oblateness acceleration value real(kind=DP), public, dimension(:, :), allocatable :: atide Encountering planet's tidal acceleration value type, public, extends( whm_cb ) :: rmvs_cb RMVS central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( whm_tp ) :: rmvs_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as rmvs_setup_tp and rmvs_util_spill_tp Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp logical, public, dimension(:), allocatable :: lperi planetocentric pericenter passage flag (persistent for a full rmvs time step) over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plperP index of planet associated with pericenter distance peri (persistent over a full RMVS time step) integer(kind=I4B), public, dimension(:), allocatable :: plencP index of planet that test particle is encountering (not persistent for a full RMVS time step) type( rmvs_cb ), public :: cb_heliocentric Copy of original central body object passed to close encounter (used for oblateness acceleration during planetocentric encoountters) real(kind=DP), public, dimension(:,:), allocatable :: xheliocentric original heliocentric position (used for oblateness calculation during close encounters) integer(kind=I4B), public :: index inner substep number within current set integer(kind=I4B), public :: ipleP index value of encountering planet logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles procedure, public :: step => whm_step_tp Steps the particle forward one stepsize procedure, public :: discard => rmvs_discard_tp Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered procedure, public :: encounter_check => rmvs_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body procedure, public :: accel => rmvs_kick_getacch_tp Calculates either the standard or modified version of the acceleration depending if the\n    if the test particle is undergoing a close encounter or not procedure, public :: setup => rmvs_setup_tp Constructor method - Allocates space for the input number of bodiess procedure, public :: append => rmvs_util_append_tp Appends elements from one structure to another procedure, public :: fill => rmvs_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => rmvs_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: sort => rmvs_util_sort_tp Sorts body arrays by a sortable componen procedure, public :: rearrange => rmvs_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => rmvs_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, extends( whm_pl ) :: rmvs_pl RMVS massive body particle class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl integer(kind=I4B), public, dimension(:), allocatable :: nenc number of test particles encountering planet this full rmvs time step integer(kind=I4B), public, dimension(:), allocatable :: tpenc1P index of first test particle encountering planet integer(kind=I4B), public, dimension(:), allocatable :: plind Connects the planetocentric indices back to the heliocentric planet list type( rmvs_interp ), public, dimension(:), allocatable :: outer interpolated heliocentric central body position for outer encounters type( rmvs_interp ), public, dimension(:), allocatable :: inner interpolated heliocentric central body position for inner encounters class( rmvs_nbody_system ), public, dimension(:), allocatable :: planetocentric Planetocentric version of the massive body objects (one for each massive body) logical, public :: lplanetocentric = .false. Flag that indicates that the object is a planetocentric set of masive bodies used for close encounter calculations Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. procedure, public :: step => whm_step_pl Steps the body forward one stepsize procedure, public :: setup => rmvs_setup_pl Constructor method - Allocates space for the input number of bodiess procedure, public :: append => rmvs_util_append_pl Appends elements from one structure to another procedure, public :: fill => rmvs_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => rmvs_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: sort => rmvs_util_sort_pl Sorts body arrays by a sortable componen procedure, public :: rearrange => rmvs_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => rmvs_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic)","tags":"","loc":"module/rmvs_classes.html"},{"title":"swiftest_globals – swiftest","text":"Basic parameters, definitions, and global type definitions used throughout the Swiftest project\n Adapted from David E. Kaufmann's Swifter routine: swiftest_globals.f90 and module_swifter.f90 Uses iso_fortran_env Contents Variables I8B I4B I2B I1B SP DP QP PIBY2 PI PI3BY2 TWOPI THIRD DEG2RAD RAD2DEG GC einsteinC LOWERCASE_BEGIN LOWERCASE_END UPPERCASE_OFFSET VERSION_NUMBER UNKNOWN_INTEGRATOR BS HELIO RA15 TU4 WHM RMVS SYMBA RINGMOONS STRMAX NAMELEN ASCII_TYPE REAL4_TYPE REAL8_TYPE NETCDF_FLOAT_TYPE NETCDF_DOUBLE_TYPE EL XV XVEL CB_TYPE_NAME PL_TYPE_NAME TP_TYPE_NAME PL_TINY_TYPE_NAME nthreads NTHERSHOLD SUCCESS FAILURE USAGE HELP SUCCESS_MSG FAIL_MSG USAGE_MSG HELP_MSG ELLIPSE PARABOLA HYPERBOLA ACTIVE INACTIVE DISCARDED_RMAX DISCARDED_RMIN DISCARDED_RMAXU DISCARDED_PERI DISCARDED_PLR DISCARDED_PLQ DISCARDED_DRIFTERR MERGED DISRUPTION SUPERCATASTROPHIC GRAZE_AND_MERGE HIT_AND_RUN_DISRUPT HIT_AND_RUN_PURE COLLISION NEW_PARTICLE OLD_PARTICLE COLLRESOLVE_REGIME_MERGE COLLRESOLVE_REGIME_DISRUPTION COLLRESOLVE_REGIME_SUPERCATASTROPHIC COLLRESOLVE_REGIME_GRAZE_AND_MERGE COLLRESOLVE_REGIME_HIT_AND_RUN ADD SUB NDUMPFILES DUMP_CB_FILE DUMP_PL_FILE DUMP_TP_FILE DUMP_PARAM_FILE CB_INFILE PL_INFILE TP_INFILE BIN_OUTFILE BINUNIT PARTICLE_OUTFILE PARTICLEUNIT NDIM NDIM2 VSMALL NETCDF_OUTFILE TIME_DIMNAME ID_DIMNAME STR_DIMNAME PTYPE_VARNAME NAME_VARNAME NPL_VARNAME NTP_VARNAME A_VARNAME E_VARNAME INC_VARNAME CAPOM_VARNAME OMEGA_VARNAME CAPM_VARNAME XHX_VARNAME XHY_VARNAME XHZ_VARNAME VHX_VARNAME VHY_VARNAME VHZ_VARNAME GMASS_VARNAME RHILL_VARNAME RADIUS_VARNAME IP1_VARNAME IP2_VARNAME IP3_VARNAME ROTX_VARNAME ROTY_VARNAME ROTZ_VARNAME K2_VARNAME Q_VARNAME KE_ORB_VARNAME KE_SPIN_VARNAME PE_VARNAME L_ORBX_VARNAME L_ORBY_VARNAME L_ORBZ_VARNAME L_SPINX_VARNAME L_SPINY_VARNAME L_SPINZ_VARNAME L_ESCAPEX_VARNAME L_ESCAPEY_VARNAME L_ESCAPEZ_VARNAME ECOLLISIONS_VARNAME EUNTRACKED_VARNAME GMESCAPE_VARNAME STATUS_VARNAME ORIGIN_TYPE_VARNAME ORIGIN_TIME_VARNAME ORIGIN_XHX_VARNAME ORIGIN_XHY_VARNAME ORIGIN_XHZ_VARNAME ORIGIN_VHX_VARNAME ORIGIN_VHY_VARNAME ORIGIN_VHZ_VARNAME DISCARD_TIME_VARNAME DISCARD_XHX_VARNAME DISCARD_XHY_VARNAME DISCARD_XHZ_VARNAME DISCARD_VHX_VARNAME DISCARD_VHY_VARNAME DISCARD_VHZ_VARNAME DISCARD_BODY_ID_VARNAME Variables Type Visibility Attributes Name Initial integer, public, parameter :: I8B = int64 Symbolic name for kind types of 8-byte integers integer, public, parameter :: I4B = int32 Symbolic name for kind types of 4-byte integers integer, public, parameter :: I2B = int16 Symbolic name for kind types of 2-byte integers integer, public, parameter :: I1B = int8 Symbolic name for kind types of 1-byte integers integer, public, parameter :: SP = real32 Symbolic name for kind types of single-precision reals integer, public, parameter :: DP = real64 Symbolic name for kind types of double-precision reals integer, public, parameter :: QP = real128 Symbolic name for kind types of quad-precision reals real(kind=DP), public, parameter :: PIBY2 = 1.570796326794896619231321691639751442099_DP Definition of /(\\pi / 2) real(kind=DP), public, parameter :: PI = 3.141592653589793238462643383279502884197_DP Definition of /(\\pi) real(kind=DP), public, parameter :: PI3BY2 = 4.712388980384689857693965074919254326296_DP Definition of /(3 \\pi / 2) real(kind=DP), public, parameter :: TWOPI = 6.283185307179586476925286766559005768394_DP Definition of 2 \\pi real(kind=DP), public, parameter :: THIRD = 0.333333333333333333333333333333333333333_DP Definition of 1 / 3 real(kind=DP), public, parameter :: DEG2RAD = PI/180.0_DP Definition of conversion factor from degrees to radians real(kind=DP), public, parameter :: RAD2DEG = 180.0_DP/PI Definition of conversion factor from degrees to radians real(kind=DP), public, parameter :: GC = 6.6743E-11_DP Universal gravitational constant in SI units real(kind=DP), public, parameter :: einsteinC = 299792458.0_DP Speed of light in SI units integer(kind=I4B), public, parameter :: LOWERCASE_BEGIN = iachar('a') ASCII character set parameter for lower to upper conversion - start of lowercase integer(kind=I4B), public, parameter :: LOWERCASE_END = iachar('z') ASCII character set parameter for lower to upper conversion - end of lowercase integer(kind=I4B), public, parameter :: UPPERCASE_OFFSET = iachar('A')-iachar('a') ASCII character set parameter for lower to upper conversion - offset between upper and lower real(kind=SP), public, parameter :: VERSION_NUMBER = 0.1_SP swiftest version integer(kind=I4B), public, parameter :: UNKNOWN_INTEGRATOR = 1 Symbolic name for integrator types integer(kind=I4B), public, parameter :: BS = 2 integer(kind=I4B), public, parameter :: HELIO = 3 integer(kind=I4B), public, parameter :: RA15 = 4 integer(kind=I4B), public, parameter :: TU4 = 5 integer(kind=I4B), public, parameter :: WHM = 6 integer(kind=I4B), public, parameter :: RMVS = 7 integer(kind=I4B), public, parameter :: SYMBA = 8 integer(kind=I4B), public, parameter :: RINGMOONS = 9 integer(kind=I4B), public, parameter :: STRMAX = 512 Maximum size of character strings integer(kind=I4B), public, parameter :: NAMELEN = 32 Maximum size of name strings character(len=*), public, parameter :: ASCII_TYPE = 'ASCII' Symbolic name for ASCII file type character(len=*), public, parameter :: REAL4_TYPE = 'REAL4' Symbolic name for binary file type REAL4 character(len=*), public, parameter :: REAL8_TYPE = 'REAL8' Symbolic name for binary file type REAL8 character(len=*), public, parameter :: NETCDF_FLOAT_TYPE = 'NETCDF_FLOAT' Symbolic name for binary file type REAL8 character(len=*), public, parameter :: NETCDF_DOUBLE_TYPE = 'NETCDF_DOUBLE' Symbolic name for binary file type REAL8 character(len=*), public, parameter :: EL = 'EL' Symbolic name for binary output file contents for orbital elements character(len=*), public, parameter :: XV = 'XV' Symbolic name for binary output file contents for cartesian position and velocity vectors character(len=*), public, parameter :: XVEL = 'XVEL' Symbolic name for binary output file contents for both cartesian position and velocity and orbital elements character(len=*), public, parameter :: CB_TYPE_NAME = \"Central Body\" character(len=*), public, parameter :: PL_TYPE_NAME = \"Massive Body\" character(len=*), public, parameter :: TP_TYPE_NAME = \"Test Particle\" character(len=*), public, parameter :: PL_TINY_TYPE_NAME = \"Semi-Interacting Massive Body\" integer(kind=I4B), public :: nthreads = 1 Number of OpenMP threads integer(kind=I4B), public, parameter :: NTHERSHOLD = 1000 Threshold value for OpenMP loop parallelization integer(kind=I4B), public, parameter :: SUCCESS = 0 Symbolic name for function return/flag code for success integer(kind=I4B), public, parameter :: FAILURE = -1 Symbolic name for function return/flag code for failure integer(kind=I4B), public, parameter :: USAGE = -2 Symbolic name for function return/flag code for printing the usage message integer(kind=I4B), public, parameter :: HELP = -3 Symbolic name for function return/flag code for printing the usage message character(len=*), public, parameter :: SUCCESS_MSG = '(/, \"Normal termination of Swiftest (version \", f3.1, \")\")' character(len=*), public, parameter :: FAIL_MSG = '(/, \"Terminating Swiftest (version \", f3.1, \") due to error!!\")' character(len=*), public, parameter :: USAGE_MSG = '(\"Usage: swiftest [bs|helio|ra15|rmvs|symba|tu4|whm] \")' character(len=*), public, parameter :: HELP_MSG = USAGE_MSG integer(kind=I4B), public, parameter :: ELLIPSE = -1 Symbolic names for orbit types - ellipse integer(kind=I4B), public, parameter :: PARABOLA = 0 Symbolic names for orbit types - parabola integer(kind=I4B), public, parameter :: HYPERBOLA = 1 Symbolic names for orbit types - hyperbola integer(kind=I4B), public, parameter :: ACTIVE = 0 Symbolic names for body/particle status codes: integer(kind=I4B), public, parameter :: INACTIVE = 1 integer(kind=I4B), public, parameter :: DISCARDED_RMAX = -1 integer(kind=I4B), public, parameter :: DISCARDED_RMIN = -2 integer(kind=I4B), public, parameter :: DISCARDED_RMAXU = -3 integer(kind=I4B), public, parameter :: DISCARDED_PERI = -4 integer(kind=I4B), public, parameter :: DISCARDED_PLR = -5 integer(kind=I4B), public, parameter :: DISCARDED_PLQ = -6 integer(kind=I4B), public, parameter :: DISCARDED_DRIFTERR = -7 integer(kind=I4B), public, parameter :: MERGED = -8 integer(kind=I4B), public, parameter :: DISRUPTION = -9 integer(kind=I4B), public, parameter :: SUPERCATASTROPHIC = -10 integer(kind=I4B), public, parameter :: GRAZE_AND_MERGE = -11 integer(kind=I4B), public, parameter :: HIT_AND_RUN_DISRUPT = -12 integer(kind=I4B), public, parameter :: HIT_AND_RUN_PURE = -13 integer(kind=I4B), public, parameter :: COLLISION = -14 integer(kind=I4B), public, parameter :: NEW_PARTICLE = -15 integer(kind=I4B), public, parameter :: OLD_PARTICLE = -16 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_MERGE = 1 Symbolic names for collisional outcomes from collresolve_resolve: integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_DISRUPTION = 2 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_SUPERCATASTROPHIC = 3 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_GRAZE_AND_MERGE = 4 integer(kind=I4B), public, parameter :: COLLRESOLVE_REGIME_HIT_AND_RUN = 5 character(len=*), public, parameter :: ADD = '+1' String labels for body/particle addition/subtraction in discard file character(len=*), public, parameter :: SUB = '-1' integer(kind=I4B), public, parameter :: NDUMPFILES = 2 Standard file names character(len=*), public, parameter, dimension(2) :: DUMP_CB_FILE = ['dump_cb1.bin', 'dump_cb2.bin'] character(len=*), public, parameter, dimension(2) :: DUMP_PL_FILE = ['dump_pl1.bin', 'dump_pl2.bin'] character(len=*), public, parameter, dimension(2) :: DUMP_TP_FILE = ['dump_tp1.bin', 'dump_tp2.bin'] character(len=*), public, parameter, dimension(2) :: DUMP_PARAM_FILE = ['dump_param1.in', 'dump_param2.in'] character(len=*), public, parameter :: CB_INFILE = 'cb.in' Default file names that can be changed by the user in the parameters file character(len=*), public, parameter :: PL_INFILE = 'pl.in' character(len=*), public, parameter :: TP_INFILE = 'tp.in' character(len=*), public, parameter :: BIN_OUTFILE = 'bin.dat' integer(kind=I4B), public, parameter :: BINUNIT = 20 File unit number for the binary output file character(len=*), public, parameter :: PARTICLE_OUTFILE = 'particle.dat' integer(kind=I4B), public, parameter :: PARTICLEUNIT = 44 File unit number for the binary particle info output file integer(kind=I4B), public, parameter :: NDIM = 3 Miscellaneous constants:\n Number of dimensions in our reality integer(kind=I4B), public, parameter :: NDIM2 = 2*NDIM 2x the number of dimensions real(kind=DP), public, parameter :: VSMALL = 2*epsilon(1._DP) Very small number used to prevent floating underflow character(len=*), public, parameter :: NETCDF_OUTFILE = 'bin.nc' NetCDF variable names and constants\n Default output file name character(len=*), public, parameter :: TIME_DIMNAME = \"time\" NetCDF name of the time dimension character(len=*), public, parameter :: ID_DIMNAME = \"id\" NetCDF name of the particle id dimension character(len=*), public, parameter :: STR_DIMNAME = \"str\" NetCDF name of the particle id dimension character(len=*), public, parameter :: PTYPE_VARNAME = \"particle_type\" NetCDF name of the particle type variable character(len=*), public, parameter :: NAME_VARNAME = \"name\" NetCDF name of the particle name variable character(len=*), public, parameter :: NPL_VARNAME = \"npl\" NetCDF name of the number of active massive bodies variable character(len=*), public, parameter :: NTP_VARNAME = \"ntp\" NetCDF name of the number of active test particles variable character(len=*), public, parameter :: A_VARNAME = \"a\" NetCDF name of the semimajor axis variable character(len=*), public, parameter :: E_VARNAME = \"e\" NetCDF name of the eccentricity variable character(len=*), public, parameter :: INC_VARNAME = \"inc\" NetCDF name of the inclination variable character(len=*), public, parameter :: CAPOM_VARNAME = \"capom\" NetCDF name of the long. asc. node variable character(len=*), public, parameter :: OMEGA_VARNAME = \"omega\" NetCDF name of the arg. periapsis variable character(len=*), public, parameter :: CAPM_VARNAME = \"capm\" NetCDF name of the mean anomaly variable character(len=*), public, parameter :: XHX_VARNAME = \"xhx\" NetCDF name of the heliocentric position x variable character(len=*), public, parameter :: XHY_VARNAME = \"xhy\" NetCDF name of the heliocentric position y variable character(len=*), public, parameter :: XHZ_VARNAME = \"xhz\" NetCDF name of the heliocentric position z variable character(len=*), public, parameter :: VHX_VARNAME = \"vhx\" NetCDF name of the heliocentric velocity x variable character(len=*), public, parameter :: VHY_VARNAME = \"vhy\" NetCDF name of the heliocentric velocity y variable character(len=*), public, parameter :: VHZ_VARNAME = \"vhz\" NetCDF name of the heliocentric velocity z variable character(len=*), public, parameter :: GMASS_VARNAME = \"Gmass\" NetCDF name of the mass variable character(len=*), public, parameter :: RHILL_VARNAME = \"rhill\" NetCDF name of the hill radius variable character(len=*), public, parameter :: RADIUS_VARNAME = \"radius\" NetCDF name of the radius variable character(len=*), public, parameter :: IP1_VARNAME = \"Ip1\" NetCDF name of the axis 1 principal moment of inertial variable character(len=*), public, parameter :: IP2_VARNAME = \"Ip2\" NetCDF name of the axis 2 principal moment of inertial variable character(len=*), public, parameter :: IP3_VARNAME = \"Ip3\" NetCDF name of the axis 3 principal moment of inertial variable character(len=*), public, parameter :: ROTX_VARNAME = \"rotx\" NetCDF name of the rotation x variable character(len=*), public, parameter :: ROTY_VARNAME = \"roty\" NetCDF name of the rotation y variable character(len=*), public, parameter :: ROTZ_VARNAME = \"rotz\" NetCDF name of the rotation z variable character(len=*), public, parameter :: K2_VARNAME = \"k2\" NetCDF name of the Love number variable character(len=*), public, parameter :: Q_VARNAME = \"Q\" NetCDF name of the energy dissipation variable character(len=*), public, parameter :: KE_ORB_VARNAME = \"KE_orb\" NetCDF name of the system orbital kinetic energy variable character(len=*), public, parameter :: KE_SPIN_VARNAME = \"KE_spin\" NetCDF name of the system spin kinetic energy variable character(len=*), public, parameter :: PE_VARNAME = \"PE\" NetCDF name of the system potential energy variable character(len=*), public, parameter :: L_ORBX_VARNAME = \"L_orbx\" NetCDF name of the orbital angular momentum x variable character(len=*), public, parameter :: L_ORBY_VARNAME = \"L_orby\" NetCDF name of the orbital angular momentum y variable character(len=*), public, parameter :: L_ORBZ_VARNAME = \"L_orbz\" NetCDF name of the orbital angular momentum z variable character(len=*), public, parameter :: L_SPINX_VARNAME = \"L_spinx\" NetCDF name of the spin angular momentum x variable character(len=*), public, parameter :: L_SPINY_VARNAME = \"L_spiny\" NetCDF name of the spin angular momentum y variable character(len=*), public, parameter :: L_SPINZ_VARNAME = \"L_spinz\" NetCDF name of the spin angular momentum z variable character(len=*), public, parameter :: L_ESCAPEX_VARNAME = \"L_escapex\" NetCDF name of the escaped angular momentum x variable character(len=*), public, parameter :: L_ESCAPEY_VARNAME = \"L_escapey\" NetCDF name of the escaped angular momentum y variable character(len=*), public, parameter :: L_ESCAPEZ_VARNAME = \"L_escapez\" NetCDF name of the escaped angular momentum z variable character(len=*), public, parameter :: ECOLLISIONS_VARNAME = \"Ecollisions\" NetCDF name of the escaped angular momentum y variable character(len=*), public, parameter :: EUNTRACKED_VARNAME = \"Euntracked\" NetCDF name of the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) character(len=*), public, parameter :: GMESCAPE_VARNAME = \"GMescape\" NetCDF name of the G*Mass of bodies that escape the system character(len=*), public, parameter :: STATUS_VARNAME = \"status\" NetCDF name of the current status of the body variable (includes discard type) character(len=*), public, parameter :: ORIGIN_TYPE_VARNAME = \"origin_type\" NetCDF name of the origin type variable (Initial Conditions, Disruption, etc.) character(len=*), public, parameter :: ORIGIN_TIME_VARNAME = \"origin_time\" NetCDF name of the time of origin variable character(len=*), public, parameter :: ORIGIN_XHX_VARNAME = \"origin_xhx\" NetCDF name of the heliocentric position of the body at the time of origin x variable character(len=*), public, parameter :: ORIGIN_XHY_VARNAME = \"origin_xhy\" NetCDF name of the heliocentric position of the body at the time of origin y variable character(len=*), public, parameter :: ORIGIN_XHZ_VARNAME = \"origin_xhz\" NetCDF name of the heliocentric position of the body at the time of origin z variable character(len=*), public, parameter :: ORIGIN_VHX_VARNAME = \"origin_vhx\" NetCDF name of the heliocentric velocity of the body at the time of origin x variable character(len=*), public, parameter :: ORIGIN_VHY_VARNAME = \"origin_vhy\" NetCDF name of the heliocentric velocity of the body at the time of origin y variable character(len=*), public, parameter :: ORIGIN_VHZ_VARNAME = \"origin_vhz\" NetCDF name of the heliocentric velocity of the body at the time of origin z variable character(len=*), public, parameter :: DISCARD_TIME_VARNAME = \"discard_time\" NetCDF name of the time of discard variable character(len=*), public, parameter :: DISCARD_XHX_VARNAME = \"discard_xhx\" NetCDF name of the heliocentric position of the body at the time of discard x variable character(len=*), public, parameter :: DISCARD_XHY_VARNAME = \"discard_xhy\" NetCDF name of the heliocentric position of the body at the time of discard y variable character(len=*), public, parameter :: DISCARD_XHZ_VARNAME = \"discard_xhz\" NetCDF name of the heliocentric position of the body at the time of discard z variable character(len=*), public, parameter :: DISCARD_VHX_VARNAME = \"discard_vhx\" NetCDF name of the heliocentric velocity of the body at the time of discard x variable character(len=*), public, parameter :: DISCARD_VHY_VARNAME = \"discard_vhy\" NetCDF name of the heliocentric velocity of the body at the time of discard y variable character(len=*), public, parameter :: DISCARD_VHZ_VARNAME = \"discard_vhz\" NetCDF name of the heliocentric velocity of the body at the time of discard z variable character(len=*), public, parameter :: DISCARD_BODY_ID_VARNAME = \"discard_body_id\" NetCDF name of the id of the other body involved in the discard","tags":"","loc":"module/swiftest_globals.html"},{"title":"walltime_classes – swiftest","text":"Classes and methods used to compute elasped wall time Uses swiftest_globals module~~walltime_classes~~UsesGraph module~walltime_classes walltime_classes module~swiftest_globals swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by module~~walltime_classes~~UsedByGraph module~walltime_classes walltime_classes module~swiftest swiftest module~swiftest->module~walltime_classes module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces walltime_finish walltime_reset walltime_start Derived Types walltimer Subroutines walltime_finish walltime_reset walltime_start Interfaces interface public subroutine walltime_finish(self, nsubsteps, message) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output interface public subroutine walltime_reset(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object interface public subroutine walltime_start(self) Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object Derived Types type, public :: walltimer Components Type Visibility Attributes Name Initial integer(kind=I8B), public :: count_rate Rate at wich the clock ticks integer(kind=I8B), public :: count_max Maximum value of the clock ticker integer(kind=I8B), public :: count_start_main Value of the clock ticker at when the timer is first called integer(kind=I8B), public :: count_start_step Value of the clock ticker at the start of a timed step integer(kind=I8B), public :: count_finish_step Value of the clock ticker at the end of a timed step logical, public :: lmain_is_started = .false. Logical flag indicating whether or not the main timer has been reset or not Type-Bound Procedures procedure, public :: reset => walltime_reset Resets the clock ticker, settting main_start to the current ticker value procedure, public :: start => walltime_start Starts the timer, setting step_start to the current ticker value procedure, public :: finish => walltime_finish Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal Subroutines public subroutine walltime_finish (self, nsubsteps, message) Author David A. Minton Ends the timer, setting step_finish to the current ticker value and printing the elapsed time information to the terminal Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self Walltimer object integer(kind=I4B), intent(in) :: nsubsteps Number of substeps used to compute the time per step character(len=*), intent(in) :: message Message to prepend to the wall time terminal output public subroutine walltime_reset (self) Author David A. Minton Resets the clock ticker, settting main_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self public subroutine walltime_start (self) Author David A. Minton Starts the timer, setting step_start to the current ticker value Arguments Type Intent Optional Attributes Name class( walltimer ), intent(inout) :: self","tags":"","loc":"module/walltime_classes.html"},{"title":"swiftest_operators – swiftest","text":"Custom operators, including\n   A .cross. B = Cross product of A(1:3) and B(1:3) Each operator can also do element-wise computation on arrays of the form .mag. A(1:3, 1:n) Interfaces for .cross. operator Interfaces for .mag. operator Uses swiftest_globals module~~swiftest_operators~~UsesGraph module~swiftest_operators swiftest_operators module~swiftest_globals swiftest_globals module~swiftest_operators->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_operator_mag s_operator_cross module~~swiftest_operators~~UsedByGraph module~swiftest_operators swiftest_operators module~swiftest swiftest module~swiftest->module~swiftest_operators module~s_operator_mag s_operator_mag module~s_operator_mag->module~swiftest_operators module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest_operators module~s_operator_cross->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces operator(.cross.) operator(.mag.) Interfaces public interface operator(.cross.) public pure function operator_cross_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) public pure function operator_cross_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) public pure function operator_cross_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) public pure function operator_cross_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) public pure function operator_cross_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) public pure function operator_cross_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) public pure function operator_cross_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) public pure function operator_cross_el_sp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:), allocatable public pure function operator_cross_el_dp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:), allocatable public pure function operator_cross_el_qp(A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:), allocatable public pure function operator_cross_el_i1b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i2b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i4b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:), allocatable public pure function operator_cross_el_i8b(A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:), allocatable public interface operator(.mag.) public pure function operator_mag_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) public pure function operator_mag_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) public pure function operator_mag_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A Return Value real(kind=QP) public pure function operator_mag_el_sp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:), allocatable public pure function operator_mag_el_dp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:), allocatable public pure function operator_mag_el_qp(A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:), allocatable","tags":"","loc":"module/swiftest_operators.html"},{"title":"helio_classes – swiftest","text":"Definition of classes and methods specific to the Democratic Heliocentric Method\n Adapted from David E. Kaufmann's Swifter routine: module_helio.f90 helio_nbody_system class definitions and method interfaces helio_cb class definitions and method interfaces helio_pl class definitions and method interfaces Helio massive body particle class helio_tp class definitions and method interfaces Helio test particle class Uses swiftest_globals swiftest_classes whm_classes module~~helio_classes~~UsesGraph module~helio_classes helio_classes module~swiftest_globals swiftest_globals module~helio_classes->module~swiftest_globals module~whm_classes whm_classes module~helio_classes->module~whm_classes module~swiftest_classes swiftest_classes module~helio_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~swiftest_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_helio_drift s_helio_gr s_helio_kick s_helio_setup s_helio_step module~~helio_classes~~UsedByGraph module~helio_classes helio_classes module~s_helio_setup s_helio_setup module~s_helio_setup->module~helio_classes module~swiftest swiftest module~s_helio_setup->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~helio_classes module~s_helio_step->module~swiftest module~symba_classes symba_classes module~symba_classes->module~helio_classes module~swiftest->module~helio_classes module~swiftest->module~symba_classes module~s_helio_drift s_helio_drift module~s_helio_drift->module~helio_classes module~s_helio_drift->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~helio_classes module~s_helio_gr->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~helio_classes module~s_helio_kick->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~symba_classes module~s_symba_collision->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~symba_classes module~s_symba_encounter_check->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~symba_classes module~s_symba_step->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~symba_classes module~s_symba_util->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~symba_classes module~s_symba_discard->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~symba_classes module~s_symba_drift->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~symba_classes module~s_symba_kick->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~symba_classes module~s_symba_setup->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~symba_classes module~s_symba_io->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces helio_drift_body helio_drift_pl helio_drift_tp helio_drift_linear_pl helio_drift_linear_tp helio_gr_kick_getacch_pl helio_gr_kick_getacch_tp helio_gr_p4_pl helio_gr_p4_tp helio_kick_getacch_pl helio_kick_getacch_tp helio_kick_vb_pl helio_kick_vb_tp helio_setup_initialize_system helio_step_pl helio_step_system helio_step_tp Derived Types helio_nbody_system helio_cb helio_pl helio_tp Interfaces interface public module subroutine helio_drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_drift_linear_pl(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step interface public module subroutine helio_drift_linear_tp(self, cb, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step interface public pure module subroutine helio_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public pure module subroutine helio_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public pure module subroutine helio_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public pure module subroutine helio_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public module subroutine helio_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine helio_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine helio_kick_vb_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine helio_kick_vb_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine helio_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine helio_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine helio_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine helio_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsizee Derived Types type, public, extends( whm_nbody_system ) :: helio_nbody_system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: step => helio_step_system Advance the Helio nbody system forward in time by one step procedure, public :: initialize => helio_setup_initialize_system Performs Helio-specific initilization steps, including converting to DH coordinates type, public, extends( swiftest_cb ) :: helio_cb Helio central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( swiftest_pl ) :: helio_pl Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: append => util_append_pl Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: drift => helio_drift_pl Method for Danby drift in Democratic Heliocentric coordinates procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => helio_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities procedure, public :: step => helio_step_pl Steps the body forward one stepsize type, public, extends( swiftest_tp ) :: helio_tp Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and procedure, public :: append => util_append_tp Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: drift => helio_drift_tp Method for Danby drift in Democratic Heliocentric coordinates procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => helio_kick_getacch_tp Compute heliocentric accelerations of massive bodies procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities procedure, public :: step => helio_step_tp Steps the body forward one stepsize","tags":"","loc":"module/helio_classes.html"},{"title":"whm_classes – swiftest","text":"Definition of classes and methods specific to the Democratic Heliocentric Method\n Partially adapted from David E. Kaufmann's Swifter module: module_whm.f90 whm_cb class definitions and method interfaces whm_pl class definitions and method interfaces whm_tp class definitions and method interfaces WHM test particle class whm_nbody_system class definitions and method interfaces Uses swiftest_globals swiftest_classes module~~whm_classes~~UsesGraph module~whm_classes whm_classes module~swiftest_globals swiftest_globals module~whm_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~whm_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_whm_coord s_whm_gr s_whm_kick s_whm_setup s_whm_step s_whm_util whm_drift module~~whm_classes~~UsedByGraph module~whm_classes whm_classes module~s_whm_kick s_whm_kick module~s_whm_kick->module~whm_classes module~swiftest swiftest module~s_whm_kick->module~swiftest module~whm_drift whm_drift module~whm_drift->module~whm_classes module~whm_drift->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~whm_classes module~s_whm_gr->module~swiftest module~helio_classes helio_classes module~helio_classes->module~whm_classes module~s_whm_coord s_whm_coord module~s_whm_coord->module~whm_classes module~s_whm_coord->module~swiftest module~swiftest->module~whm_classes module~swiftest->module~helio_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~symba_classes symba_classes module~swiftest->module~symba_classes module~s_whm_step s_whm_step module~s_whm_step->module~whm_classes module~s_whm_step->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~whm_classes module~s_whm_setup->module~swiftest module~rmvs_classes->module~whm_classes module~s_whm_util s_whm_util module~s_whm_util->module~whm_classes module~s_whm_util->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_collision->module~symba_classes module~s_obl s_obl module~s_obl->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_symba_encounter_check->module~symba_classes module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_rmvs_step->module~rmvs_classes module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_rmvs_kick->module~rmvs_classes module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_rmvs_io->module~rmvs_classes module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_rmvs_chk->module~rmvs_classes module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~symba_classes->module~helio_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_rmvs_discard->module~rmvs_classes module~s_helio_drift s_helio_drift module~s_helio_drift->module~helio_classes module~s_helio_drift->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~helio_classes module~s_helio_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_rmvs_util->module~rmvs_classes program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_step->module~symba_classes module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_util->module~symba_classes module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~helio_classes module~s_helio_gr->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_rmvs_setup->module~rmvs_classes module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_discard->module~symba_classes module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_symba_drift->module~symba_classes module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~helio_classes module~s_helio_setup->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_kick->module~symba_classes module~s_helio_step s_helio_step module~s_helio_step->module~helio_classes module~s_helio_step->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_symba_setup->module~symba_classes module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_symba_io->module~symba_classes module~s_kick s_kick module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces whm_coord_h2j_pl whm_coord_j2h_pl whm_coord_vh2vj_pl whm_drift_pl whm_util_index_eucl_plpl whm_kick_getacch_pl whm_kick_getacch_tp whm_kick_vh_pl whm_kick_vh_tp whm_gr_kick_getacch_pl whm_gr_kick_getacch_tp whm_gr_p4_pl whm_gr_p4_tp whm_setup_pl whm_setup_initialize_system whm_step_pl whm_step_system whm_step_tp whm_util_append_pl whm_util_spill_pl whm_util_fill_pl whm_util_resize_pl whm_util_set_ir3j whm_util_set_mu_eta_pl whm_util_sort_pl whm_util_sort_rearrange_pl Derived Types whm_cb whm_pl whm_tp whm_nbody_system Interfaces interface public module subroutine whm_coord_h2j_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree interface public module subroutine whm_coord_j2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree interface public module subroutine whm_coord_vh2vj_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree interface public module subroutine whm_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public subroutine whm_util_index_eucl_plpl(self, param) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine whm_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine whm_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Get heliocentric accelration of the test particle Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine whm_kick_vh_pl(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine whm_kick_vh_tp(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public pure module subroutine whm_gr_kick_getacch_pl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public pure module subroutine whm_gr_kick_getacch_tp(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public pure module subroutine whm_gr_p4_pl(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public pure module subroutine whm_gr_p4_tp(self, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size interface public module subroutine whm_setup_pl(self, n, param) Implementation → Reads WHM massive body object in from file Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body objectobject integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameters interface public module subroutine whm_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters interface public module subroutine whm_step_pl(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine whm_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine whm_step_tp(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine whm_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine whm_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine whm_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine whm_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine whm_util_set_ir3j(self) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object interface public module subroutine whm_util_set_mu_eta_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine whm_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine whm_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) Derived Types type, public, extends( swiftest_cb ) :: whm_cb Swiftest central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( swiftest_pl ) :: whm_pl WHM massive body particle class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public, dimension(:), allocatable :: eta Jacobi mass real(kind=DP), public, dimension(:,:), allocatable :: xj Jacobi position real(kind=DP), public, dimension(:,:), allocatable :: vj Jacobi velocity real(kind=DP), public, dimension(:), allocatable :: muj Jacobi mu: GMcb * eta(i) / eta(i - 1) real(kind=DP), public, dimension(:), allocatable :: ir3j Third term of heliocentric acceleration\n Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_setup_pl and whm_util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: h2j => whm_coord_h2j_pl Convert position and velcoity vectors from heliocentric to Jacobi coordinates procedure, public :: j2h => whm_coord_j2h_pl Convert position and velcoity vectors from Jacobi to helliocentric coordinates procedure, public :: vh2vj => whm_coord_vh2vj_pl Convert velocity vectors from heliocentric to Jacobi coordinates procedure, public :: drift => whm_drift_pl Loop through massive bodies and call Danby drift routine to jacobi coordinates procedure, public :: accel_gr => whm_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => whm_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: kick => whm_kick_vh_pl Kick heliocentric velocities of massive bodies procedure, public :: append => whm_util_append_pl Appends elements from one structure to another procedure, public :: fill => whm_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => whm_util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_ir3 => whm_util_set_ir3j Sets both the heliocentric and jacobi inverse radius terms (1/rj 3 and 1/rh 3) procedure, public :: set_mu => whm_util_set_mu_eta_pl Sets the Jacobi mass value for all massive bodies. procedure, public :: sort => whm_util_sort_pl Sort a WHM massive body object in-place. procedure, public :: rearrange => whm_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => whm_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: setup => whm_setup_pl Constructor method - Allocates space for the input number of bodiess procedure, public :: step => whm_step_pl Steps the body forward one stepsize type, public, extends( swiftest_tp ) :: whm_tp Note to developers: If you add componenets to this class, be sure to update methods and subroutines that traverse the\n    component list, such as whm_util_spill_tp Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and procedure, public :: append => util_append_tp Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: accel_gr => whm_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => whm_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: accel => whm_kick_getacch_tp Compute heliocentric accelerations of test particles procedure, public :: kick => whm_kick_vh_tp Kick heliocentric velocities of test particles procedure, public :: step => whm_step_tp Steps the particle forward one stepsize type, public, extends( swiftest_nbody_system ) :: whm_nbody_system An abstract class for the WHM integrator nbody system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: initialize => whm_setup_initialize_system Replace the abstract procedures with concrete ones procedure, public :: step => whm_step_system Advance the WHM nbody system forward in time by one step","tags":"","loc":"module/whm_classes.html"},{"title":"fraggle_classes – swiftest","text":"Definition of classes and methods specific to Fraggel: The Fragment Generation Model fraggle_fragments class definitions and method interfaces Uses swiftest_globals swiftest_classes module~~fraggle_classes~~UsesGraph module~fraggle_classes fraggle_classes module~swiftest_globals swiftest_globals module~fraggle_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~fraggle_classes->module~swiftest_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_fraggle_generate s_fraggle_io s_fraggle_placeholder s_fraggle_regime s_fraggle_set s_fraggle_setup s_fraggle_util module~~fraggle_classes~~UsedByGraph module~fraggle_classes fraggle_classes module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~fraggle_classes module~swiftest swiftest module~s_fraggle_util->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~fraggle_classes module~s_fraggle_placeholder->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~fraggle_classes module~s_fraggle_setup->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~fraggle_classes module~s_fraggle_regime->module~swiftest module~symba_classes symba_classes module~symba_classes->module~fraggle_classes module~swiftest->module~fraggle_classes module~swiftest->module~symba_classes module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~fraggle_classes module~s_fraggle_set->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~fraggle_classes module~s_fraggle_generate->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~fraggle_classes module~s_fraggle_io->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~symba_classes module~s_symba_collision->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~symba_classes module~s_symba_encounter_check->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~symba_classes module~s_symba_step->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~symba_classes module~s_symba_util->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~symba_classes module~s_symba_discard->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~symba_classes module~s_symba_drift->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~symba_classes module~s_symba_kick->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~symba_classes module~s_symba_setup->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~symba_classes module~s_symba_io->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables FRAGGLE_NMASS_DIST FRAGGLE_LOG_OUT FRAGGLE_LOG_UNIT Interfaces fraggle_util_vmag_to_vb fraggle_generate_fragments fraggle_io_log_generate fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_regime fraggle_io_log_start fraggle_placeholder_accel fraggle_placeholder_kick fraggle_placeholder_step fraggle_regime_colliders fraggle_set_budgets_fragments fraggle_set_coordinate_system fraggle_set_mass_dist_fragments fraggle_set_natural_scale_factors fraggle_set_original_scale_factors fraggle_setup_fragments fraggle_setup_reset_fragments fraggle_util_add_fragments_to_system fraggle_util_ang_mtm fraggle_util_construct_temporary_system fraggle_util_get_energy_momentum fraggle_util_restructure fraggle_util_shift_vector_to_origin Derived Types fraggle_colliders fraggle_fragments Variables Type Visibility Attributes Name Initial integer(kind=I4B), public, parameter :: FRAGGLE_NMASS_DIST = 3 Number of mass bins returned by the regime calculation (largest fragment, second largest, and remainder) character(len=*), public, parameter :: FRAGGLE_LOG_OUT = \"fraggle.log\" Name of log file for Fraggle diagnostic information integer(kind=I4B), public, parameter :: FRAGGLE_LOG_UNIT = 76 Unit number for Fraggle log file fraggle_colliders class definitions and method interfaces Interfaces interface public module function fraggle_util_vmag_to_vb(v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:), allocatable interface public module subroutine fraggle_generate_fragments(self, colliders, system, param, lfailure) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead? interface public module subroutine fraggle_io_log_generate(frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag interface public module subroutine fraggle_io_log_one_message(message) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message interface public module subroutine fraggle_io_log_pl(pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters interface public module subroutine fraggle_io_log_regime(colliders, frag) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders class( fraggle_fragments ), intent(in) :: frag interface public module subroutine fraggle_io_log_start(param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param interface public module subroutine fraggle_placeholder_accel(self, system, param, t, lbeg) Implementation → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step interface public module subroutine fraggle_placeholder_kick(self, system, param, t, dt, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. interface public module subroutine fraggle_placeholder_step(self, system, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Helio massive body particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsiz interface public module subroutine fraggle_regime_colliders(self, frag, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters interface public module subroutine fraggle_set_budgets_fragments(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_set_coordinate_system(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_set_mass_dist_fragments(self, colliders, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters interface public module subroutine fraggle_set_natural_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_set_original_scale_factors(self, colliders) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object interface public module subroutine fraggle_setup_fragments(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object integer(kind=I4B), intent(in) :: n Number of fragments class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters interface public module subroutine fraggle_setup_reset_fragments(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self interface public module subroutine fraggle_util_add_fragments_to_system(frag, colliders, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters interface public module subroutine fraggle_util_ang_mtm(self) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object interface public module subroutine fraggle_util_construct_temporary_system(frag, system, param, tmpsys, tmpparam) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters interface public module subroutine fraggle_util_get_energy_momentum(self, colliders, system, param, lbefore) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa interface public module subroutine fraggle_util_restructure(self, colliders, try, f_spin, r_max_start) Implementation → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt interface public module subroutine fraggle_util_shift_vector_to_origin(m_frag, vec_frag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame Derived Types type, public :: fraggle_colliders Class definition for the variables that describe the bodies involved in the collision Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: ncoll Number of bodies involved in the collision integer(kind=I4B), public, dimension(:), allocatable :: idx Index of bodies involved in the collision real(kind=DP), public, dimension(NDIM,2) :: xb Two-body equivalent position vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: vb Two-body equivalent velocity vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: rot Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_spin Two-body equivalent spin angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: L_orbit Two-body equivalent orbital angular momentum vectors of the collider bodies prior to collision real(kind=DP), public, dimension(NDIM,2) :: Ip Two-body equivalent principal axes moments of inertia the collider bodies prior to collision real(kind=DP), public, dimension(2) :: mass Two-body equivalent mass of the collider bodies prior to the collision real(kind=DP), public, dimension(2) :: radius Two-body equivalent radii of the collider bodies prior to the collision Type-Bound Procedures procedure, public :: regime => fraggle_regime_colliders Determine which fragmentation regime the set of colliders will be type, public, extends( swiftest_pl ) :: fraggle_fragments Class definition for the variables that describe a collection of fragments by Fraggle barycentric coordinates Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl real(kind=DP), public :: mtot Total mass of fragments real(kind=DP), public :: Qloss Energy lost during the collision real(kind=DP), public, dimension(FRAGGLE_NMASS_DIST) :: mass_dist Distribution of fragment mass determined by the regime calculation (largest fragment, second largest, and remainder) integer(kind=I4B), public :: regime Collresolve regime code for this collision real(kind=DP), public, dimension(NDIM) :: xbcom Center of mass position vector of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: vbcom Velocity vector of the center of mass of the collider system in system barycentric coordinates real(kind=DP), public, dimension(NDIM) :: x_coll_unit x-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: y_coll_unit y-direction unit vector of collisional system real(kind=DP), public, dimension(NDIM) :: z_coll_unit z-direction unit vector of collisional system real(kind=DP), public, dimension(:,:), allocatable :: x_coll Array of fragment position vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_coll Array of fragment velocity vectors in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_r_unit Array of radial direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_t_unit Array of tangential direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:,:), allocatable :: v_n_unit Array of normal direction unit vectors of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rmag Array of radial distance magnitudes of individual fragments in the collisional coordinate frame real(kind=DP), public, dimension(:), allocatable :: rotmag Array of rotation magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_r_mag Array of radial direction velocity magnitudes of individual fragments real(kind=DP), public, dimension(:), allocatable :: v_t_mag Array of tangential direction velocity magnitudes of individual fragments real(kind=DP), public :: ke_orbit Current orbital kinetic energy of the system of fragments in the collisional frame real(kind=DP), public :: ke_spin Current spin kinetic energy of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_orbit Current orbital angular momentum of the system of fragments in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_spin Current spin angular momentum of the system of fragments in the collisional frame real(kind=DP), public :: ke_budget Total kinetic energy budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: L_budget Total angular momentum budget for the system of fragmens in the collisional frame real(kind=DP), public, dimension(NDIM) :: Lorbit_before Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lorbit_after Before/after orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_before Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_after Before/after spin angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_before Before/after total system angular momentum real(kind=DP), public, dimension(NDIM) :: Ltot_after Before/after total system angular momentum real(kind=DP), public :: ke_orbit_before Before/after orbital kinetic energy real(kind=DP), public :: ke_orbit_after Before/after orbital kinetic energy real(kind=DP), public :: ke_spin_before Before/after spin kinetic energy real(kind=DP), public :: ke_spin_after Before/after spin kinetic energy real(kind=DP), public :: pe_before Before/after potential energy real(kind=DP), public :: pe_after Before/after potential energy real(kind=DP), public :: Etot_before Before/after total system energy real(kind=DP), public :: Etot_after Before/after total system energy real(kind=DP), public :: dscale Distance dimension scale factor real(kind=DP), public :: mscale Mass scale factor real(kind=DP), public :: tscale Time scale factor real(kind=DP), public :: vscale Velocity scale factor (a convenience unit that is derived from dscale and tscale) real(kind=DP), public :: Escale Energy scale factor (a convenience unit that is derived from dscale, tscale, and mscale) real(kind=DP), public :: Lscale Angular momentum scale factor (a convenience unit that is derived from dscale, tscale, and mscale) Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: append => util_append_pl Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: generate_fragments => fraggle_generate_fragments Generates a system of fragments in barycentric coordinates that conserves energy and momentum. procedure, public :: accel => fraggle_placeholder_accel Placeholder subroutine to fulfill requirement for an accel method procedure, public :: kick => fraggle_placeholder_kick Placeholder subroutine to fulfill requirement for a kick method procedure, public :: step => fraggle_placeholder_step Placeholder subroutine to fulfill requirement for a step method procedure, public :: set_budgets => fraggle_set_budgets_fragments Sets the energy and momentum budgets of the fragments based on the collider value procedure, public :: set_coordinate_system => fraggle_set_coordinate_system Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. procedure, public :: set_mass_dist => fraggle_set_mass_dist_fragments Sets the distribution of mass among the fragments depending on the regime type procedure, public :: set_natural_scale => fraggle_set_natural_scale_factors Scales dimenional quantities to ~O(1) with respect to the collisional system. procedure, public :: set_original_scale => fraggle_set_original_scale_factors Restores dimenional quantities back to the original system units procedure, public :: setup => fraggle_setup_fragments Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. procedure, public :: reset => fraggle_setup_reset_fragments Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) procedure, public :: get_ang_mtm => fraggle_util_ang_mtm Calcualtes the current angular momentum of the fragments procedure, public :: get_energy_and_momentum => fraggle_util_get_energy_momentum Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.) procedure, public :: restructure => fraggle_util_restructure Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints","tags":"","loc":"module/fraggle_classes.html"},{"title":"symba_classes – swiftest","text":"Definition of classes and methods specific to the SyMBA integrator\n Adapted from David E. Kaufmann's Swifter routine: module_symba.f90 symba_kinship class definitions and method interfaces symba_cb class definitions and method interfaces symba_pl class definitions and method interfaces symba_tp class definitions and method interfaces symba_encounter class definitions and method interfaces symba_pltpenc class definitions and method interfaces symba_plplenc class definitions and method interfaces symba_nbody_system class definitions and method interfaces Uses swiftest_globals swiftest_classes helio_classes fraggle_classes module~~symba_classes~~UsesGraph module~symba_classes symba_classes module~swiftest_globals swiftest_globals module~symba_classes->module~swiftest_globals module~swiftest_classes swiftest_classes module~symba_classes->module~swiftest_classes module~helio_classes helio_classes module~symba_classes->module~helio_classes module~fraggle_classes fraggle_classes module~symba_classes->module~fraggle_classes iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env module~swiftest_classes->module~swiftest_globals module~helio_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~whm_classes whm_classes module~helio_classes->module~whm_classes module~fraggle_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: s_symba_collision s_symba_discard s_symba_drift s_symba_encounter_check s_symba_io s_symba_kick s_symba_setup s_symba_step s_symba_util module~~symba_classes~~UsedByGraph module~symba_classes symba_classes module~s_symba_discard s_symba_discard module~s_symba_discard->module~symba_classes module~swiftest swiftest module~s_symba_discard->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~symba_classes module~s_symba_drift->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~symba_classes module~s_symba_collision->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~symba_classes module~s_symba_kick->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~symba_classes module~s_symba_step->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~symba_classes module~s_symba_util->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~symba_classes module~s_symba_encounter_check->module~swiftest module~swiftest->module~symba_classes module~s_symba_setup s_symba_setup module~s_symba_setup->module~symba_classes module~s_symba_setup->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~symba_classes module~s_symba_io->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables NENMAX NTENC RHSCALE RSHELL Interfaces symba_collision_check_encounter symba_encounter_check_pl symba_encounter_check symba_encounter_check_tp symba_collision_casedisruption symba_collision_casehitandrun symba_collision_casemerge symba_collision_encounter_extract_collisions symba_collision_make_colliders_pl symba_collision_resolve_fragmentations symba_collision_resolve_mergers symba_collision_resolve_plplenc symba_collision_resolve_pltpenc symba_discard_pl symba_drift_pl symba_drift_tp symba_encounter_check_one symba_util_index_eucl_plpl symba_io_param_reader symba_io_param_writer symba_io_write_discard symba_kick_getacch_int_pl symba_kick_getacch_pl symba_kick_getacch_tp symba_kick_encounter symba_setup_initialize_system symba_setup_merger symba_setup_pl symba_setup_encounter symba_setup_tp symba_step_system symba_step_interp_system symba_step_set_recur_levels_system symba_step_recur_system symba_step_reset_system util_append symba_util_append_encounter symba_util_append_merger symba_util_append_pl symba_util_append_tp symba_util_copy_encounter util_fill symba_util_fill_pl symba_util_fill_tp symba_util_peri_pl symba_util_rearray_pl symba_util_reset_kinship util_resize symba_util_resize_merger symba_util_resize_pl symba_util_resize_tp symba_util_sort_pl symba_util_sort_tp util_sort_rearrange symba_util_sort_rearrange_pl symba_util_sort_rearrange_tp util_spill symba_util_spill_pl symba_util_spill_encounter symba_util_spill_tp Derived Types symba_parameters symba_kinship symba_cb symba_pl symba_merger symba_tp symba_encounter symba_pltpenc symba_plplenc symba_nbody_system Variables Type Visibility Attributes Name Initial integer(kind=I4B), private, parameter :: NENMAX = 32767 integer(kind=I4B), private, parameter :: NTENC = 3 real(kind=DP), private, parameter :: RHSCALE = 6.5_DP real(kind=DP), private, parameter :: RSHELL = 0.48075_DP Interfaces interface public module function symba_collision_check_encounter(self, system, param, t, dt, irec) result(lany_collision) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision n interface public module function symba_encounter_check_pl(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter interface public module function symba_encounter_check(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter interface public module function symba_encounter_check_tp(self, system, dt, irec) result(lany_encounter) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter interface public module function symba_collision_casedisruption(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome interface public module function symba_collision_casehitandrun(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome interface public module function symba_collision_casemerge(system, param, colliders, frag) result(status) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome interface public module subroutine symba_collision_encounter_extract_collisions(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_collision_make_colliders_pl(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision interface public module subroutine symba_collision_resolve_fragmentations(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions interface public module subroutine symba_collision_resolve_mergers(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions interface public module subroutine symba_collision_resolve_plplenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level interface public module subroutine symba_collision_resolve_pltpenc(self, system, param, t, dt, irec) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-tp encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level interface public module subroutine symba_discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine symba_drift_pl(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public module subroutine symba_drift_tp(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public pure module subroutine symba_encounter_check_one(xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr interface public module subroutine symba_util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Current run configuration parameters with SyMBA additionss integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine symba_io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Current run configuration parameters with SyMBA additions integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine symba_io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine symba_kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self interface public module subroutine symba_kick_getacch_pl(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine symba_kick_getacch_tp(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step interface public module subroutine symba_kick_encounter(self, system, dt, irec, sgn) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration interface public module subroutine symba_setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine symba_setup_merger(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for interface public module subroutine symba_setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter interface public module subroutine symba_step_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine symba_step_interp_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine symba_step_set_recur_levels_system(self, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system objec integer(kind=I4B), intent(in) :: ireci Input recursion level interface public recursive module subroutine symba_step_recur_system(self, param, t, ireci) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level interface public module subroutine symba_step_reset_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions public interface util_append public subroutine symba_util_append_arr_kin(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_merger(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine symba_util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into public interface util_fill public subroutine symba_util_fill_arr_kin(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine symba_util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine symba_util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine symba_util_peri_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine symba_util_rearray_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions interface public module subroutine symba_util_reset_kinship(self, idx) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset public interface util_resize public subroutine symba_util_resize_arr_kin(arr, nnew) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size interface public module subroutine symba_util_resize_merger(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine symba_util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine symba_util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine symba_util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine symba_util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order public interface util_sort_rearrange public subroutine symba_util_sort_rearrange_arr_kin(arr, ind, n) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange interface public module subroutine symba_util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine symba_util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) public interface util_spill public subroutine symba_util_spill_arr_kin(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine symba_util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine symba_util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list interface public module subroutine symba_util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not Derived Types type, public, extends( swiftest_parameters ) :: symba_parameters Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters real(kind=DP), public :: GMTINY = -1.0_DP Smallest G*mass that is fully gravitating real(kind=DP), public :: min_GMfrag = -1.0_DP Smallest G*mass that can be produced in a fragmentation event integer(kind=I4B), public, dimension(:), allocatable :: seed Random seeds logical, public :: lfragmentation = .false. Do fragmentation modeling instead of simple merger. Type-Bound Procedures procedure, public :: dump => io_dump_param procedure, public :: read_in => io_read_in_param procedure, public :: reader => symba_io_param_reader procedure, public :: writer => symba_io_param_writer type, public :: symba_kinship Class definition for the kinship relationships used in bookkeeping multiple collisions bodies in a single time step. Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: parent Index of parent particle integer(kind=I4B), public :: nchild number of children in merger list integer(kind=I4B), public, dimension(:), allocatable :: child Index of children particles type, public, extends( helio_cb ) :: symba_cb SyMBA central body particle class Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: ptbeg negative barycentric velocity of the central body at the beginning of time step real(kind=DP), public, dimension(NDIM) :: ptend negative barycentric velocity of the central body at the end of time step real(kind=DP), public :: GM0 = 0.0_DP Initial G*mass of the central body real(kind=DP), public :: dGM = 0.0_DP Change in G*mass of the central body real(kind=DP), public :: R0 = 0.0_DP Initial radius of the central body real(kind=DP), public :: dR = 0.0_DP Change in the radius of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, extends( helio_pl ) :: symba_pl SyMBA massive body class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities procedure, public :: step => helio_step_pl Steps the body forward one stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: discard => symba_discard_pl Process massive body discards procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: setup => symba_setup_pl Constructor method - Allocates space for the input number of bodies procedure, public :: append => symba_util_append_pl Appends elements from one structure to another procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies procedure, public :: resize => symba_util_resize_pl Checks the current size of a SyMBA massive body against the requested size and resizes it if it is too small. procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, extends( symba_pl ) :: symba_merger Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl logical, public, dimension(:), allocatable :: lcollision flag indicating whether body has merged with another this time step logical, public, dimension(:), allocatable :: lencounter flag indicating whether body is part of an encounter this time step logical, public, dimension(:), allocatable :: lmtiny flag indicating whether this body is below the GMTINY cutoff value integer(kind=I4B), public :: nplm number of bodies above the GMTINY limit integer(kind=I8B), public :: nplplm Number of body (all massive)-body (only those above GMTINY) comparisons in the flattened upper triangular matrix integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with other planets this time step integer(kind=I4B), public, dimension(:), allocatable :: ntpenc number of encounters with test particles this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this body should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step integer(kind=I4B), public, dimension(:), allocatable :: isperi perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp semimajor axis following perihelion passage type( symba_kinship ), public, dimension(:), allocatable :: kin Array of merger relationship structures that can account for multiple pairwise mergers in a single step integer(kind=I4B), public, dimension(:), allocatable :: ncomp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: lindrift => helio_drift_linear_pl Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_pl Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_pl Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => helio_kick_vb_pl Kicks the barycentric velocities procedure, public :: step => helio_step_pl Steps the body forward one stepsize procedure, public :: make_colliders => symba_collision_make_colliders_pl When a single body is involved in more than one collision in a single step, it becomes part of a family procedure, public :: index => symba_util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: discard => symba_discard_pl Process massive body discards procedure, public :: drift => symba_drift_pl Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure, public :: encounter_check => symba_encounter_check_pl Checks if massive bodies are going through close encounters with each other procedure, public :: accel_int => symba_kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodiess, with no mutual interactions between bodies below GMTINY procedure, public :: accel => symba_kick_getacch_pl Compute heliocentric accelerations of massive bodies procedure, public :: fill => symba_util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => symba_util_peri_pl Determine system pericenter passages for massive bodies procedure, public :: rearray => symba_util_rearray_pl Clean up the massive body structures to remove discarded bodies and add new bodies procedure, public :: reset_kinship => symba_util_reset_kinship Resets the kinship status of bodies procedure, public :: sort => symba_util_sort_pl Sorts body arrays by a sortable componen procedure, public :: rearrange => symba_util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => symba_util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_merger Appends elements from one structure to another procedure, public :: resize => symba_util_resize_merger Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. procedure, public :: setup => symba_setup_merger Constructor method - Allocates space for the input number of bodies type, public, extends( helio_tp ) :: symba_tp SyMBA test particle class Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp integer(kind=I4B), public, dimension(:), allocatable :: nplenc number of encounters with planets this time step integer(kind=I4B), public, dimension(:), allocatable :: levelg level at which this particle should be moved integer(kind=I4B), public, dimension(:), allocatable :: levelm deepest encounter level achieved this time step Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: lindrift => helio_drift_linear_tp Method for linear drift of massive bodies due to barycentric momentum of Sun procedure, public :: accel_gr => helio_gr_kick_getacch_tp Acceleration term arising from the post-Newtonian correction procedure, public :: gr_pos_kick => helio_gr_p4_tp Position kick due to p**4 term in the post-Newtonian correction procedure, public :: kick => helio_kick_vb_tp Kicks the barycentric velocities procedure, public :: step => helio_step_tp Steps the body forward one stepsize procedure, public :: drift => symba_drift_tp Method for Danby drift in Democratic Heliocentric coordinates. Sets the mask to the current recursion level procedure, public :: encounter_check => symba_encounter_check_tp Checks if any test particles are undergoing a close encounter with a massive body procedure, public :: accel => symba_kick_getacch_tp Compute heliocentric accelerations of test particles procedure, public :: setup => symba_setup_tp Constructor method - Allocates space for the input number of bodies procedure, public :: append => symba_util_append_tp Appends elements from one structure to another procedure, public :: fill => symba_util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => symba_util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: sort => symba_util_sort_tp Sorts body arrays by a sortable componen procedure, public :: rearrange => symba_util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => symba_util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, extends( swiftest_encounter ) :: symba_encounter SyMBA class for tracking close encounters in a step Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another type, public, extends( symba_encounter ) :: symba_pltpenc SyMBA class for tracking pl-tp close encounters in a step Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another procedure, public :: resolve_collision => symba_collision_resolve_pltpenc Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the c type, public, extends( symba_encounter ) :: symba_plplenc SyMBA class for tracking pl-pl close encounters in a step Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter integer(kind=I4B), public, dimension(:), allocatable :: level encounter recursion level Type-Bound Procedures procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file procedure, public :: collision_check => symba_collision_check_encounter Checks if a test particle is going to collide with a massive body procedure, public :: encounter_check => symba_encounter_check Checks if massive bodies are going through close encounters with each other procedure, public :: kick => symba_kick_encounter Kick barycentric velocities of active test particles within SyMBA recursion procedure, public :: setup => symba_setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: copy => symba_util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => symba_util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: append => symba_util_append_encounter Appends elements from one structure to another procedure, public :: extract_collisions => symba_collision_encounter_extract_collisions Processes the pl-pl encounter list remove only those encounters that led to a collision procedure, public :: resolve_fragmentations => symba_collision_resolve_fragmentations Process list of collisions, determine the collisional regime, and then create fragments procedure, public :: resolve_mergers => symba_collision_resolve_mergers Process list of collisions and merge colliding bodies together procedure, public :: resolve_collision => symba_collision_resolve_plplenc Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the c type, public, extends( helio_nbody_system ) :: symba_nbody_system Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles class( symba_merger ), public, allocatable :: pl_adds List of added bodies in mergers or collisions class( symba_pltpenc ), public, allocatable :: pltpenc_list List of massive body-test particle encounters in a single step class( symba_plplenc ), public, allocatable :: plplenc_list List of massive body-massive body encounters in a single step class( symba_plplenc ), public, allocatable :: plplcollision_list List of massive body-massive body collisions in a single step integer(kind=I4B), public :: irec System recursion level Type-Bound Procedures procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers procedure, public :: write_discard => symba_io_write_discard Write out information about discarded and merged planets and test particles in SyMBA procedure, public :: initialize => symba_setup_initialize_system Performs SyMBA-specific initilization steps procedure, public :: step => symba_step_system Advance the SyMBA nbody system forward in time by one step procedure, public :: interp => symba_step_interp_system Perform an interpolation step on the SymBA nbody system procedure, public :: set_recur_levels => symba_step_set_recur_levels_system Sets recursion levels of bodies and encounter lists to the current system level procedure, public :: recursive_step => symba_step_recur_system Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current recursion level, if applicable, and descend to the next deeper level if necessary procedure, public :: reset => symba_step_reset_system Resets pl, tp,and encounter structures at the start of a new step","tags":"","loc":"module/symba_classes.html"},{"title":"swiftest – swiftest","text":"This module serves to combine all of the Swiftest project modules under a single umbrella so that they can be accessed from individual submodule implementations with a simple \"use swiftest\" line. Uses swiftest_globals swiftest_operators swiftest_classes whm_classes rmvs_classes helio_classes symba_classes fraggle_classes lambda_function walltime_classes Contents None","tags":"","loc":"module/swiftest.html"},{"title":"swiftest_classes – swiftest","text":"Definition of data and structures generic to all integrators.\n Adapted from David E. Kaufmann's Swifter routine: module_swifter.f90 swiftest_parameters class definitions swiftest_swiftest_particle_info class definitions and method interfaces swiftest_base class definitions and methods swiftest_cb class definitions and methods swiftest_body definitions and methods swiftest_pl definitions and methods swiftest_tp definitions and methods swiftest_nbody_system class definitions and methods Uses swiftest_globals module~~swiftest_classes~~UsesGraph module~swiftest_classes swiftest_classes module~swiftest_globals swiftest_globals module~swiftest_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by Descendants: drift_implementation s_discard s_gr s_io s_kick s_netcdf s_obl s_orbel s_setup s_tides_kick_getacch s_tides_step_spin s_user_kick_getacch s_util_append s_util_coord s_util_copy s_util_exit s_util_fill s_util_get_energy_momentum s_util_index s_util_minimize_bfgs s_util_peri s_util_rescale s_util_resize s_util_set s_util_solve s_util_sort s_util_spill s_util_valid s_util_version module~~swiftest_classes~~UsedByGraph module~swiftest_classes swiftest_classes module~s_gr s_gr module~s_gr->module~swiftest_classes module~swiftest swiftest module~s_gr->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest_classes module~s_util_valid->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest_classes module~s_obl->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest_classes module~s_util_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest_classes module~s_util_rescale->module~swiftest module~swiftest->module~swiftest_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~symba_classes symba_classes module~swiftest->module~symba_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest_classes module~s_util_get_energy_momentum->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest_classes module~s_util_index->module~swiftest proc~xv2el xv2el proc~xv2el->module~swiftest_classes module~s_util_set s_util_set module~s_util_set->module~swiftest_classes module~s_util_set->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest_classes module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest_classes module~s_tides_step_spin->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest_classes module~s_orbel->module~swiftest module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~s_util_exit s_util_exit module~s_util_exit->module~swiftest_classes module~s_util_exit->module~swiftest module~fraggle_classes->module~swiftest_classes module~s_netcdf s_netcdf module~s_netcdf->module~swiftest_classes module~s_netcdf->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest_classes module~s_util_peri->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest_classes module~s_setup->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest_classes module~s_util_append->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest_classes module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest_classes module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest_classes module~s_util_sort->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest_classes module~s_util_resize->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest_classes module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest_classes module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest_classes module~s_user_kick_getacch->module~swiftest module~whm_classes->module~swiftest_classes module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest_classes module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest_classes module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest_classes module~s_io->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest_classes module~s_util_solve->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest_classes module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest_classes module~drift_implementation->module~swiftest module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_fraggle_placeholder->module~fraggle_classes module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_symba_collision->module~symba_classes module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_fraggle_setup->module~fraggle_classes module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_symba_encounter_check->module~symba_classes module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_whm_coord->module~whm_classes module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_rmvs_step->module~rmvs_classes proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_set->module~fraggle_classes module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_fraggle_io->module~fraggle_classes module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_rmvs_kick->module~rmvs_classes module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_rmvs_io->module~rmvs_classes proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_whm_gr->module~whm_classes module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_rmvs_chk->module~rmvs_classes module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_fraggle_regime->module~fraggle_classes module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_rmvs_discard->module~rmvs_classes module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_helio_drift->module~helio_classes module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_helio_kick->module~helio_classes module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest module~s_rmvs_util->module~rmvs_classes program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_step->module~symba_classes module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_symba_util->module~symba_classes module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_whm_setup->module~whm_classes module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~s_helio_gr->module~helio_classes module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_whm_util->module~whm_classes module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_rmvs_setup->module~rmvs_classes module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_whm_kick->module~whm_classes module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_discard->module~symba_classes module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~s_symba_drift->module~symba_classes module~whm_drift whm_drift module~whm_drift->module~swiftest module~whm_drift->module~whm_classes module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_symba_kick->module~symba_classes module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~s_fraggle_util->module~fraggle_classes module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_helio_setup->module~helio_classes module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~s_helio_step->module~helio_classes module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_whm_step->module~whm_classes module~rmvs_classes->module~whm_classes module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_symba_setup->module~symba_classes module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_fraggle_generate->module~fraggle_classes module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_symba_io->module~symba_classes Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces io_get_args io_get_old_t_final_system io_get_token io_read_frame_body io_read_frame_cb io_read_frame_system discard_pl discard_system discard_tp drift_all drift_body drift_one util_index_eucl_ij_to_k util_index_eucl_k_to_ij util_index_eucl_plpl util_index_eucl_pltp gr_kick_getaccb_ns_body gr_kick_getacch gr_p4_pos_kick gr_pseudovel2vel gr_pv2vh_body gr_vel2pseudovel gr_vh2pv_body io_conservation_report io_dump_param io_dump_particle_info_base io_dump_particle_info io_dump_base io_dump_system io_param_reader io_param_writer io_read_in_body io_read_in_cb io_read_in_param io_read_in_particle_info io_read_particle_info_system io_write_discard io_toupper io_write_encounter io_write_frame_body io_write_frame_cb io_write_frame_encounter io_write_frame_system io_write_hdr_system kick_getacch_int_pl kick_getacch_int_tp kick_getacch_int_all_pl kick_getacch_int_all_tp kick_getacch_int_one_pl kick_getacch_int_one_tp netcdf_close netcdf_initialize_output netcdf_open netcdf_write_frame_base netcdf_write_frame_system netcdf_write_hdr_system netcdf_write_particle_info_base obl_acc_body obl_acc_pl obl_acc_tp obl_pot_system orbel_el2xv_vec orbel_scget orbel_xv2aeq orbel_xv2aqt orbel_xv2el orbel_xv2el_vec setup_body setup_construct_system setup_encounter setup_initialize_particle_info_system setup_initialize_system setup_pl setup_tp tides_kick_getacch_pl tides_step_spin_system user_kick_getacch_body util_append util_append_body util_append_encounter util_append_pl util_append_tp util_coord_b2h_pl util_coord_b2h_tp util_coord_h2b_pl util_coord_h2b_tp util_coord_vb2vh_pl util_coord_vb2vh_tp util_coord_vh2vb_pl util_coord_vh2vb_tp util_coord_xh2xb_pl util_coord_xh2xb_tp util_copy_encounter util_copy_particle_info util_copy_particle_info_arr util_exit util_fill_body util_fill_pl util_fill_tp util_fill util_minimize_bfgs util_rescale_system util_peri_tp util_resize util_resize_body util_resize_encounter util_resize_pl util_resize_tp util_get_energy_momentum_system util_set_beg_end_pl util_set_ir3h util_set_msys util_set_mu_pl util_set_mu_tp util_set_particle_info util_set_rhill util_set_rhill_approximate util_solve_linear_system util_solve_rkf45 util_sort util_sort_rearrange util_sort_rearrange_body util_sort_rearrange_pl util_sort_rearrange_tp util_sort_body util_sort_pl util_sort_tp util_spill util_spill_body util_spill_encounter util_spill_pl util_spill_tp util_valid_id_system util_version Abstract Interfaces abstract_read_frame abstract_discard_body abstract_accel abstract_kick_body abstract_set_mu abstract_step_body abstract_step_system Derived Types netcdf_parameters swiftest_parameters swiftest_particle_info swiftest_base swiftest_cb swiftest_body swiftest_pl swiftest_tp swiftest_nbody_system swiftest_encounter Interfaces interface public module function io_get_args(integrator, param_file_name) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code interface public module function io_get_old_t_final_system(self, param) result(old_t_final) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) interface public module function io_get_token(buffer, ifirst, ilast, ierr) result(token) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string interface public module function io_read_frame_body(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful interface public module function io_read_frame_cb(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful interface public module function io_read_frame_system(self, iu, param) result(ierr) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful interface public module subroutine discard_pl(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter interface public module subroutine discard_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine discard_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine drift_all(mu, x, v, n, param, dt, lmask, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: lmask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem interface public module subroutine drift_body(self, system, param, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize interface public pure elemental module subroutine drift_one(mu, px, py, pz, vx, vy, vz, dt, iflag) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR) interface public pure module subroutine util_index_eucl_ij_to_k(n, i, j, k) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I4B), intent(in) :: i Index of the ith body integer(kind=I4B), intent(in) :: j Index of the jth body integer(kind=I8B), intent(out) :: k Index of the flattened matrix interface public pure module subroutine util_index_eucl_k_to_ij(n, k, i, j) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I8B), intent(in) :: k Index of the flattened matrix integer(kind=I4B), intent(out) :: i Index of the ith body integer(kind=I4B), intent(out) :: j Index of the jth body interface public module subroutine util_index_eucl_plpl(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine util_index_eucl_pltp(self, pl, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public pure module subroutine gr_kick_getaccb_ns_body(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public pure module subroutine gr_kick_getacch(mu, x, lmask, n, inv_c2, agr) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations interface public pure module subroutine gr_p4_pos_kick(param, x, v, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size interface public pure module subroutine gr_pseudovel2vel(param, mu, xh, pv, vh) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Swiftestcentric velocity vector interface public pure module subroutine gr_pv2vh_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public pure module subroutine gr_vel2pseudovel(param, mu, xh, vh, pv) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Swiftestcentric position vector real(kind=DP), intent(in), dimension(:) :: vh Swiftestcentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) interface public pure module subroutine gr_vh2pv_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_conservation_report(self, param, lterminal) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen interface public module subroutine io_dump_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) interface public module subroutine io_dump_particle_info_base(self, param, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file interface public module subroutine io_dump_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Swiftest particle info metadata object integer(kind=I4B), intent(in) :: iu Open unformatted file unit number interface public module subroutine io_dump_base(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_dump_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) The first element passes the integrator code to the reader integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine io_param_writer(self, unit, iotype, v_list, iostat, iomsg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer(kind=I4B), intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer(kind=I4B), intent(in) :: v_list (:) Not used in this procedure integer(kind=I4B), intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 interface public module subroutine io_read_in_body(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_read_in_cb(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_read_in_param(self, param_file_name) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) interface public module subroutine io_read_in_particle_info(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number interface public module subroutine io_read_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_write_discard(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_toupper(string) Implementation → Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case interface public module subroutine io_write_encounter(self, pl, encbody, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_write_frame_body(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_write_frame_cb(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine io_write_frame_encounter(iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Swiftestcentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Swiftestcentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Swiftestcentric velocity vectors of the two encountering bodies interface public module subroutine io_write_frame_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine io_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine kick_getacch_int_pl(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object interface public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies interface public module subroutine kick_getacch_int_all_pl(npl, nplpl, k_plpl, x, Gmass, radius, acc) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array interface public module subroutine kick_getacch_int_all_tp(ntp, npl, xtp, xpl, GMpl, lmask, acc) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: ntp Number of test particles integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in), dimension(:,:) :: xtp Test particle position vector array real(kind=DP), intent(in), dimension(:,:) :: xpl Massive body particle position vector array real(kind=DP), intent(in), dimension(:) :: GMpl Array of massive body G*mass logical, intent(in), dimension(:) :: lmask Logical mask indicating which test particles should be computed real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array interface public pure module subroutine kick_getacch_int_one_pl(rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j interface public pure module subroutine kick_getacch_int_one_tp(rji2, xr, yr, zr, Gmpl, ax, ay, az) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle interface public module subroutine netcdf_close(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_initialize_output(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_open(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_write_frame_base(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest base object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public subroutine netcdf_write_frame_system(self, iu, param) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_write_hdr_system(self, iu, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine netcdf_write_particle_info_base(self, iu) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset interface public module subroutine obl_acc_body(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine obl_acc_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine obl_acc_tp(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine obl_pot_system(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object interface public module subroutine orbel_el2xv_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public pure module subroutine orbel_scget(angle, sx, cx) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx interface public pure module subroutine orbel_xv2aeq(mu, x, v, a, e, q) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: q periapsis interface public pure module subroutine orbel_xv2aqt(mu, x, v, a, q, capm, tperi) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage interface public pure module subroutine orbel_xv2el(mu, x, v, a, e, inc, capom, omega, capm) Implementation → Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly interface public module subroutine orbel_xv2el_vec(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine setup_body(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine setup_construct_system(system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine setup_encounter(self, n) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for interface public module subroutine setup_initialize_particle_info_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine setup_initialize_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine setup_pl(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine setup_tp(self, n, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parametersr interface public module subroutine tides_kick_getacch_pl(self, system) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object interface public module subroutine tides_step_spin_system(self, param, t, dt) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize interface public module subroutine user_kick_getacch_body(self, system, param, t, lbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step public interface util_append public subroutine util_append_arr_char_string(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DP(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_DPvec(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_I4B(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_info(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to public subroutine util_append_arr_logical(arr, source, nold, nsrc, lsource_mask) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_body(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_encounter(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_pl(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_append_tp(self, source, lsource_mask) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to interface public module subroutine util_coord_b2h_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_b2h_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object interface public module subroutine util_coord_h2b_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_h2b_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object interface public module subroutine util_coord_vb2vh_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_vb2vh_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body interface public module subroutine util_coord_vh2vb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_vh2vb_tp(self, vbcb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body interface public module subroutine util_coord_xh2xb_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_coord_xh2xb_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object interface public module subroutine util_copy_encounter(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into interface public module subroutine util_copy_particle_info(self, source) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source interface public module subroutine util_copy_particle_info_arr(source, dest, idx) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object interface public module subroutine util_exit(code) Implementation → Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code Failure exit code interface public module subroutine util_fill_body(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine util_fill_pl(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module subroutine util_fill_tp(self, inserts, lfill_list) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public interface util_fill public subroutine util_fill_arr_char_string(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DP(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_DPvec(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_I4B(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_info(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps public subroutine util_fill_arr_logical(keeps, inserts, lfill_list) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps interface public module function util_minimize_bfgs(f, N, x0, eps, maxloop, lerr) result(x1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:), allocatable interface public module subroutine util_rescale_system(self, param, mscale, dscale, tscale) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively. interface public module subroutine util_peri_tp(self, system, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters public interface util_resize public subroutine util_resize_arr_char_string(arr, nnew) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DP(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_DPvec(arr, nnew) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_I4B(arr, nnew) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_info(arr, nnew) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size public subroutine util_resize_arr_logical(arr, nnew) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size interface public module subroutine util_resize_body(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine util_resize_encounter(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed interface public module subroutine util_resize_pl(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine util_resize_tp(self, nnew) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded interface public module subroutine util_get_energy_momentum_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters interface public module subroutine util_set_beg_end_pl(self, xbeg, xend, vbeg) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg Position vectors at beginning of step real(kind=DP), intent(in), optional dimension(:,:) :: xend Positions vectors at end of step real(kind=DP), intent(in), optional dimension(:,:) :: vbeg vbeg is an unused variable to keep this method forward compatible with RMVS interface public module subroutine util_set_ir3h(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object interface public module subroutine util_set_msys(self) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object interface public module subroutine util_set_mu_pl(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_set_mu_tp(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_set_particle_info(self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: Active, Merged, Fragmented, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) interface public module subroutine util_set_rhill(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object interface public module subroutine util_set_rhill_approximate(self, cb) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object public interface util_solve_linear_system public function util_solve_linear_system_d(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) public function util_solve_linear_system_q(A, b, n, lerr) result(x) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n) interface public module function util_solve_rkf45(f, y0in, t1, dt0, tol) result(y1) Implementation → Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:), allocatable Final result public interface util_sort public subroutine util_sort_i4b(arr) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr public subroutine util_sort_index_i4b(arr, ind) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_sp(arr) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_sp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public subroutine util_sort_dp(arr) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr public subroutine util_sort_index_dp(arr, ind) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind public interface util_sort_rearrange public subroutine util_sort_rearrange_arr_char_string(arr, ind, n) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DP(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_DPvec(arr, ind, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_I4B(arr, ind, n) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_info(arr, ind, n) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange public subroutine util_sort_rearrange_arr_logical(arr, ind, n) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange interface public module subroutine util_sort_rearrange_body(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine util_sort_rearrange_pl(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine util_sort_rearrange_tp(self, ind) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) interface public module subroutine util_sort_body(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine util_sort_pl(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order interface public module subroutine util_sort_tp(self, sortby, ascending) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order public interface util_spill public subroutine util_spill_arr_char_string(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DP(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_DPvec(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I4B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_I8B(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_info(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not public subroutine util_spill_arr_logical(keeps, discards, lspill_list, ldestructive) Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_spill_body(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_spill_encounter(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list interface public module subroutine util_spill_pl(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_spill_tp(self, discards, lspill_list, ldestructive) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not interface public module subroutine util_valid_id_system(self, param) Implementation → Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters interface public module subroutine util_version() Implementation → Arguments None Abstract Interfaces abstract interface public function abstract_read_frame(self, iu, param) result(ierr) Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful abstract interface public subroutine abstract_discard_body(self, system, param) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters abstract interface public subroutine abstract_accel(self, system, param, t, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step abstract interface public subroutine abstract_kick_body(self, system, param, t, dt, lbeg) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. abstract interface public subroutine abstract_set_mu(self, cb) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object abstract interface public subroutine abstract_step_body(self, system, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize abstract interface public subroutine abstract_step_system(self, param, t, dt) Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize Derived Types type, public :: netcdf_parameters Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: out_type NetCDF output type (will be assigned either NF90_DOUBLE or NF90_FLOAT, depending on the user parameter) integer(kind=I4B), public :: ncid NetCDF ID for the output file integer(kind=I4B), public :: dimids (3) Dimensions of the NetCDF file integer(kind=I4B), public :: time_dimid NetCDF ID for the time dimension integer(kind=I4B), public :: id_dimid NetCDF ID for the particle id dimension integer(kind=I4B), public :: str_dimid NetCDF ID for the character string dimension integer(kind=I4B), public :: time_varid NetCDF ID for the time variable integer(kind=I4B), public :: id_varid NetCDF ID for the particle name variable integer(kind=I4B), public :: name_varid NetCDF ID for the namevariable integer(kind=I4B), public :: ptype_varid NetCDF ID for the particle type variable integer(kind=I4B), public :: npl_varid NetCDF ID for the number of active massive bodies variable integer(kind=I4B), public :: ntp_varid NetCDF ID for the number of active test particles variable integer(kind=I4B), public :: a_varid NetCDF ID for the semimajor axis variable integer(kind=I4B), public :: e_varid NetCDF ID for the eccentricity variable integer(kind=I4B), public :: inc_varid NetCDF ID for the inclination variable integer(kind=I4B), public :: capom_varid NetCDF ID for the long. asc. node variable integer(kind=I4B), public :: omega_varid NetCDF ID for the arg. periapsis variable integer(kind=I4B), public :: capm_varid NetCDF ID for the mean anomaly variable integer(kind=I4B), public :: xhx_varid NetCDF ID for the heliocentric position x variable integer(kind=I4B), public :: xhy_varid NetCDF ID for the heliocentric position y variable integer(kind=I4B), public :: xhz_varid NetCDF ID for the heliocentric position z variable integer(kind=I4B), public :: vhx_varid NetCDF ID for the heliocentric velocity x variable integer(kind=I4B), public :: vhy_varid NetCDF ID for the heliocentric velocity y variable integer(kind=I4B), public :: vhz_varid NetCDF ID for the heliocentric velocity z variable integer(kind=I4B), public :: Gmass_varid NetCDF ID for the mass variable integer(kind=I4B), public :: rhill_varid NetCDF ID for the hill radius variable integer(kind=I4B), public :: radius_varid NetCDF ID for the radius variable integer(kind=I4B), public :: Ip1_varid NetCDF ID for the axis 1 principal moment of inertia variable integer(kind=I4B), public :: Ip2_varid NetCDF ID for the axis 2 principal moment of inertia variable integer(kind=I4B), public :: Ip3_varid NetCDF ID for the axis 3 principal moment of inertia variable integer(kind=I4B), public :: rotx_varid NetCDF ID for the rotation x variable integer(kind=I4B), public :: roty_varid NetCDF ID for the rotation y variable integer(kind=I4B), public :: rotz_varid NetCDF ID for the rotation z variable integer(kind=I4B), public :: k2_varid NetCDF ID for the Love number variable integer(kind=I4B), public :: Q_varid NetCDF ID for the energy dissipation variable integer(kind=I4B), public :: KE_orb_varid NetCDF ID for the system orbital kinetic energy variable integer(kind=I4B), public :: KE_spin_varid NetCDF ID for the system spin kinetic energy variable integer(kind=I4B), public :: PE_varid NetCDF ID for the system potential energy variable integer(kind=I4B), public :: L_orbx_varid NetCDF ID for the system orbital angular momentum x variable integer(kind=I4B), public :: L_orby_varid NetCDF ID for the system orbital angular momentum y variable integer(kind=I4B), public :: L_orbz_varid NetCDF ID for the system orbital angular momentum z variable integer(kind=I4B), public :: L_spinx_varid NetCDF ID for the system spin angular momentum x variable integer(kind=I4B), public :: L_spiny_varid NetCDF ID for the system spin angular momentum y variable integer(kind=I4B), public :: L_spinz_varid NetCDF ID for the system spin angular momentum z variable integer(kind=I4B), public :: L_escapex_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapey_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: L_escapez_varid NetCDF ID for the escaped angular momentum x variable integer(kind=I4B), public :: Ecollisions_varid NetCDF ID for the energy lost in collisions variable integer(kind=I4B), public :: Euntracked_varid NetCDF ID for the energy that is untracked due to loss (untracked potential energy due to mergers and body energy for escaped bodies) integer(kind=I4B), public :: GMescape_varid NetCDF ID for the G*Mass of bodies that escape the system integer(kind=I4B), public :: status_varid NetCDF ID for the status variable integer(kind=I4B), public :: origin_type_varid NetCDF ID for the origin type integer(kind=I4B), public :: origin_time_varid NetCDF ID for the origin time integer(kind=I4B), public :: origin_xhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_xhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_xhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: origin_vhx_varid NetCDF ID for the origin xh x component integer(kind=I4B), public :: origin_vhy_varid NetCDF ID for the origin xh y component integer(kind=I4B), public :: origin_vhz_varid NetCDF ID for the origin xh z component integer(kind=I4B), public :: discard_time_varid NetCDF ID for the time of discard variable integer(kind=I4B), public :: discard_xhx_varid NetCDF ID for the heliocentric position of the body at the time of discard x variable integer(kind=I4B), public :: discard_xhy_varid NetCDF ID for the heliocentric position of the body at the time of discard y variable integer(kind=I4B), public :: discard_xhz_varid NetCDF ID for the heliocentric position of the body at the time of discard z variable integer(kind=I4B), public :: discard_vhx_varid NetCDF ID for the heliocentric velocity of the body at the time of discard x variable integer(kind=I4B), public :: discard_vhy_varid NetCDF ID for the heliocentric velocity of the body at the time of discard y variable integer(kind=I4B), public :: discard_vhz_varid NetCDF ID for the heliocentric velocity of the body at the time of discard z variable integer(kind=I4B), public :: discard_body_id_varid NetCDF ID for the id of the other body involved in the discard Type-Bound Procedures procedure, public :: close => netcdf_close Closes an open NetCDF file procedure, public :: initialize => netcdf_initialize_output Initialize a set of parameters used to identify a NetCDF output object procedure, public :: open => netcdf_open Opens a NetCDF file type, public :: swiftest_parameters User defined parameters that are read in from the parameters input file. \n    Each paramter is initialized to a default values. Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: integrator = UNKNOWN_INTEGRATOR Symbolic name of the nbody integrator  used integer(kind=I4B), public :: maxid = -1 The current maximum particle id number real(kind=DP), public :: t0 = -1.0_DP Integration start time real(kind=DP), public :: t = -1.0_DP Integration current time real(kind=DP), public :: tstop = -1.0_DP Integration stop time real(kind=DP), public :: dt = -1.0_DP Time step integer(kind=I8B), public :: ioutput = 0_I8B Output counter character(len=STRMAX), public :: incbfile = CB_INFILE Name of input file for the central body character(len=STRMAX), public :: inplfile = PL_INFILE Name of input file for massive bodies character(len=STRMAX), public :: intpfile = TP_INFILE Name of input file for test particles character(len=STRMAX), public :: in_type = ASCII_TYPE Data representation type of input data files character(len=STRMAX), public :: in_form = XV Format of input data files (EL or XV) integer(kind=I4B), public :: istep_out = -1 Number of time steps between binary outputs character(len=STRMAX), public :: outfile = NETCDF_OUTFILE Name of output binary file character(len=STRMAX), public :: out_type = NETCDF_DOUBLE_TYPE Binary format of output file character(len=STRMAX), public :: out_form = XVEL Data to write to output file character(len=STRMAX), public :: out_stat = 'NEW' Open status for output binary file character(len=STRMAX), public :: particle_out = PARTICLE_OUTFILE Name of output particle information file integer(kind=I4B), public :: istep_dump = -1 Number of time steps between dumps real(kind=DP), public :: rmin = -1.0_DP Minimum heliocentric radius for test particle real(kind=DP), public :: rmax = -1.0_DP Maximum heliocentric radius for test particle real(kind=DP), public :: rmaxu = -1.0_DP Maximum unbound heliocentric radius for test particle real(kind=DP), public :: qmin = -1.0_DP Minimum pericenter distance for test particle character(len=STRMAX), public :: qmin_coord = 'HELIO' Coordinate frame to use for qmin real(kind=DP), public :: qmin_alo = -1.0_DP Minimum semimajor axis for qmin real(kind=DP), public :: qmin_ahi = -1.0_DP Maximum semimajor axis for qmin character(len=STRMAX), public :: enc_out = \"\" Name of output file for encounters character(len=STRMAX), public :: discard_out = \"\" Name of output file for discards real(kind=QP), public :: MU2KG = -1.0_QP Converts mass units to grams real(kind=QP), public :: TU2S = -1.0_QP Converts time units to seconds real(kind=QP), public :: DU2M = -1.0_QP Converts distance unit to centimeters real(kind=DP), public :: GU = -1.0_DP Universal gravitational constant in the system units real(kind=DP), public :: inv_c2 = -1.0_DP Inverse speed of light squared in the system units character(len=STRMAX), public :: energy_out = \"\" Name of output energy and momentum report file logical, public :: lrhill_present = .false. Hill radii are given as an input rather than calculated by the code (can be used to inflate close encounter regions manually) logical, public :: lextra_force = .false. User defined force function turned on logical, public :: lbig_discard = .false. Save big bodies on every discard logical, public :: lclose = .false. Turn on close encounters logical, public :: lenergy = .false. Track the total energy of the system logical, public :: loblatecb = .false. Calculate acceleration from oblate central body (automatically turns true if nonzero J2 is input) logical, public :: lrotation = .false. Include rotation states of big bodies logical, public :: ltides = .false. Include tidal dissipation real(kind=DP), public :: Eorbit_orig = 0.0_DP Initial orbital energy real(kind=DP), public :: GMtot_orig = 0.0_DP Initial system mass real(kind=DP), public, dimension(NDIM) :: Ltot_orig = 0.0_DP Initial total angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lorbit_orig = 0.0_DP Initial orbital angular momentum real(kind=DP), public, dimension(NDIM) :: Lspin_orig = 0.0_DP Initial spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lescape = 0.0_DP Angular momentum of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: GMescape = 0.0_DP Mass of bodies that escaped the system (used for bookeeping) real(kind=DP), public :: Ecollisions = 0.0_DP Energy lost from system due to collisions real(kind=DP), public :: Euntracked = 0.0_DP Energy gained from system due to escaped bodies logical, public :: lfirstenergy = .true. This is the first time computing energe logical, public :: lfirstkick = .true. Initiate the first kick in a symplectic step logical, public :: lrestart = .false. Indicates whether or not this is a restarted run logical, public :: lgr = .false. Turn on GR logical, public :: lyarkovsky = .false. Turn on Yarkovsky effect logical, public :: lyorp = .false. Turn on YORP effect type( netcdf_parameters ), public :: nciu Object containing NetCDF parameters Type-Bound Procedures procedure, public :: reader => io_param_reader procedure, public :: writer => io_param_writer procedure, public :: dump => io_dump_param procedure, public :: read_in => io_read_in_param type, public :: swiftest_particle_info Class definition for the particle origin information object. This object is used to track time, location, and collisional regime\n of fragments produced in collisional events. Components Type Visibility Attributes Name Initial character(len=NAMELEN), public :: name Non-unique name character(len=NAMELEN), public :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=NAMELEN), public :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), public :: origin_time The time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), public, dimension(NDIM) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), public :: discard_time The time of the particle's discard character(len=NAMELEN), public :: status Particle status description: Active, Merged, Fragmented, etc. real(kind=DP), public, dimension(NDIM) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), public, dimension(NDIM) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), public :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) Type-Bound Procedures procedure, public :: dump => io_dump_particle_info Dumps contents of particle information to file procedure, public :: read_in => io_read_in_particle_info Read in a particle information object from an open file procedure, public :: copy => util_copy_particle_info Copies one set of information object components into another, component-by-component procedure, public :: set_value => util_set_particle_info Sets one or more values of the particle information metadata object type, public, abstract :: swiftest_base An abstract superclass for a generic Swiftest object\n The minimal methods that all systems must have Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_frame => write_frame_netcdf Set up generic procedure that will switch between NetCDF or Fortran binary depending on arguments generic, public :: write_particle_info => write_particle_info_netcdf type, public, abstract, extends( swiftest_base ) :: swiftest_cb A concrete lass for the central body in a Swiftest simulation Components Type Visibility Attributes Name Initial type( swiftest_particle_info ), public :: info Particle metadata information integer(kind=I4B), public :: id = 0 External identifier (unique) real(kind=DP), public :: mass = 0.0_DP Central body mass (units MU) real(kind=DP), public :: Gmass = 0.0_DP Central mass gravitational term G * mass (units GU * MU) real(kind=DP), public :: radius = 0.0_DP Central body radius (units DU) real(kind=DP), public :: density = 1.0_DP Central body mass density - calculated internally (units MU / DU**3) real(kind=DP), public :: j2rp2 = 0.0_DP J2*R&#94;2 term for central body real(kind=DP), public :: j4rp4 = 0.0_DP J4*R&#94;2 term for central body real(kind=DP), public, dimension(NDIM) :: aobl = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: atide = 0.0_DP Barycentric acceleration due to central body oblatenes real(kind=DP), public, dimension(NDIM) :: aoblbeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: aoblend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: atidebeg = 0.0_DP Barycentric acceleration due to central body oblatenes at beginning of step real(kind=DP), public, dimension(NDIM) :: atideend = 0.0_DP Barycentric acceleration due to central body oblatenes at end of step real(kind=DP), public, dimension(NDIM) :: xb = 0.0_DP Barycentric position (units DU) real(kind=DP), public, dimension(NDIM) :: vb = 0.0_DP Barycentric velocity (units DU / TU) real(kind=DP), public, dimension(NDIM) :: agr = 0.0_DP Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(NDIM) :: Ip = 0.0_DP Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(NDIM) :: rot = 0.0_DP Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public :: k2 = 0.0_DP Tidal Love number real(kind=DP), public :: Q = 0.0_DP Tidal quality factor real(kind=DP), public :: tlag = 0.0_DP Tidal phase lag angle real(kind=DP), public, dimension(NDIM) :: L0 = 0.0_DP Initial angular momentum of the central body real(kind=DP), public, dimension(NDIM) :: dL = 0.0_DP Change in angular momentum of the central body Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure, public :: read_in => io_read_in_cb I/O routine for reading in central body data procedure, public :: read_frame => io_read_frame_cb I/O routine for reading out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_cb I/O routine for writing out a single frame of time-series data for the central body generic, public :: write_frame => write_frame_netcdf, write_frame_bin Write a frame (either binary or NetCDF, using generic procedures) type, public, abstract, extends( swiftest_base ) :: swiftest_body An abstract class for a generic collection of Swiftest bodies\n Superclass that defines the generic elements of a Swiftest particle Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure(abstract_discard_body), public :: discard procedure(abstract_kick_body), public :: kick procedure(abstract_set_mu), public :: set_mu procedure(abstract_step_body), public :: step procedure(abstract_accel), public :: accel procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: accel_obl => obl_acc_body Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: setup => setup_body A constructor that sets the number of bodies and allocates all allocatable arrays procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: append => util_append_body Appends elements from one structure to another procedure, public :: fill => util_fill_body \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_body Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) procedure, public :: sort => util_sort_body Sorts body arrays by a sortable componen procedure, public :: rearrange => util_sort_rearrange_body Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_body \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files type, public, abstract, extends( swiftest_body ) :: swiftest_pl An abstract class for a generic collection of Swiftest massive bodies\n Superclass that defines the generic elements of a Swiftest particle Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill real(kind=DP), public, dimension(:), allocatable :: mass Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: Gmass Mass gravitational term G * mass (units GU * MU) real(kind=DP), public, dimension(:), allocatable :: rhill Body mass (units MU) real(kind=DP), public, dimension(:), allocatable :: radius Body radius (units DU) real(kind=DP), public, dimension(:,:), allocatable :: xbeg Position at beginning of step real(kind=DP), public, dimension(:,:), allocatable :: xend Position at end of step real(kind=DP), public, dimension(:,:), allocatable :: vbeg Velocity at beginning of step real(kind=DP), public, dimension(:), allocatable :: density Body mass density - calculated internally (units MU / DU**3) real(kind=DP), public, dimension(:,:), allocatable :: Ip Unitless principal moments of inertia (I1, I2, I3) / (MR**2). Principal axis rotation assumed. real(kind=DP), public, dimension(:,:), allocatable :: rot Body rotation vector in inertial coordinate frame (units rad / TU) real(kind=DP), public, dimension(:), allocatable :: k2 Tidal Love number real(kind=DP), public, dimension(:), allocatable :: Q Tidal quality factor real(kind=DP), public, dimension(:), allocatable :: tlag Tidal phase lag integer(kind=I4B), public, dimension(:,:), allocatable :: k_plpl Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: nplpl Number of body-body comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_pl and util_spill_pl Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure(abstract_kick_body), public :: kick procedure(abstract_step_body), public :: step procedure(abstract_accel), public :: accel procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_pl Placeholder method for discarding massive bodies procedure, public :: index => util_index_eucl_plpl Sets up the (i, j) -> k indexing used for the single-loop blocking Euclidean distance matrix procedure, public :: accel_int => kick_getacch_int_pl Compute direct cross (third) term heliocentric accelerations of massive bodies procedure, public :: accel_obl => obl_acc_pl Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_pl A base constructor that sets the number of bodies and allocates and initializes all arrays procedure, public :: accel_tides => tides_kick_getacch_pl Compute the accelerations of bodies due to tidal interactions with the central body procedure, public :: append => util_append_pl Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_pl Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_pl Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vh2vb => util_coord_vh2vb_pl Convert massive bodies from heliocentric to barycentric coordinates (velocity only) procedure, public :: vb2vh => util_coord_vb2vh_pl Convert massive bodies from barycentric to heliocentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_pl Convert massive bodies from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_pl \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: resize => util_resize_pl Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_beg_end => util_set_beg_end_pl Sets the beginning and ending positions and velocities of planets. procedure, public :: set_mu => util_set_mu_pl Method used to construct the vectorized form of the central body mass procedure, public :: set_rhill => util_set_rhill Calculates the Hill's radii for each body procedure, public :: sort => util_sort_pl Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_pl Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_pl \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, abstract, extends( swiftest_body ) :: swiftest_tp An abstract class for a generic collection of Swiftest test particles\n Superclass that defines the generic elements of a Swiftest test particle Components Type Visibility Attributes Name Initial logical, public :: lfirst = .true. Run the current step as a first integer(kind=I4B), public :: nbody = 0 Number of bodies type( swiftest_particle_info ), public, dimension(:), allocatable :: info Particle metadata information integer(kind=I4B), public, dimension(:), allocatable :: id External identifier (unique) integer(kind=I4B), public, dimension(:), allocatable :: status An integrator-specific status indicator logical, public, dimension(:), allocatable :: ldiscard Body should be discarded logical, public, dimension(:), allocatable :: lmask Logical mask used to select a subset of bodies when performing certain operations (drift, kick, accel, etc.) real(kind=DP), public, dimension(:), allocatable :: mu G * (Mcb + [m]) real(kind=DP), public, dimension(:,:), allocatable :: xh Swiftestcentric position real(kind=DP), public, dimension(:,:), allocatable :: vh Swiftestcentric velocity real(kind=DP), public, dimension(:,:), allocatable :: xb Barycentric position real(kind=DP), public, dimension(:,:), allocatable :: vb Barycentric velocity real(kind=DP), public, dimension(:,:), allocatable :: ah Total heliocentric acceleration real(kind=DP), public, dimension(:,:), allocatable :: aobl Barycentric accelerations of bodies due to central body oblatenes real(kind=DP), public, dimension(:,:), allocatable :: atide Tanngential component of acceleration of bodies due to tides real(kind=DP), public, dimension(:,:), allocatable :: agr Acceleration due to post-Newtonian correction real(kind=DP), public, dimension(:), allocatable :: ir3h Inverse heliocentric radius term (1/rh**3) real(kind=DP), public, dimension(:), allocatable :: a Semimajor axis (pericentric distance for a parabolic orbit) real(kind=DP), public, dimension(:), allocatable :: e Eccentricity real(kind=DP), public, dimension(:), allocatable :: inc Inclination real(kind=DP), public, dimension(:), allocatable :: capom Longitude of ascending node real(kind=DP), public, dimension(:), allocatable :: omega Argument of pericenter real(kind=DP), public, dimension(:), allocatable :: capm Mean anomaly\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_body and util_spill integer(kind=I4B), public, dimension(:), allocatable :: isperi Perihelion passage flag real(kind=DP), public, dimension(:), allocatable :: peri Perihelion distance real(kind=DP), public, dimension(:), allocatable :: atp Semimajor axis following perihelion passage integer(kind=I4B), public, dimension(:,:), allocatable :: k_pltp Index array used to convert flattened the body-body comparison upper triangular matrix integer(kind=I8B), public :: npltp Number of pl-tp comparisons in the flattened upper triangular matrix\n Note to developers: If you add components to this class, be sure to update methods and subroutines that traverse the\n    component list, such as setup_tp and util_spill_tp Type-Bound Procedures procedure, public :: dump => io_dump_base Dump contents to file procedure, public :: dump_particle_info => io_dump_particle_info_base Dump contents of particle information metadata to file procedure, public :: write_frame_netcdf => netcdf_write_frame_base I/O routine for writing out a single frame of time-series data for all bodies in the system in NetCDF format procedure, public :: write_particle_info_netcdf => netcdf_write_particle_info_base Writes out the particle information metadata to NetCDF file generic, public :: write_particle_info => write_particle_info_netcdf procedure(abstract_kick_body), public :: kick procedure(abstract_step_body), public :: step procedure(abstract_accel), public :: accel procedure, public :: drift => drift_body Loop through bodies and call Danby drift routine on heliocentric variables procedure, public :: v2pv => gr_vh2pv_body Converts from velocity to psudeovelocity for GR calculations using symplectic integrators procedure, public :: pv2v => gr_pv2vh_body Converts from psudeovelocity to velocity for GR calculations using symplectic integrators procedure, public :: read_in => io_read_in_body Read in body initial conditions from a file procedure, public :: read_frame => io_read_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: write_frame_bin => io_write_frame_body I/O routine for writing out a single frame of time-series data for the central body procedure, public :: el2xv => orbel_el2xv_vec Convert orbital elements to position and velocity vectors procedure, public :: xv2el => orbel_xv2el_vec Convert position and velocity vectors to orbital  elements procedure, public :: accel_user => user_kick_getacch_body Add user-supplied heliocentric accelerations to planets procedure, public :: set_ir3 => util_set_ir3h Sets the inverse heliocentric radius term (1/rh**3) generic, public :: write_frame => write_frame_netcdf, write_frame_bin Add the generic write frame for Fortran binary files procedure, public :: discard => discard_tp Check to see if test particles should be discarded based on their positions relative to the massive bodies procedure, public :: accel_int => kick_getacch_int_tp Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies procedure, public :: accel_obl => obl_acc_tp Compute the barycentric accelerations of bodies due to the oblateness of the central body procedure, public :: setup => setup_tp A base constructor that sets the number of bodies and procedure, public :: append => util_append_tp Appends elements from one structure to another procedure, public :: h2b => util_coord_h2b_tp Convert test particles from heliocentric to barycentric coordinates (position and velocity) procedure, public :: b2h => util_coord_b2h_tp Convert test particles from barycentric to heliocentric coordinates (position and velocity) procedure, public :: vb2vh => util_coord_vb2vh_tp Convert test particles from barycentric to heliocentric coordinates (velocity only) procedure, public :: vh2vb => util_coord_vh2vb_tp Convert test particles from heliocentric to barycentric coordinates (velocity only) procedure, public :: xh2xb => util_coord_xh2xb_tp Convert test particles from heliocentric to barycentric coordinates (position only) procedure, public :: fill => util_fill_tp \"Fills\" bodies from one object into another depending on the results of a mask (uses the UNPACK intrinsic) procedure, public :: get_peri => util_peri_tp Determine system pericenter passages for test particles procedure, public :: resize => util_resize_tp Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. procedure, public :: set_mu => util_set_mu_tp Method used to construct the vectorized form of the central body mass procedure, public :: sort => util_sort_tp Sorts body arrays by a sortable component procedure, public :: rearrange => util_sort_rearrange_tp Rearranges the order of array elements of body based on an input index array. Used in sorting methods procedure, public :: spill => util_spill_tp \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) type, public, abstract :: swiftest_nbody_system An abstract class for a basic Swiftest nbody system \n  This superclass contains a minimial system of a set of test particles (tp), massive bodies (pl), and a central body (cb) Components Type Visibility Attributes Name Initial class( swiftest_cb ), public, allocatable :: cb Central body data structure class( swiftest_pl ), public, allocatable :: pl Massive body data structure class( swiftest_tp ), public, allocatable :: tp Test particle data structure class( swiftest_tp ), public, allocatable :: tp_discards Discarded test particle data structure class( swiftest_pl ), public, allocatable :: pl_discards Discarded massive body particle data structure real(kind=DP), public :: GMtot = 0.0_DP Total system mass - used for barycentric coordinate conversion real(kind=DP), public :: ke_orbit = 0.0_DP System orbital kinetic energy real(kind=DP), public :: ke_spin = 0.0_DP System spin kinetic energy real(kind=DP), public :: pe = 0.0_DP System potential energy real(kind=DP), public :: te = 0.0_DP System total energy real(kind=DP), public :: oblpot = 0.0_DP System potential energy due to oblateness of the central body real(kind=DP), public, dimension(NDIM) :: Lorbit = 0.0_DP System orbital angular momentum vector real(kind=DP), public, dimension(NDIM) :: Lspin = 0.0_DP System spin angular momentum vector real(kind=DP), public, dimension(NDIM) :: Ltot = 0.0_DP System angular momentum vector logical, public :: lbeg True if this is the beginning of a step. This is used so that test particle steps can be calculated \n    separately from massive bodies.  Massive body variables are saved at half steps, and passed to \n    the test particles Type-Bound Procedures procedure(abstract_step_system), public :: step Each integrator will have its own version of the step procedure, public :: discard => discard_system Perform a discard step on the system procedure, public :: conservation_report => io_conservation_report Compute energy and momentum and print out the change with time procedure, public :: dump => io_dump_system Dump the state of the system to a file procedure, public :: get_old_t_final => io_get_old_t_final_system Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. procedure, public :: read_frame => io_read_frame_system Read in a frame of input data from file procedure, public :: read_particle_info => io_read_particle_info_system Read in particle metadata from file procedure, public :: write_discard => io_write_discard Write out information about discarded test particles procedure, public :: write_frame => io_write_frame_system Append a frame of output data to file procedure, public :: write_hdr_bin => io_write_hdr_system Write a header for an output frame in Fortran binary format procedure, public :: write_hdr_netcdf => netcdf_write_hdr_system Write a header for an output frame in NetCDF format procedure, public :: obl_pot => obl_pot_system Compute the contribution to the total gravitational potential due solely to the oblateness of the central body procedure, public :: initialize => setup_initialize_system Initialize the system from input files procedure, public :: init_particle_info => setup_initialize_particle_info_system Initialize the system from input files procedure, public :: step_spin => tides_step_spin_system Steps the spins of the massive & central bodies due to tides. procedure, public :: set_msys => util_set_msys Sets the value of msys from the masses of system bodies. procedure, public :: get_energy_and_momentum => util_get_energy_momentum_system Calculates the total system energy and momentum procedure, public :: rescale => util_rescale_system Rescales the system into a new set of units procedure, public :: validate_ids => util_valid_id_system Validate the numerical ids passed to the system and save the maximum value generic, public :: write_hdr => write_hdr_bin, write_hdr_netcdf Generic method call for writing headers type, public :: swiftest_encounter Components Type Visibility Attributes Name Initial integer(kind=I4B), public :: nenc Total number of encounters logical, public, dimension(:), allocatable :: lvdotr relative vdotr flag integer(kind=I4B), public, dimension(:), allocatable :: status status of the interaction integer(kind=I8B), public, dimension(:), allocatable :: kidx index value of the encounter from the master k_plpl encounter list integer(kind=I4B), public, dimension(:), allocatable :: index1 position of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: index2 position of the second body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id1 id of the first body in the encounter integer(kind=I4B), public, dimension(:), allocatable :: id2 id of the second body in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x1 the position of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: x2 the position of body 2 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v1 the velocity of body 1 in the encounter real(kind=DP), public, dimension(:,:), allocatable :: v2 the velocity of body 2 in the encounter real(kind=DP), public, dimension(:), allocatable :: t Time of encounter Type-Bound Procedures procedure, public :: setup => setup_encounter A constructor that sets the number of encounters and allocates and initializes all arrays procedure, public :: append => util_append_encounter Appends elements from one structure to another procedure, public :: copy => util_copy_encounter Copies elements from the source encounter list into self. procedure, public :: spill => util_spill_encounter \"Spills\" bodies from one object to another depending on the results of a mask (uses the PACK intrinsic) procedure, public :: resize => util_resize_encounter Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small. procedure, public :: write => io_write_encounter Write close encounter data to output binary file","tags":"","loc":"module/swiftest_classes.html"},{"title":"lambda_function – swiftest","text":"Defines a class that can enable objects that behave like lambda functions. To use this class, define a type of either lambda_obj or lambda_obj_err, or extend the lambda_obj class as necessary, such that an interface that matches the function you wish to lambdafy.\n Once defined, the lambda object can evaluate itself by calling the type-bound procedure eval. e.g. f%eval(x) (or f%eval(x, lerr), f%eval(x, [argument list], etc)) Example - Defining a lambda function f(x,rval,ival) where rval and ival are a real and integer argument, respectively. This implementation uses an abstract interface, though this is not\n strictly necessary unless you want to bind more than one function with the same interface. module lambda_new \n    use swiftest ! This will bring in the lambda_function module\n    ! Define types in a module type , extends ( lambda_obj ) :: lambda_obj_ri_args procedure ( abstract_lambda_ri_args ), pointer , nopass :: lambdaptr_ri_args => null () real ( DP ) :: rval !! Real parameter integer ( I4B ) :: ival !! Integer paramete contains generic :: init => lambda_ri_args_init procedure :: eval => lambda_ri_args_eval procedure , nopass :: lambda_ri_args_init final :: lambda_ri_args_destroy end type interface lambda_obj module procedure lambda_ri_args_init end interface abstract interface function abstract_lambda_ri_args ( x , rval , ival ) result ( y ) ! Template for the lambda function import DP , I4B real ( DP ), dimension (:), intent ( in ) :: x !! Dependent variable real ( DP ), intent ( in ) :: rval !! Real parameter integer ( I4B ), intent ( in ) :: ival !! Integer parameter real ( DP ) :: y !! Real result end function end interface contains\n    type(lambda_obj_ri_args) function lambda_ri_args_init(lambda, rval, ival)\n       !! Initializes the lambda function parameters (can be used as a structure constructor)\n       implicit none\n       procedure(abstract_lambda_ri_args)  :: lambda !! The lambda function that will be passed\n       real(DP),     intent(in)            :: rval     !! Real parameter\n       integer(I4B), intent(in)            :: ival     !! Integer parameter ! Assign the procedure passed to this function to the procedure pointer lambda_ri_args_init % lambdaptr_ri_args => lambda ! Assign the argument values lambda_ri_args_init % rval = rval lambda_ri_args_init % ival = ival return end function lambda_ri_args_init function lambda_ri_args_eval ( self , x ) result ( y ) !! Defines the evaluation method , allowing the lambda function to be called with a single argument implicit none class ( lambda_obj_ri_args ), intent ( inout ) :: self real ( DP ), dimension (:), intent ( in ) :: x real ( DP ) :: y if ( associated ( self % lambdaptr_ri_args )) then y = self % lambdaptr_ri_args ( x , self % rval , self % ival ) self % lastval = y if ( allocated ( self % lastarg )) deallocate ( self % lastarg ) allocate ( self % lastarg , source = x ) else error stop \"Lambda function was not initialized\" end if end function lambda_ri_args_eval subroutine lambda_ri_args_destroy ( self ) !! Finalizer method . Use this as a template for cleaning up the object upon destruction , such as nullifying pointers implicit none type ( lambda_obj_ri_args ) :: self if ( associated ( self % lambdaptr_ri_args )) nullify ( self % lambdaptr_ri_args ) end subroutine lambda_ri_args_destroy function example_function ( x , rval , ival ) result ( y ) ! This is the actual function you are going to use as the lambda function . Its interface must match the abstract interface previously defined implicit none ! Arguments real ( DP ), dimension (:), intent ( in ) :: x real ( DP ), intent ( in ) :: rval integer ( I4B ), intent ( in ) :: ival ! Result real ( DP ) :: y ! Internals integer ( I4B ) :: i , n n = size ( x ) y = 42 . _DP * ival do i = 1 , n y = y + x ( i ) ** 2 end do return end function example_function end module lambda_new program usage\n    use swiftest\n    use lambda_new\n    implicit none\n    type(lambda_obj_ri_args) :: f\n    real(DP) :: sigma_par\n    integer(I4B) :: iwonky, i,j\n    real(DP), dimension(12) :: xarr sigma_par = 3 . 14 _DP iwonky = 13 f = lambda_obj ( example_function , sigma_par , iwonky ) do i = 1 , 10 xarr (:) = [( j * 0 . 25 _DP / i , j = 1 , 12 )] write ( * , * ) i , f % eval ( xarr ) end do end program usage Uses swiftest_globals module~~lambda_function~~UsesGraph module~lambda_function lambda_function module~swiftest_globals swiftest_globals module~lambda_function->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Used by module~~lambda_function~~UsedByGraph module~lambda_function lambda_function module~swiftest swiftest module~swiftest->module~lambda_function module~s_fraggle_placeholder s_fraggle_placeholder module~s_fraggle_placeholder->module~swiftest module~s_gr s_gr module~s_gr->module~swiftest module~s_util_valid s_util_valid module~s_util_valid->module~swiftest module~s_symba_collision s_symba_collision module~s_symba_collision->module~swiftest module~s_obl s_obl module~s_obl->module~swiftest module~s_fraggle_setup s_fraggle_setup module~s_fraggle_setup->module~swiftest module~s_util_coord s_util_coord module~s_util_coord->module~swiftest module~s_symba_encounter_check s_symba_encounter_check module~s_symba_encounter_check->module~swiftest module~s_whm_coord s_whm_coord module~s_whm_coord->module~swiftest module~s_util_rescale s_util_rescale module~s_util_rescale->module~swiftest module~s_util_get_energy_momentum s_util_get_energy_momentum module~s_util_get_energy_momentum->module~swiftest module~s_rmvs_step s_rmvs_step module~s_rmvs_step->module~swiftest module~s_util_index s_util_index module~s_util_index->module~swiftest proc~ge_wpp ge_wpp proc~ge_wpp->module~swiftest module~s_operator_cross s_operator_cross module~s_operator_cross->module~swiftest module~s_fraggle_set s_fraggle_set module~s_fraggle_set->module~swiftest module~s_fraggle_io s_fraggle_io module~s_fraggle_io->module~swiftest module~s_rmvs_kick s_rmvs_kick module~s_rmvs_kick->module~swiftest module~s_util_set s_util_set module~s_util_set->module~swiftest module~s_rmvs_io s_rmvs_io module~s_rmvs_io->module~swiftest module~s_util_version s_util_version module~s_util_version->module~swiftest module~s_tides_step_spin s_tides_step_spin module~s_tides_step_spin->module~swiftest proc~solve_wbs solve_wbs proc~solve_wbs->module~swiftest module~s_orbel s_orbel module~s_orbel->module~swiftest module~s_whm_gr s_whm_gr module~s_whm_gr->module~swiftest module~s_rmvs_chk s_rmvs_chk module~s_rmvs_chk->module~swiftest module~s_fraggle_regime s_fraggle_regime module~s_fraggle_regime->module~swiftest module~s_util_exit s_util_exit module~s_util_exit->module~swiftest module~s_netcdf s_netcdf module~s_netcdf->module~swiftest module~s_rmvs_discard s_rmvs_discard module~s_rmvs_discard->module~swiftest module~s_util_peri s_util_peri module~s_util_peri->module~swiftest module~s_helio_drift s_helio_drift module~s_helio_drift->module~swiftest module~s_setup s_setup module~s_setup->module~swiftest module~s_helio_kick s_helio_kick module~s_helio_kick->module~swiftest module~s_util_append s_util_append module~s_util_append->module~swiftest module~s_rmvs_util s_rmvs_util module~s_rmvs_util->module~swiftest program~swiftest_driver swiftest_driver program~swiftest_driver->module~swiftest module~s_symba_step s_symba_step module~s_symba_step->module~swiftest module~s_symba_util s_symba_util module~s_symba_util->module~swiftest module~s_util_copy s_util_copy module~s_util_copy->module~swiftest module~s_discard s_discard module~s_discard->module~swiftest module~s_util_sort s_util_sort module~s_util_sort->module~swiftest module~s_whm_setup s_whm_setup module~s_whm_setup->module~swiftest module~s_util_resize s_util_resize module~s_util_resize->module~swiftest module~s_helio_gr s_helio_gr module~s_helio_gr->module~swiftest module~orbel orbel module~orbel->module~swiftest module~s_whm_util s_whm_util module~s_whm_util->module~swiftest module~s_rmvs_setup s_rmvs_setup module~s_rmvs_setup->module~swiftest module~s_util_spill s_util_spill module~s_util_spill->module~swiftest module~s_util_minimize_bfgs s_util_minimize_bfgs module~s_util_minimize_bfgs->module~swiftest module~s_user_kick_getacch s_user_kick_getacch module~s_user_kick_getacch->module~swiftest module~s_whm_kick s_whm_kick module~s_whm_kick->module~swiftest module~s_symba_discard s_symba_discard module~s_symba_discard->module~swiftest module~s_symba_drift s_symba_drift module~s_symba_drift->module~swiftest module~whm_drift whm_drift module~whm_drift->module~swiftest module~s_tides_kick_getacch s_tides_kick_getacch module~s_tides_kick_getacch->module~swiftest module~s_util_fill s_util_fill module~s_util_fill->module~swiftest module~s_io s_io module~s_io->module~swiftest module~s_helio_setup s_helio_setup module~s_helio_setup->module~swiftest module~s_symba_kick s_symba_kick module~s_symba_kick->module~swiftest module~s_fraggle_util s_fraggle_util module~s_fraggle_util->module~swiftest module~s_util_solve s_util_solve module~s_util_solve->module~swiftest module~s_helio_step s_helio_step module~s_helio_step->module~swiftest module~s_whm_step s_whm_step module~s_whm_step->module~swiftest module~s_symba_setup s_symba_setup module~s_symba_setup->module~swiftest module~s_fraggle_generate s_fraggle_generate module~s_fraggle_generate->module~swiftest module~s_symba_io s_symba_io module~s_symba_io->module~swiftest module~s_kick s_kick module~s_kick->module~swiftest module~drift_implementation drift_implementation module~drift_implementation->module~swiftest Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces lambda_obj Abstract Interfaces lambda0 lambda0err lambda0tvar Derived Types lambda_obj lambda_obj_err lambda_obj_tvar Functions lambda_init_0 lambda_init_0_err lambda_init_tvar lambda_eval_0 lambda_eval_0_err lambda_eval_tvar Subroutines lambda_destroy Interfaces public interface lambda_obj public function lambda_init_0 (lambda) Arguments Type Intent Optional Attributes Name procedure( lambda0 ) :: lambda Return Value type( lambda_obj ) public function lambda_init_0_err (lambda, lerr) Arguments Type Intent Optional Attributes Name procedure( lambda0err ) :: lambda logical, intent(in) :: lerr Return Value type( lambda_obj_err ) public function lambda_init_tvar (lambda, t) Arguments Type Intent Optional Attributes Name procedure( lambda0tvar ) :: lambda real(kind=DP), intent(in) :: t Return Value type( lambda_obj_tvar ) Abstract Interfaces abstract interface public function lambda0(x) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x Return Value real(kind=DP) abstract interface public function lambda0err(x, lerr) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x logical, intent(out) :: lerr Return Value real(kind=DP) abstract interface public function lambda0tvar(x, t) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable Derived Types type, public :: lambda_obj Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Components Type Visibility Attributes Name Initial procedure( lambda0 ), public, pointer, nopass :: lambdaptr => null() real(kind=DP), public :: lastval real(kind=DP), public, dimension(:), allocatable :: lastarg Constructor public  function lambda_init_0 (lambda) public  function lambda_init_0_err (lambda, lerr) public  function lambda_init_tvar (lambda, t) Finalizations Procedures final :: lambda_destroy","tags":"","loc":"module/lambda_function.html"},{"title":"s_kick – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_kick~~UsesGraph module~s_kick s_kick module~swiftest swiftest module~s_kick->module~swiftest module~swiftest_classes swiftest_classes module~s_kick->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines kick_getacch_int_pl kick_getacch_int_tp kick_getacch_int_all_pl kick_getacch_int_all_tp kick_getacch_int_one_pl kick_getacch_int_one_tp Module Subroutines module subroutine kick_getacch_int_pl (self) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object module subroutine kick_getacch_int_tp (self, GMpl, xhp, npl) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: GMpl Massive body masses real(kind=DP), intent(in), dimension(:,:) :: xhp Massive body position vectors integer(kind=I4B), intent(in) :: npl Number of active massive bodies module subroutine kick_getacch_int_all_pl (npl, nplpl, k_plpl, x, Gmass, radius, acc) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations for massive bodies, with parallelization Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies integer(kind=I8B), intent(in) :: nplpl Number of massive body interactions to compute integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl Array of interaction pair indices (flattened upper triangular matrix) real(kind=DP), intent(in), dimension(:,:) :: x Position vector array real(kind=DP), intent(in), dimension(:) :: Gmass Array of massive body G*mass real(kind=DP), intent(in), dimension(:) :: radius Array of massive body radii real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array module subroutine kick_getacch_int_all_tp (ntp, npl, xtp, xpl, GMpl, lmask, acc) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of test particles by massive bodies with parallelisim Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: ntp Number of test particles integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in), dimension(:,:) :: xtp Test particle position vector array real(kind=DP), intent(in), dimension(:,:) :: xpl Massive body particle position vector array real(kind=DP), intent(in), dimension(:) :: GMpl Array of massive body G*mass logical, intent(in), dimension(:) :: lmask Logical mask indicating which test particles should be computed real(kind=DP), intent(inout), dimension(:,:) :: acc Acceleration vector array pure module subroutine kick_getacch_int_one_pl (rji2, xr, yr, zr, Gmi, Gmj, axi, ayi, azi, axj, ayj, azj) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations for a single pair of massive bodies Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the two bodies real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmi G*mass of body i real(kind=DP), intent(in) :: Gmj G*mass of body j real(kind=DP), intent(inout) :: axi Acceleration vector components of body i real(kind=DP), intent(inout) :: ayi Acceleration vector components of body i real(kind=DP), intent(inout) :: azi Acceleration vector components of body i real(kind=DP), intent(inout) :: axj Acceleration vector components of body j real(kind=DP), intent(inout) :: ayj Acceleration vector components of body j real(kind=DP), intent(inout) :: azj Acceleration vector components of body j pure module subroutine kick_getacch_int_one_tp (rji2, xr, yr, zr, Gmpl, ax, ay, az) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of a single test particle massive body pair. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: rji2 Square of distance between the test particle and massive body real(kind=DP), intent(in) :: xr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: yr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: zr Distances between the two bodies in x, y, and z directions real(kind=DP), intent(in) :: Gmpl G*mass of massive body real(kind=DP), intent(inout) :: ax Acceleration vector components of test particle real(kind=DP), intent(inout) :: ay Acceleration vector components of test particle real(kind=DP), intent(inout) :: az Acceleration vector components of test particle","tags":"","loc":"module/s_kick.html"},{"title":"s_tides_kick_getacch – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_tides_kick_getacch~~UsesGraph module~s_tides_kick_getacch s_tides_kick_getacch module~swiftest swiftest module~s_tides_kick_getacch->module~swiftest module~swiftest_classes swiftest_classes module~s_tides_kick_getacch->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines tides_kick_getacch_pl Module Subroutines module subroutine tides_kick_getacch_pl (self, system) Interface → Author Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton Calculated tidal torques from central body to any planet and from any planet to central body\n planet - planet interactions are considered negligable.\n This is a constant time lag model. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object","tags":"","loc":"module/s_tides_kick_getacch.html"},{"title":"s_tides_step_spin – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_tides_step_spin~~UsesGraph module~s_tides_step_spin s_tides_step_spin module~swiftest swiftest module~s_tides_step_spin->module~swiftest module~swiftest_classes swiftest_classes module~s_tides_step_spin->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Interfaces lambda_obj Abstract Interfaces tidederiv Derived Types tides_derivs_func Functions tides_spin_derivs tides_derivs_eval tides_derivs_init Module Subroutines tides_step_spin_system Interfaces interface lambda_obj function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) Abstract Interfaces abstract interface function tidederiv(x, t, dt, xbeg, xend) result(y) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:), allocatable Derived Types type, extends(lambda_obj_tvar) :: tides_derivs_func Base class for an lambda function object. This object takes no additional arguments other than the dependent variable x, an array of real numbers Components Type Visibility Attributes Name Initial procedure( tidederiv ), public, pointer, nopass :: lambdaptr_tides_deriv real(kind=DP), public, dimension(:,:), allocatable :: xbeg real(kind=DP), public, dimension(:,:), allocatable :: xend real(kind=DP), public :: dt Type-Bound Procedures generic, public :: init => tides_derivs_init procedure, public :: evalt => tides_derivs_eval procedure, public, nopass :: tides_derivs_init Functions function tides_spin_derivs (rot_pl_cb, t, dt, xbeg, xend) result(drot) Need to add more arguments so we can pull in mass, radius, Ip, J2, etc...\n author: Jennifer L.L. Pouplin and David A. Minton Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: rot_pl_cb Array of rotations. The last element is the central body, and all others are massive bodies real(kind=DP), intent(in) :: t Current time, which is used to interpolate the massive body positions real(kind=DP), intent(in) :: dt Total step size real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value real(kind=DP),\n  dimension(:,:), allocatable function tides_derivs_eval (self, x, t) result(y) Arguments Type Intent Optional Attributes Name class( tides_derivs_func ), intent(inout) :: self real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in) :: t Return Value real(kind=DP),\n  dimension(:), allocatable function tides_derivs_init (lambda, dt, xbeg, xend) result(f) Arguments Type Intent Optional Attributes Name procedure( tidederiv ) :: lambda real(kind=DP), intent(in) :: dt real(kind=DP), intent(in), dimension(:,:) :: xbeg real(kind=DP), intent(in), dimension(:,:) :: xend Return Value type( tides_derivs_func ) Module Subroutines module subroutine tides_step_spin_system (self, param, t, dt) Interface → Author Jennifer L.L. Pouplin and David A. Minton Integrates the spin equations for central and massive bodies of the system subjected to tides. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"module/s_tides_step_spin.html"},{"title":"s_obl – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_obl~~UsesGraph module~s_obl s_obl module~swiftest swiftest module~s_obl->module~swiftest module~swiftest_classes swiftest_classes module~s_obl->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions obl_pot_one Module Subroutines obl_acc_body obl_acc_pl obl_acc_tp obl_pot_system Functions elemental function obl_pot_one (npl, GMcb, GMpl, j2rp2, j4rp4, zh, irh) result(oblpot) Author David A. Minton Compute the contribution to the total gravitational potential due solely to the oblateness of the central body from a single massive body\n    Returned value does not include monopole term or terms higher than J4 Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl Number of massive bodies real(kind=DP), intent(in) :: GMcb G*mass of the central body real(kind=DP), intent(in) :: GMpl G*mass of the massive body real(kind=DP), intent(in) :: j2rp2 J_2 / R**2 of the central body real(kind=DP), intent(in) :: j4rp4 J_2 / R**4 of the central body real(kind=DP), intent(in) :: zh z-component of the heliocentric distance vector of the massive body real(kind=DP), intent(in) :: irh Inverse of the heliocentric distance magnitude of the massive body Return Value real(kind=DP) Gravitational potential Module Subroutines module subroutine obl_acc_body (self, system) Interface → Author David A. Minton Compute the barycentric accelerations of bodies due to the oblateness of the central body\n      Returned values do not include monopole term or terms higher than J4 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object module subroutine obl_acc_pl (self, system) Interface → Author David A. Minton Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object module subroutine obl_acc_tp (self, system) Interface → Author David A. Minton Compute the barycentric accelerations of massive bodies due to the oblateness of the central body Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object module subroutine obl_pot_system (self) Interface → Author David A. Minton Compute the contribution to the total gravitational potential due solely to the oblateness of the central body\n    Returned value does not include monopole term or terms higher than J4 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object","tags":"","loc":"module/s_obl.html"},{"title":"s_orbel – swiftest","text":"Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_SCHGET.F PURPOSE : Given an angle , efficiently compute sinh and cosh . Input : angle ==> angle in radians ( real scalar ) Output : shx ==> sinh ( angle ) ( real scalar ) chx ==> cosh ( angle ) ( real scalar ) ALGORITHM : Obvious from the code REMARKS : Based on the routine SCGET for sine 's and cosine' s . We use the sqrt rather than cosh ( it 's faster) BE SURE THE ANGLE IS IN RADIANS AND IT CAN' T BE LARGER THAN 300 OR OVERFLOWS WILL OCCUR ! AUTHOR : M . Duncan . DATE WRITTEN : May 6 , 1992 . REVISIONS : Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 !                    ORBEL_FLON.F PURPOSE : Solves Kepler ' s eqn . for hyperbola using hybrid approach . Input : e ==> eccentricity anomaly . ( real scalar ) capn ==> hyperbola mean anomaly . ( real scalar ) Returns : orbel_flon ==> eccentric anomaly . ( real scalar ) ALGORITHM : Uses power series for N in terms of F and Newton , s method REMARKS : ONLY GOOD FOR LOW VALUES OF N ( N < 0 . 636 * e - 0 . 6 ) AUTHOR : M . Duncan DATE WRITTEN : May 26 , 1992 . REVISIONS : Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_FGET.F PURPOSE : Solves Kepler 's eqn. for hyperbola using hybrid approach. Input: e ==> eccentricity anomaly. (real scalar) capn ==> hyperbola mean anomaly. (real scalar) Returns: orbel_fget ==>  eccentric anomaly. (real scalar) ALGORITHM: Based on pp. 70-72 of Fitzpatrick' s book \"Principles of Cel. Mech. \" . Quartic convergence from Danby ' s book . REMARKS : AUTHOR : M . Duncan DATE WRITTEN : May 11 , 1992 . REVISIONS : 2 / 26 / 93 hfl Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_ZGET.F PURPOSE : Solves the equivalent of Kepler 's eqn. for a parabola given Q (Fitz. notation.) Input: q ==>  parabola mean anomaly. (real scalar) Returns: orbel_zget ==>  eccentric anomaly. (real scalar) ALGORITHM: p. 70-72 of Fitzpatrick' s book \"Princ. of Cel. Mech.\" REMARKS : For a parabola we can solve analytically . AUTHOR : M . Duncan DATE WRITTEN : May 11 , 1992 . REVISIONS : May 27 - corrected it for negative Q and use power series for small Q . Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_ESOLMD.F PURPOSE : Solves Kepler ' s eqn . e is ecc . m is mean anomaly . Input : e ==> eccentricity anomaly . ( real scalar ) m ==> mean anomaly . ( real scalar ) Returns : orbel_esolmd ==> eccentric anomaly . ( real scalar ) ALGORITHM : Some sort of quartic convergence from Wisdom . REMARKS : ONLY GOOD FOR SMALL ECCENTRICITY SINCE IT ONLY ITERATES ONCE . ( GOOD FOR PLANET CALCS .) ALSO DOES NOT PUT M OR E BETWEEN 0 . AND 2 * PI INCLUDES : needs SCGET . F AUTHOR : M . Duncan DATE WRITTEN : May 7 , 1992 . REVISIONS : 2 / 26 / 93 hfl Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_EHIE.F PURPOSE : Solves Kepler 's eqn.   e is ecc.   m is mean anomaly. Input: e ==> eccentricity anomaly. (real scalar) m ==> mean anomaly. (real scalar) Returns: orbel_ehybrid ==>  eccentric anomaly. (real scalar) ALGORITHM: Use Danby' s quartic for 3 iterations . Eqn . is f ( x ) = x - e * sin ( x + M ). Note that E = x + M . First guess is very good for e near 1 . Need to first get M between 0 . and PI and use symmetry to return right answer if M between PI and 2PI\n     REMARKS: Modifies M so that both E and M are in range (0,TWOPI)\n     AUTHOR: M. Duncan\n     DATE WRITTEN: May 25,1992.\n     REVISIONS: Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_EGET.F PURPOSE : Solves Kepler ' s eqn . e is ecc . m is mean anomaly . Input : e ==> eccentricity anomaly . ( real scalar ) m ==> mean anomaly . ( real scalar ) Returns : orbel_eget ==> eccentric anomaly . ( real scalar ) ALGORITHM : Quartic convergence from Danby REMARKS : For results very near roundoff , give it M between 0 and 2 * pi . One can condition M before calling EGET by calling my double precision function MOD2PI ( M ). This is not done within the routine to speed it up and because it works fine even for large M . AUTHOR : M . Duncan DATE WRITTEN : May 7 , 1992. REVISIONS : May 21 , 1992. Now have it go through EXACTLY two iterations with the premise that it will only be called if we have an ellipse with e between 0.15 and 0.8 Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_EHYBRID.F PURPOSE : Solves Kepler ' s eqn . e is ecc . m is mean anomaly . Input : e ==> eccentricity anomaly . ( real scalar ) m ==> mean anomaly . ( real scalar ) Returns : orbel_ehybrid ==> eccentric anomaly . ( real scalar ) ALGORITHM : For e < 0 . 18 uses fast routine ESOLMD For larger e but less than 0 . 8 , uses EGET For e > 0 . 8 uses EHIE REMARKS : Only EHIE brings M and E into range ( 0 , TWOPI ) AUTHOR : M . Duncan DATE WRITTEN : May 25 , 1992 . REVISIONS : 2 / 26 / 93 hfl Code converted to Modern Fortran by David A. Minton\n Date: 2020-06-29 ORBEL_FHYBRID.F PURPOSE : Solves Kepler ' s eqn . for hyperbola using hybrid approach . Input : e ==> eccentricity anomaly . ( real scalar ) n ==> hyperbola mean anomaly . ( real scalar ) Returns : orbel_fhybrid ==> eccentric anomaly . ( real scalar ) ALGORITHM : For abs ( N ) < 0 . 636 * ecc - 0 . 6 , use FLON For larger N , uses FGET REMARKS : AUTHOR : M . Duncan DATE WRITTEN : May 26 , 1992 . REVISIONS :: REVISIONS : 2 / 26 / 93 hfl Uses swiftest Ancestors: swiftest_classes module~~s_orbel~~UsesGraph module~s_orbel s_orbel module~swiftest swiftest module~s_orbel->module~swiftest module~swiftest_classes swiftest_classes module~s_orbel->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions orbel_flon orbel_fget orbel_zget orbel_esolmd orbel_ehie orbel_eget orbel_ehybrid orbel_fhybrid Subroutines orbel_el2xv orbel_schget Module Subroutines orbel_el2xv_vec orbel_scget orbel_xv2aeq orbel_xv2aqt orbel_xv2el_vec orbel_xv2el Functions pure function orbel_flon (e, icapn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: icapn Return Value real(kind=DP) pure function orbel_fget (e, capn) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: capn Return Value real(kind=DP) pure function orbel_zget (iq) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: iq Return Value real(kind=DP) pure function orbel_esolmd (e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) pure function orbel_ehie (e, im) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: im Return Value real(kind=DP) pure function orbel_eget (e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) pure function orbel_ehybrid (e, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: m Return Value real(kind=DP) pure function orbel_fhybrid (e, n) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: e real(kind=DP), intent(in) :: n Return Value real(kind=DP) Subroutines pure subroutine orbel_el2xv (mu, a, ie, inc, capom, omega, capm, x, v) Author David A. Minton Compute osculating orbital elements from relative C)rtesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: a real(kind=DP), intent(in) :: ie real(kind=DP), intent(in) :: inc real(kind=DP), intent(in) :: capom real(kind=DP), intent(in) :: omega real(kind=DP), intent(in) :: capm real(kind=DP), intent(out), dimension(:) :: x real(kind=DP), intent(out), dimension(:) :: v pure subroutine orbel_schget (angle, shx, chx) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: shx real(kind=DP), intent(out) :: chx Module Subroutines module subroutine orbel_el2xv_vec (self, cb) Interface → Author David A. Minton A wrapper method that converts all of the orbital element vectors into cartesian position and velocity vectors for a Swiftest body object.\n This method deallocates all of the orbital elements after it is finished. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body objec pure module subroutine orbel_scget (angle, sx, cx) Interface → Author David A. Minton Efficiently compute the sine and cosine of an input angle\n      Input angle must be in radians Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: angle real(kind=DP), intent(out) :: sx real(kind=DP), intent(out) :: cx pure module subroutine orbel_xv2aeq (mu, x, v, a, e, q) Interface → Author David A. Minton Compute semimajor axis, eccentricity, and pericentric distance from relative Cartesian position and velocity Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(in), dimension(:) :: x real(kind=DP), intent(in), dimension(:) :: v real(kind=DP), intent(out) :: a real(kind=DP), intent(out) :: e real(kind=DP), intent(out) :: q pure module subroutine orbel_xv2aqt (mu, x, v, a, q, capm, tperi) Interface → Author David A. Minton Compute semimajor axis, pericentric distance, mean anomaly, and time to nearest pericenter passage from\n relative Cartesian position and velocity\n      tperi > 0 means nearest pericenter passage is in the future\n      tperi < 0 means nearest pericenter passage is in the past Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: q periapsis real(kind=DP), intent(out) :: capm mean anomaly real(kind=DP), intent(out) :: tperi time of pericenter passage module subroutine orbel_xv2el_vec (self, cb) Interface → Author David A. Minton A wrapper method that converts all of the cartesian position and velocity vectors of a Swiftest body object to orbital elements. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object pure module subroutine orbel_xv2el (mu, x, v, a, e, inc, capom, omega, capm) Interface → Author David A. Minton Compute osculating orbital elements from relative Cartesian position and velocity\n  All angular measures are returned in radians\n      If inclination < TINY, longitude of the ascending node is arbitrarily set to 0 Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(out) :: a semimajor axis real(kind=DP), intent(out) :: e eccentricity real(kind=DP), intent(out) :: inc inclination real(kind=DP), intent(out) :: capom longitude of ascending node real(kind=DP), intent(out) :: omega argument of periapsis real(kind=DP), intent(out) :: capm mean anomaly","tags":"","loc":"module/s_orbel.html"},{"title":"s_whm_coord – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_coord~~UsesGraph module~s_whm_coord s_whm_coord module~swiftest swiftest module~s_whm_coord->module~swiftest module~whm_classes whm_classes module~s_whm_coord->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_coord_h2j_pl whm_coord_j2h_pl whm_coord_vh2vj_pl Module Subroutines module subroutine whm_coord_h2j_pl (self, cb) Interface → Author David A. Minton Convert from heliocentric to Jacobi coordinates, massive bodies only Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree module subroutine whm_coord_j2h_pl (self, cb) Interface → Author David A. Minton Convert from Jacobi to heliocentric coordinates, massive bodies only. Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree module subroutine whm_coord_vh2vj_pl (self, cb) Interface → Author David A. Minton Convert from heliocentric to Jadcobi coordinates, massive body velocities only Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_cb ), intent(inout) :: cb Swiftest central body particle data structuree","tags":"","loc":"module/s_whm_coord.html"},{"title":"s_whm_gr – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_gr~~UsesGraph module~s_whm_gr s_whm_gr module~swiftest swiftest module~s_whm_gr->module~swiftest module~whm_classes whm_classes module~s_whm_gr->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_gr_kick_getacch_pl whm_gr_kick_getacch_tp whm_gr_p4_pl whm_gr_p4_tp Module Subroutines pure module subroutine whm_gr_kick_getacch_pl (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters pure module subroutine whm_gr_kick_getacch_tp (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters pure module subroutine whm_gr_p4_pl (self, param, dt) Interface → Author David A. Minton Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size pure module subroutine whm_gr_p4_tp (self, param, dt) Interface → Author David A. Minton Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"module/s_whm_gr.html"},{"title":"s_whm_step – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_step~~UsesGraph module~s_whm_step s_whm_step module~swiftest swiftest module~s_whm_step->module~swiftest module~whm_classes whm_classes module~s_whm_step->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_step_system whm_step_pl whm_step_tp Module Subroutines module subroutine whm_step_system (self, param, t, dt) Interface → Author David A. Minton Step massive bodies and and active test particles ahead in heliocentric coordinates Read more… Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine whm_step_pl (self, system, param, t, dt) Interface → Author David A. Minton Step planets ahead using kick-drift-kick algorithm Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine whm_step_tp (self, system, param, t, dt) Interface → Author David A. Minton Step active test particles ahead using kick-drift-kick algorithm Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"module/s_whm_step.html"},{"title":"whm_drift – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~whm_drift~~UsesGraph module~whm_drift whm_drift module~swiftest swiftest module~whm_drift->module~swiftest module~whm_classes whm_classes module~whm_drift->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_drift_pl Module Subroutines module subroutine whm_drift_pl (self, system, param, dt) Interface → Author David A. Minton Loop through planets and call Danby drift routine Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system WHM nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"module/whm_drift.html"},{"title":"s_whm_kick – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_kick~~UsesGraph module~s_whm_kick s_whm_kick module~swiftest swiftest module~s_whm_kick->module~swiftest module~whm_classes whm_classes module~s_whm_kick->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions whm_kick_getacch_ah0 Subroutines whm_kick_getacch_ah1 whm_kick_getacch_ah2 Module Subroutines whm_kick_getacch_pl whm_kick_getacch_tp whm_kick_vh_pl whm_kick_vh_tp Functions function whm_kick_getacch_ah0 (mu, xhp, n) result(ah0) Author David A. Minton Compute zeroth term heliocentric accelerations of planets Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu real(kind=DP), intent(in), dimension(:,:) :: xhp integer(kind=I4B), intent(in) :: n Return Value real(kind=DP),\n  dimension(NDIM) Subroutines pure subroutine whm_kick_getacch_ah1 (cb, pl) Author David A. Minton Compute first term heliocentric accelerations of planets Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb WHM central body object class( whm_pl ), intent(inout) :: pl WHM massive body object pure subroutine whm_kick_getacch_ah2 (cb, pl) Author David A. Minton Compute second term heliocentric accelerations of planets Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: cb Swiftest central body object class( whm_pl ), intent(inout) :: pl WHM massive body object Module Subroutines module subroutine whm_kick_getacch_pl (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of planets Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine whm_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of test particles Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest central body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine whm_kick_vh_pl (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick heliocentric velocities of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. module subroutine whm_kick_vh_tp (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick heliocentric velocities of test particles Read more… Arguments Type Intent Optional Attributes Name class( whm_tp ), intent(inout) :: self WHM massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"module/s_whm_kick.html"},{"title":"s_whm_setup – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_setup~~UsesGraph module~s_whm_setup s_whm_setup module~swiftest swiftest module~s_whm_setup->module~swiftest module~whm_classes whm_classes module~s_whm_setup->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_setup_pl whm_util_set_mu_eta_pl whm_setup_initialize_system Module Subroutines module subroutine whm_setup_pl (self, n, param) Interface → Author David A. Minton Allocate WHM planet structure Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter module subroutine whm_util_set_mu_eta_pl (self, cb) Interface → Author David A. Minton Sets the Jacobi mass value eta for all massive bodies Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM system object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine whm_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize a WHM nbody system from files Arguments Type Intent Optional Attributes Name class( whm_nbody_system ), intent(inout) :: self WHM nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_whm_setup.html"},{"title":"s_whm_util – swiftest","text":"Uses swiftest Ancestors: whm_classes module~~s_whm_util~~UsesGraph module~s_whm_util s_whm_util module~swiftest swiftest module~s_whm_util->module~swiftest module~whm_classes whm_classes module~s_whm_util->module~whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines whm_util_append_pl whm_util_fill_pl whm_util_resize_pl whm_util_set_ir3j whm_util_sort_pl whm_util_sort_rearrange_pl whm_util_spill_pl Module Subroutines module subroutine whm_util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine whm_util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new WHM test particle structure into an old one. \n This is the inverse of a fill operation. Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(in) :: inserts inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine whm_util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine whm_util_set_ir3j (self) Interface → Author David A. Minton Sets the inverse Jacobi and heliocentric radii cubed (1/rj 3 and 1/rh 3) Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object module subroutine whm_util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a WHM massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine whm_util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange WHM massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine whm_util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) WHM test particle structure from active list to discard list Read more… Arguments Type Intent Optional Attributes Name class( whm_pl ), intent(inout) :: self WHM massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"module/s_whm_util.html"},{"title":"s_operator_cross – swiftest","text":"Contains implementations for the .cross. operator for all defined integer and real types\n Single vector implementations: C(1:3)   = A(1:3)   .cross. B(1:3) \n Vector list implementations:   C(1:3, :) = A(1:3, :) .cross. B(1:3, :) Uses swiftest Ancestors: swiftest_operators module~~s_operator_cross~~UsesGraph module~s_operator_cross s_operator_cross module~swiftest swiftest module~s_operator_cross->module~swiftest module~swiftest_operators swiftest_operators module~s_operator_cross->module~swiftest_operators module~swiftest->module~swiftest_operators module~whm_classes whm_classes module~swiftest->module~whm_classes module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions operator_cross_sp operator_cross_dp operator_cross_qp operator_cross_i1b operator_cross_i2b operator_cross_i4b operator_cross_i8b operator_cross_el_sp operator_cross_el_dp operator_cross_el_qp operator_cross_el_i1b operator_cross_el_i2b operator_cross_el_i4b operator_cross_el_i8b Module Functions pure function operator_cross_sp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A real(kind=SP), intent(in), dimension(:) :: B Return Value real(kind=SP),\n  dimension(3) pure function operator_cross_dp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A real(kind=DP), intent(in), dimension(:) :: B Return Value real(kind=DP),\n  dimension(3) pure function operator_cross_qp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:) :: A real(kind=QP), intent(in), dimension(:) :: B Return Value real(kind=QP),\n  dimension(3) pure function operator_cross_i1b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:) :: A integer(kind=I1B), intent(in), dimension(:) :: B Return Value integer(kind=I1B),\n  dimension(3) pure function operator_cross_i2b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:) :: A integer(kind=I2B), intent(in), dimension(:) :: B Return Value integer(kind=I2B),\n  dimension(3) pure function operator_cross_i4b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: A integer(kind=I4B), intent(in), dimension(:) :: B Return Value integer(kind=I4B),\n  dimension(3) pure function operator_cross_i8b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:) :: A integer(kind=I8B), intent(in), dimension(:) :: B Return Value integer(kind=I8B),\n  dimension(3) pure function operator_cross_el_sp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A real(kind=SP), intent(in), dimension(:,:) :: B Return Value real(kind=SP),\n  dimension(:,:), allocatable pure function operator_cross_el_dp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:,:) :: B Return Value real(kind=DP),\n  dimension(:,:), allocatable pure function operator_cross_el_qp (A, B) result(C) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:,:) :: B Return Value real(kind=QP),\n  dimension(:,:), allocatable pure function operator_cross_el_i1b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I1B), intent(in), dimension(:,:) :: A integer(kind=I1B), intent(in), dimension(:,:) :: B Return Value integer(kind=I1B),\n  dimension(:,:), allocatable pure function operator_cross_el_i2b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I2B), intent(in), dimension(:,:) :: A integer(kind=I2B), intent(in), dimension(:,:) :: B Return Value integer(kind=I2B),\n  dimension(:,:), allocatable pure function operator_cross_el_i4b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:,:) :: A integer(kind=I4B), intent(in), dimension(:,:) :: B Return Value integer(kind=I4B),\n  dimension(:,:), allocatable pure function operator_cross_el_i8b (A, B) result(C) Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in), dimension(:,:) :: A integer(kind=I8B), intent(in), dimension(:,:) :: B Return Value integer(kind=I8B),\n  dimension(:,:), allocatable","tags":"","loc":"module/s_operator_cross.html"},{"title":"s_operator_mag – swiftest","text":"Contains implementations for the .mag. operator for all defined real types\n Single vector implementations:  B   = .mag. A(1:3)\n Vector list implementations:   B(:) = .mag. A(1:3, :) Uses Ancestors: swiftest_operators module~~s_operator_mag~~UsesGraph module~s_operator_mag s_operator_mag module~swiftest_operators swiftest_operators module~s_operator_mag->module~swiftest_operators module~swiftest_globals swiftest_globals module~swiftest_operators->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions operator_mag_sp operator_mag_dp operator_mag_el_sp operator_mag_el_dp operator_mag_el_qp Module Functions pure function operator_mag_sp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: A Return Value real(kind=SP) pure function operator_mag_dp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: A Return Value real(kind=DP) pure function operator_mag_el_sp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:,:) :: A Return Value real(kind=SP),\n  dimension(:), allocatable pure function operator_mag_el_dp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A Return Value real(kind=DP),\n  dimension(:), allocatable pure function operator_mag_el_qp (A) result(B) Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A Return Value real(kind=QP),\n  dimension(:), allocatable","tags":"","loc":"module/s_operator_mag.html"},{"title":"s_util_solve – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_solve~~UsesGraph module~s_util_solve s_util_solve module~swiftest swiftest module~s_util_solve->module~swiftest module~swiftest_classes swiftest_classes module~s_util_solve->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions solve_wbs ge_wpp Module Functions util_solve_linear_system_d util_solve_linear_system_q util_solve_rkf45 Functions function solve_wbs (u) result(x) Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:), allocatable :: u Return Value real(kind=QP),\n  dimension(:), allocatable function ge_wpp (A, b) result(u) Solve  Ax=b  using Gaussian elimination then backwards substitution.\n   A being an n by n matrix.\n   x and b are n by 1 vectors. \n Based on code available on Rosetta Code: https://rosettacode.org/wiki/Gaussian_elimination#Fortran Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b Return Value real(kind=QP),\n  dimension(:,:), allocatable Module Functions function util_solve_linear_system_d (A, b, n, lerr) result(x) Author David A. Minton Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:,:) :: A real(kind=DP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(n) function util_solve_linear_system_q (A, b, n, lerr) result(x) Author David A. Minton Solves the linear equation of the form A*x = b for x. \n   A is an (n,n) arrays\n   x and b are (n) arrays\n Uses Gaussian elimination, so will have issues if system is ill-conditioned.\n Uses quad precision intermidiate values, so works best on small arrays. Arguments Type Intent Optional Attributes Name real(kind=QP), intent(in), dimension(:,:) :: A real(kind=QP), intent(in), dimension(:) :: b integer(kind=I4B), intent(in) :: n logical, intent(out) :: lerr Return Value real(kind=QP),\n  dimension(n) module function util_solve_rkf45 (f, y0in, t1, dt0, tol) result(y1) Interface → Author David A. Minton Implements the 4th order Runge-Kutta-Fehlberg ODE solver for initial value problems of the form f=dy/dt, y0 = y(t=0), solving for y1 = y(t=t1). Uses a 5th order adaptive step size control.\n Uses a lambda function object as defined in the lambda_function module Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f lambda function object that has been initialized to be a function of derivatives. The object will return with components lastarg and lasteval set real(kind=DP), intent(in), dimension(:) :: y0in Initial value at t=0 real(kind=DP), intent(in) :: t1 Final time real(kind=DP), intent(in) :: dt0 Initial step size guess real(kind=DP), intent(in) :: tol Tolerance on solution Return Value real(kind=DP),\n  dimension(:), allocatable Final result","tags":"","loc":"module/s_util_solve.html"},{"title":"s_util_set – swiftest","text":"This submodule contains a collection of setter method implementations Uses swiftest Ancestors: swiftest_classes module~~s_util_set~~UsesGraph module~s_util_set s_util_set module~swiftest swiftest module~s_util_set->module~swiftest module~swiftest_classes swiftest_classes module~s_util_set->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_set_beg_end_pl util_set_ir3h util_set_msys util_set_mu_pl util_set_mu_tp util_set_particle_info util_set_rhill util_set_rhill_approximate Module Subroutines module subroutine util_set_beg_end_pl (self, xbeg, xend, vbeg) Interface → Author David A. Minton Sets one or more of the values of xbeg, xend, and vbeg Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object real(kind=DP), intent(in), optional dimension(:,:) :: xbeg real(kind=DP), intent(in), optional dimension(:,:) :: xend real(kind=DP), intent(in), optional dimension(:,:) :: vbeg module subroutine util_set_ir3h (self) Interface → Author David A. Minton Sets the inverse heliocentric radius term (1/rh**3) for all bodies in a structure Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object module subroutine util_set_msys (self) Interface → Author David A. Minton Sets the value of msys and the vector mass quantities based on the total mass of the system Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nobdy system object module subroutine util_set_mu_pl (self, cb) Interface → Author David A. Minton Computes G * (M + m) for each massive body Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_set_mu_tp (self, cb) Interface → Author David A. Minton Converts certain scalar values to arrays so that they can be used in elemental functions Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_set_particle_info (self, name, particle_type, status, origin_type, origin_time, origin_xh, origin_vh, discard_time, discard_xh, discard_vh, discard_body_id) Interface → Author David A. Minton Sets one or more values of the particle information metadata object Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self character(len=*), intent(in), optional :: name Non-unique name character(len=*), intent(in), optional :: particle_type String containing a description of the particle type (e.g. Central Body, Massive Body, Test Particle) character(len=*), intent(in), optional :: status Particle status description: ACTIVE, MERGED, FRAGMENTED, etc. character(len=*), intent(in), optional :: origin_type String containing a description of the origin of the particle (e.g. Initial Conditions, Supercatastrophic, Disruption, etc.) real(kind=DP), intent(in), optional :: origin_time The time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_xh The heliocentric distance vector at the time of the particle's formation real(kind=DP), intent(in), optional dimension(:) :: origin_vh The heliocentric velocity vector at the time of the particle's formation real(kind=DP), intent(in), optional :: discard_time The time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_xh The heliocentric distance vector at the time of the particle's discard real(kind=DP), intent(in), optional dimension(:) :: discard_vh The heliocentric velocity vector at the time of the particle's discard integer(kind=I4B), intent(in), optional :: discard_body_id The id of the other body involved in the discard (0 if no other body involved) module subroutine util_set_rhill (self, cb) Interface → Author David A. Minton Sets the value of the Hill's radius Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_set_rhill_approximate (self, cb) Interface → Author David A. Minton Sets the approximate value of the Hill's radius using the heliocentric radius instead of computing the semimajor axis Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object","tags":"","loc":"module/s_util_set.html"},{"title":"s_util_peri – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_peri~~UsesGraph module~s_util_peri s_util_peri module~swiftest swiftest module~s_util_peri->module~swiftest module~swiftest_classes swiftest_classes module~s_util_peri->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_peri_tp Module Subroutines module subroutine util_peri_tp (self, system, param) Interface → Author David A. Minton Determine system pericenter passages for test particles\n Note:  If the coordinate system used is barycentric, then this routine assumes that the barycentric coordinates in the\n        test particle structures are up-to-date and are not recomputed Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_util_peri.html"},{"title":"s_util_coord – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_coord~~UsesGraph module~s_util_coord s_util_coord module~swiftest swiftest module~s_util_coord->module~swiftest module~swiftest_classes swiftest_classes module~s_util_coord->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_coord_h2b_pl util_coord_h2b_tp util_coord_b2h_pl util_coord_b2h_tp util_coord_vb2vh_pl util_coord_vb2vh_tp util_coord_vh2vb_pl util_coord_vh2vb_tp util_coord_xh2xb_pl util_coord_xh2xb_tp Module Subroutines module subroutine util_coord_h2b_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from heliocentric to barycentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_h2b_tp (self, cb) Interface → Author David A. Minton Convert test particles from heliocentric to barycentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object module subroutine util_coord_b2h_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from barycentric to heliocentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_b2h_tp (self, cb) Interface → Author David A. Minton Convert test particles from barycentric to heliocentric coordinates (position and velocity) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(in) :: cb Swiftest central body object module subroutine util_coord_vb2vh_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from barycentric to heliocentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_vb2vh_tp (self, vbcb) Interface → Author David A. Minton Convert test particles from barycentric to heliocentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body module subroutine util_coord_vh2vb_pl (self, cb) Interface → Author David A. Minton Convert massive bodies from heliocentric to barycentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_vh2vb_tp (self, vbcb) Interface → Author David A. Minton Convert test particles from heliocentric to barycentric coordinates (velocity only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object real(kind=DP), intent(in), dimension(:) :: vbcb Barycentric velocity of the central body module subroutine util_coord_xh2xb_pl (self, cb) Interface → Author David A. Minton Convert position vectors of massive bodies from heliocentric to barycentric coordinates (position only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_cb ), intent(inout) :: cb Swiftest central body object module subroutine util_coord_xh2xb_tp (self, cb) Interface → Author David A. Minton Convert test particles from heliocentric to barycentric coordinates (position only) Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_cb ), intent(in) :: cb Swiftest central body object","tags":"","loc":"module/s_util_coord.html"},{"title":"s_util_index – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_index~~UsesGraph module~s_util_index s_util_index module~swiftest swiftest module~s_util_index->module~swiftest module~swiftest_classes swiftest_classes module~s_util_index->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_index_eucl_ij_to_k util_index_eucl_k_to_ij util_index_eucl_plpl util_index_eucl_pltp Module Subroutines pure module subroutine util_index_eucl_ij_to_k (n, i, j, k) Interface → Author Jacob R. Elliott and David A. Minton Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions. Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I4B), intent(in) :: i Index of the ith body integer(kind=I4B), intent(in) :: j Index of the jth body integer(kind=I8B), intent(out) :: k Index of the flattened matrix pure module subroutine util_index_eucl_k_to_ij (n, k, i, j) Interface → Author Jacob R. Elliott and David A. Minton Turns k index into i,j indices for use in the Euclidean distance matrix for pl-pl interactions. Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: n Number of bodies integer(kind=I8B), intent(in) :: k Index of the flattened matrix integer(kind=I4B), intent(out) :: i Index of the ith body integer(kind=I4B), intent(out) :: j Index of the jth body module subroutine util_index_eucl_plpl (self, param) Interface → Author Jacob R. Elliott and David A. Minton Turns i,j indices into k index for use in the Euclidean distance matrix for pl-pl interactions for a Swiftest massive body object Read more… Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine util_index_eucl_pltp (self, pl, param) Interface → Author Jacob R. Elliott and David A. Minton Turns i,j indices into k index for use in the Euclidean distance matrix for pl-tp interactions Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_util_index.html"},{"title":"s_util_rescale – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_rescale~~UsesGraph module~s_util_rescale s_util_rescale module~swiftest swiftest module~s_util_rescale->module~swiftest module~swiftest_classes swiftest_classes module~s_util_rescale->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_rescale_system Module Subroutines module subroutine util_rescale_system (self, param, mscale, dscale, tscale) Interface → Author David A. Minton Rescales an nbody system to a new set of units. Inputs are the multipliers on the mass (mscale), distance (dscale), and time units (tscale). \n Rescales all united quantities in the system, as well as the mass conversion factors, gravitational constant, and Einstein's constant in the parameter object. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters. Returns with new values of the scale vactors and GU real(kind=DP), intent(in) :: mscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: dscale Scale factors for mass, distance, and time units, respectively. real(kind=DP), intent(in) :: tscale Scale factors for mass, distance, and time units, respectively.","tags":"","loc":"module/s_util_rescale.html"},{"title":"s_util_version – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_version~~UsesGraph module~s_util_version s_util_version module~swiftest swiftest module~s_util_version->module~swiftest module~swiftest_classes swiftest_classes module~s_util_version->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_version Module Subroutines module subroutine util_version () Interface → Author David A. Minton Print program version information to terminale Read more… Arguments None","tags":"","loc":"module/s_util_version.html"},{"title":"s_util_sort – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_sort~~UsesGraph module~s_util_sort s_util_sort module~swiftest swiftest module~s_util_sort->module~swiftest module~swiftest_classes swiftest_classes module~s_util_sort->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_sort_body util_sort_dp util_sort_index_dp util_sort_i4b util_sort_index_i4b util_sort_sp util_sort_index_sp util_sort_pl util_sort_tp util_sort_rearrange_body util_sort_rearrange_arr_char_string util_sort_rearrange_arr_DP util_sort_rearrange_arr_DPvec util_sort_rearrange_arr_I4B util_sort_rearrange_arr_logical util_sort_rearrange_arr_info util_sort_rearrange_pl util_sort_rearrange_tp Module Subroutines module subroutine util_sort_body (self, sortby, ascending) Interface → Author David A. Minton Sort a Swiftest body structure in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order subroutine util_sort_dp (arr) Author David A. Minton Sort input double precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:) :: arr subroutine util_sort_index_dp (arr, ind) Author David A. Minton Sort input double precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind subroutine util_sort_i4b (arr) Author David A. Minton Sort input integer array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:) :: arr subroutine util_sort_index_i4b (arr, ind) Author David A. Minton Sort input integer array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind subroutine util_sort_sp (arr) Author David A. Minton Sort input single precision array in place into ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(inout), dimension(:) :: arr subroutine util_sort_index_sp (arr, ind) Author David A. Minton Sort input single precision array by index in ascending numerical order using insertion sort.\n This algorithm works well for partially sorted arrays (which is usually the case here) Arguments Type Intent Optional Attributes Name real(kind=SP), intent(in), dimension(:) :: arr integer(kind=I4B), intent(out), dimension(:) :: ind module subroutine util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a Swiftest massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine util_sort_tp (self, sortby, ascending) Interface → Author David A. Minton Sort a Swiftest test particle object  in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine util_sort_rearrange_body (self, ind) Interface → Author David A. Minton Rearrange Swiftest body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) subroutine util_sort_rearrange_arr_char_string (arr, ind, n) Author David A. Minton Rearrange a single array of character string in-place from an index list. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_DP (arr, ind, n) Author David A. Minton Rearrange a single array of DP type in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_DPvec (arr, ind, n) Author David A. Minton Rearrange a single array of (NDIM,n) DP-type vectors in-place from an index list. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_I4B (arr, ind, n) Author David A. Minton Rearrange a single array of integers in-place from an index list. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_logical (arr, ind, n) Author David A. Minton Rearrange a single array of logicals in-place from an index list. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange subroutine util_sort_rearrange_arr_info (arr, ind, n) Author David A. Minton Rearrange a single array of particle information type in-place from an index list. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange module subroutine util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine util_sort_rearrange_tp (self, ind) Interface → Author David A. Minton Rearrange Swiftest massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order)","tags":"","loc":"module/s_util_sort.html"},{"title":"s_util_spill – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_spill~~UsesGraph module~s_util_spill s_util_spill module~swiftest swiftest module~s_util_spill->module~swiftest module~swiftest_classes swiftest_classes module~s_util_spill->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_spill_arr_char_string util_spill_arr_DP util_spill_arr_DPvec util_spill_arr_I4B util_spill_arr_I8B util_spill_arr_info util_spill_arr_logical util_spill_body util_spill_encounter util_spill_pl util_spill_tp Module Subroutines subroutine util_spill_arr_char_string (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_DP (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_DPvec (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(inout), dimension(:,:), allocatable :: discards Array discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_I4B (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_I8B (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I8B), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_info (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not subroutine util_spill_arr_logical (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or no module subroutine util_spill_body (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest generic particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine util_spill_encounter (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest encounter structure from active list to discard list Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest massive body structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine util_spill_tp (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) Swiftest test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardse logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"module/s_util_spill.html"},{"title":"s_util_valid – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_valid~~UsesGraph module~s_util_valid s_util_valid module~swiftest swiftest module~s_util_valid->module~swiftest module~swiftest_classes swiftest_classes module~s_util_valid->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_valid_id_system Module Subroutines module subroutine util_valid_id_system (self, param) Interface → Author David A. Minton Validate massive body and test particle ids\n Subroutine causes program to exit with error if any ids are not unique Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_util_valid.html"},{"title":"s_util_exit – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_exit~~UsesGraph module~s_util_exit s_util_exit module~swiftest swiftest module~s_util_exit->module~swiftest module~swiftest_classes swiftest_classes module~s_util_exit->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_exit Module Subroutines module subroutine util_exit (code) Interface → Author David A. Minton Print termination message and exit program Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: code","tags":"","loc":"module/s_util_exit.html"},{"title":"s_util_fill – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_fill~~UsesGraph module~s_util_fill s_util_fill module~swiftest swiftest module~s_util_fill->module~swiftest module~swiftest_classes swiftest_classes module~s_util_fill->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_fill_arr_char_string util_fill_arr_DP util_fill_arr_DPvec util_fill_arr_I4B util_fill_arr_info util_fill_arr_logical util_fill_body util_fill_pl util_fill_tp Module Subroutines subroutine util_fill_arr_char_string (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of type character strings\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: keeps Array of values to keep character(len=STRMAX), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_DP (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of type DP\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_DPvec (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of DP vectors with shape (NDIM, n)\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: keeps Array of values to keep real(kind=DP), intent(in), dimension(:,:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_I4B (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of type I4B\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: keeps Array of values to keep integer(kind=I4B), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_info (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of particle origin information types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps subroutine util_fill_arr_logical (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of logicals\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: keeps Array of values to keep logical, intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine util_fill_body (self, inserts, lfill_list) Interface → Author David A. Minton Insert new Swiftest generic particle structure into an old one. \n This is the inverse of a spill operation.\n Fill all the common components Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_body ), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new Swiftest massive body structure into an old one. \n This is the inverse of a spill operation.\n Fill components specific to the massive body class Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine util_fill_tp (self, inserts, lfill_list) Interface → Author David A. Minton Insert new Swiftest test particle structure into an old one. \n This is the inverse of a fill operation.\n Spill components specific to the test particle class Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: inserts Swiftest body object to be inserted logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps","tags":"","loc":"module/s_util_fill.html"},{"title":"s_util_resize – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_resize~~UsesGraph module~s_util_resize s_util_resize module~swiftest swiftest module~s_util_resize->module~swiftest module~swiftest_classes swiftest_classes module~s_util_resize->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_resize_arr_char_string util_resize_arr_DP util_resize_arr_DPvec util_resize_arr_I4B util_resize_arr_info util_resize_arr_logical util_resize_body util_resize_encounter util_resize_pl util_resize_tp Module Subroutines subroutine util_resize_arr_char_string (arr, nnew) Author David A. Minton Resizes an array component of type character string. nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_DP (arr, nnew) Author David A. Minton Resizes an array component of double precision type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_DPvec (arr, nnew) Author David A. Minton Resizes an array component of double precision vectors of size (NDIM, n). Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_I4B (arr, nnew) Author David A. Minton Resizes an array component of integer type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_info (arr, nnew) Author David A. Minton Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size subroutine util_resize_arr_logical (arr, nnew) Author David A. Minton Resizes an array component of logical type. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size module subroutine util_resize_body (self, nnew) Interface → Author David A. Minton Checks the current size of a Swiftest body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine util_resize_encounter (self, nnew) Interface → Author David A. Minton Checks the current size of the encounter list against the required size and extends it by a factor of 2 more than requested if it is too small.\n Note: The reason to extend it by a factor of 2 is for performance. When there are many enounters per step, resizing every time you want to add an \n encounter takes significant computational effort. Resizing by a factor of 2 is a tradeoff between performance (fewer resize calls) and memory managment\n Memory usage grows by a factor of 2 each time it fills up, but no more. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list integer(kind=I4B), intent(in) :: nnew New size of list needed module subroutine util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a Swiftest massive body against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine util_resize_tp (self, nnew) Interface → Author David A. Minton Checks the current size of a Swiftest test particle against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: nnew New size neded","tags":"","loc":"module/s_util_resize.html"},{"title":"s_util_copy – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_copy~~UsesGraph module~s_util_copy s_util_copy module~swiftest swiftest module~s_util_copy->module~swiftest module~swiftest_classes swiftest_classes module~s_util_copy->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_copy_encounter util_copy_particle_info util_copy_particle_info_arr Module Subroutines module subroutine util_copy_encounter (self, source) Interface → Author David A. Minton Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into module subroutine util_copy_particle_info (self, source) Interface → Author David A. Minton Copies one set of information object components into another, component-by-component Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self class( swiftest_particle_info ), intent(in) :: source module subroutine util_copy_particle_info_arr (source, dest, idx) Interface → Author David A. Minton Copies contents from an array of one particle information objects to another. Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in), dimension(:) :: source Source object to copy into class( swiftest_particle_info ), intent(inout), dimension(:) :: dest Swiftest body object with particle metadata information object integer(kind=I4B), intent(in), optional dimension(:) :: idx Optional array of indices to draw the source object","tags":"","loc":"module/s_util_copy.html"},{"title":"s_util_minimize_bfgs – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_minimize_bfgs~~UsesGraph module~s_util_minimize_bfgs s_util_minimize_bfgs module~swiftest swiftest module~s_util_minimize_bfgs->module~swiftest module~swiftest_classes swiftest_classes module~s_util_minimize_bfgs->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions util_minimize_bfgs Module Functions module function util_minimize_bfgs (f, N, x0, eps, maxloop, lerr) result(x1) Interface → Author David A. Minton This function implements the Broyden-Fletcher-Goldfarb-Shanno method to determine the minimum of a function of N variables. It recieves as input:\n   f%eval(x) : lambda function object containing the objective function as the eval metho\n   N       : Number of variables of function f\n   x0      : Initial starting value of x\n   eps     : Accuracy of 1 - dimensional minimization at each step\n   maxloop : Maximum number of loops to attempt to find a solution\n The outputs include\n   lerr :  Returns .true. if it could not find the minimum\n Returns\n   x1   :  Final minimum (all 0 if none found)\n   0 = No miniumum found Read more… Arguments Type Intent Optional Attributes Name class(lambda_obj), intent(inout) :: f integer(kind=I4B), intent(in) :: N real(kind=DP), intent(in), dimension(:) :: x0 real(kind=DP), intent(in) :: eps integer(kind=I4B), intent(in) :: maxloop logical, intent(out) :: lerr Return Value real(kind=DP),\n  dimension(:), allocatable","tags":"","loc":"module/s_util_minimize_bfgs.html"},{"title":"s_util_append – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_append~~UsesGraph module~s_util_append s_util_append module~swiftest swiftest module~s_util_append->module~swiftest module~swiftest_classes swiftest_classes module~s_util_append->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines util_append_arr_char_string util_append_arr_DP util_append_arr_DPvec util_append_arr_I4B util_append_arr_info util_append_arr_logical util_append_body util_append_encounter util_append_pl util_append_tp Module Subroutines subroutine util_append_arr_char_string (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of character string type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name character(len=STRMAX), intent(inout), dimension(:), allocatable :: arr Destination array character(len=STRMAX), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_DP (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of double precision type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_DPvec (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of double precision vector type of size (NDIM, n) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout), dimension(:,:), allocatable :: arr Destination array real(kind=DP), intent(in), dimension(:,:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_I4B (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of integer(I4B) onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_info (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of particle information type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( swiftest_particle_info ), intent(inout), dimension(:), allocatable :: arr Destination array type( swiftest_particle_info ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to subroutine util_append_arr_logical (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of logical type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name logical, intent(inout), dimension(:), allocatable :: arr Destination array logical, intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_body (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_encounter (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine util_append_tp (self, source, lsource_mask) Interface → Author David A. Minton Append components from one Swiftest body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_body ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to","tags":"","loc":"module/s_util_append.html"},{"title":"s_util_get_energy_momentum – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_util_get_energy_momentum~~UsesGraph module~s_util_get_energy_momentum s_util_get_energy_momentum module~swiftest swiftest module~s_util_get_energy_momentum->module~swiftest module~swiftest_classes swiftest_classes module~s_util_get_energy_momentum->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines util_get_energy_potential Module Subroutines util_get_energy_momentum_system Subroutines subroutine util_get_energy_potential (npl, nplpl, k_plpl, lmask, GMcb, Gmass, mass, xb, pe) Author David A. Minton Compute total system potential energy Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: npl integer(kind=I8B), intent(in) :: nplpl integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl logical, intent(in), dimension(:) :: lmask real(kind=DP), intent(in) :: GMcb real(kind=DP), intent(in), dimension(:) :: Gmass real(kind=DP), intent(in), dimension(:) :: mass real(kind=DP), intent(in), dimension(:,:) :: xb real(kind=DP), intent(out) :: pe Module Subroutines module subroutine util_get_energy_momentum_system (self, param) Interface → Author David A. Minton Compute total system angular momentum vector and kinetic, potential and total system energy Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_util_get_energy_momentum.html"},{"title":"s_gr – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_gr~~UsesGraph module~s_gr s_gr module~swiftest swiftest module~s_gr->module~swiftest module~swiftest_classes swiftest_classes module~s_gr->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines gr_kick_getaccb_ns_body gr_kick_getacch gr_p4_pos_kick gr_pseudovel2vel gr_pv2vh_body gr_vel2pseudovel gr_vh2pv_body Module Subroutines pure module subroutine gr_kick_getaccb_ns_body (self, system, param) Interface → Author David A. Minton Add relativistic correction acceleration for non-symplectic integrators.\n Based on Quinn et al. (1991) eq. 5 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters pure module subroutine gr_kick_getacch (mu, x, lmask, n, inv_c2, agr) Interface → Author David A. Minton Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Gravitational constant real(kind=DP), intent(in), dimension(:,:) :: x Position vectors logical, intent(in), dimension(:) :: lmask Logical mask indicating which bodies to compute integer(kind=I4B), intent(in) :: n Total number of bodies real(kind=DP), intent(in) :: inv_c2 Inverse speed of light squared: 1 / c**2 real(kind=DP), intent(out), dimension(:,:) :: agr Accelerations pure module subroutine gr_p4_pos_kick (param, x, v, dt) Interface → Author David A. Minton Position kick due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(inout), dimension(:) :: x Position vector real(kind=DP), intent(in), dimension(:) :: v Velocity vector real(kind=DP), intent(in) :: dt Step size pure module subroutine gr_pseudovel2vel (param, mu, xh, pv, vh) Interface → Author David A. Minton Converts the relativistic pseudovelocity back into a veliocentric velocity\n    Based on Saha & Tremaine (1994) Eq. 32 Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: pv Pseudovelocity velocity vector - see Saha & Tremain (1994), eq. (32) real(kind=DP), intent(out), dimension(:) :: vh Heliocentric velocity vector pure module subroutine gr_pv2vh_body (self, param) Interface → Author David A. Minton Wrapper function that converts from pseudovelocity to heliocentric velocity for swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters pure module subroutine gr_vel2pseudovel (param, mu, xh, vh, pv) Interface → Author David A. Minton Converts the heliocentric velocity into a pseudovelocity with relativistic corrections. \n Uses Newton-Raphson method with direct inversion of the Jacobian (yeah, it's slow, but \n this is only done once per run). Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body real(kind=DP), intent(in), dimension(:) :: xh Heliocentric position vector real(kind=DP), intent(in), dimension(:) :: vh Heliocentric velocity vector real(kind=DP), intent(out), dimension(:) :: pv Pseudovelocity vector - see Saha & Tremain (1994), eq. (32) pure module subroutine gr_vh2pv_body (self, param) Interface → Author David A. Minton Wrapper function that converts from heliocentric velocity to pseudovelocity for Swiftest bodies Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_gr.html"},{"title":"s_discard – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_discard~~UsesGraph module~s_discard s_discard module~swiftest swiftest module~s_discard->module~swiftest module~swiftest_classes swiftest_classes module~s_discard->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines discard_cb_tp discard_peri_tp discard_pl_tp discard_pl_close Module Subroutines discard_system discard_pl discard_tp Subroutines subroutine discard_cb_tp (tp, system, param) Author David A. Minton Check to see if test particles should be discarded based on their positions relative to the Sun\n        or because they are unbound from the system Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine discard_peri_tp (tp, system, param) Author David A. Minton Check to see if a test particle should be discarded because its perihelion distance becomes too small Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameterss subroutine discard_pl_tp (tp, system, param) Author David A. Minton Check to see if test particles should be discarded based on their positions relative to the massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: tp Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine discard_pl_close (dx, dv, dt, r2crit, iflag, r2min) Author David A. Minton Check to see if a test particle and massive body are having, or will have within the next time step, an encounter such\n          that the separation distance r is less than some critical radius rcrit (or r 2 < rcrit 2 = r2crit) Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: dx real(kind=DP), intent(in), dimension(:) :: dv real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r2crit integer(kind=I4B), intent(out) :: iflag real(kind=DP), intent(out) :: r2min Module Subroutines module subroutine discard_system (self, param) Interface → Author David A. Minton Calls the discard methods for each body class and then the write method if any discards were detected Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine discard_pl (self, system, param) Interface → Author David A. Minton Placeholder method for discarding massive bodies. This method does nothing except to ensure that the discard flag is set to false. \n  This method is intended to be overridden by more advanced integrators. Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter module subroutine discard_tp (self, system, param) Interface → Author David A. Minton Check to see if particles should be discarded based on their positions relative to the massive bodies Read more… Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameter","tags":"","loc":"module/s_discard.html"},{"title":"s_helio_step – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_step~~UsesGraph module~s_helio_step s_helio_step module~swiftest swiftest module~s_helio_step->module~swiftest module~helio_classes helio_classes module~s_helio_step->module~helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_step_system helio_step_pl helio_step_tp Module Subroutines module subroutine helio_step_system (self, param, t, dt) Interface → Author David A. Minton Step massive bodies and and active test particles ahead in heliocentric coordinates. Read more… Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine helio_step_pl (self, system, param, t, dt) Interface → Author David A. Minton Step massive bodies ahead Democratic Heliocentric method Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_step_tp (self, system, param, t, dt) Interface → Author David A. Minton Step active test particles ahead using Democratic Heliocentric method Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nboody system class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"module/s_helio_step.html"},{"title":"s_helio_setup – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_setup~~UsesGraph module~s_helio_setup s_helio_setup module~swiftest swiftest module~s_helio_setup->module~swiftest module~helio_classes helio_classes module~s_helio_setup->module~helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_setup_initialize_system Module Subroutines module subroutine helio_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize a Helio nbody system from files, converting all heliocentric quantities to barycentric. Arguments Type Intent Optional Attributes Name class( helio_nbody_system ), intent(inout) :: self Helio nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_helio_setup.html"},{"title":"s_helio_gr – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_gr~~UsesGraph module~s_helio_gr s_helio_gr module~swiftest swiftest module~s_helio_gr->module~swiftest module~helio_classes helio_classes module~s_helio_gr->module~helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_gr_kick_getacch_pl helio_gr_kick_getacch_tp helio_gr_p4_pl helio_gr_p4_tp Module Subroutines pure module subroutine helio_gr_kick_getacch_pl (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of massive bodies\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters pure module subroutine helio_gr_kick_getacch_tp (self, param) Interface → Author David A. Minton Compute relativisitic accelerations of test particles\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body particle data structure class(swiftest_parameters), intent(in) :: param Current run configuration parameters pure module subroutine helio_gr_p4_pl (self, param, dt) Interface → Author David A. Minton Position kick to massive bodies due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size pure module subroutine helio_gr_p4_tp (self, param, dt) Interface → Author David A. Minton Position kick to test particles due to p**4 term in the post-Newtonian correction\n    Based on Saha & Tremaine (1994) Eq. 28 Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest particle object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Step size","tags":"","loc":"module/s_helio_gr.html"},{"title":"s_helio_kick – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_kick~~UsesGraph module~s_helio_kick s_helio_kick module~swiftest swiftest module~s_helio_kick->module~swiftest module~helio_classes helio_classes module~s_helio_kick->module~helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_kick_getacch_pl helio_kick_getacch_tp helio_kick_vb_pl helio_kick_vb_tp Module Subroutines module subroutine helio_kick_getacch_pl (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine helio_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of test particles Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine helio_kick_vb_pl (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick barycentric velocities of bodies Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. module subroutine helio_kick_vb_tp (self, system, param, t, dt, lbeg) Interface → Author David A. Minton Kick barycentric velocities of bodies Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Swiftest generic body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not.","tags":"","loc":"module/s_helio_kick.html"},{"title":"s_helio_drift – swiftest","text":"Uses swiftest Ancestors: helio_classes module~~s_helio_drift~~UsesGraph module~s_helio_drift s_helio_drift module~swiftest swiftest module~s_helio_drift->module~swiftest module~helio_classes helio_classes module~s_helio_drift->module~helio_classes module~swiftest->module~helio_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines helio_drift_body helio_drift_pl helio_drift_tp helio_drift_linear_pl helio_drift_linear_tp Module Subroutines module subroutine helio_drift_body (self, system, param, dt) Interface → Author David A. Minton Loop through bodies and call Danby drift routine on democratic heliocentric coordinates Read more… Arguments Type Intent Optional Attributes Name class(swiftest_body), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_drift_pl (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_drift_tp (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a helio_pl structure Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio massive body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine helio_drift_linear_pl (self, cb, dt, lbeg) Interface → Author David A. Minton Perform linear drift of massive bodies due to barycentric momentum of Sun Read more… Arguments Type Intent Optional Attributes Name class( helio_pl ), intent(inout) :: self Helio massive body object class( helio_cb ), intent(inout) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step module subroutine helio_drift_linear_tp (self, cb, dt, lbeg) Interface → Author David A. Minton Perform linear drift of test particles due to barycentric momentum of Sun\n New vectorized version included Read more… Arguments Type Intent Optional Attributes Name class( helio_tp ), intent(inout) :: self Helio test particleb object class( helio_cb ), intent(in) :: cb Helio central body real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Argument that determines whether or not this is the beginning or end of the step","tags":"","loc":"module/s_helio_drift.html"},{"title":"s_io – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_io~~UsesGraph module~s_io s_io module~swiftest swiftest module~s_io->module~swiftest module~swiftest_classes swiftest_classes module~s_io->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions io_read_encounter io_read_hdr Module Functions io_get_args io_get_old_t_final_system io_get_token io_read_frame_body io_read_frame_cb io_read_frame_system Module Subroutines io_conservation_report io_dump_param io_dump_particle_info io_dump_particle_info_base io_dump_base io_dump_system io_param_reader io_param_writer io_read_in_body io_read_in_cb io_read_in_param io_read_in_particle_info io_read_particle_info_system io_toupper io_write_discard io_write_encounter io_write_frame_body io_write_frame_cb io_write_frame_encounter io_write_frame_system io_write_hdr_system Functions function io_read_encounter (t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out, out_type) result(ierr) Author David A. Minton Read close encounter data from input binary files\n     Other than time t, there is no direct file input from this function\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_encounter.f90 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: id1 integer(kind=I4B), intent(out) :: id2 real(kind=DP), intent(out) :: Gmass1 real(kind=DP), intent(out) :: Gmass2 real(kind=DP), intent(out) :: radius1 real(kind=DP), intent(out) :: radius2 real(kind=DP), intent(out), dimension(:) :: xh1 real(kind=DP), intent(out), dimension(:) :: xh2 real(kind=DP), intent(out), dimension(:) :: vh1 real(kind=DP), intent(out), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) function io_read_hdr (iu, t, npl, ntp, out_form, out_type) result(ierr) Author David A. Minton Read frame header from input binary files\n     Function returns read error status (0 = OK, nonzero = ERROR)\n Adapted from David E. Kaufmann's Swifter routine: io_read_hdr.f90\n Adapted from Hal Levison's Swift routine io_read_hdr.f Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu real(kind=DP), intent(out) :: t integer(kind=I4B), intent(out) :: npl integer(kind=I4B), intent(out) :: ntp character(len=*), intent(out) :: out_form character(len=*), intent(in) :: out_type Return Value integer(kind=I4B) Module Functions module function io_get_args (integrator, param_file_name) result(ierr) Interface → Author David A. Minton Reads in the name of the parameter file from command line arguments. Arguments Type Intent Optional Attributes Name integer(kind=I4B) :: integrator Symbolic code of the requested integrator character(len=:), allocatable :: param_file_name Name of the input parameters file Return Value integer(kind=I4B) I/O error code module function io_get_old_t_final_system (self, param) result(old_t_final) Interface → Author David A. Minton Validates the dump file to check whether the dump file initial conditions duplicate the last frame of the binary output. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self class( swiftest_parameters ), intent(in) :: param Return Value real(kind=DP) module function io_get_token (buffer, ifirst, ilast, ierr) result(token) Interface → Author David A. Minton Retrieves a character token from an input string. Here a token is defined as any set of contiguous non-blank characters not \n beginning with or containing \"!\". If \"!\" is present, any remaining part of the buffer including the \"!\" is ignored Read more… Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: buffer Input string buffer integer(kind=I4B), intent(inout) :: ifirst Index of the buffer at which to start the search for a token integer(kind=I4B), intent(out) :: ilast Index of the buffer at the end of the returned token integer(kind=I4B), intent(out) :: ierr Error code Return Value character(len=:),\n  allocatable Returned token string module function io_read_frame_body (self, iu, param) result(ierr) Interface → Author David A. Minton Reads a frame of output of either test particle or massive body data from a binary output file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful module function io_read_frame_cb (self, iu, param) result(ierr) Interface → Author David A. Minton Reads a frame of output of central body data to the binary output file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful module function io_read_frame_system (self, iu, param) result(ierr) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read a frame (header plus records for each massive body and active test particle) from a output binary file Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters Return Value integer(kind=I4B) Error code: returns 0 if the read is successful Module Subroutines module subroutine io_conservation_report (self, param, lterminal) Interface → Author The Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Reports the current state of energy, mass, and angular momentum conservation in a run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Input colleciton of user-defined parameters logical, intent(in) :: lterminal Indicates whether to output information to the terminal screen module subroutine io_dump_param (self, param_file_name) Interface → Author David A. Minton Dump integration parameters to file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Output collection of parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) module subroutine io_dump_particle_info (self, iu) Interface → Author David A. Minton Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(in) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number module subroutine io_dump_particle_info_base (self, param, idx) Interface → Author David A. Minton Dumps the particle information data to a file. \n Pass a list of array indices for test particles (tpidx) and/or massive bodies (plidx) to append Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object (can be cb, pl, or tp) class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters integer(kind=I4B), intent(in), optional dimension(:) :: idx Array of test particle indices to append to the particle file module subroutine io_dump_base (self, param) Interface → Author David A. Minton Dump massive body data to files Read more… Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(inout) :: self Swiftest base object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_dump_system (self, param) Interface → Author David A. Minton Dumps the state of the system to files in case the simulation is interrupted.\n As a safety mechanism, there are two dump files that are written in alternating order\n so that if a dump file gets corrupted during writing, the user can restart from the older one. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_param_reader (self, unit, iotype, v_list, iostat, iomsg) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read in parameters for the integration\n Currently this procedure does not work in user-defined derived-type input mode \n    e.g. read(unit,'(DT)') param \n as the newline characters are ignored in the input file when compiled in ifort. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine io_param_writer (self, unit, iotype, v_list, iostat, iomsg) Interface → Author David A. Minton Dump integration parameters to file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine io_read_in_body (self, param) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read in either test particle or massive body data Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest particle object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_read_in_cb (self, param) Interface → Author David A. Minton Reads in central body data Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(inout) :: self class( swiftest_parameters ), intent(inout) :: param module subroutine io_read_in_param (self, param_file_name) Interface → Author David A. Minton Read in parameters for the integration Read more… Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(inout) :: self Current run configuration parameters character(len=*), intent(in) :: param_file_name Parameter input file name (i.e. param.in) module subroutine io_read_in_particle_info (self, iu) Interface → Author David A. Minton Reads in particle information object information from an open file unformatted file Arguments Type Intent Optional Attributes Name class( swiftest_particle_info ), intent(inout) :: self Particle metadata information object integer(kind=I4B), intent(in) :: iu Open file unit number module subroutine io_read_particle_info_system (self, param) Interface → Author David A. Minton Reads an old particle information file for a restartd run Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_toupper (string) Interface → Author David A. Minton Convert string to uppercase Read more… Arguments Type Intent Optional Attributes Name character(len=*), intent(inout) :: string String to make upper case module subroutine io_write_discard (self, param) Interface → Author David A. Minton Write out information about discarded test particle Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_write_encounter (self, pl, encbody, param) Interface → Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(in) :: self Swiftest encounter list object class( swiftest_pl ), intent(in) :: pl Swiftest massive body object class( swiftest_body ), intent(in) :: encbody Encountering body - Swiftest generic body object (pl or tp) class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine io_write_frame_body (self, iu, param) Interface → Author David A. Minton Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(in) :: self Swiftest particle object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine io_write_frame_cb (self, iu, param) Interface → Author David A. Minton Write a frame of output of central body data to the binary output file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_cb ), intent(in) :: self Swiftest central body object integer(kind=I4B), intent(inout) :: iu Unit number for the output file to write frame to class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine io_write_frame_encounter (iu, t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2) Interface → Author David A. Minton Write a single frame of close encounter data to output binary files Read more… Arguments Type Intent Optional Attributes Name integer(kind=I4B), intent(in) :: iu Open file unit number real(kind=DP), intent(in) :: t Time of encounter integer(kind=I4B), intent(in) :: id1 ids of the two encountering bodies integer(kind=I4B), intent(in) :: id2 ids of the two encountering bodies real(kind=DP), intent(in) :: Gmass1 G*mass of the two encountering bodies real(kind=DP), intent(in) :: Gmass2 G*mass of the two encountering bodies real(kind=DP), intent(in) :: radius1 Radii of the two encountering bodies real(kind=DP), intent(in) :: radius2 Radii of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh1 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: xh2 Heliocentric position vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh1 Heliocentric velocity vectors of the two encountering bodies real(kind=DP), intent(in), dimension(:) :: vh2 Heliocentric velocity vectors of the two encountering bodies module subroutine io_write_frame_system (self, param) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Write a frame (header plus records for each massive body and active test particle) to output binary file\n There is no direct file output from this subroutine Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine io_write_hdr_system (self, iu, param) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Write frame header to output binary file Read more… Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object integer(kind=I4B), intent(inout) :: iu Output file unit number class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_io.html"},{"title":"s_setup – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_setup~~UsesGraph module~s_setup s_setup module~swiftest swiftest module~s_setup->module~swiftest module~swiftest_classes swiftest_classes module~s_setup->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines setup_construct_system setup_encounter setup_initialize_particle_info_system setup_initialize_system setup_body setup_pl setup_tp Module Subroutines module subroutine setup_construct_system (system, param) Interface → Author David A. Minton Constructor for a Swiftest nbody system. Creates the nbody system object based on the user-input integrator Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout), allocatable :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Swiftest parameters module subroutine setup_encounter (self, n) Interface → Author David A. Minton A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( swiftest_encounter ), intent(inout) :: self Swiftest encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for module subroutine setup_initialize_particle_info_system (self, param) Interface → Author David A. Minton Setup up particle information metadata from initial conditions Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine setup_initialize_system (self, param) Interface → Author David A. Minton Wrapper method to initialize a basic Swiftest nbody system from files Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(inout) :: self Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine setup_body (self, n, param) Interface → Author David A. Minton Constructor for base Swiftest particle class. Allocates space for all particles and\n initializes all components with a value.\n Note: Timing tests indicate that (NDIM, n) is more efficient than (NDIM, n) Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest generic body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine setup_pl (self, n, param) Interface → Author David A. Minton Constructor for base Swiftest massive body class. Allocates space for all particles and\n initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(inout) :: self Swiftest massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine setup_tp (self, n, param) Interface → Author David A. Minton Constructor for base Swiftest test particle particle class. Allocates space for \n all particles and initializes all components with a value. \n Call allocation method for parent class\n The parent class here is the abstract swiftest_body class, so we can't use the type-bound procedure Arguments Type Intent Optional Attributes Name class( swiftest_tp ), intent(inout) :: self Swiftest test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter","tags":"","loc":"module/s_setup.html"},{"title":"s_user_kick_getacch – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~s_user_kick_getacch~~UsesGraph module~s_user_kick_getacch s_user_kick_getacch module~swiftest swiftest module~s_user_kick_getacch->module~swiftest module~swiftest_classes swiftest_classes module~s_user_kick_getacch->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines user_kick_getacch_body Module Subroutines module subroutine user_kick_getacch_body (self, system, param, t, lbeg) Interface → Author David A. Minton Add user-supplied heliocentric accelerations to planets. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest massive body particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody_system_object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters user parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the ste","tags":"","loc":"module/s_user_kick_getacch.html"},{"title":"drift_implementation – swiftest","text":"Uses swiftest Ancestors: swiftest_classes module~~drift_implementation~~UsesGraph module~drift_implementation drift_implementation module~swiftest swiftest module~drift_implementation->module~swiftest module~swiftest_classes swiftest_classes module~drift_implementation->module~swiftest_classes module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables E2MAX DM2MAX E2DM2MAX DANBYB NLAG1 NLAG2 Subroutines drift_dan drift_kepmd drift_kepu drift_kepu_fchk drift_kepu_guess drift_kepu_lag drift_kepu_new drift_kepu_p3solve drift_kepu_stumpff Module Subroutines drift_body drift_all drift_one Variables Type Visibility Attributes Name Initial real(kind=DP), private, parameter :: E2MAX = 0.36_DP Integration control parameters: real(kind=DP), private, parameter :: DM2MAX = 0.16_DP real(kind=DP), private, parameter :: E2DM2MAX = 0.0016_DP real(kind=DP), private, parameter :: DANBYB = 1.0E-13_DP integer(kind=I2B), private, parameter :: NLAG1 = 50 integer(kind=I2B), private, parameter :: NLAG2 = 40 Subroutines pure subroutine drift_dan (mu, x0, v0, dt0, iflag) Author David A. Minton Perform Kepler drift, solving Kepler's equation in appropriate variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu real(kind=DP), intent(inout), dimension(:) :: x0 real(kind=DP), intent(inout), dimension(:) :: v0 real(kind=DP), intent(in) :: dt0 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepmd (dm, es, ec, x, s, c) Author David A. Minton Solve Kepler's equation in difference form for an ellipse for small input dm and eccentricity\n    Original disclaimer: built for speed, does not check how well the original equation is solved\n    Can do that in calling routine by checking how close (x - ec s + es (1.0 - c) - dm) is to zero Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dm real(kind=DP), intent(in) :: es real(kind=DP), intent(in) :: ec real(kind=DP), intent(out) :: x real(kind=DP), intent(out) :: s real(kind=DP), intent(out) :: c pure subroutine drift_kepu (dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Author David A. Minton Solve Kepler's equation in universal variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_fchk (dt, r0, mu, alpha, u, s, f) Author David A. Minton Computes the value of f, the function whose root we are trying to find in universal variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(in) :: s real(kind=DP), intent(out) :: f pure subroutine drift_kepu_guess (dt, r0, mu, alpha, u, s) Author David A. Minton Compute initial guess for solving Kepler's equation using universal variables Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s pure subroutine drift_kepu_lag (s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Author David A. Minton Solve Kepler's equation in universal variables using Laguerre's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 178 - 180. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_new (s, dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag) Author David A. Minton Solve Kepler's equation in universal variables using Newton's method\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 174 - 175. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: s real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: fp real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_p3solve (dt, r0, mu, alpha, u, s, iflag) Author David A. Minton Computes real root of cubic involved in setting initial guess for solving Kepler's equation in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 177 - 178. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: dt real(kind=DP), intent(in) :: r0 real(kind=DP), intent(in) :: mu real(kind=DP), intent(in) :: alpha real(kind=DP), intent(in) :: u real(kind=DP), intent(out) :: s integer(kind=I4B), intent(out) :: iflag pure subroutine drift_kepu_stumpff (x, c0, c1, c2, c3) Author David A. Minton Compute Stumpff functions needed for Kepler drift in universal variables\n      Reference: Danby, J. M. A. 1988. Fundamentals of Celestial Mechanics, (Willmann-Bell, Inc.), 171 - 172. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(inout) :: x real(kind=DP), intent(out) :: c0 real(kind=DP), intent(out) :: c1 real(kind=DP), intent(out) :: c2 real(kind=DP), intent(out) :: c3 Module Subroutines module subroutine drift_body (self, system, param, dt) Interface → Author David A. Minton Loop bodies and call Danby drift routine on the heliocentric position and velocities. Read more… Arguments Type Intent Optional Attributes Name class( swiftest_body ), intent(inout) :: self Swiftest test particle data structure class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine drift_all (mu, x, v, n, param, dt, lmask, iflag) Interface → Author David A. Minton Loop bodies and call Danby drift routine on all bodies for the given position and velocity vector. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: mu Vector of gravitational constants real(kind=DP), intent(inout), dimension(:,:) :: x Position and velocity vectors real(kind=DP), intent(inout), dimension(:,:) :: v Position and velocity vectors integer(kind=I4B), intent(in) :: n number of bodies class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize logical, intent(in), dimension(:) :: lmask Logical mask of size self%nbody that determines which bodies to drift. integer(kind=I4B), intent(out), dimension(:) :: iflag Vector of error flags. 0 means no problem pure elemental module subroutine drift_one (mu, px, py, pz, vx, vy, vz, dt, iflag) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Perform Danby drift for one body, redoing drift with smaller substeps if original accuracy is insufficient Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: mu G * (Mcb + m), G = gravitational constant, Mcb = mass of central body, m = mass of body to drift real(kind=DP), intent(inout) :: px Position and velocity of body to drift real(kind=DP), intent(inout) :: py Position and velocity of body to drift real(kind=DP), intent(inout) :: pz Position and velocity of body to drift real(kind=DP), intent(inout) :: vx Position and velocity of body to drift real(kind=DP), intent(inout) :: vy Position and velocity of body to drift real(kind=DP), intent(inout) :: vz Position and velocity of body to drift real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(out) :: iflag iflag : error status flag for Danby drift (0 = OK, nonzero = ERROR)","tags":"","loc":"module/drift_implementation.html"},{"title":"s_symba_util – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_util~~UsesGraph module~s_symba_util s_symba_util module~swiftest swiftest module~s_symba_util->module~swiftest module~symba_classes symba_classes module~s_symba_util->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_util_append_arr_kin symba_util_append_encounter symba_util_append_pl symba_util_append_merger symba_util_append_tp symba_util_copy_encounter symba_util_fill_arr_kin symba_util_fill_pl symba_util_fill_tp symba_util_index_eucl_plpl symba_util_peri_pl symba_util_rearray_pl symba_util_reset_kinship symba_util_resize_arr_kin symba_util_resize_merger symba_util_resize_pl symba_util_resize_tp symba_util_sort_pl symba_util_sort_tp symba_util_sort_rearrange_arr_kin symba_util_sort_rearrange_pl symba_util_sort_rearrange_tp symba_util_spill_arr_kin symba_util_spill_pl symba_util_spill_encounter symba_util_spill_tp Module Subroutines subroutine symba_util_append_arr_kin (arr, source, nold, nsrc, lsource_mask) Author David A. Minton Append a single array of kinship type onto another. If the destination array is not allocated, or is not big enough, this will allocate space for it. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array type( symba_kinship ), intent(in), dimension(:), allocatable :: source Array to append integer(kind=I4B), intent(in) :: nold Extend of the old array and the source array, respectively integer(kind=I4B), intent(in) :: nsrc Extend of the old array and the source array, respectively logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_encounter (self, source, lsource_mask) Interface → Author David A. Minton Append components from one encounter list (pl-pl or pl-tp) body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA encounter list object class( swiftest_encounter ), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_merger (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_append_tp (self, source, lsource_mask) Interface → Author David A. Minton Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine symba_util_copy_encounter (self, source) Interface → Author David A. Minton Copies elements from the source encounter list into self. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self Encounter list class( swiftest_encounter ), intent(in) :: source Source object to copy into subroutine symba_util_fill_arr_kin (keeps, inserts, lfill_list) Author David A. Minton Performs a fill operation on a single array of particle kinship types\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(in), dimension(:), allocatable :: inserts Array of values to insert into keep logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine symba_util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA masive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine symba_util_fill_tp (self, inserts, lfill_list) Interface → Author David A. Minton Insert new SyMBA test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine symba_util_index_eucl_plpl (self, param) Interface → Author Jacob R. Elliott and David A. Minton Turns i,j indices into k index for use in the Euclidean distance matrix. This also sets the lmtiny flag and computes the\n number of interactions that excludes semi-interacting bodies with each other (Gmass < GMTINY).\n This method will also sort the bodies in descending order by Mass Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine symba_util_peri_pl (self, system, param) Interface → Author David A. Minton Determine system pericenter passages for planets in SyMBA Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine symba_util_rearray_pl (self, system, param) Interface → Author the Purdue Swiftest Team -  David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Clean up the massive body structures to remove discarded bodies and add new bodies Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class( symba_nbody_system ), intent(inout) :: system Swiftest nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters module subroutine symba_util_reset_kinship (self, idx) Interface → Author David A. Minton Resets the kinship status of bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: idx Index array of bodies to reset subroutine symba_util_resize_arr_kin (arr, nnew) Author David A. Minton Resizes an array component of type character string. Array will only be resized if has previously been allocated. Passing nnew = 0 will deallocate. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Array to resize integer(kind=I4B), intent(in) :: nnew New size module subroutine symba_util_resize_merger (self, nnew) Interface → Author David A. Minton Checks the current size of a SyMBA merger list against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine symba_util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a SyMBA massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine symba_util_resize_tp (self, nnew) Interface → Author David A. Minton Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine symba_util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a SyMBA massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine symba_util_sort_tp (self, sortby, ascending) Interface → Author David A. Minton Sort a SyMBA test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order subroutine symba_util_sort_rearrange_arr_kin (arr, ind, n) Author David A. Minton Rearrange a single array of particle kinship type in-place from an index list. Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: arr Destination array integer(kind=I4B), intent(in), dimension(:) :: ind Index to rearrange against integer(kind=I4B), intent(in) :: n Number of elements in arr and ind to rearrange module subroutine symba_util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange SyMBA massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine symba_util_sort_rearrange_tp (self, ind) Interface → Author David A. Minton Rearrange SyMBA test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) subroutine symba_util_spill_arr_kin (keeps, discards, lspill_list, ldestructive) Author David A. Minton Performs a spill operation on a single array of particle kinships\n This is the inverse of a spill operation Arguments Type Intent Optional Attributes Name type( symba_kinship ), intent(inout), dimension(:), allocatable :: keeps Array of values to keep type( symba_kinship ), intent(inout), dimension(:), allocatable :: discards Array of discards logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discardss logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not module subroutine symba_util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) SyMBA massive body particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine symba_util_spill_encounter (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) SyMBA encounter structure from active list to discard list\n Note: Because the symba_plplenc currently does not contain any additional variable components, this method can recieve it as an input as well. Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list class( swiftest_encounter ), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list module subroutine symba_util_spill_tp (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) SyMBA test particle structure from active list to discard list\n Adapted from David E. Kaufmann's Swifter routine whm_discard_spill.f90\n Spill all the common components Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter body by removing the discard list","tags":"","loc":"module/s_symba_util.html"},{"title":"s_symba_collision – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_collision~~UsesGraph module~s_symba_collision s_symba_collision module~swiftest swiftest module~s_symba_collision->module~swiftest module~symba_classes symba_classes module~s_symba_collision->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Functions symba_collision_check_one symba_collision_consolidate_colliders Subroutines symba_collision_collider_message symba_collision_mergeaddsub Module Functions symba_collision_casedisruption symba_collision_casehitandrun symba_collision_casemerge symba_collision_check_encounter Module Subroutines symba_collision_encounter_extract_collisions symba_collision_make_colliders_pl symba_collision_resolve_fragmentations symba_collision_resolve_mergers symba_collision_resolve_plplenc symba_collision_resolve_pltpenc Functions pure elemental function symba_collision_check_one (xr, yr, zr, vxr, vyr, vzr, Gmtot, rlim, dt, lvdotr) result(lcollision) Author David A. Minton Check for a merger between a single pair of particles Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative position vector components real(kind=DP), intent(in) :: yr Relative position vector components real(kind=DP), intent(in) :: zr Relative position vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: Gmtot Sum of G*mass of colliding bodies real(kind=DP), intent(in) :: rlim Collision limit - Typically the sum of the radii of colliding bodies real(kind=DP), intent(in) :: dt Step size logical, intent(in) :: lvdotr Logical flag indicating that these two bodies are approaching in the current substep Return Value logical Logical flag indicating whether these two bodies will collide or not function symba_collision_consolidate_colliders (pl, cb, param, idx_parent, colliders) result(lflag) Author David A. Minton Loops through the pl-pl collision list and groups families together by index. Outputs the indices of all colliders%idx members, \n and pairs of quantities (x and v vectors, mass, radius, L_spin, and Ip) that can be used to resolve the collisional outcome. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class( symba_cb ), intent(inout) :: cb SyMBA central body object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions integer(kind=I4B), intent(inout), dimension(2) :: idx_parent Index of the two bodies considered the \"parents\" of the collision class( fraggle_colliders ), intent(out) :: colliders Return Value logical Logical flag indicating whether a colliders%idx was successfully created or not Subroutines subroutine symba_collision_collider_message (pl, collidx, collider_message) Author David A. Minton Prints a nicely formatted message about which bodies collided, including their names and ids.\n This subroutine appends the body names and ids to an input message. Arguments Type Intent Optional Attributes Name class(swiftest_pl), intent(in) :: pl Swiftest massive body object integer(kind=I4B), intent(in), dimension(:) :: collidx Index of collisional colliders%idx members character(len=*), intent(inout) :: collider_message The message to print to the screen. subroutine symba_collision_mergeaddsub (system, param, colliders, frag, status) Author David A. Minton Fills the pl_discards and pl_adds with removed and added bodies Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object integer(kind=I4B), intent(in) :: status Status flag to assign to adds Module Functions module function symba_collision_casedisruption (system, param, colliders, frag) result(status) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Create the fragments resulting from a non-catastrophic disruption collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome module function symba_collision_casehitandrun (system, param, colliders, frag) result(status) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Create the fragments resulting from a non-catastrophic hit-and-run collision Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcom module function symba_collision_casemerge (system, param, colliders, frag) result(status) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Merge massive bodies. Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragmentation system object Return Value integer(kind=I4B) Status flag assigned to this outcome module function symba_collision_check_encounter (self, system, param, t, dt, irec) result(lany_collision) Interface → Author David A. Minton Check for merger between massive bodies and test particles in SyMBA Read more… Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if cany pair of encounters resulted in a collision Module Subroutines module subroutine symba_collision_encounter_extract_collisions (self, system, param) Interface → Author David A. Minton Processes the pl-pl encounter list remove only those encounters that led to a collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine symba_collision_make_colliders_pl (self, idx) Interface → Author Jennifer L.L. Pouplin, Carlisle A. wishard, and David A. Minton When a single body is involved in more than one collision in a single step, it becomes part of a colliders%idx.\n The largest body involved in a multi-body collision is the \"parent\" and all bodies that collide with it are its \"children,\"\n including those that collide with the children. Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in), dimension(2) :: idx Array holding the indices of the two bodies involved in the collision module subroutine symba_collision_resolve_fragmentations (self, system, param) Interface → Author David A. Minton Process list of collisions, determine the collisional regime, and then create fragments. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions module subroutine symba_collision_resolve_mergers (self, system, param) Interface → Author David A. Minton Process list of collisions and merge colliding bodies together. Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions module subroutine symba_collision_resolve_plplenc (self, system, param, t, dt, irec) Interface → Author David A. Minton Process the pl-pl collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_plplenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level module subroutine symba_collision_resolve_pltpenc (self, system, param, t, dt, irec) Interface → Author David A. Minton Process the pl-tp collision list, then modifiy the massive bodies based on the outcome of the collision Arguments Type Intent Optional Attributes Name class( symba_pltpenc ), intent(inout) :: self SyMBA pl-pl encounter list class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters with SyMBA additions real(kind=DP), intent(in) :: t Current simulation tim real(kind=DP), intent(in) :: dt Current simulation step size integer(kind=I4B), intent(in) :: irec Current recursion level","tags":"","loc":"module/s_symba_collision.html"},{"title":"s_symba_setup – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_setup~~UsesGraph module~s_symba_setup s_symba_setup module~swiftest swiftest module~s_symba_setup->module~swiftest module~symba_classes symba_classes module~s_symba_setup->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_setup_initialize_system symba_setup_merger symba_setup_pl symba_setup_encounter symba_setup_tp Module Subroutines module subroutine symba_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize an SyMBA nbody system from files and sets up the planetocentric structures.\n This subroutine will also sort the massive bodies in descending order by mass Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters module subroutine symba_setup_merger (self, n, param) Interface → Author David A. Minton Allocate SyMBA test particle structure Read more… Arguments Type Intent Optional Attributes Name class( symba_merger ), intent(inout) :: self SyMBA merger list object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine symba_setup_pl (self, n, param) Interface → Author David A. Minton Allocate SyMBA test particle structure Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter module subroutine symba_setup_encounter (self, n) Interface → Author David A. Minton A constructor that sets the number of encounters and allocates and initializes all arrays Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-tp encounter structure integer(kind=I4B), intent(in) :: n Number of encounters to allocate space for module subroutine symba_setup_tp (self, n, param) Interface → Author David A. Minton Allocate WHM test particle structure Read more… Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class( swiftest_parameters ), intent(in) :: param Current run configuration parameter","tags":"","loc":"module/s_symba_setup.html"},{"title":"s_symba_kick – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_kick~~UsesGraph module~s_symba_kick s_symba_kick module~swiftest swiftest module~s_symba_kick->module~swiftest module~symba_classes symba_classes module~s_symba_kick->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_kick_getacch_int_pl symba_kick_getacch_pl symba_kick_getacch_tp symba_kick_encounter Module Subroutines module subroutine symba_kick_getacch_int_pl (self) Interface → Author David A. Minton Compute direct cross (third) term heliocentric accelerations of massive bodies, with no mutual interactions between bodies below GMTINY Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self module subroutine symba_kick_getacch_pl (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of massive bodies Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA massive body particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine symba_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute heliocentric accelerations of test particles Read more… Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step module subroutine symba_kick_encounter (self, system, dt, irec, sgn) Interface → Author David A. Minton Kick barycentric velocities of massive bodies and ACTIVE test particles within SyMBA recursion.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types Read more… Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(in) :: self SyMBA pl-tp encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level integer(kind=I4B), intent(in) :: sgn sign to be applied to acceleration","tags":"","loc":"module/s_symba_kick.html"},{"title":"s_symba_encounter_check – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_encounter_check~~UsesGraph module~s_symba_encounter_check s_symba_encounter_check module~swiftest swiftest module~s_symba_encounter_check->module~swiftest module~symba_classes symba_classes module~s_symba_encounter_check->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines symba_encounter_check_all Module Functions symba_encounter_check_pl symba_encounter_check symba_encounter_check_tp Module Subroutines symba_encounter_check_one Subroutines subroutine symba_encounter_check_all (nplplm, k_plpl, x, v, rhill, dt, irec, lencounter, loc_lvdotr) Author David A. Minton Check for encounters between massive bodies. Split off from the main subroutine for performance Arguments Type Intent Optional Attributes Name integer(kind=I8B), intent(in) :: nplplm integer(kind=I4B), intent(in), dimension(:,:) :: k_plpl real(kind=DP), intent(in), dimension(:,:) :: x real(kind=DP), intent(in), dimension(:,:) :: v real(kind=DP), intent(in), dimension(:) :: rhill real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out), dimension(:) :: lencounter logical, intent(out), dimension(:) :: loc_lvdotr Module Functions module function symba_encounter_check_pl (self, system, dt, irec) result(lany_encounter) Interface → Author David A. Minton Check for an encounter between massive bodies. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter module function symba_encounter_check (self, system, dt, irec) result(lany_encounter) Interface → Author David A. Minton Check for an encounter between test particles and massive bodies in the pltpenc list.\n Note: This method works for the polymorphic symba_pltpenc and symba_plplenc types. Read more… Arguments Type Intent Optional Attributes Name class( symba_encounter ), intent(inout) :: self SyMBA pl-pl encounter list object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter module function symba_encounter_check_tp (self, system, dt, irec) result(lany_encounter) Interface → Author David A. Minton Check for an encounter between test particles and massive bodies. Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object real(kind=DP), intent(in) :: dt step size integer(kind=I4B), intent(in) :: irec Current recursion level Return Value logical Returns true if there is at least one close encounter Module Subroutines pure module subroutine symba_encounter_check_one (xr, yr, zr, vxr, vyr, vzr, rhill1, rhill2, dt, irec, lencounter, lvdotr) Interface → Author David A. Minton Check for an encounter. Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr real(kind=DP), intent(in) :: yr real(kind=DP), intent(in) :: zr real(kind=DP), intent(in) :: vxr real(kind=DP), intent(in) :: vyr real(kind=DP), intent(in) :: vzr real(kind=DP), intent(in) :: rhill1 real(kind=DP), intent(in) :: rhill2 real(kind=DP), intent(in) :: dt integer(kind=I4B), intent(in) :: irec logical, intent(out) :: lencounter logical, intent(out) :: lvdotr","tags":"","loc":"module/s_symba_encounter_check.html"},{"title":"s_symba_io – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_io~~UsesGraph module~s_symba_io s_symba_io module~swiftest swiftest module~s_symba_io->module~swiftest module~symba_classes symba_classes module~s_symba_io->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_io_param_reader symba_io_param_writer symba_io_write_discard Module Subroutines module subroutine symba_io_param_reader (self, unit, iotype, v_list, iostat, iomsg) Interface → Author The Purdue Swiftest Team - David A. Minton, Carlisle A. Wishard, Jennifer L.L. Pouplin, and Jacob R. Elliott Read in parameters specific to the SyMBA integrator, then calls the base io_param_reader. Read more… Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(inout) :: self Collection of parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) The first element passes the integrator code to the reader integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine symba_io_param_writer (self, unit, iotype, v_list, iostat, iomsg) Interface → Author David A. Minton Dump integration parameters specific to SyMBA to file and then call the base io_param_writer method. Read more… Arguments Type Intent Optional Attributes Name class( symba_parameters ), intent(in) :: self Collection of SyMBA parameters integer, intent(in) :: unit File unit number character(len=*), intent(in) :: iotype Dummy argument passed to the  input/output procedure contains the text from the char-literal-constant, prefixed with DT. \n    If you do not include a char-literal-constant, the iotype argument contains only DT. integer, intent(in) :: v_list (:) Not used in this procedure integer, intent(out) :: iostat IO status code character(len=*), intent(inout) :: iomsg Message to pass if iostat /= 0 module subroutine symba_io_write_discard (self, param) Interface → Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_symba_io.html"},{"title":"s_symba_discard – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_discard~~UsesGraph module~s_symba_discard s_symba_discard module~swiftest swiftest module~s_symba_discard->module~swiftest module~symba_classes symba_classes module~s_symba_discard->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines symba_discard_cb_pl symba_discard_conserve_mtm symba_discard_nonplpl symba_discard_nonplpl_conservation symba_discard_peri_pl Module Subroutines symba_discard_pl Subroutines subroutine symba_discard_cb_pl (pl, system, param) Author David A. Minton Check to see if planets should be discarded based on their positions relative to the central body.\n If a body gets flagged here when it has also been previously flagged for a collision with another massive body,\n its collisional status will be revoked. Discards due to colliding with or escaping the central body take precedence \n over pl-pl collisions Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine symba_discard_conserve_mtm (pl, system, param, ipl, lescape_body) Author David A. Minton Conserves system momentum when a body is lost from the system or collides with central body Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl class( symba_nbody_system ), intent(inout) :: system class( symba_parameters ), intent(inout) :: param integer(kind=I4B), intent(in) :: ipl logical, intent(in) :: lescape_body subroutine symba_discard_nonplpl (pl, system, param) Author David A. Minton Check to see if planets should be discarded based on their positions or because they are unbound Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters subroutine symba_discard_nonplpl_conservation (pl, system, param) Author David A. Minton If there are any bodies that are removed due to either colliding with the central body or escaping the systme,\n we need to track the conserved quantities with the system bookkeeping terms. Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA test particle object class( symba_nbody_system ), intent(inout) :: system SyMBA nbody system object class( symba_parameters ), intent(inout) :: param Current run configuration parameters subroutine symba_discard_peri_pl (pl, system, param) Author David A. Minton Check to see if a test particle should be discarded because its perihelion distance becomes too small Read more… Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: pl SyMBA massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters Module Subroutines module subroutine symba_discard_pl (self, system, param) Interface → Author David A. Minton Call the various flavors of discards for massive bodies in SyMBA runs, including discards due to colliding with the central body or escaping the system Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self SyMBA test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_symba_discard.html"},{"title":"s_symba_step – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_step~~UsesGraph module~s_symba_step s_symba_step module~swiftest swiftest module~s_symba_step->module~swiftest module~symba_classes symba_classes module~s_symba_step->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_step_system symba_step_interp_system symba_step_set_recur_levels_system symba_step_recur_system symba_step_reset_system Module Subroutines module subroutine symba_step_system (self, param, t, dt) Interface → Author David A. Minton Step planets and active test particles ahead in democratic heliocentric coordinates, descending the recursive\n   branch if necessary to handle possible close encounters Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine symba_step_interp_system (self, param, t, dt) Interface → Author David A. Minton Step planets and active test particles ahead in democratic heliocentric coordinates, calling the recursive\n         subroutine to descend to the appropriate level to handle close encounters Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize module subroutine symba_step_set_recur_levels_system (self, ireci) Interface → Author David A. Minton Resets pl, tp,and encounter structures at the start of a new step Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object integer(kind=I4B), intent(in) :: ireci Input recursion level recursive module subroutine symba_step_recur_system (self, param, t, ireci) Interface → Author David A. Minton Step interacting planets and active test particles ahead in democratic heliocentric coordinates at the current\n         recursion level, if applicable, and descend to the next deeper level if necessarys Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: ireci input recursion level module subroutine symba_step_reset_system (self, param) Interface → Author David A. Minton Resets pl, tp,and encounter structures at the start of a new step Read more… Arguments Type Intent Optional Attributes Name class( symba_nbody_system ), intent(inout) :: self SyMBA nbody system object class( symba_parameters ), intent(in) :: param Current run configuration parameters with SyMBA additions","tags":"","loc":"module/s_symba_step.html"},{"title":"s_symba_drift – swiftest","text":"Uses swiftest Ancestors: symba_classes module~~s_symba_drift~~UsesGraph module~s_symba_drift s_symba_drift module~swiftest swiftest module~s_symba_drift->module~swiftest module~symba_classes symba_classes module~s_symba_drift->module~symba_classes module~swiftest->module~symba_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines symba_drift_pl symba_drift_tp Module Subroutines module subroutine symba_drift_pl (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_pl ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize module subroutine symba_drift_tp (self, system, param, dt) Interface → Author David A. Minton Wrapper function used to call the body drift routine from a symba_pl structure Arguments Type Intent Optional Attributes Name class( symba_tp ), intent(inout) :: self Helio massive body object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: dt Stepsize","tags":"","loc":"module/s_symba_drift.html"},{"title":"s_netcdf – swiftest","text":"Uses swiftest netcdf Ancestors: swiftest_classes module~~s_netcdf~~UsesGraph module~s_netcdf s_netcdf module~swiftest swiftest module~s_netcdf->module~swiftest module~swiftest_classes swiftest_classes module~s_netcdf->module~swiftest_classes netcdf netcdf module~s_netcdf->netcdf module~swiftest->module~swiftest_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~swiftest_classes module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~swiftest_classes module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines check Module Subroutines netcdf_close netcdf_initialize_output netcdf_open netcdf_write_frame_base netcdf_write_particle_info_base netcdf_write_hdr_system Subroutines subroutine check (status) Author Carlisle A. Wishard, Dana Singh, and David A. Minton Checks the status of all NetCDF operations to catch errors Arguments Type Intent Optional Attributes Name integer, intent(in) :: status Module Subroutines module subroutine netcdf_close (self, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Closes a NetCDF file Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_initialize_output (self, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Initialize a NetCDF file system and defines all variables.\n Create the new output file, deleting any previously existing output file of the same name\n Define the variables Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_open (self, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Opens a NetCDF file and does the variable inquiries to activate variable ids Arguments Type Intent Optional Attributes Name class( netcdf_parameters ), intent(inout) :: self Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_write_frame_base (self, iu, param) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Write a frame of output of either test particle or massive body data to the binary output file\n    Note: If outputting to orbital elements, but sure that the conversion is done prior to calling this method Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset class( swiftest_parameters ), intent(in) :: param Current run configuration parameters module subroutine netcdf_write_particle_info_base (self, iu) Interface → Author Carlisle A. Wishard, Dana Singh, and David A. Minton Write all current particle to file Arguments Type Intent Optional Attributes Name class( swiftest_base ), intent(in) :: self Swiftest particle object class( netcdf_parameters ), intent(inout) :: iu Parameters used to identify a particular NetCDF dataset module subroutine netcdf_write_hdr_system (self, iu, param) Interface → Author David A. Minton Writes header information (variables that change with time, but not particle id). \n This subroutine significantly improves the output over the original binary file, allowing us to track energy, momentum, and other quantities that \n previously were handled as separate output files. Arguments Type Intent Optional Attributes Name class( swiftest_nbody_system ), intent(in) :: self Swiftest nbody system object class( netcdf_parameters ), intent(inout) :: iu Parameters used to for writing a NetCDF dataset to file class( swiftest_parameters ), intent(in) :: param Current run configuration parameters","tags":"","loc":"module/s_netcdf.html"},{"title":"s_fraggle_util – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_util~~UsesGraph module~s_fraggle_util s_fraggle_util module~swiftest swiftest module~s_fraggle_util->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_util->module~fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions fraggle_util_vmag_to_vb Module Subroutines fraggle_util_add_fragments_to_system fraggle_util_ang_mtm fraggle_util_construct_temporary_system fraggle_util_get_energy_momentum fraggle_util_restructure fraggle_util_shift_vector_to_origin Module Functions module function fraggle_util_vmag_to_vb (v_r_mag, v_r_unit, v_t_mag, v_t_unit, m_frag, vcom) result(vb) Interface → Author David A. Minton Converts radial and tangential velocity magnitudes into barycentric velocity Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: v_r_mag Unknown radial component of fragment velocity vector real(kind=DP), intent(in), dimension(:,:) :: v_r_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: v_t_mag Tangential component of velocity vector set previously by angular momentum constraint real(kind=DP), intent(in), dimension(:,:) :: v_t_unit Radial and tangential unit vectors for each fragment real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(in), dimension(:) :: vcom Barycentric velocity of collisional system center of mass Return Value real(kind=DP),\n  dimension(:,:), allocatable Module Subroutines module subroutine fraggle_util_add_fragments_to_system (frag, colliders, system, param) Interface → Author David A. Minton Adds fragments to the temporary system pl object Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters module subroutine fraggle_util_ang_mtm (self) Interface → Author David A. Minton Calcualtes the current angular momentum of the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object module subroutine fraggle_util_construct_temporary_system (frag, system, param, tmpsys, tmpparam) Interface → Author David A. Minton Constructs a temporary internal system consisting of active bodies and additional fragments. This internal temporary system is used to calculate system energy with and without fragments\n and optionally including fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Original swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters class( swiftest_nbody_system ), intent(out), allocatable :: tmpsys Output temporary swiftest nbody system object class( swiftest_parameters ), intent(out), allocatable :: tmpparam Output temporary configuration run parameters module subroutine fraggle_util_get_energy_momentum (self, colliders, system, param, lbefore) Interface → Author David A. Minton Calculates total system energy in either the pre-collision outcome state (lbefore = .true.) or the post-collision outcome state (lbefore = .false.)\n This subrourtine works by building a temporary internal massive body object out of the non-excluded bodies and optionally with fragments appended. \n This will get passed to the energy calculation subroutine so that energy is computed exactly the same way is it is in the main program. \n This will temporarily expand the massive body object in a temporary system object called tmpsys to feed it into symba_energy Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters logical, intent(in) :: lbefore Flag indicating that this the \"before\" state of the system, with colliders included and fragments excluded or vice versa module subroutine fraggle_util_restructure (self, colliders, try, f_spin, r_max_start) Interface → Author David A. Minton Restructure the inputs after a failed attempt failed to find a set of positions and velocities that satisfy the energy and momentum constraints Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object integer(kind=I4B), intent(in) :: try The current number of times Fraggle has tried to find a solution real(kind=DP), intent(inout) :: f_spin Fraction of energy/momentum that goes into spin. This decreases ater a failed attempt real(kind=DP), intent(inout) :: r_max_start The maximum radial distance that the position calculation starts with. This increases after a failed attempt module subroutine fraggle_util_shift_vector_to_origin (m_frag, vec_frag) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Adjusts the position or velocity of the fragments as needed to align them with the origin Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in), dimension(:) :: m_frag Fragment masses real(kind=DP), intent(inout), dimension(:,:) :: vec_frag Fragment positions or velocities in the center of mass frame","tags":"","loc":"module/s_fraggle_util.html"},{"title":"s_fraggle_io – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_io~~UsesGraph module~s_fraggle_io s_fraggle_io module~swiftest swiftest module~s_fraggle_io->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_io->module~fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_io_log_generate fraggle_io_log_one_message fraggle_io_log_pl fraggle_io_log_regime fraggle_io_log_start Module Subroutines module subroutine fraggle_io_log_generate (frag) Interface → Author David A. Minton Writes a log of the results of the fragment generation Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(in) :: frag module subroutine fraggle_io_log_one_message (message) Interface → Author David A. Minton Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: message module subroutine fraggle_io_log_pl (pl, param) Interface → Author David A. Minton Writes a single message to the fraggle log file Arguments Type Intent Optional Attributes Name class( swiftest_pl ), intent(in) :: pl Swiftest massive body object (only the new bodies generated in a collision) class( swiftest_parameters ), intent(in) :: param Current swiftest run configuration parameters module subroutine fraggle_io_log_regime (colliders, frag) Interface → Author David A. Minton Writes a log of the results of the collisional regime determination Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object class( fraggle_fragments ), intent(in) :: frag Fraggle fragment object module subroutine fraggle_io_log_start (param) Interface → Author David A. Minton Checks to see if the Fraggle log file needs to be replaced if this is a new run, or appended if this is a restarted run Arguments Type Intent Optional Attributes Name class( swiftest_parameters ), intent(in) :: param","tags":"","loc":"module/s_fraggle_io.html"},{"title":"s_fraggle_generate – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_generate~~UsesGraph module~s_fraggle_generate s_fraggle_generate module~swiftest swiftest module~s_fraggle_generate->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_generate->module~fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Variables NFRAG_MIN F_SPIN_FIRST FRAGGLE_LTOL FRAGGLE_ETOL Subroutines fraggle_generate_pos_vec fraggle_generate_spins fraggle_generate_tan_vel fraggle_generate_rad_vel Module Subroutines fraggle_generate_fragments Variables Type Visibility Attributes Name Initial integer(kind=I4B), private, parameter :: NFRAG_MIN = 7 The minimum allowable number of fragments (set to 6 because that's how many unknowns are needed in the tangential velocity calculation) real(kind=DP), private, parameter :: F_SPIN_FIRST = 0.05_DP The initial try value of the fraction of energy or momenum in spin (whichever has the lowest kinetic energy) real(kind=DP), private, parameter :: FRAGGLE_LTOL = 10*epsilon(1.0_DP) real(kind=DP), private, parameter :: FRAGGLE_ETOL = 1e-8_DP Subroutines subroutine fraggle_generate_pos_vec (frag, colliders, r_max_start) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Initializes the orbits of the fragments around the center of mass. The fragments are initially placed on a plane defined by the \n pre-impact angular momentum. They are distributed on an ellipse surrounding the center of mass.\n The initial positions do not conserve energy or momentum, so these need to be adjusted later. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: r_max_start Initial guess for the starting maximum radial distance of fragments subroutine fraggle_generate_spins (frag, colliders, f_spin, lfailure) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Calculates the spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget. Read more… Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object real(kind=DP), intent(in) :: f_spin Fraction of energy or momentum that goes into spin (whichever gives the lowest kinetic energy) logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! subroutine fraggle_generate_tan_vel (frag, colliders, lfailure) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Adjusts the tangential velocities and spins of a collection of fragments such that they conserve angular momentum without blowing the fragment kinetic energy budget.\n This procedure works in several stages, with a goal to solve the angular and linear momentum constraints on the fragments, while still leaving a positive balance of\n our fragment kinetic energy (frag%ke_budget) that we can put into the radial velocity distribution. Read more… Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds subroutine fraggle_generate_rad_vel (frag, colliders, lfailure) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Adjust the fragment velocities to set the fragment orbital kinetic energy. This will minimize the difference between the fragment kinetic energy and the energy budget Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( fraggle_colliders ), intent(in) :: colliders Fraggle collider system object logical, intent(out) :: lfailure Logical flag indicating whether this step fails or succeeds! Module Subroutines module subroutine fraggle_generate_fragments (self, colliders, system, param, lfailure) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Generates a system of fragments in barycentric coordinates that conserves energy and momentum. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle system object the outputs will be the fragmentation class( fraggle_colliders ), intent(inout) :: colliders Fraggle colliders object containing the two-body equivalent values of the colliding bodies class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters logical, intent(out) :: lfailure Answers the question: Should this have been a merger instead?","tags":"","loc":"module/s_fraggle_generate.html"},{"title":"s_fraggle_regime – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_regime~~UsesGraph module~s_fraggle_regime s_fraggle_regime module~swiftest swiftest module~s_fraggle_regime->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_regime->module~fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines fraggle_regime_collresolve Module Subroutines fraggle_regime_colliders Subroutines subroutine fraggle_regime_collresolve (Mcb, m1, m2, rad1, rad2, xh1, xh2, vb1, vb2, den1, den2, min_mfrag, regime, Mlr, Mslr, Qloss) Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Determine the collisional regime of two colliding bodies. \n Current version requires all values to be converted to SI units prior to calling the function\n       References:\n       Kokubo, E., Genda, H., 2010. Formation of Terrestrial Planets from Protoplanets Under a Realistic Accretion \n          Condition. ApJL 714, L21. https://doi.org/10.1088/2041-8205/714/1/L21\n       Leinhardt, Z.M., Stewart, S.T., 2012. Collisions between Gravity-dominated Bodies. I. Outcome Regimes and Scaling \n          Laws 745, 79. https://doi.org/10.1088/0004-637X/745/1/79\n       Mustill, A.J., Davies, M.B., Johansen, A., 2018. The dynamical evolution of transiting planetary systems including \n          a realistic collision prescription. Mon Not R Astron Soc 478, 2896–2908. https://doi.org/10.1093/mnras/sty1273\n       Rufu, R., Aharonson, O., 2019. Impact Dynamics of Moons Within a Planetary Potential. J. Geophys. Res. Planets 124, \n          1008–1019. https://doi.org/10.1029/2018JE005798\n       Stewart, S.T., Leinhardt, Z.M., 2012. Collisions between Gravity-dominated Bodies. II. The Diversity of Impact \n          Outcomes during the End Stage of Planet Formation. ApJ 751, 32. https://doi.org/10.1088/0004-637X/751/1/32 Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: Mcb real(kind=DP), intent(in) :: m1 real(kind=DP), intent(in) :: m2 real(kind=DP), intent(in) :: rad1 real(kind=DP), intent(in) :: rad2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vb1 real(kind=DP), intent(in), dimension(:) :: vb2 real(kind=DP), intent(in) :: den1 real(kind=DP), intent(in) :: den2 real(kind=DP), intent(in) :: min_mfrag integer(kind=I4B), intent(out) :: regime real(kind=DP), intent(out) :: Mlr real(kind=DP), intent(out) :: Mslr real(kind=DP), intent(out) :: Qloss The residual energy after the collision Module Subroutines module subroutine fraggle_regime_colliders (self, frag, system, param) Interface → Author Jennifer L.L. Pouplin, Carlisle A. Wishard, and David A. Minton Determine which fragmentation regime the set of colliders will be. This subroutine is a wrapper for the non-polymorphic raggle_regime_collresolve subroutine.\n It converts to SI units prior to calling\n The two-body equivalent masses of the collider system\n The two-body equivalent radii of the collider system\n The two-body equivalent density of the collider system\n The first body of the two-body equivalent position vector the collider system\n The first body of the two-body equivalent velocity vector the collider system\n The second body of the two-body equivalent position vector the collider system\n The second body of the two-body equivalent velocity vector the collider system\n The central body mass of the system\n The minimum fragment mass to generate. Collider systems that would otherwise generate less massive fragments than this value will be forced to merge instead\n Use the positions and velocities of the parents from indside the step (at collision) to calculate the collisional regime Arguments Type Intent Optional Attributes Name class( fraggle_colliders ), intent(inout) :: self Fraggle colliders object class( fraggle_fragments ), intent(inout) :: frag Fraggle fragment system object class( swiftest_nbody_system ), intent(in) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters","tags":"","loc":"module/s_fraggle_regime.html"},{"title":"s_fraggle_placeholder – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_placeholder~~UsesGraph module~s_fraggle_placeholder s_fraggle_placeholder module~swiftest swiftest module~s_fraggle_placeholder->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_placeholder->module~fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_placeholder_accel fraggle_placeholder_kick fraggle_placeholder_step Module Subroutines module subroutine fraggle_placeholder_accel (self, system, param, t, lbeg) Interface → The following interfaces are placeholders intended to satisfy the required abstract methods given by the parent class Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system object class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time logical, intent(in) :: lbeg Optional argument that determines whether or not this is the beginning or end of the step module subroutine fraggle_placeholder_kick (self, system, param, t, dt, lbeg) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( swiftest_nbody_system ), intent(inout) :: system Swiftest nbody system objec class( swiftest_parameters ), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time real(kind=DP), intent(in) :: dt Stepsize logical, intent(in) :: lbeg Logical flag indicating whether this is the beginning of the half step or not. module subroutine fraggle_placeholder_step (self, system, param, t, dt) Interface → Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Swiftest body object class( swiftest_nbody_system ), intent(inout) :: system Swiftest system object class( swiftest_parameters ), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Simulation time real(kind=DP), intent(in) :: dt Current stepsize","tags":"","loc":"module/s_fraggle_placeholder.html"},{"title":"s_fraggle_setup – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_setup~~UsesGraph module~s_fraggle_setup s_fraggle_setup module~swiftest swiftest module~s_fraggle_setup->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_setup->module~fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_setup_reset_fragments fraggle_setup_fragments Module Subroutines module subroutine fraggle_setup_reset_fragments (self) Interface → Author David A. Minton Resets all position and velocity-dependent fragment quantities in order to do a fresh calculation (does not reset mass, radius, or other values that get set prior to the call to fraggle_generate) Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self module subroutine fraggle_setup_fragments (self, n, param) Interface → Author David A. Minton Allocates arrays for n fragments in a Fraggle system. Passing n = 0 deallocates all arrays. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self integer(kind=I4B), intent(in) :: n class( swiftest_parameters ), intent(in) :: param","tags":"","loc":"module/s_fraggle_setup.html"},{"title":"s_fraggle_set – swiftest","text":"Uses swiftest Ancestors: fraggle_classes module~~s_fraggle_set~~UsesGraph module~s_fraggle_set s_fraggle_set module~swiftest swiftest module~s_fraggle_set->module~swiftest module~fraggle_classes fraggle_classes module~s_fraggle_set->module~fraggle_classes module~swiftest->module~fraggle_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~fraggle_classes module~symba_classes->module~helio_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines fraggle_set_budgets_fragments fraggle_set_mass_dist_fragments fraggle_set_coordinate_system fraggle_set_natural_scale_factors fraggle_set_original_scale_factors Module Subroutines module subroutine fraggle_set_budgets_fragments (self, colliders) Interface → Author David A. Minton Sets the energy and momentum budgets of the fragments based on the collider values and the before/after values of energy and momentum Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object module subroutine fraggle_set_mass_dist_fragments (self, colliders, param) Interface → Author David A. Minton Sets the mass of fragments based on the mass distribution returned by the regime calculation.\n This subroutine must be run after the the setup rourtine has been run on the fragments Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object class( swiftest_parameters ), intent(in) :: param Current Swiftest run configuration parameters module subroutine fraggle_set_coordinate_system (self, colliders) Interface → Author David A. Minton Defines the collisional coordinate system, including the unit vectors of both the system and individual fragments. Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object module subroutine fraggle_set_natural_scale_factors (self, colliders) Interface → Author David A. Minton Scales dimenional quantities to ~O(1) with respect to the collisional system. \n This scaling makes it easier for the non-linear minimization to converge on a solution Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object module subroutine fraggle_set_original_scale_factors (self, colliders) Interface → Author David A. Minton Restores dimenional quantities back to the system units Arguments Type Intent Optional Attributes Name class( fraggle_fragments ), intent(inout) :: self Fraggle fragment system object class( fraggle_colliders ), intent(inout) :: colliders Fraggle collider system object","tags":"","loc":"module/s_fraggle_set.html"},{"title":"s_rmvs_discard – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_discard~~UsesGraph module~s_rmvs_discard s_rmvs_discard module~swiftest swiftest module~s_rmvs_discard->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_discard->module~rmvs_classes module~swiftest->module~rmvs_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_discard_tp Module Subroutines module subroutine rmvs_discard_tp (self, system, param) Interface → Author David A. Minton Check to see if test particles should be discarded based on pericenter passage distances with respect to planets encountered Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_nbody_system), intent(inout) :: system Swiftest nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters","tags":"","loc":"module/s_rmvs_discard.html"},{"title":"s_rmvs_util – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_util~~UsesGraph module~s_rmvs_util s_rmvs_util module~swiftest swiftest module~s_rmvs_util->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_util->module~rmvs_classes module~swiftest->module~rmvs_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_util_append_pl rmvs_util_append_tp rmvs_util_fill_pl rmvs_util_fill_tp rmvs_util_resize_pl rmvs_util_resize_tp rmvs_util_sort_pl rmvs_util_sort_tp rmvs_util_sort_rearrange_pl rmvs_util_sort_rearrange_tp rmvs_util_spill_pl rmvs_util_spill_tp Module Subroutines module subroutine rmvs_util_append_pl (self, source, lsource_mask) Interface → Author David A. Minton Append components from one massive body object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine rmvs_util_append_tp (self, source, lsource_mask) Interface → Author David A. Minton Append components from test particle object to another. \n This method will automatically resize the destination body if it is too small\n Arguments Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: source Source object to append logical, intent(in), dimension(:) :: lsource_mask Logical mask indicating which elements to append to module subroutine rmvs_util_fill_pl (self, inserts, lfill_list) Interface → Author David A. Minton Insert new RMVS massive body structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine rmvs_util_fill_tp (self, inserts, lfill_list) Interface → Author David A. Minton Insert new RMVS test particle structure into an old one. \n This is the inverse of a fill operation. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(in) :: inserts Inserted object logical, intent(in), dimension(:) :: lfill_list Logical array of bodies to merge into the keeps module subroutine rmvs_util_resize_pl (self, nnew) Interface → Author David A. Minton Checks the current size of a massive body object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine rmvs_util_resize_tp (self, nnew) Interface → Author David A. Minton Checks the current size of a test particle object against the requested size and resizes it if it is too small. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: nnew New size neded module subroutine rmvs_util_sort_pl (self, sortby, ascending) Interface → Author David A. Minton Sort a RMVS massive body object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine rmvs_util_sort_tp (self, sortby, ascending) Interface → Author David A. Minton Sort a RMVS test particle object in-place. \n sortby is a string indicating which array component to sort. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object character(len=*), intent(in) :: sortby Sorting attribute logical, intent(in) :: ascending Logical flag indicating whether or not the sorting should be in ascending or descending order module subroutine rmvs_util_sort_rearrange_pl (self, ind) Interface → Author David A. Minton Rearrange RMVS massive body structure in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine rmvs_util_sort_rearrange_tp (self, ind) Interface → Author David A. Minton Rearrange RMVS test particle object in-place from an index list.\n This is a helper utility used to make polymorphic sorting work on Swiftest structures. Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in), dimension(:) :: ind Index array used to restructure the body (should contain all 1:n index values in the desired order) module subroutine rmvs_util_spill_pl (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) RMVS test particle structure from active list to discard list Read more… Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS massive body body object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not module subroutine rmvs_util_spill_tp (self, discards, lspill_list, ldestructive) Interface → Author David A. Minton Move spilled (discarded) RMVS test particle structure from active list to discard list Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class(swiftest_body), intent(inout) :: discards Discarded object logical, intent(in), dimension(:) :: lspill_list Logical array of bodies to spill into the discards logical, intent(in) :: ldestructive Logical flag indicating whether or not this operation should alter the keeps array or not","tags":"","loc":"module/s_rmvs_util.html"},{"title":"s_rmvs_kick – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_kick~~UsesGraph module~s_rmvs_kick s_rmvs_kick module~swiftest swiftest module~s_rmvs_kick->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_kick->module~rmvs_classes module~swiftest->module~rmvs_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_kick_getacch_tp Module Subroutines module subroutine rmvs_kick_getacch_tp (self, system, param, t, lbeg) Interface → Author David A. Minton Compute the oblateness acceleration in the inner encounter region with planets Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle data structure class(swiftest_nbody_system), intent(inout) :: system Swiftest central body particle data structuree class(swiftest_parameters), intent(in) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current time logical, intent(in) :: lbeg Logical flag that determines whether or not this is the beginning or end of the step","tags":"","loc":"module/s_rmvs_kick.html"},{"title":"s_rmvs_io – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_io~~UsesGraph module~s_rmvs_io s_rmvs_io module~swiftest swiftest module~s_rmvs_io->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_io->module~rmvs_classes module~swiftest->module~rmvs_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_io_write_encounter Module Subroutines module subroutine rmvs_io_write_encounter (t, id1, id2, Gmass1, Gmass2, radius1, radius2, xh1, xh2, vh1, vh2, enc_out) Interface → Author David A. Minton Write close encounter data from RMVS to output binary files\n  There is no direct file output from this subroutine Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: t integer(kind=I4B), intent(in) :: id1 integer(kind=I4B), intent(in) :: id2 real(kind=DP), intent(in) :: Gmass1 real(kind=DP), intent(in) :: Gmass2 real(kind=DP), intent(in) :: radius1 real(kind=DP), intent(in) :: radius2 real(kind=DP), intent(in), dimension(:) :: xh1 real(kind=DP), intent(in), dimension(:) :: xh2 real(kind=DP), intent(in), dimension(:) :: vh1 real(kind=DP), intent(in), dimension(:) :: vh2 character(len=*), intent(in) :: enc_out","tags":"","loc":"module/s_rmvs_io.html"},{"title":"s_rmvs_setup – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_setup~~UsesGraph module~s_rmvs_setup s_rmvs_setup module~swiftest swiftest module~s_rmvs_setup->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_setup->module~rmvs_classes module~swiftest->module~rmvs_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Subroutines rmvs_setup_pl rmvs_setup_initialize_system rmvs_setup_tp Module Subroutines module subroutine rmvs_setup_pl (self, n, param) Interface → Author David A. Minton Allocate RMVS test particle structure Read more… Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter module subroutine rmvs_setup_initialize_system (self, param) Interface → Author David A. Minton Initialize an RMVS nbody system from files and sets up the planetocentric structures. Read more… Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters module subroutine rmvs_setup_tp (self, n, param) Interface → Author David A. Minton Allocate WHM test particle structure Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object integer(kind=I4B), intent(in) :: n Number of particles to allocate space for class(swiftest_parameters), intent(in) :: param Current run configuration parameter","tags":"","loc":"module/s_rmvs_setup.html"},{"title":"s_rmvs_step – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_step~~UsesGraph module~s_rmvs_step s_rmvs_step module~swiftest swiftest module~s_rmvs_step->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_step->module~rmvs_classes module~swiftest->module~rmvs_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Subroutines rmvs_interp_out rmvs_step_out rmvs_interp_in rmvs_step_in rmvs_make_planetocentric rmvs_peri_tp rmvs_end_planetocentric Module Subroutines rmvs_step_system Subroutines subroutine rmvs_interp_out (cb, pl, dt) Author David A. Minton Interpolate planet positions between two Keplerian orbits in outer encounter region Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object real(kind=DP), intent(in) :: dt Step size subroutine rmvs_step_out (cb, pl, tp, system, param, t, dt) Author David A. Minton Step ACTIVE test particles ahead in the outer encounter region, setting up and calling the inner region\n    integration if necessar Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz subroutine rmvs_interp_in (cb, pl, system, param, dt, outer_index) Author David A. Minton Interpolate planet positions between two Keplerian orbits in inner encounter regio Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS cenral body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object class(swiftest_parameters), intent(in) :: param Swiftest parameters file real(kind=DP), intent(in) :: dt Step size integer(kind=I4B), intent(in) :: outer_index Outer substep number within current set subroutine rmvs_step_in (cb, pl, tp, param, outer_time, dto) Author David A. Minton Step active test particles ahead in the inner encounter region Read more… Arguments Type Intent Optional Attributes Name class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: outer_time Current time real(kind=DP), intent(in) :: dto Outer step size subroutine rmvs_make_planetocentric (param, cb, pl, tp) Author David A. Minton When encounters are detected, this method will call the interpolation methods for the planets and \n creates a Swiftest test particle structure for each planet's encountering test particles to simplify the \n planetocentric calculations. This subroutine is not based on an existing one from Swift and Swifter Arguments Type Intent Optional Attributes Name class(swiftest_parameters), intent(in) :: param Current run configuration paramete class( rmvs_cb ), intent(inout) :: cb RMVS central body object class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle object subroutine rmvs_peri_tp (tp, pl, t, dt, lfirst, inner_index, ipleP, param) Author David A. Minton Determine planetocentric pericenter passages for test particles in close encounters with a planet Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: tp RMVS test particle object (planetocentric) class( rmvs_pl ), intent(inout) :: pl RMVS massive body object (heliocentric) real(kind=DP), intent(in) :: t current time real(kind=DP), intent(in) :: dt step size logical, intent(in) :: lfirst Logical flag indicating whether current invocation is the first integer(kind=I4B), intent(in) :: inner_index Outer substep number within current set integer(kind=I4B), intent(in) :: ipleP index of RMVS planet being closely encountered class(swiftest_parameters), intent(in) :: param Current run configuration parameters subroutine rmvs_end_planetocentric (pl, tp) Author David A. Minton Deallocates all of the encountering particle data structures for next time Arguments Type Intent Optional Attributes Name class( rmvs_pl ), intent(inout) :: pl RMVS massive body object class( rmvs_tp ), intent(inout) :: tp RMVS test particle objec Module Subroutines module subroutine rmvs_step_system (self, param, t, dt) Interface → Author David A. Minton Step massive bodies and and active test particles ahead in heliocentric coordinates Read more… Arguments Type Intent Optional Attributes Name class( rmvs_nbody_system ), intent(inout) :: self RMVS nbody system object class(swiftest_parameters), intent(inout) :: param Current run configuration parameters real(kind=DP), intent(in) :: t Current simulation time real(kind=DP), intent(in) :: dt Current stepsiz","tags":"","loc":"module/s_rmvs_step.html"},{"title":"s_rmvs_chk – swiftest","text":"Uses swiftest Ancestors: rmvs_classes module~~s_rmvs_chk~~UsesGraph module~s_rmvs_chk s_rmvs_chk module~swiftest swiftest module~s_rmvs_chk->module~swiftest module~rmvs_classes rmvs_classes module~s_rmvs_chk->module~rmvs_classes module~swiftest->module~rmvs_classes module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Contents Module Functions rmvs_encounter_check_tp Module Subroutines rmvs_chk_ind Module Functions module function rmvs_encounter_check_tp (self, system, dt) result(lencounter) Interface → Author David A. Minton Determine whether a test particle and planet are having or will have an encounter within the next time step Read more… Arguments Type Intent Optional Attributes Name class( rmvs_tp ), intent(inout) :: self RMVS test particle object class( rmvs_nbody_system ), intent(inout) :: system RMVS nbody system object real(kind=DP), intent(in) :: dt step size Return Value logical Returns true if there is at least one close encounter Module Subroutines pure module subroutine rmvs_chk_ind (xr, yr, zr, vxr, vyr, vzr, dt, r2crit, lencounter, lvdotr) Interface → Author David A. Minton Determine whether a test particle and planet are having or will have an encounter within the next time step Read more… Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: xr Relative distance vector components real(kind=DP), intent(in) :: yr Relative distance vector components real(kind=DP), intent(in) :: zr Relative distance vector components real(kind=DP), intent(in) :: vxr Relative velocity vector components real(kind=DP), intent(in) :: vyr Relative velocity vector components real(kind=DP), intent(in) :: vzr Relative velocity vector components real(kind=DP), intent(in) :: dt Step size real(kind=DP), intent(in) :: r2crit Square of the critical encounter distance logical, intent(out) :: lencounter Flag indicating that an encounter has occurred logical, intent(out) :: lvdotr Logical flag indicating the direction of the v .dot. r vector","tags":"","loc":"module/s_rmvs_chk.html"},{"title":"swiftest_driver – swiftest","text":"Uses swiftest program~~swiftest_driver~~UsesGraph program~swiftest_driver swiftest_driver module~swiftest swiftest program~swiftest_driver->module~swiftest module~whm_classes whm_classes module~swiftest->module~whm_classes module~swiftest_operators swiftest_operators module~swiftest->module~swiftest_operators module~symba_classes symba_classes module~swiftest->module~symba_classes module~helio_classes helio_classes module~swiftest->module~helio_classes module~fraggle_classes fraggle_classes module~swiftest->module~fraggle_classes module~lambda_function lambda_function module~swiftest->module~lambda_function module~swiftest_classes swiftest_classes module~swiftest->module~swiftest_classes module~rmvs_classes rmvs_classes module~swiftest->module~rmvs_classes module~walltime_classes walltime_classes module~swiftest->module~walltime_classes module~swiftest_globals swiftest_globals module~swiftest->module~swiftest_globals module~whm_classes->module~swiftest_classes module~whm_classes->module~swiftest_globals module~swiftest_operators->module~swiftest_globals module~symba_classes->module~helio_classes module~symba_classes->module~fraggle_classes module~symba_classes->module~swiftest_classes module~symba_classes->module~swiftest_globals module~helio_classes->module~whm_classes module~helio_classes->module~swiftest_classes module~helio_classes->module~swiftest_globals module~fraggle_classes->module~swiftest_classes module~fraggle_classes->module~swiftest_globals module~lambda_function->module~swiftest_globals module~swiftest_classes->module~swiftest_globals module~rmvs_classes->module~whm_classes module~rmvs_classes->module~swiftest_globals module~walltime_classes->module~swiftest_globals iso_fortran_env iso_fortran_env module~swiftest_globals->iso_fortran_env Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Driver program for the Swiftest integrators. Unlike the earlier Swift and Swifter drivers, in Swiftest all integrators \n    are run from this single program. Adapted from Swifter by David E. Kaufmann's Swifter driver programs swifter_[bs,helio,ra15,rmvs,symba,tu4,whm].f90\n Adapted from Hal Levison and Martin Duncan's Swift driver programs\n Read in the user-defined parameters file and the initial conditions of the system\n Define the maximum number of threads Step the system forward in time Evaluate any discards or collisional outcomes If the loop counter is at the output cadence value, append the data file with a single frame\n If the loop counter is at the dump cadence value, dump the state of the system to a file in case it needs to be restarted Calls program~~swiftest_driver~~CallsGraph program~swiftest_driver swiftest_driver util_exit util_exit program~swiftest_driver->util_exit io_get_args io_get_args program~swiftest_driver->io_get_args setup_construct_system setup_construct_system program~swiftest_driver->setup_construct_system Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Contents Variables nbody_system param integrator param_file_name ierr iloop idump iout ioutput_t0 nloops old_t_final timer Variables Type Attributes Name Initial class(swiftest_nbody_system), allocatable :: nbody_system Polymorphic object containing the nbody system to be integrated class(swiftest_parameters), allocatable :: param Run configuration parameters integer(kind=I4B) :: integrator Integrator type code (see swiftest_globals for symbolic names) character(len=:), allocatable :: param_file_name Name of the file containing user-defined parameters integer(kind=I4B) :: ierr I/O error code integer(kind=I8B) :: iloop Loop counter integer(kind=I8B) :: idump Dump cadence counter integer(kind=I8B) :: iout Output cadence counter integer(kind=I8B) :: ioutput_t0 The output frame counter at time 0 integer(kind=I8B) :: nloops Number of steps to take in the simulation real(kind=DP) :: old_t_final = 0.0_DP Output time at which writing should start, in order to prevent duplicate lines being written for restarts type(walltimer) :: timer Object used for computing elapsed wall time","tags":"","loc":"program/swiftest_driver.html"}]}
\ No newline at end of file
diff --git a/docs/type/fraggle_fragments.html b/docs/type/fraggle_fragments.html
index 80b90c604..40547d48c 100644
--- a/docs/type/fraggle_fragments.html
+++ b/docs/type/fraggle_fragments.html
@@ -536,36 +536,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.77,-33C269.45,-33 260.22,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.09,-29.5 241.09,-33 251.09,-36.5 251.09,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~fraggle_fragments~~InheritsGraph_node4" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~fraggle_fragments~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~fraggle_fragments~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~fraggle_fragments~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~fraggle_fragments~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~fraggle_fragments~~InheritsGraph_node5" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~fraggle_fragments~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~fraggle_fragments~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~fraggle_fragments~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~fraggle_fragments~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/helio_cb.html b/docs/type/helio_cb.html
index 7a1fb844c..c7517bfc2 100644
--- a/docs/type/helio_cb.html
+++ b/docs/type/helio_cb.html
@@ -329,36 +329,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M265.93,-33C257.67,-33 248.33,-33 239.26,-33"/>
 <polygon fill="#000000" stroke="#000000" points="239.21,-29.5 229.21,-33 239.21,-36.5 239.21,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~helio_cb~~InheritsGraph_node3" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~helio_cb~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~helio_cb~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~helio_cb~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.73,-37.82C146.18,-40.48 124.04,-43.84 104.48,-46.8"/>
-<polygon fill="#000000" stroke="#000000" points="103.89,-43.35 94.52,-48.31 104.94,-50.27 103.89,-43.35"/>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~helio_cb~~InheritsGraph_edge2" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-37.82C151.33,-39.7 136.65,-41.92 122.2,-44.11"/>
+<polygon fill="#000000" stroke="#000000" points="121.62,-40.66 112.26,-45.62 122.67,-47.58 121.62,-40.66"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~helio_cb~~InheritsGraph_node4" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~helio_cb~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~helio_cb~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~helio_cb~~InheritsGraph_edge2" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-28.18C151.33,-26.3 136.65,-24.08 122.2,-21.89"/>
-<polygon fill="#000000" stroke="#000000" points="122.67,-18.42 112.26,-20.38 121.62,-25.34 122.67,-18.42"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
+<g id="type~~helio_cb~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.73,-28.18C146.18,-25.52 124.04,-22.16 104.48,-19.2"/>
+<polygon fill="#000000" stroke="#000000" points="104.94,-15.73 94.52,-17.69 103.89,-22.65 104.94,-15.73"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/helio_nbody_system.html b/docs/type/helio_nbody_system.html
index 82578efa0..d0833917e 100644
--- a/docs/type/helio_nbody_system.html
+++ b/docs/type/helio_nbody_system.html
@@ -303,11 +303,11 @@ <h3 class="panel-title">Inherits</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~helio_nbody_system~~InheritsGraph Pages: 1 -->
-<svg id="typehelio_nbody_systemInheritsGraph" width="641pt" height="96pt"
- viewBox="0.00 0.00 641.00 95.59" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~helio_nbody_system~~InheritsGraph" class="graph" transform="scale(0.74 0.74) rotate(0) translate(4 125)">
+<svg id="typehelio_nbody_systemInheritsGraph" width="641pt" height="97pt"
+ viewBox="0.00 0.00 641.00 97.08" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~helio_nbody_system~~InheritsGraph" class="graph" transform="scale(0.74 0.74) rotate(0) translate(4 127)">
 <title>type~~helio_nbody_system~~InheritsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-125 861,-125 861,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-127 861,-127 861,4 -4,4"/>
 <!-- type~helio_nbody_system -->
 <g id="type~~helio_nbody_system~~InheritsGraph_node1" class="node">
 <title>type~helio_nbody_system</title>
@@ -344,118 +344,118 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M599.73,-54C591.1,-54 582.05,-54 573.11,-54"/>
 <polygon fill="#000000" stroke="#000000" points="573.07,-50.5 563.07,-54 573.07,-57.5 573.07,-50.5"/>
 </g>
-<!-- type~swiftest_tp -->
+<!-- type~swiftest_cb -->
 <g id="type~~helio_nbody_system~~InheritsGraph_node4" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~helio_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-24 278,-24 278,0 341,0 341,-24"/>
-<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+<title>type~swiftest_cb</title>
+<g id="a_type~~helio_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
+<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~helio_nbody_system~~InheritsGraph_edge5" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.81,-35.28 378.82,-27.1 351.13,-20.98"/>
-<polygon fill="#000000" stroke="#000000" points="351.52,-17.48 341,-18.74 350.01,-24.32 351.52,-17.48"/>
-<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
+<g id="type~~helio_nbody_system~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
+<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
+<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
 <!-- type~swiftest_pl -->
 <g id="type~~helio_nbody_system~~InheritsGraph_node5" class="node">
 <title>type~swiftest_pl</title>
 <g id="a_type~~helio_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-66 278.5,-66 278.5,-42 340.5,-42 340.5,-66"/>
-<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-24 278.5,-24 278.5,0 340.5,0 340.5,-24"/>
+<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~helio_nbody_system~~InheritsGraph_edge4" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.75,-54 376.66,-54 350.79,-54"/>
-<polygon fill="#000000" stroke="#000000" points="350.59,-50.5 340.59,-54 350.59,-57.5 350.59,-50.5"/>
-<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.58,-35.23 378.26,-26.98 350.5,-20.84"/>
+<polygon fill="#000000" stroke="#000000" points="351.25,-17.42 340.73,-18.68 349.74,-24.26 351.25,-17.42"/>
+<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_cb -->
+<!-- type~swiftest_tp -->
 <g id="type~~helio_nbody_system~~InheritsGraph_node6" class="node">
-<title>type~swiftest_cb</title>
-<g id="a_type~~helio_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
-<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
+<title>type~swiftest_tp</title>
+<g id="a_type~~helio_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-66 278,-66 278,-42 341,-42 341,-66"/>
+<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
-<g id="type~~helio_nbody_system~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
-<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
-<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~helio_nbody_system~~InheritsGraph_edge5" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.94,-54 377.11,-54 351.3,-54"/>
+<polygon fill="#000000" stroke="#000000" points="351.12,-50.5 341.12,-54 351.12,-57.5 351.12,-50.5"/>
+<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~swiftest_body -->
-<g id="type~~helio_nbody_system~~InheritsGraph_node9" class="node">
-<title>type~swiftest_body</title>
-<g id="a_type~~helio_nbody_system~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
-<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
+<!-- type~swiftest_particle_info -->
+<g id="type~~helio_nbody_system~~InheritsGraph_node7" class="node">
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~helio_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-123 0,-123 0,-99 112,-99 112,-123"/>
+<text text-anchor="middle" x="56" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~helio_nbody_system~~InheritsGraph_edge6" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
-<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
-<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~helio_nbody_system~~InheritsGraph_edge7" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M278.3,-52.15C272.2,-52.29 265.86,-52.82 260,-54"/>
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-103.98C155.82,-104.84 138.87,-105.9 122.39,-106.93"/>
+<polygon fill="#000000" stroke="#000000" points="121.99,-103.45 112.23,-107.56 122.43,-110.43 121.99,-103.45"/>
+<text text-anchor="middle" x="138" y="-108.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
 <!-- type~swiftest_base -->
-<g id="type~~helio_nbody_system~~InheritsGraph_node7" class="node">
+<g id="type~~helio_nbody_system~~InheritsGraph_node8" class="node">
 <title>type~swiftest_base</title>
-<g id="a_type~~helio_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-121 17.5,-121 17.5,-97 94.5,-97 94.5,-121"/>
-<text text-anchor="middle" x="56" y="-106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<g id="a_type~~helio_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-69 17.5,-69 17.5,-45 94.5,-45 94.5,-69"/>
+<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~helio_nbody_system~~InheritsGraph_edge9" class="edge">
+<g id="type~~helio_nbody_system~~InheritsGraph_edge7" class="edge">
 <title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.82,-104.49C162.03,-105.05 153.72,-105.59 146,-106 132.72,-106.7 118.32,-107.27 105.05,-107.72"/>
-<polygon fill="#000000" stroke="#000000" points="104.57,-104.23 94.69,-108.05 104.8,-111.23 104.57,-104.23"/>
+<path fill="none" stroke="#000000" d="M169.79,-92.12C150.55,-86.13 125.65,-78.38 104.14,-71.68"/>
+<polygon fill="#000000" stroke="#000000" points="105.11,-68.32 94.52,-68.69 103.03,-75 105.11,-68.32"/>
 </g>
-<!-- type~swiftest_particle_info -->
-<g id="type~~helio_nbody_system~~InheritsGraph_node8" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~helio_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-69 0,-69 0,-45 112,-45 112,-69"/>
-<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<!-- type~swiftest_body -->
+<g id="type~~helio_nbody_system~~InheritsGraph_node9" class="node">
+<title>type~swiftest_body</title>
+<g id="a_type~~helio_nbody_system~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
+<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~helio_nbody_system~~InheritsGraph_edge8" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-92.12C150.93,-86.25 126.61,-78.68 105.39,-72.07"/>
-<polygon fill="#000000" stroke="#000000" points="106.17,-68.65 95.58,-69.01 104.09,-75.33 106.17,-68.65"/>
-<text text-anchor="middle" x="138" y="-85.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
+<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
+<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~helio_nbody_system~~InheritsGraph_edge11" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.72,-64.65C152.75,-68.01 140.81,-71.91 130,-76 117.07,-80.89 103.17,-86.96 91,-92.56"/>
-<polygon fill="#000000" stroke="#000000" points="89.26,-89.51 81.67,-96.91 92.22,-95.85 89.26,-89.51"/>
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<g id="type~~helio_nbody_system~~InheritsGraph_edge9" class="edge">
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M277.79,-52.16C271.84,-52.32 265.7,-52.85 260,-54"/>
 </g>
 <!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~helio_nbody_system~~InheritsGraph_edge10" class="edge">
 <title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.1,-41.94C158.79,-40.3 152.26,-38.88 146,-38 130.11,-35.76 112.82,-38.28 97.74,-42.15"/>
-<polygon fill="#000000" stroke="#000000" points="96.37,-38.9 87.7,-45 98.28,-45.63 96.37,-38.9"/>
-<text text-anchor="middle" x="138" y="-40.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.86,-66.09C149.4,-74.55 120.51,-85.95 97.21,-95.14"/>
+<polygon fill="#000000" stroke="#000000" points="95.62,-92 87.6,-98.93 98.19,-98.52 95.62,-92"/>
+<text text-anchor="middle" x="138" y="-82.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+</g>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~helio_nbody_system~~InheritsGraph_edge11" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.94,-48.62C157.95,-47.94 151.82,-47.37 146,-47 132.52,-46.15 117.94,-47.03 104.56,-48.56"/>
+<polygon fill="#000000" stroke="#000000" points="104.08,-45.1 94.6,-49.84 104.97,-52.04 104.08,-45.1"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/helio_pl.html b/docs/type/helio_pl.html
index 587b02949..3ed7bafd5 100644
--- a/docs/type/helio_pl.html
+++ b/docs/type/helio_pl.html
@@ -434,36 +434,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.77,-33C269.45,-33 260.22,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.09,-29.5 241.09,-33 251.09,-36.5 251.09,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~helio_pl~~InheritsGraph_node4" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~helio_pl~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~helio_pl~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~helio_pl~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~helio_pl~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~helio_pl~~InheritsGraph_node5" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~helio_pl~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~helio_pl~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~helio_pl~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~helio_pl~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -5049,7 +5049,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine helio_gr_kick_getacch_pl(self, param)
+public pure module subroutine helio_gr_kick_getacch_pl(self, param)
     
     
    
diff --git a/docs/type/helio_tp.html b/docs/type/helio_tp.html
index 463ad4b85..0d7abfcb8 100644
--- a/docs/type/helio_tp.html
+++ b/docs/type/helio_tp.html
@@ -408,36 +408,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.85,-33C269.49,-33 260.24,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.08,-29.5 241.08,-33 251.08,-36.5 251.08,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~helio_tp~~InheritsGraph_node4" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~helio_tp~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~helio_tp~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~helio_tp~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~helio_tp~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~helio_tp~~InheritsGraph_node5" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~helio_tp~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~helio_tp~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~helio_tp~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~helio_tp~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -2708,7 +2708,7 @@ <h3>interface
           
     
     <h3>
-public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
     
     
    
@@ -4577,7 +4577,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine helio_gr_kick_getacch_tp(self, param)
+public pure module subroutine helio_gr_kick_getacch_tp(self, param)
     
     
    
diff --git a/docs/type/rmvs_cb.html b/docs/type/rmvs_cb.html
index fae68ea9a..2980d8f5b 100644
--- a/docs/type/rmvs_cb.html
+++ b/docs/type/rmvs_cb.html
@@ -362,36 +362,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M273.5,-33C263.19,-33 251.08,-33 239.59,-33"/>
 <polygon fill="#000000" stroke="#000000" points="239.29,-29.5 229.29,-33 239.29,-36.5 239.29,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~rmvs_cb~~InheritsGraph_node5" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~rmvs_cb~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~rmvs_cb~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~rmvs_cb~~InheritsGraph_edge5" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.73,-37.82C146.18,-40.48 124.04,-43.84 104.48,-46.8"/>
-<polygon fill="#000000" stroke="#000000" points="103.89,-43.35 94.52,-48.31 104.94,-50.27 103.89,-43.35"/>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~rmvs_cb~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-37.82C151.33,-39.7 136.65,-41.92 122.2,-44.11"/>
+<polygon fill="#000000" stroke="#000000" points="121.62,-40.66 112.26,-45.62 122.67,-47.58 121.62,-40.66"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~rmvs_cb~~InheritsGraph_node6" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~rmvs_cb~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~rmvs_cb~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~rmvs_cb~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-28.18C151.33,-26.3 136.65,-24.08 122.2,-21.89"/>
-<polygon fill="#000000" stroke="#000000" points="122.67,-18.42 112.26,-20.38 121.62,-25.34 122.67,-18.42"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
+<g id="type~~rmvs_cb~~InheritsGraph_edge5" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.73,-28.18C146.18,-25.52 124.04,-22.16 104.48,-19.2"/>
+<polygon fill="#000000" stroke="#000000" points="104.94,-15.73 94.52,-17.69 103.89,-22.65 104.94,-15.73"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/rmvs_interp.html b/docs/type/rmvs_interp.html
index 3f0db6dc3..fa897ca4a 100644
--- a/docs/type/rmvs_interp.html
+++ b/docs/type/rmvs_interp.html
@@ -240,56 +240,56 @@ <h3 class="panel-title">Inherited by</h3>
 <!-- type~rmvs_interp -->
 <g id="type~~rmvs_interp~~InheritedByGraph_node1" class="node">
 <title>type~rmvs_interp</title>
-<polygon fill="none" stroke="black" points="69,-40 0,-40 0,-16 69,-16 69,-40"/>
-<text text-anchor="middle" x="34.5" y="-25.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_interp</text>
+<polygon fill="none" stroke="black" points="69,-45 0,-45 0,-21 69,-21 69,-45"/>
+<text text-anchor="middle" x="34.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_interp</text>
 </g>
-<!-- type~rmvs_cb -->
+<!-- type~rmvs_pl -->
 <g id="type~~rmvs_interp~~InheritedByGraph_node2" class="node">
-<title>type~rmvs_cb</title>
-<g id="a_type~~rmvs_interp~~InheritedByGraph_node2"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
+<title>type~rmvs_pl</title>
+<g id="a_type~~rmvs_interp~~InheritedByGraph_node2"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="208,-66 154,-66 154,-42 208,-42 208,-66"/>
-<text text-anchor="middle" x="181" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
+<text text-anchor="middle" x="181" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_cb&#45;&gt;type~rmvs_interp -->
-<g id="type~~rmvs_interp~~InheritedByGraph_edge1" class="edge">
-<title>type~rmvs_cb&#45;&gt;type~rmvs_interp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.83,-49.29C133.05,-45.55 103.54,-40.24 79.19,-35.86"/>
-<polygon fill="#000000" stroke="#000000" points="79.58,-32.37 69.11,-34.05 78.34,-39.26 79.58,-32.37"/>
-<text text-anchor="middle" x="111.5" y="-48.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_interp -->
+<g id="type~~rmvs_interp~~InheritedByGraph_edge2" class="edge">
+<title>type~rmvs_pl&#45;&gt;type~rmvs_interp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.83,-50.2C133.05,-47.18 103.54,-42.89 79.19,-39.35"/>
+<polygon fill="#000000" stroke="#000000" points="79.51,-35.86 69.11,-37.89 78.51,-42.79 79.51,-35.86"/>
+<text text-anchor="middle" x="111.5" y="-49.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
 </g>
-<!-- type~rmvs_pl -->
+<!-- type~rmvs_cb -->
 <g id="type~~rmvs_interp~~InheritedByGraph_node3" class="node">
-<title>type~rmvs_pl</title>
-<g id="a_type~~rmvs_interp~~InheritedByGraph_node3"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<title>type~rmvs_cb</title>
+<g id="a_type~~rmvs_interp~~InheritedByGraph_node3"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="208,-24 154,-24 154,0 208,0 208,-24"/>
-<text text-anchor="middle" x="181" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<text text-anchor="middle" x="181" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_interp -->
-<g id="type~~rmvs_interp~~InheritedByGraph_edge2" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_interp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.84,-12.31C135.15,-12.8 109.44,-14.02 87,-17 84.46,-17.34 81.86,-17.73 79.25,-18.17"/>
-<polygon fill="#000000" stroke="#000000" points="78.37,-14.77 69.17,-20.02 79.63,-21.66 78.37,-14.77"/>
-<text text-anchor="middle" x="111.5" y="-19.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
+<!-- type~rmvs_cb&#45;&gt;type~rmvs_interp -->
+<g id="type~~rmvs_interp~~InheritedByGraph_edge1" class="edge">
+<title>type~rmvs_cb&#45;&gt;type~rmvs_interp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M153.85,-14.08C135.16,-15.75 109.45,-18.41 87,-22 84.47,-22.4 81.88,-22.85 79.27,-23.33"/>
+<polygon fill="#000000" stroke="#000000" points="78.35,-19.94 69.2,-25.28 79.69,-26.81 78.35,-19.94"/>
+<text text-anchor="middle" x="111.5" y="-24.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
 </g>
 <!-- type~rmvs_tp -->
 <g id="type~~rmvs_interp~~InheritedByGraph_node4" class="node">
 <title>type~rmvs_tp</title>
 <g id="a_type~~rmvs_interp~~InheritedByGraph_node4"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="362,-66 308,-66 308,-42 362,-42 362,-66"/>
-<text text-anchor="middle" x="335" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="362,-24 308,-24 308,0 362,0 362,-24"/>
+<text text-anchor="middle" x="335" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
 <g id="type~~rmvs_interp~~InheritedByGraph_edge3" class="edge">
 <title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.87,-54C283.11,-54 245.7,-54 218.1,-54"/>
-<polygon fill="#000000" stroke="#000000" points="218.04,-50.5 208.04,-54 218.04,-57.5 218.04,-50.5"/>
-<text text-anchor="middle" x="258" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M307.87,-12C283.11,-12 245.7,-12 218.1,-12"/>
+<polygon fill="#000000" stroke="#000000" points="218.04,-8.5 208.04,-12 218.04,-15.5 218.04,-8.5"/>
+<text text-anchor="middle" x="258" y="-14.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
 </g>
 </g>
 </svg>
diff --git a/docs/type/rmvs_nbody_system.html b/docs/type/rmvs_nbody_system.html
index fc2f71265..83e6afdee 100644
--- a/docs/type/rmvs_nbody_system.html
+++ b/docs/type/rmvs_nbody_system.html
@@ -309,11 +309,11 @@ <h3 class="panel-title">Inherits</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~rmvs_nbody_system~~InheritsGraph Pages: 1 -->
-<svg id="typermvs_nbody_systemInheritsGraph" width="641pt" height="95pt"
- viewBox="0.00 0.00 641.00 95.48" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~rmvs_nbody_system~~InheritsGraph" class="graph" transform="scale(0.74 0.74) rotate(0) translate(4 125)">
+<svg id="typermvs_nbody_systemInheritsGraph" width="641pt" height="97pt"
+ viewBox="0.00 0.00 641.00 96.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~rmvs_nbody_system~~InheritsGraph" class="graph" transform="scale(0.74 0.74) rotate(0) translate(4 127)">
 <title>type~~rmvs_nbody_system~~InheritsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-125 862,-125 862,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-127 862,-127 862,4 -4,4"/>
 <!-- type~rmvs_nbody_system -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_node1" class="node">
 <title>type~rmvs_nbody_system</title>
@@ -350,118 +350,118 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M599.73,-54C591.1,-54 582.05,-54 573.11,-54"/>
 <polygon fill="#000000" stroke="#000000" points="573.07,-50.5 563.07,-54 573.07,-57.5 573.07,-50.5"/>
 </g>
-<!-- type~swiftest_tp -->
+<!-- type~swiftest_cb -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_node4" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-24 278,-24 278,0 341,0 341,-24"/>
-<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+<title>type~swiftest_cb</title>
+<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
+<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_edge5" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.81,-35.28 378.82,-27.1 351.13,-20.98"/>
-<polygon fill="#000000" stroke="#000000" points="351.52,-17.48 341,-18.74 350.01,-24.32 351.52,-17.48"/>
-<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
+<g id="type~~rmvs_nbody_system~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
+<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
+<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
 <!-- type~swiftest_pl -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_node5" class="node">
 <title>type~swiftest_pl</title>
 <g id="a_type~~rmvs_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-66 278.5,-66 278.5,-42 340.5,-42 340.5,-66"/>
-<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-24 278.5,-24 278.5,0 340.5,0 340.5,-24"/>
+<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_edge4" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.75,-54 376.66,-54 350.79,-54"/>
-<polygon fill="#000000" stroke="#000000" points="350.59,-50.5 340.59,-54 350.59,-57.5 350.59,-50.5"/>
-<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.58,-35.23 378.26,-26.98 350.5,-20.84"/>
+<polygon fill="#000000" stroke="#000000" points="351.25,-17.42 340.73,-18.68 349.74,-24.26 351.25,-17.42"/>
+<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_cb -->
+<!-- type~swiftest_tp -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_node6" class="node">
-<title>type~swiftest_cb</title>
-<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
-<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
+<title>type~swiftest_tp</title>
+<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-66 278,-66 278,-42 341,-42 341,-66"/>
+<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
-<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
-<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~rmvs_nbody_system~~InheritsGraph_edge5" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.94,-54 377.11,-54 351.3,-54"/>
+<polygon fill="#000000" stroke="#000000" points="351.12,-50.5 341.12,-54 351.12,-57.5 351.12,-50.5"/>
+<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~swiftest_body -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_node9" class="node">
-<title>type~swiftest_body</title>
-<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
-<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
+<!-- type~swiftest_particle_info -->
+<g id="type~~rmvs_nbody_system~~InheritsGraph_node7" class="node">
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-123 0,-123 0,-99 112,-99 112,-123"/>
+<text text-anchor="middle" x="56" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_edge6" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
-<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
-<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_edge7" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M278.3,-52.15C272.2,-52.29 265.86,-52.82 260,-54"/>
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-103.98C155.82,-104.84 138.87,-105.9 122.39,-106.93"/>
+<polygon fill="#000000" stroke="#000000" points="121.99,-103.45 112.23,-107.56 122.43,-110.43 121.99,-103.45"/>
+<text text-anchor="middle" x="138" y="-108.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
 <!-- type~swiftest_base -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_node7" class="node">
+<g id="type~~rmvs_nbody_system~~InheritsGraph_node8" class="node">
 <title>type~swiftest_base</title>
-<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-121 17.5,-121 17.5,-97 94.5,-97 94.5,-121"/>
-<text text-anchor="middle" x="56" y="-106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-69 17.5,-69 17.5,-45 94.5,-45 94.5,-69"/>
+<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_edge9" class="edge">
+<g id="type~~rmvs_nbody_system~~InheritsGraph_edge7" class="edge">
 <title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.82,-104.49C162.03,-105.05 153.72,-105.59 146,-106 132.72,-106.7 118.32,-107.27 105.05,-107.72"/>
-<polygon fill="#000000" stroke="#000000" points="104.57,-104.23 94.69,-108.05 104.8,-111.23 104.57,-104.23"/>
+<path fill="none" stroke="#000000" d="M169.79,-92.12C150.55,-86.13 125.65,-78.38 104.14,-71.68"/>
+<polygon fill="#000000" stroke="#000000" points="105.11,-68.32 94.52,-68.69 103.03,-75 105.11,-68.32"/>
 </g>
-<!-- type~swiftest_particle_info -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_node8" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-69 0,-69 0,-45 112,-45 112,-69"/>
-<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<!-- type~swiftest_body -->
+<g id="type~~rmvs_nbody_system~~InheritsGraph_node9" class="node">
+<title>type~swiftest_body</title>
+<g id="a_type~~rmvs_nbody_system~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
+<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_edge8" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-92.12C150.93,-86.25 126.61,-78.68 105.39,-72.07"/>
-<polygon fill="#000000" stroke="#000000" points="106.17,-68.65 95.58,-69.01 104.09,-75.33 106.17,-68.65"/>
-<text text-anchor="middle" x="138" y="-85.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
+<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
+<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~rmvs_nbody_system~~InheritsGraph_edge11" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.72,-64.65C152.75,-68.01 140.81,-71.91 130,-76 117.07,-80.89 103.17,-86.96 91,-92.56"/>
-<polygon fill="#000000" stroke="#000000" points="89.26,-89.51 81.67,-96.91 92.22,-95.85 89.26,-89.51"/>
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<g id="type~~rmvs_nbody_system~~InheritsGraph_edge9" class="edge">
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M277.79,-52.16C271.84,-52.32 265.7,-52.85 260,-54"/>
 </g>
 <!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~rmvs_nbody_system~~InheritsGraph_edge10" class="edge">
 <title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.1,-41.94C158.79,-40.3 152.26,-38.88 146,-38 130.11,-35.76 112.82,-38.28 97.74,-42.15"/>
-<polygon fill="#000000" stroke="#000000" points="96.37,-38.9 87.7,-45 98.28,-45.63 96.37,-38.9"/>
-<text text-anchor="middle" x="138" y="-40.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.86,-66.09C149.4,-74.55 120.51,-85.95 97.21,-95.14"/>
+<polygon fill="#000000" stroke="#000000" points="95.62,-92 87.6,-98.93 98.19,-98.52 95.62,-92"/>
+<text text-anchor="middle" x="138" y="-82.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+</g>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~rmvs_nbody_system~~InheritsGraph_edge11" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.94,-48.62C157.95,-47.94 151.82,-47.37 146,-47 132.52,-46.15 117.94,-47.03 104.56,-48.56"/>
+<polygon fill="#000000" stroke="#000000" points="104.08,-45.1 94.6,-49.84 104.97,-52.04 104.08,-45.1"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/rmvs_pl.html b/docs/type/rmvs_pl.html
index 0c48531f3..a024a7c2a 100644
--- a/docs/type/rmvs_pl.html
+++ b/docs/type/rmvs_pl.html
@@ -421,11 +421,11 @@ <h3 class="panel-title">Inherits</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~rmvs_pl~~InheritsGraph Pages: 1 -->
-<svg id="typermvs_plInheritsGraph" width="641pt" height="108pt"
- viewBox="0.00 0.00 641.00 107.93" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~rmvs_pl~~InheritsGraph" class="graph" transform="scale(0.6 0.6) rotate(0) translate(4 176)">
+<svg id="typermvs_plInheritsGraph" width="641pt" height="109pt"
+ viewBox="0.00 0.00 641.00 109.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~rmvs_pl~~InheritsGraph" class="graph" transform="scale(0.6 0.6) rotate(0) translate(4 178)">
 <title>type~~rmvs_pl~~InheritsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-176 1065,-176 1065,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-178 1065,-178 1065,4 -4,4"/>
 <!-- type~rmvs_pl -->
 <g id="type~~rmvs_pl~~InheritsGraph_node1" class="node">
 <title>type~rmvs_pl</title>
@@ -480,9 +480,9 @@ <h3 class="panel-title">Inherits</h3>
 <text text-anchor="middle" x="959" y="-80.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
 <!-- type~swiftest_pl -->
-<g id="type~~rmvs_pl~~InheritsGraph_node5" class="node">
+<g id="type~~rmvs_pl~~InheritsGraph_node6" class="node">
 <title>type~swiftest_pl</title>
-<g id="a_type~~rmvs_pl~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
+<g id="a_type~~rmvs_pl~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-75 278.5,-75 278.5,-51 340.5,-51 340.5,-75"/>
 <text text-anchor="middle" x="309.5" y="-60.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
@@ -495,9 +495,9 @@ <h3 class="panel-title">Inherits</h3>
 <polygon fill="#000000" stroke="#000000" points="350.48,-58.42 340.58,-62.19 350.67,-65.41 350.48,-58.42"/>
 </g>
 <!-- type~whm_nbody_system -->
-<g id="type~~rmvs_pl~~InheritsGraph_node6" class="node">
+<g id="type~~rmvs_pl~~InheritsGraph_node5" class="node">
 <title>type~whm_nbody_system</title>
-<g id="a_type~~rmvs_pl~~InheritsGraph_node6"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<g id="a_type~~rmvs_pl~~InheritsGraph_node5"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="710,-106 600,-106 600,-82 710,-82 710,-106"/>
 <text text-anchor="middle" x="655" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
 </a>
@@ -509,22 +509,6 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M800,-92.55C775.27,-92.8 745.87,-93.09 720.09,-93.35"/>
 <polygon fill="#000000" stroke="#000000" points="720,-89.85 710.04,-93.46 720.07,-96.85 720,-89.85"/>
 </g>
-<!-- type~swiftest_body -->
-<g id="type~~rmvs_pl~~InheritsGraph_node7" class="node">
-<title>type~swiftest_body</title>
-<g id="a_type~~rmvs_pl~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-117 164,-117 164,-93 241,-93 241,-117"/>
-<text text-anchor="middle" x="202.5" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
-</a>
-</g>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~rmvs_pl~~InheritsGraph_edge6" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M259,-105C256.48,-105.51 253.88,-105.91 251.25,-106.22"/>
-<polygon fill="#000000" stroke="#000000" points="250.72,-102.75 241.02,-107.02 251.26,-109.73 250.72,-102.75"/>
-<path fill="none" stroke="#000000" d="M289.21,-75.15C285.36,-77.89 281.44,-80.9 278,-84 268.86,-92.22 272.05,-102.57 260,-105"/>
-</g>
 <!-- type~swiftest_nbody_system -->
 <g id="type~~rmvs_pl~~InheritsGraph_node8" class="node">
 <title>type~swiftest_nbody_system</title>
@@ -535,41 +519,57 @@ <h3 class="panel-title">Inherits</h3>
 </g>
 </g>
 <!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
-<g id="type~~rmvs_pl~~InheritsGraph_edge7" class="edge">
+<g id="type~~rmvs_pl~~InheritsGraph_edge6" class="edge">
 <title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
 <path fill="none" stroke="#000000" d="M599.73,-100.81C591.1,-101.89 582.05,-103.02 573.11,-104.14"/>
 <polygon fill="#000000" stroke="#000000" points="572.56,-100.69 563.07,-105.4 573.43,-107.63 572.56,-100.69"/>
 </g>
-<!-- type~swiftest_base -->
-<g id="type~~rmvs_pl~~InheritsGraph_node9" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~rmvs_pl~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-172 17.5,-172 17.5,-148 94.5,-148 94.5,-172"/>
-<text text-anchor="middle" x="56" y="-157.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<!-- type~swiftest_body -->
+<g id="type~~rmvs_pl~~InheritsGraph_node7" class="node">
+<title>type~swiftest_body</title>
+<g id="a_type~~rmvs_pl~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-117 164,-117 164,-93 241,-93 241,-117"/>
+<text text-anchor="middle" x="202.5" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~rmvs_pl~~InheritsGraph_edge9" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.72,-115.65C152.75,-119.01 140.81,-122.91 130,-127 117.07,-131.89 103.17,-137.96 91,-143.56"/>
-<polygon fill="#000000" stroke="#000000" points="89.26,-140.51 81.67,-147.91 92.22,-146.85 89.26,-140.51"/>
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
+<g id="type~~rmvs_pl~~InheritsGraph_edge7" class="edge">
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M259,-105C256.48,-105.51 253.88,-105.91 251.25,-106.22"/>
+<polygon fill="#000000" stroke="#000000" points="250.72,-102.75 241.02,-107.02 251.26,-109.73 250.72,-102.75"/>
+<path fill="none" stroke="#000000" d="M289.21,-75.15C285.36,-77.89 281.44,-80.9 278,-84 268.86,-92.22 272.05,-102.57 260,-105"/>
 </g>
 <!-- type~swiftest_particle_info -->
 <g id="type~~rmvs_pl~~InheritsGraph_node10" class="node">
 <title>type~swiftest_particle_info</title>
 <g id="a_type~~rmvs_pl~~InheritsGraph_node10"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-120 0,-120 0,-96 112,-96 112,-120"/>
-<text text-anchor="middle" x="56" y="-105.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-174 0,-174 0,-150 112,-150 112,-174"/>
+<text text-anchor="middle" x="56" y="-159.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~rmvs_pl~~InheritsGraph_edge8" class="edge">
 <title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.1,-92.94C158.79,-91.3 152.26,-89.88 146,-89 130.11,-86.76 112.82,-89.28 97.74,-93.15"/>
-<polygon fill="#000000" stroke="#000000" points="96.37,-89.9 87.7,-96 98.28,-96.63 96.37,-89.9"/>
-<text text-anchor="middle" x="138" y="-91.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.86,-117.09C149.4,-125.55 120.51,-136.95 97.21,-146.14"/>
+<polygon fill="#000000" stroke="#000000" points="95.62,-143 87.6,-149.93 98.19,-149.52 95.62,-143"/>
+<text text-anchor="middle" x="138" y="-133.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+</g>
+<!-- type~swiftest_base -->
+<g id="type~~rmvs_pl~~InheritsGraph_node11" class="node">
+<title>type~swiftest_base</title>
+<g id="a_type~~rmvs_pl~~InheritsGraph_node11"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-120 17.5,-120 17.5,-96 94.5,-96 94.5,-120"/>
+<text text-anchor="middle" x="56" y="-105.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+</a>
+</g>
+</g>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~rmvs_pl~~InheritsGraph_edge9" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.94,-99.62C157.95,-98.94 151.82,-98.37 146,-98 132.52,-97.15 117.94,-98.03 104.56,-99.56"/>
+<polygon fill="#000000" stroke="#000000" points="104.08,-96.1 94.6,-100.84 104.97,-103.04 104.08,-96.1"/>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~rmvs_pl~~InheritsGraph_edge11" class="edge">
@@ -579,9 +579,9 @@ <h3 class="panel-title">Inherits</h3>
 <text text-anchor="middle" x="390.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
 <!-- type~swiftest_cb -->
-<g id="type~~rmvs_pl~~InheritsGraph_node11" class="node">
+<g id="type~~rmvs_pl~~InheritsGraph_node9" class="node">
 <title>type~swiftest_cb</title>
-<g id="a_type~~rmvs_pl~~InheritsGraph_node11"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<g id="a_type~~rmvs_pl~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="235,-165 170,-165 170,-141 235,-141 235,-165"/>
 <text text-anchor="middle" x="202.5" y="-150.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
@@ -610,18 +610,18 @@ <h3 class="panel-title">Inherits</h3>
 <polygon fill="#000000" stroke="#000000" points="351.26,-103.21 341.12,-106.29 350.96,-110.21 351.26,-103.21"/>
 <text text-anchor="middle" x="390.5" y="-111.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~rmvs_pl~~InheritsGraph_edge14" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.82,-155.49C162.03,-156.05 153.72,-156.59 146,-157 132.72,-157.7 118.32,-158.27 105.05,-158.72"/>
-<polygon fill="#000000" stroke="#000000" points="104.57,-155.23 94.69,-159.05 104.8,-162.23 104.57,-155.23"/>
-</g>
 <!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~rmvs_pl~~InheritsGraph_edge13" class="edge">
 <title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-143.12C150.93,-137.25 126.61,-129.68 105.39,-123.07"/>
-<polygon fill="#000000" stroke="#000000" points="106.17,-119.65 95.58,-120.01 104.09,-126.33 106.17,-119.65"/>
-<text text-anchor="middle" x="138" y="-136.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-154.98C155.82,-155.84 138.87,-156.9 122.39,-157.93"/>
+<polygon fill="#000000" stroke="#000000" points="121.99,-154.45 112.23,-158.56 122.43,-161.43 121.99,-154.45"/>
+<text text-anchor="middle" x="138" y="-159.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+</g>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
+<g id="type~~rmvs_pl~~InheritsGraph_edge14" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M169.79,-143.12C150.55,-137.13 125.65,-129.38 104.14,-122.68"/>
+<polygon fill="#000000" stroke="#000000" points="105.11,-119.32 94.52,-119.69 103.03,-126 105.11,-119.32"/>
 </g>
 <!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
 <g id="type~~rmvs_pl~~InheritsGraph_edge15" class="edge">
@@ -4546,7 +4546,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine whm_gr_kick_getacch_pl(self, param)
+public pure module subroutine whm_gr_kick_getacch_pl(self, param)
     
     
    
diff --git a/docs/type/rmvs_tp.html b/docs/type/rmvs_tp.html
index 6df54234a..71d08d687 100644
--- a/docs/type/rmvs_tp.html
+++ b/docs/type/rmvs_tp.html
@@ -395,10 +395,25 @@ <h3 class="panel-title">Inherits</h3>
 <polygon fill="none" stroke="black" points="640,-44 586,-44 586,-20 640,-20 640,-44"/>
 <text text-anchor="middle" x="613" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50">rmvs_tp</text>
 </g>
-<!-- type~rmvs_cb -->
+<!-- type~whm_tp -->
 <g id="type~~rmvs_tp~~InheritsGraph_node2" class="node">
+<title>type~whm_tp</title>
+<g id="a_type~~rmvs_tp~~InheritsGraph_node2"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="486,-24 432,-24 432,0 486,0 486,-24"/>
+<text text-anchor="middle" x="459" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
+</a>
+</g>
+</g>
+<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
+<g id="type~~rmvs_tp~~InheritsGraph_edge2" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
+<path fill="none" stroke="#000000" d="M585.87,-28.56C561.11,-25.3 523.7,-20.38 496.1,-16.75"/>
+<polygon fill="#000000" stroke="#000000" points="496.41,-13.26 486.04,-15.43 495.5,-20.2 496.41,-13.26"/>
+</g>
+<!-- type~rmvs_cb -->
+<g id="type~~rmvs_tp~~InheritsGraph_node3" class="node">
 <title>type~rmvs_cb</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node2"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
+<g id="a_type~~rmvs_tp~~InheritsGraph_node3"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="486,-66 432,-66 432,-42 486,-42 486,-66"/>
 <text text-anchor="middle" x="459" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
 </a>
@@ -411,66 +426,66 @@ <h3 class="panel-title">Inherits</h3>
 <polygon fill="#000000" stroke="#000000" points="495.44,-45.33 486.04,-50.23 496.44,-52.26 495.44,-45.33"/>
 <text text-anchor="middle" x="536" y="-49.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
 </g>
-<!-- type~whm_tp -->
-<g id="type~~rmvs_tp~~InheritsGraph_node3" class="node">
-<title>type~whm_tp</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node3"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="486,-24 432,-24 432,0 486,0 486,-24"/>
-<text text-anchor="middle" x="459" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
+<!-- type~swiftest_tp -->
+<g id="type~~rmvs_tp~~InheritsGraph_node6" class="node">
+<title>type~swiftest_tp</title>
+<g id="a_type~~rmvs_tp~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="344,-24 281,-24 281,0 344,0 344,-24"/>
+<text text-anchor="middle" x="312.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge2" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
-<path fill="none" stroke="#000000" d="M585.87,-28.56C561.11,-25.3 523.7,-20.38 496.1,-16.75"/>
-<polygon fill="#000000" stroke="#000000" points="496.41,-13.26 486.04,-15.43 495.5,-20.2 496.41,-13.26"/>
+<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
+<g id="type~~rmvs_tp~~InheritsGraph_edge3" class="edge">
+<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" d="M431.83,-12C410.27,-12 379.31,-12 354.46,-12"/>
+<polygon fill="#000000" stroke="#000000" points="354.24,-8.5 344.24,-12 354.24,-15.5 354.24,-8.5"/>
 </g>
 <!-- type~rmvs_interp -->
-<g id="type~~rmvs_tp~~InheritsGraph_node5" class="node">
+<g id="type~~rmvs_tp~~InheritsGraph_node4" class="node">
 <title>type~rmvs_interp</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node5"><a xlink:href=".././type/rmvs_interp.html" xlink:title="rmvs_interp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="347,-66 278,-66 278,-42 347,-42 347,-66"/>
-<text text-anchor="middle" x="312.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp</text>
+<g id="a_type~~rmvs_tp~~InheritsGraph_node4"><a xlink:href=".././type/rmvs_interp.html" xlink:title="rmvs_interp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="347,-108 278,-108 278,-84 347,-84 347,-108"/>
+<text text-anchor="middle" x="312.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_interp</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_cb&#45;&gt;type~rmvs_interp -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge3" class="edge">
+<g id="type~~rmvs_tp~~InheritsGraph_edge4" class="edge">
 <title>type~rmvs_cb&#45;&gt;type~rmvs_interp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431.83,-54C411.05,-54 381.54,-54 357.19,-54"/>
-<polygon fill="#000000" stroke="#000000" points="357.11,-50.5 347.11,-54 357.11,-57.5 357.11,-50.5"/>
-<text text-anchor="middle" x="389.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M431.99,-62.45C426.09,-64.32 419.84,-66.26 414,-68 395.43,-73.54 374.82,-79.34 357.13,-84.22"/>
+<polygon fill="#000000" stroke="#000000" points="355.81,-80.95 347.09,-86.97 357.66,-87.7 355.81,-80.95"/>
+<text text-anchor="middle" x="389.5" y="-83.4" font-family="Helvetica,sans-Serif" font-size="9.50">outer, inner</text>
 </g>
 <!-- type~whm_cb -->
-<g id="type~~rmvs_tp~~InheritsGraph_node6" class="node">
+<g id="type~~rmvs_tp~~InheritsGraph_node5" class="node">
 <title>type~whm_cb</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node6"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="339.5,-108 285.5,-108 285.5,-84 339.5,-84 339.5,-108"/>
-<text text-anchor="middle" x="312.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
+<g id="a_type~~rmvs_tp~~InheritsGraph_node5"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="339.5,-66 285.5,-66 285.5,-42 339.5,-42 339.5,-66"/>
+<text text-anchor="middle" x="312.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_cb&#45;&gt;type~whm_cb -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge4" class="edge">
+<g id="type~~rmvs_tp~~InheritsGraph_edge5" class="edge">
 <title>type~rmvs_cb&#45;&gt;type~whm_cb</title>
-<path fill="none" stroke="#000000" d="M431.99,-62.45C426.09,-64.32 419.84,-66.26 414,-68 392.67,-74.36 368.65,-81.07 349.45,-86.33"/>
-<polygon fill="#000000" stroke="#000000" points="348.33,-83 339.6,-89.01 350.17,-89.76 348.33,-83"/>
+<path fill="none" stroke="#000000" d="M431.83,-54C408.96,-54 375.51,-54 350,-54"/>
+<polygon fill="#000000" stroke="#000000" points="349.96,-50.5 339.96,-54 349.96,-57.5 349.96,-50.5"/>
 </g>
-<!-- type~swiftest_tp -->
-<g id="type~~rmvs_tp~~InheritsGraph_node4" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="344,-24 281,-24 281,0 344,0 344,-24"/>
-<text text-anchor="middle" x="312.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+<!-- type~swiftest_cb -->
+<g id="type~~rmvs_tp~~InheritsGraph_node7" class="node">
+<title>type~swiftest_cb</title>
+<g id="a_type~~rmvs_tp~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-66 170,-66 170,-42 235,-42 235,-66"/>
+<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
 </g>
 </g>
-<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge5" class="edge">
-<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" d="M431.83,-12C410.27,-12 379.31,-12 354.46,-12"/>
-<polygon fill="#000000" stroke="#000000" points="354.24,-8.5 344.24,-12 354.24,-15.5 354.24,-8.5"/>
+<!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
+<g id="type~~rmvs_tp~~InheritsGraph_edge6" class="edge">
+<title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" d="M285.36,-54C273.32,-54 258.74,-54 245.23,-54"/>
+<polygon fill="#000000" stroke="#000000" points="245.18,-50.5 235.18,-54 245.18,-57.5 245.18,-50.5"/>
 </g>
 <!-- type~swiftest_body -->
 <g id="type~~rmvs_tp~~InheritsGraph_node8" class="node">
@@ -482,69 +497,54 @@ <h3 class="panel-title">Inherits</h3>
 </g>
 </g>
 <!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge6" class="edge">
+<g id="type~~rmvs_tp~~InheritsGraph_edge7" class="edge">
 <title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
 <path fill="none" stroke="#000000" d="M280.84,-12C271.68,-12 261.4,-12 251.41,-12"/>
 <polygon fill="#000000" stroke="#000000" points="251.15,-8.5 241.15,-12 251.15,-15.5 251.15,-8.5"/>
 </g>
-<!-- type~swiftest_cb -->
-<g id="type~~rmvs_tp~~InheritsGraph_node7" class="node">
-<title>type~swiftest_cb</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-107 170,-107 170,-83 235,-83 235,-107"/>
-<text text-anchor="middle" x="202.5" y="-92.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
+<!-- type~swiftest_particle_info -->
+<g id="type~~rmvs_tp~~InheritsGraph_node9" class="node">
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~rmvs_tp~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-78 0,-78 0,-54 112,-54 112,-78"/>
+<text text-anchor="middle" x="56" y="-63.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge7" class="edge">
-<title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" d="M285.36,-95.76C273.32,-95.65 258.74,-95.51 245.23,-95.39"/>
-<polygon fill="#000000" stroke="#000000" points="245.21,-91.89 235.18,-95.29 245.15,-98.89 245.21,-91.89"/>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~rmvs_tp~~InheritsGraph_edge8" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-56.63C155.82,-57.79 138.87,-59.2 122.39,-60.57"/>
+<polygon fill="#000000" stroke="#000000" points="121.91,-57.1 112.23,-61.41 122.48,-64.07 121.91,-57.1"/>
+<text text-anchor="middle" x="138" y="-61.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
 <!-- type~swiftest_base -->
-<g id="type~~rmvs_tp~~InheritsGraph_node9" class="node">
+<g id="type~~rmvs_tp~~InheritsGraph_node10" class="node">
 <title>type~swiftest_base</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node9"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-96 17.5,-96 17.5,-72 94.5,-72 94.5,-96"/>
-<text text-anchor="middle" x="56" y="-81.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<g id="a_type~~rmvs_tp~~InheritsGraph_node10"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
 <g id="type~~rmvs_tp~~InheritsGraph_edge9" class="edge">
 <title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.79,-92.59C150.73,-91.13 126.1,-89.26 104.72,-87.63"/>
-<polygon fill="#000000" stroke="#000000" points="104.76,-84.13 94.52,-86.86 104.23,-91.11 104.76,-84.13"/>
-</g>
-<!-- type~swiftest_particle_info -->
-<g id="type~~rmvs_tp~~InheritsGraph_node10" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~rmvs_tp~~InheritsGraph_node10"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-44 0,-44 0,-20 112,-20 112,-44"/>
-<text text-anchor="middle" x="56" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
-</a>
+<path fill="none" stroke="#000000" d="M169.79,-44.78C150.55,-39.19 125.65,-31.95 104.14,-25.7"/>
+<polygon fill="#000000" stroke="#000000" points="105.1,-22.34 94.52,-22.91 103.15,-29.06 105.1,-22.34"/>
 </g>
-</g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge8" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M173.64,-82.85C151.05,-73 119.01,-59.04 94.22,-48.23"/>
-<polygon fill="#000000" stroke="#000000" points="95.34,-44.9 84.78,-44.11 92.54,-51.31 95.34,-44.9"/>
-<text text-anchor="middle" x="138" y="-71.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~rmvs_tp~~InheritsGraph_edge10" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.07,-24.12C148.34,-31.87 121.25,-41.99 98.9,-50.34"/>
+<polygon fill="#000000" stroke="#000000" points="97.46,-47.14 89.32,-53.92 99.91,-53.7 97.46,-47.14"/>
+<text text-anchor="middle" x="138" y="-39.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
 <!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
 <g id="type~~rmvs_tp~~InheritsGraph_edge11" class="edge">
 <title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M177.31,-24.05C153.56,-35.89 117.11,-54.05 90.56,-67.28"/>
-<polygon fill="#000000" stroke="#000000" points="88.65,-64.32 81.26,-71.91 91.78,-70.58 88.65,-64.32"/>
-</g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~rmvs_tp~~InheritsGraph_edge10" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.9,-10.83C152.93,-10.95 140.95,-11.52 130,-13 122.15,-14.06 113.94,-15.68 105.97,-17.54"/>
-<polygon fill="#000000" stroke="#000000" points="104.92,-14.19 96.05,-19.99 106.6,-20.98 104.92,-14.19"/>
-<text text-anchor="middle" x="138" y="-15.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" d="M163.71,-4.26C157.8,-3.32 151.75,-2.51 146,-2 132.55,-0.8 117.98,-1.56 104.6,-3.1"/>
+<polygon fill="#000000" stroke="#000000" points="104.1,0.37 94.64,-4.4 105.01,-6.57 104.1,0.37"/>
 </g>
 </g>
 </svg>
@@ -2881,7 +2881,7 @@ <h3>interface
           
     
     <h3>
-public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
     
     
    
@@ -3763,7 +3763,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine whm_gr_kick_getacch_tp(self, param)
+public pure module subroutine whm_gr_kick_getacch_tp(self, param)
     
     
    
diff --git a/docs/type/swiftest_base.html b/docs/type/swiftest_base.html
index a897956c6..f48aa582b 100644
--- a/docs/type/swiftest_base.html
+++ b/docs/type/swiftest_base.html
@@ -278,26 +278,41 @@ <h3 class="panel-title">Inherited by</h3>
 <path fill="none" stroke="#000000" d="M95,-179C92.51,-179.44 89.95,-179.8 87.35,-180.07"/>
 <polygon fill="#000000" stroke="#000000" points="87,-176.59 77.27,-180.79 87.5,-183.57 87,-176.59"/>
 </g>
-<!-- type~helio_cb -->
+<!-- type~swiftest_tp -->
 <g id="type~~swiftest_base~~InheritedByGraph_node4" class="node">
+<title>type~swiftest_tp</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node4"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="291,-193 228,-193 228,-169 291,-169 291,-193"/>
+<text text-anchor="middle" x="259.5" y="-178.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+</a>
+</g>
+</g>
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge7" class="edge">
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M229.81,-168.98C218,-164.03 204.16,-158.23 191.53,-152.93"/>
+<polygon fill="#000000" stroke="#000000" points="192.73,-149.65 182.16,-149.01 190.03,-156.1 192.73,-149.65"/>
+</g>
+<!-- type~helio_cb -->
+<g id="type~~swiftest_base~~InheritedByGraph_node5" class="node">
 <title>type~helio_cb</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node4"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node5"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="286.5,-274 232.5,-274 232.5,-250 286.5,-250 286.5,-274"/>
 <text text-anchor="middle" x="259.5" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_cb</text>
 </a>
 </g>
 </g>
 <!-- type~helio_cb&#45;&gt;type~swiftest_cb -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge4" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge5" class="edge">
 <title>type~helio_cb&#45;&gt;type~swiftest_cb</title>
 <path fill="none" stroke="#000000" d="M209,-283C179.4,-265.47 164.74,-226.11 158.16,-201.15"/>
 <polygon fill="#000000" stroke="#000000" points="161.5,-200.04 155.75,-191.14 154.69,-201.68 161.5,-200.04"/>
 <path fill="none" stroke="#000000" d="M239.31,-274.04C228.14,-280.32 215.25,-286.11 210,-283"/>
 </g>
 <!-- type~swiftest_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_node5" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node6" class="node">
 <title>type~swiftest_nbody_system</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node5"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node6"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="513,-148 390,-148 390,-124 513,-124 513,-148"/>
 <text text-anchor="middle" x="451.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
 </a>
@@ -310,64 +325,49 @@ <h3 class="panel-title">Inherited by</h3>
 <polygon fill="#000000" stroke="#000000" points="186.6,-159.81 178.75,-166.93 189.32,-166.26 186.6,-159.81"/>
 <text text-anchor="middle" x="259.5" y="-152.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge8" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.1,-148.02C391.45,-150.35 381.41,-152.76 372,-155 348.57,-160.57 322.34,-166.69 301.21,-171.59"/>
+<polygon fill="#000000" stroke="#000000" points="300.23,-168.23 291.28,-173.9 301.81,-175.05 300.23,-168.23"/>
+<text text-anchor="middle" x="340.5" y="-171.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+</g>
 <!-- type~swiftest_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_node6" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node8" class="node">
 <title>type~swiftest_pl</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node6"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node8"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="290.5,-105 228.5,-105 228.5,-81 290.5,-81 290.5,-105"/>
 <text text-anchor="middle" x="259.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge10" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge14" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.55,-123.95C391.77,-121.6 381.57,-119.19 372,-117 348.44,-111.62 322.01,-105.91 300.79,-101.41"/>
 <polygon fill="#000000" stroke="#000000" points="301.34,-97.95 290.83,-99.31 299.89,-104.8 301.34,-97.95"/>
 <text text-anchor="middle" x="340.5" y="-119.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_node7" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node7"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="291,-193 228,-193 228,-169 291,-169 291,-193"/>
-<text text-anchor="middle" x="259.5" y="-178.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
-</a>
-</g>
-</g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge14" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M401.1,-148.02C391.45,-150.35 381.41,-152.76 372,-155 348.57,-160.57 322.34,-166.69 301.21,-171.59"/>
-<polygon fill="#000000" stroke="#000000" points="300.23,-168.23 291.28,-173.9 301.81,-175.05 300.23,-168.23"/>
-<text text-anchor="middle" x="340.5" y="-171.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge7" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M229.81,-105.02C218,-109.97 204.16,-115.77 191.53,-121.07"/>
-<polygon fill="#000000" stroke="#000000" points="190.03,-117.9 182.16,-124.99 192.73,-124.35 190.03,-117.9"/>
-</g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge6" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M229.81,-168.98C218,-164.03 204.16,-158.23 191.53,-152.93"/>
-<polygon fill="#000000" stroke="#000000" points="192.73,-149.65 182.16,-149.01 190.03,-156.1 192.73,-149.65"/>
-</g>
 <!-- type~whm_cb -->
-<g id="type~~swiftest_base~~InheritedByGraph_node8" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node7" class="node">
 <title>type~whm_cb</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node8"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node7"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="286.5,-316 232.5,-316 232.5,-292 286.5,-292 286.5,-316"/>
 <text text-anchor="middle" x="259.5" y="-301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
 </a>
 </g>
 </g>
 <!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge5" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge4" class="edge">
 <title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
 <path fill="none" stroke="#000000" d="M232.48,-294.16C225.03,-290.97 217.03,-287.16 210,-283"/>
 </g>
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge6" class="edge">
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M229.81,-105.02C218,-109.97 204.16,-115.77 191.53,-121.07"/>
+<polygon fill="#000000" stroke="#000000" points="190.03,-117.9 182.16,-124.99 192.73,-124.35 190.03,-117.9"/>
+</g>
 <!-- type~symba_cb -->
 <g id="type~~swiftest_base~~InheritedByGraph_node9" class="node">
 <title>type~symba_cb</title>
@@ -378,255 +378,255 @@ <h3 class="panel-title">Inherited by</h3>
 </g>
 </g>
 <!-- type~symba_cb&#45;&gt;type~helio_cb -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge8" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge11" class="edge">
 <title>type~symba_cb&#45;&gt;type~helio_cb</title>
 <path fill="none" stroke="#000000" d="M420.81,-262C387.28,-262 332.71,-262 296.7,-262"/>
 <polygon fill="#000000" stroke="#000000" points="296.62,-258.5 286.62,-262 296.62,-265.5 296.62,-258.5"/>
 </g>
-<!-- type~whm_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_node10" class="node">
-<title>type~whm_nbody_system</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node10"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="723,-148 613,-148 613,-124 723,-124 723,-148"/>
-<text text-anchor="middle" x="668" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
-</a>
-</g>
-</g>
-<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge9" class="edge">
-<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
-<path fill="none" stroke="#000000" d="M612.87,-136C585.67,-136 552.37,-136 523.18,-136"/>
-<polygon fill="#000000" stroke="#000000" points="523.04,-132.5 513.04,-136 523.04,-139.5 523.04,-132.5"/>
-</g>
 <!-- type~whm_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_node11" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node10" class="node">
 <title>type~whm_pl</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node11"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node10"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="795,-24 741,-24 741,0 795,0 795,-24"/>
 <text text-anchor="middle" x="768" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
 </a>
 </g>
 </g>
 <!-- type~whm_pl&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge11" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge15" class="edge">
 <title>type~whm_pl&#45;&gt;type~swiftest_pl</title>
 <path fill="none" stroke="#000000" d="M339.5,-52C320.57,-56.46 301.15,-66.45 286.31,-75.45"/>
 <polygon fill="#000000" stroke="#000000" points="284.3,-72.57 277.7,-80.86 288.03,-78.5 284.3,-72.57"/>
 <path fill="none" stroke="#000000" d="M740.96,-10.16C679.11,-6.47 518.91,-0.89 390,-31 367.13,-36.34 364.36,-46.62 341.5,-52"/>
 </g>
-<!-- type~helio_tp -->
+<!-- type~fraggle_fragments -->
+<g id="type~~swiftest_base~~InheritedByGraph_node11" class="node">
+<title>type~fraggle_fragments</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node11"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="501.5,-64 401.5,-64 401.5,-40 501.5,-40 501.5,-64"/>
+<text text-anchor="middle" x="451.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
+</a>
+</g>
+</g>
+<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge16" class="edge">
+<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" d="M401.38,-47.24C382.45,-46.63 360.75,-47.47 341.5,-52"/>
+</g>
+<!-- type~whm_tp -->
 <g id="type~~swiftest_base~~InheritedByGraph_node12" class="node">
+<title>type~whm_tp</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node12"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="478.5,-232 424.5,-232 424.5,-208 478.5,-208 478.5,-232"/>
+<text text-anchor="middle" x="451.5" y="-217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
+</a>
+</g>
+</g>
+<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge9" class="edge">
+<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" d="M424.48,-217.68C402.37,-215.64 369.82,-212.46 341.5,-209"/>
+</g>
+<!-- type~whm_nbody_system -->
+<g id="type~~swiftest_base~~InheritedByGraph_node13" class="node">
+<title>type~whm_nbody_system</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node13"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="723,-148 613,-148 613,-124 723,-124 723,-148"/>
+<text text-anchor="middle" x="668" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
+</a>
+</g>
+</g>
+<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge12" class="edge">
+<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
+<path fill="none" stroke="#000000" d="M612.87,-136C585.67,-136 552.37,-136 523.18,-136"/>
+<polygon fill="#000000" stroke="#000000" points="523.04,-132.5 513.04,-136 523.04,-139.5 523.04,-132.5"/>
+</g>
+<!-- type~helio_tp -->
+<g id="type~~swiftest_base~~InheritedByGraph_node14" class="node">
 <title>type~helio_tp</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node12"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node14"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="478.5,-190 424.5,-190 424.5,-166 478.5,-166 478.5,-190"/>
 <text text-anchor="middle" x="451.5" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
 </a>
 </g>
 </g>
 <!-- type~helio_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge15" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge10" class="edge">
 <title>type~helio_tp&#45;&gt;type~swiftest_tp</title>
 <path fill="none" stroke="#000000" d="M424.41,-186.57C394.88,-196.09 349.78,-210.01 341.5,-209"/>
 <path fill="none" stroke="#000000" d="M339.5,-209C324.39,-207.16 308.44,-202.14 294.85,-196.86"/>
 <polygon fill="#000000" stroke="#000000" points="296.01,-193.55 285.43,-193.01 293.36,-200.03 296.01,-193.55"/>
 </g>
 <!-- type~rmvs_cb -->
-<g id="type~~swiftest_base~~InheritedByGraph_node13" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node15" class="node">
 <title>type~rmvs_cb</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node13"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node15"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="478.5,-316 424.5,-316 424.5,-292 478.5,-292 478.5,-316"/>
 <text text-anchor="middle" x="451.5" y="-301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_cb&#45;&gt;type~whm_cb -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge17" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge13" class="edge">
 <title>type~rmvs_cb&#45;&gt;type~whm_cb</title>
 <path fill="none" stroke="#000000" d="M424.48,-304C391.46,-304 334.31,-304 296.95,-304"/>
 <polygon fill="#000000" stroke="#000000" points="296.51,-300.5 286.51,-304 296.51,-307.5 296.51,-300.5"/>
 </g>
-<!-- type~whm_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_node14" class="node">
-<title>type~whm_tp</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node14"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="478.5,-232 424.5,-232 424.5,-208 478.5,-208 478.5,-232"/>
-<text text-anchor="middle" x="451.5" y="-217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
-</a>
-</g>
-</g>
-<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge16" class="edge">
-<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" d="M424.48,-217.68C402.37,-215.64 369.82,-212.46 341.5,-209"/>
-</g>
 <!-- type~helio_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_node15" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node16" class="node">
 <title>type~helio_pl</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node15"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node16"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="478.5,-106 424.5,-106 424.5,-82 478.5,-82 478.5,-106"/>
 <text text-anchor="middle" x="451.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
 </a>
 </g>
 </g>
 <!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge13" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge17" class="edge">
 <title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
 <path fill="none" stroke="#000000" d="M424.44,-85.43C413.71,-81.78 401.19,-77.36 390,-73 368.11,-64.48 364.36,-46.62 341.5,-52"/>
 </g>
-<!-- type~fraggle_fragments -->
-<g id="type~~swiftest_base~~InheritedByGraph_node16" class="node">
-<title>type~fraggle_fragments</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node16"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="501.5,-64 401.5,-64 401.5,-40 501.5,-40 501.5,-64"/>
-<text text-anchor="middle" x="451.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
-</a>
-</g>
-</g>
-<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge12" class="edge">
-<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M401.38,-47.24C382.45,-46.63 360.75,-47.47 341.5,-52"/>
-</g>
-<!-- type~rmvs_pl -->
+<!-- type~rmvs_tp -->
 <g id="type~~swiftest_base~~InheritedByGraph_node17" class="node">
-<title>type~rmvs_pl</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node17"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1106.5,-67 1052.5,-67 1052.5,-43 1106.5,-43 1106.5,-67"/>
-<text text-anchor="middle" x="1079.5" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<title>type~rmvs_tp</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node17"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="695,-280 641,-280 641,-256 695,-256 695,-280"/>
+<text text-anchor="middle" x="668" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge20" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
-<path fill="none" stroke="#000000" d="M1052.29,-50.67C1021.59,-45.65 969.17,-37.28 924,-31 883.35,-25.35 836.57,-19.74 805.13,-16.1"/>
-<polygon fill="#000000" stroke="#000000" points="805.42,-12.61 795.09,-14.94 804.62,-19.56 805.42,-12.61"/>
+<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge19" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
+<path fill="none" stroke="#000000" d="M640.7,-262.11C602.48,-253.56 531.48,-237.67 488.46,-228.05"/>
+<polygon fill="#000000" stroke="#000000" points="489.2,-224.63 478.68,-225.86 487.68,-231.46 489.2,-224.63"/>
 </g>
-<!-- type~rmvs_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_node22" class="node">
-<title>type~rmvs_nbody_system</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node22"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="924,-106 813,-106 813,-82 924,-82 924,-106"/>
-<text text-anchor="middle" x="868.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge23" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.7,-272.41C602.56,-278.81 531.78,-290.69 488.73,-297.92"/>
+<polygon fill="#000000" stroke="#000000" points="487.96,-294.5 478.68,-299.61 489.12,-301.4 487.96,-294.5"/>
+<text text-anchor="middle" x="563" y="-292.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
+</g>
+<!-- type~helio_nbody_system -->
+<g id="type~~swiftest_base~~InheritedByGraph_node18" class="node">
+<title>type~helio_nbody_system</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node18"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="923.5,-148 813.5,-148 813.5,-124 923.5,-124 923.5,-148"/>
+<text text-anchor="middle" x="868.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge27" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1052.27,-55.23C1024.54,-55.94 979.71,-58.48 942,-67 938.43,-67.81 924.73,-72.83 910.19,-78.33"/>
-<polygon fill="#000000" stroke="#000000" points="908.71,-75.15 900.61,-81.97 911.2,-81.69 908.71,-75.15"/>
-<text text-anchor="middle" x="972" y="-69.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge21" class="edge">
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M813.46,-134C798.99,-134.01 783.37,-134.51 769,-136"/>
 </g>
 <!-- type~symba_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_node18" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node19" class="node">
 <title>type~symba_tp</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node18"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node19"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="697.5,-190 638.5,-190 638.5,-166 697.5,-166 697.5,-190"/>
 <text text-anchor="middle" x="668" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
 </a>
 </g>
 </g>
 <!-- type~symba_tp&#45;&gt;type~helio_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge21" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge22" class="edge">
 <title>type~symba_tp&#45;&gt;type~helio_tp</title>
 <path fill="none" stroke="#000000" d="M638.07,-178C599.38,-178 530.79,-178 488.72,-178"/>
 <polygon fill="#000000" stroke="#000000" points="488.62,-174.5 478.62,-178 488.62,-181.5 488.62,-174.5"/>
 </g>
-<!-- type~symba_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_node19" class="node">
-<title>type~symba_pl</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node19"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="697,-106 639,-106 639,-82 697,-82 697,-106"/>
-<text text-anchor="middle" x="668" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
-</a>
-</g>
-</g>
-<!-- type~symba_pl&#45;&gt;type~helio_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge24" class="edge">
-<title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M638.96,-94C600.43,-94 531.1,-94 488.7,-94"/>
-<polygon fill="#000000" stroke="#000000" points="488.53,-90.5 478.53,-94 488.53,-97.5 488.53,-90.5"/>
-</g>
-<!-- type~helio_nbody_system -->
+<!-- type~rmvs_nbody_system -->
 <g id="type~~swiftest_base~~InheritedByGraph_node20" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node20"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="923.5,-148 813.5,-148 813.5,-124 923.5,-124 923.5,-148"/>
-<text text-anchor="middle" x="868.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<title>type~rmvs_nbody_system</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node20"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="924,-106 813,-106 813,-82 924,-82 924,-106"/>
+<text text-anchor="middle" x="868.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge18" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M813.46,-134C798.99,-134.01 783.37,-134.51 769,-136"/>
+<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge20" class="edge">
+<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M767,-136C756.12,-137.12 744.52,-137.68 733.25,-137.89"/>
+<polygon fill="#000000" stroke="#000000" points="732.98,-134.39 723.02,-137.99 733.05,-141.39 732.98,-134.39"/>
+<path fill="none" stroke="#000000" d="M835.06,-106.03C827.76,-108.86 820.08,-111.95 813,-115 793.1,-123.57 790.55,-133.77 769,-136"/>
 </g>
-<!-- type~rmvs_tp -->
+<!-- type~rmvs_pl -->
 <g id="type~~swiftest_base~~InheritedByGraph_node21" class="node">
-<title>type~rmvs_tp</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node21"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="695,-280 641,-280 641,-256 695,-256 695,-280"/>
-<text text-anchor="middle" x="668" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
+<title>type~rmvs_pl</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node21"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1106.5,-67 1052.5,-67 1052.5,-43 1106.5,-43 1106.5,-67"/>
+<text text-anchor="middle" x="1079.5" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge22" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M640.7,-272.41C602.56,-278.81 531.78,-290.69 488.73,-297.92"/>
-<polygon fill="#000000" stroke="#000000" points="487.96,-294.5 478.68,-299.61 489.12,-301.4 487.96,-294.5"/>
-<text text-anchor="middle" x="563" y="-292.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
-</g>
-<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge23" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
-<path fill="none" stroke="#000000" d="M640.7,-262.11C602.48,-253.56 531.48,-237.67 488.46,-228.05"/>
-<polygon fill="#000000" stroke="#000000" points="489.2,-224.63 478.68,-225.86 487.68,-231.46 489.2,-224.63"/>
+<!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge18" class="edge">
+<title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
+<path fill="none" stroke="#000000" d="M1052.29,-50.67C1021.59,-45.65 969.17,-37.28 924,-31 883.35,-25.35 836.57,-19.74 805.13,-16.1"/>
+<polygon fill="#000000" stroke="#000000" points="805.42,-12.61 795.09,-14.94 804.62,-19.56 805.42,-12.61"/>
 </g>
-<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge19" class="edge">
-<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M835.06,-106.03C827.76,-108.86 820.08,-111.95 813,-115 793.1,-123.57 790.55,-133.77 769,-136"/>
-<path fill="none" stroke="#000000" d="M767,-136C756.12,-137.12 744.52,-137.68 733.25,-137.89"/>
-<polygon fill="#000000" stroke="#000000" points="732.98,-134.39 723.02,-137.99 733.05,-141.39 732.98,-134.39"/>
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge26" class="edge">
+<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1052.27,-55.23C1024.54,-55.94 979.71,-58.48 942,-67 938.43,-67.81 924.73,-72.83 910.19,-78.33"/>
+<polygon fill="#000000" stroke="#000000" points="908.71,-75.15 900.61,-81.97 911.2,-81.69 908.71,-75.15"/>
+<text text-anchor="middle" x="972" y="-69.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
-<!-- type~symba_merger -->
-<g id="type~~swiftest_base~~InheritedByGraph_node23" class="node">
-<title>type~symba_merger</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node23"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="911,-64 826,-64 826,-40 911,-40 911,-64"/>
-<text text-anchor="middle" x="868.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+<!-- type~symba_pl -->
+<g id="type~~swiftest_base~~InheritedByGraph_node22" class="node">
+<title>type~symba_pl</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node22"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="697,-91 639,-91 639,-67 697,-67 697,-91"/>
+<text text-anchor="middle" x="668" y="-76.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_merger&#45;&gt;type~symba_pl -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge25" class="edge">
-<title>type~symba_merger&#45;&gt;type~symba_pl</title>
-<path fill="none" stroke="#000000" d="M825.89,-60.8C790.86,-68.22 741.17,-78.73 707.15,-85.93"/>
-<polygon fill="#000000" stroke="#000000" points="706.19,-82.55 697.13,-88.05 707.64,-89.4 706.19,-82.55"/>
+<!-- type~symba_pl&#45;&gt;type~helio_pl -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge24" class="edge">
+<title>type~symba_pl&#45;&gt;type~helio_pl</title>
+<path fill="none" stroke="#000000" d="M638.96,-80.96C600.43,-83.66 531.1,-88.5 488.7,-91.47"/>
+<polygon fill="#000000" stroke="#000000" points="488.27,-87.99 478.53,-92.18 488.75,-94.97 488.27,-87.99"/>
 </g>
 <!-- type~symba_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_node24" class="node">
+<g id="type~~swiftest_base~~InheritedByGraph_node23" class="node">
 <title>type~symba_nbody_system</title>
-<g id="a_type~~swiftest_base~~InheritedByGraph_node24"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
+<g id="a_type~~swiftest_base~~InheritedByGraph_node23"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="1139,-121 1020,-121 1020,-97 1139,-97 1139,-121"/>
 <text text-anchor="middle" x="1079.5" y="-106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
-<g id="type~~swiftest_base~~InheritedByGraph_edge26" class="edge">
+<g id="type~~swiftest_base~~InheritedByGraph_edge25" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
 <path fill="none" stroke="#000000" d="M1019.73,-116.59C992.96,-120.05 961.21,-124.15 933.81,-127.69"/>
 <polygon fill="#000000" stroke="#000000" points="933.01,-124.27 923.54,-129.02 933.91,-131.21 933.01,-124.27"/>
 </g>
+<!-- type~symba_merger -->
+<g id="type~~swiftest_base~~InheritedByGraph_node24" class="node">
+<title>type~symba_merger</title>
+<g id="a_type~~swiftest_base~~InheritedByGraph_node24"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="911,-64 826,-64 826,-40 911,-40 911,-64"/>
+<text text-anchor="middle" x="868.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+</a>
+</g>
+</g>
 <!-- type~symba_nbody_system&#45;&gt;type~symba_merger -->
 <g id="type~~swiftest_base~~InheritedByGraph_edge28" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~symba_merger</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1021.38,-96.97C996.8,-91.45 967.84,-84.46 942,-77 932.12,-74.15 921.6,-70.74 911.73,-67.37"/>
 <polygon fill="#000000" stroke="#000000" points="912.71,-64.01 902.12,-64.04 910.42,-70.62 912.71,-64.01"/>
-<text text-anchor="middle" x="972" y="-94.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+<text text-anchor="middle" x="972" y="-95.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+</g>
+<!-- type~symba_merger&#45;&gt;type~symba_pl -->
+<g id="type~~swiftest_base~~InheritedByGraph_edge27" class="edge">
+<title>type~symba_merger&#45;&gt;type~symba_pl</title>
+<path fill="none" stroke="#000000" d="M825.89,-57.66C790.86,-62.42 741.17,-69.18 707.15,-73.81"/>
+<polygon fill="#000000" stroke="#000000" points="706.57,-70.36 697.13,-75.17 707.51,-77.29 706.57,-70.36"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/swiftest_body.html b/docs/type/swiftest_body.html
index 703ab1513..0baa4acde 100644
--- a/docs/type/swiftest_body.html
+++ b/docs/type/swiftest_body.html
@@ -349,36 +349,36 @@ <h3 class="panel-title">Inherits</h3>
 <polygon fill="none" stroke="black" points="241,-45 164,-45 164,-21 241,-21 241,-45"/>
 <text text-anchor="middle" x="202.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_body</text>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~swiftest_body~~InheritsGraph_node2" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~swiftest_body~~InheritsGraph_node2"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~swiftest_body~~InheritsGraph_node2"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~swiftest_body~~InheritsGraph_edge2" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~swiftest_body~~InheritsGraph_edge1" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~swiftest_body~~InheritsGraph_node3" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~swiftest_body~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~swiftest_body~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~swiftest_body~~InheritsGraph_edge1" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~swiftest_body~~InheritsGraph_edge2" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -440,284 +440,284 @@ <h3 class="panel-title">Inherited by</h3>
 <!-- type~swiftest_body -->
 <g id="type~~swiftest_body~~InheritedByGraph_node1" class="node">
 <title>type~swiftest_body</title>
-<polygon fill="none" stroke="black" points="77,-181 0,-181 0,-157 77,-157 77,-181"/>
-<text text-anchor="middle" x="38.5" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_body</text>
+<polygon fill="none" stroke="black" points="77,-142 0,-142 0,-118 77,-118 77,-142"/>
+<text text-anchor="middle" x="38.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_body</text>
 </g>
-<!-- type~swiftest_tp -->
+<!-- type~swiftest_pl -->
 <g id="type~~swiftest_body~~InheritedByGraph_node2" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node2"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="177,-181 114,-181 114,-157 177,-157 177,-181"/>
-<text text-anchor="middle" x="145.5" y="-166.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+<title>type~swiftest_pl</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node2"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="176.5,-142 114.5,-142 114.5,-118 176.5,-118 176.5,-142"/>
+<text text-anchor="middle" x="145.5" y="-127.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge1" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M113.79,-167.16C107.84,-167.32 101.7,-167.85 96,-169"/>
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M114.3,-128.15C108.2,-128.29 101.86,-128.82 96,-130"/>
 </g>
-<!-- type~swiftest_pl -->
+<!-- type~swiftest_tp -->
 <g id="type~~swiftest_body~~InheritedByGraph_node3" class="node">
-<title>type~swiftest_pl</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node3"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="176.5,-139 114.5,-139 114.5,-115 176.5,-115 176.5,-139"/>
-<text text-anchor="middle" x="145.5" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<title>type~swiftest_tp</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node3"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="177,-100 114,-100 114,-76 177,-76 177,-100"/>
+<text text-anchor="middle" x="145.5" y="-85.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge2" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M95,-169C92.48,-169.51 89.88,-169.91 87.25,-170.22"/>
-<polygon fill="#000000" stroke="#000000" points="86.72,-166.75 77.02,-171.02 87.26,-173.73 86.72,-166.75"/>
-<path fill="none" stroke="#000000" d="M125.21,-139.15C121.36,-141.89 117.44,-144.9 114,-148 104.86,-156.22 108.05,-166.57 96,-169"/>
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M125.21,-100.15C121.36,-102.89 117.44,-105.9 114,-109 104.86,-117.22 108.05,-127.57 96,-130"/>
+<path fill="none" stroke="#000000" d="M95,-130C92.48,-130.51 89.88,-130.91 87.25,-131.22"/>
+<polygon fill="#000000" stroke="#000000" points="86.72,-127.75 77.02,-132.02 87.26,-134.73 86.72,-127.75"/>
 </g>
 <!-- type~whm_pl -->
 <g id="type~~swiftest_body~~InheritedByGraph_node4" class="node">
 <title>type~whm_pl</title>
 <g id="a_type~~swiftest_body~~InheritedByGraph_node4"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="618,-122 564,-122 564,-98 618,-98 618,-122"/>
-<text text-anchor="middle" x="591" y="-107.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="618,-202 564,-202 564,-178 618,-178 618,-202"/>
+<text text-anchor="middle" x="591" y="-187.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
 </a>
 </g>
 </g>
 <!-- type~whm_pl&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge7" class="edge">
+<g id="type~~swiftest_body~~InheritedByGraph_edge4" class="edge">
 <title>type~whm_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M563.78,-106.14C491.17,-95.88 288.82,-70.28 227.5,-94"/>
+<path fill="none" stroke="#000000" d="M563.99,-190.7C491.93,-192.39 290.89,-195.37 227.5,-178"/>
 </g>
-<!-- type~helio_tp -->
+<!-- type~fraggle_fragments -->
 <g id="type~~swiftest_body~~InheritedByGraph_node5" class="node">
+<title>type~fraggle_fragments</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node5"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="387.5,-230 287.5,-230 287.5,-206 387.5,-206 387.5,-230"/>
+<text text-anchor="middle" x="337.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
+</a>
+</g>
+</g>
+<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
+<g id="type~~swiftest_body~~InheritedByGraph_edge5" class="edge">
+<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" d="M307.79,-205.95C286.05,-197.21 255.3,-185.62 227.5,-178"/>
+</g>
+<!-- type~whm_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_node6" class="node">
+<title>type~whm_tp</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node6"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="364.5,-66 310.5,-66 310.5,-42 364.5,-42 364.5,-66"/>
+<text text-anchor="middle" x="337.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
+</a>
+</g>
+</g>
+<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_edge8" class="edge">
+<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" d="M310.34,-49.85C287.87,-47.25 254.86,-45.77 227.5,-54"/>
+</g>
+<!-- type~helio_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_node7" class="node">
 <title>type~helio_tp</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node5"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="364.5,-188 310.5,-188 310.5,-164 364.5,-164 364.5,-188"/>
-<text text-anchor="middle" x="337.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node7"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="364.5,-24 310.5,-24 310.5,0 364.5,0 364.5,-24"/>
+<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
 </a>
 </g>
 </g>
 <!-- type~helio_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge4" class="edge">
+<g id="type~~swiftest_body~~InheritedByGraph_edge9" class="edge">
 <title>type~helio_tp&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" d="M310.39,-184.99C280.85,-194.95 235.73,-209.45 227.5,-208"/>
-<path fill="none" stroke="#000000" d="M225.5,-208C206.54,-204.65 187.13,-195.16 172.29,-186.39"/>
-<polygon fill="#000000" stroke="#000000" points="174.03,-183.35 163.69,-181.08 170.36,-189.31 174.03,-183.35"/>
+<path fill="none" stroke="#000000" d="M310.44,-20.57C299.71,-24.22 287.19,-28.64 276,-33 254.11,-41.52 249.99,-47.23 227.5,-54"/>
+<path fill="none" stroke="#000000" d="M225.5,-54C210.05,-58.65 193.57,-65.43 179.67,-71.72"/>
+<polygon fill="#000000" stroke="#000000" points="178.12,-68.58 170.52,-75.96 181.06,-74.93 178.12,-68.58"/>
 </g>
 <!-- type~swiftest_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_node6" class="node">
+<g id="type~~swiftest_body~~InheritedByGraph_node8" class="node">
 <title>type~swiftest_nbody_system</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node6"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="399,-146 276,-146 276,-122 399,-122 399,-146"/>
-<text text-anchor="middle" x="337.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node8"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="399,-108 276,-108 276,-84 399,-84 399,-108"/>
+<text text-anchor="middle" x="337.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge3" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.86,-106.85C246.62,-112.08 212.36,-118.22 186.44,-122.85"/>
+<polygon fill="#000000" stroke="#000000" points="185.82,-119.41 176.59,-124.61 187.05,-126.3 185.82,-119.41"/>
+<text text-anchor="middle" x="226.5" y="-123.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+</g>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_edge7" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.86,-145.17C246.94,-150.5 213.11,-156.73 187.3,-161.48"/>
-<polygon fill="#000000" stroke="#000000" points="186.32,-158.11 177.12,-163.36 187.59,-164.99 186.32,-158.11"/>
-<text text-anchor="middle" x="226.5" y="-161.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.86,-93.45C246.94,-92.23 213.11,-90.8 187.3,-89.72"/>
+<polygon fill="#000000" stroke="#000000" points="187.26,-86.21 177.12,-89.29 186.96,-93.21 187.26,-86.21"/>
+<text text-anchor="middle" x="226.5" y="-95.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
+<!-- type~helio_pl -->
+<g id="type~~swiftest_body~~InheritedByGraph_node9" class="node">
+<title>type~helio_pl</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node9"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="364.5,-150 310.5,-150 310.5,-126 364.5,-126 364.5,-150"/>
+<text text-anchor="middle" x="337.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
+</a>
+</g>
+</g>
+<!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge6" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M275.86,-131.77C246.75,-130.69 212.66,-129.44 186.79,-128.48"/>
-<polygon fill="#000000" stroke="#000000" points="186.72,-124.98 176.59,-128.11 186.46,-131.97 186.72,-124.98"/>
-<text text-anchor="middle" x="226.5" y="-132.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+<title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" d="M310.4,-149.39C280.85,-161.99 235.74,-180.26 227.5,-178"/>
+<path fill="none" stroke="#000000" d="M225.5,-178C204.67,-172.29 183.91,-159.32 168.9,-148.3"/>
+<polygon fill="#000000" stroke="#000000" points="170.84,-145.38 160.77,-142.1 166.6,-150.95 170.84,-145.38"/>
 </g>
-<!-- type~whm_tp -->
-<g id="type~~swiftest_body~~InheritedByGraph_node7" class="node">
-<title>type~whm_tp</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node7"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="364.5,-230 310.5,-230 310.5,-206 364.5,-206 364.5,-230"/>
-<text text-anchor="middle" x="337.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
+<!-- type~rmvs_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_node10" class="node">
+<title>type~rmvs_tp</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node10"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="518,-66 464,-66 464,-42 518,-42 518,-66"/>
+<text text-anchor="middle" x="491" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
 </a>
 </g>
 </g>
-<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge5" class="edge">
-<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" d="M310.35,-216.83C288.17,-215.54 255.57,-212.96 227.5,-208"/>
+<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_edge11" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
+<path fill="none" stroke="#000000" d="M463.96,-54C439.35,-54 402.22,-54 374.73,-54"/>
+<polygon fill="#000000" stroke="#000000" points="374.71,-50.5 364.71,-54 374.71,-57.5 374.71,-50.5"/>
 </g>
-<!-- type~helio_pl -->
-<g id="type~~swiftest_body~~InheritedByGraph_node8" class="node">
-<title>type~helio_pl</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node8"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="364.5,-66 310.5,-66 310.5,-42 364.5,-42 364.5,-66"/>
-<text text-anchor="middle" x="337.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
+<!-- type~whm_nbody_system -->
+<g id="type~~swiftest_body~~InheritedByGraph_node11" class="node">
+<title>type~whm_nbody_system</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node11"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="546,-108 436,-108 436,-84 546,-84 546,-108"/>
+<text text-anchor="middle" x="491" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge9" class="edge">
-<title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M310.42,-63.28C288.28,-71.24 255.7,-83.09 227.5,-94"/>
+<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
+<g id="type~~swiftest_body~~InheritedByGraph_edge13" class="edge">
+<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
+<path fill="none" stroke="#000000" d="M435.73,-96C427.1,-96 418.05,-96 409.11,-96"/>
+<polygon fill="#000000" stroke="#000000" points="409.07,-92.5 399.07,-96 409.07,-99.5 409.07,-92.5"/>
 </g>
-<!-- type~fraggle_fragments -->
-<g id="type~~swiftest_body~~InheritedByGraph_node9" class="node">
-<title>type~fraggle_fragments</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node9"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="387.5,-24 287.5,-24 287.5,0 387.5,0 387.5,-24"/>
-<text text-anchor="middle" x="337.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
+<!-- type~symba_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_node12" class="node">
+<title>type~symba_tp</title>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node12"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="520.5,-24 461.5,-24 461.5,0 520.5,0 520.5,-24"/>
+<text text-anchor="middle" x="491" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
 </a>
 </g>
 </g>
-<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge8" class="edge">
-<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M292.09,-24.11C286.42,-26.59 280.9,-29.53 276,-33 247.74,-53.03 259.8,-81.51 227.5,-94"/>
-<path fill="none" stroke="#000000" d="M225.5,-94C211.78,-99.31 196.86,-105.44 183.72,-110.97"/>
-<polygon fill="#000000" stroke="#000000" points="182.35,-107.75 174.51,-114.87 185.08,-114.2 182.35,-107.75"/>
+<!-- type~symba_tp&#45;&gt;type~helio_tp -->
+<g id="type~~swiftest_body~~InheritedByGraph_edge12" class="edge">
+<title>type~symba_tp&#45;&gt;type~helio_tp</title>
+<path fill="none" stroke="#000000" d="M461.15,-12C436.59,-12 401.19,-12 374.73,-12"/>
+<polygon fill="#000000" stroke="#000000" points="374.71,-8.5 364.71,-12 374.71,-15.5 374.71,-8.5"/>
 </g>
 <!-- type~rmvs_pl -->
-<g id="type~~swiftest_body~~InheritedByGraph_node10" class="node">
+<g id="type~~swiftest_body~~InheritedByGraph_node13" class="node">
 <title>type~rmvs_pl</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node10"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="929.5,-132 875.5,-132 875.5,-108 929.5,-108 929.5,-132"/>
-<text text-anchor="middle" x="902.5" y="-117.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node13"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="929.5,-198 875.5,-198 875.5,-174 929.5,-174 929.5,-198"/>
+<text text-anchor="middle" x="902.5" y="-183.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge10" class="edge">
 <title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
-<path fill="none" stroke="#000000" d="M875.38,-119.16C820.27,-117.38 692,-113.23 628.69,-111.19"/>
-<polygon fill="#000000" stroke="#000000" points="628.49,-107.68 618.38,-110.85 628.26,-114.67 628.49,-107.68"/>
+<path fill="none" stroke="#000000" d="M875.38,-186.34C820.27,-187.05 692,-188.71 628.69,-189.53"/>
+<polygon fill="#000000" stroke="#000000" points="628.33,-186.03 618.38,-189.66 628.42,-193.03 628.33,-186.03"/>
 </g>
 <!-- type~rmvs_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_node17" class="node">
+<g id="type~~swiftest_body~~InheritedByGraph_node15" class="node">
 <title>type~rmvs_nbody_system</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node17"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="747,-166 636,-166 636,-142 747,-142 747,-166"/>
-<text text-anchor="middle" x="691.5" y="-151.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node15"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="747,-171 636,-171 636,-147 747,-147 747,-171"/>
+<text text-anchor="middle" x="691.5" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge20" class="edge">
+<g id="type~~swiftest_body~~InheritedByGraph_edge18" class="edge">
 <title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M875.45,-124.24C846,-129.03 796.94,-137.01 757.04,-143.5"/>
-<polygon fill="#000000" stroke="#000000" points="756.42,-140.06 747.11,-145.12 757.54,-146.96 756.42,-140.06"/>
-<text text-anchor="middle" x="795" y="-144.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
-</g>
-<!-- type~whm_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_node11" class="node">
-<title>type~whm_nbody_system</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node11"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="546,-146 436,-146 436,-122 546,-122 546,-146"/>
-<text text-anchor="middle" x="491" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
-</a>
-</g>
-</g>
-<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge12" class="edge">
-<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
-<path fill="none" stroke="#000000" d="M435.73,-134C427.1,-134 418.05,-134 409.11,-134"/>
-<polygon fill="#000000" stroke="#000000" points="409.07,-130.5 399.07,-134 409.07,-137.5 409.07,-130.5"/>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M875.32,-182.09C860.55,-179.92 841.76,-177.22 825,-175 802.89,-172.08 778.67,-169.09 757.06,-166.5"/>
+<polygon fill="#000000" stroke="#000000" points="757.35,-163.01 747.01,-165.3 756.52,-169.96 757.35,-163.01"/>
+<text text-anchor="middle" x="795" y="-177.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
 <!-- type~symba_pl -->
-<g id="type~~swiftest_body~~InheritedByGraph_node12" class="node">
+<g id="type~~swiftest_body~~InheritedByGraph_node14" class="node">
 <title>type~symba_pl</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node12"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="520,-56 462,-56 462,-32 520,-32 520,-56"/>
-<text text-anchor="middle" x="491" y="-41.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node14"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="520,-150 462,-150 462,-126 520,-126 520,-150"/>
+<text text-anchor="middle" x="491" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
 </a>
 </g>
 </g>
 <!-- type~symba_pl&#45;&gt;type~helio_pl -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge14" class="edge">
 <title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M461.86,-45.86C437.31,-47.48 401.53,-49.84 374.83,-51.6"/>
-<polygon fill="#000000" stroke="#000000" points="374.46,-48.12 364.72,-52.27 374.93,-55.1 374.46,-48.12"/>
-</g>
-<!-- type~rmvs_tp -->
-<g id="type~~swiftest_body~~InheritedByGraph_node13" class="node">
-<title>type~rmvs_tp</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node13"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="518,-230 464,-230 464,-206 518,-206 518,-230"/>
-<text text-anchor="middle" x="491" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
-</a>
-</g>
-</g>
-<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge13" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
-<path fill="none" stroke="#000000" d="M463.96,-218C439.35,-218 402.22,-218 374.73,-218"/>
-<polygon fill="#000000" stroke="#000000" points="374.71,-214.5 364.71,-218 374.71,-221.5 374.71,-214.5"/>
-</g>
-<!-- type~symba_tp -->
-<g id="type~~swiftest_body~~InheritedByGraph_node14" class="node">
-<title>type~symba_tp</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node14"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="520.5,-188 461.5,-188 461.5,-164 520.5,-164 520.5,-188"/>
-<text text-anchor="middle" x="491" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
-</a>
+<path fill="none" stroke="#000000" d="M461.86,-138C437.31,-138 401.53,-138 374.83,-138"/>
+<polygon fill="#000000" stroke="#000000" points="374.72,-134.5 364.72,-138 374.72,-141.5 374.72,-134.5"/>
 </g>
-</g>
-<!-- type~symba_tp&#45;&gt;type~helio_tp -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge11" class="edge">
-<title>type~symba_tp&#45;&gt;type~helio_tp</title>
-<path fill="none" stroke="#000000" d="M461.15,-176C436.59,-176 401.19,-176 374.73,-176"/>
-<polygon fill="#000000" stroke="#000000" points="374.71,-172.5 364.71,-176 374.71,-179.5 374.71,-172.5"/>
+<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_body~~InheritedByGraph_edge15" class="edge">
+<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M652.23,-146.85C620.13,-136.67 574.15,-122.07 539.67,-111.13"/>
+<polygon fill="#000000" stroke="#000000" points="540.41,-107.69 529.82,-108 538.29,-114.36 540.41,-107.69"/>
 </g>
 <!-- type~symba_merger -->
-<g id="type~~swiftest_body~~InheritedByGraph_node15" class="node">
+<g id="type~~swiftest_body~~InheritedByGraph_node16" class="node">
 <title>type~symba_merger</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node15"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="734,-44 649,-44 649,-20 734,-20 734,-44"/>
-<text text-anchor="middle" x="691.5" y="-29.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node16"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="734,-129 649,-129 649,-105 734,-105 734,-129"/>
+<text text-anchor="middle" x="691.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
 </a>
 </g>
 </g>
 <!-- type~symba_merger&#45;&gt;type~symba_pl -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge17" class="edge">
 <title>type~symba_merger&#45;&gt;type~symba_pl</title>
-<path fill="none" stroke="#000000" d="M648.89,-34.52C613.86,-36.63 564.17,-39.64 530.15,-41.69"/>
-<polygon fill="#000000" stroke="#000000" points="529.9,-38.2 520.13,-42.3 530.33,-45.19 529.9,-38.2"/>
+<path fill="none" stroke="#000000" d="M648.89,-121.4C613.86,-125.11 564.17,-130.36 530.15,-133.96"/>
+<polygon fill="#000000" stroke="#000000" points="529.71,-130.49 520.13,-135.02 530.45,-137.45 529.71,-130.49"/>
 </g>
 <!-- type~helio_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_node16" class="node">
+<g id="type~~swiftest_body~~InheritedByGraph_node17" class="node">
 <title>type~helio_nbody_system</title>
-<g id="a_type~~swiftest_body~~InheritedByGraph_node16"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="746.5,-86 636.5,-86 636.5,-62 746.5,-62 746.5,-86"/>
-<text text-anchor="middle" x="691.5" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<g id="a_type~~swiftest_body~~InheritedByGraph_node17"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="746.5,-87 636.5,-87 636.5,-63 746.5,-63 746.5,-87"/>
+<text text-anchor="middle" x="691.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge15" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M636.25,-78.36C613.49,-81.26 587.02,-86.07 564,-94 547.96,-99.53 531.33,-108.52 518.09,-116.58"/>
-<polygon fill="#000000" stroke="#000000" points="516.13,-113.68 509.52,-121.96 519.85,-119.61 516.13,-113.68"/>
-</g>
-<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
 <g id="type~~swiftest_body~~InheritedByGraph_edge16" class="edge">
-<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M636,-148.51C611.27,-146.02 581.87,-143.05 556.09,-140.46"/>
-<polygon fill="#000000" stroke="#000000" points="556.34,-136.96 546.04,-139.44 555.64,-143.93 556.34,-136.96"/>
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M636.26,-80.74C611.53,-83.35 582.08,-86.47 556.25,-89.2"/>
+<polygon fill="#000000" stroke="#000000" points="555.75,-85.74 546.18,-90.27 556.49,-92.7 555.75,-85.74"/>
 </g>
 <!-- type~symba_nbody_system -->
 <g id="type~~swiftest_body~~InheritedByGraph_node18" class="node">
 <title>type~symba_nbody_system</title>
 <g id="a_type~~swiftest_body~~InheritedByGraph_node18"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="962,-78 843,-78 843,-54 962,-54 962,-78"/>
-<text text-anchor="middle" x="902.5" y="-63.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="962,-108 843,-108 843,-84 962,-84 962,-108"/>
+<text text-anchor="middle" x="902.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~symba_nbody_system&#45;&gt;type~symba_merger -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge18" class="edge">
+<g id="type~~swiftest_body~~InheritedByGraph_edge19" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~symba_merger</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M842.73,-56.44C811.84,-51.41 774.31,-45.31 744.49,-40.46"/>
-<polygon fill="#000000" stroke="#000000" points="744.72,-36.95 734.29,-38.8 743.59,-43.86 744.72,-36.95"/>
-<text text-anchor="middle" x="795" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M842.73,-101.91C811.84,-105.01 774.31,-108.78 744.49,-111.78"/>
+<polygon fill="#000000" stroke="#000000" points="743.89,-108.32 734.29,-112.8 744.59,-115.28 743.89,-108.32"/>
+<text text-anchor="middle" x="795" y="-112.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
 </g>
 <!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
-<g id="type~~swiftest_body~~InheritedByGraph_edge19" class="edge">
+<g id="type~~swiftest_body~~InheritedByGraph_edge20" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M842.73,-68.25C815.96,-69.27 784.21,-70.49 756.81,-71.54"/>
-<polygon fill="#000000" stroke="#000000" points="756.4,-68.05 746.54,-71.93 756.67,-75.05 756.4,-68.05"/>
+<path fill="none" stroke="#000000" d="M842.73,-90.09C815.96,-87.41 784.21,-84.21 756.81,-81.46"/>
+<polygon fill="#000000" stroke="#000000" points="756.84,-77.95 746.54,-80.43 756.14,-84.91 756.84,-77.95"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/swiftest_cb.html b/docs/type/swiftest_cb.html
index e5ce39bad..ef2e1eaf8 100644
--- a/docs/type/swiftest_cb.html
+++ b/docs/type/swiftest_cb.html
@@ -310,36 +310,36 @@ <h3 class="panel-title">Inherits</h3>
 <polygon fill="none" stroke="black" points="229,-45 164,-45 164,-21 229,-21 229,-45"/>
 <text text-anchor="middle" x="196.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_cb</text>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~swiftest_cb~~InheritsGraph_node2" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~swiftest_cb~~InheritsGraph_node2"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~swiftest_cb~~InheritsGraph_node2"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~swiftest_cb~~InheritsGraph_edge2" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.73,-37.82C146.18,-40.48 124.04,-43.84 104.48,-46.8"/>
-<polygon fill="#000000" stroke="#000000" points="103.89,-43.35 94.52,-48.31 104.94,-50.27 103.89,-43.35"/>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~swiftest_cb~~InheritsGraph_edge1" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-37.82C151.33,-39.7 136.65,-41.92 122.2,-44.11"/>
+<polygon fill="#000000" stroke="#000000" points="121.62,-40.66 112.26,-45.62 122.67,-47.58 121.62,-40.66"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~swiftest_cb~~InheritsGraph_node3" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~swiftest_cb~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~swiftest_cb~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~swiftest_cb~~InheritsGraph_edge1" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-28.18C151.33,-26.3 136.65,-24.08 122.2,-21.89"/>
-<polygon fill="#000000" stroke="#000000" points="122.67,-18.42 112.26,-20.38 121.62,-25.34 122.67,-18.42"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
+<g id="type~~swiftest_cb~~InheritsGraph_edge2" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.73,-28.18C146.18,-25.52 124.04,-22.16 104.48,-19.2"/>
+<polygon fill="#000000" stroke="#000000" points="104.94,-15.73 94.52,-17.69 103.89,-22.65 104.94,-15.73"/>
 </g>
 </g>
 </svg>
@@ -404,32 +404,32 @@ <h3 class="panel-title">Inherited by</h3>
 <polygon fill="none" stroke="black" points="65,-108 0,-108 0,-84 65,-84 65,-108"/>
 <text text-anchor="middle" x="32.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_cb</text>
 </g>
-<!-- type~helio_cb -->
+<!-- type~whm_cb -->
 <g id="type~~swiftest_cb~~InheritedByGraph_node2" class="node">
-<title>type~helio_cb</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node2"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
+<title>type~whm_cb</title>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node2"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="199.5,-150 145.5,-150 145.5,-126 199.5,-126 199.5,-150"/>
-<text text-anchor="middle" x="172.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_cb</text>
+<text text-anchor="middle" x="172.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
 </a>
 </g>
 </g>
-<!-- type~helio_cb&#45;&gt;type~swiftest_cb -->
+<!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
 <g id="type~~swiftest_cb~~InheritedByGraph_edge2" class="edge">
-<title>type~helio_cb&#45;&gt;type~swiftest_cb</title>
+<title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
 <path fill="none" stroke="#000000" d="M145.32,-130.36C129.2,-125.9 108.05,-120.48 89,-117"/>
 </g>
-<!-- type~whm_cb -->
+<!-- type~helio_cb -->
 <g id="type~~swiftest_cb~~InheritedByGraph_node3" class="node">
-<title>type~whm_cb</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node3"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
+<title>type~helio_cb</title>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node3"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="199.5,-108 145.5,-108 145.5,-84 199.5,-84 199.5,-108"/>
-<text text-anchor="middle" x="172.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
+<text text-anchor="middle" x="172.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_cb</text>
 </a>
 </g>
 </g>
-<!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
+<!-- type~helio_cb&#45;&gt;type~swiftest_cb -->
 <g id="type~~swiftest_cb~~InheritedByGraph_edge3" class="edge">
-<title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
+<title>type~helio_cb&#45;&gt;type~swiftest_cb</title>
 <path fill="none" stroke="#000000" d="M87,-117C80.62,-115.83 74.04,-113.91 67.76,-111.68"/>
 <polygon fill="#000000" stroke="#000000" points="68.81,-108.34 58.22,-108 66.29,-114.87 68.81,-108.34"/>
 <path fill="none" stroke="#000000" d="M145.18,-105.24C125.3,-111.74 99.69,-118.95 89,-117"/>
@@ -450,40 +450,25 @@ <h3 class="panel-title">Inherited by</h3>
 <polygon fill="#000000" stroke="#000000" points="73.72,-80.1 65.17,-86.36 75.76,-86.8 73.72,-80.1"/>
 <text text-anchor="middle" x="88" y="-81.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
-<!-- type~rmvs_cb -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node5" class="node">
-<title>type~rmvs_cb</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node5"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="353,-108 299,-108 299,-84 353,-84 353,-108"/>
-<text text-anchor="middle" x="326" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
-</a>
-</g>
-</g>
-<!-- type~rmvs_cb&#45;&gt;type~whm_cb -->
-<g id="type~~swiftest_cb~~InheritedByGraph_edge5" class="edge">
-<title>type~rmvs_cb&#45;&gt;type~whm_cb</title>
-<path fill="none" stroke="#000000" d="M298.96,-96C274.35,-96 237.22,-96 209.73,-96"/>
-<polygon fill="#000000" stroke="#000000" points="209.71,-92.5 199.71,-96 209.71,-99.5 209.71,-92.5"/>
-</g>
 <!-- type~symba_cb -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node6" class="node">
+<g id="type~~swiftest_cb~~InheritedByGraph_node5" class="node">
 <title>type~symba_cb</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node6"><a xlink:href=".././type/symba_cb.html" xlink:title="symba_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="356.5,-150 295.5,-150 295.5,-126 356.5,-126 356.5,-150"/>
-<text text-anchor="middle" x="326" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_cb</text>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node5"><a xlink:href=".././type/symba_cb.html" xlink:title="symba_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="356.5,-108 295.5,-108 295.5,-84 356.5,-84 356.5,-108"/>
+<text text-anchor="middle" x="326" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_cb</text>
 </a>
 </g>
 </g>
 <!-- type~symba_cb&#45;&gt;type~helio_cb -->
-<g id="type~~swiftest_cb~~InheritedByGraph_edge4" class="edge">
+<g id="type~~swiftest_cb~~InheritedByGraph_edge5" class="edge">
 <title>type~symba_cb&#45;&gt;type~helio_cb</title>
-<path fill="none" stroke="#000000" d="M295.43,-138C271.06,-138 236.38,-138 210.23,-138"/>
-<polygon fill="#000000" stroke="#000000" points="209.96,-134.5 199.96,-138 209.96,-141.5 209.96,-134.5"/>
+<path fill="none" stroke="#000000" d="M295.43,-96C271.06,-96 236.38,-96 210.23,-96"/>
+<polygon fill="#000000" stroke="#000000" points="209.96,-92.5 199.96,-96 209.96,-99.5 209.96,-92.5"/>
 </g>
 <!-- type~whm_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node7" class="node">
+<g id="type~~swiftest_cb~~InheritedByGraph_node6" class="node">
 <title>type~whm_nbody_system</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node7"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node6"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="381,-66 271,-66 271,-42 381,-42 381,-66"/>
 <text text-anchor="middle" x="326" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
 </a>
@@ -495,82 +480,97 @@ <h3 class="panel-title">Inherited by</h3>
 <path fill="none" stroke="#000000" d="M270.73,-54C262.1,-54 253.05,-54 244.11,-54"/>
 <polygon fill="#000000" stroke="#000000" points="244.07,-50.5 234.07,-54 244.07,-57.5 244.07,-50.5"/>
 </g>
-<!-- type~helio_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node8" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node8"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="591.5,-66 481.5,-66 481.5,-42 591.5,-42 591.5,-66"/>
-<text text-anchor="middle" x="536.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<!-- type~rmvs_cb -->
+<g id="type~~swiftest_cb~~InheritedByGraph_node7" class="node">
+<title>type~rmvs_cb</title>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node7"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="353,-150 299,-150 299,-126 353,-126 353,-150"/>
+<text text-anchor="middle" x="326" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
 </a>
 </g>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_edge8" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M481.42,-52C465.47,-51.95 448,-52.42 432,-54"/>
+<!-- type~rmvs_cb&#45;&gt;type~whm_cb -->
+<g id="type~~swiftest_cb~~InheritedByGraph_edge4" class="edge">
+<title>type~rmvs_cb&#45;&gt;type~whm_cb</title>
+<path fill="none" stroke="#000000" d="M298.96,-138C274.35,-138 237.22,-138 209.73,-138"/>
+<polygon fill="#000000" stroke="#000000" points="209.71,-134.5 199.71,-138 209.71,-141.5 209.71,-134.5"/>
 </g>
 <!-- type~rmvs_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node9" class="node">
+<g id="type~~swiftest_cb~~InheritedByGraph_node8" class="node">
 <title>type~rmvs_nbody_system</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node9"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="592,-24 481,-24 481,0 592,0 592,-24"/>
-<text text-anchor="middle" x="536.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node8"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="592,-66 481,-66 481,-42 592,-42 592,-66"/>
+<text text-anchor="middle" x="536.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_edge9" class="edge">
+<g id="type~~swiftest_cb~~InheritedByGraph_edge7" class="edge">
 <title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M503.72,-24.02C496.25,-26.91 488.33,-30.02 481,-33 459.05,-41.93 455.58,-51.68 432,-54"/>
-<path fill="none" stroke="#000000" d="M430,-54C417.5,-55.23 404.11,-55.79 391.26,-55.95"/>
-<polygon fill="#000000" stroke="#000000" points="391.07,-52.45 381.09,-55.99 391.1,-59.45 391.07,-52.45"/>
+<path fill="none" stroke="#000000" d="M480.88,-52C465.08,-51.96 447.83,-52.44 432,-54"/>
 </g>
 <!-- type~rmvs_tp -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node10" class="node">
+<g id="type~~swiftest_cb~~InheritedByGraph_node9" class="node">
 <title>type~rmvs_tp</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node10"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="563.5,-108 509.5,-108 509.5,-84 563.5,-84 563.5,-108"/>
-<text text-anchor="middle" x="536.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node9"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="563.5,-150 509.5,-150 509.5,-126 563.5,-126 563.5,-150"/>
+<text text-anchor="middle" x="536.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
-<g id="type~~swiftest_cb~~InheritedByGraph_edge7" class="edge">
+<g id="type~~swiftest_cb~~InheritedByGraph_edge9" class="edge">
 <title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M509.09,-96C472.2,-96 405.08,-96 363.45,-96"/>
-<polygon fill="#000000" stroke="#000000" points="363.19,-92.5 353.19,-96 363.19,-99.5 363.19,-92.5"/>
-<text text-anchor="middle" x="431" y="-98.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M509.09,-138C472.2,-138 405.08,-138 363.45,-138"/>
+<polygon fill="#000000" stroke="#000000" points="363.19,-134.5 353.19,-138 363.19,-141.5 363.19,-134.5"/>
+<text text-anchor="middle" x="431" y="-140.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
 </g>
-<!-- type~symba_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node11" class="node">
-<title>type~symba_nbody_system</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node11"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="807,-66 688,-66 688,-42 807,-42 807,-66"/>
-<text text-anchor="middle" x="747.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+<!-- type~helio_nbody_system -->
+<g id="type~~swiftest_cb~~InheritedByGraph_node10" class="node">
+<title>type~helio_nbody_system</title>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node10"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="591.5,-24 481.5,-24 481.5,0 591.5,0 591.5,-24"/>
+<text text-anchor="middle" x="536.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_edge10" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M687.73,-54C660.96,-54 629.21,-54 601.81,-54"/>
-<polygon fill="#000000" stroke="#000000" points="601.54,-50.5 591.54,-54 601.54,-57.5 601.54,-50.5"/>
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_cb~~InheritedByGraph_edge8" class="edge">
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M503.72,-24.02C496.25,-26.91 488.33,-30.02 481,-33 459.05,-41.93 455.58,-51.68 432,-54"/>
+<path fill="none" stroke="#000000" d="M430,-54C417.5,-55.23 404.11,-55.79 391.26,-55.95"/>
+<polygon fill="#000000" stroke="#000000" points="391.07,-52.45 381.09,-55.99 391.1,-59.45 391.07,-52.45"/>
 </g>
 <!-- type~rmvs_pl -->
-<g id="type~~swiftest_cb~~InheritedByGraph_node12" class="node">
+<g id="type~~swiftest_cb~~InheritedByGraph_node11" class="node">
 <title>type~rmvs_pl</title>
-<g id="a_type~~swiftest_cb~~InheritedByGraph_node12"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="774.5,-24 720.5,-24 720.5,0 774.5,0 774.5,-24"/>
-<text text-anchor="middle" x="747.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node11"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="774.5,-66 720.5,-66 720.5,-42 774.5,-42 774.5,-66"/>
+<text text-anchor="middle" x="747.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
-<g id="type~~swiftest_cb~~InheritedByGraph_edge11" class="edge">
+<g id="type~~swiftest_cb~~InheritedByGraph_edge10" class="edge">
 <title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M720.45,-12C691.06,-12 642.15,-12 602.29,-12"/>
-<polygon fill="#000000" stroke="#000000" points="602.11,-8.5 592.11,-12 602.11,-15.5 602.11,-8.5"/>
-<text text-anchor="middle" x="640" y="-14.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M720.45,-54C691.06,-54 642.15,-54 602.29,-54"/>
+<polygon fill="#000000" stroke="#000000" points="602.11,-50.5 592.11,-54 602.11,-57.5 602.11,-50.5"/>
+<text text-anchor="middle" x="640" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+</g>
+<!-- type~symba_nbody_system -->
+<g id="type~~swiftest_cb~~InheritedByGraph_node12" class="node">
+<title>type~symba_nbody_system</title>
+<g id="a_type~~swiftest_cb~~InheritedByGraph_node12"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="807,-24 688,-24 688,0 807,0 807,-24"/>
+<text text-anchor="middle" x="747.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+</a>
+</g>
+</g>
+<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<g id="type~~swiftest_cb~~InheritedByGraph_edge11" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
+<path fill="none" stroke="#000000" d="M687.73,-12C660.96,-12 629.21,-12 601.81,-12"/>
+<polygon fill="#000000" stroke="#000000" points="601.54,-8.5 591.54,-12 601.54,-15.5 601.54,-8.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/swiftest_nbody_system.html b/docs/type/swiftest_nbody_system.html
index e20cc8520..da82b9abf 100644
--- a/docs/type/swiftest_nbody_system.html
+++ b/docs/type/swiftest_nbody_system.html
@@ -304,129 +304,129 @@ <h3 class="panel-title">Inherits</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~swiftest_nbody_system~~InheritsGraph Pages: 1 -->
-<svg id="typeswiftest_nbody_systemInheritsGraph" width="571pt" height="129pt"
- viewBox="0.00 0.00 571.00 129.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~swiftest_nbody_system~~InheritsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 125)">
+<svg id="typeswiftest_nbody_systemInheritsGraph" width="571pt" height="131pt"
+ viewBox="0.00 0.00 571.00 131.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~swiftest_nbody_system~~InheritsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 127)">
 <title>type~~swiftest_nbody_system~~InheritsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-125 567,-125 567,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-127 567,-127 567,4 -4,4"/>
 <!-- type~swiftest_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_node1" class="node">
 <title>type~swiftest_nbody_system</title>
 <polygon fill="none" stroke="black" points="563,-66 440,-66 440,-42 563,-42 563,-66"/>
 <text text-anchor="middle" x="501.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_nbody_system</text>
 </g>
-<!-- type~swiftest_tp -->
+<!-- type~swiftest_cb -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_node2" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node2"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-24 278,-24 278,0 341,0 341,-24"/>
-<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+<title>type~swiftest_cb</title>
+<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node2"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
+<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.81,-35.28 378.82,-27.1 351.13,-20.98"/>
-<polygon fill="#000000" stroke="#000000" points="351.52,-17.48 341,-18.74 350.01,-24.32 351.52,-17.48"/>
-<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
+<g id="type~~swiftest_nbody_system~~InheritsGraph_edge1" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
+<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
+<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
 <!-- type~swiftest_pl -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_node3" class="node">
 <title>type~swiftest_pl</title>
 <g id="a_type~~swiftest_nbody_system~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-66 278.5,-66 278.5,-42 340.5,-42 340.5,-66"/>
-<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-24 278.5,-24 278.5,0 340.5,0 340.5,-24"/>
+<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_edge2" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.75,-54 376.66,-54 350.79,-54"/>
-<polygon fill="#000000" stroke="#000000" points="350.59,-50.5 340.59,-54 350.59,-57.5 350.59,-50.5"/>
-<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.58,-35.23 378.26,-26.98 350.5,-20.84"/>
+<polygon fill="#000000" stroke="#000000" points="351.25,-17.42 340.73,-18.68 349.74,-24.26 351.25,-17.42"/>
+<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_cb -->
+<!-- type~swiftest_tp -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_node4" class="node">
-<title>type~swiftest_cb</title>
-<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
-<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
+<title>type~swiftest_tp</title>
+<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-66 278,-66 278,-42 341,-42 341,-66"/>
+<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_edge1" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
-<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
-<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~swiftest_nbody_system~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.94,-54 377.11,-54 351.3,-54"/>
+<polygon fill="#000000" stroke="#000000" points="351.12,-50.5 341.12,-54 351.12,-57.5 351.12,-50.5"/>
+<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~swiftest_body -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_node7" class="node">
-<title>type~swiftest_body</title>
-<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
-<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
+<!-- type~swiftest_particle_info -->
+<g id="type~~swiftest_nbody_system~~InheritsGraph_node5" class="node">
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-123 0,-123 0,-99 112,-99 112,-123"/>
+<text text-anchor="middle" x="56" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
-<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
-<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_edge5" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M278.3,-52.15C272.2,-52.29 265.86,-52.82 260,-54"/>
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-103.98C155.82,-104.84 138.87,-105.9 122.39,-106.93"/>
+<polygon fill="#000000" stroke="#000000" points="121.99,-103.45 112.23,-107.56 122.43,-110.43 121.99,-103.45"/>
+<text text-anchor="middle" x="138" y="-108.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
 <!-- type~swiftest_base -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_node5" class="node">
+<g id="type~~swiftest_nbody_system~~InheritsGraph_node6" class="node">
 <title>type~swiftest_base</title>
-<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-121 17.5,-121 17.5,-97 94.5,-97 94.5,-121"/>
-<text text-anchor="middle" x="56" y="-106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-69 17.5,-69 17.5,-45 94.5,-45 94.5,-69"/>
+<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_edge7" class="edge">
+<g id="type~~swiftest_nbody_system~~InheritsGraph_edge5" class="edge">
 <title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.82,-104.49C162.03,-105.05 153.72,-105.59 146,-106 132.72,-106.7 118.32,-107.27 105.05,-107.72"/>
-<polygon fill="#000000" stroke="#000000" points="104.57,-104.23 94.69,-108.05 104.8,-111.23 104.57,-104.23"/>
+<path fill="none" stroke="#000000" d="M169.79,-92.12C150.55,-86.13 125.65,-78.38 104.14,-71.68"/>
+<polygon fill="#000000" stroke="#000000" points="105.11,-68.32 94.52,-68.69 103.03,-75 105.11,-68.32"/>
 </g>
-<!-- type~swiftest_particle_info -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_node6" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-69 0,-69 0,-45 112,-45 112,-69"/>
-<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<!-- type~swiftest_body -->
+<g id="type~~swiftest_nbody_system~~InheritsGraph_node7" class="node">
+<title>type~swiftest_body</title>
+<g id="a_type~~swiftest_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
+<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_edge6" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-92.12C150.93,-86.25 126.61,-78.68 105.39,-72.07"/>
-<polygon fill="#000000" stroke="#000000" points="106.17,-68.65 95.58,-69.01 104.09,-75.33 106.17,-68.65"/>
-<text text-anchor="middle" x="138" y="-85.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
+<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
+<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~swiftest_nbody_system~~InheritsGraph_edge9" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.72,-64.65C152.75,-68.01 140.81,-71.91 130,-76 117.07,-80.89 103.17,-86.96 91,-92.56"/>
-<polygon fill="#000000" stroke="#000000" points="89.26,-89.51 81.67,-96.91 92.22,-95.85 89.26,-89.51"/>
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<g id="type~~swiftest_nbody_system~~InheritsGraph_edge7" class="edge">
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M277.79,-52.16C271.84,-52.32 265.7,-52.85 260,-54"/>
 </g>
 <!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~swiftest_nbody_system~~InheritsGraph_edge8" class="edge">
 <title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.1,-41.94C158.79,-40.3 152.26,-38.88 146,-38 130.11,-35.76 112.82,-38.28 97.74,-42.15"/>
-<polygon fill="#000000" stroke="#000000" points="96.37,-38.9 87.7,-45 98.28,-45.63 96.37,-38.9"/>
-<text text-anchor="middle" x="138" y="-40.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.86,-66.09C149.4,-74.55 120.51,-85.95 97.21,-95.14"/>
+<polygon fill="#000000" stroke="#000000" points="95.62,-92 87.6,-98.93 98.19,-98.52 95.62,-92"/>
+<text text-anchor="middle" x="138" y="-82.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+</g>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~swiftest_nbody_system~~InheritsGraph_edge9" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.94,-48.62C157.95,-47.94 151.82,-47.37 146,-47 132.52,-46.15 117.94,-47.03 104.56,-48.56"/>
+<polygon fill="#000000" stroke="#000000" points="104.08,-45.1 94.6,-49.84 104.97,-52.04 104.08,-45.1"/>
 </g>
 </g>
 </svg>
@@ -506,66 +506,66 @@ <h3 class="panel-title">Inherited by</h3>
 <path fill="none" stroke="#000000" d="M159.73,-54C151.1,-54 142.05,-54 133.11,-54"/>
 <polygon fill="#000000" stroke="#000000" points="133.07,-50.5 123.07,-54 133.07,-57.5 133.07,-50.5"/>
 </g>
-<!-- type~helio_nbody_system -->
+<!-- type~rmvs_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_node3" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node3"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="417.5,-66 307.5,-66 307.5,-42 417.5,-42 417.5,-66"/>
-<text text-anchor="middle" x="362.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<title>type~rmvs_nbody_system</title>
+<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node3"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="418,-66 307,-66 307,-42 418,-42 418,-66"/>
+<text text-anchor="middle" x="362.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_edge2" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M307.15,-52.37C301.01,-52.67 294.86,-53.18 289,-54"/>
+<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M306.76,-52.39C300.75,-52.69 294.73,-53.2 289,-54"/>
 </g>
-<!-- type~rmvs_nbody_system -->
+<!-- type~helio_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_node4" class="node">
-<title>type~rmvs_nbody_system</title>
-<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node4"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="418,-24 307,-24 307,0 418,0 418,-24"/>
-<text text-anchor="middle" x="362.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<title>type~helio_nbody_system</title>
+<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node4"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="417.5,-24 307.5,-24 307.5,0 417.5,0 417.5,-24"/>
+<text text-anchor="middle" x="362.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_edge3" class="edge">
-<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
 <path fill="none" stroke="#000000" d="M323.03,-24.04C317.42,-26.57 311.89,-29.55 307,-33 296.96,-40.09 301.18,-52.31 289,-54"/>
 <path fill="none" stroke="#000000" d="M288,-54C285.51,-54.35 282.96,-54.64 280.39,-54.88"/>
 <polygon fill="#000000" stroke="#000000" points="280.09,-51.4 270.36,-55.6 280.59,-58.38 280.09,-51.4"/>
 </g>
-<!-- type~symba_nbody_system -->
+<!-- type~rmvs_pl -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_node5" class="node">
-<title>type~symba_nbody_system</title>
-<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node5"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="633,-66 514,-66 514,-42 633,-42 633,-66"/>
-<text text-anchor="middle" x="573.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+<title>type~rmvs_pl</title>
+<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node5"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="600.5,-66 546.5,-66 546.5,-42 600.5,-42 600.5,-66"/>
+<text text-anchor="middle" x="573.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_edge4" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M513.73,-54C486.96,-54 455.21,-54 427.81,-54"/>
-<polygon fill="#000000" stroke="#000000" points="427.54,-50.5 417.54,-54 427.54,-57.5 427.54,-50.5"/>
+<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.45,-54C517.06,-54 468.15,-54 428.29,-54"/>
+<polygon fill="#000000" stroke="#000000" points="428.11,-50.5 418.11,-54 428.11,-57.5 428.11,-50.5"/>
+<text text-anchor="middle" x="466" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
-<!-- type~rmvs_pl -->
+<!-- type~symba_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_node6" class="node">
-<title>type~rmvs_pl</title>
-<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node6"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="600.5,-24 546.5,-24 546.5,0 600.5,0 600.5,-24"/>
-<text text-anchor="middle" x="573.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<title>type~symba_nbody_system</title>
+<g id="a_type~~swiftest_nbody_system~~InheritedByGraph_node6"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="633,-24 514,-24 514,0 633,0 633,-24"/>
+<text text-anchor="middle" x="573.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
+<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
 <g id="type~~swiftest_nbody_system~~InheritedByGraph_edge5" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M546.45,-12C517.06,-12 468.15,-12 428.29,-12"/>
-<polygon fill="#000000" stroke="#000000" points="428.11,-8.5 418.11,-12 428.11,-15.5 428.11,-8.5"/>
-<text text-anchor="middle" x="466" y="-14.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
+<path fill="none" stroke="#000000" d="M513.73,-12C486.96,-12 455.21,-12 427.81,-12"/>
+<polygon fill="#000000" stroke="#000000" points="427.54,-8.5 417.54,-12 427.54,-15.5 427.54,-8.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/swiftest_particle_info.html b/docs/type/swiftest_particle_info.html
index 939d1f554..f36fe94f6 100644
--- a/docs/type/swiftest_particle_info.html
+++ b/docs/type/swiftest_particle_info.html
@@ -308,26 +308,41 @@ <h3 class="panel-title">Inherited by</h3>
 <polygon fill="#000000" stroke="#000000" points="121.67,-141.67 112.33,-146.68 122.75,-148.58 121.67,-141.67"/>
 <text text-anchor="middle" x="138" y="-146.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~helio_cb -->
+<!-- type~swiftest_tp -->
 <g id="type~~swiftest_particle_info~~InheritedByGraph_node4" class="node">
+<title>type~swiftest_tp</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node4"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-193 278,-193 278,-169 341,-169 341,-193"/>
+<text text-anchor="middle" x="309.5" y="-178.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+</a>
+</g>
+</g>
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge7" class="edge">
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M279.81,-168.98C268,-164.03 254.16,-158.23 241.53,-152.93"/>
+<polygon fill="#000000" stroke="#000000" points="242.73,-149.65 232.16,-149.01 240.03,-156.1 242.73,-149.65"/>
+</g>
+<!-- type~helio_cb -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node5" class="node">
 <title>type~helio_cb</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node4"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node5"><a xlink:href=".././type/helio_cb.html" xlink:title="helio_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="336.5,-274 282.5,-274 282.5,-250 336.5,-250 336.5,-274"/>
 <text text-anchor="middle" x="309.5" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_cb</text>
 </a>
 </g>
 </g>
 <!-- type~helio_cb&#45;&gt;type~swiftest_cb -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge4" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge5" class="edge">
 <title>type~helio_cb&#45;&gt;type~swiftest_cb</title>
 <path fill="none" stroke="#000000" d="M289.31,-274.04C278.14,-280.32 265.25,-286.11 260,-283"/>
 <path fill="none" stroke="#000000" d="M259,-283C229.4,-265.47 214.74,-226.11 208.16,-201.15"/>
 <polygon fill="#000000" stroke="#000000" points="211.5,-200.04 205.75,-191.14 204.69,-201.68 211.5,-200.04"/>
 </g>
 <!-- type~swiftest_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node5" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node6" class="node">
 <title>type~swiftest_nbody_system</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node5"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node6"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="563,-148 440,-148 440,-124 563,-124 563,-148"/>
 <text text-anchor="middle" x="501.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
 </a>
@@ -340,64 +355,49 @@ <h3 class="panel-title">Inherited by</h3>
 <polygon fill="#000000" stroke="#000000" points="236.6,-159.81 228.75,-166.93 239.32,-166.26 236.6,-159.81"/>
 <text text-anchor="middle" x="309.5" y="-152.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge8" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.1,-148.02C441.45,-150.35 431.41,-152.76 422,-155 398.57,-160.57 372.34,-166.69 351.21,-171.59"/>
+<polygon fill="#000000" stroke="#000000" points="350.23,-168.23 341.28,-173.9 351.81,-175.05 350.23,-168.23"/>
+<text text-anchor="middle" x="390.5" y="-171.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+</g>
 <!-- type~swiftest_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node6" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node8" class="node">
 <title>type~swiftest_pl</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node6"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node8"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-105 278.5,-105 278.5,-81 340.5,-81 340.5,-105"/>
 <text text-anchor="middle" x="309.5" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge10" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge14" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.55,-123.95C441.77,-121.6 431.57,-119.19 422,-117 398.44,-111.62 372.01,-105.91 350.79,-101.41"/>
 <polygon fill="#000000" stroke="#000000" points="351.34,-97.95 340.83,-99.31 349.89,-104.8 351.34,-97.95"/>
 <text text-anchor="middle" x="390.5" y="-119.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node7" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node7"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-193 278,-193 278,-169 341,-169 341,-193"/>
-<text text-anchor="middle" x="309.5" y="-178.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
-</a>
-</g>
-</g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge14" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M451.1,-148.02C441.45,-150.35 431.41,-152.76 422,-155 398.57,-160.57 372.34,-166.69 351.21,-171.59"/>
-<polygon fill="#000000" stroke="#000000" points="350.23,-168.23 341.28,-173.9 351.81,-175.05 350.23,-168.23"/>
-<text text-anchor="middle" x="390.5" y="-171.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge7" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M279.81,-105.02C268,-109.97 254.16,-115.77 241.53,-121.07"/>
-<polygon fill="#000000" stroke="#000000" points="240.03,-117.9 232.16,-124.99 242.73,-124.35 240.03,-117.9"/>
-</g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge6" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M279.81,-168.98C268,-164.03 254.16,-158.23 241.53,-152.93"/>
-<polygon fill="#000000" stroke="#000000" points="242.73,-149.65 232.16,-149.01 240.03,-156.1 242.73,-149.65"/>
-</g>
 <!-- type~whm_cb -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node8" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node7" class="node">
 <title>type~whm_cb</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node8"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node7"><a xlink:href=".././type/whm_cb.html" xlink:title="whm_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="336.5,-316 282.5,-316 282.5,-292 336.5,-292 336.5,-316"/>
 <text text-anchor="middle" x="309.5" y="-301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_cb</text>
 </a>
 </g>
 </g>
 <!-- type~whm_cb&#45;&gt;type~swiftest_cb -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge5" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge4" class="edge">
 <title>type~whm_cb&#45;&gt;type~swiftest_cb</title>
 <path fill="none" stroke="#000000" d="M282.48,-294.16C275.03,-290.97 267.03,-287.16 260,-283"/>
 </g>
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge6" class="edge">
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M279.81,-105.02C268,-109.97 254.16,-115.77 241.53,-121.07"/>
+<polygon fill="#000000" stroke="#000000" points="240.03,-117.9 232.16,-124.99 242.73,-124.35 240.03,-117.9"/>
+</g>
 <!-- type~symba_cb -->
 <g id="type~~swiftest_particle_info~~InheritedByGraph_node9" class="node">
 <title>type~symba_cb</title>
@@ -408,255 +408,255 @@ <h3 class="panel-title">Inherited by</h3>
 </g>
 </g>
 <!-- type~symba_cb&#45;&gt;type~helio_cb -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge8" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge11" class="edge">
 <title>type~symba_cb&#45;&gt;type~helio_cb</title>
 <path fill="none" stroke="#000000" d="M470.81,-262C437.28,-262 382.71,-262 346.7,-262"/>
 <polygon fill="#000000" stroke="#000000" points="346.62,-258.5 336.62,-262 346.62,-265.5 346.62,-258.5"/>
 </g>
-<!-- type~whm_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node10" class="node">
-<title>type~whm_nbody_system</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node10"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="773,-148 663,-148 663,-124 773,-124 773,-148"/>
-<text text-anchor="middle" x="718" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
-</a>
-</g>
-</g>
-<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge9" class="edge">
-<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
-<path fill="none" stroke="#000000" d="M662.87,-136C635.67,-136 602.37,-136 573.18,-136"/>
-<polygon fill="#000000" stroke="#000000" points="573.04,-132.5 563.04,-136 573.04,-139.5 573.04,-132.5"/>
-</g>
 <!-- type~whm_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node11" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node10" class="node">
 <title>type~whm_pl</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node11"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node10"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="845,-24 791,-24 791,0 845,0 845,-24"/>
 <text text-anchor="middle" x="818" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
 </a>
 </g>
 </g>
 <!-- type~whm_pl&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge11" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge15" class="edge">
 <title>type~whm_pl&#45;&gt;type~swiftest_pl</title>
 <path fill="none" stroke="#000000" d="M389.5,-52C370.57,-56.46 351.15,-66.45 336.31,-75.45"/>
 <polygon fill="#000000" stroke="#000000" points="334.3,-72.57 327.7,-80.86 338.03,-78.5 334.3,-72.57"/>
 <path fill="none" stroke="#000000" d="M790.96,-10.16C729.11,-6.47 568.91,-0.89 440,-31 417.13,-36.34 414.36,-46.62 391.5,-52"/>
 </g>
-<!-- type~helio_tp -->
+<!-- type~fraggle_fragments -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node11" class="node">
+<title>type~fraggle_fragments</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node11"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="551.5,-64 451.5,-64 451.5,-40 551.5,-40 551.5,-64"/>
+<text text-anchor="middle" x="501.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
+</a>
+</g>
+</g>
+<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge16" class="edge">
+<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
+<path fill="none" stroke="#000000" d="M451.38,-47.24C432.45,-46.63 410.75,-47.47 391.5,-52"/>
+</g>
+<!-- type~whm_tp -->
 <g id="type~~swiftest_particle_info~~InheritedByGraph_node12" class="node">
+<title>type~whm_tp</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node12"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="528.5,-232 474.5,-232 474.5,-208 528.5,-208 528.5,-232"/>
+<text text-anchor="middle" x="501.5" y="-217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
+</a>
+</g>
+</g>
+<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge9" class="edge">
+<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" d="M474.48,-217.68C452.37,-215.64 419.82,-212.46 391.5,-209"/>
+</g>
+<!-- type~whm_nbody_system -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node13" class="node">
+<title>type~whm_nbody_system</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node13"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="773,-148 663,-148 663,-124 773,-124 773,-148"/>
+<text text-anchor="middle" x="718" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
+</a>
+</g>
+</g>
+<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge12" class="edge">
+<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
+<path fill="none" stroke="#000000" d="M662.87,-136C635.67,-136 602.37,-136 573.18,-136"/>
+<polygon fill="#000000" stroke="#000000" points="573.04,-132.5 563.04,-136 573.04,-139.5 573.04,-132.5"/>
+</g>
+<!-- type~helio_tp -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node14" class="node">
 <title>type~helio_tp</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node12"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node14"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="528.5,-190 474.5,-190 474.5,-166 528.5,-166 528.5,-190"/>
 <text text-anchor="middle" x="501.5" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
 </a>
 </g>
 </g>
 <!-- type~helio_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge15" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge10" class="edge">
 <title>type~helio_tp&#45;&gt;type~swiftest_tp</title>
 <path fill="none" stroke="#000000" d="M474.41,-186.57C444.88,-196.09 399.78,-210.01 391.5,-209"/>
 <path fill="none" stroke="#000000" d="M389.5,-209C374.39,-207.16 358.44,-202.14 344.85,-196.86"/>
 <polygon fill="#000000" stroke="#000000" points="346.01,-193.55 335.43,-193.01 343.36,-200.03 346.01,-193.55"/>
 </g>
 <!-- type~rmvs_cb -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node13" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node15" class="node">
 <title>type~rmvs_cb</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node13"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node15"><a xlink:href=".././type/rmvs_cb.html" xlink:title="rmvs_cb">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="528.5,-316 474.5,-316 474.5,-292 528.5,-292 528.5,-316"/>
 <text text-anchor="middle" x="501.5" y="-301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_cb</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_cb&#45;&gt;type~whm_cb -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge17" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge13" class="edge">
 <title>type~rmvs_cb&#45;&gt;type~whm_cb</title>
 <path fill="none" stroke="#000000" d="M474.48,-304C441.46,-304 384.31,-304 346.95,-304"/>
 <polygon fill="#000000" stroke="#000000" points="346.51,-300.5 336.51,-304 346.51,-307.5 346.51,-300.5"/>
 </g>
-<!-- type~whm_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node14" class="node">
-<title>type~whm_tp</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node14"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="528.5,-232 474.5,-232 474.5,-208 528.5,-208 528.5,-232"/>
-<text text-anchor="middle" x="501.5" y="-217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
-</a>
-</g>
-</g>
-<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge16" class="edge">
-<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" d="M474.48,-217.68C452.37,-215.64 419.82,-212.46 391.5,-209"/>
-</g>
 <!-- type~helio_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node15" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node16" class="node">
 <title>type~helio_pl</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node15"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node16"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="528.5,-106 474.5,-106 474.5,-82 528.5,-82 528.5,-106"/>
 <text text-anchor="middle" x="501.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
 </a>
 </g>
 </g>
 <!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge13" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge17" class="edge">
 <title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
 <path fill="none" stroke="#000000" d="M474.44,-85.43C463.71,-81.78 451.19,-77.36 440,-73 418.11,-64.48 414.36,-46.62 391.5,-52"/>
 </g>
-<!-- type~fraggle_fragments -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node16" class="node">
-<title>type~fraggle_fragments</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node16"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="551.5,-64 451.5,-64 451.5,-40 551.5,-40 551.5,-64"/>
-<text text-anchor="middle" x="501.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
-</a>
-</g>
-</g>
-<!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge12" class="edge">
-<title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M451.38,-47.24C432.45,-46.63 410.75,-47.47 391.5,-52"/>
-</g>
-<!-- type~rmvs_pl -->
+<!-- type~rmvs_tp -->
 <g id="type~~swiftest_particle_info~~InheritedByGraph_node17" class="node">
-<title>type~rmvs_pl</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node17"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="1156.5,-67 1102.5,-67 1102.5,-43 1156.5,-43 1156.5,-67"/>
-<text text-anchor="middle" x="1129.5" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<title>type~rmvs_tp</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node17"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="745,-280 691,-280 691,-256 745,-256 745,-280"/>
+<text text-anchor="middle" x="718" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge20" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
-<path fill="none" stroke="#000000" d="M1102.29,-50.67C1071.59,-45.65 1019.17,-37.28 974,-31 933.35,-25.35 886.57,-19.74 855.13,-16.1"/>
-<polygon fill="#000000" stroke="#000000" points="855.42,-12.61 845.09,-14.94 854.62,-19.56 855.42,-12.61"/>
+<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge19" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
+<path fill="none" stroke="#000000" d="M690.7,-262.11C652.48,-253.56 581.48,-237.67 538.46,-228.05"/>
+<polygon fill="#000000" stroke="#000000" points="539.2,-224.63 528.68,-225.86 537.68,-231.46 539.2,-224.63"/>
 </g>
-<!-- type~rmvs_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node22" class="node">
-<title>type~rmvs_nbody_system</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node22"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="974,-106 863,-106 863,-82 974,-82 974,-106"/>
-<text text-anchor="middle" x="918.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge23" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M690.7,-272.41C652.56,-278.81 581.78,-290.69 538.73,-297.92"/>
+<polygon fill="#000000" stroke="#000000" points="537.96,-294.5 528.68,-299.61 539.12,-301.4 537.96,-294.5"/>
+<text text-anchor="middle" x="613" y="-292.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
+</g>
+<!-- type~helio_nbody_system -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node18" class="node">
+<title>type~helio_nbody_system</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node18"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="973.5,-148 863.5,-148 863.5,-124 973.5,-124 973.5,-148"/>
+<text text-anchor="middle" x="918.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge27" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1102.27,-55.23C1074.54,-55.94 1029.71,-58.48 992,-67 988.43,-67.81 974.73,-72.83 960.19,-78.33"/>
-<polygon fill="#000000" stroke="#000000" points="958.71,-75.15 950.61,-81.97 961.2,-81.69 958.71,-75.15"/>
-<text text-anchor="middle" x="1022" y="-69.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge21" class="edge">
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M863.46,-134C848.99,-134.01 833.37,-134.51 819,-136"/>
 </g>
 <!-- type~symba_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node18" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node19" class="node">
 <title>type~symba_tp</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node18"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node19"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="747.5,-190 688.5,-190 688.5,-166 747.5,-166 747.5,-190"/>
 <text text-anchor="middle" x="718" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
 </a>
 </g>
 </g>
 <!-- type~symba_tp&#45;&gt;type~helio_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge21" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge22" class="edge">
 <title>type~symba_tp&#45;&gt;type~helio_tp</title>
 <path fill="none" stroke="#000000" d="M688.07,-178C649.38,-178 580.79,-178 538.72,-178"/>
 <polygon fill="#000000" stroke="#000000" points="538.62,-174.5 528.62,-178 538.62,-181.5 538.62,-174.5"/>
 </g>
-<!-- type~symba_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node19" class="node">
-<title>type~symba_pl</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node19"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="747,-106 689,-106 689,-82 747,-82 747,-106"/>
-<text text-anchor="middle" x="718" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
-</a>
-</g>
-</g>
-<!-- type~symba_pl&#45;&gt;type~helio_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge24" class="edge">
-<title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M688.96,-94C650.43,-94 581.1,-94 538.7,-94"/>
-<polygon fill="#000000" stroke="#000000" points="538.53,-90.5 528.53,-94 538.53,-97.5 538.53,-90.5"/>
-</g>
-<!-- type~helio_nbody_system -->
+<!-- type~rmvs_nbody_system -->
 <g id="type~~swiftest_particle_info~~InheritedByGraph_node20" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node20"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="973.5,-148 863.5,-148 863.5,-124 973.5,-124 973.5,-148"/>
-<text text-anchor="middle" x="918.5" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<title>type~rmvs_nbody_system</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node20"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="974,-106 863,-106 863,-82 974,-82 974,-106"/>
+<text text-anchor="middle" x="918.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge18" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M863.46,-134C848.99,-134.01 833.37,-134.51 819,-136"/>
+<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge20" class="edge">
+<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M817,-136C806.12,-137.12 794.52,-137.68 783.25,-137.89"/>
+<polygon fill="#000000" stroke="#000000" points="782.98,-134.39 773.02,-137.99 783.05,-141.39 782.98,-134.39"/>
+<path fill="none" stroke="#000000" d="M885.06,-106.03C877.76,-108.86 870.08,-111.95 863,-115 843.1,-123.57 840.55,-133.77 819,-136"/>
 </g>
-<!-- type~rmvs_tp -->
+<!-- type~rmvs_pl -->
 <g id="type~~swiftest_particle_info~~InheritedByGraph_node21" class="node">
-<title>type~rmvs_tp</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node21"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="745,-280 691,-280 691,-256 745,-256 745,-280"/>
-<text text-anchor="middle" x="718" y="-265.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
+<title>type~rmvs_pl</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node21"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="1156.5,-67 1102.5,-67 1102.5,-43 1156.5,-43 1156.5,-67"/>
+<text text-anchor="middle" x="1129.5" y="-52.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_tp&#45;&gt;type~rmvs_cb -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge22" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~rmvs_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M690.7,-272.41C652.56,-278.81 581.78,-290.69 538.73,-297.92"/>
-<polygon fill="#000000" stroke="#000000" points="537.96,-294.5 528.68,-299.61 539.12,-301.4 537.96,-294.5"/>
-<text text-anchor="middle" x="613" y="-292.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb_heliocentric</text>
-</g>
-<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge23" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
-<path fill="none" stroke="#000000" d="M690.7,-262.11C652.48,-253.56 581.48,-237.67 538.46,-228.05"/>
-<polygon fill="#000000" stroke="#000000" points="539.2,-224.63 528.68,-225.86 537.68,-231.46 539.2,-224.63"/>
+<!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge18" class="edge">
+<title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
+<path fill="none" stroke="#000000" d="M1102.29,-50.67C1071.59,-45.65 1019.17,-37.28 974,-31 933.35,-25.35 886.57,-19.74 855.13,-16.1"/>
+<polygon fill="#000000" stroke="#000000" points="855.42,-12.61 845.09,-14.94 854.62,-19.56 855.42,-12.61"/>
 </g>
-<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge19" class="edge">
-<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M817,-136C806.12,-137.12 794.52,-137.68 783.25,-137.89"/>
-<polygon fill="#000000" stroke="#000000" points="782.98,-134.39 773.02,-137.99 783.05,-141.39 782.98,-134.39"/>
-<path fill="none" stroke="#000000" d="M885.06,-106.03C877.76,-108.86 870.08,-111.95 863,-115 843.1,-123.57 840.55,-133.77 819,-136"/>
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge26" class="edge">
+<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1102.27,-55.23C1074.54,-55.94 1029.71,-58.48 992,-67 988.43,-67.81 974.73,-72.83 960.19,-78.33"/>
+<polygon fill="#000000" stroke="#000000" points="958.71,-75.15 950.61,-81.97 961.2,-81.69 958.71,-75.15"/>
+<text text-anchor="middle" x="1022" y="-69.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
-<!-- type~symba_merger -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node23" class="node">
-<title>type~symba_merger</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node23"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="961,-64 876,-64 876,-40 961,-40 961,-64"/>
-<text text-anchor="middle" x="918.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+<!-- type~symba_pl -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node22" class="node">
+<title>type~symba_pl</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node22"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="747,-91 689,-91 689,-67 747,-67 747,-91"/>
+<text text-anchor="middle" x="718" y="-76.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_merger&#45;&gt;type~symba_pl -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge25" class="edge">
-<title>type~symba_merger&#45;&gt;type~symba_pl</title>
-<path fill="none" stroke="#000000" d="M875.89,-60.8C840.86,-68.22 791.17,-78.73 757.15,-85.93"/>
-<polygon fill="#000000" stroke="#000000" points="756.19,-82.55 747.13,-88.05 757.64,-89.4 756.19,-82.55"/>
+<!-- type~symba_pl&#45;&gt;type~helio_pl -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge24" class="edge">
+<title>type~symba_pl&#45;&gt;type~helio_pl</title>
+<path fill="none" stroke="#000000" d="M688.96,-80.96C650.43,-83.66 581.1,-88.5 538.7,-91.47"/>
+<polygon fill="#000000" stroke="#000000" points="538.27,-87.99 528.53,-92.18 538.75,-94.97 538.27,-87.99"/>
 </g>
 <!-- type~symba_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_node24" class="node">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node23" class="node">
 <title>type~symba_nbody_system</title>
-<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node24"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node23"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="1189,-121 1070,-121 1070,-97 1189,-97 1189,-121"/>
 <text text-anchor="middle" x="1129.5" y="-106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
-<g id="type~~swiftest_particle_info~~InheritedByGraph_edge26" class="edge">
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge25" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
 <path fill="none" stroke="#000000" d="M1069.73,-116.59C1042.96,-120.05 1011.21,-124.15 983.81,-127.69"/>
 <polygon fill="#000000" stroke="#000000" points="983.01,-124.27 973.54,-129.02 983.91,-131.21 983.01,-124.27"/>
 </g>
+<!-- type~symba_merger -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_node24" class="node">
+<title>type~symba_merger</title>
+<g id="a_type~~swiftest_particle_info~~InheritedByGraph_node24"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="961,-64 876,-64 876,-40 961,-40 961,-64"/>
+<text text-anchor="middle" x="918.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+</a>
+</g>
+</g>
 <!-- type~symba_nbody_system&#45;&gt;type~symba_merger -->
 <g id="type~~swiftest_particle_info~~InheritedByGraph_edge28" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~symba_merger</title>
 <path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1071.38,-96.97C1046.8,-91.45 1017.84,-84.46 992,-77 982.12,-74.15 971.6,-70.74 961.73,-67.37"/>
 <polygon fill="#000000" stroke="#000000" points="962.71,-64.01 952.12,-64.04 960.42,-70.62 962.71,-64.01"/>
-<text text-anchor="middle" x="1022" y="-94.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+<text text-anchor="middle" x="1022" y="-95.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+</g>
+<!-- type~symba_merger&#45;&gt;type~symba_pl -->
+<g id="type~~swiftest_particle_info~~InheritedByGraph_edge27" class="edge">
+<title>type~symba_merger&#45;&gt;type~symba_pl</title>
+<path fill="none" stroke="#000000" d="M875.89,-57.66C840.86,-62.42 791.17,-69.18 757.15,-73.81"/>
+<polygon fill="#000000" stroke="#000000" points="756.57,-70.36 747.13,-75.17 757.51,-77.29 756.57,-70.36"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/swiftest_pl.html b/docs/type/swiftest_pl.html
index 3ae4add79..3e32a584c 100644
--- a/docs/type/swiftest_pl.html
+++ b/docs/type/swiftest_pl.html
@@ -414,36 +414,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.77,-33C269.45,-33 260.22,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.09,-29.5 241.09,-33 251.09,-36.5 251.09,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~swiftest_pl~~InheritsGraph_node3" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~swiftest_pl~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~swiftest_pl~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~swiftest_pl~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~swiftest_pl~~InheritsGraph_edge2" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~swiftest_pl~~InheritsGraph_node4" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~swiftest_pl~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~swiftest_pl~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~swiftest_pl~~InheritsGraph_edge2" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~swiftest_pl~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -497,196 +497,196 @@ <h3 class="panel-title">Inherited by</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~swiftest_pl~~InheritedByGraph Pages: 1 -->
-<svg id="typeswiftest_plInheritedByGraph" width="641pt" height="119pt"
- viewBox="0.00 0.00 641.00 119.48" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~swiftest_pl~~InheritedByGraph" class="graph" transform="scale(0.75 0.75) rotate(0) translate(4 155)">
+<svg id="typeswiftest_plInheritedByGraph" width="641pt" height="125pt"
+ viewBox="0.00 0.00 641.00 124.73" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~swiftest_pl~~InheritedByGraph" class="graph" transform="scale(0.75 0.75) rotate(0) translate(4 161.98)">
 <title>type~~swiftest_pl~~InheritedByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-155 849,-155 849,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-161.98 849,-161.98 849,4 -4,4"/>
 <!-- type~swiftest_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node1" class="node">
 <title>type~swiftest_pl</title>
-<polygon fill="none" stroke="black" points="62,-111 0,-111 0,-87 62,-87 62,-111"/>
-<text text-anchor="middle" x="31" y="-96.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_pl</text>
+<polygon fill="none" stroke="black" points="62,-66 0,-66 0,-42 62,-42 62,-66"/>
+<text text-anchor="middle" x="31" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_pl</text>
 </g>
 <!-- type~whm_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node2" class="node">
 <title>type~whm_pl</title>
 <g id="a_type~~swiftest_pl~~InheritedByGraph_node2"><a xlink:href=".././type/whm_pl.html" xlink:title="whm_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="501,-151 447,-151 447,-127 501,-127 501,-151"/>
-<text text-anchor="middle" x="474" y="-136.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="501,-148 447,-148 447,-124 501,-124 501,-148"/>
+<text text-anchor="middle" x="474" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_pl</text>
 </a>
 </g>
 </g>
 <!-- type~whm_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_edge2" class="edge">
 <title>type~whm_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M446.93,-137.67C393.1,-134.87 265.75,-127.96 159,-120 123.85,-117.38 114.64,-119.52 80,-113 77.37,-112.51 74.68,-111.93 71.98,-111.29"/>
-<polygon fill="#000000" stroke="#000000" points="72.81,-107.89 62.25,-108.79 71.07,-114.67 72.81,-107.89"/>
+<path fill="none" stroke="#000000" d="M446.74,-141.34C385.97,-152.56 231.62,-174.54 111.5,-136"/>
 </g>
 <!-- type~fraggle_fragments -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node3" class="node">
 <title>type~fraggle_fragments</title>
 <g id="a_type~~swiftest_pl~~InheritedByGraph_node3"><a xlink:href=".././type/fraggle_fragments.html" xlink:title="fraggle_fragments">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="270.5,-24 170.5,-24 170.5,0 270.5,0 270.5,-24"/>
-<text text-anchor="middle" x="220.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="270.5,-108 170.5,-108 170.5,-84 270.5,-84 270.5,-108"/>
+<text text-anchor="middle" x="220.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">fraggle_fragments</text>
 </a>
 </g>
 </g>
 <!-- type~fraggle_fragments&#45;&gt;type~swiftest_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_edge3" class="edge">
 <title>type~fraggle_fragments&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M183.17,-24.07C175.16,-26.88 166.76,-29.94 159,-33 137.52,-41.46 133.17,-46.04 111.5,-54"/>
-<path fill="none" stroke="#000000" d="M109.5,-54C90.99,-60.79 71.82,-71.89 57.18,-81.36"/>
-<polygon fill="#000000" stroke="#000000" points="55.08,-78.55 48.69,-86.99 58.96,-84.38 55.08,-78.55"/>
+<path fill="none" stroke="#000000" d="M192.3,-108.07C162.99,-120.75 119.45,-138.55 111.5,-136"/>
+<path fill="none" stroke="#000000" d="M109.5,-136C79.25,-126.29 56.23,-95.98 43.41,-75.06"/>
+<polygon fill="#000000" stroke="#000000" points="46.32,-73.09 38.25,-66.22 40.27,-76.62 46.32,-73.09"/>
 </g>
 <!-- type~helio_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node4" class="node">
 <title>type~helio_pl</title>
 <g id="a_type~~swiftest_pl~~InheritedByGraph_node4"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="247.5,-66 193.5,-66 193.5,-42 247.5,-42 247.5,-66"/>
-<text text-anchor="middle" x="220.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="247.5,-24 193.5,-24 193.5,0 247.5,0 247.5,-24"/>
+<text text-anchor="middle" x="220.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
 </a>
 </g>
 </g>
 <!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_edge4" class="edge">
 <title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M193.31,-49.08C170.88,-46 138.08,-44.24 111.5,-54"/>
+<path fill="none" stroke="#000000" d="M193.43,-17.84C161.97,-24.89 108.75,-36.81 72.07,-45.03"/>
+<polygon fill="#000000" stroke="#000000" points="71.18,-41.64 62.19,-47.24 72.71,-48.47 71.18,-41.64"/>
 </g>
 <!-- type~swiftest_nbody_system -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node5" class="node">
 <title>type~swiftest_nbody_system</title>
 <g id="a_type~~swiftest_pl~~InheritedByGraph_node5"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="282,-111 159,-111 159,-87 282,-87 282,-111"/>
-<text text-anchor="middle" x="220.5" y="-96.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="282,-66 159,-66 159,-42 282,-42 282,-66"/>
+<text text-anchor="middle" x="220.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_edge1" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.88,-99C130.61,-99 97.72,-99 72.52,-99"/>
-<polygon fill="#000000" stroke="#000000" points="72.22,-95.5 62.22,-99 72.22,-102.5 72.22,-95.5"/>
-<text text-anchor="middle" x="110.5" y="-101.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M158.88,-54C130.61,-54 97.72,-54 72.52,-54"/>
+<polygon fill="#000000" stroke="#000000" points="72.22,-50.5 62.22,-54 72.22,-57.5 72.22,-50.5"/>
+<text text-anchor="middle" x="110.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~symba_pl -->
+<!-- type~whm_nbody_system -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node6" class="node">
-<title>type~symba_pl</title>
-<g id="a_type~~swiftest_pl~~InheritedByGraph_node6"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="403,-42 345,-42 345,-18 403,-18 403,-42"/>
-<text text-anchor="middle" x="374" y="-27.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
+<title>type~whm_nbody_system</title>
+<g id="a_type~~swiftest_pl~~InheritedByGraph_node6"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="429,-77 319,-77 319,-53 429,-53 429,-77"/>
+<text text-anchor="middle" x="374" y="-62.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pl&#45;&gt;type~helio_pl -->
-<g id="type~~swiftest_pl~~InheritedByGraph_edge6" class="edge">
-<title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M344.86,-34.46C320.31,-38.35 284.53,-44.01 257.83,-48.25"/>
-<polygon fill="#000000" stroke="#000000" points="257.05,-44.83 247.72,-49.85 258.14,-51.74 257.05,-44.83"/>
+<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
+<g id="type~~swiftest_pl~~InheritedByGraph_edge7" class="edge">
+<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
+<path fill="none" stroke="#000000" d="M318.73,-61.06C310.1,-60.43 301.05,-59.78 292.11,-59.13"/>
+<polygon fill="#000000" stroke="#000000" points="292.3,-55.63 282.07,-58.4 291.79,-62.61 292.3,-55.63"/>
 </g>
 <!-- type~rmvs_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node7" class="node">
 <title>type~rmvs_pl</title>
 <g id="a_type~~swiftest_pl~~InheritedByGraph_node7"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="812.5,-120 758.5,-120 758.5,-96 812.5,-96 812.5,-120"/>
-<text text-anchor="middle" x="785.5" y="-105.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="812.5,-117 758.5,-117 758.5,-93 812.5,-93 812.5,-117"/>
+<text text-anchor="middle" x="785.5" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_pl&#45;&gt;type~whm_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_edge5" class="edge">
 <title>type~rmvs_pl&#45;&gt;type~whm_pl</title>
-<path fill="none" stroke="#000000" d="M758.33,-111.68C743.57,-113.7 724.77,-116.15 708,-118 638.53,-125.67 557.16,-132.52 511.29,-136.18"/>
-<polygon fill="#000000" stroke="#000000" points="510.93,-132.7 501.24,-136.98 511.49,-139.68 510.93,-132.7"/>
+<path fill="none" stroke="#000000" d="M758.33,-108.68C743.57,-110.7 724.77,-113.15 708,-115 638.53,-122.67 557.16,-129.52 511.29,-133.18"/>
+<polygon fill="#000000" stroke="#000000" points="510.93,-129.7 501.24,-133.98 511.49,-136.68 510.93,-129.7"/>
 </g>
 <!-- type~rmvs_nbody_system -->
-<g id="type~~swiftest_pl~~InheritedByGraph_node11" class="node">
+<g id="type~~swiftest_pl~~InheritedByGraph_node9" class="node">
 <title>type~rmvs_nbody_system</title>
-<g id="a_type~~swiftest_pl~~InheritedByGraph_node11"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="630,-111 519,-111 519,-87 630,-87 630,-111"/>
-<text text-anchor="middle" x="574.5" y="-96.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<g id="a_type~~swiftest_pl~~InheritedByGraph_node9"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="630,-108 519,-108 519,-84 630,-84 630,-108"/>
+<text text-anchor="middle" x="574.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
-<g id="type~~swiftest_pl~~InheritedByGraph_edge13" class="edge">
+<g id="type~~swiftest_pl~~InheritedByGraph_edge11" class="edge">
 <title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M758.45,-106.88C729.06,-105.61 680.15,-103.51 640.29,-101.79"/>
-<polygon fill="#000000" stroke="#000000" points="640.25,-98.29 630.11,-101.35 639.95,-105.28 640.25,-98.29"/>
-<text text-anchor="middle" x="678" y="-106.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M758.45,-103.88C729.06,-102.61 680.15,-100.51 640.29,-98.79"/>
+<polygon fill="#000000" stroke="#000000" points="640.25,-95.29 630.11,-98.35 639.95,-102.28 640.25,-95.29"/>
+<text text-anchor="middle" x="678" y="-103.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
-<!-- type~whm_nbody_system -->
+<!-- type~symba_pl -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node8" class="node">
-<title>type~whm_nbody_system</title>
-<g id="a_type~~swiftest_pl~~InheritedByGraph_node8"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="429,-111 319,-111 319,-87 429,-87 429,-111"/>
-<text text-anchor="middle" x="374" y="-96.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
+<title>type~symba_pl</title>
+<g id="a_type~~swiftest_pl~~InheritedByGraph_node8"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="403,-24 345,-24 345,0 403,0 403,-24"/>
+<text text-anchor="middle" x="374" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
 </a>
 </g>
 </g>
-<!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
-<g id="type~~swiftest_pl~~InheritedByGraph_edge7" class="edge">
-<title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
-<path fill="none" stroke="#000000" d="M318.73,-99C310.1,-99 301.05,-99 292.11,-99"/>
-<polygon fill="#000000" stroke="#000000" points="292.07,-95.5 282.07,-99 292.07,-102.5 292.07,-95.5"/>
-</g>
-<!-- type~helio_nbody_system -->
-<g id="type~~swiftest_pl~~InheritedByGraph_node9" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~swiftest_pl~~InheritedByGraph_node9"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="629.5,-69 519.5,-69 519.5,-45 629.5,-45 629.5,-69"/>
-<text text-anchor="middle" x="574.5" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
-</a>
-</g>
+<!-- type~symba_pl&#45;&gt;type~helio_pl -->
+<g id="type~~swiftest_pl~~InheritedByGraph_edge6" class="edge">
+<title>type~symba_pl&#45;&gt;type~helio_pl</title>
+<path fill="none" stroke="#000000" d="M344.86,-12C320.31,-12 284.53,-12 257.83,-12"/>
+<polygon fill="#000000" stroke="#000000" points="257.72,-8.5 247.72,-12 257.72,-15.5 257.72,-8.5"/>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_pl~~InheritedByGraph_edge9" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M473,-99C462.12,-100.12 450.52,-100.68 439.25,-100.89"/>
-<polygon fill="#000000" stroke="#000000" points="438.98,-97.39 429.02,-100.99 439.05,-104.39 438.98,-97.39"/>
-<path fill="none" stroke="#000000" d="M541.06,-69.03C533.76,-71.86 526.08,-74.95 519,-78 499.1,-86.57 496.55,-96.77 475,-99"/>
+<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_pl~~InheritedByGraph_edge8" class="edge">
+<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M518.87,-89.43C504.61,-88 489.25,-86.7 475,-86"/>
 </g>
 <!-- type~symba_merger -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node10" class="node">
 <title>type~symba_merger</title>
 <g id="a_type~~swiftest_pl~~InheritedByGraph_node10"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="617,-27 532,-27 532,-3 617,-3 617,-27"/>
-<text text-anchor="middle" x="574.5" y="-12.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="617,-24 532,-24 532,0 617,0 617,-24"/>
+<text text-anchor="middle" x="574.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
 </a>
 </g>
 </g>
 <!-- type~symba_merger&#45;&gt;type~symba_pl -->
-<g id="type~~swiftest_pl~~InheritedByGraph_edge8" class="edge">
+<g id="type~~swiftest_pl~~InheritedByGraph_edge10" class="edge">
 <title>type~symba_merger&#45;&gt;type~symba_pl</title>
-<path fill="none" stroke="#000000" d="M531.89,-18.14C496.86,-20.79 447.17,-24.55 413.15,-27.12"/>
-<polygon fill="#000000" stroke="#000000" points="412.84,-23.63 403.13,-27.87 413.37,-30.61 412.84,-23.63"/>
+<path fill="none" stroke="#000000" d="M531.89,-12C496.86,-12 447.17,-12 413.15,-12"/>
+<polygon fill="#000000" stroke="#000000" points="413.13,-8.5 403.13,-12 413.13,-15.5 413.13,-8.5"/>
+</g>
+<!-- type~helio_nbody_system -->
+<g id="type~~swiftest_pl~~InheritedByGraph_node11" class="node">
+<title>type~helio_nbody_system</title>
+<g id="a_type~~swiftest_pl~~InheritedByGraph_node11"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="629.5,-66 519.5,-66 519.5,-42 629.5,-42 629.5,-66"/>
+<text text-anchor="middle" x="574.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+</a>
 </g>
-<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_pl~~InheritedByGraph_edge10" class="edge">
-<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M518.95,-97C504.62,-97.02 489.2,-97.53 475,-99"/>
+</g>
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_pl~~InheritedByGraph_edge9" class="edge">
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M540.29,-66.09C514.39,-75.29 481.73,-86.33 475,-86"/>
+<path fill="none" stroke="#000000" d="M473,-86C457.75,-85.25 441.44,-82.55 426.59,-79.32"/>
+<polygon fill="#000000" stroke="#000000" points="427.1,-75.85 416.57,-77.02 425.53,-82.67 427.1,-75.85"/>
 </g>
 <!-- type~symba_nbody_system -->
 <g id="type~~swiftest_pl~~InheritedByGraph_node12" class="node">
 <title>type~symba_nbody_system</title>
 <g id="a_type~~swiftest_pl~~InheritedByGraph_node12"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="845,-66 726,-66 726,-42 845,-42 845,-66"/>
-<text text-anchor="middle" x="785.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="845,-63 726,-63 726,-39 845,-39 845,-63"/>
+<text text-anchor="middle" x="785.5" y="-48.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
-<g id="type~~swiftest_pl~~InheritedByGraph_edge11" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M725.73,-54.84C698.96,-55.23 667.21,-55.68 639.81,-56.08"/>
-<polygon fill="#000000" stroke="#000000" points="639.49,-52.58 629.54,-56.22 639.59,-59.58 639.49,-52.58"/>
-</g>
 <!-- type~symba_nbody_system&#45;&gt;type~symba_merger -->
 <g id="type~~swiftest_pl~~InheritedByGraph_edge12" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~symba_merger</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M725.73,-43.03C694.84,-37.27 657.31,-30.27 627.49,-24.7"/>
-<polygon fill="#000000" stroke="#000000" points="627.76,-21.19 617.29,-22.8 626.47,-28.07 627.76,-21.19"/>
-<text text-anchor="middle" x="678" y="-42.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M725.73,-40.03C694.84,-34.27 657.31,-27.27 627.49,-21.7"/>
+<polygon fill="#000000" stroke="#000000" points="627.76,-18.19 617.29,-19.8 626.47,-25.07 627.76,-18.19"/>
+<text text-anchor="middle" x="678" y="-39.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+</g>
+<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<g id="type~~swiftest_pl~~InheritedByGraph_edge13" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
+<path fill="none" stroke="#000000" d="M725.73,-51.84C698.96,-52.23 667.21,-52.68 639.81,-53.08"/>
+<polygon fill="#000000" stroke="#000000" points="639.49,-49.58 629.54,-53.22 639.59,-56.58 639.49,-49.58"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/swiftest_tp.html b/docs/type/swiftest_tp.html
index f9385a037..df96b9d58 100644
--- a/docs/type/swiftest_tp.html
+++ b/docs/type/swiftest_tp.html
@@ -388,36 +388,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.85,-33C269.49,-33 260.24,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.08,-29.5 241.08,-33 251.08,-36.5 251.08,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~swiftest_tp~~InheritsGraph_node3" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~swiftest_tp~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~swiftest_tp~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~swiftest_tp~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~swiftest_tp~~InheritsGraph_edge2" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~swiftest_tp~~InheritsGraph_node4" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~swiftest_tp~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~swiftest_tp~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~swiftest_tp~~InheritsGraph_edge2" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~swiftest_tp~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -482,32 +482,32 @@ <h3 class="panel-title">Inherited by</h3>
 <polygon fill="none" stroke="black" points="63,-108 0,-108 0,-84 63,-84 63,-108"/>
 <text text-anchor="middle" x="31.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">swiftest_tp</text>
 </g>
-<!-- type~helio_tp -->
+<!-- type~whm_tp -->
 <g id="type~~swiftest_tp~~InheritedByGraph_node2" class="node">
-<title>type~helio_tp</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node2"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
+<title>type~whm_tp</title>
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node2"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="250.5,-150 196.5,-150 196.5,-126 250.5,-126 250.5,-150"/>
-<text text-anchor="middle" x="223.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
+<text text-anchor="middle" x="223.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
 </a>
 </g>
 </g>
-<!-- type~helio_tp&#45;&gt;type~swiftest_tp -->
+<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
 <g id="type~~swiftest_tp~~InheritedByGraph_edge2" class="edge">
-<title>type~helio_tp&#45;&gt;type~swiftest_tp</title>
+<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
 <path fill="none" stroke="#000000" d="M196.22,-131.96C174.24,-127.15 141.98,-120.63 113.5,-117"/>
 </g>
-<!-- type~whm_tp -->
+<!-- type~helio_tp -->
 <g id="type~~swiftest_tp~~InheritedByGraph_node3" class="node">
-<title>type~whm_tp</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node3"><a xlink:href=".././type/whm_tp.html" xlink:title="whm_tp">
+<title>type~helio_tp</title>
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node3"><a xlink:href=".././type/helio_tp.html" xlink:title="helio_tp">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="250.5,-108 196.5,-108 196.5,-84 250.5,-84 250.5,-108"/>
-<text text-anchor="middle" x="223.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_tp</text>
+<text text-anchor="middle" x="223.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_tp</text>
 </a>
 </g>
 </g>
-<!-- type~whm_tp&#45;&gt;type~swiftest_tp -->
+<!-- type~helio_tp&#45;&gt;type~swiftest_tp -->
 <g id="type~~swiftest_tp~~InheritedByGraph_edge3" class="edge">
-<title>type~whm_tp&#45;&gt;type~swiftest_tp</title>
+<title>type~helio_tp&#45;&gt;type~swiftest_tp</title>
 <path fill="none" stroke="#000000" d="M111.5,-117C98.85,-115.39 85.35,-112.32 73.15,-109.02"/>
 <polygon fill="#000000" stroke="#000000" points="73.84,-105.57 63.26,-106.22 71.93,-112.31 73.84,-105.57"/>
 <path fill="none" stroke="#000000" d="M196.22,-105.84C174.24,-112.92 141.98,-120.63 113.5,-117"/>
@@ -532,36 +532,21 @@ <h3 class="panel-title">Inherited by</h3>
 <g id="type~~swiftest_tp~~InheritedByGraph_node5" class="node">
 <title>type~symba_tp</title>
 <g id="a_type~~swiftest_tp~~InheritedByGraph_node5"><a xlink:href=".././type/symba_tp.html" xlink:title="symba_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="406.5,-150 347.5,-150 347.5,-126 406.5,-126 406.5,-150"/>
-<text text-anchor="middle" x="377" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="406.5,-108 347.5,-108 347.5,-84 406.5,-84 406.5,-108"/>
+<text text-anchor="middle" x="377" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_tp</text>
 </a>
 </g>
 </g>
 <!-- type~symba_tp&#45;&gt;type~helio_tp -->
-<g id="type~~swiftest_tp~~InheritedByGraph_edge4" class="edge">
-<title>type~symba_tp&#45;&gt;type~helio_tp</title>
-<path fill="none" stroke="#000000" d="M347.15,-138C322.59,-138 287.19,-138 260.73,-138"/>
-<polygon fill="#000000" stroke="#000000" points="260.71,-134.5 250.71,-138 260.71,-141.5 260.71,-134.5"/>
-</g>
-<!-- type~rmvs_tp -->
-<g id="type~~swiftest_tp~~InheritedByGraph_node6" class="node">
-<title>type~rmvs_tp</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node6"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="404,-108 350,-108 350,-84 404,-84 404,-108"/>
-<text text-anchor="middle" x="377" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
-</a>
-</g>
-</g>
-<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
 <g id="type~~swiftest_tp~~InheritedByGraph_edge5" class="edge">
-<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
-<path fill="none" stroke="#000000" d="M349.96,-96C325.35,-96 288.22,-96 260.73,-96"/>
+<title>type~symba_tp&#45;&gt;type~helio_tp</title>
+<path fill="none" stroke="#000000" d="M347.15,-96C322.59,-96 287.19,-96 260.73,-96"/>
 <polygon fill="#000000" stroke="#000000" points="260.71,-92.5 250.71,-96 260.71,-99.5 260.71,-92.5"/>
 </g>
 <!-- type~whm_nbody_system -->
-<g id="type~~swiftest_tp~~InheritedByGraph_node7" class="node">
+<g id="type~~swiftest_tp~~InheritedByGraph_node6" class="node">
 <title>type~whm_nbody_system</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node7"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node6"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="432,-66 322,-66 322,-42 432,-42 432,-66"/>
 <text text-anchor="middle" x="377" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
 </a>
@@ -573,66 +558,81 @@ <h3 class="panel-title">Inherited by</h3>
 <path fill="none" stroke="#000000" d="M321.73,-54C313.1,-54 304.05,-54 295.11,-54"/>
 <polygon fill="#000000" stroke="#000000" points="295.07,-50.5 285.07,-54 295.07,-57.5 295.07,-50.5"/>
 </g>
-<!-- type~helio_nbody_system -->
-<g id="type~~swiftest_tp~~InheritedByGraph_node8" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node8"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="579.5,-66 469.5,-66 469.5,-42 579.5,-42 579.5,-66"/>
-<text text-anchor="middle" x="524.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<!-- type~rmvs_tp -->
+<g id="type~~swiftest_tp~~InheritedByGraph_node7" class="node">
+<title>type~rmvs_tp</title>
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node7"><a xlink:href=".././type/rmvs_tp.html" xlink:title="rmvs_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="404,-150 350,-150 350,-126 404,-126 404,-150"/>
+<text text-anchor="middle" x="377" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_tp</text>
 </a>
 </g>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_tp~~InheritedByGraph_edge7" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M469.15,-52.37C463.01,-52.67 456.86,-53.18 451,-54"/>
+<!-- type~rmvs_tp&#45;&gt;type~whm_tp -->
+<g id="type~~swiftest_tp~~InheritedByGraph_edge4" class="edge">
+<title>type~rmvs_tp&#45;&gt;type~whm_tp</title>
+<path fill="none" stroke="#000000" d="M349.96,-138C325.35,-138 288.22,-138 260.73,-138"/>
+<polygon fill="#000000" stroke="#000000" points="260.71,-134.5 250.71,-138 260.71,-141.5 260.71,-134.5"/>
 </g>
 <!-- type~rmvs_nbody_system -->
-<g id="type~~swiftest_tp~~InheritedByGraph_node9" class="node">
+<g id="type~~swiftest_tp~~InheritedByGraph_node8" class="node">
 <title>type~rmvs_nbody_system</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node9"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="580,-24 469,-24 469,0 580,0 580,-24"/>
-<text text-anchor="middle" x="524.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node8"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="580,-66 469,-66 469,-42 580,-42 580,-66"/>
+<text text-anchor="middle" x="524.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~swiftest_tp~~InheritedByGraph_edge8" class="edge">
+<g id="type~~swiftest_tp~~InheritedByGraph_edge7" class="edge">
 <title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M468.76,-52.39C462.75,-52.69 456.73,-53.2 451,-54"/>
+</g>
+<!-- type~helio_nbody_system -->
+<g id="type~~swiftest_tp~~InheritedByGraph_node9" class="node">
+<title>type~helio_nbody_system</title>
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node9"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="579.5,-24 469.5,-24 469.5,0 579.5,0 579.5,-24"/>
+<text text-anchor="middle" x="524.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+</a>
+</g>
+</g>
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~swiftest_tp~~InheritedByGraph_edge8" class="edge">
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
 <path fill="none" stroke="#000000" d="M485.03,-24.04C479.42,-26.57 473.89,-29.55 469,-33 458.96,-40.09 463.18,-52.31 451,-54"/>
 <path fill="none" stroke="#000000" d="M450,-54C447.51,-54.35 444.96,-54.64 442.39,-54.88"/>
 <polygon fill="#000000" stroke="#000000" points="442.09,-51.4 432.36,-55.6 442.59,-58.38 442.09,-51.4"/>
 </g>
-<!-- type~symba_nbody_system -->
+<!-- type~rmvs_pl -->
 <g id="type~~swiftest_tp~~InheritedByGraph_node10" class="node">
-<title>type~symba_nbody_system</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node10"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="795,-66 676,-66 676,-42 795,-42 795,-66"/>
-<text text-anchor="middle" x="735.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+<title>type~rmvs_pl</title>
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node10"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="762.5,-66 708.5,-66 708.5,-42 762.5,-42 762.5,-66"/>
+<text text-anchor="middle" x="735.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
 <g id="type~~swiftest_tp~~InheritedByGraph_edge9" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M675.73,-54C648.96,-54 617.21,-54 589.81,-54"/>
-<polygon fill="#000000" stroke="#000000" points="589.54,-50.5 579.54,-54 589.54,-57.5 589.54,-50.5"/>
+<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M708.45,-54C679.06,-54 630.15,-54 590.29,-54"/>
+<polygon fill="#000000" stroke="#000000" points="590.11,-50.5 580.11,-54 590.11,-57.5 590.11,-50.5"/>
+<text text-anchor="middle" x="628" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
-<!-- type~rmvs_pl -->
+<!-- type~symba_nbody_system -->
 <g id="type~~swiftest_tp~~InheritedByGraph_node11" class="node">
-<title>type~rmvs_pl</title>
-<g id="a_type~~swiftest_tp~~InheritedByGraph_node11"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="762.5,-24 708.5,-24 708.5,0 762.5,0 762.5,-24"/>
-<text text-anchor="middle" x="735.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<title>type~symba_nbody_system</title>
+<g id="a_type~~swiftest_tp~~InheritedByGraph_node11"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="795,-24 676,-24 676,0 795,0 795,-24"/>
+<text text-anchor="middle" x="735.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
+<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
 <g id="type~~swiftest_tp~~InheritedByGraph_edge10" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M708.45,-12C679.06,-12 630.15,-12 590.29,-12"/>
-<polygon fill="#000000" stroke="#000000" points="590.11,-8.5 580.11,-12 590.11,-15.5 590.11,-8.5"/>
-<text text-anchor="middle" x="628" y="-14.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
+<path fill="none" stroke="#000000" d="M675.73,-12C648.96,-12 617.21,-12 589.81,-12"/>
+<polygon fill="#000000" stroke="#000000" points="589.54,-8.5 579.54,-12 589.54,-15.5 589.54,-8.5"/>
 </g>
 </g>
 </svg>
@@ -3329,7 +3329,7 @@ <h3>interface
           
     
     <h3>
-public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
     
     
    
diff --git a/docs/type/symba_cb.html b/docs/type/symba_cb.html
index e01e70269..8d4718ce0 100644
--- a/docs/type/symba_cb.html
+++ b/docs/type/symba_cb.html
@@ -352,36 +352,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M265.93,-33C257.67,-33 248.33,-33 239.26,-33"/>
 <polygon fill="#000000" stroke="#000000" points="239.21,-29.5 229.21,-33 239.21,-36.5 239.21,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~symba_cb~~InheritsGraph_node4" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~symba_cb~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~symba_cb~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~symba_cb~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.73,-37.82C146.18,-40.48 124.04,-43.84 104.48,-46.8"/>
-<polygon fill="#000000" stroke="#000000" points="103.89,-43.35 94.52,-48.31 104.94,-50.27 103.89,-43.35"/>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~symba_cb~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-37.82C151.33,-39.7 136.65,-41.92 122.2,-44.11"/>
+<polygon fill="#000000" stroke="#000000" points="121.62,-40.66 112.26,-45.62 122.67,-47.58 121.62,-40.66"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~symba_cb~~InheritsGraph_node5" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~symba_cb~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~symba_cb~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~symba_cb~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-28.18C151.33,-26.3 136.65,-24.08 122.2,-21.89"/>
-<polygon fill="#000000" stroke="#000000" points="122.67,-18.42 112.26,-20.38 121.62,-25.34 122.67,-18.42"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
+<g id="type~~symba_cb~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.73,-28.18C146.18,-25.52 124.04,-22.16 104.48,-19.2"/>
+<polygon fill="#000000" stroke="#000000" points="104.94,-15.73 94.52,-17.69 103.89,-22.65 104.94,-15.73"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/symba_merger.html b/docs/type/symba_merger.html
index 1f549be81..1e9a7dbe3 100644
--- a/docs/type/symba_merger.html
+++ b/docs/type/symba_merger.html
@@ -439,115 +439,115 @@ <h3 class="panel-title">Inherits</h3>
 <!-- type~symba_merger -->
 <g id="type~~symba_merger~~InheritsGraph_node1" class="node">
 <title>type~symba_merger</title>
-<polygon fill="none" stroke="black" points="689,-36 604,-36 604,-12 689,-12 689,-36"/>
-<text text-anchor="middle" x="646.5" y="-21.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_merger</text>
+<polygon fill="none" stroke="black" points="689,-66 604,-66 604,-42 689,-42 689,-66"/>
+<text text-anchor="middle" x="646.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_merger</text>
 </g>
 <!-- type~symba_pl -->
 <g id="type~~symba_merger~~InheritsGraph_node2" class="node">
 <title>type~symba_pl</title>
 <g id="a_type~~symba_merger~~InheritsGraph_node2"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="567,-36 509,-36 509,-12 567,-12 567,-36"/>
-<text text-anchor="middle" x="538" y="-21.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="567,-66 509,-66 509,-42 567,-42 567,-66"/>
+<text text-anchor="middle" x="538" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
 </a>
 </g>
 </g>
 <!-- type~symba_merger&#45;&gt;type~symba_pl -->
 <g id="type~~symba_merger~~InheritsGraph_edge1" class="edge">
 <title>type~symba_merger&#45;&gt;type~symba_pl</title>
-<path fill="none" stroke="#000000" d="M603.71,-24C595.01,-24 585.89,-24 577.32,-24"/>
-<polygon fill="#000000" stroke="#000000" points="577.21,-20.5 567.21,-24 577.21,-27.5 577.21,-20.5"/>
+<path fill="none" stroke="#000000" d="M603.71,-54C595.01,-54 585.89,-54 577.32,-54"/>
+<polygon fill="#000000" stroke="#000000" points="577.21,-50.5 567.21,-54 577.21,-57.5 577.21,-50.5"/>
 </g>
-<!-- type~helio_pl -->
+<!-- type~symba_kinship -->
 <g id="type~~symba_merger~~InheritsGraph_node3" class="node">
-<title>type~helio_pl</title>
-<g id="a_type~~symba_merger~~InheritsGraph_node3"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="445.5,-66 391.5,-66 391.5,-42 445.5,-42 445.5,-66"/>
-<text text-anchor="middle" x="418.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
+<title>type~symba_kinship</title>
+<g id="a_type~~symba_merger~~InheritsGraph_node3"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="460,-87 377,-87 377,-63 460,-63 460,-87"/>
+<text text-anchor="middle" x="418.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pl&#45;&gt;type~helio_pl -->
-<g id="type~~symba_merger~~InheritsGraph_edge3" class="edge">
-<title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M508.86,-31.19C493,-35.23 473.02,-40.34 455.97,-44.69"/>
-<polygon fill="#000000" stroke="#000000" points="454.63,-41.42 445.8,-47.28 456.36,-48.2 454.63,-41.42"/>
+<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
+<g id="type~~symba_merger~~InheritsGraph_edge2" class="edge">
+<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M508.86,-59.03C497.28,-61.1 483.5,-63.56 470.27,-65.93"/>
+<polygon fill="#000000" stroke="#000000" points="469.54,-62.5 460.31,-67.71 470.77,-69.39 469.54,-62.5"/>
+<text text-anchor="middle" x="484.5" y="-66.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
 </g>
-<!-- type~symba_kinship -->
+<!-- type~helio_pl -->
 <g id="type~~symba_merger~~InheritsGraph_node4" class="node">
-<title>type~symba_kinship</title>
-<g id="a_type~~symba_merger~~InheritsGraph_node4"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="460,-24 377,-24 377,0 460,0 460,-24"/>
-<text text-anchor="middle" x="418.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
+<title>type~helio_pl</title>
+<g id="a_type~~symba_merger~~InheritsGraph_node4"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="445.5,-45 391.5,-45 391.5,-21 445.5,-21 445.5,-45"/>
+<text text-anchor="middle" x="418.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
-<g id="type~~symba_merger~~InheritsGraph_edge2" class="edge">
-<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M508.86,-21.13C497.28,-19.94 483.5,-18.54 470.27,-17.19"/>
-<polygon fill="#000000" stroke="#000000" points="470.61,-13.7 460.31,-16.17 469.9,-20.67 470.61,-13.7"/>
-<text text-anchor="middle" x="484.5" y="-22.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
+<!-- type~symba_pl&#45;&gt;type~helio_pl -->
+<g id="type~~symba_merger~~InheritsGraph_edge3" class="edge">
+<title>type~symba_pl&#45;&gt;type~helio_pl</title>
+<path fill="none" stroke="#000000" d="M508.86,-48.97C493,-46.14 473.02,-42.57 455.97,-39.52"/>
+<polygon fill="#000000" stroke="#000000" points="456.26,-36.02 445.8,-37.7 455.03,-42.91 456.26,-36.02"/>
 </g>
 <!-- type~swiftest_pl -->
 <g id="type~~symba_merger~~InheritsGraph_node5" class="node">
 <title>type~swiftest_pl</title>
 <g id="a_type~~symba_merger~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="340,-66 278,-66 278,-42 340,-42 340,-66"/>
-<text text-anchor="middle" x="309" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="340,-45 278,-45 278,-21 340,-21 340,-45"/>
+<text text-anchor="middle" x="309" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~symba_merger~~InheritsGraph_edge4" class="edge">
 <title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M391.48,-54C379.2,-54 364.26,-54 350.54,-54"/>
-<polygon fill="#000000" stroke="#000000" points="350.36,-50.5 340.36,-54 350.36,-57.5 350.36,-50.5"/>
+<path fill="none" stroke="#000000" d="M391.48,-33C379.2,-33 364.26,-33 350.54,-33"/>
+<polygon fill="#000000" stroke="#000000" points="350.36,-29.5 340.36,-33 350.36,-36.5 350.36,-29.5"/>
 </g>
 <!-- type~swiftest_body -->
 <g id="type~~symba_merger~~InheritsGraph_node6" class="node">
 <title>type~swiftest_body</title>
 <g id="a_type~~symba_merger~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
-<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-45 164,-45 164,-21 241,-21 241,-45"/>
+<text text-anchor="middle" x="202.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~symba_merger~~InheritsGraph_edge5" class="edge">
 <title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M277.77,-54C269.45,-54 260.22,-54 251.17,-54"/>
-<polygon fill="#000000" stroke="#000000" points="251.09,-50.5 241.09,-54 251.09,-57.5 251.09,-50.5"/>
+<path fill="none" stroke="#000000" d="M277.77,-33C269.45,-33 260.22,-33 251.17,-33"/>
+<polygon fill="#000000" stroke="#000000" points="251.09,-29.5 241.09,-33 251.09,-36.5 251.09,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~symba_merger~~InheritsGraph_node7" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~symba_merger~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-87 17.5,-87 17.5,-63 94.5,-63 94.5,-87"/>
-<text text-anchor="middle" x="56" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~symba_merger~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~symba_merger~~InheritsGraph_edge7" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-59.46C145.84,-62.09 123.97,-65.27 104.73,-68.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-64.63 94.65,-69.53 105.05,-71.55 104.04,-64.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~symba_merger~~InheritsGraph_edge6" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~symba_merger~~InheritsGraph_node8" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~symba_merger~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-45 0,-45 0,-21 112,-21 112,-45"/>
-<text text-anchor="middle" x="56" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~symba_merger~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~symba_merger~~InheritsGraph_edge6" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-48.54C151.19,-46.69 136.6,-44.57 122.36,-42.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-38.98 112.09,-41.01 121.48,-45.91 122.49,-38.98"/>
-<text text-anchor="middle" x="138" y="-48.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~symba_merger~~InheritsGraph_edge7" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -4194,7 +4194,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine helio_gr_kick_getacch_pl(self, param)
+public pure module subroutine helio_gr_kick_getacch_pl(self, param)
     
     
    
diff --git a/docs/type/symba_nbody_system.html b/docs/type/symba_nbody_system.html
index cb65c10a1..c48ad96ce 100644
--- a/docs/type/symba_nbody_system.html
+++ b/docs/type/symba_nbody_system.html
@@ -321,310 +321,310 @@ <h3 class="panel-title">Inherits</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~symba_nbody_system~~InheritsGraph Pages: 1 -->
-<svg id="typesymba_nbody_systemInheritsGraph" width="641pt" height="139pt"
- viewBox="0.00 0.00 641.00 139.11" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~symba_nbody_system~~InheritsGraph" class="graph" transform="scale(0.56 0.56) rotate(0) translate(4 246)">
+<svg id="typesymba_nbody_systemInheritsGraph" width="641pt" height="111pt"
+ viewBox="0.00 0.00 641.00 111.28" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~symba_nbody_system~~InheritsGraph" class="graph" transform="scale(0.56 0.56) rotate(0) translate(4 196)">
 <title>type~~symba_nbody_system~~InheritsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-246 1148,-246 1148,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-196 1148,-196 1148,4 -4,4"/>
 <!-- type~symba_nbody_system -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node1" class="node">
 <title>type~symba_nbody_system</title>
-<polygon fill="none" stroke="black" points="1144,-86 1025,-86 1025,-62 1144,-62 1144,-86"/>
-<text text-anchor="middle" x="1084.5" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_nbody_system</text>
+<polygon fill="none" stroke="black" points="1144,-128 1025,-128 1025,-104 1144,-104 1144,-128"/>
+<text text-anchor="middle" x="1084.5" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_nbody_system</text>
 </g>
-<!-- type~helio_nbody_system -->
+<!-- type~symba_pltpenc -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node2" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node2"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="869,-151 759,-151 759,-127 869,-127 869,-151"/>
-<text text-anchor="middle" x="814" y="-136.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<title>type~symba_pltpenc</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node2"><a xlink:href=".././type/symba_pltpenc.html" xlink:title="symba_pltpenc">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="856.5,-192 771.5,-192 771.5,-168 856.5,-168 856.5,-192"/>
+<text text-anchor="middle" x="814" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pltpenc</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge4" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M1056.32,-86.14C1041.9,-92.2 1023.74,-99.24 1007,-104 965.14,-115.9 916.96,-124.67 879.34,-130.45"/>
-<polygon fill="#000000" stroke="#000000" points="878.39,-127.06 869.02,-132.01 879.43,-133.98 878.39,-127.06"/>
+<!-- type~symba_nbody_system&#45;&gt;type~symba_pltpenc -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge2" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~symba_pltpenc</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1056.69,-128.03C1042.21,-134.13 1023.89,-141.24 1007,-146 960.34,-159.14 905.8,-168.22 866.8,-173.67"/>
+<polygon fill="#000000" stroke="#000000" points="866.17,-170.22 856.73,-175.04 867.11,-177.16 866.17,-170.22"/>
+<text text-anchor="middle" x="947" y="-172.4" font-family="Helvetica,sans-Serif" font-size="9.50">pltpenc_list</text>
 </g>
-<!-- type~symba_pltpenc -->
+<!-- type~symba_plplenc -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node3" class="node">
-<title>type~symba_pltpenc</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node3"><a xlink:href=".././type/symba_pltpenc.html" xlink:title="symba_pltpenc">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="856.5,-66 771.5,-66 771.5,-42 856.5,-42 856.5,-66"/>
-<text text-anchor="middle" x="814" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pltpenc</text>
+<title>type~symba_plplenc</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node3"><a xlink:href=".././type/symba_plplenc.html" xlink:title="symba_plplenc">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="856,-150 772,-150 772,-126 856,-126 856,-150"/>
+<text text-anchor="middle" x="814" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_plplenc</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~symba_pltpenc -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge2" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~symba_pltpenc</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1024.72,-63.21C1018.75,-62.35 1012.76,-61.59 1007,-61 959.84,-56.15 905.86,-54.53 867.17,-54.05"/>
-<polygon fill="#000000" stroke="#000000" points="866.72,-50.54 856.68,-53.94 866.65,-57.54 866.72,-50.54"/>
-<text text-anchor="middle" x="947" y="-63.4" font-family="Helvetica,sans-Serif" font-size="9.50">pltpenc_list</text>
+<!-- type~symba_nbody_system&#45;&gt;type~symba_plplenc -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge3" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~symba_plplenc</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1024.91,-120.8C977.52,-124.68 911.47,-130.1 866.19,-133.81"/>
+<polygon fill="#000000" stroke="#000000" points="865.68,-130.34 856,-134.64 866.25,-137.31 865.68,-130.34"/>
+<text text-anchor="middle" x="947" y="-134.4" font-family="Helvetica,sans-Serif" font-size="9.50">plplenc_list, plplcollision_list</text>
 </g>
 <!-- type~symba_merger -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node4" class="node">
 <title>type~symba_merger</title>
 <g id="a_type~~symba_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/symba_merger.html" xlink:title="symba_merger">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="856.5,-108 771.5,-108 771.5,-84 856.5,-84 856.5,-108"/>
-<text text-anchor="middle" x="814" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="856.5,-66 771.5,-66 771.5,-42 856.5,-42 856.5,-66"/>
+<text text-anchor="middle" x="814" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_merger</text>
 </a>
 </g>
 </g>
 <!-- type~symba_nbody_system&#45;&gt;type~symba_merger -->
 <g id="type~~symba_nbody_system~~InheritsGraph_edge1" class="edge">
 <title>type~symba_nbody_system&#45;&gt;type~symba_merger</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1024.91,-78.8C977.81,-82.66 912.27,-88.03 867.01,-91.74"/>
-<polygon fill="#000000" stroke="#000000" points="866.5,-88.27 856.82,-92.57 867.07,-95.24 866.5,-88.27"/>
-<text text-anchor="middle" x="947" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1055.59,-103.94C1041.28,-98.14 1023.44,-91.49 1007,-87 960.27,-74.25 905.74,-65.44 866.76,-60.15"/>
+<polygon fill="#000000" stroke="#000000" points="867.07,-56.66 856.7,-58.82 866.15,-63.6 867.07,-56.66"/>
+<text text-anchor="middle" x="947" y="-89.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl_adds</text>
 </g>
-<!-- type~symba_plplenc -->
+<!-- type~helio_nbody_system -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node5" class="node">
-<title>type~symba_plplenc</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/symba_plplenc.html" xlink:title="symba_plplenc">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="856,-24 772,-24 772,0 856,0 856,-24"/>
-<text text-anchor="middle" x="814" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_plplenc</text>
-</a>
-</g>
-</g>
-<!-- type~symba_nbody_system&#45;&gt;type~symba_plplenc -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge3" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~symba_plplenc</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M1060.68,-61.88C1045.79,-54.47 1025.71,-45.41 1007,-40 960.36,-26.51 905.38,-19.34 866.24,-15.64"/>
-<polygon fill="#000000" stroke="#000000" points="866.41,-12.14 856.14,-14.73 865.79,-19.11 866.41,-12.14"/>
-<text text-anchor="middle" x="947" y="-42.4" font-family="Helvetica,sans-Serif" font-size="9.50">plplenc_list, plplcollision_list</text>
-</g>
-<!-- type~whm_nbody_system -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node8" class="node">
-<title>type~whm_nbody_system</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="722,-154 612,-154 612,-130 722,-130 722,-154"/>
-<text text-anchor="middle" x="667" y="-139.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
+<title>type~helio_nbody_system</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="869,-108 759,-108 759,-84 869,-84 869,-108"/>
+<text text-anchor="middle" x="814" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge5" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M758.59,-140.13C750.05,-140.3 741.14,-140.49 732.39,-140.67"/>
-<polygon fill="#000000" stroke="#000000" points="732.15,-137.17 722.23,-140.88 732.3,-144.17 732.15,-137.17"/>
+<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge4" class="edge">
+<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
+<path fill="none" stroke="#000000" d="M1024.91,-111.64C981.96,-108.44 923.68,-104.1 879.43,-100.8"/>
+<polygon fill="#000000" stroke="#000000" points="879.59,-97.3 869.35,-100.05 879.07,-104.28 879.59,-97.3"/>
 </g>
 <!-- type~symba_encounter -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node7" class="node">
+<g id="type~~symba_nbody_system~~InheritsGraph_node6" class="node">
 <title>type~symba_encounter</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/symba_encounter.html" xlink:title="symba_encounter">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="716,-57 618,-57 618,-33 716,-33 716,-57"/>
-<text text-anchor="middle" x="667" y="-42.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter</text>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/symba_encounter.html" xlink:title="symba_encounter">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="716,-192 618,-192 618,-168 716,-168 716,-192"/>
+<text text-anchor="middle" x="667" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_encounter</text>
 </a>
 </g>
 </g>
 <!-- type~symba_pltpenc&#45;&gt;type~symba_encounter -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge6" class="edge">
+<g id="type~~symba_nbody_system~~InheritsGraph_edge5" class="edge">
 <title>type~symba_pltpenc&#45;&gt;type~symba_encounter</title>
-<path fill="none" stroke="#000000" d="M771.49,-49C761.5,-48.38 750.87,-48.21 741,-49"/>
+<path fill="none" stroke="#000000" d="M771.36,-178.04C761.38,-178.11 750.78,-178.63 741,-180"/>
+</g>
+<!-- type~symba_plplenc&#45;&gt;type~symba_encounter -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge6" class="edge">
+<title>type~symba_plplenc&#45;&gt;type~symba_encounter</title>
+<path fill="none" stroke="#000000" d="M774.88,-150.07C769.32,-152.6 763.84,-155.57 759,-159 748.97,-166.11 753.17,-178.29 741,-180"/>
+<path fill="none" stroke="#000000" d="M740,-180C735.56,-180.62 730.96,-181.07 726.32,-181.38"/>
+<polygon fill="#000000" stroke="#000000" points="725.98,-177.89 716.15,-181.85 726.31,-184.88 725.98,-177.89"/>
 </g>
 <!-- type~symba_pl -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node6" class="node">
+<g id="type~~symba_nbody_system~~InheritsGraph_node8" class="node">
 <title>type~symba_pl</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="696,-108 638,-108 638,-84 696,-84 696,-108"/>
-<text text-anchor="middle" x="667" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/symba_pl.html" xlink:title="symba_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="696,-66 638,-66 638,-42 696,-42 696,-66"/>
+<text text-anchor="middle" x="667" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_pl</text>
 </a>
 </g>
 </g>
 <!-- type~symba_merger&#45;&gt;type~symba_pl -->
 <g id="type~~symba_nbody_system~~InheritsGraph_edge7" class="edge">
 <title>type~symba_merger&#45;&gt;type~symba_pl</title>
-<path fill="none" stroke="#000000" d="M771.45,-96C750.92,-96 726.33,-96 706.27,-96"/>
-<polygon fill="#000000" stroke="#000000" points="706.24,-92.5 696.24,-96 706.24,-99.5 706.24,-92.5"/>
+<path fill="none" stroke="#000000" d="M771.45,-54C750.92,-54 726.33,-54 706.27,-54"/>
+<polygon fill="#000000" stroke="#000000" points="706.24,-50.5 696.24,-54 706.24,-57.5 706.24,-50.5"/>
 </g>
-<!-- type~symba_plplenc&#45;&gt;type~symba_encounter -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge8" class="edge">
-<title>type~symba_plplenc&#45;&gt;type~symba_encounter</title>
-<path fill="none" stroke="#000000" d="M740,-49C735.53,-49.36 730.9,-49.54 726.24,-49.58"/>
-<polygon fill="#000000" stroke="#000000" points="726.08,-46.08 716.05,-49.48 726.01,-53.08 726.08,-46.08"/>
-<path fill="none" stroke="#000000" d="M776.71,-24.05C770.61,-26.65 764.49,-29.64 759,-33 749.87,-38.58 751.67,-48.14 741,-49"/>
-</g>
-<!-- type~helio_pl -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node9" class="node">
-<title>type~helio_pl</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node9"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="528.5,-139 474.5,-139 474.5,-115 528.5,-115 528.5,-139"/>
-<text text-anchor="middle" x="501.5" y="-124.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
-</a>
-</g>
-</g>
-<!-- type~symba_pl&#45;&gt;type~helio_pl -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge10" class="edge">
-<title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M637.89,-101.33C610.45,-106.53 568.57,-114.47 538.66,-120.14"/>
-<polygon fill="#000000" stroke="#000000" points="537.79,-116.75 528.62,-122.05 539.1,-123.62 537.79,-116.75"/>
-</g>
-<!-- type~symba_kinship -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node10" class="node">
-<title>type~symba_kinship</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node10"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="543,-97 460,-97 460,-73 543,-73 543,-97"/>
-<text text-anchor="middle" x="501.5" y="-82.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
+<!-- type~whm_nbody_system -->
+<g id="type~~symba_nbody_system~~InheritsGraph_node7" class="node">
+<title>type~whm_nbody_system</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/whm_nbody_system.html" xlink:title="whm_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="722,-108 612,-108 612,-84 722,-84 722,-108"/>
+<text text-anchor="middle" x="667" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">whm_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge9" class="edge">
-<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.89,-94.11C614.64,-92.54 581.01,-90.28 553.09,-88.4"/>
-<polygon fill="#000000" stroke="#000000" points="553.3,-84.91 543.09,-87.73 552.83,-91.89 553.3,-84.91"/>
-<text text-anchor="middle" x="587.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge8" class="edge">
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M758.59,-96C750.05,-96 741.14,-96 732.39,-96"/>
+<polygon fill="#000000" stroke="#000000" points="732.23,-92.5 722.23,-96 732.23,-99.5 732.23,-92.5"/>
 </g>
 <!-- type~swiftest_encounter -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node12" class="node">
+<g id="type~~symba_nbody_system~~InheritsGraph_node11" class="node">
 <title>type~swiftest_encounter</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node12"><a xlink:href=".././type/swiftest_encounter.html" xlink:title="swiftest_encounter">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="552.5,-55 450.5,-55 450.5,-31 552.5,-31 552.5,-55"/>
-<text text-anchor="middle" x="501.5" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_encounter</text>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node11"><a xlink:href=".././type/swiftest_encounter.html" xlink:title="swiftest_encounter">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="552.5,-192 450.5,-192 450.5,-168 552.5,-168 552.5,-192"/>
+<text text-anchor="middle" x="501.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_encounter</text>
 </a>
 </g>
 </g>
 <!-- type~symba_encounter&#45;&gt;type~swiftest_encounter -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge11" class="edge">
+<g id="type~~symba_nbody_system~~InheritsGraph_edge9" class="edge">
 <title>type~symba_encounter&#45;&gt;type~swiftest_encounter</title>
-<path fill="none" stroke="#000000" d="M617.83,-44.41C600.58,-44.2 580.92,-43.96 562.78,-43.74"/>
-<polygon fill="#000000" stroke="#000000" points="562.64,-40.24 552.6,-43.61 562.55,-47.23 562.64,-40.24"/>
+<path fill="none" stroke="#000000" d="M617.83,-180C600.58,-180 580.92,-180 562.78,-180"/>
+<polygon fill="#000000" stroke="#000000" points="562.6,-176.5 552.6,-180 562.6,-183.5 562.6,-176.5"/>
 </g>
 <!-- type~swiftest_nbody_system -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node11" class="node">
+<g id="type~~symba_nbody_system~~InheritsGraph_node12" class="node">
 <title>type~swiftest_nbody_system</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node11"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="563,-193 440,-193 440,-169 563,-169 563,-193"/>
-<text text-anchor="middle" x="501.5" y="-178.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node12"><a xlink:href=".././type/swiftest_nbody_system.html" xlink:title="swiftest_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="563,-108 440,-108 440,-84 563,-84 563,-108"/>
+<text text-anchor="middle" x="501.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_nbody_system</text>
 </a>
 </g>
 </g>
 <!-- type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge12" class="edge">
+<g id="type~~symba_nbody_system~~InheritsGraph_edge10" class="edge">
 <title>type~whm_nbody_system&#45;&gt;type~swiftest_nbody_system</title>
-<path fill="none" stroke="#000000" d="M615.61,-154.02C598.98,-157.99 580.31,-162.44 563.01,-166.57"/>
-<polygon fill="#000000" stroke="#000000" points="561.92,-163.23 553,-168.95 563.54,-170.04 561.92,-163.23"/>
+<path fill="none" stroke="#000000" d="M611.56,-96C599.32,-96 586.15,-96 573.35,-96"/>
+<polygon fill="#000000" stroke="#000000" points="573.19,-92.5 563.19,-96 573.19,-99.5 573.19,-92.5"/>
+</g>
+<!-- type~symba_kinship -->
+<g id="type~~symba_nbody_system~~InheritsGraph_node9" class="node">
+<title>type~symba_kinship</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node9"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="543,-66 460,-66 460,-42 543,-42 543,-66"/>
+<text text-anchor="middle" x="501.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
+</a>
+</g>
+</g>
+<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge11" class="edge">
+<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M637.89,-54C614.74,-54 581.3,-54 553.46,-54"/>
+<polygon fill="#000000" stroke="#000000" points="553.09,-50.5 543.09,-54 553.09,-57.5 553.09,-50.5"/>
+<text text-anchor="middle" x="587.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
+</g>
+<!-- type~helio_pl -->
+<g id="type~~symba_nbody_system~~InheritsGraph_node10" class="node">
+<title>type~helio_pl</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node10"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="528.5,-24 474.5,-24 474.5,0 528.5,0 528.5,-24"/>
+<text text-anchor="middle" x="501.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
+</a>
+</g>
+</g>
+<!-- type~symba_pl&#45;&gt;type~helio_pl -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge12" class="edge">
+<title>type~symba_pl&#45;&gt;type~helio_pl</title>
+<path fill="none" stroke="#000000" d="M637.89,-46.78C610.45,-39.73 568.57,-28.97 538.66,-21.29"/>
+<polygon fill="#000000" stroke="#000000" points="539.18,-17.81 528.62,-18.71 537.44,-24.59 539.18,-17.81"/>
 </g>
 <!-- type~swiftest_pl -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node14" class="node">
 <title>type~swiftest_pl</title>
 <g id="a_type~~symba_nbody_system~~InheritsGraph_node14"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-145 278.5,-145 278.5,-121 340.5,-121 340.5,-145"/>
-<text text-anchor="middle" x="309.5" y="-130.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-51 278.5,-51 278.5,-27 340.5,-27 340.5,-51"/>
+<text text-anchor="middle" x="309.5" y="-36.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~symba_nbody_system~~InheritsGraph_edge13" class="edge">
 <title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M474.48,-127.82C442.52,-128.83 387.97,-130.55 350.63,-131.73"/>
-<polygon fill="#000000" stroke="#000000" points="350.47,-128.24 340.59,-132.05 350.69,-135.23 350.47,-128.24"/>
+<path fill="none" stroke="#000000" d="M474.48,-15.7C442.52,-20.24 387.97,-27.99 350.63,-33.3"/>
+<polygon fill="#000000" stroke="#000000" points="349.99,-29.85 340.59,-34.72 350.98,-36.78 349.99,-29.85"/>
 </g>
-<!-- type~swiftest_tp -->
+<!-- type~swiftest_cb -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node13" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node13"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-187 278,-187 278,-163 341,-163 341,-187"/>
-<text text-anchor="middle" x="309.5" y="-172.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+<title>type~swiftest_cb</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node13"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-141 170,-141 170,-117 235,-117 235,-141"/>
+<text text-anchor="middle" x="202.5" y="-126.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge16" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-179.09C410.94,-178.17 377.11,-177.1 351.3,-176.29"/>
-<polygon fill="#000000" stroke="#000000" points="351.22,-172.78 341.12,-175.97 351,-179.78 351.22,-172.78"/>
-<text text-anchor="middle" x="390.5" y="-180.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge14" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.68,-102.76C381.69,-109.2 295.91,-118.73 245.26,-124.36"/>
+<polygon fill="#000000" stroke="#000000" points="244.56,-120.92 235.01,-125.5 245.33,-127.87 244.56,-120.92"/>
+<text text-anchor="middle" x="309.5" y="-122.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~symba_nbody_system~~InheritsGraph_edge15" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M452.55,-168.89C421.09,-160.94 380.4,-150.66 350.64,-143.14"/>
-<polygon fill="#000000" stroke="#000000" points="351.16,-139.66 340.61,-140.61 349.44,-146.45 351.16,-139.66"/>
-<text text-anchor="middle" x="390.5" y="-161.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M463.43,-83.95C450.36,-79.77 435.55,-75.1 422,-71 398.37,-63.85 371.8,-56.21 350.53,-50.19"/>
+<polygon fill="#000000" stroke="#000000" points="351.43,-46.8 340.86,-47.46 349.53,-53.54 351.43,-46.8"/>
+<text text-anchor="middle" x="390.5" y="-73.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_cb -->
+<!-- type~swiftest_tp -->
 <g id="type~~symba_nbody_system~~InheritsGraph_node15" class="node">
-<title>type~swiftest_cb</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node15"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-235 170,-235 170,-211 235,-211 235,-235"/>
-<text text-anchor="middle" x="202.5" y="-220.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
+<title>type~swiftest_tp</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node15"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-93 278,-93 278,-69 341,-69 341,-93"/>
+<text text-anchor="middle" x="309.5" y="-78.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge14" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.68,-189.6C381.57,-197.82 295.55,-209.98 244.94,-217.14"/>
-<polygon fill="#000000" stroke="#000000" points="244.42,-213.68 235.01,-218.54 245.4,-220.61 244.42,-213.68"/>
-<text text-anchor="middle" x="309.5" y="-214.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge16" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-91.21C410.94,-88.93 377.11,-86.26 351.3,-84.22"/>
+<polygon fill="#000000" stroke="#000000" points="351.36,-80.72 341.12,-83.42 350.81,-87.69 351.36,-80.72"/>
+<text text-anchor="middle" x="390.5" y="-91.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~swiftest_body -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node18" class="node">
-<title>type~swiftest_body</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node18"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-187 164,-187 164,-163 241,-163 241,-187"/>
-<text text-anchor="middle" x="202.5" y="-172.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
+<!-- type~swiftest_particle_info -->
+<g id="type~~symba_nbody_system~~InheritsGraph_node16" class="node">
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node16"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-150 0,-150 0,-126 112,-126 112,-150"/>
+<text text-anchor="middle" x="56" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~symba_nbody_system~~InheritsGraph_edge17" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M277.79,-173.16C271.84,-173.32 265.7,-173.85 260,-175"/>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge18" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M259,-175C256.48,-175.51 253.88,-175.91 251.25,-176.22"/>
-<polygon fill="#000000" stroke="#000000" points="250.72,-172.75 241.02,-177.02 251.26,-179.73 250.72,-172.75"/>
-<path fill="none" stroke="#000000" d="M289.21,-145.15C285.36,-147.89 281.44,-150.9 278,-154 268.86,-162.22 272.05,-172.57 260,-175"/>
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-130.98C155.82,-131.84 138.87,-132.9 122.39,-133.93"/>
+<polygon fill="#000000" stroke="#000000" points="121.99,-130.45 112.23,-134.56 122.43,-137.43 121.99,-130.45"/>
+<text text-anchor="middle" x="138" y="-135.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
 <!-- type~swiftest_base -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node16" class="node">
+<g id="type~~symba_nbody_system~~InheritsGraph_node17" class="node">
 <title>type~swiftest_base</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node16"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-242 17.5,-242 17.5,-218 94.5,-218 94.5,-242"/>
-<text text-anchor="middle" x="56" y="-227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node17"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-96 17.5,-96 17.5,-72 94.5,-72 94.5,-96"/>
+<text text-anchor="middle" x="56" y="-81.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge20" class="edge">
+<g id="type~~symba_nbody_system~~InheritsGraph_edge18" class="edge">
 <title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.82,-225.49C162.03,-226.05 153.72,-226.59 146,-227 132.72,-227.7 118.32,-228.27 105.05,-228.72"/>
-<polygon fill="#000000" stroke="#000000" points="104.57,-225.23 94.69,-229.05 104.8,-232.23 104.57,-225.23"/>
+<path fill="none" stroke="#000000" d="M169.79,-119.12C150.55,-113.13 125.65,-105.38 104.14,-98.68"/>
+<polygon fill="#000000" stroke="#000000" points="105.11,-95.32 94.52,-95.69 103.03,-102 105.11,-95.32"/>
 </g>
-<!-- type~swiftest_particle_info -->
-<g id="type~~symba_nbody_system~~InheritsGraph_node17" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~symba_nbody_system~~InheritsGraph_node17"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-190 0,-190 0,-166 112,-166 112,-190"/>
-<text text-anchor="middle" x="56" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<!-- type~swiftest_body -->
+<g id="type~~symba_nbody_system~~InheritsGraph_node18" class="node">
+<title>type~swiftest_body</title>
+<g id="a_type~~symba_nbody_system~~InheritsGraph_node18"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-93 164,-93 164,-69 241,-69 241,-93"/>
+<text text-anchor="middle" x="202.5" y="-78.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~symba_nbody_system~~InheritsGraph_edge19" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-213.12C150.93,-207.25 126.61,-199.68 105.39,-193.07"/>
-<polygon fill="#000000" stroke="#000000" points="106.17,-189.65 95.58,-190.01 104.09,-196.33 106.17,-189.65"/>
-<text text-anchor="middle" x="138" y="-206.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M259,-81C256.48,-81.51 253.88,-81.91 251.25,-82.22"/>
+<polygon fill="#000000" stroke="#000000" points="250.72,-78.75 241.02,-83.02 251.26,-85.73 250.72,-78.75"/>
+<path fill="none" stroke="#000000" d="M289.21,-51.15C285.36,-53.89 281.44,-56.9 278,-60 268.86,-68.22 272.05,-78.57 260,-81"/>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~symba_nbody_system~~InheritsGraph_edge22" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.72,-185.65C152.75,-189.01 140.81,-192.91 130,-197 117.07,-201.89 103.17,-207.96 91,-213.56"/>
-<polygon fill="#000000" stroke="#000000" points="89.26,-210.51 81.67,-217.91 92.22,-216.85 89.26,-210.51"/>
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge20" class="edge">
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M277.79,-79.16C271.84,-79.32 265.7,-79.85 260,-81"/>
 </g>
 <!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~symba_nbody_system~~InheritsGraph_edge21" class="edge">
 <title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.1,-162.94C158.79,-161.3 152.26,-159.88 146,-159 130.11,-156.76 112.82,-159.28 97.74,-163.15"/>
-<polygon fill="#000000" stroke="#000000" points="96.37,-159.9 87.7,-166 98.28,-166.63 96.37,-159.9"/>
-<text text-anchor="middle" x="138" y="-161.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.86,-93.09C149.4,-101.55 120.51,-112.95 97.21,-122.14"/>
+<polygon fill="#000000" stroke="#000000" points="95.62,-119 87.6,-125.93 98.19,-125.52 95.62,-119"/>
+<text text-anchor="middle" x="138" y="-109.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+</g>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~symba_nbody_system~~InheritsGraph_edge22" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.94,-75.62C157.95,-74.94 151.82,-74.37 146,-74 132.52,-73.15 117.94,-74.03 104.56,-75.56"/>
+<polygon fill="#000000" stroke="#000000" points="104.08,-72.1 94.6,-76.84 104.97,-79.04 104.08,-72.1"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/symba_pl.html b/docs/type/symba_pl.html
index 4db60172f..aa4d1e41d 100644
--- a/docs/type/symba_pl.html
+++ b/docs/type/symba_pl.html
@@ -437,100 +437,100 @@ <h3 class="panel-title">Inherits</h3>
 <!-- type~symba_pl -->
 <g id="type~~symba_pl~~InheritsGraph_node1" class="node">
 <title>type~symba_pl</title>
-<polygon fill="none" stroke="black" points="567,-36 509,-36 509,-12 567,-12 567,-36"/>
-<text text-anchor="middle" x="538" y="-21.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_pl</text>
+<polygon fill="none" stroke="black" points="567,-66 509,-66 509,-42 567,-42 567,-66"/>
+<text text-anchor="middle" x="538" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">symba_pl</text>
 </g>
-<!-- type~helio_pl -->
+<!-- type~symba_kinship -->
 <g id="type~~symba_pl~~InheritsGraph_node2" class="node">
-<title>type~helio_pl</title>
-<g id="a_type~~symba_pl~~InheritsGraph_node2"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="445.5,-66 391.5,-66 391.5,-42 445.5,-42 445.5,-66"/>
-<text text-anchor="middle" x="418.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
+<title>type~symba_kinship</title>
+<g id="a_type~~symba_pl~~InheritsGraph_node2"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="460,-87 377,-87 377,-63 460,-63 460,-87"/>
+<text text-anchor="middle" x="418.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pl&#45;&gt;type~helio_pl -->
-<g id="type~~symba_pl~~InheritsGraph_edge2" class="edge">
-<title>type~symba_pl&#45;&gt;type~helio_pl</title>
-<path fill="none" stroke="#000000" d="M508.86,-31.19C493,-35.23 473.02,-40.34 455.97,-44.69"/>
-<polygon fill="#000000" stroke="#000000" points="454.63,-41.42 445.8,-47.28 456.36,-48.2 454.63,-41.42"/>
+<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
+<g id="type~~symba_pl~~InheritsGraph_edge1" class="edge">
+<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M508.86,-59.03C497.28,-61.1 483.5,-63.56 470.27,-65.93"/>
+<polygon fill="#000000" stroke="#000000" points="469.54,-62.5 460.31,-67.71 470.77,-69.39 469.54,-62.5"/>
+<text text-anchor="middle" x="484.5" y="-66.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
 </g>
-<!-- type~symba_kinship -->
+<!-- type~helio_pl -->
 <g id="type~~symba_pl~~InheritsGraph_node3" class="node">
-<title>type~symba_kinship</title>
-<g id="a_type~~symba_pl~~InheritsGraph_node3"><a xlink:href=".././type/symba_kinship.html" xlink:title="symba_kinship">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="460,-24 377,-24 377,0 460,0 460,-24"/>
-<text text-anchor="middle" x="418.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_kinship</text>
+<title>type~helio_pl</title>
+<g id="a_type~~symba_pl~~InheritsGraph_node3"><a xlink:href=".././type/helio_pl.html" xlink:title="helio_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="445.5,-45 391.5,-45 391.5,-21 445.5,-21 445.5,-45"/>
+<text text-anchor="middle" x="418.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_pl&#45;&gt;type~symba_kinship -->
-<g id="type~~symba_pl~~InheritsGraph_edge1" class="edge">
-<title>type~symba_pl&#45;&gt;type~symba_kinship</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M508.86,-21.13C497.28,-19.94 483.5,-18.54 470.27,-17.19"/>
-<polygon fill="#000000" stroke="#000000" points="470.61,-13.7 460.31,-16.17 469.9,-20.67 470.61,-13.7"/>
-<text text-anchor="middle" x="484.5" y="-22.4" font-family="Helvetica,sans-Serif" font-size="9.50">kin</text>
+<!-- type~symba_pl&#45;&gt;type~helio_pl -->
+<g id="type~~symba_pl~~InheritsGraph_edge2" class="edge">
+<title>type~symba_pl&#45;&gt;type~helio_pl</title>
+<path fill="none" stroke="#000000" d="M508.86,-48.97C493,-46.14 473.02,-42.57 455.97,-39.52"/>
+<polygon fill="#000000" stroke="#000000" points="456.26,-36.02 445.8,-37.7 455.03,-42.91 456.26,-36.02"/>
 </g>
 <!-- type~swiftest_pl -->
 <g id="type~~symba_pl~~InheritsGraph_node4" class="node">
 <title>type~swiftest_pl</title>
 <g id="a_type~~symba_pl~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="340,-66 278,-66 278,-42 340,-42 340,-66"/>
-<text text-anchor="middle" x="309" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="340,-45 278,-45 278,-21 340,-21 340,-45"/>
+<text text-anchor="middle" x="309" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~helio_pl&#45;&gt;type~swiftest_pl -->
 <g id="type~~symba_pl~~InheritsGraph_edge3" class="edge">
 <title>type~helio_pl&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" d="M391.48,-54C379.2,-54 364.26,-54 350.54,-54"/>
-<polygon fill="#000000" stroke="#000000" points="350.36,-50.5 340.36,-54 350.36,-57.5 350.36,-50.5"/>
+<path fill="none" stroke="#000000" d="M391.48,-33C379.2,-33 364.26,-33 350.54,-33"/>
+<polygon fill="#000000" stroke="#000000" points="350.36,-29.5 340.36,-33 350.36,-36.5 350.36,-29.5"/>
 </g>
 <!-- type~swiftest_body -->
 <g id="type~~symba_pl~~InheritsGraph_node5" class="node">
 <title>type~swiftest_body</title>
 <g id="a_type~~symba_pl~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
-<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-45 164,-45 164,-21 241,-21 241,-45"/>
+<text text-anchor="middle" x="202.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~symba_pl~~InheritsGraph_edge4" class="edge">
 <title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M277.77,-54C269.45,-54 260.22,-54 251.17,-54"/>
-<polygon fill="#000000" stroke="#000000" points="251.09,-50.5 241.09,-54 251.09,-57.5 251.09,-50.5"/>
+<path fill="none" stroke="#000000" d="M277.77,-33C269.45,-33 260.22,-33 251.17,-33"/>
+<polygon fill="#000000" stroke="#000000" points="251.09,-29.5 241.09,-33 251.09,-36.5 251.09,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~symba_pl~~InheritsGraph_node6" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~symba_pl~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-87 17.5,-87 17.5,-63 94.5,-63 94.5,-87"/>
-<text text-anchor="middle" x="56" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~symba_pl~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~symba_pl~~InheritsGraph_edge6" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-59.46C145.84,-62.09 123.97,-65.27 104.73,-68.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-64.63 94.65,-69.53 105.05,-71.55 104.04,-64.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~symba_pl~~InheritsGraph_edge5" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~symba_pl~~InheritsGraph_node7" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~symba_pl~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-45 0,-45 0,-21 112,-21 112,-45"/>
-<text text-anchor="middle" x="56" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~symba_pl~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~symba_pl~~InheritsGraph_edge5" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-48.54C151.19,-46.69 136.6,-44.57 122.36,-42.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-38.98 112.09,-41.01 121.48,-45.91 122.49,-38.98"/>
-<text text-anchor="middle" x="138" y="-48.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~symba_pl~~InheritsGraph_edge6" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -4176,7 +4176,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine helio_gr_kick_getacch_pl(self, param)
+public pure module subroutine helio_gr_kick_getacch_pl(self, param)
     
     
    
diff --git a/docs/type/symba_tp.html b/docs/type/symba_tp.html
index ad06aa927..70d3fa89f 100644
--- a/docs/type/symba_tp.html
+++ b/docs/type/symba_tp.html
@@ -431,36 +431,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.85,-33C269.49,-33 260.24,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.08,-29.5 241.08,-33 251.08,-36.5 251.08,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~symba_tp~~InheritsGraph_node5" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~symba_tp~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~symba_tp~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~symba_tp~~InheritsGraph_edge5" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~symba_tp~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~symba_tp~~InheritsGraph_node6" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~symba_tp~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~symba_tp~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~symba_tp~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~symba_tp~~InheritsGraph_edge5" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -2704,7 +2704,7 @@ <h3>interface
           
     
     <h3>
-public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
     
     
    
@@ -3709,7 +3709,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine helio_gr_kick_getacch_tp(self, param)
+public pure module subroutine helio_gr_kick_getacch_tp(self, param)
     
     
    
diff --git a/docs/type/whm_cb.html b/docs/type/whm_cb.html
index 988b3ca3c..d3d0c08e4 100644
--- a/docs/type/whm_cb.html
+++ b/docs/type/whm_cb.html
@@ -325,36 +325,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M265.93,-33C257.67,-33 248.33,-33 239.26,-33"/>
 <polygon fill="#000000" stroke="#000000" points="239.21,-29.5 229.21,-33 239.21,-36.5 239.21,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~whm_cb~~InheritsGraph_node3" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~whm_cb~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~whm_cb~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~whm_cb~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.73,-37.82C146.18,-40.48 124.04,-43.84 104.48,-46.8"/>
-<polygon fill="#000000" stroke="#000000" points="103.89,-43.35 94.52,-48.31 104.94,-50.27 103.89,-43.35"/>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~whm_cb~~InheritsGraph_edge2" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-37.82C151.33,-39.7 136.65,-41.92 122.2,-44.11"/>
+<polygon fill="#000000" stroke="#000000" points="121.62,-40.66 112.26,-45.62 122.67,-47.58 121.62,-40.66"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~whm_cb~~InheritsGraph_node4" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~whm_cb~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~whm_cb~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~whm_cb~~InheritsGraph_edge2" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.73,-28.18C151.33,-26.3 136.65,-24.08 122.2,-21.89"/>
-<polygon fill="#000000" stroke="#000000" points="122.67,-18.42 112.26,-20.38 121.62,-25.34 122.67,-18.42"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
+<g id="type~~whm_cb~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.73,-28.18C146.18,-25.52 124.04,-22.16 104.48,-19.2"/>
+<polygon fill="#000000" stroke="#000000" points="104.94,-15.73 94.52,-17.69 103.89,-22.65 104.94,-15.73"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/whm_nbody_system.html b/docs/type/whm_nbody_system.html
index d3cff0368..3659fcd41 100644
--- a/docs/type/whm_nbody_system.html
+++ b/docs/type/whm_nbody_system.html
@@ -303,11 +303,11 @@ <h3 class="panel-title">Inherits</h3>
 <!-- Generated by graphviz version 2.47.1 (20210417.1919)
  -->
 <!-- Title: type~~whm_nbody_system~~InheritsGraph Pages: 1 -->
-<svg id="typewhm_nbody_systemInheritsGraph" width="641pt" height="115pt"
- viewBox="0.00 0.00 641.00 115.17" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="type~~whm_nbody_system~~InheritsGraph" class="graph" transform="scale(0.89 0.89) rotate(0) translate(4 125)">
+<svg id="typewhm_nbody_systemInheritsGraph" width="641pt" height="117pt"
+ viewBox="0.00 0.00 641.00 116.95" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="type~~whm_nbody_system~~InheritsGraph" class="graph" transform="scale(0.89 0.89) rotate(0) translate(4 127)">
 <title>type~~whm_nbody_system~~InheritsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-125 714,-125 714,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-127 714,-127 714,4 -4,4"/>
 <!-- type~whm_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritsGraph_node1" class="node">
 <title>type~whm_nbody_system</title>
@@ -329,118 +329,118 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M599.73,-54C591.1,-54 582.05,-54 573.11,-54"/>
 <polygon fill="#000000" stroke="#000000" points="573.07,-50.5 563.07,-54 573.07,-57.5 573.07,-50.5"/>
 </g>
-<!-- type~swiftest_tp -->
+<!-- type~swiftest_cb -->
 <g id="type~~whm_nbody_system~~InheritsGraph_node3" class="node">
-<title>type~swiftest_tp</title>
-<g id="a_type~~whm_nbody_system~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-24 278,-24 278,0 341,0 341,-24"/>
-<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
+<title>type~swiftest_cb</title>
+<g id="a_type~~whm_nbody_system~~InheritsGraph_node3"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
+<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
-<g id="type~~whm_nbody_system~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.81,-35.28 378.82,-27.1 351.13,-20.98"/>
-<polygon fill="#000000" stroke="#000000" points="351.52,-17.48 341,-18.74 350.01,-24.32 351.52,-17.48"/>
-<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
+<g id="type~~whm_nbody_system~~InheritsGraph_edge2" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
+<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
+<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
 </g>
 <!-- type~swiftest_pl -->
 <g id="type~~whm_nbody_system~~InheritsGraph_node4" class="node">
 <title>type~swiftest_pl</title>
 <g id="a_type~~whm_nbody_system~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_pl.html" xlink:title="swiftest_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-66 278.5,-66 278.5,-42 340.5,-42 340.5,-66"/>
-<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
+<polygon fill="#5cb85c" stroke="#5cb85c" points="340.5,-24 278.5,-24 278.5,0 340.5,0 340.5,-24"/>
+<text text-anchor="middle" x="309.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_pl</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_pl -->
 <g id="type~~whm_nbody_system~~InheritsGraph_edge3" class="edge">
 <title>type~swiftest_nbody_system&#45;&gt;type~swiftest_pl</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.75,-54 376.66,-54 350.79,-54"/>
-<polygon fill="#000000" stroke="#000000" points="350.59,-50.5 340.59,-54 350.59,-57.5 350.59,-50.5"/>
-<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M446.05,-41.96C415.58,-35.23 378.26,-26.98 350.5,-20.84"/>
+<polygon fill="#000000" stroke="#000000" points="351.25,-17.42 340.73,-18.68 349.74,-24.26 351.25,-17.42"/>
+<text text-anchor="middle" x="390.5" y="-37.4" font-family="Helvetica,sans-Serif" font-size="9.50">pl, pl_discards</text>
 </g>
-<!-- type~swiftest_cb -->
+<!-- type~swiftest_tp -->
 <g id="type~~whm_nbody_system~~InheritsGraph_node5" class="node">
-<title>type~swiftest_cb</title>
-<g id="a_type~~whm_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_cb.html" xlink:title="swiftest_cb">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="235,-114 170,-114 170,-90 235,-90 235,-114"/>
-<text text-anchor="middle" x="202.5" y="-99.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_cb</text>
+<title>type~swiftest_tp</title>
+<g id="a_type~~whm_nbody_system~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_tp.html" xlink:title="swiftest_tp">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="341,-66 278,-66 278,-42 341,-42 341,-66"/>
+<text text-anchor="middle" x="309.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_tp</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_cb -->
-<g id="type~~whm_nbody_system~~InheritsGraph_edge2" class="edge">
-<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_cb</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.67,-64.99C433.7,-66.02 427.73,-67.04 422,-68 360.48,-78.27 289.03,-89.2 245.05,-95.81"/>
-<polygon fill="#000000" stroke="#000000" points="244.38,-92.37 235.02,-97.32 245.42,-99.3 244.38,-92.37"/>
-<text text-anchor="middle" x="309.5" y="-92.4" font-family="Helvetica,sans-Serif" font-size="9.50">cb</text>
+<!-- type~swiftest_nbody_system&#45;&gt;type~swiftest_tp -->
+<g id="type~~whm_nbody_system~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_nbody_system&#45;&gt;type~swiftest_tp</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M439.86,-54C410.94,-54 377.11,-54 351.3,-54"/>
+<polygon fill="#000000" stroke="#000000" points="351.12,-50.5 341.12,-54 351.12,-57.5 351.12,-50.5"/>
+<text text-anchor="middle" x="390.5" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">tp, tp_discards</text>
 </g>
-<!-- type~swiftest_body -->
-<g id="type~~whm_nbody_system~~InheritsGraph_node8" class="node">
-<title>type~swiftest_body</title>
-<g id="a_type~~whm_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
-<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
+<!-- type~swiftest_particle_info -->
+<g id="type~~whm_nbody_system~~InheritsGraph_node6" class="node">
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~whm_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-123 0,-123 0,-99 112,-99 112,-123"/>
+<text text-anchor="middle" x="56" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~whm_nbody_system~~InheritsGraph_edge5" class="edge">
-<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
-<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
-<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
-</g>
-<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
-<g id="type~~whm_nbody_system~~InheritsGraph_edge6" class="edge">
-<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
-<path fill="none" stroke="#000000" d="M278.3,-52.15C272.2,-52.29 265.86,-52.82 260,-54"/>
+<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-103.98C155.82,-104.84 138.87,-105.9 122.39,-106.93"/>
+<polygon fill="#000000" stroke="#000000" points="121.99,-103.45 112.23,-107.56 122.43,-110.43 121.99,-103.45"/>
+<text text-anchor="middle" x="138" y="-108.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
 <!-- type~swiftest_base -->
-<g id="type~~whm_nbody_system~~InheritsGraph_node6" class="node">
+<g id="type~~whm_nbody_system~~InheritsGraph_node7" class="node">
 <title>type~swiftest_base</title>
-<g id="a_type~~whm_nbody_system~~InheritsGraph_node6"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-121 17.5,-121 17.5,-97 94.5,-97 94.5,-121"/>
-<text text-anchor="middle" x="56" y="-106.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<g id="a_type~~whm_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-69 17.5,-69 17.5,-45 94.5,-45 94.5,-69"/>
+<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
 <!-- type~swiftest_cb&#45;&gt;type~swiftest_base -->
-<g id="type~~whm_nbody_system~~InheritsGraph_edge8" class="edge">
+<g id="type~~whm_nbody_system~~InheritsGraph_edge6" class="edge">
 <title>type~swiftest_cb&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M169.82,-104.49C162.03,-105.05 153.72,-105.59 146,-106 132.72,-106.7 118.32,-107.27 105.05,-107.72"/>
-<polygon fill="#000000" stroke="#000000" points="104.57,-104.23 94.69,-108.05 104.8,-111.23 104.57,-104.23"/>
+<path fill="none" stroke="#000000" d="M169.79,-92.12C150.55,-86.13 125.65,-78.38 104.14,-71.68"/>
+<polygon fill="#000000" stroke="#000000" points="105.11,-68.32 94.52,-68.69 103.03,-75 105.11,-68.32"/>
 </g>
-<!-- type~swiftest_particle_info -->
-<g id="type~~whm_nbody_system~~InheritsGraph_node7" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~whm_nbody_system~~InheritsGraph_node7"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-69 0,-69 0,-45 112,-45 112,-69"/>
-<text text-anchor="middle" x="56" y="-54.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<!-- type~swiftest_body -->
+<g id="type~~whm_nbody_system~~InheritsGraph_node8" class="node">
+<title>type~swiftest_body</title>
+<g id="a_type~~whm_nbody_system~~InheritsGraph_node8"><a xlink:href=".././type/swiftest_body.html" xlink:title="swiftest_body">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="241,-66 164,-66 164,-42 241,-42 241,-66"/>
+<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_body</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_cb&#45;&gt;type~swiftest_particle_info -->
+<!-- type~swiftest_pl&#45;&gt;type~swiftest_body -->
 <g id="type~~whm_nbody_system~~InheritsGraph_edge7" class="edge">
-<title>type~swiftest_cb&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M169.79,-92.12C150.93,-86.25 126.61,-78.68 105.39,-72.07"/>
-<polygon fill="#000000" stroke="#000000" points="106.17,-68.65 95.58,-69.01 104.09,-75.33 106.17,-68.65"/>
-<text text-anchor="middle" x="138" y="-85.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<title>type~swiftest_pl&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M289.21,-24.15C285.36,-26.89 281.44,-29.9 278,-33 268.86,-41.22 272.05,-51.57 260,-54"/>
+<path fill="none" stroke="#000000" d="M259,-54C256.48,-54.51 253.88,-54.91 251.25,-55.22"/>
+<polygon fill="#000000" stroke="#000000" points="250.72,-51.75 241.02,-56.02 251.26,-58.73 250.72,-51.75"/>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~whm_nbody_system~~InheritsGraph_edge10" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.72,-64.65C152.75,-68.01 140.81,-71.91 130,-76 117.07,-80.89 103.17,-86.96 91,-92.56"/>
-<polygon fill="#000000" stroke="#000000" points="89.26,-89.51 81.67,-96.91 92.22,-95.85 89.26,-89.51"/>
+<!-- type~swiftest_tp&#45;&gt;type~swiftest_body -->
+<g id="type~~whm_nbody_system~~InheritsGraph_edge8" class="edge">
+<title>type~swiftest_tp&#45;&gt;type~swiftest_body</title>
+<path fill="none" stroke="#000000" d="M277.79,-52.16C271.84,-52.32 265.7,-52.85 260,-54"/>
 </g>
 <!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
 <g id="type~~whm_nbody_system~~InheritsGraph_edge9" class="edge">
 <title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M165.1,-41.94C158.79,-40.3 152.26,-38.88 146,-38 130.11,-35.76 112.82,-38.28 97.74,-42.15"/>
-<polygon fill="#000000" stroke="#000000" points="96.37,-38.9 87.7,-45 98.28,-45.63 96.37,-38.9"/>
-<text text-anchor="middle" x="138" y="-40.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M170.86,-66.09C149.4,-74.55 120.51,-85.95 97.21,-95.14"/>
+<polygon fill="#000000" stroke="#000000" points="95.62,-92 87.6,-98.93 98.19,-98.52 95.62,-92"/>
+<text text-anchor="middle" x="138" y="-82.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+</g>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~whm_nbody_system~~InheritsGraph_edge10" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.94,-48.62C157.95,-47.94 151.82,-47.37 146,-47 132.52,-46.15 117.94,-47.03 104.56,-48.56"/>
+<polygon fill="#000000" stroke="#000000" points="104.08,-45.1 94.6,-49.84 104.97,-52.04 104.08,-45.1"/>
 </g>
 </g>
 </svg>
@@ -505,66 +505,66 @@ <h3 class="panel-title">Inherited by</h3>
 <polygon fill="none" stroke="black" points="110,-66 0,-66 0,-42 110,-42 110,-66"/>
 <text text-anchor="middle" x="55" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">whm_nbody_system</text>
 </g>
-<!-- type~helio_nbody_system -->
+<!-- type~rmvs_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_node2" class="node">
-<title>type~helio_nbody_system</title>
-<g id="a_type~~whm_nbody_system~~InheritedByGraph_node2"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="257.5,-66 147.5,-66 147.5,-42 257.5,-42 257.5,-66"/>
-<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
+<title>type~rmvs_nbody_system</title>
+<g id="a_type~~whm_nbody_system~~InheritedByGraph_node2"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="258,-66 147,-66 147,-42 258,-42 258,-66"/>
+<text text-anchor="middle" x="202.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
+<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_edge1" class="edge">
-<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
-<path fill="none" stroke="#000000" d="M147.15,-52.37C141.01,-52.67 134.86,-53.18 129,-54"/>
+<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<path fill="none" stroke="#000000" d="M146.76,-52.39C140.75,-52.69 134.73,-53.2 129,-54"/>
 </g>
-<!-- type~rmvs_nbody_system -->
+<!-- type~helio_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_node3" class="node">
-<title>type~rmvs_nbody_system</title>
-<g id="a_type~~whm_nbody_system~~InheritedByGraph_node3"><a xlink:href=".././type/rmvs_nbody_system.html" xlink:title="rmvs_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="258,-24 147,-24 147,0 258,0 258,-24"/>
-<text text-anchor="middle" x="202.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_nbody_system</text>
+<title>type~helio_nbody_system</title>
+<g id="a_type~~whm_nbody_system~~InheritedByGraph_node3"><a xlink:href=".././type/helio_nbody_system.html" xlink:title="helio_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="257.5,-24 147.5,-24 147.5,0 257.5,0 257.5,-24"/>
+<text text-anchor="middle" x="202.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">helio_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system -->
+<!-- type~helio_nbody_system&#45;&gt;type~whm_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_edge2" class="edge">
-<title>type~rmvs_nbody_system&#45;&gt;type~whm_nbody_system</title>
+<title>type~helio_nbody_system&#45;&gt;type~whm_nbody_system</title>
 <path fill="none" stroke="#000000" d="M163.03,-24.04C157.42,-26.57 151.89,-29.55 147,-33 136.96,-40.09 141.18,-52.31 129,-54"/>
 <path fill="none" stroke="#000000" d="M128,-54C125.51,-54.35 122.96,-54.64 120.39,-54.88"/>
 <polygon fill="#000000" stroke="#000000" points="120.09,-51.4 110.36,-55.6 120.59,-58.38 120.09,-51.4"/>
 </g>
-<!-- type~symba_nbody_system -->
+<!-- type~rmvs_pl -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_node4" class="node">
-<title>type~symba_nbody_system</title>
-<g id="a_type~~whm_nbody_system~~InheritedByGraph_node4"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="473,-66 354,-66 354,-42 473,-42 473,-66"/>
-<text text-anchor="middle" x="413.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
+<title>type~rmvs_pl</title>
+<g id="a_type~~whm_nbody_system~~InheritedByGraph_node4"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="440.5,-66 386.5,-66 386.5,-42 440.5,-42 440.5,-66"/>
+<text text-anchor="middle" x="413.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
 </a>
 </g>
 </g>
-<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
+<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_edge3" class="edge">
-<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
-<path fill="none" stroke="#000000" d="M353.73,-54C326.96,-54 295.21,-54 267.81,-54"/>
-<polygon fill="#000000" stroke="#000000" points="267.54,-50.5 257.54,-54 267.54,-57.5 267.54,-50.5"/>
+<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.45,-54C357.06,-54 308.15,-54 268.29,-54"/>
+<polygon fill="#000000" stroke="#000000" points="268.11,-50.5 258.11,-54 268.11,-57.5 268.11,-50.5"/>
+<text text-anchor="middle" x="306" y="-56.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
 </g>
-<!-- type~rmvs_pl -->
+<!-- type~symba_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_node5" class="node">
-<title>type~rmvs_pl</title>
-<g id="a_type~~whm_nbody_system~~InheritedByGraph_node5"><a xlink:href=".././type/rmvs_pl.html" xlink:title="rmvs_pl">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="440.5,-24 386.5,-24 386.5,0 440.5,0 440.5,-24"/>
-<text text-anchor="middle" x="413.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">rmvs_pl</text>
+<title>type~symba_nbody_system</title>
+<g id="a_type~~whm_nbody_system~~InheritedByGraph_node5"><a xlink:href=".././type/symba_nbody_system.html" xlink:title="symba_nbody_system">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="473,-24 354,-24 354,0 473,0 473,-24"/>
+<text text-anchor="middle" x="413.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">symba_nbody_system</text>
 </a>
 </g>
 </g>
-<!-- type~rmvs_pl&#45;&gt;type~rmvs_nbody_system -->
+<!-- type~symba_nbody_system&#45;&gt;type~helio_nbody_system -->
 <g id="type~~whm_nbody_system~~InheritedByGraph_edge4" class="edge">
-<title>type~rmvs_pl&#45;&gt;type~rmvs_nbody_system</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M386.45,-12C357.06,-12 308.15,-12 268.29,-12"/>
-<polygon fill="#000000" stroke="#000000" points="268.11,-8.5 258.11,-12 268.11,-15.5 268.11,-8.5"/>
-<text text-anchor="middle" x="306" y="-14.4" font-family="Helvetica,sans-Serif" font-size="9.50">planetocentric</text>
+<title>type~symba_nbody_system&#45;&gt;type~helio_nbody_system</title>
+<path fill="none" stroke="#000000" d="M353.73,-12C326.96,-12 295.21,-12 267.81,-12"/>
+<polygon fill="#000000" stroke="#000000" points="267.54,-8.5 257.54,-12 267.54,-15.5 267.54,-8.5"/>
 </g>
 </g>
 </svg>
diff --git a/docs/type/whm_pl.html b/docs/type/whm_pl.html
index b09d989ce..48d9a455a 100644
--- a/docs/type/whm_pl.html
+++ b/docs/type/whm_pl.html
@@ -448,36 +448,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.77,-33C269.45,-33 260.22,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.09,-29.5 241.09,-33 251.09,-36.5 251.09,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~whm_pl~~InheritsGraph_node4" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~whm_pl~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~whm_pl~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~whm_pl~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~whm_pl~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~whm_pl~~InheritsGraph_node5" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~whm_pl~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~whm_pl~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~whm_pl~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~whm_pl~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -4362,7 +4362,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine whm_gr_kick_getacch_pl(self, param)
+public pure module subroutine whm_gr_kick_getacch_pl(self, param)
     
     
    
diff --git a/docs/type/whm_tp.html b/docs/type/whm_tp.html
index 70f4028f4..fe5c47203 100644
--- a/docs/type/whm_tp.html
+++ b/docs/type/whm_tp.html
@@ -407,36 +407,36 @@ <h3 class="panel-title">Inherits</h3>
 <path fill="none" stroke="#000000" d="M277.85,-33C269.49,-33 260.24,-33 251.17,-33"/>
 <polygon fill="#000000" stroke="#000000" points="251.08,-29.5 241.08,-33 251.08,-36.5 251.08,-29.5"/>
 </g>
-<!-- type~swiftest_base -->
+<!-- type~swiftest_particle_info -->
 <g id="type~~whm_tp~~InheritsGraph_node4" class="node">
-<title>type~swiftest_base</title>
-<g id="a_type~~whm_tp~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-66 17.5,-66 17.5,-42 94.5,-42 94.5,-66"/>
-<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
+<title>type~swiftest_particle_info</title>
+<g id="a_type~~whm_tp~~InheritsGraph_node4"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-66 0,-66 0,-42 112,-42 112,-66"/>
+<text text-anchor="middle" x="56" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
-<g id="type~~whm_tp~~InheritsGraph_edge4" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
-<path fill="none" stroke="#000000" d="M163.91,-38.46C145.84,-41.09 123.97,-44.27 104.73,-47.06"/>
-<polygon fill="#000000" stroke="#000000" points="104.04,-43.63 94.65,-48.53 105.05,-50.55 104.04,-43.63"/>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
+<g id="type~~whm_tp~~InheritsGraph_edge3" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-38.46C151.19,-40.31 136.6,-42.43 122.36,-44.5"/>
+<polygon fill="#000000" stroke="#000000" points="121.48,-41.09 112.09,-45.99 122.49,-48.02 121.48,-41.09"/>
+<text text-anchor="middle" x="138" y="-44.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
 </g>
-<!-- type~swiftest_particle_info -->
+<!-- type~swiftest_base -->
 <g id="type~~whm_tp~~InheritsGraph_node5" class="node">
-<title>type~swiftest_particle_info</title>
-<g id="a_type~~whm_tp~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_particle_info.html" xlink:title="swiftest_particle_info">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="112,-24 0,-24 0,0 112,0 112,-24"/>
-<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_particle_info</text>
+<title>type~swiftest_base</title>
+<g id="a_type~~whm_tp~~InheritsGraph_node5"><a xlink:href=".././type/swiftest_base.html" xlink:title="swiftest_base">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="94.5,-24 17.5,-24 17.5,0 94.5,0 94.5,-24"/>
+<text text-anchor="middle" x="56" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">swiftest_base</text>
 </a>
 </g>
 </g>
-<!-- type~swiftest_body&#45;&gt;type~swiftest_particle_info -->
-<g id="type~~whm_tp~~InheritsGraph_edge3" class="edge">
-<title>type~swiftest_body&#45;&gt;type~swiftest_particle_info</title>
-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M163.91,-27.54C151.19,-25.69 136.6,-23.57 122.36,-21.5"/>
-<polygon fill="#000000" stroke="#000000" points="122.49,-17.98 112.09,-20.01 121.48,-24.91 122.49,-17.98"/>
-<text text-anchor="middle" x="138" y="-26.4" font-family="Helvetica,sans-Serif" font-size="9.50">info</text>
+<!-- type~swiftest_body&#45;&gt;type~swiftest_base -->
+<g id="type~~whm_tp~~InheritsGraph_edge4" class="edge">
+<title>type~swiftest_body&#45;&gt;type~swiftest_base</title>
+<path fill="none" stroke="#000000" d="M163.91,-27.54C145.84,-24.91 123.97,-21.73 104.73,-18.94"/>
+<polygon fill="#000000" stroke="#000000" points="105.05,-15.45 94.65,-17.47 104.04,-22.37 105.05,-15.45"/>
 </g>
 </g>
 </svg>
@@ -2828,7 +2828,7 @@ <h3>interface
           
     
     <h3>
-public pure module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
+public module subroutine kick_getacch_int_tp(self, GMpl, xhp, npl)
     
     
    
@@ -4451,7 +4451,7 @@ <h3>interface
           
     
     <h3>
-public module subroutine whm_gr_kick_getacch_tp(self, param)
+public pure module subroutine whm_gr_kick_getacch_tp(self, param)